kd.c revision 1.41 1 1.41 elad /* $NetBSD: kd.c,v 1.41 2006/10/01 18:56:22 elad Exp $ */
2 1.1 gwr
3 1.1 gwr /*-
4 1.1 gwr * Copyright (c) 1996 The NetBSD Foundation, Inc.
5 1.1 gwr * All rights reserved.
6 1.1 gwr *
7 1.1 gwr * This code is derived from software contributed to The NetBSD Foundation
8 1.1 gwr * by Gordon W. Ross.
9 1.1 gwr *
10 1.1 gwr * Redistribution and use in source and binary forms, with or without
11 1.1 gwr * modification, are permitted provided that the following conditions
12 1.1 gwr * are met:
13 1.1 gwr * 1. Redistributions of source code must retain the above copyright
14 1.1 gwr * notice, this list of conditions and the following disclaimer.
15 1.1 gwr * 2. Redistributions in binary form must reproduce the above copyright
16 1.1 gwr * notice, this list of conditions and the following disclaimer in the
17 1.1 gwr * documentation and/or other materials provided with the distribution.
18 1.1 gwr * 3. All advertising materials mentioning features or use of this software
19 1.1 gwr * must display the following acknowledgement:
20 1.1 gwr * This product includes software developed by the NetBSD
21 1.1 gwr * Foundation, Inc. and its contributors.
22 1.1 gwr * 4. Neither the name of The NetBSD Foundation nor the names of its
23 1.1 gwr * contributors may be used to endorse or promote products derived
24 1.1 gwr * from this software without specific prior written permission.
25 1.1 gwr *
26 1.1 gwr * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
27 1.1 gwr * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
28 1.1 gwr * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
29 1.1 gwr * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
30 1.1 gwr * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
31 1.1 gwr * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
32 1.1 gwr * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
33 1.1 gwr * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
34 1.1 gwr * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
35 1.1 gwr * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
36 1.1 gwr * POSSIBILITY OF SUCH DAMAGE.
37 1.1 gwr */
38 1.1 gwr
39 1.1 gwr /*
40 1.7 pk * Console driver based on PROM primitives.
41 1.1 gwr *
42 1.7 pk * This driver exists to provide a tty device that the indirect
43 1.7 pk * console driver can point to. It also provides a hook that
44 1.7 pk * allows another device to serve console input. This will normally
45 1.7 pk * be a keyboard driver (see sys/dev/sun/kbd.c)
46 1.1 gwr */
47 1.26 lukem
48 1.26 lukem #include <sys/cdefs.h>
49 1.41 elad __KERNEL_RCSID(0, "$NetBSD: kd.c,v 1.41 2006/10/01 18:56:22 elad Exp $");
50 1.18 pk
51 1.18 pk #include "opt_kgdb.h"
52 1.19 pk #include "fb.h"
53 1.1 gwr
54 1.1 gwr #include <sys/param.h>
55 1.1 gwr #include <sys/proc.h>
56 1.1 gwr #include <sys/systm.h>
57 1.7 pk #include <sys/kernel.h>
58 1.1 gwr #include <sys/ioctl.h>
59 1.1 gwr #include <sys/tty.h>
60 1.1 gwr #include <sys/file.h>
61 1.1 gwr #include <sys/conf.h>
62 1.1 gwr #include <sys/device.h>
63 1.39 elad #include <sys/kauth.h>
64 1.1 gwr
65 1.1 gwr #include <machine/bsd_openprom.h>
66 1.4 pk #include <machine/promlib.h>
67 1.1 gwr #include <machine/eeprom.h>
68 1.1 gwr #include <machine/psl.h>
69 1.1 gwr #include <machine/cpu.h>
70 1.1 gwr #include <machine/kbd.h>
71 1.1 gwr #include <machine/autoconf.h>
72 1.1 gwr
73 1.19 pk #if defined(RASTERCONSOLE) && NFB > 0
74 1.14 pk #include <dev/sun/fbio.h>
75 1.14 pk #include <dev/sun/fbvar.h>
76 1.1 gwr #endif
77 1.1 gwr
78 1.7 pk #include <dev/cons.h>
79 1.7 pk #include <sparc/dev/cons.h>
80 1.1 gwr
81 1.7 pk #include <dev/sun/event_var.h>
82 1.1 gwr #include <dev/sun/kbd_xlate.h>
83 1.7 pk #include <dev/sun/kbdvar.h>
84 1.1 gwr
85 1.1 gwr #define PUT_WSIZE 64
86 1.1 gwr
87 1.1 gwr struct kd_softc {
88 1.1 gwr struct device kd_dev; /* required first: base device */
89 1.1 gwr struct tty *kd_tty;
90 1.1 gwr int rows, cols;
91 1.7 pk
92 1.7 pk /* Console input hook */
93 1.7 pk struct cons_channel *kd_in;
94 1.1 gwr };
95 1.1 gwr
96 1.1 gwr /*
97 1.1 gwr * There is no point in pretending there might be
98 1.1 gwr * more than one keyboard/display device.
99 1.1 gwr */
100 1.1 gwr static struct kd_softc kd_softc;
101 1.1 gwr
102 1.36 uwe /* For keyboard driver to register itself as console input */
103 1.36 uwe void kd_attach_input(struct cons_channel *);
104 1.36 uwe
105 1.36 uwe static void kd_init(struct kd_softc *);
106 1.36 uwe static void kdstart(struct tty *);
107 1.36 uwe static void kd_later(void *);
108 1.36 uwe static void kd_putfb(struct tty *);
109 1.1 gwr static int kdparam(struct tty *, struct termios *);
110 1.29 uwe static void kd_cons_input(int);
111 1.1 gwr
112 1.22 gehenna dev_type_open(kdopen);
113 1.22 gehenna dev_type_close(kdclose);
114 1.22 gehenna dev_type_read(kdread);
115 1.22 gehenna dev_type_write(kdwrite);
116 1.22 gehenna dev_type_ioctl(kdioctl);
117 1.22 gehenna dev_type_tty(kdtty);
118 1.22 gehenna dev_type_poll(kdpoll);
119 1.22 gehenna
120 1.22 gehenna const struct cdevsw kd_cdevsw = {
121 1.22 gehenna kdopen, kdclose, kdread, kdwrite, kdioctl,
122 1.23 jdolecek nostop, kdtty, kdpoll, nommap, ttykqfilter, D_TTY
123 1.22 gehenna };
124 1.22 gehenna
125 1.1 gwr /*
126 1.7 pk * Prepare the console tty; called on first open of /dev/console
127 1.1 gwr */
128 1.36 uwe static void
129 1.36 uwe kd_init(struct kd_softc *kd)
130 1.1 gwr {
131 1.1 gwr struct tty *tp;
132 1.1 gwr
133 1.1 gwr tp = ttymalloc();
134 1.1 gwr tp->t_oproc = kdstart;
135 1.1 gwr tp->t_param = kdparam;
136 1.22 gehenna tp->t_dev = makedev(cdevsw_lookup_major(&kd_cdevsw), 0);
137 1.1 gwr
138 1.1 gwr tty_attach(tp);
139 1.1 gwr kd->kd_tty = tp;
140 1.1 gwr
141 1.1 gwr /*
142 1.7 pk * Get the console struct winsize.
143 1.1 gwr */
144 1.19 pk #if defined(RASTERCONSOLE) && NFB > 0
145 1.7 pk /* If the raster console driver is attached, copy its size */
146 1.7 pk kd->rows = fbrcons_rows();
147 1.7 pk kd->cols = fbrcons_cols();
148 1.8 pk rcons_ttyinit(tp);
149 1.1 gwr #endif
150 1.1 gwr
151 1.7 pk /* else, consult the PROM */
152 1.7 pk switch (prom_version()) {
153 1.31 pk char prop[6+1]; /* Enough for six digits */
154 1.7 pk struct eeprom *ep;
155 1.7 pk case PROM_OLDMON:
156 1.7 pk if ((ep = (struct eeprom *)eeprom_va) == NULL)
157 1.7 pk break;
158 1.7 pk if (kd->rows == 0)
159 1.7 pk kd->rows = (u_short)ep->eeTtyRows;
160 1.7 pk if (kd->cols == 0)
161 1.7 pk kd->cols = (u_short)ep->eeTtyCols;
162 1.7 pk break;
163 1.31 pk
164 1.7 pk case PROM_OBP_V0:
165 1.7 pk case PROM_OBP_V2:
166 1.7 pk case PROM_OBP_V3:
167 1.7 pk case PROM_OPENFIRM:
168 1.1 gwr if (kd->rows == 0 &&
169 1.31 pk prom_getoption("screen-#rows", prop, sizeof prop) == 0)
170 1.31 pk kd->rows = strtoul(prop, NULL, 10);
171 1.7 pk
172 1.1 gwr if (kd->cols == 0 &&
173 1.31 pk prom_getoption("screen-#columns", prop, sizeof prop) == 0)
174 1.31 pk kd->cols = strtoul(prop, NULL, 10);
175 1.7 pk
176 1.7 pk break;
177 1.1 gwr }
178 1.1 gwr
179 1.1 gwr return;
180 1.1 gwr }
181 1.1 gwr
182 1.1 gwr struct tty *
183 1.36 uwe kdtty(dev_t dev)
184 1.1 gwr {
185 1.1 gwr struct kd_softc *kd;
186 1.1 gwr
187 1.1 gwr kd = &kd_softc; /* XXX */
188 1.1 gwr return (kd->kd_tty);
189 1.1 gwr }
190 1.1 gwr
191 1.1 gwr int
192 1.38 christos kdopen(dev_t dev, int flag, int mode, struct lwp *l)
193 1.1 gwr {
194 1.1 gwr struct kd_softc *kd;
195 1.1 gwr int error, s, unit;
196 1.1 gwr struct tty *tp;
197 1.7 pk static int firstopen = 1;
198 1.7 pk
199 1.1 gwr unit = minor(dev);
200 1.1 gwr if (unit != 0)
201 1.1 gwr return ENXIO;
202 1.7 pk
203 1.1 gwr kd = &kd_softc; /* XXX */
204 1.7 pk if (firstopen) {
205 1.7 pk kd_init(kd);
206 1.7 pk firstopen = 0;
207 1.7 pk }
208 1.7 pk
209 1.1 gwr tp = kd->kd_tty;
210 1.1 gwr
211 1.1 gwr /* It's simpler to do this up here. */
212 1.41 elad if (kauth_authorize_device_tty(l->l_cred, KAUTH_DEVICE_TTY_OPEN, tp))
213 1.1 gwr return (EBUSY);
214 1.1 gwr
215 1.1 gwr s = spltty();
216 1.1 gwr if ((tp->t_state & TS_ISOPEN) == 0) {
217 1.1 gwr /* First open. */
218 1.7 pk
219 1.7 pk /* Notify the input device that serves us */
220 1.7 pk struct cons_channel *cc = kd->kd_in;
221 1.7 pk if (cc != NULL &&
222 1.7 pk (error = (*cc->cc_iopen)(cc)) != 0) {
223 1.7 pk return (error);
224 1.7 pk }
225 1.7 pk
226 1.1 gwr ttychars(tp);
227 1.1 gwr tp->t_iflag = TTYDEF_IFLAG;
228 1.1 gwr tp->t_oflag = TTYDEF_OFLAG;
229 1.1 gwr tp->t_cflag = TTYDEF_CFLAG;
230 1.1 gwr tp->t_lflag = TTYDEF_LFLAG;
231 1.1 gwr tp->t_ispeed = tp->t_ospeed = TTYDEF_SPEED;
232 1.1 gwr (void) kdparam(tp, &tp->t_termios);
233 1.1 gwr ttsetwater(tp);
234 1.1 gwr tp->t_winsize.ws_row = kd->rows;
235 1.1 gwr tp->t_winsize.ws_col = kd->cols;
236 1.1 gwr /* Flush pending input? Clear translator? */
237 1.1 gwr /* This (pseudo)device always has SOFTCAR */
238 1.1 gwr tp->t_state |= TS_CARR_ON;
239 1.1 gwr }
240 1.1 gwr
241 1.1 gwr splx(s);
242 1.1 gwr
243 1.16 eeh return ((*tp->t_linesw->l_open)(dev, tp));
244 1.1 gwr }
245 1.1 gwr
246 1.1 gwr int
247 1.38 christos kdclose(dev_t dev, int flag, int mode, struct lwp *l)
248 1.1 gwr {
249 1.1 gwr struct kd_softc *kd;
250 1.1 gwr struct tty *tp;
251 1.7 pk struct cons_channel *cc;
252 1.1 gwr
253 1.1 gwr kd = &kd_softc; /* XXX */
254 1.1 gwr tp = kd->kd_tty;
255 1.1 gwr
256 1.1 gwr /* XXX This is for cons.c. */
257 1.1 gwr if ((tp->t_state & TS_ISOPEN) == 0)
258 1.1 gwr return 0;
259 1.1 gwr
260 1.16 eeh (*tp->t_linesw->l_close)(tp, flag);
261 1.1 gwr ttyclose(tp);
262 1.7 pk
263 1.7 pk if ((cc = kd->kd_in) != NULL)
264 1.13 pk (void)(*cc->cc_iclose)(cc);
265 1.7 pk
266 1.1 gwr return (0);
267 1.1 gwr }
268 1.1 gwr
269 1.1 gwr int
270 1.36 uwe kdread(dev_t dev, struct uio *uio, int flag)
271 1.1 gwr {
272 1.1 gwr struct kd_softc *kd;
273 1.1 gwr struct tty *tp;
274 1.1 gwr
275 1.1 gwr kd = &kd_softc; /* XXX */
276 1.1 gwr tp = kd->kd_tty;
277 1.1 gwr
278 1.16 eeh return ((*tp->t_linesw->l_read)(tp, uio, flag));
279 1.1 gwr }
280 1.1 gwr
281 1.1 gwr int
282 1.36 uwe kdwrite(dev_t dev, struct uio *uio, int flag)
283 1.1 gwr {
284 1.1 gwr struct kd_softc *kd;
285 1.1 gwr struct tty *tp;
286 1.1 gwr
287 1.1 gwr kd = &kd_softc; /* XXX */
288 1.1 gwr tp = kd->kd_tty;
289 1.1 gwr
290 1.16 eeh return ((*tp->t_linesw->l_write)(tp, uio, flag));
291 1.17 scw }
292 1.17 scw
293 1.17 scw int
294 1.38 christos kdpoll(dev_t dev, int events, struct lwp *l)
295 1.17 scw {
296 1.17 scw struct kd_softc *kd;
297 1.17 scw struct tty *tp;
298 1.17 scw
299 1.17 scw kd = &kd_softc; /* XXX */
300 1.17 scw tp = kd->kd_tty;
301 1.37 uwe
302 1.38 christos return ((*tp->t_linesw->l_poll)(tp, events, l));
303 1.1 gwr }
304 1.1 gwr
305 1.1 gwr int
306 1.38 christos kdioctl(dev_t dev, u_long cmd, caddr_t data, int flag, struct lwp *l)
307 1.1 gwr {
308 1.1 gwr struct kd_softc *kd;
309 1.1 gwr struct tty *tp;
310 1.1 gwr int error;
311 1.1 gwr
312 1.1 gwr kd = &kd_softc; /* XXX */
313 1.1 gwr tp = kd->kd_tty;
314 1.1 gwr
315 1.38 christos error = (*tp->t_linesw->l_ioctl)(tp, cmd, data, flag, l);
316 1.21 atatat if (error != EPASSTHROUGH)
317 1.1 gwr return error;
318 1.21 atatat
319 1.38 christos error = ttioctl(tp, cmd, data, flag, l);
320 1.21 atatat if (error != EPASSTHROUGH)
321 1.1 gwr return error;
322 1.1 gwr
323 1.1 gwr /* Handle any ioctl commands specific to kbd/display. */
324 1.1 gwr /* XXX - Send KB* ioctls to kbd module? */
325 1.1 gwr /* XXX - Send FB* ioctls to fb module? */
326 1.1 gwr
327 1.21 atatat return EPASSTHROUGH;
328 1.1 gwr }
329 1.1 gwr
330 1.1 gwr static int
331 1.36 uwe kdparam(struct tty *tp, struct termios *t)
332 1.1 gwr {
333 1.36 uwe
334 1.1 gwr /* XXX - These are ignored... */
335 1.1 gwr tp->t_ispeed = t->c_ispeed;
336 1.1 gwr tp->t_ospeed = t->c_ospeed;
337 1.1 gwr tp->t_cflag = t->c_cflag;
338 1.1 gwr return 0;
339 1.1 gwr }
340 1.1 gwr
341 1.1 gwr static void
342 1.36 uwe kdstart(struct tty *tp)
343 1.1 gwr {
344 1.1 gwr struct clist *cl;
345 1.7 pk int s;
346 1.1 gwr
347 1.1 gwr s = spltty();
348 1.1 gwr if (tp->t_state & (TS_BUSY|TS_TTSTOP|TS_TIMEOUT))
349 1.1 gwr goto out;
350 1.1 gwr
351 1.1 gwr cl = &tp->t_outq;
352 1.1 gwr if (cl->c_cc) {
353 1.7 pk tp->t_state |= TS_BUSY;
354 1.7 pk if ((s & PSR_PIL) == 0) {
355 1.7 pk /* called at level zero - update screen now. */
356 1.7 pk (void) spllowersoftclock();
357 1.7 pk kd_putfb(tp);
358 1.7 pk (void) spltty();
359 1.7 pk tp->t_state &= ~TS_BUSY;
360 1.1 gwr } else {
361 1.7 pk /* called at interrupt level - do it later */
362 1.10 hannken callout_reset(&tp->t_rstrt_ch, 0, kd_later, tp);
363 1.1 gwr }
364 1.1 gwr }
365 1.1 gwr if (cl->c_cc <= tp->t_lowat) {
366 1.1 gwr if (tp->t_state & TS_ASLEEP) {
367 1.1 gwr tp->t_state &= ~TS_ASLEEP;
368 1.1 gwr wakeup((caddr_t)cl);
369 1.1 gwr }
370 1.1 gwr selwakeup(&tp->t_wsel);
371 1.1 gwr }
372 1.1 gwr out:
373 1.1 gwr splx(s);
374 1.1 gwr }
375 1.1 gwr
376 1.1 gwr /*
377 1.1 gwr * Timeout function to do delayed writes to the screen.
378 1.1 gwr * Called at splsoftclock when requested by kdstart.
379 1.1 gwr */
380 1.1 gwr static void
381 1.36 uwe kd_later(void *arg)
382 1.1 gwr {
383 1.7 pk struct tty *tp = arg;
384 1.7 pk int s;
385 1.1 gwr
386 1.1 gwr kd_putfb(tp);
387 1.1 gwr
388 1.1 gwr s = spltty();
389 1.1 gwr tp->t_state &= ~TS_BUSY;
390 1.16 eeh (*tp->t_linesw->l_start)(tp);
391 1.1 gwr splx(s);
392 1.1 gwr }
393 1.1 gwr
394 1.1 gwr /*
395 1.1 gwr * Put text on the screen using the PROM monitor.
396 1.1 gwr * This can take a while, so to avoid missing
397 1.1 gwr * interrupts, this is called at splsoftclock.
398 1.1 gwr */
399 1.1 gwr static void
400 1.36 uwe kd_putfb(struct tty *tp)
401 1.1 gwr {
402 1.1 gwr char buf[PUT_WSIZE];
403 1.1 gwr struct clist *cl = &tp->t_outq;
404 1.1 gwr char *p, *end;
405 1.1 gwr int len;
406 1.1 gwr
407 1.1 gwr while ((len = q_to_b(cl, buf, PUT_WSIZE-1)) > 0) {
408 1.1 gwr /* PROM will barf if high bits are set. */
409 1.1 gwr p = buf;
410 1.1 gwr end = buf + len;
411 1.1 gwr while (p < end)
412 1.1 gwr *p++ &= 0x7f;
413 1.4 pk
414 1.1 gwr /* Now let the PROM print it. */
415 1.4 pk prom_putstr(buf, len);
416 1.1 gwr }
417 1.1 gwr }
418 1.1 gwr
419 1.1 gwr /*
420 1.1 gwr * Our "interrupt" routine for input. This is called by
421 1.1 gwr * the keyboard driver (dev/sun/kbd.c) at spltty.
422 1.1 gwr */
423 1.36 uwe static void
424 1.36 uwe kd_cons_input(int c)
425 1.1 gwr {
426 1.1 gwr struct kd_softc *kd = &kd_softc;
427 1.1 gwr struct tty *tp;
428 1.1 gwr
429 1.1 gwr /* XXX: Make sure the device is open. */
430 1.1 gwr tp = kd->kd_tty;
431 1.1 gwr if (tp == NULL)
432 1.1 gwr return;
433 1.1 gwr if ((tp->t_state & TS_ISOPEN) == 0)
434 1.1 gwr return;
435 1.1 gwr
436 1.16 eeh (*tp->t_linesw->l_rint)(c, tp);
437 1.1 gwr }
438 1.1 gwr
439 1.7 pk void
440 1.36 uwe cons_attach_input(struct cons_channel *cc, struct consdev *cn)
441 1.7 pk {
442 1.7 pk struct kd_softc *kd = &kd_softc;
443 1.7 pk
444 1.7 pk kd->kd_in = cc;
445 1.7 pk cc->cc_upstream = kd_cons_input;
446 1.7 pk }
447 1.7 pk
448 1.15 christos void
449 1.36 uwe kd_attach_input(struct cons_channel *cc)
450 1.15 christos {
451 1.15 christos struct kd_softc *kd = &kd_softc;
452 1.15 christos
453 1.15 christos kd->kd_in = cc;
454 1.15 christos cc->cc_upstream = kd_cons_input;
455 1.15 christos }
456 1.7 pk
457 1.7 pk /*
458 1.7 pk * Default PROM-based console input stream
459 1.7 pk * Since the PROM does not notify us when data is available on the
460 1.7 pk * input channel these functions periodically poll the PROM.
461 1.7 pk */
462 1.29 uwe static int kd_rom_iopen(struct cons_channel *);
463 1.29 uwe static int kd_rom_iclose(struct cons_channel *);
464 1.29 uwe static void kd_rom_intr(void *);
465 1.7 pk
466 1.30 uwe static struct cons_channel prom_cons_channel = {
467 1.30 uwe NULL, /* no private data */
468 1.30 uwe kd_rom_iopen,
469 1.30 uwe kd_rom_iclose,
470 1.30 uwe NULL /* will be set by kd driver */
471 1.30 uwe };
472 1.30 uwe
473 1.30 uwe static struct callout prom_cons_callout = CALLOUT_INITIALIZER;
474 1.7 pk
475 1.36 uwe static int
476 1.36 uwe kd_rom_iopen(struct cons_channel *cc)
477 1.7 pk {
478 1.30 uwe
479 1.7 pk /* Poll for ROM input 4 times per second */
480 1.30 uwe callout_reset(&prom_cons_callout, hz / 4, kd_rom_intr, cc);
481 1.7 pk return (0);
482 1.7 pk }
483 1.7 pk
484 1.36 uwe static int
485 1.36 uwe kd_rom_iclose(struct cons_channel *cc)
486 1.7 pk {
487 1.7 pk
488 1.30 uwe callout_stop(&prom_cons_callout);
489 1.7 pk return (0);
490 1.7 pk }
491 1.7 pk
492 1.7 pk /*
493 1.7 pk * "Interrupt" routine for input through ROM vectors
494 1.7 pk */
495 1.36 uwe static void
496 1.36 uwe kd_rom_intr(void *arg)
497 1.7 pk {
498 1.7 pk struct cons_channel *cc = arg;
499 1.7 pk int s, c;
500 1.7 pk
501 1.30 uwe callout_schedule(&prom_cons_callout, hz / 4);
502 1.7 pk
503 1.7 pk s = spltty();
504 1.7 pk
505 1.7 pk while ((c = prom_peekchar()) >= 0)
506 1.7 pk (*cc->cc_upstream)(c);
507 1.7 pk
508 1.7 pk splx(s);
509 1.7 pk }
510 1.1 gwr
511 1.7 pk /*****************************************************************/
512 1.7 pk
513 1.7 pk int prom_stdin_node;
514 1.7 pk int prom_stdout_node;
515 1.7 pk char prom_stdin_args[16];
516 1.7 pk char prom_stdout_args[16];
517 1.7 pk
518 1.36 uwe static void prom_cnprobe(struct consdev *);
519 1.29 uwe static void prom_cninit(struct consdev *);
520 1.36 uwe int prom_cngetc(dev_t); /* XXX: for sunkbd_wskbd_cngetc */
521 1.29 uwe static void prom_cnputc(dev_t, int);
522 1.36 uwe static void prom_cnpollc(dev_t, int);
523 1.7 pk
524 1.7 pk /*
525 1.7 pk * The console is set to this one initially,
526 1.7 pk * which lets us use the PROM until consinit()
527 1.7 pk * is called to select a real console.
528 1.7 pk */
529 1.7 pk struct consdev consdev_prom = {
530 1.7 pk prom_cnprobe,
531 1.7 pk prom_cninit,
532 1.7 pk prom_cngetc,
533 1.7 pk prom_cnputc,
534 1.7 pk prom_cnpollc,
535 1.6 thorpej NULL,
536 1.1 gwr };
537 1.1 gwr
538 1.7 pk /*
539 1.7 pk * The console table pointer is statically initialized
540 1.7 pk * to point to the PROM table, so that early calls to printf will work.
541 1.7 pk */
542 1.7 pk struct consdev *cn_tab = &consdev_prom;
543 1.7 pk
544 1.36 uwe static void
545 1.36 uwe prom_cnprobe(struct consdev *cn)
546 1.1 gwr {
547 1.1 gwr }
548 1.1 gwr
549 1.1 gwr static void
550 1.36 uwe prom_cninit(struct consdev *cn)
551 1.1 gwr {
552 1.7 pk }
553 1.1 gwr
554 1.36 uwe static void
555 1.36 uwe prom_cnpollc(dev_t dev, int on)
556 1.7 pk {
557 1.1 gwr
558 1.7 pk if (on) {
559 1.7 pk /* Entering debugger. */
560 1.7 pk #if NFB > 0
561 1.7 pk fb_unblank();
562 1.7 pk #endif
563 1.7 pk } else {
564 1.7 pk /* Resuming kernel. */
565 1.7 pk }
566 1.7 pk }
567 1.1 gwr
568 1.1 gwr
569 1.7 pk /*
570 1.7 pk * PROM console input putchar.
571 1.7 pk */
572 1.34 macallan int
573 1.36 uwe prom_cngetc(dev_t dev)
574 1.1 gwr {
575 1.7 pk int s, c;
576 1.1 gwr
577 1.7 pk s = splhigh();
578 1.7 pk c = prom_getchar();
579 1.7 pk splx(s);
580 1.7 pk return (c);
581 1.1 gwr }
582 1.1 gwr
583 1.7 pk /*
584 1.7 pk * PROM console output putchar.
585 1.7 pk */
586 1.1 gwr static void
587 1.36 uwe prom_cnputc(dev_t dev, int c)
588 1.1 gwr {
589 1.1 gwr
590 1.4 pk prom_putchar(c);
591 1.1 gwr }
592 1.1 gwr
593 1.7 pk
594 1.7 pk /*****************************************************************/
595 1.7 pk
596 1.29 uwe static void prom_get_device_args(const char *, char *, unsigned int);
597 1.7 pk
598 1.36 uwe static void
599 1.36 uwe prom_get_device_args(const char *prop, char *args, unsigned int sz)
600 1.1 gwr {
601 1.33 martin const char *cp;
602 1.33 martin char buffer[128];
603 1.7 pk
604 1.33 martin cp = prom_getpropstringA(findroot(), prop, buffer, sizeof buffer);
605 1.1 gwr
606 1.7 pk /*
607 1.7 pk * Extract device-specific arguments from a PROM device path (if any)
608 1.7 pk */
609 1.7 pk cp = buffer + strlen(buffer);
610 1.7 pk while (cp >= buffer) {
611 1.7 pk if (*cp == ':') {
612 1.7 pk strncpy(args, cp+1, sz);
613 1.7 pk break;
614 1.7 pk }
615 1.7 pk cp--;
616 1.1 gwr }
617 1.1 gwr }
618 1.1 gwr
619 1.7 pk /*
620 1.7 pk *
621 1.7 pk */
622 1.7 pk void
623 1.36 uwe consinit(void)
624 1.7 pk {
625 1.7 pk int inSource, outSink;
626 1.7 pk
627 1.7 pk switch (prom_version()) {
628 1.7 pk case PROM_OLDMON:
629 1.7 pk case PROM_OBP_V0:
630 1.7 pk /* The stdio handles identify the device type */
631 1.7 pk inSource = prom_stdin();
632 1.7 pk outSink = prom_stdout();
633 1.7 pk break;
634 1.7 pk
635 1.7 pk case PROM_OBP_V2:
636 1.7 pk case PROM_OBP_V3:
637 1.7 pk case PROM_OPENFIRM:
638 1.7 pk
639 1.7 pk /* Save PROM arguments for device matching */
640 1.7 pk prom_get_device_args("stdin-path", prom_stdin_args,
641 1.7 pk sizeof(prom_stdin_args));
642 1.7 pk prom_get_device_args("stdout-path", prom_stdout_args,
643 1.7 pk sizeof(prom_stdout_args));
644 1.7 pk
645 1.7 pk /*
646 1.7 pk * Translate the STDIO package instance (`ihandle') -- that
647 1.7 pk * the PROM has already opened for us -- to a device tree
648 1.37 uwe * node (i.e. a `phandle').
649 1.7 pk */
650 1.7 pk
651 1.7 pk prom_stdin_node = prom_instance_to_package(prom_stdin());
652 1.7 pk if (prom_stdin_node == 0)
653 1.7 pk printf("consinit: cannot convert stdin ihandle\n");
654 1.7 pk
655 1.7 pk prom_stdout_node = prom_instance_to_package(prom_stdout());
656 1.7 pk if (prom_stdout_node == 0) {
657 1.7 pk printf("consinit: cannot convert stdout ihandle\n");
658 1.7 pk break;
659 1.7 pk }
660 1.7 pk
661 1.7 pk break;
662 1.7 pk
663 1.7 pk default:
664 1.7 pk break;
665 1.7 pk }
666 1.7 pk
667 1.7 pk /* Wire up /dev/console */
668 1.22 gehenna cn_tab->cn_dev = makedev(cdevsw_lookup_major(&kd_cdevsw), 0);
669 1.7 pk cn_tab->cn_pri = CN_INTERNAL;
670 1.7 pk
671 1.7 pk /* Set up initial PROM input channel for /dev/console */
672 1.12 eeh cons_attach_input(&prom_cons_channel, cn_tab);
673 1.7 pk
674 1.7 pk #ifdef KGDB
675 1.7 pk zs_kgdb_init(); /* XXX */
676 1.7 pk #endif
677 1.7 pk }
678