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
|
--!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 parse_include.lua
--
-- imports
import("core.project.project")
import("core.base.hashset")
import("core.tool.toolchain")
import("core.cache.detectcache")
import("lib.detect.find_tool")
import("private.tools.vstool")
-- probe include note prefix from cl
function probe_include_note_from_cl()
local key = "cldeps.parse_include.note"
local note = detectcache:get(key)
if not note then
local runenvs = toolchain.load("msvc"):runenvs()
local cl = find_tool("cl", {envs = runenvs})
if cl then
local projectdir = os.tmpfile() .. ".cldeps"
local sourcefile = path.join(projectdir, "main.c")
local headerfile = path.join(projectdir, "foo.h")
local objectfile = sourcefile .. ".obj"
local outdata = try { function()
local argv = {"-nologo", "-showIncludes", "-c", "-Fo" .. objectfile, sourcefile}
io.writefile(headerfile, "\n")
io.writefile(sourcefile, [[
#include "foo.h"
int main (int argc, char** argv) {
return 0;
}
]])
return vstool.iorunv(cl.program, argv, {envs = runenvs, curdir = projectdir})
end}
if outdata then
for _, line in ipairs(outdata:split('\n', {plain = true})) do
note = line:match("^(.-:.-: )")
if note then
break
end
end
end
os.tryrm(projectdir)
end
detectcache:set(key, note)
end
return note
end
-- get include notes prefix, e.g. "Note: including file: "
--
-- @note we cannot get better solution to distinguish between `includes` and `error infos`
--
function get_include_notes()
local notes = _g.notes
if not notes then
notes = {}
local note = probe_include_note_from_cl()
if note then
table.insert(notes, note)
end
table.join2(notes, {
"Note: including file: ", -- en
"注意: 包含文件: ", -- zh
"Remarque : inclusion du fichier : ", -- fr
"メモ: インクルード ファイル: " -- jp
})
_g.notes = notes
end
return notes
end
-- has include note?
function has_include_note(line)
local note = _g.note
if note and line:startswith(note) then
return note
end
local notes = get_include_notes()
for idx, note in ipairs(notes) do
if line:startswith(note) then
_g.note = note
return note
end
end
end
-- parse note includes
function main(line)
local note = has_include_note(line)
if note then
return line:sub(#note):trim()
end
end
|