Home | History | Annotate | Line # | Download | only in dev
wdsc.c revision 1.21
      1 /*	$NetBSD: wdsc.c,v 1.21 2001/05/31 18:46:08 scw Exp $	*/
      2 
      3 /*
      4  * Copyright (c) 1996 Steve Woodford
      5  * Copyright (c) 1982, 1990 The Regents of the University of California.
      6  * All rights reserved.
      7  *
      8  * Redistribution and use in source and binary forms, with or without
      9  * modification, are permitted provided that the following conditions
     10  * are met:
     11  * 1. Redistributions of source code must retain the above copyright
     12  *    notice, this list of conditions and the following disclaimer.
     13  * 2. Redistributions in binary form must reproduce the above copyright
     14  *    notice, this list of conditions and the following disclaimer in the
     15  *    documentation and/or other materials provided with the distribution.
     16  * 3. All advertising materials mentioning features or use of this software
     17  *    must display the following acknowledgement:
     18  *  This product includes software developed by the University of
     19  *  California, Berkeley and its contributors.
     20  * 4. Neither the name of the University nor the names of its contributors
     21  *    may be used to endorse or promote products derived from this software
     22  *    without specific prior written permission.
     23  *
     24  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     25  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     26  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     27  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     28  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     29  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     30  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     31  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     32  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     33  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     34  * SUCH DAMAGE.
     35  *
     36  *  @(#)wdsc.c
     37  */
     38 
     39 #include <sys/param.h>
     40 #include <sys/systm.h>
     41 #include <sys/kernel.h>
     42 #include <sys/device.h>
     43 
     44 #include <dev/scsipi/scsi_all.h>
     45 #include <dev/scsipi/scsipi_all.h>
     46 #include <dev/scsipi/scsiconf.h>
     47 
     48 #include <machine/cpu.h>
     49 #include <machine/bus.h>
     50 #include <machine/autoconf.h>
     51 
     52 #include <mvme68k/dev/dmavar.h>
     53 #include <mvme68k/dev/pccreg.h>
     54 #include <mvme68k/dev/pccvar.h>
     55 #include <mvme68k/dev/sbicreg.h>
     56 #include <mvme68k/dev/sbicvar.h>
     57 #include <mvme68k/dev/wdscreg.h>
     58 
     59 void    wdsc_pcc_attach __P((struct device *, struct device *, void *));
     60 int     wdsc_pcc_match  __P((struct device *, struct cfdata *, void *));
     61 
     62 struct cfattach wdsc_pcc_ca = {
     63 	sizeof(struct sbic_softc), wdsc_pcc_match, wdsc_pcc_attach
     64 };
     65 
     66 extern struct cfdriver wdsc_cd;
     67 
     68 void    wdsc_enintr     __P((struct sbic_softc *));
     69 int     wdsc_dmago      __P((struct sbic_softc *, char *, int, int));
     70 int     wdsc_dmanext    __P((struct sbic_softc *));
     71 void    wdsc_dmastop    __P((struct sbic_softc *));
     72 int     wdsc_dmaintr    __P((void *));
     73 int     wdsc_scsiintr   __P((void *));
     74 
     75 /*
     76  * Match for SCSI devices on the onboard WD33C93 chip
     77  */
     78 int
     79 wdsc_pcc_match(pdp, cf, auxp)
     80     struct device *pdp;
     81 	struct cfdata *cf;
     82     void *auxp;
     83 {
     84     struct pcc_attach_args *pa = auxp;
     85 
     86     if (strcmp(pa->pa_name, wdsc_cd.cd_name))
     87 	return (0);
     88 
     89     pa->pa_ipl = cf->pcccf_ipl;
     90     return (1);
     91 }
     92 
     93 /*
     94  * Attach the wdsc driver
     95  */
     96 void
     97 wdsc_pcc_attach(pdp, dp, auxp)
     98     struct device *pdp, *dp;
     99     void *auxp;
    100 {
    101     struct sbic_softc *sc;
    102     struct pcc_attach_args *pa;
    103     bus_space_handle_t bush;
    104     static struct evcnt evcnt;	/* XXXSCW: Temporary hack */
    105 
    106     sc = (struct sbic_softc *)dp;
    107     pa = auxp;
    108 
    109     bus_space_map(pa->pa_bust, pa->pa_offset, 0x20, 0, &bush);
    110 
    111     /*
    112      * XXXSCW: We *need* an MI, bus_spaced WD33C93 driver...
    113      */
    114     sc->sc_sbicp = (sbic_regmap_p) bush;
    115 
    116     sc->sc_driver  = (void *) &evcnt;
    117     sc->sc_enintr  = wdsc_enintr;
    118     sc->sc_dmago   = wdsc_dmago;
    119     sc->sc_dmanext = wdsc_dmanext;
    120     sc->sc_dmastop = wdsc_dmastop;
    121     sc->sc_dmacmd  = 0;
    122 
    123     sc->sc_adapter.adapt_dev = &sc->sc_dev;
    124     sc->sc_adapter.adapt_nchannels = 1;
    125     sc->sc_adapter.adapt_openings = 7;
    126     sc->sc_adapter.adapt_max_periph = 1;
    127     sc->sc_adapter.adapt_ioctl = NULL;
    128     sc->sc_adapter.adapt_minphys = sbic_minphys;
    129     sc->sc_adapter.adapt_request = sbic_scsi_request;
    130 
    131     sc->sc_channel.chan_adapter = &sc->sc_adapter;
    132     sc->sc_channel.chan_bustype = &scsi_bustype;
    133     sc->sc_channel.chan_channel = 0;
    134     sc->sc_channel.chan_ntargets = 8;
    135     sc->sc_channel.chan_nluns = 8;
    136     sc->sc_channel.chan_id = 7;
    137 
    138     printf(": WD33C93 SCSI, target %d\n", sc->sc_channel.chan_id);
    139 
    140     /*
    141      * Eveything is a valid dma address.
    142      */
    143     sc->sc_dmamask = 0;
    144 
    145     /*
    146      * The onboard WD33C93 of the '147 is usually clocked at 10MHz...
    147      * (We use 10 times this for accuracy in later calculations)
    148      */
    149     sc->sc_clkfreq = 100;
    150 
    151     /*
    152      * Initialise the hardware
    153      */
    154     sbicinit(sc);
    155 
    156     /*
    157      * Fix up the interrupts
    158      */
    159     sc->sc_ipl = pa->pa_ipl & PCC_IMASK;
    160 
    161     pcc_reg_write(sys_pcc, PCCREG_SCSI_INTR_CTRL, PCC_ICLEAR);
    162     pcc_reg_write(sys_pcc, PCCREG_DMA_INTR_CTRL, PCC_ICLEAR);
    163     pcc_reg_write(sys_pcc, PCCREG_DMA_CONTROL, 0);
    164 
    165     evcnt_attach_dynamic(&evcnt, EVCNT_TYPE_INTR, pccintr_evcnt(sc->sc_ipl),
    166 	"disk", sc->sc_dev.dv_xname);
    167     pccintr_establish(PCCV_DMA, wdsc_dmaintr,  sc->sc_ipl, sc, &evcnt);
    168     pccintr_establish(PCCV_SCSI, wdsc_scsiintr, sc->sc_ipl, sc, &evcnt);
    169     pcc_reg_write(sys_pcc, PCCREG_SCSI_INTR_CTRL,
    170         sc->sc_ipl | PCC_IENABLE | PCC_ICLEAR);
    171 
    172     (void)config_found(dp, &sc->sc_channel, scsiprint);
    173 }
    174 
    175 /*
    176  * Enable DMA interrupts
    177  */
    178 void
    179 wdsc_enintr(dev)
    180     struct sbic_softc *dev;
    181 {
    182     dev->sc_flags |= SBICF_INTR;
    183 
    184     pcc_reg_write(sys_pcc, PCCREG_DMA_INTR_CTRL,
    185         dev->sc_ipl | PCC_IENABLE | PCC_ICLEAR);
    186 }
    187 
    188 /*
    189  * Prime the hardware for a DMA transfer
    190  */
    191 int
    192 wdsc_dmago(dev, addr, count, flags)
    193     struct sbic_softc *dev;
    194     char *addr;
    195     int count, flags;
    196 {
    197     /*
    198      * Set up the command word based on flags
    199      */
    200     if ( (flags & DMAGO_READ) == 0 )
    201         dev->sc_dmacmd = DMAC_CSR_ENABLE | DMAC_CSR_WRITE;
    202     else
    203         dev->sc_dmacmd = DMAC_CSR_ENABLE;
    204 
    205     dev->sc_flags |= SBICF_INTR;
    206     dev->sc_tcnt   = dev->sc_cur->dc_count << 1;
    207 
    208     /*
    209      * Prime the hardware.
    210      * Note, it's probably not necessary to do this here, since dmanext
    211      * is called just prior to the actual transfer.
    212      */
    213     pcc_reg_write(sys_pcc, PCCREG_DMA_CONTROL, 0);
    214     pcc_reg_write(sys_pcc, PCCREG_DMA_INTR_CTRL,
    215         dev->sc_ipl | PCC_IENABLE | PCC_ICLEAR);
    216     pcc_reg_write32(sys_pcc, PCCREG_DMA_DATA_ADDR,
    217 	(u_int32_t) dev->sc_cur->dc_addr);
    218     pcc_reg_write32(sys_pcc, PCCREG_DMA_BYTE_COUNT,
    219 	(u_int32_t) dev->sc_tcnt | (1 << 24));
    220     pcc_reg_write(sys_pcc, PCCREG_DMA_CONTROL, dev->sc_dmacmd);
    221 
    222     return(dev->sc_tcnt);
    223 }
    224 
    225 /*
    226  * Prime the hardware for the next DMA transfer
    227  */
    228 int
    229 wdsc_dmanext(dev)
    230     struct sbic_softc *dev;
    231 {
    232     if ( dev->sc_cur > dev->sc_last ) {
    233         /*
    234          * Shouldn't happen !!
    235          */
    236         printf("wdsc_dmanext at end !!!\n");
    237         wdsc_dmastop(dev);
    238         return(0);
    239     }
    240 
    241     dev->sc_tcnt = dev->sc_cur->dc_count << 1;
    242 
    243     /*
    244      * Load the next DMA address
    245      */
    246     pcc_reg_write(sys_pcc, PCCREG_DMA_CONTROL, 0);
    247     pcc_reg_write(sys_pcc, PCCREG_DMA_INTR_CTRL,
    248         dev->sc_ipl | PCC_IENABLE | PCC_ICLEAR);
    249     pcc_reg_write32(sys_pcc, PCCREG_DMA_DATA_ADDR,
    250 	(u_int32_t) dev->sc_cur->dc_addr);
    251     pcc_reg_write32(sys_pcc, PCCREG_DMA_BYTE_COUNT,
    252 	(u_int32_t) dev->sc_tcnt | (1 << 24));
    253     pcc_reg_write(sys_pcc, PCCREG_DMA_CONTROL, dev->sc_dmacmd);
    254 
    255     return(dev->sc_tcnt);
    256 }
    257 
    258 /*
    259  * Stop DMA, and disable interrupts
    260  */
    261 void
    262 wdsc_dmastop(dev)
    263     struct sbic_softc *dev;
    264 {
    265     int s;
    266 
    267     s = splbio();
    268 
    269     pcc_reg_write(sys_pcc, PCCREG_DMA_CONTROL, 0);
    270     pcc_reg_write(sys_pcc, PCCREG_DMA_INTR_CTRL, dev->sc_ipl | PCC_ICLEAR);
    271 
    272     splx(s);
    273 }
    274 
    275 /*
    276  * Come here following a DMA interrupt
    277  */
    278 int
    279 wdsc_dmaintr(arg)
    280     void *arg;
    281 {
    282     struct sbic_softc *dev = arg;
    283     int found = 0;
    284 
    285     /*
    286      * Really a DMA interrupt?
    287      */
    288     if ( (pcc_reg_read(sys_pcc, PCCREG_DMA_INTR_CTRL) & 0x80) == 0 )
    289         return(0);
    290 
    291     /*
    292      * Was it a completion interrupt?
    293      * XXXSCW Note: Support for other DMA interrupts is required, eg. buserr
    294      */
    295     if ( pcc_reg_read(sys_pcc, PCCREG_DMA_CONTROL) & DMAC_CSR_DONE ) {
    296         ++found;
    297 
    298 	pcc_reg_write(sys_pcc, PCCREG_DMA_INTR_CTRL,
    299 	    dev->sc_ipl | PCC_IENABLE | PCC_ICLEAR);
    300     }
    301 
    302     return(found);
    303 }
    304 
    305 /*
    306  * Come here for SCSI interrupts
    307  */
    308 int
    309 wdsc_scsiintr(arg)
    310     void *arg;
    311 {
    312     struct sbic_softc *dev = arg;
    313     int found;
    314 
    315     /*
    316      * Really a SCSI interrupt?
    317      */
    318     if ( (pcc_reg_read(sys_pcc, PCCREG_SCSI_INTR_CTRL) & 0x80) == 0 )
    319         return(0);
    320 
    321     /*
    322      * Go handle it
    323      */
    324     found = sbicintr(dev);
    325 
    326     /*
    327      * Acknowledge and clear the interrupt
    328      */
    329     pcc_reg_write(sys_pcc, PCCREG_SCSI_INTR_CTRL,
    330 	    dev->sc_ipl | PCC_IENABLE | PCC_ICLEAR);
    331 
    332     return(found);
    333 }
    334