kd.c revision 1.7 1 1.7 gwr /* $NetBSD: kd.c,v 1.7 1994/12/12 18:59:20 gwr Exp $ */
2 1.4 cgd
3 1.1 gwr /*
4 1.1 gwr * Copyright (c) 1994 Gordon W. Ross
5 1.1 gwr * All rights reserved.
6 1.1 gwr *
7 1.1 gwr * Redistribution and use in source and binary forms, with or without
8 1.1 gwr * modification, are permitted provided that the following conditions
9 1.1 gwr * are met:
10 1.1 gwr * 1. Redistributions of source code must retain the above copyright
11 1.1 gwr * notice, this list of conditions and the following disclaimer.
12 1.1 gwr * 2. Redistributions in binary form must reproduce the above copyright
13 1.1 gwr * notice, this list of conditions and the following disclaimer in the
14 1.1 gwr * documentation and/or other materials provided with the distribution.
15 1.2 gwr * 3. The name of the author may not be used to endorse or promote products
16 1.1 gwr * derived from this software without specific prior written permission.
17 1.1 gwr *
18 1.2 gwr * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
19 1.2 gwr * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
20 1.2 gwr * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
21 1.2 gwr * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
22 1.2 gwr * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
23 1.2 gwr * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
24 1.2 gwr * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
25 1.2 gwr * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
26 1.2 gwr * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
27 1.2 gwr * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
28 1.1 gwr */
29 1.1 gwr
30 1.1 gwr /*
31 1.1 gwr * Keyboard/Display device.
32 1.1 gwr *
33 1.1 gwr * This driver exists simply to provide a tty device that
34 1.1 gwr * the indirect console driver can point to.
35 1.1 gwr * The kbd driver sends its input here.
36 1.1 gwr * Output goes to the screen via PROM printf.
37 1.1 gwr */
38 1.1 gwr
39 1.1 gwr #include <sys/param.h>
40 1.1 gwr #include <sys/proc.h>
41 1.1 gwr #include <sys/systm.h>
42 1.1 gwr #include <sys/ioctl.h>
43 1.1 gwr #include <sys/tty.h>
44 1.1 gwr #include <sys/file.h>
45 1.1 gwr #include <sys/conf.h>
46 1.1 gwr #include <sys/device.h>
47 1.1 gwr
48 1.1 gwr #include <machine/autoconf.h>
49 1.1 gwr #include <machine/mon.h>
50 1.1 gwr
51 1.1 gwr #include <dev/cons.h>
52 1.1 gwr
53 1.1 gwr #define BURST 64
54 1.1 gwr
55 1.1 gwr struct tty *kd_tty[1];
56 1.1 gwr
57 1.1 gwr int kdopen(dev_t, int, int, struct proc *);
58 1.1 gwr int kdclose(dev_t, int, int, struct proc *);
59 1.1 gwr int kdread(dev_t, struct uio *, int);
60 1.1 gwr int kdwrite(dev_t, struct uio *, int);
61 1.1 gwr int kdioctl(dev_t, int, caddr_t, int, struct proc *);
62 1.1 gwr
63 1.1 gwr static int kdparam(struct tty *, struct termios *);
64 1.1 gwr static void kdstart(struct tty *);
65 1.1 gwr
66 1.7 gwr /* This is called by kbd_serial() like a pseudo-device. */
67 1.7 gwr void
68 1.7 gwr kd_attach(n)
69 1.7 gwr int n;
70 1.1 gwr {
71 1.1 gwr kd_tty[0] = ttymalloc();
72 1.1 gwr
73 1.1 gwr /* Tell keyboard module where to send read data. */
74 1.1 gwr kbd_ascii(kd_tty[0]);
75 1.1 gwr }
76 1.1 gwr
77 1.1 gwr int
78 1.1 gwr kdopen(dev, flag, mode, p)
79 1.1 gwr dev_t dev;
80 1.1 gwr int flag, mode;
81 1.1 gwr struct proc *p;
82 1.1 gwr {
83 1.3 gwr int error, unit;
84 1.1 gwr struct tty *tp;
85 1.1 gwr
86 1.1 gwr unit = minor(dev);
87 1.1 gwr if (unit) return ENXIO;
88 1.1 gwr
89 1.1 gwr tp = kd_tty[unit];
90 1.1 gwr if (tp == NULL)
91 1.1 gwr return ENXIO;
92 1.3 gwr
93 1.3 gwr if ((error = kbd_init()) != 0)
94 1.3 gwr return (error);
95 1.1 gwr
96 1.1 gwr tp->t_oproc = kdstart;
97 1.1 gwr tp->t_param = kdparam;
98 1.1 gwr tp->t_dev = dev;
99 1.1 gwr if ((tp->t_state & TS_ISOPEN) == 0) {
100 1.1 gwr tp->t_state |= TS_WOPEN;
101 1.1 gwr ttychars(tp);
102 1.1 gwr tp->t_iflag = TTYDEF_IFLAG;
103 1.1 gwr tp->t_oflag = TTYDEF_OFLAG;
104 1.1 gwr tp->t_cflag = TTYDEF_CFLAG;
105 1.1 gwr tp->t_lflag = TTYDEF_LFLAG;
106 1.1 gwr tp->t_ispeed = tp->t_ospeed = TTYDEF_SPEED;
107 1.1 gwr kdparam(tp, &tp->t_termios);
108 1.1 gwr ttsetwater(tp);
109 1.1 gwr } else if (tp->t_state & TS_XCLUDE && p->p_ucred->cr_uid != 0)
110 1.1 gwr return EBUSY;
111 1.1 gwr tp->t_state |= TS_CARR_ON;
112 1.1 gwr
113 1.1 gwr return ((*linesw[tp->t_line].l_open)(dev, tp));
114 1.1 gwr }
115 1.1 gwr
116 1.1 gwr int
117 1.1 gwr kdclose(dev, flag, mode, p)
118 1.1 gwr dev_t dev;
119 1.1 gwr int flag, mode;
120 1.1 gwr struct proc *p;
121 1.1 gwr {
122 1.1 gwr int unit = minor(dev);
123 1.1 gwr struct tty *tp = kd_tty[unit];
124 1.1 gwr
125 1.1 gwr (*linesw[tp->t_line].l_close)(tp, flag);
126 1.1 gwr ttyclose(tp);
127 1.1 gwr return (0);
128 1.1 gwr }
129 1.1 gwr
130 1.1 gwr int
131 1.1 gwr kdread(dev, uio, flag)
132 1.1 gwr dev_t dev;
133 1.1 gwr struct uio *uio;
134 1.1 gwr int flag;
135 1.1 gwr {
136 1.1 gwr int unit = minor(dev);
137 1.1 gwr struct tty *tp = kd_tty[unit];
138 1.1 gwr
139 1.1 gwr return ((*linesw[tp->t_line].l_read)(tp, uio, flag));
140 1.1 gwr }
141 1.1 gwr
142 1.1 gwr int
143 1.1 gwr kdwrite(dev, uio, flag)
144 1.1 gwr dev_t dev;
145 1.1 gwr struct uio *uio;
146 1.1 gwr int flag;
147 1.1 gwr {
148 1.1 gwr int unit = minor(dev);
149 1.1 gwr struct tty *tp = kd_tty[unit];
150 1.1 gwr
151 1.1 gwr return ((*linesw[tp->t_line].l_write)(tp, uio, flag));
152 1.1 gwr }
153 1.1 gwr
154 1.1 gwr int
155 1.1 gwr kdioctl(dev, cmd, data, flag, p)
156 1.1 gwr dev_t dev;
157 1.1 gwr int cmd;
158 1.1 gwr caddr_t data;
159 1.1 gwr int flag;
160 1.1 gwr struct proc *p;
161 1.1 gwr {
162 1.1 gwr int error;
163 1.1 gwr int unit = minor(dev);
164 1.1 gwr struct tty *tp = kd_tty[unit];
165 1.1 gwr
166 1.1 gwr error = (*linesw[tp->t_line].l_ioctl)(tp, cmd, data, flag, p);
167 1.1 gwr if (error >= 0)
168 1.1 gwr return error;
169 1.1 gwr error = ttioctl(tp, cmd, data, flag, p);
170 1.1 gwr if (error >= 0)
171 1.1 gwr return error;
172 1.1 gwr
173 1.1 gwr /* Handle any ioctl commands specific to kbd/display. */
174 1.1 gwr /* XXX - Send KB* ioctls to kbd module? */
175 1.1 gwr /* XXX - Send FB* ioctls to fb module? */
176 1.1 gwr
177 1.1 gwr return ENOTTY;
178 1.1 gwr }
179 1.1 gwr
180 1.1 gwr void
181 1.1 gwr kdstart(tp)
182 1.1 gwr struct tty *tp;
183 1.1 gwr {
184 1.1 gwr struct clist *cl;
185 1.1 gwr int s, len;
186 1.1 gwr u_char buf[BURST];
187 1.1 gwr
188 1.1 gwr s = spltty();
189 1.1 gwr if (tp->t_state & (TS_BUSY|TS_TTSTOP|TS_TIMEOUT))
190 1.1 gwr goto out;
191 1.1 gwr tp->t_state |= TS_BUSY;
192 1.1 gwr cl = &tp->t_outq;
193 1.1 gwr
194 1.1 gwr /*
195 1.1 gwr * XXX - It might be nice to have our own fbputs() so
196 1.1 gwr * we would not have to use the (slow) PROM printf.
197 1.1 gwr */
198 1.1 gwr while ((len = q_to_b(cl, buf, BURST-1)) > 0) {
199 1.1 gwr buf[len] = '\0';
200 1.1 gwr (void) splhigh();
201 1.1 gwr #if 0
202 1.1 gwr /* XXX - Not yet. Not sure what args should be. */
203 1.1 gwr (romVectorPtr->fbWriteStr)(buf);
204 1.1 gwr #else
205 1.1 gwr mon_printf("%s", buf);
206 1.1 gwr #endif
207 1.1 gwr (void) spltty();
208 1.1 gwr }
209 1.1 gwr
210 1.1 gwr tp->t_state &= ~TS_BUSY;
211 1.1 gwr if (tp->t_state & TS_ASLEEP) {
212 1.1 gwr tp->t_state &= ~TS_ASLEEP;
213 1.1 gwr wakeup((caddr_t)cl);
214 1.1 gwr }
215 1.1 gwr selwakeup(&tp->t_wsel);
216 1.1 gwr out:
217 1.1 gwr splx(s);
218 1.1 gwr }
219 1.1 gwr
220 1.1 gwr static int
221 1.1 gwr kdparam(tp, t)
222 1.1 gwr struct tty *tp;
223 1.1 gwr struct termios *t;
224 1.1 gwr {
225 1.1 gwr /* XXX - These are ignored... */
226 1.1 gwr tp->t_ispeed = t->c_ispeed;
227 1.1 gwr tp->t_ospeed = t->c_ospeed;
228 1.1 gwr tp->t_cflag = t->c_cflag;
229 1.1 gwr return 0;
230 1.1 gwr }
231 1.1 gwr
232 1.1 gwr
233 1.1 gwr /*
234 1.1 gwr * kd console support
235 1.1 gwr *
236 1.1 gwr * XXX - Using prom routines for now...
237 1.1 gwr */
238 1.1 gwr
239 1.1 gwr extern int zscnprobe_kbd();
240 1.1 gwr
241 1.1 gwr kdcnprobe(cp)
242 1.1 gwr struct consdev *cp;
243 1.1 gwr {
244 1.1 gwr int maj;
245 1.1 gwr
246 1.1 gwr /* locate the major number */
247 1.1 gwr for (maj = 0; maj < nchrdev; maj++)
248 1.6 gwr if (cdevsw[maj].d_open == (void*)kdopen)
249 1.1 gwr break;
250 1.1 gwr
251 1.1 gwr /* initialize required fields */
252 1.1 gwr cp->cn_dev = makedev(maj, 0);
253 1.1 gwr cp->cn_pri = zscnprobe_kbd();
254 1.1 gwr }
255 1.1 gwr
256 1.1 gwr kdcninit(cp)
257 1.1 gwr struct consdev *cp;
258 1.1 gwr {
259 1.1 gwr mon_printf("console on kd0 (keyboard/display)\n");
260 1.1 gwr }
261 1.1 gwr
262 1.1 gwr kdcngetc(dev)
263 1.1 gwr dev_t dev;
264 1.1 gwr {
265 1.1 gwr int c, s;
266 1.1 gwr
267 1.1 gwr /* XXX - Does mon_may_getchar() require the NMI clock? */
268 1.1 gwr s = splhigh();
269 1.1 gwr do c = mon_may_getchar();
270 1.1 gwr while (c < 0);
271 1.1 gwr splx(s);
272 1.1 gwr
273 1.1 gwr if (c == '\r')
274 1.1 gwr c = '\n';
275 1.1 gwr return (c);
276 1.1 gwr }
277 1.1 gwr
278 1.1 gwr kdcnputc(dev, c)
279 1.1 gwr dev_t dev;
280 1.1 gwr int c;
281 1.1 gwr {
282 1.1 gwr int s;
283 1.1 gwr
284 1.1 gwr s = splhigh();
285 1.1 gwr #if 0
286 1.1 gwr /* XXX - Is this worth doing? */
287 1.1 gwr (romVectorPtr->fbWriteChar)(c);
288 1.1 gwr #else
289 1.1 gwr mon_putchar(c);
290 1.1 gwr #endif
291 1.1 gwr splx(s);
292 1.1 gwr }
293