diff options
Diffstat (limited to 'tools/serialize.lua')
-rw-r--r-- | tools/serialize.lua | 65 |
1 files changed, 0 insertions, 65 deletions
diff --git a/tools/serialize.lua b/tools/serialize.lua deleted file mode 100644 index 77c05e1b..00000000 --- a/tools/serialize.lua +++ /dev/null @@ -1,65 +0,0 @@ --- Prosody IM v0.1 --- Copyright (C) 2008 Matthew Wild --- Copyright (C) 2008 Waqas Hussain --- --- This program is free software; you can redistribute it and/or --- modify it under the terms of the GNU General Public License --- as published by the Free Software Foundation; either version 2 --- of the License, or (at your option) any later version. --- --- This program is distributed in the hope that it will be useful, --- but WITHOUT ANY WARRANTY; without even the implied warranty of --- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the --- GNU General Public License for more details. --- --- You should have received a copy of the GNU General Public License --- along with this program; if not, write to the Free Software --- Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. --- - - -
-local indent = function(i)
- return string.rep("\t", i);
-end
-local function basicSerialize (o)
- if type(o) == "number" or type(o) == "boolean" then
- return tostring(o);
- else -- assume it is a string -- FIXME make sure it's a string. throw an error otherwise.
- return (string.format("%q", tostring(o)):gsub("\\\n", "\\n"));
- end
-end
-local function _simplesave (o, ind, t)
- if type(o) == "number" then
- table.insert(t, tostring(o));
- elseif type(o) == "string" then
- table.insert(t, (string.format("%q", o):gsub("\\\n", "\\n")));
- elseif type(o) == "table" then
- table.insert(t, "{\n");
- for k,v in pairs(o) do
- table.insert(t, indent(ind));
- table.insert(t, "[");
- table.insert(t, basicSerialize(k));
- table.insert(t, "] = ");
- _simplesave(v, ind+1, t);
- table.insert(t, ",\n");
- end
- table.insert(t, indent(ind-1));
- table.insert(t, "}");
- elseif type(o) == "boolean" then
- table.insert(t, (o and "true" or "false"));
- else
- error("cannot serialize a " .. type(o))
- end
-end
-local t_concat = table.concat;
-
-module "serialize"
-
-function serialize(o)
- local t = {};
- _simplesave(o, 1, t);
- return t_concat(t);
-end
-
-return _M;
|