summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--README.md27
-rw-r--r--modules/mod_csi_on_away.lua29
-rw-r--r--modules/mod_message_fake_id.lua21
3 files changed, 77 insertions, 0 deletions
diff --git a/README.md b/README.md
new file mode 100644
index 0000000..1e5ed23
--- /dev/null
+++ b/README.md
@@ -0,0 +1,27 @@
+My hacks for the [Prosody XMPP server](https://prosody.im/)
+============================================================
+
+Modules
+--------
+
+### `mod_csi_on_away`
+
+This implements CSI for legacy clients that report idleness via 'Away'
+presence.
+
+Just about any old client such as Pidgin can be set to report the user's
+presence as 'Away' after a few minutes of inactivity, or when the
+computer is locked, etc.
+
+With this plugin, these clients will save network traffic and thus power
+when they go 'Away'.
+
+
+### `mod_message_fake_id`
+
+[Monal on iOS](https://monal.im) used to (or still does?) get confused and
+drop messages with the same message ID, or no message ID at all.
+
+To avoid silent message loss at the receiving end when sending
+messages to a Monal user, this plugin generates a random message ID
+(a UUID) for every message stanza.
diff --git a/modules/mod_csi_on_away.lua b/modules/mod_csi_on_away.lua
new file mode 100644
index 0000000..90a76a0
--- /dev/null
+++ b/modules/mod_csi_on_away.lua
@@ -0,0 +1,29 @@
+local st = require "util.stanza";
+
+
+-- Make sure we only load this module when CSI itself is deployed
+module:depends("csi");
+
+
+local function on_presence(event)
+ if not event.origin.username then
+ return nil;
+ end
+
+ local child = event.stanza:get_child("show");
+
+ if child and child:get_text() == "away" then
+ module:log("debug", "User is now away, simulating CSI.");
+ module:fire_event("csi-client-inactive", event);
+ else
+ module:log("debug", "User is no longer away, ending simulated CSI.");
+ module:fire_event("csi-client-active", event);
+ end
+end
+
+
+-- outgoing
+module:hook("pre-presence/bare", on_presence);
+module:hook("pre-presence/full", on_presence);
+module:hook("pre-presence/host", on_presence);
+
diff --git a/modules/mod_message_fake_id.lua b/modules/mod_message_fake_id.lua
new file mode 100644
index 0000000..ed6e2b4
--- /dev/null
+++ b/modules/mod_message_fake_id.lua
@@ -0,0 +1,21 @@
+local st = require "util.stanza";
+local uuid_generate = require "util.uuid".generate;
+
+
+local function on_message(event)
+ if not event.origin.username then
+ return nil;
+ end
+
+ if not event.stanza.attr.id then
+ module:log("debug", "Faking message ID.");
+ event.stanza.attr.id = uuid_generate();
+ end
+end
+
+
+-- outgoing
+module:hook("pre-message/bare", on_message, 5432);
+module:hook("pre-message/full", on_message, 5432);
+module:hook("pre-message/host", on_message, 5432);
+