From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sun, 20 Oct 2019 11:05:25 +0000 (+0100)
Subject: mtest: First test case
X-Git-Tag: v0.5.0~65
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ian/git?p=secnet.git;a=commitdiff_plain;h=964ce4387badfc9eaeb1029794be73f218c205a2

mtest: First test case

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
---

diff --git a/mtest/common.tcl b/mtest/common.tcl
new file mode 100644
index 0000000..6b6b16d
--- /dev/null
+++ b/mtest/common.tcl
@@ -0,0 +1,5 @@
+source test-common.tcl
+
+file mkdir $tmp/groupfiles
+
+prefix_some_path PYTHONPATH .
diff --git a/mtest/t-userv b/mtest/t-userv
new file mode 100755
index 0000000..1e5ea25
--- /dev/null
+++ b/mtest/t-userv
@@ -0,0 +1,9 @@
+#! /usr/bin/tclsh
+
+source mtest/common.tcl
+
+exec env \
+    USERV_USER=Uuser USERV_GROUP=Ginside \
+    ./make-secnet-sites -u \
+    mtest/header.sites $tmp/groupfiles $tmp/out.sites Ginside \
+    < mtest/Ginside.sites