luasocket 之 udp

http://blog.chinaunix.net/uid-27194309-id-3499261.html  在页面的后面有

先在路由器上执行:

opkg install luasocket_2.0.2-3_ar71xx.ipk

udp server 例程如下:

点击(此处)折叠或打开

1. -- upd-server Test
   
2. local socket = require "socket"
   
3. 
   
4. local port = 8080
   
5. local udp = socket.udp()
   
6. udp:settimeout(0)
   
7. udp:setsockname('*', port)    --server
   
8. 
   
9. local data, msg_or_ip, port_or_nil
   
10. local running = true
    
11. 
    
12. -- the beginning of theloop proper...
    
13. print "Beginning server loop."
    
14. while running do
    
15.     data, msg_or_ip, port_or_nil= udp:receivefrom()
    
16.     if data then
    
17.             print("udp:receivefrom: ".. data .. msg_or_ip, port_or_nil)
    
18.             udp:sendto(data, msg_or_ip, port_or_nil)
    
19. 
    
20.             if data == "quit"then
    
21.                 running = false
    
22.             end
    
23.     elseif msg_or_ip ~= 'timeout'then
    
24.         error("Unknown network error: "..tostring(msg))
    
25.     end
    
26. 
    
27.     socket.sleep(0.01)
    
28. end
    
29. 
    
30. print "Thank you."

udp client 例程如下:

点击(此处)折叠或打开

1. -- upd-client Test
   
2. local socket = require "socket"
   
3. 
   
4. local address = "192.168.1.224"
   
5. local port = 8080
   
6. local udp = socket.udp()
   
7. 
   
8. udp:settimeout(0)
   
9. udp:setpeername(address, port)
   
10. --udp:sendto("udp-test", address, port)
    
11. udp:send("udp-test0n")
    
12. udp:send("udp-test1n")
    
13. udp:send("udp-test2n")
    
14. 
    
15. print "Thank you."

用udp实现更方便的调试

1. -- luasocket upd-client Test
   
2. local socket = require "socket"
   
3. 
   
4. debug = 1
   
5. function DEBUGP(str)
   
6.     if debug == 1then
   
7.         local server_ip = "192.168.1.224"
   
8.         local server_port = 8080
   
9.         local udp = socket.udp()
   
10. 
    
11.         udp:settimeout(0)
    
12.         udp:setpeername(server_ip, server_port)
    
13.         --udp:sendto("udp-test", address, port)
    
14.         udp:send(str)
    
15.         udp:close()
    
16.         
    
17.     elseif debug == 2 then
    
18.         print(str)
    
19.     end
    
20. end
    
21. 
    
22. local data1 = 101
    
23. local data2 = 102
    
24. local data3 = 103
    
25. DEBUGP("test - ".. data1 .. "n")
    
26. DEBUGP("test - ".. data2 .. "n")
    
27. DEBUGP("test - ".. data3 .. "n")
    
28. 
    
29. print "Thank you."