Changeset 32405

Timestamp:

Sep 14, 2011, 2:17:19 PM (15 years ago)

Author:

watersc1

Message:

port to fix burntool update errors from clogging up registration. I've also rolled back the ppConfigDump -get-key edit from the trunk as the tag version of ppConfigDump does not currently support it.

File:

• tags/ipp-20110622/ippScripts/scripts/register_imfile.pl (modified) (3 diffs)

tags/ipp-20110622/ippScripts/scripts/register_imfile.pl

@@ -60 +60 @@
 
 my $ipprc = PS::IPP::Config->new() or my_die_for_add( "Unable to set up", $exp_id, $tmp_exp_name, $tmp_class_id, $uri, $PS_EXIT_CONFIG_ERROR ); # IPP configuration
-$ipprc->redirect_output($logfile) or my_die_for_add( "Unable to redirect output", $exp_id, $tmp_exp_name, $tmp_class_id, $uri, $PS_EXIT_SYS_ERROR ) if $logfile;
+$ipprc->redirect_to_logfile($logfile) or my_die_for_add( "Unable to redirect output", $exp_id, $tmp_exp_name, $tmp_class_id, $uri, $PS_EXIT_SYS_ERROR ) if $logfile;
 
 pod2usage( -msg => "Unknown option: @ARGV", -exitval => 2 ) if @ARGV;
@@ -147 +147 @@
     elsif (($isGPC1 == 1) && ($burntoolStateCurrent == 1)) {
 #       print STDERR "In the good region: >>$burntoolStateCurrent<<\n";
-        my $ppConfigDump_cmd = "$ppConfigDump -camera GPC1 -dump-camera -";
+#        my $ppConfigDump_cmd = "$ppConfigDump -camera GPC1 -get-key BURNTOOL.STATE.GOOD";
+        my $ppConfigDump_cmd = "$ppConfigDump -camera GPC1 -dump-camera -";
         my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) =
             IPC::Cmd::run(command => $ppConfigDump_cmd, verbose => $verbose);
@@ -522 +523 @@
         $command .= " -class_id $class_id";
         $command .= " -fault $exit_code";
+        $command .= " -set_state pending_burntool ";
         $command .= " -hostname $host" if defined $host;
         $command .= " -dbname $dbname" if defined $dbname;