/usr/src/gnu/usr.bin/clang/libclangParse/../../../llvm/clang/include/clang/Basic/Diagnostic.h

Bug Summary

File:	src/gnu/usr.bin/clang/libclangParse/../../../llvm/clang/include/clang/Basic/Diagnostic.h
Warning:	line 1155, column 19 Called C++ object pointer is null

Annotated Source Code

Press '?' to see keyboard shortcuts

Show analyzer invocation

clang -cc1 -cc1 -triple amd64-unknown-openbsd7.0 -analyze -disable-free -disable-llvm-verifier -discard-value-names -main-file-name ParsePragma.cpp -analyzer-store=region -analyzer-opt-analyze-nested-blocks -analyzer-checker=core -analyzer-checker=apiModeling -analyzer-checker=unix -analyzer-checker=deadcode -analyzer-checker=cplusplus -analyzer-checker=security.insecureAPI.UncheckedReturn -analyzer-checker=security.insecureAPI.getpw -analyzer-checker=security.insecureAPI.gets -analyzer-checker=security.insecureAPI.mktemp -analyzer-checker=security.insecureAPI.mkstemp -analyzer-checker=security.insecureAPI.vfork -analyzer-checker=nullability.NullPassedToNonnull -analyzer-checker=nullability.NullReturnedFromNonnull -analyzer-output plist -w -setup-static-analyzer -mrelocation-model static -mframe-pointer=all -relaxed-aliasing -fno-rounding-math -mconstructor-aliases -munwind-tables -target-cpu x86-64 -tune-cpu generic -debugger-tuning=gdb -fcoverage-compilation-dir=/usr/src/gnu/usr.bin/clang/libclangParse/obj -resource-dir /usr/local/lib/clang/13.0.0 -I /usr/src/gnu/usr.bin/clang/libclangParse/../../../llvm/clang/include -I /usr/src/gnu/usr.bin/clang/libclangParse/../../../llvm/llvm/include -I /usr/src/gnu/usr.bin/clang/libclangParse/../include -I /usr/src/gnu/usr.bin/clang/libclangParse/obj -I /usr/src/gnu/usr.bin/clang/libclangParse/obj/../include -D NDEBUG -D __STDC_LIMIT_MACROS -D __STDC_CONSTANT_MACROS -D __STDC_FORMAT_MACROS -D LLVM_PREFIX="/usr" -internal-isystem /usr/include/c++/v1 -internal-isystem /usr/local/lib/clang/13.0.0/include -internal-externc-isystem /usr/include -O2 -Wno-unused-parameter -Wwrite-strings -Wno-missing-field-initializers -Wno-long-long -Wno-comment -std=c++14 -fdeprecated-macro -fdebug-compilation-dir=/usr/src/gnu/usr.bin/clang/libclangParse/obj -ferror-limit 19 -fvisibility-inlines-hidden -fwrapv -stack-protector 2 -fno-rtti -fgnuc-version=4.2.1 -vectorize-loops -vectorize-slp -fno-builtin-malloc -fno-builtin-calloc -fno-builtin-realloc -fno-builtin-valloc -fno-builtin-free -fno-builtin-strdup -fno-builtin-strndup -analyzer-output=html -faddrsig -D__GCC_HAVE_DWARF2_CFI_ASM=1 -o /home/ben/Projects/vmm/scan-build/2022-01-12-194120-40624-1 -x c++ /usr/src/gnu/usr.bin/clang/libclangParse/../../../llvm/clang/lib/Parse/ParsePragma.cpp

/usr/src/gnu/usr.bin/clang/libclangParse/../../../llvm/clang/lib/Parse/ParsePragma.cpp

→

1//===--- ParsePragma.cpp - Language specific pragma parsing ---------------===//
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 the language specific #pragma handlers.
10//
11//===----------------------------------------------------------------------===//

13#include "clang/AST/ASTContext.h"
14#include "clang/Basic/PragmaKinds.h"
15#include "clang/Basic/TargetInfo.h"
16#include "clang/Lex/Preprocessor.h"
17#include "clang/Lex/Token.h"
18#include "clang/Parse/LoopHint.h"
19#include "clang/Parse/ParseDiagnostic.h"
20#include "clang/Parse/Parser.h"
21#include "clang/Parse/RAIIObjectsForParser.h"
22#include "clang/Sema/Scope.h"
23#include "llvm/ADT/ArrayRef.h"
24#include "llvm/ADT/StringSwitch.h"
25using namespace clang;

27namespace {

29struct PragmaAlignHandler : public PragmaHandler {
explicit PragmaAlignHandler() : PragmaHandler("align") {}
void HandlePragma(Preprocessor &PP, PragmaIntroducer Introducer,
                  Token &FirstToken) override;
33};

35struct PragmaGCCVisibilityHandler : public PragmaHandler {
explicit PragmaGCCVisibilityHandler() : PragmaHandler("visibility") {}
void HandlePragma(Preprocessor &PP, PragmaIntroducer Introducer,
                  Token &FirstToken) override;
39};

41struct PragmaOptionsHandler : public PragmaHandler {
explicit PragmaOptionsHandler() : PragmaHandler("options") {}
void HandlePragma(Preprocessor &PP, PragmaIntroducer Introducer,
                  Token &FirstToken) override;
45};

47struct PragmaPackHandler : public PragmaHandler {
explicit PragmaPackHandler() : PragmaHandler("pack") {}
void HandlePragma(Preprocessor &PP, PragmaIntroducer Introducer,
                  Token &FirstToken) override;
51};

53struct PragmaClangSectionHandler : public PragmaHandler {
explicit PragmaClangSectionHandler(Sema &S)
           : PragmaHandler("section"), Actions(S) {}
void HandlePragma(Preprocessor &PP, PragmaIntroducer Introducer,
                  Token &FirstToken) override;

59private:
Sema &Actions;
61};

63struct PragmaMSStructHandler : public PragmaHandler {
explicit PragmaMSStructHandler() : PragmaHandler("ms_struct") {}
void HandlePragma(Preprocessor &PP, PragmaIntroducer Introducer,
                  Token &FirstToken) override;
67};

69struct PragmaUnusedHandler : public PragmaHandler {
PragmaUnusedHandler() : PragmaHandler("unused") {}
void HandlePragma(Preprocessor &PP, PragmaIntroducer Introducer,
                  Token &FirstToken) override;
73};

75struct PragmaWeakHandler : public PragmaHandler {
explicit PragmaWeakHandler() : PragmaHandler("weak") {}
void HandlePragma(Preprocessor &PP, PragmaIntroducer Introducer,
                  Token &FirstToken) override;
79};

81struct PragmaRedefineExtnameHandler : public PragmaHandler {
explicit PragmaRedefineExtnameHandler() : PragmaHandler("redefine_extname") {}
void HandlePragma(Preprocessor &PP, PragmaIntroducer Introducer,
                  Token &FirstToken) override;
85};

87struct PragmaOpenCLExtensionHandler : public PragmaHandler {
PragmaOpenCLExtensionHandler() : PragmaHandler("EXTENSION") {}
void HandlePragma(Preprocessor &PP, PragmaIntroducer Introducer,
                  Token &FirstToken) override;
91};


94struct PragmaFPContractHandler : public PragmaHandler {
PragmaFPContractHandler() : PragmaHandler("FP_CONTRACT") {}
void HandlePragma(Preprocessor &PP, PragmaIntroducer Introducer,
                  Token &FirstToken) override;
98};

100// Pragma STDC implementations.

102/// PragmaSTDC_FENV_ACCESSHandler - "\#pragma STDC FENV_ACCESS ...".
103struct PragmaSTDC_FENV_ACCESSHandler : public PragmaHandler {
PragmaSTDC_FENV_ACCESSHandler() : PragmaHandler("FENV_ACCESS") {}

void HandlePragma(Preprocessor &PP, PragmaIntroducer Introducer,
                  Token &Tok) override {
  Token PragmaName = Tok;
  if (!PP.getTargetInfo().hasStrictFP() && !PP.getLangOpts().ExpStrictFP) {
    PP.Diag(Tok.getLocation(), diag::warn_pragma_fp_ignored)
        << PragmaName.getIdentifierInfo()->getName();
    return;
  }
  tok::OnOffSwitch OOS;
  if (PP.LexOnOffSwitch(OOS))
   return;

  MutableArrayRef<Token> Toks(PP.getPreprocessorAllocator().Allocate<Token>(1),
                              1);
  Toks[0].startToken();
  Toks[0].setKind(tok::annot_pragma_fenv_access);
  Toks[0].setLocation(Tok.getLocation());
  Toks[0].setAnnotationEndLoc(Tok.getLocation());
  Toks[0].setAnnotationValue(reinterpret_cast<void*>(
                             static_cast<uintptr_t>(OOS)));
  PP.EnterTokenStream(Toks, /*DisableMacroExpansion=*/true,
                      /*IsReinject=*/false);
}
129};

131/// PragmaSTDC_CX_LIMITED_RANGEHandler - "\#pragma STDC CX_LIMITED_RANGE ...".
132struct PragmaSTDC_CX_LIMITED_RANGEHandler : public PragmaHandler {
PragmaSTDC_CX_LIMITED_RANGEHandler() : PragmaHandler("CX_LIMITED_RANGE") {}

void HandlePragma(Preprocessor &PP, PragmaIntroducer Introducer,
                  Token &Tok) override {
  tok::OnOffSwitch OOS;
  PP.LexOnOffSwitch(OOS);
}
140};

142/// Handler for "\#pragma STDC FENV_ROUND ...".
143struct PragmaSTDC_FENV_ROUNDHandler : public PragmaHandler {
PragmaSTDC_FENV_ROUNDHandler() : PragmaHandler("FENV_ROUND") {}

void HandlePragma(Preprocessor &PP, PragmaIntroducer Introducer,
                  Token &Tok) override;
148};

150/// PragmaSTDC_UnknownHandler - "\#pragma STDC ...".
151struct PragmaSTDC_UnknownHandler : public PragmaHandler {
PragmaSTDC_UnknownHandler() = default;

void HandlePragma(Preprocessor &PP, PragmaIntroducer Introducer,
                  Token &UnknownTok) override {
  // C99 6.10.6p2, unknown forms are not allowed.
  PP.Diag(UnknownTok, diag::ext_stdc_pragma_ignored);
}
159};

161struct PragmaFPHandler : public PragmaHandler {
PragmaFPHandler() : PragmaHandler("fp") {}
void HandlePragma(Preprocessor &PP, PragmaIntroducer Introducer,
                  Token &FirstToken) override;
165};

167struct PragmaNoOpenMPHandler : public PragmaHandler {
PragmaNoOpenMPHandler() : PragmaHandler("omp") { }
void HandlePragma(Preprocessor &PP, PragmaIntroducer Introducer,
                  Token &FirstToken) override;
171};

173struct PragmaOpenMPHandler : public PragmaHandler {
PragmaOpenMPHandler() : PragmaHandler("omp") { }
void HandlePragma(Preprocessor &PP, PragmaIntroducer Introducer,
                  Token &FirstToken) override;
177};

179/// PragmaCommentHandler - "\#pragma comment ...".
180struct PragmaCommentHandler : public PragmaHandler {
PragmaCommentHandler(Sema &Actions)
  : PragmaHandler("comment"), Actions(Actions) {}
void HandlePragma(Preprocessor &PP, PragmaIntroducer Introducer,
                  Token &FirstToken) override;

186private:
Sema &Actions;
188};

190struct PragmaDetectMismatchHandler : public PragmaHandler {
PragmaDetectMismatchHandler(Sema &Actions)
  : PragmaHandler("detect_mismatch"), Actions(Actions) {}
void HandlePragma(Preprocessor &PP, PragmaIntroducer Introducer,
                  Token &FirstToken) override;

196private:
Sema &Actions;
198};

200struct PragmaFloatControlHandler : public PragmaHandler {
PragmaFloatControlHandler(Sema &Actions)
    : PragmaHandler("float_control") {}
void HandlePragma(Preprocessor &PP, PragmaIntroducer Introducer,
                  Token &FirstToken) override;
205};

207struct PragmaMSPointersToMembers : public PragmaHandler {
explicit PragmaMSPointersToMembers() : PragmaHandler("pointers_to_members") {}
void HandlePragma(Preprocessor &PP, PragmaIntroducer Introducer,
                  Token &FirstToken) override;
211};

213struct PragmaMSVtorDisp : public PragmaHandler {
explicit PragmaMSVtorDisp() : PragmaHandler("vtordisp") {}
void HandlePragma(Preprocessor &PP, PragmaIntroducer Introducer,
                  Token &FirstToken) override;
217};

219struct PragmaMSPragma : public PragmaHandler {
explicit PragmaMSPragma(const char *name) : PragmaHandler(name) {}
void HandlePragma(Preprocessor &PP, PragmaIntroducer Introducer,
                  Token &FirstToken) override;
223};

225/// PragmaOptimizeHandler - "\#pragma clang optimize on/off".
226struct PragmaOptimizeHandler : public PragmaHandler {
PragmaOptimizeHandler(Sema &S)
  : PragmaHandler("optimize"), Actions(S) {}
void HandlePragma(Preprocessor &PP, PragmaIntroducer Introducer,
                  Token &FirstToken) override;

232private:
Sema &Actions;
234};

236struct PragmaLoopHintHandler : public PragmaHandler {
PragmaLoopHintHandler() : PragmaHandler("loop") {}
void HandlePragma(Preprocessor &PP, PragmaIntroducer Introducer,
                  Token &FirstToken) override;
240};

242struct PragmaUnrollHintHandler : public PragmaHandler {
PragmaUnrollHintHandler(const char *name) : PragmaHandler(name) {}
void HandlePragma(Preprocessor &PP, PragmaIntroducer Introducer,
                  Token &FirstToken) override;
246};

248struct PragmaMSRuntimeChecksHandler : public EmptyPragmaHandler {
PragmaMSRuntimeChecksHandler() : EmptyPragmaHandler("runtime_checks") {}
250};

252struct PragmaMSIntrinsicHandler : public PragmaHandler {
PragmaMSIntrinsicHandler() : PragmaHandler("intrinsic") {}
void HandlePragma(Preprocessor &PP, PragmaIntroducer Introducer,
                  Token &FirstToken) override;
256};

258struct PragmaMSOptimizeHandler : public PragmaHandler {
PragmaMSOptimizeHandler() : PragmaHandler("optimize") {}
void HandlePragma(Preprocessor &PP, PragmaIntroducer Introducer,
                  Token &FirstToken) override;
262};

264struct PragmaForceCUDAHostDeviceHandler : public PragmaHandler {
PragmaForceCUDAHostDeviceHandler(Sema &Actions)
    : PragmaHandler("force_cuda_host_device"), Actions(Actions) {}
void HandlePragma(Preprocessor &PP, PragmaIntroducer Introducer,
                  Token &FirstToken) override;

270private:
Sema &Actions;
272};

274/// PragmaAttributeHandler - "\#pragma clang attribute ...".
275struct PragmaAttributeHandler : public PragmaHandler {
PragmaAttributeHandler(AttributeFactory &AttrFactory)
    : PragmaHandler("attribute"), AttributesForPragmaAttribute(AttrFactory) {}
void HandlePragma(Preprocessor &PP, PragmaIntroducer Introducer,
                  Token &FirstToken) override;

/// A pool of attributes that were parsed in \#pragma clang attribute.
ParsedAttributes AttributesForPragmaAttribute;
283};

285struct PragmaMaxTokensHereHandler : public PragmaHandler {
PragmaMaxTokensHereHandler() : PragmaHandler("max_tokens_here") {}
void HandlePragma(Preprocessor &PP, PragmaIntroducer Introducer,
                  Token &FirstToken) override;
289};

291struct PragmaMaxTokensTotalHandler : public PragmaHandler {
PragmaMaxTokensTotalHandler() : PragmaHandler("max_tokens_total") {}
void HandlePragma(Preprocessor &PP, PragmaIntroducer Introducer,
                  Token &FirstToken) override;
295};

297void markAsReinjectedForRelexing(llvm::MutableArrayRef<clang::Token> Toks) {
for (auto &T : Toks)
  T.setFlag(clang::Token::IsReinjected);
300}
301}  // end namespace

303void Parser::initializePragmaHandlers() {
AlignHandler = std::make_unique<PragmaAlignHandler>();
PP.AddPragmaHandler(AlignHandler.get());

GCCVisibilityHandler = std::make_unique<PragmaGCCVisibilityHandler>();
PP.AddPragmaHandler("GCC", GCCVisibilityHandler.get());

OptionsHandler = std::make_unique<PragmaOptionsHandler>();
PP.AddPragmaHandler(OptionsHandler.get());

PackHandler = std::make_unique<PragmaPackHandler>();
PP.AddPragmaHandler(PackHandler.get());

MSStructHandler = std::make_unique<PragmaMSStructHandler>();
PP.AddPragmaHandler(MSStructHandler.get());

UnusedHandler = std::make_unique<PragmaUnusedHandler>();
PP.AddPragmaHandler(UnusedHandler.get());

WeakHandler = std::make_unique<PragmaWeakHandler>();
PP.AddPragmaHandler(WeakHandler.get());

RedefineExtnameHandler = std::make_unique<PragmaRedefineExtnameHandler>();
PP.AddPragmaHandler(RedefineExtnameHandler.get());

FPContractHandler = std::make_unique<PragmaFPContractHandler>();
PP.AddPragmaHandler("STDC", FPContractHandler.get());

STDCFenvAccessHandler = std::make_unique<PragmaSTDC_FENV_ACCESSHandler>();
PP.AddPragmaHandler("STDC", STDCFenvAccessHandler.get());

STDCFenvRoundHandler = std::make_unique<PragmaSTDC_FENV_ROUNDHandler>();
PP.AddPragmaHandler("STDC", STDCFenvRoundHandler.get());

STDCCXLIMITHandler = std::make_unique<PragmaSTDC_CX_LIMITED_RANGEHandler>();
PP.AddPragmaHandler("STDC", STDCCXLIMITHandler.get());

STDCUnknownHandler = std::make_unique<PragmaSTDC_UnknownHandler>();
PP.AddPragmaHandler("STDC", STDCUnknownHandler.get());

PCSectionHandler = std::make_unique<PragmaClangSectionHandler>(Actions);
PP.AddPragmaHandler("clang", PCSectionHandler.get());

if (getLangOpts().OpenCL) {
  OpenCLExtensionHandler = std::make_unique<PragmaOpenCLExtensionHandler>();
  PP.AddPragmaHandler("OPENCL", OpenCLExtensionHandler.get());

  PP.AddPragmaHandler("OPENCL", FPContractHandler.get());
}
if (getLangOpts().OpenMP)
  OpenMPHandler = std::make_unique<PragmaOpenMPHandler>();
else
  OpenMPHandler = std::make_unique<PragmaNoOpenMPHandler>();
PP.AddPragmaHandler(OpenMPHandler.get());

if (getLangOpts().MicrosoftExt ||
    getTargetInfo().getTriple().isOSBinFormatELF()) {
  MSCommentHandler = std::make_unique<PragmaCommentHandler>(Actions);
  PP.AddPragmaHandler(MSCommentHandler.get());
}

FloatControlHandler = std::make_unique<PragmaFloatControlHandler>(Actions);
PP.AddPragmaHandler(FloatControlHandler.get());
if (getLangOpts().MicrosoftExt) {
  MSDetectMismatchHandler =
      std::make_unique<PragmaDetectMismatchHandler>(Actions);
  PP.AddPragmaHandler(MSDetectMismatchHandler.get());
  MSPointersToMembers = std::make_unique<PragmaMSPointersToMembers>();
  PP.AddPragmaHandler(MSPointersToMembers.get());
  MSVtorDisp = std::make_unique<PragmaMSVtorDisp>();
  PP.AddPragmaHandler(MSVtorDisp.get());
  MSInitSeg = std::make_unique<PragmaMSPragma>("init_seg");
  PP.AddPragmaHandler(MSInitSeg.get());
  MSDataSeg = std::make_unique<PragmaMSPragma>("data_seg");
  PP.AddPragmaHandler(MSDataSeg.get());
  MSBSSSeg = std::make_unique<PragmaMSPragma>("bss_seg");
  PP.AddPragmaHandler(MSBSSSeg.get());
  MSConstSeg = std::make_unique<PragmaMSPragma>("const_seg");
  PP.AddPragmaHandler(MSConstSeg.get());
  MSCodeSeg = std::make_unique<PragmaMSPragma>("code_seg");
  PP.AddPragmaHandler(MSCodeSeg.get());
  MSSection = std::make_unique<PragmaMSPragma>("section");
  PP.AddPragmaHandler(MSSection.get());
  MSRuntimeChecks = std::make_unique<PragmaMSRuntimeChecksHandler>();
  PP.AddPragmaHandler(MSRuntimeChecks.get());
  MSIntrinsic = std::make_unique<PragmaMSIntrinsicHandler>();
  PP.AddPragmaHandler(MSIntrinsic.get());
  MSOptimize = std::make_unique<PragmaMSOptimizeHandler>();
  PP.AddPragmaHandler(MSOptimize.get());
}

if (getLangOpts().CUDA) {
  CUDAForceHostDeviceHandler =
      std::make_unique<PragmaForceCUDAHostDeviceHandler>(Actions);
  PP.AddPragmaHandler("clang", CUDAForceHostDeviceHandler.get());
}

OptimizeHandler = std::make_unique<PragmaOptimizeHandler>(Actions);
PP.AddPragmaHandler("clang", OptimizeHandler.get());

LoopHintHandler = std::make_unique<PragmaLoopHintHandler>();
PP.AddPragmaHandler("clang", LoopHintHandler.get());

UnrollHintHandler = std::make_unique<PragmaUnrollHintHandler>("unroll");
PP.AddPragmaHandler(UnrollHintHandler.get());
PP.AddPragmaHandler("GCC", UnrollHintHandler.get());

NoUnrollHintHandler = std::make_unique<PragmaUnrollHintHandler>("nounroll");
PP.AddPragmaHandler(NoUnrollHintHandler.get());
PP.AddPragmaHandler("GCC", NoUnrollHintHandler.get());

UnrollAndJamHintHandler =
    std::make_unique<PragmaUnrollHintHandler>("unroll_and_jam");
PP.AddPragmaHandler(UnrollAndJamHintHandler.get());

NoUnrollAndJamHintHandler =
    std::make_unique<PragmaUnrollHintHandler>("nounroll_and_jam");
PP.AddPragmaHandler(NoUnrollAndJamHintHandler.get());

FPHandler = std::make_unique<PragmaFPHandler>();
PP.AddPragmaHandler("clang", FPHandler.get());

AttributePragmaHandler =
    std::make_unique<PragmaAttributeHandler>(AttrFactory);
PP.AddPragmaHandler("clang", AttributePragmaHandler.get());

MaxTokensHerePragmaHandler = std::make_unique<PragmaMaxTokensHereHandler>();
PP.AddPragmaHandler("clang", MaxTokensHerePragmaHandler.get());

MaxTokensTotalPragmaHandler = std::make_unique<PragmaMaxTokensTotalHandler>();
PP.AddPragmaHandler("clang", MaxTokensTotalPragmaHandler.get());
434}

436void Parser::resetPragmaHandlers() {
// Remove the pragma handlers we installed.
PP.RemovePragmaHandler(AlignHandler.get());
AlignHandler.reset();
PP.RemovePragmaHandler("GCC", GCCVisibilityHandler.get());
GCCVisibilityHandler.reset();
PP.RemovePragmaHandler(OptionsHandler.get());
OptionsHandler.reset();
PP.RemovePragmaHandler(PackHandler.get());
PackHandler.reset();
PP.RemovePragmaHandler(MSStructHandler.get());
MSStructHandler.reset();
PP.RemovePragmaHandler(UnusedHandler.get());
UnusedHandler.reset();
PP.RemovePragmaHandler(WeakHandler.get());
WeakHandler.reset();
PP.RemovePragmaHandler(RedefineExtnameHandler.get());
RedefineExtnameHandler.reset();

if (getLangOpts().OpenCL) {
  PP.RemovePragmaHandler("OPENCL", OpenCLExtensionHandler.get());
  OpenCLExtensionHandler.reset();
  PP.RemovePragmaHandler("OPENCL", FPContractHandler.get());
}
PP.RemovePragmaHandler(OpenMPHandler.get());
OpenMPHandler.reset();

if (getLangOpts().MicrosoftExt ||
    getTargetInfo().getTriple().isOSBinFormatELF()) {
  PP.RemovePragmaHandler(MSCommentHandler.get());
  MSCommentHandler.reset();
}

PP.RemovePragmaHandler("clang", PCSectionHandler.get());
PCSectionHandler.reset();

PP.RemovePragmaHandler(FloatControlHandler.get());
FloatControlHandler.reset();
if (getLangOpts().MicrosoftExt) {
  PP.RemovePragmaHandler(MSDetectMismatchHandler.get());
  MSDetectMismatchHandler.reset();
  PP.RemovePragmaHandler(MSPointersToMembers.get());
  MSPointersToMembers.reset();
  PP.RemovePragmaHandler(MSVtorDisp.get());
  MSVtorDisp.reset();
  PP.RemovePragmaHandler(MSInitSeg.get());
  MSInitSeg.reset();
  PP.RemovePragmaHandler(MSDataSeg.get());
  MSDataSeg.reset();
  PP.RemovePragmaHandler(MSBSSSeg.get());
  MSBSSSeg.reset();
  PP.RemovePragmaHandler(MSConstSeg.get());
  MSConstSeg.reset();
  PP.RemovePragmaHandler(MSCodeSeg.get());
  MSCodeSeg.reset();
  PP.RemovePragmaHandler(MSSection.get());
  MSSection.reset();
  PP.RemovePragmaHandler(MSRuntimeChecks.get());
  MSRuntimeChecks.reset();
  PP.RemovePragmaHandler(MSIntrinsic.get());
  MSIntrinsic.reset();
  PP.RemovePragmaHandler(MSOptimize.get());
  MSOptimize.reset();
}

if (getLangOpts().CUDA) {
  PP.RemovePragmaHandler("clang", CUDAForceHostDeviceHandler.get());
  CUDAForceHostDeviceHandler.reset();
}

PP.RemovePragmaHandler("STDC", FPContractHandler.get());
FPContractHandler.reset();

PP.RemovePragmaHandler("STDC", STDCFenvAccessHandler.get());
STDCFenvAccessHandler.reset();

PP.RemovePragmaHandler("STDC", STDCFenvRoundHandler.get());
STDCFenvRoundHandler.reset();

PP.RemovePragmaHandler("STDC", STDCCXLIMITHandler.get());
STDCCXLIMITHandler.reset();

PP.RemovePragmaHandler("STDC", STDCUnknownHandler.get());
STDCUnknownHandler.reset();

PP.RemovePragmaHandler("clang", OptimizeHandler.get());
OptimizeHandler.reset();

PP.RemovePragmaHandler("clang", LoopHintHandler.get());
LoopHintHandler.reset();

PP.RemovePragmaHandler(UnrollHintHandler.get());
PP.RemovePragmaHandler("GCC", UnrollHintHandler.get());
UnrollHintHandler.reset();

PP.RemovePragmaHandler(NoUnrollHintHandler.get());
PP.RemovePragmaHandler("GCC", NoUnrollHintHandler.get());
NoUnrollHintHandler.reset();

PP.RemovePragmaHandler(UnrollAndJamHintHandler.get());
UnrollAndJamHintHandler.reset();

PP.RemovePragmaHandler(NoUnrollAndJamHintHandler.get());
NoUnrollAndJamHintHandler.reset();

PP.RemovePragmaHandler("clang", FPHandler.get());
FPHandler.reset();

PP.RemovePragmaHandler("clang", AttributePragmaHandler.get());
AttributePragmaHandler.reset();

PP.RemovePragmaHandler("clang", MaxTokensHerePragmaHandler.get());
MaxTokensHerePragmaHandler.reset();

PP.RemovePragmaHandler("clang", MaxTokensTotalPragmaHandler.get());
MaxTokensTotalPragmaHandler.reset();
552}

554/// Handle the annotation token produced for #pragma unused(...)
555///
556/// Each annot_pragma_unused is followed by the argument token so e.g.
557/// "#pragma unused(x,y)" becomes:
558/// annot_pragma_unused 'x' annot_pragma_unused 'y'
559void Parser::HandlePragmaUnused() {
assert(Tok.is(tok::annot_pragma_unused))((void)0);
SourceLocation UnusedLoc = ConsumeAnnotationToken();
Actions.ActOnPragmaUnused(Tok, getCurScope(), UnusedLoc);
ConsumeToken(); // The argument token.
564}

566void Parser::HandlePragmaVisibility() {
assert(Tok.is(tok::annot_pragma_vis))((void)0);
const IdentifierInfo *VisType =
  static_cast<IdentifierInfo *>(Tok.getAnnotationValue());
SourceLocation VisLoc = ConsumeAnnotationToken();
Actions.ActOnPragmaVisibility(VisType, VisLoc);
572}

574namespace {
575struct PragmaPackInfo {
Sema::PragmaMsStackAction Action;
StringRef SlotLabel;
Token Alignment;
579};
580} // end anonymous namespace

582void Parser::HandlePragmaPack() {
assert(Tok.is(tok::annot_pragma_pack))((void)0);
PragmaPackInfo *Info =
  static_cast<PragmaPackInfo *>(Tok.getAnnotationValue());
SourceLocation PragmaLoc = Tok.getLocation();
ExprResult Alignment;
if (Info->Alignment.is(tok::numeric_constant)) {
  Alignment = Actions.ActOnNumericConstant(Info->Alignment);
  if (Alignment.isInvalid()) {
    ConsumeAnnotationToken();
    return;
  }
}
Actions.ActOnPragmaPack(PragmaLoc, Info->Action, Info->SlotLabel,
                        Alignment.get());
// Consume the token after processing the pragma to enable pragma-specific
// #include warnings.
ConsumeAnnotationToken();
600}

602void Parser::HandlePragmaMSStruct() {
assert(Tok.is(tok::annot_pragma_msstruct))((void)0);
PragmaMSStructKind Kind = static_cast<PragmaMSStructKind>(
    reinterpret_cast<uintptr_t>(Tok.getAnnotationValue()));
Actions.ActOnPragmaMSStruct(Kind);
ConsumeAnnotationToken();
608}

610void Parser::HandlePragmaAlign() {
assert(Tok.is(tok::annot_pragma_align))((void)0);
Sema::PragmaOptionsAlignKind Kind =
  static_cast<Sema::PragmaOptionsAlignKind>(
  reinterpret_cast<uintptr_t>(Tok.getAnnotationValue()));
Actions.ActOnPragmaOptionsAlign(Kind, Tok.getLocation());
// Consume the token after processing the pragma to enable pragma-specific
// #include warnings.
ConsumeAnnotationToken();
619}

621void Parser::HandlePragmaDump() {
assert(Tok.is(tok::annot_pragma_dump))((void)0);
IdentifierInfo *II =
    reinterpret_cast<IdentifierInfo *>(Tok.getAnnotationValue());
Actions.ActOnPragmaDump(getCurScope(), Tok.getLocation(), II);
ConsumeAnnotationToken();
627}

629void Parser::HandlePragmaWeak() {
assert(Tok.is(tok::annot_pragma_weak))((void)0);
SourceLocation PragmaLoc = ConsumeAnnotationToken();
Actions.ActOnPragmaWeakID(Tok.getIdentifierInfo(), PragmaLoc,
                          Tok.getLocation());
ConsumeToken(); // The weak name.
635}

637void Parser::HandlePragmaWeakAlias() {
assert(Tok.is(tok::annot_pragma_weakalias))((void)0);
SourceLocation PragmaLoc = ConsumeAnnotationToken();
IdentifierInfo *WeakName = Tok.getIdentifierInfo();
SourceLocation WeakNameLoc = Tok.getLocation();
ConsumeToken();
IdentifierInfo *AliasName = Tok.getIdentifierInfo();
SourceLocation AliasNameLoc = Tok.getLocation();
ConsumeToken();
Actions.ActOnPragmaWeakAlias(WeakName, AliasName, PragmaLoc,
                             WeakNameLoc, AliasNameLoc);

649}

651void Parser::HandlePragmaRedefineExtname() {
assert(Tok.is(tok::annot_pragma_redefine_extname))((void)0);
SourceLocation RedefLoc = ConsumeAnnotationToken();
IdentifierInfo *RedefName = Tok.getIdentifierInfo();
SourceLocation RedefNameLoc = Tok.getLocation();
ConsumeToken();
IdentifierInfo *AliasName = Tok.getIdentifierInfo();
SourceLocation AliasNameLoc = Tok.getLocation();
ConsumeToken();
Actions.ActOnPragmaRedefineExtname(RedefName, AliasName, RedefLoc,
                                   RedefNameLoc, AliasNameLoc);
662}

664void Parser::HandlePragmaFPContract() {
assert(Tok.is(tok::annot_pragma_fp_contract))((void)0);
tok::OnOffSwitch OOS =
  static_cast<tok::OnOffSwitch>(
  reinterpret_cast<uintptr_t>(Tok.getAnnotationValue()));

LangOptions::FPModeKind FPC;
switch (OOS) {
case tok::OOS_ON:
  FPC = LangOptions::FPM_On;
  break;
case tok::OOS_OFF:
  FPC = LangOptions::FPM_Off;
  break;
case tok::OOS_DEFAULT:
  FPC = getLangOpts().getDefaultFPContractMode();
  break;
}

SourceLocation PragmaLoc = ConsumeAnnotationToken();
Actions.ActOnPragmaFPContract(PragmaLoc, FPC);
685}

687void Parser::HandlePragmaFloatControl() {
assert(Tok.is(tok::annot_pragma_float_control))((void)0);

// The value that is held on the PragmaFloatControlStack encodes
// the PragmaFloatControl kind and the MSStackAction kind
// into a single 32-bit word. The MsStackAction is the high 16 bits
// and the FloatControl is the lower 16 bits. Use shift and bit-and
// to decode the parts.
uintptr_t Value = reinterpret_cast<uintptr_t>(Tok.getAnnotationValue());
Sema::PragmaMsStackAction Action =
    static_cast<Sema::PragmaMsStackAction>((Value >> 16) & 0xFFFF);
PragmaFloatControlKind Kind = PragmaFloatControlKind(Value & 0xFFFF);
SourceLocation PragmaLoc = ConsumeAnnotationToken();
Actions.ActOnPragmaFloatControl(PragmaLoc, Action, Kind);
701}

703void Parser::HandlePragmaFEnvAccess() {
assert(Tok.is(tok::annot_pragma_fenv_access))((void)0);
tok::OnOffSwitch OOS =
  static_cast<tok::OnOffSwitch>(
  reinterpret_cast<uintptr_t>(Tok.getAnnotationValue()));

bool IsEnabled;
switch (OOS) {
case tok::OOS_ON:
  IsEnabled = true;
  break;
case tok::OOS_OFF:
  IsEnabled = false;
  break;
case tok::OOS_DEFAULT: // FIXME: Add this cli option when it makes sense.
  IsEnabled = false;
  break;
}

SourceLocation PragmaLoc = ConsumeAnnotationToken();
Actions.ActOnPragmaFEnvAccess(PragmaLoc, IsEnabled);
724}

726void Parser::HandlePragmaFEnvRound() {
assert(Tok.is(tok::annot_pragma_fenv_round))((void)0);
auto RM = static_cast<llvm::RoundingMode>(
    reinterpret_cast<uintptr_t>(Tok.getAnnotationValue()));

SourceLocation PragmaLoc = ConsumeAnnotationToken();
Actions.setRoundingMode(PragmaLoc, RM);
733}

735StmtResult Parser::HandlePragmaCaptured()
736{
assert(Tok.is(tok::annot_pragma_captured))((void)0);
ConsumeAnnotationToken();

if (Tok.isNot(tok::l_brace)) {
  PP.Diag(Tok, diag::err_expected) << tok::l_brace;
  return StmtError();
}

SourceLocation Loc = Tok.getLocation();

ParseScope CapturedRegionScope(this, Scope::FnScope | Scope::DeclScope |
                                         Scope::CompoundStmtScope);
Actions.ActOnCapturedRegionStart(Loc, getCurScope(), CR_Default,
                                 /*NumParams=*/1);

StmtResult R = ParseCompoundStatement();
CapturedRegionScope.Exit();

if (R.isInvalid()) {
  Actions.ActOnCapturedRegionError();
  return StmtError();
}

return Actions.ActOnCapturedRegionEnd(R.get());
761}

763namespace {
enum OpenCLExtState : char {
  Disable, Enable, Begin, End
};
typedef std::pair<const IdentifierInfo *, OpenCLExtState> OpenCLExtData;
768}

770void Parser::HandlePragmaOpenCLExtension() {
assert(Tok.is(tok::annot_pragma_opencl_extension))((void)0);
OpenCLExtData *Data = static_cast<OpenCLExtData*>(Tok.getAnnotationValue());
auto State = Data->second;
auto Ident = Data->first;
SourceLocation NameLoc = Tok.getLocation();
ConsumeAnnotationToken();

auto &Opt = Actions.getOpenCLOptions();
auto Name = Ident->getName();
// OpenCL 1.1 9.1: "The all variant sets the behavior for all extensions,
// overriding all previously issued extension directives, but only if the
// behavior is set to disable."
if (Name == "all") {
  if (State == Disable)
    Opt.disableAll();
  else
    PP.Diag(NameLoc, diag::warn_pragma_expected_predicate) << 1;
} else if (State == Begin) {
  if (!Opt.isKnown(Name) || !Opt.isSupported(Name, getLangOpts())) {
    Opt.support(Name);
    // FIXME: Default behavior of the extension pragma is not defined.
    // Therefore, it should never be added by default.
    Opt.acceptsPragma(Name);
  }
} else if (State == End) {
  // There is no behavior for this directive. We only accept this for
  // backward compatibility.
} else if (!Opt.isKnown(Name) || !Opt.isWithPragma(Name))
  PP.Diag(NameLoc, diag::warn_pragma_unknown_extension) << Ident;
else if (Opt.isSupportedExtension(Name, getLangOpts()))
  Opt.enable(Name, State == Enable);
else if (Opt.isSupportedCoreOrOptionalCore(Name, getLangOpts()))
  PP.Diag(NameLoc, diag::warn_pragma_extension_is_core) << Ident;
else
  PP.Diag(NameLoc, diag::warn_pragma_unsupported_extension) << Ident;
806}

808void Parser::HandlePragmaMSPointersToMembers() {
assert(Tok.is(tok::annot_pragma_ms_pointers_to_members))((void)0);
LangOptions::PragmaMSPointersToMembersKind RepresentationMethod =
    static_cast<LangOptions::PragmaMSPointersToMembersKind>(
        reinterpret_cast<uintptr_t>(Tok.getAnnotationValue()));
SourceLocation PragmaLoc = ConsumeAnnotationToken();
Actions.ActOnPragmaMSPointersToMembers(RepresentationMethod, PragmaLoc);
815}

817void Parser::HandlePragmaMSVtorDisp() {
assert(Tok.is(tok::annot_pragma_ms_vtordisp))((void)0);
uintptr_t Value = reinterpret_cast<uintptr_t>(Tok.getAnnotationValue());
Sema::PragmaMsStackAction Action =
    static_cast<Sema::PragmaMsStackAction>((Value >> 16) & 0xFFFF);
MSVtorDispMode Mode = MSVtorDispMode(Value & 0xFFFF);
SourceLocation PragmaLoc = ConsumeAnnotationToken();
Actions.ActOnPragmaMSVtorDisp(Action, PragmaLoc, Mode);
825}

827void Parser::HandlePragmaMSPragma() {
assert(Tok.is(tok::annot_pragma_ms_pragma))((void)0);
// Grab the tokens out of the annotation and enter them into the stream.
auto TheTokens =
    (std::pair<std::unique_ptr<Token[]>, size_t> *)Tok.getAnnotationValue();
PP.EnterTokenStream(std::move(TheTokens->first), TheTokens->second, true,
                    /*IsReinject=*/true);
SourceLocation PragmaLocation = ConsumeAnnotationToken();
assert(Tok.isAnyIdentifier())((void)0);
StringRef PragmaName = Tok.getIdentifierInfo()->getName();
PP.Lex(Tok); // pragma kind

// Figure out which #pragma we're dealing with.  The switch has no default
// because lex shouldn't emit the annotation token for unrecognized pragmas.
typedef bool (Parser::*PragmaHandler)(StringRef, SourceLocation);
PragmaHandler Handler = llvm::StringSwitch<PragmaHandler>(PragmaName)
  .Case("data_seg", &Parser::HandlePragmaMSSegment)
  .Case("bss_seg", &Parser::HandlePragmaMSSegment)
  .Case("const_seg", &Parser::HandlePragmaMSSegment)
  .Case("code_seg", &Parser::HandlePragmaMSSegment)
  .Case("section", &Parser::HandlePragmaMSSection)
  .Case("init_seg", &Parser::HandlePragmaMSInitSeg);

if (!(this->*Handler)(PragmaName, PragmaLocation)) {
  // Pragma handling failed, and has been diagnosed.  Slurp up the tokens
  // until eof (really end of line) to prevent follow-on errors.
  while (Tok.isNot(tok::eof))
    PP.Lex(Tok);
  PP.Lex(Tok);
}
857}

859bool Parser::HandlePragmaMSSection(StringRef PragmaName,
                                 SourceLocation PragmaLocation) {
if (Tok.isNot(tok::l_paren)) {
  PP.Diag(PragmaLocation, diag::warn_pragma_expected_lparen) << PragmaName;
  return false;
}
PP.Lex(Tok); // (
// Parsing code for pragma section
if (Tok.isNot(tok::string_literal)) {
  PP.Diag(PragmaLocation, diag::warn_pragma_expected_section_name)
      << PragmaName;
  return false;
}
ExprResult StringResult = ParseStringLiteralExpression();
if (StringResult.isInvalid())
  return false; // Already diagnosed.
StringLiteral *SegmentName = cast<StringLiteral>(StringResult.get());
if (SegmentName->getCharByteWidth() != 1) {
  PP.Diag(PragmaLocation, diag::warn_pragma_expected_non_wide_string)
      << PragmaName;
  return false;
}
int SectionFlags = ASTContext::PSF_Read;
bool SectionFlagsAreDefault = true;
while (Tok.is(tok::comma)) {
  PP.Lex(Tok); // ,
  // Ignore "long" and "short".
  // They are undocumented, but widely used, section attributes which appear
  // to do nothing.
  if (Tok.is(tok::kw_long) || Tok.is(tok::kw_short)) {
    PP.Lex(Tok); // long/short
    continue;
  }

  if (!Tok.isAnyIdentifier()) {
    PP.Diag(PragmaLocation, diag::warn_pragma_expected_action_or_r_paren)
        << PragmaName;
    return false;
  }
  ASTContext::PragmaSectionFlag Flag =
    llvm::StringSwitch<ASTContext::PragmaSectionFlag>(
    Tok.getIdentifierInfo()->getName())
    .Case("read", ASTContext::PSF_Read)
    .Case("write", ASTContext::PSF_Write)
    .Case("execute", ASTContext::PSF_Execute)
    .Case("shared", ASTContext::PSF_Invalid)
    .Case("nopage", ASTContext::PSF_Invalid)
    .Case("nocache", ASTContext::PSF_Invalid)
    .Case("discard", ASTContext::PSF_Invalid)
    .Case("remove", ASTContext::PSF_Invalid)
    .Default(ASTContext::PSF_None);
  if (Flag == ASTContext::PSF_None || Flag == ASTContext::PSF_Invalid) {
    PP.Diag(PragmaLocation, Flag == ASTContext::PSF_None
                                ? diag::warn_pragma_invalid_specific_action
                                : diag::warn_pragma_unsupported_action)
        << PragmaName << Tok.getIdentifierInfo()->getName();
    return false;
  }
  SectionFlags |= Flag;
  SectionFlagsAreDefault = false;
  PP.Lex(Tok); // Identifier
}
// If no section attributes are specified, the section will be marked as
// read/write.
if (SectionFlagsAreDefault)
  SectionFlags |= ASTContext::PSF_Write;
if (Tok.isNot(tok::r_paren)) {
  PP.Diag(PragmaLocation, diag::warn_pragma_expected_rparen) << PragmaName;
  return false;
}
PP.Lex(Tok); // )
if (Tok.isNot(tok::eof)) {
  PP.Diag(PragmaLocation, diag::warn_pragma_extra_tokens_at_eol)
      << PragmaName;
  return false;
}
PP.Lex(Tok); // eof
Actions.ActOnPragmaMSSection(PragmaLocation, SectionFlags, SegmentName);
return true;
938}

940bool Parser::HandlePragmaMSSegment(StringRef PragmaName,
                                 SourceLocation PragmaLocation) {
if (Tok.isNot(tok::l_paren)) {
  PP.Diag(PragmaLocation, diag::warn_pragma_expected_lparen) << PragmaName;
  return false;
}
PP.Lex(Tok); // (
Sema::PragmaMsStackAction Action = Sema::PSK_Reset;
StringRef SlotLabel;
if (Tok.isAnyIdentifier()) {
  StringRef PushPop = Tok.getIdentifierInfo()->getName();
  if (PushPop == "push")
    Action = Sema::PSK_Push;
  else if (PushPop == "pop")
    Action = Sema::PSK_Pop;
  else {
    PP.Diag(PragmaLocation,
            diag::warn_pragma_expected_section_push_pop_or_name)
        << PragmaName;
    return false;
  }
  if (Action != Sema::PSK_Reset) {
    PP.Lex(Tok); // push | pop
    if (Tok.is(tok::comma)) {
      PP.Lex(Tok); // ,
      // If we've got a comma, we either need a label or a string.
      if (Tok.isAnyIdentifier()) {
        SlotLabel = Tok.getIdentifierInfo()->getName();
        PP.Lex(Tok); // identifier
        if (Tok.is(tok::comma))
          PP.Lex(Tok);
        else if (Tok.isNot(tok::r_paren)) {
          PP.Diag(PragmaLocation, diag::warn_pragma_expected_punc)
              << PragmaName;
          return false;
        }
      }
    } else if (Tok.isNot(tok::r_paren)) {
      PP.Diag(PragmaLocation, diag::warn_pragma_expected_punc) << PragmaName;
      return false;
    }
  }
}
// Grab the string literal for our section name.
StringLiteral *SegmentName = nullptr;
if (Tok.isNot(tok::r_paren)) {
  if (Tok.isNot(tok::string_literal)) {
    unsigned DiagID = Action != Sema::PSK_Reset ? !SlotLabel.empty() ?
        diag::warn_pragma_expected_section_name :
        diag::warn_pragma_expected_section_label_or_name :
        diag::warn_pragma_expected_section_push_pop_or_name;
    PP.Diag(PragmaLocation, DiagID) << PragmaName;
    return false;
  }
  ExprResult StringResult = ParseStringLiteralExpression();
  if (StringResult.isInvalid())
    return false; // Already diagnosed.
  SegmentName = cast<StringLiteral>(StringResult.get());
  if (SegmentName->getCharByteWidth() != 1) {
    PP.Diag(PragmaLocation, diag::warn_pragma_expected_non_wide_string)
        << PragmaName;
    return false;
  }
  // Setting section "" has no effect
  if (SegmentName->getLength())
    Action = (Sema::PragmaMsStackAction)(Action | Sema::PSK_Set);
}
if (Tok.isNot(tok::r_paren)) {
  PP.Diag(PragmaLocation, diag::warn_pragma_expected_rparen) << PragmaName;
  return false;
}
PP.Lex(Tok); // )
if (Tok.isNot(tok::eof)) {
  PP.Diag(PragmaLocation, diag::warn_pragma_extra_tokens_at_eol)
      << PragmaName;
  return false;
}
PP.Lex(Tok); // eof
Actions.ActOnPragmaMSSeg(PragmaLocation, Action, SlotLabel,
                         SegmentName, PragmaName);
return true;
1021}

1023// #pragma init_seg({ compiler | lib | user | "section-name" [, func-name]} )
1024bool Parser::HandlePragmaMSInitSeg(StringRef PragmaName,
                                 SourceLocation PragmaLocation) {
if (getTargetInfo().getTriple().getEnvironment() != llvm::Triple::MSVC) {
  PP.Diag(PragmaLocation, diag::warn_pragma_init_seg_unsupported_target);
  return false;
}

if (ExpectAndConsume(tok::l_paren, diag::warn_pragma_expected_lparen,
                     PragmaName))
  return false;

// Parse either the known section names or the string section name.
StringLiteral *SegmentName = nullptr;
if (Tok.isAnyIdentifier()) {
  auto *II = Tok.getIdentifierInfo();
  StringRef Section = llvm::StringSwitch<StringRef>(II->getName())
                          .Case("compiler", "\".CRT$XCC\"")
                          .Case("lib", "\".CRT$XCL\"")
                          .Case("user", "\".CRT$XCU\"")
                          .Default("");

  if (!Section.empty()) {
    // Pretend the user wrote the appropriate string literal here.
    Token Toks[1];
    Toks[0].startToken();
    Toks[0].setKind(tok::string_literal);
    Toks[0].setLocation(Tok.getLocation());
    Toks[0].setLiteralData(Section.data());
    Toks[0].setLength(Section.size());
    SegmentName =
        cast<StringLiteral>(Actions.ActOnStringLiteral(Toks, nullptr).get());
    PP.Lex(Tok);
  }
} else if (Tok.is(tok::string_literal)) {
  ExprResult StringResult = ParseStringLiteralExpression();
  if (StringResult.isInvalid())
    return false;
  SegmentName = cast<StringLiteral>(StringResult.get());
  if (SegmentName->getCharByteWidth() != 1) {
    PP.Diag(PragmaLocation, diag::warn_pragma_expected_non_wide_string)
        << PragmaName;
    return false;
  }
  // FIXME: Add support for the '[, func-name]' part of the pragma.
}

if (!SegmentName) {
  PP.Diag(PragmaLocation, diag::warn_pragma_expected_init_seg) << PragmaName;
  return false;
}

if (ExpectAndConsume(tok::r_paren, diag::warn_pragma_expected_rparen,
                     PragmaName) ||
    ExpectAndConsume(tok::eof, diag::warn_pragma_extra_tokens_at_eol,
                     PragmaName))
  return false;

Actions.ActOnPragmaMSInitSeg(PragmaLocation, SegmentName);
return true;
1083}

1085namespace {
1086struct PragmaLoopHintInfo {
Token PragmaName;
Token Option;
ArrayRef<Token> Toks;
1090};
1091} // end anonymous namespace

1093static std::string PragmaLoopHintString(Token PragmaName, Token Option) {
StringRef Str = PragmaName.getIdentifierInfo()->getName();
std::string ClangLoopStr = (llvm::Twine("clang loop ") + Str).str();
return std::string(llvm::StringSwitch<StringRef>(Str)
                       .Case("loop", ClangLoopStr)
                       .Case("unroll_and_jam", Str)
                       .Case("unroll", Str)
                       .Default(""));
1101}

1103bool Parser::HandlePragmaLoopHint(LoopHint &Hint) {
assert(Tok.is(tok::annot_pragma_loop_hint))((void)0);
PragmaLoopHintInfo *Info =
    static_cast<PragmaLoopHintInfo *>(Tok.getAnnotationValue());

IdentifierInfo *PragmaNameInfo = Info->PragmaName.getIdentifierInfo();
Hint.PragmaNameLoc = IdentifierLoc::create(
    Actions.Context, Info->PragmaName.getLocation(), PragmaNameInfo);

// It is possible that the loop hint has no option identifier, such as
// #pragma unroll(4).
IdentifierInfo *OptionInfo = Info->Option.is(tok::identifier)
                                 ? Info->Option.getIdentifierInfo()
                                 : nullptr;
Hint.OptionLoc = IdentifierLoc::create(
    Actions.Context, Info->Option.getLocation(), OptionInfo);

llvm::ArrayRef<Token> Toks = Info->Toks;

// Return a valid hint if pragma unroll or nounroll were specified
// without an argument.
auto IsLoopHint = llvm::StringSwitch<bool>(PragmaNameInfo->getName())
                      .Cases("unroll", "nounroll", "unroll_and_jam",
                             "nounroll_and_jam", true)
                      .Default(false);

if (Toks.empty() && IsLoopHint) {
  ConsumeAnnotationToken();
  Hint.Range = Info->PragmaName.getLocation();
  return true;
}

// The constant expression is always followed by an eof token, which increases
// the TokSize by 1.
assert(!Toks.empty() &&((void)0)
       "PragmaLoopHintInfo::Toks must contain at least one token.")((void)0);

// If no option is specified the argument is assumed to be a constant expr.
bool OptionUnroll = false;
bool OptionUnrollAndJam = false;
bool OptionDistribute = false;
bool OptionPipelineDisabled = false;
bool StateOption = false;
if (OptionInfo) { // Pragma Unroll does not specify an option.
  OptionUnroll = OptionInfo->isStr("unroll");
  OptionUnrollAndJam = OptionInfo->isStr("unroll_and_jam");
  OptionDistribute = OptionInfo->isStr("distribute");
  OptionPipelineDisabled = OptionInfo->isStr("pipeline");
  StateOption = llvm::StringSwitch<bool>(OptionInfo->getName())
                    .Case("vectorize", true)
                    .Case("interleave", true)
                    .Case("vectorize_predicate", true)
                    .Default(false) ||
                OptionUnroll || OptionUnrollAndJam || OptionDistribute ||
                OptionPipelineDisabled;
}

bool AssumeSafetyArg = !OptionUnroll && !OptionUnrollAndJam &&
                       !OptionDistribute && !OptionPipelineDisabled;
// Verify loop hint has an argument.
if (Toks[0].is(tok::eof)) {
  ConsumeAnnotationToken();
  Diag(Toks[0].getLocation(), diag::err_pragma_loop_missing_argument)
      << /*StateArgument=*/StateOption
      << /*FullKeyword=*/(OptionUnroll || OptionUnrollAndJam)
      << /*AssumeSafetyKeyword=*/AssumeSafetyArg;
  return false;
}

// Validate the argument.
if (StateOption) {
  ConsumeAnnotationToken();
  SourceLocation StateLoc = Toks[0].getLocation();
  IdentifierInfo *StateInfo = Toks[0].getIdentifierInfo();

  bool Valid = StateInfo &&
               llvm::StringSwitch<bool>(StateInfo->getName())
                   .Case("disable", true)
                   .Case("enable", !OptionPipelineDisabled)
                   .Case("full", OptionUnroll || OptionUnrollAndJam)
                   .Case("assume_safety", AssumeSafetyArg)
                   .Default(false);
  if (!Valid) {
    if (OptionPipelineDisabled) {
      Diag(Toks[0].getLocation(), diag::err_pragma_pipeline_invalid_keyword);
    } else {
      Diag(Toks[0].getLocation(), diag::err_pragma_invalid_keyword)
          << /*FullKeyword=*/(OptionUnroll || OptionUnrollAndJam)
          << /*AssumeSafetyKeyword=*/AssumeSafetyArg;
    }
    return false;
  }
  if (Toks.size() > 2)
    Diag(Tok.getLocation(), diag::warn_pragma_extra_tokens_at_eol)
        << PragmaLoopHintString(Info->PragmaName, Info->Option);
  Hint.StateLoc = IdentifierLoc::create(Actions.Context, StateLoc, StateInfo);
} else if (OptionInfo && OptionInfo->getName() == "vectorize_width") {
  PP.EnterTokenStream(Toks, /*DisableMacroExpansion=*/false,
                      /*IsReinject=*/false);
  ConsumeAnnotationToken();

  SourceLocation StateLoc = Toks[0].getLocation();
  IdentifierInfo *StateInfo = Toks[0].getIdentifierInfo();
  StringRef IsScalableStr = StateInfo ? StateInfo->getName() : "";

  // Look for vectorize_width(fixed|scalable)
  if (IsScalableStr == "scalable" || IsScalableStr == "fixed") {
    PP.Lex(Tok); // Identifier

    if (Toks.size() > 2) {
      Diag(Tok.getLocation(), diag::warn_pragma_extra_tokens_at_eol)
          << PragmaLoopHintString(Info->PragmaName, Info->Option);
      while (Tok.isNot(tok::eof))
        ConsumeAnyToken();
    }

    Hint.StateLoc =
        IdentifierLoc::create(Actions.Context, StateLoc, StateInfo);

    ConsumeToken(); // Consume the constant expression eof terminator.
  } else {
    // Enter constant expression including eof terminator into token stream.
    ExprResult R = ParseConstantExpression();

    if (R.isInvalid() && !Tok.is(tok::comma))
      Diag(Toks[0].getLocation(),
           diag::note_pragma_loop_invalid_vectorize_option);

    bool Arg2Error = false;
    if (Tok.is(tok::comma)) {
      PP.Lex(Tok); // ,

      StateInfo = Tok.getIdentifierInfo();
      IsScalableStr = StateInfo->getName();

      if (IsScalableStr != "scalable" && IsScalableStr != "fixed") {
        Diag(Tok.getLocation(),
             diag::err_pragma_loop_invalid_vectorize_option);
        Arg2Error = true;
      } else
        Hint.StateLoc =
            IdentifierLoc::create(Actions.Context, StateLoc, StateInfo);

      PP.Lex(Tok); // Identifier
    }

    // Tokens following an error in an ill-formed constant expression will
    // remain in the token stream and must be removed.
    if (Tok.isNot(tok::eof)) {
      Diag(Tok.getLocation(), diag::warn_pragma_extra_tokens_at_eol)
          << PragmaLoopHintString(Info->PragmaName, Info->Option);
      while (Tok.isNot(tok::eof))
        ConsumeAnyToken();
    }

    ConsumeToken(); // Consume the constant expression eof terminator.

    if (Arg2Error || R.isInvalid() ||
        Actions.CheckLoopHintExpr(R.get(), Toks[0].getLocation()))
      return false;

    // Argument is a constant expression with an integer type.
    Hint.ValueExpr = R.get();
  }
} else {
  // Enter constant expression including eof terminator into token stream.
  PP.EnterTokenStream(Toks, /*DisableMacroExpansion=*/false,
                      /*IsReinject=*/false);
  ConsumeAnnotationToken();
  ExprResult R = ParseConstantExpression();

  // Tokens following an error in an ill-formed constant expression will
  // remain in the token stream and must be removed.
  if (Tok.isNot(tok::eof)) {
    Diag(Tok.getLocation(), diag::warn_pragma_extra_tokens_at_eol)
        << PragmaLoopHintString(Info->PragmaName, Info->Option);
    while (Tok.isNot(tok::eof))
      ConsumeAnyToken();
  }

  ConsumeToken(); // Consume the constant expression eof terminator.

  if (R.isInvalid() ||
      Actions.CheckLoopHintExpr(R.get(), Toks[0].getLocation()))
    return false;

  // Argument is a constant expression with an integer type.
  Hint.ValueExpr = R.get();
}

Hint.Range = SourceRange(Info->PragmaName.getLocation(),
                         Info->Toks.back().getLocation());
return true;
1296}

1298namespace {
1299struct PragmaAttributeInfo {
enum ActionType { Push, Pop, Attribute };
ParsedAttributes &Attributes;
ActionType Action;
const IdentifierInfo *Namespace = nullptr;
ArrayRef<Token> Tokens;

PragmaAttributeInfo(ParsedAttributes &Attributes) : Attributes(Attributes) {}
1307};

1309#include "clang/Parse/AttrSubMatchRulesParserStringSwitches.inc"

1311} // end anonymous namespace

1313static StringRef getIdentifier(const Token &Tok) {
if (Tok.is(tok::identifier))
  return Tok.getIdentifierInfo()->getName();
const char *S = tok::getKeywordSpelling(Tok.getKind());
if (!S)
  return "";
return S;
1320}

1322static bool isAbstractAttrMatcherRule(attr::SubjectMatchRule Rule) {
using namespace attr;
switch (Rule) {
1325#define ATTR_MATCH_RULE(Value, Spelling, IsAbstract)                           \
case Value:                                                                  \
  return IsAbstract;
1328#include "clang/Basic/AttrSubMatchRulesList.inc"
}
llvm_unreachable("Invalid attribute subject match rule")__builtin_unreachable();
return false;
1332}

1334static void diagnoseExpectedAttributeSubjectSubRule(
  Parser &PRef, attr::SubjectMatchRule PrimaryRule, StringRef PrimaryRuleName,
  SourceLocation SubRuleLoc) {
auto Diagnostic =
    PRef.Diag(SubRuleLoc,
              diag::err_pragma_attribute_expected_subject_sub_identifier)
    << PrimaryRuleName;
if (const char *SubRules = validAttributeSubjectMatchSubRules(PrimaryRule))
  Diagnostic << /*SubRulesSupported=*/1 << SubRules;
else
  Diagnostic << /*SubRulesSupported=*/0;
1345}

1347static void diagnoseUnknownAttributeSubjectSubRule(
  Parser &PRef, attr::SubjectMatchRule PrimaryRule, StringRef PrimaryRuleName,
  StringRef SubRuleName, SourceLocation SubRuleLoc) {

auto Diagnostic =
    PRef.Diag(SubRuleLoc, diag::err_pragma_attribute_unknown_subject_sub_rule)
    << SubRuleName << PrimaryRuleName;
if (const char *SubRules = validAttributeSubjectMatchSubRules(PrimaryRule))
  Diagnostic << /*SubRulesSupported=*/1 << SubRules;
else
  Diagnostic << /*SubRulesSupported=*/0;
1358}

1360bool Parser::ParsePragmaAttributeSubjectMatchRuleSet(
  attr::ParsedSubjectMatchRuleSet &SubjectMatchRules, SourceLocation &AnyLoc,
  SourceLocation &LastMatchRuleEndLoc) {
bool IsAny = false;
BalancedDelimiterTracker AnyParens(*this, tok::l_paren);
if (getIdentifier(Tok) == "any") {
  AnyLoc = ConsumeToken();
  IsAny = true;
  if (AnyParens.expectAndConsume())
    return true;
}

do {
  // Parse the subject matcher rule.
  StringRef Name = getIdentifier(Tok);
  if (Name.empty()) {
    Diag(Tok, diag::err_pragma_attribute_expected_subject_identifier);
    return true;
  }
  std::pair<Optional<attr::SubjectMatchRule>,
            Optional<attr::SubjectMatchRule> (*)(StringRef, bool)>
      Rule = isAttributeSubjectMatchRule(Name);
  if (!Rule.first) {
    Diag(Tok, diag::err_pragma_attribute_unknown_subject_rule) << Name;
    return true;
  }
  attr::SubjectMatchRule PrimaryRule = *Rule.first;
  SourceLocation RuleLoc = ConsumeToken();

  BalancedDelimiterTracker Parens(*this, tok::l_paren);
  if (isAbstractAttrMatcherRule(PrimaryRule)) {
    if (Parens.expectAndConsume())
      return true;
  } else if (Parens.consumeOpen()) {
    if (!SubjectMatchRules
             .insert(
                 std::make_pair(PrimaryRule, SourceRange(RuleLoc, RuleLoc)))
             .second)
      Diag(RuleLoc, diag::err_pragma_attribute_duplicate_subject)
          << Name
          << FixItHint::CreateRemoval(SourceRange(
                 RuleLoc, Tok.is(tok::comma) ? Tok.getLocation() : RuleLoc));
    LastMatchRuleEndLoc = RuleLoc;
    continue;
  }

  // Parse the sub-rules.
  StringRef SubRuleName = getIdentifier(Tok);
  if (SubRuleName.empty()) {
    diagnoseExpectedAttributeSubjectSubRule(*this, PrimaryRule, Name,
                                            Tok.getLocation());
    return true;
  }
  attr::SubjectMatchRule SubRule;
  if (SubRuleName == "unless") {
    SourceLocation SubRuleLoc = ConsumeToken();
    BalancedDelimiterTracker Parens(*this, tok::l_paren);
    if (Parens.expectAndConsume())
      return true;
    SubRuleName = getIdentifier(Tok);
    if (SubRuleName.empty()) {
      diagnoseExpectedAttributeSubjectSubRule(*this, PrimaryRule, Name,
                                              SubRuleLoc);
      return true;
    }
    auto SubRuleOrNone = Rule.second(SubRuleName, /*IsUnless=*/true);
    if (!SubRuleOrNone) {
      std::string SubRuleUnlessName = "unless(" + SubRuleName.str() + ")";
      diagnoseUnknownAttributeSubjectSubRule(*this, PrimaryRule, Name,
                                             SubRuleUnlessName, SubRuleLoc);
      return true;
    }
    SubRule = *SubRuleOrNone;
    ConsumeToken();
    if (Parens.consumeClose())
      return true;
  } else {
    auto SubRuleOrNone = Rule.second(SubRuleName, /*IsUnless=*/false);
    if (!SubRuleOrNone) {
      diagnoseUnknownAttributeSubjectSubRule(*this, PrimaryRule, Name,
                                             SubRuleName, Tok.getLocation());
      return true;
    }
    SubRule = *SubRuleOrNone;
    ConsumeToken();
  }
  SourceLocation RuleEndLoc = Tok.getLocation();
  LastMatchRuleEndLoc = RuleEndLoc;
  if (Parens.consumeClose())
    return true;
  if (!SubjectMatchRules
           .insert(std::make_pair(SubRule, SourceRange(RuleLoc, RuleEndLoc)))
           .second) {
    Diag(RuleLoc, diag::err_pragma_attribute_duplicate_subject)
        << attr::getSubjectMatchRuleSpelling(SubRule)
        << FixItHint::CreateRemoval(SourceRange(
               RuleLoc, Tok.is(tok::comma) ? Tok.getLocation() : RuleEndLoc));
    continue;
  }
} while (IsAny && TryConsumeToken(tok::comma));

if (IsAny)
  if (AnyParens.consumeClose())
    return true;

return false;
1466}

1468namespace {

1470/// Describes the stage at which attribute subject rule parsing was interrupted.
1471enum class MissingAttributeSubjectRulesRecoveryPoint {
Comma,
ApplyTo,
Equals,
Any,
None,
1477};

1479MissingAttributeSubjectRulesRecoveryPoint
1480getAttributeSubjectRulesRecoveryPointForToken(const Token &Tok) {
if (const auto *II = Tok.getIdentifierInfo()) {
  if (II->isStr("apply_to"))
    return MissingAttributeSubjectRulesRecoveryPoint::ApplyTo;
  if (II->isStr("any"))
    return MissingAttributeSubjectRulesRecoveryPoint::Any;
}
if (Tok.is(tok::equal))
  return MissingAttributeSubjectRulesRecoveryPoint::Equals;
return MissingAttributeSubjectRulesRecoveryPoint::None;
1490}

1492/// Creates a diagnostic for the attribute subject rule parsing diagnostic that
1493/// suggests the possible attribute subject rules in a fix-it together with
1494/// any other missing tokens.
1495DiagnosticBuilder createExpectedAttributeSubjectRulesTokenDiagnostic(
  unsigned DiagID, ParsedAttr &Attribute,
  MissingAttributeSubjectRulesRecoveryPoint Point, Parser &PRef) {
SourceLocation Loc = PRef.getEndOfPreviousToken();
if (Loc.isInvalid())
15
←
Taking false branch→
  Loc = PRef.getCurToken().getLocation();
auto Diagnostic = PRef.Diag(Loc, DiagID);
std::string FixIt;
MissingAttributeSubjectRulesRecoveryPoint EndPoint =
    getAttributeSubjectRulesRecoveryPointForToken(PRef.getCurToken());
if (Point15.1
'Point' is equal to Comma
1
'Point' is equal to Comma
 == MissingAttributeSubjectRulesRecoveryPoint::Comma)
16
←
Taking true branch→
  FixIt = ", ";
if (Point16.1
'Point' is <= ApplyTo
1
'Point' is <= ApplyTo
 <= MissingAttributeSubjectRulesRecoveryPoint::ApplyTo &&
17
←
Taking true branch→
    EndPoint16.2
'EndPoint' is > ApplyTo
2
'EndPoint' is > ApplyTo
 > MissingAttributeSubjectRulesRecoveryPoint::ApplyTo)
  FixIt += "apply_to";
if (Point17.1
'Point' is <= Equals
1
'Point' is <= Equals
 <= MissingAttributeSubjectRulesRecoveryPoint::Equals &&
18
←
Taking true branch→
    EndPoint17.2
'EndPoint' is > Equals
2
'EndPoint' is > Equals
 > MissingAttributeSubjectRulesRecoveryPoint::Equals)
  FixIt += " = ";
SourceRange FixItRange(Loc);
if (EndPoint18.1
'EndPoint' is equal to None
1
'EndPoint' is equal to None
 == MissingAttributeSubjectRulesRecoveryPoint::None) {
19
←
Taking true branch→
  // Gather the subject match rules that are supported by the attribute.
  SmallVector<std::pair<attr::SubjectMatchRule, bool>, 4> SubjectMatchRuleSet;
  Attribute.getMatchRules(PRef.getLangOpts(), SubjectMatchRuleSet);
  if (SubjectMatchRuleSet.empty()) {
20
←
Taking true branch→
    // FIXME: We can emit a "fix-it" with a subject list placeholder when
    // placeholders will be supported by the fix-its.
    return Diagnostic;
21
←
Calling copy constructor for 'DiagnosticBuilder'→
27
←
Returning from copy constructor for 'DiagnosticBuilder'→
28
←
Calling '~DiagnosticBuilder'→
36
←
Returning from '~DiagnosticBuilder'→
  }
  FixIt += "any(";
  bool NeedsComma = false;
  for (const auto &I : SubjectMatchRuleSet) {
    // Ensure that the missing rule is reported in the fix-it only when it's
    // supported in the current language mode.
    if (!I.second)
      continue;
    if (NeedsComma)
      FixIt += ", ";
    else
      NeedsComma = true;
    FixIt += attr::getSubjectMatchRuleSpelling(I.first);
  }
  FixIt += ")";
  // Check if we need to remove the range
  PRef.SkipUntil(tok::eof, Parser::StopBeforeMatch);
  FixItRange.setEnd(PRef.getCurToken().getLocation());
}
if (FixItRange.getBegin() == FixItRange.getEnd())
  Diagnostic << FixItHint::CreateInsertion(FixItRange.getBegin(), FixIt);
else
  Diagnostic << FixItHint::CreateReplacement(
      CharSourceRange::getCharRange(FixItRange), FixIt);
return Diagnostic;
1547}

1549} // end anonymous namespace

1551void Parser::HandlePragmaAttribute() {
assert(Tok.is(tok::annot_pragma_attribute) &&((void)0)
       "Expected #pragma attribute annotation token")((void)0);
SourceLocation PragmaLoc = Tok.getLocation();
auto *Info = static_cast<PragmaAttributeInfo *>(Tok.getAnnotationValue());
if (Info->Action == PragmaAttributeInfo::Pop) {
1
Assuming field 'Action' is not equal to Pop→
2
←
Taking false branch→
  ConsumeAnnotationToken();
  Actions.ActOnPragmaAttributePop(PragmaLoc, Info->Namespace);
  return;
}
// Parse the actual attribute with its arguments.
assert((Info->Action == PragmaAttributeInfo::Push ||((void)0)
        Info->Action == PragmaAttributeInfo::Attribute) &&((void)0)
       "Unexpected #pragma attribute command")((void)0);

if (Info->Action == PragmaAttributeInfo::Push && Info->Tokens.empty()) {
3
←
Assuming field 'Action' is not equal to Push→
  ConsumeAnnotationToken();
  Actions.ActOnPragmaAttributeEmptyPush(PragmaLoc, Info->Namespace);
  return;
}

PP.EnterTokenStream(Info->Tokens, /*DisableMacroExpansion=*/false,
                    /*IsReinject=*/false);
ConsumeAnnotationToken();

ParsedAttributes &Attrs = Info->Attributes;
Attrs.clearListOnly();

auto SkipToEnd = [this]() {
  SkipUntil(tok::eof, StopBeforeMatch);
  ConsumeToken();
};

if (Tok.is(tok::l_square) && NextToken().is(tok::l_square)) {
  // Parse the CXX11 style attribute.
  ParseCXX11AttributeSpecifier(Attrs);
} else if (Tok.is(tok::kw___attribute)) {
4
←
Taking false branch→
  ConsumeToken();
  if (ExpectAndConsume(tok::l_paren, diag::err_expected_lparen_after,
                       "attribute"))
    return SkipToEnd();
  if (ExpectAndConsume(tok::l_paren, diag::err_expected_lparen_after, "("))
    return SkipToEnd();

  if (Tok.isNot(tok::identifier)) {
    Diag(Tok, diag::err_pragma_attribute_expected_attribute_name);
    SkipToEnd();
    return;
  }
  IdentifierInfo *AttrName = Tok.getIdentifierInfo();
  SourceLocation AttrNameLoc = ConsumeToken();

  if (Tok.isNot(tok::l_paren))
    Attrs.addNew(AttrName, AttrNameLoc, nullptr, AttrNameLoc, nullptr, 0,
                 ParsedAttr::AS_GNU);
  else
    ParseGNUAttributeArgs(AttrName, AttrNameLoc, Attrs, /*EndLoc=*/nullptr,
                          /*ScopeName=*/nullptr,
                          /*ScopeLoc=*/SourceLocation(), ParsedAttr::AS_GNU,
                          /*Declarator=*/nullptr);

  if (ExpectAndConsume(tok::r_paren))
    return SkipToEnd();
  if (ExpectAndConsume(tok::r_paren))
    return SkipToEnd();
} else if (Tok.is(tok::kw___declspec)) {
5
←
Taking true branch→
  ParseMicrosoftDeclSpecs(Attrs);
} else {
  Diag(Tok, diag::err_pragma_attribute_expected_attribute_syntax);
  if (Tok.getIdentifierInfo()) {
    // If we suspect that this is an attribute suggest the use of
    // '__attribute__'.
    if (ParsedAttr::getParsedKind(
            Tok.getIdentifierInfo(), /*ScopeName=*/nullptr,
            ParsedAttr::AS_GNU) != ParsedAttr::UnknownAttribute) {
      SourceLocation InsertStartLoc = Tok.getLocation();
      ConsumeToken();
      if (Tok.is(tok::l_paren)) {
        ConsumeAnyToken();
        SkipUntil(tok::r_paren, StopBeforeMatch);
        if (Tok.isNot(tok::r_paren))
          return SkipToEnd();
      }
      Diag(Tok, diag::note_pragma_attribute_use_attribute_kw)
          << FixItHint::CreateInsertion(InsertStartLoc, "__attribute__((")
          << FixItHint::CreateInsertion(Tok.getEndLoc(), "))");
    }
  }
  SkipToEnd();
  return;
}

if (Attrs.empty() || Attrs.begin()->isInvalid()) {
6
←
Assuming the condition is false→
7
←
Assuming the condition is false→
8
←
Taking false branch→
  SkipToEnd();
  return;
}

// Ensure that we don't have more than one attribute.
if (Attrs.size() > 1) {
9
←
Assuming the condition is false→
10
←
Taking false branch→
  SourceLocation Loc = Attrs[1].getLoc();
  Diag(Loc, diag::err_pragma_attribute_multiple_attributes);
  SkipToEnd();
  return;
}

ParsedAttr &Attribute = *Attrs.begin();
if (!Attribute.isSupportedByPragmaAttribute()) {
11
←
Assuming the condition is false→
12
←
Taking false branch→
  Diag(PragmaLoc, diag::err_pragma_attribute_unsupported_attribute)
      << Attribute;
  SkipToEnd();
  return;
}

// Parse the subject-list.
if (!TryConsumeToken(tok::comma)) {
13
←
Taking true branch→
  createExpectedAttributeSubjectRulesTokenDiagnostic(
14
←
Calling 'createExpectedAttributeSubjectRulesTokenDiagnostic'→
37
←
Returning from 'createExpectedAttributeSubjectRulesTokenDiagnostic'→
38
←
Calling 'DiagnosticBuilder::operator<<'→
      diag::err_expected, Attribute,
      MissingAttributeSubjectRulesRecoveryPoint::Comma, *this)
      << tok::comma;
  SkipToEnd();
  return;
}

if (Tok.isNot(tok::identifier)) {
  createExpectedAttributeSubjectRulesTokenDiagnostic(
      diag::err_pragma_attribute_invalid_subject_set_specifier, Attribute,
      MissingAttributeSubjectRulesRecoveryPoint::ApplyTo, *this);
  SkipToEnd();
  return;
}
const IdentifierInfo *II = Tok.getIdentifierInfo();
if (!II->isStr("apply_to")) {
  createExpectedAttributeSubjectRulesTokenDiagnostic(
      diag::err_pragma_attribute_invalid_subject_set_specifier, Attribute,
      MissingAttributeSubjectRulesRecoveryPoint::ApplyTo, *this);
  SkipToEnd();
  return;
}
ConsumeToken();

if (!TryConsumeToken(tok::equal)) {
  createExpectedAttributeSubjectRulesTokenDiagnostic(
      diag::err_expected, Attribute,
      MissingAttributeSubjectRulesRecoveryPoint::Equals, *this)
      << tok::equal;
  SkipToEnd();
  return;
}

attr::ParsedSubjectMatchRuleSet SubjectMatchRules;
SourceLocation AnyLoc, LastMatchRuleEndLoc;
if (ParsePragmaAttributeSubjectMatchRuleSet(SubjectMatchRules, AnyLoc,
                                            LastMatchRuleEndLoc)) {
  SkipToEnd();
  return;
}

// Tokens following an ill-formed attribute will remain in the token stream
// and must be removed.
if (Tok.isNot(tok::eof)) {
  Diag(Tok, diag::err_pragma_attribute_extra_tokens_after_attribute);
  SkipToEnd();
  return;
}

// Consume the eof terminator token.
ConsumeToken();

// Handle a mixed push/attribute by desurging to a push, then an attribute.
if (Info->Action == PragmaAttributeInfo::Push)
  Actions.ActOnPragmaAttributeEmptyPush(PragmaLoc, Info->Namespace);

Actions.ActOnPragmaAttributeAttribute(Attribute, PragmaLoc,
                                      std::move(SubjectMatchRules));
1725}

1727// #pragma GCC visibility comes in two variants:
1728//   'push' '(' [visibility] ')'
1729//   'pop'
1730void PragmaGCCVisibilityHandler::HandlePragma(Preprocessor &PP,
                                            PragmaIntroducer Introducer,
                                            Token &VisTok) {
SourceLocation VisLoc = VisTok.getLocation();

Token Tok;
PP.LexUnexpandedToken(Tok);

const IdentifierInfo *PushPop = Tok.getIdentifierInfo();

const IdentifierInfo *VisType;
if (PushPop && PushPop->isStr("pop")) {
  VisType = nullptr;
} else if (PushPop && PushPop->isStr("push")) {
  PP.LexUnexpandedToken(Tok);
  if (Tok.isNot(tok::l_paren)) {
    PP.Diag(Tok.getLocation(), diag::warn_pragma_expected_lparen)
      << "visibility";
    return;
  }
  PP.LexUnexpandedToken(Tok);
  VisType = Tok.getIdentifierInfo();
  if (!VisType) {
    PP.Diag(Tok.getLocation(), diag::warn_pragma_expected_identifier)
      << "visibility";
    return;
  }
  PP.LexUnexpandedToken(Tok);
  if (Tok.isNot(tok::r_paren)) {
    PP.Diag(Tok.getLocation(), diag::warn_pragma_expected_rparen)
      << "visibility";
    return;
  }
} else {
  PP.Diag(Tok.getLocation(), diag::warn_pragma_expected_identifier)
    << "visibility";
  return;
}
SourceLocation EndLoc = Tok.getLocation();
PP.LexUnexpandedToken(Tok);
if (Tok.isNot(tok::eod)) {
  PP.Diag(Tok.getLocation(), diag::warn_pragma_extra_tokens_at_eol)
    << "visibility";
  return;
}

auto Toks = std::make_unique<Token[]>(1);
Toks[0].startToken();
Toks[0].setKind(tok::annot_pragma_vis);
Toks[0].setLocation(VisLoc);
Toks[0].setAnnotationEndLoc(EndLoc);
Toks[0].setAnnotationValue(
    const_cast<void *>(static_cast<const void *>(VisType)));
PP.EnterTokenStream(std::move(Toks), 1, /*DisableMacroExpansion=*/true,
                    /*IsReinject=*/false);
1785}

1787// #pragma pack(...) comes in the following delicious flavors:
1788//   pack '(' [integer] ')'
1789//   pack '(' 'show' ')'
1790//   pack '(' ('push' | 'pop') [',' identifier] [, integer] ')'
1791void PragmaPackHandler::HandlePragma(Preprocessor &PP,
                                   PragmaIntroducer Introducer,
                                   Token &PackTok) {
SourceLocation PackLoc = PackTok.getLocation();

Token Tok;
PP.Lex(Tok);
if (Tok.isNot(tok::l_paren)) {
  PP.Diag(Tok.getLocation(), diag::warn_pragma_expected_lparen) << "pack";
  return;
}

Sema::PragmaMsStackAction Action = Sema::PSK_Reset;
StringRef SlotLabel;
Token Alignment;
Alignment.startToken();
PP.Lex(Tok);
if (Tok.is(tok::numeric_constant)) {
  Alignment = Tok;

  PP.Lex(Tok);

  // In MSVC/gcc, #pragma pack(4) sets the alignment without affecting
  // the push/pop stack.
  // In Apple gcc/XL, #pragma pack(4) is equivalent to #pragma pack(push, 4)
  Action = (PP.getLangOpts().ApplePragmaPack || PP.getLangOpts().XLPragmaPack)
               ? Sema::PSK_Push_Set
               : Sema::PSK_Set;
} else if (Tok.is(tok::identifier)) {
  const IdentifierInfo *II = Tok.getIdentifierInfo();
  if (II->isStr("show")) {
    Action = Sema::PSK_Show;
    PP.Lex(Tok);
  } else {
    if (II->isStr("push")) {
      Action = Sema::PSK_Push;
    } else if (II->isStr("pop")) {
      Action = Sema::PSK_Pop;
    } else {
      PP.Diag(Tok.getLocation(), diag::warn_pragma_invalid_action) << "pack";
      return;
    }
    PP.Lex(Tok);

    if (Tok.is(tok::comma)) {
      PP.Lex(Tok);

      if (Tok.is(tok::numeric_constant)) {
        Action = (Sema::PragmaMsStackAction)(Action | Sema::PSK_Set);
        Alignment = Tok;

        PP.Lex(Tok);
      } else if (Tok.is(tok::identifier)) {
        SlotLabel = Tok.getIdentifierInfo()->getName();
        PP.Lex(Tok);

        if (Tok.is(tok::comma)) {
          PP.Lex(Tok);

          if (Tok.isNot(tok::numeric_constant)) {
            PP.Diag(Tok.getLocation(), diag::warn_pragma_pack_malformed);
            return;
          }

          Action = (Sema::PragmaMsStackAction)(Action | Sema::PSK_Set);
          Alignment = Tok;

          PP.Lex(Tok);
        }
      } else {
        PP.Diag(Tok.getLocation(), diag::warn_pragma_pack_malformed);
        return;
      }
    }
  }
} else if (PP.getLangOpts().ApplePragmaPack ||
           PP.getLangOpts().XLPragmaPack) {
  // In MSVC/gcc, #pragma pack() resets the alignment without affecting
  // the push/pop stack.
  // In Apple gcc and IBM XL, #pragma pack() is equivalent to #pragma
  // pack(pop).
  Action = Sema::PSK_Pop;
}

if (Tok.isNot(tok::r_paren)) {
  PP.Diag(Tok.getLocation(), diag::warn_pragma_expected_rparen) << "pack";
  return;
}

SourceLocation RParenLoc = Tok.getLocation();
PP.Lex(Tok);
if (Tok.isNot(tok::eod)) {
  PP.Diag(Tok.getLocation(), diag::warn_pragma_extra_tokens_at_eol) << "pack";
  return;
}

PragmaPackInfo *Info =
    PP.getPreprocessorAllocator().Allocate<PragmaPackInfo>(1);
Info->Action = Action;
Info->SlotLabel = SlotLabel;
Info->Alignment = Alignment;

MutableArrayRef<Token> Toks(PP.getPreprocessorAllocator().Allocate<Token>(1),
                            1);
Toks[0].startToken();
Toks[0].setKind(tok::annot_pragma_pack);
Toks[0].setLocation(PackLoc);
Toks[0].setAnnotationEndLoc(RParenLoc);
Toks[0].setAnnotationValue(static_cast<void*>(Info));
PP.EnterTokenStream(Toks, /*DisableMacroExpansion=*/true,
                    /*IsReinject=*/false);
1902}

1904// #pragma ms_struct on
1905// #pragma ms_struct off
1906void PragmaMSStructHandler::HandlePragma(Preprocessor &PP,
                                       PragmaIntroducer Introducer,
                                       Token &MSStructTok) {
PragmaMSStructKind Kind = PMSST_OFF;

Token Tok;
PP.Lex(Tok);
if (Tok.isNot(tok::identifier)) {
  PP.Diag(Tok.getLocation(), diag::warn_pragma_ms_struct);
  return;
}
SourceLocation EndLoc = Tok.getLocation();
const IdentifierInfo *II = Tok.getIdentifierInfo();
if (II->isStr("on")) {
  Kind = PMSST_ON;
  PP.Lex(Tok);
}
else if (II->isStr("off") || II->isStr("reset"))
  PP.Lex(Tok);
else {
  PP.Diag(Tok.getLocation(), diag::warn_pragma_ms_struct);
  return;
}

if (Tok.isNot(tok::eod)) {
  PP.Diag(Tok.getLocation(), diag::warn_pragma_extra_tokens_at_eol)
    << "ms_struct";
  return;
}

MutableArrayRef<Token> Toks(PP.getPreprocessorAllocator().Allocate<Token>(1),
                            1);
Toks[0].startToken();
Toks[0].setKind(tok::annot_pragma_msstruct);
Toks[0].setLocation(MSStructTok.getLocation());
Toks[0].setAnnotationEndLoc(EndLoc);
Toks[0].setAnnotationValue(reinterpret_cast<void*>(
                           static_cast<uintptr_t>(Kind)));
PP.EnterTokenStream(Toks, /*DisableMacroExpansion=*/true,
                    /*IsReinject=*/false);
1946}

1948// #pragma clang section bss="abc" data="" rodata="def" text="" relro=""
1949void PragmaClangSectionHandler::HandlePragma(Preprocessor &PP,
                                           PragmaIntroducer Introducer,
                                           Token &FirstToken) {

Token Tok;
auto SecKind = Sema::PragmaClangSectionKind::PCSK_Invalid;

PP.Lex(Tok); // eat 'section'
while (Tok.isNot(tok::eod)) {
  if (Tok.isNot(tok::identifier)) {
    PP.Diag(Tok.getLocation(), diag::err_pragma_expected_clang_section_name) << "clang section";
    return;
  }

  const IdentifierInfo *SecType = Tok.getIdentifierInfo();
  if (SecType->isStr("bss"))
    SecKind = Sema::PragmaClangSectionKind::PCSK_BSS;
  else if (SecType->isStr("data"))
    SecKind = Sema::PragmaClangSectionKind::PCSK_Data;
  else if (SecType->isStr("rodata"))
    SecKind = Sema::PragmaClangSectionKind::PCSK_Rodata;
  else if (SecType->isStr("relro"))
    SecKind = Sema::PragmaClangSectionKind::PCSK_Relro;
  else if (SecType->isStr("text"))
    SecKind = Sema::PragmaClangSectionKind::PCSK_Text;
  else {
    PP.Diag(Tok.getLocation(), diag::err_pragma_expected_clang_section_name) << "clang section";
    return;
  }

  SourceLocation PragmaLocation = Tok.getLocation();
  PP.Lex(Tok); // eat ['bss'|'data'|'rodata'|'text']
  if (Tok.isNot(tok::equal)) {
    PP.Diag(Tok.getLocation(), diag::err_pragma_clang_section_expected_equal) << SecKind;
    return;
  }

  std::string SecName;
  if (!PP.LexStringLiteral(Tok, SecName, "pragma clang section", false))
    return;

  Actions.ActOnPragmaClangSection(
      PragmaLocation,
      (SecName.size() ? Sema::PragmaClangSectionAction::PCSA_Set
                      : Sema::PragmaClangSectionAction::PCSA_Clear),
      SecKind, SecName);
}
1996}

1998// #pragma 'align' '=' {'native','natural','mac68k','power','reset'}
1999// #pragma 'options 'align' '=' {'native','natural','mac68k','power','reset'}
2000// #pragma 'align' '(' {'native','natural','mac68k','power','reset'} ')'
2001static void ParseAlignPragma(Preprocessor &PP, Token &FirstTok,
                           bool IsOptions) {
Token Tok;

if (IsOptions) {
  PP.Lex(Tok);
  if (Tok.isNot(tok::identifier) ||
      !Tok.getIdentifierInfo()->isStr("align")) {
    PP.Diag(Tok.getLocation(), diag::warn_pragma_options_expected_align);
    return;
  }
}

PP.Lex(Tok);
if (PP.getLangOpts().XLPragmaPack) {
  if (Tok.isNot(tok::l_paren)) {
    PP.Diag(Tok.getLocation(), diag::warn_pragma_expected_lparen) << "align";
    return;
  }
} else if (Tok.isNot(tok::equal)) {
  PP.Diag(Tok.getLocation(), diag::warn_pragma_align_expected_equal)
    << IsOptions;
  return;
}

PP.Lex(Tok);
if (Tok.isNot(tok::identifier)) {
  PP.Diag(Tok.getLocation(), diag::warn_pragma_expected_identifier)
    << (IsOptions ? "options" : "align");
  return;
}

Sema::PragmaOptionsAlignKind Kind = Sema::POAK_Natural;
const IdentifierInfo *II = Tok.getIdentifierInfo();
if (II->isStr("native"))
  Kind = Sema::POAK_Native;
else if (II->isStr("natural"))
  Kind = Sema::POAK_Natural;
else if (II->isStr("packed"))
  Kind = Sema::POAK_Packed;
else if (II->isStr("power"))
  Kind = Sema::POAK_Power;
else if (II->isStr("mac68k"))
  Kind = Sema::POAK_Mac68k;
else if (II->isStr("reset"))
  Kind = Sema::POAK_Reset;
else {
  PP.Diag(Tok.getLocation(), diag::warn_pragma_align_invalid_option)
    << IsOptions;
  return;
}

if (PP.getLangOpts().XLPragmaPack) {
  PP.Lex(Tok);
  if (Tok.isNot(tok::r_paren)) {
    PP.Diag(Tok.getLocation(), diag::warn_pragma_expected_rparen) << "align";
    return;
  }
}

SourceLocation EndLoc = Tok.getLocation();
PP.Lex(Tok);
if (Tok.isNot(tok::eod)) {
  PP.Diag(Tok.getLocation(), diag::warn_pragma_extra_tokens_at_eol)
    << (IsOptions ? "options" : "align");
  return;
}

MutableArrayRef<Token> Toks(PP.getPreprocessorAllocator().Allocate<Token>(1),
                            1);
Toks[0].startToken();
Toks[0].setKind(tok::annot_pragma_align);
Toks[0].setLocation(FirstTok.getLocation());
Toks[0].setAnnotationEndLoc(EndLoc);
Toks[0].setAnnotationValue(reinterpret_cast<void*>(
                           static_cast<uintptr_t>(Kind)));
PP.EnterTokenStream(Toks, /*DisableMacroExpansion=*/true,
                    /*IsReinject=*/false);
2079}

2081void PragmaAlignHandler::HandlePragma(Preprocessor &PP,
                                    PragmaIntroducer Introducer,
                                    Token &AlignTok) {
ParseAlignPragma(PP, AlignTok, /*IsOptions=*/false);
2085}

2087void PragmaOptionsHandler::HandlePragma(Preprocessor &PP,
                                      PragmaIntroducer Introducer,
                                      Token &OptionsTok) {
ParseAlignPragma(PP, OptionsTok, /*IsOptions=*/true);
2091}

2093// #pragma unused(identifier)
2094void PragmaUnusedHandler::HandlePragma(Preprocessor &PP,
                                     PragmaIntroducer Introducer,
                                     Token &UnusedTok) {
// FIXME: Should we be expanding macros here? My guess is no.
SourceLocation UnusedLoc = UnusedTok.getLocation();

// Lex the left '('.
Token Tok;
PP.Lex(Tok);
if (Tok.isNot(tok::l_paren)) {
  PP.Diag(Tok.getLocation(), diag::warn_pragma_expected_lparen) << "unused";
  return;
}

// Lex the declaration reference(s).
SmallVector<Token, 5> Identifiers;
SourceLocation RParenLoc;
bool LexID = true;

while (true) {
  PP.Lex(Tok);

  if (LexID) {
    if (Tok.is(tok::identifier)) {
      Identifiers.push_back(Tok);
      LexID = false;
      continue;
    }

    // Illegal token!
    PP.Diag(Tok.getLocation(), diag::warn_pragma_unused_expected_var);
    return;
  }

  // We are execting a ')' or a ','.
  if (Tok.is(tok::comma)) {
    LexID = true;
    continue;
  }

  if (Tok.is(tok::r_paren)) {
    RParenLoc = Tok.getLocation();
    break;
  }

  // Illegal token!
  PP.Diag(Tok.getLocation(), diag::warn_pragma_expected_punc) << "unused";
  return;
}

PP.Lex(Tok);
if (Tok.isNot(tok::eod)) {
  PP.Diag(Tok.getLocation(), diag::warn_pragma_extra_tokens_at_eol) <<
      "unused";
  return;
}

// Verify that we have a location for the right parenthesis.
assert(RParenLoc.isValid() && "Valid '#pragma unused' must have ')'")((void)0);
assert(!Identifiers.empty() && "Valid '#pragma unused' must have arguments")((void)0);

// For each identifier token, insert into the token stream a
// annot_pragma_unused token followed by the identifier token.
// This allows us to cache a "#pragma unused" that occurs inside an inline
// C++ member function.

MutableArrayRef<Token> Toks(
    PP.getPreprocessorAllocator().Allocate<Token>(2 * Identifiers.size()),
    2 * Identifiers.size());
for (unsigned i=0; i != Identifiers.size(); i++) {
  Token &pragmaUnusedTok = Toks[2*i], &idTok = Toks[2*i+1];
  pragmaUnusedTok.startToken();
  pragmaUnusedTok.setKind(tok::annot_pragma_unused);
  pragmaUnusedTok.setLocation(UnusedLoc);
  idTok = Identifiers[i];
}
PP.EnterTokenStream(Toks, /*DisableMacroExpansion=*/true,
                    /*IsReinject=*/false);
2172}

2174// #pragma weak identifier
2175// #pragma weak identifier '=' identifier
2176void PragmaWeakHandler::HandlePragma(Preprocessor &PP,
                                   PragmaIntroducer Introducer,
                                   Token &WeakTok) {
SourceLocation WeakLoc = WeakTok.getLocation();

Token Tok;
PP.Lex(Tok);
if (Tok.isNot(tok::identifier)) {
  PP.Diag(Tok.getLocation(), diag::warn_pragma_expected_identifier) << "weak";
  return;
}

Token WeakName = Tok;
bool HasAlias = false;
Token AliasName;

PP.Lex(Tok);
if (Tok.is(tok::equal)) {
  HasAlias = true;
  PP.Lex(Tok);
  if (Tok.isNot(tok::identifier)) {
    PP.Diag(Tok.getLocation(), diag::warn_pragma_expected_identifier)
        << "weak";
    return;
  }
  AliasName = Tok;
  PP.Lex(Tok);
}

if (Tok.isNot(tok::eod)) {
  PP.Diag(Tok.getLocation(), diag::warn_pragma_extra_tokens_at_eol) << "weak";
  return;
}

if (HasAlias) {
  MutableArrayRef<Token> Toks(
      PP.getPreprocessorAllocator().Allocate<Token>(3), 3);
  Token &pragmaUnusedTok = Toks[0];
  pragmaUnusedTok.startToken();
  pragmaUnusedTok.setKind(tok::annot_pragma_weakalias);
  pragmaUnusedTok.setLocation(WeakLoc);
  pragmaUnusedTok.setAnnotationEndLoc(AliasName.getLocation());
  Toks[1] = WeakName;
  Toks[2] = AliasName;
  PP.EnterTokenStream(Toks, /*DisableMacroExpansion=*/true,
                      /*IsReinject=*/false);
} else {
  MutableArrayRef<Token> Toks(
      PP.getPreprocessorAllocator().Allocate<Token>(2), 2);
  Token &pragmaUnusedTok = Toks[0];
  pragmaUnusedTok.startToken();
  pragmaUnusedTok.setKind(tok::annot_pragma_weak);
  pragmaUnusedTok.setLocation(WeakLoc);
  pragmaUnusedTok.setAnnotationEndLoc(WeakLoc);
  Toks[1] = WeakName;
  PP.EnterTokenStream(Toks, /*DisableMacroExpansion=*/true,
                      /*IsReinject=*/false);
}
2234}

2236// #pragma redefine_extname identifier identifier
2237void PragmaRedefineExtnameHandler::HandlePragma(Preprocessor &PP,
                                              PragmaIntroducer Introducer,
                                              Token &RedefToken) {
SourceLocation RedefLoc = RedefToken.getLocation();

Token Tok;
PP.Lex(Tok);
if (Tok.isNot(tok::identifier)) {
  PP.Diag(Tok.getLocation(), diag::warn_pragma_expected_identifier) <<
    "redefine_extname";
  return;
}

Token RedefName = Tok;
PP.Lex(Tok);

if (Tok.isNot(tok::identifier)) {
  PP.Diag(Tok.getLocation(), diag::warn_pragma_expected_identifier)
      << "redefine_extname";
  return;
}

Token AliasName = Tok;
PP.Lex(Tok);

if (Tok.isNot(tok::eod)) {
  PP.Diag(Tok.getLocation(), diag::warn_pragma_extra_tokens_at_eol) <<
    "redefine_extname";
  return;
}

MutableArrayRef<Token> Toks(PP.getPreprocessorAllocator().Allocate<Token>(3),
                            3);
Token &pragmaRedefTok = Toks[0];
pragmaRedefTok.startToken();
pragmaRedefTok.setKind(tok::annot_pragma_redefine_extname);
pragmaRedefTok.setLocation(RedefLoc);
pragmaRedefTok.setAnnotationEndLoc(AliasName.getLocation());
Toks[1] = RedefName;
Toks[2] = AliasName;
PP.EnterTokenStream(Toks, /*DisableMacroExpansion=*/true,
                    /*IsReinject=*/false);
2279}

2281void PragmaFPContractHandler::HandlePragma(Preprocessor &PP,
                                         PragmaIntroducer Introducer,
                                         Token &Tok) {
tok::OnOffSwitch OOS;
if (PP.LexOnOffSwitch(OOS))
  return;

MutableArrayRef<Token> Toks(PP.getPreprocessorAllocator().Allocate<Token>(1),
                            1);
Toks[0].startToken();
Toks[0].setKind(tok::annot_pragma_fp_contract);
Toks[0].setLocation(Tok.getLocation());
Toks[0].setAnnotationEndLoc(Tok.getLocation());
Toks[0].setAnnotationValue(reinterpret_cast<void*>(
                           static_cast<uintptr_t>(OOS)));
PP.EnterTokenStream(Toks, /*DisableMacroExpansion=*/true,
                    /*IsReinject=*/false);
2298}

2300void PragmaOpenCLExtensionHandler::HandlePragma(Preprocessor &PP,
                                              PragmaIntroducer Introducer,
                                              Token &Tok) {
PP.LexUnexpandedToken(Tok);
if (Tok.isNot(tok::identifier)) {
  PP.Diag(Tok.getLocation(), diag::warn_pragma_expected_identifier) <<
    "OPENCL";
  return;
}
IdentifierInfo *Ext = Tok.getIdentifierInfo();
SourceLocation NameLoc = Tok.getLocation();

PP.Lex(Tok);
if (Tok.isNot(tok::colon)) {
  PP.Diag(Tok.getLocation(), diag::warn_pragma_expected_colon) << Ext;
  return;
}

PP.Lex(Tok);
if (Tok.isNot(tok::identifier)) {
  PP.Diag(Tok.getLocation(), diag::warn_pragma_expected_predicate) << 0;
  return;
}
IdentifierInfo *Pred = Tok.getIdentifierInfo();

OpenCLExtState State;
if (Pred->isStr("enable")) {
  State = Enable;
} else if (Pred->isStr("disable")) {
  State = Disable;
} else if (Pred->isStr("begin"))
  State = Begin;
else if (Pred->isStr("end"))
  State = End;
else {
  PP.Diag(Tok.getLocation(), diag::warn_pragma_expected_predicate)
    << Ext->isStr("all");
  return;
}
SourceLocation StateLoc = Tok.getLocation();

PP.Lex(Tok);
if (Tok.isNot(tok::eod)) {
  PP.Diag(Tok.getLocation(), diag::warn_pragma_extra_tokens_at_eol) <<
    "OPENCL EXTENSION";
  return;
}

auto Info = PP.getPreprocessorAllocator().Allocate<OpenCLExtData>(1);
Info->first = Ext;
Info->second = State;
MutableArrayRef<Token> Toks(PP.getPreprocessorAllocator().Allocate<Token>(1),
                            1);
Toks[0].startToken();
Toks[0].setKind(tok::annot_pragma_opencl_extension);
Toks[0].setLocation(NameLoc);
Toks[0].setAnnotationValue(static_cast<void*>(Info));
Toks[0].setAnnotationEndLoc(StateLoc);
PP.EnterTokenStream(Toks, /*DisableMacroExpansion=*/true,
                    /*IsReinject=*/false);

if (PP.getPPCallbacks())
  PP.getPPCallbacks()->PragmaOpenCLExtension(NameLoc, Ext,
                                             StateLoc, State);
2364}

2366/// Handle '#pragma omp ...' when OpenMP is disabled.
2367///
2368void PragmaNoOpenMPHandler::HandlePragma(Preprocessor &PP,
                                       PragmaIntroducer Introducer,
                                       Token &FirstTok) {
if (!PP.getDiagnostics().isIgnored(diag::warn_pragma_omp_ignored,
                                   FirstTok.getLocation())) {
  PP.Diag(FirstTok, diag::warn_pragma_omp_ignored);
  PP.getDiagnostics().setSeverity(diag::warn_pragma_omp_ignored,
                                  diag::Severity::Ignored, SourceLocation());
}
PP.DiscardUntilEndOfDirective();
2378}

2380/// Handle '#pragma omp ...' when OpenMP is enabled.
2381///
2382void PragmaOpenMPHandler::HandlePragma(Preprocessor &PP,
                                     PragmaIntroducer Introducer,
                                     Token &FirstTok) {
SmallVector<Token, 16> Pragma;
Token Tok;
Tok.startToken();
Tok.setKind(tok::annot_pragma_openmp);
Tok.setLocation(Introducer.Loc);

while (Tok.isNot(tok::eod) && Tok.isNot(tok::eof)) {
  Pragma.push_back(Tok);
  PP.Lex(Tok);
  if (Tok.is(tok::annot_pragma_openmp)) {
    PP.Diag(Tok, diag::err_omp_unexpected_directive) << 0;
    unsigned InnerPragmaCnt = 1;
    while (InnerPragmaCnt != 0) {
      PP.Lex(Tok);
      if (Tok.is(tok::annot_pragma_openmp))
        ++InnerPragmaCnt;
      else if (Tok.is(tok::annot_pragma_openmp_end))
        --InnerPragmaCnt;
    }
    PP.Lex(Tok);
  }
}
SourceLocation EodLoc = Tok.getLocation();
Tok.startToken();
Tok.setKind(tok::annot_pragma_openmp_end);
Tok.setLocation(EodLoc);
Pragma.push_back(Tok);

auto Toks = std::make_unique<Token[]>(Pragma.size());
std::copy(Pragma.begin(), Pragma.end(), Toks.get());
PP.EnterTokenStream(std::move(Toks), Pragma.size(),
                    /*DisableMacroExpansion=*/false, /*IsReinject=*/false);
2417}

2419/// Handle '#pragma pointers_to_members'
2420// The grammar for this pragma is as follows:
2421//
2422// <inheritance model> ::= ('single' | 'multiple' | 'virtual') '_inheritance'
2423//
2424// #pragma pointers_to_members '(' 'best_case' ')'
2425// #pragma pointers_to_members '(' 'full_generality' [',' inheritance-model] ')'
2426// #pragma pointers_to_members '(' inheritance-model ')'
2427void PragmaMSPointersToMembers::HandlePragma(Preprocessor &PP,
                                           PragmaIntroducer Introducer,
                                           Token &Tok) {
SourceLocation PointersToMembersLoc = Tok.getLocation();
PP.Lex(Tok);
if (Tok.isNot(tok::l_paren)) {
  PP.Diag(PointersToMembersLoc, diag::warn_pragma_expected_lparen)
    << "pointers_to_members";
  return;
}
PP.Lex(Tok);
const IdentifierInfo *Arg = Tok.getIdentifierInfo();
if (!Arg) {
  PP.Diag(Tok.getLocation(), diag::warn_pragma_expected_identifier)
    << "pointers_to_members";
  return;
}
PP.Lex(Tok);

LangOptions::PragmaMSPointersToMembersKind RepresentationMethod;
if (Arg->isStr("best_case")) {
  RepresentationMethod = LangOptions::PPTMK_BestCase;
} else {
  if (Arg->isStr("full_generality")) {
    if (Tok.is(tok::comma)) {
      PP.Lex(Tok);

      Arg = Tok.getIdentifierInfo();
      if (!Arg) {
        PP.Diag(Tok.getLocation(),
                diag::err_pragma_pointers_to_members_unknown_kind)
            << Tok.getKind() << /*OnlyInheritanceModels*/ 0;
        return;
      }
      PP.Lex(Tok);
    } else if (Tok.is(tok::r_paren)) {
      // #pragma pointers_to_members(full_generality) implicitly specifies
      // virtual_inheritance.
      Arg = nullptr;
      RepresentationMethod = LangOptions::PPTMK_FullGeneralityVirtualInheritance;
    } else {
      PP.Diag(Tok.getLocation(), diag::err_expected_punc)
          << "full_generality";
      return;
    }
  }

  if (Arg) {
    if (Arg->isStr("single_inheritance")) {
      RepresentationMethod =
          LangOptions::PPTMK_FullGeneralitySingleInheritance;
    } else if (Arg->isStr("multiple_inheritance")) {
      RepresentationMethod =
          LangOptions::PPTMK_FullGeneralityMultipleInheritance;
    } else if (Arg->isStr("virtual_inheritance")) {
      RepresentationMethod =
          LangOptions::PPTMK_FullGeneralityVirtualInheritance;
    } else {
      PP.Diag(Tok.getLocation(),
              diag::err_pragma_pointers_to_members_unknown_kind)
          << Arg << /*HasPointerDeclaration*/ 1;
      return;
    }
  }
}

if (Tok.isNot(tok::r_paren)) {
  PP.Diag(Tok.getLocation(), diag::err_expected_rparen_after)
      << (Arg ? Arg->getName() : "full_generality");
  return;
}

SourceLocation EndLoc = Tok.getLocation();
PP.Lex(Tok);
if (Tok.isNot(tok::eod)) {
  PP.Diag(Tok.getLocation(), diag::warn_pragma_extra_tokens_at_eol)
    << "pointers_to_members";
  return;
}

Token AnnotTok;
AnnotTok.startToken();
AnnotTok.setKind(tok::annot_pragma_ms_pointers_to_members);
AnnotTok.setLocation(PointersToMembersLoc);
AnnotTok.setAnnotationEndLoc(EndLoc);
AnnotTok.setAnnotationValue(
    reinterpret_cast<void *>(static_cast<uintptr_t>(RepresentationMethod)));
PP.EnterToken(AnnotTok, /*IsReinject=*/true);
2515}

2517/// Handle '#pragma vtordisp'
2518// The grammar for this pragma is as follows:
2519//
2520// <vtordisp-mode> ::= ('off' | 'on' | '0' | '1' | '2' )
2521//
2522// #pragma vtordisp '(' ['push' ','] vtordisp-mode ')'
2523// #pragma vtordisp '(' 'pop' ')'
2524// #pragma vtordisp '(' ')'
2525void PragmaMSVtorDisp::HandlePragma(Preprocessor &PP,
                                  PragmaIntroducer Introducer, Token &Tok) {
SourceLocation VtorDispLoc = Tok.getLocation();
PP.Lex(Tok);
if (Tok.isNot(tok::l_paren)) {
  PP.Diag(VtorDispLoc, diag::warn_pragma_expected_lparen) << "vtordisp";
  return;
}
PP.Lex(Tok);

Sema::PragmaMsStackAction Action = Sema::PSK_Set;
const IdentifierInfo *II = Tok.getIdentifierInfo();
if (II) {
  if (II->isStr("push")) {
    // #pragma vtordisp(push, mode)
    PP.Lex(Tok);
    if (Tok.isNot(tok::comma)) {
      PP.Diag(VtorDispLoc, diag::warn_pragma_expected_punc) << "vtordisp";
      return;
    }
    PP.Lex(Tok);
    Action = Sema::PSK_Push_Set;
    // not push, could be on/off
  } else if (II->isStr("pop")) {
    // #pragma vtordisp(pop)
    PP.Lex(Tok);
    Action = Sema::PSK_Pop;
  }
  // not push or pop, could be on/off
} else {
  if (Tok.is(tok::r_paren)) {
    // #pragma vtordisp()
    Action = Sema::PSK_Reset;
  }
}


uint64_t Value = 0;
if (Action & Sema::PSK_Push || Action & Sema::PSK_Set) {
  const IdentifierInfo *II = Tok.getIdentifierInfo();
  if (II && II->isStr("off")) {
    PP.Lex(Tok);
    Value = 0;
  } else if (II && II->isStr("on")) {
    PP.Lex(Tok);
    Value = 1;
  } else if (Tok.is(tok::numeric_constant) &&
             PP.parseSimpleIntegerLiteral(Tok, Value)) {
    if (Value > 2) {
      PP.Diag(Tok.getLocation(), diag::warn_pragma_expected_integer)
          << 0 << 2 << "vtordisp";
      return;
    }
  } else {
    PP.Diag(Tok.getLocation(), diag::warn_pragma_invalid_action)
        << "vtordisp";
    return;
  }
}

// Finish the pragma: ')' $
if (Tok.isNot(tok::r_paren)) {
  PP.Diag(VtorDispLoc, diag::warn_pragma_expected_rparen) << "vtordisp";
  return;
}
SourceLocation EndLoc = Tok.getLocation();
PP.Lex(Tok);
if (Tok.isNot(tok::eod)) {
  PP.Diag(Tok.getLocation(), diag::warn_pragma_extra_tokens_at_eol)
      << "vtordisp";
  return;
}

// Enter the annotation.
Token AnnotTok;
AnnotTok.startToken();
AnnotTok.setKind(tok::annot_pragma_ms_vtordisp);
AnnotTok.setLocation(VtorDispLoc);
AnnotTok.setAnnotationEndLoc(EndLoc);
AnnotTok.setAnnotationValue(reinterpret_cast<void *>(
    static_cast<uintptr_t>((Action << 16) | (Value & 0xFFFF))));
PP.EnterToken(AnnotTok, /*IsReinject=*/false);
2607}

2609/// Handle all MS pragmas.  Simply forwards the tokens after inserting
2610/// an annotation token.
2611void PragmaMSPragma::HandlePragma(Preprocessor &PP,
                                PragmaIntroducer Introducer, Token &Tok) {
Token EoF, AnnotTok;
EoF.startToken();
EoF.setKind(tok::eof);
AnnotTok.startToken();
AnnotTok.setKind(tok::annot_pragma_ms_pragma);
AnnotTok.setLocation(Tok.getLocation());
AnnotTok.setAnnotationEndLoc(Tok.getLocation());
SmallVector<Token, 8> TokenVector;
// Suck up all of the tokens before the eod.
for (; Tok.isNot(tok::eod); PP.Lex(Tok)) {
  TokenVector.push_back(Tok);
  AnnotTok.setAnnotationEndLoc(Tok.getLocation());
}
// Add a sentinel EoF token to the end of the list.
TokenVector.push_back(EoF);
// We must allocate this array with new because EnterTokenStream is going to
// delete it later.
markAsReinjectedForRelexing(TokenVector);
auto TokenArray = std::make_unique<Token[]>(TokenVector.size());
std::copy(TokenVector.begin(), TokenVector.end(), TokenArray.get());
auto Value = new (PP.getPreprocessorAllocator())
    std::pair<std::unique_ptr<Token[]>, size_t>(std::move(TokenArray),
                                                TokenVector.size());
AnnotTok.setAnnotationValue(Value);
PP.EnterToken(AnnotTok, /*IsReinject*/ false);
2638}

2640/// Handle the \#pragma float_control extension.
2641///
2642/// The syntax is:
2643/// \code
2644///   #pragma float_control(keyword[, setting] [,push])
2645/// \endcode
2646/// Where 'keyword' and 'setting' are identifiers.
2647// 'keyword' can be: precise, except, push, pop
2648// 'setting' can be: on, off
2649/// The optional arguments 'setting' and 'push' are supported only
2650/// when the keyword is 'precise' or 'except'.
2651void PragmaFloatControlHandler::HandlePragma(Preprocessor &PP,
                                           PragmaIntroducer Introducer,
                                           Token &Tok) {
Sema::PragmaMsStackAction Action = Sema::PSK_Set;
SourceLocation FloatControlLoc = Tok.getLocation();
Token PragmaName = Tok;
if (!PP.getTargetInfo().hasStrictFP() && !PP.getLangOpts().ExpStrictFP) {
  PP.Diag(Tok.getLocation(), diag::warn_pragma_fp_ignored)
      << PragmaName.getIdentifierInfo()->getName();
  return;
}
PP.Lex(Tok);
if (Tok.isNot(tok::l_paren)) {
  PP.Diag(FloatControlLoc, diag::err_expected) << tok::l_paren;
  return;
}

// Read the identifier.
PP.Lex(Tok);
if (Tok.isNot(tok::identifier)) {
  PP.Diag(Tok.getLocation(), diag::err_pragma_float_control_malformed);
  return;
}

// Verify that this is one of the float control options.
IdentifierInfo *II = Tok.getIdentifierInfo();
PragmaFloatControlKind Kind =
    llvm::StringSwitch<PragmaFloatControlKind>(II->getName())
        .Case("precise", PFC_Precise)
        .Case("except", PFC_Except)
        .Case("push", PFC_Push)
        .Case("pop", PFC_Pop)
        .Default(PFC_Unknown);
PP.Lex(Tok); // the identifier
if (Kind == PFC_Unknown) {
  PP.Diag(Tok.getLocation(), diag::err_pragma_float_control_malformed);
  return;
} else if (Kind == PFC_Push || Kind == PFC_Pop) {
  if (Tok.isNot(tok::r_paren)) {
    PP.Diag(Tok.getLocation(), diag::err_pragma_float_control_malformed);
    return;
  }
  PP.Lex(Tok); // Eat the r_paren
  Action = (Kind == PFC_Pop) ? Sema::PSK_Pop : Sema::PSK_Push;
} else {
  if (Tok.is(tok::r_paren))
    // Selecting Precise or Except
    PP.Lex(Tok); // the r_paren
  else if (Tok.isNot(tok::comma)) {
    PP.Diag(Tok.getLocation(), diag::err_pragma_float_control_malformed);
    return;
  } else {
    PP.Lex(Tok); // ,
    if (!Tok.isAnyIdentifier()) {
      PP.Diag(Tok.getLocation(), diag::err_pragma_float_control_malformed);
      return;
    }
    StringRef PushOnOff = Tok.getIdentifierInfo()->getName();
    if (PushOnOff == "on")
      // Kind is set correctly
      ;
    else if (PushOnOff == "off") {
      if (Kind == PFC_Precise)
        Kind = PFC_NoPrecise;
      if (Kind == PFC_Except)
        Kind = PFC_NoExcept;
    } else if (PushOnOff == "push") {
      Action = Sema::PSK_Push_Set;
    } else {
      PP.Diag(Tok.getLocation(), diag::err_pragma_float_control_malformed);
      return;
    }
    PP.Lex(Tok); // the identifier
    if (Tok.is(tok::comma)) {
      PP.Lex(Tok); // ,
      if (!Tok.isAnyIdentifier()) {
        PP.Diag(Tok.getLocation(), diag::err_pragma_float_control_malformed);
        return;
      }
      StringRef ExpectedPush = Tok.getIdentifierInfo()->getName();
      if (ExpectedPush == "push") {
        Action = Sema::PSK_Push_Set;
      } else {
        PP.Diag(Tok.getLocation(), diag::err_pragma_float_control_malformed);
        return;
      }
      PP.Lex(Tok); // the push identifier
    }
    if (Tok.isNot(tok::r_paren)) {
      PP.Diag(Tok.getLocation(), diag::err_pragma_float_control_malformed);
      return;
    }
    PP.Lex(Tok); // the r_paren
  }
}
SourceLocation EndLoc = Tok.getLocation();
if (Tok.isNot(tok::eod)) {
  PP.Diag(Tok.getLocation(), diag::warn_pragma_extra_tokens_at_eol)
      << "float_control";
  return;
}

// Note: there is no accomodation for PP callback for this pragma.

// Enter the annotation.
auto TokenArray = std::make_unique<Token[]>(1);
TokenArray[0].startToken();
TokenArray[0].setKind(tok::annot_pragma_float_control);
TokenArray[0].setLocation(FloatControlLoc);
TokenArray[0].setAnnotationEndLoc(EndLoc);
// Create an encoding of Action and Value by shifting the Action into
// the high 16 bits then union with the Kind.
TokenArray[0].setAnnotationValue(reinterpret_cast<void *>(
    static_cast<uintptr_t>((Action << 16) | (Kind & 0xFFFF))));
PP.EnterTokenStream(std::move(TokenArray), 1,
                    /*DisableMacroExpansion=*/false, /*IsReinject=*/false);
2767}

2769/// Handle the Microsoft \#pragma detect_mismatch extension.
2770///
2771/// The syntax is:
2772/// \code
2773///   #pragma detect_mismatch("name", "value")
2774/// \endcode
2775/// Where 'name' and 'value' are quoted strings.  The values are embedded in
2776/// the object file and passed along to the linker.  If the linker detects a
2777/// mismatch in the object file's values for the given name, a LNK2038 error
2778/// is emitted.  See MSDN for more details.
2779void PragmaDetectMismatchHandler::HandlePragma(Preprocessor &PP,
                                             PragmaIntroducer Introducer,
                                             Token &Tok) {
SourceLocation DetectMismatchLoc = Tok.getLocation();
PP.Lex(Tok);
if (Tok.isNot(tok::l_paren)) {
  PP.Diag(DetectMismatchLoc, diag::err_expected) << tok::l_paren;
  return;
}

// Read the name to embed, which must be a string literal.
std::string NameString;
if (!PP.LexStringLiteral(Tok, NameString,
                         "pragma detect_mismatch",
                         /*AllowMacroExpansion=*/true))
  return;

// Read the comma followed by a second string literal.
std::string ValueString;
if (Tok.isNot(tok::comma)) {
  PP.Diag(Tok.getLocation(), diag::err_pragma_detect_mismatch_malformed);
  return;
}

if (!PP.LexStringLiteral(Tok, ValueString, "pragma detect_mismatch",
                         /*AllowMacroExpansion=*/true))
  return;

if (Tok.isNot(tok::r_paren)) {
  PP.Diag(Tok.getLocation(), diag::err_expected) << tok::r_paren;
  return;
}
PP.Lex(Tok);  // Eat the r_paren.

if (Tok.isNot(tok::eod)) {
  PP.Diag(Tok.getLocation(), diag::err_pragma_detect_mismatch_malformed);
  return;
}

// If the pragma is lexically sound, notify any interested PPCallbacks.
if (PP.getPPCallbacks())
  PP.getPPCallbacks()->PragmaDetectMismatch(DetectMismatchLoc, NameString,
                                            ValueString);

Actions.ActOnPragmaDetectMismatch(DetectMismatchLoc, NameString, ValueString);
2824}

2826/// Handle the microsoft \#pragma comment extension.
2827///
2828/// The syntax is:
2829/// \code
2830///   #pragma comment(linker, "foo")
2831/// \endcode
2832/// 'linker' is one of five identifiers: compiler, exestr, lib, linker, user.
2833/// "foo" is a string, which is fully macro expanded, and permits string
2834/// concatenation, embedded escape characters etc.  See MSDN for more details.
2835void PragmaCommentHandler::HandlePragma(Preprocessor &PP,
                                      PragmaIntroducer Introducer,
                                      Token &Tok) {
SourceLocation CommentLoc = Tok.getLocation();
PP.Lex(Tok);
if (Tok.isNot(tok::l_paren)) {
  PP.Diag(CommentLoc, diag::err_pragma_comment_malformed);
  return;
}

// Read the identifier.
PP.Lex(Tok);
if (Tok.isNot(tok::identifier)) {
  PP.Diag(CommentLoc, diag::err_pragma_comment_malformed);
  return;
}

// Verify that this is one of the 5 explicitly listed options.
IdentifierInfo *II = Tok.getIdentifierInfo();
PragmaMSCommentKind Kind =
  llvm::StringSwitch<PragmaMSCommentKind>(II->getName())
  .Case("linker",   PCK_Linker)
  .Case("lib",      PCK_Lib)
  .Case("compiler", PCK_Compiler)
  .Case("exestr",   PCK_ExeStr)
  .Case("user",     PCK_User)
  .Default(PCK_Unknown);
if (Kind == PCK_Unknown) {
  PP.Diag(Tok.getLocation(), diag::err_pragma_comment_unknown_kind);
  return;
}

if (PP.getTargetInfo().getTriple().isOSBinFormatELF() && Kind != PCK_Lib) {
  PP.Diag(Tok.getLocation(), diag::warn_pragma_comment_ignored)
      << II->getName();
  return;
}

// On PS4, issue a warning about any pragma comments other than
// #pragma comment lib.
if (PP.getTargetInfo().getTriple().isPS4() && Kind != PCK_Lib) {
  PP.Diag(Tok.getLocation(), diag::warn_pragma_comment_ignored)
    << II->getName();
  return;
}

// Read the optional string if present.
PP.Lex(Tok);
std::string ArgumentString;
if (Tok.is(tok::comma) && !PP.LexStringLiteral(Tok, ArgumentString,
                                               "pragma comment",
                                               /*AllowMacroExpansion=*/true))
  return;

// FIXME: warn that 'exestr' is deprecated.
// FIXME: If the kind is "compiler" warn if the string is present (it is
// ignored).
// The MSDN docs say that "lib" and "linker" require a string and have a short
// list of linker options they support, but in practice MSVC doesn't
// issue a diagnostic.  Therefore neither does clang.

if (Tok.isNot(tok::r_paren)) {
  PP.Diag(Tok.getLocation(), diag::err_pragma_comment_malformed);
  return;
}
PP.Lex(Tok);  // eat the r_paren.

if (Tok.isNot(tok::eod)) {
  PP.Diag(Tok.getLocation(), diag::err_pragma_comment_malformed);
  return;
}

// If the pragma is lexically sound, notify any interested PPCallbacks.
if (PP.getPPCallbacks())
  PP.getPPCallbacks()->PragmaComment(CommentLoc, II, ArgumentString);

Actions.ActOnPragmaMSComment(CommentLoc, Kind, ArgumentString);
2912}

2914// #pragma clang optimize off
2915// #pragma clang optimize on
2916void PragmaOptimizeHandler::HandlePragma(Preprocessor &PP,
                                       PragmaIntroducer Introducer,
                                       Token &FirstToken) {
Token Tok;
PP.Lex(Tok);
if (Tok.is(tok::eod)) {
  PP.Diag(Tok.getLocation(), diag::err_pragma_missing_argument)
      << "clang optimize" << /*Expected=*/true << "'on' or 'off'";
  return;
}
if (Tok.isNot(tok::identifier)) {
  PP.Diag(Tok.getLocation(), diag::err_pragma_optimize_invalid_argument)
    << PP.getSpelling(Tok);
  return;
}
const IdentifierInfo *II = Tok.getIdentifierInfo();
// The only accepted values are 'on' or 'off'.
bool IsOn = false;
if (II->isStr("on")) {
  IsOn = true;
} else if (!II->isStr("off")) {
  PP.Diag(Tok.getLocation(), diag::err_pragma_optimize_invalid_argument)
    << PP.getSpelling(Tok);
  return;
}
PP.Lex(Tok);

if (Tok.isNot(tok::eod)) {
  PP.Diag(Tok.getLocation(), diag::err_pragma_optimize_extra_argument)
    << PP.getSpelling(Tok);
  return;
}

Actions.ActOnPragmaOptimize(IsOn, FirstToken.getLocation());
2950}

2952namespace {
2953/// Used as the annotation value for tok::annot_pragma_fp.
2954struct TokFPAnnotValue {
enum FlagKinds { Contract, Reassociate, Exceptions };
enum FlagValues { On, Off, Fast };

llvm::Optional<LangOptions::FPModeKind> ContractValue;
llvm::Optional<LangOptions::FPModeKind> ReassociateValue;
llvm::Optional<LangOptions::FPExceptionModeKind> ExceptionsValue;
2961};
2962} // end anonymous namespace

2964void PragmaFPHandler::HandlePragma(Preprocessor &PP,
                                 PragmaIntroducer Introducer, Token &Tok) {
// fp
Token PragmaName = Tok;
SmallVector<Token, 1> TokenList;

PP.Lex(Tok);
if (Tok.isNot(tok::identifier)) {
  PP.Diag(Tok.getLocation(), diag::err_pragma_fp_invalid_option)
      << /*MissingOption=*/true << "";
  return;
}

auto *AnnotValue = new (PP.getPreprocessorAllocator()) TokFPAnnotValue;
while (Tok.is(tok::identifier)) {
  IdentifierInfo *OptionInfo = Tok.getIdentifierInfo();

  auto FlagKind =
      llvm::StringSwitch<llvm::Optional<TokFPAnnotValue::FlagKinds>>(
          OptionInfo->getName())
          .Case("contract", TokFPAnnotValue::Contract)
          .Case("reassociate", TokFPAnnotValue::Reassociate)
          .Case("exceptions", TokFPAnnotValue::Exceptions)
          .Default(None);
  if (!FlagKind) {
    PP.Diag(Tok.getLocation(), diag::err_pragma_fp_invalid_option)
        << /*MissingOption=*/false << OptionInfo;
    return;
  }
  PP.Lex(Tok);

  // Read '('
  if (Tok.isNot(tok::l_paren)) {
    PP.Diag(Tok.getLocation(), diag::err_expected) << tok::l_paren;
    return;
  }
  PP.Lex(Tok);

  if (Tok.isNot(tok::identifier)) {
    PP.Diag(Tok.getLocation(), diag::err_pragma_fp_invalid_argument)
        << PP.getSpelling(Tok) << OptionInfo->getName()
        << static_cast<int>(*FlagKind);
    return;
  }
  const IdentifierInfo *II = Tok.getIdentifierInfo();

  if (FlagKind == TokFPAnnotValue::Contract) {
    AnnotValue->ContractValue =
        llvm::StringSwitch<llvm::Optional<LangOptions::FPModeKind>>(
            II->getName())
            .Case("on", LangOptions::FPModeKind::FPM_On)
            .Case("off", LangOptions::FPModeKind::FPM_Off)
            .Case("fast", LangOptions::FPModeKind::FPM_Fast)
            .Default(llvm::None);
    if (!AnnotValue->ContractValue) {
      PP.Diag(Tok.getLocation(), diag::err_pragma_fp_invalid_argument)
          << PP.getSpelling(Tok) << OptionInfo->getName() << *FlagKind;
      return;
    }
  } else if (FlagKind == TokFPAnnotValue::Reassociate) {
    AnnotValue->ReassociateValue =
        llvm::StringSwitch<llvm::Optional<LangOptions::FPModeKind>>(
            II->getName())
            .Case("on", LangOptions::FPModeKind::FPM_On)
            .Case("off", LangOptions::FPModeKind::FPM_Off)
            .Default(llvm::None);
    if (!AnnotValue->ReassociateValue) {
      PP.Diag(Tok.getLocation(), diag::err_pragma_fp_invalid_argument)
          << PP.getSpelling(Tok) << OptionInfo->getName() << *FlagKind;
      return;
    }
  } else if (FlagKind == TokFPAnnotValue::Exceptions) {
    AnnotValue->ExceptionsValue =
        llvm::StringSwitch<llvm::Optional<LangOptions::FPExceptionModeKind>>(
            II->getName())
            .Case("ignore", LangOptions::FPE_Ignore)
            .Case("maytrap", LangOptions::FPE_MayTrap)
            .Case("strict", LangOptions::FPE_Strict)
            .Default(llvm::None);
    if (!AnnotValue->ExceptionsValue) {
      PP.Diag(Tok.getLocation(), diag::err_pragma_fp_invalid_argument)
          << PP.getSpelling(Tok) << OptionInfo->getName() << *FlagKind;
      return;
    }
  }
  PP.Lex(Tok);

  // Read ')'
  if (Tok.isNot(tok::r_paren)) {
    PP.Diag(Tok.getLocation(), diag::err_expected) << tok::r_paren;
    return;
  }
  PP.Lex(Tok);
}

if (Tok.isNot(tok::eod)) {
  PP.Diag(Tok.getLocation(), diag::warn_pragma_extra_tokens_at_eol)
      << "clang fp";
  return;
}

Token FPTok;
FPTok.startToken();
FPTok.setKind(tok::annot_pragma_fp);
FPTok.setLocation(PragmaName.getLocation());
FPTok.setAnnotationEndLoc(PragmaName.getLocation());
FPTok.setAnnotationValue(reinterpret_cast<void *>(AnnotValue));
TokenList.push_back(FPTok);

auto TokenArray = std::make_unique<Token[]>(TokenList.size());
std::copy(TokenList.begin(), TokenList.end(), TokenArray.get());

PP.EnterTokenStream(std::move(TokenArray), TokenList.size(),
                    /*DisableMacroExpansion=*/false, /*IsReinject=*/false);
3078}

3080void PragmaSTDC_FENV_ROUNDHandler::HandlePragma(Preprocessor &PP,
                                              PragmaIntroducer Introducer,
                                              Token &Tok) {
Token PragmaName = Tok;
SmallVector<Token, 1> TokenList;
if (!PP.getTargetInfo().hasStrictFP() && !PP.getLangOpts().ExpStrictFP) {
  PP.Diag(Tok.getLocation(), diag::warn_pragma_fp_ignored)
      << PragmaName.getIdentifierInfo()->getName();
  return;
}

PP.Lex(Tok);
if (Tok.isNot(tok::identifier)) {
  PP.Diag(Tok.getLocation(), diag::warn_pragma_expected_identifier)
      << PragmaName.getIdentifierInfo()->getName();
  return;
}
IdentifierInfo *II = Tok.getIdentifierInfo();

auto RM =
    llvm::StringSwitch<llvm::RoundingMode>(II->getName())
        .Case("FE_TOWARDZERO", llvm::RoundingMode::TowardZero)
        .Case("FE_TONEAREST", llvm::RoundingMode::NearestTiesToEven)
        .Case("FE_UPWARD", llvm::RoundingMode::TowardPositive)
        .Case("FE_DOWNWARD", llvm::RoundingMode::TowardNegative)
        .Case("FE_TONEARESTFROMZERO", llvm::RoundingMode::NearestTiesToAway)
        .Case("FE_DYNAMIC", llvm::RoundingMode::Dynamic)
        .Default(llvm::RoundingMode::Invalid);
if (RM == llvm::RoundingMode::Invalid) {
  PP.Diag(Tok.getLocation(), diag::warn_stdc_unknown_rounding_mode);
  return;
}
PP.Lex(Tok);

if (Tok.isNot(tok::eod)) {
  PP.Diag(Tok.getLocation(), diag::warn_pragma_extra_tokens_at_eol)
      << "STDC FENV_ROUND";
  return;
}

// Until the pragma is fully implemented, issue a warning.
PP.Diag(Tok.getLocation(), diag::warn_stdc_fenv_round_not_supported);

MutableArrayRef<Token> Toks(PP.getPreprocessorAllocator().Allocate<Token>(1),
                            1);
Toks[0].startToken();
Toks[0].setKind(tok::annot_pragma_fenv_round);
Toks[0].setLocation(Tok.getLocation());
Toks[0].setAnnotationEndLoc(Tok.getLocation());
Toks[0].setAnnotationValue(
    reinterpret_cast<void *>(static_cast<uintptr_t>(RM)));
PP.EnterTokenStream(Toks, /*DisableMacroExpansion=*/true,
                    /*IsReinject=*/false);
3133}

3135void Parser::HandlePragmaFP() {
assert(Tok.is(tok::annot_pragma_fp))((void)0);
auto *AnnotValue =
    reinterpret_cast<TokFPAnnotValue *>(Tok.getAnnotationValue());

if (AnnotValue->ReassociateValue)
  Actions.ActOnPragmaFPReassociate(Tok.getLocation(),
                                   *AnnotValue->ReassociateValue ==
                                       LangOptions::FPModeKind::FPM_On);
if (AnnotValue->ContractValue)
  Actions.ActOnPragmaFPContract(Tok.getLocation(),
                                *AnnotValue->ContractValue);
if (AnnotValue->ExceptionsValue)
  Actions.ActOnPragmaFPExceptions(Tok.getLocation(),
                                  *AnnotValue->ExceptionsValue);
ConsumeAnnotationToken();
3151}

3153/// Parses loop or unroll pragma hint value and fills in Info.
3154static bool ParseLoopHintValue(Preprocessor &PP, Token &Tok, Token PragmaName,
                             Token Option, bool ValueInParens,
                             PragmaLoopHintInfo &Info) {
SmallVector<Token, 1> ValueList;
int OpenParens = ValueInParens ? 1 : 0;
// Read constant expression.
while (Tok.isNot(tok::eod)) {
  if (Tok.is(tok::l_paren))
    OpenParens++;
  else if (Tok.is(tok::r_paren)) {
    OpenParens--;
    if (OpenParens == 0 && ValueInParens)
      break;
  }

  ValueList.push_back(Tok);
  PP.Lex(Tok);
}

if (ValueInParens) {
  // Read ')'
  if (Tok.isNot(tok::r_paren)) {
    PP.Diag(Tok.getLocation(), diag::err_expected) << tok::r_paren;
    return true;
  }
  PP.Lex(Tok);
}

Token EOFTok;
EOFTok.startToken();
EOFTok.setKind(tok::eof);
EOFTok.setLocation(Tok.getLocation());
ValueList.push_back(EOFTok); // Terminates expression for parsing.

markAsReinjectedForRelexing(ValueList);
Info.Toks = llvm::makeArrayRef(ValueList).copy(PP.getPreprocessorAllocator());

Info.PragmaName = PragmaName;
Info.Option = Option;
return false;
3194}

3196/// Handle the \#pragma clang loop directive.
3197///  #pragma clang 'loop' loop-hints
3198///
3199///  loop-hints:
3200///    loop-hint loop-hints[opt]
3201///
3202///  loop-hint:
3203///    'vectorize' '(' loop-hint-keyword ')'
3204///    'interleave' '(' loop-hint-keyword ')'
3205///    'unroll' '(' unroll-hint-keyword ')'
3206///    'vectorize_predicate' '(' loop-hint-keyword ')'
3207///    'vectorize_width' '(' loop-hint-value ')'
3208///    'interleave_count' '(' loop-hint-value ')'
3209///    'unroll_count' '(' loop-hint-value ')'
3210///    'pipeline' '(' disable ')'
3211///    'pipeline_initiation_interval' '(' loop-hint-value ')'
3212///
3213///  loop-hint-keyword:
3214///    'enable'
3215///    'disable'
3216///    'assume_safety'
3217///
3218///  unroll-hint-keyword:
3219///    'enable'
3220///    'disable'
3221///    'full'
3222///
3223///  loop-hint-value:
3224///    constant-expression
3225///
3226/// Specifying vectorize(enable) or vectorize_width(_value_) instructs llvm to
3227/// try vectorizing the instructions of the loop it precedes. Specifying
3228/// interleave(enable) or interleave_count(_value_) instructs llvm to try
3229/// interleaving multiple iterations of the loop it precedes. The width of the
3230/// vector instructions is specified by vectorize_width() and the number of
3231/// interleaved loop iterations is specified by interleave_count(). Specifying a
3232/// value of 1 effectively disables vectorization/interleaving, even if it is
3233/// possible and profitable, and 0 is invalid. The loop vectorizer currently
3234/// only works on inner loops.
3235///
3236/// The unroll and unroll_count directives control the concatenation
3237/// unroller. Specifying unroll(enable) instructs llvm to unroll the loop
3238/// completely if the trip count is known at compile time and unroll partially
3239/// if the trip count is not known.  Specifying unroll(full) is similar to
3240/// unroll(enable) but will unroll the loop only if the trip count is known at
3241/// compile time.  Specifying unroll(disable) disables unrolling for the
3242/// loop. Specifying unroll_count(_value_) instructs llvm to try to unroll the
3243/// loop the number of times indicated by the value.
3244void PragmaLoopHintHandler::HandlePragma(Preprocessor &PP,
                                       PragmaIntroducer Introducer,
                                       Token &Tok) {
// Incoming token is "loop" from "#pragma clang loop".
Token PragmaName = Tok;
SmallVector<Token, 1> TokenList;

// Lex the optimization option and verify it is an identifier.
PP.Lex(Tok);
if (Tok.isNot(tok::identifier)) {
  PP.Diag(Tok.getLocation(), diag::err_pragma_loop_invalid_option)
      << /*MissingOption=*/true << "";
  return;
}

while (Tok.is(tok::identifier)) {
  Token Option = Tok;
  IdentifierInfo *OptionInfo = Tok.getIdentifierInfo();

  bool OptionValid = llvm::StringSwitch<bool>(OptionInfo->getName())
                         .Case("vectorize", true)
                         .Case("interleave", true)
                         .Case("unroll", true)
                         .Case("distribute", true)
                         .Case("vectorize_predicate", true)
                         .Case("vectorize_width", true)
                         .Case("interleave_count", true)
                         .Case("unroll_count", true)
                         .Case("pipeline", true)
                         .Case("pipeline_initiation_interval", true)
                         .Default(false);
  if (!OptionValid) {
    PP.Diag(Tok.getLocation(), diag::err_pragma_loop_invalid_option)
        << /*MissingOption=*/false << OptionInfo;
    return;
  }
  PP.Lex(Tok);

  // Read '('
  if (Tok.isNot(tok::l_paren)) {
    PP.Diag(Tok.getLocation(), diag::err_expected) << tok::l_paren;
    return;
  }
  PP.Lex(Tok);

  auto *Info = new (PP.getPreprocessorAllocator()) PragmaLoopHintInfo;
  if (ParseLoopHintValue(PP, Tok, PragmaName, Option, /*ValueInParens=*/true,
                         *Info))
    return;

  // Generate the loop hint token.
  Token LoopHintTok;
  LoopHintTok.startToken();
  LoopHintTok.setKind(tok::annot_pragma_loop_hint);
  LoopHintTok.setLocation(Introducer.Loc);
  LoopHintTok.setAnnotationEndLoc(PragmaName.getLocation());
  LoopHintTok.setAnnotationValue(static_cast<void *>(Info));
  TokenList.push_back(LoopHintTok);
}

if (Tok.isNot(tok::eod)) {
  PP.Diag(Tok.getLocation(), diag::warn_pragma_extra_tokens_at_eol)
      << "clang loop";
  return;
}

auto TokenArray = std::make_unique<Token[]>(TokenList.size());
std::copy(TokenList.begin(), TokenList.end(), TokenArray.get());

PP.EnterTokenStream(std::move(TokenArray), TokenList.size(),
                    /*DisableMacroExpansion=*/false, /*IsReinject=*/false);
3315}

3317/// Handle the loop unroll optimization pragmas.
3318///  #pragma unroll
3319///  #pragma unroll unroll-hint-value
3320///  #pragma unroll '(' unroll-hint-value ')'
3321///  #pragma nounroll
3322///  #pragma unroll_and_jam
3323///  #pragma unroll_and_jam unroll-hint-value
3324///  #pragma unroll_and_jam '(' unroll-hint-value ')'
3325///  #pragma nounroll_and_jam
3326///
3327///  unroll-hint-value:
3328///    constant-expression
3329///
3330/// Loop unrolling hints can be specified with '#pragma unroll' or
3331/// '#pragma nounroll'. '#pragma unroll' can take a numeric argument optionally
3332/// contained in parentheses. With no argument the directive instructs llvm to
3333/// try to unroll the loop completely. A positive integer argument can be
3334/// specified to indicate the number of times the loop should be unrolled.  To
3335/// maximize compatibility with other compilers the unroll count argument can be
3336/// specified with or without parentheses.  Specifying, '#pragma nounroll'
3337/// disables unrolling of the loop.
3338void PragmaUnrollHintHandler::HandlePragma(Preprocessor &PP,
                                         PragmaIntroducer Introducer,
                                         Token &Tok) {
// Incoming token is "unroll" for "#pragma unroll", or "nounroll" for
// "#pragma nounroll".
Token PragmaName = Tok;
PP.Lex(Tok);
auto *Info = new (PP.getPreprocessorAllocator()) PragmaLoopHintInfo;
if (Tok.is(tok::eod)) {
  // nounroll or unroll pragma without an argument.
  Info->PragmaName = PragmaName;
  Info->Option.startToken();
} else if (PragmaName.getIdentifierInfo()->getName() == "nounroll" ||
           PragmaName.getIdentifierInfo()->getName() == "nounroll_and_jam") {
  PP.Diag(Tok.getLocation(), diag::warn_pragma_extra_tokens_at_eol)
      << PragmaName.getIdentifierInfo()->getName();
  return;
} else {
  // Unroll pragma with an argument: "#pragma unroll N" or
  // "#pragma unroll(N)".
  // Read '(' if it exists.
  bool ValueInParens = Tok.is(tok::l_paren);
  if (ValueInParens)
    PP.Lex(Tok);

  Token Option;
  Option.startToken();
  if (ParseLoopHintValue(PP, Tok, PragmaName, Option, ValueInParens, *Info))
    return;

  // In CUDA, the argument to '#pragma unroll' should not be contained in
  // parentheses.
  if (PP.getLangOpts().CUDA && ValueInParens)
    PP.Diag(Info->Toks[0].getLocation(),
            diag::warn_pragma_unroll_cuda_value_in_parens);

  if (Tok.isNot(tok::eod)) {
    PP.Diag(Tok.getLocation(), diag::warn_pragma_extra_tokens_at_eol)
        << "unroll";
    return;
  }
}

// Generate the hint token.
auto TokenArray = std::make_unique<Token[]>(1);
TokenArray[0].startToken();
TokenArray[0].setKind(tok::annot_pragma_loop_hint);
TokenArray[0].setLocation(Introducer.Loc);
TokenArray[0].setAnnotationEndLoc(PragmaName.getLocation());
TokenArray[0].setAnnotationValue(static_cast<void *>(Info));
PP.EnterTokenStream(std::move(TokenArray), 1,
                    /*DisableMacroExpansion=*/false, /*IsReinject=*/false);
3390}

3392/// Handle the Microsoft \#pragma intrinsic extension.
3393///
3394/// The syntax is:
3395/// \code
3396///  #pragma intrinsic(memset)
3397///  #pragma intrinsic(strlen, memcpy)
3398/// \endcode
3399///
3400/// Pragma intrisic tells the compiler to use a builtin version of the
3401/// function. Clang does it anyway, so the pragma doesn't really do anything.
3402/// Anyway, we emit a warning if the function specified in \#pragma intrinsic
3403/// isn't an intrinsic in clang and suggest to include intrin.h.
3404void PragmaMSIntrinsicHandler::HandlePragma(Preprocessor &PP,
                                          PragmaIntroducer Introducer,
                                          Token &Tok) {
PP.Lex(Tok);

if (Tok.isNot(tok::l_paren)) {
  PP.Diag(Tok.getLocation(), diag::warn_pragma_expected_lparen)
      << "intrinsic";
  return;
}
PP.Lex(Tok);

bool SuggestIntrinH = !PP.isMacroDefined("__INTRIN_H");

while (Tok.is(tok::identifier)) {
  IdentifierInfo *II = Tok.getIdentifierInfo();
  if (!II->getBuiltinID())
    PP.Diag(Tok.getLocation(), diag::warn_pragma_intrinsic_builtin)
        << II << SuggestIntrinH;

  PP.Lex(Tok);
  if (Tok.isNot(tok::comma))
    break;
  PP.Lex(Tok);
}

if (Tok.isNot(tok::r_paren)) {
  PP.Diag(Tok.getLocation(), diag::warn_pragma_expected_rparen)
      << "intrinsic";
  return;
}
PP.Lex(Tok);

if (Tok.isNot(tok::eod))
  PP.Diag(Tok.getLocation(), diag::warn_pragma_extra_tokens_at_eol)
      << "intrinsic";
3440}

3442// #pragma optimize("gsty", on|off)
3443void PragmaMSOptimizeHandler::HandlePragma(Preprocessor &PP,
                                         PragmaIntroducer Introducer,
                                         Token &Tok) {
SourceLocation StartLoc = Tok.getLocation();
PP.Lex(Tok);

if (Tok.isNot(tok::l_paren)) {
  PP.Diag(Tok.getLocation(), diag::warn_pragma_expected_lparen) << "optimize";
  return;
}
PP.Lex(Tok);

if (Tok.isNot(tok::string_literal)) {
  PP.Diag(Tok.getLocation(), diag::warn_pragma_expected_string) << "optimize";
  return;
}
// We could syntax check the string but it's probably not worth the effort.
PP.Lex(Tok);

if (Tok.isNot(tok::comma)) {
  PP.Diag(Tok.getLocation(), diag::warn_pragma_expected_comma) << "optimize";
  return;
}
PP.Lex(Tok);

if (Tok.is(tok::eod) || Tok.is(tok::r_paren)) {
  PP.Diag(Tok.getLocation(), diag::warn_pragma_missing_argument)
      << "optimize" << /*Expected=*/true << "'on' or 'off'";
  return;
}
IdentifierInfo *II = Tok.getIdentifierInfo();
if (!II || (!II->isStr("on") && !II->isStr("off"))) {
  PP.Diag(Tok.getLocation(), diag::warn_pragma_invalid_argument)
      << PP.getSpelling(Tok) << "optimize" << /*Expected=*/true
      << "'on' or 'off'";
  return;
}
PP.Lex(Tok);

if (Tok.isNot(tok::r_paren)) {
  PP.Diag(Tok.getLocation(), diag::warn_pragma_expected_rparen) << "optimize";
  return;
}
PP.Lex(Tok);

if (Tok.isNot(tok::eod)) {
  PP.Diag(Tok.getLocation(), diag::warn_pragma_extra_tokens_at_eol)
      << "optimize";
  return;
}
PP.Diag(StartLoc, diag::warn_pragma_optimize);
3494}

3496void PragmaForceCUDAHostDeviceHandler::HandlePragma(
  Preprocessor &PP, PragmaIntroducer Introducer, Token &Tok) {
Token FirstTok = Tok;

PP.Lex(Tok);
IdentifierInfo *Info = Tok.getIdentifierInfo();
if (!Info || (!Info->isStr("begin") && !Info->isStr("end"))) {
  PP.Diag(FirstTok.getLocation(),
          diag::warn_pragma_force_cuda_host_device_bad_arg);
  return;
}

if (Info->isStr("begin"))
  Actions.PushForceCUDAHostDevice();
else if (!Actions.PopForceCUDAHostDevice())
  PP.Diag(FirstTok.getLocation(),
          diag::err_pragma_cannot_end_force_cuda_host_device);

PP.Lex(Tok);
if (!Tok.is(tok::eod))
  PP.Diag(FirstTok.getLocation(),
          diag::warn_pragma_force_cuda_host_device_bad_arg);
3518}

3520/// Handle the #pragma clang attribute directive.
3521///
3522/// The syntax is:
3523/// \code
3524///  #pragma clang attribute push (attribute, subject-set)
3525///  #pragma clang attribute push
3526///  #pragma clang attribute (attribute, subject-set)
3527///  #pragma clang attribute pop
3528/// \endcode
3529///
3530/// There are also 'namespace' variants of push and pop directives. The bare
3531/// '#pragma clang attribute (attribute, subject-set)' version doesn't require a
3532/// namespace, since it always applies attributes to the most recently pushed
3533/// group, regardless of namespace.
3534/// \code
3535///  #pragma clang attribute namespace.push (attribute, subject-set)
3536///  #pragma clang attribute namespace.push
3537///  #pragma clang attribute namespace.pop
3538/// \endcode
3539///
3540/// The subject-set clause defines the set of declarations which receive the
3541/// attribute. Its exact syntax is described in the LanguageExtensions document
3542/// in Clang's documentation.
3543///
3544/// This directive instructs the compiler to begin/finish applying the specified
3545/// attribute to the set of attribute-specific declarations in the active range
3546/// of the pragma.
3547void PragmaAttributeHandler::HandlePragma(Preprocessor &PP,
                                        PragmaIntroducer Introducer,
                                        Token &FirstToken) {
Token Tok;
PP.Lex(Tok);
auto *Info = new (PP.getPreprocessorAllocator())
    PragmaAttributeInfo(AttributesForPragmaAttribute);

// Parse the optional namespace followed by a period.
if (Tok.is(tok::identifier)) {
  IdentifierInfo *II = Tok.getIdentifierInfo();
  if (!II->isStr("push") && !II->isStr("pop")) {
    Info->Namespace = II;
    PP.Lex(Tok);

    if (!Tok.is(tok::period)) {
      PP.Diag(Tok.getLocation(), diag::err_pragma_attribute_expected_period)
          << II;
      return;
    }
    PP.Lex(Tok);
  }
}

if (!Tok.isOneOf(tok::identifier, tok::l_paren)) {
  PP.Diag(Tok.getLocation(),
          diag::err_pragma_attribute_expected_push_pop_paren);
  return;
}

// Determine what action this pragma clang attribute represents.
if (Tok.is(tok::l_paren)) {
  if (Info->Namespace) {
    PP.Diag(Tok.getLocation(),
            diag::err_pragma_attribute_namespace_on_attribute);
    PP.Diag(Tok.getLocation(),
            diag::note_pragma_attribute_namespace_on_attribute);
    return;
  }
  Info->Action = PragmaAttributeInfo::Attribute;
} else {
  const IdentifierInfo *II = Tok.getIdentifierInfo();
  if (II->isStr("push"))
    Info->Action = PragmaAttributeInfo::Push;
  else if (II->isStr("pop"))
    Info->Action = PragmaAttributeInfo::Pop;
  else {
    PP.Diag(Tok.getLocation(), diag::err_pragma_attribute_invalid_argument)
        << PP.getSpelling(Tok);
    return;
  }

  PP.Lex(Tok);
}

// Parse the actual attribute.
if ((Info->Action == PragmaAttributeInfo::Push && Tok.isNot(tok::eod)) ||
    Info->Action == PragmaAttributeInfo::Attribute) {
  if (Tok.isNot(tok::l_paren)) {
    PP.Diag(Tok.getLocation(), diag::err_expected) << tok::l_paren;
    return;
  }
  PP.Lex(Tok);

  // Lex the attribute tokens.
  SmallVector<Token, 16> AttributeTokens;
  int OpenParens = 1;
  while (Tok.isNot(tok::eod)) {
    if (Tok.is(tok::l_paren))
      OpenParens++;
    else if (Tok.is(tok::r_paren)) {
      OpenParens--;
      if (OpenParens == 0)
        break;
    }

    AttributeTokens.push_back(Tok);
    PP.Lex(Tok);
  }

  if (AttributeTokens.empty()) {
    PP.Diag(Tok.getLocation(), diag::err_pragma_attribute_expected_attribute);
    return;
  }
  if (Tok.isNot(tok::r_paren)) {
    PP.Diag(Tok.getLocation(), diag::err_expected) << tok::r_paren;
    return;
  }
  SourceLocation EndLoc = Tok.getLocation();
  PP.Lex(Tok);

  // Terminate the attribute for parsing.
  Token EOFTok;
  EOFTok.startToken();
  EOFTok.setKind(tok::eof);
  EOFTok.setLocation(EndLoc);
  AttributeTokens.push_back(EOFTok);

  markAsReinjectedForRelexing(AttributeTokens);
  Info->Tokens =
      llvm::makeArrayRef(AttributeTokens).copy(PP.getPreprocessorAllocator());
}

if (Tok.isNot(tok::eod))
  PP.Diag(Tok.getLocation(), diag::warn_pragma_extra_tokens_at_eol)
      << "clang attribute";

// Generate the annotated pragma token.
auto TokenArray = std::make_unique<Token[]>(1);
TokenArray[0].startToken();
TokenArray[0].setKind(tok::annot_pragma_attribute);
TokenArray[0].setLocation(FirstToken.getLocation());
TokenArray[0].setAnnotationEndLoc(FirstToken.getLocation());
TokenArray[0].setAnnotationValue(static_cast<void *>(Info));
PP.EnterTokenStream(std::move(TokenArray), 1,
                    /*DisableMacroExpansion=*/false, /*IsReinject=*/false);
3663}

3665// Handle '#pragma clang max_tokens 12345'.
3666void PragmaMaxTokensHereHandler::HandlePragma(Preprocessor &PP,
                                            PragmaIntroducer Introducer,
                                            Token &Tok) {
PP.Lex(Tok);
if (Tok.is(tok::eod)) {
  PP.Diag(Tok.getLocation(), diag::err_pragma_missing_argument)
      << "clang max_tokens_here" << /*Expected=*/true << "integer";
  return;
}

SourceLocation Loc = Tok.getLocation();
uint64_t MaxTokens;
if (Tok.isNot(tok::numeric_constant) ||
    !PP.parseSimpleIntegerLiteral(Tok, MaxTokens)) {
  PP.Diag(Tok.getLocation(), diag::err_pragma_expected_integer)
      << "clang max_tokens_here";
  return;
}

if (Tok.isNot(tok::eod)) {
  PP.Diag(Tok.getLocation(), diag::warn_pragma_extra_tokens_at_eol)
      << "clang max_tokens_here";
  return;
}

if (PP.getTokenCount() > MaxTokens) {
  PP.Diag(Loc, diag::warn_max_tokens)
      << PP.getTokenCount() << (unsigned)MaxTokens;
}
3695}

3697// Handle '#pragma clang max_tokens_total 12345'.
3698void PragmaMaxTokensTotalHandler::HandlePragma(Preprocessor &PP,
                                             PragmaIntroducer Introducer,
                                             Token &Tok) {
PP.Lex(Tok);
if (Tok.is(tok::eod)) {
  PP.Diag(Tok.getLocation(), diag::err_pragma_missing_argument)
      << "clang max_tokens_total" << /*Expected=*/true << "integer";
  return;
}

SourceLocation Loc = Tok.getLocation();
uint64_t MaxTokens;
if (Tok.isNot(tok::numeric_constant) ||
    !PP.parseSimpleIntegerLiteral(Tok, MaxTokens)) {
  PP.Diag(Tok.getLocation(), diag::err_pragma_expected_integer)
      << "clang max_tokens_total";
  return;
}

if (Tok.isNot(tok::eod)) {
  PP.Diag(Tok.getLocation(), diag::warn_pragma_extra_tokens_at_eol)
      << "clang max_tokens_total";
  return;
}

PP.overrideMaxTokens(MaxTokens, Loc);
3724}

←

/usr/src/gnu/usr.bin/clang/libclangParse/../../../llvm/clang/include/clang/Basic/Diagnostic.h

1//===- Diagnostic.h - C Language Family Diagnostic Handling -----*- C++ -*-===//
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/// \file
10/// Defines the Diagnostic-related interfaces.
11//
12//===----------------------------------------------------------------------===//

14#ifndef LLVM_CLANG_BASIC_DIAGNOSTIC_H
15#define LLVM_CLANG_BASIC_DIAGNOSTIC_H

17#include "clang/Basic/DiagnosticIDs.h"
18#include "clang/Basic/DiagnosticOptions.h"
19#include "clang/Basic/SourceLocation.h"
20#include "clang/Basic/Specifiers.h"
21#include "llvm/ADT/ArrayRef.h"
22#include "llvm/ADT/DenseMap.h"
23#include "llvm/ADT/IntrusiveRefCntPtr.h"
24#include "llvm/ADT/Optional.h"
25#include "llvm/ADT/SmallVector.h"
26#include "llvm/ADT/StringRef.h"
27#include "llvm/ADT/iterator_range.h"
28#include "llvm/Support/Compiler.h"
29#include <cassert>
30#include <cstdint>
31#include <limits>
32#include <list>
33#include <map>
34#include <memory>
35#include <string>
36#include <type_traits>
37#include <utility>
38#include <vector>

40namespace llvm {
41class Error;
42}

44namespace clang {

46class DeclContext;
47class DiagnosticBuilder;
48class DiagnosticConsumer;
49class IdentifierInfo;
50class LangOptions;
51class Preprocessor;
52class SourceManager;
53class StoredDiagnostic;

55namespace tok {

57enum TokenKind : unsigned short;

59} // namespace tok

61/// Annotates a diagnostic with some code that should be
62/// inserted, removed, or replaced to fix the problem.
63///
64/// This kind of hint should be used when we are certain that the
65/// introduction, removal, or modification of a particular (small!)
66/// amount of code will correct a compilation error. The compiler
67/// should also provide full recovery from such errors, such that
68/// suppressing the diagnostic output can still result in successful
69/// compilation.
70class FixItHint {
71public:
/// Code that should be replaced to correct the error. Empty for an
/// insertion hint.
CharSourceRange RemoveRange;

/// Code in the specific range that should be inserted in the insertion
/// location.
CharSourceRange InsertFromRange;

/// The actual code to insert at the insertion location, as a
/// string.
std::string CodeToInsert;

bool BeforePreviousInsertions = false;

/// Empty code modification hint, indicating that no code
/// modification is known.
FixItHint() = default;

bool isNull() const {
  return !RemoveRange.isValid();
}

/// Create a code modification hint that inserts the given
/// code string at a specific location.
static FixItHint CreateInsertion(SourceLocation InsertionLoc,
                                 StringRef Code,
                                 bool BeforePreviousInsertions = false) {
  FixItHint Hint;
  Hint.RemoveRange =
    CharSourceRange::getCharRange(InsertionLoc, InsertionLoc);
  Hint.CodeToInsert = std::string(Code);
  Hint.BeforePreviousInsertions = BeforePreviousInsertions;
  return Hint;
}

/// Create a code modification hint that inserts the given
/// code from \p FromRange at a specific location.
static FixItHint CreateInsertionFromRange(SourceLocation InsertionLoc,
                                          CharSourceRange FromRange,
                                      bool BeforePreviousInsertions = false) {
  FixItHint Hint;
  Hint.RemoveRange =
    CharSourceRange::getCharRange(InsertionLoc, InsertionLoc);
  Hint.InsertFromRange = FromRange;
  Hint.BeforePreviousInsertions = BeforePreviousInsertions;
  return Hint;
}

/// Create a code modification hint that removes the given
/// source range.
static FixItHint CreateRemoval(CharSourceRange RemoveRange) {
  FixItHint Hint;
  Hint.RemoveRange = RemoveRange;
  return Hint;
}
static FixItHint CreateRemoval(SourceRange RemoveRange) {
  return CreateRemoval(CharSourceRange::getTokenRange(RemoveRange));
}

/// Create a code modification hint that replaces the given
/// source range with the given code string.
static FixItHint CreateReplacement(CharSourceRange RemoveRange,
                                   StringRef Code) {
  FixItHint Hint;
  Hint.RemoveRange = RemoveRange;
  Hint.CodeToInsert = std::string(Code);
  return Hint;
}

static FixItHint CreateReplacement(SourceRange RemoveRange,
                                   StringRef Code) {
  return CreateReplacement(CharSourceRange::getTokenRange(RemoveRange), Code);
}
145};

147struct DiagnosticStorage {
enum {
  /// The maximum number of arguments we can hold. We
  /// currently only support up to 10 arguments (%0-%9).
  ///
  /// A single diagnostic with more than that almost certainly has to
  /// be simplified anyway.
  MaxArguments = 10
};

/// The number of entries in Arguments.
unsigned char NumDiagArgs = 0;

/// Specifies for each argument whether it is in DiagArgumentsStr
/// or in DiagArguments.
unsigned char DiagArgumentsKind[MaxArguments];

/// The values for the various substitution positions.
///
/// This is used when the argument is not an std::string. The specific value
/// is mangled into an intptr_t and the interpretation depends on exactly
/// what sort of argument kind it is.
intptr_t DiagArgumentsVal[MaxArguments];

/// The values for the various substitution positions that have
/// string arguments.
std::string DiagArgumentsStr[MaxArguments];

/// The list of ranges added to this diagnostic.
SmallVector<CharSourceRange, 8> DiagRanges;

/// If valid, provides a hint with some code to insert, remove, or
/// modify at a particular position.
SmallVector<FixItHint, 6> FixItHints;

DiagnosticStorage() = default;
183};

185/// Concrete class used by the front-end to report problems and issues.
186///
187/// This massages the diagnostics (e.g. handling things like "report warnings
188/// as errors" and passes them off to the DiagnosticConsumer for reporting to
189/// the user. DiagnosticsEngine is tied to one translation unit and one
190/// SourceManager.
191class DiagnosticsEngine : public RefCountedBase<DiagnosticsEngine> {
192public:
/// The level of the diagnostic, after it has been through mapping.
enum Level {
  Ignored = DiagnosticIDs::Ignored,
  Note = DiagnosticIDs::Note,
  Remark = DiagnosticIDs::Remark,
  Warning = DiagnosticIDs::Warning,
  Error = DiagnosticIDs::Error,
  Fatal = DiagnosticIDs::Fatal
};

enum ArgumentKind {
  /// std::string
  ak_std_string,

  /// const char *
  ak_c_string,

  /// int
  ak_sint,

  /// unsigned
  ak_uint,

  /// enum TokenKind : unsigned
  ak_tokenkind,

  /// IdentifierInfo
  ak_identifierinfo,

  /// address space
  ak_addrspace,

  /// Qualifiers
  ak_qual,

  /// QualType
  ak_qualtype,

  /// DeclarationName
  ak_declarationname,

  /// NamedDecl *
  ak_nameddecl,

  /// NestedNameSpecifier *
  ak_nestednamespec,

  /// DeclContext *
  ak_declcontext,

  /// pair<QualType, QualType>
  ak_qualtype_pair,

  /// Attr *
  ak_attr
};

/// Represents on argument value, which is a union discriminated
/// by ArgumentKind, with a value.
using ArgumentValue = std::pair<ArgumentKind, intptr_t>;

254private:
// Used by __extension__
unsigned char AllExtensionsSilenced = 0;

// Treat fatal errors like errors.
bool FatalsAsError = false;

// Suppress all diagnostics.
bool SuppressAllDiagnostics = false;

// Elide common types of templates.
bool ElideType = true;

// Print a tree when comparing templates.
bool PrintTemplateTree = false;

// Color printing is enabled.
bool ShowColors = false;

// Which overload candidates to show.
OverloadsShown ShowOverloads = Ovl_All;

// With Ovl_Best, the number of overload candidates to show when we encounter
// an error.
//
// The value here is the number of candidates to show in the first nontrivial
// error.  Future errors may show a different number of candidates.
unsigned NumOverloadsToShow = 32;

// Cap of # errors emitted, 0 -> no limit.
unsigned ErrorLimit = 0;

// Cap on depth of template backtrace stack, 0 -> no limit.
unsigned TemplateBacktraceLimit = 0;

// Cap on depth of constexpr evaluation backtrace stack, 0 -> no limit.
unsigned ConstexprBacktraceLimit = 0;

IntrusiveRefCntPtr<DiagnosticIDs> Diags;
IntrusiveRefCntPtr<DiagnosticOptions> DiagOpts;
DiagnosticConsumer *Client = nullptr;
std::unique_ptr<DiagnosticConsumer> Owner;
SourceManager *SourceMgr = nullptr;

/// Mapping information for diagnostics.
///
/// Mapping info is packed into four bits per diagnostic.  The low three
/// bits are the mapping (an instance of diag::Severity), or zero if unset.
/// The high bit is set when the mapping was established as a user mapping.
/// If the high bit is clear, then the low bits are set to the default
/// value, and should be mapped with -pedantic, -Werror, etc.
///
/// A new DiagState is created and kept around when diagnostic pragmas modify
/// the state so that we know what is the diagnostic state at any given
/// source location.
class DiagState {
  llvm::DenseMap<unsigned, DiagnosticMapping> DiagMap;

public:
  // "Global" configuration state that can actually vary between modules.

  // Ignore all warnings: -w
  unsigned IgnoreAllWarnings : 1;

  // Enable all warnings.
  unsigned EnableAllWarnings : 1;

  // Treat warnings like errors.
  unsigned WarningsAsErrors : 1;

  // Treat errors like fatal errors.
  unsigned ErrorsAsFatal : 1;

  // Suppress warnings in system headers.
  unsigned SuppressSystemWarnings : 1;

  // Map extensions to warnings or errors?
  diag::Severity ExtBehavior = diag::Severity::Ignored;

  DiagState()
      : IgnoreAllWarnings(false), EnableAllWarnings(false),
        WarningsAsErrors(false), ErrorsAsFatal(false),
        SuppressSystemWarnings(false) {}

  using iterator = llvm::DenseMap<unsigned, DiagnosticMapping>::iterator;
  using const_iterator =
      llvm::DenseMap<unsigned, DiagnosticMapping>::const_iterator;

  void setMapping(diag::kind Diag, DiagnosticMapping Info) {
    DiagMap[Diag] = Info;
  }

  DiagnosticMapping lookupMapping(diag::kind Diag) const {
    return DiagMap.lookup(Diag);
  }

  DiagnosticMapping &getOrAddMapping(diag::kind Diag);

  const_iterator begin() const { return DiagMap.begin(); }
  const_iterator end() const { return DiagMap.end(); }
};

/// Keeps and automatically disposes all DiagStates that we create.
std::list<DiagState> DiagStates;

/// A mapping from files to the diagnostic states for those files. Lazily
/// built on demand for files in which the diagnostic state has not changed.
class DiagStateMap {
public:
  /// Add an initial diagnostic state.
  void appendFirst(DiagState *State);

  /// Add a new latest state point.
  void append(SourceManager &SrcMgr, SourceLocation Loc, DiagState *State);

  /// Look up the diagnostic state at a given source location.
  DiagState *lookup(SourceManager &SrcMgr, SourceLocation Loc) const;

  /// Determine whether this map is empty.
  bool empty() const { return Files.empty(); }

  /// Clear out this map.
  void clear() {
    Files.clear();
    FirstDiagState = CurDiagState = nullptr;
    CurDiagStateLoc = SourceLocation();
  }

  /// Produce a debugging dump of the diagnostic state.
  LLVM_DUMP_METHOD__attribute__((noinline)) void dump(SourceManager &SrcMgr,
                             StringRef DiagName = StringRef()) const;

  /// Grab the most-recently-added state point.
  DiagState *getCurDiagState() const { return CurDiagState; }

  /// Get the location at which a diagnostic state was last added.
  SourceLocation getCurDiagStateLoc() const { return CurDiagStateLoc; }

private:
  friend class ASTReader;
  friend class ASTWriter;

  /// Represents a point in source where the diagnostic state was
  /// modified because of a pragma.
  ///
  /// 'Loc' can be null if the point represents the diagnostic state
  /// modifications done through the command-line.
  struct DiagStatePoint {
    DiagState *State;
    unsigned Offset;

    DiagStatePoint(DiagState *State, unsigned Offset)
        : State(State), Offset(Offset) {}
  };

  /// Description of the diagnostic states and state transitions for a
  /// particular FileID.
  struct File {
    /// The diagnostic state for the parent file. This is strictly redundant,
    /// as looking up the DecomposedIncludedLoc for the FileID in the Files
    /// map would give us this, but we cache it here for performance.
    File *Parent = nullptr;

    /// The offset of this file within its parent.
    unsigned ParentOffset = 0;

    /// Whether this file has any local (not imported from an AST file)
    /// diagnostic state transitions.
    bool HasLocalTransitions = false;

    /// The points within the file where the state changes. There will always
    /// be at least one of these (the state on entry to the file).
    llvm::SmallVector<DiagStatePoint, 4> StateTransitions;

    DiagState *lookup(unsigned Offset) const;
  };

  /// The diagnostic states for each file.
  mutable std::map<FileID, File> Files;

  /// The initial diagnostic state.
  DiagState *FirstDiagState;

  /// The current diagnostic state.
  DiagState *CurDiagState;

  /// The location at which the current diagnostic state was established.
  SourceLocation CurDiagStateLoc;

  /// Get the diagnostic state information for a file.
  File *getFile(SourceManager &SrcMgr, FileID ID) const;
};

DiagStateMap DiagStatesByLoc;

/// Keeps the DiagState that was active during each diagnostic 'push'
/// so we can get back at it when we 'pop'.
std::vector<DiagState *> DiagStateOnPushStack;

DiagState *GetCurDiagState() const {
  return DiagStatesByLoc.getCurDiagState();
}

void PushDiagStatePoint(DiagState *State, SourceLocation L);

/// Finds the DiagStatePoint that contains the diagnostic state of
/// the given source location.
DiagState *GetDiagStateForLoc(SourceLocation Loc) const {
  return SourceMgr ? DiagStatesByLoc.lookup(*SourceMgr, Loc)
                   : DiagStatesByLoc.getCurDiagState();
}

/// Sticky flag set to \c true when an error is emitted.
bool ErrorOccurred;

/// Sticky flag set to \c true when an "uncompilable error" occurs.
/// I.e. an error that was not upgraded from a warning by -Werror.
bool UncompilableErrorOccurred;

/// Sticky flag set to \c true when a fatal error is emitted.
bool FatalErrorOccurred;

/// Indicates that an unrecoverable error has occurred.
bool UnrecoverableErrorOccurred;

/// Counts for DiagnosticErrorTrap to check whether an error occurred
/// during a parsing section, e.g. during parsing a function.
unsigned TrapNumErrorsOccurred;
unsigned TrapNumUnrecoverableErrorsOccurred;

/// The level of the last diagnostic emitted.
///
/// This is used to emit continuation diagnostics with the same level as the
/// diagnostic that they follow.
DiagnosticIDs::Level LastDiagLevel;

/// Number of warnings reported
unsigned NumWarnings;

/// Number of errors reported
unsigned NumErrors;

/// A function pointer that converts an opaque diagnostic
/// argument to a strings.
///
/// This takes the modifiers and argument that was present in the diagnostic.
///
/// The PrevArgs array indicates the previous arguments formatted for this
/// diagnostic.  Implementations of this function can use this information to
/// avoid redundancy across arguments.
///
/// This is a hack to avoid a layering violation between libbasic and libsema.
using ArgToStringFnTy = void (*)(
    ArgumentKind Kind, intptr_t Val,
    StringRef Modifier, StringRef Argument,
    ArrayRef<ArgumentValue> PrevArgs,
    SmallVectorImpl<char> &Output,
    void *Cookie,
    ArrayRef<intptr_t> QualTypeVals);

void *ArgToStringCookie = nullptr;
ArgToStringFnTy ArgToStringFn;

/// ID of the "delayed" diagnostic, which is a (typically
/// fatal) diagnostic that had to be delayed because it was found
/// while emitting another diagnostic.
unsigned DelayedDiagID;

/// First string argument for the delayed diagnostic.
std::string DelayedDiagArg1;

/// Second string argument for the delayed diagnostic.
std::string DelayedDiagArg2;

/// Third string argument for the delayed diagnostic.
std::string DelayedDiagArg3;

/// Optional flag value.
///
/// Some flags accept values, for instance: -Wframe-larger-than=<value> and
/// -Rpass=<value>. The content of this string is emitted after the flag name
/// and '='.
std::string FlagValue;

538public:
explicit DiagnosticsEngine(IntrusiveRefCntPtr<DiagnosticIDs> Diags,
                           IntrusiveRefCntPtr<DiagnosticOptions> DiagOpts,
                           DiagnosticConsumer *client = nullptr,
                           bool ShouldOwnClient = true);
DiagnosticsEngine(const DiagnosticsEngine &) = delete;
DiagnosticsEngine &operator=(const DiagnosticsEngine &) = delete;
~DiagnosticsEngine();

LLVM_DUMP_METHOD__attribute__((noinline)) void dump() const;
LLVM_DUMP_METHOD__attribute__((noinline)) void dump(StringRef DiagName) const;

const IntrusiveRefCntPtr<DiagnosticIDs> &getDiagnosticIDs() const {
  return Diags;
}

/// Retrieve the diagnostic options.
DiagnosticOptions &getDiagnosticOptions() const { return *DiagOpts; }

using diag_mapping_range = llvm::iterator_range<DiagState::const_iterator>;

/// Get the current set of diagnostic mappings.
diag_mapping_range getDiagnosticMappings() const {
  const DiagState &DS = *GetCurDiagState();
  return diag_mapping_range(DS.begin(), DS.end());
}

DiagnosticConsumer *getClient() { return Client; }
const DiagnosticConsumer *getClient() const { return Client; }

/// Determine whether this \c DiagnosticsEngine object own its client.
bool ownsClient() const { return Owner != nullptr; }

/// Return the current diagnostic client along with ownership of that
/// client.
std::unique_ptr<DiagnosticConsumer> takeClient() { return std::move(Owner); }

bool hasSourceManager() const { return SourceMgr != nullptr; }

SourceManager &getSourceManager() const {
  assert(SourceMgr && "SourceManager not set!")((void)0);
  return *SourceMgr;
}

void setSourceManager(SourceManager *SrcMgr) {
  assert(DiagStatesByLoc.empty() &&((void)0)
         "Leftover diag state from a different SourceManager.")((void)0);
  SourceMgr = SrcMgr;
}

//===--------------------------------------------------------------------===//
//  DiagnosticsEngine characterization methods, used by a client to customize
//  how diagnostics are emitted.
//

/// Copies the current DiagMappings and pushes the new copy
/// onto the top of the stack.
void pushMappings(SourceLocation Loc);

/// Pops the current DiagMappings off the top of the stack,
/// causing the new top of the stack to be the active mappings.
///
/// \returns \c true if the pop happens, \c false if there is only one
/// DiagMapping on the stack.
bool popMappings(SourceLocation Loc);

/// Set the diagnostic client associated with this diagnostic object.
///
/// \param ShouldOwnClient true if the diagnostic object should take
/// ownership of \c client.
void setClient(DiagnosticConsumer *client, bool ShouldOwnClient = true);

/// Specify a limit for the number of errors we should
/// emit before giving up.
///
/// Zero disables the limit.
void setErrorLimit(unsigned Limit) { ErrorLimit = Limit; }

/// Specify the maximum number of template instantiation
/// notes to emit along with a given diagnostic.
void setTemplateBacktraceLimit(unsigned Limit) {
  TemplateBacktraceLimit = Limit;
}

/// Retrieve the maximum number of template instantiation
/// notes to emit along with a given diagnostic.
unsigned getTemplateBacktraceLimit() const {
  return TemplateBacktraceLimit;
}

/// Specify the maximum number of constexpr evaluation
/// notes to emit along with a given diagnostic.
void setConstexprBacktraceLimit(unsigned Limit) {
  ConstexprBacktraceLimit = Limit;
}

/// Retrieve the maximum number of constexpr evaluation
/// notes to emit along with a given diagnostic.
unsigned getConstexprBacktraceLimit() const {
  return ConstexprBacktraceLimit;
}

/// When set to true, any unmapped warnings are ignored.
///
/// If this and WarningsAsErrors are both set, then this one wins.
void setIgnoreAllWarnings(bool Val) {
  GetCurDiagState()->IgnoreAllWarnings = Val;
}
bool getIgnoreAllWarnings() const {
  return GetCurDiagState()->IgnoreAllWarnings;
}

/// When set to true, any unmapped ignored warnings are no longer
/// ignored.
///
/// If this and IgnoreAllWarnings are both set, then that one wins.
void setEnableAllWarnings(bool Val) {
  GetCurDiagState()->EnableAllWarnings = Val;
}
bool getEnableAllWarnings() const {
  return GetCurDiagState()->EnableAllWarnings;
}

/// When set to true, any warnings reported are issued as errors.
void setWarningsAsErrors(bool Val) {
  GetCurDiagState()->WarningsAsErrors = Val;
}
bool getWarningsAsErrors() const {
  return GetCurDiagState()->WarningsAsErrors;
}

/// When set to true, any error reported is made a fatal error.
void setErrorsAsFatal(bool Val) { GetCurDiagState()->ErrorsAsFatal = Val; }
bool getErrorsAsFatal() const { return GetCurDiagState()->ErrorsAsFatal; }

/// \brief When set to true, any fatal error reported is made an error.
///
/// This setting takes precedence over the setErrorsAsFatal setting above.
void setFatalsAsError(bool Val) { FatalsAsError = Val; }
bool getFatalsAsError() const { return FatalsAsError; }

/// When set to true mask warnings that come from system headers.
void setSuppressSystemWarnings(bool Val) {
  GetCurDiagState()->SuppressSystemWarnings = Val;
}
bool getSuppressSystemWarnings() const {
  return GetCurDiagState()->SuppressSystemWarnings;
}

/// Suppress all diagnostics, to silence the front end when we
/// know that we don't want any more diagnostics to be passed along to the
/// client
void setSuppressAllDiagnostics(bool Val) { SuppressAllDiagnostics = Val; }
bool getSuppressAllDiagnostics() const { return SuppressAllDiagnostics; }

/// Set type eliding, to skip outputting same types occurring in
/// template types.
void setElideType(bool Val) { ElideType = Val; }
bool getElideType() { return ElideType; }

/// Set tree printing, to outputting the template difference in a
/// tree format.
void setPrintTemplateTree(bool Val) { PrintTemplateTree = Val; }
bool getPrintTemplateTree() { return PrintTemplateTree; }

/// Set color printing, so the type diffing will inject color markers
/// into the output.
void setShowColors(bool Val) { ShowColors = Val; }
bool getShowColors() { return ShowColors; }

/// Specify which overload candidates to show when overload resolution
/// fails.
///
/// By default, we show all candidates.
void setShowOverloads(OverloadsShown Val) {
  ShowOverloads = Val;
}
OverloadsShown getShowOverloads() const { return ShowOverloads; }

/// When a call or operator fails, print out up to this many candidate
/// overloads as suggestions.
///
/// With Ovl_Best, we set a high limit for the first nontrivial overload set
/// we print, and a lower limit for later sets.  This way the user has a
/// chance of diagnosing at least one callsite in their program without
/// having to recompile with -fshow-overloads=all.
unsigned getNumOverloadCandidatesToShow() const {
  switch (getShowOverloads()) {
  case Ovl_All:
    // INT_MAX rather than UINT_MAX so that we don't have to think about the
    // effect of implicit conversions on this value. In practice we'll never
    // hit 2^31 candidates anyway.
    return std::numeric_limits<int>::max();
  case Ovl_Best:
    return NumOverloadsToShow;
  }
  llvm_unreachable("invalid OverloadsShown kind")__builtin_unreachable();
}

/// Call this after showing N overload candidates.  This influences the value
/// returned by later calls to getNumOverloadCandidatesToShow().
void overloadCandidatesShown(unsigned N) {
  // Current heuristic: Start out with a large value for NumOverloadsToShow,
  // and then once we print one nontrivially-large overload set, decrease it
  // for future calls.
  if (N > 4) {
    NumOverloadsToShow = 4;
  }
}

/// Pretend that the last diagnostic issued was ignored, so any
/// subsequent notes will be suppressed, or restore a prior ignoring
/// state after ignoring some diagnostics and their notes, possibly in
/// the middle of another diagnostic.
///
/// This can be used by clients who suppress diagnostics themselves.
void setLastDiagnosticIgnored(bool Ignored) {
  if (LastDiagLevel == DiagnosticIDs::Fatal)
    FatalErrorOccurred = true;
  LastDiagLevel = Ignored ? DiagnosticIDs::Ignored : DiagnosticIDs::Warning;
}

/// Determine whether the previous diagnostic was ignored. This can
/// be used by clients that want to determine whether notes attached to a
/// diagnostic will be suppressed.
bool isLastDiagnosticIgnored() const {
  return LastDiagLevel == DiagnosticIDs::Ignored;
}

/// Controls whether otherwise-unmapped extension diagnostics are
/// mapped onto ignore/warning/error.
///
/// This corresponds to the GCC -pedantic and -pedantic-errors option.
void setExtensionHandlingBehavior(diag::Severity H) {
  GetCurDiagState()->ExtBehavior = H;
}
diag::Severity getExtensionHandlingBehavior() const {
  return GetCurDiagState()->ExtBehavior;
}

/// Counter bumped when an __extension__  block is/ encountered.
///
/// When non-zero, all extension diagnostics are entirely silenced, no
/// matter how they are mapped.
void IncrementAllExtensionsSilenced() { ++AllExtensionsSilenced; }
void DecrementAllExtensionsSilenced() { --AllExtensionsSilenced; }
bool hasAllExtensionsSilenced() { return AllExtensionsSilenced != 0; }

/// This allows the client to specify that certain warnings are
/// ignored.
///
/// Notes can never be mapped, errors can only be mapped to fatal, and
/// WARNINGs and EXTENSIONs can be mapped arbitrarily.
///
/// \param Loc The source location that this change of diagnostic state should
/// take affect. It can be null if we are setting the latest state.
void setSeverity(diag::kind Diag, diag::Severity Map, SourceLocation Loc);

/// Change an entire diagnostic group (e.g. "unknown-pragmas") to
/// have the specified mapping.
///
/// \returns true (and ignores the request) if "Group" was unknown, false
/// otherwise.
///
/// \param Flavor The flavor of group to affect. -Rfoo does not affect the
/// state of the -Wfoo group and vice versa.
///
/// \param Loc The source location that this change of diagnostic state should
/// take affect. It can be null if we are setting the state from command-line.
bool setSeverityForGroup(diag::Flavor Flavor, StringRef Group,
                         diag::Severity Map,
                         SourceLocation Loc = SourceLocation());

/// Set the warning-as-error flag for the given diagnostic group.
///
/// This function always only operates on the current diagnostic state.
///
/// \returns True if the given group is unknown, false otherwise.
bool setDiagnosticGroupWarningAsError(StringRef Group, bool Enabled);

/// Set the error-as-fatal flag for the given diagnostic group.
///
/// This function always only operates on the current diagnostic state.
///
/// \returns True if the given group is unknown, false otherwise.
bool setDiagnosticGroupErrorAsFatal(StringRef Group, bool Enabled);

/// Add the specified mapping to all diagnostics of the specified
/// flavor.
///
/// Mainly to be used by -Wno-everything to disable all warnings but allow
/// subsequent -W options to enable specific warnings.
void setSeverityForAll(diag::Flavor Flavor, diag::Severity Map,
                       SourceLocation Loc = SourceLocation());

bool hasErrorOccurred() const { return ErrorOccurred; }

/// Errors that actually prevent compilation, not those that are
/// upgraded from a warning by -Werror.
bool hasUncompilableErrorOccurred() const {
  return UncompilableErrorOccurred;
}
bool hasFatalErrorOccurred() const { return FatalErrorOccurred; }

/// Determine whether any kind of unrecoverable error has occurred.
bool hasUnrecoverableErrorOccurred() const {
  return FatalErrorOccurred || UnrecoverableErrorOccurred;
}

unsigned getNumErrors() const { return NumErrors; }
unsigned getNumWarnings() const { return NumWarnings; }

void setNumWarnings(unsigned NumWarnings) {
  this->NumWarnings = NumWarnings;
}

/// Return an ID for a diagnostic with the specified format string and
/// level.
///
/// If this is the first request for this diagnostic, it is registered and
/// created, otherwise the existing ID is returned.
///
/// \param FormatString A fixed diagnostic format string that will be hashed
/// and mapped to a unique DiagID.
template <unsigned N>
unsigned getCustomDiagID(Level L, const char (&FormatString)[N]) {
  return Diags->getCustomDiagID((DiagnosticIDs::Level)L,
                                StringRef(FormatString, N - 1));
}

/// Converts a diagnostic argument (as an intptr_t) into the string
/// that represents it.
void ConvertArgToString(ArgumentKind Kind, intptr_t Val,
                        StringRef Modifier, StringRef Argument,
                        ArrayRef<ArgumentValue> PrevArgs,
                        SmallVectorImpl<char> &Output,
                        ArrayRef<intptr_t> QualTypeVals) const {
  ArgToStringFn(Kind, Val, Modifier, Argument, PrevArgs, Output,
                ArgToStringCookie, QualTypeVals);
}

void SetArgToStringFn(ArgToStringFnTy Fn, void *Cookie) {
  ArgToStringFn = Fn;
  ArgToStringCookie = Cookie;
}

/// Note that the prior diagnostic was emitted by some other
/// \c DiagnosticsEngine, and we may be attaching a note to that diagnostic.
void notePriorDiagnosticFrom(const DiagnosticsEngine &Other) {
  LastDiagLevel = Other.LastDiagLevel;
}

/// Reset the state of the diagnostic object to its initial
/// configuration.
void Reset();

//===--------------------------------------------------------------------===//
// DiagnosticsEngine classification and reporting interfaces.
//

/// Determine whether the diagnostic is known to be ignored.
///
/// This can be used to opportunistically avoid expensive checks when it's
/// known for certain that the diagnostic has been suppressed at the
/// specified location \p Loc.
///
/// \param Loc The source location we are interested in finding out the
/// diagnostic state. Can be null in order to query the latest state.
bool isIgnored(unsigned DiagID, SourceLocation Loc) const {
  return Diags->getDiagnosticSeverity(DiagID, Loc, *this) ==
         diag::Severity::Ignored;
}

/// Based on the way the client configured the DiagnosticsEngine
/// object, classify the specified diagnostic ID into a Level, consumable by
/// the DiagnosticConsumer.
///
/// To preserve invariant assumptions, this function should not be used to
/// influence parse or semantic analysis actions. Instead consider using
/// \c isIgnored().
///
/// \param Loc The source location we are interested in finding out the
/// diagnostic state. Can be null in order to query the latest state.
Level getDiagnosticLevel(unsigned DiagID, SourceLocation Loc) const {
  return (Level)Diags->getDiagnosticLevel(DiagID, Loc, *this);
}

/// Issue the message to the client.
///
/// This actually returns an instance of DiagnosticBuilder which emits the
/// diagnostics (through @c ProcessDiag) when it is destroyed.
///
/// \param DiagID A member of the @c diag::kind enum.
/// \param Loc Represents the source location associated with the diagnostic,
/// which can be an invalid location if no position information is available.
inline DiagnosticBuilder Report(SourceLocation Loc, unsigned DiagID);
inline DiagnosticBuilder Report(unsigned DiagID);

void Report(const StoredDiagnostic &storedDiag);

/// Determine whethere there is already a diagnostic in flight.
bool isDiagnosticInFlight() const {
  return CurDiagID != std::numeric_limits<unsigned>::max();
}

/// Set the "delayed" diagnostic that will be emitted once
/// the current diagnostic completes.
///
///  If a diagnostic is already in-flight but the front end must
///  report a problem (e.g., with an inconsistent file system
///  state), this routine sets a "delayed" diagnostic that will be
///  emitted after the current diagnostic completes. This should
///  only be used for fatal errors detected at inconvenient
///  times. If emitting a delayed diagnostic causes a second delayed
///  diagnostic to be introduced, that second delayed diagnostic
///  will be ignored.
///
/// \param DiagID The ID of the diagnostic being delayed.
///
/// \param Arg1 A string argument that will be provided to the
/// diagnostic. A copy of this string will be stored in the
/// DiagnosticsEngine object itself.
///
/// \param Arg2 A string argument that will be provided to the
/// diagnostic. A copy of this string will be stored in the
/// DiagnosticsEngine object itself.
///
/// \param Arg3 A string argument that will be provided to the
/// diagnostic. A copy of this string will be stored in the
/// DiagnosticsEngine object itself.
void SetDelayedDiagnostic(unsigned DiagID, StringRef Arg1 = "",
                          StringRef Arg2 = "", StringRef Arg3 = "");

/// Clear out the current diagnostic.
void Clear() { CurDiagID = std::numeric_limits<unsigned>::max(); }

/// Return the value associated with this diagnostic flag.
StringRef getFlagValue() const { return FlagValue; }

977private:
// This is private state used by DiagnosticBuilder.  We put it here instead of
// in DiagnosticBuilder in order to keep DiagnosticBuilder a small lightweight
// object.  This implementation choice means that we can only have one
// diagnostic "in flight" at a time, but this seems to be a reasonable
// tradeoff to keep these objects small.  Assertions verify that only one
// diagnostic is in flight at a time.
friend class Diagnostic;
friend class DiagnosticBuilder;
friend class DiagnosticErrorTrap;
friend class DiagnosticIDs;
friend class PartialDiagnostic;

/// Report the delayed diagnostic.
void ReportDelayed();

/// The location of the current diagnostic that is in flight.
SourceLocation CurDiagLoc;

/// The ID of the current diagnostic that is in flight.
///
/// This is set to std::numeric_limits<unsigned>::max() when there is no
/// diagnostic in flight.
unsigned CurDiagID;

enum {
  /// The maximum number of arguments we can hold.
  ///
  /// We currently only support up to 10 arguments (%0-%9).  A single
  /// diagnostic with more than that almost certainly has to be simplified
  /// anyway.
  MaxArguments = DiagnosticStorage::MaxArguments,
};

DiagnosticStorage DiagStorage;

DiagnosticMapping makeUserMapping(diag::Severity Map, SourceLocation L) {
  bool isPragma = L.isValid();
  DiagnosticMapping Mapping =
      DiagnosticMapping::Make(Map, /*IsUser=*/true, isPragma);

  // If this is a pragma mapping, then set the diagnostic mapping flags so
  // that we override command line options.
  if (isPragma) {
    Mapping.setNoWarningAsError(true);
    Mapping.setNoErrorAsFatal(true);
  }

  return Mapping;
}

/// Used to report a diagnostic that is finally fully formed.
///
/// \returns true if the diagnostic was emitted, false if it was suppressed.
bool ProcessDiag() {
  return Diags->ProcessDiag(*this);
}

/// @name Diagnostic Emission
/// @{
1037protected:
friend class ASTReader;
friend class ASTWriter;

// Sema requires access to the following functions because the current design
// of SFINAE requires it to use its own SemaDiagnosticBuilder, which needs to
// access us directly to ensure we minimize the emitted code for the common
// Sema::Diag() patterns.
friend class Sema;

/// Emit the current diagnostic and clear the diagnostic state.
///
/// \param Force Emit the diagnostic regardless of suppression settings.
bool EmitCurrentDiagnostic(bool Force = false);

unsigned getCurrentDiagID() const { return CurDiagID; }

SourceLocation getCurrentDiagLoc() const { return CurDiagLoc; }

/// @}
1057};

1059/// RAII class that determines when any errors have occurred
1060/// between the time the instance was created and the time it was
1061/// queried.
1062///
1063/// Note that you almost certainly do not want to use this. It's usually
1064/// meaningless to ask whether a particular scope triggered an error message,
1065/// because error messages outside that scope can mark things invalid (or cause
1066/// us to reach an error limit), which can suppress errors within that scope.
1067class DiagnosticErrorTrap {
DiagnosticsEngine &Diag;
unsigned NumErrors;
unsigned NumUnrecoverableErrors;

1072public:
explicit DiagnosticErrorTrap(DiagnosticsEngine &Diag)
    : Diag(Diag) { reset(); }

/// Determine whether any errors have occurred since this
/// object instance was created.
bool hasErrorOccurred() const {
  return Diag.TrapNumErrorsOccurred > NumErrors;
}

/// Determine whether any unrecoverable errors have occurred since this
/// object instance was created.
bool hasUnrecoverableErrorOccurred() const {
  return Diag.TrapNumUnrecoverableErrorsOccurred > NumUnrecoverableErrors;
}

/// Set to initial state of "no errors occurred".
void reset() {
  NumErrors = Diag.TrapNumErrorsOccurred;
  NumUnrecoverableErrors = Diag.TrapNumUnrecoverableErrorsOccurred;
}
1093};

1095/// The streaming interface shared between DiagnosticBuilder and
1096/// PartialDiagnostic. This class is not intended to be constructed directly
1097/// but only as base class of DiagnosticBuilder and PartialDiagnostic builder.
1098///
1099/// Any new type of argument accepted by DiagnosticBuilder and PartialDiagnostic
1100/// should be implemented as a '<<' operator of StreamingDiagnostic, e.g.
1101///
1102/// const StreamingDiagnostic&
1103/// operator<<(const StreamingDiagnostic&, NewArgType);
1104///
1105class StreamingDiagnostic {
1106public:
/// An allocator for DiagnosticStorage objects, which uses a small cache to
/// objects, used to reduce malloc()/free() traffic for partial diagnostics.
class DiagStorageAllocator {
  static const unsigned NumCached = 16;
  DiagnosticStorage Cached[NumCached];
  DiagnosticStorage *FreeList[NumCached];
  unsigned NumFreeListEntries;

public:
  DiagStorageAllocator();
  ~DiagStorageAllocator();

  /// Allocate new storage.
  DiagnosticStorage *Allocate() {
    if (NumFreeListEntries == 0)
      return new DiagnosticStorage;

    DiagnosticStorage *Result = FreeList[--NumFreeListEntries];
    Result->NumDiagArgs = 0;
    Result->DiagRanges.clear();
    Result->FixItHints.clear();
    return Result;
  }

  /// Free the given storage object.
  void Deallocate(DiagnosticStorage *S) {
    if (S >= Cached && S <= Cached + NumCached) {
      FreeList[NumFreeListEntries++] = S;
      return;
    }

    delete S;
  }
};

1142protected:
mutable DiagnosticStorage *DiagStorage = nullptr;

/// Allocator used to allocate storage for this diagnostic.
DiagStorageAllocator *Allocator = nullptr;
23
←
Null pointer value stored to field 'Allocator'→

1148public:
/// Retrieve storage for this particular diagnostic.
DiagnosticStorage *getStorage() const {
  if (DiagStorage42.1
Field 'DiagStorage' is null
1
Field 'DiagStorage' is null
)
43
←
Taking false branch→
    return DiagStorage;

  assert(Allocator)((void)0);
  DiagStorage = Allocator->Allocate();
44
←
Called C++ object pointer is null
  return DiagStorage;
}

void freeStorage() {
  if (!DiagStorage)
31
←
Assuming pointer value is null→
32
←
Assuming field 'DiagStorage' is null→
33
←
Taking true branch→
    return;

  // The hot path for PartialDiagnostic is when we just used it to wrap an ID
  // (typically so we have the flexibility of passing a more complex
  // diagnostic into the callee, but that does not commonly occur).
  //
  // Split this out into a slow function for silly compilers (*cough*) which
  // can't do decent partial inlining.
  freeStorageSlow();
}

void freeStorageSlow() {
  if (!Allocator)
    return;
  Allocator->Deallocate(DiagStorage);
  DiagStorage = nullptr;
}

void AddTaggedVal(intptr_t V, DiagnosticsEngine::ArgumentKind Kind) const {
  if (!DiagStorage40.1
Field 'DiagStorage' is null
1
Field 'DiagStorage' is null
)
41
←
Taking true branch→
    DiagStorage = getStorage();
42
←
Calling 'StreamingDiagnostic::getStorage'→

  assert(DiagStorage->NumDiagArgs < DiagnosticStorage::MaxArguments &&((void)0)
         "Too many arguments to diagnostic!")((void)0);
  DiagStorage->DiagArgumentsKind[DiagStorage->NumDiagArgs] = Kind;
  DiagStorage->DiagArgumentsVal[DiagStorage->NumDiagArgs++] = V;
}

void AddString(StringRef V) const {
  if (!DiagStorage)
    DiagStorage = getStorage();

  assert(DiagStorage->NumDiagArgs < DiagnosticStorage::MaxArguments &&((void)0)
         "Too many arguments to diagnostic!")((void)0);
  DiagStorage->DiagArgumentsKind[DiagStorage->NumDiagArgs] =
      DiagnosticsEngine::ak_std_string;
  DiagStorage->DiagArgumentsStr[DiagStorage->NumDiagArgs++] = std::string(V);
}

void AddSourceRange(const CharSourceRange &R) const {
  if (!DiagStorage)
    DiagStorage = getStorage();

  DiagStorage->DiagRanges.push_back(R);
}

void AddFixItHint(const FixItHint &Hint) const {
  if (Hint.isNull())
    return;

  if (!DiagStorage)
    DiagStorage = getStorage();

  DiagStorage->FixItHints.push_back(Hint);
}

/// Conversion of StreamingDiagnostic to bool always returns \c true.
///
/// This allows is to be used in boolean error contexts (where \c true is
/// used to indicate that an error has occurred), like:
/// \code
/// return Diag(...);
/// \endcode
operator bool() const { return true; }

1226protected:
StreamingDiagnostic() = default;
24
←
Returning without writing to 'this->Allocator'→

/// Construct with an external storage not owned by itself. The allocator
/// is a null pointer in this case.
explicit StreamingDiagnostic(DiagnosticStorage *Storage)
    : DiagStorage(Storage) {}

/// Construct with a storage allocator which will manage the storage. The
/// allocator is not a null pointer in this case.
explicit StreamingDiagnostic(DiagStorageAllocator &Alloc)
    : Allocator(&Alloc) {}

StreamingDiagnostic(const StreamingDiagnostic &Diag) = default;
StreamingDiagnostic(StreamingDiagnostic &&Diag) = default;

~StreamingDiagnostic() { freeStorage(); }
30
←
Calling 'StreamingDiagnostic::freeStorage'→
34
←
Returning from 'StreamingDiagnostic::freeStorage'→
1243};

1245//===----------------------------------------------------------------------===//
1246// DiagnosticBuilder
1247//===----------------------------------------------------------------------===//

1249/// A little helper class used to produce diagnostics.
1250///
1251/// This is constructed by the DiagnosticsEngine::Report method, and
1252/// allows insertion of extra information (arguments and source ranges) into
1253/// the currently "in flight" diagnostic.  When the temporary for the builder
1254/// is destroyed, the diagnostic is issued.
1255///
1256/// Note that many of these will be created as temporary objects (many call
1257/// sites), so we want them to be small and we never want their address taken.
1258/// This ensures that compilers with somewhat reasonable optimizers will promote
1259/// the common fields to registers, eliminating increments of the NumArgs field,
1260/// for example.
1261class DiagnosticBuilder : public StreamingDiagnostic {
friend class DiagnosticsEngine;
friend class PartialDiagnostic;

mutable DiagnosticsEngine *DiagObj = nullptr;

/// Status variable indicating if this diagnostic is still active.
///
// NOTE: This field is redundant with DiagObj (IsActive iff (DiagObj == 0)),
// but LLVM is not currently smart enough to eliminate the null check that
// Emit() would end up with if we used that as our status variable.
mutable bool IsActive = false;

/// Flag indicating that this diagnostic is being emitted via a
/// call to ForceEmit.
mutable bool IsForceEmit = false;

DiagnosticBuilder() = default;

explicit DiagnosticBuilder(DiagnosticsEngine *diagObj)
    : StreamingDiagnostic(&diagObj->DiagStorage), DiagObj(diagObj),
      IsActive(true) {
  assert(diagObj && "DiagnosticBuilder requires a valid DiagnosticsEngine!")((void)0);
  assert(DiagStorage &&((void)0)
         "DiagnosticBuilder requires a valid DiagnosticStorage!")((void)0);
  DiagStorage->NumDiagArgs = 0;
  DiagStorage->DiagRanges.clear();
  DiagStorage->FixItHints.clear();
}

1291protected:
/// Clear out the current diagnostic.
void Clear() const {
  DiagObj = nullptr;
  IsActive = false;
  IsForceEmit = false;
}

/// Determine whether this diagnostic is still active.
bool isActive() const { return IsActive; }

/// Force the diagnostic builder to emit the diagnostic now.
///
/// Once this function has been called, the DiagnosticBuilder object
/// should not be used again before it is destroyed.
///
/// \returns true if a diagnostic was emitted, false if the
/// diagnostic was suppressed.
bool Emit() {
  // If this diagnostic is inactive, then its soul was stolen by the copy ctor
  // (or by a subclass, as in SemaDiagnosticBuilder).
  if (!isActive()) return false;

  // Process the diagnostic.
  bool Result = DiagObj->EmitCurrentDiagnostic(IsForceEmit);

  // This diagnostic is dead.
  Clear();

  return Result;
}

1323public:
/// Copy constructor.  When copied, this "takes" the diagnostic info from the
/// input and neuters it.
DiagnosticBuilder(const DiagnosticBuilder &D) : StreamingDiagnostic() {
22
←
Calling defaulted default constructor for 'StreamingDiagnostic'→
25
←
Returning from default constructor for 'StreamingDiagnostic'→
  DiagObj = D.DiagObj;
  DiagStorage = D.DiagStorage;
  IsActive = D.IsActive;
  IsForceEmit = D.IsForceEmit;
  D.Clear();
}
26
←
Returning without writing to 'this->Allocator'→

template <typename T> const DiagnosticBuilder &operator<<(const T &V) const {
  assert(isActive() && "Clients must not add to cleared diagnostic!")((void)0);
  const StreamingDiagnostic &DB = *this;
  DB << V;
  return *this;
}

// It is necessary to limit this to rvalue reference to avoid calling this
// function with a bitfield lvalue argument since non-const reference to
// bitfield is not allowed.
template <typename T, typename = typename std::enable_if<
                          !std::is_lvalue_reference<T>::value>::type>
const DiagnosticBuilder &operator<<(T &&V) const {
  assert(isActive() && "Clients must not add to cleared diagnostic!")((void)0);
  const StreamingDiagnostic &DB = *this;
  DB << std::move(V);
39
←
Calling 'operator<<'→
  return *this;
}

DiagnosticBuilder &operator=(const DiagnosticBuilder &) = delete;

/// Emits the diagnostic.
~DiagnosticBuilder() { Emit(); }
29
←
Calling '~StreamingDiagnostic'→
35
←
Returning from '~StreamingDiagnostic'→

/// Forces the diagnostic to be emitted.
const DiagnosticBuilder &setForceEmit() const {
  IsForceEmit = true;
  return *this;
}

void addFlagValue(StringRef V) const { DiagObj->FlagValue = std::string(V); }
1365};

1367struct AddFlagValue {
StringRef Val;

explicit AddFlagValue(StringRef V) : Val(V) {}
1371};

1373/// Register a value for the flag in the current diagnostic. This
1374/// value will be shown as the suffix "=value" after the flag name. It is
1375/// useful in cases where the diagnostic flag accepts values (e.g.,
1376/// -Rpass or -Wframe-larger-than).
1377inline const DiagnosticBuilder &operator<<(const DiagnosticBuilder &DB,
                                         const AddFlagValue V) {
DB.addFlagValue(V.Val);
return DB;
1381}

1383inline const StreamingDiagnostic &operator<<(const StreamingDiagnostic &DB,
                                           StringRef S) {
DB.AddString(S);
return DB;
1387}

1389inline const StreamingDiagnostic &operator<<(const StreamingDiagnostic &DB,
                                           const char *Str) {
DB.AddTaggedVal(reinterpret_cast<intptr_t>(Str),
                DiagnosticsEngine::ak_c_string);
return DB;
1394}

1396inline const StreamingDiagnostic &operator<<(const StreamingDiagnostic &DB,
                                           int I) {
DB.AddTaggedVal(I, DiagnosticsEngine::ak_sint);
return DB;
1400}

1402// We use enable_if here to prevent that this overload is selected for
1403// pointers or other arguments that are implicitly convertible to bool.
1404template <typename T>
1405inline std::enable_if_t<std::is_same<T, bool>::value,
                      const StreamingDiagnostic &>
1407operator<<(const StreamingDiagnostic &DB, T I) {
DB.AddTaggedVal(I, DiagnosticsEngine::ak_sint);
return DB;
1410}

1412inline const StreamingDiagnostic &operator<<(const StreamingDiagnostic &DB,
                                           unsigned I) {
DB.AddTaggedVal(I, DiagnosticsEngine::ak_uint);
return DB;
1416}

1418inline const StreamingDiagnostic &operator<<(const StreamingDiagnostic &DB,
                                           tok::TokenKind I) {
DB.AddTaggedVal(static_cast<unsigned>(I), DiagnosticsEngine::ak_tokenkind);
40
←
Calling 'StreamingDiagnostic::AddTaggedVal'→
return DB;
1422}

1424inline const StreamingDiagnostic &operator<<(const StreamingDiagnostic &DB,
                                           const IdentifierInfo *II) {
DB.AddTaggedVal(reinterpret_cast<intptr_t>(II),
                DiagnosticsEngine::ak_identifierinfo);
return DB;
1429}

1431// Adds a DeclContext to the diagnostic. The enable_if template magic is here
1432// so that we only match those arguments that are (statically) DeclContexts;
1433// other arguments that derive from DeclContext (e.g., RecordDecls) will not
1434// match.
1435template <typename T>
1436inline std::enable_if_t<
  std::is_same<std::remove_const_t<T>, DeclContext>::value,
  const StreamingDiagnostic &>
1439operator<<(const StreamingDiagnostic &DB, T *DC) {
DB.AddTaggedVal(reinterpret_cast<intptr_t>(DC),
                DiagnosticsEngine::ak_declcontext);
return DB;
1443}

1445inline const StreamingDiagnostic &operator<<(const StreamingDiagnostic &DB,
                                           SourceRange R) {
DB.AddSourceRange(CharSourceRange::getTokenRange(R));
return DB;
1449}

1451inline const StreamingDiagnostic &operator<<(const StreamingDiagnostic &DB,
                                           ArrayRef<SourceRange> Ranges) {
for (SourceRange R : Ranges)
  DB.AddSourceRange(CharSourceRange::getTokenRange(R));
return DB;
1456}

1458inline const StreamingDiagnostic &operator<<(const StreamingDiagnostic &DB,
                                           const CharSourceRange &R) {
DB.AddSourceRange(R);
return DB;
1462}

1464inline const StreamingDiagnostic &operator<<(const StreamingDiagnostic &DB,
                                           const FixItHint &Hint) {
DB.AddFixItHint(Hint);
return DB;
1468}

1470inline const StreamingDiagnostic &operator<<(const StreamingDiagnostic &DB,
                                           ArrayRef<FixItHint> Hints) {
for (const FixItHint &Hint : Hints)
  DB.AddFixItHint(Hint);
return DB;
1475}

1477inline const StreamingDiagnostic &
1478operator<<(const StreamingDiagnostic &DB,
         const llvm::Optional<SourceRange> &Opt) {
if (Opt)
  DB << *Opt;
return DB;
1483}

1485inline const StreamingDiagnostic &
1486operator<<(const StreamingDiagnostic &DB,
         const llvm::Optional<CharSourceRange> &Opt) {
if (Opt)
  DB << *Opt;
return DB;
1491}

1493inline const StreamingDiagnostic &
1494operator<<(const StreamingDiagnostic &DB,
         const llvm::Optional<FixItHint> &Opt) {
if (Opt)
  DB << *Opt;
return DB;
1499}

1501/// A nullability kind paired with a bit indicating whether it used a
1502/// context-sensitive keyword.
1503using DiagNullabilityKind = std::pair<NullabilityKind, bool>;

1505const StreamingDiagnostic &operator<<(const StreamingDiagnostic &DB,
                                    DiagNullabilityKind nullability);

1508inline DiagnosticBuilder DiagnosticsEngine::Report(SourceLocation Loc,
                                                 unsigned DiagID) {
assert(CurDiagID == std::numeric_limits<unsigned>::max() &&((void)0)
       "Multiple diagnostics in flight at once!")((void)0);
CurDiagLoc = Loc;
CurDiagID = DiagID;
FlagValue.clear();
return DiagnosticBuilder(this);
1516}

1518const StreamingDiagnostic &operator<<(const StreamingDiagnostic &DB,
                                    llvm::Error &&E);

1521inline DiagnosticBuilder DiagnosticsEngine::Report(unsigned DiagID) {
return Report(SourceLocation(), DiagID);
1523}

1525//===----------------------------------------------------------------------===//
1526// Diagnostic
1527//===----------------------------------------------------------------------===//

1529/// A little helper class (which is basically a smart pointer that forwards
1530/// info from DiagnosticsEngine) that allows clients to enquire about the
1531/// currently in-flight diagnostic.
1532class Diagnostic {
const DiagnosticsEngine *DiagObj;
StringRef StoredDiagMessage;

1536public:
explicit Diagnostic(const DiagnosticsEngine *DO) : DiagObj(DO) {}
Diagnostic(const DiagnosticsEngine *DO, StringRef storedDiagMessage)
    : DiagObj(DO), StoredDiagMessage(storedDiagMessage) {}

const DiagnosticsEngine *getDiags() const { return DiagObj; }
unsigned getID() const { return DiagObj->CurDiagID; }
const SourceLocation &getLocation() const { return DiagObj->CurDiagLoc; }
bool hasSourceManager() const { return DiagObj->hasSourceManager(); }
SourceManager &getSourceManager() const { return DiagObj->getSourceManager();}

unsigned getNumArgs() const { return DiagObj->DiagStorage.NumDiagArgs; }

/// Return the kind of the specified index.
///
/// Based on the kind of argument, the accessors below can be used to get
/// the value.
///
/// \pre Idx < getNumArgs()
DiagnosticsEngine::ArgumentKind getArgKind(unsigned Idx) const {
  assert(Idx < getNumArgs() && "Argument index out of range!")((void)0);
  return (DiagnosticsEngine::ArgumentKind)
      DiagObj->DiagStorage.DiagArgumentsKind[Idx];
}

/// Return the provided argument string specified by \p Idx.
/// \pre getArgKind(Idx) == DiagnosticsEngine::ak_std_string
const std::string &getArgStdStr(unsigned Idx) const {
  assert(getArgKind(Idx) == DiagnosticsEngine::ak_std_string &&((void)0)
         "invalid argument accessor!")((void)0);
  return DiagObj->DiagStorage.DiagArgumentsStr[Idx];
}

/// Return the specified C string argument.
/// \pre getArgKind(Idx) == DiagnosticsEngine::ak_c_string
const char *getArgCStr(unsigned Idx) const {
  assert(getArgKind(Idx) == DiagnosticsEngine::ak_c_string &&((void)0)
         "invalid argument accessor!")((void)0);
  return reinterpret_cast<const char *>(
      DiagObj->DiagStorage.DiagArgumentsVal[Idx]);
}

/// Return the specified signed integer argument.
/// \pre getArgKind(Idx) == DiagnosticsEngine::ak_sint
int getArgSInt(unsigned Idx) const {
  assert(getArgKind(Idx) == DiagnosticsEngine::ak_sint &&((void)0)
         "invalid argument accessor!")((void)0);
  return (int)DiagObj->DiagStorage.DiagArgumentsVal[Idx];
}

/// Return the specified unsigned integer argument.
/// \pre getArgKind(Idx) == DiagnosticsEngine::ak_uint
unsigned getArgUInt(unsigned Idx) const {
  assert(getArgKind(Idx) == DiagnosticsEngine::ak_uint &&((void)0)
         "invalid argument accessor!")((void)0);
  return (unsigned)DiagObj->DiagStorage.DiagArgumentsVal[Idx];
}

/// Return the specified IdentifierInfo argument.
/// \pre getArgKind(Idx) == DiagnosticsEngine::ak_identifierinfo
const IdentifierInfo *getArgIdentifier(unsigned Idx) const {
  assert(getArgKind(Idx) == DiagnosticsEngine::ak_identifierinfo &&((void)0)
         "invalid argument accessor!")((void)0);
  return reinterpret_cast<IdentifierInfo *>(
      DiagObj->DiagStorage.DiagArgumentsVal[Idx]);
}

/// Return the specified non-string argument in an opaque form.
/// \pre getArgKind(Idx) != DiagnosticsEngine::ak_std_string
intptr_t getRawArg(unsigned Idx) const {
  assert(getArgKind(Idx) != DiagnosticsEngine::ak_std_string &&((void)0)
         "invalid argument accessor!")((void)0);
  return DiagObj->DiagStorage.DiagArgumentsVal[Idx];
}

/// Return the number of source ranges associated with this diagnostic.
unsigned getNumRanges() const {
  return DiagObj->DiagStorage.DiagRanges.size();
}

/// \pre Idx < getNumRanges()
const CharSourceRange &getRange(unsigned Idx) const {
  assert(Idx < getNumRanges() && "Invalid diagnostic range index!")((void)0);
  return DiagObj->DiagStorage.DiagRanges[Idx];
}

/// Return an array reference for this diagnostic's ranges.
ArrayRef<CharSourceRange> getRanges() const {
  return DiagObj->DiagStorage.DiagRanges;
}

unsigned getNumFixItHints() const {
  return DiagObj->DiagStorage.FixItHints.size();
}

const FixItHint &getFixItHint(unsigned Idx) const {
  assert(Idx < getNumFixItHints() && "Invalid index!")((void)0);
  return DiagObj->DiagStorage.FixItHints[Idx];
}

ArrayRef<FixItHint> getFixItHints() const {
  return DiagObj->DiagStorage.FixItHints;
}

/// Format this diagnostic into a string, substituting the
/// formal arguments into the %0 slots.
///
/// The result is appended onto the \p OutStr array.
void FormatDiagnostic(SmallVectorImpl<char> &OutStr) const;

/// Format the given format-string into the output buffer using the
/// arguments stored in this diagnostic.
void FormatDiagnostic(const char *DiagStr, const char *DiagEnd,
                      SmallVectorImpl<char> &OutStr) const;
1650};

1652/**
* Represents a diagnostic in a form that can be retained until its
* corresponding source manager is destroyed.
*/
1656class StoredDiagnostic {
unsigned ID;
DiagnosticsEngine::Level Level;
FullSourceLoc Loc;
std::string Message;
std::vector<CharSourceRange> Ranges;
std::vector<FixItHint> FixIts;

1664public:
StoredDiagnostic() = default;
StoredDiagnostic(DiagnosticsEngine::Level Level, const Diagnostic &Info);
StoredDiagnostic(DiagnosticsEngine::Level Level, unsigned ID,
                 StringRef Message);
StoredDiagnostic(DiagnosticsEngine::Level Level, unsigned ID,
                 StringRef Message, FullSourceLoc Loc,
                 ArrayRef<CharSourceRange> Ranges,
                 ArrayRef<FixItHint> Fixits);

/// Evaluates true when this object stores a diagnostic.
explicit operator bool() const { return !Message.empty(); }

unsigned getID() const { return ID; }
DiagnosticsEngine::Level getLevel() const { return Level; }
const FullSourceLoc &getLocation() const { return Loc; }
StringRef getMessage() const { return Message; }

void setLocation(FullSourceLoc Loc) { this->Loc = Loc; }

using range_iterator = std::vector<CharSourceRange>::const_iterator;

range_iterator range_begin() const { return Ranges.begin(); }
range_iterator range_end() const { return Ranges.end(); }
unsigned range_size() const { return Ranges.size(); }

ArrayRef<CharSourceRange> getRanges() const {
  return llvm::makeArrayRef(Ranges);
}

using fixit_iterator = std::vector<FixItHint>::const_iterator;

fixit_iterator fixit_begin() const { return FixIts.begin(); }
fixit_iterator fixit_end() const { return FixIts.end(); }
unsigned fixit_size() const { return FixIts.size(); }

ArrayRef<FixItHint> getFixIts() const {
  return llvm::makeArrayRef(FixIts);
}
1703};

1705/// Abstract interface, implemented by clients of the front-end, which
1706/// formats and prints fully processed diagnostics.
1707class DiagnosticConsumer {
1708protected:
unsigned NumWarnings = 0;       ///< Number of warnings reported
unsigned NumErrors = 0;         ///< Number of errors reported

1712public:
DiagnosticConsumer() = default;
virtual ~DiagnosticConsumer();

unsigned getNumErrors() const { return NumErrors; }
unsigned getNumWarnings() const { return NumWarnings; }
virtual void clear() { NumWarnings = NumErrors = 0; }

/// Callback to inform the diagnostic client that processing
/// of a source file is beginning.
///
/// Note that diagnostics may be emitted outside the processing of a source
/// file, for example during the parsing of command line options. However,
/// diagnostics with source range information are required to only be emitted
/// in between BeginSourceFile() and EndSourceFile().
///
/// \param LangOpts The language options for the source file being processed.
/// \param PP The preprocessor object being used for the source; this is
/// optional, e.g., it may not be present when processing AST source files.
virtual void BeginSourceFile(const LangOptions &LangOpts,
                             const Preprocessor *PP = nullptr) {}

/// Callback to inform the diagnostic client that processing
/// of a source file has ended.
///
/// The diagnostic client should assume that any objects made available via
/// BeginSourceFile() are inaccessible.
virtual void EndSourceFile() {}

/// Callback to inform the diagnostic client that processing of all
/// source files has ended.
virtual void finish() {}

/// Indicates whether the diagnostics handled by this
/// DiagnosticConsumer should be included in the number of diagnostics
/// reported by DiagnosticsEngine.
///
/// The default implementation returns true.
virtual bool IncludeInDiagnosticCounts() const;

/// Handle this diagnostic, reporting it to the user or
/// capturing it to a log as needed.
///
/// The default implementation just keeps track of the total number of
/// warnings and errors.
virtual void HandleDiagnostic(DiagnosticsEngine::Level DiagLevel,
                              const Diagnostic &Info);
1759};

1761/// A diagnostic client that ignores all diagnostics.
1762class IgnoringDiagConsumer : public DiagnosticConsumer {
virtual void anchor();

void HandleDiagnostic(DiagnosticsEngine::Level DiagLevel,
                      const Diagnostic &Info) override {
  // Just ignore it.
}
1769};

1771/// Diagnostic consumer that forwards diagnostics along to an
1772/// existing, already-initialized diagnostic consumer.
1773///
1774class ForwardingDiagnosticConsumer : public DiagnosticConsumer {
DiagnosticConsumer &Target;

1777public:
ForwardingDiagnosticConsumer(DiagnosticConsumer &Target) : Target(Target) {}
~ForwardingDiagnosticConsumer() override;

void HandleDiagnostic(DiagnosticsEngine::Level DiagLevel,
                      const Diagnostic &Info) override;
void clear() override;

bool IncludeInDiagnosticCounts() const override;
1786};

1788// Struct used for sending info about how a type should be printed.
1789struct TemplateDiffTypes {
intptr_t FromType;
intptr_t ToType;
unsigned PrintTree : 1;
unsigned PrintFromType : 1;
unsigned ElideType : 1;
unsigned ShowColors : 1;

// The printer sets this variable to true if the template diff was used.
unsigned TemplateDiffUsed : 1;
1799};

1801/// Special character that the diagnostic printer will use to toggle the bold
1802/// attribute.  The character itself will be not be printed.
1803const char ToggleHighlight = 127;

1805/// ProcessWarningOptions - Initialize the diagnostic client and process the
1806/// warning options specified on the command line.
1807void ProcessWarningOptions(DiagnosticsEngine &Diags,
                         const DiagnosticOptions &Opts,
                         bool ReportDiags = true);

1811} // namespace clang

1813#endif // LLVM_CLANG_BASIC_DIAGNOSTIC_H