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
|
--!A cross-platform build utility based on Lua
--
-- Licensed under the Apache License, Version 2.0 (the "License");
-- you may not use this file except in compliance with the License.
-- You may obtain a copy of the License at
--
-- http://www.apache.org/licenses/LICENSE-2.0
--
-- Unless required by applicable law or agreed to in writing, software
-- distributed under the License is distributed on an "AS IS" BASIS,
-- WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
-- See the License for the specific language governing permissions and
-- limitations under the License.
--
-- Copyright (C) 2015-present, Xmake Open Source Community.
--
-- @author ruki
-- @file has_flags.lua
--
-- imports
import("core.language.language")
import("core.cache.global_detectcache")
import("core.tools.cl.check_knownargs")
import("private.tools.vstool")
-- attempt to check it from the argument list
function _check_from_arglist(flags, opt)
local key = "core.tools.cl.has_flags"
local flagskey = opt.program .. "_" .. (opt.programver or "")
local allflags = global_detectcache:get2(key, flagskey)
if not allflags then
allflags = {}
-- @see https://github.com/xmake-io/xmake/issues/7610
local arglist = vstool.iorunv(opt.program, {"-?"}, {envs = opt.envs})
if arglist then
for arg in arglist:gmatch("(/[%-%a%d]+)%s+") do
allflags[arg:gsub("/", "-")] = true
end
end
global_detectcache:set2(key, flagskey, allflags)
global_detectcache:save()
end
return allflags[flags[1]:gsub("/", "-")]
end
-- get extension
function _get_extension(opt)
return opt.flagkind == "cxxflags" and ".cpp" or (table.wrap(language.sourcekinds()[opt.toolkind or "cc"])[1] or ".c")
end
-- get the warning/error output from cl, ignoring the source filename echo
--
-- when vstool.iorunv enables VS_UNICODE_OUTPUT, cl will write all its diagnostics
-- (including the D9002 warning for unknown flags, whose exit code is still 0) to
-- stdout instead of stderr, so we only need to check outdata here. and the hard
-- errors (non-zero exit) will be raised by vstool.iorunv and handled by the catch.
--
-- but cl also echoes the source filename to stdout on every compile (even on success,
-- since -nologo only suppresses the banner), so we need to filter it out, the rest is
-- the real warnings/errors for unsupported flags.
--
-- e.g.
-- cl_has_flags_xxx.c <-- the filename echo, skip it
-- cl : Command line warning D9002 : ignoring unknown option '-xx' <-- a real diagnostic
--
function _get_output(outdata, sourcefile)
local filename = path.filename(sourcefile)
local output = {}
for _, line in ipairs((outdata or ""):split("\n", {plain = true})) do
line = line:rtrim()
if #line > 0 and not line:endswith(filename) then
table.insert(output, line)
end
end
return #output > 0 and table.concat(output, "\n") or nil
end
-- try running to check flags
function _check_try_running(flags, opt)
-- make an stub source file
local snippet = opt.snippet or "int main(int argc, char** argv)\n{return 0;}\n"
local sourcefile = os.tmpfile("cl_has_flags:" .. snippet) .. _get_extension(opt)
if not os.isfile(sourcefile) then
io.writefile(sourcefile, snippet)
end
-- check it
local errors = nil
return try { function ()
local tmpdir = os.tmpdir()
local nuldev = os.nuldev()
local tmpfile
if not is_host("windows") then
tmpfile = os.tmpfile()
nuldev = tmpfile
end
local outdata = vstool.iorunv(opt.program, table.join("-c", "-nologo", flags, "-Fo" .. nuldev, sourcefile),
{envs = opt.envs, curdir = tmpdir}) -- we need to switch to tmpdir to avoid generating some tmp files, e.g. /Zi -> vc140.pdb
if tmpfile then
os.tryrm(tmpfile)
end
local errs = _get_output(outdata, sourcefile)
if errs then
return false, errs
end
return true
end,
catch { function (errs) errors = errs end }
}, errors
end
-- has_flags(flags)?
--
-- @param opt the argument options, e.g. {toolname = "", program = "", programver = "", toolkind = "[cc|cxx|ld|ar|sh|gc|rc|dc|mm|mxx]"}
--
-- @return true or false
--
function main(flags, opt)
-- attempt to check it from the argument list
opt = opt or {}
if not opt.tryrun then
if check_knownargs(flags) then
return true
end
if _check_from_arglist(flags, opt) then
return true
end
end
-- try running to check it
return _check_try_running(flags, opt)
end
|
