Home | History | Annotate | Line # | Download | only in sbus
qec.c revision 1.21
      1 /*	$NetBSD: qec.c,v 1.21 2002/09/27 02:24:33 thorpej Exp $ */
      2 
      3 /*-
      4  * Copyright (c) 1998 The NetBSD Foundation, Inc.
      5  * All rights reserved.
      6  *
      7  * This code is derived from software contributed to The NetBSD Foundation
      8  * by Paul Kranenburg.
      9  *
     10  * Redistribution and use in source and binary forms, with or without
     11  * modification, are permitted provided that the following conditions
     12  * are met:
     13  * 1. Redistributions of source code must retain the above copyright
     14  *    notice, this list of conditions and the following disclaimer.
     15  * 2. Redistributions in binary form must reproduce the above copyright
     16  *    notice, this list of conditions and the following disclaimer in the
     17  *    documentation and/or other materials provided with the distribution.
     18  * 3. All advertising materials mentioning features or use of this software
     19  *    must display the following acknowledgement:
     20  *        This product includes software developed by the NetBSD
     21  *        Foundation, Inc. and its contributors.
     22  * 4. Neither the name of The NetBSD Foundation nor the names of its
     23  *    contributors may be used to endorse or promote products derived
     24  *    from this software without specific prior written permission.
     25  *
     26  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     27  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     28  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     29  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     30  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     31  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     32  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     33  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     34  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     35  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     36  * POSSIBILITY OF SUCH DAMAGE.
     37  */
     38 
     39 #include <sys/cdefs.h>
     40 __KERNEL_RCSID(0, "$NetBSD: qec.c,v 1.21 2002/09/27 02:24:33 thorpej Exp $");
     41 
     42 #include <sys/param.h>
     43 #include <sys/systm.h>
     44 #include <sys/kernel.h>
     45 #include <sys/errno.h>
     46 #include <sys/device.h>
     47 #include <sys/malloc.h>
     48 
     49 #include <machine/bus.h>
     50 #include <machine/intr.h>
     51 #include <machine/autoconf.h>
     52 
     53 #include <dev/sbus/sbusvar.h>
     54 #include <dev/sbus/qecreg.h>
     55 #include <dev/sbus/qecvar.h>
     56 
     57 static int	qecprint	__P((void *, const char *));
     58 static int	qecmatch	__P((struct device *, struct cfdata *, void *));
     59 static void	qecattach	__P((struct device *, struct device *, void *));
     60 void		qec_init	__P((struct qec_softc *));
     61 
     62 static int qec_bus_map __P((
     63 		bus_space_tag_t,
     64 		bus_addr_t,		/*coded slot+offset*/
     65 		bus_size_t,		/*size*/
     66 		int,			/*flags*/
     67 		vaddr_t,		/*preferred virtual address */
     68 		bus_space_handle_t *));
     69 static void *qec_intr_establish __P((
     70 		bus_space_tag_t,
     71 		int,			/*bus interrupt priority*/
     72 		int,			/*`device class' interrupt level*/
     73 		int,			/*flags*/
     74 		int (*) __P((void *)),	/*handler*/
     75 		void *));		/*arg*/
     76 
     77 struct cfattach qec_ca = {
     78 	sizeof(struct qec_softc), qecmatch, qecattach
     79 };
     80 
     81 int
     82 qecprint(aux, busname)
     83 	void *aux;
     84 	const char *busname;
     85 {
     86 	struct sbus_attach_args *sa = aux;
     87 	bus_space_tag_t t = sa->sa_bustag;
     88 	struct qec_softc *sc = t->cookie;
     89 
     90 	sa->sa_bustag = sc->sc_bustag;	/* XXX */
     91 	sbus_print(aux, busname);	/* XXX */
     92 	sa->sa_bustag = t;		/* XXX */
     93 	return (UNCONF);
     94 }
     95 
     96 int
     97 qecmatch(parent, cf, aux)
     98 	struct device *parent;
     99 	struct cfdata *cf;
    100 	void *aux;
    101 {
    102 	struct sbus_attach_args *sa = aux;
    103 
    104 	return (strcmp(cf->cf_name, sa->sa_name) == 0);
    105 }
    106 
    107 /*
    108  * Attach all the sub-devices we can find
    109  */
    110 void
    111 qecattach(parent, self, aux)
    112 	struct device *parent, *self;
    113 	void *aux;
    114 {
    115 	struct sbus_attach_args *sa = aux;
    116 	struct qec_softc *sc = (void *)self;
    117 	int node;
    118 	int sbusburst;
    119 	bus_space_tag_t sbt;
    120 	bus_space_handle_t bh;
    121 	int error;
    122 
    123 	sc->sc_bustag = sa->sa_bustag;
    124 	sc->sc_dmatag = sa->sa_dmatag;
    125 	node = sa->sa_node;
    126 
    127 	if (sa->sa_nreg < 2) {
    128 		printf("%s: only %d register sets\n",
    129 			self->dv_xname, sa->sa_nreg);
    130 		return;
    131 	}
    132 
    133 	if (sbus_bus_map(sa->sa_bustag,
    134 			 sa->sa_reg[0].oa_space,
    135 			 sa->sa_reg[0].oa_base,
    136 			 sa->sa_reg[0].oa_size,
    137 			 0, &sc->sc_regs) != 0) {
    138 		printf("%s: attach: cannot map registers\n", self->dv_xname);
    139 		return;
    140 	}
    141 
    142 	/*
    143 	 * This device's "register space 1" is just a buffer where the
    144 	 * Lance ring-buffers can be stored. Note the buffer's location
    145 	 * and size, so the child driver can pick them up.
    146 	 */
    147 	if (sbus_bus_map(sa->sa_bustag,
    148 			 sa->sa_reg[1].oa_space,
    149 			 sa->sa_reg[1].oa_base,
    150 			 sa->sa_reg[1].oa_size,
    151 			 BUS_SPACE_MAP_LINEAR, &bh) != 0) {
    152 		printf("%s: attach: cannot map registers\n", self->dv_xname);
    153 		return;
    154 	}
    155 	sc->sc_buffer = (caddr_t)bus_space_vaddr(sa->sa_bustag, bh);
    156 	sc->sc_bufsiz = (bus_size_t)sa->sa_reg[1].oa_size;
    157 
    158 	/* Get number of on-board channels */
    159 	sc->sc_nchannels = PROM_getpropint(node, "#channels", -1);
    160 	if (sc->sc_nchannels == -1) {
    161 		printf(": no channels\n");
    162 		return;
    163 	}
    164 
    165 	/*
    166 	 * Get transfer burst size from PROM
    167 	 */
    168 	sbusburst = ((struct sbus_softc *)parent)->sc_burst;
    169 	if (sbusburst == 0)
    170 		sbusburst = SBUS_BURST_32 - 1; /* 1->16 */
    171 
    172 	sc->sc_burst = PROM_getpropint(node, "burst-sizes", -1);
    173 	if (sc->sc_burst == -1)
    174 		/* take SBus burst sizes */
    175 		sc->sc_burst = sbusburst;
    176 
    177 	/* Clamp at parent's burst sizes */
    178 	sc->sc_burst &= sbusburst;
    179 
    180 	sbus_establish(&sc->sc_sd, &sc->sc_dev);
    181 
    182 	/*
    183 	 * Collect address translations from the OBP.
    184 	 */
    185 	error = PROM_getprop(node, "ranges", sizeof(struct openprom_range),
    186 			 &sc->sc_nrange, (void **)&sc->sc_range);
    187 	switch (error) {
    188 	case 0:
    189 		break;
    190 	case ENOENT:
    191 	default:
    192 		panic("%s: error getting ranges property", self->dv_xname);
    193 	}
    194 
    195 	/* Allocate a bus tag */
    196 	sbt = (bus_space_tag_t) malloc(sizeof(struct sparc_bus_space_tag),
    197 	    M_DEVBUF, M_NOWAIT|M_ZERO);
    198 	if (sbt == NULL) {
    199 		printf("%s: attach: out of memory\n", self->dv_xname);
    200 		return;
    201 	}
    202 
    203 	sbt->cookie = sc;
    204 	sbt->parent = sc->sc_bustag;
    205 	sbt->sparc_bus_map = qec_bus_map;
    206 	sbt->sparc_intr_establish = qec_intr_establish;
    207 
    208 	/*
    209 	 * Save interrupt information for use in our qec_intr_establish()
    210 	 * function below. Apparently, the intr level for the quad
    211 	 * ethernet board (qe) is stored in the QEC node rather than
    212 	 * separately in each of the QE nodes.
    213 	 *
    214 	 * XXX - qe.c should call bus_intr_establish() with `level = 0'..
    215 	 * XXX - maybe we should have our own attach args for all that.
    216 	 */
    217 	sc->sc_intr = sa->sa_intr;
    218 
    219 	printf(": %dK memory\n", sc->sc_bufsiz / 1024);
    220 
    221 	qec_init(sc);
    222 
    223 	/* search through children */
    224 	for (node = firstchild(node); node; node = nextsibling(node)) {
    225 		struct sbus_attach_args sa;
    226 		sbus_setup_attach_args((struct sbus_softc *)parent,
    227 				       sbt, sc->sc_dmatag, node, &sa);
    228 		(void)config_found(&sc->sc_dev, (void *)&sa, qecprint);
    229 		sbus_destroy_attach_args(&sa);
    230 	}
    231 }
    232 
    233 int
    234 qec_bus_map(t, baddr, size, flags, va, hp)
    235 	bus_space_tag_t t;
    236 	bus_addr_t baddr;
    237 	bus_size_t size;
    238 	int	flags;
    239 	vaddr_t va;	/* Ignored */
    240 	bus_space_handle_t *hp;
    241 {
    242 	struct qec_softc *sc = t->cookie;
    243 	int slot = BUS_ADDR_IOSPACE(baddr);
    244 	int i;
    245 
    246 	for (i = 0; i < sc->sc_nrange; i++) {
    247 		struct openprom_range *rp = &sc->sc_range[i];
    248 
    249 		if (sc->sc_range[i].or_child_space != slot)
    250 			continue;
    251 
    252 		/* We've found the connection to the parent bus */
    253 		return (bus_space_map(sc->sc_bustag,
    254 		    BUS_ADDR(rp->or_parent_space,
    255 			     rp->or_parent_base + BUS_ADDR_PADDR(baddr)),
    256 		    size, flags, hp));
    257 	}
    258 
    259 	return (EINVAL);
    260 }
    261 
    262 void *
    263 qec_intr_establish(t, pri, level, flags, handler, arg)
    264 	bus_space_tag_t t;
    265 	int pri;
    266 	int level;
    267 	int flags;
    268 	int (*handler) __P((void *));
    269 	void *arg;
    270 {
    271 	struct qec_softc *sc = t->cookie;
    272 
    273 	if (pri == 0) {
    274 		/*
    275 		 * qe.c calls bus_intr_establish() with `pri == 0'
    276 		 * XXX - see also comment in qec_attach().
    277 		 */
    278 		if (sc->sc_intr == NULL) {
    279 			printf("%s: warning: no interrupts\n",
    280 				sc->sc_dev.dv_xname);
    281 			return (NULL);
    282 		}
    283 		pri = sc->sc_intr->oi_pri;
    284 	}
    285 
    286 	return (bus_intr_establish(t->parent, pri, level, flags, handler, arg));
    287 }
    288 
    289 void
    290 qec_init(sc)
    291 	struct qec_softc *sc;
    292 {
    293 	bus_space_tag_t t = sc->sc_bustag;
    294 	bus_space_handle_t qr = sc->sc_regs;
    295 	u_int32_t v, burst = 0, psize;
    296 	int i;
    297 
    298 	/* First, reset the controller */
    299 	bus_space_write_4(t, qr, QEC_QRI_CTRL, QEC_CTRL_RESET);
    300 	for (i = 0; i < 1000; i++) {
    301 		DELAY(100);
    302 		v = bus_space_read_4(t, qr, QEC_QRI_CTRL);
    303 		if ((v & QEC_CTRL_RESET) == 0)
    304 			break;
    305 	}
    306 
    307 	/*
    308 	 * Cut available buffer size into receive and transmit buffers.
    309 	 * XXX - should probably be done in be & qe driver...
    310 	 */
    311 	v = sc->sc_msize = sc->sc_bufsiz / sc->sc_nchannels;
    312 	bus_space_write_4(t, qr, QEC_QRI_MSIZE, v);
    313 
    314 	v = sc->sc_rsize = sc->sc_bufsiz / (sc->sc_nchannels * 2);
    315 	bus_space_write_4(t, qr, QEC_QRI_RSIZE, v);
    316 	bus_space_write_4(t, qr, QEC_QRI_TSIZE, v);
    317 
    318 	psize = sc->sc_nchannels == 1 ? QEC_PSIZE_2048 : 0;
    319 	bus_space_write_4(t, qr, QEC_QRI_PSIZE, psize);
    320 
    321 	if (sc->sc_burst & SBUS_BURST_64)
    322 		burst = QEC_CTRL_B64;
    323 	else if (sc->sc_burst & SBUS_BURST_32)
    324 		burst = QEC_CTRL_B32;
    325 	else
    326 		burst = QEC_CTRL_B16;
    327 
    328 	v = bus_space_read_4(t, qr, QEC_QRI_CTRL);
    329 	v = (v & QEC_CTRL_MODEMASK) | burst;
    330 	bus_space_write_4(t, qr, QEC_QRI_CTRL, v);
    331 }
    332 
    333 /*
    334  * Common routine to initialize the QEC packet ring buffer.
    335  * Called from be & qe drivers.
    336  */
    337 void
    338 qec_meminit(qr, pktbufsz)
    339 	struct qec_ring *qr;
    340 	unsigned int pktbufsz;
    341 {
    342 	bus_addr_t txbufdma, rxbufdma;
    343 	bus_addr_t dma;
    344 	caddr_t p;
    345 	unsigned int ntbuf, nrbuf, i;
    346 
    347 	p = qr->rb_membase;
    348 	dma = qr->rb_dmabase;
    349 
    350 	ntbuf = qr->rb_ntbuf;
    351 	nrbuf = qr->rb_nrbuf;
    352 
    353 	/*
    354 	 * Allocate transmit descriptors
    355 	 */
    356 	qr->rb_txd = (struct qec_xd *)p;
    357 	qr->rb_txddma = dma;
    358 	p += QEC_XD_RING_MAXSIZE * sizeof(struct qec_xd);
    359 	dma += QEC_XD_RING_MAXSIZE * sizeof(struct qec_xd);
    360 
    361 	/*
    362 	 * Allocate receive descriptors
    363 	 */
    364 	qr->rb_rxd = (struct qec_xd *)p;
    365 	qr->rb_rxddma = dma;
    366 	p += QEC_XD_RING_MAXSIZE * sizeof(struct qec_xd);
    367 	dma += QEC_XD_RING_MAXSIZE * sizeof(struct qec_xd);
    368 
    369 
    370 	/*
    371 	 * Allocate transmit buffers
    372 	 */
    373 	qr->rb_txbuf = p;
    374 	txbufdma = dma;
    375 	p += ntbuf * pktbufsz;
    376 	dma += ntbuf * pktbufsz;
    377 
    378 	/*
    379 	 * Allocate receive buffers
    380 	 */
    381 	qr->rb_rxbuf = p;
    382 	rxbufdma = dma;
    383 	p += nrbuf * pktbufsz;
    384 	dma += nrbuf * pktbufsz;
    385 
    386 	/*
    387 	 * Initialize transmit buffer descriptors
    388 	 */
    389 	for (i = 0; i < QEC_XD_RING_MAXSIZE; i++) {
    390 		qr->rb_txd[i].xd_addr = (u_int32_t)
    391 			(txbufdma + (i % ntbuf) * pktbufsz);
    392 		qr->rb_txd[i].xd_flags = 0;
    393 	}
    394 
    395 	/*
    396 	 * Initialize receive buffer descriptors
    397 	 */
    398 	for (i = 0; i < QEC_XD_RING_MAXSIZE; i++) {
    399 		qr->rb_rxd[i].xd_addr = (u_int32_t)
    400 			(rxbufdma + (i % nrbuf) * pktbufsz);
    401 		qr->rb_rxd[i].xd_flags = (i < nrbuf)
    402 			? QEC_XD_OWN | (pktbufsz & QEC_XD_LENGTH)
    403 			: 0;
    404 	}
    405 
    406 	qr->rb_tdhead = qr->rb_tdtail = 0;
    407 	qr->rb_td_nbusy = 0;
    408 	qr->rb_rdtail = 0;
    409 }
    410