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

Timestamp:

Jan 9, 2012, 1:45:59 PM (14 years ago)

Author:

bills

Message:

if -tofullskyfile fails wait 10 seconds and try again. We apparently often get a
deadlock in the database during periods of rapid updates

File:

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

trunk/ippScripts/scripts/warp_skycell.pl

@@ -373 +373 @@
         # $run_state eq 'update'
         unless ($no_update) {
-            my $command = "$warptool -tofullskyfile";
-            $command .= " -warp_id $warp_id";
-            $command .= " -skycell_id $skycell_id";
-            $command .= " -set_magicked $magicked" if $magicked;
-            $command .= " -set_quality $quality" if $quality;
-            $command .= " -dbname $dbname"   if defined $dbname;
-
-            my ( $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);
-                warn("Unable to perform warptool -addwarped: $error_code\n");
-                exit($error_code);
+            my $try = 0;
+            while (1) {
+                $try++;
+                my $command = "$warptool -tofullskyfile";
+                $command .= " -warp_id $warp_id";
+                $command .= " -skycell_id $skycell_id";
+                $command .= " -set_magicked $magicked" if $magicked;
+                $command .= " -set_quality $quality" if $quality;
+                $command .= " -dbname $dbname"   if defined $dbname;
+
+                my ( $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);
+                    warn("Unable to perform warptool -addwarped: $error_code\n");
+                    exit($error_code) if $try >= 2;
+                    sleep 10;
+                    warn("Trying again\n");
+                } else {
+                    last;
+                }
             }
         }