esp_sbus.c revision 1.13 1 /* $NetBSD: esp_sbus.c,v 1.13 2001/03/29 02:58:38 petrov Exp $ */
2
3 /*-
4 * Copyright (c) 1997, 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; Jason R. Thorpe of the Numerical Aerospace
9 * Simulation Facility, NASA Ames Research Center; Paul Kranenburg.
10 *
11 * Redistribution and use in source and binary forms, with or without
12 * modification, are permitted provided that the following conditions
13 * are met:
14 * 1. Redistributions of source code must retain the above copyright
15 * notice, this list of conditions and the following disclaimer.
16 * 2. Redistributions in binary form must reproduce the above copyright
17 * notice, this list of conditions and the following disclaimer in the
18 * documentation and/or other materials provided with the distribution.
19 * 3. All advertising materials mentioning features or use of this software
20 * must display the following acknowledgement:
21 * This product includes software developed by the NetBSD
22 * Foundation, Inc. and its contributors.
23 * 4. Neither the name of The NetBSD Foundation nor the names of its
24 * contributors may be used to endorse or promote products derived
25 * from this software without specific prior written permission.
26 *
27 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
28 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
29 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
30 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
31 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
32 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
33 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
34 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
35 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
36 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
37 * POSSIBILITY OF SUCH DAMAGE.
38 */
39
40 #include <sys/types.h>
41 #include <sys/param.h>
42 #include <sys/systm.h>
43 #include <sys/device.h>
44 #include <sys/buf.h>
45 #include <sys/malloc.h>
46
47 #include <dev/scsipi/scsi_all.h>
48 #include <dev/scsipi/scsipi_all.h>
49 #include <dev/scsipi/scsiconf.h>
50 #include <dev/scsipi/scsi_message.h>
51
52 #include <machine/bus.h>
53 #include <machine/intr.h>
54 #include <machine/autoconf.h>
55
56 #include <dev/ic/lsi64854reg.h>
57 #include <dev/ic/lsi64854var.h>
58
59 #include <dev/ic/ncr53c9xreg.h>
60 #include <dev/ic/ncr53c9xvar.h>
61
62 #include <dev/sbus/sbusvar.h>
63
64 /* #define ESP_SBUS_DEBUG */
65
66 struct esp_softc {
67 struct ncr53c9x_softc sc_ncr53c9x; /* glue to MI code */
68 struct sbusdev sc_sd; /* sbus device */
69
70 bus_space_tag_t sc_bustag;
71 bus_dma_tag_t sc_dmatag;
72
73 bus_space_handle_t sc_reg; /* the registers */
74 struct lsi64854_softc *sc_dma; /* pointer to my dma */
75
76 int sc_pri; /* SBUS priority */
77 };
78
79 void espattach_sbus __P((struct device *, struct device *, void *));
80 void espattach_dma __P((struct device *, struct device *, void *));
81 int espmatch_sbus __P((struct device *, struct cfdata *, void *));
82
83
84 /* Linkup to the rest of the kernel */
85 struct cfattach esp_sbus_ca = {
86 sizeof(struct esp_softc), espmatch_sbus, espattach_sbus
87 };
88 struct cfattach esp_dma_ca = {
89 sizeof(struct esp_softc), espmatch_sbus, espattach_dma
90 };
91
92 /*
93 * Functions and the switch for the MI code.
94 */
95 static u_char esp_read_reg __P((struct ncr53c9x_softc *, int));
96 static void esp_write_reg __P((struct ncr53c9x_softc *, int, u_char));
97 static u_char esp_rdreg1 __P((struct ncr53c9x_softc *, int));
98 static void esp_wrreg1 __P((struct ncr53c9x_softc *, int, u_char));
99 static int esp_dma_isintr __P((struct ncr53c9x_softc *));
100 static void esp_dma_reset __P((struct ncr53c9x_softc *));
101 static int esp_dma_intr __P((struct ncr53c9x_softc *));
102 static int esp_dma_setup __P((struct ncr53c9x_softc *, caddr_t *,
103 size_t *, int, size_t *));
104 static void esp_dma_go __P((struct ncr53c9x_softc *));
105 static void esp_dma_stop __P((struct ncr53c9x_softc *));
106 static int esp_dma_isactive __P((struct ncr53c9x_softc *));
107
108 static struct ncr53c9x_glue esp_sbus_glue = {
109 esp_read_reg,
110 esp_write_reg,
111 esp_dma_isintr,
112 esp_dma_reset,
113 esp_dma_intr,
114 esp_dma_setup,
115 esp_dma_go,
116 esp_dma_stop,
117 esp_dma_isactive,
118 NULL, /* gl_clear_latched_intr */
119 };
120
121 static struct ncr53c9x_glue esp_sbus_glue1 = {
122 esp_rdreg1,
123 esp_wrreg1,
124 esp_dma_isintr,
125 esp_dma_reset,
126 esp_dma_intr,
127 esp_dma_setup,
128 esp_dma_go,
129 esp_dma_stop,
130 esp_dma_isactive,
131 NULL, /* gl_clear_latched_intr */
132 };
133
134 static void espattach __P((struct esp_softc *, struct ncr53c9x_glue *));
135
136 int
137 espmatch_sbus(parent, cf, aux)
138 struct device *parent;
139 struct cfdata *cf;
140 void *aux;
141 {
142 int rv;
143 struct sbus_attach_args *sa = aux;
144
145 if (strcmp("SUNW,fas", sa->sa_name) == 0)
146 return 1;
147
148 rv = (strcmp(cf->cf_driver->cd_name, sa->sa_name) == 0 ||
149 strcmp("ptscII", sa->sa_name) == 0);
150 return (rv);
151 }
152
153 void
154 espattach_sbus(parent, self, aux)
155 struct device *parent, *self;
156 void *aux;
157 {
158 struct esp_softc *esc = (void *)self;
159 struct ncr53c9x_softc *sc = &esc->sc_ncr53c9x;
160 struct sbus_attach_args *sa = aux;
161 struct lsi64854_softc *lsc;
162 int burst, sbusburst;
163
164 esc->sc_bustag = sa->sa_bustag;
165 esc->sc_dmatag = sa->sa_dmatag;
166
167 sc->sc_id = getpropint(sa->sa_node, "initiator-id", 7);
168 sc->sc_freq = getpropint(sa->sa_node, "clock-frequency", -1);
169 if (sc->sc_freq < 0)
170 sc->sc_freq = ((struct sbus_softc *)
171 sc->sc_dev.dv_parent)->sc_clockfreq;
172
173 #ifdef ESP_SBUS_DEBUG
174 printf("%s: espattach_sbus: sc_id %d, freq %d\n",
175 self->dv_xname, sc->sc_id, sc->sc_freq);
176 #endif
177
178 if (strcmp("SUNW,fas", sa->sa_name) == 0) {
179
180 /*
181 * fas has 2 register spaces: dma(lsi64854) and SCSI core (ncr53c9x)
182 */
183 if (sa->sa_nreg != 2) {
184 printf("%s: %d register spaces\n", self->dv_xname, sa->sa_nreg);
185 return;
186 }
187
188 /*
189 * allocate space for dma, in SUNW,fas there are no separate
190 * dma device
191 */
192 lsc = malloc(sizeof (struct lsi64854_softc), M_DEVBUF, M_NOWAIT);
193
194 if (lsc == NULL) {
195 printf("%s: out of memory (lsi64854_softc)\n",
196 self->dv_xname);
197 return;
198 }
199 esc->sc_dma = lsc;
200
201 lsc->sc_bustag = sa->sa_bustag;
202 lsc->sc_dmatag = sa->sa_dmatag;
203
204 bcopy(sc->sc_dev.dv_xname, lsc->sc_dev.dv_xname,
205 sizeof (lsc->sc_dev.dv_xname));
206
207 /* Map dma registers */
208 if (bus_space_map2(sa->sa_bustag,
209 sa->sa_reg[0].sbr_slot,
210 sa->sa_reg[0].sbr_offset,
211 sa->sa_reg[0].sbr_size,
212 BUS_SPACE_MAP_LINEAR,
213 0, &lsc->sc_regs) != 0) {
214 printf("%s: cannot map dma registers\n", self->dv_xname);
215 return;
216 }
217
218 /*
219 * XXX is this common(from bpp.c), the same in dma_sbus...etc.
220 *
221 * Get transfer burst size from PROM and plug it into the
222 * controller registers. This is needed on the Sun4m; do
223 * others need it too?
224 */
225 sbusburst = ((struct sbus_softc *)parent)->sc_burst;
226 if (sbusburst == 0)
227 sbusburst = SBUS_BURST_32 - 1; /* 1->16 */
228
229 burst = getpropint(sa->sa_node, "burst-sizes", -1);
230
231 #if ESP_SBUS_DEBUG
232 printf("espattach_sbus: burst 0x%x, sbus 0x%x\n",
233 burst, sbusburst);
234 #endif
235
236 if (burst == -1)
237 /* take SBus burst sizes */
238 burst = sbusburst;
239
240 /* Clamp at parent's burst sizes */
241 burst &= sbusburst;
242 lsc->sc_burst = (burst & SBUS_BURST_32) ? 32 :
243 (burst & SBUS_BURST_16) ? 16 : 0;
244
245 lsc->sc_channel = L64854_CHANNEL_SCSI;
246 lsc->sc_client = sc;
247
248 lsi64854_attach(lsc);
249
250 /*
251 * map SCSI core registers
252 */
253 if (sbus_bus_map(sa->sa_bustag,
254 sa->sa_reg[1].sbr_slot,
255 sa->sa_reg[1].sbr_offset,
256 sa->sa_reg[1].sbr_size,
257 BUS_SPACE_MAP_LINEAR,
258 0, &esc->sc_reg) != 0) {
259 printf("%s @ sbus: cannot map scsi core registers\n",
260 self->dv_xname);
261 return;
262 }
263
264 if (sa->sa_nintr == 0) {
265 printf("\n%s: no interrupt property\n", self->dv_xname);
266 return;
267 }
268
269 esc->sc_pri = sa->sa_pri;
270
271 /* add me to the sbus structures */
272 esc->sc_sd.sd_reset = (void *) ncr53c9x_reset;
273 sbus_establish(&esc->sc_sd, &sc->sc_dev);
274
275 espattach(esc, &esp_sbus_glue);
276
277 return;
278 }
279
280 /*
281 * Find the DMA by poking around the dma device structures
282 *
283 * What happens here is that if the dma driver has not been
284 * configured, then this returns a NULL pointer. Then when the
285 * dma actually gets configured, it does the opposing test, and
286 * if the sc->sc_esp field in it's softc is NULL, then tries to
287 * find the matching esp driver.
288 */
289 esc->sc_dma = (struct lsi64854_softc *)
290 getdevunit("dma", sc->sc_dev.dv_unit);
291
292 /*
293 * and a back pointer to us, for DMA
294 */
295 if (esc->sc_dma)
296 esc->sc_dma->sc_client = sc;
297 else {
298 printf("\n");
299 panic("espattach: no dma found");
300 }
301
302 /*
303 * Map my registers in, if they aren't already in virtual
304 * address space.
305 */
306 if (sa->sa_npromvaddrs)
307 esc->sc_reg = (bus_space_handle_t)sa->sa_promvaddrs[0];
308 else {
309 if (sbus_bus_map(sa->sa_bustag, sa->sa_slot,
310 sa->sa_offset,
311 sa->sa_size,
312 BUS_SPACE_MAP_LINEAR,
313 0, &esc->sc_reg) != 0) {
314 printf("%s @ sbus: cannot map registers\n",
315 self->dv_xname);
316 return;
317 }
318 }
319
320 if (sa->sa_nintr == 0) {
321 /*
322 * No interrupt properties: we quit; this might
323 * happen on e.g. a Sparc X terminal.
324 */
325 printf("\n%s: no interrupt property\n", self->dv_xname);
326 return;
327 }
328
329 esc->sc_pri = sa->sa_pri;
330
331 /* add me to the sbus structures */
332 esc->sc_sd.sd_reset = (void *) ncr53c9x_reset;
333 sbus_establish(&esc->sc_sd, &sc->sc_dev);
334
335 if (strcmp("ptscII", sa->sa_name) == 0) {
336 espattach(esc, &esp_sbus_glue1);
337 } else {
338 espattach(esc, &esp_sbus_glue);
339 }
340 }
341
342 void
343 espattach_dma(parent, self, aux)
344 struct device *parent, *self;
345 void *aux;
346 {
347 struct esp_softc *esc = (void *)self;
348 struct ncr53c9x_softc *sc = &esc->sc_ncr53c9x;
349 struct sbus_attach_args *sa = aux;
350
351 if (strcmp("ptscII", sa->sa_name) == 0) {
352 return;
353 }
354
355 esc->sc_bustag = sa->sa_bustag;
356 esc->sc_dmatag = sa->sa_dmatag;
357
358 sc->sc_id = getpropint(sa->sa_node, "initiator-id", 7);
359 sc->sc_freq = getpropint(sa->sa_node, "clock-frequency", -1);
360
361 esc->sc_dma = (struct lsi64854_softc *)parent;
362 esc->sc_dma->sc_client = sc;
363
364 /*
365 * Map my registers in, if they aren't already in virtual
366 * address space.
367 */
368 if (sa->sa_npromvaddrs)
369 esc->sc_reg = (bus_space_handle_t)sa->sa_promvaddrs[0];
370 else {
371 if (bus_space_map2(sa->sa_bustag,
372 sa->sa_slot,
373 sa->sa_offset,
374 sa->sa_size,
375 BUS_SPACE_MAP_LINEAR,
376 0, &esc->sc_reg) != 0) {
377 printf("%s @ dma: cannot map registers\n",
378 self->dv_xname);
379 return;
380 }
381 }
382
383 if (sa->sa_nintr == 0) {
384 /*
385 * No interrupt properties: we quit; this might
386 * happen on e.g. a Sparc X terminal.
387 */
388 printf("\n%s: no interrupt property\n", self->dv_xname);
389 return;
390 }
391
392 esc->sc_pri = sa->sa_pri;
393
394 /* Assume SBus is grandparent */
395 esc->sc_sd.sd_reset = (void *) ncr53c9x_reset;
396 sbus_establish(&esc->sc_sd, parent);
397
398 espattach(esc, &esp_sbus_glue);
399 }
400
401
402 /*
403 * Attach this instance, and then all the sub-devices
404 */
405 void
406 espattach(esc, gluep)
407 struct esp_softc *esc;
408 struct ncr53c9x_glue *gluep;
409 {
410 struct ncr53c9x_softc *sc = &esc->sc_ncr53c9x;
411 void *icookie;
412 unsigned int uid = 0;
413
414 /*
415 * Set up glue for MI code early; we use some of it here.
416 */
417 sc->sc_glue = gluep;
418
419 /* gimme Mhz */
420 sc->sc_freq /= 1000000;
421
422 /*
423 * XXX More of this should be in ncr53c9x_attach(), but
424 * XXX should we really poke around the chip that much in
425 * XXX the MI code? Think about this more...
426 */
427
428 /*
429 * It is necessary to try to load the 2nd config register here,
430 * to find out what rev the esp chip is, else the ncr53c9x_reset
431 * will not set up the defaults correctly.
432 */
433 sc->sc_cfg1 = sc->sc_id | NCRCFG1_PARENB;
434 sc->sc_cfg2 = NCRCFG2_SCSI2 | NCRCFG2_RPE;
435 sc->sc_cfg3 = NCRCFG3_CDB;
436 NCR_WRITE_REG(sc, NCR_CFG2, sc->sc_cfg2);
437
438 if ((NCR_READ_REG(sc, NCR_CFG2) & ~NCRCFG2_RSVD) !=
439 (NCRCFG2_SCSI2 | NCRCFG2_RPE)) {
440 sc->sc_rev = NCR_VARIANT_ESP100;
441 } else {
442 sc->sc_cfg2 = NCRCFG2_SCSI2;
443 NCR_WRITE_REG(sc, NCR_CFG2, sc->sc_cfg2);
444 sc->sc_cfg3 = 0;
445 NCR_WRITE_REG(sc, NCR_CFG3, sc->sc_cfg3);
446 sc->sc_cfg3 = (NCRCFG3_CDB | NCRCFG3_FCLK);
447 NCR_WRITE_REG(sc, NCR_CFG3, sc->sc_cfg3);
448 if (NCR_READ_REG(sc, NCR_CFG3) !=
449 (NCRCFG3_CDB | NCRCFG3_FCLK)) {
450 sc->sc_rev = NCR_VARIANT_ESP100A;
451 } else {
452 /* NCRCFG2_FE enables > 64K transfers */
453 sc->sc_cfg2 |= NCRCFG2_FE;
454 sc->sc_cfg3 = 0;
455 NCR_WRITE_REG(sc, NCR_CFG3, sc->sc_cfg3);
456 sc->sc_rev = NCR_VARIANT_ESP200;
457
458 /* XXX spec says it's valid after power up or chip reset */
459 uid = NCR_READ_REG(sc, NCR_UID);
460 if (((uid & 0xf8) >> 3) == 0x0a) /* XXX */
461 sc->sc_rev = NCR_VARIANT_FAS366;
462 }
463 }
464
465 #ifdef ESP_SBUS_DEBUG
466 printf("espattach: revision %d, uid 0x%x\n", sc->sc_rev, uid);
467 #endif
468
469 /*
470 * XXX minsync and maxxfer _should_ be set up in MI code,
471 * XXX but it appears to have some dependency on what sort
472 * XXX of DMA we're hooked up to, etc.
473 */
474
475 /*
476 * This is the value used to start sync negotiations
477 * Note that the NCR register "SYNCTP" is programmed
478 * in "clocks per byte", and has a minimum value of 4.
479 * The SCSI period used in negotiation is one-fourth
480 * of the time (in nanoseconds) needed to transfer one byte.
481 * Since the chip's clock is given in MHz, we have the following
482 * formula: 4 * period = (1000 / freq) * 4
483 */
484 sc->sc_minsync = 1000 / sc->sc_freq;
485
486 /*
487 * Alas, we must now modify the value a bit, because it's
488 * only valid when can switch on FASTCLK and FASTSCSI bits
489 * in config register 3...
490 */
491 switch (sc->sc_rev) {
492 case NCR_VARIANT_ESP100:
493 sc->sc_maxxfer = 64 * 1024;
494 sc->sc_minsync = 0; /* No synch on old chip? */
495 break;
496
497 case NCR_VARIANT_ESP100A:
498 sc->sc_maxxfer = 64 * 1024;
499 /* Min clocks/byte is 5 */
500 sc->sc_minsync = ncr53c9x_cpb2stp(sc, 5);
501 break;
502
503 case NCR_VARIANT_ESP200:
504 case NCR_VARIANT_FAS366:
505 sc->sc_maxxfer = 16 * 1024 * 1024;
506 /* XXX - do actually set FAST* bits */
507 break;
508 }
509
510 /* Establish interrupt channel */
511 icookie = bus_intr_establish(esc->sc_bustag, esc->sc_pri, IPL_BIO, 0,
512 ncr53c9x_intr, sc);
513
514 /* register interrupt stats */
515 evcnt_attach_dynamic(&sc->sc_intrcnt, EVCNT_TYPE_INTR, NULL,
516 sc->sc_dev.dv_xname, "intr");
517
518 /* Turn on target selection using the `dma' method */
519 if (sc->sc_rev != NCR_VARIANT_FAS366)
520 sc->sc_features |= NCR_F_DMASELECT;
521
522 /* Do the common parts of attachment. */
523 ncr53c9x_attach(sc, NULL, NULL);
524 }
525
526 /*
527 * Glue functions.
528 */
529
530 #ifdef ESP_SBUS_DEBUG
531 int esp_sbus_debug = 0;
532
533 static struct {
534 char *r_name;
535 int r_flag;
536 } esp__read_regnames [] = {
537 { "TCL", 0}, /* 0/00 */
538 { "TCM", 0}, /* 1/04 */
539 { "FIFO", 0}, /* 2/08 */
540 { "CMD", 0}, /* 3/0c */
541 { "STAT", 0}, /* 4/10 */
542 { "INTR", 0}, /* 5/14 */
543 { "STEP", 0}, /* 6/18 */
544 { "FFLAGS", 1}, /* 7/1c */
545 { "CFG1", 1}, /* 8/20 */
546 { "STAT2", 0}, /* 9/24 */
547 { "CFG4", 1}, /* a/28 */
548 { "CFG2", 1}, /* b/2c */
549 { "CFG3", 1}, /* c/30 */
550 { "-none", 1}, /* d/34 */
551 { "TCH", 1}, /* e/38 */
552 { "TCX", 1}, /* f/3c */
553 };
554
555 static struct {
556 char *r_name;
557 int r_flag;
558 } esp__write_regnames[] = {
559 { "TCL", 1}, /* 0/00 */
560 { "TCM", 1}, /* 1/04 */
561 { "FIFO", 0}, /* 2/08 */
562 { "CMD", 0}, /* 3/0c */
563 { "SELID", 1}, /* 4/10 */
564 { "TIMEOUT", 1}, /* 5/14 */
565 { "SYNCTP", 1}, /* 6/18 */
566 { "SYNCOFF", 1}, /* 7/1c */
567 { "CFG1", 1}, /* 8/20 */
568 { "CCF", 1}, /* 9/24 */
569 { "TEST", 1}, /* a/28 */
570 { "CFG2", 1}, /* b/2c */
571 { "CFG3", 1}, /* c/30 */
572 { "-none", 1}, /* d/34 */
573 { "TCH", 1}, /* e/38 */
574 { "TCX", 1}, /* f/3c */
575 };
576 #endif
577
578 u_char
579 esp_read_reg(sc, reg)
580 struct ncr53c9x_softc *sc;
581 int reg;
582 {
583 struct esp_softc *esc = (struct esp_softc *)sc;
584 u_char v;
585
586 v = bus_space_read_1(esc->sc_bustag, esc->sc_reg, reg * 4);
587 #ifdef ESP_SBUS_DEBUG
588 if (esp_sbus_debug && (reg < 0x10) && esp__read_regnames[reg].r_flag)
589 printf("RD:%x <%s> %x\n", reg * 4,
590 ((unsigned)reg < 0x10) ? esp__read_regnames[reg].r_name : "<***>", v);
591 #endif
592 return v;
593 }
594
595 void
596 esp_write_reg(sc, reg, v)
597 struct ncr53c9x_softc *sc;
598 int reg;
599 u_char v;
600 {
601 struct esp_softc *esc = (struct esp_softc *)sc;
602
603 #ifdef ESP_SBUS_DEBUG
604 if (esp_sbus_debug && (reg < 0x10) && esp__write_regnames[reg].r_flag)
605 printf("WR:%x <%s> %x\n", reg * 4,
606 ((unsigned)reg < 0x10) ? esp__write_regnames[reg].r_name : "<***>", v);
607 #endif
608 bus_space_write_1(esc->sc_bustag, esc->sc_reg, reg * 4, v);
609 }
610
611 u_char
612 esp_rdreg1(sc, reg)
613 struct ncr53c9x_softc *sc;
614 int reg;
615 {
616 struct esp_softc *esc = (struct esp_softc *)sc;
617
618 return (bus_space_read_1(esc->sc_bustag, esc->sc_reg, reg));
619 }
620
621 void
622 esp_wrreg1(sc, reg, v)
623 struct ncr53c9x_softc *sc;
624 int reg;
625 u_char v;
626 {
627 struct esp_softc *esc = (struct esp_softc *)sc;
628
629 bus_space_write_1(esc->sc_bustag, esc->sc_reg, reg, v);
630 }
631
632 int
633 esp_dma_isintr(sc)
634 struct ncr53c9x_softc *sc;
635 {
636 struct esp_softc *esc = (struct esp_softc *)sc;
637
638 return (DMA_ISINTR(esc->sc_dma));
639 }
640
641 void
642 esp_dma_reset(sc)
643 struct ncr53c9x_softc *sc;
644 {
645 struct esp_softc *esc = (struct esp_softc *)sc;
646
647 DMA_RESET(esc->sc_dma);
648 }
649
650 int
651 esp_dma_intr(sc)
652 struct ncr53c9x_softc *sc;
653 {
654 struct esp_softc *esc = (struct esp_softc *)sc;
655
656 return (DMA_INTR(esc->sc_dma));
657 }
658
659 int
660 esp_dma_setup(sc, addr, len, datain, dmasize)
661 struct ncr53c9x_softc *sc;
662 caddr_t *addr;
663 size_t *len;
664 int datain;
665 size_t *dmasize;
666 {
667 struct esp_softc *esc = (struct esp_softc *)sc;
668
669 return (DMA_SETUP(esc->sc_dma, addr, len, datain, dmasize));
670 }
671
672 void
673 esp_dma_go(sc)
674 struct ncr53c9x_softc *sc;
675 {
676 struct esp_softc *esc = (struct esp_softc *)sc;
677
678 DMA_GO(esc->sc_dma);
679 }
680
681 void
682 esp_dma_stop(sc)
683 struct ncr53c9x_softc *sc;
684 {
685 struct esp_softc *esc = (struct esp_softc *)sc;
686 u_int32_t csr;
687
688 csr = L64854_GCSR(esc->sc_dma);
689 csr &= ~D_EN_DMA;
690 L64854_SCSR(esc->sc_dma, csr);
691 }
692
693 int
694 esp_dma_isactive(sc)
695 struct ncr53c9x_softc *sc;
696 {
697 struct esp_softc *esc = (struct esp_softc *)sc;
698
699 return (DMA_ISACTIVE(esc->sc_dma));
700 }
701
702 #include "opt_ddb.h"
703 #ifdef DDB
704 #include <machine/db_machdep.h>
705 #include <ddb/db_output.h>
706
707 void db_esp __P((db_expr_t, int, db_expr_t, char*));
708
709 void
710 db_esp(addr, have_addr, count, modif)
711 db_expr_t addr;
712 int have_addr;
713 db_expr_t count;
714 char *modif;
715 {
716 struct ncr53c9x_softc *sc;
717 struct ncr53c9x_ecb *ecb;
718 struct ncr53c9x_linfo *li;
719 int u, t, i;
720
721 for (u=0; u<10; u++) {
722 sc = (struct ncr53c9x_softc *)
723 getdevunit("esp", u);
724 if (!sc) continue;
725
726 db_printf("esp%d: nexus %p phase %x prev %x dp %p dleft %lx ify %x\n",
727 u, sc->sc_nexus, sc->sc_phase, sc->sc_prevphase,
728 sc->sc_dp, sc->sc_dleft, sc->sc_msgify);
729 db_printf("\tmsgout %x msgpriq %x msgin %x:%x:%x:%x:%x\n",
730 sc->sc_msgout, sc->sc_msgpriq, sc->sc_imess[0],
731 sc->sc_imess[1], sc->sc_imess[2], sc->sc_imess[3],
732 sc->sc_imess[0]);
733 db_printf("ready: ");
734 for (ecb = sc->ready_list.tqh_first; ecb; ecb = ecb->chain.tqe_next) {
735 db_printf("ecb %p ", ecb);
736 if (ecb == ecb->chain.tqe_next) {
737 db_printf("\nWARNING: tailq loop on ecb %p", ecb);
738 break;
739 }
740 }
741 db_printf("\n");
742
743 for (t=0; t<NCR_NTARG; t++) {
744 LIST_FOREACH(li, &sc->sc_tinfo[t].luns, link) {
745 db_printf("t%d lun %d untagged %p busy %d used %x\n",
746 t, (int)li->lun, li->untagged, li->busy,
747 li->used);
748 for (i=0; i<256; i++)
749 if ((ecb = li->queued[i])) {
750 db_printf("ecb %p tag %x\n", ecb, i);
751 }
752 }
753 }
754 }
755 }
756 #endif
757
758