/*
 * CDDL HEADER START
 *
 * The contents of this file are subject to the terms of the
 * Common Development and Distribution License (the "License").
 * You may not use this file except in compliance with the License.
 *
 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
 * or http://www.opensolaris.org/os/licensing.
 * See the License for the specific language governing permissions
 * and limitations under the License.
 *
 * When distributing Covered Code, include this CDDL HEADER in each
 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
 * If applicable, add the following below this CDDL HEADER, with the
 * fields enclosed by brackets "[]" replaced with your own identifying
 * information: Portions Copyright [yyyy] [name of copyright owner]
 *
 * CDDL HEADER END
 */

/*
 * Copyright 2006 Sun Microsystems, Inc.  All rights reserved.
 * Use is subject to license terms.
 */

#include <string.h>
#include <sys/types.h>

#include <inj.h>
#include <inj_err.h>

#define INJ_HASHSZ      211

struct inj_var {
        struct inj_var *v_next;
        uintmax_t v_uvalue;
        void *v_key;
};

void
inj_hash_create(inj_hash_t *h, ulong_t (*hfn)(void *),
    int (*cfn)(void *, void *))
{
        h->h_hash = inj_zalloc(sizeof (inj_var_t *) * INJ_HASHSZ);
        h->h_hashsz = INJ_HASHSZ;
        h->h_nelems = 0;

        h->h_hashfn = hfn;
        h->h_cmpfn = cfn;
}

static inj_var_t *
inj_var_alloc(void *key, uintmax_t value, inj_var_t *next)
{
        inj_var_t *v = inj_alloc(sizeof (inj_var_t));

        v->v_next = next;
        v->v_key = key;
        v->v_uvalue = value;

        return (v);
}

static void
inj_var_free(inj_var_t *v, void (*freefn)(inj_var_t *, void *), void *arg)
{
        if (freefn != NULL)
                freefn(v, arg);

        inj_free(v, sizeof (inj_var_t));
}

void
inj_hash_destroy(inj_hash_t *h, void (*freefn)(inj_var_t *, void *), void *arg)
{
        inj_var_t *v, *w;
        size_t i;

        for (i = 0; i < h->h_hashsz; i++) {
                for (v = h->h_hash[i]; v != NULL; v = w) {
                        w = v->v_next;
                        inj_var_free(v, freefn, arg);
                }
        }

        inj_free(h->h_hash, sizeof (inj_var_t *) * INJ_HASHSZ);
}

int
inj_hash_insert(inj_hash_t *h, void *key, uintmax_t value)
{
        size_t i = h->h_hashfn(key) % h->h_hashsz;
        inj_var_t *v;

        for (v = h->h_hash[i]; v != NULL; v = v->v_next) {
                if (h->h_cmpfn(v->v_key, key) == 0)
                        return (-1);
        }

        /* not found - make a new one */
        v = inj_var_alloc(key, value, h->h_hash[i]);
        h->h_hash[i] = v;
        h->h_nelems++;

        return (0);
}

inj_var_t *
inj_hash_lookup(inj_hash_t *h, void *key)
{
        size_t i = h->h_hashfn(key) % h->h_hashsz;
        inj_var_t *v;

        for (v = h->h_hash[i]; v != NULL; v = v->v_next) {
                if (h->h_cmpfn(v->v_key, key) == 0)
                        return (v);
        }

        return (NULL);
}

void *
inj_hash_get_key(inj_var_t *v)
{
        return (v->v_key);
}

uintmax_t
inj_hash_get_value(inj_var_t *v)
{
        return (v->v_uvalue);
}

void *
inj_hash_get_cookie(inj_var_t *v)
{
        return ((void *)(uintptr_t)v->v_uvalue);
}