1 | //===--- SemaModule.cpp - Semantic Analysis for Modules -------------------===// |
2 | // |
3 | // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions. |
4 | // See https://llvm.org/LICENSE.txt for license information. |
5 | // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception |
6 | // |
7 | //===----------------------------------------------------------------------===// |
8 | // |
9 | // This file implements semantic analysis for modules (C++ modules syntax, |
10 | // Objective-C modules syntax, and Clang header modules). |
11 | // |
12 | //===----------------------------------------------------------------------===// |
13 | |
14 | #include "clang/AST/ASTConsumer.h" |
15 | #include "clang/AST/ASTMutationListener.h" |
16 | #include "clang/Lex/HeaderSearch.h" |
17 | #include "clang/Lex/Preprocessor.h" |
18 | #include "clang/Sema/ParsedAttr.h" |
19 | #include "clang/Sema/SemaInternal.h" |
20 | #include "llvm/ADT/StringExtras.h" |
21 | |
22 | using namespace clang; |
23 | using namespace sema; |
24 | |
25 | static void checkModuleImportContext(Sema &S, Module *M, |
26 | SourceLocation ImportLoc, DeclContext *DC, |
27 | bool FromInclude = false) { |
28 | SourceLocation ExternCLoc; |
29 | |
30 | if (auto *LSD = dyn_cast<LinkageSpecDecl>(Val: DC)) { |
31 | switch (LSD->getLanguage()) { |
32 | case LinkageSpecLanguageIDs::C: |
33 | if (ExternCLoc.isInvalid()) |
34 | ExternCLoc = LSD->getBeginLoc(); |
35 | break; |
36 | case LinkageSpecLanguageIDs::CXX: |
37 | break; |
38 | } |
39 | DC = LSD->getParent(); |
40 | } |
41 | |
42 | while (isa<LinkageSpecDecl>(Val: DC) || isa<ExportDecl>(Val: DC)) |
43 | DC = DC->getParent(); |
44 | |
45 | if (!isa<TranslationUnitDecl>(Val: DC)) { |
46 | S.Diag(Loc: ImportLoc, DiagID: (FromInclude && S.isModuleVisible(M)) |
47 | ? diag::ext_module_import_not_at_top_level_noop |
48 | : diag::err_module_import_not_at_top_level_fatal) |
49 | << M->getFullModuleName() << DC; |
50 | S.Diag(Loc: cast<Decl>(Val: DC)->getBeginLoc(), |
51 | DiagID: diag::note_module_import_not_at_top_level) |
52 | << DC; |
53 | } else if (!M->IsExternC && ExternCLoc.isValid()) { |
54 | S.Diag(Loc: ImportLoc, DiagID: diag::ext_module_import_in_extern_c) |
55 | << M->getFullModuleName(); |
56 | S.Diag(Loc: ExternCLoc, DiagID: diag::note_extern_c_begins_here); |
57 | } |
58 | } |
59 | |
60 | // We represent the primary and partition names as 'Paths' which are sections |
61 | // of the hierarchical access path for a clang module. However for C++20 |
62 | // the periods in a name are just another character, and we will need to |
63 | // flatten them into a string. |
64 | static std::string stringFromPath(ModuleIdPath Path) { |
65 | std::string Name; |
66 | if (Path.empty()) |
67 | return Name; |
68 | |
69 | for (auto &Piece : Path) { |
70 | if (!Name.empty()) |
71 | Name += "." ; |
72 | Name += Piece.getIdentifierInfo()->getName(); |
73 | } |
74 | return Name; |
75 | } |
76 | |
77 | /// Helper function for makeTransitiveImportsVisible to decide whether |
78 | /// the \param Imported module unit is in the same module with the \param |
79 | /// CurrentModule. |
80 | /// \param FoundPrimaryModuleInterface is a helper parameter to record the |
81 | /// primary module interface unit corresponding to the module \param |
82 | /// CurrentModule. Since currently it is expensive to decide whether two module |
83 | /// units come from the same module by comparing the module name. |
84 | static bool |
85 | isImportingModuleUnitFromSameModule(ASTContext &Ctx, Module *Imported, |
86 | Module *CurrentModule, |
87 | Module *&FoundPrimaryModuleInterface) { |
88 | if (!Imported->isNamedModule()) |
89 | return false; |
90 | |
91 | // The a partition unit we're importing must be in the same module of the |
92 | // current module. |
93 | if (Imported->isModulePartition()) |
94 | return true; |
95 | |
96 | // If we found the primary module interface during the search process, we can |
97 | // return quickly to avoid expensive string comparison. |
98 | if (FoundPrimaryModuleInterface) |
99 | return Imported == FoundPrimaryModuleInterface; |
100 | |
101 | if (!CurrentModule) |
102 | return false; |
103 | |
104 | // Then the imported module must be a primary module interface unit. It |
105 | // is only allowed to import the primary module interface unit from the same |
106 | // module in the implementation unit and the implementation partition unit. |
107 | |
108 | // Since we'll handle implementation unit above. We can only care |
109 | // about the implementation partition unit here. |
110 | if (!CurrentModule->isModulePartitionImplementation()) |
111 | return false; |
112 | |
113 | if (Ctx.isInSameModule(M1: Imported, M2: CurrentModule)) { |
114 | assert(!FoundPrimaryModuleInterface || |
115 | FoundPrimaryModuleInterface == Imported); |
116 | FoundPrimaryModuleInterface = Imported; |
117 | return true; |
118 | } |
119 | |
120 | return false; |
121 | } |
122 | |
123 | /// [module.import]p7: |
124 | /// Additionally, when a module-import-declaration in a module unit of some |
125 | /// module M imports another module unit U of M, it also imports all |
126 | /// translation units imported by non-exported module-import-declarations in |
127 | /// the module unit purview of U. These rules can in turn lead to the |
128 | /// importation of yet more translation units. |
129 | static void |
130 | makeTransitiveImportsVisible(ASTContext &Ctx, VisibleModuleSet &VisibleModules, |
131 | Module *Imported, Module *CurrentModule, |
132 | SourceLocation ImportLoc, |
133 | bool IsImportingPrimaryModuleInterface = false) { |
134 | assert(Imported->isNamedModule() && |
135 | "'makeTransitiveImportsVisible()' is intended for standard C++ named " |
136 | "modules only." ); |
137 | |
138 | llvm::SmallVector<Module *, 4> Worklist; |
139 | llvm::SmallSet<Module *, 16> Visited; |
140 | Worklist.push_back(Elt: Imported); |
141 | |
142 | Module *FoundPrimaryModuleInterface = |
143 | IsImportingPrimaryModuleInterface ? Imported : nullptr; |
144 | |
145 | while (!Worklist.empty()) { |
146 | Module *Importing = Worklist.pop_back_val(); |
147 | |
148 | if (Visited.count(Ptr: Importing)) |
149 | continue; |
150 | Visited.insert(Ptr: Importing); |
151 | |
152 | // FIXME: The ImportLoc here is not meaningful. It may be problematic if we |
153 | // use the sourcelocation loaded from the visible modules. |
154 | VisibleModules.setVisible(M: Importing, Loc: ImportLoc); |
155 | |
156 | if (isImportingModuleUnitFromSameModule(Ctx, Imported: Importing, CurrentModule, |
157 | FoundPrimaryModuleInterface)) { |
158 | for (Module *TransImported : Importing->Imports) |
159 | Worklist.push_back(Elt: TransImported); |
160 | |
161 | for (auto [Exports, _] : Importing->Exports) |
162 | Worklist.push_back(Elt: Exports); |
163 | } |
164 | } |
165 | } |
166 | |
167 | Sema::DeclGroupPtrTy |
168 | Sema::ActOnGlobalModuleFragmentDecl(SourceLocation ModuleLoc) { |
169 | // We start in the global module; |
170 | Module *GlobalModule = |
171 | PushGlobalModuleFragment(BeginLoc: ModuleLoc); |
172 | |
173 | // All declarations created from now on are owned by the global module. |
174 | auto *TU = Context.getTranslationUnitDecl(); |
175 | // [module.global.frag]p2 |
176 | // A global-module-fragment specifies the contents of the global module |
177 | // fragment for a module unit. The global module fragment can be used to |
178 | // provide declarations that are attached to the global module and usable |
179 | // within the module unit. |
180 | // |
181 | // So the declations in the global module shouldn't be visible by default. |
182 | TU->setModuleOwnershipKind(Decl::ModuleOwnershipKind::ReachableWhenImported); |
183 | TU->setLocalOwningModule(GlobalModule); |
184 | |
185 | // FIXME: Consider creating an explicit representation of this declaration. |
186 | return nullptr; |
187 | } |
188 | |
189 | void Sema::HandleStartOfHeaderUnit() { |
190 | assert(getLangOpts().CPlusPlusModules && |
191 | "Header units are only valid for C++20 modules" ); |
192 | SourceLocation StartOfTU = |
193 | SourceMgr.getLocForStartOfFile(FID: SourceMgr.getMainFileID()); |
194 | |
195 | StringRef HUName = getLangOpts().CurrentModule; |
196 | if (HUName.empty()) { |
197 | HUName = |
198 | SourceMgr.getFileEntryRefForID(FID: SourceMgr.getMainFileID())->getName(); |
199 | const_cast<LangOptions &>(getLangOpts()).CurrentModule = HUName.str(); |
200 | } |
201 | |
202 | // TODO: Make the C++20 header lookup independent. |
203 | // When the input is pre-processed source, we need a file ref to the original |
204 | // file for the header map. |
205 | auto F = SourceMgr.getFileManager().getOptionalFileRef(Filename: HUName); |
206 | // For the sake of error recovery (if someone has moved the original header |
207 | // after creating the pre-processed output) fall back to obtaining the file |
208 | // ref for the input file, which must be present. |
209 | if (!F) |
210 | F = SourceMgr.getFileEntryRefForID(FID: SourceMgr.getMainFileID()); |
211 | assert(F && "failed to find the header unit source?" ); |
212 | Module::Header H{.NameAsWritten: HUName.str(), .PathRelativeToRootModuleDirectory: HUName.str(), .Entry: *F}; |
213 | auto &Map = PP.getHeaderSearchInfo().getModuleMap(); |
214 | Module *Mod = Map.createHeaderUnit(Loc: StartOfTU, Name: HUName, H); |
215 | assert(Mod && "module creation should not fail" ); |
216 | ModuleScopes.push_back(Elt: {}); // No GMF |
217 | ModuleScopes.back().BeginLoc = StartOfTU; |
218 | ModuleScopes.back().Module = Mod; |
219 | VisibleModules.setVisible(M: Mod, Loc: StartOfTU); |
220 | |
221 | // From now on, we have an owning module for all declarations we see. |
222 | // All of these are implicitly exported. |
223 | auto *TU = Context.getTranslationUnitDecl(); |
224 | TU->setModuleOwnershipKind(Decl::ModuleOwnershipKind::Visible); |
225 | TU->setLocalOwningModule(Mod); |
226 | } |
227 | |
228 | /// Tests whether the given identifier is reserved as a module name and |
229 | /// diagnoses if it is. Returns true if a diagnostic is emitted and false |
230 | /// otherwise. |
231 | static bool DiagReservedModuleName(Sema &S, const IdentifierInfo *II, |
232 | SourceLocation Loc) { |
233 | enum { |
234 | Valid = -1, |
235 | Invalid = 0, |
236 | Reserved = 1, |
237 | } Reason = Valid; |
238 | |
239 | if (II->isStr(Str: "module" ) || II->isStr(Str: "import" )) |
240 | Reason = Invalid; |
241 | else if (II->isReserved(LangOpts: S.getLangOpts()) != |
242 | ReservedIdentifierStatus::NotReserved) |
243 | Reason = Reserved; |
244 | |
245 | // If the identifier is reserved (not invalid) but is in a system header, |
246 | // we do not diagnose (because we expect system headers to use reserved |
247 | // identifiers). |
248 | if (Reason == Reserved && S.getSourceManager().isInSystemHeader(Loc)) |
249 | Reason = Valid; |
250 | |
251 | switch (Reason) { |
252 | case Valid: |
253 | return false; |
254 | case Invalid: |
255 | return S.Diag(Loc, DiagID: diag::err_invalid_module_name) << II; |
256 | case Reserved: |
257 | S.Diag(Loc, DiagID: diag::warn_reserved_module_name) << II; |
258 | return false; |
259 | } |
260 | llvm_unreachable("fell off a fully covered switch" ); |
261 | } |
262 | |
263 | Sema::DeclGroupPtrTy |
264 | Sema::ActOnModuleDecl(SourceLocation StartLoc, SourceLocation ModuleLoc, |
265 | ModuleDeclKind MDK, ModuleIdPath Path, |
266 | ModuleIdPath Partition, ModuleImportState &ImportState, |
267 | bool IntroducerIsFirstPPToken) { |
268 | assert(getLangOpts().CPlusPlusModules && |
269 | "should only have module decl in standard C++ modules" ); |
270 | |
271 | bool SeenGMF = ImportState == ModuleImportState::GlobalFragment; |
272 | // If any of the steps here fail, we count that as invalidating C++20 |
273 | // module state; |
274 | ImportState = ModuleImportState::NotACXX20Module; |
275 | |
276 | bool IsPartition = !Partition.empty(); |
277 | if (IsPartition) |
278 | switch (MDK) { |
279 | case ModuleDeclKind::Implementation: |
280 | MDK = ModuleDeclKind::PartitionImplementation; |
281 | break; |
282 | case ModuleDeclKind::Interface: |
283 | MDK = ModuleDeclKind::PartitionInterface; |
284 | break; |
285 | default: |
286 | llvm_unreachable("how did we get a partition type set?" ); |
287 | } |
288 | |
289 | // A (non-partition) module implementation unit requires that we are not |
290 | // compiling a module of any kind. A partition implementation emits an |
291 | // interface (and the AST for the implementation), which will subsequently |
292 | // be consumed to emit a binary. |
293 | // A module interface unit requires that we are not compiling a module map. |
294 | switch (getLangOpts().getCompilingModule()) { |
295 | case LangOptions::CMK_None: |
296 | // It's OK to compile a module interface as a normal translation unit. |
297 | break; |
298 | |
299 | case LangOptions::CMK_ModuleInterface: |
300 | if (MDK != ModuleDeclKind::Implementation) |
301 | break; |
302 | |
303 | // We were asked to compile a module interface unit but this is a module |
304 | // implementation unit. |
305 | Diag(Loc: ModuleLoc, DiagID: diag::err_module_interface_implementation_mismatch) |
306 | << FixItHint::CreateInsertion(InsertionLoc: ModuleLoc, Code: "export " ); |
307 | MDK = ModuleDeclKind::Interface; |
308 | break; |
309 | |
310 | case LangOptions::CMK_ModuleMap: |
311 | Diag(Loc: ModuleLoc, DiagID: diag::err_module_decl_in_module_map_module); |
312 | return nullptr; |
313 | |
314 | case LangOptions::CMK_HeaderUnit: |
315 | Diag(Loc: ModuleLoc, DiagID: diag::err_module_decl_in_header_unit); |
316 | return nullptr; |
317 | } |
318 | |
319 | assert(ModuleScopes.size() <= 1 && "expected to be at global module scope" ); |
320 | |
321 | // FIXME: Most of this work should be done by the preprocessor rather than |
322 | // here, in order to support macro import. |
323 | |
324 | // Only one module-declaration is permitted per source file. |
325 | if (isCurrentModulePurview()) { |
326 | Diag(Loc: ModuleLoc, DiagID: diag::err_module_redeclaration); |
327 | Diag(Loc: VisibleModules.getImportLoc(M: ModuleScopes.back().Module), |
328 | DiagID: diag::note_prev_module_declaration); |
329 | return nullptr; |
330 | } |
331 | |
332 | assert((!getLangOpts().CPlusPlusModules || |
333 | SeenGMF == (bool)this->TheGlobalModuleFragment) && |
334 | "mismatched global module state" ); |
335 | |
336 | // In C++20, A module directive may only appear as the first preprocessing |
337 | // tokens in a file (excluding the global module fragment.). |
338 | if (getLangOpts().CPlusPlusModules && !IntroducerIsFirstPPToken && !SeenGMF) { |
339 | Diag(Loc: ModuleLoc, DiagID: diag::err_module_decl_not_at_start); |
340 | SourceLocation BeginLoc = PP.getMainFileFirstPPTokenLoc(); |
341 | Diag(Loc: BeginLoc, DiagID: diag::note_global_module_introducer_missing) |
342 | << FixItHint::CreateInsertion(InsertionLoc: BeginLoc, Code: "module;\n" ); |
343 | } |
344 | |
345 | // C++23 [module.unit]p1: ... The identifiers module and import shall not |
346 | // appear as identifiers in a module-name or module-partition. All |
347 | // module-names either beginning with an identifier consisting of std |
348 | // followed by zero or more digits or containing a reserved identifier |
349 | // ([lex.name]) are reserved and shall not be specified in a |
350 | // module-declaration; no diagnostic is required. |
351 | |
352 | // Test the first part of the path to see if it's std[0-9]+ but allow the |
353 | // name in a system header. |
354 | StringRef FirstComponentName = Path[0].getIdentifierInfo()->getName(); |
355 | if (!getSourceManager().isInSystemHeader(Loc: Path[0].getLoc()) && |
356 | (FirstComponentName == "std" || |
357 | (FirstComponentName.starts_with(Prefix: "std" ) && |
358 | llvm::all_of(Range: FirstComponentName.drop_front(N: 3), P: &llvm::isDigit)))) |
359 | Diag(Loc: Path[0].getLoc(), DiagID: diag::warn_reserved_module_name) |
360 | << Path[0].getIdentifierInfo(); |
361 | |
362 | // Then test all of the components in the path to see if any of them are |
363 | // using another kind of reserved or invalid identifier. |
364 | for (auto Part : Path) { |
365 | if (DiagReservedModuleName(S&: *this, II: Part.getIdentifierInfo(), Loc: Part.getLoc())) |
366 | return nullptr; |
367 | } |
368 | |
369 | // Flatten the dots in a module name. Unlike Clang's hierarchical module map |
370 | // modules, the dots here are just another character that can appear in a |
371 | // module name. |
372 | std::string ModuleName = stringFromPath(Path); |
373 | if (IsPartition) { |
374 | ModuleName += ":" ; |
375 | ModuleName += stringFromPath(Path: Partition); |
376 | } |
377 | // If a module name was explicitly specified on the command line, it must be |
378 | // correct. |
379 | if (!getLangOpts().CurrentModule.empty() && |
380 | getLangOpts().CurrentModule != ModuleName) { |
381 | Diag(Loc: Path.front().getLoc(), DiagID: diag::err_current_module_name_mismatch) |
382 | << SourceRange(Path.front().getLoc(), IsPartition |
383 | ? Partition.back().getLoc() |
384 | : Path.back().getLoc()) |
385 | << getLangOpts().CurrentModule; |
386 | return nullptr; |
387 | } |
388 | const_cast<LangOptions&>(getLangOpts()).CurrentModule = ModuleName; |
389 | |
390 | auto &Map = PP.getHeaderSearchInfo().getModuleMap(); |
391 | Module *Mod; // The module we are creating. |
392 | Module *Interface = nullptr; // The interface for an implementation. |
393 | switch (MDK) { |
394 | case ModuleDeclKind::Interface: |
395 | case ModuleDeclKind::PartitionInterface: { |
396 | // We can't have parsed or imported a definition of this module or parsed a |
397 | // module map defining it already. |
398 | if (auto *M = Map.findOrLoadModule(Name: ModuleName)) { |
399 | Diag(Loc: Path[0].getLoc(), DiagID: diag::err_module_redefinition) << ModuleName; |
400 | if (M->DefinitionLoc.isValid()) |
401 | Diag(Loc: M->DefinitionLoc, DiagID: diag::note_prev_module_definition); |
402 | else if (OptionalFileEntryRef FE = M->getASTFile()) |
403 | Diag(Loc: M->DefinitionLoc, DiagID: diag::note_prev_module_definition_from_ast_file) |
404 | << FE->getName(); |
405 | Mod = M; |
406 | break; |
407 | } |
408 | |
409 | // Create a Module for the module that we're defining. |
410 | Mod = Map.createModuleForInterfaceUnit(Loc: ModuleLoc, Name: ModuleName); |
411 | if (MDK == ModuleDeclKind::PartitionInterface) |
412 | Mod->Kind = Module::ModulePartitionInterface; |
413 | assert(Mod && "module creation should not fail" ); |
414 | break; |
415 | } |
416 | |
417 | case ModuleDeclKind::Implementation: { |
418 | // C++20 A module-declaration that contains neither an export- |
419 | // keyword nor a module-partition implicitly imports the primary |
420 | // module interface unit of the module as if by a module-import- |
421 | // declaration. |
422 | IdentifierLoc ModuleNameLoc(Path[0].getLoc(), |
423 | PP.getIdentifierInfo(Name: ModuleName)); |
424 | |
425 | // The module loader will assume we're trying to import the module that |
426 | // we're building if `LangOpts.CurrentModule` equals to 'ModuleName'. |
427 | // Change the value for `LangOpts.CurrentModule` temporarily to make the |
428 | // module loader work properly. |
429 | const_cast<LangOptions &>(getLangOpts()).CurrentModule = "" ; |
430 | Interface = getModuleLoader().loadModule(ImportLoc: ModuleLoc, Path: {ModuleNameLoc}, |
431 | Visibility: Module::AllVisible, |
432 | /*IsInclusionDirective=*/false); |
433 | const_cast<LangOptions&>(getLangOpts()).CurrentModule = ModuleName; |
434 | |
435 | if (!Interface) { |
436 | Diag(Loc: ModuleLoc, DiagID: diag::err_module_not_defined) << ModuleName; |
437 | // Create an empty module interface unit for error recovery. |
438 | Mod = Map.createModuleForInterfaceUnit(Loc: ModuleLoc, Name: ModuleName); |
439 | } else { |
440 | Mod = Map.createModuleForImplementationUnit(Loc: ModuleLoc, Name: ModuleName); |
441 | } |
442 | } break; |
443 | |
444 | case ModuleDeclKind::PartitionImplementation: |
445 | // Create an interface, but note that it is an implementation |
446 | // unit. |
447 | Mod = Map.createModuleForInterfaceUnit(Loc: ModuleLoc, Name: ModuleName); |
448 | Mod->Kind = Module::ModulePartitionImplementation; |
449 | break; |
450 | } |
451 | |
452 | if (!this->TheGlobalModuleFragment) { |
453 | ModuleScopes.push_back(Elt: {}); |
454 | if (getLangOpts().ModulesLocalVisibility) |
455 | ModuleScopes.back().OuterVisibleModules = std::move(VisibleModules); |
456 | } else { |
457 | // We're done with the global module fragment now. |
458 | ActOnEndOfTranslationUnitFragment(Kind: TUFragmentKind::Global); |
459 | } |
460 | |
461 | // Switch from the global module fragment (if any) to the named module. |
462 | ModuleScopes.back().BeginLoc = StartLoc; |
463 | ModuleScopes.back().Module = Mod; |
464 | VisibleModules.setVisible(M: Mod, Loc: ModuleLoc); |
465 | |
466 | // From now on, we have an owning module for all declarations we see. |
467 | // In C++20 modules, those declaration would be reachable when imported |
468 | // unless explicitily exported. |
469 | // Otherwise, those declarations are module-private unless explicitly |
470 | // exported. |
471 | auto *TU = Context.getTranslationUnitDecl(); |
472 | TU->setModuleOwnershipKind(Decl::ModuleOwnershipKind::ReachableWhenImported); |
473 | TU->setLocalOwningModule(Mod); |
474 | |
475 | // We are in the module purview, but before any other (non import) |
476 | // statements, so imports are allowed. |
477 | ImportState = ModuleImportState::ImportAllowed; |
478 | |
479 | getASTContext().setCurrentNamedModule(Mod); |
480 | |
481 | if (auto *Listener = getASTMutationListener()) |
482 | Listener->EnteringModulePurview(); |
483 | |
484 | // We already potentially made an implicit import (in the case of a module |
485 | // implementation unit importing its interface). Make this module visible |
486 | // and return the import decl to be added to the current TU. |
487 | if (Interface) { |
488 | |
489 | makeTransitiveImportsVisible(Ctx&: getASTContext(), VisibleModules, Imported: Interface, |
490 | CurrentModule: Mod, ImportLoc: ModuleLoc, |
491 | /*IsImportingPrimaryModuleInterface=*/true); |
492 | |
493 | // Make the import decl for the interface in the impl module. |
494 | ImportDecl *Import = ImportDecl::Create(C&: Context, DC: CurContext, StartLoc: ModuleLoc, |
495 | Imported: Interface, IdentifierLocs: Path[0].getLoc()); |
496 | CurContext->addDecl(D: Import); |
497 | |
498 | // Sequence initialization of the imported module before that of the current |
499 | // module, if any. |
500 | Context.addModuleInitializer(M: ModuleScopes.back().Module, Init: Import); |
501 | Mod->Imports.insert(X: Interface); // As if we imported it. |
502 | // Also save this as a shortcut to checking for decls in the interface |
503 | ThePrimaryInterface = Interface; |
504 | // If we made an implicit import of the module interface, then return the |
505 | // imported module decl. |
506 | return ConvertDeclToDeclGroup(Ptr: Import); |
507 | } |
508 | |
509 | return nullptr; |
510 | } |
511 | |
512 | Sema::DeclGroupPtrTy |
513 | Sema::ActOnPrivateModuleFragmentDecl(SourceLocation ModuleLoc, |
514 | SourceLocation PrivateLoc) { |
515 | // C++20 [basic.link]/2: |
516 | // A private-module-fragment shall appear only in a primary module |
517 | // interface unit. |
518 | switch (ModuleScopes.empty() ? Module::ExplicitGlobalModuleFragment |
519 | : ModuleScopes.back().Module->Kind) { |
520 | case Module::ModuleMapModule: |
521 | case Module::ExplicitGlobalModuleFragment: |
522 | case Module::ImplicitGlobalModuleFragment: |
523 | case Module::ModulePartitionImplementation: |
524 | case Module::ModulePartitionInterface: |
525 | case Module::ModuleHeaderUnit: |
526 | Diag(Loc: PrivateLoc, DiagID: diag::err_private_module_fragment_not_module); |
527 | return nullptr; |
528 | |
529 | case Module::PrivateModuleFragment: |
530 | Diag(Loc: PrivateLoc, DiagID: diag::err_private_module_fragment_redefined); |
531 | Diag(Loc: ModuleScopes.back().BeginLoc, DiagID: diag::note_previous_definition); |
532 | return nullptr; |
533 | |
534 | case Module::ModuleImplementationUnit: |
535 | Diag(Loc: PrivateLoc, DiagID: diag::err_private_module_fragment_not_module_interface); |
536 | Diag(Loc: ModuleScopes.back().BeginLoc, |
537 | DiagID: diag::note_not_module_interface_add_export) |
538 | << FixItHint::CreateInsertion(InsertionLoc: ModuleScopes.back().BeginLoc, Code: "export " ); |
539 | return nullptr; |
540 | |
541 | case Module::ModuleInterfaceUnit: |
542 | break; |
543 | } |
544 | |
545 | // FIXME: Check that this translation unit does not import any partitions; |
546 | // such imports would violate [basic.link]/2's "shall be the only module unit" |
547 | // restriction. |
548 | |
549 | // We've finished the public fragment of the translation unit. |
550 | ActOnEndOfTranslationUnitFragment(Kind: TUFragmentKind::Normal); |
551 | |
552 | auto &Map = PP.getHeaderSearchInfo().getModuleMap(); |
553 | Module *PrivateModuleFragment = |
554 | Map.createPrivateModuleFragmentForInterfaceUnit( |
555 | Parent: ModuleScopes.back().Module, Loc: PrivateLoc); |
556 | assert(PrivateModuleFragment && "module creation should not fail" ); |
557 | |
558 | // Enter the scope of the private module fragment. |
559 | ModuleScopes.push_back(Elt: {}); |
560 | ModuleScopes.back().BeginLoc = ModuleLoc; |
561 | ModuleScopes.back().Module = PrivateModuleFragment; |
562 | VisibleModules.setVisible(M: PrivateModuleFragment, Loc: ModuleLoc); |
563 | |
564 | // All declarations created from now on are scoped to the private module |
565 | // fragment (and are neither visible nor reachable in importers of the module |
566 | // interface). |
567 | auto *TU = Context.getTranslationUnitDecl(); |
568 | TU->setModuleOwnershipKind(Decl::ModuleOwnershipKind::ModulePrivate); |
569 | TU->setLocalOwningModule(PrivateModuleFragment); |
570 | |
571 | // FIXME: Consider creating an explicit representation of this declaration. |
572 | return nullptr; |
573 | } |
574 | |
575 | DeclResult Sema::ActOnModuleImport(SourceLocation StartLoc, |
576 | SourceLocation ExportLoc, |
577 | SourceLocation ImportLoc, ModuleIdPath Path, |
578 | bool IsPartition) { |
579 | assert((!IsPartition || getLangOpts().CPlusPlusModules) && |
580 | "partition seen in non-C++20 code?" ); |
581 | |
582 | // For a C++20 module name, flatten into a single identifier with the source |
583 | // location of the first component. |
584 | IdentifierLoc ModuleNameLoc; |
585 | |
586 | std::string ModuleName; |
587 | if (IsPartition) { |
588 | // We already checked that we are in a module purview in the parser. |
589 | assert(!ModuleScopes.empty() && "in a module purview, but no module?" ); |
590 | Module *NamedMod = ModuleScopes.back().Module; |
591 | // If we are importing into a partition, find the owning named module, |
592 | // otherwise, the name of the importing named module. |
593 | ModuleName = NamedMod->getPrimaryModuleInterfaceName().str(); |
594 | ModuleName += ":" ; |
595 | ModuleName += stringFromPath(Path); |
596 | ModuleNameLoc = |
597 | IdentifierLoc(Path[0].getLoc(), PP.getIdentifierInfo(Name: ModuleName)); |
598 | Path = ModuleIdPath(ModuleNameLoc); |
599 | } else if (getLangOpts().CPlusPlusModules) { |
600 | ModuleName = stringFromPath(Path); |
601 | ModuleNameLoc = |
602 | IdentifierLoc(Path[0].getLoc(), PP.getIdentifierInfo(Name: ModuleName)); |
603 | Path = ModuleIdPath(ModuleNameLoc); |
604 | } |
605 | |
606 | // Diagnose self-import before attempting a load. |
607 | // [module.import]/9 |
608 | // A module implementation unit of a module M that is not a module partition |
609 | // shall not contain a module-import-declaration nominating M. |
610 | // (for an implementation, the module interface is imported implicitly, |
611 | // but that's handled in the module decl code). |
612 | |
613 | if (getLangOpts().CPlusPlusModules && isCurrentModulePurview() && |
614 | getCurrentModule()->Name == ModuleName) { |
615 | Diag(Loc: ImportLoc, DiagID: diag::err_module_self_import_cxx20) |
616 | << ModuleName << currentModuleIsImplementation(); |
617 | return true; |
618 | } |
619 | |
620 | Module *Mod = getModuleLoader().loadModule( |
621 | ImportLoc, Path, Visibility: Module::AllVisible, /*IsInclusionDirective=*/false); |
622 | if (!Mod) |
623 | return true; |
624 | |
625 | if (!Mod->isInterfaceOrPartition() && !ModuleName.empty() && |
626 | !getLangOpts().ObjC) { |
627 | Diag(Loc: ImportLoc, DiagID: diag::err_module_import_non_interface_nor_parition) |
628 | << ModuleName; |
629 | return true; |
630 | } |
631 | |
632 | return ActOnModuleImport(StartLoc, ExportLoc, ImportLoc, M: Mod, Path); |
633 | } |
634 | |
635 | /// Determine whether \p D is lexically within an export-declaration. |
636 | static const ExportDecl *getEnclosingExportDecl(const Decl *D) { |
637 | for (auto *DC = D->getLexicalDeclContext(); DC; DC = DC->getLexicalParent()) |
638 | if (auto *ED = dyn_cast<ExportDecl>(Val: DC)) |
639 | return ED; |
640 | return nullptr; |
641 | } |
642 | |
643 | DeclResult Sema::ActOnModuleImport(SourceLocation StartLoc, |
644 | SourceLocation ExportLoc, |
645 | SourceLocation ImportLoc, Module *Mod, |
646 | ModuleIdPath Path) { |
647 | if (Mod->isHeaderUnit()) |
648 | Diag(Loc: ImportLoc, DiagID: diag::warn_experimental_header_unit); |
649 | |
650 | if (Mod->isNamedModule()) |
651 | makeTransitiveImportsVisible(Ctx&: getASTContext(), VisibleModules, Imported: Mod, |
652 | CurrentModule: getCurrentModule(), ImportLoc); |
653 | else |
654 | VisibleModules.setVisible(M: Mod, Loc: ImportLoc); |
655 | |
656 | assert((!Mod->isModulePartitionImplementation() || getCurrentModule()) && |
657 | "We can only import a partition unit in a named module." ); |
658 | if (Mod->isModulePartitionImplementation() && |
659 | getCurrentModule()->isModuleInterfaceUnit()) |
660 | Diag(Loc: ImportLoc, |
661 | DiagID: diag::warn_import_implementation_partition_unit_in_interface_unit) |
662 | << Mod->Name; |
663 | |
664 | checkModuleImportContext(S&: *this, M: Mod, ImportLoc, DC: CurContext); |
665 | |
666 | // FIXME: we should support importing a submodule within a different submodule |
667 | // of the same top-level module. Until we do, make it an error rather than |
668 | // silently ignoring the import. |
669 | // FIXME: Should we warn on a redundant import of the current module? |
670 | if (Mod->isForBuilding(LangOpts: getLangOpts())) { |
671 | Diag(Loc: ImportLoc, DiagID: getLangOpts().isCompilingModule() |
672 | ? diag::err_module_self_import |
673 | : diag::err_module_import_in_implementation) |
674 | << Mod->getFullModuleName() << getLangOpts().CurrentModule; |
675 | } |
676 | |
677 | SmallVector<SourceLocation, 2> IdentifierLocs; |
678 | |
679 | if (Path.empty()) { |
680 | // If this was a header import, pad out with dummy locations. |
681 | // FIXME: Pass in and use the location of the header-name token in this |
682 | // case. |
683 | for (Module *ModCheck = Mod; ModCheck; ModCheck = ModCheck->Parent) |
684 | IdentifierLocs.push_back(Elt: SourceLocation()); |
685 | } else if (getLangOpts().CPlusPlusModules && !Mod->Parent) { |
686 | // A single identifier for the whole name. |
687 | IdentifierLocs.push_back(Elt: Path[0].getLoc()); |
688 | } else { |
689 | Module *ModCheck = Mod; |
690 | for (unsigned I = 0, N = Path.size(); I != N; ++I) { |
691 | // If we've run out of module parents, just drop the remaining |
692 | // identifiers. We need the length to be consistent. |
693 | if (!ModCheck) |
694 | break; |
695 | ModCheck = ModCheck->Parent; |
696 | |
697 | IdentifierLocs.push_back(Elt: Path[I].getLoc()); |
698 | } |
699 | } |
700 | |
701 | ImportDecl *Import = ImportDecl::Create(C&: Context, DC: CurContext, StartLoc, |
702 | Imported: Mod, IdentifierLocs); |
703 | CurContext->addDecl(D: Import); |
704 | |
705 | // Sequence initialization of the imported module before that of the current |
706 | // module, if any. |
707 | if (!ModuleScopes.empty()) |
708 | Context.addModuleInitializer(M: ModuleScopes.back().Module, Init: Import); |
709 | |
710 | // A module (partition) implementation unit shall not be exported. |
711 | if (getLangOpts().CPlusPlusModules && ExportLoc.isValid() && |
712 | Mod->Kind == Module::ModuleKind::ModulePartitionImplementation) { |
713 | Diag(Loc: ExportLoc, DiagID: diag::err_export_partition_impl) |
714 | << SourceRange(ExportLoc, Path.back().getLoc()); |
715 | } else if (ExportLoc.isValid() && |
716 | (ModuleScopes.empty() || currentModuleIsImplementation())) { |
717 | // [module.interface]p1: |
718 | // An export-declaration shall inhabit a namespace scope and appear in the |
719 | // purview of a module interface unit. |
720 | Diag(Loc: ExportLoc, DiagID: diag::err_export_not_in_module_interface); |
721 | } else if (!ModuleScopes.empty()) { |
722 | // Re-export the module if the imported module is exported. |
723 | // Note that we don't need to add re-exported module to Imports field |
724 | // since `Exports` implies the module is imported already. |
725 | if (ExportLoc.isValid() || getEnclosingExportDecl(D: Import)) |
726 | getCurrentModule()->Exports.emplace_back(Args&: Mod, Args: false); |
727 | else |
728 | getCurrentModule()->Imports.insert(X: Mod); |
729 | } |
730 | |
731 | return Import; |
732 | } |
733 | |
734 | void Sema::ActOnAnnotModuleInclude(SourceLocation DirectiveLoc, Module *Mod) { |
735 | checkModuleImportContext(S&: *this, M: Mod, ImportLoc: DirectiveLoc, DC: CurContext, FromInclude: true); |
736 | BuildModuleInclude(DirectiveLoc, Mod); |
737 | } |
738 | |
739 | void Sema::BuildModuleInclude(SourceLocation DirectiveLoc, Module *Mod) { |
740 | // Determine whether we're in the #include buffer for a module. The #includes |
741 | // in that buffer do not qualify as module imports; they're just an |
742 | // implementation detail of us building the module. |
743 | // |
744 | // FIXME: Should we even get ActOnAnnotModuleInclude calls for those? |
745 | bool IsInModuleIncludes = |
746 | TUKind == TU_ClangModule && |
747 | getSourceManager().isWrittenInMainFile(Loc: DirectiveLoc); |
748 | |
749 | // If we are really importing a module (not just checking layering) due to an |
750 | // #include in the main file, synthesize an ImportDecl. |
751 | if (getLangOpts().Modules && !IsInModuleIncludes) { |
752 | TranslationUnitDecl *TU = getASTContext().getTranslationUnitDecl(); |
753 | ImportDecl *ImportD = ImportDecl::CreateImplicit(C&: getASTContext(), DC: TU, |
754 | StartLoc: DirectiveLoc, Imported: Mod, |
755 | EndLoc: DirectiveLoc); |
756 | if (!ModuleScopes.empty()) |
757 | Context.addModuleInitializer(M: ModuleScopes.back().Module, Init: ImportD); |
758 | TU->addDecl(D: ImportD); |
759 | Consumer.HandleImplicitImportDecl(D: ImportD); |
760 | } |
761 | |
762 | getModuleLoader().makeModuleVisible(Mod, Visibility: Module::AllVisible, ImportLoc: DirectiveLoc); |
763 | VisibleModules.setVisible(M: Mod, Loc: DirectiveLoc); |
764 | |
765 | if (getLangOpts().isCompilingModule()) { |
766 | Module *ThisModule = PP.getHeaderSearchInfo().lookupModule( |
767 | ModuleName: getLangOpts().CurrentModule, ImportLoc: DirectiveLoc, AllowSearch: false, AllowExtraModuleMapSearch: false); |
768 | (void)ThisModule; |
769 | assert(ThisModule && "was expecting a module if building one" ); |
770 | } |
771 | } |
772 | |
773 | void Sema::ActOnAnnotModuleBegin(SourceLocation DirectiveLoc, Module *Mod) { |
774 | checkModuleImportContext(S&: *this, M: Mod, ImportLoc: DirectiveLoc, DC: CurContext, FromInclude: true); |
775 | |
776 | ModuleScopes.push_back(Elt: {}); |
777 | ModuleScopes.back().Module = Mod; |
778 | if (getLangOpts().ModulesLocalVisibility) |
779 | ModuleScopes.back().OuterVisibleModules = std::move(VisibleModules); |
780 | |
781 | VisibleModules.setVisible(M: Mod, Loc: DirectiveLoc); |
782 | |
783 | // The enclosing context is now part of this module. |
784 | // FIXME: Consider creating a child DeclContext to hold the entities |
785 | // lexically within the module. |
786 | if (getLangOpts().trackLocalOwningModule()) { |
787 | for (auto *DC = CurContext; DC; DC = DC->getLexicalParent()) { |
788 | cast<Decl>(Val: DC)->setModuleOwnershipKind( |
789 | getLangOpts().ModulesLocalVisibility |
790 | ? Decl::ModuleOwnershipKind::VisibleWhenImported |
791 | : Decl::ModuleOwnershipKind::Visible); |
792 | cast<Decl>(Val: DC)->setLocalOwningModule(Mod); |
793 | } |
794 | } |
795 | } |
796 | |
797 | void Sema::ActOnAnnotModuleEnd(SourceLocation EomLoc, Module *Mod) { |
798 | if (getLangOpts().ModulesLocalVisibility) { |
799 | VisibleModules = std::move(ModuleScopes.back().OuterVisibleModules); |
800 | // Leaving a module hides namespace names, so our visible namespace cache |
801 | // is now out of date. |
802 | VisibleNamespaceCache.clear(); |
803 | } |
804 | |
805 | assert(!ModuleScopes.empty() && ModuleScopes.back().Module == Mod && |
806 | "left the wrong module scope" ); |
807 | ModuleScopes.pop_back(); |
808 | |
809 | // We got to the end of processing a local module. Create an |
810 | // ImportDecl as we would for an imported module. |
811 | FileID File = getSourceManager().getFileID(SpellingLoc: EomLoc); |
812 | SourceLocation DirectiveLoc; |
813 | if (EomLoc == getSourceManager().getLocForEndOfFile(FID: File)) { |
814 | // We reached the end of a #included module header. Use the #include loc. |
815 | assert(File != getSourceManager().getMainFileID() && |
816 | "end of submodule in main source file" ); |
817 | DirectiveLoc = getSourceManager().getIncludeLoc(FID: File); |
818 | } else { |
819 | // We reached an EOM pragma. Use the pragma location. |
820 | DirectiveLoc = EomLoc; |
821 | } |
822 | BuildModuleInclude(DirectiveLoc, Mod); |
823 | |
824 | // Any further declarations are in whatever module we returned to. |
825 | if (getLangOpts().trackLocalOwningModule()) { |
826 | // The parser guarantees that this is the same context that we entered |
827 | // the module within. |
828 | for (auto *DC = CurContext; DC; DC = DC->getLexicalParent()) { |
829 | cast<Decl>(Val: DC)->setLocalOwningModule(getCurrentModule()); |
830 | if (!getCurrentModule()) |
831 | cast<Decl>(Val: DC)->setModuleOwnershipKind( |
832 | Decl::ModuleOwnershipKind::Unowned); |
833 | } |
834 | } |
835 | } |
836 | |
837 | void Sema::createImplicitModuleImportForErrorRecovery(SourceLocation Loc, |
838 | Module *Mod) { |
839 | // Bail if we're not allowed to implicitly import a module here. |
840 | if (isSFINAEContext() || !getLangOpts().ModulesErrorRecovery || |
841 | VisibleModules.isVisible(M: Mod)) |
842 | return; |
843 | |
844 | // Create the implicit import declaration. |
845 | TranslationUnitDecl *TU = getASTContext().getTranslationUnitDecl(); |
846 | ImportDecl *ImportD = ImportDecl::CreateImplicit(C&: getASTContext(), DC: TU, |
847 | StartLoc: Loc, Imported: Mod, EndLoc: Loc); |
848 | TU->addDecl(D: ImportD); |
849 | Consumer.HandleImplicitImportDecl(D: ImportD); |
850 | |
851 | // Make the module visible. |
852 | getModuleLoader().makeModuleVisible(Mod, Visibility: Module::AllVisible, ImportLoc: Loc); |
853 | VisibleModules.setVisible(M: Mod, Loc); |
854 | } |
855 | |
856 | Decl *Sema::ActOnStartExportDecl(Scope *S, SourceLocation ExportLoc, |
857 | SourceLocation LBraceLoc) { |
858 | ExportDecl *D = ExportDecl::Create(C&: Context, DC: CurContext, ExportLoc); |
859 | |
860 | // Set this temporarily so we know the export-declaration was braced. |
861 | D->setRBraceLoc(LBraceLoc); |
862 | |
863 | CurContext->addDecl(D); |
864 | PushDeclContext(S, DC: D); |
865 | |
866 | // C++2a [module.interface]p1: |
867 | // An export-declaration shall appear only [...] in the purview of a module |
868 | // interface unit. An export-declaration shall not appear directly or |
869 | // indirectly within [...] a private-module-fragment. |
870 | if (!getLangOpts().HLSL) { |
871 | if (!isCurrentModulePurview()) { |
872 | Diag(Loc: ExportLoc, DiagID: diag::err_export_not_in_module_interface) << 0; |
873 | D->setInvalidDecl(); |
874 | return D; |
875 | } else if (currentModuleIsImplementation()) { |
876 | Diag(Loc: ExportLoc, DiagID: diag::err_export_not_in_module_interface) << 1; |
877 | Diag(Loc: ModuleScopes.back().BeginLoc, |
878 | DiagID: diag::note_not_module_interface_add_export) |
879 | << FixItHint::CreateInsertion(InsertionLoc: ModuleScopes.back().BeginLoc, Code: "export " ); |
880 | D->setInvalidDecl(); |
881 | return D; |
882 | } else if (ModuleScopes.back().Module->Kind == |
883 | Module::PrivateModuleFragment) { |
884 | Diag(Loc: ExportLoc, DiagID: diag::err_export_in_private_module_fragment); |
885 | Diag(Loc: ModuleScopes.back().BeginLoc, DiagID: diag::note_private_module_fragment); |
886 | D->setInvalidDecl(); |
887 | return D; |
888 | } |
889 | } |
890 | |
891 | for (const DeclContext *DC = CurContext; DC; DC = DC->getLexicalParent()) { |
892 | if (const auto *ND = dyn_cast<NamespaceDecl>(Val: DC)) { |
893 | // An export-declaration shall not appear directly or indirectly within |
894 | // an unnamed namespace [...] |
895 | if (ND->isAnonymousNamespace()) { |
896 | Diag(Loc: ExportLoc, DiagID: diag::err_export_within_anonymous_namespace); |
897 | Diag(Loc: ND->getLocation(), DiagID: diag::note_anonymous_namespace); |
898 | // Don't diagnose internal-linkage declarations in this region. |
899 | D->setInvalidDecl(); |
900 | return D; |
901 | } |
902 | |
903 | // A declaration is exported if it is [...] a namespace-definition |
904 | // that contains an exported declaration. |
905 | // |
906 | // Defer exporting the namespace until after we leave it, in order to |
907 | // avoid marking all subsequent declarations in the namespace as exported. |
908 | if (!getLangOpts().HLSL && !DeferredExportedNamespaces.insert(Ptr: ND).second) |
909 | break; |
910 | } |
911 | } |
912 | |
913 | // [...] its declaration or declaration-seq shall not contain an |
914 | // export-declaration. |
915 | if (auto *ED = getEnclosingExportDecl(D)) { |
916 | Diag(Loc: ExportLoc, DiagID: diag::err_export_within_export); |
917 | if (ED->hasBraces()) |
918 | Diag(Loc: ED->getLocation(), DiagID: diag::note_export); |
919 | D->setInvalidDecl(); |
920 | return D; |
921 | } |
922 | |
923 | if (!getLangOpts().HLSL) |
924 | D->setModuleOwnershipKind(Decl::ModuleOwnershipKind::VisibleWhenImported); |
925 | |
926 | return D; |
927 | } |
928 | |
929 | static bool checkExportedDecl(Sema &, Decl *, SourceLocation); |
930 | |
931 | /// Check that it's valid to export all the declarations in \p DC. |
932 | static bool checkExportedDeclContext(Sema &S, DeclContext *DC, |
933 | SourceLocation BlockStart) { |
934 | bool AllUnnamed = true; |
935 | for (auto *D : DC->decls()) |
936 | AllUnnamed &= checkExportedDecl(S, D, BlockStart); |
937 | return AllUnnamed; |
938 | } |
939 | |
940 | /// Check that it's valid to export \p D. |
941 | static bool checkExportedDecl(Sema &S, Decl *D, SourceLocation BlockStart) { |
942 | |
943 | // HLSL: export declaration is valid only on functions |
944 | if (S.getLangOpts().HLSL) { |
945 | // Export-within-export was already diagnosed in ActOnStartExportDecl |
946 | if (!isa<FunctionDecl, ExportDecl>(Val: D)) { |
947 | S.Diag(Loc: D->getBeginLoc(), DiagID: diag::err_hlsl_export_not_on_function); |
948 | D->setInvalidDecl(); |
949 | return false; |
950 | } |
951 | } |
952 | |
953 | // C++20 [module.interface]p3: |
954 | // [...] it shall not declare a name with internal linkage. |
955 | bool HasName = false; |
956 | if (auto *ND = dyn_cast<NamedDecl>(Val: D)) { |
957 | // Don't diagnose anonymous union objects; we'll diagnose their members |
958 | // instead. |
959 | HasName = (bool)ND->getDeclName(); |
960 | if (HasName && ND->getFormalLinkage() == Linkage::Internal) { |
961 | S.Diag(Loc: ND->getLocation(), DiagID: diag::err_export_internal) << ND; |
962 | if (BlockStart.isValid()) |
963 | S.Diag(Loc: BlockStart, DiagID: diag::note_export); |
964 | return false; |
965 | } |
966 | } |
967 | |
968 | // C++2a [module.interface]p5: |
969 | // all entities to which all of the using-declarators ultimately refer |
970 | // shall have been introduced with a name having external linkage |
971 | if (auto *USD = dyn_cast<UsingShadowDecl>(Val: D)) { |
972 | NamedDecl *Target = USD->getUnderlyingDecl(); |
973 | Linkage Lk = Target->getFormalLinkage(); |
974 | if (Lk == Linkage::Internal || Lk == Linkage::Module) { |
975 | S.Diag(Loc: USD->getLocation(), DiagID: diag::err_export_using_internal) |
976 | << (Lk == Linkage::Internal ? 0 : 1) << Target; |
977 | S.Diag(Loc: Target->getLocation(), DiagID: diag::note_using_decl_target); |
978 | if (BlockStart.isValid()) |
979 | S.Diag(Loc: BlockStart, DiagID: diag::note_export); |
980 | return false; |
981 | } |
982 | } |
983 | |
984 | // Recurse into namespace-scope DeclContexts. (Only namespace-scope |
985 | // declarations are exported). |
986 | if (auto *DC = dyn_cast<DeclContext>(Val: D)) { |
987 | if (!isa<NamespaceDecl>(Val: D)) |
988 | return true; |
989 | |
990 | if (auto *ND = dyn_cast<NamedDecl>(Val: D)) { |
991 | if (!ND->getDeclName()) { |
992 | S.Diag(Loc: ND->getLocation(), DiagID: diag::err_export_anon_ns_internal); |
993 | if (BlockStart.isValid()) |
994 | S.Diag(Loc: BlockStart, DiagID: diag::note_export); |
995 | return false; |
996 | } else if (!DC->decls().empty() && |
997 | DC->getRedeclContext()->isFileContext()) { |
998 | return checkExportedDeclContext(S, DC, BlockStart); |
999 | } |
1000 | } |
1001 | } |
1002 | return true; |
1003 | } |
1004 | |
1005 | Decl *Sema::ActOnFinishExportDecl(Scope *S, Decl *D, SourceLocation RBraceLoc) { |
1006 | auto *ED = cast<ExportDecl>(Val: D); |
1007 | if (RBraceLoc.isValid()) |
1008 | ED->setRBraceLoc(RBraceLoc); |
1009 | |
1010 | PopDeclContext(); |
1011 | |
1012 | if (!D->isInvalidDecl()) { |
1013 | SourceLocation BlockStart = |
1014 | ED->hasBraces() ? ED->getBeginLoc() : SourceLocation(); |
1015 | for (auto *Child : ED->decls()) { |
1016 | checkExportedDecl(S&: *this, D: Child, BlockStart); |
1017 | if (auto *FD = dyn_cast<FunctionDecl>(Val: Child)) { |
1018 | // [dcl.inline]/7 |
1019 | // If an inline function or variable that is attached to a named module |
1020 | // is declared in a definition domain, it shall be defined in that |
1021 | // domain. |
1022 | // So, if the current declaration does not have a definition, we must |
1023 | // check at the end of the TU (or when the PMF starts) to see that we |
1024 | // have a definition at that point. |
1025 | if (FD->isInlineSpecified() && !FD->isDefined()) |
1026 | PendingInlineFuncDecls.insert(Ptr: FD); |
1027 | } |
1028 | } |
1029 | } |
1030 | |
1031 | // Anything exported from a module should never be considered unused. |
1032 | for (auto *Exported : ED->decls()) |
1033 | Exported->markUsed(C&: getASTContext()); |
1034 | |
1035 | return D; |
1036 | } |
1037 | |
1038 | Module *Sema::PushGlobalModuleFragment(SourceLocation BeginLoc) { |
1039 | // We shouldn't create new global module fragment if there is already |
1040 | // one. |
1041 | if (!TheGlobalModuleFragment) { |
1042 | ModuleMap &Map = PP.getHeaderSearchInfo().getModuleMap(); |
1043 | TheGlobalModuleFragment = Map.createGlobalModuleFragmentForModuleUnit( |
1044 | Loc: BeginLoc, Parent: getCurrentModule()); |
1045 | } |
1046 | |
1047 | assert(TheGlobalModuleFragment && "module creation should not fail" ); |
1048 | |
1049 | // Enter the scope of the global module. |
1050 | ModuleScopes.push_back(Elt: {.BeginLoc: BeginLoc, .Module: TheGlobalModuleFragment, |
1051 | /*OuterVisibleModules=*/{}}); |
1052 | VisibleModules.setVisible(M: TheGlobalModuleFragment, Loc: BeginLoc); |
1053 | |
1054 | return TheGlobalModuleFragment; |
1055 | } |
1056 | |
1057 | void Sema::PopGlobalModuleFragment() { |
1058 | assert(!ModuleScopes.empty() && |
1059 | getCurrentModule()->isExplicitGlobalModule() && |
1060 | "left the wrong module scope, which is not global module fragment" ); |
1061 | ModuleScopes.pop_back(); |
1062 | } |
1063 | |
1064 | Module *Sema::PushImplicitGlobalModuleFragment(SourceLocation BeginLoc) { |
1065 | if (!TheImplicitGlobalModuleFragment) { |
1066 | ModuleMap &Map = PP.getHeaderSearchInfo().getModuleMap(); |
1067 | TheImplicitGlobalModuleFragment = |
1068 | Map.createImplicitGlobalModuleFragmentForModuleUnit(Loc: BeginLoc, |
1069 | Parent: getCurrentModule()); |
1070 | } |
1071 | assert(TheImplicitGlobalModuleFragment && "module creation should not fail" ); |
1072 | |
1073 | // Enter the scope of the global module. |
1074 | ModuleScopes.push_back(Elt: {.BeginLoc: BeginLoc, .Module: TheImplicitGlobalModuleFragment, |
1075 | /*OuterVisibleModules=*/{}}); |
1076 | VisibleModules.setVisible(M: TheImplicitGlobalModuleFragment, Loc: BeginLoc); |
1077 | return TheImplicitGlobalModuleFragment; |
1078 | } |
1079 | |
1080 | void Sema::PopImplicitGlobalModuleFragment() { |
1081 | assert(!ModuleScopes.empty() && |
1082 | getCurrentModule()->isImplicitGlobalModule() && |
1083 | "left the wrong module scope, which is not global module fragment" ); |
1084 | ModuleScopes.pop_back(); |
1085 | } |
1086 | |
1087 | bool Sema::isCurrentModulePurview() const { |
1088 | if (!getCurrentModule()) |
1089 | return false; |
1090 | |
1091 | /// Does this Module scope describe part of the purview of a standard named |
1092 | /// C++ module? |
1093 | switch (getCurrentModule()->Kind) { |
1094 | case Module::ModuleInterfaceUnit: |
1095 | case Module::ModuleImplementationUnit: |
1096 | case Module::ModulePartitionInterface: |
1097 | case Module::ModulePartitionImplementation: |
1098 | case Module::PrivateModuleFragment: |
1099 | case Module::ImplicitGlobalModuleFragment: |
1100 | return true; |
1101 | default: |
1102 | return false; |
1103 | } |
1104 | } |
1105 | |