Software /
code /
verse
Annotate
plugins/pubsub.lua @ 223:30e66eabffa9
squishy: add vcard, vcard_update, jingle_ibb
author | Kim Alvefur <zash@zash.se> |
---|---|
date | Wed, 02 Nov 2011 01:11:35 +0100 |
parent | 222:3c257afd68e7 |
child | 248:c4b55b0dc6ba |
rev | line source |
---|---|
154
a4dc96890729
plugins.pubsub, squishy: New pubsub plugin (basic)
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
1 local jid_bare = require "util.jid".bare; |
222
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
2 local t_insert = table.insert; |
154
a4dc96890729
plugins.pubsub, squishy: New pubsub plugin (basic)
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
3 |
a4dc96890729
plugins.pubsub, squishy: New pubsub plugin (basic)
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
4 local xmlns_pubsub = "http://jabber.org/protocol/pubsub"; |
222
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
5 local xmlns_pubsub_owner = "http://jabber.org/protocol/pubsub#owner"; |
154
a4dc96890729
plugins.pubsub, squishy: New pubsub plugin (basic)
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
6 local xmlns_pubsub_event = "http://jabber.org/protocol/pubsub#event"; |
a4dc96890729
plugins.pubsub, squishy: New pubsub plugin (basic)
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
7 local xmlns_pubsub_errors = "http://jabber.org/protocol/pubsub#errors"; |
a4dc96890729
plugins.pubsub, squishy: New pubsub plugin (basic)
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
8 |
a4dc96890729
plugins.pubsub, squishy: New pubsub plugin (basic)
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
9 local pubsub = {}; |
a4dc96890729
plugins.pubsub, squishy: New pubsub plugin (basic)
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
10 local pubsub_mt = { __index = pubsub }; |
a4dc96890729
plugins.pubsub, squishy: New pubsub plugin (basic)
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
11 |
a4dc96890729
plugins.pubsub, squishy: New pubsub plugin (basic)
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
12 function verse.plugins.pubsub(stream) |
a4dc96890729
plugins.pubsub, squishy: New pubsub plugin (basic)
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
13 stream.pubsub = setmetatable({ stream = stream }, pubsub_mt); |
159
88cc513e81c8
plugins.pubsub: Fire pubsub/event on incoming pubsub notifications
Matthew Wild <mwild1@gmail.com>
parents:
154
diff
changeset
|
14 stream:hook("message", function (message) |
193
fa6e1e65cb3c
plugins.pubsub: Fix to use :childtags() for iterating through items in a pubsub notification (:matching_tags() was removed from Prosody)
Matthew Wild <mwild1@gmail.com>
parents:
165
diff
changeset
|
15 for pubsub_event in message:childtags("event", xmlns_pubsub_event) do |
159
88cc513e81c8
plugins.pubsub: Fire pubsub/event on incoming pubsub notifications
Matthew Wild <mwild1@gmail.com>
parents:
154
diff
changeset
|
16 local items = pubsub_event:get_child("items"); |
88cc513e81c8
plugins.pubsub: Fire pubsub/event on incoming pubsub notifications
Matthew Wild <mwild1@gmail.com>
parents:
154
diff
changeset
|
17 if items then |
88cc513e81c8
plugins.pubsub: Fire pubsub/event on incoming pubsub notifications
Matthew Wild <mwild1@gmail.com>
parents:
154
diff
changeset
|
18 local node = items.attr.node; |
193
fa6e1e65cb3c
plugins.pubsub: Fix to use :childtags() for iterating through items in a pubsub notification (:matching_tags() was removed from Prosody)
Matthew Wild <mwild1@gmail.com>
parents:
165
diff
changeset
|
19 for item in items:childtags("item") do |
159
88cc513e81c8
plugins.pubsub: Fire pubsub/event on incoming pubsub notifications
Matthew Wild <mwild1@gmail.com>
parents:
154
diff
changeset
|
20 stream:event("pubsub/event", { |
88cc513e81c8
plugins.pubsub: Fire pubsub/event on incoming pubsub notifications
Matthew Wild <mwild1@gmail.com>
parents:
154
diff
changeset
|
21 from = message.attr.from; |
88cc513e81c8
plugins.pubsub: Fire pubsub/event on incoming pubsub notifications
Matthew Wild <mwild1@gmail.com>
parents:
154
diff
changeset
|
22 node = node; |
88cc513e81c8
plugins.pubsub: Fire pubsub/event on incoming pubsub notifications
Matthew Wild <mwild1@gmail.com>
parents:
154
diff
changeset
|
23 item = item; |
88cc513e81c8
plugins.pubsub: Fire pubsub/event on incoming pubsub notifications
Matthew Wild <mwild1@gmail.com>
parents:
154
diff
changeset
|
24 }); |
88cc513e81c8
plugins.pubsub: Fire pubsub/event on incoming pubsub notifications
Matthew Wild <mwild1@gmail.com>
parents:
154
diff
changeset
|
25 end |
88cc513e81c8
plugins.pubsub: Fire pubsub/event on incoming pubsub notifications
Matthew Wild <mwild1@gmail.com>
parents:
154
diff
changeset
|
26 end |
88cc513e81c8
plugins.pubsub: Fire pubsub/event on incoming pubsub notifications
Matthew Wild <mwild1@gmail.com>
parents:
154
diff
changeset
|
27 end |
88cc513e81c8
plugins.pubsub: Fire pubsub/event on incoming pubsub notifications
Matthew Wild <mwild1@gmail.com>
parents:
154
diff
changeset
|
28 end); |
165
8c67ea868c06
plugins.pubsub: Return true to indicate success loading
Matthew Wild <mwild1@gmail.com>
parents:
159
diff
changeset
|
29 return true; |
154
a4dc96890729
plugins.pubsub, squishy: New pubsub plugin (basic)
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
30 end |
a4dc96890729
plugins.pubsub, squishy: New pubsub plugin (basic)
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
31 |
221
efb4f60ba36e
plugins.pubsub: implement node creation
Kim Alvefur <zash@zash.se>
parents:
193
diff
changeset
|
32 function pubsub:create(server, node, callback) |
222
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
33 self.stream:warn("pubsub:create() is deprecated, " |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
34 .."you should use pubsub:service(%q):node(%q):create() instead\n%s", server or "", node, debug.traceback()); |
221
efb4f60ba36e
plugins.pubsub: implement node creation
Kim Alvefur <zash@zash.se>
parents:
193
diff
changeset
|
35 local create = verse.iq({ to = server, type = "set" }) |
efb4f60ba36e
plugins.pubsub: implement node creation
Kim Alvefur <zash@zash.se>
parents:
193
diff
changeset
|
36 :tag("pubsub", { xmlns = xmlns_pubsub }) |
efb4f60ba36e
plugins.pubsub: implement node creation
Kim Alvefur <zash@zash.se>
parents:
193
diff
changeset
|
37 :tag("create", { node = node }):up() |
efb4f60ba36e
plugins.pubsub: implement node creation
Kim Alvefur <zash@zash.se>
parents:
193
diff
changeset
|
38 self.stream:send_iq(create, function (result) |
efb4f60ba36e
plugins.pubsub: implement node creation
Kim Alvefur <zash@zash.se>
parents:
193
diff
changeset
|
39 if callback then |
efb4f60ba36e
plugins.pubsub: implement node creation
Kim Alvefur <zash@zash.se>
parents:
193
diff
changeset
|
40 if result.attr.type == "result" then |
efb4f60ba36e
plugins.pubsub: implement node creation
Kim Alvefur <zash@zash.se>
parents:
193
diff
changeset
|
41 callback(true); |
efb4f60ba36e
plugins.pubsub: implement node creation
Kim Alvefur <zash@zash.se>
parents:
193
diff
changeset
|
42 else |
efb4f60ba36e
plugins.pubsub: implement node creation
Kim Alvefur <zash@zash.se>
parents:
193
diff
changeset
|
43 callback(false, result:get_error()); |
efb4f60ba36e
plugins.pubsub: implement node creation
Kim Alvefur <zash@zash.se>
parents:
193
diff
changeset
|
44 end |
efb4f60ba36e
plugins.pubsub: implement node creation
Kim Alvefur <zash@zash.se>
parents:
193
diff
changeset
|
45 end |
efb4f60ba36e
plugins.pubsub: implement node creation
Kim Alvefur <zash@zash.se>
parents:
193
diff
changeset
|
46 end |
efb4f60ba36e
plugins.pubsub: implement node creation
Kim Alvefur <zash@zash.se>
parents:
193
diff
changeset
|
47 ); |
efb4f60ba36e
plugins.pubsub: implement node creation
Kim Alvefur <zash@zash.se>
parents:
193
diff
changeset
|
48 end |
efb4f60ba36e
plugins.pubsub: implement node creation
Kim Alvefur <zash@zash.se>
parents:
193
diff
changeset
|
49 |
154
a4dc96890729
plugins.pubsub, squishy: New pubsub plugin (basic)
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
50 function pubsub:subscribe(server, node, jid, callback) |
222
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
51 self.stream:warn("pubsub:subscribe() is deprecated, " |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
52 .."you should use pubsub:service(%q):node(%q):subscribe(jid) instead\n%s", server or "", node, debug.traceback()); |
154
a4dc96890729
plugins.pubsub, squishy: New pubsub plugin (basic)
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
53 self.stream:send_iq(verse.iq({ to = server, type = "set" }) |
a4dc96890729
plugins.pubsub, squishy: New pubsub plugin (basic)
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
54 :tag("pubsub", { xmlns = xmlns_pubsub }) |
a4dc96890729
plugins.pubsub, squishy: New pubsub plugin (basic)
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
55 :tag("subscribe", { node = node, jid = jid or jid_bare(self.stream.jid) }) |
a4dc96890729
plugins.pubsub, squishy: New pubsub plugin (basic)
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
56 , function (result) |
a4dc96890729
plugins.pubsub, squishy: New pubsub plugin (basic)
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
57 if callback then |
a4dc96890729
plugins.pubsub, squishy: New pubsub plugin (basic)
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
58 if result.attr.type == "result" then |
a4dc96890729
plugins.pubsub, squishy: New pubsub plugin (basic)
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
59 callback(true); |
a4dc96890729
plugins.pubsub, squishy: New pubsub plugin (basic)
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
60 else |
a4dc96890729
plugins.pubsub, squishy: New pubsub plugin (basic)
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
61 callback(false, result:get_error()); |
a4dc96890729
plugins.pubsub, squishy: New pubsub plugin (basic)
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
62 end |
a4dc96890729
plugins.pubsub, squishy: New pubsub plugin (basic)
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
63 end |
a4dc96890729
plugins.pubsub, squishy: New pubsub plugin (basic)
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
64 end |
a4dc96890729
plugins.pubsub, squishy: New pubsub plugin (basic)
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
65 ); |
a4dc96890729
plugins.pubsub, squishy: New pubsub plugin (basic)
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
66 end |
a4dc96890729
plugins.pubsub, squishy: New pubsub plugin (basic)
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
67 |
a4dc96890729
plugins.pubsub, squishy: New pubsub plugin (basic)
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
68 function pubsub:publish(server, node, id, item, callback) |
222
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
69 self.stream:warn("pubsub:publish() is deprecated, " |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
70 .."you should use pubsub:service(%q):node(%q):publish() instead\n%s", server or "", node, debug.traceback()); |
154
a4dc96890729
plugins.pubsub, squishy: New pubsub plugin (basic)
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
71 self.stream:send_iq(verse.iq({ to = server, type = "set" }) |
a4dc96890729
plugins.pubsub, squishy: New pubsub plugin (basic)
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
72 :tag("pubsub", { xmlns = xmlns_pubsub }) |
a4dc96890729
plugins.pubsub, squishy: New pubsub plugin (basic)
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
73 :tag("publish", { node = node }) |
a4dc96890729
plugins.pubsub, squishy: New pubsub plugin (basic)
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
74 :tag("item", { id = id }) |
a4dc96890729
plugins.pubsub, squishy: New pubsub plugin (basic)
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
75 :add_child(item) |
a4dc96890729
plugins.pubsub, squishy: New pubsub plugin (basic)
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
76 , function (result) |
a4dc96890729
plugins.pubsub, squishy: New pubsub plugin (basic)
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
77 if callback then |
a4dc96890729
plugins.pubsub, squishy: New pubsub plugin (basic)
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
78 if result.attr.type == "result" then |
a4dc96890729
plugins.pubsub, squishy: New pubsub plugin (basic)
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
79 callback(true); |
a4dc96890729
plugins.pubsub, squishy: New pubsub plugin (basic)
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
80 else |
a4dc96890729
plugins.pubsub, squishy: New pubsub plugin (basic)
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
81 callback(false, result:get_error()); |
a4dc96890729
plugins.pubsub, squishy: New pubsub plugin (basic)
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
82 end |
a4dc96890729
plugins.pubsub, squishy: New pubsub plugin (basic)
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
83 end |
a4dc96890729
plugins.pubsub, squishy: New pubsub plugin (basic)
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
84 end |
a4dc96890729
plugins.pubsub, squishy: New pubsub plugin (basic)
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
85 ); |
a4dc96890729
plugins.pubsub, squishy: New pubsub plugin (basic)
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
86 end |
222
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
87 |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
88 -------------------------------------------------------------------------- |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
89 ---------------------New and improved PubSub interface-------------------- |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
90 -------------------------------------------------------------------------- |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
91 |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
92 local pubsub_service = {}; |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
93 local pubsub_service_mt = { __index = pubsub_service }; |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
94 |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
95 -- TODO should the property be named 'jid' instead? |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
96 function pubsub:service(service) |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
97 return setmetatable({ stream = self.stream, service = service }, pubsub_service_mt) |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
98 end |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
99 |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
100 -- Helper function for iq+pubsub tags |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
101 |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
102 local function pubsub_iq(iq_type, to, ns, op, node, jid, item_id) |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
103 local st = verse.iq{ type = iq_type or "get", to = to } |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
104 :tag("pubsub", { xmlns = ns or xmlns_pubsub }) -- ns would be ..#owner |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
105 if op then st:tag(op, { node = node, jid = jid }); end |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
106 if id then st:tag("item", { id = item_id ~= true and item_id or nil }); end |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
107 return st; |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
108 end |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
109 |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
110 -- http://xmpp.org/extensions/xep-0060.html#entity-subscriptions |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
111 function pubsub_service:subscriptions(callback) |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
112 self.stream:send_iq(pubsub_iq(nil, self.service, nil, "subscriptions") |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
113 , callback and function (result) |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
114 if result.attr.type == "result" then |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
115 local ps = result:get_child("pubsub", xmlns_pubsub); |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
116 local subs = ps and ps:get_child("subscriptions"); |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
117 local nodes = {}; |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
118 if subs then |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
119 for sub in subs:childtags("subscription") do |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
120 local node = self:node(sub.attr.node) |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
121 node.subscription = sub; |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
122 t_insert(nodes, node); |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
123 -- FIXME Good enough? |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
124 -- Or how about: |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
125 -- nodes[node] = sub; |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
126 end |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
127 end |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
128 callback(nodes); |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
129 else |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
130 callback(false, result:get_error()); |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
131 end |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
132 end or nil); |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
133 end |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
134 |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
135 -- http://xmpp.org/extensions/xep-0060.html#entity-affiliations |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
136 function pubsub_service:affiliations(callback) |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
137 self.stream:send_iq(pubsub_iq(nil, self.service, nil, "affiliations") |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
138 , callback and function (result) |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
139 if result.attr.type == "result" then |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
140 local ps = result:get_child("pubsub", xmlns_pubsub); |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
141 local affils = ps and ps:get_child("affiliations") or {}; |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
142 local nodes = {}; |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
143 if affils then |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
144 for affil in affils:childtags("affiliation") do |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
145 local node = self:node(affil.attr.node) |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
146 node.affiliation = affil; |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
147 t_insert(nodes, node); |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
148 -- nodes[node] = affil; |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
149 end |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
150 end |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
151 callback(nodes); |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
152 else |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
153 callback(false, result:get_error()); |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
154 end |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
155 end or nil); |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
156 end |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
157 |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
158 -- TODO Listing nodes? It's done with standard disco#items, but should |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
159 -- we have a wrapper here? If so, it could wrap items in pubsub_node objects |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
160 |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
161 --[[ |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
162 function pubsub_service:nodes(callback) |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
163 self.stream:disco_items(...) |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
164 end |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
165 --]] |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
166 |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
167 local pubsub_node = {}; |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
168 local pubsub_node_mt = { __index = pubsub_node }; |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
169 |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
170 function pubsub_service:node(node) |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
171 return setmetatable({ stream = self.stream, service = self.service, node = node }, pubsub_node_mt) |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
172 end |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
173 |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
174 function pubsub_mt:__call(service, node) |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
175 local s = self:service(service); |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
176 return node and s:node(node) or s; |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
177 end |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
178 |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
179 function pubsub_node:hook(callback, prio) |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
180 local function hook(event) |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
181 -- FIXME service == nil would mean anyone, |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
182 -- publishing would be go to your bare jid. |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
183 -- So if you're only interestied in your own |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
184 -- events, hook your own bare jid. |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
185 if (not event.service or event.from == self.service) and event.node == self.node then |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
186 return callback(event) |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
187 end |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
188 end |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
189 self.stream:hook("pubsub/event", hook, prio); |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
190 return hook; |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
191 end |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
192 |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
193 function pubsub_node:unhook(callback) |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
194 self.stream:unhook("pubsub/event", callback); |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
195 end |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
196 |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
197 function pubsub_node:create(config, callback) |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
198 if config ~= nil then |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
199 error("Not implemented yet."); |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
200 else |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
201 self.stream:send_iq(pubsub_iq("set", self.service, nil, "create", self.node), callback); |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
202 end |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
203 end |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
204 |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
205 -- <configure/> and <default/> rolled into one |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
206 function pubsub_node:configure(config, callback) |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
207 if config ~= nil then |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
208 error("Not implemented yet."); |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
209 -- if config == true then |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
210 -- fetch form and pass it to the callback |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
211 -- which would process it and pass it back |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
212 -- and then we submit it |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
213 -- elseif type(config) == "table" then |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
214 -- it's a form or stanza that we submit |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
215 -- end |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
216 -- this would be done for everything that needs a config |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
217 end |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
218 self.stream:send_iq(pubsub_iq("set", self.service, nil, config == nil and "default" or "configure", self.node), callback); |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
219 end |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
220 |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
221 function pubsub_node:publish(id, options, node, callback) |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
222 if options ~= nil then |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
223 error("Node configuration is not implemented yet."); |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
224 end |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
225 self.stream:send_iq(pubsub_iq("set", self.service, nil, "publish", self.node, nil, id) |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
226 :add_child(node) |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
227 , callback); |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
228 end |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
229 |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
230 function pubsub_node:subscribe(jid, options, callback) |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
231 if options ~= nil then |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
232 error("Subscription configuration is not implemented yet."); |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
233 end |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
234 self.stream:send_iq(pubsub_iq("set", self.service, nil, "subscribe", self.node, jid, id) |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
235 , callback); |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
236 end |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
237 |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
238 function pubsub_node:subscription(callback) |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
239 error("Not implemented yet."); |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
240 end |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
241 |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
242 function pubsub_node:affiliation(callback) |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
243 error("Not implemented yet."); |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
244 end |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
245 |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
246 function pubsub_node:unsubscribe(callback) |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
247 error("Not implemented yet."); |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
248 end |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
249 |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
250 function pubsub_node:configure_subscription(options, callback) |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
251 error("Not implemented yet."); |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
252 end |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
253 |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
254 function pubsub_node:items(count, callback) |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
255 error("Not implemented yet."); |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
256 end |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
257 |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
258 function pubsub_node:item(id, callback) |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
259 error("Not implemented yet."); |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
260 end |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
261 |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
262 function pubsub_node:retract(id, callback) |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
263 error("Not implemented yet."); |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
264 end |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
265 |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
266 function pubsub_node:purge(callback) |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
267 error("Not implemented yet."); |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
268 end |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
269 |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
270 function pubsub_node:delete(callback) |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
271 error("Not implemented yet."); |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
272 end |
3c257afd68e7
plugins.pubsub: New, OOP-ish, PubSub interface. Beware of stubs.
Kim Alvefur <zash@zash.se>
parents:
221
diff
changeset
|
273 |