From 1652bc6ccbfb2d5b234a9eb57efc82115ac7adc0 Mon Sep 17 00:00:00 2001
From: Oliver Lehmann <lehmann@ans-netz.de>
Date: Wed, 10 May 1989 19:34:05 +0000
Subject: [PATCH] ING_DB

---
 WEGA/contrib/ingres/dbs/src/sys/lockinfo.c | 107 +++++++++++++++++++++
 1 file changed, 107 insertions(+)
 create mode 100644 WEGA/contrib/ingres/dbs/src/sys/lockinfo.c

diff --git a/WEGA/contrib/ingres/dbs/src/sys/lockinfo.c b/WEGA/contrib/ingres/dbs/src/sys/lockinfo.c
new file mode 100644
index 0000000..2a82c2f
--- /dev/null
+++ b/WEGA/contrib/ingres/dbs/src/sys/lockinfo.c
@@ -0,0 +1,107 @@
+# include	<stdio.h>
+# include	"../conf/gen.h"
+# include	"../h/dbs.h"
+# include	"../h/aux.h"
+# include	"../h/access.h"
+# include	"../h/lock.h"
+# include	"../h/bs.h"
+
+# ifdef P8000
+ret_buf		AAjmp_buf;
+# else
+jmp_buf		AAjmp_buf;
+# endif
+
+extern int	AAdbstat;
+struct admin	AAdmin;
+
+main(argc, argv)
+int	argc;
+char 	*argv[];
+{
+	register char		**av;
+	register char		*p;
+	register int		i;
+	register int		badf;
+	extern char		*AAdbpath;
+	extern char		*AAproc_name;
+	extern char		*Parmvect[];
+	extern char		*Flagvect[];
+
+	AAproc_name = "LOCKINFO";
+
+#	ifdef xSTR1
+	AAtTrace(&argc, argv, 'X');
+#	endif
+
+	badf = 0;
+	switch (i = initucode(argc, argv, argc > 1, (char *) 0, -1))
+	{
+	  case 0:
+	  case 5:
+		break;
+
+	  case 1:
+	  case 6:
+		AAsyserr(0, "Die Datenbank '%s' existiert nicht", Parmvect[0]);
+
+	  case 2:
+		AAsyserr(0, "Sie duerfen auf die Datenbank '%s' nicht zugreifen", Parmvect[0]);
+
+	  case 3:
+		AAsyserr(0, "Sie sind kein eingetragener DBS-Nutzer");
+
+	  case 4:
+		printf("Sie haben keinen Datenbanknamen angegeben\n");
+		badf++;
+		break;
+
+	  default:
+		AAsyserr(22200, AAproc_name, i);
+	}
+
+	for (av = Flagvect; p = *av; av++)
+	{
+		printf("Unbekanntes Flag '%s'\n", p);
+		badf++;
+	}
+	if (badf)
+	{
+		flush();
+		exit(-1);
+	}
+
+	/*
+	**  Check for usage errors.
+	*/
+	for (i = 1; Parmvect[i]; i++)
+		continue;
+	if (i > 1)
+		AAsyserr(0, "HINWEIS: lockinfo [db_name]");
+
+	/*
+	**  Check for superuser
+	*/
+	if (!(AAdbstat & U_SUPER))
+		AAsyserr(0, "Sie duerfen LOCKINFO nicht verwenden");
+
+	if (argc == 1)
+		AALOCKREQ.l_db = 0L;
+
+	AAlockdes = open(AA_DBS_LOCK, 1);
+	AAsyslock(A_INFO, M_DB, 0L, 0L);
+	sync();
+
+	fflush(stdout);
+	exit(0);
+}
+
+AApageflush()
+{
+}
+
+rubproc()
+{
+	fflush(stdout);
+	exit(0);
+}