From: Nathan Wagner <nw@hydaspes.if.org>
Date: Wed, 22 Mar 2017 21:09:02 +0000 (-0500)
Subject: add zpm-test program to check for valid zpm db files
X-Git-Tag: v0.1.6~134
X-Git-Url: https://pd.if.org/git/?p=zpackage;a=commitdiff_plain;h=bd46218e36b09bc89497dd8aa5426d6610cd240c

add zpm-test program to check for valid zpm db files
---

diff --git a/t/zpmtest.t b/t/zpmtest.t
new file mode 100755
index 0000000..89dfe08
--- /dev/null
+++ b/t/zpmtest.t
@@ -0,0 +1,29 @@
+#!/bin/sh
+
+# test addfile
+
+. tap.sh
+
+plan 3
+
+PF=test.db
+
+rm -f $PF
+touch $PF
+
+zpm-test $PF
+failsok empty file is not zpm file
+rm -f $PF
+
+appid=$(sqlite3 $PF 'pragma application_id')
+zpm-test $PF
+failsok empty db is not zpm file
+rm -f $PF
+
+zpm-init $PF
+zpm-test $PF
+okexit 'new init db is zpm file'
+
+finish
+
+rm -f test.*
diff --git a/zpm-test b/zpm-test
new file mode 100755
index 0000000..9f74718
--- /dev/null
+++ b/zpm-test
@@ -0,0 +1,24 @@
+#!/bin/sh
+
+# tests a package file
+
+# just checks that all args are valid pkg files
+verbose=0
+
+while getopts v opt; do
+        case $opt in
+                v) verbose=1 ;;
+        esac
+done
+
+for pkgfile in "$@"; do
+appid=$(sqlite3 $pkgfile 'pragma application_id;' | ( echo obase = 16; cat - ) | bc)
+if [ "$appid" != "5A504442" ]; then
+	if [ "$verbose" -eq 1 ]; then
+		echo $pkgfile does not appear to be a zpm package file 1>&2
+	fi
+	exit 1
+fi
+done
+
+exit 0