/*	$NetBSD: ath_netbsd.c,v 1.6 2006/02/05 06:03:26 xtraeme Exp $ */

/*-
 * Copyright (c) 2003, 2004 David Young
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 * 1. Redistributions of source code must retain the above copyright
 *    notice, this list of conditions and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in the
 *    documentation and/or other materials provided with the distribution.
 * 3. The name of the author may not be used to endorse or promote products
 *    derived from this software without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 */

#include <sys/cdefs.h>
__KERNEL_RCSID(0, "$NetBSD: ath_netbsd.c,v 1.6 2006/02/05 06:03:26 xtraeme Exp $");

#include <sys/param.h>
#include <sys/types.h>
#include <sys/errno.h>
#include <sys/systm.h> 
#include <sys/sysctl.h>
#include <sys/mbuf.h>   
#include <sys/malloc.h>
#include <sys/lock.h>
#include <sys/kernel.h>
#include <sys/socket.h>
#include <sys/sockio.h>
#include <sys/sysctl.h>
#include <sys/callout.h>
#include <machine/bus.h>
#include <machine/stdarg.h>
#include <sys/endian.h>
#include <sys/device.h>

#include <net/if.h>
#include <net/if_dl.h>
#include <net/if_media.h>
#include <net/if_arp.h>
#include <net/if_ether.h>
#include <net/if_llc.h>

#include <net80211/ieee80211_netbsd.h>
#include <net80211/ieee80211_var.h>
#include <dev/ic/ath_netbsd.h>
#include <dev/ic/athvar.h>

void
device_printf(struct device dv, const char *fmt, ...)
{
        va_list ap;

        va_start(ap, fmt);
        printf("%s: ", dv.dv_xname);
        vprintf(fmt, ap);
        va_end(ap);
	return;
}

struct mbuf *
m_defrag(struct mbuf *m0, int flags)
{
	struct mbuf *m;
	MGETHDR(m, flags, MT_DATA);
	if (m == NULL)
		return NULL;

	M_COPY_PKTHDR(m, m0);
	MCLGET(m, flags);
	if ((m->m_flags & M_EXT) == 0) {
		m_free(m);
		return NULL;
	}
	m_copydata(m0, 0, m0->m_pkthdr.len, mtod(m, caddr_t));
	m->m_len = m->m_pkthdr.len;
	return m;
}

/*
 * Setup sysctl(3) MIB, ath.*.
 *
 * TBD condition CTLFLAG_PERMANENT on being an LKM or not
 */
SYSCTL_SETUP(sysctl_ath, "sysctl ath subtree setup")
{
	int rc;
	const struct sysctlnode *cnode, *rnode;

	if ((rnode = ath_sysctl_treetop(clog)) == NULL)
		return;

	if ((rc = SYSCTL_GLOBAL_INT(CTLFLAG_READWRITE, "dwell",
	    "channel dwell time (ms) for AP/station scanning",
	    dwelltime)) != 0)
		goto err;

	if ((rc = SYSCTL_GLOBAL_INT(CTLFLAG_READWRITE, "calibrate",
	    "chip calibration interval (secs)", calinterval)) != 0)
		goto err;

	if ((rc = SYSCTL_GLOBAL_INT(CTLFLAG_READWRITE, "outdoor",
	    "outdoor operation", outdoor)) != 0)
		goto err;

	/* country code */
	if ((rc = SYSCTL_GLOBAL_INT(CTLFLAG_READWRITE,
	    "countrycode", "country code", countrycode)) != 0)
		goto err;

	/* regulatory domain */
	if ((rc = SYSCTL_GLOBAL_INT(CTLFLAG_READONLY, "regdomain",
	    "regulatory domain", regdomain)) != 0)
		goto err;

	if ((rc = SYSCTL_GLOBAL_INT(CTLFLAG_READWRITE, "debug",
	    "control debugging printfs", debug)) != 0)
		goto err;

	return;
err:
	printf("%s: sysctl_createv failed (rc = %d)\n", __func__, rc);
}

static int
ath_sysctl_slottime(SYSCTLFN_ARGS)
{
	struct ath_softc *sc;
	struct sysctlnode node;
	u_int slottime;
	int error;

	node = *rnode;
	sc = (struct ath_softc *)node.sysctl_data;
	slottime = ath_hal_getslottime(sc->sc_ah);
	node.sysctl_data = &slottime;
	error = sysctl_lookup(SYSCTLFN_CALL(&node));
	if (error || newp == NULL)
		return error;
	return !ath_hal_setslottime(sc->sc_ah, slottime) ? EINVAL : 0;
}

static int
ath_sysctl_acktimeout(SYSCTLFN_ARGS)
{
	struct ath_softc *sc;
	struct sysctlnode node;
	u_int acktimeout;
	int error;

	node = *rnode;
	sc = (struct ath_softc *)node.sysctl_data;
	acktimeout = ath_hal_getacktimeout(sc->sc_ah);
	node.sysctl_data = &acktimeout;
	error = sysctl_lookup(SYSCTLFN_CALL(&node));
	if (error || newp == NULL)
		return error;
	return !ath_hal_setacktimeout(sc->sc_ah, acktimeout) ? EINVAL : 0;
}

static int
ath_sysctl_ctstimeout(SYSCTLFN_ARGS)
{
	struct ath_softc *sc;
	struct sysctlnode node;
	u_int ctstimeout;
	int error;

	node = *rnode;
	sc = (struct ath_softc *)node.sysctl_data;
	ctstimeout = ath_hal_getctstimeout(sc->sc_ah);
	node.sysctl_data = &ctstimeout;
	error = sysctl_lookup(SYSCTLFN_CALL(&node));
	if (error || newp == NULL)
		return error;
	return !ath_hal_setctstimeout(sc->sc_ah, ctstimeout) ? EINVAL : 0;
}

static int
ath_sysctl_softled(SYSCTLFN_ARGS)
{
	struct ath_softc *sc;
	struct sysctlnode node;
	int softled;
	int error;

	node = *rnode;
	sc = (struct ath_softc *)node.sysctl_data;
	softled = sc->sc_softled;
	node.sysctl_data = &softled;
	error = sysctl_lookup(SYSCTLFN_CALL(&node));
	if (error || newp == NULL)
		return error;
	softled = (softled != 0);
	if (softled != sc->sc_softled) {
		if (softled) {
			/* NB: handle any sc_ledpin change */
			ath_hal_gpioCfgOutput(sc->sc_ah, sc->sc_ledpin);
			ath_hal_gpioset(sc->sc_ah, sc->sc_ledpin,
				!sc->sc_ledon);
		}
		sc->sc_softled = softled;
	}
	return 0;
}

static int
ath_sysctl_rxantenna(SYSCTLFN_ARGS)
{
	struct ath_softc *sc;
	struct sysctlnode node;
	u_int defantenna;
	int error;

	node = *rnode;
	sc = (struct ath_softc *)node.sysctl_data;
	defantenna = ath_hal_getdefantenna(sc->sc_ah);
	node.sysctl_data = &defantenna;
	error = sysctl_lookup(SYSCTLFN_CALL(&node));
	if (error || newp == NULL)
		return error;
	ath_hal_setdefantenna(sc->sc_ah, defantenna);
	return 0;
}

static int
ath_sysctl_diversity(SYSCTLFN_ARGS)
{
	struct ath_softc *sc;
	struct sysctlnode node;
	u_int diversity;
	int error;

	node = *rnode;
	sc = (struct ath_softc *)node.sysctl_data;
	diversity = sc->sc_diversity;
	node.sysctl_data = &diversity;
	error = sysctl_lookup(SYSCTLFN_CALL(&node));
	if (error || newp == NULL)
		return error;
	if (!ath_hal_setdiversity(sc->sc_ah, diversity))
		return EINVAL;
	sc->sc_diversity = diversity;
	return 0;
}

static int
ath_sysctl_diag(SYSCTLFN_ARGS)
{
	struct ath_softc *sc;
	struct sysctlnode node;
	u_int32_t diag;
	int error;

	node = *rnode;
	sc = (struct ath_softc *)node.sysctl_data;
	if (!ath_hal_getdiag(sc->sc_ah, &diag))
		return EINVAL;
	node.sysctl_data = &diag;
	error = sysctl_lookup(SYSCTLFN_CALL(&node));
	if (error || newp == NULL)
		return error;
	return !ath_hal_setdiag(sc->sc_ah, diag) ? EINVAL : 0;
}

static int
ath_sysctl_tpscale(SYSCTLFN_ARGS)
{
	struct ath_softc *sc;
	struct sysctlnode node;
	u_int32_t scale;
	int error;

	node = *rnode;
	sc = (struct ath_softc *)node.sysctl_data;
	ath_hal_gettpscale(sc->sc_ah, &scale);
	node.sysctl_data = &scale;
	error = sysctl_lookup(SYSCTLFN_CALL(&node));
	if (error || newp == NULL)
		return error;
	return !ath_hal_settpscale(sc->sc_ah, scale)
	    ? EINVAL
	    : ath_reset(&sc->sc_if);
}

static int
ath_sysctl_tpc(SYSCTLFN_ARGS)
{
	struct ath_softc *sc;
	struct sysctlnode node;
	u_int tpc;
	int error;

	node = *rnode;
	sc = (struct ath_softc *)node.sysctl_data;
	tpc = ath_hal_gettpc(sc->sc_ah);
	node.sysctl_data = &tpc;
	error = sysctl_lookup(SYSCTLFN_CALL(&node));
	if (error || newp == NULL)
		return error;
	return !ath_hal_settpc(sc->sc_ah, tpc) ? EINVAL : 0;
}

const struct sysctlnode *
ath_sysctl_instance(const char *dvname, struct sysctllog **log)
{
	int rc;
	const struct sysctlnode *rnode;

	if ((rc = sysctl_createv(log, 0, NULL, &rnode,
	    CTLFLAG_PERMANENT, CTLTYPE_NODE, "hw", NULL,
	    NULL, 0, NULL, 0, CTL_HW, CTL_EOL)) != 0)
		goto err;

	if ((rc = sysctl_createv(log, 0, &rnode, &rnode,
	    CTLFLAG_PERMANENT, CTLTYPE_NODE, dvname,
	    SYSCTL_DESCR("ath information and options"),
	    NULL, 0, NULL, 0, CTL_CREATE, CTL_EOL)) != 0)
		goto err;

	return rnode;
err:
	printf("%s: sysctl_createv failed, rc = %d\n", __func__, rc);
	return NULL;
}

const struct sysctlnode *
ath_sysctl_treetop(struct sysctllog **log)
{
	int rc;
	const struct sysctlnode *rnode;

	if ((rc = sysctl_createv(log, 0, NULL, &rnode,
	    CTLFLAG_PERMANENT, CTLTYPE_NODE, "hw", NULL,
	    NULL, 0, NULL, 0, CTL_HW, CTL_EOL)) != 0)
		goto err;

	if ((rc = sysctl_createv(log, 0, &rnode, &rnode,
	    CTLFLAG_PERMANENT, CTLTYPE_NODE, "ath",
	    SYSCTL_DESCR("ath information and options"),
	    NULL, 0, NULL, 0, CTL_CREATE, CTL_EOL)) != 0)
		goto err;

	return rnode;
err:
	printf("%s: sysctl_createv failed, rc = %d\n", __func__, rc);
	return NULL;
}

void
ath_sysctlattach(struct ath_softc *sc)
{
	int rc;
	struct sysctllog **log = &sc->sc_sysctllog;
	const struct sysctlnode *cnode, *rnode;

	ath_hal_getcountrycode(sc->sc_ah, &sc->sc_countrycode);
	ath_hal_getregdomain(sc->sc_ah, &sc->sc_regdomain);
	sc->sc_debug = ath_debug;
	sc->sc_txintrperiod = ATH_TXINTR_PERIOD;

	if ((rnode = ath_sysctl_instance(sc->sc_dev.dv_xname, log)) == NULL)
		return;

	if ((rc = SYSCTL_INT(0, countrycode, "EEPROM country code")) != 0)
		goto err;

	if ((rc = SYSCTL_INT(0, regdomain, "EEPROM regdomain code")) != 0)
		goto err;

	if ((rc = SYSCTL_INT(CTLFLAG_READWRITE, debug,
	    "control debugging printfs")) != 0)
		goto err;

#if 0
	/* channel dwell time (ms) for AP/station scanning */
	if ((rc = SYSCTL_INT(CTLFLAG_READWRITE, dwell,
	    "Channel dwell time (ms) for scanning")) != 0)
		goto err;
#endif

	if ((rc = SYSCTL_INT_SUBR(CTLFLAG_READWRITE, slottime,
	    "802.11 slot time (us)")) != 0)
		goto err;
	if ((rc = SYSCTL_INT_SUBR(CTLFLAG_READWRITE, acktimeout,
	    "802.11 ACK timeout (us)")) != 0)
		goto err;
	if ((rc = SYSCTL_INT_SUBR(CTLFLAG_READWRITE, ctstimeout,
	    "802.11 CTS timeout (us)")) != 0)
		goto err;
	if ((rc = SYSCTL_INT_SUBR(CTLFLAG_READWRITE, softled,
	    "enable/disable software LED support")) != 0)
		goto err;
	if ((rc = SYSCTL_INT(CTLFLAG_READWRITE, ledpin,
	    "GPIO pin connected to LED")) != 0)
		goto err;
	if ((rc = SYSCTL_INT(CTLFLAG_READWRITE, ledon,
	    "setting to turn LED on")) != 0)
		goto err;
	if ((rc = SYSCTL_INT(CTLFLAG_READWRITE, ledidle,
	    "idle time for inactivity LED (ticks)")) != 0)
		goto err;
	if ((rc = SYSCTL_INT(CTLFLAG_READWRITE, txantenna,
	    "tx antenna (0=auto)")) != 0)
		goto err;
	if ((rc = SYSCTL_INT_SUBR(CTLFLAG_READWRITE, rxantenna,
	    "default/rx antenna")) != 0)
		goto err;
	if (ath_hal_hasdiversity(sc->sc_ah)) {
		if ((rc = SYSCTL_INT_SUBR(CTLFLAG_READWRITE, diversity,
		    "antenna diversity")) != 0)
			goto err;
	}
	if ((rc = SYSCTL_INT(CTLFLAG_READWRITE, txintrperiod,
	    "tx descriptor batching")) != 0)
		goto err;
	if ((rc = SYSCTL_INT_SUBR(CTLFLAG_READWRITE, diag,
	    "h/w diagnostic control")) != 0)
		goto err;
	if ((rc = SYSCTL_INT_SUBR(CTLFLAG_READWRITE, tpscale,
	    "tx power scaling")) != 0)
		goto err;
	if (ath_hal_hastpc(sc->sc_ah)) {
		if ((rc = SYSCTL_INT_SUBR(CTLFLAG_READWRITE, tpc,
		    "enable/disable per-packet TPC")) != 0)
			goto err;
	}
	return;
err:
	printf("%s: sysctl_createv failed, rc = %d\n", __func__, rc);
}