mirror of
https://github.com/processone/ejabberd.git
synced 2024-11-22 16:20:52 +01:00
PubSub cleanup, EJAB-827 fix, EJAB-701 partial fix
SVN Revision: 1767
This commit is contained in:
Christophe Romain
parent
214ef31053
commit
e032a8c54f
18
ChangeLog
18
ChangeLog
@ -1,3 +1,21 @@
|
||||
2009-01-03 Christophe Romain <christophe.romain@process-one.net>
|
||||
|
||||
* src/mod_pubsub/mod_pubsub.erl: deliver notification depending on
|
||||
presence-based-delivery configuration (EJAB-827). notification code
|
||||
rewrite.
|
||||
|
||||
* src/mod_pubsub/mod_pubsub.erl: code cleanning, minor bugfixes
|
||||
* src/mod_pubsub/node_default.erl: Likewise
|
||||
* src/mod_pubsub/node_pep.erl: Likewise
|
||||
* src/mod_pubsub/pubsub.hrl: Likewise
|
||||
|
||||
* src/mod_pubsub/mod_pubsub.erl: prevent subscribing with full jid,
|
||||
waiting for full jid support (EJAB-701)
|
||||
|
||||
* src/mod_pubsub/mod_pubsub.erl: use of delete-any feature instead of
|
||||
delete-nodes for delete item use case (fix from erroneous definition
|
||||
in XEP-0060)
|
||||
|
||||
2008-12-23 Christophe Romain <christophe.romain@process-one.net>
|
||||
|
||||
* src/mod_pubsub/mod_pubsub.erl: Improve handling of PEP sent to
|
||||
|
||||
@ -30,7 +30,7 @@
|
||||
%%%
|
||||
%%% @reference See <a href="http://www.xmpp.org/extensions/xep-0060.html">XEP-0060: Pubsub</a> for
|
||||
%%% the latest version of the PubSub specification.
|
||||
%%% This module uses version 1.11 of the specification as a base.
|
||||
%%% This module uses version 1.12 of the specification as a base.
|
||||
%%% Most of the specification is implemented.
|
||||
%%% Functions concerning configuration should be rewritten.
|
||||
%%% Code is derivated from the original pubsub v1.7, by Alexey Shchepin <alexey@process-one.net>
|
||||
@ -40,7 +40,7 @@
|
||||
|
||||
-module(mod_pubsub).
|
||||
-author('christophe.romain@process-one.net').
|
||||
-version('1.11-01').
|
||||
-version('1.12-01').
|
||||
|
||||
-behaviour(gen_server).
|
||||
-behaviour(gen_mod).
|
||||
@ -92,9 +92,7 @@
|
||||
string_to_subscription/1,
|
||||
string_to_affiliation/1,
|
||||
extended_error/2,
|
||||
extended_error/3,
|
||||
make_stanza/3,
|
||||
route_stanza/3
|
||||
extended_error/3
|
||||
]).
|
||||
|
||||
%% API and gen_server callbacks
|
||||
@ -1076,12 +1074,11 @@ find_authorization_response(Packet) ->
|
||||
%% Plugins = [Plugin::string()]
|
||||
%% @doc Send a message to JID with the supplied Subscription
|
||||
send_authorization_approval(Host, JID, Node, Subscription) ->
|
||||
Stanza = #xmlel{ns = ?NS_JABBER_CLIENT, name = 'message', children =
|
||||
[#xmlel{ns = ?NS_PUBSUB_EVENT, name = 'event', children =
|
||||
Stanza = event_stanza(
|
||||
[#xmlel{ns = ?NS_PUBSUB_EVENT, name = 'subscription', attrs =
|
||||
[#xmlattr{name = 'node', value = Node},
|
||||
#xmlattr{name = 'jid', value = exmpp_jid:jid_to_list(JID)},
|
||||
#xmlattr{name = 'subscription', value = subscription_to_string(Subscription)}]}]}]},
|
||||
#xmlattr{name = 'subscription', value = subscription_to_string(Subscription)}]}]),
|
||||
ejabberd_router ! {route, service_jid(Host), JID, Stanza}.
|
||||
|
||||
handle_authorization_response(Host, From, To, Packet, XFields) ->
|
||||
@ -1271,7 +1268,6 @@ create_node(Host, ServerHost, Node, Owner, GivenType, Access, Configuration) ->
|
||||
%% [{xmlelement, "x", [{"xmlns", ?NS_DATA_FORMS}, {"type", "result"}],
|
||||
%% [?XFIELD("hidden", "", "FORM_TYPE", ?NS_PUBSUB_NMI),
|
||||
%% ?XFIELD("jid-single", "Node Creator", "creator", jlib:jid_to_string(OwnerKey))]}]),
|
||||
%% todo publish_item(Host, ServerHost, ["pubsub", "nodes"], node_to_string(Node)),
|
||||
case Result of
|
||||
default -> {result, Reply};
|
||||
_ -> {result, Result}
|
||||
@ -1317,14 +1313,17 @@ delete_node(Host, Node, Owner) ->
|
||||
{error, Error} ->
|
||||
{error, Error};
|
||||
{result, {Result, broadcast, Removed}} ->
|
||||
broadcast_removed_node(Host, Removed),
|
||||
%%broadcast_retract_item(Host, ["pubsub", "nodes"], node_to_string(Node)),
|
||||
lists:foreach(fun(RNode) ->
|
||||
broadcast_removed_node(Host, RNode)
|
||||
end, Removed),
|
||||
case Result of
|
||||
default -> {result, Reply};
|
||||
_ -> {result, Result}
|
||||
end;
|
||||
{result, {Result, Removed}} ->
|
||||
broadcast_removed_node(Host, Removed),
|
||||
lists:foreach(fun(RNode) ->
|
||||
broadcast_removed_node(Host, RNode)
|
||||
end, Removed),
|
||||
case Result of
|
||||
default -> {result, Reply};
|
||||
_ -> {result, Result}
|
||||
@ -1536,23 +1535,17 @@ publish_item(Host, ServerHost, Node, Publisher, ItemId, Payload) ->
|
||||
{error, Reason} ->
|
||||
{error, Reason};
|
||||
{result, {Result, broadcast, Removed}} ->
|
||||
lists:foreach(fun(OldItem) ->
|
||||
broadcast_retract_item(Host, Node, OldItem)
|
||||
end, Removed),
|
||||
broadcast_retract_items(Host, Node, Removed),
|
||||
broadcast_publish_item(Host, Node, ItemId, jlib:short_prepd_jid(Publisher), Payload),
|
||||
case Result of
|
||||
default -> {result, Reply};
|
||||
_ -> {result, Result}
|
||||
end;
|
||||
{result, default, Removed} ->
|
||||
lists:foreach(fun(OldItem) ->
|
||||
broadcast_retract_item(Host, Node, OldItem)
|
||||
end, Removed),
|
||||
broadcast_retract_items(Host, Node, Removed),
|
||||
{result, Reply};
|
||||
{result, Result, Removed} ->
|
||||
lists:foreach(fun(OldItem) ->
|
||||
broadcast_retract_item(Host, Node, OldItem)
|
||||
end, Removed),
|
||||
broadcast_retract_items(Host, Node, Removed),
|
||||
{result, Result};
|
||||
{result, default} ->
|
||||
{result, Reply};
|
||||
@ -1583,7 +1576,7 @@ delete_item(Host, Node, Publisher, ItemId, ForceNotify) ->
|
||||
Action = fun(#pubsub_node{type = Type}) ->
|
||||
Features = features(Type),
|
||||
PersistentFeature = lists:member("persistent-items", Features),
|
||||
DeleteFeature = lists:member("delete-nodes", Features),
|
||||
DeleteFeature = lists:member("delete-any", Features),
|
||||
if
|
||||
%%-> iq_pubsub just does that matchs
|
||||
%% %% Request does not specify an item
|
||||
@ -1593,7 +1586,7 @@ delete_item(Host, Node, Publisher, ItemId, ForceNotify) ->
|
||||
{error, extended_error('feature-not-implemented', unsupported, "persistent-items")};
|
||||
not DeleteFeature ->
|
||||
%% Service does not support item deletion
|
||||
{error, extended_error('feature-not-implemented', unsupported, "delete-nodes")};
|
||||
{error, extended_error('feature-not-implemented', unsupported, "delete-any")};
|
||||
true ->
|
||||
node_call(Type, delete_item, [Host, Node, Publisher, ItemId])
|
||||
end
|
||||
@ -1603,7 +1596,7 @@ delete_item(Host, Node, Publisher, ItemId, ForceNotify) ->
|
||||
{error, Reason} ->
|
||||
{error, Reason};
|
||||
{result, {Result, broadcast}} ->
|
||||
broadcast_retract_item(Host, Node, ItemId, ForceNotify),
|
||||
broadcast_retract_items(Host, Node, [ItemId], ForceNotify),
|
||||
case Result of
|
||||
default -> {result, Reply};
|
||||
_ -> {result, Result}
|
||||
@ -1771,12 +1764,10 @@ send_items(Host, Node, {LU, LS, LR} = LJID, Number) ->
|
||||
[First|Tail] = Items,
|
||||
[lists:foldl(
|
||||
fun(CurItem, LastItem) ->
|
||||
{_, {LMS, LS, LmS}} = LastItem#pubsub_item.creation,
|
||||
{_, {CMS, CS, CmS}} = CurItem#pubsub_item.creation,
|
||||
LTimestamp = LMS * 1000000 + LS * 1000 + LmS,
|
||||
CTimestamp = CMS * 1000000 + CS * 1000 + CmS,
|
||||
{_, LTimeStamp} = LastItem#pubsub_item.creation,
|
||||
{_, CTimeStamp} = CurItem#pubsub_item.creation,
|
||||
if
|
||||
CTimestamp > LTimestamp -> CurItem;
|
||||
CTimeStamp > LTimeStamp -> CurItem;
|
||||
true -> LastItem
|
||||
end
|
||||
end, First, Tail)];
|
||||
@ -1795,10 +1786,9 @@ send_items(Host, Node, {LU, LS, LR} = LJID, Number) ->
|
||||
end,
|
||||
#xmlel{ns = ?NS_PUBSUB_EVENT, name = 'item', attrs = ItemAttrs, children = Payload}
|
||||
end, ToSend),
|
||||
Stanza = #xmlel{ns = ?NS_JABBER_CLIENT, name = 'message', children =
|
||||
[#xmlel{ns = ?NS_PUBSUB_EVENT, name = 'event', children =
|
||||
Stanza = event_stanza(
|
||||
[#xmlel{ns = ?NS_PUBSUB_EVENT, name = 'items', attrs = [#xmlattr{name = 'node', value = node_to_string(Node)}], children =
|
||||
ItemsEls}]}]},
|
||||
ItemsEls}]),
|
||||
ejabberd_router ! {route, service_jid(Host), exmpp_jid:make_jid(LU, LS, LR), Stanza}.
|
||||
|
||||
%% @spec (Host, JID, Plugins) -> {error, Reason} | {result, Response}
|
||||
@ -2132,10 +2122,10 @@ service_jid(Host) ->
|
||||
%% Subscription = atom()
|
||||
%% PresenceDelivery = boolean()
|
||||
%% @doc <p>Check if a notification must be delivered or not.</p>
|
||||
is_to_delivered(_, none, _) -> false;
|
||||
is_to_delivered(_, pending, _) -> false;
|
||||
is_to_delivered(_, _, false) -> true;
|
||||
is_to_delivered({User, Server, _}, _, true) ->
|
||||
is_to_deliver(_, none, _) -> false;
|
||||
is_to_deliver(_, pending, _) -> false;
|
||||
is_to_deliver(_, _, false) -> true;
|
||||
is_to_deliver({User, Server, _}, _, true) ->
|
||||
case mnesia:dirty_match_object({session, '_', '_', {User, Server}, '_', '_'}) of
|
||||
[] -> false;
|
||||
Ss ->
|
||||
@ -2153,17 +2143,22 @@ payload_xmlelements([], Count) -> Count;
|
||||
payload_xmlelements([#xmlel{}|Tail], Count) -> payload_xmlelements(Tail, Count+1);
|
||||
payload_xmlelements([_|Tail], Count) -> payload_xmlelements(Tail, Count).
|
||||
|
||||
%% @spec (Els) -> stanza()
|
||||
%% Els = [xmlelement()]
|
||||
%% @doc <p>Build pubsub event stanza
|
||||
event_stanza(Els) ->
|
||||
#xmlel{ns = ?NS_JABBER_CLIENT, name = 'message', children =
|
||||
[#xmlel{ns = ?NS_PUBSUB_EVENT, name = 'event', children = Els}]}.
|
||||
|
||||
%%%%%% broadcast functions
|
||||
|
||||
broadcast_publish_item(Host, Node, ItemId, _From, Payload) ->
|
||||
Action =
|
||||
fun(#pubsub_node{options = Options, type = Type}) ->
|
||||
case node_call(Type, get_states, [Host, Node]) of
|
||||
{error, _} -> {result, false};
|
||||
{result, []} -> {result, false};
|
||||
{result, []} ->
|
||||
{result, false};
|
||||
{result, States} ->
|
||||
PresenceDelivery = get_option(Options, presence_based_delivery),
|
||||
BroadcastAll = get_option(Options, broadcast_all_resources),
|
||||
Content = case get_option(Options, deliver_payloads) of
|
||||
true -> Payload;
|
||||
false -> []
|
||||
@ -2172,137 +2167,41 @@ broadcast_publish_item(Host, Node, ItemId, _From, Payload) ->
|
||||
"" -> [];
|
||||
_ -> [#xmlattr{name = 'id', value = ItemId}]
|
||||
end,
|
||||
Stanza = make_stanza(Node, ItemAttrs, Content),
|
||||
lists:foreach(
|
||||
fun(#pubsub_state{stateid = {LJID, _},
|
||||
subscription = Subscription}) ->
|
||||
case is_to_delivered(LJID, Subscription, PresenceDelivery) of
|
||||
true ->
|
||||
DestJIDs = case BroadcastAll of
|
||||
true -> ejabberd_sm:get_user_resources(element(1, LJID), element(2, LJID));
|
||||
false -> [LJID]
|
||||
end,
|
||||
route_stanza(Host, DestJIDs, Stanza);
|
||||
false ->
|
||||
ok
|
||||
end
|
||||
end, States),
|
||||
Stanza = event_stanza(
|
||||
[#xmlel{ns = ?NS_PUBSUB_EVENT, name = 'items', attrs = [#xmlattr{name = 'node', value = node_to_string(Node)}], children =
|
||||
[#xmlel{ns = ?NS_PUBSUB_EVENT, name = 'item', attrs = ItemAttrs, children = Content}]}]),
|
||||
broadcast_stanza(Host, Options, States, Stanza),
|
||||
broadcast_by_caps(Host, Node, Type, Stanza),
|
||||
{result, true}
|
||||
{result, true};
|
||||
_ ->
|
||||
{result, false}
|
||||
end
|
||||
end,
|
||||
transaction(Host, Node, Action, sync_dirty).
|
||||
|
||||
%% ItemAttrs is a list of tuples:
|
||||
%% For example: [{"id", ItemId}]
|
||||
make_stanza(Node, ItemAttrs, Payload) ->
|
||||
#xmlel{ns = ?NS_JABBER_CLIENT, name = 'message', children =
|
||||
[#xmlel{ns = ?NS_PUBSUB_EVENT, name = 'event', children =
|
||||
[#xmlel{ns = ?NS_PUBSUB_EVENT, name = 'items', attrs = [#xmlattr{name = 'node', value = node_to_string(Node)}], children =
|
||||
[#xmlel{ns = ?NS_PUBSUB_EVENT, name = 'item', attrs = ItemAttrs, children = Payload}]}]}]}.
|
||||
|
||||
%% DestJIDs = [{LUser, LServer, LResource}]
|
||||
route_stanza(Host, DestJIDs, Stanza) ->
|
||||
lists:foreach(
|
||||
fun({DU, DS, DR}) ->
|
||||
ejabberd_router ! {route, service_jid(Host), exmpp_jid:make_jid(DU, DS, DR), Stanza}
|
||||
end, DestJIDs).
|
||||
|
||||
broadcast_retract_item(Host, Node, ItemId) ->
|
||||
broadcast_retract_item(Host, Node, ItemId, false).
|
||||
broadcast_retract_item(Host, Node, ItemId, ForceNotify) ->
|
||||
broadcast_retract_items(Host, Node, ItemIds) ->
|
||||
broadcast_retract_items(Host, Node, ItemIds, false).
|
||||
broadcast_retract_items(Host, Node, ItemIds, ForceNotify) ->
|
||||
Action =
|
||||
fun(#pubsub_node{options = Options, type = Type}) ->
|
||||
case (get_option(Options, notify_retract) or ForceNotify) of
|
||||
true ->
|
||||
case node_call(Type, get_states, [Host, Node]) of
|
||||
{error, _} -> {result, false};
|
||||
{result, []} -> {result, false};
|
||||
{result, []} ->
|
||||
{result, false};
|
||||
{result, States} ->
|
||||
Notify = case ForceNotify of
|
||||
true -> true;
|
||||
_ -> get_option(Options, notify_retract)
|
||||
end,
|
||||
RetractEls = lists:map(
|
||||
fun(ItemId) ->
|
||||
ItemAttrs = case ItemId of
|
||||
"" -> [];
|
||||
_ -> [#xmlattr{name = 'id', value = ItemId}]
|
||||
end,
|
||||
Stanza = #xmlel{ns = ?NS_JABBER_CLIENT, name = 'message', children =
|
||||
[#xmlel{ns = ?NS_PUBSUB_EVENT, name = 'event', children =
|
||||
[#xmlel{ns = ?NS_PUBSUB_EVENT, name = 'items', attrs = [#xmlattr{name = 'node', value = node_to_string(Node)}], children =
|
||||
[#xmlel{ns = ?NS_PUBSUB_EVENT, name = 'retract', attrs = ItemAttrs}]}]}]},
|
||||
case Notify of
|
||||
true ->
|
||||
lists:foreach(
|
||||
fun(#pubsub_state{stateid = {{U, S, R}, _},
|
||||
subscription = Subscription}) ->
|
||||
if (Subscription /= none) and
|
||||
(Subscription /= pending) ->
|
||||
ejabberd_router ! {route, service_jid(Host), exmpp_jid:make_jid(U, S, R), Stanza};
|
||||
true ->
|
||||
ok
|
||||
end
|
||||
end, States),
|
||||
broadcast_by_caps(Host, Node, Type, Stanza),
|
||||
{result, true};
|
||||
false ->
|
||||
{result, false}
|
||||
end
|
||||
end
|
||||
end,
|
||||
transaction(Host, Node, Action, sync_dirty).
|
||||
|
||||
broadcast_purge_node(Host, Node) ->
|
||||
Action =
|
||||
fun(#pubsub_node{options = Options, type = Type}) ->
|
||||
case node_call(Type, get_states, [Host, Node]) of
|
||||
{error, _} -> {result, false};
|
||||
{result, []} -> {result, false};
|
||||
{result, States} ->
|
||||
Stanza = #xmlel{ns = ?NS_JABBER_CLIENT, name = 'message', children =
|
||||
[#xmlel{ns = ?NS_PUBSUB_EVENT, name = 'event', children =
|
||||
[#xmlel{ns = ?NS_PUBSUB_EVENT, name = 'purge', attrs = [#xmlattr{name = 'node', value = node_to_string(Node)}]}]}]},
|
||||
case get_option(Options, notify_retract) of
|
||||
true ->
|
||||
lists:foreach(
|
||||
fun(#pubsub_state{stateid = {{U, S, R},_},
|
||||
subscription = Subscription}) ->
|
||||
if (Subscription /= none) and
|
||||
(Subscription /= pending) ->
|
||||
ejabberd_router ! {route, service_jid(Host), exmpp_jid:make_jid(U, S, R), Stanza};
|
||||
true ->
|
||||
ok
|
||||
end
|
||||
end, States),
|
||||
broadcast_by_caps(Host, Node, Type, Stanza),
|
||||
{result, true};
|
||||
false ->
|
||||
{result, false}
|
||||
end
|
||||
end
|
||||
end,
|
||||
transaction(Host, Node, Action, sync_dirty).
|
||||
|
||||
broadcast_removed_node(Host, Removed) ->
|
||||
lists:foreach(
|
||||
fun(Node) ->
|
||||
Action =
|
||||
fun(#pubsub_node{options = Options, type = Type}) ->
|
||||
Stanza = #xmlel{ns = ?NS_JABBER_CLIENT, name = 'message', children =
|
||||
[#xmlel{ns = ?NS_PUBSUB_EVENT, name = 'event', children =
|
||||
[#xmlel{ns = ?NS_PUBSUB_EVENT, name = 'delete', attrs = [#xmlattr{name = 'node', value = node_to_string(Node)}]}]}]},
|
||||
case get_option(Options, notify_delete) of
|
||||
true ->
|
||||
case node_call(Type, get_states, [Host, Node]) of
|
||||
{result, States} ->
|
||||
lists:foreach(
|
||||
fun(#pubsub_state{stateid = {{U, S, R}, _},
|
||||
subscription = Subscription}) ->
|
||||
if (Subscription /= none) and
|
||||
(Subscription /= pending) ->
|
||||
ejabberd_router ! {route, service_jid(Host), jlib:make_jid(U, S, R), Stanza};
|
||||
true ->
|
||||
ok
|
||||
end
|
||||
end, States),
|
||||
#xmlel{ns = ?NS_PUBSUB_EVENT, name = 'retract', attrs = ItemAttrs}
|
||||
end, ItemIds),
|
||||
Stanza = event_stanza(
|
||||
[#xmlel{ns = ?NS_PUBSUB_EVENT, name = 'items', attrs = [#xmlattr{name = 'node', value = node_to_string(Node)}],
|
||||
children = RetractEls}]),
|
||||
broadcast_stanza(Host, Options, States, Stanza),
|
||||
broadcast_by_caps(Host, Node, Type, Stanza),
|
||||
{result, true};
|
||||
_ ->
|
||||
@ -2312,19 +2211,63 @@ broadcast_removed_node(Host, Removed) ->
|
||||
{result, false}
|
||||
end
|
||||
end,
|
||||
transaction(Host, Node, Action, sync_dirty)
|
||||
end, Removed).
|
||||
transaction(Host, Node, Action, sync_dirty).
|
||||
|
||||
broadcast_purge_node(Host, Node) ->
|
||||
Action =
|
||||
fun(#pubsub_node{options = Options, type = Type}) ->
|
||||
case get_option(Options, notify_retract) of
|
||||
true ->
|
||||
case node_call(Type, get_states, [Host, Node]) of
|
||||
{result, []} ->
|
||||
{result, false};
|
||||
{result, States} ->
|
||||
Stanza = event_stanza(
|
||||
[#xmlel{ns = ?NS_PUBSUB_EVENT, name = 'purge', attrs = [#xmlattr{name = 'node', value = node_to_string(Node)}]}]),
|
||||
broadcast_stanza(Host, Options, States, Stanza),
|
||||
broadcast_by_caps(Host, Node, Type, Stanza),
|
||||
{result, true};
|
||||
_ ->
|
||||
{result, false}
|
||||
end;
|
||||
_ ->
|
||||
{result, false}
|
||||
end
|
||||
end,
|
||||
transaction(Host, Node, Action, sync_dirty).
|
||||
|
||||
broadcast_removed_node(Host, Node) ->
|
||||
Action =
|
||||
fun(#pubsub_node{options = Options, type = Type}) ->
|
||||
case get_option(Options, notify_delete) of
|
||||
true ->
|
||||
case node_call(Type, get_states, [Host, Node]) of
|
||||
{result, []} ->
|
||||
{result, false};
|
||||
{result, States} ->
|
||||
Stanza = event_stanza(
|
||||
[#xmlel{ns = ?NS_PUBSUB_EVENT, name = 'delete', attrs = [#xmlattr{name = 'node', value = node_to_string(Node)}]}]),
|
||||
broadcast_stanza(Host, Options, States, Stanza),
|
||||
broadcast_by_caps(Host, Node, Type, Stanza),
|
||||
{result, true};
|
||||
_ ->
|
||||
{result, false}
|
||||
end;
|
||||
_ ->
|
||||
{result, false}
|
||||
end
|
||||
end,
|
||||
transaction(Host, Node, Action, sync_dirty).
|
||||
|
||||
broadcast_config_notification(Host, Node, Lang) ->
|
||||
Action =
|
||||
fun(#pubsub_node{options = Options, owners = Owners, type = Type}) ->
|
||||
case node_call(Type, get_states, [Host, Node]) of
|
||||
{error, _} -> {result, false};
|
||||
{result, []} -> {result, false};
|
||||
{result, States} ->
|
||||
case get_option(Options, notify_config) of
|
||||
true ->
|
||||
PresenceDelivery = get_option(Options, presence_based_delivery),
|
||||
case node_call(Type, get_states, [Host, Node]) of
|
||||
{result, []} ->
|
||||
{result, false};
|
||||
{result, States} ->
|
||||
Content = case get_option(Options, deliver_payloads) of
|
||||
true ->
|
||||
[#xmlel{ns = ?NS_DATA_FORMS, name = 'x', attrs = [#xmlattr{name = 'type', value = "form"}], children =
|
||||
@ -2332,49 +2275,40 @@ broadcast_config_notification(Host, Node, Lang) ->
|
||||
false ->
|
||||
[]
|
||||
end,
|
||||
Stanza = #xmlel{ns = ?NS_JABBER_CLIENT, name = 'message', children =
|
||||
[#xmlel{ns = ?NS_PUBSUB_EVENT, name = 'event', children =
|
||||
Stanza = event_stanza(
|
||||
[#xmlel{ns = ?NS_PUBSUB_EVENT, name = 'items', attrs = [#xmlattr{name = 'node', value = node_to_string(Node)}], children =
|
||||
[#xmlel{ns = ?NS_PUBSUB_EVENT, name = 'item', attrs = [#xmlattr{name = 'id', value = "configuration"}], children =
|
||||
Content}]}]}]},
|
||||
lists:foreach(
|
||||
fun(#pubsub_state{stateid = {{U, S, R} = LJID, _},
|
||||
subscription = Subscription}) ->
|
||||
case is_to_delivered(LJID, Subscription, PresenceDelivery) of
|
||||
true ->
|
||||
ejabberd_router ! {route, service_jid(Host), exmpp_jid:make_jid(U, S, R), Stanza};
|
||||
false ->
|
||||
ok
|
||||
end
|
||||
end, States),
|
||||
Content}]}]),
|
||||
broadcast_stanza(Host, Options, States, Stanza),
|
||||
broadcast_by_caps(Host, Node, Type, Stanza),
|
||||
{result, true};
|
||||
_ ->
|
||||
{result, false}
|
||||
end
|
||||
end;
|
||||
_ ->
|
||||
{result, false}
|
||||
end
|
||||
end,
|
||||
transaction(Host, Node, Action, sync_dirty).
|
||||
|
||||
%TODO: simplify broadcast_* using a generic function like that:
|
||||
%broadcast(Host, Node, Fun) ->
|
||||
% transaction(fun() ->
|
||||
% case tree_call(Host, get_node, [Host, Node]) of
|
||||
% #pubsub_node{options = Options, owners = Owners, type = Type} ->
|
||||
% case node_call(Type, get_states, [Host, Node]) of
|
||||
% {error, _} -> {result, false};
|
||||
% {result, []} -> {result, false};
|
||||
% {result, States} ->
|
||||
% lists:foreach(fun(#pubsub_state{stateid = {JID,_}, subscription = Subscription}) ->
|
||||
% Fun(Host, Node, Options, Owners, JID, Subscription)
|
||||
% end, States),
|
||||
% {result, true}
|
||||
% end;
|
||||
% Other ->
|
||||
% Other
|
||||
% end
|
||||
% end, sync_dirty).
|
||||
|
||||
broadcast_stanza(Host, NodeOpts, States, Stanza) ->
|
||||
PresenceDelivery = get_option(NodeOpts, presence_based_delivery),
|
||||
BroadcastAll = get_option(NodeOpts, broadcast_all_resources),
|
||||
From = service_jid(Host),
|
||||
lists:foreach(fun(#pubsub_state{stateid = {LJID, _}, subscription = Subs}) ->
|
||||
case is_to_deliver(LJID, Subs, PresenceDelivery) of
|
||||
true ->
|
||||
JIDs = case BroadcastAll of
|
||||
true -> ejabberd_sm:get_user_resources(element(1, LJID), element(2, LJID));
|
||||
false -> [LJID]
|
||||
end,
|
||||
lists:foreach(fun({U, S, R}) ->
|
||||
ejabberd_router ! {route, From, exmpp_jlib:make_jid(U, S, R), Stanza}
|
||||
end, JIDs);
|
||||
false ->
|
||||
ok
|
||||
end
|
||||
end, States).
|
||||
|
||||
%% broadcast Stanza to all contacts of the user that are advertising
|
||||
%% interest in this kind of Node.
|
||||
@ -2724,18 +2658,18 @@ select_type(ServerHost, Host, Node) ->
|
||||
|
||||
features() ->
|
||||
[
|
||||
%"access-authorize", % OPTIONAL
|
||||
%TODO "access-authorize", % OPTIONAL
|
||||
"access-open", % OPTIONAL this relates to access_model option in node_default
|
||||
"access-presence", % OPTIONAL this relates to access_model option in node_pep
|
||||
%"access-roster", % OPTIONAL
|
||||
%"access-whitelist", % OPTIONAL
|
||||
%TODO "access-roster", % OPTIONAL
|
||||
%TODO "access-whitelist", % OPTIONAL
|
||||
% see plugin "auto-create", % OPTIONAL
|
||||
% see plugin "auto-subscribe", % RECOMMENDED
|
||||
"collections", % RECOMMENDED
|
||||
"config-node", % RECOMMENDED
|
||||
"create-and-configure", % RECOMMENDED
|
||||
% see plugin "create-nodes", % RECOMMENDED
|
||||
%TODO "delete-any", % OPTIONAL
|
||||
% see plugin "delete-any", % RECOMMENDED
|
||||
% see plugin "delete-nodes", % RECOMMENDED
|
||||
% see plugin "filtered-notifications", % RECOMMENDED
|
||||
%TODO "get-pending", % OPTIONAL
|
||||
|
||||
@ -160,6 +160,7 @@ features() ->
|
||||
["create-nodes",
|
||||
"auto-create",
|
||||
"delete-nodes",
|
||||
"delete-any",
|
||||
"instant-nodes",
|
||||
"manage-subscriptions",
|
||||
"modify-affiliations",
|
||||
@ -222,8 +223,7 @@ create_node_permission(Host, ServerHost, Node, _ParentNode, Owner, Access) ->
|
||||
%% @doc <p></p>
|
||||
create_node(Host, Node, Owner) ->
|
||||
OwnerKey = jlib:short_prepd_bare_jid(Owner),
|
||||
mnesia:write(#pubsub_state{stateid = {OwnerKey, {Host, Node}},
|
||||
affiliation = owner, subscription = none}),
|
||||
set_state(#pubsub_state{stateid = {OwnerKey, {Host, Node}}, affiliation = owner}),
|
||||
{result, {default, broadcast}}.
|
||||
|
||||
|
||||
@ -236,12 +236,8 @@ delete_node(Host, Removed) ->
|
||||
fun(Node) ->
|
||||
lists:foreach(
|
||||
fun(#pubsub_state{stateid = StateId, items = Items}) ->
|
||||
lists:foreach(
|
||||
fun(ItemId) ->
|
||||
mnesia:delete(
|
||||
{pubsub_item, {ItemId, {Host, Node}}})
|
||||
end, Items),
|
||||
mnesia:delete({pubsub_state, StateId})
|
||||
del_items(Host, Node, Items),
|
||||
del_state(StateId)
|
||||
end,
|
||||
mnesia:match_object(
|
||||
#pubsub_state{stateid = {'_', {Host, Node}}, _ = '_'}))
|
||||
@ -283,13 +279,9 @@ delete_node(Host, Removed) ->
|
||||
%% <p>In the default plugin module, the record is unchanged.</p>
|
||||
subscribe_node(Host, Node, Sender, Subscriber, AccessModel,
|
||||
SendLast, PresenceSubscription, RosterGroup) ->
|
||||
Authorized = (jlib:short_prepd_bare_jid(Sender) == jlib:short_bare_jid(Subscriber)),
|
||||
% TODO add some acl check for Authorized ?
|
||||
State = case get_state(Host, Node, Subscriber) of
|
||||
{error, 'item-not-found'} ->
|
||||
#pubsub_state{stateid = {Subscriber, {Host, Node}}}; % TODO: bug on Key ?
|
||||
{result, S} -> S
|
||||
end,
|
||||
SubscriberKey = jlib:short_prepd_bare_jid(Subscriber),
|
||||
Authorized = (jlib:short_prepd_bare_jid(Sender) == SubscriberKey),
|
||||
State = get_state(Host, Node, SubscriberKey),
|
||||
#pubsub_state{affiliation = Affiliation,
|
||||
subscription = Subscription} = State,
|
||||
if
|
||||
@ -325,7 +317,6 @@ subscribe_node(Host, Node, Sender, Subscriber, AccessModel,
|
||||
if
|
||||
AccessModel == authorize ->
|
||||
pending;
|
||||
%%TODO Affiliation == none -> ?
|
||||
%%NeedConfiguration ->
|
||||
%% unconfigured
|
||||
true ->
|
||||
@ -353,22 +344,9 @@ subscribe_node(Host, Node, Sender, Subscriber, AccessModel,
|
||||
%% Reason = mod_pubsub:stanzaError()
|
||||
%% @doc <p>Unsubscribe the <tt>Subscriber</tt> from the <tt>Node</tt>.</p>
|
||||
unsubscribe_node(Host, Node, Sender, Subscriber, _SubId) ->
|
||||
SenderKey = jlib:short_prepd_jid(Sender),
|
||||
Match = jlib:short_prepd_bare_jid(Sender) == jlib:short_bare_jid(Subscriber),
|
||||
Authorized = case Match of
|
||||
true ->
|
||||
true;
|
||||
false ->
|
||||
case get_state(Host, Node, SenderKey) of % TODO: bug on Key ?
|
||||
{result, #pubsub_state{affiliation=owner}} -> true;
|
||||
_ -> false
|
||||
end
|
||||
end,
|
||||
case get_state(Host, Node, Subscriber) of
|
||||
{error, 'item-not-found'} ->
|
||||
%% Requesting entity is not a subscriber
|
||||
{error, ?ERR_EXTENDED('unexpected-request', "not-subscribed")};
|
||||
{result, State} ->
|
||||
SubscriberKey = jlib:short_prepd_bare_jid(Subscriber),
|
||||
Authorized = (jlib:short_prepd_bare_jid(Sender) == SubscriberKey),
|
||||
State = get_state(Host, Node, SubscriberKey),
|
||||
if
|
||||
%% Entity did not specify SubID
|
||||
%%SubID == "", ?? ->
|
||||
@ -380,7 +358,7 @@ unsubscribe_node(Host, Node, Sender, Subscriber, _SubId) ->
|
||||
State#pubsub_state.subscription == none ->
|
||||
{error, ?ERR_EXTENDED('unexpected-request', "not-subscribed")};
|
||||
%% Requesting entity is prohibited from unsubscribing entity
|
||||
not Authorized ->
|
||||
(not Authorized) and (State#pubsub_state.affiliation =/= owner) ->
|
||||
{error, 'forbidden'};
|
||||
%% Was just subscriber, remove the record
|
||||
State#pubsub_state.affiliation == none ->
|
||||
@ -389,7 +367,6 @@ unsubscribe_node(Host, Node, Sender, Subscriber, _SubId) ->
|
||||
true ->
|
||||
set_state(State#pubsub_state{subscription = none}),
|
||||
{result, default}
|
||||
end
|
||||
end.
|
||||
|
||||
%% @spec (Host, Node, Publisher, PublishModel, MaxItems, ItemId, Payload) ->
|
||||
@ -433,10 +410,7 @@ unsubscribe_node(Host, Node, Sender, Subscriber, _SubId) ->
|
||||
%% <p>In the default plugin module, the record is unchanged.</p>
|
||||
publish_item(Host, Node, Publisher, PublishModel, MaxItems, ItemId, Payload) ->
|
||||
PublisherKey = jlib:short_prepd_bare_jid(Publisher),
|
||||
State = case get_state(Host, Node, PublisherKey) of
|
||||
{error, 'item-not-found'} -> #pubsub_state{stateid={PublisherKey, {Host, Node}}};
|
||||
{result, S} -> S
|
||||
end,
|
||||
State = get_state(Host, Node, PublisherKey),
|
||||
#pubsub_state{affiliation = Affiliation,
|
||||
subscription = Subscription} = State,
|
||||
if
|
||||
@ -448,16 +422,16 @@ publish_item(Host, Node, Publisher, PublishModel, MaxItems, ItemId, Payload) ->
|
||||
%% Entity does not have sufficient privileges to publish to node
|
||||
{error, 'forbidden'};
|
||||
true ->
|
||||
PubId = {PublisherKey, now()},
|
||||
PubId = {PublisherKey, now()}, %% TODO, uses {now(),PublisherKey} for sorting (EJAB-824)
|
||||
%% TODO: check creation, presence, roster (EJAB-663)
|
||||
Item = case get_item(Host, Node, ItemId) of
|
||||
{error, 'item-not-found'} ->
|
||||
{result, OldItem} ->
|
||||
OldItem#pubsub_item{modification = PubId,
|
||||
payload = Payload};
|
||||
_ ->
|
||||
#pubsub_item{itemid = {ItemId, {Host, Node}},
|
||||
creation = PubId,
|
||||
modification = PubId,
|
||||
payload = Payload};
|
||||
{result, OldItem} ->
|
||||
OldItem#pubsub_item{modification = PubId,
|
||||
payload = Payload}
|
||||
end,
|
||||
Items = [ItemId | State#pubsub_state.items--[ItemId]],
|
||||
@ -492,9 +466,7 @@ remove_extra_items(Host, Node, MaxItems, ItemIds) ->
|
||||
NewItems = lists:sublist(ItemIds, MaxItems),
|
||||
OldItems = lists:nthtail(length(NewItems), ItemIds),
|
||||
%% Remove extra items:
|
||||
lists:foreach(fun(ItemId) ->
|
||||
mnesia:delete({pubsub_item, {ItemId, {Host, Node}}})
|
||||
end, OldItems),
|
||||
del_items(Host, Node, OldItems),
|
||||
%% Return the new items list:
|
||||
{result, {NewItems, OldItems}}.
|
||||
|
||||
@ -510,12 +482,7 @@ remove_extra_items(Host, Node, MaxItems, ItemIds) ->
|
||||
%% or a publisher.</p>
|
||||
delete_item(Host, Node, Publisher, ItemId) ->
|
||||
PublisherKey = jlib:short_prepd_bare_jid(Publisher),
|
||||
State = case get_state(Host, Node, PublisherKey) of
|
||||
{error, 'item-not-found'} ->
|
||||
#pubsub_state{stateid = {PublisherKey, {Host, Node}}};
|
||||
{result, S} ->
|
||||
S
|
||||
end,
|
||||
State = get_state(Host, Node, PublisherKey),
|
||||
#pubsub_state{affiliation = Affiliation, items = Items} = State,
|
||||
Allowed = (Affiliation == publisher) orelse (Affiliation == owner)
|
||||
orelse case get_item(Host, Node, ItemId) of
|
||||
@ -529,7 +496,7 @@ delete_item(Host, Node, Publisher, ItemId) ->
|
||||
true ->
|
||||
case get_item(Host, Node, ItemId) of
|
||||
{result, _} ->
|
||||
mnesia:delete({pubsub_item, {ItemId, {Host, Node}}}),
|
||||
del_item(Host, Node, ItemId),
|
||||
NewItems = lists:delete(ItemId, Items),
|
||||
set_state(State#pubsub_state{items = NewItems}),
|
||||
{result, {default, broadcast}};
|
||||
@ -548,16 +515,14 @@ delete_item(Host, Node, Publisher, ItemId) ->
|
||||
purge_node(Host, Node, Owner) ->
|
||||
OwnerKey = jlib:short_prepd_bare_jid(Owner),
|
||||
case get_state(Host, Node, OwnerKey) of
|
||||
{result, #pubsub_state{items = Items, affiliation = owner}} ->
|
||||
#pubsub_state{items = Items, affiliation = owner} ->
|
||||
lists:foreach(fun(ItemId) ->
|
||||
mnesia:delete({pubsub_item, {ItemId, {Host, Node}}})
|
||||
end, Items),
|
||||
{result, {default, broadcast}};
|
||||
{result, _} ->
|
||||
%% Entity is not owner
|
||||
{error, 'forbidden'};
|
||||
_ ->
|
||||
{error, 'item-not-found'}
|
||||
%% Entity is not owner
|
||||
{error, 'forbidden'}
|
||||
end.
|
||||
|
||||
%% @spec (Host, JID) -> [{Node,Affiliation}]
|
||||
@ -573,8 +538,7 @@ purge_node(Host, Node, Owner) ->
|
||||
get_entity_affiliations(Host, Owner) ->
|
||||
OwnerKey = jlib:short_prepd_bare_jid(Owner),
|
||||
States = mnesia:match_object(
|
||||
#pubsub_state{stateid = {OwnerKey, {Host, '_'}},
|
||||
_ = '_'}),
|
||||
#pubsub_state{stateid = {OwnerKey, {Host, '_'}}, _ = '_'}),
|
||||
Tr = fun(#pubsub_state{stateid = {_, {_, N}}, affiliation = A}) ->
|
||||
{N, A}
|
||||
end,
|
||||
@ -582,8 +546,7 @@ get_entity_affiliations(Host, Owner) ->
|
||||
|
||||
get_node_affiliations(Host, Node) ->
|
||||
States = mnesia:match_object(
|
||||
#pubsub_state{stateid = {'_', {Host, Node}},
|
||||
_ = '_'}),
|
||||
#pubsub_state{stateid = {'_', {Host, Node}}, _ = '_'}),
|
||||
Tr = fun(#pubsub_state{stateid = {J, {_, _}}, affiliation = A}) ->
|
||||
{J, A}
|
||||
end,
|
||||
@ -591,22 +554,13 @@ get_node_affiliations(Host, Node) ->
|
||||
|
||||
get_affiliation(Host, Node, Owner) ->
|
||||
OwnerKey = jlib:short_prepd_bare_jid(Owner),
|
||||
Affiliation = case get_state(Host, Node, OwnerKey) of
|
||||
{result, #pubsub_state{affiliation = A}} -> A;
|
||||
_ -> none
|
||||
end,
|
||||
{result, Affiliation}.
|
||||
State = get_state(Host, Node, OwnerKey),
|
||||
{result, State#pubsub_state.affiliation}.
|
||||
|
||||
set_affiliation(Host, Node, Owner, Affiliation) ->
|
||||
OwnerKey = jlib:short_prepd_bare_jid(Owner),
|
||||
Record = case get_state(Host, Node, OwnerKey) of
|
||||
{error, 'item-not-found'} ->
|
||||
#pubsub_state{stateid = {OwnerKey, {Host, Node}},
|
||||
affiliation = Affiliation};
|
||||
{result, State} ->
|
||||
State#pubsub_state{affiliation = Affiliation}
|
||||
end,
|
||||
set_state(Record),
|
||||
State = get_state(Host, Node, OwnerKey),
|
||||
set_state(State#pubsub_state{affiliation = Affiliation}),
|
||||
ok.
|
||||
|
||||
%% @spec (Host, Owner) -> [{Node,Subscription}]
|
||||
@ -623,8 +577,7 @@ set_affiliation(Host, Node, Owner, Affiliation) ->
|
||||
get_entity_subscriptions(Host, Owner) ->
|
||||
OwnerKey = jlib:short_prepd_bare_jid(Owner),
|
||||
States = mnesia:match_object(
|
||||
#pubsub_state{stateid = {OwnerKey, {Host, '_'}},
|
||||
_ = '_'}),
|
||||
#pubsub_state{stateid = {OwnerKey, {Host, '_'}}, _ = '_'}),
|
||||
Tr = fun(#pubsub_state{stateid = {_, {_, N}}, subscription = S}) ->
|
||||
{N, S}
|
||||
end,
|
||||
@ -632,8 +585,7 @@ get_entity_subscriptions(Host, Owner) ->
|
||||
|
||||
get_node_subscriptions(Host, Node) ->
|
||||
States = mnesia:match_object(
|
||||
#pubsub_state{stateid = {'_', {Host, Node}},
|
||||
_ = '_'}),
|
||||
#pubsub_state{stateid = {'_', {Host, Node}}, _ = '_'}),
|
||||
Tr = fun(#pubsub_state{stateid = {J, {_, _}}, subscription = S}) ->
|
||||
{J, S}
|
||||
end,
|
||||
@ -641,22 +593,13 @@ get_node_subscriptions(Host, Node) ->
|
||||
|
||||
get_subscription(Host, Node, Owner) ->
|
||||
OwnerKey = jlib:short_prepd_bare_jid(Owner),
|
||||
Subscription = case get_state(Host, Node, OwnerKey) of
|
||||
{result, #pubsub_state{subscription = S}} -> S;
|
||||
_ -> none
|
||||
end,
|
||||
{result, Subscription}.
|
||||
State = get_state(Host, Node, OwnerKey),
|
||||
{result, State#pubsub_state.subscription}.
|
||||
|
||||
set_subscription(Host, Node, Owner, Subscription) ->
|
||||
OwnerKey = jlib:short_prepd_bare_jid(Owner),
|
||||
Record = case get_state(Host, Node, OwnerKey) of
|
||||
{error, 'item-not-found'} ->
|
||||
#pubsub_state{stateid = {OwnerKey, {Host, Node}},
|
||||
subscription = Subscription};
|
||||
{result, State} ->
|
||||
State#pubsub_state{subscription = Subscription}
|
||||
end,
|
||||
set_state(Record),
|
||||
State = get_state(Host, Node, OwnerKey),
|
||||
set_state(State#pubsub_state{subscription = Subscription}),
|
||||
ok.
|
||||
|
||||
%% @spec (Host, Node) -> [States] | []
|
||||
@ -685,11 +628,10 @@ get_states(Host, Node) ->
|
||||
%% State = mod_pubsub:pubsubItems()
|
||||
%% @doc <p>Returns a state (one state list), given its reference.</p>
|
||||
get_state(Host, Node, JID) ->
|
||||
case mnesia:read({pubsub_state, {JID, {Host, Node}}}) of
|
||||
[State] when is_record(State, pubsub_state) ->
|
||||
{result, State};
|
||||
_ ->
|
||||
{error, 'item-not-found'}
|
||||
StateId = {JID, {Host, Node}},
|
||||
case mnesia:read({pubsub_state, StateId}) of
|
||||
[State] when is_record(State, pubsub_state) -> State
|
||||
_ -> #pubsub_state{stateid=StateId}
|
||||
end.
|
||||
|
||||
%% @spec (State) -> ok | {error, Reason::stanzaError()}
|
||||
@ -700,6 +642,12 @@ set_state(State) when is_record(State, pubsub_state) ->
|
||||
set_state(_) ->
|
||||
{error, 'internal-server-error'}.
|
||||
|
||||
%% @spec (StateId) -> ok | {error, Reason::stanzaError()}
|
||||
%% StateId = mod_pubsub:pubsubStateId()
|
||||
%% @doc <p>Delete a state from database.</p>
|
||||
del_state(StateId) ->
|
||||
mnesia:delete({pubsub_state, StateId}).
|
||||
|
||||
%% @spec (Host, Node) -> [Items] | []
|
||||
%% Host = mod_pubsub:host()
|
||||
%% Node = mod_pubsub:pubsubNode()
|
||||
@ -719,11 +667,9 @@ get_items(Host, Node, _From) ->
|
||||
#pubsub_item{itemid = {'_', {Host, Node}}, _ = '_'}),
|
||||
{result, Items}.
|
||||
get_items(Host, Node, JID, AccessModel, PresenceSubscription, RosterGroup, _SubId) ->
|
||||
{Affiliation, Subscription} =
|
||||
case get_state(Host, Node, jlib:short_prepd_bare_jid(JID)) of
|
||||
{result, #pubsub_state{affiliation = A, subscription = S}} -> {A, S};
|
||||
_ -> {none, none}
|
||||
end,
|
||||
State = get_state(Host, Node, jlib:short_prepd_bare_jid(JID)),
|
||||
#pubsub_state{affiliation = Affiliation,
|
||||
subscription = Subscription} = State,
|
||||
Subscribed = not ((Subscription == none) or (Subscription == pending)),
|
||||
if
|
||||
%%SubID == "", ?? ->
|
||||
@ -771,11 +717,9 @@ get_item(Host, Node, ItemId) ->
|
||||
{error, 'item-not-found'}
|
||||
end.
|
||||
get_item(Host, Node, ItemId, JID, AccessModel, PresenceSubscription, RosterGroup, _SubId) ->
|
||||
{Affiliation, Subscription} =
|
||||
case get_state(Host, Node, jlib:short_prepd_bare_jid(JID)) of
|
||||
{result, #pubsub_state{affiliation = A, subscription = S}} -> {A, S};
|
||||
_ -> {none, none}
|
||||
end,
|
||||
State = get_state(Host, Node, jlib:short_prepd_bare_jid(JID)),
|
||||
#pubsub_state{affiliation = Affiliation,
|
||||
subscription = Subscription} = State,
|
||||
Subscribed = not ((Subscription == none) or (Subscription == pending)),
|
||||
if
|
||||
%%SubID == "", ?? ->
|
||||
@ -817,6 +761,18 @@ set_item(Item) when is_record(Item, pubsub_item) ->
|
||||
set_item(_) ->
|
||||
{error, 'internal-server-error'}.
|
||||
|
||||
%% @spec (ItemId) -> ok | {error, Reason::stanzaError()}
|
||||
%% Host = mod_pubsub:host()
|
||||
%% Node = mod_pubsub:pubsubNode()
|
||||
%% ItemId = string()
|
||||
%% @doc <p>Delete an item from database.</p>
|
||||
del_item(Host, Node, ItemId) ->
|
||||
mnesia:delete({pubsub_item, {ItemId, {Host, Node}}}).
|
||||
del_items(Host, Node, ItemIds) ->
|
||||
lists:foreach(fun(ItemId) ->
|
||||
del_item(Host, Node, ItemId)
|
||||
end, ItemIds).
|
||||
|
||||
%% @doc <p>Return the name of the node if known: Default is to return
|
||||
%% node id.</p>
|
||||
get_item_name(_Host, _Node, Id) ->
|
||||
|
||||
@ -182,14 +182,8 @@ get_affiliation(_Host, Node, Owner) ->
|
||||
|
||||
set_affiliation(_Host, Node, Owner, Affiliation) ->
|
||||
OwnerKey = jlib:short_prepd_bare_jid(Owner),
|
||||
Record = case get_state(OwnerKey, Node, OwnerKey) of
|
||||
{error, 'item-not-found'} ->
|
||||
#pubsub_state{stateid = {OwnerKey, {OwnerKey, Node}},
|
||||
affiliation = Affiliation};
|
||||
{result, State} ->
|
||||
State#pubsub_state{affiliation = Affiliation}
|
||||
end,
|
||||
set_state(Record),
|
||||
State = get_state(OwnerKey, Node, OwnerKey),
|
||||
set_state(State#pubsub_state{affiliation = Affiliation}),
|
||||
ok.
|
||||
|
||||
get_entity_subscriptions(_Host, _Owner) ->
|
||||
|
||||
@ -72,7 +72,7 @@
|
||||
%%% lserver = string(),
|
||||
%%% lresource = string()}.
|
||||
|
||||
%%% @type usr() = {User::string(), Server::string(), Resource::string()}.
|
||||
%%% @type ljid() = {User::string(), Server::string(), Resource::string()}.
|
||||
|
||||
%%% @type affiliation() = none | owner | publisher | outcast.
|
||||
%%% @type subscription() = none | pending | unconfigured | subscribed.
|
||||
@ -81,7 +81,7 @@
|
||||
%%% nodeid = {Host::host(), Node::pubsubNode()},
|
||||
%%% parentid = {Host::host(), Node::pubsubNode()},
|
||||
%%% type = nodeType(),
|
||||
%%% owners = [usr()],
|
||||
%%% owners = [ljid()],
|
||||
%%% options = [nodeOption()]}.
|
||||
%%% <p>This is the format of the <tt>nodes</tt> table. The type of the table
|
||||
%%% is: <tt>set</tt>,<tt>ram/disc</tt>.</p>
|
||||
@ -94,7 +94,7 @@
|
||||
}).
|
||||
|
||||
%%% @type pubsubState() = #pubsub_state{
|
||||
%%% stateid = {jid(), {Host::host(), Node::pubsubNode()}},
|
||||
%%% stateid = {ljid(), {Host::host(), Node::pubsubNode()}},
|
||||
%%% items = [ItemId::string()],
|
||||
%%% affiliation = affiliation(),
|
||||
%%% subscription = subscription()}.
|
||||
@ -108,8 +108,8 @@
|
||||
|
||||
%% @type pubsubItem() = #pubsub_item{
|
||||
%% itemid = {ItemId::string(), {Host::host(),Node::pubsubNode()}},
|
||||
%% creation = {JID::jid(), now()},
|
||||
%% modification = {JID::jid(), now()},
|
||||
%% creation = {ljid(), now()},
|
||||
%% modification = {ljid(), now()},
|
||||
%% payload = XMLContent::string()}.
|
||||
%%% <p>This is the format of the <tt>published items</tt> table. The type of the
|
||||
%%% table is: <tt>set</tt>,<tt>disc</tt>,<tt>fragmented</tt>.</p>
|
||||
|
||||
Loading…
Reference in New Issue
Block a user