Home | History | Annotate | Line # | Download | only in podulebus
csa.c revision 1.3
      1 /*	$NetBSD: csa.c,v 1.3 2002/05/22 22:43:18 bjh21 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 Mark Brinicombe of Causality Limited.
      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 /*
     40  * Cumana SCSI 1 driver using the generic NCR5380 driver
     41  */
     42 
     43 #include <sys/param.h>
     44 #include <sys/systm.h>
     45 #include <sys/kernel.h>
     46 #include <sys/device.h>
     47 #include <sys/buf.h>
     48 #include <dev/scsipi/scsi_all.h>
     49 #include <dev/scsipi/scsipi_all.h>
     50 #include <dev/scsipi/scsiconf.h>
     51 
     52 #include <dev/ic/ncr5380reg.h>
     53 #include <dev/ic/ncr5380var.h>
     54 
     55 #include <machine/io.h>
     56 #include <machine/intr.h>
     57 #include <machine/bootconfig.h>
     58 
     59 #include <acorn32/podulebus/podulebus.h>
     60 #include <dev/podulebus/podules.h>
     61 #include <dev/podulebus/powerromreg.h>
     62 
     63 #define CSA_NCR5380_OFFSET	0x2100
     64 #define CSA_CTRL_OFFSET		0x2000 - 2308
     65 #define  CSA_DIRWRITE		0x02
     66 #define  CSA_DIRREAD		0x00
     67 #define  CSA_16BITS		0x00
     68 #define  CSA_8BITS		0x10
     69 #define  CSA_XXX		0x40
     70 #define CSA_DATA_OFFSET		0x2000
     71 #define CSA_INTR_OFFSET		0x2000
     72 #define  CSA_INTR_MASK		0x80
     73 #define CSA_STAT_OFFSET		0x2004
     74 #define  CSA_STAT_DRQ		0x40
     75 #define  CSA_STAT_END		0x80
     76 
     77 void csa_attach __P((struct device *, struct device *, void *));
     78 int  csa_match  __P((struct device *, struct cfdata *, void *));
     79 
     80 /*
     81  * Cumana SCSI 1 softc structure.
     82  *
     83  * Contains the generic ncr5380 device node, podule information and global information
     84  * required by the driver.
     85  */
     86 
     87 struct csa_softc {
     88 	struct ncr5380_softc	sc_ncr5380;
     89 	void			*sc_ih;
     90 	struct evcnt		sc_intrcnt;
     91 	int			sc_podule_number;
     92 	podule_t		*sc_podule;
     93 	volatile u_char		*sc_irqstatus;
     94 	u_char			sc_irqmask;
     95 	volatile u_char		*sc_ctrl;
     96 	volatile u_char		*sc_status;
     97 	volatile u_char		*sc_data;
     98 };
     99 
    100 struct cfattach csa_ca = {
    101 	sizeof(struct csa_softc), csa_match, csa_attach
    102 };
    103 
    104 int csa_intr		 __P((void *arg));
    105 
    106 /*
    107  * Card probe function
    108  *
    109  * Just match the manufacturer and podule ID's
    110  */
    111 
    112 int
    113 csa_match(parent, cf, aux)
    114 	struct device	*parent;
    115 	struct cfdata	*cf;
    116 	void		*aux;
    117 {
    118 	struct podule_attach_args *pa = aux;
    119 
    120 	if (pa->pa_product == PODULE_CUMANA_SCSI1)
    121 		return(1);
    122 
    123 	/* PowerROM */
    124         if (pa->pa_product == PODULE_ALSYSTEMS_SCSI &&
    125             podulebus_initloader(pa) == 0 &&
    126             (podloader_callloader(pa, 0, 0) == PRID_CUMANA_SCSI1_8 ||
    127 	     podloader_callloader(pa, 0, 0) == PRID_CUMANA_SCSI1_16))
    128                 return 1;
    129 
    130 	return 0;
    131 }
    132 
    133 /*
    134  * Card attach function
    135  *
    136  */
    137 
    138 void
    139 csa_attach(parent, self, aux)
    140 	struct device	*parent, *self;
    141 	void		*aux;
    142 {
    143 	struct csa_softc *sc = (struct csa_softc *)self;
    144 	struct podule_attach_args *pa = aux;
    145 	u_char *iobase;
    146 	char hi_option[sizeof(sc->sc_ncr5380.sc_dev.dv_xname) + 8];
    147 
    148 	/* Note the podule number and validate */
    149 
    150 	if (pa->pa_podule_number == -1)
    151 		panic("Podule has disappeared !");
    152 
    153 	sc->sc_podule_number = pa->pa_podule_number;
    154 	sc->sc_podule = pa->pa_podule;
    155 	podules[sc->sc_podule_number].attached = 1;
    156 
    157 	sc->sc_ncr5380.sc_flags |= NCR5380_FORCE_POLLING;
    158 	sc->sc_ncr5380.sc_min_dma_len = 0;
    159 	sc->sc_ncr5380.sc_no_disconnect = 0x00;
    160 	sc->sc_ncr5380.sc_parity_disable = 0x00;
    161 
    162 	sc->sc_ncr5380.sc_dma_alloc = NULL;
    163 	sc->sc_ncr5380.sc_dma_free = NULL;
    164 	sc->sc_ncr5380.sc_dma_poll = NULL;
    165 	sc->sc_ncr5380.sc_dma_setup = NULL;
    166 	sc->sc_ncr5380.sc_dma_start = NULL;
    167 	sc->sc_ncr5380.sc_dma_eop = NULL;
    168 	sc->sc_ncr5380.sc_dma_stop = NULL;
    169 	sc->sc_ncr5380.sc_intr_on = NULL;
    170 	sc->sc_ncr5380.sc_intr_off = NULL;
    171 
    172 	iobase = (u_char *)pa->pa_podule->slow_base + CSA_NCR5380_OFFSET;
    173 	sc->sc_ncr5380.sci_r0 = iobase + 0;
    174 	sc->sc_ncr5380.sci_r1 = iobase + 4;
    175 	sc->sc_ncr5380.sci_r2 = iobase + 8;
    176 	sc->sc_ncr5380.sci_r3 = iobase + 12;
    177 	sc->sc_ncr5380.sci_r4 = iobase + 16;
    178 	sc->sc_ncr5380.sci_r5 = iobase + 20;
    179 	sc->sc_ncr5380.sci_r6 = iobase + 24;
    180 	sc->sc_ncr5380.sci_r7 = iobase + 28;
    181 
    182 	sc->sc_ncr5380.sc_rev = NCR_VARIANT_NCR5380;
    183 
    184 	sc->sc_ctrl = (u_char *)pa->pa_podule->slow_base + CSA_CTRL_OFFSET;
    185 	sc->sc_status = (u_char *)pa->pa_podule->slow_base + CSA_STAT_OFFSET;
    186 	sc->sc_data = (u_char *)pa->pa_podule->slow_base + CSA_DATA_OFFSET;
    187 
    188 	sc->sc_ncr5380.sc_pio_in = ncr5380_pio_in;
    189 	sc->sc_ncr5380.sc_pio_out = ncr5380_pio_out;
    190 
    191 	/* Provide an override for the host id */
    192 	sc->sc_ncr5380.sc_channel.chan_id = 7;
    193 	sprintf(hi_option, "%s.hostid", sc->sc_ncr5380.sc_dev.dv_xname);
    194 	(void)get_bootconf_option(boot_args, hi_option,
    195 	    BOOTOPT_TYPE_INT, &sc->sc_ncr5380.sc_channel.chan_id);
    196 	sc->sc_ncr5380.sc_adapter.adapt_minphys = minphys;
    197 
    198 	printf(": host=%d, using 8 bit PIO",
    199 	    sc->sc_ncr5380.sc_channel.chan_id);
    200 
    201 	sc->sc_irqstatus = (u_char *)pa->pa_podule->slow_base + CSA_INTR_OFFSET;
    202 	sc->sc_irqmask = CSA_INTR_MASK;
    203 
    204 	evcnt_attach_dynamic(&sc->sc_intrcnt, EVCNT_TYPE_INTR, NULL,
    205 	    self->dv_xname, "intr");
    206 	sc->sc_ih = podulebus_irq_establish(pa->pa_ih, IPL_BIO, csa_intr, sc,
    207 	    &sc->sc_intrcnt);
    208 	if (sc->sc_ih == NULL)
    209 		sc->sc_ncr5380.sc_flags |= NCR5380_FORCE_POLLING;
    210 
    211 	if (sc->sc_ncr5380.sc_flags & NCR5380_FORCE_POLLING)
    212 		printf(", polling");
    213 	printf("\n");
    214 	*sc->sc_ctrl = 0;
    215 
    216 	ncr5380_attach(&sc->sc_ncr5380);
    217 }
    218 
    219 int
    220 csa_intr(arg)
    221 	void *arg;
    222 {
    223 	struct csa_softc *sc = arg;
    224 
    225 	if ((*sc->sc_irqstatus) & sc->sc_irqmask)
    226 		(void)ncr5380_intr(&sc->sc_ncr5380);
    227 
    228 	return(0);
    229 }
    230