chiark / gitweb /
test: Use test/d-* instead of test/tmp for everything
[secnet.git] / test / common.tcl
index 59b10baeef34ede637d0588832048172b6055be8..3a2e1ae39194f64d7f46e20f60fd23ab019cdbcd 100644 (file)
@@ -155,8 +155,14 @@ proc sendpkt {} {
        [hbytes h2raw c0[join $p ""]c0]
 }
 
-file mkdir test/tmp
-set tmp test/tmp
+if {![catch {
+    set tmp $env(AUTOPKGTEST_ARTIACTS)
+}]} {} elseif {![catch {
+    set tmp $env(AUTOPKGTEST_TMP)
+}]} {} elseif {[regsub {^test/t-} $argv0 {test/d-} tmp]} {
+    file mkdir $tmp
+}
+
 set socktmp $tmp/s
 exec mkdir -p -m700 $socktmp
 regsub {^(?!/)} $socktmp {./} socktmp ;# dgram-socket wants ./ or /