1 | |
2 | |
3 | |
4 | |
5 | |
6 | |
7 | |
8 | |
9 | |
10 | |
11 | |
12 | |
13 | |
14 | #include "clang/Frontend/Utils.h" |
15 | #include "clang/Basic/CharInfo.h" |
16 | #include "clang/Basic/Diagnostic.h" |
17 | #include "clang/Basic/SourceManager.h" |
18 | #include "clang/Frontend/PreprocessorOutputOptions.h" |
19 | #include "clang/Lex/MacroInfo.h" |
20 | #include "clang/Lex/PPCallbacks.h" |
21 | #include "clang/Lex/Pragma.h" |
22 | #include "clang/Lex/Preprocessor.h" |
23 | #include "clang/Lex/TokenConcatenation.h" |
24 | #include "llvm/ADT/STLExtras.h" |
25 | #include "llvm/ADT/SmallString.h" |
26 | #include "llvm/ADT/StringRef.h" |
27 | #include "llvm/Support/ErrorHandling.h" |
28 | #include "llvm/Support/raw_ostream.h" |
29 | #include <cstdio> |
30 | using namespace clang; |
31 | |
32 | |
33 | |
34 | static void PrintMacroDefinition(const IdentifierInfo &II, const MacroInfo &MI, |
35 | Preprocessor &PP, raw_ostream &OS) { |
36 | OS << "#define " << II.getName(); |
37 | |
38 | if (MI.isFunctionLike()) { |
39 | OS << '('; |
40 | if (!MI.param_empty()) { |
41 | MacroInfo::param_iterator AI = MI.param_begin(), E = MI.param_end(); |
42 | for (; AI+1 != E; ++AI) { |
43 | OS << (*AI)->getName(); |
44 | OS << ','; |
45 | } |
46 | |
47 | |
48 | if ((*AI)->getName() == "__VA_ARGS__") |
49 | OS << "..."; |
50 | else |
51 | OS << (*AI)->getName(); |
52 | } |
53 | |
54 | if (MI.isGNUVarargs()) |
55 | OS << "..."; |
56 | |
57 | OS << ')'; |
58 | } |
59 | |
60 | |
61 | |
62 | if (MI.tokens_empty() || !MI.tokens_begin()->hasLeadingSpace()) |
63 | OS << ' '; |
64 | |
65 | SmallString<128> SpellingBuffer; |
66 | for (const auto &T : MI.tokens()) { |
67 | if (T.hasLeadingSpace()) |
68 | OS << ' '; |
69 | |
70 | OS << PP.getSpelling(T, SpellingBuffer); |
71 | } |
72 | } |
73 | |
74 | |
75 | |
76 | |
77 | |
78 | namespace { |
79 | class PrintPPOutputPPCallbacks : public PPCallbacks { |
80 | Preprocessor &PP; |
81 | SourceManager &SM; |
82 | TokenConcatenation ConcatInfo; |
83 | public: |
84 | raw_ostream &OS; |
85 | private: |
86 | unsigned CurLine; |
87 | |
88 | bool EmittedTokensOnThisLine; |
89 | bool EmittedDirectiveOnThisLine; |
90 | SrcMgr::CharacteristicKind FileType; |
91 | SmallString<512> CurFilename; |
92 | bool Initialized; |
93 | bool DisableLineMarkers; |
94 | bool DumpDefines; |
95 | bool DumpIncludeDirectives; |
96 | bool UseLineDirectives; |
97 | bool IsFirstFileEntered; |
98 | public: |
99 | PrintPPOutputPPCallbacks(Preprocessor &pp, raw_ostream &os, bool lineMarkers, |
100 | bool defines, bool DumpIncludeDirectives, |
101 | bool UseLineDirectives) |
102 | : PP(pp), SM(PP.getSourceManager()), ConcatInfo(PP), OS(os), |
103 | DisableLineMarkers(lineMarkers), DumpDefines(defines), |
104 | DumpIncludeDirectives(DumpIncludeDirectives), |
105 | UseLineDirectives(UseLineDirectives) { |
106 | CurLine = 0; |
107 | CurFilename += "<uninit>"; |
108 | EmittedTokensOnThisLine = false; |
109 | EmittedDirectiveOnThisLine = false; |
110 | FileType = SrcMgr::C_User; |
111 | Initialized = false; |
112 | IsFirstFileEntered = false; |
113 | } |
114 | |
115 | void setEmittedTokensOnThisLine() { EmittedTokensOnThisLine = true; } |
116 | bool hasEmittedTokensOnThisLine() const { return EmittedTokensOnThisLine; } |
117 | |
118 | void setEmittedDirectiveOnThisLine() { EmittedDirectiveOnThisLine = true; } |
119 | bool hasEmittedDirectiveOnThisLine() const { |
120 | return EmittedDirectiveOnThisLine; |
121 | } |
122 | |
123 | bool startNewLineIfNeeded(bool ShouldUpdateCurrentLine = true); |
124 | |
125 | void FileChanged(SourceLocation Loc, FileChangeReason Reason, |
126 | SrcMgr::CharacteristicKind FileType, |
127 | FileID PrevFID) override; |
128 | void InclusionDirective(SourceLocation HashLoc, const Token &IncludeTok, |
129 | StringRef FileName, bool IsAngled, |
130 | CharSourceRange FilenameRange, const FileEntry *File, |
131 | StringRef SearchPath, StringRef RelativePath, |
132 | const Module *Imported, |
133 | SrcMgr::CharacteristicKind FileType) override; |
134 | void Ident(SourceLocation Loc, StringRef str) override; |
135 | void PragmaMessage(SourceLocation Loc, StringRef Namespace, |
136 | PragmaMessageKind Kind, StringRef Str) override; |
137 | void PragmaDebug(SourceLocation Loc, StringRef DebugType) override; |
138 | void PragmaDiagnosticPush(SourceLocation Loc, StringRef Namespace) override; |
139 | void PragmaDiagnosticPop(SourceLocation Loc, StringRef Namespace) override; |
140 | void PragmaDiagnostic(SourceLocation Loc, StringRef Namespace, |
141 | diag::Severity Map, StringRef Str) override; |
142 | void PragmaWarning(SourceLocation Loc, StringRef WarningSpec, |
143 | ArrayRef<int> Ids) override; |
144 | void PragmaWarningPush(SourceLocation Loc, int Level) override; |
145 | void PragmaWarningPop(SourceLocation Loc) override; |
146 | void PragmaExecCharsetPush(SourceLocation Loc, StringRef Str) override; |
147 | void PragmaExecCharsetPop(SourceLocation Loc) override; |
148 | void PragmaAssumeNonNullBegin(SourceLocation Loc) override; |
149 | void PragmaAssumeNonNullEnd(SourceLocation Loc) override; |
150 | |
151 | bool HandleFirstTokOnLine(Token &Tok); |
152 | |
153 | |
154 | |
155 | |
156 | bool MoveToLine(SourceLocation Loc) { |
157 | PresumedLoc PLoc = SM.getPresumedLoc(Loc); |
158 | if (PLoc.isInvalid()) |
159 | return false; |
160 | return MoveToLine(PLoc.getLine()) || (PLoc.getLine() == 1); |
161 | } |
162 | bool MoveToLine(unsigned LineNo); |
163 | |
164 | bool AvoidConcat(const Token &PrevPrevTok, const Token &PrevTok, |
165 | const Token &Tok) { |
166 | return ConcatInfo.AvoidConcat(PrevPrevTok, PrevTok, Tok); |
167 | } |
168 | void WriteLineInfo(unsigned LineNo, const char *=nullptr, |
169 | unsigned =0); |
170 | bool LineMarkersAreDisabled() const { return DisableLineMarkers; } |
171 | void HandleNewlinesInToken(const char *TokStr, unsigned Len); |
172 | |
173 | |
174 | void MacroDefined(const Token &MacroNameTok, |
175 | const MacroDirective *MD) override; |
176 | |
177 | |
178 | void MacroUndefined(const Token &MacroNameTok, |
179 | const MacroDefinition &MD, |
180 | const MacroDirective *Undef) override; |
181 | |
182 | void BeginModule(const Module *M); |
183 | void EndModule(const Module *M); |
184 | }; |
185 | } |
186 | |
187 | void PrintPPOutputPPCallbacks::WriteLineInfo(unsigned LineNo, |
188 | const char *, |
189 | unsigned ) { |
190 | startNewLineIfNeeded(); |
191 | |
192 | |
193 | if (UseLineDirectives) { |
194 | OS << "#line" << ' ' << LineNo << ' ' << '"'; |
195 | OS.write_escaped(CurFilename); |
196 | OS << '"'; |
197 | } else { |
198 | OS << '#' << ' ' << LineNo << ' ' << '"'; |
199 | OS.write_escaped(CurFilename); |
200 | OS << '"'; |
201 | |
202 | if (ExtraLen) |
203 | OS.write(Extra, ExtraLen); |
204 | |
205 | if (FileType == SrcMgr::C_System) |
206 | OS.write(" 3", 2); |
207 | else if (FileType == SrcMgr::C_ExternCSystem) |
208 | OS.write(" 3 4", 4); |
209 | } |
210 | OS << '\n'; |
211 | } |
212 | |
213 | |
214 | |
215 | |
216 | |
217 | bool PrintPPOutputPPCallbacks::MoveToLine(unsigned LineNo) { |
218 | |
219 | |
220 | if (LineNo-CurLine <= 8) { |
221 | if (LineNo-CurLine == 1) |
222 | OS << '\n'; |
223 | else if (LineNo == CurLine) |
224 | return false; |
225 | else { |
226 | const char *NewLines = "\n\n\n\n\n\n\n\n"; |
227 | OS.write(NewLines, LineNo-CurLine); |
228 | } |
229 | } else if (!DisableLineMarkers) { |
230 | |
231 | WriteLineInfo(LineNo, nullptr, 0); |
232 | } else { |
233 | |
234 | |
235 | startNewLineIfNeeded(); |
236 | } |
237 | |
238 | CurLine = LineNo; |
239 | return true; |
240 | } |
241 | |
242 | bool |
243 | PrintPPOutputPPCallbacks::startNewLineIfNeeded(bool ShouldUpdateCurrentLine) { |
244 | if (EmittedTokensOnThisLine || EmittedDirectiveOnThisLine) { |
245 | OS << '\n'; |
246 | EmittedTokensOnThisLine = false; |
247 | EmittedDirectiveOnThisLine = false; |
248 | if (ShouldUpdateCurrentLine) |
249 | ++CurLine; |
250 | return true; |
251 | } |
252 | |
253 | return false; |
254 | } |
255 | |
256 | |
257 | |
258 | |
259 | void PrintPPOutputPPCallbacks::FileChanged(SourceLocation Loc, |
260 | FileChangeReason Reason, |
261 | SrcMgr::CharacteristicKind NewFileType, |
262 | FileID PrevFID) { |
263 | |
264 | |
265 | SourceManager &SourceMgr = SM; |
266 | |
267 | PresumedLoc UserLoc = SourceMgr.getPresumedLoc(Loc); |
268 | if (UserLoc.isInvalid()) |
269 | return; |
270 | |
271 | unsigned NewLine = UserLoc.getLine(); |
272 | |
273 | if (Reason == PPCallbacks::EnterFile) { |
274 | SourceLocation IncludeLoc = UserLoc.getIncludeLoc(); |
275 | if (IncludeLoc.isValid()) |
276 | MoveToLine(IncludeLoc); |
277 | } else if (Reason == PPCallbacks::SystemHeaderPragma) { |
278 | |
279 | |
280 | |
281 | |
282 | |
283 | NewLine += 1; |
284 | } |
285 | |
286 | CurLine = NewLine; |
287 | |
288 | CurFilename.clear(); |
289 | CurFilename += UserLoc.getFilename(); |
290 | FileType = NewFileType; |
291 | |
292 | if (DisableLineMarkers) { |
293 | startNewLineIfNeeded(); |
294 | return; |
295 | } |
296 | |
297 | if (!Initialized) { |
298 | WriteLineInfo(CurLine); |
299 | Initialized = true; |
300 | } |
301 | |
302 | |
303 | |
304 | |
305 | |
306 | if (Reason == PPCallbacks::EnterFile && !IsFirstFileEntered) { |
307 | IsFirstFileEntered = true; |
308 | return; |
309 | } |
310 | |
311 | switch (Reason) { |
312 | case PPCallbacks::EnterFile: |
313 | WriteLineInfo(CurLine, " 1", 2); |
314 | break; |
315 | case PPCallbacks::ExitFile: |
316 | WriteLineInfo(CurLine, " 2", 2); |
317 | break; |
318 | case PPCallbacks::SystemHeaderPragma: |
319 | case PPCallbacks::RenameFile: |
320 | WriteLineInfo(CurLine); |
321 | break; |
322 | } |
323 | } |
324 | |
325 | void PrintPPOutputPPCallbacks::InclusionDirective( |
326 | SourceLocation HashLoc, |
327 | const Token &IncludeTok, |
328 | StringRef FileName, |
329 | bool IsAngled, |
330 | CharSourceRange FilenameRange, |
331 | const FileEntry *File, |
332 | StringRef SearchPath, |
333 | StringRef RelativePath, |
334 | const Module *Imported, |
335 | SrcMgr::CharacteristicKind FileType) { |
336 | |
337 | |
338 | if (DumpIncludeDirectives) { |
339 | startNewLineIfNeeded(); |
340 | MoveToLine(HashLoc); |
341 | const std::string TokenText = PP.getSpelling(IncludeTok); |
342 | assert(!TokenText.empty()); |
343 | OS << "#" << TokenText << " " |
344 | << (IsAngled ? '<' : '"') << FileName << (IsAngled ? '>' : '"') |
345 | << " /* clang -E -dI */"; |
346 | setEmittedDirectiveOnThisLine(); |
347 | startNewLineIfNeeded(); |
348 | } |
349 | |
350 | |
351 | if (Imported) { |
352 | switch (IncludeTok.getIdentifierInfo()->getPPKeywordID()) { |
353 | case tok::pp_include: |
354 | case tok::pp_import: |
355 | case tok::pp_include_next: |
356 | startNewLineIfNeeded(); |
357 | MoveToLine(HashLoc); |
358 | OS << "#pragma clang module import " << Imported->getFullModuleName(true) |
359 | << " /* clang -E: implicit import for " |
360 | << "#" << PP.getSpelling(IncludeTok) << " " |
361 | << (IsAngled ? '<' : '"') << FileName << (IsAngled ? '>' : '"') |
362 | << " */"; |
363 | |
364 | |
365 | EmittedTokensOnThisLine = true; |
366 | startNewLineIfNeeded(); |
367 | break; |
368 | |
369 | case tok::pp___include_macros: |
370 | |
371 | |
372 | |
373 | |
374 | |
375 | break; |
376 | |
377 | default: |
378 | llvm_unreachable("unknown include directive kind"); |
379 | break; |
380 | } |
381 | } |
382 | } |
383 | |
384 | |
385 | void PrintPPOutputPPCallbacks::BeginModule(const Module *M) { |
386 | startNewLineIfNeeded(); |
387 | OS << "#pragma clang module begin " << M->getFullModuleName(true); |
388 | setEmittedDirectiveOnThisLine(); |
389 | } |
390 | |
391 | |
392 | void PrintPPOutputPPCallbacks::EndModule(const Module *M) { |
393 | startNewLineIfNeeded(); |
394 | OS << "#pragma clang module end /*" << M->getFullModuleName(true) << "*/"; |
395 | setEmittedDirectiveOnThisLine(); |
396 | } |
397 | |
398 | |
399 | |
400 | void PrintPPOutputPPCallbacks::Ident(SourceLocation Loc, StringRef S) { |
401 | MoveToLine(Loc); |
402 | |
403 | OS.write("#ident ", strlen("#ident ")); |
404 | OS.write(S.begin(), S.size()); |
405 | EmittedTokensOnThisLine = true; |
406 | } |
407 | |
408 | |
409 | void PrintPPOutputPPCallbacks::MacroDefined(const Token &MacroNameTok, |
410 | const MacroDirective *MD) { |
411 | const MacroInfo *MI = MD->getMacroInfo(); |
412 | |
413 | if (!DumpDefines || |
414 | |
415 | MI->isBuiltinMacro()) return; |
416 | |
417 | MoveToLine(MI->getDefinitionLoc()); |
418 | PrintMacroDefinition(*MacroNameTok.getIdentifierInfo(), *MI, PP, OS); |
419 | setEmittedDirectiveOnThisLine(); |
420 | } |
421 | |
422 | void PrintPPOutputPPCallbacks::MacroUndefined(const Token &MacroNameTok, |
423 | const MacroDefinition &MD, |
424 | const MacroDirective *Undef) { |
425 | |
426 | if (!DumpDefines) return; |
427 | |
428 | MoveToLine(MacroNameTok.getLocation()); |
429 | OS << "#undef " << MacroNameTok.getIdentifierInfo()->getName(); |
430 | setEmittedDirectiveOnThisLine(); |
431 | } |
432 | |
433 | static void outputPrintable(raw_ostream &OS, StringRef Str) { |
434 | for (unsigned char Char : Str) { |
435 | if (isPrintable(Char) && Char != '\\' && Char != '"') |
436 | OS << (char)Char; |
437 | else |
438 | OS << '\\' |
439 | << (char)('0' + ((Char >> 6) & 7)) |
440 | << (char)('0' + ((Char >> 3) & 7)) |
441 | << (char)('0' + ((Char >> 0) & 7)); |
442 | } |
443 | } |
444 | |
445 | void PrintPPOutputPPCallbacks::PragmaMessage(SourceLocation Loc, |
446 | StringRef Namespace, |
447 | PragmaMessageKind Kind, |
448 | StringRef Str) { |
449 | startNewLineIfNeeded(); |
450 | MoveToLine(Loc); |
451 | OS << "#pragma "; |
452 | if (!Namespace.empty()) |
453 | OS << Namespace << ' '; |
454 | switch (Kind) { |
455 | case PMK_Message: |
456 | OS << "message(\""; |
457 | break; |
458 | case PMK_Warning: |
459 | OS << "warning \""; |
460 | break; |
461 | case PMK_Error: |
462 | OS << "error \""; |
463 | break; |
464 | } |
465 | |
466 | outputPrintable(OS, Str); |
467 | OS << '"'; |
468 | if (Kind == PMK_Message) |
469 | OS << ')'; |
470 | setEmittedDirectiveOnThisLine(); |
471 | } |
472 | |
473 | void PrintPPOutputPPCallbacks::PragmaDebug(SourceLocation Loc, |
474 | StringRef DebugType) { |
475 | startNewLineIfNeeded(); |
476 | MoveToLine(Loc); |
477 | |
478 | OS << "#pragma clang __debug "; |
479 | OS << DebugType; |
480 | |
481 | setEmittedDirectiveOnThisLine(); |
482 | } |
483 | |
484 | void PrintPPOutputPPCallbacks:: |
485 | PragmaDiagnosticPush(SourceLocation Loc, StringRef Namespace) { |
486 | startNewLineIfNeeded(); |
487 | MoveToLine(Loc); |
488 | OS << "#pragma " << Namespace << " diagnostic push"; |
489 | setEmittedDirectiveOnThisLine(); |
490 | } |
491 | |
492 | void PrintPPOutputPPCallbacks:: |
493 | PragmaDiagnosticPop(SourceLocation Loc, StringRef Namespace) { |
494 | startNewLineIfNeeded(); |
495 | MoveToLine(Loc); |
496 | OS << "#pragma " << Namespace << " diagnostic pop"; |
497 | setEmittedDirectiveOnThisLine(); |
498 | } |
499 | |
500 | void PrintPPOutputPPCallbacks::PragmaDiagnostic(SourceLocation Loc, |
501 | StringRef Namespace, |
502 | diag::Severity Map, |
503 | StringRef Str) { |
504 | startNewLineIfNeeded(); |
505 | MoveToLine(Loc); |
506 | OS << "#pragma " << Namespace << " diagnostic "; |
507 | switch (Map) { |
508 | case diag::Severity::Remark: |
509 | OS << "remark"; |
510 | break; |
511 | case diag::Severity::Warning: |
512 | OS << "warning"; |
513 | break; |
514 | case diag::Severity::Error: |
515 | OS << "error"; |
516 | break; |
517 | case diag::Severity::Ignored: |
518 | OS << "ignored"; |
519 | break; |
520 | case diag::Severity::Fatal: |
521 | OS << "fatal"; |
522 | break; |
523 | } |
524 | OS << " \"" << Str << '"'; |
525 | setEmittedDirectiveOnThisLine(); |
526 | } |
527 | |
528 | void PrintPPOutputPPCallbacks::PragmaWarning(SourceLocation Loc, |
529 | StringRef WarningSpec, |
530 | ArrayRef<int> Ids) { |
531 | startNewLineIfNeeded(); |
532 | MoveToLine(Loc); |
533 | OS << "#pragma warning(" << WarningSpec << ':'; |
534 | for (ArrayRef<int>::iterator I = Ids.begin(), E = Ids.end(); I != E; ++I) |
535 | OS << ' ' << *I; |
536 | OS << ')'; |
537 | setEmittedDirectiveOnThisLine(); |
538 | } |
539 | |
540 | void PrintPPOutputPPCallbacks::PragmaWarningPush(SourceLocation Loc, |
541 | int Level) { |
542 | startNewLineIfNeeded(); |
543 | MoveToLine(Loc); |
544 | OS << "#pragma warning(push"; |
545 | if (Level >= 0) |
546 | OS << ", " << Level; |
547 | OS << ')'; |
548 | setEmittedDirectiveOnThisLine(); |
549 | } |
550 | |
551 | void PrintPPOutputPPCallbacks::PragmaWarningPop(SourceLocation Loc) { |
552 | startNewLineIfNeeded(); |
553 | MoveToLine(Loc); |
554 | OS << "#pragma warning(pop)"; |
555 | setEmittedDirectiveOnThisLine(); |
556 | } |
557 | |
558 | void PrintPPOutputPPCallbacks::PragmaExecCharsetPush(SourceLocation Loc, |
559 | StringRef Str) { |
560 | startNewLineIfNeeded(); |
561 | MoveToLine(Loc); |
562 | OS << "#pragma character_execution_set(push"; |
563 | if (!Str.empty()) |
564 | OS << ", " << Str; |
565 | OS << ')'; |
566 | setEmittedDirectiveOnThisLine(); |
567 | } |
568 | |
569 | void PrintPPOutputPPCallbacks::PragmaExecCharsetPop(SourceLocation Loc) { |
570 | startNewLineIfNeeded(); |
571 | MoveToLine(Loc); |
572 | OS << "#pragma character_execution_set(pop)"; |
573 | setEmittedDirectiveOnThisLine(); |
574 | } |
575 | |
576 | void PrintPPOutputPPCallbacks:: |
577 | PragmaAssumeNonNullBegin(SourceLocation Loc) { |
578 | startNewLineIfNeeded(); |
579 | MoveToLine(Loc); |
580 | OS << "#pragma clang assume_nonnull begin"; |
581 | setEmittedDirectiveOnThisLine(); |
582 | } |
583 | |
584 | void PrintPPOutputPPCallbacks:: |
585 | PragmaAssumeNonNullEnd(SourceLocation Loc) { |
586 | startNewLineIfNeeded(); |
587 | MoveToLine(Loc); |
588 | OS << "#pragma clang assume_nonnull end"; |
589 | setEmittedDirectiveOnThisLine(); |
590 | } |
591 | |
592 | |
593 | |
594 | |
595 | |
596 | |
597 | bool PrintPPOutputPPCallbacks::HandleFirstTokOnLine(Token &Tok) { |
598 | |
599 | |
600 | if (!MoveToLine(Tok.getLocation())) |
601 | return false; |
602 | |
603 | |
604 | |
605 | unsigned ColNo = SM.getExpansionColumnNumber(Tok.getLocation()); |
606 | |
607 | |
608 | |
609 | |
610 | |
611 | if (ColNo == 1 && Tok.hasLeadingSpace()) |
612 | ColNo = 2; |
613 | |
614 | |
615 | |
616 | |
617 | |
618 | |
619 | |
620 | if (ColNo <= 1 && Tok.is(tok::hash)) |
621 | OS << ' '; |
622 | |
623 | |
624 | for (; ColNo > 1; --ColNo) |
625 | OS << ' '; |
626 | |
627 | return true; |
628 | } |
629 | |
630 | void PrintPPOutputPPCallbacks::HandleNewlinesInToken(const char *TokStr, |
631 | unsigned Len) { |
632 | unsigned NumNewlines = 0; |
633 | for (; Len; --Len, ++TokStr) { |
634 | if (*TokStr != '\n' && |
635 | *TokStr != '\r') |
636 | continue; |
637 | |
638 | ++NumNewlines; |
639 | |
640 | |
641 | if (Len != 1 && |
642 | (TokStr[1] == '\n' || TokStr[1] == '\r') && |
643 | TokStr[0] != TokStr[1]) { |
644 | ++TokStr; |
645 | --Len; |
646 | } |
647 | } |
648 | |
649 | if (NumNewlines == 0) return; |
650 | |
651 | CurLine += NumNewlines; |
652 | } |
653 | |
654 | |
655 | namespace { |
656 | struct UnknownPragmaHandler : public PragmaHandler { |
657 | const char *Prefix; |
658 | PrintPPOutputPPCallbacks *Callbacks; |
659 | |
660 | |
661 | bool ShouldExpandTokens; |
662 | |
663 | UnknownPragmaHandler(const char *prefix, PrintPPOutputPPCallbacks *callbacks, |
664 | bool RequireTokenExpansion) |
665 | : Prefix(prefix), Callbacks(callbacks), |
666 | ShouldExpandTokens(RequireTokenExpansion) {} |
667 | void HandlePragma(Preprocessor &PP, PragmaIntroducerKind Introducer, |
668 | Token &PragmaTok) override { |
669 | |
670 | |
671 | Callbacks->startNewLineIfNeeded(); |
672 | Callbacks->MoveToLine(PragmaTok.getLocation()); |
673 | Callbacks->OS.write(Prefix, strlen(Prefix)); |
674 | |
675 | if (ShouldExpandTokens) { |
676 | |
677 | |
678 | auto Toks = llvm::make_unique<Token[]>(1); |
679 | Toks[0] = PragmaTok; |
680 | PP.EnterTokenStream(std::move(Toks), , |
681 | ); |
682 | PP.Lex(PragmaTok); |
683 | } |
684 | Token PrevToken; |
685 | Token PrevPrevToken; |
686 | PrevToken.startToken(); |
687 | PrevPrevToken.startToken(); |
688 | |
689 | |
690 | while (PragmaTok.isNot(tok::eod)) { |
691 | if (PragmaTok.hasLeadingSpace() || |
692 | Callbacks->AvoidConcat(PrevPrevToken, PrevToken, PragmaTok)) |
693 | Callbacks->OS << ' '; |
694 | std::string TokSpell = PP.getSpelling(PragmaTok); |
695 | Callbacks->OS.write(&TokSpell[0], TokSpell.size()); |
696 | |
697 | PrevPrevToken = PrevToken; |
698 | PrevToken = PragmaTok; |
699 | |
700 | if (ShouldExpandTokens) |
701 | PP.Lex(PragmaTok); |
702 | else |
703 | PP.LexUnexpandedToken(PragmaTok); |
704 | } |
705 | Callbacks->setEmittedDirectiveOnThisLine(); |
706 | } |
707 | }; |
708 | } |
709 | |
710 | |
711 | static void PrintPreprocessedTokens(Preprocessor &PP, Token &Tok, |
712 | PrintPPOutputPPCallbacks *Callbacks, |
713 | raw_ostream &OS) { |
714 | bool = PP.getLangOpts().TraditionalCPP && |
715 | !PP.getCommentRetentionState(); |
716 | |
717 | char Buffer[256]; |
718 | Token PrevPrevTok, PrevTok; |
719 | PrevPrevTok.startToken(); |
720 | PrevTok.startToken(); |
721 | while (1) { |
722 | if (Callbacks->hasEmittedDirectiveOnThisLine()) { |
723 | Callbacks->startNewLineIfNeeded(); |
724 | Callbacks->MoveToLine(Tok.getLocation()); |
725 | } |
726 | |
727 | |
728 | if (Tok.isAtStartOfLine() && Callbacks->HandleFirstTokOnLine(Tok)) { |
729 | |
730 | } else if (Tok.hasLeadingSpace() || |
731 | |
732 | |
733 | (Callbacks->hasEmittedTokensOnThisLine() && |
734 | |
735 | Callbacks->AvoidConcat(PrevPrevTok, PrevTok, Tok))) { |
736 | OS << ' '; |
737 | } |
738 | |
739 | if (DropComments && Tok.is(tok::comment)) { |
740 | |
741 | |
742 | |
743 | SourceLocation StartLoc = Tok.getLocation(); |
744 | Callbacks->MoveToLine(StartLoc.getLocWithOffset(Tok.getLength())); |
745 | } else if (Tok.is(tok::eod)) { |
746 | |
747 | |
748 | |
749 | PP.Lex(Tok); |
750 | continue; |
751 | } else if (Tok.is(tok::annot_module_include)) { |
752 | |
753 | |
754 | PP.Lex(Tok); |
755 | continue; |
756 | } else if (Tok.is(tok::annot_module_begin)) { |
757 | |
758 | |
759 | |
760 | |
761 | |
762 | |
763 | Callbacks->BeginModule( |
764 | reinterpret_cast<Module *>(Tok.getAnnotationValue())); |
765 | PP.Lex(Tok); |
766 | continue; |
767 | } else if (Tok.is(tok::annot_module_end)) { |
768 | Callbacks->EndModule( |
769 | reinterpret_cast<Module *>(Tok.getAnnotationValue())); |
770 | PP.Lex(Tok); |
771 | continue; |
772 | } else if (Tok.isAnnotation()) { |
773 | |
774 | |
775 | PP.Lex(Tok); |
776 | continue; |
777 | } else if (IdentifierInfo *II = Tok.getIdentifierInfo()) { |
778 | OS << II->getName(); |
779 | } else if (Tok.isLiteral() && !Tok.needsCleaning() && |
780 | Tok.getLiteralData()) { |
781 | OS.write(Tok.getLiteralData(), Tok.getLength()); |
782 | } else if (Tok.getLength() < llvm::array_lengthof(Buffer)) { |
783 | const char *TokPtr = Buffer; |
784 | unsigned Len = PP.getSpelling(Tok, TokPtr); |
785 | OS.write(TokPtr, Len); |
786 | |
787 | |
788 | |
789 | if (Tok.getKind() == tok::comment || Tok.getKind() == tok::unknown) |
790 | Callbacks->HandleNewlinesInToken(TokPtr, Len); |
791 | } else { |
792 | std::string S = PP.getSpelling(Tok); |
793 | OS.write(&S[0], S.size()); |
794 | |
795 | |
796 | |
797 | if (Tok.getKind() == tok::comment || Tok.getKind() == tok::unknown) |
798 | Callbacks->HandleNewlinesInToken(&S[0], S.size()); |
799 | } |
800 | Callbacks->setEmittedTokensOnThisLine(); |
801 | |
802 | if (Tok.is(tok::eof)) break; |
803 | |
804 | PrevPrevTok = PrevTok; |
805 | PrevTok = Tok; |
806 | PP.Lex(Tok); |
807 | } |
808 | } |
809 | |
810 | typedef std::pair<const IdentifierInfo *, MacroInfo *> id_macro_pair; |
811 | static int MacroIDCompare(const id_macro_pair *LHS, const id_macro_pair *RHS) { |
812 | return LHS->first->getName().compare(RHS->first->getName()); |
813 | } |
814 | |
815 | static void DoPrintMacros(Preprocessor &PP, raw_ostream *OS) { |
816 | |
817 | PP.IgnorePragmas(); |
818 | |
819 | |
820 | |
821 | PP.EnterMainSourceFile(); |
822 | |
823 | Token Tok; |
824 | do PP.Lex(Tok); |
825 | while (Tok.isNot(tok::eof)); |
826 | |
827 | SmallVector<id_macro_pair, 128> MacrosByID; |
828 | for (Preprocessor::macro_iterator I = PP.macro_begin(), E = PP.macro_end(); |
829 | I != E; ++I) { |
830 | auto *MD = I->second.getLatest(); |
831 | if (MD && MD->isDefined()) |
832 | MacrosByID.push_back(id_macro_pair(I->first, MD->getMacroInfo())); |
833 | } |
834 | llvm::array_pod_sort(MacrosByID.begin(), MacrosByID.end(), MacroIDCompare); |
835 | |
836 | for (unsigned i = 0, e = MacrosByID.size(); i != e; ++i) { |
837 | MacroInfo &MI = *MacrosByID[i].second; |
838 | |
839 | if (MI.isBuiltinMacro()) continue; |
840 | |
841 | PrintMacroDefinition(*MacrosByID[i].first, MI, PP, *OS); |
842 | *OS << '\n'; |
843 | } |
844 | } |
845 | |
846 | |
847 | |
848 | void clang::DoPrintPreprocessedInput(Preprocessor &PP, raw_ostream *OS, |
849 | const PreprocessorOutputOptions &Opts) { |
850 | |
851 | if (!Opts.ShowCPP) { |
852 | (0) . __assert_fail ("Opts.ShowMacros && \"Not yet implemented!\"", "/home/seafit/code_projects/clang_source/clang/lib/Frontend/PrintPreprocessedOutput.cpp", 852, __PRETTY_FUNCTION__))" file_link="../../../include/assert.h.html#88" macro="true">assert(Opts.ShowMacros && "Not yet implemented!"); |
853 | DoPrintMacros(PP, OS); |
854 | return; |
855 | } |
856 | |
857 | |
858 | |
859 | PP.SetCommentRetentionState(Opts.ShowComments, Opts.ShowMacroComments); |
860 | |
861 | PrintPPOutputPPCallbacks *Callbacks = new PrintPPOutputPPCallbacks( |
862 | PP, *OS, !Opts.ShowLineMarkers, Opts.ShowMacros, |
863 | Opts.ShowIncludeDirectives, Opts.UseLineDirectives); |
864 | |
865 | |
866 | |
867 | |
868 | std::unique_ptr<UnknownPragmaHandler> MicrosoftExtHandler( |
869 | new UnknownPragmaHandler( |
870 | "#pragma", Callbacks, |
871 | .getLangOpts().MicrosoftExt)); |
872 | |
873 | std::unique_ptr<UnknownPragmaHandler> GCCHandler(new UnknownPragmaHandler( |
874 | "#pragma GCC", Callbacks, |
875 | .getLangOpts().MicrosoftExt)); |
876 | |
877 | std::unique_ptr<UnknownPragmaHandler> ClangHandler(new UnknownPragmaHandler( |
878 | "#pragma clang", Callbacks, |
879 | .getLangOpts().MicrosoftExt)); |
880 | |
881 | PP.AddPragmaHandler(MicrosoftExtHandler.get()); |
882 | PP.AddPragmaHandler("GCC", GCCHandler.get()); |
883 | PP.AddPragmaHandler("clang", ClangHandler.get()); |
884 | |
885 | |
886 | |
887 | |
888 | |
889 | |
890 | std::unique_ptr<UnknownPragmaHandler> OpenMPHandler( |
891 | new UnknownPragmaHandler("#pragma omp", Callbacks, |
892 | )); |
893 | PP.AddPragmaHandler("omp", OpenMPHandler.get()); |
894 | |
895 | PP.addPPCallbacks(std::unique_ptr<PPCallbacks>(Callbacks)); |
896 | |
897 | |
898 | PP.EnterMainSourceFile(); |
899 | |
900 | |
901 | |
902 | |
903 | const SourceManager &SourceMgr = PP.getSourceManager(); |
904 | Token Tok; |
905 | do { |
906 | PP.Lex(Tok); |
907 | if (Tok.is(tok::eof) || !Tok.getLocation().isFileID()) |
908 | break; |
909 | |
910 | PresumedLoc PLoc = SourceMgr.getPresumedLoc(Tok.getLocation()); |
911 | if (PLoc.isInvalid()) |
912 | break; |
913 | |
914 | if (strcmp(PLoc.getFilename(), "<built-in>")) |
915 | break; |
916 | } while (true); |
917 | |
918 | |
919 | PrintPreprocessedTokens(PP, Tok, Callbacks, *OS); |
920 | *OS << '\n'; |
921 | |
922 | |
923 | |
924 | PP.RemovePragmaHandler(MicrosoftExtHandler.get()); |
925 | PP.RemovePragmaHandler("GCC", GCCHandler.get()); |
926 | PP.RemovePragmaHandler("clang", ClangHandler.get()); |
927 | PP.RemovePragmaHandler("omp", OpenMPHandler.get()); |
928 | } |
929 | |