Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 1 | //===--- CodeGenModule.cpp - Emit LLVM Code from ASTs for a Module --------===// |
| 2 | // |
| 3 | // The LLVM Compiler Infrastructure |
| 4 | // |
Chris Lattner | 0bc735f | 2007-12-29 19:59:25 +0000 | [diff] [blame] | 5 | // This file is distributed under the University of Illinois Open Source |
| 6 | // License. See LICENSE.TXT for details. |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 7 | // |
| 8 | //===----------------------------------------------------------------------===// |
| 9 | // |
| 10 | // This coordinates the per-module state used while generating code. |
| 11 | // |
| 12 | //===----------------------------------------------------------------------===// |
| 13 | |
| 14 | #include "CodeGenModule.h" |
Chris Lattner | bd36064 | 2009-03-26 05:00:52 +0000 | [diff] [blame] | 15 | #include "CGDebugInfo.h" |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 16 | #include "CodeGenFunction.h" |
Daniel Dunbar | 0dbe227 | 2008-09-08 21:33:45 +0000 | [diff] [blame] | 17 | #include "CGCall.h" |
Daniel Dunbar | af2f62c | 2008-08-13 00:59:25 +0000 | [diff] [blame] | 18 | #include "CGObjCRuntime.h" |
Douglas Gregor | 5f2bfd4 | 2009-02-13 00:10:09 +0000 | [diff] [blame] | 19 | #include "Mangle.h" |
Chris Lattner | bd36064 | 2009-03-26 05:00:52 +0000 | [diff] [blame] | 20 | #include "clang/Frontend/CompileOptions.h" |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 21 | #include "clang/AST/ASTContext.h" |
Daniel Dunbar | c4a1dea | 2008-08-11 05:35:13 +0000 | [diff] [blame] | 22 | #include "clang/AST/DeclObjC.h" |
Chris Lattner | 21ef7ae | 2008-11-04 16:51:42 +0000 | [diff] [blame] | 23 | #include "clang/AST/DeclCXX.h" |
Chris Lattner | 2c8569d | 2007-12-02 07:19:18 +0000 | [diff] [blame] | 24 | #include "clang/Basic/Diagnostic.h" |
Nate Begeman | 8bd4afe | 2008-04-19 04:17:09 +0000 | [diff] [blame] | 25 | #include "clang/Basic/SourceManager.h" |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 26 | #include "clang/Basic/TargetInfo.h" |
Steve Naroff | e9b7d8a | 2009-04-01 15:50:34 +0000 | [diff] [blame] | 27 | #include "clang/Basic/ConvertUTF.h" |
Nate Begeman | ec9426c | 2008-03-09 03:09:36 +0000 | [diff] [blame] | 28 | #include "llvm/CallingConv.h" |
Chris Lattner | bef20ac | 2007-08-31 04:31:45 +0000 | [diff] [blame] | 29 | #include "llvm/Module.h" |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 30 | #include "llvm/Intrinsics.h" |
Anton Korobeynikov | 20ff310 | 2008-06-01 14:13:53 +0000 | [diff] [blame] | 31 | #include "llvm/Target/TargetData.h" |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 32 | using namespace clang; |
| 33 | using namespace CodeGen; |
| 34 | |
| 35 | |
Chris Lattner | bd36064 | 2009-03-26 05:00:52 +0000 | [diff] [blame] | 36 | CodeGenModule::CodeGenModule(ASTContext &C, const CompileOptions &compileOpts, |
Chris Lattner | fb97b03 | 2007-12-02 01:40:18 +0000 | [diff] [blame] | 37 | llvm::Module &M, const llvm::TargetData &TD, |
Chris Lattner | bd36064 | 2009-03-26 05:00:52 +0000 | [diff] [blame] | 38 | Diagnostic &diags) |
| 39 | : BlockModule(C, M, TD, Types, *this), Context(C), |
| 40 | Features(C.getLangOptions()), CompileOpts(compileOpts), TheModule(M), |
Mike Stump | 2a99814 | 2009-03-04 18:17:45 +0000 | [diff] [blame] | 41 | TheTargetData(TD), Diags(diags), Types(C, M, TD), Runtime(0), |
| 42 | MemCpyFn(0), MemMoveFn(0), MemSetFn(0), CFConstantStringClassRef(0) { |
Daniel Dunbar | 208ff5e | 2008-08-11 18:12:00 +0000 | [diff] [blame] | 43 | |
Chris Lattner | 3c8f153 | 2009-03-21 07:12:05 +0000 | [diff] [blame] | 44 | if (!Features.ObjC1) |
| 45 | Runtime = 0; |
| 46 | else if (!Features.NeXTRuntime) |
| 47 | Runtime = CreateGNUObjCRuntime(*this); |
| 48 | else if (Features.ObjCNonFragileABI) |
| 49 | Runtime = CreateMacNonFragileABIObjCRuntime(*this); |
| 50 | else |
| 51 | Runtime = CreateMacObjCRuntime(*this); |
Sanjiv Gupta | e8b9f5b | 2008-05-08 08:54:20 +0000 | [diff] [blame] | 52 | |
| 53 | // If debug info generation is enabled, create the CGDebugInfo object. |
Chris Lattner | bd36064 | 2009-03-26 05:00:52 +0000 | [diff] [blame] | 54 | DebugInfo = CompileOpts.DebugInfo ? new CGDebugInfo(this) : 0; |
Chris Lattner | 2b94fe3 | 2008-03-01 08:45:05 +0000 | [diff] [blame] | 55 | } |
| 56 | |
| 57 | CodeGenModule::~CodeGenModule() { |
Ted Kremenek | 815c78f | 2008-08-05 18:50:11 +0000 | [diff] [blame] | 58 | delete Runtime; |
| 59 | delete DebugInfo; |
| 60 | } |
| 61 | |
| 62 | void CodeGenModule::Release() { |
Chris Lattner | 82227ff | 2009-03-22 21:21:57 +0000 | [diff] [blame] | 63 | EmitDeferred(); |
Daniel Dunbar | 208ff5e | 2008-08-11 18:12:00 +0000 | [diff] [blame] | 64 | if (Runtime) |
| 65 | if (llvm::Function *ObjCInitFunction = Runtime->ModuleInitFunction()) |
| 66 | AddGlobalCtor(ObjCInitFunction); |
Daniel Dunbar | 6bfed7e | 2008-08-01 00:01:51 +0000 | [diff] [blame] | 67 | EmitCtorList(GlobalCtors, "llvm.global_ctors"); |
| 68 | EmitCtorList(GlobalDtors, "llvm.global_dtors"); |
Nate Begeman | 532485c | 2008-04-18 23:43:57 +0000 | [diff] [blame] | 69 | EmitAnnotations(); |
Daniel Dunbar | 0269871 | 2009-02-13 20:29:50 +0000 | [diff] [blame] | 70 | EmitLLVMUsed(); |
Daniel Dunbar | f1968f2 | 2008-10-01 00:49:24 +0000 | [diff] [blame] | 71 | } |
| 72 | |
Daniel Dunbar | 488e993 | 2008-08-16 00:56:44 +0000 | [diff] [blame] | 73 | /// ErrorUnsupported - Print out an error that codegen doesn't support the |
Chris Lattner | 2c8569d | 2007-12-02 07:19:18 +0000 | [diff] [blame] | 74 | /// specified stmt yet. |
Daniel Dunbar | 90df4b6 | 2008-09-04 03:43:08 +0000 | [diff] [blame] | 75 | void CodeGenModule::ErrorUnsupported(const Stmt *S, const char *Type, |
| 76 | bool OmitOnError) { |
| 77 | if (OmitOnError && getDiags().hasErrorOccurred()) |
| 78 | return; |
Daniel Dunbar | 488e993 | 2008-08-16 00:56:44 +0000 | [diff] [blame] | 79 | unsigned DiagID = getDiags().getCustomDiagID(Diagnostic::Error, |
Daniel Dunbar | 56b8001 | 2009-02-06 19:18:03 +0000 | [diff] [blame] | 80 | "cannot compile this %0 yet"); |
Chris Lattner | 2c8569d | 2007-12-02 07:19:18 +0000 | [diff] [blame] | 81 | std::string Msg = Type; |
Chris Lattner | 0a14eee | 2008-11-18 07:04:44 +0000 | [diff] [blame] | 82 | getDiags().Report(Context.getFullLoc(S->getLocStart()), DiagID) |
| 83 | << Msg << S->getSourceRange(); |
Chris Lattner | 2c8569d | 2007-12-02 07:19:18 +0000 | [diff] [blame] | 84 | } |
Chris Lattner | 58c3f9e | 2007-12-02 06:27:33 +0000 | [diff] [blame] | 85 | |
Daniel Dunbar | 488e993 | 2008-08-16 00:56:44 +0000 | [diff] [blame] | 86 | /// ErrorUnsupported - Print out an error that codegen doesn't support the |
Chris Lattner | c6fdc34 | 2008-01-12 07:05:38 +0000 | [diff] [blame] | 87 | /// specified decl yet. |
Daniel Dunbar | 90df4b6 | 2008-09-04 03:43:08 +0000 | [diff] [blame] | 88 | void CodeGenModule::ErrorUnsupported(const Decl *D, const char *Type, |
| 89 | bool OmitOnError) { |
| 90 | if (OmitOnError && getDiags().hasErrorOccurred()) |
| 91 | return; |
Daniel Dunbar | 488e993 | 2008-08-16 00:56:44 +0000 | [diff] [blame] | 92 | unsigned DiagID = getDiags().getCustomDiagID(Diagnostic::Error, |
Daniel Dunbar | 56b8001 | 2009-02-06 19:18:03 +0000 | [diff] [blame] | 93 | "cannot compile this %0 yet"); |
Chris Lattner | c6fdc34 | 2008-01-12 07:05:38 +0000 | [diff] [blame] | 94 | std::string Msg = Type; |
Chris Lattner | 0a14eee | 2008-11-18 07:04:44 +0000 | [diff] [blame] | 95 | getDiags().Report(Context.getFullLoc(D->getLocation()), DiagID) << Msg; |
Chris Lattner | c6fdc34 | 2008-01-12 07:05:38 +0000 | [diff] [blame] | 96 | } |
| 97 | |
Daniel Dunbar | 04d4078 | 2009-04-14 06:00:08 +0000 | [diff] [blame] | 98 | LangOptions::VisibilityMode |
| 99 | CodeGenModule::getDeclVisibilityMode(const Decl *D) const { |
| 100 | if (const VarDecl *VD = dyn_cast<VarDecl>(D)) |
| 101 | if (VD->getStorageClass() == VarDecl::PrivateExtern) |
| 102 | return LangOptions::Hidden; |
| 103 | |
| 104 | if (const VisibilityAttr *attr = D->getAttr<VisibilityAttr>()) { |
| 105 | switch (attr->getVisibility()) { |
| 106 | default: assert(0 && "Unknown visibility!"); |
| 107 | case VisibilityAttr::DefaultVisibility: |
| 108 | return LangOptions::Default; |
| 109 | case VisibilityAttr::HiddenVisibility: |
| 110 | return LangOptions::Hidden; |
| 111 | case VisibilityAttr::ProtectedVisibility: |
| 112 | return LangOptions::Protected; |
| 113 | } |
| 114 | } |
| 115 | |
| 116 | return getLangOptions().getVisibilityMode(); |
| 117 | } |
| 118 | |
| 119 | void CodeGenModule::setGlobalVisibility(llvm::GlobalValue *GV, |
| 120 | const Decl *D) const { |
| 121 | // Internal definitions always have default visibility. |
Chris Lattner | df102fc | 2009-04-14 05:27:13 +0000 | [diff] [blame] | 122 | if (GV->hasLocalLinkage()) { |
Daniel Dunbar | 7e714cd | 2009-04-10 20:26:50 +0000 | [diff] [blame] | 123 | GV->setVisibility(llvm::GlobalValue::DefaultVisibility); |
Daniel Dunbar | 6ab187a | 2009-04-07 05:48:37 +0000 | [diff] [blame] | 124 | return; |
Daniel Dunbar | 7e714cd | 2009-04-10 20:26:50 +0000 | [diff] [blame] | 125 | } |
Daniel Dunbar | 6ab187a | 2009-04-07 05:48:37 +0000 | [diff] [blame] | 126 | |
Daniel Dunbar | 04d4078 | 2009-04-14 06:00:08 +0000 | [diff] [blame] | 127 | switch (getDeclVisibilityMode(D)) { |
Dan Gohman | 4f8d123 | 2008-05-22 00:50:06 +0000 | [diff] [blame] | 128 | default: assert(0 && "Unknown visibility!"); |
Daniel Dunbar | 04d4078 | 2009-04-14 06:00:08 +0000 | [diff] [blame] | 129 | case LangOptions::Default: |
| 130 | return GV->setVisibility(llvm::GlobalValue::DefaultVisibility); |
| 131 | case LangOptions::Hidden: |
| 132 | return GV->setVisibility(llvm::GlobalValue::HiddenVisibility); |
| 133 | case LangOptions::Protected: |
| 134 | return GV->setVisibility(llvm::GlobalValue::ProtectedVisibility); |
Dan Gohman | 4f8d123 | 2008-05-22 00:50:06 +0000 | [diff] [blame] | 135 | } |
| 136 | } |
| 137 | |
Anders Carlsson | 2a131fb | 2009-05-05 04:44:02 +0000 | [diff] [blame] | 138 | const char *CodeGenModule::getMangledName(const GlobalDecl &GD) { |
| 139 | const NamedDecl *ND = GD.getDecl(); |
| 140 | |
| 141 | if (const CXXConstructorDecl *D = dyn_cast<CXXConstructorDecl>(ND)) |
| 142 | return getMangledCXXCtorName(D, GD.getCtorType()); |
| 143 | if (const CXXDestructorDecl *D = dyn_cast<CXXDestructorDecl>(ND)) |
| 144 | return getMangledCXXDtorName(D, GD.getDtorType()); |
| 145 | |
| 146 | return getMangledName(ND); |
| 147 | } |
| 148 | |
Douglas Gregor | 5f2bfd4 | 2009-02-13 00:10:09 +0000 | [diff] [blame] | 149 | /// \brief Retrieves the mangled name for the given declaration. |
| 150 | /// |
| 151 | /// If the given declaration requires a mangled name, returns an |
Chris Lattner | c50689b | 2009-03-21 06:31:09 +0000 | [diff] [blame] | 152 | /// const char* containing the mangled name. Otherwise, returns |
| 153 | /// the unmangled name. |
Douglas Gregor | 5f2bfd4 | 2009-02-13 00:10:09 +0000 | [diff] [blame] | 154 | /// |
Douglas Gregor | 6ec3668 | 2009-02-18 23:53:56 +0000 | [diff] [blame] | 155 | const char *CodeGenModule::getMangledName(const NamedDecl *ND) { |
Chris Lattner | c50689b | 2009-03-21 06:31:09 +0000 | [diff] [blame] | 156 | // In C, functions with no attributes never need to be mangled. Fastpath them. |
| 157 | if (!getLangOptions().CPlusPlus && !ND->hasAttrs()) { |
| 158 | assert(ND->getIdentifier() && "Attempt to mangle unnamed decl."); |
Chris Lattner | 3c8f153 | 2009-03-21 07:12:05 +0000 | [diff] [blame] | 159 | return ND->getNameAsCString(); |
Chris Lattner | c50689b | 2009-03-21 06:31:09 +0000 | [diff] [blame] | 160 | } |
| 161 | |
Douglas Gregor | 6ec3668 | 2009-02-18 23:53:56 +0000 | [diff] [blame] | 162 | llvm::SmallString<256> Name; |
| 163 | llvm::raw_svector_ostream Out(Name); |
Daniel Dunbar | fe34557 | 2009-03-05 22:59:19 +0000 | [diff] [blame] | 164 | if (!mangleName(ND, Context, Out)) { |
| 165 | assert(ND->getIdentifier() && "Attempt to mangle unnamed decl."); |
Chris Lattner | 3c8f153 | 2009-03-21 07:12:05 +0000 | [diff] [blame] | 166 | return ND->getNameAsCString(); |
Daniel Dunbar | fe34557 | 2009-03-05 22:59:19 +0000 | [diff] [blame] | 167 | } |
Douglas Gregor | 5f2bfd4 | 2009-02-13 00:10:09 +0000 | [diff] [blame] | 168 | |
Douglas Gregor | 6ec3668 | 2009-02-18 23:53:56 +0000 | [diff] [blame] | 169 | Name += '\0'; |
Anders Carlsson | 95d4e5d | 2009-04-15 15:55:24 +0000 | [diff] [blame] | 170 | return UniqueMangledName(Name.begin(), Name.end()); |
| 171 | } |
| 172 | |
| 173 | const char *CodeGenModule::UniqueMangledName(const char *NameStart, |
| 174 | const char *NameEnd) { |
| 175 | assert(*(NameEnd - 1) == '\0' && "Mangled name must be null terminated!"); |
| 176 | |
| 177 | return MangledNames.GetOrCreateValue(NameStart, NameEnd).getKeyData(); |
Douglas Gregor | 5f2bfd4 | 2009-02-13 00:10:09 +0000 | [diff] [blame] | 178 | } |
| 179 | |
Chris Lattner | 6d39760 | 2008-03-14 17:18:18 +0000 | [diff] [blame] | 180 | /// AddGlobalCtor - Add a function to the list that will be called before |
| 181 | /// main() runs. |
Daniel Dunbar | 6bfed7e | 2008-08-01 00:01:51 +0000 | [diff] [blame] | 182 | void CodeGenModule::AddGlobalCtor(llvm::Function * Ctor, int Priority) { |
Daniel Dunbar | 4998888 | 2009-01-13 02:25:00 +0000 | [diff] [blame] | 183 | // FIXME: Type coercion of void()* types. |
Daniel Dunbar | 6bfed7e | 2008-08-01 00:01:51 +0000 | [diff] [blame] | 184 | GlobalCtors.push_back(std::make_pair(Ctor, Priority)); |
Chris Lattner | 6d39760 | 2008-03-14 17:18:18 +0000 | [diff] [blame] | 185 | } |
| 186 | |
Daniel Dunbar | 6bfed7e | 2008-08-01 00:01:51 +0000 | [diff] [blame] | 187 | /// AddGlobalDtor - Add a function to the list that will be called |
| 188 | /// when the module is unloaded. |
| 189 | void CodeGenModule::AddGlobalDtor(llvm::Function * Dtor, int Priority) { |
Daniel Dunbar | 4998888 | 2009-01-13 02:25:00 +0000 | [diff] [blame] | 190 | // FIXME: Type coercion of void()* types. |
Daniel Dunbar | 6bfed7e | 2008-08-01 00:01:51 +0000 | [diff] [blame] | 191 | GlobalDtors.push_back(std::make_pair(Dtor, Priority)); |
| 192 | } |
| 193 | |
| 194 | void CodeGenModule::EmitCtorList(const CtorList &Fns, const char *GlobalName) { |
| 195 | // Ctor function type is void()*. |
| 196 | llvm::FunctionType* CtorFTy = |
| 197 | llvm::FunctionType::get(llvm::Type::VoidTy, |
| 198 | std::vector<const llvm::Type*>(), |
| 199 | false); |
| 200 | llvm::Type *CtorPFTy = llvm::PointerType::getUnqual(CtorFTy); |
| 201 | |
| 202 | // Get the type of a ctor entry, { i32, void ()* }. |
Chris Lattner | 572cf09 | 2008-03-19 05:24:56 +0000 | [diff] [blame] | 203 | llvm::StructType* CtorStructTy = |
Daniel Dunbar | 6bfed7e | 2008-08-01 00:01:51 +0000 | [diff] [blame] | 204 | llvm::StructType::get(llvm::Type::Int32Ty, |
| 205 | llvm::PointerType::getUnqual(CtorFTy), NULL); |
Chris Lattner | 6d39760 | 2008-03-14 17:18:18 +0000 | [diff] [blame] | 206 | |
Daniel Dunbar | 6bfed7e | 2008-08-01 00:01:51 +0000 | [diff] [blame] | 207 | // Construct the constructor and destructor arrays. |
| 208 | std::vector<llvm::Constant*> Ctors; |
| 209 | for (CtorList::const_iterator I = Fns.begin(), E = Fns.end(); I != E; ++I) { |
| 210 | std::vector<llvm::Constant*> S; |
| 211 | S.push_back(llvm::ConstantInt::get(llvm::Type::Int32Ty, I->second, false)); |
| 212 | S.push_back(llvm::ConstantExpr::getBitCast(I->first, CtorPFTy)); |
| 213 | Ctors.push_back(llvm::ConstantStruct::get(CtorStructTy, S)); |
Chris Lattner | 6d39760 | 2008-03-14 17:18:18 +0000 | [diff] [blame] | 214 | } |
Daniel Dunbar | 6bfed7e | 2008-08-01 00:01:51 +0000 | [diff] [blame] | 215 | |
| 216 | if (!Ctors.empty()) { |
| 217 | llvm::ArrayType *AT = llvm::ArrayType::get(CtorStructTy, Ctors.size()); |
| 218 | new llvm::GlobalVariable(AT, false, |
| 219 | llvm::GlobalValue::AppendingLinkage, |
| 220 | llvm::ConstantArray::get(AT, Ctors), |
| 221 | GlobalName, |
| 222 | &TheModule); |
| 223 | } |
Chris Lattner | 6d39760 | 2008-03-14 17:18:18 +0000 | [diff] [blame] | 224 | } |
| 225 | |
Nate Begeman | 532485c | 2008-04-18 23:43:57 +0000 | [diff] [blame] | 226 | void CodeGenModule::EmitAnnotations() { |
| 227 | if (Annotations.empty()) |
| 228 | return; |
| 229 | |
| 230 | // Create a new global variable for the ConstantStruct in the Module. |
| 231 | llvm::Constant *Array = |
| 232 | llvm::ConstantArray::get(llvm::ArrayType::get(Annotations[0]->getType(), |
| 233 | Annotations.size()), |
| 234 | Annotations); |
| 235 | llvm::GlobalValue *gv = |
| 236 | new llvm::GlobalVariable(Array->getType(), false, |
| 237 | llvm::GlobalValue::AppendingLinkage, Array, |
| 238 | "llvm.global.annotations", &TheModule); |
| 239 | gv->setSection("llvm.metadata"); |
| 240 | } |
| 241 | |
Chris Lattner | 86daeee | 2009-04-14 16:44:36 +0000 | [diff] [blame] | 242 | static CodeGenModule::GVALinkage |
| 243 | GetLinkageForFunction(const FunctionDecl *FD, const LangOptions &Features) { |
Anders Carlsson | 167b824 | 2009-05-15 18:35:39 +0000 | [diff] [blame] | 244 | if (const CXXMethodDecl *MD = dyn_cast<CXXMethodDecl>(FD)) { |
| 245 | // C++ member functions defined inside the class are always inline. |
| 246 | if (MD->isInline() || !MD->isOutOfLineDefinition()) |
| 247 | return CodeGenModule::GVA_CXXInline; |
| 248 | |
| 249 | return CodeGenModule::GVA_StrongExternal; |
| 250 | } |
| 251 | |
Eli Friedman | 43907e8 | 2009-05-03 19:01:39 +0000 | [diff] [blame] | 252 | // "static" functions get internal linkage. |
Eli Friedman | 5e22213 | 2009-05-03 18:13:43 +0000 | [diff] [blame] | 253 | if (FD->getStorageClass() == FunctionDecl::Static) |
Daniel Dunbar | 7c65e99 | 2009-04-14 08:05:55 +0000 | [diff] [blame] | 254 | return CodeGenModule::GVA_Internal; |
| 255 | |
Chris Lattner | 005eedc | 2009-05-12 20:26:52 +0000 | [diff] [blame] | 256 | if (!FD->isInline()) |
Chris Lattner | cbb8fc1 | 2009-04-14 20:25:53 +0000 | [diff] [blame] | 257 | return CodeGenModule::GVA_StrongExternal; |
Chris Lattner | 86daeee | 2009-04-14 16:44:36 +0000 | [diff] [blame] | 258 | |
Chris Lattner | d55a71d | 2009-04-22 00:03:30 +0000 | [diff] [blame] | 259 | // If the inline function explicitly has the GNU inline attribute on it, or if |
| 260 | // this is C89 mode, we use to GNU semantics. |
Douglas Gregor | 9f9bf25 | 2009-04-28 06:37:30 +0000 | [diff] [blame] | 261 | if (!Features.C99 && !Features.CPlusPlus) { |
Chris Lattner | d55a71d | 2009-04-22 00:03:30 +0000 | [diff] [blame] | 262 | // extern inline in GNU mode is like C99 inline. |
Douglas Gregor | 9f9bf25 | 2009-04-28 06:37:30 +0000 | [diff] [blame] | 263 | if (FD->getStorageClass() == FunctionDecl::Extern) |
| 264 | return CodeGenModule::GVA_C99Inline; |
| 265 | // Normal inline is a strong symbol. |
| 266 | return CodeGenModule::GVA_StrongExternal; |
| 267 | } else if (FD->hasActiveGNUInlineAttribute()) { |
| 268 | // GCC in C99 mode seems to use a different decision-making |
| 269 | // process for extern inline, which factors in previous |
| 270 | // declarations. |
| 271 | if (FD->isExternGNUInline()) |
Chris Lattner | d55a71d | 2009-04-22 00:03:30 +0000 | [diff] [blame] | 272 | return CodeGenModule::GVA_C99Inline; |
| 273 | // Normal inline is a strong symbol. |
Chris Lattner | cbb8fc1 | 2009-04-14 20:25:53 +0000 | [diff] [blame] | 274 | return CodeGenModule::GVA_StrongExternal; |
Chris Lattner | d55a71d | 2009-04-22 00:03:30 +0000 | [diff] [blame] | 275 | } |
Chris Lattner | cbb8fc1 | 2009-04-14 20:25:53 +0000 | [diff] [blame] | 276 | |
Chris Lattner | 86daeee | 2009-04-14 16:44:36 +0000 | [diff] [blame] | 277 | // The definition of inline changes based on the language. Note that we |
| 278 | // have already handled "static inline" above, with the GVA_Internal case. |
Chris Lattner | cbb8fc1 | 2009-04-14 20:25:53 +0000 | [diff] [blame] | 279 | if (Features.CPlusPlus) // inline and extern inline. |
Chris Lattner | 86daeee | 2009-04-14 16:44:36 +0000 | [diff] [blame] | 280 | return CodeGenModule::GVA_CXXInline; |
| 281 | |
Chris Lattner | d55a71d | 2009-04-22 00:03:30 +0000 | [diff] [blame] | 282 | assert(Features.C99 && "Must be in C99 mode if not in C89 or C++ mode"); |
Douglas Gregor | b3efa98 | 2009-04-23 18:22:55 +0000 | [diff] [blame] | 283 | if (FD->isC99InlineDefinition()) |
| 284 | return CodeGenModule::GVA_C99Inline; |
| 285 | |
| 286 | return CodeGenModule::GVA_StrongExternal; |
Daniel Dunbar | 7c65e99 | 2009-04-14 08:05:55 +0000 | [diff] [blame] | 287 | } |
| 288 | |
| 289 | /// SetFunctionDefinitionAttributes - Set attributes for a global. |
Daniel Dunbar | b97b692 | 2009-04-14 06:19:49 +0000 | [diff] [blame] | 290 | /// |
Mike Stump | f5408fe | 2009-05-16 07:57:57 +0000 | [diff] [blame] | 291 | /// FIXME: This is currently only done for aliases and functions, but not for |
| 292 | /// variables (these details are set in EmitGlobalVarDefinition for variables). |
Daniel Dunbar | 7c65e99 | 2009-04-14 08:05:55 +0000 | [diff] [blame] | 293 | void CodeGenModule::SetFunctionDefinitionAttributes(const FunctionDecl *D, |
| 294 | llvm::GlobalValue *GV) { |
Chris Lattner | 86daeee | 2009-04-14 16:44:36 +0000 | [diff] [blame] | 295 | GVALinkage Linkage = GetLinkageForFunction(D, Features); |
Daniel Dunbar | 7c65e99 | 2009-04-14 08:05:55 +0000 | [diff] [blame] | 296 | |
Daniel Dunbar | 55d6f50 | 2009-04-14 07:19:20 +0000 | [diff] [blame] | 297 | if (Linkage == GVA_Internal) { |
Chris Lattner | 9f94279 | 2009-04-14 05:33:52 +0000 | [diff] [blame] | 298 | GV->setLinkage(llvm::Function::InternalLinkage); |
| 299 | } else if (D->hasAttr<DLLExportAttr>()) { |
Daniel Dunbar | 7c65e99 | 2009-04-14 08:05:55 +0000 | [diff] [blame] | 300 | GV->setLinkage(llvm::Function::DLLExportLinkage); |
Chris Lattner | 44b0bc0 | 2009-04-14 06:04:17 +0000 | [diff] [blame] | 301 | } else if (D->hasAttr<WeakAttr>() || D->hasAttr<WeakImportAttr>()) { |
| 302 | GV->setLinkage(llvm::Function::WeakAnyLinkage); |
Chris Lattner | cbb8fc1 | 2009-04-14 20:25:53 +0000 | [diff] [blame] | 303 | } else if (Linkage == GVA_C99Inline) { |
| 304 | // In C99 mode, 'inline' functions are guaranteed to have a strong |
| 305 | // definition somewhere else, so we can use available_externally linkage. |
Chris Lattner | d9d049a | 2009-04-14 06:27:57 +0000 | [diff] [blame] | 306 | GV->setLinkage(llvm::Function::AvailableExternallyLinkage); |
Chris Lattner | 86daeee | 2009-04-14 16:44:36 +0000 | [diff] [blame] | 307 | } else if (Linkage == GVA_CXXInline) { |
| 308 | // In C++, the compiler has to emit a definition in every translation unit |
| 309 | // that references the function. We should use linkonce_odr because |
| 310 | // a) if all references in this translation unit are optimized away, we |
| 311 | // don't need to codegen it. b) if the function persists, it needs to be |
| 312 | // merged with other definitions. c) C++ has the ODR, so we know the |
| 313 | // definition is dependable. |
| 314 | GV->setLinkage(llvm::Function::LinkOnceODRLinkage); |
Daniel Dunbar | 7c65e99 | 2009-04-14 08:05:55 +0000 | [diff] [blame] | 315 | } else { |
Chris Lattner | cbb8fc1 | 2009-04-14 20:25:53 +0000 | [diff] [blame] | 316 | assert(Linkage == GVA_StrongExternal); |
| 317 | // Otherwise, we have strong external linkage. |
Daniel Dunbar | 7c65e99 | 2009-04-14 08:05:55 +0000 | [diff] [blame] | 318 | GV->setLinkage(llvm::Function::ExternalLinkage); |
Daniel Dunbar | 0dbe227 | 2008-09-08 21:33:45 +0000 | [diff] [blame] | 319 | } |
Nuno Lopes | d4cbda6 | 2008-06-08 15:45:52 +0000 | [diff] [blame] | 320 | |
Daniel Dunbar | 7c65e99 | 2009-04-14 08:05:55 +0000 | [diff] [blame] | 321 | SetCommonAttributes(D, GV); |
Nuno Lopes | d4cbda6 | 2008-06-08 15:45:52 +0000 | [diff] [blame] | 322 | } |
| 323 | |
Daniel Dunbar | 7dbd819 | 2009-04-14 07:08:30 +0000 | [diff] [blame] | 324 | void CodeGenModule::SetLLVMFunctionAttributes(const Decl *D, |
| 325 | const CGFunctionInfo &Info, |
| 326 | llvm::Function *F) { |
Devang Patel | 761d7f7 | 2008-09-25 21:02:23 +0000 | [diff] [blame] | 327 | AttributeListType AttributeList; |
Daniel Dunbar | 88b5396 | 2009-02-02 22:03:45 +0000 | [diff] [blame] | 328 | ConstructAttributeList(Info, D, AttributeList); |
Eli Friedman | c134fcb | 2008-06-04 19:41:28 +0000 | [diff] [blame] | 329 | |
Devang Patel | 761d7f7 | 2008-09-25 21:02:23 +0000 | [diff] [blame] | 330 | F->setAttributes(llvm::AttrListPtr::get(AttributeList.begin(), |
| 331 | AttributeList.size())); |
Eli Friedman | ff4a2d9 | 2008-06-01 15:54:49 +0000 | [diff] [blame] | 332 | |
| 333 | // Set the appropriate calling convention for the Function. |
Daniel Dunbar | b11fa0d | 2009-04-13 21:08:27 +0000 | [diff] [blame] | 334 | if (D->hasAttr<FastCallAttr>()) |
Anton Korobeynikov | f1c9c09 | 2008-11-11 20:21:14 +0000 | [diff] [blame] | 335 | F->setCallingConv(llvm::CallingConv::X86_FastCall); |
| 336 | |
Daniel Dunbar | b11fa0d | 2009-04-13 21:08:27 +0000 | [diff] [blame] | 337 | if (D->hasAttr<StdCallAttr>()) |
Anton Korobeynikov | f1c9c09 | 2008-11-11 20:21:14 +0000 | [diff] [blame] | 338 | F->setCallingConv(llvm::CallingConv::X86_StdCall); |
Daniel Dunbar | f80519b | 2008-09-04 23:41:35 +0000 | [diff] [blame] | 339 | } |
| 340 | |
Daniel Dunbar | 7c65e99 | 2009-04-14 08:05:55 +0000 | [diff] [blame] | 341 | void CodeGenModule::SetLLVMFunctionAttributesForDefinition(const Decl *D, |
| 342 | llvm::Function *F) { |
Daniel Dunbar | 74ac74a | 2009-03-02 04:58:03 +0000 | [diff] [blame] | 343 | if (!Features.Exceptions && !Features.ObjCNonFragileABI) |
Daniel Dunbar | f93349f | 2008-09-27 07:16:42 +0000 | [diff] [blame] | 344 | F->addFnAttr(llvm::Attribute::NoUnwind); |
Daniel Dunbar | af668b0 | 2008-10-28 00:17:57 +0000 | [diff] [blame] | 345 | |
Daniel Dunbar | b11fa0d | 2009-04-13 21:08:27 +0000 | [diff] [blame] | 346 | if (D->hasAttr<AlwaysInlineAttr>()) |
Daniel Dunbar | af668b0 | 2008-10-28 00:17:57 +0000 | [diff] [blame] | 347 | F->addFnAttr(llvm::Attribute::AlwaysInline); |
Anders Carlsson | 81ebbde | 2009-02-19 19:22:11 +0000 | [diff] [blame] | 348 | |
Daniel Dunbar | b11fa0d | 2009-04-13 21:08:27 +0000 | [diff] [blame] | 349 | if (D->hasAttr<NoinlineAttr>()) |
Anders Carlsson | 81ebbde | 2009-02-19 19:22:11 +0000 | [diff] [blame] | 350 | F->addFnAttr(llvm::Attribute::NoInline); |
Daniel Dunbar | f80519b | 2008-09-04 23:41:35 +0000 | [diff] [blame] | 351 | } |
| 352 | |
Daniel Dunbar | 7c65e99 | 2009-04-14 08:05:55 +0000 | [diff] [blame] | 353 | void CodeGenModule::SetCommonAttributes(const Decl *D, |
| 354 | llvm::GlobalValue *GV) { |
| 355 | setGlobalVisibility(GV, D); |
| 356 | |
| 357 | if (D->hasAttr<UsedAttr>()) |
| 358 | AddUsedGlobal(GV); |
| 359 | |
| 360 | if (const SectionAttr *SA = D->getAttr<SectionAttr>()) |
| 361 | GV->setSection(SA->getName()); |
| 362 | } |
| 363 | |
Daniel Dunbar | 0e4f40e | 2009-04-17 00:48:04 +0000 | [diff] [blame] | 364 | void CodeGenModule::SetInternalFunctionAttributes(const Decl *D, |
| 365 | llvm::Function *F, |
| 366 | const CGFunctionInfo &FI) { |
| 367 | SetLLVMFunctionAttributes(D, FI, F); |
| 368 | SetLLVMFunctionAttributesForDefinition(D, F); |
Daniel Dunbar | 7c65e99 | 2009-04-14 08:05:55 +0000 | [diff] [blame] | 369 | |
| 370 | F->setLinkage(llvm::Function::InternalLinkage); |
| 371 | |
Daniel Dunbar | 0e4f40e | 2009-04-17 00:48:04 +0000 | [diff] [blame] | 372 | SetCommonAttributes(D, F); |
Daniel Dunbar | f80519b | 2008-09-04 23:41:35 +0000 | [diff] [blame] | 373 | } |
| 374 | |
| 375 | void CodeGenModule::SetFunctionAttributes(const FunctionDecl *FD, |
Eli Friedman | c6c14d1 | 2009-05-26 01:22:57 +0000 | [diff] [blame^] | 376 | llvm::Function *F, |
| 377 | bool IsIncompleteFunction) { |
| 378 | if (!IsIncompleteFunction) |
| 379 | SetLLVMFunctionAttributes(FD, getTypes().getFunctionInfo(FD), F); |
Daniel Dunbar | 45c25ba | 2008-09-10 04:01:49 +0000 | [diff] [blame] | 380 | |
Daniel Dunbar | 7c65e99 | 2009-04-14 08:05:55 +0000 | [diff] [blame] | 381 | // Only a few attributes are set on declarations; these may later be |
| 382 | // overridden by a definition. |
| 383 | |
| 384 | if (FD->hasAttr<DLLImportAttr>()) { |
| 385 | F->setLinkage(llvm::Function::DLLImportLinkage); |
| 386 | } else if (FD->hasAttr<WeakAttr>() || FD->hasAttr<WeakImportAttr>()) { |
| 387 | // "extern_weak" is overloaded in LLVM; we probably should have |
| 388 | // separate linkage types for this. |
| 389 | F->setLinkage(llvm::Function::ExternalWeakLinkage); |
| 390 | } else { |
| 391 | F->setLinkage(llvm::Function::ExternalLinkage); |
| 392 | } |
| 393 | |
| 394 | if (const SectionAttr *SA = FD->getAttr<SectionAttr>()) |
| 395 | F->setSection(SA->getName()); |
Daniel Dunbar | 219df66 | 2008-09-08 23:44:31 +0000 | [diff] [blame] | 396 | } |
| 397 | |
Daniel Dunbar | 0269871 | 2009-02-13 20:29:50 +0000 | [diff] [blame] | 398 | void CodeGenModule::AddUsedGlobal(llvm::GlobalValue *GV) { |
| 399 | assert(!GV->isDeclaration() && |
| 400 | "Only globals with definition can force usage."); |
Chris Lattner | 35f38a2 | 2009-03-31 22:37:52 +0000 | [diff] [blame] | 401 | LLVMUsed.push_back(GV); |
Daniel Dunbar | 0269871 | 2009-02-13 20:29:50 +0000 | [diff] [blame] | 402 | } |
| 403 | |
| 404 | void CodeGenModule::EmitLLVMUsed() { |
| 405 | // Don't create llvm.used if there is no need. |
| 406 | if (LLVMUsed.empty()) |
| 407 | return; |
| 408 | |
Chris Lattner | 35f38a2 | 2009-03-31 22:37:52 +0000 | [diff] [blame] | 409 | llvm::Type *i8PTy = llvm::PointerType::getUnqual(llvm::Type::Int8Ty); |
| 410 | llvm::ArrayType *ATy = llvm::ArrayType::get(i8PTy, LLVMUsed.size()); |
| 411 | |
| 412 | // Convert LLVMUsed to what ConstantArray needs. |
| 413 | std::vector<llvm::Constant*> UsedArray; |
| 414 | UsedArray.resize(LLVMUsed.size()); |
| 415 | for (unsigned i = 0, e = LLVMUsed.size(); i != e; ++i) { |
| 416 | UsedArray[i] = |
| 417 | llvm::ConstantExpr::getBitCast(cast<llvm::Constant>(&*LLVMUsed[i]), i8PTy); |
| 418 | } |
| 419 | |
Daniel Dunbar | 0269871 | 2009-02-13 20:29:50 +0000 | [diff] [blame] | 420 | llvm::GlobalVariable *GV = |
| 421 | new llvm::GlobalVariable(ATy, false, |
| 422 | llvm::GlobalValue::AppendingLinkage, |
Chris Lattner | 35f38a2 | 2009-03-31 22:37:52 +0000 | [diff] [blame] | 423 | llvm::ConstantArray::get(ATy, UsedArray), |
Daniel Dunbar | 0269871 | 2009-02-13 20:29:50 +0000 | [diff] [blame] | 424 | "llvm.used", &getModule()); |
| 425 | |
| 426 | GV->setSection("llvm.metadata"); |
| 427 | } |
| 428 | |
| 429 | void CodeGenModule::EmitDeferred() { |
Chris Lattner | 67b0052 | 2009-03-21 09:44:56 +0000 | [diff] [blame] | 430 | // Emit code for any potentially referenced deferred decls. Since a |
| 431 | // previously unused static decl may become used during the generation of code |
| 432 | // for a static function, iterate until no changes are made. |
| 433 | while (!DeferredDeclsToEmit.empty()) { |
Anders Carlsson | 2a131fb | 2009-05-05 04:44:02 +0000 | [diff] [blame] | 434 | GlobalDecl D = DeferredDeclsToEmit.back(); |
Chris Lattner | 67b0052 | 2009-03-21 09:44:56 +0000 | [diff] [blame] | 435 | DeferredDeclsToEmit.pop_back(); |
| 436 | |
| 437 | // The mangled name for the decl must have been emitted in GlobalDeclMap. |
| 438 | // Look it up to see if it was defined with a stronger definition (e.g. an |
| 439 | // extern inline function with a strong function redefinition). If so, |
| 440 | // just ignore the deferred decl. |
| 441 | llvm::GlobalValue *CGRef = GlobalDeclMap[getMangledName(D)]; |
| 442 | assert(CGRef && "Deferred decl wasn't referenced?"); |
Anders Carlsson | b723f75 | 2009-01-04 02:08:04 +0000 | [diff] [blame] | 443 | |
Chris Lattner | 67b0052 | 2009-03-21 09:44:56 +0000 | [diff] [blame] | 444 | if (!CGRef->isDeclaration()) |
| 445 | continue; |
| 446 | |
| 447 | // Otherwise, emit the definition and move on to the next one. |
| 448 | EmitGlobalDefinition(D); |
| 449 | } |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 450 | } |
| 451 | |
Nate Begeman | 8bd4afe | 2008-04-19 04:17:09 +0000 | [diff] [blame] | 452 | /// EmitAnnotateAttr - Generate the llvm::ConstantStruct which contains the |
| 453 | /// annotation information for a given GlobalValue. The annotation struct is |
| 454 | /// {i8 *, i8 *, i8 *, i32}. The first field is a constant expression, the |
Daniel Dunbar | 3c827a7 | 2008-08-05 23:31:02 +0000 | [diff] [blame] | 455 | /// GlobalValue being annotated. The second field is the constant string |
Nate Begeman | 8bd4afe | 2008-04-19 04:17:09 +0000 | [diff] [blame] | 456 | /// created from the AnnotateAttr's annotation. The third field is a constant |
| 457 | /// string containing the name of the translation unit. The fourth field is |
| 458 | /// the line number in the file of the annotated value declaration. |
| 459 | /// |
| 460 | /// FIXME: this does not unique the annotation string constants, as llvm-gcc |
| 461 | /// appears to. |
| 462 | /// |
| 463 | llvm::Constant *CodeGenModule::EmitAnnotateAttr(llvm::GlobalValue *GV, |
| 464 | const AnnotateAttr *AA, |
| 465 | unsigned LineNo) { |
| 466 | llvm::Module *M = &getModule(); |
| 467 | |
| 468 | // get [N x i8] constants for the annotation string, and the filename string |
| 469 | // which are the 2nd and 3rd elements of the global annotation structure. |
| 470 | const llvm::Type *SBP = llvm::PointerType::getUnqual(llvm::Type::Int8Ty); |
| 471 | llvm::Constant *anno = llvm::ConstantArray::get(AA->getAnnotation(), true); |
| 472 | llvm::Constant *unit = llvm::ConstantArray::get(M->getModuleIdentifier(), |
| 473 | true); |
| 474 | |
| 475 | // Get the two global values corresponding to the ConstantArrays we just |
| 476 | // created to hold the bytes of the strings. |
Daniel Dunbar | 8e5c2b8 | 2009-03-31 23:42:16 +0000 | [diff] [blame] | 477 | const char *StringPrefix = getContext().Target.getStringSymbolPrefix(true); |
Nate Begeman | 8bd4afe | 2008-04-19 04:17:09 +0000 | [diff] [blame] | 478 | llvm::GlobalValue *annoGV = |
| 479 | new llvm::GlobalVariable(anno->getType(), false, |
| 480 | llvm::GlobalValue::InternalLinkage, anno, |
Daniel Dunbar | 8e5c2b8 | 2009-03-31 23:42:16 +0000 | [diff] [blame] | 481 | GV->getName() + StringPrefix, M); |
Nate Begeman | 8bd4afe | 2008-04-19 04:17:09 +0000 | [diff] [blame] | 482 | // translation unit name string, emitted into the llvm.metadata section. |
| 483 | llvm::GlobalValue *unitGV = |
| 484 | new llvm::GlobalVariable(unit->getType(), false, |
Daniel Dunbar | 8e5c2b8 | 2009-03-31 23:42:16 +0000 | [diff] [blame] | 485 | llvm::GlobalValue::InternalLinkage, unit, |
| 486 | StringPrefix, M); |
Nate Begeman | 8bd4afe | 2008-04-19 04:17:09 +0000 | [diff] [blame] | 487 | |
Daniel Dunbar | 57d5cee | 2009-04-14 22:41:13 +0000 | [diff] [blame] | 488 | // Create the ConstantStruct for the global annotation. |
Nate Begeman | 8bd4afe | 2008-04-19 04:17:09 +0000 | [diff] [blame] | 489 | llvm::Constant *Fields[4] = { |
| 490 | llvm::ConstantExpr::getBitCast(GV, SBP), |
| 491 | llvm::ConstantExpr::getBitCast(annoGV, SBP), |
| 492 | llvm::ConstantExpr::getBitCast(unitGV, SBP), |
| 493 | llvm::ConstantInt::get(llvm::Type::Int32Ty, LineNo) |
| 494 | }; |
| 495 | return llvm::ConstantStruct::get(Fields, 4, false); |
| 496 | } |
| 497 | |
Daniel Dunbar | 73241df | 2009-02-13 21:18:01 +0000 | [diff] [blame] | 498 | bool CodeGenModule::MayDeferGeneration(const ValueDecl *Global) { |
Daniel Dunbar | 5c61d97 | 2009-02-13 22:08:43 +0000 | [diff] [blame] | 499 | // Never defer when EmitAllDecls is specified or the decl has |
| 500 | // attribute used. |
Daniel Dunbar | b11fa0d | 2009-04-13 21:08:27 +0000 | [diff] [blame] | 501 | if (Features.EmitAllDecls || Global->hasAttr<UsedAttr>()) |
Daniel Dunbar | 73241df | 2009-02-13 21:18:01 +0000 | [diff] [blame] | 502 | return false; |
Daniel Dunbar | bd012ff | 2008-07-29 23:18:29 +0000 | [diff] [blame] | 503 | |
| 504 | if (const FunctionDecl *FD = dyn_cast<FunctionDecl>(Global)) { |
Daniel Dunbar | 73241df | 2009-02-13 21:18:01 +0000 | [diff] [blame] | 505 | // Constructors and destructors should never be deferred. |
Daniel Dunbar | b11fa0d | 2009-04-13 21:08:27 +0000 | [diff] [blame] | 506 | if (FD->hasAttr<ConstructorAttr>() || FD->hasAttr<DestructorAttr>()) |
Daniel Dunbar | 73241df | 2009-02-13 21:18:01 +0000 | [diff] [blame] | 507 | return false; |
| 508 | |
Chris Lattner | 86daeee | 2009-04-14 16:44:36 +0000 | [diff] [blame] | 509 | GVALinkage Linkage = GetLinkageForFunction(FD, Features); |
Chris Lattner | dbb5a37 | 2009-04-14 06:44:48 +0000 | [diff] [blame] | 510 | |
| 511 | // static, static inline, always_inline, and extern inline functions can |
Chris Lattner | 86daeee | 2009-04-14 16:44:36 +0000 | [diff] [blame] | 512 | // always be deferred. Normal inline functions can be deferred in C99/C++. |
Chris Lattner | cbb8fc1 | 2009-04-14 20:25:53 +0000 | [diff] [blame] | 513 | if (Linkage == GVA_Internal || Linkage == GVA_C99Inline || |
| 514 | Linkage == GVA_CXXInline) |
Chris Lattner | dbb5a37 | 2009-04-14 06:44:48 +0000 | [diff] [blame] | 515 | return true; |
Chris Lattner | dbb5a37 | 2009-04-14 06:44:48 +0000 | [diff] [blame] | 516 | return false; |
Daniel Dunbar | 73241df | 2009-02-13 21:18:01 +0000 | [diff] [blame] | 517 | } |
Chris Lattner | dbb5a37 | 2009-04-14 06:44:48 +0000 | [diff] [blame] | 518 | |
| 519 | const VarDecl *VD = cast<VarDecl>(Global); |
| 520 | assert(VD->isFileVarDecl() && "Invalid decl"); |
Douglas Gregor | b6c8c8b | 2009-04-21 17:11:58 +0000 | [diff] [blame] | 521 | |
Chris Lattner | dbb5a37 | 2009-04-14 06:44:48 +0000 | [diff] [blame] | 522 | return VD->getStorageClass() == VarDecl::Static; |
Daniel Dunbar | 73241df | 2009-02-13 21:18:01 +0000 | [diff] [blame] | 523 | } |
| 524 | |
Chris Lattner | b4880ba | 2009-05-12 21:21:08 +0000 | [diff] [blame] | 525 | void CodeGenModule::EmitGlobal(GlobalDecl GD) { |
Anders Carlsson | 2a131fb | 2009-05-05 04:44:02 +0000 | [diff] [blame] | 526 | const ValueDecl *Global = GD.getDecl(); |
| 527 | |
Chris Lattner | bd53271 | 2009-03-22 21:47:11 +0000 | [diff] [blame] | 528 | // If this is an alias definition (which otherwise looks like a declaration) |
| 529 | // emit it now. |
Daniel Dunbar | b11fa0d | 2009-04-13 21:08:27 +0000 | [diff] [blame] | 530 | if (Global->hasAttr<AliasAttr>()) |
Chris Lattner | bd53271 | 2009-03-22 21:47:11 +0000 | [diff] [blame] | 531 | return EmitAliasDefinition(Global); |
Daniel Dunbar | 219df66 | 2008-09-08 23:44:31 +0000 | [diff] [blame] | 532 | |
Chris Lattner | 67b0052 | 2009-03-21 09:44:56 +0000 | [diff] [blame] | 533 | // Ignore declarations, they will be emitted on their first use. |
Daniel Dunbar | 5e1e1f9 | 2009-03-19 08:27:24 +0000 | [diff] [blame] | 534 | if (const FunctionDecl *FD = dyn_cast<FunctionDecl>(Global)) { |
Daniel Dunbar | 73241df | 2009-02-13 21:18:01 +0000 | [diff] [blame] | 535 | // Forward declarations are emitted lazily on first use. |
| 536 | if (!FD->isThisDeclarationADefinition()) |
| 537 | return; |
Daniel Dunbar | 0269871 | 2009-02-13 20:29:50 +0000 | [diff] [blame] | 538 | } else { |
| 539 | const VarDecl *VD = cast<VarDecl>(Global); |
Daniel Dunbar | bd012ff | 2008-07-29 23:18:29 +0000 | [diff] [blame] | 540 | assert(VD->isFileVarDecl() && "Cannot emit local var decl as global."); |
| 541 | |
Douglas Gregor | b6c8c8b | 2009-04-21 17:11:58 +0000 | [diff] [blame] | 542 | // In C++, if this is marked "extern", defer code generation. |
Anders Carlsson | 2928c21 | 2009-05-16 21:02:39 +0000 | [diff] [blame] | 543 | if (getLangOptions().CPlusPlus && !VD->getInit() && |
| 544 | (VD->getStorageClass() == VarDecl::Extern || |
| 545 | VD->isExternC(getContext()))) |
Daniel Dunbar | 73241df | 2009-02-13 21:18:01 +0000 | [diff] [blame] | 546 | return; |
Douglas Gregor | b6c8c8b | 2009-04-21 17:11:58 +0000 | [diff] [blame] | 547 | |
| 548 | // In C, if this isn't a definition, defer code generation. |
| 549 | if (!getLangOptions().CPlusPlus && !VD->getInit()) |
| 550 | return; |
Nate Begeman | 4c13b7a | 2008-04-20 06:29:50 +0000 | [diff] [blame] | 551 | } |
| 552 | |
Chris Lattner | 67b0052 | 2009-03-21 09:44:56 +0000 | [diff] [blame] | 553 | // Defer code generation when possible if this is a static definition, inline |
| 554 | // function etc. These we only want to emit if they are used. |
Daniel Dunbar | 73241df | 2009-02-13 21:18:01 +0000 | [diff] [blame] | 555 | if (MayDeferGeneration(Global)) { |
Chris Lattner | 67b0052 | 2009-03-21 09:44:56 +0000 | [diff] [blame] | 556 | // If the value has already been used, add it directly to the |
| 557 | // DeferredDeclsToEmit list. |
Anders Carlsson | 2a131fb | 2009-05-05 04:44:02 +0000 | [diff] [blame] | 558 | const char *MangledName = getMangledName(GD); |
Chris Lattner | 67b0052 | 2009-03-21 09:44:56 +0000 | [diff] [blame] | 559 | if (GlobalDeclMap.count(MangledName)) |
Anders Carlsson | 2a131fb | 2009-05-05 04:44:02 +0000 | [diff] [blame] | 560 | DeferredDeclsToEmit.push_back(GD); |
Chris Lattner | 67b0052 | 2009-03-21 09:44:56 +0000 | [diff] [blame] | 561 | else { |
| 562 | // Otherwise, remember that we saw a deferred decl with this name. The |
| 563 | // first use of the mangled name will cause it to move into |
| 564 | // DeferredDeclsToEmit. |
Anders Carlsson | 2a131fb | 2009-05-05 04:44:02 +0000 | [diff] [blame] | 565 | DeferredDecls[MangledName] = GD; |
Chris Lattner | 67b0052 | 2009-03-21 09:44:56 +0000 | [diff] [blame] | 566 | } |
Daniel Dunbar | bd012ff | 2008-07-29 23:18:29 +0000 | [diff] [blame] | 567 | return; |
| 568 | } |
| 569 | |
| 570 | // Otherwise emit the definition. |
Anders Carlsson | 2a131fb | 2009-05-05 04:44:02 +0000 | [diff] [blame] | 571 | EmitGlobalDefinition(GD); |
Nate Begeman | 4c13b7a | 2008-04-20 06:29:50 +0000 | [diff] [blame] | 572 | } |
| 573 | |
Chris Lattner | b4880ba | 2009-05-12 21:21:08 +0000 | [diff] [blame] | 574 | void CodeGenModule::EmitGlobalDefinition(GlobalDecl GD) { |
Anders Carlsson | 2a131fb | 2009-05-05 04:44:02 +0000 | [diff] [blame] | 575 | const ValueDecl *D = GD.getDecl(); |
| 576 | |
| 577 | if (const CXXConstructorDecl *CD = dyn_cast<CXXConstructorDecl>(D)) |
| 578 | EmitCXXConstructor(CD, GD.getCtorType()); |
Chris Lattner | b4880ba | 2009-05-12 21:21:08 +0000 | [diff] [blame] | 579 | else if (isa<FunctionDecl>(D)) |
| 580 | EmitGlobalFunctionDefinition(GD); |
Anders Carlsson | 2a131fb | 2009-05-05 04:44:02 +0000 | [diff] [blame] | 581 | else if (const VarDecl *VD = dyn_cast<VarDecl>(D)) |
Daniel Dunbar | bd012ff | 2008-07-29 23:18:29 +0000 | [diff] [blame] | 582 | EmitGlobalVarDefinition(VD); |
Anders Carlsson | 2a131fb | 2009-05-05 04:44:02 +0000 | [diff] [blame] | 583 | else { |
Daniel Dunbar | bd012ff | 2008-07-29 23:18:29 +0000 | [diff] [blame] | 584 | assert(0 && "Invalid argument to EmitGlobalDefinition()"); |
| 585 | } |
| 586 | } |
| 587 | |
Chris Lattner | 74391b4 | 2009-03-22 21:03:39 +0000 | [diff] [blame] | 588 | /// GetOrCreateLLVMFunction - If the specified mangled name is not in the |
| 589 | /// module, create and return an llvm Function with the specified type. If there |
| 590 | /// is something in the module with the specified name, return it potentially |
| 591 | /// bitcasted to the right type. |
| 592 | /// |
| 593 | /// If D is non-null, it specifies a decl that correspond to this. This is used |
| 594 | /// to set the attributes on the function when it is first created. |
| 595 | llvm::Constant *CodeGenModule::GetOrCreateLLVMFunction(const char *MangledName, |
| 596 | const llvm::Type *Ty, |
Chris Lattner | b4880ba | 2009-05-12 21:21:08 +0000 | [diff] [blame] | 597 | GlobalDecl D) { |
Chris Lattner | 0558e79 | 2009-03-21 09:25:43 +0000 | [diff] [blame] | 598 | // Lookup the entry, lazily creating it if necessary. |
Chris Lattner | 0558e79 | 2009-03-21 09:25:43 +0000 | [diff] [blame] | 599 | llvm::GlobalValue *&Entry = GlobalDeclMap[MangledName]; |
| 600 | if (Entry) { |
| 601 | if (Entry->getType()->getElementType() == Ty) |
| 602 | return Entry; |
| 603 | |
| 604 | // Make sure the result is of the correct type. |
| 605 | const llvm::Type *PTy = llvm::PointerType::getUnqual(Ty); |
| 606 | return llvm::ConstantExpr::getBitCast(Entry, PTy); |
| 607 | } |
| 608 | |
Chris Lattner | 67b0052 | 2009-03-21 09:44:56 +0000 | [diff] [blame] | 609 | // This is the first use or definition of a mangled name. If there is a |
| 610 | // deferred decl with this name, remember that we need to emit it at the end |
| 611 | // of the file. |
Anders Carlsson | 2a131fb | 2009-05-05 04:44:02 +0000 | [diff] [blame] | 612 | llvm::DenseMap<const char*, GlobalDecl>::iterator DDI = |
Chris Lattner | 9fa959d | 2009-05-12 20:58:15 +0000 | [diff] [blame] | 613 | DeferredDecls.find(MangledName); |
Chris Lattner | 67b0052 | 2009-03-21 09:44:56 +0000 | [diff] [blame] | 614 | if (DDI != DeferredDecls.end()) { |
| 615 | // Move the potentially referenced deferred decl to the DeferredDeclsToEmit |
| 616 | // list, and remove it from DeferredDecls (since we don't need it anymore). |
| 617 | DeferredDeclsToEmit.push_back(DDI->second); |
| 618 | DeferredDecls.erase(DDI); |
Chris Lattner | b4880ba | 2009-05-12 21:21:08 +0000 | [diff] [blame] | 619 | } else if (const FunctionDecl *FD = cast_or_null<FunctionDecl>(D.getDecl())) { |
Chris Lattner | 0c337ed | 2009-05-12 21:02:27 +0000 | [diff] [blame] | 620 | // If this the first reference to a C++ inline function in a class, queue up |
| 621 | // the deferred function body for emission. These are not seen as |
| 622 | // top-level declarations. |
Chris Lattner | b4880ba | 2009-05-12 21:21:08 +0000 | [diff] [blame] | 623 | if (FD->isThisDeclarationADefinition() && MayDeferGeneration(FD)) |
| 624 | DeferredDeclsToEmit.push_back(D); |
Chris Lattner | 67b0052 | 2009-03-21 09:44:56 +0000 | [diff] [blame] | 625 | } |
| 626 | |
Chris Lattner | 0558e79 | 2009-03-21 09:25:43 +0000 | [diff] [blame] | 627 | // This function doesn't have a complete type (for example, the return |
| 628 | // type is an incomplete struct). Use a fake type instead, and make |
| 629 | // sure not to try to set attributes. |
Eli Friedman | c6c14d1 | 2009-05-26 01:22:57 +0000 | [diff] [blame^] | 630 | bool IsIncompleteFunction = false; |
Chris Lattner | 0558e79 | 2009-03-21 09:25:43 +0000 | [diff] [blame] | 631 | if (!isa<llvm::FunctionType>(Ty)) { |
| 632 | Ty = llvm::FunctionType::get(llvm::Type::VoidTy, |
| 633 | std::vector<const llvm::Type*>(), false); |
Eli Friedman | c6c14d1 | 2009-05-26 01:22:57 +0000 | [diff] [blame^] | 634 | IsIncompleteFunction = true; |
Chris Lattner | 0558e79 | 2009-03-21 09:25:43 +0000 | [diff] [blame] | 635 | } |
| 636 | llvm::Function *F = llvm::Function::Create(cast<llvm::FunctionType>(Ty), |
| 637 | llvm::Function::ExternalLinkage, |
Chris Lattner | d972678 | 2009-03-22 00:12:30 +0000 | [diff] [blame] | 638 | "", &getModule()); |
| 639 | F->setName(MangledName); |
Eli Friedman | c6c14d1 | 2009-05-26 01:22:57 +0000 | [diff] [blame^] | 640 | if (D.getDecl()) |
| 641 | SetFunctionAttributes(cast<FunctionDecl>(D.getDecl()), F, |
| 642 | IsIncompleteFunction); |
Chris Lattner | 0558e79 | 2009-03-21 09:25:43 +0000 | [diff] [blame] | 643 | Entry = F; |
| 644 | return F; |
| 645 | } |
| 646 | |
Chris Lattner | 74391b4 | 2009-03-22 21:03:39 +0000 | [diff] [blame] | 647 | /// GetAddrOfFunction - Return the address of the given function. If Ty is |
| 648 | /// non-null, then this function will use the specified type if it has to |
| 649 | /// create it (this occurs when we see a definition of the function). |
Chris Lattner | b4880ba | 2009-05-12 21:21:08 +0000 | [diff] [blame] | 650 | llvm::Constant *CodeGenModule::GetAddrOfFunction(GlobalDecl GD, |
Chris Lattner | 74391b4 | 2009-03-22 21:03:39 +0000 | [diff] [blame] | 651 | const llvm::Type *Ty) { |
| 652 | // If there was no specific requested type, just convert it now. |
| 653 | if (!Ty) |
Chris Lattner | b4880ba | 2009-05-12 21:21:08 +0000 | [diff] [blame] | 654 | Ty = getTypes().ConvertType(GD.getDecl()->getType()); |
| 655 | return GetOrCreateLLVMFunction(getMangledName(GD.getDecl()), Ty, GD); |
Chris Lattner | 74391b4 | 2009-03-22 21:03:39 +0000 | [diff] [blame] | 656 | } |
Eli Friedman | 77ba708 | 2008-05-30 19:50:47 +0000 | [diff] [blame] | 657 | |
Chris Lattner | 74391b4 | 2009-03-22 21:03:39 +0000 | [diff] [blame] | 658 | /// CreateRuntimeFunction - Create a new runtime function with the specified |
| 659 | /// type and name. |
| 660 | llvm::Constant * |
| 661 | CodeGenModule::CreateRuntimeFunction(const llvm::FunctionType *FTy, |
| 662 | const char *Name) { |
| 663 | // Convert Name to be a uniqued string from the IdentifierInfo table. |
| 664 | Name = getContext().Idents.get(Name).getName(); |
Chris Lattner | b4880ba | 2009-05-12 21:21:08 +0000 | [diff] [blame] | 665 | return GetOrCreateLLVMFunction(Name, FTy, GlobalDecl()); |
Chris Lattner | 74391b4 | 2009-03-22 21:03:39 +0000 | [diff] [blame] | 666 | } |
Daniel Dunbar | bd012ff | 2008-07-29 23:18:29 +0000 | [diff] [blame] | 667 | |
Chris Lattner | 74391b4 | 2009-03-22 21:03:39 +0000 | [diff] [blame] | 668 | /// GetOrCreateLLVMGlobal - If the specified mangled name is not in the module, |
| 669 | /// create and return an llvm GlobalVariable with the specified type. If there |
| 670 | /// is something in the module with the specified name, return it potentially |
| 671 | /// bitcasted to the right type. |
| 672 | /// |
| 673 | /// If D is non-null, it specifies a decl that correspond to this. This is used |
| 674 | /// to set the attributes on the global when it is first created. |
| 675 | llvm::Constant *CodeGenModule::GetOrCreateLLVMGlobal(const char *MangledName, |
| 676 | const llvm::PointerType*Ty, |
| 677 | const VarDecl *D) { |
Daniel Dunbar | 3c827a7 | 2008-08-05 23:31:02 +0000 | [diff] [blame] | 678 | // Lookup the entry, lazily creating it if necessary. |
Chris Lattner | 5d4f5c7 | 2009-03-21 08:06:59 +0000 | [diff] [blame] | 679 | llvm::GlobalValue *&Entry = GlobalDeclMap[MangledName]; |
Chris Lattner | 99b5361 | 2009-03-21 08:03:33 +0000 | [diff] [blame] | 680 | if (Entry) { |
Chris Lattner | 74391b4 | 2009-03-22 21:03:39 +0000 | [diff] [blame] | 681 | if (Entry->getType() == Ty) |
Chris Lattner | 570585c | 2009-03-21 09:16:30 +0000 | [diff] [blame] | 682 | return Entry; |
| 683 | |
Chris Lattner | 99b5361 | 2009-03-21 08:03:33 +0000 | [diff] [blame] | 684 | // Make sure the result is of the correct type. |
Chris Lattner | 74391b4 | 2009-03-22 21:03:39 +0000 | [diff] [blame] | 685 | return llvm::ConstantExpr::getBitCast(Entry, Ty); |
Daniel Dunbar | 4998888 | 2009-01-13 02:25:00 +0000 | [diff] [blame] | 686 | } |
Chris Lattner | 67b0052 | 2009-03-21 09:44:56 +0000 | [diff] [blame] | 687 | |
| 688 | // This is the first use or definition of a mangled name. If there is a |
| 689 | // deferred decl with this name, remember that we need to emit it at the end |
| 690 | // of the file. |
Anders Carlsson | 2a131fb | 2009-05-05 04:44:02 +0000 | [diff] [blame] | 691 | llvm::DenseMap<const char*, GlobalDecl>::iterator DDI = |
Chris Lattner | 67b0052 | 2009-03-21 09:44:56 +0000 | [diff] [blame] | 692 | DeferredDecls.find(MangledName); |
| 693 | if (DDI != DeferredDecls.end()) { |
| 694 | // Move the potentially referenced deferred decl to the DeferredDeclsToEmit |
| 695 | // list, and remove it from DeferredDecls (since we don't need it anymore). |
| 696 | DeferredDeclsToEmit.push_back(DDI->second); |
| 697 | DeferredDecls.erase(DDI); |
| 698 | } |
| 699 | |
Chris Lattner | 99b5361 | 2009-03-21 08:03:33 +0000 | [diff] [blame] | 700 | llvm::GlobalVariable *GV = |
Chris Lattner | 74391b4 | 2009-03-22 21:03:39 +0000 | [diff] [blame] | 701 | new llvm::GlobalVariable(Ty->getElementType(), false, |
Chris Lattner | 99b5361 | 2009-03-21 08:03:33 +0000 | [diff] [blame] | 702 | llvm::GlobalValue::ExternalLinkage, |
Chris Lattner | d972678 | 2009-03-22 00:12:30 +0000 | [diff] [blame] | 703 | 0, "", &getModule(), |
Eli Friedman | 56ebe50 | 2009-04-19 21:05:03 +0000 | [diff] [blame] | 704 | false, Ty->getAddressSpace()); |
Chris Lattner | d972678 | 2009-03-22 00:12:30 +0000 | [diff] [blame] | 705 | GV->setName(MangledName); |
Chris Lattner | 99b5361 | 2009-03-21 08:03:33 +0000 | [diff] [blame] | 706 | |
| 707 | // Handle things which are present even on external declarations. |
Chris Lattner | 74391b4 | 2009-03-22 21:03:39 +0000 | [diff] [blame] | 708 | if (D) { |
Mike Stump | f5408fe | 2009-05-16 07:57:57 +0000 | [diff] [blame] | 709 | // FIXME: This code is overly simple and should be merged with other global |
| 710 | // handling. |
Chris Lattner | 74391b4 | 2009-03-22 21:03:39 +0000 | [diff] [blame] | 711 | GV->setConstant(D->getType().isConstant(Context)); |
Chris Lattner | 99b5361 | 2009-03-21 08:03:33 +0000 | [diff] [blame] | 712 | |
Chris Lattner | 74391b4 | 2009-03-22 21:03:39 +0000 | [diff] [blame] | 713 | // FIXME: Merge with other attribute handling code. |
| 714 | if (D->getStorageClass() == VarDecl::PrivateExtern) |
Daniel Dunbar | 04d4078 | 2009-04-14 06:00:08 +0000 | [diff] [blame] | 715 | GV->setVisibility(llvm::GlobalValue::HiddenVisibility); |
Chris Lattner | 99b5361 | 2009-03-21 08:03:33 +0000 | [diff] [blame] | 716 | |
Daniel Dunbar | b11fa0d | 2009-04-13 21:08:27 +0000 | [diff] [blame] | 717 | if (D->hasAttr<WeakAttr>() || D->hasAttr<WeakImportAttr>()) |
Chris Lattner | 74391b4 | 2009-03-22 21:03:39 +0000 | [diff] [blame] | 718 | GV->setLinkage(llvm::GlobalValue::ExternalWeakLinkage); |
Eli Friedman | 56ebe50 | 2009-04-19 21:05:03 +0000 | [diff] [blame] | 719 | |
| 720 | GV->setThreadLocal(D->isThreadSpecified()); |
Chris Lattner | 74391b4 | 2009-03-22 21:03:39 +0000 | [diff] [blame] | 721 | } |
| 722 | |
Chris Lattner | 99b5361 | 2009-03-21 08:03:33 +0000 | [diff] [blame] | 723 | return Entry = GV; |
Daniel Dunbar | bd012ff | 2008-07-29 23:18:29 +0000 | [diff] [blame] | 724 | } |
| 725 | |
Chris Lattner | 74391b4 | 2009-03-22 21:03:39 +0000 | [diff] [blame] | 726 | |
| 727 | /// GetAddrOfGlobalVar - Return the llvm::Constant for the address of the |
| 728 | /// given global variable. If Ty is non-null and if the global doesn't exist, |
| 729 | /// then it will be greated with the specified type instead of whatever the |
| 730 | /// normal requested type would be. |
| 731 | llvm::Constant *CodeGenModule::GetAddrOfGlobalVar(const VarDecl *D, |
| 732 | const llvm::Type *Ty) { |
| 733 | assert(D->hasGlobalStorage() && "Not a global variable"); |
| 734 | QualType ASTTy = D->getType(); |
| 735 | if (Ty == 0) |
| 736 | Ty = getTypes().ConvertTypeForMem(ASTTy); |
| 737 | |
| 738 | const llvm::PointerType *PTy = |
| 739 | llvm::PointerType::get(Ty, ASTTy.getAddressSpace()); |
| 740 | return GetOrCreateLLVMGlobal(getMangledName(D), PTy, D); |
| 741 | } |
| 742 | |
| 743 | /// CreateRuntimeVariable - Create a new runtime global variable with the |
| 744 | /// specified type and name. |
| 745 | llvm::Constant * |
| 746 | CodeGenModule::CreateRuntimeVariable(const llvm::Type *Ty, |
| 747 | const char *Name) { |
| 748 | // Convert Name to be a uniqued string from the IdentifierInfo table. |
| 749 | Name = getContext().Idents.get(Name).getName(); |
| 750 | return GetOrCreateLLVMGlobal(Name, llvm::PointerType::getUnqual(Ty), 0); |
| 751 | } |
| 752 | |
Daniel Dunbar | 03f5ad9 | 2009-04-15 22:08:45 +0000 | [diff] [blame] | 753 | void CodeGenModule::EmitTentativeDefinition(const VarDecl *D) { |
| 754 | assert(!D->getInit() && "Cannot emit definite definitions here!"); |
| 755 | |
Douglas Gregor | 7520bd1 | 2009-04-21 19:28:58 +0000 | [diff] [blame] | 756 | if (MayDeferGeneration(D)) { |
| 757 | // If we have not seen a reference to this variable yet, place it |
| 758 | // into the deferred declarations table to be emitted if needed |
| 759 | // later. |
| 760 | const char *MangledName = getMangledName(D); |
| 761 | if (GlobalDeclMap.count(MangledName) == 0) { |
Anders Carlsson | 2a131fb | 2009-05-05 04:44:02 +0000 | [diff] [blame] | 762 | DeferredDecls[MangledName] = GlobalDecl(D); |
Daniel Dunbar | 03f5ad9 | 2009-04-15 22:08:45 +0000 | [diff] [blame] | 763 | return; |
Douglas Gregor | 7520bd1 | 2009-04-21 19:28:58 +0000 | [diff] [blame] | 764 | } |
| 765 | } |
| 766 | |
| 767 | // The tentative definition is the only definition. |
Daniel Dunbar | 03f5ad9 | 2009-04-15 22:08:45 +0000 | [diff] [blame] | 768 | EmitGlobalVarDefinition(D); |
| 769 | } |
| 770 | |
Daniel Dunbar | bd012ff | 2008-07-29 23:18:29 +0000 | [diff] [blame] | 771 | void CodeGenModule::EmitGlobalVarDefinition(const VarDecl *D) { |
Chris Lattner | 8f32f71 | 2007-07-14 00:23:28 +0000 | [diff] [blame] | 772 | llvm::Constant *Init = 0; |
Eli Friedman | 77ba708 | 2008-05-30 19:50:47 +0000 | [diff] [blame] | 773 | QualType ASTTy = D->getType(); |
Chris Lattner | b75863d | 2009-04-10 00:35:59 +0000 | [diff] [blame] | 774 | |
Chris Lattner | 8f32f71 | 2007-07-14 00:23:28 +0000 | [diff] [blame] | 775 | if (D->getInit() == 0) { |
Eli Friedman | cd5f4aa | 2008-05-30 20:39:54 +0000 | [diff] [blame] | 776 | // This is a tentative definition; tentative definitions are |
Daniel Dunbar | 03f5ad9 | 2009-04-15 22:08:45 +0000 | [diff] [blame] | 777 | // implicitly initialized with { 0 }. |
| 778 | // |
| 779 | // Note that tentative definitions are only emitted at the end of |
| 780 | // a translation unit, so they should never have incomplete |
| 781 | // type. In addition, EmitTentativeDefinition makes sure that we |
| 782 | // never attempt to emit a tentative definition if a real one |
| 783 | // exists. A use may still exists, however, so we still may need |
| 784 | // to do a RAUW. |
| 785 | assert(!ASTTy->isIncompleteType() && "Unexpected incomplete type"); |
| 786 | Init = llvm::Constant::getNullValue(getTypes().ConvertTypeForMem(ASTTy)); |
Eli Friedman | 77ba708 | 2008-05-30 19:50:47 +0000 | [diff] [blame] | 787 | } else { |
Anders Carlsson | e9352cc | 2009-04-08 04:48:15 +0000 | [diff] [blame] | 788 | Init = EmitConstantExpr(D->getInit(), D->getType()); |
Eli Friedman | 6e656f4 | 2009-02-20 01:18:21 +0000 | [diff] [blame] | 789 | if (!Init) { |
Daniel Dunbar | 232350d | 2009-02-19 05:36:41 +0000 | [diff] [blame] | 790 | ErrorUnsupported(D, "static initializer"); |
Eli Friedman | 6e656f4 | 2009-02-20 01:18:21 +0000 | [diff] [blame] | 791 | QualType T = D->getInit()->getType(); |
| 792 | Init = llvm::UndefValue::get(getTypes().ConvertType(T)); |
| 793 | } |
Eli Friedman | 77ba708 | 2008-05-30 19:50:47 +0000 | [diff] [blame] | 794 | } |
Eli Friedman | 77ba708 | 2008-05-30 19:50:47 +0000 | [diff] [blame] | 795 | |
Chris Lattner | 2d58406 | 2009-03-21 08:13:05 +0000 | [diff] [blame] | 796 | const llvm::Type* InitType = Init->getType(); |
Chris Lattner | 570585c | 2009-03-21 09:16:30 +0000 | [diff] [blame] | 797 | llvm::Constant *Entry = GetAddrOfGlobalVar(D, InitType); |
Daniel Dunbar | 3c827a7 | 2008-08-05 23:31:02 +0000 | [diff] [blame] | 798 | |
Chris Lattner | 570585c | 2009-03-21 09:16:30 +0000 | [diff] [blame] | 799 | // Strip off a bitcast if we got one back. |
| 800 | if (llvm::ConstantExpr *CE = dyn_cast<llvm::ConstantExpr>(Entry)) { |
| 801 | assert(CE->getOpcode() == llvm::Instruction::BitCast); |
| 802 | Entry = CE->getOperand(0); |
| 803 | } |
| 804 | |
| 805 | // Entry is now either a Function or GlobalVariable. |
| 806 | llvm::GlobalVariable *GV = dyn_cast<llvm::GlobalVariable>(Entry); |
| 807 | |
Chris Lattner | 570585c | 2009-03-21 09:16:30 +0000 | [diff] [blame] | 808 | // We have a definition after a declaration with the wrong type. |
| 809 | // We must make a new GlobalVariable* and update everything that used OldGV |
| 810 | // (a declaration or tentative definition) with the new GlobalVariable* |
| 811 | // (which will be a definition). |
| 812 | // |
| 813 | // This happens if there is a prototype for a global (e.g. |
| 814 | // "extern int x[];") and then a definition of a different type (e.g. |
| 815 | // "int x[10];"). This also happens when an initializer has a different type |
| 816 | // from the type of the global (this happens with unions). |
Chris Lattner | 570585c | 2009-03-21 09:16:30 +0000 | [diff] [blame] | 817 | if (GV == 0 || |
| 818 | GV->getType()->getElementType() != InitType || |
| 819 | GV->getType()->getAddressSpace() != ASTTy.getAddressSpace()) { |
| 820 | |
| 821 | // Remove the old entry from GlobalDeclMap so that we'll create a new one. |
| 822 | GlobalDeclMap.erase(getMangledName(D)); |
Daniel Dunbar | 232350d | 2009-02-19 05:36:41 +0000 | [diff] [blame] | 823 | |
Chris Lattner | 570585c | 2009-03-21 09:16:30 +0000 | [diff] [blame] | 824 | // Make a new global with the correct type, this is now guaranteed to work. |
| 825 | GV = cast<llvm::GlobalVariable>(GetAddrOfGlobalVar(D, InitType)); |
Chris Lattner | 0558e79 | 2009-03-21 09:25:43 +0000 | [diff] [blame] | 826 | GV->takeName(cast<llvm::GlobalValue>(Entry)); |
| 827 | |
Eli Friedman | 77ba708 | 2008-05-30 19:50:47 +0000 | [diff] [blame] | 828 | // Replace all uses of the old global with the new global |
| 829 | llvm::Constant *NewPtrForOldDecl = |
Chris Lattner | 570585c | 2009-03-21 09:16:30 +0000 | [diff] [blame] | 830 | llvm::ConstantExpr::getBitCast(GV, Entry->getType()); |
| 831 | Entry->replaceAllUsesWith(NewPtrForOldDecl); |
Eli Friedman | 77ba708 | 2008-05-30 19:50:47 +0000 | [diff] [blame] | 832 | |
| 833 | // Erase the old global, since it is no longer used. |
Chris Lattner | 570585c | 2009-03-21 09:16:30 +0000 | [diff] [blame] | 834 | cast<llvm::GlobalValue>(Entry)->eraseFromParent(); |
Chris Lattner | 8f32f71 | 2007-07-14 00:23:28 +0000 | [diff] [blame] | 835 | } |
Devang Patel | 8e53e72 | 2007-10-26 16:31:40 +0000 | [diff] [blame] | 836 | |
Nate Begeman | 8bd4afe | 2008-04-19 04:17:09 +0000 | [diff] [blame] | 837 | if (const AnnotateAttr *AA = D->getAttr<AnnotateAttr>()) { |
| 838 | SourceManager &SM = Context.getSourceManager(); |
| 839 | AddAnnotation(EmitAnnotateAttr(GV, AA, |
Chris Lattner | f7cf85b | 2009-01-16 07:36:28 +0000 | [diff] [blame] | 840 | SM.getInstantiationLineNumber(D->getLocation()))); |
Nate Begeman | 8bd4afe | 2008-04-19 04:17:09 +0000 | [diff] [blame] | 841 | } |
| 842 | |
Chris Lattner | 88a69ad | 2007-07-13 05:13:43 +0000 | [diff] [blame] | 843 | GV->setInitializer(Init); |
Nuno Lopes | b381aac | 2008-09-01 11:33:04 +0000 | [diff] [blame] | 844 | GV->setConstant(D->getType().isConstant(Context)); |
Eli Friedman | 0de40af | 2009-02-27 04:11:37 +0000 | [diff] [blame] | 845 | GV->setAlignment(getContext().getDeclAlignInBytes(D)); |
Eli Friedman | 08d7802 | 2008-05-29 11:10:27 +0000 | [diff] [blame] | 846 | |
Chris Lattner | 88a69ad | 2007-07-13 05:13:43 +0000 | [diff] [blame] | 847 | // Set the llvm linkage type as appropriate. |
Chris Lattner | 8fabd78 | 2008-05-04 01:44:26 +0000 | [diff] [blame] | 848 | if (D->getStorageClass() == VarDecl::Static) |
| 849 | GV->setLinkage(llvm::Function::InternalLinkage); |
Daniel Dunbar | b11fa0d | 2009-04-13 21:08:27 +0000 | [diff] [blame] | 850 | else if (D->hasAttr<DLLImportAttr>()) |
Chris Lattner | ddee423 | 2008-03-03 03:28:21 +0000 | [diff] [blame] | 851 | GV->setLinkage(llvm::Function::DLLImportLinkage); |
Daniel Dunbar | b11fa0d | 2009-04-13 21:08:27 +0000 | [diff] [blame] | 852 | else if (D->hasAttr<DLLExportAttr>()) |
Chris Lattner | ddee423 | 2008-03-03 03:28:21 +0000 | [diff] [blame] | 853 | GV->setLinkage(llvm::Function::DLLExportLinkage); |
Daniel Dunbar | b11fa0d | 2009-04-13 21:08:27 +0000 | [diff] [blame] | 854 | else if (D->hasAttr<WeakAttr>() || D->hasAttr<WeakImportAttr>()) |
Mike Stump | 286acbd | 2009-03-07 16:33:28 +0000 | [diff] [blame] | 855 | GV->setLinkage(llvm::GlobalVariable::WeakAnyLinkage); |
Daniel Dunbar | 04d4078 | 2009-04-14 06:00:08 +0000 | [diff] [blame] | 856 | else if (!CompileOpts.NoCommon && |
| 857 | (!D->hasExternalStorage() && !D->getInit())) |
| 858 | GV->setLinkage(llvm::GlobalVariable::CommonLinkage); |
Daniel Dunbar | 7e714cd | 2009-04-10 20:26:50 +0000 | [diff] [blame] | 859 | else |
Daniel Dunbar | 04d4078 | 2009-04-14 06:00:08 +0000 | [diff] [blame] | 860 | GV->setLinkage(llvm::GlobalVariable::ExternalLinkage); |
Daniel Dunbar | 7e714cd | 2009-04-10 20:26:50 +0000 | [diff] [blame] | 861 | |
Daniel Dunbar | 7c65e99 | 2009-04-14 08:05:55 +0000 | [diff] [blame] | 862 | SetCommonAttributes(D, GV); |
Daniel Dunbar | 04d4078 | 2009-04-14 06:00:08 +0000 | [diff] [blame] | 863 | |
Sanjiv Gupta | 686226b | 2008-06-05 08:59:10 +0000 | [diff] [blame] | 864 | // Emit global variable debug information. |
Chris Lattner | 2d58406 | 2009-03-21 08:13:05 +0000 | [diff] [blame] | 865 | if (CGDebugInfo *DI = getDebugInfo()) { |
Daniel Dunbar | 66031a5 | 2008-10-17 16:15:48 +0000 | [diff] [blame] | 866 | DI->setLocation(D->getLocation()); |
Sanjiv Gupta | 686226b | 2008-06-05 08:59:10 +0000 | [diff] [blame] | 867 | DI->EmitGlobalVariable(GV, D); |
| 868 | } |
Chris Lattner | 88a69ad | 2007-07-13 05:13:43 +0000 | [diff] [blame] | 869 | } |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 870 | |
Chris Lattner | bdb0132 | 2009-05-05 06:16:31 +0000 | [diff] [blame] | 871 | /// ReplaceUsesOfNonProtoTypeWithRealFunction - This function is called when we |
| 872 | /// implement a function with no prototype, e.g. "int foo() {}". If there are |
| 873 | /// existing call uses of the old function in the module, this adjusts them to |
| 874 | /// call the new function directly. |
| 875 | /// |
| 876 | /// This is not just a cleanup: the always_inline pass requires direct calls to |
| 877 | /// functions to be able to inline them. If there is a bitcast in the way, it |
| 878 | /// won't inline them. Instcombine normally deletes these calls, but it isn't |
| 879 | /// run at -O0. |
| 880 | static void ReplaceUsesOfNonProtoTypeWithRealFunction(llvm::GlobalValue *Old, |
| 881 | llvm::Function *NewFn) { |
| 882 | // If we're redefining a global as a function, don't transform it. |
| 883 | llvm::Function *OldFn = dyn_cast<llvm::Function>(Old); |
| 884 | if (OldFn == 0) return; |
| 885 | |
| 886 | const llvm::Type *NewRetTy = NewFn->getReturnType(); |
| 887 | llvm::SmallVector<llvm::Value*, 4> ArgList; |
| 888 | |
| 889 | for (llvm::Value::use_iterator UI = OldFn->use_begin(), E = OldFn->use_end(); |
| 890 | UI != E; ) { |
| 891 | // TODO: Do invokes ever occur in C code? If so, we should handle them too. |
| 892 | llvm::CallInst *CI = dyn_cast<llvm::CallInst>(*UI++); |
| 893 | if (!CI) continue; |
| 894 | |
| 895 | // If the return types don't match exactly, and if the call isn't dead, then |
| 896 | // we can't transform this call. |
| 897 | if (CI->getType() != NewRetTy && !CI->use_empty()) |
| 898 | continue; |
| 899 | |
| 900 | // If the function was passed too few arguments, don't transform. If extra |
| 901 | // arguments were passed, we silently drop them. If any of the types |
| 902 | // mismatch, we don't transform. |
| 903 | unsigned ArgNo = 0; |
| 904 | bool DontTransform = false; |
| 905 | for (llvm::Function::arg_iterator AI = NewFn->arg_begin(), |
| 906 | E = NewFn->arg_end(); AI != E; ++AI, ++ArgNo) { |
| 907 | if (CI->getNumOperands()-1 == ArgNo || |
| 908 | CI->getOperand(ArgNo+1)->getType() != AI->getType()) { |
| 909 | DontTransform = true; |
| 910 | break; |
| 911 | } |
| 912 | } |
| 913 | if (DontTransform) |
| 914 | continue; |
| 915 | |
| 916 | // Okay, we can transform this. Create the new call instruction and copy |
| 917 | // over the required information. |
| 918 | ArgList.append(CI->op_begin()+1, CI->op_begin()+1+ArgNo); |
| 919 | llvm::CallInst *NewCall = llvm::CallInst::Create(NewFn, ArgList.begin(), |
| 920 | ArgList.end(), "", CI); |
| 921 | ArgList.clear(); |
| 922 | if (NewCall->getType() != llvm::Type::VoidTy) |
| 923 | NewCall->takeName(CI); |
| 924 | NewCall->setCallingConv(CI->getCallingConv()); |
| 925 | NewCall->setAttributes(CI->getAttributes()); |
| 926 | |
| 927 | // Finally, remove the old call, replacing any uses with the new one. |
| 928 | if (!CI->use_empty()) |
| 929 | CI->replaceAllUsesWith(NewCall); |
| 930 | CI->eraseFromParent(); |
| 931 | } |
| 932 | } |
| 933 | |
Daniel Dunbar | bd012ff | 2008-07-29 23:18:29 +0000 | [diff] [blame] | 934 | |
Chris Lattner | b4880ba | 2009-05-12 21:21:08 +0000 | [diff] [blame] | 935 | void CodeGenModule::EmitGlobalFunctionDefinition(GlobalDecl GD) { |
Anders Carlsson | 2b77ba8 | 2009-04-04 20:47:02 +0000 | [diff] [blame] | 936 | const llvm::FunctionType *Ty; |
Chris Lattner | b4880ba | 2009-05-12 21:21:08 +0000 | [diff] [blame] | 937 | const FunctionDecl *D = cast<FunctionDecl>(GD.getDecl()); |
| 938 | |
Anders Carlsson | 2b77ba8 | 2009-04-04 20:47:02 +0000 | [diff] [blame] | 939 | if (const CXXMethodDecl *MD = dyn_cast<CXXMethodDecl>(D)) { |
| 940 | bool isVariadic = D->getType()->getAsFunctionProtoType()->isVariadic(); |
| 941 | |
| 942 | Ty = getTypes().GetFunctionType(getTypes().getFunctionInfo(MD), isVariadic); |
| 943 | } else { |
| 944 | Ty = cast<llvm::FunctionType>(getTypes().ConvertType(D->getType())); |
| 945 | |
| 946 | // As a special case, make sure that definitions of K&R function |
| 947 | // "type foo()" aren't declared as varargs (which forces the backend |
| 948 | // to do unnecessary work). |
| 949 | if (D->getType()->isFunctionNoProtoType()) { |
| 950 | assert(Ty->isVarArg() && "Didn't lower type as expected"); |
| 951 | // Due to stret, the lowered function could have arguments. |
| 952 | // Just create the same type as was lowered by ConvertType |
| 953 | // but strip off the varargs bit. |
| 954 | std::vector<const llvm::Type*> Args(Ty->param_begin(), Ty->param_end()); |
| 955 | Ty = llvm::FunctionType::get(Ty->getReturnType(), Args, false); |
| 956 | } |
Chris Lattner | ff75e1d | 2009-03-22 19:35:37 +0000 | [diff] [blame] | 957 | } |
Daniel Dunbar | d5d3180 | 2009-02-19 07:15:39 +0000 | [diff] [blame] | 958 | |
Chris Lattner | 9fa959d | 2009-05-12 20:58:15 +0000 | [diff] [blame] | 959 | // Get or create the prototype for the function. |
Chris Lattner | b4880ba | 2009-05-12 21:21:08 +0000 | [diff] [blame] | 960 | llvm::Constant *Entry = GetAddrOfFunction(GD, Ty); |
Chris Lattner | 3480950 | 2009-03-21 08:53:37 +0000 | [diff] [blame] | 961 | |
Chris Lattner | 0558e79 | 2009-03-21 09:25:43 +0000 | [diff] [blame] | 962 | // Strip off a bitcast if we got one back. |
| 963 | if (llvm::ConstantExpr *CE = dyn_cast<llvm::ConstantExpr>(Entry)) { |
| 964 | assert(CE->getOpcode() == llvm::Instruction::BitCast); |
| 965 | Entry = CE->getOperand(0); |
| 966 | } |
| 967 | |
| 968 | |
| 969 | if (cast<llvm::GlobalValue>(Entry)->getType()->getElementType() != Ty) { |
Chris Lattner | bdb0132 | 2009-05-05 06:16:31 +0000 | [diff] [blame] | 970 | llvm::GlobalValue *OldFn = cast<llvm::GlobalValue>(Entry); |
| 971 | |
Daniel Dunbar | 4274581 | 2009-03-09 23:53:08 +0000 | [diff] [blame] | 972 | // If the types mismatch then we have to rewrite the definition. |
Chris Lattner | bdb0132 | 2009-05-05 06:16:31 +0000 | [diff] [blame] | 973 | assert(OldFn->isDeclaration() && |
Chris Lattner | 0558e79 | 2009-03-21 09:25:43 +0000 | [diff] [blame] | 974 | "Shouldn't replace non-declaration"); |
Chris Lattner | 3480950 | 2009-03-21 08:53:37 +0000 | [diff] [blame] | 975 | |
Chris Lattner | 62b33ea | 2009-03-21 08:38:50 +0000 | [diff] [blame] | 976 | // F is the Function* for the one with the wrong type, we must make a new |
| 977 | // Function* and update everything that used F (a declaration) with the new |
| 978 | // Function* (which will be a definition). |
| 979 | // |
| 980 | // This happens if there is a prototype for a function |
| 981 | // (e.g. "int f()") and then a definition of a different type |
| 982 | // (e.g. "int f(int x)"). Start by making a new function of the |
| 983 | // correct type, RAUW, then steal the name. |
Chris Lattner | 3480950 | 2009-03-21 08:53:37 +0000 | [diff] [blame] | 984 | GlobalDeclMap.erase(getMangledName(D)); |
Chris Lattner | b4880ba | 2009-05-12 21:21:08 +0000 | [diff] [blame] | 985 | llvm::Function *NewFn = cast<llvm::Function>(GetAddrOfFunction(GD, Ty)); |
Chris Lattner | bdb0132 | 2009-05-05 06:16:31 +0000 | [diff] [blame] | 986 | NewFn->takeName(OldFn); |
| 987 | |
| 988 | // If this is an implementation of a function without a prototype, try to |
| 989 | // replace any existing uses of the function (which may be calls) with uses |
| 990 | // of the new function |
Chris Lattner | 9fa959d | 2009-05-12 20:58:15 +0000 | [diff] [blame] | 991 | if (D->getType()->isFunctionNoProtoType()) { |
Chris Lattner | bdb0132 | 2009-05-05 06:16:31 +0000 | [diff] [blame] | 992 | ReplaceUsesOfNonProtoTypeWithRealFunction(OldFn, NewFn); |
Chris Lattner | 9fa959d | 2009-05-12 20:58:15 +0000 | [diff] [blame] | 993 | OldFn->removeDeadConstantUsers(); |
| 994 | } |
Chris Lattner | 62b33ea | 2009-03-21 08:38:50 +0000 | [diff] [blame] | 995 | |
| 996 | // Replace uses of F with the Function we will endow with a body. |
Chris Lattner | bdb0132 | 2009-05-05 06:16:31 +0000 | [diff] [blame] | 997 | if (!Entry->use_empty()) { |
| 998 | llvm::Constant *NewPtrForOldDecl = |
| 999 | llvm::ConstantExpr::getBitCast(NewFn, Entry->getType()); |
| 1000 | Entry->replaceAllUsesWith(NewPtrForOldDecl); |
| 1001 | } |
Chris Lattner | 62b33ea | 2009-03-21 08:38:50 +0000 | [diff] [blame] | 1002 | |
| 1003 | // Ok, delete the old function now, which is dead. |
Chris Lattner | bdb0132 | 2009-05-05 06:16:31 +0000 | [diff] [blame] | 1004 | OldFn->eraseFromParent(); |
Chris Lattner | 62b33ea | 2009-03-21 08:38:50 +0000 | [diff] [blame] | 1005 | |
Chris Lattner | 0558e79 | 2009-03-21 09:25:43 +0000 | [diff] [blame] | 1006 | Entry = NewFn; |
Daniel Dunbar | bd012ff | 2008-07-29 23:18:29 +0000 | [diff] [blame] | 1007 | } |
Chris Lattner | 0558e79 | 2009-03-21 09:25:43 +0000 | [diff] [blame] | 1008 | |
| 1009 | llvm::Function *Fn = cast<llvm::Function>(Entry); |
Daniel Dunbar | bd012ff | 2008-07-29 23:18:29 +0000 | [diff] [blame] | 1010 | |
Daniel Dunbar | 219df66 | 2008-09-08 23:44:31 +0000 | [diff] [blame] | 1011 | CodeGenFunction(*this).GenerateCode(D, Fn); |
Daniel Dunbar | 6bfed7e | 2008-08-01 00:01:51 +0000 | [diff] [blame] | 1012 | |
Daniel Dunbar | 7c65e99 | 2009-04-14 08:05:55 +0000 | [diff] [blame] | 1013 | SetFunctionDefinitionAttributes(D, Fn); |
| 1014 | SetLLVMFunctionAttributesForDefinition(D, Fn); |
Daniel Dunbar | 219df66 | 2008-09-08 23:44:31 +0000 | [diff] [blame] | 1015 | |
Chris Lattner | 3480950 | 2009-03-21 08:53:37 +0000 | [diff] [blame] | 1016 | if (const ConstructorAttr *CA = D->getAttr<ConstructorAttr>()) |
Daniel Dunbar | 219df66 | 2008-09-08 23:44:31 +0000 | [diff] [blame] | 1017 | AddGlobalCtor(Fn, CA->getPriority()); |
Chris Lattner | 3480950 | 2009-03-21 08:53:37 +0000 | [diff] [blame] | 1018 | if (const DestructorAttr *DA = D->getAttr<DestructorAttr>()) |
Daniel Dunbar | 219df66 | 2008-09-08 23:44:31 +0000 | [diff] [blame] | 1019 | AddGlobalDtor(Fn, DA->getPriority()); |
Daniel Dunbar | bd012ff | 2008-07-29 23:18:29 +0000 | [diff] [blame] | 1020 | } |
| 1021 | |
Chris Lattner | bd53271 | 2009-03-22 21:47:11 +0000 | [diff] [blame] | 1022 | void CodeGenModule::EmitAliasDefinition(const ValueDecl *D) { |
| 1023 | const AliasAttr *AA = D->getAttr<AliasAttr>(); |
| 1024 | assert(AA && "Not an alias?"); |
| 1025 | |
| 1026 | const llvm::Type *DeclTy = getTypes().ConvertTypeForMem(D->getType()); |
| 1027 | |
| 1028 | // Unique the name through the identifier table. |
| 1029 | const char *AliaseeName = AA->getAliasee().c_str(); |
| 1030 | AliaseeName = getContext().Idents.get(AliaseeName).getName(); |
| 1031 | |
| 1032 | // Create a reference to the named value. This ensures that it is emitted |
| 1033 | // if a deferred decl. |
| 1034 | llvm::Constant *Aliasee; |
| 1035 | if (isa<llvm::FunctionType>(DeclTy)) |
Chris Lattner | b4880ba | 2009-05-12 21:21:08 +0000 | [diff] [blame] | 1036 | Aliasee = GetOrCreateLLVMFunction(AliaseeName, DeclTy, GlobalDecl()); |
Chris Lattner | bd53271 | 2009-03-22 21:47:11 +0000 | [diff] [blame] | 1037 | else |
| 1038 | Aliasee = GetOrCreateLLVMGlobal(AliaseeName, |
| 1039 | llvm::PointerType::getUnqual(DeclTy), 0); |
| 1040 | |
| 1041 | // Create the new alias itself, but don't set a name yet. |
| 1042 | llvm::GlobalValue *GA = |
| 1043 | new llvm::GlobalAlias(Aliasee->getType(), |
| 1044 | llvm::Function::ExternalLinkage, |
| 1045 | "", Aliasee, &getModule()); |
| 1046 | |
| 1047 | // See if there is already something with the alias' name in the module. |
| 1048 | const char *MangledName = getMangledName(D); |
| 1049 | llvm::GlobalValue *&Entry = GlobalDeclMap[MangledName]; |
| 1050 | |
| 1051 | if (Entry && !Entry->isDeclaration()) { |
| 1052 | // If there is a definition in the module, then it wins over the alias. |
| 1053 | // This is dubious, but allow it to be safe. Just ignore the alias. |
| 1054 | GA->eraseFromParent(); |
| 1055 | return; |
| 1056 | } |
| 1057 | |
| 1058 | if (Entry) { |
| 1059 | // If there is a declaration in the module, then we had an extern followed |
| 1060 | // by the alias, as in: |
| 1061 | // extern int test6(); |
| 1062 | // ... |
| 1063 | // int test6() __attribute__((alias("test7"))); |
| 1064 | // |
| 1065 | // Remove it and replace uses of it with the alias. |
| 1066 | |
| 1067 | Entry->replaceAllUsesWith(llvm::ConstantExpr::getBitCast(GA, |
| 1068 | Entry->getType())); |
Chris Lattner | bd53271 | 2009-03-22 21:47:11 +0000 | [diff] [blame] | 1069 | Entry->eraseFromParent(); |
| 1070 | } |
| 1071 | |
| 1072 | // Now we know that there is no conflict, set the name. |
| 1073 | Entry = GA; |
| 1074 | GA->setName(MangledName); |
| 1075 | |
Daniel Dunbar | 7c65e99 | 2009-04-14 08:05:55 +0000 | [diff] [blame] | 1076 | // Set attributes which are particular to an alias; this is a |
| 1077 | // specialization of the attributes which may be set on a global |
| 1078 | // variable/function. |
| 1079 | if (D->hasAttr<DLLExportAttr>()) { |
| 1080 | if (const FunctionDecl *FD = dyn_cast<FunctionDecl>(D)) { |
| 1081 | // The dllexport attribute is ignored for undefined symbols. |
Douglas Gregor | 7297134 | 2009-04-18 00:02:19 +0000 | [diff] [blame] | 1082 | if (FD->getBody(getContext())) |
Daniel Dunbar | 7c65e99 | 2009-04-14 08:05:55 +0000 | [diff] [blame] | 1083 | GA->setLinkage(llvm::Function::DLLExportLinkage); |
| 1084 | } else { |
| 1085 | GA->setLinkage(llvm::Function::DLLExportLinkage); |
| 1086 | } |
| 1087 | } else if (D->hasAttr<WeakAttr>() || D->hasAttr<WeakImportAttr>()) { |
| 1088 | GA->setLinkage(llvm::Function::WeakAnyLinkage); |
| 1089 | } |
| 1090 | |
| 1091 | SetCommonAttributes(D, GA); |
Chris Lattner | bd53271 | 2009-03-22 21:47:11 +0000 | [diff] [blame] | 1092 | } |
| 1093 | |
Chris Lattner | b808c95 | 2009-03-22 21:56:56 +0000 | [diff] [blame] | 1094 | /// getBuiltinLibFunction - Given a builtin id for a function like |
| 1095 | /// "__builtin_fabsf", return a Function* for "fabsf". |
Mike Stump | c136e6c | 2009-02-27 22:42:30 +0000 | [diff] [blame] | 1096 | llvm::Value *CodeGenModule::getBuiltinLibFunction(unsigned BuiltinID) { |
Douglas Gregor | 3e41d60 | 2009-02-13 23:20:09 +0000 | [diff] [blame] | 1097 | assert((Context.BuiltinInfo.isLibFunction(BuiltinID) || |
| 1098 | Context.BuiltinInfo.isPredefinedLibFunction(BuiltinID)) && |
| 1099 | "isn't a lib fn"); |
Chris Lattner | bef20ac | 2007-08-31 04:31:45 +0000 | [diff] [blame] | 1100 | |
Douglas Gregor | 3e41d60 | 2009-02-13 23:20:09 +0000 | [diff] [blame] | 1101 | // Get the name, skip over the __builtin_ prefix (if necessary). |
| 1102 | const char *Name = Context.BuiltinInfo.GetName(BuiltinID); |
| 1103 | if (Context.BuiltinInfo.isLibFunction(BuiltinID)) |
| 1104 | Name += 10; |
Chris Lattner | bef20ac | 2007-08-31 04:31:45 +0000 | [diff] [blame] | 1105 | |
| 1106 | // Get the type for the builtin. |
Douglas Gregor | 370ab3f | 2009-02-14 01:52:53 +0000 | [diff] [blame] | 1107 | Builtin::Context::GetBuiltinTypeError Error; |
| 1108 | QualType Type = Context.BuiltinInfo.GetBuiltinType(BuiltinID, Context, Error); |
| 1109 | assert(Error == Builtin::Context::GE_None && "Can't get builtin type"); |
| 1110 | |
Chris Lattner | bef20ac | 2007-08-31 04:31:45 +0000 | [diff] [blame] | 1111 | const llvm::FunctionType *Ty = |
| 1112 | cast<llvm::FunctionType>(getTypes().ConvertType(Type)); |
| 1113 | |
Chris Lattner | b808c95 | 2009-03-22 21:56:56 +0000 | [diff] [blame] | 1114 | // Unique the name through the identifier table. |
| 1115 | Name = getContext().Idents.get(Name).getName(); |
Chris Lattner | bef20ac | 2007-08-31 04:31:45 +0000 | [diff] [blame] | 1116 | // FIXME: param attributes for sext/zext etc. |
Chris Lattner | b4880ba | 2009-05-12 21:21:08 +0000 | [diff] [blame] | 1117 | return GetOrCreateLLVMFunction(Name, Ty, GlobalDecl()); |
Chris Lattner | bef20ac | 2007-08-31 04:31:45 +0000 | [diff] [blame] | 1118 | } |
| 1119 | |
Chris Lattner | 7acda7c | 2007-12-18 00:25:38 +0000 | [diff] [blame] | 1120 | llvm::Function *CodeGenModule::getIntrinsic(unsigned IID,const llvm::Type **Tys, |
| 1121 | unsigned NumTys) { |
| 1122 | return llvm::Intrinsic::getDeclaration(&getModule(), |
| 1123 | (llvm::Intrinsic::ID)IID, Tys, NumTys); |
| 1124 | } |
Chris Lattner | bef20ac | 2007-08-31 04:31:45 +0000 | [diff] [blame] | 1125 | |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 1126 | llvm::Function *CodeGenModule::getMemCpyFn() { |
| 1127 | if (MemCpyFn) return MemCpyFn; |
Chris Lattner | 4e8a9e8 | 2008-11-21 16:43:15 +0000 | [diff] [blame] | 1128 | const llvm::Type *IntPtr = TheTargetData.getIntPtrType(); |
| 1129 | return MemCpyFn = getIntrinsic(llvm::Intrinsic::memcpy, &IntPtr, 1); |
Reid Spencer | 5f016e2 | 2007-07-11 17:01:13 +0000 | [diff] [blame] | 1130 | } |
Anders Carlsson | c9e2091 | 2007-08-21 00:21:21 +0000 | [diff] [blame] | 1131 | |
Eli Friedman | 0c99509 | 2008-05-26 12:59:39 +0000 | [diff] [blame] | 1132 | llvm::Function *CodeGenModule::getMemMoveFn() { |
| 1133 | if (MemMoveFn) return MemMoveFn; |
Chris Lattner | 4e8a9e8 | 2008-11-21 16:43:15 +0000 | [diff] [blame] | 1134 | const llvm::Type *IntPtr = TheTargetData.getIntPtrType(); |
| 1135 | return MemMoveFn = getIntrinsic(llvm::Intrinsic::memmove, &IntPtr, 1); |
Eli Friedman | 0c99509 | 2008-05-26 12:59:39 +0000 | [diff] [blame] | 1136 | } |
| 1137 | |
Lauro Ramos Venancio | 41ef30e | 2008-02-19 22:01:01 +0000 | [diff] [blame] | 1138 | llvm::Function *CodeGenModule::getMemSetFn() { |
| 1139 | if (MemSetFn) return MemSetFn; |
Chris Lattner | 4e8a9e8 | 2008-11-21 16:43:15 +0000 | [diff] [blame] | 1140 | const llvm::Type *IntPtr = TheTargetData.getIntPtrType(); |
| 1141 | return MemSetFn = getIntrinsic(llvm::Intrinsic::memset, &IntPtr, 1); |
Lauro Ramos Venancio | 41ef30e | 2008-02-19 22:01:01 +0000 | [diff] [blame] | 1142 | } |
Chris Lattner | 7acda7c | 2007-12-18 00:25:38 +0000 | [diff] [blame] | 1143 | |
Anders Carlsson | e3daa76 | 2008-11-15 18:54:24 +0000 | [diff] [blame] | 1144 | static void appendFieldAndPadding(CodeGenModule &CGM, |
| 1145 | std::vector<llvm::Constant*>& Fields, |
Douglas Gregor | 44b4321 | 2008-12-11 16:49:14 +0000 | [diff] [blame] | 1146 | FieldDecl *FieldD, FieldDecl *NextFieldD, |
| 1147 | llvm::Constant* Field, |
Chris Lattner | 3c8f153 | 2009-03-21 07:12:05 +0000 | [diff] [blame] | 1148 | RecordDecl* RD, const llvm::StructType *STy) { |
Anders Carlsson | e3daa76 | 2008-11-15 18:54:24 +0000 | [diff] [blame] | 1149 | // Append the field. |
| 1150 | Fields.push_back(Field); |
| 1151 | |
Douglas Gregor | 44b4321 | 2008-12-11 16:49:14 +0000 | [diff] [blame] | 1152 | int StructFieldNo = CGM.getTypes().getLLVMFieldNo(FieldD); |
Anders Carlsson | e3daa76 | 2008-11-15 18:54:24 +0000 | [diff] [blame] | 1153 | |
| 1154 | int NextStructFieldNo; |
Douglas Gregor | 44b4321 | 2008-12-11 16:49:14 +0000 | [diff] [blame] | 1155 | if (!NextFieldD) { |
Anders Carlsson | e3daa76 | 2008-11-15 18:54:24 +0000 | [diff] [blame] | 1156 | NextStructFieldNo = STy->getNumElements(); |
| 1157 | } else { |
Douglas Gregor | 44b4321 | 2008-12-11 16:49:14 +0000 | [diff] [blame] | 1158 | NextStructFieldNo = CGM.getTypes().getLLVMFieldNo(NextFieldD); |
Anders Carlsson | e3daa76 | 2008-11-15 18:54:24 +0000 | [diff] [blame] | 1159 | } |
| 1160 | |
| 1161 | // Append padding |
| 1162 | for (int i = StructFieldNo + 1; i < NextStructFieldNo; i++) { |
| 1163 | llvm::Constant *C = |
| 1164 | llvm::Constant::getNullValue(STy->getElementType(StructFieldNo + 1)); |
| 1165 | |
| 1166 | Fields.push_back(C); |
| 1167 | } |
| 1168 | } |
| 1169 | |
Chris Lattner | bef20ac | 2007-08-31 04:31:45 +0000 | [diff] [blame] | 1170 | llvm::Constant *CodeGenModule:: |
Steve Naroff | 8d4141f | 2009-04-01 13:55:36 +0000 | [diff] [blame] | 1171 | GetAddrOfConstantCFString(const StringLiteral *Literal) { |
Steve Naroff | b59212a | 2009-04-01 21:16:31 +0000 | [diff] [blame] | 1172 | std::string str; |
Chris Lattner | 271474e | 2009-04-19 06:59:18 +0000 | [diff] [blame] | 1173 | unsigned StringLength = 0; |
Steve Naroff | b59212a | 2009-04-01 21:16:31 +0000 | [diff] [blame] | 1174 | |
Steve Naroff | e9b7d8a | 2009-04-01 15:50:34 +0000 | [diff] [blame] | 1175 | bool isUTF16 = false; |
| 1176 | if (Literal->containsNonAsciiOrNull()) { |
| 1177 | // Convert from UTF-8 to UTF-16. |
| 1178 | llvm::SmallVector<UTF16, 128> ToBuf(Literal->getByteLength()); |
| 1179 | const UTF8 *FromPtr = (UTF8 *)Literal->getStrData(); |
| 1180 | UTF16 *ToPtr = &ToBuf[0]; |
| 1181 | |
| 1182 | ConversionResult Result; |
| 1183 | Result = ConvertUTF8toUTF16(&FromPtr, FromPtr+Literal->getByteLength(), |
| 1184 | &ToPtr, ToPtr+Literal->getByteLength(), |
| 1185 | strictConversion); |
Steve Naroff | aa4a756 | 2009-04-13 19:08:08 +0000 | [diff] [blame] | 1186 | if (Result == conversionOK) { |
| 1187 | // FIXME: Storing UTF-16 in a C string is a hack to test Unicode strings |
| 1188 | // without doing more surgery to this routine. Since we aren't explicitly |
| 1189 | // checking for endianness here, it's also a bug (when generating code for |
| 1190 | // a target that doesn't match the host endianness). Modeling this as an |
| 1191 | // i16 array is likely the cleanest solution. |
| 1192 | StringLength = ToPtr-&ToBuf[0]; |
| 1193 | str.assign((char *)&ToBuf[0], StringLength*2);// Twice as many UTF8 chars. |
| 1194 | isUTF16 = true; |
| 1195 | } else if (Result == sourceIllegal) { |
Steve Naroff | fd94262 | 2009-04-13 20:26:29 +0000 | [diff] [blame] | 1196 | // FIXME: Have Sema::CheckObjCString() validate the UTF-8 string. |
Steve Naroff | aa4a756 | 2009-04-13 19:08:08 +0000 | [diff] [blame] | 1197 | str.assign(Literal->getStrData(), Literal->getByteLength()); |
| 1198 | StringLength = str.length(); |
| 1199 | } else |
| 1200 | assert(Result == conversionOK && "UTF-8 to UTF-16 conversion failed"); |
Steve Naroff | b59212a | 2009-04-01 21:16:31 +0000 | [diff] [blame] | 1201 | |
Steve Naroff | b59212a | 2009-04-01 21:16:31 +0000 | [diff] [blame] | 1202 | } else { |
| 1203 | str.assign(Literal->getStrData(), Literal->getByteLength()); |
| 1204 | StringLength = str.length(); |
Steve Naroff | e9b7d8a | 2009-04-01 15:50:34 +0000 | [diff] [blame] | 1205 | } |
Anders Carlsson | c9e2091 | 2007-08-21 00:21:21 +0000 | [diff] [blame] | 1206 | llvm::StringMapEntry<llvm::Constant *> &Entry = |
| 1207 | CFConstantStringMap.GetOrCreateValue(&str[0], &str[str.length()]); |
| 1208 | |
Daniel Dunbar | 8e5c2b8 | 2009-03-31 23:42:16 +0000 | [diff] [blame] | 1209 | if (llvm::Constant *C = Entry.getValue()) |
| 1210 | return C; |
Anders Carlsson | c9e2091 | 2007-08-21 00:21:21 +0000 | [diff] [blame] | 1211 | |
Daniel Dunbar | 3e9df99 | 2008-08-23 18:37:06 +0000 | [diff] [blame] | 1212 | llvm::Constant *Zero = llvm::Constant::getNullValue(llvm::Type::Int32Ty); |
| 1213 | llvm::Constant *Zeros[] = { Zero, Zero }; |
Anders Carlsson | c9e2091 | 2007-08-21 00:21:21 +0000 | [diff] [blame] | 1214 | |
| 1215 | if (!CFConstantStringClassRef) { |
| 1216 | const llvm::Type *Ty = getTypes().ConvertType(getContext().IntTy); |
| 1217 | Ty = llvm::ArrayType::get(Ty, 0); |
Daniel Dunbar | 3e9df99 | 2008-08-23 18:37:06 +0000 | [diff] [blame] | 1218 | |
Mike Stump | f5408fe | 2009-05-16 07:57:57 +0000 | [diff] [blame] | 1219 | // FIXME: This is fairly broken if __CFConstantStringClassReference is |
| 1220 | // already defined, in that it will get renamed and the user will most |
| 1221 | // likely see an opaque error message. This is a general issue with relying |
| 1222 | // on particular names. |
Daniel Dunbar | 3e9df99 | 2008-08-23 18:37:06 +0000 | [diff] [blame] | 1223 | llvm::GlobalVariable *GV = |
Anders Carlsson | c9e2091 | 2007-08-21 00:21:21 +0000 | [diff] [blame] | 1224 | new llvm::GlobalVariable(Ty, false, |
| 1225 | llvm::GlobalVariable::ExternalLinkage, 0, |
| 1226 | "__CFConstantStringClassReference", |
| 1227 | &getModule()); |
Daniel Dunbar | 3e9df99 | 2008-08-23 18:37:06 +0000 | [diff] [blame] | 1228 | |
| 1229 | // Decay array -> ptr |
| 1230 | CFConstantStringClassRef = |
| 1231 | llvm::ConstantExpr::getGetElementPtr(GV, Zeros, 2); |
Anders Carlsson | c9e2091 | 2007-08-21 00:21:21 +0000 | [diff] [blame] | 1232 | } |
| 1233 | |
Anders Carlsson | e3daa76 | 2008-11-15 18:54:24 +0000 | [diff] [blame] | 1234 | QualType CFTy = getContext().getCFConstantStringType(); |
| 1235 | RecordDecl *CFRD = CFTy->getAsRecordType()->getDecl(); |
Daniel Dunbar | 3e9df99 | 2008-08-23 18:37:06 +0000 | [diff] [blame] | 1236 | |
Anders Carlsson | e3daa76 | 2008-11-15 18:54:24 +0000 | [diff] [blame] | 1237 | const llvm::StructType *STy = |
| 1238 | cast<llvm::StructType>(getTypes().ConvertType(CFTy)); |
| 1239 | |
| 1240 | std::vector<llvm::Constant*> Fields; |
Douglas Gregor | 6ab3524 | 2009-04-09 21:40:53 +0000 | [diff] [blame] | 1241 | RecordDecl::field_iterator Field = CFRD->field_begin(getContext()); |
Douglas Gregor | 44b4321 | 2008-12-11 16:49:14 +0000 | [diff] [blame] | 1242 | |
Anders Carlsson | c9e2091 | 2007-08-21 00:21:21 +0000 | [diff] [blame] | 1243 | // Class pointer. |
Douglas Gregor | 44b4321 | 2008-12-11 16:49:14 +0000 | [diff] [blame] | 1244 | FieldDecl *CurField = *Field++; |
| 1245 | FieldDecl *NextField = *Field++; |
| 1246 | appendFieldAndPadding(*this, Fields, CurField, NextField, |
| 1247 | CFConstantStringClassRef, CFRD, STy); |
Anders Carlsson | c9e2091 | 2007-08-21 00:21:21 +0000 | [diff] [blame] | 1248 | |
| 1249 | // Flags. |
Douglas Gregor | 44b4321 | 2008-12-11 16:49:14 +0000 | [diff] [blame] | 1250 | CurField = NextField; |
| 1251 | NextField = *Field++; |
Daniel Dunbar | 3e9df99 | 2008-08-23 18:37:06 +0000 | [diff] [blame] | 1252 | const llvm::Type *Ty = getTypes().ConvertType(getContext().UnsignedIntTy); |
Douglas Gregor | 44b4321 | 2008-12-11 16:49:14 +0000 | [diff] [blame] | 1253 | appendFieldAndPadding(*this, Fields, CurField, NextField, |
Steve Naroff | e9b7d8a | 2009-04-01 15:50:34 +0000 | [diff] [blame] | 1254 | isUTF16 ? llvm::ConstantInt::get(Ty, 0x07d0) |
| 1255 | : llvm::ConstantInt::get(Ty, 0x07C8), |
| 1256 | CFRD, STy); |
Anders Carlsson | c9e2091 | 2007-08-21 00:21:21 +0000 | [diff] [blame] | 1257 | |
| 1258 | // String pointer. |
Douglas Gregor | 44b4321 | 2008-12-11 16:49:14 +0000 | [diff] [blame] | 1259 | CurField = NextField; |
| 1260 | NextField = *Field++; |
Daniel Dunbar | 3e9df99 | 2008-08-23 18:37:06 +0000 | [diff] [blame] | 1261 | llvm::Constant *C = llvm::ConstantArray::get(str); |
Daniel Dunbar | a9668e0 | 2009-04-03 00:57:44 +0000 | [diff] [blame] | 1262 | |
| 1263 | const char *Sect, *Prefix; |
| 1264 | bool isConstant; |
| 1265 | if (isUTF16) { |
| 1266 | Prefix = getContext().Target.getUnicodeStringSymbolPrefix(); |
| 1267 | Sect = getContext().Target.getUnicodeStringSection(); |
| 1268 | // FIXME: Why does GCC not set constant here? |
| 1269 | isConstant = false; |
| 1270 | } else { |
| 1271 | Prefix = getContext().Target.getStringSymbolPrefix(true); |
| 1272 | Sect = getContext().Target.getCFStringDataSection(); |
| 1273 | // FIXME: -fwritable-strings should probably affect this, but we |
| 1274 | // are following gcc here. |
| 1275 | isConstant = true; |
| 1276 | } |
Daniel Dunbar | 8e5c2b8 | 2009-03-31 23:42:16 +0000 | [diff] [blame] | 1277 | llvm::GlobalVariable *GV = |
Daniel Dunbar | a9668e0 | 2009-04-03 00:57:44 +0000 | [diff] [blame] | 1278 | new llvm::GlobalVariable(C->getType(), isConstant, |
Daniel Dunbar | 8e5c2b8 | 2009-03-31 23:42:16 +0000 | [diff] [blame] | 1279 | llvm::GlobalValue::InternalLinkage, |
Daniel Dunbar | a9668e0 | 2009-04-03 00:57:44 +0000 | [diff] [blame] | 1280 | C, Prefix, &getModule()); |
| 1281 | if (Sect) |
Daniel Dunbar | 8e5c2b8 | 2009-03-31 23:42:16 +0000 | [diff] [blame] | 1282 | GV->setSection(Sect); |
Daniel Dunbar | a9668e0 | 2009-04-03 00:57:44 +0000 | [diff] [blame] | 1283 | if (isUTF16) { |
| 1284 | unsigned Align = getContext().getTypeAlign(getContext().ShortTy)/8; |
| 1285 | GV->setAlignment(Align); |
| 1286 | } |
Douglas Gregor | 44b4321 | 2008-12-11 16:49:14 +0000 | [diff] [blame] | 1287 | appendFieldAndPadding(*this, Fields, CurField, NextField, |
Daniel Dunbar | 8e5c2b8 | 2009-03-31 23:42:16 +0000 | [diff] [blame] | 1288 | llvm::ConstantExpr::getGetElementPtr(GV, Zeros, 2), |
Anders Carlsson | e3daa76 | 2008-11-15 18:54:24 +0000 | [diff] [blame] | 1289 | CFRD, STy); |
Anders Carlsson | c9e2091 | 2007-08-21 00:21:21 +0000 | [diff] [blame] | 1290 | |
| 1291 | // String length. |
Douglas Gregor | 44b4321 | 2008-12-11 16:49:14 +0000 | [diff] [blame] | 1292 | CurField = NextField; |
| 1293 | NextField = 0; |
Anders Carlsson | c9e2091 | 2007-08-21 00:21:21 +0000 | [diff] [blame] | 1294 | Ty = getTypes().ConvertType(getContext().LongTy); |
Douglas Gregor | 44b4321 | 2008-12-11 16:49:14 +0000 | [diff] [blame] | 1295 | appendFieldAndPadding(*this, Fields, CurField, NextField, |
Steve Naroff | b59212a | 2009-04-01 21:16:31 +0000 | [diff] [blame] | 1296 | llvm::ConstantInt::get(Ty, StringLength), CFRD, STy); |
Anders Carlsson | c9e2091 | 2007-08-21 00:21:21 +0000 | [diff] [blame] | 1297 | |
| 1298 | // The struct. |
Anders Carlsson | e3daa76 | 2008-11-15 18:54:24 +0000 | [diff] [blame] | 1299 | C = llvm::ConstantStruct::get(STy, Fields); |
Daniel Dunbar | 8e5c2b8 | 2009-03-31 23:42:16 +0000 | [diff] [blame] | 1300 | GV = new llvm::GlobalVariable(C->getType(), true, |
| 1301 | llvm::GlobalVariable::InternalLinkage, C, |
| 1302 | getContext().Target.getCFStringSymbolPrefix(), |
| 1303 | &getModule()); |
| 1304 | if (const char *Sect = getContext().Target.getCFStringSection()) |
| 1305 | GV->setSection(Sect); |
Anders Carlsson | 0c67829 | 2007-11-01 00:41:52 +0000 | [diff] [blame] | 1306 | Entry.setValue(GV); |
Daniel Dunbar | 3e9df99 | 2008-08-23 18:37:06 +0000 | [diff] [blame] | 1307 | |
Anders Carlsson | 0c67829 | 2007-11-01 00:41:52 +0000 | [diff] [blame] | 1308 | return GV; |
Anders Carlsson | c9e2091 | 2007-08-21 00:21:21 +0000 | [diff] [blame] | 1309 | } |
Chris Lattner | 45e8cbd | 2007-11-28 05:34:05 +0000 | [diff] [blame] | 1310 | |
Daniel Dunbar | 6143293 | 2008-08-13 23:20:05 +0000 | [diff] [blame] | 1311 | /// GetStringForStringLiteral - Return the appropriate bytes for a |
Daniel Dunbar | 1e04976 | 2008-08-10 20:25:57 +0000 | [diff] [blame] | 1312 | /// string literal, properly padded to match the literal type. |
Daniel Dunbar | 6143293 | 2008-08-13 23:20:05 +0000 | [diff] [blame] | 1313 | std::string CodeGenModule::GetStringForStringLiteral(const StringLiteral *E) { |
Daniel Dunbar | 1e04976 | 2008-08-10 20:25:57 +0000 | [diff] [blame] | 1314 | const char *StrData = E->getStrData(); |
| 1315 | unsigned Len = E->getByteLength(); |
| 1316 | |
| 1317 | const ConstantArrayType *CAT = |
| 1318 | getContext().getAsConstantArrayType(E->getType()); |
| 1319 | assert(CAT && "String isn't pointer or array!"); |
| 1320 | |
Chris Lattner | dbb1ecc | 2009-02-26 23:01:51 +0000 | [diff] [blame] | 1321 | // Resize the string to the right size. |
Daniel Dunbar | 1e04976 | 2008-08-10 20:25:57 +0000 | [diff] [blame] | 1322 | std::string Str(StrData, StrData+Len); |
| 1323 | uint64_t RealLen = CAT->getSize().getZExtValue(); |
Chris Lattner | dbb1ecc | 2009-02-26 23:01:51 +0000 | [diff] [blame] | 1324 | |
| 1325 | if (E->isWide()) |
| 1326 | RealLen *= getContext().Target.getWCharWidth()/8; |
| 1327 | |
Daniel Dunbar | 1e04976 | 2008-08-10 20:25:57 +0000 | [diff] [blame] | 1328 | Str.resize(RealLen, '\0'); |
| 1329 | |
| 1330 | return Str; |
| 1331 | } |
| 1332 | |
Daniel Dunbar | 6143293 | 2008-08-13 23:20:05 +0000 | [diff] [blame] | 1333 | /// GetAddrOfConstantStringFromLiteral - Return a pointer to a |
| 1334 | /// constant array for the given string literal. |
| 1335 | llvm::Constant * |
| 1336 | CodeGenModule::GetAddrOfConstantStringFromLiteral(const StringLiteral *S) { |
| 1337 | // FIXME: This can be more efficient. |
| 1338 | return GetAddrOfConstantString(GetStringForStringLiteral(S)); |
| 1339 | } |
| 1340 | |
Chris Lattner | eaf2bb8 | 2009-02-24 22:18:39 +0000 | [diff] [blame] | 1341 | /// GetAddrOfConstantStringFromObjCEncode - Return a pointer to a constant |
| 1342 | /// array for the given ObjCEncodeExpr node. |
| 1343 | llvm::Constant * |
| 1344 | CodeGenModule::GetAddrOfConstantStringFromObjCEncode(const ObjCEncodeExpr *E) { |
| 1345 | std::string Str; |
| 1346 | getContext().getObjCEncodingForType(E->getEncodedType(), Str); |
Eli Friedman | a210f35 | 2009-03-07 20:17:55 +0000 | [diff] [blame] | 1347 | |
| 1348 | return GetAddrOfConstantCString(Str); |
Chris Lattner | eaf2bb8 | 2009-02-24 22:18:39 +0000 | [diff] [blame] | 1349 | } |
| 1350 | |
| 1351 | |
Chris Lattner | a7ad98f | 2008-02-11 00:02:17 +0000 | [diff] [blame] | 1352 | /// GenerateWritableString -- Creates storage for a string literal. |
Chris Lattner | 45e8cbd | 2007-11-28 05:34:05 +0000 | [diff] [blame] | 1353 | static llvm::Constant *GenerateStringLiteral(const std::string &str, |
| 1354 | bool constant, |
Daniel Dunbar | 5fabf9d | 2008-10-17 21:56:50 +0000 | [diff] [blame] | 1355 | CodeGenModule &CGM, |
| 1356 | const char *GlobalName) { |
Daniel Dunbar | 6143293 | 2008-08-13 23:20:05 +0000 | [diff] [blame] | 1357 | // Create Constant for this string literal. Don't add a '\0'. |
| 1358 | llvm::Constant *C = llvm::ConstantArray::get(str, false); |
Chris Lattner | 45e8cbd | 2007-11-28 05:34:05 +0000 | [diff] [blame] | 1359 | |
| 1360 | // Create a global variable for this string |
Chris Lattner | eaf2bb8 | 2009-02-24 22:18:39 +0000 | [diff] [blame] | 1361 | return new llvm::GlobalVariable(C->getType(), constant, |
| 1362 | llvm::GlobalValue::InternalLinkage, |
Daniel Dunbar | 8e5c2b8 | 2009-03-31 23:42:16 +0000 | [diff] [blame] | 1363 | C, GlobalName, &CGM.getModule()); |
Chris Lattner | 45e8cbd | 2007-11-28 05:34:05 +0000 | [diff] [blame] | 1364 | } |
| 1365 | |
Daniel Dunbar | 6143293 | 2008-08-13 23:20:05 +0000 | [diff] [blame] | 1366 | /// GetAddrOfConstantString - Returns a pointer to a character array |
| 1367 | /// containing the literal. This contents are exactly that of the |
| 1368 | /// given string, i.e. it will not be null terminated automatically; |
| 1369 | /// see GetAddrOfConstantCString. Note that whether the result is |
| 1370 | /// actually a pointer to an LLVM constant depends on |
| 1371 | /// Feature.WriteableStrings. |
| 1372 | /// |
| 1373 | /// The result has pointer to array type. |
Daniel Dunbar | 5fabf9d | 2008-10-17 21:56:50 +0000 | [diff] [blame] | 1374 | llvm::Constant *CodeGenModule::GetAddrOfConstantString(const std::string &str, |
| 1375 | const char *GlobalName) { |
Daniel Dunbar | 8e5c2b8 | 2009-03-31 23:42:16 +0000 | [diff] [blame] | 1376 | bool IsConstant = !Features.WritableStrings; |
| 1377 | |
| 1378 | // Get the default prefix if a name wasn't specified. |
| 1379 | if (!GlobalName) |
| 1380 | GlobalName = getContext().Target.getStringSymbolPrefix(IsConstant); |
| 1381 | |
| 1382 | // Don't share any string literals if strings aren't constant. |
| 1383 | if (!IsConstant) |
Daniel Dunbar | 5fabf9d | 2008-10-17 21:56:50 +0000 | [diff] [blame] | 1384 | return GenerateStringLiteral(str, false, *this, GlobalName); |
Chris Lattner | 45e8cbd | 2007-11-28 05:34:05 +0000 | [diff] [blame] | 1385 | |
| 1386 | llvm::StringMapEntry<llvm::Constant *> &Entry = |
| 1387 | ConstantStringMap.GetOrCreateValue(&str[0], &str[str.length()]); |
| 1388 | |
| 1389 | if (Entry.getValue()) |
Chris Lattner | eaf2bb8 | 2009-02-24 22:18:39 +0000 | [diff] [blame] | 1390 | return Entry.getValue(); |
Chris Lattner | 45e8cbd | 2007-11-28 05:34:05 +0000 | [diff] [blame] | 1391 | |
| 1392 | // Create a global variable for this. |
Daniel Dunbar | 5fabf9d | 2008-10-17 21:56:50 +0000 | [diff] [blame] | 1393 | llvm::Constant *C = GenerateStringLiteral(str, true, *this, GlobalName); |
Chris Lattner | 45e8cbd | 2007-11-28 05:34:05 +0000 | [diff] [blame] | 1394 | Entry.setValue(C); |
| 1395 | return C; |
| 1396 | } |
Daniel Dunbar | 6143293 | 2008-08-13 23:20:05 +0000 | [diff] [blame] | 1397 | |
| 1398 | /// GetAddrOfConstantCString - Returns a pointer to a character |
| 1399 | /// array containing the literal and a terminating '\-' |
| 1400 | /// character. The result has pointer to array type. |
Daniel Dunbar | 5fabf9d | 2008-10-17 21:56:50 +0000 | [diff] [blame] | 1401 | llvm::Constant *CodeGenModule::GetAddrOfConstantCString(const std::string &str, |
| 1402 | const char *GlobalName){ |
Chris Lattner | c9f29c6 | 2008-12-09 19:10:54 +0000 | [diff] [blame] | 1403 | return GetAddrOfConstantString(str + '\0', GlobalName); |
Daniel Dunbar | 6143293 | 2008-08-13 23:20:05 +0000 | [diff] [blame] | 1404 | } |
Daniel Dunbar | 41071de | 2008-08-15 23:26:23 +0000 | [diff] [blame] | 1405 | |
Daniel Dunbar | af05bb9 | 2008-08-26 08:29:31 +0000 | [diff] [blame] | 1406 | /// EmitObjCPropertyImplementations - Emit information for synthesized |
| 1407 | /// properties for an implementation. |
| 1408 | void CodeGenModule::EmitObjCPropertyImplementations(const |
| 1409 | ObjCImplementationDecl *D) { |
Douglas Gregor | 653f1b1 | 2009-04-23 01:02:12 +0000 | [diff] [blame] | 1410 | for (ObjCImplementationDecl::propimpl_iterator |
| 1411 | i = D->propimpl_begin(getContext()), |
| 1412 | e = D->propimpl_end(getContext()); i != e; ++i) { |
Daniel Dunbar | af05bb9 | 2008-08-26 08:29:31 +0000 | [diff] [blame] | 1413 | ObjCPropertyImplDecl *PID = *i; |
| 1414 | |
| 1415 | // Dynamic is just for type-checking. |
| 1416 | if (PID->getPropertyImplementation() == ObjCPropertyImplDecl::Synthesize) { |
| 1417 | ObjCPropertyDecl *PD = PID->getPropertyDecl(); |
| 1418 | |
| 1419 | // Determine which methods need to be implemented, some may have |
| 1420 | // been overridden. Note that ::isSynthesized is not the method |
| 1421 | // we want, that just indicates if the decl came from a |
| 1422 | // property. What we want to know is if the method is defined in |
| 1423 | // this implementation. |
Douglas Gregor | 653f1b1 | 2009-04-23 01:02:12 +0000 | [diff] [blame] | 1424 | if (!D->getInstanceMethod(getContext(), PD->getGetterName())) |
Fariborz Jahanian | fef30b5 | 2008-12-09 20:23:04 +0000 | [diff] [blame] | 1425 | CodeGenFunction(*this).GenerateObjCGetter( |
| 1426 | const_cast<ObjCImplementationDecl *>(D), PID); |
Daniel Dunbar | af05bb9 | 2008-08-26 08:29:31 +0000 | [diff] [blame] | 1427 | if (!PD->isReadOnly() && |
Douglas Gregor | 653f1b1 | 2009-04-23 01:02:12 +0000 | [diff] [blame] | 1428 | !D->getInstanceMethod(getContext(), PD->getSetterName())) |
Fariborz Jahanian | fef30b5 | 2008-12-09 20:23:04 +0000 | [diff] [blame] | 1429 | CodeGenFunction(*this).GenerateObjCSetter( |
| 1430 | const_cast<ObjCImplementationDecl *>(D), PID); |
Daniel Dunbar | af05bb9 | 2008-08-26 08:29:31 +0000 | [diff] [blame] | 1431 | } |
| 1432 | } |
| 1433 | } |
| 1434 | |
Anders Carlsson | 91e20dd | 2009-04-02 05:55:18 +0000 | [diff] [blame] | 1435 | /// EmitNamespace - Emit all declarations in a namespace. |
Anders Carlsson | 984e068 | 2009-04-01 00:58:25 +0000 | [diff] [blame] | 1436 | void CodeGenModule::EmitNamespace(const NamespaceDecl *ND) { |
Douglas Gregor | 6ab3524 | 2009-04-09 21:40:53 +0000 | [diff] [blame] | 1437 | for (RecordDecl::decl_iterator I = ND->decls_begin(getContext()), |
| 1438 | E = ND->decls_end(getContext()); |
Anders Carlsson | 984e068 | 2009-04-01 00:58:25 +0000 | [diff] [blame] | 1439 | I != E; ++I) |
| 1440 | EmitTopLevelDecl(*I); |
| 1441 | } |
| 1442 | |
Anders Carlsson | 91e20dd | 2009-04-02 05:55:18 +0000 | [diff] [blame] | 1443 | // EmitLinkageSpec - Emit all declarations in a linkage spec. |
| 1444 | void CodeGenModule::EmitLinkageSpec(const LinkageSpecDecl *LSD) { |
| 1445 | if (LSD->getLanguage() != LinkageSpecDecl::lang_c) { |
| 1446 | ErrorUnsupported(LSD, "linkage spec"); |
| 1447 | return; |
| 1448 | } |
| 1449 | |
Douglas Gregor | 6ab3524 | 2009-04-09 21:40:53 +0000 | [diff] [blame] | 1450 | for (RecordDecl::decl_iterator I = LSD->decls_begin(getContext()), |
| 1451 | E = LSD->decls_end(getContext()); |
Anders Carlsson | 91e20dd | 2009-04-02 05:55:18 +0000 | [diff] [blame] | 1452 | I != E; ++I) |
| 1453 | EmitTopLevelDecl(*I); |
| 1454 | } |
| 1455 | |
Daniel Dunbar | 41071de | 2008-08-15 23:26:23 +0000 | [diff] [blame] | 1456 | /// EmitTopLevelDecl - Emit code for a single top level declaration. |
| 1457 | void CodeGenModule::EmitTopLevelDecl(Decl *D) { |
| 1458 | // If an error has occurred, stop code generation, but continue |
| 1459 | // parsing and semantic analysis (to ensure all warnings and errors |
| 1460 | // are emitted). |
| 1461 | if (Diags.hasErrorOccurred()) |
| 1462 | return; |
| 1463 | |
| 1464 | switch (D->getKind()) { |
Anders Carlsson | 2b77ba8 | 2009-04-04 20:47:02 +0000 | [diff] [blame] | 1465 | case Decl::CXXMethod: |
Daniel Dunbar | 41071de | 2008-08-15 23:26:23 +0000 | [diff] [blame] | 1466 | case Decl::Function: |
| 1467 | case Decl::Var: |
Anders Carlsson | 2a131fb | 2009-05-05 04:44:02 +0000 | [diff] [blame] | 1468 | EmitGlobal(GlobalDecl(cast<ValueDecl>(D))); |
Daniel Dunbar | 41071de | 2008-08-15 23:26:23 +0000 | [diff] [blame] | 1469 | break; |
| 1470 | |
Anders Carlsson | 95d4e5d | 2009-04-15 15:55:24 +0000 | [diff] [blame] | 1471 | // C++ Decls |
Daniel Dunbar | 41071de | 2008-08-15 23:26:23 +0000 | [diff] [blame] | 1472 | case Decl::Namespace: |
Anders Carlsson | 984e068 | 2009-04-01 00:58:25 +0000 | [diff] [blame] | 1473 | EmitNamespace(cast<NamespaceDecl>(D)); |
Daniel Dunbar | 41071de | 2008-08-15 23:26:23 +0000 | [diff] [blame] | 1474 | break; |
Anders Carlsson | 95d4e5d | 2009-04-15 15:55:24 +0000 | [diff] [blame] | 1475 | case Decl::CXXConstructor: |
| 1476 | EmitCXXConstructors(cast<CXXConstructorDecl>(D)); |
| 1477 | break; |
Anders Carlsson | 27ae536 | 2009-04-17 01:58:57 +0000 | [diff] [blame] | 1478 | case Decl::CXXDestructor: |
| 1479 | EmitCXXDestructors(cast<CXXDestructorDecl>(D)); |
| 1480 | break; |
Anders Carlsson | 95d4e5d | 2009-04-15 15:55:24 +0000 | [diff] [blame] | 1481 | |
| 1482 | // Objective-C Decls |
Daniel Dunbar | 41071de | 2008-08-15 23:26:23 +0000 | [diff] [blame] | 1483 | |
Fariborz Jahanian | 38e24c7 | 2009-03-18 22:33:24 +0000 | [diff] [blame] | 1484 | // Forward declarations, no (immediate) code generation. |
Daniel Dunbar | 41071de | 2008-08-15 23:26:23 +0000 | [diff] [blame] | 1485 | case Decl::ObjCClass: |
Daniel Dunbar | 41071de | 2008-08-15 23:26:23 +0000 | [diff] [blame] | 1486 | case Decl::ObjCForwardProtocol: |
Fariborz Jahanian | b31cb7f | 2009-03-21 18:06:45 +0000 | [diff] [blame] | 1487 | case Decl::ObjCCategory: |
Chris Lattner | 285d0db | 2009-04-01 02:36:43 +0000 | [diff] [blame] | 1488 | case Decl::ObjCInterface: |
Chris Lattner | 285d0db | 2009-04-01 02:36:43 +0000 | [diff] [blame] | 1489 | break; |
| 1490 | |
Daniel Dunbar | 41071de | 2008-08-15 23:26:23 +0000 | [diff] [blame] | 1491 | case Decl::ObjCProtocol: |
Fariborz Jahanian | b31cb7f | 2009-03-21 18:06:45 +0000 | [diff] [blame] | 1492 | Runtime->GenerateProtocol(cast<ObjCProtocolDecl>(D)); |
Daniel Dunbar | 41071de | 2008-08-15 23:26:23 +0000 | [diff] [blame] | 1493 | break; |
| 1494 | |
| 1495 | case Decl::ObjCCategoryImpl: |
Daniel Dunbar | af05bb9 | 2008-08-26 08:29:31 +0000 | [diff] [blame] | 1496 | // Categories have properties but don't support synthesize so we |
| 1497 | // can ignore them here. |
Daniel Dunbar | 41071de | 2008-08-15 23:26:23 +0000 | [diff] [blame] | 1498 | Runtime->GenerateCategory(cast<ObjCCategoryImplDecl>(D)); |
| 1499 | break; |
| 1500 | |
Daniel Dunbar | af05bb9 | 2008-08-26 08:29:31 +0000 | [diff] [blame] | 1501 | case Decl::ObjCImplementation: { |
| 1502 | ObjCImplementationDecl *OMD = cast<ObjCImplementationDecl>(D); |
| 1503 | EmitObjCPropertyImplementations(OMD); |
| 1504 | Runtime->GenerateClass(OMD); |
Daniel Dunbar | 41071de | 2008-08-15 23:26:23 +0000 | [diff] [blame] | 1505 | break; |
Daniel Dunbar | af05bb9 | 2008-08-26 08:29:31 +0000 | [diff] [blame] | 1506 | } |
Daniel Dunbar | 41071de | 2008-08-15 23:26:23 +0000 | [diff] [blame] | 1507 | case Decl::ObjCMethod: { |
| 1508 | ObjCMethodDecl *OMD = cast<ObjCMethodDecl>(D); |
| 1509 | // If this is not a prototype, emit the body. |
Douglas Gregor | 7297134 | 2009-04-18 00:02:19 +0000 | [diff] [blame] | 1510 | if (OMD->getBody(getContext())) |
Daniel Dunbar | 41071de | 2008-08-15 23:26:23 +0000 | [diff] [blame] | 1511 | CodeGenFunction(*this).GenerateObjCMethod(OMD); |
| 1512 | break; |
| 1513 | } |
Daniel Dunbar | 41071de | 2008-08-15 23:26:23 +0000 | [diff] [blame] | 1514 | case Decl::ObjCCompatibleAlias: |
Fariborz Jahanian | 305c658 | 2009-01-08 01:10:55 +0000 | [diff] [blame] | 1515 | // compatibility-alias is a directive and has no code gen. |
Daniel Dunbar | 41071de | 2008-08-15 23:26:23 +0000 | [diff] [blame] | 1516 | break; |
| 1517 | |
Anders Carlsson | 91e20dd | 2009-04-02 05:55:18 +0000 | [diff] [blame] | 1518 | case Decl::LinkageSpec: |
| 1519 | EmitLinkageSpec(cast<LinkageSpecDecl>(D)); |
Daniel Dunbar | 41071de | 2008-08-15 23:26:23 +0000 | [diff] [blame] | 1520 | break; |
Daniel Dunbar | 41071de | 2008-08-15 23:26:23 +0000 | [diff] [blame] | 1521 | |
| 1522 | case Decl::FileScopeAsm: { |
| 1523 | FileScopeAsmDecl *AD = cast<FileScopeAsmDecl>(D); |
| 1524 | std::string AsmString(AD->getAsmString()->getStrData(), |
| 1525 | AD->getAsmString()->getByteLength()); |
| 1526 | |
| 1527 | const std::string &S = getModule().getModuleInlineAsm(); |
| 1528 | if (S.empty()) |
| 1529 | getModule().setModuleInlineAsm(AsmString); |
| 1530 | else |
| 1531 | getModule().setModuleInlineAsm(S + '\n' + AsmString); |
| 1532 | break; |
| 1533 | } |
| 1534 | |
| 1535 | default: |
Mike Stump | f5408fe | 2009-05-16 07:57:57 +0000 | [diff] [blame] | 1536 | // Make sure we handled everything we should, every other kind is a |
| 1537 | // non-top-level decl. FIXME: Would be nice to have an isTopLevelDeclKind |
| 1538 | // function. Need to recode Decl::Kind to do that easily. |
Daniel Dunbar | 41071de | 2008-08-15 23:26:23 +0000 | [diff] [blame] | 1539 | assert(isa<TypeDecl>(D) && "Unsupported decl kind"); |
| 1540 | } |
| 1541 | } |