Changeset 28304 for branches/czw_branch/20100519/ippScripts/scripts/skycell_jpeg.pl

Timestamp:

Jun 10, 2010, 6:28:51 PM (16 years ago)

Author:

watersc1

Message:

Skycell Summary and stack Association stuff should be finished. I'll merge and do final tests on monday.

Location:

branches/czw_branch/20100519

Files:

• . (modified) (1 prop)
• ippScripts/scripts/skycell_jpeg.pl (modified) (9 diffs)

branches/czw_branch/20100519/ippScripts/scripts/skycell_jpeg.pl

@@ -38 +38 @@
 pod2usage( -msg => "Unknown option: @ARGV", -exitval => 2) if @ARGV;
 pod2usage(
-    -msg => "Required options: --stage --stage_id --outroot\nHelpful options: --camera --dbname",
+    -msg => "Required options: --stage --stage_id --path_base\nHelpful options: --camera --dbname",
     -exitval => 3,
     ) unless
@@ -125 +125 @@
         }
         # Update database:
-        $command = "$warptool -addsummary -warp_id $stage_id -projection_cell $projection_cell -outroot $outroot";
+        $command = "$warptool -addsummary -warp_id $stage_id -projection_cell $projection_cell -path_base $outroot";
         if (defined($dbname)) {
             $command .= " -dbname $dbname";
@@ -136 +136 @@
         }
     }
+    if (scalar (keys %tangents) == 0) {
+        my $projection_cell = 'NULL';
+        $command = "$warptool -addsummary -warp_id $stage_id -projection_cell $projection_cell -path_base $outroot";
+        if (defined($dbname)) {
+            $command .= " -dbname $dbname";
+        }
+        
+        ( $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 update diff summary: $error_code", $stage_id, $error_code);
+        }
+    }   
 } #end warp stage
 if ($stage eq 'diff') {
@@ -165 +178 @@
         my $state      = $imfile->{data_state};
         my $projection_cell = $skycell_id;
-        if ($quality == 8007 or $state ne 'full') {
+        if ($quality == 8007 or $quality = 1010 or $state ne 'full') {
             next;
         }
@@ -209 +222 @@
         }
         # Update database:
-        $command = "$difftool -addsummary -diff_id $stage_id -projection_cell $projection_cell -outroot $outroot";
+        $command = "$difftool -addsummary -diff_id $stage_id -projection_cell $projection_cell -path_base $outroot";
         if (defined($dbname)) {
             $command .= " -dbname $dbname";
@@ -220 +233 @@
         }
     }
+    if (scalar (keys %tangents) == 0) {
+        my $projection_cell = 'NULL';
+        $command = "$difftool -addsummary -diff_id $stage_id -projection_cell $projection_cell -path_base $outroot";
+        if (defined($dbname)) {
+            $command .= " -dbname $dbname";
+        }
+        
+        ( $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 update diff summary: $error_code", $stage_id, $error_code);
+        }
+    }   
 } #end diff stage
 if ($stage eq 'stack') {
     my $imfiles;
-    my $command = "$stacktool -stackskyfile -stack_id $stage_id";
+    my $command = "$stacktool -sassskyfile -sass_id $stage_id";
     if (defined($dbname)) {
         $command .= " -dbname $dbname";
@@ -248 +274 @@
         my $quality    = $imfile->{quality};
         my $state      = $imfile->{data_state};
+        my $fault      = $imfile->{fault};
         my $projection_cell = $skycell_id;
-        if ($quality == 8007 or $state ne 'full') {
+        if ($quality == 8007 or $state ne 'full' or $fault != 0) {
             next;
         }
@@ -293 +320 @@
         }
         # Update database:
-        $command = "$stacktool -addsummary -stack_id $stage_id -projection_cell $projection_cell -outroot $outroot";
+        $command = "$stacktool -addsummary -sass_id $stage_id -projection_cell $projection_cell -path_base $outroot";
         if (defined($dbname)) {
             $command .= " -dbname $dbname";
@@ -304 +331 @@
         }
     }
+    if (scalar (keys %tangents) == 0) {
+        my $projection_cell = 'NULL';
+        $command = "$stacktool -addsummary -stack_id $stage_id -projection_cell $projection_cell -path_base $outroot";
+        if (defined($dbname)) {
+            $command .= " -dbname $dbname";
+        }
+        
+        ( $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 update diff summary: $error_code", $stage_id, $error_code);
+        }
+    }   
+
 } #end stack stage