Home | History | Annotate | Line # | Download | only in vsa
asc_vsbus.c revision 1.12
      1 /*	$NetBSD: asc_vsbus.c,v 1.12 2000/04/24 21:59:22 matt 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 Charles M. Hannum.
      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 "opt_vax46.h"
     40 
     41 #include <sys/cdefs.h>			/* RCS ID & Copyright macro defns */
     42 
     43 __KERNEL_RCSID(0, "$NetBSD: asc_vsbus.c,v 1.12 2000/04/24 21:59:22 matt Exp $");
     44 
     45 #include <sys/types.h>
     46 #include <sys/param.h>
     47 #include <sys/systm.h>
     48 #include <sys/kernel.h>
     49 #include <sys/errno.h>
     50 #include <sys/ioctl.h>
     51 #include <sys/device.h>
     52 #include <sys/buf.h>
     53 #include <sys/proc.h>
     54 #include <sys/user.h>
     55 #include <sys/reboot.h>
     56 #include <sys/queue.h>
     57 
     58 #include <dev/scsipi/scsi_all.h>
     59 #include <dev/scsipi/scsipi_all.h>
     60 #include <dev/scsipi/scsiconf.h>
     61 #include <dev/scsipi/scsi_message.h>
     62 
     63 #include <machine/bus.h>
     64 #include <machine/vmparam.h>
     65 
     66 #include <dev/ic/ncr53c9xreg.h>
     67 #include <dev/ic/ncr53c9xvar.h>
     68 
     69 #include <machine/cpu.h>
     70 #include <machine/sid.h>
     71 #include <machine/scb.h>
     72 #include <machine/vsbus.h>
     73 #include <machine/clock.h>	/* for SCSI ctlr ID# XXX */
     74 
     75 struct asc_vsbus_softc {
     76 	struct ncr53c9x_softc sc_ncr53c9x;	/* Must be first */
     77 	bus_space_tag_t sc_bst;			/* bus space tag */
     78 	bus_space_handle_t sc_bsh;		/* bus space handle */
     79 	bus_space_handle_t sc_dirh;		/* scsi direction handle */
     80 	bus_space_handle_t sc_adrh;		/* scsi address handle */
     81 	bus_space_handle_t sc_ncrh;		/* ncr bus space handle */
     82 	bus_dma_tag_t sc_dmat;			/* bus dma tag */
     83 	bus_dmamap_t sc_dmamap;
     84 	caddr_t *sc_dmaaddr;
     85 	size_t *sc_dmalen;
     86 	size_t sc_dmasize;
     87 	unsigned int sc_flags;
     88 #define	ASC_FROMMEMORY		0x0001		/* Must be 1 */
     89 #define	ASC_DMAACTIVE		0x0002
     90 #define	ASC_MAPLOADED		0x0004
     91 	unsigned long sc_xfers;
     92 };
     93 
     94 #define	ASC_REG_KA46_ADR	0x0000
     95 #define	ASC_REG_KA46_DIR	0x000C
     96 #define	ASC_REG_KA49_ADR	0x0004
     97 #define	ASC_REG_KA49_DIR	0x0008
     98 #define	ASC_REG_NCR		0x0080
     99 #define	ASC_REG_END		0x00B0
    100 
    101 #define	ASC_MAXXFERSIZE		65536
    102 #define	ASC_FREQUENCY		25000000
    103 
    104 static int asc_vsbus_match __P((struct device *, struct cfdata *, void *));
    105 static void asc_vsbus_attach __P((struct device *, struct device *, void *));
    106 
    107 struct cfattach asc_vsbus_ca = {
    108 	sizeof(struct asc_vsbus_softc), asc_vsbus_match, asc_vsbus_attach
    109 };
    110 
    111 static struct scsipi_device asc_vsbus_dev = {
    112 	NULL,			/* Use the default error handler */
    113 	NULL,			/* have a queue, served by this */
    114 	NULL,			/* have no async handler */
    115 	NULL,			/* use the default done handler */
    116 };
    117 
    118 /*
    119  * Functions and the switch for the MI code
    120  */
    121 static u_char	asc_vsbus_read_reg __P((struct ncr53c9x_softc *, int));
    122 static void	asc_vsbus_write_reg __P((struct ncr53c9x_softc *, int, u_char));
    123 static int	asc_vsbus_dma_isintr __P((struct ncr53c9x_softc *));
    124 static void	asc_vsbus_dma_reset __P((struct ncr53c9x_softc *));
    125 static int	asc_vsbus_dma_intr __P((struct ncr53c9x_softc *));
    126 static int	asc_vsbus_dma_setup __P((struct ncr53c9x_softc *, caddr_t *,
    127 		    size_t *, int, size_t *));
    128 static void	asc_vsbus_dma_go __P((struct ncr53c9x_softc *));
    129 static void	asc_vsbus_dma_stop __P((struct ncr53c9x_softc *));
    130 static int	asc_vsbus_dma_isactive __P((struct ncr53c9x_softc *));
    131 
    132 static struct ncr53c9x_glue asc_vsbus_glue = {
    133 	asc_vsbus_read_reg,
    134 	asc_vsbus_write_reg,
    135 	asc_vsbus_dma_isintr,
    136 	asc_vsbus_dma_reset,
    137 	asc_vsbus_dma_intr,
    138 	asc_vsbus_dma_setup,
    139 	asc_vsbus_dma_go,
    140 	asc_vsbus_dma_stop,
    141 	asc_vsbus_dma_isactive,
    142 	NULL,
    143 };
    144 
    145 static u_int8_t asc_attached;		/* can't have more than one asc */
    146 
    147 static int
    148 asc_vsbus_match( struct device *parent, struct cfdata *cf, void *aux)
    149 {
    150 	struct vsbus_attach_args *va = aux;
    151 	volatile u_int8_t *ncr_regs;
    152 	int dummy;
    153 
    154 	if (asc_attached)
    155 		return 0;
    156 
    157 	if (vax_boardtype != VAX_BTYP_46
    158 	   && vax_boardtype != VAX_BTYP_48
    159 	   && vax_boardtype != VAX_BTYP_49)
    160 		return 0;
    161 
    162 	if (vax_boardtype == VAX_BTYP_49 && cf->cf_loc[0] != 0x26000080)
    163 		return 0;
    164 
    165 	if ((vax_boardtype == VAX_BTYP_46 || vax_boardtype == VAX_BTYP_48)
    166 	    && cf->cf_loc[0] != 0x200c0080)
    167 		return 0;
    168 
    169 	ncr_regs = (volatile u_int8_t *) va->va_addr;
    170 
    171 	/*  *** need to generate an interrupt here
    172 	 * From trial and error, I've determined that an INT is generated
    173 	 * only when the following sequence of events occurs:
    174 	 *   1) The interrupt status register (0x05) must be read.
    175 	 *   2) SCSI bus reset interrupt must be enabled
    176 	 *   3) SCSI bus reset command must be sent
    177 	 *   4) NOP command must be sent
    178 	 */
    179 
    180 	dummy = ncr_regs[NCR_INTR << 2] & 0xFF;
    181         ncr_regs[NCR_CFG1 << 2] = 0x06; /* we're ID 6, turn on INT for SCSI reset */
    182         ncr_regs[NCR_CMD << 2] = NCRCMD_RSTSCSI; /* send the reset */
    183         ncr_regs[NCR_CMD << 2] = NCRCMD_NOP; /* send a NOP */
    184 	DELAY(10000);
    185 
    186 	dummy = ncr_regs[NCR_INTR << 2] & 0xFF;
    187 	return (dummy & NCRINTR_SBR) != 0;
    188 }
    189 
    190 
    191 /*
    192  * Attach this instance, and then all the sub-devices
    193  */
    194 static void
    195 asc_vsbus_attach(struct device *parent, struct device *self, void *aux)
    196 {
    197 	struct vsbus_attach_args *va = aux;
    198 	struct asc_vsbus_softc *asc = (void *)self;
    199 	struct ncr53c9x_softc *sc = &asc->sc_ncr53c9x;
    200 	int error;
    201 
    202 	asc_attached = 1;
    203 	/*
    204 	 * Set up glue for MI code early; we use some of it here.
    205 	 */
    206 	sc->sc_glue = &asc_vsbus_glue;
    207 
    208 	asc->sc_bst = va->va_iot;
    209 	asc->sc_dmat = va->va_dmat;
    210 
    211 	error = bus_space_map(asc->sc_bst, va->va_paddr - ASC_REG_NCR,
    212 	    ASC_REG_END, 0, &asc->sc_bsh);
    213 	if (error) {
    214 		printf(": failed to map registers: error=%d\n", error);
    215 		return;
    216 	}
    217 	error = bus_space_subregion(asc->sc_bst, asc->sc_bsh, ASC_REG_NCR,
    218 	    ASC_REG_END - ASC_REG_NCR, &asc->sc_ncrh);
    219 	if (error) {
    220 		printf(": failed to map ncr registers: error=%d\n", error);
    221 		return;
    222 	}
    223 	if (vax_boardtype == VAX_BTYP_46 || vax_boardtype == VAX_BTYP_48) {
    224 		error = bus_space_subregion(asc->sc_bst, asc->sc_bsh,
    225 		    ASC_REG_KA46_ADR, sizeof(u_int32_t), &asc->sc_adrh);
    226 		if (error) {
    227 			printf(": failed to map adr register: error=%d\n",
    228 			     error);
    229 			return;
    230 		}
    231 		error = bus_space_subregion(asc->sc_bst, asc->sc_bsh,
    232 		    ASC_REG_KA46_DIR, sizeof(u_int32_t), &asc->sc_dirh);
    233 		if (error) {
    234 			printf(": failed to map dir register: error=%d\n",
    235 			     error);
    236 			return;
    237 		}
    238 	} else {
    239 		/* This is a gross and disgusting kludge but it'll
    240 		 * save a bunch of ugly code.  Unlike the VS4000/60,
    241 		 * the SCSI Address and direction registers are not
    242 		 * near the SCSI NCR registers and are inside the
    243 		 * block of general VAXstation registers.  So we grab
    244 		 * them from there and knowing the internals of the
    245 		 * bus_space implementation, we cast to bus_space_handles.
    246 		 */
    247 		struct vsbus_softc *vsc = (struct vsbus_softc *) parent;
    248 		asc->sc_adrh = (bus_space_handle_t) (vsc->sc_vsregs + ASC_REG_KA49_ADR);
    249 		asc->sc_dirh = (bus_space_handle_t) (vsc->sc_vsregs + ASC_REG_KA49_DIR);
    250 	}
    251 	error = bus_dmamap_create(asc->sc_dmat, ASC_MAXXFERSIZE, 1,
    252 	    ASC_MAXXFERSIZE, 0, BUS_DMA_NOWAIT, &asc->sc_dmamap);
    253 
    254 	switch (vax_boardtype) {
    255 #if defined(VAX46)
    256 	case VAX_BTYP_46:
    257 		sc->sc_id = (clk_page[0xbc/2] >> clk_tweak) & 7;
    258 		break;
    259 #endif
    260 	default:
    261 		sc->sc_id = 6;	/* XXX need to get this from VMB */
    262 		break;
    263 	}
    264 
    265 	sc->sc_freq = ASC_FREQUENCY;
    266 
    267 	/* gimme Mhz */
    268 	sc->sc_freq /= 1000000;
    269 
    270 	scb_vecalloc(va->va_cvec, (void (*)(void *)) ncr53c9x_intr,
    271 	    &asc->sc_ncr53c9x, SCB_ISTACK);
    272 
    273 	/*
    274 	 * XXX More of this should be in ncr53c9x_attach(), but
    275 	 * XXX should we really poke around the chip that much in
    276 	 * XXX the MI code?  Think about this more...
    277 	 */
    278 
    279 	/*
    280 	 * Set up static configuration info.
    281 	 */
    282 	sc->sc_cfg1 = sc->sc_id | NCRCFG1_PARENB;
    283 	sc->sc_cfg2 = NCRCFG2_SCSI2;
    284 	sc->sc_cfg3 = 0;
    285 	sc->sc_rev = NCR_VARIANT_NCR53C94;
    286 
    287 	/*
    288 	 * XXX minsync and maxxfer _should_ be set up in MI code,
    289 	 * XXX but it appears to have some dependency on what sort
    290 	 * XXX of DMA we're hooked up to, etc.
    291 	 */
    292 
    293 	/*
    294 	 * This is the value used to start sync negotiations
    295 	 * Note that the NCR register "SYNCTP" is programmed
    296 	 * in "clocks per byte", and has a minimum value of 4.
    297 	 * The SCSI period used in negotiation is one-fourth
    298 	 * of the time (in nanoseconds) needed to transfer one byte.
    299 	 * Since the chip's clock is given in MHz, we have the following
    300 	 * formula: 4 * period = (1000 / freq) * 4
    301 	 */
    302 	sc->sc_minsync = (1000 / sc->sc_freq);
    303 	sc->sc_maxxfer = 63 * 1024;
    304 
    305 	printf("\n%s", self->dv_xname);	/* Pretty print */
    306 
    307 	/* Do the common parts of attachment. */
    308 	sc->sc_adapter.scsipi_cmd = ncr53c9x_scsi_cmd;
    309 	sc->sc_adapter.scsipi_minphys = minphys;
    310 	ncr53c9x_attach(sc, &asc_vsbus_dev);
    311 }
    312 
    313 /*
    314  * Glue functions.
    315  */
    316 
    317 static u_char
    318 asc_vsbus_read_reg(struct ncr53c9x_softc *sc, int reg)
    319 {
    320 	struct asc_vsbus_softc *asc = (struct asc_vsbus_softc *)sc;
    321 
    322 	return bus_space_read_1(asc->sc_bst, asc->sc_ncrh,
    323 	    reg * sizeof(u_int32_t));
    324 }
    325 
    326 static void
    327 asc_vsbus_write_reg(sc, reg, val)
    328 	struct ncr53c9x_softc *sc;
    329 	int reg;
    330 	u_char val;
    331 {
    332 	struct asc_vsbus_softc *asc = (struct asc_vsbus_softc *)sc;
    333 
    334 	bus_space_write_1(asc->sc_bst, asc->sc_ncrh,
    335 	    reg * sizeof(u_int32_t), val);
    336 }
    337 
    338 static int
    339 asc_vsbus_dma_isintr(sc)
    340 	struct ncr53c9x_softc *sc;
    341 {
    342 	struct asc_vsbus_softc *asc = (struct asc_vsbus_softc *)sc;
    343 	return bus_space_read_1(asc->sc_bst, asc->sc_ncrh,
    344 	    NCR_STAT * sizeof(u_int32_t)) & NCRSTAT_INT;
    345 }
    346 
    347 static void
    348 asc_vsbus_dma_reset(sc)
    349 	struct ncr53c9x_softc *sc;
    350 {
    351 	struct asc_vsbus_softc *asc = (struct asc_vsbus_softc *)sc;
    352 
    353 	if (asc->sc_flags & ASC_MAPLOADED)
    354 		bus_dmamap_unload(asc->sc_dmat, asc->sc_dmamap);
    355 	asc->sc_flags &= ~(ASC_DMAACTIVE|ASC_MAPLOADED);
    356 }
    357 
    358 static int
    359 asc_vsbus_dma_intr(sc)
    360 	struct ncr53c9x_softc *sc;
    361 {
    362 	struct asc_vsbus_softc *asc = (struct asc_vsbus_softc *)sc;
    363 	u_int tcl, tcm;
    364 	int trans, resid;
    365 
    366 	if ((asc->sc_flags & ASC_DMAACTIVE) == 0)
    367 		panic("asc_vsbus_dma_intr: DMA wasn't active");
    368 
    369 	asc->sc_flags &= ~ASC_DMAACTIVE;
    370 
    371 	if (asc->sc_dmasize == 0) {
    372 		/* A "Transfer Pad" operation completed */
    373 		tcl = NCR_READ_REG(sc, NCR_TCL);
    374 		tcm = NCR_READ_REG(sc, NCR_TCM);
    375 		NCR_DMA(("asc_vsbus_intr: discarded %d bytes (tcl=%d, tcm=%d)\n",
    376 		    tcl | (tcm << 8), tcl, tcm));
    377 		return 0;
    378 	}
    379 
    380 	resid = 0;
    381 	if ((resid = (NCR_READ_REG(sc, NCR_FFLAG) & NCRFIFO_FF)) != 0) {
    382 		NCR_DMA(("asc_vsbus_intr: empty FIFO of %d ", resid));
    383 		DELAY(1);
    384 	}
    385 	if (asc->sc_flags & ASC_MAPLOADED) {
    386 		bus_dmamap_sync(asc->sc_dmat, asc->sc_dmamap,
    387 				0, asc->sc_dmasize,
    388 				asc->sc_flags & ASC_FROMMEMORY
    389 					? BUS_DMASYNC_POSTWRITE
    390 					: BUS_DMASYNC_POSTREAD);
    391 		bus_dmamap_unload(asc->sc_dmat, asc->sc_dmamap);
    392 	}
    393 	asc->sc_flags &= ~ASC_MAPLOADED;
    394 
    395 	resid += (tcl = NCR_READ_REG(sc, NCR_TCL));
    396 	resid += (tcm = NCR_READ_REG(sc, NCR_TCM)) << 8;
    397 
    398 	trans = asc->sc_dmasize - resid;
    399 	if (trans < 0) {			/* transferred < 0 ? */
    400 		printf("asc_vsbus_intr: xfer (%d) > req (%d)\n",
    401 		    trans, asc->sc_dmasize);
    402 		trans = asc->sc_dmasize;
    403 	}
    404 	NCR_DMA(("asc_vsbus_intr: tcl=%d, tcm=%d; trans=%d, resid=%d\n",
    405 	    tcl, tcm, trans, resid));
    406 
    407 	*asc->sc_dmalen -= trans;
    408 	*asc->sc_dmaaddr += trans;
    409 
    410 	asc->sc_xfers++;
    411 	return 0;
    412 }
    413 
    414 static int
    415 asc_vsbus_dma_setup(struct ncr53c9x_softc *sc, caddr_t *addr, size_t *len,
    416 		    int datain, size_t *dmasize)
    417 {
    418 	struct asc_vsbus_softc *asc = (struct asc_vsbus_softc *)sc;
    419 
    420 	asc->sc_dmaaddr = addr;
    421 	asc->sc_dmalen = len;
    422 	if (datain) {
    423 		asc->sc_flags &= ~ASC_FROMMEMORY;
    424 	} else {
    425 		asc->sc_flags |= ASC_FROMMEMORY;
    426 	}
    427 	if ((vaddr_t) *asc->sc_dmaaddr < VM_MIN_KERNEL_ADDRESS)
    428 		panic("asc_vsbus_dma_setup: dma address (%p) outside of kernel",
    429 		    *asc->sc_dmaaddr);
    430 
    431         NCR_DMA(("%s: start %d@%p,%d\n", sc->sc_dev.dv_xname,
    432                 (int)*asc->sc_dmalen, *asc->sc_dmaaddr, (asc->sc_flags & ASC_FROMMEMORY)));
    433 	*dmasize = asc->sc_dmasize = min(*dmasize, ASC_MAXXFERSIZE);
    434 
    435 	if (asc->sc_dmasize) {
    436 		if (bus_dmamap_load(asc->sc_dmat, asc->sc_dmamap,
    437 				*asc->sc_dmaaddr, asc->sc_dmasize,
    438 				NULL /* kernel address */,
    439 				BUS_DMA_NOWAIT|VAX_BUS_DMA_SPILLPAGE))
    440 			panic("%s: cannot load dma map", sc->sc_dev.dv_xname);
    441 		bus_dmamap_sync(asc->sc_dmat, asc->sc_dmamap,
    442 				0, asc->sc_dmasize,
    443 				asc->sc_flags & ASC_FROMMEMORY
    444 					? BUS_DMASYNC_PREWRITE
    445 					: BUS_DMASYNC_PREREAD);
    446 		bus_space_write_4(asc->sc_bst, asc->sc_adrh, 0,
    447 				  asc->sc_dmamap->dm_segs[0].ds_addr);
    448 		bus_space_write_4(asc->sc_bst, asc->sc_dirh, 0,
    449 				  asc->sc_flags & ASC_FROMMEMORY);
    450 		asc->sc_flags |= ASC_MAPLOADED;
    451 	}
    452 
    453 	return 0;
    454 }
    455 
    456 static void
    457 asc_vsbus_dma_go(struct ncr53c9x_softc *sc)
    458 {
    459 	struct asc_vsbus_softc *asc = (struct asc_vsbus_softc *)sc;
    460 
    461 	asc->sc_flags |= ASC_DMAACTIVE;
    462 }
    463 
    464 static void
    465 asc_vsbus_dma_stop(struct ncr53c9x_softc *sc)
    466 {
    467 	struct asc_vsbus_softc *asc = (struct asc_vsbus_softc *)sc;
    468 
    469 	if (asc->sc_flags & ASC_MAPLOADED) {
    470 		bus_dmamap_sync(asc->sc_dmat, asc->sc_dmamap,
    471 				0, asc->sc_dmasize,
    472 				asc->sc_flags & ASC_FROMMEMORY
    473 					? BUS_DMASYNC_POSTWRITE
    474 					: BUS_DMASYNC_POSTREAD);
    475 		bus_dmamap_unload(asc->sc_dmat, asc->sc_dmamap);
    476 	}
    477 
    478 	asc->sc_flags &= ~(ASC_DMAACTIVE|ASC_MAPLOADED);
    479 }
    480 
    481 static int
    482 asc_vsbus_dma_isactive(struct ncr53c9x_softc *sc)
    483 {
    484 	struct asc_vsbus_softc *asc = (struct asc_vsbus_softc *)sc;
    485 
    486 	return (asc->sc_flags & ASC_DMAACTIVE) != 0;
    487 }
    488