/*
 * 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.
 */

#include "rge.h"

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

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

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


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

	ASSERT(mutex_owned(rge_log_mutex));

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

/*
 * Report a run-time event (CE_NOTE, to console & log)
 */
void
rge_notice(rge_t *rgep, const char *fmt, ...)
{
	va_list args;

	mutex_enter(rge_log_mutex);
	rge_log_data.who = rgep->ifname;
	rge_log_data.fmt = "%s: %s";
	rge_log_data.level = CE_NOTE;

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

	mutex_exit(rge_log_mutex);
}

/*
 * Log a run-time event (CE_NOTE, log only)
 */
void
rge_log(rge_t *rgep, const char *fmt, ...)
{
	va_list args;

	mutex_enter(rge_log_mutex);
	rge_log_data.who = rgep->ifname;
	rge_log_data.fmt = "!%s: %s";
	rge_log_data.level = CE_NOTE;

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

	mutex_exit(rge_log_mutex);
}

/*
 * Log a run-time problem (CE_WARN, log only)
 */
void
rge_problem(rge_t *rgep, const char *fmt, ...)
{
	va_list args;

	mutex_enter(rge_log_mutex);
	rge_log_data.who = rgep->ifname;
	rge_log_data.fmt = "!%s: %s";
	rge_log_data.level = CE_WARN;

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

	mutex_exit(rge_log_mutex);
}

/*
 * Log a programming error (CE_WARN, log only)
 */
void
rge_error(rge_t *rgep, const char *fmt, ...)
{
	va_list args;

	mutex_enter(rge_log_mutex);
	rge_log_data.who = rgep->ifname;
	rge_log_data.fmt = "!%s: %s";
	rge_log_data.level = CE_WARN;

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

	mutex_exit(rge_log_mutex);
}

#if	RGE_DEBUGGING

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

	ASSERT(mutex_owned(rge_log_mutex));

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

	mutex_exit(rge_log_mutex);
}

void
(*rge_gdb(void))(const char *fmt, ...)
{
	mutex_enter(rge_log_mutex);
	rge_log_data.who = "rge";
	rge_log_data.fmt = "?%s: %s\n";
	rge_log_data.level = CE_CONT;

	return (rge_prt);
}

void
(*rge_db(rge_t *rgep))(const char *fmt, ...)
{
	mutex_enter(rge_log_mutex);
	rge_log_data.who = rgep->ifname;
	rge_log_data.fmt = "?%s: %s\n";
	rge_log_data.level = CE_CONT;

	return (rge_prt);
}

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

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

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

void
rge_pkt_dump(rge_t *rgep, rge_bd_t *hrbdp, sw_rbd_t *srbdp, const char *msg)
{
	rge_problem(rgep, "driver-detected hardware error: %s", msg);

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

	rge_log(rgep, "PCI address %lx flags_len 0x%x"
	    "vlan_tag 0x%x",
	    hrbdp->host_buf_addr,
	    hrbdp->flags_len,
	    hrbdp->vlan_tag);

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

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

		minidump(rgep, "packet data", srbdp->rx_buf->pbuf.mem_va,
		    hrbdp->flags_len & RBD_LEN_MASK);
	}
}

void
rge_dbg_enter(rge_t *rgep, const char *s)
{
	uint32_t debug;

	debug = rgep != NULL ? rgep->debug : rge_debug;
	if (debug & RGE_DBG_STOP) {
		cmn_err(CE_CONT, "rge_dbg_enter(%p): %s\n", (void *)rgep, s);
		debug_enter("");
	}
}

#endif	/* RGE_DEBUGGING */