1/*	$NetBSD: ipaq_atmelgpio.c,v 1.15 2009/05/29 14:15:44 rjs Exp $	*/
2
3/*-
4 * Copyright (c) 2001 The NetBSD Foundation, Inc.  All rights reserved.
5 *
6 * This code is derived from software contributed to The NetBSD Foundation
7 * by Ichiro FUKUHARA (ichiro@ichiro.org).
8 *
9 * Redistribution and use in source and binary forms, with or without
10 * modification, are permitted provided that the following conditions
11 * are met:
12 * 1. Redistributions of source code must retain the above copyright
13 *    notice, this list of conditions and the following disclaimer.
14 * 2. Redistributions in binary form must reproduce the above copyright
15 *    notice, this list of conditions and the following disclaimer in the
16 *    documentation and/or other materials provided with the distribution.
17 *
18 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
19 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
20 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
21 * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
22 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
23 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
24 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
25 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
26 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
27 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
28 * POSSIBILITY OF SUCH DAMAGE.
29 */
30/*
31 * iPAQ uses Atmel microcontroller to service a few of peripheral devices.
32 * This controller connect to UART1 of SA11x0.
33 */
34
35#include <sys/cdefs.h>
36__KERNEL_RCSID(0, "$NetBSD: ipaq_atmelgpio.c,v 1.15 2009/05/29 14:15:44 rjs Exp $");
37
38#include <sys/param.h>
39#include <sys/systm.h>
40#include <sys/types.h>
41#include <sys/conf.h>
42#include <sys/file.h>
43#include <sys/device.h>
44#include <sys/kernel.h>
45#include <sys/kthread.h>
46#include <sys/malloc.h>
47#include <sys/bus.h>
48
49#include <hpcarm/dev/ipaq_saipvar.h>
50#include <hpcarm/dev/ipaq_gpioreg.h>
51#include <hpcarm/dev/ipaq_atmel.h>
52#include <hpcarm/dev/ipaq_atmelvar.h>
53
54#include <arm/sa11x0/sa11x0_gpioreg.h>
55#include <arm/sa11x0/sa11x0_comreg.h>
56#include <arm/sa11x0/sa11x0_reg.h>
57
58#ifdef ATMEL_DEBUG
59#define DPRINTF(x) aprint_normal x
60#else
61#define DPRINTF(x)
62#endif
63
64static	int	atmelgpio_match(device_t, cfdata_t, void *);
65static	void	atmelgpio_attach(device_t, device_t, void *);
66static	int	atmelgpio_print(void *, const char *);
67static	int	atmelgpio_search(device_t, cfdata_t, const int *, void *);
68static	void	atmelgpio_init(struct atmelgpio_softc *);
69
70static	void	rxtx_data(struct atmelgpio_softc *, int, int,
71			 uint8_t *, struct atmel_rx *);
72
73CFATTACH_DECL_NEW(atmelgpio, sizeof(struct atmelgpio_softc),
74    atmelgpio_match, atmelgpio_attach, NULL, NULL);
75
76static int
77atmelgpio_match(device_t parent, cfdata_t cf, void *aux)
78{
79	return (1);
80}
81
82static void
83atmelgpio_attach(device_t parent, device_t self, void *aux)
84{
85	struct atmelgpio_softc *sc = device_private(self);
86	struct ipaq_softc *psc = device_private(parent);
87
88	struct atmel_rx rxbuf;
89
90	aprint_normal("\n");
91	aprint_normal_dev(self, "Atmel microcontroller GPIO\n");
92
93	sc->sc_iot = psc->sc_iot;
94	sc->sc_ioh = psc->sc_ioh;
95	sc->sc_parent = psc;
96
97	if (bus_space_map(sc->sc_iot, SACOM1_BASE, SACOM_NPORTS, 0,
98                        &sc->sc_ioh)) {
99                aprint_normal_dev(self, "unable to map of UART1 registers\n");
100                return;
101        }
102
103	atmelgpio_init(sc);
104
105	rxbuf.idx = 0;
106	rxbuf.len = 0;
107
108#if 1  /* this is sample */
109	rxtx_data(sc, STATUS_BATTERY, 0, NULL, &rxbuf);
110
111	aprint_normal("ac_status          = %x\n", rxbuf.data[0]);
112	aprint_normal("Battery kind       = %x\n", rxbuf.data[1]);
113	aprint_normal("Voltage            = %d mV\n",
114		1000 * (rxbuf.data[3] << 8 | rxbuf.data[2]) /228);
115	aprint_normal("Battery Status     = %x\n", rxbuf.data[4]);
116	aprint_normal("Battery percentage = %d\n",
117		425 * (rxbuf.data[3] << 8 | rxbuf.data[2]) /1000 - 298);
118#endif
119
120	rxtx_data(sc, READ_IIC, 0, NULL, &rxbuf);
121
122	/*
123	 *  Attach each devices
124	 */
125
126	config_search_ia(atmelgpio_search, self, "atmelgpioif", NULL);
127}
128
129static int
130atmelgpio_search(device_t parent, cfdata_t cf, const int *ldesc,
131		 void *aux)
132{
133	if (config_match(parent, cf, NULL) > 0)
134		config_attach(parent, cf, NULL, atmelgpio_print);
135	return 0;
136}
137
138
139static int
140atmelgpio_print(void *aux, const char *name)
141{
142	return (UNCONF);
143}
144
145static void
146atmelgpio_init(struct atmelgpio_softc *sc)
147{
148	/* 8 bits no parity 1 stop bit */
149	bus_space_write_4(sc->sc_iot, sc->sc_ioh, SACOM_CR0, CR0_DSS);
150
151	/* Set baud rate 115k */
152	bus_space_write_4(sc->sc_iot, sc->sc_ioh, SACOM_CR1, 0);
153	bus_space_write_4(sc->sc_iot, sc->sc_ioh, SACOM_CR2, SACOMSPEED(115200));
154
155	/* RX/TX enable, RX/TX FIFO interrupt enable */
156	bus_space_write_4(sc->sc_iot, sc->sc_ioh, SACOM_CR3,
157			 (CR3_RXE | CR3_TXE | CR3_RIE | CR3_TIE));
158}
159
160static void
161rxtx_data(struct atmelgpio_softc  *sc, int id, int size, uint8_t *buf,
162	  struct atmel_rx *rxbuf)
163{
164	int 		i, checksum, length, rx_data;
165	uint8_t		data[MAX_SENDSIZE];
166
167	length = size + FRAME_OVERHEAD_SIZE;
168
169	while (! (bus_space_read_4(sc->sc_iot, sc->sc_ioh, SACOM_SR0) & SR0_TFS))
170		;
171
172		data[0] = (uint8_t)FRAME_SOF;
173		data[1] = (uint8_t)((id << 4) | size);
174		checksum = data[1];
175		i = 2;
176		while (size--)	{
177			data[i++] = *buf;
178			checksum += (uint8_t)(*buf++);
179		}
180		data[length-1] = checksum;
181
182	while (! (bus_space_read_4(sc->sc_iot, sc->sc_ioh, SACOM_SR1) & SR1_TNF))
183		;
184		i = 0;
185		while (i < length)
186			bus_space_write_4(sc->sc_iot, sc->sc_ioh, SACOM_DR, data[i++]);
187
188	delay(10000);
189#if 0
190	while (! (bus_space_read_4(sc->sc_iot, sc->sc_ioh, SACOM_SR0) &
191		 (SR0_RID | SR0_RFS)))
192#endif
193	rxbuf->state = STATE_SOF;
194	while (bus_space_read_4(sc->sc_iot, sc->sc_ioh, SACOM_SR1) & SR1_RNE) {
195
196		rx_data = bus_space_read_4(sc->sc_iot, sc->sc_ioh, SACOM_DR);
197			DPRINTF(("DATA = %x\n", rx_data));
198
199		switch (rxbuf->state) {
200		case STATE_SOF:
201			if (rx_data == FRAME_SOF)
202				rxbuf->state = STATE_ID;
203			break;
204		case STATE_ID:
205			rxbuf->id = (rx_data & 0xf0) >> 4;
206			rxbuf->len = rx_data & 0x0f;
207			rxbuf->idx = 0;
208			rxbuf->checksum = rx_data;
209			rxbuf->state = (rxbuf->len > 0 ) ? STATE_DATA : STATE_EOF;
210			break;
211		case STATE_DATA:
212			rxbuf->checksum += rx_data;
213			rxbuf->data[rxbuf->idx] = rx_data;
214			if (++rxbuf->idx == rxbuf->len)
215				rxbuf->state = STATE_EOF;
216			break;
217		case STATE_EOF:
218			rxbuf->state = STATE_SOF;
219			if (rx_data == FRAME_EOF || rx_data == rxbuf->checksum)
220				DPRINTF(("frame EOF\n"));
221			else
222				DPRINTF(("BadFrame\n"));
223			break;
224		default:
225			break;
226		}
227	}
228}
229