/*
* Copyright (c) 2008, 2009, 2010, 2011, 2012, 2013
* Jonathan Schleifer <js@webkeks.org>
*
* All rights reserved.
*
* This file is part of ObjFW. It may be distributed under the terms of the
* Q Public License 1.0, which can be found in the file LICENSE.QPL included in
* the packaging of this file.
*
* Alternatively, it may be distributed under the terms of the GNU General
* Public License, either version 2 or 3, which can be found in the file
* LICENSE.GPLv2 or LICENSE.GPLv3 respectively included in the packaging of this
* file.
*/
#include "config.h"
#include <stdio.h>
#include <stdlib.h>
#import "runtime.h"
#import "runtime-private.h"
#import "macros.h"
IMP (*objc_forward_handler)(id, SEL) = NULL;
IMP
objc_not_found_handler(id obj, SEL sel)
{
BOOL is_class = object_getClass(obj)->info & OBJC_CLASS_INFO_METACLASS;
if (!(object_getClass(obj)->info & OBJC_CLASS_INFO_INITIALIZED)) {
Class cls = (is_class ? (Class)obj : object_getClass(obj));
objc_initialize_class(cls);
if (!(cls->info & OBJC_CLASS_INFO_SETUP)) {
if (is_class)
return objc_msg_lookup(nil, sel);
else
OBJC_ERROR("Could not dispatch message for "
"incomplete class %s!", cls->name);
}
/*
* We don't need to handle the case that super was called.
* The reason for this is that a call to super is not possible
* before a message to the class has been sent and it thus has
* been initialized together with its superclasses.
*/
return objc_msg_lookup(obj, sel);
}
if (objc_forward_handler != NULL)
return objc_forward_handler(obj, sel);
OBJC_ERROR("Selector %c[%s] is not implemented for class %s!",
(is_class ? '+' : '-'), sel_getName(sel), object_getClassName(obj));
}
BOOL
class_respondsToSelector(Class cls, SEL sel)
{
if (cls == Nil)
return NO;
return (objc_sparsearray_get(cls->dtable, (uint32_t)sel->uid) != NULL
? YES : NO);
}
#ifndef OF_ASM_LOOKUP
static id
nil_method(id self, SEL _cmd)
{
return nil;
}
IMP
objc_msg_lookup(id obj, SEL sel)
{
IMP imp;
if (obj == nil)
return (IMP)nil_method;
imp = objc_sparsearray_get(object_getClass(obj)->dtable,
(uint32_t)sel->uid);
if (imp == NULL)
return objc_not_found_handler(obj, sel);
return imp;
}
IMP
objc_msg_lookup_super(struct objc_super *super, SEL sel)
{
IMP imp;
if (super->self == nil)
return (IMP)nil_method;
imp = objc_sparsearray_get(super->cls->dtable, (uint32_t)sel->uid);
if (imp == NULL)
return objc_not_found_handler(super->self, sel);
return imp;
}
#endif