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