runtime/Protocol.mm

   1 /*
   2  * Copyright (c) 1999-2001, 2005-2007 Apple Inc.  All Rights Reserved.
   3  *
   4  * @APPLE_LICENSE_HEADER_START@
   5  *
   6  * This file contains Original Code and/or Modifications of Original Code
   7  * as defined in and that are subject to the Apple Public Source License
   8  * Version 2.0 (the 'License'). You may not use this file except in
   9  * compliance with the License. Please obtain a copy of the License at
  10  * http://www.opensource.apple.com/apsl/ and read it before using this
  11  * file.
  12  *
  13  * The Original Code and all software distributed under the License are
  14  * distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
  15  * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
  16  * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
  17  * FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT.
  18  * Please see the License for the specific language governing rights and
  19  * limitations under the License.
  20  *
  21  * @APPLE_LICENSE_HEADER_END@
  22  */
  23 /*
  24         Protocol.h
  25         Copyright 1991-1996 NeXT Software, Inc.
  26 */
  27
  28 #include "objc-private.h"
  29
  30 #undef id
  31 #undef Class
  32
  33 #include <stdlib.h>
  34 #include <string.h>
  35 #include <mach-o/dyld.h>
  36 #include <mach-o/ldsyms.h>
  37
  38 #include "Protocol.h"
  39 #include "NSObject.h"
  40
  41 // __IncompleteProtocol is used as the return type of objc_allocateProtocol().
  42
  43 // Old ABI uses NSObject as the superclass even though Protocol uses Object
  44 // because the R/R implementation for class Protocol is added at runtime
  45 // by CF, so __IncompleteProtocol would be left without an R/R implementation
  46 // otherwise, which would break ARC.
  47
  48 @interface __IncompleteProtocol : NSObject @end
  49 @implementation __IncompleteProtocol
  50 #if __OBJC2__
  51 // fixme hack - make __IncompleteProtocol a non-lazy class
  52 + (void) load { }
  53 #endif
  54 @end
  55
  56
  57 @implementation Protocol
  58
  59 #if __OBJC2__
  60 // fixme hack - make Protocol a non-lazy class
  61 + (void) load { }
  62 #endif
  63
  64
  65 - (BOOL) conformsTo: (Protocol *)aProtocolObj
  66 {
  67     return protocol_conformsToProtocol(self, aProtocolObj);
  68 }
  69
  70 - (struct objc_method_description *) descriptionForInstanceMethod:(SEL)aSel
  71 {
  72 #if !__OBJC2__
  73     return lookup_protocol_method((struct old_protocol *)self, aSel,
  74                                   YES/*required*/, YES/*instance*/,
  75                                   YES/*recursive*/);
  76 #else
  77     return method_getDescription(protocol_getMethod((struct protocol_t *)self,
  78                                                      aSel, YES, YES, YES));
  79 #endif
  80 }
  81
  82 - (struct objc_method_description *) descriptionForClassMethod:(SEL)aSel
  83 {
  84 #if !__OBJC2__
  85     return lookup_protocol_method((struct old_protocol *)self, aSel,
  86                                   YES/*required*/, NO/*instance*/,
  87                                   YES/*recursive*/);
  88 #else
  89     return method_getDescription(protocol_getMethod((struct protocol_t *)self,
  90                                                     aSel, YES, NO, YES));
  91 #endif
  92 }
  93
  94 - (const char *)name
  95 {
  96     return protocol_getName(self);
  97 }
  98
  99 - (BOOL)isEqual:other
 100 {
 101 #if __OBJC2__
 102     // check isKindOf:
 103     Class cls;
 104     Class protoClass = objc_getClass("Protocol");
 105     for (cls = object_getClass(other); cls; cls = cls->superclass) {
 106         if (cls == protoClass) break;
 107     }
 108     if (!cls) return NO;
 109     // check equality
 110     return protocol_isEqual(self, other);
 111 #else
 112     return [other isKindOf:[Protocol class]] && [self conformsTo: other] && [other conformsTo: self];
 113 #endif
 114 }
 115
 116 #if __OBJC2__
 117 - (NSUInteger)hash
 118 {
 119     return 23;
 120 }
 121 #else
 122 - (unsigned)hash
 123 {
 124     return 23;
 125 }
 126 #endif
 127
 128 @end