/*      $NetBSD: if_bug.c,v 1.4 2009/03/14 15:36:11 dsl Exp $   */

/*-
 * Copyright (c) 2002 The NetBSD Foundation, Inc.
 * All rights reserved.
 *
 * This code is derived from software contributed to The NetBSD Foundation
 * by Steve C. Woodford.
 *
 * 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.
 *
 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
 * ``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 FOUNDATION OR CONTRIBUTORS
 * 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/param.h>
#include <sys/types.h>
#include <sys/socket.h>

#include <netinet/in.h>
#include <netinet/in_systm.h>

#include <net/if.h>
#include <net/if_ether.h>

#include <lib/libkern/libkern.h>
#include <lib/libsa/stand.h>
#include <lib/libsa/net.h>
#include <lib/libsa/netif.h>

#include "libsa.h"
#include "bugsyscalls.h"

static int      bug_match(struct netif *, void *);
static int      bug_probe(struct netif *, void *);
static void     bug_init(struct iodesc *, void *);
static int      bug_get(struct iodesc *, void *, size_t, saseconds_t);
static int      bug_put(struct iodesc *, void *, size_t);
static void     bug_end(struct netif *);

static struct netif_stats bug_stats;

static struct netif_dif bug0_dif = {
        0, 1, &bug_stats, 0, 0
};

struct netif_driver bug_driver = {
        "net",                  /* netif_bname */
        bug_match,              /* match */
        bug_probe,              /* probe */
        bug_init,               /* init */
        bug_get,                /* get */
        bug_put,                /* put */
        bug_end,                /* end */
        &bug0_dif,              /* netif_ifs */
        1,                      /* netif_nifs */
};

struct bug_softc {
        u_int32_t       sc_pad1;
        u_int8_t        sc_rxbuf[ETHER_MAX_LEN];
        u_int32_t       sc_pad2;
        u_int8_t        sc_txbuf[ETHER_MAX_LEN];
};

static struct bug_softc bug_softc;

int
bug_match(struct netif *nif, void *machdep_hint)
{

        if (machdep_hint &&
            memcmp(bug_driver.netif_bname, machdep_hint,
                   strlen(bug_driver.netif_bname)) == 0)
                return (1);

        return (0);
}

int
bug_probe(struct netif *nif, void *machdep_hint)
{

        return (0);
}

void
bug_init(struct iodesc *desc, void *machdep_hint)
{
        struct netif *nif = desc->io_netif;
        struct bug_netio nio;

        nio.nc_clun = 0;
        nio.nc_dlun = 0;
        nio.nc_status = 0;
        nio.nc_command = BUG_NETIO_CMD_GET_MAC;
        nio.nc_buffer = desc->myea;
        nio.nc_length = 6;
        nio.nc_csr = 0;

        if (bugsys_netio(&nio) != 0 || nio.nc_status != 0)
                panic("bug_init: Failed to get MAC address! (code 0x%x)",
                    nio.nc_status);

        nio.nc_clun = 0;
        nio.nc_dlun = 0;
        nio.nc_status = 0;
        nio.nc_command = BUG_NETIO_CMD_FLUSH;
        nio.nc_buffer = NULL;
        nio.nc_length = 0;
        nio.nc_csr = 0;

        if (bugsys_netio(&nio) != 0 || nio.nc_status != 0)
                panic("bug_init: Failed to flush netio device (code 0x%x)",
                    nio.nc_status);

        printf("network: %s%d attached to %s\n", nif->nif_driver->netif_bname,
            nif->nif_unit, ether_sprintf(desc->myea));

        nif->nif_devdata = &bug_softc;
}

int
bug_get(struct iodesc *desc, void *pkt, size_t len, saseconds_t timeout)
{
        struct netif *nif = desc->io_netif;
        struct bug_softc *sc = nif->nif_devdata;
        struct bug_netio nio;

        nio.nc_clun = 0;
        nio.nc_dlun = 0;
        nio.nc_status = 0;
        nio.nc_command = BUG_NETIO_CMD_RECEIVE;
        nio.nc_buffer = sc->sc_rxbuf;
        nio.nc_length = ETHER_MAX_LEN;
        nio.nc_csr = 0;

        if (bugsys_netio(&nio) != 0 || nio.nc_status != 0) {
                printf("bug_get: Receive packet failed (code: 0x%x)\n",
                    nio.nc_status);
                return (0);
        }

        if (nio.nc_length) {
                memcpy(pkt, sc->sc_rxbuf, MIN(len, nio.nc_length));
                return (MIN(len, nio.nc_length));
        }

        return (0);
}

int
bug_put(struct iodesc *desc, void *pkt, size_t len)
{
        struct netif *nif = desc->io_netif;
        struct bug_softc *sc = nif->nif_devdata;
        struct bug_netio nio;

        memcpy(&sc->sc_txbuf, pkt, len);

        nio.nc_clun = 0;
        nio.nc_dlun = 0;
        nio.nc_status = 0;
        nio.nc_command = BUG_NETIO_CMD_TRANSMIT;
        nio.nc_buffer = sc->sc_txbuf;
        nio.nc_length = MAX(len, ETHER_MIN_LEN);
        nio.nc_csr = 0;

        if (bugsys_netio(&nio) != 0 || nio.nc_status != 0) {
                printf("bug_put: Send packet failed (code: 0x%x)\n",
                    nio.nc_status);
                return (0);
        }

        return (len);
}

void
bug_end(struct netif *nif)
{
        struct bug_netio nio;

        nio.nc_clun = 0;
        nio.nc_dlun = 0;
        nio.nc_status = 0;
        nio.nc_command = BUG_NETIO_CMD_FLUSH;
        nio.nc_buffer = NULL;
        nio.nc_length = 0;
        nio.nc_csr = 0;

        if (bugsys_netio(&nio) != 0 || nio.nc_status != 0)
                printf("bug_end: netio failed (code: 0x%x)\n", nio.nc_status);
}