Home | History | Annotate | Line # | Download | only in podulebus
      1 /*	$NetBSD: csc.c,v 1.21 2021/08/07 16:18:40 thorpej 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 Scott Stevens.
      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  *
     19  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     20  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     21  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     22  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     23  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     24  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     25  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     26  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     27  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     28  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     29  * POSSIBILITY OF SUCH DAMAGE.
     30  */
     31 
     32 /*
     33  * Cumana SCSI-2 driver uses the SFAS216 generic driver
     34  */
     35 
     36 #include <sys/cdefs.h>
     37 __KERNEL_RCSID(0, "$NetBSD: csc.c,v 1.21 2021/08/07 16:18:40 thorpej Exp $");
     38 
     39 #include <sys/param.h>
     40 #include <sys/systm.h>
     41 #include <sys/kernel.h>
     42 #include <sys/device.h>
     43 
     44 #include <uvm/uvm_extern.h>
     45 
     46 #include <dev/scsipi/scsi_all.h>
     47 #include <dev/scsipi/scsipi_all.h>
     48 #include <dev/scsipi/scsiconf.h>
     49 #include <machine/io.h>
     50 #include <machine/intr.h>
     51 #include <machine/bootconfig.h>
     52 #include <acorn32/podulebus/podulebus.h>
     53 #include <acorn32/podulebus/sfasreg.h>
     54 #include <acorn32/podulebus/sfasvar.h>
     55 #include <acorn32/podulebus/cscreg.h>
     56 #include <acorn32/podulebus/cscvar.h>
     57 #include <dev/podulebus/podules.h>
     58 #include <dev/podulebus/powerromreg.h>
     59 
     60 int  cscmatch(device_t, cfdata_t, void *);
     61 void cscattach(device_t, device_t, void *);
     62 
     63 CFATTACH_DECL_NEW(csc, sizeof(struct csc_softc),
     64     cscmatch, cscattach, NULL, NULL);
     65 
     66 int csc_intr(void *);
     67 int csc_setup_dma(void *, void *, int, int);
     68 int csc_build_dma_chain(void *, void *, void *, int);
     69 int csc_need_bump(void *, void *, int);
     70 void csc_led(void *, int);
     71 
     72 void csc_set_dma_adr(struct sfas_softc *, void *);
     73 void csc_set_dma_tc(struct sfas_softc *, unsigned int);
     74 void csc_set_dma_mode(struct sfas_softc *, int);
     75 
     76 /*
     77  * if we are a Cumana SCSI-2 card
     78  */
     79 int
     80 cscmatch(device_t parent, cfdata_t cf, void *aux)
     81 {
     82 	struct podule_attach_args *pa = aux;
     83 
     84 	/* Look for the card */
     85 	if (pa->pa_product == PODULE_CUMANA_SCSI2)
     86 		return 1;
     87 
     88 	/* PowerROM */
     89         if (pa->pa_product == PODULE_ALSYSTEMS_SCSI &&
     90             podulebus_initloader(pa) == 0 &&
     91             podloader_callloader(pa, 0, 0) == PRID_CUMANA_SCSI2)
     92                 return 1;
     93 
     94 	return 0;
     95 }
     96 
     97 void
     98 cscattach(device_t parent, device_t self, void *aux)
     99 {
    100 	struct csc_softc *sc = device_private(self);
    101 	struct podule_attach_args  *pa;
    102 	csc_regmap_p	   rp = &sc->sc_regmap;
    103 	vu_char		  *fas;
    104 	int loop;
    105 
    106 	pa = aux;
    107 
    108 	if (pa->pa_podule_number == -1)
    109 		panic("Podule has disappeared !");
    110 
    111 	sc->sc_specific.sc_podule_number = pa->pa_podule_number;
    112 	sc->sc_specific.sc_podule = pa->pa_podule;
    113 	sc->sc_specific.sc_iobase =
    114 	    (vu_char *)sc->sc_specific.sc_podule->mod_base;
    115 
    116 	rp->status0 = &sc->sc_specific.sc_iobase[CSC_STATUS0];
    117 	rp->alatch = &sc->sc_specific.sc_iobase[CSC_ALATCH];
    118 	rp->dack = (vu_short *)&sc->sc_specific.sc_iobase[CSC_DACK];
    119 	fas = &sc->sc_specific.sc_iobase[CSC_FAS_OFFSET_BASE];
    120 
    121 	rp->FAS216.sfas_tc_low	= &fas[CSC_FAS_OFFSET_TCL];
    122 	rp->FAS216.sfas_tc_mid	= &fas[CSC_FAS_OFFSET_TCM];
    123 	rp->FAS216.sfas_fifo	= &fas[CSC_FAS_OFFSET_FIFO];
    124 	rp->FAS216.sfas_command	= &fas[CSC_FAS_OFFSET_COMMAND];
    125 	rp->FAS216.sfas_dest_id	= &fas[CSC_FAS_OFFSET_DESTID];
    126 	rp->FAS216.sfas_timeout	= &fas[CSC_FAS_OFFSET_TIMEOUT];
    127 	rp->FAS216.sfas_syncper	= &fas[CSC_FAS_OFFSET_PERIOD];
    128 	rp->FAS216.sfas_syncoff	= &fas[CSC_FAS_OFFSET_OFFSET];
    129 	rp->FAS216.sfas_config1	= &fas[CSC_FAS_OFFSET_CONFIG1];
    130 	rp->FAS216.sfas_clkconv	= &fas[CSC_FAS_OFFSET_CLKCONV];
    131 	rp->FAS216.sfas_test	= &fas[CSC_FAS_OFFSET_TEST];
    132 	rp->FAS216.sfas_config2	= &fas[CSC_FAS_OFFSET_CONFIG2];
    133 	rp->FAS216.sfas_config3	= &fas[CSC_FAS_OFFSET_CONFIG3];
    134 	rp->FAS216.sfas_tc_high	= &fas[CSC_FAS_OFFSET_TCH];
    135 	rp->FAS216.sfas_fifo_bot = &fas[CSC_FAS_OFFSET_FIFOBOT];
    136 
    137 	sc->sc_softc.sc_dev	= self;
    138 	sc->sc_softc.sc_fas	= (sfas_regmap_p)rp;
    139 	sc->sc_softc.sc_spec	= &sc->sc_specific;
    140 
    141 	sc->sc_softc.sc_led	= csc_led;
    142 
    143 	sc->sc_softc.sc_setup_dma	= csc_setup_dma;
    144 	sc->sc_softc.sc_build_dma_chain = csc_build_dma_chain;
    145 	sc->sc_softc.sc_need_bump	= csc_need_bump;
    146 
    147 	sc->sc_softc.sc_clock_freq   = 8;   /* Cumana runs at 8MHz */
    148 	sc->sc_softc.sc_timeout      = 250;  /* Set default timeout to 250ms */
    149 	sc->sc_softc.sc_config_flags = SFAS_NO_DMA /*| SFAS_NF_DEBUG*/;
    150 	sc->sc_softc.sc_host_id      = 7;    /* Should check the jumpers */
    151 
    152 	sc->sc_softc.sc_bump_sz = PAGE_SIZE;
    153 	sc->sc_softc.sc_bump_pa = 0x0;
    154 
    155 	sfasinitialize((struct sfas_softc *)sc);
    156 
    157 	sc->sc_softc.sc_adapter.adapt_dev = self;
    158 	sc->sc_softc.sc_adapter.adapt_nchannels = 1;
    159 	sc->sc_softc.sc_adapter.adapt_openings = 7;
    160 	sc->sc_softc.sc_adapter.adapt_max_periph = 1;
    161 	sc->sc_softc.sc_adapter.adapt_ioctl = NULL;
    162 	sc->sc_softc.sc_adapter.adapt_minphys = sfas_minphys;
    163 	sc->sc_softc.sc_adapter.adapt_request = sfas_scsi_request;
    164 
    165 	sc->sc_softc.sc_channel.chan_adapter = &sc->sc_softc.sc_adapter;
    166 	sc->sc_softc.sc_channel.chan_bustype = &scsi_bustype;
    167 	sc->sc_softc.sc_channel.chan_channel = 0;
    168 	sc->sc_softc.sc_channel.chan_ntargets = 8;
    169 	sc->sc_softc.sc_channel.chan_nluns = 8;
    170 	sc->sc_softc.sc_channel.chan_id = sc->sc_softc.sc_host_id;
    171 
    172 	/* Provide an override for the host id */
    173 	(void)get_bootconf_option(boot_args, "csc.hostid",
    174 	    BOOTOPT_TYPE_INT, &sc->sc_softc.sc_channel.chan_id);
    175 
    176 	printf(": host=%d", sc->sc_softc.sc_channel.chan_id);
    177 
    178 	/* initialise the alatch */
    179 	sc->sc_specific.sc_alatch_defs = (CSC_POLL?0:CSC_ALATCH_DEFS_INTEN);
    180 	for (loop = 0; loop < 8; loop ++) {
    181 	    if(loop != 3)
    182 		*rp->alatch = (loop << 1) |
    183 		    ((sc->sc_specific.sc_alatch_defs & (1 << loop))?1:0);
    184 	}
    185 
    186 #if CSC_POLL == 0
    187 	evcnt_attach_dynamic(&sc->sc_softc.sc_intrcnt, EVCNT_TYPE_INTR, NULL,
    188 	    device_xname(self), "intr");
    189 	sc->sc_softc.sc_ih = podulebus_irq_establish(pa->pa_ih, IPL_BIO,
    190 	    csc_intr, &sc->sc_softc, &sc->sc_softc.sc_intrcnt);
    191 	if (sc->sc_softc.sc_ih == NULL)
    192 	    panic("%s: Cannot install IRQ handler", device_xname(self));
    193 #else
    194 	printf(" polling");
    195 	sc->sc_softc.sc_adapter.adapt_flags |= SCSIPI_ADAPT_POLL_ONLY;
    196 #endif
    197 	printf("\n");
    198 
    199 	/* attach all scsi units on us */
    200 	config_found(self, &sc->sc_softc.sc_channel, scsiprint, CFARGS_NONE);
    201 }
    202 
    203 
    204 int
    205 csc_intr(void *arg)
    206 {
    207 	struct sfas_softc *dev = arg;
    208 	csc_regmap_p	      rp;
    209 	int		      quickints;
    210 
    211 	rp = (csc_regmap_p)dev->sc_fas;
    212 
    213 	if (*rp->FAS216.sfas_status & SFAS_STAT_INTERRUPT_PENDING) {
    214 		quickints = 16;
    215 		do {
    216 			dev->sc_status = *rp->FAS216.sfas_status;
    217 			dev->sc_interrupt = *rp->FAS216.sfas_interrupt;
    218 
    219 			if (dev->sc_interrupt & SFAS_INT_RESELECTED) {
    220 				dev->sc_resel[0] = *rp->FAS216.sfas_fifo;
    221 				dev->sc_resel[1] = *rp->FAS216.sfas_fifo;
    222 			}
    223 			sfasintr(dev);
    224 
    225 		} while((*rp->FAS216.sfas_status & SFAS_STAT_INTERRUPT_PENDING)
    226 			&& --quickints);
    227 	}
    228 
    229 	return(0);	/* Pass interrupt on down the chain */
    230 }
    231 
    232 /* Load transfer address into DMA register */
    233 void
    234 csc_set_dma_adr(struct sfas_softc *sc, void *ptr)
    235 {
    236 	return;
    237 }
    238 
    239 /* Set DMA transfer counter */
    240 void
    241 csc_set_dma_tc(struct sfas_softc *sc, unsigned int len)
    242 {
    243 	*sc->sc_fas->sfas_tc_low  = len; len >>= 8;
    244 	*sc->sc_fas->sfas_tc_mid  = len; len >>= 8;
    245 	*sc->sc_fas->sfas_tc_high = len;
    246 }
    247 
    248 /* Set DMA mode */
    249 void
    250 csc_set_dma_mode(struct sfas_softc *sc, int mode)
    251 {
    252 }
    253 
    254 /* Initialize DMA for transfer */
    255 int
    256 csc_setup_dma(void *sc, void *ptr, int len, int mode)
    257 {
    258 
    259 	return (0);
    260 }
    261 
    262 /* Check if address and len is ok for DMA transfer */
    263 int
    264 csc_need_bump(void *sc, void *ptr, int len)
    265 {
    266 	int	p;
    267 
    268 	p = (int)ptr & 0x03;
    269 
    270 	if (p) {
    271 		p = 4-p;
    272 
    273 		if (len < 256)
    274 			p = len;
    275 	}
    276 
    277 	return(p);
    278 }
    279 
    280 /* Interrupt driven routines */
    281 int
    282 csc_build_dma_chain(void *sc, void *chain, void *p, int l)
    283 {
    284 	return(0);
    285 }
    286 
    287 /* Turn on/off led */
    288 void
    289 csc_led(void *v, int mode)
    290 {
    291 	struct sfas_softc *sc = v;
    292 
    293 	if (mode) {
    294 		sc->sc_led_status++;
    295 	} else {
    296 		if (sc->sc_led_status)
    297 			sc->sc_led_status--;
    298 	}
    299 }
    300