uart_dev_adm5120.c revision 331722
1/* $NetBSD: uart.c,v 1.2 2007/03/23 20:05:47 dogcow Exp $ */
2
3/*-
4 * Copyright (c) 2007 Ruslan Ermilov and Vsevolod Lobko.
5 * Copyright (c) 2007 Oleksandr Tymoshenko.
6 * All rights reserved.
7 *
8 * Redistribution and use in source and binary forms, with or
9 * without modification, are permitted provided that the following
10 * conditions are met:
11 * 1. Redistributions of source code must retain the above copyright
12 *    notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above
14 *    copyright notice, this list of conditions and the following
15 *    disclaimer in the documentation and/or other materials provided
16 *    with the distribution.
17 * 3. The names of the authors may not be used to endorse or promote
18 *    products derived from this software without specific prior
19 *    written permission.
20 *
21 * THIS SOFTWARE IS PROVIDED BY THE AUTHORS ``AS IS'' AND ANY
22 * EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
23 * THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A
24 * PARTICULAR PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHORS
25 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY,
26 * OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
27 * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA,
28 * OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
29 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR
30 * TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT
31 * OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY
32 * OF SUCH DAMAGE.
33 */
34
35#include <sys/cdefs.h>
36__FBSDID("$FreeBSD: stable/11/sys/mips/adm5120/uart_dev_adm5120.c 331722 2018-03-29 02:50:57Z eadler $");
37
38#include <sys/param.h>
39#include <sys/systm.h>
40#include <sys/bus.h>
41#include <sys/conf.h>
42#include <machine/bus.h>
43
44#include <dev/uart/uart.h>
45#include <dev/uart/uart_cpu.h>
46#include <dev/uart/uart_bus.h>
47
48#include <mips/adm5120/uart_dev_adm5120.h>
49
50#include "uart_if.h"
51
52/*
53 * Low-level UART interface.
54 */
55static int adm5120_uart_probe(struct uart_bas *bas);
56static void adm5120_uart_init(struct uart_bas *bas, int, int, int, int);
57static void adm5120_uart_term(struct uart_bas *bas);
58static void adm5120_uart_putc(struct uart_bas *bas, int);
59static int adm5120_uart_rxready(struct uart_bas *bas);
60static int adm5120_uart_getc(struct uart_bas *bas, struct mtx *);
61
62static struct uart_ops uart_adm5120_uart_ops = {
63	.probe = adm5120_uart_probe,
64	.init = adm5120_uart_init,
65	.term = adm5120_uart_term,
66	.putc = adm5120_uart_putc,
67	.rxready = adm5120_uart_rxready,
68	.getc = adm5120_uart_getc,
69};
70
71static int
72adm5120_uart_probe(struct uart_bas *bas)
73{
74
75	return (0);
76}
77
78static void
79adm5120_uart_init(struct uart_bas *bas, int baudrate, int databits,
80    int stopbits, int parity)
81{
82
83	/* TODO: Set parameters for uart, meanwhile stick with 115200N1 */
84}
85
86static void
87adm5120_uart_term(struct uart_bas *bas)
88{
89
90}
91
92static void
93adm5120_uart_putc(struct uart_bas *bas, int c)
94{
95	char chr;
96	chr = c;
97	while (uart_getreg(bas, UART_FR_REG) & UART_FR_TX_FIFO_FULL)
98		;
99	uart_setreg(bas, UART_DR_REG, c);
100	while (uart_getreg(bas, UART_FR_REG) & UART_FR_BUSY)
101		;
102	uart_barrier(bas);
103}
104
105static int
106adm5120_uart_rxready(struct uart_bas *bas)
107{
108	if (uart_getreg(bas, UART_FR_REG) & UART_FR_RX_FIFO_EMPTY)
109		return (0);
110
111	return (1);
112}
113
114static int
115adm5120_uart_getc(struct uart_bas *bas, struct mtx *hwmtx)
116{
117	int c;
118
119	uart_lock(hwmtx);
120
121	while (uart_getreg(bas, UART_FR_REG) & UART_FR_RX_FIFO_EMPTY) {
122		uart_unlock(hwmtx);
123		DELAY(10);
124		uart_lock(hwmtx);
125	}
126
127	c = uart_getreg(bas, UART_DR_REG);
128
129	uart_unlock(hwmtx);
130
131	return (c);
132}
133
134/*
135 * High-level UART interface.
136 */
137struct adm5120_uart_softc {
138	struct uart_softc base;
139};
140
141static int adm5120_uart_bus_attach(struct uart_softc *);
142static int adm5120_uart_bus_detach(struct uart_softc *);
143static int adm5120_uart_bus_flush(struct uart_softc *, int);
144static int adm5120_uart_bus_getsig(struct uart_softc *);
145static int adm5120_uart_bus_ioctl(struct uart_softc *, int, intptr_t);
146static int adm5120_uart_bus_ipend(struct uart_softc *);
147static int adm5120_uart_bus_param(struct uart_softc *, int, int, int, int);
148static int adm5120_uart_bus_probe(struct uart_softc *);
149static int adm5120_uart_bus_receive(struct uart_softc *);
150static int adm5120_uart_bus_setsig(struct uart_softc *, int);
151static int adm5120_uart_bus_transmit(struct uart_softc *);
152static void adm5120_uart_bus_grab(struct uart_softc *);
153static void adm5120_uart_bus_ungrab(struct uart_softc *);
154
155static kobj_method_t adm5120_uart_methods[] = {
156	KOBJMETHOD(uart_attach,		adm5120_uart_bus_attach),
157	KOBJMETHOD(uart_detach,		adm5120_uart_bus_detach),
158	KOBJMETHOD(uart_flush,		adm5120_uart_bus_flush),
159	KOBJMETHOD(uart_getsig,		adm5120_uart_bus_getsig),
160	KOBJMETHOD(uart_ioctl,		adm5120_uart_bus_ioctl),
161	KOBJMETHOD(uart_ipend,		adm5120_uart_bus_ipend),
162	KOBJMETHOD(uart_param,		adm5120_uart_bus_param),
163	KOBJMETHOD(uart_probe,		adm5120_uart_bus_probe),
164	KOBJMETHOD(uart_receive,	adm5120_uart_bus_receive),
165	KOBJMETHOD(uart_setsig,		adm5120_uart_bus_setsig),
166	KOBJMETHOD(uart_transmit,	adm5120_uart_bus_transmit),
167	KOBJMETHOD(uart_grab,		adm5120_uart_bus_grab),
168	KOBJMETHOD(uart_ungrab,		adm5120_uart_bus_ungrab),
169	{ 0, 0 }
170};
171
172struct uart_class uart_adm5120_uart_class = {
173	"adm5120",
174	adm5120_uart_methods,
175	sizeof(struct adm5120_uart_softc),
176	.uc_ops = &uart_adm5120_uart_ops,
177	.uc_range = 1, /* use hinted range */
178	.uc_rclk = 62500000,
179	.uc_rshift = 0
180};
181
182#define	SIGCHG(c, i, s, d)				\
183	if (c) {					\
184		i |= (i & s) ? s : s | d;		\
185	} else {					\
186		i = (i & s) ? (i & ~s) | d : i;		\
187	}
188
189/*
190 * Disable TX interrupt. uart should be locked
191 */
192static __inline void
193adm5120_uart_disable_txintr(struct uart_softc *sc)
194{
195	uint8_t cr;
196
197	cr = uart_getreg(&sc->sc_bas, UART_CR_REG);
198	cr &= ~UART_CR_TX_INT_EN;
199	uart_setreg(&sc->sc_bas, UART_CR_REG, cr);
200}
201
202/*
203 * Enable TX interrupt. uart should be locked
204 */
205static __inline void
206adm5120_uart_enable_txintr(struct uart_softc *sc)
207{
208	uint8_t cr;
209
210	cr = uart_getreg(&sc->sc_bas, UART_CR_REG);
211	cr |= UART_CR_TX_INT_EN;
212	uart_setreg(&sc->sc_bas, UART_CR_REG, cr);
213}
214
215static int
216adm5120_uart_bus_attach(struct uart_softc *sc)
217{
218	struct uart_bas *bas;
219	struct uart_devinfo *di;
220
221	bas = &sc->sc_bas;
222	if (sc->sc_sysdev != NULL) {
223		di = sc->sc_sysdev;
224		/* TODO: set parameters from di */
225	} else {
226		/* TODO: set parameters 115200, 8N1 */
227	}
228
229	(void)adm5120_uart_bus_getsig(sc);
230
231#if 1
232	/* Enable FIFO */
233	uart_setreg(bas, UART_LCR_H_REG,
234	    uart_getreg(bas, UART_LCR_H_REG) | UART_LCR_H_FEN);
235#endif
236	/* Enable interrupts */
237	uart_setreg(bas, UART_CR_REG,
238	    UART_CR_PORT_EN|UART_CR_RX_INT_EN|UART_CR_RX_TIMEOUT_INT_EN|
239	    UART_CR_MODEM_STATUS_INT_EN);
240
241	return (0);
242}
243
244static int
245adm5120_uart_bus_detach(struct uart_softc *sc)
246{
247
248	return (0);
249}
250
251static int
252adm5120_uart_bus_flush(struct uart_softc *sc, int what)
253{
254
255	return (0);
256}
257
258static int
259adm5120_uart_bus_getsig(struct uart_softc *sc)
260{
261	uint32_t new, old, sig;
262	uint8_t bes;
263
264	do {
265		old = sc->sc_hwsig;
266		sig = old;
267		uart_lock(sc->sc_hwmtx);
268		bes = uart_getreg(&sc->sc_bas, UART_FR_REG);
269		uart_unlock(sc->sc_hwmtx);
270		SIGCHG(bes & UART_FR_CTS, sig, SER_CTS, SER_DCTS);
271		SIGCHG(bes & UART_FR_DCD, sig, SER_DCD, SER_DDCD);
272		SIGCHG(bes & UART_FR_DSR, sig, SER_DSR, SER_DDSR);
273		new = sig & ~SER_MASK_DELTA;
274	} while (!atomic_cmpset_32(&sc->sc_hwsig, old, new));
275
276	return (sig);
277}
278
279static int
280adm5120_uart_bus_ioctl(struct uart_softc *sc, int request, intptr_t data)
281{
282	struct uart_bas *bas;
283	int baudrate, divisor, error;
284
285	bas = &sc->sc_bas;
286	error = 0;
287	uart_lock(sc->sc_hwmtx);
288	switch (request) {
289	case UART_IOCTL_BREAK:
290		/* TODO: Send BREAK */
291		break;
292	case UART_IOCTL_BAUD:
293		divisor = uart_getreg(bas, UART_LCR_M_REG);
294		divisor = (divisor << 8) |
295		    uart_getreg(bas, UART_LCR_L_REG);
296		baudrate = bas->rclk / 2 / (divisor + 2);
297		*(int*)data = baudrate;
298		break;
299	default:
300		error = EINVAL;
301		break;
302	}
303	uart_unlock(sc->sc_hwmtx);
304	return (error);
305}
306
307static int
308adm5120_uart_bus_ipend(struct uart_softc *sc)
309{
310	struct uart_bas *bas;
311	int ipend;
312	uint8_t ir, fr, rsr;
313
314	bas = &sc->sc_bas;
315	ipend = 0;
316
317	uart_lock(sc->sc_hwmtx);
318	ir = uart_getreg(&sc->sc_bas, UART_IR_REG);
319	fr = uart_getreg(&sc->sc_bas, UART_FR_REG);
320	rsr = uart_getreg(&sc->sc_bas, UART_RSR_REG);
321
322	if (ir & UART_IR_RX_INT)
323		ipend |= SER_INT_RXREADY;
324
325	if (ir & UART_IR_RX_TIMEOUT_INT)
326		ipend |= SER_INT_RXREADY;
327
328	if (ir & UART_IR_MODEM_STATUS_INT)
329		ipend |= SER_INT_SIGCHG;
330
331	if (rsr & UART_RSR_BE)
332		ipend |= SER_INT_BREAK;
333
334	if (rsr & UART_RSR_OE)
335		ipend |= SER_INT_OVERRUN;
336
337	if (fr & UART_FR_TX_FIFO_EMPTY) {
338		if (ir & UART_IR_TX_INT) {
339			adm5120_uart_disable_txintr(sc);
340			ipend |= SER_INT_TXIDLE;
341		}
342	}
343
344	if (ipend)
345		uart_setreg(bas, UART_IR_REG, ir | UART_IR_UICR);
346
347	uart_unlock(sc->sc_hwmtx);
348
349	return (ipend);
350}
351
352static int
353adm5120_uart_bus_param(struct uart_softc *sc, int baudrate, int databits,
354    int stopbits, int parity)
355{
356
357	/* TODO: Set parameters for uart, meanwhile stick with 115200 8N1 */
358	return (0);
359}
360
361static int
362adm5120_uart_bus_probe(struct uart_softc *sc)
363{
364	char buf[80];
365	int error;
366	char ch;
367
368	error = adm5120_uart_probe(&sc->sc_bas);
369	if (error)
370		return (error);
371
372	sc->sc_rxfifosz = 16;
373	sc->sc_txfifosz = 16;
374
375	ch = sc->sc_bas.chan + 'A';
376
377	snprintf(buf, sizeof(buf), "adm5120_uart, channel %c", ch);
378	device_set_desc_copy(sc->sc_dev, buf);
379
380	return (0);
381}
382
383static int
384adm5120_uart_bus_receive(struct uart_softc *sc)
385{
386	struct uart_bas *bas;
387	int xc;
388	uint8_t fr, rsr;
389
390	bas = &sc->sc_bas;
391	uart_lock(sc->sc_hwmtx);
392	fr = uart_getreg(bas, UART_FR_REG);
393	while (!(fr & UART_FR_RX_FIFO_EMPTY)) {
394		if (uart_rx_full(sc)) {
395			sc->sc_rxbuf[sc->sc_rxput] = UART_STAT_OVERRUN;
396			break;
397		}
398		xc = 0;
399		rsr = uart_getreg(bas, UART_RSR_REG);
400		if (rsr & UART_RSR_FE)
401			xc |= UART_STAT_FRAMERR;
402		if (rsr & UART_RSR_PE)
403			xc |= UART_STAT_PARERR;
404		if (rsr & UART_RSR_OE)
405			xc |= UART_STAT_OVERRUN;
406		xc |= uart_getreg(bas, UART_DR_REG);
407		uart_barrier(bas);
408		uart_rx_put(sc, xc);
409		if (rsr & (UART_RSR_FE | UART_RSR_PE | UART_RSR_OE)) {
410			uart_setreg(bas, UART_ECR_REG, UART_ECR_RSR);
411			uart_barrier(bas);
412		}
413		fr = uart_getreg(bas, UART_FR_REG);
414	}
415
416	/* Discard everything left in the Rx FIFO. */
417	while (!(fr & UART_FR_RX_FIFO_EMPTY)) {
418		( void)uart_getreg(bas, UART_DR_REG);
419		uart_barrier(bas);
420		rsr = uart_getreg(bas, UART_RSR_REG);
421		if (rsr & (UART_RSR_FE | UART_RSR_PE | UART_RSR_OE)) {
422			uart_setreg(bas, UART_ECR_REG, UART_ECR_RSR);
423			uart_barrier(bas);
424		}
425		fr = uart_getreg(bas, UART_FR_REG);
426	}
427	uart_unlock(sc->sc_hwmtx);
428	return (0);
429}
430
431static int
432adm5120_uart_bus_setsig(struct uart_softc *sc, int sig)
433{
434
435	/* TODO: implement (?) */
436	return (0);
437}
438
439static int
440adm5120_uart_bus_transmit(struct uart_softc *sc)
441{
442	struct uart_bas *bas;
443
444	bas = &sc->sc_bas;
445	uart_lock(sc->sc_hwmtx);
446	sc->sc_txbusy = 1;
447	for (int i = 0; i < sc->sc_txdatasz; i++) {
448		if (uart_getreg(bas, UART_FR_REG) & UART_FR_TX_FIFO_FULL)
449			break;
450		uart_setreg(bas, UART_DR_REG, sc->sc_txbuf[i]);
451	}
452
453	/* Enable TX interrupt */
454	adm5120_uart_enable_txintr(sc);
455	uart_unlock(sc->sc_hwmtx);
456	return (0);
457}
458
459static void
460adm5120_uart_bus_grab(struct uart_softc *sc)
461{
462
463	/* Enable interrupts - no RX_INT or RX_TIMEOUT */
464	uart_lock(sc->sc_hwmtx);
465	uart_setreg(&sc->sc_bas, UART_CR_REG,
466	    UART_CR_PORT_EN | UART_CR_MODEM_STATUS_INT_EN);
467	uart_unlock(sc->sc_hwmtx);
468}
469
470static void
471adm5120_uart_bus_ungrab(struct uart_softc *sc)
472{
473
474	/* Enable interrupts */
475	uart_lock(sc->sc_hwmtx);
476	uart_setreg(&sc->sc_bas, UART_CR_REG,
477	    UART_CR_PORT_EN|UART_CR_RX_INT_EN|UART_CR_RX_TIMEOUT_INT_EN|
478	    UART_CR_MODEM_STATUS_INT_EN);
479	uart_unlock(sc->sc_hwmtx);
480}
481