650ff6356e457a79a2abbf10a2155ad69dca3b41
[project/luci.git] / applications / luci-app-shadowsocks-libev / luasrc / model / shadowsocks-libev.lua
1 -- Copyright 2017 Yousong Zhou <yszhou4tech@gmail.com>
2 -- Licensed to the public under the Apache License 2.0.
3
4 local _up = getfenv(3)
5 local ut = require("luci.util")
6 local ds = require("luci.dispatcher")
7 local nw = require("luci.model.network")
8 nw.init()
9 module("luci.model.shadowsocks-libev", function(m)
10         setmetatable(m, {__index=function (self, k)
11                 local tb = _up
12                 return rawget(self, k) or _up[k]
13         end})
14 end)
15
16 function values_actions(o)
17         o:value("bypass")
18         o:value("forward")
19         if o.option ~= "dst_default" then
20                 o:value("checkdst")
21         end
22 end
23
24 function values_redir(o, xmode)
25         o.map.uci.foreach("shadowsocks-libev", "ss_redir", function(sdata)
26                 local sname = sdata[".name"]
27                 local mode = sdata["mode"] or "tcp_only"
28                 if mode and mode:find(xmode) then
29                         local desc = "%s - %s" % {sname, mode}
30                         o:value(sname, desc)
31                 end
32         end)
33 end
34
35 function values_serverlist(o)
36         o.map.uci.foreach("shadowsocks-libev", "server", function(sdata)
37                 local sname = sdata[".name"]
38                 local server = sdata["server"]
39                 local server_port = sdata["server_port"]
40                 if server and server_port then
41                         local desc = "%s - %s:%s" % {sname, sdata["server"], sdata["server_port"]}
42                         o:value(sname, desc)
43                 end
44         end)
45 end
46
47 function values_ipaddr(o)
48         for _, v in ipairs(nw:get_interfaces()) do
49                 for _, a in ipairs(v:ipaddrs()) do
50                         o:value(a:host():string(), '%s (%s)' %{ a:host(), v:shortname() })
51                 end
52         end
53 end
54
55 function values_ifnames(o)
56         for _, v in ipairs(nw:get_interfaces()) do
57                 if v.dev then
58                         o:value(v.dev.name)
59                 end
60         end
61 end
62
63 function options_client(s, tab)
64         local o
65
66         o = s:taboption(tab, ListValue, "server", translate("Remote server"))
67         values_serverlist(o)
68         o = s:taboption(tab, Value, "local_address", translate("Local address"))
69         o.datatype = "ipaddr"
70         o.placeholder = "0.0.0.0"
71         values_ipaddr(o)
72         o = s:taboption(tab, Value, "local_port", translate("Local port"))
73         o.datatype = "port"
74 end
75
76 function options_server(s, tab)
77         local o
78         local optfunc
79
80         if tab == nil then
81                 optfunc = function(...) return s:option(...) end
82         else
83                 optfunc = function(...) return s:taboption(tab, ...) end
84         end
85
86         o = optfunc(Value, "server", translate("Server"))
87         o.datatype = "host"
88         o.size = 16
89         o = optfunc(Value, "server_port", translate("Server port"))
90         o.datatype = "port"
91         o.size = 5
92         o = optfunc(ListValue, "method", translate("Method"))
93         for _, m in ipairs(methods) do
94                 o:value(m)
95         end
96         o = optfunc(Value, "key", translate("Key (base64 encoding)"))
97         o.datatype = "base64"
98         o.password = true
99         o.size = 12
100         o = optfunc(Value, "password", translate("Password"))
101         o.password = true
102         o.size = 12
103 end
104
105 function options_common(s, tab)
106         local o
107
108         o = s:taboption(tab, ListValue, "mode", translate("Mode of operation"))
109         for _, m in ipairs(modes) do
110                 o:value(m)
111         end
112         o.default = "tcp_and_udp"
113         o = s:taboption(tab, Value, "mtu", translate("MTU"))
114         o.datatype = "uinteger"
115         o = s:taboption(tab, Value, "timeout", translate("Timeout (sec)"))
116         o.datatype = "uinteger"
117         s:taboption(tab, Value, "user", translate("Run as"))
118
119         s:taboption(tab, Flag, "verbose", translate("Verbose"))
120         s:taboption(tab, Flag, "ipv6_first", translate("IPv6 First"), translate("Prefer IPv6 addresses when resolving names"))
121         s:taboption(tab, Flag, "fast_open", translate("Enable TCP Fast Open"))
122         s:taboption(tab, Flag, "reuse_port", translate("Enable SO_REUSEPORT"))
123 end
124
125 function ucival_to_bool(val)
126         return val == "true" or val == "1" or val == "yes" or val == "on"
127 end
128
129 function cfgvalue_overview(sdata)
130         local stype = sdata[".type"]
131         local lines  = {}
132
133         if stype == "ss_server" then
134                 cfgvalue_overview_(sdata, lines, names_options_server)
135                 cfgvalue_overview_(sdata, lines, names_options_common)
136                 cfgvalue_overview_(sdata, lines, {
137                         "bind_address",
138                         "manager_address",
139                 })
140         elseif stype == "ss_local" or stype == "ss_redir" or stype == "ss_tunnel" then
141                 cfgvalue_overview_(sdata, lines, names_options_client)
142                 if stype == "ss_tunnel" then
143                         cfgvalue_overview_(sdata, lines, {"tunnel_address"})
144                 elseif stype == "ss_redir" then
145                         cfgvalue_overview_(sdata, lines, {"disable_sni"})
146                 end
147                 cfgvalue_overview_(sdata, lines, names_options_common)
148         else
149                 return nil, nil
150         end
151         local sname = sdata[".name"]
152         local key = "%s.%s" % {stype, sname}
153         local value = {
154                 [".name"] = sname,
155                 name = '%s.<var>%s</var>' % {stype, sname},
156                 overview = table.concat(lines, "</br>"),
157                 disabled = ucival_to_bool(sdata["disabled"]),
158         }
159         return key, value
160 end
161
162 function cfgvalue_overview_(sdata, lines, names)
163         local line
164
165         for _, n in ipairs(names) do
166                 local v = sdata[n]
167                 if v ~= nil then
168                         if n == "key" or n == "password" then
169                                 v = translate("<hidden>")
170                         end
171                         local fv = "<var>%s</var>" % ut.pcdata(v)
172                         if sdata[".type"] ~= "ss_server" and n == "server" then
173                                 fv = '<a class="label" href="%s">%s</a>' % {
174                                         ds.build_url("admin/services/shadowsocks-libev/servers", v), fv}
175                         end
176                         line = n .. ": " .. fv
177                         table.insert(lines, line)
178                 end
179         end
180 end
181
182 function option_install_package(s, tab)
183         local bin = s.sectiontype:gsub("_", "-", 1)
184         local installed = nixio.fs.access("/usr/bin/" .. bin)
185         if installed then
186                 return
187         end
188         local opkg_package = "shadowsocks-libev-" .. bin
189         local p_install
190         if tab then
191                 p_install = s:taboption(tab, Button, "_install")
192         else
193                 p_install = s:option(Button, "_install")
194         end
195         p_install.title      = translate("Package is not installed")
196         p_install.inputtitle = translate("Install package %q" % opkg_package)
197         p_install.inputstyle = "apply"
198
199         function p_install.write()
200                 return luci.http.redirect(
201                         luci.dispatcher.build_url("admin/system/packages") ..
202                         "?submit=1&install=%s" % opkg_package
203                 )
204         end
205 end
206
207 names_options_server = {
208         "server",
209         "server_port",
210         "method",
211         "key",
212         "password",
213 }
214
215 names_options_client = {
216         "server",
217         "local_address",
218         "local_port",
219 }
220
221 names_options_common = {
222         "verbose",
223         "ipv6_first",
224         "fast_open",
225         "reuse_port",
226         "mode",
227         "mtu",
228         "timeout",
229         "user",
230 }
231
232 modes = {
233         "tcp_only",
234         "tcp_and_udp",
235         "udp_only",
236 }
237
238 methods = {
239         -- aead
240         "aes-128-gcm",
241         "aes-192-gcm",
242         "aes-256-gcm",
243         "chacha20-ietf-poly1305",
244         "xchacha20-ietf-poly1305",
245         -- stream
246         "table",
247         "rc4",
248         "rc4-md5",
249         "aes-128-cfb",
250         "aes-192-cfb",
251         "aes-256-cfb",
252         "aes-128-ctr",
253         "aes-192-ctr",
254         "aes-256-ctr",
255         "bf-cfb",
256         "camellia-128-cfb",
257         "camellia-192-cfb",
258         "camellia-256-cfb",
259         "salsa20",
260         "chacha20",
261         "chacha20-ietf",
262 }