/* $NetBSD: obio.c,v 1.6 1997/04/28 23:38:47 gwr Exp $ */ /*- * Copyright (c) 1996 The NetBSD Foundation, Inc. * All rights reserved. * * This code is derived from software contributed to The NetBSD Foundation * by Adam Glass and Gordon W. Ross. * * 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. All advertising materials mentioning features or use of this software * must display the following acknowledgement: * This product includes software developed by the NetBSD * Foundation, Inc. and its contributors. * 4. Neither the name of The NetBSD Foundation 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 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. */ #include #include #include #include #include #include #include #include short *enable_reg; static int obio_match __P((struct device *, struct cfdata *, void *)); static void obio_attach __P((struct device *, struct device *, void *)); static int obio_print __P((void *, const char *parentname)); static int obio_submatch __P((struct device *, struct cfdata *, void *)); struct cfattach obio_ca = { sizeof(struct device), obio_match, obio_attach }; struct cfdriver obio_cd = { NULL, "obio", DV_DULL }; static int obio_match(parent, cf, aux) struct device *parent; struct cfdata *cf; void *aux; { struct confargs *ca = aux; if (ca->ca_bustype != BUS_OBIO) return (0); return(1); } /* * We need some control over the order of attachment on OBIO, * and all OBIO device addresses are known and fixed foerver. * Therefore, this uses a list of addresses to attach. * XXX - Any other way to control search/attach order? * * Warning: This whole list is very carefully ordered! * In general, anything not already shown here should * be added at or near the end. */ static int obio_alist[] = { /* Misc. registers - needed by many things */ OBIO_ENABLEREG, OBIO_BUSERRREG, OBIO_DIAGREG, /* leds.c */ OBIO_IDPROM1, /* idprom.c (3/470) */ OBIO_MEMREG, /* memerr.c */ OBIO_INTERREG, /* intreg.c */ /* Zilog UARTs */ OBIO_ZS_KBD_MS, OBIO_ZS_TTY_AB, /* eeprom.c */ OBIO_EEPROM, /* Note: This must come after OBIO_IDPROM1. */ OBIO_IDPROM2, /* idprom.c (3/80) */ /* Note: Must probe for the Intersil first! */ OBIO_CLOCK1, /* clock.c (3/470) */ OBIO_CLOCK2, /* clock.c (3/80) */ /* This is used by the Ethernet and SCSI drivers. */ OBIO_IOMMU, OBIO_INTEL_ETHER, OBIO_LANCE_ETHER, OBIO_EMULEX_SCSI, /* 3/80 only */ /* ...todo... */ OBIO_FDC, OBIO_PRINTER_PORT, }; #define OBIO_ALIST_LEN (sizeof(obio_alist) / \ sizeof(obio_alist[0])) static void obio_attach(parent, self, aux) struct device *parent; struct device *self; void *aux; { struct confargs *ca = aux; int i; printf("\n"); /* Configure these in the order listed above. */ for (i = 0; i < OBIO_ALIST_LEN; i++) { /* Our parent set ca->ca_bustype already. */ ca->ca_paddr = obio_alist[i]; /* These are filled-in by obio_submatch. */ ca->ca_intpri = -1; ca->ca_intvec = -1; (void) config_found_sm(self, ca, obio_print, obio_submatch); } } /* * Print out the confargs. The (parent) name is non-NULL * when there was no match found by config_found(). */ static int obio_print(args, name) void *args; const char *name; { /* Be quiet about empty OBIO locations. */ if (name) return(QUIET); /* Otherwise do the usual. */ return(bus_print(args, name)); } int obio_submatch(parent, cf, aux) struct device *parent; struct cfdata *cf; void *aux; { struct confargs *ca = aux; cfmatch_t submatch; /* * Note that a defaulted address locator can never match * the value of ca->ca_paddr set by the obio_attach loop. * Without this diagnostic, any device with a defaulted * address locator would always be silently unmatched. * Therefore, just disallow default addresses on OBIO. */ #ifdef DIAGNOSTIC if (cf->cf_paddr == -1) panic("obio_submatch: invalid address for: %s%d\n", cf->cf_driver->cd_name, cf->cf_unit); #endif /* * Note that obio_attach calls config_found_sm() with * this function as the "submatch" and ca->ca_paddr * set to each of the possible OBIO locations, so we * want to reject any unmatched address here. */ if (cf->cf_paddr != ca->ca_paddr) return 0; /* * Copy the locators into our confargs for the child. * Note: ca->ca_bustype was set by our parent driver * (mainbus) and ca->ca_paddr was set by obio_attach. */ ca->ca_intpri = cf->cf_intpri; ca->ca_intvec = cf->cf_intvec; /* Now call the match function of the potential child. */ submatch = cf->cf_attach->ca_match; if (submatch == NULL) panic("obio_submatch: no match function for: %s\n", cf->cf_driver->cd_name); return ((*submatch)(parent, cf, aux)); } /*****************************************************************/ /* * This is our record of "interesting" OBIO mappings that * the PROM has left in the virtual space reserved for it. * Each non-null array element holds the virtual address * of an OBIO mapping where the OBIO address mapped is: * (array_index * SAVE_INCR) * and the length of the mapping is one page. */ static struct prom_map { vm_offset_t pa, va; } prom_mappings[] = { { OBIO_ENABLEREG, 0 }, /* regs: Sys ENA, Bus ERR, etc. */ { OBIO_ZS_KBD_MS, 0 }, /* Keyboard and Mouse */ { OBIO_ZS_TTY_AB, 0 }, /* Serial Ports */ { OBIO_EEPROM, 0 }, /* EEPROM/IDPROM/clock */ }; #define PROM_MAP_CNT (sizeof(prom_mappings) / \ sizeof(prom_mappings[0])) /* * Find a virtual address for a device at physical address 'pa'. * If one is found among the mappings already made by the PROM * at power-up time, use it. Otherwise return 0 as a sign that * a mapping will have to be created. */ caddr_t obio_find_mapping(int pa, int size) { int i, off; if (size >= NBPG) return (caddr_t)0; off = pa & PGOFSET; pa -= off; for (i = 0; i < PROM_MAP_CNT; i++) { if (pa == prom_mappings[i].pa) { return ((caddr_t)(prom_mappings[i].va + off)); } } return (caddr_t)0; } /* * Search the PROM page tables for OBIO mappings that * we would like to borrow. */ static void save_prom_mappings __P((void)) { int *mon_pte; vm_offset_t va, pa; int i; /* Note: mon_ctbl[0] maps MON_KDB_START */ mon_pte = *romVectorPtr->monptaddr; for (va = MON_KDB_START; va < MONEND; va += NBPG, mon_pte++) { /* Is this a valid mapping to OBIO? */ /* XXX - Some macros would be nice... */ if ((*mon_pte & 0xF0000003) != 0x60000001) continue; /* Yes it is. Is this a mapping we want? */ pa = *mon_pte & MMU_SHORT_PTE_BASEADDR; for (i = 0; i < PROM_MAP_CNT; i++) { if (pa != prom_mappings[i].pa) continue; /* Yes, we want it. Save the va? */ if (prom_mappings[i].va == 0) { prom_mappings[i].va = va; } } } } /* * These are all the OBIO address that are required early in * the life of the kernel. All are less than one page long. * This function should make any required mappings that we * were not able to find among the PROM monitor's mappings. */ static void make_required_mappings __P((void)) { int i; for (i = 0; i < PROM_MAP_CNT; i++) { if (prom_mappings[i].va == 0) { /* * Actually, the PROM always has all the * "required" mappings we need, (smile) * but this makes sure that is true. */ mon_printf("obio: no mapping for pa=0x%x\n", prom_mappings[i].pa); sunmon_abort(); /* Ancient PROM? */ } } } /* * Find mappings for devices that are needed before autoconfiguration. * We first look for and record any useful PROM mappings, then call * the "init" functions for drivers that we need to use before the * normal autoconfiguration calls configure(). Warning: this is * called before pmap_bootstrap, so no allocation allowed! */ void obio_init() { save_prom_mappings(); make_required_mappings(); enable_reg = (short*) obio_find_mapping(OBIO_ENABLEREG, 2); /* * Find the interrupt reg mapping and turn off the * interrupts, otherwise the PROM clock interrupt * would poll the zs and toggle some LEDs... */ intreg_init(); /* Turn on the LEDs so we know power is on. */ leds_init(); /* Make the zs driver ready for console duty. */ zs_init(); cninit(); } /* * This function is used by some OBIO drivers to conserve * kernel virtual space by sharing mappings made by the * PROM monitor. If we could not find any mapping made by * the PROM monitor, then make our own as usual. */ caddr_t obio_mapin(obio_addr, obio_size) int obio_addr, obio_size; { caddr_t cp; cp = obio_find_mapping((vm_offset_t)obio_addr, obio_size); if (cp) return (cp); cp = bus_mapin(BUS_OBIO, obio_addr, obio_size); return (cp); }