Home | History | Annotate | Line # | Download | only in podulebus
asc.c revision 1.12
      1 /*	$NetBSD: asc.c,v 1.12 2003/05/03 18:10:41 wiz Exp $	*/
      2 
      3 /*
      4  * Copyright (c) 2001 Richard Earnshaw
      5  * All rights reserved.
      6  *
      7  * 1. Redistributions of source code must retain the above copyright
      8  *    notice, this list of conditions and the following disclaimer.
      9  * 2. Redistributions in binary form must reproduce the above copyright
     10  *    notice, this list of conditions and the following disclaimer in the
     11  *    documentation and/or other materials provided with the distribution.
     12  * 3. The name of the company nor the name of the author may be used to
     13  *    endorse or promote products derived from this software without specific
     14  *    prior written permission.
     15  *
     16  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR IMPLIED
     17  * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
     18  * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     19  * IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT,
     20  * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
     21  * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
     22  * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     23  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     24  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     25  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     26  * POSSIBILITY OF SUCH DAMAGE.
     27  *
     28  *
     29  * Copyright (c) 1996 Mark Brinicombe
     30  * Copyright (c) 1982, 1990 The Regents of the University of California.
     31  * All rights reserved.
     32  *
     33  * Redistribution and use in source and binary forms, with or without
     34  * modification, are permitted provided that the following conditions
     35  * are met:
     36  * 1. Redistributions of source code must retain the above copyright
     37  *    notice, this list of conditions and the following disclaimer.
     38  * 2. Redistributions in binary form must reproduce the above copyright
     39  *    notice, this list of conditions and the following disclaimer in the
     40  *    documentation and/or other materials provided with the distribution.
     41  * 3. All advertising materials mentioning features or use of this software
     42  *    must display the following acknowledgement:
     43  *	This product includes software developed by the University of
     44  *	California, Berkeley and its contributors.
     45  * 4. Neither the name of the University nor the names of its contributors
     46  *    may be used to endorse or promote products derived from this software
     47  *    without specific prior written permission.
     48  *
     49  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     50  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     51  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     52  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     53  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     54  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     55  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     56  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     57  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     58  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     59  * SUCH DAMAGE.
     60  *
     61  *	from:ahsc.c
     62  */
     63 
     64 /*
     65  * Driver for the Acorn SCSI card using the SBIC (WD33C93A) generic driver
     66  *
     67  * Thanks to Acorn for supplying programming information on this card.
     68  */
     69 
     70 /* #define ASC_DMAMAP_DEBUG */
     71 /* #define DEBUG */
     72 
     73 #include "opt_ddb.h"
     74 
     75 #include <sys/param.h>
     76 
     77 __KERNEL_RCSID(0, "$NetBSD: asc.c,v 1.12 2003/05/03 18:10:41 wiz Exp $");
     78 
     79 #include <sys/systm.h>
     80 #include <sys/kernel.h>
     81 #include <sys/device.h>
     82 #include <sys/buf.h>
     83 
     84 #include <uvm/uvm_extern.h>
     85 
     86 #include <machine/bus.h>
     87 #include <machine/intr.h>
     88 #include <machine/bootconfig.h>		/* asc_poll */
     89 
     90 #include <dev/scsipi/scsi_all.h>
     91 #include <dev/scsipi/scsipi_all.h>
     92 #include <dev/scsipi/scsiconf.h>
     93 
     94 #include <arm/arm32/katelib.h>
     95 
     96 #include <dev/podulebus/podules.h>
     97 #include <dev/podulebus/powerromreg.h>
     98 
     99 #include <acorn32/podulebus/podulebus.h>
    100 #include <acorn32/podulebus/sbicreg.h>
    101 #include <acorn32/podulebus/sbicvar.h>
    102 #include <acorn32/podulebus/ascreg.h>
    103 #include <acorn32/podulebus/ascvar.h>
    104 
    105 void ascattach		(struct device *, struct device *, void *);
    106 int  ascmatch		(struct device *, struct cfdata *, void *);
    107 
    108 void asc_enintr		(struct sbic_softc *);
    109 
    110 int  asc_dmaok		(void *, bus_dma_tag_t, struct sbic_acb *);
    111 int  asc_dmasetup	(void *, bus_dma_tag_t, struct sbic_acb *, int);
    112 int  asc_dmanext	(void *, bus_dma_tag_t, struct sbic_acb *, int);
    113 void asc_dmastop	(void *, bus_dma_tag_t, struct sbic_acb *);
    114 void asc_dmafinish	(void *, bus_dma_tag_t, struct sbic_acb *);
    115 
    116 int  asc_intr		(void *);
    117 void asc_minphys	(struct buf *);
    118 
    119 void asc_dump		(void);
    120 
    121 #ifdef DEBUG
    122 int	asc_dmadebug = 0;
    123 #endif
    124 
    125 CFATTACH_DECL(asc, sizeof(struct asc_softc),
    126     ascmatch, ascattach, NULL, NULL);
    127 
    128 extern struct cfdriver asc_cd;
    129 
    130 u_long scsi_nosync;
    131 int shift_nosync;
    132 
    133 #if ASC_POLL > 0
    134 int asc_poll = 0;
    135 
    136 #endif
    137 
    138 int
    139 ascmatch(struct device *pdp, struct cfdata *cf, void *auxp)
    140 {
    141 	struct podule_attach_args *pa = (struct podule_attach_args *)auxp;
    142 
    143 	/* Look for the card */
    144 
    145 	/* Standard ROM, skipping the MCS card that used the same ID. */
    146 	if (pa->pa_product == PODULE_ACORN_SCSI &&
    147 	    strncmp(pa->pa_podule->description, "MCS", 3) != 0)
    148 		return 1;
    149 
    150 	/* PowerROM */
    151         if (pa->pa_product == PODULE_ALSYSTEMS_SCSI &&
    152             podulebus_initloader(pa) == 0 &&
    153             podloader_callloader(pa, 0, 0) == PRID_ACORN_SCSI1)
    154                 return 1;
    155 
    156 	return 0;
    157 }
    158 
    159 void
    160 ascattach(struct device *pdp, struct device *dp, void *auxp)
    161 {
    162 	/* volatile struct sdmac *rp;*/
    163 	struct asc_softc *sc;
    164 	struct sbic_softc *sbic;
    165 	struct podule_attach_args *pa;
    166 
    167 	sc = (struct asc_softc *)dp;
    168 	pa = (struct podule_attach_args *)auxp;
    169 
    170 	if (pa->pa_podule_number == -1)
    171 		panic("Podule has disappeared !");
    172 
    173 	sc->sc_podule_number = pa->pa_podule_number;
    174 	sc->sc_podule = pa->pa_podule;
    175 	podules[sc->sc_podule_number].attached = 1;
    176 
    177 	sbic = &sc->sc_softc;
    178 
    179 	sbic->sc_enintr = asc_enintr;
    180 	sbic->sc_dmaok = asc_dmaok;
    181 	sbic->sc_dmasetup = asc_dmasetup;
    182 	sbic->sc_dmanext = asc_dmanext;
    183 	sbic->sc_dmastop = asc_dmastop;
    184 	sbic->sc_dmafinish = asc_dmafinish;
    185 
    186 	/* Map sbic */
    187 	sbic->sc_sbicp.sc_sbiciot = pa->pa_iot;
    188 	if (bus_space_map (sbic->sc_sbicp.sc_sbiciot,
    189 	    sc->sc_podule->mod_base + ASC_SBIC, ASC_SBIC_SPACE, 0,
    190 	    &sbic->sc_sbicp.sc_sbicioh))
    191 		panic("%s: Cannot map SBIC", dp->dv_xname);
    192 
    193 	sbic->sc_clkfreq = sbic_clock_override ? sbic_clock_override : 143;
    194 
    195 	sbic->sc_adapter.adapt_dev = &sbic->sc_dev;
    196 	sbic->sc_adapter.adapt_nchannels = 1;
    197 	sbic->sc_adapter.adapt_openings = 7;
    198 	sbic->sc_adapter.adapt_max_periph = 1;
    199 	sbic->sc_adapter.adapt_ioctl = NULL;
    200 	sbic->sc_adapter.adapt_minphys = asc_minphys;
    201 	sbic->sc_adapter.adapt_request = sbic_scsi_request;
    202 
    203 	sbic->sc_channel.chan_adapter = &sbic->sc_adapter;
    204 	sbic->sc_channel.chan_bustype = &scsi_bustype;
    205 	sbic->sc_channel.chan_channel = 0;
    206 	sbic->sc_channel.chan_ntargets = 8;
    207 	sbic->sc_channel.chan_nluns = 8;
    208 	sbic->sc_channel.chan_id = 7;
    209 
    210 	/* Provide an override for the host id */
    211 	(void)get_bootconf_option(boot_args, "asc.hostid",
    212 	    BOOTOPT_TYPE_INT, &sbic->sc_channel.chan_id);
    213 
    214 	printf(": hostid=%d", sbic->sc_channel.chan_id);
    215 
    216 #if ASC_POLL > 0
    217         if (boot_args)
    218 		get_bootconf_option(boot_args, "ascpoll", BOOTOPT_TYPE_BOOLEAN,
    219 		    &asc_poll);
    220 
    221 	if (asc_poll) {
    222 		sbic->sc_adapter.adapt_flags |= SCSIPI_ADAPT_POLL_ONLY;
    223 		printf(" polling");
    224 	}
    225 #endif
    226 	printf("\n");
    227 
    228 	sc->sc_pagereg = sc->sc_podule->fast_base + ASC_PAGEREG;
    229         sc->sc_intstat = sc->sc_podule->fast_base + ASC_INTSTATUS;
    230 
    231 	/* Reset the card */
    232 
    233 	WriteByte(sc->sc_pagereg, 0x80);
    234 	DELAY(500000);
    235 	WriteByte(sc->sc_pagereg, 0x00);
    236 	DELAY(250000);
    237 
    238 	sbicinit(sbic);
    239 
    240 	/* If we are polling only, we don't need a interrupt handler.  */
    241 
    242 #ifdef ASC_POLL
    243 	if (!asc_poll)
    244 #endif
    245 	{
    246 		evcnt_attach_dynamic(&sc->sc_intrcnt, EVCNT_TYPE_INTR, NULL,
    247 		    dp->dv_xname, "intr");
    248 		sc->sc_ih = podulebus_irq_establish(pa->pa_ih, IPL_BIO,
    249 		    asc_intr, sc, &sc->sc_intrcnt);
    250 		if (sc->sc_ih == NULL)
    251 			panic("%s: Cannot claim podule IRQ", dp->dv_xname);
    252 	}
    253 
    254 	/*
    255 	 * attach all scsi units on us
    256 	 */
    257 	config_found(dp, &sbic->sc_channel, scsiprint);
    258 }
    259 
    260 
    261 void
    262 asc_enintr(struct sbic_softc *sbicsc)
    263 {
    264 	struct asc_softc *sc = (struct asc_softc *)sbicsc;
    265 
    266 	sbicsc->sc_flags |= SBICF_INTR;
    267 	WriteByte(sc->sc_pagereg, 0x40);
    268 }
    269 
    270 int
    271 asc_dmaok (void *dma_h, bus_dma_tag_t dma_t, struct sbic_acb *acb)
    272 {
    273 	return 0;
    274 }
    275 
    276 int
    277 asc_dmasetup (void *dma_h, bus_dma_tag_t dma_t, struct sbic_acb *acb, int dir)
    278 {
    279 	printf("asc_dmasetup()");
    280 #ifdef DDB
    281 	Debugger();
    282 #else
    283 	panic("Hit a brick wall");
    284 #endif
    285 	return 0;
    286 }
    287 
    288 int
    289 asc_dmanext (void *dma_h, bus_dma_tag_t dma_t, struct sbic_acb *acb, int dir)
    290 {
    291 	printf("asc_dmanext()");
    292 #ifdef DDB
    293 	Debugger();
    294 #else
    295 	panic("Hit a brick wall");
    296 #endif
    297 	return 0;
    298 }
    299 
    300 void
    301 asc_dmastop (void *dma_h, bus_dma_tag_t dma_t, struct sbic_acb *acb)
    302 {
    303 	printf("asc_dmastop\n");
    304 }
    305 
    306 void
    307 asc_dmafinish (void *dma_h, bus_dma_tag_t dma_t, struct sbic_acb *acb)
    308 {
    309 	printf("asc_dmafinish\n");
    310 }
    311 
    312 void
    313 asc_dump(void)
    314 {
    315 	int i;
    316 
    317 	for (i = 0; i < asc_cd.cd_ndevs; ++i)
    318 		if (asc_cd.cd_devs[i])
    319 			sbic_dump(asc_cd.cd_devs[i]);
    320 }
    321 
    322 int
    323 asc_intr(void *arg)
    324 {
    325 	struct asc_softc *sc = arg;
    326 	int intr;
    327 
    328 	/* printf("ascintr:");*/
    329        	intr = ReadByte(sc->sc_intstat);
    330 	/* printf("%02x\n", intr);*/
    331 
    332 	if (intr & IS_SBIC_IRQ)
    333 		sbicintr((struct sbic_softc *)sc);
    334 
    335 	return 0;	/* Pass interrupt on down the chain */
    336 }
    337 
    338 /*
    339  * limit the transfer as required.
    340  */
    341 void
    342 asc_minphys(struct buf *bp)
    343 {
    344 #if 0
    345 	/*
    346 	 * We must limit the DMA xfer size
    347 	 */
    348 	if (bp->b_bcount > MAX_DMA_LEN) {
    349 		printf("asc: Reducing DMA length\n");
    350 		bp->b_bcount = MAX_DMA_LEN;
    351 	}
    352 #endif
    353 	minphys(bp);
    354 }
    355 
    356