aboutsummaryrefslogtreecommitdiff
path: root/test/udp-zero-length-send-recv
diff options
context:
space:
mode:
Diffstat (limited to 'test/udp-zero-length-send-recv')
-rwxr-xr-xtest/udp-zero-length-send-recv37
1 files changed, 37 insertions, 0 deletions
diff --git a/test/udp-zero-length-send-recv b/test/udp-zero-length-send-recv
new file mode 100755
index 0000000..541efd4
--- /dev/null
+++ b/test/udp-zero-length-send-recv
@@ -0,0 +1,37 @@
1#!/usr/bin/lua
2
3--[[
4Show that luasocket returns an error message on zero-length UDP sends,
5even though the send is valid, and in fact the UDP packet is sent
6to the peer:
7
8% sudo tcpdump -i lo -n
9tcpdump: verbose output suppressed, use -v or -vv for full protocol decode
10listening on lo, link-type EN10MB (Ethernet), capture size 65535 bytes
1113:40:16.652808 IP 127.0.0.1.56573 > 127.0.0.1.5432: UDP, length 0
12
13]]
14
15require"socket"
16
17s = assert(socket.udp())
18r = assert(socket.udp())
19assert(r:setsockname("*", 5432))
20assert(s:setpeername("127.0.0.1", 5432))
21
22ok, emsg = s:send("")
23if ok ~= 0 then
24 print("send of zero failed with:", ok, emsg)
25end
26
27assert(r:settimeout(2))
28
29ok, emsg = r:receive()
30
31if not ok or string.len(ok) ~= 0 then
32 print("fail - receive of zero failed with:", ok, emsg)
33 os.exit(1)
34end
35
36print"ok"
37