• file
• latest
• revisions
• annotate
• diff
• comparison
• raw

plugins/mod_roster.lua@bcf539295f2d (annotated)

plugins/mod_roster.lua

Tue, 30 Sep 2008 19:52:00 +0100

author

Matthew Wild <mwild1@gmail.com>

date

Tue, 30 Sep 2008 19:52:00 +0100

changeset 30

bcf539295f2d

child 79

2766e23c4d7d

permissions

-rw-r--r--

Huge commit to:
* Break stanza routing (to be restored in a future commit)
* Remove the old stanza_dispatcher code, which was never going to be maintainable nor extendable :)
* Bring us plugins, starting with mod_legacyauth and mod_roster
* Sessions are now created/destroyed using a standard sessionmanager interface

30 bcf539295f2d Huge commit to: Matthew Wild <mwild1@gmail.com> parents: diff changeset	1
bcf539295f2d Huge commit to: Matthew Wild <mwild1@gmail.com> parents: diff changeset	2	local st = require "util.stanza"
bcf539295f2d Huge commit to: Matthew Wild <mwild1@gmail.com> parents: diff changeset	3	local send = require "core.sessionmanager".send_to_session
bcf539295f2d Huge commit to: Matthew Wild <mwild1@gmail.com> parents: diff changeset	4
bcf539295f2d Huge commit to: Matthew Wild <mwild1@gmail.com> parents: diff changeset	5	add_iq_handler("c2s", "jabber:iq:roster",
bcf539295f2d Huge commit to: Matthew Wild <mwild1@gmail.com> parents: diff changeset	6	function (session, stanza)
bcf539295f2d Huge commit to: Matthew Wild <mwild1@gmail.com> parents: diff changeset	7	if stanza.attr.type == "get" then
bcf539295f2d Huge commit to: Matthew Wild <mwild1@gmail.com> parents: diff changeset	8	session.roster = session.roster or rostermanager.getroster(session.username, session.host);
bcf539295f2d Huge commit to: Matthew Wild <mwild1@gmail.com> parents: diff changeset	9	if session.roster == false then
bcf539295f2d Huge commit to: Matthew Wild <mwild1@gmail.com> parents: diff changeset	10	send(session, st.reply(stanza)
bcf539295f2d Huge commit to: Matthew Wild <mwild1@gmail.com> parents: diff changeset	11	:tag("error", { type = "wait" })
bcf539295f2d Huge commit to: Matthew Wild <mwild1@gmail.com> parents: diff changeset	12	:tag("internal-server-error", { xmlns = "urn:ietf:params:xml:ns:xmpp-stanzas"}));
bcf539295f2d Huge commit to: Matthew Wild <mwild1@gmail.com> parents: diff changeset	13	return true;
bcf539295f2d Huge commit to: Matthew Wild <mwild1@gmail.com> parents: diff changeset	14	else session.roster = session.roster or {};
bcf539295f2d Huge commit to: Matthew Wild <mwild1@gmail.com> parents: diff changeset	15	end
bcf539295f2d Huge commit to: Matthew Wild <mwild1@gmail.com> parents: diff changeset	16	local roster = st.reply(stanza)
bcf539295f2d Huge commit to: Matthew Wild <mwild1@gmail.com> parents: diff changeset	17	:query("jabber:iq:roster");
bcf539295f2d Huge commit to: Matthew Wild <mwild1@gmail.com> parents: diff changeset	18	for jid in pairs(session.roster) do
bcf539295f2d Huge commit to: Matthew Wild <mwild1@gmail.com> parents: diff changeset	19	roster:tag("item", { jid = jid, subscription = "none" }):up();
bcf539295f2d Huge commit to: Matthew Wild <mwild1@gmail.com> parents: diff changeset	20	end
bcf539295f2d Huge commit to: Matthew Wild <mwild1@gmail.com> parents: diff changeset	21	send(session, roster);
bcf539295f2d Huge commit to: Matthew Wild <mwild1@gmail.com> parents: diff changeset	22	return true;
bcf539295f2d Huge commit to: Matthew Wild <mwild1@gmail.com> parents: diff changeset	23	end
bcf539295f2d Huge commit to: Matthew Wild <mwild1@gmail.com> parents: diff changeset	24	end);