Home | History | Annotate | Line # | Download | only in dev
if_xe.c revision 1.22
      1  1.22       chs /*	$NetBSD: if_xe.c,v 1.22 2012/10/27 17:18:05 chs Exp $	*/
      2   1.1       dbj /*
      3   1.1       dbj  * Copyright (c) 1998 Darrin B. Jewell
      4   1.1       dbj  * All rights reserved.
      5   1.1       dbj  *
      6   1.1       dbj  * Redistribution and use in source and binary forms, with or without
      7   1.1       dbj  * modification, are permitted provided that the following conditions
      8   1.1       dbj  * are met:
      9   1.1       dbj  * 1. Redistributions of source code must retain the above copyright
     10   1.1       dbj  *    notice, this list of conditions and the following disclaimer.
     11   1.1       dbj  * 2. Redistributions in binary form must reproduce the above copyright
     12   1.1       dbj  *    notice, this list of conditions and the following disclaimer in the
     13   1.1       dbj  *    documentation and/or other materials provided with the distribution.
     14   1.1       dbj  *
     15   1.1       dbj  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     16   1.1       dbj  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     17   1.1       dbj  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     18   1.1       dbj  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     19   1.1       dbj  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
     20   1.1       dbj  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
     21   1.1       dbj  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
     22   1.1       dbj  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
     23   1.1       dbj  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
     24   1.1       dbj  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     25   1.1       dbj  */
     26  1.14     lukem 
     27  1.14     lukem #include <sys/cdefs.h>
     28  1.22       chs __KERNEL_RCSID(0, "$NetBSD: if_xe.c,v 1.22 2012/10/27 17:18:05 chs Exp $");
     29   1.1       dbj 
     30   1.2  jonathan #include "opt_inet.h"
     31   1.1       dbj 
     32   1.1       dbj #include <sys/param.h>
     33   1.1       dbj #include <sys/systm.h>
     34   1.1       dbj #include <sys/mbuf.h>
     35   1.1       dbj #include <sys/syslog.h>
     36   1.1       dbj #include <sys/socket.h>
     37   1.1       dbj #include <sys/device.h>
     38   1.1       dbj 
     39   1.1       dbj #include <net/if.h>
     40   1.1       dbj #include <net/if_ether.h>
     41   1.1       dbj #include <net/if_media.h>
     42   1.1       dbj 
     43   1.1       dbj #ifdef INET
     44   1.1       dbj #include <netinet/in.h>
     45   1.1       dbj #include <netinet/if_inarp.h>
     46   1.1       dbj #endif
     47   1.1       dbj 
     48   1.1       dbj #include <machine/autoconf.h>
     49   1.1       dbj #include <machine/cpu.h>
     50   1.1       dbj #include <machine/intr.h>
     51   1.1       dbj #include <machine/bus.h>
     52   1.1       dbj 
     53   1.1       dbj #include <next68k/next68k/isr.h>
     54   1.1       dbj 
     55   1.1       dbj #include <next68k/dev/mb8795reg.h>
     56   1.1       dbj #include <next68k/dev/mb8795var.h>
     57   1.1       dbj 
     58   1.7   mycroft #include <next68k/dev/bmapreg.h>
     59   1.7   mycroft #include <next68k/dev/intiovar.h>
     60   1.1       dbj #include <next68k/dev/nextdmareg.h>
     61   1.1       dbj #include <next68k/dev/nextdmavar.h>
     62   1.1       dbj 
     63   1.1       dbj #include <next68k/dev/if_xevar.h>
     64   1.7   mycroft #include <next68k/dev/if_xereg.h>
     65   1.7   mycroft 
     66   1.7   mycroft #ifdef DEBUG
     67   1.7   mycroft #define XE_DEBUG
     68   1.7   mycroft #endif
     69   1.1       dbj 
     70   1.7   mycroft #ifdef XE_DEBUG
     71   1.7   mycroft int xe_debug = 0;
     72   1.7   mycroft #define DPRINTF(x) if (xe_debug) printf x;
     73   1.7   mycroft extern char *ndtracep;
     74   1.7   mycroft extern char ndtrace[];
     75   1.7   mycroft extern int ndtraceshow;
     76   1.7   mycroft #define NDTRACEIF(x) if (10 && ndtracep < (ndtrace + 8192)) do {x;} while (0)
     77   1.7   mycroft #else
     78   1.7   mycroft #define DPRINTF(x)
     79   1.7   mycroft #define NDTRACEIF(x)
     80   1.7   mycroft #endif
     81   1.7   mycroft #define PRINTF(x) printf x;
     82   1.7   mycroft 
     83   1.7   mycroft extern int turbo;
     84   1.1       dbj 
     85  1.22       chs int	xe_match(device_t, cfdata_t, void *);
     86  1.22       chs void	xe_attach(device_t, device_t, void *);
     87  1.16       chs int	xe_tint(void *);
     88  1.16       chs int	xe_rint(void *);
     89  1.16       chs 
     90  1.16       chs struct mbuf * xe_dma_rxmap_load(struct mb8795_softc *, bus_dmamap_t);
     91  1.16       chs 
     92  1.16       chs bus_dmamap_t xe_dma_rx_continue(void *);
     93  1.16       chs void xe_dma_rx_completed(bus_dmamap_t, void *);
     94  1.16       chs bus_dmamap_t xe_dma_tx_continue(void *);
     95  1.16       chs void xe_dma_tx_completed(bus_dmamap_t, void *);
     96  1.16       chs void xe_dma_rx_shutdown(void *);
     97  1.16       chs void xe_dma_tx_shutdown(void *);
     98   1.7   mycroft 
     99  1.22       chs static void	findchannel_defer(device_t);
    100   1.7   mycroft 
    101  1.22       chs CFATTACH_DECL_NEW(xe, sizeof(struct xe_softc),
    102  1.11   thorpej     xe_match, xe_attach, NULL, NULL);
    103   1.1       dbj 
    104   1.7   mycroft static int xe_dma_medias[] = {
    105   1.6  christos 	IFM_ETHER|IFM_AUTO,
    106   1.6  christos 	IFM_ETHER|IFM_10_T,
    107   1.6  christos 	IFM_ETHER|IFM_10_2,
    108   1.6  christos };
    109   1.7   mycroft static int nxe_dma_medias = (sizeof(xe_dma_medias)/sizeof(xe_dma_medias[0]));
    110   1.7   mycroft 
    111   1.7   mycroft static int attached = 0;
    112   1.7   mycroft 
    113   1.7   mycroft /*
    114   1.7   mycroft  * Functions and the switch for the MI code.
    115   1.7   mycroft  */
    116  1.16       chs u_char		xe_read_reg(struct mb8795_softc *, int);
    117  1.16       chs void		xe_write_reg(struct mb8795_softc *, int, u_char);
    118  1.16       chs void		xe_dma_reset(struct mb8795_softc *);
    119  1.16       chs void		xe_dma_rx_setup(struct mb8795_softc *);
    120  1.16       chs void		xe_dma_rx_go(struct mb8795_softc *);
    121  1.16       chs struct mbuf *	xe_dma_rx_mbuf(struct mb8795_softc *);
    122  1.16       chs void		xe_dma_tx_setup(struct mb8795_softc *);
    123  1.16       chs void		xe_dma_tx_go(struct mb8795_softc *);
    124  1.16       chs int		xe_dma_tx_mbuf(struct mb8795_softc *, struct mbuf *);
    125  1.16       chs int		xe_dma_tx_isactive(struct mb8795_softc *);
    126   1.7   mycroft 
    127   1.7   mycroft struct mb8795_glue xe_glue = {
    128   1.7   mycroft 	xe_read_reg,
    129   1.7   mycroft 	xe_write_reg,
    130   1.7   mycroft 	xe_dma_reset,
    131   1.7   mycroft 	xe_dma_rx_setup,
    132   1.7   mycroft 	xe_dma_rx_go,
    133   1.7   mycroft 	xe_dma_rx_mbuf,
    134   1.7   mycroft 	xe_dma_tx_setup,
    135   1.7   mycroft 	xe_dma_tx_go,
    136   1.7   mycroft 	xe_dma_tx_mbuf,
    137   1.7   mycroft 	xe_dma_tx_isactive,
    138   1.7   mycroft };
    139   1.6  christos 
    140   1.1       dbj int
    141  1.22       chs xe_match(device_t parent, cfdata_t match, void *aux)
    142   1.1       dbj {
    143   1.7   mycroft 	struct intio_attach_args *ia = (struct intio_attach_args *)aux;
    144   1.7   mycroft 
    145   1.7   mycroft 	if (attached)
    146   1.7   mycroft 		return (0);
    147   1.7   mycroft 
    148   1.7   mycroft 	ia->ia_addr = (void *)NEXT_P_ENET;
    149   1.7   mycroft 
    150   1.7   mycroft 	return (1);
    151   1.7   mycroft }
    152   1.7   mycroft 
    153   1.7   mycroft static void
    154  1.22       chs findchannel_defer(device_t self)
    155   1.7   mycroft {
    156  1.22       chs 	struct xe_softc *xsc = device_private(self);
    157   1.7   mycroft 	struct mb8795_softc *sc = &xsc->sc_mb8795;
    158   1.7   mycroft 	int i, error;
    159   1.7   mycroft 
    160   1.7   mycroft 	if (!xsc->sc_txdma) {
    161   1.7   mycroft 		xsc->sc_txdma = nextdma_findchannel ("enetx");
    162   1.7   mycroft 		if (xsc->sc_txdma == NULL)
    163  1.22       chs 			panic("%s: can't find enetx DMA channel",
    164  1.22       chs 			       device_xname(sc->sc_dev));
    165   1.7   mycroft 	}
    166   1.7   mycroft 	if (!xsc->sc_rxdma) {
    167   1.7   mycroft 		xsc->sc_rxdma = nextdma_findchannel ("enetr");
    168   1.7   mycroft 		if (xsc->sc_rxdma == NULL)
    169  1.13       wiz 			panic ("%s: can't find enetr DMA channel",
    170  1.22       chs 			       device_xname(sc->sc_dev));
    171   1.7   mycroft 	}
    172  1.22       chs 	aprint_normal_dev(sc->sc_dev, "using DMA channels %s %s\n",
    173  1.22       chs 		device_xname(xsc->sc_txdma->sc_dev),
    174  1.22       chs 		device_xname(xsc->sc_rxdma->sc_dev));
    175   1.7   mycroft 
    176   1.7   mycroft 	nextdma_setconf (xsc->sc_rxdma, continue_cb, xe_dma_rx_continue);
    177   1.7   mycroft 	nextdma_setconf (xsc->sc_rxdma, completed_cb, xe_dma_rx_completed);
    178   1.7   mycroft 	nextdma_setconf (xsc->sc_rxdma, shutdown_cb, xe_dma_rx_shutdown);
    179   1.7   mycroft 	nextdma_setconf (xsc->sc_rxdma, cb_arg, sc);
    180   1.7   mycroft 
    181   1.7   mycroft 	nextdma_setconf (xsc->sc_txdma, continue_cb, xe_dma_tx_continue);
    182   1.7   mycroft 	nextdma_setconf (xsc->sc_txdma, completed_cb, xe_dma_tx_completed);
    183   1.7   mycroft 	nextdma_setconf (xsc->sc_txdma, shutdown_cb, xe_dma_tx_shutdown);
    184   1.7   mycroft 	nextdma_setconf (xsc->sc_txdma, cb_arg, sc);
    185   1.7   mycroft 
    186  1.13       wiz 	/* Initialize the DMA maps */
    187   1.7   mycroft 	error = bus_dmamap_create(xsc->sc_txdma->sc_dmat, MCLBYTES,
    188   1.7   mycroft 				  (MCLBYTES/MSIZE), MCLBYTES, 0, BUS_DMA_ALLOCNOW,
    189   1.7   mycroft 				  &xsc->sc_tx_dmamap);
    190   1.7   mycroft 	if (error) {
    191  1.22       chs 		aprint_error_dev(sc->sc_dev, "can't create tx DMA map, error = %d",
    192  1.22       chs 		      error);
    193   1.7   mycroft 	}
    194   1.7   mycroft 
    195   1.7   mycroft 	for(i = 0; i < MB8795_NRXBUFS; i++) {
    196   1.7   mycroft 		error = bus_dmamap_create(xsc->sc_rxdma->sc_dmat, MCLBYTES,
    197   1.7   mycroft 					  (MCLBYTES/MSIZE), MCLBYTES, 0, BUS_DMA_ALLOCNOW,
    198   1.7   mycroft 					  &xsc->sc_rx_dmamap[i]);
    199   1.7   mycroft 		if (error) {
    200   1.8    provos 			panic("%s: can't create rx DMA map, error = %d",
    201  1.22       chs 			      device_xname(sc->sc_dev), error);
    202   1.7   mycroft 		}
    203   1.7   mycroft 		xsc->sc_rx_mb_head[i] = NULL;
    204   1.7   mycroft 	}
    205   1.7   mycroft 	xsc->sc_rx_loaded_idx = 0;
    206   1.7   mycroft 	xsc->sc_rx_completed_idx = 0;
    207   1.7   mycroft 	xsc->sc_rx_handled_idx = 0;
    208   1.7   mycroft 
    209   1.7   mycroft 	/* @@@ more next hacks
    210   1.7   mycroft 	 * the  2000 covers at least a 1500 mtu + headers
    211   1.7   mycroft 	 * + DMA_BEGINALIGNMENT+ DMA_ENDALIGNMENT
    212   1.7   mycroft 	 */
    213   1.7   mycroft 	xsc->sc_txbuf = malloc(2000, M_DEVBUF, M_NOWAIT);
    214   1.7   mycroft 	if (!xsc->sc_txbuf)
    215  1.22       chs 		panic("%s: can't malloc tx DMA buffer", device_xname(sc->sc_dev));
    216   1.7   mycroft 
    217   1.7   mycroft 	xsc->sc_tx_mb_head = NULL;
    218   1.7   mycroft 	xsc->sc_tx_loaded = 0;
    219   1.7   mycroft 
    220   1.7   mycroft 	mb8795_config(sc, xe_dma_medias, nxe_dma_medias, xe_dma_medias[0]);
    221   1.7   mycroft 
    222   1.7   mycroft 	isrlink_autovec(xe_tint, sc, NEXT_I_IPL(NEXT_I_ENETX), 1, NULL);
    223   1.7   mycroft 	INTR_ENABLE(NEXT_I_ENETX);
    224   1.7   mycroft 	isrlink_autovec(xe_rint, sc, NEXT_I_IPL(NEXT_I_ENETR), 1, NULL);
    225   1.7   mycroft 	INTR_ENABLE(NEXT_I_ENETR);
    226   1.1       dbj }
    227   1.1       dbj 
    228   1.1       dbj void
    229  1.22       chs xe_attach(device_t parent, device_t self, void *aux)
    230   1.1       dbj {
    231   1.7   mycroft 	struct intio_attach_args *ia = (struct intio_attach_args *)aux;
    232  1.22       chs 	struct xe_softc *xsc = device_private(self);
    233   1.7   mycroft 	struct mb8795_softc *sc = &xsc->sc_mb8795;
    234   1.7   mycroft 
    235  1.22       chs 	sc->sc_dev = self;
    236  1.22       chs 	DPRINTF(("%s: xe_attach()\n", device_xname(self)));
    237   1.7   mycroft 
    238   1.7   mycroft 	{
    239   1.7   mycroft 		extern u_char rom_enetaddr[6];     /* kludge from machdep.c:next68k_bootargs() */
    240   1.7   mycroft 		int i;
    241   1.7   mycroft 		for(i=0;i<6;i++) {
    242   1.7   mycroft 			sc->sc_enaddr[i] = rom_enetaddr[i];
    243   1.7   mycroft 		}
    244   1.7   mycroft 	}
    245   1.7   mycroft 
    246   1.7   mycroft 	printf("\n%s: MAC address %02x:%02x:%02x:%02x:%02x:%02x\n",
    247  1.22       chs 	       device_xname(self),
    248   1.7   mycroft 	       sc->sc_enaddr[0],sc->sc_enaddr[1],sc->sc_enaddr[2],
    249   1.7   mycroft 	       sc->sc_enaddr[3],sc->sc_enaddr[4],sc->sc_enaddr[5]);
    250   1.7   mycroft 
    251   1.7   mycroft 	xsc->sc_bst = ia->ia_bst;
    252   1.7   mycroft 	if (bus_space_map(xsc->sc_bst, NEXT_P_ENET,
    253   1.7   mycroft 			  XE_DEVICE_SIZE, 0, &xsc->sc_bsh)) {
    254   1.8    provos 		panic("\n%s: can't map mb8795 registers",
    255  1.22       chs 		      device_xname(self));
    256   1.7   mycroft 	}
    257   1.1       dbj 
    258   1.7   mycroft 	sc->sc_bmap_bst = ia->ia_bst;
    259   1.7   mycroft 	if (bus_space_map(sc->sc_bmap_bst, NEXT_P_BMAP,
    260   1.7   mycroft 			  BMAP_SIZE, 0, &sc->sc_bmap_bsh)) {
    261   1.8    provos 		panic("\n%s: can't map bmap registers",
    262  1.22       chs 		      device_xname(self));
    263   1.7   mycroft 	}
    264   1.1       dbj 
    265   1.7   mycroft 	/*
    266   1.7   mycroft 	 * Set up glue for MI code.
    267   1.1       dbj 	 */
    268   1.7   mycroft 	sc->sc_glue = &xe_glue;
    269   1.1       dbj 
    270  1.22       chs 	xsc->sc_txdma = nextdma_findchannel("enetx");
    271  1.22       chs 	xsc->sc_rxdma = nextdma_findchannel("enetr");
    272   1.7   mycroft 	if (xsc->sc_rxdma && xsc->sc_txdma) {
    273  1.22       chs 		findchannel_defer(self);
    274   1.7   mycroft 	} else {
    275  1.22       chs 		config_defer(self, findchannel_defer);
    276   1.7   mycroft 	}
    277   1.1       dbj 
    278   1.7   mycroft 	attached = 1;
    279   1.1       dbj }
    280   1.1       dbj 
    281   1.1       dbj int
    282  1.16       chs xe_tint(void *arg)
    283   1.1       dbj {
    284   1.7   mycroft 	if (!INTR_OCCURRED(NEXT_I_ENETX))
    285   1.7   mycroft 		return 0;
    286   1.7   mycroft 	mb8795_tint((struct mb8795_softc *)arg);
    287   1.7   mycroft 	return(1);
    288   1.1       dbj }
    289   1.1       dbj 
    290   1.1       dbj int
    291  1.16       chs xe_rint(void *arg)
    292   1.7   mycroft {
    293   1.7   mycroft 	if (!INTR_OCCURRED(NEXT_I_ENETR))
    294   1.7   mycroft 		return(0);
    295   1.7   mycroft 	mb8795_rint((struct mb8795_softc *)arg);
    296   1.7   mycroft 	return(1);
    297   1.7   mycroft }
    298   1.7   mycroft 
    299   1.7   mycroft /*
    300   1.7   mycroft  * Glue functions.
    301   1.7   mycroft  */
    302   1.7   mycroft 
    303   1.7   mycroft u_char
    304  1.16       chs xe_read_reg(struct mb8795_softc *sc, int reg)
    305   1.7   mycroft {
    306   1.7   mycroft 	struct xe_softc *xsc = (struct xe_softc *)sc;
    307   1.7   mycroft 
    308   1.7   mycroft 	return(bus_space_read_1(xsc->sc_bst, xsc->sc_bsh, reg));
    309   1.7   mycroft }
    310   1.7   mycroft 
    311   1.7   mycroft void
    312  1.16       chs xe_write_reg(struct mb8795_softc *sc, int reg, u_char val)
    313   1.7   mycroft {
    314   1.7   mycroft 	struct xe_softc *xsc = (struct xe_softc *)sc;
    315   1.7   mycroft 
    316   1.7   mycroft 	bus_space_write_1(xsc->sc_bst, xsc->sc_bsh, reg, val);
    317   1.7   mycroft }
    318   1.7   mycroft 
    319   1.7   mycroft void
    320  1.16       chs xe_dma_reset(struct mb8795_softc *sc)
    321   1.7   mycroft {
    322   1.7   mycroft 	struct xe_softc *xsc = (struct xe_softc *)sc;
    323   1.7   mycroft 	int i;
    324   1.7   mycroft 
    325  1.13       wiz 	DPRINTF(("xe DMA reset\n"));
    326   1.7   mycroft 
    327   1.7   mycroft 	nextdma_reset(xsc->sc_rxdma);
    328   1.7   mycroft 	nextdma_reset(xsc->sc_txdma);
    329   1.7   mycroft 
    330   1.7   mycroft 	if (xsc->sc_tx_loaded) {
    331   1.7   mycroft 		bus_dmamap_sync(xsc->sc_txdma->sc_dmat, xsc->sc_tx_dmamap,
    332   1.7   mycroft 				0, xsc->sc_tx_dmamap->dm_mapsize,
    333   1.7   mycroft 				BUS_DMASYNC_POSTWRITE);
    334   1.7   mycroft 		bus_dmamap_unload(xsc->sc_txdma->sc_dmat, xsc->sc_tx_dmamap);
    335   1.7   mycroft 		xsc->sc_tx_loaded = 0;
    336   1.7   mycroft 	}
    337   1.7   mycroft 	if (xsc->sc_tx_mb_head) {
    338   1.7   mycroft 		m_freem(xsc->sc_tx_mb_head);
    339   1.7   mycroft 		xsc->sc_tx_mb_head = NULL;
    340   1.7   mycroft 	}
    341   1.7   mycroft 
    342   1.7   mycroft 	for(i = 0; i < MB8795_NRXBUFS; i++) {
    343   1.7   mycroft 		if (xsc->sc_rx_mb_head[i]) {
    344   1.7   mycroft 			bus_dmamap_unload(xsc->sc_rxdma->sc_dmat, xsc->sc_rx_dmamap[i]);
    345   1.7   mycroft 			m_freem(xsc->sc_rx_mb_head[i]);
    346   1.7   mycroft 			xsc->sc_rx_mb_head[i] = NULL;
    347   1.7   mycroft 		}
    348   1.7   mycroft 	}
    349   1.7   mycroft }
    350   1.7   mycroft 
    351   1.7   mycroft void
    352  1.16       chs xe_dma_rx_setup(struct mb8795_softc *sc)
    353   1.7   mycroft {
    354   1.7   mycroft 	struct xe_softc *xsc = (struct xe_softc *)sc;
    355   1.7   mycroft 	int i;
    356   1.7   mycroft 
    357  1.13       wiz 	DPRINTF(("xe DMA rx setup\n"));
    358   1.7   mycroft 
    359   1.7   mycroft 	for(i = 0; i < MB8795_NRXBUFS; i++) {
    360   1.7   mycroft 		xsc->sc_rx_mb_head[i] =
    361   1.7   mycroft 			xe_dma_rxmap_load(sc, xsc->sc_rx_dmamap[i]);
    362   1.7   mycroft 	}
    363   1.7   mycroft 	xsc->sc_rx_loaded_idx = 0;
    364   1.7   mycroft 	xsc->sc_rx_completed_idx = 0;
    365   1.7   mycroft 	xsc->sc_rx_handled_idx = 0;
    366   1.7   mycroft 
    367   1.7   mycroft 	nextdma_init(xsc->sc_rxdma);
    368   1.7   mycroft }
    369   1.7   mycroft 
    370   1.7   mycroft void
    371  1.16       chs xe_dma_rx_go(struct mb8795_softc *sc)
    372   1.7   mycroft {
    373   1.7   mycroft 	struct xe_softc *xsc = (struct xe_softc *)sc;
    374   1.7   mycroft 
    375  1.13       wiz 	DPRINTF(("xe DMA rx go\n"));
    376   1.7   mycroft 
    377   1.7   mycroft 	nextdma_start(xsc->sc_rxdma, DMACSR_SETREAD);
    378   1.7   mycroft }
    379   1.7   mycroft 
    380   1.7   mycroft struct mbuf *
    381  1.16       chs xe_dma_rx_mbuf(struct mb8795_softc *sc)
    382   1.7   mycroft {
    383   1.7   mycroft 	struct xe_softc *xsc = (struct xe_softc *)sc;
    384   1.7   mycroft 	bus_dmamap_t map;
    385   1.7   mycroft 	struct mbuf *m;
    386   1.7   mycroft 
    387   1.7   mycroft 	m = NULL;
    388   1.7   mycroft 	if (xsc->sc_rx_handled_idx != xsc->sc_rx_completed_idx) {
    389   1.7   mycroft 		xsc->sc_rx_handled_idx++;
    390   1.7   mycroft 		xsc->sc_rx_handled_idx %= MB8795_NRXBUFS;
    391   1.7   mycroft 
    392   1.7   mycroft 		map = xsc->sc_rx_dmamap[xsc->sc_rx_handled_idx];
    393   1.7   mycroft 		m = xsc->sc_rx_mb_head[xsc->sc_rx_handled_idx];
    394   1.7   mycroft 
    395   1.7   mycroft 		m->m_len = map->dm_xfer_len;
    396   1.7   mycroft 
    397   1.7   mycroft 		bus_dmamap_sync(xsc->sc_rxdma->sc_dmat, map,
    398   1.7   mycroft 				0, map->dm_mapsize, BUS_DMASYNC_POSTREAD);
    399   1.7   mycroft 
    400   1.7   mycroft 		bus_dmamap_unload(xsc->sc_rxdma->sc_dmat, map);
    401   1.7   mycroft 
    402   1.7   mycroft 		/* Install a fresh mbuf for next packet */
    403   1.7   mycroft 
    404   1.7   mycroft 		xsc->sc_rx_mb_head[xsc->sc_rx_handled_idx] =
    405   1.7   mycroft 			xe_dma_rxmap_load(sc,map);
    406   1.7   mycroft 
    407   1.7   mycroft 		/* Punt runt packets
    408  1.13       wiz 		 * DMA restarts create 0 length packets for example
    409   1.7   mycroft 		 */
    410   1.7   mycroft 		if (m->m_len < ETHER_MIN_LEN) {
    411   1.7   mycroft 			m_freem(m);
    412   1.7   mycroft 			m = NULL;
    413   1.7   mycroft 		}
    414   1.7   mycroft 	}
    415   1.7   mycroft 	return (m);
    416   1.7   mycroft }
    417   1.7   mycroft 
    418   1.7   mycroft void
    419  1.16       chs xe_dma_tx_setup(struct mb8795_softc *sc)
    420   1.7   mycroft {
    421   1.7   mycroft 	struct xe_softc *xsc = (struct xe_softc *)sc;
    422   1.7   mycroft 
    423  1.13       wiz 	DPRINTF(("xe DMA tx setup\n"));
    424   1.7   mycroft 
    425   1.7   mycroft 	nextdma_init(xsc->sc_txdma);
    426   1.7   mycroft }
    427   1.7   mycroft 
    428   1.7   mycroft void
    429  1.16       chs xe_dma_tx_go(struct mb8795_softc *sc)
    430   1.7   mycroft {
    431   1.7   mycroft 	struct xe_softc *xsc = (struct xe_softc *)sc;
    432   1.7   mycroft 
    433  1.13       wiz 	DPRINTF(("xe DMA tx go\n"));
    434   1.7   mycroft 
    435   1.7   mycroft 	nextdma_start(xsc->sc_txdma, DMACSR_SETWRITE);
    436   1.7   mycroft }
    437   1.7   mycroft 
    438   1.7   mycroft int
    439  1.16       chs xe_dma_tx_mbuf(struct mb8795_softc *sc, struct mbuf *m)
    440   1.7   mycroft {
    441   1.7   mycroft 	struct xe_softc *xsc = (struct xe_softc *)sc;
    442   1.7   mycroft 	int error;
    443   1.7   mycroft 
    444   1.7   mycroft 	xsc->sc_tx_mb_head = m;
    445   1.7   mycroft 
    446   1.7   mycroft /* The following is a next specific hack that should
    447   1.7   mycroft  * probably be moved out of MI code.
    448   1.7   mycroft  * This macro assumes it can move forward as needed
    449   1.7   mycroft  * in the buffer.  Perhaps it should zero the extra buffer.
    450   1.7   mycroft  */
    451   1.7   mycroft #define REALIGN_DMABUF(s,l) \
    452   1.7   mycroft 	{ (s) = ((u_char *)(((unsigned)(s)+DMA_BEGINALIGNMENT-1) \
    453   1.7   mycroft 			&~(DMA_BEGINALIGNMENT-1))); \
    454   1.7   mycroft     (l) = ((u_char *)(((unsigned)((s)+(l))+DMA_ENDALIGNMENT-1) \
    455   1.7   mycroft 				&~(DMA_ENDALIGNMENT-1)))-(s);}
    456   1.7   mycroft 
    457   1.7   mycroft #if 0
    458   1.7   mycroft 	error = bus_dmamap_load_mbuf(xsc->sc_txdma->sc_dmat,
    459   1.7   mycroft 				     xsc->sc_tx_dmamap, xsc->sc_tx_mb_head, BUS_DMA_NOWAIT);
    460   1.7   mycroft #else
    461   1.7   mycroft 	{
    462   1.7   mycroft 		u_char *buf = xsc->sc_txbuf;
    463   1.7   mycroft 		int buflen = 0;
    464   1.7   mycroft 
    465   1.7   mycroft 		buflen = m->m_pkthdr.len;
    466   1.7   mycroft 
    467   1.7   mycroft 		{
    468   1.7   mycroft 			u_char *p = buf;
    469   1.7   mycroft 			for (m=xsc->sc_tx_mb_head; m; m = m->m_next) {
    470   1.7   mycroft 				if (m->m_len == 0) continue;
    471  1.19    cegger 				memcpy(p, mtod(m, u_char *), m->m_len);
    472   1.7   mycroft 				p += m->m_len;
    473  1.12    bouyer 			}
    474  1.12    bouyer 			/* Fix runt packets */
    475  1.12    bouyer 			if (buflen < ETHER_MIN_LEN - ETHER_CRC_LEN) {
    476  1.12    bouyer 				memset(p, 0,
    477  1.12    bouyer 				    ETHER_MIN_LEN - ETHER_CRC_LEN - buflen);
    478  1.12    bouyer 				buflen = ETHER_MIN_LEN - ETHER_CRC_LEN;
    479   1.7   mycroft 			}
    480   1.7   mycroft 		}
    481   1.7   mycroft 
    482   1.7   mycroft 		error = bus_dmamap_load(xsc->sc_txdma->sc_dmat, xsc->sc_tx_dmamap,
    483   1.7   mycroft 					buf,buflen,NULL,BUS_DMA_NOWAIT);
    484   1.7   mycroft 	}
    485   1.7   mycroft #endif
    486   1.7   mycroft 	if (error) {
    487  1.22       chs 		aprint_error_dev(sc->sc_dev, "can't load mbuf chain, error = %d\n",
    488  1.22       chs 		    error);
    489   1.7   mycroft 		m_freem(xsc->sc_tx_mb_head);
    490   1.7   mycroft 		xsc->sc_tx_mb_head = NULL;
    491   1.7   mycroft 		return (error);
    492   1.7   mycroft 	}
    493   1.7   mycroft 
    494   1.7   mycroft #ifdef DIAGNOSTIC
    495   1.7   mycroft 	if (xsc->sc_tx_loaded != 0) {
    496  1.22       chs 		panic("%s: xsc->sc_tx_loaded is %d", device_xname(sc->sc_dev),
    497   1.7   mycroft 		      xsc->sc_tx_loaded);
    498   1.7   mycroft 	}
    499   1.7   mycroft #endif
    500   1.7   mycroft 
    501   1.7   mycroft 	bus_dmamap_sync(xsc->sc_txdma->sc_dmat, xsc->sc_tx_dmamap, 0,
    502   1.7   mycroft 			xsc->sc_tx_dmamap->dm_mapsize, BUS_DMASYNC_PREWRITE);
    503   1.7   mycroft 
    504   1.7   mycroft 	return (0);
    505   1.7   mycroft }
    506   1.7   mycroft 
    507   1.7   mycroft int
    508  1.16       chs xe_dma_tx_isactive(struct mb8795_softc *sc)
    509   1.7   mycroft {
    510   1.7   mycroft 	struct xe_softc *xsc = (struct xe_softc *)sc;
    511   1.7   mycroft 
    512   1.7   mycroft 	return (xsc->sc_tx_loaded != 0);
    513   1.7   mycroft }
    514   1.7   mycroft 
    515   1.7   mycroft /****************************************************************/
    516   1.7   mycroft 
    517   1.7   mycroft void
    518  1.16       chs xe_dma_tx_completed(bus_dmamap_t map, void *arg)
    519   1.7   mycroft {
    520  1.15  perseant #if defined (XE_DEBUG) || defined (DIAGNOSTIC)
    521   1.7   mycroft 	struct mb8795_softc *sc = arg;
    522  1.15  perseant #endif
    523  1.15  perseant #ifdef DIAGNOSTIC
    524   1.7   mycroft 	struct xe_softc *xsc = (struct xe_softc *)sc;
    525  1.15  perseant #endif
    526   1.7   mycroft 
    527  1.22       chs 	DPRINTF(("%s: xe_dma_tx_completed()\n", device_xname(sc->sc_dev)));
    528   1.7   mycroft 
    529   1.7   mycroft #ifdef DIAGNOSTIC
    530   1.7   mycroft 	if (!xsc->sc_tx_loaded) {
    531  1.22       chs 		panic("%s: tx completed never loaded", device_xname(sc->sc_dev));
    532   1.7   mycroft 	}
    533   1.7   mycroft 	if (map != xsc->sc_tx_dmamap) {
    534  1.22       chs 		panic("%s: unexpected tx completed map", device_xname(sc->sc_dev));
    535   1.7   mycroft 	}
    536   1.7   mycroft 
    537   1.7   mycroft #endif
    538   1.7   mycroft }
    539   1.7   mycroft 
    540   1.7   mycroft void
    541  1.16       chs xe_dma_tx_shutdown(void *arg)
    542   1.1       dbj {
    543   1.7   mycroft 	struct mb8795_softc *sc = arg;
    544   1.7   mycroft 	struct xe_softc *xsc = (struct xe_softc *)sc;
    545   1.7   mycroft 	struct ifnet *ifp = &sc->sc_ethercom.ec_if;
    546   1.7   mycroft 
    547  1.22       chs 	DPRINTF(("%s: xe_dma_tx_shutdown()\n", device_xname(sc->sc_dev)));
    548   1.7   mycroft 
    549   1.7   mycroft #ifdef DIAGNOSTIC
    550   1.7   mycroft 	if (!xsc->sc_tx_loaded) {
    551  1.22       chs 		panic("%s: tx shutdown never loaded", device_xname(sc->sc_dev));
    552   1.7   mycroft 	}
    553   1.7   mycroft #endif
    554   1.7   mycroft 
    555   1.7   mycroft 	if (turbo)
    556   1.7   mycroft 		MB_WRITE_REG(sc, MB8795_TXMODE, MB8795_TXMODE_TURBO1);
    557   1.7   mycroft 	if (xsc->sc_tx_loaded) {
    558   1.7   mycroft 		bus_dmamap_sync(xsc->sc_txdma->sc_dmat, xsc->sc_tx_dmamap,
    559   1.7   mycroft 				0, xsc->sc_tx_dmamap->dm_mapsize,
    560   1.7   mycroft 				BUS_DMASYNC_POSTWRITE);
    561   1.7   mycroft 		bus_dmamap_unload(xsc->sc_txdma->sc_dmat, xsc->sc_tx_dmamap);
    562   1.7   mycroft 		m_freem(xsc->sc_tx_mb_head);
    563   1.7   mycroft 		xsc->sc_tx_mb_head = NULL;
    564   1.7   mycroft 
    565   1.7   mycroft 		xsc->sc_tx_loaded--;
    566   1.7   mycroft 	}
    567   1.7   mycroft 
    568   1.7   mycroft #ifdef DIAGNOSTIC
    569   1.7   mycroft 	if (xsc->sc_tx_loaded != 0) {
    570  1.22       chs 		panic("%s: sc->sc_tx_loaded is %d", device_xname(sc->sc_dev),
    571   1.7   mycroft 		      xsc->sc_tx_loaded);
    572   1.7   mycroft 	}
    573   1.7   mycroft #endif
    574   1.7   mycroft 
    575   1.7   mycroft 	ifp->if_timer = 0;
    576   1.7   mycroft 
    577   1.7   mycroft #if 1
    578   1.7   mycroft 	if ((ifp->if_flags & IFF_RUNNING) && !IF_IS_EMPTY(&sc->sc_tx_snd)) {
    579  1.16       chs 		void mb8795_start_dma(struct mb8795_softc *); /* XXXX */
    580   1.7   mycroft 		mb8795_start_dma(sc);
    581   1.7   mycroft 	}
    582   1.7   mycroft #endif
    583   1.7   mycroft 
    584   1.7   mycroft #if 0
    585   1.7   mycroft 	/* Enable ready interrupt */
    586   1.7   mycroft 	MB_WRITE_REG(sc, MB8795_TXMASK,
    587   1.7   mycroft 		     MB_READ_REG(sc, MB8795_TXMASK)
    588   1.7   mycroft 		     | MB8795_TXMASK_TXRXIE/* READYIE */);
    589   1.7   mycroft #endif
    590   1.7   mycroft }
    591   1.7   mycroft 
    592   1.7   mycroft 
    593   1.7   mycroft void
    594  1.16       chs xe_dma_rx_completed(bus_dmamap_t map, void *arg)
    595   1.7   mycroft {
    596   1.7   mycroft 	struct mb8795_softc *sc = arg;
    597   1.7   mycroft 	struct xe_softc *xsc = (struct xe_softc *)sc;
    598   1.7   mycroft 	struct ifnet *ifp = &sc->sc_ethercom.ec_if;
    599   1.7   mycroft 
    600   1.7   mycroft 	if (ifp->if_flags & IFF_RUNNING) {
    601   1.7   mycroft 		xsc->sc_rx_completed_idx++;
    602   1.7   mycroft 		xsc->sc_rx_completed_idx %= MB8795_NRXBUFS;
    603   1.7   mycroft 
    604   1.7   mycroft 		DPRINTF(("%s: xe_dma_rx_completed(), sc->sc_rx_completed_idx = %d\n",
    605  1.22       chs 			 device_xname(sc->sc_dev), xsc->sc_rx_completed_idx));
    606   1.7   mycroft 
    607   1.7   mycroft #if (defined(DIAGNOSTIC))
    608   1.7   mycroft 		if (map != xsc->sc_rx_dmamap[xsc->sc_rx_completed_idx]) {
    609   1.8    provos 			panic("%s: Unexpected rx dmamap completed",
    610  1.22       chs 			      device_xname(sc->sc_dev));
    611   1.7   mycroft 		}
    612   1.7   mycroft #endif
    613   1.7   mycroft 	}
    614   1.7   mycroft #ifdef DIAGNOSTIC
    615   1.7   mycroft 	else
    616   1.7   mycroft 		DPRINTF(("%s: Unexpected rx dmamap completed while if not running\n",
    617  1.22       chs 			 device_xname(sc->sc_dev)));
    618   1.7   mycroft #endif
    619   1.7   mycroft }
    620   1.7   mycroft 
    621   1.7   mycroft void
    622  1.16       chs xe_dma_rx_shutdown(void *arg)
    623   1.7   mycroft {
    624   1.7   mycroft 	struct mb8795_softc *sc = arg;
    625   1.7   mycroft 	struct xe_softc *xsc = (struct xe_softc *)sc;
    626   1.7   mycroft 	struct ifnet *ifp = &sc->sc_ethercom.ec_if;
    627   1.7   mycroft 
    628   1.7   mycroft 	if (ifp->if_flags & IFF_RUNNING) {
    629   1.7   mycroft 		DPRINTF(("%s: xe_dma_rx_shutdown(), restarting.\n",
    630  1.22       chs 			 device_xname(sc->sc_dev)));
    631   1.7   mycroft 
    632   1.7   mycroft 		nextdma_start(xsc->sc_rxdma, DMACSR_SETREAD);
    633   1.7   mycroft 		if (turbo)
    634   1.7   mycroft 			MB_WRITE_REG(sc, MB8795_RXMODE, MB8795_RXMODE_TEST | MB8795_RXMODE_MULTICAST);
    635   1.7   mycroft 	}
    636   1.7   mycroft #ifdef DIAGNOSTIC
    637   1.7   mycroft 	else
    638  1.13       wiz 		DPRINTF(("%s: Unexpected rx DMA shutdown while if not running\n",
    639  1.22       chs 			 device_xname(sc->sc_dev)));
    640   1.7   mycroft #endif
    641   1.7   mycroft }
    642   1.7   mycroft 
    643   1.7   mycroft /*
    644   1.7   mycroft  * load a dmamap with a freshly allocated mbuf
    645   1.7   mycroft  */
    646   1.7   mycroft struct mbuf *
    647  1.16       chs xe_dma_rxmap_load(struct mb8795_softc *sc, bus_dmamap_t map)
    648   1.7   mycroft {
    649   1.7   mycroft 	struct xe_softc *xsc = (struct xe_softc *)sc;
    650   1.7   mycroft 	struct ifnet *ifp = &sc->sc_ethercom.ec_if;
    651   1.7   mycroft 	struct mbuf *m;
    652   1.7   mycroft 	int error;
    653   1.7   mycroft 
    654   1.7   mycroft 	MGETHDR(m, M_DONTWAIT, MT_DATA);
    655   1.7   mycroft 	if (m) {
    656   1.7   mycroft 		MCLGET(m, M_DONTWAIT);
    657   1.7   mycroft 		if ((m->m_flags & M_EXT) == 0) {
    658   1.7   mycroft 			m_freem(m);
    659   1.7   mycroft 			m = NULL;
    660   1.7   mycroft 		} else {
    661   1.7   mycroft 			m->m_len = MCLBYTES;
    662   1.7   mycroft 		}
    663   1.7   mycroft 	}
    664   1.7   mycroft 	if (!m) {
    665   1.7   mycroft 		/* @@@ Handle this gracefully by reusing a scratch buffer
    666   1.7   mycroft 		 * or something.
    667   1.7   mycroft 		 */
    668   1.8    provos 		panic("Unable to get memory for incoming ethernet");
    669   1.7   mycroft 	}
    670   1.7   mycroft 
    671   1.7   mycroft 	/* Align buffer, @@@ next specific.
    672   1.7   mycroft 	 * perhaps should be using M_ALIGN here instead?
    673   1.7   mycroft 	 * First we give us a little room to align with.
    674   1.7   mycroft 	 */
    675   1.7   mycroft 	{
    676   1.7   mycroft 		u_char *buf = m->m_data;
    677   1.7   mycroft 		int buflen = m->m_len;
    678   1.7   mycroft 		buflen -= DMA_ENDALIGNMENT+DMA_BEGINALIGNMENT;
    679   1.7   mycroft 		REALIGN_DMABUF(buf, buflen);
    680   1.7   mycroft 		m->m_data = buf;
    681   1.7   mycroft 		m->m_len = buflen;
    682   1.7   mycroft 	}
    683   1.7   mycroft 
    684   1.7   mycroft 	m->m_pkthdr.rcvif = ifp;
    685   1.7   mycroft 	m->m_pkthdr.len = m->m_len;
    686   1.7   mycroft 
    687   1.7   mycroft 	error = bus_dmamap_load_mbuf(xsc->sc_rxdma->sc_dmat,
    688   1.7   mycroft 			map, m, BUS_DMA_NOWAIT);
    689   1.7   mycroft 
    690   1.7   mycroft 	bus_dmamap_sync(xsc->sc_rxdma->sc_dmat, map, 0,
    691   1.7   mycroft 			map->dm_mapsize, BUS_DMASYNC_PREREAD);
    692   1.7   mycroft 
    693   1.7   mycroft 	if (error) {
    694   1.7   mycroft 		DPRINTF(("DEBUG: m->m_data = %p, m->m_len = %d\n",
    695   1.7   mycroft 				m->m_data, m->m_len));
    696   1.7   mycroft 		DPRINTF(("DEBUG: MCLBYTES = %d, map->_dm_size = %ld\n",
    697   1.7   mycroft 				MCLBYTES, map->_dm_size));
    698   1.7   mycroft 
    699   1.8    provos 		panic("%s: can't load rx mbuf chain, error = %d",
    700  1.22       chs 				device_xname(sc->sc_dev), error);
    701   1.7   mycroft 		m_freem(m);
    702   1.7   mycroft 		m = NULL;
    703   1.7   mycroft 	}
    704   1.7   mycroft 
    705   1.7   mycroft 	return(m);
    706   1.7   mycroft }
    707   1.7   mycroft 
    708   1.7   mycroft bus_dmamap_t
    709  1.16       chs xe_dma_rx_continue(void *arg)
    710   1.7   mycroft {
    711   1.7   mycroft 	struct mb8795_softc *sc = arg;
    712   1.7   mycroft 	struct xe_softc *xsc = (struct xe_softc *)sc;
    713   1.7   mycroft 	struct ifnet *ifp = &sc->sc_ethercom.ec_if;
    714   1.7   mycroft 	bus_dmamap_t map = NULL;
    715   1.7   mycroft 
    716   1.7   mycroft 	if (ifp->if_flags & IFF_RUNNING) {
    717   1.7   mycroft 		if (((xsc->sc_rx_loaded_idx+1)%MB8795_NRXBUFS) == xsc->sc_rx_handled_idx) {
    718   1.7   mycroft 			/* make space for one packet by dropping one */
    719   1.7   mycroft 			struct mbuf *m;
    720   1.7   mycroft 			m = xe_dma_rx_mbuf (sc);
    721   1.7   mycroft 			if (m)
    722   1.7   mycroft 				m_freem(m);
    723   1.7   mycroft #if (defined(DIAGNOSTIC))
    724  1.22       chs 			DPRINTF(("%s: out of receive DMA buffers\n", device_xname(sc->sc_dev)));
    725   1.7   mycroft #endif
    726   1.7   mycroft 		}
    727   1.7   mycroft 		xsc->sc_rx_loaded_idx++;
    728   1.7   mycroft 		xsc->sc_rx_loaded_idx %= MB8795_NRXBUFS;
    729   1.7   mycroft 		map = xsc->sc_rx_dmamap[xsc->sc_rx_loaded_idx];
    730   1.7   mycroft 
    731   1.7   mycroft 		DPRINTF(("%s: xe_dma_rx_continue() xsc->sc_rx_loaded_idx = %d\nn",
    732  1.22       chs 			 device_xname(sc->sc_dev), xsc->sc_rx_loaded_idx));
    733   1.7   mycroft 	}
    734   1.7   mycroft #ifdef DIAGNOSTIC
    735   1.7   mycroft 	else
    736  1.13       wiz 		panic("%s: Unexpected rx DMA continue while if not running",
    737  1.22       chs 		      device_xname(sc->sc_dev));
    738   1.7   mycroft #endif
    739   1.7   mycroft 
    740   1.7   mycroft 	return(map);
    741   1.7   mycroft }
    742   1.7   mycroft 
    743   1.7   mycroft bus_dmamap_t
    744  1.16       chs xe_dma_tx_continue(void *arg)
    745   1.7   mycroft {
    746   1.7   mycroft 	struct mb8795_softc *sc = arg;
    747   1.7   mycroft 	struct xe_softc *xsc = (struct xe_softc *)sc;
    748   1.7   mycroft 	bus_dmamap_t map;
    749   1.7   mycroft 
    750  1.22       chs 	DPRINTF(("%s: xe_dma_tx_continue()\n", device_xname(sc->sc_dev)));
    751   1.7   mycroft 
    752   1.7   mycroft 	if (xsc->sc_tx_loaded) {
    753   1.7   mycroft 		map = NULL;
    754   1.7   mycroft 	} else {
    755   1.7   mycroft 		map = xsc->sc_tx_dmamap;
    756   1.7   mycroft 		xsc->sc_tx_loaded++;
    757   1.7   mycroft 	}
    758   1.7   mycroft 
    759   1.7   mycroft #ifdef DIAGNOSTIC
    760   1.7   mycroft 	if (xsc->sc_tx_loaded != 1) {
    761  1.22       chs 		panic("%s: sc->sc_tx_loaded is %d", device_xname(sc->sc_dev),
    762   1.7   mycroft 				xsc->sc_tx_loaded);
    763   1.7   mycroft 	}
    764   1.7   mycroft #endif
    765   1.7   mycroft 
    766   1.7   mycroft 	return(map);
    767   1.1       dbj }
    768