Drop intllib and string.trim8 (#88)
This commit is contained in:
Maksym H
GitHub
parent
d006cb54f5
commit
6f87b3855d
@ -207,10 +207,6 @@ function string:trim()
|
|||||||
return (self:gsub("^%s*(.-)%s*$", "%1"))
|
return (self:gsub("^%s*(.-)%s*$", "%1"))
|
||||||
end
|
end
|
||||||
|
|
||||||
function string:trim8()
|
|
||||||
return utf8.gsub(self, "^%s*(.-)%s*$", "%1")
|
|
||||||
end
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
--------------------------------------------------------------------------------
|
||||||
function math.hypot(x, y)
|
function math.hypot(x, y)
|
||||||
local t
|
local t
|
||||||
|
|||||||
@ -29,14 +29,12 @@ local gamepath = scriptdir .. "game" .. DIR_DELIM
|
|||||||
local clientpath = scriptdir .. "client" .. DIR_DELIM
|
local clientpath = scriptdir .. "client" .. DIR_DELIM
|
||||||
local commonpath = scriptdir .. "common" .. DIR_DELIM
|
local commonpath = scriptdir .. "common" .. DIR_DELIM
|
||||||
local asyncpath = scriptdir .. "async" .. DIR_DELIM
|
local asyncpath = scriptdir .. "async" .. DIR_DELIM
|
||||||
local intlpath = scriptdir .. "intllib" .. DIR_DELIM
|
|
||||||
|
|
||||||
dofile(commonpath .. "strict.lua")
|
dofile(commonpath .. "strict.lua")
|
||||||
dofile(commonpath .. "serialize.lua")
|
dofile(commonpath .. "serialize.lua")
|
||||||
dofile(commonpath .. "misc_helpers.lua")
|
dofile(commonpath .. "misc_helpers.lua")
|
||||||
|
|
||||||
if INIT == "game" then
|
if INIT == "game" then
|
||||||
dofile(intlpath .. "init.lua")
|
|
||||||
dofile(gamepath .. "init.lua")
|
dofile(gamepath .. "init.lua")
|
||||||
assert(not core.get_http_api)
|
assert(not core.get_http_api)
|
||||||
elseif INIT == "mainmenu" then
|
elseif INIT == "mainmenu" then
|
||||||
|
|||||||
@ -1,27 +0,0 @@
|
|||||||
By Diego Martínez (kaeza).
|
|
||||||
Released under Unlicense.
|
|
||||||
|
|
||||||
This is free and unencumbered software released into the public domain.
|
|
||||||
|
|
||||||
Anyone is free to copy, modify, publish, use, compile, sell, or
|
|
||||||
distribute this software, either in source code form or as a compiled
|
|
||||||
binary, for any purpose, commercial or non-commercial, and by any
|
|
||||||
means.
|
|
||||||
|
|
||||||
In jurisdictions that recognize copyright laws, the author or authors
|
|
||||||
of this software dedicate any and all copyright interest in the
|
|
||||||
software to the public domain. We make this dedication for the benefit
|
|
||||||
of the public at large and to the detriment of our heirs and
|
|
||||||
successors. We intend this dedication to be an overt act of
|
|
||||||
relinquishment in perpetuity of all present and future rights to this
|
|
||||||
software under copyright law.
|
|
||||||
|
|
||||||
THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
|
|
||||||
EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
|
|
||||||
MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
|
|
||||||
IN NO EVENT SHALL THE AUTHORS BE LIABLE FOR ANY CLAIM, DAMAGES OR
|
|
||||||
OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
|
|
||||||
ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
|
|
||||||
OTHER DEALINGS IN THE SOFTWARE.
|
|
||||||
|
|
||||||
For more information, please refer to <http://unlicense.org/>
|
|
||||||
@ -1,217 +0,0 @@
|
|||||||
local escapes = { n="\n", r="\r", t="\t" }
|
|
||||||
|
|
||||||
local function unescape(str)
|
|
||||||
return (str:gsub("(\\+)([nrt]?)", function(bs, c)
|
|
||||||
local bsl = #bs
|
|
||||||
local realbs = ("\\"):rep(bsl/2)
|
|
||||||
if bsl%2 == 1 then
|
|
||||||
c = escapes[c] or c
|
|
||||||
end
|
|
||||||
return realbs..c
|
|
||||||
end))
|
|
||||||
end
|
|
||||||
|
|
||||||
local function parse_po(str)
|
|
||||||
local state, msgid, msgid_plural, msgstrind
|
|
||||||
local texts = { }
|
|
||||||
local lineno = 0
|
|
||||||
local function perror(msg)
|
|
||||||
return error(msg.." at line "..lineno)
|
|
||||||
end
|
|
||||||
for _, line in ipairs(str:split("\n")) do repeat
|
|
||||||
lineno = lineno + 1
|
|
||||||
line = line:trim8()
|
|
||||||
|
|
||||||
if line == "" or line:match("^#") then
|
|
||||||
state, msgid, msgid_plural = nil, nil, nil
|
|
||||||
break -- continue
|
|
||||||
end
|
|
||||||
|
|
||||||
local mid = line:match("^%s*msgid%s*\"(.*)\"%s*$")
|
|
||||||
if mid then
|
|
||||||
if state == "id" then
|
|
||||||
return perror("unexpected msgid")
|
|
||||||
end
|
|
||||||
state, msgid = "id", unescape(mid)
|
|
||||||
break -- continue
|
|
||||||
end
|
|
||||||
|
|
||||||
mid = line:match("^%s*msgid_plural%s*\"(.*)\"%s*$")
|
|
||||||
if mid then
|
|
||||||
if state ~= "id" then
|
|
||||||
return perror("unexpected msgid_plural")
|
|
||||||
end
|
|
||||||
state, msgid_plural = "idp", unescape(mid)
|
|
||||||
break -- continue
|
|
||||||
end
|
|
||||||
|
|
||||||
local ind, mstr = line:match("^%s*msgstr([0-9%[%]]*)%s*\"(.*)\"%s*$")
|
|
||||||
if ind then
|
|
||||||
if not msgid then
|
|
||||||
return perror("missing msgid")
|
|
||||||
elseif ind == "" then
|
|
||||||
msgstrind = 0
|
|
||||||
elseif ind:match("%[[0-9]+%]") then
|
|
||||||
msgstrind = tonumber(ind:sub(2, -2))
|
|
||||||
else
|
|
||||||
return perror("malformed msgstr")
|
|
||||||
end
|
|
||||||
texts[msgid] = texts[msgid] or { }
|
|
||||||
if msgid_plural then
|
|
||||||
texts[msgid_plural] = texts[msgid]
|
|
||||||
end
|
|
||||||
texts[msgid][msgstrind] = unescape(mstr)
|
|
||||||
state = "str"
|
|
||||||
break -- continue
|
|
||||||
end
|
|
||||||
|
|
||||||
mstr = line:match("^%s*\"(.*)\"%s*$")
|
|
||||||
if mstr then
|
|
||||||
if state == "id" then
|
|
||||||
msgid = msgid..unescape(mstr)
|
|
||||||
break -- continue
|
|
||||||
elseif state == "idp" then
|
|
||||||
msgid_plural = msgid_plural..unescape(mstr)
|
|
||||||
break -- continue
|
|
||||||
elseif state == "str" then
|
|
||||||
local text = texts[msgid][msgstrind]
|
|
||||||
texts[msgid][msgstrind] = text..unescape(mstr)
|
|
||||||
break -- continue
|
|
||||||
end
|
|
||||||
end
|
|
||||||
|
|
||||||
return perror("malformed line")
|
|
||||||
|
|
||||||
-- luacheck: ignore
|
|
||||||
until true end -- end for
|
|
||||||
|
|
||||||
return texts
|
|
||||||
end
|
|
||||||
|
|
||||||
local M = { }
|
|
||||||
|
|
||||||
local function warn(msg)
|
|
||||||
core.log("warning", "[intllib] "..msg)
|
|
||||||
end
|
|
||||||
|
|
||||||
-- hax!
|
|
||||||
-- This function converts a C expression to an equivalent Lua expression.
|
|
||||||
-- It handles enough stuff to parse the `Plural-Forms` header correctly.
|
|
||||||
-- Note that it assumes the C expression is valid to begin with.
|
|
||||||
local function compile_plural_forms(str)
|
|
||||||
local plural = str:match("plural=([^;]+);?$")
|
|
||||||
local function replace_ternary(s)
|
|
||||||
local c, t, f = s:match(s"^(.-)%?(.-):(.*)")
|
|
||||||
if c then
|
|
||||||
return ("__if("
|
|
||||||
..replace_ternary(c)
|
|
||||||
..","..replace_ternary(t)
|
|
||||||
..","..replace_ternary(f)
|
|
||||||
..")")
|
|
||||||
end
|
|
||||||
return s
|
|
||||||
end
|
|
||||||
plural = replace_ternary(plural)
|
|
||||||
plural = plural:gsub("&&", " and ")
|
|
||||||
plural = plural:gsub("||", " or ")
|
|
||||||
plural = plural:gsub("!=", "~=")
|
|
||||||
plural = plural:gsub("!", " not ")
|
|
||||||
local f, err = loadstring([[
|
|
||||||
local function __if(c, t, f)
|
|
||||||
if c and c~=0 then return t else return f end
|
|
||||||
end
|
|
||||||
local function __f(n)
|
|
||||||
return (]]..plural..[[)
|
|
||||||
end
|
|
||||||
return (__f(...))
|
|
||||||
]])
|
|
||||||
if not f then return nil, err end
|
|
||||||
local env = { }
|
|
||||||
env._ENV, env._G = env, env
|
|
||||||
setfenv(f, env)
|
|
||||||
return function(n)
|
|
||||||
local v = f(n)
|
|
||||||
if type(v) == "boolean" then
|
|
||||||
-- Handle things like a plain `n != 1`
|
|
||||||
v = v and 1 or 0
|
|
||||||
end
|
|
||||||
return v
|
|
||||||
end
|
|
||||||
end
|
|
||||||
|
|
||||||
local function parse_headers(str)
|
|
||||||
local headers = { }
|
|
||||||
for _, line in ipairs(str:split("\n")) do
|
|
||||||
local k, v = line:match("^([^:]+):%s*(.*)")
|
|
||||||
if k then
|
|
||||||
headers[k] = v
|
|
||||||
end
|
|
||||||
end
|
|
||||||
return headers
|
|
||||||
end
|
|
||||||
|
|
||||||
local function load_catalog(filename)
|
|
||||||
local f, data, err
|
|
||||||
|
|
||||||
local function bail(msg)
|
|
||||||
warn(msg..(err and ": " or "")..(err or ""))
|
|
||||||
return nil
|
|
||||||
end
|
|
||||||
|
|
||||||
f, err = io.open(filename, "rb")
|
|
||||||
if not f then
|
|
||||||
return --bail("failed to open catalog")
|
|
||||||
end
|
|
||||||
|
|
||||||
data, err = f:read("*a")
|
|
||||||
|
|
||||||
f:close()
|
|
||||||
|
|
||||||
if not data then
|
|
||||||
return bail("failed to read catalog")
|
|
||||||
end
|
|
||||||
|
|
||||||
data, err = parse_po(data)
|
|
||||||
if not data then
|
|
||||||
return bail("failed to parse catalog")
|
|
||||||
end
|
|
||||||
|
|
||||||
err = nil
|
|
||||||
local hdrs = data[""]
|
|
||||||
if not (hdrs and hdrs[0]) then
|
|
||||||
return bail("catalog has no headers")
|
|
||||||
end
|
|
||||||
|
|
||||||
hdrs = parse_headers(hdrs[0])
|
|
||||||
|
|
||||||
local pf = hdrs["Plural-Forms"]
|
|
||||||
if not pf then
|
|
||||||
-- XXX: Is this right? Gettext assumes this if header not present.
|
|
||||||
pf = "nplurals=2; plural=n != 1"
|
|
||||||
end
|
|
||||||
|
|
||||||
data.plural_index, err = compile_plural_forms(pf)
|
|
||||||
if not data.plural_index then
|
|
||||||
return bail("failed to compile plural forms")
|
|
||||||
end
|
|
||||||
|
|
||||||
--warn("loaded: "..filename)
|
|
||||||
|
|
||||||
return data
|
|
||||||
end
|
|
||||||
|
|
||||||
function M.load_catalogs(path)
|
|
||||||
local langs = intllib.get_detected_languages()
|
|
||||||
|
|
||||||
local cats = { }
|
|
||||||
for _, lang in ipairs(langs) do
|
|
||||||
local cat = load_catalog(path.."/"..lang..".po")
|
|
||||||
if cat then
|
|
||||||
cats[#cats+1] = cat
|
|
||||||
end
|
|
||||||
end
|
|
||||||
|
|
||||||
return cats
|
|
||||||
end
|
|
||||||
|
|
||||||
return M
|
|
||||||
@ -1,229 +0,0 @@
|
|||||||
intllib = {
|
|
||||||
getters = {},
|
|
||||||
strings = {},
|
|
||||||
}
|
|
||||||
|
|
||||||
local path = core.get_builtin_path() .. "intllib" .. DIR_DELIM
|
|
||||||
dofile(path .. "lib.lua")
|
|
||||||
|
|
||||||
local LANG = core.settings:get("language")
|
|
||||||
if not (LANG and (LANG ~= "")) then LANG = os.getenv("LANG") end
|
|
||||||
if not (LANG and (LANG ~= "")) then LANG = "en" end
|
|
||||||
|
|
||||||
|
|
||||||
local INS_CHAR = intllib.INSERTION_CHAR
|
|
||||||
local insertion_pattern = "("..INS_CHAR.."?)"..INS_CHAR.."(%(?)(%d+)(%)?)"
|
|
||||||
|
|
||||||
local function do_replacements(str, ...)
|
|
||||||
local args = {...}
|
|
||||||
-- Outer parens discard extra return values
|
|
||||||
return (str:gsub(insertion_pattern, function(escape, open, num, close)
|
|
||||||
if escape == "" then
|
|
||||||
local replacement = tostring(args[tonumber(num)])
|
|
||||||
if open == "" then
|
|
||||||
replacement = replacement..close
|
|
||||||
end
|
|
||||||
return replacement
|
|
||||||
else
|
|
||||||
return INS_CHAR..open..num..close
|
|
||||||
end
|
|
||||||
end))
|
|
||||||
end
|
|
||||||
|
|
||||||
local function make_getter(msgstrs)
|
|
||||||
return function(s, ...)
|
|
||||||
local str
|
|
||||||
if msgstrs then
|
|
||||||
str = msgstrs[s]
|
|
||||||
end
|
|
||||||
if not str or str == "" then
|
|
||||||
str = s
|
|
||||||
end
|
|
||||||
if select("#", ...) == 0 then
|
|
||||||
return str
|
|
||||||
end
|
|
||||||
return do_replacements(str, ...)
|
|
||||||
end
|
|
||||||
end
|
|
||||||
|
|
||||||
|
|
||||||
local function Getter(modname)
|
|
||||||
modname = modname or core.get_current_modname()
|
|
||||||
if not intllib.getters[modname] then
|
|
||||||
local msgstr = intllib.get_strings(modname)
|
|
||||||
intllib.getters[modname] = make_getter(msgstr)
|
|
||||||
end
|
|
||||||
return intllib.getters[modname]
|
|
||||||
end
|
|
||||||
|
|
||||||
|
|
||||||
function intllib.Getter(modname)
|
|
||||||
local info = debug and debug.getinfo and debug.getinfo(2)
|
|
||||||
local loc = info and info.short_src..":"..info.currentline
|
|
||||||
core.log("deprecated", "intllib.Getter is deprecated."
|
|
||||||
.." Please use intllib.make_gettext_pair instead."
|
|
||||||
..(info and " (called from "..loc..")" or ""))
|
|
||||||
return Getter(modname)
|
|
||||||
end
|
|
||||||
|
|
||||||
|
|
||||||
local langs
|
|
||||||
|
|
||||||
local function split(str, sep)
|
|
||||||
local pos, endp = 1, #str+1
|
|
||||||
return function()
|
|
||||||
if (not pos) or pos > endp then return end
|
|
||||||
local s, e = str:find(sep, pos, true)
|
|
||||||
local part = str:sub(pos, s and s-1)
|
|
||||||
pos = e and e + 1
|
|
||||||
return part
|
|
||||||
end
|
|
||||||
end
|
|
||||||
|
|
||||||
function intllib.get_detected_languages()
|
|
||||||
if langs then return langs end
|
|
||||||
|
|
||||||
langs = { }
|
|
||||||
|
|
||||||
local function addlang(l)
|
|
||||||
local sep
|
|
||||||
langs[#langs+1] = l
|
|
||||||
sep = l:find(".", 1, true)
|
|
||||||
if sep then
|
|
||||||
l = l:sub(1, sep-1)
|
|
||||||
langs[#langs+1] = l
|
|
||||||
end
|
|
||||||
sep = l:find("_", 1, true)
|
|
||||||
if sep then
|
|
||||||
langs[#langs+1] = l:sub(1, sep-1)
|
|
||||||
end
|
|
||||||
end
|
|
||||||
|
|
||||||
local v
|
|
||||||
|
|
||||||
v = core.settings:get("language")
|
|
||||||
if v and v~="" then
|
|
||||||
addlang(v)
|
|
||||||
end
|
|
||||||
|
|
||||||
v = os.getenv("LANGUAGE")
|
|
||||||
if v then
|
|
||||||
for item in split(v, ":") do
|
|
||||||
langs[#langs+1] = item
|
|
||||||
end
|
|
||||||
end
|
|
||||||
|
|
||||||
v = os.getenv("LANG")
|
|
||||||
if v then
|
|
||||||
addlang(v)
|
|
||||||
end
|
|
||||||
|
|
||||||
langs[#langs+1] = "en"
|
|
||||||
|
|
||||||
return langs
|
|
||||||
end
|
|
||||||
|
|
||||||
|
|
||||||
local gettext = dofile(path .. "gettext.lua")
|
|
||||||
|
|
||||||
|
|
||||||
local function catgettext(catalogs, msgid)
|
|
||||||
for _, cat in ipairs(catalogs) do
|
|
||||||
local msgstr = cat and cat[msgid]
|
|
||||||
if msgstr and msgstr~="" then
|
|
||||||
local msg = msgstr[0]
|
|
||||||
return msg~="" and msg or nil
|
|
||||||
end
|
|
||||||
end
|
|
||||||
end
|
|
||||||
|
|
||||||
local floor = math.floor
|
|
||||||
local function catngettext(catalogs, msgid, msgid_plural, n)
|
|
||||||
n = floor(n)
|
|
||||||
for _, cat in ipairs(catalogs) do
|
|
||||||
local msgstr = cat and cat[msgid]
|
|
||||||
if msgstr then
|
|
||||||
local index = cat.plural_index(n)
|
|
||||||
local msg = msgstr[index]
|
|
||||||
return msg~="" and msg or nil
|
|
||||||
end
|
|
||||||
end
|
|
||||||
return n==1 and msgid or msgid_plural
|
|
||||||
end
|
|
||||||
|
|
||||||
|
|
||||||
local gettext_getters = { }
|
|
||||||
function intllib.make_gettext_pair(modname)
|
|
||||||
modname = modname or core.get_current_modname()
|
|
||||||
if gettext_getters[modname] then
|
|
||||||
return unpack(gettext_getters[modname])
|
|
||||||
end
|
|
||||||
local modpath = core.get_modpath(modname)
|
|
||||||
local localedir = modpath and modpath.."/locale"
|
|
||||||
local catalogs = localedir and gettext.load_catalogs(localedir) or {}
|
|
||||||
local getter = Getter(modname)
|
|
||||||
local function gettext_func(msgid, ...)
|
|
||||||
local msgstr = (catgettext(catalogs, msgid)
|
|
||||||
or getter(msgid))
|
|
||||||
return do_replacements(msgstr, ...)
|
|
||||||
end
|
|
||||||
local function ngettext_func(msgid, msgid_plural, n, ...)
|
|
||||||
local msgstr = (catngettext(catalogs, msgid, msgid_plural, n)
|
|
||||||
or getter(msgid))
|
|
||||||
return do_replacements(msgstr, ...)
|
|
||||||
end
|
|
||||||
gettext_getters[modname] = { gettext_func, ngettext_func }
|
|
||||||
return gettext_func, ngettext_func
|
|
||||||
end
|
|
||||||
|
|
||||||
|
|
||||||
local function get_locales(code)
|
|
||||||
local ll, cc = code:match("^(..)_(..)")
|
|
||||||
if ll then
|
|
||||||
return { ll.."_"..cc, ll, ll~="en" and "en" or nil }
|
|
||||||
else
|
|
||||||
return { code, code~="en" and "en" or nil }
|
|
||||||
end
|
|
||||||
end
|
|
||||||
|
|
||||||
|
|
||||||
function intllib.get_strings(modname, langcode)
|
|
||||||
langcode = langcode or LANG
|
|
||||||
modname = modname or core.get_current_modname()
|
|
||||||
local msgstr = intllib.strings[modname]
|
|
||||||
if not msgstr then
|
|
||||||
local modpath = core.get_modpath(modname)
|
|
||||||
msgstr = { }
|
|
||||||
if modpath then
|
|
||||||
for _, l in ipairs(get_locales(langcode)) do
|
|
||||||
local t = intllib.load_strings(modpath.."/locale/"..modname.."."..l..".tr")
|
|
||||||
or intllib.load_strings(modpath.."/locale/"..l..".txt") or { }
|
|
||||||
for k, v in pairs(t) do
|
|
||||||
msgstr[k] = msgstr[k] or v
|
|
||||||
end
|
|
||||||
end
|
|
||||||
intllib.strings[modname] = msgstr
|
|
||||||
end
|
|
||||||
end
|
|
||||||
return msgstr
|
|
||||||
end
|
|
||||||
|
|
||||||
|
|
||||||
function core.get_translator_auto(langs)
|
|
||||||
if type(langs) == "table" then
|
|
||||||
for _, l in ipairs(langs) do
|
|
||||||
if LANG == l then
|
|
||||||
-- Surrounded in brackets so there's only one return value
|
|
||||||
return (intllib.make_gettext_pair())
|
|
||||||
end
|
|
||||||
end
|
|
||||||
elseif langs then
|
|
||||||
-- If intllib can find any translations for this mod in the current
|
|
||||||
-- language then use intllib.
|
|
||||||
if next(intllib.get_strings()) then
|
|
||||||
return (intllib.make_gettext_pair())
|
|
||||||
end
|
|
||||||
end
|
|
||||||
|
|
||||||
return core.get_translator(core.get_current_modname())
|
|
||||||
end
|
|
||||||
@ -1,70 +0,0 @@
|
|||||||
local INS_CHAR = "@"
|
|
||||||
intllib.INSERTION_CHAR = INS_CHAR
|
|
||||||
|
|
||||||
local escapes = {
|
|
||||||
["\\"] = "\\",
|
|
||||||
["n"] = "\n",
|
|
||||||
["s"] = " ",
|
|
||||||
["t"] = "\t",
|
|
||||||
["r"] = "\r",
|
|
||||||
["f"] = "\f",
|
|
||||||
[INS_CHAR] = INS_CHAR..INS_CHAR,
|
|
||||||
}
|
|
||||||
|
|
||||||
local function unescape(str)
|
|
||||||
local parts = {}
|
|
||||||
local n = 1
|
|
||||||
local function add(s)
|
|
||||||
parts[n] = s
|
|
||||||
n = n + 1
|
|
||||||
end
|
|
||||||
|
|
||||||
local start = 1
|
|
||||||
while true do
|
|
||||||
local pos = str:find("[\\@]", start)
|
|
||||||
if pos then
|
|
||||||
add(str:sub(start, pos - 1))
|
|
||||||
else
|
|
||||||
add(str:sub(start))
|
|
||||||
break
|
|
||||||
end
|
|
||||||
local c = str:sub(pos + 1, pos + 1)
|
|
||||||
if escapes[c] then
|
|
||||||
add(escapes[c])
|
|
||||||
elseif str:sub(pos, pos) == "@" then
|
|
||||||
add("@" .. c)
|
|
||||||
else
|
|
||||||
add(c)
|
|
||||||
end
|
|
||||||
start = pos + 2
|
|
||||||
end
|
|
||||||
return table.concat(parts)
|
|
||||||
end
|
|
||||||
|
|
||||||
local function find_eq(s)
|
|
||||||
for slashes, pos in s:gmatch("([\\]*)=()") do
|
|
||||||
if (slashes:len() % 2) == 0 then
|
|
||||||
return pos - 1
|
|
||||||
end
|
|
||||||
end
|
|
||||||
end
|
|
||||||
|
|
||||||
function intllib.load_strings(filename)
|
|
||||||
local file, err = io.open(filename, "r")
|
|
||||||
if not file then
|
|
||||||
return nil, err
|
|
||||||
end
|
|
||||||
local strings = {}
|
|
||||||
for line in file:lines() do
|
|
||||||
line = line:trim8()
|
|
||||||
if line ~= "" and line:sub(1, 1) ~= "#" then
|
|
||||||
local pos = find_eq(line)
|
|
||||||
if pos then
|
|
||||||
local msgid = unescape(line:sub(1, pos - 1):trim8())
|
|
||||||
strings[msgid] = unescape(line:sub(pos + 1):trim8())
|
|
||||||
end
|
|
||||||
end
|
|
||||||
end
|
|
||||||
file:close()
|
|
||||||
return strings
|
|
||||||
end
|
|
||||||
Loading…
x
Reference in New Issue
Block a user