/* $OpenBSD: pxa2x0_pcic.c,v 1.17 2005/12/14 15:08:51 uwe Exp $ */ /* * Copyright (c) 2005 Dale Rahn * * Permission to use, copy, modify, and distribute this software for any * purpose with or without fee is hereby granted, provided that the above * copyright notice and this permission notice appear in all copies. * * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. */ #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include int pxapcic_print(void *, const char *); int pxapcic_submatch(struct device *, void *, void *); void pxapcic_create_event_thread(void *); void pxapcic_event_thread(void *); void pxapcic_event_process(struct pxapcic_socket *); void pxapcic_attach_card(struct pxapcic_socket *); void pxapcic_detach_card(struct pxapcic_socket *, int); int pxapcic_intr(void *); int pxapcic_mem_alloc(pcmcia_chipset_handle_t, bus_size_t, struct pcmcia_mem_handle *); void pxapcic_mem_free(pcmcia_chipset_handle_t, struct pcmcia_mem_handle *); int pxapcic_mem_map(pcmcia_chipset_handle_t, int, bus_addr_t, bus_size_t, struct pcmcia_mem_handle *, bus_size_t *, int *); void pxapcic_mem_unmap(pcmcia_chipset_handle_t, int); int pxapcic_io_alloc(pcmcia_chipset_handle_t, bus_addr_t, bus_size_t, bus_size_t, struct pcmcia_io_handle *); void pxapcic_io_free(pcmcia_chipset_handle_t, struct pcmcia_io_handle *); int pxapcic_io_map(pcmcia_chipset_handle_t, int, bus_addr_t, bus_size_t, struct pcmcia_io_handle *, int *); void pxapcic_io_unmap(pcmcia_chipset_handle_t, int); void *pxapcic_intr_establish(pcmcia_chipset_handle_t, struct pcmcia_function *, int, int (*)(void *), void *, char *); void pxapcic_intr_disestablish(pcmcia_chipset_handle_t, void *); const char *pxapcic_intr_string(pcmcia_chipset_handle_t, void *); void pxapcic_socket_setup(struct pxapcic_socket *); void pxapcic_socket_enable(pcmcia_chipset_handle_t); void pxapcic_socket_disable(pcmcia_chipset_handle_t); struct cfdriver pxapcic_cd = { NULL, "pxapcic", DV_DULL }; /* * PCMCIA chipset methods */ struct pcmcia_chip_functions pxapcic_pcmcia_functions = { pxapcic_mem_alloc, pxapcic_mem_free, pxapcic_mem_map, pxapcic_mem_unmap, pxapcic_io_alloc, pxapcic_io_free, pxapcic_io_map, pxapcic_io_unmap, pxapcic_intr_establish, pxapcic_intr_disestablish, pxapcic_intr_string, pxapcic_socket_enable, pxapcic_socket_disable, }; /* * PCMCIA Helpers */ int pxapcic_mem_alloc(pcmcia_chipset_handle_t pch, bus_size_t size, struct pcmcia_mem_handle *pmh) { struct pxapcic_socket *so = pch; /* All we need is the bus space tag */ memset(pmh, 0, sizeof(*pmh)); pmh->memt = so->sc->sc_iot; return (0); } void pxapcic_mem_free(pcmcia_chipset_handle_t pch, struct pcmcia_mem_handle *pmh) { } int pxapcic_mem_map(pcmcia_chipset_handle_t pch, int kind, bus_addr_t card_addr, bus_size_t size, struct pcmcia_mem_handle *pmh, bus_size_t *offsetp, int *windowp) { struct pxapcic_socket *so = pch; int error; bus_addr_t pa; pa = trunc_page(card_addr); *offsetp = card_addr - pa; size = round_page(card_addr + size) - pa; pmh->realsize = size; #define PXA2X0_SOCKET_OFFSET (PXA2X0_PCMCIA_SLOT1-PXA2X0_PCMCIA_SLOT0) #define PXAPCIC_ATTR_OFFSET 0x08000000 #define PXAPCIC_COMMON_OFFSET 0x0C000000 pa += PXA2X0_PCMCIA_SLOT0; pa += PXA2X0_SOCKET_OFFSET * so->socket; switch (kind & ~PCMCIA_WIDTH_MEM_MASK) { case PCMCIA_MEM_ATTR: pa += PXAPCIC_ATTR_OFFSET; break; case PCMCIA_MEM_COMMON: pa += PXAPCIC_COMMON_OFFSET; break; default: panic("pxapcic_mem_map: bogus kind"); } error = bus_space_map(so->sc->sc_iot, pa, size, 0, &pmh->memh); if (! error) *windowp = (int)pmh->memh; return (error); } void pxapcic_mem_unmap(pcmcia_chipset_handle_t pch, int window) { struct pxapcic_socket *so = pch; bus_space_unmap(so->sc->sc_iot, (bus_addr_t)window, 4096); /* XXX */ } int pxapcic_io_alloc(pcmcia_chipset_handle_t pch, bus_addr_t start, bus_size_t size, bus_size_t align, struct pcmcia_io_handle *pih) { struct pxapcic_socket *so = pch; int error; bus_addr_t pa; memset(pih, 0, sizeof(*pih)); pih->iot = so->sc->sc_iot; pih->addr = start; pih->size = size; pa = pih->addr; pa += PXA2X0_PCMCIA_SLOT0; pa += PXA2X0_SOCKET_OFFSET * so->socket; #if 0 printf("pxapcic_io_alloc: %x %x\n", (unsigned int)pa, (unsigned int)size); #endif /* XXX Are we ignoring alignment constraints? */ error = bus_space_map(so->sc->sc_iot, pa, size, 0, &pih->ioh); return (error); } void pxapcic_io_free(pcmcia_chipset_handle_t pch, struct pcmcia_io_handle *pih) { struct pxapcic_socket *so = pch; bus_space_unmap(so->sc->sc_iot, pih->ioh, pih->size); } int pxapcic_io_map(pcmcia_chipset_handle_t pch, int width, bus_addr_t offset, bus_size_t size, struct pcmcia_io_handle *pih, int *windowp) { return (0); } void pxapcic_io_unmap(pcmcia_chipset_handle_t pch, int window) { } void * pxapcic_intr_establish(pcmcia_chipset_handle_t pch, struct pcmcia_function *pf, int ipl, int (*fct)(void *), void *arg, char *name) { struct pxapcic_socket *so = pch; /* XXX need to check if something should be done here */ return (pxa2x0_gpio_intr_establish(so->irqpin, IST_EDGE_FALLING, ipl, fct, arg, name)); } void pxapcic_intr_disestablish(pcmcia_chipset_handle_t pch, void *ih) { pxa2x0_gpio_intr_disestablish(ih); } const char * pxapcic_intr_string(pcmcia_chipset_handle_t pch, void *ih) { return (pxa2x0_gpio_intr_string(ih)); } void pxapcic_socket_enable(pcmcia_chipset_handle_t pch) { struct pxapcic_socket *so = pch; int i; /* Power down the card and socket before setting the voltage. */ so->pcictag->write(so, PXAPCIC_CARD_POWER, PXAPCIC_POWER_OFF); so->pcictag->set_power(so, PXAPCIC_POWER_OFF); /* * Wait 300ms until power fails (Tpf). Then, wait 100ms since * we are changing Vcc (Toff). */ delay((300 + 100) * 1000); /* Power up the socket and card at appropriate voltage. */ if (so->power_capability & PXAPCIC_POWER_5V) { so->pcictag->set_power(so, PXAPCIC_POWER_5V); so->pcictag->write(so, PXAPCIC_CARD_POWER, PXAPCIC_POWER_5V); } else { so->pcictag->set_power(so, PXAPCIC_POWER_3V); so->pcictag->write(so, PXAPCIC_CARD_POWER, PXAPCIC_POWER_3V); } /* * Wait 100ms until power raise (Tpr) and 20ms to become * stable (Tsu(Vcc)). * * Some machines require some more time to be settled * (another 200ms is added here). */ delay((100 + 20 + 200) * 1000); /* Hold RESET at least 10us. */ so->pcictag->write(so, PXAPCIC_CARD_RESET, 1); delay(10); /* XXX wrong, but lets TE-CF100 cards work for some reason. */ delay(3000); so->pcictag->write(so, PXAPCIC_CARD_RESET, 0); /* Wait 20ms as per PC Card standard (r2.01) section 4.3.6. */ delay(20000); /* Wait for the card to become ready. */ for (i = 0; i < 10000; i++) { if (so->pcictag->read(so, PXAPCIC_CARD_READY)) break; delay(500); #ifdef PCICDEBUG if ((i>5000) && (i%100 == 99)) printf("."); #endif } } void pxapcic_socket_disable(pcmcia_chipset_handle_t pch) { struct pxapcic_socket *so = pch; #ifdef PCICDEBUG printf("pxapcic_socket_disable: socket %d\n", so->socket); #endif /* Power down the card and socket. */ so->pcictag->write(so, PXAPCIC_CARD_POWER, PXAPCIC_POWER_OFF); so->pcictag->set_power(so, PXAPCIC_POWER_OFF); } /* * Attachment and initialization */ int pxapcic_print(void *aux, const char *name) { return (UNCONF); } int pxapcic_submatch(struct device *parent, void *match, void *aux) { struct cfdata *cf = match; return ((*cf->cf_attach->ca_match)(parent, cf, aux)); } void pxapcic_attach(struct pxapcic_softc *sc, void (*socket_setup_hook)(struct pxapcic_socket *)) { struct pcmciabus_attach_args paa; struct pxapcic_socket *so; int i; printf(": %d slot%s\n", sc->sc_nslots, sc->sc_nslots==1 ? "" : "s"); if (bus_space_map(sc->sc_iot, PXA2X0_MEMCTL_BASE, PXA2X0_MEMCTL_SIZE, 0, &sc->sc_memctl_ioh)) { printf("%s: failed to map MEMCTL\n", sc->sc_dev.dv_xname); return; } /* Clear CIT (card present) and set NOS correctly. */ bus_space_write_4(sc->sc_iot, sc->sc_memctl_ioh, MEMCTL_MECR, sc->sc_nslots == 2 ? MECR_NOS : 0); /* zaurus: configure slot 1 first to make internal drive be wd0. */ for (i = sc->sc_nslots-1; i >= 0; i--) { so = &sc->sc_socket[i]; so->sc = sc; so->socket = i; so->flags = 0; socket_setup_hook(so); paa.paa_busname = "pcmcia"; paa.pct = (pcmcia_chipset_tag_t)&pxapcic_pcmcia_functions; paa.pch = (pcmcia_chipset_handle_t)so; paa.iobase = 0; paa.iosize = 0x4000000; so->pcmcia = config_found_sm(&sc->sc_dev, &paa, pxapcic_print, pxapcic_submatch); pxa2x0_gpio_set_function(sc->sc_irqpin[i], GPIO_IN); pxa2x0_gpio_set_function(sc->sc_irqcfpin[i], GPIO_IN); /* Card slot interrupt */ so->irq = pxa2x0_gpio_intr_establish(sc->sc_irqcfpin[i], IST_EDGE_BOTH, IPL_BIO /* XXX */, pxapcic_intr, so, sc->sc_dev.dv_xname); /* GPIO pin for interrupt */ so->irqpin = sc->sc_irqpin[i]; #ifdef DO_CONFIG_PENDING config_pending_incr(); #endif kthread_create_deferred(pxapcic_create_event_thread, so); } } /* * Card slot interrupt handling */ int pxapcic_intr(void *arg) { struct pxapcic_socket *so = arg; so->pcictag->clear_intr(so); wakeup(so); return (1); } /* * Event management */ void pxapcic_create_event_thread(void *arg) { struct pxapcic_socket *sock = arg; struct pxapcic_softc *sc = sock->sc; u_int cs; /* If there's a card there, attach it. */ cs = sock->pcictag->read(sock, PXAPCIC_CARD_STATUS); if (cs == PXAPCIC_CARD_VALID) pxapcic_attach_card(sock); if (kthread_create(pxapcic_event_thread, sock, &sock->event_thread, sc->sc_dev.dv_xname, sock->socket ? "1" : "0")) { printf("%s: unable to create event thread for %s\n", sc->sc_dev.dv_xname, sock->socket ? "1" : "0"); } #ifdef DO_CONFIG_PENDING config_pending_decr(); #endif } void pxapcic_event_thread(void *arg) { struct pxapcic_socket *sock = arg; u_int cs; int present; while (sock->sc->sc_shutdown == 0) { (void) tsleep(sock, PWAIT, "pxapcicev", 0); /* sleep .25s to avoid chattering interrupts */ (void) tsleep((caddr_t)sock, PWAIT, "pxapcicss", hz/4); cs = sock->pcictag->read(sock, PXAPCIC_CARD_STATUS); present = sock->flags & PXAPCIC_FLAG_CARDP; if ((cs == PXAPCIC_CARD_VALID) == (present == 1)) continue; /* state unchanged */ /* XXX Do both? */ pxapcic_event_process(sock); } sock->event_thread = NULL; /* In case parent is waiting for us to exit. */ wakeup(sock->sc); kthread_exit(0); } void pxapcic_event_process(struct pxapcic_socket *sock) { u_int cs; cs = sock->pcictag->read(sock, PXAPCIC_CARD_STATUS); if (cs == PXAPCIC_CARD_VALID) { if (!(sock->flags & PXAPCIC_FLAG_CARDP)) pxapcic_attach_card(sock); } else { if ((sock->flags & PXAPCIC_FLAG_CARDP)) pxapcic_detach_card(sock, DETACH_FORCE); } } void pxapcic_attach_card(struct pxapcic_socket *h) { struct pxapcic_softc *sc = h->sc; u_int32_t rv; if (h->flags & PXAPCIC_FLAG_CARDP) panic("pcic_attach_card: already attached"); h->flags |= PXAPCIC_FLAG_CARDP; /* Set CIT if any card is present. */ rv = bus_space_read_4(sc->sc_iot, sc->sc_memctl_ioh, MEMCTL_MECR); bus_space_write_4(sc->sc_iot, sc->sc_memctl_ioh, MEMCTL_MECR, rv | MECR_CIT); /* call the MI attach function */ pcmcia_card_attach(h->pcmcia); } void pxapcic_detach_card(struct pxapcic_socket *h, int flags) { struct pxapcic_softc *sc = h->sc; u_int32_t rv; int i; if (h->flags & PXAPCIC_FLAG_CARDP) { h->flags &= ~PXAPCIC_FLAG_CARDP; /* call the MI detach function */ pcmcia_card_detach(h->pcmcia, flags); } /* Clear CIT if no other card is present. */ for (i = 0; i < sc->sc_nslots; i++) if (sc->sc_socket[i].flags & PXAPCIC_FLAG_CARDP) return; rv = bus_space_read_4(sc->sc_iot, sc->sc_memctl_ioh, MEMCTL_MECR); bus_space_write_4(sc->sc_iot, sc->sc_memctl_ioh, MEMCTL_MECR, rv & ~MECR_CIT); }