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