/* $NetBSD: asic.c,v 1.22 1997/07/21 05:39:40 jonathan Exp $ */ /* * Copyright (c) 1994, 1995 Carnegie-Mellon University. * All rights reserved. * * Author: Keith Bostic, Chris G. Demetriou, Jonathan Stone * * 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 Software.Distribution@CS.CMU.EDU * 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 #include #include #include #include #include #include /* wbflush() */ #include #if 0 #include #include #include #endif #ifdef pmax #include #include #include #include #include #include #include #include /* interrupt enable declaration */ #include #include #include extern int cputype; #endif struct asic_softc { struct device sc_dv; tc_addr_t sc_base; }; /* Definition of the driver for autoconfig. */ int asicmatch __P((struct device *, struct cfdata *, void *)); void asicattach __P((struct device *, struct device *, void *)); int asicprint(void *, const char *); /* Device locators. */ #include "locators.h" #define ioasiccf_offset cf_loc[IOASICCF_OFFSET] /* offset */ struct cfattach ioasic_ca = { sizeof(struct asic_softc), asicmatch, asicattach }; struct cfdriver ioasic_cd = { NULL, "asic", DV_DULL }; void asic_intr_establish __P((struct confargs *, intr_handler_t, intr_arg_t)); void asic_intr_disestablish __P((struct confargs *)); caddr_t ioasic_cvtaddr __P((struct confargs *)); #ifndef pmax int asic_intr __P((void *)); #endif int asic_intrnull __P((intr_arg_t)); struct asic_slot { struct confargs as_ca; u_int as_bits; intr_handler_t as_handler; void *as_val; }; #ifdef pmax /*#define IOASIC_DEBUG*/ struct asic_slot *asic_slots; #include "ds-asic-conf.c" #endif /*pmax*/ #ifdef IOASIC_DEBUG #define IOASIC_DPRINTF(x) printf x #else #define IOASIC_DPRINTF(x) do { if (0) printf x ; } while (0) #endif int asicmatch(parent, cf, aux) struct device *parent; struct cfdata *cf; void *aux; { struct tc_attach_args *ta = aux; IOASIC_DPRINTF(("asicmatch: %s slot %d offset 0x%x pri %d\n", ta->ta_modname, ta->ta_slot, ta->ta_offset, (int)ta->ta_cookie)); /* An IOCTL asic can only occur on the turbochannel, anyway. */ #ifdef notyet if (parent != &tccd) return (0); #endif /* The 3MAX (kn02) is special. */ if (TC_BUS_MATCHNAME(ta, KN02_ASIC_NAME)) { printf("(configuring KN02 system slot as asic)\n"); goto gotasic; } /* Make sure that we're looking for this type of device. */ if (!TC_BUS_MATCHNAME(ta, "IOCTL ")) return (0); gotasic: /* See if the unit number is valid. */ switch (cputype) { case DS_3MIN: if (cf->cf_unit > 0) return (0); asic_slots = kn03_asic_slots; /* XXX - 3min same as kn03? */ break; case DS_MAXINE: if (cf->cf_unit > 0) return (0); asic_slots = xine_asic_slots; break; case DS_3MAX: if (cf->cf_unit > 0) return (0); asic_slots = kn02_asic_slots; break; case DS_3MAXPLUS: if (cf->cf_unit > 0) return (0); asic_slots = kn03_asic_slots; break; default: printf("no ASIC config table for this machine\n"); return (0); } return (1); } void asicattach(parent, self, aux) struct device *parent, *self; void *aux; { struct asic_softc *sc = (struct asic_softc *)self; struct tc_attach_args *ta = aux; struct confargs *nca; struct ioasicdev_attach_args ioasicdev; int i; extern int cputype; if (asic_slots == NULL) panic("asicattach: no asic_slot map\n"); IOASIC_DPRINTF(("asicattach: %s\n", sc->sc_dv.dv_xname)); sc->sc_base = ta->ta_addr; ioasic_base = sc->sc_base; /* XXX XXX XXX */ #ifdef pmax printf("\n"); #else /* Alpha AXP: select ASIC speed */ #ifdef DEC_3000_300 if (cputype == ST_DEC_3000_300) { *(volatile u_int *)IOASIC_REG_CSR(sc->sc_base) |= IOASIC_CSR_FASTMODE; MB(); printf(": slow mode\n"); } else #endif /*DEC_3000_300*/ printf(": fast mode\n"); /* Decstations use hand-craft code to enable asic interrupts */ BUS_INTR_ESTABLISH(ta, asic_intr, sc); #endif /* Alpha AXP: select ASIC speed */ /* The MAXINE has seven pseudo-slots in its system slot */ #define ASIC_MAX_NSLOTS 7 /*XXX*/ /* Try to configure each CPU-internal device */ for (i = 0; i < ASIC_MAX_NSLOTS; i++) { IOASIC_DPRINTF(("asicattach: entry %d, base addr %x\n", i, sc->sc_base)); nca = &asic_slots[i].as_ca; if (nca == NULL) panic ("bad asic table\n"); if (nca->ca_name == NULL || nca->ca_name[0] == 0) break; nca->ca_addr = ((u_int)sc->sc_base) + nca->ca_offset; IOASIC_DPRINTF((" adding %s subslot %d offset %x addr %x\n", nca->ca_name, nca->ca_slot, nca->ca_offset, nca->ca_addr)); strncpy(ioasicdev.iada_modname, nca->ca_name, TC_ROM_LLEN); ioasicdev.iada_modname[TC_ROM_LLEN] = '\0'; ioasicdev.iada_offset = nca->ca_offset; ioasicdev.iada_addr = nca->ca_addr; ioasicdev.iada_cookie = (void *)nca->ca_slotpri; /* Tell the autoconfig machinery we've found the hardware. */ config_found(self, &ioasicdev, asicprint); } IOASIC_DPRINTF(("asicattach: done\n")); } int asicprint(aux, pnp) void *aux; const char *pnp; { struct ioasicdev_attach_args *d = aux; if (pnp) printf("%s at %s", d->iada_modname, pnp); printf(" offset 0x%x", d->iada_offset); printf(" priority %d", (int)d->iada_cookie); return (UNCONF); } int ioasic_submatch(match, d) struct cfdata *match; struct ioasicdev_attach_args *d; { return ((match->ioasiccf_offset == d->iada_offset) || (match->ioasiccf_offset == IOASICCF_OFFSET_DEFAULT)); } /* * Save interrupt slotname and enable mask (??) * On decstations this isn't useful, as the turbochannel * decstations all have incompatible ways of mapping interrupts * to IO ASIC or r3000 interrupt bits. * Instead of writing "as_bits" directly into an IOASIC interrupt-enable * register, Decstations use a machine-dependent function that * interpret (pseudo-) slot numbers and do ``the right thing'' to enable * or disable interrupts for a specific slot (or pseudo-slot), by * slot number, on that given CPU. */ void asic_intr_establish(ca, handler, val) struct confargs *ca; intr_handler_t handler; intr_arg_t val; { #if defined(DIAGNOSTIC) && defined(alpha) if (ca->ca_slot == IOASIC_SLOT_RTC) panic("setting clock interrupt incorrectly"); #endif /*defined(DIAGNOSTIC) && defined(alpha)*/ /* XXX SHOULD NOT BE THIS LITERAL */ if (asic_slots[ca->ca_slot].as_handler != asic_intrnull) /*panic*/ printf("asic_intr_establish: slot %d twice", ca->ca_slot); /* * XXX We need to invent a better interface to machine-dependent * interrupt-enable code, or redo the Decstation configuration * tables with unused entries, so that slot is always equal * to "priority" (software pseudo-slot number). FIXME. */ #if defined(IOASIC_DEBUG) && 0 printf("asic: %s: intr for entry %d slot %d pri %d\n", ca->ca_name, ca->ca_slot, ca->ca_slotpri, (int)asic_slots[ca->ca_slot].as_val); #endif /*IOASIC_DEBUG*/ #ifdef pmax tc_enable_interrupt(ca->ca_slotpri, handler, val, 1); #else /* Alpha AXP */ /* Save handler info so it can be enabled later (??) */ asic_slots[ca->ca_slot].as_handler = handler; asic_slots[ca->ca_slot].as_val = val; #endif /* Alpha AXP */ } void asic_intr_disestablish(ca) struct confargs *ca; { #ifdef pmax panic("asic_intr_disestablish: shouldn't ever be called\n"); #else if (ca->ca_slot == IOASIC_SLOT_RTC) panic("asic_intr_disestablish: can't do clock interrupt"); /* XXX SHOULD NOT BE THIS LITERAL */ if (asic_slots[ca->ca_slot].as_handler == asic_intrnull) panic("asic_intr_disestablish: slot %d missing intr", ca->ca_slot); asic_slots[ca->ca_slot].as_handler = dsasic_intrnull; asic_slots[ca->ca_slot].as_val = (void *)(long)ca->ca_slot; #endif } void ioasic_intr_establish(dev, cookie, level, handler, val) struct device *dev; void *cookie; tc_intrlevel_t level; intr_handler_t handler; void *val; { (*tc_enable_interrupt)((int)cookie, handler, val, 1); } #ifdef alpha /* * asic_intr -- * ASIC interrupt handler. */ int asic_intr(val) void *val; { register struct asic_softc *sc = val; register int i, ifound; int gifound; u_int32_t sir, junk; volatile u_int32_t *sirp, *junkp; sirp = (volatile u_int32_t *)IOASIC_REG_INTR(sc->sc_base); gifound = 0; do { ifound = 0; MB(); MAGIC_READ; MB(); sir = *sirp; for (i = 0; i < ASIC_MAX_NSLOTS; i++) if (sir & asic_slots[i].as_bits) { (void)(*asic_slots[i].as_handler) (asic_slots[i].as_val); ifound = 1; } gifound |= ifound; } while (ifound); return (gifound); } #endif /*!pmax*/ int asic_intrnull(val) intr_arg_t val; { panic("uncaught IOCTL ASIC intr for slot %ld\n", (long)val); } /* XXX */ char * ioasic_lance_ether_address() { return (u_char *)IOASIC_SYS_ETHER_ADDRESS(ioasic_base); } void ioasic_lance_dma_setup(v) void *v; { volatile u_int32_t *ldp; tc_addr_t tca; tca = (tc_addr_t)v; ldp = (volatile u_int *)IOASIC_REG_LANCE_DMAPTR(ioasic_base); *ldp = ((tca << 3) & ~(tc_addr_t)0x1f) | ((tca >> 29) & 0x1f); tc_wmb(); *(volatile u_int32_t *)IOASIC_REG_CSR(ioasic_base) |= IOASIC_CSR_DMAEN_LANCE; tc_mb(); }