local ldebug = require "luci.debug"
local string = require "string"
local coroutine = require "coroutine"
-local cutil = require "luci.cutil"
local getmetatable, setmetatable = getmetatable, setmetatable
local rawget, rawset, unpack = rawget, rawset, unpack
--
-- Pythonic string formatting extension
--
---[[
getmetatable("").__mod = function(a, b)
if not b then
return a
return a:format(b)
end
end
-]]--
--
--
-- Instantiates a class
---[[
local function _instantiate(class, ...)
local inst = setmetatable({}, {__index = class})
return inst
end
-]]--
--- Create a Class object (Python-style object model).
-- The class object can be instantiated by calling itself.
-- @return A class object
-- @see instanceof
-- @see clone
---[[
function class(base)
return setmetatable({}, {
__call = _instantiate,
__index = base
})
end
-]]--
-class = cutil.class
--- Test whether the given object is an instance of the given class.
-- @param object Object instance
-- @return Boolean indicating whether the object is an instance
-- @see class
-- @see clone
---[[
function instanceof(object, class)
local meta = getmetatable(object)
while meta and meta.__index do
end
return false
end
-]]--
-instanceof = cutil.instanceof
--
--- Create valid XML PCDATA from given string.
-- @param value String value containing the data to escape
-- @return String value containing the escaped data
---[[
+local _pcdata_repl = {
+ ["&"] = "&",
+ ['"'] = """,
+ ["'"] = "'",
+ ["<"] = "<",
+ [">"] = ">"
+}
+
function pcdata(value)
- return value and tostring(value):gsub("[&\"'<>]", {
- ["&"] = "&",
- ['"'] = """,
- ["'"] = "'",
- ["<"] = "<",
- [">"] = ">"
- })
+ return value and tostring(value):gsub("[&\"'<>]", _pcdata_repl)
end
-]]--
-pcdata = cutil.pcdata
--- Strip HTML tags from given string.
-- @param value String containing the HTML text