You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
 
 
 
 

174 lines
5.1 KiB

--[[
LuCI - Lua Configuration Interface
Copyright 2014 Christian Schoenebeck <christian dot schoenebeck at gmail dot com>
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.privoxy", package.seeall)
local NX = require "nixio"
local NXFS = require "nixio.fs"
local HTTP = require "luci.http"
local IPKG = require "luci.model.ipkg"
local UCI = require "luci.model.uci"
local SYS = require "luci.sys"
local UTIL = require "luci.util"
version_luci_app = "1.0.0" -- luci-application / openwrt Makefile compatible version
version_required = "3.0.22" -- minimum required service version
function index()
local _service = "privoxy"
local _vermin = "3.0.22"
local _verinst
local _util = require "luci.util"
local _ipkg = require "luci.model.ipkg"
local _info = _ipkg.info(_service)
for _, v in pairs(_info) do
if v.Package == _service and v.Status.installed then
_verinst = v.Version
break
end
end
local _sver = _util.split(_verinst, "[%.%-]", nil, true)
local _rver = _util.split(_vermin , "[%.%-]", nil, true)
-- check config file and version
if not nixio.fs.access("/etc/config/" .. _service )
or (tonumber(_sver[1]) or 0) < (tonumber(_rver[1]) or 0)
or (tonumber(_sver[2]) or 0) < (tonumber(_rver[2]) or 0)
or (tonumber(_sver[3]) or 0) < (tonumber(_rver[3]) or 0)
or (tonumber(_sver[4]) or 0) < (tonumber(_rver[4]) or 0) then
entry( {"admin", "services", "privoxy"}, cbi("privoxy/apperror",
{hideapplybtn=true, hidesavebtn=true, hideresetbtn=true }), _("Privoxy WEB proxy"), 59)
else
entry( {"admin", "services", "privoxy"}, cbi("privoxy/detail"), _("Privoxy WEB proxy"), 59)
entry( {"admin", "services", "privoxy", "logview"}, call("logread") ).leaf = true
entry( {"admin", "services", "privoxy", "startstop"}, call("startstop") ).leaf = true
entry( {"admin", "services", "privoxy", "status"}, call("get_pid") ).leaf = true
end
end
-- called by XHR.get from detail_logview.htm
function logread()
-- read application settings
local uci = UCI.cursor()
local logdir = uci:get("privoxy", "privoxy", "logdir") or "/var/log"
local logfile = uci:get("privoxy", "privoxy", "logfile") or "privoxy.log"
uci:unload("privoxy")
local lfile=logdir .. "/" .. logfile
local ldata=NXFS.readfile(lfile)
if not ldata or #ldata == 0 then
ldata="_nodata_"
end
HTTP.write(ldata)
end
-- called by XHR.get from detail_startstop.htm
function startstop()
local pid = get_pid(true)
if pid > 0 then
SYS.call("/etc/init.d/privoxy stop")
NX.nanosleep(1) -- sleep a second
if NX.kill(pid, 0) then -- still running
NX.kill(pid, 9) -- send SIGKILL
end
pid = 0
else
SYS.call("/etc/init.d/privoxy start")
NX.nanosleep(1) -- sleep a second
pid = tonumber(NXFS.readfile("/var/run/privoxy.pid") or 0 )
if pid > 0 and not NX.kill(pid, 0) then
pid = 0 -- process did not start
end
end
HTTP.write(tostring(pid)) -- HTTP needs string not number
end
-- called by XHR.poll from detail_startstop.htm
-- and from lua (with parameter "true")
function get_pid(from_lua)
local pid = tonumber(NXFS.readfile("/var/run/privoxy.pid") or 0 )
if pid > 0 and not NX.kill(pid, 0) then
pid = 0
end
if from_lua then
return pid
else
HTTP.write(tostring(pid)) -- HTTP needs string not number
end
end
-- get the "name" of the current active theme
function get_theme()
local _uci = UCI.cursor()
local _base = _uci:get("luci", "main", "mediaurlbase") -- only pathname
_uci:unload("luci")
for k, v in pairs(luci.config.themes) do
if k:sub(1, 1) ~= "." and v == _base then
return k
end
end
return nil
end
-- read version information for given package if installed
function ipkg_version(package)
if not package then
return nil
end
local _info = IPKG.info(package)
local _data = {}
local _version = ""
local i = 0
for k, v in pairs(_info) do
if v.Package == package and v.Status.installed then
_version = v.Version
i = i + 1
end
end
if i > 1 then -- more then one valid record
return _data
end
local _sver = UTIL.split(_version, "[%.%-]", nil, true)
_data = {
version = _version,
major = tonumber(_sver[1]) or 0,
minor = tonumber(_sver[2]) or 0,
patch = tonumber(_sver[3]) or 0,
build = tonumber(_sver[4]) or 0
}
return _data
end
-- replacement of build-in Flag.parse of cbi.lua
-- modified to mark section as changed if value changes
-- current parse did not do this, but it is done AbstaractValue.parse()
function flag_parse(self, section)
local fexists = self.map:formvalue(
luci.cbi.FEXIST_PREFIX .. self.config .. "." .. section .. "." .. self.option)
if fexists then
local fvalue = self:formvalue(section) and self.enabled or self.disabled
local cvalue = self:cfgvalue(section)
if fvalue ~= self.default or (not self.optional and not self.rmempty) then
self:write(section, fvalue)
else
self:remove(section)
end
if (fvalue ~= cvalue) then self.section.changed = true end
else
self:remove(section)
self.section.changed = true
end
end