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
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
|
--!The Automatic Cross-platform Build Tool
--
-- XMake is free software; you can redistribute it and/or modify
-- it under the terms of the GNU Lesser General Public License as published by
-- the Free Software Foundation; either version 2.1 of the License, or
-- (at your option) any later version.
--
-- XMake is distributed in the hope that it will be useful,
-- but WITHOUT ANY WARRANTY; without even the implied warranty of
-- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
-- GNU Lesser General Public License for more details.
--
-- You should have received a copy of the GNU Lesser General Public License
-- along with XMake;
-- If not, see <a href="http://www.gnu.org/licenses/"> http://www.gnu.org/licenses/</a>
--
-- Copyright (C) 2009 - 2015, ruki All rights reserved.
--
-- @author ruki
-- @file linker.lua
--
-- define module: linker
local linker = linker or {}
-- load modules
local utils = require("base/utils")
local table = require("base/table")
local string = require("base/string")
local config = require("base/config")
local tools = require("tools/tools")
-- map gcc flag to the given linker flag
function linker._mapflag(module, flag)
-- check
assert(module.mapflags and flag)
-- attempt to map it directly
local flag_mapped = module.mapflags[flag]
if flag_mapped and type(flag_mapped) == "string" then
return flag_mapped
end
-- find and replace it using pattern
for k, v in pairs(module.mapflags) do
local flag_mapped, count = flag:gsub(k, v)
if flag_mapped and count ~= 0 then
return utils.ifelse(#flag_mapped ~= 0, flag_mapped, nil)
end
end
-- return it directly
return flag
end
-- map gcc flags to the given linker flags
function linker._mapflags(module, flags)
-- check
assert(module)
-- wrap flags first
flags = utils.wrap(flags)
-- need not map flags? return it directly
if not module.mapflags then
return flags
end
-- map flags
local flags_mapped = {}
for _, flag in pairs(flags) do
-- map it
local flag_mapped = linker._mapflag(module, flag)
if flag_mapped then
table.insert(flags_mapped, flag_mapped)
end
end
-- ok?
return flags_mapped
end
-- get the linker flags from names
function linker._getflags(module, names, flags)
-- check
assert(flags)
-- the mapped flags
local flags_mapped = {}
-- wrap it first
names = utils.wrap(names)
for _, name in ipairs(names) do
table.join2(flags_mapped, linker._mapflags(module, flags[name]))
end
-- get it
return flags_mapped
end
-- make the link command
function linker.make(module, target, objfiles, targetfile)
-- check
assert(module and target)
-- the target kind
local kind = target.kind or ""
-- the flag name
local flag_name = nil
if kind == "binary" then flag_name = "ldflags"
elseif kind == "static" then flag_name = "arflags"
elseif kind == "shared" then flag_name = "shflags"
else
-- error
utils.error("unknown type for linker: %s", kind)
return
end
-- append the common flags from the current linker
local flags = {}
table.join2(flags, module[flag_name])
-- append the target flags from the current project
table.join2(flags, linker._mapflags(module, target[flag_name]))
-- append the linkdirs flags from the current project
if module.flag_linkdir then
local linkdirs = utils.wrap(target.linkdirs)
for _, linkdir in ipairs(linkdirs) do
table.join2(flags, module.flag_linkdir(linkdir))
end
end
-- append the links flags from the current project
if module.flag_link then
local links = utils.wrap(target.links)
for _, link in ipairs(links) do
table.join2(flags, module.flag_link(link))
end
end
-- append the flags from the configure
table.join2(flags, linker._mapflags(module, config.get(flag_name)))
-- append the strip flags from the current project
table.join2(flags, linker._getflags(module, target.strip, { debug = "-S"
, all = "-s"
}))
-- make the link command
return module.command_link(table.concat(objfiles, " "), targetfile, table.concat(flags, " "):trim())
end
-- get the linker from the given kind
function linker.get(kind)
-- check
assert(kind)
-- get the linker name from the kind
local name = nil
if kind == "binary" then name = "ld"
elseif kind == "static" then name = "ar"
elseif kind == "shared" then name = "sh"
else return end
-- get it
local module = tools.get(name)
-- invalid linker?
if module and not module.command_link then
return
end
-- ok?
return module
end
-- return module: linker
return linker
|
