sbosrcarch: add by-md5 build status

1 files changed, 14 insertions, 1 deletions

diff --git a/sbosrcarch b/sbosrcarch
index d8ef22e..7b9ab11 100755
--- a/sbosrcarch
+++ b/sbosrcarch
@@ -1696,7 +1696,8 @@ sub check_info_wanted {
 	$totalfiles += keys %$dls;
 	$infofilecount{"$category/$prgnam"} += keys %$dls;
 	$parsedinfo{"$category/$prgnam"} = $dls;
-	$allmd5sums{$_}++ for values %$dls;
+	#$allmd5sums{$_}++ for values %$dls;
+	push @{$allmd5sums{$_}}, "$category/$prgnam" for values %$dls;
 }
 
 # write status results to STATUS file in the root of the archive
@@ -1736,6 +1737,7 @@ sub check_mode {
 	$quickcheck = shift; # 1 = don't md5sum stuff
 	shift @ARGV;
 	$verbosecheck = ($ARGV[0] && $ARGV[0] =~ /^-*v(?:erbose)?$/);
+	our %missingmd5builds;
 
 	$use_bwlist = 1;
 	init_git();
@@ -1807,6 +1809,17 @@ Extraneous files: $extraneous_bymd5
 File coverage: $md5_filecoverage%
 EOF
 
+	my @list;
+	for(keys %allmd5sums) {
+		push @list, @{$allmd5sums{$_}} if ref $allmd5sums{$_};
+	}
+	if(@list) {
+		$output .= "Following SlackBuilds are missing by-md5 files:\n";
+		$output .= "  $_\n" for sort { $a cmp $b } @list;
+	} else {
+		$output .= "All SlackBuild download files present in by-md5.\n";
+	}
+
 	print $output;
 	write_status_file($output);
 	exit 0;