/* $NetBSD: vrc4173bcu.c,v 1.3 2001/10/22 13:44:05 takemura Exp $ */ /*- * Copyright (c) 2001 Enami Tsugutomo. * 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. * * 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. */ #include #include #include #include #include #include #include #include #include #include #include #define VRC4173BCU_BADR 0x10 #ifdef DEBUG #define DPRINTF(args) printf args #else #define DPRINTF(args) #endif #define USE_WINCE_CLKMASK (~0) static int vrc4173bcu_match(struct device *, struct cfdata *, void *); static void vrc4173bcu_attach(struct device *, struct device *, void *); static int vrc4173bcu_print(void *, const char *); int vrcintr_port = 1; /* GPIO port to which VRCINT is connected to. XXX. */ struct cfattach vrc4173bcu_ca = { sizeof(struct vrc4173bcu_softc), vrc4173bcu_match, vrc4173bcu_attach, }; static struct vrc4173bcu_platdep { platid_t *platid; u_int32_t clkmask; } platdep_table[] = { { &platid_wild, USE_WINCE_CLKMASK, /* XXX */ }, }; int vrc4173bcu_match(struct device *parent, struct cfdata *match, void *aux) { struct pci_attach_args *pa = (struct pci_attach_args *)aux; if (PCI_VENDOR(pa->pa_id) == PCI_VENDOR_NEC && PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_NEC_VRC4173_BCU) return (1); return (0); } void vrc4173bcu_attach(struct device *parent, struct device *self, void *aux) { struct vrc4173bcu_softc *sc = (struct vrc4173bcu_softc *)self; struct pci_attach_args *pa = (struct pci_attach_args *)aux; pci_chipset_tag_t pc = pa->pa_pc; pcitag_t tag = pa->pa_tag; pcireg_t csr; char devinfo[256]; int i; u_int16_t reg; struct vrc4173bcu_platdep *platdep_info; #ifdef DEBUG char buf[80]; #endif pci_devinfo(pa->pa_id, pa->pa_class, 0, devinfo); printf(": %s (rev. 0x%02x)\n", devinfo, PCI_REVISION(pa->pa_class)); #if 0 printf("%s: ", sc->sc_dev.dv_xname); pci_conf_print(pa->pa_pc, pa->pa_tag, NULL); #endif csr = pci_conf_read(pc, tag, VRC4173BCU_BADR); DPRINTF(("%s: base addr = 0x%08x\n", sc->sc_dev.dv_xname, csr)); platdep_info = platid_search(&platid, platdep_table, sizeof(platdep_table)/sizeof(*platdep_table), sizeof(*platdep_table)); /* Map I/O registers */ if (pci_mapreg_map(pa, VRC4173BCU_BADR, PCI_MAPREG_TYPE_IO, 0, &sc->sc_iot, &sc->sc_ioh, NULL, &sc->sc_size)) { printf("%s: can't map mem space\n", sc->sc_dev.dv_xname); return; } sc->sc_pc = pc; /* Enable the device. */ csr = pci_conf_read(pc, tag, PCI_COMMAND_STATUS_REG); DPRINTF(("%s: csr = 0x%08x", sc->sc_dev.dv_xname, csr)); pci_conf_write(pc, tag, PCI_COMMAND_STATUS_REG, csr | PCI_COMMAND_MASTER_ENABLE | PCI_COMMAND_IO_ENABLE); csr = pci_conf_read(pc, tag, PCI_COMMAND_STATUS_REG); DPRINTF((" -> 0x%08x\n", csr)); csr = pci_conf_read(pc, tag, VRC4173BCU_BADR); DPRINTF(("%s: base addr = %x@0x%08x\n", sc->sc_dev.dv_xname, (int)sc->sc_size, csr)); DPRINTF(("%s: iot = 0x%08x, ioh = 0x%08x\n", sc->sc_dev.dv_xname, (int)sc->sc_iot, sc->sc_ioh)); /* * Map I/O space for ICU. */ if (bus_space_subregion(sc->sc_iot, sc->sc_ioh, VRC4173ICU_IOBASE, VRC4173ICU_IOSIZE, &sc->sc_icuh)) { printf(": can't map ICU i/o space\n"); return; } /* * Map I/O space for CMU. */ if (bus_space_subregion(sc->sc_iot, sc->sc_ioh, VRC4173CMU_IOBASE, VRC4173CMU_IOSIZE, &sc->sc_cmuh)) { printf(": can't map CMU i/o space\n"); return; } /* assert all reset bits */ bus_space_write_2(sc->sc_iot, sc->sc_cmuh, VRC4173CMU_SRST, VRC4173CMU_SRST_AC97 | VRC4173CMU_SRST_USB | VRC4173CMU_SRST_CARD2 | VRC4173CMU_SRST_CARD1); /* set clock mask */ if (platdep_info->clkmask == USE_WINCE_CLKMASK) { reg = bus_space_read_2(sc->sc_iot, sc->sc_cmuh, VRC4173CMU_SRST); printf("%s: default clock mask is %04x\n", sc->sc_dev.dv_xname, reg); } else { bus_space_write_2(sc->sc_iot, sc->sc_cmuh, VRC4173CMU_CLKMSK, platdep_info->clkmask); } /* clear reset bit */ bus_space_write_2(sc->sc_iot, sc->sc_cmuh, VRC4173CMU_SRST, 0); #ifdef DEBUG reg = bus_space_read_2(sc->sc_iot, sc->sc_icuh, VRC4173ICU_SYSINT1); bitmask_snprintf(reg, "\20\1USB\2PCMCIA2\3PCMCIA1\4PS2CH2\5PS2CH1\6PIU\7AIU\10KIU" "\11GIU\12AC97\13AC97-1\14B11\15B12\16DOZEPIU\17B14\20B15", buf, sizeof(buf)); printf("%s: SYSINT1 = 0x%s\n", sc->sc_dev.dv_xname, buf); reg = bus_space_read_2(sc->sc_iot, sc->sc_icuh, VRC4173ICU_MKIUINT); bitmask_snprintf(reg, "\20\1SCANINT\2KDATRDY\3KDATLOST\4B3\5B4\6B5\7B6\10B7" "\11B8\12B9\13B10\14B11\15B12\16B13\17B14\20B15", buf, sizeof(buf)); printf("%s: MKIUINT = 0x%s\n", sc->sc_dev.dv_xname, buf); reg = bus_space_read_2(sc->sc_iot, sc->sc_icuh, VRC4173ICU_MSYSINT1); bitmask_snprintf(reg, "\20\1USB\2PCMCIA2\3PCMCIA1\4PS2CH2\5PS2CH1\6PIU\7AIU\10KIU" "\11GIU\12AC97\13AC97-1\14B11\15B12\16DOZEPIU\17B14\20B15", buf, sizeof(buf)); printf("%s: MSYSINT1 = 0x%s\n", sc->sc_dev.dv_xname, buf); #if 1 reg = VRC4173ICU_USBINTR | VRC4173ICU_PIUINTR | VRC4173ICU_KIUINTR | VRC4173ICU_DOZEPIUINTR; bus_space_write_2(sc->sc_iot, sc->sc_icuh, VRC4173ICU_MSYSINT1, reg); reg = bus_space_read_2(sc->sc_iot, sc->sc_icuh, VRC4173ICU_MSYSINT1); bitmask_snprintf(reg, "\20\1USB\2PCMCIA2\3PCMCIA1\4PS2CH2\5PS2CH1\6PIU\7AIU\10KIU" "\11GIU\12AC97\13AC97-1\14B11\15B12\16DOZEPIU\17B14\20B15", buf, sizeof(buf)); printf("%s: MSYSINT1 = 0x%s\n", sc->sc_dev.dv_xname, buf); #endif #endif for (i = 0; i < VRC4173BCU_NINTRHAND; i++) sc->sc_intrhand[i].ih_func = NULL; /* * Attach sub units found in vrc4173. XXX. */ config_found(self, "vrc4173cmu", vrc4173bcu_print); config_found(self, "vrc4173giu", vrc4173bcu_print); config_found(self, "vrc4173piu", vrc4173bcu_print); config_found(self, "vrc4173kiu", vrc4173bcu_print); config_found(self, "vrc4173aiu", vrc4173bcu_print); config_found(self, "vrc4173ps2u", vrc4173bcu_print); /* * Establish VRCINT interrupt. Normally connected to one of * GPIO pin in VR41xx. XXX. */ sc->sc_ih = pci_vrcintr_establish(pc, vrcintr_port, vrc4173bcu_intr, sc); if (sc->sc_ih != NULL) printf("%s: interrupting at %p\n", sc->sc_dev.dv_xname, sc->sc_ih); } int vrc4173bcu_print(void *aux, const char *pnp) { const char *name = aux; if (pnp) printf("%s at %s", name, pnp); return (UNCONF); } int vrc4173bcu_intr(void *arg) { struct vrc4173bcu_softc *sc = (struct vrc4173bcu_softc *)arg; struct intrhand *ih; u_int16_t reg; int i, handled; reg = bus_space_read_2(sc->sc_iot, sc->sc_icuh, VRC4173ICU_SYSINT1); if (reg == 0) return (0); #if 0 { char buf[80]; bitmask_snprintf(reg, "\20\1USB\2PCMCIA2\3PCMCIA1\4PS2CH2\5PS2CH1\6PIU\7AIU\10KIU" "\11GIU\12AC97\13AC97-1\14B11\15B12\16DOZEPIU\17B14\20B15", buf, sizeof(buf)); printf("%s: %s\n", sc->sc_dev.dv_xname, buf); } #endif for (handled = i = 0; i < VRC4173BCU_NINTRHAND; i++) { ih = &sc->sc_intrhand[i]; if (ih->ih_func != NULL && (reg & (1 << i)) != 0) { handled = 1; (*ih->ih_func)(ih->ih_arg); } } return (handled); } void * vrc4173bcu_intr_establish(struct vrc4173bcu_softc *sc, int kind, int (*func)(void *), void *arg) { struct intrhand *ih; DPRINTF(("vrc4173bcu_intr_establish: %d, %p, %p\n", kind, func, arg)); if (kind < 0 || kind >= VRC4173BCU_NINTRHAND) return (NULL); ih = &sc->sc_intrhand[kind]; if (ih->ih_func != NULL) return (NULL); ih->ih_func = func; ih->ih_arg = arg; return (ih); } void vrc4173bcu_intr_disestablish(struct vrc4173bcu_softc *sc, void *ihp) { struct intrhand *ih = ihp; if (ih < &sc->sc_intrhand[0] || ih >= &sc->sc_intrhand[VRC4173BCU_NINTRHAND]) return; ih->ih_func = NULL; } int vrc4173bcu_pci_bus_devorder(pci_chipset_tag_t pc, int busno, char *devs) { int i, bcudev; /* * XXX, we must attach Vrc4173 BCU first. */ /* search for BCU */ for (bcudev = 0; bcudev < 32; bcudev++) { pcitag_t tag; pcireg_t id; tag = pci_make_tag(pc, 0, bcudev, 0); id = pci_conf_read(pc, tag, PCI_ID_REG); if (PCI_VENDOR(id) == PCI_VENDOR_NEC && PCI_PRODUCT(id) ==PCI_PRODUCT_NEC_VRC4173_BCU) break; } if (32 <= bcudev) bcudev = 0; /* not found */ *devs++ = bcudev; /* scan BCU first */ for (i = 0; i < 32; i++) if (i != bcudev) *devs++ = i; return (i); } int vrc4173bcu_pci_intr_map(struct pci_attach_args *pa, pci_intr_handle_t *ihp) { pci_chipset_tag_t pc = pa->pa_pc; pcitag_t intrtag = pa->pa_intrtag; int bus, dev, func; #ifdef DEBUG int line = pa->pa_intrline; int pin = pa->pa_intrpin; #endif pci_decompose_tag(pc, intrtag, &bus, &dev, &func); DPRINTF(("%s(%d, %d, %d): line = %d, pin = %d\n", pc->pc_dev->dv_xname, bus, dev, func, line, pin)); *ihp = -1; switch (dev) { case 1: /* CARDU0 */ *ihp = VRC4173ICU_PCMCIA1INTR; break; case 2: /* CARDU1 */ *ihp = VRC4173ICU_PCMCIA2INTR; break; case 19: /* VRC4173 */ switch (func) { case 2: *ihp = VRC4173ICU_USBINTR; break; } break; } return (*ihp == -1); } const char * vrc4173bcu_pci_intr_string(pci_chipset_tag_t pc, pci_intr_handle_t ih) { static char irqstr[8 + sizeof("vrc4173 intr")]; snprintf(irqstr, sizeof(irqstr), "vrc4173 intr %d", (int)ih); return (irqstr); } const struct evcnt * vrc4173bcu_pci_intr_evcnt(pci_chipset_tag_t pc, pci_intr_handle_t ih) { /* XXX for now, no evcnt parent reported */ return (NULL); }