head 1.1; branch 1.1.1; access; symbols netbsd-11-0-RC4:1.1.1.11 netbsd-11-0-RC3:1.1.1.11 netbsd-11-0-RC2:1.1.1.11 netbsd-11-0-RC1:1.1.1.11 perseant-exfatfs-base-20250801:1.1.1.11 netbsd-11:1.1.1.11.0.10 netbsd-11-base:1.1.1.11 netbsd-10-1-RELEASE:1.1.1.11 perseant-exfatfs-base-20240630:1.1.1.11 perseant-exfatfs:1.1.1.11.0.8 perseant-exfatfs-base:1.1.1.11 netbsd-8-3-RELEASE:1.1.1.8 netbsd-9-4-RELEASE:1.1.1.10 netbsd-10-0-RELEASE:1.1.1.11 netbsd-10-0-RC6:1.1.1.11 netbsd-10-0-RC5:1.1.1.11 netbsd-10-0-RC4:1.1.1.11 netbsd-10-0-RC3:1.1.1.11 netbsd-10-0-RC2:1.1.1.11 netbsd-10-0-RC1:1.1.1.11 netbsd-10:1.1.1.11.0.6 netbsd-10-base:1.1.1.11 netbsd-9-3-RELEASE:1.1.1.10 cjep_sun2x:1.1.1.11.0.4 cjep_sun2x-base:1.1.1.11 cjep_staticlib_x-base1:1.1.1.11 netbsd-9-2-RELEASE:1.1.1.10 cjep_staticlib_x:1.1.1.11.0.2 cjep_staticlib_x-base:1.1.1.11 netbsd-9-1-RELEASE:1.1.1.10 phil-wifi-20200421:1.1.1.11 phil-wifi-20200411:1.1.1.11 phil-wifi-20200406:1.1.1.11 netbsd-8-2-RELEASE:1.1.1.8 netbsd-9-0-RELEASE:1.1.1.10 netbsd-9-0-RC2:1.1.1.10 netbsd-9-0-RC1:1.1.1.10 netbsd-9:1.1.1.10.0.2 netbsd-9-base:1.1.1.10 phil-wifi-20190609:1.1.1.10 netbsd-8-1-RELEASE:1.1.1.8 netbsd-8-1-RC1:1.1.1.8 pgoyette-compat-merge-20190127:1.1.1.9.2.1 pgoyette-compat-20190127:1.1.1.10 pgoyette-compat-20190118:1.1.1.10 pgoyette-compat-1226:1.1.1.10 pgoyette-compat-1126:1.1.1.10 pgoyette-compat-1020:1.1.1.10 pgoyette-compat-0930:1.1.1.10 pgoyette-compat-0906:1.1.1.10 netbsd-7-2-RELEASE:1.1.1.5.2.1 pgoyette-compat-0728:1.1.1.10 clang-337282:1.1.1.10 netbsd-8-0-RELEASE:1.1.1.8 phil-wifi:1.1.1.9.0.4 phil-wifi-base:1.1.1.9 pgoyette-compat-0625:1.1.1.9 netbsd-8-0-RC2:1.1.1.8 pgoyette-compat-0521:1.1.1.9 pgoyette-compat-0502:1.1.1.9 pgoyette-compat-0422:1.1.1.9 netbsd-8-0-RC1:1.1.1.8 pgoyette-compat-0415:1.1.1.9 pgoyette-compat-0407:1.1.1.9 pgoyette-compat-0330:1.1.1.9 pgoyette-compat-0322:1.1.1.9 pgoyette-compat-0315:1.1.1.9 netbsd-7-1-2-RELEASE:1.1.1.5.2.1 pgoyette-compat:1.1.1.9.0.2 pgoyette-compat-base:1.1.1.9 netbsd-7-1-1-RELEASE:1.1.1.5.2.1 clang-319952:1.1.1.9 matt-nb8-mediatek:1.1.1.8.0.10 matt-nb8-mediatek-base:1.1.1.8 clang-309604:1.1.1.9 perseant-stdc-iso10646:1.1.1.8.0.8 perseant-stdc-iso10646-base:1.1.1.8 netbsd-8:1.1.1.8.0.6 netbsd-8-base:1.1.1.8 prg-localcount2-base3:1.1.1.8 prg-localcount2-base2:1.1.1.8 prg-localcount2-base1:1.1.1.8 prg-localcount2:1.1.1.8.0.4 prg-localcount2-base:1.1.1.8 pgoyette-localcount-20170426:1.1.1.8 bouyer-socketcan-base1:1.1.1.8 pgoyette-localcount-20170320:1.1.1.8 netbsd-7-1:1.1.1.5.2.1.0.6 netbsd-7-1-RELEASE:1.1.1.5.2.1 netbsd-7-1-RC2:1.1.1.5.2.1 clang-294123:1.1.1.8 netbsd-7-nhusb-base-20170116:1.1.1.5.2.1 bouyer-socketcan:1.1.1.8.0.2 bouyer-socketcan-base:1.1.1.8 clang-291444:1.1.1.8 pgoyette-localcount-20170107:1.1.1.7 netbsd-7-1-RC1:1.1.1.5.2.1 pgoyette-localcount-20161104:1.1.1.7 netbsd-7-0-2-RELEASE:1.1.1.5.2.1 localcount-20160914:1.1.1.7 netbsd-7-nhusb:1.1.1.5.2.1.0.4 netbsd-7-nhusb-base:1.1.1.5.2.1 clang-280599:1.1.1.7 pgoyette-localcount-20160806:1.1.1.7 pgoyette-localcount-20160726:1.1.1.7 pgoyette-localcount:1.1.1.7.0.2 pgoyette-localcount-base:1.1.1.7 netbsd-7-0-1-RELEASE:1.1.1.5.2.1 clang-261930:1.1.1.7 netbsd-7-0:1.1.1.5.2.1.0.2 netbsd-7-0-RELEASE:1.1.1.5.2.1 netbsd-7-0-RC3:1.1.1.5.2.1 netbsd-7-0-RC2:1.1.1.5.2.1 netbsd-7-0-RC1:1.1.1.5.2.1 clang-237755:1.1.1.6 clang-232565:1.1.1.6 clang-227398:1.1.1.6 tls-maxphys-base:1.1.1.5 tls-maxphys:1.1.1.5.0.4 netbsd-7:1.1.1.5.0.2 netbsd-7-base:1.1.1.5 clang-215315:1.1.1.5 clang-209886:1.1.1.5 yamt-pagecache:1.1.1.4.0.4 yamt-pagecache-base9:1.1.1.4 tls-earlyentropy:1.1.1.4.0.2 tls-earlyentropy-base:1.1.1.5 riastradh-xf86-video-intel-2-7-1-pre-2-21-15:1.1.1.4 riastradh-drm2-base3:1.1.1.4 clang-202566:1.1.1.4 clang-201163:1.1.1.4 clang-199312:1.1.1.3 clang-198450:1.1.1.2 clang-196603:1.1.1.1 clang-195771:1.1.1.1 LLVM:1.1.1; locks; strict; comment @// @; 1.1 date 2013.11.28.14.14.51; author joerg; state Exp; branches 1.1.1.1; next ; commitid ow8OybrawrB1f3fx; 1.1.1.1 date 2013.11.28.14.14.51; author joerg; state Exp; branches; next 1.1.1.2; commitid ow8OybrawrB1f3fx; 1.1.1.2 date 2014.01.05.15.39.21; author joerg; state Exp; branches; next 1.1.1.3; commitid wh3aCSIWykURqWjx; 1.1.1.3 date 2014.01.15.21.26.24; author joerg; state Exp; branches; next 1.1.1.4; commitid NQXlzzA0SPkc5glx; 1.1.1.4 date 2014.02.14.20.07.22; author joerg; state Exp; branches 1.1.1.4.2.1 1.1.1.4.4.1; next 1.1.1.5; commitid annVkZ1sc17rF6px; 1.1.1.5 date 2014.05.30.18.14.39; author joerg; state Exp; branches 1.1.1.5.2.1 1.1.1.5.4.1; next 1.1.1.6; commitid 8q0kdlBlCn09GACx; 1.1.1.6 date 2015.01.29.19.57.29; author joerg; state Exp; branches; next 1.1.1.7; commitid mlISSizlPKvepX7y; 1.1.1.7 date 2016.02.27.22.12.03; author joerg; state Exp; branches 1.1.1.7.2.1; next 1.1.1.8; commitid tIimz3oDlh1NpBWy; 1.1.1.8 date 2017.01.11.10.34.32; author joerg; state Exp; branches; next 1.1.1.9; commitid CNnUNfII1jgNmxBz; 1.1.1.9 date 2017.08.01.19.34.51; author joerg; state Exp; branches 1.1.1.9.2.1 1.1.1.9.4.1; next 1.1.1.10; commitid pMuDy65V0VicSx1A; 1.1.1.10 date 2018.07.17.18.31.11; author joerg; state Exp; branches; next 1.1.1.11; commitid wDzL46ALjrCZgwKA; 1.1.1.11 date 2019.11.13.22.19.19; author joerg; state dead; branches; next ; commitid QD8YATxuNG34YJKB; 1.1.1.4.2.1 date 2014.08.10.07.08.07; author tls; state Exp; branches; next ; commitid t01A1TLTYxkpGMLx; 1.1.1.4.4.1 date 2014.02.14.20.07.22; author yamt; state dead; branches; next 1.1.1.4.4.2; commitid WSrDtL5nYAUyiyBx; 1.1.1.4.4.2 date 2014.05.22.16.18.25; author yamt; state Exp; branches; next ; commitid WSrDtL5nYAUyiyBx; 1.1.1.5.2.1 date 2015.06.04.20.04.27; author snj; state Exp; branches; next ; commitid yRnjq9fueSo6n9oy; 1.1.1.5.4.1 date 2014.05.30.18.14.39; author tls; state dead; branches; next 1.1.1.5.4.2; commitid jTnpym9Qu0o4R1Nx; 1.1.1.5.4.2 date 2014.08.19.23.47.26; author tls; state Exp; branches; next ; commitid jTnpym9Qu0o4R1Nx; 1.1.1.7.2.1 date 2017.03.20.06.52.36; author pgoyette; state Exp; branches; next ; commitid jjw7cAwgyKq7RfKz; 1.1.1.9.2.1 date 2018.07.28.04.33.15; author pgoyette; state Exp; branches; next ; commitid 1UP1xAIUxv1ZgRLA; 1.1.1.9.4.1 date 2019.06.10.21.45.19; author christos; state Exp; branches; next 1.1.1.9.4.2; commitid jtc8rnCzWiEEHGqB; 1.1.1.9.4.2 date 2020.04.13.07.46.30; author martin; state dead; branches; next ; commitid X01YhRUPVUDaec4C; desc @@ 1.1 log @Initial revision @ text @//===--- Mangle.cpp - Mangle C++ Names --------------------------*- C++ -*-===// // // The LLVM Compiler Infrastructure // // This file is distributed under the University of Illinois Open Source // License. See LICENSE.TXT for details. // //===----------------------------------------------------------------------===// // // Implements generic name mangling support for blocks and Objective-C. // //===----------------------------------------------------------------------===// #include "clang/AST/Attr.h" #include "clang/AST/Mangle.h" #include "clang/AST/ASTContext.h" #include "clang/AST/Decl.h" #include "clang/AST/DeclCXX.h" #include "clang/AST/DeclObjC.h" #include "clang/AST/DeclTemplate.h" #include "clang/AST/ExprCXX.h" #include "clang/Basic/ABI.h" #include "clang/Basic/SourceManager.h" #include "clang/Basic/TargetInfo.h" #include "llvm/ADT/StringExtras.h" #include "llvm/Support/ErrorHandling.h" #include "llvm/Support/raw_ostream.h" #define MANGLE_CHECKER 0 #if MANGLE_CHECKER #include #endif using namespace clang; // FIXME: For blocks we currently mimic GCC's mangling scheme, which leaves // much to be desired. Come up with a better mangling scheme. static void mangleFunctionBlock(MangleContext &Context, StringRef Outer, const BlockDecl *BD, raw_ostream &Out) { unsigned discriminator = Context.getBlockId(BD, true); if (discriminator == 0) Out << "__" << Outer << "_block_invoke"; else Out << "__" << Outer << "_block_invoke_" << discriminator+1; } void MangleContext::anchor() { } enum StdOrFastCC { SOF_OTHER, SOF_FAST, SOF_STD }; static bool isExternC(const NamedDecl *ND) { if (const FunctionDecl *FD = dyn_cast(ND)) return FD->isExternC(); return cast(ND)->isExternC(); } static StdOrFastCC getStdOrFastCallMangling(const ASTContext &Context, const NamedDecl *ND) { const TargetInfo &TI = Context.getTargetInfo(); llvm::Triple Triple = TI.getTriple(); if (!Triple.isOSWindows() || Triple.getArch() != llvm::Triple::x86) return SOF_OTHER; if (Context.getLangOpts().CPlusPlus && !isExternC(ND) && TI.getCXXABI() == TargetCXXABI::Microsoft) return SOF_OTHER; const FunctionDecl *FD = dyn_cast(ND); if (!FD) return SOF_OTHER; QualType T = FD->getType(); const FunctionType *FT = T->castAs(); CallingConv CC = FT->getCallConv(); switch (CC) { default: return SOF_OTHER; case CC_X86FastCall: return SOF_FAST; case CC_X86StdCall: return SOF_STD; } } bool MangleContext::shouldMangleDeclName(const NamedDecl *D) { const ASTContext &ASTContext = getASTContext(); StdOrFastCC CC = getStdOrFastCallMangling(ASTContext, D); if (CC != SOF_OTHER) return true; // In C, functions with no attributes never need to be mangled. Fastpath them. if (!getASTContext().getLangOpts().CPlusPlus && !D->hasAttrs()) return false; // Any decl can be declared with __asm("foo") on it, and this takes precedence // over all other naming in the .o file. if (D->hasAttr()) return true; return shouldMangleCXXName(D); } void MangleContext::mangleName(const NamedDecl *D, raw_ostream &Out) { // Any decl can be declared with __asm("foo") on it, and this takes precedence // over all other naming in the .o file. if (const AsmLabelAttr *ALA = D->getAttr()) { // If we have an asm name, then we use it as the mangling. // Adding the prefix can cause problems when one file has a "foo" and // another has a "\01foo". That is known to happen on ELF with the // tricks normally used for producing aliases (PR9177). Fortunately the // llvm mangler on ELF is a nop, so we can just avoid adding the \01 // marker. We also avoid adding the marker if this is an alias for an // LLVM intrinsic. StringRef UserLabelPrefix = getASTContext().getTargetInfo().getUserLabelPrefix(); if (!UserLabelPrefix.empty() && !ALA->getLabel().startswith("llvm.")) Out << '\01'; // LLVM IR Marker for __asm("foo") Out << ALA->getLabel(); return; } const ASTContext &ASTContext = getASTContext(); StdOrFastCC CC = getStdOrFastCallMangling(ASTContext, D); bool MCXX = shouldMangleCXXName(D); const TargetInfo &TI = Context.getTargetInfo(); if (CC == SOF_OTHER || (MCXX && TI.getCXXABI() == TargetCXXABI::Microsoft)) { mangleCXXName(D, Out); return; } Out << '\01'; if (CC == SOF_STD) Out << '_'; else Out << '@@'; if (!MCXX) Out << D->getIdentifier()->getName(); else mangleCXXName(D, Out); const FunctionDecl *FD = cast(D); const FunctionType *FT = FD->getType()->castAs(); const FunctionProtoType *Proto = dyn_cast(FT); Out << '@@'; if (!Proto) { Out << '0'; return; } assert(!Proto->isVariadic()); unsigned ArgWords = 0; if (const CXXMethodDecl *MD = dyn_cast(FD)) if (!MD->isStatic()) ++ArgWords; for (FunctionProtoType::arg_type_iterator Arg = Proto->arg_type_begin(), ArgEnd = Proto->arg_type_end(); Arg != ArgEnd; ++Arg) { QualType AT = *Arg; // Size should be aligned to DWORD boundary ArgWords += llvm::RoundUpToAlignment(ASTContext.getTypeSize(AT), 32) / 32; } Out << 4 * ArgWords; } void MangleContext::mangleGlobalBlock(const BlockDecl *BD, const NamedDecl *ID, raw_ostream &Out) { unsigned discriminator = getBlockId(BD, false); if (ID) { if (shouldMangleDeclName(ID)) mangleName(ID, Out); else { Out << ID->getIdentifier()->getName(); } } if (discriminator == 0) Out << "_block_invoke"; else Out << "_block_invoke_" << discriminator+1; } void MangleContext::mangleCtorBlock(const CXXConstructorDecl *CD, CXXCtorType CT, const BlockDecl *BD, raw_ostream &ResStream) { SmallString<64> Buffer; llvm::raw_svector_ostream Out(Buffer); mangleCXXCtor(CD, CT, Out); Out.flush(); mangleFunctionBlock(*this, Buffer, BD, ResStream); } void MangleContext::mangleDtorBlock(const CXXDestructorDecl *DD, CXXDtorType DT, const BlockDecl *BD, raw_ostream &ResStream) { SmallString<64> Buffer; llvm::raw_svector_ostream Out(Buffer); mangleCXXDtor(DD, DT, Out); Out.flush(); mangleFunctionBlock(*this, Buffer, BD, ResStream); } void MangleContext::mangleBlock(const DeclContext *DC, const BlockDecl *BD, raw_ostream &Out) { assert(!isa(DC) && !isa(DC)); SmallString<64> Buffer; llvm::raw_svector_ostream Stream(Buffer); if (const ObjCMethodDecl *Method = dyn_cast(DC)) { mangleObjCMethodName(Method, Stream); } else { const NamedDecl *ND = cast(DC); if (!shouldMangleDeclName(ND) && ND->getIdentifier()) Stream << ND->getIdentifier()->getName(); else { // FIXME: We were doing a mangleUnqualifiedName() before, but that's // a private member of a class that will soon itself be private to the // Itanium C++ ABI object. What should we do now? Right now, I'm just // calling the mangleName() method on the MangleContext; is there a // better way? mangleName(ND, Stream); } } Stream.flush(); mangleFunctionBlock(*this, Buffer, BD, Out); } void MangleContext::mangleObjCMethodName(const ObjCMethodDecl *MD, raw_ostream &Out) { SmallString<64> Name; llvm::raw_svector_ostream OS(Name); const ObjCContainerDecl *CD = dyn_cast(MD->getDeclContext()); assert (CD && "Missing container decl in GetNameForMethod"); OS << (MD->isInstanceMethod() ? '-' : '+') << '[' << CD->getName(); if (const ObjCCategoryImplDecl *CID = dyn_cast(CD)) OS << '(' << *CID << ')'; OS << ' ' << MD->getSelector().getAsString() << ']'; Out << OS.str().size() << OS.str(); } @ 1.1.1.1 log @Import Clang 3.4rc1 r195771. @ text @@ 1.1.1.2 log @Import clang 3.5svn r198450. @ text @d249 1 a249 3 OS << ' '; MD->getSelector().print(OS); OS << ']'; @ 1.1.1.3 log @Import Clang 3.5svn r199312 @ text @d14 1 a20 1 #include "clang/AST/Mangle.h" @ 1.1.1.4 log @Import Clang 3.5svn r201163. @ text @d166 2 a167 2 for (FunctionProtoType::param_type_iterator Arg = Proto->param_type_begin(), ArgEnd = Proto->param_type_end(); @ 1.1.1.4.2.1 log @Rebase. @ text @d67 1 a67 1 const llvm::Triple &Triple = TI.getTriple(); d166 4 a169 1 for (const auto &AT : Proto->param_types()) d172 1 @ 1.1.1.5 log @Import Clang 3.5svn r209886. @ text @d67 1 a67 1 const llvm::Triple &Triple = TI.getTriple(); d166 4 a169 1 for (const auto &AT : Proto->param_types()) d172 1 @ 1.1.1.5.2.1 log @Update LLVM to 3.6.1, requested by joerg in ticket 824. @ text @d52 4 a55 5 enum CCMangling { CCM_Other, CCM_Fast, CCM_Vector, CCM_Std d64 2 a65 2 static CCMangling getCallingConvMangling(const ASTContext &Context, const NamedDecl *ND) { d68 2 a69 4 if (!Triple.isOSWindows() || !(Triple.getArch() == llvm::Triple::x86 || Triple.getArch() == llvm::Triple::x86_64)) return CCM_Other; d73 1 a73 1 return CCM_Other; d77 1 a77 1 return CCM_Other; d85 1 a85 1 return CCM_Other; d87 1 a87 1 return CCM_Fast; d89 1 a89 3 return CCM_Std; case CC_X86VectorCall: return CCM_Vector; d96 2 a97 2 CCMangling CC = getCallingConvMangling(ASTContext, D); if (CC != CCM_Other) d134 1 a134 1 CCMangling CC = getCallingConvMangling(ASTContext, D); d137 2 a138 5 if (CC == CCM_Other || (MCXX && TI.getCXXABI() == TargetCXXABI::Microsoft)) { if (const ObjCMethodDecl *OMD = dyn_cast(D)) mangleObjCMethodName(OMD, Out); else mangleCXXName(D, Out); d143 1 a143 1 if (CC == CCM_Std) d145 1 a145 1 else if (CC == CCM_Fast) a149 2 else if (const ObjCMethodDecl *OMD = dyn_cast(D)) mangleObjCMethodName(OMD, Out); a155 2 if (CC == CCM_Vector) Out << '@@'; d167 3 a169 5 // Size should be aligned to pointer size. ArgWords += llvm::RoundUpToAlignment(ASTContext.getTypeSize(AT), TI.getPointerWidth(0)) / TI.getPointerWidth(0); Out << ((TI.getPointerWidth(0) / 8) * ArgWords); d218 10 a227 22 assert((isa(DC) || isa(DC)) && "expected a NamedDecl or BlockDecl"); if (isa(DC)) for (; DC && isa(DC); DC = DC->getParent()) (void) getBlockId(cast(DC), true); assert((isa(DC) || isa(DC)) && "expected a TranslationUnitDecl or a NamedDecl"); if (const auto *CD = dyn_cast(DC)) mangleCtorBlock(CD, /*CT*/ Ctor_Complete, BD, Out); else if (const auto *DD = dyn_cast(DC)) mangleDtorBlock(DD, /*DT*/ Dtor_Complete, BD, Out); else if (auto ND = dyn_cast(DC)) { if (!shouldMangleDeclName(ND) && ND->getIdentifier()) Stream << ND->getIdentifier()->getName(); else { // FIXME: We were doing a mangleUnqualifiedName() before, but that's // a private member of a class that will soon itself be private to the // Itanium C++ ABI object. What should we do now? Right now, I'm just // calling the mangleName() method on the MangleContext; is there a // better way? mangleName(ND, Stream); } @ 1.1.1.6 log @Import Clang 3.6RC1 r227398. @ text @d52 4 a55 5 enum CCMangling { CCM_Other, CCM_Fast, CCM_Vector, CCM_Std d64 2 a65 2 static CCMangling getCallingConvMangling(const ASTContext &Context, const NamedDecl *ND) { d68 2 a69 4 if (!Triple.isOSWindows() || !(Triple.getArch() == llvm::Triple::x86 || Triple.getArch() == llvm::Triple::x86_64)) return CCM_Other; d73 1 a73 1 return CCM_Other; d77 1 a77 1 return CCM_Other; d85 1 a85 1 return CCM_Other; d87 1 a87 1 return CCM_Fast; d89 1 a89 3 return CCM_Std; case CC_X86VectorCall: return CCM_Vector; d96 2 a97 2 CCMangling CC = getCallingConvMangling(ASTContext, D); if (CC != CCM_Other) d134 1 a134 1 CCMangling CC = getCallingConvMangling(ASTContext, D); d137 2 a138 5 if (CC == CCM_Other || (MCXX && TI.getCXXABI() == TargetCXXABI::Microsoft)) { if (const ObjCMethodDecl *OMD = dyn_cast(D)) mangleObjCMethodName(OMD, Out); else mangleCXXName(D, Out); d143 1 a143 1 if (CC == CCM_Std) d145 1 a145 1 else if (CC == CCM_Fast) a149 2 else if (const ObjCMethodDecl *OMD = dyn_cast(D)) mangleObjCMethodName(OMD, Out); a155 2 if (CC == CCM_Vector) Out << '@@'; d167 3 a169 5 // Size should be aligned to pointer size. ArgWords += llvm::RoundUpToAlignment(ASTContext.getTypeSize(AT), TI.getPointerWidth(0)) / TI.getPointerWidth(0); Out << ((TI.getPointerWidth(0) / 8) * ArgWords); d218 10 a227 22 assert((isa(DC) || isa(DC)) && "expected a NamedDecl or BlockDecl"); if (isa(DC)) for (; DC && isa(DC); DC = DC->getParent()) (void) getBlockId(cast(DC), true); assert((isa(DC) || isa(DC)) && "expected a TranslationUnitDecl or a NamedDecl"); if (const auto *CD = dyn_cast(DC)) mangleCtorBlock(CD, /*CT*/ Ctor_Complete, BD, Out); else if (const auto *DD = dyn_cast(DC)) mangleDtorBlock(DD, /*DT*/ Dtor_Complete, BD, Out); else if (auto ND = dyn_cast(DC)) { if (!shouldMangleDeclName(ND) && ND->getIdentifier()) Stream << ND->getIdentifier()->getName(); else { // FIXME: We were doing a mangleUnqualifiedName() before, but that's // a private member of a class that will soon itself be private to the // Itanium C++ ABI object. What should we do now? Right now, I'm just // calling the mangleName() method on the MangleContext; is there a // better way? mangleName(ND, Stream); } @ 1.1.1.7 log @Import Clang 3.8.0rc3 r261930. @ text @d209 1 d219 1 d256 1 @ 1.1.1.7.2.1 log @Sync with HEAD @ text @a54 1 CCM_RegCall, d129 3 a131 3 char GlobalPrefix = getASTContext().getTargetInfo().getDataLayout().getGlobalPrefix(); if (GlobalPrefix && !ALA->getLabel().startswith("llvm.")) a154 2 else if (CC == CCM_RegCall) Out << "__regcall3__"; d180 3 a182 3 ArgWords += llvm::alignTo(ASTContext.getTypeSize(AT), TI.getPointerWidth(0)) / TI.getPointerWidth(0); d257 5 a261 2 void MangleContext::mangleObjCMethodNameWithoutSize(const ObjCMethodDecl *MD, raw_ostream &OS) { d271 1 a271 8 } void MangleContext::mangleObjCMethodName(const ObjCMethodDecl *MD, raw_ostream &Out) { SmallString<64> Name; llvm::raw_svector_ostream OS(Name); mangleObjCMethodNameWithoutSize(MD, OS); @ 1.1.1.8 log @Import Clang pre-4.0.0 r291444. @ text @a54 1 CCM_RegCall, d129 3 a131 3 char GlobalPrefix = getASTContext().getTargetInfo().getDataLayout().getGlobalPrefix(); if (GlobalPrefix && !ALA->getLabel().startswith("llvm.")) a154 2 else if (CC == CCM_RegCall) Out << "__regcall3__"; d180 3 a182 3 ArgWords += llvm::alignTo(ASTContext.getTypeSize(AT), TI.getPointerWidth(0)) / TI.getPointerWidth(0); d257 5 a261 2 void MangleContext::mangleObjCMethodNameWithoutSize(const ObjCMethodDecl *MD, raw_ostream &OS) { d271 1 a271 8 } void MangleContext::mangleObjCMethodName(const ObjCMethodDecl *MD, raw_ostream &Out) { SmallString<64> Name; llvm::raw_svector_ostream OS(Name); mangleObjCMethodNameWithoutSize(MD, OS); @ 1.1.1.9 log @Import clang r309604 from branches/release_50 @ text @d265 2 a266 3 OS << (MD->isInstanceMethod() ? '-' : '+') << '['; if (const ObjCCategoryImplDecl *CID = dyn_cast(CD)) { OS << CID->getClassInterface()->getName(); a267 3 } else { OS << CD->getName(); } @ 1.1.1.9.4.1 log @Sync with HEAD @ text @a105 5 // If the declaration has an owning module for linkage purposes that needs to // be mangled, we must mangle its name. if (!D->hasExternalFormalLinkage() && D->getOwningModuleForLinkage()) return true; @ 1.1.1.9.4.2 log @Mostly merge changes from HEAD upto 20200411 @ text @@ 1.1.1.9.2.1 log @Sync with HEAD @ text @a105 5 // If the declaration has an owning module for linkage purposes that needs to // be mangled, we must mangle its name. if (!D->hasExternalFormalLinkage() && D->getOwningModuleForLinkage()) return true; @ 1.1.1.10 log @Import clang r337282 from trunk @ text @a105 5 // If the declaration has an owning module for linkage purposes that needs to // be mangled, we must mangle its name. if (!D->hasExternalFormalLinkage() && D->getOwningModuleForLinkage()) return true; @ 1.1.1.11 log @Mark old LLVM instance as dead. @ text @@ 1.1.1.5.4.1 log @file Mangle.cpp was added on branch tls-maxphys on 2014-08-19 23:47:26 +0000 @ text @d1 250 @ 1.1.1.5.4.2 log @Rebase to HEAD as of a few days ago. @ text @a0 250 //===--- Mangle.cpp - Mangle C++ Names --------------------------*- C++ -*-===// // // The LLVM Compiler Infrastructure // // This file is distributed under the University of Illinois Open Source // License. See LICENSE.TXT for details. // //===----------------------------------------------------------------------===// // // Implements generic name mangling support for blocks and Objective-C. // //===----------------------------------------------------------------------===// #include "clang/AST/Attr.h" #include "clang/AST/ASTContext.h" #include "clang/AST/Decl.h" #include "clang/AST/DeclCXX.h" #include "clang/AST/DeclObjC.h" #include "clang/AST/DeclTemplate.h" #include "clang/AST/ExprCXX.h" #include "clang/AST/Mangle.h" #include "clang/Basic/ABI.h" #include "clang/Basic/SourceManager.h" #include "clang/Basic/TargetInfo.h" #include "llvm/ADT/StringExtras.h" #include "llvm/Support/ErrorHandling.h" #include "llvm/Support/raw_ostream.h" #define MANGLE_CHECKER 0 #if MANGLE_CHECKER #include #endif using namespace clang; // FIXME: For blocks we currently mimic GCC's mangling scheme, which leaves // much to be desired. Come up with a better mangling scheme. static void mangleFunctionBlock(MangleContext &Context, StringRef Outer, const BlockDecl *BD, raw_ostream &Out) { unsigned discriminator = Context.getBlockId(BD, true); if (discriminator == 0) Out << "__" << Outer << "_block_invoke"; else Out << "__" << Outer << "_block_invoke_" << discriminator+1; } void MangleContext::anchor() { } enum StdOrFastCC { SOF_OTHER, SOF_FAST, SOF_STD }; static bool isExternC(const NamedDecl *ND) { if (const FunctionDecl *FD = dyn_cast(ND)) return FD->isExternC(); return cast(ND)->isExternC(); } static StdOrFastCC getStdOrFastCallMangling(const ASTContext &Context, const NamedDecl *ND) { const TargetInfo &TI = Context.getTargetInfo(); const llvm::Triple &Triple = TI.getTriple(); if (!Triple.isOSWindows() || Triple.getArch() != llvm::Triple::x86) return SOF_OTHER; if (Context.getLangOpts().CPlusPlus && !isExternC(ND) && TI.getCXXABI() == TargetCXXABI::Microsoft) return SOF_OTHER; const FunctionDecl *FD = dyn_cast(ND); if (!FD) return SOF_OTHER; QualType T = FD->getType(); const FunctionType *FT = T->castAs(); CallingConv CC = FT->getCallConv(); switch (CC) { default: return SOF_OTHER; case CC_X86FastCall: return SOF_FAST; case CC_X86StdCall: return SOF_STD; } } bool MangleContext::shouldMangleDeclName(const NamedDecl *D) { const ASTContext &ASTContext = getASTContext(); StdOrFastCC CC = getStdOrFastCallMangling(ASTContext, D); if (CC != SOF_OTHER) return true; // In C, functions with no attributes never need to be mangled. Fastpath them. if (!getASTContext().getLangOpts().CPlusPlus && !D->hasAttrs()) return false; // Any decl can be declared with __asm("foo") on it, and this takes precedence // over all other naming in the .o file. if (D->hasAttr()) return true; return shouldMangleCXXName(D); } void MangleContext::mangleName(const NamedDecl *D, raw_ostream &Out) { // Any decl can be declared with __asm("foo") on it, and this takes precedence // over all other naming in the .o file. if (const AsmLabelAttr *ALA = D->getAttr()) { // If we have an asm name, then we use it as the mangling. // Adding the prefix can cause problems when one file has a "foo" and // another has a "\01foo". That is known to happen on ELF with the // tricks normally used for producing aliases (PR9177). Fortunately the // llvm mangler on ELF is a nop, so we can just avoid adding the \01 // marker. We also avoid adding the marker if this is an alias for an // LLVM intrinsic. StringRef UserLabelPrefix = getASTContext().getTargetInfo().getUserLabelPrefix(); if (!UserLabelPrefix.empty() && !ALA->getLabel().startswith("llvm.")) Out << '\01'; // LLVM IR Marker for __asm("foo") Out << ALA->getLabel(); return; } const ASTContext &ASTContext = getASTContext(); StdOrFastCC CC = getStdOrFastCallMangling(ASTContext, D); bool MCXX = shouldMangleCXXName(D); const TargetInfo &TI = Context.getTargetInfo(); if (CC == SOF_OTHER || (MCXX && TI.getCXXABI() == TargetCXXABI::Microsoft)) { mangleCXXName(D, Out); return; } Out << '\01'; if (CC == SOF_STD) Out << '_'; else Out << '@@'; if (!MCXX) Out << D->getIdentifier()->getName(); else mangleCXXName(D, Out); const FunctionDecl *FD = cast(D); const FunctionType *FT = FD->getType()->castAs(); const FunctionProtoType *Proto = dyn_cast(FT); Out << '@@'; if (!Proto) { Out << '0'; return; } assert(!Proto->isVariadic()); unsigned ArgWords = 0; if (const CXXMethodDecl *MD = dyn_cast(FD)) if (!MD->isStatic()) ++ArgWords; for (const auto &AT : Proto->param_types()) // Size should be aligned to DWORD boundary ArgWords += llvm::RoundUpToAlignment(ASTContext.getTypeSize(AT), 32) / 32; Out << 4 * ArgWords; } void MangleContext::mangleGlobalBlock(const BlockDecl *BD, const NamedDecl *ID, raw_ostream &Out) { unsigned discriminator = getBlockId(BD, false); if (ID) { if (shouldMangleDeclName(ID)) mangleName(ID, Out); else { Out << ID->getIdentifier()->getName(); } } if (discriminator == 0) Out << "_block_invoke"; else Out << "_block_invoke_" << discriminator+1; } void MangleContext::mangleCtorBlock(const CXXConstructorDecl *CD, CXXCtorType CT, const BlockDecl *BD, raw_ostream &ResStream) { SmallString<64> Buffer; llvm::raw_svector_ostream Out(Buffer); mangleCXXCtor(CD, CT, Out); Out.flush(); mangleFunctionBlock(*this, Buffer, BD, ResStream); } void MangleContext::mangleDtorBlock(const CXXDestructorDecl *DD, CXXDtorType DT, const BlockDecl *BD, raw_ostream &ResStream) { SmallString<64> Buffer; llvm::raw_svector_ostream Out(Buffer); mangleCXXDtor(DD, DT, Out); Out.flush(); mangleFunctionBlock(*this, Buffer, BD, ResStream); } void MangleContext::mangleBlock(const DeclContext *DC, const BlockDecl *BD, raw_ostream &Out) { assert(!isa(DC) && !isa(DC)); SmallString<64> Buffer; llvm::raw_svector_ostream Stream(Buffer); if (const ObjCMethodDecl *Method = dyn_cast(DC)) { mangleObjCMethodName(Method, Stream); } else { const NamedDecl *ND = cast(DC); if (!shouldMangleDeclName(ND) && ND->getIdentifier()) Stream << ND->getIdentifier()->getName(); else { // FIXME: We were doing a mangleUnqualifiedName() before, but that's // a private member of a class that will soon itself be private to the // Itanium C++ ABI object. What should we do now? Right now, I'm just // calling the mangleName() method on the MangleContext; is there a // better way? mangleName(ND, Stream); } } Stream.flush(); mangleFunctionBlock(*this, Buffer, BD, Out); } void MangleContext::mangleObjCMethodName(const ObjCMethodDecl *MD, raw_ostream &Out) { SmallString<64> Name; llvm::raw_svector_ostream OS(Name); const ObjCContainerDecl *CD = dyn_cast(MD->getDeclContext()); assert (CD && "Missing container decl in GetNameForMethod"); OS << (MD->isInstanceMethod() ? '-' : '+') << '[' << CD->getName(); if (const ObjCCategoryImplDecl *CID = dyn_cast(CD)) OS << '(' << *CID << ')'; OS << ' '; MD->getSelector().print(OS); OS << ']'; Out << OS.str().size() << OS.str(); } @ 1.1.1.4.4.1 log @file Mangle.cpp was added on branch yamt-pagecache on 2014-05-22 16:18:25 +0000 @ text @d1 254 @ 1.1.1.4.4.2 log @sync with head. for a reference, the tree before this commit was tagged as yamt-pagecache-tag8. this commit was splitted into small chunks to avoid a limitation of cvs. ("Protocol error: too many arguments") @ text @a0 254 //===--- Mangle.cpp - Mangle C++ Names --------------------------*- C++ -*-===// // // The LLVM Compiler Infrastructure // // This file is distributed under the University of Illinois Open Source // License. See LICENSE.TXT for details. // //===----------------------------------------------------------------------===// // // Implements generic name mangling support for blocks and Objective-C. // //===----------------------------------------------------------------------===// #include "clang/AST/Attr.h" #include "clang/AST/ASTContext.h" #include "clang/AST/Decl.h" #include "clang/AST/DeclCXX.h" #include "clang/AST/DeclObjC.h" #include "clang/AST/DeclTemplate.h" #include "clang/AST/ExprCXX.h" #include "clang/AST/Mangle.h" #include "clang/Basic/ABI.h" #include "clang/Basic/SourceManager.h" #include "clang/Basic/TargetInfo.h" #include "llvm/ADT/StringExtras.h" #include "llvm/Support/ErrorHandling.h" #include "llvm/Support/raw_ostream.h" #define MANGLE_CHECKER 0 #if MANGLE_CHECKER #include #endif using namespace clang; // FIXME: For blocks we currently mimic GCC's mangling scheme, which leaves // much to be desired. Come up with a better mangling scheme. static void mangleFunctionBlock(MangleContext &Context, StringRef Outer, const BlockDecl *BD, raw_ostream &Out) { unsigned discriminator = Context.getBlockId(BD, true); if (discriminator == 0) Out << "__" << Outer << "_block_invoke"; else Out << "__" << Outer << "_block_invoke_" << discriminator+1; } void MangleContext::anchor() { } enum StdOrFastCC { SOF_OTHER, SOF_FAST, SOF_STD }; static bool isExternC(const NamedDecl *ND) { if (const FunctionDecl *FD = dyn_cast(ND)) return FD->isExternC(); return cast(ND)->isExternC(); } static StdOrFastCC getStdOrFastCallMangling(const ASTContext &Context, const NamedDecl *ND) { const TargetInfo &TI = Context.getTargetInfo(); llvm::Triple Triple = TI.getTriple(); if (!Triple.isOSWindows() || Triple.getArch() != llvm::Triple::x86) return SOF_OTHER; if (Context.getLangOpts().CPlusPlus && !isExternC(ND) && TI.getCXXABI() == TargetCXXABI::Microsoft) return SOF_OTHER; const FunctionDecl *FD = dyn_cast(ND); if (!FD) return SOF_OTHER; QualType T = FD->getType(); const FunctionType *FT = T->castAs(); CallingConv CC = FT->getCallConv(); switch (CC) { default: return SOF_OTHER; case CC_X86FastCall: return SOF_FAST; case CC_X86StdCall: return SOF_STD; } } bool MangleContext::shouldMangleDeclName(const NamedDecl *D) { const ASTContext &ASTContext = getASTContext(); StdOrFastCC CC = getStdOrFastCallMangling(ASTContext, D); if (CC != SOF_OTHER) return true; // In C, functions with no attributes never need to be mangled. Fastpath them. if (!getASTContext().getLangOpts().CPlusPlus && !D->hasAttrs()) return false; // Any decl can be declared with __asm("foo") on it, and this takes precedence // over all other naming in the .o file. if (D->hasAttr()) return true; return shouldMangleCXXName(D); } void MangleContext::mangleName(const NamedDecl *D, raw_ostream &Out) { // Any decl can be declared with __asm("foo") on it, and this takes precedence // over all other naming in the .o file. if (const AsmLabelAttr *ALA = D->getAttr()) { // If we have an asm name, then we use it as the mangling. // Adding the prefix can cause problems when one file has a "foo" and // another has a "\01foo". That is known to happen on ELF with the // tricks normally used for producing aliases (PR9177). Fortunately the // llvm mangler on ELF is a nop, so we can just avoid adding the \01 // marker. We also avoid adding the marker if this is an alias for an // LLVM intrinsic. StringRef UserLabelPrefix = getASTContext().getTargetInfo().getUserLabelPrefix(); if (!UserLabelPrefix.empty() && !ALA->getLabel().startswith("llvm.")) Out << '\01'; // LLVM IR Marker for __asm("foo") Out << ALA->getLabel(); return; } const ASTContext &ASTContext = getASTContext(); StdOrFastCC CC = getStdOrFastCallMangling(ASTContext, D); bool MCXX = shouldMangleCXXName(D); const TargetInfo &TI = Context.getTargetInfo(); if (CC == SOF_OTHER || (MCXX && TI.getCXXABI() == TargetCXXABI::Microsoft)) { mangleCXXName(D, Out); return; } Out << '\01'; if (CC == SOF_STD) Out << '_'; else Out << '@@'; if (!MCXX) Out << D->getIdentifier()->getName(); else mangleCXXName(D, Out); const FunctionDecl *FD = cast(D); const FunctionType *FT = FD->getType()->castAs(); const FunctionProtoType *Proto = dyn_cast(FT); Out << '@@'; if (!Proto) { Out << '0'; return; } assert(!Proto->isVariadic()); unsigned ArgWords = 0; if (const CXXMethodDecl *MD = dyn_cast(FD)) if (!MD->isStatic()) ++ArgWords; for (FunctionProtoType::param_type_iterator Arg = Proto->param_type_begin(), ArgEnd = Proto->param_type_end(); Arg != ArgEnd; ++Arg) { QualType AT = *Arg; // Size should be aligned to DWORD boundary ArgWords += llvm::RoundUpToAlignment(ASTContext.getTypeSize(AT), 32) / 32; } Out << 4 * ArgWords; } void MangleContext::mangleGlobalBlock(const BlockDecl *BD, const NamedDecl *ID, raw_ostream &Out) { unsigned discriminator = getBlockId(BD, false); if (ID) { if (shouldMangleDeclName(ID)) mangleName(ID, Out); else { Out << ID->getIdentifier()->getName(); } } if (discriminator == 0) Out << "_block_invoke"; else Out << "_block_invoke_" << discriminator+1; } void MangleContext::mangleCtorBlock(const CXXConstructorDecl *CD, CXXCtorType CT, const BlockDecl *BD, raw_ostream &ResStream) { SmallString<64> Buffer; llvm::raw_svector_ostream Out(Buffer); mangleCXXCtor(CD, CT, Out); Out.flush(); mangleFunctionBlock(*this, Buffer, BD, ResStream); } void MangleContext::mangleDtorBlock(const CXXDestructorDecl *DD, CXXDtorType DT, const BlockDecl *BD, raw_ostream &ResStream) { SmallString<64> Buffer; llvm::raw_svector_ostream Out(Buffer); mangleCXXDtor(DD, DT, Out); Out.flush(); mangleFunctionBlock(*this, Buffer, BD, ResStream); } void MangleContext::mangleBlock(const DeclContext *DC, const BlockDecl *BD, raw_ostream &Out) { assert(!isa(DC) && !isa(DC)); SmallString<64> Buffer; llvm::raw_svector_ostream Stream(Buffer); if (const ObjCMethodDecl *Method = dyn_cast(DC)) { mangleObjCMethodName(Method, Stream); } else { const NamedDecl *ND = cast(DC); if (!shouldMangleDeclName(ND) && ND->getIdentifier()) Stream << ND->getIdentifier()->getName(); else { // FIXME: We were doing a mangleUnqualifiedName() before, but that's // a private member of a class that will soon itself be private to the // Itanium C++ ABI object. What should we do now? Right now, I'm just // calling the mangleName() method on the MangleContext; is there a // better way? mangleName(ND, Stream); } } Stream.flush(); mangleFunctionBlock(*this, Buffer, BD, Out); } void MangleContext::mangleObjCMethodName(const ObjCMethodDecl *MD, raw_ostream &Out) { SmallString<64> Name; llvm::raw_svector_ostream OS(Name); const ObjCContainerDecl *CD = dyn_cast(MD->getDeclContext()); assert (CD && "Missing container decl in GetNameForMethod"); OS << (MD->isInstanceMethod() ? '-' : '+') << '[' << CD->getName(); if (const ObjCCategoryImplDecl *CID = dyn_cast(CD)) OS << '(' << *CID << ')'; OS << ' '; MD->getSelector().print(OS); OS << ']'; Out << OS.str().size() << OS.str(); } @