Object.c

Go to the documentation of this file.

/*
 * Objectively: Ultra-lightweight object oriented framework for GNU C.
 * Copyright (C) 2014 Jay Dolan <jay@jaydolan.com>
 *
 * This software is provided 'as-is', without any express or implied
 * warranty. In no event will the authors be held liable for any damages
 * arising from the use of this software.
 *
 * Permission is granted to anyone to use this software for any purpose,
 * including commercial applications, and to alter it and redistribute it
 * freely, subject to the following restrictions:
 *
 * 1. The origin of this software must not be misrepresented; you must not
 * claim that you wrote the original software. If you use this software
 * in a product, an acknowledgment in the product documentation would be
 * appreciated but is not required.
 *
 * 2. Altered source versions must be plainly marked as such, and must not be
 * misrepresented as being the original software.
 *
 * 3. This notice may not be removed or altered from any source distribution.
 */
 
#include <assert.h>
#include <stdlib.h>
#include <string.h>
 
#include "Object.h"
#include "String.h"
 
#define _Class _Object
 
#pragma mark - Object
 
static Object *copy(const Object *self) {
 
    ident obj = calloc(1, self->clazz->def.instanceSize);
    assert(obj);
 
    Object *object = memcpy(obj, self, self->clazz->def.instanceSize);
    object->referenceCount = 1;
 
    return object;
}
 
static void dealloc(Object *self) {
 
    free(self);
}
 
static String *description(const Object *self) {
 
    return $(alloc(String), initWithFormat, "%s@%p", self->clazz->def.name, self);
}
 
static int hash(const Object *self) {
 
    uintptr_t addr = (uintptr_t) self;
 
    return (int) ((13 * addr) ^ (addr >> 15));
}
 
static Object *init(Object *self) {
 
    return self;
}
 
static _Bool isEqual(const Object *self, const Object *other) {
 
    return self == other;
}
 
static _Bool isKindOfClass(const Object *self, const Class *clazz) {
 
    assert(clazz);
    
    const Class *c = self->clazz;
    while (c) {
        if (memcmp(c, clazz, sizeof(*c)) == 0) {
            return true;
        }
        c = c->def.superclass;
    }
 
    return false;
}
 
#pragma mark - Class lifecycle
 
static void initialize(Class *clazz) {
 
    ((ObjectInterface *) clazz->interface)->copy = copy;
    ((ObjectInterface *) clazz->interface)->dealloc = dealloc;
    ((ObjectInterface *) clazz->interface)->description = description;
    ((ObjectInterface *) clazz->interface)->hash = hash;
    ((ObjectInterface *) clazz->interface)->init = init;
    ((ObjectInterface *) clazz->interface)->isEqual = isEqual;
    ((ObjectInterface *) clazz->interface)->isKindOfClass = isKindOfClass;
}
 
Class *_Object(void) {
    static Class *clazz;
    static Once once;
 
    do_once(&once, {
        clazz = _initialize(&(const ClassDef) {
            .name = "Object",
            .instanceSize = sizeof(Object),
            .interfaceOffset = offsetof(Object, interface),
            .interfaceSize = sizeof(ObjectInterface),
            .initialize = initialize,
        });
    });
 
    return clazz;
}
 
#undef _Class