Translate module
This commit is contained in:
parent
97b93c7213
commit
a30430ecfd
79
translate.lua
Normal file
79
translate.lua
Normal file
|
@ -0,0 +1,79 @@
|
||||||
|
translate = {};
|
||||||
|
-- redefine to set source language
|
||||||
|
translate.source = 'ru';
|
||||||
|
|
||||||
|
-- Credit: http://lua-users.org/lists/lua-l/2010-04/msg00005.html
|
||||||
|
function load_mo_file(mo_file)
|
||||||
|
--------------------------------
|
||||||
|
-- open file and read data
|
||||||
|
--------------------------------
|
||||||
|
local fd,err=io.open(mo_file,"rb")
|
||||||
|
if not fd then return nil,err end
|
||||||
|
local mo_data=fd:read("*all")
|
||||||
|
fd:close()
|
||||||
|
|
||||||
|
--------------------------------
|
||||||
|
-- precache some functions
|
||||||
|
--------------------------------
|
||||||
|
local byte=string.byte
|
||||||
|
local sub=string.sub
|
||||||
|
|
||||||
|
--------------------------------
|
||||||
|
-- check format
|
||||||
|
--------------------------------
|
||||||
|
local peek_long --localize
|
||||||
|
local magic=sub(mo_data,1,4)
|
||||||
|
-- intel magic 0xde120495
|
||||||
|
if magic=="\222\018\004\149" then
|
||||||
|
peek_long=function(offs)
|
||||||
|
local a,b,c,d=byte(mo_data,offs+1,offs+4)
|
||||||
|
return ((d*256+c)*256+b)*256+a
|
||||||
|
end
|
||||||
|
-- motorola magic = 0x950412de
|
||||||
|
elseif magic=="\149\004\018\222" then
|
||||||
|
peek_long=function(offs)
|
||||||
|
local a,b,c,d=byte(mo_data,offs+1,offs+4)
|
||||||
|
return ((a*256+b)*256+c)*256+d
|
||||||
|
end
|
||||||
|
else
|
||||||
|
return nil,"no valid mo-file"
|
||||||
|
end
|
||||||
|
|
||||||
|
--------------------------------
|
||||||
|
-- version
|
||||||
|
--------------------------------
|
||||||
|
local V=peek_long(4)
|
||||||
|
if V~=0 then
|
||||||
|
return nul,"unsupported version"
|
||||||
|
end
|
||||||
|
|
||||||
|
------------------------------
|
||||||
|
-- get number of offsets of table
|
||||||
|
------------------------------
|
||||||
|
local N,O,T=peek_long(8),peek_long(12),peek_long(16)
|
||||||
|
------------------------------
|
||||||
|
-- traverse and get strings
|
||||||
|
------------------------------
|
||||||
|
local hash={}
|
||||||
|
for nstr=1,N do
|
||||||
|
local ol,oo=peek_long(O),peek_long(O+4) O=O+8
|
||||||
|
local tl,to=peek_long(T),peek_long(T+4) T=T+8
|
||||||
|
hash[sub(mo_data,oo+1,oo+ol)]=sub(mo_data,to+1,to+tl)
|
||||||
|
end
|
||||||
|
return function(text)
|
||||||
|
return hash[text] or text
|
||||||
|
end
|
||||||
|
end
|
||||||
|
|
||||||
|
|
||||||
|
if not LANG then
|
||||||
|
LANG = "en"
|
||||||
|
end
|
||||||
|
|
||||||
|
if LANG == translate.source then
|
||||||
|
__ = function(text)
|
||||||
|
return text;
|
||||||
|
end;
|
||||||
|
else
|
||||||
|
__ = load_mo_file(LANG..'.mo');
|
||||||
|
end
|
Loading…
Reference in a new issue