annotate src/get_chat.js.luan @ 79:b5a316575e64

reply
author Franklin Schmidt <fschmidt@gmail.com>
date Mon, 10 Mar 2025 21:41:53 -0600
parents a63faf49e1d7
children a47036fd0158
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
7
41d35b72c774 chat page
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
1 local Luan = require "luan:Luan.luan"
41d35b72c774 chat page
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
2 local error = Luan.error
10
f9e6a4cc4f7d add Post
Franklin Schmidt <fschmidt@gmail.com>
parents: 7
diff changeset
3 local ipairs = Luan.ipairs or error()
63
afd5ab5b02a2 file upload
Franklin Schmidt <fschmidt@gmail.com>
parents: 53
diff changeset
4 local String = require "luan:String.luan"
afd5ab5b02a2 file upload
Franklin Schmidt <fschmidt@gmail.com>
parents: 53
diff changeset
5 local digest_message = String.digest_message or error()
7
41d35b72c774 chat page
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
6 local Parsers = require "luan:Parsers.luan"
41d35b72c774 chat page
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
7 local json_string = Parsers.json_string or error()
65
6cfef9850520 people popup
Franklin Schmidt <fschmidt@gmail.com>
parents: 63
diff changeset
8 local Html = require "luan:Html.luan"
6cfef9850520 people popup
Franklin Schmidt <fschmidt@gmail.com>
parents: 63
diff changeset
9 local html_encode = Html.encode or error()
7
41d35b72c774 chat page
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
10 local Io = require "luan:Io.luan"
41d35b72c774 chat page
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
11 local Http = require "luan:http/Http.luan"
41d35b72c774 chat page
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
12 local User = require "site:/lib/User.luan"
41d35b72c774 chat page
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
13 local current_user = User.current or error()
46
42b741a1d5c6 add username
Franklin Schmidt <fschmidt@gmail.com>
parents: 41
diff changeset
14 local get_user_by_id = User.get_by_id or error()
7
41d35b72c774 chat page
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
15 local Chat = require "site:/lib/Chat.luan"
41d35b72c774 chat page
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
16 local get_chat_by_id = Chat.get_by_id or error()
10
f9e6a4cc4f7d add Post
Franklin Schmidt <fschmidt@gmail.com>
parents: 7
diff changeset
17 local Post = require "site:/lib/Post.luan"
f9e6a4cc4f7d add Post
Franklin Schmidt <fschmidt@gmail.com>
parents: 7
diff changeset
18 local post_search = Post.search or error()
12
9f45d32670ae server push
Franklin Schmidt <fschmidt@gmail.com>
parents: 11
diff changeset
19 local Shared = require "site:/lib/Shared.luan"
9f45d32670ae server push
Franklin Schmidt <fschmidt@gmail.com>
parents: 11
diff changeset
20 local post_html = Shared.post_html or error()
27
809193524522 responsive
Franklin Schmidt <fschmidt@gmail.com>
parents: 12
diff changeset
21 local Logging = require "luan:logging/Logging.luan"
809193524522 responsive
Franklin Schmidt <fschmidt@gmail.com>
parents: 12
diff changeset
22 local logger = Logging.logger "get_chat.js"
7
41d35b72c774 chat page
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
23
10
f9e6a4cc4f7d add Post
Franklin Schmidt <fschmidt@gmail.com>
parents: 7
diff changeset
24
63
afd5ab5b02a2 file upload
Franklin Schmidt <fschmidt@gmail.com>
parents: 53
diff changeset
25 local function get_html(user,chat)
53
9298b04607ae add unread
Franklin Schmidt <fschmidt@gmail.com>
parents: 46
diff changeset
26 chat.read(user)
10
f9e6a4cc4f7d add Post
Franklin Schmidt <fschmidt@gmail.com>
parents: 7
diff changeset
27 local posts = post_search( "post_chat_id:"..chat.id, "id" )
7
41d35b72c774 chat page
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
28 %>
10
f9e6a4cc4f7d add Post
Franklin Schmidt <fschmidt@gmail.com>
parents: 7
diff changeset
29 <div top>
27
809193524522 responsive
Franklin Schmidt <fschmidt@gmail.com>
parents: 12
diff changeset
30 <h3>
809193524522 responsive
Franklin Schmidt <fschmidt@gmail.com>
parents: 12
diff changeset
31 <img back onclick="back()" src="/images/arrow_back.svg">
46
42b741a1d5c6 add username
Franklin Schmidt <fschmidt@gmail.com>
parents: 41
diff changeset
32 <span><%
42b741a1d5c6 add username
Franklin Schmidt <fschmidt@gmail.com>
parents: 41
diff changeset
33 local user_id = chat.other_user_id(user.id)
42b741a1d5c6 add username
Franklin Schmidt <fschmidt@gmail.com>
parents: 41
diff changeset
34 local other_user = get_user_by_id(user_id) or error(user_id)
68
Franklin Schmidt <fschmidt@gmail.com>
parents: 65
diff changeset
35 %><%= other_user.name_html() %><span online="<%= other_user.id %>"></span><%
46
42b741a1d5c6 add username
Franklin Schmidt <fschmidt@gmail.com>
parents: 41
diff changeset
36 local voice_url = other_user.voice_url
42b741a1d5c6 add username
Franklin Schmidt <fschmidt@gmail.com>
parents: 41
diff changeset
37 if voice_url ~= nil then
42b741a1d5c6 add username
Franklin Schmidt <fschmidt@gmail.com>
parents: 41
diff changeset
38 %> <a href="<%=voice_url%>" title="Call" target="voice"><img phone src="/images/call.svg"></a><%
42b741a1d5c6 add username
Franklin Schmidt <fschmidt@gmail.com>
parents: 41
diff changeset
39 end
42b741a1d5c6 add username
Franklin Schmidt <fschmidt@gmail.com>
parents: 41
diff changeset
40 %></span>
27
809193524522 responsive
Franklin Schmidt <fschmidt@gmail.com>
parents: 12
diff changeset
41 </h3>
68
Franklin Schmidt <fschmidt@gmail.com>
parents: 65
diff changeset
42 <span pulldown>
Franklin Schmidt <fschmidt@gmail.com>
parents: 65
diff changeset
43 <img onclick="clickMenu(this)" src="/images/menu.svg">
Franklin Schmidt <fschmidt@gmail.com>
parents: 65
diff changeset
44 <div>
Franklin Schmidt <fschmidt@gmail.com>
parents: 65
diff changeset
45 <span onclick="openPeople()">People in Chat</span>
Franklin Schmidt <fschmidt@gmail.com>
parents: 65
diff changeset
46 <span onclick="deleteChat()">Delete Chat</span>
Franklin Schmidt <fschmidt@gmail.com>
parents: 65
diff changeset
47 </div>
Franklin Schmidt <fschmidt@gmail.com>
parents: 65
diff changeset
48 </span>
10
f9e6a4cc4f7d add Post
Franklin Schmidt <fschmidt@gmail.com>
parents: 7
diff changeset
49 </div>
f9e6a4cc4f7d add Post
Franklin Schmidt <fschmidt@gmail.com>
parents: 7
diff changeset
50 <div main>
f9e6a4cc4f7d add Post
Franklin Schmidt <fschmidt@gmail.com>
parents: 7
diff changeset
51 <%
f9e6a4cc4f7d add Post
Franklin Schmidt <fschmidt@gmail.com>
parents: 7
diff changeset
52 for _, post in ipairs(posts) do
f9e6a4cc4f7d add Post
Franklin Schmidt <fschmidt@gmail.com>
parents: 7
diff changeset
53 post_html(post)
f9e6a4cc4f7d add Post
Franklin Schmidt <fschmidt@gmail.com>
parents: 7
diff changeset
54 end
f9e6a4cc4f7d add Post
Franklin Schmidt <fschmidt@gmail.com>
parents: 7
diff changeset
55 %>
f9e6a4cc4f7d add Post
Franklin Schmidt <fschmidt@gmail.com>
parents: 7
diff changeset
56 <div input>
79
Franklin Schmidt <fschmidt@gmail.com>
parents: 73
diff changeset
57 <span textarea>
Franklin Schmidt <fschmidt@gmail.com>
parents: 73
diff changeset
58 <div reply hidden>
Franklin Schmidt <fschmidt@gmail.com>
parents: 73
diff changeset
59 <div reply_top>
Franklin Schmidt <fschmidt@gmail.com>
parents: 73
diff changeset
60 <span>Reply to</span>
Franklin Schmidt <fschmidt@gmail.com>
parents: 73
diff changeset
61 <img src="/images/close.svg" onclick="closeReply()">
Franklin Schmidt <fschmidt@gmail.com>
parents: 73
diff changeset
62 </div>
Franklin Schmidt <fschmidt@gmail.com>
parents: 73
diff changeset
63 <div text></div>
Franklin Schmidt <fschmidt@gmail.com>
parents: 73
diff changeset
64 <div><a when></a></div>
Franklin Schmidt <fschmidt@gmail.com>
parents: 73
diff changeset
65 </div>
Franklin Schmidt <fschmidt@gmail.com>
parents: 73
diff changeset
66 <textarea oninput="fixTextarea(event)" onkeydown="textareaKey(event)"></textarea>
Franklin Schmidt <fschmidt@gmail.com>
parents: 73
diff changeset
67 </span>
63
afd5ab5b02a2 file upload
Franklin Schmidt <fschmidt@gmail.com>
parents: 53
diff changeset
68 <button onclick="uploadFile()" title="Add file"><img src="/images/upload_file.svg"></button>
10
f9e6a4cc4f7d add Post
Franklin Schmidt <fschmidt@gmail.com>
parents: 7
diff changeset
69 <button onclick="addPost()" title="Send"><img src="/images/send.svg"></button>
f9e6a4cc4f7d add Post
Franklin Schmidt <fschmidt@gmail.com>
parents: 7
diff changeset
70 </div>
f9e6a4cc4f7d add Post
Franklin Schmidt <fschmidt@gmail.com>
parents: 7
diff changeset
71 </div>
7
41d35b72c774 chat page
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
72 <%
41d35b72c774 chat page
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
73 end
41d35b72c774 chat page
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
74
65
6cfef9850520 people popup
Franklin Schmidt <fschmidt@gmail.com>
parents: 63
diff changeset
75 local function people(chat)
6cfef9850520 people popup
Franklin Schmidt <fschmidt@gmail.com>
parents: 63
diff changeset
76 for _, user_id in ipairs(chat.user_ids) do
6cfef9850520 people popup
Franklin Schmidt <fschmidt@gmail.com>
parents: 63
diff changeset
77 local user = get_user_by_id(user_id)
6cfef9850520 people popup
Franklin Schmidt <fschmidt@gmail.com>
parents: 63
diff changeset
78 local name = user.name
6cfef9850520 people popup
Franklin Schmidt <fschmidt@gmail.com>
parents: 63
diff changeset
79 local email = user.email
6cfef9850520 people popup
Franklin Schmidt <fschmidt@gmail.com>
parents: 63
diff changeset
80 local voice_url = user.voice_url
73
a63faf49e1d7 last seen
Franklin Schmidt <fschmidt@gmail.com>
parents: 68
diff changeset
81 local voice = voice_url and `%> <a href="<%=voice_url%>" title="Call" target="voice"><img phone src="/images/call.svg"></a><%` or ""
65
6cfef9850520 people popup
Franklin Schmidt <fschmidt@gmail.com>
parents: 63
diff changeset
82 %>
6cfef9850520 people popup
Franklin Schmidt <fschmidt@gmail.com>
parents: 63
diff changeset
83 <p>
6cfef9850520 people popup
Franklin Schmidt <fschmidt@gmail.com>
parents: 63
diff changeset
84 <%
6cfef9850520 people popup
Franklin Schmidt <fschmidt@gmail.com>
parents: 63
diff changeset
85 if name == nil then
6cfef9850520 people popup
Franklin Schmidt <fschmidt@gmail.com>
parents: 63
diff changeset
86 %>
73
a63faf49e1d7 last seen
Franklin Schmidt <fschmidt@gmail.com>
parents: 68
diff changeset
87 <b><%=html_encode(email)%></b><%=voice%><br>
65
6cfef9850520 people popup
Franklin Schmidt <fschmidt@gmail.com>
parents: 63
diff changeset
88 <%
6cfef9850520 people popup
Franklin Schmidt <fschmidt@gmail.com>
parents: 63
diff changeset
89 else
6cfef9850520 people popup
Franklin Schmidt <fschmidt@gmail.com>
parents: 63
diff changeset
90 %>
6cfef9850520 people popup
Franklin Schmidt <fschmidt@gmail.com>
parents: 63
diff changeset
91 <b><%=html_encode(name)%></b><%=voice%><br>
73
a63faf49e1d7 last seen
Franklin Schmidt <fschmidt@gmail.com>
parents: 68
diff changeset
92 <%=html_encode(email)%><br>
65
6cfef9850520 people popup
Franklin Schmidt <fschmidt@gmail.com>
parents: 63
diff changeset
93 <%
6cfef9850520 people popup
Franklin Schmidt <fschmidt@gmail.com>
parents: 63
diff changeset
94 end
6cfef9850520 people popup
Franklin Schmidt <fschmidt@gmail.com>
parents: 63
diff changeset
95 %>
73
a63faf49e1d7 last seen
Franklin Schmidt <fschmidt@gmail.com>
parents: 68
diff changeset
96 <span last_seen="<%=user_id%>"></span>
65
6cfef9850520 people popup
Franklin Schmidt <fschmidt@gmail.com>
parents: 63
diff changeset
97 </p>
6cfef9850520 people popup
Franklin Schmidt <fschmidt@gmail.com>
parents: 63
diff changeset
98 <%
6cfef9850520 people popup
Franklin Schmidt <fschmidt@gmail.com>
parents: 63
diff changeset
99 end
6cfef9850520 people popup
Franklin Schmidt <fschmidt@gmail.com>
parents: 63
diff changeset
100 end
6cfef9850520 people popup
Franklin Schmidt <fschmidt@gmail.com>
parents: 63
diff changeset
101
7
41d35b72c774 chat page
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
102 return function()
63
afd5ab5b02a2 file upload
Franklin Schmidt <fschmidt@gmail.com>
parents: 53
diff changeset
103 local user = current_user() or error()
afd5ab5b02a2 file upload
Franklin Schmidt <fschmidt@gmail.com>
parents: 53
diff changeset
104 local chat = Http.request.parameters.chat or error()
afd5ab5b02a2 file upload
Franklin Schmidt <fschmidt@gmail.com>
parents: 53
diff changeset
105 chat = get_chat_by_id(chat) or error()
afd5ab5b02a2 file upload
Franklin Schmidt <fschmidt@gmail.com>
parents: 53
diff changeset
106 local html = `get_html(user,chat)`
afd5ab5b02a2 file upload
Franklin Schmidt <fschmidt@gmail.com>
parents: 53
diff changeset
107 local digest = digest_message("MD5",user.password..chat.id)
7
41d35b72c774 chat page
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
108 Io.stdout = Http.response.text_writer()
41d35b72c774 chat page
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
109 %>
63
afd5ab5b02a2 file upload
Franklin Schmidt <fschmidt@gmail.com>
parents: 53
diff changeset
110 gotChat(<%=json_string(html)%>);
afd5ab5b02a2 file upload
Franklin Schmidt <fschmidt@gmail.com>
parents: 53
diff changeset
111 filebinUrl = 'https://filebin.net/<%=digest%>/';
65
6cfef9850520 people popup
Franklin Schmidt <fschmidt@gmail.com>
parents: 63
diff changeset
112 document.querySelector('dialog[people] div[people]').innerHTML = <%=json_string(`people(chat)`)%>;
7
41d35b72c774 chat page
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
113 <%
41d35b72c774 chat page
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
114 end