clix/mirror.lua

return function (opts, arg)

	if opts.short_help then

		print("Echo received stanzas back to sender");

		return;

	end

	local function on_connect(conn)

		local function on_stanza(stanza)

			if stanza.name == "presence" and opts.presence

				and not opts.mirror_presence then

				return;

			end

			stanza.attr.to, stanza.attr.from = stanza.attr.from, stanza.attr.to;

			conn:send(stanza);

			stanza.attr.to, stanza.attr.from = stanza.attr.from, stanza.attr.to;

		end

		conn:hook("stanza", on_stanza);

	end

	return clix_connect(opts, on_connect);

end