modules/luci-mod-system/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 nu   = require "nixio.util"
  11 local util = require "luci.util"
  12
  13 if fs.access(sysfs_path) then
  14         leds = nu.consume((fs.dir(sysfs_path)))
  15 end
  16
  17 if #leds == 0 then
  18         return m
  19 end
  20
  21
  22 s = m:section(TypedSection, "led", "")
  23 s.anonymous = true
  24 s.addremove = true
  25
  26 function s.parse(self, ...)
  27         TypedSection.parse(self, ...)
  28         os.execute("/etc/init.d/led enable")
  29 end
  30
  31
  32 s:option(Value, "name", translate("Name"))
  33
  34
  35 sysfs = s:option(ListValue, "sysfs", translate("<abbr title=\"Light Emitting Diode\">LED</abbr> Name"))
  36 for k, v in ipairs(leds) do
  37         sysfs:value(v)
  38 end
  39
  40 s:option(Flag, "default", translate("Default state")).rmempty = false
  41
  42
  43 trigger = s:option(ListValue, "trigger", translate("Trigger"))
  44
  45 local triggers = fs.readfile(sysfs_path .. leds[1] .. "/trigger")
  46 for t in triggers:gmatch("[%w-]+") do
  47         if t == "default-on" then
  48                 trigger:value(t, translatef("Always on (%s)", t))
  49         elseif t == "none" then
  50                 trigger:value(t, translatef("Always off (%s)", t))
  51         elseif t == "timer" then
  52                 trigger:value(t, translatef("Custom flash intervall (%s)", t))
  53         elseif t == "netdev" then
  54                 trigger:value(t, translatef("Network device activity (%s)", t))
  55         elseif t == "heartbeat" then
  56                 trigger:value(t, translatef("Heartbeat intervall (%s)", t))
  57         elseif t == "nand-disk" then
  58                 trigger:value(t, translatef("Flashmemory write access (%s)", t))
  59         elseif t == "mtd" then
  60                 trigger:value(t, translatef("Flashmemory write access (%s)", t))
  61         elseif t:match("mmc[0-9]") then
  62                 trigger:value(t, translatef("Flashmemory write access (%s)", t))
  63         elseif t:match("switch[0-9]") then
  64                 trigger:value(t, translatef("Switchport activity (%s)", t))
  65         elseif t:match("phy[0-9]rx") then
  66                 trigger:value(t, translatef("Wi-Fi data reception (%s)", t))
  67         elseif t:match("phy[0-9]tx") then
  68                 trigger:value(t, translatef("Wi-Fi data transmission (%s)", t))
  69         elseif t:match("phy[0-9]assoc") then
  70                 trigger:value(t, translatef("Wi-Fi client association (%s)", t))
  71         elseif t:match("phy[0-9]radio") then
  72                 trigger:value(t, translatef("Wi-Fi on (%s)", t))
  73         elseif t:match("phy[0-9]tpt") then
  74                 trigger:value(t, translatef("Wi-Fi activity (%s)", t))
  75         else
  76                 trigger:value(t, translate(t:gsub("-", "")))
  77         end
  78 end
  79
  80
  81 delayon = s:option(Value, "delayon", translate ("On-State Delay"))
  82 delayon:depends("trigger", "timer")
  83
  84 delayoff = s:option(Value, "delayoff", translate ("Off-State Delay"))
  85 delayoff:depends("trigger", "timer")
  86
  87
  88 dev = s:option(Value, "_net_dev", translate("Device"))
  89 dev.rmempty = true
  90 dev:value("")
  91 dev:depends("trigger", "netdev")
  92
  93 function dev.cfgvalue(self, section)
  94         return m.uci:get("system", section, "dev")
  95 end
  96
  97 function dev.write(self, section, value)
  98         m.uci:set("system", section, "dev", value)
  99 end
 100
 101 function dev.remove(self, section)
 102         local t = trigger:formvalue(section)
 103         if t ~= "netdev" and t ~= "usbdev" then
 104                 m.uci:delete("system", section, "dev")
 105         end
 106 end
 107
 108 for k, v in pairs(luci.sys.net.devices()) do
 109         if v ~= "lo" then
 110                 dev:value(v)
 111         end
 112 end
 113
 114
 115 mode = s:option(MultiValue, "mode", translate("Trigger Mode"))
 116 mode.rmempty = true
 117 mode:depends("trigger", "netdev")
 118 mode:value("link", translate("Link On"))
 119 mode:value("tx", translate("Transmit"))
 120 mode:value("rx", translate("Receive"))
 121
 122
 123 usbdev = s:option(ListValue, "_usb_dev", translate("USB Device"))
 124 usbdev:depends("trigger", "usbdev")
 125 usbdev.rmempty = true
 126 usbdev:value("")
 127
 128 function usbdev.cfgvalue(self, section)
 129         return m.uci:get("system", section, "dev")
 130 end
 131
 132 function usbdev.write(self, section, value)
 133         m.uci:set("system", section, "dev", value)
 134 end
 135
 136 function usbdev.remove(self, section)
 137         local t = trigger:formvalue(section)
 138         if t ~= "netdev" and t ~= "usbdev" then
 139                 m.uci:delete("system", section, "dev")
 140         end
 141 end
 142
 143
 144 usbport = s:option(MultiValue, "port", translate("USB Ports"))
 145 usbport:depends("trigger", "usbport")
 146 usbport.rmempty = true
 147 usbport.widget = "checkbox"
 148 usbport.cast = "table"
 149 usbport.size = 1
 150
 151 function usbport.valuelist(self, section)
 152         local port, ports = nil, {}
 153         for port in util.imatch(m.uci:get("system", section, "port")) do
 154                 local b, n = port:match("^usb(%d+)-port(%d+)$")
 155                 if not (b and n) then
 156                         b, n = port:match("^(%d+)-(%d+)$")
 157                 end
 158                 if b and n then
 159                         ports[#ports+1] = "usb%u-port%u" %{ tonumber(b), tonumber(n) }
 160                 end
 161         end
 162         return ports
 163 end
 164
 165 function usbport.validate(self, value)
 166         return type(value) == "string" and { value } or value
 167 end
 168
 169
 170 for p in nixio.fs.glob("/sys/bus/usb/devices/[0-9]*/manufacturer") do
 171         local id = p:match("%d+-%d+")
 172         local mf = nixio.fs.readfile("/sys/bus/usb/devices/" .. id .. "/manufacturer") or "?"
 173         local pr = nixio.fs.readfile("/sys/bus/usb/devices/" .. id .. "/product")      or "?"
 174         usbdev:value(id, "%s (%s - %s)" %{ id, mf, pr })
 175 end
 176
 177 for p in nixio.fs.glob("/sys/bus/usb/devices/*/usb[0-9]*-port[0-9]*") do
 178         local bus, port = p:match("usb(%d+)-port(%d+)")
 179         if bus and port then
 180                 usbport:value("usb%u-port%u" %{ tonumber(bus), tonumber(port) },
 181                               "Hub %u, Port %u" %{ tonumber(bus), tonumber(port) })
 182         end
 183 end
 184
 185 port_mask = s:option(Value, "port_mask", translate ("Switch Port Mask"))
 186 port_mask:depends("trigger", "switch0")
 187
 188 return m