xref: /freebsd/sys/powerpc/powermac/cuda.c (revision 41e26e8288f1743c8584e5f9c461d36dce1cccc6)
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 #include <sys/param.h>
35b4dbc599SNathan Whitehorn #include <sys/systm.h>
36b4dbc599SNathan Whitehorn #include <sys/module.h>
37b4dbc599SNathan Whitehorn #include <sys/bus.h>
38b4dbc599SNathan Whitehorn #include <sys/conf.h>
39e2e050c8SConrad Meyer #include <sys/eventhandler.h>
40b4dbc599SNathan Whitehorn #include <sys/kernel.h>
41e2e050c8SConrad Meyer #include <sys/lock.h>
42e2e050c8SConrad Meyer #include <sys/mutex.h>
433df9e037SNathan Whitehorn #include <sys/clock.h>
44b2a237beSNathan Whitehorn #include <sys/reboot.h>
45b4dbc599SNathan Whitehorn 
46b4dbc599SNathan Whitehorn #include <dev/ofw/ofw_bus.h>
47b4dbc599SNathan Whitehorn #include <dev/ofw/openfirm.h>
48b4dbc599SNathan Whitehorn 
49b4dbc599SNathan Whitehorn #include <machine/bus.h>
50b4dbc599SNathan Whitehorn #include <machine/intr_machdep.h>
51b4dbc599SNathan Whitehorn #include <machine/md_var.h>
52b4dbc599SNathan Whitehorn #include <machine/pio.h>
53b4dbc599SNathan Whitehorn #include <machine/resource.h>
54b4dbc599SNathan Whitehorn 
55b4dbc599SNathan Whitehorn #include <vm/vm.h>
56b4dbc599SNathan Whitehorn #include <vm/pmap.h>
57b4dbc599SNathan Whitehorn 
58b4dbc599SNathan Whitehorn #include <sys/rman.h>
59b4dbc599SNathan Whitehorn 
60b4dbc599SNathan Whitehorn #include <dev/adb/adb.h>
61b4dbc599SNathan Whitehorn 
623df9e037SNathan Whitehorn #include "clock_if.h"
63b4dbc599SNathan Whitehorn #include "cudavar.h"
64b4dbc599SNathan Whitehorn #include "viareg.h"
65b4dbc599SNathan Whitehorn 
66b4dbc599SNathan Whitehorn /*
67b4dbc599SNathan Whitehorn  * MacIO interface
68b4dbc599SNathan Whitehorn  */
69b4dbc599SNathan Whitehorn static int	cuda_probe(device_t);
70b4dbc599SNathan Whitehorn static int	cuda_attach(device_t);
71b4dbc599SNathan Whitehorn static int	cuda_detach(device_t);
72b4dbc599SNathan Whitehorn 
73b4dbc599SNathan Whitehorn static u_int	cuda_adb_send(device_t dev, u_char command_byte, int len,
74b4dbc599SNathan Whitehorn     u_char *data, u_char poll);
75b4dbc599SNathan Whitehorn static u_int	cuda_adb_autopoll(device_t dev, uint16_t mask);
7665f44679SAndriy Gapon static u_int	cuda_poll(device_t dev);
77582434bdSNathan Whitehorn static void	cuda_send_inbound(struct cuda_softc *sc);
78582434bdSNathan Whitehorn static void	cuda_send_outbound(struct cuda_softc *sc);
79b2a237beSNathan Whitehorn static void	cuda_shutdown(void *xsc, int howto);
80b4dbc599SNathan Whitehorn 
813df9e037SNathan Whitehorn /*
823df9e037SNathan Whitehorn  * Clock interface
833df9e037SNathan Whitehorn  */
843df9e037SNathan Whitehorn static int cuda_gettime(device_t dev, struct timespec *ts);
853df9e037SNathan Whitehorn static int cuda_settime(device_t dev, struct timespec *ts);
863df9e037SNathan Whitehorn 
87b4dbc599SNathan Whitehorn static device_method_t  cuda_methods[] = {
88b4dbc599SNathan Whitehorn 	/* Device interface */
89b4dbc599SNathan Whitehorn 	DEVMETHOD(device_probe,		cuda_probe),
90b4dbc599SNathan Whitehorn 	DEVMETHOD(device_attach,	cuda_attach),
91b4dbc599SNathan Whitehorn         DEVMETHOD(device_detach,        cuda_detach),
92b4dbc599SNathan Whitehorn         DEVMETHOD(device_shutdown,      bus_generic_shutdown),
93b4dbc599SNathan Whitehorn         DEVMETHOD(device_suspend,       bus_generic_suspend),
94b4dbc599SNathan Whitehorn         DEVMETHOD(device_resume,        bus_generic_resume),
95b4dbc599SNathan Whitehorn 
96b4dbc599SNathan Whitehorn 	/* ADB bus interface */
97b4dbc599SNathan Whitehorn 	DEVMETHOD(adb_hb_send_raw_packet,	cuda_adb_send),
98b4dbc599SNathan Whitehorn 	DEVMETHOD(adb_hb_controller_poll,	cuda_poll),
99b4dbc599SNathan Whitehorn 	DEVMETHOD(adb_hb_set_autopoll_mask,	cuda_adb_autopoll),
100b4dbc599SNathan Whitehorn 
1013df9e037SNathan Whitehorn 	/* Clock interface */
1023df9e037SNathan Whitehorn 	DEVMETHOD(clock_gettime,	cuda_gettime),
1033df9e037SNathan Whitehorn 	DEVMETHOD(clock_settime,	cuda_settime),
1043df9e037SNathan Whitehorn 
1054b7ec270SMarius Strobl 	DEVMETHOD_END
106b4dbc599SNathan Whitehorn };
107b4dbc599SNathan Whitehorn 
108b4dbc599SNathan Whitehorn static driver_t cuda_driver = {
109b4dbc599SNathan Whitehorn 	"cuda",
110b4dbc599SNathan Whitehorn 	cuda_methods,
111b4dbc599SNathan Whitehorn 	sizeof(struct cuda_softc),
112b4dbc599SNathan Whitehorn };
113b4dbc599SNathan Whitehorn 
114992ae60bSJohn Baldwin DRIVER_MODULE(cuda, macio, cuda_driver, 0, 0);
11542f777fcSJohn Baldwin DRIVER_MODULE(adb, cuda, adb_driver, 0, 0);
116b4dbc599SNathan Whitehorn 
117b4dbc599SNathan Whitehorn static void cuda_intr(void *arg);
118b4dbc599SNathan Whitehorn static uint8_t cuda_read_reg(struct cuda_softc *sc, u_int offset);
119b4dbc599SNathan Whitehorn static void cuda_write_reg(struct cuda_softc *sc, u_int offset, uint8_t value);
120b4dbc599SNathan Whitehorn static void cuda_idle(struct cuda_softc *);
121b4dbc599SNathan Whitehorn static void cuda_tip(struct cuda_softc *);
122b4dbc599SNathan Whitehorn static void cuda_clear_tip(struct cuda_softc *);
123b4dbc599SNathan Whitehorn static void cuda_in(struct cuda_softc *);
124b4dbc599SNathan Whitehorn static void cuda_out(struct cuda_softc *);
125b4dbc599SNathan Whitehorn static void cuda_toggle_ack(struct cuda_softc *);
126b4dbc599SNathan Whitehorn static void cuda_ack_off(struct cuda_softc *);
127b4dbc599SNathan Whitehorn static int cuda_intr_state(struct cuda_softc *);
128b4dbc599SNathan Whitehorn 
129b4dbc599SNathan Whitehorn static int
130b4dbc599SNathan Whitehorn cuda_probe(device_t dev)
131b4dbc599SNathan Whitehorn {
132b4dbc599SNathan Whitehorn 	const char *type = ofw_bus_get_type(dev);
133b4dbc599SNathan Whitehorn 
134b4dbc599SNathan Whitehorn 	if (strcmp(type, "via-cuda") != 0)
135b4dbc599SNathan Whitehorn                 return (ENXIO);
136b4dbc599SNathan Whitehorn 
137b4dbc599SNathan Whitehorn 	device_set_desc(dev, CUDA_DEVSTR);
138b4dbc599SNathan Whitehorn 	return (0);
139b4dbc599SNathan Whitehorn }
140b4dbc599SNathan Whitehorn 
141b4dbc599SNathan Whitehorn static int
142b4dbc599SNathan Whitehorn cuda_attach(device_t dev)
143b4dbc599SNathan Whitehorn {
144b4dbc599SNathan Whitehorn 	struct cuda_softc *sc;
145b4dbc599SNathan Whitehorn 
146b4dbc599SNathan Whitehorn 	volatile int i;
147b4dbc599SNathan Whitehorn 	uint8_t reg;
148b4dbc599SNathan Whitehorn 	phandle_t node,child;
149b4dbc599SNathan Whitehorn 
150b4dbc599SNathan Whitehorn 	sc = device_get_softc(dev);
151b4dbc599SNathan Whitehorn 	sc->sc_dev = dev;
152b4dbc599SNathan Whitehorn 
153b4dbc599SNathan Whitehorn 	sc->sc_memrid = 0;
154b4dbc599SNathan Whitehorn 	sc->sc_memr = bus_alloc_resource_any(dev, SYS_RES_MEMORY,
155b4dbc599SNathan Whitehorn 	    &sc->sc_memrid, RF_ACTIVE);
156b4dbc599SNathan Whitehorn 
157b4dbc599SNathan Whitehorn 	if (sc->sc_memr == NULL) {
158b4dbc599SNathan Whitehorn 		device_printf(dev, "Could not alloc mem resource!\n");
159b4dbc599SNathan Whitehorn 		return (ENXIO);
160b4dbc599SNathan Whitehorn 	}
161b4dbc599SNathan Whitehorn 
162b4dbc599SNathan Whitehorn 	sc->sc_irqrid = 0;
163b4dbc599SNathan Whitehorn 	sc->sc_irq = bus_alloc_resource_any(dev, SYS_RES_IRQ, &sc->sc_irqrid,
164b4dbc599SNathan Whitehorn             	RF_ACTIVE);
165b4dbc599SNathan Whitehorn         if (sc->sc_irq == NULL) {
166b4dbc599SNathan Whitehorn                 device_printf(dev, "could not allocate interrupt\n");
167596e6adeSAlexander Motin                 bus_release_resource(dev, SYS_RES_MEMORY, sc->sc_memrid,
168596e6adeSAlexander Motin                     sc->sc_memr);
169b4dbc599SNathan Whitehorn                 return (ENXIO);
170b4dbc599SNathan Whitehorn         }
171b4dbc599SNathan Whitehorn 
172b4dbc599SNathan Whitehorn 	if (bus_setup_intr(dev, sc->sc_irq, INTR_TYPE_MISC | INTR_MPSAFE
173b4dbc599SNathan Whitehorn 	    | INTR_ENTROPY, NULL, cuda_intr, dev, &sc->sc_ih) != 0) {
174b4dbc599SNathan Whitehorn                 device_printf(dev, "could not setup interrupt\n");
175596e6adeSAlexander Motin                 bus_release_resource(dev, SYS_RES_MEMORY, sc->sc_memrid,
176596e6adeSAlexander Motin                     sc->sc_memr);
177b4dbc599SNathan Whitehorn                 bus_release_resource(dev, SYS_RES_IRQ, sc->sc_irqrid,
178b4dbc599SNathan Whitehorn                     sc->sc_irq);
179b4dbc599SNathan Whitehorn                 return (ENXIO);
180b4dbc599SNathan Whitehorn         }
181b4dbc599SNathan Whitehorn 
182b4dbc599SNathan Whitehorn 	mtx_init(&sc->sc_mutex,"cuda",NULL,MTX_DEF | MTX_RECURSE);
183b4dbc599SNathan Whitehorn 
184b4dbc599SNathan Whitehorn 	sc->sc_sent = 0;
185b4dbc599SNathan Whitehorn 	sc->sc_received = 0;
186b4dbc599SNathan Whitehorn 	sc->sc_waiting = 0;
187b4dbc599SNathan Whitehorn 	sc->sc_polling = 0;
188b4dbc599SNathan Whitehorn 	sc->sc_state = CUDA_NOTREADY;
189b4dbc599SNathan Whitehorn 	sc->sc_autopoll = 0;
1903df9e037SNathan Whitehorn 	sc->sc_rtc = -1;
191b4dbc599SNathan Whitehorn 
192582434bdSNathan Whitehorn 	STAILQ_INIT(&sc->sc_inq);
193582434bdSNathan Whitehorn 	STAILQ_INIT(&sc->sc_outq);
194011ad8e7SNathan Whitehorn 	STAILQ_INIT(&sc->sc_freeq);
195011ad8e7SNathan Whitehorn 
196011ad8e7SNathan Whitehorn 	for (i = 0; i < CUDA_MAXPACKETS; i++)
197011ad8e7SNathan Whitehorn 		STAILQ_INSERT_TAIL(&sc->sc_freeq, &sc->sc_pkts[i], pkt_q);
198582434bdSNathan Whitehorn 
199b4dbc599SNathan Whitehorn 	/* Init CUDA */
200b4dbc599SNathan Whitehorn 
201b4dbc599SNathan Whitehorn 	reg = cuda_read_reg(sc, vDirB);
202b4dbc599SNathan Whitehorn 	reg |= 0x30;	/* register B bits 4 and 5: outputs */
203b4dbc599SNathan Whitehorn 	cuda_write_reg(sc, vDirB, reg);
204b4dbc599SNathan Whitehorn 
205b4dbc599SNathan Whitehorn 	reg = cuda_read_reg(sc, vDirB);
206b4dbc599SNathan Whitehorn 	reg &= 0xf7;	/* register B bit 3: input */
207b4dbc599SNathan Whitehorn 	cuda_write_reg(sc, vDirB, reg);
208b4dbc599SNathan Whitehorn 
209b4dbc599SNathan Whitehorn 	reg = cuda_read_reg(sc, vACR);
210b4dbc599SNathan Whitehorn 	reg &= ~vSR_OUT;	/* make sure SR is set to IN */
211b4dbc599SNathan Whitehorn 	cuda_write_reg(sc, vACR, reg);
212b4dbc599SNathan Whitehorn 
213b4dbc599SNathan Whitehorn 	cuda_write_reg(sc, vACR, (cuda_read_reg(sc, vACR) | 0x0c) & ~0x10);
214b4dbc599SNathan Whitehorn 
215b4dbc599SNathan Whitehorn 	sc->sc_state = CUDA_IDLE;	/* used by all types of hardware */
216b4dbc599SNathan Whitehorn 
217b4dbc599SNathan Whitehorn 	cuda_write_reg(sc, vIER, 0x84); /* make sure VIA interrupts are on */
218b4dbc599SNathan Whitehorn 
219b4dbc599SNathan Whitehorn 	cuda_idle(sc);	/* reset ADB */
220b4dbc599SNathan Whitehorn 
221b4dbc599SNathan Whitehorn 	/* Reset CUDA */
222b4dbc599SNathan Whitehorn 
223b4dbc599SNathan Whitehorn 	i = cuda_read_reg(sc, vSR);	/* clear interrupt */
224b4dbc599SNathan Whitehorn 	cuda_write_reg(sc, vIER, 0x04); /* no interrupts while clearing */
225b4dbc599SNathan Whitehorn 	cuda_idle(sc);	/* reset state to idle */
226b4dbc599SNathan Whitehorn 	DELAY(150);
227b4dbc599SNathan Whitehorn 	cuda_tip(sc);	/* signal start of frame */
228b4dbc599SNathan Whitehorn 	DELAY(150);
229b4dbc599SNathan Whitehorn 	cuda_toggle_ack(sc);
230b4dbc599SNathan Whitehorn 	DELAY(150);
231b4dbc599SNathan Whitehorn 	cuda_clear_tip(sc);
232b4dbc599SNathan Whitehorn 	DELAY(150);
233b4dbc599SNathan Whitehorn 	cuda_idle(sc);	/* back to idle state */
234b4dbc599SNathan Whitehorn 	i = cuda_read_reg(sc, vSR);	/* clear interrupt */
235b4dbc599SNathan Whitehorn 	cuda_write_reg(sc, vIER, 0x84);	/* ints ok now */
236b4dbc599SNathan Whitehorn 
237b4dbc599SNathan Whitehorn 	/* Initialize child buses (ADB) */
238b4dbc599SNathan Whitehorn 	node = ofw_bus_get_node(dev);
239b4dbc599SNathan Whitehorn 
240b4dbc599SNathan Whitehorn 	for (child = OF_child(node); child != 0; child = OF_peer(child)) {
241b4dbc599SNathan Whitehorn 		char name[32];
242b4dbc599SNathan Whitehorn 
243b4dbc599SNathan Whitehorn 		memset(name, 0, sizeof(name));
244b4dbc599SNathan Whitehorn 		OF_getprop(child, "name", name, sizeof(name));
245b4dbc599SNathan Whitehorn 
246b4dbc599SNathan Whitehorn 		if (bootverbose)
247b4dbc599SNathan Whitehorn 			device_printf(dev, "CUDA child <%s>\n",name);
248b4dbc599SNathan Whitehorn 
249b4dbc599SNathan Whitehorn 		if (strncmp(name, "adb", 4) == 0) {
250b4dbc599SNathan Whitehorn 			sc->adb_bus = device_add_child(dev,"adb",-1);
251b4dbc599SNathan Whitehorn 		}
252b4dbc599SNathan Whitehorn 	}
253b4dbc599SNathan Whitehorn 
2543df9e037SNathan Whitehorn 	clock_register(dev, 1000);
255b2a237beSNathan Whitehorn 	EVENTHANDLER_REGISTER(shutdown_final, cuda_shutdown, sc,
256b2a237beSNathan Whitehorn 	    SHUTDOWN_PRI_LAST);
2573df9e037SNathan Whitehorn 
258b4dbc599SNathan Whitehorn 	return (bus_generic_attach(dev));
259b4dbc599SNathan Whitehorn }
260b4dbc599SNathan Whitehorn 
261b4dbc599SNathan Whitehorn static int cuda_detach(device_t dev) {
262b4dbc599SNathan Whitehorn 	struct cuda_softc *sc;
263b4dbc599SNathan Whitehorn 
264b4dbc599SNathan Whitehorn 	sc = device_get_softc(dev);
265b4dbc599SNathan Whitehorn 
266b4dbc599SNathan Whitehorn 	bus_teardown_intr(dev, sc->sc_irq, sc->sc_ih);
267b4dbc599SNathan Whitehorn 	bus_release_resource(dev, SYS_RES_IRQ, sc->sc_irqrid, sc->sc_irq);
268b4dbc599SNathan Whitehorn 	bus_release_resource(dev, SYS_RES_MEMORY, sc->sc_memrid, sc->sc_memr);
269b4dbc599SNathan Whitehorn 	mtx_destroy(&sc->sc_mutex);
270b4dbc599SNathan Whitehorn 
271b4dbc599SNathan Whitehorn 	return (bus_generic_detach(dev));
272b4dbc599SNathan Whitehorn }
273b4dbc599SNathan Whitehorn 
274b4dbc599SNathan Whitehorn static uint8_t
275b4dbc599SNathan Whitehorn cuda_read_reg(struct cuda_softc *sc, u_int offset) {
276b4dbc599SNathan Whitehorn 	return (bus_read_1(sc->sc_memr, offset));
277b4dbc599SNathan Whitehorn }
278b4dbc599SNathan Whitehorn 
279b4dbc599SNathan Whitehorn static void
280b4dbc599SNathan Whitehorn cuda_write_reg(struct cuda_softc *sc, u_int offset, uint8_t value) {
281b4dbc599SNathan Whitehorn 	bus_write_1(sc->sc_memr, offset, value);
282b4dbc599SNathan Whitehorn }
283b4dbc599SNathan Whitehorn 
284b4dbc599SNathan Whitehorn static void
285b4dbc599SNathan Whitehorn cuda_idle(struct cuda_softc *sc)
286b4dbc599SNathan Whitehorn {
287b4dbc599SNathan Whitehorn 	uint8_t reg;
288b4dbc599SNathan Whitehorn 
289b4dbc599SNathan Whitehorn 	reg = cuda_read_reg(sc, vBufB);
290b4dbc599SNathan Whitehorn 	reg |= (vPB4 | vPB5);
291b4dbc599SNathan Whitehorn 	cuda_write_reg(sc, vBufB, reg);
292b4dbc599SNathan Whitehorn }
293b4dbc599SNathan Whitehorn 
294b4dbc599SNathan Whitehorn static void
295b4dbc599SNathan Whitehorn cuda_tip(struct cuda_softc *sc)
296b4dbc599SNathan Whitehorn {
297b4dbc599SNathan Whitehorn 	uint8_t reg;
298b4dbc599SNathan Whitehorn 
299b4dbc599SNathan Whitehorn 	reg = cuda_read_reg(sc, vBufB);
300b4dbc599SNathan Whitehorn 	reg &= ~vPB5;
301b4dbc599SNathan Whitehorn 	cuda_write_reg(sc, vBufB, reg);
302b4dbc599SNathan Whitehorn }
303b4dbc599SNathan Whitehorn 
304b4dbc599SNathan Whitehorn static void
305b4dbc599SNathan Whitehorn cuda_clear_tip(struct cuda_softc *sc)
306b4dbc599SNathan Whitehorn {
307b4dbc599SNathan Whitehorn 	uint8_t reg;
308b4dbc599SNathan Whitehorn 
309b4dbc599SNathan Whitehorn 	reg = cuda_read_reg(sc, vBufB);
310b4dbc599SNathan Whitehorn 	reg |= vPB5;
311b4dbc599SNathan Whitehorn 	cuda_write_reg(sc, vBufB, reg);
312b4dbc599SNathan Whitehorn }
313b4dbc599SNathan Whitehorn 
314b4dbc599SNathan Whitehorn static void
315b4dbc599SNathan Whitehorn cuda_in(struct cuda_softc *sc)
316b4dbc599SNathan Whitehorn {
317b4dbc599SNathan Whitehorn 	uint8_t reg;
318b4dbc599SNathan Whitehorn 
319b4dbc599SNathan Whitehorn 	reg = cuda_read_reg(sc, vACR);
320b4dbc599SNathan Whitehorn 	reg &= ~vSR_OUT;
321b4dbc599SNathan Whitehorn 	cuda_write_reg(sc, vACR, reg);
322b4dbc599SNathan Whitehorn }
323b4dbc599SNathan Whitehorn 
324b4dbc599SNathan Whitehorn static void
325b4dbc599SNathan Whitehorn cuda_out(struct cuda_softc *sc)
326b4dbc599SNathan Whitehorn {
327b4dbc599SNathan Whitehorn 	uint8_t reg;
328b4dbc599SNathan Whitehorn 
329b4dbc599SNathan Whitehorn 	reg = cuda_read_reg(sc, vACR);
330b4dbc599SNathan Whitehorn 	reg |= vSR_OUT;
331b4dbc599SNathan Whitehorn 	cuda_write_reg(sc, vACR, reg);
332b4dbc599SNathan Whitehorn }
333b4dbc599SNathan Whitehorn 
334b4dbc599SNathan Whitehorn static void
335b4dbc599SNathan Whitehorn cuda_toggle_ack(struct cuda_softc *sc)
336b4dbc599SNathan Whitehorn {
337b4dbc599SNathan Whitehorn 	uint8_t reg;
338b4dbc599SNathan Whitehorn 
339b4dbc599SNathan Whitehorn 	reg = cuda_read_reg(sc, vBufB);
340b4dbc599SNathan Whitehorn 	reg ^= vPB4;
341b4dbc599SNathan Whitehorn 	cuda_write_reg(sc, vBufB, reg);
342b4dbc599SNathan Whitehorn }
343b4dbc599SNathan Whitehorn 
344b4dbc599SNathan Whitehorn static void
345b4dbc599SNathan Whitehorn cuda_ack_off(struct cuda_softc *sc)
346b4dbc599SNathan Whitehorn {
347b4dbc599SNathan Whitehorn 	uint8_t reg;
348b4dbc599SNathan Whitehorn 
349b4dbc599SNathan Whitehorn 	reg = cuda_read_reg(sc, vBufB);
350b4dbc599SNathan Whitehorn 	reg |= vPB4;
351b4dbc599SNathan Whitehorn 	cuda_write_reg(sc, vBufB, reg);
352b4dbc599SNathan Whitehorn }
353b4dbc599SNathan Whitehorn 
354b4dbc599SNathan Whitehorn static int
355b4dbc599SNathan Whitehorn cuda_intr_state(struct cuda_softc *sc)
356b4dbc599SNathan Whitehorn {
357b4dbc599SNathan Whitehorn 	return ((cuda_read_reg(sc, vBufB) & vPB3) == 0);
358b4dbc599SNathan Whitehorn }
359b4dbc599SNathan Whitehorn 
360b4dbc599SNathan Whitehorn static int
361b4dbc599SNathan Whitehorn cuda_send(void *cookie, int poll, int length, uint8_t *msg)
362b4dbc599SNathan Whitehorn {
363b4dbc599SNathan Whitehorn 	struct cuda_softc *sc = cookie;
364b4dbc599SNathan Whitehorn 	device_t dev = sc->sc_dev;
365582434bdSNathan Whitehorn 	struct cuda_packet *pkt;
366b4dbc599SNathan Whitehorn 
367b4dbc599SNathan Whitehorn 	if (sc->sc_state == CUDA_NOTREADY)
368582434bdSNathan Whitehorn 		return (-1);
369b4dbc599SNathan Whitehorn 
370b4dbc599SNathan Whitehorn 	mtx_lock(&sc->sc_mutex);
371b4dbc599SNathan Whitehorn 
372011ad8e7SNathan Whitehorn 	pkt = STAILQ_FIRST(&sc->sc_freeq);
373011ad8e7SNathan Whitehorn 	if (pkt == NULL) {
374011ad8e7SNathan Whitehorn 		mtx_unlock(&sc->sc_mutex);
375011ad8e7SNathan Whitehorn 		return (-1);
376011ad8e7SNathan Whitehorn 	}
377011ad8e7SNathan Whitehorn 
378582434bdSNathan Whitehorn 	pkt->len = length - 1;
379582434bdSNathan Whitehorn 	pkt->type = msg[0];
380582434bdSNathan Whitehorn 	memcpy(pkt->data, &msg[1], pkt->len);
381582434bdSNathan Whitehorn 
382011ad8e7SNathan Whitehorn 	STAILQ_REMOVE_HEAD(&sc->sc_freeq, pkt_q);
383582434bdSNathan Whitehorn 	STAILQ_INSERT_TAIL(&sc->sc_outq, pkt, pkt_q);
384582434bdSNathan Whitehorn 
385582434bdSNathan Whitehorn 	/*
386582434bdSNathan Whitehorn 	 * If we already are sending a packet, we should bail now that this
387582434bdSNathan Whitehorn 	 * one has been added to the queue.
388582434bdSNathan Whitehorn 	 */
389582434bdSNathan Whitehorn 
390582434bdSNathan Whitehorn 	if (sc->sc_waiting) {
391b4dbc599SNathan Whitehorn 		mtx_unlock(&sc->sc_mutex);
392582434bdSNathan Whitehorn 		return (0);
393b4dbc599SNathan Whitehorn 	}
394b4dbc599SNathan Whitehorn 
395582434bdSNathan Whitehorn 	cuda_send_outbound(sc);
396582434bdSNathan Whitehorn 	mtx_unlock(&sc->sc_mutex);
397582434bdSNathan Whitehorn 
398582434bdSNathan Whitehorn 	if (sc->sc_polling || poll || cold)
399582434bdSNathan Whitehorn 		cuda_poll(dev);
400582434bdSNathan Whitehorn 
401582434bdSNathan Whitehorn 	return (0);
402582434bdSNathan Whitehorn }
403582434bdSNathan Whitehorn 
404582434bdSNathan Whitehorn static void
405582434bdSNathan Whitehorn cuda_send_outbound(struct cuda_softc *sc)
406582434bdSNathan Whitehorn {
407582434bdSNathan Whitehorn 	struct cuda_packet *pkt;
408582434bdSNathan Whitehorn 
409582434bdSNathan Whitehorn 	mtx_assert(&sc->sc_mutex, MA_OWNED);
410582434bdSNathan Whitehorn 
411582434bdSNathan Whitehorn 	pkt = STAILQ_FIRST(&sc->sc_outq);
412582434bdSNathan Whitehorn 	if (pkt == NULL)
413582434bdSNathan Whitehorn 		return;
414582434bdSNathan Whitehorn 
415582434bdSNathan Whitehorn 	sc->sc_out_length = pkt->len + 1;
416582434bdSNathan Whitehorn 	memcpy(sc->sc_out, &pkt->type, pkt->len + 1);
417b4dbc599SNathan Whitehorn 	sc->sc_sent = 0;
418b4dbc599SNathan Whitehorn 
419582434bdSNathan Whitehorn 	STAILQ_REMOVE_HEAD(&sc->sc_outq, pkt_q);
420011ad8e7SNathan Whitehorn 	STAILQ_INSERT_TAIL(&sc->sc_freeq, pkt, pkt_q);
421582434bdSNathan Whitehorn 
422582434bdSNathan Whitehorn 	sc->sc_waiting = 1;
423582434bdSNathan Whitehorn 
424582434bdSNathan Whitehorn 	cuda_poll(sc->sc_dev);
425582434bdSNathan Whitehorn 
426b4dbc599SNathan Whitehorn 	DELAY(150);
427582434bdSNathan Whitehorn 
428582434bdSNathan Whitehorn 	if (sc->sc_state == CUDA_IDLE && !cuda_intr_state(sc)) {
429b4dbc599SNathan Whitehorn 		sc->sc_state = CUDA_OUT;
430b4dbc599SNathan Whitehorn 		cuda_out(sc);
431b4dbc599SNathan Whitehorn 		cuda_write_reg(sc, vSR, sc->sc_out[0]);
432b4dbc599SNathan Whitehorn 		cuda_ack_off(sc);
433b4dbc599SNathan Whitehorn 		cuda_tip(sc);
434b4dbc599SNathan Whitehorn 	}
435b4dbc599SNathan Whitehorn }
436b4dbc599SNathan Whitehorn 
437582434bdSNathan Whitehorn static void
438582434bdSNathan Whitehorn cuda_send_inbound(struct cuda_softc *sc)
439582434bdSNathan Whitehorn {
440582434bdSNathan Whitehorn 	device_t dev;
441582434bdSNathan Whitehorn 	struct cuda_packet *pkt;
442582434bdSNathan Whitehorn 
443582434bdSNathan Whitehorn 	dev = sc->sc_dev;
444582434bdSNathan Whitehorn 
445582434bdSNathan Whitehorn 	mtx_lock(&sc->sc_mutex);
446582434bdSNathan Whitehorn 
447582434bdSNathan Whitehorn 	while ((pkt = STAILQ_FIRST(&sc->sc_inq)) != NULL) {
448582434bdSNathan Whitehorn 		STAILQ_REMOVE_HEAD(&sc->sc_inq, pkt_q);
449582434bdSNathan Whitehorn 
450582434bdSNathan Whitehorn 		mtx_unlock(&sc->sc_mutex);
451582434bdSNathan Whitehorn 
452582434bdSNathan Whitehorn 		/* check if we have a handler for this message */
453582434bdSNathan Whitehorn 		switch (pkt->type) {
454582434bdSNathan Whitehorn 		   case CUDA_ADB:
455582434bdSNathan Whitehorn 			if (pkt->len > 2) {
456582434bdSNathan Whitehorn 				adb_receive_raw_packet(sc->adb_bus,
457582434bdSNathan Whitehorn 				    pkt->data[0],pkt->data[1],
458582434bdSNathan Whitehorn 				    pkt->len - 2,&pkt->data[2]);
459582434bdSNathan Whitehorn 			} else {
460582434bdSNathan Whitehorn 				adb_receive_raw_packet(sc->adb_bus,
461582434bdSNathan Whitehorn 				    pkt->data[0],pkt->data[1],0,NULL);
462582434bdSNathan Whitehorn 			}
463582434bdSNathan Whitehorn 			break;
464582434bdSNathan Whitehorn 		   case CUDA_PSEUDO:
465582434bdSNathan Whitehorn 			mtx_lock(&sc->sc_mutex);
4663df9e037SNathan Whitehorn 			switch (pkt->data[1]) {
4673df9e037SNathan Whitehorn 			case CMD_AUTOPOLL:
468582434bdSNathan Whitehorn 				sc->sc_autopoll = 1;
4693df9e037SNathan Whitehorn 				break;
4703df9e037SNathan Whitehorn 			case CMD_READ_RTC:
4713df9e037SNathan Whitehorn 				memcpy(&sc->sc_rtc, &pkt->data[2],
4723df9e037SNathan Whitehorn 				    sizeof(sc->sc_rtc));
4733df9e037SNathan Whitehorn 				wakeup(&sc->sc_rtc);
4743df9e037SNathan Whitehorn 				break;
4753df9e037SNathan Whitehorn 			case CMD_WRITE_RTC:
4763df9e037SNathan Whitehorn 				break;
4773df9e037SNathan Whitehorn 			}
478582434bdSNathan Whitehorn 			mtx_unlock(&sc->sc_mutex);
479582434bdSNathan Whitehorn 			break;
480582434bdSNathan Whitehorn 		   case CUDA_ERROR:
481582434bdSNathan Whitehorn 			/*
482582434bdSNathan Whitehorn 			 * CUDA will throw errors if we miss a race between
483582434bdSNathan Whitehorn 			 * sending and receiving packets. This is already
484582434bdSNathan Whitehorn 			 * handled when we abort packet output to handle
485582434bdSNathan Whitehorn 			 * this packet in cuda_intr(). Thus, we ignore
486582434bdSNathan Whitehorn 			 * these messages.
487582434bdSNathan Whitehorn 			 */
488582434bdSNathan Whitehorn 			break;
489582434bdSNathan Whitehorn 		   default:
490582434bdSNathan Whitehorn 			device_printf(dev,"unknown CUDA command %d\n",
491582434bdSNathan Whitehorn 			    pkt->type);
492582434bdSNathan Whitehorn 			break;
493582434bdSNathan Whitehorn 		}
494582434bdSNathan Whitehorn 
495582434bdSNathan Whitehorn 		mtx_lock(&sc->sc_mutex);
496011ad8e7SNathan Whitehorn 
497011ad8e7SNathan Whitehorn 		STAILQ_INSERT_TAIL(&sc->sc_freeq, pkt, pkt_q);
498582434bdSNathan Whitehorn 	}
499582434bdSNathan Whitehorn 
500582434bdSNathan Whitehorn 	mtx_unlock(&sc->sc_mutex);
501b4dbc599SNathan Whitehorn }
502b4dbc599SNathan Whitehorn 
50365f44679SAndriy Gapon static u_int
504b4dbc599SNathan Whitehorn cuda_poll(device_t dev)
505b4dbc599SNathan Whitehorn {
506b4dbc599SNathan Whitehorn 	struct cuda_softc *sc = device_get_softc(dev);
507b4dbc599SNathan Whitehorn 
50801418697SNathan Whitehorn 	if (sc->sc_state == CUDA_IDLE && !cuda_intr_state(sc) &&
50901418697SNathan Whitehorn 	    !sc->sc_waiting)
51065f44679SAndriy Gapon 		return (0);
51101418697SNathan Whitehorn 
512b4dbc599SNathan Whitehorn 	cuda_intr(dev);
51365f44679SAndriy Gapon 	return (0);
514b4dbc599SNathan Whitehorn }
515b4dbc599SNathan Whitehorn 
516b4dbc599SNathan Whitehorn static void
517b4dbc599SNathan Whitehorn cuda_intr(void *arg)
518b4dbc599SNathan Whitehorn {
519b4dbc599SNathan Whitehorn 	device_t        dev;
520b4dbc599SNathan Whitehorn 	struct cuda_softc *sc;
5219c861e93SJohn Baldwin 	int ending, process_inbound;
522b4dbc599SNathan Whitehorn 	uint8_t reg;
523b4dbc599SNathan Whitehorn 
524b4dbc599SNathan Whitehorn         dev = (device_t)arg;
525b4dbc599SNathan Whitehorn 	sc = device_get_softc(dev);
526b4dbc599SNathan Whitehorn 
527b4dbc599SNathan Whitehorn 	mtx_lock(&sc->sc_mutex);
528b4dbc599SNathan Whitehorn 
529582434bdSNathan Whitehorn 	process_inbound = 0;
530b4dbc599SNathan Whitehorn 	reg = cuda_read_reg(sc, vIFR);
531582434bdSNathan Whitehorn 	if ((reg & vSR_INT) != vSR_INT) {
532582434bdSNathan Whitehorn 		mtx_unlock(&sc->sc_mutex);
533582434bdSNathan Whitehorn 		return;
534582434bdSNathan Whitehorn 	}
535582434bdSNathan Whitehorn 
536b4dbc599SNathan Whitehorn 	cuda_write_reg(sc, vIFR, 0x7f);	/* Clear interrupt */
537b4dbc599SNathan Whitehorn 
538b4dbc599SNathan Whitehorn switch_start:
539b4dbc599SNathan Whitehorn 	switch (sc->sc_state) {
540b4dbc599SNathan Whitehorn 	case CUDA_IDLE:
541b4dbc599SNathan Whitehorn 		/*
542b4dbc599SNathan Whitehorn 		 * This is an unexpected packet, so grab the first (dummy)
543b4dbc599SNathan Whitehorn 		 * byte, set up the proper vars, and tell the chip we are
544b4dbc599SNathan Whitehorn 		 * starting to receive the packet by setting the TIP bit.
545b4dbc599SNathan Whitehorn 		 */
546b4dbc599SNathan Whitehorn 		sc->sc_in[1] = cuda_read_reg(sc, vSR);
547b4dbc599SNathan Whitehorn 
548b4dbc599SNathan Whitehorn 		if (cuda_intr_state(sc) == 0) {
549b4dbc599SNathan Whitehorn 			/* must have been a fake start */
550b4dbc599SNathan Whitehorn 
551b4dbc599SNathan Whitehorn 			if (sc->sc_waiting) {
552b4dbc599SNathan Whitehorn 				/* start over */
553b4dbc599SNathan Whitehorn 				DELAY(150);
554b4dbc599SNathan Whitehorn 				sc->sc_state = CUDA_OUT;
555b4dbc599SNathan Whitehorn 				sc->sc_sent = 0;
556b4dbc599SNathan Whitehorn 				cuda_out(sc);
557b4dbc599SNathan Whitehorn 				cuda_write_reg(sc, vSR, sc->sc_out[1]);
558b4dbc599SNathan Whitehorn 				cuda_ack_off(sc);
559b4dbc599SNathan Whitehorn 				cuda_tip(sc);
560b4dbc599SNathan Whitehorn 			}
561b4dbc599SNathan Whitehorn 			break;
562b4dbc599SNathan Whitehorn 		}
563b4dbc599SNathan Whitehorn 
564b4dbc599SNathan Whitehorn 		cuda_in(sc);
565b4dbc599SNathan Whitehorn 		cuda_tip(sc);
566b4dbc599SNathan Whitehorn 
567b4dbc599SNathan Whitehorn 		sc->sc_received = 1;
568b4dbc599SNathan Whitehorn 		sc->sc_state = CUDA_IN;
569b4dbc599SNathan Whitehorn 		break;
570b4dbc599SNathan Whitehorn 
571b4dbc599SNathan Whitehorn 	case CUDA_IN:
572b4dbc599SNathan Whitehorn 		sc->sc_in[sc->sc_received] = cuda_read_reg(sc, vSR);
573b4dbc599SNathan Whitehorn 		ending = 0;
574b4dbc599SNathan Whitehorn 
575b4dbc599SNathan Whitehorn 		if (sc->sc_received > 255) {
576b4dbc599SNathan Whitehorn 			/* bitch only once */
577b4dbc599SNathan Whitehorn 			if (sc->sc_received == 256) {
578b4dbc599SNathan Whitehorn 				device_printf(dev,"input overflow\n");
579b4dbc599SNathan Whitehorn 				ending = 1;
580b4dbc599SNathan Whitehorn 			}
581b4dbc599SNathan Whitehorn 		} else
582b4dbc599SNathan Whitehorn 			sc->sc_received++;
583b4dbc599SNathan Whitehorn 
584b4dbc599SNathan Whitehorn 		/* intr off means this is the last byte (end of frame) */
585b4dbc599SNathan Whitehorn 		if (cuda_intr_state(sc) == 0) {
586b4dbc599SNathan Whitehorn 			ending = 1;
587b4dbc599SNathan Whitehorn 		} else {
588b4dbc599SNathan Whitehorn 			cuda_toggle_ack(sc);
589b4dbc599SNathan Whitehorn 		}
590b4dbc599SNathan Whitehorn 
591b4dbc599SNathan Whitehorn 		if (ending == 1) {	/* end of message? */
592582434bdSNathan Whitehorn 			struct cuda_packet *pkt;
593b4dbc599SNathan Whitehorn 
594b4dbc599SNathan Whitehorn 			/* reset vars and signal the end of this frame */
595b4dbc599SNathan Whitehorn 			cuda_idle(sc);
596b4dbc599SNathan Whitehorn 
597582434bdSNathan Whitehorn 			/* Queue up the packet */
598011ad8e7SNathan Whitehorn 			pkt = STAILQ_FIRST(&sc->sc_freeq);
599011ad8e7SNathan Whitehorn 			if (pkt != NULL) {
600011ad8e7SNathan Whitehorn 				/* If we have a free packet, process it */
601b4dbc599SNathan Whitehorn 
602582434bdSNathan Whitehorn 				pkt->len = sc->sc_received - 2;
603582434bdSNathan Whitehorn 				pkt->type = sc->sc_in[1];
604582434bdSNathan Whitehorn 				memcpy(pkt->data, &sc->sc_in[2], pkt->len);
605582434bdSNathan Whitehorn 
606011ad8e7SNathan Whitehorn 				STAILQ_REMOVE_HEAD(&sc->sc_freeq, pkt_q);
607582434bdSNathan Whitehorn 				STAILQ_INSERT_TAIL(&sc->sc_inq, pkt, pkt_q);
608b4dbc599SNathan Whitehorn 
609011ad8e7SNathan Whitehorn 				process_inbound = 1;
610011ad8e7SNathan Whitehorn 			}
611011ad8e7SNathan Whitehorn 
612b4dbc599SNathan Whitehorn 			sc->sc_state = CUDA_IDLE;
613b4dbc599SNathan Whitehorn 			sc->sc_received = 0;
614b4dbc599SNathan Whitehorn 
615b4dbc599SNathan Whitehorn 			/*
616b4dbc599SNathan Whitehorn 			 * If there is something waiting to be sent out,
617b4dbc599SNathan Whitehorn 			 * set everything up and send the first byte.
618b4dbc599SNathan Whitehorn 			 */
619b4dbc599SNathan Whitehorn 			if (sc->sc_waiting == 1) {
620b4dbc599SNathan Whitehorn 				DELAY(1500);	/* required */
621b4dbc599SNathan Whitehorn 				sc->sc_sent = 0;
622b4dbc599SNathan Whitehorn 				sc->sc_state = CUDA_OUT;
623b4dbc599SNathan Whitehorn 
624b4dbc599SNathan Whitehorn 				/*
625b4dbc599SNathan Whitehorn 				 * If the interrupt is on, we were too slow
626b4dbc599SNathan Whitehorn 				 * and the chip has already started to send
627b4dbc599SNathan Whitehorn 				 * something to us, so back out of the write
628b4dbc599SNathan Whitehorn 				 * and start a read cycle.
629b4dbc599SNathan Whitehorn 				 */
630b4dbc599SNathan Whitehorn 				if (cuda_intr_state(sc)) {
631b4dbc599SNathan Whitehorn 					cuda_in(sc);
632b4dbc599SNathan Whitehorn 					cuda_idle(sc);
633b4dbc599SNathan Whitehorn 					sc->sc_sent = 0;
634b4dbc599SNathan Whitehorn 					sc->sc_state = CUDA_IDLE;
635b4dbc599SNathan Whitehorn 					sc->sc_received = 0;
636b4dbc599SNathan Whitehorn 					DELAY(150);
637b4dbc599SNathan Whitehorn 					goto switch_start;
638b4dbc599SNathan Whitehorn 				}
639582434bdSNathan Whitehorn 
640b4dbc599SNathan Whitehorn 				/*
641b4dbc599SNathan Whitehorn 				 * If we got here, it's ok to start sending
642b4dbc599SNathan Whitehorn 				 * so load the first byte and tell the chip
643b4dbc599SNathan Whitehorn 				 * we want to send.
644b4dbc599SNathan Whitehorn 				 */
645b4dbc599SNathan Whitehorn 				cuda_out(sc);
646b4dbc599SNathan Whitehorn 				cuda_write_reg(sc, vSR,
647b4dbc599SNathan Whitehorn 				    sc->sc_out[sc->sc_sent]);
648b4dbc599SNathan Whitehorn 				cuda_ack_off(sc);
649b4dbc599SNathan Whitehorn 				cuda_tip(sc);
650b4dbc599SNathan Whitehorn 			}
651b4dbc599SNathan Whitehorn 		}
652b4dbc599SNathan Whitehorn 		break;
653b4dbc599SNathan Whitehorn 
654b4dbc599SNathan Whitehorn 	case CUDA_OUT:
6559c861e93SJohn Baldwin 		cuda_read_reg(sc, vSR);	/* reset SR-intr in IFR */
656b4dbc599SNathan Whitehorn 
657b4dbc599SNathan Whitehorn 		sc->sc_sent++;
658b4dbc599SNathan Whitehorn 		if (cuda_intr_state(sc)) {	/* ADB intr low during write */
659b4dbc599SNathan Whitehorn 			cuda_in(sc);	/* make sure SR is set to IN */
660b4dbc599SNathan Whitehorn 			cuda_idle(sc);
661b4dbc599SNathan Whitehorn 			sc->sc_sent = 0;	/* must start all over */
662b4dbc599SNathan Whitehorn 			sc->sc_state = CUDA_IDLE;	/* new state */
663b4dbc599SNathan Whitehorn 			sc->sc_received = 0;
664b4dbc599SNathan Whitehorn 			sc->sc_waiting = 1;	/* must retry when done with
665b4dbc599SNathan Whitehorn 						 * read */
666b4dbc599SNathan Whitehorn 			DELAY(150);
667b4dbc599SNathan Whitehorn 			goto switch_start;	/* process next state right
668b4dbc599SNathan Whitehorn 						 * now */
669b4dbc599SNathan Whitehorn 			break;
670b4dbc599SNathan Whitehorn 		}
671b4dbc599SNathan Whitehorn 		if (sc->sc_out_length == sc->sc_sent) {	/* check for done */
672b4dbc599SNathan Whitehorn 			sc->sc_waiting = 0;	/* done writing */
673b4dbc599SNathan Whitehorn 			sc->sc_state = CUDA_IDLE;	/* signal bus is idle */
674b4dbc599SNathan Whitehorn 			cuda_in(sc);
675b4dbc599SNathan Whitehorn 			cuda_idle(sc);
676b4dbc599SNathan Whitehorn 		} else {
677b4dbc599SNathan Whitehorn 			/* send next byte */
678b4dbc599SNathan Whitehorn 			cuda_write_reg(sc, vSR, sc->sc_out[sc->sc_sent]);
679b4dbc599SNathan Whitehorn 			cuda_toggle_ack(sc);	/* signal byte ready to
680b4dbc599SNathan Whitehorn 							 * shift */
681b4dbc599SNathan Whitehorn 		}
682b4dbc599SNathan Whitehorn 		break;
683b4dbc599SNathan Whitehorn 
684b4dbc599SNathan Whitehorn 	case CUDA_NOTREADY:
685b4dbc599SNathan Whitehorn 		break;
686b4dbc599SNathan Whitehorn 
687b4dbc599SNathan Whitehorn 	default:
688b4dbc599SNathan Whitehorn 		break;
689b4dbc599SNathan Whitehorn 	}
690b4dbc599SNathan Whitehorn 
691b4dbc599SNathan Whitehorn 	mtx_unlock(&sc->sc_mutex);
692582434bdSNathan Whitehorn 
693582434bdSNathan Whitehorn 	if (process_inbound)
694582434bdSNathan Whitehorn 		cuda_send_inbound(sc);
695582434bdSNathan Whitehorn 
696582434bdSNathan Whitehorn 	mtx_lock(&sc->sc_mutex);
697582434bdSNathan Whitehorn 	/* If we have another packet waiting, set it up */
698582434bdSNathan Whitehorn 	if (!sc->sc_waiting && sc->sc_state == CUDA_IDLE)
699582434bdSNathan Whitehorn 		cuda_send_outbound(sc);
700582434bdSNathan Whitehorn 
701582434bdSNathan Whitehorn 	mtx_unlock(&sc->sc_mutex);
702582434bdSNathan Whitehorn 
703b4dbc599SNathan Whitehorn }
704b4dbc599SNathan Whitehorn 
705b4dbc599SNathan Whitehorn static u_int
706582434bdSNathan Whitehorn cuda_adb_send(device_t dev, u_char command_byte, int len, u_char *data,
707582434bdSNathan Whitehorn     u_char poll)
708b4dbc599SNathan Whitehorn {
709b4dbc599SNathan Whitehorn 	struct cuda_softc *sc = device_get_softc(dev);
710b4dbc599SNathan Whitehorn 	uint8_t packet[16];
711582434bdSNathan Whitehorn 	int i;
712b4dbc599SNathan Whitehorn 
713b4dbc599SNathan Whitehorn 	/* construct an ADB command packet and send it */
714b4dbc599SNathan Whitehorn 	packet[0] = CUDA_ADB;
715b4dbc599SNathan Whitehorn 	packet[1] = command_byte;
716b4dbc599SNathan Whitehorn 	for (i = 0; i < len; i++)
717b4dbc599SNathan Whitehorn 		packet[i + 2] = data[i];
718b4dbc599SNathan Whitehorn 
719b4dbc599SNathan Whitehorn 	cuda_send(sc, poll, len + 2, packet);
720b4dbc599SNathan Whitehorn 
721582434bdSNathan Whitehorn 	return (0);
722b4dbc599SNathan Whitehorn }
723b4dbc599SNathan Whitehorn 
724b4dbc599SNathan Whitehorn static u_int
725b4dbc599SNathan Whitehorn cuda_adb_autopoll(device_t dev, uint16_t mask) {
726b4dbc599SNathan Whitehorn 	struct cuda_softc *sc = device_get_softc(dev);
727b4dbc599SNathan Whitehorn 
728b4dbc599SNathan Whitehorn 	uint8_t cmd[] = {CUDA_PSEUDO, CMD_AUTOPOLL, mask != 0};
729b4dbc599SNathan Whitehorn 
730b4dbc599SNathan Whitehorn 	mtx_lock(&sc->sc_mutex);
73101418697SNathan Whitehorn 
732b4dbc599SNathan Whitehorn 	if (cmd[2] == sc->sc_autopoll) {
733b4dbc599SNathan Whitehorn 		mtx_unlock(&sc->sc_mutex);
734582434bdSNathan Whitehorn 		return (0);
735b4dbc599SNathan Whitehorn 	}
736b4dbc599SNathan Whitehorn 
737b4dbc599SNathan Whitehorn 	sc->sc_autopoll = -1;
738582434bdSNathan Whitehorn 	cuda_send(sc, 1, 3, cmd);
739b4dbc599SNathan Whitehorn 
740b4dbc599SNathan Whitehorn 	mtx_unlock(&sc->sc_mutex);
741b4dbc599SNathan Whitehorn 
742582434bdSNathan Whitehorn 	return (0);
743b4dbc599SNathan Whitehorn }
744b4dbc599SNathan Whitehorn 
745b2a237beSNathan Whitehorn static void
746b2a237beSNathan Whitehorn cuda_shutdown(void *xsc, int howto)
747b2a237beSNathan Whitehorn {
748b2a237beSNathan Whitehorn 	struct cuda_softc *sc = xsc;
749b2a237beSNathan Whitehorn 	uint8_t cmd[] = {CUDA_PSEUDO, 0};
750b2a237beSNathan Whitehorn 
751*41e26e82SMitchell Horne 	if ((howto & RB_POWEROFF) != 0)
752*41e26e82SMitchell Horne 		cmd[1] = CMD_POWEROFF;
753*41e26e82SMitchell Horne 	else if ((howto & RB_HALT) == 0)
754*41e26e82SMitchell Horne 		cmd[1] = CMD_RESET;
755*41e26e82SMitchell Horne 	else
756*41e26e82SMitchell Horne 		return;
757*41e26e82SMitchell Horne 
758b2a237beSNathan Whitehorn 	cuda_poll(sc->sc_dev);
759b2a237beSNathan Whitehorn 	cuda_send(sc, 1, 2, cmd);
760b2a237beSNathan Whitehorn 
761b2a237beSNathan Whitehorn 	while (1)
762b2a237beSNathan Whitehorn 		cuda_poll(sc->sc_dev);
763b2a237beSNathan Whitehorn }
764b2a237beSNathan Whitehorn 
7653df9e037SNathan Whitehorn #define DIFF19041970	2082844800
7663df9e037SNathan Whitehorn 
7673df9e037SNathan Whitehorn static int
7683df9e037SNathan Whitehorn cuda_gettime(device_t dev, struct timespec *ts)
7693df9e037SNathan Whitehorn {
7703df9e037SNathan Whitehorn 	struct cuda_softc *sc = device_get_softc(dev);
7713df9e037SNathan Whitehorn 	uint8_t cmd[] = {CUDA_PSEUDO, CMD_READ_RTC};
7723df9e037SNathan Whitehorn 
7733df9e037SNathan Whitehorn 	mtx_lock(&sc->sc_mutex);
7743df9e037SNathan Whitehorn 	sc->sc_rtc = -1;
7753df9e037SNathan Whitehorn 	cuda_send(sc, 1, 2, cmd);
7763df9e037SNathan Whitehorn 	if (sc->sc_rtc == -1)
7773df9e037SNathan Whitehorn 		mtx_sleep(&sc->sc_rtc, &sc->sc_mutex, 0, "rtc", 100);
7783df9e037SNathan Whitehorn 
7793df9e037SNathan Whitehorn 	ts->tv_sec = sc->sc_rtc - DIFF19041970;
7803df9e037SNathan Whitehorn 	ts->tv_nsec = 0;
7813df9e037SNathan Whitehorn 	mtx_unlock(&sc->sc_mutex);
7823df9e037SNathan Whitehorn 
7833df9e037SNathan Whitehorn 	return (0);
7843df9e037SNathan Whitehorn }
7853df9e037SNathan Whitehorn 
7863df9e037SNathan Whitehorn static int
7873df9e037SNathan Whitehorn cuda_settime(device_t dev, struct timespec *ts)
7883df9e037SNathan Whitehorn {
7893df9e037SNathan Whitehorn 	struct cuda_softc *sc = device_get_softc(dev);
7903df9e037SNathan Whitehorn 	uint8_t cmd[] = {CUDA_PSEUDO, CMD_WRITE_RTC, 0, 0, 0, 0};
7913df9e037SNathan Whitehorn 	uint32_t sec;
7923df9e037SNathan Whitehorn 
7933df9e037SNathan Whitehorn 	sec = ts->tv_sec + DIFF19041970;
7943df9e037SNathan Whitehorn 	memcpy(&cmd[2], &sec, sizeof(sec));
7953df9e037SNathan Whitehorn 
7963df9e037SNathan Whitehorn 	mtx_lock(&sc->sc_mutex);
7973df9e037SNathan Whitehorn 	cuda_send(sc, 0, 6, cmd);
7983df9e037SNathan Whitehorn 	mtx_unlock(&sc->sc_mutex);
7993df9e037SNathan Whitehorn 
8003df9e037SNathan Whitehorn 	return (0);
8013df9e037SNathan Whitehorn }
802