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