added warn flag; break out of retrieve loop on interrupt

diff --git a/dbck/dbck.qc b/dbck/dbck.qc
index 407e1cdd88ea1ca4d593034dc74c406dee1ac187..3bcc7d4de96c4d68640ece205be94968f01e4c0e 100644 (file)
--- a/dbck/dbck.qc
+++ b/dbck/dbck.qc
@@ -17,9 +17,11 @@
 static char dbck_qc_rcsid[] = "$Header$";
 
 
-int debug = 1;
+int debug = 0;
 int mode = MODE_ASK;
 int fast = 0;
+int warn = 1;
+int abort = 0;
 struct hash *users, *machines, *clusters, *lists, *filesys, *nfsphys, *strings;
 ##int dcmenable;
 struct save_queue *modtables;
@@ -61,6 +63,13 @@ char **argv;
          case 'f':
              fast++;
              break;
+         case 'w':
+             warn = 0;
+             break;
+         default:
+             printf("Usage: %s [-d level] [-n] [-y] [-p] [-a] [-c] [-f] [-w] [database]\n",
+                    argv[0]);
+             exit(1);
          }
        else
          database = *arg;
@@ -114,7 +123,10 @@ int        *num;
 {
     printf("An ingres error occuurred, code %d\n", *num);
     printf("Aborting...\n");
-##  abort
+    if (!abort) {
+       abort++;
+##     abort
+    }
     exit(1);
 }
 
@@ -123,12 +135,19 @@ int interrupt()
 ##{
     printf("Signal caught\n");
     if (prompt("Save database changes")) {
+       /* break out of a retrieve loop */
+       IIbreak();
 ##     end transaction
        cleanup();
        exit(0);
     }
     printf("Aborting transaction\n");
-##  abort
+    if (!abort) {
+       abort++;
+       /* break out of a retrieve loop */
+       IIbreak();
+##     abort
+    }
 ##  replace values (value = dcmenable) where values.name = "dcm_enable"
 ##  exit
     exit(0);