Home | History | Annotate | Line # | Download | only in arcbios
arcbios_tty.c revision 1.3.2.4
      1  1.3.2.4  nathanw /*	$NetBSD: arcbios_tty.c,v 1.3.2.4 2002/11/11 22:08:57 nathanw Exp $	*/
      2  1.3.2.2  nathanw 
      3  1.3.2.2  nathanw /*
      4  1.3.2.2  nathanw  * Copyright (c) 1994, 1995, 1996 Carnegie-Mellon University.
      5  1.3.2.2  nathanw  * All rights reserved.
      6  1.3.2.2  nathanw  *
      7  1.3.2.2  nathanw  * Author: Chris G. Demetriou
      8  1.3.2.2  nathanw  *
      9  1.3.2.2  nathanw  * Permission to use, copy, modify and distribute this software and
     10  1.3.2.2  nathanw  * its documentation is hereby granted, provided that both the copyright
     11  1.3.2.2  nathanw  * notice and this permission notice appear in all copies of the
     12  1.3.2.2  nathanw  * software, derivative works or modified versions, and any portions
     13  1.3.2.2  nathanw  * thereof, and that both notices appear in supporting documentation.
     14  1.3.2.2  nathanw  *
     15  1.3.2.2  nathanw  * CARNEGIE MELLON ALLOWS FREE USE OF THIS SOFTWARE IN ITS "AS IS"
     16  1.3.2.2  nathanw  * CONDITION.  CARNEGIE MELLON DISCLAIMS ANY LIABILITY OF ANY KIND
     17  1.3.2.2  nathanw  * FOR ANY DAMAGES WHATSOEVER RESULTING FROM THE USE OF THIS SOFTWARE.
     18  1.3.2.2  nathanw  *
     19  1.3.2.2  nathanw  * Carnegie Mellon requests users of this software to return to
     20  1.3.2.2  nathanw  *
     21  1.3.2.2  nathanw  *  Software Distribution Coordinator  or  Software.Distribution (at) CS.CMU.EDU
     22  1.3.2.2  nathanw  *  School of Computer Science
     23  1.3.2.2  nathanw  *  Carnegie Mellon University
     24  1.3.2.2  nathanw  *  Pittsburgh PA 15213-3890
     25  1.3.2.2  nathanw  *
     26  1.3.2.2  nathanw  * any improvements or extensions that they make and grant Carnegie the
     27  1.3.2.2  nathanw  * rights to redistribute these changes.
     28  1.3.2.2  nathanw  */
     29  1.3.2.2  nathanw 
     30  1.3.2.2  nathanw #include <sys/cdefs.h>
     31  1.3.2.4  nathanw __KERNEL_RCSID(0, "$NetBSD: arcbios_tty.c,v 1.3.2.4 2002/11/11 22:08:57 nathanw Exp $");
     32  1.3.2.2  nathanw 
     33  1.3.2.2  nathanw #include <sys/param.h>
     34  1.3.2.2  nathanw #include <sys/user.h>
     35  1.3.2.2  nathanw #include <sys/uio.h>
     36  1.3.2.2  nathanw #include <sys/systm.h>
     37  1.3.2.2  nathanw #include <sys/callout.h>
     38  1.3.2.2  nathanw #include <sys/kernel.h>
     39  1.3.2.2  nathanw #include <sys/conf.h>
     40  1.3.2.2  nathanw #include <sys/proc.h>
     41  1.3.2.2  nathanw #include <sys/tty.h>
     42  1.3.2.2  nathanw #include <sys/termios.h>
     43  1.3.2.2  nathanw 
     44  1.3.2.2  nathanw #include <dev/cons.h>
     45  1.3.2.2  nathanw 
     46  1.3.2.2  nathanw #include <dev/arcbios/arcbios.h>
     47  1.3.2.2  nathanw #include <dev/arcbios/arcbiosvar.h>
     48  1.3.2.2  nathanw 
     49  1.3.2.2  nathanw struct callout arcbios_tty_ch = CALLOUT_INITIALIZER;
     50  1.3.2.2  nathanw 
     51  1.3.2.2  nathanw static struct tty *arcbios_tty[1];
     52  1.3.2.2  nathanw 
     53  1.3.2.2  nathanw void	arcbios_tty_start(struct tty *);
     54  1.3.2.2  nathanw void	arcbios_tty_poll(void *);
     55  1.3.2.2  nathanw int	arcbios_tty_param(struct tty *, struct termios *);
     56  1.3.2.2  nathanw 
     57  1.3.2.3  nathanw dev_type_open(arcbios_ttyopen);
     58  1.3.2.3  nathanw dev_type_close(arcbios_ttyclose);
     59  1.3.2.3  nathanw dev_type_read(arcbios_ttyread);
     60  1.3.2.3  nathanw dev_type_write(arcbios_ttywrite);
     61  1.3.2.3  nathanw dev_type_ioctl(arcbios_ttyioctl);
     62  1.3.2.3  nathanw dev_type_stop(arcbios_ttystop);
     63  1.3.2.3  nathanw dev_type_tty(arcbios_ttytty);
     64  1.3.2.3  nathanw dev_type_poll(arcbios_ttypoll);
     65  1.3.2.3  nathanw 
     66  1.3.2.3  nathanw const struct cdevsw arcbios_cdevsw = {
     67  1.3.2.3  nathanw 	arcbios_ttyopen, arcbios_ttyclose, arcbios_ttyread, arcbios_ttywrite,
     68  1.3.2.3  nathanw 	arcbios_ttyioctl, arcbios_ttystop, arcbios_ttytty, arcbios_ttypoll,
     69  1.3.2.4  nathanw 	nommap, ttykqfilter, D_TTY,
     70  1.3.2.3  nathanw };
     71  1.3.2.2  nathanw 
     72  1.3.2.2  nathanw int
     73  1.3.2.2  nathanw arcbios_ttyopen(dev_t dev, int flag, int mode, struct proc *p)
     74  1.3.2.2  nathanw {
     75  1.3.2.2  nathanw 	int unit = minor(dev);
     76  1.3.2.2  nathanw 	struct tty *tp;
     77  1.3.2.2  nathanw 	int s, error = 0, setuptimeout = 0;
     78  1.3.2.2  nathanw 
     79  1.3.2.2  nathanw 	if (unit != 0)
     80  1.3.2.2  nathanw 		return (ENODEV);
     81  1.3.2.2  nathanw 
     82  1.3.2.2  nathanw 	s = spltty();
     83  1.3.2.2  nathanw 
     84  1.3.2.2  nathanw 	if (arcbios_tty[unit] == NULL) {
     85  1.3.2.2  nathanw 		tp = arcbios_tty[unit] = ttymalloc();
     86  1.3.2.2  nathanw 		tty_attach(tp);
     87  1.3.2.2  nathanw 	} else
     88  1.3.2.2  nathanw 		tp = arcbios_tty[unit];
     89  1.3.2.2  nathanw 
     90  1.3.2.2  nathanw 	tp->t_oproc = arcbios_tty_start;
     91  1.3.2.2  nathanw 	tp->t_param = arcbios_tty_param;
     92  1.3.2.2  nathanw 	tp->t_dev = dev;
     93  1.3.2.2  nathanw 	if ((tp->t_state & TS_ISOPEN) == 0) {
     94  1.3.2.2  nathanw 		tp->t_state |= TS_CARR_ON;
     95  1.3.2.2  nathanw 		ttychars(tp);
     96  1.3.2.2  nathanw 		tp->t_iflag = TTYDEF_IFLAG;
     97  1.3.2.2  nathanw 		tp->t_oflag = TTYDEF_OFLAG;
     98  1.3.2.2  nathanw 		tp->t_cflag = TTYDEF_CFLAG | CLOCAL;
     99  1.3.2.2  nathanw 		tp->t_lflag = TTYDEF_LFLAG;
    100  1.3.2.2  nathanw 		tp->t_ispeed = tp->t_ospeed = 9600;
    101  1.3.2.2  nathanw 		ttsetwater(tp);
    102  1.3.2.2  nathanw 
    103  1.3.2.2  nathanw 		setuptimeout = 1;
    104  1.3.2.2  nathanw 	} else if (tp->t_state & TS_XCLUDE && p->p_ucred->cr_uid != 0) {
    105  1.3.2.2  nathanw 		splx(s);
    106  1.3.2.2  nathanw 		return (EBUSY);
    107  1.3.2.2  nathanw 	}
    108  1.3.2.2  nathanw 
    109  1.3.2.2  nathanw 	splx(s);
    110  1.3.2.2  nathanw 
    111  1.3.2.2  nathanw 	error = (*tp->t_linesw->l_open)(dev, tp);
    112  1.3.2.2  nathanw 	if (error == 0 && setuptimeout)
    113  1.3.2.2  nathanw 		callout_reset(&arcbios_tty_ch, 1, arcbios_tty_poll, tp);
    114  1.3.2.2  nathanw 
    115  1.3.2.2  nathanw 	return (error);
    116  1.3.2.2  nathanw }
    117  1.3.2.2  nathanw 
    118  1.3.2.2  nathanw int
    119  1.3.2.2  nathanw arcbios_ttyclose(dev_t dev, int flag, int mode, struct proc *p)
    120  1.3.2.2  nathanw {
    121  1.3.2.2  nathanw 	int unit = minor(dev);
    122  1.3.2.2  nathanw 	struct tty *tp = arcbios_tty[unit];
    123  1.3.2.2  nathanw 
    124  1.3.2.2  nathanw 	callout_stop(&arcbios_tty_ch);
    125  1.3.2.2  nathanw 	(*tp->t_linesw->l_close)(tp, flag);
    126  1.3.2.2  nathanw 	ttyclose(tp);
    127  1.3.2.2  nathanw 	return (0);
    128  1.3.2.2  nathanw }
    129  1.3.2.2  nathanw 
    130  1.3.2.2  nathanw int
    131  1.3.2.2  nathanw arcbios_ttyread(dev_t dev, struct uio *uio, int flag)
    132  1.3.2.2  nathanw {
    133  1.3.2.2  nathanw 	struct tty *tp = arcbios_tty[minor(dev)];
    134  1.3.2.2  nathanw 
    135  1.3.2.2  nathanw 	return ((*tp->t_linesw->l_read)(tp, uio, flag));
    136  1.3.2.2  nathanw }
    137  1.3.2.2  nathanw 
    138  1.3.2.2  nathanw int
    139  1.3.2.2  nathanw arcbios_ttywrite(dev_t dev, struct uio *uio, int flag)
    140  1.3.2.2  nathanw {
    141  1.3.2.2  nathanw 	struct tty *tp = arcbios_tty[minor(dev)];
    142  1.3.2.2  nathanw 
    143  1.3.2.2  nathanw 	return ((*tp->t_linesw->l_write)(tp, uio, flag));
    144  1.3.2.2  nathanw }
    145  1.3.2.2  nathanw 
    146  1.3.2.2  nathanw int
    147  1.3.2.2  nathanw arcbios_ttypoll(dev_t dev, int events, struct proc *p)
    148  1.3.2.2  nathanw {
    149  1.3.2.2  nathanw 	struct tty *tp = arcbios_tty[minor(dev)];
    150  1.3.2.2  nathanw 
    151  1.3.2.2  nathanw 	return ((*tp->t_linesw->l_poll)(tp, events, p));
    152  1.3.2.2  nathanw }
    153  1.3.2.2  nathanw 
    154  1.3.2.2  nathanw int
    155  1.3.2.2  nathanw arcbios_ttyioctl(dev_t dev, u_long cmd, caddr_t data, int flag, struct proc *p)
    156  1.3.2.2  nathanw {
    157  1.3.2.2  nathanw 	int unit = minor(dev);
    158  1.3.2.2  nathanw 	struct tty *tp = arcbios_tty[unit];
    159  1.3.2.2  nathanw 	int error;
    160  1.3.2.2  nathanw 
    161  1.3.2.2  nathanw 	error = (*tp->t_linesw->l_ioctl)(tp, cmd, data, flag, p);
    162  1.3.2.2  nathanw 	if (error != EPASSTHROUGH)
    163  1.3.2.2  nathanw 		return (error);
    164  1.3.2.2  nathanw 	return (ttioctl(tp, cmd, data, flag, p));
    165  1.3.2.2  nathanw }
    166  1.3.2.2  nathanw 
    167  1.3.2.2  nathanw int
    168  1.3.2.2  nathanw arcbios_tty_param(struct tty *tp, struct termios *t)
    169  1.3.2.2  nathanw {
    170  1.3.2.2  nathanw 
    171  1.3.2.2  nathanw 	return (0);
    172  1.3.2.2  nathanw }
    173  1.3.2.2  nathanw 
    174  1.3.2.2  nathanw void
    175  1.3.2.2  nathanw arcbios_tty_start(struct tty *tp)
    176  1.3.2.2  nathanw {
    177  1.3.2.2  nathanw 	uint32_t count;
    178  1.3.2.2  nathanw 	int s;
    179  1.3.2.2  nathanw 
    180  1.3.2.2  nathanw 	s = spltty();
    181  1.3.2.2  nathanw 	if (tp->t_state & (TS_TTSTOP | TS_BUSY))
    182  1.3.2.2  nathanw 		goto out;
    183  1.3.2.2  nathanw 	if (tp->t_outq.c_cc <= tp->t_lowat) {
    184  1.3.2.2  nathanw 		if (tp->t_state & TS_ASLEEP) {
    185  1.3.2.2  nathanw 			tp->t_state &= ~TS_ASLEEP;
    186  1.3.2.2  nathanw 			wakeup((caddr_t)&tp->t_outq);
    187  1.3.2.2  nathanw 		}
    188  1.3.2.2  nathanw 		selwakeup(&tp->t_wsel);
    189  1.3.2.2  nathanw 	}
    190  1.3.2.2  nathanw 	tp->t_state |= TS_BUSY;
    191  1.3.2.2  nathanw 	while (tp->t_outq.c_cc != 0) {
    192  1.3.2.2  nathanw 		(*ARCBIOS->Write)(ARCBIOS_STDOUT, tp->t_outq.c_cf,
    193  1.3.2.2  nathanw 		    ndqb(&tp->t_outq, 0), &count);
    194  1.3.2.2  nathanw 		ndflush(&tp->t_outq, count);
    195  1.3.2.2  nathanw 	}
    196  1.3.2.2  nathanw 	tp->t_state &= ~TS_BUSY;
    197  1.3.2.2  nathanw  out:
    198  1.3.2.2  nathanw 	splx(s);
    199  1.3.2.2  nathanw }
    200  1.3.2.2  nathanw 
    201  1.3.2.2  nathanw void
    202  1.3.2.2  nathanw arcbios_ttystop(struct tty *tp, int flag)
    203  1.3.2.2  nathanw {
    204  1.3.2.2  nathanw 	int s;
    205  1.3.2.2  nathanw 
    206  1.3.2.2  nathanw 	s = spltty();
    207  1.3.2.2  nathanw 	if (tp->t_state & TS_BUSY)
    208  1.3.2.2  nathanw 		if ((tp->t_state & TS_TTSTOP) == 0)
    209  1.3.2.2  nathanw 			tp->t_state |= TS_FLUSH;
    210  1.3.2.2  nathanw 	splx(s);
    211  1.3.2.2  nathanw }
    212  1.3.2.2  nathanw 
    213  1.3.2.2  nathanw static int
    214  1.3.2.2  nathanw arcbios_tty_getchar(int *cp)
    215  1.3.2.2  nathanw {
    216  1.3.2.2  nathanw 	char c;
    217  1.3.2.2  nathanw 	int32_t q;
    218  1.3.2.2  nathanw 	u_int32_t count;
    219  1.3.2.2  nathanw 
    220  1.3.2.2  nathanw 	q = ARCBIOS->GetReadStatus(ARCBIOS_STDIN);
    221  1.3.2.2  nathanw 
    222  1.3.2.2  nathanw 	if (q == 0) {
    223  1.3.2.2  nathanw 		ARCBIOS->Read(ARCBIOS_STDIN, &c, 1, &count);
    224  1.3.2.2  nathanw 		*cp = c;
    225  1.3.2.2  nathanw 
    226  1.3.2.2  nathanw 		return 1;
    227  1.3.2.2  nathanw 	}
    228  1.3.2.2  nathanw 
    229  1.3.2.2  nathanw 	return 0;
    230  1.3.2.2  nathanw }
    231  1.3.2.2  nathanw 
    232  1.3.2.2  nathanw void
    233  1.3.2.2  nathanw arcbios_tty_poll(void *v)
    234  1.3.2.2  nathanw {
    235  1.3.2.2  nathanw 	struct tty *tp = v;
    236  1.3.2.2  nathanw 	int c, l_r;
    237  1.3.2.2  nathanw 
    238  1.3.2.2  nathanw 	while (arcbios_tty_getchar(&c)) {
    239  1.3.2.2  nathanw 		if (tp->t_state & TS_ISOPEN)
    240  1.3.2.2  nathanw 			l_r = (*tp->t_linesw->l_rint)(c, tp);
    241  1.3.2.2  nathanw 	}
    242  1.3.2.2  nathanw 	callout_reset(&arcbios_tty_ch, 1, arcbios_tty_poll, tp);
    243  1.3.2.2  nathanw }
    244  1.3.2.2  nathanw 
    245  1.3.2.2  nathanw struct tty *
    246  1.3.2.2  nathanw arcbios_ttytty(dev_t dev)
    247  1.3.2.2  nathanw {
    248  1.3.2.2  nathanw 
    249  1.3.2.2  nathanw 	if (minor(dev) != 0)
    250  1.3.2.2  nathanw 		panic("arcbios_ttytty: bogus");
    251  1.3.2.2  nathanw 
    252  1.3.2.2  nathanw 	return (arcbios_tty[0]);
    253  1.3.2.2  nathanw }
    254