Changeset 26290 for trunk/ippScripts/scripts/magic_destreak_revert.pl

Timestamp:

Nov 29, 2009, 3:18:43 PM (16 years ago)

Author:

bills

Message:

Add program that given a dvo database, smf file, or tess_id figures
out which image a given point is contained in. Uses dvoImagesAtCoords to do the real
work.

File:

• trunk/ippScripts/scripts/magic_destreak_revert.pl (modified) (1 diff)

trunk/ippScripts/scripts/magic_destreak_revert.pl

@@ -389 +389 @@
     $exit_code = $PS_EXIT_PROG_ERROR unless defined $exit_code;
 
-    # we wouldn't be here unless an entry already exists in the database
-#    my $command = "$magicdstool -adddestreakedfile";
-#    $command   .= " -magic_ds_id $magic_ds_id";
-#    $command   .= " -component $component";
-#    $command   .= " -fault $exit_code";
-#    $command   .= " -dbname $dbname" if defined $dbname;
-
-#    # Add the processed file to the database
-#    unless ($no_update) {
-#        my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) =
-#            run(command => $command, verbose => $verbose);
-#        unless ($success) {
-#            carp("failed to update database for $magic_ds_id $component");
-#        }
-#    } else {
-#        print "Skipping command: $command\n";
-#    }
-
-    carp($msg);
+    # fault the whole run if one of the components fails to revert
+    my $command = "$magicdstool -updaterun";
+    $command   .= " -magic_ds_id $magic_ds_id";
+    $command   .= " -fault $exit_code";
+    $command   .= " -dbname $dbname" if defined $dbname;
+
+    # Add the processed file to the database
+    unless ($no_update) {
+        my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) =
+            run(command => $command, verbose => $verbose);
+        unless ($success) {
+            carp("failed to update database for $magic_ds_id $component");
+        }
+    } else {
+        print "Skipping command: $command\n";
+    }
+
     exit $exit_code;
 }