usermanager: Changed function is_admin to allow checking for host-specific admins.

[prosody.git] / core / rostermanager.lua

diff --git a/core/rostermanager.lua b/core/rostermanager.lua
index 757c9a6cddd0d6f6cb42d2fbbdb8e2e09380a9ca..ddff841e9e3b5571e03137ce5adf5e120a63eb5a 100644 (file)
--- a/core/rostermanager.lua
+++ b/core/rostermanager.lua
@@ -1,13 +1,21 @@
+-- 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 mainlog = log;
-local function log(type, message)
-       mainlog(type, "rostermanager", message);
-end
+
+
+
+local log = require "util.logger".init("rostermanager");
 
 local setmetatable = setmetatable;
 local format = string.format;
 local loadfile, setfenv, pcall = loadfile, setfenv, pcall;
 local pairs, ipairs = pairs, ipairs;
+local tostring = tostring;
 
 local hosts = hosts;
 
@@ -47,10 +55,11 @@ function remove_from_roster(session, jid)
 end
 
 function roster_push(username, host, jid)
-       if jid ~= "pending" and hosts[host] and hosts[host].sessions[username] and hosts[host].sessions[username].roster then
+       local roster = jid and jid ~= "pending" and hosts[host] and hosts[host].sessions[username] and hosts[host].sessions[username].roster;
+       if roster then
                local item = hosts[host].sessions[username].roster[jid];
                local stanza = st.iq({type="set"});
-               stanza:tag("query", {xmlns = "jabber:iq:roster"});
+               stanza:tag("query", {xmlns = "jabber:iq:roster", ver = tostring(roster[false].version or "1")  });
                if item then
                        stanza:tag("item", {jid = jid, subscription = item.subscription, name = item.name, ask = item.ask});
                        for group in pairs(item.groups) do
@@ -59,8 +68,8 @@ function roster_push(username, host, jid)
                else
                        stanza:tag("item", {jid = jid, subscription = "remove"});
                end
-               stanza:up();
-               stanza:up();
+               stanza:up(); -- move out from item
+               stanza:up(); -- move out from stanza
                -- stanza ready
                for _, session in pairs(hosts[host].sessions[username].sessions) do
                        if session.interested then
@@ -73,25 +82,41 @@ end
 
 function load_roster(username, host)
        log("debug", "load_roster: asked for: "..username.."@"..host);
+       local roster;
        if hosts[host] and hosts[host].sessions[username] then
-               local roster = hosts[host].sessions[username].roster;
+               roster = hosts[host].sessions[username].roster;
                if not roster then
                        log("debug", "load_roster: loading for new user: "..username.."@"..host);
                        roster = datamanager.load(username, host, "roster") or {};
+                       if not roster[false] then roster[false] = { }; end
                        hosts[host].sessions[username].roster = roster;
+                       hosts[host].events.fire_event("roster-load", username, host, roster);
                end
                return roster;
        end
+       
        -- Attempt to load roster for non-loaded user
        log("debug", "load_roster: loading for offline user: "..username.."@"..host);
-       return datamanager.load(username, host, "roster") or {};
+       roster = datamanager.load(username, host, "roster") or {};
+       hosts[host].events.fire_event("roster-load", username, host, roster);
+       return roster;
 end
 
-function save_roster(username, host)
+function save_roster(username, host, roster)
        log("debug", "save_roster: saving roster for "..username.."@"..host);
-       if hosts[host] and hosts[host].sessions[username] and hosts[host].sessions[username].roster then
-               return datamanager.store(username, host, "roster", hosts[host].sessions[username].roster);
+       if not roster then
+               roster = hosts[host] and hosts[host].sessions[username] and hosts[host].sessions[username].roster;
+               --if not roster then
+               --      --roster = load_roster(username, host);
+               --      return true; -- roster unchanged, no reason to save
+               --end
        end
+       if roster then
+               if not roster[false] then roster[false] = {}; end
+               roster[false].version = (roster[false].version or 0) + 1;
+               return datamanager.store(username, host, "roster", roster);
+       end
+       log("warn", "save_roster: user had no roster to save");
        return nil;
 end
 
@@ -105,7 +130,7 @@ function process_inbound_subscription_approval(username, host, jid)
                        item.subscription = "both";
                end
                item.ask = nil;
-               return datamanager.store(username, host, "roster", roster);
+               return save_roster(username, host, roster);
        end
 end
 
@@ -127,7 +152,7 @@ function process_inbound_subscription_cancellation(username, host, jid)
                end
        end
        if changed then
-               return datamanager.store(username, host, "roster", roster);
+               return save_roster(username, host, roster);
        end
 end
 
@@ -149,7 +174,7 @@ function process_inbound_unsubscribe(username, host, jid)
                end
        end
        if changed then
-               return datamanager.store(username, host, "roster", roster);
+               return save_roster(username, host, roster);
        end
 end
 
@@ -171,7 +196,7 @@ function set_contact_pending_in(username, host, jid, pending)
        end
        if not roster.pending then roster.pending = {}; end
        roster.pending[jid] = true;
-       return datamanager.store(username, host, "roster", roster);
+       return save_roster(username, host, roster);
 end
 function is_contact_pending_out(username, host, jid)
        local roster = load_roster(username, host);
@@ -190,7 +215,7 @@ function set_contact_pending_out(username, host, jid) -- subscribe
        end
        item.ask = "subscribe";
        log("debug", "set_contact_pending_out: saving roster; set "..username.."@"..host..".roster["..jid.."].ask=subscribe");
-       return datamanager.store(username, host, "roster", roster);
+       return save_roster(username, host, roster);
 end
 function unsubscribe(username, host, jid)
        local roster = load_roster(username, host);
@@ -205,12 +230,16 @@ function unsubscribe(username, host, jid)
        elseif item.subscription == "to" then
                item.subscription = "none";
        end
-       return datamanager.store(username, host, "roster", roster);
+       return save_roster(username, host, roster);
 end
 function subscribed(username, host, jid)
        if is_contact_pending_in(username, host, jid) then
                local roster = load_roster(username, host);
                local item = roster[jid];
+               if not item then -- FIXME should roster item be auto-created?
+                       item = {subscription = "none", groups = {}};
+                       roster[jid] = item;
+               end
                if item.subscription == "none" then
                        item.subscription = "from";
                else -- subscription == to
@@ -218,7 +247,7 @@ function subscribed(username, host, jid)
                end
                roster.pending[jid] = nil;
                -- TODO maybe remove roster.pending if empty
-               return datamanager.store(username, host, "roster", roster);
+               return save_roster(username, host, roster);
        end -- TODO else implement optional feature pre-approval (ask = subscribed)
 end
 function unsubscribed(username, host, jid)
@@ -234,13 +263,13 @@ function unsubscribed(username, host, jid)
                if item.subscription == "from" then
                        item.subscription = "none";
                        changed = true;
-               elseif item.subscription == both then
+               elseif item.subscription == "both" then
                        item.subscription = "to";
                        changed = true;
                end
        end
        if changed then
-               return datamanager.store(username, host, "roster", roster);
+               return save_roster(username, host, roster);
        end
 end
 
@@ -249,7 +278,7 @@ function process_outbound_subscription_request(username, host, jid)
        local item = roster[jid];
        if item and (item.subscription == "none" or item.subscription == "from") then
                item.ask = "subscribe";
-               return datamanager.store(username, host, "roster", roster);
+               return save_roster(username, host, roster);
        end
 end
 
@@ -258,10 +287,10 @@ end
        local item = roster[jid];
        if item and (item.subscription == "none" or item.subscription == "from" then
                item.ask = "subscribe";
-               return datamanager.store(username, host, "roster", roster);
+               return save_roster(username, host, roster);
        end
 end]]
 
 
 
-return _M;
\ No newline at end of file
+return _M;