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