Mangle.cpp revision 4904bf4e84cfb48080270ebaa9005327f18ab0e5 
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/raw_ostream.h"
24#include "llvm/Support/ErrorHandling.h"
25
26#define MANGLE_CHECKER 0
27
28#if MANGLE_CHECKER
29#include <cxxabi.h>
30#endif
31
32using 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
37namespace {
38
39static 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
50static 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
66void MangleContext::anchor() { }
67
68void 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
85void 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
96void 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
107void 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
133void 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
149void 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