Home | History | Annotate | Line # | Download | only in dev
ivsc.c revision 1.28.2.1
      1  1.28.2.1  jdolecek /*	$NetBSD: ivsc.c,v 1.28.2.1 2002/02/11 20:07:02 jdolecek Exp $ */
      2       1.5       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  *	@(#)ivsdma.c
     37       1.1    chopps  */
     38  1.28.2.1  jdolecek 
     39  1.28.2.1  jdolecek #include <sys/cdefs.h>
     40  1.28.2.1  jdolecek __KERNEL_RCSID(0, "$NetBSD: ivsc.c,v 1.28.2.1 2002/02/11 20:07:02 jdolecek Exp $");
     41  1.28.2.1  jdolecek 
     42       1.2    chopps #include <sys/param.h>
     43       1.2    chopps #include <sys/systm.h>
     44       1.2    chopps #include <sys/kernel.h>
     45       1.2    chopps #include <sys/device.h>
     46      1.22    bouyer #include <dev/scsipi/scsi_all.h>
     47      1.22    bouyer #include <dev/scsipi/scsipi_all.h>
     48      1.22    bouyer #include <dev/scsipi/scsiconf.h>
     49       1.2    chopps #include <amiga/amiga/custom.h>
     50       1.2    chopps #include <amiga/amiga/device.h>
     51       1.9    chopps #include <amiga/amiga/isr.h>
     52       1.2    chopps #include <amiga/dev/scireg.h>
     53       1.2    chopps #include <amiga/dev/scivar.h>
     54       1.7    chopps #include <amiga/dev/zbusvar.h>
     55       1.2    chopps 
     56  1.28.2.1  jdolecek void ivscattach(struct device *, struct device *, void *);
     57  1.28.2.1  jdolecek int ivscmatch(struct device *, struct cfdata *, void *);
     58       1.2    chopps 
     59  1.28.2.1  jdolecek int ivsc_intr(void *);
     60  1.28.2.1  jdolecek int ivsc_dma_xfer_in(struct sci_softc *dev, int len,
     61  1.28.2.1  jdolecek     register u_char *buf, int phase);
     62  1.28.2.1  jdolecek int ivsc_dma_xfer_out(struct sci_softc *dev, int len,
     63  1.28.2.1  jdolecek     register u_char *buf, int phase);
     64       1.2    chopps 
     65       1.2    chopps 
     66       1.2    chopps #ifdef DEBUG
     67       1.2    chopps extern int sci_debug;
     68      1.19  christos #define QPRINTF(a) if (sci_debug > 1) printf a
     69      1.15     veego #else
     70      1.15     veego #define QPRINTF(a)
     71       1.2    chopps #endif
     72       1.2    chopps 
     73       1.2    chopps extern int sci_data_wait;
     74       1.2    chopps 
     75      1.11    chopps int ivsdma_pseudo = 1;		/* 0=off, 1=on */
     76      1.11    chopps 
     77      1.13   thorpej struct cfattach ivsc_ca = {
     78      1.13   thorpej 	sizeof(struct sci_softc), ivscmatch, ivscattach
     79      1.13   thorpej };
     80       1.1    chopps 
     81       1.1    chopps /*
     82       1.2    chopps  * if this is an IVS board
     83       1.1    chopps  */
     84       1.2    chopps int
     85  1.28.2.1  jdolecek ivscmatch(struct device *pdp, struct cfdata *cfp, void *auxp)
     86       1.2    chopps {
     87       1.7    chopps 	struct zbus_args *zap;
     88       1.1    chopps 
     89       1.2    chopps 	zap = auxp;
     90       1.1    chopps 
     91       1.2    chopps 	/*
     92       1.2    chopps 	 * Check manufacturer and product id.
     93       1.2    chopps 	 */
     94       1.2    chopps 	if (zap->manid != 2112 ||	/* If manufacturer is IVS */
     95      1.12    chopps 	    (zap->prodid != 48 &&	/*   product = Trumpcard 500 */
     96      1.12    chopps 	    zap->prodid != 52 &&	/*   product = Trumpcard */
     97       1.2    chopps 	    zap->prodid != 243))	/*   product = Vector SCSI */
     98       1.2    chopps 		return(0);		/* didn't match */
     99       1.2    chopps 	return(1);
    100       1.2    chopps }
    101       1.1    chopps 
    102       1.1    chopps void
    103  1.28.2.1  jdolecek ivscattach(struct device *pdp, struct device *dp, void *auxp)
    104       1.2    chopps {
    105       1.2    chopps 	volatile u_char *rp;
    106      1.28    bouyer 	struct sci_softc *sc = (struct sci_softc *)dp;
    107       1.7    chopps 	struct zbus_args *zap;
    108      1.28    bouyer 	struct scsipi_adapter *adapt = &sc->sc_adapter;
    109      1.28    bouyer 	struct scsipi_channel *chan = &sc->sc_channel;
    110       1.3    chopps 
    111      1.19  christos 	printf("\n");
    112       1.2    chopps 
    113       1.2    chopps 	zap = auxp;
    114  1.28.2.1  jdolecek 
    115      1.27      tron 	rp = (u_char *)zap->va + 0x40;
    116       1.2    chopps 	sc->sci_data = rp;
    117       1.2    chopps 	sc->sci_odata = rp;
    118       1.2    chopps 	sc->sci_icmd = rp + 2;
    119       1.2    chopps 	sc->sci_mode = rp + 4;
    120       1.2    chopps 	sc->sci_tcmd = rp + 6;
    121       1.2    chopps 	sc->sci_bus_csr = rp + 8;
    122       1.2    chopps 	sc->sci_sel_enb = rp + 8;
    123       1.2    chopps 	sc->sci_csr = rp + 10;
    124       1.2    chopps 	sc->sci_dma_send = rp + 10;
    125       1.2    chopps 	sc->sci_idata = rp + 12;
    126       1.2    chopps 	sc->sci_trecv = rp + 12;
    127       1.2    chopps 	sc->sci_iack = rp + 14;
    128       1.2    chopps 	sc->sci_irecv = rp + 14;
    129       1.2    chopps 
    130      1.11    chopps 	if (ivsdma_pseudo == 1) {
    131      1.11    chopps 		sc->dma_xfer_in = ivsc_dma_xfer_in;
    132      1.11    chopps 		sc->dma_xfer_out = ivsc_dma_xfer_out;
    133      1.11    chopps 	}
    134       1.2    chopps 
    135       1.9    chopps 	sc->sc_isr.isr_intr = ivsc_intr;
    136       1.9    chopps 	sc->sc_isr.isr_arg = sc;
    137       1.9    chopps 	sc->sc_isr.isr_ipl = 2;
    138       1.9    chopps 	add_isr(&sc->sc_isr);
    139       1.9    chopps 
    140       1.2    chopps 	scireset(sc);
    141       1.2    chopps 
    142      1.28    bouyer 	/*
    143      1.28    bouyer 	 * Fill in the scsipi_adapter.
    144      1.28    bouyer 	 */
    145      1.28    bouyer 	memset(adapt, 0, sizeof(*adapt));
    146      1.28    bouyer 	adapt->adapt_dev = &sc->sc_dev;
    147      1.28    bouyer 	adapt->adapt_nchannels = 1;
    148      1.28    bouyer 	adapt->adapt_openings = 7;
    149      1.28    bouyer 	adapt->adapt_max_periph = 1;
    150      1.28    bouyer 	adapt->adapt_request = sci_scsipi_request;
    151      1.28    bouyer 	adapt->adapt_minphys = sci_minphys;
    152      1.25   thorpej 
    153      1.28    bouyer 	/*
    154      1.28    bouyer 	 * Fill in the scsipi_channel.
    155      1.28    bouyer 	 */
    156      1.28    bouyer 	memset(chan, 0, sizeof(*chan));
    157      1.28    bouyer 	chan->chan_adapter = adapt;
    158      1.28    bouyer 	chan->chan_bustype = &scsi_bustype;
    159      1.28    bouyer 	chan->chan_channel = 0;
    160  1.28.2.1  jdolecek 	chan->chan_ntargets = 8;
    161      1.28    bouyer 	chan->chan_nluns = 8;
    162      1.28    bouyer 	chan->chan_id = 7;
    163       1.2    chopps 
    164       1.2    chopps 	/*
    165       1.2    chopps 	 * attach all scsi units on us
    166       1.2    chopps 	 */
    167      1.28    bouyer 	config_found(dp, chan, scsiprint);
    168       1.2    chopps }
    169       1.2    chopps 
    170       1.2    chopps int
    171  1.28.2.1  jdolecek ivsc_dma_xfer_in(struct sci_softc *dev, int len, register u_char *buf,
    172  1.28.2.1  jdolecek                  int phase)
    173       1.2    chopps {
    174      1.11    chopps 	int wait = sci_data_wait;
    175      1.11    chopps 	volatile register u_char *sci_dma = dev->sci_idata + 0x20;
    176      1.11    chopps 	volatile register u_char *sci_csr = dev->sci_csr;
    177      1.15     veego #ifdef DEBUG
    178      1.15     veego 	u_char *obp = buf;
    179      1.15     veego #endif
    180      1.11    chopps 
    181      1.11    chopps 	QPRINTF(("ivsc_dma_in %d, csr=%02x\n", len, *dev->sci_bus_csr));
    182      1.11    chopps 
    183      1.11    chopps 	*dev->sci_tcmd = phase;
    184      1.11    chopps 	*dev->sci_mode |= SCI_MODE_DMA;
    185      1.11    chopps 	*dev->sci_irecv = 0;
    186      1.11    chopps 
    187      1.11    chopps 	while (len >= 128) {
    188      1.11    chopps 		wait = sci_data_wait;
    189      1.11    chopps 		while ((*sci_csr & (SCI_CSR_DREQ|SCI_CSR_PHASE_MATCH)) !=
    190      1.11    chopps 		  (SCI_CSR_DREQ|SCI_CSR_PHASE_MATCH)) {
    191      1.11    chopps 			if (!(*sci_csr & SCI_CSR_PHASE_MATCH)
    192      1.11    chopps 			  || !(*dev->sci_bus_csr & SCI_BUS_BSY)
    193      1.11    chopps 			  || --wait < 0) {
    194      1.11    chopps #ifdef DEBUG
    195      1.11    chopps 				if (sci_debug)
    196      1.19  christos 					printf("ivsc_dma_in2 fail: l%d i%x w%d\n",
    197      1.15     veego 					len, *dev->sci_bus_csr, wait);
    198      1.11    chopps #endif
    199      1.11    chopps 				*dev->sci_mode &= ~SCI_MODE_DMA;
    200      1.11    chopps 				return 0;
    201      1.11    chopps 			}
    202      1.11    chopps 		}
    203      1.11    chopps 
    204      1.11    chopps #define	R1	(*buf++ = *sci_dma)
    205      1.11    chopps 		R1; R1; R1; R1; R1; R1; R1; R1;
    206      1.11    chopps 		R1; R1; R1; R1; R1; R1; R1; R1;
    207      1.11    chopps 		R1; R1; R1; R1; R1; R1; R1; R1;
    208      1.11    chopps 		R1; R1; R1; R1; R1; R1; R1; R1;
    209      1.11    chopps 		R1; R1; R1; R1; R1; R1; R1; R1;
    210      1.11    chopps 		R1; R1; R1; R1; R1; R1; R1; R1;
    211      1.11    chopps 		R1; R1; R1; R1; R1; R1; R1; R1;
    212      1.11    chopps 		R1; R1; R1; R1; R1; R1; R1; R1;
    213      1.11    chopps 		R1; R1; R1; R1; R1; R1; R1; R1;
    214      1.11    chopps 		R1; R1; R1; R1; R1; R1; R1; R1;
    215      1.11    chopps 		R1; R1; R1; R1; R1; R1; R1; R1;
    216      1.11    chopps 		R1; R1; R1; R1; R1; R1; R1; R1;
    217      1.11    chopps 		R1; R1; R1; R1; R1; R1; R1; R1;
    218      1.11    chopps 		R1; R1; R1; R1; R1; R1; R1; R1;
    219      1.11    chopps 		R1; R1; R1; R1; R1; R1; R1; R1;
    220      1.11    chopps 		R1; R1; R1; R1; R1; R1; R1; R1;
    221      1.11    chopps 		len -= 128;
    222      1.11    chopps 	}
    223      1.11    chopps 
    224      1.11    chopps   	while (len > 0) {
    225      1.11    chopps 		wait = sci_data_wait;
    226      1.11    chopps 		while ((*sci_csr & (SCI_CSR_DREQ|SCI_CSR_PHASE_MATCH)) !=
    227      1.11    chopps 		  (SCI_CSR_DREQ|SCI_CSR_PHASE_MATCH)) {
    228      1.11    chopps 			if (!(*sci_csr & SCI_CSR_PHASE_MATCH)
    229      1.11    chopps 			  || !(*dev->sci_bus_csr & SCI_BUS_BSY)
    230      1.11    chopps 			  || --wait < 0) {
    231      1.11    chopps #ifdef DEBUG
    232      1.11    chopps 				if (sci_debug)
    233      1.19  christos 					printf("ivsc_dma_in1 fail: l%d i%x w%d\n",
    234      1.15     veego 					len, *dev->sci_bus_csr, wait);
    235      1.11    chopps #endif
    236      1.11    chopps 				*dev->sci_mode &= ~SCI_MODE_DMA;
    237      1.11    chopps 				return 0;
    238      1.11    chopps 			}
    239      1.11    chopps 		}
    240      1.11    chopps 
    241      1.11    chopps 		*buf++ = *sci_dma;
    242      1.11    chopps 		len--;
    243      1.11    chopps 	}
    244      1.11    chopps 
    245      1.11    chopps 	QPRINTF(("ivsc_dma_in {%d} %02x %02x %02x %02x %02x %02x %02x %02x %02x %02x\n",
    246      1.11    chopps 	  len, obp[0], obp[1], obp[2], obp[3], obp[4], obp[5],
    247      1.11    chopps 	  obp[6], obp[7], obp[8], obp[9]));
    248      1.11    chopps 
    249      1.11    chopps 	*dev->sci_mode &= ~SCI_MODE_DMA;
    250      1.11    chopps 	return 0;
    251       1.2    chopps }
    252       1.2    chopps 
    253       1.2    chopps int
    254  1.28.2.1  jdolecek ivsc_dma_xfer_out(struct sci_softc *dev, int len, register u_char *buf,
    255  1.28.2.1  jdolecek                   int phase)
    256       1.1    chopps {
    257      1.11    chopps 	int wait = sci_data_wait;
    258      1.11    chopps 	volatile register u_char *sci_dma = dev->sci_data + 0x20;
    259      1.11    chopps 	volatile register u_char *sci_csr = dev->sci_csr;
    260      1.11    chopps 
    261      1.11    chopps 	QPRINTF(("ivsc_dma_out %d, csr=%02x\n", len, *dev->sci_bus_csr));
    262      1.11    chopps 
    263      1.11    chopps 	QPRINTF(("ivsc_dma_out {%d} %02x %02x %02x %02x %02x %02x %02x %02x %02x %02x\n",
    264      1.11    chopps   	 len, buf[0], buf[1], buf[2], buf[3], buf[4], buf[5],
    265      1.11    chopps 	 buf[6], buf[7], buf[8], buf[9]));
    266      1.11    chopps 
    267      1.11    chopps 	*dev->sci_tcmd = phase;
    268      1.11    chopps 	*dev->sci_mode |= SCI_MODE_DMA;
    269      1.11    chopps 	*dev->sci_icmd |= SCI_ICMD_DATA;
    270      1.11    chopps 	*dev->sci_dma_send = 0;
    271      1.11    chopps 	while (len > 0) {
    272      1.11    chopps 		wait = sci_data_wait;
    273      1.11    chopps 		while ((*sci_csr & (SCI_CSR_DREQ|SCI_CSR_PHASE_MATCH)) !=
    274      1.11    chopps 		  (SCI_CSR_DREQ|SCI_CSR_PHASE_MATCH)) {
    275      1.11    chopps 			if (!(*sci_csr & SCI_CSR_PHASE_MATCH)
    276      1.11    chopps 			  || !(*dev->sci_bus_csr & SCI_BUS_BSY)
    277      1.11    chopps 			  || --wait < 0) {
    278      1.11    chopps #ifdef DEBUG
    279      1.11    chopps 				if (sci_debug)
    280      1.19  christos 					printf("ivsc_dma_out fail: l%d i%x w%d\n",
    281      1.15     veego 					len, *dev->sci_bus_csr, wait);
    282      1.11    chopps #endif
    283      1.11    chopps 				*dev->sci_mode &= ~SCI_MODE_DMA;
    284      1.11    chopps 				return 0;
    285      1.11    chopps 			}
    286      1.11    chopps 		}
    287      1.11    chopps 
    288      1.11    chopps 		*sci_dma = *buf++;
    289      1.11    chopps 		len--;
    290      1.11    chopps 	}
    291      1.11    chopps 
    292      1.11    chopps 	wait = sci_data_wait;
    293      1.11    chopps 	while ((*sci_csr & (SCI_CSR_DREQ|SCI_CSR_PHASE_MATCH)) ==
    294      1.11    chopps 	  SCI_CSR_PHASE_MATCH && --wait);
    295      1.11    chopps 
    296      1.11    chopps 
    297      1.11    chopps 	*dev->sci_mode &= ~SCI_MODE_DMA;
    298      1.11    chopps 	return 0;
    299       1.1    chopps }
    300       1.2    chopps 
    301       1.2    chopps int
    302  1.28.2.1  jdolecek ivsc_intr(void *arg)
    303       1.2    chopps {
    304      1.15     veego 	struct sci_softc *dev = arg;
    305       1.2    chopps 	u_char stat;
    306       1.2    chopps 
    307       1.9    chopps 	if ((*dev->sci_csr & SCI_CSR_INT) == 0)
    308       1.9    chopps 		return(0);
    309       1.9    chopps 	stat = *dev->sci_iack;
    310      1.14        is 	/* XXXX is: something is missing here, at least a: */
    311      1.14        is 	return(1);
    312       1.2    chopps }
    313