Changeset 42394 for trunk/ippScripts/scripts/sc_prepare_chip.pl

Timestamp:

Feb 14, 2023, 12:59:01 PM (3 years ago)

Author:

tdeboer

Message:

burntool handling/parsing updates

File:

• trunk/ippScripts/scripts/sc_prepare_chip.pl (modified) (1 diff)

trunk/ippScripts/scripts/sc_prepare_chip.pl

@@ -260 +260 @@
         }
 
+
+        # Determine the value of a "good" burntool run.
+        my $config_cmd = "$ppConfigDump -camera $camera -get-key BURNTOOL.STATE.GOOD";
+        my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) =
+            run ( command => $config_cmd, verbose => $verbose);
+        unless ($success) {
+            $error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR);
+            &my_die("Unable to perform ppConfigDump: $error_code", $exp_id, $class_id, $PS_EXIT_SYS_ERROR);
+        }
+
+        my $recipeData = $mdcParser->parse(join "", @$stdout_buf) or
+            &my_die("Unable to parse metadata config doc", $exp_id, $class_id, $PS_EXIT_SYS_ERROR);
+
+        my $burntoolStateGood = 999;
+        foreach my $cfg (@$recipeData) {
+            if ($cfg->{name} eq 'BURNTOOL.STATE.GOOD') {
+                $burntoolStateGood = $cfg->{value};
+            }
+        }
+        if ($burntoolStateGood == 999) {
+            &my_die("Failed to determine BURNTOOL.STATE.GOOD", $exp_id, $class_id, $PS_EXIT_SYS_ERROR);
+        }
+
+
         # The image exists, so continue.  This resets the variables, but also outputs the file locations.
         ($ipp_uri, $remote_uri) = uri_to_outputs_raw($uri);
         my $btt = $uri;
-        $btt =~ s/fits$/burn.tbl/;
-
+        if($burntoolStateGood == 15) {
+            $btt =~ s/fits$/burn.v15.tbl/;    
+        } else {
+            $btt =~ s/fits$/burn.tbl/;      
+        }
+        
         # Check burntool table for existance, and if it doesn't, regenerate it.
         my ($ipp_btt, $remote_btt) = uri_convert($btt);