xref: /freebsd/sys/powerpc/powermac/cuda.c (revision 9c861e931cbcc0610f61bafe0a54bb41c972271e)
1b4dbc599SNathan Whitehorn /*-
271e3c308SPedro F. Giffuni  * SPDX-License-Identifier: BSD-3-Clause
371e3c308SPedro F. Giffuni  *
4b4dbc599SNathan Whitehorn  * Copyright (c) 2006 Michael Lorenz
5b4dbc599SNathan Whitehorn  * Copyright 2008 by Nathan Whitehorn
6b4dbc599SNathan Whitehorn  * All rights reserved.
7b4dbc599SNathan Whitehorn  *
8b4dbc599SNathan Whitehorn  * Redistribution and use in source and binary forms, with or without
9b4dbc599SNathan Whitehorn  * modification, are permitted provided that the following conditions
10b4dbc599SNathan Whitehorn  * are met:
11b4dbc599SNathan Whitehorn  * 1. Redistributions of source code must retain the above copyright
12b4dbc599SNathan Whitehorn  *    notice, this list of conditions and the following disclaimer.
13b4dbc599SNathan Whitehorn  * 2. Redistributions in binary form must reproduce the above copyright
14b4dbc599SNathan Whitehorn  *    notice, this list of conditions and the following disclaimer in the
15b4dbc599SNathan Whitehorn  *    documentation and/or other materials provided with the distribution.
16b4dbc599SNathan Whitehorn  * 3. The name of the author may not be used to endorse or promote products
17b4dbc599SNathan Whitehorn  *    derived from this software without specific prior written permission.
18b4dbc599SNathan Whitehorn  *
19b4dbc599SNathan Whitehorn  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
20b4dbc599SNathan Whitehorn  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
21b4dbc599SNathan Whitehorn  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
22b4dbc599SNathan Whitehorn  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
23b4dbc599SNathan Whitehorn  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
24b4dbc599SNathan Whitehorn  * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
25b4dbc599SNathan Whitehorn  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
26b4dbc599SNathan Whitehorn  * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
27b4dbc599SNathan Whitehorn  * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
28b4dbc599SNathan Whitehorn  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29b4dbc599SNathan Whitehorn  * SUCH DAMAGE.
30b4dbc599SNathan Whitehorn  *
31b4dbc599SNathan Whitehorn  */
32b4dbc599SNathan Whitehorn 
33b4dbc599SNathan Whitehorn #include <sys/cdefs.h>
34b4dbc599SNathan Whitehorn __FBSDID("$FreeBSD$");
35b4dbc599SNathan Whitehorn 
36b4dbc599SNathan Whitehorn #include <sys/param.h>
37b4dbc599SNathan Whitehorn #include <sys/systm.h>
38b4dbc599SNathan Whitehorn #include <sys/module.h>
39b4dbc599SNathan Whitehorn #include <sys/bus.h>
40b4dbc599SNathan Whitehorn #include <sys/conf.h>
41e2e050c8SConrad Meyer #include <sys/eventhandler.h>
42b4dbc599SNathan Whitehorn #include <sys/kernel.h>
43e2e050c8SConrad Meyer #include <sys/lock.h>
44e2e050c8SConrad Meyer #include <sys/mutex.h>
453df9e037SNathan Whitehorn #include <sys/clock.h>
46b2a237beSNathan Whitehorn #include <sys/reboot.h>
47b4dbc599SNathan Whitehorn 
48b4dbc599SNathan Whitehorn #include <dev/ofw/ofw_bus.h>
49b4dbc599SNathan Whitehorn #include <dev/ofw/openfirm.h>
50b4dbc599SNathan Whitehorn 
51b4dbc599SNathan Whitehorn #include <machine/bus.h>
52b4dbc599SNathan Whitehorn #include <machine/intr_machdep.h>
53b4dbc599SNathan Whitehorn #include <machine/md_var.h>
54b4dbc599SNathan Whitehorn #include <machine/pio.h>
55b4dbc599SNathan Whitehorn #include <machine/resource.h>
56b4dbc599SNathan Whitehorn 
57b4dbc599SNathan Whitehorn #include <vm/vm.h>
58b4dbc599SNathan Whitehorn #include <vm/pmap.h>
59b4dbc599SNathan Whitehorn 
60b4dbc599SNathan Whitehorn #include <sys/rman.h>
61b4dbc599SNathan Whitehorn 
62b4dbc599SNathan Whitehorn #include <dev/adb/adb.h>
63b4dbc599SNathan Whitehorn 
643df9e037SNathan Whitehorn #include "clock_if.h"
65b4dbc599SNathan Whitehorn #include "cudavar.h"
66b4dbc599SNathan Whitehorn #include "viareg.h"
67b4dbc599SNathan Whitehorn 
68b4dbc599SNathan Whitehorn /*
69b4dbc599SNathan Whitehorn  * MacIO interface
70b4dbc599SNathan Whitehorn  */
71b4dbc599SNathan Whitehorn static int	cuda_probe(device_t);
72b4dbc599SNathan Whitehorn static int	cuda_attach(device_t);
73b4dbc599SNathan Whitehorn static int	cuda_detach(device_t);
74b4dbc599SNathan Whitehorn 
75b4dbc599SNathan Whitehorn static u_int	cuda_adb_send(device_t dev, u_char command_byte, int len,
76b4dbc599SNathan Whitehorn     u_char *data, u_char poll);
77b4dbc599SNathan Whitehorn static u_int	cuda_adb_autopoll(device_t dev, uint16_t mask);
7865f44679SAndriy Gapon static u_int	cuda_poll(device_t dev);
79582434bdSNathan Whitehorn static void	cuda_send_inbound(struct cuda_softc *sc);
80582434bdSNathan Whitehorn static void	cuda_send_outbound(struct cuda_softc *sc);
81b2a237beSNathan Whitehorn static void	cuda_shutdown(void *xsc, int howto);
82b4dbc599SNathan Whitehorn 
833df9e037SNathan Whitehorn /*
843df9e037SNathan Whitehorn  * Clock interface
853df9e037SNathan Whitehorn  */
863df9e037SNathan Whitehorn static int cuda_gettime(device_t dev, struct timespec *ts);
873df9e037SNathan Whitehorn static int cuda_settime(device_t dev, struct timespec *ts);
883df9e037SNathan Whitehorn 
89b4dbc599SNathan Whitehorn static device_method_t  cuda_methods[] = {
90b4dbc599SNathan Whitehorn 	/* Device interface */
91b4dbc599SNathan Whitehorn 	DEVMETHOD(device_probe,		cuda_probe),
92b4dbc599SNathan Whitehorn 	DEVMETHOD(device_attach,	cuda_attach),
93b4dbc599SNathan Whitehorn         DEVMETHOD(device_detach,        cuda_detach),
94b4dbc599SNathan Whitehorn         DEVMETHOD(device_shutdown,      bus_generic_shutdown),
95b4dbc599SNathan Whitehorn         DEVMETHOD(device_suspend,       bus_generic_suspend),
96b4dbc599SNathan Whitehorn         DEVMETHOD(device_resume,        bus_generic_resume),
97b4dbc599SNathan Whitehorn 
98b4dbc599SNathan Whitehorn 	/* ADB bus interface */
99b4dbc599SNathan Whitehorn 	DEVMETHOD(adb_hb_send_raw_packet,	cuda_adb_send),
100b4dbc599SNathan Whitehorn 	DEVMETHOD(adb_hb_controller_poll,	cuda_poll),
101b4dbc599SNathan Whitehorn 	DEVMETHOD(adb_hb_set_autopoll_mask,	cuda_adb_autopoll),
102b4dbc599SNathan Whitehorn 
1033df9e037SNathan Whitehorn 	/* Clock interface */
1043df9e037SNathan Whitehorn 	DEVMETHOD(clock_gettime,	cuda_gettime),
1053df9e037SNathan Whitehorn 	DEVMETHOD(clock_settime,	cuda_settime),
1063df9e037SNathan Whitehorn 
1074b7ec270SMarius Strobl 	DEVMETHOD_END
108b4dbc599SNathan Whitehorn };
109b4dbc599SNathan Whitehorn 
110b4dbc599SNathan Whitehorn static driver_t cuda_driver = {
111b4dbc599SNathan Whitehorn 	"cuda",
112b4dbc599SNathan Whitehorn 	cuda_methods,
113b4dbc599SNathan Whitehorn 	sizeof(struct cuda_softc),
114b4dbc599SNathan Whitehorn };
115b4dbc599SNathan Whitehorn 
116b4dbc599SNathan Whitehorn static devclass_t cuda_devclass;
117b4dbc599SNathan Whitehorn 
118b4dbc599SNathan Whitehorn DRIVER_MODULE(cuda, macio, cuda_driver, cuda_devclass, 0, 0);
119b4dbc599SNathan Whitehorn DRIVER_MODULE(adb, cuda, adb_driver, adb_devclass, 0, 0);
120b4dbc599SNathan Whitehorn 
121b4dbc599SNathan Whitehorn static void cuda_intr(void *arg);
122b4dbc599SNathan Whitehorn static uint8_t cuda_read_reg(struct cuda_softc *sc, u_int offset);
123b4dbc599SNathan Whitehorn static void cuda_write_reg(struct cuda_softc *sc, u_int offset, uint8_t value);
124b4dbc599SNathan Whitehorn static void cuda_idle(struct cuda_softc *);
125b4dbc599SNathan Whitehorn static void cuda_tip(struct cuda_softc *);
126b4dbc599SNathan Whitehorn static void cuda_clear_tip(struct cuda_softc *);
127b4dbc599SNathan Whitehorn static void cuda_in(struct cuda_softc *);
128b4dbc599SNathan Whitehorn static void cuda_out(struct cuda_softc *);
129b4dbc599SNathan Whitehorn static void cuda_toggle_ack(struct cuda_softc *);
130b4dbc599SNathan Whitehorn static void cuda_ack_off(struct cuda_softc *);
131b4dbc599SNathan Whitehorn static int cuda_intr_state(struct cuda_softc *);
132b4dbc599SNathan Whitehorn 
133b4dbc599SNathan Whitehorn static int
134b4dbc599SNathan Whitehorn cuda_probe(device_t dev)
135b4dbc599SNathan Whitehorn {
136b4dbc599SNathan Whitehorn 	const char *type = ofw_bus_get_type(dev);
137b4dbc599SNathan Whitehorn 
138b4dbc599SNathan Whitehorn 	if (strcmp(type, "via-cuda") != 0)
139b4dbc599SNathan Whitehorn                 return (ENXIO);
140b4dbc599SNathan Whitehorn 
141b4dbc599SNathan Whitehorn 	device_set_desc(dev, CUDA_DEVSTR);
142b4dbc599SNathan Whitehorn 	return (0);
143b4dbc599SNathan Whitehorn }
144b4dbc599SNathan Whitehorn 
145b4dbc599SNathan Whitehorn static int
146b4dbc599SNathan Whitehorn cuda_attach(device_t dev)
147b4dbc599SNathan Whitehorn {
148b4dbc599SNathan Whitehorn 	struct cuda_softc *sc;
149b4dbc599SNathan Whitehorn 
150b4dbc599SNathan Whitehorn 	volatile int i;
151b4dbc599SNathan Whitehorn 	uint8_t reg;
152b4dbc599SNathan Whitehorn 	phandle_t node,child;
153b4dbc599SNathan Whitehorn 
154b4dbc599SNathan Whitehorn 	sc = device_get_softc(dev);
155b4dbc599SNathan Whitehorn 	sc->sc_dev = dev;
156b4dbc599SNathan Whitehorn 
157b4dbc599SNathan Whitehorn 	sc->sc_memrid = 0;
158b4dbc599SNathan Whitehorn 	sc->sc_memr = bus_alloc_resource_any(dev, SYS_RES_MEMORY,
159b4dbc599SNathan Whitehorn 	    &sc->sc_memrid, RF_ACTIVE);
160b4dbc599SNathan Whitehorn 
161b4dbc599SNathan Whitehorn 	if (sc->sc_memr == NULL) {
162b4dbc599SNathan Whitehorn 		device_printf(dev, "Could not alloc mem resource!\n");
163b4dbc599SNathan Whitehorn 		return (ENXIO);
164b4dbc599SNathan Whitehorn 	}
165b4dbc599SNathan Whitehorn 
166b4dbc599SNathan Whitehorn 	sc->sc_irqrid = 0;
167b4dbc599SNathan Whitehorn 	sc->sc_irq = bus_alloc_resource_any(dev, SYS_RES_IRQ, &sc->sc_irqrid,
168b4dbc599SNathan Whitehorn             	RF_ACTIVE);
169b4dbc599SNathan Whitehorn         if (sc->sc_irq == NULL) {
170b4dbc599SNathan Whitehorn                 device_printf(dev, "could not allocate interrupt\n");
171596e6adeSAlexander Motin                 bus_release_resource(dev, SYS_RES_MEMORY, sc->sc_memrid,
172596e6adeSAlexander Motin                     sc->sc_memr);
173b4dbc599SNathan Whitehorn                 return (ENXIO);
174b4dbc599SNathan Whitehorn         }
175b4dbc599SNathan Whitehorn 
176b4dbc599SNathan Whitehorn 	if (bus_setup_intr(dev, sc->sc_irq, INTR_TYPE_MISC | INTR_MPSAFE
177b4dbc599SNathan Whitehorn 	    | INTR_ENTROPY, NULL, cuda_intr, dev, &sc->sc_ih) != 0) {
178b4dbc599SNathan Whitehorn                 device_printf(dev, "could not setup interrupt\n");
179596e6adeSAlexander Motin                 bus_release_resource(dev, SYS_RES_MEMORY, sc->sc_memrid,
180596e6adeSAlexander Motin                     sc->sc_memr);
181b4dbc599SNathan Whitehorn                 bus_release_resource(dev, SYS_RES_IRQ, sc->sc_irqrid,
182b4dbc599SNathan Whitehorn                     sc->sc_irq);
183b4dbc599SNathan Whitehorn                 return (ENXIO);
184b4dbc599SNathan Whitehorn         }
185b4dbc599SNathan Whitehorn 
186b4dbc599SNathan Whitehorn 	mtx_init(&sc->sc_mutex,"cuda",NULL,MTX_DEF | MTX_RECURSE);
187b4dbc599SNathan Whitehorn 
188b4dbc599SNathan Whitehorn 	sc->sc_sent = 0;
189b4dbc599SNathan Whitehorn 	sc->sc_received = 0;
190b4dbc599SNathan Whitehorn 	sc->sc_waiting = 0;
191b4dbc599SNathan Whitehorn 	sc->sc_polling = 0;
192b4dbc599SNathan Whitehorn 	sc->sc_state = CUDA_NOTREADY;
193b4dbc599SNathan Whitehorn 	sc->sc_autopoll = 0;
1943df9e037SNathan Whitehorn 	sc->sc_rtc = -1;
195b4dbc599SNathan Whitehorn 
196582434bdSNathan Whitehorn 	STAILQ_INIT(&sc->sc_inq);
197582434bdSNathan Whitehorn 	STAILQ_INIT(&sc->sc_outq);
198011ad8e7SNathan Whitehorn 	STAILQ_INIT(&sc->sc_freeq);
199011ad8e7SNathan Whitehorn 
200011ad8e7SNathan Whitehorn 	for (i = 0; i < CUDA_MAXPACKETS; i++)
201011ad8e7SNathan Whitehorn 		STAILQ_INSERT_TAIL(&sc->sc_freeq, &sc->sc_pkts[i], pkt_q);
202582434bdSNathan Whitehorn 
203b4dbc599SNathan Whitehorn 	/* Init CUDA */
204b4dbc599SNathan Whitehorn 
205b4dbc599SNathan Whitehorn 	reg = cuda_read_reg(sc, vDirB);
206b4dbc599SNathan Whitehorn 	reg |= 0x30;	/* register B bits 4 and 5: outputs */
207b4dbc599SNathan Whitehorn 	cuda_write_reg(sc, vDirB, reg);
208b4dbc599SNathan Whitehorn 
209b4dbc599SNathan Whitehorn 	reg = cuda_read_reg(sc, vDirB);
210b4dbc599SNathan Whitehorn 	reg &= 0xf7;	/* register B bit 3: input */
211b4dbc599SNathan Whitehorn 	cuda_write_reg(sc, vDirB, reg);
212b4dbc599SNathan Whitehorn 
213b4dbc599SNathan Whitehorn 	reg = cuda_read_reg(sc, vACR);
214b4dbc599SNathan Whitehorn 	reg &= ~vSR_OUT;	/* make sure SR is set to IN */
215b4dbc599SNathan Whitehorn 	cuda_write_reg(sc, vACR, reg);
216b4dbc599SNathan Whitehorn 
217b4dbc599SNathan Whitehorn 	cuda_write_reg(sc, vACR, (cuda_read_reg(sc, vACR) | 0x0c) & ~0x10);
218b4dbc599SNathan Whitehorn 
219b4dbc599SNathan Whitehorn 	sc->sc_state = CUDA_IDLE;	/* used by all types of hardware */
220b4dbc599SNathan Whitehorn 
221b4dbc599SNathan Whitehorn 	cuda_write_reg(sc, vIER, 0x84); /* make sure VIA interrupts are on */
222b4dbc599SNathan Whitehorn 
223b4dbc599SNathan Whitehorn 	cuda_idle(sc);	/* reset ADB */
224b4dbc599SNathan Whitehorn 
225b4dbc599SNathan Whitehorn 	/* Reset CUDA */
226b4dbc599SNathan Whitehorn 
227b4dbc599SNathan Whitehorn 	i = cuda_read_reg(sc, vSR);	/* clear interrupt */
228b4dbc599SNathan Whitehorn 	cuda_write_reg(sc, vIER, 0x04); /* no interrupts while clearing */
229b4dbc599SNathan Whitehorn 	cuda_idle(sc);	/* reset state to idle */
230b4dbc599SNathan Whitehorn 	DELAY(150);
231b4dbc599SNathan Whitehorn 	cuda_tip(sc);	/* signal start of frame */
232b4dbc599SNathan Whitehorn 	DELAY(150);
233b4dbc599SNathan Whitehorn 	cuda_toggle_ack(sc);
234b4dbc599SNathan Whitehorn 	DELAY(150);
235b4dbc599SNathan Whitehorn 	cuda_clear_tip(sc);
236b4dbc599SNathan Whitehorn 	DELAY(150);
237b4dbc599SNathan Whitehorn 	cuda_idle(sc);	/* back to idle state */
238b4dbc599SNathan Whitehorn 	i = cuda_read_reg(sc, vSR);	/* clear interrupt */
239b4dbc599SNathan Whitehorn 	cuda_write_reg(sc, vIER, 0x84);	/* ints ok now */
240b4dbc599SNathan Whitehorn 
241b4dbc599SNathan Whitehorn 	/* Initialize child buses (ADB) */
242b4dbc599SNathan Whitehorn 	node = ofw_bus_get_node(dev);
243b4dbc599SNathan Whitehorn 
244b4dbc599SNathan Whitehorn 	for (child = OF_child(node); child != 0; child = OF_peer(child)) {
245b4dbc599SNathan Whitehorn 		char name[32];
246b4dbc599SNathan Whitehorn 
247b4dbc599SNathan Whitehorn 		memset(name, 0, sizeof(name));
248b4dbc599SNathan Whitehorn 		OF_getprop(child, "name", name, sizeof(name));
249b4dbc599SNathan Whitehorn 
250b4dbc599SNathan Whitehorn 		if (bootverbose)
251b4dbc599SNathan Whitehorn 			device_printf(dev, "CUDA child <%s>\n",name);
252b4dbc599SNathan Whitehorn 
253b4dbc599SNathan Whitehorn 		if (strncmp(name, "adb", 4) == 0) {
254b4dbc599SNathan Whitehorn 			sc->adb_bus = device_add_child(dev,"adb",-1);
255b4dbc599SNathan Whitehorn 		}
256b4dbc599SNathan Whitehorn 	}
257b4dbc599SNathan Whitehorn 
2583df9e037SNathan Whitehorn 	clock_register(dev, 1000);
259b2a237beSNathan Whitehorn 	EVENTHANDLER_REGISTER(shutdown_final, cuda_shutdown, sc,
260b2a237beSNathan Whitehorn 	    SHUTDOWN_PRI_LAST);
2613df9e037SNathan Whitehorn 
262b4dbc599SNathan Whitehorn 	return (bus_generic_attach(dev));
263b4dbc599SNathan Whitehorn }
264b4dbc599SNathan Whitehorn 
265b4dbc599SNathan Whitehorn static int cuda_detach(device_t dev) {
266b4dbc599SNathan Whitehorn 	struct cuda_softc *sc;
267b4dbc599SNathan Whitehorn 
268b4dbc599SNathan Whitehorn 	sc = device_get_softc(dev);
269b4dbc599SNathan Whitehorn 
270b4dbc599SNathan Whitehorn 	bus_teardown_intr(dev, sc->sc_irq, sc->sc_ih);
271b4dbc599SNathan Whitehorn 	bus_release_resource(dev, SYS_RES_IRQ, sc->sc_irqrid, sc->sc_irq);
272b4dbc599SNathan Whitehorn 	bus_release_resource(dev, SYS_RES_MEMORY, sc->sc_memrid, sc->sc_memr);
273b4dbc599SNathan Whitehorn 	mtx_destroy(&sc->sc_mutex);
274b4dbc599SNathan Whitehorn 
275b4dbc599SNathan Whitehorn 	return (bus_generic_detach(dev));
276b4dbc599SNathan Whitehorn }
277b4dbc599SNathan Whitehorn 
278b4dbc599SNathan Whitehorn static uint8_t
279b4dbc599SNathan Whitehorn cuda_read_reg(struct cuda_softc *sc, u_int offset) {
280b4dbc599SNathan Whitehorn 	return (bus_read_1(sc->sc_memr, offset));
281b4dbc599SNathan Whitehorn }
282b4dbc599SNathan Whitehorn 
283b4dbc599SNathan Whitehorn static void
284b4dbc599SNathan Whitehorn cuda_write_reg(struct cuda_softc *sc, u_int offset, uint8_t value) {
285b4dbc599SNathan Whitehorn 	bus_write_1(sc->sc_memr, offset, value);
286b4dbc599SNathan Whitehorn }
287b4dbc599SNathan Whitehorn 
288b4dbc599SNathan Whitehorn static void
289b4dbc599SNathan Whitehorn cuda_idle(struct cuda_softc *sc)
290b4dbc599SNathan Whitehorn {
291b4dbc599SNathan Whitehorn 	uint8_t reg;
292b4dbc599SNathan Whitehorn 
293b4dbc599SNathan Whitehorn 	reg = cuda_read_reg(sc, vBufB);
294b4dbc599SNathan Whitehorn 	reg |= (vPB4 | vPB5);
295b4dbc599SNathan Whitehorn 	cuda_write_reg(sc, vBufB, reg);
296b4dbc599SNathan Whitehorn }
297b4dbc599SNathan Whitehorn 
298b4dbc599SNathan Whitehorn static void
299b4dbc599SNathan Whitehorn cuda_tip(struct cuda_softc *sc)
300b4dbc599SNathan Whitehorn {
301b4dbc599SNathan Whitehorn 	uint8_t reg;
302b4dbc599SNathan Whitehorn 
303b4dbc599SNathan Whitehorn 	reg = cuda_read_reg(sc, vBufB);
304b4dbc599SNathan Whitehorn 	reg &= ~vPB5;
305b4dbc599SNathan Whitehorn 	cuda_write_reg(sc, vBufB, reg);
306b4dbc599SNathan Whitehorn }
307b4dbc599SNathan Whitehorn 
308b4dbc599SNathan Whitehorn static void
309b4dbc599SNathan Whitehorn cuda_clear_tip(struct cuda_softc *sc)
310b4dbc599SNathan Whitehorn {
311b4dbc599SNathan Whitehorn 	uint8_t reg;
312b4dbc599SNathan Whitehorn 
313b4dbc599SNathan Whitehorn 	reg = cuda_read_reg(sc, vBufB);
314b4dbc599SNathan Whitehorn 	reg |= vPB5;
315b4dbc599SNathan Whitehorn 	cuda_write_reg(sc, vBufB, reg);
316b4dbc599SNathan Whitehorn }
317b4dbc599SNathan Whitehorn 
318b4dbc599SNathan Whitehorn static void
319b4dbc599SNathan Whitehorn cuda_in(struct cuda_softc *sc)
320b4dbc599SNathan Whitehorn {
321b4dbc599SNathan Whitehorn 	uint8_t reg;
322b4dbc599SNathan Whitehorn 
323b4dbc599SNathan Whitehorn 	reg = cuda_read_reg(sc, vACR);
324b4dbc599SNathan Whitehorn 	reg &= ~vSR_OUT;
325b4dbc599SNathan Whitehorn 	cuda_write_reg(sc, vACR, reg);
326b4dbc599SNathan Whitehorn }
327b4dbc599SNathan Whitehorn 
328b4dbc599SNathan Whitehorn static void
329b4dbc599SNathan Whitehorn cuda_out(struct cuda_softc *sc)
330b4dbc599SNathan Whitehorn {
331b4dbc599SNathan Whitehorn 	uint8_t reg;
332b4dbc599SNathan Whitehorn 
333b4dbc599SNathan Whitehorn 	reg = cuda_read_reg(sc, vACR);
334b4dbc599SNathan Whitehorn 	reg |= vSR_OUT;
335b4dbc599SNathan Whitehorn 	cuda_write_reg(sc, vACR, reg);
336b4dbc599SNathan Whitehorn }
337b4dbc599SNathan Whitehorn 
338b4dbc599SNathan Whitehorn static void
339b4dbc599SNathan Whitehorn cuda_toggle_ack(struct cuda_softc *sc)
340b4dbc599SNathan Whitehorn {
341b4dbc599SNathan Whitehorn 	uint8_t reg;
342b4dbc599SNathan Whitehorn 
343b4dbc599SNathan Whitehorn 	reg = cuda_read_reg(sc, vBufB);
344b4dbc599SNathan Whitehorn 	reg ^= vPB4;
345b4dbc599SNathan Whitehorn 	cuda_write_reg(sc, vBufB, reg);
346b4dbc599SNathan Whitehorn }
347b4dbc599SNathan Whitehorn 
348b4dbc599SNathan Whitehorn static void
349b4dbc599SNathan Whitehorn cuda_ack_off(struct cuda_softc *sc)
350b4dbc599SNathan Whitehorn {
351b4dbc599SNathan Whitehorn 	uint8_t reg;
352b4dbc599SNathan Whitehorn 
353b4dbc599SNathan Whitehorn 	reg = cuda_read_reg(sc, vBufB);
354b4dbc599SNathan Whitehorn 	reg |= vPB4;
355b4dbc599SNathan Whitehorn 	cuda_write_reg(sc, vBufB, reg);
356b4dbc599SNathan Whitehorn }
357b4dbc599SNathan Whitehorn 
358b4dbc599SNathan Whitehorn static int
359b4dbc599SNathan Whitehorn cuda_intr_state(struct cuda_softc *sc)
360b4dbc599SNathan Whitehorn {
361b4dbc599SNathan Whitehorn 	return ((cuda_read_reg(sc, vBufB) & vPB3) == 0);
362b4dbc599SNathan Whitehorn }
363b4dbc599SNathan Whitehorn 
364b4dbc599SNathan Whitehorn static int
365b4dbc599SNathan Whitehorn cuda_send(void *cookie, int poll, int length, uint8_t *msg)
366b4dbc599SNathan Whitehorn {
367b4dbc599SNathan Whitehorn 	struct cuda_softc *sc = cookie;
368b4dbc599SNathan Whitehorn 	device_t dev = sc->sc_dev;
369582434bdSNathan Whitehorn 	struct cuda_packet *pkt;
370b4dbc599SNathan Whitehorn 
371b4dbc599SNathan Whitehorn 	if (sc->sc_state == CUDA_NOTREADY)
372582434bdSNathan Whitehorn 		return (-1);
373b4dbc599SNathan Whitehorn 
374b4dbc599SNathan Whitehorn 	mtx_lock(&sc->sc_mutex);
375b4dbc599SNathan Whitehorn 
376011ad8e7SNathan Whitehorn 	pkt = STAILQ_FIRST(&sc->sc_freeq);
377011ad8e7SNathan Whitehorn 	if (pkt == NULL) {
378011ad8e7SNathan Whitehorn 		mtx_unlock(&sc->sc_mutex);
379011ad8e7SNathan Whitehorn 		return (-1);
380011ad8e7SNathan Whitehorn 	}
381011ad8e7SNathan Whitehorn 
382582434bdSNathan Whitehorn 	pkt->len = length - 1;
383582434bdSNathan Whitehorn 	pkt->type = msg[0];
384582434bdSNathan Whitehorn 	memcpy(pkt->data, &msg[1], pkt->len);
385582434bdSNathan Whitehorn 
386011ad8e7SNathan Whitehorn 	STAILQ_REMOVE_HEAD(&sc->sc_freeq, pkt_q);
387582434bdSNathan Whitehorn 	STAILQ_INSERT_TAIL(&sc->sc_outq, pkt, pkt_q);
388582434bdSNathan Whitehorn 
389582434bdSNathan Whitehorn 	/*
390582434bdSNathan Whitehorn 	 * If we already are sending a packet, we should bail now that this
391582434bdSNathan Whitehorn 	 * one has been added to the queue.
392582434bdSNathan Whitehorn 	 */
393582434bdSNathan Whitehorn 
394582434bdSNathan Whitehorn 	if (sc->sc_waiting) {
395b4dbc599SNathan Whitehorn 		mtx_unlock(&sc->sc_mutex);
396582434bdSNathan Whitehorn 		return (0);
397b4dbc599SNathan Whitehorn 	}
398b4dbc599SNathan Whitehorn 
399582434bdSNathan Whitehorn 	cuda_send_outbound(sc);
400582434bdSNathan Whitehorn 	mtx_unlock(&sc->sc_mutex);
401582434bdSNathan Whitehorn 
402582434bdSNathan Whitehorn 	if (sc->sc_polling || poll || cold)
403582434bdSNathan Whitehorn 		cuda_poll(dev);
404582434bdSNathan Whitehorn 
405582434bdSNathan Whitehorn 	return (0);
406582434bdSNathan Whitehorn }
407582434bdSNathan Whitehorn 
408582434bdSNathan Whitehorn static void
409582434bdSNathan Whitehorn cuda_send_outbound(struct cuda_softc *sc)
410582434bdSNathan Whitehorn {
411582434bdSNathan Whitehorn 	struct cuda_packet *pkt;
412582434bdSNathan Whitehorn 
413582434bdSNathan Whitehorn 	mtx_assert(&sc->sc_mutex, MA_OWNED);
414582434bdSNathan Whitehorn 
415582434bdSNathan Whitehorn 	pkt = STAILQ_FIRST(&sc->sc_outq);
416582434bdSNathan Whitehorn 	if (pkt == NULL)
417582434bdSNathan Whitehorn 		return;
418582434bdSNathan Whitehorn 
419582434bdSNathan Whitehorn 	sc->sc_out_length = pkt->len + 1;
420582434bdSNathan Whitehorn 	memcpy(sc->sc_out, &pkt->type, pkt->len + 1);
421b4dbc599SNathan Whitehorn 	sc->sc_sent = 0;
422b4dbc599SNathan Whitehorn 
423582434bdSNathan Whitehorn 	STAILQ_REMOVE_HEAD(&sc->sc_outq, pkt_q);
424011ad8e7SNathan Whitehorn 	STAILQ_INSERT_TAIL(&sc->sc_freeq, pkt, pkt_q);
425582434bdSNathan Whitehorn 
426582434bdSNathan Whitehorn 	sc->sc_waiting = 1;
427582434bdSNathan Whitehorn 
428582434bdSNathan Whitehorn 	cuda_poll(sc->sc_dev);
429582434bdSNathan Whitehorn 
430b4dbc599SNathan Whitehorn 	DELAY(150);
431582434bdSNathan Whitehorn 
432582434bdSNathan Whitehorn 	if (sc->sc_state == CUDA_IDLE && !cuda_intr_state(sc)) {
433b4dbc599SNathan Whitehorn 		sc->sc_state = CUDA_OUT;
434b4dbc599SNathan Whitehorn 		cuda_out(sc);
435b4dbc599SNathan Whitehorn 		cuda_write_reg(sc, vSR, sc->sc_out[0]);
436b4dbc599SNathan Whitehorn 		cuda_ack_off(sc);
437b4dbc599SNathan Whitehorn 		cuda_tip(sc);
438b4dbc599SNathan Whitehorn 	}
439b4dbc599SNathan Whitehorn }
440b4dbc599SNathan Whitehorn 
441582434bdSNathan Whitehorn static void
442582434bdSNathan Whitehorn cuda_send_inbound(struct cuda_softc *sc)
443582434bdSNathan Whitehorn {
444582434bdSNathan Whitehorn 	device_t dev;
445582434bdSNathan Whitehorn 	struct cuda_packet *pkt;
446582434bdSNathan Whitehorn 
447582434bdSNathan Whitehorn 	dev = sc->sc_dev;
448582434bdSNathan Whitehorn 
449582434bdSNathan Whitehorn 	mtx_lock(&sc->sc_mutex);
450582434bdSNathan Whitehorn 
451582434bdSNathan Whitehorn 	while ((pkt = STAILQ_FIRST(&sc->sc_inq)) != NULL) {
452582434bdSNathan Whitehorn 		STAILQ_REMOVE_HEAD(&sc->sc_inq, pkt_q);
453582434bdSNathan Whitehorn 
454582434bdSNathan Whitehorn 		mtx_unlock(&sc->sc_mutex);
455582434bdSNathan Whitehorn 
456582434bdSNathan Whitehorn 		/* check if we have a handler for this message */
457582434bdSNathan Whitehorn 		switch (pkt->type) {
458582434bdSNathan Whitehorn 		   case CUDA_ADB:
459582434bdSNathan Whitehorn 			if (pkt->len > 2) {
460582434bdSNathan Whitehorn 				adb_receive_raw_packet(sc->adb_bus,
461582434bdSNathan Whitehorn 				    pkt->data[0],pkt->data[1],
462582434bdSNathan Whitehorn 				    pkt->len - 2,&pkt->data[2]);
463582434bdSNathan Whitehorn 			} else {
464582434bdSNathan Whitehorn 				adb_receive_raw_packet(sc->adb_bus,
465582434bdSNathan Whitehorn 				    pkt->data[0],pkt->data[1],0,NULL);
466582434bdSNathan Whitehorn 			}
467582434bdSNathan Whitehorn 			break;
468582434bdSNathan Whitehorn 		   case CUDA_PSEUDO:
469582434bdSNathan Whitehorn 			mtx_lock(&sc->sc_mutex);
4703df9e037SNathan Whitehorn 			switch (pkt->data[1]) {
4713df9e037SNathan Whitehorn 			case CMD_AUTOPOLL:
472582434bdSNathan Whitehorn 				sc->sc_autopoll = 1;
4733df9e037SNathan Whitehorn 				break;
4743df9e037SNathan Whitehorn 			case CMD_READ_RTC:
4753df9e037SNathan Whitehorn 				memcpy(&sc->sc_rtc, &pkt->data[2],
4763df9e037SNathan Whitehorn 				    sizeof(sc->sc_rtc));
4773df9e037SNathan Whitehorn 				wakeup(&sc->sc_rtc);
4783df9e037SNathan Whitehorn 				break;
4793df9e037SNathan Whitehorn 			case CMD_WRITE_RTC:
4803df9e037SNathan Whitehorn 				break;
4813df9e037SNathan Whitehorn 			}
482582434bdSNathan Whitehorn 			mtx_unlock(&sc->sc_mutex);
483582434bdSNathan Whitehorn 			break;
484582434bdSNathan Whitehorn 		   case CUDA_ERROR:
485582434bdSNathan Whitehorn 			/*
486582434bdSNathan Whitehorn 			 * CUDA will throw errors if we miss a race between
487582434bdSNathan Whitehorn 			 * sending and receiving packets. This is already
488582434bdSNathan Whitehorn 			 * handled when we abort packet output to handle
489582434bdSNathan Whitehorn 			 * this packet in cuda_intr(). Thus, we ignore
490582434bdSNathan Whitehorn 			 * these messages.
491582434bdSNathan Whitehorn 			 */
492582434bdSNathan Whitehorn 			break;
493582434bdSNathan Whitehorn 		   default:
494582434bdSNathan Whitehorn 			device_printf(dev,"unknown CUDA command %d\n",
495582434bdSNathan Whitehorn 			    pkt->type);
496582434bdSNathan Whitehorn 			break;
497582434bdSNathan Whitehorn 		}
498582434bdSNathan Whitehorn 
499582434bdSNathan Whitehorn 		mtx_lock(&sc->sc_mutex);
500011ad8e7SNathan Whitehorn 
501011ad8e7SNathan Whitehorn 		STAILQ_INSERT_TAIL(&sc->sc_freeq, pkt, pkt_q);
502582434bdSNathan Whitehorn 	}
503582434bdSNathan Whitehorn 
504582434bdSNathan Whitehorn 	mtx_unlock(&sc->sc_mutex);
505b4dbc599SNathan Whitehorn }
506b4dbc599SNathan Whitehorn 
50765f44679SAndriy Gapon static u_int
508b4dbc599SNathan Whitehorn cuda_poll(device_t dev)
509b4dbc599SNathan Whitehorn {
510b4dbc599SNathan Whitehorn 	struct cuda_softc *sc = device_get_softc(dev);
511b4dbc599SNathan Whitehorn 
51201418697SNathan Whitehorn 	if (sc->sc_state == CUDA_IDLE && !cuda_intr_state(sc) &&
51301418697SNathan Whitehorn 	    !sc->sc_waiting)
51465f44679SAndriy Gapon 		return (0);
51501418697SNathan Whitehorn 
516b4dbc599SNathan Whitehorn 	cuda_intr(dev);
51765f44679SAndriy Gapon 	return (0);
518b4dbc599SNathan Whitehorn }
519b4dbc599SNathan Whitehorn 
520b4dbc599SNathan Whitehorn static void
521b4dbc599SNathan Whitehorn cuda_intr(void *arg)
522b4dbc599SNathan Whitehorn {
523b4dbc599SNathan Whitehorn 	device_t        dev;
524b4dbc599SNathan Whitehorn 	struct cuda_softc *sc;
525*9c861e93SJohn Baldwin 	int ending, process_inbound;
526b4dbc599SNathan Whitehorn 	uint8_t reg;
527b4dbc599SNathan Whitehorn 
528b4dbc599SNathan Whitehorn         dev = (device_t)arg;
529b4dbc599SNathan Whitehorn 	sc = device_get_softc(dev);
530b4dbc599SNathan Whitehorn 
531b4dbc599SNathan Whitehorn 	mtx_lock(&sc->sc_mutex);
532b4dbc599SNathan Whitehorn 
533582434bdSNathan Whitehorn 	process_inbound = 0;
534b4dbc599SNathan Whitehorn 	reg = cuda_read_reg(sc, vIFR);
535582434bdSNathan Whitehorn 	if ((reg & vSR_INT) != vSR_INT) {
536582434bdSNathan Whitehorn 		mtx_unlock(&sc->sc_mutex);
537582434bdSNathan Whitehorn 		return;
538582434bdSNathan Whitehorn 	}
539582434bdSNathan Whitehorn 
540b4dbc599SNathan Whitehorn 	cuda_write_reg(sc, vIFR, 0x7f);	/* Clear interrupt */
541b4dbc599SNathan Whitehorn 
542b4dbc599SNathan Whitehorn switch_start:
543b4dbc599SNathan Whitehorn 	switch (sc->sc_state) {
544b4dbc599SNathan Whitehorn 	case CUDA_IDLE:
545b4dbc599SNathan Whitehorn 		/*
546b4dbc599SNathan Whitehorn 		 * This is an unexpected packet, so grab the first (dummy)
547b4dbc599SNathan Whitehorn 		 * byte, set up the proper vars, and tell the chip we are
548b4dbc599SNathan Whitehorn 		 * starting to receive the packet by setting the TIP bit.
549b4dbc599SNathan Whitehorn 		 */
550b4dbc599SNathan Whitehorn 		sc->sc_in[1] = cuda_read_reg(sc, vSR);
551b4dbc599SNathan Whitehorn 
552b4dbc599SNathan Whitehorn 		if (cuda_intr_state(sc) == 0) {
553b4dbc599SNathan Whitehorn 			/* must have been a fake start */
554b4dbc599SNathan Whitehorn 
555b4dbc599SNathan Whitehorn 			if (sc->sc_waiting) {
556b4dbc599SNathan Whitehorn 				/* start over */
557b4dbc599SNathan Whitehorn 				DELAY(150);
558b4dbc599SNathan Whitehorn 				sc->sc_state = CUDA_OUT;
559b4dbc599SNathan Whitehorn 				sc->sc_sent = 0;
560b4dbc599SNathan Whitehorn 				cuda_out(sc);
561b4dbc599SNathan Whitehorn 				cuda_write_reg(sc, vSR, sc->sc_out[1]);
562b4dbc599SNathan Whitehorn 				cuda_ack_off(sc);
563b4dbc599SNathan Whitehorn 				cuda_tip(sc);
564b4dbc599SNathan Whitehorn 			}
565b4dbc599SNathan Whitehorn 			break;
566b4dbc599SNathan Whitehorn 		}
567b4dbc599SNathan Whitehorn 
568b4dbc599SNathan Whitehorn 		cuda_in(sc);
569b4dbc599SNathan Whitehorn 		cuda_tip(sc);
570b4dbc599SNathan Whitehorn 
571b4dbc599SNathan Whitehorn 		sc->sc_received = 1;
572b4dbc599SNathan Whitehorn 		sc->sc_state = CUDA_IN;
573b4dbc599SNathan Whitehorn 		break;
574b4dbc599SNathan Whitehorn 
575b4dbc599SNathan Whitehorn 	case CUDA_IN:
576b4dbc599SNathan Whitehorn 		sc->sc_in[sc->sc_received] = cuda_read_reg(sc, vSR);
577b4dbc599SNathan Whitehorn 		ending = 0;
578b4dbc599SNathan Whitehorn 
579b4dbc599SNathan Whitehorn 		if (sc->sc_received > 255) {
580b4dbc599SNathan Whitehorn 			/* bitch only once */
581b4dbc599SNathan Whitehorn 			if (sc->sc_received == 256) {
582b4dbc599SNathan Whitehorn 				device_printf(dev,"input overflow\n");
583b4dbc599SNathan Whitehorn 				ending = 1;
584b4dbc599SNathan Whitehorn 			}
585b4dbc599SNathan Whitehorn 		} else
586b4dbc599SNathan Whitehorn 			sc->sc_received++;
587b4dbc599SNathan Whitehorn 
588b4dbc599SNathan Whitehorn 		/* intr off means this is the last byte (end of frame) */
589b4dbc599SNathan Whitehorn 		if (cuda_intr_state(sc) == 0) {
590b4dbc599SNathan Whitehorn 			ending = 1;
591b4dbc599SNathan Whitehorn 		} else {
592b4dbc599SNathan Whitehorn 			cuda_toggle_ack(sc);
593b4dbc599SNathan Whitehorn 		}
594b4dbc599SNathan Whitehorn 
595b4dbc599SNathan Whitehorn 		if (ending == 1) {	/* end of message? */
596582434bdSNathan Whitehorn 			struct cuda_packet *pkt;
597b4dbc599SNathan Whitehorn 
598b4dbc599SNathan Whitehorn 			/* reset vars and signal the end of this frame */
599b4dbc599SNathan Whitehorn 			cuda_idle(sc);
600b4dbc599SNathan Whitehorn 
601582434bdSNathan Whitehorn 			/* Queue up the packet */
602011ad8e7SNathan Whitehorn 			pkt = STAILQ_FIRST(&sc->sc_freeq);
603011ad8e7SNathan Whitehorn 			if (pkt != NULL) {
604011ad8e7SNathan Whitehorn 				/* If we have a free packet, process it */
605b4dbc599SNathan Whitehorn 
606582434bdSNathan Whitehorn 				pkt->len = sc->sc_received - 2;
607582434bdSNathan Whitehorn 				pkt->type = sc->sc_in[1];
608582434bdSNathan Whitehorn 				memcpy(pkt->data, &sc->sc_in[2], pkt->len);
609582434bdSNathan Whitehorn 
610011ad8e7SNathan Whitehorn 				STAILQ_REMOVE_HEAD(&sc->sc_freeq, pkt_q);
611582434bdSNathan Whitehorn 				STAILQ_INSERT_TAIL(&sc->sc_inq, pkt, pkt_q);
612b4dbc599SNathan Whitehorn 
613011ad8e7SNathan Whitehorn 				process_inbound = 1;
614011ad8e7SNathan Whitehorn 			}
615011ad8e7SNathan Whitehorn 
616b4dbc599SNathan Whitehorn 			sc->sc_state = CUDA_IDLE;
617b4dbc599SNathan Whitehorn 			sc->sc_received = 0;
618b4dbc599SNathan Whitehorn 
619b4dbc599SNathan Whitehorn 			/*
620b4dbc599SNathan Whitehorn 			 * If there is something waiting to be sent out,
621b4dbc599SNathan Whitehorn 			 * set everything up and send the first byte.
622b4dbc599SNathan Whitehorn 			 */
623b4dbc599SNathan Whitehorn 			if (sc->sc_waiting == 1) {
624b4dbc599SNathan Whitehorn 				DELAY(1500);	/* required */
625b4dbc599SNathan Whitehorn 				sc->sc_sent = 0;
626b4dbc599SNathan Whitehorn 				sc->sc_state = CUDA_OUT;
627b4dbc599SNathan Whitehorn 
628b4dbc599SNathan Whitehorn 				/*
629b4dbc599SNathan Whitehorn 				 * If the interrupt is on, we were too slow
630b4dbc599SNathan Whitehorn 				 * and the chip has already started to send
631b4dbc599SNathan Whitehorn 				 * something to us, so back out of the write
632b4dbc599SNathan Whitehorn 				 * and start a read cycle.
633b4dbc599SNathan Whitehorn 				 */
634b4dbc599SNathan Whitehorn 				if (cuda_intr_state(sc)) {
635b4dbc599SNathan Whitehorn 					cuda_in(sc);
636b4dbc599SNathan Whitehorn 					cuda_idle(sc);
637b4dbc599SNathan Whitehorn 					sc->sc_sent = 0;
638b4dbc599SNathan Whitehorn 					sc->sc_state = CUDA_IDLE;
639b4dbc599SNathan Whitehorn 					sc->sc_received = 0;
640b4dbc599SNathan Whitehorn 					DELAY(150);
641b4dbc599SNathan Whitehorn 					goto switch_start;
642b4dbc599SNathan Whitehorn 				}
643582434bdSNathan Whitehorn 
644b4dbc599SNathan Whitehorn 				/*
645b4dbc599SNathan Whitehorn 				 * If we got here, it's ok to start sending
646b4dbc599SNathan Whitehorn 				 * so load the first byte and tell the chip
647b4dbc599SNathan Whitehorn 				 * we want to send.
648b4dbc599SNathan Whitehorn 				 */
649b4dbc599SNathan Whitehorn 				cuda_out(sc);
650b4dbc599SNathan Whitehorn 				cuda_write_reg(sc, vSR,
651b4dbc599SNathan Whitehorn 				    sc->sc_out[sc->sc_sent]);
652b4dbc599SNathan Whitehorn 				cuda_ack_off(sc);
653b4dbc599SNathan Whitehorn 				cuda_tip(sc);
654b4dbc599SNathan Whitehorn 			}
655b4dbc599SNathan Whitehorn 		}
656b4dbc599SNathan Whitehorn 		break;
657b4dbc599SNathan Whitehorn 
658b4dbc599SNathan Whitehorn 	case CUDA_OUT:
659*9c861e93SJohn Baldwin 		cuda_read_reg(sc, vSR);	/* reset SR-intr in IFR */
660b4dbc599SNathan Whitehorn 
661b4dbc599SNathan Whitehorn 		sc->sc_sent++;
662b4dbc599SNathan Whitehorn 		if (cuda_intr_state(sc)) {	/* ADB intr low during write */
663b4dbc599SNathan Whitehorn 			cuda_in(sc);	/* make sure SR is set to IN */
664b4dbc599SNathan Whitehorn 			cuda_idle(sc);
665b4dbc599SNathan Whitehorn 			sc->sc_sent = 0;	/* must start all over */
666b4dbc599SNathan Whitehorn 			sc->sc_state = CUDA_IDLE;	/* new state */
667b4dbc599SNathan Whitehorn 			sc->sc_received = 0;
668b4dbc599SNathan Whitehorn 			sc->sc_waiting = 1;	/* must retry when done with
669b4dbc599SNathan Whitehorn 						 * read */
670b4dbc599SNathan Whitehorn 			DELAY(150);
671b4dbc599SNathan Whitehorn 			goto switch_start;	/* process next state right
672b4dbc599SNathan Whitehorn 						 * now */
673b4dbc599SNathan Whitehorn 			break;
674b4dbc599SNathan Whitehorn 		}
675b4dbc599SNathan Whitehorn 		if (sc->sc_out_length == sc->sc_sent) {	/* check for done */
676b4dbc599SNathan Whitehorn 			sc->sc_waiting = 0;	/* done writing */
677b4dbc599SNathan Whitehorn 			sc->sc_state = CUDA_IDLE;	/* signal bus is idle */
678b4dbc599SNathan Whitehorn 			cuda_in(sc);
679b4dbc599SNathan Whitehorn 			cuda_idle(sc);
680b4dbc599SNathan Whitehorn 		} else {
681b4dbc599SNathan Whitehorn 			/* send next byte */
682b4dbc599SNathan Whitehorn 			cuda_write_reg(sc, vSR, sc->sc_out[sc->sc_sent]);
683b4dbc599SNathan Whitehorn 			cuda_toggle_ack(sc);	/* signal byte ready to
684b4dbc599SNathan Whitehorn 							 * shift */
685b4dbc599SNathan Whitehorn 		}
686b4dbc599SNathan Whitehorn 		break;
687b4dbc599SNathan Whitehorn 
688b4dbc599SNathan Whitehorn 	case CUDA_NOTREADY:
689b4dbc599SNathan Whitehorn 		break;
690b4dbc599SNathan Whitehorn 
691b4dbc599SNathan Whitehorn 	default:
692b4dbc599SNathan Whitehorn 		break;
693b4dbc599SNathan Whitehorn 	}
694b4dbc599SNathan Whitehorn 
695b4dbc599SNathan Whitehorn 	mtx_unlock(&sc->sc_mutex);
696582434bdSNathan Whitehorn 
697582434bdSNathan Whitehorn 	if (process_inbound)
698582434bdSNathan Whitehorn 		cuda_send_inbound(sc);
699582434bdSNathan Whitehorn 
700582434bdSNathan Whitehorn 	mtx_lock(&sc->sc_mutex);
701582434bdSNathan Whitehorn 	/* If we have another packet waiting, set it up */
702582434bdSNathan Whitehorn 	if (!sc->sc_waiting && sc->sc_state == CUDA_IDLE)
703582434bdSNathan Whitehorn 		cuda_send_outbound(sc);
704582434bdSNathan Whitehorn 
705582434bdSNathan Whitehorn 	mtx_unlock(&sc->sc_mutex);
706582434bdSNathan Whitehorn 
707b4dbc599SNathan Whitehorn }
708b4dbc599SNathan Whitehorn 
709b4dbc599SNathan Whitehorn static u_int
710582434bdSNathan Whitehorn cuda_adb_send(device_t dev, u_char command_byte, int len, u_char *data,
711582434bdSNathan Whitehorn     u_char poll)
712b4dbc599SNathan Whitehorn {
713b4dbc599SNathan Whitehorn 	struct cuda_softc *sc = device_get_softc(dev);
714b4dbc599SNathan Whitehorn 	uint8_t packet[16];
715582434bdSNathan Whitehorn 	int i;
716b4dbc599SNathan Whitehorn 
717b4dbc599SNathan Whitehorn 	/* construct an ADB command packet and send it */
718b4dbc599SNathan Whitehorn 	packet[0] = CUDA_ADB;
719b4dbc599SNathan Whitehorn 	packet[1] = command_byte;
720b4dbc599SNathan Whitehorn 	for (i = 0; i < len; i++)
721b4dbc599SNathan Whitehorn 		packet[i + 2] = data[i];
722b4dbc599SNathan Whitehorn 
723b4dbc599SNathan Whitehorn 	cuda_send(sc, poll, len + 2, packet);
724b4dbc599SNathan Whitehorn 
725582434bdSNathan Whitehorn 	return (0);
726b4dbc599SNathan Whitehorn }
727b4dbc599SNathan Whitehorn 
728b4dbc599SNathan Whitehorn static u_int
729b4dbc599SNathan Whitehorn cuda_adb_autopoll(device_t dev, uint16_t mask) {
730b4dbc599SNathan Whitehorn 	struct cuda_softc *sc = device_get_softc(dev);
731b4dbc599SNathan Whitehorn 
732b4dbc599SNathan Whitehorn 	uint8_t cmd[] = {CUDA_PSEUDO, CMD_AUTOPOLL, mask != 0};
733b4dbc599SNathan Whitehorn 
734b4dbc599SNathan Whitehorn 	mtx_lock(&sc->sc_mutex);
73501418697SNathan Whitehorn 
736b4dbc599SNathan Whitehorn 	if (cmd[2] == sc->sc_autopoll) {
737b4dbc599SNathan Whitehorn 		mtx_unlock(&sc->sc_mutex);
738582434bdSNathan Whitehorn 		return (0);
739b4dbc599SNathan Whitehorn 	}
740b4dbc599SNathan Whitehorn 
741b4dbc599SNathan Whitehorn 	sc->sc_autopoll = -1;
742582434bdSNathan Whitehorn 	cuda_send(sc, 1, 3, cmd);
743b4dbc599SNathan Whitehorn 
744b4dbc599SNathan Whitehorn 	mtx_unlock(&sc->sc_mutex);
745b4dbc599SNathan Whitehorn 
746582434bdSNathan Whitehorn 	return (0);
747b4dbc599SNathan Whitehorn }
748b4dbc599SNathan Whitehorn 
749b2a237beSNathan Whitehorn static void
750b2a237beSNathan Whitehorn cuda_shutdown(void *xsc, int howto)
751b2a237beSNathan Whitehorn {
752b2a237beSNathan Whitehorn 	struct cuda_softc *sc = xsc;
753b2a237beSNathan Whitehorn 	uint8_t cmd[] = {CUDA_PSEUDO, 0};
754b2a237beSNathan Whitehorn 
755b2a237beSNathan Whitehorn 	cmd[1] = (howto & RB_HALT) ? CMD_POWEROFF : CMD_RESET;
756b2a237beSNathan Whitehorn 	cuda_poll(sc->sc_dev);
757b2a237beSNathan Whitehorn 	cuda_send(sc, 1, 2, cmd);
758b2a237beSNathan Whitehorn 
759b2a237beSNathan Whitehorn 	while (1)
760b2a237beSNathan Whitehorn 		cuda_poll(sc->sc_dev);
761b2a237beSNathan Whitehorn }
762b2a237beSNathan Whitehorn 
7633df9e037SNathan Whitehorn #define DIFF19041970	2082844800
7643df9e037SNathan Whitehorn 
7653df9e037SNathan Whitehorn static int
7663df9e037SNathan Whitehorn cuda_gettime(device_t dev, struct timespec *ts)
7673df9e037SNathan Whitehorn {
7683df9e037SNathan Whitehorn 	struct cuda_softc *sc = device_get_softc(dev);
7693df9e037SNathan Whitehorn 	uint8_t cmd[] = {CUDA_PSEUDO, CMD_READ_RTC};
7703df9e037SNathan Whitehorn 
7713df9e037SNathan Whitehorn 	mtx_lock(&sc->sc_mutex);
7723df9e037SNathan Whitehorn 	sc->sc_rtc = -1;
7733df9e037SNathan Whitehorn 	cuda_send(sc, 1, 2, cmd);
7743df9e037SNathan Whitehorn 	if (sc->sc_rtc == -1)
7753df9e037SNathan Whitehorn 		mtx_sleep(&sc->sc_rtc, &sc->sc_mutex, 0, "rtc", 100);
7763df9e037SNathan Whitehorn 
7773df9e037SNathan Whitehorn 	ts->tv_sec = sc->sc_rtc - DIFF19041970;
7783df9e037SNathan Whitehorn 	ts->tv_nsec = 0;
7793df9e037SNathan Whitehorn 	mtx_unlock(&sc->sc_mutex);
7803df9e037SNathan Whitehorn 
7813df9e037SNathan Whitehorn 	return (0);
7823df9e037SNathan Whitehorn }
7833df9e037SNathan Whitehorn 
7843df9e037SNathan Whitehorn static int
7853df9e037SNathan Whitehorn cuda_settime(device_t dev, struct timespec *ts)
7863df9e037SNathan Whitehorn {
7873df9e037SNathan Whitehorn 	struct cuda_softc *sc = device_get_softc(dev);
7883df9e037SNathan Whitehorn 	uint8_t cmd[] = {CUDA_PSEUDO, CMD_WRITE_RTC, 0, 0, 0, 0};
7893df9e037SNathan Whitehorn 	uint32_t sec;
7903df9e037SNathan Whitehorn 
7913df9e037SNathan Whitehorn 	sec = ts->tv_sec + DIFF19041970;
7923df9e037SNathan Whitehorn 	memcpy(&cmd[2], &sec, sizeof(sec));
7933df9e037SNathan Whitehorn 
7943df9e037SNathan Whitehorn 	mtx_lock(&sc->sc_mutex);
7953df9e037SNathan Whitehorn 	cuda_send(sc, 0, 6, cmd);
7963df9e037SNathan Whitehorn 	mtx_unlock(&sc->sc_mutex);
7973df9e037SNathan Whitehorn 
7983df9e037SNathan Whitehorn 	return (0);
7993df9e037SNathan Whitehorn }
800