我在两台服务器之间有一个代理客户端。主服务器S1在互联网上。代理客户端和第二服务器S2位于相同的内联网中。我有以下代码(为简单起见省略了部分),它负责将来自S2'的数据转发到S1':
fsctimeout = 0.01
function send_data(sock, data, i, l)
local p,err,q = sock:send(data, i, l)
if(err == "timeout" and q ~= l) then
fsctimeout = fsctimeout * 2
sock:settimeout(fsctimeout)
send_data(sock, data, q + 1, l)
fsctimeout = fsctimeout / 2
sock:settimeout(fsctimeout)
end
end
while not e do
rect, _, st = socket.select({csc, fsc}, nil, .01) --csc is S1, fsc is S2 sockets.
if(rect[fsc] ~= nil and csc ~= nil) then
local data, err, part = fsc:receive(8192)
if(data ~= nil) then
send_data(csc, data, 1, data:len())
totalBytesFromFP = totalBytesFromFP + data:len()
end
if(part ~= nil) then
send_data(csc, part, 1, part:len())
totalBytesFromFP = totalBytesFromFP + part:len()
end
end
end
我写了send_data
函数,这样如果发送超时,它会使套接字超时加倍,然后重试。但是现在有时程序会卡在send_data
函数中而不会成功发送数据。我能在这做什么? (我正在测试尝试发送1MB文件,对于少量数据,此问题似乎不会发生。)
答案 0 :(得分:0)
只有在出现“超时”错误后才会首次更改超时,但它永远不会发生,因为默认情况下send
会阻塞(因此它永远不会超时)。
只需在循环前添加csc:settimeout(fsctimeout)
。