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