massive reduction of unneeded files

1 files changed, 0 insertions, 1071 deletions

diff --git a/nx-X11/programs/Xserver/hw/sun/sunKbd.c b/nx-X11/programs/Xserver/hw/sun/sunKbd.c
deleted file mode 100644
index a11026d6f..000000000
--- a/nx-X11/programs/Xserver/hw/sun/sunKbd.c
+++ /dev/null
@@ -1,1071 +0,0 @@
-/* $Xorg: sunKbd.c,v 1.3 2000/08/17 19:48:30 cpqbld Exp $ */
-/*-
- * Copyright 1987 by the Regents of the University of California
- *
- * Permission to use, copy, modify, and distribute this
- * software and its documentation for any purpose and without
- * fee is hereby granted, provided that the above copyright
- * notice appear in all copies.  The University of California
- * makes no representations about the suitability of this
- * software for any purpose.  It is provided "as is" without
- * express or implied warranty.
- */
-
-/************************************************************
-Copyright 1987 by Sun Microsystems, Inc. Mountain View, CA.
-
-                    All Rights Reserved
-
-Permission  to  use,  copy,  modify,  and  distribute   this
-software  and  its documentation for any purpose and without
-fee is hereby granted, provided that the above copyright no-
-tice  appear  in all copies and that both that copyright no-
-tice and this permission notice appear in  supporting  docu-
-mentation,  and  that the names of Sun or The Open Group
-not be used in advertising or publicity pertaining to 
-distribution  of  the software  without specific prior 
-written permission. Sun and The Open Group make no 
-representations about the suitability of this software for 
-any purpose. It is provided "as is" without any express or 
-implied warranty.
-
-SUN DISCLAIMS ALL WARRANTIES WITH REGARD TO  THIS  SOFTWARE,
-INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FIT-
-NESS FOR A PARTICULAR PURPOSE. IN NO EVENT SHALL SUN BE  LI-
-ABLE  FOR  ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR
-ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE,  DATA  OR
-PROFITS,  WHETHER  IN  AN  ACTION OF CONTRACT, NEGLIGENCE OR
-OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION  WITH
-THE USE OR PERFORMANCE OF THIS SOFTWARE.
-
-********************************************************/
-/* $XFree86: xc/programs/Xserver/hw/sun/sunKbd.c,v 1.8 2001/10/28 03:33:11 tsi Exp $ */
-
-#define NEED_EVENTS
-#include "sun.h"
-#include "keysym.h"
-#include "Sunkeysym.h"
-#include "mi.h"
-
-#ifdef XKB
-#include <X11/extensions/XKB.h>
-#include <X11/extensions/XKBstr.h>
-#include <X11/extensions/XKBsrv.h>
-#endif
-
-#define SUN_LED_MASK	0x0f
-#define MIN_KEYCODE	7	/* necessary to avoid the mouse buttons */
-#define MAX_KEYCODE	255	/* limited by the protocol */
-#ifndef KB_SUN4 
-#define KB_SUN4		4
-#endif
-
-#define AUTOREPEAT_INITIATE	400
-#define AUTOREPEAT_DELAY	50
-
-#define tvminus(tv, tv1, tv2)   /* tv = tv1 - tv2 */ \
-		if ((tv1).tv_usec < (tv2).tv_usec) { \
-		    (tv1).tv_usec += 1000000; \
-		    (tv1).tv_sec -= 1; \
-		} \
-		(tv).tv_usec = (tv1).tv_usec - (tv2).tv_usec; \
-		(tv).tv_sec = (tv1).tv_sec - (tv2).tv_sec;
-
-#define tvplus(tv, tv1, tv2)    /* tv = tv1 + tv2 */ \
-		(tv).tv_sec = (tv1).tv_sec + (tv2).tv_sec; \
-		(tv).tv_usec = (tv1).tv_usec + (tv2).tv_usec; \
-		if ((tv).tv_usec > 1000000) { \
-		    (tv).tv_usec -= 1000000; \
-		    (tv).tv_sec += 1; \
-		}
-
-extern KeySymsRec sunKeySyms[];
-extern SunModmapRec* sunModMaps[];
-
-long	  	  sunAutoRepeatInitiate = 1000 * AUTOREPEAT_INITIATE;
-long	  	  sunAutoRepeatDelay = 1000 * AUTOREPEAT_DELAY;
-
-static int		autoRepeatKeyDown = 0;
-static int		autoRepeatReady;
-static int		autoRepeatFirst;
-#if defined(_LP64) || defined(_I32LPx)
-static struct timeval32	autoRepeatLastKeyDownTv;
-static struct timeval32	autoRepeatDeltaTv;
-#else
-static struct timeval	autoRepeatLastKeyDownTv;
-static struct timeval	autoRepeatDeltaTv;
-#endif
-
-void sunKbdWait()
-{
-    static struct timeval lastChngKbdTransTv;
-    struct timeval tv;
-    struct timeval lastChngKbdDeltaTv;
-    unsigned int lastChngKbdDelta;
-
-    X_GETTIMEOFDAY(&tv);
-    if (!lastChngKbdTransTv.tv_sec)
-	lastChngKbdTransTv = tv;
-    tvminus(lastChngKbdDeltaTv, tv, lastChngKbdTransTv);
-    lastChngKbdDelta = TVTOMILLI(lastChngKbdDeltaTv);
-    if (lastChngKbdDelta < 750) {
-	unsigned wait;
-	/*
-         * We need to guarantee at least 750 milliseconds between
-	 * calls to KIOCTRANS. YUCK!
-	 */
-	wait = (750L - lastChngKbdDelta) * 1000L;
-        usleep (wait);
-        X_GETTIMEOFDAY(&tv);
-    }
-    lastChngKbdTransTv = tv;
-}
-
-static void SwapLKeys(keysyms)
-    KeySymsRec* keysyms;
-{
-    unsigned int i;
-    KeySym k;
-
-    for (i = 2; i < keysyms->maxKeyCode * keysyms->mapWidth; i++)
-	if (keysyms->map[i] == XK_L1 ||
-	    keysyms->map[i] == XK_L2 ||
-	    keysyms->map[i] == XK_L3 ||
-	    keysyms->map[i] == XK_L4 ||
-	    keysyms->map[i] == XK_L5 ||
-	    keysyms->map[i] == XK_L6 ||
-	    keysyms->map[i] == XK_L7 ||
-	    keysyms->map[i] == XK_L8 ||
-	    keysyms->map[i] == XK_L9 ||
-	    keysyms->map[i] == XK_L10) {
-	    /* yes, I could have done a clever two line swap! */
-	    k = keysyms->map[i - 2];
-	    keysyms->map[i - 2] = keysyms->map[i];
-	    keysyms->map[i] = k;
-	}
-}
-
-static void SetLights (ctrl, fd)
-    KeybdCtrl*	ctrl;
-    int fd;
-{
-#ifdef KIOCSLED
-    static unsigned char led_tab[16] = {
-	0,
-	LED_NUM_LOCK,
-	LED_SCROLL_LOCK,
-	LED_SCROLL_LOCK | LED_NUM_LOCK,
-	LED_COMPOSE,
-	LED_COMPOSE | LED_NUM_LOCK,
-	LED_COMPOSE | LED_SCROLL_LOCK,
-	LED_COMPOSE | LED_SCROLL_LOCK | LED_NUM_LOCK,
-	LED_CAPS_LOCK,
-	LED_CAPS_LOCK | LED_NUM_LOCK,
-	LED_CAPS_LOCK | LED_SCROLL_LOCK,
-	LED_CAPS_LOCK | LED_SCROLL_LOCK | LED_NUM_LOCK,
-	LED_CAPS_LOCK | LED_COMPOSE,
-	LED_CAPS_LOCK | LED_COMPOSE | LED_NUM_LOCK,
-	LED_CAPS_LOCK | LED_COMPOSE | LED_SCROLL_LOCK,
-	LED_CAPS_LOCK | LED_COMPOSE | LED_SCROLL_LOCK | LED_NUM_LOCK
-    };
-    if (ioctl (fd, KIOCSLED, (caddr_t)&led_tab[ctrl->leds & 0x0f]) == -1)
-	Error("Failed to set keyboard lights");
-#endif
-}
-
-
-static void ModLight (device, on, led)
-    DeviceIntPtr device;
-    Bool	on;
-    int		led;
-{
-    KeybdCtrl*	ctrl = &device->kbdfeed->ctrl;
-    sunKbdPrivPtr pPriv = (sunKbdPrivPtr) device->public.devicePrivate;
-
-    if(on) {
-	ctrl->leds |= led;
-	pPriv->leds |= led;
-    } else {
-	ctrl->leds &= ~led;
-	pPriv->leds &= ~led;
-    }
-    SetLights (ctrl, pPriv->fd);
-}
-
-/*-
- *-----------------------------------------------------------------------
- * sunBell --
- *	Ring the terminal/keyboard bell
- *
- * Results:
- *	Ring the keyboard bell for an amount of time proportional to
- *	"loudness."
- *
- * Side Effects:
- *	None, really...
- *
- *-----------------------------------------------------------------------
- */
-
-static void bell (
-    int fd,
-    int duration)
-{
-    int		    kbdCmd;   	    /* Command to give keyboard */
-
-    kbdCmd = KBD_CMD_BELL;
-    if (ioctl (fd, KIOCCMD, &kbdCmd) == -1) {
- 	Error("Failed to activate bell");
-	return;
-    }
-    if (duration) usleep (duration);
-    kbdCmd = KBD_CMD_NOBELL;
-    if (ioctl (fd, KIOCCMD, &kbdCmd) == -1)
-	Error ("Failed to deactivate bell");
-}
-
-static void sunBell (
-    int		    percent,
-    DeviceIntPtr    device,
-    pointer	    ctrl,
-    int		    unused)
-{
-    KeybdCtrl*      kctrl = (KeybdCtrl*) ctrl;
-    sunKbdPrivPtr   pPriv = (sunKbdPrivPtr) device->public.devicePrivate;
- 
-    if (percent == 0 || kctrl->bell == 0)
- 	return;
-
-    bell (pPriv->fd, kctrl->bell_duration * 1000);
-}
-
-static void sunEnqueueEvent (xE)
-    xEvent* xE;
-{
-#ifndef i386
-    sigset_t holdmask;
-
-#ifdef SVR4
-    (void) sigaddset (&holdmask, SIGPOLL);
-#else
-    (void) sigaddset (&holdmask, SIGIO);
-#endif
-    (void) sigprocmask (SIG_BLOCK, &holdmask, (sigset_t*)NULL);
-    mieqEnqueue (xE);
-    (void) sigprocmask (SIG_UNBLOCK, &holdmask, (sigset_t*)NULL);
-#else
-    int oldmask = sigblock (sigmask (SIGIO));
-
-    mieqEnqueue (xE);
-    sigsetmask (oldmask);
-#endif
-}
-
-
-#define XLED_NUM_LOCK    0x1
-#define XLED_COMPOSE     0x4
-#define XLED_SCROLL_LOCK 0x2
-#define XLED_CAPS_LOCK   0x8
-
-static KeyCode LookupKeyCode (keysym, keysymsrec)
-    KeySym keysym;
-    KeySymsPtr keysymsrec;
-{
-    KeyCode i;
-    int ii, index = 0;
-
-    for (i = keysymsrec->minKeyCode; i < keysymsrec->maxKeyCode; i++)
-	for (ii = 0; ii < keysymsrec->mapWidth; ii++)
-	    if (keysymsrec->map[index++] == keysym)
-		return i;
-    return 0;
-}
-
-static void pseudoKey(device, down, keycode)
-    DeviceIntPtr device;
-    Bool down;
-    KeyCode keycode;
-{
-    int bit;
-    CARD8 modifiers;
-    CARD16 mask;
-    BYTE* kptr;
-
-    kptr = &device->key->down[keycode >> 3];
-    bit = 1 << (keycode & 7);
-    modifiers = device->key->modifierMap[keycode];
-    if (down) {
-	/* fool dix into thinking this key is now "down" */
-	int i;
-	*kptr |= bit;
-	device->key->prev_state = device->key->state;
-	for (i = 0, mask = 1; modifiers; i++, mask <<= 1)
-	    if (mask & modifiers) {
-		device->key->modifierKeyCount[i]++;
-		device->key->state += mask;
-		modifiers &= ~mask;
-	    }
-    } else {
-	/* fool dix into thinking this key is now "up" */
-	if (*kptr & bit) {
-	    int i;
-	    *kptr &= ~bit;
-	    device->key->prev_state = device->key->state;
-	    for (i = 0, mask = 1; modifiers; i++, mask <<= 1)
-		if (mask & modifiers) {
-		    if (--device->key->modifierKeyCount[i] <= 0) {
-			device->key->state &= ~mask;
-			device->key->modifierKeyCount[i] = 0;
-		    }
-		    modifiers &= ~mask;
-		}
-	}
-    }
-}
-
-static void DoLEDs(device, ctrl, pPriv)
-    DeviceIntPtr    device;	    /* Keyboard to alter */
-    KeybdCtrl* ctrl;
-    sunKbdPrivPtr pPriv; 
-{
-#ifdef XKB
-    if (noXkbExtension) {
-#endif
-    if ((ctrl->leds & XLED_CAPS_LOCK) && !(pPriv->leds & XLED_CAPS_LOCK))
-	    pseudoKey(device, TRUE,
-		LookupKeyCode(XK_Caps_Lock, &device->key->curKeySyms));
-
-    if (!(ctrl->leds & XLED_CAPS_LOCK) && (pPriv->leds & XLED_CAPS_LOCK))
-	    pseudoKey(device, FALSE,
-		LookupKeyCode(XK_Caps_Lock, &device->key->curKeySyms));
-
-    if ((ctrl->leds & XLED_NUM_LOCK) && !(pPriv->leds & XLED_NUM_LOCK))
-	    pseudoKey(device, TRUE,
-		LookupKeyCode(XK_Num_Lock, &device->key->curKeySyms));
-
-    if (!(ctrl->leds & XLED_NUM_LOCK) && (pPriv->leds & XLED_NUM_LOCK))
-	    pseudoKey(device, FALSE,
-		LookupKeyCode(XK_Num_Lock, &device->key->curKeySyms));
-
-    if ((ctrl->leds & XLED_SCROLL_LOCK) && !(pPriv->leds & XLED_SCROLL_LOCK))
-	    pseudoKey(device, TRUE,
-		LookupKeyCode(XK_Scroll_Lock, &device->key->curKeySyms));
-
-    if (!(ctrl->leds & XLED_SCROLL_LOCK) && (pPriv->leds & XLED_SCROLL_LOCK))
-	    pseudoKey(device, FALSE,
-		LookupKeyCode(XK_Scroll_Lock, &device->key->curKeySyms));
-
-    if ((ctrl->leds & XLED_COMPOSE) && !(pPriv->leds & XLED_COMPOSE))
-	    pseudoKey(device, TRUE,
-		LookupKeyCode(SunXK_Compose, &device->key->curKeySyms));
-
-    if (!(ctrl->leds & XLED_COMPOSE) && (pPriv->leds & XLED_COMPOSE))
-	    pseudoKey(device, FALSE,
-		LookupKeyCode(SunXK_Compose, &device->key->curKeySyms));
-#ifdef XKB
-    }
-#endif
-    pPriv->leds = ctrl->leds & 0x0f;
-    SetLights (ctrl, pPriv->fd);
-}
-
-/*-
- *-----------------------------------------------------------------------
- * sunKbdCtrl --
- *	Alter some of the keyboard control parameters
- *
- * Results:
- *	None.
- *
- * Side Effects:
- *	Some...
- *
- *-----------------------------------------------------------------------
- */
-
-static void sunKbdCtrl (
-    DeviceIntPtr    device,
-    KeybdCtrl*	    ctrl)
-{
-    sunKbdPrivPtr pPriv = (sunKbdPrivPtr) device->public.devicePrivate;
-
-    if (pPriv->fd < 0) return;
-
-    if (ctrl->click != pPriv->click) {
-    	int kbdClickCmd;
-
-	pPriv->click = ctrl->click;
-	kbdClickCmd = pPriv->click ? KBD_CMD_CLICK : KBD_CMD_NOCLICK;
-    	if (ioctl (pPriv->fd, KIOCCMD, &kbdClickCmd) == -1)
- 	    Error("Failed to set keyclick");
-    }
-    if ((pPriv->type == KB_SUN4) && (pPriv->leds != (ctrl->leds & 0x0f)))
-	DoLEDs(device, ctrl, pPriv);
-}
-
-/*-
- *-----------------------------------------------------------------------
- * sunInitKbdNames --
- *	Handle the XKB initialization
- *
- * Results:
- *	None.
- *
- * Comments: 
- *     This function needs considerable work, in conjunctions with
- *     the need to add geometry descriptions of Sun Keyboards.
- *     It would also be nice to have #defines for all the keyboard
- *     layouts so that we don't have to have these hard-coded
- *     numbers.
- *
- *-----------------------------------------------------------------------
- */
-#ifdef XKB
-static void sunInitKbdNames (
-    XkbComponentNamesRec* names,
-    sunKbdPrivPtr pKbd)
-{
-#ifndef XKBBUFSIZE
-#define XKBBUFSIZE 64
-#endif
-    static char keycodesbuf[XKBBUFSIZE];
-    static char geometrybuf[XKBBUFSIZE];
-    static char  symbolsbuf[XKBBUFSIZE];
-
-    names->keymap = NULL;
-    names->compat = "compat/complete";
-    names->types  = "types/complete";
-    names->keycodes = keycodesbuf;
-    names->geometry = geometrybuf;
-    names->symbols = symbolsbuf;
-    (void) strcpy (keycodesbuf, "keycodes/");
-    (void) strcpy (geometrybuf, "geometry/");
-    (void) strcpy (symbolsbuf, "symbols/");
-
-    /* keycodes & geometry */
-    switch (pKbd->type) {
-    case KB_SUN2:
-	(void) strcat (names->keycodes, "sun(type2)");
-	(void) strcat (names->geometry, "sun(type2)");
-	(void) strcat (names->symbols, "us(sun2)");
-	break;
-    case KB_SUN3:
-	(void) strcat (names->keycodes, "sun(type3)");
-	(void) strcat (names->geometry, "sun(type3)");
-	(void) strcat (names->symbols, "us(sun3)");
-	break;
-    case KB_SUN4:
-	/* First, catch "fully known" models */
-	switch (pKbd->layout) {	
-	case 11:		/* type4, Sweden */
-	    (void) strcat (names->geometry, "sun(type4_se)");
-	    (void) strcat (names->keycodes,
-			   "sun(type4_se_swapctl)");
-	    (void) strcat (names->symbols,
-			   "sun/se(sun4)+se(fixdollar)");
-	    return;
-	    break;
-	case 43:		/* type5/5c, Sweden */
-	    (void) strcat (names->geometry, "sun(type5c_se)");
-	    (void) strcat (names->keycodes, "sun(type5_se)");
-	    (void) strcat (names->symbols,
-			   "sun/se(sun5)+se(fixdollar)");
-	    return;
-	    break;
-	case 90:		/* "Compact 1", Sweden (???) */
-	    break;		/* No specific mapping, yet */
-	default:
-	    break;
-	}
-
-	if (pKbd->layout == 19) {
-	    (void) strcat (names->keycodes, "sun(US101A)");
-	    (void) strcat (names->geometry, "pc101-NG"); /* XXX */
-	    (void) strcat (names->symbols, "us(pc101)");
-	} else if (pKbd->layout < 33) {
-	    (void) strcat (names->keycodes, "sun(type4)");
-	    (void) strcat (names->geometry, "sun(type4)");
-	    if (sunSwapLkeys)
-		(void) strcat (names->symbols, "sun/us(sun4ol)");
-	    else
-		(void) strcat (names->symbols, "sun/us(sun4)");
-	} else {
-	    (void) strcat (names->keycodes, "sun(type5)");
-
-	    switch (pKbd->layout) {
-	    case 33: case 80: /* U.S. */
-	    case 47: case 94: /* Korea */
-	    case 48: case 95: /* Taiwan */
-	    case 49: case 96: /* Japan */
-		(void) strcat (names->geometry, "sun(type5)");
-		break;
-	    case 34: case 81: /* U.S. Unix */
-		(void) strcat (names->geometry, "sun(type5unix)");
-		break;
-	    default:
-		(void) strcat (names->geometry, "sun(type5euro)");
-	    }
-
-	    if (sunSwapLkeys)
-		(void) strcat (names->symbols, "sun/us(sun5ol)");
-	    else
-		(void) strcat (names->symbols, "sun/us(sun5)");
-	}
-	break;
-    default:
-	names->keycodes = names->geometry = NULL;
-	break;
-    }
-
-    /* extra symbols */
-
-    if (pKbd->type == KB_SUN4) {
-	switch (pKbd->layout) {
-	case  4: case 36: case 83: 
-	case  5: case 37: case 84: 
-	case  6: case 38: case 85: 
-	case  8: case 40: case 87: 
-	case  9: case 41: case 88: 
-	case 10: case 42: case 89: 
-/*	case 11: case 43: case 90: */ /* handled earlier */
-	case 12: case 44: case 91: 
-	case 13: case 45: case 92: 
-	case 14: case 46: case 93: 
-	    (void) strcat (names->symbols, "+iso9995-3(basic)"); break;
-	}
-    }
-
-    if (pKbd->type == KB_SUN4) {
-	switch (pKbd->layout) {
-	case  0: case  1: case 33: case 34: case 80: case 81: 
-	    break;
-	case  3:
-	    (void) strcat (names->symbols, "+ca"); break;
-	case  4: case 36: case 83: 
-	    (void) strcat (names->symbols, "+dk"); break;
-	case  5: case 37: case 84: 
-	    (void) strcat (names->symbols, "+de"); break;
-	case  6: case 38: case 85: 
-	    (void) strcat (names->symbols, "+it"); break;
-	case  8: case 40: case 87: 
-	    (void) strcat (names->symbols, "+no"); break;
-	case  9: case 41: case 88: 
-	    (void) strcat (names->symbols, "+pt"); break;
-	case 10: case 42: case 89: 
-	    (void) strcat (names->symbols, "+es"); break;
-	    /* case 11: case 43: */ /* handled earlier */
-	case 90: 
-	    (void) strcat (names->symbols, "+se"); break; 
-	case 12: case 44: case 91: 
-	    (void) strcat (names->symbols, "+fr_CH"); break;
-	case 13: case 45: case 92: 
-	    (void) strcat (names->symbols, "+de_CH"); break;
-	case 14: case 46: case 93: 
-	    (void) strcat (names->symbols, "+gb"); break; /* s/b en_UK */
-	case 52:
-	    (void) strcat (names->symbols, "+pl"); break;
-	case 53:
-	    (void) strcat (names->symbols, "+cs"); break;
-	case 54:
-	    (void) strcat (names->symbols, "+ru"); break;
-#if 0
-	/* don't have symbols defined for these yet, let them default */
-	case  2:
-	    (void) strcat (names->symbols, "+fr_BE"); break;
-	case  7: case 39: case 86: 
-	    (void) strcat (names->symbols, "+nl"); break;
-	case 50: case 97:
-	    (void) strcat (names->symbols, "+fr_CA"); break;
-	case 16: case 47: case 94: 
-	    (void) strcat (names->symbols, "+ko"); break;
-	case 17: case 48: case 95: 
-	    (void) strcat (names->symbols, "+tw"); break;
-	case 32: case 49: case 96: 
-	    (void) strcat (names->symbols, "+jp"); break;
-	case 51:
-	    (void) strcat (names->symbols, "+hu"); break;
-#endif
-	/* 
-	 * by setting the symbols to NULL XKB will use the symbols in
-	 * the "default" keymap.
-	 */
-	default: 
-	    names->symbols = NULL; return; break;
-	}
-    }
-}
-#endif /* XKB */
-
-/*-
- *-----------------------------------------------------------------------
- * sunKbdProc --
- *	Handle the initialization, etc. of a keyboard.
- *
- * Results:
- *	None.
- *
- *-----------------------------------------------------------------------
- */
-
-int sunKbdProc (
-    DeviceIntPtr  device,
-    int	    	  what)
-{
-    int i;
-    DevicePtr pKeyboard = (DevicePtr) device;
-    sunKbdPrivPtr pPriv;
-    KeybdCtrl*	ctrl = &device->kbdfeed->ctrl;
-    extern int XkbDfltRepeatDelay, XkbDfltRepeatInterval;
-
-    static CARD8 *workingModMap = NULL;
-    static KeySymsRec *workingKeySyms;
-
-    switch (what) {
-    case DEVICE_INIT:
-	if (pKeyboard != LookupKeyboardDevice()) {
-	    ErrorF ("Cannot open non-system keyboard\n");
-	    return (!Success);
-	}
-	    
-	if (!workingKeySyms) {
-	    workingKeySyms = &sunKeySyms[sunKbdPriv.type];
-
-	    if (sunKbdPriv.type == KB_SUN4 && sunSwapLkeys)
-		SwapLKeys(workingKeySyms);
-
-	    if (workingKeySyms->minKeyCode < MIN_KEYCODE) {
-		workingKeySyms->minKeyCode += MIN_KEYCODE;
-		workingKeySyms->maxKeyCode += MIN_KEYCODE;
-	    }
-	    if (workingKeySyms->maxKeyCode > MAX_KEYCODE)
-		workingKeySyms->maxKeyCode = MAX_KEYCODE;
-	}
-
-	if (!workingModMap) {
-	    workingModMap=(CARD8 *)xalloc(MAP_LENGTH);
-	    (void) memset(workingModMap, 0, MAP_LENGTH);
-	    for(i=0; sunModMaps[sunKbdPriv.type][i].key != 0; i++)
-		workingModMap[sunModMaps[sunKbdPriv.type][i].key + MIN_KEYCODE] = 
-		sunModMaps[sunKbdPriv.type][i].modifiers;
-	}
-
-	(void) memset ((void *) defaultKeyboardControl.autoRepeats,
-			~0, sizeof defaultKeyboardControl.autoRepeats);
-
-#ifdef XKB
-	if (noXkbExtension) {
-	    sunAutoRepeatInitiate = XkbDfltRepeatDelay * 1000;
-	    sunAutoRepeatDelay = XkbDfltRepeatInterval * 1000;
-#endif
-	autoRepeatKeyDown = 0;
-#ifdef XKB
-	}
-#endif
-	pKeyboard->devicePrivate = (pointer)&sunKbdPriv;
-	pKeyboard->on = FALSE;
-
-#ifdef XKB
-	if (noXkbExtension) {
-#endif
-	InitKeyboardDeviceStruct(pKeyboard, 
-				 workingKeySyms, workingModMap,
-				 sunBell, sunKbdCtrl);
-#ifdef XKB
-	} else {
-	    XkbComponentNamesRec names;
-	    sunInitKbdNames (&names, &sunKbdPriv);
-	    XkbInitKeyboardDeviceStruct((DeviceIntPtr) pKeyboard, &names,
-					workingKeySyms, workingModMap,
-					sunBell, sunKbdCtrl);
-	}
-#endif
-	break;
-
-    case DEVICE_ON:
-	pPriv = (sunKbdPrivPtr)pKeyboard->devicePrivate;
-	/*
-	 * Set the keyboard into "direct" mode and turn on
-	 * event translation.
-	 */
-	if (sunChangeKbdTranslation(pPriv->fd,TRUE) == -1)
-	    FatalError("Can't set keyboard translation\n");
-	AddEnabledDevice(pPriv->fd);
-	pKeyboard->on = TRUE;
-	break;
-
-    case DEVICE_CLOSE:
-    case DEVICE_OFF:
-	pPriv = (sunKbdPrivPtr)pKeyboard->devicePrivate;
-	if (pPriv->type == KB_SUN4) {
-	    /* dumb bug in Sun's keyboard! Turn off LEDS before resetting */
-	    pPriv->leds = 0;
-	    ctrl->leds = 0;
-	    SetLights(ctrl, pPriv->fd);
-	}
-	/*
-	 * Restore original keyboard directness and translation.
-	 */
-	if (sunChangeKbdTranslation(pPriv->fd,FALSE) == -1)
-	    FatalError("Can't reset keyboard translation\n");
-	RemoveEnabledDevice(pPriv->fd);
-	pKeyboard->on = FALSE;
-	break;
-    default:
-	FatalError("Unknown keyboard operation\n");
-    }
-    return Success;
-}
-
-/*-
- *-----------------------------------------------------------------------
- * sunKbdGetEvents --
- *	Return the events waiting in the wings for the given keyboard.
- *
- * Results:
- *	A pointer to an array of Firm_events or (Firm_event *)0 if no events
- *	The number of events contained in the array.
- *	A boolean as to whether more events might be available.
- *
- * Side Effects:
- *	None.
- *-----------------------------------------------------------------------
- */
-
-Firm_event* sunKbdGetEvents (
-    int		fd,
-    Bool	on,
-    int*	pNumEvents,
-    Bool*	pAgain)
-{
-    int	    	  nBytes;	    /* number of bytes of events available. */
-    static Firm_event	evBuf[MAXEVENTS];   /* Buffer for Firm_events */
-
-    if ((nBytes = read (fd, evBuf, sizeof(evBuf))) == -1) {
-	if (errno == EWOULDBLOCK) {
-	    *pNumEvents = 0;
-	    *pAgain = FALSE;
-	} else {
-	    Error ("Reading keyboard");
-	    FatalError ("Could not read the keyboard");
-	}
-    } else {
-	if (on) {
-	    *pNumEvents = nBytes / sizeof (Firm_event);
-	    *pAgain = (nBytes == sizeof (evBuf));
-	} else {
-	    *pNumEvents = 0;
-	    *pAgain = FALSE;
-	}
-    }
-    return evBuf;
-}
-
-/*-
- *-----------------------------------------------------------------------
- * sunKbdEnqueueEvent --
- *
- *-----------------------------------------------------------------------
- */
-static xEvent	autoRepeatEvent;
-static int	composeCount;
-
-static Bool DoSpecialKeys(device, xE, fe)
-    DeviceIntPtr  device;
-    xEvent*       xE;
-    Firm_event* fe;
-{
-    int	shift_index, map_index, bit;
-    KeySym ksym;
-    BYTE* kptr;
-    sunKbdPrivPtr pPriv = (sunKbdPrivPtr)device->public.devicePrivate;
-    BYTE keycode = xE->u.u.detail;
-    CARD8 keyModifiers = device->key->modifierMap[keycode];
-
-    /* look up the present idea of the keysym */
-    shift_index = 0;
-    if (device->key->state & ShiftMask) 
-	shift_index ^= 1;
-    if (device->key->state & LockMask) 
-	shift_index ^= 1;
-    map_index = (fe->id - 1) * device->key->curKeySyms.mapWidth;
-    ksym = device->key->curKeySyms.map[shift_index + map_index];
-    if (ksym == NoSymbol)
-	ksym = device->key->curKeySyms.map[map_index];
-
-    /*
-     * Toggle functionality is hardcoded. This is achieved by always
-     * discarding KeyReleases on these keys, and converting every other
-     * KeyPress into a KeyRelease.
-     */
-    if (xE->u.u.type == KeyRelease 
-	&& (ksym == XK_Num_Lock 
-	|| ksym == XK_Scroll_Lock 
-	|| ksym == SunXK_Compose
-	|| (keyModifiers & LockMask))) 
-	return TRUE;
-
-    kptr = &device->key->down[keycode >> 3];
-    bit = 1 << (keycode & 7);
-    if ((*kptr & bit) &&
-	(ksym == XK_Num_Lock || ksym == XK_Scroll_Lock ||
-	ksym == SunXK_Compose || (keyModifiers & LockMask)))
-	xE->u.u.type = KeyRelease;
-
-    if (pPriv->type == KB_SUN4) {
-	if (ksym == XK_Num_Lock) {
-	    ModLight (device, xE->u.u.type == KeyPress, XLED_NUM_LOCK);
-	} else if (ksym == XK_Scroll_Lock) {
-	    ModLight (device, xE->u.u.type == KeyPress, XLED_SCROLL_LOCK);
-	} else if (ksym == SunXK_Compose) {
-	    ModLight (device, xE->u.u.type == KeyPress, XLED_COMPOSE);
-	    if (xE->u.u.type == KeyPress) composeCount = 2;
-	    else composeCount = 0;
-	} else if (keyModifiers & LockMask) {
-	    ModLight (device, xE->u.u.type == KeyPress, XLED_CAPS_LOCK);
-	}
-	if (xE->u.u.type == KeyRelease) {
-	    if (composeCount > 0 && --composeCount == 0) {
-		pseudoKey(device, FALSE,
-		    LookupKeyCode(SunXK_Compose, &device->key->curKeySyms));
-		ModLight (device, FALSE, XLED_COMPOSE);
-	    }
-	}
-    }
-
-    if ((xE->u.u.type == KeyPress) && (keyModifiers == 0)) {
-	/* initialize new AutoRepeater event & mark AutoRepeater on */
-	autoRepeatEvent = *xE;
-	autoRepeatFirst = TRUE;
-	autoRepeatKeyDown++;
-	autoRepeatLastKeyDownTv = fe->time;
-    }
-    return FALSE;
-}
-
-void sunKbdEnqueueEvent (
-    DeviceIntPtr  device,
-    Firm_event	  *fe)
-{
-    xEvent		xE;
-    BYTE		keycode;
-    CARD8		keyModifiers;
-
-    keycode = (fe->id & 0x7f) + MIN_KEYCODE;
-
-    keyModifiers = device->key->modifierMap[keycode];
-#ifdef XKB
-    if (noXkbExtension) {
-#endif
-    if (autoRepeatKeyDown && (keyModifiers == 0) &&
-	((fe->value == VKEY_DOWN) || (keycode == autoRepeatEvent.u.u.detail))) {
-	/*
-	 * Kill AutoRepeater on any real non-modifier key down, or auto key up
-	 */
-	autoRepeatKeyDown = 0;
-    }
-#ifdef XKB
-    }
-#endif
-    xE.u.keyButtonPointer.time = TVTOMILLI(fe->time);
-    xE.u.u.type = ((fe->value == VKEY_UP) ? KeyRelease : KeyPress);
-    xE.u.u.detail = keycode;
-#ifdef XKB
-    if (noXkbExtension) {
-#endif
-    if (DoSpecialKeys(device, &xE, fe))
-	return;
-#ifdef XKB
-    }
-#endif /* ! XKB */
-    mieqEnqueue (&xE);
-}
-
-void sunEnqueueAutoRepeat ()
-{
-    int	delta;
-    int	i, mask;
-    DeviceIntPtr device = (DeviceIntPtr)LookupKeyboardDevice();
-    KeybdCtrl* ctrl = &device->kbdfeed->ctrl;
-    sunKbdPrivPtr   pPriv = (sunKbdPrivPtr) device->public.devicePrivate;
-
-    if (ctrl->autoRepeat != AutoRepeatModeOn) {
-	autoRepeatKeyDown = 0;
-	return;
-    }
-    i=(autoRepeatEvent.u.u.detail >> 3);
-    mask=(1 << (autoRepeatEvent.u.u.detail & 7));
-    if (!(ctrl->autoRepeats[i] & mask)) {
-	autoRepeatKeyDown = 0;
-	return;
-    }
-
-    /*
-     * Generate auto repeat event.	XXX one for now.
-     * Update time & pointer location of saved KeyPress event.
-     */
-
-    delta = TVTOMILLI(autoRepeatDeltaTv);
-    autoRepeatFirst = FALSE;
-
-    /*
-     * Fake a key up event and a key down event
-     * for the last key pressed.
-     */
-    autoRepeatEvent.u.keyButtonPointer.time += delta;
-    autoRepeatEvent.u.u.type = KeyRelease;
-
-    /*
-     * hold off any more inputs while we get these safely queued up
-     * further SIGIO are 
-     */
-    sunEnqueueEvent (&autoRepeatEvent);
-    autoRepeatEvent.u.u.type = KeyPress;
-    sunEnqueueEvent (&autoRepeatEvent);
-    if (ctrl->click) bell (pPriv->fd, 0);
-
-    /* Update time of last key down */
-    tvplus(autoRepeatLastKeyDownTv, autoRepeatLastKeyDownTv, 
-		    autoRepeatDeltaTv);
-}
-
-/*-
- *-----------------------------------------------------------------------
- * sunChangeKbdTranslation
- *	Makes operating system calls to set keyboard translation 
- *	and direction on or off.
- *
- * Results:
- *	-1 if failure, else 0.
- *
- * Side Effects:
- * 	Changes kernel management of keyboard.
- *
- *-----------------------------------------------------------------------
- */
-int sunChangeKbdTranslation(
-    int fd,
-    Bool makeTranslated)
-
-{   
-    int 	tmp;
-#ifndef i386 /* { */
-    sigset_t	hold_mask, old_mask;
-#else /* }{ */
-    int		old_mask;
-#endif /* } */
-    int		toread;
-    char	junk[8192];
-
-#ifndef i386 /* { */
-    (void) sigfillset(&hold_mask);
-    (void) sigprocmask(SIG_BLOCK, &hold_mask, &old_mask);
-#else /* }{ */
-    old_mask = sigblock (~0);
-#endif /* } */
-    sunKbdWait();
-    if (makeTranslated) {
-        /*
-         * Next set the keyboard into "direct" mode and turn on
-         * event translation. If either of these fails, we can't go
-         * on.
-         */
-	tmp = 1;
-	if (ioctl (fd, KIOCSDIRECT, &tmp) == -1) {
-	    Error ("Setting keyboard direct mode");
-	    return -1;
-	}
-	tmp = TR_UNTRANS_EVENT;
-	if (ioctl (fd, KIOCTRANS, &tmp) == -1) {
-	    Error ("Setting keyboard translation");
-	    ErrorF ("sunChangeKbdTranslation: kbdFd=%d\n", fd);
-	    return -1;
-	}
-    } else {
-        /*
-         * Next set the keyboard into "indirect" mode and turn off
-         * event translation.
-         */
-	tmp = 0;
-	(void)ioctl (fd, KIOCSDIRECT, &tmp);
-	tmp = TR_ASCII;
-	(void)ioctl (fd, KIOCTRANS, &tmp);
-    }
-    if (ioctl (fd, FIONREAD, &toread) != -1 && toread > 0) {
-	while (toread) {
-	    tmp = toread;
-	    if (toread > sizeof (junk))
-		tmp = sizeof (junk);
-	    (void) read (fd, junk, tmp);
-	    toread -= tmp;
-	}
-    }
-#ifndef i386 /* { */
-    (void) sigprocmask(SIG_SETMASK, &old_mask, (sigset_t *)NULL);
-#else /* }{ */
-    sigsetmask (old_mask);
-#endif /* } */
-    return 0;
-}
-
-/*ARGSUSED*/
-Bool LegalModifier(key, pDev)
-    unsigned int key;
-    DevicePtr	pDev;
-{
-    return TRUE;
-}
-
-/*ARGSUSED*/
-void sunBlockHandler(nscreen, pbdata, pptv, pReadmask)
-    int nscreen;
-    pointer pbdata;
-    struct timeval **pptv;
-    pointer pReadmask;
-{
-    KeybdCtrl* ctrl = &((DeviceIntPtr)LookupKeyboardDevice())->kbdfeed->ctrl;
-    static struct timeval artv = { 0, 0 };	/* autorepeat timeval */
-
-    if (!autoRepeatKeyDown)
-	return;
-
-    if (ctrl->autoRepeat != AutoRepeatModeOn)
-	return;
-
-    if (autoRepeatFirst == TRUE)
-	artv.tv_usec = sunAutoRepeatInitiate;
-    else
-	artv.tv_usec = sunAutoRepeatDelay;
-    *pptv = &artv;
-
-}
-
-/*ARGSUSED*/
-void sunWakeupHandler(nscreen, pbdata, err, pReadmask)
-    int nscreen;
-    pointer pbdata;
-    unsigned long err;
-    pointer pReadmask;
-{
-    KeybdCtrl* ctrl = &((DeviceIntPtr)LookupKeyboardDevice())->kbdfeed->ctrl;
-    struct timeval tv;
-
-    if (ctrl->autoRepeat != AutoRepeatModeOn)
-	return;
-
-    if (autoRepeatKeyDown) {
-	X_GETTIMEOFDAY(&tv);
-	tvminus(autoRepeatDeltaTv, tv, autoRepeatLastKeyDownTv);
-	if (autoRepeatDeltaTv.tv_sec > 0 ||
-			(!autoRepeatFirst && autoRepeatDeltaTv.tv_usec >
-				sunAutoRepeatDelay) ||
-			(autoRepeatDeltaTv.tv_usec >
-				sunAutoRepeatInitiate))
-		autoRepeatReady++;
-    }
-    
-    if (autoRepeatReady)
-    {
-	sunEnqueueAutoRepeat ();
-	autoRepeatReady = 0;
-    }
-}