diff options
Diffstat (limited to 'Build/source/texk/web2c/luatexdir/luasocket/test/tcp-getoptions')
-rwxr-xr-x | Build/source/texk/web2c/luatexdir/luasocket/test/tcp-getoptions | 41 |
1 files changed, 41 insertions, 0 deletions
diff --git a/Build/source/texk/web2c/luatexdir/luasocket/test/tcp-getoptions b/Build/source/texk/web2c/luatexdir/luasocket/test/tcp-getoptions new file mode 100755 index 00000000000..f9b3d1bb8a4 --- /dev/null +++ b/Build/source/texk/web2c/luatexdir/luasocket/test/tcp-getoptions @@ -0,0 +1,41 @@ +#!/usr/bin/env lua + +require"socket" + +port = 8765 + +function options(o) + print("options for", o) + + for _, opt in ipairs{"keepalive", "reuseaddr", "tcp-nodelay"} do + print("getoption", opt, o:getoption(opt)) + end + + print("getoption", "linger", + "on", o:getoption("linger").on, + "timeout", o:getoption("linger").timeout) +end + +local m = socket.tcp() + +options(m) + +assert(m:bind("*", port)) +assert(m:listen()) + +options(m) + +m:close() + +local m = socket.bind("*", port) + +options(m) + +local c = socket.connect("localhost", port) + +options(c) + +local s = m:accept() + +options(s) + |