2 files changed, 68 insertions, 0 deletions
diff --git a/applications/luci-app-hd-idle/luasrc/controller/hd_idle.lua b/applications/luci-app-hd-idle/luasrc/controller/hd_idle.lua
new file mode 100644
index 0000000000..a6f4adc382
--- /dev/null
+++ b/applications/luci-app-hd-idle/luasrc/controller/hd_idle.lua
@@ -0,0 +1,27 @@
+--[[
+
+LuCI hd-idle
+(c) 2008 Yanira <forum-2008@email.de>
+
+Licensed under the Apache License, Version 2.0 (the "License");
+you may not use this file except in compliance with the License.
+You may obtain a copy of the License at
+
+        http://www.apache.org/licenses/LICENSE-2.0
+
+$Id$
+
+]]--
+
+module("luci.controller.hd_idle", package.seeall)
+
+function index()
+	if not nixio.fs.access("/etc/config/hd-idle") then
+		return
+	end
+
+	local page
+
+	page = entry({"admin", "services", "hd_idle"}, cbi("hd_idle"), _("hd-idle"), 60)
+	page.dependent = true
+end
diff --git a/applications/luci-app-hd-idle/luasrc/model/cbi/hd_idle.lua b/applications/luci-app-hd-idle/luasrc/model/cbi/hd_idle.lua
new file mode 100644
index 0000000000..0c844ca4e0
--- /dev/null
+++ b/applications/luci-app-hd-idle/luasrc/model/cbi/hd_idle.lua
@@ -0,0 +1,41 @@
+--[[
+
+LuCI hd-idle
+(c) 2008 Yanira <forum-2008@email.de>
+
+Licensed under the Apache License, Version 2.0 (the "License");
+you may not use this file except in compliance with the License.
+You may obtain a copy of the License at
+
+        http://www.apache.org/licenses/LICENSE-2.0
+
+$Id$
+
+]]--
+
+require("nixio.fs")
+
+m = Map("hd-idle", "hd-idle",
+	translate("hd-idle is a utility program for spinning-down external " ..
+		"disks after a period of idle time."))
+
+s = m:section(TypedSection, "hd-idle", translate("Settings"))
+s.anonymous = true
+
+s:option(Flag, "enabled", translate("Enable"))
+
+disk = s:option(Value, "disk", translate("Disk"))
+disk.rmempty = true
+for dev in nixio.fs.glob("/dev/[sh]d[a-z]") do
+	disk:value(nixio.fs.basename(dev))
+end
+
+s:option(Value, "idle_time_interval", translate("Idle-time")).default = 10
+s.rmempty = true
+unit = s:option(ListValue, "idle_time_unit", translate("Idle-time unit"))
+unit.default = "minutes"
+unit:value("minutes", translate("min"))
+unit:value("hours", translate("h"))
+unit.rmempty = true
+
+return m