blob: bafac41dbf1b36bdf81a9eb9e1313eb7f99175a7 [file] [log] [blame]
Anton Korobeynikovcd5d08d2008-06-01 14:13:53 +00001//===------- CGObjCGNU.cpp - Emit LLVM Code from ASTs for a Module --------===//
Chris Lattnera0fd5ee2008-03-01 08:50:34 +00002//
3// The LLVM Compiler Infrastructure
4//
5// This file is distributed under the University of Illinois Open Source
6// License. See LICENSE.TXT for details.
7//
8//===----------------------------------------------------------------------===//
9//
Anton Korobeynikovcd5d08d2008-06-01 14:13:53 +000010// This provides Objective-C code generation targetting the GNU runtime. The
11// class in this file generates structures used by the GNU Objective-C runtime
12// library. These structures are defined in objc/objc.h and objc/objc-api.h in
13// the GNU runtime distribution.
Chris Lattnera0fd5ee2008-03-01 08:50:34 +000014//
15//===----------------------------------------------------------------------===//
16
17#include "CGObjCRuntime.h"
Chris Lattner547907c2008-06-26 04:19:03 +000018#include "CodeGenModule.h"
Daniel Dunbara04840b2008-08-23 03:46:30 +000019#include "CodeGenFunction.h"
Chris Lattner547907c2008-06-26 04:19:03 +000020#include "clang/AST/ASTContext.h"
Daniel Dunbarde300732008-08-11 04:54:23 +000021#include "clang/AST/Decl.h"
Daniel Dunbar84bb85f2008-08-13 00:59:25 +000022#include "clang/AST/DeclObjC.h"
Chris Lattnera0fd5ee2008-03-01 08:50:34 +000023#include "llvm/Module.h"
Chris Lattnera0fd5ee2008-03-01 08:50:34 +000024#include "llvm/ADT/SmallVector.h"
Anton Korobeynikovcd5d08d2008-06-01 14:13:53 +000025#include "llvm/ADT/StringMap.h"
Daniel Dunbarac93e472008-08-15 22:20:32 +000026#include "llvm/Support/Compiler.h"
Daniel Dunbarac93e472008-08-15 22:20:32 +000027#include "llvm/Target/TargetData.h"
Anton Korobeynikovcd5d08d2008-06-01 14:13:53 +000028#include <map>
Chris Lattner547907c2008-06-26 04:19:03 +000029using namespace clang;
Daniel Dunbar0a2da0f2008-09-09 01:06:48 +000030using namespace CodeGen;
Anton Korobeynikovcd5d08d2008-06-01 14:13:53 +000031using llvm::dyn_cast;
32
33// The version of the runtime that this class targets. Must match the version
34// in the runtime.
35static const int RuntimeVersion = 8;
36static const int ProtocolVersion = 2;
Chris Lattnera0fd5ee2008-03-01 08:50:34 +000037
Chris Lattnera0fd5ee2008-03-01 08:50:34 +000038namespace {
Chris Lattner547907c2008-06-26 04:19:03 +000039class CGObjCGNU : public CodeGen::CGObjCRuntime {
Chris Lattnera0fd5ee2008-03-01 08:50:34 +000040private:
Chris Lattner547907c2008-06-26 04:19:03 +000041 CodeGen::CodeGenModule &CGM;
Chris Lattnera0fd5ee2008-03-01 08:50:34 +000042 llvm::Module &TheModule;
Anton Korobeynikovcd5d08d2008-06-01 14:13:53 +000043 const llvm::StructType *SelStructTy;
Chris Lattnerb326b172008-03-30 23:03:07 +000044 const llvm::Type *SelectorTy;
45 const llvm::Type *PtrToInt8Ty;
46 const llvm::Type *IMPTy;
47 const llvm::Type *IdTy;
48 const llvm::Type *IntTy;
49 const llvm::Type *PtrTy;
50 const llvm::Type *LongTy;
51 const llvm::Type *PtrToIntTy;
Anton Korobeynikovcd5d08d2008-06-01 14:13:53 +000052 std::vector<llvm::Constant*> Classes;
53 std::vector<llvm::Constant*> Categories;
54 std::vector<llvm::Constant*> ConstantStrings;
55 llvm::Function *LoadFunction;
56 llvm::StringMap<llvm::Constant*> ExistingProtocols;
57 typedef std::pair<std::string, std::string> TypedSelector;
58 std::map<TypedSelector, llvm::GlobalAlias*> TypedSelectors;
59 llvm::StringMap<llvm::GlobalAlias*> UntypedSelectors;
60 // Some zeros used for GEPs in lots of places.
61 llvm::Constant *Zeros[2];
62 llvm::Constant *NULLPtr;
63private:
64 llvm::Constant *GenerateIvarList(
65 const llvm::SmallVectorImpl<llvm::Constant *> &IvarNames,
66 const llvm::SmallVectorImpl<llvm::Constant *> &IvarTypes,
67 const llvm::SmallVectorImpl<llvm::Constant *> &IvarOffsets);
68 llvm::Constant *GenerateMethodList(const std::string &ClassName,
69 const std::string &CategoryName,
Chris Lattner578279d2008-06-26 05:08:00 +000070 const llvm::SmallVectorImpl<Selector> &MethodSels,
Anton Korobeynikovcd5d08d2008-06-01 14:13:53 +000071 const llvm::SmallVectorImpl<llvm::Constant *> &MethodTypes,
72 bool isClassMethodList);
73 llvm::Constant *GenerateProtocolList(
74 const llvm::SmallVectorImpl<std::string> &Protocols);
75 llvm::Constant *GenerateClassStructure(
76 llvm::Constant *MetaClass,
77 llvm::Constant *SuperClass,
78 unsigned info,
Chris Lattnerad9c3f32008-06-26 04:47:04 +000079 const char *Name,
Anton Korobeynikovcd5d08d2008-06-01 14:13:53 +000080 llvm::Constant *Version,
81 llvm::Constant *InstanceSize,
82 llvm::Constant *IVars,
83 llvm::Constant *Methods,
84 llvm::Constant *Protocols);
85 llvm::Constant *GenerateProtocolMethodList(
86 const llvm::SmallVectorImpl<llvm::Constant *> &MethodNames,
87 const llvm::SmallVectorImpl<llvm::Constant *> &MethodTypes);
88 llvm::Constant *MakeConstantString(const std::string &Str, const std::string
89 &Name="");
90 llvm::Constant *MakeGlobal(const llvm::StructType *Ty,
91 std::vector<llvm::Constant*> &V, const std::string &Name="");
92 llvm::Constant *MakeGlobal(const llvm::ArrayType *Ty,
93 std::vector<llvm::Constant*> &V, const std::string &Name="");
Chris Lattnera0fd5ee2008-03-01 08:50:34 +000094public:
Chris Lattner547907c2008-06-26 04:19:03 +000095 CGObjCGNU(CodeGen::CodeGenModule &cgm);
Daniel Dunbardaf4ad42008-08-12 00:12:39 +000096 virtual llvm::Constant *GenerateConstantString(const std::string &String);
Daniel Dunbara04840b2008-08-23 03:46:30 +000097 virtual CodeGen::RValue
98 GenerateMessageSend(CodeGen::CodeGenFunction &CGF,
Daniel Dunbardd851282008-08-30 05:35:15 +000099 QualType ResultType,
100 Selector Sel,
Daniel Dunbarb1ee5d62008-08-25 08:19:24 +0000101 llvm::Value *Receiver,
Daniel Dunbar0ed60b02008-08-30 03:02:31 +0000102 bool IsClassMessage,
103 const CallArgList &CallArgs);
Daniel Dunbara04840b2008-08-23 03:46:30 +0000104 virtual CodeGen::RValue
105 GenerateMessageSendSuper(CodeGen::CodeGenFunction &CGF,
Daniel Dunbardd851282008-08-30 05:35:15 +0000106 QualType ResultType,
107 Selector Sel,
Daniel Dunbarb1ee5d62008-08-25 08:19:24 +0000108 const ObjCInterfaceDecl *Class,
109 llvm::Value *Receiver,
Daniel Dunbar0ed60b02008-08-30 03:02:31 +0000110 bool IsClassMessage,
111 const CallArgList &CallArgs);
Daniel Dunbard916e6e2008-11-01 01:53:16 +0000112 virtual llvm::Value *GetClass(CGBuilderTy &Builder,
Daniel Dunbar434627a2008-08-16 00:25:02 +0000113 const ObjCInterfaceDecl *OID);
Daniel Dunbard916e6e2008-11-01 01:53:16 +0000114 virtual llvm::Value *GetSelector(CGBuilderTy &Builder, Selector Sel);
Chris Lattnerd71288e2008-06-26 04:37:12 +0000115
Daniel Dunbarac93e472008-08-15 22:20:32 +0000116 virtual llvm::Function *GenerateMethod(const ObjCMethodDecl *OMD);
117 virtual void GenerateCategory(const ObjCCategoryImplDecl *CMD);
118 virtual void GenerateClass(const ObjCImplementationDecl *ClassDecl);
Daniel Dunbard916e6e2008-11-01 01:53:16 +0000119 virtual llvm::Value *GenerateProtocolRef(CGBuilderTy &Builder,
Daniel Dunbar84bb85f2008-08-13 00:59:25 +0000120 const ObjCProtocolDecl *PD);
121 virtual void GenerateProtocol(const ObjCProtocolDecl *PD);
Anton Korobeynikovcd5d08d2008-06-01 14:13:53 +0000122 virtual llvm::Function *ModuleInitFunction();
Daniel Dunbarf7103722008-09-24 03:38:44 +0000123 virtual llvm::Function *GetPropertyGetFunction();
124 virtual llvm::Function *GetPropertySetFunction();
Anders Carlsson58d16242008-08-31 04:05:03 +0000125 virtual llvm::Function *EnumerationMutationFunction();
Anders Carlssonb01a2112008-09-09 10:04:29 +0000126
127 virtual void EmitTryStmt(CodeGen::CodeGenFunction &CGF,
128 const ObjCAtTryStmt &S);
129 virtual void EmitThrowStmt(CodeGen::CodeGenFunction &CGF,
130 const ObjCAtThrowStmt &S);
Chris Lattnerdd978702008-11-15 21:26:17 +0000131 virtual void EmitSynchronizedStmt(CodeGen::CodeGenFunction &CGF,
132 const ObjCAtSynchronizedStmt &S);
Fariborz Jahanian252d87f2008-11-18 22:37:34 +0000133 virtual llvm::Value * EmitObjCWeakRead(CodeGen::CodeGenFunction &CGF,
Fariborz Jahanian3305ad32008-11-18 21:45:40 +0000134 llvm::Value *AddrWeakObj);
Fariborz Jahanian252d87f2008-11-18 22:37:34 +0000135 virtual void EmitObjCWeakAssign(CodeGen::CodeGenFunction &CGF,
136 llvm::Value *src, llvm::Value *dst);
Fariborz Jahanian17958902008-11-19 00:59:10 +0000137 virtual void EmitObjCGlobalAssign(CodeGen::CodeGenFunction &CGF,
138 llvm::Value *src, llvm::Value *dest);
Fariborz Jahanianf310b592008-11-20 19:23:36 +0000139 virtual void EmitObjCIvarAssign(CodeGen::CodeGenFunction &CGF,
140 llvm::Value *src, llvm::Value *dest);
Fariborz Jahanian17958902008-11-19 00:59:10 +0000141 virtual void EmitObjCStrongCastAssign(CodeGen::CodeGenFunction &CGF,
142 llvm::Value *src, llvm::Value *dest);
Chris Lattnera0fd5ee2008-03-01 08:50:34 +0000143};
144} // end anonymous namespace
145
Anton Korobeynikovcd5d08d2008-06-01 14:13:53 +0000146
147
148static std::string SymbolNameForClass(const std::string &ClassName) {
149 return ".objc_class_" + ClassName;
150}
151
152static std::string SymbolNameForMethod(const std::string &ClassName, const
153 std::string &CategoryName, const std::string &MethodName, bool isClassMethod)
154{
155 return "._objc_method_" + ClassName +"("+CategoryName+")"+
156 (isClassMethod ? "+" : "-") + MethodName;
157}
158
Chris Lattner547907c2008-06-26 04:19:03 +0000159CGObjCGNU::CGObjCGNU(CodeGen::CodeGenModule &cgm)
160 : CGM(cgm), TheModule(CGM.getModule()) {
161 IntTy = CGM.getTypes().ConvertType(CGM.getContext().IntTy);
162 LongTy = CGM.getTypes().ConvertType(CGM.getContext().LongTy);
163
Anton Korobeynikovcd5d08d2008-06-01 14:13:53 +0000164 Zeros[0] = llvm::ConstantInt::get(llvm::Type::Int32Ty, 0);
165 Zeros[1] = Zeros[0];
166 NULLPtr = llvm::ConstantPointerNull::get(
167 llvm::PointerType::getUnqual(llvm::Type::Int8Ty));
Chris Lattnerb326b172008-03-30 23:03:07 +0000168 // C string type. Used in lots of places.
169 PtrToInt8Ty =
170 llvm::PointerType::getUnqual(llvm::Type::Int8Ty);
171 // Get the selector Type.
Anton Korobeynikovcd5d08d2008-06-01 14:13:53 +0000172 SelStructTy = llvm::StructType::get(
Chris Lattnerb326b172008-03-30 23:03:07 +0000173 PtrToInt8Ty,
174 PtrToInt8Ty,
175 NULL);
176 SelectorTy = llvm::PointerType::getUnqual(SelStructTy);
177 PtrToIntTy = llvm::PointerType::getUnqual(IntTy);
178 PtrTy = PtrToInt8Ty;
179
180 // Object type
181 llvm::PATypeHolder OpaqueObjTy = llvm::OpaqueType::get();
182 llvm::Type *OpaqueIdTy = llvm::PointerType::getUnqual(OpaqueObjTy);
183 IdTy = llvm::StructType::get(OpaqueIdTy, NULL);
184 llvm::cast<llvm::OpaqueType>(OpaqueObjTy.get())->refineAbstractTypeTo(IdTy);
185 IdTy = llvm::cast<llvm::StructType>(OpaqueObjTy.get());
186 IdTy = llvm::PointerType::getUnqual(IdTy);
187
188 // IMP type
189 std::vector<const llvm::Type*> IMPArgs;
190 IMPArgs.push_back(IdTy);
191 IMPArgs.push_back(SelectorTy);
192 IMPTy = llvm::FunctionType::get(IdTy, IMPArgs, true);
Anton Korobeynikovcd5d08d2008-06-01 14:13:53 +0000193}
194// This has to perform the lookup every time, since posing and related
195// techniques can modify the name -> class mapping.
Daniel Dunbard916e6e2008-11-01 01:53:16 +0000196llvm::Value *CGObjCGNU::GetClass(CGBuilderTy &Builder,
Daniel Dunbar434627a2008-08-16 00:25:02 +0000197 const ObjCInterfaceDecl *OID) {
198 llvm::Value *ClassName = CGM.GetAddrOfConstantCString(OID->getName());
199 ClassName = Builder.CreateStructGEP(ClassName, 0);
200
Anton Korobeynikovcd5d08d2008-06-01 14:13:53 +0000201 llvm::Constant *ClassLookupFn =
202 TheModule.getOrInsertFunction("objc_lookup_class", IdTy, PtrToInt8Ty,
203 NULL);
204 return Builder.CreateCall(ClassLookupFn, ClassName);
Chris Lattnerb326b172008-03-30 23:03:07 +0000205}
206
Chris Lattnerd71288e2008-06-26 04:37:12 +0000207/// GetSelector - Return the pointer to the unique'd string for this selector.
Daniel Dunbard916e6e2008-11-01 01:53:16 +0000208llvm::Value *CGObjCGNU::GetSelector(CGBuilderTy &Builder, Selector Sel) {
Chris Lattnerd71288e2008-06-26 04:37:12 +0000209 // FIXME: uniquing on the string is wasteful, unique on Sel instead!
210 llvm::GlobalAlias *&US = UntypedSelectors[Sel.getName()];
211 if (US == 0)
212 US = new llvm::GlobalAlias(llvm::PointerType::getUnqual(SelectorTy),
213 llvm::GlobalValue::InternalLinkage,
214 ".objc_untyped_selector_alias",
215 NULL, &TheModule);
216
217 return Builder.CreateLoad(US);
218
219}
220
Chris Lattnera5b18882008-06-26 04:44:19 +0000221llvm::Constant *CGObjCGNU::MakeConstantString(const std::string &Str,
222 const std::string &Name) {
Anton Korobeynikovcd5d08d2008-06-01 14:13:53 +0000223 llvm::Constant * ConstStr = llvm::ConstantArray::get(Str);
224 ConstStr = new llvm::GlobalVariable(ConstStr->getType(), true,
225 llvm::GlobalValue::InternalLinkage,
226 ConstStr, Name, &TheModule);
227 return llvm::ConstantExpr::getGetElementPtr(ConstStr, Zeros, 2);
228}
229llvm::Constant *CGObjCGNU::MakeGlobal(const llvm::StructType *Ty,
230 std::vector<llvm::Constant*> &V, const std::string &Name) {
231 llvm::Constant *C = llvm::ConstantStruct::get(Ty, V);
232 return new llvm::GlobalVariable(Ty, false,
233 llvm::GlobalValue::InternalLinkage, C, Name, &TheModule);
234}
235llvm::Constant *CGObjCGNU::MakeGlobal(const llvm::ArrayType *Ty,
236 std::vector<llvm::Constant*> &V, const std::string &Name) {
237 llvm::Constant *C = llvm::ConstantArray::get(Ty, V);
238 return new llvm::GlobalVariable(Ty, false,
239 llvm::GlobalValue::InternalLinkage, C, Name, &TheModule);
240}
241
242/// Generate an NSConstantString object.
243//TODO: In case there are any crazy people still using the GNU runtime without
244//an OpenStep implementation, this should let them select their own class for
245//constant strings.
Daniel Dunbardaf4ad42008-08-12 00:12:39 +0000246llvm::Constant *CGObjCGNU::GenerateConstantString(const std::string &Str) {
Anton Korobeynikovcd5d08d2008-06-01 14:13:53 +0000247 std::vector<llvm::Constant*> Ivars;
248 Ivars.push_back(NULLPtr);
Chris Lattnerbac12452008-06-21 21:44:18 +0000249 Ivars.push_back(MakeConstantString(Str));
Daniel Dunbardaf4ad42008-08-12 00:12:39 +0000250 Ivars.push_back(llvm::ConstantInt::get(IntTy, Str.size()));
Anton Korobeynikovcd5d08d2008-06-01 14:13:53 +0000251 llvm::Constant *ObjCStr = MakeGlobal(
252 llvm::StructType::get(PtrToInt8Ty, PtrToInt8Ty, IntTy, NULL),
253 Ivars, ".objc_str");
254 ConstantStrings.push_back(
255 llvm::ConstantExpr::getBitCast(ObjCStr, PtrToInt8Ty));
256 return ObjCStr;
257}
258
259///Generates a message send where the super is the receiver. This is a message
260///send to self with special delivery semantics indicating which class's method
261///should be called.
Daniel Dunbara04840b2008-08-23 03:46:30 +0000262CodeGen::RValue
263CGObjCGNU::GenerateMessageSendSuper(CodeGen::CodeGenFunction &CGF,
Daniel Dunbardd851282008-08-30 05:35:15 +0000264 QualType ResultType,
265 Selector Sel,
Daniel Dunbarb1ee5d62008-08-25 08:19:24 +0000266 const ObjCInterfaceDecl *Class,
267 llvm::Value *Receiver,
Daniel Dunbar0ed60b02008-08-30 03:02:31 +0000268 bool IsClassMessage,
269 const CallArgList &CallArgs) {
Daniel Dunbarb1ee5d62008-08-25 08:19:24 +0000270 const ObjCInterfaceDecl *SuperClass = Class->getSuperClass();
Daniel Dunbardd851282008-08-30 05:35:15 +0000271 const llvm::Type *ReturnTy = CGM.getTypes().ConvertType(ResultType);
Anton Korobeynikovcd5d08d2008-06-01 14:13:53 +0000272 // TODO: This should be cached, not looked up every time.
Daniel Dunbara04840b2008-08-23 03:46:30 +0000273 llvm::Value *ReceiverClass = GetClass(CGF.Builder, SuperClass);
Daniel Dunbardd851282008-08-30 05:35:15 +0000274 llvm::Value *cmd = GetSelector(CGF.Builder, Sel);
Chris Lattnera0fd5ee2008-03-01 08:50:34 +0000275 std::vector<const llvm::Type*> impArgTypes;
276 impArgTypes.push_back(Receiver->getType());
Chris Lattnerb326b172008-03-30 23:03:07 +0000277 impArgTypes.push_back(SelectorTy);
Chris Lattnera0fd5ee2008-03-01 08:50:34 +0000278
279 // Avoid an explicit cast on the IMP by getting a version that has the right
280 // return type.
281 llvm::FunctionType *impType = llvm::FunctionType::get(ReturnTy, impArgTypes,
282 true);
Anton Korobeynikovcd5d08d2008-06-01 14:13:53 +0000283 // Construct the structure used to look up the IMP
284 llvm::StructType *ObjCSuperTy = llvm::StructType::get(Receiver->getType(),
285 IdTy, NULL);
Daniel Dunbara04840b2008-08-23 03:46:30 +0000286 llvm::Value *ObjCSuper = CGF.Builder.CreateAlloca(ObjCSuperTy);
Eli Friedman2e630542008-06-13 23:01:12 +0000287 // FIXME: volatility
Daniel Dunbara04840b2008-08-23 03:46:30 +0000288 CGF.Builder.CreateStore(Receiver, CGF.Builder.CreateStructGEP(ObjCSuper, 0));
289 CGF.Builder.CreateStore(ReceiverClass, CGF.Builder.CreateStructGEP(ObjCSuper, 1));
Anton Korobeynikovcd5d08d2008-06-01 14:13:53 +0000290
291 // Get the IMP
292 llvm::Constant *lookupFunction =
293 TheModule.getOrInsertFunction("objc_msg_lookup_super",
294 llvm::PointerType::getUnqual(impType),
295 llvm::PointerType::getUnqual(ObjCSuperTy),
296 SelectorTy, NULL);
297 llvm::Value *lookupArgs[] = {ObjCSuper, cmd};
Daniel Dunbara04840b2008-08-23 03:46:30 +0000298 llvm::Value *imp = CGF.Builder.CreateCall(lookupFunction, lookupArgs,
Anton Korobeynikovcd5d08d2008-06-01 14:13:53 +0000299 lookupArgs+2);
300
301 // Call the method
Daniel Dunbar0ed60b02008-08-30 03:02:31 +0000302 CallArgList ActualArgs;
Daniel Dunbar0a2da0f2008-09-09 01:06:48 +0000303 ActualArgs.push_back(std::make_pair(RValue::get(Receiver),
Daniel Dunbar0ed60b02008-08-30 03:02:31 +0000304 CGF.getContext().getObjCIdType()));
Daniel Dunbar0a2da0f2008-09-09 01:06:48 +0000305 ActualArgs.push_back(std::make_pair(RValue::get(cmd),
Daniel Dunbar0ed60b02008-08-30 03:02:31 +0000306 CGF.getContext().getObjCSelType()));
307 ActualArgs.insert(ActualArgs.end(), CallArgs.begin(), CallArgs.end());
Daniel Dunbardd851282008-08-30 05:35:15 +0000308 return CGF.EmitCall(imp, ResultType, ActualArgs);
Anton Korobeynikovcd5d08d2008-06-01 14:13:53 +0000309}
310
311/// Generate code for a message send expression.
Daniel Dunbara04840b2008-08-23 03:46:30 +0000312CodeGen::RValue
313CGObjCGNU::GenerateMessageSend(CodeGen::CodeGenFunction &CGF,
Daniel Dunbardd851282008-08-30 05:35:15 +0000314 QualType ResultType,
315 Selector Sel,
Daniel Dunbarb1ee5d62008-08-25 08:19:24 +0000316 llvm::Value *Receiver,
Daniel Dunbar0ed60b02008-08-30 03:02:31 +0000317 bool IsClassMessage,
318 const CallArgList &CallArgs) {
Daniel Dunbardd851282008-08-30 05:35:15 +0000319 const llvm::Type *ReturnTy = CGM.getTypes().ConvertType(ResultType);
320 llvm::Value *cmd = GetSelector(CGF.Builder, Sel);
Anton Korobeynikovcd5d08d2008-06-01 14:13:53 +0000321
322 // Look up the method implementation.
323 std::vector<const llvm::Type*> impArgTypes;
324 const llvm::Type *RetTy;
325 //TODO: Revisit this when LLVM supports aggregate return types.
326 if (ReturnTy->isSingleValueType() && ReturnTy != llvm::Type::VoidTy) {
327 RetTy = ReturnTy;
328 } else {
329 // For struct returns allocate the space in the caller and pass it up to
330 // the sender.
331 RetTy = llvm::Type::VoidTy;
332 impArgTypes.push_back(llvm::PointerType::getUnqual(ReturnTy));
333 }
334 impArgTypes.push_back(Receiver->getType());
335 impArgTypes.push_back(SelectorTy);
336
337 // Avoid an explicit cast on the IMP by getting a version that has the right
338 // return type.
339 llvm::FunctionType *impType = llvm::FunctionType::get(RetTy, impArgTypes,
340 true);
Chris Lattnera0fd5ee2008-03-01 08:50:34 +0000341
342 llvm::Constant *lookupFunction =
343 TheModule.getOrInsertFunction("objc_msg_lookup",
Chris Lattnerb326b172008-03-30 23:03:07 +0000344 llvm::PointerType::getUnqual(impType),
345 Receiver->getType(), SelectorTy, NULL);
Daniel Dunbara04840b2008-08-23 03:46:30 +0000346 llvm::Value *imp = CGF.Builder.CreateCall2(lookupFunction, Receiver, cmd);
Chris Lattner7db5e942008-05-06 00:56:42 +0000347
348 // Call the method.
Daniel Dunbar0ed60b02008-08-30 03:02:31 +0000349 CallArgList ActualArgs;
Daniel Dunbar0a2da0f2008-09-09 01:06:48 +0000350 ActualArgs.push_back(std::make_pair(RValue::get(Receiver),
Daniel Dunbar0ed60b02008-08-30 03:02:31 +0000351 CGF.getContext().getObjCIdType()));
Daniel Dunbar0a2da0f2008-09-09 01:06:48 +0000352 ActualArgs.push_back(std::make_pair(RValue::get(cmd),
Daniel Dunbar0ed60b02008-08-30 03:02:31 +0000353 CGF.getContext().getObjCSelType()));
354 ActualArgs.insert(ActualArgs.end(), CallArgs.begin(), CallArgs.end());
Daniel Dunbardd851282008-08-30 05:35:15 +0000355 return CGF.EmitCall(imp, ResultType, ActualArgs);
Chris Lattnera0fd5ee2008-03-01 08:50:34 +0000356}
357
Anton Korobeynikovcd5d08d2008-06-01 14:13:53 +0000358/// Generates a MethodList. Used in construction of a objc_class and
359/// objc_category structures.
360llvm::Constant *CGObjCGNU::GenerateMethodList(const std::string &ClassName,
Chris Lattner578279d2008-06-26 05:08:00 +0000361 const std::string &CategoryName,
362 const llvm::SmallVectorImpl<Selector> &MethodSels,
Anton Korobeynikovcd5d08d2008-06-01 14:13:53 +0000363 const llvm::SmallVectorImpl<llvm::Constant *> &MethodTypes,
364 bool isClassMethodList) {
365 // Get the method structure type.
366 llvm::StructType *ObjCMethodTy = llvm::StructType::get(
367 PtrToInt8Ty, // Really a selector, but the runtime creates it us.
368 PtrToInt8Ty, // Method types
369 llvm::PointerType::getUnqual(IMPTy), //Method pointer
370 NULL);
371 std::vector<llvm::Constant*> Methods;
372 std::vector<llvm::Constant*> Elements;
373 for (unsigned int i = 0, e = MethodTypes.size(); i < e; ++i) {
374 Elements.clear();
Daniel Dunbar31fe9c32008-08-13 23:20:05 +0000375 llvm::Constant *C = CGM.GetAddrOfConstantCString(MethodSels[i].getName());
Chris Lattner578279d2008-06-26 05:08:00 +0000376 Elements.push_back(llvm::ConstantExpr::getGetElementPtr(C, Zeros, 2));
Anton Korobeynikovcd5d08d2008-06-01 14:13:53 +0000377 Elements.push_back(
378 llvm::ConstantExpr::getGetElementPtr(MethodTypes[i], Zeros, 2));
379 llvm::Constant *Method =
380 TheModule.getFunction(SymbolNameForMethod(ClassName, CategoryName,
Chris Lattner578279d2008-06-26 05:08:00 +0000381 MethodSels[i].getName(),
Chris Lattnere7581092008-06-26 04:05:20 +0000382 isClassMethodList));
Anton Korobeynikovcd5d08d2008-06-01 14:13:53 +0000383 Method = llvm::ConstantExpr::getBitCast(Method,
384 llvm::PointerType::getUnqual(IMPTy));
385 Elements.push_back(Method);
386 Methods.push_back(llvm::ConstantStruct::get(ObjCMethodTy, Elements));
387 }
388
389 // Array of method structures
390 llvm::ArrayType *ObjCMethodArrayTy = llvm::ArrayType::get(ObjCMethodTy,
Chris Lattner578279d2008-06-26 05:08:00 +0000391 MethodSels.size());
Anton Korobeynikovcd5d08d2008-06-01 14:13:53 +0000392 llvm::Constant *MethodArray = llvm::ConstantArray::get(ObjCMethodArrayTy,
Chris Lattnerbcb3e862008-06-26 04:52:29 +0000393 Methods);
Anton Korobeynikovcd5d08d2008-06-01 14:13:53 +0000394
395 // Structure containing list pointer, array and array count
396 llvm::SmallVector<const llvm::Type*, 16> ObjCMethodListFields;
397 llvm::PATypeHolder OpaqueNextTy = llvm::OpaqueType::get();
398 llvm::Type *NextPtrTy = llvm::PointerType::getUnqual(OpaqueNextTy);
399 llvm::StructType *ObjCMethodListTy = llvm::StructType::get(NextPtrTy,
400 IntTy,
401 ObjCMethodArrayTy,
402 NULL);
403 // Refine next pointer type to concrete type
404 llvm::cast<llvm::OpaqueType>(
405 OpaqueNextTy.get())->refineAbstractTypeTo(ObjCMethodListTy);
406 ObjCMethodListTy = llvm::cast<llvm::StructType>(OpaqueNextTy.get());
407
408 Methods.clear();
409 Methods.push_back(llvm::ConstantPointerNull::get(
410 llvm::PointerType::getUnqual(ObjCMethodListTy)));
411 Methods.push_back(llvm::ConstantInt::get(llvm::Type::Int32Ty,
412 MethodTypes.size()));
413 Methods.push_back(MethodArray);
414
415 // Create an instance of the structure
416 return MakeGlobal(ObjCMethodListTy, Methods, ".objc_method_list");
417}
418
419/// Generates an IvarList. Used in construction of a objc_class.
420llvm::Constant *CGObjCGNU::GenerateIvarList(
421 const llvm::SmallVectorImpl<llvm::Constant *> &IvarNames,
422 const llvm::SmallVectorImpl<llvm::Constant *> &IvarTypes,
423 const llvm::SmallVectorImpl<llvm::Constant *> &IvarOffsets) {
424 // Get the method structure type.
425 llvm::StructType *ObjCIvarTy = llvm::StructType::get(
426 PtrToInt8Ty,
427 PtrToInt8Ty,
428 IntTy,
429 NULL);
430 std::vector<llvm::Constant*> Ivars;
431 std::vector<llvm::Constant*> Elements;
432 for (unsigned int i = 0, e = IvarNames.size() ; i < e ; i++) {
433 Elements.clear();
434 Elements.push_back( llvm::ConstantExpr::getGetElementPtr(IvarNames[i],
435 Zeros, 2));
436 Elements.push_back( llvm::ConstantExpr::getGetElementPtr(IvarTypes[i],
437 Zeros, 2));
438 Elements.push_back(IvarOffsets[i]);
439 Ivars.push_back(llvm::ConstantStruct::get(ObjCIvarTy, Elements));
440 }
441
442 // Array of method structures
443 llvm::ArrayType *ObjCIvarArrayTy = llvm::ArrayType::get(ObjCIvarTy,
444 IvarNames.size());
445
446
447 Elements.clear();
448 Elements.push_back(llvm::ConstantInt::get(
449 llvm::cast<llvm::IntegerType>(IntTy), (int)IvarNames.size()));
450 Elements.push_back(llvm::ConstantArray::get(ObjCIvarArrayTy, Ivars));
451 // Structure containing array and array count
452 llvm::StructType *ObjCIvarListTy = llvm::StructType::get(IntTy,
453 ObjCIvarArrayTy,
454 NULL);
455
456 // Create an instance of the structure
457 return MakeGlobal(ObjCIvarListTy, Elements, ".objc_ivar_list");
458}
459
460/// Generate a class structure
461llvm::Constant *CGObjCGNU::GenerateClassStructure(
462 llvm::Constant *MetaClass,
463 llvm::Constant *SuperClass,
464 unsigned info,
Chris Lattnerad9c3f32008-06-26 04:47:04 +0000465 const char *Name,
Anton Korobeynikovcd5d08d2008-06-01 14:13:53 +0000466 llvm::Constant *Version,
467 llvm::Constant *InstanceSize,
468 llvm::Constant *IVars,
469 llvm::Constant *Methods,
470 llvm::Constant *Protocols) {
471 // Set up the class structure
472 // Note: Several of these are char*s when they should be ids. This is
473 // because the runtime performs this translation on load.
474 llvm::StructType *ClassTy = llvm::StructType::get(
475 PtrToInt8Ty, // class_pointer
476 PtrToInt8Ty, // super_class
477 PtrToInt8Ty, // name
478 LongTy, // version
479 LongTy, // info
480 LongTy, // instance_size
481 IVars->getType(), // ivars
482 Methods->getType(), // methods
483 // These are all filled in by the runtime, so we pretend
484 PtrTy, // dtable
485 PtrTy, // subclass_list
486 PtrTy, // sibling_class
487 PtrTy, // protocols
488 PtrTy, // gc_object_type
489 NULL);
490 llvm::Constant *Zero = llvm::ConstantInt::get(LongTy, 0);
491 llvm::Constant *NullP =
492 llvm::ConstantPointerNull::get(llvm::cast<llvm::PointerType>(PtrTy));
493 // Fill in the structure
494 std::vector<llvm::Constant*> Elements;
495 Elements.push_back(llvm::ConstantExpr::getBitCast(MetaClass, PtrToInt8Ty));
496 Elements.push_back(SuperClass);
Chris Lattnerad9c3f32008-06-26 04:47:04 +0000497 Elements.push_back(MakeConstantString(Name, ".class_name"));
Anton Korobeynikovcd5d08d2008-06-01 14:13:53 +0000498 Elements.push_back(Zero);
499 Elements.push_back(llvm::ConstantInt::get(LongTy, info));
500 Elements.push_back(InstanceSize);
501 Elements.push_back(IVars);
502 Elements.push_back(Methods);
503 Elements.push_back(NullP);
504 Elements.push_back(NullP);
505 Elements.push_back(NullP);
506 Elements.push_back(llvm::ConstantExpr::getBitCast(Protocols, PtrTy));
507 Elements.push_back(NullP);
508 // Create an instance of the structure
Chris Lattner4d018542008-07-21 06:31:05 +0000509 return MakeGlobal(ClassTy, Elements, SymbolNameForClass(Name));
Anton Korobeynikovcd5d08d2008-06-01 14:13:53 +0000510}
511
512llvm::Constant *CGObjCGNU::GenerateProtocolMethodList(
513 const llvm::SmallVectorImpl<llvm::Constant *> &MethodNames,
514 const llvm::SmallVectorImpl<llvm::Constant *> &MethodTypes) {
515 // Get the method structure type.
516 llvm::StructType *ObjCMethodDescTy = llvm::StructType::get(
517 PtrToInt8Ty, // Really a selector, but the runtime does the casting for us.
518 PtrToInt8Ty,
519 NULL);
520 std::vector<llvm::Constant*> Methods;
521 std::vector<llvm::Constant*> Elements;
522 for (unsigned int i = 0, e = MethodTypes.size() ; i < e ; i++) {
523 Elements.clear();
524 Elements.push_back( llvm::ConstantExpr::getGetElementPtr(MethodNames[i],
525 Zeros, 2));
526 Elements.push_back(
527 llvm::ConstantExpr::getGetElementPtr(MethodTypes[i], Zeros, 2));
528 Methods.push_back(llvm::ConstantStruct::get(ObjCMethodDescTy, Elements));
529 }
530 llvm::ArrayType *ObjCMethodArrayTy = llvm::ArrayType::get(ObjCMethodDescTy,
531 MethodNames.size());
532 llvm::Constant *Array = llvm::ConstantArray::get(ObjCMethodArrayTy, Methods);
533 llvm::StructType *ObjCMethodDescListTy = llvm::StructType::get(
534 IntTy, ObjCMethodArrayTy, NULL);
535 Methods.clear();
536 Methods.push_back(llvm::ConstantInt::get(IntTy, MethodNames.size()));
537 Methods.push_back(Array);
538 return MakeGlobal(ObjCMethodDescListTy, Methods, ".objc_method_list");
539}
540// Create the protocol list structure used in classes, categories and so on
541llvm::Constant *CGObjCGNU::GenerateProtocolList(
542 const llvm::SmallVectorImpl<std::string> &Protocols) {
543 llvm::ArrayType *ProtocolArrayTy = llvm::ArrayType::get(PtrToInt8Ty,
544 Protocols.size());
545 llvm::StructType *ProtocolListTy = llvm::StructType::get(
546 PtrTy, //Should be a recurisve pointer, but it's always NULL here.
547 LongTy,//FIXME: Should be size_t
548 ProtocolArrayTy,
549 NULL);
550 std::vector<llvm::Constant*> Elements;
551 for (const std::string *iter = Protocols.begin(), *endIter = Protocols.end();
552 iter != endIter ; iter++) {
553 llvm::Constant *Ptr =
554 llvm::ConstantExpr::getBitCast(ExistingProtocols[*iter], PtrToInt8Ty);
555 Elements.push_back(Ptr);
556 }
557 llvm::Constant * ProtocolArray = llvm::ConstantArray::get(ProtocolArrayTy,
558 Elements);
559 Elements.clear();
560 Elements.push_back(NULLPtr);
561 Elements.push_back(llvm::ConstantInt::get(
562 llvm::cast<llvm::IntegerType>(LongTy), Protocols.size()));
563 Elements.push_back(ProtocolArray);
564 return MakeGlobal(ProtocolListTy, Elements, ".objc_protocol_list");
565}
566
Daniel Dunbard916e6e2008-11-01 01:53:16 +0000567llvm::Value *CGObjCGNU::GenerateProtocolRef(CGBuilderTy &Builder,
Daniel Dunbar84bb85f2008-08-13 00:59:25 +0000568 const ObjCProtocolDecl *PD) {
569 return ExistingProtocols[PD->getName()];
Anton Korobeynikovcd5d08d2008-06-01 14:13:53 +0000570}
571
Daniel Dunbar84bb85f2008-08-13 00:59:25 +0000572void CGObjCGNU::GenerateProtocol(const ObjCProtocolDecl *PD) {
573 ASTContext &Context = CGM.getContext();
Douglas Gregor24afd4a2008-11-17 14:58:09 +0000574 const char *ProtocolName = PD->getIdentifierName();
Daniel Dunbar84bb85f2008-08-13 00:59:25 +0000575 llvm::SmallVector<std::string, 16> Protocols;
576 for (ObjCProtocolDecl::protocol_iterator PI = PD->protocol_begin(),
577 E = PD->protocol_end(); PI != E; ++PI)
578 Protocols.push_back((*PI)->getName());
579 llvm::SmallVector<llvm::Constant*, 16> InstanceMethodNames;
580 llvm::SmallVector<llvm::Constant*, 16> InstanceMethodTypes;
581 for (ObjCProtocolDecl::instmeth_iterator iter = PD->instmeth_begin(),
582 E = PD->instmeth_end(); iter != E; iter++) {
583 std::string TypeStr;
584 Context.getObjCEncodingForMethodDecl(*iter, TypeStr);
585 InstanceMethodNames.push_back(
Daniel Dunbar31fe9c32008-08-13 23:20:05 +0000586 CGM.GetAddrOfConstantCString((*iter)->getSelector().getName()));
587 InstanceMethodTypes.push_back(CGM.GetAddrOfConstantCString(TypeStr));
Daniel Dunbar84bb85f2008-08-13 00:59:25 +0000588 }
589 // Collect information about class methods:
590 llvm::SmallVector<llvm::Constant*, 16> ClassMethodNames;
591 llvm::SmallVector<llvm::Constant*, 16> ClassMethodTypes;
592 for (ObjCProtocolDecl::classmeth_iterator iter = PD->classmeth_begin(),
593 endIter = PD->classmeth_end() ; iter != endIter ; iter++) {
594 std::string TypeStr;
595 Context.getObjCEncodingForMethodDecl((*iter),TypeStr);
596 ClassMethodNames.push_back(
Daniel Dunbar31fe9c32008-08-13 23:20:05 +0000597 CGM.GetAddrOfConstantCString((*iter)->getSelector().getName()));
598 ClassMethodTypes.push_back(CGM.GetAddrOfConstantCString(TypeStr));
Daniel Dunbar84bb85f2008-08-13 00:59:25 +0000599 }
Anton Korobeynikovcd5d08d2008-06-01 14:13:53 +0000600
601 llvm::Constant *ProtocolList = GenerateProtocolList(Protocols);
602 llvm::Constant *InstanceMethodList =
603 GenerateProtocolMethodList(InstanceMethodNames, InstanceMethodTypes);
604 llvm::Constant *ClassMethodList =
605 GenerateProtocolMethodList(ClassMethodNames, ClassMethodTypes);
606 // Protocols are objects containing lists of the methods implemented and
607 // protocols adopted.
608 llvm::StructType *ProtocolTy = llvm::StructType::get(IdTy,
609 PtrToInt8Ty,
610 ProtocolList->getType(),
611 InstanceMethodList->getType(),
612 ClassMethodList->getType(),
613 NULL);
614 std::vector<llvm::Constant*> Elements;
615 // The isa pointer must be set to a magic number so the runtime knows it's
616 // the correct layout.
617 Elements.push_back(llvm::ConstantExpr::getIntToPtr(
618 llvm::ConstantInt::get(llvm::Type::Int32Ty, ProtocolVersion), IdTy));
619 Elements.push_back(MakeConstantString(ProtocolName, ".objc_protocol_name"));
620 Elements.push_back(ProtocolList);
621 Elements.push_back(InstanceMethodList);
622 Elements.push_back(ClassMethodList);
623 ExistingProtocols[ProtocolName] =
624 llvm::ConstantExpr::getBitCast(MakeGlobal(ProtocolTy, Elements,
625 ".objc_protocol"), IdTy);
626}
627
Daniel Dunbarac93e472008-08-15 22:20:32 +0000628void CGObjCGNU::GenerateCategory(const ObjCCategoryImplDecl *OCD) {
Douglas Gregor24afd4a2008-11-17 14:58:09 +0000629 const char *ClassName = OCD->getClassInterface()->getIdentifierName();
630 const char *CategoryName = OCD->getIdentifierName();
Daniel Dunbarac93e472008-08-15 22:20:32 +0000631 // Collect information about instance methods
632 llvm::SmallVector<Selector, 16> InstanceMethodSels;
633 llvm::SmallVector<llvm::Constant*, 16> InstanceMethodTypes;
634 for (ObjCCategoryDecl::instmeth_iterator iter = OCD->instmeth_begin(),
635 endIter = OCD->instmeth_end() ; iter != endIter ; iter++) {
636 InstanceMethodSels.push_back((*iter)->getSelector());
637 std::string TypeStr;
638 CGM.getContext().getObjCEncodingForMethodDecl(*iter,TypeStr);
639 InstanceMethodTypes.push_back(CGM.GetAddrOfConstantCString(TypeStr));
640 }
641
642 // Collect information about class methods
643 llvm::SmallVector<Selector, 16> ClassMethodSels;
644 llvm::SmallVector<llvm::Constant*, 16> ClassMethodTypes;
645 for (ObjCCategoryDecl::classmeth_iterator iter = OCD->classmeth_begin(),
646 endIter = OCD->classmeth_end() ; iter != endIter ; iter++) {
647 ClassMethodSels.push_back((*iter)->getSelector());
648 std::string TypeStr;
649 CGM.getContext().getObjCEncodingForMethodDecl(*iter,TypeStr);
650 ClassMethodTypes.push_back(CGM.GetAddrOfConstantCString(TypeStr));
651 }
652
653 // Collect the names of referenced protocols
654 llvm::SmallVector<std::string, 16> Protocols;
655 const ObjCInterfaceDecl *ClassDecl = OCD->getClassInterface();
656 const ObjCList<ObjCProtocolDecl> &Protos =ClassDecl->getReferencedProtocols();
657 for (ObjCList<ObjCProtocolDecl>::iterator I = Protos.begin(),
658 E = Protos.end(); I != E; ++I)
659 Protocols.push_back((*I)->getName());
660
Anton Korobeynikovcd5d08d2008-06-01 14:13:53 +0000661 std::vector<llvm::Constant*> Elements;
662 Elements.push_back(MakeConstantString(CategoryName));
663 Elements.push_back(MakeConstantString(ClassName));
664 // Instance method list
665 Elements.push_back(llvm::ConstantExpr::getBitCast(GenerateMethodList(
Chris Lattner578279d2008-06-26 05:08:00 +0000666 ClassName, CategoryName, InstanceMethodSels, InstanceMethodTypes,
Anton Korobeynikovcd5d08d2008-06-01 14:13:53 +0000667 false), PtrTy));
668 // Class method list
669 Elements.push_back(llvm::ConstantExpr::getBitCast(GenerateMethodList(
Chris Lattner578279d2008-06-26 05:08:00 +0000670 ClassName, CategoryName, ClassMethodSels, ClassMethodTypes, true),
Anton Korobeynikovcd5d08d2008-06-01 14:13:53 +0000671 PtrTy));
672 // Protocol list
673 Elements.push_back(llvm::ConstantExpr::getBitCast(
674 GenerateProtocolList(Protocols), PtrTy));
675 Categories.push_back(llvm::ConstantExpr::getBitCast(
676 MakeGlobal(llvm::StructType::get(PtrToInt8Ty, PtrToInt8Ty, PtrTy,
677 PtrTy, PtrTy, NULL), Elements), PtrTy));
678}
Daniel Dunbarac93e472008-08-15 22:20:32 +0000679
680void CGObjCGNU::GenerateClass(const ObjCImplementationDecl *OID) {
681 ASTContext &Context = CGM.getContext();
682
683 // Get the superclass name.
684 const ObjCInterfaceDecl * SuperClassDecl =
685 OID->getClassInterface()->getSuperClass();
686 const char * SuperClassName = NULL;
687 if (SuperClassDecl) {
Douglas Gregor24afd4a2008-11-17 14:58:09 +0000688 SuperClassName = SuperClassDecl->getIdentifierName();
Daniel Dunbarac93e472008-08-15 22:20:32 +0000689 }
690
691 // Get the class name
692 ObjCInterfaceDecl * ClassDecl = (ObjCInterfaceDecl*)OID->getClassInterface();
Douglas Gregor24afd4a2008-11-17 14:58:09 +0000693 const char * ClassName = ClassDecl->getIdentifierName();
Daniel Dunbarac93e472008-08-15 22:20:32 +0000694
695 // Get the size of instances. For runtimes that support late-bound instances
696 // this should probably be something different (size just of instance
697 // varaibles in this class, not superclasses?).
698 int instanceSize = 0;
699 const llvm::Type *ObjTy = 0;
700 if (!LateBoundIVars()) {
701 ObjTy = CGM.getTypes().ConvertType(Context.getObjCInterfaceType(ClassDecl));
702 instanceSize = CGM.getTargetData().getABITypeSize(ObjTy);
703 } else {
704 // This is required by newer ObjC runtimes.
705 assert(0 && "Late-bound instance variables not yet supported");
706 }
707
708 // Collect information about instance variables.
709 llvm::SmallVector<llvm::Constant*, 16> IvarNames;
710 llvm::SmallVector<llvm::Constant*, 16> IvarTypes;
711 llvm::SmallVector<llvm::Constant*, 16> IvarOffsets;
712 const llvm::StructLayout *Layout =
713 CGM.getTargetData().getStructLayout(cast<llvm::StructType>(ObjTy));
714 ObjTy = llvm::PointerType::getUnqual(ObjTy);
715 for (ObjCInterfaceDecl::ivar_iterator iter = ClassDecl->ivar_begin(),
716 endIter = ClassDecl->ivar_end() ; iter != endIter ; iter++) {
717 // Store the name
718 IvarNames.push_back(CGM.GetAddrOfConstantCString((*iter)->getName()));
719 // Get the type encoding for this ivar
720 std::string TypeStr;
Daniel Dunbarc9197cd2008-10-17 20:21:44 +0000721 Context.getObjCEncodingForType((*iter)->getType(), TypeStr);
Daniel Dunbarac93e472008-08-15 22:20:32 +0000722 IvarTypes.push_back(CGM.GetAddrOfConstantCString(TypeStr));
723 // Get the offset
724 int offset =
725 (int)Layout->getElementOffset(CGM.getTypes().getLLVMFieldNo(*iter));
726 IvarOffsets.push_back(
727 llvm::ConstantInt::get(llvm::Type::Int32Ty, offset));
728 }
729
730 // Collect information about instance methods
731 llvm::SmallVector<Selector, 16> InstanceMethodSels;
732 llvm::SmallVector<llvm::Constant*, 16> InstanceMethodTypes;
733 for (ObjCImplementationDecl::instmeth_iterator iter = OID->instmeth_begin(),
734 endIter = OID->instmeth_end() ; iter != endIter ; iter++) {
735 InstanceMethodSels.push_back((*iter)->getSelector());
736 std::string TypeStr;
737 Context.getObjCEncodingForMethodDecl((*iter),TypeStr);
738 InstanceMethodTypes.push_back(CGM.GetAddrOfConstantCString(TypeStr));
739 }
740
741 // Collect information about class methods
742 llvm::SmallVector<Selector, 16> ClassMethodSels;
743 llvm::SmallVector<llvm::Constant*, 16> ClassMethodTypes;
744 for (ObjCImplementationDecl::classmeth_iterator iter = OID->classmeth_begin(),
745 endIter = OID->classmeth_end() ; iter != endIter ; iter++) {
746 ClassMethodSels.push_back((*iter)->getSelector());
747 std::string TypeStr;
748 Context.getObjCEncodingForMethodDecl((*iter),TypeStr);
749 ClassMethodTypes.push_back(CGM.GetAddrOfConstantCString(TypeStr));
750 }
751 // Collect the names of referenced protocols
752 llvm::SmallVector<std::string, 16> Protocols;
753 const ObjCList<ObjCProtocolDecl> &Protos =ClassDecl->getReferencedProtocols();
754 for (ObjCList<ObjCProtocolDecl>::iterator I = Protos.begin(),
755 E = Protos.end(); I != E; ++I)
756 Protocols.push_back((*I)->getName());
757
758
759
Anton Korobeynikovcd5d08d2008-06-01 14:13:53 +0000760 // Get the superclass pointer.
761 llvm::Constant *SuperClass;
762 if (SuperClassName) {
763 SuperClass = MakeConstantString(SuperClassName, ".super_class_name");
764 } else {
765 SuperClass = llvm::ConstantPointerNull::get(
766 llvm::cast<llvm::PointerType>(PtrToInt8Ty));
767 }
Anton Korobeynikovcd5d08d2008-06-01 14:13:53 +0000768 // Empty vector used to construct empty method lists
769 llvm::SmallVector<llvm::Constant*, 1> empty;
770 // Generate the method and instance variable lists
771 llvm::Constant *MethodList = GenerateMethodList(ClassName, "",
Chris Lattner578279d2008-06-26 05:08:00 +0000772 InstanceMethodSels, InstanceMethodTypes, false);
Anton Korobeynikovcd5d08d2008-06-01 14:13:53 +0000773 llvm::Constant *ClassMethodList = GenerateMethodList(ClassName, "",
Chris Lattner578279d2008-06-26 05:08:00 +0000774 ClassMethodSels, ClassMethodTypes, true);
Anton Korobeynikovcd5d08d2008-06-01 14:13:53 +0000775 llvm::Constant *IvarList = GenerateIvarList(IvarNames, IvarTypes,
776 IvarOffsets);
777 //Generate metaclass for class methods
778 llvm::Constant *MetaClassStruct = GenerateClassStructure(NULLPtr,
Chris Lattner4d018542008-07-21 06:31:05 +0000779 NULLPtr, 0x2L, /*name*/"", 0, Zeros[0], GenerateIvarList(
Anton Korobeynikovcd5d08d2008-06-01 14:13:53 +0000780 empty, empty, empty), ClassMethodList, NULLPtr);
781 // Generate the class structure
782 llvm::Constant *ClassStruct = GenerateClassStructure(MetaClassStruct,
Chris Lattnerad9c3f32008-06-26 04:47:04 +0000783 SuperClass, 0x1L, ClassName, 0,
Anton Korobeynikovcd5d08d2008-06-01 14:13:53 +0000784 llvm::ConstantInt::get(llvm::Type::Int32Ty, instanceSize), IvarList,
785 MethodList, GenerateProtocolList(Protocols));
786 // Add class structure to list to be added to the symtab later
787 ClassStruct = llvm::ConstantExpr::getBitCast(ClassStruct, PtrToInt8Ty);
788 Classes.push_back(ClassStruct);
789}
790
791llvm::Function *CGObjCGNU::ModuleInitFunction() {
792 // Only emit an ObjC load function if no Objective-C stuff has been called
793 if (Classes.empty() && Categories.empty() && ConstantStrings.empty() &&
794 ExistingProtocols.empty() && TypedSelectors.empty() &&
Anton Korobeynikovb41e4972008-06-01 15:14:46 +0000795 UntypedSelectors.empty())
Anton Korobeynikovcd5d08d2008-06-01 14:13:53 +0000796 return NULL;
Eli Friedman7719bc82008-06-01 16:00:02 +0000797
798 // Name the ObjC types to make the IR a bit easier to read
799 TheModule.addTypeName(".objc_selector", SelectorTy);
800 TheModule.addTypeName(".objc_id", IdTy);
801 TheModule.addTypeName(".objc_imp", IMPTy);
802
Anton Korobeynikovcd5d08d2008-06-01 14:13:53 +0000803 std::vector<llvm::Constant*> Elements;
804 // Generate statics list:
805 llvm::ArrayType *StaticsArrayTy = llvm::ArrayType::get(PtrToInt8Ty,
806 ConstantStrings.size() + 1);
807 ConstantStrings.push_back(NULLPtr);
808 Elements.push_back(MakeConstantString("NSConstantString",
809 ".objc_static_class_name"));
810 Elements.push_back(llvm::ConstantArray::get(StaticsArrayTy, ConstantStrings));
811 llvm::StructType *StaticsListTy =
812 llvm::StructType::get(PtrToInt8Ty, StaticsArrayTy, NULL);
Chris Lattneref843042008-06-26 04:10:42 +0000813 llvm::Type *StaticsListPtrTy = llvm::PointerType::getUnqual(StaticsListTy);
Anton Korobeynikovcd5d08d2008-06-01 14:13:53 +0000814 llvm::Constant *Statics =
815 MakeGlobal(StaticsListTy, Elements, ".objc_statics");
Chris Lattner60eaae82008-06-24 17:01:28 +0000816 llvm::ArrayType *StaticsListArrayTy =
Chris Lattneref843042008-06-26 04:10:42 +0000817 llvm::ArrayType::get(StaticsListPtrTy, 2);
Chris Lattner60eaae82008-06-24 17:01:28 +0000818 Elements.clear();
819 Elements.push_back(Statics);
Chris Lattneref843042008-06-26 04:10:42 +0000820 Elements.push_back(llvm::Constant::getNullValue(StaticsListPtrTy));
Chris Lattner60eaae82008-06-24 17:01:28 +0000821 Statics = MakeGlobal(StaticsListArrayTy, Elements, ".objc_statics_ptr");
Anton Korobeynikovcd5d08d2008-06-01 14:13:53 +0000822 Statics = llvm::ConstantExpr::getBitCast(Statics, PtrTy);
823 // Array of classes, categories, and constant objects
824 llvm::ArrayType *ClassListTy = llvm::ArrayType::get(PtrToInt8Ty,
825 Classes.size() + Categories.size() + 2);
Chris Lattneref843042008-06-26 04:10:42 +0000826 llvm::StructType *SymTabTy = llvm::StructType::get(LongTy, SelectorTy,
827 llvm::Type::Int16Ty,
828 llvm::Type::Int16Ty,
829 ClassListTy, NULL);
Anton Korobeynikovcd5d08d2008-06-01 14:13:53 +0000830
831 Elements.clear();
832 // Pointer to an array of selectors used in this module.
833 std::vector<llvm::Constant*> Selectors;
834 for (std::map<TypedSelector, llvm::GlobalAlias*>::iterator
835 iter = TypedSelectors.begin(), iterEnd = TypedSelectors.end();
836 iter != iterEnd ; ++iter) {
Chris Lattneref843042008-06-26 04:10:42 +0000837 Elements.push_back(MakeConstantString(iter->first.first, ".objc_sel_name"));
838 Elements.push_back(MakeConstantString(iter->first.second,
839 ".objc_sel_types"));
Anton Korobeynikovcd5d08d2008-06-01 14:13:53 +0000840 Selectors.push_back(llvm::ConstantStruct::get(SelStructTy, Elements));
841 Elements.clear();
842 }
843 for (llvm::StringMap<llvm::GlobalAlias*>::iterator
844 iter = UntypedSelectors.begin(), iterEnd = UntypedSelectors.end();
Chris Lattneref843042008-06-26 04:10:42 +0000845 iter != iterEnd; ++iter) {
Anton Korobeynikovcd5d08d2008-06-01 14:13:53 +0000846 Elements.push_back(
Chris Lattneref843042008-06-26 04:10:42 +0000847 MakeConstantString(iter->getKeyData(), ".objc_sel_name"));
Anton Korobeynikovcd5d08d2008-06-01 14:13:53 +0000848 Elements.push_back(NULLPtr);
849 Selectors.push_back(llvm::ConstantStruct::get(SelStructTy, Elements));
850 Elements.clear();
851 }
852 Elements.push_back(NULLPtr);
853 Elements.push_back(NULLPtr);
854 Selectors.push_back(llvm::ConstantStruct::get(SelStructTy, Elements));
855 Elements.clear();
856 // Number of static selectors
857 Elements.push_back(llvm::ConstantInt::get(LongTy, Selectors.size() ));
858 llvm::Constant *SelectorList = MakeGlobal(
859 llvm::ArrayType::get(SelStructTy, Selectors.size()), Selectors,
860 ".objc_selector_list");
861 Elements.push_back(llvm::ConstantExpr::getBitCast(SelectorList, SelectorTy));
862
863 // Now that all of the static selectors exist, create pointers to them.
864 int index = 0;
865 for (std::map<TypedSelector, llvm::GlobalAlias*>::iterator
866 iter=TypedSelectors.begin(), iterEnd =TypedSelectors.end();
867 iter != iterEnd; ++iter) {
868 llvm::Constant *Idxs[] = {Zeros[0],
869 llvm::ConstantInt::get(llvm::Type::Int32Ty, index++), Zeros[0]};
870 llvm::GlobalVariable *SelPtr = new llvm::GlobalVariable(SelectorTy, true,
871 llvm::GlobalValue::InternalLinkage,
872 llvm::ConstantExpr::getGetElementPtr(SelectorList, Idxs, 2),
873 ".objc_sel_ptr", &TheModule);
874 (*iter).second->setAliasee(SelPtr);
875 }
876 for (llvm::StringMap<llvm::GlobalAlias*>::iterator
877 iter=UntypedSelectors.begin(), iterEnd = UntypedSelectors.end();
878 iter != iterEnd; iter++) {
879 llvm::Constant *Idxs[] = {Zeros[0],
880 llvm::ConstantInt::get(llvm::Type::Int32Ty, index++), Zeros[0]};
881 llvm::GlobalVariable *SelPtr = new llvm::GlobalVariable(SelectorTy, true,
882 llvm::GlobalValue::InternalLinkage,
883 llvm::ConstantExpr::getGetElementPtr(SelectorList, Idxs, 2),
884 ".objc_sel_ptr", &TheModule);
885 (*iter).second->setAliasee(SelPtr);
886 }
887 // Number of classes defined.
888 Elements.push_back(llvm::ConstantInt::get(llvm::Type::Int16Ty,
889 Classes.size()));
890 // Number of categories defined
891 Elements.push_back(llvm::ConstantInt::get(llvm::Type::Int16Ty,
892 Categories.size()));
893 // Create an array of classes, then categories, then static object instances
894 Classes.insert(Classes.end(), Categories.begin(), Categories.end());
895 // NULL-terminated list of static object instances (mainly constant strings)
896 Classes.push_back(Statics);
897 Classes.push_back(NULLPtr);
898 llvm::Constant *ClassList = llvm::ConstantArray::get(ClassListTy, Classes);
899 Elements.push_back(ClassList);
900 // Construct the symbol table
901 llvm::Constant *SymTab= MakeGlobal(SymTabTy, Elements);
902
903 // The symbol table is contained in a module which has some version-checking
904 // constants
905 llvm::StructType * ModuleTy = llvm::StructType::get(LongTy, LongTy,
906 PtrToInt8Ty, llvm::PointerType::getUnqual(SymTabTy), NULL);
907 Elements.clear();
908 // Runtime version used for compatibility checking.
909 Elements.push_back(llvm::ConstantInt::get(LongTy, RuntimeVersion));
910 //FIXME: Should be sizeof(ModuleTy)
911 Elements.push_back(llvm::ConstantInt::get(LongTy, 16));
912 //FIXME: Should be the path to the file where this module was declared
913 Elements.push_back(NULLPtr);
914 Elements.push_back(SymTab);
915 llvm::Value *Module = MakeGlobal(ModuleTy, Elements);
916
917 // Create the load function calling the runtime entry point with the module
918 // structure
919 std::vector<const llvm::Type*> VoidArgs;
920 llvm::Function * LoadFunction = llvm::Function::Create(
921 llvm::FunctionType::get(llvm::Type::VoidTy, VoidArgs, false),
922 llvm::GlobalValue::InternalLinkage, ".objc_load_function",
923 &TheModule);
924 llvm::BasicBlock *EntryBB = llvm::BasicBlock::Create("entry", LoadFunction);
Daniel Dunbard916e6e2008-11-01 01:53:16 +0000925 CGBuilderTy Builder;
Anton Korobeynikovcd5d08d2008-06-01 14:13:53 +0000926 Builder.SetInsertPoint(EntryBB);
927 llvm::Value *Register = TheModule.getOrInsertFunction("__objc_exec_class",
928 llvm::Type::VoidTy, llvm::PointerType::getUnqual(ModuleTy), NULL);
929 Builder.CreateCall(Register, Module);
930 Builder.CreateRetVoid();
931 return LoadFunction;
932}
Daniel Dunbarac93e472008-08-15 22:20:32 +0000933
934llvm::Function *CGObjCGNU::GenerateMethod(const ObjCMethodDecl *OMD) {
Daniel Dunbarac93e472008-08-15 22:20:32 +0000935 const ObjCCategoryImplDecl *OCD =
936 dyn_cast<ObjCCategoryImplDecl>(OMD->getMethodContext());
937 const std::string &CategoryName = OCD ? OCD->getName() : "";
Daniel Dunbarac93e472008-08-15 22:20:32 +0000938 const std::string &ClassName = OMD->getClassInterface()->getName();
939 const std::string &MethodName = OMD->getSelector().getName();
Daniel Dunbarac93e472008-08-15 22:20:32 +0000940 bool isClassMethod = !OMD->isInstance();
Daniel Dunbarac93e472008-08-15 22:20:32 +0000941
Daniel Dunbar3ad1f072008-09-10 04:01:49 +0000942 const llvm::FunctionType *MethodTy =
943 CGM.getTypes().GetFunctionType(CGFunctionInfo(OMD, CGM.getContext()));
Anton Korobeynikovcd5d08d2008-06-01 14:13:53 +0000944 std::string FunctionName = SymbolNameForMethod(ClassName, CategoryName,
945 MethodName, isClassMethod);
946
Gabor Greif815e2c12008-04-06 20:42:52 +0000947 llvm::Function *Method = llvm::Function::Create(MethodTy,
Chris Lattnerb326b172008-03-30 23:03:07 +0000948 llvm::GlobalValue::InternalLinkage,
Anton Korobeynikovcd5d08d2008-06-01 14:13:53 +0000949 FunctionName,
Chris Lattnerb326b172008-03-30 23:03:07 +0000950 &TheModule);
Chris Lattnerb326b172008-03-30 23:03:07 +0000951 return Method;
952}
953
Daniel Dunbarf7103722008-09-24 03:38:44 +0000954llvm::Function *CGObjCGNU::GetPropertyGetFunction() {
955 return 0;
956}
957
958llvm::Function *CGObjCGNU::GetPropertySetFunction() {
959 return 0;
960}
961
962llvm::Function *CGObjCGNU::EnumerationMutationFunction() {
Anders Carlsson58d16242008-08-31 04:05:03 +0000963 return 0;
964}
965
Anders Carlssonb01a2112008-09-09 10:04:29 +0000966void CGObjCGNU::EmitTryStmt(CodeGen::CodeGenFunction &CGF,
Daniel Dunbarf7103722008-09-24 03:38:44 +0000967 const ObjCAtTryStmt &S) {
Anders Carlssonb01a2112008-09-09 10:04:29 +0000968 CGF.ErrorUnsupported(&S, "@try statement");
969}
970
971void CGObjCGNU::EmitThrowStmt(CodeGen::CodeGenFunction &CGF,
Daniel Dunbarf7103722008-09-24 03:38:44 +0000972 const ObjCAtThrowStmt &S) {
Anders Carlssonb01a2112008-09-09 10:04:29 +0000973 CGF.ErrorUnsupported(&S, "@throw statement");
974}
975
Chris Lattnerdd978702008-11-15 21:26:17 +0000976void CGObjCGNU::EmitSynchronizedStmt(CodeGen::CodeGenFunction &CGF,
977 const ObjCAtSynchronizedStmt &S) {
978 CGF.ErrorUnsupported(&S, "@synchronized statement");
979}
980
Fariborz Jahanian252d87f2008-11-18 22:37:34 +0000981llvm::Value * CGObjCGNU::EmitObjCWeakRead(CodeGen::CodeGenFunction &CGF,
Fariborz Jahanian3305ad32008-11-18 21:45:40 +0000982 llvm::Value *AddrWeakObj)
983{
984 return 0;
985}
986
Fariborz Jahanian252d87f2008-11-18 22:37:34 +0000987void CGObjCGNU::EmitObjCWeakAssign(CodeGen::CodeGenFunction &CGF,
988 llvm::Value *src, llvm::Value *dst)
989{
990 return;
991}
992
Fariborz Jahanian17958902008-11-19 00:59:10 +0000993void CGObjCGNU::EmitObjCGlobalAssign(CodeGen::CodeGenFunction &CGF,
994 llvm::Value *src, llvm::Value *dst)
995{
996 return;
997}
998
Fariborz Jahanianf310b592008-11-20 19:23:36 +0000999void CGObjCGNU::EmitObjCIvarAssign(CodeGen::CodeGenFunction &CGF,
1000 llvm::Value *src, llvm::Value *dst)
1001{
1002 return;
1003}
1004
Fariborz Jahanian17958902008-11-19 00:59:10 +00001005void CGObjCGNU::EmitObjCStrongCastAssign(CodeGen::CodeGenFunction &CGF,
1006 llvm::Value *src, llvm::Value *dst)
1007{
1008 return;
1009}
1010
Daniel Dunbar8c85fac2008-08-11 02:45:11 +00001011CodeGen::CGObjCRuntime *CodeGen::CreateGNUObjCRuntime(CodeGen::CodeGenModule &CGM){
Chris Lattner547907c2008-06-26 04:19:03 +00001012 return new CGObjCGNU(CGM);
Chris Lattnera0fd5ee2008-03-01 08:50:34 +00001013}