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

#include "bge_impl.h"


/*
 * Global variable for default debug flags
 */
uint32_t bge_debug;

/*
 * Global mutex used by logging routines below
 */
kmutex_t bge_log_mutex[1];

/*
 * Static data used by logging routines; protected by <bge_log_mutex>
 */
static struct {
        const char *who;
        const char *fmt;
        int level;
} bge_log_data;


/*
 * Backend print routine for all the routines below
 */
static void
bge_vprt(const char *fmt, va_list args)
{
        char buf[128];

        ASSERT(mutex_owned(bge_log_mutex));

        (void) vsnprintf(buf, sizeof (buf), fmt, args);
        cmn_err(bge_log_data.level, bge_log_data.fmt, bge_log_data.who, buf);
}

/*
 * Log a run-time event (CE_NOTE, log only)
 */
void
bge_log(bge_t *bgep, const char *fmt, ...)
{
        va_list args;

        mutex_enter(bge_log_mutex);
        bge_log_data.who = bgep->ifname;
        bge_log_data.fmt = "!%s: %s";
        bge_log_data.level = CE_NOTE;

        va_start(args, fmt);
        bge_vprt(fmt, args);
        va_end(args);

        mutex_exit(bge_log_mutex);
}

/*
 * Log a run-time problem (CE_WARN, log only)
 */
void
bge_problem(bge_t *bgep, const char *fmt, ...)
{
        va_list args;

        mutex_enter(bge_log_mutex);
        bge_log_data.who = bgep->ifname;
        bge_log_data.fmt = "!%s: %s";
        bge_log_data.level = CE_WARN;

        va_start(args, fmt);
        bge_vprt(fmt, args);
        va_end(args);

        mutex_exit(bge_log_mutex);
}

/*
 * Log a programming error (CE_WARN, log only)
 */
void
bge_error(bge_t *bgep, const char *fmt, ...)
{
        va_list args;

        mutex_enter(bge_log_mutex);
        bge_log_data.who = bgep->ifname;
        bge_log_data.fmt = "!%s: %s";
        bge_log_data.level = CE_WARN;

        va_start(args, fmt);
        bge_vprt(fmt, args);
        va_end(args);

        mutex_exit(bge_log_mutex);
}

void
bge_fm_ereport(bge_t *bgep, char *detail)
{
        uint64_t ena;
        char buf[FM_MAX_CLASS];

        (void) snprintf(buf, FM_MAX_CLASS, "%s.%s", DDI_FM_DEVICE, detail);
        ena = fm_ena_generate(0, FM_ENA_FMT1);
        if (DDI_FM_EREPORT_CAP(bgep->fm_capabilities)) {
                ddi_fm_ereport_post(bgep->devinfo, buf, ena, DDI_NOSLEEP,
                    FM_VERSION, DATA_TYPE_UINT8, FM_EREPORT_VERS0, NULL);
        }
}

#if     BGE_DEBUGGING

static void
bge_prt(const char *fmt, ...)
{
        va_list args;

        ASSERT(mutex_owned(bge_log_mutex));

        va_start(args, fmt);
        bge_vprt(fmt, args);
        va_end(args);

        mutex_exit(bge_log_mutex);
}

void
(*bge_gdb(void))(const char *fmt, ...)
{
        mutex_enter(bge_log_mutex);
        bge_log_data.who = "bge";
        bge_log_data.fmt = "?%s: %s\n";
        bge_log_data.level = CE_CONT;

        return (bge_prt);
}

void
(*bge_db(bge_t *bgep))(const char *fmt, ...)
{
        mutex_enter(bge_log_mutex);
        bge_log_data.who = bgep->ifname;
        bge_log_data.fmt = "?%s: %s\n";
        bge_log_data.level = CE_CONT;

        return (bge_prt);
}

/*
 * Dump a chunk of memory, 16 bytes at a time
 */
static void
minidump(bge_t *bgep, const char *caption, void *dp, uint_t len)
{
        uint32_t buf[4];
        uint32_t nbytes;

        bge_log(bgep, "%d bytes of %s at address %p:-", len, caption, dp);

        for (len = MIN(len, BGE_STD_BUFF_SIZE); len != 0; len -= nbytes) {
                nbytes = MIN(len, sizeof (buf));
                bzero(buf, sizeof (buf));
                bcopy(dp, buf, nbytes);
                bge_log(bgep, "%08x %08x %08x %08x",
                        buf[0], buf[1], buf[2], buf[3]);
                dp = (caddr_t)dp + nbytes;
        }
}

void
bge_pkt_dump(bge_t *bgep, bge_rbd_t *hrbdp, sw_rbd_t *srbdp, const char *msg)
{
        bge_problem(bgep, "driver-detected hardware error: %s", msg);

        minidump(bgep, "hardware descriptor", hrbdp, sizeof (*hrbdp));

        bge_log(bgep, "PCI address %llx packet len 0x%x token 0x%x "
                        "flags 0x%x index 0x%x",
                        hrbdp->host_buf_addr,
                        hrbdp->len,
                        hrbdp->opaque,
                        hrbdp->flags,
                        hrbdp->index);

        if (srbdp != NULL) {
                minidump(bgep, "software descriptor", srbdp, sizeof (*srbdp));

                bge_log(bgep, "PCI address %llx buffer len 0x%x token 0x%x",
                        srbdp->pbuf.cookie.dmac_laddress,
                        srbdp->pbuf.alength,
                        srbdp->pbuf.token);

                minidump(bgep, "packet data", srbdp->pbuf.mem_va, hrbdp->len);
        }
}

void
bge_dbg_enter(bge_t *bgep, const char *s)
{
        uint32_t debug;

        debug = bgep != NULL ? bgep->debug : bge_debug;
        if (debug & BGE_DBG_STOP) {
                cmn_err(CE_CONT, "bge_dbg_enter(%p): %s\n", (void *)bgep, s);
                debug_enter("");
        }
}

#endif  /* BGE_DEBUGGING */