/*
**  OSSP uuid - Universally Unique Identifier
**  Copyright (c) 2004 Ralf S. Engelschall <rse@engelschall.com>
**  Copyright (c) 2004 The OSSP Project <http://www.ossp.org/>
**
**  This file is part of OSSP uuid, a library for the generation
**  of UUIDs which can found at http://www.ossp.org/pkg/lib/uuid/
**
**  Permission to use, copy, modify, and distribute this software for
**  any purpose with or without fee is hereby granted, provided that
**  the above copyright notice and this permission notice appear in all
**  copies.
**
**  THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESSED OR IMPLIED
**  WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
**  MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
**  IN NO EVENT SHALL THE AUTHORS AND COPYRIGHT HOLDERS AND THEIR
**  CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
**  SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
**  LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF
**  USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
**  ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
**  OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT
**  OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
**  SUCH DAMAGE.
**
**  uuid.c: library API implementation
*/

#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <unistd.h>

#include "config.h"
#include "uuid.h"

/* determine types of 8-bit size */
#if SIZEOF_CHAR == 1
typedef char uuid_int8_t;
#else
#error uexpected: sizeof(char) != 1 !?
#endif
#if SIZEOF_UNSIGNED_CHAR == 1
typedef unsigned char uuid_uint8_t;
#else
#error uexpected: sizeof(unsigned char) != 1 !?
#endif

/* determine types of 16-bit size */
#if SIZEOF_SHORT == 2
typedef short uuid_int16_t;
#elif SIZEOF_INT == 2
typedef int uuid_int16_t;
#elif SIZEOF_LONG == 2
typedef long uuid_int16_t;
#else
#error unexpected: no type found for uuid_int16_t
#endif
#if SIZEOF_UNSIGNED_SHORT == 2
typedef unsigned short uuid_uint16_t;
#elif SIZEOF_UNSIGNED_INT == 2
typedef unsigned int uuid_uint16_t;
#elif SIZEOF_UNSIGNED_LONG == 2
typedef unsigned long uuid_uint16_t;
#else
#error unexpected: no type found for uuid_uint16_t
#endif

/* determine types of 32-bit size */
#if SIZEOF_SHORT == 4
typedef short uuid_int32_t;
#elif SIZEOF_INT == 4
typedef int uuid_int32_t;
#elif SIZEOF_LONG == 4
typedef long uuid_int32_t;
#elif SIZEOF_LONG_LONG == 4
typedef long long uuid_int32_t;
#else
#error unexpected: no type found for uuid_int32_t
#endif
#if SIZEOF_UNSIGNED_SHORT == 4
typedef unsigned short uuid_uint32_t;
#elif SIZEOF_UNSIGNED_INT == 4
typedef unsigned int uuid_uint32_t;
#elif SIZEOF_UNSIGNED_LONG == 4
typedef unsigned long uuid_uint32_t;
#elif SIZEOF_UNSIGNED_LONG_LONG == 4
typedef unsigned long long uuid_uint32_t;
#else
#error unexpected: no type found for uuid_uint32_t
#endif

/* private data type declaration */
struct uuid_st {
    uuid_uint32_t   time_low;
    uuid_uint16_t   time_mid;
    uuid_uint16_t   time_hi_and_version;
    uuid_uint8_t    clock_seq_hi_and_reserved;
    uuid_uint8_t    clock_seq_low;
    uuid_uint8_t    node[6];
};

uuid_rc_t uuid_create(uuid_t **uuid)
{
    if (uuid == NULL)
        return UUID_RC_ARG;
    if ((*uuid = (uuid_t *)malloc(sizeof(uuid_t))) == NULL)
        return UUID_RC_MEM;
    uuid_null(*uuid);
    return UUID_RC_OK;
}

uuid_rc_t uuid_destroy(uuid_t *uuid)
{
    if (uuid == NULL)
        return UUID_RC_ARG;
    free(uuid);
    return UUID_RC_OK;
}

uuid_rc_t uuid_null(uuid_t *uuid)
{
    if (uuid == NULL)
        return UUID_RC_ARG;
    memset(uuid, '\0', sizeof(uuid_t));
    return UUID_RC_OK;
}

uuid_rc_t uuid_generate(uuid_t *uuid)
{
    if (uuid == NULL)
        return UUID_RC_ARG;
    /* FIXME */
    return UUID_RC_OK;
}

uuid_rc_t uuid_compare(uuid_t *uuid, uuid_t *uuid2, int *result)
{
    if (uuid == NULL || uuid2 == NULL || result == NULL)
        return UUID_RC_ARG;
    /* FIXME */
    return UUID_RC_OK;
}

uuid_rc_t uuid_isnull(uuid_t *uuid, int *result)
{
    if (uuid == NULL || result == NULL)
        return UUID_RC_ARG;
    *result = 0;
    if (   uuid->time_low == 0
        && uuid->time_mid == 0
        && uuid->time_hi_and_version == 0
        && uuid->clock_seq_hi_and_reserved == 0
        && uuid->clock_seq_low == 0
        && uuid->node[0] == 0
        && uuid->node[1] == 0
        && uuid->node[2] == 0
        && uuid->node[3] == 0
        && uuid->node[4] == 0
        && uuid->node[5] == 0)
        *result = 1;
    return UUID_RC_OK;
}

uuid_rc_t uuid_parse(uuid_t *uuid, const char *str)
{
    if (uuid == NULL)
        return UUID_RC_ARG;
    /* FIXME */
    return UUID_RC_OK;
}

uuid_rc_t uuid_format(uuid_t *uuid, char **str)
{
    if (uuid == NULL || str == NULL)
        return UUID_RC_ARG;
    /* FIXME */
    return UUID_RC_OK;
}

uuid_rc_t uuid_read(uuid_t *uuid, const void *buf)
{
    if (uuid == NULL)
        return UUID_RC_ARG;
    /* FIXME */
    return UUID_RC_OK;
}

uuid_rc_t uuid_write(uuid_t *uuid, void **buf)
{
    if (uuid == NULL || buf == NULL)
        return UUID_RC_ARG;
    /* FIXME */
    return UUID_RC_OK;
}

char *uuid_error(uuid_rc_t rc)
{
    char *str;

    switch (rc) {
        case UUID_RC_OK:  str = "everything ok";    break;
        case UUID_RC_ARG: str = "invalid argument"; break;
        case UUID_RC_MEM: str = "out of memory";    break;
        case UUID_RC_SYS: str = "system error";     break;
        default:          str = NULL;               break;
    }
    return str;
}