Changeset 25941 for trunk/ippScripts/scripts/dist_component.pl

Timestamp:

Oct 26, 2009, 3:08:18 PM (17 years ago)

Author:

bills

Message:

run streaksrelease on inverse diff images

File:

• trunk/ippScripts/scripts/dist_component.pl (modified) (4 diffs)

trunk/ippScripts/scripts/dist_component.pl

@@ -41 +41 @@
 my %diff_cleaned = ( 'PPSUB.OUTPUT' => 'image',
                      'PPSUB.OUTPUT.MASK' => 'mask',
-                     'PPSUB.OUTPUT.VARIANCE' => 'variance' );
+                     'PPSUB.OUTPUT.VARIANCE' => 'variance',
+                     'PPSUB.INVERSE' => 'inv_image',
+                     'PPSUB.INVERSE.MASK' => 'inv_mask',
+                     'PPSUB.INVERSE.VARIANCE' => 'inv_variance' );
 my %stack_cleaned = ( 'PPSTACK.OUTPUT' => 'image',
                       'PPSTACK.OUTPUT.MASK' => 'mask',
@@ -149 +152 @@
 
 my ($image, $mask, $variance);
+my ($inv_image, $inv_mask, $inv_variance);
 
 # foreach my $file_rule (keys %$file_list) {
@@ -198 +202 @@
         } elsif ($image_type eq 'variance') {
             $variance = $file_name;;
+        } elsif ($image_type eq 'inv_image') {
+            $inv_image = $file_name;
+        } elsif ($image_type eq 'inv_mask') {
+            $inv_mask = $file_name;;
+        } elsif ($image_type eq 'inv_variance') {
+            $inv_variance = $file_name;;
         } else {
             &my_die("invalid image type found: $image_type", $dist_id, $component,
@@ -246 +256 @@
         $error_code = (($error_code >> 8) or $PS_EXIT_PROG_ERROR);
         &my_die("Unable to perform $command: $error_code", $dist_id, $component, $error_code);
+    }
+    if ($inv_image) {
+        $command = "$streaksrelease -stage $stage -image $inv_image -outroot $tmpdir";
+        $command .= " -mask $inv_mask" if $inv_mask;
+        $command .= " -weight $inv_variance" if $inv_variance;
+        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 $command: $error_code", $dist_id, $component, $error_code);
+        }
     }
 }