Changeset 30944 for trunk/ippScripts/scripts/ipp_apply_burntool_single.pl

Timestamp:

Mar 17, 2011, 2:01:55 PM (15 years ago)

Author:

watersc1

Message:

Finished version with tested --continue option. I haven't changed the task yet, because I'm not completely convinced that there isn't a race condition between --continue and regtool -pendingburntoolimfile.

File:

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

trunk/ippScripts/scripts/ipp_apply_burntool_single.pl

@@ -131 +131 @@
         run ( command => $regtool_status_cmd, verbose => $verbose );
     unless ($success) {
+        print "Unsuccessful at running regtool -checkstatus, aborting continue\n";
         $continue = 0;
     }
@@ -147 +148 @@
                 $this_exp_id = $entry->{exp_id};
                 $this_uri    = $entry->{uri};
-                $this_state  = $entry->{imfile_state};
+                $this_state  = $entry->{data_state};
                 print ">> $this_exp_id $this_uri $this_state\n";
                 if ($this_state eq 'pending_burntool') {
@@ -237 +238 @@
         $command .= " -set_state full ";
     }
+        
     $status = vsystem ($command, $REALRUN);
     if ($status) {