Software /
code /
prosody
Annotate
plugins/mod_private.lua @ 13262:9a86e7cbdd79
mod_storage_internal: Fix fast trimming of archive with exactly one item
This method would previously never delete the first (and only) item
since it works out which item should become the first item after the
trim operation, which doesn't make sense when all should be removed.
This also works as an optimization for when all the last item should be
trimmed, thus items should be removed.
author | Kim Alvefur <zash@zash.se> |
---|---|
date | Sun, 24 Sep 2023 13:41:54 +0200 |
parent | 12977:74b9e05af71e |
rev | line source |
---|---|
1523
841d61be198f
Remove version number from copyright headers
Matthew Wild <mwild1@gmail.com>
parents:
896
diff
changeset
|
1 -- Prosody IM |
2923
b7049746bd29
Update copyright headers for 2010
Matthew Wild <mwild1@gmail.com>
parents:
1523
diff
changeset
|
2 -- Copyright (C) 2008-2010 Matthew Wild |
b7049746bd29
Update copyright headers for 2010
Matthew Wild <mwild1@gmail.com>
parents:
1523
diff
changeset
|
3 -- Copyright (C) 2008-2010 Waqas Hussain |
5776
bd0ff8ae98a8
Remove all trailing whitespace
Florian Zeitz <florob@babelmonkeys.de>
parents:
5500
diff
changeset
|
4 -- |
758 | 5 -- This project is MIT/X11 licensed. Please see the |
6 -- COPYING file in the source package for more information. | |
519
cccd610a0ef9
Insert copyright/license headers
Matthew Wild <mwild1@gmail.com>
parents:
438
diff
changeset
|
7 -- |
cccd610a0ef9
Insert copyright/license headers
Matthew Wild <mwild1@gmail.com>
parents:
438
diff
changeset
|
8 |
cccd610a0ef9
Insert copyright/license headers
Matthew Wild <mwild1@gmail.com>
parents:
438
diff
changeset
|
9 |
12977
74b9e05af71e
plugins: Prefix module imports with prosody namespace
Kim Alvefur <zash@zash.se>
parents:
9228
diff
changeset
|
10 local st = require "prosody.util.stanza" |
185
a67c88ce1c6a
Added support for XEP-0049: Private XML Storage (mod_private)
Waqas Hussain <waqas20@gmail.com>
parents:
diff
changeset
|
11 |
6343 | 12 local private_storage = module:open_store("private", "map"); |
185
a67c88ce1c6a
Added support for XEP-0049: Private XML Storage (mod_private)
Waqas Hussain <waqas20@gmail.com>
parents:
diff
changeset
|
13 |
541
3521e0851c9e
Change modules to use the new add_feature module API method.
Waqas Hussain <waqas20@gmail.com>
parents:
519
diff
changeset
|
14 module:add_feature("jabber:iq:private"); |
421
63be85693710
Modules now sending disco replies
Waqas Hussain <waqas20@gmail.com>
parents:
310
diff
changeset
|
15 |
3522
4646b5b039ca
mod_private: Updated to use the new events API. Smaller, more robust.
Waqas Hussain <waqas20@gmail.com>
parents:
3114
diff
changeset
|
16 module:hook("iq/self/jabber:iq:private:query", function(event) |
4646b5b039ca
mod_private: Updated to use the new events API. Smaller, more robust.
Waqas Hussain <waqas20@gmail.com>
parents:
3114
diff
changeset
|
17 local origin, stanza = event.origin, event.stanza; |
4646b5b039ca
mod_private: Updated to use the new events API. Smaller, more robust.
Waqas Hussain <waqas20@gmail.com>
parents:
3114
diff
changeset
|
18 local query = stanza.tags[1]; |
6341
ab9a1af80632
mod_private: Cleanup and more tailcalls
Kim Alvefur <zash@zash.se>
parents:
5776
diff
changeset
|
19 if #query.tags ~= 1 then |
6841
be87ab2d611c
plugins: Explicitly return to halt event propagation (session.send sometimes does not return true)
Kim Alvefur <zash@zash.se>
parents:
6353
diff
changeset
|
20 origin.send(st.error_reply(stanza, "modify", "bad-format")); |
be87ab2d611c
plugins: Explicitly return to halt event propagation (session.send sometimes does not return true)
Kim Alvefur <zash@zash.se>
parents:
6353
diff
changeset
|
21 return true; |
6341
ab9a1af80632
mod_private: Cleanup and more tailcalls
Kim Alvefur <zash@zash.se>
parents:
5776
diff
changeset
|
22 end |
ab9a1af80632
mod_private: Cleanup and more tailcalls
Kim Alvefur <zash@zash.se>
parents:
5776
diff
changeset
|
23 local tag = query.tags[1]; |
ab9a1af80632
mod_private: Cleanup and more tailcalls
Kim Alvefur <zash@zash.se>
parents:
5776
diff
changeset
|
24 local key = tag.name..":"..tag.attr.xmlns; |
ab9a1af80632
mod_private: Cleanup and more tailcalls
Kim Alvefur <zash@zash.se>
parents:
5776
diff
changeset
|
25 if stanza.attr.type == "get" then |
6343 | 26 local data, err = private_storage:get(origin.username, key); |
27 if data then | |
6843 | 28 origin.send(st.reply(stanza):query("jabber:iq:private"):add_child(st.deserialize(data))); |
6343 | 29 elseif err then |
6843 | 30 origin.send(st.error_reply(stanza, "wait", "internal-server-error", err)); |
6341
ab9a1af80632
mod_private: Cleanup and more tailcalls
Kim Alvefur <zash@zash.se>
parents:
5776
diff
changeset
|
31 else |
6841
be87ab2d611c
plugins: Explicitly return to halt event propagation (session.send sometimes does not return true)
Kim Alvefur <zash@zash.se>
parents:
6353
diff
changeset
|
32 origin.send(st.reply(stanza):add_child(query)); |
3522
4646b5b039ca
mod_private: Updated to use the new events API. Smaller, more robust.
Waqas Hussain <waqas20@gmail.com>
parents:
3114
diff
changeset
|
33 end |
6843 | 34 return true; |
9228
e2e2aa76ea31
mod_private, mod_vcard: Use the usual comment on non-get received iqs.
Emmanuel Gil Peyrot <linkmauve@linkmauve.fr>
parents:
6843
diff
changeset
|
35 else -- stanza.attr.type == "set" |
6343 | 36 local data; |
37 if #tag ~= 0 then | |
38 data = st.preserialize(tag); | |
185
a67c88ce1c6a
Added support for XEP-0049: Private XML Storage (mod_private)
Waqas Hussain <waqas20@gmail.com>
parents:
diff
changeset
|
39 end |
6341
ab9a1af80632
mod_private: Cleanup and more tailcalls
Kim Alvefur <zash@zash.se>
parents:
5776
diff
changeset
|
40 -- TODO delete datastore if empty |
6343 | 41 local ok, err = private_storage:set(origin.username, key, data); |
6341
ab9a1af80632
mod_private: Cleanup and more tailcalls
Kim Alvefur <zash@zash.se>
parents:
5776
diff
changeset
|
42 if not ok then |
6841
be87ab2d611c
plugins: Explicitly return to halt event propagation (session.send sometimes does not return true)
Kim Alvefur <zash@zash.se>
parents:
6353
diff
changeset
|
43 origin.send(st.error_reply(stanza, "wait", "internal-server-error", err)); |
be87ab2d611c
plugins: Explicitly return to halt event propagation (session.send sometimes does not return true)
Kim Alvefur <zash@zash.se>
parents:
6353
diff
changeset
|
44 return true; |
6341
ab9a1af80632
mod_private: Cleanup and more tailcalls
Kim Alvefur <zash@zash.se>
parents:
5776
diff
changeset
|
45 end |
6841
be87ab2d611c
plugins: Explicitly return to halt event propagation (session.send sometimes does not return true)
Kim Alvefur <zash@zash.se>
parents:
6353
diff
changeset
|
46 origin.send(st.reply(stanza)); |
be87ab2d611c
plugins: Explicitly return to halt event propagation (session.send sometimes does not return true)
Kim Alvefur <zash@zash.se>
parents:
6353
diff
changeset
|
47 return true; |
3522
4646b5b039ca
mod_private: Updated to use the new events API. Smaller, more robust.
Waqas Hussain <waqas20@gmail.com>
parents:
3114
diff
changeset
|
48 end |
4646b5b039ca
mod_private: Updated to use the new events API. Smaller, more robust.
Waqas Hussain <waqas20@gmail.com>
parents:
3114
diff
changeset
|
49 end); |