/*
 * CDDL HEADER START
 *
 * The contents of this file are subject to the terms of the
 * Common Development and Distribution License, Version 1.0 only
 * (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 (c) 1996-1998 by Sun Microsystems, Inc.
 * All rights reserved.
 */

#include <stddef.h>
#include <stdlib.h>
#include <assert.h>
#include <sys/param.h>
#include <memory.h>
#include <config_admin.h>
#include "mema_test.h"

void *
mtest_allocate_buf(
        mtest_handle_t handle,
        size_t size)
{
        struct mtest_alloc_ent *new_ent;

        new_ent =
            (struct mtest_alloc_ent *)malloc(sizeof (struct mtest_alloc_ent));
        if (new_ent == NULL)
                return (NULL);

        new_ent->buf = malloc(size);
        if (new_ent->buf == NULL) {
                free((void *)new_ent);
                return (NULL);
        }
        /* TODO: probably not thread safe? */
        new_ent->next = handle->alloc_list;
        handle->alloc_list = new_ent;

        return (new_ent->buf);
}

/* This routine dedicated to George Cameron */
void
mtest_deallocate_buf(
        mtest_handle_t handle,
        void *buf)
{
        struct mtest_alloc_ent **p, *p1;

        p = &handle->alloc_list;
        while ((*p) != NULL && (*p)->buf != buf)
                p = &(*p)->next;
        assert((*p) != NULL);
        p1 = *p;
        *p = (*p)->next;
        free(p1->buf);
        free((void *)p1);
}

void
mtest_deallocate_buf_all(mtest_handle_t handle)
{
        struct mtest_alloc_ent *p1;

        while ((p1 = handle->alloc_list) != NULL) {
                handle->alloc_list = p1->next;
                free(p1->buf);
                free((void *)p1);
        }
}

void
mtest_message(mtest_handle_t handle, const char *msg)
{
        if (handle->msgp != NULL && handle->msgp->message_routine != NULL) {
                (*handle->msgp->message_routine)(handle->msgp->appdata_ptr,
                    msg);
        }
}