1
0
mirror of https://github.com/Adorable-Catgirl/Zorya-NEO.git synced 2024-11-23 18:58:06 +11:00
Zorya-NEO/zcfg-compiler/init.lua
2019-08-27 16:52:48 -05:00

71 lines
1.6 KiB
Lua

local file = arg[1]
if (file == "-") then
file = io.stdin
else
file = io.open(file, "r")
end
local ast = {}
local current_node = ast
for line in file:lines() do
if (line:sub(1, 6) ~= "entry " and line ~= "") then
--Parse arguments
local tmp = ""
local open_quote = false
local escape = false
local cmd = nil
local args = {}
local pos = 0
line = line:gsub("^%s+", ""):gsub("%s+$", ""):gsub("%s+", " ")
for i=1, #line do
local c = line:sub(i, i)
if (c == " " and not open_quote) then
if (tmp ~= "") then
if not cmd then
cmd = tmp
else
args[#args+1] = tmp
end
end
tmp = ""
elseif (c == "\"" and not escape and not open_quote) then
open_quote = true
elseif (c == "\"" and not escape) then
open_quote = false
args[#args+1] = "\""..tmp.."\""
tmp = ""
elseif (c == "\\" and not escape) then
escape = true
else
if (escape) then escape = false end
tmp = tmp .. c
end
end
if (tmp ~= "") then
if not cmd then
cmd = tmp
else
args[#args+1] = tmp
end
end
current_node[#current_node+1] = {type="call", call = cmd, args = args}
elseif (line ~= "") then
ast[#ast+1] = {type = "entry", name = line:sub(7)}
current_node = ast[#ast]
end
end
print("-- WARNING: Do not edit this file. This file is autogenerated by the zcfg-compiler")
for i=1, #ast do
if (ast[i].type == "entry") then
print("menu.entry(\""..ast[i].name.."\", function(env)")
for j=1, #ast[i] do
print("\tenv:"..ast[i][j].call.."("..table.concat(ast[i][j].args, ", ")..")")
end
print("end)")
else
print("menu."..ast[i].call.."("..table.concat(ast[i].args, ", ")..")")
end
end