support datagram unix domain sockets

4 files changed, 20 insertions, 2 deletions

diff --git a/test/unixclnt.lua b/test/unixtcpclnt.lua
index 5171535..652a680 100644
--- a/test/unixclnt.lua
+++ b/test/unixtcpclnt.lua
@@ -1,6 +1,6 @@
 socket = require"socket"
 socket.unix = require"socket.unix"
-c = assert(socket.unix())
+c = assert(socket.unix.tcp())
 assert(c:connect("/tmp/foo"))
 while 1 do
     local l = io.read()
diff --git a/test/unixsrvr.lua b/test/unixtcpsrvr.lua
index 81b9c99..2a2b065 100644
--- a/test/unixsrvr.lua
+++ b/test/unixtcpsrvr.lua
@@ -1,6 +1,6 @@
     socket = require"socket"
     socket.unix = require"socket.unix"
-    u = assert(socket.unix())
+    u = assert(socket.unix.tcp())
     assert(u:bind("/tmp/foo"))
     assert(u:listen())
     c = assert(u:accept())
diff --git a/test/unixudpclnt.lua b/test/unixudpclnt.lua
new file mode 100644
index 0000000..bbbff7f
--- /dev/null
+++ b/test/unixudpclnt.lua
@@ -0,0 +1,9 @@
+socket = require"socket"
+socket.unix = require"socket.unix"
+c = assert(socket.unix.udp())
+c:bind("/tmp/bar")
+while 1 do
+    local l = io.read("*l")
+    assert(c:sendto(l, "/tmp/foo"))
+        print(assert(c:receivefrom()))
+end
diff --git a/test/unixudpsrvr.lua b/test/unixudpsrvr.lua
new file mode 100644
index 0000000..5ed71dc
--- /dev/null
+++ b/test/unixudpsrvr.lua
@@ -0,0 +1,9 @@
+    socket = require"socket"
+    socket.unix = require"socket.unix"
+    u = assert(socket.unix.udp())
+    assert(u:bind("/tmp/foo"))
+    while 1 do
+                x, r = assert(u:receivefrom())
+                print(x, r)
+                assert(u:sendto(">" .. x, r))
+    end