1 //===--- Mangle.cpp - Mangle C++ Names --------------------------*- C++ -*-===// 2 // 3 // The LLVM Compiler Infrastructure 4 // 5 // This file is distributed under the University of Illinois Open Source 6 // License. See LICENSE.TXT for details. 7 // 8 //===----------------------------------------------------------------------===// 9 // 10 // Implements generic name mangling support for blocks and Objective-C. 11 // 12 //===----------------------------------------------------------------------===// 13 #include "clang/AST/Mangle.h" 14 #include "clang/AST/ASTContext.h" 15 #include "clang/AST/Decl.h" 16 #include "clang/AST/DeclCXX.h" 17 #include "clang/AST/DeclObjC.h" 18 #include "clang/AST/DeclTemplate.h" 19 #include "clang/AST/ExprCXX.h" 20 #include "clang/Basic/ABI.h" 21 #include "clang/Basic/SourceManager.h" 22 #include "llvm/ADT/StringExtras.h" 23 #include "llvm/Support/ErrorHandling.h" 24 #include "llvm/Support/raw_ostream.h" 25 26 #define MANGLE_CHECKER 0 27 28 #if MANGLE_CHECKER 29 #include <cxxabi.h> 30 #endif 31 32 using namespace clang; 33 34 // FIXME: For blocks we currently mimic GCC's mangling scheme, which leaves 35 // much to be desired. Come up with a better mangling scheme. 36 37 namespace { 38 39 static void mangleFunctionBlock(MangleContext &Context, 40 StringRef Outer, 41 const BlockDecl *BD, 42 raw_ostream &Out) { 43 unsigned discriminator = Context.getBlockId(BD, true); 44 if (discriminator == 0) 45 Out << "__" << Outer << "_block_invoke"; 46 else 47 Out << "__" << Outer << "_block_invoke_" << discriminator+1; 48 } 49 50 static void checkMangleDC(const DeclContext *DC, const BlockDecl *BD) { 51 #ifndef NDEBUG 52 const DeclContext *ExpectedDC = BD->getDeclContext(); 53 while (isa<BlockDecl>(ExpectedDC) || isa<EnumDecl>(ExpectedDC)) 54 ExpectedDC = ExpectedDC->getParent(); 55 // In-class initializers for non-static data members are lexically defined 56 // within the class, but are mangled as if they were specified as constructor 57 // member initializers. 58 if (isa<CXXRecordDecl>(ExpectedDC) && DC != ExpectedDC) 59 DC = DC->getParent(); 60 assert(DC == ExpectedDC && "Given decl context did not match expected!"); 61 #endif 62 } 63 64 } 65 66 void MangleContext::anchor() { } 67 68 void MangleContext::mangleGlobalBlock(const BlockDecl *BD, 69 const NamedDecl *ID, 70 raw_ostream &Out) { 71 unsigned discriminator = getBlockId(BD, false); 72 if (ID) { 73 if (shouldMangleDeclName(ID)) 74 mangleName(ID, Out); 75 else { 76 Out << ID->getIdentifier()->getName(); 77 } 78 } 79 if (discriminator == 0) 80 Out << "_block_invoke"; 81 else 82 Out << "_block_invoke_" << discriminator+1; 83 } 84 85 void MangleContext::mangleCtorBlock(const CXXConstructorDecl *CD, 86 CXXCtorType CT, const BlockDecl *BD, 87 raw_ostream &ResStream) { 88 checkMangleDC(CD, BD); 89 SmallString<64> Buffer; 90 llvm::raw_svector_ostream Out(Buffer); 91 mangleCXXCtor(CD, CT, Out); 92 Out.flush(); 93 mangleFunctionBlock(*this, Buffer, BD, ResStream); 94 } 95 96 void MangleContext::mangleDtorBlock(const CXXDestructorDecl *DD, 97 CXXDtorType DT, const BlockDecl *BD, 98 raw_ostream &ResStream) { 99 checkMangleDC(DD, BD); 100 SmallString<64> Buffer; 101 llvm::raw_svector_ostream Out(Buffer); 102 mangleCXXDtor(DD, DT, Out); 103 Out.flush(); 104 mangleFunctionBlock(*this, Buffer, BD, ResStream); 105 } 106 107 void MangleContext::mangleBlock(const DeclContext *DC, const BlockDecl *BD, 108 raw_ostream &Out) { 109 assert(!isa<CXXConstructorDecl>(DC) && !isa<CXXDestructorDecl>(DC)); 110 checkMangleDC(DC, BD); 111 112 SmallString<64> Buffer; 113 llvm::raw_svector_ostream Stream(Buffer); 114 if (const ObjCMethodDecl *Method = dyn_cast<ObjCMethodDecl>(DC)) { 115 mangleObjCMethodName(Method, Stream); 116 } else { 117 const NamedDecl *ND = cast<NamedDecl>(DC); 118 if (!shouldMangleDeclName(ND) && ND->getIdentifier()) 119 Stream << ND->getIdentifier()->getName(); 120 else { 121 // FIXME: We were doing a mangleUnqualifiedName() before, but that's 122 // a private member of a class that will soon itself be private to the 123 // Itanium C++ ABI object. What should we do now? Right now, I'm just 124 // calling the mangleName() method on the MangleContext; is there a 125 // better way? 126 mangleName(ND, Stream); 127 } 128 } 129 Stream.flush(); 130 mangleFunctionBlock(*this, Buffer, BD, Out); 131 } 132 133 void MangleContext::mangleObjCMethodName(const ObjCMethodDecl *MD, 134 raw_ostream &Out) { 135 SmallString<64> Name; 136 llvm::raw_svector_ostream OS(Name); 137 138 const ObjCContainerDecl *CD = 139 dyn_cast<ObjCContainerDecl>(MD->getDeclContext()); 140 assert (CD && "Missing container decl in GetNameForMethod"); 141 OS << (MD->isInstanceMethod() ? '-' : '+') << '[' << CD->getName(); 142 if (const ObjCCategoryImplDecl *CID = dyn_cast<ObjCCategoryImplDecl>(CD)) 143 OS << '(' << *CID << ')'; 144 OS << ' ' << MD->getSelector().getAsString() << ']'; 145 146 Out << OS.str().size() << OS.str(); 147 } 148 149 void MangleContext::mangleBlock(const BlockDecl *BD, 150 raw_ostream &Out, 151 const NamedDecl *ID) { 152 const DeclContext *DC = BD->getDeclContext(); 153 while (isa<BlockDecl>(DC) || isa<EnumDecl>(DC)) 154 DC = DC->getParent(); 155 if (DC->isFunctionOrMethod()) 156 mangleBlock(DC, BD, Out); 157 else 158 mangleGlobalBlock(BD, ID, Out); 159 } 160