Tally the new bugs filed
authorSteve McIntyre <steve@einval.com>
Mon, 31 Dec 2018 03:49:59 +0000 (03:49 +0000)
committerSteve McIntyre <steve@einval.com>
Mon, 31 Dec 2018 03:49:59 +0000 (03:49 +0000)
bin/analyze_results

index 5af9293..fb9e544 100755 (executable)
@@ -29,6 +29,13 @@ my $lines_read = 0;
 my $existing_bugs = 0;
 my $buildd_base_url="https://buildd.debian.org/status/package.php?p=";
 
+my $new_bugs_filed = 0;
+my $new_bugs_arm64_alignment = 0;
+my $new_bugs_arm64_misdetect = 0;
+my $new_bugs_arm64_test_fail = 0;
+my $new_bugs_arm64_other = 0;
+my $new_bugs_arch_any = 0;
+
 use constant {
     ERR_ARCH_MISMATCH      => 1,
     ERR_NO_SOURCE          => 2,
@@ -661,6 +668,22 @@ foreach my $input (@ARGV) {
                $line =~ s,#(\d+),<a href="https://bugs.debian.org/$1">#$1</a>,g;
            }
            print "  <li>$line\n";
+           if ($line =~ m,^Filed,) {
+               $new_bugs_filed++;
+               if ($line =~ m,-on-arm64,) {
+                   if ($line =~ m,misdetected architecture,) {
+                       $new_bugs_arm64_misdetect++;
+                   } elsif ($line =~ m,alignment,) {
+                       $new_bugs_arm64_alignment++;
+                   } elsif ($line =~ m,test,) {
+                       $new_bugs_arm64_test_fail++;
+                   } else {
+                       $new_bugs_arm64_other++;
+                   }
+               } else {
+                   $new_bugs_arch_any++;
+               }
+           }
        }
        close IN;
     } else {
@@ -702,6 +725,14 @@ foreach my $type (sort keys %log_results) {
        print "  <li>Found $result{$key} log(s) showing $key\n";
     }
 }
+print "  <li>Filed $new_bugs_filed new bugs:\n";
+print "  <ul>\n";
+print "    <li>$new_bugs_arm64_misdetect bugs for arch misdetection\n";
+print "    <li>$new_bugs_arm64_alignment bugs for alignment problems\n";
+print "    <li>$new_bugs_arm64_test_fail bugs for arch-specific test failures\n";
+print "    <li>$new_bugs_arm64_other bugs for arch-specific misc failures\n";
+print "    <li>$new_bugs_arch_any bugs for general arch-independent FTBFS\n";
+print "  </ul>\n";
 print "</ul>\n";
 
 $time_end = time();