Annotate

plugins/receipts.lua @ 377:9aa5bce207b2 0.9.1

squishy: Add util.ip, now required by net.dns
author Matthew Wild <mwild1@gmail.com>
date Sat, 09 Jan 2016 10:47:03 +0000
parent 319:12b0e5cc72bf
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
319
12b0e5cc72bf plugins.receipts: XEP-0184 support.
Kim Alvefur <zash@zash.se>
parents:
diff changeset
1 local verse = require"verse";
12b0e5cc72bf plugins.receipts: XEP-0184 support.
Kim Alvefur <zash@zash.se>
parents:
diff changeset
2 local xmlns_receipts = "urn:xmpp:receipts";
12b0e5cc72bf plugins.receipts: XEP-0184 support.
Kim Alvefur <zash@zash.se>
parents:
diff changeset
3
12b0e5cc72bf plugins.receipts: XEP-0184 support.
Kim Alvefur <zash@zash.se>
parents:
diff changeset
4 function verse.plugins.receipts(stream)
12b0e5cc72bf plugins.receipts: XEP-0184 support.
Kim Alvefur <zash@zash.se>
parents:
diff changeset
5 stream:add_plugin("disco");
12b0e5cc72bf plugins.receipts: XEP-0184 support.
Kim Alvefur <zash@zash.se>
parents:
diff changeset
6 local function send_receipt(stanza)
12b0e5cc72bf plugins.receipts: XEP-0184 support.
Kim Alvefur <zash@zash.se>
parents:
diff changeset
7 if stanza:get_child("request", xmlns_receipts) then
12b0e5cc72bf plugins.receipts: XEP-0184 support.
Kim Alvefur <zash@zash.se>
parents:
diff changeset
8 stream:send(verse.reply(stanza)
12b0e5cc72bf plugins.receipts: XEP-0184 support.
Kim Alvefur <zash@zash.se>
parents:
diff changeset
9 :tag("received", { xmlns = xmlns_receipts, id = stanza.attr.id }));
12b0e5cc72bf plugins.receipts: XEP-0184 support.
Kim Alvefur <zash@zash.se>
parents:
diff changeset
10 end
12b0e5cc72bf plugins.receipts: XEP-0184 support.
Kim Alvefur <zash@zash.se>
parents:
diff changeset
11 end
12b0e5cc72bf plugins.receipts: XEP-0184 support.
Kim Alvefur <zash@zash.se>
parents:
diff changeset
12
12b0e5cc72bf plugins.receipts: XEP-0184 support.
Kim Alvefur <zash@zash.se>
parents:
diff changeset
13 stream:add_disco_feature(xmlns_receipts);
12b0e5cc72bf plugins.receipts: XEP-0184 support.
Kim Alvefur <zash@zash.se>
parents:
diff changeset
14 stream:hook("message", send_receipt, 1000);
12b0e5cc72bf plugins.receipts: XEP-0184 support.
Kim Alvefur <zash@zash.se>
parents:
diff changeset
15 end
12b0e5cc72bf plugins.receipts: XEP-0184 support.
Kim Alvefur <zash@zash.se>
parents:
diff changeset
16