annotate clang/lib/Basic/Module.cpp @ 176:de4ac79aef9d

...
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Mon, 25 May 2020 17:13:11 +0900
parents 0572611fdcc8
children 2e18cbf3894f
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
150
anatofuz
parents:
diff changeset
1 //===- Module.cpp - Describe a module -------------------------------------===//
anatofuz
parents:
diff changeset
2 //
anatofuz
parents:
diff changeset
3 // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
anatofuz
parents:
diff changeset
4 // See https://llvm.org/LICENSE.txt for license information.
anatofuz
parents:
diff changeset
5 // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
anatofuz
parents:
diff changeset
6 //
anatofuz
parents:
diff changeset
7 //===----------------------------------------------------------------------===//
anatofuz
parents:
diff changeset
8 //
anatofuz
parents:
diff changeset
9 // This file defines the Module class, which describes a module in the source
anatofuz
parents:
diff changeset
10 // code.
anatofuz
parents:
diff changeset
11 //
anatofuz
parents:
diff changeset
12 //===----------------------------------------------------------------------===//
anatofuz
parents:
diff changeset
13
anatofuz
parents:
diff changeset
14 #include "clang/Basic/Module.h"
anatofuz
parents:
diff changeset
15 #include "clang/Basic/CharInfo.h"
anatofuz
parents:
diff changeset
16 #include "clang/Basic/FileManager.h"
anatofuz
parents:
diff changeset
17 #include "clang/Basic/LangOptions.h"
anatofuz
parents:
diff changeset
18 #include "clang/Basic/SourceLocation.h"
anatofuz
parents:
diff changeset
19 #include "clang/Basic/TargetInfo.h"
anatofuz
parents:
diff changeset
20 #include "llvm/ADT/ArrayRef.h"
anatofuz
parents:
diff changeset
21 #include "llvm/ADT/SmallVector.h"
anatofuz
parents:
diff changeset
22 #include "llvm/ADT/StringMap.h"
anatofuz
parents:
diff changeset
23 #include "llvm/ADT/StringRef.h"
anatofuz
parents:
diff changeset
24 #include "llvm/ADT/StringSwitch.h"
anatofuz
parents:
diff changeset
25 #include "llvm/Support/Compiler.h"
anatofuz
parents:
diff changeset
26 #include "llvm/Support/ErrorHandling.h"
anatofuz
parents:
diff changeset
27 #include "llvm/Support/raw_ostream.h"
anatofuz
parents:
diff changeset
28 #include <algorithm>
anatofuz
parents:
diff changeset
29 #include <cassert>
anatofuz
parents:
diff changeset
30 #include <functional>
anatofuz
parents:
diff changeset
31 #include <string>
anatofuz
parents:
diff changeset
32 #include <utility>
anatofuz
parents:
diff changeset
33 #include <vector>
anatofuz
parents:
diff changeset
34
anatofuz
parents:
diff changeset
35 using namespace clang;
anatofuz
parents:
diff changeset
36
anatofuz
parents:
diff changeset
37 Module::Module(StringRef Name, SourceLocation DefinitionLoc, Module *Parent,
anatofuz
parents:
diff changeset
38 bool IsFramework, bool IsExplicit, unsigned VisibilityID)
anatofuz
parents:
diff changeset
39 : Name(Name), DefinitionLoc(DefinitionLoc), Parent(Parent),
173
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
40 VisibilityID(VisibilityID), IsUnimportable(false),
150
anatofuz
parents:
diff changeset
41 HasIncompatibleModuleFile(false), IsAvailable(true),
anatofuz
parents:
diff changeset
42 IsFromModuleFile(false), IsFramework(IsFramework), IsExplicit(IsExplicit),
anatofuz
parents:
diff changeset
43 IsSystem(false), IsExternC(false), IsInferred(false),
anatofuz
parents:
diff changeset
44 InferSubmodules(false), InferExplicitSubmodules(false),
anatofuz
parents:
diff changeset
45 InferExportWildcard(false), ConfigMacrosExhaustive(false),
anatofuz
parents:
diff changeset
46 NoUndeclaredIncludes(false), ModuleMapIsPrivate(false),
173
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
47 HasUmbrellaDir(false), NameVisibility(Hidden) {
150
anatofuz
parents:
diff changeset
48 if (Parent) {
173
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
49 IsAvailable = Parent->isAvailable();
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
50 IsUnimportable = Parent->isUnimportable();
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
51 IsSystem = Parent->IsSystem;
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
52 IsExternC = Parent->IsExternC;
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
53 NoUndeclaredIncludes = Parent->NoUndeclaredIncludes;
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
54 ModuleMapIsPrivate = Parent->ModuleMapIsPrivate;
150
anatofuz
parents:
diff changeset
55
anatofuz
parents:
diff changeset
56 Parent->SubModuleIndex[Name] = Parent->SubModules.size();
anatofuz
parents:
diff changeset
57 Parent->SubModules.push_back(this);
anatofuz
parents:
diff changeset
58 }
anatofuz
parents:
diff changeset
59 }
anatofuz
parents:
diff changeset
60
anatofuz
parents:
diff changeset
61 Module::~Module() {
anatofuz
parents:
diff changeset
62 for (submodule_iterator I = submodule_begin(), IEnd = submodule_end();
anatofuz
parents:
diff changeset
63 I != IEnd; ++I) {
anatofuz
parents:
diff changeset
64 delete *I;
anatofuz
parents:
diff changeset
65 }
anatofuz
parents:
diff changeset
66 }
anatofuz
parents:
diff changeset
67
anatofuz
parents:
diff changeset
68 static bool isPlatformEnvironment(const TargetInfo &Target, StringRef Feature) {
anatofuz
parents:
diff changeset
69 StringRef Platform = Target.getPlatformName();
anatofuz
parents:
diff changeset
70 StringRef Env = Target.getTriple().getEnvironmentName();
anatofuz
parents:
diff changeset
71
anatofuz
parents:
diff changeset
72 // Attempt to match platform and environment.
anatofuz
parents:
diff changeset
73 if (Platform == Feature || Target.getTriple().getOSName() == Feature ||
anatofuz
parents:
diff changeset
74 Env == Feature)
anatofuz
parents:
diff changeset
75 return true;
anatofuz
parents:
diff changeset
76
anatofuz
parents:
diff changeset
77 auto CmpPlatformEnv = [](StringRef LHS, StringRef RHS) {
anatofuz
parents:
diff changeset
78 auto Pos = LHS.find("-");
anatofuz
parents:
diff changeset
79 if (Pos == StringRef::npos)
anatofuz
parents:
diff changeset
80 return false;
anatofuz
parents:
diff changeset
81 SmallString<128> NewLHS = LHS.slice(0, Pos);
anatofuz
parents:
diff changeset
82 NewLHS += LHS.slice(Pos+1, LHS.size());
anatofuz
parents:
diff changeset
83 return NewLHS == RHS;
anatofuz
parents:
diff changeset
84 };
anatofuz
parents:
diff changeset
85
anatofuz
parents:
diff changeset
86 SmallString<128> PlatformEnv = Target.getTriple().getOSAndEnvironmentName();
anatofuz
parents:
diff changeset
87 // Darwin has different but equivalent variants for simulators, example:
anatofuz
parents:
diff changeset
88 // 1. x86_64-apple-ios-simulator
anatofuz
parents:
diff changeset
89 // 2. x86_64-apple-iossimulator
anatofuz
parents:
diff changeset
90 // where both are valid examples of the same platform+environment but in the
anatofuz
parents:
diff changeset
91 // variant (2) the simulator is hardcoded as part of the platform name. Both
anatofuz
parents:
diff changeset
92 // forms above should match for "iossimulator" requirement.
anatofuz
parents:
diff changeset
93 if (Target.getTriple().isOSDarwin() && PlatformEnv.endswith("simulator"))
anatofuz
parents:
diff changeset
94 return PlatformEnv == Feature || CmpPlatformEnv(PlatformEnv, Feature);
anatofuz
parents:
diff changeset
95
anatofuz
parents:
diff changeset
96 return PlatformEnv == Feature;
anatofuz
parents:
diff changeset
97 }
anatofuz
parents:
diff changeset
98
anatofuz
parents:
diff changeset
99 /// Determine whether a translation unit built using the current
anatofuz
parents:
diff changeset
100 /// language options has the given feature.
anatofuz
parents:
diff changeset
101 static bool hasFeature(StringRef Feature, const LangOptions &LangOpts,
anatofuz
parents:
diff changeset
102 const TargetInfo &Target) {
anatofuz
parents:
diff changeset
103 bool HasFeature = llvm::StringSwitch<bool>(Feature)
anatofuz
parents:
diff changeset
104 .Case("altivec", LangOpts.AltiVec)
anatofuz
parents:
diff changeset
105 .Case("blocks", LangOpts.Blocks)
anatofuz
parents:
diff changeset
106 .Case("coroutines", LangOpts.Coroutines)
anatofuz
parents:
diff changeset
107 .Case("cplusplus", LangOpts.CPlusPlus)
anatofuz
parents:
diff changeset
108 .Case("cplusplus11", LangOpts.CPlusPlus11)
anatofuz
parents:
diff changeset
109 .Case("cplusplus14", LangOpts.CPlusPlus14)
anatofuz
parents:
diff changeset
110 .Case("cplusplus17", LangOpts.CPlusPlus17)
anatofuz
parents:
diff changeset
111 .Case("c99", LangOpts.C99)
anatofuz
parents:
diff changeset
112 .Case("c11", LangOpts.C11)
anatofuz
parents:
diff changeset
113 .Case("c17", LangOpts.C17)
anatofuz
parents:
diff changeset
114 .Case("freestanding", LangOpts.Freestanding)
anatofuz
parents:
diff changeset
115 .Case("gnuinlineasm", LangOpts.GNUAsm)
anatofuz
parents:
diff changeset
116 .Case("objc", LangOpts.ObjC)
anatofuz
parents:
diff changeset
117 .Case("objc_arc", LangOpts.ObjCAutoRefCount)
anatofuz
parents:
diff changeset
118 .Case("opencl", LangOpts.OpenCL)
anatofuz
parents:
diff changeset
119 .Case("tls", Target.isTLSSupported())
anatofuz
parents:
diff changeset
120 .Case("zvector", LangOpts.ZVector)
anatofuz
parents:
diff changeset
121 .Default(Target.hasFeature(Feature) ||
anatofuz
parents:
diff changeset
122 isPlatformEnvironment(Target, Feature));
anatofuz
parents:
diff changeset
123 if (!HasFeature)
anatofuz
parents:
diff changeset
124 HasFeature = std::find(LangOpts.ModuleFeatures.begin(),
anatofuz
parents:
diff changeset
125 LangOpts.ModuleFeatures.end(),
anatofuz
parents:
diff changeset
126 Feature) != LangOpts.ModuleFeatures.end();
anatofuz
parents:
diff changeset
127 return HasFeature;
anatofuz
parents:
diff changeset
128 }
anatofuz
parents:
diff changeset
129
173
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
130 bool Module::isUnimportable(const LangOptions &LangOpts,
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
131 const TargetInfo &Target, Requirement &Req,
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
132 Module *&ShadowingModule) const {
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
133 if (!IsUnimportable)
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
134 return false;
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
135
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
136 for (const Module *Current = this; Current; Current = Current->Parent) {
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
137 if (Current->ShadowingModule) {
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
138 ShadowingModule = Current->ShadowingModule;
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
139 return true;
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
140 }
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
141 for (unsigned I = 0, N = Current->Requirements.size(); I != N; ++I) {
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
142 if (hasFeature(Current->Requirements[I].first, LangOpts, Target) !=
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
143 Current->Requirements[I].second) {
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
144 Req = Current->Requirements[I];
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
145 return true;
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
146 }
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
147 }
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
148 }
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
149
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
150 llvm_unreachable("could not find a reason why module is unimportable");
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
151 }
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
152
150
anatofuz
parents:
diff changeset
153 bool Module::isAvailable(const LangOptions &LangOpts, const TargetInfo &Target,
anatofuz
parents:
diff changeset
154 Requirement &Req,
anatofuz
parents:
diff changeset
155 UnresolvedHeaderDirective &MissingHeader,
anatofuz
parents:
diff changeset
156 Module *&ShadowingModule) const {
anatofuz
parents:
diff changeset
157 if (IsAvailable)
anatofuz
parents:
diff changeset
158 return true;
anatofuz
parents:
diff changeset
159
173
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
160 if (isUnimportable(LangOpts, Target, Req, ShadowingModule))
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
161 return false;
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
162
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
163 // FIXME: All missing headers are listed on the top-level module. Should we
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
164 // just look there?
150
anatofuz
parents:
diff changeset
165 for (const Module *Current = this; Current; Current = Current->Parent) {
anatofuz
parents:
diff changeset
166 if (!Current->MissingHeaders.empty()) {
anatofuz
parents:
diff changeset
167 MissingHeader = Current->MissingHeaders.front();
anatofuz
parents:
diff changeset
168 return false;
anatofuz
parents:
diff changeset
169 }
anatofuz
parents:
diff changeset
170 }
anatofuz
parents:
diff changeset
171
anatofuz
parents:
diff changeset
172 llvm_unreachable("could not find a reason why module is unavailable");
anatofuz
parents:
diff changeset
173 }
anatofuz
parents:
diff changeset
174
anatofuz
parents:
diff changeset
175 bool Module::isSubModuleOf(const Module *Other) const {
anatofuz
parents:
diff changeset
176 const Module *This = this;
anatofuz
parents:
diff changeset
177 do {
anatofuz
parents:
diff changeset
178 if (This == Other)
anatofuz
parents:
diff changeset
179 return true;
anatofuz
parents:
diff changeset
180
anatofuz
parents:
diff changeset
181 This = This->Parent;
anatofuz
parents:
diff changeset
182 } while (This);
anatofuz
parents:
diff changeset
183
anatofuz
parents:
diff changeset
184 return false;
anatofuz
parents:
diff changeset
185 }
anatofuz
parents:
diff changeset
186
anatofuz
parents:
diff changeset
187 const Module *Module::getTopLevelModule() const {
anatofuz
parents:
diff changeset
188 const Module *Result = this;
anatofuz
parents:
diff changeset
189 while (Result->Parent)
anatofuz
parents:
diff changeset
190 Result = Result->Parent;
anatofuz
parents:
diff changeset
191
anatofuz
parents:
diff changeset
192 return Result;
anatofuz
parents:
diff changeset
193 }
anatofuz
parents:
diff changeset
194
anatofuz
parents:
diff changeset
195 static StringRef getModuleNameFromComponent(
anatofuz
parents:
diff changeset
196 const std::pair<std::string, SourceLocation> &IdComponent) {
anatofuz
parents:
diff changeset
197 return IdComponent.first;
anatofuz
parents:
diff changeset
198 }
anatofuz
parents:
diff changeset
199
anatofuz
parents:
diff changeset
200 static StringRef getModuleNameFromComponent(StringRef R) { return R; }
anatofuz
parents:
diff changeset
201
anatofuz
parents:
diff changeset
202 template<typename InputIter>
anatofuz
parents:
diff changeset
203 static void printModuleId(raw_ostream &OS, InputIter Begin, InputIter End,
anatofuz
parents:
diff changeset
204 bool AllowStringLiterals = true) {
anatofuz
parents:
diff changeset
205 for (InputIter It = Begin; It != End; ++It) {
anatofuz
parents:
diff changeset
206 if (It != Begin)
anatofuz
parents:
diff changeset
207 OS << ".";
anatofuz
parents:
diff changeset
208
anatofuz
parents:
diff changeset
209 StringRef Name = getModuleNameFromComponent(*It);
anatofuz
parents:
diff changeset
210 if (!AllowStringLiterals || isValidIdentifier(Name))
anatofuz
parents:
diff changeset
211 OS << Name;
anatofuz
parents:
diff changeset
212 else {
anatofuz
parents:
diff changeset
213 OS << '"';
anatofuz
parents:
diff changeset
214 OS.write_escaped(Name);
anatofuz
parents:
diff changeset
215 OS << '"';
anatofuz
parents:
diff changeset
216 }
anatofuz
parents:
diff changeset
217 }
anatofuz
parents:
diff changeset
218 }
anatofuz
parents:
diff changeset
219
anatofuz
parents:
diff changeset
220 template<typename Container>
anatofuz
parents:
diff changeset
221 static void printModuleId(raw_ostream &OS, const Container &C) {
anatofuz
parents:
diff changeset
222 return printModuleId(OS, C.begin(), C.end());
anatofuz
parents:
diff changeset
223 }
anatofuz
parents:
diff changeset
224
anatofuz
parents:
diff changeset
225 std::string Module::getFullModuleName(bool AllowStringLiterals) const {
anatofuz
parents:
diff changeset
226 SmallVector<StringRef, 2> Names;
anatofuz
parents:
diff changeset
227
anatofuz
parents:
diff changeset
228 // Build up the set of module names (from innermost to outermost).
anatofuz
parents:
diff changeset
229 for (const Module *M = this; M; M = M->Parent)
anatofuz
parents:
diff changeset
230 Names.push_back(M->Name);
anatofuz
parents:
diff changeset
231
anatofuz
parents:
diff changeset
232 std::string Result;
anatofuz
parents:
diff changeset
233
anatofuz
parents:
diff changeset
234 llvm::raw_string_ostream Out(Result);
anatofuz
parents:
diff changeset
235 printModuleId(Out, Names.rbegin(), Names.rend(), AllowStringLiterals);
anatofuz
parents:
diff changeset
236 Out.flush();
anatofuz
parents:
diff changeset
237
anatofuz
parents:
diff changeset
238 return Result;
anatofuz
parents:
diff changeset
239 }
anatofuz
parents:
diff changeset
240
anatofuz
parents:
diff changeset
241 bool Module::fullModuleNameIs(ArrayRef<StringRef> nameParts) const {
anatofuz
parents:
diff changeset
242 for (const Module *M = this; M; M = M->Parent) {
anatofuz
parents:
diff changeset
243 if (nameParts.empty() || M->Name != nameParts.back())
anatofuz
parents:
diff changeset
244 return false;
anatofuz
parents:
diff changeset
245 nameParts = nameParts.drop_back();
anatofuz
parents:
diff changeset
246 }
anatofuz
parents:
diff changeset
247 return nameParts.empty();
anatofuz
parents:
diff changeset
248 }
anatofuz
parents:
diff changeset
249
anatofuz
parents:
diff changeset
250 Module::DirectoryName Module::getUmbrellaDir() const {
anatofuz
parents:
diff changeset
251 if (Header U = getUmbrellaHeader())
anatofuz
parents:
diff changeset
252 return {"", U.Entry->getDir()};
anatofuz
parents:
diff changeset
253
173
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
254 return {UmbrellaAsWritten, static_cast<const DirectoryEntry *>(Umbrella)};
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
255 }
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
256
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
257 void Module::addTopHeader(const FileEntry *File) {
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
258 assert(File);
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
259 TopHeaders.insert(File);
150
anatofuz
parents:
diff changeset
260 }
anatofuz
parents:
diff changeset
261
anatofuz
parents:
diff changeset
262 ArrayRef<const FileEntry *> Module::getTopHeaders(FileManager &FileMgr) {
anatofuz
parents:
diff changeset
263 if (!TopHeaderNames.empty()) {
anatofuz
parents:
diff changeset
264 for (std::vector<std::string>::iterator
anatofuz
parents:
diff changeset
265 I = TopHeaderNames.begin(), E = TopHeaderNames.end(); I != E; ++I) {
anatofuz
parents:
diff changeset
266 if (auto FE = FileMgr.getFile(*I))
anatofuz
parents:
diff changeset
267 TopHeaders.insert(*FE);
anatofuz
parents:
diff changeset
268 }
anatofuz
parents:
diff changeset
269 TopHeaderNames.clear();
anatofuz
parents:
diff changeset
270 }
anatofuz
parents:
diff changeset
271
anatofuz
parents:
diff changeset
272 return llvm::makeArrayRef(TopHeaders.begin(), TopHeaders.end());
anatofuz
parents:
diff changeset
273 }
anatofuz
parents:
diff changeset
274
anatofuz
parents:
diff changeset
275 bool Module::directlyUses(const Module *Requested) const {
anatofuz
parents:
diff changeset
276 auto *Top = getTopLevelModule();
anatofuz
parents:
diff changeset
277
anatofuz
parents:
diff changeset
278 // A top-level module implicitly uses itself.
anatofuz
parents:
diff changeset
279 if (Requested->isSubModuleOf(Top))
anatofuz
parents:
diff changeset
280 return true;
anatofuz
parents:
diff changeset
281
anatofuz
parents:
diff changeset
282 for (auto *Use : Top->DirectUses)
anatofuz
parents:
diff changeset
283 if (Requested->isSubModuleOf(Use))
anatofuz
parents:
diff changeset
284 return true;
anatofuz
parents:
diff changeset
285
anatofuz
parents:
diff changeset
286 // Anyone is allowed to use our builtin stddef.h and its accompanying module.
anatofuz
parents:
diff changeset
287 if (!Requested->Parent && Requested->Name == "_Builtin_stddef_max_align_t")
anatofuz
parents:
diff changeset
288 return true;
anatofuz
parents:
diff changeset
289
anatofuz
parents:
diff changeset
290 return false;
anatofuz
parents:
diff changeset
291 }
anatofuz
parents:
diff changeset
292
anatofuz
parents:
diff changeset
293 void Module::addRequirement(StringRef Feature, bool RequiredState,
anatofuz
parents:
diff changeset
294 const LangOptions &LangOpts,
anatofuz
parents:
diff changeset
295 const TargetInfo &Target) {
anatofuz
parents:
diff changeset
296 Requirements.push_back(Requirement(std::string(Feature), RequiredState));
anatofuz
parents:
diff changeset
297
anatofuz
parents:
diff changeset
298 // If this feature is currently available, we're done.
anatofuz
parents:
diff changeset
299 if (hasFeature(Feature, LangOpts, Target) == RequiredState)
anatofuz
parents:
diff changeset
300 return;
anatofuz
parents:
diff changeset
301
173
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
302 markUnavailable(/*Unimportable*/true);
150
anatofuz
parents:
diff changeset
303 }
anatofuz
parents:
diff changeset
304
173
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
305 void Module::markUnavailable(bool Unimportable) {
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
306 auto needUpdate = [Unimportable](Module *M) {
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
307 return M->IsAvailable || (!M->IsUnimportable && Unimportable);
150
anatofuz
parents:
diff changeset
308 };
anatofuz
parents:
diff changeset
309
anatofuz
parents:
diff changeset
310 if (!needUpdate(this))
anatofuz
parents:
diff changeset
311 return;
anatofuz
parents:
diff changeset
312
anatofuz
parents:
diff changeset
313 SmallVector<Module *, 2> Stack;
anatofuz
parents:
diff changeset
314 Stack.push_back(this);
anatofuz
parents:
diff changeset
315 while (!Stack.empty()) {
anatofuz
parents:
diff changeset
316 Module *Current = Stack.back();
anatofuz
parents:
diff changeset
317 Stack.pop_back();
anatofuz
parents:
diff changeset
318
anatofuz
parents:
diff changeset
319 if (!needUpdate(Current))
anatofuz
parents:
diff changeset
320 continue;
anatofuz
parents:
diff changeset
321
anatofuz
parents:
diff changeset
322 Current->IsAvailable = false;
173
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
323 Current->IsUnimportable |= Unimportable;
150
anatofuz
parents:
diff changeset
324 for (submodule_iterator Sub = Current->submodule_begin(),
anatofuz
parents:
diff changeset
325 SubEnd = Current->submodule_end();
anatofuz
parents:
diff changeset
326 Sub != SubEnd; ++Sub) {
anatofuz
parents:
diff changeset
327 if (needUpdate(*Sub))
anatofuz
parents:
diff changeset
328 Stack.push_back(*Sub);
anatofuz
parents:
diff changeset
329 }
anatofuz
parents:
diff changeset
330 }
anatofuz
parents:
diff changeset
331 }
anatofuz
parents:
diff changeset
332
anatofuz
parents:
diff changeset
333 Module *Module::findSubmodule(StringRef Name) const {
anatofuz
parents:
diff changeset
334 llvm::StringMap<unsigned>::const_iterator Pos = SubModuleIndex.find(Name);
anatofuz
parents:
diff changeset
335 if (Pos == SubModuleIndex.end())
anatofuz
parents:
diff changeset
336 return nullptr;
anatofuz
parents:
diff changeset
337
anatofuz
parents:
diff changeset
338 return SubModules[Pos->getValue()];
anatofuz
parents:
diff changeset
339 }
anatofuz
parents:
diff changeset
340
anatofuz
parents:
diff changeset
341 Module *Module::findOrInferSubmodule(StringRef Name) {
anatofuz
parents:
diff changeset
342 llvm::StringMap<unsigned>::const_iterator Pos = SubModuleIndex.find(Name);
anatofuz
parents:
diff changeset
343 if (Pos != SubModuleIndex.end())
anatofuz
parents:
diff changeset
344 return SubModules[Pos->getValue()];
anatofuz
parents:
diff changeset
345 if (!InferSubmodules)
anatofuz
parents:
diff changeset
346 return nullptr;
anatofuz
parents:
diff changeset
347 Module *Result = new Module(Name, SourceLocation(), this, false, InferExplicitSubmodules, 0);
anatofuz
parents:
diff changeset
348 Result->InferExplicitSubmodules = InferExplicitSubmodules;
anatofuz
parents:
diff changeset
349 Result->InferSubmodules = InferSubmodules;
anatofuz
parents:
diff changeset
350 Result->InferExportWildcard = InferExportWildcard;
anatofuz
parents:
diff changeset
351 if (Result->InferExportWildcard)
anatofuz
parents:
diff changeset
352 Result->Exports.push_back(Module::ExportDecl(nullptr, true));
anatofuz
parents:
diff changeset
353 return Result;
anatofuz
parents:
diff changeset
354 }
anatofuz
parents:
diff changeset
355
anatofuz
parents:
diff changeset
356 void Module::getExportedModules(SmallVectorImpl<Module *> &Exported) const {
anatofuz
parents:
diff changeset
357 // All non-explicit submodules are exported.
anatofuz
parents:
diff changeset
358 for (std::vector<Module *>::const_iterator I = SubModules.begin(),
anatofuz
parents:
diff changeset
359 E = SubModules.end();
anatofuz
parents:
diff changeset
360 I != E; ++I) {
anatofuz
parents:
diff changeset
361 Module *Mod = *I;
anatofuz
parents:
diff changeset
362 if (!Mod->IsExplicit)
anatofuz
parents:
diff changeset
363 Exported.push_back(Mod);
anatofuz
parents:
diff changeset
364 }
anatofuz
parents:
diff changeset
365
anatofuz
parents:
diff changeset
366 // Find re-exported modules by filtering the list of imported modules.
anatofuz
parents:
diff changeset
367 bool AnyWildcard = false;
anatofuz
parents:
diff changeset
368 bool UnrestrictedWildcard = false;
anatofuz
parents:
diff changeset
369 SmallVector<Module *, 4> WildcardRestrictions;
anatofuz
parents:
diff changeset
370 for (unsigned I = 0, N = Exports.size(); I != N; ++I) {
anatofuz
parents:
diff changeset
371 Module *Mod = Exports[I].getPointer();
anatofuz
parents:
diff changeset
372 if (!Exports[I].getInt()) {
anatofuz
parents:
diff changeset
373 // Export a named module directly; no wildcards involved.
anatofuz
parents:
diff changeset
374 Exported.push_back(Mod);
anatofuz
parents:
diff changeset
375
anatofuz
parents:
diff changeset
376 continue;
anatofuz
parents:
diff changeset
377 }
anatofuz
parents:
diff changeset
378
anatofuz
parents:
diff changeset
379 // Wildcard export: export all of the imported modules that match
anatofuz
parents:
diff changeset
380 // the given pattern.
anatofuz
parents:
diff changeset
381 AnyWildcard = true;
anatofuz
parents:
diff changeset
382 if (UnrestrictedWildcard)
anatofuz
parents:
diff changeset
383 continue;
anatofuz
parents:
diff changeset
384
anatofuz
parents:
diff changeset
385 if (Module *Restriction = Exports[I].getPointer())
anatofuz
parents:
diff changeset
386 WildcardRestrictions.push_back(Restriction);
anatofuz
parents:
diff changeset
387 else {
anatofuz
parents:
diff changeset
388 WildcardRestrictions.clear();
anatofuz
parents:
diff changeset
389 UnrestrictedWildcard = true;
anatofuz
parents:
diff changeset
390 }
anatofuz
parents:
diff changeset
391 }
anatofuz
parents:
diff changeset
392
anatofuz
parents:
diff changeset
393 // If there were any wildcards, push any imported modules that were
anatofuz
parents:
diff changeset
394 // re-exported by the wildcard restriction.
anatofuz
parents:
diff changeset
395 if (!AnyWildcard)
anatofuz
parents:
diff changeset
396 return;
anatofuz
parents:
diff changeset
397
anatofuz
parents:
diff changeset
398 for (unsigned I = 0, N = Imports.size(); I != N; ++I) {
anatofuz
parents:
diff changeset
399 Module *Mod = Imports[I];
anatofuz
parents:
diff changeset
400 bool Acceptable = UnrestrictedWildcard;
anatofuz
parents:
diff changeset
401 if (!Acceptable) {
anatofuz
parents:
diff changeset
402 // Check whether this module meets one of the restrictions.
anatofuz
parents:
diff changeset
403 for (unsigned R = 0, NR = WildcardRestrictions.size(); R != NR; ++R) {
anatofuz
parents:
diff changeset
404 Module *Restriction = WildcardRestrictions[R];
anatofuz
parents:
diff changeset
405 if (Mod == Restriction || Mod->isSubModuleOf(Restriction)) {
anatofuz
parents:
diff changeset
406 Acceptable = true;
anatofuz
parents:
diff changeset
407 break;
anatofuz
parents:
diff changeset
408 }
anatofuz
parents:
diff changeset
409 }
anatofuz
parents:
diff changeset
410 }
anatofuz
parents:
diff changeset
411
anatofuz
parents:
diff changeset
412 if (!Acceptable)
anatofuz
parents:
diff changeset
413 continue;
anatofuz
parents:
diff changeset
414
anatofuz
parents:
diff changeset
415 Exported.push_back(Mod);
anatofuz
parents:
diff changeset
416 }
anatofuz
parents:
diff changeset
417 }
anatofuz
parents:
diff changeset
418
anatofuz
parents:
diff changeset
419 void Module::buildVisibleModulesCache() const {
anatofuz
parents:
diff changeset
420 assert(VisibleModulesCache.empty() && "cache does not need building");
anatofuz
parents:
diff changeset
421
anatofuz
parents:
diff changeset
422 // This module is visible to itself.
anatofuz
parents:
diff changeset
423 VisibleModulesCache.insert(this);
anatofuz
parents:
diff changeset
424
anatofuz
parents:
diff changeset
425 // Every imported module is visible.
anatofuz
parents:
diff changeset
426 SmallVector<Module *, 16> Stack(Imports.begin(), Imports.end());
anatofuz
parents:
diff changeset
427 while (!Stack.empty()) {
anatofuz
parents:
diff changeset
428 Module *CurrModule = Stack.pop_back_val();
anatofuz
parents:
diff changeset
429
anatofuz
parents:
diff changeset
430 // Every module transitively exported by an imported module is visible.
anatofuz
parents:
diff changeset
431 if (VisibleModulesCache.insert(CurrModule).second)
anatofuz
parents:
diff changeset
432 CurrModule->getExportedModules(Stack);
anatofuz
parents:
diff changeset
433 }
anatofuz
parents:
diff changeset
434 }
anatofuz
parents:
diff changeset
435
anatofuz
parents:
diff changeset
436 void Module::print(raw_ostream &OS, unsigned Indent) const {
anatofuz
parents:
diff changeset
437 OS.indent(Indent);
anatofuz
parents:
diff changeset
438 if (IsFramework)
anatofuz
parents:
diff changeset
439 OS << "framework ";
anatofuz
parents:
diff changeset
440 if (IsExplicit)
anatofuz
parents:
diff changeset
441 OS << "explicit ";
anatofuz
parents:
diff changeset
442 OS << "module ";
anatofuz
parents:
diff changeset
443 printModuleId(OS, &Name, &Name + 1);
anatofuz
parents:
diff changeset
444
anatofuz
parents:
diff changeset
445 if (IsSystem || IsExternC) {
anatofuz
parents:
diff changeset
446 OS.indent(Indent + 2);
anatofuz
parents:
diff changeset
447 if (IsSystem)
anatofuz
parents:
diff changeset
448 OS << " [system]";
anatofuz
parents:
diff changeset
449 if (IsExternC)
anatofuz
parents:
diff changeset
450 OS << " [extern_c]";
anatofuz
parents:
diff changeset
451 }
anatofuz
parents:
diff changeset
452
anatofuz
parents:
diff changeset
453 OS << " {\n";
anatofuz
parents:
diff changeset
454
anatofuz
parents:
diff changeset
455 if (!Requirements.empty()) {
anatofuz
parents:
diff changeset
456 OS.indent(Indent + 2);
anatofuz
parents:
diff changeset
457 OS << "requires ";
anatofuz
parents:
diff changeset
458 for (unsigned I = 0, N = Requirements.size(); I != N; ++I) {
anatofuz
parents:
diff changeset
459 if (I)
anatofuz
parents:
diff changeset
460 OS << ", ";
anatofuz
parents:
diff changeset
461 if (!Requirements[I].second)
anatofuz
parents:
diff changeset
462 OS << "!";
anatofuz
parents:
diff changeset
463 OS << Requirements[I].first;
anatofuz
parents:
diff changeset
464 }
anatofuz
parents:
diff changeset
465 OS << "\n";
anatofuz
parents:
diff changeset
466 }
anatofuz
parents:
diff changeset
467
anatofuz
parents:
diff changeset
468 if (Header H = getUmbrellaHeader()) {
anatofuz
parents:
diff changeset
469 OS.indent(Indent + 2);
anatofuz
parents:
diff changeset
470 OS << "umbrella header \"";
anatofuz
parents:
diff changeset
471 OS.write_escaped(H.NameAsWritten);
anatofuz
parents:
diff changeset
472 OS << "\"\n";
anatofuz
parents:
diff changeset
473 } else if (DirectoryName D = getUmbrellaDir()) {
anatofuz
parents:
diff changeset
474 OS.indent(Indent + 2);
anatofuz
parents:
diff changeset
475 OS << "umbrella \"";
anatofuz
parents:
diff changeset
476 OS.write_escaped(D.NameAsWritten);
anatofuz
parents:
diff changeset
477 OS << "\"\n";
anatofuz
parents:
diff changeset
478 }
anatofuz
parents:
diff changeset
479
anatofuz
parents:
diff changeset
480 if (!ConfigMacros.empty() || ConfigMacrosExhaustive) {
anatofuz
parents:
diff changeset
481 OS.indent(Indent + 2);
anatofuz
parents:
diff changeset
482 OS << "config_macros ";
anatofuz
parents:
diff changeset
483 if (ConfigMacrosExhaustive)
anatofuz
parents:
diff changeset
484 OS << "[exhaustive]";
anatofuz
parents:
diff changeset
485 for (unsigned I = 0, N = ConfigMacros.size(); I != N; ++I) {
anatofuz
parents:
diff changeset
486 if (I)
anatofuz
parents:
diff changeset
487 OS << ", ";
anatofuz
parents:
diff changeset
488 OS << ConfigMacros[I];
anatofuz
parents:
diff changeset
489 }
anatofuz
parents:
diff changeset
490 OS << "\n";
anatofuz
parents:
diff changeset
491 }
anatofuz
parents:
diff changeset
492
anatofuz
parents:
diff changeset
493 struct {
anatofuz
parents:
diff changeset
494 StringRef Prefix;
anatofuz
parents:
diff changeset
495 HeaderKind Kind;
anatofuz
parents:
diff changeset
496 } Kinds[] = {{"", HK_Normal},
anatofuz
parents:
diff changeset
497 {"textual ", HK_Textual},
anatofuz
parents:
diff changeset
498 {"private ", HK_Private},
anatofuz
parents:
diff changeset
499 {"private textual ", HK_PrivateTextual},
anatofuz
parents:
diff changeset
500 {"exclude ", HK_Excluded}};
anatofuz
parents:
diff changeset
501
anatofuz
parents:
diff changeset
502 for (auto &K : Kinds) {
anatofuz
parents:
diff changeset
503 assert(&K == &Kinds[K.Kind] && "kinds in wrong order");
anatofuz
parents:
diff changeset
504 for (auto &H : Headers[K.Kind]) {
anatofuz
parents:
diff changeset
505 OS.indent(Indent + 2);
anatofuz
parents:
diff changeset
506 OS << K.Prefix << "header \"";
anatofuz
parents:
diff changeset
507 OS.write_escaped(H.NameAsWritten);
anatofuz
parents:
diff changeset
508 OS << "\" { size " << H.Entry->getSize()
anatofuz
parents:
diff changeset
509 << " mtime " << H.Entry->getModificationTime() << " }\n";
anatofuz
parents:
diff changeset
510 }
anatofuz
parents:
diff changeset
511 }
anatofuz
parents:
diff changeset
512 for (auto *Unresolved : {&UnresolvedHeaders, &MissingHeaders}) {
anatofuz
parents:
diff changeset
513 for (auto &U : *Unresolved) {
anatofuz
parents:
diff changeset
514 OS.indent(Indent + 2);
anatofuz
parents:
diff changeset
515 OS << Kinds[U.Kind].Prefix << "header \"";
anatofuz
parents:
diff changeset
516 OS.write_escaped(U.FileName);
anatofuz
parents:
diff changeset
517 OS << "\"";
anatofuz
parents:
diff changeset
518 if (U.Size || U.ModTime) {
anatofuz
parents:
diff changeset
519 OS << " {";
anatofuz
parents:
diff changeset
520 if (U.Size)
anatofuz
parents:
diff changeset
521 OS << " size " << *U.Size;
anatofuz
parents:
diff changeset
522 if (U.ModTime)
anatofuz
parents:
diff changeset
523 OS << " mtime " << *U.ModTime;
anatofuz
parents:
diff changeset
524 OS << " }";
anatofuz
parents:
diff changeset
525 }
anatofuz
parents:
diff changeset
526 OS << "\n";
anatofuz
parents:
diff changeset
527 }
anatofuz
parents:
diff changeset
528 }
anatofuz
parents:
diff changeset
529
anatofuz
parents:
diff changeset
530 if (!ExportAsModule.empty()) {
anatofuz
parents:
diff changeset
531 OS.indent(Indent + 2);
anatofuz
parents:
diff changeset
532 OS << "export_as" << ExportAsModule << "\n";
anatofuz
parents:
diff changeset
533 }
anatofuz
parents:
diff changeset
534
anatofuz
parents:
diff changeset
535 for (submodule_const_iterator MI = submodule_begin(), MIEnd = submodule_end();
anatofuz
parents:
diff changeset
536 MI != MIEnd; ++MI)
anatofuz
parents:
diff changeset
537 // Print inferred subframework modules so that we don't need to re-infer
anatofuz
parents:
diff changeset
538 // them (requires expensive directory iteration + stat calls) when we build
anatofuz
parents:
diff changeset
539 // the module. Regular inferred submodules are OK, as we need to look at all
anatofuz
parents:
diff changeset
540 // those header files anyway.
anatofuz
parents:
diff changeset
541 if (!(*MI)->IsInferred || (*MI)->IsFramework)
anatofuz
parents:
diff changeset
542 (*MI)->print(OS, Indent + 2);
anatofuz
parents:
diff changeset
543
anatofuz
parents:
diff changeset
544 for (unsigned I = 0, N = Exports.size(); I != N; ++I) {
anatofuz
parents:
diff changeset
545 OS.indent(Indent + 2);
anatofuz
parents:
diff changeset
546 OS << "export ";
anatofuz
parents:
diff changeset
547 if (Module *Restriction = Exports[I].getPointer()) {
anatofuz
parents:
diff changeset
548 OS << Restriction->getFullModuleName(true);
anatofuz
parents:
diff changeset
549 if (Exports[I].getInt())
anatofuz
parents:
diff changeset
550 OS << ".*";
anatofuz
parents:
diff changeset
551 } else {
anatofuz
parents:
diff changeset
552 OS << "*";
anatofuz
parents:
diff changeset
553 }
anatofuz
parents:
diff changeset
554 OS << "\n";
anatofuz
parents:
diff changeset
555 }
anatofuz
parents:
diff changeset
556
anatofuz
parents:
diff changeset
557 for (unsigned I = 0, N = UnresolvedExports.size(); I != N; ++I) {
anatofuz
parents:
diff changeset
558 OS.indent(Indent + 2);
anatofuz
parents:
diff changeset
559 OS << "export ";
anatofuz
parents:
diff changeset
560 printModuleId(OS, UnresolvedExports[I].Id);
anatofuz
parents:
diff changeset
561 if (UnresolvedExports[I].Wildcard)
anatofuz
parents:
diff changeset
562 OS << (UnresolvedExports[I].Id.empty() ? "*" : ".*");
anatofuz
parents:
diff changeset
563 OS << "\n";
anatofuz
parents:
diff changeset
564 }
anatofuz
parents:
diff changeset
565
anatofuz
parents:
diff changeset
566 for (unsigned I = 0, N = DirectUses.size(); I != N; ++I) {
anatofuz
parents:
diff changeset
567 OS.indent(Indent + 2);
anatofuz
parents:
diff changeset
568 OS << "use ";
anatofuz
parents:
diff changeset
569 OS << DirectUses[I]->getFullModuleName(true);
anatofuz
parents:
diff changeset
570 OS << "\n";
anatofuz
parents:
diff changeset
571 }
anatofuz
parents:
diff changeset
572
anatofuz
parents:
diff changeset
573 for (unsigned I = 0, N = UnresolvedDirectUses.size(); I != N; ++I) {
anatofuz
parents:
diff changeset
574 OS.indent(Indent + 2);
anatofuz
parents:
diff changeset
575 OS << "use ";
anatofuz
parents:
diff changeset
576 printModuleId(OS, UnresolvedDirectUses[I]);
anatofuz
parents:
diff changeset
577 OS << "\n";
anatofuz
parents:
diff changeset
578 }
anatofuz
parents:
diff changeset
579
anatofuz
parents:
diff changeset
580 for (unsigned I = 0, N = LinkLibraries.size(); I != N; ++I) {
anatofuz
parents:
diff changeset
581 OS.indent(Indent + 2);
anatofuz
parents:
diff changeset
582 OS << "link ";
anatofuz
parents:
diff changeset
583 if (LinkLibraries[I].IsFramework)
anatofuz
parents:
diff changeset
584 OS << "framework ";
anatofuz
parents:
diff changeset
585 OS << "\"";
anatofuz
parents:
diff changeset
586 OS.write_escaped(LinkLibraries[I].Library);
anatofuz
parents:
diff changeset
587 OS << "\"";
anatofuz
parents:
diff changeset
588 }
anatofuz
parents:
diff changeset
589
anatofuz
parents:
diff changeset
590 for (unsigned I = 0, N = UnresolvedConflicts.size(); I != N; ++I) {
anatofuz
parents:
diff changeset
591 OS.indent(Indent + 2);
anatofuz
parents:
diff changeset
592 OS << "conflict ";
anatofuz
parents:
diff changeset
593 printModuleId(OS, UnresolvedConflicts[I].Id);
anatofuz
parents:
diff changeset
594 OS << ", \"";
anatofuz
parents:
diff changeset
595 OS.write_escaped(UnresolvedConflicts[I].Message);
anatofuz
parents:
diff changeset
596 OS << "\"\n";
anatofuz
parents:
diff changeset
597 }
anatofuz
parents:
diff changeset
598
anatofuz
parents:
diff changeset
599 for (unsigned I = 0, N = Conflicts.size(); I != N; ++I) {
anatofuz
parents:
diff changeset
600 OS.indent(Indent + 2);
anatofuz
parents:
diff changeset
601 OS << "conflict ";
anatofuz
parents:
diff changeset
602 OS << Conflicts[I].Other->getFullModuleName(true);
anatofuz
parents:
diff changeset
603 OS << ", \"";
anatofuz
parents:
diff changeset
604 OS.write_escaped(Conflicts[I].Message);
anatofuz
parents:
diff changeset
605 OS << "\"\n";
anatofuz
parents:
diff changeset
606 }
anatofuz
parents:
diff changeset
607
anatofuz
parents:
diff changeset
608 if (InferSubmodules) {
anatofuz
parents:
diff changeset
609 OS.indent(Indent + 2);
anatofuz
parents:
diff changeset
610 if (InferExplicitSubmodules)
anatofuz
parents:
diff changeset
611 OS << "explicit ";
anatofuz
parents:
diff changeset
612 OS << "module * {\n";
anatofuz
parents:
diff changeset
613 if (InferExportWildcard) {
anatofuz
parents:
diff changeset
614 OS.indent(Indent + 4);
anatofuz
parents:
diff changeset
615 OS << "export *\n";
anatofuz
parents:
diff changeset
616 }
anatofuz
parents:
diff changeset
617 OS.indent(Indent + 2);
anatofuz
parents:
diff changeset
618 OS << "}\n";
anatofuz
parents:
diff changeset
619 }
anatofuz
parents:
diff changeset
620
anatofuz
parents:
diff changeset
621 OS.indent(Indent);
anatofuz
parents:
diff changeset
622 OS << "}\n";
anatofuz
parents:
diff changeset
623 }
anatofuz
parents:
diff changeset
624
anatofuz
parents:
diff changeset
625 LLVM_DUMP_METHOD void Module::dump() const {
anatofuz
parents:
diff changeset
626 print(llvm::errs());
anatofuz
parents:
diff changeset
627 }
anatofuz
parents:
diff changeset
628
anatofuz
parents:
diff changeset
629 void VisibleModuleSet::setVisible(Module *M, SourceLocation Loc,
anatofuz
parents:
diff changeset
630 VisibleCallback Vis, ConflictCallback Cb) {
anatofuz
parents:
diff changeset
631 assert(Loc.isValid() && "setVisible expects a valid import location");
anatofuz
parents:
diff changeset
632 if (isVisible(M))
anatofuz
parents:
diff changeset
633 return;
anatofuz
parents:
diff changeset
634
anatofuz
parents:
diff changeset
635 ++Generation;
anatofuz
parents:
diff changeset
636
anatofuz
parents:
diff changeset
637 struct Visiting {
anatofuz
parents:
diff changeset
638 Module *M;
anatofuz
parents:
diff changeset
639 Visiting *ExportedBy;
anatofuz
parents:
diff changeset
640 };
anatofuz
parents:
diff changeset
641
anatofuz
parents:
diff changeset
642 std::function<void(Visiting)> VisitModule = [&](Visiting V) {
anatofuz
parents:
diff changeset
643 // Nothing to do for a module that's already visible.
anatofuz
parents:
diff changeset
644 unsigned ID = V.M->getVisibilityID();
anatofuz
parents:
diff changeset
645 if (ImportLocs.size() <= ID)
anatofuz
parents:
diff changeset
646 ImportLocs.resize(ID + 1);
anatofuz
parents:
diff changeset
647 else if (ImportLocs[ID].isValid())
anatofuz
parents:
diff changeset
648 return;
anatofuz
parents:
diff changeset
649
anatofuz
parents:
diff changeset
650 ImportLocs[ID] = Loc;
anatofuz
parents:
diff changeset
651 Vis(M);
anatofuz
parents:
diff changeset
652
anatofuz
parents:
diff changeset
653 // Make any exported modules visible.
anatofuz
parents:
diff changeset
654 SmallVector<Module *, 16> Exports;
anatofuz
parents:
diff changeset
655 V.M->getExportedModules(Exports);
anatofuz
parents:
diff changeset
656 for (Module *E : Exports) {
173
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
657 // Don't import non-importable modules.
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
658 if (!E->isUnimportable())
150
anatofuz
parents:
diff changeset
659 VisitModule({E, &V});
anatofuz
parents:
diff changeset
660 }
anatofuz
parents:
diff changeset
661
anatofuz
parents:
diff changeset
662 for (auto &C : V.M->Conflicts) {
anatofuz
parents:
diff changeset
663 if (isVisible(C.Other)) {
anatofuz
parents:
diff changeset
664 llvm::SmallVector<Module*, 8> Path;
anatofuz
parents:
diff changeset
665 for (Visiting *I = &V; I; I = I->ExportedBy)
anatofuz
parents:
diff changeset
666 Path.push_back(I->M);
anatofuz
parents:
diff changeset
667 Cb(Path, C.Other, C.Message);
anatofuz
parents:
diff changeset
668 }
anatofuz
parents:
diff changeset
669 }
anatofuz
parents:
diff changeset
670 };
anatofuz
parents:
diff changeset
671 VisitModule({M, nullptr});
anatofuz
parents:
diff changeset
672 }
173
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
673
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
674 ASTSourceDescriptor::ASTSourceDescriptor(Module &M)
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
675 : Signature(M.Signature), ClangModule(&M) {
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
676 if (M.Directory)
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
677 Path = M.Directory->getName();
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
678 if (auto *File = M.getASTFile())
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
679 ASTFile = File->getName();
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
680 }
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
681
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
682 std::string ASTSourceDescriptor::getModuleName() const {
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
683 if (ClangModule)
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
684 return ClangModule->Name;
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
685 else
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
686 return std::string(PCHModuleName);
0572611fdcc8 reorgnization done
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 150
diff changeset
687 }