Mercurial > prosody-modules
annotate mod_csi_compat/mod_csi_compat.lua @ 4565:3b2ae854842c
mod_muc_bot: Save occupant to room
This has some side-effects:
Firstly, the bot shows up in occupant list, which is nice. Secondly, the
bot starts receiving messages from the room which might be wanted, but
it would be better to join the room for real in this case.
author | Kim Alvefur <zash@zash.se> |
---|---|
date | Sat, 10 Apr 2021 19:23:25 +0200 |
parents | db8b256f51ff |
children |
rev | line source |
---|---|
1486
b3e692ee16b5
mod_csi_compat: Implement the google:queue protocol and map to mod_csi events
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
1 local st = require "util.stanza"; |
b3e692ee16b5
mod_csi_compat: Implement the google:queue protocol and map to mod_csi events
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
2 |
b3e692ee16b5
mod_csi_compat: Implement the google:queue protocol and map to mod_csi events
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
3 module:depends("csi"); |
b3e692ee16b5
mod_csi_compat: Implement the google:queue protocol and map to mod_csi events
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
4 |
b3e692ee16b5
mod_csi_compat: Implement the google:queue protocol and map to mod_csi events
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
5 module:add_feature("google:queue"); |
b3e692ee16b5
mod_csi_compat: Implement the google:queue protocol and map to mod_csi events
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
6 |
b3e692ee16b5
mod_csi_compat: Implement the google:queue protocol and map to mod_csi events
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
7 module:hook("iq-set/self/google:queue:query", function(event) |
b3e692ee16b5
mod_csi_compat: Implement the google:queue protocol and map to mod_csi events
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
8 local origin, stanza = event.origin, event.stanza; |
b3e692ee16b5
mod_csi_compat: Implement the google:queue protocol and map to mod_csi events
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
9 (origin.log or module._log)("debug", "Google queue invoked (CSI compat mode)") |
b3e692ee16b5
mod_csi_compat: Implement the google:queue protocol and map to mod_csi events
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
10 local payload = stanza:get_child("query", "google:queue"); |
b3e692ee16b5
mod_csi_compat: Implement the google:queue protocol and map to mod_csi events
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
11 if payload:get_child("enable") then |
b3e692ee16b5
mod_csi_compat: Implement the google:queue protocol and map to mod_csi events
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
12 module:fire_event("csi-client-inactive", event); |
b3e692ee16b5
mod_csi_compat: Implement the google:queue protocol and map to mod_csi events
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
13 elseif payload:get_child("disable") then |
b3e692ee16b5
mod_csi_compat: Implement the google:queue protocol and map to mod_csi events
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
14 module:fire_event("csi-client-active", event); |
b3e692ee16b5
mod_csi_compat: Implement the google:queue protocol and map to mod_csi events
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
15 end |
b3e692ee16b5
mod_csi_compat: Implement the google:queue protocol and map to mod_csi events
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
16 -- <flush/> is implemented as a noop, any IQ stanza would flush the queue anyways. |
1865
db8b256f51ff
mod_admin_web,mod_carbons,mod_csi_compat,mod_mam_muc,mod_tcpproxy: Explicitly return true
Kim Alvefur <zash@zash.se>
parents:
1486
diff
changeset
|
17 origin.send(st.reply(stanza)); |
db8b256f51ff
mod_admin_web,mod_carbons,mod_csi_compat,mod_mam_muc,mod_tcpproxy: Explicitly return true
Kim Alvefur <zash@zash.se>
parents:
1486
diff
changeset
|
18 return true; |
1486
b3e692ee16b5
mod_csi_compat: Implement the google:queue protocol and map to mod_csi events
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
19 end, 10); |