test: Split "invoke" up

[secnet.git] / test / t-basic-kex

diff --git a/test/t-basic-kex b/test/t-basic-kex
new file mode 100755 (executable)
index 0000000..bcbadf5
--- /dev/null
+++ b/test/t-basic-kex
@@ -0,0 +1,13 @@
+#! /usr/bin/tclsh
+
+source test/common.tcl
+
+udp-proxy
+spawn-secnet inside
+spawn-secnet outside
+
+after 500 sendpkt
+after 1000 sendpkt
+after 5000 timed-out
+
+vwait ok