Annotate

plugins/receipts.lua @ 480:a48a4723aa2a

Add time query plugin
author Matthew Wild <mwild1@gmail.com>
date Fri, 17 Mar 2023 12:30:49 +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