clix/ping.lua

return function (opts, arg)
	if opts.short_help then
		print("Measure the round-trip latency time of a given JID");
		return;
	end
	if #arg == 0 or opts.help then
		return 0;
	end
	local conn;
	local function on_reply(time, jid, reply)
		if time then
			print(string.format("%s latency: %1.3fs", jid, time));
		else
			print("Error requesting ping ("..(reply.condition or "unknown")..")"..(reply.text and (": "..reply.text) or ""));
		end
		conn:close();
	end
	local function on_connect(_conn)
		conn = _conn;
		conn:add_plugin("ping");
		conn:ping(arg[1], on_reply);
	end
	clix_connect(opts, on_connect);
end