?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
Remove useless assignment.
[dragonfly/netmp.git] / sys / dev / misc / syscons / syscons.c
blob9994b313481d6f0ded09b000a822739d09ef6294
1 /*-
2 * Copyright (c) 1992-1998 Søren Schmidt
3 * All rights reserved.
4 *
5 * This code is derived from software contributed to The DragonFly Project
6 * by Sascha Wildner <saw@online.de>
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 * without modification, immediately at the beginning of the file.
14 * 2. Redistributions in binary form must reproduce the above copyright
15 * notice, this list of conditions and the following disclaimer in the
16 * documentation and/or other materials provided with the distribution.
17 * 3. The name of the author 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 THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
21 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
22 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
23 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
24 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
25 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
26 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
27 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
28 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
29 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
30 *
31 * $FreeBSD: /usr/local/www/cvsroot/FreeBSD/src/sys/dev/syscons/syscons.c,v 1.336.2.17 2004/03/25 08:41:09 ru Exp $
32 * $DragonFly: src/sys/dev/misc/syscons/syscons.c,v 1.35 2008/08/10 19:47:31 swildner Exp $
33 */
34
35 #include "use_splash.h"
36 #include "opt_syscons.h"
37 #include "opt_ddb.h"
38 #include "use_apm.h"
39
40 #include <sys/param.h>
41 #include <sys/systm.h>
42 #include <sys/eventhandler.h>
43 #include <sys/reboot.h>
44 #include <sys/conf.h>
45 #include <sys/proc.h>
46 #include <sys/signalvar.h>
47 #include <sys/sysctl.h>
48 #include <sys/tty.h>
49 #include <sys/kernel.h>
50 #include <sys/cons.h>
51 #include <sys/random.h>
52 #include <sys/thread2.h>
53
54 #include <machine/clock.h>
55 #include <machine/console.h>
56 #include <machine/psl.h>
57 #include <machine/pc/display.h>
58 #include <machine/apm_bios.h>
59 #include <machine/frame.h>
60
61 #include <dev/misc/kbd/kbdreg.h>
62 #include <dev/video/fb/fbreg.h>
63 #include <dev/video/fb/splashreg.h>
64 #include "syscons.h"
65
66 #define COLD 0
67 #define WARM 1
68
69 #define DEFAULT_BLANKTIME (5*60) /* 5 minutes */
70 #define MAX_BLANKTIME (7*24*60*60) /* 7 days!? */
71
72 #define KEYCODE_BS 0x0e /* "<-- Backspace" key, XXX */
73
74 MALLOC_DEFINE(M_SYSCONS, "syscons", "Syscons");
75
76 typedef struct default_attr {
77 int std_color; /* normal hardware color */
78 int rev_color; /* reverse hardware color */
79 } default_attr;
80
81 static default_attr user_default = {
82 SC_NORM_ATTR,
83 SC_NORM_REV_ATTR,
84 };
85
86 static default_attr kernel_default = {
87 SC_KERNEL_CONS_ATTR,
88 SC_KERNEL_CONS_REV_ATTR,
89 };
90
91 static int sc_console_unit = -1;
92 static scr_stat *sc_console;
93 static struct tty *sc_console_tty;
94 static void *kernel_console_ts;
95
96 static char init_done = COLD;
97 static char shutdown_in_progress = FALSE;
98 static char sc_malloc = FALSE;
99
100 static int saver_mode = CONS_NO_SAVER; /* LKM/user saver */
101 static int run_scrn_saver = FALSE; /* should run the saver? */
102 static long scrn_blank_time = 0; /* screen saver timeout value */
103 #if NSPLASH > 0
104 static int scrn_blanked; /* # of blanked screen */
105 static int sticky_splash = FALSE;
106
107 static void none_saver(sc_softc_t *sc, int blank) { }
108 static void (*current_saver)(sc_softc_t *, int) = none_saver;
109 #endif
110
111 #if !defined(SC_NO_FONT_LOADING) && defined(SC_DFLT_FONT)
112 #include "font.h"
113 #endif
114
115 static bios_values_t bios_value;
116
117 static int enable_panic_key;
118 SYSCTL_INT(_machdep, OID_AUTO, enable_panic_key, CTLFLAG_RW, &enable_panic_key,
119 0, "");
120
121 #define SC_CONSOLECTL 255
122
123 #define VIRTUAL_TTY(sc, x) ((SC_DEV((sc),(x)) != NULL) ? \
124 (SC_DEV((sc),(x))->si_tty) : NULL)
125 #define ISTTYOPEN(tp) ((tp) && ((tp)->t_state & TS_ISOPEN))
126
127 static int debugger;
128
129 /* prototypes */
130 static int scvidprobe(int unit, int flags, int cons);
131 static int sckbdprobe(int unit, int flags, int cons);
132 static void scmeminit(void *arg);
133 static int scdevtounit(cdev_t dev);
134 static kbd_callback_func_t sckbdevent;
135 static int scparam(struct tty *tp, struct termios *t);
136 static void scstart(struct tty *tp);
137 static void scinit(int unit, int flags);
138 static void scterm(int unit, int flags);
139 static void scshutdown(void *arg, int howto);
140 static u_int scgetc(sc_softc_t *sc, u_int flags);
141 #define SCGETC_CN 1
142 #define SCGETC_NONBLOCK 2
143 static int sccngetch(int flags);
144 static void sccnupdate(scr_stat *scp);
145 static scr_stat *alloc_scp(sc_softc_t *sc, int vty);
146 static void init_scp(sc_softc_t *sc, int vty, scr_stat *scp);
147 static timeout_t scrn_timer;
148 static int and_region(int *s1, int *e1, int s2, int e2);
149 static void scrn_update(scr_stat *scp, int show_cursor);
150
151 #if NSPLASH > 0
152 static int scsplash_callback(int event, void *arg);
153 static void scsplash_saver(sc_softc_t *sc, int show);
154 static int add_scrn_saver(void (*this_saver)(sc_softc_t *, int));
155 static int remove_scrn_saver(void (*this_saver)(sc_softc_t *, int));
156 static int set_scrn_saver_mode(scr_stat *scp, int mode, u_char *pal, int border);
157 static int restore_scrn_saver_mode(scr_stat *scp, int changemode);
158 static void stop_scrn_saver(sc_softc_t *sc, void (*saver)(sc_softc_t *, int));
159 static int wait_scrn_saver_stop(sc_softc_t *sc);
160 #define scsplash_stick(stick) (sticky_splash = (stick))
161 #else /* !NSPLASH */
162 #define scsplash_stick(stick)
163 #endif /* NSPLASH */
164
165 static void do_switch_scr(sc_softc_t *sc);
166 static int vt_proc_alive(scr_stat *scp);
167 static int signal_vt_rel(scr_stat *scp);
168 static int signal_vt_acq(scr_stat *scp);
169 static int finish_vt_rel(scr_stat *scp, int release);
170 static int finish_vt_acq(scr_stat *scp);
171 static void exchange_scr(sc_softc_t *sc);
172 static void update_cursor_image(scr_stat *scp);
173 static int save_kbd_state(scr_stat *scp);
174 static int update_kbd_state(scr_stat *scp, int state, int mask);
175 static int update_kbd_leds(scr_stat *scp, int which);
176 static timeout_t blink_screen;
177
178 #define CDEV_MAJOR 12
179
180 static cn_probe_t sccnprobe;
181 static cn_init_t sccninit;
182 static cn_init_t sccninit_fini;
183 static cn_getc_t sccngetc;
184 static cn_checkc_t sccncheckc;
185 static cn_putc_t sccnputc;
186 static cn_dbctl_t sccndbctl;
187 static cn_term_t sccnterm;
188
189 CONS_DRIVER(sc, sccnprobe, sccninit, sccninit_fini, sccnterm,
190 sccngetc, sccncheckc, sccnputc, sccndbctl);
191
192 static d_open_t scopen;
193 static d_close_t scclose;
194 static d_read_t scread;
195 static d_ioctl_t scioctl;
196 static d_mmap_t scmmap;
197
198 static struct dev_ops sc_ops = {
199 { "sc", CDEV_MAJOR, D_TTY | D_KQFILTER },
200 .d_open = scopen,
201 .d_close = scclose,
202 .d_read = scread,
203 .d_write = ttywrite,
204 .d_ioctl = scioctl,
205 .d_poll = ttypoll,
206 .d_mmap = scmmap,
207 .d_kqfilter = ttykqfilter
208 };
209
210 int
211 sc_probe_unit(int unit, int flags)
212 {
213 if (!scvidprobe(unit, flags, FALSE)) {
214 if (bootverbose)
215 kprintf("sc%d: no video adapter found.\n", unit);
216 return ENXIO;
217 }
218
219 /* syscons will be attached even when there is no keyboard */
220 sckbdprobe(unit, flags, FALSE);
221
222 return 0;
223 }
224
225 /* probe video adapters, return TRUE if found */
226 static int
227 scvidprobe(int unit, int flags, int cons)
228 {
229 /*
230 * Access the video adapter driver through the back door!
231 * Video adapter drivers need to be configured before syscons.
232 * However, when syscons is being probed as the low-level console,
233 * they have not been initialized yet. We force them to initialize
234 * themselves here. XXX
235 */
236 vid_configure(cons ? VIO_PROBE_ONLY : 0);
237
238 return (vid_find_adapter("*", unit) >= 0);
239 }
240
241 /* probe the keyboard, return TRUE if found */
242 static int
243 sckbdprobe(int unit, int flags, int cons)
244 {
245 /* access the keyboard driver through the backdoor! */
246 kbd_configure(cons ? KB_CONF_PROBE_ONLY : 0);
247
248 return (kbd_find_keyboard("*", unit) >= 0);
249 }
250
251 static char *
252 adapter_name(video_adapter_t *adp)
253 {
254 static struct {
255 int type;
256 char *name[2];
257 } names[] = {
258 { KD_MONO, { "MDA", "MDA" } },
259 { KD_HERCULES, { "Hercules", "Hercules" } },
260 { KD_CGA, { "CGA", "CGA" } },
261 { KD_EGA, { "EGA", "EGA (mono)" } },
262 { KD_VGA, { "VGA", "VGA (mono)" } },
263 { KD_TGA, { "TGA", "TGA" } },
264 { -1, { "Unknown", "Unknown" } },
265 };
266 int i;
267
268 for (i = 0; names[i].type != -1; ++i)
269 if (names[i].type == adp->va_type)
270 break;
271 return names[i].name[(adp->va_flags & V_ADP_COLOR) ? 0 : 1];
272 }
273
274 int
275 sc_attach_unit(int unit, int flags)
276 {
277 sc_softc_t *sc;
278 scr_stat *scp;
279 #ifdef SC_PIXEL_MODE
280 video_info_t info;
281 #endif
282 int vc;
283 cdev_t dev;
284
285 flags &= ~SC_KERNEL_CONSOLE;
286
287 if (sc_console_unit == unit) {
288 /*
289 * If this unit is being used as the system console, we need to
290 * adjust some variables and buffers before and after scinit().
291 */
292 /* assert(sc_console != NULL) */
293 flags |= SC_KERNEL_CONSOLE;
294 scmeminit(NULL);
295
296 scinit(unit, flags);
297
298 if (sc_console->tsw->te_size > 0) {
299 /* assert(sc_console->ts != NULL); */
300 kernel_console_ts = sc_console->ts;
301 sc_console->ts = kmalloc(sc_console->tsw->te_size,
302 M_SYSCONS, M_WAITOK);
303 bcopy(kernel_console_ts, sc_console->ts, sc_console->tsw->te_size);
304 (*sc_console->tsw->te_default_attr)(sc_console,
305 user_default.std_color,
306 user_default.rev_color);
307 }
308 } else {
309 scinit(unit, flags);
310 }
311
312 sc = sc_get_softc(unit, flags & SC_KERNEL_CONSOLE);
313
314 /*
315 * If this is the console we couldn't setup sc->dev before because
316 * malloc wasn't working. Set it up now.
317 */
318 if (flags & SC_KERNEL_CONSOLE) {
319 KKASSERT(sc->dev == NULL);
320 sc->dev = kmalloc(sizeof(cdev_t)*sc->vtys, M_SYSCONS, M_WAITOK|M_ZERO);
321 sc->dev[0] = make_dev(&sc_ops, sc_console_unit*MAXCONS, UID_ROOT,
322 GID_WHEEL, 0600,
323 "ttyv%r", sc_console_unit*MAXCONS);
324 sc->dev[0]->si_tty = ttymalloc(sc->dev[0]->si_tty);
325 sc->dev[0]->si_drv1 = sc_console;
326 }
327
328 /*
329 * Finish up the standard attach
330 */
331 sc->config = flags;
332 callout_init(&sc->scrn_timer_ch);
333 scp = SC_STAT(sc->dev[0]);
334 if (sc_console == NULL) /* sc_console_unit < 0 */
335 sc_console = scp;
336
337 #ifdef SC_PIXEL_MODE
338 if ((sc->config & SC_VESA800X600)
339 && ((*vidsw[sc->adapter]->get_info)(sc->adp, M_VESA_800x600, &info) == 0)) {
340 #if NSPLASH > 0
341 if (sc->flags & SC_SPLASH_SCRN)
342 splash_term(sc->adp);
343 #endif
344 sc_set_graphics_mode(scp, NULL, M_VESA_800x600);
345 sc_set_pixel_mode(scp, NULL, COL, ROW, 16);
346 sc->initial_mode = M_VESA_800x600;
347 #if NSPLASH > 0
348 /* put up the splash again! */
349 if (sc->flags & SC_SPLASH_SCRN)
350 splash_init(sc->adp, scsplash_callback, sc);
351 #endif
352 }
353 #endif /* SC_PIXEL_MODE */
354
355 /* initialize cursor */
356 if (!ISGRAPHSC(scp))
357 update_cursor_image(scp);
358
359 /* get screen update going */
360 scrn_timer(sc);
361
362 /* set up the keyboard */
363 kbd_ioctl(sc->kbd, KDSKBMODE, (caddr_t)&scp->kbd_mode);
364 update_kbd_state(scp, scp->status, LOCK_MASK);
365
366 kprintf("sc%d: %s <%d virtual consoles, flags=0x%x>\n",
367 unit, adapter_name(sc->adp), sc->vtys, sc->config);
368 if (bootverbose) {
369 kprintf("sc%d:", unit);
370 if (sc->adapter >= 0)
371 kprintf(" fb%d", sc->adapter);
372 if (sc->keyboard >= 0)
373 kprintf(", kbd%d", sc->keyboard);
374 if (scp->tsw)
375 kprintf(", terminal emulator: %s (%s)",
376 scp->tsw->te_name, scp->tsw->te_desc);
377 kprintf("\n");
378 }
379
380 /* register a shutdown callback for the kernel console */
381 if (sc_console_unit == unit)
382 EVENTHANDLER_REGISTER(shutdown_pre_sync, scshutdown,
383 (void *)(uintptr_t)unit, SHUTDOWN_PRI_DEFAULT);
384
385 /*
386 * create devices. dev_ops_add() must be called to make devices under
387 * this major number available to userland.
388 */
389 dev_ops_add(&sc_ops, ~(MAXCONS - 1), unit * MAXCONS);
390
391 for (vc = 0; vc < sc->vtys; vc++) {
392 dev = make_dev(&sc_ops, vc + unit * MAXCONS,
393 UID_ROOT, GID_WHEEL, 0600, "ttyv%r", vc + unit * MAXCONS);
394 sc->dev[vc] = dev;
395 /*
396 * The first vty already has struct tty and scr_stat initialized
397 * in scinit(). The other vtys will have these structs when
398 * first opened.
399 */
400 }
401
402 dev_ops_add(&sc_ops, -1, SC_CONSOLECTL); /* XXX */
403 dev = make_dev(&sc_ops, SC_CONSOLECTL,
404 UID_ROOT, GID_WHEEL, 0600, "consolectl");
405 dev->si_tty = sc_console_tty = ttymalloc(sc_console_tty);
406 dev->si_drv1 = sc_console;
407
408 return 0;
409 }
410
411 static void
412 scmeminit(void *arg)
413 {
414 if (sc_malloc)
415 return;
416 sc_malloc = TRUE;
417
418 /*
419 * As soon as malloc() becomes functional, we had better allocate
420 * various buffers for the kernel console.
421 */
422
423 if (sc_console_unit < 0) /* sc_console == NULL */
424 return;
425
426 /* copy the temporary buffer to the final buffer */
427 sc_alloc_scr_buffer(sc_console, TRUE, FALSE);
428
429 #ifndef SC_NO_CUTPASTE
430 sc_alloc_cut_buffer(sc_console, TRUE);
431 #endif
432
433 #ifndef SC_NO_HISTORY
434 /* initialize history buffer & pointers */
435 sc_alloc_history_buffer(sc_console, 0, 0, TRUE);
436 #endif
437 }
438
439 SYSINIT(sc_mem, SI_BOOT1_POST, SI_ORDER_ANY, scmeminit, NULL);
440
441 static int
442 scdevtounit(cdev_t dev)
443 {
444 int vty = SC_VTY(dev);
445
446 if (vty == SC_CONSOLECTL)
447 return ((sc_console != NULL) ? sc_console->sc->unit : -1);
448 else if ((vty < 0) || (vty >= MAXCONS*sc_max_unit()))
449 return -1;
450 else
451 return vty/MAXCONS;
452 }
453
454 int
455 scopen(struct dev_open_args *ap)
456 {
457 cdev_t dev = ap->a_head.a_dev;
458 int unit = scdevtounit(dev);
459 sc_softc_t *sc;
460 struct tty *tp;
461 scr_stat *scp;
462 keyarg_t key;
463 int error;
464
465 DPRINTF(5, ("scopen: dev:%d,%d, unit:%d, vty:%d\n",
466 major(dev), minor(dev), unit, SC_VTY(dev)));
467
468 sc = sc_get_softc(unit, (sc_console_unit == unit) ? SC_KERNEL_CONSOLE : 0);
469 if (sc == NULL)
470 return ENXIO;
471
472 tp = dev->si_tty = ttymalloc(dev->si_tty);
473 tp->t_oproc = scstart;
474 tp->t_param = scparam;
475 tp->t_stop = nottystop;
476 tp->t_dev = dev;
477 if (!ISTTYOPEN(tp)) {
478 ttychars(tp);
479 /* Use the current setting of the <-- key as default VERASE. */
480 /* If the Delete key is preferable, an stty is necessary */
481 if (sc->kbd != NULL) {
482 key.keynum = KEYCODE_BS;
483 kbd_ioctl(sc->kbd, GIO_KEYMAPENT, (caddr_t)&key);
484 tp->t_cc[VERASE] = key.key.map[0];
485 }
486 tp->t_iflag = TTYDEF_IFLAG;
487 tp->t_oflag = TTYDEF_OFLAG;
488 tp->t_cflag = TTYDEF_CFLAG;
489 tp->t_lflag = TTYDEF_LFLAG;
490 tp->t_ispeed = tp->t_ospeed = TTYDEF_SPEED;
491 scparam(tp, &tp->t_termios);
492 (*linesw[tp->t_line].l_modem)(tp, 1);
493 }
494 else
495 if (tp->t_state & TS_XCLUDE && suser_cred(ap->a_cred, 0))
496 return(EBUSY);
497
498 error = (*linesw[tp->t_line].l_open)(dev, tp);
499
500 scp = SC_STAT(dev);
501 if (scp == NULL) {
502 scp = dev->si_drv1 = alloc_scp(sc, SC_VTY(dev));
503 if (ISGRAPHSC(scp))
504 sc_set_pixel_mode(scp, NULL, COL, ROW, 16);
505 }
506 if (!tp->t_winsize.ws_col && !tp->t_winsize.ws_row) {
507 tp->t_winsize.ws_col = scp->xsize;
508 tp->t_winsize.ws_row = scp->ysize;
509 }
510
511 return error;
512 }
513
514 int
515 scclose(struct dev_close_args *ap)
516 {
517 cdev_t dev = ap->a_head.a_dev;
518 struct tty *tp = dev->si_tty;
519 scr_stat *scp;
520
521 crit_enter();
522 if (SC_VTY(dev) != SC_CONSOLECTL) {
523 scp = SC_STAT(tp->t_dev);
524 /* were we in the middle of the VT switching process? */
525 DPRINTF(5, ("sc%d: scclose(), ", scp->sc->unit));
526 if ((scp == scp->sc->cur_scp) && (scp->sc->unit == sc_console_unit))
527 cons_unavail = FALSE;
528 /*
529 * note: must be called from a critical section because finish_vt_rel
530 * will call do_switch_scr which releases it temporarily
531 */
532 if (finish_vt_rel(scp, TRUE) == 0) /* force release */
533 DPRINTF(5, ("reset WAIT_REL, "));
534 if (finish_vt_acq(scp) == 0) /* force acknowledge */
535 DPRINTF(5, ("reset WAIT_ACQ, "));
536 #if not_yet_done
537 if (scp == &main_console) {
538 scp->pid = 0;
539 scp->proc = NULL;
540 scp->smode.mode = VT_AUTO;
541 }
542 else {
543 sc_vtb_destroy(&scp->vtb);
544 sc_vtb_destroy(&scp->scr);
545 sc_free_history_buffer(scp, scp->ysize);
546 SC_STAT(dev) = NULL;
547 kfree(scp, M_SYSCONS);
548 }
549 #else
550 scp->pid = 0;
551 scp->proc = NULL;
552 scp->smode.mode = VT_AUTO;
553 #endif
554 scp->kbd_mode = K_XLATE;
555 if (scp == scp->sc->cur_scp)
556 kbd_ioctl(scp->sc->kbd, KDSKBMODE, (caddr_t)&scp->kbd_mode);
557 DPRINTF(5, ("done.\n"));
558 }
559 (*linesw[tp->t_line].l_close)(tp, ap->a_fflag);
560 ttyclose(tp);
561 crit_exit();
562 return(0);
563 }
564
565 int
566 scread(struct dev_read_args *ap)
567 {
568 sc_touch_scrn_saver();
569 return (ttyread(ap));
570 }
571
572 static int
573 sckbdevent(keyboard_t *thiskbd, int event, void *arg)
574 {
575 sc_softc_t *sc;
576 struct tty *cur_tty;
577 int c;
578 size_t len;
579 u_char *cp;
580
581 /*
582 * WARNING: In early boot sc->dev may not be setup yet.
583 */
584 sc = (sc_softc_t *)arg;
585 /* assert(thiskbd == sc->kbd) */
586
587 switch (event) {
588 case KBDIO_KEYINPUT:
589 break;
590 case KBDIO_UNLOADING:
591 sc->kbd = NULL;
592 sc->keyboard = -1;
593 kbd_release(thiskbd, (void *)&sc->keyboard);
594 return 0;
595 default:
596 return EINVAL;
597 }
598
599 /*
600 * Loop while there is still input to get from the keyboard.
601 * I don't think this is nessesary, and it doesn't fix
602 * the Xaccel-2.1 keyboard hang, but it can't hurt. XXX
603 */
604 while ((c = scgetc(sc, SCGETC_NONBLOCK)) != NOKEY) {
605 cur_tty = VIRTUAL_TTY(sc, sc->cur_scp->index);
606 if (!ISTTYOPEN(cur_tty)) {
607 cur_tty = sc_console_tty;
608 if (!ISTTYOPEN(cur_tty))
609 continue;
610 }
611
612 if ((*sc->cur_scp->tsw->te_input)(sc->cur_scp, c, cur_tty))
613 continue;
614
615 switch (KEYFLAGS(c)) {
616 case 0x0000: /* normal key */
617 (*linesw[cur_tty->t_line].l_rint)(KEYCHAR(c), cur_tty);
618 break;
619 case FKEY: /* function key, return string */
620 cp = kbd_get_fkeystr(thiskbd, KEYCHAR(c), &len);
621 if (cp != NULL) {
622 while (len-- > 0)
623 (*linesw[cur_tty->t_line].l_rint)(*cp++, cur_tty);
624 }
625 break;
626 case MKEY: /* meta is active, prepend ESC */
627 (*linesw[cur_tty->t_line].l_rint)(0x1b, cur_tty);
628 (*linesw[cur_tty->t_line].l_rint)(KEYCHAR(c), cur_tty);
629 break;
630 case BKEY: /* backtab fixed sequence (esc [ Z) */
631 (*linesw[cur_tty->t_line].l_rint)(0x1b, cur_tty);
632 (*linesw[cur_tty->t_line].l_rint)('[', cur_tty);
633 (*linesw[cur_tty->t_line].l_rint)('Z', cur_tty);
634 break;
635 }
636 }
637
638 sc->cur_scp->status |= MOUSE_HIDDEN;
639
640 return 0;
641 }
642
643 static int
644 scparam(struct tty *tp, struct termios *t)
645 {
646 tp->t_ispeed = t->c_ispeed;
647 tp->t_ospeed = t->c_ospeed;
648 tp->t_cflag = t->c_cflag;
649 return 0;
650 }
651
652 int
653 scioctl(struct dev_ioctl_args *ap)
654 {
655 cdev_t dev = ap->a_head.a_dev;
656 u_long cmd = ap->a_cmd;
657 caddr_t data = ap->a_data;
658 int flag = ap->a_fflag;
659 int error;
660 int i;
661 struct tty *tp;
662 sc_softc_t *sc;
663 scr_stat *scp;
664
665 tp = dev->si_tty;
666
667 error = sc_vid_ioctl(tp, cmd, data, flag);
668 if (error != ENOIOCTL)
669 return error;
670
671 #ifndef SC_NO_HISTORY
672 error = sc_hist_ioctl(tp, cmd, data, flag);
673 if (error != ENOIOCTL)
674 return error;
675 #endif
676
677 #ifndef SC_NO_SYSMOUSE
678 error = sc_mouse_ioctl(tp, cmd, data, flag);
679 if (error != ENOIOCTL)
680 return error;
681 #endif
682
683 scp = SC_STAT(tp->t_dev);
684 /* assert(scp != NULL) */
685 /* scp is sc_console, if SC_VTY(dev) == SC_CONSOLECTL. */
686 sc = scp->sc;
687
688 if (scp->tsw) {
689 error = (*scp->tsw->te_ioctl)(scp, tp, cmd, data, flag);
690 if (error != ENOIOCTL)
691 return error;
692 }
693
694 switch (cmd) { /* process console hardware related ioctl's */
695
696 case GIO_ATTR: /* get current attributes */
697 /* this ioctl is not processed here, but in the terminal emulator */
698 return ENOTTY;
699
700 case GIO_COLOR: /* is this a color console ? */
701 *(int *)data = (sc->adp->va_flags & V_ADP_COLOR) ? 1 : 0;
702 return 0;
703
704 case CONS_BLANKTIME: /* set screen saver timeout (0 = no saver) */
705 if (*(int *)data < 0 || *(int *)data > MAX_BLANKTIME)
706 return EINVAL;
707 crit_enter();
708 scrn_blank_time = *(int *)data;
709 run_scrn_saver = (scrn_blank_time != 0);
710 crit_exit();
711 return 0;
712
713 case CONS_CURSORTYPE: /* set cursor type blink/noblink */
714 crit_enter();
715 if (!ISGRAPHSC(sc->cur_scp))
716 sc_remove_cursor_image(sc->cur_scp);
717 if ((*(int*)data) & 0x01)
718 sc->flags |= SC_BLINK_CURSOR;
719 else
720 sc->flags &= ~SC_BLINK_CURSOR;
721 if ((*(int*)data) & 0x02) {
722 sc->flags |= SC_CHAR_CURSOR;
723 } else
724 sc->flags &= ~SC_CHAR_CURSOR;
725 /*
726 * The cursor shape is global property; all virtual consoles
727 * are affected. Update the cursor in the current console...
728 */
729 if (!ISGRAPHSC(sc->cur_scp)) {
730 sc_set_cursor_image(sc->cur_scp);
731 sc_draw_cursor_image(sc->cur_scp);
732 }
733 crit_exit();
734 return 0;
735
736 case CONS_BELLTYPE: /* set bell type sound/visual */
737 if ((*(int *)data) & 0x01)
738 sc->flags |= SC_VISUAL_BELL;
739 else
740 sc->flags &= ~SC_VISUAL_BELL;
741 if ((*(int *)data) & 0x02)
742 sc->flags |= SC_QUIET_BELL;
743 else
744 sc->flags &= ~SC_QUIET_BELL;
745 return 0;
746
747 case CONS_GETINFO: /* get current (virtual) console info */
748 {
749 vid_info_t *ptr = (vid_info_t*)data;
750 if (ptr->size == sizeof(struct vid_info)) {
751 ptr->m_num = sc->cur_scp->index;
752 ptr->font_size = scp->font_size;
753 ptr->mv_col = scp->xpos;
754 ptr->mv_row = scp->ypos;
755 ptr->mv_csz = scp->xsize;
756 ptr->mv_rsz = scp->ysize;
757 /*
758 * The following fields are filled by the terminal emulator. XXX
759 *
760 * ptr->mv_norm.fore
761 * ptr->mv_norm.back
762 * ptr->mv_rev.fore
763 * ptr->mv_rev.back
764 */
765 ptr->mv_grfc.fore = 0; /* not supported */
766 ptr->mv_grfc.back = 0; /* not supported */
767 ptr->mv_ovscan = scp->border;
768 if (scp == sc->cur_scp)
769 save_kbd_state(scp);
770 ptr->mk_keylock = scp->status & LOCK_MASK;
771 return 0;
772 }
773 return EINVAL;
774 }
775
776 case CONS_GETVERS: /* get version number */
777 *(int*)data = 0x200; /* version 2.0 */
778 return 0;
779
780 case CONS_IDLE: /* see if the screen has been idle */
781 /*
782 * When the screen is in the GRAPHICS_MODE or UNKNOWN_MODE,
783 * the user process may have been writing something on the
784 * screen and syscons is not aware of it. Declare the screen
785 * is NOT idle if it is in one of these modes. But there is
786 * an exception to it; if a screen saver is running in the
787 * graphics mode in the current screen, we should say that the
788 * screen has been idle.
789 */
790 *(int *)data = (sc->flags & SC_SCRN_IDLE)
791 && (!ISGRAPHSC(sc->cur_scp)
792 || (sc->cur_scp->status & SAVER_RUNNING));
793 return 0;
794
795 case CONS_SAVERMODE: /* set saver mode */
796 switch(*(int *)data) {
797 case CONS_NO_SAVER:
798 case CONS_USR_SAVER:
799 /* if a LKM screen saver is running, stop it first. */
800 scsplash_stick(FALSE);
801 saver_mode = *(int *)data;
802 crit_enter();
803 #if NSPLASH > 0
804 if ((error = wait_scrn_saver_stop(NULL))) {
805 crit_exit();
806 return error;
807 }
808 #endif /* NSPLASH */
809 run_scrn_saver = TRUE;
810 if (saver_mode == CONS_USR_SAVER)
811 scp->status |= SAVER_RUNNING;
812 else
813 scp->status &= ~SAVER_RUNNING;
814 scsplash_stick(TRUE);
815 crit_exit();
816 break;
817 case CONS_LKM_SAVER:
818 crit_enter();
819 if ((saver_mode == CONS_USR_SAVER) && (scp->status & SAVER_RUNNING))
820 scp->status &= ~SAVER_RUNNING;
821 saver_mode = *(int *)data;
822 crit_exit();
823 break;
824 default:
825 return EINVAL;
826 }
827 return 0;
828
829 case CONS_SAVERSTART: /* immediately start/stop the screen saver */
830 /*
831 * Note that this ioctl does not guarantee the screen saver
832 * actually starts or stops. It merely attempts to do so...
833 */
834 crit_enter();
835 run_scrn_saver = (*(int *)data != 0);
836 if (run_scrn_saver)
837 sc->scrn_time_stamp -= scrn_blank_time;
838 crit_exit();
839 return 0;
840
841 case CONS_SCRSHOT: /* get a screen shot */
842 {
843 scrshot_t *ptr = (scrshot_t*)data;
844 crit_enter();
845 if (ISGRAPHSC(scp)) {
846 crit_exit();
847 return EOPNOTSUPP;
848 }
849 if (scp->xsize != ptr->xsize || scp->ysize != ptr->ysize) {
850 crit_exit();
851 return EINVAL;
852 }
853 copyout ((void*)scp->vtb.vtb_buffer, ptr->buf,
854 ptr->xsize * ptr->ysize * sizeof(uint16_t));
855 crit_exit();
856 return 0;
857 }
858
859 case VT_SETMODE: /* set screen switcher mode */
860 {
861 struct vt_mode *mode;
862
863 mode = (struct vt_mode *)data;
864 DPRINTF(5, ("sc%d: VT_SETMODE ", sc->unit));
865 if (scp->smode.mode == VT_PROCESS) {
866 if (scp->proc == pfind(scp->pid) && scp->proc != curproc) {
867 DPRINTF(5, ("error EPERM\n"));
868 return EPERM;
869 }
870 }
871 crit_enter();
872 if (mode->mode == VT_AUTO) {
873 scp->smode.mode = VT_AUTO;
874 scp->proc = NULL;
875 scp->pid = 0;
876 DPRINTF(5, ("VT_AUTO, "));
877 if ((scp == sc->cur_scp) && (sc->unit == sc_console_unit))
878 cons_unavail = FALSE;
879 /*
880 * note: must be called from a critical section because
881 * finish_vt_rel will call do_switch_scr which releases it
882 * temporarily.
883 */
884 if (finish_vt_rel(scp, TRUE) == 0)
885 DPRINTF(5, ("reset WAIT_REL, "));
886 if (finish_vt_acq(scp) == 0)
887 DPRINTF(5, ("reset WAIT_ACQ, "));
888 } else {
889 if (!ISSIGVALID(mode->relsig) || !ISSIGVALID(mode->acqsig)
890 || !ISSIGVALID(mode->frsig)) {
891 crit_exit();
892 DPRINTF(5, ("error EINVAL\n"));
893 return EINVAL;
894 }
895 DPRINTF(5, ("VT_PROCESS %d, ", curproc->p_pid));
896 bcopy(data, &scp->smode, sizeof(struct vt_mode));
897 scp->proc = curproc;
898 scp->pid = scp->proc->p_pid;
899 if ((scp == sc->cur_scp) && (sc->unit == sc_console_unit))
900 cons_unavail = TRUE;
901 }
902 crit_exit();
903 DPRINTF(5, ("\n"));
904 return 0;
905 }
906
907 case VT_GETMODE: /* get screen switcher mode */
908 bcopy(&scp->smode, data, sizeof(struct vt_mode));
909 return 0;
910
911 case VT_RELDISP: /* screen switcher ioctl */
912 crit_enter();
913 /*
914 * This must be the current vty which is in the VT_PROCESS
915 * switching mode...
916 */
917 if ((scp != sc->cur_scp) || (scp->smode.mode != VT_PROCESS)) {
918 crit_exit();
919 return EINVAL;
920 }
921 /* ...and this process is controlling it. */
922 if (scp->proc != curproc) {
923 crit_exit();
924 return EPERM;
925 }
926 error = EINVAL;
927 switch(*(int *)data) {
928 case VT_FALSE: /* user refuses to release screen, abort */
929 /*
930 * note: must be called from a critical section because
931 * finish_vt_rel will call do_switch_scr which releases it
932 * temporarily.
933 */
934 if ((error = finish_vt_rel(scp, FALSE)) == 0)
935 DPRINTF(5, ("sc%d: VT_FALSE\n", sc->unit));
936 break;
937 case VT_TRUE: /* user has released screen, go on */
938 /*
939 * note: must be called from a critical section because
940 * finish_vt_rel will call do_switch_scr which releases it
941 * temporarily.
942 */
943 if ((error = finish_vt_rel(scp, TRUE)) == 0)
944 DPRINTF(5, ("sc%d: VT_TRUE\n", sc->unit));
945 break;
946 case VT_ACKACQ: /* acquire acknowledged, switch completed */
947 if ((error = finish_vt_acq(scp)) == 0)
948 DPRINTF(5, ("sc%d: VT_ACKACQ\n", sc->unit));
949 break;
950 default:
951 break;
952 }
953 crit_exit();
954 return error;
955
956 case VT_OPENQRY: /* return free virtual console */
957 for (i = sc->first_vty; i < sc->first_vty + sc->vtys; i++) {
958 tp = VIRTUAL_TTY(sc, i);
959 if (!ISTTYOPEN(tp)) {
960 *(int *)data = i + 1;
961 return 0;
962 }
963 }
964 return EINVAL;
965
966 case VT_ACTIVATE: /* switch to screen *data */
967 i = (*(int *)data == 0) ? scp->index : (*(int *)data - 1);
968 crit_enter();
969 sc_clean_up(sc->cur_scp);
970 crit_exit();
971 return sc_switch_scr(sc, i);
972
973 case VT_WAITACTIVE: /* wait for switch to occur */
974 i = (*(int *)data == 0) ? scp->index : (*(int *)data - 1);
975 if ((i < sc->first_vty) || (i >= sc->first_vty + sc->vtys))
976 return EINVAL;
977 crit_enter();
978 error = sc_clean_up(sc->cur_scp);
979 crit_exit();
980 if (error)
981 return error;
982 scp = SC_STAT(SC_DEV(sc, i));
983 if (scp == scp->sc->cur_scp)
984 return 0;
985 while ((error=tsleep((caddr_t)&scp->smode, PCATCH,
986 "waitvt", 0)) == ERESTART) ;
987 return error;
988
989 case VT_GETACTIVE: /* get active vty # */
990 *(int *)data = sc->cur_scp->index + 1;
991 return 0;
992
993 case VT_GETINDEX: /* get this vty # */
994 *(int *)data = scp->index + 1;
995 return 0;
996
997 case VT_LOCKSWITCH: /* prevent vty switching */
998 if ((*(int *)data) & 0x01)
999 sc->flags |= SC_SCRN_VTYLOCK;
1000 else
1001 sc->flags &= ~SC_SCRN_VTYLOCK;
1002 return 0;
1003
1004 case KDENABIO: /* allow io operations */
1005 error = suser_cred(ap->a_cred, 0);
1006 if (error != 0)
1007 return error;
1008 if (securelevel > 0)
1009 return EPERM;
1010 curthread->td_lwp->lwp_md.md_regs->tf_eflags |= PSL_IOPL;
1011 return 0;
1012
1013 case KDDISABIO: /* disallow io operations (default) */
1014 curthread->td_lwp->lwp_md.md_regs->tf_eflags &= ~PSL_IOPL;
1015 return 0;
1016
1017 case KDSKBSTATE: /* set keyboard state (locks) */
1018 if (*(int *)data & ~LOCK_MASK)
1019 return EINVAL;
1020 scp->status &= ~LOCK_MASK;
1021 scp->status |= *(int *)data;
1022 if (scp == sc->cur_scp)
1023 update_kbd_state(scp, scp->status, LOCK_MASK);
1024 return 0;
1025
1026 case KDGKBSTATE: /* get keyboard state (locks) */
1027 if (scp == sc->cur_scp)
1028 save_kbd_state(scp);
1029 *(int *)data = scp->status & LOCK_MASK;
1030 return 0;
1031
1032 case KDGETREPEAT: /* get keyboard repeat & delay rates */
1033 case KDSETREPEAT: /* set keyboard repeat & delay rates (new) */
1034 error = kbd_ioctl(sc->kbd, cmd, data);
1035 if (error == ENOIOCTL)
1036 error = ENODEV;
1037 return error;
1038
1039 case KDSETRAD: /* set keyboard repeat & delay rates (old) */
1040 if (*(int *)data & ~0x7f)
1041 return EINVAL;
1042 error = kbd_ioctl(sc->kbd, cmd, data);
1043 if (error == ENOIOCTL)
1044 error = ENODEV;
1045 return error;
1046
1047 case KDSKBMODE: /* set keyboard mode */
1048 switch (*(int *)data) {
1049 case K_XLATE: /* switch to XLT ascii mode */
1050 case K_RAW: /* switch to RAW scancode mode */
1051 case K_CODE: /* switch to CODE mode */
1052 scp->kbd_mode = *(int *)data;
1053 if (scp == sc->cur_scp)
1054 kbd_ioctl(sc->kbd, cmd, data);
1055 return 0;
1056 default:
1057 return EINVAL;
1058 }
1059 /* NOT REACHED */
1060
1061 case KDGKBMODE: /* get keyboard mode */
1062 *(int *)data = scp->kbd_mode;
1063 return 0;
1064
1065 case KDGKBINFO:
1066 error = kbd_ioctl(sc->kbd, cmd, data);
1067 if (error == ENOIOCTL)
1068 error = ENODEV;
1069 return error;
1070
1071 case KDMKTONE: /* sound the bell */
1072 if (*(int*)data)
1073 sc_bell(scp, (*(int*)data)&0xffff,
1074 (((*(int*)data)>>16)&0xffff)*hz/1000);
1075 else
1076 sc_bell(scp, scp->bell_pitch, scp->bell_duration);
1077 return 0;
1078
1079 case KIOCSOUND: /* make tone (*data) hz */
1080 if (scp == sc->cur_scp) {
1081 if (*(int *)data)
1082 return sc_tone(*(int *)data);
1083 else
1084 return sc_tone(0);
1085 }
1086 return 0;
1087
1088 case KDGKBTYPE: /* get keyboard type */
1089 error = kbd_ioctl(sc->kbd, cmd, data);
1090 if (error == ENOIOCTL) {
1091 /* always return something? XXX */
1092 *(int *)data = 0;
1093 }
1094 return 0;
1095
1096 case KDSETLED: /* set keyboard LED status */
1097 if (*(int *)data & ~LED_MASK) /* FIXME: LOCK_MASK? */
1098 return EINVAL;
1099 scp->status &= ~LED_MASK;
1100 scp->status |= *(int *)data;
1101 if (scp == sc->cur_scp)
1102 update_kbd_leds(scp, scp->status);
1103 return 0;
1104
1105 case KDGETLED: /* get keyboard LED status */
1106 if (scp == sc->cur_scp)
1107 save_kbd_state(scp);
1108 *(int *)data = scp->status & LED_MASK;
1109 return 0;
1110
1111 case CONS_SETKBD: /* set the new keyboard */
1112 {
1113 keyboard_t *newkbd;
1114
1115 crit_enter();
1116 newkbd = kbd_get_keyboard(*(int *)data);
1117 if (newkbd == NULL) {
1118 crit_exit();
1119 return EINVAL;
1120 }
1121 error = 0;
1122 if (sc->kbd != newkbd) {
1123 i = kbd_allocate(newkbd->kb_name, newkbd->kb_unit,
1124 (void *)&sc->keyboard, sckbdevent, sc);
1125 /* i == newkbd->kb_index */
1126 if (i >= 0) {
1127 if (sc->kbd != NULL) {
1128 save_kbd_state(sc->cur_scp);
1129 kbd_release(sc->kbd, (void *)&sc->keyboard);
1130 }
1131 sc->kbd = kbd_get_keyboard(i); /* sc->kbd == newkbd */
1132 sc->keyboard = i;
1133 kbd_ioctl(sc->kbd, KDSKBMODE,
1134 (caddr_t)&sc->cur_scp->kbd_mode);
1135 update_kbd_state(sc->cur_scp, sc->cur_scp->status,
1136 LOCK_MASK);
1137 } else {
1138 error = EPERM; /* XXX */
1139 }
1140 }
1141 crit_exit();
1142 return error;
1143 }
1144
1145 case CONS_RELKBD: /* release the current keyboard */
1146 crit_enter();
1147 error = 0;
1148 if (sc->kbd != NULL) {
1149 save_kbd_state(sc->cur_scp);
1150 error = kbd_release(sc->kbd, (void *)&sc->keyboard);
1151 if (error == 0) {
1152 sc->kbd = NULL;
1153 sc->keyboard = -1;
1154 }
1155 }
1156 crit_exit();
1157 return error;
1158
1159 case CONS_GETTERM: /* get the current terminal emulator info */
1160 {
1161 sc_term_sw_t *sw;
1162
1163 if (((term_info_t *)data)->ti_index == 0) {
1164 sw = scp->tsw;
1165 } else {
1166 sw = sc_term_match_by_number(((term_info_t *)data)->ti_index);
1167 }
1168 if (sw != NULL) {
1169 strncpy(((term_info_t *)data)->ti_name, sw->te_name,
1170 sizeof(((term_info_t *)data)->ti_name));
1171 strncpy(((term_info_t *)data)->ti_desc, sw->te_desc,
1172 sizeof(((term_info_t *)data)->ti_desc));
1173 ((term_info_t *)data)->ti_flags = 0;
1174 return 0;
1175 } else {
1176 ((term_info_t *)data)->ti_name[0] = '\0';
1177 ((term_info_t *)data)->ti_desc[0] = '\0';
1178 ((term_info_t *)data)->ti_flags = 0;
1179 return EINVAL;
1180 }
1181 }
1182
1183 case CONS_SETTERM: /* set the current terminal emulator */
1184 crit_enter();
1185 error = sc_init_emulator(scp, ((term_info_t *)data)->ti_name);
1186 /* FIXME: what if scp == sc_console! XXX */
1187 crit_exit();
1188 return error;
1189
1190 case GIO_SCRNMAP: /* get output translation table */
1191 bcopy(&sc->scr_map, data, sizeof(sc->scr_map));
1192 return 0;
1193
1194 case PIO_SCRNMAP: /* set output translation table */
1195 bcopy(data, &sc->scr_map, sizeof(sc->scr_map));
1196 for (i=0; i<sizeof(sc->scr_map); i++) {
1197 sc->scr_rmap[sc->scr_map[i]] = i;
1198 }
1199 return 0;
1200
1201 case GIO_KEYMAP: /* get keyboard translation table */
1202 case PIO_KEYMAP: /* set keyboard translation table */
1203 case GIO_DEADKEYMAP: /* get accent key translation table */
1204 case PIO_DEADKEYMAP: /* set accent key translation table */
1205 case GETFKEY: /* get function key string */
1206 case SETFKEY: /* set function key string */
1207 error = kbd_ioctl(sc->kbd, cmd, data);
1208 if (error == ENOIOCTL)
1209 error = ENODEV;
1210 return error;
1211
1212 #ifndef SC_NO_FONT_LOADING
1213
1214 case PIO_FONT8x8: /* set 8x8 dot font */
1215 if (!ISFONTAVAIL(sc->adp->va_flags))
1216 return ENXIO;
1217 bcopy(data, sc->font_8, 8*256);
1218 sc->fonts_loaded |= FONT_8;
1219 /*
1220 * FONT KLUDGE
1221 * Always use the font page #0. XXX
1222 * Don't load if the current font size is not 8x8.
1223 */
1224 if (ISTEXTSC(sc->cur_scp) && (sc->cur_scp->font_size < 14))
1225 sc_load_font(sc->cur_scp, 0, 8, sc->font_8, 0, 256);
1226 return 0;
1227
1228 case GIO_FONT8x8: /* get 8x8 dot font */
1229 if (!ISFONTAVAIL(sc->adp->va_flags))
1230 return ENXIO;
1231 if (sc->fonts_loaded & FONT_8) {
1232 bcopy(sc->font_8, data, 8*256);
1233 return 0;
1234 }
1235 else
1236 return ENXIO;
1237
1238 case PIO_FONT8x14: /* set 8x14 dot font */
1239 if (!ISFONTAVAIL(sc->adp->va_flags))
1240 return ENXIO;
1241 bcopy(data, sc->font_14, 14*256);
1242 sc->fonts_loaded |= FONT_14;
1243 /*
1244 * FONT KLUDGE
1245 * Always use the font page #0. XXX
1246 * Don't load if the current font size is not 8x14.
1247 */
1248 if (ISTEXTSC(sc->cur_scp)
1249 && (sc->cur_scp->font_size >= 14)
1250 && (sc->cur_scp->font_size < 16))
1251 sc_load_font(sc->cur_scp, 0, 14, sc->font_14, 0, 256);
1252 return 0;
1253
1254 case GIO_FONT8x14: /* get 8x14 dot font */
1255 if (!ISFONTAVAIL(sc->adp->va_flags))
1256 return ENXIO;
1257 if (sc->fonts_loaded & FONT_14) {
1258 bcopy(sc->font_14, data, 14*256);
1259 return 0;
1260 }
1261 else
1262 return ENXIO;
1263
1264 case PIO_FONT8x16: /* set 8x16 dot font */
1265 if (!ISFONTAVAIL(sc->adp->va_flags))
1266 return ENXIO;
1267 bcopy(data, sc->font_16, 16*256);
1268 sc->fonts_loaded |= FONT_16;
1269 /*
1270 * FONT KLUDGE
1271 * Always use the font page #0. XXX
1272 * Don't load if the current font size is not 8x16.
1273 */
1274 if (ISTEXTSC(sc->cur_scp) && (sc->cur_scp->font_size >= 16))
1275 sc_load_font(sc->cur_scp, 0, 16, sc->font_16, 0, 256);
1276 return 0;
1277
1278 case GIO_FONT8x16: /* get 8x16 dot font */
1279 if (!ISFONTAVAIL(sc->adp->va_flags))
1280 return ENXIO;
1281 if (sc->fonts_loaded & FONT_16) {
1282 bcopy(sc->font_16, data, 16*256);
1283 return 0;
1284 }
1285 else
1286 return ENXIO;
1287
1288 #endif /* SC_NO_FONT_LOADING */
1289
1290 default:
1291 break;
1292 }
1293
1294 error = (*linesw[tp->t_line].l_ioctl)(tp, cmd, data, flag, ap->a_cred);
1295 if (error != ENOIOCTL)
1296 return(error);
1297 error = ttioctl(tp, cmd, data, flag);
1298 if (error != ENOIOCTL)
1299 return(error);
1300 return(ENOTTY);
1301 }
1302
1303 static void
1304 scstart(struct tty *tp)
1305 {
1306 struct clist *rbp;
1307 int len;
1308 u_char buf[PCBURST];
1309 scr_stat *scp = SC_STAT(tp->t_dev);
1310
1311 if (scp->status & SLKED ||
1312 (scp == scp->sc->cur_scp && scp->sc->blink_in_progress))
1313 return;
1314 crit_enter();
1315 if (!(tp->t_state & (TS_TIMEOUT | TS_BUSY | TS_TTSTOP))) {
1316 tp->t_state |= TS_BUSY;
1317 rbp = &tp->t_outq;
1318 while (rbp->c_cc) {
1319 len = q_to_b(rbp, buf, PCBURST);
1320 crit_exit();
1321 sc_puts(scp, buf, len);
1322 crit_enter();
1323 }
1324 tp->t_state &= ~TS_BUSY;
1325 ttwwakeup(tp);
1326 }
1327 crit_exit();
1328 }
1329
1330 static void
1331 sccnprobe(struct consdev *cp)
1332 {
1333 int unit;
1334 int flags;
1335
1336 cp->cn_pri = sc_get_cons_priority(&unit, &flags);
1337
1338 /* a video card is always required */
1339 if (!scvidprobe(unit, flags, TRUE))
1340 cp->cn_pri = CN_DEAD;
1341
1342 /* syscons will become console even when there is no keyboard */
1343 sckbdprobe(unit, flags, TRUE);
1344
1345 if (cp->cn_pri == CN_DEAD)
1346 return;
1347
1348 /* initialize required fields */
1349 cp->cn_probegood = 1;
1350 }
1351
1352 static void
1353 sccninit(struct consdev *cp)
1354 {
1355 int unit;
1356 int flags;
1357
1358 sc_get_cons_priority(&unit, &flags);
1359 scinit(unit, flags | SC_KERNEL_CONSOLE);
1360 sc_console_unit = unit;
1361 sc_console = sc_get_softc(unit, SC_KERNEL_CONSOLE)->console_scp;
1362 }
1363
1364 static void
1365 sccninit_fini(struct consdev *cp)
1366 {
1367 cp->cn_dev = make_dev(&sc_ops, SC_CONSOLECTL,
1368 UID_ROOT, GID_WHEEL, 0600, "consolectl");
1369 }
1370
1371 static void
1372 sccnterm(struct consdev *cp)
1373 {
1374 /* we are not the kernel console any more, release everything */
1375
1376 if (sc_console_unit < 0)
1377 return; /* shouldn't happen */
1378
1379 #if 0 /* XXX */
1380 sc_clear_screen(sc_console);
1381 sccnupdate(sc_console);
1382 #endif
1383 scterm(sc_console_unit, SC_KERNEL_CONSOLE);
1384 sc_console_unit = -1;
1385 sc_console = NULL;
1386 }
1387
1388 static void
1389 sccnputc(void *private, int c)
1390 {
1391 u_char buf[1];
1392 scr_stat *scp = sc_console;
1393 void *save;
1394 #ifndef SC_NO_HISTORY
1395 struct tty *tp;
1396 #endif /* !SC_NO_HISTORY */
1397
1398 /* assert(sc_console != NULL) */
1399
1400 #ifndef SC_NO_HISTORY
1401 if (scp == scp->sc->cur_scp && scp->status & SLKED) {
1402 scp->status &= ~SLKED;
1403 update_kbd_state(scp, scp->status, SLKED);
1404 if (scp->status & BUFFER_SAVED) {
1405 if (!sc_hist_restore(scp))
1406 sc_remove_cutmarking(scp);
1407 scp->status &= ~BUFFER_SAVED;
1408 scp->status |= CURSOR_ENABLED;
1409 sc_draw_cursor_image(scp);
1410 }
1411 tp = VIRTUAL_TTY(scp->sc, scp->index);
1412 if (ISTTYOPEN(tp))
1413 scstart(tp);
1414 }
1415 #endif /* !SC_NO_HISTORY */
1416
1417 save = scp->ts;
1418 if (kernel_console_ts != NULL)
1419 scp->ts = kernel_console_ts;
1420 buf[0] = c;
1421 sc_puts(scp, buf, 1);
1422 scp->ts = save;
1423
1424 crit_enter();
1425 sccnupdate(scp);
1426 crit_exit();
1427 }
1428
1429 static int
1430 sccngetc(void *private)
1431 {
1432 return sccngetch(0);
1433 }
1434
1435 static int
1436 sccncheckc(void *private)
1437 {
1438 return sccngetch(SCGETC_NONBLOCK);
1439 }
1440
1441 static void
1442 sccndbctl(void *private, int on)
1443 {
1444 /* assert(sc_console_unit >= 0) */
1445 /* try to switch to the kernel console screen */
1446 if (on && debugger == 0) {
1447 /*
1448 * TRY to make sure the screen saver is stopped,
1449 * and the screen is updated before switching to
1450 * the vty0.
1451 */
1452 scrn_timer(NULL);
1453 if (!cold
1454 && sc_console->sc->cur_scp->smode.mode == VT_AUTO
1455 && sc_console->smode.mode == VT_AUTO) {
1456 sc_console->sc->cur_scp->status |= MOUSE_HIDDEN;
1457 sc_switch_scr(sc_console->sc, sc_console->index);
1458 }
1459 }
1460 if (on)
1461 ++debugger;
1462 else
1463 --debugger;
1464 }
1465
1466 static int
1467 sccngetch(int flags)
1468 {
1469 static struct fkeytab fkey;
1470 static int fkeycp;
1471 scr_stat *scp;
1472 u_char *p;
1473 int cur_mode;
1474 int c;
1475
1476 crit_enter();
1477 /* assert(sc_console != NULL) */
1478
1479 /*
1480 * Stop the screen saver and update the screen if necessary.
1481 * What if we have been running in the screen saver code... XXX
1482 */
1483 sc_touch_scrn_saver();
1484 scp = sc_console->sc->cur_scp; /* XXX */
1485 sccnupdate(scp);
1486
1487 if (fkeycp < fkey.len) {
1488 crit_exit();
1489 return fkey.str[fkeycp++];
1490 }
1491
1492 if (scp->sc->kbd == NULL) {
1493 crit_exit();
1494 return -1;
1495 }
1496
1497 /*
1498 * Make sure the keyboard is accessible even when the kbd device
1499 * driver is disabled.
1500 */
1501 kbd_enable(scp->sc->kbd);
1502
1503 /* we shall always use the keyboard in the XLATE mode here */
1504 cur_mode = scp->kbd_mode;
1505 scp->kbd_mode = K_XLATE;
1506 kbd_ioctl(scp->sc->kbd, KDSKBMODE, (caddr_t)&scp->kbd_mode);
1507
1508 kbd_poll(scp->sc->kbd, TRUE);
1509 c = scgetc(scp->sc, SCGETC_CN | flags);
1510 kbd_poll(scp->sc->kbd, FALSE);
1511
1512 scp->kbd_mode = cur_mode;
1513 kbd_ioctl(scp->sc->kbd, KDSKBMODE, (caddr_t)&scp->kbd_mode);
1514 kbd_disable(scp->sc->kbd);
1515 crit_exit();
1516
1517 switch (KEYFLAGS(c)) {
1518 case 0: /* normal char */
1519 return KEYCHAR(c);
1520 case FKEY: /* function key */
1521 p = kbd_get_fkeystr(scp->sc->kbd, KEYCHAR(c), (size_t *)&fkeycp);
1522 fkey.len = fkeycp;
1523 if ((p != NULL) && (fkey.len > 0)) {
1524 bcopy(p, fkey.str, fkey.len);
1525 fkeycp = 1;
1526 return fkey.str[0];
1527 }
1528 return c; /* XXX */
1529 case NOKEY:
1530 case ERRKEY:
1531 default:
1532 return -1;
1533 }
1534 /* NOT REACHED */
1535 }
1536
1537 static void
1538 sccnupdate(scr_stat *scp)
1539 {
1540 /* this is a cut-down version of scrn_timer()... */
1541
1542 if (scp->sc->font_loading_in_progress || scp->sc->videoio_in_progress)
1543 return;
1544
1545 if (debugger > 0 || panicstr || shutdown_in_progress) {
1546 sc_touch_scrn_saver();
1547 } else if (scp != scp->sc->cur_scp) {
1548 return;
1549 }
1550
1551 if (!run_scrn_saver)
1552 scp->sc->flags &= ~SC_SCRN_IDLE;
1553 #if NSPLASH > 0
1554 if ((saver_mode != CONS_LKM_SAVER) || !(scp->sc->flags & SC_SCRN_IDLE))
1555 if (scp->sc->flags & SC_SCRN_BLANKED)
1556 stop_scrn_saver(scp->sc, current_saver);
1557 #endif /* NSPLASH */
1558
1559 if (scp != scp->sc->cur_scp || scp->sc->blink_in_progress
1560 || scp->sc->switch_in_progress)
1561 return;
1562 /*
1563 * FIXME: unlike scrn_timer(), we call scrn_update() from here even
1564 * when write_in_progress is non-zero. XXX
1565 */
1566
1567 if (!ISGRAPHSC(scp) && !(scp->sc->flags & SC_SCRN_BLANKED))
1568 scrn_update(scp, TRUE);
1569 }
1570
1571 static void
1572 scrn_timer(void *arg)
1573 {
1574 static int kbd_interval = 0;
1575 struct timeval tv;
1576 sc_softc_t *sc;
1577 scr_stat *scp;
1578 int again;
1579
1580 again = (arg != NULL);
1581 if (arg != NULL)
1582 sc = (sc_softc_t *)arg;
1583 else if (sc_console != NULL)
1584 sc = sc_console->sc;
1585 else
1586 return;
1587
1588 /* don't do anything when we are performing some I/O operations */
1589 if (sc->font_loading_in_progress || sc->videoio_in_progress) {
1590 if (again)
1591 callout_reset(&sc->scrn_timer_ch, hz / 10, scrn_timer, sc);
1592 return;
1593 }
1594 crit_enter();
1595
1596 if ((sc->kbd == NULL) && (sc->config & SC_AUTODETECT_KBD)) {
1597 /* try to allocate a keyboard automatically */
1598 if (++kbd_interval >= 25) {
1599 sc->keyboard = kbd_allocate("*", -1, (void *)&sc->keyboard,
1600 sckbdevent, sc);
1601 if (sc->keyboard >= 0) {
1602 sc->kbd = kbd_get_keyboard(sc->keyboard);
1603 kbd_ioctl(sc->kbd, KDSKBMODE,
1604 (caddr_t)&sc->cur_scp->kbd_mode);
1605 update_kbd_state(sc->cur_scp, sc->cur_scp->status,
1606 LOCK_MASK);
1607 }
1608 kbd_interval = 0;
1609 }
1610 }
1611
1612 /* should we stop the screen saver? */
1613 getmicrouptime(&tv);
1614 if (debugger > 0 || panicstr || shutdown_in_progress)
1615 sc_touch_scrn_saver();
1616 if (run_scrn_saver) {
1617 if (tv.tv_sec > sc->scrn_time_stamp + scrn_blank_time)
1618 sc->flags |= SC_SCRN_IDLE;
1619 else
1620 sc->flags &= ~SC_SCRN_IDLE;
1621 } else {
1622 sc->scrn_time_stamp = tv.tv_sec;
1623 sc->flags &= ~SC_SCRN_IDLE;
1624 if (scrn_blank_time > 0)
1625 run_scrn_saver = TRUE;
1626 }
1627 #if NSPLASH > 0
1628 if ((saver_mode != CONS_LKM_SAVER) || !(sc->flags & SC_SCRN_IDLE))
1629 if (sc->flags & SC_SCRN_BLANKED)
1630 stop_scrn_saver(sc, current_saver);
1631 #endif /* NSPLASH */
1632
1633 /* should we just return ? */
1634 if (sc->blink_in_progress || sc->switch_in_progress
1635 || sc->write_in_progress) {
1636 if (again)
1637 callout_reset(&sc->scrn_timer_ch, hz / 10, scrn_timer, sc);
1638 crit_exit();
1639 return;
1640 }
1641
1642 /* Update the screen */
1643 scp = sc->cur_scp; /* cur_scp may have changed... */
1644 if (!ISGRAPHSC(scp) && !(sc->flags & SC_SCRN_BLANKED))
1645 scrn_update(scp, TRUE);
1646
1647 #if NSPLASH > 0
1648 /* should we activate the screen saver? */
1649 if ((saver_mode == CONS_LKM_SAVER) && (sc->flags & SC_SCRN_IDLE))
1650 if (!ISGRAPHSC(scp) || (sc->flags & SC_SCRN_BLANKED))
1651 (*current_saver)(sc, TRUE);
1652 #endif /* NSPLASH */
1653
1654 if (again)
1655 callout_reset(&sc->scrn_timer_ch, hz / 25, scrn_timer, sc);
1656 crit_exit();
1657 }
1658
1659 static int
1660 and_region(int *s1, int *e1, int s2, int e2)
1661 {
1662 if (*e1 < s2 || e2 < *s1)
1663 return FALSE;
1664 *s1 = imax(*s1, s2);
1665 *e1 = imin(*e1, e2);
1666 return TRUE;
1667 }
1668
1669 static void
1670 scrn_update(scr_stat *scp, int show_cursor)
1671 {
1672 int start;
1673 int end;
1674 int s;
1675 int e;
1676
1677 /* assert(scp == scp->sc->cur_scp) */
1678
1679 ++scp->sc->videoio_in_progress;
1680
1681 #ifndef SC_NO_CUTPASTE
1682 /* remove the previous mouse pointer image if necessary */
1683 if (scp->status & MOUSE_VISIBLE) {
1684 s = scp->mouse_pos;
1685 e = scp->mouse_pos + scp->xsize + 1;
1686 if ((scp->status & (MOUSE_MOVED | MOUSE_HIDDEN))
1687 || and_region(&s, &e, scp->start, scp->end)
1688 || ((scp->status & CURSOR_ENABLED) &&
1689 (scp->cursor_pos != scp->cursor_oldpos) &&
1690 (and_region(&s, &e, scp->cursor_pos, scp->cursor_pos)
1691 || and_region(&s, &e, scp->cursor_oldpos, scp->cursor_oldpos)))) {
1692 sc_remove_mouse_image(scp);
1693 if (scp->end >= scp->xsize*scp->ysize)
1694 scp->end = scp->xsize*scp->ysize - 1;
1695 }
1696 }
1697 #endif /* !SC_NO_CUTPASTE */
1698
1699 #if 1
1700 /* debug: XXX */
1701 if (scp->end >= scp->xsize*scp->ysize) {
1702 kprintf("scrn_update(): scp->end %d > size_of_screen!!\n", scp->end);
1703 scp->end = scp->xsize*scp->ysize - 1;
1704 }
1705 if (scp->start < 0) {
1706 kprintf("scrn_update(): scp->start %d < 0\n", scp->start);
1707 scp->start = 0;
1708 }
1709 #endif
1710
1711 /* update screen image */
1712 if (scp->start <= scp->end) {
1713 if (scp->mouse_cut_end >= 0) {
1714 /* there is a marked region for cut & paste */
1715 if (scp->mouse_cut_start <= scp->mouse_cut_end) {
1716 start = scp->mouse_cut_start;
1717 end = scp->mouse_cut_end;
1718 } else {
1719 start = scp->mouse_cut_end;
1720 end = scp->mouse_cut_start - 1;
1721 }
1722 s = start;
1723 e = end;
1724 /* does the cut-mark region overlap with the update region? */
1725 if (and_region(&s, &e, scp->start, scp->end)) {
1726 (*scp->rndr->draw)(scp, s, e - s + 1, TRUE);
1727 s = 0;
1728 e = start - 1;
1729 if (and_region(&s, &e, scp->start, scp->end))
1730 (*scp->rndr->draw)(scp, s, e - s + 1, FALSE);
1731 s = end + 1;
1732 e = scp->xsize*scp->ysize - 1;
1733 if (and_region(&s, &e, scp->start, scp->end))
1734 (*scp->rndr->draw)(scp, s, e - s + 1, FALSE);
1735 } else {
1736 (*scp->rndr->draw)(scp, scp->start,
1737 scp->end - scp->start + 1, FALSE);
1738 }
1739 } else {
1740 (*scp->rndr->draw)(scp, scp->start,
1741 scp->end - scp->start + 1, FALSE);
1742 }
1743 }
1744
1745 /* we are not to show the cursor and the mouse pointer... */
1746 if (!show_cursor) {
1747 scp->end = 0;
1748 scp->start = scp->xsize*scp->ysize - 1;
1749 --scp->sc->videoio_in_progress;
1750 return;
1751 }
1752
1753 /* update cursor image */
1754 if (scp->status & CURSOR_ENABLED) {
1755 s = scp->start;
1756 e = scp->end;
1757 /* did cursor move since last time ? */
1758 if (scp->cursor_pos != scp->cursor_oldpos) {
1759 /* do we need to remove old cursor image ? */
1760 if (!and_region(&s, &e, scp->cursor_oldpos, scp->cursor_oldpos))
1761 sc_remove_cursor_image(scp);
1762 sc_draw_cursor_image(scp);
1763 } else {
1764 if (and_region(&s, &e, scp->cursor_pos, scp->cursor_pos))
1765 /* cursor didn't move, but has been overwritten */
1766 sc_draw_cursor_image(scp);
1767 else if (scp->sc->flags & SC_BLINK_CURSOR)
1768 /* if it's a blinking cursor, update it */
1769 (*scp->rndr->blink_cursor)(scp, scp->cursor_pos,
1770 sc_inside_cutmark(scp,
1771 scp->cursor_pos));
1772 }
1773 }
1774
1775 #ifndef SC_NO_CUTPASTE
1776 /* update "pseudo" mouse pointer image */
1777 if (scp->sc->flags & SC_MOUSE_ENABLED) {
1778 if (!(scp->status & (MOUSE_VISIBLE | MOUSE_HIDDEN))) {
1779 scp->status &= ~MOUSE_MOVED;
1780 sc_draw_mouse_image(scp);
1781 }
1782 }
1783 #endif /* SC_NO_CUTPASTE */
1784
1785 scp->end = 0;
1786 scp->start = scp->xsize*scp->ysize - 1;
1787
1788 --scp->sc->videoio_in_progress;
1789 }
1790
1791 #if NSPLASH > 0
1792 static int
1793 scsplash_callback(int event, void *arg)
1794 {
1795 sc_softc_t *sc;
1796 int error;
1797
1798 sc = (sc_softc_t *)arg;
1799
1800 switch (event) {
1801 case SPLASH_INIT:
1802 if (add_scrn_saver(scsplash_saver) == 0) {
1803 sc->flags &= ~SC_SAVER_FAILED;
1804 run_scrn_saver = TRUE;
1805 if (cold && !(boothowto & (RB_VERBOSE | RB_CONFIG))) {
1806 scsplash_stick(TRUE);
1807 (*current_saver)(sc, TRUE);
1808 }
1809 }
1810 return 0;
1811
1812 case SPLASH_TERM:
1813 if (current_saver == scsplash_saver) {
1814 scsplash_stick(FALSE);
1815 error = remove_scrn_saver(scsplash_saver);
1816 if (error)
1817 return error;
1818 }
1819 return 0;
1820
1821 default:
1822 return EINVAL;
1823 }
1824 }
1825
1826 static void
1827 scsplash_saver(sc_softc_t *sc, int show)
1828 {
1829 static int busy = FALSE;
1830 scr_stat *scp;
1831
1832 if (busy)
1833 return;
1834 busy = TRUE;
1835
1836 scp = sc->cur_scp;
1837 if (show) {
1838 if (!(sc->flags & SC_SAVER_FAILED)) {
1839 if (!(sc->flags & SC_SCRN_BLANKED))
1840 set_scrn_saver_mode(scp, -1, NULL, 0);
1841 switch (splash(sc->adp, TRUE)) {
1842 case 0: /* succeeded */
1843 break;
1844 case EAGAIN: /* try later */
1845 restore_scrn_saver_mode(scp, FALSE);
1846 sc_touch_scrn_saver(); /* XXX */
1847 break;
1848 default:
1849 sc->flags |= SC_SAVER_FAILED;
1850 scsplash_stick(FALSE);
1851 restore_scrn_saver_mode(scp, TRUE);
1852 kprintf("scsplash_saver(): failed to put up the image\n");
1853 break;
1854 }
1855 }
1856 } else if (!sticky_splash) {
1857 if ((sc->flags & SC_SCRN_BLANKED) && (splash(sc->adp, FALSE) == 0))
1858 restore_scrn_saver_mode(scp, TRUE);
1859 }
1860 busy = FALSE;
1861 }
1862
1863 static int
1864 add_scrn_saver(void (*this_saver)(sc_softc_t *, int))
1865 {
1866 #if 0
1867 int error;
1868
1869 if (current_saver != none_saver) {
1870 error = remove_scrn_saver(current_saver);
1871 if (error)
1872 return error;
1873 }
1874 #endif
1875 if (current_saver != none_saver)
1876 return EBUSY;
1877
1878 run_scrn_saver = FALSE;
1879 saver_mode = CONS_LKM_SAVER;
1880 current_saver = this_saver;
1881 return 0;
1882 }
1883
1884 static int
1885 remove_scrn_saver(void (*this_saver)(sc_softc_t *, int))
1886 {
1887 if (current_saver != this_saver)
1888 return EINVAL;
1889
1890 #if 0
1891 /*
1892 * In order to prevent `current_saver' from being called by
1893 * the timeout routine `scrn_timer()' while we manipulate
1894 * the saver list, we shall set `current_saver' to `none_saver'
1895 * before stopping the current saver, rather than blocking by `splXX()'.
1896 */
1897 current_saver = none_saver;
1898 if (scrn_blanked)
1899 stop_scrn_saver(this_saver);
1900 #endif
1901
1902 /* unblank all blanked screens */
1903 wait_scrn_saver_stop(NULL);
1904 if (scrn_blanked)
1905 return EBUSY;
1906
1907 current_saver = none_saver;
1908 return 0;
1909 }
1910
1911 static int
1912 set_scrn_saver_mode(scr_stat *scp, int mode, u_char *pal, int border)
1913 {
1914
1915 /* assert(scp == scp->sc->cur_scp) */
1916 crit_enter();
1917 if (!ISGRAPHSC(scp))
1918 sc_remove_cursor_image(scp);
1919 scp->splash_save_mode = scp->mode;
1920 scp->splash_save_status = scp->status & (GRAPHICS_MODE | PIXEL_MODE);
1921 scp->status &= ~(GRAPHICS_MODE | PIXEL_MODE);
1922 scp->status |= (UNKNOWN_MODE | SAVER_RUNNING);
1923 scp->sc->flags |= SC_SCRN_BLANKED;
1924 ++scrn_blanked;
1925 crit_exit();
1926 if (mode < 0)
1927 return 0;
1928 scp->mode = mode;
1929 if (set_mode(scp) == 0) {
1930 if (scp->sc->adp->va_info.vi_flags & V_INFO_GRAPHICS)
1931 scp->status |= GRAPHICS_MODE;
1932 #ifndef SC_NO_PALETTE_LOADING
1933 if (pal != NULL)
1934 load_palette(scp->sc->adp, pal);
1935 #endif
1936 sc_set_border(scp, border);
1937 return 0;
1938 } else {
1939 crit_enter();
1940 scp->mode = scp->splash_save_mode;
1941 scp->status &= ~(UNKNOWN_MODE | SAVER_RUNNING);
1942 scp->status |= scp->splash_save_status;
1943 crit_exit();
1944 return 1;
1945 }
1946 }
1947
1948 static int
1949 restore_scrn_saver_mode(scr_stat *scp, int changemode)
1950 {
1951 int mode;
1952 int status;
1953
1954 /* assert(scp == scp->sc->cur_scp) */
1955 crit_enter();
1956 mode = scp->mode;
1957 status = scp->status;
1958 scp->mode = scp->splash_save_mode;
1959 scp->status &= ~(UNKNOWN_MODE | SAVER_RUNNING);
1960 scp->status |= scp->splash_save_status;
1961 scp->sc->flags &= ~SC_SCRN_BLANKED;
1962 if (!changemode) {
1963 if (!ISGRAPHSC(scp))
1964 sc_draw_cursor_image(scp);
1965 --scrn_blanked;
1966 crit_exit();
1967 return 0;
1968 }
1969 if (set_mode(scp) == 0) {
1970 #ifndef SC_NO_PALETTE_LOADING
1971 load_palette(scp->sc->adp, scp->sc->palette);
1972 #endif
1973 --scrn_blanked;
1974 crit_exit();
1975 return 0;
1976 } else {
1977 scp->mode = mode;
1978 scp->status = status;
1979 crit_exit();
1980 return 1;
1981 }
1982 }
1983
1984 static void
1985 stop_scrn_saver(sc_softc_t *sc, void (*saver)(sc_softc_t *, int))
1986 {
1987 (*saver)(sc, FALSE);
1988 run_scrn_saver = FALSE;
1989 /* the screen saver may have chosen not to stop after all... */
1990 if (sc->flags & SC_SCRN_BLANKED)
1991 return;
1992
1993 mark_all(sc->cur_scp);
1994 if (sc->delayed_next_scr)
1995 sc_switch_scr(sc, sc->delayed_next_scr - 1);
1996 wakeup((caddr_t)&scrn_blanked);
1997 }
1998
1999 static int
2000 wait_scrn_saver_stop(sc_softc_t *sc)
2001 {
2002 int error = 0;
2003
2004 while (scrn_blanked > 0) {
2005 run_scrn_saver = FALSE;
2006 if (sc && !(sc->flags & SC_SCRN_BLANKED)) {
2007 error = 0;
2008 break;
2009 }
2010 error = tsleep((caddr_t)&scrn_blanked, PCATCH, "scrsav", 0);
2011 if ((error != 0) && (error != ERESTART))
2012 break;
2013 }
2014 run_scrn_saver = FALSE;
2015 return error;
2016 }
2017 #endif /* NSPLASH */
2018
2019 void
2020 sc_touch_scrn_saver(void)
2021 {
2022 scsplash_stick(FALSE);
2023 run_scrn_saver = FALSE;
2024 }
2025
2026 int
2027 sc_switch_scr(sc_softc_t *sc, u_int next_scr)
2028 {
2029 scr_stat *cur_scp;
2030 struct tty *tp;
2031
2032 DPRINTF(5, ("sc0: sc_switch_scr() %d ", next_scr + 1));
2033
2034 /* prevent switch if previously requested */
2035 if (sc->flags & SC_SCRN_VTYLOCK) {
2036 sc_bell(sc->cur_scp, sc->cur_scp->bell_pitch,
2037 sc->cur_scp->bell_duration);
2038 return EPERM;
2039 }
2040
2041 /* delay switch if the screen is blanked or being updated */
2042 if ((sc->flags & SC_SCRN_BLANKED) || sc->write_in_progress
2043 || sc->blink_in_progress || sc->videoio_in_progress) {
2044 sc->delayed_next_scr = next_scr + 1;
2045 sc_touch_scrn_saver();
2046 DPRINTF(5, ("switch delayed\n"));
2047 return 0;
2048 }
2049
2050 crit_enter();
2051 cur_scp = sc->cur_scp;
2052
2053 /* we are in the middle of the vty switching process... */
2054 if (sc->switch_in_progress
2055 && (cur_scp->smode.mode == VT_PROCESS)
2056 && cur_scp->proc) {
2057 if (cur_scp->proc != pfind(cur_scp->pid)) {
2058 /*
2059 * The controlling process has died!!. Do some clean up.
2060 * NOTE:`cur_scp->proc' and `cur_scp->smode.mode'
2061 * are not reset here yet; they will be cleared later.
2062 */
2063 DPRINTF(5, ("cur_scp controlling process %d died, ",
2064 cur_scp->pid));
2065 if (cur_scp->status & SWITCH_WAIT_REL) {
2066 /*
2067 * Force the previous switch to finish, but return now
2068 * with error.
2069 *
2070 * note: must be called from a critical section because
2071 * finish_vt_rel will call do_switch_scr which releases it
2072 * temporarily.
2073 */
2074 DPRINTF(5, ("reset WAIT_REL, "));
2075 finish_vt_rel(cur_scp, TRUE);
2076 crit_exit();
2077 DPRINTF(5, ("finishing previous switch\n"));
2078 return EINVAL;
2079 } else if (cur_scp->status & SWITCH_WAIT_ACQ) {
2080 /* let's assume screen switch has been completed. */
2081 DPRINTF(5, ("reset WAIT_ACQ, "));
2082 finish_vt_acq(cur_scp);
2083 } else {
2084 /*
2085 * We are in between screen release and acquisition, and
2086 * reached here via scgetc() or scrn_timer() which has
2087 * interrupted exchange_scr(). Don't do anything stupid.
2088 */
2089 DPRINTF(5, ("waiting nothing, "));
2090 }
2091 } else {
2092 /*
2093 * The controlling process is alive, but not responding...
2094 * It is either buggy or it may be just taking time.
2095 * The following code is a gross kludge to cope with this
2096 * problem for which there is no clean solution. XXX
2097 */
2098 if (cur_scp->status & SWITCH_WAIT_REL) {
2099 switch (sc->switch_in_progress++) {
2100 case 1:
2101 break;
2102 case 2:
2103 DPRINTF(5, ("sending relsig again, "));
2104 signal_vt_rel(cur_scp);
2105 break;
2106 case 3:
2107 break;
2108 case 4:
2109 default:
2110 /*
2111 * Act as if the controlling program returned
2112 * VT_FALSE.
2113 *
2114 * note: must be called from a critical section because
2115 * finish_vt_rel will call do_switch_scr which releases it
2116 * temporarily.
2117 */
2118 DPRINTF(5, ("force reset WAIT_REL, "));
2119 finish_vt_rel(cur_scp, FALSE);
2120 crit_exit();
2121 DPRINTF(5, ("act as if VT_FALSE was seen\n"));
2122 return EINVAL;
2123 }
2124 } else if (cur_scp->status & SWITCH_WAIT_ACQ) {
2125 switch (sc->switch_in_progress++) {
2126 case 1:
2127 break;
2128 case 2:
2129 DPRINTF(5, ("sending acqsig again, "));
2130 signal_vt_acq(cur_scp);
2131 break;
2132 case 3:
2133 break;
2134 case 4:
2135 default:
2136 /* clear the flag and finish the previous switch */
2137 DPRINTF(5, ("force reset WAIT_ACQ, "));
2138 finish_vt_acq(cur_scp);
2139 break;
2140 }
2141 }
2142 }
2143 }
2144
2145 /*
2146 * Return error if an invalid argument is given, or vty switch
2147 * is still in progress.
2148 */
2149 if ((next_scr < sc->first_vty) || (next_scr >= sc->first_vty + sc->vtys)
2150 || sc->switch_in_progress) {
2151 crit_exit();
2152 sc_bell(cur_scp, bios_value.bell_pitch, BELL_DURATION);
2153 DPRINTF(5, ("error 1\n"));
2154 return EINVAL;
2155 }
2156
2157 /*
2158 * Don't allow switching away from the graphics mode vty
2159 * if the switch mode is VT_AUTO, unless the next vty is the same
2160 * as the current or the current vty has been closed (but showing).
2161 */
2162 tp = VIRTUAL_TTY(sc, cur_scp->index);
2163 if ((cur_scp->index != next_scr)
2164 && ISTTYOPEN(tp)
2165 && (cur_scp->smode.mode == VT_AUTO)
2166 && ISGRAPHSC(cur_scp)) {
2167 crit_exit();
2168 sc_bell(cur_scp, bios_value.bell_pitch, BELL_DURATION);
2169 DPRINTF(5, ("error, graphics mode\n"));
2170 return EINVAL;
2171 }
2172
2173 /*
2174 * Is the wanted vty open? Don't allow switching to a closed vty.
2175 * If we are in DDB, don't switch to a vty in the VT_PROCESS mode.
2176 * Note that we always allow the user to switch to the kernel
2177 * console even if it is closed.
2178 */
2179 if ((sc_console == NULL) || (next_scr != sc_console->index)) {
2180 tp = VIRTUAL_TTY(sc, next_scr);
2181 if (!ISTTYOPEN(tp)) {
2182 crit_exit();
2183 sc_bell(cur_scp, bios_value.bell_pitch, BELL_DURATION);
2184 DPRINTF(5, ("error 2, requested vty isn't open!\n"));
2185 return EINVAL;
2186 }
2187 if ((debugger > 0) && (SC_STAT(tp->t_dev)->smode.mode == VT_PROCESS)) {
2188 crit_exit();
2189 DPRINTF(5, ("error 3, requested vty is in the VT_PROCESS mode\n"));
2190 return EINVAL;
2191 }
2192 }
2193
2194 /* this is the start of vty switching process... */
2195 ++sc->switch_in_progress;
2196 sc->delayed_next_scr = 0;
2197 sc->old_scp = cur_scp;
2198 sc->new_scp = SC_STAT(SC_DEV(sc, next_scr));
2199 if (sc->new_scp == sc->old_scp) {
2200 sc->switch_in_progress = 0;
2201 wakeup((caddr_t)&sc->new_scp->smode);
2202 crit_exit();
2203 DPRINTF(5, ("switch done (new == old)\n"));
2204 return 0;
2205 }
2206
2207 /* has controlling process died? */
2208 vt_proc_alive(sc->old_scp);
2209 vt_proc_alive(sc->new_scp);
2210
2211 /* wait for the controlling process to release the screen, if necessary */
2212 if (signal_vt_rel(sc->old_scp)) {
2213 crit_exit();
2214 return 0;
2215 }
2216
2217 /* go set up the new vty screen */
2218 crit_exit();
2219 exchange_scr(sc);
2220 crit_enter();
2221
2222 /* wake up processes waiting for this vty */
2223 wakeup((caddr_t)&sc->cur_scp->smode);
2224
2225 /* wait for the controlling process to acknowledge, if necessary */
2226 if (signal_vt_acq(sc->cur_scp)) {
2227 crit_exit();
2228 return 0;
2229 }
2230
2231 sc->switch_in_progress = 0;
2232 if (sc->unit == sc_console_unit)
2233 cons_unavail = FALSE;
2234 crit_exit();
2235 DPRINTF(5, ("switch done\n"));
2236
2237 return 0;
2238 }
2239
2240 /*
2241 * NOTE: must be called from a critical section because do_switch_scr
2242 * will release it temporarily.
2243 */
2244 static void
2245 do_switch_scr(sc_softc_t *sc)
2246 {
2247 vt_proc_alive(sc->new_scp);
2248
2249 crit_exit();
2250 exchange_scr(sc);
2251 crit_enter();
2252 /* sc->cur_scp == sc->new_scp */
2253 wakeup((caddr_t)&sc->cur_scp->smode);
2254
2255 /* wait for the controlling process to acknowledge, if necessary */
2256 if (!signal_vt_acq(sc->cur_scp)) {
2257 sc->switch_in_progress = 0;
2258 if (sc->unit == sc_console_unit)
2259 cons_unavail = FALSE;
2260 }
2261 }
2262
2263 static int
2264 vt_proc_alive(scr_stat *scp)
2265 {
2266 if (scp->proc) {
2267 if (scp->proc == pfind(scp->pid))
2268 return TRUE;
2269 scp->proc = NULL;
2270 scp->smode.mode = VT_AUTO;
2271 DPRINTF(5, ("vt controlling process %d died\n", scp->pid));
2272 }
2273 return FALSE;
2274 }
2275
2276 static int
2277 signal_vt_rel(scr_stat *scp)
2278 {
2279 if (scp->smode.mode != VT_PROCESS)
2280 return FALSE;
2281 scp->status |= SWITCH_WAIT_REL;
2282 ksignal(scp->proc, scp->smode.relsig);
2283 DPRINTF(5, ("sending relsig to %d\n", scp->pid));
2284 return TRUE;
2285 }
2286
2287 static int
2288 signal_vt_acq(scr_stat *scp)
2289 {
2290 if (scp->smode.mode != VT_PROCESS)
2291 return FALSE;
2292 if (scp->sc->unit == sc_console_unit)
2293 cons_unavail = TRUE;
2294 scp->status |= SWITCH_WAIT_ACQ;
2295 ksignal(scp->proc, scp->smode.acqsig);
2296 DPRINTF(5, ("sending acqsig to %d\n", scp->pid));
2297 return TRUE;
2298 }
2299
2300 /*
2301 * NOTE: must be called from a critical section because do_switch_scr
2302 * will release it temporarily.
2303 */
2304 static int
2305 finish_vt_rel(scr_stat *scp, int release)
2306 {
2307 if (scp == scp->sc->old_scp && scp->status & SWITCH_WAIT_REL) {
2308 scp->status &= ~SWITCH_WAIT_REL;
2309 if (release)
2310 do_switch_scr(scp->sc);
2311 else
2312 scp->sc->switch_in_progress = 0;
2313 return 0;
2314 }
2315 return EINVAL;
2316 }
2317
2318 static int
2319 finish_vt_acq(scr_stat *scp)
2320 {
2321 if (scp == scp->sc->new_scp && scp->status & SWITCH_WAIT_ACQ) {
2322 scp->status &= ~SWITCH_WAIT_ACQ;
2323 scp->sc->switch_in_progress = 0;
2324 return 0;
2325 }
2326 return EINVAL;
2327 }
2328
2329 static void
2330 exchange_scr(sc_softc_t *sc)
2331 {
2332 scr_stat *scp;
2333
2334 /* save the current state of video and keyboard */
2335 sc_move_cursor(sc->old_scp, sc->old_scp->xpos, sc->old_scp->ypos);
2336 if (!ISGRAPHSC(sc->old_scp))
2337 sc_remove_cursor_image(sc->old_scp);
2338 if (sc->old_scp->kbd_mode == K_XLATE)
2339 save_kbd_state(sc->old_scp);
2340
2341 /* set up the video for the new screen */
2342 scp = sc->cur_scp = sc->new_scp;
2343 if (sc->old_scp->mode != scp->mode || ISUNKNOWNSC(sc->old_scp))
2344 set_mode(scp);
2345 else
2346 sc_vtb_init(&scp->scr, VTB_FRAMEBUFFER, scp->xsize, scp->ysize,
2347 (void *)sc->adp->va_window, FALSE);
2348 scp->status |= MOUSE_HIDDEN;
2349 sc_move_cursor(scp, scp->xpos, scp->ypos);
2350 if (!ISGRAPHSC(scp))
2351 sc_set_cursor_image(scp);
2352 #ifndef SC_NO_PALETTE_LOADING
2353 if (ISGRAPHSC(sc->old_scp))
2354 load_palette(sc->adp, sc->palette);
2355 #endif
2356 sc_set_border(scp, scp->border);
2357
2358 /* set up the keyboard for the new screen */
2359 if (sc->old_scp->kbd_mode != scp->kbd_mode)
2360 kbd_ioctl(sc->kbd, KDSKBMODE, (caddr_t)&scp->kbd_mode);
2361 update_kbd_state(scp, scp->status, LOCK_MASK);
2362
2363 mark_all(scp);
2364 }
2365
2366 void
2367 sc_puts(scr_stat *scp, u_char *buf, int len)
2368 {
2369 #if NSPLASH > 0
2370 /* make screensaver happy */
2371 if (!sticky_splash && scp == scp->sc->cur_scp)
2372 run_scrn_saver = FALSE;
2373 #endif
2374
2375 if (scp->tsw)
2376 (*scp->tsw->te_puts)(scp, buf, len);
2377
2378 if (scp->sc->delayed_next_scr)
2379 sc_switch_scr(scp->sc, scp->sc->delayed_next_scr - 1);
2380 }
2381
2382 void
2383 sc_draw_cursor_image(scr_stat *scp)
2384 {
2385 /* assert(scp == scp->sc->cur_scp); */
2386 ++scp->sc->videoio_in_progress;
2387 (*scp->rndr->draw_cursor)(scp, scp->cursor_pos,
2388 scp->sc->flags & SC_BLINK_CURSOR, TRUE,
2389 sc_inside_cutmark(scp, scp->cursor_pos));
2390 scp->cursor_oldpos = scp->cursor_pos;
2391 --scp->sc->videoio_in_progress;
2392 }
2393
2394 void
2395 sc_remove_cursor_image(scr_stat *scp)
2396 {
2397 /* assert(scp == scp->sc->cur_scp); */
2398 ++scp->sc->videoio_in_progress;
2399 (*scp->rndr->draw_cursor)(scp, scp->cursor_oldpos,
2400 scp->sc->flags & SC_BLINK_CURSOR, FALSE,
2401 sc_inside_cutmark(scp, scp->cursor_oldpos));
2402 --scp->sc->videoio_in_progress;
2403 }
2404
2405 static void
2406 update_cursor_image(scr_stat *scp)
2407 {
2408 int blink;
2409
2410 if (scp->sc->flags & SC_CHAR_CURSOR) {
2411 scp->cursor_base = imax(0, scp->sc->cursor_base);
2412 scp->cursor_height = imin(scp->sc->cursor_height, scp->font_size);
2413 } else {
2414 scp->cursor_base = 0;
2415 scp->cursor_height = scp->font_size;
2416 }
2417 blink = scp->sc->flags & SC_BLINK_CURSOR;
2418
2419 /* assert(scp == scp->sc->cur_scp); */
2420 ++scp->sc->videoio_in_progress;
2421 (*scp->rndr->draw_cursor)(scp, scp->cursor_oldpos, blink, FALSE,
2422 sc_inside_cutmark(scp, scp->cursor_pos));
2423 (*scp->rndr->set_cursor)(scp, scp->cursor_base, scp->cursor_height, blink);
2424 (*scp->rndr->draw_cursor)(scp, scp->cursor_pos, blink, TRUE,
2425 sc_inside_cutmark(scp, scp->cursor_pos));
2426 --scp->sc->videoio_in_progress;
2427 }
2428
2429 void
2430 sc_set_cursor_image(scr_stat *scp)
2431 {
2432 if (scp->sc->flags & SC_CHAR_CURSOR) {
2433 scp->cursor_base = imax(0, scp->sc->cursor_base);
2434 scp->cursor_height = imin(scp->sc->cursor_height, scp->font_size);
2435 } else {
2436 scp->cursor_base = 0;
2437 scp->cursor_height = scp->font_size;
2438 }
2439
2440 /* assert(scp == scp->sc->cur_scp); */
2441 ++scp->sc->videoio_in_progress;
2442 (*scp->rndr->set_cursor)(scp, scp->cursor_base, scp->cursor_height,
2443 scp->sc->flags & SC_BLINK_CURSOR);
2444 --scp->sc->videoio_in_progress;
2445 }
2446
2447 static void
2448 scinit(int unit, int flags)
2449 {
2450 /*
2451 * When syscons is being initialized as the kernel console, malloc()
2452 * is not yet functional, because various kernel structures has not been
2453 * fully initialized yet. Therefore, we need to declare the following
2454 * static buffers for the console. This is less than ideal,
2455 * but is necessry evil for the time being. XXX
2456 */
2457 static scr_stat main_console;
2458 static u_short sc_buffer[ROW*COL]; /* XXX */
2459 #ifndef SC_NO_FONT_LOADING
2460 static u_char font_8[256*8];
2461 static u_char font_14[256*14];
2462 static u_char font_16[256*16];
2463 #endif
2464
2465 sc_softc_t *sc;
2466 scr_stat *scp;
2467 video_adapter_t *adp;
2468 int col;
2469 int row;
2470 int i;
2471
2472 /* one time initialization */
2473 if (init_done == COLD)
2474 sc_get_bios_values(&bios_value);
2475 init_done = WARM;
2476
2477 /*
2478 * Allocate resources. Even if we are being called for the second
2479 * time, we must allocate them again, because they might have
2480 * disappeared...
2481 */
2482 sc = sc_get_softc(unit, flags & SC_KERNEL_CONSOLE);
2483 adp = NULL;
2484 if (sc->adapter >= 0) {
2485 vid_release(sc->adp, (void *)&sc->adapter);
2486 adp = sc->adp;
2487 sc->adp = NULL;
2488 }
2489 if (sc->keyboard >= 0) {
2490 DPRINTF(5, ("sc%d: releasing kbd%d\n", unit, sc->keyboard));
2491 i = kbd_release(sc->kbd, (void *)&sc->keyboard);
2492 DPRINTF(5, ("sc%d: kbd_release returned %d\n", unit, i));
2493 if (sc->kbd != NULL) {
2494 DPRINTF(5, ("sc%d: kbd != NULL!, index:%d, unit:%d, flags:0x%x\n",
2495 unit, sc->kbd->kb_index, sc->kbd->kb_unit, sc->kbd->kb_flags));
2496 }
2497 sc->kbd = NULL;
2498 }
2499 sc->adapter = vid_allocate("*", unit, (void *)&sc->adapter);
2500 sc->adp = vid_get_adapter(sc->adapter);
2501 /* assert((sc->adapter >= 0) && (sc->adp != NULL)) */
2502 sc->keyboard = kbd_allocate("*", unit, (void *)&sc->keyboard,
2503 sckbdevent, sc);
2504 DPRINTF(1, ("sc%d: keyboard %d\n", unit, sc->keyboard));
2505 sc->kbd = kbd_get_keyboard(sc->keyboard);
2506 if (sc->kbd != NULL) {
2507 DPRINTF(1, ("sc%d: kbd index:%d, unit:%d, flags:0x%x\n",
2508 unit, sc->kbd->kb_index, sc->kbd->kb_unit, sc->kbd->kb_flags));
2509 }
2510
2511 if (!(sc->flags & SC_INIT_DONE) || (adp != sc->adp)) {
2512
2513 sc->initial_mode = sc->adp->va_initial_mode;
2514
2515 #ifndef SC_NO_FONT_LOADING
2516 if (flags & SC_KERNEL_CONSOLE) {
2517 sc->font_8 = font_8;
2518 sc->font_14 = font_14;
2519 sc->font_16 = font_16;
2520 } else if (sc->font_8 == NULL) {
2521 /* assert(sc_malloc) */
2522 sc->font_8 = kmalloc(sizeof(font_8), M_SYSCONS, M_WAITOK);
2523 sc->font_14 = kmalloc(sizeof(font_14), M_SYSCONS, M_WAITOK);
2524 sc->font_16 = kmalloc(sizeof(font_16), M_SYSCONS, M_WAITOK);
2525 }
2526 #endif
2527
2528 /* extract the hardware cursor location and hide the cursor for now */
2529 (*vidsw[sc->adapter]->read_hw_cursor)(sc->adp, &col, &row);
2530 (*vidsw[sc->adapter]->set_hw_cursor)(sc->adp, -1, -1);
2531
2532 /* set up the first console */
2533 sc->first_vty = unit*MAXCONS;
2534 sc->vtys = MAXCONS; /* XXX: should be configurable */
2535 if (flags & SC_KERNEL_CONSOLE) {
2536 scp = &main_console;
2537 sc->console_scp = scp;
2538 init_scp(sc, sc->first_vty, scp);
2539 sc_vtb_init(&scp->vtb, VTB_MEMORY, scp->xsize, scp->ysize,
2540 (void *)sc_buffer, FALSE);
2541 if (sc_init_emulator(scp, SC_DFLT_TERM))
2542 sc_init_emulator(scp, "*");
2543 (*scp->tsw->te_default_attr)(scp,
2544 kernel_default.std_color,
2545 kernel_default.rev_color);
2546 } else {
2547 /* assert(sc_malloc) */
2548 sc->dev = kmalloc(sizeof(cdev_t)*sc->vtys, M_SYSCONS, M_WAITOK | M_ZERO);
2549 sc->dev[0] = make_dev(&sc_ops, unit*MAXCONS, UID_ROOT,
2550 GID_WHEEL, 0600, "ttyv%r", unit*MAXCONS);
2551 sc->dev[0]->si_tty = ttymalloc(sc->dev[0]->si_tty);
2552 scp = alloc_scp(sc, sc->first_vty);
2553 sc->dev[0]->si_drv1 = scp;
2554 }
2555 sc->cur_scp = scp;
2556
2557 /* copy screen to temporary buffer */
2558 sc_vtb_init(&scp->scr, VTB_FRAMEBUFFER, scp->xsize, scp->ysize,
2559 (void *)scp->sc->adp->va_window, FALSE);
2560 if (ISTEXTSC(scp))
2561 sc_vtb_copy(&scp->scr, 0, &scp->vtb, 0, scp->xsize*scp->ysize);
2562
2563 /* move cursors to the initial positions */
2564 if (col >= scp->xsize)
2565 col = 0;
2566 if (row >= scp->ysize)
2567 row = scp->ysize - 1;
2568 scp->xpos = col;
2569 scp->ypos = row;
2570 scp->cursor_pos = scp->cursor_oldpos = row*scp->xsize + col;
2571 if (bios_value.cursor_end < scp->font_size)
2572 sc->cursor_base = scp->font_size - bios_value.cursor_end - 1;
2573 else
2574 sc->cursor_base = 0;
2575 i = bios_value.cursor_end - bios_value.cursor_start + 1;
2576 sc->cursor_height = imin(i, scp->font_size);
2577 #ifndef SC_NO_SYSMOUSE
2578 sc_mouse_move(scp, scp->xpixel/2, scp->ypixel/2);
2579 #endif
2580 if (!ISGRAPHSC(scp)) {
2581 sc_set_cursor_image(scp);
2582 sc_draw_cursor_image(scp);
2583 }
2584
2585 /* save font and palette */
2586 #ifndef SC_NO_FONT_LOADING
2587 sc->fonts_loaded = 0;
2588 if (ISFONTAVAIL(sc->adp->va_flags)) {
2589 #ifdef SC_DFLT_FONT
2590 bcopy(dflt_font_8, sc->font_8, sizeof(dflt_font_8));
2591 bcopy(dflt_font_14, sc->font_14, sizeof(dflt_font_14));
2592 bcopy(dflt_font_16, sc->font_16, sizeof(dflt_font_16));
2593 sc->fonts_loaded = FONT_16 | FONT_14 | FONT_8;
2594 if (scp->font_size < 14) {
2595 sc_load_font(scp, 0, 8, sc->font_8, 0, 256);
2596 } else if (scp->font_size >= 16) {
2597 sc_load_font(scp, 0, 16, sc->font_16, 0, 256);
2598 } else {
2599 sc_load_font(scp, 0, 14, sc->font_14, 0, 256);
2600 }
2601 #else /* !SC_DFLT_FONT */
2602 if (scp->font_size < 14) {
2603 sc_save_font(scp, 0, 8, sc->font_8, 0, 256);
2604 sc->fonts_loaded = FONT_8;
2605 } else if (scp->font_size >= 16) {
2606 sc_save_font(scp, 0, 16, sc->font_16, 0, 256);
2607 sc->fonts_loaded = FONT_16;
2608 } else {
2609 sc_save_font(scp, 0, 14, sc->font_14, 0, 256);
2610 sc->fonts_loaded = FONT_14;
2611 }
2612 #endif /* SC_DFLT_FONT */
2613 /* FONT KLUDGE: always use the font page #0. XXX */
2614 sc_show_font(scp, 0);
2615 }
2616 #endif /* !SC_NO_FONT_LOADING */
2617
2618 #ifndef SC_NO_PALETTE_LOADING
2619 save_palette(sc->adp, sc->palette);
2620 #endif
2621
2622 #if NSPLASH > 0
2623 if (!(sc->flags & SC_SPLASH_SCRN) && (flags & SC_KERNEL_CONSOLE)) {
2624 /* we are ready to put up the splash image! */
2625 splash_init(sc->adp, scsplash_callback, sc);
2626 sc->flags |= SC_SPLASH_SCRN;
2627 }
2628 #endif /* NSPLASH */
2629 }
2630
2631 /* the rest is not necessary, if we have done it once */
2632 if (sc->flags & SC_INIT_DONE)
2633 return;
2634
2635 /* initialize mapscrn arrays to a one to one map */
2636 for (i = 0; i < sizeof(sc->scr_map); i++)
2637 sc->scr_map[i] = sc->scr_rmap[i] = i;
2638
2639 sc->flags |= SC_INIT_DONE;
2640 }
2641
2642 static void
2643 scterm(int unit, int flags)
2644 {
2645 sc_softc_t *sc;
2646 scr_stat *scp;
2647
2648 sc = sc_get_softc(unit, flags & SC_KERNEL_CONSOLE);
2649 if (sc == NULL)
2650 return; /* shouldn't happen */
2651
2652 #if NSPLASH > 0
2653 /* this console is no longer available for the splash screen */
2654 if (sc->flags & SC_SPLASH_SCRN) {
2655 splash_term(sc->adp);
2656 sc->flags &= ~SC_SPLASH_SCRN;
2657 }
2658 #endif /* NSPLASH */
2659
2660 #if 0 /* XXX */
2661 /* move the hardware cursor to the upper-left corner */
2662 (*vidsw[sc->adapter]->set_hw_cursor)(sc->adp, 0, 0);
2663 #endif
2664
2665 /* release the keyboard and the video card */
2666 if (sc->keyboard >= 0)
2667 kbd_release(sc->kbd, &sc->keyboard);
2668 if (sc->adapter >= 0)
2669 vid_release(sc->adp, &sc->adapter);
2670
2671 /*
2672 * Stop the terminal emulator, if any. If operating on the
2673 * kernel console sc->dev may not be setup yet.
2674 */
2675 if (flags & SC_KERNEL_CONSOLE)
2676 scp = sc->console_scp;
2677 else
2678 scp = SC_STAT(sc->dev[0]);
2679 if (scp->tsw)
2680 (*scp->tsw->te_term)(scp, &scp->ts);
2681 if (scp->ts != NULL)
2682 kfree(scp->ts, M_SYSCONS);
2683
2684 /* clear the structure */
2685 if (!(flags & SC_KERNEL_CONSOLE)) {
2686 /* XXX: We need delete_dev() for this */
2687 kfree(sc->dev, M_SYSCONS);
2688 #if 0
2689 /* XXX: We need a ttyunregister for this */
2690 kfree(sc->tty, M_SYSCONS);
2691 #endif
2692 #ifndef SC_NO_FONT_LOADING
2693 kfree(sc->font_8, M_SYSCONS);
2694 kfree(sc->font_14, M_SYSCONS);
2695 kfree(sc->font_16, M_SYSCONS);
2696 #endif
2697 /* XXX vtb, history */
2698 }
2699 bzero(sc, sizeof(*sc));
2700 sc->keyboard = -1;
2701 sc->adapter = -1;
2702 }
2703
2704 static void
2705 scshutdown(void *arg, int howto)
2706 {
2707 /* assert(sc_console != NULL) */
2708
2709 sc_touch_scrn_saver();
2710 if (!cold && sc_console
2711 && sc_console->sc->cur_scp->smode.mode == VT_AUTO
2712 && sc_console->smode.mode == VT_AUTO)
2713 sc_switch_scr(sc_console->sc, sc_console->index);
2714 shutdown_in_progress = TRUE;
2715 }
2716
2717 int
2718 sc_clean_up(scr_stat *scp)
2719 {
2720 #if NSPLASH > 0
2721 int error;
2722 #endif /* NSPLASH */
2723
2724 if (scp->sc->flags & SC_SCRN_BLANKED) {
2725 sc_touch_scrn_saver();
2726 #if NSPLASH > 0
2727 if ((error = wait_scrn_saver_stop(scp->sc)))
2728 return error;
2729 #endif /* NSPLASH */
2730 }
2731 scp->status |= MOUSE_HIDDEN;
2732 sc_remove_mouse_image(scp);
2733 sc_remove_cutmarking(scp);
2734 return 0;
2735 }
2736
2737 void
2738 sc_alloc_scr_buffer(scr_stat *scp, int wait, int discard)
2739 {
2740 sc_vtb_t new;
2741 sc_vtb_t old;
2742
2743 old = scp->vtb;
2744 sc_vtb_init(&new, VTB_MEMORY, scp->xsize, scp->ysize, NULL, wait);
2745 if (!discard && (old.vtb_flags & VTB_VALID)) {
2746 /* retain the current cursor position and buffer contants */
2747 scp->cursor_oldpos = scp->cursor_pos;
2748 /*
2749 * This works only if the old buffer has the same size as or larger
2750 * than the new one. XXX
2751 */
2752 sc_vtb_copy(&old, 0, &new, 0, scp->xsize*scp->ysize);
2753 scp->vtb = new;
2754 } else {
2755 scp->vtb = new;
2756 sc_vtb_destroy(&old);
2757 }
2758
2759 #ifndef SC_NO_SYSMOUSE
2760 /* move the mouse cursor at the center of the screen */
2761 sc_mouse_move(scp, scp->xpixel / 2, scp->ypixel / 2);
2762 #endif
2763 }
2764
2765 static scr_stat *
2766 alloc_scp(sc_softc_t *sc, int vty)
2767 {
2768 scr_stat *scp;
2769
2770 /* assert(sc_malloc) */
2771
2772 scp = kmalloc(sizeof(scr_stat), M_SYSCONS, M_WAITOK);
2773 init_scp(sc, vty, scp);
2774
2775 sc_alloc_scr_buffer(scp, TRUE, TRUE);
2776 if (sc_init_emulator(scp, SC_DFLT_TERM))
2777 sc_init_emulator(scp, "*");
2778
2779 #ifndef SC_NO_CUTPASTE
2780 sc_alloc_cut_buffer(scp, TRUE);
2781 #endif
2782
2783 #ifndef SC_NO_HISTORY
2784 sc_alloc_history_buffer(scp, 0, 0, TRUE);
2785 #endif
2786
2787 return scp;
2788 }
2789
2790 static void
2791 init_scp(sc_softc_t *sc, int vty, scr_stat *scp)
2792 {
2793 video_info_t info;
2794
2795 bzero(scp, sizeof(*scp));
2796
2797 scp->index = vty;
2798 scp->sc = sc;
2799 scp->status = 0;
2800 scp->mode = sc->initial_mode;
2801 callout_init(&scp->blink_screen_ch);
2802 (*vidsw[sc->adapter]->get_info)(sc->adp, scp->mode, &info);
2803 if (info.vi_flags & V_INFO_GRAPHICS) {
2804 scp->status |= GRAPHICS_MODE;
2805 scp->xpixel = info.vi_width;
2806 scp->ypixel = info.vi_height;
2807 scp->xsize = info.vi_width/8;
2808 scp->ysize = info.vi_height/info.vi_cheight;
2809 scp->font_size = 0;
2810 scp->font = NULL;
2811 } else {
2812 scp->xsize = info.vi_width;
2813 scp->ysize = info.vi_height;
2814 scp->xpixel = scp->xsize*8;
2815 scp->ypixel = scp->ysize*info.vi_cheight;
2816 if (info.vi_cheight < 14) {
2817 scp->font_size = 8;
2818 #ifndef SC_NO_FONT_LOADING
2819 scp->font = sc->font_8;
2820 #else
2821 scp->font = NULL;
2822 #endif
2823 } else if (info.vi_cheight >= 16) {
2824 scp->font_size = 16;
2825 #ifndef SC_NO_FONT_LOADING
2826 scp->font = sc->font_16;
2827 #else
2828 scp->font = NULL;
2829 #endif
2830 } else {
2831 scp->font_size = 14;
2832 #ifndef SC_NO_FONT_LOADING
2833 scp->font = sc->font_14;
2834 #else
2835 scp->font = NULL;
2836 #endif
2837 }
2838 }
2839 sc_vtb_init(&scp->vtb, VTB_MEMORY, 0, 0, NULL, FALSE);
2840 sc_vtb_init(&scp->scr, VTB_FRAMEBUFFER, 0, 0, NULL, FALSE);
2841 scp->xoff = scp->yoff = 0;
2842 scp->xpos = scp->ypos = 0;
2843 scp->start = scp->xsize * scp->ysize - 1;
2844 scp->end = 0;
2845 scp->tsw = NULL;
2846 scp->ts = NULL;
2847 scp->rndr = NULL;
2848 scp->border = BG_BLACK;
2849 scp->cursor_base = sc->cursor_base;
2850 scp->cursor_height = imin(sc->cursor_height, scp->font_size);
2851 scp->mouse_cut_start = scp->xsize*scp->ysize;
2852 scp->mouse_cut_end = -1;
2853 scp->mouse_signal = 0;
2854 scp->mouse_pid = 0;
2855 scp->mouse_proc = NULL;
2856 scp->kbd_mode = K_XLATE;
2857 scp->bell_pitch = bios_value.bell_pitch;
2858 scp->bell_duration = BELL_DURATION;
2859 scp->status |= (bios_value.shift_state & NLKED);
2860 scp->status |= CURSOR_ENABLED | MOUSE_HIDDEN;
2861 scp->pid = 0;
2862 scp->proc = NULL;
2863 scp->smode.mode = VT_AUTO;
2864 scp->history = NULL;
2865 scp->history_pos = 0;
2866 scp->history_size = 0;
2867 }
2868
2869 int
2870 sc_init_emulator(scr_stat *scp, char *name)
2871 {
2872 sc_term_sw_t *sw;
2873 sc_rndr_sw_t *rndr;
2874 void *p;
2875 int error;
2876
2877 if (name == NULL) /* if no name is given, use the current emulator */
2878 sw = scp->tsw;
2879 else /* ...otherwise find the named emulator */
2880 sw = sc_term_match(name);
2881 if (sw == NULL)
2882 return EINVAL;
2883
2884 rndr = NULL;
2885 if (strcmp(sw->te_renderer, "*") != 0) {
2886 rndr = sc_render_match(scp, sw->te_renderer,
2887 scp->status & (GRAPHICS_MODE | PIXEL_MODE));
2888 }
2889 if (rndr == NULL) {
2890 rndr = sc_render_match(scp, scp->sc->adp->va_name,
2891 scp->status & (GRAPHICS_MODE | PIXEL_MODE));
2892 if (rndr == NULL)
2893 return ENODEV;
2894 }
2895
2896 if (sw == scp->tsw) {
2897 error = (*sw->te_init)(scp, &scp->ts, SC_TE_WARM_INIT);
2898 scp->rndr = rndr;
2899 scp->rndr->init(scp);
2900 sc_clear_screen(scp);
2901 /* assert(error == 0); */
2902 return error;
2903 }
2904
2905 if (sc_malloc && (sw->te_size > 0))
2906 p = kmalloc(sw->te_size, M_SYSCONS, M_NOWAIT);
2907 else
2908 p = NULL;
2909 error = (*sw->te_init)(scp, &p, SC_TE_COLD_INIT);
2910 if (error)
2911 return error;
2912
2913 if (scp->tsw)
2914 (*scp->tsw->te_term)(scp, &scp->ts);
2915 if (scp->ts != NULL)
2916 kfree(scp->ts, M_SYSCONS);
2917 scp->tsw = sw;
2918 scp->ts = p;
2919 scp->rndr = rndr;
2920 scp->rndr->init(scp);
2921
2922 /* XXX */
2923 (*sw->te_default_attr)(scp, user_default.std_color, user_default.rev_color);
2924 sc_clear_screen(scp);
2925
2926 return 0;
2927 }
2928
2929 /*
2930 * scgetc(flags) - get character from keyboard.
2931 * If flags & SCGETC_CN, then avoid harmful side effects.
2932 * If flags & SCGETC_NONBLOCK, then wait until a key is pressed, else
2933 * return NOKEY if there is nothing there.
2934 */
2935 static u_int
2936 scgetc(sc_softc_t *sc, u_int flags)
2937 {
2938 scr_stat *scp;
2939 #ifndef SC_NO_HISTORY
2940 struct tty *tp;
2941 #endif
2942 u_int c;
2943 int this_scr;
2944 int f;
2945 int i;
2946
2947 if (sc->kbd == NULL)
2948 return NOKEY;
2949
2950 next_code:
2951 #if 1
2952 /* I don't like this, but... XXX */
2953 if (flags & SCGETC_CN)
2954 sccnupdate(sc->cur_scp);
2955 #endif
2956 scp = sc->cur_scp;
2957 /* first see if there is something in the keyboard port */
2958 for (;;) {
2959 c = kbd_read_char(sc->kbd, !(flags & SCGETC_NONBLOCK));
2960 if (c == ERRKEY) {
2961 if (!(flags & SCGETC_CN))
2962 sc_bell(scp, bios_value.bell_pitch, BELL_DURATION);
2963 } else if (c == NOKEY)
2964 return c;
2965 else
2966 break;
2967 }
2968
2969 /* make screensaver happy */
2970 if (!(c & RELKEY))
2971 sc_touch_scrn_saver();
2972
2973 if (!(flags & SCGETC_CN))
2974 /* do the /dev/random device a favour */
2975 add_keyboard_randomness(c);
2976
2977 if (scp->kbd_mode != K_XLATE)
2978 return KEYCHAR(c);
2979
2980 /* if scroll-lock pressed allow history browsing */
2981 if (!ISGRAPHSC(scp) && scp->history && scp->status & SLKED) {
2982
2983 scp->status &= ~CURSOR_ENABLED;
2984 sc_remove_cursor_image(scp);
2985
2986 #ifndef SC_NO_HISTORY
2987 if (!(scp->status & BUFFER_SAVED)) {
2988 scp->status |= BUFFER_SAVED;
2989 sc_hist_save(scp);
2990 }
2991 switch (c) {
2992 /* FIXME: key codes */
2993 case SPCLKEY | FKEY | F(49): /* home key */
2994 sc_remove_cutmarking(scp);
2995 sc_hist_home(scp);
2996 goto next_code;
2997
2998 case SPCLKEY | FKEY | F(57): /* end key */
2999 sc_remove_cutmarking(scp);
3000 sc_hist_end(scp);
3001 goto next_code;
3002
3003 case SPCLKEY | FKEY | F(50): /* up arrow key */
3004 sc_remove_cutmarking(scp);
3005 if (sc_hist_up_line(scp))
3006 if (!(flags & SCGETC_CN))
3007 sc_bell(scp, bios_value.bell_pitch, BELL_DURATION);
3008 goto next_code;
3009
3010 case SPCLKEY | FKEY | F(58): /* down arrow key */
3011 sc_remove_cutmarking(scp);
3012 if (sc_hist_down_line(scp))
3013 if (!(flags & SCGETC_CN))
3014 sc_bell(scp, bios_value.bell_pitch, BELL_DURATION);
3015 goto next_code;
3016
3017 case SPCLKEY | FKEY | F(51): /* page up key */
3018 sc_remove_cutmarking(scp);
3019 for (i=0; i<scp->ysize; i++)
3020 if (sc_hist_up_line(scp)) {
3021 if (!(flags & SCGETC_CN))
3022 sc_bell(scp, bios_value.bell_pitch, BELL_DURATION);
3023 break;
3024 }
3025 goto next_code;
3026
3027 case SPCLKEY | FKEY | F(59): /* page down key */
3028 sc_remove_cutmarking(scp);
3029 for (i=0; i<scp->ysize; i++)
3030 if (sc_hist_down_line(scp)) {
3031 if (!(flags & SCGETC_CN))
3032 sc_bell(scp, bios_value.bell_pitch, BELL_DURATION);
3033 break;
3034 }
3035 goto next_code;
3036 }
3037 #endif /* SC_NO_HISTORY */
3038 }
3039
3040 /*
3041 * Process and consume special keys here. Return a plain char code
3042 * or a char code with the META flag or a function key code.
3043 */
3044 if (c & RELKEY) {
3045 /* key released */
3046 /* goto next_code */
3047 } else {
3048 /* key pressed */
3049 if (c & SPCLKEY) {
3050 c &= ~SPCLKEY;
3051 switch (KEYCHAR(c)) {
3052 /* LOCKING KEYS */
3053 case NLK: case CLK: case ALK:
3054 break;
3055 case SLK:
3056 kbd_ioctl(sc->kbd, KDGKBSTATE, (caddr_t)&f);
3057 if (f & SLKED) {
3058 scp->status |= SLKED;
3059 } else {
3060 if (scp->status & SLKED) {
3061 scp->status &= ~SLKED;
3062 #ifndef SC_NO_HISTORY
3063 if (scp->status & BUFFER_SAVED) {
3064 if (!sc_hist_restore(scp))
3065 sc_remove_cutmarking(scp);
3066 scp->status &= ~BUFFER_SAVED;
3067 scp->status |= CURSOR_ENABLED;
3068 sc_draw_cursor_image(scp);
3069 }
3070 tp = VIRTUAL_TTY(sc, scp->index);
3071 if (ISTTYOPEN(tp))
3072 scstart(tp);
3073 #endif
3074 }
3075 }
3076 break;
3077
3078 /* NON-LOCKING KEYS */
3079 case NOP:
3080 case LSH: case RSH: case LCTR: case RCTR:
3081 case LALT: case RALT: case ASH: case META:
3082 break;
3083
3084 case BTAB:
3085 if (!(sc->flags & SC_SCRN_BLANKED))
3086 return c;
3087 break;
3088
3089 case SPSC:
3090 #if NSPLASH > 0
3091 /* force activatation/deactivation of the screen saver */
3092 if (!(sc->flags & SC_SCRN_BLANKED)) {
3093 run_scrn_saver = TRUE;
3094 sc->scrn_time_stamp -= scrn_blank_time;
3095 }
3096 if (cold) {
3097 /*
3098 * While devices are being probed, the screen saver need
3099 * to be invoked explictly. XXX
3100 */
3101 if (sc->flags & SC_SCRN_BLANKED) {
3102 scsplash_stick(FALSE);
3103 stop_scrn_saver(sc, current_saver);
3104 } else {
3105 if (!ISGRAPHSC(scp)) {
3106 scsplash_stick(TRUE);
3107 (*current_saver)(sc, TRUE);
3108 }
3109 }
3110 }
3111 #endif /* NSPLASH */
3112 break;
3113
3114 case RBT:
3115 #ifndef SC_DISABLE_REBOOT
3116 shutdown_nice(0);
3117 #endif
3118 break;
3119
3120 case HALT:
3121 #ifndef SC_DISABLE_REBOOT
3122 shutdown_nice(RB_HALT);
3123 #endif
3124 break;
3125
3126 case PDWN:
3127 #ifndef SC_DISABLE_REBOOT
3128 shutdown_nice(RB_HALT|RB_POWEROFF);
3129 #endif
3130 break;
3131
3132 #if NAPM > 0
3133 case SUSP:
3134 apm_suspend(PMST_SUSPEND);
3135 break;
3136 case STBY:
3137 apm_suspend(PMST_STANDBY);
3138 break;
3139 #else
3140 case SUSP:
3141 case STBY:
3142 break;
3143 #endif
3144
3145 case DBG:
3146 #ifndef SC_DISABLE_DDBKEY
3147 #ifdef DDB
3148 Debugger("manual escape to debugger");
3149 #else
3150 kprintf("No debugger in kernel\n");
3151 #endif
3152 #else /* SC_DISABLE_DDBKEY */
3153 /* do nothing */
3154 #endif /* SC_DISABLE_DDBKEY */
3155 break;
3156
3157 case PNC:
3158 if (enable_panic_key)
3159 panic("Forced by the panic key");
3160 break;
3161
3162 case NEXT:
3163 this_scr = scp->index;
3164 for (i = (this_scr - sc->first_vty + 1)%sc->vtys;
3165 sc->first_vty + i != this_scr;
3166 i = (i + 1)%sc->vtys) {
3167 struct tty *tp = VIRTUAL_TTY(sc, sc->first_vty + i);
3168 if (ISTTYOPEN(tp)) {
3169 sc_switch_scr(scp->sc, sc->first_vty + i);
3170 break;
3171 }
3172 }
3173 break;
3174
3175 case PREV:
3176 this_scr = scp->index;
3177 for (i = (this_scr - sc->first_vty + sc->vtys - 1)%sc->vtys;
3178 sc->first_vty + i != this_scr;
3179 i = (i + sc->vtys - 1)%sc->vtys) {
3180 struct tty *tp = VIRTUAL_TTY(sc, sc->first_vty + i);
3181 if (ISTTYOPEN(tp)) {
3182 sc_switch_scr(scp->sc, sc->first_vty + i);
3183 break;
3184 }
3185 }
3186 break;
3187
3188 default:
3189 if (KEYCHAR(c) >= F_SCR && KEYCHAR(c) <= L_SCR) {
3190 sc_switch_scr(scp->sc, sc->first_vty + KEYCHAR(c) - F_SCR);
3191 break;
3192 }
3193 /* assert(c & FKEY) */
3194 if (!(sc->flags & SC_SCRN_BLANKED))
3195 return c;
3196 break;
3197 }
3198 /* goto next_code */
3199 } else {
3200 /* regular keys (maybe MKEY is set) */
3201 if (!(sc->flags & SC_SCRN_BLANKED))
3202 return c;
3203 }
3204 }
3205
3206 goto next_code;
3207 }
3208
3209 int
3210 scmmap(struct dev_mmap_args *ap)
3211 {
3212 scr_stat *scp;
3213
3214 scp = SC_STAT(ap->a_head.a_dev);
3215 if (scp != scp->sc->cur_scp)
3216 return EINVAL;
3217 ap->a_result = (*vidsw[scp->sc->adapter]->mmap)(scp->sc->adp, ap->a_offset,
3218 ap->a_nprot);
3219 return(0);
3220 }
3221
3222 static int
3223 save_kbd_state(scr_stat *scp)
3224 {
3225 int state;
3226 int error;
3227
3228 error = kbd_ioctl(scp->sc->kbd, KDGKBSTATE, (caddr_t)&state);
3229 if (error == ENOIOCTL)
3230 error = ENODEV;
3231 if (error == 0) {
3232 scp->status &= ~LOCK_MASK;
3233 scp->status |= state;
3234 }
3235 return error;
3236 }
3237
3238 static int
3239 update_kbd_state(scr_stat *scp, int new_bits, int mask)
3240 {
3241 int state;
3242 int error;
3243
3244 if (mask != LOCK_MASK) {
3245 error = kbd_ioctl(scp->sc->kbd, KDGKBSTATE, (caddr_t)&state);
3246 if (error == ENOIOCTL)
3247 error = ENODEV;
3248 if (error)
3249 return error;
3250 state &= ~mask;
3251 state |= new_bits & mask;
3252 } else {
3253 state = new_bits & LOCK_MASK;
3254 }
3255 error = kbd_ioctl(scp->sc->kbd, KDSKBSTATE, (caddr_t)&state);
3256 if (error == ENOIOCTL)
3257 error = ENODEV;
3258 return error;
3259 }
3260
3261 static int
3262 update_kbd_leds(scr_stat *scp, int which)
3263 {
3264 int error;
3265
3266 which &= LOCK_MASK;
3267 error = kbd_ioctl(scp->sc->kbd, KDSETLED, (caddr_t)&which);
3268 if (error == ENOIOCTL)
3269 error = ENODEV;
3270 return error;
3271 }
3272
3273 int
3274 set_mode(scr_stat *scp)
3275 {
3276 video_info_t info;
3277
3278 /* reject unsupported mode */
3279 if ((*vidsw[scp->sc->adapter]->get_info)(scp->sc->adp, scp->mode, &info))
3280 return 1;
3281
3282 /* if this vty is not currently showing, do nothing */
3283 if (scp != scp->sc->cur_scp)
3284 return 0;
3285
3286 /* setup video hardware for the given mode */
3287 (*vidsw[scp->sc->adapter]->set_mode)(scp->sc->adp, scp->mode);
3288 scp->rndr->init(scp);
3289 sc_vtb_init(&scp->scr, VTB_FRAMEBUFFER, scp->xsize, scp->ysize,
3290 (void *)scp->sc->adp->va_window, FALSE);
3291
3292 #ifndef SC_NO_FONT_LOADING
3293 /* load appropriate font */
3294 if (!(scp->status & GRAPHICS_MODE)) {
3295 if (!(scp->status & PIXEL_MODE) && ISFONTAVAIL(scp->sc->adp->va_flags)) {
3296 if (scp->font_size < 14) {
3297 if (scp->sc->fonts_loaded & FONT_8)
3298 sc_load_font(scp, 0, 8, scp->sc->font_8, 0, 256);
3299 } else if (scp->font_size >= 16) {
3300 if (scp->sc->fonts_loaded & FONT_16)
3301 sc_load_font(scp, 0, 16, scp->sc->font_16, 0, 256);
3302 } else {
3303 if (scp->sc->fonts_loaded & FONT_14)
3304 sc_load_font(scp, 0, 14, scp->sc->font_14, 0, 256);
3305 }
3306 /*
3307 * FONT KLUDGE:
3308 * This is an interim kludge to display correct font.
3309 * Always use the font page #0 on the video plane 2.
3310 * Somehow we cannot show the font in other font pages on
3311 * some video cards... XXX
3312 */
3313 sc_show_font(scp, 0);
3314 }
3315 mark_all(scp);
3316 }
3317 #endif /* !SC_NO_FONT_LOADING */
3318
3319 sc_set_border(scp, scp->border);
3320 sc_set_cursor_image(scp);
3321
3322 return 0;
3323 }
3324
3325 void
3326 refresh_ega_palette(scr_stat *scp)
3327 {
3328 uint32_t r, g, b;
3329 int reg;
3330 int rsize, gsize, bsize;
3331 int rfld, gfld, bfld;
3332 int i;
3333
3334 rsize = scp->sc->adp->va_info.vi_pixel_fsizes[0];
3335 gsize = scp->sc->adp->va_info.vi_pixel_fsizes[1];
3336 bsize = scp->sc->adp->va_info.vi_pixel_fsizes[2];
3337 rfld = scp->sc->adp->va_info.vi_pixel_fields[0];
3338 gfld = scp->sc->adp->va_info.vi_pixel_fields[1];
3339 bfld = scp->sc->adp->va_info.vi_pixel_fields[2];
3340
3341 for (i = 0; i < 16; i++) {
3342 reg = scp->sc->adp->va_palette_regs[i];
3343
3344 r = scp->sc->palette[reg * 3] >> (8 - rsize);
3345 g = scp->sc->palette[reg * 3 + 1] >> (8 - gsize);
3346 b = scp->sc->palette[reg * 3 + 2] >> (8 - bsize);
3347
3348 scp->ega_palette[i] = (r << rfld) + (g << gfld) + (b << bfld);
3349 }
3350 }
3351
3352 void
3353 sc_set_border(scr_stat *scp, int color)
3354 {
3355 ++scp->sc->videoio_in_progress;
3356 (*scp->rndr->draw_border)(scp, color);
3357 --scp->sc->videoio_in_progress;
3358 }
3359
3360 #ifndef SC_NO_FONT_LOADING
3361 void
3362 sc_load_font(scr_stat *scp, int page, int size, u_char *buf,
3363 int base, int count)
3364 {
3365 sc_softc_t *sc;
3366
3367 sc = scp->sc;
3368 sc->font_loading_in_progress = TRUE;
3369 (*vidsw[sc->adapter]->load_font)(sc->adp, page, size, buf, base, count);
3370 sc->font_loading_in_progress = FALSE;
3371 }
3372
3373 void
3374 sc_save_font(scr_stat *scp, int page, int size, u_char *buf,
3375 int base, int count)
3376 {
3377 sc_softc_t *sc;
3378
3379 sc = scp->sc;
3380 sc->font_loading_in_progress = TRUE;
3381 (*vidsw[sc->adapter]->save_font)(sc->adp, page, size, buf, base, count);
3382 sc->font_loading_in_progress = FALSE;
3383 }
3384
3385 void
3386 sc_show_font(scr_stat *scp, int page)
3387 {
3388 (*vidsw[scp->sc->adapter]->show_font)(scp->sc->adp, page);
3389 }
3390 #endif /* !SC_NO_FONT_LOADING */
3391
3392 void
3393 sc_paste(scr_stat *scp, u_char *p, int count)
3394 {
3395 struct tty *tp;
3396 u_char *rmap;
3397
3398 if (scp->status & MOUSE_VISIBLE) {
3399 tp = VIRTUAL_TTY(scp->sc, scp->sc->cur_scp->index);
3400 if (!ISTTYOPEN(tp))
3401 return;
3402 rmap = scp->sc->scr_rmap;
3403 for (; count > 0; --count)
3404 (*linesw[tp->t_line].l_rint)(rmap[*p++], tp);
3405 }
3406 }
3407
3408 void
3409 sc_bell(scr_stat *scp, int pitch, int duration)
3410 {
3411 if (cold || shutdown_in_progress)
3412 return;
3413
3414 if (scp != scp->sc->cur_scp && (scp->sc->flags & SC_QUIET_BELL))
3415 return;
3416
3417 if (scp->sc->flags & SC_VISUAL_BELL) {
3418 if (scp->sc->blink_in_progress)
3419 return;
3420 scp->sc->blink_in_progress = 3;
3421 if (scp != scp->sc->cur_scp)
3422 scp->sc->blink_in_progress += 2;
3423 blink_screen(scp->sc->cur_scp);
3424 } else if (duration != 0 && pitch != 0) {
3425 if (scp != scp->sc->cur_scp)
3426 pitch *= 2;
3427 sysbeep(pitch, duration);
3428 }
3429 }
3430
3431 static void
3432 blink_screen(void *arg)
3433 {
3434 scr_stat *scp = arg;
3435 struct tty *tp;
3436
3437 if (ISGRAPHSC(scp) || (scp->sc->blink_in_progress <= 1)) {
3438 scp->sc->blink_in_progress = 0;
3439 mark_all(scp);
3440 tp = VIRTUAL_TTY(scp->sc, scp->index);
3441 if (ISTTYOPEN(tp))
3442 scstart(tp);
3443 if (scp->sc->delayed_next_scr)
3444 sc_switch_scr(scp->sc, scp->sc->delayed_next_scr - 1);
3445 }
3446 else {
3447 (*scp->rndr->draw)(scp, 0, scp->xsize*scp->ysize,
3448 scp->sc->blink_in_progress & 1);
3449 scp->sc->blink_in_progress--;
3450 callout_reset(&scp->blink_screen_ch, hz / 10, blink_screen, scp);
3451 }
3452 }
MP support for (parts of) the network stack