-- Prosody IM

-- Copyright (C) 2008-2009 Matthew Wild

-- Copyright (C) 2008-2009 Waqas Hussain

-- 

-- This project is MIT/X11 licensed. Please see the

-- COPYING file in the source package for more information.

--

local datamanager = require "util.datamanager"

	local session, stanza = event.origin, event.stanza;

	local to = stanza.attr.to;

	if stanza.attr.type == "get" then

		local vCard;

		if to then

			local node, host = jid_split(to);

			vCard = st.deserialize(datamanager.load(node, host, "vcard")); -- load vCard for user or server

		else

			vCard = st.deserialize(datamanager.load(session.username, session.host, "vcard"));-- load user's own vCard

		end

		if vCard then

			session.send(st.reply(stanza):add_child(vCard)); -- send vCard!

		else

			session.send(st.error_reply(stanza, "cancel", "item-not-found"));

		end

	else

		if not to then

			if datamanager.store(session.username, session.host, "vcard", st.preserialize(stanza.tags[1])) then

				session.send(st.reply(stanza));

			else

				-- TODO unable to write file, file may be locked, etc, what's the correct error?

				session.send(st.error_reply(stanza, "wait", "internal-server-error"));

			end

		else

			session.send(st.error_reply(stanza, "auth", "forbidden"));

		end

	end

	return true;

end

module:hook("iq/bare/vcard-temp:vCard", handle_vcard);

module:hook("iq/host/vcard-temp:vCard", handle_vcard);

-- COMPAT: https://support.process-one.net/browse/EJAB-1045

if module:get_option("vcard_compatibility") then

	module:hook("iq/full", function(data)

		local stanza = data.stanza;

		local payload = stanza.tags[1];

			return handle_vcard(data);

		end

	end, 1);

end