Changeset 32469 for trunk/ippScripts/scripts/warp_skycell.pl

Timestamp:

Sep 30, 2011, 1:30:50 PM (15 years ago)

Author:

watersc1

Message:

Bug fix to prevent updated warp skycells with no PSF from being accepted as quality = 0.

File:

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

trunk/ippScripts/scripts/warp_skycell.pl

@@ -331 +331 @@
             }
         }
-
+        print "Quality: $quality\n";
         unless ($no_update) {
             # XXX change -tess_id to -tess_dir when db is updated
@@ -356 +356 @@
         }
     } else {
+
+        my $quality = 0;
+
+        unless ($ipprc->file_exists($outputPSF)) {
+            $quality = 8006; # bad data.
+        }
+#         if (!$quality) {
+#             check_output($outputImage, 0);
+#             check_output($outputMask, 0);
+#             check_output($outputWeight, 0);
+#             check_output($outputSources, 1);
+#             check_output($outputPSF, 1) if metadataLookupBool($recipe, 'PSF')  ;
+#         }
+        print "Quality: $quality\n";
+
         # $run_state eq 'update'
         unless ($no_update) {
@@ -362 +377 @@
             $command .= " -skycell_id $skycell_id";
             $command .= " -set_magicked $magicked" if $magicked;
+            $command .= " -set_quality $quality" if $quality;
             $command .= " -dbname $dbname"   if defined $dbname;