Branch Coverage

blib/lib/Git/Deploy.pm
Criterion Covered Total %
branch 0 412 0.0


line true false branch
93 0 0 if $gitdir
96 0 0 if not $gitdir or $gitdir =~ /Not a git repository/
104 0 0 unless chdir "$gitdir/.."
118 0 0 if $DEBUG
123 0 0 if ($error_code == -1) { }
0 0 elsif ($error_code & 127) { }
127 0 0 $error_code & 128 ? :
130 0 0 if ($DEBUG)
132 0 0 if $error_code
136 0 0 if defined $res
144 0 0 if ($error_code and not grep({$error_code == $_;} @accept))
175 0 0 unless (defined $config_file)
180 0 0 if (defined $config_file and $config_file ne '' and not defined $repo_name_detection)
185 0 0 if ($repo_name_detection)
186 0 0 unless my $detect = $repo_name_detection_values{$repo_name_detection}
196 0 0 if ($setting =~ /^\./) { }
0 0 elsif (not $setting =~ /\./) { }
201 0 0 unless (exists $config{$setting}{$opts})
207 0 0 if ($setting =~ /^\Q$config_prefix\E\./ and $repo_name)
216 0 0 $config_file && $setting =~ /^\Q$config_prefix\E\./ ? :
223 0 0 if ($error_code == 1) { }
0 0 elsif ($error_code == 2) { }
0 0 elsif ($error_code == 255) { }
0 0 elsif ($error_code) { }
0 0 elsif ($res =~ /\A\s*`\s*(.*)\s*`\s*\z/) { }
224 0 0 if ($source =~ /--file/) { }
0 0 elsif ($has_default) { }
229 0 0 if $last
240 0 0 if ($error_code)
246 0 0 if not $error_code and $res
297 0 0 if $ref_info_loaded
299 0 0 if $DEBUG
308 0 0 if $DEBUG
311 0 0 unless ($generated_code)
315 0 0 if $DEBUG
329 0 0 $info{'%(tag)'} ? :
0 0 s[^refs/(bisect)][] ? :
0 0 s[^refs/(stash)][] ? :
0 0 s[^refs/(tags)/][] ? :
0 0 s[^refs/(remotes)/][] ? :
0 0 s[^refs/(heads)/][] ? :
367 0 0 if ($ref_data{'category'} eq 'tag' and $ref_data{'type'} eq 'object') { }
429 0 0 if $DEBUG
439 0 0 if $name eq 'HEAD'
466 0 0 unless $name
467 0 0 if $name ne 'HEAD' and exists $name2commit{$name}
471 0 0 if (my $name_data = _get_name_data($name)) { }
475 0 0 if $DEBUG and $name ne 'HEAD'
480 0 0 if $sha1
490 0 0 unless $name
491 0 0 if $name ne 'HEAD' and exists $name2sha1{$name}
494 0 0 if (my $name_data = _get_name_data($name)) { }
501 0 0 if $sha1
513 0 0 unless $$name_data{'category'} eq 'tag' and $$name_data{'type'} eq 'object'
530 0 0 unless $$b[1] cmp $$a[1]
534 0 0 /\D(20\d{6})[_-]?(\d+)?/ ? :
547 0 0 /\D(20\d{6})[_-]?(\d+)?/ ? :
560 0 0 if ($_ ne '(no branch)') { }
576 0 0 if ($_ =~ s/^\s*\*\s*//)
577 0 0 $_ ne '(no branch)' ? :
593 0 0 unless ($special{$a} || 100) <=> ($special{$b} || 100)
600 0 0 wantarray ? :
612 0 0 if $find_all and $find_all eq 'first'
623 0 0 unless $sha1 eq $head_sha1
626 0 0 unless $find_all
671 0 0 if $status =~ /\(working directory clean\)/
687 0 0 unless $tag_name
689 0 0 unless @_
697 0 0 if (get_commit_for_name($tag_name))
710 0 0 if $error
712 0 0 if $VERBOSE
739 0 0 unless ($remote_site)
742 0 0 if not $remote_site or $remote_site eq 'none'
749 0 0 $action =~ /pull/ ? :
0 0 if $VERBOSE
752 0 0 $remote_branch ? :
756 0 0 if ($action =~ /fetch/ and $error == 1)
757 0 0 if $VERBOSE
761 0 0 if $error
763 0 0 if $VERBOSE and $res
820 0 0 unless my $head = get_commit_for_name('HEAD')
822 0 0 unless ($$opts{'list'})
823 0 0 unless @$array
825 0 0 if -t STDOUT
831 0 0 unless (ref $name)
833 0 0 if not $seen_sha1{$sha1} or (not $$opts{'prefix'} or $name =~ /^$$opts{'prefix'}/)
838 0 0 if $DEBUG
843 0 0 $$opts{'prefix'} eq '.' ? :
0 0 if $$opts{'prefix'} and not $$opts{'tag_only'}
849 0 0 unless $$opts{'tag_only'}
851 0 0 unless $$opts{'tag_only'}
863 0 0 if ref $name
864 0 0 if $$opts{'prefix'} and not $name =~ /^$$opts{'prefix'}-[0-9]+/
866 0 0 if $$opts{'count'} and $$opts{'count'} < ++$count
869 0 0 $next_name ? :
872 0 0 if ($$opts{'tag_only'}) { }
873 0 0 $$opts{'action'} && $$opts{'action'} eq 'showtag' ? :
877 0 0 if ($$opts{'for_interactive'})
884 0 0 @printed ? :
0 0 $sha1 eq $head ? :
0 0 $$opts{'long_digest'} ? :
0 0 $sha1 eq $head ? :
0 0 @$tags_for_commit ? :
899 0 0 if (@$array and @$array > $count)
900 0 0 $filtered ? :
901 0 0 $$opts{'count'} && $$opts{'count'} < @$array - $filtered ? :
905 0 0 unless $$opts{'tag_only'}
910 0 0 if $DEBUG
911 0 0 unless @$array or $$opts{'tag_only'}
933 0 0 unless my $sha1 = get_commit_for_name($tag)
935 0 0 unless open my $out, '>', $file
938 0 0 $message && @$message ? :
947 0 0 unless print $out $text
949 0 0 unless close $out
951 0 0 if $VERBOSE
965 0 0 unless $file and -e $file
970 0 0 $deploy_file_text =~ /^commit: ([a-f0-9]{40})\n/ ? :
971 0 0 if not $skip_check and !defined($sha1) || $sha1 ne get_commit_for_name('HEAD')
980 0 0 if (not ref $file_like) { }
981 0 0 unless (open $fh, '<', $file_like)
982 0 0 if ($no_die) { }
992 0 0 if (wantarray) { }
1034 0 0 unless ($lock_dir)
1036 0 0 unless ($lock_dir_root)
1037 0 0 unless -d $gitdir
1052 0 0 unless grep {$type eq $_;} @tag_file_names
1055 0 0 unless open my $out_fh, '>', "$lock_dir/$type"
1057 0 0 unless my $sha1 = get_commit_for_name($tag)
1069 0 0 unless grep {$type eq $_;} @tag_file_names
1076 0 0 if $tag and $sha1 and $sha1 eq get_commit_for_name($tag)
1086 0 0 unless -d $lock_dir
1087 0 0 unless -e $lock_file
1088 0 0 if (not wantarray) { }
1106 0 0 if $hash{'branch'} eq '(no branch)'
1110 0 0 wantarray ? :
1118 0 0 if ($msg) { }
0 0 elsif (my $sysadmin_lock = get_config_path('block-file', '')) { }
1121 0 0 if ($sysadmin_lock and -e $sysadmin_lock and not $force)
1128 0 0 if ($msg)
1129 0 0 if ($no_die) { }
1170 0 0 @file ? :
0 0 $last_line ? :
1172 0 0 $force ? :
1174 0 0 if ($status eq 'start') { }
0 0 elsif (not -d $lock_dir) { }
0 0 elsif ($opened_ok = sysopen($out_fh, $lock_file, 2)) { }
1177 0 0 unless (mkdir $lock_dir)
1181 0 0 if @file
1184 0 0 unless ($opened_ok = sysopen($out_fh, $lock_file, 193))
1196 0 0 if (@file == 3)
1202 0 0 unless (@file)
1205 0 0 if (not $file[0] && $file[0] =~ /^start:/ or @file > 2)
1208 0 0 if ($status eq 'sync' and @file != 1)
1211 0 0 if ($status eq 'finish')
1212 0 0 if (@file == 1) { }
0 0 elsif (@file == 2 and not $file[1] =~ /^(sync|release|manual-sync):/) { }
1219 0 0 if ($status eq 'finnish')
1222 0 0 if ($status eq 'abort')
1223 0 0 if (@file == 2 and not $file[1] =~ /^(sync|release|manual-sync):/)
1227 0 0 unless ($file[0] =~ /\t\Q$ENV{'USER'}\E$/)
1231 0 0 unless ($opened_ok)
1235 0 0 unless flock $out_fh, 6
1249 0 0 unless print $out_fh $status_line
1251 0 0 unless close $out_fh
1261 0 0 if (-e "$lock_dir/$type")
1262 0 0 unless unlink "$lock_dir/$type"
1266 0 0 unless unlink $lock_file
1268 0 0 if (-e "$lock_file~")
1269 0 0 unless unlink $lock_file
1272 0 0 unless rmdir $lock_dir
1274 0 0 if $VERBOSE > 1
1286 0 0 if (@cherry)
1294 0 0 if ($type eq '-') { }
1304 0 0 if @cherry and not $force
1315 0 0 if ($$rbinfo{'branch'} ne $cur_branch)
1324 0 0 if $VERBOSE and $VERBOSE > 1
1326 0 0 if $expect and not $result =~ /$expect/
1328 0 0 if $expect and $VERBOSE and $VERBOSE > 1
1353 0 0 if defined $root
1357 0 0 if ($SKIP_HOOKS)
1361 0 0 if (not $root && -e $root) { }
1363 0 0 if $VERBOSE and $VERBOSE > 1
1368 0 0 if $VERBOSE and $VERBOSE > 1
1378 0 0 unless my $root = get_hook_dir($prefix)
1381 0 0 unless -e $file
1382 0 0 if (-x $file) { }
1401 0 0 if ($? == -1) { }
0 0 elsif ($? & 127) { }
0 0 elsif ($? >> 8) { }
1403 0 0 $ignore_exit_code ? :
1406 0 0 $? & 128 ? :
1407 0 0 $ignore_exit_code ? :
1411 0 0 $ignore_exit_code ? :
1419 0 0 $appname eq 'common' ? :
0 0 if $VERBOSE > 1
1425 0 0 if (not @checks) { }
1426 0 0 -e $appdir ? :
0 0 if $DEBUG
1430 0 0 if $DEBUG
1436 0 0 unless (-x $spec)
1445 0 0 if $DEBUG
1456 0 0 unless my $root = get_hook_dir($prefix)
1464 0 0 if defined $args{'start_tag'}
1465 0 0 if defined $args{'rollout_tag'}
1482 0 0 exists $args{'ignore_exit_code'} ? :
1497 0 0 unless $log_directory