Mercurial Hosting > chat
diff src/delete_old.js.luan @ 107:ed1418c95488
delete old messages
author | Franklin Schmidt <fschmidt@gmail.com> |
---|---|
date | Wed, 03 Sep 2025 12:36:57 -0600 |
parents | |
children |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/src/delete_old.js.luan Wed Sep 03 12:36:57 2025 -0600 @@ -0,0 +1,36 @@ +local Luan = require "luan:Luan.luan" +local error = Luan.error +local range = Luan.range or error() +local Io = require "luan:Io.luan" +local Http = require "luan:http/Http.luan" +local User = require "site:/lib/User.luan" +local current_user = User.current or error() +local Chat = require "site:/lib/Chat.luan" +local get_chat_by_id = Chat.get_by_id or error() +local Shared = require "site:/lib/Shared.luan" +local http_push_to_users = Shared.http_push_to_users or error() +local Utils = require "site:/lib/Utils.luan" +local is_in_list = Utils.is_in_list or error() +local Post = require "site:/lib/Post.luan" +local post_search = Post.search or error() +local Logging = require "luan:logging/Logging.luan" +local logger = Logging.logger "delete_old.js" + + +local function delete_old(chat) + local posts = post_search( "post_chat_id:"..chat.id, "id" ) + for i in range( 1, #posts // 2 ) do + posts[i].delete() + end +end + +return function() + local chat = Http.request.parameters.chat or error() + chat = get_chat_by_id(chat) or error() + local user_ids = chat.user_ids + local user = current_user() or error() + is_in_list( user.id, user_ids ) or error() + delete_old(chat) + local js = "location.reload()" + chat.http_push(js) +end