1
0
mirror of https://github.com/rkd77/elinks.git synced 2024-12-04 14:46:47 -05:00
elinks/contrib/lua/babelfish.lua
Petr Baudis 0f6d4310ad Initial commit of the HEAD branch of the ELinks CVS repository, as of
Thu Sep 15 15:57:07 CEST 2005. The previous history can be added to this
by grafting.
2005-09-15 15:58:31 +02:00

56 lines
1.5 KiB
Lua

function babelfish (url)
local from, to, rest
local lang_pair
local param
local lang2code = {
["chinese-simp"] = 'zh',
["chinese-simple"] = 'zh',
["chinese-simplified"] = 'zh',
["chinese-trad"] = 'zt',
["chinese-traditional"] = 'zt',
["dutch"] = 'nl',
["nederlands"] = 'nl',
["Nederlands"] = 'nl',
["german"] = 'de',
["deutsch"] = 'de',
["Deutsch"] = 'de',
["english"] = 'en',
["french"] = 'fr',
["fran\231ais"] = 'fr',
["greek"] = 'el',
["italian"] = 'it',
["italiano"] = 'it',
["japanese"] = 'ja',
["korean"] = 'ko',
["portuguese"] = 'pt',
["portugu\234s"] = 'pt',
["russian"] = 'ru',
["spanish"] = 'es',
["espanol"] = 'es',
["espa\241ol"] = 'es',
}
_,_,from,to,rest = string.find(url, '^bb%s*([^%s]+)[%s]+([^%s]+)[%s]*(.*)')
if not rest then return url,nil end
from = lang2code[from] or from
to = lang2code[to] or to
lang_pair = from..'_'..to
if string.find(rest, ':[^%s]') then
url = "http://babelfish.altavista.com/babelfish/urltrurl"
.."?url="..escape(rest)
.."&lp="..lang_pair
else
url = "http://babelfish.altavista.com/babelfish/tr"
.."?trtext="..escape(rest)
.."&lp="..lang_pair
end
return url,true
end
table.insert(goto_url_hooks, babelfish)