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-compiler 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 compiler.lua
--
-- define module: compiler
local compiler = compiler or {}
-- load modules
local utils = require("base/utils")
local string = require("base/string")
local config = require("base/config")
-- get the configure from the given name
function compiler._get(self, name)
-- check
assert(self and name);
-- the compiler configure
local configs = self._CONFIGS
assert(configs)
-- get it
return configs[name]
end
-- make the compile command
function compiler._make(self, srcfile, objfile, flags)
-- check
assert(self);
-- the configure
local configs = self._CONFIGS
assert(configs)
-- get it
return self._make(configs, srcfile, objfile, flags)
end
-- map gcc flags to the given compiler flags
function compiler._mapflags(self, flags)
-- check
assert(self and flags);
-- need not map flags? return it directly
if not self.mapflag then
return flags
end
-- the configure
local configs = self._CONFIGS
assert(configs)
-- map flags
local flags_mapped = {}
for _, flag in pairs(flags) do
-- map it
local flag_mapped = self._mapflag(configs, flag)
if flag_mapped then
flags_mapped[table.getn(flags_mapped) + 1] = flag_mapped
end
end
-- ok?
return flag_mapped
end
-- load the given compiler
function compiler.load(name)
-- check
assert(name and type(name) == "string")
-- gcc?
local module = nil
if name:find("gcc", 1, true) then module = "gcc"
-- clang?
elseif name:find("clang", 1, true) then module = "clang"
-- cl.exe?
elseif name:find("cl.exe", 1, true) then module = "msvc"
-- icc?
elseif name:find("icc", 1, true) then module = "intel"
-- unknown?
else
-- error
utils.error("unknown compiler: %s", name)
return nil
end
-- load the given compiler
local c = require("compiler/_" .. module)
if not c then
return nil
end
-- the compiler has been loaded? return it directly
if c._CONFIGS then
return c
end
-- make the compiler configure
c._CONFIGS = {}
local configs = c._CONFIGS
-- init the compiler name
configs.name = name
-- init the compiler configure
c._init(configs)
-- init interfaces
c["get"] = compiler._get
c["make"] = compiler._make
c["mapflags"] = compiler._mapflags
-- ok?
return c
end
-- return module: compiler
return compiler
|
