mirror of
https://github.com/danieleteti/delphimvcframework.git
synced 2024-11-16 16:25:54 +01:00
53 lines
1.1 KiB
Lua
53 lines
1.1 KiB
Lua
|
|
||
|
|
local out_html = arg[1] or 'html/'
|
||
|
|
|
||
|
|
local function dump_file(out, file)
|
||
|
|
local fd = assert(io.open(file))
|
||
|
|
out:write(fd:read("*a"))
|
||
|
|
fd:close()
|
||
|
|
end
|
||
|
|
|
||
|
|
local function dump_page(out, page, lang)
|
||
|
|
local page_template = page:gsub(".html$", ".tpl")
|
||
|
|
-- check if the template for this page exists.
|
||
|
|
local f_template = io.open(lang .. page_template)
|
||
|
|
if not f_template then
|
||
|
|
print("no template for page '" .. page .. "' of language '" .. lang .. "'")
|
||
|
|
return
|
||
|
|
end
|
||
|
|
-- dump page
|
||
|
|
local out = assert(io.open(out, 'w'))
|
||
|
|
dofile(lang .. "menu.lua")
|
||
|
|
dump_file(out, lang .. 'header.tpl')
|
||
|
|
dump_menu(out, page)
|
||
|
|
dump_file(out, lang .. page_template)
|
||
|
|
dump_file(out, lang .. 'footer.tpl')
|
||
|
|
out:close()
|
||
|
|
end
|
||
|
|
|
||
|
|
local pages = {
|
||
|
|
"index.html",
|
||
|
|
"manual.html",
|
||
|
|
"license.html",
|
||
|
|
-- appenders
|
||
|
|
"console.html",
|
||
|
|
"file.html",
|
||
|
|
"rolling_file.html",
|
||
|
|
"sql.html",
|
||
|
|
"socket.html",
|
||
|
|
"email.html",
|
||
|
|
}
|
||
|
|
-- map <lang. template path> -> <lang. html output path>
|
||
|
|
local languages = {
|
||
|
|
["us/"] = "", -- english is the default.
|
||
|
|
["br/"] = "br/",
|
||
|
|
}
|
||
|
|
|
||
|
|
for lang, lang_out in pairs(languages) do
|
||
|
|
for p=1,#pages do
|
||
|
|
local page = pages[p]
|
||
|
|
dump_page(out_html .. lang_out .. page, page, lang)
|
||
|
|
end
|
||
|
|
end
|
||
|
|
|