luci-minidlna: fix status display
[project/luci.git] / applications / luci-minidlna / luasrc / controller / minidlna.lua
index 3444a3d..606cf6d 100644 (file)
@@ -22,6 +22,36 @@ function index()
        local page
 
        page = entry({"admin", "services", "minidlna"}, cbi("minidlna"), _("miniDLNA"))
        local page
 
        page = entry({"admin", "services", "minidlna"}, cbi("minidlna"), _("miniDLNA"))
-       page.i18n = "minidlna"
        page.dependent = true
        page.dependent = true
+
+       entry({"admin", "services", "minidlna_status"}, call("minidlna_status"))
+end
+
+function minidlna_status()
+       local sys  = require "luci.sys"
+       local uci  = require "luci.model.uci".cursor()
+       local port = tonumber(uci:get_first("minidlna", "minidlna", "port"))
+
+       local status = {
+               running = (sys.call("pidof minidlna >/dev/null") == 0),
+               audio   = 0,
+               video   = 0,
+               image   = 0
+       }
+
+       if status.running then
+               local fd = sys.httpget("http://127.0.0.1:%d/" % (port or 8200), true)
+               if fd then
+                       local html = fd:read("*a")
+                       if html then
+                               status.audio = (tonumber(html:match("Audio files</td><td>(%d+)")) or 0)
+                               status.video = (tonumber(html:match("Video files</td><td>(%d+)")) or 0)
+                               status.image = (tonumber(html:match("Image files</td><td>(%d+)")) or 0)
+                       end
+                       fd:close()
+               end
+       end
+
+       luci.http.prepare_content("application/json")
+       luci.http.write_json(status)
 end
 end