boltbuild 0.1.0

BoltBuild is a programmable build system.
Documentation 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160

---@type Context
local context = ...

BoltPkgConfig = { }

local function extend_path(path, sysroot)
    if path:sub(1, 1) == '=' then
        if sysroot and sysroot ~= '' then
            return sysroot .. path:sub(3)
        else
            return path:sub(2)
        end
    else
        return path
    end
end

local function _run_pkg_config(pkg_name, lib_paths, seen)
    if seen[pkg_name] then
        return
    end
    seen[pkg_name] = true

    local expand = {}
    local configs = {}

    local config_file
    for _, p in ipairs(lib_paths) do
        config_file = p:make_node('pkgconfig/' .. pkg_name .. '.pc')
        if config_file:is_file() then
            break
        end
    end

    if not config_file or not config_file:is_file() then
        context:raise_error('no pkg-config file for library ' .. pkg_name)
    end

    local file = io.open(config_file:abs_path(), 'r')
    local lines = file:lines()
    for line in lines do
        line = line:match('^%s*(.-)%s*$')
        if line == '' or line:sub(1, 1) == '#' then
            goto continue
        end

        local pos = line:find('=')
        local pos2 = line:find(':')
        if pos and (not pos2 or pos2 > pos) then
            local var_name = line:sub(1, pos - 1):match('^%s*(.-)%s*$')
            local value = line:sub(pos + 1):match('^%s*(.-)%s*$')
            if value:sub(1, 1) == '"' and value:sub(-1) == '"' then
                value = value:sub(2, -2)
            end
            --if sysroot ~= '' and value:sub(1, 1) == '/' then
            --    value = sysroot .. value:sub(2)
            --end
            value = value:gsub('%${(%w+)}', function(name)
                return expand[name] or ''
            end)
            expand[var_name] = value
            goto continue
        end

        pos = line:find(':')
        if pos then
            local var_name = line:sub(1, pos - 1):match('^%s*(.-)%s*$')
            local value = line:sub(pos + 1):match('^%s*(.-)%s*$')
            value = value:gsub('%${(%w+)}', function(name)
                return expand[name] or ''
            end)
            configs[var_name] = {}
            for v in value:gmatch('[^%s]+') do
                table.insert(configs[var_name], v)
            end
        end

        :: continue ::
    end
    file:close()

    local cflags, libs, ldflags = {}, {}, {}
    local skip = false
    for _, d in ipairs(configs.Requires or {}) do
        if skip then
            skip = false
        elseif d == '=' or d == '<' or d == '<=' or d == '>' or d == '>=' then
            skip = true
        else
            if not seen[d] then
                local dep_flags = _run_pkg_config(d)
                for _, v in ipairs(dep_flags[1]) do
                    table.insert(cflags, v)
                end
                for _, v in ipairs(dep_flags[2]) do
                    table.insert(libs, v)
                end
                for _, v in ipairs(dep_flags[3]) do
                    table.insert(ldflags, v)
                end
            end
        end
    end

    for _, f in ipairs(configs.Cflags or {}) do
        if f:sub(1, 2) == '-I' then
            local include = f:sub(3)
            --if include:sub(1, 1) == '/' and not include:find(sysroot, 1, true) then
            --    include = sysroot .. include:sub(2)
            --end
            table.insert(cflags, context.env.C_IDIRAFTER .. include)
        else
            table.insert(cflags, f)
        end
    end

    for _, f in ipairs(configs.Libs or {}) do
        if f:sub(1, 2) == '-l' then
            table.insert(libs, f:sub(3))
        elseif f:sub(1, 2) == '-L' then
            local libdir = f:sub(3)
            --if libdir:sub(1, 1) == '/' and not libdir:find(sysroot, 1, true) then
            --    libdir = sysroot .. libdir
            --end
            table.insert(ldflags, context.env.LINK_LIBPATH_F .. libdir)
        else
            table.insert(ldflags, f)
        end
    end

    return cflags, libs, ldflags
end

---@param pkg_name string
---@return string[], string[], string[]
function BoltPkgConfig.run_pkg_config(pkg_name)
    local lib_paths = context.env.C_COMPILER_SYSTEM_LIB_DIRS or {}

    --for _, t in ipairs(context.env.TARGETS or {}) do
    --    table.insert(lib_paths, '=/usr/lib/' .. t)
    --    table.insert(lib_paths, '=/usr/libdata/' .. t)
    --end

    --for i, path in ipairs(lib_paths) do
    --    lib_paths[i] = extend_path(path, sysroot)
    --end

    local seen = {}

    return _run_pkg_config(pkg_name, lib_paths, seen)
end

function BoltPkgConfig.pkg_config(name, var)
    local cflags, libs, ldflags = BoltPkgConfig.run_pkg_config(name)
    context.env['check_' .. var] = true
    context.env['check_' .. var .. '_cflags'] = cflags
    context.env['check_' .. var .. '_cxxflags'] = cflags
    context.env['check_' .. var .. '_libs'] = libs
    context.env['check_' .. var .. '_ldflags'] = ldflags
end