/* $NetBSD: ipaq_atmelgpio.c,v 1.2 2001/08/02 18:51:01 ichiro Exp $ */ /*- * Copyright (c) 2001 The NetBSD Foundation, Inc. All rights reserved. * * This code is derived from software contributed to The NetBSD Foundation * by Ichiro FUKUHARA (ichiro@ichiro.org). * * 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. */ /* * iPAQ uses Atmel microcontroller to service a few of peripheral devices. * This controller connect to UART1 of SA11x0. */ #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #ifdef ATMEL_DEBUG #define DPRINTF(x) printf x #else #define DPRINTF(x) #endif static int atmelgpio_match(struct device *, struct cfdata *, void *); static void atmelgpio_attach(struct device *, struct device *, void *); static int atmelgpio_print(void *, const char *); static int atmelgpio_search(struct device *, struct cfdata *, void *); static void atmelgpio_init(struct atmelgpio_softc *); static void rxtx_data(struct atmelgpio_softc *, int, int, u_int8_t *, struct atmel_rx *); struct cfattach atmelgpio_ca = { sizeof(struct atmelgpio_softc), atmelgpio_match, atmelgpio_attach }; static int atmelgpio_match(parent, cf, aux) struct device *parent; struct cfdata *cf; void *aux; { return (1); } static void atmelgpio_attach(parent, self, aux) struct device *parent; struct device *self; void *aux; { struct atmelgpio_softc *sc = (struct atmelgpio_softc *)self; struct ipaq_softc *psc = (struct ipaq_softc *)parent; struct atmel_rx *rxbuf; printf("\n"); printf("%s: Atmel microcontroller GPIO\n", sc->sc_dev.dv_xname); sc->sc_iot = psc->sc_iot; sc->sc_ioh = psc->sc_ioh; sc->sc_parent = (struct ipaq_softc *)parent; if (bus_space_map(sc->sc_iot, SACOM1_BASE, SACOM_NPORTS, 0, &sc->sc_ioh)) { printf("%s: unable to map of UART1 registers\n", sc->sc_dev.dv_xname); return; } atmelgpio_init(sc); #if 1 /* this is sample */ rxtx_data(sc, STATUS_BATTERY, 0, NULL, rxbuf); printf("ac_status = %x\n", rxbuf->data[0]); printf("Battery kind = %x\n", rxbuf->data[1]); printf("Voltage = %d mV\n", 1000 * (rxbuf->data[3] << 8 | rxbuf->data[2]) /228); printf("Battery Status = %x\n", rxbuf->data[4]); printf("Battery percentage = %d\n", 425 * (rxbuf->data[3] << 8 | rxbuf->data[2]) /1000 - 298); #endif /* * Attach each devices */ config_search(atmelgpio_search, self, NULL); } static int atmelgpio_search(parent, cf, aux) struct device *parent; struct cfdata *cf; void *aux; { if ((*cf->cf_attach->ca_match)(parent, cf, NULL) > 0) config_attach(parent, cf, NULL, atmelgpio_print); return 0; } static int atmelgpio_print(aux, name) void *aux; const char *name; { return (UNCONF); } static void atmelgpio_init(sc) struct atmelgpio_softc *sc; { /* 8 bits no parity 1 stop bit */ bus_space_write_4(sc->sc_iot, sc->sc_ioh, SACOM_CR0, CR0_DSS); /* Set baud rate 115k */ bus_space_write_4(sc->sc_iot, sc->sc_ioh, SACOM_CR1, 0); bus_space_write_4(sc->sc_iot, sc->sc_ioh, SACOM_CR2, SACOMSPEED(115200)); /* RX/TX enable, RX/TX FIFO interrupt enable */ bus_space_write_4(sc->sc_iot, sc->sc_ioh, SACOM_CR3, (CR3_RXE | CR3_TXE | CR3_RIE | CR3_TIE)); } static void rxtx_data(sc, id, size, buf, rxbuf) struct atmelgpio_softc *sc; int id, size; u_int8_t *buf; struct atmel_rx *rxbuf; { int i, checksum, length, rx_data; u_int8_t data[MAX_SENDSIZE]; length = size + FRAME_OVERHEAD_SIZE; while (! (bus_space_read_4(sc->sc_iot, sc->sc_ioh, SACOM_SR0) & SR0_TFS)) ; data[0] = (u_int8_t)FRAME_SOF; data[1] = (u_int8_t)((id << 4) | size); checksum = data[1]; i = 2; while (size--) { data[i++] = *buf; checksum += (u_int8_t)(*buf++); } data[length-1] = checksum; while (! (bus_space_read_4(sc->sc_iot, sc->sc_ioh, SACOM_SR1) & SR1_TNF)) ; i = 0; while (i < length) bus_space_write_4(sc->sc_iot, sc->sc_ioh, SACOM_DR, data[i++]); delay(10000); #if 0 while (! (bus_space_read_4(sc->sc_iot, sc->sc_ioh, SACOM_SR0) & (SR0_RID | SR0_RFS))) #endif rxbuf->state = STATE_SOF; while (bus_space_read_4(sc->sc_iot, sc->sc_ioh, SACOM_SR1) & SR1_RNE) { rx_data = bus_space_read_4(sc->sc_iot, sc->sc_ioh, SACOM_DR); DPRINTF(("DATA = %x\n", rx_data)); switch (rxbuf->state) { case STATE_SOF: if (rx_data == FRAME_SOF) rxbuf->state = STATE_ID; break; case STATE_ID: rxbuf->id = (rx_data & 0xf0) >> 4; rxbuf->len = rx_data & 0x0f; rxbuf->idx = 0; rxbuf->checksum = rx_data; rxbuf->state = (rxbuf->len > 0 ) ? STATE_DATA : STATE_EOF; break; case STATE_DATA: rxbuf->checksum += rx_data; rxbuf->data[rxbuf->idx] = rx_data; if (++rxbuf->idx == rxbuf->len) rxbuf->state = STATE_EOF; break; case STATE_EOF: rxbuf->state = STATE_SOF; if (rx_data == FRAME_EOF || rx_data == rxbuf->checksum) DPRINTF(("frame EOF\n")); else DPRINTF(("BadFrame\n")); break; default: break; } } }