OpenWrt luci怎么添加上傳下載及網(wǎng)絡(luò)攝像頭功能

本篇內(nèi)容介紹了“OpenWrt luci怎么添加上傳下載及網(wǎng)絡(luò)攝像頭功能”的有關(guān)知識(shí)，在實(shí)際案例的操作過程中，不少人都會(huì)遇到這樣的困境，接下來就讓小編帶領(lǐng)大家學(xué)習(xí)一下如何處理這些情況吧！希望大家仔細(xì)閱讀，能夠?qū)W有所成！

       花了幾天時(shí)間給OpenWrt弄了個(gè)上傳下載及網(wǎng)絡(luò)攝像頭功能。對(duì)lua及l(fā)uci不熟，時(shí)間花的有點(diǎn)多。此軟件包是純luci應(yīng)用，可以安裝在任意平臺(tái)，網(wǎng)絡(luò)攝像頭要依賴mjpg-streamer。效果圖如下：

主要源碼如下：

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 = '<iframe src="http://%s:%s@%s:%s" frameborder="no" border="0" width="800" height="600" marginwidth="0" marginheight="0" allowtransparency="yes"></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})
end

model/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('<span >%s</span>', r)
end

return ful, fdl, form

view/cbi/other_button.htm文件：

<%+cbi/valueheader%>
	<% if self:cfgvalue(section) ~= false then %>
		<input class="cbi-button cbi-input-<%=self.inputstyle or "button" %>"  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%>
<span >
<%
	local val = self:cfgvalue(section) or self.default or ""
	write(pcdata(val))
%>
</span>
<%+cbi/valuefooter%>

view/cbi/other_upload.htm文件：

<%+cbi/valueheader%>
	<label class="cbi-value"  for="ulfile"><%:Upload file:%></label>
	<input class="cbi-input-file"  type="file" id="ulfile" name="ulfile" />
	<input type="submit" class="cbi-button cbi-input-apply" name="upload" value="<%:Upload%>" />
<%+cbi/valuefooter%>

view/cbi/other_download.htm文件：

<%+cbi/valueheader%>
	<label class="cbi-value"  for="dlfile"><%:Download file:%></label>
	<input class="cbi-input-file"  type="text" id="dlfile" name="dlfile" />
	<input type="submit" class="cbi-button cbi-input-apply" name="download" value="<%:Download%>" />
<%+cbi/valuefooter%>

view/webcam.htm文件：

<%+header%>
<div class="cbi-section-error"<% if not msg then %> <% end %>><%=msg%></div>
<form method="post" action="<%=REQUEST_URI%>"<%if status == nil then %> <% end %>>
	<div class="cbi-section-node">
		<div class="cbi-value cbi-value-last">
			<input type="hidden" name="act" value="<% if status then write('stop') else write('start') end %>" />
			<div class="cbi-value-field">
				<input class="cbi-button cbi-input-<% if status then write('remove') else write('apply') end %>" type="submit" value="<% if status then write(translate('Stop')) else write(translate('Start')) end %>" />
			</div>
		</div>
	</div>
</form>
<div >
	<% if html then write(html) end %>
</div>
<%+footer%>

為了使添加的軟件包能在openwrt源碼make menuconfig時(shí)識(shí)別出來，需要在./feeds/luci/contrib/package/luci/Makefile增加如下語句：

$(eval $(call application,other,luci my other application))

軟件包下載地址：luci-app-other_0.12.ipk

完整源碼下載地址：luci-other_src.tar.gz

“OpenWrt luci怎么添加上傳下載及網(wǎng)絡(luò)攝像頭功能”的內(nèi)容就介紹到這里了，感謝大家的閱讀。如果想了解更多行業(yè)相關(guān)的知識(shí)可以關(guān)注億速云網(wǎng)站，小編將為大家輸出更多高質(zhì)量的實(shí)用文章！