From a0f7cb2db4c51a4a0fed37fde7f1992aec0cc9bb Mon Sep 17 00:00:00 2001
From: Greg McGary <greg@mcgary.org>
Date: Fri, 18 Apr 1997 06:32:28 +0000
Subject: Initial revision

---
 idtest | 32 ++++++++++++++++++++++++++++++++
 1 file changed, 32 insertions(+)
 create mode 100755 idtest

(limited to 'idtest')

diff --git a/idtest b/idtest
new file mode 100755
index 0000000..351bd52
--- /dev/null
+++ b/idtest
@@ -0,0 +1,32 @@
+#!/bin/sh
+
+set -x
+
+case $# in
+0) 1>&2 echo Usage: $(basename $0) files...; exit 1;;
+esac
+case $1 in
+-f*) _fID=$1; shift;;
+esac
+
+idx "$@" |sort -u >|ids.idx
+lid $_fID |sed -e 's/[ 	].*//' |sort -u >|ids.lid
+for file
+do
+    case x$file in
+    x-*) continue;;
+    esac
+    fid $_fID $file
+done |sort -u >|ids.fid
+
+if cmp ids.idx ids.lid
+then
+    if cmp ids.idx ids.fid
+    then
+	echo OK
+	rm -f ids.idx ids.fid ids.lid
+	exit 0
+    fi
+fi
+echo Oops!
+exit 1
-- 
cgit v1.2.3