PPDirectives.cpp revision 3e25b990f1e2ba2a9a63dde5fd111492a7f6194a
1a3b605ef0d535c5c5ac3f00e1e2d46fa7336d26cChris Lattner//===--- PPDirectives.cpp - Directive Handling for Preprocessor -----------===// 2141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner// 3141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner// The LLVM Compiler Infrastructure 4141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner// 5141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner// This file is distributed under the University of Illinois Open Source 6141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner// License. See LICENSE.TXT for details. 7141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner// 8141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner//===----------------------------------------------------------------------===// 9dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// 10dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// \file 11dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// \brief Implements # directive processing for the Preprocessor. 12dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// 13141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner//===----------------------------------------------------------------------===// 14141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 15141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner#include "clang/Lex/Preprocessor.h" 1655fc873017f10f6f566b182b70f6fc22aefa3464Chandler Carruth#include "clang/Basic/FileManager.h" 1755fc873017f10f6f566b182b70f6fc22aefa3464Chandler Carruth#include "clang/Basic/SourceManager.h" 1855fc873017f10f6f566b182b70f6fc22aefa3464Chandler Carruth#include "clang/Lex/CodeCompletionHandler.h" 19141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner#include "clang/Lex/HeaderSearch.h" 20500d3297d2a21edeac4d46cbcbe21bc2352c2a28Chris Lattner#include "clang/Lex/LexDiagnostic.h" 2155fc873017f10f6f566b182b70f6fc22aefa3464Chandler Carruth#include "clang/Lex/LiteralSupport.h" 2255fc873017f10f6f566b182b70f6fc22aefa3464Chandler Carruth#include "clang/Lex/MacroInfo.h" 23fba18aa8f2cd1994dc65e8cb9f4be201c560dc0bDouglas Gregor#include "clang/Lex/ModuleLoader.h" 2480c60f72848896f867f6b7e664e7060d9e78f019Douglas Gregor#include "clang/Lex/Pragma.h" 25359cc4475487ea0a660b3e8918334a2866e71c66Chris Lattner#include "llvm/ADT/APInt.h" 26e3a8256a9c1f2f1037fcb844ed7666759124a852Douglas Gregor#include "llvm/Support/ErrorHandling.h" 2731672b1745195d709b641f1c0f44e203742fa73bAaron Ballman#include "llvm/Support/SaveAndRestore.h" 28141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattnerusing namespace clang; 29141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 30141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner//===----------------------------------------------------------------------===// 31141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner// Utility Methods for Preprocessor Directive Handling. 32141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner//===----------------------------------------------------------------------===// 33141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 34f47724bf78299c7a50f008e0443c5f9f9f279ddcChris LattnerMacroInfo *Preprocessor::AllocateMacroInfo() { 359714a2385cb66b6efa373fc668641de602dd9adbTed Kremenek MacroInfoChain *MIChain; 361eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 379714a2385cb66b6efa373fc668641de602dd9adbTed Kremenek if (MICache) { 389714a2385cb66b6efa373fc668641de602dd9adbTed Kremenek MIChain = MICache; 399714a2385cb66b6efa373fc668641de602dd9adbTed Kremenek MICache = MICache->Next; 40af8fa25c0d4e0540952a50bbd06dc1558954ccd9Ted Kremenek } 419714a2385cb66b6efa373fc668641de602dd9adbTed Kremenek else { 429714a2385cb66b6efa373fc668641de602dd9adbTed Kremenek MIChain = BP.Allocate<MacroInfoChain>(); 439714a2385cb66b6efa373fc668641de602dd9adbTed Kremenek } 449714a2385cb66b6efa373fc668641de602dd9adbTed Kremenek 459714a2385cb66b6efa373fc668641de602dd9adbTed Kremenek MIChain->Next = MIChainHead; 469714a2385cb66b6efa373fc668641de602dd9adbTed Kremenek MIChain->Prev = 0; 479714a2385cb66b6efa373fc668641de602dd9adbTed Kremenek if (MIChainHead) 489714a2385cb66b6efa373fc668641de602dd9adbTed Kremenek MIChainHead->Prev = MIChain; 499714a2385cb66b6efa373fc668641de602dd9adbTed Kremenek MIChainHead = MIChain; 509714a2385cb66b6efa373fc668641de602dd9adbTed Kremenek 519714a2385cb66b6efa373fc668641de602dd9adbTed Kremenek return &(MIChain->MI); 52f47724bf78299c7a50f008e0443c5f9f9f279ddcChris Lattner} 53f47724bf78299c7a50f008e0443c5f9f9f279ddcChris Lattner 54f47724bf78299c7a50f008e0443c5f9f9f279ddcChris LattnerMacroInfo *Preprocessor::AllocateMacroInfo(SourceLocation L) { 55f47724bf78299c7a50f008e0443c5f9f9f279ddcChris Lattner MacroInfo *MI = AllocateMacroInfo(); 560ea76727ae91bca918a8414ed85b530eddcfedebTed Kremenek new (MI) MacroInfo(L); 570ea76727ae91bca918a8414ed85b530eddcfedebTed Kremenek return MI; 580ea76727ae91bca918a8414ed85b530eddcfedebTed Kremenek} 590ea76727ae91bca918a8414ed85b530eddcfedebTed Kremenek 60baa74bd3968028d8e5b10ee9b50d0dceb41e85a9Argyrios KyrtzidisMacroInfo *Preprocessor::AllocateDeserializedMacroInfo(SourceLocation L, 61baa74bd3968028d8e5b10ee9b50d0dceb41e85a9Argyrios Kyrtzidis unsigned SubModuleID) { 62baa74bd3968028d8e5b10ee9b50d0dceb41e85a9Argyrios Kyrtzidis LLVM_STATIC_ASSERT(llvm::AlignOf<MacroInfo>::Alignment >= sizeof(SubModuleID), 63baa74bd3968028d8e5b10ee9b50d0dceb41e85a9Argyrios Kyrtzidis "alignment for MacroInfo is less than the ID"); 643e25b990f1e2ba2a9a63dde5fd111492a7f6194aArgyrios Kyrtzidis DeserializedMacroInfoChain *MIChain = 653e25b990f1e2ba2a9a63dde5fd111492a7f6194aArgyrios Kyrtzidis BP.Allocate<DeserializedMacroInfoChain>(); 663e25b990f1e2ba2a9a63dde5fd111492a7f6194aArgyrios Kyrtzidis MIChain->Next = DeserialMIChainHead; 673e25b990f1e2ba2a9a63dde5fd111492a7f6194aArgyrios Kyrtzidis DeserialMIChainHead = MIChain; 683e25b990f1e2ba2a9a63dde5fd111492a7f6194aArgyrios Kyrtzidis 693e25b990f1e2ba2a9a63dde5fd111492a7f6194aArgyrios Kyrtzidis MacroInfo *MI = &MIChain->MI; 70baa74bd3968028d8e5b10ee9b50d0dceb41e85a9Argyrios Kyrtzidis new (MI) MacroInfo(L); 71baa74bd3968028d8e5b10ee9b50d0dceb41e85a9Argyrios Kyrtzidis MI->FromASTFile = true; 72baa74bd3968028d8e5b10ee9b50d0dceb41e85a9Argyrios Kyrtzidis MI->setOwningModuleID(SubModuleID); 73baa74bd3968028d8e5b10ee9b50d0dceb41e85a9Argyrios Kyrtzidis return MI; 74baa74bd3968028d8e5b10ee9b50d0dceb41e85a9Argyrios Kyrtzidis} 75baa74bd3968028d8e5b10ee9b50d0dceb41e85a9Argyrios Kyrtzidis 76c56fff7fd231aebf4b152f60f8f11ef91835c48aArgyrios KyrtzidisDefMacroDirective * 77c56fff7fd231aebf4b152f60f8f11ef91835c48aArgyrios KyrtzidisPreprocessor::AllocateDefMacroDirective(MacroInfo *MI, SourceLocation Loc, 78c56fff7fd231aebf4b152f60f8f11ef91835c48aArgyrios Kyrtzidis bool isImported) { 79c56fff7fd231aebf4b152f60f8f11ef91835c48aArgyrios Kyrtzidis DefMacroDirective *MD = BP.Allocate<DefMacroDirective>(); 80c56fff7fd231aebf4b152f60f8f11ef91835c48aArgyrios Kyrtzidis new (MD) DefMacroDirective(MI, Loc, isImported); 81c56fff7fd231aebf4b152f60f8f11ef91835c48aArgyrios Kyrtzidis return MD; 82c56fff7fd231aebf4b152f60f8f11ef91835c48aArgyrios Kyrtzidis} 83c56fff7fd231aebf4b152f60f8f11ef91835c48aArgyrios Kyrtzidis 84c56fff7fd231aebf4b152f60f8f11ef91835c48aArgyrios KyrtzidisUndefMacroDirective * 85c56fff7fd231aebf4b152f60f8f11ef91835c48aArgyrios KyrtzidisPreprocessor::AllocateUndefMacroDirective(SourceLocation UndefLoc) { 86c56fff7fd231aebf4b152f60f8f11ef91835c48aArgyrios Kyrtzidis UndefMacroDirective *MD = BP.Allocate<UndefMacroDirective>(); 87c56fff7fd231aebf4b152f60f8f11ef91835c48aArgyrios Kyrtzidis new (MD) UndefMacroDirective(UndefLoc); 88c56fff7fd231aebf4b152f60f8f11ef91835c48aArgyrios Kyrtzidis return MD; 89c56fff7fd231aebf4b152f60f8f11ef91835c48aArgyrios Kyrtzidis} 90c56fff7fd231aebf4b152f60f8f11ef91835c48aArgyrios Kyrtzidis 91c56fff7fd231aebf4b152f60f8f11ef91835c48aArgyrios KyrtzidisVisibilityMacroDirective * 92c56fff7fd231aebf4b152f60f8f11ef91835c48aArgyrios KyrtzidisPreprocessor::AllocateVisibilityMacroDirective(SourceLocation Loc, 93c56fff7fd231aebf4b152f60f8f11ef91835c48aArgyrios Kyrtzidis bool isPublic) { 94c56fff7fd231aebf4b152f60f8f11ef91835c48aArgyrios Kyrtzidis VisibilityMacroDirective *MD = BP.Allocate<VisibilityMacroDirective>(); 95c56fff7fd231aebf4b152f60f8f11ef91835c48aArgyrios Kyrtzidis new (MD) VisibilityMacroDirective(Loc, isPublic); 969818a1d443e97677dd3422305de9cc2b1fb2a8c1Argyrios Kyrtzidis return MD; 97f47724bf78299c7a50f008e0443c5f9f9f279ddcChris Lattner} 98f47724bf78299c7a50f008e0443c5f9f9f279ddcChris Lattner 99dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// \brief Release the specified MacroInfo to be reused for allocating 100dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// new MacroInfo objects. 1012c1ab9079cb117dc0470ab423fe0bc5177546339Chris Lattnervoid Preprocessor::ReleaseMacroInfo(MacroInfo *MI) { 1029714a2385cb66b6efa373fc668641de602dd9adbTed Kremenek MacroInfoChain *MIChain = (MacroInfoChain*) MI; 1039714a2385cb66b6efa373fc668641de602dd9adbTed Kremenek if (MacroInfoChain *Prev = MIChain->Prev) { 1049714a2385cb66b6efa373fc668641de602dd9adbTed Kremenek MacroInfoChain *Next = MIChain->Next; 1059714a2385cb66b6efa373fc668641de602dd9adbTed Kremenek Prev->Next = Next; 1069714a2385cb66b6efa373fc668641de602dd9adbTed Kremenek if (Next) 1079714a2385cb66b6efa373fc668641de602dd9adbTed Kremenek Next->Prev = Prev; 1089714a2385cb66b6efa373fc668641de602dd9adbTed Kremenek } 1099714a2385cb66b6efa373fc668641de602dd9adbTed Kremenek else { 1109714a2385cb66b6efa373fc668641de602dd9adbTed Kremenek assert(MIChainHead == MIChain); 1119714a2385cb66b6efa373fc668641de602dd9adbTed Kremenek MIChainHead = MIChain->Next; 1129714a2385cb66b6efa373fc668641de602dd9adbTed Kremenek MIChainHead->Prev = 0; 1139714a2385cb66b6efa373fc668641de602dd9adbTed Kremenek } 1149714a2385cb66b6efa373fc668641de602dd9adbTed Kremenek MIChain->Next = MICache; 1159714a2385cb66b6efa373fc668641de602dd9adbTed Kremenek MICache = MIChain; 1160301b3ff132a4d986c092d161cb77d74b04cd2a6Chris Lattner 1179714a2385cb66b6efa373fc668641de602dd9adbTed Kremenek MI->Destroy(); 1189714a2385cb66b6efa373fc668641de602dd9adbTed Kremenek} 1190301b3ff132a4d986c092d161cb77d74b04cd2a6Chris Lattner 120dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// \brief Read and discard all tokens remaining on the current line until 121dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// the tok::eod token is found. 122141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattnervoid Preprocessor::DiscardUntilEndOfDirective() { 123141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner Token Tmp; 124141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner do { 125141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner LexUnexpandedToken(Tmp); 126a5ef584fd3d18da0c98342b4b6453948b7eb30d3Peter Collingbourne assert(Tmp.isNot(tok::eof) && "EOF seen while discarding directive tokens"); 12784021556baceb76eedf7d44be8ba71d9b8cfaccePeter Collingbourne } while (Tmp.isNot(tok::eod)); 128141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner} 129141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 130dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// \brief Lex and validate a macro name, which occurs after a 131dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// \#define or \#undef. 132dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// 133dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// This sets the token kind to eod and discards the rest 134dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// of the macro line if the macro name is invalid. \p isDefineUndef is 1 if 135dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// this is due to a a \#define, 2 if \#undef directive, 0 if it is something 136dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// else (e.g. \#ifdef). 137141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattnervoid Preprocessor::ReadMacroName(Token &MacroNameTok, char isDefineUndef) { 138141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Read the token, don't allow macro expansion on it. 139141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner LexUnexpandedToken(MacroNameTok); 1401eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 1411fbb447e9d43c2c676e94081fbfee7eb6cbe933bDouglas Gregor if (MacroNameTok.is(tok::code_completion)) { 1421fbb447e9d43c2c676e94081fbfee7eb6cbe933bDouglas Gregor if (CodeComplete) 1431fbb447e9d43c2c676e94081fbfee7eb6cbe933bDouglas Gregor CodeComplete->CodeCompleteMacroName(isDefineUndef == 1); 1447d100872341f233c81e1d7b72b40457e62c36862Argyrios Kyrtzidis setCodeCompletionReached(); 1451fbb447e9d43c2c676e94081fbfee7eb6cbe933bDouglas Gregor LexUnexpandedToken(MacroNameTok); 1461fbb447e9d43c2c676e94081fbfee7eb6cbe933bDouglas Gregor } 1471fbb447e9d43c2c676e94081fbfee7eb6cbe933bDouglas Gregor 148141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Missing macro name? 14984021556baceb76eedf7d44be8ba71d9b8cfaccePeter Collingbourne if (MacroNameTok.is(tok::eod)) { 1503692b09faa9fe346f39bc922db6dce48cdcc3f63Chris Lattner Diag(MacroNameTok, diag::err_pp_missing_macro_name); 1513692b09faa9fe346f39bc922db6dce48cdcc3f63Chris Lattner return; 1523692b09faa9fe346f39bc922db6dce48cdcc3f63Chris Lattner } 1531eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 154141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner IdentifierInfo *II = MacroNameTok.getIdentifierInfo(); 155141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner if (II == 0) { 156453091cc2082e207ea2c2dda645a9bc01b37fb0cDouglas Gregor bool Invalid = false; 157453091cc2082e207ea2c2dda645a9bc01b37fb0cDouglas Gregor std::string Spelling = getSpelling(MacroNameTok, &Invalid); 158453091cc2082e207ea2c2dda645a9bc01b37fb0cDouglas Gregor if (Invalid) 159453091cc2082e207ea2c2dda645a9bc01b37fb0cDouglas Gregor return; 160f4fb07ed4dfd144a39d904fc77b3b0bab580eb2eNico Weber 1619485d2382c1e3833ccbed20a185f6ab96d4dd703Chris Lattner const IdentifierInfo &Info = Identifiers.get(Spelling); 162f4fb07ed4dfd144a39d904fc77b3b0bab580eb2eNico Weber 163f4fb07ed4dfd144a39d904fc77b3b0bab580eb2eNico Weber // Allow #defining |and| and friends in microsoft mode. 1644e4d08403ca5cfd4d558fa2936215d3a4e5a528dDavid Blaikie if (Info.isCPlusPlusOperatorKeyword() && getLangOpts().MicrosoftMode) { 165f4fb07ed4dfd144a39d904fc77b3b0bab580eb2eNico Weber MacroNameTok.setIdentifierInfo(getIdentifierInfo(Spelling)); 166f4fb07ed4dfd144a39d904fc77b3b0bab580eb2eNico Weber return; 167f4fb07ed4dfd144a39d904fc77b3b0bab580eb2eNico Weber } 168f4fb07ed4dfd144a39d904fc77b3b0bab580eb2eNico Weber 1699485d2382c1e3833ccbed20a185f6ab96d4dd703Chris Lattner if (Info.isCPlusPlusOperatorKeyword()) 170141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // C++ 2.5p2: Alternative tokens behave the same as its primary token 171141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // except for their spellings. 17256b05c8829efd13b7e5b333f8f587c71d025c67dChris Lattner Diag(MacroNameTok, diag::err_pp_operator_used_as_macro_name) << Spelling; 173141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner else 174141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner Diag(MacroNameTok, diag::err_pp_macro_not_identifier); 175141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Fall through on error. 176141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } else if (isDefineUndef && II->getPPKeywordID() == tok::pp_defined) { 177eed55e6061768c0faff62dda22c6edad9d286501Richard Smith // Error if defining "defined": C99 6.10.8/4, C++ [cpp.predefined]p4. 178141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner Diag(MacroNameTok, diag::err_defined_macro_name); 179eed55e6061768c0faff62dda22c6edad9d286501Richard Smith } else if (isDefineUndef == 2 && II->hasMacroDefinition() && 180141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner getMacroInfo(II)->isBuiltinMacro()) { 181eed55e6061768c0faff62dda22c6edad9d286501Richard Smith // Warn if undefining "__LINE__" and other builtins, per C99 6.10.8/4 182eed55e6061768c0faff62dda22c6edad9d286501Richard Smith // and C++ [cpp.predefined]p4], but allow it as an extension. 183eed55e6061768c0faff62dda22c6edad9d286501Richard Smith Diag(MacroNameTok, diag::ext_pp_undef_builtin_macro); 184eed55e6061768c0faff62dda22c6edad9d286501Richard Smith return; 185141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } else { 186141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Okay, we got a good identifier node. Return it. 187141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner return; 188141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } 1891eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 190141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Invalid macro name, read and discard the rest of the line. Then set the 19184021556baceb76eedf7d44be8ba71d9b8cfaccePeter Collingbourne // token kind to tok::eod. 19284021556baceb76eedf7d44be8ba71d9b8cfaccePeter Collingbourne MacroNameTok.setKind(tok::eod); 193141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner return DiscardUntilEndOfDirective(); 194141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner} 195141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 196dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// \brief Ensure that the next token is a tok::eod token. 197dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// 198dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// If not, emit a diagnostic and consume up until the eod. If EnableMacros is 199ab82f41b217ce588a9456c0b4411f219d3ed0df8Chris Lattner/// true, then we consider macros that expand to zero tokens as being ok. 200ab82f41b217ce588a9456c0b4411f219d3ed0df8Chris Lattnervoid Preprocessor::CheckEndOfDirective(const char *DirType, bool EnableMacros) { 201141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner Token Tmp; 202ab82f41b217ce588a9456c0b4411f219d3ed0df8Chris Lattner // Lex unexpanded tokens for most directives: macros might expand to zero 203ab82f41b217ce588a9456c0b4411f219d3ed0df8Chris Lattner // tokens, causing us to miss diagnosing invalid lines. Some directives (like 204ab82f41b217ce588a9456c0b4411f219d3ed0df8Chris Lattner // #line) allow empty macros. 205ab82f41b217ce588a9456c0b4411f219d3ed0df8Chris Lattner if (EnableMacros) 206ab82f41b217ce588a9456c0b4411f219d3ed0df8Chris Lattner Lex(Tmp); 207ab82f41b217ce588a9456c0b4411f219d3ed0df8Chris Lattner else 208ab82f41b217ce588a9456c0b4411f219d3ed0df8Chris Lattner LexUnexpandedToken(Tmp); 2091eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 210141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // There should be no tokens after the directive, but we allow them as an 211141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // extension. 212141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner while (Tmp.is(tok::comment)) // Skip comments in -C mode. 213141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner LexUnexpandedToken(Tmp); 2141eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 21584021556baceb76eedf7d44be8ba71d9b8cfaccePeter Collingbourne if (Tmp.isNot(tok::eod)) { 216959875a66d74d38b8f2d499662afb142d249bf3eChris Lattner // Add a fixit in GNU/C99/C++ mode. Don't offer a fixit for strict-C89, 217b2eb53d9fd973a1a02e05e67a3307b3efd12eff2Peter Collingbourne // or if this is a macro-style preprocessing directive, because it is more 218b2eb53d9fd973a1a02e05e67a3307b3efd12eff2Peter Collingbourne // trouble than it is worth to insert /**/ and check that there is no /**/ 219b2eb53d9fd973a1a02e05e67a3307b3efd12eff2Peter Collingbourne // in the range also. 220849b243d4065f56742a4677d6dc8277609a151f8Douglas Gregor FixItHint Hint; 2214e4d08403ca5cfd4d558fa2936215d3a4e5a528dDavid Blaikie if ((LangOpts.GNUMode || LangOpts.C99 || LangOpts.CPlusPlus) && 222b2eb53d9fd973a1a02e05e67a3307b3efd12eff2Peter Collingbourne !CurTokenLexer) 223849b243d4065f56742a4677d6dc8277609a151f8Douglas Gregor Hint = FixItHint::CreateInsertion(Tmp.getLocation(),"//"); 224849b243d4065f56742a4677d6dc8277609a151f8Douglas Gregor Diag(Tmp, diag::ext_pp_extra_tokens_at_eol) << DirType << Hint; 225141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner DiscardUntilEndOfDirective(); 226141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } 227141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner} 228141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 229141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 230141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 231dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// SkipExcludedConditionalBlock - We just read a \#if or related directive and 232dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// decided that the subsequent tokens are in the \#if'd out portion of the 233dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// file. Lex the rest of the file, until we see an \#endif. If 234141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner/// FoundNonSkipPortion is true, then we have already emitted code for part of 235dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// this \#if directive, so \#else/\#elif blocks should never be entered. 236dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// If ElseOk is true, then \#else directives are ok, if not, then we have 237dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// already seen one so a \#else directive is a duplicate. When this returns, 238dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// the caller can lex the first valid token. 239141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattnervoid Preprocessor::SkipExcludedConditionalBlock(SourceLocation IfTokenLoc, 240141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner bool FoundNonSkipPortion, 2416b4ff04dd22e7159887ea6c1bb8b1c01fc9c70a9Argyrios Kyrtzidis bool FoundElse, 2426b4ff04dd22e7159887ea6c1bb8b1c01fc9c70a9Argyrios Kyrtzidis SourceLocation ElseLoc) { 243141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner ++NumSkipped; 244f6452c5421c5db5a7ceff581525f286931d97f1aTed Kremenek assert(CurTokenLexer == 0 && CurPPLexer && "Lexing a macro, not a file?"); 245141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 24660e45d4c41479fb58ad14d97efd03418e8549509Ted Kremenek CurPPLexer->pushConditionalLevel(IfTokenLoc, /*isSkipping*/false, 247141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner FoundNonSkipPortion, FoundElse); 2481eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 249268ee7016a2811803989487c0ad3799486092c63Ted Kremenek if (CurPTHLexer) { 250268ee7016a2811803989487c0ad3799486092c63Ted Kremenek PTHSkipExcludedConditionalBlock(); 251268ee7016a2811803989487c0ad3799486092c63Ted Kremenek return; 252268ee7016a2811803989487c0ad3799486092c63Ted Kremenek } 2531eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 254141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Enter raw mode to disable identifier lookup (and thus macro expansion), 255141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // disabling warnings, etc. 25660e45d4c41479fb58ad14d97efd03418e8549509Ted Kremenek CurPPLexer->LexingRawMode = true; 257141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner Token Tok; 258141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner while (1) { 2592c6b193d574e0780ff0b8450ce1fde105f4881acChris Lattner CurLexer->Lex(Tok); 2601eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 261f44e854ed1e3aa86d2ed6d615ccd109d50ddcff9Douglas Gregor if (Tok.is(tok::code_completion)) { 262f44e854ed1e3aa86d2ed6d615ccd109d50ddcff9Douglas Gregor if (CodeComplete) 263f44e854ed1e3aa86d2ed6d615ccd109d50ddcff9Douglas Gregor CodeComplete->CodeCompleteInConditionalExclusion(); 2647d100872341f233c81e1d7b72b40457e62c36862Argyrios Kyrtzidis setCodeCompletionReached(); 265f44e854ed1e3aa86d2ed6d615ccd109d50ddcff9Douglas Gregor continue; 266f44e854ed1e3aa86d2ed6d615ccd109d50ddcff9Douglas Gregor } 267f44e854ed1e3aa86d2ed6d615ccd109d50ddcff9Douglas Gregor 268141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // If this is the end of the buffer, we have an error. 269141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner if (Tok.is(tok::eof)) { 270141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Emit errors for each unterminated conditional on the stack, including 271141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // the current one. 27260e45d4c41479fb58ad14d97efd03418e8549509Ted Kremenek while (!CurPPLexer->ConditionalStack.empty()) { 2737d100872341f233c81e1d7b72b40457e62c36862Argyrios Kyrtzidis if (CurLexer->getFileLoc() != CodeCompletionFileLoc) 2742d474ba9e8ae43a1a5a9f72718c0d79092b9453fDouglas Gregor Diag(CurPPLexer->ConditionalStack.back().IfLoc, 2752d474ba9e8ae43a1a5a9f72718c0d79092b9453fDouglas Gregor diag::err_pp_unterminated_conditional); 27660e45d4c41479fb58ad14d97efd03418e8549509Ted Kremenek CurPPLexer->ConditionalStack.pop_back(); 2771eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump } 2781eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 279141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Just return and let the caller lex after this #include. 280141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner break; 281141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } 2821eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 283141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // If this token is not a preprocessor directive, just skip it. 284141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner if (Tok.isNot(tok::hash) || !Tok.isAtStartOfLine()) 285141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner continue; 2861eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 287141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // We just parsed a # character at the start of a line, so we're in 288141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // directive mode. Tell the lexer this so any newlines we see will be 28984021556baceb76eedf7d44be8ba71d9b8cfaccePeter Collingbourne // converted into an EOD token (this terminates the macro). 29060e45d4c41479fb58ad14d97efd03418e8549509Ted Kremenek CurPPLexer->ParsingPreprocessorDirective = true; 291c7d1ca52ae1f33a105ad1be217304f74a34c45f3Jordan Rose if (CurLexer) CurLexer->SetKeepWhitespaceMode(false); 292141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 2931eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 294141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Read the next token, the directive flavor. 295141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner LexUnexpandedToken(Tok); 2961eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 297141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // If this isn't an identifier directive (e.g. is "# 1\n" or "#\n", or 298141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // something bogus), skip it. 299c4bf2b9afb7d47445a9dc6bc848657098a4e3851Abramo Bagnara if (Tok.isNot(tok::raw_identifier)) { 30060e45d4c41479fb58ad14d97efd03418e8549509Ted Kremenek CurPPLexer->ParsingPreprocessorDirective = false; 301141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Restore comment saving mode. 3026aad4a31b35df07fe818f193fcfd3c0197aea467Jordan Rose if (CurLexer) CurLexer->resetExtendedTokenMode(); 303141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner continue; 304141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } 305141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 306141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // If the first letter isn't i or e, it isn't intesting to us. We know that 307141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // this is safe in the face of spelling differences, because there is no way 308141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // to spell an i/e in a strange way that is another letter. Skipping this 309141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // allows us to avoid looking up the identifier info for #define/#undef and 310141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // other common directives. 311c4bf2b9afb7d47445a9dc6bc848657098a4e3851Abramo Bagnara const char *RawCharData = Tok.getRawIdentifierData(); 312c4bf2b9afb7d47445a9dc6bc848657098a4e3851Abramo Bagnara 313141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner char FirstChar = RawCharData[0]; 3141eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump if (FirstChar >= 'a' && FirstChar <= 'z' && 315141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner FirstChar != 'i' && FirstChar != 'e') { 31660e45d4c41479fb58ad14d97efd03418e8549509Ted Kremenek CurPPLexer->ParsingPreprocessorDirective = false; 317141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Restore comment saving mode. 3186aad4a31b35df07fe818f193fcfd3c0197aea467Jordan Rose if (CurLexer) CurLexer->resetExtendedTokenMode(); 319141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner continue; 320141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } 3211eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 322141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Get the identifier name without trigraphs or embedded newlines. Note 323141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // that we can't use Tok.getIdentifierInfo() because its lookup is disabled 324141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // when skipping. 325b939a4e8b471f6a5e996fa57b2fd9df30b59cb60Benjamin Kramer char DirectiveBuf[20]; 3265f9e272e632e951b1efe824cd16acb4d96077930Chris Lattner StringRef Directive; 327141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner if (!Tok.needsCleaning() && Tok.getLength() < 20) { 3285f9e272e632e951b1efe824cd16acb4d96077930Chris Lattner Directive = StringRef(RawCharData, Tok.getLength()); 329141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } else { 330141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner std::string DirectiveStr = getSpelling(Tok); 331b939a4e8b471f6a5e996fa57b2fd9df30b59cb60Benjamin Kramer unsigned IdLen = DirectiveStr.size(); 332141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner if (IdLen >= 20) { 33360e45d4c41479fb58ad14d97efd03418e8549509Ted Kremenek CurPPLexer->ParsingPreprocessorDirective = false; 334141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Restore comment saving mode. 3356aad4a31b35df07fe818f193fcfd3c0197aea467Jordan Rose if (CurLexer) CurLexer->resetExtendedTokenMode(); 336141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner continue; 337141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } 338b939a4e8b471f6a5e996fa57b2fd9df30b59cb60Benjamin Kramer memcpy(DirectiveBuf, &DirectiveStr[0], IdLen); 3395f9e272e632e951b1efe824cd16acb4d96077930Chris Lattner Directive = StringRef(DirectiveBuf, IdLen); 340141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } 3411eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 342b939a4e8b471f6a5e996fa57b2fd9df30b59cb60Benjamin Kramer if (Directive.startswith("if")) { 3435f9e272e632e951b1efe824cd16acb4d96077930Chris Lattner StringRef Sub = Directive.substr(2); 344b939a4e8b471f6a5e996fa57b2fd9df30b59cb60Benjamin Kramer if (Sub.empty() || // "if" 345b939a4e8b471f6a5e996fa57b2fd9df30b59cb60Benjamin Kramer Sub == "def" || // "ifdef" 346b939a4e8b471f6a5e996fa57b2fd9df30b59cb60Benjamin Kramer Sub == "ndef") { // "ifndef" 347141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // We know the entire #if/#ifdef/#ifndef block will be skipped, don't 348141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // bother parsing the condition. 349141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner DiscardUntilEndOfDirective(); 35060e45d4c41479fb58ad14d97efd03418e8549509Ted Kremenek CurPPLexer->pushConditionalLevel(Tok.getLocation(), /*wasskipping*/true, 351141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner /*foundnonskip*/false, 3523a1a8749cf6239f29e834f18a4e08638126678d9Chandler Carruth /*foundelse*/false); 353141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } 354b939a4e8b471f6a5e996fa57b2fd9df30b59cb60Benjamin Kramer } else if (Directive[0] == 'e') { 3555f9e272e632e951b1efe824cd16acb4d96077930Chris Lattner StringRef Sub = Directive.substr(1); 356b939a4e8b471f6a5e996fa57b2fd9df30b59cb60Benjamin Kramer if (Sub == "ndif") { // "endif" 357141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner PPConditionalInfo CondInfo; 358141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner CondInfo.WasSkipping = true; // Silence bogus warning. 35960e45d4c41479fb58ad14d97efd03418e8549509Ted Kremenek bool InCond = CurPPLexer->popConditionalLevel(CondInfo); 360c6ed729f669044f5072a49d79041f455d971ece3Jeffrey Yasskin (void)InCond; // Silence warning in no-asserts mode. 361141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner assert(!InCond && "Can't be skipping if not in a conditional!"); 3621eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 363141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // If we popped the outermost skipping block, we're done skipping! 364bb660666883de8b32999c1e5fbe3c32e2cafbdf6Argyrios Kyrtzidis if (!CondInfo.WasSkipping) { 365bc9e5582467e70ec38b9fc5d3605152e86e2a5f8Richard Smith // Restore the value of LexingRawMode so that trailing comments 366bc9e5582467e70ec38b9fc5d3605152e86e2a5f8Richard Smith // are handled correctly, if we've reached the outermost block. 367bc9e5582467e70ec38b9fc5d3605152e86e2a5f8Richard Smith CurPPLexer->LexingRawMode = false; 368986f317944658ecb1c8c279c1c8a0079396d42bfRichard Smith CheckEndOfDirective("endif"); 369bc9e5582467e70ec38b9fc5d3605152e86e2a5f8Richard Smith CurPPLexer->LexingRawMode = true; 370bb660666883de8b32999c1e5fbe3c32e2cafbdf6Argyrios Kyrtzidis if (Callbacks) 371bb660666883de8b32999c1e5fbe3c32e2cafbdf6Argyrios Kyrtzidis Callbacks->Endif(Tok.getLocation(), CondInfo.IfLoc); 372141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner break; 373986f317944658ecb1c8c279c1c8a0079396d42bfRichard Smith } else { 374986f317944658ecb1c8c279c1c8a0079396d42bfRichard Smith DiscardUntilEndOfDirective(); 375bb660666883de8b32999c1e5fbe3c32e2cafbdf6Argyrios Kyrtzidis } 376b939a4e8b471f6a5e996fa57b2fd9df30b59cb60Benjamin Kramer } else if (Sub == "lse") { // "else". 377141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // #else directive in a skipping conditional. If not in some other 378141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // skipping conditional, and if #else hasn't already been seen, enter it 379141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // as a non-skipping conditional. 38060e45d4c41479fb58ad14d97efd03418e8549509Ted Kremenek PPConditionalInfo &CondInfo = CurPPLexer->peekConditionalLevel(); 3811eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 382141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // If this is a #else with a #else before it, report the error. 383141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner if (CondInfo.FoundElse) Diag(Tok, diag::pp_err_else_after_else); 3841eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 385141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Note that we've seen a #else in this conditional. 386141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner CondInfo.FoundElse = true; 3871eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 388141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // If the conditional is at the top level, and the #if block wasn't 389141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // entered, enter the #else block now. 390141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner if (!CondInfo.WasSkipping && !CondInfo.FoundNonSkip) { 391141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner CondInfo.FoundNonSkip = true; 392bc9e5582467e70ec38b9fc5d3605152e86e2a5f8Richard Smith // Restore the value of LexingRawMode so that trailing comments 393bc9e5582467e70ec38b9fc5d3605152e86e2a5f8Richard Smith // are handled correctly. 394bc9e5582467e70ec38b9fc5d3605152e86e2a5f8Richard Smith CurPPLexer->LexingRawMode = false; 395e26224e61c8a3b607c73c52f2cd0344065d7b412Argyrios Kyrtzidis CheckEndOfDirective("else"); 396bc9e5582467e70ec38b9fc5d3605152e86e2a5f8Richard Smith CurPPLexer->LexingRawMode = true; 397bb660666883de8b32999c1e5fbe3c32e2cafbdf6Argyrios Kyrtzidis if (Callbacks) 398bb660666883de8b32999c1e5fbe3c32e2cafbdf6Argyrios Kyrtzidis Callbacks->Else(Tok.getLocation(), CondInfo.IfLoc); 399141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner break; 400e26224e61c8a3b607c73c52f2cd0344065d7b412Argyrios Kyrtzidis } else { 401e26224e61c8a3b607c73c52f2cd0344065d7b412Argyrios Kyrtzidis DiscardUntilEndOfDirective(); // C99 6.10p4. 402141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } 403b939a4e8b471f6a5e996fa57b2fd9df30b59cb60Benjamin Kramer } else if (Sub == "lif") { // "elif". 40460e45d4c41479fb58ad14d97efd03418e8549509Ted Kremenek PPConditionalInfo &CondInfo = CurPPLexer->peekConditionalLevel(); 405141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 406141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner bool ShouldEnter; 4073a1a8749cf6239f29e834f18a4e08638126678d9Chandler Carruth const SourceLocation ConditionalBegin = CurPPLexer->getSourceLocation(); 408141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // If this is in a skipping block or if we're already handled this #if 409141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // block, don't bother parsing the condition. 410141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner if (CondInfo.WasSkipping || CondInfo.FoundNonSkip) { 411141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner DiscardUntilEndOfDirective(); 412141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner ShouldEnter = false; 413141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } else { 414141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Restore the value of LexingRawMode so that identifiers are 415141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // looked up, etc, inside the #elif expression. 41660e45d4c41479fb58ad14d97efd03418e8549509Ted Kremenek assert(CurPPLexer->LexingRawMode && "We have to be skipping here!"); 41760e45d4c41479fb58ad14d97efd03418e8549509Ted Kremenek CurPPLexer->LexingRawMode = false; 418141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner IdentifierInfo *IfNDefMacro = 0; 419141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner ShouldEnter = EvaluateDirectiveExpression(IfNDefMacro); 42060e45d4c41479fb58ad14d97efd03418e8549509Ted Kremenek CurPPLexer->LexingRawMode = true; 421141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } 4223a1a8749cf6239f29e834f18a4e08638126678d9Chandler Carruth const SourceLocation ConditionalEnd = CurPPLexer->getSourceLocation(); 4231eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 424141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // If this is a #elif with a #else before it, report the error. 425141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner if (CondInfo.FoundElse) Diag(Tok, diag::pp_err_elif_after_else); 4261eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 427141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // If this condition is true, enter it! 428141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner if (ShouldEnter) { 429141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner CondInfo.FoundNonSkip = true; 430bb660666883de8b32999c1e5fbe3c32e2cafbdf6Argyrios Kyrtzidis if (Callbacks) 431bb660666883de8b32999c1e5fbe3c32e2cafbdf6Argyrios Kyrtzidis Callbacks->Elif(Tok.getLocation(), 432bb660666883de8b32999c1e5fbe3c32e2cafbdf6Argyrios Kyrtzidis SourceRange(ConditionalBegin, ConditionalEnd), 433bb660666883de8b32999c1e5fbe3c32e2cafbdf6Argyrios Kyrtzidis CondInfo.IfLoc); 434141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner break; 435141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } 436141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } 437141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } 4381eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 43960e45d4c41479fb58ad14d97efd03418e8549509Ted Kremenek CurPPLexer->ParsingPreprocessorDirective = false; 440141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Restore comment saving mode. 4416aad4a31b35df07fe818f193fcfd3c0197aea467Jordan Rose if (CurLexer) CurLexer->resetExtendedTokenMode(); 442141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } 443141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 444141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Finally, if we are out of the conditional (saw an #endif or ran off the end 445141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // of the file, just stop skipping and return to lexing whatever came after 446141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // the #if block. 44760e45d4c41479fb58ad14d97efd03418e8549509Ted Kremenek CurPPLexer->LexingRawMode = false; 4486b4ff04dd22e7159887ea6c1bb8b1c01fc9c70a9Argyrios Kyrtzidis 4496b4ff04dd22e7159887ea6c1bb8b1c01fc9c70a9Argyrios Kyrtzidis if (Callbacks) { 4506b4ff04dd22e7159887ea6c1bb8b1c01fc9c70a9Argyrios Kyrtzidis SourceLocation BeginLoc = ElseLoc.isValid() ? ElseLoc : IfTokenLoc; 4516b4ff04dd22e7159887ea6c1bb8b1c01fc9c70a9Argyrios Kyrtzidis Callbacks->SourceRangeSkipped(SourceRange(BeginLoc, Tok.getLocation())); 4526b4ff04dd22e7159887ea6c1bb8b1c01fc9c70a9Argyrios Kyrtzidis } 453141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner} 454141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 455268ee7016a2811803989487c0ad3799486092c63Ted Kremenekvoid Preprocessor::PTHSkipExcludedConditionalBlock() { 4561eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 4571eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump while (1) { 458268ee7016a2811803989487c0ad3799486092c63Ted Kremenek assert(CurPTHLexer); 459268ee7016a2811803989487c0ad3799486092c63Ted Kremenek assert(CurPTHLexer->LexingRawMode == false); 4601eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 461268ee7016a2811803989487c0ad3799486092c63Ted Kremenek // Skip to the next '#else', '#elif', or #endif. 462268ee7016a2811803989487c0ad3799486092c63Ted Kremenek if (CurPTHLexer->SkipBlock()) { 463268ee7016a2811803989487c0ad3799486092c63Ted Kremenek // We have reached an #endif. Both the '#' and 'endif' tokens 464268ee7016a2811803989487c0ad3799486092c63Ted Kremenek // have been consumed by the PTHLexer. Just pop off the condition level. 465268ee7016a2811803989487c0ad3799486092c63Ted Kremenek PPConditionalInfo CondInfo; 466268ee7016a2811803989487c0ad3799486092c63Ted Kremenek bool InCond = CurPTHLexer->popConditionalLevel(CondInfo); 467c6ed729f669044f5072a49d79041f455d971ece3Jeffrey Yasskin (void)InCond; // Silence warning in no-asserts mode. 468268ee7016a2811803989487c0ad3799486092c63Ted Kremenek assert(!InCond && "Can't be skipping if not in a conditional!"); 469268ee7016a2811803989487c0ad3799486092c63Ted Kremenek break; 470268ee7016a2811803989487c0ad3799486092c63Ted Kremenek } 4711eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 472268ee7016a2811803989487c0ad3799486092c63Ted Kremenek // We have reached a '#else' or '#elif'. Lex the next token to get 473268ee7016a2811803989487c0ad3799486092c63Ted Kremenek // the directive flavor. 474268ee7016a2811803989487c0ad3799486092c63Ted Kremenek Token Tok; 475268ee7016a2811803989487c0ad3799486092c63Ted Kremenek LexUnexpandedToken(Tok); 4761eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 477268ee7016a2811803989487c0ad3799486092c63Ted Kremenek // We can actually look up the IdentifierInfo here since we aren't in 478268ee7016a2811803989487c0ad3799486092c63Ted Kremenek // raw mode. 479268ee7016a2811803989487c0ad3799486092c63Ted Kremenek tok::PPKeywordKind K = Tok.getIdentifierInfo()->getPPKeywordID(); 480268ee7016a2811803989487c0ad3799486092c63Ted Kremenek 481268ee7016a2811803989487c0ad3799486092c63Ted Kremenek if (K == tok::pp_else) { 482268ee7016a2811803989487c0ad3799486092c63Ted Kremenek // #else: Enter the else condition. We aren't in a nested condition 483268ee7016a2811803989487c0ad3799486092c63Ted Kremenek // since we skip those. We're always in the one matching the last 484268ee7016a2811803989487c0ad3799486092c63Ted Kremenek // blocked we skipped. 485268ee7016a2811803989487c0ad3799486092c63Ted Kremenek PPConditionalInfo &CondInfo = CurPTHLexer->peekConditionalLevel(); 486268ee7016a2811803989487c0ad3799486092c63Ted Kremenek // Note that we've seen a #else in this conditional. 487268ee7016a2811803989487c0ad3799486092c63Ted Kremenek CondInfo.FoundElse = true; 4881eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 489268ee7016a2811803989487c0ad3799486092c63Ted Kremenek // If the #if block wasn't entered then enter the #else block now. 490268ee7016a2811803989487c0ad3799486092c63Ted Kremenek if (!CondInfo.FoundNonSkip) { 491268ee7016a2811803989487c0ad3799486092c63Ted Kremenek CondInfo.FoundNonSkip = true; 4921eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 49384021556baceb76eedf7d44be8ba71d9b8cfaccePeter Collingbourne // Scan until the eod token. 494e5680f3cd678014cf0872d34726dc804b0cbbdd4Ted Kremenek CurPTHLexer->ParsingPreprocessorDirective = true; 4958533bd5a32a12c51341e82d2aef083acbac7c04cDaniel Dunbar DiscardUntilEndOfDirective(); 496e5680f3cd678014cf0872d34726dc804b0cbbdd4Ted Kremenek CurPTHLexer->ParsingPreprocessorDirective = false; 4971eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 498268ee7016a2811803989487c0ad3799486092c63Ted Kremenek break; 499268ee7016a2811803989487c0ad3799486092c63Ted Kremenek } 5001eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 501268ee7016a2811803989487c0ad3799486092c63Ted Kremenek // Otherwise skip this block. 502268ee7016a2811803989487c0ad3799486092c63Ted Kremenek continue; 503268ee7016a2811803989487c0ad3799486092c63Ted Kremenek } 5041eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 505268ee7016a2811803989487c0ad3799486092c63Ted Kremenek assert(K == tok::pp_elif); 506268ee7016a2811803989487c0ad3799486092c63Ted Kremenek PPConditionalInfo &CondInfo = CurPTHLexer->peekConditionalLevel(); 507268ee7016a2811803989487c0ad3799486092c63Ted Kremenek 508268ee7016a2811803989487c0ad3799486092c63Ted Kremenek // If this is a #elif with a #else before it, report the error. 509268ee7016a2811803989487c0ad3799486092c63Ted Kremenek if (CondInfo.FoundElse) 510268ee7016a2811803989487c0ad3799486092c63Ted Kremenek Diag(Tok, diag::pp_err_elif_after_else); 5111eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 512268ee7016a2811803989487c0ad3799486092c63Ted Kremenek // If this is in a skipping block or if we're already handled this #if 5131eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump // block, don't bother parsing the condition. We just skip this block. 514268ee7016a2811803989487c0ad3799486092c63Ted Kremenek if (CondInfo.FoundNonSkip) 515268ee7016a2811803989487c0ad3799486092c63Ted Kremenek continue; 516268ee7016a2811803989487c0ad3799486092c63Ted Kremenek 517268ee7016a2811803989487c0ad3799486092c63Ted Kremenek // Evaluate the condition of the #elif. 518268ee7016a2811803989487c0ad3799486092c63Ted Kremenek IdentifierInfo *IfNDefMacro = 0; 519268ee7016a2811803989487c0ad3799486092c63Ted Kremenek CurPTHLexer->ParsingPreprocessorDirective = true; 520268ee7016a2811803989487c0ad3799486092c63Ted Kremenek bool ShouldEnter = EvaluateDirectiveExpression(IfNDefMacro); 521268ee7016a2811803989487c0ad3799486092c63Ted Kremenek CurPTHLexer->ParsingPreprocessorDirective = false; 522268ee7016a2811803989487c0ad3799486092c63Ted Kremenek 523268ee7016a2811803989487c0ad3799486092c63Ted Kremenek // If this condition is true, enter it! 524268ee7016a2811803989487c0ad3799486092c63Ted Kremenek if (ShouldEnter) { 525268ee7016a2811803989487c0ad3799486092c63Ted Kremenek CondInfo.FoundNonSkip = true; 526268ee7016a2811803989487c0ad3799486092c63Ted Kremenek break; 527268ee7016a2811803989487c0ad3799486092c63Ted Kremenek } 528268ee7016a2811803989487c0ad3799486092c63Ted Kremenek 529268ee7016a2811803989487c0ad3799486092c63Ted Kremenek // Otherwise, skip this block and go to the next one. 530268ee7016a2811803989487c0ad3799486092c63Ted Kremenek continue; 531268ee7016a2811803989487c0ad3799486092c63Ted Kremenek } 532268ee7016a2811803989487c0ad3799486092c63Ted Kremenek} 533268ee7016a2811803989487c0ad3799486092c63Ted Kremenek 534b5142bb7af5c70fffd09f05172a1379a35a9c29aChandler Carruthconst FileEntry *Preprocessor::LookupFile( 5355f9e272e632e951b1efe824cd16acb4d96077930Chris Lattner StringRef Filename, 536b5142bb7af5c70fffd09f05172a1379a35a9c29aChandler Carruth bool isAngled, 537b5142bb7af5c70fffd09f05172a1379a35a9c29aChandler Carruth const DirectoryLookup *FromDir, 538b5142bb7af5c70fffd09f05172a1379a35a9c29aChandler Carruth const DirectoryLookup *&CurDir, 5395f9e272e632e951b1efe824cd16acb4d96077930Chris Lattner SmallVectorImpl<char> *SearchPath, 540fba18aa8f2cd1994dc65e8cb9f4be201c560dc0bDouglas Gregor SmallVectorImpl<char> *RelativePath, 5411a4761edca58c6b559de825b9abfb66f7f1ba94aDouglas Gregor Module **SuggestedModule, 5421c2e9332fa69727425a3a2b912e36e2ab62083f8Douglas Gregor bool SkipCache) { 5431072509e126e70c85652ab0056bcabd72edff7e5Chris Lattner // If the header lookup mechanism may be relative to the current file, pass in 5441072509e126e70c85652ab0056bcabd72edff7e5Chris Lattner // info about where the current file is. 54510fe93d57c11f068aa4d78eb4ca7f60329818306Douglas Gregor const FileEntry *CurFileEnt = 0; 5461072509e126e70c85652ab0056bcabd72edff7e5Chris Lattner if (!FromDir) { 5472b2453a7d8fe732561795431f39ceb2b2a832d84Chris Lattner FileID FID = getCurrentFileLexer()->getFileID(); 54810fe93d57c11f068aa4d78eb4ca7f60329818306Douglas Gregor CurFileEnt = SourceMgr.getFileEntryForID(FID); 5491eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 550be5c64d7a765acaf9454e7a511233771472bf811Chris Lattner // If there is no file entry associated with this file, it must be the 551be5c64d7a765acaf9454e7a511233771472bf811Chris Lattner // predefines buffer. Any other file is not lexed with a normal lexer, so 55210fe93d57c11f068aa4d78eb4ca7f60329818306Douglas Gregor // it won't be scanned for preprocessor directives. If we have the 55310fe93d57c11f068aa4d78eb4ca7f60329818306Douglas Gregor // predefines buffer, resolve #include references (which come from the 55410fe93d57c11f068aa4d78eb4ca7f60329818306Douglas Gregor // -include command line argument) as if they came from the main file, this 55510fe93d57c11f068aa4d78eb4ca7f60329818306Douglas Gregor // affects file lookup etc. 55610fe93d57c11f068aa4d78eb4ca7f60329818306Douglas Gregor if (CurFileEnt == 0) { 557be5c64d7a765acaf9454e7a511233771472bf811Chris Lattner FID = SourceMgr.getMainFileID(); 558be5c64d7a765acaf9454e7a511233771472bf811Chris Lattner CurFileEnt = SourceMgr.getFileEntryForID(FID); 559be5c64d7a765acaf9454e7a511233771472bf811Chris Lattner } 5601072509e126e70c85652ab0056bcabd72edff7e5Chris Lattner } 5611eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 5621072509e126e70c85652ab0056bcabd72edff7e5Chris Lattner // Do a standard file entry lookup. 5631072509e126e70c85652ab0056bcabd72edff7e5Chris Lattner CurDir = CurDirLookup; 564b5142bb7af5c70fffd09f05172a1379a35a9c29aChandler Carruth const FileEntry *FE = HeaderInfo.LookupFile( 5657412494982c8b50c90961302c3a718633b2c3ab7Manuel Klimek Filename, isAngled, FromDir, CurDir, CurFileEnt, 5661c2e9332fa69727425a3a2b912e36e2ab62083f8Douglas Gregor SearchPath, RelativePath, SuggestedModule, SkipCache); 567f45b646244705410866d62f1d8bf017a047ed662Chris Lattner if (FE) return FE; 5681eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 5691072509e126e70c85652ab0056bcabd72edff7e5Chris Lattner // Otherwise, see if this is a subframework header. If so, this is relative 5701072509e126e70c85652ab0056bcabd72edff7e5Chris Lattner // to one of the headers on the #include stack. Walk the list of the current 5711072509e126e70c85652ab0056bcabd72edff7e5Chris Lattner // headers on the #include stack and pass them to HeaderInfo. 57281d24e135c60dcbe421864e6a4334ba99b8fe7ecTed Kremenek if (IsFileLexer()) { 57341938c8493b4380df738263166b746eacb33c309Ted Kremenek if ((CurFileEnt = SourceMgr.getFileEntryForID(CurPPLexer->getFileID()))) 574b5142bb7af5c70fffd09f05172a1379a35a9c29aChandler Carruth if ((FE = HeaderInfo.LookupSubframeworkHeader(Filename, CurFileEnt, 5751b58c74af272a1d8228b8161c93a8a018456098eDouglas Gregor SearchPath, RelativePath, 5761b58c74af272a1d8228b8161c93a8a018456098eDouglas Gregor SuggestedModule))) 5771072509e126e70c85652ab0056bcabd72edff7e5Chris Lattner return FE; 5781072509e126e70c85652ab0056bcabd72edff7e5Chris Lattner } 5791eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 5801072509e126e70c85652ab0056bcabd72edff7e5Chris Lattner for (unsigned i = 0, e = IncludeMacroStack.size(); i != e; ++i) { 5811072509e126e70c85652ab0056bcabd72edff7e5Chris Lattner IncludeStackInfo &ISEntry = IncludeMacroStack[e-i-1]; 58281d24e135c60dcbe421864e6a4334ba99b8fe7ecTed Kremenek if (IsFileLexer(ISEntry)) { 5831eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump if ((CurFileEnt = 58441938c8493b4380df738263166b746eacb33c309Ted Kremenek SourceMgr.getFileEntryForID(ISEntry.ThePPLexer->getFileID()))) 5857412494982c8b50c90961302c3a718633b2c3ab7Manuel Klimek if ((FE = HeaderInfo.LookupSubframeworkHeader( 5861b58c74af272a1d8228b8161c93a8a018456098eDouglas Gregor Filename, CurFileEnt, SearchPath, RelativePath, 5871b58c74af272a1d8228b8161c93a8a018456098eDouglas Gregor SuggestedModule))) 5881072509e126e70c85652ab0056bcabd72edff7e5Chris Lattner return FE; 5891072509e126e70c85652ab0056bcabd72edff7e5Chris Lattner } 5901072509e126e70c85652ab0056bcabd72edff7e5Chris Lattner } 5911eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 5921072509e126e70c85652ab0056bcabd72edff7e5Chris Lattner // Otherwise, we really couldn't find the file. 5931072509e126e70c85652ab0056bcabd72edff7e5Chris Lattner return 0; 5941072509e126e70c85652ab0056bcabd72edff7e5Chris Lattner} 5951072509e126e70c85652ab0056bcabd72edff7e5Chris Lattner 596141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 597141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner//===----------------------------------------------------------------------===// 598141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner// Preprocessor Directive Handling. 599141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner//===----------------------------------------------------------------------===// 600141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 6018c0b3787e7ccc7978b42dfbb84da2b802c743a5dDavid Blaikieclass Preprocessor::ResetMacroExpansionHelper { 6028c0b3787e7ccc7978b42dfbb84da2b802c743a5dDavid Blaikiepublic: 6038c0b3787e7ccc7978b42dfbb84da2b802c743a5dDavid Blaikie ResetMacroExpansionHelper(Preprocessor *pp) 6048c0b3787e7ccc7978b42dfbb84da2b802c743a5dDavid Blaikie : PP(pp), save(pp->DisableMacroExpansion) { 6058c0b3787e7ccc7978b42dfbb84da2b802c743a5dDavid Blaikie if (pp->MacroExpansionInDirectivesOverride) 6068c0b3787e7ccc7978b42dfbb84da2b802c743a5dDavid Blaikie pp->DisableMacroExpansion = false; 6078c0b3787e7ccc7978b42dfbb84da2b802c743a5dDavid Blaikie } 6088c0b3787e7ccc7978b42dfbb84da2b802c743a5dDavid Blaikie ~ResetMacroExpansionHelper() { 6098c0b3787e7ccc7978b42dfbb84da2b802c743a5dDavid Blaikie PP->DisableMacroExpansion = save; 6108c0b3787e7ccc7978b42dfbb84da2b802c743a5dDavid Blaikie } 6118c0b3787e7ccc7978b42dfbb84da2b802c743a5dDavid Blaikieprivate: 6128c0b3787e7ccc7978b42dfbb84da2b802c743a5dDavid Blaikie Preprocessor *PP; 6138c0b3787e7ccc7978b42dfbb84da2b802c743a5dDavid Blaikie bool save; 6148c0b3787e7ccc7978b42dfbb84da2b802c743a5dDavid Blaikie}; 6158c0b3787e7ccc7978b42dfbb84da2b802c743a5dDavid Blaikie 616141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner/// HandleDirective - This callback is invoked when the lexer sees a # token 6171eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump/// at the start of a line. This consumes the directive, modifies the 618141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner/// lexer/preprocessor state, and advances the lexer(s) so that the next token 619141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner/// read is the correct one. 620141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattnervoid Preprocessor::HandleDirective(Token &Result) { 621141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // FIXME: Traditional: # with whitespace before it not recognized by K&R? 6221eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 623141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // We just parsed a # character at the start of a line, so we're in directive 624141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // mode. Tell the lexer this so any newlines we see will be converted into an 62584021556baceb76eedf7d44be8ba71d9b8cfaccePeter Collingbourne // EOD token (which terminates the directive). 62660e45d4c41479fb58ad14d97efd03418e8549509Ted Kremenek CurPPLexer->ParsingPreprocessorDirective = true; 6276aad4a31b35df07fe818f193fcfd3c0197aea467Jordan Rose if (CurLexer) CurLexer->SetKeepWhitespaceMode(false); 6281eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 629141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner ++NumDirectives; 630193575455e00eca03fd7177f60e3f2e6263cb661Kovarththanan Rajaratnam 631141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // We are about to read a token. For the multiple-include optimization FA to 6321eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump // work, we have to remember if we had read any tokens *before* this 633141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // pp-directive. 6341d9c54df56391ac4740db27d551782e81189cb51Chris Lattner bool ReadAnyTokensBeforeDirective =CurPPLexer->MIOpt.getHasReadAnyTokensVal(); 6351eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 63642aa16cccb3d6cd4195ccff9c32d8cb50a25a094Chris Lattner // Save the '#' token in case we need to return it later. 63742aa16cccb3d6cd4195ccff9c32d8cb50a25a094Chris Lattner Token SavedHash = Result; 6381eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 639141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Read the next token, the directive flavor. This isn't expanded due to 640141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // C99 6.10.3p8. 641141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner LexUnexpandedToken(Result); 6421eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 643141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // C99 6.10.3p11: Is this preprocessor directive in macro invocation? e.g.: 644141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // #define A(x) #x 645141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // A(abc 646141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // #warning blah 647141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // def) 648a3ca4d655974ad66e432a6c78dd08b277a639edfRichard Smith // If so, the user is relying on undefined behavior, emit a diagnostic. Do 649a3ca4d655974ad66e432a6c78dd08b277a639edfRichard Smith // not support this for #include-like directives, since that can result in 650a3ca4d655974ad66e432a6c78dd08b277a639edfRichard Smith // terrible diagnostics, and does not work in GCC. 651a3ca4d655974ad66e432a6c78dd08b277a639edfRichard Smith if (InMacroArgs) { 652a3ca4d655974ad66e432a6c78dd08b277a639edfRichard Smith if (IdentifierInfo *II = Result.getIdentifierInfo()) { 653a3ca4d655974ad66e432a6c78dd08b277a639edfRichard Smith switch (II->getPPKeywordID()) { 654a3ca4d655974ad66e432a6c78dd08b277a639edfRichard Smith case tok::pp_include: 655a3ca4d655974ad66e432a6c78dd08b277a639edfRichard Smith case tok::pp_import: 656a3ca4d655974ad66e432a6c78dd08b277a639edfRichard Smith case tok::pp_include_next: 657a3ca4d655974ad66e432a6c78dd08b277a639edfRichard Smith case tok::pp___include_macros: 658a3ca4d655974ad66e432a6c78dd08b277a639edfRichard Smith Diag(Result, diag::err_embedded_include) << II->getName(); 659a3ca4d655974ad66e432a6c78dd08b277a639edfRichard Smith DiscardUntilEndOfDirective(); 660a3ca4d655974ad66e432a6c78dd08b277a639edfRichard Smith return; 661a3ca4d655974ad66e432a6c78dd08b277a639edfRichard Smith default: 662a3ca4d655974ad66e432a6c78dd08b277a639edfRichard Smith break; 663a3ca4d655974ad66e432a6c78dd08b277a639edfRichard Smith } 664a3ca4d655974ad66e432a6c78dd08b277a639edfRichard Smith } 665141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner Diag(Result, diag::ext_embedded_directive); 666a3ca4d655974ad66e432a6c78dd08b277a639edfRichard Smith } 6671eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 6688c0b3787e7ccc7978b42dfbb84da2b802c743a5dDavid Blaikie // Temporarily enable macro expansion if set so 6698c0b3787e7ccc7978b42dfbb84da2b802c743a5dDavid Blaikie // and reset to previous state when returning from this function. 6708c0b3787e7ccc7978b42dfbb84da2b802c743a5dDavid Blaikie ResetMacroExpansionHelper helper(this); 6718c0b3787e7ccc7978b42dfbb84da2b802c743a5dDavid Blaikie 672141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner switch (Result.getKind()) { 67384021556baceb76eedf7d44be8ba71d9b8cfaccePeter Collingbourne case tok::eod: 674141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner return; // null directive. 675f44e854ed1e3aa86d2ed6d615ccd109d50ddcff9Douglas Gregor case tok::code_completion: 676f44e854ed1e3aa86d2ed6d615ccd109d50ddcff9Douglas Gregor if (CodeComplete) 677f44e854ed1e3aa86d2ed6d615ccd109d50ddcff9Douglas Gregor CodeComplete->CodeCompleteDirective( 678f44e854ed1e3aa86d2ed6d615ccd109d50ddcff9Douglas Gregor CurPPLexer->getConditionalStackDepth() > 0); 6797d100872341f233c81e1d7b72b40457e62c36862Argyrios Kyrtzidis setCodeCompletionReached(); 680f44e854ed1e3aa86d2ed6d615ccd109d50ddcff9Douglas Gregor return; 681478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner case tok::numeric_constant: // # 7 GNU line marker directive. 6824e4d08403ca5cfd4d558fa2936215d3a4e5a528dDavid Blaikie if (getLangOpts().AsmPreprocessor) 6835f607c4b75abeedded11eff079dee73561d98203Chris Lattner break; // # 4 is not a preprocessor directive in .S files. 684478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner return HandleDigitDirective(Result); 685141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner default: 686141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner IdentifierInfo *II = Result.getIdentifierInfo(); 687141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner if (II == 0) break; // Not an identifier. 6881eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 689141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Ask what the preprocessor keyword ID is. 690141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner switch (II->getPPKeywordID()) { 691141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner default: break; 692141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // C99 6.10.1 - Conditional Inclusion. 693141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner case tok::pp_if: 694141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner return HandleIfDirective(Result, ReadAnyTokensBeforeDirective); 695141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner case tok::pp_ifdef: 696141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner return HandleIfdefDirective(Result, false, true/*not valid for miopt*/); 697141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner case tok::pp_ifndef: 698141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner return HandleIfdefDirective(Result, true, ReadAnyTokensBeforeDirective); 699141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner case tok::pp_elif: 700141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner return HandleElifDirective(Result); 701141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner case tok::pp_else: 702141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner return HandleElseDirective(Result); 703141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner case tok::pp_endif: 704141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner return HandleEndifDirective(Result); 7051eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 706141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // C99 6.10.2 - Source File Inclusion. 707141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner case tok::pp_include: 708ecdcb883cbc6bb4a2445dc6f02d58d9bdb54a0edDouglas Gregor // Handle #include. 709ecdcb883cbc6bb4a2445dc6f02d58d9bdb54a0edDouglas Gregor return HandleIncludeDirective(SavedHash.getLocation(), Result); 710b8e240ed8b8f58c7b7fe82776bd6147b437f5d53Chris Lattner case tok::pp___include_macros: 711ecdcb883cbc6bb4a2445dc6f02d58d9bdb54a0edDouglas Gregor // Handle -imacros. 712ecdcb883cbc6bb4a2445dc6f02d58d9bdb54a0edDouglas Gregor return HandleIncludeMacrosDirective(SavedHash.getLocation(), Result); 7131eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 714141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // C99 6.10.3 - Macro Replacement. 715141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner case tok::pp_define: 716141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner return HandleDefineDirective(Result); 717141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner case tok::pp_undef: 718141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner return HandleUndefDirective(Result); 719141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 720141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // C99 6.10.4 - Line Control. 721141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner case tok::pp_line: 722359cc4475487ea0a660b3e8918334a2866e71c66Chris Lattner return HandleLineDirective(Result); 7231eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 724141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // C99 6.10.5 - Error Directive. 725141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner case tok::pp_error: 726141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner return HandleUserDiagnosticDirective(Result, false); 7271eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 728141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // C99 6.10.6 - Pragma Directive. 729141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner case tok::pp_pragma: 73080c60f72848896f867f6b7e664e7060d9e78f019Douglas Gregor return HandlePragmaDirective(PIK_HashPragma); 7311eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 732141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // GNU Extensions. 733141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner case tok::pp_import: 734ecdcb883cbc6bb4a2445dc6f02d58d9bdb54a0edDouglas Gregor return HandleImportDirective(SavedHash.getLocation(), Result); 735141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner case tok::pp_include_next: 736ecdcb883cbc6bb4a2445dc6f02d58d9bdb54a0edDouglas Gregor return HandleIncludeNextDirective(SavedHash.getLocation(), Result); 7371eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 738141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner case tok::pp_warning: 739141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner Diag(Result, diag::ext_pp_warning_directive); 740141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner return HandleUserDiagnosticDirective(Result, true); 741141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner case tok::pp_ident: 742141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner return HandleIdentSCCSDirective(Result); 743141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner case tok::pp_sccs: 744141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner return HandleIdentSCCSDirective(Result); 745141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner case tok::pp_assert: 746141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner //isExtension = true; // FIXME: implement #assert 747141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner break; 748141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner case tok::pp_unassert: 749141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner //isExtension = true; // FIXME: implement #unassert 750141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner break; 7517143aab97c6e849a5a5005b7853b8c7d5af008edDouglas Gregor 7521ac13c37d8af0145b7e03fea70b7b1476b8828c9Douglas Gregor case tok::pp___public_macro: 7534e4d08403ca5cfd4d558fa2936215d3a4e5a528dDavid Blaikie if (getLangOpts().Modules) 75494ad28b31433058445a27db722f60402ee820beaDouglas Gregor return HandleMacroPublicDirective(Result); 75594ad28b31433058445a27db722f60402ee820beaDouglas Gregor break; 75694ad28b31433058445a27db722f60402ee820beaDouglas Gregor 7571ac13c37d8af0145b7e03fea70b7b1476b8828c9Douglas Gregor case tok::pp___private_macro: 7584e4d08403ca5cfd4d558fa2936215d3a4e5a528dDavid Blaikie if (getLangOpts().Modules) 75994ad28b31433058445a27db722f60402ee820beaDouglas Gregor return HandleMacroPrivateDirective(Result); 76094ad28b31433058445a27db722f60402ee820beaDouglas Gregor break; 761141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } 762141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner break; 763141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } 7641eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 76542aa16cccb3d6cd4195ccff9c32d8cb50a25a094Chris Lattner // If this is a .S file, treat unknown # directives as non-preprocessor 76642aa16cccb3d6cd4195ccff9c32d8cb50a25a094Chris Lattner // directives. This is important because # may be a comment or introduce 76742aa16cccb3d6cd4195ccff9c32d8cb50a25a094Chris Lattner // various pseudo-ops. Just return the # token and push back the following 76842aa16cccb3d6cd4195ccff9c32d8cb50a25a094Chris Lattner // token to be lexed next time. 7694e4d08403ca5cfd4d558fa2936215d3a4e5a528dDavid Blaikie if (getLangOpts().AsmPreprocessor) { 7703d399a010102966158f6b69b07d636f113dc6ab4Daniel Dunbar Token *Toks = new Token[2]; 77142aa16cccb3d6cd4195ccff9c32d8cb50a25a094Chris Lattner // Return the # and the token after it. 7721eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump Toks[0] = SavedHash; 77342aa16cccb3d6cd4195ccff9c32d8cb50a25a094Chris Lattner Toks[1] = Result; 774ba3ca5271a01eae7cbd6a19ace004d75012c02a8Chris Lattner 775ba3ca5271a01eae7cbd6a19ace004d75012c02a8Chris Lattner // If the second token is a hashhash token, then we need to translate it to 776ba3ca5271a01eae7cbd6a19ace004d75012c02a8Chris Lattner // unknown so the token lexer doesn't try to perform token pasting. 777ba3ca5271a01eae7cbd6a19ace004d75012c02a8Chris Lattner if (Result.is(tok::hashhash)) 778ba3ca5271a01eae7cbd6a19ace004d75012c02a8Chris Lattner Toks[1].setKind(tok::unknown); 779ba3ca5271a01eae7cbd6a19ace004d75012c02a8Chris Lattner 78042aa16cccb3d6cd4195ccff9c32d8cb50a25a094Chris Lattner // Enter this token stream so that we re-lex the tokens. Make sure to 78142aa16cccb3d6cd4195ccff9c32d8cb50a25a094Chris Lattner // enable macro expansion, in case the token after the # is an identifier 78242aa16cccb3d6cd4195ccff9c32d8cb50a25a094Chris Lattner // that is expanded. 78342aa16cccb3d6cd4195ccff9c32d8cb50a25a094Chris Lattner EnterTokenStream(Toks, 2, false, true); 78442aa16cccb3d6cd4195ccff9c32d8cb50a25a094Chris Lattner return; 78542aa16cccb3d6cd4195ccff9c32d8cb50a25a094Chris Lattner } 7861eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 787141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // If we reached here, the preprocessing token is not valid! 788141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner Diag(Result, diag::err_pp_invalid_directive); 7891eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 790141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Read the rest of the PP line. 791141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner DiscardUntilEndOfDirective(); 7921eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 793141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Okay, we're done parsing the directive. 794141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner} 795141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 796478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner/// GetLineValue - Convert a numeric token into an unsigned value, emitting 797478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner/// Diagnostic DiagID if it is invalid, and returning the value in Val. 798478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattnerstatic bool GetLineValue(Token &DigitTok, unsigned &Val, 799ec27608da7f15b265135f5743fe71da1f8e25ee9Michael Ilseman unsigned DiagID, Preprocessor &PP, 800ec27608da7f15b265135f5743fe71da1f8e25ee9Michael Ilseman bool IsGNULineDirective=false) { 801359cc4475487ea0a660b3e8918334a2866e71c66Chris Lattner if (DigitTok.isNot(tok::numeric_constant)) { 802478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner PP.Diag(DigitTok, DiagID); 8031eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 80484021556baceb76eedf7d44be8ba71d9b8cfaccePeter Collingbourne if (DigitTok.isNot(tok::eod)) 805478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner PP.DiscardUntilEndOfDirective(); 806478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner return true; 807359cc4475487ea0a660b3e8918334a2866e71c66Chris Lattner } 8081eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 809f7ccbad5d9949e7ddd1cbef43d482553b811e026Dylan Noblesmith SmallString<64> IntegerBuffer; 810359cc4475487ea0a660b3e8918334a2866e71c66Chris Lattner IntegerBuffer.resize(DigitTok.getLength()); 811359cc4475487ea0a660b3e8918334a2866e71c66Chris Lattner const char *DigitTokBegin = &IntegerBuffer[0]; 812453091cc2082e207ea2c2dda645a9bc01b37fb0cDouglas Gregor bool Invalid = false; 813453091cc2082e207ea2c2dda645a9bc01b37fb0cDouglas Gregor unsigned ActualLength = PP.getSpelling(DigitTok, DigitTokBegin, &Invalid); 814453091cc2082e207ea2c2dda645a9bc01b37fb0cDouglas Gregor if (Invalid) 815453091cc2082e207ea2c2dda645a9bc01b37fb0cDouglas Gregor return true; 816453091cc2082e207ea2c2dda645a9bc01b37fb0cDouglas Gregor 817dc8c90da158030c0d0c62539e2da0adccc09f271Chris Lattner // Verify that we have a simple digit-sequence, and compute the value. This 818dc8c90da158030c0d0c62539e2da0adccc09f271Chris Lattner // is always a simple digit string computed in decimal, so we do this manually 819dc8c90da158030c0d0c62539e2da0adccc09f271Chris Lattner // here. 820dc8c90da158030c0d0c62539e2da0adccc09f271Chris Lattner Val = 0; 821dc8c90da158030c0d0c62539e2da0adccc09f271Chris Lattner for (unsigned i = 0; i != ActualLength; ++i) { 8223f6f51e28231f65de9c2dd150a2d757b2162cfa3Jordan Rose if (!isDigit(DigitTokBegin[i])) { 823dc8c90da158030c0d0c62539e2da0adccc09f271Chris Lattner PP.Diag(PP.AdvanceToTokenCharacter(DigitTok.getLocation(), i), 824ec27608da7f15b265135f5743fe71da1f8e25ee9Michael Ilseman diag::err_pp_line_digit_sequence) << IsGNULineDirective; 825dc8c90da158030c0d0c62539e2da0adccc09f271Chris Lattner PP.DiscardUntilEndOfDirective(); 826dc8c90da158030c0d0c62539e2da0adccc09f271Chris Lattner return true; 827dc8c90da158030c0d0c62539e2da0adccc09f271Chris Lattner } 8281eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 829dc8c90da158030c0d0c62539e2da0adccc09f271Chris Lattner unsigned NextVal = Val*10+(DigitTokBegin[i]-'0'); 830dc8c90da158030c0d0c62539e2da0adccc09f271Chris Lattner if (NextVal < Val) { // overflow. 831dc8c90da158030c0d0c62539e2da0adccc09f271Chris Lattner PP.Diag(DigitTok, DiagID); 832dc8c90da158030c0d0c62539e2da0adccc09f271Chris Lattner PP.DiscardUntilEndOfDirective(); 833dc8c90da158030c0d0c62539e2da0adccc09f271Chris Lattner return true; 834dc8c90da158030c0d0c62539e2da0adccc09f271Chris Lattner } 835dc8c90da158030c0d0c62539e2da0adccc09f271Chris Lattner Val = NextVal; 836359cc4475487ea0a660b3e8918334a2866e71c66Chris Lattner } 8371eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 838540f9ae1023bba27052c742cd92d0b32361b28ebFariborz Jahanian if (DigitTokBegin[0] == '0' && Val) 839ec27608da7f15b265135f5743fe71da1f8e25ee9Michael Ilseman PP.Diag(DigitTok.getLocation(), diag::warn_pp_line_decimal) 840ec27608da7f15b265135f5743fe71da1f8e25ee9Michael Ilseman << IsGNULineDirective; 8411eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 842478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner return false; 843478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner} 844478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner 845dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// \brief Handle a \#line directive: C99 6.10.4. 846dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// 847dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// The two acceptable forms are: 848dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// \verbatim 849478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner/// # line digit-sequence 850478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner/// # line digit-sequence "s-char-sequence" 851dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// \endverbatim 852478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattnervoid Preprocessor::HandleLineDirective(Token &Tok) { 853478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner // Read the line # and string argument. Per C99 6.10.4p5, these tokens are 854478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner // expanded. 855478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner Token DigitTok; 856478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner Lex(DigitTok); 857478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner 858478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner // Validate the number and convert it to an unsigned. 859478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner unsigned LineNo; 860dc8c90da158030c0d0c62539e2da0adccc09f271Chris Lattner if (GetLineValue(DigitTok, LineNo, diag::err_pp_line_requires_integer,*this)) 861478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner return; 862540f9ae1023bba27052c742cd92d0b32361b28ebFariborz Jahanian 863540f9ae1023bba27052c742cd92d0b32361b28ebFariborz Jahanian if (LineNo == 0) 864540f9ae1023bba27052c742cd92d0b32361b28ebFariborz Jahanian Diag(DigitTok, diag::ext_pp_line_zero); 865478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner 866478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner // Enforce C99 6.10.4p3: "The digit sequence shall not specify ... a 867478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner // number greater than 2147483647". C90 requires that the line # be <= 32767. 868158ebfba7545b3a9947f87bed83ea710df95ac3dEli Friedman unsigned LineLimit = 32768U; 86980ad52f327b532bded5c5b0ee38779d841c6cd35Richard Smith if (LangOpts.C99 || LangOpts.CPlusPlus11) 870158ebfba7545b3a9947f87bed83ea710df95ac3dEli Friedman LineLimit = 2147483648U; 871359cc4475487ea0a660b3e8918334a2866e71c66Chris Lattner if (LineNo >= LineLimit) 872359cc4475487ea0a660b3e8918334a2866e71c66Chris Lattner Diag(DigitTok, diag::ext_pp_line_too_big) << LineLimit; 87380ad52f327b532bded5c5b0ee38779d841c6cd35Richard Smith else if (LangOpts.CPlusPlus11 && LineNo >= 32768U) 874661a99690bc133bbaa029da925481d4a860dec90Richard Smith Diag(DigitTok, diag::warn_cxx98_compat_pp_line_too_big); 8751eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 8765b9a504720fb52594ca3686e10eb6c0cfa2e7d62Chris Lattner int FilenameID = -1; 877359cc4475487ea0a660b3e8918334a2866e71c66Chris Lattner Token StrTok; 878359cc4475487ea0a660b3e8918334a2866e71c66Chris Lattner Lex(StrTok); 879359cc4475487ea0a660b3e8918334a2866e71c66Chris Lattner 88084021556baceb76eedf7d44be8ba71d9b8cfaccePeter Collingbourne // If the StrTok is "eod", then it wasn't present. Otherwise, it must be a 88184021556baceb76eedf7d44be8ba71d9b8cfaccePeter Collingbourne // string followed by eod. 88284021556baceb76eedf7d44be8ba71d9b8cfaccePeter Collingbourne if (StrTok.is(tok::eod)) 883359cc4475487ea0a660b3e8918334a2866e71c66Chris Lattner ; // ok 884359cc4475487ea0a660b3e8918334a2866e71c66Chris Lattner else if (StrTok.isNot(tok::string_literal)) { 885359cc4475487ea0a660b3e8918334a2866e71c66Chris Lattner Diag(StrTok, diag::err_pp_line_invalid_filename); 88699831e4677a7e2e051af636221694d60ba31fcdbRichard Smith return DiscardUntilEndOfDirective(); 88799831e4677a7e2e051af636221694d60ba31fcdbRichard Smith } else if (StrTok.hasUDSuffix()) { 88899831e4677a7e2e051af636221694d60ba31fcdbRichard Smith Diag(StrTok, diag::err_invalid_string_udl); 88999831e4677a7e2e051af636221694d60ba31fcdbRichard Smith return DiscardUntilEndOfDirective(); 890359cc4475487ea0a660b3e8918334a2866e71c66Chris Lattner } else { 8915b9a504720fb52594ca3686e10eb6c0cfa2e7d62Chris Lattner // Parse and validate the string, converting it into a unique ID. 8925b9a504720fb52594ca3686e10eb6c0cfa2e7d62Chris Lattner StringLiteralParser Literal(&StrTok, 1, *this); 8935cee1195584fa8672253139c86e922daeda69b9eDouglas Gregor assert(Literal.isAscii() && "Didn't allow wide strings in"); 8945b9a504720fb52594ca3686e10eb6c0cfa2e7d62Chris Lattner if (Literal.hadError) 8955b9a504720fb52594ca3686e10eb6c0cfa2e7d62Chris Lattner return DiscardUntilEndOfDirective(); 8965b9a504720fb52594ca3686e10eb6c0cfa2e7d62Chris Lattner if (Literal.Pascal) { 8975b9a504720fb52594ca3686e10eb6c0cfa2e7d62Chris Lattner Diag(StrTok, diag::err_pp_linemarker_invalid_filename); 8985b9a504720fb52594ca3686e10eb6c0cfa2e7d62Chris Lattner return DiscardUntilEndOfDirective(); 8995b9a504720fb52594ca3686e10eb6c0cfa2e7d62Chris Lattner } 90065aa6885818d4b4eea2e5a9d12085b2398148662Jay Foad FilenameID = SourceMgr.getLineTableFilenameID(Literal.GetString()); 9011eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 90284021556baceb76eedf7d44be8ba71d9b8cfaccePeter Collingbourne // Verify that there is nothing after the string, other than EOD. Because 903ab82f41b217ce588a9456c0b4411f219d3ed0df8Chris Lattner // of C99 6.10.4p5, macros that expand to empty tokens are ok. 904ab82f41b217ce588a9456c0b4411f219d3ed0df8Chris Lattner CheckEndOfDirective("line", true); 905359cc4475487ea0a660b3e8918334a2866e71c66Chris Lattner } 9061eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 9074c4ea17d7f991516c37a871dfa4bbe5723fa85f0Chris Lattner SourceMgr.AddLineNote(DigitTok.getLocation(), LineNo, FilenameID); 9081eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 90916629386f1326608dc1ff9f4ff785fb3fae0bfb3Chris Lattner if (Callbacks) 91086d0ef74303e9164a0860ce849af597d34f937abChris Lattner Callbacks->FileChanged(CurPPLexer->getSourceLocation(), 91186d0ef74303e9164a0860ce849af597d34f937abChris Lattner PPCallbacks::RenameFile, 91216629386f1326608dc1ff9f4ff785fb3fae0bfb3Chris Lattner SrcMgr::C_User); 913359cc4475487ea0a660b3e8918334a2866e71c66Chris Lattner} 914359cc4475487ea0a660b3e8918334a2866e71c66Chris Lattner 915478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner/// ReadLineMarkerFlags - Parse and validate any flags at the end of a GNU line 916478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner/// marker directive. 917478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattnerstatic bool ReadLineMarkerFlags(bool &IsFileEntry, bool &IsFileExit, 918478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner bool &IsSystemHeader, bool &IsExternCHeader, 919478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner Preprocessor &PP) { 920478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner unsigned FlagVal; 921478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner Token FlagTok; 922478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner PP.Lex(FlagTok); 92384021556baceb76eedf7d44be8ba71d9b8cfaccePeter Collingbourne if (FlagTok.is(tok::eod)) return false; 924478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner if (GetLineValue(FlagTok, FlagVal, diag::err_pp_linemarker_invalid_flag, PP)) 925478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner return true; 926478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner 927478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner if (FlagVal == 1) { 928478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner IsFileEntry = true; 9291eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 930478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner PP.Lex(FlagTok); 93184021556baceb76eedf7d44be8ba71d9b8cfaccePeter Collingbourne if (FlagTok.is(tok::eod)) return false; 932478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner if (GetLineValue(FlagTok, FlagVal, diag::err_pp_linemarker_invalid_flag,PP)) 933478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner return true; 934478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner } else if (FlagVal == 2) { 935478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner IsFileExit = true; 9361eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 937137b6a6149c53dbbcb8fba98e524d9ad0f3c8736Chris Lattner SourceManager &SM = PP.getSourceManager(); 938137b6a6149c53dbbcb8fba98e524d9ad0f3c8736Chris Lattner // If we are leaving the current presumed file, check to make sure the 939137b6a6149c53dbbcb8fba98e524d9ad0f3c8736Chris Lattner // presumed include stack isn't empty! 940137b6a6149c53dbbcb8fba98e524d9ad0f3c8736Chris Lattner FileID CurFileID = 941e7b2b6e87dbe5b1207f77b6ff9c210a02f95bb39Chandler Carruth SM.getDecomposedExpansionLoc(FlagTok.getLocation()).first; 942137b6a6149c53dbbcb8fba98e524d9ad0f3c8736Chris Lattner PresumedLoc PLoc = SM.getPresumedLoc(FlagTok.getLocation()); 943cb7b1e17b63967317ab5cc55682168cf0380519aDouglas Gregor if (PLoc.isInvalid()) 944cb7b1e17b63967317ab5cc55682168cf0380519aDouglas Gregor return true; 945cb7b1e17b63967317ab5cc55682168cf0380519aDouglas Gregor 946137b6a6149c53dbbcb8fba98e524d9ad0f3c8736Chris Lattner // If there is no include loc (main file) or if the include loc is in a 947137b6a6149c53dbbcb8fba98e524d9ad0f3c8736Chris Lattner // different physical file, then we aren't in a "1" line marker flag region. 948137b6a6149c53dbbcb8fba98e524d9ad0f3c8736Chris Lattner SourceLocation IncLoc = PLoc.getIncludeLoc(); 949137b6a6149c53dbbcb8fba98e524d9ad0f3c8736Chris Lattner if (IncLoc.isInvalid() || 950e7b2b6e87dbe5b1207f77b6ff9c210a02f95bb39Chandler Carruth SM.getDecomposedExpansionLoc(IncLoc).first != CurFileID) { 951137b6a6149c53dbbcb8fba98e524d9ad0f3c8736Chris Lattner PP.Diag(FlagTok, diag::err_pp_linemarker_invalid_pop); 952137b6a6149c53dbbcb8fba98e524d9ad0f3c8736Chris Lattner PP.DiscardUntilEndOfDirective(); 953137b6a6149c53dbbcb8fba98e524d9ad0f3c8736Chris Lattner return true; 954137b6a6149c53dbbcb8fba98e524d9ad0f3c8736Chris Lattner } 9551eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 956478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner PP.Lex(FlagTok); 95784021556baceb76eedf7d44be8ba71d9b8cfaccePeter Collingbourne if (FlagTok.is(tok::eod)) return false; 958478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner if (GetLineValue(FlagTok, FlagVal, diag::err_pp_linemarker_invalid_flag,PP)) 959478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner return true; 960478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner } 961478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner 962478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner // We must have 3 if there are still flags. 963478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner if (FlagVal != 3) { 964478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner PP.Diag(FlagTok, diag::err_pp_linemarker_invalid_flag); 9655b9a504720fb52594ca3686e10eb6c0cfa2e7d62Chris Lattner PP.DiscardUntilEndOfDirective(); 966478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner return true; 967478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner } 9681eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 969478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner IsSystemHeader = true; 9701eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 971478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner PP.Lex(FlagTok); 97284021556baceb76eedf7d44be8ba71d9b8cfaccePeter Collingbourne if (FlagTok.is(tok::eod)) return false; 9739d79ebac47ffde6a1cb312f4c09b66b1b9a397fbChris Lattner if (GetLineValue(FlagTok, FlagVal, diag::err_pp_linemarker_invalid_flag, PP)) 974478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner return true; 975478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner 976478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner // We must have 4 if there is yet another flag. 977478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner if (FlagVal != 4) { 978478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner PP.Diag(FlagTok, diag::err_pp_linemarker_invalid_flag); 9795b9a504720fb52594ca3686e10eb6c0cfa2e7d62Chris Lattner PP.DiscardUntilEndOfDirective(); 980478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner return true; 981478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner } 9821eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 983478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner IsExternCHeader = true; 9841eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 985478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner PP.Lex(FlagTok); 98684021556baceb76eedf7d44be8ba71d9b8cfaccePeter Collingbourne if (FlagTok.is(tok::eod)) return false; 987478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner 988478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner // There are no more valid flags here. 989478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner PP.Diag(FlagTok, diag::err_pp_linemarker_invalid_flag); 9905b9a504720fb52594ca3686e10eb6c0cfa2e7d62Chris Lattner PP.DiscardUntilEndOfDirective(); 991478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner return true; 992478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner} 993478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner 994478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner/// HandleDigitDirective - Handle a GNU line marker directive, whose syntax is 995478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner/// one of the following forms: 996478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner/// 997478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner/// # 42 9981eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump/// # 42 "file" ('1' | '2')? 999478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner/// # 42 "file" ('1' | '2')? '3' '4'? 1000478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner/// 1001478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattnervoid Preprocessor::HandleDigitDirective(Token &DigitTok) { 1002478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner // Validate the number and convert it to an unsigned. GNU does not have a 1003478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner // line # limit other than it fit in 32-bits. 1004478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner unsigned LineNo; 1005478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner if (GetLineValue(DigitTok, LineNo, diag::err_pp_linemarker_requires_integer, 1006ec27608da7f15b265135f5743fe71da1f8e25ee9Michael Ilseman *this, true)) 1007478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner return; 10081eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 1009478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner Token StrTok; 1010478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner Lex(StrTok); 10111eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 1012478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner bool IsFileEntry = false, IsFileExit = false; 1013478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner bool IsSystemHeader = false, IsExternCHeader = false; 10145b9a504720fb52594ca3686e10eb6c0cfa2e7d62Chris Lattner int FilenameID = -1; 10155b9a504720fb52594ca3686e10eb6c0cfa2e7d62Chris Lattner 101684021556baceb76eedf7d44be8ba71d9b8cfaccePeter Collingbourne // If the StrTok is "eod", then it wasn't present. Otherwise, it must be a 101784021556baceb76eedf7d44be8ba71d9b8cfaccePeter Collingbourne // string followed by eod. 101884021556baceb76eedf7d44be8ba71d9b8cfaccePeter Collingbourne if (StrTok.is(tok::eod)) 1019478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner ; // ok 1020478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner else if (StrTok.isNot(tok::string_literal)) { 1021478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner Diag(StrTok, diag::err_pp_linemarker_invalid_filename); 10225b9a504720fb52594ca3686e10eb6c0cfa2e7d62Chris Lattner return DiscardUntilEndOfDirective(); 102399831e4677a7e2e051af636221694d60ba31fcdbRichard Smith } else if (StrTok.hasUDSuffix()) { 102499831e4677a7e2e051af636221694d60ba31fcdbRichard Smith Diag(StrTok, diag::err_invalid_string_udl); 102599831e4677a7e2e051af636221694d60ba31fcdbRichard Smith return DiscardUntilEndOfDirective(); 1026478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner } else { 10275b9a504720fb52594ca3686e10eb6c0cfa2e7d62Chris Lattner // Parse and validate the string, converting it into a unique ID. 10285b9a504720fb52594ca3686e10eb6c0cfa2e7d62Chris Lattner StringLiteralParser Literal(&StrTok, 1, *this); 10295cee1195584fa8672253139c86e922daeda69b9eDouglas Gregor assert(Literal.isAscii() && "Didn't allow wide strings in"); 10305b9a504720fb52594ca3686e10eb6c0cfa2e7d62Chris Lattner if (Literal.hadError) 10315b9a504720fb52594ca3686e10eb6c0cfa2e7d62Chris Lattner return DiscardUntilEndOfDirective(); 10325b9a504720fb52594ca3686e10eb6c0cfa2e7d62Chris Lattner if (Literal.Pascal) { 10335b9a504720fb52594ca3686e10eb6c0cfa2e7d62Chris Lattner Diag(StrTok, diag::err_pp_linemarker_invalid_filename); 10345b9a504720fb52594ca3686e10eb6c0cfa2e7d62Chris Lattner return DiscardUntilEndOfDirective(); 10355b9a504720fb52594ca3686e10eb6c0cfa2e7d62Chris Lattner } 103665aa6885818d4b4eea2e5a9d12085b2398148662Jay Foad FilenameID = SourceMgr.getLineTableFilenameID(Literal.GetString()); 10371eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 1038478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner // If a filename was present, read any flags that are present. 10391eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump if (ReadLineMarkerFlags(IsFileEntry, IsFileExit, 10405b9a504720fb52594ca3686e10eb6c0cfa2e7d62Chris Lattner IsSystemHeader, IsExternCHeader, *this)) 1041478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner return; 1042478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner } 10431eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 10449d79ebac47ffde6a1cb312f4c09b66b1b9a397fbChris Lattner // Create a line note with this information. 10459d79ebac47ffde6a1cb312f4c09b66b1b9a397fbChris Lattner SourceMgr.AddLineNote(DigitTok.getLocation(), LineNo, FilenameID, 10461eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump IsFileEntry, IsFileExit, 10479d79ebac47ffde6a1cb312f4c09b66b1b9a397fbChris Lattner IsSystemHeader, IsExternCHeader); 10481eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 104916629386f1326608dc1ff9f4ff785fb3fae0bfb3Chris Lattner // If the preprocessor has callbacks installed, notify them of the #line 105016629386f1326608dc1ff9f4ff785fb3fae0bfb3Chris Lattner // change. This is used so that the line marker comes out in -E mode for 105116629386f1326608dc1ff9f4ff785fb3fae0bfb3Chris Lattner // example. 105216629386f1326608dc1ff9f4ff785fb3fae0bfb3Chris Lattner if (Callbacks) { 105316629386f1326608dc1ff9f4ff785fb3fae0bfb3Chris Lattner PPCallbacks::FileChangeReason Reason = PPCallbacks::RenameFile; 105416629386f1326608dc1ff9f4ff785fb3fae0bfb3Chris Lattner if (IsFileEntry) 105516629386f1326608dc1ff9f4ff785fb3fae0bfb3Chris Lattner Reason = PPCallbacks::EnterFile; 105616629386f1326608dc1ff9f4ff785fb3fae0bfb3Chris Lattner else if (IsFileExit) 105716629386f1326608dc1ff9f4ff785fb3fae0bfb3Chris Lattner Reason = PPCallbacks::ExitFile; 105816629386f1326608dc1ff9f4ff785fb3fae0bfb3Chris Lattner SrcMgr::CharacteristicKind FileKind = SrcMgr::C_User; 105916629386f1326608dc1ff9f4ff785fb3fae0bfb3Chris Lattner if (IsExternCHeader) 106016629386f1326608dc1ff9f4ff785fb3fae0bfb3Chris Lattner FileKind = SrcMgr::C_ExternCSystem; 106116629386f1326608dc1ff9f4ff785fb3fae0bfb3Chris Lattner else if (IsSystemHeader) 106216629386f1326608dc1ff9f4ff785fb3fae0bfb3Chris Lattner FileKind = SrcMgr::C_System; 10631eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 106486d0ef74303e9164a0860ce849af597d34f937abChris Lattner Callbacks->FileChanged(CurPPLexer->getSourceLocation(), Reason, FileKind); 106516629386f1326608dc1ff9f4ff785fb3fae0bfb3Chris Lattner } 1066478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner} 1067478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner 1068478a18ec47fdb7e0e580a2635648456e9db9ad4fChris Lattner 1069099dd05b579ccefa97bd4f4a3088d4c262f080e4Chris Lattner/// HandleUserDiagnosticDirective - Handle a #warning or #error directive. 1070099dd05b579ccefa97bd4f4a3088d4c262f080e4Chris Lattner/// 10711eb4433ac451dc16f4133a88af2d002ac26c58efMike Stumpvoid Preprocessor::HandleUserDiagnosticDirective(Token &Tok, 1072141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner bool isWarning) { 1073099dd05b579ccefa97bd4f4a3088d4c262f080e4Chris Lattner // PTH doesn't emit #warning or #error directives. 1074099dd05b579ccefa97bd4f4a3088d4c262f080e4Chris Lattner if (CurPTHLexer) 1075359cc4475487ea0a660b3e8918334a2866e71c66Chris Lattner return CurPTHLexer->DiscardToEndOfLine(); 1076359cc4475487ea0a660b3e8918334a2866e71c66Chris Lattner 1077141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Read the rest of the line raw. We do this because we don't want macros 1078141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // to be expanded and we don't require that the tokens be valid preprocessing 1079141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // tokens. For example, this is allowed: "#warning ` 'foo". GCC does 1080141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // collapse multiple consequtive white space between tokens, but this isn't 1081141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // specified by the standard. 10823093b20d824a953d8bc7a786dd952414898f8d6dBenjamin Kramer SmallString<128> Message; 10833093b20d824a953d8bc7a786dd952414898f8d6dBenjamin Kramer CurLexer->ReadToEndOfLine(&Message); 108434a2c42ba8cc58a404238a3c1cbc4a7442e57832Ted Kremenek 108534a2c42ba8cc58a404238a3c1cbc4a7442e57832Ted Kremenek // Find the first non-whitespace character, so that we can make the 108634a2c42ba8cc58a404238a3c1cbc4a7442e57832Ted Kremenek // diagnostic more succinct. 10873093b20d824a953d8bc7a786dd952414898f8d6dBenjamin Kramer StringRef Msg = Message.str().ltrim(" "); 10883093b20d824a953d8bc7a786dd952414898f8d6dBenjamin Kramer 1089359cc4475487ea0a660b3e8918334a2866e71c66Chris Lattner if (isWarning) 109034a2c42ba8cc58a404238a3c1cbc4a7442e57832Ted Kremenek Diag(Tok, diag::pp_hash_warning) << Msg; 1091359cc4475487ea0a660b3e8918334a2866e71c66Chris Lattner else 109234a2c42ba8cc58a404238a3c1cbc4a7442e57832Ted Kremenek Diag(Tok, diag::err_pp_hash_error) << Msg; 1093141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner} 1094141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 1095141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner/// HandleIdentSCCSDirective - Handle a #ident/#sccs directive. 1096141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner/// 1097141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattnervoid Preprocessor::HandleIdentSCCSDirective(Token &Tok) { 1098141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Yes, this directive is an extension. 1099141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner Diag(Tok, diag::ext_pp_ident_directive); 11001eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 1101141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Read the string argument. 1102141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner Token StrTok; 1103141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner Lex(StrTok); 11041eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 1105141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // If the token kind isn't a string, it's a malformed directive. 1106141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner if (StrTok.isNot(tok::string_literal) && 11073692b09faa9fe346f39bc922db6dce48cdcc3f63Chris Lattner StrTok.isNot(tok::wide_string_literal)) { 11083692b09faa9fe346f39bc922db6dce48cdcc3f63Chris Lattner Diag(StrTok, diag::err_pp_malformed_ident); 110984021556baceb76eedf7d44be8ba71d9b8cfaccePeter Collingbourne if (StrTok.isNot(tok::eod)) 1110099dd05b579ccefa97bd4f4a3088d4c262f080e4Chris Lattner DiscardUntilEndOfDirective(); 11113692b09faa9fe346f39bc922db6dce48cdcc3f63Chris Lattner return; 11123692b09faa9fe346f39bc922db6dce48cdcc3f63Chris Lattner } 11131eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 111499831e4677a7e2e051af636221694d60ba31fcdbRichard Smith if (StrTok.hasUDSuffix()) { 111599831e4677a7e2e051af636221694d60ba31fcdbRichard Smith Diag(StrTok, diag::err_invalid_string_udl); 111699831e4677a7e2e051af636221694d60ba31fcdbRichard Smith return DiscardUntilEndOfDirective(); 111799831e4677a7e2e051af636221694d60ba31fcdbRichard Smith } 111899831e4677a7e2e051af636221694d60ba31fcdbRichard Smith 111984021556baceb76eedf7d44be8ba71d9b8cfaccePeter Collingbourne // Verify that there is nothing after the string, other than EOD. 112035410d5cbbb18735d76e00496540d416dc49b577Chris Lattner CheckEndOfDirective("ident"); 1121141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 1122453091cc2082e207ea2c2dda645a9bc01b37fb0cDouglas Gregor if (Callbacks) { 1123453091cc2082e207ea2c2dda645a9bc01b37fb0cDouglas Gregor bool Invalid = false; 1124453091cc2082e207ea2c2dda645a9bc01b37fb0cDouglas Gregor std::string Str = getSpelling(StrTok, &Invalid); 1125453091cc2082e207ea2c2dda645a9bc01b37fb0cDouglas Gregor if (!Invalid) 1126453091cc2082e207ea2c2dda645a9bc01b37fb0cDouglas Gregor Callbacks->Ident(Tok.getLocation(), Str); 1127453091cc2082e207ea2c2dda645a9bc01b37fb0cDouglas Gregor } 1128141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner} 1129141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 113094ad28b31433058445a27db722f60402ee820beaDouglas Gregor/// \brief Handle a #public directive. 113194ad28b31433058445a27db722f60402ee820beaDouglas Gregorvoid Preprocessor::HandleMacroPublicDirective(Token &Tok) { 11327143aab97c6e849a5a5005b7853b8c7d5af008edDouglas Gregor Token MacroNameTok; 11337143aab97c6e849a5a5005b7853b8c7d5af008edDouglas Gregor ReadMacroName(MacroNameTok, 2); 11347143aab97c6e849a5a5005b7853b8c7d5af008edDouglas Gregor 11357143aab97c6e849a5a5005b7853b8c7d5af008edDouglas Gregor // Error reading macro name? If so, diagnostic already issued. 11367143aab97c6e849a5a5005b7853b8c7d5af008edDouglas Gregor if (MacroNameTok.is(tok::eod)) 11377143aab97c6e849a5a5005b7853b8c7d5af008edDouglas Gregor return; 11387143aab97c6e849a5a5005b7853b8c7d5af008edDouglas Gregor 11391ac13c37d8af0145b7e03fea70b7b1476b8828c9Douglas Gregor // Check to see if this is the last token on the #__public_macro line. 11401ac13c37d8af0145b7e03fea70b7b1476b8828c9Douglas Gregor CheckEndOfDirective("__public_macro"); 11417143aab97c6e849a5a5005b7853b8c7d5af008edDouglas Gregor 11429317ab94bb68122ba6fc728eb73c1308fb913cd1Argyrios Kyrtzidis IdentifierInfo *II = MacroNameTok.getIdentifierInfo(); 11437143aab97c6e849a5a5005b7853b8c7d5af008edDouglas Gregor // Okay, we finally have a valid identifier to undef. 11449317ab94bb68122ba6fc728eb73c1308fb913cd1Argyrios Kyrtzidis MacroDirective *MD = getMacroDirective(II); 11457143aab97c6e849a5a5005b7853b8c7d5af008edDouglas Gregor 11467143aab97c6e849a5a5005b7853b8c7d5af008edDouglas Gregor // If the macro is not defined, this is an error. 11479818a1d443e97677dd3422305de9cc2b1fb2a8c1Argyrios Kyrtzidis if (MD == 0) { 11489317ab94bb68122ba6fc728eb73c1308fb913cd1Argyrios Kyrtzidis Diag(MacroNameTok, diag::err_pp_visibility_non_macro) << II; 11497143aab97c6e849a5a5005b7853b8c7d5af008edDouglas Gregor return; 11507143aab97c6e849a5a5005b7853b8c7d5af008edDouglas Gregor } 11517143aab97c6e849a5a5005b7853b8c7d5af008edDouglas Gregor 11527143aab97c6e849a5a5005b7853b8c7d5af008edDouglas Gregor // Note that this macro has now been exported. 1153c56fff7fd231aebf4b152f60f8f11ef91835c48aArgyrios Kyrtzidis appendMacroDirective(II, AllocateVisibilityMacroDirective( 1154c56fff7fd231aebf4b152f60f8f11ef91835c48aArgyrios Kyrtzidis MacroNameTok.getLocation(), /*IsPublic=*/true)); 1155aa93a875605536d72a10359a0098396192b7d4ecDouglas Gregor} 1156aa93a875605536d72a10359a0098396192b7d4ecDouglas Gregor 115794ad28b31433058445a27db722f60402ee820beaDouglas Gregor/// \brief Handle a #private directive. 1158aa93a875605536d72a10359a0098396192b7d4ecDouglas Gregorvoid Preprocessor::HandleMacroPrivateDirective(Token &Tok) { 1159aa93a875605536d72a10359a0098396192b7d4ecDouglas Gregor Token MacroNameTok; 1160aa93a875605536d72a10359a0098396192b7d4ecDouglas Gregor ReadMacroName(MacroNameTok, 2); 1161aa93a875605536d72a10359a0098396192b7d4ecDouglas Gregor 1162aa93a875605536d72a10359a0098396192b7d4ecDouglas Gregor // Error reading macro name? If so, diagnostic already issued. 1163aa93a875605536d72a10359a0098396192b7d4ecDouglas Gregor if (MacroNameTok.is(tok::eod)) 1164aa93a875605536d72a10359a0098396192b7d4ecDouglas Gregor return; 1165aa93a875605536d72a10359a0098396192b7d4ecDouglas Gregor 11661ac13c37d8af0145b7e03fea70b7b1476b8828c9Douglas Gregor // Check to see if this is the last token on the #__private_macro line. 11671ac13c37d8af0145b7e03fea70b7b1476b8828c9Douglas Gregor CheckEndOfDirective("__private_macro"); 1168aa93a875605536d72a10359a0098396192b7d4ecDouglas Gregor 11699317ab94bb68122ba6fc728eb73c1308fb913cd1Argyrios Kyrtzidis IdentifierInfo *II = MacroNameTok.getIdentifierInfo(); 1170aa93a875605536d72a10359a0098396192b7d4ecDouglas Gregor // Okay, we finally have a valid identifier to undef. 11719317ab94bb68122ba6fc728eb73c1308fb913cd1Argyrios Kyrtzidis MacroDirective *MD = getMacroDirective(II); 1172aa93a875605536d72a10359a0098396192b7d4ecDouglas Gregor 1173aa93a875605536d72a10359a0098396192b7d4ecDouglas Gregor // If the macro is not defined, this is an error. 11749818a1d443e97677dd3422305de9cc2b1fb2a8c1Argyrios Kyrtzidis if (MD == 0) { 11759317ab94bb68122ba6fc728eb73c1308fb913cd1Argyrios Kyrtzidis Diag(MacroNameTok, diag::err_pp_visibility_non_macro) << II; 1176aa93a875605536d72a10359a0098396192b7d4ecDouglas Gregor return; 1177aa93a875605536d72a10359a0098396192b7d4ecDouglas Gregor } 1178aa93a875605536d72a10359a0098396192b7d4ecDouglas Gregor 1179aa93a875605536d72a10359a0098396192b7d4ecDouglas Gregor // Note that this macro has now been marked private. 1180c56fff7fd231aebf4b152f60f8f11ef91835c48aArgyrios Kyrtzidis appendMacroDirective(II, AllocateVisibilityMacroDirective( 1181c56fff7fd231aebf4b152f60f8f11ef91835c48aArgyrios Kyrtzidis MacroNameTok.getLocation(), /*IsPublic=*/false)); 11827143aab97c6e849a5a5005b7853b8c7d5af008edDouglas Gregor} 11837143aab97c6e849a5a5005b7853b8c7d5af008edDouglas Gregor 1184141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner//===----------------------------------------------------------------------===// 1185141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner// Preprocessor Include Directive Handling. 1186141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner//===----------------------------------------------------------------------===// 1187141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 1188141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner/// GetIncludeFilenameSpelling - Turn the specified lexer token into a fully 1189dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// checked and spelled filename, e.g. as an operand of \#include. This returns 1190141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner/// true if the input filename was in <>'s or false if it were in ""'s. The 1191141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner/// caller is expected to provide a buffer that is large enough to hold the 1192141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner/// spelling of the filename, but is also expected to handle the case when 1193141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner/// this method decides to use a different buffer. 1194141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattnerbool Preprocessor::GetIncludeFilenameSpelling(SourceLocation Loc, 11955f9e272e632e951b1efe824cd16acb4d96077930Chris Lattner StringRef &Buffer) { 1196141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Get the text form of the filename. 1197a139481e62fdb209d9d87a54a5733f989d2e8d51Chris Lattner assert(!Buffer.empty() && "Can't have tokens with empty spellings!"); 11981eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 1199141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Make sure the filename is <x> or "x". 1200141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner bool isAngled; 1201a139481e62fdb209d9d87a54a5733f989d2e8d51Chris Lattner if (Buffer[0] == '<') { 1202a139481e62fdb209d9d87a54a5733f989d2e8d51Chris Lattner if (Buffer.back() != '>') { 1203141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner Diag(Loc, diag::err_pp_expects_filename); 12045f9e272e632e951b1efe824cd16acb4d96077930Chris Lattner Buffer = StringRef(); 1205141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner return true; 1206141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } 1207141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner isAngled = true; 1208a139481e62fdb209d9d87a54a5733f989d2e8d51Chris Lattner } else if (Buffer[0] == '"') { 1209a139481e62fdb209d9d87a54a5733f989d2e8d51Chris Lattner if (Buffer.back() != '"') { 1210141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner Diag(Loc, diag::err_pp_expects_filename); 12115f9e272e632e951b1efe824cd16acb4d96077930Chris Lattner Buffer = StringRef(); 1212141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner return true; 1213141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } 1214141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner isAngled = false; 1215141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } else { 1216141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner Diag(Loc, diag::err_pp_expects_filename); 12175f9e272e632e951b1efe824cd16acb4d96077930Chris Lattner Buffer = StringRef(); 1218141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner return true; 1219141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } 12201eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 1221141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Diagnose #include "" as invalid. 1222a139481e62fdb209d9d87a54a5733f989d2e8d51Chris Lattner if (Buffer.size() <= 2) { 1223141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner Diag(Loc, diag::err_pp_empty_filename); 12245f9e272e632e951b1efe824cd16acb4d96077930Chris Lattner Buffer = StringRef(); 1225a139481e62fdb209d9d87a54a5733f989d2e8d51Chris Lattner return true; 1226141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } 12271eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 1228141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Skip the brackets. 1229a139481e62fdb209d9d87a54a5733f989d2e8d51Chris Lattner Buffer = Buffer.substr(1, Buffer.size()-2); 1230141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner return isAngled; 1231141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner} 1232141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 1233dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// \brief Handle cases where the \#include name is expanded from a macro 1234dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// as multiple tokens, which need to be glued together. 1235dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// 1236dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// This occurs for code like: 1237dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// \code 1238dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// \#define FOO <a/b.h> 1239dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// \#include FOO 1240dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// \endcode 1241141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner/// because in this case, "<a/b.h>" is returned as 7 tokens, not one. 1242141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner/// 1243141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner/// This code concatenates and consumes tokens up to the '>' token. It returns 1244141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner/// false if the > was found, otherwise it returns true if it finds and consumes 124584021556baceb76eedf7d44be8ba71d9b8cfaccePeter Collingbourne/// the EOD marker. 1246a28cc090f265d5bdaef9ebb24fb9d579928d3a18John Thompsonbool Preprocessor::ConcatenateIncludeName( 1247f7ccbad5d9949e7ddd1cbef43d482553b811e026Dylan Noblesmith SmallString<128> &FilenameBuffer, 1248ecdcb883cbc6bb4a2445dc6f02d58d9bdb54a0edDouglas Gregor SourceLocation &End) { 1249141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner Token CurTok; 12501eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 1251a28cc090f265d5bdaef9ebb24fb9d579928d3a18John Thompson Lex(CurTok); 125284021556baceb76eedf7d44be8ba71d9b8cfaccePeter Collingbourne while (CurTok.isNot(tok::eod)) { 1253ecdcb883cbc6bb4a2445dc6f02d58d9bdb54a0edDouglas Gregor End = CurTok.getLocation(); 1254ecdcb883cbc6bb4a2445dc6f02d58d9bdb54a0edDouglas Gregor 125525bb03bc0f2561e830d866d5905b20c5475d6762Douglas Gregor // FIXME: Provide code completion for #includes. 125625bb03bc0f2561e830d866d5905b20c5475d6762Douglas Gregor if (CurTok.is(tok::code_completion)) { 12577d100872341f233c81e1d7b72b40457e62c36862Argyrios Kyrtzidis setCodeCompletionReached(); 125825bb03bc0f2561e830d866d5905b20c5475d6762Douglas Gregor Lex(CurTok); 125925bb03bc0f2561e830d866d5905b20c5475d6762Douglas Gregor continue; 126025bb03bc0f2561e830d866d5905b20c5475d6762Douglas Gregor } 126125bb03bc0f2561e830d866d5905b20c5475d6762Douglas Gregor 1262141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Append the spelling of this token to the buffer. If there was a space 1263141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // before it, add it now. 1264141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner if (CurTok.hasLeadingSpace()) 1265141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner FilenameBuffer.push_back(' '); 12661eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 1267141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Get the spelling of the token, directly into FilenameBuffer if possible. 1268141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner unsigned PreAppendSize = FilenameBuffer.size(); 1269141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner FilenameBuffer.resize(PreAppendSize+CurTok.getLength()); 12701eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 1271141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner const char *BufPtr = &FilenameBuffer[PreAppendSize]; 1272a28cc090f265d5bdaef9ebb24fb9d579928d3a18John Thompson unsigned ActualLen = getSpelling(CurTok, BufPtr); 12731eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 1274141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // If the token was spelled somewhere else, copy it into FilenameBuffer. 1275141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner if (BufPtr != &FilenameBuffer[PreAppendSize]) 1276141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner memcpy(&FilenameBuffer[PreAppendSize], BufPtr, ActualLen); 12771eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 1278141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Resize FilenameBuffer to the correct size. 1279141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner if (CurTok.getLength() != ActualLen) 1280141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner FilenameBuffer.resize(PreAppendSize+ActualLen); 12811eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 1282141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // If we found the '>' marker, return success. 1283141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner if (CurTok.is(tok::greater)) 1284141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner return false; 12851eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 1286a28cc090f265d5bdaef9ebb24fb9d579928d3a18John Thompson Lex(CurTok); 1287141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } 1288141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 128984021556baceb76eedf7d44be8ba71d9b8cfaccePeter Collingbourne // If we hit the eod marker, emit an error and return true so that the caller 129084021556baceb76eedf7d44be8ba71d9b8cfaccePeter Collingbourne // knows the EOD has been read. 1291a28cc090f265d5bdaef9ebb24fb9d579928d3a18John Thompson Diag(CurTok.getLocation(), diag::err_pp_expects_filename); 1292141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner return true; 1293141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner} 1294141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 1295dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// HandleIncludeDirective - The "\#include" tokens have just been read, read 1296dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// the file to be included from the lexer, then include it! This is a common 1297dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// routine with functionality shared between \#include, \#include_next and 1298dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// \#import. LookupFrom is set when this is a \#include_next directive, it 12991eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump/// specifies the file to start searching from. 1300ecdcb883cbc6bb4a2445dc6f02d58d9bdb54a0edDouglas Gregorvoid Preprocessor::HandleIncludeDirective(SourceLocation HashLoc, 1301ecdcb883cbc6bb4a2445dc6f02d58d9bdb54a0edDouglas Gregor Token &IncludeTok, 1302141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner const DirectoryLookup *LookupFrom, 1303141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner bool isImport) { 1304141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 1305141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner Token FilenameTok; 130660e45d4c41479fb58ad14d97efd03418e8549509Ted Kremenek CurPPLexer->LexIncludeFilename(FilenameTok); 13071eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 1308141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Reserve a buffer to get the spelling. 1309f7ccbad5d9949e7ddd1cbef43d482553b811e026Dylan Noblesmith SmallString<128> FilenameBuffer; 13105f9e272e632e951b1efe824cd16acb4d96077930Chris Lattner StringRef Filename; 1311ecdcb883cbc6bb4a2445dc6f02d58d9bdb54a0edDouglas Gregor SourceLocation End; 1312e3a8256a9c1f2f1037fcb844ed7666759124a852Douglas Gregor SourceLocation CharEnd; // the end of this directive, in characters 1313ecdcb883cbc6bb4a2445dc6f02d58d9bdb54a0edDouglas Gregor 1314141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner switch (FilenameTok.getKind()) { 131584021556baceb76eedf7d44be8ba71d9b8cfaccePeter Collingbourne case tok::eod: 131684021556baceb76eedf7d44be8ba71d9b8cfaccePeter Collingbourne // If the token kind is EOD, the error has already been diagnosed. 1317141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner return; 13181eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 1319141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner case tok::angle_string_literal: 1320ddeea5644367c9c153c9fee9e51bdea85ce43cbdBenjamin Kramer case tok::string_literal: 1321ddeea5644367c9c153c9fee9e51bdea85ce43cbdBenjamin Kramer Filename = getSpelling(FilenameTok, FilenameBuffer); 1322ecdcb883cbc6bb4a2445dc6f02d58d9bdb54a0edDouglas Gregor End = FilenameTok.getLocation(); 1323cfa1caa92611184f59c2f3e606c53ddcc726449aArgyrios Kyrtzidis CharEnd = End.getLocWithOffset(FilenameTok.getLength()); 1324141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner break; 13251eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 1326141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner case tok::less: 1327141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // This could be a <foo/bar.h> file coming from a macro expansion. In this 1328141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // case, glue the tokens together into FilenameBuffer and interpret those. 1329141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner FilenameBuffer.push_back('<'); 1330ecdcb883cbc6bb4a2445dc6f02d58d9bdb54a0edDouglas Gregor if (ConcatenateIncludeName(FilenameBuffer, End)) 133184021556baceb76eedf7d44be8ba71d9b8cfaccePeter Collingbourne return; // Found <eod> but no ">"? Diagnostic already emitted. 1332a139481e62fdb209d9d87a54a5733f989d2e8d51Chris Lattner Filename = FilenameBuffer.str(); 1333cfa1caa92611184f59c2f3e606c53ddcc726449aArgyrios Kyrtzidis CharEnd = End.getLocWithOffset(1); 1334141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner break; 1335141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner default: 1336141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner Diag(FilenameTok.getLocation(), diag::err_pp_expects_filename); 1337141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner DiscardUntilEndOfDirective(); 1338141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner return; 1339141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } 13401eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 1341f8afcffe6a0213760b64c211812b1750e1e1e967Argyrios Kyrtzidis CharSourceRange FilenameRange 1342f8afcffe6a0213760b64c211812b1750e1e1e967Argyrios Kyrtzidis = CharSourceRange::getCharRange(FilenameTok.getLocation(), CharEnd); 13434c55c54db8e676aa3e042188773d9d82d59fff91Aaron Ballman StringRef OriginalFilename = Filename; 1344193575455e00eca03fd7177f60e3f2e6263cb661Kovarththanan Rajaratnam bool isAngled = 1345a139481e62fdb209d9d87a54a5733f989d2e8d51Chris Lattner GetIncludeFilenameSpelling(FilenameTok.getLocation(), Filename); 1346141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // If GetIncludeFilenameSpelling set the start ptr to null, there was an 1347141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // error. 1348a139481e62fdb209d9d87a54a5733f989d2e8d51Chris Lattner if (Filename.empty()) { 1349141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner DiscardUntilEndOfDirective(); 1350141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner return; 1351141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } 13521eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 135384021556baceb76eedf7d44be8ba71d9b8cfaccePeter Collingbourne // Verify that there is nothing after the filename, other than EOD. Note that 13549cb51ce03caf0755759f7e67aea7d4be684ff738Chris Lattner // we allow macros that expand to nothing after the filename, because this 13559cb51ce03caf0755759f7e67aea7d4be684ff738Chris Lattner // falls into the category of "#include pp-tokens new-line" specified in 13569cb51ce03caf0755759f7e67aea7d4be684ff738Chris Lattner // C99 6.10.2p4. 1357e013d685c6689ac7ae103ee88acf573422d1ed6aDaniel Dunbar CheckEndOfDirective(IncludeTok.getIdentifierInfo()->getNameStart(), true); 1358141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 1359141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Check that we don't have infinite #include recursion. 13603692b09faa9fe346f39bc922db6dce48cdcc3f63Chris Lattner if (IncludeMacroStack.size() == MaxAllowedIncludeStackDepth-1) { 13613692b09faa9fe346f39bc922db6dce48cdcc3f63Chris Lattner Diag(FilenameTok, diag::err_pp_include_too_deep); 13623692b09faa9fe346f39bc922db6dce48cdcc3f63Chris Lattner return; 13633692b09faa9fe346f39bc922db6dce48cdcc3f63Chris Lattner } 13641eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 13658dfac0baaf0f81d3945bcb306480e358ba8d1f08John McCall // Complain about attempts to #include files in an audit pragma. 13668dfac0baaf0f81d3945bcb306480e358ba8d1f08John McCall if (PragmaARCCFCodeAuditedLoc.isValid()) { 13678dfac0baaf0f81d3945bcb306480e358ba8d1f08John McCall Diag(HashLoc, diag::err_pp_include_in_arc_cf_code_audited); 13688dfac0baaf0f81d3945bcb306480e358ba8d1f08John McCall Diag(PragmaARCCFCodeAuditedLoc, diag::note_pragma_entered_here); 13698dfac0baaf0f81d3945bcb306480e358ba8d1f08John McCall 13708dfac0baaf0f81d3945bcb306480e358ba8d1f08John McCall // Immediately leave the pragma. 13718dfac0baaf0f81d3945bcb306480e358ba8d1f08John McCall PragmaARCCFCodeAuditedLoc = SourceLocation(); 13728dfac0baaf0f81d3945bcb306480e358ba8d1f08John McCall } 13738dfac0baaf0f81d3945bcb306480e358ba8d1f08John McCall 13744c55c54db8e676aa3e042188773d9d82d59fff91Aaron Ballman if (HeaderInfo.HasIncludeAliasMap()) { 13754c55c54db8e676aa3e042188773d9d82d59fff91Aaron Ballman // Map the filename with the brackets still attached. If the name doesn't 13764c55c54db8e676aa3e042188773d9d82d59fff91Aaron Ballman // map to anything, fall back on the filename we've already gotten the 13774c55c54db8e676aa3e042188773d9d82d59fff91Aaron Ballman // spelling for. 13784c55c54db8e676aa3e042188773d9d82d59fff91Aaron Ballman StringRef NewName = HeaderInfo.MapHeaderToIncludeAlias(OriginalFilename); 13794c55c54db8e676aa3e042188773d9d82d59fff91Aaron Ballman if (!NewName.empty()) 13804c55c54db8e676aa3e042188773d9d82d59fff91Aaron Ballman Filename = NewName; 13814c55c54db8e676aa3e042188773d9d82d59fff91Aaron Ballman } 13824c55c54db8e676aa3e042188773d9d82d59fff91Aaron Ballman 1383141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Search include directories. 1384141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner const DirectoryLookup *CurDir; 1385f7ccbad5d9949e7ddd1cbef43d482553b811e026Dylan Noblesmith SmallString<1024> SearchPath; 1386f7ccbad5d9949e7ddd1cbef43d482553b811e026Dylan Noblesmith SmallString<1024> RelativePath; 1387b5142bb7af5c70fffd09f05172a1379a35a9c29aChandler Carruth // We get the raw path only if we have 'Callbacks' to which we later pass 1388b5142bb7af5c70fffd09f05172a1379a35a9c29aChandler Carruth // the path. 13891a4761edca58c6b559de825b9abfb66f7f1ba94aDouglas Gregor Module *SuggestedModule = 0; 1390b5142bb7af5c70fffd09f05172a1379a35a9c29aChandler Carruth const FileEntry *File = LookupFile( 13917412494982c8b50c90961302c3a718633b2c3ab7Manuel Klimek Filename, isAngled, LookupFrom, CurDir, 1392fba18aa8f2cd1994dc65e8cb9f4be201c560dc0bDouglas Gregor Callbacks ? &SearchPath : NULL, Callbacks ? &RelativePath : NULL, 13934e4d08403ca5cfd4d558fa2936215d3a4e5a528dDavid Blaikie getLangOpts().Modules? &SuggestedModule : 0); 1394fba18aa8f2cd1994dc65e8cb9f4be201c560dc0bDouglas Gregor 13958cfbe6a31ad51cb19046607ad6b792638e69b88eDouglas Gregor if (Callbacks) { 13968cfbe6a31ad51cb19046607ad6b792638e69b88eDouglas Gregor if (!File) { 13978cfbe6a31ad51cb19046607ad6b792638e69b88eDouglas Gregor // Give the clients a chance to recover. 1398f7ccbad5d9949e7ddd1cbef43d482553b811e026Dylan Noblesmith SmallString<128> RecoveryPath; 13998cfbe6a31ad51cb19046607ad6b792638e69b88eDouglas Gregor if (Callbacks->FileNotFound(Filename, RecoveryPath)) { 14008cfbe6a31ad51cb19046607ad6b792638e69b88eDouglas Gregor if (const DirectoryEntry *DE = FileMgr.getDirectory(RecoveryPath)) { 14018cfbe6a31ad51cb19046607ad6b792638e69b88eDouglas Gregor // Add the recovery path to the list of search paths. 14021ea6bc0fd9c1ff9fa03e8a829a79c4167445d503Daniel Dunbar DirectoryLookup DL(DE, SrcMgr::C_User, false); 14038cfbe6a31ad51cb19046607ad6b792638e69b88eDouglas Gregor HeaderInfo.AddSearchPath(DL, isAngled); 14048cfbe6a31ad51cb19046607ad6b792638e69b88eDouglas Gregor 14058cfbe6a31ad51cb19046607ad6b792638e69b88eDouglas Gregor // Try the lookup again, skipping the cache. 14068cfbe6a31ad51cb19046607ad6b792638e69b88eDouglas Gregor File = LookupFile(Filename, isAngled, LookupFrom, CurDir, 0, 0, 14074e4d08403ca5cfd4d558fa2936215d3a4e5a528dDavid Blaikie getLangOpts().Modules? &SuggestedModule : 0, 14088cfbe6a31ad51cb19046607ad6b792638e69b88eDouglas Gregor /*SkipCache*/true); 14098cfbe6a31ad51cb19046607ad6b792638e69b88eDouglas Gregor } 14108cfbe6a31ad51cb19046607ad6b792638e69b88eDouglas Gregor } 14118cfbe6a31ad51cb19046607ad6b792638e69b88eDouglas Gregor } 14128cfbe6a31ad51cb19046607ad6b792638e69b88eDouglas Gregor 1413f8afcffe6a0213760b64c211812b1750e1e1e967Argyrios Kyrtzidis if (!SuggestedModule) { 1414f8afcffe6a0213760b64c211812b1750e1e1e967Argyrios Kyrtzidis // Notify the callback object that we've seen an inclusion directive. 1415f8afcffe6a0213760b64c211812b1750e1e1e967Argyrios Kyrtzidis Callbacks->InclusionDirective(HashLoc, IncludeTok, Filename, isAngled, 1416f8afcffe6a0213760b64c211812b1750e1e1e967Argyrios Kyrtzidis FilenameRange, File, 1417f8afcffe6a0213760b64c211812b1750e1e1e967Argyrios Kyrtzidis SearchPath, RelativePath, 1418f8afcffe6a0213760b64c211812b1750e1e1e967Argyrios Kyrtzidis /*ImportedModule=*/0); 1419f8afcffe6a0213760b64c211812b1750e1e1e967Argyrios Kyrtzidis } 14208cfbe6a31ad51cb19046607ad6b792638e69b88eDouglas Gregor } 14218cfbe6a31ad51cb19046607ad6b792638e69b88eDouglas Gregor 14228cfbe6a31ad51cb19046607ad6b792638e69b88eDouglas Gregor if (File == 0) { 1423a52f5a3ee2156849b3b91255c360b9f0bb1ebd51Aaron Ballman if (!SuppressIncludeNotFoundError) { 1424a52f5a3ee2156849b3b91255c360b9f0bb1ebd51Aaron Ballman // If the file could not be located and it was included via angle 1425a52f5a3ee2156849b3b91255c360b9f0bb1ebd51Aaron Ballman // brackets, we can attempt a lookup as though it were a quoted path to 1426a52f5a3ee2156849b3b91255c360b9f0bb1ebd51Aaron Ballman // provide the user with a possible fixit. 1427a52f5a3ee2156849b3b91255c360b9f0bb1ebd51Aaron Ballman if (isAngled) { 1428a52f5a3ee2156849b3b91255c360b9f0bb1ebd51Aaron Ballman File = LookupFile(Filename, false, LookupFrom, CurDir, 1429a52f5a3ee2156849b3b91255c360b9f0bb1ebd51Aaron Ballman Callbacks ? &SearchPath : 0, 1430a52f5a3ee2156849b3b91255c360b9f0bb1ebd51Aaron Ballman Callbacks ? &RelativePath : 0, 1431a52f5a3ee2156849b3b91255c360b9f0bb1ebd51Aaron Ballman getLangOpts().Modules ? &SuggestedModule : 0); 1432a52f5a3ee2156849b3b91255c360b9f0bb1ebd51Aaron Ballman if (File) { 1433a52f5a3ee2156849b3b91255c360b9f0bb1ebd51Aaron Ballman SourceRange Range(FilenameTok.getLocation(), CharEnd); 1434a52f5a3ee2156849b3b91255c360b9f0bb1ebd51Aaron Ballman Diag(FilenameTok, diag::err_pp_file_not_found_not_fatal) << 1435a52f5a3ee2156849b3b91255c360b9f0bb1ebd51Aaron Ballman Filename << 1436a52f5a3ee2156849b3b91255c360b9f0bb1ebd51Aaron Ballman FixItHint::CreateReplacement(Range, "\"" + Filename.str() + "\""); 1437a52f5a3ee2156849b3b91255c360b9f0bb1ebd51Aaron Ballman } 1438a52f5a3ee2156849b3b91255c360b9f0bb1ebd51Aaron Ballman } 1439a52f5a3ee2156849b3b91255c360b9f0bb1ebd51Aaron Ballman // If the file is still not found, just go with the vanilla diagnostic 1440a52f5a3ee2156849b3b91255c360b9f0bb1ebd51Aaron Ballman if (!File) 1441a52f5a3ee2156849b3b91255c360b9f0bb1ebd51Aaron Ballman Diag(FilenameTok, diag::err_pp_file_not_found) << Filename; 1442a52f5a3ee2156849b3b91255c360b9f0bb1ebd51Aaron Ballman } 1443a52f5a3ee2156849b3b91255c360b9f0bb1ebd51Aaron Ballman if (!File) 1444a52f5a3ee2156849b3b91255c360b9f0bb1ebd51Aaron Ballman return; 14458cfbe6a31ad51cb19046607ad6b792638e69b88eDouglas Gregor } 14468cfbe6a31ad51cb19046607ad6b792638e69b88eDouglas Gregor 1447fba18aa8f2cd1994dc65e8cb9f4be201c560dc0bDouglas Gregor // If we are supposed to import a module rather than including the header, 1448fba18aa8f2cd1994dc65e8cb9f4be201c560dc0bDouglas Gregor // do so now. 1449c69c42e939e6bdaa56d162cc36da4f6b6c53e8dbDouglas Gregor if (SuggestedModule) { 14503d3589db579f7695667b913c5043dd264ebe546fDouglas Gregor // Compute the module access path corresponding to this module. 14513d3589db579f7695667b913c5043dd264ebe546fDouglas Gregor // FIXME: Should we have a second loadModule() overload to avoid this 14523d3589db579f7695667b913c5043dd264ebe546fDouglas Gregor // extra lookup step? 1453cfa88f893915ceb8ae4ce2f17c46c24a4d67502fDmitri Gribenko SmallVector<std::pair<IdentifierInfo *, SourceLocation>, 2> Path; 14541a4761edca58c6b559de825b9abfb66f7f1ba94aDouglas Gregor for (Module *Mod = SuggestedModule; Mod; Mod = Mod->Parent) 14553d3589db579f7695667b913c5043dd264ebe546fDouglas Gregor Path.push_back(std::make_pair(getIdentifierInfo(Mod->Name), 14563d3589db579f7695667b913c5043dd264ebe546fDouglas Gregor FilenameTok.getLocation())); 14573d3589db579f7695667b913c5043dd264ebe546fDouglas Gregor std::reverse(Path.begin(), Path.end()); 14583d3589db579f7695667b913c5043dd264ebe546fDouglas Gregor 1459e3a8256a9c1f2f1037fcb844ed7666759124a852Douglas Gregor // Warn that we're replacing the include/import with a module import. 1460f7ccbad5d9949e7ddd1cbef43d482553b811e026Dylan Noblesmith SmallString<128> PathString; 1461e3a8256a9c1f2f1037fcb844ed7666759124a852Douglas Gregor for (unsigned I = 0, N = Path.size(); I != N; ++I) { 1462e3a8256a9c1f2f1037fcb844ed7666759124a852Douglas Gregor if (I) 1463e3a8256a9c1f2f1037fcb844ed7666759124a852Douglas Gregor PathString += '.'; 1464e3a8256a9c1f2f1037fcb844ed7666759124a852Douglas Gregor PathString += Path[I].first->getName(); 1465e3a8256a9c1f2f1037fcb844ed7666759124a852Douglas Gregor } 1466e3a8256a9c1f2f1037fcb844ed7666759124a852Douglas Gregor int IncludeKind = 0; 1467e3a8256a9c1f2f1037fcb844ed7666759124a852Douglas Gregor 1468e3a8256a9c1f2f1037fcb844ed7666759124a852Douglas Gregor switch (IncludeTok.getIdentifierInfo()->getPPKeywordID()) { 1469e3a8256a9c1f2f1037fcb844ed7666759124a852Douglas Gregor case tok::pp_include: 1470e3a8256a9c1f2f1037fcb844ed7666759124a852Douglas Gregor IncludeKind = 0; 1471e3a8256a9c1f2f1037fcb844ed7666759124a852Douglas Gregor break; 1472e3a8256a9c1f2f1037fcb844ed7666759124a852Douglas Gregor 1473e3a8256a9c1f2f1037fcb844ed7666759124a852Douglas Gregor case tok::pp_import: 1474e3a8256a9c1f2f1037fcb844ed7666759124a852Douglas Gregor IncludeKind = 1; 1475e3a8256a9c1f2f1037fcb844ed7666759124a852Douglas Gregor break; 1476e3a8256a9c1f2f1037fcb844ed7666759124a852Douglas Gregor 1477edee9699964a1f38892c74acc555883bf26b51a3Douglas Gregor case tok::pp_include_next: 1478edee9699964a1f38892c74acc555883bf26b51a3Douglas Gregor IncludeKind = 2; 1479edee9699964a1f38892c74acc555883bf26b51a3Douglas Gregor break; 1480e3a8256a9c1f2f1037fcb844ed7666759124a852Douglas Gregor 1481e3a8256a9c1f2f1037fcb844ed7666759124a852Douglas Gregor case tok::pp___include_macros: 1482e3a8256a9c1f2f1037fcb844ed7666759124a852Douglas Gregor IncludeKind = 3; 1483e3a8256a9c1f2f1037fcb844ed7666759124a852Douglas Gregor break; 1484e3a8256a9c1f2f1037fcb844ed7666759124a852Douglas Gregor 1485e3a8256a9c1f2f1037fcb844ed7666759124a852Douglas Gregor default: 1486e3a8256a9c1f2f1037fcb844ed7666759124a852Douglas Gregor llvm_unreachable("unknown include directive kind"); 1487e3a8256a9c1f2f1037fcb844ed7666759124a852Douglas Gregor } 1488e3a8256a9c1f2f1037fcb844ed7666759124a852Douglas Gregor 14895e3f9223db88227d6d21679c613b139d8160186dDouglas Gregor // Determine whether we are actually building the module that this 14905e3f9223db88227d6d21679c613b139d8160186dDouglas Gregor // include directive maps to. 14915e3f9223db88227d6d21679c613b139d8160186dDouglas Gregor bool BuildingImportedModule 14924e4d08403ca5cfd4d558fa2936215d3a4e5a528dDavid Blaikie = Path[0].first->getName() == getLangOpts().CurrentModule; 14935e3f9223db88227d6d21679c613b139d8160186dDouglas Gregor 14944e4d08403ca5cfd4d558fa2936215d3a4e5a528dDavid Blaikie if (!BuildingImportedModule && getLangOpts().ObjC2) { 14955e3f9223db88227d6d21679c613b139d8160186dDouglas Gregor // If we're not building the imported module, warn that we're going 14965e3f9223db88227d6d21679c613b139d8160186dDouglas Gregor // to automatically turn this inclusion directive into a module import. 1497c13a34b690d2dc2a03c2fea75a0a1438636c19ceDouglas Gregor // We only do this in Objective-C, where we have a module-import syntax. 14985e3f9223db88227d6d21679c613b139d8160186dDouglas Gregor CharSourceRange ReplaceRange(SourceRange(HashLoc, CharEnd), 14995e3f9223db88227d6d21679c613b139d8160186dDouglas Gregor /*IsTokenRange=*/false); 15005e3f9223db88227d6d21679c613b139d8160186dDouglas Gregor Diag(HashLoc, diag::warn_auto_module_import) 15015e3f9223db88227d6d21679c613b139d8160186dDouglas Gregor << IncludeKind << PathString 15025e3f9223db88227d6d21679c613b139d8160186dDouglas Gregor << FixItHint::CreateReplacement(ReplaceRange, 15031b257afbae854c6817f26b7d61c4fed8ff7aebadDouglas Gregor "@import " + PathString.str().str() + ";"); 15045e3f9223db88227d6d21679c613b139d8160186dDouglas Gregor } 1505e3a8256a9c1f2f1037fcb844ed7666759124a852Douglas Gregor 15063d3589db579f7695667b913c5043dd264ebe546fDouglas Gregor // Load the module. 15075e35693721364673f8196e4f5a370f56b92e6053Douglas Gregor // If this was an #__include_macros directive, only make macros visible. 15085e35693721364673f8196e4f5a370f56b92e6053Douglas Gregor Module::NameVisibilityKind Visibility 15095e35693721364673f8196e4f5a370f56b92e6053Douglas Gregor = (IncludeKind == 3)? Module::MacrosVisible : Module::AllVisible; 1510463d90986ec54c62bf8fe31193ef5db701db48a5Douglas Gregor ModuleLoadResult Imported 1511305dc3ebaa0bea5f3b789e4b54afc79c25907615Douglas Gregor = TheModuleLoader.loadModule(IncludeTok.getLocation(), Path, Visibility, 1512305dc3ebaa0bea5f3b789e4b54afc79c25907615Douglas Gregor /*IsIncludeDirective=*/true); 1513eb788e9b49d55bbbc661f1a9db8a54525ecdd0bcArgyrios Kyrtzidis assert((Imported == 0 || Imported == SuggestedModule) && 1514eb788e9b49d55bbbc661f1a9db8a54525ecdd0bcArgyrios Kyrtzidis "the imported module is different than the suggested one"); 15155e3f9223db88227d6d21679c613b139d8160186dDouglas Gregor 15165e3f9223db88227d6d21679c613b139d8160186dDouglas Gregor // If this header isn't part of the module we're building, we're done. 1517f8afcffe6a0213760b64c211812b1750e1e1e967Argyrios Kyrtzidis if (!BuildingImportedModule && Imported) { 1518f8afcffe6a0213760b64c211812b1750e1e1e967Argyrios Kyrtzidis if (Callbacks) { 1519f8afcffe6a0213760b64c211812b1750e1e1e967Argyrios Kyrtzidis Callbacks->InclusionDirective(HashLoc, IncludeTok, Filename, isAngled, 1520f8afcffe6a0213760b64c211812b1750e1e1e967Argyrios Kyrtzidis FilenameRange, File, 1521f8afcffe6a0213760b64c211812b1750e1e1e967Argyrios Kyrtzidis SearchPath, RelativePath, Imported); 1522f8afcffe6a0213760b64c211812b1750e1e1e967Argyrios Kyrtzidis } 15235e3f9223db88227d6d21679c613b139d8160186dDouglas Gregor return; 1524f8afcffe6a0213760b64c211812b1750e1e1e967Argyrios Kyrtzidis } 1525463d90986ec54c62bf8fe31193ef5db701db48a5Douglas Gregor 1526463d90986ec54c62bf8fe31193ef5db701db48a5Douglas Gregor // If we failed to find a submodule that we expected to find, we can 1527463d90986ec54c62bf8fe31193ef5db701db48a5Douglas Gregor // continue. Otherwise, there's an error in the included file, so we 1528463d90986ec54c62bf8fe31193ef5db701db48a5Douglas Gregor // don't want to include it. 1529463d90986ec54c62bf8fe31193ef5db701db48a5Douglas Gregor if (!BuildingImportedModule && !Imported.isMissingExpected()) { 1530463d90986ec54c62bf8fe31193ef5db701db48a5Douglas Gregor return; 1531463d90986ec54c62bf8fe31193ef5db701db48a5Douglas Gregor } 1532f8afcffe6a0213760b64c211812b1750e1e1e967Argyrios Kyrtzidis } 1533f8afcffe6a0213760b64c211812b1750e1e1e967Argyrios Kyrtzidis 1534f8afcffe6a0213760b64c211812b1750e1e1e967Argyrios Kyrtzidis if (Callbacks && SuggestedModule) { 1535f8afcffe6a0213760b64c211812b1750e1e1e967Argyrios Kyrtzidis // We didn't notify the callback object that we've seen an inclusion 1536f8afcffe6a0213760b64c211812b1750e1e1e967Argyrios Kyrtzidis // directive before. Now that we are parsing the include normally and not 1537f8afcffe6a0213760b64c211812b1750e1e1e967Argyrios Kyrtzidis // turning it to a module import, notify the callback object. 1538f8afcffe6a0213760b64c211812b1750e1e1e967Argyrios Kyrtzidis Callbacks->InclusionDirective(HashLoc, IncludeTok, Filename, isAngled, 1539f8afcffe6a0213760b64c211812b1750e1e1e967Argyrios Kyrtzidis FilenameRange, File, 1540f8afcffe6a0213760b64c211812b1750e1e1e967Argyrios Kyrtzidis SearchPath, RelativePath, 1541f8afcffe6a0213760b64c211812b1750e1e1e967Argyrios Kyrtzidis /*ImportedModule=*/0); 1542fba18aa8f2cd1994dc65e8cb9f4be201c560dc0bDouglas Gregor } 1543fba18aa8f2cd1994dc65e8cb9f4be201c560dc0bDouglas Gregor 1544721818304ac462d8c6ce05eecd02884033db78f1Chris Lattner // The #included file will be considered to be a system header if either it is 1545721818304ac462d8c6ce05eecd02884033db78f1Chris Lattner // in a system include directory, or if the #includer is a system include 1546721818304ac462d8c6ce05eecd02884033db78f1Chris Lattner // header. 15471eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump SrcMgr::CharacteristicKind FileCharacter = 15480b9e736308af5397f558ffc8e780c438c2fdb563Chris Lattner std::max(HeaderInfo.getFileDirFlavor(File), 1549693faa6e6918994bc22aacf078a889bb93e0fe25Chris Lattner SourceMgr.getFileCharacteristic(FilenameTok.getLocation())); 15501eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 15516fbe3ebeaef08665a37423f8425314c90b8b5bcfChris Lattner // Ask HeaderInfo if we should enter this #include file. If not, #including 15526fbe3ebeaef08665a37423f8425314c90b8b5bcfChris Lattner // this file will have no effect. 15536fbe3ebeaef08665a37423f8425314c90b8b5bcfChris Lattner if (!HeaderInfo.ShouldEnterIncludeFile(File, isImport)) { 1554e127a0d80155b45dafe77f2b4380e5fa111a3345Chris Lattner if (Callbacks) 15556fbe3ebeaef08665a37423f8425314c90b8b5bcfChris Lattner Callbacks->FileSkipped(*File, FilenameTok, FileCharacter); 15566fbe3ebeaef08665a37423f8425314c90b8b5bcfChris Lattner return; 15576fbe3ebeaef08665a37423f8425314c90b8b5bcfChris Lattner } 15586fbe3ebeaef08665a37423f8425314c90b8b5bcfChris Lattner 1559141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Look up the file, create a File ID for it. 1560db81d38d9cd468a9eeffe8ab092be4d48e43888eArgyrios Kyrtzidis SourceLocation IncludePos = End; 1561db81d38d9cd468a9eeffe8ab092be4d48e43888eArgyrios Kyrtzidis // If the filename string was the result of macro expansions, set the include 1562db81d38d9cd468a9eeffe8ab092be4d48e43888eArgyrios Kyrtzidis // position on the file where it will be included and after the expansions. 1563db81d38d9cd468a9eeffe8ab092be4d48e43888eArgyrios Kyrtzidis if (IncludePos.isMacroID()) 1564db81d38d9cd468a9eeffe8ab092be4d48e43888eArgyrios Kyrtzidis IncludePos = SourceMgr.getExpansionRange(IncludePos).second; 1565db81d38d9cd468a9eeffe8ab092be4d48e43888eArgyrios Kyrtzidis FileID FID = SourceMgr.createFileID(File, IncludePos, FileCharacter); 1566d57b7ff9bebc4c45f325fc1be6f238cfcd4c3732Peter Collingbourne assert(!FID.isInvalid() && "Expected valid file ID"); 1567141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 1568141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Finally, if all is good, enter the new file! 1569e127a0d80155b45dafe77f2b4380e5fa111a3345Chris Lattner EnterSourceFile(FID, CurDir, FilenameTok.getLocation()); 1570141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner} 1571141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 1572dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// HandleIncludeNextDirective - Implements \#include_next. 1573141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner/// 1574ecdcb883cbc6bb4a2445dc6f02d58d9bdb54a0edDouglas Gregorvoid Preprocessor::HandleIncludeNextDirective(SourceLocation HashLoc, 1575ecdcb883cbc6bb4a2445dc6f02d58d9bdb54a0edDouglas Gregor Token &IncludeNextTok) { 1576141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner Diag(IncludeNextTok, diag::ext_pp_include_next_directive); 15771eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 1578141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // #include_next is like #include, except that we start searching after 1579141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // the current found directory. If we can't do this, issue a 1580141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // diagnostic. 1581141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner const DirectoryLookup *Lookup = CurDirLookup; 1582141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner if (isInPrimaryFile()) { 1583141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner Lookup = 0; 1584141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner Diag(IncludeNextTok, diag::pp_include_next_in_primary); 1585141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } else if (Lookup == 0) { 1586141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner Diag(IncludeNextTok, diag::pp_include_next_absolute_path); 1587141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } else { 1588141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Start looking up in the next directory. 1589141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner ++Lookup; 1590141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } 15911eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 1592ecdcb883cbc6bb4a2445dc6f02d58d9bdb54a0edDouglas Gregor return HandleIncludeDirective(HashLoc, IncludeNextTok, Lookup); 1593141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner} 1594141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 1595dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// HandleMicrosoftImportDirective - Implements \#import for Microsoft Mode 15964207edaf03da28fa917a94b31c5c1eef0e6417dcAaron Ballmanvoid Preprocessor::HandleMicrosoftImportDirective(Token &Tok) { 15974207edaf03da28fa917a94b31c5c1eef0e6417dcAaron Ballman // The Microsoft #import directive takes a type library and generates header 15984207edaf03da28fa917a94b31c5c1eef0e6417dcAaron Ballman // files from it, and includes those. This is beyond the scope of what clang 15994207edaf03da28fa917a94b31c5c1eef0e6417dcAaron Ballman // does, so we ignore it and error out. However, #import can optionally have 16004207edaf03da28fa917a94b31c5c1eef0e6417dcAaron Ballman // trailing attributes that span multiple lines. We're going to eat those 16014207edaf03da28fa917a94b31c5c1eef0e6417dcAaron Ballman // so we can continue processing from there. 16024207edaf03da28fa917a94b31c5c1eef0e6417dcAaron Ballman Diag(Tok, diag::err_pp_import_directive_ms ); 16034207edaf03da28fa917a94b31c5c1eef0e6417dcAaron Ballman 16044207edaf03da28fa917a94b31c5c1eef0e6417dcAaron Ballman // Read tokens until we get to the end of the directive. Note that the 16054207edaf03da28fa917a94b31c5c1eef0e6417dcAaron Ballman // directive can be split over multiple lines using the backslash character. 16064207edaf03da28fa917a94b31c5c1eef0e6417dcAaron Ballman DiscardUntilEndOfDirective(); 16074207edaf03da28fa917a94b31c5c1eef0e6417dcAaron Ballman} 16084207edaf03da28fa917a94b31c5c1eef0e6417dcAaron Ballman 1609dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// HandleImportDirective - Implements \#import. 1610141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner/// 1611ecdcb883cbc6bb4a2445dc6f02d58d9bdb54a0edDouglas Gregorvoid Preprocessor::HandleImportDirective(SourceLocation HashLoc, 1612ecdcb883cbc6bb4a2445dc6f02d58d9bdb54a0edDouglas Gregor Token &ImportTok) { 16134207edaf03da28fa917a94b31c5c1eef0e6417dcAaron Ballman if (!LangOpts.ObjC1) { // #import is standard for ObjC. 16144207edaf03da28fa917a94b31c5c1eef0e6417dcAaron Ballman if (LangOpts.MicrosoftMode) 16154207edaf03da28fa917a94b31c5c1eef0e6417dcAaron Ballman return HandleMicrosoftImportDirective(ImportTok); 1616b627c8d683c4d3facd774c432b1fdc2d35819369Chris Lattner Diag(ImportTok, diag::ext_pp_import_directive); 16174207edaf03da28fa917a94b31c5c1eef0e6417dcAaron Ballman } 1618ecdcb883cbc6bb4a2445dc6f02d58d9bdb54a0edDouglas Gregor return HandleIncludeDirective(HashLoc, ImportTok, 0, true); 1619141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner} 1620141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 1621de076650fa79a02743b5fe57a72f991ba24779f9Chris Lattner/// HandleIncludeMacrosDirective - The -imacros command line option turns into a 1622de076650fa79a02743b5fe57a72f991ba24779f9Chris Lattner/// pseudo directive in the predefines buffer. This handles it by sucking all 1623de076650fa79a02743b5fe57a72f991ba24779f9Chris Lattner/// tokens through the preprocessor and discarding them (only keeping the side 1624de076650fa79a02743b5fe57a72f991ba24779f9Chris Lattner/// effects on the preprocessor). 1625ecdcb883cbc6bb4a2445dc6f02d58d9bdb54a0edDouglas Gregorvoid Preprocessor::HandleIncludeMacrosDirective(SourceLocation HashLoc, 1626ecdcb883cbc6bb4a2445dc6f02d58d9bdb54a0edDouglas Gregor Token &IncludeMacrosTok) { 1627de076650fa79a02743b5fe57a72f991ba24779f9Chris Lattner // This directive should only occur in the predefines buffer. If not, emit an 1628de076650fa79a02743b5fe57a72f991ba24779f9Chris Lattner // error and reject it. 1629de076650fa79a02743b5fe57a72f991ba24779f9Chris Lattner SourceLocation Loc = IncludeMacrosTok.getLocation(); 1630de076650fa79a02743b5fe57a72f991ba24779f9Chris Lattner if (strcmp(SourceMgr.getBufferName(Loc), "<built-in>") != 0) { 1631de076650fa79a02743b5fe57a72f991ba24779f9Chris Lattner Diag(IncludeMacrosTok.getLocation(), 1632de076650fa79a02743b5fe57a72f991ba24779f9Chris Lattner diag::pp_include_macros_out_of_predefines); 1633de076650fa79a02743b5fe57a72f991ba24779f9Chris Lattner DiscardUntilEndOfDirective(); 1634de076650fa79a02743b5fe57a72f991ba24779f9Chris Lattner return; 1635de076650fa79a02743b5fe57a72f991ba24779f9Chris Lattner } 16361eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 1637fd10511b3e686c5b045f8324b0632f3624d9ef05Chris Lattner // Treat this as a normal #include for checking purposes. If this is 1638fd10511b3e686c5b045f8324b0632f3624d9ef05Chris Lattner // successful, it will push a new lexer onto the include stack. 1639ecdcb883cbc6bb4a2445dc6f02d58d9bdb54a0edDouglas Gregor HandleIncludeDirective(HashLoc, IncludeMacrosTok, 0, false); 16401eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 1641fd10511b3e686c5b045f8324b0632f3624d9ef05Chris Lattner Token TmpTok; 1642fd10511b3e686c5b045f8324b0632f3624d9ef05Chris Lattner do { 1643fd10511b3e686c5b045f8324b0632f3624d9ef05Chris Lattner Lex(TmpTok); 1644fd10511b3e686c5b045f8324b0632f3624d9ef05Chris Lattner assert(TmpTok.isNot(tok::eof) && "Didn't find end of -imacros!"); 1645fd10511b3e686c5b045f8324b0632f3624d9ef05Chris Lattner } while (TmpTok.isNot(tok::hashhash)); 1646de076650fa79a02743b5fe57a72f991ba24779f9Chris Lattner} 1647de076650fa79a02743b5fe57a72f991ba24779f9Chris Lattner 1648141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner//===----------------------------------------------------------------------===// 1649141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner// Preprocessor Macro Directive Handling. 1650141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner//===----------------------------------------------------------------------===// 1651141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 1652141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner/// ReadMacroDefinitionArgList - The ( starting an argument list of a macro 1653141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner/// definition has just been read. Lex the rest of the arguments and the 1654141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner/// closing ), updating MI with what we learn. Return true if an error occurs 1655141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner/// parsing the arg list. 1656e2e8768c290ceceb3ac2e369b5243f40d6c0e3e2Abramo Bagnarabool Preprocessor::ReadMacroDefinitionArgList(MacroInfo *MI, Token &Tok) { 16575f9e272e632e951b1efe824cd16acb4d96077930Chris Lattner SmallVector<IdentifierInfo*, 32> Arguments; 16581eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 1659141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner while (1) { 1660141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner LexUnexpandedToken(Tok); 1661141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner switch (Tok.getKind()) { 1662141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner case tok::r_paren: 1663141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Found the end of the argument list. 1664cf29e0716bb3ecbbc15b74cd648367d6b075fdf0Chris Lattner if (Arguments.empty()) // #define FOO() 1665141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner return false; 1666141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Otherwise we have #define FOO(A,) 1667141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner Diag(Tok, diag::err_pp_expected_ident_in_arg_list); 1668141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner return true; 1669141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner case tok::ellipsis: // #define X(... -> C99 varargs 16704e4d08403ca5cfd4d558fa2936215d3a4e5a528dDavid Blaikie if (!LangOpts.C99) 167180ad52f327b532bded5c5b0ee38779d841c6cd35Richard Smith Diag(Tok, LangOpts.CPlusPlus11 ? 1672661a99690bc133bbaa029da925481d4a860dec90Richard Smith diag::warn_cxx98_compat_variadic_macro : 1673661a99690bc133bbaa029da925481d4a860dec90Richard Smith diag::ext_variadic_macro); 1674141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 1675617bb317a7aeb6c3468a4170a5d6c1058da7cea1Joey Gouly // OpenCL v1.2 s6.9.e: variadic macros are not supported. 1676617bb317a7aeb6c3468a4170a5d6c1058da7cea1Joey Gouly if (LangOpts.OpenCL) { 1677617bb317a7aeb6c3468a4170a5d6c1058da7cea1Joey Gouly Diag(Tok, diag::err_pp_opencl_variadic_macros); 1678617bb317a7aeb6c3468a4170a5d6c1058da7cea1Joey Gouly return true; 1679617bb317a7aeb6c3468a4170a5d6c1058da7cea1Joey Gouly } 1680617bb317a7aeb6c3468a4170a5d6c1058da7cea1Joey Gouly 1681141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Lex the token after the identifier. 1682141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner LexUnexpandedToken(Tok); 1683141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner if (Tok.isNot(tok::r_paren)) { 1684141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner Diag(Tok, diag::err_pp_missing_rparen_in_macro_def); 1685141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner return true; 1686141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } 1687141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Add the __VA_ARGS__ identifier as an argument. 1688141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner Arguments.push_back(Ident__VA_ARGS__); 1689141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner MI->setIsC99Varargs(); 1690685befeb5f6472585bae473a6389e47cab9eac67Chris Lattner MI->setArgumentList(&Arguments[0], Arguments.size(), BP); 1691141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner return false; 169284021556baceb76eedf7d44be8ba71d9b8cfaccePeter Collingbourne case tok::eod: // #define X( 1693141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner Diag(Tok, diag::err_pp_missing_rparen_in_macro_def); 1694141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner return true; 1695141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner default: 1696141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Handle keywords and identifiers here to accept things like 1697141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // #define Foo(for) for. 1698141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner IdentifierInfo *II = Tok.getIdentifierInfo(); 1699141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner if (II == 0) { 1700141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // #define X(1 1701141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner Diag(Tok, diag::err_pp_invalid_tok_in_arg_list); 1702141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner return true; 1703141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } 1704141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 1705141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // If this is already used as an argument, it is used multiple times (e.g. 1706141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // #define X(A,A. 17071eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump if (std::find(Arguments.begin(), Arguments.end(), II) != 1708141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner Arguments.end()) { // C99 6.10.3p6 17096cf3ed7be70a7a9c269a65e3316884f41c7373d4Chris Lattner Diag(Tok, diag::err_pp_duplicate_name_in_arg_list) << II; 1710141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner return true; 1711141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } 17121eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 1713141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Add the argument to the macro info. 1714141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner Arguments.push_back(II); 17151eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 1716141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Lex the token after the identifier. 1717141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner LexUnexpandedToken(Tok); 17181eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 1719141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner switch (Tok.getKind()) { 1720141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner default: // #define X(A B 1721141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner Diag(Tok, diag::err_pp_expected_comma_in_arg_list); 1722141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner return true; 1723141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner case tok::r_paren: // #define X(A) 1724685befeb5f6472585bae473a6389e47cab9eac67Chris Lattner MI->setArgumentList(&Arguments[0], Arguments.size(), BP); 1725141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner return false; 1726141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner case tok::comma: // #define X(A, 1727141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner break; 1728141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner case tok::ellipsis: // #define X(A... -> GCC extension 1729141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Diagnose extension. 1730141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner Diag(Tok, diag::ext_named_variadic_macro); 17311eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 1732141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Lex the token after the identifier. 1733141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner LexUnexpandedToken(Tok); 1734141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner if (Tok.isNot(tok::r_paren)) { 1735141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner Diag(Tok, diag::err_pp_missing_rparen_in_macro_def); 1736141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner return true; 1737141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } 17381eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 1739141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner MI->setIsGNUVarargs(); 1740685befeb5f6472585bae473a6389e47cab9eac67Chris Lattner MI->setArgumentList(&Arguments[0], Arguments.size(), BP); 1741141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner return false; 1742141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } 1743141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } 1744141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } 1745141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner} 1746141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 1747dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// HandleDefineDirective - Implements \#define. This consumes the entire macro 1748141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner/// line then lets the caller lex the next real token. 1749141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattnervoid Preprocessor::HandleDefineDirective(Token &DefineTok) { 1750141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner ++NumDefined; 1751141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 1752141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner Token MacroNameTok; 1753141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner ReadMacroName(MacroNameTok, 1); 17541eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 1755141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Error reading macro name? If so, diagnostic already issued. 175684021556baceb76eedf7d44be8ba71d9b8cfaccePeter Collingbourne if (MacroNameTok.is(tok::eod)) 1757141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner return; 1758141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 17592451b528fe114595d0f10ef2c05047928558ab0fChris Lattner Token LastTok = MacroNameTok; 17602451b528fe114595d0f10ef2c05047928558ab0fChris Lattner 1761141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // If we are supposed to keep comments in #defines, reenable comment saving 1762141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // mode. 1763ac6b06df32e907cac388a92310650b5895c11241Ted Kremenek if (CurLexer) CurLexer->SetCommentRetentionState(KeepMacroComments); 17641eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 1765141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Create the new macro. 17660ea76727ae91bca918a8414ed85b530eddcfedebTed Kremenek MacroInfo *MI = AllocateMacroInfo(MacroNameTok.getLocation()); 17671eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 1768141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner Token Tok; 1769141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner LexUnexpandedToken(Tok); 17701eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 1771141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // If this is a function-like macro definition, parse the argument list, 1772141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // marking each of the identifiers as being used as macro arguments. Also, 1773141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // check other constraints on the first token of the macro body. 177484021556baceb76eedf7d44be8ba71d9b8cfaccePeter Collingbourne if (Tok.is(tok::eod)) { 1775141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // If there is no body to this macro, we have no special handling here. 17766272bcfe5dc148d293ccce9db19df9e71c991cdeChris Lattner } else if (Tok.hasLeadingSpace()) { 17776272bcfe5dc148d293ccce9db19df9e71c991cdeChris Lattner // This is a normal token with leading space. Clear the leading space 17786272bcfe5dc148d293ccce9db19df9e71c991cdeChris Lattner // marker on the first token to get proper expansion. 17796272bcfe5dc148d293ccce9db19df9e71c991cdeChris Lattner Tok.clearFlag(Token::LeadingSpace); 17806272bcfe5dc148d293ccce9db19df9e71c991cdeChris Lattner } else if (Tok.is(tok::l_paren)) { 1781141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // This is a function-like macro definition. Read the argument list. 1782141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner MI->setIsFunctionLike(); 1783e2e8768c290ceceb3ac2e369b5243f40d6c0e3e2Abramo Bagnara if (ReadMacroDefinitionArgList(MI, LastTok)) { 1784141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Forget about MI. 17850ea76727ae91bca918a8414ed85b530eddcfedebTed Kremenek ReleaseMacroInfo(MI); 1786141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Throw away the rest of the line. 178760e45d4c41479fb58ad14d97efd03418e8549509Ted Kremenek if (CurPPLexer->ParsingPreprocessorDirective) 1788141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner DiscardUntilEndOfDirective(); 1789141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner return; 1790141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } 1791141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 17928fde5978a63bcce5c294a93b2a5dd424d7628971Chris Lattner // If this is a definition of a variadic C99 function-like macro, not using 17938fde5978a63bcce5c294a93b2a5dd424d7628971Chris Lattner // the GNU named varargs extension, enabled __VA_ARGS__. 17941eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 17958fde5978a63bcce5c294a93b2a5dd424d7628971Chris Lattner // "Poison" __VA_ARGS__, which can only appear in the expansion of a macro. 17968fde5978a63bcce5c294a93b2a5dd424d7628971Chris Lattner // This gets unpoisoned where it is allowed. 17978fde5978a63bcce5c294a93b2a5dd424d7628971Chris Lattner assert(Ident__VA_ARGS__->isPoisoned() && "__VA_ARGS__ should be poisoned!"); 17988fde5978a63bcce5c294a93b2a5dd424d7628971Chris Lattner if (MI->isC99Varargs()) 17998fde5978a63bcce5c294a93b2a5dd424d7628971Chris Lattner Ident__VA_ARGS__->setIsPoisoned(false); 18001eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 1801141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Read the first token after the arg list for down below. 1802141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner LexUnexpandedToken(Tok); 180380ad52f327b532bded5c5b0ee38779d841c6cd35Richard Smith } else if (LangOpts.C99 || LangOpts.CPlusPlus11) { 1804141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // C99 requires whitespace between the macro definition and the body. Emit 1805141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // a diagnostic for something like "#define X+". 18066272bcfe5dc148d293ccce9db19df9e71c991cdeChris Lattner Diag(Tok, diag::ext_c99_whitespace_required_after_macro_name); 1807141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } else { 18086272bcfe5dc148d293ccce9db19df9e71c991cdeChris Lattner // C90 6.8 TC1 says: "In the definition of an object-like macro, if the 18096272bcfe5dc148d293ccce9db19df9e71c991cdeChris Lattner // first character of a replacement list is not a character required by 18106272bcfe5dc148d293ccce9db19df9e71c991cdeChris Lattner // subclause 5.2.1, then there shall be white-space separation between the 18116272bcfe5dc148d293ccce9db19df9e71c991cdeChris Lattner // identifier and the replacement list.". 5.2.1 lists this set: 18126272bcfe5dc148d293ccce9db19df9e71c991cdeChris Lattner // "A-Za-z0-9!"#%&'()*+,_./:;<=>?[\]^_{|}~" as well as whitespace, which 18136272bcfe5dc148d293ccce9db19df9e71c991cdeChris Lattner // is irrelevant here. 18146272bcfe5dc148d293ccce9db19df9e71c991cdeChris Lattner bool isInvalid = false; 18156272bcfe5dc148d293ccce9db19df9e71c991cdeChris Lattner if (Tok.is(tok::at)) // @ is not in the list above. 18166272bcfe5dc148d293ccce9db19df9e71c991cdeChris Lattner isInvalid = true; 18176272bcfe5dc148d293ccce9db19df9e71c991cdeChris Lattner else if (Tok.is(tok::unknown)) { 18186272bcfe5dc148d293ccce9db19df9e71c991cdeChris Lattner // If we have an unknown token, it is something strange like "`". Since 18196272bcfe5dc148d293ccce9db19df9e71c991cdeChris Lattner // all of valid characters would have lexed into a single character 18206272bcfe5dc148d293ccce9db19df9e71c991cdeChris Lattner // token of some sort, we know this is not a valid case. 18216272bcfe5dc148d293ccce9db19df9e71c991cdeChris Lattner isInvalid = true; 18226272bcfe5dc148d293ccce9db19df9e71c991cdeChris Lattner } 18236272bcfe5dc148d293ccce9db19df9e71c991cdeChris Lattner if (isInvalid) 18246272bcfe5dc148d293ccce9db19df9e71c991cdeChris Lattner Diag(Tok, diag::ext_missing_whitespace_after_macro_name); 18256272bcfe5dc148d293ccce9db19df9e71c991cdeChris Lattner else 18266272bcfe5dc148d293ccce9db19df9e71c991cdeChris Lattner Diag(Tok, diag::warn_missing_whitespace_after_macro_name); 1827141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } 18282451b528fe114595d0f10ef2c05047928558ab0fChris Lattner 182984021556baceb76eedf7d44be8ba71d9b8cfaccePeter Collingbourne if (!Tok.is(tok::eod)) 18302451b528fe114595d0f10ef2c05047928558ab0fChris Lattner LastTok = Tok; 18312451b528fe114595d0f10ef2c05047928558ab0fChris Lattner 1832141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Read the rest of the macro body. 1833141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner if (MI->isObjectLike()) { 1834141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Object-like macros are very simple, just read their body. 183584021556baceb76eedf7d44be8ba71d9b8cfaccePeter Collingbourne while (Tok.isNot(tok::eod)) { 18362451b528fe114595d0f10ef2c05047928558ab0fChris Lattner LastTok = Tok; 1837141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner MI->AddTokenToBody(Tok); 1838141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Get the next token of the macro. 1839141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner LexUnexpandedToken(Tok); 1840141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } 18411eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 1842141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } else { 18433240469102eca90fa5123ec9636fa0364df3034cChris Lattner // Otherwise, read the body of a function-like macro. While we are at it, 18443240469102eca90fa5123ec9636fa0364df3034cChris Lattner // check C99 6.10.3.2p1: ensure that # operators are followed by macro 18453240469102eca90fa5123ec9636fa0364df3034cChris Lattner // parameters in function-like macro expansions. 184684021556baceb76eedf7d44be8ba71d9b8cfaccePeter Collingbourne while (Tok.isNot(tok::eod)) { 18472451b528fe114595d0f10ef2c05047928558ab0fChris Lattner LastTok = Tok; 1848141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 18494fa4b480270c14dfdcd0dfd4f76938e973082e3bEli Friedman if (Tok.isNot(tok::hash) && Tok.isNot(tok::hashhash)) { 18503240469102eca90fa5123ec9636fa0364df3034cChris Lattner MI->AddTokenToBody(Tok); 18511eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 1852141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Get the next token of the macro. 1853141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner LexUnexpandedToken(Tok); 1854141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner continue; 1855141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } 18561eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 18574fa4b480270c14dfdcd0dfd4f76938e973082e3bEli Friedman if (Tok.is(tok::hashhash)) { 18584fa4b480270c14dfdcd0dfd4f76938e973082e3bEli Friedman 18594fa4b480270c14dfdcd0dfd4f76938e973082e3bEli Friedman // If we see token pasting, check if it looks like the gcc comma 18604fa4b480270c14dfdcd0dfd4f76938e973082e3bEli Friedman // pasting extension. We'll use this information to suppress 18614fa4b480270c14dfdcd0dfd4f76938e973082e3bEli Friedman // diagnostics later on. 18624fa4b480270c14dfdcd0dfd4f76938e973082e3bEli Friedman 18634fa4b480270c14dfdcd0dfd4f76938e973082e3bEli Friedman // Get the next token of the macro. 18644fa4b480270c14dfdcd0dfd4f76938e973082e3bEli Friedman LexUnexpandedToken(Tok); 18654fa4b480270c14dfdcd0dfd4f76938e973082e3bEli Friedman 18664fa4b480270c14dfdcd0dfd4f76938e973082e3bEli Friedman if (Tok.is(tok::eod)) { 18674fa4b480270c14dfdcd0dfd4f76938e973082e3bEli Friedman MI->AddTokenToBody(LastTok); 18684fa4b480270c14dfdcd0dfd4f76938e973082e3bEli Friedman break; 18694fa4b480270c14dfdcd0dfd4f76938e973082e3bEli Friedman } 18704fa4b480270c14dfdcd0dfd4f76938e973082e3bEli Friedman 18714fa4b480270c14dfdcd0dfd4f76938e973082e3bEli Friedman unsigned NumTokens = MI->getNumTokens(); 18724fa4b480270c14dfdcd0dfd4f76938e973082e3bEli Friedman if (NumTokens && Tok.getIdentifierInfo() == Ident__VA_ARGS__ && 18734fa4b480270c14dfdcd0dfd4f76938e973082e3bEli Friedman MI->getReplacementToken(NumTokens-1).is(tok::comma)) 18744fa4b480270c14dfdcd0dfd4f76938e973082e3bEli Friedman MI->setHasCommaPasting(); 18754fa4b480270c14dfdcd0dfd4f76938e973082e3bEli Friedman 18764fa4b480270c14dfdcd0dfd4f76938e973082e3bEli Friedman // Things look ok, add the '##' and param name tokens to the macro. 18774fa4b480270c14dfdcd0dfd4f76938e973082e3bEli Friedman MI->AddTokenToBody(LastTok); 18784fa4b480270c14dfdcd0dfd4f76938e973082e3bEli Friedman MI->AddTokenToBody(Tok); 18794fa4b480270c14dfdcd0dfd4f76938e973082e3bEli Friedman LastTok = Tok; 18804fa4b480270c14dfdcd0dfd4f76938e973082e3bEli Friedman 18814fa4b480270c14dfdcd0dfd4f76938e973082e3bEli Friedman // Get the next token of the macro. 18824fa4b480270c14dfdcd0dfd4f76938e973082e3bEli Friedman LexUnexpandedToken(Tok); 18834fa4b480270c14dfdcd0dfd4f76938e973082e3bEli Friedman continue; 18844fa4b480270c14dfdcd0dfd4f76938e973082e3bEli Friedman } 18854fa4b480270c14dfdcd0dfd4f76938e973082e3bEli Friedman 1886141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Get the next token of the macro. 1887141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner LexUnexpandedToken(Tok); 18881eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 18893240469102eca90fa5123ec9636fa0364df3034cChris Lattner // Check for a valid macro arg identifier. 18903240469102eca90fa5123ec9636fa0364df3034cChris Lattner if (Tok.getIdentifierInfo() == 0 || 18913240469102eca90fa5123ec9636fa0364df3034cChris Lattner MI->getArgumentNum(Tok.getIdentifierInfo()) == -1) { 18923240469102eca90fa5123ec9636fa0364df3034cChris Lattner 18933240469102eca90fa5123ec9636fa0364df3034cChris Lattner // If this is assembler-with-cpp mode, we accept random gibberish after 18943240469102eca90fa5123ec9636fa0364df3034cChris Lattner // the '#' because '#' is often a comment character. However, change 18953240469102eca90fa5123ec9636fa0364df3034cChris Lattner // the kind of the token to tok::unknown so that the preprocessor isn't 18963240469102eca90fa5123ec9636fa0364df3034cChris Lattner // confused. 18974e4d08403ca5cfd4d558fa2936215d3a4e5a528dDavid Blaikie if (getLangOpts().AsmPreprocessor && Tok.isNot(tok::eod)) { 18983240469102eca90fa5123ec9636fa0364df3034cChris Lattner LastTok.setKind(tok::unknown); 18993240469102eca90fa5123ec9636fa0364df3034cChris Lattner } else { 19003240469102eca90fa5123ec9636fa0364df3034cChris Lattner Diag(Tok, diag::err_pp_stringize_not_parameter); 19013240469102eca90fa5123ec9636fa0364df3034cChris Lattner ReleaseMacroInfo(MI); 19021eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 19033240469102eca90fa5123ec9636fa0364df3034cChris Lattner // Disable __VA_ARGS__ again. 19043240469102eca90fa5123ec9636fa0364df3034cChris Lattner Ident__VA_ARGS__->setIsPoisoned(true); 19053240469102eca90fa5123ec9636fa0364df3034cChris Lattner return; 19063240469102eca90fa5123ec9636fa0364df3034cChris Lattner } 1907141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } 19081eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 19093240469102eca90fa5123ec9636fa0364df3034cChris Lattner // Things look ok, add the '#' and param name tokens to the macro. 19103240469102eca90fa5123ec9636fa0364df3034cChris Lattner MI->AddTokenToBody(LastTok); 1911141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner MI->AddTokenToBody(Tok); 19123240469102eca90fa5123ec9636fa0364df3034cChris Lattner LastTok = Tok; 19131eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 1914141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Get the next token of the macro. 1915141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner LexUnexpandedToken(Tok); 1916141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } 1917141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } 19181eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 19191eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 1920141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Disable __VA_ARGS__ again. 1921141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner Ident__VA_ARGS__->setIsPoisoned(true); 1922141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 1923fc8f0e14ad142ed811e90fbd9a30e419e301c717Chris Lattner // Check that there is no paste (##) operator at the beginning or end of the 1924141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // replacement list. 1925141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner unsigned NumTokens = MI->getNumTokens(); 1926141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner if (NumTokens != 0) { 1927141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner if (MI->getReplacementToken(0).is(tok::hashhash)) { 1928141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner Diag(MI->getReplacementToken(0), diag::err_paste_at_start); 19290ea76727ae91bca918a8414ed85b530eddcfedebTed Kremenek ReleaseMacroInfo(MI); 1930141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner return; 1931141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } 1932141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner if (MI->getReplacementToken(NumTokens-1).is(tok::hashhash)) { 1933141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner Diag(MI->getReplacementToken(NumTokens-1), diag::err_paste_at_end); 19340ea76727ae91bca918a8414ed85b530eddcfedebTed Kremenek ReleaseMacroInfo(MI); 1935141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner return; 1936141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } 1937141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } 19381eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 19392451b528fe114595d0f10ef2c05047928558ab0fChris Lattner MI->setDefinitionEndLoc(LastTok.getLocation()); 19401eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 1941141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Finally, if this identifier already had a macro defined for it, verify that 19428a64bb58c3b24d7d97895e435bbc0965c99bd3beAlexander Kornienko // the macro bodies are identical, and issue diagnostics if they are not. 19439818a1d443e97677dd3422305de9cc2b1fb2a8c1Argyrios Kyrtzidis if (const MacroInfo *OtherMI=getMacroInfo(MacroNameTok.getIdentifierInfo())) { 194441c3ae108a54437f27fa99ddcb9bafcf113bde80Chris Lattner // It is very common for system headers to have tons of macro redefinitions 194541c3ae108a54437f27fa99ddcb9bafcf113bde80Chris Lattner // and for warnings to be disabled in system headers. If this is the case, 194641c3ae108a54437f27fa99ddcb9bafcf113bde80Chris Lattner // then don't bother calling MacroInfo::isIdenticalTo. 19477f549dfd7b1d3b2b09e5878eeb754efae253d557Chris Lattner if (!getDiagnostics().getSuppressSystemWarnings() || 194841c3ae108a54437f27fa99ddcb9bafcf113bde80Chris Lattner !SourceMgr.isInSystemHeader(DefineTok.getLocation())) { 1949a33e0504f61132ac43f4f89af43b12c87e987c20Argyrios Kyrtzidis if (!OtherMI->isUsed() && OtherMI->isWarnIfUnused()) 195041c3ae108a54437f27fa99ddcb9bafcf113bde80Chris Lattner Diag(OtherMI->getDefinitionLoc(), diag::pp_macro_not_used); 1951141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 1952eed55e6061768c0faff62dda22c6edad9d286501Richard Smith // Warn if defining "__LINE__" and other builtins, per C99 6.10.8/4 and 1953eed55e6061768c0faff62dda22c6edad9d286501Richard Smith // C++ [cpp.predefined]p4, but allow it as an extension. 1954eed55e6061768c0faff62dda22c6edad9d286501Richard Smith if (OtherMI->isBuiltinMacro()) 1955eed55e6061768c0faff62dda22c6edad9d286501Richard Smith Diag(MacroNameTok, diag::ext_pp_redef_builtin_macro); 1956f47724bf78299c7a50f008e0443c5f9f9f279ddcChris Lattner // Macros must be identical. This means all tokens and whitespace 1957bd25ff8632e18bb3af761369fd3b0f1b48fdf061Argyrios Kyrtzidis // separation must be the same. C99 6.10.3p2. 1958eed55e6061768c0faff62dda22c6edad9d286501Richard Smith else if (!OtherMI->isAllowRedefinitionsWithoutWarning() && 1959bd25ff8632e18bb3af761369fd3b0f1b48fdf061Argyrios Kyrtzidis !MI->isIdenticalTo(*OtherMI, *this, /*Syntactic=*/LangOpts.MicrosoftExt)) { 196041c3ae108a54437f27fa99ddcb9bafcf113bde80Chris Lattner Diag(MI->getDefinitionLoc(), diag::ext_pp_macro_redef) 196141c3ae108a54437f27fa99ddcb9bafcf113bde80Chris Lattner << MacroNameTok.getIdentifierInfo(); 196241c3ae108a54437f27fa99ddcb9bafcf113bde80Chris Lattner Diag(OtherMI->getDefinitionLoc(), diag::note_previous_definition); 196341c3ae108a54437f27fa99ddcb9bafcf113bde80Chris Lattner } 1964141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } 1965a33e0504f61132ac43f4f89af43b12c87e987c20Argyrios Kyrtzidis if (OtherMI->isWarnIfUnused()) 1966a33e0504f61132ac43f4f89af43b12c87e987c20Argyrios Kyrtzidis WarnUnusedMacroLocs.erase(OtherMI->getDefinitionLoc()); 1967141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } 19681eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 1969c56fff7fd231aebf4b152f60f8f11ef91835c48aArgyrios Kyrtzidis DefMacroDirective *MD = 1970c56fff7fd231aebf4b152f60f8f11ef91835c48aArgyrios Kyrtzidis appendDefMacroDirective(MacroNameTok.getIdentifierInfo(), MI); 19711eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 19720827408865e32789e0ec4b8113a302ccdc531423Argyrios Kyrtzidis assert(!MI->isUsed()); 19730827408865e32789e0ec4b8113a302ccdc531423Argyrios Kyrtzidis // If we need warning for not using the macro, add its location in the 19740827408865e32789e0ec4b8113a302ccdc531423Argyrios Kyrtzidis // warn-because-unused-macro set. If it gets used it will be removed from set. 19750827408865e32789e0ec4b8113a302ccdc531423Argyrios Kyrtzidis if (isInPrimaryFile() && // don't warn for include'd macros. 19760827408865e32789e0ec4b8113a302ccdc531423Argyrios Kyrtzidis Diags->getDiagnosticLevel(diag::pp_macro_not_used, 1977d6471f7c1921c7802804ce3ff6fe9768310f72b9David Blaikie MI->getDefinitionLoc()) != DiagnosticsEngine::Ignored) { 19780827408865e32789e0ec4b8113a302ccdc531423Argyrios Kyrtzidis MI->setIsWarnIfUnused(true); 19790827408865e32789e0ec4b8113a302ccdc531423Argyrios Kyrtzidis WarnUnusedMacroLocs.insert(MI->getDefinitionLoc()); 19800827408865e32789e0ec4b8113a302ccdc531423Argyrios Kyrtzidis } 19810827408865e32789e0ec4b8113a302ccdc531423Argyrios Kyrtzidis 1982f4a72b07747cd6ae1a9f6974e148ae504c879349Chris Lattner // If the callbacks want to know, tell them about the macro definition. 1983f4a72b07747cd6ae1a9f6974e148ae504c879349Chris Lattner if (Callbacks) 1984c515978bd3a703aa733f846a0094ffa84d149074Argyrios Kyrtzidis Callbacks->MacroDefined(MacroNameTok, MD); 1985141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner} 1986141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 1987dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// HandleUndefDirective - Implements \#undef. 1988141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner/// 1989141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattnervoid Preprocessor::HandleUndefDirective(Token &UndefTok) { 1990141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner ++NumUndefined; 1991141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 1992141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner Token MacroNameTok; 1993141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner ReadMacroName(MacroNameTok, 2); 19941eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 1995141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Error reading macro name? If so, diagnostic already issued. 199684021556baceb76eedf7d44be8ba71d9b8cfaccePeter Collingbourne if (MacroNameTok.is(tok::eod)) 1997141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner return; 19981eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 1999141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Check to see if this is the last token on the #undef line. 200035410d5cbbb18735d76e00496540d416dc49b577Chris Lattner CheckEndOfDirective("undef"); 20011eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 2002141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Okay, we finally have a valid identifier to undef. 20039818a1d443e97677dd3422305de9cc2b1fb2a8c1Argyrios Kyrtzidis MacroDirective *MD = getMacroDirective(MacroNameTok.getIdentifierInfo()); 2004c56fff7fd231aebf4b152f60f8f11ef91835c48aArgyrios Kyrtzidis const MacroInfo *MI = MD ? MD->getMacroInfo() : 0; 20051eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 200636845474e217b952c720f4f87923bc78059640c5Argyrios Kyrtzidis // If the callbacks want to know, tell them about the macro #undef. 200736845474e217b952c720f4f87923bc78059640c5Argyrios Kyrtzidis // Note: no matter if the macro was defined or not. 200836845474e217b952c720f4f87923bc78059640c5Argyrios Kyrtzidis if (Callbacks) 2009c515978bd3a703aa733f846a0094ffa84d149074Argyrios Kyrtzidis Callbacks->MacroUndefined(MacroNameTok, MD); 201036845474e217b952c720f4f87923bc78059640c5Argyrios Kyrtzidis 2011141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // If the macro is not defined, this is a noop undef, just return. 2012141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner if (MI == 0) return; 2013141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 20141f8dcfca6c57606b9f4f96404642c02562289b83Argyrios Kyrtzidis if (!MI->isUsed() && MI->isWarnIfUnused()) 2015141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner Diag(MI->getDefinitionLoc(), diag::pp_macro_not_used); 201641c17473e3ece9e60d97c5d9397866b7730cf7eeChris Lattner 20170827408865e32789e0ec4b8113a302ccdc531423Argyrios Kyrtzidis if (MI->isWarnIfUnused()) 20180827408865e32789e0ec4b8113a302ccdc531423Argyrios Kyrtzidis WarnUnusedMacroLocs.erase(MI->getDefinitionLoc()); 20190827408865e32789e0ec4b8113a302ccdc531423Argyrios Kyrtzidis 2020c56fff7fd231aebf4b152f60f8f11ef91835c48aArgyrios Kyrtzidis appendMacroDirective(MacroNameTok.getIdentifierInfo(), 2021c56fff7fd231aebf4b152f60f8f11ef91835c48aArgyrios Kyrtzidis AllocateUndefMacroDirective(MacroNameTok.getLocation())); 2022141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner} 2023141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 2024141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 2025141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner//===----------------------------------------------------------------------===// 2026141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner// Preprocessor Conditional Directive Handling. 2027141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner//===----------------------------------------------------------------------===// 2028141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 2029dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// HandleIfdefDirective - Implements the \#ifdef/\#ifndef directive. isIfndef 2030dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// is true when this is a \#ifndef directive. ReadAnyTokensBeforeDirective is 2031dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// true if any tokens have been returned or pp-directives activated before this 2032dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// \#ifndef has been lexed. 2033141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner/// 2034141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattnervoid Preprocessor::HandleIfdefDirective(Token &Result, bool isIfndef, 2035141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner bool ReadAnyTokensBeforeDirective) { 2036141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner ++NumIf; 2037141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner Token DirectiveTok = Result; 2038141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 2039141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner Token MacroNameTok; 2040141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner ReadMacroName(MacroNameTok); 20411eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 2042141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Error reading macro name? If so, diagnostic already issued. 204384021556baceb76eedf7d44be8ba71d9b8cfaccePeter Collingbourne if (MacroNameTok.is(tok::eod)) { 2044141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Skip code until we get to #endif. This helps with recovery by not 2045141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // emitting an error when the #endif is reached. 2046141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner SkipExcludedConditionalBlock(DirectiveTok.getLocation(), 2047141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner /*Foundnonskip*/false, /*FoundElse*/false); 2048141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner return; 2049141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } 20501eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 2051141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Check to see if this is the last token on the #if[n]def line. 205235410d5cbbb18735d76e00496540d416dc49b577Chris Lattner CheckEndOfDirective(isIfndef ? "ifndef" : "ifdef"); 2053141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 205413d283d6a2f50cc4a2b03357191d49672de0eb9bChris Lattner IdentifierInfo *MII = MacroNameTok.getIdentifierInfo(); 2055c515978bd3a703aa733f846a0094ffa84d149074Argyrios Kyrtzidis MacroDirective *MD = getMacroDirective(MII); 2056c56fff7fd231aebf4b152f60f8f11ef91835c48aArgyrios Kyrtzidis MacroInfo *MI = MD ? MD->getMacroInfo() : 0; 2057193575455e00eca03fd7177f60e3f2e6263cb661Kovarththanan Rajaratnam 205860e45d4c41479fb58ad14d97efd03418e8549509Ted Kremenek if (CurPPLexer->getConditionalStackDepth() == 0) { 205913d283d6a2f50cc4a2b03357191d49672de0eb9bChris Lattner // If the start of a top-level #ifdef and if the macro is not defined, 206013d283d6a2f50cc4a2b03357191d49672de0eb9bChris Lattner // inform MIOpt that this might be the start of a proper include guard. 206113d283d6a2f50cc4a2b03357191d49672de0eb9bChris Lattner // Otherwise it is some other form of unknown conditional which we can't 206213d283d6a2f50cc4a2b03357191d49672de0eb9bChris Lattner // handle. 206313d283d6a2f50cc4a2b03357191d49672de0eb9bChris Lattner if (!ReadAnyTokensBeforeDirective && MI == 0) { 2064141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner assert(isIfndef && "#ifdef shouldn't reach here"); 206513d283d6a2f50cc4a2b03357191d49672de0eb9bChris Lattner CurPPLexer->MIOpt.EnterTopLevelIFNDEF(MII); 2066141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } else 206760e45d4c41479fb58ad14d97efd03418e8549509Ted Kremenek CurPPLexer->MIOpt.EnterTopLevelConditional(); 2068141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } 2069141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 2070141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // If there is a macro, process it. 2071141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner if (MI) // Mark it used. 20720827408865e32789e0ec4b8113a302ccdc531423Argyrios Kyrtzidis markMacroAsUsed(MI); 20731eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 2074bb660666883de8b32999c1e5fbe3c32e2cafbdf6Argyrios Kyrtzidis if (Callbacks) { 2075bb660666883de8b32999c1e5fbe3c32e2cafbdf6Argyrios Kyrtzidis if (isIfndef) 2076c515978bd3a703aa733f846a0094ffa84d149074Argyrios Kyrtzidis Callbacks->Ifndef(DirectiveTok.getLocation(), MacroNameTok, MD); 2077bb660666883de8b32999c1e5fbe3c32e2cafbdf6Argyrios Kyrtzidis else 2078c515978bd3a703aa733f846a0094ffa84d149074Argyrios Kyrtzidis Callbacks->Ifdef(DirectiveTok.getLocation(), MacroNameTok, MD); 2079bb660666883de8b32999c1e5fbe3c32e2cafbdf6Argyrios Kyrtzidis } 2080bb660666883de8b32999c1e5fbe3c32e2cafbdf6Argyrios Kyrtzidis 2081141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Should we include the stuff contained by this directive? 2082141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner if (!MI == isIfndef) { 2083141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Yes, remember that we are inside a conditional, then lex the next token. 20841d9c54df56391ac4740db27d551782e81189cb51Chris Lattner CurPPLexer->pushConditionalLevel(DirectiveTok.getLocation(), 20851d9c54df56391ac4740db27d551782e81189cb51Chris Lattner /*wasskip*/false, /*foundnonskip*/true, 20861d9c54df56391ac4740db27d551782e81189cb51Chris Lattner /*foundelse*/false); 2087141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } else { 208808985b91e5a87e7731ba24c675f2dc9f9cb645d4Craig Silverstein // No, skip the contents of this block. 2089141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner SkipExcludedConditionalBlock(DirectiveTok.getLocation(), 20901eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump /*Foundnonskip*/false, 2091141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner /*FoundElse*/false); 2092141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } 2093141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner} 2094141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 2095dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// HandleIfDirective - Implements the \#if directive. 2096141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner/// 2097141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattnervoid Preprocessor::HandleIfDirective(Token &IfToken, 2098141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner bool ReadAnyTokensBeforeDirective) { 2099141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner ++NumIf; 21001eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 210108985b91e5a87e7731ba24c675f2dc9f9cb645d4Craig Silverstein // Parse and evaluate the conditional expression. 2102141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner IdentifierInfo *IfNDefMacro = 0; 210308985b91e5a87e7731ba24c675f2dc9f9cb645d4Craig Silverstein const SourceLocation ConditionalBegin = CurPPLexer->getSourceLocation(); 210408985b91e5a87e7731ba24c675f2dc9f9cb645d4Craig Silverstein const bool ConditionalTrue = EvaluateDirectiveExpression(IfNDefMacro); 210508985b91e5a87e7731ba24c675f2dc9f9cb645d4Craig Silverstein const SourceLocation ConditionalEnd = CurPPLexer->getSourceLocation(); 21060049db6ce127cbf4671a6a81ad4dfe61fdc4aa5cNuno Lopes 21070049db6ce127cbf4671a6a81ad4dfe61fdc4aa5cNuno Lopes // If this condition is equivalent to #ifndef X, and if this is the first 21080049db6ce127cbf4671a6a81ad4dfe61fdc4aa5cNuno Lopes // directive seen, handle it for the multiple-include optimization. 210960e45d4c41479fb58ad14d97efd03418e8549509Ted Kremenek if (CurPPLexer->getConditionalStackDepth() == 0) { 211013d283d6a2f50cc4a2b03357191d49672de0eb9bChris Lattner if (!ReadAnyTokensBeforeDirective && IfNDefMacro && ConditionalTrue) 211160e45d4c41479fb58ad14d97efd03418e8549509Ted Kremenek CurPPLexer->MIOpt.EnterTopLevelIFNDEF(IfNDefMacro); 21120049db6ce127cbf4671a6a81ad4dfe61fdc4aa5cNuno Lopes else 211360e45d4c41479fb58ad14d97efd03418e8549509Ted Kremenek CurPPLexer->MIOpt.EnterTopLevelConditional(); 21140049db6ce127cbf4671a6a81ad4dfe61fdc4aa5cNuno Lopes } 21150049db6ce127cbf4671a6a81ad4dfe61fdc4aa5cNuno Lopes 2116bb660666883de8b32999c1e5fbe3c32e2cafbdf6Argyrios Kyrtzidis if (Callbacks) 2117bb660666883de8b32999c1e5fbe3c32e2cafbdf6Argyrios Kyrtzidis Callbacks->If(IfToken.getLocation(), 2118bb660666883de8b32999c1e5fbe3c32e2cafbdf6Argyrios Kyrtzidis SourceRange(ConditionalBegin, ConditionalEnd)); 2119bb660666883de8b32999c1e5fbe3c32e2cafbdf6Argyrios Kyrtzidis 2120141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Should we include the stuff contained by this directive? 2121141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner if (ConditionalTrue) { 2122141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Yes, remember that we are inside a conditional, then lex the next token. 212360e45d4c41479fb58ad14d97efd03418e8549509Ted Kremenek CurPPLexer->pushConditionalLevel(IfToken.getLocation(), /*wasskip*/false, 2124141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner /*foundnonskip*/true, /*foundelse*/false); 2125141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } else { 212608985b91e5a87e7731ba24c675f2dc9f9cb645d4Craig Silverstein // No, skip the contents of this block. 21271eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump SkipExcludedConditionalBlock(IfToken.getLocation(), /*Foundnonskip*/false, 2128141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner /*FoundElse*/false); 2129141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } 2130141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner} 2131141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 2132dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// HandleEndifDirective - Implements the \#endif directive. 2133141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner/// 2134141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattnervoid Preprocessor::HandleEndifDirective(Token &EndifToken) { 2135141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner ++NumEndif; 21361eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 2137141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // Check that this is the whole directive. 213835410d5cbbb18735d76e00496540d416dc49b577Chris Lattner CheckEndOfDirective("endif"); 21391eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 2140141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner PPConditionalInfo CondInfo; 214160e45d4c41479fb58ad14d97efd03418e8549509Ted Kremenek if (CurPPLexer->popConditionalLevel(CondInfo)) { 2142141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // No conditionals on the stack: this is an #endif without an #if. 21433692b09faa9fe346f39bc922db6dce48cdcc3f63Chris Lattner Diag(EndifToken, diag::err_pp_endif_without_if); 21443692b09faa9fe346f39bc922db6dce48cdcc3f63Chris Lattner return; 2145141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner } 21461eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 2147141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // If this the end of a top-level #endif, inform MIOpt. 214860e45d4c41479fb58ad14d97efd03418e8549509Ted Kremenek if (CurPPLexer->getConditionalStackDepth() == 0) 214960e45d4c41479fb58ad14d97efd03418e8549509Ted Kremenek CurPPLexer->MIOpt.ExitTopLevelConditional(); 21501eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 215160e45d4c41479fb58ad14d97efd03418e8549509Ted Kremenek assert(!CondInfo.WasSkipping && !CurPPLexer->LexingRawMode && 2152141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner "This code should only be reachable in the non-skipping case!"); 2153141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 215408985b91e5a87e7731ba24c675f2dc9f9cb645d4Craig Silverstein if (Callbacks) 2155bb660666883de8b32999c1e5fbe3c32e2cafbdf6Argyrios Kyrtzidis Callbacks->Endif(EndifToken.getLocation(), CondInfo.IfLoc); 215608985b91e5a87e7731ba24c675f2dc9f9cb645d4Craig Silverstein} 2157141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 2158dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// HandleElseDirective - Implements the \#else directive. 215908985b91e5a87e7731ba24c675f2dc9f9cb645d4Craig Silverstein/// 2160141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattnervoid Preprocessor::HandleElseDirective(Token &Result) { 2161141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner ++NumElse; 21621eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 2163141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // #else directive in a non-skipping conditional... start skipping. 216435410d5cbbb18735d76e00496540d416dc49b577Chris Lattner CheckEndOfDirective("else"); 21651eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 2166141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner PPConditionalInfo CI; 21673692b09faa9fe346f39bc922db6dce48cdcc3f63Chris Lattner if (CurPPLexer->popConditionalLevel(CI)) { 21683692b09faa9fe346f39bc922db6dce48cdcc3f63Chris Lattner Diag(Result, diag::pp_err_else_without_if); 21693692b09faa9fe346f39bc922db6dce48cdcc3f63Chris Lattner return; 21703692b09faa9fe346f39bc922db6dce48cdcc3f63Chris Lattner } 21711eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 2172141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // If this is a top-level #else, inform the MIOpt. 217360e45d4c41479fb58ad14d97efd03418e8549509Ted Kremenek if (CurPPLexer->getConditionalStackDepth() == 0) 217460e45d4c41479fb58ad14d97efd03418e8549509Ted Kremenek CurPPLexer->MIOpt.EnterTopLevelConditional(); 2175141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 2176141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // If this is a #else with a #else before it, report the error. 2177141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner if (CI.FoundElse) Diag(Result, diag::pp_err_else_after_else); 21781eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 2179bb660666883de8b32999c1e5fbe3c32e2cafbdf6Argyrios Kyrtzidis if (Callbacks) 2180bb660666883de8b32999c1e5fbe3c32e2cafbdf6Argyrios Kyrtzidis Callbacks->Else(Result.getLocation(), CI.IfLoc); 2181bb660666883de8b32999c1e5fbe3c32e2cafbdf6Argyrios Kyrtzidis 218208985b91e5a87e7731ba24c675f2dc9f9cb645d4Craig Silverstein // Finally, skip the rest of the contents of this block. 218308985b91e5a87e7731ba24c675f2dc9f9cb645d4Craig Silverstein SkipExcludedConditionalBlock(CI.IfLoc, /*Foundnonskip*/true, 21846b4ff04dd22e7159887ea6c1bb8b1c01fc9c70a9Argyrios Kyrtzidis /*FoundElse*/true, Result.getLocation()); 2185141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner} 2186141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 2187dc20169f3869ec7f4bfd4e62e81a21b4cb49e34dJames Dennett/// HandleElifDirective - Implements the \#elif directive. 218808985b91e5a87e7731ba24c675f2dc9f9cb645d4Craig Silverstein/// 2189141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattnervoid Preprocessor::HandleElifDirective(Token &ElifToken) { 2190141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner ++NumElse; 21911eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 2192141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // #elif directive in a non-skipping conditional... start skipping. 2193141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // We don't care what the condition is, because we will always skip it (since 2194141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // the block immediately before it was included). 219508985b91e5a87e7731ba24c675f2dc9f9cb645d4Craig Silverstein const SourceLocation ConditionalBegin = CurPPLexer->getSourceLocation(); 2196141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner DiscardUntilEndOfDirective(); 219708985b91e5a87e7731ba24c675f2dc9f9cb645d4Craig Silverstein const SourceLocation ConditionalEnd = CurPPLexer->getSourceLocation(); 2198141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 2199141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner PPConditionalInfo CI; 22003692b09faa9fe346f39bc922db6dce48cdcc3f63Chris Lattner if (CurPPLexer->popConditionalLevel(CI)) { 22013692b09faa9fe346f39bc922db6dce48cdcc3f63Chris Lattner Diag(ElifToken, diag::pp_err_elif_without_if); 22023692b09faa9fe346f39bc922db6dce48cdcc3f63Chris Lattner return; 22033692b09faa9fe346f39bc922db6dce48cdcc3f63Chris Lattner } 22041eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 2205141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // If this is a top-level #elif, inform the MIOpt. 220660e45d4c41479fb58ad14d97efd03418e8549509Ted Kremenek if (CurPPLexer->getConditionalStackDepth() == 0) 220760e45d4c41479fb58ad14d97efd03418e8549509Ted Kremenek CurPPLexer->MIOpt.EnterTopLevelConditional(); 22081eb4433ac451dc16f4133a88af2d002ac26c58efMike Stump 2209141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner // If this is a #elif with a #else before it, report the error. 2210141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner if (CI.FoundElse) Diag(ElifToken, diag::pp_err_elif_after_else); 2211bb660666883de8b32999c1e5fbe3c32e2cafbdf6Argyrios Kyrtzidis 2212bb660666883de8b32999c1e5fbe3c32e2cafbdf6Argyrios Kyrtzidis if (Callbacks) 2213bb660666883de8b32999c1e5fbe3c32e2cafbdf6Argyrios Kyrtzidis Callbacks->Elif(ElifToken.getLocation(), 2214bb660666883de8b32999c1e5fbe3c32e2cafbdf6Argyrios Kyrtzidis SourceRange(ConditionalBegin, ConditionalEnd), CI.IfLoc); 2215141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner 221608985b91e5a87e7731ba24c675f2dc9f9cb645d4Craig Silverstein // Finally, skip the rest of the contents of this block. 221708985b91e5a87e7731ba24c675f2dc9f9cb645d4Craig Silverstein SkipExcludedConditionalBlock(CI.IfLoc, /*Foundnonskip*/true, 22186b4ff04dd22e7159887ea6c1bb8b1c01fc9c70a9Argyrios Kyrtzidis /*FoundElse*/CI.FoundElse, 22196b4ff04dd22e7159887ea6c1bb8b1c01fc9c70a9Argyrios Kyrtzidis ElifToken.getLocation()); 2220141e71fec621f65ab401dbe66609f7d3c033c6a5Chris Lattner} 2221