mirror of https://github.com/20kdc/OC-KittenOS.git
29 lines
839 B
Lua
29 lines
839 B
Lua
-- This is released into the public domain.
|
|
-- No warranty is provided, implied or otherwise.
|
|
|
|
-- app-claw-csi: addSource function
|
|
-- USING THIS LIBRARY OUTSIDE OF APP-CLAW IS A BAD IDEA.
|
|
-- SO DON'T DO IT.
|
|
|
|
-- NOTE: If a source is writable, it's added anyway despite any problems.
|
|
return function (claw, name, src, dst)
|
|
local ifo = ""
|
|
local ifok, e = src("data/app-claw/local.lua", function (t)
|
|
ifo = ifo .. (t or "")
|
|
return true
|
|
end)
|
|
e = e or "local.lua parse error"
|
|
ifo = ifok and require("serial").deserialize(ifo)
|
|
if not (dst or ifo) then return false, e end
|
|
table.insert(claw.sourceList, {name, not not dst})
|
|
local nifo = ifo or ""
|
|
if type(nifo) == "table" then
|
|
nifo = ""
|
|
for k, v in pairs(ifo) do
|
|
nifo = nifo .. claw.compressCSI(k, v)
|
|
end
|
|
end
|
|
claw.sources[name] = {src, dst, nifo}
|
|
return not not ifo, e
|
|
end
|