| line |
true |
false |
branch |
|
43
|
0 |
0 |
unless $self->brik_help_run_undef_arg("check_cve_2015_1427_rce", $uri) |
|
46
|
0 |
0 |
unless ($uri =~ m[^http://[^:]+:\d+$]) |
|
60
|
0 |
0 |
unless my $reply = $self->post($check, $url) |
|
63
|
0 |
0 |
unless my $content = $reply->{'content'} |
|
65
|
0 |
0 |
unless my $sj = "Metabrik::String::Json"->new_from_brik_init($self) |
|
67
|
0 |
0 |
unless my $ref = $sj->decode($content) |
|
69
|
0 |
0 |
if ($ref->{'hits'} and $ref->{'hits'}{'hits'} and $ref->{'hits'}{'hits'}[0] and $ref->{'hits'}{'hits'}[0]{'fields'} and $ref->{'hits'}{'hits'}[0]{'fields'}{'myscript'}) { } |
|
73
|
0 |
0 |
if ($result ne "undef") |
|
95
|
0 |
0 |
unless $self->brik_help_run_undef_arg("exploit_cve_2015_1427_rce", $command) |
|
96
|
0 |
0 |
unless $self->brik_help_run_undef_arg("exploit_cve_2015_1427_rce", $uri) |
|
99
|
0 |
0 |
unless ($uri =~ m[^http://[^:]+:\d+$]) |
|
115
|
0 |
0 |
unless my $reply = $self->post($check, $url) |
|
118
|
0 |
0 |
unless my $content = $reply->{'content'} |
|
120
|
0 |
0 |
unless my $sj = "Metabrik::String::Json"->new_from_brik_init($self) |
|
122
|
0 |
0 |
unless my $ref = $sj->decode($content) |
|
124
|
0 |
0 |
if ($ref->{'hits'} and $ref->{'hits'}{'hits'} and $ref->{'hits'}{'hits'}[0] and $ref->{'hits'}{'hits'}[0]{'fields'} and $ref->{'hits'}{'hits'}[0]{'fields'}{'lupin'}) { } |
|
130
|
0 |
0 |
unless my $sp = "Metabrik::String::Parse"->new_from_brik_init($self) |