Home | History | Annotate | Line # | Download | only in dev
otgsc.c revision 1.17.10.1
      1  1.17.10.1   thorpej /*	$NetBSD: otgsc.c,v 1.17.10.1 1997/08/27 21:45:24 thorpej Exp $	*/
      2        1.4       cgd 
      3        1.1    chopps /*
      4        1.2    chopps  * Copyright (c) 1994 Michael L. Hitch
      5        1.1    chopps  * Copyright (c) 1982, 1990 The Regents of the University of California.
      6        1.1    chopps  * All rights reserved.
      7        1.1    chopps  *
      8        1.1    chopps  * Redistribution and use in source and binary forms, with or without
      9        1.1    chopps  * modification, are permitted provided that the following conditions
     10        1.1    chopps  * are met:
     11        1.1    chopps  * 1. Redistributions of source code must retain the above copyright
     12        1.1    chopps  *    notice, this list of conditions and the following disclaimer.
     13        1.1    chopps  * 2. Redistributions in binary form must reproduce the above copyright
     14        1.1    chopps  *    notice, this list of conditions and the following disclaimer in the
     15        1.1    chopps  *    documentation and/or other materials provided with the distribution.
     16        1.1    chopps  * 3. All advertising materials mentioning features or use of this software
     17        1.1    chopps  *    must display the following acknowledgement:
     18        1.1    chopps  *	This product includes software developed by the University of
     19        1.1    chopps  *	California, Berkeley and its contributors.
     20        1.1    chopps  * 4. Neither the name of the University nor the names of its contributors
     21        1.1    chopps  *    may be used to endorse or promote products derived from this software
     22        1.1    chopps  *    without specific prior written permission.
     23        1.1    chopps  *
     24        1.1    chopps  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     25        1.1    chopps  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     26        1.1    chopps  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     27        1.1    chopps  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     28        1.1    chopps  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     29        1.1    chopps  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     30        1.1    chopps  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     31        1.1    chopps  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     32        1.1    chopps  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     33        1.1    chopps  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     34        1.1    chopps  * SUCH DAMAGE.
     35        1.1    chopps  *
     36        1.1    chopps  *	@(#)csa12gdma.c
     37        1.1    chopps  */
     38        1.2    chopps #include <sys/param.h>
     39        1.2    chopps #include <sys/systm.h>
     40        1.2    chopps #include <sys/kernel.h>
     41        1.2    chopps #include <sys/device.h>
     42  1.17.10.1   thorpej #include <dev/scsipi/scsi_all.h>
     43  1.17.10.1   thorpej #include <dev/scsipi/scsipi_all.h>
     44  1.17.10.1   thorpej #include <dev/scsipi/scsiconf.h>
     45        1.2    chopps #include <amiga/amiga/device.h>
     46        1.8    chopps #include <amiga/amiga/isr.h>
     47        1.2    chopps #include <amiga/dev/scireg.h>
     48        1.2    chopps #include <amiga/dev/scivar.h>
     49        1.6    chopps #include <amiga/dev/zbusvar.h>
     50        1.1    chopps 
     51        1.2    chopps void otgscattach __P((struct device *, struct device *, void *));
     52       1.17     veego int otgscmatch __P((struct device *, struct cfdata *, void *));
     53        1.1    chopps 
     54        1.2    chopps int otgsc_dma_xfer_in __P((struct sci_softc *dev, int len,
     55        1.2    chopps     register u_char *buf, int phase));
     56        1.2    chopps int otgsc_dma_xfer_out __P((struct sci_softc *dev, int len,
     57        1.2    chopps     register u_char *buf, int phase));
     58       1.11     veego int otgsc_intr __P((void *));
     59        1.1    chopps 
     60  1.17.10.1   thorpej struct scsipi_adapter otgsc_scsiswitch = {
     61        1.2    chopps 	sci_scsicmd,
     62        1.2    chopps 	sci_minphys,
     63        1.2    chopps 	0,			/* no lun support */
     64        1.2    chopps 	0,			/* no lun support */
     65        1.2    chopps };
     66        1.2    chopps 
     67  1.17.10.1   thorpej struct scsipi_device otgsc_scsidev = {
     68        1.2    chopps 	NULL,		/* use default error handler */
     69        1.2    chopps 	NULL,		/* do not have a start functio */
     70        1.2    chopps 	NULL,		/* have no async handler */
     71        1.2    chopps 	NULL,		/* Use default done routine */
     72        1.2    chopps };
     73        1.1    chopps 
     74        1.1    chopps 
     75        1.1    chopps #ifdef DEBUG
     76       1.11     veego extern int sci_debug;
     77       1.15  christos #define QPRINTF(a) if (sci_debug > 1) printf a
     78       1.11     veego #else
     79       1.11     veego #define QPRINTF(a)
     80        1.1    chopps #endif
     81        1.1    chopps 
     82        1.1    chopps extern int sci_data_wait;
     83        1.1    chopps 
     84       1.10   thorpej struct cfattach otgsc_ca = {
     85       1.10   thorpej 	sizeof(struct sci_softc), otgscmatch, otgscattach
     86       1.10   thorpej };
     87       1.10   thorpej 
     88       1.10   thorpej struct cfdriver otgsc_cd = {
     89       1.10   thorpej 	NULL, "otgsc", DV_DULL, NULL, 0
     90       1.10   thorpej };
     91        1.2    chopps 
     92        1.2    chopps /*
     93        1.2    chopps  * if we are my Hacker's SCSI board we are here.
     94        1.2    chopps  */
     95        1.2    chopps int
     96       1.17     veego otgscmatch(pdp, cfp, auxp)
     97        1.2    chopps 	struct device *pdp;
     98       1.17     veego 	struct cfdata *cfp;
     99       1.17     veego 	void *auxp;
    100        1.2    chopps {
    101        1.6    chopps 	struct zbus_args *zap;
    102        1.2    chopps 
    103        1.2    chopps 	zap = auxp;
    104        1.2    chopps 
    105        1.2    chopps 	/*
    106        1.2    chopps 	 * Check manufacturer and product id.
    107        1.2    chopps 	 */
    108        1.3    chopps 	if (zap->manid == 1058 && zap->prodid == 21)
    109        1.2    chopps 		return(1);
    110        1.2    chopps 	else
    111        1.2    chopps 		return(0);
    112        1.2    chopps }
    113        1.1    chopps 
    114        1.1    chopps void
    115        1.2    chopps otgscattach(pdp, dp, auxp)
    116        1.2    chopps 	struct device *pdp, *dp;
    117        1.2    chopps 	void *auxp;
    118        1.2    chopps {
    119        1.2    chopps 	volatile u_char *rp;
    120        1.2    chopps 	struct sci_softc *sc;
    121        1.6    chopps 	struct zbus_args *zap;
    122        1.3    chopps 
    123       1.15  christos 	printf("\n");
    124        1.2    chopps 
    125        1.2    chopps 	zap = auxp;
    126        1.2    chopps 
    127        1.2    chopps 	sc = (struct sci_softc *)dp;
    128        1.2    chopps 	rp = zap->va + 0x2000;
    129        1.2    chopps 	sc->sci_data = rp;
    130        1.2    chopps 	sc->sci_odata = rp;
    131        1.2    chopps 	sc->sci_icmd = rp + 0x10;
    132        1.2    chopps 	sc->sci_mode = rp + 0x20;
    133        1.2    chopps 	sc->sci_tcmd = rp + 0x30;
    134        1.2    chopps 	sc->sci_bus_csr = rp + 0x40;
    135        1.2    chopps 	sc->sci_sel_enb = rp + 0x40;
    136        1.2    chopps 	sc->sci_csr = rp + 0x50;
    137        1.2    chopps 	sc->sci_dma_send = rp + 0x50;
    138        1.2    chopps 	sc->sci_idata = rp + 0x60;
    139        1.2    chopps 	sc->sci_trecv = rp + 0x60;
    140        1.2    chopps 	sc->sci_iack = rp + 0x70;
    141        1.2    chopps 	sc->sci_irecv = rp + 0x70;
    142        1.2    chopps 
    143        1.2    chopps 	sc->dma_xfer_in = otgsc_dma_xfer_in;
    144        1.2    chopps 	sc->dma_xfer_out = otgsc_dma_xfer_out;
    145        1.2    chopps 
    146        1.8    chopps 	sc->sc_isr.isr_intr = otgsc_intr;
    147        1.8    chopps 	sc->sc_isr.isr_arg = sc;
    148        1.8    chopps 	sc->sc_isr.isr_ipl = 2;
    149        1.8    chopps 	add_isr(&sc->sc_isr);
    150        1.8    chopps 
    151        1.2    chopps 	scireset(sc);
    152        1.2    chopps 
    153  1.17.10.1   thorpej 	sc->sc_link.scsipi_scsi.channel = SCSI_CHANNEL_ONLY_ONE;
    154        1.2    chopps 	sc->sc_link.adapter_softc = sc;
    155  1.17.10.1   thorpej 	sc->sc_link.scsipi_scsi.adapter_target = 7;
    156        1.2    chopps 	sc->sc_link.adapter = &otgsc_scsiswitch;
    157        1.2    chopps 	sc->sc_link.device = &otgsc_scsidev;
    158        1.7    chopps 	sc->sc_link.openings = 1;
    159  1.17.10.1   thorpej 	sc->sc_link.scsipi_scsi.max_target = 7;
    160  1.17.10.1   thorpej 	sc->sc_link.type = BUS_SCSI;
    161        1.2    chopps 	TAILQ_INIT(&sc->sc_xslist);
    162        1.2    chopps 
    163        1.2    chopps 	/*
    164        1.2    chopps 	 * attach all scsi units on us
    165        1.2    chopps 	 */
    166       1.13       cgd 	config_found(dp, &sc->sc_link, scsiprint);
    167        1.2    chopps }
    168        1.2    chopps 
    169        1.2    chopps int
    170        1.2    chopps otgsc_dma_xfer_in (dev, len, buf, phase)
    171        1.1    chopps 	struct sci_softc *dev;
    172        1.1    chopps 	int len;
    173        1.1    chopps 	register u_char *buf;
    174        1.1    chopps 	int phase;
    175        1.1    chopps {
    176        1.1    chopps 	int wait = sci_data_wait;
    177        1.9    chopps 	volatile register u_char *sci_dma = dev->sci_data + 0x100;
    178        1.1    chopps 	volatile register u_char *sci_csr = dev->sci_csr;
    179       1.11     veego #ifdef DEBUG
    180       1.11     veego 	u_char *obp = buf;
    181       1.11     veego #endif
    182        1.1    chopps 
    183        1.2    chopps 	QPRINTF(("otgsc_dma_in %d, csr=%02x\n", len, *dev->sci_bus_csr));
    184        1.1    chopps 
    185        1.1    chopps 	*dev->sci_tcmd = phase;
    186        1.1    chopps 	*dev->sci_mode |= SCI_MODE_DMA;
    187        1.1    chopps 	*dev->sci_icmd = 0;
    188        1.1    chopps 	*dev->sci_irecv = 0;
    189        1.1    chopps 	while (len > 0) {
    190        1.1    chopps 		wait = sci_data_wait;
    191        1.1    chopps 		while ((*sci_csr & (SCI_CSR_DREQ|SCI_CSR_PHASE_MATCH)) !=
    192        1.1    chopps 		  (SCI_CSR_DREQ|SCI_CSR_PHASE_MATCH)) {
    193        1.1    chopps 			if (!(*sci_csr & SCI_CSR_PHASE_MATCH)
    194        1.1    chopps 			  || !(*dev->sci_bus_csr & SCI_BUS_BSY)
    195        1.1    chopps 			  || --wait < 0) {
    196        1.1    chopps #ifdef DEBUG
    197        1.1    chopps 				if (sci_debug)
    198       1.15  christos 					printf("otgsc_dma_in fail: l%d i%x w%d\n",
    199       1.11     veego 					len, *dev->sci_bus_csr, wait);
    200        1.1    chopps #endif
    201        1.1    chopps 				*dev->sci_mode &= ~SCI_MODE_DMA;
    202        1.1    chopps 				return 0;
    203        1.1    chopps 			}
    204        1.1    chopps 		}
    205        1.1    chopps 
    206        1.1    chopps 		*buf++ = *sci_dma;
    207        1.1    chopps 		len--;
    208        1.1    chopps 	}
    209        1.1    chopps 
    210        1.2    chopps 	QPRINTF(("otgsc_dma_in {%d} %02x %02x %02x %02x %02x %02x %02x %02x %02x %02x\n",
    211        1.1    chopps 	  len, obp[0], obp[1], obp[2], obp[3], obp[4], obp[5],
    212        1.1    chopps 	  obp[6], obp[7], obp[8], obp[9]));
    213        1.1    chopps 
    214        1.1    chopps 	*dev->sci_mode &= ~SCI_MODE_DMA;
    215        1.1    chopps 	return 0;
    216        1.1    chopps }
    217        1.1    chopps 
    218        1.2    chopps int
    219        1.2    chopps otgsc_dma_xfer_out (dev, len, buf, phase)
    220        1.1    chopps 	struct sci_softc *dev;
    221        1.1    chopps 	int len;
    222        1.1    chopps 	register u_char *buf;
    223        1.1    chopps 	int phase;
    224        1.1    chopps {
    225        1.1    chopps 	int wait = sci_data_wait;
    226        1.9    chopps 	volatile register u_char *sci_dma = dev->sci_data + 0x100;
    227        1.1    chopps 	volatile register u_char *sci_csr = dev->sci_csr;
    228        1.1    chopps 
    229        1.2    chopps 	QPRINTF(("otgsc_dma_out %d, csr=%02x\n", len, *dev->sci_bus_csr));
    230        1.1    chopps 
    231        1.2    chopps 	QPRINTF(("otgsc_dma_out {%d} %02x %02x %02x %02x %02x %02x %02x %02x %02x %02x\n",
    232        1.1    chopps   	 len, buf[0], buf[1], buf[2], buf[3], buf[4], buf[5],
    233        1.1    chopps 	 buf[6], buf[7], buf[8], buf[9]));
    234        1.1    chopps 
    235        1.1    chopps 	*dev->sci_tcmd = phase;
    236        1.1    chopps 	*dev->sci_mode |= SCI_MODE_DMA;
    237        1.1    chopps 	*dev->sci_icmd = SCI_ICMD_DATA;
    238        1.1    chopps 	*dev->sci_dma_send = 0;
    239        1.1    chopps 	while (len > 0) {
    240        1.1    chopps 		wait = sci_data_wait;
    241        1.1    chopps 		while ((*sci_csr & (SCI_CSR_DREQ|SCI_CSR_PHASE_MATCH)) !=
    242        1.1    chopps 		  (SCI_CSR_DREQ|SCI_CSR_PHASE_MATCH)) {
    243        1.1    chopps 			if (!(*sci_csr & SCI_CSR_PHASE_MATCH)
    244        1.1    chopps 			  || !(*dev->sci_bus_csr & SCI_BUS_BSY)
    245        1.1    chopps 			  || --wait < 0) {
    246        1.1    chopps #ifdef DEBUG
    247        1.1    chopps 				if (sci_debug)
    248       1.15  christos 					printf("otgsc_dma_out fail: l%d i%x w%d\n",
    249       1.11     veego 					len, *dev->sci_bus_csr, wait);
    250        1.1    chopps #endif
    251        1.1    chopps 				*dev->sci_mode &= ~SCI_MODE_DMA;
    252        1.1    chopps 				return 0;
    253        1.1    chopps 			}
    254        1.1    chopps 		}
    255        1.1    chopps 
    256        1.1    chopps 		*sci_dma = *buf++;
    257        1.1    chopps 		len--;
    258        1.1    chopps 	}
    259        1.1    chopps 
    260        1.1    chopps 	wait = sci_data_wait;
    261        1.1    chopps 	while ((*sci_csr & (SCI_CSR_DREQ|SCI_CSR_PHASE_MATCH)) ==
    262        1.1    chopps 	  SCI_CSR_PHASE_MATCH && --wait);
    263        1.1    chopps 
    264        1.1    chopps 
    265        1.1    chopps 	*dev->sci_mode &= ~SCI_MODE_DMA;
    266        1.1    chopps 	return 0;
    267        1.1    chopps }
    268        1.2    chopps 
    269        1.2    chopps int
    270       1.11     veego otgsc_intr(arg)
    271       1.11     veego 	void *arg;
    272        1.2    chopps {
    273       1.11     veego 	struct sci_softc *dev = arg;
    274        1.2    chopps 	u_char stat;
    275        1.2    chopps 
    276        1.8    chopps 	if ((*dev->sci_csr & SCI_CSR_INT) == 0)
    277        1.8    chopps 		return (1);
    278        1.8    chopps 	stat = *dev->sci_iack;
    279        1.8    chopps 	*dev->sci_mode = 0;
    280        1.8    chopps 	return (1);
    281        1.2    chopps }
    282