/* $NetBSD: sio.c,v 1.57 2021/08/07 16:18:41 thorpej Exp $ */

/*-
* Copyright (c) 2000 The NetBSD Foundation, Inc.
* All rights reserved.
*
* This code is derived from software contributed to The NetBSD Foundation
* by Jason R. Thorpe.
*
* 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 NETBSD FOUNDATION, INC. 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 FOUNDATION 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.
*/

/*
* Copyright (c) 1995, 1996 Carnegie-Mellon University.
* All rights reserved.
*
* Author: Chris G. Demetriou
*
* Permission to use, copy, modify and distribute this software and
* its documentation is hereby granted, provided that both the copyright
* notice and this permission notice appear in all copies of the
* software, derivative works or modified versions, and any portions
* thereof, and that both notices appear in supporting documentation.
*
* CARNEGIE MELLON ALLOWS FREE USE OF THIS SOFTWARE IN ITS "AS IS"
* CONDITION.  CARNEGIE MELLON DISCLAIMS ANY LIABILITY OF ANY KIND
* FOR ANY DAMAGES WHATSOEVER RESULTING FROM THE USE OF THIS SOFTWARE.
*
* Carnegie Mellon requests users of this software to return to
*
*  Software Distribution Coordinator  or  [email protected]
*  School of Computer Science
*  Carnegie Mellon University
*  Pittsburgh PA 15213-3890
*
* any improvements or extensions that they make and grant Carnegie the
* rights to redistribute these changes.
*/

#include "opt_dec_2100_a500.h"
#include "opt_dec_2100a_a500.h"
#include "eisa.h"
#include "sio.h"

#include <sys/cdefs.h>                  /* RCS ID & Copyright macro defns */

__KERNEL_RCSID(0, "$NetBSD: sio.c,v 1.57 2021/08/07 16:18:41 thorpej Exp $");

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

#include <machine/intr.h>
#include <sys/bus.h>
#include <machine/rpb.h>

#include <dev/isa/isavar.h>
#include <dev/eisa/eisavar.h>

#include <dev/pci/pcireg.h>
#include <dev/pci/pcivar.h>
#include <dev/pci/pcidevs.h>

#include <alpha/pci/siovar.h>

#if defined(DEC_2100_A500) || defined(DEC_2100A_A500)
#include <alpha/pci/pci_2100_a500.h>
#include <alpha/sableio/sableiovar.h>
#endif

struct sio_softc {
       device_t        sc_dev;

       pci_chipset_tag_t sc_pc;

       bus_space_tag_t sc_iot, sc_memt;
       bus_dma_tag_t   sc_parent_dmat;
#if NPCEB > 0
       int             sc_haseisa;
#endif
       int             sc_is82c693;

       /* ISA chipset must persist; it's used after autoconfig. */
       isa_chipset_tag_t sc_ic;
};

static int      siomatch(device_t, cfdata_t, void *);
static void     sioattach(device_t, device_t, void *);

CFATTACH_DECL_NEW(sio, sizeof(struct sio_softc),
   siomatch, sioattach, NULL, NULL);

#if NPCEB > 0
static int      pcebmatch(device_t, cfdata_t, void *);

CFATTACH_DECL_NEW(pceb, sizeof(struct sio_softc),
   pcebmatch, sioattach, NULL, NULL);
#endif

union sio_attach_args {
       struct isabus_attach_args sa_iba;
       struct eisabus_attach_args sa_eba;
};

static void     sio_isa_attach_hook(device_t, device_t,
                   struct isabus_attach_args *);
static void     sio_isa_detach_hook(isa_chipset_tag_t, device_t);
#if NPCEB > 0
static void     sio_eisa_attach_hook(device_t, device_t,
                   struct eisabus_attach_args *);
static int      sio_eisa_maxslots(void *);
static int      sio_eisa_intr_map(void *, u_int, eisa_intr_handle_t *);
#endif

static void     sio_bridge_callback(device_t);

static int
siomatch(device_t parent, cfdata_t match, void *aux)
{
       struct pci_attach_args *pa = aux;

       /*
        * The Cypress 82C693 is more-or-less an SIO, but with
        * indirect register access.  (XXX for everything, or
        * just the ELCR?)
        */
       if (PCI_VENDOR(pa->pa_id) == PCI_VENDOR_CONTAQ &&
           PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_CONTAQ_82C693 &&
           pa->pa_function == 0)
               return (1);

       if (PCI_VENDOR(pa->pa_id) == PCI_VENDOR_INTEL &&
           PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_INTEL_SIO)
               return (1);

       if (PCI_VENDOR(pa->pa_id) == PCI_VENDOR_ALI &&
           PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_ALI_M1533)
               return (1);

       return (0);
}

#if NPCEB > 0
static int
pcebmatch(device_t parent, cfdata_t match, void *aux)
{
       struct pci_attach_args *pa = aux;

       if (PCI_VENDOR(pa->pa_id) == PCI_VENDOR_INTEL &&
           PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_INTEL_PCEB)
               return (1);

       return (0);
}
#endif

static void
sioattach(device_t parent, device_t self, void *aux)
{
       struct sio_softc *sc = device_private(self);
       struct pci_attach_args *pa = aux;
       char devinfo[256];

       pci_devinfo(pa->pa_id, pa->pa_class, 0, devinfo, sizeof(devinfo));
       aprint_normal(": %s (rev. 0x%02x)\n", devinfo,
           PCI_REVISION(pa->pa_class));

       sc->sc_dev = self;
       sc->sc_pc = pa->pa_pc;
       sc->sc_iot = pa->pa_iot;
       sc->sc_memt = pa->pa_memt;
       sc->sc_parent_dmat = pa->pa_dmat;
#if NPCEB > 0
       sc->sc_haseisa = (PCI_VENDOR(pa->pa_id) == PCI_VENDOR_INTEL &&
           PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_INTEL_PCEB);
#endif
       sc->sc_is82c693 = (PCI_VENDOR(pa->pa_id) == PCI_VENDOR_CONTAQ &&
           PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_CONTAQ_82C693);

       config_defer(self, sio_bridge_callback);
}

static void
sio_bridge_callback(device_t self)
{
       struct sio_softc *sc = device_private(self);
       union sio_attach_args sa;
#if NPCEB > 0
       struct alpha_eisa_chipset ec;

       if (sc->sc_haseisa) {
               ec.ec_v = NULL;
               ec.ec_attach_hook = sio_eisa_attach_hook;
               ec.ec_maxslots = sio_eisa_maxslots;

               /*
                * Deal with platforms that hook EISA interrupts
                * up differently.
                */
               switch (cputype) {
#if defined(DEC_2100_A500) || defined(DEC_2100A_A500)
               case ST_DEC_2100_A500:
               case ST_DEC_2100A_A500:
                       pci_2100_a500_eisa_pickintr(sc->sc_pc, &ec);
                       break;
#endif
               default:
                       ec.ec_intr_map = sio_eisa_intr_map;
                       ec.ec_intr_string = sio_intr_string;
                       ec.ec_intr_evcnt = sio_intr_evcnt;
                       ec.ec_intr_establish = sio_isa_intr_establish;
                       ec.ec_intr_disestablish = sio_intr_disestablish;
               }

               sa.sa_eba.eba_iot = sc->sc_iot;
               sa.sa_eba.eba_memt = sc->sc_memt;
               sa.sa_eba.eba_dmat =
                   alphabus_dma_get_tag(sc->sc_parent_dmat, ALPHA_BUS_EISA);
               sa.sa_eba.eba_ec = &ec;
               config_found(sc->sc_dev, &sa.sa_eba, eisabusprint,
                   CFARGS(.iattr = "eisabus"));
       }
#endif /* NPCEB */

       /*
        * Deal with platforms which have Odd ISA DMA needs.
        */
       switch (cputype) {
#if defined(DEC_2100_A500) || defined(DEC_2100A_A500)
       case ST_DEC_2100_A500:
       case ST_DEC_2100A_A500:
               sc->sc_ic = sableio_pickisa();
               break;
#endif
       default:
               sc->sc_ic = kmem_zalloc(sizeof(*sc->sc_ic), KM_SLEEP);
       }

       sc->sc_ic->ic_v = NULL;
       sc->sc_ic->ic_attach_hook = sio_isa_attach_hook;
       sc->sc_ic->ic_detach_hook = sio_isa_detach_hook;

       /*
        * Deal with platforms that hook up ISA interrupts differently.
        */
       switch (cputype) {
#if defined(DEC_2100_A500) || defined(DEC_2100A_A500)
       case ST_DEC_2100_A500:
       case ST_DEC_2100A_A500:
               pci_2100_a500_isa_pickintr(sc->sc_pc, sc->sc_ic);
               break;
#endif
       default:
               sc->sc_ic->ic_intr_evcnt = sio_intr_evcnt;
               sc->sc_ic->ic_intr_establish = sio_isa_intr_establish;
               sc->sc_ic->ic_intr_disestablish = sio_intr_disestablish;
               sc->sc_ic->ic_intr_alloc = sio_intr_alloc;
       }

       sa.sa_iba.iba_iot = sc->sc_iot;
       sa.sa_iba.iba_memt = sc->sc_memt;
       sa.sa_iba.iba_dmat =
           alphabus_dma_get_tag(sc->sc_parent_dmat, ALPHA_BUS_ISA);
       sa.sa_iba.iba_ic = sc->sc_ic;
       config_found(sc->sc_dev, &sa.sa_iba, isabusprint,
           CFARGS(.iattr = "isabus"));
}

static void
sio_isa_attach_hook(device_t parent, device_t self, struct isabus_attach_args *iba)
{

       /* Nothing to do. */
}

static void
sio_isa_detach_hook(isa_chipset_tag_t ic, device_t self)
{

       /* Nothing to do. */
}

#if NPCEB > 0

static void
sio_eisa_attach_hook(device_t parent, device_t self, struct eisabus_attach_args *eba)
{

#if NEISA > 0
       eisa_init(eba->eba_ec);
#endif
}

static int
sio_eisa_maxslots(void *v)
{

       return 16;              /* as good a number as any.  only 8, maybe? */
}

static int
sio_eisa_intr_map(void *v, u_int irq, eisa_intr_handle_t *ihp)
{

#define ICU_LEN         16      /* number of ISA IRQs (XXX) */

       if (irq >= ICU_LEN) {
               printf("sio_eisa_intr_map: bad IRQ %d\n", irq);
               *ihp = -1;
               return 1;
       }
       if (irq == 2) {
               printf("sio_eisa_intr_map: changed IRQ 2 to IRQ 9\n");
               irq = 9;
       }

       *ihp = irq;
       return 0;
}

#endif /* NPCEB */

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.