Command line printer manipulation client, and build goo.

[moira.git] / backup / db2bkup.awk

diff --git a/backup/db2bkup.awk b/backup/db2bkup.awk
index db05702311d2625c5b29c16f6a526c5fcb09b340..07d2dbc3f8a135e31d45961cfb258d194f6ad786 100644 (file)
--- a/backup/db2bkup.awk
+++ b/backup/db2bkup.awk
@@ -1,31 +1,35 @@
-#      $Source$
-#      $Header$
+#      $Id$
 #
 #      This converts the file used to originally create the database
 #      into a program to back it up.
 #      This is not guaranteed to work for all data types; it may
 #      need to be extended.
 
-BEGIN { 
+BEGIN {
        print "/* This file automatically generated */";
        print "/* Do not edit */\n";
-       print "#include <stdio.h>";
        print "EXEC SQL INCLUDE sqlca;";
+       print "EXEC SQL WHENEVER SQLERROR DO dbmserr();";
        print "#include \"dump_db.h\"";
-       print "#define dump_date dump_str\n";
+       print "#include \"bkup.h\"";
+       print "#define dump_bin dump_str\n";
 
-       print "/* This file automatically generated */" > "bkup1.dc";
-       print "/* Do not edit */\n" >> "bkup1.dc";
-       print "#include <stdio.h>" >> "bkup1.dc";
-       print "FILE *open_file();" >> "bkup1.dc";
-       print "do_backups(prefix)\n\tchar *prefix;\n{" >> "bkup1.dc";
+       print "/* This file automatically generated */" > "bkup1.pc";
+       print "/* Do not edit */\n" >> "bkup1.pc";
+       print "#include \"dump_db.h\"" >> "bkup1.pc";
+       print "#include \"bkup.h\"" >> "bkup1.pc";
+       print "void do_backups(char *prefix)\n{" >> "bkup1.pc";
+
+       print "/* This file automatically generated */" > "bkup.h";
+       print "/* Do not edit */\n" >> "bkup.h";
 }
 
 $1=="#" { next; }
 
-/^create/ { 
-       printf "dump_%s(f)\nFILE *f;\n{\n\tEXEC SQL BEGIN DECLARE SECTION;\n", $3;
-       printf "\tdump_%s(open_file(prefix, \"%s\"));\n", $3, $3 >> "bkup1.dc";
+/^create/ {
+       printf "void dump_%s(FILE *f)\n{\n  EXEC SQL BEGIN DECLARE SECTION;\n", $3;
+       printf "  dump_%s(open_file(prefix, \"%s\"));\n", $3, $3 >> "bkup1.pc";
+       printf "void dump_%s(FILE *f);\n", $3 >> "bkup.h";
 
        tablename = $3;
        rangename = substr(tablename, 1, 1);
@@ -34,68 +38,70 @@ $1=="#" { next; }
 }
 
 NF>=2 {
-       vname[count] = $1; 
-       printf "/* %s */\n", $0;
+       vname[count] = $1;
+       printf "  /* %s */\n", $0;
        if ($2 ~ /INTEGER/ || $2 ~ /SMALLINT/ || $2 ~ /INTEGER1/) {
-               printf "\tint\tt_%s;\n", vname[count];
+               printf "  char\tt_%s[39];\n", vname[count];
                vtype[count]="int";
        } else if ($2 ~ /CHAR\([0-9]*\)/) {
                t = split($2, temp, "(");
                if (t != 2) printf "Can't parse %s\n", $2;
                t = split(temp[2], temp2, ")");
                if (t != 2) printf "Can't parse %s\n", temp[2];
-               printf "\tchar\tt_%s[%d];\n", vname[count], temp2[1]+1;
-               if ($1 == "signature") {
+               printf "  char\tt_%s[%d];\n", vname[count], temp2[1]+1;
+               if ($1 == "signature" || $1 == "sid") {
                        vtype[count]="bin";
+                       printf "  EXEC SQL VAR t_%s IS STRING(%d);\n", vname[count], temp2[1]+1;
                } else {
                        vtype[count]="str";
                }
                vsize[count] = temp2[1]+1;
        } else if ($2 ~ /DATE/) {
-               printf "\tchar\tt_%s[26];\n", vname[count];
+               printf "  char\tt_%s[26];\n", vname[count];
                vtype[count]="date";
        } else printf "Unknown data type %s\n", $2;
        count++;
 }
 
-/^\);$/ { 
-       printf "\tEXEC SQL END DECLARE SECTION;\n";
-       printf "\tEXEC SQL DECLARE c_%s CURSOR FOR\n", tablename;
-       printf "\t\tSELECT\n";
+/^\);$/ {
+       printf "  EXEC SQL END DECLARE SECTION;\n\n";
+       printf "  EXEC SQL DECLARE c_%s CURSOR FOR SELECT\n", tablename;
        for (i = 0; i < count; i++) {
                if (i != 0) {
                        print ",";
                }
                if(vtype[i] ~ /date/) {
-                       printf "\t\t\tTO_CHAR(%s, 'DD-mon-YYYY HH24:MI:SS')", vname[i];
-               } else printf "\t\t\t%s", vname[i];
+                       printf "    TO_CHAR(%s, 'DD-mon-YYYY HH24:MI:SS')", vname[i];
+               } else if(vtype[i] ~ /int/) {
+                       printf "    TO_CHAR(%s)", vname[i];
+               } else printf "    %s", vname[i];
        }
        printf " FROM %s;\n", tablename;
 
-       printf "\tEXEC SQL OPEN c_%s;\n", tablename;
-       printf "\twhile(1) {\n\t\tEXEC SQL FETCH c_%s INTO\n", tablename;
+       printf "  EXEC SQL OPEN c_%s;\n", tablename;
+       printf "  while (1)\n    {\n      EXEC SQL FETCH c_%s INTO\n", tablename;
        for (i = 0; i < count; i++) {
                if (i != 0) printf ",\n";
-               printf "\t\t\t:t_%s", vname[i];
+               printf "        :t_%s", vname[i];
        }
        printf ";\n";
-       printf "\t\tif(sqlca.sqlcode != 0) break;\n";
+       printf "      if (sqlca.sqlcode != 0)\n        break;\n";
        for (i = 0; i < count; i++) {
-               if (i != 0) print "\t\tdump_sep(f);";
-               if (vtype[i] ~ /str/) {
-                       printf "\t\tdump_str(f, strtrim(t_%s));\n", vname[i];
+               if (i != 0) print "      dump_sep(f);";
+               if (vtype[i] ~ /str/ || vtype[i] ~ /date/ || vtype[i] ~ /int/) {
+                       printf "      dump_str(f, endtrim(t_%s));\n", vname[i];
                } else {
-                       printf "\t\tdump_%s(f, t_%s);\n", vtype[i], vname[i];
+                       printf "      dump_%s(f, t_%s);\n", vtype[i], vname[i];
                }
        }
-       printf "\t\tdump_nl(f);\n";
-       printf "\t}\n";
-       printf "\tEXEC SQL CLOSE c_%s;\n", tablename;
-       printf "\tsafe_close(f);\n";
+       printf "      dump_nl(f);\n";
+       printf "    }\n";
+       printf "  EXEC SQL CLOSE c_%s;\n", tablename;
+       printf "  safe_close(f);\n";
        printf "}\n\n";
 }
 
 END {
        print "/* All done */";
-       print "}" >> "bkup1.dc";
+       print "}" >> "bkup1.pc";
 }