xmpp-fingerprint.lua

changeset 15
1b59ba3e9508
parent 13
9331253c2f83
child 16
872dc69f6039
equal deleted inserted replaced
14:a8f632e88555 15:1b59ba3e9508
93 conn:settimeout(default_timeout); 93 conn:settimeout(default_timeout);
94 local data, err, partial = conn:receive("*a"); 94 local data, err, partial = conn:receive("*a");
95 received = data or partial or ""; 95 received = data or partial or "";
96 conn:close(); 96 conn:close();
97 received_cache[question] = received; 97 received_cache[question] = received;
98 debug("<<", #received ~= "" and tostring(received) or nil); 98 if received ~= "" then
99 debug("<<", received);
100 else
101 debug("!!", tostring(err));
102 end
99 end 103 end
100 return received ~= "" and received:match(answer); 104 if received == "" then
105 return answer == false
106 elseif answer then
107 return received:match(answer);
108 end
101 end 109 end
102 110
103 function test(question, answer) 111 function test(question, answer)
104 return _test(arg[1], tonumber(arg[2]) or default_port, question, answer); 112 return _test(arg[1], tonumber(arg[2]) or default_port, question, answer);
105 end 113 end

mercurial