/*      $NetBSD: afsc.c,v 1.47 2023/08/27 08:15:13 andvar Exp $ */

/*
* Copyright (c) 1982, 1990 The Regents of the University of California.
* All rights reserved.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* are met:
* 1. Redistributions of source code must retain the above copyright
*    notice, this list of conditions and the following disclaimer.
* 2. Redistributions in binary form must reproduce the above copyright
*    notice, this list of conditions and the following disclaimer in the
*    documentation and/or other materials provided with the distribution.
* 3. Neither the name of the University nor the names of its contributors
*    may be used to endorse or promote products derived from this software
*    without specific prior written permission.
*
* THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
* ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
* SUCH DAMAGE.
*
*      @(#)dma.c
*/

/*
* Copyright (c) 1994 Michael L. Hitch
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* are met:
* 1. Redistributions of source code must retain the above copyright
*    notice, this list of conditions and the following disclaimer.
* 2. Redistributions in binary form must reproduce the above copyright
*    notice, this list of conditions and the following disclaimer in the
*    documentation and/or other materials provided with the distribution.
*
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
*
*      @(#)dma.c
*/

#include <sys/cdefs.h>
__KERNEL_RCSID(0, "$NetBSD: afsc.c,v 1.47 2023/08/27 08:15:13 andvar Exp $");

#include <sys/param.h>
#include <sys/systm.h>
#include <sys/kernel.h>
#include <sys/device.h>

#include <dev/scsipi/scsi_all.h>
#include <dev/scsipi/scsipi_all.h>
#include <dev/scsipi/scsiconf.h>
#include <machine/cpu.h>
#include <amiga/amiga/custom.h>
#include <amiga/amiga/cc.h>
#include <amiga/amiga/device.h>
#include <amiga/amiga/isr.h>
#include <amiga/dev/siopreg.h>
#include <amiga/dev/siopvar.h>
#include <amiga/dev/zbusvar.h>

#ifdef __powerpc__
#define badaddr(a)      badaddr_read(a, 2, NULL)
#endif

void afscattach(device_t, device_t, void *);
int afscmatch(device_t, cfdata_t, void *);
int afsc_dmaintr(void *);
#ifdef DEBUG
void afsc_dump(void);
#endif

CFATTACH_DECL_NEW(afsc, sizeof(struct siop_softc),
   afscmatch, afscattach, NULL, NULL);

CFATTACH_DECL_NEW(aftsc, sizeof(struct siop_softc),
   afscmatch, afscattach, NULL, NULL);

/*
* if we are a Commodore Amiga A4091 or possibly an A4000T
*/
int
afscmatch(device_t parent, cfdata_t cf, void *aux)
{
       struct zbus_args *zap;
       siop_regmap_p rp;
       u_long temp, scratch;

       zap = aux;
       if (zap->manid == 514 && zap->prodid == 84)
               return(1);              /* It's an A4091 SCSI card */
       if (!is_a4000() || !matchname("afsc", aux))
               return(0);              /* Not on an A4000 or not A4000T SCSI */
       rp = ztwomap(0xdd0040);
       if (badaddr((void *)__UNVOLATILE(&rp->siop_scratch)) ||
           badaddr((void *)__UNVOLATILE(&rp->siop_temp))) {
               return(0);
       }
       scratch = rp->siop_scratch;
       temp = rp->siop_temp;
       rp->siop_scratch = 0xdeadbeef;
       rp->siop_temp = 0xaaaa5555;
       if (rp->siop_scratch != 0xdeadbeef || rp->siop_temp != 0xaaaa5555)
               return(0);
       rp->siop_scratch = scratch;
       rp->siop_temp = temp;
       if (rp->siop_scratch != scratch || rp->siop_temp != temp)
               return(0);
       return(1);
}

void
afscattach(device_t parent, device_t self, void *aux)
{
       struct siop_softc *sc = device_private(self);
       struct zbus_args *zap;
       siop_regmap_p rp;
       struct scsipi_adapter *adapt = &sc->sc_adapter;
       struct scsipi_channel *chan = &sc->sc_channel;

       printf("\n");

       sc->sc_dev = self;
       zap = aux;

       if (zap->manid == 514 && zap->prodid == 84)
               sc->sc_siopp = rp = (siop_regmap_p)((char *)zap->va +
                                                   0x00800000);
       else
               sc->sc_siopp = rp = ztwomap(0xdd0040);

       /*
        * CTEST7 = 80 [disable burst]
        */
       sc->sc_clock_freq = 50;         /* Clock = 50 MHz */
       sc->sc_ctest7 = SIOP_CTEST7_CDIS;
       sc->sc_dcntl = SIOP_DCNTL_EA;

       /*
        * Fill in the scsipi_adapter.
        */
       memset(adapt, 0, sizeof(*adapt));
       adapt->adapt_dev = self;
       adapt->adapt_nchannels = 1;
       adapt->adapt_openings = 7;
       adapt->adapt_max_periph = 1;
       adapt->adapt_request = siop_scsipi_request;
       adapt->adapt_minphys = siop_minphys;

       /*
        * Fill in the scsipi_channel.
        */
       memset(chan, 0, sizeof(*chan));
       chan->chan_adapter = adapt;
       chan->chan_bustype = &scsi_bustype;
       chan->chan_channel = 0;
       chan->chan_ntargets = 8;
       chan->chan_nluns = 8;
       chan->chan_id = 7;

       siopinitialize(sc);

       sc->sc_isr.isr_intr = afsc_dmaintr;
       sc->sc_isr.isr_arg = sc;
       sc->sc_isr.isr_ipl = 2;
       add_isr (&sc->sc_isr);

       /*
        * attach all scsi units on us
        */
       config_found(self, chan, scsiprint, CFARGS_NONE);
}

int
afsc_dmaintr(void *arg)
{
       struct siop_softc *sc = arg;
       siop_regmap_p rp;
       u_char istat;

       if (sc->sc_flags & SIOP_INTSOFF)
               return (0);     /* interrupts are not active */
       rp = sc->sc_siopp;
       istat = rp->siop_istat;
       if ((istat & (SIOP_ISTAT_SIP | SIOP_ISTAT_DIP)) == 0)
               return(0);
       /*
        * save interrupt status, DMA status, and SCSI status 0
        * (may need to deal with stacked interrupts?)
        */
       sc->sc_sstat0 = rp->siop_sstat0;
       sc->sc_istat = istat;
       sc->sc_dstat = rp->siop_dstat;
       siopintr(sc);
       return(1);
}

#ifdef DEBUG
void
afsc_dump(void)
{
       extern struct cfdriver afsc_cd;
       struct siop_softc *sc;
       int i;

       for (i = 0; i < afsc_cd.cd_ndevs; ++i) {
               sc = device_lookup_private(&afsc_cd, i);
               if (sc != NULL)
                       siop_dump(sc);
       }
}
#endif

You are viewing proxied material from ftp.icm.edu.pl. The copyright of proxied material belongs to its original authors. Any comments or complaints in relation to proxied material should be directed to the original authors of the content concerned. Please see the disclaimer for more details.