3 * Moira database consistency checker
5 * (c) Copyright 1988-1998 by the Massachusetts Institute of Technology.
6 * For copying and distribution information, please see the file
10 #include <mit-copyright.h>
18 EXEC SQL INCLUDE sqlca;
19 EXEC SQL INCLUDE sqlda;
28 struct hash *users, *machines, *clusters, *lists, *filesys, *nfsphys;
29 struct hash *strings, *members, *subnets, *string_dups, *printservers;
30 struct hash *containers;
31 EXEC SQL BEGIN DECLARE SECTION;
33 EXEC SQL END DECLARE SECTION;
34 struct save_queue *modtables;
38 extern SQLDA *sqlald(int, int, int);
39 extern void sqlglm(char *, unsigned int *, unsigned int *);
41 int main(int argc, char **argv)
44 EXEC SQL BEGIN DECLARE SECTION;
46 EXEC SQL END DECLARE SECTION;
50 setvbuf(stdout, NULL, _IOLBF, BUFSIZ);
52 while (++arg - argv < argc)
59 debug = atoi((*arg)[2] ? *arg + 2 : *++arg);
80 printf("Usage: %s [-d level] [-n] [-y] [-p] [-a] [-f] [-w] [database]\n",
89 printf("Doing fast version (skipping some checks)\n");
91 printf("Will NOT modify the database\n");
92 else if (mode == MODE_PREEN)
93 printf("Will fix simple things without asking\n");
94 else if (mode == MODE_YES)
95 printf("Will fix everything without asking\n");
97 printf("Debug level is %d\n", debug);
99 sa.sa_handler = interrupt;
101 sigemptyset(&sa.sa_mask);
102 sigaction(SIGHUP, &sa, NULL);
103 sigaction(SIGQUIT, &sa, NULL);
104 sigaction(SIGINT, &sa, NULL);
106 modtables = sq_create();
107 mr_sqlda = sqlald(1, 255, 0);
109 EXEC SQL WHENEVER SQLERROR DO dbmserr();
110 printf("Opening database %s...", database);
112 EXEC SQL CONNECT :database IDENTIFIED BY :database;
116 EXEC SQL SELECT value INTO :dcmenable FROM numvalues
117 WHERE name = 'dcm_enable';
118 dprintf("DCM disabled (was %d)\n", dcmenable);
119 EXEC SQL UPDATE numvalues SET value = 0 WHERE name = 'dcm_enable';
122 /* Begin transaction here. */
125 EXEC SQL COMMIT WORK;
127 EXEC SQL COMMIT WORK;
129 EXEC SQL COMMIT WORK;
131 EXEC SQL COMMIT WORK;
141 EXEC SQL BEGIN DECLARE SECTION;
143 EXEC SQL END DECLARE SECTION;
144 int bufsize = 256, msglength = 0;
146 if (sqlca.sqlcode == 1403)
148 printf("A DBMS error occurred, code %ld\n", sqlca.sqlcode);
149 sqlglm(buf, &bufsize, &msglength);
150 buf[msglength] = '\0';
152 printf("Aborting...\n");
156 EXEC SQL ROLLBACK WORK;
164 printf("Signal caught\n");
165 if (prompt("Save database changes"))
167 EXEC SQL COMMIT WORK;
171 printf("Aborting transaction\n");
175 EXEC SQL ROLLBACK WORK;
178 EXEC SQL UPDATE numvalues SET value = :dcmenable
179 WHERE name = 'dcm_enable';
185 void modified(char *table)
187 sq_save_unique_string(modtables, table);
192 EXEC SQL BEGIN DECLARE SECTION;
194 EXEC SQL END DECLARE SECTION;
196 while (sq_get_data(modtables, &tab))
198 EXEC SQL UPDATE tblstats SET modtime = SYSDATE
199 WHERE table_name = :tab;
201 EXEC SQL UPDATE numvalues SET value = :dcmenable
202 WHERE name = 'dcm_enable';
206 void out_of_mem(char *msg)
208 fprintf(stderr, "Out of memory while %s\n", msg);
209 if (prompt("Save database changes"))
211 EXEC SQL COMMIT WORK;
215 printf("Aborting transaction\n");
216 EXEC SQL ROLLBACK WORK;