luci-app-openvpn: properly parse low PIDs
[project/luci.git] / applications / luci-app-openvpn / luasrc / model / cbi / openvpn.lua
1 -- Copyright 2008 Steven Barth <steven@midlink.org>
2 -- Licensed to the public under the Apache License 2.0.
3
4 local fs = require "nixio.fs"
5 local sys = require "luci.sys"
6 local uci = require "luci.model.uci".cursor()
7 local testfullps = luci.sys.exec("ps --help 2>&1 | grep BusyBox") --check which ps do we have
8 local psstring = (string.len(testfullps)>0) and "ps w" or "ps axfw" --set command we use to get pid
9
10 local m = Map("openvpn", translate("OpenVPN"))
11 local s = m:section( TypedSection, "openvpn", translate("OpenVPN instances"), translate("Below is a list of configured OpenVPN instances and their current state") )
12 s.template = "cbi/tblsection"
13 s.template_addremove = "openvpn/cbi-select-input-add"
14 s.addremove = true
15 s.add_select_options = { }
16 s.extedit = luci.dispatcher.build_url(
17 "admin", "services", "openvpn", "basic", "%s"
18 )
19
20 uci:load("openvpn_recipes")
21 uci:foreach( "openvpn_recipes", "openvpn_recipe",
22 function(section)
23 s.add_select_options[section['.name']] =
24 section['_description'] or section['.name']
25 end
26 )
27
28 function s.getPID(section) -- Universal function which returns valid pid # or nil
29 local pid = sys.exec("%s | grep -w '[o]penvpn(%s)'" % { psstring, section })
30 if pid and #pid > 0 then
31 return tonumber(pid:match("^%s*(%d+)"))
32 else
33 return nil
34 end
35 end
36
37 function s.parse(self, section)
38 local recipe = luci.http.formvalue(
39 luci.cbi.CREATE_PREFIX .. self.config .. "." ..
40 self.sectiontype .. ".select"
41 )
42
43 if recipe and not s.add_select_options[recipe] then
44 self.invalid_cts = true
45 else
46 TypedSection.parse( self, section )
47 end
48 end
49
50 function s.create(self, name)
51 local recipe = luci.http.formvalue(
52 luci.cbi.CREATE_PREFIX .. self.config .. "." ..
53 self.sectiontype .. ".select"
54 )
55 name = luci.http.formvalue(
56 luci.cbi.CREATE_PREFIX .. self.config .. "." ..
57 self.sectiontype .. ".text"
58 )
59 if string.len(name)>3 and not name:match("[^a-zA-Z0-9_]") then
60 uci:section(
61 "openvpn", "openvpn", name,
62 uci:get_all( "openvpn_recipes", recipe )
63 )
64
65 uci:delete("openvpn", name, "_role")
66 uci:delete("openvpn", name, "_description")
67 uci:save("openvpn")
68
69 luci.http.redirect( self.extedit:format(name) )
70 else
71 self.invalid_cts = true
72 end
73 end
74
75
76 s:option( Flag, "enabled", translate("Enabled") )
77
78 local active = s:option( DummyValue, "_active", translate("Started") )
79 function active.cfgvalue(self, section)
80 local pid = s.getPID(section)
81 if pid ~= nil then
82 return (sys.process.signal(pid, 0))
83 and translatef("yes (%i)", pid)
84 or translate("no")
85 end
86 return translate("no")
87 end
88
89 local updown = s:option( Button, "_updown", translate("Start/Stop") )
90 updown._state = false
91 updown.redirect = luci.dispatcher.build_url(
92 "admin", "services", "openvpn"
93 )
94 function updown.cbid(self, section)
95 local pid = s.getPID(section)
96 self._state = pid ~= nil and sys.process.signal(pid, 0)
97 self.option = self._state and "stop" or "start"
98 return AbstractValue.cbid(self, section)
99 end
100 function updown.cfgvalue(self, section)
101 self.title = self._state and "stop" or "start"
102 self.inputstyle = self._state and "reset" or "reload"
103 end
104 function updown.write(self, section, value)
105 if self.option == "stop" then
106 local pid = s.getPID(section)
107 if pid ~= nil then
108 sys.process.signal(pid,15)
109 end
110 else
111 luci.sys.call("/etc/init.d/openvpn start %s" % section)
112 end
113 luci.http.redirect( self.redirect )
114 end
115
116
117 local port = s:option( DummyValue, "port", translate("Port") )
118 function port.cfgvalue(self, section)
119 local val = AbstractValue.cfgvalue(self, section)
120 return val or "1194"
121 end
122
123 local proto = s:option( DummyValue, "proto", translate("Protocol") )
124 function proto.cfgvalue(self, section)
125 local val = AbstractValue.cfgvalue(self, section)
126 return val or "udp"
127 end
128
129
130 return m