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

Timestamp:

Nov 5, 2009, 10:22:11 AM (17 years ago)

Author:

bills

Message:

use a temporary file for output from dist_bundle.pl. stdout is too noisy

File:

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

trunk/ippScripts/scripts/dist_component.pl

@@ -83 +83 @@
 my $mdcParser = PS::IPP::Metadata::Config->new; # Parser for metadata config files
 
+my ($rf, $rf_name) = tempfile("/tmp/bundleresults.$dist_id.$component.XXXX", UNLINK => !$save_temps);
+close $rf;
+
 my ($file_name, $bytes, $md5sum);
 {
     my $command = "$dist_make_bundle --camera $camera --stage $stage --stage_id $stage_id";
+    $command .= " --results_file $rf_name";
     $command .= " --component $component --path_base $path_base --outdir $outdir";
     $command .= " --chip_path_base $chip_path_base" if $chip_path_base;
@@ -105 +109 @@
     }
 
-    # parse stdout_buf to get ($file_name, $bytes, $md5sum);
-    my $metadata = $mdcParser->parse (join "", @$stdout_buf) or
+    open $rf, "<$rf_name" or &my_die("failed to open results file $rf_name", $dist_id, $component, $PS_EXIT_UNKNOWN_ERROR);
+
+    my @lines = (<$rf>);
+
+    my $metadata = $mdcParser->parse (join "", @lines) or
         &my_die("Unable to parse metadata config doc", $dist_id, $component, $PS_EXIT_PROG_ERROR);
+
     my $results = parse_md_list($metadata);
 
@@ -114 +122 @@
         &my_die("Unexected number of results from dist_make_bundle.pl: $n", $dist_id, $component, $PS_EXIT_PROG_ERROR);
     }
+    my $result = $results->[0];
 
-    $file_name = $results->{name};
+    $file_name = $result->{name};
     &my_die("undefined file name from dist_bundle.pl", $dist_id, $component, $PS_EXIT_PROG_ERROR) unless defined $file_name;
 
-    $bytes = $results->{bytes};
+    $bytes = $result->{bytes};
     &my_die("undefined file size from dist_bundle.pl", $dist_id, $component, $PS_EXIT_PROG_ERROR) unless defined $bytes;
 
-    $md5sum = $results->{md5sum};
+    $md5sum = $result->{md5sum};
     &my_die("undefined file md5sum from dist_bundle.pl", $dist_id, $component, $PS_EXIT_PROG_ERROR) unless defined $md5sum;
 }