| //===------- CGObjCMac.cpp - Interface to Apple Objective-C Runtime -------===// |
| // |
| // The LLVM Compiler Infrastructure |
| // |
| // This file is distributed under the University of Illinois Open Source |
| // License. See LICENSE.TXT for details. |
| // |
| //===----------------------------------------------------------------------===// |
| // |
| // This provides Objective-C code generation targeting the Apple runtime. |
| // |
| //===----------------------------------------------------------------------===// |
| |
| #include "CGObjCRuntime.h" |
| |
| #include "CGRecordLayout.h" |
| #include "CodeGenModule.h" |
| #include "CodeGenFunction.h" |
| #include "CGBlocks.h" |
| #include "CGCleanup.h" |
| #include "clang/AST/ASTContext.h" |
| #include "clang/AST/Decl.h" |
| #include "clang/AST/DeclObjC.h" |
| #include "clang/AST/RecordLayout.h" |
| #include "clang/AST/StmtObjC.h" |
| #include "clang/Basic/LangOptions.h" |
| #include "clang/Frontend/CodeGenOptions.h" |
| |
| #include "llvm/InlineAsm.h" |
| #include "llvm/IntrinsicInst.h" |
| #include "llvm/LLVMContext.h" |
| #include "llvm/Module.h" |
| #include "llvm/ADT/DenseSet.h" |
| #include "llvm/ADT/SetVector.h" |
| #include "llvm/ADT/SmallString.h" |
| #include "llvm/ADT/SmallPtrSet.h" |
| #include "llvm/Support/CallSite.h" |
| #include "llvm/Support/raw_ostream.h" |
| #include "llvm/Target/TargetData.h" |
| #include <cstdio> |
| |
| using namespace clang; |
| using namespace CodeGen; |
| |
| |
| namespace { |
| |
| typedef std::vector<llvm::Constant*> ConstantVector; |
| |
| // FIXME: We should find a nicer way to make the labels for metadata, string |
| // concatenation is lame. |
| |
| class ObjCCommonTypesHelper { |
| protected: |
| llvm::LLVMContext &VMContext; |
| |
| private: |
| // The types of these functions don't really matter because we |
| // should always bitcast before calling them. |
| |
| /// id objc_msgSend (id, SEL, ...) |
| /// |
| /// The default messenger, used for sends whose ABI is unchanged from |
| /// the all-integer/pointer case. |
| llvm::Constant *getMessageSendFn() const { |
| // Add the non-lazy-bind attribute, since objc_msgSend is likely to |
| // be called a lot. |
| llvm::Type *params[] = { ObjectPtrTy, SelectorPtrTy }; |
| return CGM.CreateRuntimeFunction(llvm::FunctionType::get(ObjectPtrTy, |
| params, true), |
| "objc_msgSend", |
| llvm::Attribute::NonLazyBind); |
| } |
| |
| /// void objc_msgSend_stret (id, SEL, ...) |
| /// |
| /// The messenger used when the return value is an aggregate returned |
| /// by indirect reference in the first argument, and therefore the |
| /// self and selector parameters are shifted over by one. |
| llvm::Constant *getMessageSendStretFn() const { |
| llvm::Type *params[] = { ObjectPtrTy, SelectorPtrTy }; |
| return CGM.CreateRuntimeFunction(llvm::FunctionType::get(CGM.VoidTy, |
| params, true), |
| "objc_msgSend_stret"); |
| |
| } |
| |
| /// [double | long double] objc_msgSend_fpret(id self, SEL op, ...) |
| /// |
| /// The messenger used when the return value is returned on the x87 |
| /// floating-point stack; without a special entrypoint, the nil case |
| /// would be unbalanced. |
| llvm::Constant *getMessageSendFpretFn() const { |
| llvm::Type *params[] = { ObjectPtrTy, SelectorPtrTy }; |
| return CGM.CreateRuntimeFunction(llvm::FunctionType::get( |
| llvm::Type::getDoubleTy(VMContext), |
| params, true), |
| "objc_msgSend_fpret"); |
| |
| } |
| |
| /// id objc_msgSendSuper(struct objc_super *super, SEL op, ...) |
| /// |
| /// The messenger used for super calls, which have different dispatch |
| /// semantics. The class passed is the superclass of the current |
| /// class. |
| llvm::Constant *getMessageSendSuperFn() const { |
| llvm::Type *params[] = { SuperPtrTy, SelectorPtrTy }; |
| return CGM.CreateRuntimeFunction(llvm::FunctionType::get(ObjectPtrTy, |
| params, true), |
| "objc_msgSendSuper"); |
| } |
| |
| /// id objc_msgSendSuper2(struct objc_super *super, SEL op, ...) |
| /// |
| /// A slightly different messenger used for super calls. The class |
| /// passed is the current class. |
| llvm::Constant *getMessageSendSuperFn2() const { |
| llvm::Type *params[] = { SuperPtrTy, SelectorPtrTy }; |
| return CGM.CreateRuntimeFunction(llvm::FunctionType::get(ObjectPtrTy, |
| params, true), |
| "objc_msgSendSuper2"); |
| } |
| |
| /// void objc_msgSendSuper_stret(void *stretAddr, struct objc_super *super, |
| /// SEL op, ...) |
| /// |
| /// The messenger used for super calls which return an aggregate indirectly. |
| llvm::Constant *getMessageSendSuperStretFn() const { |
| llvm::Type *params[] = { Int8PtrTy, SuperPtrTy, SelectorPtrTy }; |
| return CGM.CreateRuntimeFunction( |
| llvm::FunctionType::get(CGM.VoidTy, params, true), |
| "objc_msgSendSuper_stret"); |
| } |
| |
| /// void objc_msgSendSuper2_stret(void * stretAddr, struct objc_super *super, |
| /// SEL op, ...) |
| /// |
| /// objc_msgSendSuper_stret with the super2 semantics. |
| llvm::Constant *getMessageSendSuperStretFn2() const { |
| llvm::Type *params[] = { Int8PtrTy, SuperPtrTy, SelectorPtrTy }; |
| return CGM.CreateRuntimeFunction( |
| llvm::FunctionType::get(CGM.VoidTy, params, true), |
| "objc_msgSendSuper2_stret"); |
| } |
| |
| llvm::Constant *getMessageSendSuperFpretFn() const { |
| // There is no objc_msgSendSuper_fpret? How can that work? |
| return getMessageSendSuperFn(); |
| } |
| |
| llvm::Constant *getMessageSendSuperFpretFn2() const { |
| // There is no objc_msgSendSuper_fpret? How can that work? |
| return getMessageSendSuperFn2(); |
| } |
| |
| protected: |
| CodeGen::CodeGenModule &CGM; |
| |
| public: |
| llvm::Type *ShortTy, *IntTy, *LongTy, *LongLongTy; |
| llvm::Type *Int8PtrTy; |
| |
| /// ObjectPtrTy - LLVM type for object handles (typeof(id)) |
| llvm::Type *ObjectPtrTy; |
| |
| /// PtrObjectPtrTy - LLVM type for id * |
| llvm::Type *PtrObjectPtrTy; |
| |
| /// SelectorPtrTy - LLVM type for selector handles (typeof(SEL)) |
| llvm::Type *SelectorPtrTy; |
| /// ProtocolPtrTy - LLVM type for external protocol handles |
| /// (typeof(Protocol)) |
| llvm::Type *ExternalProtocolPtrTy; |
| |
| // SuperCTy - clang type for struct objc_super. |
| QualType SuperCTy; |
| // SuperPtrCTy - clang type for struct objc_super *. |
| QualType SuperPtrCTy; |
| |
| /// SuperTy - LLVM type for struct objc_super. |
| llvm::StructType *SuperTy; |
| /// SuperPtrTy - LLVM type for struct objc_super *. |
| llvm::Type *SuperPtrTy; |
| |
| /// PropertyTy - LLVM type for struct objc_property (struct _prop_t |
| /// in GCC parlance). |
| llvm::StructType *PropertyTy; |
| |
| /// PropertyListTy - LLVM type for struct objc_property_list |
| /// (_prop_list_t in GCC parlance). |
| llvm::StructType *PropertyListTy; |
| /// PropertyListPtrTy - LLVM type for struct objc_property_list*. |
| llvm::Type *PropertyListPtrTy; |
| |
| // MethodTy - LLVM type for struct objc_method. |
| llvm::StructType *MethodTy; |
| |
| /// CacheTy - LLVM type for struct objc_cache. |
| llvm::Type *CacheTy; |
| /// CachePtrTy - LLVM type for struct objc_cache *. |
| llvm::Type *CachePtrTy; |
| |
| llvm::Constant *getGetPropertyFn() { |
| CodeGen::CodeGenTypes &Types = CGM.getTypes(); |
| ASTContext &Ctx = CGM.getContext(); |
| // id objc_getProperty (id, SEL, ptrdiff_t, bool) |
| llvm::SmallVector<CanQualType,4> Params; |
| CanQualType IdType = Ctx.getCanonicalParamType(Ctx.getObjCIdType()); |
| CanQualType SelType = Ctx.getCanonicalParamType(Ctx.getObjCSelType()); |
| Params.push_back(IdType); |
| Params.push_back(SelType); |
| Params.push_back(Ctx.getPointerDiffType()->getCanonicalTypeUnqualified()); |
| Params.push_back(Ctx.BoolTy); |
| llvm::FunctionType *FTy = |
| Types.GetFunctionType(Types.getFunctionInfo(IdType, Params, |
| FunctionType::ExtInfo()), |
| false); |
| return CGM.CreateRuntimeFunction(FTy, "objc_getProperty"); |
| } |
| |
| llvm::Constant *getSetPropertyFn() { |
| CodeGen::CodeGenTypes &Types = CGM.getTypes(); |
| ASTContext &Ctx = CGM.getContext(); |
| // void objc_setProperty (id, SEL, ptrdiff_t, id, bool, bool) |
| llvm::SmallVector<CanQualType,6> Params; |
| CanQualType IdType = Ctx.getCanonicalParamType(Ctx.getObjCIdType()); |
| CanQualType SelType = Ctx.getCanonicalParamType(Ctx.getObjCSelType()); |
| Params.push_back(IdType); |
| Params.push_back(SelType); |
| Params.push_back(Ctx.getPointerDiffType()->getCanonicalTypeUnqualified()); |
| Params.push_back(IdType); |
| Params.push_back(Ctx.BoolTy); |
| Params.push_back(Ctx.BoolTy); |
| llvm::FunctionType *FTy = |
| Types.GetFunctionType(Types.getFunctionInfo(Ctx.VoidTy, Params, |
| FunctionType::ExtInfo()), |
| false); |
| return CGM.CreateRuntimeFunction(FTy, "objc_setProperty"); |
| } |
| |
| |
| llvm::Constant *getCopyStructFn() { |
| CodeGen::CodeGenTypes &Types = CGM.getTypes(); |
| ASTContext &Ctx = CGM.getContext(); |
| // void objc_copyStruct (void *, const void *, size_t, bool, bool) |
| llvm::SmallVector<CanQualType,5> Params; |
| Params.push_back(Ctx.VoidPtrTy); |
| Params.push_back(Ctx.VoidPtrTy); |
| Params.push_back(Ctx.LongTy); |
| Params.push_back(Ctx.BoolTy); |
| Params.push_back(Ctx.BoolTy); |
| llvm::FunctionType *FTy = |
| Types.GetFunctionType(Types.getFunctionInfo(Ctx.VoidTy, Params, |
| FunctionType::ExtInfo()), |
| false); |
| return CGM.CreateRuntimeFunction(FTy, "objc_copyStruct"); |
| } |
| |
| llvm::Constant *getEnumerationMutationFn() { |
| CodeGen::CodeGenTypes &Types = CGM.getTypes(); |
| ASTContext &Ctx = CGM.getContext(); |
| // void objc_enumerationMutation (id) |
| llvm::SmallVector<CanQualType,1> Params; |
| Params.push_back(Ctx.getCanonicalParamType(Ctx.getObjCIdType())); |
| llvm::FunctionType *FTy = |
| Types.GetFunctionType(Types.getFunctionInfo(Ctx.VoidTy, Params, |
| FunctionType::ExtInfo()), |
| false); |
| return CGM.CreateRuntimeFunction(FTy, "objc_enumerationMutation"); |
| } |
| |
| /// GcReadWeakFn -- LLVM objc_read_weak (id *src) function. |
| llvm::Constant *getGcReadWeakFn() { |
| // id objc_read_weak (id *) |
| llvm::Type *args[] = { ObjectPtrTy->getPointerTo() }; |
| llvm::FunctionType *FTy = |
| llvm::FunctionType::get(ObjectPtrTy, args, false); |
| return CGM.CreateRuntimeFunction(FTy, "objc_read_weak"); |
| } |
| |
| /// GcAssignWeakFn -- LLVM objc_assign_weak function. |
| llvm::Constant *getGcAssignWeakFn() { |
| // id objc_assign_weak (id, id *) |
| llvm::Type *args[] = { ObjectPtrTy, ObjectPtrTy->getPointerTo() }; |
| llvm::FunctionType *FTy = |
| llvm::FunctionType::get(ObjectPtrTy, args, false); |
| return CGM.CreateRuntimeFunction(FTy, "objc_assign_weak"); |
| } |
| |
| /// GcAssignGlobalFn -- LLVM objc_assign_global function. |
| llvm::Constant *getGcAssignGlobalFn() { |
| // id objc_assign_global(id, id *) |
| llvm::Type *args[] = { ObjectPtrTy, ObjectPtrTy->getPointerTo() }; |
| llvm::FunctionType *FTy = |
| llvm::FunctionType::get(ObjectPtrTy, args, false); |
| return CGM.CreateRuntimeFunction(FTy, "objc_assign_global"); |
| } |
| |
| /// GcAssignThreadLocalFn -- LLVM objc_assign_threadlocal function. |
| llvm::Constant *getGcAssignThreadLocalFn() { |
| // id objc_assign_threadlocal(id src, id * dest) |
| llvm::Type *args[] = { ObjectPtrTy, ObjectPtrTy->getPointerTo() }; |
| llvm::FunctionType *FTy = |
| llvm::FunctionType::get(ObjectPtrTy, args, false); |
| return CGM.CreateRuntimeFunction(FTy, "objc_assign_threadlocal"); |
| } |
| |
| /// GcAssignIvarFn -- LLVM objc_assign_ivar function. |
| llvm::Constant *getGcAssignIvarFn() { |
| // id objc_assign_ivar(id, id *, ptrdiff_t) |
| llvm::Type *args[] = { ObjectPtrTy, ObjectPtrTy->getPointerTo(), |
| CGM.PtrDiffTy }; |
| llvm::FunctionType *FTy = |
| llvm::FunctionType::get(ObjectPtrTy, args, false); |
| return CGM.CreateRuntimeFunction(FTy, "objc_assign_ivar"); |
| } |
| |
| /// GcMemmoveCollectableFn -- LLVM objc_memmove_collectable function. |
| llvm::Constant *GcMemmoveCollectableFn() { |
| // void *objc_memmove_collectable(void *dst, const void *src, size_t size) |
| llvm::Type *args[] = { Int8PtrTy, Int8PtrTy, LongTy }; |
| llvm::FunctionType *FTy = llvm::FunctionType::get(Int8PtrTy, args, false); |
| return CGM.CreateRuntimeFunction(FTy, "objc_memmove_collectable"); |
| } |
| |
| /// GcAssignStrongCastFn -- LLVM objc_assign_strongCast function. |
| llvm::Constant *getGcAssignStrongCastFn() { |
| // id objc_assign_strongCast(id, id *) |
| llvm::Type *args[] = { ObjectPtrTy, ObjectPtrTy->getPointerTo() }; |
| llvm::FunctionType *FTy = |
| llvm::FunctionType::get(ObjectPtrTy, args, false); |
| return CGM.CreateRuntimeFunction(FTy, "objc_assign_strongCast"); |
| } |
| |
| /// ExceptionThrowFn - LLVM objc_exception_throw function. |
| llvm::Constant *getExceptionThrowFn() { |
| // void objc_exception_throw(id) |
| llvm::Type *args[] = { ObjectPtrTy }; |
| llvm::FunctionType *FTy = |
| llvm::FunctionType::get(CGM.VoidTy, args, false); |
| return CGM.CreateRuntimeFunction(FTy, "objc_exception_throw"); |
| } |
| |
| /// ExceptionRethrowFn - LLVM objc_exception_rethrow function. |
| llvm::Constant *getExceptionRethrowFn() { |
| // void objc_exception_rethrow(void) |
| llvm::FunctionType *FTy = llvm::FunctionType::get(CGM.VoidTy, false); |
| return CGM.CreateRuntimeFunction(FTy, "objc_exception_rethrow"); |
| } |
| |
| /// SyncEnterFn - LLVM object_sync_enter function. |
| llvm::Constant *getSyncEnterFn() { |
| // void objc_sync_enter (id) |
| llvm::Type *args[] = { ObjectPtrTy }; |
| llvm::FunctionType *FTy = |
| llvm::FunctionType::get(CGM.VoidTy, args, false); |
| return CGM.CreateRuntimeFunction(FTy, "objc_sync_enter"); |
| } |
| |
| /// SyncExitFn - LLVM object_sync_exit function. |
| llvm::Constant *getSyncExitFn() { |
| // void objc_sync_exit (id) |
| llvm::Type *args[] = { ObjectPtrTy }; |
| llvm::FunctionType *FTy = |
| llvm::FunctionType::get(CGM.VoidTy, args, false); |
| return CGM.CreateRuntimeFunction(FTy, "objc_sync_exit"); |
| } |
| |
| llvm::Constant *getSendFn(bool IsSuper) const { |
| return IsSuper ? getMessageSendSuperFn() : getMessageSendFn(); |
| } |
| |
| llvm::Constant *getSendFn2(bool IsSuper) const { |
| return IsSuper ? getMessageSendSuperFn2() : getMessageSendFn(); |
| } |
| |
| llvm::Constant *getSendStretFn(bool IsSuper) const { |
| return IsSuper ? getMessageSendSuperStretFn() : getMessageSendStretFn(); |
| } |
| |
| llvm::Constant *getSendStretFn2(bool IsSuper) const { |
| return IsSuper ? getMessageSendSuperStretFn2() : getMessageSendStretFn(); |
| } |
| |
| llvm::Constant *getSendFpretFn(bool IsSuper) const { |
| return IsSuper ? getMessageSendSuperFpretFn() : getMessageSendFpretFn(); |
| } |
| |
| llvm::Constant *getSendFpretFn2(bool IsSuper) const { |
| return IsSuper ? getMessageSendSuperFpretFn2() : getMessageSendFpretFn(); |
| } |
| |
| ObjCCommonTypesHelper(CodeGen::CodeGenModule &cgm); |
| ~ObjCCommonTypesHelper(){} |
| }; |
| |
| /// ObjCTypesHelper - Helper class that encapsulates lazy |
| /// construction of varies types used during ObjC generation. |
| class ObjCTypesHelper : public ObjCCommonTypesHelper { |
| public: |
| /// SymtabTy - LLVM type for struct objc_symtab. |
| llvm::StructType *SymtabTy; |
| /// SymtabPtrTy - LLVM type for struct objc_symtab *. |
| llvm::Type *SymtabPtrTy; |
| /// ModuleTy - LLVM type for struct objc_module. |
| llvm::StructType *ModuleTy; |
| |
| /// ProtocolTy - LLVM type for struct objc_protocol. |
| llvm::StructType *ProtocolTy; |
| /// ProtocolPtrTy - LLVM type for struct objc_protocol *. |
| llvm::Type *ProtocolPtrTy; |
| /// ProtocolExtensionTy - LLVM type for struct |
| /// objc_protocol_extension. |
| llvm::StructType *ProtocolExtensionTy; |
| /// ProtocolExtensionTy - LLVM type for struct |
| /// objc_protocol_extension *. |
| llvm::Type *ProtocolExtensionPtrTy; |
| /// MethodDescriptionTy - LLVM type for struct |
| /// objc_method_description. |
| llvm::StructType *MethodDescriptionTy; |
| /// MethodDescriptionListTy - LLVM type for struct |
| /// objc_method_description_list. |
| llvm::StructType *MethodDescriptionListTy; |
| /// MethodDescriptionListPtrTy - LLVM type for struct |
| /// objc_method_description_list *. |
| llvm::Type *MethodDescriptionListPtrTy; |
| /// ProtocolListTy - LLVM type for struct objc_property_list. |
| llvm::StructType *ProtocolListTy; |
| /// ProtocolListPtrTy - LLVM type for struct objc_property_list*. |
| llvm::Type *ProtocolListPtrTy; |
| /// CategoryTy - LLVM type for struct objc_category. |
| llvm::StructType *CategoryTy; |
| /// ClassTy - LLVM type for struct objc_class. |
| llvm::StructType *ClassTy; |
| /// ClassPtrTy - LLVM type for struct objc_class *. |
| llvm::Type *ClassPtrTy; |
| /// ClassExtensionTy - LLVM type for struct objc_class_ext. |
| llvm::StructType *ClassExtensionTy; |
| /// ClassExtensionPtrTy - LLVM type for struct objc_class_ext *. |
| llvm::Type *ClassExtensionPtrTy; |
| // IvarTy - LLVM type for struct objc_ivar. |
| llvm::StructType *IvarTy; |
| /// IvarListTy - LLVM type for struct objc_ivar_list. |
| llvm::Type *IvarListTy; |
| /// IvarListPtrTy - LLVM type for struct objc_ivar_list *. |
| llvm::Type *IvarListPtrTy; |
| /// MethodListTy - LLVM type for struct objc_method_list. |
| llvm::Type *MethodListTy; |
| /// MethodListPtrTy - LLVM type for struct objc_method_list *. |
| llvm::Type *MethodListPtrTy; |
| |
| /// ExceptionDataTy - LLVM type for struct _objc_exception_data. |
| llvm::Type *ExceptionDataTy; |
| |
| /// ExceptionTryEnterFn - LLVM objc_exception_try_enter function. |
| llvm::Constant *getExceptionTryEnterFn() { |
| llvm::Type *params[] = { ExceptionDataTy->getPointerTo() }; |
| return CGM.CreateRuntimeFunction( |
| llvm::FunctionType::get(CGM.VoidTy, params, false), |
| "objc_exception_try_enter"); |
| } |
| |
| /// ExceptionTryExitFn - LLVM objc_exception_try_exit function. |
| llvm::Constant *getExceptionTryExitFn() { |
| llvm::Type *params[] = { ExceptionDataTy->getPointerTo() }; |
| return CGM.CreateRuntimeFunction( |
| llvm::FunctionType::get(CGM.VoidTy, params, false), |
| "objc_exception_try_exit"); |
| } |
| |
| /// ExceptionExtractFn - LLVM objc_exception_extract function. |
| llvm::Constant *getExceptionExtractFn() { |
| llvm::Type *params[] = { ExceptionDataTy->getPointerTo() }; |
| return CGM.CreateRuntimeFunction(llvm::FunctionType::get(ObjectPtrTy, |
| params, false), |
| "objc_exception_extract"); |
| } |
| |
| /// ExceptionMatchFn - LLVM objc_exception_match function. |
| llvm::Constant *getExceptionMatchFn() { |
| llvm::Type *params[] = { ClassPtrTy, ObjectPtrTy }; |
| return CGM.CreateRuntimeFunction( |
| llvm::FunctionType::get(CGM.Int32Ty, params, false), |
| "objc_exception_match"); |
| |
| } |
| |
| /// SetJmpFn - LLVM _setjmp function. |
| llvm::Constant *getSetJmpFn() { |
| // This is specifically the prototype for x86. |
| llvm::Type *params[] = { CGM.Int32Ty->getPointerTo() }; |
| return CGM.CreateRuntimeFunction(llvm::FunctionType::get(CGM.Int32Ty, |
| params, false), |
| "_setjmp"); |
| } |
| |
| public: |
| ObjCTypesHelper(CodeGen::CodeGenModule &cgm); |
| ~ObjCTypesHelper() {} |
| }; |
| |
| /// ObjCNonFragileABITypesHelper - will have all types needed by objective-c's |
| /// modern abi |
| class ObjCNonFragileABITypesHelper : public ObjCCommonTypesHelper { |
| public: |
| |
| // MethodListnfABITy - LLVM for struct _method_list_t |
| llvm::StructType *MethodListnfABITy; |
| |
| // MethodListnfABIPtrTy - LLVM for struct _method_list_t* |
| llvm::Type *MethodListnfABIPtrTy; |
| |
| // ProtocolnfABITy = LLVM for struct _protocol_t |
| llvm::StructType *ProtocolnfABITy; |
| |
| // ProtocolnfABIPtrTy = LLVM for struct _protocol_t* |
| llvm::Type *ProtocolnfABIPtrTy; |
| |
| // ProtocolListnfABITy - LLVM for struct _objc_protocol_list |
| llvm::StructType *ProtocolListnfABITy; |
| |
| // ProtocolListnfABIPtrTy - LLVM for struct _objc_protocol_list* |
| llvm::Type *ProtocolListnfABIPtrTy; |
| |
| // ClassnfABITy - LLVM for struct _class_t |
| llvm::StructType *ClassnfABITy; |
| |
| // ClassnfABIPtrTy - LLVM for struct _class_t* |
| llvm::Type *ClassnfABIPtrTy; |
| |
| // IvarnfABITy - LLVM for struct _ivar_t |
| llvm::StructType *IvarnfABITy; |
| |
| // IvarListnfABITy - LLVM for struct _ivar_list_t |
| llvm::StructType *IvarListnfABITy; |
| |
| // IvarListnfABIPtrTy = LLVM for struct _ivar_list_t* |
| llvm::Type *IvarListnfABIPtrTy; |
| |
| // ClassRonfABITy - LLVM for struct _class_ro_t |
| llvm::StructType *ClassRonfABITy; |
| |
| // ImpnfABITy - LLVM for id (*)(id, SEL, ...) |
| llvm::Type *ImpnfABITy; |
| |
| // CategorynfABITy - LLVM for struct _category_t |
| llvm::StructType *CategorynfABITy; |
| |
| // New types for nonfragile abi messaging. |
| |
| // MessageRefTy - LLVM for: |
| // struct _message_ref_t { |
| // IMP messenger; |
| // SEL name; |
| // }; |
| llvm::StructType *MessageRefTy; |
| // MessageRefCTy - clang type for struct _message_ref_t |
| QualType MessageRefCTy; |
| |
| // MessageRefPtrTy - LLVM for struct _message_ref_t* |
| llvm::Type *MessageRefPtrTy; |
| // MessageRefCPtrTy - clang type for struct _message_ref_t* |
| QualType MessageRefCPtrTy; |
| |
| // MessengerTy - Type of the messenger (shown as IMP above) |
| llvm::FunctionType *MessengerTy; |
| |
| // SuperMessageRefTy - LLVM for: |
| // struct _super_message_ref_t { |
| // SUPER_IMP messenger; |
| // SEL name; |
| // }; |
| llvm::StructType *SuperMessageRefTy; |
| |
| // SuperMessageRefPtrTy - LLVM for struct _super_message_ref_t* |
| llvm::Type *SuperMessageRefPtrTy; |
| |
| llvm::Constant *getMessageSendFixupFn() { |
| // id objc_msgSend_fixup(id, struct message_ref_t*, ...) |
| llvm::Type *params[] = { ObjectPtrTy, MessageRefPtrTy }; |
| return CGM.CreateRuntimeFunction(llvm::FunctionType::get(ObjectPtrTy, |
| params, true), |
| "objc_msgSend_fixup"); |
| } |
| |
| llvm::Constant *getMessageSendFpretFixupFn() { |
| // id objc_msgSend_fpret_fixup(id, struct message_ref_t*, ...) |
| llvm::Type *params[] = { ObjectPtrTy, MessageRefPtrTy }; |
| return CGM.CreateRuntimeFunction(llvm::FunctionType::get(ObjectPtrTy, |
| params, true), |
| "objc_msgSend_fpret_fixup"); |
| } |
| |
| llvm::Constant *getMessageSendStretFixupFn() { |
| // id objc_msgSend_stret_fixup(id, struct message_ref_t*, ...) |
| llvm::Type *params[] = { ObjectPtrTy, MessageRefPtrTy }; |
| return CGM.CreateRuntimeFunction(llvm::FunctionType::get(ObjectPtrTy, |
| params, true), |
| "objc_msgSend_stret_fixup"); |
| } |
| |
| llvm::Constant *getMessageSendSuper2FixupFn() { |
| // id objc_msgSendSuper2_fixup (struct objc_super *, |
| // struct _super_message_ref_t*, ...) |
| llvm::Type *params[] = { SuperPtrTy, SuperMessageRefPtrTy }; |
| return CGM.CreateRuntimeFunction(llvm::FunctionType::get(ObjectPtrTy, |
| params, true), |
| "objc_msgSendSuper2_fixup"); |
| } |
| |
| llvm::Constant *getMessageSendSuper2StretFixupFn() { |
| // id objc_msgSendSuper2_stret_fixup(struct objc_super *, |
| // struct _super_message_ref_t*, ...) |
| llvm::Type *params[] = { SuperPtrTy, SuperMessageRefPtrTy }; |
| return CGM.CreateRuntimeFunction(llvm::FunctionType::get(ObjectPtrTy, |
| params, true), |
| "objc_msgSendSuper2_stret_fixup"); |
| } |
| |
| llvm::Constant *getObjCEndCatchFn() { |
| return CGM.CreateRuntimeFunction(llvm::FunctionType::get(CGM.VoidTy, false), |
| "objc_end_catch"); |
| |
| } |
| |
| llvm::Constant *getObjCBeginCatchFn() { |
| llvm::Type *params[] = { Int8PtrTy }; |
| return CGM.CreateRuntimeFunction(llvm::FunctionType::get(Int8PtrTy, |
| params, false), |
| "objc_begin_catch"); |
| } |
| |
| llvm::StructType *EHTypeTy; |
| llvm::Type *EHTypePtrTy; |
| |
| ObjCNonFragileABITypesHelper(CodeGen::CodeGenModule &cgm); |
| ~ObjCNonFragileABITypesHelper(){} |
| }; |
| |
| class CGObjCCommonMac : public CodeGen::CGObjCRuntime { |
| public: |
| // FIXME - accessibility |
| class GC_IVAR { |
| public: |
| unsigned ivar_bytepos; |
| unsigned ivar_size; |
| GC_IVAR(unsigned bytepos = 0, unsigned size = 0) |
| : ivar_bytepos(bytepos), ivar_size(size) {} |
| |
| // Allow sorting based on byte pos. |
| bool operator<(const GC_IVAR &b) const { |
| return ivar_bytepos < b.ivar_bytepos; |
| } |
| }; |
| |
| class SKIP_SCAN { |
| public: |
| unsigned skip; |
| unsigned scan; |
| SKIP_SCAN(unsigned _skip = 0, unsigned _scan = 0) |
| : skip(_skip), scan(_scan) {} |
| }; |
| |
| protected: |
| CodeGen::CodeGenModule &CGM; |
| llvm::LLVMContext &VMContext; |
| // FIXME! May not be needing this after all. |
| unsigned ObjCABI; |
| |
| // gc ivar layout bitmap calculation helper caches. |
| llvm::SmallVector<GC_IVAR, 16> SkipIvars; |
| llvm::SmallVector<GC_IVAR, 16> IvarsInfo; |
| |
| /// LazySymbols - Symbols to generate a lazy reference for. See |
| /// DefinedSymbols and FinishModule(). |
| llvm::SetVector<IdentifierInfo*> LazySymbols; |
| |
| /// DefinedSymbols - External symbols which are defined by this |
| /// module. The symbols in this list and LazySymbols are used to add |
| /// special linker symbols which ensure that Objective-C modules are |
| /// linked properly. |
| llvm::SetVector<IdentifierInfo*> DefinedSymbols; |
| |
| /// ClassNames - uniqued class names. |
| llvm::DenseMap<IdentifierInfo*, llvm::GlobalVariable*> ClassNames; |
| |
| /// MethodVarNames - uniqued method variable names. |
| llvm::DenseMap<Selector, llvm::GlobalVariable*> MethodVarNames; |
| |
| /// DefinedCategoryNames - list of category names in form Class_Category. |
| llvm::SetVector<std::string> DefinedCategoryNames; |
| |
| /// MethodVarTypes - uniqued method type signatures. We have to use |
| /// a StringMap here because have no other unique reference. |
| llvm::StringMap<llvm::GlobalVariable*> MethodVarTypes; |
| |
| /// MethodDefinitions - map of methods which have been defined in |
| /// this translation unit. |
| llvm::DenseMap<const ObjCMethodDecl*, llvm::Function*> MethodDefinitions; |
| |
| /// PropertyNames - uniqued method variable names. |
| llvm::DenseMap<IdentifierInfo*, llvm::GlobalVariable*> PropertyNames; |
| |
| /// ClassReferences - uniqued class references. |
| llvm::DenseMap<IdentifierInfo*, llvm::GlobalVariable*> ClassReferences; |
| |
| /// SelectorReferences - uniqued selector references. |
| llvm::DenseMap<Selector, llvm::GlobalVariable*> SelectorReferences; |
| |
| /// Protocols - Protocols for which an objc_protocol structure has |
| /// been emitted. Forward declarations are handled by creating an |
| /// empty structure whose initializer is filled in when/if defined. |
| llvm::DenseMap<IdentifierInfo*, llvm::GlobalVariable*> Protocols; |
| |
| /// DefinedProtocols - Protocols which have actually been |
| /// defined. We should not need this, see FIXME in GenerateProtocol. |
| llvm::DenseSet<IdentifierInfo*> DefinedProtocols; |
| |
| /// DefinedClasses - List of defined classes. |
| std::vector<llvm::GlobalValue*> DefinedClasses; |
| |
| /// DefinedNonLazyClasses - List of defined "non-lazy" classes. |
| std::vector<llvm::GlobalValue*> DefinedNonLazyClasses; |
| |
| /// DefinedCategories - List of defined categories. |
| std::vector<llvm::GlobalValue*> DefinedCategories; |
| |
| /// DefinedNonLazyCategories - List of defined "non-lazy" categories. |
| std::vector<llvm::GlobalValue*> DefinedNonLazyCategories; |
| |
| /// GetNameForMethod - Return a name for the given method. |
| /// \param[out] NameOut - The return value. |
| void GetNameForMethod(const ObjCMethodDecl *OMD, |
| const ObjCContainerDecl *CD, |
| llvm::SmallVectorImpl<char> &NameOut); |
| |
| /// GetMethodVarName - Return a unique constant for the given |
| /// selector's name. The return value has type char *. |
| llvm::Constant *GetMethodVarName(Selector Sel); |
| llvm::Constant *GetMethodVarName(IdentifierInfo *Ident); |
| |
| /// GetMethodVarType - Return a unique constant for the given |
| /// selector's name. The return value has type char *. |
| |
| // FIXME: This is a horrible name. |
| llvm::Constant *GetMethodVarType(const ObjCMethodDecl *D); |
| llvm::Constant *GetMethodVarType(const FieldDecl *D); |
| |
| /// GetPropertyName - Return a unique constant for the given |
| /// name. The return value has type char *. |
| llvm::Constant *GetPropertyName(IdentifierInfo *Ident); |
| |
| // FIXME: This can be dropped once string functions are unified. |
| llvm::Constant *GetPropertyTypeString(const ObjCPropertyDecl *PD, |
| const Decl *Container); |
| |
| /// GetClassName - Return a unique constant for the given selector's |
| /// name. The return value has type char *. |
| llvm::Constant *GetClassName(IdentifierInfo *Ident); |
| |
| llvm::Function *GetMethodDefinition(const ObjCMethodDecl *MD); |
| |
| /// BuildIvarLayout - Builds ivar layout bitmap for the class |
| /// implementation for the __strong or __weak case. |
| /// |
| llvm::Constant *BuildIvarLayout(const ObjCImplementationDecl *OI, |
| bool ForStrongLayout); |
| |
| llvm::Constant *BuildIvarLayoutBitmap(std::string &BitMap); |
| |
| void BuildAggrIvarRecordLayout(const RecordType *RT, |
| unsigned int BytePos, bool ForStrongLayout, |
| bool &HasUnion); |
| void BuildAggrIvarLayout(const ObjCImplementationDecl *OI, |
| const llvm::StructLayout *Layout, |
| const RecordDecl *RD, |
| const SmallVectorImpl<const FieldDecl*> &RecFields, |
| unsigned int BytePos, bool ForStrongLayout, |
| bool &HasUnion); |
| |
| /// GetIvarLayoutName - Returns a unique constant for the given |
| /// ivar layout bitmap. |
| llvm::Constant *GetIvarLayoutName(IdentifierInfo *Ident, |
| const ObjCCommonTypesHelper &ObjCTypes); |
| |
| /// EmitPropertyList - Emit the given property list. The return |
| /// value has type PropertyListPtrTy. |
| llvm::Constant *EmitPropertyList(llvm::Twine Name, |
| const Decl *Container, |
| const ObjCContainerDecl *OCD, |
| const ObjCCommonTypesHelper &ObjCTypes); |
| |
| /// PushProtocolProperties - Push protocol's property on the input stack. |
| void PushProtocolProperties(llvm::SmallPtrSet<const IdentifierInfo*, 16> &PropertySet, |
| std::vector<llvm::Constant*> &Properties, |
| const Decl *Container, |
| const ObjCProtocolDecl *PROTO, |
| const ObjCCommonTypesHelper &ObjCTypes); |
| |
| /// GetProtocolRef - Return a reference to the internal protocol |
| /// description, creating an empty one if it has not been |
| /// defined. The return value has type ProtocolPtrTy. |
| llvm::Constant *GetProtocolRef(const ObjCProtocolDecl *PD); |
| |
| /// CreateMetadataVar - Create a global variable with internal |
| /// linkage for use by the Objective-C runtime. |
| /// |
| /// This is a convenience wrapper which not only creates the |
| /// variable, but also sets the section and alignment and adds the |
| /// global to the "llvm.used" list. |
| /// |
| /// \param Name - The variable name. |
| /// \param Init - The variable initializer; this is also used to |
| /// define the type of the variable. |
| /// \param Section - The section the variable should go into, or 0. |
| /// \param Align - The alignment for the variable, or 0. |
| /// \param AddToUsed - Whether the variable should be added to |
| /// "llvm.used". |
| llvm::GlobalVariable *CreateMetadataVar(llvm::Twine Name, |
| llvm::Constant *Init, |
| const char *Section, |
| unsigned Align, |
| bool AddToUsed); |
| |
| CodeGen::RValue EmitMessageSend(CodeGen::CodeGenFunction &CGF, |
| ReturnValueSlot Return, |
| QualType ResultType, |
| llvm::Value *Sel, |
| llvm::Value *Arg0, |
| QualType Arg0Ty, |
| bool IsSuper, |
| const CallArgList &CallArgs, |
| const ObjCMethodDecl *OMD, |
| const ObjCCommonTypesHelper &ObjCTypes); |
| |
| /// EmitImageInfo - Emit the image info marker used to encode some module |
| /// level information. |
| void EmitImageInfo(); |
| |
| public: |
| CGObjCCommonMac(CodeGen::CodeGenModule &cgm) : |
| CGM(cgm), VMContext(cgm.getLLVMContext()) { } |
| |
| virtual llvm::Constant *GenerateConstantString(const StringLiteral *SL); |
| |
| virtual llvm::Function *GenerateMethod(const ObjCMethodDecl *OMD, |
| const ObjCContainerDecl *CD=0); |
| |
| virtual void GenerateProtocol(const ObjCProtocolDecl *PD); |
| |
| /// GetOrEmitProtocol - Get the protocol object for the given |
| /// declaration, emitting it if necessary. The return value has type |
| /// ProtocolPtrTy. |
| virtual llvm::Constant *GetOrEmitProtocol(const ObjCProtocolDecl *PD)=0; |
| |
| /// GetOrEmitProtocolRef - Get a forward reference to the protocol |
| /// object for the given declaration, emitting it if needed. These |
| /// forward references will be filled in with empty bodies if no |
| /// definition is seen. The return value has type ProtocolPtrTy. |
| virtual llvm::Constant *GetOrEmitProtocolRef(const ObjCProtocolDecl *PD)=0; |
| virtual llvm::Constant *BuildGCBlockLayout(CodeGen::CodeGenModule &CGM, |
| const CGBlockInfo &blockInfo); |
| |
| }; |
| |
| class CGObjCMac : public CGObjCCommonMac { |
| private: |
| ObjCTypesHelper ObjCTypes; |
| |
| /// EmitModuleInfo - Another marker encoding module level |
| /// information. |
| void EmitModuleInfo(); |
| |
| /// EmitModuleSymols - Emit module symbols, the list of defined |
| /// classes and categories. The result has type SymtabPtrTy. |
| llvm::Constant *EmitModuleSymbols(); |
| |
| /// FinishModule - Write out global data structures at the end of |
| /// processing a translation unit. |
| void FinishModule(); |
| |
| /// EmitClassExtension - Generate the class extension structure used |
| /// to store the weak ivar layout and properties. The return value |
| /// has type ClassExtensionPtrTy. |
| llvm::Constant *EmitClassExtension(const ObjCImplementationDecl *ID); |
| |
| /// EmitClassRef - Return a Value*, of type ObjCTypes.ClassPtrTy, |
| /// for the given class. |
| llvm::Value *EmitClassRef(CGBuilderTy &Builder, |
| const ObjCInterfaceDecl *ID); |
| |
| llvm::Value *EmitClassRefFromId(CGBuilderTy &Builder, |
| IdentifierInfo *II); |
| |
| llvm::Value *EmitNSAutoreleasePoolClassRef(CGBuilderTy &Builder); |
| |
| /// EmitSuperClassRef - Emits reference to class's main metadata class. |
| llvm::Value *EmitSuperClassRef(const ObjCInterfaceDecl *ID); |
| |
| /// EmitIvarList - Emit the ivar list for the given |
| /// implementation. If ForClass is true the list of class ivars |
| /// (i.e. metaclass ivars) is emitted, otherwise the list of |
| /// interface ivars will be emitted. The return value has type |
| /// IvarListPtrTy. |
| llvm::Constant *EmitIvarList(const ObjCImplementationDecl *ID, |
| bool ForClass); |
| |
| /// EmitMetaClass - Emit a forward reference to the class structure |
| /// for the metaclass of the given interface. The return value has |
| /// type ClassPtrTy. |
| llvm::Constant *EmitMetaClassRef(const ObjCInterfaceDecl *ID); |
| |
| /// EmitMetaClass - Emit a class structure for the metaclass of the |
| /// given implementation. The return value has type ClassPtrTy. |
| llvm::Constant *EmitMetaClass(const ObjCImplementationDecl *ID, |
| llvm::Constant *Protocols, |
| const ConstantVector &Methods); |
| |
| llvm::Constant *GetMethodConstant(const ObjCMethodDecl *MD); |
| |
| llvm::Constant *GetMethodDescriptionConstant(const ObjCMethodDecl *MD); |
| |
| /// EmitMethodList - Emit the method list for the given |
| /// implementation. The return value has type MethodListPtrTy. |
| llvm::Constant *EmitMethodList(llvm::Twine Name, |
| const char *Section, |
| const ConstantVector &Methods); |
| |
| /// EmitMethodDescList - Emit a method description list for a list of |
| /// method declarations. |
| /// - TypeName: The name for the type containing the methods. |
| /// - IsProtocol: True iff these methods are for a protocol. |
| /// - ClassMethds: True iff these are class methods. |
| /// - Required: When true, only "required" methods are |
| /// listed. Similarly, when false only "optional" methods are |
| /// listed. For classes this should always be true. |
| /// - begin, end: The method list to output. |
| /// |
| /// The return value has type MethodDescriptionListPtrTy. |
| llvm::Constant *EmitMethodDescList(llvm::Twine Name, |
| const char *Section, |
| const ConstantVector &Methods); |
| |
| /// GetOrEmitProtocol - Get the protocol object for the given |
| /// declaration, emitting it if necessary. The return value has type |
| /// ProtocolPtrTy. |
| virtual llvm::Constant *GetOrEmitProtocol(const ObjCProtocolDecl *PD); |
| |
| /// GetOrEmitProtocolRef - Get a forward reference to the protocol |
| /// object for the given declaration, emitting it if needed. These |
| /// forward references will be filled in with empty bodies if no |
| /// definition is seen. The return value has type ProtocolPtrTy. |
| virtual llvm::Constant *GetOrEmitProtocolRef(const ObjCProtocolDecl *PD); |
| |
| /// EmitProtocolExtension - Generate the protocol extension |
| /// structure used to store optional instance and class methods, and |
| /// protocol properties. The return value has type |
| /// ProtocolExtensionPtrTy. |
| llvm::Constant * |
| EmitProtocolExtension(const ObjCProtocolDecl *PD, |
| const ConstantVector &OptInstanceMethods, |
| const ConstantVector &OptClassMethods); |
| |
| /// EmitProtocolList - Generate the list of referenced |
| /// protocols. The return value has type ProtocolListPtrTy. |
| llvm::Constant *EmitProtocolList(llvm::Twine Name, |
| ObjCProtocolDecl::protocol_iterator begin, |
| ObjCProtocolDecl::protocol_iterator end); |
| |
| /// EmitSelector - Return a Value*, of type ObjCTypes.SelectorPtrTy, |
| /// for the given selector. |
| llvm::Value *EmitSelector(CGBuilderTy &Builder, Selector Sel, |
| bool lval=false); |
| |
| public: |
| CGObjCMac(CodeGen::CodeGenModule &cgm); |
| |
| virtual llvm::Function *ModuleInitFunction(); |
| |
| virtual CodeGen::RValue GenerateMessageSend(CodeGen::CodeGenFunction &CGF, |
| ReturnValueSlot Return, |
| QualType ResultType, |
| Selector Sel, |
| llvm::Value *Receiver, |
| const CallArgList &CallArgs, |
| const ObjCInterfaceDecl *Class, |
| const ObjCMethodDecl *Method); |
| |
| virtual CodeGen::RValue |
| GenerateMessageSendSuper(CodeGen::CodeGenFunction &CGF, |
| ReturnValueSlot Return, |
| QualType ResultType, |
| Selector Sel, |
| const ObjCInterfaceDecl *Class, |
| bool isCategoryImpl, |
| llvm::Value *Receiver, |
| bool IsClassMessage, |
| const CallArgList &CallArgs, |
| const ObjCMethodDecl *Method); |
| |
| virtual llvm::Value *GetClass(CGBuilderTy &Builder, |
| const ObjCInterfaceDecl *ID); |
| |
| virtual llvm::Value *GetSelector(CGBuilderTy &Builder, Selector Sel, |
| bool lval = false); |
| |
| /// The NeXT/Apple runtimes do not support typed selectors; just emit an |
| /// untyped one. |
| virtual llvm::Value *GetSelector(CGBuilderTy &Builder, |
| const ObjCMethodDecl *Method); |
| |
| virtual llvm::Constant *GetEHType(QualType T); |
| |
| virtual void GenerateCategory(const ObjCCategoryImplDecl *CMD); |
| |
| virtual void GenerateClass(const ObjCImplementationDecl *ClassDecl); |
| |
| virtual llvm::Value *GenerateProtocolRef(CGBuilderTy &Builder, |
| const ObjCProtocolDecl *PD); |
| |
| virtual llvm::Constant *GetPropertyGetFunction(); |
| virtual llvm::Constant *GetPropertySetFunction(); |
| virtual llvm::Constant *GetGetStructFunction(); |
| virtual llvm::Constant *GetSetStructFunction(); |
| virtual llvm::Constant *EnumerationMutationFunction(); |
| |
| virtual void EmitTryStmt(CodeGen::CodeGenFunction &CGF, |
| const ObjCAtTryStmt &S); |
| virtual void EmitSynchronizedStmt(CodeGen::CodeGenFunction &CGF, |
| const ObjCAtSynchronizedStmt &S); |
| void EmitTryOrSynchronizedStmt(CodeGen::CodeGenFunction &CGF, const Stmt &S); |
| virtual void EmitThrowStmt(CodeGen::CodeGenFunction &CGF, |
| const ObjCAtThrowStmt &S); |
| virtual llvm::Value * EmitObjCWeakRead(CodeGen::CodeGenFunction &CGF, |
| llvm::Value *AddrWeakObj); |
| virtual void EmitObjCWeakAssign(CodeGen::CodeGenFunction &CGF, |
| llvm::Value *src, llvm::Value *dst); |
| virtual void EmitObjCGlobalAssign(CodeGen::CodeGenFunction &CGF, |
| llvm::Value *src, llvm::Value *dest, |
| bool threadlocal = false); |
| virtual void EmitObjCIvarAssign(CodeGen::CodeGenFunction &CGF, |
| llvm::Value *src, llvm::Value *dest, |
| llvm::Value *ivarOffset); |
| virtual void EmitObjCStrongCastAssign(CodeGen::CodeGenFunction &CGF, |
| llvm::Value *src, llvm::Value *dest); |
| virtual void EmitGCMemmoveCollectable(CodeGen::CodeGenFunction &CGF, |
| llvm::Value *dest, llvm::Value *src, |
| llvm::Value *size); |
| |
| virtual LValue EmitObjCValueForIvar(CodeGen::CodeGenFunction &CGF, |
| QualType ObjectTy, |
| llvm::Value *BaseValue, |
| const ObjCIvarDecl *Ivar, |
| unsigned CVRQualifiers); |
| virtual llvm::Value *EmitIvarOffset(CodeGen::CodeGenFunction &CGF, |
| const ObjCInterfaceDecl *Interface, |
| const ObjCIvarDecl *Ivar); |
| |
| /// GetClassGlobal - Return the global variable for the Objective-C |
| /// class of the given name. |
| virtual llvm::GlobalVariable *GetClassGlobal(const std::string &Name) { |
| assert(false && "CGObjCMac::GetClassGlobal"); |
| return 0; |
| } |
| }; |
| |
| class CGObjCNonFragileABIMac : public CGObjCCommonMac { |
| private: |
| ObjCNonFragileABITypesHelper ObjCTypes; |
| llvm::GlobalVariable* ObjCEmptyCacheVar; |
| llvm::GlobalVariable* ObjCEmptyVtableVar; |
| |
| /// SuperClassReferences - uniqued super class references. |
| llvm::DenseMap<IdentifierInfo*, llvm::GlobalVariable*> SuperClassReferences; |
| |
| /// MetaClassReferences - uniqued meta class references. |
| llvm::DenseMap<IdentifierInfo*, llvm::GlobalVariable*> MetaClassReferences; |
| |
| /// EHTypeReferences - uniqued class ehtype references. |
| llvm::DenseMap<IdentifierInfo*, llvm::GlobalVariable*> EHTypeReferences; |
| |
| /// VTableDispatchMethods - List of methods for which we generate |
| /// vtable-based message dispatch. |
| llvm::DenseSet<Selector> VTableDispatchMethods; |
| |
| /// DefinedMetaClasses - List of defined meta-classes. |
| std::vector<llvm::GlobalValue*> DefinedMetaClasses; |
| |
| /// isVTableDispatchedSelector - Returns true if SEL is a |
| /// vtable-based selector. |
| bool isVTableDispatchedSelector(Selector Sel); |
| |
| /// FinishNonFragileABIModule - Write out global data structures at the end of |
| /// processing a translation unit. |
| void FinishNonFragileABIModule(); |
| |
| /// AddModuleClassList - Add the given list of class pointers to the |
| /// module with the provided symbol and section names. |
| void AddModuleClassList(const std::vector<llvm::GlobalValue*> &Container, |
| const char *SymbolName, |
| const char *SectionName); |
| |
| llvm::GlobalVariable * BuildClassRoTInitializer(unsigned flags, |
| unsigned InstanceStart, |
| unsigned InstanceSize, |
| const ObjCImplementationDecl *ID); |
| llvm::GlobalVariable * BuildClassMetaData(std::string &ClassName, |
| llvm::Constant *IsAGV, |
| llvm::Constant *SuperClassGV, |
| llvm::Constant *ClassRoGV, |
| bool HiddenVisibility); |
| |
| llvm::Constant *GetMethodConstant(const ObjCMethodDecl *MD); |
| |
| llvm::Constant *GetMethodDescriptionConstant(const ObjCMethodDecl *MD); |
| |
| /// EmitMethodList - Emit the method list for the given |
| /// implementation. The return value has type MethodListnfABITy. |
| llvm::Constant *EmitMethodList(llvm::Twine Name, |
| const char *Section, |
| const ConstantVector &Methods); |
| /// EmitIvarList - Emit the ivar list for the given |
| /// implementation. If ForClass is true the list of class ivars |
| /// (i.e. metaclass ivars) is emitted, otherwise the list of |
| /// interface ivars will be emitted. The return value has type |
| /// IvarListnfABIPtrTy. |
| llvm::Constant *EmitIvarList(const ObjCImplementationDecl *ID); |
| |
| llvm::Constant *EmitIvarOffsetVar(const ObjCInterfaceDecl *ID, |
| const ObjCIvarDecl *Ivar, |
| unsigned long int offset); |
| |
| /// GetOrEmitProtocol - Get the protocol object for the given |
| /// declaration, emitting it if necessary. The return value has type |
| /// ProtocolPtrTy. |
| virtual llvm::Constant *GetOrEmitProtocol(const ObjCProtocolDecl *PD); |
| |
| /// GetOrEmitProtocolRef - Get a forward reference to the protocol |
| /// object for the given declaration, emitting it if needed. These |
| /// forward references will be filled in with empty bodies if no |
| /// definition is seen. The return value has type ProtocolPtrTy. |
| virtual llvm::Constant *GetOrEmitProtocolRef(const ObjCProtocolDecl *PD); |
| |
| /// EmitProtocolList - Generate the list of referenced |
| /// protocols. The return value has type ProtocolListPtrTy. |
| llvm::Constant *EmitProtocolList(llvm::Twine Name, |
| ObjCProtocolDecl::protocol_iterator begin, |
| ObjCProtocolDecl::protocol_iterator end); |
| |
| CodeGen::RValue EmitVTableMessageSend(CodeGen::CodeGenFunction &CGF, |
| ReturnValueSlot Return, |
| QualType ResultType, |
| Selector Sel, |
| llvm::Value *Receiver, |
| QualType Arg0Ty, |
| bool IsSuper, |
| const CallArgList &CallArgs, |
| const ObjCMethodDecl *Method); |
| |
| /// GetClassGlobal - Return the global variable for the Objective-C |
| /// class of the given name. |
| llvm::GlobalVariable *GetClassGlobal(const std::string &Name); |
| |
| /// EmitClassRef - Return a Value*, of type ObjCTypes.ClassPtrTy, |
| /// for the given class reference. |
| llvm::Value *EmitClassRef(CGBuilderTy &Builder, |
| const ObjCInterfaceDecl *ID); |
| |
| llvm::Value *EmitClassRefFromId(CGBuilderTy &Builder, |
| IdentifierInfo *II); |
| |
| llvm::Value *EmitNSAutoreleasePoolClassRef(CGBuilderTy &Builder); |
| |
| /// EmitSuperClassRef - Return a Value*, of type ObjCTypes.ClassPtrTy, |
| /// for the given super class reference. |
| llvm::Value *EmitSuperClassRef(CGBuilderTy &Builder, |
| const ObjCInterfaceDecl *ID); |
| |
| /// EmitMetaClassRef - Return a Value * of the address of _class_t |
| /// meta-data |
| llvm::Value *EmitMetaClassRef(CGBuilderTy &Builder, |
| const ObjCInterfaceDecl *ID); |
| |
| /// ObjCIvarOffsetVariable - Returns the ivar offset variable for |
| /// the given ivar. |
| /// |
| llvm::GlobalVariable * ObjCIvarOffsetVariable( |
| const ObjCInterfaceDecl *ID, |
| const ObjCIvarDecl *Ivar); |
| |
| /// EmitSelector - Return a Value*, of type ObjCTypes.SelectorPtrTy, |
| /// for the given selector. |
| llvm::Value *EmitSelector(CGBuilderTy &Builder, Selector Sel, |
| bool lval=false); |
| |
| /// GetInterfaceEHType - Get the cached ehtype for the given Objective-C |
| /// interface. The return value has type EHTypePtrTy. |
| llvm::Constant *GetInterfaceEHType(const ObjCInterfaceDecl *ID, |
| bool ForDefinition); |
| |
| const char *getMetaclassSymbolPrefix() const { |
| return "OBJC_METACLASS_$_"; |
| } |
| |
| const char *getClassSymbolPrefix() const { |
| return "OBJC_CLASS_$_"; |
| } |
| |
| void GetClassSizeInfo(const ObjCImplementationDecl *OID, |
| uint32_t &InstanceStart, |
| uint32_t &InstanceSize); |
| |
| // Shamelessly stolen from Analysis/CFRefCount.cpp |
| Selector GetNullarySelector(const char* name) const { |
| IdentifierInfo* II = &CGM.getContext().Idents.get(name); |
| return CGM.getContext().Selectors.getSelector(0, &II); |
| } |
| |
| Selector GetUnarySelector(const char* name) const { |
| IdentifierInfo* II = &CGM.getContext().Idents.get(name); |
| return CGM.getContext().Selectors.getSelector(1, &II); |
| } |
| |
| /// ImplementationIsNonLazy - Check whether the given category or |
| /// class implementation is "non-lazy". |
| bool ImplementationIsNonLazy(const ObjCImplDecl *OD) const; |
| |
| public: |
| CGObjCNonFragileABIMac(CodeGen::CodeGenModule &cgm); |
| // FIXME. All stubs for now! |
| virtual llvm::Function *ModuleInitFunction(); |
| |
| virtual CodeGen::RValue GenerateMessageSend(CodeGen::CodeGenFunction &CGF, |
| ReturnValueSlot Return, |
| QualType ResultType, |
| Selector Sel, |
| llvm::Value *Receiver, |
| const CallArgList &CallArgs, |
| const ObjCInterfaceDecl *Class, |
| const ObjCMethodDecl *Method); |
| |
| virtual CodeGen::RValue |
| GenerateMessageSendSuper(CodeGen::CodeGenFunction &CGF, |
| ReturnValueSlot Return, |
| QualType ResultType, |
| Selector Sel, |
| const ObjCInterfaceDecl *Class, |
| bool isCategoryImpl, |
| llvm::Value *Receiver, |
| bool IsClassMessage, |
| const CallArgList &CallArgs, |
| const ObjCMethodDecl *Method); |
| |
| virtual llvm::Value *GetClass(CGBuilderTy &Builder, |
| const ObjCInterfaceDecl *ID); |
| |
| virtual llvm::Value *GetSelector(CGBuilderTy &Builder, Selector Sel, |
| bool lvalue = false) |
| { return EmitSelector(Builder, Sel, lvalue); } |
| |
| /// The NeXT/Apple runtimes do not support typed selectors; just emit an |
| /// untyped one. |
| virtual llvm::Value *GetSelector(CGBuilderTy &Builder, |
| const ObjCMethodDecl *Method) |
| { return EmitSelector(Builder, Method->getSelector()); } |
| |
| virtual void GenerateCategory(const ObjCCategoryImplDecl *CMD); |
| |
| virtual void GenerateClass(const ObjCImplementationDecl *ClassDecl); |
| virtual llvm::Value *GenerateProtocolRef(CGBuilderTy &Builder, |
| const ObjCProtocolDecl *PD); |
| |
| virtual llvm::Constant *GetEHType(QualType T); |
| |
| virtual llvm::Constant *GetPropertyGetFunction() { |
| return ObjCTypes.getGetPropertyFn(); |
| } |
| virtual llvm::Constant *GetPropertySetFunction() { |
| return ObjCTypes.getSetPropertyFn(); |
| } |
| |
| virtual llvm::Constant *GetSetStructFunction() { |
| return ObjCTypes.getCopyStructFn(); |
| } |
| virtual llvm::Constant *GetGetStructFunction() { |
| return ObjCTypes.getCopyStructFn(); |
| } |
| |
| virtual llvm::Constant *EnumerationMutationFunction() { |
| return ObjCTypes.getEnumerationMutationFn(); |
| } |
| |
| virtual void EmitTryStmt(CodeGen::CodeGenFunction &CGF, |
| const ObjCAtTryStmt &S); |
| virtual void EmitSynchronizedStmt(CodeGen::CodeGenFunction &CGF, |
| const ObjCAtSynchronizedStmt &S); |
| virtual void EmitThrowStmt(CodeGen::CodeGenFunction &CGF, |
| const ObjCAtThrowStmt &S); |
| virtual llvm::Value * EmitObjCWeakRead(CodeGen::CodeGenFunction &CGF, |
| llvm::Value *AddrWeakObj); |
| virtual void EmitObjCWeakAssign(CodeGen::CodeGenFunction &CGF, |
| llvm::Value *src, llvm::Value *dst); |
| virtual void EmitObjCGlobalAssign(CodeGen::CodeGenFunction &CGF, |
| llvm::Value *src, llvm::Value *dest, |
| bool threadlocal = false); |
| virtual void EmitObjCIvarAssign(CodeGen::CodeGenFunction &CGF, |
| llvm::Value *src, llvm::Value *dest, |
| llvm::Value *ivarOffset); |
| virtual void EmitObjCStrongCastAssign(CodeGen::CodeGenFunction &CGF, |
| llvm::Value *src, llvm::Value *dest); |
| virtual void EmitGCMemmoveCollectable(CodeGen::CodeGenFunction &CGF, |
| llvm::Value *dest, llvm::Value *src, |
| llvm::Value *size); |
| virtual LValue EmitObjCValueForIvar(CodeGen::CodeGenFunction &CGF, |
| QualType ObjectTy, |
| llvm::Value *BaseValue, |
| const ObjCIvarDecl *Ivar, |
| unsigned CVRQualifiers); |
| virtual llvm::Value *EmitIvarOffset(CodeGen::CodeGenFunction &CGF, |
| const ObjCInterfaceDecl *Interface, |
| const ObjCIvarDecl *Ivar); |
| }; |
| |
| /// A helper class for performing the null-initialization of a return |
| /// value. |
| struct NullReturnState { |
| llvm::BasicBlock *NullBB; |
| |
| NullReturnState() : NullBB(0) {} |
| |
| void init(CodeGenFunction &CGF, llvm::Value *receiver) { |
| // Make blocks for the null-init and call edges. |
| NullBB = CGF.createBasicBlock("msgSend.nullinit"); |
| llvm::BasicBlock *callBB = CGF.createBasicBlock("msgSend.call"); |
| |
| // Check for a null receiver and, if there is one, jump to the |
| // null-init test. |
| llvm::Value *isNull = CGF.Builder.CreateIsNull(receiver); |
| CGF.Builder.CreateCondBr(isNull, NullBB, callBB); |
| |
| // Otherwise, start performing the call. |
| CGF.EmitBlock(callBB); |
| } |
| |
| RValue complete(CodeGenFunction &CGF, RValue result, QualType resultType) { |
| if (!NullBB) return result; |
| |
| // Finish the call path. |
| llvm::BasicBlock *contBB = CGF.createBasicBlock("msgSend.cont"); |
| if (CGF.HaveInsertPoint()) CGF.Builder.CreateBr(contBB); |
| |
| // Emit the null-init block and perform the null-initialization there. |
| CGF.EmitBlock(NullBB); |
| assert(result.isAggregate() && "null init of non-aggregate result?"); |
| CGF.EmitNullInitialization(result.getAggregateAddr(), resultType); |
| |
| // Jump to the continuation block. |
| CGF.EmitBlock(contBB); |
| |
| return result; |
| } |
| }; |
| |
| } // end anonymous namespace |
| |
| /* *** Helper Functions *** */ |
| |
| /// getConstantGEP() - Help routine to construct simple GEPs. |
| static llvm::Constant *getConstantGEP(llvm::LLVMContext &VMContext, |
| llvm::Constant *C, |
| unsigned idx0, |
| unsigned idx1) { |
| llvm::Value *Idxs[] = { |
| llvm::ConstantInt::get(llvm::Type::getInt32Ty(VMContext), idx0), |
| llvm::ConstantInt::get(llvm::Type::getInt32Ty(VMContext), idx1) |
| }; |
| return llvm::ConstantExpr::getGetElementPtr(C, Idxs); |
| } |
| |
| /// hasObjCExceptionAttribute - Return true if this class or any super |
| /// class has the __objc_exception__ attribute. |
| static bool hasObjCExceptionAttribute(ASTContext &Context, |
| const ObjCInterfaceDecl *OID) { |
| if (OID->hasAttr<ObjCExceptionAttr>()) |
| return true; |
| if (const ObjCInterfaceDecl *Super = OID->getSuperClass()) |
| return hasObjCExceptionAttribute(Context, Super); |
| return false; |
| } |
| |
| /* *** CGObjCMac Public Interface *** */ |
| |
| CGObjCMac::CGObjCMac(CodeGen::CodeGenModule &cgm) : CGObjCCommonMac(cgm), |
| ObjCTypes(cgm) { |
| ObjCABI = 1; |
| EmitImageInfo(); |
| } |
| |
| /// GetClass - Return a reference to the class for the given interface |
| /// decl. |
| llvm::Value *CGObjCMac::GetClass(CGBuilderTy &Builder, |
| const ObjCInterfaceDecl *ID) { |
| return EmitClassRef(Builder, ID); |
| } |
| |
| /// GetSelector - Return the pointer to the unique'd string for this selector. |
| llvm::Value *CGObjCMac::GetSelector(CGBuilderTy &Builder, Selector Sel, |
| bool lval) { |
| return EmitSelector(Builder, Sel, lval); |
| } |
| llvm::Value *CGObjCMac::GetSelector(CGBuilderTy &Builder, const ObjCMethodDecl |
| *Method) { |
| return EmitSelector(Builder, Method->getSelector()); |
| } |
| |
| llvm::Constant *CGObjCMac::GetEHType(QualType T) { |
| if (T->isObjCIdType() || |
| T->isObjCQualifiedIdType()) { |
| return CGM.GetAddrOfRTTIDescriptor( |
| CGM.getContext().ObjCIdRedefinitionType, /*ForEH=*/true); |
| } |
| if (T->isObjCClassType() || |
| T->isObjCQualifiedClassType()) { |
| return CGM.GetAddrOfRTTIDescriptor( |
| CGM.getContext().ObjCClassRedefinitionType, /*ForEH=*/true); |
| } |
| if (T->isObjCObjectPointerType()) |
| return CGM.GetAddrOfRTTIDescriptor(T, /*ForEH=*/true); |
| |
| llvm_unreachable("asking for catch type for ObjC type in fragile runtime"); |
| return 0; |
| } |
| |
| /// Generate a constant CFString object. |
| /* |
| struct __builtin_CFString { |
| const int *isa; // point to __CFConstantStringClassReference |
| int flags; |
| const char *str; |
| long length; |
| }; |
| */ |
| |
| /// or Generate a constant NSString object. |
| /* |
| struct __builtin_NSString { |
| const int *isa; // point to __NSConstantStringClassReference |
| const char *str; |
| unsigned int length; |
| }; |
| */ |
| |
| llvm::Constant *CGObjCCommonMac::GenerateConstantString( |
| const StringLiteral *SL) { |
| return (CGM.getLangOptions().NoConstantCFStrings == 0 ? |
| CGM.GetAddrOfConstantCFString(SL) : |
| CGM.GetAddrOfConstantString(SL)); |
| } |
| |
| /// Generates a message send where the super is the receiver. This is |
| /// a message send to self with special delivery semantics indicating |
| /// which class's method should be called. |
| CodeGen::RValue |
| CGObjCMac::GenerateMessageSendSuper(CodeGen::CodeGenFunction &CGF, |
| ReturnValueSlot Return, |
| QualType ResultType, |
| Selector Sel, |
| const ObjCInterfaceDecl *Class, |
| bool isCategoryImpl, |
| llvm::Value *Receiver, |
| bool IsClassMessage, |
| const CodeGen::CallArgList &CallArgs, |
| const ObjCMethodDecl *Method) { |
| // Create and init a super structure; this is a (receiver, class) |
| // pair we will pass to objc_msgSendSuper. |
| llvm::Value *ObjCSuper = |
| CGF.CreateTempAlloca(ObjCTypes.SuperTy, "objc_super"); |
| llvm::Value *ReceiverAsObject = |
| CGF.Builder.CreateBitCast(Receiver, ObjCTypes.ObjectPtrTy); |
| CGF.Builder.CreateStore(ReceiverAsObject, |
| CGF.Builder.CreateStructGEP(ObjCSuper, 0)); |
| |
| // If this is a class message the metaclass is passed as the target. |
| llvm::Value *Target; |
| if (IsClassMessage) { |
| if (isCategoryImpl) { |
| // Message sent to 'super' in a class method defined in a category |
| // implementation requires an odd treatment. |
| // If we are in a class method, we must retrieve the |
| // _metaclass_ for the current class, pointed at by |
| // the class's "isa" pointer. The following assumes that |
| // isa" is the first ivar in a class (which it must be). |
| Target = EmitClassRef(CGF.Builder, Class->getSuperClass()); |
| Target = CGF.Builder.CreateStructGEP(Target, 0); |
| Target = CGF.Builder.CreateLoad(Target); |
| } else { |
| llvm::Value *MetaClassPtr = EmitMetaClassRef(Class); |
| llvm::Value *SuperPtr = CGF.Builder.CreateStructGEP(MetaClassPtr, 1); |
| llvm::Value *Super = CGF.Builder.CreateLoad(SuperPtr); |
| Target = Super; |
| } |
| } |
| else if (isCategoryImpl) |
| Target = EmitClassRef(CGF.Builder, Class->getSuperClass()); |
| else { |
| llvm::Value *ClassPtr = EmitSuperClassRef(Class); |
| ClassPtr = CGF.Builder.CreateStructGEP(ClassPtr, 1); |
| Target = CGF.Builder.CreateLoad(ClassPtr); |
| } |
| // FIXME: We shouldn't need to do this cast, rectify the ASTContext and |
| // ObjCTypes types. |
| llvm::Type *ClassTy = |
| CGM.getTypes().ConvertType(CGF.getContext().getObjCClassType()); |
| Target = CGF.Builder.CreateBitCast(Target, ClassTy); |
| CGF.Builder.CreateStore(Target, |
| CGF.Builder.CreateStructGEP(ObjCSuper, 1)); |
| return EmitMessageSend(CGF, Return, ResultType, |
| EmitSelector(CGF.Builder, Sel), |
| ObjCSuper, ObjCTypes.SuperPtrCTy, |
| true, CallArgs, Method, ObjCTypes); |
| } |
| |
| /// Generate code for a message send expression. |
| CodeGen::RValue CGObjCMac::GenerateMessageSend(CodeGen::CodeGenFunction &CGF, |
| ReturnValueSlot Return, |
| QualType ResultType, |
| Selector Sel, |
| llvm::Value *Receiver, |
| const CallArgList &CallArgs, |
| const ObjCInterfaceDecl *Class, |
| const ObjCMethodDecl *Method) { |
| return EmitMessageSend(CGF, Return, ResultType, |
| EmitSelector(CGF.Builder, Sel), |
| Receiver, CGF.getContext().getObjCIdType(), |
| false, CallArgs, Method, ObjCTypes); |
| } |
| |
| CodeGen::RValue |
| CGObjCCommonMac::EmitMessageSend(CodeGen::CodeGenFunction &CGF, |
| ReturnValueSlot Return, |
| QualType ResultType, |
| llvm::Value *Sel, |
| llvm::Value *Arg0, |
| QualType Arg0Ty, |
| bool IsSuper, |
| const CallArgList &CallArgs, |
| const ObjCMethodDecl *Method, |
| const ObjCCommonTypesHelper &ObjCTypes) { |
| CallArgList ActualArgs; |
| if (!IsSuper) |
| Arg0 = CGF.Builder.CreateBitCast(Arg0, ObjCTypes.ObjectPtrTy, "tmp"); |
| ActualArgs.add(RValue::get(Arg0), Arg0Ty); |
| ActualArgs.add(RValue::get(Sel), CGF.getContext().getObjCSelType()); |
| ActualArgs.addFrom(CallArgs); |
| |
| CodeGenTypes &Types = CGM.getTypes(); |
| const CGFunctionInfo &FnInfo = Types.getFunctionInfo(ResultType, ActualArgs, |
| FunctionType::ExtInfo()); |
| llvm::FunctionType *FTy = |
| Types.GetFunctionType(FnInfo, Method ? Method->isVariadic() : false); |
| |
| if (Method) |
| assert(CGM.getContext().getCanonicalType(Method->getResultType()) == |
| CGM.getContext().getCanonicalType(ResultType) && |
| "Result type mismatch!"); |
| |
| NullReturnState nullReturn; |
| |
| llvm::Constant *Fn = NULL; |
| if (CGM.ReturnTypeUsesSRet(FnInfo)) { |
| if (!IsSuper) nullReturn.init(CGF, Arg0); |
| Fn = (ObjCABI == 2) ? ObjCTypes.getSendStretFn2(IsSuper) |
| : ObjCTypes.getSendStretFn(IsSuper); |
| } else if (CGM.ReturnTypeUsesFPRet(ResultType)) { |
| Fn = (ObjCABI == 2) ? ObjCTypes.getSendFpretFn2(IsSuper) |
| : ObjCTypes.getSendFpretFn(IsSuper); |
| } else { |
| Fn = (ObjCABI == 2) ? ObjCTypes.getSendFn2(IsSuper) |
| : ObjCTypes.getSendFn(IsSuper); |
| } |
| Fn = llvm::ConstantExpr::getBitCast(Fn, llvm::PointerType::getUnqual(FTy)); |
| RValue rvalue = CGF.EmitCall(FnInfo, Fn, Return, ActualArgs); |
| return nullReturn.complete(CGF, rvalue, ResultType); |
| } |
| |
| static Qualifiers::GC GetGCAttrTypeForType(ASTContext &Ctx, QualType FQT) { |
| if (FQT.isObjCGCStrong()) |
| return Qualifiers::Strong; |
| |
| if (FQT.isObjCGCWeak() || FQT.getObjCLifetime() == Qualifiers::OCL_Weak) |
| return Qualifiers::Weak; |
| |
| if (FQT->isObjCObjectPointerType() || FQT->isBlockPointerType()) |
| return Qualifiers::Strong; |
| |
| if (const PointerType *PT = FQT->getAs<PointerType>()) |
| return GetGCAttrTypeForType(Ctx, PT->getPointeeType()); |
| |
| return Qualifiers::GCNone; |
| } |
| |
| llvm::Constant *CGObjCCommonMac::BuildGCBlockLayout(CodeGenModule &CGM, |
| const CGBlockInfo &blockInfo) { |
| llvm::Constant *nullPtr = |
| llvm::Constant::getNullValue(llvm::Type::getInt8PtrTy(VMContext)); |
| |
| if (CGM.getLangOptions().getGCMode() == LangOptions::NonGC && |
| !CGM.getLangOptions().ObjCAutoRefCount) |
| return nullPtr; |
| |
| bool hasUnion = false; |
| SkipIvars.clear(); |
| IvarsInfo.clear(); |
| unsigned WordSizeInBits = CGM.getContext().Target.getPointerWidth(0); |
| unsigned ByteSizeInBits = CGM.getContext().Target.getCharWidth(); |
| |
| // __isa is the first field in block descriptor and must assume by runtime's |
| // convention that it is GC'able. |
| IvarsInfo.push_back(GC_IVAR(0, 1)); |
| |
| const BlockDecl *blockDecl = blockInfo.getBlockDecl(); |
| |
| // Calculate the basic layout of the block structure. |
| const llvm::StructLayout *layout = |
| CGM.getTargetData().getStructLayout(blockInfo.StructureType); |
| |
| // Ignore the optional 'this' capture: C++ objects are not assumed |
| // to be GC'ed. |
| |
| // Walk the captured variables. |
| for (BlockDecl::capture_const_iterator ci = blockDecl->capture_begin(), |
| ce = blockDecl->capture_end(); ci != ce; ++ci) { |
| const VarDecl *variable = ci->getVariable(); |
| QualType type = variable->getType(); |
| |
| const CGBlockInfo::Capture &capture = blockInfo.getCapture(variable); |
| |
| // Ignore constant captures. |
| if (capture.isConstant()) continue; |
| |
| uint64_t fieldOffset = layout->getElementOffset(capture.getIndex()); |
| |
| // __block variables are passed by their descriptor address. |
| if (ci->isByRef()) { |
| IvarsInfo.push_back(GC_IVAR(fieldOffset, /*size in words*/ 1)); |
| continue; |
| } |
| |
| assert(!type->isArrayType() && "array variable should not be caught"); |
| if (const RecordType *record = type->getAs<RecordType>()) { |
| BuildAggrIvarRecordLayout(record, fieldOffset, true, hasUnion); |
| continue; |
| } |
| |
| Qualifiers::GC GCAttr = GetGCAttrTypeForType(CGM.getContext(), type); |
| unsigned fieldSize = CGM.getContext().getTypeSize(type); |
| |
| if (GCAttr == Qualifiers::Strong) |
| IvarsInfo.push_back(GC_IVAR(fieldOffset, |
| fieldSize / WordSizeInBits)); |
| else if (GCAttr == Qualifiers::GCNone || GCAttr == Qualifiers::Weak) |
| SkipIvars.push_back(GC_IVAR(fieldOffset, |
| fieldSize / ByteSizeInBits)); |
| } |
| |
| if (IvarsInfo.empty()) |
| return nullPtr; |
| |
| // Sort on byte position; captures might not be allocated in order, |
| // and unions can do funny things. |
| llvm::array_pod_sort(IvarsInfo.begin(), IvarsInfo.end()); |
| llvm::array_pod_sort(SkipIvars.begin(), SkipIvars.end()); |
| |
| std::string BitMap; |
| llvm::Constant *C = BuildIvarLayoutBitmap(BitMap); |
| if (CGM.getLangOptions().ObjCGCBitmapPrint) { |
| printf("\n block variable layout for block: "); |
| const unsigned char *s = (unsigned char*)BitMap.c_str(); |
| for (unsigned i = 0; i < BitMap.size(); i++) |
| if (!(s[i] & 0xf0)) |
| printf("0x0%x%s", s[i], s[i] != 0 ? ", " : ""); |
| else |
| printf("0x%x%s", s[i], s[i] != 0 ? ", " : ""); |
| printf("\n"); |
| } |
| |
| return C; |
| } |
| |
| llvm::Value *CGObjCMac::GenerateProtocolRef(CGBuilderTy &Builder, |
| const ObjCProtocolDecl *PD) { |
| // FIXME: I don't understand why gcc generates this, or where it is |
| // resolved. Investigate. Its also wasteful to look this up over and over. |
| LazySymbols.insert(&CGM.getContext().Idents.get("Protocol")); |
| |
| return llvm::ConstantExpr::getBitCast(GetProtocolRef(PD), |
| ObjCTypes.ExternalProtocolPtrTy); |
| } |
| |
| void CGObjCCommonMac::GenerateProtocol(const ObjCProtocolDecl *PD) { |
| // FIXME: We shouldn't need this, the protocol decl should contain enough |
| // information to tell us whether this was a declaration or a definition. |
| DefinedProtocols.insert(PD->getIdentifier()); |
| |
| // If we have generated a forward reference to this protocol, emit |
| // it now. Otherwise do nothing, the protocol objects are lazily |
| // emitted. |
| if (Protocols.count(PD->getIdentifier())) |
| GetOrEmitProtocol(PD); |
| } |
| |
| llvm::Constant *CGObjCCommonMac::GetProtocolRef(const ObjCProtocolDecl *PD) { |
| if (DefinedProtocols.count(PD->getIdentifier())) |
| return GetOrEmitProtocol(PD); |
| |
| return GetOrEmitProtocolRef(PD); |
| } |
| |
| /* |
| // APPLE LOCAL radar 4585769 - Objective-C 1.0 extensions |
| struct _objc_protocol { |
| struct _objc_protocol_extension *isa; |
| char *protocol_name; |
| struct _objc_protocol_list *protocol_list; |
| struct _objc__method_prototype_list *instance_methods; |
| struct _objc__method_prototype_list *class_methods |
| }; |
| |
| See EmitProtocolExtension(). |
| */ |
| llvm::Constant *CGObjCMac::GetOrEmitProtocol(const ObjCProtocolDecl *PD) { |
| llvm::GlobalVariable *&Entry = Protocols[PD->getIdentifier()]; |
| |
| // Early exit if a defining object has already been generated. |
| if (Entry && Entry->hasInitializer()) |
| return Entry; |
| |
| // FIXME: I don't understand why gcc generates this, or where it is |
| // resolved. Investigate. Its also wasteful to look this up over and over. |
| LazySymbols.insert(&CGM.getContext().Idents.get("Protocol")); |
| |
| // Construct method lists. |
| std::vector<llvm::Constant*> InstanceMethods, ClassMethods; |
| std::vector<llvm::Constant*> OptInstanceMethods, OptClassMethods; |
| for (ObjCProtocolDecl::instmeth_iterator |
| i = PD->instmeth_begin(), e = PD->instmeth_end(); i != e; ++i) { |
| ObjCMethodDecl *MD = *i; |
| llvm::Constant *C = GetMethodDescriptionConstant(MD); |
| if (!C) |
| return GetOrEmitProtocolRef(PD); |
| |
| if (MD->getImplementationControl() == ObjCMethodDecl::Optional) { |
| OptInstanceMethods.push_back(C); |
| } else { |
| InstanceMethods.push_back(C); |
| } |
| } |
| |
| for (ObjCProtocolDecl::classmeth_iterator |
| i = PD->classmeth_begin(), e = PD->classmeth_end(); i != e; ++i) { |
| ObjCMethodDecl *MD = *i; |
| llvm::Constant *C = GetMethodDescriptionConstant(MD); |
| if (!C) |
| return GetOrEmitProtocolRef(PD); |
| |
| if (MD->getImplementationControl() == ObjCMethodDecl::Optional) { |
| OptClassMethods.push_back(C); |
| } else { |
| ClassMethods.push_back(C); |
| } |
| } |
| |
| std::vector<llvm::Constant*> Values(5); |
| Values[0] = EmitProtocolExtension(PD, OptInstanceMethods, OptClassMethods); |
| Values[1] = GetClassName(PD->getIdentifier()); |
| Values[2] = |
| EmitProtocolList("\01L_OBJC_PROTOCOL_REFS_" + PD->getName(), |
| PD->protocol_begin(), |
| PD->protocol_end()); |
| Values[3] = |
| EmitMethodDescList("\01L_OBJC_PROTOCOL_INSTANCE_METHODS_" + PD->getName(), |
| "__OBJC,__cat_inst_meth,regular,no_dead_strip", |
| InstanceMethods); |
| Values[4] = |
| EmitMethodDescList("\01L_OBJC_PROTOCOL_CLASS_METHODS_" + PD->getName(), |
| "__OBJC,__cat_cls_meth,regular,no_dead_strip", |
| ClassMethods); |
| llvm::Constant *Init = llvm::ConstantStruct::get(ObjCTypes.ProtocolTy, |
| Values); |
| |
| if (Entry) { |
| // Already created, fix the linkage and update the initializer. |
| Entry->setLinkage(llvm::GlobalValue::InternalLinkage); |
| Entry->setInitializer(Init); |
| } else { |
| Entry = |
| new llvm::GlobalVariable(CGM.getModule(), ObjCTypes.ProtocolTy, false, |
| llvm::GlobalValue::InternalLinkage, |
| Init, |
| "\01L_OBJC_PROTOCOL_" + PD->getName()); |
| Entry->setSection("__OBJC,__protocol,regular,no_dead_strip"); |
| // FIXME: Is this necessary? Why only for protocol? |
| Entry->setAlignment(4); |
| } |
| CGM.AddUsedGlobal(Entry); |
| |
| return Entry; |
| } |
| |
| llvm::Constant *CGObjCMac::GetOrEmitProtocolRef(const ObjCProtocolDecl *PD) { |
| llvm::GlobalVariable *&Entry = Protocols[PD->getIdentifier()]; |
| |
| if (!Entry) { |
| // We use the initializer as a marker of whether this is a forward |
| // reference or not. At module finalization we add the empty |
| // contents for protocols which were referenced but never defined. |
| Entry = |
| new llvm::GlobalVariable(CGM.getModule(), ObjCTypes.ProtocolTy, false, |
| llvm::GlobalValue::ExternalLinkage, |
| 0, |
| "\01L_OBJC_PROTOCOL_" + PD->getName()); |
| Entry->setSection("__OBJC,__protocol,regular,no_dead_strip"); |
| // FIXME: Is this necessary? Why only for protocol? |
| Entry->setAlignment(4); |
| } |
| |
| return Entry; |
| } |
| |
| /* |
| struct _objc_protocol_extension { |
| uint32_t size; |
| struct objc_method_description_list *optional_instance_methods; |
| struct objc_method_description_list *optional_class_methods; |
| struct objc_property_list *instance_properties; |
| }; |
| */ |
| llvm::Constant * |
| CGObjCMac::EmitProtocolExtension(const ObjCProtocolDecl *PD, |
| const ConstantVector &OptInstanceMethods, |
| const ConstantVector &OptClassMethods) { |
| uint64_t Size = |
| CGM.getTargetData().getTypeAllocSize(ObjCTypes.ProtocolExtensionTy); |
| std::vector<llvm::Constant*> Values(4); |
| Values[0] = llvm::ConstantInt::get(ObjCTypes.IntTy, Size); |
| Values[1] = |
| EmitMethodDescList("\01L_OBJC_PROTOCOL_INSTANCE_METHODS_OPT_" |
| + PD->getName(), |
| "__OBJC,__cat_inst_meth,regular,no_dead_strip", |
| OptInstanceMethods); |
| Values[2] = |
| EmitMethodDescList("\01L_OBJC_PROTOCOL_CLASS_METHODS_OPT_" + PD->getName(), |
| "__OBJC,__cat_cls_meth,regular,no_dead_strip", |
| OptClassMethods); |
| Values[3] = EmitPropertyList("\01L_OBJC_$_PROP_PROTO_LIST_" + PD->getName(), |
| 0, PD, ObjCTypes); |
| |
| // Return null if no extension bits are used. |
| if (Values[1]->isNullValue() && Values[2]->isNullValue() && |
| Values[3]->isNullValue()) |
| return llvm::Constant::getNullValue(ObjCTypes.ProtocolExtensionPtrTy); |
| |
| llvm::Constant *Init = |
| llvm::ConstantStruct::get(ObjCTypes.ProtocolExtensionTy, Values); |
| |
| // No special section, but goes in llvm.used |
| return CreateMetadataVar("\01L_OBJC_PROTOCOLEXT_" + PD->getName(), |
| Init, |
| 0, 0, true); |
| } |
| |
| /* |
| struct objc_protocol_list { |
| struct objc_protocol_list *next; |
| long count; |
| Protocol *list[]; |
| }; |
| */ |
| llvm::Constant * |
| CGObjCMac::EmitProtocolList(llvm::Twine Name, |
| ObjCProtocolDecl::protocol_iterator begin, |
| ObjCProtocolDecl::protocol_iterator end) { |
| std::vector<llvm::Constant*> ProtocolRefs; |
| |
| for (; begin != end; ++begin) |
| ProtocolRefs.push_back(GetProtocolRef(*begin)); |
| |
| // Just return null for empty protocol lists |
| if (ProtocolRefs.empty()) |
| return llvm::Constant::getNullValue(ObjCTypes.ProtocolListPtrTy); |
| |
| // This list is null terminated. |
| ProtocolRefs.push_back(llvm::Constant::getNullValue(ObjCTypes.ProtocolPtrTy)); |
| |
| llvm::Constant *Values[3]; |
| // This field is only used by the runtime. |
| Values[0] = llvm::Constant::getNullValue(ObjCTypes.ProtocolListPtrTy); |
| Values[1] = llvm::ConstantInt::get(ObjCTypes.LongTy, |
| ProtocolRefs.size() - 1); |
| Values[2] = |
| llvm::ConstantArray::get(llvm::ArrayType::get(ObjCTypes.ProtocolPtrTy, |
| ProtocolRefs.size()), |
| ProtocolRefs); |
| |
| llvm::Constant *Init = llvm::ConstantStruct::getAnon(Values); |
| llvm::GlobalVariable *GV = |
| CreateMetadataVar(Name, Init, "__OBJC,__cat_cls_meth,regular,no_dead_strip", |
| 4, false); |
| return llvm::ConstantExpr::getBitCast(GV, ObjCTypes.ProtocolListPtrTy); |
| } |
| |
| void CGObjCCommonMac::PushProtocolProperties(llvm::SmallPtrSet<const IdentifierInfo*, 16> &PropertySet, |
| std::vector<llvm::Constant*> &Properties, |
| const Decl *Container, |
| const ObjCProtocolDecl *PROTO, |
| const ObjCCommonTypesHelper &ObjCTypes) { |
| std::vector<llvm::Constant*> Prop(2); |
| for (ObjCProtocolDecl::protocol_iterator P = PROTO->protocol_begin(), |
| E = PROTO->protocol_end(); P != E; ++P) |
| PushProtocolProperties(PropertySet, Properties, Container, (*P), ObjCTypes); |
| for (ObjCContainerDecl::prop_iterator I = PROTO->prop_begin(), |
| E = PROTO->prop_end(); I != E; ++I) { |
| const ObjCPropertyDecl *PD = *I; |
| if (!PropertySet.insert(PD->getIdentifier())) |
| continue; |
| Prop[0] = GetPropertyName(PD->getIdentifier()); |
| Prop[1] = GetPropertyTypeString(PD, Container); |
| Properties.push_back(llvm::ConstantStruct::get(ObjCTypes.PropertyTy, Prop)); |
| } |
| } |
| |
| /* |
| struct _objc_property { |
| const char * const name; |
| const char * const attributes; |
| }; |
| |
| struct _objc_property_list { |
| uint32_t entsize; // sizeof (struct _objc_property) |
| uint32_t prop_count; |
| struct _objc_property[prop_count]; |
| }; |
| */ |
| llvm::Constant *CGObjCCommonMac::EmitPropertyList(llvm::Twine Name, |
| const Decl *Container, |
| const ObjCContainerDecl *OCD, |
| const ObjCCommonTypesHelper &ObjCTypes) { |
| std::vector<llvm::Constant*> Properties, Prop(2); |
| llvm::SmallPtrSet<const IdentifierInfo*, 16> PropertySet; |
| for (ObjCContainerDecl::prop_iterator I = OCD->prop_begin(), |
| E = OCD->prop_end(); I != E; ++I) { |
| const ObjCPropertyDecl *PD = *I; |
| PropertySet.insert(PD->getIdentifier()); |
| Prop[0] = GetPropertyName(PD->getIdentifier()); |
| Prop[1] = GetPropertyTypeString(PD, Container); |
| Properties.push_back(llvm::ConstantStruct::get(ObjCTypes.PropertyTy, |
| Prop)); |
| } |
| if (const ObjCInterfaceDecl *OID = dyn_cast<ObjCInterfaceDecl>(OCD)) { |
| for (ObjCInterfaceDecl::all_protocol_iterator |
| P = OID->all_referenced_protocol_begin(), |
| E = OID->all_referenced_protocol_end(); P != E; ++P) |
| PushProtocolProperties(PropertySet, Properties, Container, (*P), |
| ObjCTypes); |
| } |
| else if (const ObjCCategoryDecl *CD = dyn_cast<ObjCCategoryDecl>(OCD)) { |
| for (ObjCCategoryDecl::protocol_iterator P = CD->protocol_begin(), |
| E = CD->protocol_end(); P != E; ++P) |
| PushProtocolProperties(PropertySet, Properties, Container, (*P), |
| ObjCTypes); |
| } |
| |
| // Return null for empty list. |
| if (Properties.empty()) |
| return llvm::Constant::getNullValue(ObjCTypes.PropertyListPtrTy); |
| |
| unsigned PropertySize = |
| CGM.getTargetData().getTypeAllocSize(ObjCTypes.PropertyTy); |
| llvm::Constant *Values[3]; |
| Values[0] = llvm::ConstantInt::get(ObjCTypes.IntTy, PropertySize); |
| Values[1] = llvm::ConstantInt::get(ObjCTypes.IntTy, Properties.size()); |
| llvm::ArrayType *AT = llvm::ArrayType::get(ObjCTypes.PropertyTy, |
| Properties.size()); |
| Values[2] = llvm::ConstantArray::get(AT, Properties); |
| llvm::Constant *Init = llvm::ConstantStruct::getAnon(Values); |
| |
| llvm::GlobalVariable *GV = |
| CreateMetadataVar(Name, Init, |
| (ObjCABI == 2) ? "__DATA, __objc_const" : |
| "__OBJC,__property,regular,no_dead_strip", |
| (ObjCABI == 2) ? 8 : 4, |
| true); |
| return llvm::ConstantExpr::getBitCast(GV, ObjCTypes.PropertyListPtrTy); |
| } |
| |
| /* |
| struct objc_method_description_list { |
| int count; |
| struct objc_method_description list[]; |
| }; |
| */ |
| llvm::Constant * |
| CGObjCMac::GetMethodDescriptionConstant(const ObjCMethodDecl *MD) { |
| std::vector<llvm::Constant*> Desc(2); |
| Desc[0] = |
| llvm::ConstantExpr::getBitCast(GetMethodVarName(MD->getSelector()), |
| ObjCTypes.SelectorPtrTy); |
| Desc[1] = GetMethodVarType(MD); |
| if (!Desc[1]) |
| return 0; |
| |
| return llvm::ConstantStruct::get(ObjCTypes.MethodDescriptionTy, |
| Desc); |
| } |
| |
| llvm::Constant *CGObjCMac::EmitMethodDescList(llvm::Twine Name, |
| const char *Section, |
| const ConstantVector &Methods) { |
| // Return null for empty list. |
| if (Methods.empty()) |
| return llvm::Constant::getNullValue(ObjCTypes.MethodDescriptionListPtrTy); |
| |
| llvm::Constant *Values[2]; |
| Values[0] = llvm::ConstantInt::get(ObjCTypes.IntTy, Methods.size()); |
| llvm::ArrayType *AT = llvm::ArrayType::get(ObjCTypes.MethodDescriptionTy, |
| Methods.size()); |
| Values[1] = llvm::ConstantArray::get(AT, Methods); |
| llvm::Constant *Init = llvm::ConstantStruct::getAnon(Values); |
| |
| llvm::GlobalVariable *GV = CreateMetadataVar(Name, Init, Section, 4, true); |
| return llvm::ConstantExpr::getBitCast(GV, |
| ObjCTypes.MethodDescriptionListPtrTy); |
| } |
| |
| /* |
| struct _objc_category { |
| char *category_name; |
| char *class_name; |
| struct _objc_method_list *instance_methods; |
| struct _objc_method_list *class_methods; |
| struct _objc_protocol_list *protocols; |
| uint32_t size; // <rdar://4585769> |
| struct _objc_property_list *instance_properties; |
| }; |
| */ |
| void CGObjCMac::GenerateCategory(const ObjCCategoryImplDecl *OCD) { |
| unsigned Size = CGM.getTargetData().getTypeAllocSize(ObjCTypes.CategoryTy); |
| |
| // FIXME: This is poor design, the OCD should have a pointer to the category |
| // decl. Additionally, note that Category can be null for the @implementation |
| // w/o an @interface case. Sema should just create one for us as it does for |
| // @implementation so everyone else can live life under a clear blue sky. |
| const ObjCInterfaceDecl *Interface = OCD->getClassInterface(); |
| const ObjCCategoryDecl *Category = |
| Interface->FindCategoryDeclaration(OCD->getIdentifier()); |
| |
| llvm::SmallString<256> ExtName; |
| llvm::raw_svector_ostream(ExtName) << Interface->getName() << '_' |
| << OCD->getName(); |
| |
| std::vector<llvm::Constant*> InstanceMethods, ClassMethods; |
| for (ObjCCategoryImplDecl::instmeth_iterator |
| i = OCD->instmeth_begin(), e = OCD->instmeth_end(); i != e; ++i) { |
| // Instance methods should always be defined. |
| InstanceMethods.push_back(GetMethodConstant(*i)); |
| } |
| for (ObjCCategoryImplDecl::classmeth_iterator |
| i = OCD->classmeth_begin(), e = OCD->classmeth_end(); i != e; ++i) { |
| // Class methods should always be defined. |
| ClassMethods.push_back(GetMethodConstant(*i)); |
| } |
| |
| llvm::Constant *Values[7]; |
| Values[0] = GetClassName(OCD->getIdentifier()); |
| Values[1] = GetClassName(Interface->getIdentifier()); |
| LazySymbols.insert(Interface->getIdentifier()); |
| Values[2] = |
| EmitMethodList("\01L_OBJC_CATEGORY_INSTANCE_METHODS_" + ExtName.str(), |
| "__OBJC,__cat_inst_meth,regular,no_dead_strip", |
| InstanceMethods); |
| Values[3] = |
| EmitMethodList("\01L_OBJC_CATEGORY_CLASS_METHODS_" + ExtName.str(), |
| "__OBJC,__cat_cls_meth,regular,no_dead_strip", |
| ClassMethods); |
| if (Category) { |
| Values[4] = |
| EmitProtocolList("\01L_OBJC_CATEGORY_PROTOCOLS_" + ExtName.str(), |
| Category->protocol_begin(), |
| Category->protocol_end()); |
| } else { |
| Values[4] = llvm::Constant::getNullValue(ObjCTypes.ProtocolListPtrTy); |
| } |
| Values[5] = llvm::ConstantInt::get(ObjCTypes.IntTy, Size); |
| |
| // If there is no category @interface then there can be no properties. |
| if (Category) { |
| Values[6] = EmitPropertyList("\01l_OBJC_$_PROP_LIST_" + ExtName.str(), |
| OCD, Category, ObjCTypes); |
| } else { |
| Values[6] = llvm::Constant::getNullValue(ObjCTypes.PropertyListPtrTy); |
| } |
| |
| llvm::Constant *Init = llvm::ConstantStruct::get(ObjCTypes.CategoryTy, |
| Values); |
| |
| llvm::GlobalVariable *GV = |
| CreateMetadataVar("\01L_OBJC_CATEGORY_" + ExtName.str(), Init, |
| "__OBJC,__category,regular,no_dead_strip", |
| 4, true); |
| DefinedCategories.push_back(GV); |
| DefinedCategoryNames.insert(ExtName.str()); |
| // method definition entries must be clear for next implementation. |
| MethodDefinitions.clear(); |
| } |
| |
| // FIXME: Get from somewhere? |
| enum ClassFlags { |
| eClassFlags_Factory = 0x00001, |
| eClassFlags_Meta = 0x00002, |
| // <rdr://5142207> |
| eClassFlags_HasCXXStructors = 0x02000, |
| eClassFlags_Hidden = 0x20000, |
| eClassFlags_ABI2_Hidden = 0x00010, |
| eClassFlags_ABI2_HasCXXStructors = 0x00004 // <rdr://4923634> |
| }; |
| |
| /* |
| struct _objc_class { |
| Class isa; |
| Class super_class; |
| const char *name; |
| long version; |
| long info; |
| long instance_size; |
| struct _objc_ivar_list *ivars; |
| struct _objc_method_list *methods; |
| struct _objc_cache *cache; |
| struct _objc_protocol_list *protocols; |
| // Objective-C 1.0 extensions (<rdr://4585769>) |
| const char *ivar_layout; |
| struct _objc_class_ext *ext; |
| }; |
| |
| See EmitClassExtension(); |
| */ |
| void CGObjCMac::GenerateClass(const ObjCImplementationDecl *ID) { |
| DefinedSymbols.insert(ID->getIdentifier()); |
| |
| std::string ClassName = ID->getNameAsString(); |
| // FIXME: Gross |
| ObjCInterfaceDecl *Interface = |
| const_cast<ObjCInterfaceDecl*>(ID->getClassInterface()); |
| llvm::Constant *Protocols = |
| EmitProtocolList("\01L_OBJC_CLASS_PROTOCOLS_" + ID->getName(), |
| Interface->all_referenced_protocol_begin(), |
| Interface->all_referenced_protocol_end()); |
| unsigned Flags = eClassFlags_Factory; |
| if (ID->hasCXXStructors()) |
| Flags |= eClassFlags_HasCXXStructors; |
| unsigned Size = |
| CGM.getContext().getASTObjCImplementationLayout(ID).getSize().getQuantity(); |
| |
| // FIXME: Set CXX-structors flag. |
| if (ID->getClassInterface()->getVisibility() == HiddenVisibility) |
| Flags |= eClassFlags_Hidden; |
| |
| std::vector<llvm::Constant*> InstanceMethods, ClassMethods; |
| for (ObjCImplementationDecl::instmeth_iterator |
| i = ID->instmeth_begin(), e = ID->instmeth_end(); i != e; ++i) { |
| // Instance methods should always be defined. |
| InstanceMethods.push_back(GetMethodConstant(*i)); |
| } |
| for (ObjCImplementationDecl::classmeth_iterator |
| i = ID->classmeth_begin(), e = ID->classmeth_end(); i != e; ++i) { |
| // Class methods should always be defined. |
| ClassMethods.push_back(GetMethodConstant(*i)); |
| } |
| |
| for (ObjCImplementationDecl::propimpl_iterator |
| i = ID->propimpl_begin(), e = ID->propimpl_end(); i != e; ++i) { |
| ObjCPropertyImplDecl *PID = *i; |
| |
| if (PID->getPropertyImplementation() == ObjCPropertyImplDecl::Synthesize) { |
| ObjCPropertyDecl *PD = PID->getPropertyDecl(); |
| |
| if (ObjCMethodDecl *MD = PD->getGetterMethodDecl()) |
| if (llvm::Constant *C = GetMethodConstant(MD)) |
| InstanceMethods.push_back(C); |
| if (ObjCMethodDecl *MD = PD->getSetterMethodDecl()) |
| if (llvm::Constant *C = GetMethodConstant(MD)) |
| InstanceMethods.push_back(C); |
| } |
| } |
| |
| llvm::Constant *Values[12]; |
| Values[ 0] = EmitMetaClass(ID, Protocols, ClassMethods); |
| if (ObjCInterfaceDecl *Super = Interface->getSuperClass()) { |
| // Record a reference to the super class. |
| LazySymbols.insert(Super->getIdentifier()); |
| |
| Values[ 1] = |
| llvm::ConstantExpr::getBitCast(GetClassName(Super->getIdentifier()), |
| ObjCTypes.ClassPtrTy); |
| } else { |
| Values[ 1] = llvm::Constant::getNullValue(ObjCTypes.ClassPtrTy); |
| } |
| Values[ 2] = GetClassName(ID->getIdentifier()); |
| // Version is always 0. |
| Values[ 3] = llvm::ConstantInt::get(ObjCTypes.LongTy, 0); |
| Values[ 4] = llvm::ConstantInt::get(ObjCTypes.LongTy, Flags); |
| Values[ 5] = llvm::ConstantInt::get(ObjCTypes.LongTy, Size); |
| Values[ 6] = EmitIvarList(ID, false); |
| Values[ 7] = |
| EmitMethodList("\01L_OBJC_INSTANCE_METHODS_" + ID->getName(), |
| "__OBJC,__inst_meth,regular,no_dead_strip", |
| InstanceMethods); |
| // cache is always NULL. |
| Values[ 8] = llvm::Constant::getNullValue(ObjCTypes.CachePtrTy); |
| Values[ 9] = Protocols; |
| Values[10] = BuildIvarLayout(ID, true); |
| Values[11] = EmitClassExtension(ID); |
| llvm::Constant *Init = llvm::ConstantStruct::get(ObjCTypes.ClassTy, |
| Values); |
| std::string Name("\01L_OBJC_CLASS_"); |
| Name += ClassName; |
| const char *Section = "__OBJC,__class,regular,no_dead_strip"; |
| // Check for a forward reference. |
| llvm::GlobalVariable *GV = CGM.getModule().getGlobalVariable(Name); |
| if (GV) { |
| assert(GV->getType()->getElementType() == ObjCTypes.ClassTy && |
| "Forward metaclass reference has incorrect type."); |
| GV->setLinkage(llvm::GlobalValue::InternalLinkage); |
| GV->setInitializer(Init); |
| GV->setSection(Section); |
| GV->setAlignment(4); |
| CGM.AddUsedGlobal(GV); |
| } |
| else |
| GV = CreateMetadataVar(Name, Init, Section, 4, true); |
| DefinedClasses.push_back(GV); |
| // method definition entries must be clear for next implementation. |
| MethodDefinitions.clear(); |
| } |
| |
| llvm::Constant *CGObjCMac::EmitMetaClass(const ObjCImplementationDecl *ID, |
| llvm::Constant *Protocols, |
| const ConstantVector &Methods) { |
| unsigned Flags = eClassFlags_Meta; |
| unsigned Size = CGM.getTargetData().getTypeAllocSize(ObjCTypes.ClassTy); |
| |
| if (ID->getClassInterface()->getVisibility() == HiddenVisibility) |
| Flags |= eClassFlags_Hidden; |
| |
| llvm::Constant *Values[12]; |
| // The isa for the metaclass is the root of the hierarchy. |
| const ObjCInterfaceDecl *Root = ID->getClassInterface(); |
| while (const ObjCInterfaceDecl *Super = Root->getSuperClass()) |
| Root = Super; |
| Values[ 0] = |
| llvm::ConstantExpr::getBitCast(GetClassName(Root->getIdentifier()), |
| ObjCTypes.ClassPtrTy); |
| // The super class for the metaclass is emitted as the name of the |
| // super class. The runtime fixes this up to point to the |
| // *metaclass* for the super class. |
| if (ObjCInterfaceDecl *Super = ID->getClassInterface()->getSuperClass()) { |
| Values[ 1] = |
| llvm::ConstantExpr::getBitCast(GetClassName(Super->getIdentifier()), |
| ObjCTypes.ClassPtrTy); |
| } else { |
| Values[ 1] = llvm::Constant::getNullValue(ObjCTypes.ClassPtrTy); |
| } |
| Values[ 2] = GetClassName(ID->getIdentifier()); |
| // Version is always 0. |
| Values[ 3] = llvm::ConstantInt::get(ObjCTypes.LongTy, 0); |
| Values[ 4] = llvm::ConstantInt::get(ObjCTypes.LongTy, Flags); |
| Values[ 5] = llvm::ConstantInt::get(ObjCTypes.LongTy, Size); |
| Values[ 6] = EmitIvarList(ID, true); |
| Values[ 7] = |
| EmitMethodList("\01L_OBJC_CLASS_METHODS_" + ID->getNameAsString(), |
| "__OBJC,__cls_meth,regular,no_dead_strip", |
| Methods); |
| // cache is always NULL. |
| Values[ 8] = llvm::Constant::getNullValue(ObjCTypes.CachePtrTy); |
| Values[ 9] = Protocols; |
| // ivar_layout for metaclass is always NULL. |
| Values[10] = llvm::Constant::getNullValue(ObjCTypes.Int8PtrTy); |
| // The class extension is always unused for metaclasses. |
| Values[11] = llvm::Constant::getNullValue(ObjCTypes.ClassExtensionPtrTy); |
| llvm::Constant *Init = llvm::ConstantStruct::get(ObjCTypes.ClassTy, |
| Values); |
| |
| std::string Name("\01L_OBJC_METACLASS_"); |
| Name += ID->getNameAsCString(); |
| |
| // Check for a forward reference. |
| llvm::GlobalVariable *GV = CGM.getModule().getGlobalVariable(Name); |
| if (GV) { |
| assert(GV->getType()->getElementType() == ObjCTypes.ClassTy && |
| "Forward metaclass reference has incorrect type."); |
| GV->setLinkage(llvm::GlobalValue::InternalLinkage); |
| GV->setInitializer(Init); |
| } else { |
| GV = new llvm::GlobalVariable(CGM.getModule(), ObjCTypes.ClassTy, false, |
| llvm::GlobalValue::InternalLinkage, |
| Init, Name); |
| } |
| GV->setSection("__OBJC,__meta_class,regular,no_dead_strip"); |
| GV->setAlignment(4); |
| CGM.AddUsedGlobal(GV); |
| |
| return GV; |
| } |
| |
| llvm::Constant *CGObjCMac::EmitMetaClassRef(const ObjCInterfaceDecl *ID) { |
| std::string Name = "\01L_OBJC_METACLASS_" + ID->getNameAsString(); |
| |
| // FIXME: Should we look these up somewhere other than the module. Its a bit |
| // silly since we only generate these while processing an implementation, so |
| // exactly one pointer would work if know when we entered/exitted an |
| // implementation block. |
| |
| // Check for an existing forward reference. |
| // Previously, metaclass with internal linkage may have been defined. |
| // pass 'true' as 2nd argument so it is returned. |
| if (llvm::GlobalVariable *GV = CGM.getModule().getGlobalVariable(Name, |
| true)) { |
| assert(GV->getType()->getElementType() == ObjCTypes.ClassTy && |
| "Forward metaclass reference has incorrect type."); |
| return GV; |
| } else { |
| // Generate as an external reference to keep a consistent |
| // module. This will be patched up when we emit the metaclass. |
| return new llvm::GlobalVariable(CGM.getModule(), ObjCTypes.ClassTy, false, |
| llvm::GlobalValue::ExternalLinkage, |
| 0, |
| Name); |
| } |
| } |
| |
| llvm::Value *CGObjCMac::EmitSuperClassRef(const ObjCInterfaceDecl *ID) { |
| std::string Name = "\01L_OBJC_CLASS_" + ID->getNameAsString(); |
| |
| if (llvm::GlobalVariable *GV = CGM.getModule().getGlobalVariable(Name, |
| true)) { |
| assert(GV->getType()->getElementType() == ObjCTypes.ClassTy && |
| "Forward class metadata reference has incorrect type."); |
| return GV; |
| } else { |
| return new llvm::GlobalVariable(CGM.getModule(), ObjCTypes.ClassTy, false, |
| llvm::GlobalValue::ExternalLinkage, |
| 0, |
| Name); |
| } |
| } |
| |
| /* |
| struct objc_class_ext { |
| uint32_t size; |
| const char *weak_ivar_layout; |
| struct _objc_property_list *properties; |
| }; |
| */ |
| llvm::Constant * |
| CGObjCMac::EmitClassExtension(const ObjCImplementationDecl *ID) { |
| uint64_t Size = |
| CGM.getTargetData().getTypeAllocSize(ObjCTypes.ClassExtensionTy); |
| |
| llvm::Constant *Values[3]; |
| Values[0] = llvm::ConstantInt::get(ObjCTypes.IntTy, Size); |
| Values[1] = BuildIvarLayout(ID, false); |
| Values[2] = EmitPropertyList("\01l_OBJC_$_PROP_LIST_" + ID->getName(), |
| ID, ID->getClassInterface(), ObjCTypes); |
| |
| // Return null if no extension bits are used. |
| if (Values[1]->isNullValue() && Values[2]->isNullValue()) |
| return llvm::Constant::getNullValue(ObjCTypes.ClassExtensionPtrTy); |
| |
| llvm::Constant *Init = |
| llvm::ConstantStruct::get(ObjCTypes.ClassExtensionTy, Values); |
| return CreateMetadataVar("\01L_OBJC_CLASSEXT_" + ID->getName(), |
| Init, "__OBJC,__class_ext,regular,no_dead_strip", |
| 4, true); |
| } |
| |
| /* |
| struct objc_ivar { |
| char *ivar_name; |
| char *ivar_type; |
| int ivar_offset; |
| }; |
| |
| struct objc_ivar_list { |
| int ivar_count; |
| struct objc_ivar list[count]; |
| }; |
| */ |
| llvm::Constant *CGObjCMac::EmitIvarList(const ObjCImplementationDecl *ID, |
| bool ForClass) { |
| std::vector<llvm::Constant*> Ivars, Ivar(3); |
| |
| // When emitting the root class GCC emits ivar entries for the |
| // actual class structure. It is not clear if we need to follow this |
| // behavior; for now lets try and get away with not doing it. If so, |
| // the cleanest solution would be to make up an ObjCInterfaceDecl |
| // for the class. |
| if (ForClass) |
| return llvm::Constant::getNullValue(ObjCTypes.IvarListPtrTy); |
| |
| const ObjCInterfaceDecl *OID = ID->getClassInterface(); |
| |
| for (const ObjCIvarDecl *IVD = OID->all_declared_ivar_begin(); |
| IVD; IVD = IVD->getNextIvar()) { |
| // Ignore unnamed bit-fields. |
| if (!IVD->getDeclName()) |
| continue; |
| Ivar[0] = GetMethodVarName(IVD->getIdentifier()); |
| Ivar[1] = GetMethodVarType(IVD); |
| Ivar[2] = llvm::ConstantInt::get(ObjCTypes.IntTy, |
| ComputeIvarBaseOffset(CGM, OID, IVD)); |
| Ivars.push_back(llvm::ConstantStruct::get(ObjCTypes.IvarTy, Ivar)); |
| } |
| |
| // Return null for empty list. |
| if (Ivars.empty()) |
| return llvm::Constant::getNullValue(ObjCTypes.IvarListPtrTy); |
| |
| llvm::Constant *Values[2]; |
| Values[0] = llvm::ConstantInt::get(ObjCTypes.IntTy, Ivars.size()); |
| llvm::ArrayType *AT = llvm::ArrayType::get(ObjCTypes.IvarTy, |
| Ivars.size()); |
| Values[1] = llvm::ConstantArray::get(AT, Ivars); |
| llvm::Constant *Init = llvm::ConstantStruct::getAnon(Values); |
| |
| llvm::GlobalVariable *GV; |
| if (ForClass) |
| GV = CreateMetadataVar("\01L_OBJC_CLASS_VARIABLES_" + ID->getName(), |
| Init, "__OBJC,__class_vars,regular,no_dead_strip", |
| 4, true); |
| else |
| GV = CreateMetadataVar("\01L_OBJC_INSTANCE_VARIABLES_" + ID->getName(), |
| Init, "__OBJC,__instance_vars,regular,no_dead_strip", |
| 4, true); |
| return llvm::ConstantExpr::getBitCast(GV, ObjCTypes.IvarListPtrTy); |
| } |
| |
| /* |
| struct objc_method { |
| SEL method_name; |
| char *method_types; |
| void *method; |
| }; |
| |
| struct objc_method_list { |
| struct objc_method_list *obsolete; |
| int count; |
| struct objc_method methods_list[count]; |
| }; |
| */ |
| |
| /// GetMethodConstant - Return a struct objc_method constant for the |
| /// given method if it has been defined. The result is null if the |
| /// method has not been defined. The return value has type MethodPtrTy. |
| llvm::Constant *CGObjCMac::GetMethodConstant(const ObjCMethodDecl *MD) { |
| llvm::Function *Fn = GetMethodDefinition(MD); |
| if (!Fn) |
| return 0; |
| |
| std::vector<llvm::Constant*> Method(3); |
| Method[0] = |
| llvm::ConstantExpr::getBitCast(GetMethodVarName(MD->getSelector()), |
| ObjCTypes.SelectorPtrTy); |
| Method[1] = GetMethodVarType(MD); |
| Method[2] = llvm::ConstantExpr::getBitCast(Fn, ObjCTypes.Int8PtrTy); |
| return llvm::ConstantStruct::get(ObjCTypes.MethodTy, Method); |
| } |
| |
| llvm::Constant *CGObjCMac::EmitMethodList(llvm::Twine Name, |
| const char *Section, |
| const ConstantVector &Methods) { |
| // Return null for empty list. |
| if (Methods.empty()) |
| return llvm::Constant::getNullValue(ObjCTypes.MethodListPtrTy); |
| |
| llvm::Constant *Values[3]; |
| Values[0] = llvm::Constant::getNullValue(ObjCTypes.Int8PtrTy); |
| Values[1] = llvm::ConstantInt::get(ObjCTypes.IntTy, Methods.size()); |
| llvm::ArrayType *AT = llvm::ArrayType::get(ObjCTypes.MethodTy, |
| Methods.size()); |
| Values[2] = llvm::ConstantArray::get(AT, Methods); |
| llvm::Constant *Init = llvm::ConstantStruct::getAnon(Values); |
| |
| llvm::GlobalVariable *GV = CreateMetadataVar(Name, Init, Section, 4, true); |
| return llvm::ConstantExpr::getBitCast(GV, ObjCTypes.MethodListPtrTy); |
| } |
| |
| llvm::Function *CGObjCCommonMac::GenerateMethod(const ObjCMethodDecl *OMD, |
| const ObjCContainerDecl *CD) { |
| llvm::SmallString<256> Name; |
| GetNameForMethod(OMD, CD, Name); |
| |
| CodeGenTypes &Types = CGM.getTypes(); |
| llvm::FunctionType *MethodTy = |
| Types.GetFunctionType(Types.getFunctionInfo(OMD), OMD->isVariadic()); |
| llvm::Function *Method = |
| llvm::Function::Create(MethodTy, |
| llvm::GlobalValue::InternalLinkage, |
| Name.str(), |
| &CGM.getModule()); |
| MethodDefinitions.insert(std::make_pair(OMD, Method)); |
| |
| return Method; |
| } |
| |
| llvm::GlobalVariable * |
| CGObjCCommonMac::CreateMetadataVar(llvm::Twine Name, |
| llvm::Constant *Init, |
| const char *Section, |
| unsigned Align, |
| bool AddToUsed) { |
| llvm::Type *Ty = Init->getType(); |
| llvm::GlobalVariable *GV = |
| new llvm::GlobalVariable(CGM.getModule(), Ty, false, |
| llvm::GlobalValue::InternalLinkage, Init, Name); |
| if (Section) |
| GV->setSection(Section); |
| if (Align) |
| GV->setAlignment(Align); |
| if (AddToUsed) |
| CGM.AddUsedGlobal(GV); |
| return GV; |
| } |
| |
| llvm::Function *CGObjCMac::ModuleInitFunction() { |
| // Abuse this interface function as a place to finalize. |
| FinishModule(); |
| return NULL; |
| } |
| |
| llvm::Constant *CGObjCMac::GetPropertyGetFunction() { |
| return ObjCTypes.getGetPropertyFn(); |
| } |
| |
| llvm::Constant *CGObjCMac::GetPropertySetFunction() { |
| return ObjCTypes.getSetPropertyFn(); |
| } |
| |
| llvm::Constant *CGObjCMac::GetGetStructFunction() { |
| return ObjCTypes.getCopyStructFn(); |
| } |
| llvm::Constant *CGObjCMac::GetSetStructFunction() { |
| return ObjCTypes.getCopyStructFn(); |
| } |
| |
| llvm::Constant *CGObjCMac::EnumerationMutationFunction() { |
| return ObjCTypes.getEnumerationMutationFn(); |
| } |
| |
| void CGObjCMac::EmitTryStmt(CodeGenFunction &CGF, const ObjCAtTryStmt &S) { |
| return EmitTryOrSynchronizedStmt(CGF, S); |
| } |
| |
| void CGObjCMac::EmitSynchronizedStmt(CodeGenFunction &CGF, |
| const ObjCAtSynchronizedStmt &S) { |
| return EmitTryOrSynchronizedStmt(CGF, S); |
| } |
| |
| namespace { |
| struct PerformFragileFinally : EHScopeStack::Cleanup { |
| const Stmt &S; |
| llvm::Value *SyncArgSlot; |
| llvm::Value *CallTryExitVar; |
| llvm::Value *ExceptionData; |
| ObjCTypesHelper &ObjCTypes; |
| PerformFragileFinally(const Stmt *S, |
| llvm::Value *SyncArgSlot, |
| llvm::Value *CallTryExitVar, |
| llvm::Value *ExceptionData, |
| ObjCTypesHelper *ObjCTypes) |
| : S(*S), SyncArgSlot(SyncArgSlot), CallTryExitVar(CallTryExitVar), |
| ExceptionData(ExceptionData), ObjCTypes(*ObjCTypes) {} |
| |
| void Emit(CodeGenFunction &CGF, Flags flags) { |
| // Check whether we need to call objc_exception_try_exit. |
| // In optimized code, this branch will always be folded. |
| llvm::BasicBlock *FinallyCallExit = |
| CGF.createBasicBlock("finally.call_exit"); |
| llvm::BasicBlock *FinallyNoCallExit = |
| CGF.createBasicBlock("finally.no_call_exit"); |
| CGF.Builder.CreateCondBr(CGF.Builder.CreateLoad(CallTryExitVar), |
| FinallyCallExit, FinallyNoCallExit); |
| |
| CGF.EmitBlock(FinallyCallExit); |
| CGF.Builder.CreateCall(ObjCTypes.getExceptionTryExitFn(), ExceptionData) |
| ->setDoesNotThrow(); |
| |
| CGF.EmitBlock(FinallyNoCallExit); |
| |
| if (isa<ObjCAtTryStmt>(S)) { |
| if (const ObjCAtFinallyStmt* FinallyStmt = |
| cast<ObjCAtTryStmt>(S).getFinallyStmt()) { |
| // Save the current cleanup destination in case there's |
| // control flow inside the finally statement. |
| llvm::Value *CurCleanupDest = |
| CGF.Builder.CreateLoad(CGF.getNormalCleanupDestSlot()); |
| |
| CGF.EmitStmt(FinallyStmt->getFinallyBody()); |
| |
| if (CGF.HaveInsertPoint()) { |
| CGF.Builder.CreateStore(CurCleanupDest, |
| CGF.getNormalCleanupDestSlot()); |
| } else { |
| // Currently, the end of the cleanup must always exist. |
| CGF.EnsureInsertPoint(); |
| } |
| } |
| } else { |
| // Emit objc_sync_exit(expr); as finally's sole statement for |
| // @synchronized. |
| llvm::Value *SyncArg = CGF.Builder.CreateLoad(SyncArgSlot); |
| CGF.Builder.CreateCall(ObjCTypes.getSyncExitFn(), SyncArg) |
| ->setDoesNotThrow(); |
| } |
| } |
| }; |
| |
| class FragileHazards { |
| CodeGenFunction &CGF; |
| llvm::SmallVector<llvm::Value*, 20> Locals; |
| llvm::DenseSet<llvm::BasicBlock*> BlocksBeforeTry; |
| |
| llvm::InlineAsm *ReadHazard; |
| llvm::InlineAsm *WriteHazard; |
| |
| llvm::FunctionType *GetAsmFnType(); |
| |
| void collectLocals(); |
| void emitReadHazard(CGBuilderTy &Builder); |
| |
| public: |
| FragileHazards(CodeGenFunction &CGF); |
| |
| void emitWriteHazard(); |
| void emitHazardsInNewBlocks(); |
| }; |
| } |
| |
| /// Create the fragile-ABI read and write hazards based on the current |
| /// state of the function, which is presumed to be immediately prior |
| /// to a @try block. These hazards are used to maintain correct |
| /// semantics in the face of optimization and the fragile ABI's |
| /// cavalier use of setjmp/longjmp. |
| FragileHazards::FragileHazards(CodeGenFunction &CGF) : CGF(CGF) { |
| collectLocals(); |
| |
| if (Locals.empty()) return; |
| |
| // Collect all the blocks in the function. |
| for (llvm::Function::iterator |
| I = CGF.CurFn->begin(), E = CGF.CurFn->end(); I != E; ++I) |
| BlocksBeforeTry.insert(&*I); |
| |
| llvm::FunctionType *AsmFnTy = GetAsmFnType(); |
| |
| // Create a read hazard for the allocas. This inhibits dead-store |
| // optimizations and forces the values to memory. This hazard is |
| // inserted before any 'throwing' calls in the protected scope to |
| // reflect the possibility that the variables might be read from the |
| // catch block if the call throws. |
| { |
| std::string Constraint; |
| for (unsigned I = 0, E = Locals.size(); I != E; ++I) { |
| if (I) Constraint += ','; |
| Constraint += "*m"; |
| } |
| |
| ReadHazard = llvm::InlineAsm::get(AsmFnTy, "", Constraint, true, false); |
| } |
| |
| // Create a write hazard for the allocas. This inhibits folding |
| // loads across the hazard. This hazard is inserted at the |
| // beginning of the catch path to reflect the possibility that the |
| // variables might have been written within the protected scope. |
| { |
| std::string Constraint; |
| for (unsigned I = 0, E = Locals.size(); I != E; ++I) { |
| if (I) Constraint += ','; |
| Constraint += "=*m"; |
| } |
| |
| WriteHazard = llvm::InlineAsm::get(AsmFnTy, "", Constraint, true, false); |
| } |
| } |
| |
| /// Emit a write hazard at the current location. |
| void FragileHazards::emitWriteHazard() { |
| if (Locals.empty()) return; |
| |
| CGF.Builder.CreateCall(WriteHazard, Locals)->setDoesNotThrow(); |
| } |
| |
| void FragileHazards::emitReadHazard(CGBuilderTy &Builder) { |
| assert(!Locals.empty()); |
| Builder.CreateCall(ReadHazard, Locals)->setDoesNotThrow(); |
| } |
| |
| /// Emit read hazards in all the protected blocks, i.e. all the blocks |
| /// which have been inserted since the beginning of the try. |
| void FragileHazards::emitHazardsInNewBlocks() { |
| if (Locals.empty()) return; |
| |
| CGBuilderTy Builder(CGF.getLLVMContext()); |
| |
| // Iterate through all blocks, skipping those prior to the try. |
| for (llvm::Function::iterator |
| FI = CGF.CurFn->begin(), FE = CGF.CurFn->end(); FI != FE; ++FI) { |
| llvm::BasicBlock &BB = *FI; |
| if (BlocksBeforeTry.count(&BB)) continue; |
| |
| // Walk through all the calls in the block. |
| for (llvm::BasicBlock::iterator |
| BI = BB.begin(), BE = BB.end(); BI != BE; ++BI) { |
| llvm::Instruction &I = *BI; |
| |
| // Ignore instructions that aren't non-intrinsic calls. |
| // These are the only calls that can possibly call longjmp. |
| if (!isa<llvm::CallInst>(I) && !isa<llvm::InvokeInst>(I)) continue; |
| if (isa<llvm::IntrinsicInst>(I)) |
| continue; |
| |
| // Ignore call sites marked nounwind. This may be questionable, |
| // since 'nounwind' doesn't necessarily mean 'does not call longjmp'. |
| llvm::CallSite CS(&I); |
| if (CS.doesNotThrow()) continue; |
| |
| // Insert a read hazard before the call. This will ensure that |
| // any writes to the locals are performed before making the |
| // call. If the call throws, then this is sufficient to |
| // guarantee correctness as long as it doesn't also write to any |
| // locals. |
| Builder.SetInsertPoint(&BB, BI); |
| emitReadHazard(Builder); |
| } |
| } |
| } |
| |
| static void addIfPresent(llvm::DenseSet<llvm::Value*> &S, llvm::Value *V) { |
| if (V) S.insert(V); |
| } |
| |
| void FragileHazards::collectLocals() { |
| // Compute a set of allocas to ignore. |
| llvm::DenseSet<llvm::Value*> AllocasToIgnore; |
| addIfPresent(AllocasToIgnore, CGF.ReturnValue); |
| addIfPresent(AllocasToIgnore, CGF.NormalCleanupDest); |
| addIfPresent(AllocasToIgnore, CGF.EHCleanupDest); |
| |
| // Collect all the allocas currently in the function. This is |
| // probably way too aggressive. |
| llvm::BasicBlock &Entry = CGF.CurFn->getEntryBlock(); |
| for (llvm::BasicBlock::iterator |
| I = Entry.begin(), E = Entry.end(); I != E; ++I) |
| if (isa<llvm::AllocaInst>(*I) && !AllocasToIgnore.count(&*I)) |
| Locals.push_back(&*I); |
| } |
| |
| llvm::FunctionType *FragileHazards::GetAsmFnType() { |
| llvm::SmallVector<llvm::Type *, 16> tys(Locals.size()); |
| for (unsigned i = 0, e = Locals.size(); i != e; ++i) |
| tys[i] = Locals[i]->getType(); |
| return llvm::FunctionType::get(CGF.VoidTy, tys, false); |
| } |
| |
| /* |
| |
| Objective-C setjmp-longjmp (sjlj) Exception Handling |
| -- |
| |
| A catch buffer is a setjmp buffer plus: |
| - a pointer to the exception that was caught |
| - a pointer to the previous exception data buffer |
| - two pointers of reserved storage |
| Therefore catch buffers form a stack, with a pointer to the top |
| of the stack kept in thread-local storage. |
| |
| objc_exception_try_enter pushes a catch buffer onto the EH stack. |
| objc_exception_try_exit pops the given catch buffer, which is |
| required to be the top of the EH stack. |
| objc_exception_throw pops the top of the EH stack, writes the |
| thrown exception into the appropriate field, and longjmps |
| to the setjmp buffer. It crashes the process (with a printf |
| and an abort()) if there are no catch buffers on the stack. |
| objc_exception_extract just reads the exception pointer out of the |
| catch buffer. |
| |
| There's no reason an implementation couldn't use a light-weight |
| setjmp here --- something like __builtin_setjmp, but API-compatible |
| with the heavyweight setjmp. This will be more important if we ever |
| want to implement correct ObjC/C++ exception interactions for the |
| fragile ABI. |
| |
| Note that for this use of setjmp/longjmp to be correct, we may need |
| to mark some local variables volatile: if a non-volatile local |
| variable is modified between the setjmp and the longjmp, it has |
| indeterminate value. For the purposes of LLVM IR, it may be |
| sufficient to make loads and stores within the @try (to variables |
| declared outside the @try) volatile. This is necessary for |
| optimized correctness, but is not currently being done; this is |
| being tracked as rdar://problem/8160285 |
| |
| The basic framework for a @try-catch-finally is as follows: |
| { |
| objc_exception_data d; |
| id _rethrow = null; |
| bool _call_try_exit = true; |
| |
| objc_exception_try_enter(&d); |
| if (!setjmp(d.jmp_buf)) { |
| ... try body ... |
| } else { |
| // exception path |
| id _caught = objc_exception_extract(&d); |
| |
| // enter new try scope for handlers |
| if (!setjmp(d.jmp_buf)) { |
| ... match exception and execute catch blocks ... |
| |
| // fell off end, rethrow. |
| _rethrow = _caught; |
| ... jump-through-finally to finally_rethrow ... |
| } else { |
| // exception in catch block |
| _rethrow = objc_exception_extract(&d); |
| _call_try_exit = false; |
| ... jump-through-finally to finally_rethrow ... |
| } |
| } |
| ... jump-through-finally to finally_end ... |
| |
| finally: |
| if (_call_try_exit) |
| objc_exception_try_exit(&d); |
| |
| ... finally block .... |
| ... dispatch to finally destination ... |
| |
| finally_rethrow: |
| objc_exception_throw(_rethrow); |
| |
| finally_end: |
| } |
| |
| This framework differs slightly from the one gcc uses, in that gcc |
| uses _rethrow to determine if objc_exception_try_exit should be called |
| and if the object should be rethrown. This breaks in the face of |
| throwing nil and introduces unnecessary branches. |
| |
| We specialize this framework for a few particular circumstances: |
| |
| - If there are no catch blocks, then we avoid emitting the second |
| exception handling context. |
| |
| - If there is a catch-all catch block (i.e. @catch(...) or @catch(id |
| e)) we avoid emitting the code to rethrow an uncaught exception. |
| |
| - FIXME: If there is no @finally block we can do a few more |
| simplifications. |
| |
| Rethrows and Jumps-Through-Finally |
| -- |
| |
| '@throw;' is supported by pushing the currently-caught exception |
| onto ObjCEHStack while the @catch blocks are emitted. |
| |
| Branches through the @finally block are handled with an ordinary |
| normal cleanup. We do not register an EH cleanup; fragile-ABI ObjC |
| exceptions are not compatible with C++ exceptions, and this is |
| hardly the only place where this will go wrong. |
| |
| @synchronized(expr) { stmt; } is emitted as if it were: |
| id synch_value = expr; |
| objc_sync_enter(synch_value); |
| @try { stmt; } @finally { objc_sync_exit(synch_value); } |
| */ |
| |
| void CGObjCMac::EmitTryOrSynchronizedStmt(CodeGen::CodeGenFunction &CGF, |
| const Stmt &S) { |
| bool isTry = isa<ObjCAtTryStmt>(S); |
| |
| // A destination for the fall-through edges of the catch handlers to |
| // jump to. |
| CodeGenFunction::JumpDest FinallyEnd = |
| CGF.getJumpDestInCurrentScope("finally.end"); |
| |
| // A destination for the rethrow edge of the catch handlers to jump |
| // to. |
| CodeGenFunction::JumpDest FinallyRethrow = |
| CGF.getJumpDestInCurrentScope("finally.rethrow"); |
| |
| // For @synchronized, call objc_sync_enter(sync.expr). The |
| // evaluation of the expression must occur before we enter the |
| // @synchronized. We can't avoid a temp here because we need the |
| // value to be preserved. If the backend ever does liveness |
| // correctly after setjmp, this will be unnecessary. |
| llvm::Value *SyncArgSlot = 0; |
| if (!isTry) { |
| llvm::Value *SyncArg = |
| CGF.EmitScalarExpr(cast<ObjCAtSynchronizedStmt>(S).getSynchExpr()); |
| SyncArg = CGF.Builder.CreateBitCast(SyncArg, ObjCTypes.ObjectPtrTy); |
| CGF.Builder.CreateCall(ObjCTypes.getSyncEnterFn(), SyncArg) |
| ->setDoesNotThrow(); |
| |
| SyncArgSlot = CGF.CreateTempAlloca(SyncArg->getType(), "sync.arg"); |
| CGF.Builder.CreateStore(SyncArg, SyncArgSlot); |
| } |
| |
| // Allocate memory for the setjmp buffer. This needs to be kept |
| // live throughout the try and catch blocks. |
| llvm::Value *ExceptionData = CGF.CreateTempAlloca(ObjCTypes.ExceptionDataTy, |
| "exceptiondata.ptr"); |
| |
| // Create the fragile hazards. Note that this will not capture any |
| // of the allocas required for exception processing, but will |
| // capture the current basic block (which extends all the way to the |
| // setjmp call) as "before the @try". |
| FragileHazards Hazards(CGF); |
| |
| // Create a flag indicating whether the cleanup needs to call |
| // objc_exception_try_exit. This is true except when |
| // - no catches match and we're branching through the cleanup |
| // just to rethrow the exception, or |
| // - a catch matched and we're falling out of the catch handler. |
| // The setjmp-safety rule here is that we should always store to this |
| // variable in a place that dominates the branch through the cleanup |
| // without passing through any setjmps. |
| llvm::Value *CallTryExitVar = CGF.CreateTempAlloca(CGF.Builder.getInt1Ty(), |
| "_call_try_exit"); |
| |
| // A slot containing the exception to rethrow. Only needed when we |
| // have both a @catch and a @finally. |
| llvm::Value *PropagatingExnVar = 0; |
| |
| // Push a normal cleanup to leave the try scope. |
| CGF.EHStack.pushCleanup<PerformFragileFinally>(NormalCleanup, &S, |
| SyncArgSlot, |
| CallTryExitVar, |
| ExceptionData, |
| &ObjCTypes); |
| |
| // Enter a try block: |
| // - Call objc_exception_try_enter to push ExceptionData on top of |
| // the EH stack. |
| CGF.Builder.CreateCall(ObjCTypes.getExceptionTryEnterFn(), ExceptionData) |
| ->setDoesNotThrow(); |
| |
| // - Call setjmp on the exception data buffer. |
| llvm::Constant *Zero = llvm::ConstantInt::get(CGF.Builder.getInt32Ty(), 0); |
| llvm::Value *GEPIndexes[] = { Zero, Zero, Zero }; |
| llvm::Value *SetJmpBuffer = |
| CGF.Builder.CreateGEP(ExceptionData, GEPIndexes, "setjmp_buffer"); |
| llvm::CallInst *SetJmpResult = |
| CGF.Builder.CreateCall(ObjCTypes.getSetJmpFn(), SetJmpBuffer, "setjmp_result"); |
| SetJmpResult->setDoesNotThrow(); |
| |
| // If setjmp returned 0, enter the protected block; otherwise, |
| // branch to the handler. |
| llvm::BasicBlock *TryBlock = CGF.createBasicBlock("try"); |
| llvm::BasicBlock *TryHandler = CGF.createBasicBlock("try.handler"); |
| llvm::Value *DidCatch = |
| CGF.Builder.CreateIsNotNull(SetJmpResult, "did_catch_exception"); |
| CGF.Builder.CreateCondBr(DidCatch, TryHandler, TryBlock); |
| |
| // Emit the protected block. |
| CGF.EmitBlock(TryBlock); |
| CGF.Builder.CreateStore(CGF.Builder.getTrue(), CallTryExitVar); |
| CGF.EmitStmt(isTry ? cast<ObjCAtTryStmt>(S).getTryBody() |
| : cast<ObjCAtSynchronizedStmt>(S).getSynchBody()); |
| |
| CGBuilderTy::InsertPoint TryFallthroughIP = CGF.Builder.saveAndClearIP(); |
| |
| // Emit the exception handler block. |
| CGF.EmitBlock(TryHandler); |
| |
| // Don't optimize loads of the in-scope locals across this point. |
| Hazards.emitWriteHazard(); |
| |
| // For a @synchronized (or a @try with no catches), just branch |
| // through the cleanup to the rethrow block. |
| if (!isTry || !cast<ObjCAtTryStmt>(S).getNumCatchStmts()) { |
| // Tell the cleanup not to re-pop the exit. |
| CGF.Builder.CreateStore(CGF.Builder.getFalse(), CallTryExitVar); |
| CGF.EmitBranchThroughCleanup(FinallyRethrow); |
| |
| // Otherwise, we have to match against the caught exceptions. |
| } else { |
| // Retrieve the exception object. We may emit multiple blocks but |
| // nothing can cross this so the value is already in SSA form. |
| llvm::CallInst *Caught = |
| CGF.Builder.CreateCall(ObjCTypes.getExceptionExtractFn(), |
| ExceptionData, "caught"); |
| Caught->setDoesNotThrow(); |
| |
| // Push the exception to rethrow onto the EH value stack for the |
| // benefit of any @throws in the handlers. |
| CGF.ObjCEHValueStack.push_back(Caught); |
| |
| const ObjCAtTryStmt* AtTryStmt = cast<ObjCAtTryStmt>(&S); |
| |
| bool HasFinally = (AtTryStmt->getFinallyStmt() != 0); |
| |
| llvm::BasicBlock *CatchBlock = 0; |
| llvm::BasicBlock *CatchHandler = 0; |
| if (HasFinally) { |
| // Save the currently-propagating exception before |
| // objc_exception_try_enter clears the exception slot. |
| PropagatingExnVar = CGF.CreateTempAlloca(Caught->getType(), |
| "propagating_exception"); |
| CGF.Builder.CreateStore(Caught, PropagatingExnVar); |
| |
| // Enter a new exception try block (in case a @catch block |
| // throws an exception). |
| CGF.Builder.CreateCall(ObjCTypes.getExceptionTryEnterFn(), ExceptionData) |
| ->setDoesNotThrow(); |
| |
| llvm::CallInst *SetJmpResult = |
| CGF.Builder.CreateCall(ObjCTypes.getSetJmpFn(), SetJmpBuffer, |
| "setjmp.result"); |
| SetJmpResult->setDoesNotThrow(); |
| |
| llvm::Value *Threw = |
| CGF.Builder.CreateIsNotNull(SetJmpResult, "did_catch_exception"); |
| |
| CatchBlock = CGF.createBasicBlock("catch"); |
| CatchHandler = CGF.createBasicBlock("catch_for_catch"); |
| CGF.Builder.CreateCondBr(Threw, CatchHandler, CatchBlock); |
| |
| CGF.EmitBlock(CatchBlock); |
| } |
| |
| CGF.Builder.CreateStore(CGF.Builder.getInt1(HasFinally), CallTryExitVar); |
| |
| // Handle catch list. As a special case we check if everything is |
| // matched and avoid generating code for falling off the end if |
| // so. |
| bool AllMatched = false; |
| for (unsigned I = 0, N = AtTryStmt->getNumCatchStmts(); I != N; ++I) { |
| const ObjCAtCatchStmt *CatchStmt = AtTryStmt->getCatchStmt(I); |
| |
| const VarDecl *CatchParam = CatchStmt->getCatchParamDecl(); |
| const ObjCObjectPointerType *OPT = 0; |
| |
| // catch(...) always matches. |
| if (!CatchParam) { |
| AllMatched = true; |
| } else { |
| OPT = CatchParam->getType()->getAs<ObjCObjectPointerType>(); |
| |
| // catch(id e) always matches under this ABI, since only |
| // ObjC exceptions end up here in the first place. |
| // FIXME: For the time being we also match id<X>; this should |
| // be rejected by Sema instead. |
| if (OPT && (OPT->isObjCIdType() || OPT->isObjCQualifiedIdType())) |
| AllMatched = true; |
| } |
| |
| // If this is a catch-all, we don't need to test anything. |
| if (AllMatched) { |
| CodeGenFunction::RunCleanupsScope CatchVarCleanups(CGF); |
| |
| if (CatchParam) { |
| CGF.EmitAutoVarDecl(*CatchParam); |
| assert(CGF.HaveInsertPoint() && "DeclStmt destroyed insert point?"); |
| |
| // These types work out because ConvertType(id) == i8*. |
| CGF.Builder.CreateStore(Caught, CGF.GetAddrOfLocalVar(CatchParam)); |
| } |
| |
| CGF.EmitStmt(CatchStmt->getCatchBody()); |
| |
| // The scope of the catch variable ends right here. |
| CatchVarCleanups.ForceCleanup(); |
| |
| CGF.EmitBranchThroughCleanup(FinallyEnd); |
| break; |
| } |
| |
| assert(OPT && "Unexpected non-object pointer type in @catch"); |
| const ObjCObjectType *ObjTy = OPT->getObjectType(); |
| |
| // FIXME: @catch (Class c) ? |
| ObjCInterfaceDecl *IDecl = ObjTy->getInterface(); |
| assert(IDecl && "Catch parameter must have Objective-C type!"); |
| |
| // Check if the @catch block matches the exception object. |
| llvm::Value *Class = EmitClassRef(CGF.Builder, IDecl); |
| |
| llvm::CallInst *Match = |
| CGF.Builder.CreateCall2(ObjCTypes.getExceptionMatchFn(), |
| Class, Caught, "match"); |
| Match->setDoesNotThrow(); |
| |
| llvm::BasicBlock *MatchedBlock = CGF.createBasicBlock("match"); |
| llvm::BasicBlock *NextCatchBlock = CGF.createBasicBlock("catch.next"); |
| |
| CGF.Builder.CreateCondBr(CGF.Builder.CreateIsNotNull(Match, "matched"), |
| MatchedBlock, NextCatchBlock); |
| |
| // Emit the @catch block. |
| CGF.EmitBlock(MatchedBlock); |
| |
| // Collect any cleanups for the catch variable. The scope lasts until |
| // the end of the catch body. |
| CodeGenFunction::RunCleanupsScope CatchVarCleanups(CGF); |
| |
| CGF.EmitAutoVarDecl(*CatchParam); |
| assert(CGF.HaveInsertPoint() && "DeclStmt destroyed insert point?"); |
| |
| // Initialize the catch variable. |
| llvm::Value *Tmp = |
| CGF.Builder.CreateBitCast(Caught, |
| CGF.ConvertType(CatchParam->getType()), |
| "tmp"); |
| CGF.Builder.CreateStore(Tmp, CGF.GetAddrOfLocalVar(CatchParam)); |
| |
| CGF.EmitStmt(CatchStmt->getCatchBody()); |
| |
| // We're done with the catch variable. |
| CatchVarCleanups.ForceCleanup(); |
| |
| CGF.EmitBranchThroughCleanup(FinallyEnd); |
| |
| CGF.EmitBlock(NextCatchBlock); |
| } |
| |
| CGF.ObjCEHValueStack.pop_back(); |
| |
| // If nothing wanted anything to do with the caught exception, |
| // kill the extract call. |
| if (Caught->use_empty()) |
| Caught->eraseFromParent(); |
| |
| if (!AllMatched) |
| CGF.EmitBranchThroughCleanup(FinallyRethrow); |
| |
| if (HasFinally) { |
| // Emit the exception handler for the @catch blocks. |
| CGF.EmitBlock(CatchHandler); |
| |
| // In theory we might now need a write hazard, but actually it's |
| // unnecessary because there's no local-accessing code between |
| // the try's write hazard and here. |
| //Hazards.emitWriteHazard(); |
| |
| // Extract the new exception and save it to the |
| // propagating-exception slot. |
| assert(PropagatingExnVar); |
| llvm::CallInst *NewCaught = |
| CGF.Builder.CreateCall(ObjCTypes.getExceptionExtractFn(), |
| ExceptionData, "caught"); |
| NewCaught->setDoesNotThrow(); |
| CGF.Builder.CreateStore(NewCaught, PropagatingExnVar); |
| |
| // Don't pop the catch handler; the throw already did. |
| CGF.Builder.CreateStore(CGF.Builder.getFalse(), CallTryExitVar); |
| CGF.EmitBranchThroughCleanup(FinallyRethrow); |
| } |
| } |
| |
| // Insert read hazards as required in the new blocks. |
| Hazards.emitHazardsInNewBlocks(); |
| |
| // Pop the cleanup. |
| CGF.Builder.restoreIP(TryFallthroughIP); |
| if (CGF.HaveInsertPoint()) |
| CGF.Builder.CreateStore(CGF.Builder.getTrue(), CallTryExitVar); |
| CGF.PopCleanupBlock(); |
| CGF.EmitBlock(FinallyEnd.getBlock(), true); |
| |
| // Emit the rethrow block. |
| CGBuilderTy::InsertPoint SavedIP = CGF.Builder.saveAndClearIP(); |
| CGF.EmitBlock(FinallyRethrow.getBlock(), true); |
| if (CGF.HaveInsertPoint()) { |
| // If we have a propagating-exception variable, check it. |
| llvm::Value *PropagatingExn; |
| if (PropagatingExnVar) { |
| PropagatingExn = CGF.Builder.CreateLoad(PropagatingExnVar); |
| |
| // Otherwise, just look in the buffer for the exception to throw. |
| } else { |
| llvm::CallInst *Caught = |
| CGF.Builder.CreateCall(ObjCTypes.getExceptionExtractFn(), |
| ExceptionData); |
| Caught->setDoesNotThrow(); |
| PropagatingExn = Caught; |
| } |
| |
| CGF.Builder.CreateCall(ObjCTypes.getExceptionThrowFn(), PropagatingExn) |
| ->setDoesNotThrow(); |
| CGF.Builder.CreateUnreachable(); |
| } |
| |
| CGF.Builder.restoreIP(SavedIP); |
| } |
| |
| void CGObjCMac::EmitThrowStmt(CodeGen::CodeGenFunction &CGF, |
| const ObjCAtThrowStmt &S) { |
| llvm::Value *ExceptionAsObject; |
| |
| if (const Expr *ThrowExpr = S.getThrowExpr()) { |
| llvm::Value *Exception = CGF.EmitScalarExpr(ThrowExpr); |
| ExceptionAsObject = |
| CGF.Builder.CreateBitCast(Exception, ObjCTypes.ObjectPtrTy, "tmp"); |
| } else { |
| assert((!CGF.ObjCEHValueStack.empty() && CGF.ObjCEHValueStack.back()) && |
| "Unexpected rethrow outside @catch block."); |
| ExceptionAsObject = CGF.ObjCEHValueStack.back(); |
| } |
| |
| CGF.Builder.CreateCall(ObjCTypes.getExceptionThrowFn(), ExceptionAsObject) |
| ->setDoesNotReturn(); |
| CGF.Builder.CreateUnreachable(); |
| |
| // Clear the insertion point to indicate we are in unreachable code. |
| CGF.Builder.ClearInsertionPoint(); |
| } |
| |
| /// EmitObjCWeakRead - Code gen for loading value of a __weak |
| /// object: objc_read_weak (id *src) |
| /// |
| llvm::Value * CGObjCMac::EmitObjCWeakRead(CodeGen::CodeGenFunction &CGF, |
| llvm::Value *AddrWeakObj) { |
| llvm::Type* DestTy = |
| cast<llvm::PointerType>(AddrWeakObj->getType())->getElementType(); |
| AddrWeakObj = CGF.Builder.CreateBitCast(AddrWeakObj, |
| ObjCTypes.PtrObjectPtrTy); |
| llvm::Value *read_weak = CGF.Builder.CreateCall(ObjCTypes.getGcReadWeakFn(), |
| AddrWeakObj, "weakread"); |
| read_weak = CGF.Builder.CreateBitCast(read_weak, DestTy); |
| return read_weak; |
| } |
| |
| /// EmitObjCWeakAssign - Code gen for assigning to a __weak object. |
| /// objc_assign_weak (id src, id *dst) |
| /// |
| void CGObjCMac::EmitObjCWeakAssign(CodeGen::CodeGenFunction &CGF, |
| llvm::Value *src, llvm::Value *dst) { |
| llvm::Type * SrcTy = src->getType(); |
| if (!isa<llvm::PointerType>(SrcTy)) { |
| unsigned Size = CGM.getTargetData().getTypeAllocSize(SrcTy); |
| assert(Size <= 8 && "does not support size > 8"); |
| src = (Size == 4) ? CGF.Builder.CreateBitCast(src, ObjCTypes.IntTy) |
| : CGF.Builder.CreateBitCast(src, ObjCTypes.LongLongTy); |
| src = CGF.Builder.CreateIntToPtr(src, ObjCTypes.Int8PtrTy); |
| } |
| src = CGF.Builder.CreateBitCast(src, ObjCTypes.ObjectPtrTy); |
| dst = CGF.Builder.CreateBitCast(dst, ObjCTypes.PtrObjectPtrTy); |
| CGF.Builder.CreateCall2(ObjCTypes.getGcAssignWeakFn(), |
| src, dst, "weakassign"); |
| return; |
| } |
| |
| /// EmitObjCGlobalAssign - Code gen for assigning to a __strong object. |
| /// objc_assign_global (id src, id *dst) |
| /// |
| void CGObjCMac::EmitObjCGlobalAssign(CodeGen::CodeGenFunction &CGF, |
| llvm::Value *src, llvm::Value *dst, |
| bool threadlocal) { |
| llvm::Type * SrcTy = src->getType(); |
| if (!isa<llvm::PointerType>(SrcTy)) { |
| unsigned Size = CGM.getTargetData().getTypeAllocSize(SrcTy); |
| assert(Size <= 8 && "does not support size > 8"); |
| src = (Size == 4) ? CGF.Builder.CreateBitCast(src, ObjCTypes.IntTy) |
| : CGF.Builder.CreateBitCast(src, ObjCTypes.LongLongTy); |
| src = CGF.Builder.CreateIntToPtr(src, ObjCTypes.Int8PtrTy); |
| } |
| src = CGF.Builder.CreateBitCast(src, ObjCTypes.ObjectPtrTy); |
| dst = CGF.Builder.CreateBitCast(dst, ObjCTypes.PtrObjectPtrTy); |
| if (!threadlocal) |
| CGF.Builder.CreateCall2(ObjCTypes.getGcAssignGlobalFn(), |
| src, dst, "globalassign"); |
| else |
| CGF.Builder.CreateCall2(ObjCTypes.getGcAssignThreadLocalFn(), |
| src, dst, "threadlocalassign"); |
| return; |
| } |
| |
| /// EmitObjCIvarAssign - Code gen for assigning to a __strong object. |
| /// objc_assign_ivar (id src, id *dst, ptrdiff_t ivaroffset) |
| /// |
| void CGObjCMac::EmitObjCIvarAssign(CodeGen::CodeGenFunction &CGF, |
| llvm::Value *src, llvm::Value *dst, |
| llvm::Value *ivarOffset) { |
| assert(ivarOffset && "EmitObjCIvarAssign - ivarOffset is NULL"); |
| llvm::Type * SrcTy = src->getType(); |
| if (!isa<llvm::PointerType>(SrcTy)) { |
| unsigned Size = CGM.getTargetData().getTypeAllocSize(SrcTy); |
| assert(Size <= 8 && "does not support size > 8"); |
| src = (Size == 4) ? CGF.Builder.CreateBitCast(src, ObjCTypes.IntTy) |
| : CGF.Builder.CreateBitCast(src, ObjCTypes.LongLongTy); |
| src = CGF.Builder.CreateIntToPtr(src, ObjCTypes.Int8PtrTy); |
| } |
| src = CGF.Builder.CreateBitCast(src, ObjCTypes.ObjectPtrTy); |
| dst = CGF.Builder.CreateBitCast(dst, ObjCTypes.PtrObjectPtrTy); |
| CGF.Builder.CreateCall3(ObjCTypes.getGcAssignIvarFn(), |
| src, dst, ivarOffset); |
| return; |
| } |
| |
| /// EmitObjCStrongCastAssign - Code gen for assigning to a __strong cast object. |
| /// objc_assign_strongCast (id src, id *dst) |
| /// |
| void CGObjCMac::EmitObjCStrongCastAssign(CodeGen::CodeGenFunction &CGF, |
| llvm::Value *src, llvm::Value *dst) { |
| llvm::Type * SrcTy = src->getType(); |
| if (!isa<llvm::PointerType>(SrcTy)) { |
| unsigned Size = CGM.getTargetData().getTypeAllocSize(SrcTy); |
| assert(Size <= 8 && "does not support size > 8"); |
| src = (Size == 4) ? CGF.Builder.CreateBitCast(src, ObjCTypes.IntTy) |
| : CGF.Builder.CreateBitCast(src, ObjCTypes.LongLongTy); |
| src = CGF.Builder.CreateIntToPtr(src, ObjCTypes.Int8PtrTy); |
| } |
| src = CGF.Builder.CreateBitCast(src, ObjCTypes.ObjectPtrTy); |
| dst = CGF.Builder.CreateBitCast(dst, ObjCTypes.PtrObjectPtrTy); |
| CGF.Builder.CreateCall2(ObjCTypes.getGcAssignStrongCastFn(), |
| src, dst, "weakassign"); |
| return; |
| } |
| |
| void CGObjCMac::EmitGCMemmoveCollectable(CodeGen::CodeGenFunction &CGF, |
| llvm::Value *DestPtr, |
| llvm::Value *SrcPtr, |
| llvm::Value *size) { |
| SrcPtr = CGF.Builder.CreateBitCast(SrcPtr, ObjCTypes.Int8PtrTy); |
| DestPtr = CGF.Builder.CreateBitCast(DestPtr, ObjCTypes.Int8PtrTy); |
| CGF.Builder.CreateCall3(ObjCTypes.GcMemmoveCollectableFn(), |
| DestPtr, SrcPtr, size); |
| return; |
| } |
| |
| /// EmitObjCValueForIvar - Code Gen for ivar reference. |
| /// |
| LValue CGObjCMac::EmitObjCValueForIvar(CodeGen::CodeGenFunction &CGF, |
| QualType ObjectTy, |
| llvm::Value *BaseValue, |
| const ObjCIvarDecl *Ivar, |
| unsigned CVRQualifiers) { |
| const ObjCInterfaceDecl *ID = |
| ObjectTy->getAs<ObjCObjectType>()->getInterface(); |
| return EmitValueForIvarAtOffset(CGF, ID, BaseValue, Ivar, CVRQualifiers, |
| EmitIvarOffset(CGF, ID, Ivar)); |
| } |
| |
| llvm::Value *CGObjCMac::EmitIvarOffset(CodeGen::CodeGenFunction &CGF, |
| const ObjCInterfaceDecl *Interface, |
| const ObjCIvarDecl *Ivar) { |
| uint64_t Offset = ComputeIvarBaseOffset(CGM, Interface, Ivar); |
| return llvm::ConstantInt::get( |
| CGM.getTypes().ConvertType(CGM.getContext().LongTy), |
| Offset); |
| } |
| |
| /* *** Private Interface *** */ |
| |
| /// EmitImageInfo - Emit the image info marker used to encode some module |
| /// level information. |
| /// |
| /// See: <rdr://4810609&4810587&4810587> |
| /// struct IMAGE_INFO { |
| /// unsigned version; |
| /// unsigned flags; |
| /// }; |
| enum ImageInfoFlags { |
| eImageInfo_FixAndContinue = (1 << 0), |
| eImageInfo_GarbageCollected = (1 << 1), |
| eImageInfo_GCOnly = (1 << 2), |
| eImageInfo_OptimizedByDyld = (1 << 3), // FIXME: When is this set. |
| |
| // A flag indicating that the module has no instances of a @synthesize of a |
| // superclass variable. <rdar://problem/6803242> |
| eImageInfo_CorrectedSynthesize = (1 << 4) |
| }; |
| |
| void CGObjCCommonMac::EmitImageInfo() { |
| unsigned version = 0; // Version is unused? |
| unsigned flags = 0; |
| |
| // FIXME: Fix and continue? |
| if (CGM.getLangOptions().getGCMode() != LangOptions::NonGC) |
| flags |= eImageInfo_GarbageCollected; |
| if (CGM.getLangOptions().getGCMode() == LangOptions::GCOnly) |
| flags |= eImageInfo_GCOnly; |
| |
| // We never allow @synthesize of a superclass property. |
| flags |= eImageInfo_CorrectedSynthesize; |
| |
| llvm::Type *Int32Ty = llvm::Type::getInt32Ty(VMContext); |
| |
| // Emitted as int[2]; |
| llvm::Constant *values[2] = { |
| llvm::ConstantInt::get(Int32Ty, version), |
| llvm::ConstantInt::get(Int32Ty, flags) |
| }; |
| llvm::ArrayType *AT = llvm::ArrayType::get(Int32Ty, 2); |
| |
| const char *Section; |
| if (ObjCABI == 1) |
| Section = "__OBJC, __image_info,regular"; |
| else |
| Section = "__DATA, __objc_imageinfo, regular, no_dead_strip"; |
| llvm::GlobalVariable *GV = |
| CreateMetadataVar("\01L_OBJC_IMAGE_INFO", |
| llvm::ConstantArray::get(AT, values), |
| Section, |
| 0, |
| true); |
| GV->setConstant(true); |
| } |
| |
| |
| // struct objc_module { |
| // unsigned long version; |
| // unsigned long size; |
| // const char *name; |
| // Symtab symtab; |
| // }; |
| |
| // FIXME: Get from somewhere |
| static const int ModuleVersion = 7; |
| |
| void CGObjCMac::EmitModuleInfo() { |
| uint64_t Size = CGM.getTargetData().getTypeAllocSize(ObjCTypes.ModuleTy); |
| |
| std::vector<llvm::Constant*> Values(4); |
| Values[0] = llvm::ConstantInt::get(ObjCTypes.LongTy, ModuleVersion); |
| Values[1] = llvm::ConstantInt::get(ObjCTypes.LongTy, Size); |
| // This used to be the filename, now it is unused. <rdr://4327263> |
| Values[2] = GetClassName(&CGM.getContext().Idents.get("")); |
| Values[3] = EmitModuleSymbols(); |
| CreateMetadataVar("\01L_OBJC_MODULES", |
| llvm::ConstantStruct::get(ObjCTypes.ModuleTy, Values), |
| "__OBJC,__module_info,regular,no_dead_strip", |
| 4, true); |
| } |
| |
| llvm::Constant *CGObjCMac::EmitModuleSymbols() { |
| unsigned NumClasses = DefinedClasses.size(); |
| unsigned NumCategories = DefinedCategories.size(); |
| |
| // Return null if no symbols were defined. |
| if (!NumClasses && !NumCategories) |
| return llvm::Constant::getNullValue(ObjCTypes.SymtabPtrTy); |
| |
| llvm::Constant *Values[5]; |
| Values[0] = llvm::ConstantInt::get(ObjCTypes.LongTy, 0); |
| Values[1] = llvm::Constant::getNullValue(ObjCTypes.SelectorPtrTy); |
| Values[2] = llvm::ConstantInt::get(ObjCTypes.ShortTy, NumClasses); |
| Values[3] = llvm::ConstantInt::get(ObjCTypes.ShortTy, NumCategories); |
| |
| // The runtime expects exactly the list of defined classes followed |
| // by the list of defined categories, in a single array. |
| std::vector<llvm::Constant*> Symbols(NumClasses + NumCategories); |
| for (unsigned i=0; i<NumClasses; i++) |
| Symbols[i] = llvm::ConstantExpr::getBitCast(DefinedClasses[i], |
| ObjCTypes.Int8PtrTy); |
| for (unsigned i=0; i<NumCategories; i++) |
| Symbols[NumClasses + i] = |
| llvm::ConstantExpr::getBitCast(DefinedCategories[i], |
| ObjCTypes.Int8PtrTy); |
| |
| Values[4] = |
| llvm::ConstantArray::get(llvm::ArrayType::get(ObjCTypes.Int8PtrTy, |
| NumClasses + NumCategories), |
| Symbols); |
| |
| llvm::Constant *Init = llvm::ConstantStruct::getAnon(Values); |
| |
| llvm::GlobalVariable *GV = |
| CreateMetadataVar("\01L_OBJC_SYMBOLS", Init, |
| "__OBJC,__symbols,regular,no_dead_strip", |
| 4, true); |
| return llvm::ConstantExpr::getBitCast(GV, ObjCTypes.SymtabPtrTy); |
| } |
| |
| llvm::Value *CGObjCMac::EmitClassRefFromId(CGBuilderTy &Builder, |
| IdentifierInfo *II) { |
| LazySymbols.insert(II); |
| |
| llvm::GlobalVariable *&Entry = ClassReferences[II]; |
| |
| if (!Entry) { |
| llvm::Constant *Casted = |
| llvm::ConstantExpr::getBitCast(GetClassName(II), |
| ObjCTypes.ClassPtrTy); |
| Entry = |
| CreateMetadataVar("\01L_OBJC_CLASS_REFERENCES_", Casted, |
| "__OBJC,__cls_refs,literal_pointers,no_dead_strip", |
| 4, true); |
| } |
| |
| return Builder.CreateLoad(Entry, "tmp"); |
| } |
| |
| llvm::Value *CGObjCMac::EmitClassRef(CGBuilderTy &Builder, |
| const ObjCInterfaceDecl *ID) { |
| return EmitClassRefFromId(Builder, ID->getIdentifier()); |
| } |
| |
| llvm::Value *CGObjCMac::EmitNSAutoreleasePoolClassRef(CGBuilderTy &Builder) { |
| IdentifierInfo *II = &CGM.getContext().Idents.get("NSAutoreleasePool"); |
| return EmitClassRefFromId(Builder, II); |
| } |
| |
| llvm::Value *CGObjCMac::EmitSelector(CGBuilderTy &Builder, Selector Sel, |
| bool lvalue) { |
| llvm::GlobalVariable *&Entry = SelectorReferences[Sel]; |
| |
| if (!Entry) { |
| llvm::Constant *Casted = |
| llvm::ConstantExpr::getBitCast(GetMethodVarName(Sel), |
| ObjCTypes.SelectorPtrTy); |
| Entry = |
| CreateMetadataVar("\01L_OBJC_SELECTOR_REFERENCES_", Casted, |
| "__OBJC,__message_refs,literal_pointers,no_dead_strip", |
| 4, true); |
| } |
| |
| if (lvalue) |
| return Entry; |
| return Builder.CreateLoad(Entry, "tmp"); |
| } |
| |
| llvm::Constant *CGObjCCommonMac::GetClassName(IdentifierInfo *Ident) { |
| llvm::GlobalVariable *&Entry = ClassNames[Ident]; |
| |
| if (!Entry) |
| Entry = CreateMetadataVar("\01L_OBJC_CLASS_NAME_", |
| llvm::ConstantArray::get(VMContext, |
| Ident->getNameStart()), |
| ((ObjCABI == 2) ? |
| "__TEXT,__objc_classname,cstring_literals" : |
| "__TEXT,__cstring,cstring_literals"), |
| 1, true); |
| |
| return getConstantGEP(VMContext, Entry, 0, 0); |
| } |
| |
| llvm::Function *CGObjCCommonMac::GetMethodDefinition(const ObjCMethodDecl *MD) { |
| llvm::DenseMap<const ObjCMethodDecl*, llvm::Function*>::iterator |
| I = MethodDefinitions.find(MD); |
| if (I != MethodDefinitions.end()) |
| return I->second; |
| |
| if (MD->hasBody() && MD->getPCHLevel() > 0) { |
| // MD isn't emitted yet because it comes from PCH. |
| CGM.EmitTopLevelDecl(const_cast<ObjCMethodDecl*>(MD)); |
| assert(MethodDefinitions[MD] && "EmitTopLevelDecl didn't emit the method!"); |
| return MethodDefinitions[MD]; |
| } |
| |
| return NULL; |
| } |
| |
| /// GetIvarLayoutName - Returns a unique constant for the given |
| /// ivar layout bitmap. |
| llvm::Constant *CGObjCCommonMac::GetIvarLayoutName(IdentifierInfo *Ident, |
| const ObjCCommonTypesHelper &ObjCTypes) { |
| return llvm::Constant::getNullValue(ObjCTypes.Int8PtrTy); |
| } |
| |
| void CGObjCCommonMac::BuildAggrIvarRecordLayout(const RecordType *RT, |
| unsigned int BytePos, |
| bool ForStrongLayout, |
| bool &HasUnion) { |
| const RecordDecl *RD = RT->getDecl(); |
| // FIXME - Use iterator. |
| SmallVector<const FieldDecl*, 16> Fields(RD->field_begin(), RD->field_end()); |
| llvm::Type *Ty = CGM.getTypes().ConvertType(QualType(RT, 0)); |
| const llvm::StructLayout *RecLayout = |
| CGM.getTargetData().getStructLayout(cast<llvm::StructType>(Ty)); |
| |
| BuildAggrIvarLayout(0, RecLayout, RD, Fields, BytePos, |
| ForStrongLayout, HasUnion); |
| } |
| |
| void CGObjCCommonMac::BuildAggrIvarLayout(const ObjCImplementationDecl *OI, |
| const llvm::StructLayout *Layout, |
| const RecordDecl *RD, |
| const SmallVectorImpl<const FieldDecl*> &RecFields, |
| unsigned int BytePos, bool ForStrongLayout, |
| bool &HasUnion) { |
| bool IsUnion = (RD && RD->isUnion()); |
| uint64_t MaxUnionIvarSize = 0; |
| uint64_t MaxSkippedUnionIvarSize = 0; |
| const FieldDecl *MaxField = 0; |
| const FieldDecl *MaxSkippedField = 0; |
| const FieldDecl *LastFieldBitfieldOrUnnamed = 0; |
| uint64_t MaxFieldOffset = 0; |
| uint64_t MaxSkippedFieldOffset = 0; |
| uint64_t LastBitfieldOrUnnamedOffset = 0; |
| uint64_t FirstFieldDelta = 0; |
| |
| if (RecFields.empty()) |
| return; |
| unsigned WordSizeInBits = CGM.getContext().Target.getPointerWidth(0); |
| unsigned ByteSizeInBits = CGM.getContext().Target.getCharWidth(); |
| if (!RD && CGM.getLangOptions().ObjCAutoRefCount) { |
| const FieldDecl *FirstField = RecFields[0]; |
| FirstFieldDelta = |
| ComputeIvarBaseOffset(CGM, OI, cast<ObjCIvarDecl>(FirstField)); |
| } |
| |
| for (unsigned i = 0, e = RecFields.size(); i != e; ++i) { |
| const FieldDecl *Field = RecFields[i]; |
| uint64_t FieldOffset; |
| if (RD) { |
| // Note that 'i' here is actually the field index inside RD of Field, |
| // although this dependency is hidden. |
| const ASTRecordLayout &RL = CGM.getContext().getASTRecordLayout(RD); |
| FieldOffset = (RL.getFieldOffset(i) / ByteSizeInBits) - FirstFieldDelta; |
| } else |
| FieldOffset = |
| ComputeIvarBaseOffset(CGM, OI, cast<ObjCIvarDecl>(Field)) - FirstFieldDelta; |
| |
| // Skip over unnamed or bitfields |
| if (!Field->getIdentifier() || Field->isBitField()) { |
| LastFieldBitfieldOrUnnamed = Field; |
| LastBitfieldOrUnnamedOffset = FieldOffset; |
| continue; |
| } |
| |
| LastFieldBitfieldOrUnnamed = 0; |
| QualType FQT = Field->getType(); |
| if (FQT->isRecordType() || FQT->isUnionType()) { |
| if (FQT->isUnionType()) |
| HasUnion = true; |
| |
| BuildAggrIvarRecordLayout(FQT->getAs<RecordType>(), |
| BytePos + FieldOffset, |
| ForStrongLayout, HasUnion); |
| continue; |
| } |
| |
| if (const ArrayType *Array = CGM.getContext().getAsArrayType(FQT)) { |
| const ConstantArrayType *CArray = |
| dyn_cast_or_null<ConstantArrayType>(Array); |
| uint64_t ElCount = CArray->getSize().getZExtValue(); |
| assert(CArray && "only array with known element size is supported"); |
| FQT = CArray->getElementType(); |
| while (const ArrayType *Array = CGM.getContext().getAsArrayType(FQT)) { |
| const ConstantArrayType *CArray = |
| dyn_cast_or_null<ConstantArrayType>(Array); |
| ElCount *= CArray->getSize().getZExtValue(); |
| FQT = CArray->getElementType(); |
| } |
| |
| assert(!FQT->isUnionType() && |
| "layout for array of unions not supported"); |
| if (FQT->isRecordType() && ElCount) { |
| int OldIndex = IvarsInfo.size() - 1; |
| int OldSkIndex = SkipIvars.size() -1; |
| |
| const RecordType *RT = FQT->getAs<RecordType>(); |
| BuildAggrIvarRecordLayout(RT, BytePos + FieldOffset, |
| ForStrongLayout, HasUnion); |
| |
| // Replicate layout information for each array element. Note that |
| // one element is already done. |
| uint64_t ElIx = 1; |
| for (int FirstIndex = IvarsInfo.size() - 1, |
| FirstSkIndex = SkipIvars.size() - 1 ;ElIx < ElCount; ElIx++) { |
| uint64_t Size = CGM.getContext().getTypeSize(RT)/ByteSizeInBits; |
| for (int i = OldIndex+1; i <= FirstIndex; ++i) |
| IvarsInfo.push_back(GC_IVAR(IvarsInfo[i].ivar_bytepos + Size*ElIx, |
| IvarsInfo[i].ivar_size)); |
| for (int i = OldSkIndex+1; i <= FirstSkIndex; ++i) |
| SkipIvars.push_back(GC_IVAR(SkipIvars[i].ivar_bytepos + Size*ElIx, |
| SkipIvars[i].ivar_size)); |
| } |
| continue; |
| } |
| } |
| // At this point, we are done with Record/Union and array there of. |
| // For other arrays we are down to its element type. |
| Qualifiers::GC GCAttr = GetGCAttrTypeForType(CGM.getContext(), FQT); |
| |
| unsigned FieldSize = CGM.getContext().getTypeSize(Field->getType()); |
| if ((ForStrongLayout && GCAttr == Qualifiers::Strong) |
| || (!ForStrongLayout && GCAttr == Qualifiers::Weak)) { |
| if (IsUnion) { |
| uint64_t UnionIvarSize = FieldSize / WordSizeInBits; |
| if (UnionIvarSize > MaxUnionIvarSize) { |
| MaxUnionIvarSize = UnionIvarSize; |
| MaxField = Field; |
| MaxFieldOffset = FieldOffset; |
| } |
| } else { |
| IvarsInfo.push_back(GC_IVAR(BytePos + FieldOffset, |
| FieldSize / WordSizeInBits)); |
| } |
| } else if ((ForStrongLayout && |
| (GCAttr == Qualifiers::GCNone || GCAttr == Qualifiers::Weak)) |
| || (!ForStrongLayout && GCAttr != Qualifiers::Weak)) { |
| if (IsUnion) { |
| // FIXME: Why the asymmetry? We divide by word size in bits on other |
| // side. |
| uint64_t UnionIvarSize = FieldSize; |
| if (UnionIvarSize > MaxSkippedUnionIvarSize) { |
| MaxSkippedUnionIvarSize = UnionIvarSize; |
| MaxSkippedField = Field; |
| MaxSkippedFieldOffset = FieldOffset; |
| } |
| } else { |
| // FIXME: Why the asymmetry, we divide by byte size in bits here? |
| SkipIvars.push_back(GC_IVAR(BytePos + FieldOffset, |
| FieldSize / ByteSizeInBits)); |
| } |
| } |
| } |
| |
| if (LastFieldBitfieldOrUnnamed) { |
| if (LastFieldBitfieldOrUnnamed->isBitField()) { |
| // Last field was a bitfield. Must update skip info. |
| Expr *BitWidth = LastFieldBitfieldOrUnnamed->getBitWidth(); |
| uint64_t BitFieldSize = |
| BitWidth->EvaluateAsInt(CGM.getContext()).getZExtValue(); |
| GC_IVAR skivar; |
| skivar.ivar_bytepos = BytePos + LastBitfieldOrUnnamedOffset; |
| skivar.ivar_size = (BitFieldSize / ByteSizeInBits) |
| + ((BitFieldSize % ByteSizeInBits) != 0); |
| SkipIvars.push_back(skivar); |
| } else { |
| assert(!LastFieldBitfieldOrUnnamed->getIdentifier() &&"Expected unnamed"); |
| // Last field was unnamed. Must update skip info. |
| unsigned FieldSize |
| = CGM.getContext().getTypeSize(LastFieldBitfieldOrUnnamed->getType()); |
| SkipIvars.push_back(GC_IVAR(BytePos + LastBitfieldOrUnnamedOffset, |
| FieldSize / ByteSizeInBits)); |
| } |
| } |
| |
| if (MaxField) |
| IvarsInfo.push_back(GC_IVAR(BytePos + MaxFieldOffset, |
| MaxUnionIvarSize)); |
| if (MaxSkippedField) |
| SkipIvars.push_back(GC_IVAR(BytePos + MaxSkippedFieldOffset, |
| MaxSkippedUnionIvarSize)); |
| } |
| |
| /// BuildIvarLayoutBitmap - This routine is the horsework for doing all |
| /// the computations and returning the layout bitmap (for ivar or blocks) in |
| /// the given argument BitMap string container. Routine reads |
| /// two containers, IvarsInfo and SkipIvars which are assumed to be |
| /// filled already by the caller. |
| llvm::Constant *CGObjCCommonMac::BuildIvarLayoutBitmap(std::string& BitMap) { |
| unsigned int WordsToScan, WordsToSkip; |
| llvm::Type *PtrTy = llvm::Type::getInt8PtrTy(VMContext); |
| |
| // Build the string of skip/scan nibbles |
| llvm::SmallVector<SKIP_SCAN, 32> SkipScanIvars; |
| unsigned int WordSize = |
| CGM.getTypes().getTargetData().getTypeAllocSize(PtrTy); |
| if (IvarsInfo[0].ivar_bytepos == 0) { |
| WordsToSkip = 0; |
| WordsToScan = IvarsInfo[0].ivar_size; |
| } else { |
| WordsToSkip = IvarsInfo[0].ivar_bytepos/WordSize; |
| WordsToScan = IvarsInfo[0].ivar_size; |
| } |
| for (unsigned int i=1, Last=IvarsInfo.size(); i != Last; i++) { |
| unsigned int TailPrevGCObjC = |
| IvarsInfo[i-1].ivar_bytepos + IvarsInfo[i-1].ivar_size * WordSize; |
| if (IvarsInfo[i].ivar_bytepos == TailPrevGCObjC) { |
| // consecutive 'scanned' object pointers. |
| WordsToScan += IvarsInfo[i].ivar_size; |
| } else { |
| // Skip over 'gc'able object pointer which lay over each other. |
| if (TailPrevGCObjC > IvarsInfo[i].ivar_bytepos) |
| continue; |
| // Must skip over 1 or more words. We save current skip/scan values |
| // and start a new pair. |
| SKIP_SCAN SkScan; |
| SkScan.skip = WordsToSkip; |
| SkScan.scan = WordsToScan; |
| SkipScanIvars.push_back(SkScan); |
| |
| // Skip the hole. |
| SkScan.skip = (IvarsInfo[i].ivar_bytepos - TailPrevGCObjC) / WordSize; |
| SkScan.scan = 0; |
| SkipScanIvars.push_back(SkScan); |
| WordsToSkip = 0; |
| WordsToScan = IvarsInfo[i].ivar_size; |
| } |
| } |
| if (WordsToScan > 0) { |
| SKIP_SCAN SkScan; |
| SkScan.skip = WordsToSkip; |
| SkScan.scan = WordsToScan; |
| SkipScanIvars.push_back(SkScan); |
| } |
| |
| if (!SkipIvars.empty()) { |
| unsigned int LastIndex = SkipIvars.size()-1; |
| int LastByteSkipped = |
| SkipIvars[LastIndex].ivar_bytepos + SkipIvars[LastIndex].ivar_size; |
| LastIndex = IvarsInfo.size()-1; |
| int LastByteScanned = |
| IvarsInfo[LastIndex].ivar_bytepos + |
| IvarsInfo[LastIndex].ivar_size * WordSize; |
| // Compute number of bytes to skip at the tail end of the last ivar scanned. |
| if (LastByteSkipped > LastByteScanned) { |
| unsigned int TotalWords = (LastByteSkipped + (WordSize -1)) / WordSize; |
| SKIP_SCAN SkScan; |
| SkScan.skip = TotalWords - (LastByteScanned/WordSize); |
| SkScan.scan = 0; |
| SkipScanIvars.push_back(SkScan); |
| } |
| } |
| // Mini optimization of nibbles such that an 0xM0 followed by 0x0N is produced |
| // as 0xMN. |
| int SkipScan = SkipScanIvars.size()-1; |
| for (int i = 0; i <= SkipScan; i++) { |
| if ((i < SkipScan) && SkipScanIvars[i].skip && SkipScanIvars[i].scan == 0 |
| && SkipScanIvars[i+1].skip == 0 && SkipScanIvars[i+1].scan) { |
| // 0xM0 followed by 0x0N detected. |
| SkipScanIvars[i].scan = SkipScanIvars[i+1].scan; |
| for (int j = i+1; j < SkipScan; j++) |
| SkipScanIvars[j] = SkipScanIvars[j+1]; |
| --SkipScan; |
| } |
| } |
| |
| // Generate the string. |
| for (int i = 0; i <= SkipScan; i++) { |
| unsigned char byte; |
| unsigned int skip_small = SkipScanIvars[i].skip % 0xf; |
| unsigned int scan_small = SkipScanIvars[i].scan % 0xf; |
| unsigned int skip_big = SkipScanIvars[i].skip / 0xf; |
| unsigned int scan_big = SkipScanIvars[i].scan / 0xf; |
| |
| // first skip big. |
| for (unsigned int ix = 0; ix < skip_big; ix++) |
| BitMap += (unsigned char)(0xf0); |
| |
| // next (skip small, scan) |
| if (skip_small) { |
| byte = skip_small << 4; |
| if (scan_big > 0) { |
| byte |= 0xf; |
| --scan_big; |
| } else if (scan_small) { |
| byte |= scan_small; |
| scan_small = 0; |
| } |
| BitMap += byte; |
| } |
| // next scan big |
| for (unsigned int ix = 0; ix < scan_big; ix++) |
| BitMap += (unsigned char)(0x0f); |
| // last scan small |
| if (scan_small) { |
| byte = scan_small; |
| BitMap += byte; |
| } |
| } |
| // null terminate string. |
| unsigned char zero = 0; |
| BitMap += zero; |
| |
| llvm::GlobalVariable * Entry = |
| CreateMetadataVar("\01L_OBJC_CLASS_NAME_", |
| llvm::ConstantArray::get(VMContext, BitMap.c_str()), |
| ((ObjCABI == 2) ? |
| "__TEXT,__objc_classname,cstring_literals" : |
| "__TEXT,__cstring,cstring_literals"), |
| 1, true); |
| return getConstantGEP(VMContext, Entry, 0, 0); |
| } |
| |
| /// BuildIvarLayout - Builds ivar layout bitmap for the class |
| /// implementation for the __strong or __weak case. |
| /// The layout map displays which words in ivar list must be skipped |
| /// and which must be scanned by GC (see below). String is built of bytes. |
| /// Each byte is divided up in two nibbles (4-bit each). Left nibble is count |
| /// of words to skip and right nibble is count of words to scan. So, each |
| /// nibble represents up to 15 workds to skip or scan. Skipping the rest is |
| /// represented by a 0x00 byte which also ends the string. |
| /// 1. when ForStrongLayout is true, following ivars are scanned: |
| /// - id, Class |
| /// - object * |
| /// - __strong anything |
| /// |
| /// 2. When ForStrongLayout is false, following ivars are scanned: |
| /// - __weak anything |
| /// |
| llvm::Constant *CGObjCCommonMac::BuildIvarLayout( |
| const ObjCImplementationDecl *OMD, |
| bool ForStrongLayout) { |
| bool hasUnion = false; |
| |
| llvm::Type *PtrTy = llvm::Type::getInt8PtrTy(VMContext); |
| if (CGM.getLangOptions().getGCMode() == LangOptions::NonGC && |
| !CGM.getLangOptions().ObjCAutoRefCount) |
| return llvm::Constant::getNullValue(PtrTy); |
| |
| const ObjCInterfaceDecl *OI = OMD->getClassInterface(); |
| SmallVector<const FieldDecl*, 32> RecFields; |
| if (CGM.getLangOptions().ObjCAutoRefCount) { |
| for (const ObjCIvarDecl *IVD = OI->all_declared_ivar_begin(); |
| IVD; IVD = IVD->getNextIvar()) |
| RecFields.push_back(cast<FieldDecl>(IVD)); |
| } |
| else { |
| SmallVector<const ObjCIvarDecl*, 32> Ivars; |
| CGM.getContext().DeepCollectObjCIvars(OI, true, Ivars); |
| |
| // FIXME: This is not ideal; we shouldn't have to do this copy. |
| RecFields.append(Ivars.begin(), Ivars.end()); |
| } |
| |
| if (RecFields.empty()) |
| return llvm::Constant::getNullValue(PtrTy); |
| |
| SkipIvars.clear(); |
| IvarsInfo.clear(); |
| |
| BuildAggrIvarLayout(OMD, 0, 0, RecFields, 0, ForStrongLayout, hasUnion); |
| if (IvarsInfo.empty()) |
| return llvm::Constant::getNullValue(PtrTy); |
| // Sort on byte position in case we encounterred a union nested in |
| // the ivar list. |
| if (hasUnion && !IvarsInfo.empty()) |
| std::sort(IvarsInfo.begin(), IvarsInfo.end()); |
| if (hasUnion && !SkipIvars.empty()) |
| std::sort(SkipIvars.begin(), SkipIvars.end()); |
| |
| std::string BitMap; |
| llvm::Constant *C = BuildIvarLayoutBitmap(BitMap); |
| |
| if (CGM.getLangOptions().ObjCGCBitmapPrint) { |
| printf("\n%s ivar layout for class '%s': ", |
| ForStrongLayout ? "strong" : "weak", |
| OMD->getClassInterface()->getName().data()); |
| const unsigned char *s = (unsigned char*)BitMap.c_str(); |
| for (unsigned i = 0; i < BitMap.size(); i++) |
| if (!(s[i] & 0xf0)) |
| printf("0x0%x%s", s[i], s[i] != 0 ? ", " : ""); |
| else |
| printf("0x%x%s", s[i], s[i] != 0 ? ", " : ""); |
| printf("\n"); |
| } |
| return C; |
| } |
| |
| llvm::Constant *CGObjCCommonMac::GetMethodVarName(Selector Sel) { |
| llvm::GlobalVariable *&Entry = MethodVarNames[Sel]; |
| |
| // FIXME: Avoid std::string copying. |
| if (!Entry) |
| Entry = CreateMetadataVar("\01L_OBJC_METH_VAR_NAME_", |
| llvm::ConstantArray::get(VMContext, Sel.getAsString()), |
| ((ObjCABI == 2) ? |
| "__TEXT,__objc_methname,cstring_literals" : |
| "__TEXT,__cstring,cstring_literals"), |
| 1, true); |
| |
| return getConstantGEP(VMContext, Entry, 0, 0); |
| } |
| |
| // FIXME: Merge into a single cstring creation function. |
| llvm::Constant *CGObjCCommonMac::GetMethodVarName(IdentifierInfo *ID) { |
| return GetMethodVarName(CGM.getContext().Selectors.getNullarySelector(ID)); |
| } |
| |
| llvm::Constant *CGObjCCommonMac::GetMethodVarType(const FieldDecl *Field) { |
| std::string TypeStr; |
| CGM.getContext().getObjCEncodingForType(Field->getType(), TypeStr, Field); |
| |
| llvm::GlobalVariable *&Entry = MethodVarTypes[TypeStr]; |
| |
| if (!Entry) |
| Entry = CreateMetadataVar("\01L_OBJC_METH_VAR_TYPE_", |
| llvm::ConstantArray::get(VMContext, TypeStr), |
| ((ObjCABI == 2) ? |
| "__TEXT,__objc_methtype,cstring_literals" : |
| "__TEXT,__cstring,cstring_literals"), |
| 1, true); |
| |
| return getConstantGEP(VMContext, Entry, 0, 0); |
| } |
| |
| llvm::Constant *CGObjCCommonMac::GetMethodVarType(const ObjCMethodDecl *D) { |
| std::string TypeStr; |
| if (CGM.getContext().getObjCEncodingForMethodDecl( |
| const_cast<ObjCMethodDecl*>(D), |
| TypeStr)) |
| return 0; |
| |
| llvm::GlobalVariable *&Entry = MethodVarTypes[TypeStr]; |
| |
| if (!Entry) |
| Entry = CreateMetadataVar("\01L_OBJC_METH_VAR_TYPE_", |
| llvm::ConstantArray::get(VMContext, TypeStr), |
| ((ObjCABI == 2) ? |
| "__TEXT,__objc_methtype,cstring_literals" : |
| "__TEXT,__cstring,cstring_literals"), |
| 1, true); |
| |
| return getConstantGEP(VMContext, Entry, 0, 0); |
| } |
| |
| // FIXME: Merge into a single cstring creation function. |
| llvm::Constant *CGObjCCommonMac::GetPropertyName(IdentifierInfo *Ident) { |
| llvm::GlobalVariable *&Entry = PropertyNames[Ident]; |
| |
| if (!Entry) |
| Entry = CreateMetadataVar("\01L_OBJC_PROP_NAME_ATTR_", |
| llvm::ConstantArray::get(VMContext, |
| Ident->getNameStart()), |
| "__TEXT,__cstring,cstring_literals", |
| 1, true); |
| |
| return getConstantGEP(VMContext, Entry, 0, 0); |
| } |
| |
| // FIXME: Merge into a single cstring creation function. |
| // FIXME: This Decl should be more precise. |
| llvm::Constant * |
| CGObjCCommonMac::GetPropertyTypeString(const ObjCPropertyDecl *PD, |
| const Decl *Container) { |
| std::string TypeStr; |
| CGM.getContext().getObjCEncodingForPropertyDecl(PD, Container, TypeStr); |
| return GetPropertyName(&CGM.getContext().Idents.get(TypeStr)); |
| } |
| |
| void CGObjCCommonMac::GetNameForMethod(const ObjCMethodDecl *D, |
| const ObjCContainerDecl *CD, |
| llvm::SmallVectorImpl<char> &Name) { |
| llvm::raw_svector_ostream OS(Name); |
| assert (CD && "Missing container decl in GetNameForMethod"); |
| OS << '\01' << (D->isInstanceMethod() ? '-' : '+') |
| << '[' << CD->getName(); |
| if (const ObjCCategoryImplDecl *CID = |
| dyn_cast<ObjCCategoryImplDecl>(D->getDeclContext())) |
| OS << '(' << CID << ')'; |
| OS << ' ' << D->getSelector().getAsString() << ']'; |
| } |
| |
| void CGObjCMac::FinishModule() { |
| EmitModuleInfo(); |
| |
| // Emit the dummy bodies for any protocols which were referenced but |
| // never defined. |
| for (llvm::DenseMap<IdentifierInfo*, llvm::GlobalVariable*>::iterator |
| I = Protocols.begin(), e = Protocols.end(); I != e; ++I) { |
| if (I->second->hasInitializer()) |
| continue; |
| |
| std::vector<llvm::Constant*> Values(5); |
| Values[0] = llvm::Constant::getNullValue(ObjCTypes.ProtocolExtensionPtrTy); |
| Values[1] = GetClassName(I->first); |
| Values[2] = llvm::Constant::getNullValue(ObjCTypes.ProtocolListPtrTy); |
| Values[3] = Values[4] = |
| llvm::Constant::getNullValue(ObjCTypes.MethodDescriptionListPtrTy); |
| I->second->setLinkage(llvm::GlobalValue::InternalLinkage); |
| I->second->setInitializer(llvm::ConstantStruct::get(ObjCTypes.ProtocolTy, |
| Values)); |
| CGM.AddUsedGlobal(I->second); |
| } |
| |
| // Add assembler directives to add lazy undefined symbol references |
| // for classes which are referenced but not defined. This is |
| // important for correct linker interaction. |
| // |
| // FIXME: It would be nice if we had an LLVM construct for this. |
| if (!LazySymbols.empty() || !DefinedSymbols.empty()) { |
| llvm::SmallString<256> Asm; |
| Asm += CGM.getModule().getModuleInlineAsm(); |
| if (!Asm.empty() && Asm.back() != '\n') |
| Asm += '\n'; |
| |
| llvm::raw_svector_ostream OS(Asm); |
| for (llvm::SetVector<IdentifierInfo*>::iterator I = DefinedSymbols.begin(), |
| e = DefinedSymbols.end(); I != e; ++I) |
| OS << "\t.objc_class_name_" << (*I)->getName() << "=0\n" |
| << "\t.globl .objc_class_name_" << (*I)->getName() << "\n"; |
| for (llvm::SetVector<IdentifierInfo*>::iterator I = LazySymbols.begin(), |
| e = LazySymbols.end(); I != e; ++I) { |
| OS << "\t.lazy_reference .objc_class_name_" << (*I)->getName() << "\n"; |
| } |
| |
| for (size_t i = 0; i < DefinedCategoryNames.size(); ++i) { |
| OS << "\t.objc_category_name_" << DefinedCategoryNames[i] << "=0\n" |
| << "\t.globl .objc_category_name_" << DefinedCategoryNames[i] << "\n"; |
| } |
| |
| CGM.getModule().setModuleInlineAsm(OS.str()); |
| } |
| } |
| |
| CGObjCNonFragileABIMac::CGObjCNonFragileABIMac(CodeGen::CodeGenModule &cgm) |
| : CGObjCCommonMac(cgm), |
| ObjCTypes(cgm) { |
| ObjCEmptyCacheVar = ObjCEmptyVtableVar = NULL; |
| ObjCABI = 2; |
| } |
| |
| /* *** */ |
| |
| ObjCCommonTypesHelper::ObjCCommonTypesHelper(CodeGen::CodeGenModule &cgm) |
| : VMContext(cgm.getLLVMContext()), CGM(cgm) { |
| CodeGen::CodeGenTypes &Types = CGM.getTypes(); |
| ASTContext &Ctx = CGM.getContext(); |
| |
| ShortTy = Types.ConvertType(Ctx.ShortTy); |
| IntTy = Types.ConvertType(Ctx.IntTy); |
| LongTy = Types.ConvertType(Ctx.LongTy); |
| LongLongTy = Types.ConvertType(Ctx.LongLongTy); |
| Int8PtrTy = llvm::Type::getInt8PtrTy(VMContext); |
| |
| ObjectPtrTy = Types.ConvertType(Ctx.getObjCIdType()); |
| PtrObjectPtrTy = llvm::PointerType::getUnqual(ObjectPtrTy); |
| SelectorPtrTy = Types.ConvertType(Ctx.getObjCSelType()); |
| |
| // FIXME: It would be nice to unify this with the opaque type, so that the IR |
| // comes out a bit cleaner. |
| llvm::Type *T = Types.ConvertType(Ctx.getObjCProtoType()); |
| ExternalProtocolPtrTy = llvm::PointerType::getUnqual(T); |
| |
| // I'm not sure I like this. The implicit coordination is a bit |
| // gross. We should solve this in a reasonable fashion because this |
| // is a pretty common task (match some runtime data structure with |
| // an LLVM data structure). |
| |
| // FIXME: This is leaked. |
| // FIXME: Merge with rewriter code? |
| |
| // struct _objc_super { |
| // id self; |
| // Class cls; |
| // } |
| RecordDecl *RD = RecordDecl::Create(Ctx, TTK_Struct, |
| Ctx.getTranslationUnitDecl(), |
| SourceLocation(), SourceLocation(), |
| &Ctx.Idents.get("_objc_super")); |
| RD->addDecl(FieldDecl::Create(Ctx, RD, SourceLocation(), SourceLocation(), 0, |
| Ctx.getObjCIdType(), 0, 0, false, false)); |
| RD->addDecl(FieldDecl::Create(Ctx, RD, SourceLocation(), SourceLocation(), 0, |
| Ctx.getObjCClassType(), 0, 0, false, false)); |
| RD->completeDefinition(); |
| |
| SuperCTy = Ctx.getTagDeclType(RD); |
| SuperPtrCTy = Ctx.getPointerType(SuperCTy); |
| |
| SuperTy = cast<llvm::StructType>(Types.ConvertType(SuperCTy)); |
| SuperPtrTy = llvm::PointerType::getUnqual(SuperTy); |
| |
| // struct _prop_t { |
| // char *name; |
| // char *attributes; |
| // } |
| PropertyTy = llvm::StructType::createNamed("struct._prop_t", |
| Int8PtrTy, Int8PtrTy, NULL); |
| |
| // struct _prop_list_t { |
| // uint32_t entsize; // sizeof(struct _prop_t) |
| // uint32_t count_of_properties; |
| // struct _prop_t prop_list[count_of_properties]; |
| // } |
| PropertyListTy = |
| llvm::StructType::createNamed("struct._prop_list_t", |
| IntTy, IntTy, |
| llvm::ArrayType::get(PropertyTy, 0), |
| NULL); |
| // struct _prop_list_t * |
| PropertyListPtrTy = llvm::PointerType::getUnqual(PropertyListTy); |
| |
| // struct _objc_method { |
| // SEL _cmd; |
| // char *method_type; |
| // char *_imp; |
| // } |
| MethodTy = llvm::StructType::createNamed("struct._objc_method", |
| SelectorPtrTy, Int8PtrTy, Int8PtrTy, |
| NULL); |
| |
| // struct _objc_cache * |
| CacheTy = llvm::StructType::createNamed(VMContext, "struct._objc_cache"); |
| CachePtrTy = llvm::PointerType::getUnqual(CacheTy); |
| |
| } |
| |
| ObjCTypesHelper::ObjCTypesHelper(CodeGen::CodeGenModule &cgm) |
| : ObjCCommonTypesHelper(cgm) { |
| // struct _objc_method_description { |
| // SEL name; |
| // char *types; |
| // } |
| MethodDescriptionTy = |
| llvm::StructType::createNamed("struct._objc_method_description", |
| SelectorPtrTy, Int8PtrTy, NULL); |
| |
| // struct _objc_method_description_list { |
| // int count; |
| // struct _objc_method_description[1]; |
| // } |
| MethodDescriptionListTy = |
| llvm::StructType::createNamed("struct._objc_method_description_list", |
| IntTy, |
| llvm::ArrayType::get(MethodDescriptionTy, 0), |
| NULL); |
| |
| // struct _objc_method_description_list * |
| MethodDescriptionListPtrTy = |
| llvm::PointerType::getUnqual(MethodDescriptionListTy); |
| |
| // Protocol description structures |
| |
| // struct _objc_protocol_extension { |
| // uint32_t size; // sizeof(struct _objc_protocol_extension) |
| // struct _objc_method_description_list *optional_instance_methods; |
| // struct _objc_method_description_list *optional_class_methods; |
| // struct _objc_property_list *instance_properties; |
| // } |
| ProtocolExtensionTy = |
| llvm::StructType::createNamed("struct._objc_protocol_extension", |
| IntTy, |
| MethodDescriptionListPtrTy, |
| MethodDescriptionListPtrTy, |
| PropertyListPtrTy, |
| NULL); |
| |
| // struct _objc_protocol_extension * |
| ProtocolExtensionPtrTy = llvm::PointerType::getUnqual(ProtocolExtensionTy); |
| |
| // Handle recursive construction of Protocol and ProtocolList types |
| |
| ProtocolTy = |
| llvm::StructType::createNamed(VMContext, "struct._objc_protocol"); |
| |
| ProtocolListTy = |
| llvm::StructType::createNamed(VMContext, "struct._objc_protocol_list"); |
| ProtocolListTy->setBody(llvm::PointerType::getUnqual(ProtocolListTy), |
| LongTy, |
| llvm::ArrayType::get(ProtocolTy, 0), |
| NULL); |
| |
| // struct _objc_protocol { |
| // struct _objc_protocol_extension *isa; |
| // char *protocol_name; |
| // struct _objc_protocol **_objc_protocol_list; |
| // struct _objc_method_description_list *instance_methods; |
| // struct _objc_method_description_list *class_methods; |
| // } |
| ProtocolTy->setBody(ProtocolExtensionPtrTy, Int8PtrTy, |
| llvm::PointerType::getUnqual(ProtocolListTy), |
| MethodDescriptionListPtrTy, |
| MethodDescriptionListPtrTy, |
| NULL); |
| |
| // struct _objc_protocol_list * |
| ProtocolListPtrTy = llvm::PointerType::getUnqual(ProtocolListTy); |
| |
| ProtocolPtrTy = llvm::PointerType::getUnqual(ProtocolTy); |
| |
| // Class description structures |
| |
| // struct _objc_ivar { |
| // char *ivar_name; |
| // char *ivar_type; |
| // int ivar_offset; |
| // } |
| IvarTy = llvm::StructType::createNamed("struct._objc_ivar", |
| Int8PtrTy, Int8PtrTy, IntTy, NULL); |
| |
| // struct _objc_ivar_list * |
| IvarListTy = |
| llvm::StructType::createNamed(VMContext, "struct._objc_ivar_list"); |
| IvarListPtrTy = llvm::PointerType::getUnqual(IvarListTy); |
| |
| // struct _objc_method_list * |
| MethodListTy = |
| llvm::StructType::createNamed(VMContext, "struct._objc_method_list"); |
| MethodListPtrTy = llvm::PointerType::getUnqual(MethodListTy); |
| |
| // struct _objc_class_extension * |
| ClassExtensionTy = |
| llvm::StructType::createNamed("struct._objc_class_extension", |
| IntTy, Int8PtrTy, PropertyListPtrTy, NULL); |
| ClassExtensionPtrTy = llvm::PointerType::getUnqual(ClassExtensionTy); |
| |
| ClassTy = llvm::StructType::createNamed(VMContext, "struct._objc_class"); |
| |
| // struct _objc_class { |
| // Class isa; |
| // Class super_class; |
| // char *name; |
| // long version; |
| // long info; |
| // long instance_size; |
| // struct _objc_ivar_list *ivars; |
| // struct _objc_method_list *methods; |
| // struct _objc_cache *cache; |
| // struct _objc_protocol_list *protocols; |
| // char *ivar_layout; |
| // struct _objc_class_ext *ext; |
| // }; |
| ClassTy->setBody(llvm::PointerType::getUnqual(ClassTy), |
| llvm::PointerType::getUnqual(ClassTy), |
| Int8PtrTy, |
| LongTy, |
| LongTy, |
| LongTy, |
| IvarListPtrTy, |
| MethodListPtrTy, |
| CachePtrTy, |
| ProtocolListPtrTy, |
| Int8PtrTy, |
| ClassExtensionPtrTy, |
| NULL); |
| |
| ClassPtrTy = llvm::PointerType::getUnqual(ClassTy); |
| |
| // struct _objc_category { |
| // char *category_name; |
| // char *class_name; |
| // struct _objc_method_list *instance_method; |
| // struct _objc_method_list *class_method; |
| // uint32_t size; // sizeof(struct _objc_category) |
| // struct _objc_property_list *instance_properties;// category's @property |
| // } |
| CategoryTy = |
| llvm::StructType::createNamed("struct._objc_category", |
| Int8PtrTy, Int8PtrTy, MethodListPtrTy, |
| MethodListPtrTy, ProtocolListPtrTy, |
| IntTy, PropertyListPtrTy, NULL); |
| |
| // Global metadata structures |
| |
| // struct _objc_symtab { |
| // long sel_ref_cnt; |
| // SEL *refs; |
| // short cls_def_cnt; |
| // short cat_def_cnt; |
| // char *defs[cls_def_cnt + cat_def_cnt]; |
| // } |
| SymtabTy = |
| llvm::StructType::createNamed("struct._objc_symtab", |
| LongTy, SelectorPtrTy, ShortTy, ShortTy, |
| llvm::ArrayType::get(Int8PtrTy, 0), NULL); |
| SymtabPtrTy = llvm::PointerType::getUnqual(SymtabTy); |
| |
| // struct _objc_module { |
| // long version; |
| // long size; // sizeof(struct _objc_module) |
| // char *name; |
| // struct _objc_symtab* symtab; |
| // } |
| ModuleTy = |
| llvm::StructType::createNamed("struct._objc_module", |
| LongTy, LongTy, Int8PtrTy, SymtabPtrTy, NULL); |
| |
| |
| // FIXME: This is the size of the setjmp buffer and should be target |
| // specific. 18 is what's used on 32-bit X86. |
| uint64_t SetJmpBufferSize = 18; |
| |
| // Exceptions |
| llvm::Type *StackPtrTy = llvm::ArrayType::get( |
| llvm::Type::getInt8PtrTy(VMContext), 4); |
| |
| ExceptionDataTy = |
| llvm::StructType::createNamed("struct._objc_exception_data", |
| llvm::ArrayType::get(llvm::Type::getInt32Ty(VMContext), |
| SetJmpBufferSize), |
| StackPtrTy, NULL); |
| |
| } |
| |
| ObjCNonFragileABITypesHelper::ObjCNonFragileABITypesHelper(CodeGen::CodeGenModule &cgm) |
| : ObjCCommonTypesHelper(cgm) { |
| // struct _method_list_t { |
| // uint32_t entsize; // sizeof(struct _objc_method) |
| // uint32_t method_count; |
| // struct _objc_method method_list[method_count]; |
| // } |
| MethodListnfABITy = |
| llvm::StructType::createNamed("struct.__method_list_t", |
| IntTy, IntTy, |
| llvm::ArrayType::get(MethodTy, 0), |
| NULL); |
| // struct method_list_t * |
| MethodListnfABIPtrTy = llvm::PointerType::getUnqual(MethodListnfABITy); |
| |
| // struct _protocol_t { |
| // id isa; // NULL |
| // const char * const protocol_name; |
| // const struct _protocol_list_t * protocol_list; // super protocols |
| // const struct method_list_t * const instance_methods; |
| // const struct method_list_t * const class_methods; |
| // const struct method_list_t *optionalInstanceMethods; |
| // const struct method_list_t *optionalClassMethods; |
| // const struct _prop_list_t * properties; |
| // const uint32_t size; // sizeof(struct _protocol_t) |
| // const uint32_t flags; // = 0 |
| // } |
| |
| // Holder for struct _protocol_list_t * |
| ProtocolListnfABITy = |
| llvm::StructType::createNamed(VMContext, "struct._objc_protocol_list"); |
| |
| ProtocolnfABITy = |
| llvm::StructType::createNamed("struct._protocol_t", |
| ObjectPtrTy, Int8PtrTy, |
| llvm::PointerType::getUnqual(ProtocolListnfABITy), |
| MethodListnfABIPtrTy, |
| MethodListnfABIPtrTy, |
| MethodListnfABIPtrTy, |
| MethodListnfABIPtrTy, |
| PropertyListPtrTy, |
| IntTy, |
| IntTy, |
| NULL); |
| |
| // struct _protocol_t* |
| ProtocolnfABIPtrTy = llvm::PointerType::getUnqual(ProtocolnfABITy); |
| |
| // struct _protocol_list_t { |
| // long protocol_count; // Note, this is 32/64 bit |
| // struct _protocol_t *[protocol_count]; |
| // } |
| ProtocolListnfABITy->setBody(LongTy, |
| llvm::ArrayType::get(ProtocolnfABIPtrTy, 0), |
| NULL); |
| |
| // struct _objc_protocol_list* |
| ProtocolListnfABIPtrTy = llvm::PointerType::getUnqual(ProtocolListnfABITy); |
| |
| // struct _ivar_t { |
| // unsigned long int *offset; // pointer to ivar offset location |
| // char *name; |
| // char *type; |
| // uint32_t alignment; |
| // uint32_t size; |
| // } |
| IvarnfABITy = |
| llvm::StructType::createNamed("struct._ivar_t", |
| llvm::PointerType::getUnqual(LongTy), |
| Int8PtrTy, |
| Int8PtrTy, |
| IntTy, |
| IntTy, |
| NULL); |
| |
| // struct _ivar_list_t { |
| // uint32 entsize; // sizeof(struct _ivar_t) |
| // uint32 count; |
| // struct _iver_t list[count]; |
| // } |
| IvarListnfABITy = |
| llvm::StructType::createNamed("struct._ivar_list_t", |
| IntTy, IntTy, |
| llvm::ArrayType::get(IvarnfABITy, 0), |
| NULL); |
| |
| IvarListnfABIPtrTy = llvm::PointerType::getUnqual(IvarListnfABITy); |
| |
| // struct _class_ro_t { |
| // uint32_t const flags; |
| // uint32_t const instanceStart; |
| // uint32_t const instanceSize; |
| // uint32_t const reserved; // only when building for 64bit targets |
| // const uint8_t * const ivarLayout; |
| // const char *const name; |
| // const struct _method_list_t * const baseMethods; |
| // const struct _objc_protocol_list *const baseProtocols; |
| // const struct _ivar_list_t *const ivars; |
| // const uint8_t * const weakIvarLayout; |
| // const struct _prop_list_t * const properties; |
| // } |
| |
| // FIXME. Add 'reserved' field in 64bit abi mode! |
| ClassRonfABITy = llvm::StructType::createNamed("struct._class_ro_t", |
| IntTy, |
| IntTy, |
| IntTy, |
| Int8PtrTy, |
| Int8PtrTy, |
| MethodListnfABIPtrTy, |
| ProtocolListnfABIPtrTy, |
| IvarListnfABIPtrTy, |
| Int8PtrTy, |
| PropertyListPtrTy, |
| NULL); |
| |
| // ImpnfABITy - LLVM for id (*)(id, SEL, ...) |
| llvm::Type *params[] = { ObjectPtrTy, SelectorPtrTy }; |
| ImpnfABITy = llvm::FunctionType::get(ObjectPtrTy, params, false) |
| ->getPointerTo(); |
| |
| // struct _class_t { |
| // struct _class_t *isa; |
| // struct _class_t * const superclass; |
| // void *cache; |
| // IMP *vtable; |
| // struct class_ro_t *ro; |
| // } |
| |
| ClassnfABITy = llvm::StructType::createNamed(VMContext, "struct._class_t"); |
| ClassnfABITy->setBody(llvm::PointerType::getUnqual(ClassnfABITy), |
| llvm::PointerType::getUnqual(ClassnfABITy), |
| CachePtrTy, |
| llvm::PointerType::getUnqual(ImpnfABITy), |
| llvm::PointerType::getUnqual(ClassRonfABITy), |
| NULL); |
| |
| // LLVM for struct _class_t * |
| ClassnfABIPtrTy = llvm::PointerType::getUnqual(ClassnfABITy); |
| |
| // struct _category_t { |
| // const char * const name; |
| // struct _class_t *const cls; |
| // const struct _method_list_t * const instance_methods; |
| // const struct _method_list_t * const class_methods; |
| // const struct _protocol_list_t * const protocols; |
| // const struct _prop_list_t * const properties; |
| // } |
| CategorynfABITy = llvm::StructType::createNamed("struct._category_t", |
| Int8PtrTy, |
| ClassnfABIPtrTy, |
| MethodListnfABIPtrTy, |
| MethodListnfABIPtrTy, |
| ProtocolListnfABIPtrTy, |
| PropertyListPtrTy, |
| NULL); |
| |
| // New types for nonfragile abi messaging. |
| CodeGen::CodeGenTypes &Types = CGM.getTypes(); |
| ASTContext &Ctx = CGM.getContext(); |
| |
| // MessageRefTy - LLVM for: |
| // struct _message_ref_t { |
| // IMP messenger; |
| // SEL name; |
| // }; |
| |
| // First the clang type for struct _message_ref_t |
| RecordDecl *RD = RecordDecl::Create(Ctx, TTK_Struct, |
| Ctx.getTranslationUnitDecl(), |
| SourceLocation(), SourceLocation(), |
| &Ctx.Idents.get("_message_ref_t")); |
| RD->addDecl(FieldDecl::Create(Ctx, RD, SourceLocation(), SourceLocation(), 0, |
| Ctx.VoidPtrTy, 0, 0, false, false)); |
| RD->addDecl(FieldDecl::Create(Ctx, RD, SourceLocation(), SourceLocation(), 0, |
| Ctx.getObjCSelType(), 0, 0, false, false)); |
| RD->completeDefinition(); |
| |
| MessageRefCTy = Ctx.getTagDeclType(RD); |
| MessageRefCPtrTy = Ctx.getPointerType(MessageRefCTy); |
| MessageRefTy = cast<llvm::StructType>(Types.ConvertType(MessageRefCTy)); |
| |
| // MessageRefPtrTy - LLVM for struct _message_ref_t* |
| MessageRefPtrTy = llvm::PointerType::getUnqual(MessageRefTy); |
| |
| // SuperMessageRefTy - LLVM for: |
| // struct _super_message_ref_t { |
| // SUPER_IMP messenger; |
| // SEL name; |
| // }; |
| SuperMessageRefTy = |
| llvm::StructType::createNamed("struct._super_message_ref_t", |
| ImpnfABITy, SelectorPtrTy, NULL); |
| |
| // SuperMessageRefPtrTy - LLVM for struct _super_message_ref_t* |
| SuperMessageRefPtrTy = llvm::PointerType::getUnqual(SuperMessageRefTy); |
| |
| |
| // struct objc_typeinfo { |
| // const void** vtable; // objc_ehtype_vtable + 2 |
| // const char* name; // c++ typeinfo string |
| // Class cls; |
| // }; |
| EHTypeTy = |
| llvm::StructType::createNamed("struct._objc_typeinfo", |
| llvm::PointerType::getUnqual(Int8PtrTy), |
| Int8PtrTy, |
| ClassnfABIPtrTy, |
| NULL); |
| EHTypePtrTy = llvm::PointerType::getUnqual(EHTypeTy); |
| } |
| |
| llvm::Function *CGObjCNonFragileABIMac::ModuleInitFunction() { |
| FinishNonFragileABIModule(); |
| |
| return NULL; |
| } |
| |
| void CGObjCNonFragileABIMac::AddModuleClassList(const |
| std::vector<llvm::GlobalValue*> |
| &Container, |
| const char *SymbolName, |
| const char *SectionName) { |
| unsigned NumClasses = Container.size(); |
| |
| if (!NumClasses) |
| return; |
| |
| std::vector<llvm::Constant*> Symbols(NumClasses); |
| for (unsigned i=0; i<NumClasses; i++) |
| Symbols[i] = llvm::ConstantExpr::getBitCast(Container[i], |
| ObjCTypes.Int8PtrTy); |
| llvm::Constant* Init = |
| llvm::ConstantArray::get(llvm::ArrayType::get(ObjCTypes.Int8PtrTy, |
| NumClasses), |
| Symbols); |
| |
| llvm::GlobalVariable *GV = |
| new llvm::GlobalVariable(CGM.getModule(), Init->getType(), false, |
| llvm::GlobalValue::InternalLinkage, |
| Init, |
| SymbolName); |
| GV->setAlignment(CGM.getTargetData().getABITypeAlignment(Init->getType())); |
| GV->setSection(SectionName); |
| CGM.AddUsedGlobal(GV); |
| } |
| |
| void CGObjCNonFragileABIMac::FinishNonFragileABIModule() { |
| // nonfragile abi has no module definition. |
| |
| // Build list of all implemented class addresses in array |
| // L_OBJC_LABEL_CLASS_$. |
| AddModuleClassList(DefinedClasses, |
| "\01L_OBJC_LABEL_CLASS_$", |
| "__DATA, __objc_classlist, regular, no_dead_strip"); |
| |
| for (unsigned i = 0; i < DefinedClasses.size(); i++) { |
| llvm::GlobalValue *IMPLGV = DefinedClasses[i]; |
| if (IMPLGV->getLinkage() != llvm::GlobalValue::ExternalWeakLinkage) |
| continue; |
| IMPLGV->setLinkage(llvm::GlobalValue::ExternalLinkage); |
| } |
| |
| for (unsigned i = 0; i < DefinedMetaClasses.size(); i++) { |
| llvm::GlobalValue *IMPLGV = DefinedMetaClasses[i]; |
| if (IMPLGV->getLinkage() != llvm::GlobalValue::ExternalWeakLinkage) |
| continue; |
| IMPLGV->setLinkage(llvm::GlobalValue::ExternalLinkage); |
| } |
| |
| AddModuleClassList(DefinedNonLazyClasses, |
| "\01L_OBJC_LABEL_NONLAZY_CLASS_$", |
| "__DATA, __objc_nlclslist, regular, no_dead_strip"); |
| |
| // Build list of all implemented category addresses in array |
| // L_OBJC_LABEL_CATEGORY_$. |
| AddModuleClassList(DefinedCategories, |
| "\01L_OBJC_LABEL_CATEGORY_$", |
| "__DATA, __objc_catlist, regular, no_dead_strip"); |
| AddModuleClassList(DefinedNonLazyCategories, |
| "\01L_OBJC_LABEL_NONLAZY_CATEGORY_$", |
| "__DATA, __objc_nlcatlist, regular, no_dead_strip"); |
| |
| EmitImageInfo(); |
| } |
| |
| /// isVTableDispatchedSelector - Returns true if SEL is not in the list of |
| /// VTableDispatchMethods; false otherwise. What this means is that |
| /// except for the 19 selectors in the list, we generate 32bit-style |
| /// message dispatch call for all the rest. |
| bool CGObjCNonFragileABIMac::isVTableDispatchedSelector(Selector Sel) { |
| // At various points we've experimented with using vtable-based |
| // dispatch for all methods. |
| switch (CGM.getCodeGenOpts().getObjCDispatchMethod()) { |
| default: |
| llvm_unreachable("Invalid dispatch method!"); |
| case CodeGenOptions::Legacy: |
| return false; |
| case CodeGenOptions::NonLegacy: |
| return true; |
| case CodeGenOptions::Mixed: |
| break; |
| } |
| |
| // If so, see whether this selector is in the white-list of things which must |
| // use the new dispatch convention. We lazily build a dense set for this. |
| if (VTableDispatchMethods.empty()) { |
| VTableDispatchMethods.insert(GetNullarySelector("alloc")); |
| VTableDispatchMethods.insert(GetNullarySelector("class")); |
| VTableDispatchMethods.insert(GetNullarySelector("self")); |
| VTableDispatchMethods.insert(GetNullarySelector("isFlipped")); |
| VTableDispatchMethods.insert(GetNullarySelector("length")); |
| VTableDispatchMethods.insert(GetNullarySelector("count")); |
| |
| // These are vtable-based if GC is disabled. |
| // Optimistically use vtable dispatch for hybrid compiles. |
| if (CGM.getLangOptions().getGCMode() != LangOptions::GCOnly) { |
| VTableDispatchMethods.insert(GetNullarySelector("retain")); |
| VTableDispatchMethods.insert(GetNullarySelector("release")); |
| VTableDispatchMethods.insert(GetNullarySelector("autorelease")); |
| } |
| |
| VTableDispatchMethods.insert(GetUnarySelector("allocWithZone")); |
| VTableDispatchMethods.insert(GetUnarySelector("isKindOfClass")); |
| VTableDispatchMethods.insert(GetUnarySelector("respondsToSelector")); |
| VTableDispatchMethods.insert(GetUnarySelector("objectForKey")); |
| VTableDispatchMethods.insert(GetUnarySelector("objectAtIndex")); |
| VTableDispatchMethods.insert(GetUnarySelector("isEqualToString")); |
| VTableDispatchMethods.insert(GetUnarySelector("isEqual")); |
| |
| // These are vtable-based if GC is enabled. |
| // Optimistically use vtable dispatch for hybrid compiles. |
| if (CGM.getLangOptions().getGCMode() != LangOptions::NonGC) { |
| VTableDispatchMethods.insert(GetNullarySelector("hash")); |
| VTableDispatchMethods.insert(GetUnarySelector("addObject")); |
| |
| // "countByEnumeratingWithState:objects:count" |
| IdentifierInfo *KeyIdents[] = { |
| &CGM.getContext().Idents.get("countByEnumeratingWithState"), |
| &CGM.getContext().Idents.get("objects"), |
| &CGM.getContext().Idents.get("count") |
| }; |
| VTableDispatchMethods.insert( |
| CGM.getContext().Selectors.getSelector(3, KeyIdents)); |
| } |
| } |
| |
| return VTableDispatchMethods.count(Sel); |
| } |
| |
| // Metadata flags |
| enum MetaDataDlags { |
| CLS = 0x0, |
| CLS_META = 0x1, |
| CLS_ROOT = 0x2, |
| OBJC2_CLS_HIDDEN = 0x10, |
| CLS_EXCEPTION = 0x20, |
| |
| /// (Obsolete) ARC-specific: this class has a .release_ivars method |
| CLS_HAS_IVAR_RELEASER = 0x40, |
| /// class was compiled with -fobjc-arr |
| CLS_COMPILED_BY_ARC = 0x80 // (1<<7) |
| }; |
| /// BuildClassRoTInitializer - generate meta-data for: |
| /// struct _class_ro_t { |
| /// uint32_t const flags; |
| /// uint32_t const instanceStart; |
| /// uint32_t const instanceSize; |
| /// uint32_t const reserved; // only when building for 64bit targets |
| /// const uint8_t * const ivarLayout; |
| /// const char *const name; |
| /// const struct _method_list_t * const baseMethods; |
| /// const struct _protocol_list_t *const baseProtocols; |
| /// const struct _ivar_list_t *const ivars; |
| /// const uint8_t * const weakIvarLayout; |
| /// const struct _prop_list_t * const properties; |
| /// } |
| /// |
| llvm::GlobalVariable * CGObjCNonFragileABIMac::BuildClassRoTInitializer( |
| unsigned flags, |
| unsigned InstanceStart, |
| unsigned InstanceSize, |
| const ObjCImplementationDecl *ID) { |
| std::string ClassName = ID->getNameAsString(); |
| std::vector<llvm::Constant*> Values(10); // 11 for 64bit targets! |
| |
| if (CGM.getLangOptions().ObjCAutoRefCount) |
| flags |= CLS_COMPILED_BY_ARC; |
| |
| Values[ 0] = llvm::ConstantInt::get(ObjCTypes.IntTy, flags); |
| Values[ 1] = llvm::ConstantInt::get(ObjCTypes.IntTy, InstanceStart); |
| Values[ 2] = llvm::ConstantInt::get(ObjCTypes.IntTy, InstanceSize); |
| // FIXME. For 64bit targets add 0 here. |
| Values[ 3] = (flags & CLS_META) ? GetIvarLayoutName(0, ObjCTypes) |
| : BuildIvarLayout(ID, true); |
| Values[ 4] = GetClassName(ID->getIdentifier()); |
| // const struct _method_list_t * const baseMethods; |
| std::vector<llvm::Constant*> Methods; |
| std::string MethodListName("\01l_OBJC_$_"); |
| if (flags & CLS_META) { |
| MethodListName += "CLASS_METHODS_" + ID->getNameAsString(); |
| for (ObjCImplementationDecl::classmeth_iterator |
| i = ID->classmeth_begin(), e = ID->classmeth_end(); i != e; ++i) { |
| // Class methods should always be defined. |
| Methods.push_back(GetMethodConstant(*i)); |
| } |
| } else { |
| MethodListName += "INSTANCE_METHODS_" + ID->getNameAsString(); |
| for (ObjCImplementationDecl::instmeth_iterator |
| i = ID->instmeth_begin(), e = ID->instmeth_end(); i != e; ++i) { |
| // Instance methods should always be defined. |
| Methods.push_back(GetMethodConstant(*i)); |
| } |
| for (ObjCImplementationDecl::propimpl_iterator |
| i = ID->propimpl_begin(), e = ID->propimpl_end(); i != e; ++i) { |
| ObjCPropertyImplDecl *PID = *i; |
| |
| if (PID->getPropertyImplementation() == ObjCPropertyImplDecl::Synthesize){ |
| ObjCPropertyDecl *PD = PID->getPropertyDecl(); |
| |
| if (ObjCMethodDecl *MD = PD->getGetterMethodDecl()) |
| if (llvm::Constant *C = GetMethodConstant(MD)) |
| Methods.push_back(C); |
| if (ObjCMethodDecl *MD = PD->getSetterMethodDecl()) |
| if (llvm::Constant *C = GetMethodConstant(MD)) |
| Methods.push_back(C); |
| } |
| } |
| } |
| Values[ 5] = EmitMethodList(MethodListName, |
| "__DATA, __objc_const", Methods); |
| |
| const ObjCInterfaceDecl *OID = ID->getClassInterface(); |
| assert(OID && "CGObjCNonFragileABIMac::BuildClassRoTInitializer"); |
| Values[ 6] = EmitProtocolList("\01l_OBJC_CLASS_PROTOCOLS_$_" |
| + OID->getName(), |
| OID->all_referenced_protocol_begin(), |
| OID->all_referenced_protocol_end()); |
| |
| if (flags & CLS_META) |
| Values[ 7] = llvm::Constant::getNullValue(ObjCTypes.IvarListnfABIPtrTy); |
| else |
| Values[ 7] = EmitIvarList(ID); |
| Values[ 8] = (flags & CLS_META) ? GetIvarLayoutName(0, ObjCTypes) |
| : BuildIvarLayout(ID, false); |
| if (flags & CLS_META) |
| Values[ 9] = llvm::Constant::getNullValue(ObjCTypes.PropertyListPtrTy); |
| else |
| Values[ 9] = EmitPropertyList("\01l_OBJC_$_PROP_LIST_" + ID->getName(), |
| ID, ID->getClassInterface(), ObjCTypes); |
| llvm::Constant *Init = llvm::ConstantStruct::get(ObjCTypes.ClassRonfABITy, |
| Values); |
| llvm::GlobalVariable *CLASS_RO_GV = |
| new llvm::GlobalVariable(CGM.getModule(), ObjCTypes.ClassRonfABITy, false, |
| llvm::GlobalValue::InternalLinkage, |
| Init, |
| (flags & CLS_META) ? |
| std::string("\01l_OBJC_METACLASS_RO_$_")+ClassName : |
| std::string("\01l_OBJC_CLASS_RO_$_")+ClassName); |
| CLASS_RO_GV->setAlignment( |
| CGM.getTargetData().getABITypeAlignment(ObjCTypes.ClassRonfABITy)); |
| CLASS_RO_GV->setSection("__DATA, __objc_const"); |
| return CLASS_RO_GV; |
| |
| } |
| |
| /// BuildClassMetaData - This routine defines that to-level meta-data |
| /// for the given ClassName for: |
| /// struct _class_t { |
| /// struct _class_t *isa; |
| /// struct _class_t * const superclass; |
| /// void *cache; |
| /// IMP *vtable; |
| /// struct class_ro_t *ro; |
| /// } |
| /// |
| llvm::GlobalVariable * CGObjCNonFragileABIMac::BuildClassMetaData( |
| std::string &ClassName, |
| llvm::Constant *IsAGV, |
| llvm::Constant *SuperClassGV, |
| llvm::Constant *ClassRoGV, |
| bool HiddenVisibility) { |
| std::vector<llvm::Constant*> Values(5); |
| Values[0] = IsAGV; |
| Values[1] = SuperClassGV; |
| if (!Values[1]) |
| Values[1] = llvm::Constant::getNullValue(ObjCTypes.ClassnfABIPtrTy); |
| Values[2] = ObjCEmptyCacheVar; // &ObjCEmptyCacheVar |
| Values[3] = ObjCEmptyVtableVar; // &ObjCEmptyVtableVar |
| Values[4] = ClassRoGV; // &CLASS_RO_GV |
| llvm::Constant *Init = llvm::ConstantStruct::get(ObjCTypes.ClassnfABITy, |
| Values); |
| llvm::GlobalVariable *GV = GetClassGlobal(ClassName); |
| GV->setInitializer(Init); |
| GV->setSection("__DATA, __objc_data"); |
| GV->setAlignment( |
| CGM.getTargetData().getABITypeAlignment(ObjCTypes.ClassnfABITy)); |
| if (HiddenVisibility) |
| GV->setVisibility(llvm::GlobalValue::HiddenVisibility); |
| return GV; |
| } |
| |
| bool |
| CGObjCNonFragileABIMac::ImplementationIsNonLazy(const ObjCImplDecl *OD) const { |
| return OD->getClassMethod(GetNullarySelector("load")) != 0; |
| } |
| |
| void CGObjCNonFragileABIMac::GetClassSizeInfo(const ObjCImplementationDecl *OID, |
| uint32_t &InstanceStart, |
| uint32_t &InstanceSize) { |
| const ASTRecordLayout &RL = |
| CGM.getContext().getASTObjCImplementationLayout(OID); |
| |
| // InstanceSize is really instance end. |
| InstanceSize = RL.getDataSize().getQuantity(); |
| |
| // If there are no fields, the start is the same as the end. |
| if (!RL.getFieldCount()) |
| InstanceStart = InstanceSize; |
| else |
| InstanceStart = RL.getFieldOffset(0) / CGM.getContext().getCharWidth(); |
| } |
| |
| void CGObjCNonFragileABIMac::GenerateClass(const ObjCImplementationDecl *ID) { |
| std::string ClassName = ID->getNameAsString(); |
| if (!ObjCEmptyCacheVar) { |
| ObjCEmptyCacheVar = new llvm::GlobalVariable( |
| CGM.getModule(), |
| ObjCTypes.CacheTy, |
| false, |
| llvm::GlobalValue::ExternalLinkage, |
| 0, |
| "_objc_empty_cache"); |
| |
| ObjCEmptyVtableVar = new llvm::GlobalVariable( |
| CGM.getModule(), |
| ObjCTypes.ImpnfABITy, |
| false, |
| llvm::GlobalValue::ExternalLinkage, |
| 0, |
| "_objc_empty_vtable"); |
| } |
| assert(ID->getClassInterface() && |
| "CGObjCNonFragileABIMac::GenerateClass - class is 0"); |
| // FIXME: Is this correct (that meta class size is never computed)? |
| uint32_t InstanceStart = |
| CGM.getTargetData().getTypeAllocSize(ObjCTypes.ClassnfABITy); |
| uint32_t InstanceSize = InstanceStart; |
| uint32_t flags = CLS_META; |
| std::string ObjCMetaClassName(getMetaclassSymbolPrefix()); |
| std::string ObjCClassName(getClassSymbolPrefix()); |
| |
| llvm::GlobalVariable *SuperClassGV, *IsAGV; |
| |
| bool classIsHidden = |
| ID->getClassInterface()->getVisibility() == HiddenVisibility; |
| if (classIsHidden) |
| flags |= OBJC2_CLS_HIDDEN; |
| if (ID->hasCXXStructors()) |
| flags |= eClassFlags_ABI2_HasCXXStructors; |
| if (!ID->getClassInterface()->getSuperClass()) { |
| // class is root |
| flags |= CLS_ROOT; |
| SuperClassGV = GetClassGlobal(ObjCClassName + ClassName); |
| IsAGV = GetClassGlobal(ObjCMetaClassName + ClassName); |
| } else { |
| // Has a root. Current class is not a root. |
| const ObjCInterfaceDecl *Root = ID->getClassInterface(); |
| while (const ObjCInterfaceDecl *Super = Root->getSuperClass()) |
| Root = Super; |
| IsAGV = GetClassGlobal(ObjCMetaClassName + Root->getNameAsString()); |
| if (Root->isWeakImported()) |
| IsAGV->setLinkage(llvm::GlobalValue::ExternalWeakLinkage); |
| // work on super class metadata symbol. |
| std::string SuperClassName = |
| ObjCMetaClassName + |
| ID->getClassInterface()->getSuperClass()->getNameAsString(); |
| SuperClassGV = GetClassGlobal(SuperClassName); |
| if (ID->getClassInterface()->getSuperClass()->isWeakImported()) |
| SuperClassGV->setLinkage(llvm::GlobalValue::ExternalWeakLinkage); |
| } |
| llvm::GlobalVariable *CLASS_RO_GV = BuildClassRoTInitializer(flags, |
| InstanceStart, |
| InstanceSize,ID); |
| std::string TClassName = ObjCMetaClassName + ClassName; |
| llvm::GlobalVariable *MetaTClass = |
| BuildClassMetaData(TClassName, IsAGV, SuperClassGV, CLASS_RO_GV, |
| classIsHidden); |
| DefinedMetaClasses.push_back(MetaTClass); |
| |
| // Metadata for the class |
| flags = CLS; |
| if (classIsHidden) |
| flags |= OBJC2_CLS_HIDDEN; |
| if (ID->hasCXXStructors()) |
| flags |= eClassFlags_ABI2_HasCXXStructors; |
| |
| if (hasObjCExceptionAttribute(CGM.getContext(), ID->getClassInterface())) |
| flags |= CLS_EXCEPTION; |
| |
| if (!ID->getClassInterface()->getSuperClass()) { |
| flags |= CLS_ROOT; |
| SuperClassGV = 0; |
| } else { |
| // Has a root. Current class is not a root. |
| std::string RootClassName = |
| ID->getClassInterface()->getSuperClass()->getNameAsString(); |
| SuperClassGV = GetClassGlobal(ObjCClassName + RootClassName); |
| if (ID->getClassInterface()->getSuperClass()->isWeakImported()) |
| SuperClassGV->setLinkage(llvm::GlobalValue::ExternalWeakLinkage); |
| } |
| GetClassSizeInfo(ID, InstanceStart, InstanceSize); |
| CLASS_RO_GV = BuildClassRoTInitializer(flags, |
| InstanceStart, |
| InstanceSize, |
| ID); |
| |
| TClassName = ObjCClassName + ClassName; |
| llvm::GlobalVariable *ClassMD = |
| BuildClassMetaData(TClassName, MetaTClass, SuperClassGV, CLASS_RO_GV, |
| classIsHidden); |
| DefinedClasses.push_back(ClassMD); |
| |
| // Determine if this class is also "non-lazy". |
| if (ImplementationIsNonLazy(ID)) |
| DefinedNonLazyClasses.push_back(ClassMD); |
| |
| // Force the definition of the EHType if necessary. |
| if (flags & CLS_EXCEPTION) |
| GetInterfaceEHType(ID->getClassInterface(), true); |
| // Make sure method definition entries are all clear for next implementation. |
| MethodDefinitions.clear(); |
| } |
| |
| /// GenerateProtocolRef - This routine is called to generate code for |
| /// a protocol reference expression; as in: |
| /// @code |
| /// @protocol(Proto1); |
| /// @endcode |
| /// It generates a weak reference to l_OBJC_PROTOCOL_REFERENCE_$_Proto1 |
| /// which will hold address of the protocol meta-data. |
| /// |
| llvm::Value *CGObjCNonFragileABIMac::GenerateProtocolRef(CGBuilderTy &Builder, |
| const ObjCProtocolDecl *PD) { |
| |
| // This routine is called for @protocol only. So, we must build definition |
| // of protocol's meta-data (not a reference to it!) |
| // |
| llvm::Constant *Init = |
| llvm::ConstantExpr::getBitCast(GetOrEmitProtocol(PD), |
| ObjCTypes.ExternalProtocolPtrTy); |
| |
| std::string ProtocolName("\01l_OBJC_PROTOCOL_REFERENCE_$_"); |
| ProtocolName += PD->getName(); |
| |
| llvm::GlobalVariable *PTGV = CGM.getModule().getGlobalVariable(ProtocolName); |
| if (PTGV) |
| return Builder.CreateLoad(PTGV, "tmp"); |
| PTGV = new llvm::GlobalVariable( |
| CGM.getModule(), |
| Init->getType(), false, |
| llvm::GlobalValue::WeakAnyLinkage, |
| Init, |
| ProtocolName); |
| PTGV->setSection("__DATA, __objc_protorefs, coalesced, no_dead_strip"); |
| PTGV->setVisibility(llvm::GlobalValue::HiddenVisibility); |
| CGM.AddUsedGlobal(PTGV); |
| return Builder.CreateLoad(PTGV, "tmp"); |
| } |
| |
| /// GenerateCategory - Build metadata for a category implementation. |
| /// struct _category_t { |
| /// const char * const name; |
| /// struct _class_t *const cls; |
| /// const struct _method_list_t * const instance_methods; |
| /// const struct _method_list_t * const class_methods; |
| /// const struct _protocol_list_t * const protocols; |
| /// const struct _prop_list_t * const properties; |
| /// } |
| /// |
| void CGObjCNonFragileABIMac::GenerateCategory(const ObjCCategoryImplDecl *OCD) { |
| const ObjCInterfaceDecl *Interface = OCD->getClassInterface(); |
| const char *Prefix = "\01l_OBJC_$_CATEGORY_"; |
| std::string ExtCatName(Prefix + Interface->getNameAsString()+ |
| "_$_" + OCD->getNameAsString()); |
| std::string ExtClassName(getClassSymbolPrefix() + |
| Interface->getNameAsString()); |
| |
| std::vector<llvm::Constant*> Values(6); |
| Values[0] = GetClassName(OCD->getIdentifier()); |
| // meta-class entry symbol |
| llvm::GlobalVariable *ClassGV = GetClassGlobal(ExtClassName); |
| if (Interface->isWeakImported()) |
| ClassGV->setLinkage(llvm::GlobalValue::ExternalWeakLinkage); |
| |
| Values[1] = ClassGV; |
| std::vector<llvm::Constant*> Methods; |
| std::string MethodListName(Prefix); |
| MethodListName += "INSTANCE_METHODS_" + Interface->getNameAsString() + |
| "_$_" + OCD->getNameAsString(); |
| |
| for (ObjCCategoryImplDecl::instmeth_iterator |
| i = OCD->instmeth_begin(), e = OCD->instmeth_end(); i != e; ++i) { |
| // Instance methods should always be defined. |
| Methods.push_back(GetMethodConstant(*i)); |
| } |
| |
| Values[2] = EmitMethodList(MethodListName, |
| "__DATA, __objc_const", |
| Methods); |
| |
| MethodListName = Prefix; |
| MethodListName += "CLASS_METHODS_" + Interface->getNameAsString() + "_$_" + |
| OCD->getNameAsString(); |
| Methods.clear(); |
| for (ObjCCategoryImplDecl::classmeth_iterator |
| i = OCD->classmeth_begin(), e = OCD->classmeth_end(); i != e; ++i) { |
| // Class methods should always be defined. |
| Methods.push_back(GetMethodConstant(*i)); |
| } |
| |
| Values[3] = EmitMethodList(MethodListName, |
| "__DATA, __objc_const", |
| Methods); |
| const ObjCCategoryDecl *Category = |
| Interface->FindCategoryDeclaration(OCD->getIdentifier()); |
| if (Category) { |
| llvm::SmallString<256> ExtName; |
| llvm::raw_svector_ostream(ExtName) << Interface->getName() << "_$_" |
| << OCD->getName(); |
| Values[4] = EmitProtocolList("\01l_OBJC_CATEGORY_PROTOCOLS_$_" |
| + Interface->getName() + "_$_" |
| + Category->getName(), |
| Category->protocol_begin(), |
| Category->protocol_end()); |
| Values[5] = EmitPropertyList("\01l_OBJC_$_PROP_LIST_" + ExtName.str(), |
| OCD, Category, ObjCTypes); |
| } else { |
| Values[4] = llvm::Constant::getNullValue(ObjCTypes.ProtocolListnfABIPtrTy); |
| Values[5] = llvm::Constant::getNullValue(ObjCTypes.PropertyListPtrTy); |
| } |
| |
| llvm::Constant *Init = |
| llvm::ConstantStruct::get(ObjCTypes.CategorynfABITy, |
| Values); |
| llvm::GlobalVariable *GCATV |
| = new llvm::GlobalVariable(CGM.getModule(), ObjCTypes.CategorynfABITy, |
| false, |
| llvm::GlobalValue::InternalLinkage, |
| Init, |
| ExtCatName); |
| GCATV->setAlignment( |
| CGM.getTargetData().getABITypeAlignment(ObjCTypes.CategorynfABITy)); |
| GCATV->setSection("__DATA, __objc_const"); |
| CGM.AddUsedGlobal(GCATV); |
| DefinedCategories.push_back(GCATV); |
| |
| // Determine if this category is also "non-lazy". |
| if (ImplementationIsNonLazy(OCD)) |
| DefinedNonLazyCategories.push_back(GCATV); |
| // method definition entries must be clear for next implementation. |
| MethodDefinitions.clear(); |
| } |
| |
| /// GetMethodConstant - Return a struct objc_method constant for the |
| /// given method if it has been defined. The result is null if the |
| /// method has not been defined. The return value has type MethodPtrTy. |
| llvm::Constant *CGObjCNonFragileABIMac::GetMethodConstant( |
| const ObjCMethodDecl *MD) { |
| llvm::Function *Fn = GetMethodDefinition(MD); |
| if (!Fn) |
| return 0; |
| |
| std::vector<llvm::Constant*> Method(3); |
| Method[0] = |
| llvm::ConstantExpr::getBitCast(GetMethodVarName(MD->getSelector()), |
| ObjCTypes.SelectorPtrTy); |
| Method[1] = GetMethodVarType(MD); |
| Method[2] = llvm::ConstantExpr::getBitCast(Fn, ObjCTypes.Int8PtrTy); |
| return llvm::ConstantStruct::get(ObjCTypes.MethodTy, Method); |
| } |
| |
| /// EmitMethodList - Build meta-data for method declarations |
| /// struct _method_list_t { |
| /// uint32_t entsize; // sizeof(struct _objc_method) |
| /// uint32_t method_count; |
| /// struct _objc_method method_list[method_count]; |
| /// } |
| /// |
| llvm::Constant *CGObjCNonFragileABIMac::EmitMethodList(llvm::Twine Name, |
| const char *Section, |
| const ConstantVector &Methods) { |
| // Return null for empty list. |
| if (Methods.empty()) |
| return llvm::Constant::getNullValue(ObjCTypes.MethodListnfABIPtrTy); |
| |
| llvm::Constant *Values[3]; |
| // sizeof(struct _objc_method) |
| unsigned Size = CGM.getTargetData().getTypeAllocSize(ObjCTypes.MethodTy); |
| Values[0] = llvm::ConstantInt::get(ObjCTypes.IntTy, Size); |
| // method_count |
| Values[1] = llvm::ConstantInt::get(ObjCTypes.IntTy, Methods.size()); |
| llvm::ArrayType *AT = llvm::ArrayType::get(ObjCTypes.MethodTy, |
| Methods.size()); |
| Values[2] = llvm::ConstantArray::get(AT, Methods); |
| llvm::Constant *Init = llvm::ConstantStruct::getAnon(Values); |
| |
| llvm::GlobalVariable *GV = |
| new llvm::GlobalVariable(CGM.getModule(), Init->getType(), false, |
| llvm::GlobalValue::InternalLinkage, Init, Name); |
| GV->setAlignment(CGM.getTargetData().getABITypeAlignment(Init->getType())); |
| GV->setSection(Section); |
| CGM.AddUsedGlobal(GV); |
| return llvm::ConstantExpr::getBitCast(GV, ObjCTypes.MethodListnfABIPtrTy); |
| } |
| |
| /// ObjCIvarOffsetVariable - Returns the ivar offset variable for |
| /// the given ivar. |
| llvm::GlobalVariable * |
| CGObjCNonFragileABIMac::ObjCIvarOffsetVariable(const ObjCInterfaceDecl *ID, |
| const ObjCIvarDecl *Ivar) { |
| const ObjCInterfaceDecl *Container = Ivar->getContainingInterface(); |
| std::string Name = "OBJC_IVAR_$_" + Container->getNameAsString() + |
| '.' + Ivar->getNameAsString(); |
| llvm::GlobalVariable *IvarOffsetGV = |
| CGM.getModule().getGlobalVariable(Name); |
| if (!IvarOffsetGV) |
| IvarOffsetGV = |
| new llvm::GlobalVariable(CGM.getModule(), ObjCTypes.LongTy, |
| false, |
| llvm::GlobalValue::ExternalLinkage, |
| 0, |
| Name); |
| return IvarOffsetGV; |
| } |
| |
| llvm::Constant * |
| CGObjCNonFragileABIMac::EmitIvarOffsetVar(const ObjCInterfaceDecl *ID, |
| const ObjCIvarDecl *Ivar, |
| unsigned long int Offset) { |
| llvm::GlobalVariable *IvarOffsetGV = ObjCIvarOffsetVariable(ID, Ivar); |
| IvarOffsetGV->setInitializer(llvm::ConstantInt::get(ObjCTypes.LongTy, |
| Offset)); |
| IvarOffsetGV->setAlignment( |
| CGM.getTargetData().getABITypeAlignment(ObjCTypes.LongTy)); |
| |
| // FIXME: This matches gcc, but shouldn't the visibility be set on the use as |
| // well (i.e., in ObjCIvarOffsetVariable). |
| if (Ivar->getAccessControl() == ObjCIvarDecl::Private || |
| Ivar->getAccessControl() == ObjCIvarDecl::Package || |
| ID->getVisibility() == HiddenVisibility) |
| IvarOffsetGV->setVisibility(llvm::GlobalValue::HiddenVisibility); |
| else |
| IvarOffsetGV->setVisibility(llvm::GlobalValue::DefaultVisibility); |
| IvarOffsetGV->setSection("__DATA, __objc_ivar"); |
| return IvarOffsetGV; |
| } |
| |
| /// EmitIvarList - Emit the ivar list for the given |
| /// implementation. The return value has type |
| /// IvarListnfABIPtrTy. |
| /// struct _ivar_t { |
| /// unsigned long int *offset; // pointer to ivar offset location |
| /// char *name; |
| /// char *type; |
| /// uint32_t alignment; |
| /// uint32_t size; |
| /// } |
| /// struct _ivar_list_t { |
| /// uint32 entsize; // sizeof(struct _ivar_t) |
| /// uint32 count; |
| /// struct _iver_t list[count]; |
| /// } |
| /// |
| |
| llvm::Constant *CGObjCNonFragileABIMac::EmitIvarList( |
| const ObjCImplementationDecl *ID) { |
| |
| std::vector<llvm::Constant*> Ivars, Ivar(5); |
| |
| const ObjCInterfaceDecl *OID = ID->getClassInterface(); |
| assert(OID && "CGObjCNonFragileABIMac::EmitIvarList - null interface"); |
| |
| // FIXME. Consolidate this with similar code in GenerateClass. |
| |
| for (const ObjCIvarDecl *IVD = OID->all_declared_ivar_begin(); |
| IVD; IVD = IVD->getNextIvar()) { |
| // Ignore unnamed bit-fields. |
| if (!IVD->getDeclName()) |
| continue; |
| Ivar[0] = EmitIvarOffsetVar(ID->getClassInterface(), IVD, |
| ComputeIvarBaseOffset(CGM, ID, IVD)); |
| Ivar[1] = GetMethodVarName(IVD->getIdentifier()); |
| Ivar[2] = GetMethodVarType(IVD); |
| llvm::Type *FieldTy = |
| CGM.getTypes().ConvertTypeForMem(IVD->getType()); |
| unsigned Size = CGM.getTargetData().getTypeAllocSize(FieldTy); |
| unsigned Align = CGM.getContext().getPreferredTypeAlign( |
| IVD->getType().getTypePtr()) >> 3; |
| Align = llvm::Log2_32(Align); |
| Ivar[3] = llvm::ConstantInt::get(ObjCTypes.IntTy, Align); |
| // NOTE. Size of a bitfield does not match gcc's, because of the |
| // way bitfields are treated special in each. But I am told that |
| // 'size' for bitfield ivars is ignored by the runtime so it does |
| // not matter. If it matters, there is enough info to get the |
| // bitfield right! |
| Ivar[4] = llvm::ConstantInt::get(ObjCTypes.IntTy, Size); |
| Ivars.push_back(llvm::ConstantStruct::get(ObjCTypes.IvarnfABITy, Ivar)); |
| } |
| // Return null for empty list. |
| if (Ivars.empty()) |
| return llvm::Constant::getNullValue(ObjCTypes.IvarListnfABIPtrTy); |
| |
| llvm::Constant *Values[3]; |
| unsigned Size = CGM.getTargetData().getTypeAllocSize(ObjCTypes.IvarnfABITy); |
| Values[0] = llvm::ConstantInt::get(ObjCTypes.IntTy, Size); |
| Values[1] = llvm::ConstantInt::get(ObjCTypes.IntTy, Ivars.size()); |
| llvm::ArrayType *AT = llvm::ArrayType::get(ObjCTypes.IvarnfABITy, |
| Ivars.size()); |
| Values[2] = llvm::ConstantArray::get(AT, Ivars); |
| llvm::Constant *Init = llvm::ConstantStruct::getAnon(Values); |
| const char *Prefix = "\01l_OBJC_$_INSTANCE_VARIABLES_"; |
| llvm::GlobalVariable *GV = |
| new llvm::GlobalVariable(CGM.getModule(), Init->getType(), false, |
| llvm::GlobalValue::InternalLinkage, |
| Init, |
| Prefix + OID->getName()); |
| GV->setAlignment( |
| CGM.getTargetData().getABITypeAlignment(Init->getType())); |
| GV->setSection("__DATA, __objc_const"); |
| |
| CGM.AddUsedGlobal(GV); |
| return llvm::ConstantExpr::getBitCast(GV, ObjCTypes.IvarListnfABIPtrTy); |
| } |
| |
| llvm::Constant *CGObjCNonFragileABIMac::GetOrEmitProtocolRef( |
| const ObjCProtocolDecl *PD) { |
| llvm::GlobalVariable *&Entry = Protocols[PD->getIdentifier()]; |
| |
| if (!Entry) { |
| // We use the initializer as a marker of whether this is a forward |
| // reference or not. At module finalization we add the empty |
| // contents for protocols which were referenced but never defined. |
| Entry = |
| new llvm::GlobalVariable(CGM.getModule(), ObjCTypes.ProtocolnfABITy, false, |
| llvm::GlobalValue::ExternalLinkage, |
| 0, |
| "\01l_OBJC_PROTOCOL_$_" + PD->getName()); |
| Entry->setSection("__DATA,__datacoal_nt,coalesced"); |
| } |
| |
| return Entry; |
| } |
| |
| /// GetOrEmitProtocol - Generate the protocol meta-data: |
| /// @code |
| /// struct _protocol_t { |
| /// id isa; // NULL |
| /// const char * const protocol_name; |
| /// const struct _protocol_list_t * protocol_list; // super protocols |
| /// const struct method_list_t * const instance_methods; |
| /// const struct method_list_t * const class_methods; |
| /// const struct method_list_t *optionalInstanceMethods; |
| /// const struct method_list_t *optionalClassMethods; |
| /// const struct _prop_list_t * properties; |
| /// const uint32_t size; // sizeof(struct _protocol_t) |
| /// const uint32_t flags; // = 0 |
| /// } |
| /// @endcode |
| /// |
| |
| llvm::Constant *CGObjCNonFragileABIMac::GetOrEmitProtocol( |
| const ObjCProtocolDecl *PD) { |
| llvm::GlobalVariable *&Entry = Protocols[PD->getIdentifier()]; |
| |
| // Early exit if a defining object has already been generated. |
| if (Entry && Entry->hasInitializer()) |
| return Entry; |
| |
| // Construct method lists. |
| std::vector<llvm::Constant*> InstanceMethods, ClassMethods; |
| std::vector<llvm::Constant*> OptInstanceMethods, OptClassMethods; |
| for (ObjCProtocolDecl::instmeth_iterator |
| i = PD->instmeth_begin(), e = PD->instmeth_end(); i != e; ++i) { |
| ObjCMethodDecl *MD = *i; |
| llvm::Constant *C = GetMethodDescriptionConstant(MD); |
| if (!C) |
| return GetOrEmitProtocolRef(PD); |
| |
| if (MD->getImplementationControl() == ObjCMethodDecl::Optional) { |
| OptInstanceMethods.push_back(C); |
| } else { |
| InstanceMethods.push_back(C); |
| } |
| } |
| |
| for (ObjCProtocolDecl::classmeth_iterator |
| i = PD->classmeth_begin(), e = PD->classmeth_end(); i != e; ++i) { |
| ObjCMethodDecl *MD = *i; |
| llvm::Constant *C = GetMethodDescriptionConstant(MD); |
| if (!C) |
| return GetOrEmitProtocolRef(PD); |
| |
| if (MD->getImplementationControl() == ObjCMethodDecl::Optional) { |
| OptClassMethods.push_back(C); |
| } else { |
| ClassMethods.push_back(C); |
| } |
| } |
| |
| std::vector<llvm::Constant*> Values(10); |
| // isa is NULL |
| Values[0] = llvm::Constant::getNullValue(ObjCTypes.ObjectPtrTy); |
| Values[1] = GetClassName(PD->getIdentifier()); |
| Values[2] = EmitProtocolList("\01l_OBJC_$_PROTOCOL_REFS_" + PD->getName(), |
| PD->protocol_begin(), |
| PD->protocol_end()); |
| |
| Values[3] = EmitMethodList("\01l_OBJC_$_PROTOCOL_INSTANCE_METHODS_" |
| + PD->getName(), |
| "__DATA, __objc_const", |
| InstanceMethods); |
| Values[4] = EmitMethodList("\01l_OBJC_$_PROTOCOL_CLASS_METHODS_" |
| + PD->getName(), |
| "__DATA, __objc_const", |
| ClassMethods); |
| Values[5] = EmitMethodList("\01l_OBJC_$_PROTOCOL_INSTANCE_METHODS_OPT_" |
| + PD->getName(), |
| "__DATA, __objc_const", |
| OptInstanceMethods); |
| Values[6] = EmitMethodList("\01l_OBJC_$_PROTOCOL_CLASS_METHODS_OPT_" |
| + PD->getName(), |
| "__DATA, __objc_const", |
| OptClassMethods); |
| Values[7] = EmitPropertyList("\01l_OBJC_$_PROP_LIST_" + PD->getName(), |
| 0, PD, ObjCTypes); |
| uint32_t Size = |
| CGM.getTargetData().getTypeAllocSize(ObjCTypes.ProtocolnfABITy); |
| Values[8] = llvm::ConstantInt::get(ObjCTypes.IntTy, Size); |
| Values[9] = llvm::Constant::getNullValue(ObjCTypes.IntTy); |
| llvm::Constant *Init = llvm::ConstantStruct::get(ObjCTypes.ProtocolnfABITy, |
| Values); |
| |
| if (Entry) { |
| // Already created, fix the linkage and update the initializer. |
| Entry->setLinkage(llvm::GlobalValue::WeakAnyLinkage); |
| Entry->setInitializer(Init); |
| } else { |
| Entry = |
| new llvm::GlobalVariable(CGM.getModule(), ObjCTypes.ProtocolnfABITy, |
| false, llvm::GlobalValue::WeakAnyLinkage, Init, |
| "\01l_OBJC_PROTOCOL_$_" + PD->getName()); |
| Entry->setAlignment( |
| CGM.getTargetData().getABITypeAlignment(ObjCTypes.ProtocolnfABITy)); |
| Entry->setSection("__DATA,__datacoal_nt,coalesced"); |
| } |
| Entry->setVisibility(llvm::GlobalValue::HiddenVisibility); |
| CGM.AddUsedGlobal(Entry); |
| |
| // Use this protocol meta-data to build protocol list table in section |
| // __DATA, __objc_protolist |
| llvm::GlobalVariable *PTGV = |
| new llvm::GlobalVariable(CGM.getModule(), ObjCTypes.ProtocolnfABIPtrTy, |
| false, llvm::GlobalValue::WeakAnyLinkage, Entry, |
| "\01l_OBJC_LABEL_PROTOCOL_$_" + PD->getName()); |
| PTGV->setAlignment( |
| CGM.getTargetData().getABITypeAlignment(ObjCTypes.ProtocolnfABIPtrTy)); |
| PTGV->setSection("__DATA, __objc_protolist, coalesced, no_dead_strip"); |
| PTGV->setVisibility(llvm::GlobalValue::HiddenVisibility); |
| CGM.AddUsedGlobal(PTGV); |
| return Entry; |
| } |
| |
| /// EmitProtocolList - Generate protocol list meta-data: |
| /// @code |
| /// struct _protocol_list_t { |
| /// long protocol_count; // Note, this is 32/64 bit |
| /// struct _protocol_t[protocol_count]; |
| /// } |
| /// @endcode |
| /// |
| llvm::Constant * |
| CGObjCNonFragileABIMac::EmitProtocolList(llvm::Twine Name, |
| ObjCProtocolDecl::protocol_iterator begin, |
| ObjCProtocolDecl::protocol_iterator end) { |
| std::vector<llvm::Constant*> ProtocolRefs; |
| |
| // Just return null for empty protocol lists |
| if (begin == end) |
| return llvm::Constant::getNullValue(ObjCTypes.ProtocolListnfABIPtrTy); |
| |
| // FIXME: We shouldn't need to do this lookup here, should we? |
| llvm::SmallString<256> TmpName; |
| Name.toVector(TmpName); |
| llvm::GlobalVariable *GV = |
| CGM.getModule().getGlobalVariable(TmpName.str(), true); |
| if (GV) |
| return llvm::ConstantExpr::getBitCast(GV, ObjCTypes.ProtocolListnfABIPtrTy); |
| |
| for (; begin != end; ++begin) |
| ProtocolRefs.push_back(GetProtocolRef(*begin)); // Implemented??? |
| |
| // This list is null terminated. |
| ProtocolRefs.push_back(llvm::Constant::getNullValue( |
| ObjCTypes.ProtocolnfABIPtrTy)); |
| |
| llvm::Constant *Values[2]; |
| Values[0] = |
| llvm::ConstantInt::get(ObjCTypes.LongTy, ProtocolRefs.size() - 1); |
| Values[1] = |
| llvm::ConstantArray::get( |
| llvm::ArrayType::get(ObjCTypes.ProtocolnfABIPtrTy, |
| ProtocolRefs.size()), |
| ProtocolRefs); |
| |
| llvm::Constant *Init = llvm::ConstantStruct::getAnon(Values); |
| GV = new llvm::GlobalVariable(CGM.getModule(), Init->getType(), false, |
| llvm::GlobalValue::InternalLinkage, |
| Init, Name); |
| GV->setSection("__DATA, __objc_const"); |
| GV->setAlignment( |
| CGM.getTargetData().getABITypeAlignment(Init->getType())); |
| CGM.AddUsedGlobal(GV); |
| return llvm::ConstantExpr::getBitCast(GV, |
| ObjCTypes.ProtocolListnfABIPtrTy); |
| } |
| |
| /// GetMethodDescriptionConstant - This routine build following meta-data: |
| /// struct _objc_method { |
| /// SEL _cmd; |
| /// char *method_type; |
| /// char *_imp; |
| /// } |
| |
| llvm::Constant * |
| CGObjCNonFragileABIMac::GetMethodDescriptionConstant(const ObjCMethodDecl *MD) { |
| std::vector<llvm::Constant*> Desc(3); |
| Desc[0] = |
| llvm::ConstantExpr::getBitCast(GetMethodVarName(MD->getSelector()), |
| ObjCTypes.SelectorPtrTy); |
| Desc[1] = GetMethodVarType(MD); |
| if (!Desc[1]) |
| return 0; |
| |
| // Protocol methods have no implementation. So, this entry is always NULL. |
| Desc[2] = llvm::Constant::getNullValue(ObjCTypes.Int8PtrTy); |
| return llvm::ConstantStruct::get(ObjCTypes.MethodTy, Desc); |
| } |
| |
| /// EmitObjCValueForIvar - Code Gen for nonfragile ivar reference. |
| /// This code gen. amounts to generating code for: |
| /// @code |
| /// (type *)((char *)base + _OBJC_IVAR_$_.ivar; |
| /// @encode |
| /// |
| LValue CGObjCNonFragileABIMac::EmitObjCValueForIvar( |
| CodeGen::CodeGenFunction &CGF, |
| QualType ObjectTy, |
| llvm::Value *BaseValue, |
| const ObjCIvarDecl *Ivar, |
| unsigned CVRQualifiers) { |
| ObjCInterfaceDecl *ID = ObjectTy->getAs<ObjCObjectType>()->getInterface(); |
| return EmitValueForIvarAtOffset(CGF, ID, BaseValue, Ivar, CVRQualifiers, |
| EmitIvarOffset(CGF, ID, Ivar)); |
| } |
| |
| llvm::Value *CGObjCNonFragileABIMac::EmitIvarOffset( |
| CodeGen::CodeGenFunction &CGF, |
| const ObjCInterfaceDecl *Interface, |
| const ObjCIvarDecl *Ivar) { |
| return CGF.Builder.CreateLoad(ObjCIvarOffsetVariable(Interface, Ivar),"ivar"); |
| } |
| |
| static void appendSelectorForMessageRefTable(std::string &buffer, |
| Selector selector) { |
| if (selector.isUnarySelector()) { |
| buffer += selector.getNameForSlot(0); |
| return; |
| } |
| |
| for (unsigned i = 0, e = selector.getNumArgs(); i != e; ++i) { |
| buffer += selector.getNameForSlot(i); |
| buffer += '_'; |
| } |
| } |
| |
| /// Emit a "v-table" message send. We emit a weak hidden-visibility |
| /// struct, initially containing the selector pointer and a pointer to |
| /// a "fixup" variant of the appropriate objc_msgSend. To call, we |
| /// load and call the function pointer, passing the address of the |
| /// struct as the second parameter. The runtime determines whether |
| /// the selector is currently emitted using vtable dispatch; if so, it |
| /// substitutes a stub function which simply tail-calls through the |
| /// appropriate vtable slot, and if not, it substitues a stub function |
| /// which tail-calls objc_msgSend. Both stubs adjust the selector |
| /// argument to correctly point to the selector. |
| RValue |
| CGObjCNonFragileABIMac::EmitVTableMessageSend(CodeGenFunction &CGF, |
| ReturnValueSlot returnSlot, |
| QualType resultType, |
| Selector selector, |
| llvm::Value *arg0, |
| QualType arg0Type, |
| bool isSuper, |
| const CallArgList &formalArgs, |
| const ObjCMethodDecl *method) { |
| // Compute the actual arguments. |
| CallArgList args; |
| |
| // First argument: the receiver / super-call structure. |
| if (!isSuper) |
| arg0 = CGF.Builder.CreateBitCast(arg0, ObjCTypes.ObjectPtrTy); |
| args.add(RValue::get(arg0), arg0Type); |
| |
| // Second argument: a pointer to the message ref structure. Leave |
| // the actual argument value blank for now. |
| args.add(RValue::get(0), ObjCTypes.MessageRefCPtrTy); |
| |
| args.insert(args.end(), formalArgs.begin(), formalArgs.end()); |
| |
| const CGFunctionInfo &fnInfo = |
| CGM.getTypes().getFunctionInfo(resultType, args, |
| FunctionType::ExtInfo()); |
| |
| NullReturnState nullReturn; |
| |
| // Find the function to call and the mangled name for the message |
| // ref structure. Using a different mangled name wouldn't actually |
| // be a problem; it would just be a waste. |
| // |
| // The runtime currently never uses vtable dispatch for anything |
| // except normal, non-super message-sends. |
| // FIXME: don't use this for that. |
| llvm::Constant *fn = 0; |
| std::string messageRefName("\01l_"); |
| if (CGM.ReturnTypeUsesSRet(fnInfo)) { |
| if (isSuper) { |
| fn = ObjCTypes.getMessageSendSuper2StretFixupFn(); |
| messageRefName += "objc_msgSendSuper2_stret_fixup"; |
| } else { |
| nullReturn.init(CGF, arg0); |
| fn = ObjCTypes.getMessageSendStretFixupFn(); |
| messageRefName += "objc_msgSend_stret_fixup"; |
| } |
| } else if (!isSuper && CGM.ReturnTypeUsesFPRet(resultType)) { |
| fn = ObjCTypes.getMessageSendFpretFixupFn(); |
| messageRefName += "objc_msgSend_fpret_fixup"; |
| } else { |
| if (isSuper) { |
| fn = ObjCTypes.getMessageSendSuper2FixupFn(); |
| messageRefName += "objc_msgSendSuper2_fixup"; |
| } else { |
| fn = ObjCTypes.getMessageSendFixupFn(); |
| messageRefName += "objc_msgSend_fixup"; |
| } |
| } |
| assert(fn && "CGObjCNonFragileABIMac::EmitMessageSend"); |
| messageRefName += '_'; |
| |
| // Append the selector name, except use underscores anywhere we |
| // would have used colons. |
| appendSelectorForMessageRefTable(messageRefName, selector); |
| |
| llvm::GlobalVariable *messageRef |
| = CGM.getModule().getGlobalVariable(messageRefName); |
| if (!messageRef) { |
| // Build the message ref structure. |
| llvm::Constant *values[] = { fn, GetMethodVarName(selector) }; |
| llvm::Constant *init = llvm::ConstantStruct::getAnon(values); |
| messageRef = new llvm::GlobalVariable(CGM.getModule(), |
| init->getType(), |
| /*constant*/ false, |
| llvm::GlobalValue::WeakAnyLinkage, |
| init, |
| messageRefName); |
| messageRef->setVisibility(llvm::GlobalValue::HiddenVisibility); |
| messageRef->setAlignment(16); |
| messageRef->setSection("__DATA, __objc_msgrefs, coalesced"); |
| } |
| llvm::Value *mref = |
| CGF.Builder.CreateBitCast(messageRef, ObjCTypes.MessageRefPtrTy); |
| |
| // Update the message ref argument. |
| args[1].RV = RValue::get(mref); |
| |
| // Load the function to call from the message ref table. |
| llvm::Value *callee = CGF.Builder.CreateStructGEP(mref, 0); |
| callee = CGF.Builder.CreateLoad(callee, "msgSend_fn"); |
| |
| bool variadic = method ? method->isVariadic() : false; |
| llvm::FunctionType *fnType = |
| CGF.getTypes().GetFunctionType(fnInfo, variadic); |
| callee = CGF.Builder.CreateBitCast(callee, |
| llvm::PointerType::getUnqual(fnType)); |
| |
| RValue result = CGF.EmitCall(fnInfo, callee, returnSlot, args); |
| return nullReturn.complete(CGF, result, resultType); |
| } |
| |
| /// Generate code for a message send expression in the nonfragile abi. |
| CodeGen::RValue |
| CGObjCNonFragileABIMac::GenerateMessageSend(CodeGen::CodeGenFunction &CGF, |
| ReturnValueSlot Return, |
| QualType ResultType, |
| Selector Sel, |
| llvm::Value *Receiver, |
| const CallArgList &CallArgs, |
| const ObjCInterfaceDecl *Class, |
| const ObjCMethodDecl *Method) { |
| return isVTableDispatchedSelector(Sel) |
| ? EmitVTableMessageSend(CGF, Return, ResultType, Sel, |
| Receiver, CGF.getContext().getObjCIdType(), |
| false, CallArgs, Method) |
| : EmitMessageSend(CGF, Return, ResultType, |
| EmitSelector(CGF.Builder, Sel), |
| Receiver, CGF.getContext().getObjCIdType(), |
| false, CallArgs, Method, ObjCTypes); |
| } |
| |
| llvm::GlobalVariable * |
| CGObjCNonFragileABIMac::GetClassGlobal(const std::string &Name) { |
| llvm::GlobalVariable *GV = CGM.getModule().getGlobalVariable(Name); |
| |
| if (!GV) { |
| GV = new llvm::GlobalVariable(CGM.getModule(), ObjCTypes.ClassnfABITy, |
| false, llvm::GlobalValue::ExternalLinkage, |
| 0, Name); |
| } |
| |
| return GV; |
| } |
| |
| llvm::Value *CGObjCNonFragileABIMac::EmitClassRefFromId(CGBuilderTy &Builder, |
| IdentifierInfo *II) { |
| llvm::GlobalVariable *&Entry = ClassReferences[II]; |
| |
| if (!Entry) { |
| std::string ClassName(getClassSymbolPrefix() + II->getName().str()); |
| llvm::GlobalVariable *ClassGV = GetClassGlobal(ClassName); |
| Entry = |
| new llvm::GlobalVariable(CGM.getModule(), ObjCTypes.ClassnfABIPtrTy, |
| false, llvm::GlobalValue::InternalLinkage, |
| ClassGV, |
| "\01L_OBJC_CLASSLIST_REFERENCES_$_"); |
| Entry->setAlignment( |
| CGM.getTargetData().getABITypeAlignment( |
| ObjCTypes.ClassnfABIPtrTy)); |
| Entry->setSection("__DATA, __objc_classrefs, regular, no_dead_strip"); |
| CGM.AddUsedGlobal(Entry); |
| } |
| |
| return Builder.CreateLoad(Entry, "tmp"); |
| } |
| |
| llvm::Value *CGObjCNonFragileABIMac::EmitClassRef(CGBuilderTy &Builder, |
| const ObjCInterfaceDecl *ID) { |
| return EmitClassRefFromId(Builder, ID->getIdentifier()); |
| } |
| |
| llvm::Value *CGObjCNonFragileABIMac::EmitNSAutoreleasePoolClassRef( |
| CGBuilderTy &Builder) { |
| IdentifierInfo *II = &CGM.getContext().Idents.get("NSAutoreleasePool"); |
| return EmitClassRefFromId(Builder, II); |
| } |
| |
| llvm::Value * |
| CGObjCNonFragileABIMac::EmitSuperClassRef(CGBuilderTy &Builder, |
| const ObjCInterfaceDecl *ID) { |
| llvm::GlobalVariable *&Entry = SuperClassReferences[ID->getIdentifier()]; |
| |
| if (!Entry) { |
| std::string ClassName(getClassSymbolPrefix() + ID->getNameAsString()); |
| llvm::GlobalVariable *ClassGV = GetClassGlobal(ClassName); |
| Entry = |
| new llvm::GlobalVariable(CGM.getModule(), ObjCTypes.ClassnfABIPtrTy, |
| false, llvm::GlobalValue::InternalLinkage, |
| ClassGV, |
| "\01L_OBJC_CLASSLIST_SUP_REFS_$_"); |
| Entry->setAlignment( |
| CGM.getTargetData().getABITypeAlignment( |
| ObjCTypes.ClassnfABIPtrTy)); |
| Entry->setSection("__DATA, __objc_superrefs, regular, no_dead_strip"); |
| CGM.AddUsedGlobal(Entry); |
| } |
| |
| return Builder.CreateLoad(Entry, "tmp"); |
| } |
| |
| /// EmitMetaClassRef - Return a Value * of the address of _class_t |
| /// meta-data |
| /// |
| llvm::Value *CGObjCNonFragileABIMac::EmitMetaClassRef(CGBuilderTy &Builder, |
| const ObjCInterfaceDecl *ID) { |
| llvm::GlobalVariable * &Entry = MetaClassReferences[ID->getIdentifier()]; |
| if (Entry) |
| return Builder.CreateLoad(Entry, "tmp"); |
| |
| std::string MetaClassName(getMetaclassSymbolPrefix() + ID->getNameAsString()); |
| llvm::GlobalVariable *MetaClassGV = GetClassGlobal(MetaClassName); |
| Entry = |
| new llvm::GlobalVariable(CGM.getModule(), ObjCTypes.ClassnfABIPtrTy, false, |
| llvm::GlobalValue::InternalLinkage, |
| MetaClassGV, |
| "\01L_OBJC_CLASSLIST_SUP_REFS_$_"); |
| Entry->setAlignment( |
| CGM.getTargetData().getABITypeAlignment( |
| ObjCTypes.ClassnfABIPtrTy)); |
| |
| Entry->setSection("__DATA, __objc_superrefs, regular, no_dead_strip"); |
| CGM.AddUsedGlobal(Entry); |
| |
| return Builder.CreateLoad(Entry, "tmp"); |
| } |
| |
| /// GetClass - Return a reference to the class for the given interface |
| /// decl. |
| llvm::Value *CGObjCNonFragileABIMac::GetClass(CGBuilderTy &Builder, |
| const ObjCInterfaceDecl *ID) { |
| if (ID->isWeakImported()) { |
| std::string ClassName(getClassSymbolPrefix() + ID->getNameAsString()); |
| llvm::GlobalVariable *ClassGV = GetClassGlobal(ClassName); |
| ClassGV->setLinkage(llvm::GlobalValue::ExternalWeakLinkage); |
| } |
| |
| return EmitClassRef(Builder, ID); |
| } |
| |
| /// Generates a message send where the super is the receiver. This is |
| /// a message send to self with special delivery semantics indicating |
| /// which class's method should be called. |
| CodeGen::RValue |
| CGObjCNonFragileABIMac::GenerateMessageSendSuper(CodeGen::CodeGenFunction &CGF, |
| ReturnValueSlot Return, |
| QualType ResultType, |
| Selector Sel, |
| const ObjCInterfaceDecl *Class, |
| bool isCategoryImpl, |
| llvm::Value *Receiver, |
| bool IsClassMessage, |
| const CodeGen::CallArgList &CallArgs, |
| const ObjCMethodDecl *Method) { |
| // ... |
| // Create and init a super structure; this is a (receiver, class) |
| // pair we will pass to objc_msgSendSuper. |
| llvm::Value *ObjCSuper = |
| CGF.CreateTempAlloca(ObjCTypes.SuperTy, "objc_super"); |
| |
| llvm::Value *ReceiverAsObject = |
| CGF.Builder.CreateBitCast(Receiver, ObjCTypes.ObjectPtrTy); |
| CGF.Builder.CreateStore(ReceiverAsObject, |
| CGF.Builder.CreateStructGEP(ObjCSuper, 0)); |
| |
| // If this is a class message the metaclass is passed as the target. |
| llvm::Value *Target; |
| if (IsClassMessage) { |
| if (isCategoryImpl) { |
| // Message sent to "super' in a class method defined in |
| // a category implementation. |
| Target = EmitClassRef(CGF.Builder, Class); |
| Target = CGF.Builder.CreateStructGEP(Target, 0); |
| Target = CGF.Builder.CreateLoad(Target); |
| } else |
| Target = EmitMetaClassRef(CGF.Builder, Class); |
| } else |
| Target = EmitSuperClassRef(CGF.Builder, Class); |
| |
| // FIXME: We shouldn't need to do this cast, rectify the ASTContext and |
| // ObjCTypes types. |
| llvm::Type *ClassTy = |
| CGM.getTypes().ConvertType(CGF.getContext().getObjCClassType()); |
| Target = CGF.Builder.CreateBitCast(Target, ClassTy); |
| CGF.Builder.CreateStore(Target, |
| CGF.Builder.CreateStructGEP(ObjCSuper, 1)); |
| |
| return (isVTableDispatchedSelector(Sel)) |
| ? EmitVTableMessageSend(CGF, Return, ResultType, Sel, |
| ObjCSuper, ObjCTypes.SuperPtrCTy, |
| true, CallArgs, Method) |
| : EmitMessageSend(CGF, Return, ResultType, |
| EmitSelector(CGF.Builder, Sel), |
| ObjCSuper, ObjCTypes.SuperPtrCTy, |
| true, CallArgs, Method, ObjCTypes); |
| } |
| |
| llvm::Value *CGObjCNonFragileABIMac::EmitSelector(CGBuilderTy &Builder, |
| Selector Sel, bool lval) { |
| llvm::GlobalVariable *&Entry = SelectorReferences[Sel]; |
| |
| if (!Entry) { |
| llvm::Constant *Casted = |
| llvm::ConstantExpr::getBitCast(GetMethodVarName(Sel), |
| ObjCTypes.SelectorPtrTy); |
| Entry = |
| new llvm::GlobalVariable(CGM.getModule(), ObjCTypes.SelectorPtrTy, false, |
| llvm::GlobalValue::InternalLinkage, |
| Casted, "\01L_OBJC_SELECTOR_REFERENCES_"); |
| Entry->setSection("__DATA, __objc_selrefs, literal_pointers, no_dead_strip"); |
| CGM.AddUsedGlobal(Entry); |
| } |
| |
| if (lval) |
| return Entry; |
| return Builder.CreateLoad(Entry, "tmp"); |
| } |
| /// EmitObjCIvarAssign - Code gen for assigning to a __strong object. |
| /// objc_assign_ivar (id src, id *dst, ptrdiff_t) |
| /// |
| void CGObjCNonFragileABIMac::EmitObjCIvarAssign(CodeGen::CodeGenFunction &CGF, |
| llvm::Value *src, |
| llvm::Value *dst, |
| llvm::Value *ivarOffset) { |
| llvm::Type * SrcTy = src->getType(); |
| if (!isa<llvm::PointerType>(SrcTy)) { |
| unsigned Size = CGM.getTargetData().getTypeAllocSize(SrcTy); |
| assert(Size <= 8 && "does not support size > 8"); |
| src = (Size == 4 ? CGF.Builder.CreateBitCast(src, ObjCTypes.IntTy) |
| : CGF.Builder.CreateBitCast(src, ObjCTypes.LongTy)); |
| src = CGF.Builder.CreateIntToPtr(src, ObjCTypes.Int8PtrTy); |
| } |
| src = CGF.Builder.CreateBitCast(src, ObjCTypes.ObjectPtrTy); |
| dst = CGF.Builder.CreateBitCast(dst, ObjCTypes.PtrObjectPtrTy); |
| CGF.Builder.CreateCall3(ObjCTypes.getGcAssignIvarFn(), |
| src, dst, ivarOffset); |
| return; |
| } |
| |
| /// EmitObjCStrongCastAssign - Code gen for assigning to a __strong cast object. |
| /// objc_assign_strongCast (id src, id *dst) |
| /// |
| void CGObjCNonFragileABIMac::EmitObjCStrongCastAssign( |
| CodeGen::CodeGenFunction &CGF, |
| llvm::Value *src, llvm::Value *dst) { |
| llvm::Type * SrcTy = src->getType(); |
| if (!isa<llvm::PointerType>(SrcTy)) { |
| unsigned Size = CGM.getTargetData().getTypeAllocSize(SrcTy); |
| assert(Size <= 8 && "does not support size > 8"); |
| src = (Size == 4 ? CGF.Builder.CreateBitCast(src, ObjCTypes.IntTy) |
| : CGF.Builder.CreateBitCast(src, ObjCTypes.LongTy)); |
| src = CGF.Builder.CreateIntToPtr(src, ObjCTypes.Int8PtrTy); |
| } |
| src = CGF.Builder.CreateBitCast(src, ObjCTypes.ObjectPtrTy); |
| dst = CGF.Builder.CreateBitCast(dst, ObjCTypes.PtrObjectPtrTy); |
| CGF.Builder.CreateCall2(ObjCTypes.getGcAssignStrongCastFn(), |
| src, dst, "weakassign"); |
| return; |
| } |
| |
| void CGObjCNonFragileABIMac::EmitGCMemmoveCollectable( |
| CodeGen::CodeGenFunction &CGF, |
| llvm::Value *DestPtr, |
| llvm::Value *SrcPtr, |
| llvm::Value *Size) { |
| SrcPtr = CGF.Builder.CreateBitCast(SrcPtr, ObjCTypes.Int8PtrTy); |
| DestPtr = CGF.Builder.CreateBitCast(DestPtr, ObjCTypes.Int8PtrTy); |
| CGF.Builder.CreateCall3(ObjCTypes.GcMemmoveCollectableFn(), |
| DestPtr, SrcPtr, Size); |
| return; |
| } |
| |
| /// EmitObjCWeakRead - Code gen for loading value of a __weak |
| /// object: objc_read_weak (id *src) |
| /// |
| llvm::Value * CGObjCNonFragileABIMac::EmitObjCWeakRead( |
| CodeGen::CodeGenFunction &CGF, |
| llvm::Value *AddrWeakObj) { |
| llvm::Type* DestTy = |
| cast<llvm::PointerType>(AddrWeakObj->getType())->getElementType(); |
| AddrWeakObj = CGF.Builder.CreateBitCast(AddrWeakObj, ObjCTypes.PtrObjectPtrTy); |
| llvm::Value *read_weak = CGF.Builder.CreateCall(ObjCTypes.getGcReadWeakFn(), |
| AddrWeakObj, "weakread"); |
| read_weak = CGF.Builder.CreateBitCast(read_weak, DestTy); |
| return read_weak; |
| } |
| |
| /// EmitObjCWeakAssign - Code gen for assigning to a __weak object. |
| /// objc_assign_weak (id src, id *dst) |
| /// |
| void CGObjCNonFragileABIMac::EmitObjCWeakAssign(CodeGen::CodeGenFunction &CGF, |
| llvm::Value *src, llvm::Value *dst) { |
| llvm::Type * SrcTy = src->getType(); |
| if (!isa<llvm::PointerType>(SrcTy)) { |
| unsigned Size = CGM.getTargetData().getTypeAllocSize(SrcTy); |
| assert(Size <= 8 && "does not support size > 8"); |
| src = (Size == 4 ? CGF.Builder.CreateBitCast(src, ObjCTypes.IntTy) |
| : CGF.Builder.CreateBitCast(src, ObjCTypes.LongTy)); |
| src = CGF.Builder.CreateIntToPtr(src, ObjCTypes.Int8PtrTy); |
| } |
| src = CGF.Builder.CreateBitCast(src, ObjCTypes.ObjectPtrTy); |
| dst = CGF.Builder.CreateBitCast(dst, ObjCTypes.PtrObjectPtrTy); |
| CGF.Builder.CreateCall2(ObjCTypes.getGcAssignWeakFn(), |
| src, dst, "weakassign"); |
| return; |
| } |
| |
| /// EmitObjCGlobalAssign - Code gen for assigning to a __strong object. |
| /// objc_assign_global (id src, id *dst) |
| /// |
| void CGObjCNonFragileABIMac::EmitObjCGlobalAssign(CodeGen::CodeGenFunction &CGF, |
| llvm::Value *src, llvm::Value *dst, |
| bool threadlocal) { |
| llvm::Type * SrcTy = src->getType(); |
| if (!isa<llvm::PointerType>(SrcTy)) { |
| unsigned Size = CGM.getTargetData().getTypeAllocSize(SrcTy); |
| assert(Size <= 8 && "does not support size > 8"); |
| src = (Size == 4 ? CGF.Builder.CreateBitCast(src, ObjCTypes.IntTy) |
| : CGF.Builder.CreateBitCast(src, ObjCTypes.LongTy)); |
| src = CGF.Builder.CreateIntToPtr(src, ObjCTypes.Int8PtrTy); |
| } |
| src = CGF.Builder.CreateBitCast(src, ObjCTypes.ObjectPtrTy); |
| dst = CGF.Builder.CreateBitCast(dst, ObjCTypes.PtrObjectPtrTy); |
| if (!threadlocal) |
| CGF.Builder.CreateCall2(ObjCTypes.getGcAssignGlobalFn(), |
| src, dst, "globalassign"); |
| else |
| CGF.Builder.CreateCall2(ObjCTypes.getGcAssignThreadLocalFn(), |
| src, dst, "threadlocalassign"); |
| return; |
| } |
| |
| void |
| CGObjCNonFragileABIMac::EmitSynchronizedStmt(CodeGen::CodeGenFunction &CGF, |
| const ObjCAtSynchronizedStmt &S) { |
| EmitAtSynchronizedStmt(CGF, S, |
| cast<llvm::Function>(ObjCTypes.getSyncEnterFn()), |
| cast<llvm::Function>(ObjCTypes.getSyncExitFn())); |
| } |
| |
| llvm::Constant * |
| CGObjCNonFragileABIMac::GetEHType(QualType T) { |
| // There's a particular fixed type info for 'id'. |
| if (T->isObjCIdType() || |
| T->isObjCQualifiedIdType()) { |
| llvm::Constant *IDEHType = |
| CGM.getModule().getGlobalVariable("OBJC_EHTYPE_id"); |
| if (!IDEHType) |
| IDEHType = |
| new llvm::GlobalVariable(CGM.getModule(), ObjCTypes.EHTypeTy, |
| false, |
| llvm::GlobalValue::ExternalLinkage, |
| 0, "OBJC_EHTYPE_id"); |
| return IDEHType; |
| } |
| |
| // All other types should be Objective-C interface pointer types. |
| const ObjCObjectPointerType *PT = |
| T->getAs<ObjCObjectPointerType>(); |
| assert(PT && "Invalid @catch type."); |
| const ObjCInterfaceType *IT = PT->getInterfaceType(); |
| assert(IT && "Invalid @catch type."); |
| return GetInterfaceEHType(IT->getDecl(), false); |
| } |
| |
| void CGObjCNonFragileABIMac::EmitTryStmt(CodeGen::CodeGenFunction &CGF, |
| const ObjCAtTryStmt &S) { |
| EmitTryCatchStmt(CGF, S, |
| cast<llvm::Function>(ObjCTypes.getObjCBeginCatchFn()), |
| cast<llvm::Function>(ObjCTypes.getObjCEndCatchFn()), |
| cast<llvm::Function>(ObjCTypes.getExceptionRethrowFn())); |
| } |
| |
| /// EmitThrowStmt - Generate code for a throw statement. |
| void CGObjCNonFragileABIMac::EmitThrowStmt(CodeGen::CodeGenFunction &CGF, |
| const ObjCAtThrowStmt &S) { |
| if (const Expr *ThrowExpr = S.getThrowExpr()) { |
| llvm::Value *Exception = CGF.EmitScalarExpr(ThrowExpr); |
| Exception = CGF.Builder.CreateBitCast(Exception, ObjCTypes.ObjectPtrTy, |
| "tmp"); |
| CGF.EmitCallOrInvoke(ObjCTypes.getExceptionThrowFn(), Exception) |
| .setDoesNotReturn(); |
| } else { |
| CGF.EmitCallOrInvoke(ObjCTypes.getExceptionRethrowFn()) |
| .setDoesNotReturn(); |
| } |
| |
| CGF.Builder.CreateUnreachable(); |
| CGF.Builder.ClearInsertionPoint(); |
| } |
| |
| llvm::Constant * |
| CGObjCNonFragileABIMac::GetInterfaceEHType(const ObjCInterfaceDecl *ID, |
| bool ForDefinition) { |
| llvm::GlobalVariable * &Entry = EHTypeReferences[ID->getIdentifier()]; |
| |
| // If we don't need a definition, return the entry if found or check |
| // if we use an external reference. |
| if (!ForDefinition) { |
| if (Entry) |
| return Entry; |
| |
| // If this type (or a super class) has the __objc_exception__ |
| // attribute, emit an external reference. |
| if (hasObjCExceptionAttribute(CGM.getContext(), ID)) |
| return Entry = |
| new llvm::GlobalVariable(CGM.getModule(), ObjCTypes.EHTypeTy, false, |
| llvm::GlobalValue::ExternalLinkage, |
| 0, |
| ("OBJC_EHTYPE_$_" + |
| ID->getIdentifier()->getName())); |
| } |
| |
| // Otherwise we need to either make a new entry or fill in the |
| // initializer. |
| assert((!Entry || !Entry->hasInitializer()) && "Duplicate EHType definition"); |
| std::string ClassName(getClassSymbolPrefix() + ID->getNameAsString()); |
| std::string VTableName = "objc_ehtype_vtable"; |
| llvm::GlobalVariable *VTableGV = |
| CGM.getModule().getGlobalVariable(VTableName); |
| if (!VTableGV) |
| VTableGV = new llvm::GlobalVariable(CGM.getModule(), ObjCTypes.Int8PtrTy, |
| false, |
| llvm::GlobalValue::ExternalLinkage, |
| 0, VTableName); |
| |
| llvm::Value *VTableIdx = |
| llvm::ConstantInt::get(llvm::Type::getInt32Ty(VMContext), 2); |
| |
| std::vector<llvm::Constant*> Values(3); |
| Values[0] = llvm::ConstantExpr::getGetElementPtr(VTableGV, VTableIdx); |
| Values[1] = GetClassName(ID->getIdentifier()); |
| Values[2] = GetClassGlobal(ClassName); |
| llvm::Constant *Init = |
| llvm::ConstantStruct::get(ObjCTypes.EHTypeTy, Values); |
| |
| if (Entry) { |
| Entry->setInitializer(Init); |
| } else { |
| Entry = new llvm::GlobalVariable(CGM.getModule(), ObjCTypes.EHTypeTy, false, |
| llvm::GlobalValue::WeakAnyLinkage, |
| Init, |
| ("OBJC_EHTYPE_$_" + |
| ID->getIdentifier()->getName())); |
| } |
| |
| if (CGM.getLangOptions().getVisibilityMode() == HiddenVisibility) |
| Entry->setVisibility(llvm::GlobalValue::HiddenVisibility); |
| Entry->setAlignment(CGM.getTargetData().getABITypeAlignment( |
| ObjCTypes.EHTypeTy)); |
| |
| if (ForDefinition) { |
| Entry->setSection("__DATA,__objc_const"); |
| Entry->setLinkage(llvm::GlobalValue::ExternalLinkage); |
| } else { |
| Entry->setSection("__DATA,__datacoal_nt,coalesced"); |
| } |
| |
| return Entry; |
| } |
| |
| /* *** */ |
| |
| CodeGen::CGObjCRuntime * |
| CodeGen::CreateMacObjCRuntime(CodeGen::CodeGenModule &CGM) { |
| if (CGM.getLangOptions().ObjCNonFragileABI) |
| return new CGObjCNonFragileABIMac(CGM); |
| return new CGObjCMac(CGM); |
| } |