Changeset 27039 for trunk/ippScripts/scripts/camera_exp.pl

Timestamp:

Feb 22, 2010, 5:36:31 PM (16 years ago)

Author:

Paul Price

Message:

Be dynamic about dynamic masks --- only use the dynamic masks for warp if it's turned on in the psastro recipe.

File:

• trunk/ippScripts/scripts/camera_exp.pl (modified) (2 diffs)

trunk/ippScripts/scripts/camera_exp.pl

@@ -144 +144 @@
 }
 
+
+my $produceMasks;               # Produce masks?
+{
+    # Get the PSASTRO recipe
+    my $command = "$ppConfigDump -camera $camera -recipe PSASTRO $recipe_psastro -dump-recipe ADDSTAR -";
+    my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) =
+        run(command => $command, verbose => $verbose);
+    unless ($success) {
+        $error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR);
+        &my_die("Unable to perform ppConfigDump: $error_code", $cam_id, $PS_EXIT_CONFIG_ERROR);
+    }
+    my $recipeData = $mdcParser->parse(join "", @$stdout_buf) or
+        &my_die("Unable to parse metadata config doc", $cam_id, $PS_EXIT_CONFIG_ERROR);
+
+    $produceMasks = metadataLookupBool($recipeData, 'REFSTAR_MASK');
+}
+
+
 ### not needed to have such an extensive temp file name.
 my ($list1File, $list1Name) = tempfile( "/tmp/$exp_tag.cm.$cam_id.b1.list.XXXX", UNLINK => !$save_temps ); # For binning 1
@@ -177 +195 @@
     print $list4File ($chipMask . "\n");
 
-    push @outMasks, $ipprc->filename("PSASTRO.OUTPUT.MASK", $outroot, $class_id);
+    push @outMasks, $ipprc->filename("PSASTRO.OUTPUT.MASK", $outroot, $class_id) if $produceMasks;
 }
 close $list1File;