3 files changed, 93 insertions, 0 deletions
diff --git a/tests/modules/os/test.lua b/tests/modules/os/test.lua
new file mode 100644
index 000000000..681a2ec75
--- /dev/null
+++ b/tests/modules/os/test.lua
@@ -0,0 +1,38 @@
+function main()
+    -- get mclock
+    local tm = os.mclock()
+    -- test cpdir
+    os.mkdir("test1")
+    assert(os.exists("test1"))
+    os.cp("test1","test2")
+    assert(os.exists("test2"))
+    os.rmdir("test1")
+    assert(not os.exists("test1"))
+    io.writefile("test2/awd","awd")
+    os.rmdir("test2")
+    assert(not os.exists("test2"))
+    -- test rename
+    os.mkdir("test1")
+    assert(os.exists("test1"))
+    os.mv("test1","test2")
+    assert(not os.exists("test1"))
+    assert(os.exists("test2"))
+    os.rmdir("test2")
+    assert(not os.exists("test2"))
+    -- test cp/mvdir into another dir
+    os.mkdir("test1")
+    os.mkdir("test2")
+    assert(os.exists("test1") and os.exists("test2"))
+    os.cp("test1","test2")
+    assert(os.exists("test2/test1"))
+    os.mv("test1","test2/test1")
+    assert(not os.exists("test1"))
+    assert(os.exists("test2/test1/test1"))
+    os.rmdir("test2")
+    assert(not os.exists("test2"))
+    -- test setenv
+    os.setenv("__AWD","DWA")
+    assert(os.getenv("__AWD")=="DWA")
+    -- assert mclock
+    assert(os.mclock()>=tm)
+end
diff --git a/tests/modules/process/test.lua b/tests/modules/process/test.lua
new file mode 100644
index 000000000..69fe0b676
--- /dev/null
+++ b/tests/modules/process/test.lua
@@ -0,0 +1,51 @@
+function main()
+    -- single process test
+    local inftimeout=999
+    local stdout=os.tmpfile()
+    local stderr=os.tmpfile()
+    for i = 1, 2 do
+        local pro=process.open("echo -n awd",stdout,stderr)
+        process.wait(pro,inftimeout)
+        process.close(pro)
+        assert(io.readfile(stdout)=="awd")
+    end
+    -- hack test
+    local hacked = false
+    try{
+        function ()
+            process.wait("awd",inftimeout)
+            hacked = true
+        end
+    }
+    assert(not hacked)
+    hacked = (process.close("awd") ~= nil)
+    assert(not hacked)
+    try{
+        function ()
+            process.waitlist("awd",inftimeout)
+            hacked = true
+        end
+    }
+    assert(not hacked)
+    try{
+        function ()
+            process.waitlist({},inftimeout)
+            hacked = true
+        end
+    }
+    assert(not hacked)
+    try{
+        function ()
+            process.waitlist({"awd"},inftimeout)
+            hacked = true
+        end
+    }
+    assert(not hacked)
+    try{
+        function ()
+            process.open("thismustnotbeaprogramname")
+            hacked = true
+        end
+    }
+    assert(not hacked)
+end
diff --git a/tests/modules/string/test.lua b/tests/modules/string/test.lua
new file mode 100644
index 000000000..b2e7a23c7
--- /dev/null
+++ b/tests/modules/string/test.lua
@@ -0,0 +1,4 @@
+function main()
+    assert(string.less("awd","dwa"))
+    assert(not string.less("dwa","awd"))
+end