Changeset 26672

Timestamp:

Jan 22, 2010, 12:25:48 PM (16 years ago)

Author:

watersc1

Message:

Added a new table at the end to show how many distribution faults there are.

File:

• trunk/tools/wiki_nightly_stacks_table.pl (modified) (2 diffs)

trunk/tools/wiki_nightly_stacks_table.pl

@@ -4 +4 @@
 use Getopt::Std;
 
-getopts('P',\%opt);
+getopts('PC',\%opt);
 
 $dbname = 'gpc1';
@@ -281 +281 @@
     print '||' . "\n";
 }
+print '||' . "\n";
+# faulted distributed
+
+$sth = "select * from rcDSFileset join distRun using(dist_id) where rcDSFileset.fault > 0 and date(registered) >= '2010-01-01' AND label LIKE 'M%.nightlystack' order by fs_id asc";
+$data_ref = $db->selectall_arrayref( $sth );
+
+foreach $rr (@{ $data_ref }) {
+#    ($dist_id,$fs_id,$dest_id,$name,$state,$registered,$fault,$target_id,$stage,$stage_id,$magic_ds_id,$label,$outroot,$outdir,$clean,$no_magic,$state2,$time_stamp,$fault,$data_group,$note) = @{ $rr };
+    
+    $data_group = ${ $rr }[19];
+    ($dist_group,$date_str) = split /\./, $data_group;
+    $date = sprintf("%d%d%d%d-%d%d-%d%d",(split //,$date_str));
+    
+    unless(defined($fault_diststacks{$date}{$dist_group})) {
+        $fault_diststacks{$date}{$dist_group} = 0;
+    }
+    
+    $fault_diststacks{$date}{$dist_group} ++;
+
+    if (exists($opt{C})) {
+        print STDERR "## disttool -dbname gpc1 -revertfileset -fs_id ${ $rr }[1]\n";
+    }
+
+}
+
+print "|| '''Faulted Dists (Nstack_ids):'''\n||\n";
+print '|| Date ||';
+foreach $t (@targets) {
+    print "$t ||";
+}
+print "\n";
+
+foreach $d (sort (keys %diststacks)) {
+    print '||' . $d ;
+    foreach $t (@targets) {
+        print '|| ' ;
+        $i = 0;
+        if (exists($fault_diststacks{$d}{$t})) {
+            print "$fault_diststacks{$d}{$t}";
+        }
+    }
+    print '||' . "\n";
+}
 print "\n\n";
-