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