1 /*-
2 * SPDX-License-Identifier: BSD-2-Clause-FreeBSD
3 *
4 * Copyright (c) 2003 Marcel Moolenaar
5 * All rights reserved.
6 *
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
9 * are met:
10 *
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 copyright
14 * notice, this list of conditions and the following disclaimer in the
15 * documentation and/or other materials provided with the distribution.
16 *
17 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
18 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
19 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
21 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
22 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
23 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
26 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27 */
28
29 #include <sys/cdefs.h>
30 __FBSDID("$FreeBSD$");
31
32 #include <sys/param.h>
33 #include <sys/systm.h>
34 #include <sys/bus.h>
35 #include <sys/conf.h>
36 #include <sys/cons.h>
37 #include <sys/fcntl.h>
38 #include <sys/interrupt.h>
39 #include <sys/kernel.h>
40 #include <sys/malloc.h>
41 #include <sys/reboot.h>
42 #include <machine/bus.h>
43 #include <sys/rman.h>
44 #include <sys/tty.h>
45 #include <machine/resource.h>
46 #include <machine/stdarg.h>
47
48 #include <dev/uart/uart.h>
49 #include <dev/uart/uart_bus.h>
50 #include <dev/uart/uart_cpu.h>
51
52 #include "uart_if.h"
53
54 static cn_probe_t uart_cnprobe;
55 static cn_init_t uart_cninit;
56 static cn_init_t uart_cnresume;
57 static cn_term_t uart_cnterm;
58 static cn_getc_t uart_cngetc;
59 static cn_putc_t uart_cnputc;
60 static cn_grab_t uart_cngrab;
61 static cn_ungrab_t uart_cnungrab;
62
63 static tsw_open_t uart_tty_open;
64 static tsw_close_t uart_tty_close;
65 static tsw_outwakeup_t uart_tty_outwakeup;
66 static tsw_inwakeup_t uart_tty_inwakeup;
67 static tsw_ioctl_t uart_tty_ioctl;
68 static tsw_param_t uart_tty_param;
69 static tsw_modem_t uart_tty_modem;
70 static tsw_free_t uart_tty_free;
71 static tsw_busy_t uart_tty_busy;
72
73 CONSOLE_DRIVER(
74 uart,
75 .cn_resume = uart_cnresume,
76 );
77
78 static struct uart_devinfo uart_console;
79
80 static void
uart_cnprobe(struct consdev * cp)81 uart_cnprobe(struct consdev *cp)
82 {
83
84 cp->cn_pri = CN_DEAD;
85
86 KASSERT(uart_console.cookie == NULL, ("foo"));
87
88 if (uart_cpu_getdev(UART_DEV_CONSOLE, &uart_console))
89 return;
90
91 if (uart_probe(&uart_console))
92 return;
93
94 strlcpy(cp->cn_name, uart_driver_name, sizeof(cp->cn_name));
95 cp->cn_pri = (boothowto & RB_SERIAL) ? CN_REMOTE : CN_NORMAL;
96 cp->cn_arg = &uart_console;
97 }
98
99 static void
uart_cninit(struct consdev * cp)100 uart_cninit(struct consdev *cp)
101 {
102 struct uart_devinfo *di;
103
104 /*
105 * Yedi trick: we need to be able to define cn_dev before we go
106 * single- or multi-user. The problem is that we don't know at
107 * this time what the device will be. Hence, we need to link from
108 * the uart_devinfo to the consdev that corresponds to it so that
109 * we can define cn_dev in uart_bus_attach() when we find the
110 * device during bus enumeration. That's when we'll know what the
111 * the unit number will be.
112 */
113 di = cp->cn_arg;
114 KASSERT(di->cookie == NULL, ("foo"));
115 di->cookie = cp;
116 di->type = UART_DEV_CONSOLE;
117 uart_add_sysdev(di);
118 uart_init(di);
119 }
120
121 static void
uart_cnresume(struct consdev * cp)122 uart_cnresume(struct consdev *cp)
123 {
124
125 uart_init(cp->cn_arg);
126 }
127
128 static void
uart_cnterm(struct consdev * cp)129 uart_cnterm(struct consdev *cp)
130 {
131
132 uart_term(cp->cn_arg);
133 }
134
135 static void
uart_cngrab(struct consdev * cp)136 uart_cngrab(struct consdev *cp)
137 {
138
139 uart_grab(cp->cn_arg);
140 }
141
142 static void
uart_cnungrab(struct consdev * cp)143 uart_cnungrab(struct consdev *cp)
144 {
145
146 uart_ungrab(cp->cn_arg);
147 }
148
149 static void
uart_cnputc(struct consdev * cp,int c)150 uart_cnputc(struct consdev *cp, int c)
151 {
152
153 uart_putc(cp->cn_arg, c);
154 }
155
156 static int
uart_cngetc(struct consdev * cp)157 uart_cngetc(struct consdev *cp)
158 {
159
160 return (uart_poll(cp->cn_arg));
161 }
162
163 static int
uart_tty_open(struct tty * tp)164 uart_tty_open(struct tty *tp)
165 {
166 struct uart_softc *sc;
167
168 sc = tty_softc(tp);
169
170 if (sc == NULL || sc->sc_leaving)
171 return (ENXIO);
172
173 sc->sc_opened = 1;
174 return (0);
175 }
176
177 static void
uart_tty_close(struct tty * tp)178 uart_tty_close(struct tty *tp)
179 {
180 struct uart_softc *sc;
181
182 sc = tty_softc(tp);
183 if (sc == NULL || sc->sc_leaving || !sc->sc_opened)
184 return;
185
186 if (sc->sc_hwiflow)
187 UART_IOCTL(sc, UART_IOCTL_IFLOW, 0);
188 if (sc->sc_hwoflow)
189 UART_IOCTL(sc, UART_IOCTL_OFLOW, 0);
190 if (sc->sc_sysdev == NULL)
191 UART_SETSIG(sc, SER_DDTR | SER_DRTS);
192
193 wakeup(sc);
194 sc->sc_opened = 0;
195 }
196
197 static void
uart_tty_outwakeup(struct tty * tp)198 uart_tty_outwakeup(struct tty *tp)
199 {
200 struct uart_softc *sc;
201
202 sc = tty_softc(tp);
203 if (sc == NULL || sc->sc_leaving)
204 return;
205
206 if (sc->sc_txbusy)
207 return;
208
209 /*
210 * Respect RTS/CTS (output) flow control if enabled and not already
211 * handled by hardware.
212 */
213 if ((tp->t_termios.c_cflag & CCTS_OFLOW) && !sc->sc_hwoflow &&
214 !(sc->sc_hwsig & SER_CTS))
215 return;
216
217 sc->sc_txdatasz = ttydisc_getc(tp, sc->sc_txbuf, sc->sc_txfifosz);
218 if (sc->sc_txdatasz != 0)
219 UART_TRANSMIT(sc);
220 }
221
222 static void
uart_tty_inwakeup(struct tty * tp)223 uart_tty_inwakeup(struct tty *tp)
224 {
225 struct uart_softc *sc;
226
227 sc = tty_softc(tp);
228 if (sc == NULL || sc->sc_leaving)
229 return;
230
231 if (sc->sc_isquelch) {
232 if ((tp->t_termios.c_cflag & CRTS_IFLOW) && !sc->sc_hwiflow)
233 UART_SETSIG(sc, SER_DRTS|SER_RTS);
234 sc->sc_isquelch = 0;
235 uart_sched_softih(sc, SER_INT_RXREADY);
236 }
237 }
238
239 static int
uart_tty_ioctl(struct tty * tp,u_long cmd,caddr_t data,struct thread * td __unused)240 uart_tty_ioctl(struct tty *tp, u_long cmd, caddr_t data,
241 struct thread *td __unused)
242 {
243 struct uart_softc *sc;
244
245 sc = tty_softc(tp);
246
247 switch (cmd) {
248 case TIOCSBRK:
249 UART_IOCTL(sc, UART_IOCTL_BREAK, 1);
250 return (0);
251 case TIOCCBRK:
252 UART_IOCTL(sc, UART_IOCTL_BREAK, 0);
253 return (0);
254 default:
255 return pps_ioctl(cmd, data, &sc->sc_pps);
256 }
257 }
258
259 static int
uart_tty_param(struct tty * tp,struct termios * t)260 uart_tty_param(struct tty *tp, struct termios *t)
261 {
262 struct uart_softc *sc;
263 int databits, parity, stopbits;
264
265 sc = tty_softc(tp);
266 if (sc == NULL || sc->sc_leaving)
267 return (ENODEV);
268 if (t->c_ispeed != t->c_ospeed && t->c_ospeed != 0)
269 return (EINVAL);
270 if (t->c_ospeed == 0) {
271 UART_SETSIG(sc, SER_DDTR | SER_DRTS);
272 return (0);
273 }
274 switch (t->c_cflag & CSIZE) {
275 case CS5: databits = 5; break;
276 case CS6: databits = 6; break;
277 case CS7: databits = 7; break;
278 default: databits = 8; break;
279 }
280 stopbits = (t->c_cflag & CSTOPB) ? 2 : 1;
281 if (t->c_cflag & PARENB)
282 parity = (t->c_cflag & PARODD) ? UART_PARITY_ODD :
283 UART_PARITY_EVEN;
284 else
285 parity = UART_PARITY_NONE;
286 if (UART_PARAM(sc, t->c_ospeed, databits, stopbits, parity) != 0)
287 return (EINVAL);
288 UART_SETSIG(sc, SER_DDTR | SER_DTR);
289 /* Set input flow control state. */
290 if (!sc->sc_hwiflow) {
291 if ((t->c_cflag & CRTS_IFLOW) && sc->sc_isquelch)
292 UART_SETSIG(sc, SER_DRTS);
293 else
294 UART_SETSIG(sc, SER_DRTS | SER_RTS);
295 } else
296 UART_IOCTL(sc, UART_IOCTL_IFLOW, (t->c_cflag & CRTS_IFLOW));
297 /* Set output flow control state. */
298 if (sc->sc_hwoflow)
299 UART_IOCTL(sc, UART_IOCTL_OFLOW, (t->c_cflag & CCTS_OFLOW));
300
301 return (0);
302 }
303
304 static int
uart_tty_modem(struct tty * tp,int biton,int bitoff)305 uart_tty_modem(struct tty *tp, int biton, int bitoff)
306 {
307 struct uart_softc *sc;
308
309 sc = tty_softc(tp);
310 if (biton != 0 || bitoff != 0)
311 UART_SETSIG(sc, SER_DELTA(bitoff | biton) | biton);
312 return (sc->sc_hwsig);
313 }
314
315 void
uart_tty_intr(void * arg)316 uart_tty_intr(void *arg)
317 {
318 struct uart_softc *sc = arg;
319 struct tty *tp;
320 int c, err = 0, pend, sig, xc;
321
322 if (sc->sc_leaving)
323 return;
324
325 pend = atomic_readandclear_32(&sc->sc_ttypend);
326 if (!(pend & SER_INT_MASK))
327 return;
328
329 tp = sc->sc_u.u_tty.tp;
330 tty_lock(tp);
331
332 if (pend & SER_INT_RXREADY) {
333 while (!uart_rx_empty(sc) && !sc->sc_isquelch) {
334 xc = uart_rx_peek(sc);
335 c = xc & 0xff;
336 if (xc & UART_STAT_FRAMERR)
337 err |= TRE_FRAMING;
338 if (xc & UART_STAT_OVERRUN)
339 err |= TRE_OVERRUN;
340 if (xc & UART_STAT_PARERR)
341 err |= TRE_PARITY;
342 if (ttydisc_rint(tp, c, err) != 0) {
343 sc->sc_isquelch = 1;
344 if ((tp->t_termios.c_cflag & CRTS_IFLOW) &&
345 !sc->sc_hwiflow)
346 UART_SETSIG(sc, SER_DRTS);
347 } else
348 uart_rx_next(sc);
349 }
350 }
351
352 if (pend & SER_INT_BREAK)
353 ttydisc_rint(tp, 0, TRE_BREAK);
354
355 if (pend & SER_INT_SIGCHG) {
356 sig = pend & SER_INT_SIGMASK;
357 if (sig & SER_DDCD)
358 ttydisc_modem(tp, sig & SER_DCD);
359 if (sig & SER_DCTS)
360 uart_tty_outwakeup(tp);
361 }
362
363 if (pend & SER_INT_TXIDLE)
364 uart_tty_outwakeup(tp);
365 ttydisc_rint_done(tp);
366 tty_unlock(tp);
367 }
368
369 static void
uart_tty_free(void * arg __unused)370 uart_tty_free(void *arg __unused)
371 {
372
373 /*
374 * XXX: uart(4) could reuse the device unit number before it is
375 * being freed by the TTY layer. We should use this hook to free
376 * the device unit number, but unfortunately newbus does not
377 * seem to support such a construct.
378 */
379 }
380
381 static bool
uart_tty_busy(struct tty * tp)382 uart_tty_busy(struct tty *tp)
383 {
384 struct uart_softc *sc;
385
386 sc = tty_softc(tp);
387 if (sc == NULL || sc->sc_leaving)
388 return (FALSE);
389
390 return (sc->sc_txbusy);
391 }
392
393 static struct ttydevsw uart_tty_class = {
394 .tsw_flags = TF_INITLOCK|TF_CALLOUT,
395 .tsw_open = uart_tty_open,
396 .tsw_close = uart_tty_close,
397 .tsw_outwakeup = uart_tty_outwakeup,
398 .tsw_inwakeup = uart_tty_inwakeup,
399 .tsw_ioctl = uart_tty_ioctl,
400 .tsw_param = uart_tty_param,
401 .tsw_modem = uart_tty_modem,
402 .tsw_free = uart_tty_free,
403 .tsw_busy = uart_tty_busy,
404 };
405
406 int
uart_tty_attach(struct uart_softc * sc)407 uart_tty_attach(struct uart_softc *sc)
408 {
409 struct tty *tp;
410 int unit;
411
412 sc->sc_u.u_tty.tp = tp = tty_alloc(&uart_tty_class, sc);
413
414 unit = device_get_unit(sc->sc_dev);
415
416 if (sc->sc_sysdev != NULL && sc->sc_sysdev->type == UART_DEV_CONSOLE) {
417 sprintf(((struct consdev *)sc->sc_sysdev->cookie)->cn_name,
418 "ttyu%r", unit);
419 tty_init_console(tp, sc->sc_sysdev->baudrate);
420 }
421
422 swi_add(&tty_intr_event, uart_driver_name, uart_tty_intr, sc, SWI_TTY,
423 INTR_TYPE_TTY, &sc->sc_softih);
424
425 tty_makedev(tp, NULL, "u%r", unit);
426
427 return (0);
428 }
429
430 int
uart_tty_detach(struct uart_softc * sc)431 uart_tty_detach(struct uart_softc *sc)
432 {
433 struct tty *tp;
434
435 tp = sc->sc_u.u_tty.tp;
436
437 tty_lock(tp);
438 swi_remove(sc->sc_softih);
439 tty_rel_gone(tp);
440
441 return (0);
442 }
443
444 struct mtx *
uart_tty_getlock(struct uart_softc * sc)445 uart_tty_getlock(struct uart_softc *sc)
446 {
447
448 if (sc->sc_u.u_tty.tp != NULL)
449 return (tty_getlock(sc->sc_u.u_tty.tp));
450 else
451 return (NULL);
452 }
453