diff --git a/WEGA/contrib/ingres/dbs/src/monitor/gen.daba b/WEGA/contrib/ingres/dbs/src/monitor/gen.daba new file mode 100644 index 0000000..bc34de1 --- /dev/null +++ b/WEGA/contrib/ingres/dbs/src/monitor/gen.daba @@ -0,0 +1,48 @@ +# include "../conf/gen.h"; + +/* +** Login, Logout +** and monitor prompt symbole +*/ +char LOGIN[] = "DABA Version 1%s login\n"; +char LOG_1[] = "DABA Version 1%s logout\n"; +char LOG_21[] = "Auf Wiedersehen %s "; +char LOG_22[] = "Auf Wiedersehen "; +char LOG_3[] = "-- Kommen Sie bald wieder\n"; +char PROMPT[] = "* "; +char INPUT[] = "Eingabe>"; +char EMPTY[] = "DABA>"; +char FULL[] = "DABA:"; +char EXECUTING[] = "\n%s D A B A . . .\n\n"; +char ERROR[] = "\nD A B A\n monitor\n error\t"; + +/* +** Tunable pathname standards +** and file name extensions +*/ +char BIN_ED[] = "ed"; +char BIN_SH[] = "sh"; +char QRYBUF[] = "/tmp/DBSQ"; +char QRYTBUF[] = "/tmp/DBSTQ"; +char DAYFILE[] = "/sys/etc/dayfile"; + +# ifdef MACRO +/* +** Various traps and macros +*/ +char BEGINTRAP[] = "{begintrap}"; +char CATCHERROR[] = "{catcherror}"; +char CONTINUETRAP[] ="{continuetrap}"; +char DATABASE[] = "{database}"; +char DEFAULT[] = "{default}"; +char EDITOR[] = "{editor}"; +char ENDTRAP[] = "{endtrap}"; +char ERRORCOUNT[] = "{errorcount}"; +char EXECTRAP[] = "{exectrap}"; +char PATHNAME[] = "{pathname}"; +char QUERYTRAP[] = "{querytrap}"; +char READCOUNT[] = "{readcount}"; +char SHELL[] = "{shell}"; +char TUPLECOUNT[] = "{tuplecount}"; +char USERCODE[] = "{usercode}"; +# endif diff --git a/WEGA/contrib/ingres/dbs/src/monitor/gen.ing_db b/WEGA/contrib/ingres/dbs/src/monitor/gen.ing_db new file mode 100644 index 0000000..b9a6e40 --- /dev/null +++ b/WEGA/contrib/ingres/dbs/src/monitor/gen.ing_db @@ -0,0 +1,48 @@ +# include "../conf/gen.h"; + +/* +** Login, Logout +** and monitor prompt symbole +*/ +char LOGIN[] = "ING-db Version %s login\n"; +char LOG_1[] = "ING-db Version %s logout\n"; +char LOG_21[] = "Auf Wiedersehen %s "; +char LOG_22[] = "Auf Wiedersehen "; +char LOG_3[] = "-- Kommen Sie bald wieder\n"; +char PROMPT[] = "* "; +char INPUT[] = "Eingabe>"; +char EMPTY[] = "ING-db>"; +char FULL[] = "ING-db:"; +char EXECUTING[] = "\n%s I N G - d b . . .\n\n"; +char ERROR[] = "\nI N G - D B\n monitor\n error\t"; + +/* +** Tunable pathname standards +** and file name extensions +*/ +char BIN_ED[] = "ed"; +char BIN_SH[] = "sh"; +char QRYBUF[] = "/tmp/DBSQ"; +char QRYTBUF[] = "/tmp/DBSTQ"; +char DAYFILE[] = "/sys/etc/dayfile"; + +# ifdef MACRO +/* +** Various traps and macros +*/ +char BEGINTRAP[] = "{begintrap}"; +char CATCHERROR[] = "{catcherror}"; +char CONTINUETRAP[] ="{continuetrap}"; +char DATABASE[] = "{database}"; +char DEFAULT[] = "{default}"; +char EDITOR[] = "{editor}"; +char ENDTRAP[] = "{endtrap}"; +char ERRORCOUNT[] = "{errorcount}"; +char EXECTRAP[] = "{exectrap}"; +char PATHNAME[] = "{pathname}"; +char QUERYTRAP[] = "{querytrap}"; +char READCOUNT[] = "{readcount}"; +char SHELL[] = "{shell}"; +char TUPLECOUNT[] = "{tuplecount}"; +char USERCODE[] = "{usercode}"; +# endif diff --git a/WEGA/contrib/ingres/dbs/src/pqr/r_dbs.daba b/WEGA/contrib/ingres/dbs/src/pqr/r_dbs.daba new file mode 100644 index 0000000..1d5ac6f --- /dev/null +++ b/WEGA/contrib/ingres/dbs/src/pqr/r_dbs.daba @@ -0,0 +1,52 @@ +/* +** --- R_DBS.C --------- BASIC DECLARATIONS --------------------------------- +** +** INTERFACE between +** DBS and +** REPORT (compiler/interpreter) +** +** Version: @(#)r_dbs.c 4.0 02/05/89 +** +*/ + +# include +# include "r_dbs.h" + + +/* IDENTIFICATIN STUFF */ +char *PQR_system = ""; +static long PQR_release = 610110000; +static int PQR_version = 1634; + + +PQR() +{ + register int ver; +# ifdef SETBUF + char err_buf[BUFSIZ]; +# endif + extern char *ctime(); + + ver = PQR_version; +# ifdef SETBUF + setbuf(stderr, err_buf); +# endif + fprintf(stderr, "PQR-%s", PQR_system); + fprintf(stderr, "\tVERSION %d/%d.%d", ver/100, ver%100/10, ver%10); +# ifdef ESER_VMX + fprintf(stderr, "\tRELEASE %s\n", ctime(PQR_release)); +# else + fprintf(stderr, "\tRELEASE %s\n", ctime(&PQR_release)); +# endif + fflush(stderr); + setbuf(stderr, (char *) 0); +} + + +# ifndef SIGN_EXT +AAi1toi2(i) +register int i; +{ + return ((i > 127)? (i - 256): i); +} +# endif diff --git a/WEGA/contrib/ingres/dbs/src/pqr/r_dbs.ing_db b/WEGA/contrib/ingres/dbs/src/pqr/r_dbs.ing_db new file mode 100644 index 0000000..7d0d4cb --- /dev/null +++ b/WEGA/contrib/ingres/dbs/src/pqr/r_dbs.ing_db @@ -0,0 +1,52 @@ +/* +** --- R_DBS.C --------- BASIC DECLARATIONS --------------------------------- +** +** INTERFACE between +** DBS and +** REPORT (compiler/interpreter) +** +** Version: @(#)r_dbs.c 4.0 02/05/89 +** +*/ + +# include +# include "r_dbs.h" + + +/* IDENTIFICATIN STUFF */ +char *PQR_system = ""; +static long PQR_release = 610110000; +static int PQR_version = 634; + + +PQR() +{ + register int ver; +# ifdef SETBUF + char err_buf[BUFSIZ]; +# endif + extern char *ctime(); + + ver = PQR_version; +# ifdef SETBUF + setbuf(stderr, err_buf); +# endif + fprintf(stderr, "PQR-%s", PQR_system); + fprintf(stderr, "\tVERSION %d/%d.%d", ver/100, ver%100/10, ver%10); +# ifdef ESER_VMX + fprintf(stderr, "\tRELEASE %s\n", ctime(PQR_release)); +# else + fprintf(stderr, "\tRELEASE %s\n", ctime(&PQR_release)); +# endif + fflush(stderr); + setbuf(stderr, (char *) 0); +} + + +# ifndef SIGN_EXT +AAi1toi2(i) +register int i; +{ + return ((i > 127)? (i - 256): i); +} +# endif