verse
98fe3ed54639
plugins/receipts.lua

Find changesets by keywords by author, files, the commit message, revision number or hash, or revset expression.

Software / code / verse

Annotate

plugins/receipts.lua @ 463:98fe3ed54639

Update to new tls_builder() API in net.server upstream
author Matthew Wild <mwild1@gmail.com>
date Thu, 16 Mar 2023 16:40:57 +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