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