Changeset 31083 for branches/eam_branches/ipp-20110213/ippScripts/scripts/summit_copy.pl

Timestamp:

Mar 30, 2011, 9:36:02 AM (15 years ago)

Author:

eugene

Message:

merging changes from trunk

File:

• branches/eam_branches/ipp-20110213/ippScripts/scripts/summit_copy.pl (modified) (6 diffs)

branches/eam_branches/ipp-20110213/ippScripts/scripts/summit_copy.pl

@@ -22 +22 @@
 
 # Parse the command-line arguments
-my ( $uri, $filename, $compress, $bytes, $md5, $nebulous, $exp_name, $inst, $telescope, $class, $class_id, 
+my ( $uri, $filename, $compress, $bytes, $md5, $nebulous, $summit_id, $exp_name, $inst, $telescope, $class, $class_id, 
      $dbname, $verbose, $no_update, $no_op, $timeout, $copies );
 GetOptions(
@@ -31 +31 @@
        'md5=s'          => \$md5,       # reported md5 checksum
        'nebulous'       => \$nebulous,  # use nebulous for the target file
+       'summit_id=s'    => \$summit_id, # summit_id for this exposure
        'exp_name=s'     => \$exp_name,  # Exposure name
        'inst=s'         => \$inst,      # Instrument
@@ -45 +46 @@
 
 pod2usage( -msg => "Unknown option: @ARGV", -exitval => 2 ) if @ARGV;
-pod2usage( -msg => "Required options: --uri --filename --exp_name --inst --telescope --class --class_id",
+pod2usage( -msg => "Required options: --uri --filename --summit_id --exp_name --inst --telescope --class --class_id",
        -exitval => 3)
     unless defined $uri
     and defined $filename
+    and defined $summit_id
     and defined $exp_name
     and defined $inst
@@ -110 +112 @@
 $command  = "$pztool -copydone";
 $command .= " -row_lock";
+$command .= " -summit_id $summit_id";
 $command .= " -exp_name $exp_name";
 $command .= " -inst $inst";
@@ -236 +239 @@
         my $command;
         $command  = "$pztool -copydone";
+        $command .= " -summit_id $summit_id";
         $command .= " -exp_name $exp_name";
         $command .= " -inst $inst";
@@ -246 +250 @@
 
         system ($command);
+
+        if ($exit_code == 110) {
+            $command = "$pztool -updatepzexp";
+            $command .= " -exp_name $exp_name";
+            $command .= " -camera $inst";
+            $command .= " -telescope $telescope";
+            $command .= " -set_state drop";
+            $command .= " -dbname $dbname" if defined $dbname;
+
+            system ($command);
+        }
+
     }