Number.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 "Hash.h"
#include "Number.h"
#include "String.h"
 
#define _Class _Number
 
#pragma mark - Object
 
static String *description(const Object *self) {
 
    Number *this = (Number *) self;
 
    return $(alloc(String), initWithFormat, "%.2f", this->value);
}
 
static int hash(const Object *self) {
 
    Number *this = (Number *) self;
 
    return HashForDecimal(HASH_SEED, this->value);
}
 
static _Bool isEqual(const Object *self, const Object *other) {
 
    if (super(Object, self, isEqual, other)) {
        return true;
    }
 
    if (other && self->clazz == other->clazz) {
 
        const Number *this = (Number *) self;
        const Number *that = (Number *) other;
 
        return $(this, compareTo, that) == OrderSame;
    }
 
    return false;
}
 
#pragma mark - Number
 
static _Bool boolValue(const Number *self) {
    return self->value ? true : false;
}
 
static char charValue(const Number *self) {
    return (char) self->value;
}
 
static Order compareTo(const Number *self, const Number *other) {
 
    if (other) {
        if (self->value == other->value) {
            return OrderSame;
        }
 
        return self->value < other->value ? OrderAscending : OrderDescending;
    }
 
    return OrderAscending;
}
 
static double doubleValue(const Number *self) {
    return self->value;
}
 
static float floatValue(const Number *self) {
    return (float) self->value;
}
 
static long longValue(const Number *self) {
    return (long) self->value;
}
 
static Number *initWithValue(Number *self, const double value) {
 
    self = (Number *) super(Object, self, init);
    if (self) {
        self->value = value;
    }
 
    return self;
}
 
static int intValue(const Number *self) {
    return (int) self->value;
}
 
static Number *numberWithValue(double value) {
    return $(alloc(Number), initWithValue, value);
}
 
static short shortValue(const Number *self) {
    return (short) self->value;
}
 
#pragma mark - Class lifecycle
 
static void initialize(Class *clazz) {
 
    ((ObjectInterface *) clazz->interface)->description = description;
    ((ObjectInterface *) clazz->interface)->hash = hash;
    ((ObjectInterface *) clazz->interface)->isEqual = isEqual;
 
    ((NumberInterface *) clazz->interface)->boolValue = boolValue;
    ((NumberInterface *) clazz->interface)->charValue = charValue;
    ((NumberInterface *) clazz->interface)->compareTo = compareTo;
    ((NumberInterface *) clazz->interface)->doubleValue = doubleValue;
    ((NumberInterface *) clazz->interface)->floatValue = floatValue;
    ((NumberInterface *) clazz->interface)->longValue = longValue;
    ((NumberInterface *) clazz->interface)->initWithValue = initWithValue;
    ((NumberInterface *) clazz->interface)->intValue = intValue;
    ((NumberInterface *) clazz->interface)->numberWithValue = numberWithValue;
    ((NumberInterface *) clazz->interface)->shortValue = shortValue;
}
 
Class *_Number(void) {
    static Class *clazz;
    static Once once;
 
    do_once(&once, {
        clazz = _initialize(&(const ClassDef) {
            .name = "Number",
            .superclass = _Object(),
            .instanceSize = sizeof(Number),
            .interfaceOffset = offsetof(Number, interface),
            .interfaceSize = sizeof(NumberInterface),
            .initialize = initialize,
        });
    });
 
    return clazz;
}
 
#undef _Class