OpenWrt luci添加上传下载及网络摄像头功能。花了几天时间给OpenWrt弄了个上传下载及网络摄像头功能。对lua及luci不熟，时间花的有点多。此软件包是纯luci应用，可以安装在任意平台，网络摄像头要依赖mjpg-streamer。效果图如下：![1.png][1]![2.jpg][2]主要源码如下：controller/updownload.lua文件：    --[[    Other module    Description: File upload / download, web camera    Author: yuleniwo  xzm2@qq.com  QQ:529698939    ]]--        module("luci.controller.other", package.seeall)        function index()    local page = entry({"admin", "system", "other"}, alias("admin", "system", "other", "updownload"), _("Other"), 89)    entry({"admin", "system", "other", "updownload"}, form("updownload"), _("Upload / Download"))    if nixio.fs.access("/etc/config/mjpg-streamer") then    entry({"admin", "system", "other", "webcam"}, call("Webcam"), _("Web Camera"))    end    page.i18n = "other"    page.dependent = true    end        local translate = luci.i18n.translate    local http = luci.http        function Webcam()    local iframe = ''    local html, msg, status    local act = http.formvalue("act")    if act then    if act == "start" then    luci.sys.call("/etc/init.d/mjpg-streamer start")    elseif act == "stop" then    luci.sys.call("/etc/init.d/mjpg-streamer stop")    luci.sys.call("sleep 1")    end    end    local v = nixio.fs.glob("/dev/video[0-9]")()    if v then    if luci.sys.call("pidof mjpg_streamer > /dev/null") == 0 then    local uci, user, pwd, ip, port    uci = require "luci.model.uci".cursor()    user = uci:get("mjpg-streamer", "core", "username")    pwd = uci:get("mjpg-streamer", "core", "password")    ip = uci:get("network", "lan", "ipaddr")    port = uci:get("mjpg-streamer", "core", "port")    html = string.format(iframe, user, pwd, ip, port)    status = true    else    status = false    msg = translate("Service 'mjpg_streamer' not started.")    end    else    msg = translate("Video device not found.")    end    luci.template.render("webcam", {html = html, msg = msg, status = status})    endmodel/cbi/updownload.lua文件：    local fs = require "luci.fs"    local http = luci.http        ful = SimpleForm("upload", translate("Upload"), nil)    ful.reset = false    ful.submit = false        sul = ful:section(SimpleSection, "", translate("Upload file to '/tmp/upload/'"))    fu = sul:option(FileUpload, "")    fu.template = "cbi/other_upload"    um = sul:option(DummyValue, "", nil)    um.template = "cbi/other_dvalue"        fdl = SimpleForm("download", translate("Download"), nil)    fdl.reset = false    fdl.submit = false    sdl = fdl:section(SimpleSection, "", translate("Download file"))    fd = sdl:option(FileUpload, "")    fd.template = "cbi/other_download"    dm = sdl:option(DummyValue, "", nil)    dm.template = "cbi/other_dvalue"        function Download()    local sPath, sFile, fd, block    sPath = http.formvalue("dlfile")    sFile = nixio.fs.basename(sPath)    if luci.fs.isdirectory(sPath) then    fd = io.popen('tar -C "%s" -cz .' % {sPath}, "r")    sFile = sFile .. ".tar.gz"    else    fd = nixio.open(sPath, "r")    end    if not fd then    dm.value = translate("Couldn't open file: ") .. sPath    return    end    dm.value = nil    http.header('Content-Disposition', 'attachment; filename="%s"' % {sFile})    http.prepare_content("application/octet-stream")    while true do    block = fd:read(nixio.const.buffersize)    if (not block) or (#block ==0) then    break    else    http.write(block)    end    end    fd:close()    http.close()    end        local dir, fd    dir = "/tmp/upload/"    nixio.fs.mkdir(dir)    http.setfilehandler(    function(meta, chunk, eof)    if not fd then    if not meta then return end    fd = nixio.open(dir .. meta.file, "w")    if not fd then    um.value = translate("Create upload file error.")    return    end    end    if chunk and fd then    fd:write(chunk)    end    if eof and fd then    fd:close()    fd = nil    um.value = translate("File saved to") .. ' "/tmp/upload/' .. meta.file .. '"'    end    end    )        if luci.http.formvalue("upload") then    local f = luci.http.formvalue("ulfile")    if #f <= 0 then    um.value = translate("No specify upload file.")    end    elseif luci.http.formvalue("download") then    Download()    end        local inits, attr = {}    for i, f in ipairs(fs.glob("/tmp/upload/*")) do    attr = fs.stat(f)    if attr then    inits[i] = {}    inits[i].name = fs.basename(f)    inits[i].mtime = os.date("%Y-%m-%d %H:%M:%S", attr.mtime)    inits[i].modestr = attr.modestr    inits[i].size = tostring(attr.size)    inits[i].remove = 0    inits[i].install = false    end    end        form = SimpleForm("filelist", translate("Upload file list"), nil)    form.reset = false    form.submit = false        tb = form:section(Table, inits)    nm = tb:option(DummyValue, "name", translate("File name"))    mt = tb:option(DummyValue, "mtime", translate("Modify time"))    ms = tb:option(DummyValue, "modestr", translate("Mode string"))    sz = tb:option(DummyValue, "size", translate("Size"))    btnrm = tb:option(Button, "remove", translate("Remove"))    btnrm.render = function(self, section, scope)    self.inputstyle = "remove"    Button.render(self, section, scope)    end        btnrm.write = function(self, section)    local v = luci.fs.unlink("/tmp/upload/" .. luci.fs.basename(inits[section].name))    if v then table.remove(inits, section) end    return v    end        function IsIpkFile(name)    name = name or ""    local ext = string.lower(string.sub(name, -4, -1))    return ext == ".ipk"    end        btnis = tb:option(Button, "install", translate("Install"))    btnis.template = "cbi/other_button"    btnis.render = function(self, section, scope)    if not inits[section] then return false end    if IsIpkFile(inits[section].name) then    scope.display = ""    else    scope.display = "none"    end    self.inputstyle = "apply"    Button.render(self, section, scope)    end        btnis.write = function(self, section)    local r = luci.sys.exec(string.format('opkg --force-depends install "/tmp/upload/%s"', inits[section].name))    form.description = string.format('%s', r)    end        return ful, fdl, formview/cbi/other_button.htm文件：    <%+cbi/valueheader%>        <% if self:cfgvalue(section) ~= false then %>" style="display: <%= display %>" type="submit"<%= attr("name", cbid) .. attr("id", cbid) .. attr("value", self.inputtitle or self.title)%> />        <% else %>            -        <% end %>    <%+cbi/valuefooter%>view/cbi/other_dvalue.htm文件：    <%+cbi/valueheader%><%

local val = self:cfgvalue(section) or self.default or ""

write(pcdata(val))

%><%+cbi/valuefooter%>view/cbi/other_upload.htm文件：    <%+cbi/valueheader%><%:Upload file:%><%+cbi/valuefooter%>view/cbi/other_download.htm文件：    <%+cbi/valueheader%><%:Download file:%><%+cbi/valuefooter%>view/webcam.htm文件：    <%+header%>

style="display:none"<% end %>><%=msg%>

style="display:none"<% end %>>

<% if html then write(html) end %>

<%+footer%>为了使添加的软件包能在openwrt源码make menuconfig时识别出来，需要在./feeds/luci/contrib/package/luci/Makefile增加如下语句：    $(eval $(call application,other,luci my other application))软件包下载地址：[luci-app-other_0.12.ipk][3]完整源码下载地址：[luci-other_src.tar.gz][4]  [1]: http://www.wifidog.pro/usr/uploads/2015/01/1996877787.png  [2]: http://www.wifidog.pro/usr/uploads/2015/01/548487962.jpg  [3]: http://pan.baidu.com/s/1ntwp1ep  [4]: http://pan.baidu.com/s/1ntwp1ep

本文由http://www.wifidog.pro/2015/01/04/wifidog-luci.html 整理编辑，转载请注明出处