9 files changed, 156 insertions, 0 deletions
diff --git a/test/asset/run-fail/bool.et b/test/asset/run-fail/bool.et
new file mode 100644
index 0000000..1608a08
--- /dev/null
+++ b/test/asset/run-fail/bool.et
@@ -0,0 +1,3 @@
+test Test:
+    node n
+    guard (True == False)
diff --git a/test/asset/run-success/bool.et b/test/asset/run-success/bool.et
new file mode 100644
index 0000000..7121cc0
--- /dev/null
+++ b/test/asset/run-success/bool.et
@@ -0,0 +1,7 @@
+test Test:
+    node n
+    guard (True == True)
+    guard (False == False)
+    guard (False /= True)
+    guard ((1 == 1) == True)
+    guard ((1 == 0) == False)
diff --git a/test/asset/run-success/command-ignore.et b/test/asset/run-success/command-ignore.et
new file mode 100644
index 0000000..dc950d1
--- /dev/null
+++ b/test/asset/run-success/command-ignore.et
@@ -0,0 +1,39 @@
+def expect_next from p (str):
+    expect /(.*)/ from p capture line
+    guard (line == str)
+
+test Test:
+    node n
+    shell on n as p:
+        cat
+
+    send "a" to p
+    send "b" to p
+    send "x" to p
+    expect /x/ from p
+
+    ignore from p matching /a/
+    send "a" to p
+    send "c" to p
+
+    expect_next "b" from p
+    expect_next "c" from p
+
+    send "a" to p
+    send "b" to p
+    with p:
+        send "c"
+        ignore matching /[bcd]/
+        send "d"
+        send "e"
+        expect_next "e" from p
+
+    send "a" to p
+    send "b" to p
+    local:
+        send "c" to p
+        send "d" to p
+
+        expect_next "b" from p
+        expect_next "c" from p
+        expect_next "d" from p
diff --git a/test/asset/run/callstack.et b/test/asset/run/callstack.et
new file mode 100644
index 0000000..9e8123b
--- /dev/null
+++ b/test/asset/run/callstack.et
@@ -0,0 +1,23 @@
+test AG:
+    let x = 1
+    guard (x == 0)
+
+test AE:
+    spawn as p
+    let x = 2
+    expect /$x/ from p timeout 0.0
+
+def fg:
+    let x = 1
+    guard (x == 0)
+
+test BG:
+    fg
+
+def gg (x):
+    let y = 2
+    guard (x == y)
+
+test CG:
+    let z = 3
+    gg (z)
diff --git a/test/asset/run/sysinfo.et b/test/asset/run/sysinfo.et
new file mode 100644
index 0000000..1b9f6aa
--- /dev/null
+++ b/test/asset/run/sysinfo.et
@@ -0,0 +1,12 @@
+test SysInfo:
+    node n
+    spawn on n as p1
+    with p1:
+        send "network-info"
+        expect /ip ${n.ifname} ${n.ip}/
+
+    spawn as p2
+    guard (p2.node.ip /= p1.node.ip)
+    with p2:
+        send "network-info"
+        expect /ip ${n.ifname} ${p2.node.ip}/
diff --git a/test/asset/run/tools/sysinfo.sh b/test/asset/run/tools/sysinfo.sh
new file mode 100755
index 0000000..38591f4
--- /dev/null
+++ b/test/asset/run/tools/sysinfo.sh
@@ -0,0 +1,9 @@
+#!/bin/sh
+
+while read cmd; do
+    case "$cmd" in
+        network-info)
+            ip -o addr show | sed -e 's/[0-9]*: \([a-z0-9]*\).*inet6\? \([0-9a-f:.]*\).*/ip \1 \2/'
+            ;;
+    esac
+done
diff --git a/test/asset/shell/echo.et b/test/asset/shell/echo.et
new file mode 100644
index 0000000..1e48cac
--- /dev/null
+++ b/test/asset/shell/echo.et
@@ -0,0 +1,25 @@
+test Echo:
+    node n
+    let echo_str = "echo"
+    let space_str = "a   b"
+
+    shell on n as sh:
+        echo a b  c
+        echo "a b  c"
+        echo 'a b  d'
+        echo a b   " c  d"
+
+        /bin/echo "abcd"  xyz
+        "echo" a"a" "b"c   d
+        $echo_str b $echo_str c
+
+        echo "$space_str"
+        echo $space_str
+        echo '$space_str'
+
+        echo \$ \" \\
+        echo "\""\""a"
+        echo "'" '"' '\\\' "\\"
+        echo a\ b\ \ c
+
+        echo \" \' \\ \$ \# \| \> \< \; \[ \] \{ \} \( \) \* \? \~ \& \!
diff --git a/test/asset/shell/pipe.et b/test/asset/shell/pipe.et
new file mode 100644
index 0000000..a00360a
--- /dev/null
+++ b/test/asset/shell/pipe.et
@@ -0,0 +1,25 @@
+test Pipe:
+    node n
+    shell on n as sh:
+        echo abcd | grep -o '[bc]*'
+        echo abcd | grep -o '[bcd]*' | grep -o '[ab]*'
+
+
+test Redirect:
+    node n
+    shell on n as sh:
+        echo a > file
+        echo b > file
+        echo c >> file
+        echo x
+        cat file
+        echo y
+        cat < file
+        echo z
+
+test PipeRedirect:
+    node n
+    shell on n as sh:
+        echo abcdefghi | grep -o '[b-h]*' | grep -o '[a-g]*' > file
+        cat < file | grep -o '[acegi]' | cat > file2
+        cat file2 - < file
diff --git a/test/asset/shell/spawn.et b/test/asset/shell/spawn.et
new file mode 100644
index 0000000..9d48e72
--- /dev/null
+++ b/test/asset/shell/spawn.et
@@ -0,0 +1,13 @@
+test ShellTrue:
+    node n
+    shell on n:
+        true
+
+    shell on n as sh:
+        true
+
+
+test ShellFalse:
+    node n
+    shell on n as sh:
+        false