Branch Coverage

blib/lib/Gerrit/Client.pm
Criterion Covered Total %
branch 32 116 27.5


line true false branch
99 138 0 unless $DEBUG
109 113 0 unless (ref $url and $url->isa('URI'))
113 0 113 if ($url->scheme ne 'ssh')
125 113 0 $url->port ? :
0 113 $url->user ? :
220 22 8 if (my $r_h = delete $$handle{$key})
224 11 4 if (my $cv = delete $$handle{'cv'})
226 11 0 if (my $pid = $$handle{'pid'})
239 14 0 if ($retry) { }
245 0 14 if ($sleep > $MAX_SLEEP)
309 0 0 if ($$handle{'warn_on_stderr'})
322 4 0 if (defined wantarray) { }
539 0 3 if ($args{'http_username'} and $args{'http_password'})
543 0 3 unless $args{'ssh_url'}
544 0 2 unless $args{'on_patchset'} or $args{'on_patchset_cmd'} or $args{'on_patchset_fork'}
548 0 3 unless $args{'workdir'}
551 3 0 unless (exists $args{'git_work_tree'})
555 0 3 unless (exists $args{'query'})
559 3 0 unless (-d $args{'workdir'})
578 0 6 unless $args{'query'}
586 0 6 unless $weakself
681 2 7 unless ($ENV{'GIT_AUTHOR_NAME'} and $ENV{'GIT_AUTHOR_EMAIL'})
690 0 7 if (my $error = $?) { }
699 3 4 unless ($change_id)
707 0 3 if (my $error = $?) { }
718 7 0 if ($change_id)
720 0 7 if (not $? and $found)
726 7 0 if ($change_id)
805 2 0 unless ($options{'author_only'})
1045 0 0 unless ($options{'ssh_url'} or $options{'http_url'})
1049 0 0 if (not $options{'http_auth_cb'} and $options{'http_username'} and $options{'http_password'})
1053 0 0 if ($options{'ssh_url'})
1058 0 0 unless ($options{'project'})
1063 0 0 if ($options{'reviewInput'})
1074 0 0 unless ($$options{$opt})
1079 0 0 unless ($commit =~ /^[a-fA-F0-9]+$/)
1116 0 0 if ($$data{'message'} or $$data{'comments'})
1119 0 0 if ($$data{'labels'})
1131 0 0 if ($$options{'on_error'})
1144 0 0 if ($$options{'http_auth_cb'}($hdr, $post_args{'headers'})) { }
1153 0 0 unless ($$options{'http_auth_cb'})
1161 0 0 if ($$hdr{'Status'} =~ /^2/)
1166 0 0 if ($$hdr{'Status'} eq '404')
1171 0 0 if ($$hdr{'Status'} eq '401' and not $tried_auth and $handle_auth)
1200 0 0 if ($$spec{'type'} and $$spec{'type'} eq 257) { }
0 0 elsif (defined $value) { }
1201 0 0 if ($value)
1221 0 0 if ($status and $$options{'on_error'})
1224 0 0 if (not $status and $$options{'on_success'})
1335 0 0 unless $value
1362 0 0 if ($status and $options{'on_error'})
1367 0 0 unless $options{'on_success'}
1372 0 0 if ($Gerrit::Client::EVAL_ERROR)
1376 0 0 if $$data{'type'} and $$data{'type'} eq 'stats'
1435 0 0 unless ($authenticate and $authenticate =~ /^Digest /)
1447 0 0 if ($attr{'qop'})
1456 0 0 unless (grep {$_ eq 'auth';} @{$attr{'qop'};})
1461 0 0 unless ($attr{'algorithm'} eq 'MD5')