|
0
|
1 local Luan = require "luan:Luan.luan"
|
|
|
2 local error = Luan.error
|
|
|
3 local ipairs = Luan.ipairs or error()
|
|
1
|
4 local parse = Luan.parse or error()
|
|
|
5 local Io = require "luan:Io.luan"
|
|
|
6 local uri = Io.uri or error()
|
|
3
|
7 local Time = require "luan:Time.luan"
|
|
|
8 local Thread = require "luan:Thread.luan"
|
|
|
9 local thread_run = Thread.run or error()
|
|
12
|
10 local Html = require "luan:Html.luan"
|
|
|
11 local html_encode = Html.encode or error()
|
|
16
|
12 local Http = require "luan:http/Http.luan"
|
|
3
|
13 local Mail = require "luan:mail/Mail.luan"
|
|
2
|
14 local User = require "site:/lib/User.luan"
|
|
|
15 local current_user = User.current or error()
|
|
12
|
16 local get_user_by_id = User.get_by_id or error()
|
|
15
|
17 local Chat = require "site:/lib/Chat.luan"
|
|
|
18 local chat_search = Chat.search or error()
|
|
16
|
19 local Utils = require "site:/lib/Utils.luan"
|
|
|
20 local base_url = Utils.base_url or error()
|
|
45
|
21 local Logging = require "luan:logging/Logging.luan"
|
|
|
22 local logger = Logging.logger "Shared"
|
|
0
|
23
|
|
|
24
|
|
|
25 local Shared = {}
|
|
|
26
|
|
3
|
27 local started = Time.now()
|
|
10
|
28 Shared.started = started
|
|
3
|
29
|
|
45
|
30 local title
|
|
|
31 local domain = Http.domain
|
|
|
32 if domain == "chat.luan.software" then
|
|
|
33 title = "Web Chat"
|
|
|
34 elseif domain == "test.chat.luan.software" then
|
|
|
35 title = "Web Chat test"
|
|
|
36 elseif domain == nil then
|
|
|
37 title = "Web Chat local"
|
|
|
38 else
|
|
|
39 error(domain)
|
|
|
40 end
|
|
|
41 Shared.title = title
|
|
|
42
|
|
0
|
43 function Shared.head()
|
|
|
44 %>
|
|
|
45 <meta name="viewport" content="width=device-width, initial-scale=1">
|
|
45
|
46 <title><%=title%></title>
|
|
0
|
47 <style>
|
|
3
|
48 @import "/site.css?s=<%=started%>";
|
|
0
|
49 </style>
|
|
3
|
50 <script src="/site.js?s=<%=started%>"></script>
|
|
0
|
51 <%
|
|
|
52 end
|
|
|
53
|
|
|
54 local function header(crumbs)
|
|
2
|
55 local user = current_user()
|
|
0
|
56 %>
|
|
|
57 <div header>
|
|
2
|
58 <span>
|
|
|
59 <a href="/">Web Chat</a>
|
|
0
|
60 <% for _, crumb in ipairs(crumbs or {}) do %>
|
|
2
|
61 / <%=crumb%>
|
|
0
|
62 <% end %>
|
|
2
|
63 </span>
|
|
41
|
64 <span right>
|
|
2
|
65 <% if user == nil then %>
|
|
|
66 <a href="/login.html">Login / Register</a>
|
|
41
|
67 <% else
|
|
|
68 local voice_url = user.voice_url
|
|
|
69 if voice_url ~= nil then
|
|
|
70 %>
|
|
|
71 <a href="<%=voice_url%>" title="Call" target="voice"><img phone src="/images/call.svg"></a>
|
|
|
72 <%
|
|
|
73 end
|
|
|
74 %>
|
|
2
|
75 <a href="/account.html"><%= user.email %></a>
|
|
|
76 <% end %>
|
|
|
77 </span>
|
|
0
|
78 </div>
|
|
|
79 <%
|
|
|
80 end
|
|
|
81 Shared.header = header
|
|
|
82
|
|
|
83 function Shared.private_header()
|
|
|
84 header{
|
|
|
85 [[<a href="/private/">private</a>]]
|
|
|
86 [[<a href="/private/tools/">tools</a>]]
|
|
|
87 }
|
|
|
88 end
|
|
|
89
|
|
1
|
90 local config_file = uri("site:/private/local/config.luano")
|
|
|
91 Shared.config_file = config_file
|
|
|
92
|
|
|
93 do
|
|
|
94 if config_file.exists() then
|
|
|
95 Shared.config = parse( config_file.read_text() )
|
|
|
96 else
|
|
|
97 Shared.config = {
|
|
|
98 mail_server = {
|
|
|
99 host = "smtpcorp.com"
|
|
|
100 port = 465
|
|
|
101 username = "xxx"
|
|
|
102 password = "xxx"
|
|
|
103 }
|
|
|
104 }
|
|
|
105 end
|
|
|
106 end
|
|
|
107
|
|
45
|
108 local default_from = title.." <chat@luan.software>"
|
|
|
109 local send_mail0 = Mail.sender(Shared.config.mail_server).send
|
|
|
110 function Shared.send_mail(mail)
|
|
|
111 mail.From = mail.From or default_from
|
|
|
112 send_mail0(mail)
|
|
|
113 end
|
|
3
|
114
|
|
|
115 function Shared.send_mail_async(mail)
|
|
45
|
116 mail.From = mail.From or default_from
|
|
|
117 logger.info(mail.From)
|
|
3
|
118 thread_run( function()
|
|
45
|
119 send_mail0(mail)
|
|
3
|
120 end )
|
|
|
121 end
|
|
|
122
|
|
12
|
123 function Shared.post_html(post)
|
|
22
|
124 local author_id = post.author_id
|
|
|
125 local user = current_user() or error()
|
|
|
126 local author = get_user_by_id(author_id)
|
|
12
|
127 local id = post.id
|
|
|
128 %>
|
|
35
|
129 <div post="<%=id%>" author="<%=author.id%>" fix>
|
|
|
130 <div who>
|
|
12
|
131 <span author><%=author.email%></span>
|
|
34
|
132 <span right>
|
|
35
|
133 <span when><%=post.date%></span>
|
|
|
134 <span pulldown></span>
|
|
34
|
135 </span>
|
|
12
|
136 </div>
|
|
35
|
137 <div text><%= html_encode(post.content) %></div>
|
|
12
|
138 </div>
|
|
|
139 <%
|
|
|
140 end
|
|
|
141
|
|
41
|
142 local function chat_other_users_html(chat,user,show_phone)
|
|
33
|
143 local my_id = user.id
|
|
|
144 local is_first = true
|
|
|
145 for _, user_id in ipairs(chat.user_ids) do
|
|
|
146 if user_id ~= my_id then
|
|
|
147 local other_user = get_user_by_id(user_id) or error()
|
|
|
148 if is_first then
|
|
|
149 is_first = false
|
|
|
150 else
|
|
|
151 %>, <%
|
|
|
152 end
|
|
34
|
153 %><span email><%= other_user.email %></span><span online="<%= other_user.id %>"></span><%
|
|
41
|
154 local voice_url = other_user.voice_url
|
|
|
155 if voice_url ~= nil and show_phone then
|
|
|
156 %> <a href="<%=voice_url%>" title="Call" target="voice"><img phone src="/images/call.svg"></a><%
|
|
|
157 end
|
|
33
|
158 end
|
|
|
159 end
|
|
|
160 end
|
|
|
161 Shared.chat_other_users_html = chat_other_users_html
|
|
|
162
|
|
15
|
163 function Shared.chats_html()
|
|
|
164 local user = current_user() or error()
|
|
|
165 local chats = chat_search( "chat_user_ids:"..user.id, "chat_updated desc" )
|
|
|
166 for _, chat in ipairs(chats) do
|
|
|
167 %>
|
|
41
|
168 <div chat="<%=chat.id%>" onclick="selectChat(this)"><% chat_other_users_html(chat,user,false) %></div>
|
|
15
|
169 <%
|
|
|
170 end
|
|
|
171 end
|
|
|
172
|
|
16
|
173 function Shared.http_push_to_users(user_ids,message)
|
|
|
174 local base = base_url().."/user/"
|
|
|
175 for _, user_id in ipairs(user_ids) do
|
|
|
176 local url = base..user_id
|
|
|
177 Http.push(url,message)
|
|
|
178 end
|
|
|
179 end
|
|
|
180
|
|
0
|
181 return Shared
|
