sscom.c revision 1.45 1 /* $NetBSD: sscom.c,v 1.45 2014/07/25 08:10:32 dholland Exp $ */
2
3 /*
4 * Copyright (c) 2002, 2003 Fujitsu Component Limited
5 * Copyright (c) 2002, 2003 Genetec Corporation
6 * All rights reserved.
7 *
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
10 * 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 copyright
14 * notice, this list of conditions and the following disclaimer in the
15 * documentation and/or other materials provided with the distribution.
16 * 3. Neither the name of The Fujitsu Component Limited nor the name of
17 * Genetec corporation may not be used to endorse or promote products
18 * derived from this software without specific prior written permission.
19 *
20 * THIS SOFTWARE IS PROVIDED BY FUJITSU COMPONENT LIMITED AND GENETEC
21 * CORPORATION ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES,
22 * INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
23 * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
24 * DISCLAIMED. IN NO EVENT SHALL FUJITSU COMPONENT LIMITED OR GENETEC
25 * CORPORATION BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
26 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
27 * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF
28 * USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
29 * ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
30 * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT
31 * OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
32 * SUCH DAMAGE.
33 */
34
35 /*-
36 * Copyright (c) 1998, 1999 The NetBSD Foundation, Inc.
37 * All rights reserved.
38 *
39 * This code is derived from software contributed to The NetBSD Foundation
40 * by Charles M. Hannum.
41 *
42 * Redistribution and use in source and binary forms, with or without
43 * modification, are permitted provided that the following conditions
44 * are met:
45 * 1. Redistributions of source code must retain the above copyright
46 * notice, this list of conditions and the following disclaimer.
47 * 2. Redistributions in binary form must reproduce the above copyright
48 * notice, this list of conditions and the following disclaimer in the
49 * documentation and/or other materials provided with the distribution.
50 *
51 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
52 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
53 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
54 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
55 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
56 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
57 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
58 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
59 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
60 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
61 * POSSIBILITY OF SUCH DAMAGE.
62 */
63
64 /*
65 * Copyright (c) 1991 The Regents of the University of California.
66 * All rights reserved.
67 *
68 * Redistribution and use in source and binary forms, with or without
69 * modification, are permitted provided that the following conditions
70 * are met:
71 * 1. Redistributions of source code must retain the above copyright
72 * notice, this list of conditions and the following disclaimer.
73 * 2. Redistributions in binary form must reproduce the above copyright
74 * notice, this list of conditions and the following disclaimer in the
75 * documentation and/or other materials provided with the distribution.
76 * 3. Neither the name of the University nor the names of its contributors
77 * may be used to endorse or promote products derived from this software
78 * without specific prior written permission.
79 *
80 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
81 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
82 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
83 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
84 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
85 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
86 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
87 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
88 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
89 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
90 * SUCH DAMAGE.
91 *
92 * @(#)com.c 7.5 (Berkeley) 5/16/91
93 */
94
95 /*
96 * Support integrated UARTs of Samsung S3C2800/2400X/2410X
97 * Derived from sys/dev/ic/com.c
98 */
99
100 #include <sys/cdefs.h>
101 __KERNEL_RCSID(0, "$NetBSD: sscom.c,v 1.45 2014/07/25 08:10:32 dholland Exp $");
102
103 #include "opt_sscom.h"
104 #include "opt_ddb.h"
105 #include "opt_kgdb.h"
106 #include "opt_multiprocessor.h"
107 #include "opt_lockdebug.h"
108
109 #include "rnd.h"
110 #ifdef RND_COM
111 #include <sys/rnd.h>
112 #endif
113
114 /*
115 * Override cnmagic(9) macro before including <sys/systm.h>.
116 * We need to know if cn_check_magic triggered debugger, so set a flag.
117 * Callers of cn_check_magic must declare int cn_trapped = 0;
118 * XXX: this is *ugly*!
119 */
120 #define cn_trap() \
121 do { \
122 console_debugger(); \
123 cn_trapped = 1; \
124 } while (/* CONSTCOND */ 0)
125
126 #include <sys/param.h>
127 #include <sys/systm.h>
128 #include <sys/ioctl.h>
129 #include <sys/select.h>
130 #include <sys/tty.h>
131 #include <sys/proc.h>
132 #include <sys/conf.h>
133 #include <sys/file.h>
134 #include <sys/uio.h>
135 #include <sys/kernel.h>
136 #include <sys/syslog.h>
137 #include <sys/types.h>
138 #include <sys/device.h>
139 #include <sys/malloc.h>
140 #include <sys/timepps.h>
141 #include <sys/vnode.h>
142 #include <sys/kauth.h>
143 #include <sys/intr.h>
144 #include <sys/bus.h>
145 #include <sys/mutex.h>
146
147 #include <arm/s3c2xx0/s3c2xx0reg.h>
148 #include <arm/s3c2xx0/sscom_var.h>
149 #include <dev/cons.h>
150
151 dev_type_open(sscomopen);
152 dev_type_close(sscomclose);
153 dev_type_read(sscomread);
154 dev_type_write(sscomwrite);
155 dev_type_ioctl(sscomioctl);
156 dev_type_stop(sscomstop);
157 dev_type_tty(sscomtty);
158 dev_type_poll(sscompoll);
159
160 int sscomcngetc (dev_t);
161 void sscomcnputc (dev_t, int);
162 void sscomcnpollc (dev_t, int);
163
164 #define integrate static inline
165 void sscomsoft (void *);
166
167 integrate void sscom_rxsoft (struct sscom_softc *, struct tty *);
168 integrate void sscom_txsoft (struct sscom_softc *, struct tty *);
169 integrate void sscom_stsoft (struct sscom_softc *, struct tty *);
170 integrate void sscom_schedrx (struct sscom_softc *);
171 static void sscom_modem(struct sscom_softc *, int);
172 static void sscom_break(struct sscom_softc *, int);
173 static void sscom_iflush(struct sscom_softc *);
174 static void sscom_hwiflow(struct sscom_softc *);
175 static void sscom_loadchannelregs(struct sscom_softc *);
176 static void tiocm_to_sscom(struct sscom_softc *, u_long, int);
177 static int sscom_to_tiocm(struct sscom_softc *);
178 static void tiocm_to_sscom(struct sscom_softc *, u_long, int);
179 static int sscom_to_tiocm(struct sscom_softc *);
180 static void sscom_iflush(struct sscom_softc *);
181
182 static int sscomhwiflow(struct tty *tp, int block);
183 #if defined(KGDB) || defined(SSCOM0CONSOLE) || defined(SSCOM1CONSOLE)
184 static int sscom_init(bus_space_tag_t, const struct sscom_uart_info *,
185 int, int, tcflag_t, bus_space_handle_t *);
186 #endif
187
188 extern struct cfdriver sscom_cd;
189
190 const struct cdevsw sscom_cdevsw = {
191 .d_open = sscomopen,
192 .d_close = sscomclose,
193 .d_read = sscomread,
194 .d_write = sscomwrite,
195 .d_ioctl = sscomioctl,
196 .d_stop = sscomstop,
197 .d_tty = sscomtty,
198 .d_poll = sscompoll,
199 .d_mmap = nommap,
200 .d_kqfilter = ttykqfilter,
201 .d_discard = nodiscard,
202 .d_flag = D_TTY
203 };
204
205 /*
206 * Make this an option variable one can patch.
207 * But be warned: this must be a power of 2!
208 */
209 u_int sscom_rbuf_size = SSCOM_RING_SIZE;
210
211 /* Stop input when 3/4 of the ring is full; restart when only 1/4 is full. */
212 u_int sscom_rbuf_hiwat = (SSCOM_RING_SIZE * 1) / 4;
213 u_int sscom_rbuf_lowat = (SSCOM_RING_SIZE * 3) / 4;
214
215 static int sscomconsunit = -1;
216 static bus_space_tag_t sscomconstag;
217 static bus_space_handle_t sscomconsioh;
218 static int sscomconsattached;
219 static int sscomconsrate;
220 static tcflag_t sscomconscflag;
221 static struct cnm_state sscom_cnm_state;
222
223 #ifdef KGDB
224 #include <sys/kgdb.h>
225
226 static int sscom_kgdb_unit = -1;
227 static bus_space_tag_t sscom_kgdb_iot;
228 static bus_space_handle_t sscom_kgdb_ioh;
229 static int sscom_kgdb_attached;
230
231 int sscom_kgdb_getc (void *);
232 void sscom_kgdb_putc (void *, int);
233 #endif /* KGDB */
234
235 #define SSCOMUNIT_MASK 0x7f
236 #define SSCOMDIALOUT_MASK 0x80
237
238 #define SSCOMUNIT(x) (minor(x) & SSCOMUNIT_MASK)
239 #define SSCOMDIALOUT(x) (minor(x) & SSCOMDIALOUT_MASK)
240
241 #if 0
242 #define SSCOM_ISALIVE(sc) ((sc)->enabled != 0 && \
243 device_is_active(&(sc)->sc_dev))
244 #else
245 #define SSCOM_ISALIVE(sc) device_is_active((sc)->sc_dev)
246 #endif
247
248 #define BR BUS_SPACE_BARRIER_READ
249 #define BW BUS_SPACE_BARRIER_WRITE
250 #define SSCOM_BARRIER(t, h, f) /* no-op */
251
252 #if (defined(MULTIPROCESSOR) || defined(LOCKDEBUG)) && defined(SSCOM_MPLOCK)
253
254 #define SSCOM_LOCK(sc) mutex_enter((sc)->sc_lock)
255 #define SSCOM_UNLOCK(sc) mutex_exit((sc)->sc_lock)
256
257 #else
258
259 #define SSCOM_LOCK(sc)
260 #define SSCOM_UNLOCK(sc)
261
262 #endif
263
264 #ifndef SSCOM_TOLERANCE
265 #define SSCOM_TOLERANCE 30 /* XXX: baud rate tolerance, in 0.1% units */
266 #endif
267
268 /* value for UCON */
269 #define UCON_RXINT_MASK \
270 (UCON_RXMODE_MASK|UCON_ERRINT|UCON_TOINT|UCON_RXINT_TYPE)
271 #define UCON_RXINT_ENABLE \
272 (UCON_RXMODE_INT|UCON_ERRINT|UCON_TOINT|UCON_RXINT_TYPE_LEVEL)
273 #define UCON_TXINT_MASK (UCON_TXMODE_MASK|UCON_TXINT_TYPE)
274 #define UCON_TXINT_ENABLE (UCON_TXMODE_INT|UCON_TXINT_TYPE_LEVEL)
275
276 /* we don't want tx interrupt on debug port, but it is needed to
277 have transmitter active */
278 #define UCON_DEBUGPORT (UCON_RXINT_ENABLE|UCON_TXINT_ENABLE)
279
280
281 static inline void
282 __sscom_output_chunk(struct sscom_softc *sc, int ufstat)
283 {
284 int n, space;
285 bus_space_tag_t iot = sc->sc_iot;
286 bus_space_handle_t ioh = sc->sc_ioh;
287
288 n = sc->sc_tbc;
289 space = 16 - ((ufstat & UFSTAT_TXCOUNT) >> UFSTAT_TXCOUNT_SHIFT);
290
291 if (n > space)
292 n = space;
293
294 if (n > 0) {
295 bus_space_write_multi_1(iot, ioh, SSCOM_UTXH, sc->sc_tba, n);
296 sc->sc_tbc -= n;
297 sc->sc_tba += n;
298 }
299 }
300
301 static void
302 sscom_output_chunk(struct sscom_softc *sc)
303 {
304 int ufstat = bus_space_read_2(sc->sc_iot, sc->sc_ioh, SSCOM_UFSTAT);
305
306 if (!(ufstat & UFSTAT_TXFULL))
307 __sscom_output_chunk(sc, ufstat);
308 }
309
310 int
311 sscomspeed(long speed, long frequency)
312 {
313 #define divrnd(n, q) (((n)*2/(q)+1)/2) /* divide and round off */
314
315 int x, err;
316
317 if (speed <= 0)
318 return -1;
319 x = divrnd(frequency / 16, speed);
320 if (x <= 0)
321 return -1;
322 err = divrnd(((quad_t)frequency) * 1000 / 16, speed * x) - 1000;
323 if (err < 0)
324 err = -err;
325 if (err > SSCOM_TOLERANCE)
326 return -1;
327 return x-1;
328
329 #undef divrnd
330 }
331
332 void sscomstatus (struct sscom_softc *, const char *);
333
334 #ifdef SSCOM_DEBUG
335 int sscom_debug = 0;
336
337 void
338 sscomstatus(struct sscom_softc *sc, const char *str)
339 {
340 struct tty *tp = sc->sc_tty;
341 int umstat = bus_space_read_1(sc->sc_iot, sc->sc_iot, SSCOM_UMSTAT);
342 int umcon = bus_space_read_1(sc->sc_iot, sc->sc_iot, SSCOM_UMCON);
343
344 printf("%s: %s %sclocal %sdcd %sts_carr_on %sdtr %stx_stopped\n",
345 device_xname(sc->sc_dev), str,
346 ISSET(tp->t_cflag, CLOCAL) ? "+" : "-",
347 "+", /* DCD */
348 ISSET(tp->t_state, TS_CARR_ON) ? "+" : "-",
349 "+", /* DTR */
350 sc->sc_tx_stopped ? "+" : "-");
351
352 printf("%s: %s %scrtscts %scts %sts_ttstop %srts %xrx_flags\n",
353 device_xname(sc->sc_dev), str,
354 ISSET(tp->t_cflag, CRTSCTS) ? "+" : "-",
355 ISSET(umstat, UMSTAT_CTS) ? "+" : "-",
356 ISSET(tp->t_state, TS_TTSTOP) ? "+" : "-",
357 ISSET(umcon, UMCON_RTS) ? "+" : "-",
358 sc->sc_rx_flags);
359 }
360 #else
361 #define sscom_debug 0
362 #endif
363
364 static void
365 sscom_enable_debugport(struct sscom_softc *sc)
366 {
367 int s;
368
369 /* Turn on line break interrupt, set carrier. */
370 s = splserial();
371 SSCOM_LOCK(sc);
372 sc->sc_ucon = UCON_DEBUGPORT;
373 bus_space_write_2(sc->sc_iot, sc->sc_ioh, SSCOM_UCON, sc->sc_ucon);
374 sc->sc_umcon = UMCON_RTS|UMCON_DTR;
375 sc->sc_set_modem_control(sc);
376 sscom_enable_rxint(sc);
377 sscom_disable_txint(sc);
378 SSCOM_UNLOCK(sc);
379 splx(s);
380 }
381
382 static void
383 sscom_set_modem_control(struct sscom_softc *sc)
384 {
385 /* flob RTS */
386 bus_space_write_1(sc->sc_iot, sc->sc_ioh,
387 SSCOM_UMCON, sc->sc_umcon & UMCON_HW_MASK);
388 /* ignore DTR */
389 }
390
391 static int
392 sscom_read_modem_status(struct sscom_softc *sc)
393 {
394 int msts;
395
396 msts = bus_space_read_1(sc->sc_iot, sc->sc_ioh, SSCOM_UMSTAT);
397
398 /* DCD and DSR are always on */
399 return (msts & UMSTAT_CTS) | MSTS_DCD | MSTS_DSR;
400 }
401
402 void
403 sscom_attach_subr(struct sscom_softc *sc)
404 {
405 int unit = sc->sc_unit;
406 bus_space_tag_t iot = sc->sc_iot;
407 bus_space_handle_t ioh = sc->sc_ioh;
408 struct tty *tp;
409
410 callout_init(&sc->sc_diag_callout, 0);
411 #if (defined(MULTIPROCESSOR) || defined(LOCKDEBUG)) && defined(SSCOM_MPLOCK)
412 sc->sc_lock = mutex_obj_alloc(MUTEX_DEFAULT, IPL_SERIAL);
413 #endif
414
415 sc->sc_ucon = UCON_RXINT_ENABLE|UCON_TXINT_ENABLE;
416
417 /*
418 * set default for modem control hook
419 */
420 if (sc->sc_set_modem_control == NULL)
421 sc->sc_set_modem_control = sscom_set_modem_control;
422 if (sc->sc_read_modem_status == NULL)
423 sc->sc_read_modem_status = sscom_read_modem_status;
424
425 /* Disable interrupts before configuring the device. */
426 KASSERT(sc->sc_change_txrx_interrupts != NULL);
427 sscom_disable_txrxint(sc);
428
429 #ifdef KGDB
430 /*
431 * Allow kgdb to "take over" this port. If this is
432 * the kgdb device, it has exclusive use.
433 */
434 if (unit == sscom_kgdb_unit) {
435 SET(sc->sc_hwflags, SSCOM_HW_KGDB);
436 sc->sc_ucon = UCON_DEBUGPORT;
437 }
438 #endif
439
440 if (unit == sscomconsunit) {
441 int timo, stat;
442
443 sscomconsattached = 1;
444 sscomconstag = iot;
445 sscomconsioh = ioh;
446
447 /* wait for this transmission to complete */
448 timo = 1500000;
449 do {
450 stat = bus_space_read_1(iot, ioh, SSCOM_UTRSTAT);
451 } while ((stat & UTRSTAT_TXEMPTY) == 0 && --timo > 0);
452
453 /* Make sure the console is always "hardwired". */
454 SET(sc->sc_hwflags, SSCOM_HW_CONSOLE);
455 SET(sc->sc_swflags, TIOCFLAG_SOFTCAR);
456
457 sc->sc_ucon = UCON_DEBUGPORT;
458 }
459
460 bus_space_write_1(iot, ioh, SSCOM_UFCON,
461 #ifdef SSCOM_S3C2440
462 UFCON_TXTRIGGER_16|UFCON_RXTRIGGER_16|UFCON_FIFO_ENABLE|
463 #else
464 UFCON_TXTRIGGER_8|UFCON_RXTRIGGER_8|UFCON_FIFO_ENABLE|
465 #endif
466 UFCON_TXFIFO_RESET|UFCON_RXFIFO_RESET);
467
468 bus_space_write_1(iot, ioh, SSCOM_UCON, sc->sc_ucon);
469
470 #ifdef KGDB
471 if (ISSET(sc->sc_hwflags, SSCOM_HW_KGDB)) {
472 sscom_kgdb_attached = 1;
473 printf("%s: kgdb\n", device_xname(sc->sc_dev));
474 sscom_enable_debugport(sc);
475 return;
476 }
477 #endif
478
479 tp = tty_alloc();
480 tp->t_oproc = sscomstart;
481 tp->t_param = sscomparam;
482 tp->t_hwiflow = sscomhwiflow;
483
484 sc->sc_tty = tp;
485 sc->sc_rbuf = malloc(sscom_rbuf_size << 1, M_DEVBUF, M_NOWAIT);
486 sc->sc_rbput = sc->sc_rbget = sc->sc_rbuf;
487 sc->sc_rbavail = sscom_rbuf_size;
488 if (sc->sc_rbuf == NULL) {
489 printf("%s: unable to allocate ring buffer\n",
490 device_xname(sc->sc_dev));
491 return;
492 }
493 sc->sc_ebuf = sc->sc_rbuf + (sscom_rbuf_size << 1);
494
495 tty_attach(tp);
496
497 if (ISSET(sc->sc_hwflags, SSCOM_HW_CONSOLE)) {
498 int maj;
499
500 /* locate the major number */
501 maj = cdevsw_lookup_major(&sscom_cdevsw);
502
503 cn_tab->cn_dev = makedev(maj, device_unit(sc->sc_dev));
504
505 printf("%s: console (major=%d)\n", device_xname(sc->sc_dev), maj);
506 }
507
508
509 sc->sc_si = softint_establish(SOFTINT_SERIAL, sscomsoft, sc);
510
511 #ifdef RND_COM
512 rnd_attach_source(&sc->rnd_source, device_xname(sc->sc_dev),
513 RND_TYPE_TTY, 0);
514 #endif
515
516 /* if there are no enable/disable functions, assume the device
517 is always enabled */
518
519 if (ISSET(sc->sc_hwflags, SSCOM_HW_CONSOLE))
520 sscom_enable_debugport(sc);
521 else
522 sscom_disable_txrxint(sc);
523
524 SET(sc->sc_hwflags, SSCOM_HW_DEV_OK);
525 }
526
527 int
528 sscom_detach(device_t self, int flags)
529 {
530 struct sscom_softc *sc = device_private(self);
531
532 if (sc->sc_hwflags & (SSCOM_HW_CONSOLE|SSCOM_HW_KGDB))
533 return EBUSY;
534
535 return 0;
536 }
537
538 int
539 sscom_activate(device_t self, enum devact act)
540 {
541 #ifdef notyet
542 struct sscom_softc *sc = device_private(self);
543 #endif
544
545 switch (act) {
546 case DVACT_DEACTIVATE:
547 #ifdef notyet
548 sc->enabled = 0;
549 #endif
550 return 0;
551 default:
552 return EOPNOTSUPP;
553 }
554 }
555
556 void
557 sscom_shutdown(struct sscom_softc *sc)
558 {
559 #ifdef notyet
560 struct tty *tp = sc->sc_tty;
561 int s;
562
563 s = splserial();
564 SSCOM_LOCK(sc);
565
566 /* If we were asserting flow control, then deassert it. */
567 SET(sc->sc_rx_flags, RX_IBUF_BLOCKED);
568 sscom_hwiflow(sc);
569
570 /* Clear any break condition set with TIOCSBRK. */
571 sscom_break(sc, 0);
572
573 /*
574 * Hang up if necessary. Wait a bit, so the other side has time to
575 * notice even if we immediately open the port again.
576 * Avoid tsleeping above splhigh().
577 */
578 if (ISSET(tp->t_cflag, HUPCL)) {
579 sscom_modem(sc, 0);
580 SSCOM_UNLOCK(sc);
581 splx(s);
582 /* XXX tsleep will only timeout */
583 (void) tsleep(sc, TTIPRI, ttclos, hz);
584 s = splserial();
585 SSCOM_LOCK(sc);
586 }
587
588 if (ISSET(sc->sc_hwflags, SSCOM_HW_CONSOLE))
589 /* interrupt on break */
590 sc->sc_ucon = UCON_DEBUGPORT;
591 else
592 sc->sc_ucon = 0;
593 bus_space_write_2(sc->sc_iot, sc->sc_ioh, SSCOM_UCON, sc->sc_ucon);
594
595 #ifdef DIAGNOSTIC
596 if (!sc->enabled)
597 panic("sscom_shutdown: not enabled?");
598 #endif
599 sc->enabled = 0;
600 SSCOM_UNLOCK(sc);
601 splx(s);
602 #endif
603 }
604
605 int
606 sscomopen(dev_t dev, int flag, int mode, struct lwp *l)
607 {
608 struct sscom_softc *sc;
609 struct tty *tp;
610 int s, s2;
611 int error;
612
613 sc = device_lookup_private(&sscom_cd, SSCOMUNIT(dev));
614 if (sc == NULL || !ISSET(sc->sc_hwflags, SSCOM_HW_DEV_OK) ||
615 sc->sc_rbuf == NULL)
616 return ENXIO;
617
618 if (!device_is_active(sc->sc_dev))
619 return ENXIO;
620
621 #ifdef KGDB
622 /*
623 * If this is the kgdb port, no other use is permitted.
624 */
625 if (ISSET(sc->sc_hwflags, SSCOM_HW_KGDB))
626 return EBUSY;
627 #endif
628
629 tp = sc->sc_tty;
630
631 if (kauth_authorize_device_tty(l->l_cred, KAUTH_DEVICE_TTY_OPEN, tp))
632 return (EBUSY);
633
634 s = spltty();
635
636 /*
637 * Do the following iff this is a first open.
638 */
639 if (!ISSET(tp->t_state, TS_ISOPEN) && tp->t_wopen == 0) {
640 struct termios t;
641
642 tp->t_dev = dev;
643
644 s2 = splserial();
645 SSCOM_LOCK(sc);
646
647 /* Turn on interrupts. */
648 sscom_enable_txrxint(sc);
649
650 /* Fetch the current modem control status, needed later. */
651 sc->sc_msts = sc->sc_read_modem_status(sc);
652
653 #if 0
654 /* Clear PPS capture state on first open. */
655 sc->sc_ppsmask = 0;
656 sc->ppsparam.mode = 0;
657 #endif
658
659 SSCOM_UNLOCK(sc);
660 splx(s2);
661
662 /*
663 * Initialize the termios status to the defaults. Add in the
664 * sticky bits from TIOCSFLAGS.
665 */
666 t.c_ispeed = 0;
667 if (ISSET(sc->sc_hwflags, SSCOM_HW_CONSOLE)) {
668 t.c_ospeed = sscomconsrate;
669 t.c_cflag = sscomconscflag;
670 } else {
671 t.c_ospeed = TTYDEF_SPEED;
672 t.c_cflag = TTYDEF_CFLAG;
673 }
674 if (ISSET(sc->sc_swflags, TIOCFLAG_CLOCAL))
675 SET(t.c_cflag, CLOCAL);
676 if (ISSET(sc->sc_swflags, TIOCFLAG_CRTSCTS))
677 SET(t.c_cflag, CRTSCTS);
678 if (ISSET(sc->sc_swflags, TIOCFLAG_MDMBUF))
679 SET(t.c_cflag, MDMBUF);
680 /* Make sure sscomparam() will do something. */
681 tp->t_ospeed = 0;
682 (void) sscomparam(tp, &t);
683 tp->t_iflag = TTYDEF_IFLAG;
684 tp->t_oflag = TTYDEF_OFLAG;
685 tp->t_lflag = TTYDEF_LFLAG;
686 ttychars(tp);
687 ttsetwater(tp);
688
689 s2 = splserial();
690 SSCOM_LOCK(sc);
691
692 /*
693 * Turn on DTR. We must always do this, even if carrier is not
694 * present, because otherwise we'd have to use TIOCSDTR
695 * immediately after setting CLOCAL, which applications do not
696 * expect. We always assert DTR while the device is open
697 * unless explicitly requested to deassert it.
698 */
699 sscom_modem(sc, 1);
700
701 /* Clear the input ring, and unblock. */
702 sc->sc_rbput = sc->sc_rbget = sc->sc_rbuf;
703 sc->sc_rbavail = sscom_rbuf_size;
704 sscom_iflush(sc);
705 CLR(sc->sc_rx_flags, RX_ANY_BLOCK);
706 sscom_hwiflow(sc);
707
708 if (sscom_debug)
709 sscomstatus(sc, "sscomopen ");
710
711 SSCOM_UNLOCK(sc);
712 splx(s2);
713 }
714
715 splx(s);
716
717 error = ttyopen(tp, SSCOMDIALOUT(dev), ISSET(flag, O_NONBLOCK));
718 if (error)
719 goto bad;
720
721 error = (*tp->t_linesw->l_open)(dev, tp);
722 if (error)
723 goto bad;
724
725 return 0;
726
727 bad:
728 if (!ISSET(tp->t_state, TS_ISOPEN) && tp->t_wopen == 0) {
729 /*
730 * We failed to open the device, and nobody else had it opened.
731 * Clean up the state as appropriate.
732 */
733 sscom_shutdown(sc);
734 }
735
736 return error;
737 }
738
739 int
740 sscomclose(dev_t dev, int flag, int mode, struct lwp *l)
741 {
742 struct sscom_softc *sc = device_lookup_private(&sscom_cd, SSCOMUNIT(dev));
743 struct tty *tp = sc->sc_tty;
744
745 /* XXX This is for cons.c. */
746 if (!ISSET(tp->t_state, TS_ISOPEN))
747 return 0;
748
749 (*tp->t_linesw->l_close)(tp, flag);
750 ttyclose(tp);
751
752 if (SSCOM_ISALIVE(sc) == 0)
753 return 0;
754
755 if (!ISSET(tp->t_state, TS_ISOPEN) && tp->t_wopen == 0) {
756 /*
757 * Although we got a last close, the device may still be in
758 * use; e.g. if this was the dialout node, and there are still
759 * processes waiting for carrier on the non-dialout node.
760 */
761 sscom_shutdown(sc);
762 }
763
764 return 0;
765 }
766
767 int
768 sscomread(dev_t dev, struct uio *uio, int flag)
769 {
770 struct sscom_softc *sc = device_lookup_private(&sscom_cd, SSCOMUNIT(dev));
771 struct tty *tp = sc->sc_tty;
772
773 if (SSCOM_ISALIVE(sc) == 0)
774 return EIO;
775
776 return (*tp->t_linesw->l_read)(tp, uio, flag);
777 }
778
779 int
780 sscomwrite(dev_t dev, struct uio *uio, int flag)
781 {
782 struct sscom_softc *sc = device_lookup_private(&sscom_cd, SSCOMUNIT(dev));
783 struct tty *tp = sc->sc_tty;
784
785 if (SSCOM_ISALIVE(sc) == 0)
786 return EIO;
787
788 return (*tp->t_linesw->l_write)(tp, uio, flag);
789 }
790
791 int
792 sscompoll(dev_t dev, int events, struct lwp *l)
793 {
794 struct sscom_softc *sc = device_lookup_private(&sscom_cd, SSCOMUNIT(dev));
795 struct tty *tp = sc->sc_tty;
796
797 if (SSCOM_ISALIVE(sc) == 0)
798 return EIO;
799
800 return (*tp->t_linesw->l_poll)(tp, events, l);
801 }
802
803 struct tty *
804 sscomtty(dev_t dev)
805 {
806 struct sscom_softc *sc = device_lookup_private(&sscom_cd, SSCOMUNIT(dev));
807 struct tty *tp = sc->sc_tty;
808
809 return tp;
810 }
811
812 int
813 sscomioctl(dev_t dev, u_long cmd, void *data, int flag, struct lwp *l)
814 {
815 struct sscom_softc *sc = device_lookup_private(&sscom_cd, SSCOMUNIT(dev));
816 struct tty *tp = sc->sc_tty;
817 int error;
818 int s;
819
820 if (SSCOM_ISALIVE(sc) == 0)
821 return EIO;
822
823 error = (*tp->t_linesw->l_ioctl)(tp, cmd, data, flag, l);
824 if (error != EPASSTHROUGH)
825 return error;
826
827 error = ttioctl(tp, cmd, data, flag, l);
828 if (error != EPASSTHROUGH)
829 return error;
830
831 error = 0;
832
833 s = splserial();
834 SSCOM_LOCK(sc);
835
836 switch (cmd) {
837 case TIOCSBRK:
838 sscom_break(sc, 1);
839 break;
840
841 case TIOCCBRK:
842 sscom_break(sc, 0);
843 break;
844
845 case TIOCSDTR:
846 sscom_modem(sc, 1);
847 break;
848
849 case TIOCCDTR:
850 sscom_modem(sc, 0);
851 break;
852
853 case TIOCGFLAGS:
854 *(int *)data = sc->sc_swflags;
855 break;
856
857 case TIOCSFLAGS:
858 error = kauth_authorize_device_tty(l->l_cred,
859 KAUTH_DEVICE_TTY_PRIVSET, tp);
860 if (error)
861 break;
862 sc->sc_swflags = *(int *)data;
863 break;
864
865 case TIOCMSET:
866 case TIOCMBIS:
867 case TIOCMBIC:
868 tiocm_to_sscom(sc, cmd, *(int *)data);
869 break;
870
871 case TIOCMGET:
872 *(int *)data = sscom_to_tiocm(sc);
873 break;
874
875 default:
876 error = EPASSTHROUGH;
877 break;
878 }
879
880 SSCOM_UNLOCK(sc);
881 splx(s);
882
883 if (sscom_debug)
884 sscomstatus(sc, "sscomioctl ");
885
886 return error;
887 }
888
889 integrate void
890 sscom_schedrx(struct sscom_softc *sc)
891 {
892
893 sc->sc_rx_ready = 1;
894
895 /* Wake up the poller. */
896 softint_schedule(sc->sc_si);
897 }
898
899 static void
900 sscom_break(struct sscom_softc *sc, int onoff)
901 {
902
903 if (onoff)
904 SET(sc->sc_ucon, UCON_SBREAK);
905 else
906 CLR(sc->sc_ucon, UCON_SBREAK);
907
908 if (!sc->sc_heldchange) {
909 if (sc->sc_tx_busy) {
910 sc->sc_heldtbc = sc->sc_tbc;
911 sc->sc_tbc = 0;
912 sc->sc_heldchange = 1;
913 } else
914 sscom_loadchannelregs(sc);
915 }
916 }
917
918 static void
919 sscom_modem(struct sscom_softc *sc, int onoff)
920 {
921 if (onoff)
922 SET(sc->sc_umcon, UMCON_DTR);
923 else
924 CLR(sc->sc_umcon, UMCON_DTR);
925
926 if (!sc->sc_heldchange) {
927 if (sc->sc_tx_busy) {
928 sc->sc_heldtbc = sc->sc_tbc;
929 sc->sc_tbc = 0;
930 sc->sc_heldchange = 1;
931 } else
932 sscom_loadchannelregs(sc);
933 }
934 }
935
936 static void
937 tiocm_to_sscom(struct sscom_softc *sc, u_long how, int ttybits)
938 {
939 u_char sscombits;
940
941 sscombits = 0;
942 if (ISSET(ttybits, TIOCM_DTR))
943 sscombits = UMCON_DTR;
944 if (ISSET(ttybits, TIOCM_RTS))
945 SET(sscombits, UMCON_RTS);
946
947 switch (how) {
948 case TIOCMBIC:
949 CLR(sc->sc_umcon, sscombits);
950 break;
951
952 case TIOCMBIS:
953 SET(sc->sc_umcon, sscombits);
954 break;
955
956 case TIOCMSET:
957 CLR(sc->sc_umcon, UMCON_DTR);
958 SET(sc->sc_umcon, sscombits);
959 break;
960 }
961
962 if (!sc->sc_heldchange) {
963 if (sc->sc_tx_busy) {
964 sc->sc_heldtbc = sc->sc_tbc;
965 sc->sc_tbc = 0;
966 sc->sc_heldchange = 1;
967 } else
968 sscom_loadchannelregs(sc);
969 }
970 }
971
972 static int
973 sscom_to_tiocm(struct sscom_softc *sc)
974 {
975 u_char sscombits;
976 int ttybits = 0;
977
978 sscombits = sc->sc_umcon;
979 #if 0
980 if (ISSET(sscombits, MCR_DTR))
981 SET(ttybits, TIOCM_DTR);
982 #endif
983 if (ISSET(sscombits, UMCON_RTS))
984 SET(ttybits, TIOCM_RTS);
985
986 sscombits = sc->sc_msts;
987 if (ISSET(sscombits, MSTS_DCD))
988 SET(ttybits, TIOCM_CD);
989 if (ISSET(sscombits, MSTS_DSR))
990 SET(ttybits, TIOCM_DSR);
991 if (ISSET(sscombits, MSTS_CTS))
992 SET(ttybits, TIOCM_CTS);
993
994 if (sc->sc_ucon != 0)
995 SET(ttybits, TIOCM_LE);
996
997 return ttybits;
998 }
999
1000 static int
1001 cflag2lcr(tcflag_t cflag)
1002 {
1003 u_char lcr = ULCON_PARITY_NONE;
1004
1005 switch (cflag & (PARENB|PARODD)) {
1006 case PARENB|PARODD: lcr = ULCON_PARITY_ODD; break;
1007 case PARENB: lcr = ULCON_PARITY_EVEN;
1008 }
1009
1010 switch (ISSET(cflag, CSIZE)) {
1011 case CS5:
1012 SET(lcr, ULCON_LENGTH_5);
1013 break;
1014 case CS6:
1015 SET(lcr, ULCON_LENGTH_6);
1016 break;
1017 case CS7:
1018 SET(lcr, ULCON_LENGTH_7);
1019 break;
1020 case CS8:
1021 SET(lcr, ULCON_LENGTH_8);
1022 break;
1023 }
1024 if (ISSET(cflag, CSTOPB))
1025 SET(lcr, ULCON_STOP);
1026
1027 return lcr;
1028 }
1029
1030 int
1031 sscomparam(struct tty *tp, struct termios *t)
1032 {
1033 struct sscom_softc *sc = device_lookup_private(&sscom_cd, SSCOMUNIT(tp->t_dev));
1034 int ospeed;
1035 u_char lcr;
1036 int s;
1037
1038 if (SSCOM_ISALIVE(sc) == 0)
1039 return EIO;
1040
1041 ospeed = sscomspeed(t->c_ospeed, sc->sc_frequency);
1042
1043 /* Check requested parameters. */
1044 if (ospeed < 0)
1045 return EINVAL;
1046 if (t->c_ispeed && t->c_ispeed != t->c_ospeed)
1047 return EINVAL;
1048
1049 /*
1050 * For the console, always force CLOCAL and !HUPCL, so that the port
1051 * is always active.
1052 */
1053 if (ISSET(sc->sc_swflags, TIOCFLAG_SOFTCAR) ||
1054 ISSET(sc->sc_hwflags, SSCOM_HW_CONSOLE)) {
1055 SET(t->c_cflag, CLOCAL);
1056 CLR(t->c_cflag, HUPCL);
1057 }
1058
1059 /*
1060 * If there were no changes, don't do anything. This avoids dropping
1061 * input and improves performance when all we did was frob things like
1062 * VMIN and VTIME.
1063 */
1064 if (tp->t_ospeed == t->c_ospeed &&
1065 tp->t_cflag == t->c_cflag)
1066 return 0;
1067
1068 lcr = cflag2lcr(t->c_cflag);
1069
1070 s = splserial();
1071 SSCOM_LOCK(sc);
1072
1073 sc->sc_ulcon = lcr;
1074
1075 /*
1076 * If we're not in a mode that assumes a connection is present, then
1077 * ignore carrier changes.
1078 */
1079 if (ISSET(t->c_cflag, CLOCAL | MDMBUF))
1080 sc->sc_msr_dcd = 0;
1081 else
1082 sc->sc_msr_dcd = MSTS_DCD;
1083
1084 /*
1085 * Set the flow control pins depending on the current flow control
1086 * mode.
1087 */
1088 if (ISSET(t->c_cflag, CRTSCTS)) {
1089 sc->sc_mcr_dtr = UMCON_DTR;
1090 sc->sc_mcr_rts = UMCON_RTS;
1091 sc->sc_msr_cts = MSTS_CTS;
1092 }
1093 else if (ISSET(t->c_cflag, MDMBUF)) {
1094 /*
1095 * For DTR/DCD flow control, make sure we don't toggle DTR for
1096 * carrier detection.
1097 */
1098 sc->sc_mcr_dtr = 0;
1099 sc->sc_mcr_rts = UMCON_DTR;
1100 sc->sc_msr_cts = MSTS_DCD;
1101 }
1102 else {
1103 /*
1104 * If no flow control, then always set RTS. This will make
1105 * the other side happy if it mistakenly thinks we're doing
1106 * RTS/CTS flow control.
1107 */
1108 sc->sc_mcr_dtr = UMCON_DTR | UMCON_RTS;
1109 sc->sc_mcr_rts = 0;
1110 sc->sc_msr_cts = 0;
1111 if (ISSET(sc->sc_umcon, UMCON_DTR))
1112 SET(sc->sc_umcon, UMCON_RTS);
1113 else
1114 CLR(sc->sc_umcon, UMCON_RTS);
1115 }
1116 sc->sc_msr_mask = sc->sc_msr_cts | sc->sc_msr_dcd;
1117
1118 if (ospeed == 0)
1119 CLR(sc->sc_umcon, sc->sc_mcr_dtr);
1120 else
1121 SET(sc->sc_umcon, sc->sc_mcr_dtr);
1122
1123 sc->sc_ubrdiv = ospeed;
1124
1125 /* And copy to tty. */
1126 tp->t_ispeed = 0;
1127 tp->t_ospeed = t->c_ospeed;
1128 tp->t_cflag = t->c_cflag;
1129
1130 if (!sc->sc_heldchange) {
1131 if (sc->sc_tx_busy) {
1132 sc->sc_heldtbc = sc->sc_tbc;
1133 sc->sc_tbc = 0;
1134 sc->sc_heldchange = 1;
1135 } else
1136 sscom_loadchannelregs(sc);
1137 }
1138
1139 if (!ISSET(t->c_cflag, CHWFLOW)) {
1140 /* Disable the high water mark. */
1141 sc->sc_r_hiwat = 0;
1142 sc->sc_r_lowat = 0;
1143 if (ISSET(sc->sc_rx_flags, RX_TTY_OVERFLOWED)) {
1144 CLR(sc->sc_rx_flags, RX_TTY_OVERFLOWED);
1145 sscom_schedrx(sc);
1146 }
1147 if (ISSET(sc->sc_rx_flags, RX_TTY_BLOCKED|RX_IBUF_BLOCKED)) {
1148 CLR(sc->sc_rx_flags, RX_TTY_BLOCKED|RX_IBUF_BLOCKED);
1149 sscom_hwiflow(sc);
1150 }
1151 } else {
1152 sc->sc_r_hiwat = sscom_rbuf_hiwat;
1153 sc->sc_r_lowat = sscom_rbuf_lowat;
1154 }
1155
1156 SSCOM_UNLOCK(sc);
1157 splx(s);
1158
1159 /*
1160 * Update the tty layer's idea of the carrier bit, in case we changed
1161 * CLOCAL or MDMBUF. We don't hang up here; we only do that by
1162 * explicit request.
1163 */
1164 (void) (*tp->t_linesw->l_modem)(tp, ISSET(sc->sc_msts, MSTS_DCD));
1165
1166 if (sscom_debug)
1167 sscomstatus(sc, "sscomparam ");
1168
1169 if (!ISSET(t->c_cflag, CHWFLOW)) {
1170 if (sc->sc_tx_stopped) {
1171 sc->sc_tx_stopped = 0;
1172 sscomstart(tp);
1173 }
1174 }
1175
1176 return 0;
1177 }
1178
1179 static void
1180 sscom_iflush(struct sscom_softc *sc)
1181 {
1182 bus_space_tag_t iot = sc->sc_iot;
1183 bus_space_handle_t ioh = sc->sc_ioh;
1184 int timo;
1185
1186
1187 timo = 50000;
1188 /* flush any pending I/O */
1189 while ( sscom_rxrdy(iot, ioh) && --timo)
1190 (void)sscom_getc(iot,ioh);
1191 #ifdef DIAGNOSTIC
1192 if (!timo)
1193 printf("%s: sscom_iflush timeout\n", device_xname(sc->sc_dev));
1194 #endif
1195 }
1196
1197 static void
1198 sscom_loadchannelregs(struct sscom_softc *sc)
1199 {
1200 bus_space_tag_t iot = sc->sc_iot;
1201 bus_space_handle_t ioh = sc->sc_ioh;
1202
1203 /* XXXXX necessary? */
1204 sscom_iflush(sc);
1205
1206 bus_space_write_2(iot, ioh, SSCOM_UCON, 0);
1207
1208 #if 0
1209 if (ISSET(sc->sc_hwflags, COM_HW_FLOW)) {
1210 bus_space_write_1(iot, ioh, com_lcr, LCR_EERS);
1211 bus_space_write_1(iot, ioh, com_efr, sc->sc_efr);
1212 }
1213 #endif
1214
1215 bus_space_write_2(iot, ioh, SSCOM_UBRDIV, sc->sc_ubrdiv);
1216 bus_space_write_1(iot, ioh, SSCOM_ULCON, sc->sc_ulcon);
1217 sc->sc_set_modem_control(sc);
1218 bus_space_write_2(iot, ioh, SSCOM_UCON, sc->sc_ucon);
1219 }
1220
1221 static int
1222 sscomhwiflow(struct tty *tp, int block)
1223 {
1224 struct sscom_softc *sc = device_lookup_private(&sscom_cd, SSCOMUNIT(tp->t_dev));
1225 int s;
1226
1227 if (SSCOM_ISALIVE(sc) == 0)
1228 return 0;
1229
1230 if (sc->sc_mcr_rts == 0)
1231 return 0;
1232
1233 s = splserial();
1234 SSCOM_LOCK(sc);
1235
1236 if (block) {
1237 if (!ISSET(sc->sc_rx_flags, RX_TTY_BLOCKED)) {
1238 SET(sc->sc_rx_flags, RX_TTY_BLOCKED);
1239 sscom_hwiflow(sc);
1240 }
1241 } else {
1242 if (ISSET(sc->sc_rx_flags, RX_TTY_OVERFLOWED)) {
1243 CLR(sc->sc_rx_flags, RX_TTY_OVERFLOWED);
1244 sscom_schedrx(sc);
1245 }
1246 if (ISSET(sc->sc_rx_flags, RX_TTY_BLOCKED)) {
1247 CLR(sc->sc_rx_flags, RX_TTY_BLOCKED);
1248 sscom_hwiflow(sc);
1249 }
1250 }
1251
1252 SSCOM_UNLOCK(sc);
1253 splx(s);
1254 return 1;
1255 }
1256
1257 /*
1258 * (un)block input via hw flowcontrol
1259 */
1260 static void
1261 sscom_hwiflow(struct sscom_softc *sc)
1262 {
1263 if (sc->sc_mcr_rts == 0)
1264 return;
1265
1266 if (ISSET(sc->sc_rx_flags, RX_ANY_BLOCK)) {
1267 CLR(sc->sc_umcon, sc->sc_mcr_rts);
1268 CLR(sc->sc_mcr_active, sc->sc_mcr_rts);
1269 } else {
1270 SET(sc->sc_umcon, sc->sc_mcr_rts);
1271 SET(sc->sc_mcr_active, sc->sc_mcr_rts);
1272 }
1273 sc->sc_set_modem_control(sc);
1274 }
1275
1276
1277 void
1278 sscomstart(struct tty *tp)
1279 {
1280 struct sscom_softc *sc = device_lookup_private(&sscom_cd, SSCOMUNIT(tp->t_dev));
1281 int s;
1282
1283 if (SSCOM_ISALIVE(sc) == 0)
1284 return;
1285
1286 s = spltty();
1287 if (ISSET(tp->t_state, TS_BUSY | TS_TIMEOUT | TS_TTSTOP))
1288 goto out;
1289 if (sc->sc_tx_stopped)
1290 goto out;
1291 if (!ttypull(tp))
1292 goto out;
1293
1294 /* Grab the first contiguous region of buffer space. */
1295 {
1296 u_char *tba;
1297 int tbc;
1298
1299 tba = tp->t_outq.c_cf;
1300 tbc = ndqb(&tp->t_outq, 0);
1301
1302 (void)splserial();
1303 SSCOM_LOCK(sc);
1304
1305 sc->sc_tba = tba;
1306 sc->sc_tbc = tbc;
1307 }
1308
1309 SET(tp->t_state, TS_BUSY);
1310 sc->sc_tx_busy = 1;
1311
1312 /* Output the first chunk of the contiguous buffer. */
1313 sscom_output_chunk(sc);
1314
1315 /* Enable transmit completion interrupts if necessary. */
1316 if ((sc->sc_hwflags & SSCOM_HW_TXINT) == 0)
1317 sscom_enable_txint(sc);
1318
1319 SSCOM_UNLOCK(sc);
1320 out:
1321 splx(s);
1322 return;
1323 }
1324
1325 /*
1326 * Stop output on a line.
1327 */
1328 void
1329 sscomstop(struct tty *tp, int flag)
1330 {
1331 struct sscom_softc *sc = device_lookup_private(&sscom_cd, SSCOMUNIT(tp->t_dev));
1332 int s;
1333
1334 s = splserial();
1335 SSCOM_LOCK(sc);
1336 if (ISSET(tp->t_state, TS_BUSY)) {
1337 /* Stop transmitting at the next chunk. */
1338 sc->sc_tbc = 0;
1339 sc->sc_heldtbc = 0;
1340 if (!ISSET(tp->t_state, TS_TTSTOP))
1341 SET(tp->t_state, TS_FLUSH);
1342 }
1343 SSCOM_UNLOCK(sc);
1344 splx(s);
1345 }
1346
1347 void
1348 sscomdiag(void *arg)
1349 {
1350 struct sscom_softc *sc = arg;
1351 int overflows, floods;
1352 int s;
1353
1354 s = splserial();
1355 SSCOM_LOCK(sc);
1356 overflows = sc->sc_overflows;
1357 sc->sc_overflows = 0;
1358 floods = sc->sc_floods;
1359 sc->sc_floods = 0;
1360 sc->sc_errors = 0;
1361 SSCOM_UNLOCK(sc);
1362 splx(s);
1363
1364 log(LOG_WARNING, "%s: %d silo overflow%s, %d ibuf flood%s\n",
1365 device_xname(sc->sc_dev),
1366 overflows, overflows == 1 ? "" : "s",
1367 floods, floods == 1 ? "" : "s");
1368 }
1369
1370 integrate void
1371 sscom_rxsoft(struct sscom_softc *sc, struct tty *tp)
1372 {
1373 int (*rint) (int, struct tty *) = tp->t_linesw->l_rint;
1374 u_char *get, *end;
1375 u_int cc, scc;
1376 u_char rsr;
1377 int code;
1378 int s;
1379
1380 end = sc->sc_ebuf;
1381 get = sc->sc_rbget;
1382 scc = cc = sscom_rbuf_size - sc->sc_rbavail;
1383
1384 if (cc == sscom_rbuf_size) {
1385 sc->sc_floods++;
1386 if (sc->sc_errors++ == 0)
1387 callout_reset(&sc->sc_diag_callout, 60 * hz,
1388 sscomdiag, sc);
1389 }
1390
1391 while (cc) {
1392 code = get[0];
1393 rsr = get[1];
1394 if (rsr) {
1395 if (ISSET(rsr, UERSTAT_OVERRUN)) {
1396 sc->sc_overflows++;
1397 if (sc->sc_errors++ == 0)
1398 callout_reset(&sc->sc_diag_callout,
1399 60 * hz, sscomdiag, sc);
1400 }
1401 if (ISSET(rsr, UERSTAT_BREAK | UERSTAT_FRAME))
1402 SET(code, TTY_FE);
1403 if (ISSET(rsr, UERSTAT_PARITY))
1404 SET(code, TTY_PE);
1405 }
1406 if ((*rint)(code, tp) == -1) {
1407 /*
1408 * The line discipline's buffer is out of space.
1409 */
1410 if (!ISSET(sc->sc_rx_flags, RX_TTY_BLOCKED)) {
1411 /*
1412 * We're either not using flow control, or the
1413 * line discipline didn't tell us to block for
1414 * some reason. Either way, we have no way to
1415 * know when there's more space available, so
1416 * just drop the rest of the data.
1417 */
1418 get += cc << 1;
1419 if (get >= end)
1420 get -= sscom_rbuf_size << 1;
1421 cc = 0;
1422 } else {
1423 /*
1424 * Don't schedule any more receive processing
1425 * until the line discipline tells us there's
1426 * space available (through sscomhwiflow()).
1427 * Leave the rest of the data in the input
1428 * buffer.
1429 */
1430 SET(sc->sc_rx_flags, RX_TTY_OVERFLOWED);
1431 }
1432 break;
1433 }
1434 get += 2;
1435 if (get >= end)
1436 get = sc->sc_rbuf;
1437 cc--;
1438 }
1439
1440 if (cc != scc) {
1441 sc->sc_rbget = get;
1442 s = splserial();
1443 SSCOM_LOCK(sc);
1444
1445 cc = sc->sc_rbavail += scc - cc;
1446 /* Buffers should be ok again, release possible block. */
1447 if (cc >= sc->sc_r_lowat) {
1448 if (ISSET(sc->sc_rx_flags, RX_IBUF_OVERFLOWED)) {
1449 CLR(sc->sc_rx_flags, RX_IBUF_OVERFLOWED);
1450 sscom_enable_rxint(sc);
1451 sc->sc_ucon |= UCON_ERRINT;
1452 bus_space_write_2(sc->sc_iot, sc->sc_ioh, SSCOM_UCON,
1453 sc->sc_ucon);
1454
1455 }
1456 if (ISSET(sc->sc_rx_flags, RX_IBUF_BLOCKED)) {
1457 CLR(sc->sc_rx_flags, RX_IBUF_BLOCKED);
1458 sscom_hwiflow(sc);
1459 }
1460 }
1461 SSCOM_UNLOCK(sc);
1462 splx(s);
1463 }
1464 }
1465
1466 integrate void
1467 sscom_txsoft(struct sscom_softc *sc, struct tty *tp)
1468 {
1469
1470 CLR(tp->t_state, TS_BUSY);
1471 if (ISSET(tp->t_state, TS_FLUSH))
1472 CLR(tp->t_state, TS_FLUSH);
1473 else
1474 ndflush(&tp->t_outq, (int)(sc->sc_tba - tp->t_outq.c_cf));
1475 (*tp->t_linesw->l_start)(tp);
1476 }
1477
1478 integrate void
1479 sscom_stsoft(struct sscom_softc *sc, struct tty *tp)
1480 {
1481 u_char msr, delta;
1482 int s;
1483
1484 s = splserial();
1485 SSCOM_LOCK(sc);
1486 msr = sc->sc_msts;
1487 delta = sc->sc_msr_delta;
1488 sc->sc_msr_delta = 0;
1489 SSCOM_UNLOCK(sc);
1490 splx(s);
1491
1492 if (ISSET(delta, sc->sc_msr_dcd)) {
1493 /*
1494 * Inform the tty layer that carrier detect changed.
1495 */
1496 (void) (*tp->t_linesw->l_modem)(tp, ISSET(msr, MSTS_DCD));
1497 }
1498
1499 if (ISSET(delta, sc->sc_msr_cts)) {
1500 /* Block or unblock output according to flow control. */
1501 if (ISSET(msr, sc->sc_msr_cts)) {
1502 sc->sc_tx_stopped = 0;
1503 (*tp->t_linesw->l_start)(tp);
1504 } else {
1505 sc->sc_tx_stopped = 1;
1506 }
1507 }
1508
1509 if (sscom_debug)
1510 sscomstatus(sc, "sscom_stsoft");
1511 }
1512
1513 void
1514 sscomsoft(void *arg)
1515 {
1516 struct sscom_softc *sc = arg;
1517 struct tty *tp;
1518
1519 if (SSCOM_ISALIVE(sc) == 0)
1520 return;
1521
1522 {
1523 tp = sc->sc_tty;
1524
1525 if (sc->sc_rx_ready) {
1526 sc->sc_rx_ready = 0;
1527 sscom_rxsoft(sc, tp);
1528 }
1529
1530 if (sc->sc_st_check) {
1531 sc->sc_st_check = 0;
1532 sscom_stsoft(sc, tp);
1533 }
1534
1535 if (sc->sc_tx_done) {
1536 sc->sc_tx_done = 0;
1537 sscom_txsoft(sc, tp);
1538 }
1539 }
1540 }
1541
1542
1543 int
1544 sscomrxintr(void *arg)
1545 {
1546 struct sscom_softc *sc = arg;
1547 bus_space_tag_t iot = sc->sc_iot;
1548 bus_space_handle_t ioh = sc->sc_ioh;
1549 u_char *put, *end;
1550 u_int cc;
1551
1552 if (SSCOM_ISALIVE(sc) == 0)
1553 return 0;
1554
1555 SSCOM_LOCK(sc);
1556
1557 end = sc->sc_ebuf;
1558 put = sc->sc_rbput;
1559 cc = sc->sc_rbavail;
1560
1561 do {
1562 u_char msts, delta;
1563 u_char uerstat;
1564 uint16_t ufstat;
1565
1566 ufstat = bus_space_read_2(iot, ioh, SSCOM_UFSTAT);
1567
1568 /* XXX: break interrupt with no character? */
1569
1570 if ( (ufstat & (UFSTAT_RXCOUNT|UFSTAT_RXFULL)) &&
1571 !ISSET(sc->sc_rx_flags, RX_IBUF_OVERFLOWED)) {
1572
1573 while (cc > 0) {
1574 int cn_trapped = 0;
1575
1576 /* get status and received character.
1577 read status register first */
1578 uerstat = sscom_geterr(iot, ioh);
1579 put[0] = sscom_getc(iot, ioh);
1580
1581 if (ISSET(uerstat, UERSTAT_BREAK)) {
1582 int con_trapped = 0;
1583 cn_check_magic(sc->sc_tty->t_dev,
1584 CNC_BREAK, sscom_cnm_state);
1585 if (con_trapped)
1586 continue;
1587 #if defined(KGDB)
1588 if (ISSET(sc->sc_hwflags,
1589 SSCOM_HW_KGDB)) {
1590 kgdb_connect(1);
1591 continue;
1592 }
1593 #endif
1594 }
1595
1596 put[1] = uerstat;
1597 cn_check_magic(sc->sc_tty->t_dev,
1598 put[0], sscom_cnm_state);
1599 if (!cn_trapped) {
1600 put += 2;
1601 if (put >= end)
1602 put = sc->sc_rbuf;
1603 cc--;
1604 }
1605
1606 ufstat = bus_space_read_2(iot, ioh, SSCOM_UFSTAT);
1607 if ( (ufstat & (UFSTAT_RXFULL|UFSTAT_RXCOUNT)) == 0 )
1608 break;
1609 }
1610
1611 /*
1612 * Current string of incoming characters ended because
1613 * no more data was available or we ran out of space.
1614 * Schedule a receive event if any data was received.
1615 * If we're out of space, turn off receive interrupts.
1616 */
1617 sc->sc_rbput = put;
1618 sc->sc_rbavail = cc;
1619 if (!ISSET(sc->sc_rx_flags, RX_TTY_OVERFLOWED))
1620 sc->sc_rx_ready = 1;
1621
1622 /*
1623 * See if we are in danger of overflowing a buffer. If
1624 * so, use hardware flow control to ease the pressure.
1625 */
1626 if (!ISSET(sc->sc_rx_flags, RX_IBUF_BLOCKED) &&
1627 cc < sc->sc_r_hiwat) {
1628 SET(sc->sc_rx_flags, RX_IBUF_BLOCKED);
1629 sscom_hwiflow(sc);
1630 }
1631
1632 /*
1633 * If we're out of space, disable receive interrupts
1634 * until the queue has drained a bit.
1635 */
1636 if (!cc) {
1637 SET(sc->sc_rx_flags, RX_IBUF_OVERFLOWED);
1638 sscom_disable_rxint(sc);
1639 sc->sc_ucon &= ~UCON_ERRINT;
1640 bus_space_write_2(iot, ioh, SSCOM_UCON, sc->sc_ucon);
1641 }
1642 }
1643
1644
1645 msts = sc->sc_read_modem_status(sc);
1646 delta = msts ^ sc->sc_msts;
1647 sc->sc_msts = msts;
1648
1649 #ifdef notyet
1650 /*
1651 * Pulse-per-second (PSS) signals on edge of DCD?
1652 * Process these even if line discipline is ignoring DCD.
1653 */
1654 if (delta & sc->sc_ppsmask) {
1655 struct timeval tv;
1656 if ((msr & sc->sc_ppsmask) == sc->sc_ppsassert) {
1657 /* XXX nanotime() */
1658 microtime(&tv);
1659 TIMEVAL_TO_TIMESPEC(&tv,
1660 &sc->ppsinfo.assert_timestamp);
1661 if (sc->ppsparam.mode & PPS_OFFSETASSERT) {
1662 timespecadd(&sc->ppsinfo.assert_timestamp,
1663 &sc->ppsparam.assert_offset,
1664 &sc->ppsinfo.assert_timestamp);
1665 }
1666
1667 #ifdef PPS_SYNC
1668 if (sc->ppsparam.mode & PPS_HARDPPSONASSERT)
1669 hardpps(&tv, tv.tv_usec);
1670 #endif
1671 sc->ppsinfo.assert_sequence++;
1672 sc->ppsinfo.current_mode = sc->ppsparam.mode;
1673
1674 } else if ((msr & sc->sc_ppsmask) == sc->sc_ppsclear) {
1675 /* XXX nanotime() */
1676 microtime(&tv);
1677 TIMEVAL_TO_TIMESPEC(&tv,
1678 &sc->ppsinfo.clear_timestamp);
1679 if (sc->ppsparam.mode & PPS_OFFSETCLEAR) {
1680 timespecadd(&sc->ppsinfo.clear_timestamp,
1681 &sc->ppsparam.clear_offset,
1682 &sc->ppsinfo.clear_timestamp);
1683 }
1684
1685 #ifdef PPS_SYNC
1686 if (sc->ppsparam.mode & PPS_HARDPPSONCLEAR)
1687 hardpps(&tv, tv.tv_usec);
1688 #endif
1689 sc->ppsinfo.clear_sequence++;
1690 sc->ppsinfo.current_mode = sc->ppsparam.mode;
1691 }
1692 }
1693 #endif
1694
1695 /*
1696 * Process normal status changes
1697 */
1698 if (ISSET(delta, sc->sc_msr_mask)) {
1699 SET(sc->sc_msr_delta, delta);
1700
1701 /*
1702 * Stop output immediately if we lose the output
1703 * flow control signal or carrier detect.
1704 */
1705 if (ISSET(~msts, sc->sc_msr_mask)) {
1706 sc->sc_tbc = 0;
1707 sc->sc_heldtbc = 0;
1708 #ifdef SSCOM_DEBUG
1709 if (sscom_debug)
1710 sscomstatus(sc, "sscomintr ");
1711 #endif
1712 }
1713
1714 sc->sc_st_check = 1;
1715 }
1716
1717 /*
1718 * Done handling any receive interrupts.
1719 */
1720
1721 /*
1722 * If we've delayed a parameter change, do it
1723 * now, and restart * output.
1724 */
1725 if ((ufstat & UFSTAT_TXCOUNT) == 0) {
1726 /* XXX: we should check transmitter empty also */
1727
1728 if (sc->sc_heldchange) {
1729 sscom_loadchannelregs(sc);
1730 sc->sc_heldchange = 0;
1731 sc->sc_tbc = sc->sc_heldtbc;
1732 sc->sc_heldtbc = 0;
1733 }
1734 }
1735
1736
1737 } while (0);
1738
1739 SSCOM_UNLOCK(sc);
1740
1741 /* Wake up the poller. */
1742 softint_schedule(sc->sc_si);
1743
1744 #ifdef RND_COM
1745 rnd_add_uint32(&sc->rnd_source, iir | rsr);
1746 #endif
1747
1748 return 1;
1749 }
1750
1751 int
1752 sscomtxintr(void *arg)
1753 {
1754 struct sscom_softc *sc = arg;
1755 bus_space_tag_t iot = sc->sc_iot;
1756 bus_space_handle_t ioh = sc->sc_ioh;
1757 uint16_t ufstat;
1758
1759 if (SSCOM_ISALIVE(sc) == 0)
1760 return 0;
1761
1762 SSCOM_LOCK(sc);
1763
1764 ufstat = bus_space_read_2(iot, ioh, SSCOM_UFSTAT);
1765
1766 /*
1767 * If we've delayed a parameter change, do it
1768 * now, and restart * output.
1769 */
1770 if (sc->sc_heldchange && (ufstat & UFSTAT_TXCOUNT) == 0) {
1771 /* XXX: we should check transmitter empty also */
1772 sscom_loadchannelregs(sc);
1773 sc->sc_heldchange = 0;
1774 sc->sc_tbc = sc->sc_heldtbc;
1775 sc->sc_heldtbc = 0;
1776 }
1777
1778 /*
1779 * See if data can be transmitted as well. Schedule tx
1780 * done event if no data left and tty was marked busy.
1781 */
1782 if (!ISSET(ufstat,UFSTAT_TXFULL)) {
1783 /*
1784 * Output the next chunk of the contiguous
1785 * buffer, if any.
1786 */
1787 if (sc->sc_tbc > 0) {
1788 __sscom_output_chunk(sc, ufstat);
1789 }
1790 else {
1791 /*
1792 * Disable transmit sscompletion
1793 * interrupts if necessary.
1794 */
1795 if (sc->sc_hwflags & SSCOM_HW_TXINT)
1796 sscom_disable_txint(sc);
1797 if (sc->sc_tx_busy) {
1798 sc->sc_tx_busy = 0;
1799 sc->sc_tx_done = 1;
1800 }
1801 }
1802 }
1803
1804 SSCOM_UNLOCK(sc);
1805
1806 /* Wake up the poller. */
1807 softint_schedule(sc->sc_si);
1808
1809 #ifdef RND_COM
1810 rnd_add_uint32(&sc->rnd_source, iir | rsr);
1811 #endif
1812
1813 return 1;
1814 }
1815
1816
1817 #if defined(KGDB) || defined(SSCOM0CONSOLE) || defined(SSCOM1CONSOLE)
1818 /*
1819 * Initialize UART for use as console or KGDB line.
1820 */
1821 static int
1822 sscom_init(bus_space_tag_t iot, const struct sscom_uart_info *config,
1823 int rate, int frequency, tcflag_t cflag, bus_space_handle_t *iohp)
1824 {
1825 bus_space_handle_t ioh;
1826 bus_addr_t iobase = config->iobase;
1827
1828 if (bus_space_map(iot, iobase, SSCOM_SIZE, 0, &ioh))
1829 return ENOMEM; /* ??? */
1830
1831 bus_space_write_2(iot, ioh, SSCOM_UCON, 0);
1832 bus_space_write_1(iot, ioh, SSCOM_UFCON,
1833 #ifdef SSCOM_S3C2440
1834 UFCON_TXTRIGGER_16 | UFCON_RXTRIGGER_16 |
1835 #else
1836 UFCON_TXTRIGGER_8 | UFCON_RXTRIGGER_8 |
1837 #endif
1838 UFCON_TXFIFO_RESET | UFCON_RXFIFO_RESET |
1839 UFCON_FIFO_ENABLE );
1840 /* tx/rx fifo reset are auto-cleared */
1841
1842 rate = sscomspeed(rate, frequency);
1843 bus_space_write_2(iot, ioh, SSCOM_UBRDIV, rate);
1844 bus_space_write_2(iot, ioh, SSCOM_ULCON, cflag2lcr(cflag));
1845
1846 /* enable UART */
1847 bus_space_write_2(iot, ioh, SSCOM_UCON,
1848 UCON_TXMODE_INT|UCON_RXMODE_INT);
1849 bus_space_write_2(iot, ioh, SSCOM_UMCON, UMCON_RTS);
1850
1851 *iohp = ioh;
1852 return 0;
1853 }
1854
1855 #endif
1856
1857 #if defined(SSCOM0CONSOLE) || defined(SSCOM1CONSOLE)
1858 /*
1859 * Following are all routines needed for SSCOM to act as console
1860 */
1861 struct consdev sscomcons = {
1862 NULL, NULL, sscomcngetc, sscomcnputc, sscomcnpollc, NULL,
1863 NULL, NULL, NODEV, CN_NORMAL
1864 };
1865
1866
1867 int
1868 sscom_cnattach(bus_space_tag_t iot, const struct sscom_uart_info *config,
1869 int rate, int frequency, tcflag_t cflag)
1870 {
1871 int res;
1872
1873 res = sscom_init(iot, config, rate, frequency, cflag, &sscomconsioh);
1874 if (res)
1875 return res;
1876
1877 cn_tab = &sscomcons;
1878 cn_init_magic(&sscom_cnm_state);
1879 cn_set_magic("\047\001"); /* default magic is BREAK */
1880
1881 sscomconstag = iot;
1882 sscomconsunit = config->unit;
1883 sscomconsrate = rate;
1884 sscomconscflag = cflag;
1885
1886 return 0;
1887 }
1888
1889 void
1890 sscom_cndetach(void)
1891 {
1892 bus_space_unmap(sscomconstag, sscomconsioh, SSCOM_SIZE);
1893 sscomconstag = NULL;
1894
1895 cn_tab = NULL;
1896 }
1897
1898 /*
1899 * The read-ahead code is so that you can detect pending in-band
1900 * cn_magic in polled mode while doing output rather than having to
1901 * wait until the kernel decides it needs input.
1902 */
1903
1904 #define MAX_READAHEAD 20
1905 static int sscom_readahead[MAX_READAHEAD];
1906 static int sscom_readaheadcount = 0;
1907
1908 int
1909 sscomcngetc(dev_t dev)
1910 {
1911 int s = splserial();
1912 u_char __attribute__((__unused__)) stat;
1913 u_char c;
1914
1915 /* got a character from reading things earlier */
1916 if (sscom_readaheadcount > 0) {
1917 int i;
1918
1919 c = sscom_readahead[0];
1920 for (i = 1; i < sscom_readaheadcount; i++) {
1921 sscom_readahead[i-1] = sscom_readahead[i];
1922 }
1923 sscom_readaheadcount--;
1924 splx(s);
1925 return c;
1926 }
1927
1928 /* block until a character becomes available */
1929 while (!sscom_rxrdy(sscomconstag, sscomconsioh))
1930 ;
1931
1932 c = sscom_getc(sscomconstag, sscomconsioh);
1933 stat = sscom_geterr(sscomconstag, sscomconsioh);
1934 {
1935 int __attribute__((__unused__))cn_trapped = 0;
1936 #ifdef DDB
1937 extern int db_active;
1938 if (!db_active)
1939 #endif
1940 cn_check_magic(dev, c, sscom_cnm_state);
1941 }
1942 splx(s);
1943 return c;
1944 }
1945
1946 /*
1947 * Console kernel output character routine.
1948 */
1949 void
1950 sscomcnputc(dev_t dev, int c)
1951 {
1952 int s = splserial();
1953 int timo;
1954
1955 int cin;
1956 int __attribute__((__unused__)) stat;
1957 if (sscom_readaheadcount < MAX_READAHEAD &&
1958 sscom_rxrdy(sscomconstag, sscomconsioh)) {
1959
1960 int __attribute__((__unused__))cn_trapped = 0;
1961 cin = sscom_getc(sscomconstag, sscomconsioh);
1962 stat = sscom_geterr(sscomconstag, sscomconsioh);
1963 cn_check_magic(dev, cin, sscom_cnm_state);
1964 sscom_readahead[sscom_readaheadcount++] = cin;
1965 }
1966
1967 /* wait for any pending transmission to finish */
1968 timo = 150000;
1969 while (ISSET(bus_space_read_2(sscomconstag, sscomconsioh, SSCOM_UFSTAT),
1970 UFSTAT_TXFULL) && --timo)
1971 continue;
1972
1973 bus_space_write_1(sscomconstag, sscomconsioh, SSCOM_UTXH, c);
1974 SSCOM_BARRIER(sscomconstag, sscomconsioh, BR | BW);
1975
1976 #if 0
1977 /* wait for this transmission to complete */
1978 timo = 1500000;
1979 while (!ISSET(bus_space_read_1(sscomconstag, sscomconsioh, SSCOM_UTRSTAT),
1980 UTRSTAT_TXEMPTY) && --timo)
1981 continue;
1982 #endif
1983 splx(s);
1984 }
1985
1986 void
1987 sscomcnpollc(dev_t dev, int on)
1988 {
1989
1990 sscom_readaheadcount = 0;
1991 }
1992
1993 #endif /* SSCOM0CONSOLE||SSCOM1CONSOLE */
1994
1995 #ifdef KGDB
1996 int
1997 sscom_kgdb_attach(bus_space_tag_t iot, const struct sscom_uart_info *config,
1998 int rate, int frequency, tcflag_t cflag)
1999 {
2000 int res;
2001
2002 if (iot == sscomconstag && config->unit == sscomconsunit) {
2003 printf( "console==kgdb_port (%d): kgdb disabled\n", sscomconsunit);
2004 return EBUSY; /* cannot share with console */
2005 }
2006
2007 res = sscom_init(iot, config, rate, frequency, cflag, &sscom_kgdb_ioh);
2008 if (res)
2009 return res;
2010
2011 kgdb_attach(sscom_kgdb_getc, sscom_kgdb_putc, NULL);
2012 kgdb_dev = 123; /* unneeded, only to satisfy some tests */
2013
2014 sscom_kgdb_iot = iot;
2015 sscom_kgdb_unit = config->unit;
2016
2017 return 0;
2018 }
2019
2020 /* ARGSUSED */
2021 int
2022 sscom_kgdb_getc(void *arg)
2023 {
2024 int c, stat;
2025
2026 /* block until a character becomes available */
2027 while (!sscom_rxrdy(sscom_kgdb_iot, sscom_kgdb_ioh))
2028 ;
2029
2030 c = sscom_getc(sscom_kgdb_iot, sscom_kgdb_ioh);
2031 stat = sscom_geterr(sscom_kgdb_iot, sscom_kgdb_ioh);
2032
2033 return c;
2034 }
2035
2036 /* ARGSUSED */
2037 void
2038 sscom_kgdb_putc(void *arg, int c)
2039 {
2040 int timo;
2041
2042 /* wait for any pending transmission to finish */
2043 timo = 150000;
2044 while (ISSET(bus_space_read_2(sscom_kgdb_iot, sscom_kgdb_ioh,
2045 SSCOM_UFSTAT), UFSTAT_TXFULL) && --timo)
2046 continue;
2047
2048 bus_space_write_1(sscom_kgdb_iot, sscom_kgdb_ioh, SSCOM_UTXH, c);
2049 SSCOM_BARRIER(sscom_kgdb_iot, sscom_kgdb_ioh, BR | BW);
2050
2051 #if 0
2052 /* wait for this transmission to complete */
2053 timo = 1500000;
2054 while (!ISSET(bus_space_read_1(sscom_kgdb_iot, sscom_kgdb_ioh,
2055 SSCOM_UTRSTAT), UTRSTAT_TXEMPTY) && --timo)
2056 continue;
2057 #endif
2058 }
2059 #endif /* KGDB */
2060
2061 /* helper function to identify the sscom ports used by
2062 console or KGDB (and not yet autoconf attached) */
2063 int
2064 sscom_is_console(bus_space_tag_t iot, int unit,
2065 bus_space_handle_t *ioh)
2066 {
2067 bus_space_handle_t help;
2068
2069 if (!sscomconsattached &&
2070 iot == sscomconstag && unit == sscomconsunit)
2071 help = sscomconsioh;
2072 #ifdef KGDB
2073 else if (!sscom_kgdb_attached &&
2074 iot == sscom_kgdb_iot && unit == sscom_kgdb_unit)
2075 help = sscom_kgdb_ioh;
2076 #endif
2077 else
2078 return 0;
2079
2080 if (ioh)
2081 *ioh = help;
2082 return 1;
2083 }
2084