sys/dev/misc/syscons/syscons.c

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