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
|
--!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 string = require("base/string")
local config = require("base/config")
local tools = require("tools/tools")
-- map gcc flags to the given linker flags
function linker._mapflags(module, flags)
-- check
assert(module and flags);
-- need not map flags? return it directly
if not module.mapflag then
return flags
end
-- map flags
local flags_mapped = {}
for _, flag in pairs(flags) do
-- map it
local flag_mapped = module.flag_map(flag)
if flag_mapped then
table.insert(flags_mapped, flag_mapped)
end
end
-- ok?
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
-- get the common flags from the current linker
local flags_common = module[flag_name] or ""
-- get the target flags from the current project
local flags_target = table.concat(linker._mapflags(module, utils.wrap(target[flag_name])), " ")
assert(flags_target)
-- get the linkdirs flags from the current project
if module._make_linkdir then
local linkdirs = utils.wrap(target.linkdirs)
for _, linkdir in ipairs(linkdirs) do
flags_target = flags_target:append(module.flag_linkdir(linkdir), " ")
end
end
-- get the links flags from the current project
if module._make_link then
local links = utils.wrap(target.links)
for _, link in ipairs(links) do
flags_target = flags_target:append(module.flag_link(link), " ")
end
end
-- get the config flags
local flags_config = table.concat(linker._mapflags(module, utils.wrap(config.get(flag_name))), " ")
assert(flags_config)
-- make the flags string
local flags = ""
flags = flags:append(flags_common, " ")
flags = flags:append(flags_target, " ")
flags = flags:append(flags_config, " ")
flags = flags:trim()
-- make the link command
return module.command_link(table.concat(objfiles, " "), targetfile, flags)
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
|
