Merge pull request #983 from stangri/luci-app-vpnbypass_makefileFix
[project/luci.git] / modules / luci-mod-admin-full / luasrc / model / cbi / admin_system / leds.lua
1 -- Copyright 2008 Steven Barth <steven@midlink.org>
2 -- Licensed to the public under the Apache License 2.0.
3
4 m = Map("system", translate("<abbr title=\"Light Emitting Diode\">LED</abbr> Configuration"), translate("Customizes the behaviour of the device <abbr title=\"Light Emitting Diode\">LED</abbr>s if possible."))
5
6 local sysfs_path = "/sys/class/leds/"
7 local leds = {}
8
9 local fs   = require "nixio.fs"
10 local util = require "nixio.util"
11
12 if fs.access(sysfs_path) then
13         leds = util.consume((fs.dir(sysfs_path)))
14 end
15
16 if #leds == 0 then
17         return m
18 end
19
20
21 s = m:section(TypedSection, "led", "")
22 s.anonymous = true
23 s.addremove = true
24
25 function s.parse(self, ...)
26         TypedSection.parse(self, ...)
27         os.execute("/etc/init.d/led enable")
28 end
29
30
31 s:option(Value, "name", translate("Name"))
32
33
34 sysfs = s:option(ListValue, "sysfs", translate("<abbr title=\"Light Emitting Diode\">LED</abbr> Name"))
35 for k, v in ipairs(leds) do
36         sysfs:value(v)
37 end
38
39 s:option(Flag, "default", translate("Default state")).rmempty = false
40
41
42 trigger = s:option(ListValue, "trigger", translate("Trigger"))
43
44 local triggers = fs.readfile(sysfs_path .. leds[1] .. "/trigger")
45 for t in triggers:gmatch("[%w-]+") do
46         trigger:value(t, translate(t:gsub("-", "")))
47 end
48
49
50 delayon = s:option(Value, "delayon", translate ("On-State Delay"))
51 delayon:depends("trigger", "timer")
52
53 delayoff = s:option(Value, "delayoff", translate ("Off-State Delay"))
54 delayoff:depends("trigger", "timer")
55
56
57 dev = s:option(ListValue, "_net_dev", translate("Device"))
58 dev.rmempty = true
59 dev:value("")
60 dev:depends("trigger", "netdev")
61
62 function dev.cfgvalue(self, section)
63         return m.uci:get("system", section, "dev")
64 end
65
66 function dev.write(self, section, value)
67         m.uci:set("system", section, "dev", value)
68 end
69
70 function dev.remove(self, section)
71         local t = trigger:formvalue(section)
72         if t ~= "netdev" and t ~= "usbdev" then
73                 m.uci:delete("system", section, "dev")
74         end
75 end
76
77 for k, v in pairs(luci.sys.net.devices()) do
78         if v ~= "lo" then
79                 dev:value(v)
80         end
81 end
82
83
84 mode = s:option(MultiValue, "mode", translate("Trigger Mode"))
85 mode.rmempty = true
86 mode:depends("trigger", "netdev")
87 mode:value("link", translate("Link On"))
88 mode:value("tx", translate("Transmit"))
89 mode:value("rx", translate("Receive"))
90
91
92 usbdev = s:option(ListValue, "_usb_dev", translate("USB Device"))
93 usbdev:depends("trigger", "usbdev")
94 usbdev.rmempty = true
95 usbdev:value("")
96
97 function usbdev.cfgvalue(self, section)
98         return m.uci:get("system", section, "dev")
99 end
100
101 function usbdev.write(self, section, value)
102         m.uci:set("system", section, "dev", value)
103 end
104
105 function usbdev.remove(self, section)
106         local t = trigger:formvalue(section)
107         if t ~= "netdev" and t ~= "usbdev" then
108                 m.uci:delete("system", section, "dev")
109         end
110 end
111
112
113 usbport = s:option(MultiValue, "ports", translate("USB Ports"))
114 usbport:depends("trigger", "usbport")
115 usbport.rmempty = true
116 usbport.widget = "checkbox"
117 usbport.size = 1
118
119 for p in nixio.fs.glob("/sys/bus/usb/devices/[0-9]*/manufacturer") do
120         local id = p:match("%d+-%d+")
121         local mf = nixio.fs.readfile("/sys/bus/usb/devices/" .. id .. "/manufacturer") or "?"
122         local pr = nixio.fs.readfile("/sys/bus/usb/devices/" .. id .. "/product")      or "?"
123         usbdev:value(id, "%s (%s - %s)" %{ id, mf, pr })
124 end
125
126 for p in nixio.fs.glob("/sys/bus/usb/devices/[0-9]*") do
127         local bus, port = p:match("(%d+)-(%d+)")
128         if bus and port then
129                 usbport:value("usb%u-port%u" %{ tonumber(bus), tonumber(port) },
130                               "Hub %u, Port %u" %{ tonumber(bus), tonumber(port) })
131         end
132 end
133
134 return m