Changeset 42452 for trunk/tools/eam/rawfix.20230221/src/check_chip_locations.pl

Timestamp:

Apr 21, 2023, 10:36:27 AM (3 years ago)

Author:

eugene

Message:

some improvements (make sure to examine md5s for chip-specific inst files, randomly draw the new nights)

File:

• trunk/tools/eam/rawfix.20230221/src/check_chip_locations.pl (modified) (1 diff)

trunk/tools/eam/rawfix.20230221/src/check_chip_locations.pl

@@ -196 +196 @@
         if ($Nvalues != 3) { print "ERROR: invalid response?\n"; next; }
         
+        # data_state and possibly md5sum can be NULL, need to handle specially
+        my $dstate = $values[1]; if (not defined $dstate) { $dstate = "NULL"; } 
+        my $md5sum = $values[2]; if (not defined $md5sum) { $md5sum = "XXXX"; } 
+        
         push (@nebarray, $values[0]);
-        push (@ds_array, $values[1]);
-        push (@md_array, $values[2]);
-        if ($DEBUG > 4) { print "$values[0]\n $values[1]\n $values[2]\n"; }
+        push (@md_array, $md5sum);
+        push (@ds_array, $dstate);
+
+        if ($DEBUG > 5) { print "V0: $values[0]\n"; print "V1: $values[1]\n"; print "V2: $values[2]\n"; }
+        if ($DEBUG > 4) { print "PRINT: $values[0]\n $dstate\n $md5sum\n"; }
     }