diff options
-rwxr-xr-x | sbosrcarch | 7 |
1 files changed, 6 insertions, 1 deletions
@@ -146,7 +146,7 @@ Checks the integrity and coverage of the archive. Reports at least these conditi - dangling symlinks - invalid md5sums - files present in only one of by-name or by-md5 but not the other - - extraneous files in the tree + - count extraneous files in the tree (or list, with -v) - generates a status report, giving the total size and coverage. - lists all SlackBuilds not covered by the archive. @@ -398,6 +398,7 @@ our @whitelist = (); our @blacklist = (); our $quickcheck; # used by check_mode() and its *wanted helpers our $verbosecheck; +our $extraneous_byname = 0; our %infofilecount; our %parsedinfo; @@ -1572,6 +1573,7 @@ sub check_byname_wanted { if(!-f $info) { print "$shortname extraneous: no info file for $category/$prgnam\n" if $verbosecheck; $filecount--; + $extraneous_byname++; return; } @@ -1605,6 +1607,7 @@ sub check_byname_wanted { } else { print "$shortname extraneous: not mentioned in $info (sbosrcarch purge)\n" if $verbosecheck; $filecount--; + $extraneous_byname++; } if(blacklisted($category, $prgnam)) { @@ -1708,6 +1711,7 @@ sub check_mode { push @missingfilebuilds, $_ if $count; } + print "---\n"; if(@missingfilebuilds) { print "Following SlackBuilds are missing files:\n"; print " $_\n" for sort { $a cmp $b } @missingfilebuilds; @@ -1733,6 +1737,7 @@ Total source files: $totalfiles Archived files: $filecount Archive size: $filemegs Missing files: $missingfiles +Extraneous files: $extraneous_byname File coverage: $filecoverage% Total SlackBuilds: $totalbuildcount |