From 23d256929e7ab4b3b8fdc728697f987fac80e834 Mon Sep 17 00:00:00 2001
From: Oliver Lehmann <lehmann@ans-netz.de>
Date: Tue, 3 Oct 1989 05:52:29 +0000
Subject: [PATCH] ING_DB

---
 WEGA/contrib/ingres/dbs/src/redabas/cdb.sh | 15 +++++++++++++++
 1 file changed, 15 insertions(+)
 create mode 100644 WEGA/contrib/ingres/dbs/src/redabas/cdb.sh

diff --git a/WEGA/contrib/ingres/dbs/src/redabas/cdb.sh b/WEGA/contrib/ingres/dbs/src/redabas/cdb.sh
new file mode 100644
index 0000000..f869389
--- /dev/null
+++ b/WEGA/contrib/ingres/dbs/src/redabas/cdb.sh
@@ -0,0 +1,15 @@
+db=${1:?"usage: $0 db dbi"}
+dbi=${2:?"DBI-file-name fehlt"}
+cp $dbi /tmp/cdb$$
+chmod 600 /tmp/cdb$$
+ed - /tmp/cdb$$ << SCRIPT
+v/^[TD]/d
+g/^T/s//destroyr $db/
+g/destroy\(.*\)/s//&\\
+ create\1/
+g/^D/-s/$/	\\\\/
+g/^D	* *[0-9][0-9]*/s///
+w
+SCRIPT
+. /tmp/cdb$$
+rm /tmp/cdb$$