diff options
author | jhay <jhay@FreeBSD.org> | 2001-01-30 10:05:44 +0000 |
---|---|---|
committer | jhay <jhay@FreeBSD.org> | 2001-01-30 10:05:44 +0000 |
commit | d692564caf2a8d032840da3aff642bbd4a3f59b8 (patch) | |
tree | 520005fe346921a27688851f01b5772f681f1525 /sys | |
parent | 20531fb538e4bd455aac5804cb27948306e8977f (diff) | |
download | FreeBSD-src-d692564caf2a8d032840da3aff642bbd4a3f59b8.zip FreeBSD-src-d692564caf2a8d032840da3aff642bbd4a3f59b8.tar.gz |
The ar and sr devices have moved to sys/dev/.
Diffstat (limited to 'sys')
-rw-r--r-- | sys/i386/isa/if_ar.c | 2520 | ||||
-rw-r--r-- | sys/i386/isa/if_ar.h | 51 | ||||
-rw-r--r-- | sys/i386/isa/if_arregs.h | 227 | ||||
-rw-r--r-- | sys/i386/isa/if_sr.c | 3365 | ||||
-rw-r--r-- | sys/i386/isa/if_sr.h | 51 | ||||
-rw-r--r-- | sys/i386/isa/if_srregs.h | 123 | ||||
-rw-r--r-- | sys/pci/if_ar_p.c | 170 | ||||
-rw-r--r-- | sys/pci/if_sr_p.c | 138 |
8 files changed, 0 insertions, 6645 deletions
diff --git a/sys/i386/isa/if_ar.c b/sys/i386/isa/if_ar.c deleted file mode 100644 index e610972..0000000 --- a/sys/i386/isa/if_ar.c +++ /dev/null @@ -1,2520 +0,0 @@ -/* - * Copyright (c) 1995 - 2001 John Hay. 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. Neither the name of the author nor the names of any co-contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY John Hay ``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 John Hay 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. - * - * $FreeBSD$ - */ - -/* - * Programming assumptions and other issues. - * - * The descriptors of a DMA channel will fit in a 16K memory window. - * - * The buffers of a transmit DMA channel will fit in a 16K memory window. - * - * Only the ISA bus cards with X.21 and V.35 is tested. - * - * When interface is going up, handshaking is set and it is only cleared - * when the interface is down'ed. - * - * There should be a way to set/reset Raw HDLC/PPP, Loopback, DCE/DTE, - * internal/external clock, etc..... - * - */ - -#include "opt_netgraph.h" - -#include <sys/param.h> -#include <sys/systm.h> -#include <sys/kernel.h> -#include <sys/malloc.h> -#include <sys/mbuf.h> -#include <sys/socket.h> -#include <sys/sockio.h> -#include <sys/module.h> -#include <sys/bus.h> -#include <machine/bus.h> -#include <machine/resource.h> -#include <machine/bus_pio.h> -#include <machine/bus_memio.h> -#include <sys/rman.h> - -#include <isa/isavar.h> -#include "isa_if.h" - -#include <net/if.h> -#ifdef NETGRAPH -#include <netgraph/ng_message.h> -#include <netgraph/netgraph.h> -#include <sys/syslog.h> -#include <i386/isa/if_ar.h> -#else /* NETGRAPH */ -#include <net/if_sppp.h> -#include <net/bpf.h> -#endif /* NETGRAPH */ - -#include <machine/md_var.h> - -#include <i386/isa/ic/hd64570.h> -#include <i386/isa/if_arregs.h> - -#ifdef TRACE -#define TRC(x) x -#else -#define TRC(x) -#endif - -#define TRCL(x) x - -#define PPP_HEADER_LEN 4 - -struct ar_softc { -#ifndef NETGRAPH - struct sppp ifsppp; -#endif /* NETGRAPH */ - int unit; /* With regards to all ar devices */ - int subunit; /* With regards to this card */ - struct ar_hardc *hc; - - struct buf_block { - u_int txdesc; /* On card address */ - u_int txstart; /* On card address */ - u_int txend; /* On card address */ - u_int txtail; /* Index of first unused buffer */ - u_int txmax; /* number of usable buffers/descriptors */ - u_int txeda; /* Error descriptor addresses */ - }block[AR_TX_BLOCKS]; - - char xmit_busy; /* Transmitter is busy */ - char txb_inuse; /* Number of tx blocks currently in use */ - u_char txb_new; /* Index to where new buffer will be added */ - u_char txb_next_tx; /* Index to next block ready to tx */ - - u_int rxdesc; /* On card address */ - u_int rxstart; /* On card address */ - u_int rxend; /* On card address */ - u_int rxhind; /* Index to the head of the rx buffers. */ - u_int rxmax; /* number of usable buffers/descriptors */ - - int scano; - int scachan; - sca_regs *sca; -#ifdef NETGRAPH - int running; /* something is attached so we are running */ - int dcd; /* do we have dcd? */ - /* ---netgraph bits --- */ - char nodename[NG_NODELEN + 1]; /* store our node name */ - int datahooks; /* number of data hooks attached */ - node_p node; /* netgraph node */ - hook_p hook; /* data hook */ - hook_p debug_hook; - struct ifqueue xmitq_hipri; /* hi-priority transmit queue */ - struct ifqueue xmitq; /* transmit queue */ - int flags; /* state */ -#define SCF_RUNNING 0x01 /* board is active */ -#define SCF_OACTIVE 0x02 /* output is active */ - int out_dog; /* watchdog cycles output count-down */ - struct callout_handle handle; /* timeout(9) handle */ - u_long inbytes, outbytes; /* stats */ - u_long lastinbytes, lastoutbytes; /* a second ago */ - u_long inrate, outrate; /* highest rate seen */ - u_long inlast; /* last input N secs ago */ - u_long out_deficit; /* output since last input */ - u_long oerrors, ierrors[6]; - u_long opackets, ipackets; -#endif /* NETGRAPH */ -}; - -static int next_ar_unit = 0; - -#ifdef NETGRAPH -#define DOG_HOLDOFF 6 /* dog holds off for 6 secs */ -#define QUITE_A_WHILE 300 /* 5 MINUTES */ -#define LOTS_OF_PACKETS 100 -#endif /* NETGRAPH */ - -/* - * This translate from irq numbers to - * the value that the arnet card needs - * in the lower part of the AR_INT_SEL - * register. - */ -static int irqtable[16] = { - 0, /* 0 */ - 0, /* 1 */ - 0, /* 2 */ - 1, /* 3 */ - 0, /* 4 */ - 2, /* 5 */ - 0, /* 6 */ - 3, /* 7 */ - 0, /* 8 */ - 0, /* 9 */ - 4, /* 10 */ - 5, /* 11 */ - 6, /* 12 */ - 0, /* 13 */ - 0, /* 14 */ - 7 /* 15 */ -}; - -static int ar_isa_probe (device_t); -static int ar_isa_attach (device_t); - -static struct isa_pnp_id ar_ids[] = { - {0, NULL} -}; - -static device_method_t ar_methods[] = { - DEVMETHOD(device_probe, ar_isa_probe), - DEVMETHOD(device_attach, ar_isa_attach), - DEVMETHOD(device_detach, ar_detach), - { 0, 0 } -}; - -static driver_t ar_isa_driver = { - "ar", - ar_methods, - sizeof (struct ar_hardc) -}; - -devclass_t ar_devclass; - -DRIVER_MODULE(if_ar, isa, ar_isa_driver, ar_devclass, 0, 0); -#ifndef NETGRAPH -MODULE_DEPEND(if_ar, sppp, 1, 1, 1); -#else -MODULE_DEPEND(ng_sync_ar, netgraph, 1, 1, 1); -#endif - -static void arintr(void *arg); -static void ar_xmit(struct ar_softc *sc); -#ifndef NETGRAPH -static void arstart(struct ifnet *ifp); -static int arioctl(struct ifnet *ifp, u_long cmd, caddr_t data); -static void arwatchdog(struct ifnet *ifp); -#else /* NETGRAPH */ -static void arstart(struct ar_softc *sc); -static void arwatchdog(struct ar_softc *sc); -#endif /* NETGRAPH */ -static int ar_packet_avail(struct ar_softc *sc, int *len, u_char *rxstat); -static void ar_copy_rxbuf(struct mbuf *m, struct ar_softc *sc, int len); -static void ar_eat_packet(struct ar_softc *sc, int single); -static void ar_get_packets(struct ar_softc *sc); - -static int ar_read_pim_iface(volatile struct ar_hardc *hc, int channel); -static void ar_up(struct ar_softc *sc); -static void ar_down(struct ar_softc *sc); -static void arc_init(struct ar_hardc *hc); -static void ar_init_sca(struct ar_hardc *hc, int scano); -static void ar_init_msci(struct ar_softc *sc); -static void ar_init_rx_dmac(struct ar_softc *sc); -static void ar_init_tx_dmac(struct ar_softc *sc); -static void ar_dmac_intr(struct ar_hardc *hc, int scano, u_char isr); -static void ar_msci_intr(struct ar_hardc *hc, int scano, u_char isr); -static void ar_timer_intr(struct ar_hardc *hc, int scano, u_char isr); - -#ifdef NETGRAPH -static void ngar_watchdog_frame(void * arg); -static void ngar_init(void* ignored); - -static ng_constructor_t ngar_constructor; -static ng_rcvmsg_t ngar_rcvmsg; -static ng_shutdown_t ngar_shutdown; -static ng_newhook_t ngar_newhook; -/*static ng_findhook_t ngar_findhook; */ -static ng_connect_t ngar_connect; -static ng_rcvdata_t ngar_rcvdata; -static ng_disconnect_t ngar_disconnect; - -static struct ng_type typestruct = { - NG_ABI_VERSION, - NG_AR_NODE_TYPE, - NULL, - ngar_constructor, - ngar_rcvmsg, - ngar_shutdown, - ngar_newhook, - NULL, - ngar_connect, - ngar_rcvdata, - ngar_disconnect, - NULL -}; - -static int ngar_done_init = 0; -#endif /* NETGRAPH */ - -/* - * Probe to see if it is there. - * Get its information and fill it in. - */ -static int -ar_isa_probe(device_t device) -{ - int error; - u_long membase, memsize, port_start, port_count; - - error = ISA_PNP_PROBE(device_get_parent(device), device, ar_ids); - if(error == ENXIO || error == 0) - return (error); - - if((error = ar_allocate_ioport(device, 0, ARC_IO_SIZ))) { - return (ENXIO); - } - - /* - * Now see if the card is realy there. - * - * XXX For now I just check the undocumented ports - * for "570". We will probably have to do more checking. - */ - error = bus_get_resource(device, SYS_RES_IOPORT, 0, &port_start, - &port_count); - - if((inb(port_start + AR_ID_5) != '5') || - (inb(port_start + AR_ID_7) != '7') || - (inb(port_start + AR_ID_0) != '0')) { - ar_deallocate_resources(device); - return (ENXIO); - } - membase = bus_get_resource_start(device, SYS_RES_MEMORY, 0); - memsize = inb(port_start + AR_REV); - memsize = 1 << ((memsize & AR_WSIZ_MSK) >> AR_WSIZ_SHFT); - memsize *= ARC_WIN_SIZ; - error = bus_set_resource(device, SYS_RES_MEMORY, 0, membase, memsize); - ar_deallocate_resources(device); - - return (error); -} - -/* - * Malloc memory for the softc structures. - * Reset the card to put it in a known state. - * Register the ports on the adapter. - * Fill in the info for each port. - * Attach each port to sppp and bpf. - */ -static int -ar_isa_attach(device_t device) -{ - u_int tmp; - u_long irq, junk; - struct ar_hardc *hc; - - hc = (struct ar_hardc *)device_get_softc(device); - if(ar_allocate_ioport(device, 0, ARC_IO_SIZ)) - return (ENXIO); - hc->bt = rman_get_bustag(hc->res_ioport); - hc->bh = rman_get_bushandle(hc->res_ioport); - - hc->iobase = rman_get_start(hc->res_ioport); - - tmp = inb(hc->iobase + AR_BMI); - hc->bustype = tmp & AR_BUS_MSK; - hc->memsize = (tmp & AR_MEM_MSK) >> AR_MEM_SHFT; - hc->memsize = 1 << hc->memsize; - hc->memsize <<= 16; - hc->interface[0] = (tmp & AR_IFACE_MSK); - hc->interface[1] = hc->interface[0]; - hc->interface[2] = hc->interface[0]; - hc->interface[3] = hc->interface[0]; - tmp = inb(hc->iobase + AR_REV); - hc->revision = tmp & AR_REV_MSK; - hc->winsize = 1 << ((tmp & AR_WSIZ_MSK) >> AR_WSIZ_SHFT); - hc->winsize *= ARC_WIN_SIZ; - hc->winmsk = hc->winsize - 1; - hc->numports = inb(hc->iobase + AR_PNUM); - hc->handshake = inb(hc->iobase + AR_HNDSH); - - if(ar_allocate_memory(device, 0, hc->winsize)) - return (ENXIO); - - hc->mem_start = rman_get_virtual(hc->res_memory); - hc->mem_end = hc->mem_start + hc->winsize; - hc->cunit = device_get_unit(device); - - switch(hc->interface[0]) { - case AR_IFACE_EIA_232: - printf("ar%d: The EIA 232 interface is not supported.\n", - hc->cunit); - ar_deallocate_resources(device); - return (ENXIO); - case AR_IFACE_V_35: - break; - case AR_IFACE_EIA_530: - printf("ar%d: WARNING: The EIA 530 interface is untested.\n", - hc->cunit); - break; - case AR_IFACE_X_21: - break; - case AR_IFACE_COMBO: - printf("ar%d: WARNING: The COMBO interface is untested.\n", - hc->cunit); - break; - } - - /* - * Do a little sanity check. - */ - if((hc->numports > NPORT) || (hc->memsize > (512*1024))) { - ar_deallocate_resources(device); - return (ENXIO); - } - - if(ar_allocate_irq(device, 0, 1)) - return (ENXIO); - - if(bus_get_resource(device, SYS_RES_IRQ, 0, &irq, &junk)) { - ar_deallocate_resources(device); - return (ENXIO); - } - hc->isa_irq = irq; - - if(ar_attach(device)) { - ar_deallocate_resources(device); - return (ENXIO); - } - - return (0); -} - -int -ar_attach(device_t device) -{ - struct ar_hardc *hc; - struct ar_softc *sc; -#ifndef NETGRAPH - struct ifnet *ifp; - char *iface; -#endif /* NETGRAPH */ - int unit; - - hc = (struct ar_hardc *)device_get_softc(device); - - printf("arc%d: %uK RAM, %u ports, rev %u.\n", - hc->cunit, - hc->memsize/1024, - hc->numports, - hc->revision); - - arc_init(hc); - - if(BUS_SETUP_INTR(device_get_parent(device), device, hc->res_irq, - INTR_TYPE_NET, arintr, hc, &hc->intr_cookie) != 0) - return (1); - - sc = hc->sc; - - for(unit=0;unit<hc->numports;unit+=NCHAN) - ar_init_sca(hc, unit / NCHAN); - - /* - * Now configure each port on the card. - */ - for(unit=0;unit<hc->numports;sc++,unit++) { - sc->hc = hc; - sc->subunit = unit; - sc->unit = next_ar_unit; - next_ar_unit++; - sc->scano = unit / NCHAN; - sc->scachan = unit%NCHAN; - - ar_init_rx_dmac(sc); - ar_init_tx_dmac(sc); - ar_init_msci(sc); - -#ifndef NETGRAPH - ifp = &sc->ifsppp.pp_if; - - ifp->if_softc = sc; - ifp->if_unit = sc->unit; - ifp->if_name = "ar"; - ifp->if_mtu = PP_MTU; - ifp->if_flags = IFF_POINTOPOINT | IFF_MULTICAST; - ifp->if_ioctl = arioctl; - ifp->if_start = arstart; - ifp->if_watchdog = arwatchdog; - - sc->ifsppp.pp_flags = PP_KEEPALIVE; - - switch(hc->interface[unit]) { - default: iface = "UNKNOWN"; break; - case AR_IFACE_EIA_232: iface = "EIA-232"; break; - case AR_IFACE_V_35: iface = "EIA-232 or V.35"; break; - case AR_IFACE_EIA_530: iface = "EIA-530"; break; - case AR_IFACE_X_21: iface = "X.21"; break; - case AR_IFACE_COMBO: iface = "COMBO X.21 / EIA-530"; break; - } - - printf("ar%d: Adapter %d, port %d, interface %s.\n", - sc->unit, - hc->cunit, - sc->subunit, - iface); - - sppp_attach((struct ifnet *)&sc->ifsppp); - if_attach(ifp); - - bpfattach(ifp, DLT_PPP, PPP_HEADER_LEN); -#else /* NETGRAPH */ - /* - * we have found a node, make sure our 'type' is availabe. - */ - if (ngar_done_init == 0) ngar_init(NULL); - if (ng_make_node_common(&typestruct, &sc->node) != 0) - return (1); - sprintf(sc->nodename, "%s%d", NG_AR_NODE_TYPE, sc->unit); - if (ng_name_node(sc->node, sc->nodename)) { - NG_NODE_UNREF(sc->node); /* drop it again */ - return (1); - } - NG_NODE_SET_PRIVATE(sc->node, sc); - callout_handle_init(&sc->handle); - sc->xmitq.ifq_maxlen = IFQ_MAXLEN; - sc->xmitq_hipri.ifq_maxlen = IFQ_MAXLEN; - mtx_init(&sc->xmitq.ifq_mtx, "ar_xmitq", MTX_DEF); - mtx_init(&sc->xmitq_hipri.ifq_mtx, "ar_xmitq_hipri", MTX_DEF); - sc->running = 0; -#endif /* NETGRAPH */ - } - - if(hc->bustype == AR_BUS_ISA) - ARC_SET_OFF(hc->iobase); - - return (0); -} - -int -ar_detach(device_t device) -{ - device_t parent = device_get_parent(device); - struct ar_hardc *hc = device_get_softc(device); - - if (hc->intr_cookie != NULL) { - if (BUS_TEARDOWN_INTR(parent, device, - hc->res_irq, hc->intr_cookie) != 0) { - printf("intr teardown failed.. continuing\n"); - } - hc->intr_cookie = NULL; - } - - /* - * deallocate any system resources we may have - * allocated on behalf of this driver. - */ - FREE(hc->sc, M_DEVBUF); - hc->sc = NULL; - hc->mem_start = NULL; - return (ar_deallocate_resources(device)); -} - -int -ar_allocate_ioport(device_t device, int rid, u_long size) -{ - struct ar_hardc *hc = device_get_softc(device); - - hc->rid_ioport = rid; - hc->res_ioport = bus_alloc_resource(device, SYS_RES_IOPORT, - &hc->rid_ioport, 0ul, ~0ul, size, RF_ACTIVE); - if (hc->res_ioport == NULL) { - goto errexit; - } - return (0); - -errexit: - ar_deallocate_resources(device); - return (ENXIO); -} - -int -ar_allocate_irq(device_t device, int rid, u_long size) -{ - struct ar_hardc *hc = device_get_softc(device); - - hc->rid_irq = rid; - hc->res_irq = bus_alloc_resource(device, SYS_RES_IRQ, - &hc->rid_irq, 0ul, ~0ul, 1, RF_SHAREABLE|RF_ACTIVE); - if (hc->res_irq == NULL) { - goto errexit; - } - return (0); - -errexit: - ar_deallocate_resources(device); - return (ENXIO); -} - -int -ar_allocate_memory(device_t device, int rid, u_long size) -{ - struct ar_hardc *hc = device_get_softc(device); - - hc->rid_memory = rid; - hc->res_memory = bus_alloc_resource(device, SYS_RES_MEMORY, - &hc->rid_memory, 0ul, ~0ul, size, RF_ACTIVE); - if (hc->res_memory == NULL) { - goto errexit; - } - return (0); - -errexit: - ar_deallocate_resources(device); - return (ENXIO); -} - -int -ar_allocate_plx_memory(device_t device, int rid, u_long size) -{ - struct ar_hardc *hc = device_get_softc(device); - - hc->rid_plx_memory = rid; - hc->res_plx_memory = bus_alloc_resource(device, SYS_RES_MEMORY, - &hc->rid_plx_memory, 0ul, ~0ul, size, RF_ACTIVE); - if (hc->res_plx_memory == NULL) { - goto errexit; - } - return (0); - -errexit: - ar_deallocate_resources(device); - return (ENXIO); -} - -int -ar_deallocate_resources(device_t device) -{ - struct ar_hardc *hc = device_get_softc(device); - - if (hc->res_irq != 0) { - bus_deactivate_resource(device, SYS_RES_IRQ, - hc->rid_irq, hc->res_irq); - bus_release_resource(device, SYS_RES_IRQ, - hc->rid_irq, hc->res_irq); - hc->res_irq = 0; - } - if (hc->res_ioport != 0) { - bus_deactivate_resource(device, SYS_RES_IOPORT, - hc->rid_ioport, hc->res_ioport); - bus_release_resource(device, SYS_RES_IOPORT, - hc->rid_ioport, hc->res_ioport); - hc->res_ioport = 0; - } - if (hc->res_memory != 0) { - bus_deactivate_resource(device, SYS_RES_MEMORY, - hc->rid_memory, hc->res_memory); - bus_release_resource(device, SYS_RES_MEMORY, - hc->rid_memory, hc->res_memory); - hc->res_memory = 0; - } - if (hc->res_plx_memory != 0) { - bus_deactivate_resource(device, SYS_RES_MEMORY, - hc->rid_plx_memory, hc->res_plx_memory); - bus_release_resource(device, SYS_RES_MEMORY, - hc->rid_plx_memory, hc->res_plx_memory); - hc->res_plx_memory = 0; - } - return (0); -} - -/* - * First figure out which SCA gave the interrupt. - * Process it. - * See if there is other interrupts pending. - * Repeat until there is no more interrupts. - */ -static void -arintr(void *arg) -{ - struct ar_hardc *hc = (struct ar_hardc *)arg; - sca_regs *sca; - u_char isr0, isr1, isr2, arisr; - int scano; - - /* XXX Use the PCI interrupt score board register later */ - if(hc->bustype == AR_BUS_PCI) - arisr = hc->orbase[AR_ISTAT * 4]; - else - arisr = inb(hc->iobase + AR_ISTAT); - - while(arisr & AR_BD_INT) { - TRC(printf("arisr = %x\n", arisr)); - if(arisr & AR_INT_0) - scano = 0; - else if(arisr & AR_INT_1) - scano = 1; - else { - /* XXX Oops this shouldn't happen. */ - printf("arc%d: Interrupted with no interrupt.\n", - hc->cunit); - return; - } - sca = hc->sca[scano]; - - if(hc->bustype == AR_BUS_ISA) - ARC_SET_SCA(hc->iobase, scano); - - isr0 = sca->isr0; - isr1 = sca->isr1; - isr2 = sca->isr2; - - TRC(printf("arc%d: ARINTR isr0 %x, isr1 %x, isr2 %x\n", - hc->cunit, - isr0, - isr1, - isr2)); - if(isr0) - ar_msci_intr(hc, scano, isr0); - - if(isr1) - ar_dmac_intr(hc, scano, isr1); - - if(isr2) - ar_timer_intr(hc, scano, isr2); - - /* - * Proccess the second sca's interrupt if available. - * Else see if there are any new interrupts. - */ - if((arisr & AR_INT_0) && (arisr & AR_INT_1)) - arisr &= ~AR_INT_0; - else { - if(hc->bustype == AR_BUS_PCI) - arisr = hc->orbase[AR_ISTAT * 4]; - else - arisr = inb(hc->iobase + AR_ISTAT); - } - } - - if(hc->bustype == AR_BUS_ISA) - ARC_SET_OFF(hc->iobase); -} - - -/* - * This will only start the transmitter. It is assumed that the data - * is already there. It is normally called from arstart() or ar_dmac_intr(). - * - */ -static void -ar_xmit(struct ar_softc *sc) -{ -#ifndef NETGRAPH - struct ifnet *ifp; -#endif /* NETGRAPH */ - dmac_channel *dmac; - -#ifndef NETGRAPH - ifp = &sc->ifsppp.pp_if; -#endif /* NETGRAPH */ - dmac = &sc->sca->dmac[DMAC_TXCH(sc->scachan)]; - - if(sc->hc->bustype == AR_BUS_ISA) - ARC_SET_SCA(sc->hc->iobase, sc->scano); - dmac->cda = (u_short)(sc->block[sc->txb_next_tx].txdesc & 0xffff); - - dmac->eda = (u_short)(sc->block[sc->txb_next_tx].txeda & 0xffff); - dmac->dsr = SCA_DSR_DE; - - sc->xmit_busy = 1; - - sc->txb_next_tx++; - if(sc->txb_next_tx == AR_TX_BLOCKS) - sc->txb_next_tx = 0; - -#ifndef NETGRAPH - ifp->if_timer = 2; /* Value in seconds. */ -#else /* NETGRAPH */ - sc->out_dog = DOG_HOLDOFF; /* give ourself some breathing space*/ -#endif /* NETGRAPH */ - if(sc->hc->bustype == AR_BUS_ISA) - ARC_SET_OFF(sc->hc->iobase); -} - -/* - * This function will be called from the upper level when a user add a - * packet to be send, and from the interrupt handler after a finished - * transmit. - * - * NOTE: it should run at spl_imp(). - * - * This function only place the data in the oncard buffers. It does not - * start the transmition. ar_xmit() does that. - * - * Transmitter idle state is indicated by the IFF_OACTIVE flag. The function - * that clears that should ensure that the transmitter and its DMA is - * in a "good" idle state. - */ -#ifndef NETGRAPH -static void -arstart(struct ifnet *ifp) -{ - struct ar_softc *sc = ifp->if_softc; -#else /* NETGRAPH */ -static void -arstart(struct ar_softc *sc) -{ -#endif /* NETGRAPH */ - int i, len, tlen; - struct mbuf *mtx; - u_char *txdata; - sca_descriptor *txdesc; - struct buf_block *blkp; - -#ifndef NETGRAPH - if(!(ifp->if_flags & IFF_RUNNING)) - return; -#else /* NETGRAPH */ -/* XXX */ -#endif /* NETGRAPH */ - -top_arstart: - - /* - * See if we have space for more packets. - */ - if(sc->txb_inuse == AR_TX_BLOCKS) { -#ifndef NETGRAPH - ifp->if_flags |= IFF_OACTIVE; /* yes, mark active */ -#else /* NETGRAPH */ -/*XXX*/ /*ifp->if_flags |= IFF_OACTIVE;*/ /* yes, mark active */ -#endif /* NETGRAPH */ - return; - } - -#ifndef NETGRAPH - mtx = sppp_dequeue(ifp); -#else /* NETGRAPH */ - IF_DEQUEUE(&sc->xmitq_hipri, mtx); - if (mtx == NULL) { - IF_DEQUEUE(&sc->xmitq, mtx); - } -#endif /* NETGRAPH */ - if(!mtx) - return; - - /* - * It is OK to set the memory window outside the loop because - * all tx buffers and descriptors are assumed to be in the same - * 16K window. - */ - if(sc->hc->bustype == AR_BUS_ISA) - ARC_SET_MEM(sc->hc->iobase, sc->block[0].txdesc); - - /* - * We stay in this loop until there is nothing in the - * TX queue left or the tx buffer is full. - */ - i = 0; - blkp = &sc->block[sc->txb_new]; - txdesc = (sca_descriptor *) - (sc->hc->mem_start + (blkp->txdesc & sc->hc->winmsk)); - txdata = (u_char *)(sc->hc->mem_start + (blkp->txstart & sc->hc->winmsk)); - for(;;) { - len = mtx->m_pkthdr.len; - - TRC(printf("ar%d: ARstart len %u\n", sc->unit, len)); - - /* - * We can do this because the tx buffers don't wrap. - */ - m_copydata(mtx, 0, len, txdata); - tlen = len; - while(tlen > AR_BUF_SIZ) { - txdesc->stat = 0; - txdesc->len = AR_BUF_SIZ; - tlen -= AR_BUF_SIZ; - txdesc++; - txdata += AR_BUF_SIZ; - i++; - } - /* XXX Move into the loop? */ - txdesc->stat = SCA_DESC_EOM; - txdesc->len = tlen; - txdesc++; - txdata += AR_BUF_SIZ; - i++; - -#ifndef NETGRAPH - if(ifp->if_bpf) - bpf_mtap(ifp, mtx); - m_freem(mtx); - ++sc->ifsppp.pp_if.if_opackets; -#else /* NETGRAPH */ - m_freem(mtx); - sc->outbytes += len; - ++sc->opackets; -#endif /* NETGRAPH */ - - /* - * Check if we have space for another mbuf. - * XXX This is hardcoded. A packet won't be larger - * than 3 buffers (3 x 512). - */ - if((i + 3) >= blkp->txmax) - break; - -#ifndef NETGRAPH - mtx = sppp_dequeue(ifp); -#else /* NETGRAPH */ - IF_DEQUEUE(&sc->xmitq_hipri, mtx); - if (mtx == NULL) { - IF_DEQUEUE(&sc->xmitq, mtx); - } -#endif /* NETGRAPH */ - if(!mtx) - break; - } - - blkp->txtail = i; - - /* - * Mark the last descriptor, so that the SCA know where - * to stop. - */ - txdesc--; - txdesc->stat |= SCA_DESC_EOT; - - txdesc = (sca_descriptor *)blkp->txdesc; - blkp->txeda = (u_short)((u_int)&txdesc[i]); - -#if 0 - printf("ARstart: %p desc->cp %x\n", &txdesc->cp, txdesc->cp); - printf("ARstart: %p desc->bp %x\n", &txdesc->bp, txdesc->bp); - printf("ARstart: %p desc->bpb %x\n", &txdesc->bpb, txdesc->bpb); - printf("ARstart: %p desc->len %x\n", &txdesc->len, txdesc->len); - printf("ARstart: %p desc->stat %x\n", &txdesc->stat, txdesc->stat); -#endif - - sc->txb_inuse++; - sc->txb_new++; - if(sc->txb_new == AR_TX_BLOCKS) - sc->txb_new = 0; - - if(sc->xmit_busy == 0) - ar_xmit(sc); - - if(sc->hc->bustype == AR_BUS_ISA) - ARC_SET_OFF(sc->hc->iobase); - - goto top_arstart; -} - -#ifndef NETGRAPH -static int -arioctl(struct ifnet *ifp, u_long cmd, caddr_t data) -{ - int s, error; - int was_up, should_be_up; - struct ar_softc *sc = ifp->if_softc; - - TRC(printf("ar%d: arioctl.\n", ifp->if_unit);) - - was_up = ifp->if_flags & IFF_RUNNING; - - error = sppp_ioctl(ifp, cmd, data); - TRC(printf("ar%d: ioctl: ifsppp.pp_flags = %x, if_flags %x.\n", - ifp->if_unit, ((struct sppp *)ifp)->pp_flags, ifp->if_flags);) - if(error) - return (error); - - if((cmd != SIOCSIFFLAGS) && cmd != (SIOCSIFADDR)) - return (0); - - TRC(printf("ar%d: arioctl %s.\n", ifp->if_unit, - (cmd == SIOCSIFFLAGS) ? "SIOCSIFFLAGS" : "SIOCSIFADDR");) - - s = splimp(); - should_be_up = ifp->if_flags & IFF_RUNNING; - - if(!was_up && should_be_up) { - /* Interface should be up -- start it. */ - ar_up(sc); - arstart(ifp); - /* XXX Maybe clear the IFF_UP flag so that the link - * will only go up after sppp lcp and ipcp negotiation. - */ - } else if(was_up && !should_be_up) { - /* Interface should be down -- stop it. */ - ar_down(sc); - sppp_flush(ifp); - } - splx(s); - return (0); -} -#endif /* NETGRAPH */ - -/* - * This is to catch lost tx interrupts. - */ -static void -#ifndef NETGRAPH -arwatchdog(struct ifnet *ifp) -{ - struct ar_softc *sc = ifp->if_softc; -#else /* NETGRAPH */ -arwatchdog(struct ar_softc *sc) -{ -#endif /* NETGRAPH */ - msci_channel *msci = &sc->sca->msci[sc->scachan]; - -#ifndef NETGRAPH - if(!(ifp->if_flags & IFF_RUNNING)) - return; -#endif /* NETGRAPH */ - - if(sc->hc->bustype == AR_BUS_ISA) - ARC_SET_SCA(sc->hc->iobase, sc->scano); - - /* XXX if(sc->ifsppp.pp_if.if_flags & IFF_DEBUG) */ - printf("ar%d: transmit failed, " - "ST0 %x, ST1 %x, ST3 %x, DSR %x.\n", - sc->unit, - msci->st0, - msci->st1, - msci->st3, - sc->sca->dmac[DMAC_TXCH(sc->scachan)].dsr); - - if(msci->st1 & SCA_ST1_UDRN) { - msci->cmd = SCA_CMD_TXABORT; - msci->cmd = SCA_CMD_TXENABLE; - msci->st1 = SCA_ST1_UDRN; - } - - sc->xmit_busy = 0; -#ifndef NETGRAPH - ifp->if_flags &= ~IFF_OACTIVE; -#else /* NETGRAPH */ - /* XXX ifp->if_flags &= ~IFF_OACTIVE; */ -#endif /* NETGRAPH */ - - if(sc->txb_inuse && --sc->txb_inuse) - ar_xmit(sc); - -#ifndef NETGRAPH - arstart(ifp); -#else /* NETGRAPH */ - arstart(sc); -#endif /* NETGRAPH */ -} - -static void -ar_up(struct ar_softc *sc) -{ - sca_regs *sca; - msci_channel *msci; - - sca = sc->sca; - msci = &sca->msci[sc->scachan]; - - TRC(printf("ar%d: sca %p, msci %p, ch %d\n", - sc->unit, sca, msci, sc->scachan)); - - /* - * Enable transmitter and receiver. - * Raise DTR and RTS. - * Enable interrupts. - */ - if(sc->hc->bustype == AR_BUS_ISA) - ARC_SET_SCA(sc->hc->iobase, sc->scano); - - /* XXX - * What about using AUTO mode in msci->md0 ??? - * And what about CTS/DCD etc... ? - */ - if(sc->hc->handshake & AR_SHSK_RTS) - msci->ctl &= ~SCA_CTL_RTS; - if(sc->hc->handshake & AR_SHSK_DTR) { - sc->hc->txc_dtr[sc->scano] &= sc->scachan ? - ~AR_TXC_DTR_DTR1 : ~AR_TXC_DTR_DTR0; - if(sc->hc->bustype == AR_BUS_PCI) - sc->hc->orbase[sc->hc->txc_dtr_off[sc->scano]] = - sc->hc->txc_dtr[sc->scano]; - else - outb(sc->hc->iobase + sc->hc->txc_dtr_off[sc->scano], - sc->hc->txc_dtr[sc->scano]); - } - - if(sc->scachan == 0) { - sca->ier0 |= 0x0F; - sca->ier1 |= 0x0F; - } else { - sca->ier0 |= 0xF0; - sca->ier1 |= 0xF0; - } - - msci->cmd = SCA_CMD_RXENABLE; - if(sc->hc->bustype == AR_BUS_ISA) - inb(sc->hc->iobase + AR_ID_5); /* XXX slow it down a bit. */ - msci->cmd = SCA_CMD_TXENABLE; - - if(sc->hc->bustype == AR_BUS_ISA) - ARC_SET_OFF(sc->hc->iobase); -#ifdef NETGRAPH - untimeout(ngar_watchdog_frame, sc, sc->handle); - sc->handle = timeout(ngar_watchdog_frame, sc, hz); - sc->running = 1; -#endif /* NETGRAPH */ -} - -static void -ar_down(struct ar_softc *sc) -{ - sca_regs *sca; - msci_channel *msci; - - sca = sc->sca; - msci = &sca->msci[sc->scachan]; - -#ifdef NETGRAPH - untimeout(ngar_watchdog_frame, sc, sc->handle); - sc->running = 0; -#endif /* NETGRAPH */ - /* - * Disable transmitter and receiver. - * Lower DTR and RTS. - * Disable interrupts. - */ - if(sc->hc->bustype == AR_BUS_ISA) - ARC_SET_SCA(sc->hc->iobase, sc->scano); - msci->cmd = SCA_CMD_RXDISABLE; - if(sc->hc->bustype == AR_BUS_ISA) - inb(sc->hc->iobase + AR_ID_5); /* XXX slow it down a bit. */ - msci->cmd = SCA_CMD_TXDISABLE; - - if(sc->hc->handshake & AR_SHSK_RTS) - msci->ctl |= SCA_CTL_RTS; - if(sc->hc->handshake & AR_SHSK_DTR) { - sc->hc->txc_dtr[sc->scano] |= sc->scachan ? - AR_TXC_DTR_DTR1 : AR_TXC_DTR_DTR0; - if(sc->hc->bustype == AR_BUS_PCI) - sc->hc->orbase[sc->hc->txc_dtr_off[sc->scano]] = - sc->hc->txc_dtr[sc->scano]; - else - outb(sc->hc->iobase + sc->hc->txc_dtr_off[sc->scano], - sc->hc->txc_dtr[sc->scano]); - } - - if(sc->scachan == 0) { - sca->ier0 &= ~0x0F; - sca->ier1 &= ~0x0F; - } else { - sca->ier0 &= ~0xF0; - sca->ier1 &= ~0xF0; - } - - if(sc->hc->bustype == AR_BUS_ISA) - ARC_SET_OFF(sc->hc->iobase); -} - -static int -ar_read_pim_iface(volatile struct ar_hardc *hc, int channel) -{ - int ctype, i, val, x; - volatile u_char *pimctrl; - - ctype = 0; - val = 0; - - pimctrl = hc->orbase + AR_PIMCTRL; - - /* Reset the PIM */ - *pimctrl = 0x00; - *pimctrl = AR_PIM_STROBE; - - /* Check if there is a PIM */ - *pimctrl = 0x00; - *pimctrl = AR_PIM_READ; - x = *pimctrl; - TRC(printf("x = %x", x)); - if(x & AR_PIM_DATA) { - printf("No PIM installed\n"); - return (AR_IFACE_UNKNOWN); - } - - x = (x >> 1) & 0x01; - val |= x << 0; - - /* Now read the next 15 bits */ - for(i = 1; i < 16; i++) { - *pimctrl = AR_PIM_READ; - *pimctrl = AR_PIM_READ | AR_PIM_STROBE; - x = *pimctrl; - TRC(printf(" %x ", x)); - x = (x >> 1) & 0x01; - val |= x << i; - if(i == 8 && (val & 0x000f) == 0x0004) { - int ii; - - /* Start bit */ - *pimctrl = AR_PIM_A2D_DOUT | AR_PIM_A2D_STROBE; - *pimctrl = AR_PIM_A2D_DOUT; - - /* Mode bit */ - *pimctrl = AR_PIM_A2D_DOUT | AR_PIM_A2D_STROBE; - *pimctrl = AR_PIM_A2D_DOUT; - - /* Sign bit */ - *pimctrl = AR_PIM_A2D_DOUT | AR_PIM_A2D_STROBE; - *pimctrl = AR_PIM_A2D_DOUT; - - /* Select channel */ - *pimctrl = AR_PIM_A2D_STROBE | ((channel & 2) << 2); - *pimctrl = ((channel & 2) << 2); - *pimctrl = AR_PIM_A2D_STROBE | ((channel & 1) << 3); - *pimctrl = ((channel & 1) << 3); - - *pimctrl = AR_PIM_A2D_STROBE; - - x = *pimctrl; - if(x & AR_PIM_DATA) - printf("\nOops A2D start bit not zero (%X)\n", x); - - for(ii = 7; ii >= 0; ii--) { - *pimctrl = 0x00; - *pimctrl = AR_PIM_A2D_STROBE; - x = *pimctrl; - if(x & AR_PIM_DATA) - ctype |= 1 << ii; - } - } - } - TRC(printf("\nPIM val %x, ctype %x, %d\n", val, ctype, ctype)); - *pimctrl = AR_PIM_MODEG; - *pimctrl = AR_PIM_MODEG | AR_PIM_AUTO_LED; - if(ctype > 255) - return (AR_IFACE_UNKNOWN); - if(ctype > 239) - return (AR_IFACE_V_35); - if(ctype > 207) - return (AR_IFACE_EIA_232); - if(ctype > 178) - return (AR_IFACE_X_21); - if(ctype > 150) - return (AR_IFACE_EIA_530); - if(ctype > 25) - return (AR_IFACE_UNKNOWN); - if(ctype > 7) - return (AR_IFACE_LOOPBACK); - return (AR_IFACE_UNKNOWN); -} - -/* - * Initialize the card, allocate memory for the ar_softc structures - * and fill in the pointers. - */ -static void -arc_init(struct ar_hardc *hc) -{ - struct ar_softc *sc; - int x; - u_int chanmem; - u_int bufmem; - u_int next; - u_int descneeded; - u_char isr, mar; - - MALLOC(sc, struct ar_softc *, hc->numports * sizeof(struct ar_softc), - M_DEVBUF, M_WAITOK | M_ZERO); - if (sc == NULL) - return; - hc->sc = sc; - - hc->txc_dtr[0] = AR_TXC_DTR_NOTRESET | - AR_TXC_DTR_DTR0 | AR_TXC_DTR_DTR1; - hc->txc_dtr[1] = AR_TXC_DTR_DTR0 | AR_TXC_DTR_DTR1; - hc->txc_dtr_off[0] = AR_TXC_DTR0; - hc->txc_dtr_off[1] = AR_TXC_DTR2; - if(hc->bustype == AR_BUS_PCI) { - hc->txc_dtr_off[0] *= 4; - hc->txc_dtr_off[1] *= 4; - } - - /* - * reset the card and wait at least 1uS. - */ - if(hc->bustype == AR_BUS_PCI) - hc->orbase[AR_TXC_DTR0 * 4] = ~AR_TXC_DTR_NOTRESET & - hc->txc_dtr[0]; - else - outb(hc->iobase + AR_TXC_DTR0, ~AR_TXC_DTR_NOTRESET & - hc->txc_dtr[0]); - DELAY(2); - if(hc->bustype == AR_BUS_PCI) - hc->orbase[AR_TXC_DTR0 * 4] = hc->txc_dtr[0]; - else - outb(hc->iobase + AR_TXC_DTR0, hc->txc_dtr[0]); - - if(hc->bustype == AR_BUS_ISA) { - /* - * Configure the card. - * Mem address, irq, - */ - mar = kvtop(hc->mem_start) >> 16; - isr = irqtable[hc->isa_irq] << 1; - if(isr == 0) - printf("ar%d: Warning illegal interrupt %d\n", - hc->cunit, hc->isa_irq); - isr = isr | ((kvtop(hc->mem_start) & 0xc000) >> 10); - - hc->sca[0] = (sca_regs *)hc->mem_start; - hc->sca[1] = (sca_regs *)hc->mem_start; - - outb(hc->iobase + AR_MEM_SEL, mar); - outb(hc->iobase + AR_INT_SEL, isr | AR_INTS_CEN); - } - - if(hc->bustype == AR_BUS_PCI && hc->interface[0] == AR_IFACE_PIM) - for(x = 0; x < hc->numports; x++) - hc->interface[x] = ar_read_pim_iface(hc, x); - - /* - * Set the TX clock direction and enable TX. - */ - for(x=0;x<hc->numports;x++) { - switch(hc->interface[x]) { - case AR_IFACE_V_35: - hc->txc_dtr[x / NCHAN] |= (x % NCHAN == 0) ? - AR_TXC_DTR_TX0 : AR_TXC_DTR_TX1; - hc->txc_dtr[x / NCHAN] |= (x % NCHAN == 0) ? - AR_TXC_DTR_TXCS0 : AR_TXC_DTR_TXCS1; - break; - case AR_IFACE_EIA_530: - case AR_IFACE_COMBO: - case AR_IFACE_X_21: - hc->txc_dtr[x / NCHAN] |= (x % NCHAN == 0) ? - AR_TXC_DTR_TX0 : AR_TXC_DTR_TX1; - break; - } - } - - if(hc->bustype == AR_BUS_PCI) - hc->orbase[AR_TXC_DTR0 * 4] = hc->txc_dtr[0]; - else - outb(hc->iobase + AR_TXC_DTR0, hc->txc_dtr[0]); - if(hc->numports > NCHAN) { - if(hc->bustype == AR_BUS_PCI) - hc->orbase[AR_TXC_DTR2 * 4] = hc->txc_dtr[1]; - else - outb(hc->iobase + AR_TXC_DTR2, hc->txc_dtr[1]); - } - - chanmem = hc->memsize / hc->numports; - next = 0; - - for(x=0;x<hc->numports;x++, sc++) { - int blk; - - sc->sca = hc->sca[x / NCHAN]; - - for(blk = 0; blk < AR_TX_BLOCKS; blk++) { - sc->block[blk].txdesc = next; - bufmem = (16 * 1024) / AR_TX_BLOCKS; - descneeded = bufmem / AR_BUF_SIZ; - sc->block[blk].txstart = sc->block[blk].txdesc + - ((((descneeded * sizeof(sca_descriptor)) / - AR_BUF_SIZ) + 1) * AR_BUF_SIZ); - sc->block[blk].txend = next + bufmem; - sc->block[blk].txmax = - (sc->block[blk].txend - sc->block[blk].txstart) - / AR_BUF_SIZ; - next += bufmem; - - TRC(printf("ar%d: blk %d: txdesc %x, txstart %x, " - "txend %x, txmax %d\n", - x, - blk, - sc->block[blk].txdesc, - sc->block[blk].txstart, - sc->block[blk].txend, - sc->block[blk].txmax)); - } - - sc->rxdesc = next; - bufmem = chanmem - (bufmem * AR_TX_BLOCKS); - descneeded = bufmem / AR_BUF_SIZ; - sc->rxstart = sc->rxdesc + - ((((descneeded * sizeof(sca_descriptor)) / - AR_BUF_SIZ) + 1) * AR_BUF_SIZ); - sc->rxend = next + bufmem; - sc->rxmax = (sc->rxend - sc->rxstart) / AR_BUF_SIZ; - next += bufmem; - TRC(printf("ar%d: rxdesc %x, rxstart %x, " - "rxend %x, rxmax %d\n", - x, sc->rxdesc, sc->rxstart, sc->rxend, sc->rxmax)); - } - - if(hc->bustype == AR_BUS_PCI) - hc->orbase[AR_PIMCTRL] = AR_PIM_MODEG | AR_PIM_AUTO_LED; -} - - -/* - * The things done here are channel independent. - * - * Configure the sca waitstates. - * Configure the global interrupt registers. - * Enable master dma enable. - */ -static void -ar_init_sca(struct ar_hardc *hc, int scano) -{ - sca_regs *sca; - - sca = hc->sca[scano]; - if(hc->bustype == AR_BUS_ISA) - ARC_SET_SCA(hc->iobase, scano); - - /* - * Do the wait registers. - * Set everything to 0 wait states. - */ - sca->pabr0 = 0; - sca->pabr1 = 0; - sca->wcrl = 0; - sca->wcrm = 0; - sca->wcrh = 0; - - /* - * Configure the interrupt registers. - * Most are cleared until the interface is configured. - */ - sca->ier0 = 0x00; /* MSCI interrupts... Not used with dma. */ - sca->ier1 = 0x00; /* DMAC interrupts */ - sca->ier2 = 0x00; /* TIMER interrupts... Not used yet. */ - sca->itcr = 0x00; /* Use ivr and no intr ack */ - sca->ivr = 0x40; /* Fill in the interrupt vector. */ - sca->imvr = 0x40; - - /* - * Configure the timers. - * XXX Later - */ - - - /* - * Set the DMA channel priority to rotate between - * all four channels. - * - * Enable all dma channels. - */ - if(hc->bustype == AR_BUS_PCI) { - u_char *t; - - /* - * Stupid problem with the PCI interface chip that break - * things. - * XXX - */ - t = (u_char *)sca; - t[AR_PCI_SCA_PCR] = SCA_PCR_PR2; - t[AR_PCI_SCA_DMER] = SCA_DMER_EN; - } else { - sca->pcr = SCA_PCR_PR2; - sca->dmer = SCA_DMER_EN; - } -} - - -/* - * Configure the msci - * - * NOTE: The serial port configuration is hardcoded at the moment. - */ -static void -ar_init_msci(struct ar_softc *sc) -{ - msci_channel *msci; - - msci = &sc->sca->msci[sc->scachan]; - - if(sc->hc->bustype == AR_BUS_ISA) - ARC_SET_SCA(sc->hc->iobase, sc->scano); - - msci->cmd = SCA_CMD_RESET; - - msci->md0 = SCA_MD0_CRC_1 | - SCA_MD0_CRC_CCITT | - SCA_MD0_CRC_ENABLE | - SCA_MD0_MODE_HDLC; - msci->md1 = SCA_MD1_NOADDRCHK; - msci->md2 = SCA_MD2_DUPLEX | SCA_MD2_NRZ; - - /* - * Acording to the manual I should give a reset after changing the - * mode registers. - */ - msci->cmd = SCA_CMD_RXRESET; - msci->ctl = SCA_CTL_IDLPAT | SCA_CTL_UDRNC | SCA_CTL_RTS; - - /* - * For now all interfaces are programmed to use the RX clock for - * the TX clock. - */ - switch(sc->hc->interface[sc->subunit]) { - case AR_IFACE_V_35: - msci->rxs = SCA_RXS_CLK_RXC0 | SCA_RXS_DIV1; - msci->txs = SCA_TXS_CLK_TXC | SCA_TXS_DIV1; - break; - case AR_IFACE_X_21: - case AR_IFACE_EIA_530: - case AR_IFACE_COMBO: - msci->rxs = SCA_RXS_CLK_RXC0 | SCA_RXS_DIV1; - msci->txs = SCA_TXS_CLK_RX | SCA_TXS_DIV1; - } - - msci->tmc = 153; /* This give 64k for loopback */ - - /* XXX - * Disable all interrupts for now. I think if you are using - * the dmac you don't use these interrupts. - */ - msci->ie0 = 0; - msci->ie1 = 0x0C; /* XXX CTS and DCD (DSR on 570I) level change. */ - msci->ie2 = 0; - msci->fie = 0; - - msci->sa0 = 0; - msci->sa1 = 0; - - msci->idl = 0x7E; /* XXX This is what cisco does. */ - - /* - * This is what the ARNET diags use. - */ - msci->rrc = 0x0E; - msci->trc0 = 0x12; - msci->trc1 = 0x1F; -} - -/* - * Configure the rx dma controller. - */ -static void -ar_init_rx_dmac(struct ar_softc *sc) -{ - dmac_channel *dmac; - sca_descriptor *rxd; - u_int rxbuf; - u_int rxda; - u_int rxda_d; - int x = 0; - - dmac = &sc->sca->dmac[DMAC_RXCH(sc->scachan)]; - - if(sc->hc->bustype == AR_BUS_ISA) - ARC_SET_MEM(sc->hc->iobase, sc->rxdesc); - - rxd = (sca_descriptor *)(sc->hc->mem_start + (sc->rxdesc&sc->hc->winmsk)); - rxda_d = (u_int)sc->hc->mem_start - (sc->rxdesc & ~sc->hc->winmsk); - - for(rxbuf=sc->rxstart;rxbuf<sc->rxend;rxbuf += AR_BUF_SIZ, rxd++) { - rxda = (u_int)&rxd[1] - rxda_d; - rxd->cp = (u_short)(rxda & 0xfffful); - - x++; - if(x < 6) - TRC(printf("Descrp %p, data pt %x, data %x, ", - rxd, rxda, rxbuf)); - - rxd->bp = (u_short)(rxbuf & 0xfffful); - rxd->bpb = (u_char)((rxbuf >> 16) & 0xff); - rxd->len = 0; - rxd->stat = 0xff; /* The sca write here when it is finished. */ - - if(x < 6) - TRC(printf("bpb %x, bp %x.\n", rxd->bpb, rxd->bp)); - } - rxd--; - rxd->cp = (u_short)(sc->rxdesc & 0xfffful); - - sc->rxhind = 0; - - if(sc->hc->bustype == AR_BUS_ISA) - ARC_SET_SCA(sc->hc->iobase, sc->scano); - - dmac->dsr = 0; /* Disable DMA transfer */ - dmac->dcr = SCA_DCR_ABRT; - - /* XXX maybe also SCA_DMR_CNTE */ - dmac->dmr = SCA_DMR_TMOD | SCA_DMR_NF; - dmac->bfl = AR_BUF_SIZ; - - dmac->cda = (u_short)(sc->rxdesc & 0xffff); - dmac->sarb = (u_char)((sc->rxdesc >> 16) & 0xff); - - rxd = (sca_descriptor *)sc->rxstart; - dmac->eda = (u_short)((u_int)&rxd[sc->rxmax - 1] & 0xffff); - - dmac->dir = 0xF0; - - dmac->dsr = SCA_DSR_DE; -} - -/* - * Configure the TX DMA descriptors. - * Initialize the needed values and chain the descriptors. - */ -static void -ar_init_tx_dmac(struct ar_softc *sc) -{ - dmac_channel *dmac; - struct buf_block *blkp; - int blk; - sca_descriptor *txd; - u_int txbuf; - u_int txda; - u_int txda_d; - - dmac = &sc->sca->dmac[DMAC_TXCH(sc->scachan)]; - - if(sc->hc->bustype == AR_BUS_ISA) - ARC_SET_MEM(sc->hc->iobase, sc->block[0].txdesc); - - for(blk = 0; blk < AR_TX_BLOCKS; blk++) { - blkp = &sc->block[blk]; - txd = (sca_descriptor *)(sc->hc->mem_start + - (blkp->txdesc&sc->hc->winmsk)); - txda_d = (u_int)sc->hc->mem_start - - (blkp->txdesc & ~sc->hc->winmsk); - - txbuf=blkp->txstart; - for(;txbuf<blkp->txend;txbuf += AR_BUF_SIZ, txd++) { - txda = (u_int)&txd[1] - txda_d; - txd->cp = (u_short)(txda & 0xfffful); - - txd->bp = (u_short)(txbuf & 0xfffful); - txd->bpb = (u_char)((txbuf >> 16) & 0xff); - TRC(printf("ar%d: txbuf %x, bpb %x, bp %x\n", - sc->unit, txbuf, txd->bpb, txd->bp)); - txd->len = 0; - txd->stat = 0; - } - txd--; - txd->cp = (u_short)(blkp->txdesc & 0xfffful); - - blkp->txtail = (u_int)txd - (u_int)sc->hc->mem_start; - TRC(printf("TX Descriptors start %x, end %x.\n", - blkp->txdesc, - blkp->txtail)); - } - - if(sc->hc->bustype == AR_BUS_ISA) - ARC_SET_SCA(sc->hc->iobase, sc->scano); - - dmac->dsr = 0; /* Disable DMA */ - dmac->dcr = SCA_DCR_ABRT; - dmac->dmr = SCA_DMR_TMOD | SCA_DMR_NF; - dmac->dir = SCA_DIR_EOT | SCA_DIR_BOF | SCA_DIR_COF; - - dmac->sarb = (u_char)((sc->block[0].txdesc >> 16) & 0xff); -} - - -/* - * Look through the descriptors to see if there is a complete packet - * available. Stop if we get to where the sca is busy. - * - * Return the length and status of the packet. - * Return nonzero if there is a packet available. - * - * NOTE: - * It seems that we get the interrupt a bit early. The updateing of - * descriptor values is not always completed when this is called. - */ -static int -ar_packet_avail(struct ar_softc *sc, - int *len, - u_char *rxstat) -{ - dmac_channel *dmac; - sca_descriptor *rxdesc; - sca_descriptor *endp; - sca_descriptor *cda; - - if(sc->hc->bustype == AR_BUS_ISA) - ARC_SET_SCA(sc->hc->iobase, sc->scano); - dmac = &sc->sca->dmac[DMAC_RXCH(sc->scachan)]; - cda = (sca_descriptor *)(sc->hc->mem_start + - ((((u_int)dmac->sarb << 16) + dmac->cda) & sc->hc->winmsk)); - - if(sc->hc->bustype == AR_BUS_ISA) - ARC_SET_MEM(sc->hc->iobase, sc->rxdesc); - rxdesc = (sca_descriptor *) - (sc->hc->mem_start + (sc->rxdesc & sc->hc->winmsk)); - endp = rxdesc; - rxdesc = &rxdesc[sc->rxhind]; - endp = &endp[sc->rxmax]; - - *len = 0; - - while(rxdesc != cda) { - *len += rxdesc->len; - - if(rxdesc->stat & SCA_DESC_EOM) { - *rxstat = rxdesc->stat; - TRC(printf("ar%d: PKT AVAIL len %d, %x.\n", - sc->unit, *len, *rxstat)); - return (1); - } - - rxdesc++; - if(rxdesc == endp) - rxdesc = (sca_descriptor *) - (sc->hc->mem_start + (sc->rxdesc & sc->hc->winmsk)); - } - - *len = 0; - *rxstat = 0; - return (0); -} - - -/* - * Copy a packet from the on card memory into a provided mbuf. - * Take into account that buffers wrap and that a packet may - * be larger than a buffer. - */ -static void -ar_copy_rxbuf(struct mbuf *m, - struct ar_softc *sc, - int len) -{ - sca_descriptor *rxdesc; - u_int rxdata; - u_int rxmax; - u_int off = 0; - u_int tlen; - - rxdata = sc->rxstart + (sc->rxhind * AR_BUF_SIZ); - rxmax = sc->rxstart + (sc->rxmax * AR_BUF_SIZ); - - rxdesc = (sca_descriptor *) - (sc->hc->mem_start + (sc->rxdesc & sc->hc->winmsk)); - rxdesc = &rxdesc[sc->rxhind]; - - while(len) { - tlen = (len < AR_BUF_SIZ) ? len : AR_BUF_SIZ; - if(sc->hc->bustype == AR_BUS_ISA) - ARC_SET_MEM(sc->hc->iobase, rxdata); - bcopy(sc->hc->mem_start + (rxdata & sc->hc->winmsk), - mtod(m, caddr_t) + off, - tlen); - - off += tlen; - len -= tlen; - - if(sc->hc->bustype == AR_BUS_ISA) - ARC_SET_MEM(sc->hc->iobase, sc->rxdesc); - rxdesc->len = 0; - rxdesc->stat = 0xff; - - rxdata += AR_BUF_SIZ; - rxdesc++; - if(rxdata == rxmax) { - rxdata = sc->rxstart; - rxdesc = (sca_descriptor *) - (sc->hc->mem_start + (sc->rxdesc & sc->hc->winmsk)); - } - } -} - -/* - * If single is set, just eat a packet. Otherwise eat everything up to - * where cda points. Update pointers to point to the next packet. - */ -static void -ar_eat_packet(struct ar_softc *sc, int single) -{ - dmac_channel *dmac; - sca_descriptor *rxdesc; - sca_descriptor *endp; - sca_descriptor *cda; - int loopcnt = 0; - u_char stat; - - if(sc->hc->bustype == AR_BUS_ISA) - ARC_SET_SCA(sc->hc->iobase, sc->scano); - dmac = &sc->sca->dmac[DMAC_RXCH(sc->scachan)]; - cda = (sca_descriptor *)(sc->hc->mem_start + - ((((u_int)dmac->sarb << 16) + dmac->cda) & sc->hc->winmsk)); - - /* - * Loop until desc->stat == (0xff || EOM) - * Clear the status and length in the descriptor. - * Increment the descriptor. - */ - if(sc->hc->bustype == AR_BUS_ISA) - ARC_SET_MEM(sc->hc->iobase, sc->rxdesc); - rxdesc = (sca_descriptor *) - (sc->hc->mem_start + (sc->rxdesc & sc->hc->winmsk)); - endp = rxdesc; - rxdesc = &rxdesc[sc->rxhind]; - endp = &endp[sc->rxmax]; - - while(rxdesc != cda) { - loopcnt++; - if(loopcnt > sc->rxmax) { - printf("ar%d: eat pkt %d loop, cda %p, " - "rxdesc %p, stat %x.\n", - sc->unit, - loopcnt, - (void *)cda, - (void *)rxdesc, - rxdesc->stat); - break; - } - - stat = rxdesc->stat; - - rxdesc->len = 0; - rxdesc->stat = 0xff; - - rxdesc++; - sc->rxhind++; - if(rxdesc == endp) { - rxdesc = (sca_descriptor *) - (sc->hc->mem_start + (sc->rxdesc & sc->hc->winmsk)); - sc->rxhind = 0; - } - - if(single && (stat == SCA_DESC_EOM)) - break; - } - - /* - * Update the eda to the previous descriptor. - */ - if(sc->hc->bustype == AR_BUS_ISA) - ARC_SET_SCA(sc->hc->iobase, sc->scano); - - rxdesc = (sca_descriptor *)sc->rxdesc; - rxdesc = &rxdesc[(sc->rxhind + sc->rxmax - 2 ) % sc->rxmax]; - - sc->sca->dmac[DMAC_RXCH(sc->scachan)].eda = - (u_short)((u_int)rxdesc & 0xffff); -} - - -/* - * While there is packets available in the rx buffer, read them out - * into mbufs and ship them off. - */ -static void -ar_get_packets(struct ar_softc *sc) -{ - sca_descriptor *rxdesc; - struct mbuf *m = NULL; - int i; - int len; - u_char rxstat; -#ifdef NETGRAPH - int error; -#endif - - while(ar_packet_avail(sc, &len, &rxstat)) { - TRC(printf("apa: len %d, rxstat %x\n", len, rxstat)); - if(((rxstat & SCA_DESC_ERRORS) == 0) && (len < MCLBYTES)) { - MGETHDR(m, M_DONTWAIT, MT_DATA); - if(m == NULL) { - /* eat packet if get mbuf fail!! */ - ar_eat_packet(sc, 1); - continue; - } -#ifndef NETGRAPH - m->m_pkthdr.rcvif = &sc->ifsppp.pp_if; -#else /* NETGRAPH */ - m->m_pkthdr.rcvif = NULL; - sc->inbytes += len; - sc->inlast = 0; -#endif /* NETGRAPH */ - m->m_pkthdr.len = m->m_len = len; - if(len > MHLEN) { - MCLGET(m, M_DONTWAIT); - if((m->m_flags & M_EXT) == 0) { - m_freem(m); - ar_eat_packet(sc, 1); - continue; - } - } - ar_copy_rxbuf(m, sc, len); -#ifndef NETGRAPH - if(sc->ifsppp.pp_if.if_bpf) - bpf_mtap(&sc->ifsppp.pp_if, m); - sppp_input(&sc->ifsppp.pp_if, m); - sc->ifsppp.pp_if.if_ipackets++; -#else /* NETGRAPH */ - NG_SEND_DATA_ONLY(error, sc->hook, m); - sc->ipackets++; -#endif /* NETGRAPH */ - - /* - * Update the eda to the previous descriptor. - */ - i = (len + AR_BUF_SIZ - 1) / AR_BUF_SIZ; - sc->rxhind = (sc->rxhind + i) % sc->rxmax; - - if(sc->hc->bustype == AR_BUS_ISA) - ARC_SET_SCA(sc->hc->iobase, sc->scano); - - rxdesc = (sca_descriptor *)sc->rxdesc; - rxdesc = - &rxdesc[(sc->rxhind + sc->rxmax - 2 ) % sc->rxmax]; - - sc->sca->dmac[DMAC_RXCH(sc->scachan)].eda = - (u_short)((u_int)rxdesc & 0xffff); - } else { - int tries = 5; - - while((rxstat == 0xff) && --tries) - ar_packet_avail(sc, &len, &rxstat); - - /* - * It look like we get an interrupt early - * sometimes and then the status is not - * filled in yet. - */ - if(tries && (tries != 5)) - continue; - - ar_eat_packet(sc, 1); - -#ifndef NETGRAPH - sc->ifsppp.pp_if.if_ierrors++; -#else /* NETGRAPH */ - sc->ierrors[0]++; -#endif /* NETGRAPH */ - - if(sc->hc->bustype == AR_BUS_ISA) - ARC_SET_SCA(sc->hc->iobase, sc->scano); - - TRCL(printf("ar%d: Receive error chan %d, " - "stat %x, msci st3 %x," - "rxhind %d, cda %x, eda %x.\n", - sc->unit, - sc->scachan, - rxstat, - sc->sca->msci[sc->scachan].st3, - sc->rxhind, - sc->sca->dmac[ - DMAC_RXCH(sc->scachan)].cda, - sc->sca->dmac[ - DMAC_RXCH(sc->scachan)].eda)); - } - } -} - - -/* - * All DMA interrupts come here. - * - * Each channel has two interrupts. - * Interrupt A for errors and Interrupt B for normal stuff like end - * of transmit or receive dmas. - */ -static void -ar_dmac_intr(struct ar_hardc *hc, int scano, u_char isr1) -{ - u_char dsr; - u_char dotxstart = isr1; - int mch; - struct ar_softc *sc; - sca_regs *sca; - dmac_channel *dmac; - - sca = hc->sca[scano]; - mch = 0; - /* - * Shortcut if there is no interrupts for dma channel 0 or 1 - */ - if((isr1 & 0x0F) == 0) { - mch = 1; - isr1 >>= 4; - } - - do { - sc = &hc->sc[mch + (NCHAN * scano)]; - - /* - * Transmit channel - */ - if(isr1 & 0x0C) { - dmac = &sca->dmac[DMAC_TXCH(mch)]; - - if(hc->bustype == AR_BUS_ISA) - ARC_SET_SCA(hc->iobase, scano); - - dsr = dmac->dsr; - dmac->dsr = dsr; - - /* Counter overflow */ - if(dsr & SCA_DSR_COF) { - printf("ar%d: TX DMA Counter overflow, " - "txpacket no %lu.\n", - sc->unit, -#ifndef NETGRAPH - sc->ifsppp.pp_if.if_opackets); - sc->ifsppp.pp_if.if_oerrors++; -#else /* NETGRAPH */ - sc->opackets); - sc->oerrors++; -#endif /* NETGRAPH */ - } - - /* Buffer overflow */ - if(dsr & SCA_DSR_BOF) { - printf("ar%d: TX DMA Buffer overflow, " - "txpacket no %lu, dsr %02x, " - "cda %04x, eda %04x.\n", - sc->unit, -#ifndef NETGRAPH - sc->ifsppp.pp_if.if_opackets, -#else /* NETGRAPH */ - sc->opackets, -#endif /* NETGRAPH */ - dsr, - dmac->cda, - dmac->eda); -#ifndef NETGRAPH - sc->ifsppp.pp_if.if_oerrors++; -#else /* NETGRAPH */ - sc->oerrors++; -#endif /* NETGRAPH */ - } - - /* End of Transfer */ - if(dsr & SCA_DSR_EOT) { - /* - * This should be the most common case. - * - * Clear the IFF_OACTIVE flag. - * - * Call arstart to start a new transmit if - * there is data to transmit. - */ - sc->xmit_busy = 0; -#ifndef NETGRAPH - sc->ifsppp.pp_if.if_flags &= ~IFF_OACTIVE; - sc->ifsppp.pp_if.if_timer = 0; -#else /* NETGRAPH */ - /* XXX c->ifsppp.pp_if.if_flags &= ~IFF_OACTIVE; */ - sc->out_dog = 0; /* XXX */ -#endif /* NETGRAPH */ - - if(sc->txb_inuse && --sc->txb_inuse) - ar_xmit(sc); - } - } - - /* - * Receive channel - */ - if(isr1 & 0x03) { - dmac = &sca->dmac[DMAC_RXCH(mch)]; - - if(hc->bustype == AR_BUS_ISA) - ARC_SET_SCA(hc->iobase, scano); - - dsr = dmac->dsr; - dmac->dsr = dsr; - - TRC(printf("AR: RX DSR %x\n", dsr)); - - /* End of frame */ - if(dsr & SCA_DSR_EOM) { - TRC(int tt = sc->ifsppp.pp_if.if_ipackets;) - TRC(int ind = sc->rxhind;) - - ar_get_packets(sc); - TRC( -#ifndef NETGRAPH - if(tt == sc->ifsppp.pp_if.if_ipackets) { -#else /* NETGRAPH */ - if(tt == sc->ipackets) { -#endif /* NETGRAPH */ - sca_descriptor *rxdesc; - int i; - - if(hc->bustype == AR_BUS_ISA) - ARC_SET_SCA(hc->iobase, scano); - printf("AR: RXINTR isr1 %x, dsr %x, " - "no data %d pkts, orxhind %d.\n", - dotxstart, - dsr, - tt, - ind); - printf("AR: rxdesc %x, rxstart %x, " - "rxend %x, rxhind %d, " - "rxmax %d.\n", - sc->rxdesc, - sc->rxstart, - sc->rxend, - sc->rxhind, - sc->rxmax); - printf("AR: cda %x, eda %x.\n", - dmac->cda, - dmac->eda); - - if(sc->hc->bustype == AR_BUS_ISA) - ARC_SET_MEM(sc->hc->iobase, - sc->rxdesc); - rxdesc = (sca_descriptor *) - (sc->hc->mem_start + - (sc->rxdesc & sc->hc->winmsk)); - rxdesc = &rxdesc[sc->rxhind]; - for(i=0;i<3;i++,rxdesc++) - printf("AR: rxdesc->stat %x, " - "len %d.\n", - rxdesc->stat, - rxdesc->len); - }) - } - - /* Counter overflow */ - if(dsr & SCA_DSR_COF) { - printf("ar%d: RX DMA Counter overflow, " - "rxpkts %lu.\n", - sc->unit, -#ifndef NETGRAPH - sc->ifsppp.pp_if.if_ipackets); - sc->ifsppp.pp_if.if_ierrors++; -#else /* NETGRAPH */ - sc->ipackets); - sc->ierrors[1]++; -#endif /* NETGRAPH */ - } - - /* Buffer overflow */ - if(dsr & SCA_DSR_BOF) { - if(hc->bustype == AR_BUS_ISA) - ARC_SET_SCA(hc->iobase, scano); - printf("ar%d: RX DMA Buffer overflow, " - "rxpkts %lu, rxind %d, " - "cda %x, eda %x, dsr %x.\n", - sc->unit, -#ifndef NETGRAPH - sc->ifsppp.pp_if.if_ipackets, -#else /* NETGRAPH */ - sc->ipackets, -#endif /* NETGRAPH */ - sc->rxhind, - dmac->cda, - dmac->eda, - dsr); - /* - * Make sure we eat as many as possible. - * Then get the system running again. - */ - ar_eat_packet(sc, 0); -#ifndef NETGRAPH - sc->ifsppp.pp_if.if_ierrors++; -#else /* NETGRAPH */ - sc->ierrors[2]++; -#endif /* NETGRAPH */ - if(hc->bustype == AR_BUS_ISA) - ARC_SET_SCA(hc->iobase, scano); - sca->msci[mch].cmd = SCA_CMD_RXMSGREJ; - dmac->dsr = SCA_DSR_DE; - - TRC(printf("ar%d: RX DMA Buffer overflow, " - "rxpkts %lu, rxind %d, " - "cda %x, eda %x, dsr %x. After\n", - sc->unit, - sc->ifsppp.pp_if.if_ipackets, - sc->rxhind, - dmac->cda, - dmac->eda, - dmac->dsr);) - } - - /* End of Transfer */ - if(dsr & SCA_DSR_EOT) { - /* - * If this happen, it means that we are - * receiving faster than what the processor - * can handle. - * - * XXX We should enable the dma again. - */ - printf("ar%d: RX End of transfer, rxpkts %lu.\n", - sc->unit, -#ifndef NETGRAPH - sc->ifsppp.pp_if.if_ipackets); - sc->ifsppp.pp_if.if_ierrors++; -#else /* NETGRAPH */ - sc->ipackets); - sc->ierrors[3]++; -#endif /* NETGRAPH */ - } - } - - isr1 >>= 4; - - mch++; - }while((mch<NCHAN) && isr1); - - /* - * Now that we have done all the urgent things, see if we - * can fill the transmit buffers. - */ - for(mch = 0; mch < NCHAN; mch++) { - if(dotxstart & 0x0C) { - sc = &hc->sc[mch + (NCHAN * scano)]; -#ifndef NETGRAPH - arstart(&sc->ifsppp.pp_if); -#else /* NETGRAPH */ - arstart(sc); -#endif /* NETGRAPH */ - } - dotxstart >>= 4; - } -} - -static void -ar_msci_intr(struct ar_hardc *hc, int scano, u_char isr0) -{ - printf("arc%d: ARINTR: MSCI\n", hc->cunit); -} - -static void -ar_timer_intr(struct ar_hardc *hc, int scano, u_char isr2) -{ - printf("arc%d: ARINTR: TIMER\n", hc->cunit); -} - - -#ifdef NETGRAPH -/***************************************** - * Device timeout/watchdog routine. - * called once per second. - * checks to see that if activity was expected, that it hapenned. - * At present we only look to see if expected output was completed. - */ -static void -ngar_watchdog_frame(void * arg) -{ - struct ar_softc * sc = arg; - int s; - int speed; - - if(sc->running == 0) - return; /* if we are not running let timeouts die */ - /* - * calculate the apparent throughputs - * XXX a real hack - */ - s = splimp(); - speed = sc->inbytes - sc->lastinbytes; - sc->lastinbytes = sc->inbytes; - if ( sc->inrate < speed ) - sc->inrate = speed; - speed = sc->outbytes - sc->lastoutbytes; - sc->lastoutbytes = sc->outbytes; - if ( sc->outrate < speed ) - sc->outrate = speed; - sc->inlast++; - splx(s); - - if ((sc->inlast > QUITE_A_WHILE) - && (sc->out_deficit > LOTS_OF_PACKETS)) { - log(LOG_ERR, "ar%d: No response from remote end\n", sc->unit); - s = splimp(); - ar_down(sc); - ar_up(sc); - sc->inlast = sc->out_deficit = 0; - splx(s); - } else if ( sc->xmit_busy ) { /* no TX -> no TX timeouts */ - if (sc->out_dog == 0) { - log(LOG_ERR, "ar%d: Transmit failure.. no clock?\n", - sc->unit); - s = splimp(); - arwatchdog(sc); -#if 0 - ar_down(sc); - ar_up(sc); -#endif - splx(s); - sc->inlast = sc->out_deficit = 0; - } else { - sc->out_dog--; - } - } - sc->handle = timeout(ngar_watchdog_frame, sc, hz); -} - -/*********************************************************************** - * This section contains the methods for the Netgraph interface - ***********************************************************************/ -/* - * It is not possible or allowable to create a node of this type. - * If the hardware exists, it will already have created it. - */ -static int -ngar_constructor(node_p node) -{ - return (EINVAL); -} - -/* - * give our ok for a hook to be added... - * If we are not running this should kick the device into life. - * The hook's private info points to our stash of info about that - * channel. - */ -static int -ngar_newhook(node_p node, hook_p hook, const char *name) -{ - struct ar_softc * sc = NG_NODE_PRIVATE(node); - - /* - * check if it's our friend the debug hook - */ - if (strcmp(name, NG_AR_HOOK_DEBUG) == 0) { - NG_HOOK_SET_PRIVATE(hook, NULL); /* paranoid */ - sc->debug_hook = hook; - return (0); - } - - /* - * Check for raw mode hook. - */ - if (strcmp(name, NG_AR_HOOK_RAW) != 0) { - return (EINVAL); - } - NG_HOOK_SET_PRIVATE(hook, sc); - sc->hook = hook; - sc->datahooks++; - ar_up(sc); - return (0); -} - -/* - * incoming messages. - * Just respond to the generic TEXT_STATUS message - */ -static int -ngar_rcvmsg(node_p node, item_p item, hook_p lasthook) -{ - struct ar_softc * sc; - struct ng_mesg *resp = NULL; - int error = 0; - struct ng_mesg *msg; - - NGI_GET_MSG(item, msg); - sc = NG_NODE_PRIVATE(node); - switch (msg->header.typecookie) { - case NG_AR_COOKIE: - error = EINVAL; - break; - case NGM_GENERIC_COOKIE: - switch(msg->header.cmd) { - case NGM_TEXT_STATUS: { - char *arg; - int pos = 0; - - int resplen = sizeof(struct ng_mesg) + 512; - NG_MKRESPONSE(resp, msg, resplen, M_NOWAIT); - if (resp == NULL) { - error = ENOMEM; - break; - } - arg = (resp)->data; - pos = sprintf(arg, "%ld bytes in, %ld bytes out\n" - "highest rate seen: %ld B/S in, %ld B/S out\n", - sc->inbytes, sc->outbytes, - sc->inrate, sc->outrate); - pos += sprintf(arg + pos, - "%ld output errors\n", - sc->oerrors); - pos += sprintf(arg + pos, - "ierrors = %ld, %ld, %ld, %ld\n", - sc->ierrors[0], - sc->ierrors[1], - sc->ierrors[2], - sc->ierrors[3]); - - resp->header.arglen = pos + 1; - break; - } - default: - error = EINVAL; - break; - } - break; - default: - error = EINVAL; - break; - } - /* Take care of synchronous response, if any */ - NG_RESPOND_MSG(error, node, item, resp); - NG_FREE_MSG(msg); - return (error); -} - -/* - * get data from another node and transmit it to the correct channel - */ -static int -ngar_rcvdata(hook_p hook, item_p item) -{ - int s; - int error = 0; - struct ar_softc * sc = NG_NODE_PRIVATE(NG_HOOK_NODE(hook)); - struct ifqueue *xmitq_p; - struct mbuf *m; - meta_p meta; - - NGI_GET_M(item, m); - NGI_GET_META(item, meta); - NG_FREE_ITEM(item); - /* - * data doesn't come in from just anywhere (e.g control hook) - */ - if ( NG_HOOK_PRIVATE(hook) == NULL) { - error = ENETDOWN; - goto bad; - } - - /* - * Now queue the data for when it can be sent - */ - if (meta && meta->priority > 0) { - xmitq_p = (&sc->xmitq_hipri); - } else { - xmitq_p = (&sc->xmitq); - } - s = splimp(); - IF_LOCK(xmitq_p); - if (_IF_QFULL(xmitq_p)) { - _IF_DROP(xmitq_p); - IF_UNLOCK(xmitq_p); - splx(s); - error = ENOBUFS; - goto bad; - } - _IF_ENQUEUE(xmitq_p, m); - IF_UNLOCK(xmitq_p); - arstart(sc); - splx(s); - return (0); - -bad: - /* - * It was an error case. - * check if we need to free the mbuf, and then return the error - */ - NG_FREE_M(m); - NG_FREE_META(meta); - return (error); -} - -/* - * do local shutdown processing.. - * this node will refuse to go away, unless the hardware says to.. - * don't unref the node, or remove our name. just clear our links up. - */ -static int -ngar_shutdown(node_p node) -{ - struct ar_softc * sc = NG_NODE_PRIVATE(node); - - ar_down(sc); - NG_NODE_UNREF(node); - /* XXX need to drain the output queues! */ - - /* The node is dead, long live the node! */ - /* stolen from the attach routine */ - if (ng_make_node_common(&typestruct, &sc->node) != 0) - return (0); - sprintf(sc->nodename, "%s%d", NG_AR_NODE_TYPE, sc->unit); - if (ng_name_node(sc->node, sc->nodename)) { - sc->node = NULL; - printf("node naming failed\n"); - NG_NODE_UNREF(sc->node); /* node dissappears */ - return (0); - } - NG_NODE_SET_PRIVATE(sc->node, sc); - sc->running = 0; - return (0); -} - -/* already linked */ -static int -ngar_connect(hook_p hook) -{ - /* probably not at splnet, force outward queueing */ - NG_HOOK_FORCE_QUEUE(NG_HOOK_PEER(hook)); - /* be really amiable and just say "YUP that's OK by me! " */ - return (0); -} - -/* - * notify on hook disconnection (destruction) - * - * Invalidate the private data associated with this dlci. - * For this type, removal of the last link resets tries to destroy the node. - * As the device still exists, the shutdown method will not actually - * destroy the node, but reset the device and leave it 'fresh' :) - * - * The node removal code will remove all references except that owned by the - * driver. - */ -static int -ngar_disconnect(hook_p hook) -{ - struct ar_softc * sc = NG_NODE_PRIVATE(NG_HOOK_NODE(hook)); - int s; - /* - * If it's the data hook, then free resources etc. - */ - if (NG_HOOK_PRIVATE(hook)) { - s = splimp(); - sc->datahooks--; - if (sc->datahooks == 0) - ar_down(sc); - splx(s); - } else { - sc->debug_hook = NULL; - } - return (0); -} - -/* - * called during bootup - * or LKM loading to put this type into the list of known modules - */ -static void -ngar_init(void *ignored) -{ - if (ng_newtype(&typestruct)) - printf("ngar install failed\n"); - ngar_done_init = 1; -} -#endif /* NETGRAPH */ - -/* - ********************************* END ************************************ - */ diff --git a/sys/i386/isa/if_ar.h b/sys/i386/isa/if_ar.h deleted file mode 100644 index 875e42a..0000000 --- a/sys/i386/isa/if_ar.h +++ /dev/null @@ -1,51 +0,0 @@ -/* - * if_ar.h - * - * Copyright (C) 1997-1999 Whistle Communications Inc. - * All rights reserved. - * - * Subject to the following obligations and disclaimer of warranty, use and - * redistribution of this software, in source or object code forms, with or - * without modifications are expressly permitted by Whistle Communications; - * provided, however, that: - * 1. Any and all reproductions of the source or object code must include the - * copyright notice above and the following disclaimer of warranties; and - * 2. No rights are granted, in any manner or form, to use Whistle - * Communications, Inc. trademarks, including the mark "WHISTLE - * COMMUNICATIONS" on advertising, endorsements, or otherwise except as - * such appears in the above copyright notice or in the software. - * - * THIS SOFTWARE IS BEING PROVIDED BY WHISTLE COMMUNICATIONS "AS IS", AND - * TO THE MAXIMUM EXTENT PERMITTED BY LAW, WHISTLE COMMUNICATIONS MAKES NO - * REPRESENTATIONS OR WARRANTIES, EXPRESS OR IMPLIED, REGARDING THIS SOFTWARE, - * INCLUDING WITHOUT LIMITATION, ANY AND ALL IMPLIED WARRANTIES OF - * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE, OR NON-INFRINGEMENT. - * WHISTLE COMMUNICATIONS DOES NOT WARRANT, GUARANTEE, OR MAKE ANY - * REPRESENTATIONS REGARDING THE USE OF, OR THE RESULTS OF THE USE OF THIS - * SOFTWARE IN TERMS OF ITS CORRECTNESS, ACCURACY, RELIABILITY OR OTHERWISE. - * IN NO EVENT SHALL WHISTLE COMMUNICATIONS BE LIABLE FOR ANY DAMAGES - * RESULTING FROM OR ARISING OUT OF ANY USE OF THIS SOFTWARE, INCLUDING - * WITHOUT LIMITATION, ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, - * PUNITIVE, OR CONSEQUENTIAL DAMAGES, PROCUREMENT OF SUBSTITUTE GOODS OR - * SERVICES, LOSS OF USE, DATA OR PROFITS, HOWEVER CAUSED AND UNDER 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 WHISTLE COMMUNICATIONS IS ADVISED OF THE POSSIBILITY - * OF SUCH DAMAGE. - * - * $FreeBSD$ - */ - -#ifndef _I386_ISA_IF_AR_H_ -#define _I386_ISA_IF_AR_H_ - -/* Node type name and type cookie */ -#define NG_AR_NODE_TYPE "sync_ar" -#define NG_AR_COOKIE 860552149 - -/* Netgraph hooks */ -#define NG_AR_HOOK_DEBUG "debug" -#define NG_AR_HOOK_RAW "rawdata" - -#endif /* _I386_ISA_IF_AR_H_ */ - diff --git a/sys/i386/isa/if_arregs.h b/sys/i386/isa/if_arregs.h deleted file mode 100644 index 552d20e..0000000 --- a/sys/i386/isa/if_arregs.h +++ /dev/null @@ -1,227 +0,0 @@ -/* - * Copyright (c) 1995 - 2001 John Hay. 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. Neither the name of the author nor the names of any co-contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY [your name] 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 REGENTS 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. - * - * $FreeBSD$ - */ -#ifndef _IF_ARREGS_H_ -#define _IF_ARREGS_H_ - -#define NCHAN 2 /* A HD64570 chip have 2 channels */ -#define NPORT 4 /* A ArNet board can have 4 ports or */ - /* channels */ - -#define AR_BUF_SIZ 512 -#define AR_TX_BLOCKS 2 -#define ARC_IO_SIZ 0x10 -#define ARC_WIN_SIZ 0x00004000 -#define ARC_WIN_MSK (ARC_WIN_SIZ - 1) -#define ARC_WIN_SHFT 14 - -/* Some PCI specific offsets. */ -#define AR_PCI_SCA_1_OFFSET 0x00040000 -#define AR_PCI_SCA_2_OFFSET 0x00040400 -#define AR_PCI_ORBASE_OFFSET 0x00041000 -#define AR_PCI_SCA_PCR 0x0208 -#define AR_PCI_SCA_DMER 0x0309 -/* PCI Legacy (below 1M) offsets. */ -#define AR_PCI_L_SCA_1_OFFSET 0x00004000 -#define AR_PCI_L_SCA_2_OFFSET 0x00004400 -#define AR_PCI_L_ORBASE_OFFSET 0x00005000 - -#define AR_ID_5 0x00 /* RO, Card probe '5' */ -#define AR_ID_7 0x01 /* RO, Card probe '7' */ -#define AR_ID_0 0x02 /* RO, Card probe '0' */ -#define AR_BMI 0x03 /* RO, Bus, mem and interface type */ -#define AR_REV 0x04 /* RO, Adapter revision */ -#define AR_PNUM 0x05 /* RO, Port number */ -#define AR_HNDSH 0x06 /* RO, Supported handshake */ -#define AR_ISTAT 0x07 /* RO, DCD and Interrupt status */ -#define AR_MSCA_EN 0x08 /* WO, Memory and SCA enable */ -#define AR_TXC_DTR0 0x09 /* WO, Tx Clock and DTR control 0 + 1 */ -#define AR_SEC_PAL 0x0A /* RW, Security PAL */ -#define AR_INT_ACK0 0x0B /* RO, Interrupt Acknowledge 0 + 1 */ -#define AR_INT_SEL 0x0C /* RW, Interrupt Select */ -#define AR_MEM_SEL 0x0D /* RW, Memory Select */ -#define AR_INT_ACK2 0x0E /* RO, Interrupt Acknowledge 2 + 3 */ -#define AR_TXC_DTR2 0x0E /* WO, Tx Clock and DTR control 2 + 3 */ -/* PCI only */ -#define AR_PIMCTRL 0x4C /* RW, PIM and LEDs */ -#define AR_INT_SCB 0x50 /* RO, Interrupt Scoreboard */ - -#define AR_REV_MSK 0x0F -#define AR_WSIZ_MSK 0xE0 -#define AR_WSIZ_SHFT 5 -/* Bus memory and interface type */ -#define AR_BUS_MSK 0x03 -#define AR_BUS_ISA 0x00 -#define AR_BUS_MCA 0x01 -#define AR_BUS_EISA 0x02 -#define AR_BUS_PCI 0x03 - -#define AR_MEM_MSK 0x1C -#define AR_MEM_SHFT 0x02 -#define AR_MEM_64K 0x00 -#define AR_MEM_128K 0x04 -#define AR_MEM_256K 0x08 -#define AR_MEM_512K 0x0C - -/* - * EIA-232 - * V.35/EIA-232 - * EIA-530 - * X.21 - * EIA-530/X.21 Combo - */ -#define AR_IFACE_MSK 0xE0 -#define AR_IFACE_SHFT 0x05 -#define AR_IFACE_EIA_232 0x00 /* Only on the 570 card, not 570i */ -#define AR_IFACE_V_35 0x20 /* Selectable between V.35 and EIA-232 */ -#define AR_IFACE_EIA_530 0x40 -#define AR_IFACE_X_21 0x60 -#define AR_IFACE_COMBO 0xC0 /* X.21 / EIA-530 */ -#define AR_IFACE_PIM 0xE0 /* PIM module */ -#define AR_IFACE_LOOPBACK 0xFE -#define AR_IFACE_UNKNOWN 0xFF - -/* Supported Handshake signals */ -#define AR_SHSK_DTR 0x01 -#define AR_SHSK_RTS 0x02 -#define AR_SHSK_CTS 0x10 -#define AR_SHSK_DSR 0x20 -#define AR_SHSK_RI 0x40 -#define AR_SHSK_DCD 0x80 - -/* DCD and Interrupt status */ -#define AR_BD_INT 0x01 -#define AR_INT_0 0x20 -#define AR_INT_1 0x40 - -#define AR_DCD_MSK 0x1E -#define AR_DCD_SHFT 0x01 -#define AR_DCD_0 0x02 -#define AR_DCD_1 0x04 -#define AR_DCD_2 0x08 -#define AR_DCD_3 0x10 - -/* Memory and SCA enable */ -#define AR_WIN_MSK 0x1F - -#define AR_SEL_SCA_0 0x00 -#define AR_SEL_SCA_1 0x20 -#define AR_ENA_SCA 0x40 -#define AR_ENA_MEM 0x80 - -/* Transmit Clock and DTR and RESET */ -#define AR_TXC_DTR_TX0 0x01 -#define AR_TXC_DTR_TX1 0x02 -#define AR_TXC_DTR_DTR0 0x04 -#define AR_TXC_DTR_DTR1 0x08 -#define AR_TXC_DTR_TXCS0 0x10 -#define AR_TXC_DTR_TXCS1 0x20 -#define AR_TXC_DTR_NOTRESET 0x40 -#define AR_TXC_DTR_RESET 0x00 - -/* Interrupt select register */ -#define AR_INTS_CEN 0x01 -#define AR_INTS_ISEL0 0x02 -#define AR_INTS_ISEL1 0x04 -#define AR_INTS_ISEL2 0x08 -#define AR_INTS_CMA14 0x10 -#define AR_INTS_CMA15 0x20 - -/* Advanced PIM Control */ -#define AR_PIM_STROBE 0x01 -#define AR_PIM_DATA 0x02 -#define AR_PIM_MODEG 0x04 -#define AR_PIM_A2D_STROBE 0x04 -#define AR_PIM_MODEY 0x08 -#define AR_PIM_A2D_DOUT 0x08 -#define AR_PIM_AUTO_LED 0x10 -#define AR_PIM_INT 0x20 - -#define AR_PIM_RESET 0x00 /* MODEG and MODEY 0 */ -#define AR_PIM_READ AR_PIM_MODEG -#define AR_PIM_WRITE AR_PIM_MODEY - -#define ARC_GET_WIN(addr) ((addr >> ARC_WIN_SHFT) & AR_WIN_MSK) - -#define ARC_SET_MEM(iobase,win) outb(iobase+AR_MSCA_EN, AR_ENA_MEM | \ - ARC_GET_WIN(win)) -#define ARC_SET_SCA(iobase,ch) outb(iobase+AR_MSCA_EN, AR_ENA_MEM | \ - AR_ENA_SCA | (ch ? AR_SEL_SCA_1:AR_SEL_SCA_0)) -#define ARC_SET_OFF(iobase) outb(iobase+AR_MSCA_EN, 0) - -struct ar_hardc { - int cunit; - struct ar_softc *sc; - u_short iobase; - int isa_irq; - int numports; - caddr_t mem_start; - caddr_t mem_end; - caddr_t plx_mem; - u_char *orbase; - - u_int memsize; /* in bytes */ - u_int winsize; /* in bytes */ - u_int winmsk; - u_char bustype; /* ISA, MCA, PCI.... */ - u_char interface[NPORT];/* X21, V.35, EIA-530.... */ - u_char revision; - u_char handshake; /* handshake lines supported by card. */ - - u_char txc_dtr[NPORT/NCHAN]; /* the register is write only */ - u_int txc_dtr_off[NPORT/NCHAN]; - - sca_regs *sca[NPORT/NCHAN]; - - bus_space_tag_t bt; - bus_space_handle_t bh; - int rid_ioport; - int rid_memory; - int rid_plx_memory; - int rid_irq; - int rid_drq; - struct resource* res_ioport; /* resource for port range */ - struct resource* res_memory; /* resource for mem range */ - struct resource* res_plx_memory; - struct resource* res_irq; /* resource for irq range */ - struct resource* res_drq; /* resource for dma channel */ - void *intr_cookie; -}; - -extern devclass_t ar_devclass; - -int ar_allocate_ioport(device_t device, int rid, u_long size); -int ar_allocate_irq(device_t device, int rid, u_long size); -int ar_allocate_memory(device_t device, int rid, u_long size); -int ar_allocate_plx_memory(device_t device, int rid, u_long size); -int ar_deallocate_resources(device_t device); -int ar_attach(device_t device); -int ar_detach (device_t); - -#endif /* _IF_ARREGS_H_ */ diff --git a/sys/i386/isa/if_sr.c b/sys/i386/isa/if_sr.c deleted file mode 100644 index a52369b..0000000 --- a/sys/i386/isa/if_sr.c +++ /dev/null @@ -1,3365 +0,0 @@ -/* - * Copyright (c) 1996 John Hay. - * Copyright (c) 1996 SDL Communications, Inc. - * 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. Neither the name of the author nor the names of any co-contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY THE AUTHOR 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 AUTHOR 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. - * - * $FreeBSD$ - */ - -/* - * Programming assumptions and other issues. - * - * Only a 16K window will be used. - * - * The descriptors of a DMA channel will fit in a 16K memory window. - * - * The buffers of a transmit DMA channel will fit in a 16K memory window. - * - * When interface is going up, handshaking is set and it is only cleared - * when the interface is down'ed. - * - * There should be a way to set/reset Raw HDLC/PPP, Loopback, DCE/DTE, - * internal/external clock, etc..... - * - */ - -#include "sr.h" -#include "opt_netgraph.h" -#ifdef NETGRAPH -#include <i386/isa/if_sr.h> -#endif /* NETGRAPH */ - -#include <sys/param.h> -#include <sys/systm.h> -#include <sys/kernel.h> -#include <sys/malloc.h> -#include <sys/mbuf.h> -#include <sys/sockio.h> -#include <sys/socket.h> -#include <sys/bus.h> - -#include <net/if.h> -#ifdef NETGRAPH -#include <sys/syslog.h> -#else /* NETGRAPH */ -#include <net/if_sppp.h> - -#include <net/bpf.h> -#endif /* NETGRAPH */ - -#include <machine/md_var.h> - -#include <i386/isa/if_srregs.h> -#include <i386/isa/ic/hd64570.h> -#include <i386/isa/isa_device.h> - -#ifdef NETGRAPH -#include <netgraph/ng_message.h> -#include <netgraph/netgraph.h> -#endif /* NETGRAPH */ -/* #define USE_MODEMCK */ - -#ifndef COMPAT_OLDISA -#error "The sr device requires the old isa compatibility shims" -#endif - -#ifndef BUGGY -#define BUGGY 0 -#endif - -#ifndef NETGRAPH -#define PPP_HEADER_LEN 4 -#endif /* NETGRAPH */ - -/* - * These macros are used to hide the difference between the way the - * ISA N2 cards and the PCI N2 cards access the Hitachi 64570 SCA. - */ -#define SRC_GET8(base,off) (*hc->src_get8)(base,(u_int)&off) -#define SRC_GET16(base,off) (*hc->src_get16)(base,(u_int)&off) -#define SRC_PUT8(base,off,d) (*hc->src_put8)(base,(u_int)&off,d) -#define SRC_PUT16(base,off,d) (*hc->src_put16)(base,(u_int)&off,d) - -/* - * These macros enable/disable the DPRAM and select the correct - * DPRAM page. - */ -#define SRC_GET_WIN(addr) ((addr >> SRC_WIN_SHFT) & SR_PG_MSK) - -#define SRC_SET_ON(iobase) outb(iobase+SR_PCR, \ - SR_PCR_MEM_WIN | inb(iobase+SR_PCR)) -#define SRC_SET_MEM(iobase,win) outb(iobase+SR_PSR, SRC_GET_WIN(win) | \ - (inb(iobase+SR_PSR) & ~SR_PG_MSK)) -#define SRC_SET_OFF(iobase) outb(iobase+SR_PCR, \ - ~SR_PCR_MEM_WIN & inb(iobase+SR_PCR)) - -/* - * Define the hardware (card information) structure needed to keep - * track of the device itself... There is only one per card. - */ -struct sr_hardc { - struct sr_hardc *next; /* PCI card linkage */ - struct sr_softc *sc; /* software channels */ - int cunit; /* card w/in system */ - - u_short iobase; /* I/O Base Address */ - int cardtype; - int numports; /* # of ports on cd */ - int mempages; - u_int memsize; /* DPRAM size: bytes */ - u_int winmsk; - vm_offset_t sca_base; - vm_offset_t mem_pstart; /* start of buffer */ - caddr_t mem_start; /* start of DP RAM */ - caddr_t mem_end; /* end of DP RAM */ - caddr_t plx_base; - - sca_regs *sca; /* register array */ - - /* - * We vectorize the following functions to allow re-use between the - * ISA card's needs and those of the PCI card. - */ - void (*src_put8)(u_int base, u_int off, u_int val); - void (*src_put16)(u_int base, u_int off, u_int val); - u_int (*src_get8)(u_int base, u_int off); - u_int (*src_get16)(u_int base, u_int off); -}; - -static int next_sc_unit = 0; -#ifndef NETGRAPH -static int sr_watcher = 0; -#endif /* NETGRAPH */ -static struct sr_hardc sr_hardc[NSR]; -static struct sr_hardc *sr_hardc_pci; - -/* - * Define the software interface for the card... There is one for - * every channel (port). - */ -struct sr_softc { -#ifndef NETGRAPH - struct sppp ifsppp; /* PPP service w/in system */ -#endif /* NETGRAPH */ - struct sr_hardc *hc; /* card-level information */ - - int unit; /* With regard to all sr devices */ - int subunit; /* With regard to this card */ - - struct buf_block { - u_int txdesc; /* DPRAM offset */ - u_int txstart;/* DPRAM offset */ - u_int txend; /* DPRAM offset */ - u_int txtail; /* # of 1st free gran */ - u_int txmax; /* # of free grans */ - u_int txeda; /* err descr addr */ - } block[SR_TX_BLOCKS]; - - char xmit_busy; /* Transmitter is busy */ - char txb_inuse; /* # of tx grans in use */ - u_int txb_new; /* ndx to new buffer */ - u_int txb_next_tx; /* ndx to next gran rdy tx */ - - u_int rxdesc; /* DPRAM offset */ - u_int rxstart; /* DPRAM offset */ - u_int rxend; /* DPRAM offset */ - u_int rxhind; /* ndx to the hd of rx bufrs */ - u_int rxmax; /* # of avail grans */ - - u_int clk_cfg; /* Clock configuration */ - - int scachan; /* channel # on card */ -#ifdef NETGRAPH - int running; /* something is attached so we are running */ - int dcd; /* do we have dcd? */ - /* ---netgraph bits --- */ - char nodename[NG_NODELEN + 1]; /* store our node name */ - int datahooks; /* number of data hooks attached */ - node_p node; /* netgraph node */ - hook_p hook; /* data hook */ - hook_p debug_hook; - struct ifqueue xmitq_hipri; /* hi-priority transmit queue */ - struct ifqueue xmitq; /* transmit queue */ - int flags; /* state */ -#define SCF_RUNNING 0x01 /* board is active */ -#define SCF_OACTIVE 0x02 /* output is active */ - int out_dog; /* watchdog cycles output count-down */ -#if ( __FreeBSD__ >= 3 ) - struct callout_handle handle; /* timeout(9) handle */ -#endif - u_long inbytes, outbytes; /* stats */ - u_long lastinbytes, lastoutbytes; /* a second ago */ - u_long inrate, outrate; /* highest rate seen */ - u_long inlast; /* last input N secs ago */ - u_long out_deficit; /* output since last input */ - u_long oerrors, ierrors[6]; - u_long opackets, ipackets; -#endif /* NETGRAPH */ -}; - -#ifdef NETGRAPH -#define DOG_HOLDOFF 6 /* dog holds off for 6 secs */ -#define QUITE_A_WHILE 300 /* 5 MINUTES */ -#define LOTS_OF_PACKETS 100 -#endif /* NETGRAPH */ - -/* - * List of valid interrupt numbers for the N2 ISA card. - */ -static int sr_irqtable[16] = { - 0, /* 0 */ - 0, /* 1 */ - 0, /* 2 */ - 1, /* 3 */ - 1, /* 4 */ - 1, /* 5 */ - 0, /* 6 */ - 1, /* 7 */ - 0, /* 8 */ - 0, /* 9 */ - 1, /* 10 */ - 1, /* 11 */ - 1, /* 12 */ - 0, /* 13 */ - 0, /* 14 */ - 1 /* 15 */ -}; - -static int srprobe(struct isa_device *id); -static int srattach_isa(struct isa_device *id); - -struct isa_driver srdriver = { - INTR_TYPE_NET, - srprobe, - srattach_isa, - "sr" -}; -COMPAT_ISA_DRIVER(sr, srdriver); - -/* - * Baud Rate table for Sync Mode. - * Each entry consists of 3 elements: - * Baud Rate (x100) , TMC, BR - * - * Baud Rate = FCLK / TMC / 2^BR - * Baud table for Crystal freq. of 9.8304 Mhz - */ -#ifdef N2_TEST_SPEED -struct rate_line { - int target; /* target rate/100 */ - int tmc_reg; /* TMC register value */ - int br_reg; /* BR (BaudRateClk) selector */ -} n2_rates[] = { - /* Baudx100 TMC BR */ - { 3, 128, 8 }, - { 6, 128, 7 }, - { 12, 128, 6 }, - { 24, 128, 5 }, - { 48, 128, 4 }, - { 96, 128, 3 }, - { 192, 128, 2 }, - { 384, 128, 1 }, - { 560, 88, 1 }, - { 640, 77, 1 }, - { 1280, 38, 1 }, - { 2560, 19, 1 }, - { 5120, 10, 1 }, - { 10000, 5, 1 }, - { 15000, 3, 1 }, - { 25000, 2, 1 }, - { 50000, 1, 1 }, - { 0, 0, 0 } -}; - -int sr_test_speed[] = { - N2_TEST_SPEED, - N2_TEST_SPEED -}; - -int etc0vals[] = { - SR_MCR_ETC0, /* ISA channel 0 */ - SR_MCR_ETC1, /* ISA channel 1 */ - SR_FECR_ETC0, /* PCI channel 0 */ - SR_FECR_ETC1 /* PCI channel 1 */ -}; -#endif - -struct sr_hardc *srattach_pci(int unit, vm_offset_t plx_vaddr, - vm_offset_t sca_vaddr); -void srintr_hc(struct sr_hardc *hc); - -static ointhand2_t srintr; - -static int srattach(struct sr_hardc *hc); -static void sr_xmit(struct sr_softc *sc); -#ifndef NETGRAPH -static void srstart(struct ifnet *ifp); -static int srioctl(struct ifnet *ifp, u_long cmd, caddr_t data); -static void srwatchdog(struct ifnet *ifp); -#else -static void srstart(struct sr_softc *sc); -static void srwatchdog(struct sr_softc *sc); -#endif /* NETGRAPH */ -static int sr_packet_avail(struct sr_softc *sc, int *len, u_char *rxstat); -static void sr_copy_rxbuf(struct mbuf *m, struct sr_softc *sc, int len); -static void sr_eat_packet(struct sr_softc *sc, int single); -static void sr_get_packets(struct sr_softc *sc); - -static void sr_up(struct sr_softc *sc); -static void sr_down(struct sr_softc *sc); -static void src_init(struct sr_hardc *hc); -static void sr_init_sca(struct sr_hardc *hc); -static void sr_init_msci(struct sr_softc *sc); -static void sr_init_rx_dmac(struct sr_softc *sc); -static void sr_init_tx_dmac(struct sr_softc *sc); -static void sr_dmac_intr(struct sr_hardc *hc, u_char isr); -static void sr_msci_intr(struct sr_hardc *hc, u_char isr); -static void sr_timer_intr(struct sr_hardc *hc, u_char isr); -#ifndef NETGRAPH -static void sr_modemck(void *x); -#else -static void sr_modemck(struct sr_softc *x); -#endif /* NETGRAPH */ - -static u_int src_get8_io(u_int base, u_int off); -static u_int src_get16_io(u_int base, u_int off); -static void src_put8_io(u_int base, u_int off, u_int val); -static void src_put16_io(u_int base, u_int off, u_int val); -static u_int src_get8_mem(u_int base, u_int off); -static u_int src_get16_mem(u_int base, u_int off); -static void src_put8_mem(u_int base, u_int off, u_int val); -static void src_put16_mem(u_int base, u_int off, u_int val); - -#ifdef NETGRAPH -static void ngsr_watchdog_frame(void * arg); -static void ngsr_init(void* ignored); - -static ng_constructor_t ngsr_constructor; -static ng_rcvmsg_t ngsr_rcvmsg; -static ng_shutdown_t ngsr_shutdown; -static ng_newhook_t ngsr_newhook; -/*static ng_findhook_t ngsr_findhook; */ -static ng_connect_t ngsr_connect; -static ng_rcvdata_t ngsr_rcvdata; -static ng_disconnect_t ngsr_disconnect; - -static struct ng_type typestruct = { - NG_ABI_VERSION, - NG_SR_NODE_TYPE, - NULL, - ngsr_constructor, - ngsr_rcvmsg, - ngsr_shutdown, - ngsr_newhook, - NULL, - ngsr_connect, - ngsr_rcvdata, - ngsr_disconnect, - NULL -}; - -static int ngsr_done_init = 0; -#endif /* NETGRAPH */ - -/* - * I/O for ISA N2 card(s) - */ -#define SRC_REG(iobase,y) ((((y) & 0xf) + (((y) & 0xf0) << 6) + \ - (iobase)) | 0x8000) - -static u_int -src_get8_io(u_int base, u_int off) -{ - return inb(SRC_REG(base, off)); -} - -static u_int -src_get16_io(u_int base, u_int off) -{ - return inw(SRC_REG(base, off)); -} - -static void -src_put8_io(u_int base, u_int off, u_int val) -{ - outb(SRC_REG(base, off), val); -} - -static void -src_put16_io(u_int base, u_int off, u_int val) -{ - outw(SRC_REG(base, off), val); -} - -/* - * I/O for PCI N2 card(s) - */ -#define SRC_PCI_SCA_REG(y) ((y & 2) ? ((y & 0xfd) + 0x100) : y) - -static u_int -src_get8_mem(u_int base, u_int off) -{ - return *((u_char *)(base + SRC_PCI_SCA_REG(off))); -} - -static u_int -src_get16_mem(u_int base, u_int off) -{ - return *((u_short *)(base + SRC_PCI_SCA_REG(off))); -} - -static void -src_put8_mem(u_int base, u_int off, u_int val) -{ - *((u_char *)(base + SRC_PCI_SCA_REG(off))) = (u_char)val; -} - -static void -src_put16_mem(u_int base, u_int off, u_int val) -{ - *((u_short *)(base + SRC_PCI_SCA_REG(off))) = (u_short)val; -} - -/* - * Probe for an ISA card. If it is there, size its memory. Then get the - * rest of its information and fill it in. - */ -static int -srprobe(struct isa_device *id) -{ - struct sr_hardc *hc = &sr_hardc[id->id_unit]; - u_int pgs, i, tmp; - u_short port; - u_short *smem; - u_char mar; - sca_regs *sca = 0; - - /* - * Now see if the card is realy there. - */ - hc->cardtype = SR_CRD_N2; - - /* - * We have to fill these in early because the SRC_PUT* and SRC_GET* - * macros use them. - */ - hc->src_get8 = src_get8_io; - hc->src_get16 = src_get16_io; - hc->src_put8 = src_put8_io; - hc->src_put16 = src_put16_io; - - hc->sca = 0; - port = id->id_iobase; - hc->numports = NCHAN; /* assumed # of channels on the card */ - - if (id->id_flags & SR_FLAGS_NCHAN_MSK) - hc->numports = id->id_flags & SR_FLAGS_NCHAN_MSK; - - outb(port + SR_PCR, 0); /* turn off the card */ - - /* - * Next, we'll test the Base Address Register to retension of - * data... ... seeing if we're *really* talking to an N2. - */ - for (i = 0; i < 0x100; i++) { - outb(port + SR_BAR, i); - inb(port + SR_PCR); - tmp = inb(port + SR_BAR); - if (tmp != i) { - printf("sr%d: probe failed BAR %x, %x.\n", - id->id_unit, i, tmp); - return 0; - } - } - - /* - * Now see if we can see the SCA. - */ - outb(port + SR_PCR, SR_PCR_SCARUN | inb(port + SR_PCR)); - SRC_PUT8(port, sca->wcrl, 0); - SRC_PUT8(port, sca->wcrm, 0); - SRC_PUT8(port, sca->wcrh, 0); - SRC_PUT8(port, sca->pcr, 0); - SRC_PUT8(port, sca->msci[0].tmc, 0); - inb(port); - - tmp = SRC_GET8(port, sca->msci[0].tmc); - if (tmp != 0) { - printf("sr%d: Error reading SCA 0, %x\n", id->id_unit, tmp); - return 0; - } - SRC_PUT8(port, sca->msci[0].tmc, 0x5A); - inb(port); - - tmp = SRC_GET8(port, sca->msci[0].tmc); - if (tmp != 0x5A) { - printf("sr%d: Error reading SCA 0x5A, %x\n", id->id_unit, tmp); - return 0; - } - SRC_PUT16(port, sca->dmac[0].cda, 0); - inb(port); - - tmp = SRC_GET16(port, sca->dmac[0].cda); - if (tmp != 0) { - printf("sr%d: Error reading SCA 0, %x\n", id->id_unit, tmp); - return 0; - } - SRC_PUT16(port, sca->dmac[0].cda, 0x55AA); - inb(port); - - tmp = SRC_GET16(port, sca->dmac[0].cda); - if (tmp != 0x55AA) { - printf("sr%d: Error reading SCA 0x55AA, %x\n", - id->id_unit, tmp); - return 0; - } - /* - * OK, the board's interface registers seem to work. Now we'll see - * if the Dual-Ported RAM is fully accessible... - */ - outb(port + SR_PCR, SR_PCR_EN_VPM | SR_PCR_ISA16); - outb(port + SR_PSR, SR_PSR_WIN_16K); - - /* - * Take the kernel "virtual" address supplied to us and convert - * it to a "real" address. Then program the card to use that. - */ - mar = (kvtop(id->id_maddr) >> 16) & SR_PCR_16M_SEL; - outb(port + SR_PCR, mar | inb(port + SR_PCR)); - mar = kvtop(id->id_maddr) >> 12; - outb(port + SR_BAR, mar); - outb(port + SR_PCR, inb(port + SR_PCR) | SR_PCR_MEM_WIN); - smem = (u_short *)id->id_maddr; /* DP RAM Address */ - - /* - * Here we will perform the memory scan to size the device. - * - * This is done by marking each potential page with a magic number. - * We then loop through the pages looking for that magic number. As - * soon as we no longer see that magic number, we'll quit the scan, - * knowing that no more memory is present. This provides the number - * of pages present on the card. - * - * Note: We're sizing 16K memory granules. - */ - for (i = 0; i <= SR_PSR_PG_SEL; i++) { - outb(port + SR_PSR, - (inb(port + SR_PSR) & ~SR_PSR_PG_SEL) | i); - - *smem = 0xAA55; - } - - for (i = 0; i <= SR_PSR_PG_SEL; i++) { - outb(port + SR_PSR, - (inb(port + SR_PSR) & ~SR_PSR_PG_SEL) | i); - - if (*smem != 0xAA55) { - /* - * If we have less than 64k of memory, give up. That - * is 4 x 16k pages. - */ - if (i < 4) { - printf("sr%d: Bad mem page %d, mem %x, %x.\n", - id->id_unit, i, 0xAA55, *smem); - return 0; - } - break; - } - *smem = i; - } - - hc->mempages = i; - hc->memsize = i * SRC_WIN_SIZ; - hc->winmsk = SRC_WIN_MSK; - pgs = i; /* final count of 16K pages */ - - /* - * This next loop erases the contents of that page in DPRAM - */ - for (i = 0; i <= pgs; i++) { - outb(port + SR_PSR, - (inb(port + SR_PSR) & ~SR_PSR_PG_SEL) | i); - bzero(smem, SRC_WIN_SIZ); - } - - SRC_SET_OFF(port); - - /* - * We have a card here, fill in what we can. - */ - id->id_msize = SRC_WIN_SIZ; - hc->iobase = id->id_iobase; - hc->sca_base = id->id_iobase; - hc->mem_start = id->id_maddr; - hc->mem_end = (id->id_maddr + id->id_msize) - 1; - hc->mem_pstart = 0; - hc->cunit = id->id_unit; - - /* - * Do a little sanity check. - */ - if (sr_irqtable[ffs(id->id_irq) - 1] == 0) - printf("sr%d: Warning: illegal interrupt %d chosen.\n", - id->id_unit, ffs(id->id_irq) - 1); - - /* - * Bogus card configuration - */ - if ((hc->numports > NCHAN) /* only 2 ports/card */ - ||(hc->memsize > (512 * 1024))) /* no more than 256K */ - return 0; - - return SRC_IO_SIZ; /* return the amount of IO addresses used. */ -} - -/* - * srattach_isa and srattach_pci allocate memory for hardc, softc and - * data buffers. It also does any initialization that is bus specific. - * At the end they call the common srattach() function. - */ -static int -srattach_isa(struct isa_device *id) -{ - u_char mar; - struct sr_hardc *hc = &sr_hardc[id->id_unit]; - - /* - * Allocate the software interface table(s) - */ - MALLOC(hc->sc, struct sr_softc *, - hc->numports * sizeof(struct sr_softc), - M_DEVBUF, M_WAITOK | M_ZERO); - if (hc->sc == NULL) - return(0); - - id->id_ointr = srintr; - - outb(hc->iobase + SR_PCR, inb(hc->iobase + SR_PCR) | SR_PCR_SCARUN); - outb(hc->iobase + SR_PSR, inb(hc->iobase + SR_PSR) | SR_PSR_EN_SCA_DMA); - outb(hc->iobase + SR_MCR, - SR_MCR_DTR0 | SR_MCR_DTR1 | SR_MCR_TE0 | SR_MCR_TE1); - - SRC_SET_ON(hc->iobase); - - /* - * Configure the card. Mem address, irq, - */ - mar = (kvtop(id->id_maddr) >> 16) & SR_PCR_16M_SEL; - outb(hc->iobase + SR_PCR, - mar | (inb(hc->iobase + SR_PCR) & ~SR_PCR_16M_SEL)); - mar = kvtop(id->id_maddr) >> 12; - outb(hc->iobase + SR_BAR, mar); - - /* - * Get the TX clock direction and configuration. The default is a - * single external clock which is used by RX and TX. - */ -#ifdef N2_TEST_SPEED - if (sr_test_speed[0] > 0) - hc->sc[0].clk_cfg = SR_FLAGS_INT_CLK; - else if (id->id_flags & SR_FLAGS_0_CLK_MSK) - hc->sc[0].clk_cfg = - (id->id_flags & SR_FLAGS_0_CLK_MSK) - >> SR_FLAGS_CLK_SHFT; -#else - if (id->id_flags & SR_FLAGS_0_CLK_MSK) - hc->sc[0].clk_cfg = - (id->id_flags & SR_FLAGS_0_CLK_MSK) - >> SR_FLAGS_CLK_SHFT; -#endif - - if (hc->numports == 2) -#ifdef N2_TEST_SPEED - if (sr_test_speed[1] > 0) - hc->sc[0].clk_cfg = SR_FLAGS_INT_CLK; - else -#endif - if (id->id_flags & SR_FLAGS_1_CLK_MSK) - hc->sc[1].clk_cfg = (id->id_flags & SR_FLAGS_1_CLK_MSK) - >> (SR_FLAGS_CLK_SHFT + SR_FLAGS_CLK_CHAN_SHFT); - - return srattach(hc); -} - -struct sr_hardc * -srattach_pci(int unit, vm_offset_t plx_vaddr, vm_offset_t sca_vaddr) -{ - int numports, pndx; - u_int fecr, *fecrp = (u_int *)(sca_vaddr + SR_FECR); - struct sr_hardc *hc, **hcp; - - /* - * Configure the PLX. This is magic. I'm doing it just like I'm told - * to. :-) - * - * offset - * 0x00 - Map Range - Mem-mapped to locate anywhere - * 0x04 - Re-Map - PCI address decode enable - * 0x18 - Bus Region - 32-bit bus, ready enable - * 0x1c - Master Range - include all 16 MB - * 0x20 - Master RAM - Map SCA Base at 0 - * 0x28 - Master Remap - direct master memory enable - * 0x68 - Interrupt - Enable interrupt (0 to disable) - * - * Note: This is "cargo cult" stuff. - jrc - */ - *((u_int *)(plx_vaddr + 0x00)) = 0xfffff000; - *((u_int *)(plx_vaddr + 0x04)) = 1; - *((u_int *)(plx_vaddr + 0x18)) = 0x40030043; - *((u_int *)(plx_vaddr + 0x1c)) = 0xff000000; - *((u_int *)(plx_vaddr + 0x20)) = 0; - *((u_int *)(plx_vaddr + 0x28)) = 0xe9; - *((u_int *)(plx_vaddr + 0x68)) = 0x10900; - - /* - * Get info from card. - * - * Only look for the second port if the first exists. Too many things - * will break if we have only a second port. - */ - fecr = *fecrp; - numports = 0; - - if (((fecr & SR_FECR_ID0) >> SR_FE_ID0_SHFT) != SR_FE_ID_NONE) { - numports++; - if (((fecr & SR_FECR_ID1) >> SR_FE_ID1_SHFT) != SR_FE_ID_NONE) - numports++; - } - if (numports == 0) - return NULL; - - hc = sr_hardc_pci; - hcp = &sr_hardc_pci; - - while (hc) { - hcp = &hc->next; - hc = hc->next; - } - - MALLOC(hc, struct sr_hardc *, sizeof(*hc), M_DEVBUF, M_WAITOK | M_ZERO); - if (hc == NULL) - return NULL; - - MALLOC(hc->sc, struct sr_softc *, numports * sizeof(struct sr_softc), - M_DEVBUF, M_WAITOK | M_ZERO); - if (hc->sc == NULL) { - FREE(hc, M_DEVBUF); - return NULL; - } - *hcp = hc; - - hc->numports = numports; - hc->cunit = unit; - hc->cardtype = SR_CRD_N2PCI; - hc->plx_base = (caddr_t)plx_vaddr; - hc->sca_base = sca_vaddr; - - hc->src_put8 = src_put8_mem; - hc->src_put16 = src_put16_mem; - hc->src_get8 = src_get8_mem; - hc->src_get16 = src_get16_mem; - - /* - * Malloc area for tx and rx buffers. For now allocate SRC_WIN_SIZ - * (16k) for each buffer. - * - * Allocate the block below 16M because the N2pci card can only access - * 16M memory at a time. - * - * (We could actually allocate a contiguous block above the 16MB limit, - * but this would complicate card programming more than we want to - * right now -jrc) - */ - hc->memsize = 2 * hc->numports * SRC_WIN_SIZ; - hc->mem_start = contigmalloc(hc->memsize, - M_DEVBUF, - M_NOWAIT, - 0ul, - 0xfffffful, - 0x10000, - 0x1000000); - - if (hc->mem_start == NULL) { - printf("src%d: pci: failed to allocate buffer space.\n", unit); - return NULL; - } - hc->winmsk = 0xffffffff; - hc->mem_end = (caddr_t)((u_int)hc->mem_start + hc->memsize); - hc->mem_pstart = kvtop(hc->mem_start); - bzero(hc->mem_start, hc->memsize); - - for (pndx = 0; pndx < numports; pndx++) { - int intf_sw; - struct sr_softc *sc; - - sc = &hc->sc[pndx]; - - switch (pndx) { - case 1: - intf_sw = fecr & SR_FECR_ID1 >> SR_FE_ID1_SHFT; - break; - case 0: - default: - intf_sw = fecr & SR_FECR_ID0 >> SR_FE_ID0_SHFT; - } - -#ifdef N2_TEST_SPEED - if (sr_test_speed[pndx] > 0) - sc->clk_cfg = SR_FLAGS_INT_CLK; - else -#endif - switch (intf_sw) { - default: - case SR_FE_ID_RS232: - case SR_FE_ID_HSSI: - case SR_FE_ID_RS422: - case SR_FE_ID_TEST: - break; - - case SR_FE_ID_V35: - sc->clk_cfg = SR_FLAGS_EXT_SEP_CLK; - break; - - case SR_FE_ID_X21: - sc->clk_cfg = SR_FLAGS_EXT_CLK; - break; - } - } - - *fecrp = SR_FECR_DTR0 - | SR_FECR_DTR1 - | SR_FECR_TE0 - | SR_FECR_TE1; - - srattach(hc); - - return hc; -} - -/* - * Register the ports on the adapter. - * Fill in the info for each port. -#ifndef NETGRAPH - * Attach each port to sppp and bpf. -#endif - */ -static int -srattach(struct sr_hardc *hc) -{ - struct sr_softc *sc = hc->sc; -#ifndef NETGRAPH - struct ifnet *ifp; -#endif /* NETGRAPH */ - int unit; /* index: channel w/in card */ - - /* - * Report Card configuration information before we start configuring - * each channel on the card... - */ - printf("src%d: %uK RAM (%d mempages) @ %08x-%08x, %u ports.\n", - hc->cunit, hc->memsize / 1024, hc->mempages, - (u_int)hc->mem_start, (u_int)hc->mem_end, hc->numports); - - src_init(hc); - sr_init_sca(hc); - - /* - * Now configure each port on the card. - */ - for (unit = 0; unit < hc->numports; sc++, unit++) { - sc->hc = hc; - sc->subunit = unit; - sc->unit = next_sc_unit; - next_sc_unit++; - sc->scachan = unit % NCHAN; - - sr_init_rx_dmac(sc); - sr_init_tx_dmac(sc); - sr_init_msci(sc); - - printf("sr%d: Adapter %d, port %d.\n", - sc->unit, hc->cunit, sc->subunit); - -#ifndef NETGRAPH - ifp = &sc->ifsppp.pp_if; - ifp->if_softc = sc; - ifp->if_unit = sc->unit; - ifp->if_name = "sr"; - ifp->if_mtu = PP_MTU; - ifp->if_flags = IFF_POINTOPOINT | IFF_MULTICAST; - ifp->if_ioctl = srioctl; - ifp->if_start = srstart; - ifp->if_watchdog = srwatchdog; - - sc->ifsppp.pp_flags = PP_KEEPALIVE; - sppp_attach((struct ifnet *)&sc->ifsppp); - if_attach(ifp); - - bpfattach(ifp, DLT_PPP, PPP_HEADER_LEN); -#else /* NETGRAPH */ - /* - * we have found a node, make sure our 'type' is availabe. - */ - if (ngsr_done_init == 0) ngsr_init(NULL); - if (ng_make_node_common(&typestruct, &sc->node) != 0) - return (0); - sprintf(sc->nodename, "%s%d", NG_SR_NODE_TYPE, sc->unit); - if (ng_name_node(sc->node, sc->nodename)) { - NG_NODE_UNREF(sc->node); /* make it go away again */ - return (0); - } - NG_NODE_SET_PRIVATE(sc->node, sc); - callout_handle_init(&sc->handle); - sc->xmitq.ifq_maxlen = IFQ_MAXLEN; - sc->xmitq_hipri.ifq_maxlen = IFQ_MAXLEN; - mtx_init(&sc->xmitq.ifq_mtx, "sr_xmitq", MTX_DEF); - mtx_init(&sc->xmitq_hipri.ifq_mtx, "sr_xmitq_hipri", MTX_DEF); - sc->running = 0; -#endif /* NETGRAPH */ - } - - if (hc->mempages) - SRC_SET_OFF(hc->iobase); - - return 1; -} - -/* - * N2 Interrupt Service Routine - * - * First figure out which SCA gave the interrupt. - * Process it. - * See if there is other interrupts pending. - * Repeat until there no interrupts remain. - */ -static void -srintr(int unit) -{ - struct sr_hardc *hc; - - hc = &sr_hardc[unit]; - srintr_hc(hc); - - return; -} - -void -srintr_hc(struct sr_hardc *hc) -{ - sca_regs *sca = hc->sca; /* MSCI register tree */ - u_char isr0, isr1, isr2; /* interrupt statii captured */ - -#if BUGGY > 1 - printf("sr: srintr_hc(hc=%08x)\n", hc); -#endif - - /* - * Since multiple interfaces may share this interrupt, we must loop - * until no interrupts are still pending service. - */ - while (1) { - /* - * Read all three interrupt status registers from the N2 - * card... - */ - isr0 = SRC_GET8(hc->sca_base, sca->isr0); - isr1 = SRC_GET8(hc->sca_base, sca->isr1); - isr2 = SRC_GET8(hc->sca_base, sca->isr2); - - /* - * If all three registers returned 0, we've finished - * processing interrupts from this device, so we can quit - * this loop... - */ - if ((isr0 | isr1 | isr2) == 0) - break; - -#if BUGGY > 2 - printf("src%d: srintr_hc isr0 %x, isr1 %x, isr2 %x\n", -#ifndef NETGRAPH - unit, isr0, isr1, isr2); -#else - hc->cunit, isr0, isr1, isr2); -#endif /* NETGRAPH */ -#endif - - /* - * Now we can dispatch the interrupts. Since we don't expect - * either MSCI or timer interrupts, we'll test for DMA - * interrupts first... - */ - if (isr1) /* DMA-initiated interrupt */ - sr_dmac_intr(hc, isr1); - - if (isr0) /* serial part IRQ? */ - sr_msci_intr(hc, isr0); - - if (isr2) /* timer-initiated interrupt */ - sr_timer_intr(hc, isr2); - } -} - -/* - * This will only start the transmitter. It is assumed that the data - * is already there. - * It is normally called from srstart() or sr_dmac_intr(). - */ -static void -sr_xmit(struct sr_softc *sc) -{ - u_short cda_value; /* starting descriptor */ - u_short eda_value; /* ending descriptor */ - struct sr_hardc *hc; -#ifndef NETGRAPH - struct ifnet *ifp; /* O/S Network Services */ -#endif /* NETGRAPH */ - dmac_channel *dmac; /* DMA channel registers */ - -#if BUGGY > 0 - printf("sr: sr_xmit( sc=%08x)\n", sc); -#endif - - hc = sc->hc; -#ifndef NETGRAPH - ifp = &sc->ifsppp.pp_if; -#endif /* NETGRAPH */ - dmac = &hc->sca->dmac[DMAC_TXCH(sc->scachan)]; - - /* - * Get the starting and ending addresses of the chain to be - * transmitted and pass these on to the DMA engine on-chip. - */ - cda_value = sc->block[sc->txb_next_tx].txdesc + hc->mem_pstart; - cda_value &= 0x00ffff; - eda_value = sc->block[sc->txb_next_tx].txeda + hc->mem_pstart; - eda_value &= 0x00ffff; - - SRC_PUT16(hc->sca_base, dmac->cda, cda_value); - SRC_PUT16(hc->sca_base, dmac->eda, eda_value); - - /* - * Now we'll let the DMA status register know about this change - */ - SRC_PUT8(hc->sca_base, dmac->dsr, SCA_DSR_DE); - - sc->xmit_busy = 1; /* mark transmitter busy */ - -#if BUGGY > 2 - printf("sr%d: XMIT cda=%04x, eda=%4x, rcda=%08lx\n", - sc->unit, cda_value, eda_value, - sc->block[sc->txb_next_tx].txdesc + hc->mem_pstart); -#endif - - sc->txb_next_tx++; /* update next transmit seq# */ - - if (sc->txb_next_tx == SR_TX_BLOCKS) /* handle wrap... */ - sc->txb_next_tx = 0; - -#ifndef NETGRAPH - /* - * Finally, we'll set a timout (which will start srwatchdog()) - * within the O/S network services layer... - */ - ifp->if_timer = 2; /* Value in seconds. */ -#else - /* - * Don't time out for a while. - */ - sc->out_dog = DOG_HOLDOFF; /* give ourself some breathing space*/ -#endif /* NETGRAPH */ -} - -/* - * This function will be called from the upper level when a user add a - * packet to be send, and from the interrupt handler after a finished - * transmit. - * - * NOTE: it should run at spl_imp(). - * - * This function only place the data in the oncard buffers. It does not - * start the transmition. sr_xmit() does that. - * - * Transmitter idle state is indicated by the IFF_OACTIVE flag. - * The function that clears that should ensure that the transmitter - * and its DMA is in a "good" idle state. - */ -#ifndef NETGRAPH -static void -srstart(struct ifnet *ifp) -{ - struct sr_softc *sc; /* channel control structure */ -#else -static void -srstart(struct sr_softc *sc) -{ -#endif /* NETGRAPH */ - struct sr_hardc *hc; /* card control/config block */ - int len; /* total length of a packet */ - int pkts; /* packets placed in DPRAM */ - int tlen; /* working length of pkt */ - u_int i; - struct mbuf *mtx; /* message buffer from O/S */ - u_char *txdata; /* buffer address in DPRAM */ - sca_descriptor *txdesc; /* working descriptor pointr */ - struct buf_block *blkp; - -#ifndef NETGRAPH -#if BUGGY > 0 - printf("sr: srstart( ifp=%08x)\n", ifp); -#endif - sc = ifp->if_softc; - if ((ifp->if_flags & IFF_RUNNING) == 0) - return; -#endif /* NETGRAPH */ - hc = sc->hc; - /* - * It is OK to set the memory window outside the loop because all tx - * buffers and descriptors are assumed to be in the same 16K window. - */ - if (hc->mempages) { - SRC_SET_ON(hc->iobase); - SRC_SET_MEM(hc->iobase, sc->block[0].txdesc); - } - - /* - * Loop to place packets into DPRAM. - * - * We stay in this loop until there is nothing in - * the TX queue left or the tx buffers are full. - */ -top_srstart: - - /* - * See if we have space for more packets. - */ - if (sc->txb_inuse == SR_TX_BLOCKS) { /* out of space? */ -#ifndef NETGRAPH - ifp->if_flags |= IFF_OACTIVE; /* yes, mark active */ -#else - /*ifp->if_flags |= IFF_OACTIVE;*/ /* yes, mark active */ -#endif /* NETGRAPH */ - - if (hc->mempages) - SRC_SET_OFF(hc->iobase); - -#if BUGGY > 9 - printf("sr%d.srstart: sc->txb_inuse=%d; DPRAM full...\n", - sc->unit, sc->txb_inuse); -#endif - return; - } - /* - * OK, the card can take more traffic. Let's see if there's any - * pending from the system... - * - * NOTE: - * The architecture of the networking interface doesn't - * actually call us like 'write()', providing an address. We get - * started, a lot like a disk strategy routine, and we actually call - * back out to the system to get traffic to send... - * - * NOTE: - * If we were gonna run through another layer, we would use a - * dispatch table to select the service we're getting a packet - * from... - */ -#ifndef NETGRAPH - mtx = sppp_dequeue(ifp); -#else /* NETGRAPH */ - IF_DEQUEUE(&sc->xmitq_hipri, mtx); - if (mtx == NULL) { - IF_DEQUEUE(&sc->xmitq, mtx); - } -#endif /* NETGRAPH */ - if (!mtx) { - if (hc->mempages) - SRC_SET_OFF(hc->iobase); - return; - } - /* - * OK, we got a packet from the network services of the O/S. Now we - * can move it into the DPRAM (under control of the descriptors) and - * fire it off... - */ - pkts = 0; - i = 0; /* counts # of granules used */ - - blkp = &sc->block[sc->txb_new]; /* address of free granule */ - txdesc = (sca_descriptor *) - (hc->mem_start + (blkp->txdesc & hc->winmsk)); - - txdata = (u_char *)(hc->mem_start - + (blkp->txstart & hc->winmsk)); - - /* - * Now we'll try to install as many packets as possible into the - * card's DP RAM buffers. - */ - for (;;) { /* perform actual copy of packet */ - len = mtx->m_pkthdr.len; /* length of message */ - -#if BUGGY > 1 - printf("sr%d.srstart: mbuf @ %08lx, %d bytes\n", - sc->unit, mtx, len); -#endif - -#ifndef NETGRAPH - if (ifp->if_bpf) - bpf_mtap(ifp, mtx); -#else /* NETGRAPH */ - sc->outbytes += len; -#endif /* NETGRAPH */ - - /* - * We can perform a straight copy because the tranmit - * buffers won't wrap. - */ - m_copydata(mtx, 0, len, txdata); - - /* - * Now we know how big the message is gonna be. We must now - * construct the descriptors to drive this message out... - */ - tlen = len; - while (tlen > SR_BUF_SIZ) { /* loop for full granules */ - txdesc->stat = 0; /* reset bits */ - txdesc->len = SR_BUF_SIZ; /* size of granule */ - tlen -= SR_BUF_SIZ; - - txdesc++; /* move to next dscr */ - txdata += SR_BUF_SIZ; /* adjust data addr */ - i++; - } - - /* - * This section handles the setting of the final piece of a - * message. - */ - txdesc->stat = SCA_DESC_EOM; - txdesc->len = tlen; - pkts++; - - /* - * prepare for subsequent packets (if any) - */ - txdesc++; - txdata += SR_BUF_SIZ; /* next mem granule */ - i++; /* count of granules */ - - /* - * OK, we've now placed the message into the DPRAM where it - * can be transmitted. We'll now release the message memory - * and update the statistics... - */ - m_freem(mtx); -#ifndef NETGRAPH - ++sc->ifsppp.pp_if.if_opackets; -#else /* NETGRAPH */ - sc->opackets++; -#endif /* NETGRAPH */ - - /* - * Check if we have space for another packet. XXX This is - * hardcoded. A packet can't be larger than 3 buffers (3 x - * 512). - */ - if ((i + 3) >= blkp->txmax) { /* enough remains? */ -#if BUGGY > 9 - printf("sr%d.srstart: i=%d (%d pkts); card full.\n", - sc->unit, i, pkts); -#endif - break; - } - /* - * We'll pull the next message to be sent (if any) - */ -#ifndef NETGRAPH - mtx = sppp_dequeue(ifp); -#else /* NETGRAPH */ - IF_DEQUEUE(&sc->xmitq_hipri, mtx); - if (mtx == NULL) { - IF_DEQUEUE(&sc->xmitq, mtx); - } -#endif /* NETGRAPH */ - if (!mtx) { /* no message? We're done! */ -#if BUGGY > 9 - printf("sr%d.srstart: pending=0, pkts=%d\n", - sc->unit, pkts); -#endif - break; - } - } - - blkp->txtail = i; /* record next free granule */ - - /* - * Mark the last descriptor, so that the SCA know where to stop. - */ - txdesc--; /* back up to last descriptor in list */ - txdesc->stat |= SCA_DESC_EOT; /* mark as end of list */ - - /* - * Now we'll reset the transmit granule's descriptor address so we - * can record this in the structure and fire it off w/ the DMA - * processor of the serial chip... - */ - txdesc = (sca_descriptor *)blkp->txdesc; - blkp->txeda = (u_short)((u_int)&txdesc[i]); - - sc->txb_inuse++; /* update inuse status */ - sc->txb_new++; /* new traffic wuz added */ - - if (sc->txb_new == SR_TX_BLOCKS) - sc->txb_new = 0; - - /* - * If the tranmitter wasn't marked as "busy" we will force it to be - * started... - */ - if (sc->xmit_busy == 0) { - sr_xmit(sc); -#if BUGGY > 9 - printf("sr%d.srstart: called sr_xmit()\n", sc->unit); -#endif - } - goto top_srstart; -} - -#ifndef NETGRAPH -/* - * Handle ioctl's at the device level, though we *will* call up - * a layer... - */ -#if BUGGY > 2 -static int bug_splats[] = {0, 0, 0, 0, 0, 0, 0, 0}; -#endif - -static int -srioctl(struct ifnet *ifp, u_long cmd, caddr_t data) -{ - int s, error, was_up, should_be_up; - struct sr_softc *sc = ifp->if_softc; - -#if BUGGY > 0 - printf("sr%d: srioctl(ifp=%08x, cmd=%08x, data=%08x)\n", - ifp->if_unit, ifp, cmd, data); -#endif - - was_up = ifp->if_flags & IFF_RUNNING; - - error = sppp_ioctl(ifp, cmd, data); - -#if BUGGY > 1 - printf("sr%d: ioctl: ifsppp.pp_flags = %08x, if_flags %08x.\n", - ifp->if_unit, ((struct sppp *)ifp)->pp_flags, ifp->if_flags); -#endif - - if (error) - return error; - - if ((cmd != SIOCSIFFLAGS) && (cmd != SIOCSIFADDR)) { -#if BUGGY > 2 - if (bug_splats[sc->unit]++ < 2) { - printf("sr(%d).if_addrlist = %08x\n", - sc->unit, ifp->if_addrlist); - printf("sr(%d).if_bpf = %08x\n", - sc->unit, ifp->if_bpf); - printf("sr(%d).if_init = %08x\n", - sc->unit, ifp->if_init); - printf("sr(%d).if_output = %08x\n", - sc->unit, ifp->if_output); - printf("sr(%d).if_start = %08x\n", - sc->unit, ifp->if_start); - printf("sr(%d).if_done = %08x\n", - sc->unit, ifp->if_done); - printf("sr(%d).if_ioctl = %08x\n", - sc->unit, ifp->if_ioctl); - printf("sr(%d).if_reset = %08x\n", - sc->unit, ifp->if_reset); - printf("sr(%d).if_watchdog = %08x\n", - sc->unit, ifp->if_watchdog); - } -#endif - return 0; - } - - s = splimp(); - should_be_up = ifp->if_flags & IFF_RUNNING; - - if (!was_up && should_be_up) { - /* - * Interface should be up -- start it. - */ - sr_up(sc); - srstart(ifp); - - /* - * XXX Clear the IFF_UP flag so that the link will only go - * up after sppp lcp and ipcp negotiation. - */ - /* ifp->if_flags &= ~IFF_UP; */ - } else if (was_up && !should_be_up) { - /* - * Interface should be down -- stop it. - */ - sr_down(sc); - sppp_flush(ifp); - } - splx(s); - return 0; -} -#endif /* NETGRAPH */ - -/* - * This is to catch lost tx interrupts. - */ -static void -#ifndef NETGRAPH -srwatchdog(struct ifnet *ifp) -#else -srwatchdog(struct sr_softc *sc) -#endif /* NETGRAPH */ -{ - int got_st0, got_st1, got_st3, got_dsr; -#ifndef NETGRAPH - struct sr_softc *sc = ifp->if_softc; -#endif /* NETGRAPH */ - struct sr_hardc *hc = sc->hc; - msci_channel *msci = &hc->sca->msci[sc->scachan]; - dmac_channel *dmac = &sc->hc->sca->dmac[sc->scachan]; - -#if BUGGY > 0 -#ifndef NETGRAPH - printf("srwatchdog(unit=%d)\n", unit); -#else - printf("srwatchdog(unit=%d)\n", sc->unit); -#endif /* NETGRAPH */ -#endif - -#ifndef NETGRAPH - if (!(ifp->if_flags & IFF_RUNNING)) - return; - - ifp->if_oerrors++; /* update output error count */ -#else /* NETGRAPH */ - sc->oerrors++; /* update output error count */ -#endif /* NETGRAPH */ - - got_st0 = SRC_GET8(hc->sca_base, msci->st0); - got_st1 = SRC_GET8(hc->sca_base, msci->st1); - got_st3 = SRC_GET8(hc->sca_base, msci->st3); - got_dsr = SRC_GET8(hc->sca_base, dmac->dsr); - -#ifndef NETGRAPH -#if 0 - if (ifp->if_flags & IFF_DEBUG) -#endif - printf("sr%d: transmit failed, " -#else /* NETGRAPH */ - printf("sr%d: transmit failed, " -#endif /* NETGRAPH */ - "ST0 %02x, ST1 %02x, ST3 %02x, DSR %02x.\n", - sc->unit, - got_st0, got_st1, got_st3, got_dsr); - - if (SRC_GET8(hc->sca_base, msci->st1) & SCA_ST1_UDRN) { - SRC_PUT8(hc->sca_base, msci->cmd, SCA_CMD_TXABORT); - SRC_PUT8(hc->sca_base, msci->cmd, SCA_CMD_TXENABLE); - SRC_PUT8(hc->sca_base, msci->st1, SCA_ST1_UDRN); - } - sc->xmit_busy = 0; -#ifndef NETGRAPH - ifp->if_flags &= ~IFF_OACTIVE; -#else - /*ifp->if_flags &= ~IFF_OACTIVE; */ -#endif /* NETGRAPH */ - - if (sc->txb_inuse && --sc->txb_inuse) - sr_xmit(sc); - -#ifndef NETGRAPH - srstart(ifp); /* restart transmitter */ -#else - srstart(sc); /* restart transmitter */ -#endif /* NETGRAPH */ -} - -static void -sr_up(struct sr_softc *sc) -{ - u_int *fecrp; - struct sr_hardc *hc = sc->hc; - sca_regs *sca = hc->sca; - msci_channel *msci = &sca->msci[sc->scachan]; - -#if BUGGY > 0 - printf("sr_up(sc=%08x)\n", sc); -#endif - - /* - * Enable transmitter and receiver. Raise DTR and RTS. Enable - * interrupts. - * - * XXX What about using AUTO mode in msci->md0 ??? - */ - SRC_PUT8(hc->sca_base, msci->ctl, - SRC_GET8(hc->sca_base, msci->ctl) & ~SCA_CTL_RTS); - - if (sc->scachan == 0) - switch (hc->cardtype) { - case SR_CRD_N2: - outb(hc->iobase + SR_MCR, - (inb(hc->iobase + SR_MCR) & ~SR_MCR_DTR0)); - break; - case SR_CRD_N2PCI: - fecrp = (u_int *)(hc->sca_base + SR_FECR); - *fecrp &= ~SR_FECR_DTR0; - break; - } - else - switch (hc->cardtype) { - case SR_CRD_N2: - outb(hc->iobase + SR_MCR, - (inb(hc->iobase + SR_MCR) & ~SR_MCR_DTR1)); - break; - case SR_CRD_N2PCI: - fecrp = (u_int *)(hc->sca_base + SR_FECR); - *fecrp &= ~SR_FECR_DTR1; - break; - } - - if (sc->scachan == 0) { - SRC_PUT8(hc->sca_base, sca->ier0, - SRC_GET8(hc->sca_base, sca->ier0) | 0x000F); - SRC_PUT8(hc->sca_base, sca->ier1, - SRC_GET8(hc->sca_base, sca->ier1) | 0x000F); - } else { - SRC_PUT8(hc->sca_base, sca->ier0, - SRC_GET8(hc->sca_base, sca->ier0) | 0x00F0); - SRC_PUT8(hc->sca_base, sca->ier1, - SRC_GET8(hc->sca_base, sca->ier1) | 0x00F0); - } - - SRC_PUT8(hc->sca_base, msci->cmd, SCA_CMD_RXENABLE); - inb(hc->iobase); /* XXX slow it down a bit. */ - SRC_PUT8(hc->sca_base, msci->cmd, SCA_CMD_TXENABLE); - -#ifndef NETGRAPH -#ifdef USE_MODEMCK - if (sr_watcher == 0) - sr_modemck(NULL); -#endif -#else /* NETGRAPH */ - untimeout(ngsr_watchdog_frame, sc, sc->handle); - sc->handle = timeout(ngsr_watchdog_frame, sc, hz); - sc->running = 1; -#endif /* NETGRAPH */ -} - -static void -sr_down(struct sr_softc *sc) -{ - u_int *fecrp; - struct sr_hardc *hc = sc->hc; - sca_regs *sca = hc->sca; - msci_channel *msci = &sca->msci[sc->scachan]; - -#if BUGGY > 0 - printf("sr_down(sc=%08x)\n", sc); -#endif -#ifdef NETGRAPH - untimeout(ngsr_watchdog_frame, sc, sc->handle); - sc->running = 0; -#endif /* NETGRAPH */ - - /* - * Disable transmitter and receiver. Lower DTR and RTS. Disable - * interrupts. - */ - SRC_PUT8(hc->sca_base, msci->cmd, SCA_CMD_RXDISABLE); - inb(hc->iobase); /* XXX slow it down a bit. */ - SRC_PUT8(hc->sca_base, msci->cmd, SCA_CMD_TXDISABLE); - - SRC_PUT8(hc->sca_base, msci->ctl, - SRC_GET8(hc->sca_base, msci->ctl) | SCA_CTL_RTS); - - if (sc->scachan == 0) - switch (hc->cardtype) { - case SR_CRD_N2: - outb(hc->iobase + SR_MCR, - (inb(hc->iobase + SR_MCR) | SR_MCR_DTR0)); - break; - case SR_CRD_N2PCI: - fecrp = (u_int *)(hc->sca_base + SR_FECR); - *fecrp |= SR_FECR_DTR0; - break; - } - else - switch (hc->cardtype) { - case SR_CRD_N2: - outb(hc->iobase + SR_MCR, - (inb(hc->iobase + SR_MCR) | SR_MCR_DTR1)); - break; - case SR_CRD_N2PCI: - fecrp = (u_int *)(hc->sca_base + SR_FECR); - *fecrp |= SR_FECR_DTR1; - break; - } - - if (sc->scachan == 0) { - SRC_PUT8(hc->sca_base, sca->ier0, - SRC_GET8(hc->sca_base, sca->ier0) & ~0x0F); - SRC_PUT8(hc->sca_base, sca->ier1, - SRC_GET8(hc->sca_base, sca->ier1) & ~0x0F); - } else { - SRC_PUT8(hc->sca_base, sca->ier0, - SRC_GET8(hc->sca_base, sca->ier0) & ~0xF0); - SRC_PUT8(hc->sca_base, sca->ier1, - SRC_GET8(hc->sca_base, sca->ier1) & ~0xF0); - } -} - -/* - * Initialize the card, allocate memory for the sr_softc structures - * and fill in the pointers. - */ -static void -src_init(struct sr_hardc *hc) -{ - struct sr_softc *sc = hc->sc; - int x; - u_int chanmem; - u_int bufmem; - u_int next; - u_int descneeded; - -#if BUGGY > 0 - printf("src_init(hc=%08x)\n", hc); -#endif - - chanmem = hc->memsize / hc->numports; - next = 0; - - for (x = 0; x < hc->numports; x++, sc++) { - int blk; - - for (blk = 0; blk < SR_TX_BLOCKS; blk++) { - sc->block[blk].txdesc = next; - bufmem = (16 * 1024) / SR_TX_BLOCKS; - descneeded = bufmem / SR_BUF_SIZ; - - sc->block[blk].txstart = sc->block[blk].txdesc - + ((((descneeded * sizeof(sca_descriptor)) - / SR_BUF_SIZ) + 1) - * SR_BUF_SIZ); - - sc->block[blk].txend = next + bufmem; - sc->block[blk].txmax = - (sc->block[blk].txend - sc->block[blk].txstart) - / SR_BUF_SIZ; - next += bufmem; - -#if BUGGY > 2 - printf("sr%d: blk %d: txdesc %08x, txstart %08x\n", - sc->unit, blk, - sc->block[blk].txdesc, sc->block[blk].txstart); -#endif - } - - sc->rxdesc = next; - bufmem = chanmem - (bufmem * SR_TX_BLOCKS); - descneeded = bufmem / SR_BUF_SIZ; - sc->rxstart = sc->rxdesc + - ((((descneeded * sizeof(sca_descriptor)) / - SR_BUF_SIZ) + 1) * SR_BUF_SIZ); - sc->rxend = next + bufmem; - sc->rxmax = (sc->rxend - sc->rxstart) / SR_BUF_SIZ; - next += bufmem; - } -} - -/* - * The things done here are channel independent. - * - * Configure the sca waitstates. - * Configure the global interrupt registers. - * Enable master dma enable. - */ -static void -sr_init_sca(struct sr_hardc *hc) -{ - sca_regs *sca = hc->sca; - -#if BUGGY > 0 - printf("sr_init_sca(hc=%08x)\n", hc); -#endif - - /* - * Do the wait registers. Set everything to 0 wait states. - */ - SRC_PUT8(hc->sca_base, sca->pabr0, 0); - SRC_PUT8(hc->sca_base, sca->pabr1, 0); - SRC_PUT8(hc->sca_base, sca->wcrl, 0); - SRC_PUT8(hc->sca_base, sca->wcrm, 0); - SRC_PUT8(hc->sca_base, sca->wcrh, 0); - - /* - * Configure the interrupt registers. Most are cleared until the - * interface is configured. - */ - SRC_PUT8(hc->sca_base, sca->ier0, 0x00); /* MSCI interrupts. */ - SRC_PUT8(hc->sca_base, sca->ier1, 0x00); /* DMAC interrupts */ - SRC_PUT8(hc->sca_base, sca->ier2, 0x00); /* TIMER interrupts. */ - SRC_PUT8(hc->sca_base, sca->itcr, 0x00); /* Use ivr and no intr - * ack */ - SRC_PUT8(hc->sca_base, sca->ivr, 0x40); /* Interrupt vector. */ - SRC_PUT8(hc->sca_base, sca->imvr, 0x40); - - /* - * Configure the timers. XXX Later - */ - - /* - * Set the DMA channel priority to rotate between all four channels. - * - * Enable all dma channels. - */ - SRC_PUT8(hc->sca_base, sca->pcr, SCA_PCR_PR2); - SRC_PUT8(hc->sca_base, sca->dmer, SCA_DMER_EN); -} - -/* - * Configure the msci - * - * NOTE: The serial port configuration is hardcoded at the moment. - */ -static void -sr_init_msci(struct sr_softc *sc) -{ - int portndx; /* on-board port number */ - u_int mcr_v; /* contents of modem control */ - u_int *fecrp; /* pointer for PCI's MCR i/o */ - struct sr_hardc *hc = sc->hc; - msci_channel *msci = &hc->sca->msci[sc->scachan]; -#ifdef N2_TEST_SPEED - int br_v; /* contents for BR divisor */ - int etcndx; /* index into ETC table */ - int fifo_v, gotspeed; /* final tabled speed found */ - int tmc_v; /* timer control register */ - int wanted; /* speed (bitrate) wanted... */ - struct rate_line *rtp; -#endif - - portndx = sc->scachan; - -#if BUGGY > 0 - printf("sr: sr_init_msci( sc=%08x)\n", sc); -#endif - - SRC_PUT8(hc->sca_base, msci->cmd, SCA_CMD_RESET); - SRC_PUT8(hc->sca_base, msci->md0, SCA_MD0_CRC_1 | - SCA_MD0_CRC_CCITT | - SCA_MD0_CRC_ENABLE | - SCA_MD0_MODE_HDLC); - SRC_PUT8(hc->sca_base, msci->md1, SCA_MD1_NOADDRCHK); - SRC_PUT8(hc->sca_base, msci->md2, SCA_MD2_DUPLEX | SCA_MD2_NRZ); - - /* - * According to the manual I should give a reset after changing the - * mode registers. - */ - SRC_PUT8(hc->sca_base, msci->cmd, SCA_CMD_RXRESET); - SRC_PUT8(hc->sca_base, msci->ctl, SCA_CTL_IDLPAT | - SCA_CTL_UDRNC | - SCA_CTL_RTS); - - /* - * XXX Later we will have to support different clock settings. - */ - switch (sc->clk_cfg) { - default: -#if BUGGY > 0 - printf("sr%: clk_cfg=%08x, selected default clock.\n", - portndx, sc->clk_cfg); -#endif - /* FALLTHROUGH */ - case SR_FLAGS_EXT_CLK: - /* - * For now all interfaces are programmed to use the RX clock - * for the TX clock. - */ - -#if BUGGY > 0 - printf("sr%d: External Clock Selected.\n", portndx); -#endif - - SRC_PUT8(hc->sca_base, msci->rxs, 0); - SRC_PUT8(hc->sca_base, msci->txs, 0); - break; - - case SR_FLAGS_EXT_SEP_CLK: -#if BUGGY > 0 - printf("sr%d: Split Clocking Selected.\n", portndx); -#endif - -#if 1 - SRC_PUT8(hc->sca_base, msci->rxs, 0); - SRC_PUT8(hc->sca_base, msci->txs, 0); -#else - SRC_PUT8(hc->sca_base, msci->rxs, - SCA_RXS_CLK_RXC0 | SCA_RXS_DIV1); - - /* - * We need to configure the internal bit clock for the - * transmitter's channel... - */ - SRC_PUT8(hc->sca_base, msci->txs, - SCA_TXS_CLK_RX | SCA_TXS_DIV1); -#endif - break; - - case SR_FLAGS_INT_CLK: -#if BUGGY > 0 - printf("sr%d: Internal Clocking selected.\n", portndx); -#endif - - /* - * XXX I do need some code to set the baud rate here! - */ -#ifdef N2_TEST_SPEED - switch (hc->cardtype) { - case SR_CRD_N2PCI: - fecrp = (u_int *)(hc->sca_base + SR_FECR); - mcr_v = *fecrp; - etcndx = 2; - break; - case SR_CRD_N2: - default: - mcr_v = inb(hc->iobase + SR_MCR); - etcndx = 0; - } - - fifo_v = 0x10; /* stolen from Linux version */ - - /* - * search for appropriate speed in table, don't calc it: - */ - wanted = sr_test_speed[portndx]; - rtp = &n2_rates[0]; /* point to first table item */ - - while ((rtp->target > 0) /* search table for speed */ - &&(rtp->target != wanted)) - rtp++; - - /* - * We've searched the table for a matching speed. If we've - * found the correct rate line, we'll get the pre-calc'd - * values for the TMC and baud rate divisor for subsequent - * use... - */ - if (rtp->target > 0) { /* use table-provided values */ - gotspeed = wanted; - tmc_v = rtp->tmc_reg; - br_v = rtp->br_reg; - } else { /* otherwise assume 1MBit comm rate */ - gotspeed = 10000; - tmc_v = 5; - br_v = 1; - } - - /* - * Now we mask in the enable clock output for the MCR: - */ - mcr_v |= etc0vals[etcndx + portndx]; - - /* - * Now we'll program the registers with these speed- related - * contents... - */ - SRC_PUT8(hc->sca_base, msci->tmc, tmc_v); - SRC_PUT8(hc->sca_base, msci->trc0, fifo_v); - SRC_PUT8(hc->sca_base, msci->rxs, SCA_RXS_CLK_INT + br_v); - SRC_PUT8(hc->sca_base, msci->txs, SCA_TXS_CLK_INT + br_v); - - switch (hc->cardtype) { - case SR_CRD_N2PCI: - *fecrp = mcr_v; - break; - case SR_CRD_N2: - default: - outb(hc->iobase + SR_MCR, mcr_v); - } - -#if BUGGY > 0 - if (wanted != gotspeed) - printf("sr%d: Speed wanted=%d, found=%d\n", - wanted, gotspeed); - - printf("sr%d: Internal Clock %dx100 BPS, tmc=%d, div=%d\n", - portndx, gotspeed, tmc_v, br_v); -#endif -#else - SRC_PUT8(hc->sca_base, msci->rxs, - SCA_RXS_CLK_INT | SCA_RXS_DIV1); - SRC_PUT8(hc->sca_base, msci->txs, - SCA_TXS_CLK_INT | SCA_TXS_DIV1); - - SRC_PUT8(hc->sca_base, msci->tmc, 5); - - if (portndx == 0) - switch (hc->cardtype) { - case SR_CRD_N2PCI: - fecrp = (u_int *)(hc->sca_base + SR_FECR); - *fecrp |= SR_FECR_ETC0; - break; - case SR_CRD_N2: - default: - mcr_v = inb(hc->iobase + SR_MCR); - mcr_v |= SR_MCR_ETC0; - outb(hc->iobase + SR_MCR, mcr_v); - } - else - switch (hc->cardtype) { - case SR_CRD_N2: - mcr_v = inb(hc->iobase + SR_MCR); - mcr_v |= SR_MCR_ETC1; - outb(hc->iobase + SR_MCR, mcr_v); - break; - case SR_CRD_N2PCI: - fecrp = (u_int *)(hc->sca_base + SR_FECR); - *fecrp |= SR_FECR_ETC1; - break; - } -#endif - } - - /* - * XXX Disable all interrupts for now. I think if you are using the - * dmac you don't use these interrupts. - */ - SRC_PUT8(hc->sca_base, msci->ie0, 0); - SRC_PUT8(hc->sca_base, msci->ie1, 0x0C); - SRC_PUT8(hc->sca_base, msci->ie2, 0); - SRC_PUT8(hc->sca_base, msci->fie, 0); - - SRC_PUT8(hc->sca_base, msci->sa0, 0); - SRC_PUT8(hc->sca_base, msci->sa1, 0); - - SRC_PUT8(hc->sca_base, msci->idl, 0x7E); /* set flags value */ - - SRC_PUT8(hc->sca_base, msci->rrc, 0x0E); - SRC_PUT8(hc->sca_base, msci->trc0, 0x10); - SRC_PUT8(hc->sca_base, msci->trc1, 0x1F); -} - -/* - * Configure the rx dma controller. - */ -static void -sr_init_rx_dmac(struct sr_softc *sc) -{ - struct sr_hardc *hc; - dmac_channel *dmac; - sca_descriptor *rxd; - u_int cda_v, sarb_v, rxbuf, rxda, rxda_d; - -#if BUGGY > 0 - printf("sr_init_rx_dmac(sc=%08x)\n", sc); -#endif - - hc = sc->hc; - dmac = &hc->sca->dmac[DMAC_RXCH(sc->scachan)]; - - if (hc->mempages) - SRC_SET_MEM(hc->iobase, sc->rxdesc); - - /* - * This phase initializes the contents of the descriptor table - * needed to construct a circular buffer... - */ - rxd = (sca_descriptor *)(hc->mem_start + (sc->rxdesc & hc->winmsk)); - rxda_d = (u_int) hc->mem_start - (sc->rxdesc & ~hc->winmsk); - - for (rxbuf = sc->rxstart; - rxbuf < sc->rxend; - rxbuf += SR_BUF_SIZ, rxd++) { - /* - * construct the circular chain... - */ - rxda = (u_int) & rxd[1] - rxda_d + hc->mem_pstart; - rxd->cp = (u_short)(rxda & 0xffff); - - /* - * set the on-card buffer address... - */ - rxd->bp = (u_short)((rxbuf + hc->mem_pstart) & 0xffff); - rxd->bpb = (u_char)(((rxbuf + hc->mem_pstart) >> 16) & 0xff); - - rxd->len = 0; /* bytes resident w/in granule */ - rxd->stat = 0xff; /* The sca write here when finished */ - } - - /* - * heal the chain so that the last entry points to the first... - */ - rxd--; - rxd->cp = (u_short)((sc->rxdesc + hc->mem_pstart) & 0xffff); - - /* - * reset the reception handler's index... - */ - sc->rxhind = 0; - - /* - * We'll now configure the receiver's DMA logic... - */ - SRC_PUT8(hc->sca_base, dmac->dsr, 0); /* Disable DMA transfer */ - SRC_PUT8(hc->sca_base, dmac->dcr, SCA_DCR_ABRT); - - /* XXX maybe also SCA_DMR_CNTE */ - SRC_PUT8(hc->sca_base, dmac->dmr, SCA_DMR_TMOD | SCA_DMR_NF); - SRC_PUT16(hc->sca_base, dmac->bfl, SR_BUF_SIZ); - - cda_v = (u_short)((sc->rxdesc + hc->mem_pstart) & 0xffff); - sarb_v = (u_char)(((sc->rxdesc + hc->mem_pstart) >> 16) & 0xff); - - SRC_PUT16(hc->sca_base, dmac->cda, cda_v); - SRC_PUT8(hc->sca_base, dmac->sarb, sarb_v); - - rxd = (sca_descriptor *)sc->rxstart; - - SRC_PUT16(hc->sca_base, dmac->eda, - (u_short)((u_int) & rxd[sc->rxmax - 1] & 0xffff)); - - SRC_PUT8(hc->sca_base, dmac->dir, 0xF0); - - - SRC_PUT8(hc->sca_base, dmac->dsr, SCA_DSR_DE); /* Enable DMA */ -} - -/* - * Configure the TX DMA descriptors. - * Initialize the needed values and chain the descriptors. - */ -static void -sr_init_tx_dmac(struct sr_softc *sc) -{ - int blk; - u_int txbuf, txda, txda_d; - struct sr_hardc *hc; - sca_descriptor *txd; - dmac_channel *dmac; - struct buf_block *blkp; - u_int x; - u_int sarb_v; - -#if BUGGY > 0 - printf("sr_init_tx_dmac(sc=%08x)\n", sc); -#endif - - hc = sc->hc; - dmac = &hc->sca->dmac[DMAC_TXCH(sc->scachan)]; - - if (hc->mempages) - SRC_SET_MEM(hc->iobase, sc->block[0].txdesc); - - /* - * Initialize the array of descriptors for transmission - */ - for (blk = 0; blk < SR_TX_BLOCKS; blk++) { - blkp = &sc->block[blk]; - txd = (sca_descriptor *)(hc->mem_start - + (blkp->txdesc & hc->winmsk)); - txda_d = (u_int) hc->mem_start - - (blkp->txdesc & ~hc->winmsk); - - x = 0; - txbuf = blkp->txstart; - for (; txbuf < blkp->txend; txbuf += SR_BUF_SIZ, txd++) { - txda = (u_int) & txd[1] - txda_d + hc->mem_pstart; - txd->cp = (u_short)(txda & 0xffff); - - txd->bp = (u_short)((txbuf + hc->mem_pstart) - & 0xffff); - txd->bpb = (u_char)(((txbuf + hc->mem_pstart) >> 16) - & 0xff); - txd->len = 0; - txd->stat = 0; - x++; - } - - txd--; - txd->cp = (u_short)((blkp->txdesc + hc->mem_pstart) - & 0xffff); - - blkp->txtail = (u_int)txd - (u_int)hc->mem_start; - } - - SRC_PUT8(hc->sca_base, dmac->dsr, 0); /* Disable DMA */ - SRC_PUT8(hc->sca_base, dmac->dcr, SCA_DCR_ABRT); - SRC_PUT8(hc->sca_base, dmac->dmr, SCA_DMR_TMOD | SCA_DMR_NF); - SRC_PUT8(hc->sca_base, dmac->dir, - SCA_DIR_EOT | SCA_DIR_BOF | SCA_DIR_COF); - - sarb_v = (sc->block[0].txdesc + hc->mem_pstart) >> 16; - sarb_v &= 0x00ff; - - SRC_PUT8(hc->sca_base, dmac->sarb, (u_char) sarb_v); -} - -/* - * Look through the descriptors to see if there is a complete packet - * available. Stop if we get to where the sca is busy. - * - * Return the length and status of the packet. - * Return nonzero if there is a packet available. - * - * NOTE: - * It seems that we get the interrupt a bit early. The updateing of - * descriptor values is not always completed when this is called. - */ -static int -sr_packet_avail(struct sr_softc *sc, int *len, u_char *rxstat) -{ - int granules; /* count of granules in pkt */ - int wki, wko; - struct sr_hardc *hc; - sca_descriptor *rxdesc; /* current descriptor */ - sca_descriptor *endp; /* ending descriptor */ - sca_descriptor *cda; /* starting descriptor */ - - hc = sc->hc; /* get card's information */ - - /* - * set up starting descriptor by pulling that info from the DMA half - * of the HD chip... - */ - wki = DMAC_RXCH(sc->scachan); - wko = SRC_GET16(hc->sca_base, hc->sca->dmac[wki].cda); - - cda = (sca_descriptor *)(hc->mem_start + (wko & hc->winmsk)); - -#if BUGGY > 1 - printf("sr_packet_avail(): wki=%d, wko=%04x, cda=%08x\n", - wki, wko, cda); -#endif - - /* - * open the appropriate memory window and set our expectations... - */ - if (hc->mempages) { - SRC_SET_MEM(hc->iobase, sc->rxdesc); - SRC_SET_ON(hc->iobase); - } - rxdesc = (sca_descriptor *) - (hc->mem_start + (sc->rxdesc & hc->winmsk)); - endp = rxdesc; - rxdesc = &rxdesc[sc->rxhind]; - endp = &endp[sc->rxmax]; - - *len = 0; /* reset result total length */ - granules = 0; /* reset count of granules */ - - /* - * This loop will scan descriptors, but it *will* puke up if we wrap - * around to our starting point... - */ - while (rxdesc != cda) { - *len += rxdesc->len; /* increment result length */ - granules++; - - /* - * If we hit a valid packet's completion we'll know we've - * got a live one, and that we can deliver the packet. - * Since we're only allowed to report a packet available, - * somebody else does that... - */ - if (rxdesc->stat & SCA_DESC_EOM) { /* End Of Message */ - *rxstat = rxdesc->stat; /* return closing */ -#if BUGGY > 0 - printf("sr%d: PKT AVAIL len %d, %x, bufs %u.\n", - sc->unit, *len, *rxstat, granules); -#endif - return 1; /* indicate success */ - } - /* - * OK, this packet take up multiple granules. Move on to - * the next descriptor so we can consider it... - */ - rxdesc++; - - if (rxdesc == endp) /* recognize & act on wrap point */ - rxdesc = (sca_descriptor *) - (hc->mem_start + (sc->rxdesc & hc->winmsk)); - } - - /* - * Nothing found in the DPRAM. Let the caller know... - */ - *len = 0; - *rxstat = 0; - - return 0; -} - -/* - * Copy a packet from the on card memory into a provided mbuf. - * Take into account that buffers wrap and that a packet may - * be larger than a buffer. - */ -static void -sr_copy_rxbuf(struct mbuf *m, struct sr_softc *sc, int len) -{ - struct sr_hardc *hc; - sca_descriptor *rxdesc; - u_int rxdata; - u_int rxmax; - u_int off = 0; - u_int tlen; - -#if BUGGY > 0 - printf("sr_copy_rxbuf(m=%08x,sc=%08x,len=%d)\n", - m, sc, len); -#endif - - hc = sc->hc; - - rxdata = sc->rxstart + (sc->rxhind * SR_BUF_SIZ); - rxmax = sc->rxstart + (sc->rxmax * SR_BUF_SIZ); - - rxdesc = (sca_descriptor *) - (hc->mem_start + (sc->rxdesc & hc->winmsk)); - rxdesc = &rxdesc[sc->rxhind]; - - /* - * Using the count of bytes in the received packet, we decrement it - * for each granule (controller by an SCA descriptor) to control the - * looping... - */ - while (len) { - /* - * tlen gets the length of *this* granule... ...which is - * then copied to the target buffer. - */ - tlen = (len < SR_BUF_SIZ) ? len : SR_BUF_SIZ; - - if (hc->mempages) - SRC_SET_MEM(hc->iobase, rxdata); - - bcopy(hc->mem_start + (rxdata & hc->winmsk), - mtod(m, caddr_t) +off, - tlen); - - off += tlen; - len -= tlen; - - /* - * now, return to the descriptor's window in DPRAM and reset - * the descriptor we've just suctioned... - */ - if (hc->mempages) - SRC_SET_MEM(hc->iobase, sc->rxdesc); - - rxdesc->len = 0; - rxdesc->stat = 0xff; - - /* - * Move on to the next granule. If we've any remaining - * bytes to process we'll just continue in our loop... - */ - rxdata += SR_BUF_SIZ; - rxdesc++; - - if (rxdata == rxmax) { /* handle the wrap point */ - rxdata = sc->rxstart; - rxdesc = (sca_descriptor *) - (hc->mem_start + (sc->rxdesc & hc->winmsk)); - } - } -} - -/* - * If single is set, just eat a packet. Otherwise eat everything up to - * where cda points. Update pointers to point to the next packet. - * - * This handles "flushing" of a packet as received... - * - * If the "single" parameter is zero, all pending reeceive traffic will - * be flushed out of existence. A non-zero value will only drop the - * *next* (currently) pending packet... - */ -static void -sr_eat_packet(struct sr_softc *sc, int single) -{ - struct sr_hardc *hc; - sca_descriptor *rxdesc; /* current descriptor being eval'd */ - sca_descriptor *endp; /* last descriptor in chain */ - sca_descriptor *cda; /* current start point */ - u_int loopcnt = 0; /* count of packets flushed ??? */ - u_char stat; /* captured status byte from descr */ - - hc = sc->hc; - cda = (sca_descriptor *)(hc->mem_start + - (SRC_GET16(hc->sca_base, - hc->sca->dmac[DMAC_RXCH(sc->scachan)].cda) & - hc->winmsk)); - - /* - * loop until desc->stat == (0xff || EOM) Clear the status and - * length in the descriptor. Increment the descriptor. - */ - if (hc->mempages) - SRC_SET_MEM(hc->iobase, sc->rxdesc); - - rxdesc = (sca_descriptor *) - (hc->mem_start + (sc->rxdesc & hc->winmsk)); - endp = rxdesc; - rxdesc = &rxdesc[sc->rxhind]; - endp = &endp[sc->rxmax]; - - /* - * allow loop, but abort it if we wrap completely... - */ - while (rxdesc != cda) { - loopcnt++; - - if (loopcnt > sc->rxmax) { - printf("sr%d: eat pkt %d loop, cda %x, " - "rxdesc %x, stat %x.\n", - sc->unit, loopcnt, (u_int) cda, (u_int) rxdesc, - rxdesc->stat); - break; - } - stat = rxdesc->stat; - - rxdesc->len = 0; - rxdesc->stat = 0xff; - - rxdesc++; - sc->rxhind++; - - if (rxdesc == endp) { - rxdesc = (sca_descriptor *) - (hc->mem_start + (sc->rxdesc & hc->winmsk)); - sc->rxhind = 0; - } - if (single && (stat == SCA_DESC_EOM)) - break; - } - - /* - * Update the eda to the previous descriptor. - */ - rxdesc = (sca_descriptor *)sc->rxdesc; - rxdesc = &rxdesc[(sc->rxhind + sc->rxmax - 2) % sc->rxmax]; - - SRC_PUT16(hc->sca_base, - hc->sca->dmac[DMAC_RXCH(sc->scachan)].eda, - (u_short)((u_int)(rxdesc + hc->mem_pstart) & 0xffff)); -} - -/* - * While there is packets available in the rx buffer, read them out - * into mbufs and ship them off. - */ -static void -sr_get_packets(struct sr_softc *sc) -{ - u_char rxstat; /* acquired status byte */ - int i; - int pkts; /* count of packets found */ - int rxndx; /* rcv buffer index */ - int tries; /* settling time counter */ - u_int len; /* length of pending packet */ - struct sr_hardc *hc; /* card-level information */ - sca_descriptor *rxdesc; /* descriptor in memory */ -#ifndef NETGRAPH - struct ifnet *ifp; /* network intf ctl table */ -#else - int error; -#endif /* NETGRAPH */ - struct mbuf *m = NULL; /* message buffer */ - -#if BUGGY > 0 - printf("sr_get_packets(sc=%08x)\n", sc); -#endif - - hc = sc->hc; -#ifndef NETGRAPH - ifp = &sc->ifsppp.pp_if; -#endif /* NETGRAPH */ - - if (hc->mempages) { - SRC_SET_MEM(hc->iobase, sc->rxdesc); - SRC_SET_ON(hc->iobase); /* enable shared memory */ - } - pkts = 0; /* reset count of found packets */ - - /* - * for each complete packet in the receiving pool, process each - * packet... - */ - while (sr_packet_avail(sc, &len, &rxstat)) { /* packet pending? */ - /* - * I have seen situations where we got the interrupt but the - * status value wasn't deposited. This code should allow - * the status byte's value to settle... - */ - - tries = 5; - - while ((rxstat == 0x00ff) - && --tries) - sr_packet_avail(sc, &len, &rxstat); - -#if BUGGY > 1 - printf("sr_packet_avail() returned len=%d, rxstat=%02ux\n", - len, rxstat); -#endif - - pkts++; -#ifdef NETGRAPH - sc->inbytes += len; - sc->inlast = 0; -#endif /* NETGRAPH */ - - /* - * OK, we've settled the incoming message status. We can now - * process it... - */ - if (((rxstat & SCA_DESC_ERRORS) == 0) && (len < MCLBYTES)) { -#if BUGGY > 1 - printf("sr%d: sr_get_packet() rxstat=%02x, len=%d\n", - sc->unit, rxstat, len); -#endif - - MGETHDR(m, M_DONTWAIT, MT_DATA); - if (m == NULL) { - /* - * eat (flush) packet if get mbuf fail!! - */ - sr_eat_packet(sc, 1); - continue; - } - /* - * construct control information for pass-off - */ -#ifndef NETGRAPH - m->m_pkthdr.rcvif = ifp; -#else - m->m_pkthdr.rcvif = NULL; -#endif /* NETGRAPH */ - m->m_pkthdr.len = m->m_len = len; - if (len > MHLEN) { - MCLGET(m, M_DONTWAIT); - if ((m->m_flags & M_EXT) == 0) { - /* - * We couldn't get a big enough - * message packet, so we'll send the - * packet to /dev/null... - */ - m_freem(m); - sr_eat_packet(sc, 1); - continue; - } - } - /* - * OK, we've got a good message buffer. Now we can - * copy the received message into it - */ - sr_copy_rxbuf(m, sc, len); /* copy from DPRAM */ - -#ifndef NETGRAPH - if (ifp->if_bpf) - bpf_mtap(ifp, m); - -#if BUGGY > 3 - { - u_char *bp; - - bp = (u_char *)m; - printf("sr%d: rcvd=%02x%02x%02x%02x%02x%02x\n", - sc->unit, - bp[0], bp[1], bp[2], - bp[4], bp[5], bp[6]); - } -#endif - sppp_input(ifp, m); - ifp->if_ipackets++; - -#else /* NETGRAPH */ -#if BUGGY > 3 - { - u_char *bp; - - bp = mtod(m,u_char *); - printf("sr%d: rd=%02x:%02x:%02x:%02x:%02x:%02x", - sc->unit, - bp[0], bp[1], bp[2], - bp[4], bp[5], bp[6]); - printf(":%02x:%02x:%02x:%02x:%02x:%02x\n", - bp[6], bp[7], bp[8], - bp[9], bp[10], bp[11]); - } -#endif - NG_SEND_DATA_ONLY(error, sc->hook, m); - sc->ipackets++; -#endif /* NETGRAPH */ - /* - * Update the eda to the previous descriptor. - */ - i = (len + SR_BUF_SIZ - 1) / SR_BUF_SIZ; - sc->rxhind = (sc->rxhind + i) % sc->rxmax; - - rxdesc = (sca_descriptor *)sc->rxdesc; - rxndx = (sc->rxhind + sc->rxmax - 2) % sc->rxmax; - rxdesc = &rxdesc[rxndx]; - - SRC_PUT16(hc->sca_base, - hc->sca->dmac[DMAC_RXCH(sc->scachan)].eda, - (u_short)((u_int)(rxdesc + hc->mem_pstart) - & 0xffff)); - - } else { - int got_st3, got_cda, got_eda; - int tries = 5; - - while((rxstat == 0xff) && --tries) - sr_packet_avail(sc, &len, &rxstat); - - /* - * It look like we get an interrupt early - * sometimes and then the status is not - * filled in yet. - */ - if(tries && (tries != 5)) - continue; - - /* - * This chunk of code handles the error packets. - * We'll log them for posterity... - */ - sr_eat_packet(sc, 1); - -#ifndef NETGRAPH - ifp->if_ierrors++; -#else - sc->ierrors[0]++; -#endif /* NETGRAPH */ - - got_st3 = SRC_GET8(hc->sca_base, - hc->sca->msci[sc->scachan].st3); - got_cda = SRC_GET16(hc->sca_base, - hc->sca->dmac[DMAC_RXCH(sc->scachan)].cda); - got_eda = SRC_GET16(hc->sca_base, - hc->sca->dmac[DMAC_RXCH(sc->scachan)].eda); - -#if BUGGY > 0 - printf("sr%d: Receive error chan %d, " - "stat %02x, msci st3 %02x," - "rxhind %d, cda %04x, eda %04x.\n", - sc->unit, sc->scachan, rxstat, - got_st3, sc->rxhind, got_cda, got_eda); -#endif - } - } - -#if BUGGY > 0 - printf("sr%d: sr_get_packets() found %d packet(s)\n", - sc->unit, pkts); -#endif - - if (hc->mempages) - SRC_SET_OFF(hc->iobase); -} - -/* - * All DMA interrupts come here. - * - * Each channel has two interrupts. - * Interrupt A for errors and Interrupt B for normal stuff like end - * of transmit or receive dmas. - */ -static void -sr_dmac_intr(struct sr_hardc *hc, u_char isr1) -{ - u_char dsr; /* contents of DMA Stat Reg */ - u_char dotxstart; /* enables for tranmit part */ - int mch; /* channel being processed */ - struct sr_softc *sc; /* channel's softc structure */ - sca_regs *sca = hc->sca; - dmac_channel *dmac; /* dma structure of chip */ - -#if BUGGY > 0 - printf("sr_dmac_intr(hc=%08x,isr1=%04x)\n", hc, isr1); -#endif - - mch = 0; /* assume chan0 on card */ - dotxstart = isr1; /* copy for xmitter starts */ - - /* - * Shortcut if there is no interrupts for dma channel 0 or 1. - * Skip processing for channel 0 if no incoming hit - */ - if ((isr1 & 0x0F) == 0) { - mch = 1; - isr1 >>= 4; - } - do { - sc = &hc->sc[mch]; - - /* - * Transmit channel - DMA Status Register Evaluation - */ - if (isr1 & 0x0C) { - dmac = &sca->dmac[DMAC_TXCH(mch)]; - - /* - * get the DMA Status Register contents and write - * back to reset interrupt... - */ - dsr = SRC_GET8(hc->sca_base, dmac->dsr); - SRC_PUT8(hc->sca_base, dmac->dsr, dsr); - - /* - * Check for (& process) a Counter overflow - */ - if (dsr & SCA_DSR_COF) { - printf("sr%d: TX DMA Counter overflow, " - "txpacket no %lu.\n", -#ifndef NETGRAPH - sc->unit, sc->ifsppp.pp_if.if_opackets); - sc->ifsppp.pp_if.if_oerrors++; -#else - sc->unit, sc->opackets); - sc->oerrors++; -#endif /* NETGRAPH */ - } - /* - * Check for (& process) a Buffer overflow - */ - if (dsr & SCA_DSR_BOF) { - printf("sr%d: TX DMA Buffer overflow, " - "txpacket no %lu, dsr %02x, " - "cda %04x, eda %04x.\n", -#ifndef NETGRAPH - sc->unit, sc->ifsppp.pp_if.if_opackets, -#else - sc->unit, sc->opackets, -#endif /* NETGRAPH */ - dsr, - SRC_GET16(hc->sca_base, dmac->cda), - SRC_GET16(hc->sca_base, dmac->eda)); -#ifndef NETGRAPH - sc->ifsppp.pp_if.if_oerrors++; -#else - sc->oerrors++; -#endif /* NETGRAPH */ - } - /* - * Check for (& process) an End of Transfer (OK) - */ - if (dsr & SCA_DSR_EOT) { - /* - * This should be the most common case. - * - * Clear the IFF_OACTIVE flag. - * - * Call srstart to start a new transmit if - * there is data to transmit. - */ -#if BUGGY > 0 - printf("sr%d: TX Completed OK\n", sc->unit); -#endif - sc->xmit_busy = 0; -#ifndef NETGRAPH - sc->ifsppp.pp_if.if_flags &= ~IFF_OACTIVE; - sc->ifsppp.pp_if.if_timer = 0; -#else - /* XXX may need to mark tx inactive? */ - sc->out_deficit++; - sc->out_dog = DOG_HOLDOFF; -#endif /* NETGRAPH */ - - if (sc->txb_inuse && --sc->txb_inuse) - sr_xmit(sc); - } - } - /* - * Receive channel processing of DMA Status Register - */ - if (isr1 & 0x03) { - dmac = &sca->dmac[DMAC_RXCH(mch)]; - - dsr = SRC_GET8(hc->sca_base, dmac->dsr); - SRC_PUT8(hc->sca_base, dmac->dsr, dsr); - - /* - * End of frame processing (MSG OK?) - */ - if (dsr & SCA_DSR_EOM) { -#if BUGGY > 0 - int tt, ind; - -#ifndef NETGRAPH - tt = sc->ifsppp.pp_if.if_ipackets; -#else /* NETGRAPH */ - tt = sc->ipackets; -#endif /* NETGRAPH */ - ind = sc->rxhind; -#endif - - sr_get_packets(sc); -#if BUGGY > 0 -#ifndef NETGRAPH - if (tt == sc->ifsppp.pp_if.if_ipackets) -#else /* NETGRAPH */ - if (tt == sc->ipackets) -#endif /* NETGRAPH */ - { - sca_descriptor *rxdesc; - int i; - - printf("SR: RXINTR isr1 %x, dsr %x, " - "no data %d pkts, orxind %d.\n", - dotxstart, dsr, tt, ind); - printf("SR: rxdesc %x, rxstart %x, " - "rxend %x, rxhind %d, " - "rxmax %d.\n", - sc->rxdesc, sc->rxstart, - sc->rxend, sc->rxhind, - sc->rxmax); - printf("SR: cda %x, eda %x.\n", - SRC_GET16(hc->sca_base, dmac->cda), - SRC_GET16(hc->sca_base, dmac->eda)); - - if (hc->mempages) { - SRC_SET_ON(hc->iobase); - SRC_SET_MEM(hc->iobase, sc->rxdesc); - } - rxdesc = (sca_descriptor *) - (hc->mem_start + - (sc->rxdesc & hc->winmsk)); - rxdesc = &rxdesc[sc->rxhind]; - - for (i = 0; i < 3; i++, rxdesc++) - printf("SR: rxdesc->stat %x, " - "len %d.\n", - rxdesc->stat, - rxdesc->len); - - if (hc->mempages) - SRC_SET_OFF(hc->iobase); - } -#endif /* BUGGY */ - } - /* - * Check for Counter overflow - */ - if (dsr & SCA_DSR_COF) { - printf("sr%d: RX DMA Counter overflow, " - "rxpkts %lu.\n", -#ifndef NETGRAPH - sc->unit, sc->ifsppp.pp_if.if_ipackets); - sc->ifsppp.pp_if.if_ierrors++; -#else /* NETGRAPH */ - sc->unit, sc->ipackets); - sc->ierrors[1]++; -#endif /* NETGRAPH */ - } - /* - * Check for Buffer overflow - */ - if (dsr & SCA_DSR_BOF) { - printf("sr%d: RX DMA Buffer overflow, " - "rxpkts %lu, rxind %d, " - "cda %x, eda %x, dsr %x.\n", -#ifndef NETGRAPH - sc->unit, sc->ifsppp.pp_if.if_ipackets, -#else /* NETGRAPH */ - sc->unit, sc->ipackets, -#endif /* NETGRAPH */ - sc->rxhind, - SRC_GET16(hc->sca_base, dmac->cda), - SRC_GET16(hc->sca_base, dmac->eda), - dsr); - - /* - * Make sure we eat as many as possible. - * Then get the system running again. - */ - if (hc->mempages) - SRC_SET_ON(hc->iobase); - - sr_eat_packet(sc, 0); -#ifndef NETGRAPH - sc->ifsppp.pp_if.if_ierrors++; -#else /* NETGRAPH */ - sc->ierrors[2]++; -#endif /* NETGRAPH */ - - SRC_PUT8(hc->sca_base, - sca->msci[mch].cmd, - SCA_CMD_RXMSGREJ); - - SRC_PUT8(hc->sca_base, dmac->dsr, SCA_DSR_DE); - -#if BUGGY > 0 - printf("sr%d: RX DMA Buffer overflow, " - "rxpkts %lu, rxind %d, " - "cda %x, eda %x, dsr %x. After\n", - sc->unit, -#ifndef NETGRAPH - sc->ipackets, -#else /* NETGRAPH */ - sc->ifsppp.pp_if.if_ipackets, -#endif /* NETGRAPH */ - sc->rxhind, - SRC_GET16(hc->sca_base, dmac->cda), - SRC_GET16(hc->sca_base, dmac->eda), - SRC_GET8(hc->sca_base, dmac->dsr)); -#endif - - if (hc->mempages) - SRC_SET_OFF(hc->iobase); - } - /* - * End of Transfer - */ - if (dsr & SCA_DSR_EOT) { - /* - * If this happen, it means that we are - * receiving faster than what the processor - * can handle. - * - * XXX We should enable the dma again. - */ - printf("sr%d: RX End of xfer, rxpkts %lu.\n", - sc->unit, -#ifndef NETGRAPH - sc->ifsppp.pp_if.if_ipackets); - sc->ifsppp.pp_if.if_ierrors++; -#else - sc->ipackets); - sc->ierrors[3]++; -#endif /* NETGRAPH */ - } - } - isr1 >>= 4; /* process next half of ISR */ - mch++; /* and move to next channel */ - } while ((mch < NCHAN) && isr1); /* loop for each chn */ - - /* - * Now that we have done all the urgent things, see if we can fill - * the transmit buffers. - */ - for (mch = 0; mch < NCHAN; mch++) { - if (dotxstart & 0x0C) { /* TX initiation enabled? */ - sc = &hc->sc[mch]; -#ifndef NETGRAPH - srstart(&sc->ifsppp.pp_if); -#else - srstart(sc); -#endif /* NETGRAPH */ - } - dotxstart >>= 4;/* shift for next channel */ - } -} -#ifndef NETGRAPH -/* - * Perform timeout on an FR channel - * - * Establish a periodic check of open N2 ports; If - * a port is open/active, its DCD state is checked - * and a loss of DCD is recognized (and eventually - * processed). - */ -static void -sr_modemck(void *arg) -{ - u_int s; - int card; /* card index in table */ - int cards; /* card list index */ - int mch; /* channel on card */ - u_char dcd_v; /* Data Carrier Detect */ - u_char got_st0; /* contents of ST0 */ - u_char got_st1; /* contents of ST1 */ - u_char got_st2; /* contents of ST2 */ - u_char got_st3; /* contents of ST3 */ - struct sr_hardc *hc; /* card's configuration */ - struct sr_hardc *Card[16];/* up to 16 cards in system */ - struct sr_softc *sc; /* channel's softc structure */ - struct ifnet *ifp; /* interface control table */ - msci_channel *msci; /* regs specific to channel */ - - s = splimp(); - -#if 0 - if (sr_opens == 0) { /* count of "up" channels */ - sr_watcher = 0; /* indicate no watcher */ - splx(s); - return; - } -#endif - - sr_watcher = 1; /* mark that we're online */ - - /* - * Now we'll need a list of cards to process. Since we can handle - * both ISA and PCI cards (and I didn't think of making this logic - * global YET) we'll generate a single table of card table - * addresses. - */ - cards = 0; - - for (card = 0; card < NSR; card++) { - hc = &sr_hardc[card]; - - if (hc->sc == (void *)0) - continue; - - Card[cards++] = hc; - } - - hc = sr_hardc_pci; - - while (hc) { - Card[cards++] = hc; - hc = hc->next; - } - - /* - * OK, we've got work we can do. Let's do it... (Please note that - * this code _only_ deals w/ ISA cards) - */ - for (card = 0; card < cards; card++) { - hc = Card[card];/* get card table */ - - for (mch = 0; mch < hc->numports; mch++) { - sc = &hc->sc[mch]; - - ifp = &sc->ifsppp.pp_if; - - /* - * if this channel isn't "up", skip it - */ - if ((ifp->if_flags & IFF_UP) == 0) - continue; - - /* - * OK, now we can go looking at this channel's - * actual register contents... - */ - msci = &hc->sca->msci[sc->scachan]; - - /* - * OK, now we'll look into the actual status of this - * channel... - * - * I suck in more registers than strictly needed - */ - got_st0 = SRC_GET8(hc->sca_base, msci->st0); - got_st1 = SRC_GET8(hc->sca_base, msci->st1); - got_st2 = SRC_GET8(hc->sca_base, msci->st2); - got_st3 = SRC_GET8(hc->sca_base, msci->st3); - - /* - * We want to see if the DCD signal is up (DCD is - * true if zero) - */ - dcd_v = (got_st3 & SCA_ST3_DCD) == 0; - - if (dcd_v == 0) - printf("sr%d: DCD lost\n", sc->unit); - } - } - - /* - * OK, now set up for the next modem signal checking pass... - */ - timeout(sr_modemck, NULL, hz); - - splx(s); -} - -#else /* NETGRAPH */ -/* - * If a port is open/active, it's DCD state is checked - * and a loss of DCD is recognized (and eventually processed?). - */ -static void -sr_modemck(struct sr_softc *sc ) -{ - u_int s; - u_char got_st3; /* contents of ST3 */ - struct sr_hardc *hc = sc->hc; /* card's configuration */ - msci_channel *msci; /* regs specific to channel */ - - s = splimp(); - - - if (sc->running == 0) - return; - /* - * OK, now we can go looking at this channel's register contents... - */ - msci = &hc->sca->msci[sc->scachan]; - got_st3 = SRC_GET8(hc->sca_base, msci->st3); - - /* - * We want to see if the DCD signal is up (DCD is true if zero) - */ - sc->dcd = (got_st3 & SCA_ST3_DCD) == 0; - splx(s); -} - -#endif /* NETGRAPH */ -static void -sr_msci_intr(struct sr_hardc *hc, u_char isr0) -{ - printf("src%d: SRINTR: MSCI\n", hc->cunit); -} - -static void -sr_timer_intr(struct sr_hardc *hc, u_char isr2) -{ - printf("src%d: SRINTR: TIMER\n", hc->cunit); -} - -#ifdef NETGRAPH -/***************************************** - * Device timeout/watchdog routine. - * called once per second. - * checks to see that if activity was expected, that it hapenned. - * At present we only look to see if expected output was completed. - */ -static void -ngsr_watchdog_frame(void * arg) -{ - struct sr_softc * sc = arg; - int s; - int speed; - - if(sc->running == 0) - return; /* if we are not running let timeouts die */ - /* - * calculate the apparent throughputs - * XXX a real hack - */ - s = splimp(); - speed = sc->inbytes - sc->lastinbytes; - sc->lastinbytes = sc->inbytes; - if ( sc->inrate < speed ) - sc->inrate = speed; - speed = sc->outbytes - sc->lastoutbytes; - sc->lastoutbytes = sc->outbytes; - if ( sc->outrate < speed ) - sc->outrate = speed; - sc->inlast++; - splx(s); - - if ((sc->inlast > QUITE_A_WHILE) - && (sc->out_deficit > LOTS_OF_PACKETS)) { - log(LOG_ERR, "sr%d: No response from remote end\n", sc->unit); - s = splimp(); - sr_down(sc); - sr_up(sc); - sc->inlast = sc->out_deficit = 0; - splx(s); - } else if ( sc->xmit_busy ) { /* no TX -> no TX timeouts */ - if (sc->out_dog == 0) { - log(LOG_ERR, "sr%d: Transmit failure.. no clock?\n", - sc->unit); - s = splimp(); - srwatchdog(sc); -#if 0 - sr_down(sc); - sr_up(sc); -#endif - splx(s); - sc->inlast = sc->out_deficit = 0; - } else { - sc->out_dog--; - } - } - sr_modemck(sc); /* update the DCD status */ - sc->handle = timeout(ngsr_watchdog_frame, sc, hz); -} - -/*********************************************************************** - * This section contains the methods for the Netgraph interface - ***********************************************************************/ -/* - * It is not possible or allowable to create a node of this type. - * If the hardware exists, it will already have created it. - */ -static int -ngsr_constructor(node_p node) -{ - return (EINVAL); -} - -/* - * give our ok for a hook to be added... - * If we are not running this should kick the device into life. - * The hook's private info points to our stash of info about that - * channel. - */ -static int -ngsr_newhook(node_p node, hook_p hook, const char *name) -{ - struct sr_softc * sc = NG_NODE_PRIVATE(node); - - /* - * check if it's our friend the debug hook - */ - if (strcmp(name, NG_SR_HOOK_DEBUG) == 0) { - NG_HOOK_SET_PRIVATE(hook, NULL); /* paranoid */ - sc->debug_hook = hook; - return (0); - } - - /* - * Check for raw mode hook. - */ - if (strcmp(name, NG_SR_HOOK_RAW) != 0) { - return (EINVAL); - } - NG_HOOK_SET_PRIVATE(hook, sc); - sc->hook = hook; - sc->datahooks++; - sr_up(sc); - return (0); -} - -/* - * incoming messages. - * Just respond to the generic TEXT_STATUS message - */ -static int -ngsr_rcvmsg(node_p node, item_p item, hook_p lasthook) -{ - struct sr_softc * sc; - struct ng_mesg *resp = NULL; - int error = 0; - struct ng_mesg *msg; - - NGI_GET_MSG(item,msg); - sc = NG_NODE_PRIVATE(node); - switch (msg->header.typecookie) { - case NG_SR_COOKIE: - error = EINVAL; - break; - case NGM_GENERIC_COOKIE: - switch(msg->header.cmd) { - case NGM_TEXT_STATUS: { - char *arg; - int pos = 0; - - int resplen = sizeof(struct ng_mesg) + 512; - NG_MKRESPONSE(resp, msg, resplen, M_NOWAIT); - if (resp == NULL) { - error = ENOMEM; - break; - } - arg = (resp)->data; - pos = sprintf(arg, "%ld bytes in, %ld bytes out\n" - "highest rate seen: %ld B/S in, %ld B/S out\n", - sc->inbytes, sc->outbytes, - sc->inrate, sc->outrate); - pos += sprintf(arg + pos, - "%ld output errors\n", - sc->oerrors); - pos += sprintf(arg + pos, - "ierrors = %ld, %ld, %ld, %ld, %ld, %ld\n", - sc->ierrors[0], - sc->ierrors[1], - sc->ierrors[2], - sc->ierrors[3], - sc->ierrors[4], - sc->ierrors[5]); - - resp->header.arglen = pos + 1; - break; - } - default: - error = EINVAL; - break; - } - break; - default: - error = EINVAL; - break; - } - /* Take care of synchronous response, if any */ - NG_RESPOND_MSG(error, node, item, resp); - NG_FREE_MSG(msg); - return (error); -} - -/* - * get data from another node and transmit it to the correct channel - */ -static int -ngsr_rcvdata(hook_p hook, item_p item) -{ - int s; - int error = 0; - struct sr_softc * sc = NG_NODE_PRIVATE(NG_HOOK_NODE(hook)); - struct ifqueue *xmitq_p; - struct mbuf *m; - meta_p meta; - - NGI_GET_M(item, m); - NGI_GET_META(item, meta); - NG_FREE_ITEM(item); - /* - * data doesn't come in from just anywhere (e.g control hook) - */ - if ( NG_HOOK_PRIVATE(hook) == NULL) { - error = ENETDOWN; - goto bad; - } - - /* - * Now queue the data for when it can be sent - */ - if (meta && meta->priority > 0) { - xmitq_p = (&sc->xmitq_hipri); - } else { - xmitq_p = (&sc->xmitq); - } - s = splimp(); - IF_LOCK(xmitq_p); - if (_IF_QFULL(xmitq_p)) { - _IF_DROP(xmitq_p); - IF_UNLOCK(xmitq_p); - splx(s); - error = ENOBUFS; - goto bad; - } - _IF_ENQUEUE(xmitq_p, m); - IF_UNLOCK(xmitq_p); - srstart(sc); - splx(s); - return (0); - -bad: - /* - * It was an error case. - * check if we need to free the mbuf, and then return the error - */ - NG_FREE_M(m); - NG_FREE_META(meta); - return (error); -} - -/* - * do local shutdown processing.. - * this node will refuse to go away, unless the hardware says to.. - * don't unref the node, or remove our name. just clear our links up. - */ -static int -ngsr_shutdown(node_p node) -{ - struct sr_softc * sc = NG_NODE_PRIVATE(node); - - sr_down(sc); - NG_NODE_UNREF(node); -/* XXX should drain queues! */ - if (ng_make_node_common(&typestruct, &sc->node) != 0) - return (0); - sprintf(sc->nodename, "%s%d", NG_SR_NODE_TYPE, sc->unit); - if (ng_name_node(sc->node, sc->nodename)) { - printf("node naming failed\n"); - sc->node = NULL; - NG_NODE_UNREF(sc->node); /* drop it again */ - return (0); - } - NG_NODE_SET_PRIVATE(sc->node, sc); - callout_handle_init(&sc->handle); /* should kill timeout */ - sc->running = 0; - return (0); -} - -/* already linked */ -static int -ngsr_connect(hook_p hook) -{ - /* probably not at splnet, force outward queueing */ - NG_HOOK_FORCE_QUEUE(NG_HOOK_PEER(hook)); - /* be really amiable and just say "YUP that's OK by me! " */ - return (0); -} - -/* - * notify on hook disconnection (destruction) - * - * Invalidate the private data associated with this dlci. - * For this type, removal of the last link resets tries to destroy the node. - * As the device still exists, the shutdown method will not actually - * destroy the node, but reset the device and leave it 'fresh' :) - * - * The node removal code will remove all references except that owned by the - * driver. - */ -static int -ngsr_disconnect(hook_p hook) -{ - struct sr_softc * sc = NG_NODE_PRIVATE(NG_HOOK_NODE(hook)); - int s; - /* - * If it's the data hook, then free resources etc. - */ - if (NG_HOOK_PRIVATE(hook)) { - s = splimp(); - sc->datahooks--; - if (sc->datahooks == 0) - sr_down(sc); - splx(s); - } else { - sc->debug_hook = NULL; - } - return (0); -} - -/* - * called during bootup - * or LKM loading to put this type into the list of known modules - */ -static void -ngsr_init(void *ignored) -{ - if (ng_newtype(&typestruct)) - printf("ngsr install failed\n"); - ngsr_done_init = 1; -} -#endif /* NETGRAPH */ - -/* - ********************************* END ************************************ - */ diff --git a/sys/i386/isa/if_sr.h b/sys/i386/isa/if_sr.h deleted file mode 100644 index a55a6d3..0000000 --- a/sys/i386/isa/if_sr.h +++ /dev/null @@ -1,51 +0,0 @@ -/* - * if_sr.h - * - * Copyright (C) 1997-1999 Whistle Communications Inc. - * All rights reserved. - * - * Subject to the following obligations and disclaimer of warranty, use and - * redistribution of this software, in source or object code forms, with or - * without modifications are expressly permitted by Whistle Communications; - * provided, however, that: - * 1. Any and all reproductions of the source or object code must include the - * copyright notice above and the following disclaimer of warranties; and - * 2. No rights are granted, in any manner or form, to use Whistle - * Communications, Inc. trademarks, including the mark "WHISTLE - * COMMUNICATIONS" on advertising, endorsements, or otherwise except as - * such appears in the above copyright notice or in the software. - * - * THIS SOFTWARE IS BEING PROVIDED BY WHISTLE COMMUNICATIONS "AS IS", AND - * TO THE MAXIMUM EXTENT PERMITTED BY LAW, WHISTLE COMMUNICATIONS MAKES NO - * REPRESENTATIONS OR WARRANTIES, EXPRESS OR IMPLIED, REGARDING THIS SOFTWARE, - * INCLUDING WITHOUT LIMITATION, ANY AND ALL IMPLIED WARRANTIES OF - * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE, OR NON-INFRINGEMENT. - * WHISTLE COMMUNICATIONS DOES NOT WARRANT, GUARANTEE, OR MAKE ANY - * REPRESENTATIONS REGARDING THE USE OF, OR THE RESULTS OF THE USE OF THIS - * SOFTWARE IN TERMS OF ITS CORRECTNESS, ACCURACY, RELIABILITY OR OTHERWISE. - * IN NO EVENT SHALL WHISTLE COMMUNICATIONS BE LIABLE FOR ANY DAMAGES - * RESULTING FROM OR ARISING OUT OF ANY USE OF THIS SOFTWARE, INCLUDING - * WITHOUT LIMITATION, ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, - * PUNITIVE, OR CONSEQUENTIAL DAMAGES, PROCUREMENT OF SUBSTITUTE GOODS OR - * SERVICES, LOSS OF USE, DATA OR PROFITS, HOWEVER CAUSED AND UNDER 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 WHISTLE COMMUNICATIONS IS ADVISED OF THE POSSIBILITY - * OF SUCH DAMAGE. - - * $FreeBSD$ - */ - -#ifndef _I386_ISA_IF_SR_H_ -#define _I386_ISA_IF_SR_H_ - -/* Node type name and type cookie */ -#define NG_SR_NODE_TYPE "sync_sr" -#define NG_SR_COOKIE 860552148 - -/* Netgraph hooks */ -#define NG_SR_HOOK_DEBUG "debug" -#define NG_SR_HOOK_RAW "rawdata" - -#endif /* _I386_ISA_IF_SR_H_ */ - diff --git a/sys/i386/isa/if_srregs.h b/sys/i386/isa/if_srregs.h deleted file mode 100644 index 64d9ba1..0000000 --- a/sys/i386/isa/if_srregs.h +++ /dev/null @@ -1,123 +0,0 @@ -/* - * Copyright (c) 1995 John Hay. - * Copyright (c) 1996 SDL Communications, Inc. - * 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. Neither the name of the author nor the names of any co-contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY THE AUTHOR 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 AUTHOR 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. - * - * $FreeBSD$ - */ -#ifndef _IF_SRREGS_H_ -#define _IF_SRREGS_H_ - -#define NCHAN 2 /* A HD64570 chip have 2 channels */ - -#define SR_BUF_SIZ 512 -#define SR_TX_BLOCKS 2 /* Sepperate sets of tx buffers */ - -#define SR_CRD_N2 1 -#define SR_CRD_N2PCI 2 - -/* - * RISCom/N2 ISA card. - */ -#define SRC_IO_SIZ 0x10 /* Actually a lie. It uses a lot more. */ -#define SRC_WIN_SIZ 0x00004000 -#define SRC_WIN_MSK (SRC_WIN_SIZ - 1) -#define SRC_WIN_SHFT 14 - -#define SR_FLAGS_NCHAN_MSK 0x0000000F -#define SR_FLAGS_0_CLK_MSK 0x00000030 -#define SR_FLAGS_0_EXT_CLK 0x00000000 /* External RX clock shared by TX */ -#define SR_FLAGS_0_EXT_SEP_CLK 0x00000010 /* Sepperate external clocks */ -#define SR_FLAGS_0_INT_CLK 0x00000020 /* Internal clock */ -#define SR_FLAGS_1_CLK_MSK 0x000000C0 -#define SR_FLAGS_1_EXT_CLK 0x00000000 /* External RX clock shared by TX */ -#define SR_FLAGS_1_EXT_SEP_CLK 0x00000040 /* Sepperate external clocks */ -#define SR_FLAGS_1_INT_CLK 0x00000080 /* Internal clock */ - -#define SR_FLAGS_CLK_SHFT 4 -#define SR_FLAGS_CLK_CHAN_SHFT 2 -#define SR_FLAGS_EXT_CLK 0x00000000 /* External RX clock shared by TX */ -#define SR_FLAGS_EXT_SEP_CLK 0x00000001 /* Sepperate external clocks */ -#define SR_FLAGS_INT_CLK 0x00000002 /* Internal clock */ - -#define SR_PCR 0x00 /* RW, PC Control Register */ -#define SR_BAR 0x02 /* RW, Base Address Register */ -#define SR_PSR 0x04 /* RW, Page Scan Register */ -#define SR_MCR 0x06 /* RW, Modem Control Register */ - -#define SR_PCR_SCARUN 0x01 /* !Reset */ -#define SR_PCR_EN_VPM 0x02 /* Running above 1M */ -#define SR_PCR_MEM_WIN 0x04 /* Open memory window */ -#define SR_PCR_ISA16 0x08 /* 16 bit ISA mode */ -#define SR_PCR_16M_SEL 0xF0 /* A20-A23 Addresses */ - -#define SR_PSR_PG_SEL 0x1F /* Page 0 - 31 select */ -#define SR_PG_MSK 0x1F -#define SR_PSR_WIN_SIZ 0x60 /* Window size select */ -#define SR_PSR_WIN_16K 0x00 -#define SR_PSR_WIN_32K 0x20 -#define SR_PSR_WIN_64K 0x40 -#define SR_PSR_WIN_128K 0x60 -#define SR_PSR_EN_SCA_DMA 0x80 /* Enable the SCA DMA */ - -#define SR_MCR_DTR0 0x01 /* Deactivate DTR0 */ -#define SR_MCR_DTR1 0x02 /* Deactivate DTR1 */ -#define SR_MCR_DSR0 0x04 /* DSR0 Status */ -#define SR_MCR_DSR1 0x08 /* DSR1 Status */ -#define SR_MCR_TE0 0x10 /* Enable RS422 TXD */ -#define SR_MCR_TE1 0x20 /* Enable RS422 TXD */ -#define SR_MCR_ETC0 0x40 /* Enable Ext Clock out */ -#define SR_MCR_ETC1 0x80 /* Enable Ext Clock out */ - -/* - * RISCom/N2 PCI card. - */ -#define SR_FECR 0x0200 /* Front End Control Register */ -#define SR_FECR_ETC0 0x0001 /* Enable Ext Clock out */ -#define SR_FECR_ETC1 0x0002 /* Enable Ext Clock out */ -#define SR_FECR_TE0 0x0004 /* Enable RS422 TXD */ -#define SR_FECR_TE1 0x0008 /* Enable RS422 TXD */ -#define SR_FECR_GPO0 0x0010 /* General Purpose Output */ -#define SR_FECR_GPO1 0x0020 /* General Purpose Output */ -#define SR_FECR_DTR0 0x0040 /* 0 for active, 1 for inactive */ -#define SR_FECR_DTR1 0x0080 /* 0 for active, 1 for inactive */ -#define SR_FECR_DSR0 0x0100 /* DSR0 Status */ -#define SR_FECR_ID0 0x0E00 /* ID of channel 0 */ -#define SR_FECR_DSR1 0x1000 /* DSR1 Status */ -#define SR_FECR_ID1 0xE000 /* ID of channel 1 */ - -#define SR_FE_ID_V35 0x00 /* V.35 Interface */ -#define SR_FE_ID_RS232 0x01 /* RS232 Interface */ -#define SR_FE_ID_TEST 0x02 /* Test Board */ -#define SR_FE_ID_RS422 0x03 /* RS422 Interface */ -#define SR_FE_ID_HSSI 0x05 /* HSSI Interface */ -#define SR_FE_ID_X21 0x06 /* X.21 Interface */ -#define SR_FE_ID_NONE 0x07 /* No card present */ -#define SR_FE_ID0_SHFT 9 -#define SR_FE_ID1_SHFT 13 - -#endif /* _IF_SRREGS_H_ */ diff --git a/sys/pci/if_ar_p.c b/sys/pci/if_ar_p.c deleted file mode 100644 index ad2bfa0..0000000 --- a/sys/pci/if_ar_p.c +++ /dev/null @@ -1,170 +0,0 @@ -/* - * Copyright (c) 1999 - 2001 John Hay. - * 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. Neither the name of the author nor the names of any co-contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY THE AUTHOR 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 AUTHOR 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. - * - * $FreeBSD$ - */ - -#include <sys/param.h> -#include <sys/systm.h> -#include <sys/kernel.h> -#include <sys/malloc.h> -#include <sys/bus.h> -#include <machine/bus.h> -#include <machine/resource.h> -#include <machine/bus_pio.h> -#include <machine/bus_memio.h> -#include <sys/rman.h> - -#include <pci/pcireg.h> -#include <pci/pcivar.h> - -#include <i386/isa/ic/hd64570.h> -#include <i386/isa/if_arregs.h> - -#ifdef TRACE -#define TRC(x) x -#else -#define TRC(x) -#endif - -#define TRCL(x) x - -static int ar_pci_probe(device_t); -static int ar_pci_attach(device_t); - -static device_method_t ar_pci_methods[] = { - /* Device interface */ - DEVMETHOD(device_probe, ar_pci_probe), - DEVMETHOD(device_attach, ar_pci_attach), - DEVMETHOD(device_detach, ar_detach), - { 0, 0 } -}; - -static driver_t ar_pci_driver = { - "ar", - ar_pci_methods, - sizeof(struct ar_hardc), -}; - -DRIVER_MODULE(if_ar, pci, ar_pci_driver, ar_devclass, 0, 0); - -static int -ar_pci_probe(device_t device) -{ - u_int32_t type = pci_get_devid(device); - - switch(type) { - case 0x5012114f: - device_set_desc(device, "Digi SYNC/570i-PCI 2 port"); - return (0); - break; - case 0x5010114f: - printf("Digi SYNC/570i-PCI 2 port (mapped below 1M)\n"); - printf("Please change the jumper to select linear mode.\n"); - break; - case 0x5013114f: - device_set_desc(device, "Digi SYNC/570i-PCI 4 port"); - return (0); - break; - case 0x5011114f: - printf("Digi SYNC/570i-PCI 4 port (mapped below 1M)\n"); - printf("Please change the jumper to select linear mode.\n"); - break; - default: - break; - } - return (ENXIO); -} - -static int -ar_pci_attach(device_t device) -{ - int error; - u_int i, tmp; - u_char *inten; - struct ar_hardc *hc; - - hc = (struct ar_hardc *)device_get_softc(device); - bzero(hc, sizeof(struct ar_hardc)); - - error = ar_allocate_plx_memory(device, 0x10, 1); - if(error) - goto errexit; - - error = ar_allocate_memory(device, 0x18, 1); - if(error) - goto errexit; - - error = ar_allocate_irq(device, 0, 1); - if(error) - goto errexit; - - hc->plx_mem = rman_get_virtual(hc->res_plx_memory); - hc->mem_start = rman_get_virtual(hc->res_memory); - - hc->cunit = device_get_unit(device); - hc->sca[0] = (sca_regs *)(hc->mem_start + AR_PCI_SCA_1_OFFSET); - hc->sca[1] = (sca_regs *)(hc->mem_start + AR_PCI_SCA_2_OFFSET); - hc->iobase = 0; - hc->orbase = (u_char *)(hc->mem_start + AR_PCI_ORBASE_OFFSET); - - tmp = hc->orbase[AR_BMI * 4]; - hc->bustype = tmp & AR_BUS_MSK; - hc->memsize = (tmp & AR_MEM_MSK) >> AR_MEM_SHFT; - hc->memsize = 1 << hc->memsize; - hc->memsize <<= 16; - hc->interface[0] = (tmp & AR_IFACE_MSK); - tmp = hc->orbase[AR_REV * 4]; - hc->revision = tmp & AR_REV_MSK; - hc->winsize = (1 << ((tmp & AR_WSIZ_MSK) >> AR_WSIZ_SHFT)) * 16 * 1024; - hc->mem_end = (caddr_t)(hc->mem_start + hc->winsize); - hc->winmsk = hc->winsize - 1; - hc->numports = hc->orbase[AR_PNUM * 4]; - hc->handshake = hc->orbase[AR_HNDSH * 4]; - - for(i = 1; i < hc->numports; i++) - hc->interface[i] = hc->interface[0]; - - TRC(printf("arp%d: bus %x, rev %d, memstart %p, winsize %d, " - "winmsk %x, interface %x\n", - unit, hc->bustype, hc->revision, hc->mem_start, hc->winsize, - hc->winmsk, hc->interface[0])); - - ar_attach(device); - - /* Magic to enable the card to generate interrupts. */ - inten = (u_char *)hc->plx_mem; - inten[0x69] = 0x09; - - return (0); - -errexit: - ar_deallocate_resources(device); - return (ENXIO); -} - diff --git a/sys/pci/if_sr_p.c b/sys/pci/if_sr_p.c deleted file mode 100644 index b8ac2cc..0000000 --- a/sys/pci/if_sr_p.c +++ /dev/null @@ -1,138 +0,0 @@ -/* - * Copyright (c) 1996 John Hay. - * Copyright (c) 1996 SDL Communications, Inc. - * 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. Neither the name of the author nor the names of any co-contributors - * may be used to endorse or promote products derived from this software - * without specific prior written permission. - * - * THIS SOFTWARE IS PROVIDED BY THE AUTHOR 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 AUTHOR 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. - * - * $FreeBSD$ - */ - -#ifdef COMPILING_LINT -#warning "The sr pci driver is broken and is not compiled with LINT" -#else - -#include "sr.h" - -#include <sys/param.h> -#include <sys/systm.h> -#include <sys/kernel.h> -#include <sys/malloc.h> - -#include <pci/pcivar.h> - -#ifndef COMPAT_OLDPCI -#error "The sr device requires the old pci compatibility shims" -#endif - -#ifndef BUGGY -#define BUGGY 0 -#endif - -/* - * The must match with the real functions in if_sr.c - */ -extern void *srattach_pci(int unit, - vm_offset_t plx_vaddr, - vm_offset_t sca_vaddr); -extern void srintr_hc(void *hc); - -static const char *sr_pci_probe(pcici_t tag, pcidi_t type); -static void sr_pci_attach(pcici_t config_id, int unit); - -static u_long src_count = NSR; - -static struct pci_device sr_pci_driver = -{ - "src", - sr_pci_probe, - sr_pci_attach, - &src_count, - NULL -}; - -COMPAT_PCI_DRIVER (sr_pci, sr_pci_driver); - -static const char * -sr_pci_probe(pcici_t tag, pcidi_t type) -{ - switch(type) { - case 0x556812aa: - return ("RISCom/N2pci"); - break; - case 0x55684778: - case 0x55684877: - /* - * XXX This can probably be removed sometime. - */ - return ("RISCom/N2pci (old id)"); - break; - default: - break; - } - return (0); -} - -static void -sr_pci_attach(pcici_t config_id, int unit) -{ - void *hc; -#if BUGGY > 0 - u_int *fecr; -#endif - vm_offset_t plx_vaddr, plx_paddr, sca_vaddr, sca_paddr; - -#if BUGGY > 0 - printf("srp: ID %x\n", pci_conf_read(config_id, 0)); - printf("srp: BADR0 %x\n", pci_conf_read(config_id, 0x10)); - printf("srp: BADR1 %x\n", pci_conf_read(config_id, 0x18)); -#endif - if(!pci_map_mem(config_id, 0x10, &plx_vaddr, &plx_paddr)) { - printf("srp: map failed.\n"); - return; - } -#if BUGGY > 0 - printf("srp: vaddr %x, paddr %x\n", plx_vaddr, plx_paddr); -#endif - if(!pci_map_mem(config_id, 0x18, &sca_vaddr, &sca_paddr)) { - printf("srp: map failed.\n"); - return; - } -#if BUGGY > 0 - printf("srp: vaddr %x, paddr %x\n", sca_vaddr, sca_paddr); - fecr = (u_int *)(sca_vaddr + 0x200); - printf("srp: FECR %x\n", *fecr); -#endif - - hc = srattach_pci(unit, plx_vaddr, sca_vaddr); - if(!hc) - return; - - if(!pci_map_int(config_id, srintr_hc, (void *)hc, &net_imask)) { - free(hc, M_DEVBUF); - return; - } -} -#endif |