cprogram works.
This commit is contained in:
David Given
parent
f47bb49c1f
commit
015804afce
|
|
@ -60,7 +60,7 @@ end
|
|||
local function basename(filename)
|
||||
local _, _, b = filename:find("^.*/([^/]*)$")
|
||||
if not b then
|
||||
return ""
|
||||
return filename
|
||||
end
|
||||
return b
|
||||
end
|
||||
|
|
@ -108,7 +108,8 @@ local function filenamesof(targets, pattern)
|
|||
end
|
||||
end
|
||||
else
|
||||
error("list of targets contains something which isn't a target")
|
||||
error(string.format("list of targets contains a %s which isn't a target",
|
||||
type(r)))
|
||||
end
|
||||
end
|
||||
end
|
||||
|
|
|
|||
304
first/build.lua
304
first/build.lua
|
|
@ -143,274 +143,50 @@ definerule("clibrary",
|
|||
end
|
||||
)
|
||||
|
||||
definerule("cprogram",
|
||||
{
|
||||
srcs = { type="targets", default={} },
|
||||
deps = { type="targets", default={} },
|
||||
commands = {
|
||||
type="strings",
|
||||
default={
|
||||
"$(CC) -o %{outs[1]} %{ins}"
|
||||
},
|
||||
}
|
||||
},
|
||||
function (e)
|
||||
local libs = filenamesof(e.deps, "%.a$")
|
||||
if (#e.srcs > 0) then
|
||||
for _, f in pairs(filenamesof(
|
||||
{
|
||||
clibrary {
|
||||
name = "mylib",
|
||||
name = e.name .. "/main",
|
||||
srcs = e.srcs,
|
||||
deps = e.deps
|
||||
}
|
||||
},
|
||||
"%.a$"
|
||||
)) do
|
||||
libs[#libs+1] = f
|
||||
end
|
||||
end
|
||||
|
||||
return normalrule {
|
||||
name = e.name,
|
||||
ins = libs,
|
||||
outleaves = { e.name },
|
||||
commands = e.commands,
|
||||
}
|
||||
end
|
||||
)
|
||||
|
||||
cprogram {
|
||||
name = "test",
|
||||
srcs = {
|
||||
"modules/src/string/*.c",
|
||||
"foo.c",
|
||||
},
|
||||
deps = {
|
||||
"modules:headers"
|
||||
"modules:string"
|
||||
}
|
||||
}
|
||||
|
||||
--[[
|
||||
--
|
||||
-- Targets:
|
||||
--
|
||||
-- {
|
||||
-- dir = target's build directory
|
||||
-- outs = target's object files
|
||||
-- is = { set of rule types which made the target }
|
||||
-- }
|
||||
function M.subenv(p)
|
||||
local e = p[1]
|
||||
setmetable(p, {__index = e})
|
||||
return p
|
||||
end
|
||||
|
||||
local function check_filename(fn)
|
||||
if type(fn) == "table" then
|
||||
for _, f in ipairs(fn) do
|
||||
check_filename(f)
|
||||
end
|
||||
else
|
||||
if fn:find("%s") then
|
||||
error("Filename '"+fn+"' contains spaces. This will make the build system sad.")
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
function M.basename(fn)
|
||||
if type(fn) == "table" then
|
||||
local nfn = {}
|
||||
for _, f in ipairs(fn) do
|
||||
nfn[#nfn+1] = M.basename(f)
|
||||
end
|
||||
return nfn
|
||||
else
|
||||
local _, _, base = fn:find("([^/]*)$")
|
||||
return base
|
||||
end
|
||||
end
|
||||
|
||||
function M.flatten(t)
|
||||
if t == nil then
|
||||
return {}
|
||||
end
|
||||
|
||||
local tt = {}
|
||||
for _, subt in ipairs(t) do
|
||||
if type(subt) == "table" then
|
||||
for _, subt in ipairs(M.flatten(subt)) do
|
||||
tt[#tt+1] = subt
|
||||
end
|
||||
else
|
||||
tt[#tt+1] = subt
|
||||
end
|
||||
end
|
||||
return tt
|
||||
end
|
||||
|
||||
local function append(...)
|
||||
local ts = {}
|
||||
for _, t in ipairs({...}) do
|
||||
for _, v in ipairs(t) do
|
||||
ts[#ts+1] = v
|
||||
end
|
||||
end
|
||||
return ts
|
||||
end
|
||||
|
||||
local function settotable(s)
|
||||
local t = {}
|
||||
for k in pairs(s) do
|
||||
t[#t+1] = k
|
||||
end
|
||||
return t
|
||||
end
|
||||
|
||||
local function asstring(t)
|
||||
return table.concat(M.flatten(t), " ")
|
||||
end
|
||||
|
||||
local function emit(...)
|
||||
for _, s in ipairs({...}) do
|
||||
io.stdout:write(s)
|
||||
end
|
||||
end
|
||||
|
||||
function M.rawtarget(p)
|
||||
local description = p.description or error("no description supplied")
|
||||
local ins = M.flatten(p.ins)
|
||||
local outs = M.flatten(p.outs)
|
||||
|
||||
local cmd = p.command
|
||||
if type(cmd) ~= "table" then
|
||||
cmd = {cmd}
|
||||
end
|
||||
|
||||
for _, s in ipairs(ins) do
|
||||
check_filename(s)
|
||||
end
|
||||
for _, s in ipairs(outs) do
|
||||
check_filename(s)
|
||||
end
|
||||
|
||||
emit(outs[1], ":")
|
||||
for _, s in ipairs(ins) do
|
||||
emit(" ", s)
|
||||
end
|
||||
emit("\n")
|
||||
|
||||
emit("\t@echo ", p.description, "\n")
|
||||
|
||||
emit("\t$(hide) ", table.concat(cmd, " && "), "\n")
|
||||
|
||||
for i = 2, #outs do
|
||||
emit(outs[i], ": ", outs[1], "\n")
|
||||
end
|
||||
|
||||
emit("\n")
|
||||
end
|
||||
|
||||
function M.export(p)
|
||||
local e = p[1]
|
||||
local dest = p.dest or error("no export destination provided")
|
||||
local deps = p.deps or error("nothing to export")
|
||||
|
||||
local fdeps = M.flatten(deps)
|
||||
|
||||
if #fdeps ~= 1 then
|
||||
error("you can only export one thing at a time")
|
||||
end
|
||||
|
||||
return M.rawtarget {e,
|
||||
ins=deps,
|
||||
outs={dest},
|
||||
command="cp "..fdeps[1].." "..dest,
|
||||
description="EXPORT "..dest
|
||||
}
|
||||
end
|
||||
|
||||
function M.hermetic(p)
|
||||
local e = p[1]
|
||||
local ins = M.flatten(p.ins)
|
||||
local deps = M.flatten(p.deps)
|
||||
local baseouts = p.baseouts or error("you must specify some baseouts")
|
||||
local description = p.description
|
||||
|
||||
local absouts = {}
|
||||
local path = e.PATH .. "/" .. p.baseouts[1] .. ".env"
|
||||
|
||||
for _, s in ipairs(M.flatten(p.baseouts)) do
|
||||
absouts[#absouts+1] = path .. "/" .. s
|
||||
end
|
||||
|
||||
local dirset = {}
|
||||
for _, s in ipairs(absouts) do
|
||||
local d = s:gsub("^(.*/).*$", "%1")
|
||||
if d then
|
||||
dirset[d] = true
|
||||
end
|
||||
end
|
||||
|
||||
local newcmd = {
|
||||
"rm -rf "..path,
|
||||
"mkdir -p "..asstring(settotable(dirset)),
|
||||
"ln -srf "..asstring(append(ins, deps)).." "..path,
|
||||
"cd "..path
|
||||
}
|
||||
for _, s in ipairs(p.command) do
|
||||
newcmd[#newcmd+1] = "(" .. s .. ")"
|
||||
end
|
||||
|
||||
M.rawtarget {e,
|
||||
ins={ins, unpack(deps)},
|
||||
outs=absouts,
|
||||
command=newcmd,
|
||||
description=description
|
||||
}
|
||||
|
||||
return absouts
|
||||
end
|
||||
|
||||
function M.cfile(p)
|
||||
local e = p[1]
|
||||
local src = p.src
|
||||
local deps = p.deps or {}
|
||||
|
||||
local outfile = p.src:gsub("%.c$", ".o")
|
||||
local basesrc = M.basename(p.src)
|
||||
|
||||
return M.hermetic {e,
|
||||
ins={src},
|
||||
deps=deps,
|
||||
baseouts={outfile},
|
||||
command={e.CC.." "..e.CFLAGS.." -c -o "..outfile.." "..basesrc},
|
||||
description="CC "..src
|
||||
}
|
||||
end
|
||||
|
||||
function M.cprogram(p)
|
||||
local e = p[1]
|
||||
local name = p.name or error("cprogram must have a name specified")
|
||||
local deps = p.deps or {}
|
||||
local libs = p.libraries or {}
|
||||
local headers = p.headers or {}
|
||||
|
||||
if p.srcs then
|
||||
local mainlib = M.clibrary {e,
|
||||
name=name..".a",
|
||||
deps=deps,
|
||||
srcs=p.srcs,
|
||||
headers=headers
|
||||
}
|
||||
|
||||
deps = append(deps, {mainlib})
|
||||
end
|
||||
|
||||
local libflags = {}
|
||||
for _, s in ipairs(libs) do
|
||||
libflags[#libflags+1] = "-l"..s
|
||||
end
|
||||
|
||||
return M.hermetic {e,
|
||||
ins=deps,
|
||||
baseouts={name},
|
||||
command={e.CC.." "..e.CFLAGS.." -o "..name.." "..asstring(M.basename(deps)).." "..asstring(libflags)},
|
||||
description="CLINK "..name
|
||||
}
|
||||
end
|
||||
|
||||
function M.clibrary(p)
|
||||
local e = p[1]
|
||||
local name = p.name or error("clibrary must have a name specified")
|
||||
local deps = M.flatten(p.deps)
|
||||
local srcs = M.flatten(p.srcs)
|
||||
local headers = M.flatten(p.headers)
|
||||
|
||||
local baseouts = {name}
|
||||
|
||||
local objs = deps
|
||||
for _, f in ipairs(srcs) do
|
||||
objs[#objs+1] = M.cfile {e,
|
||||
src=f,
|
||||
deps=headers
|
||||
}
|
||||
end
|
||||
|
||||
return M.hermetic {e,
|
||||
ins=append(objs, headers),
|
||||
baseouts=baseouts,
|
||||
command={
|
||||
e.AR.." q "..name.." "..asstring(M.basename(objs)),
|
||||
e.RANLIB.." "..name,
|
||||
},
|
||||
description="CLIBRARY "..name
|
||||
}
|
||||
end
|
||||
|
||||
emit("hide = @\n")
|
||||
|
||||
return M
|
||||
--]]
|
||||
|
|
|
|||
|
|
@ -3,3 +3,9 @@ bundle {
|
|||
srcs = { "./h/*.h" }
|
||||
}
|
||||
|
||||
clibrary {
|
||||
name = "string",
|
||||
srcs = { "./src/string/*.c" },
|
||||
deps = { ":headers" },
|
||||
}
|
||||
|
||||
|
|
|
|||
Loading…
Reference in a new issue