/*
 * 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 2005 Sun Microsystems, Inc.  All rights reserved.
 * Use is subject to license terms.
 */

/*
 * Callback facility designed to allow interested parties (dmods, targets, or
 * even the core debugger framework) to register for notification when certain
 * "interesting" events occur.
 */

#include <mdb/mdb_list.h>
#include <mdb/mdb_debug.h>
#include <mdb/mdb_callb.h>
#include <mdb/mdb_module.h>
#include <mdb/mdb.h>

mdb_callb_t *
mdb_callb_add(mdb_module_t *m, int class, mdb_callb_f fp, void *arg)
{
        mdb_callb_t *new = mdb_zalloc(sizeof (mdb_callb_t), UM_SLEEP);

        ASSERT(class == MDB_CALLB_STCHG || class == MDB_CALLB_PROMPT);

        new->cb_mod = m;
        new->cb_class = class;
        new->cb_func = fp;
        new->cb_arg = arg;

        if (m == NULL) {
                mdb_list_prepend(&mdb.m_cblist, new);
        } else {
                mdb_list_insert(&mdb.m_cblist, m->mod_cb, new);
                if (m->mod_cb == NULL)
                        m->mod_cb = new;
        }

        return (new);
}

void
mdb_callb_remove(mdb_callb_t *cb)
{
        if (cb->cb_mod != NULL) {
                mdb_callb_t *next = mdb_list_next(cb);
                mdb_module_t *mod = cb->cb_mod;

                if (mod->mod_cb == cb) {
                        if (next == NULL || next->cb_mod != mod)
                                mod->mod_cb = NULL;
                        else
                                mod->mod_cb = next;
                }
        }

        mdb_list_delete(&mdb.m_cblist, cb);

        mdb_free(cb, sizeof (mdb_callb_t));
}

void
mdb_callb_remove_by_mod(mdb_module_t *m)
{
        while (m->mod_cb != NULL)
                mdb_callb_remove(m->mod_cb);
}

void
mdb_callb_remove_all(void)
{
        mdb_callb_t *cb;

        while ((cb = mdb_list_next(&mdb.m_cblist)) != NULL)
                mdb_callb_remove(cb);
}

void
mdb_callb_fire(int class)
{
        mdb_callb_t *cb, *next;

        ASSERT(class == MDB_CALLB_STCHG || class == MDB_CALLB_PROMPT);

        mdb_dprintf(MDB_DBG_CALLB, "invoking %s callbacks\n",
            (class == MDB_CALLB_STCHG ? "state change" : "prompt"));

        for (cb = mdb_list_next(&mdb.m_cblist); cb != NULL; cb = next) {
                next = mdb_list_next(cb);
                if (cb->cb_class == class)
                        cb->cb_func(cb->cb_arg);
        }
}