Release 970120

Sun Jan 19 11:46:48 1997  Alexandre Julliard  <julliard@lrc.epfl.ch>

	* [loader/module.c]
	Fixed LoadModule() to always call the DLL initialization code.

	* [windows/event.c]
	Moved all the keyboard stuff to windows/keyboard.c

	* [tools/build.c]
	Fixed Win32 register functions.

Sat Jan 18 22:24:41 1997  David Makepeace  <D.Makepeace@mailbox.uq.oz.au>

        * [tools/makedep.c]
        Fixed bug which causes SEGV on Solaris x86.

Fri Jan 17 18:32:27 1997  Frans van Dorsselaer <dorssel@rulhmpc49.LeidenUniv.nl>

	* [controls/edit.c]
	Implemented WM_UNDO, WM_CONTEXTMENU (temporary using WM_RBUTTONUP),
	WM_COMMAND, WM_INITPOPUPMENU, WM_SYSKEYDOWN.
	Fixed EM_SETSEL and some minor bugs (features).
	Hence: fully functional undo and a win95 menu with the right mouse
		button.

	* [include/resources.h] [resources/TODO] [resources/sysres_??.rc]
	Added a context menu for the edit control.
	Translations, please ...

Fri Jan	17 08:29:52 1997  David Faure <david.faure@ifhamy.insa-lyon.fr>

	* [windows/event.c]
	Move EVENT_ToAscii to windows/keyboard.c (where name ToAscii)
	Fixed Keypad keys 0-9 and . in EVENT_event_to_vkey.
	Added 3-state handling of toggle keys (CapsLock, NumLock) in order
	to make them work with any X server.
	Toggle keys now generate WM_KEYDOWN and WM_KEYUP on each pressing.

	* [include/keyboard.h]
	Totally replaced the file (formerly containing the vkcase definitions)
	by the declaration of 'extern' variables contained by event.c and used
	by keyboard.c
	
	* [windows/keyboard.c]
	Started to rewrite VkKeyScan and MapVirtualKey, to make them use the 
	table keyc2vkey or X functions only.
	ToAscii : added keypad 0-9 and . special case.
	Changed toggle keys active mask from 0x80 to 0x1.

	* [misc/keyboard.c]
	File deleted. Contents moved to windows/keyboard.c.

	* [misc/main.c]
	Added putenv XKB_DISABLE to disable XKB extension (which, when
	present, causes AltGr to change keyboard group instead of being a
	modifier).

Tue Jan 14 22:56:43 1997  Philippe De Muyter  <phdm@info.ucl.ac.be>

	* [windows/event.c]
	Do not assume NumLockMask is Mod2Mask, but compute it by scanning
	output of XGetModifierMapping for XK_Num_Lock.

Tue Jan 14 15:49:49 1997  Marcus Meissner <msmeissn@cip.informatik.uni-erlangen.de>

	* [loader/pe_*.c] [include/peexe.h] [include/resource32.h]
	  [debugger/*.c]
	General clean up.
	Changed defines/structures to match Windows NT SDK.

	* [loader/main.c]
	Don't crash on empty command-line.

	* [windows/winpos.c]
	winpos.c made win32 clean.

	* [misc/ntdll.c]
	Some string conversion additions.

	* [files/file.c]
	GetFileAttributes/GetTempFileName fixed.

	* [misc/ver.c]
	VerInstallFile implemented.

Mon Jan 13 15:03:11 1997  Philippe De Muyter  <phdm@info.ucl.ac.be>

	* [tools/build.c]: Use PREFIX also in stabs messages.

Mon Jan 13 10:40:33 1997  John Harvey <john@division.co.uk>

	* [graphics/win16drv/*] [include/win16drv.h]
	Many fixes and some new features.

	* [graphics/x11drv/font.c] [graphics/x11drv/init.c]
	  [include/x11drv.h] [objects/font.c]
	GetTextMetrics() moved to graphics driver.

	* [if1632/gdi.spec] [misc/fontengine.c] [misc/Makefile.in]
	New dummy EngineEnumerateFont, EngineRealizeFont functions.

	* [include/windows.h]
	TEXTFORM16 and FONTINFO16 structure definitions moved here from
	include/win16drv.h
diff --git a/windows/keyboard.c b/windows/keyboard.c
index 1a418fd..12c3fce 100644
--- a/windows/keyboard.c
+++ b/windows/keyboard.c
@@ -3,22 +3,424 @@
  *
  * Copyright 1993 Bob Amstadt
  * Copyright 1996 Albrecht Kleine 
+ * Copyright 1997 David Faure
+ *
  */
-
+#include <stdlib.h>
 #include <stdio.h>
 #include <string.h>
-#include "win.h"
-#include "windows.h"
-#include "accel.h"
-#include "stddebug.h"
-#include "debug.h"
+#include <ctype.h>
+#include <X11/keysym.h>
+#include <X11/Xlib.h>
+#include <X11/Xresource.h>
+#include <X11/Xutil.h>
+#include <X11/Xatom.h>
 
-extern BOOL MouseButtonsStates[3];
-extern BOOL AsyncMouseButtonsStates[3];
-extern BYTE InputKeyStateTable[256];
+#include "windows.h"
+#include "win.h"
+#include "gdi.h"
+#include "keyboard.h"
+#include "message.h"
+#include "stddebug.h"
+/* #define DEBUG_KEYBOARD */
+#include "debug.h"
+#include "xmalloc.h"
+#include "accel.h"
+
+BOOL32 MouseButtonsStates[3];
+BOOL32 AsyncMouseButtonsStates[3];
+BYTE InputKeyStateTable[256];
+BYTE QueueKeyStateTable[256];
 BYTE AsyncKeyStateTable[256];
 
-extern BYTE QueueKeyStateTable[256];
+static int NumLockMask;
+static int AltGrMask;
+static int min_keycode, max_keycode;
+static int keyc2vkey[256];
+
+typedef union
+{
+    struct
+    {
+	unsigned long count : 16;
+	unsigned long code : 8;
+	unsigned long extended : 1;
+	unsigned long unused : 2;
+	unsigned long win_internal : 2;
+	unsigned long context : 1;
+	unsigned long previous : 1;
+	unsigned long transition : 1;
+    } lp1;
+    unsigned long lp2;
+} KEYLP;
+
+typedef enum {OFF,INTERM,ON} ToggleKeyState;
+
+/* Keyboard translation tables */
+static const int special_key[] =
+{
+    VK_BACK, VK_TAB, 0, VK_CLEAR, 0, VK_RETURN, 0, 0,           /* FF08 */
+    0, 0, 0, VK_PAUSE, VK_SCROLL, 0, 0, 0,                      /* FF10 */
+    0, 0, 0, VK_ESCAPE                                          /* FF18 */
+};
+
+static const int cursor_key[] =
+{
+    VK_HOME, VK_LEFT, VK_UP, VK_RIGHT, VK_DOWN, VK_PRIOR, 
+                                       VK_NEXT, VK_END          /* FF50 */
+};
+
+static const int misc_key[] =
+{
+    VK_SELECT, VK_SNAPSHOT, VK_EXECUTE, VK_INSERT, 0, 0, 0, 0,  /* FF60 */
+    VK_CANCEL, VK_HELP, VK_CANCEL, VK_MENU                      /* FF68 */
+};
+
+static const int keypad_key[] =
+{
+    0, VK_NUMLOCK,                                        	/* FF7E */
+    0, 0, 0, 0, 0, 0, 0, 0,                                     /* FF80 */
+    0, 0, 0, 0, 0, VK_RETURN, 0, 0,                             /* FF88 */
+    0, 0, 0, 0, 0, VK_HOME, VK_LEFT, VK_UP,                     /* FF90 */
+    VK_RIGHT, VK_DOWN, VK_PRIOR, VK_NEXT, VK_END, 0,
+				 VK_INSERT, VK_DELETE,          /* FF98 */
+    0, 0, 0, 0, 0, 0, 0, 0,                                     /* FFA0 */
+    0, 0, VK_MULTIPLY, VK_ADD, VK_SEPARATOR, VK_SUBTRACT, 
+                               VK_DECIMAL, VK_DIVIDE,           /* FFA8 */
+    VK_NUMPAD0, VK_NUMPAD1, VK_NUMPAD2, VK_NUMPAD3, VK_NUMPAD4,
+                            VK_NUMPAD5, VK_NUMPAD6, VK_NUMPAD7, /* FFB0 */
+    VK_NUMPAD8, VK_NUMPAD9                                      /* FFB8 */
+};
+    
+static const int function_key[] =
+{
+    VK_F1, VK_F2,                                               /* FFBE */
+    VK_F3, VK_F4, VK_F5, VK_F6, VK_F7, VK_F8, VK_F9, VK_F10,    /* FFC0 */
+    VK_F11, VK_F12, VK_F13, VK_F14, VK_F15, VK_F16              /* FFC8 */
+};
+
+static const int modifier_key[] =
+{
+    VK_SHIFT, VK_SHIFT, VK_CONTROL, VK_CONTROL, VK_CAPITAL, 0, /* FFE1 */
+    VK_MENU, VK_MENU, VK_MENU, VK_MENU                         /* FFE7 */
+};
+
+
+static WORD EVENT_event_to_vkey( XKeyEvent *e)
+{
+    KeySym keysym;
+
+    XLookupString(e, NULL, 0, &keysym, NULL);
+
+    if ((keysym >= 0xFFAE) && (keysym <= 0xFFB9) && (e->state & NumLockMask)) 
+        /* Only the Keypad keys 0-9 and . send different keysyms
+         * depending on the NumLock state */
+        return keypad_key[(keysym & 0xFF) - 0x7E];
+
+    return keyc2vkey[e->keycode];
+}
+
+/**********************************************************************
+ *		KEYBOARD_Init
+ */
+BOOL32 KEYBOARD_Init(void)
+{
+    int i, keysyms_per_keycode;
+    KeySym *ksp;
+    XModifierKeymap *mmp;
+    KeySym keysym;
+    KeyCode *kcp;
+    XKeyEvent e2;
+    WORD vkey, OEMvkey;
+
+    XDisplayKeycodes(display, &min_keycode, &max_keycode);
+    ksp = XGetKeyboardMapping(display, min_keycode,
+                              max_keycode + 1 - min_keycode, &keysyms_per_keycode);
+    /* We are only interested in keysyms_per_keycode.
+       There is no need to hold a local copy of the keysyms table */
+    XFree(ksp);
+    mmp = XGetModifierMapping(display);
+    kcp = mmp->modifiermap;
+    for (i = 0; i < 8; i += 1) /* There are 8 modifier keys */
+    {
+        int j;
+        
+        for (j = 0; j < mmp->max_keypermod; j += 1, kcp += 1)
+	    if (*kcp)
+            {
+		int k;
+                
+		for (k = 0; k < keysyms_per_keycode; k += 1)
+                    if (XKeycodeToKeysym(display, *kcp, k) == XK_Mode_switch)
+		    {
+                        AltGrMask = 1 << i;
+                        dprintf_key(stddeb, "AltGrMask is %x\n", AltGrMask);
+		    }
+                    else if (XKeycodeToKeysym(display, *kcp, k) == XK_Num_Lock)
+		    {
+                        NumLockMask = 1 << i;
+                        dprintf_key(stddeb, "NumLockMask is %x\n", NumLockMask);
+		    }
+            }
+    }
+    XFreeModifiermap(mmp);
+
+    /* Now build two conversion arrays :
+     * keycode -> vkey + extended
+     * vkey + extended -> keycode */
+
+    e2.display = display;
+    e2.state = 0;
+
+    OEMvkey = 0xb9; /* first OEM virtual key available is ba */
+    for (e2.keycode=min_keycode; e2.keycode<=max_keycode; e2.keycode++)
+    {
+        XLookupString(&e2, NULL, 0, &keysym, NULL);
+        vkey = 0;
+        if (keysym)  /* otherwise, keycode not used */
+        {
+            if ((keysym >> 8) == 0xFF)         /* non-character key */
+            {
+                int key = keysym & 0xff;
+		
+                if (key >= 0x08 && key <= 0x1B)         /* special key */
+		    vkey = special_key[key - 0x08];
+                else if (key >= 0x50 && key <= 0x57)    /* cursor key */
+		    vkey = cursor_key[key - 0x50];
+                else if (key >= 0x60 && key <= 0x6B)    /* miscellaneous key */
+		    vkey = misc_key[key - 0x60];
+                else if (key >= 0x7E && key <= 0xB9)    /* keypad key */
+		    vkey = keypad_key[key - 0x7E];
+                else if (key >= 0xBE && key <= 0xCD)    /* function key */
+                {
+                    vkey = function_key[key - 0xBE];
+                    vkey |= 0x100; /* set extended bit */
+                }
+                else if (key >= 0xE1 && key <= 0xEA)    /* modifier key */
+		    vkey = modifier_key[key - 0xE1];
+                else if (key == 0xFF)                   /* DEL key */
+		    vkey = VK_DELETE;
+                /* extended must also be set for ALT_R, CTRL_R,
+                   INS, DEL, HOME, END, PAGE_UP, PAGE_DOWN, ARROW keys,
+                   keypad / and keypad ENTER (SDK 3.1 Vol.3 p 138) */
+                /* FIXME should we set extended bit for NumLock ? My
+                 * Windows does ... DF */
+                switch (keysym)
+                {
+                case XK_Control_R :
+                case XK_Alt_R :
+                case XK_Insert :
+                case XK_Delete :
+                case XK_Home :
+                case XK_End :
+                case XK_Prior :
+                case XK_Next :
+                case XK_Left :
+                case XK_Up :
+                case XK_Right :
+                case XK_Down :
+                case XK_KP_Divide :
+                case XK_KP_Enter :
+                    vkey |= 0x100;
+                }
+            }
+            for (i = 0; (i < keysyms_per_keycode) && (!vkey); i++)
+            {
+                keysym = XLookupKeysym(&e2, i);
+                if ((keysym >= VK_0 && keysym <= VK_9)
+                    || (keysym >= VK_A && keysym <= VK_Z)
+                    || keysym == VK_SPACE)
+		    vkey = keysym;
+            }
+
+            if (!vkey)
+            {
+                /* Others keys: let's assign OEM virtual key codes in the allowed range,
+                 * that is ([0xba,0xc0], [0xdb,0xe4], 0xe6 (given up) et [0xe9,0xf5]) */
+                switch (++OEMvkey)
+                {
+                case 0xc1 : OEMvkey=0xdb; break;
+                case 0xe5 : OEMvkey=0xe9; break;
+                case 0xf6 : OEMvkey=0xf5; fprintf(stderr,"No more OEM vkey available!\n");
+                }
+
+                vkey = OEMvkey;
+		  
+                if (debugging_keyboard)
+                {
+                    fprintf(stddeb,"OEM specific virtual key %X assigned to keycode %X :\n ("
+                            ,OEMvkey,e2.keycode);
+                    for (i = 0; i < keysyms_per_keycode; i += 1)
+                    {
+                        char	*ksname;
+                        
+                        keysym = XLookupKeysym(&e2, i);
+                        ksname = XKeysymToString(keysym);
+                        if (!ksname)
+			    ksname = "NoSymbol";
+                        fprintf(stddeb, "%lX (%s) ", keysym, ksname);
+                    }
+                    fprintf(stddeb, ")\n");
+                }
+            }
+        }
+        keyc2vkey[e2.keycode] = vkey;
+    } /* for */
+    return TRUE;
+}
+
+
+/***********************************************************************
+ *           KEYBOARD_HandleEvent
+ *
+ * Handle a X key event
+ */
+void KEYBOARD_HandleEvent( XKeyEvent *event )
+{
+    char Str[24]; 
+    XComposeStatus cs; 
+    KeySym keysym;
+    WORD vkey = 0;
+    KEYLP keylp;
+    WORD message;
+    static BOOL force_extended = FALSE; /* hack for AltGr translation */
+    BOOL DontPropagate;
+    ToggleKeyState * State;
+    static ToggleKeyState NumState=OFF, CapsState=OFF;
+
+    int ascii_chars = XLookupString(event, Str, 1, &keysym, &cs);
+
+    dprintf_key(stddeb, "EVENT_key : state = %X\n", event->state);
+    if (keysym == XK_Mode_switch)
+	{
+	dprintf_key(stddeb, "Alt Gr key event received\n");
+	event->keycode = XKeysymToKeycode(event->display, XK_Control_L);
+	dprintf_key(stddeb, "Control_L is keycode 0x%x\n", event->keycode);
+	KEYBOARD_HandleEvent(event);
+	event->keycode = XKeysymToKeycode(event->display, XK_Alt_L);
+	dprintf_key(stddeb, "Alt_L is keycode 0x%x\n", event->keycode);
+	force_extended = TRUE;
+	KEYBOARD_HandleEvent(event);
+	force_extended = FALSE;
+	return;
+	}
+
+    Str[ascii_chars] = '\0';
+    if (debugging_key)
+	{
+	char	*ksname;
+
+	ksname = XKeysymToString(keysym);
+	if (!ksname)
+	    ksname = "No Name";
+	fprintf(stddeb, "%s : keysym=%lX (%s), ascii chars=%u / %X / '%s'\n", 
+                (event->type == KeyPress) ? "KeyPress" : "KeyRelease",
+                keysym, ksname, ascii_chars, Str[0] & 0xff, Str);
+	}
+
+#if 0
+    /* Ctrl-Alt-Return enters the debugger */
+    if ((keysym == XK_Return) && (event->type == KeyPress) &&
+        (event->state & ControlMask) && (event->state & Mod1Mask))
+        DEBUG_EnterDebugger();
+#endif
+
+    vkey = EVENT_event_to_vkey(event);
+    if (force_extended) vkey |= 0x100;
+
+    dprintf_key(stddeb, "keycode 0x%x converted to vkey 0x%x\n",
+		    event->keycode, vkey);
+
+    if (vkey)
+    {
+    keylp.lp1.count = 1;
+    keylp.lp1.code = LOBYTE(event->keycode) - 8;
+    keylp.lp1.extended = (vkey & 0x100 ? 1 : 0);
+    keylp.lp1.win_internal = 0; /* this has something to do with dialogs, 
+				* don't remember where I read it - AK */
+				/* it's '1' under windows, when a dialog box appears
+				 * and you press one of the underlined keys - DF*/
+    vkey &= 0xff;
+    if (event->type == KeyPress)
+    {
+	keylp.lp1.previous = (InputKeyStateTable[vkey] & 0x80) != 0;
+        if (!(InputKeyStateTable[vkey] & 0x80))
+            InputKeyStateTable[vkey] ^= 0x01;
+	InputKeyStateTable[vkey] |= 0x80;
+	keylp.lp1.transition = 0;
+	message = (InputKeyStateTable[VK_MENU] & 0x80)
+		    && !(InputKeyStateTable[VK_CONTROL] & 0x80)
+			 ? WM_SYSKEYDOWN : WM_KEYDOWN;
+    }
+    else
+    {
+	UINT sysKey = (InputKeyStateTable[VK_MENU] & 0x80)
+			&& !(InputKeyStateTable[VK_CONTROL] & 0x80)
+			&& (force_extended == FALSE); /* for Alt from AltGr */
+
+	InputKeyStateTable[vkey] &= ~0x80; 
+	keylp.lp1.previous = 1;
+	keylp.lp1.transition = 1;
+	message = sysKey ? WM_SYSKEYUP : WM_KEYUP;
+    }
+    keylp.lp1.context = ( (event->state & Mod1Mask)  || 
+			  (InputKeyStateTable[VK_MENU] & 0x80)) ? 1 : 0;
+    DontPropagate = FALSE;
+    if ((vkey==VK_NUMLOCK) || (vkey==VK_CAPITAL))
+      {
+	
+	switch (*( State = (vkey==VK_NUMLOCK? &NumState : &CapsState))) {
+	case OFF:if (event->type==KeyPress)
+	  {
+	    dprintf_keyboard(stddeb,"OFF + Keypress => DOWN and UP generated. \n");
+	    hardware_event( message, vkey, keylp.lp2, event->x_root - desktopX,
+			    event->y_root - desktopY, event->time - MSG_WineStartTicks, 0);
+	    message += WM_KEYUP - WM_KEYDOWN; /* create a *UP message from the *DOWN one */
+	    keylp.lp1.previous = 1;
+	    keylp.lp1.transition = 1;
+	    *State = INTERM;
+	  } break;
+	case INTERM:
+	  /* The 'INTERM' state means : just after a 'press' event, if a 'release' event comes,
+	     don't "propagate" it. It's from the same key press. Then the state goes to ON.
+	     And from there, a 'release' event will switch off the toggle key. */
+	  DontPropagate = TRUE;
+	  *State=ON;
+	  InputKeyStateTable[vkey] |= 0x01; /* force to 'on' event if a release event was received */
+	  dprintf_keyboard(stddeb,"INTERM : don\'t propagate press/release of toggle key. InputKeyStateTable[%#x] = %#x",vkey,InputKeyStateTable[vkey]);
+	  break;
+	case ON: if (event->type==KeyPress) DontPropagate = TRUE; else
+	  {
+	    KEYLP downkeylp = keylp;
+	    dprintf_keyboard(stddeb,"ON + KeyRelease => generating DOWN msg before the UP\n");
+	    message += WM_KEYDOWN - WM_KEYUP; /* create the *DOWN from the *UP */
+	    downkeylp.lp1.previous = 0; /* ? */
+	    downkeylp.lp1.transition = 0;
+	    hardware_event( message, vkey, downkeylp.lp2, event->x_root - desktopX,
+			    event->y_root - desktopY, event->time - MSG_WineStartTicks, 0);
+	    message += WM_KEYUP - WM_KEYDOWN; /* back to the UP message */
+            *State=OFF;
+	  } break;
+	}
+	dprintf_keyboard(stddeb,"Internal State : %d (0=OFF 1=INTERM 2=ON). InputTable state : %#x \n",*State,InputKeyStateTable[vkey]);
+      } else {
+	if (NumState == INTERM) NumState = ON;
+	if (CapsState == INTERM) CapsState = ON;
+      }
+    
+    if (!DontPropagate)
+      {
+	dprintf_key(stddeb,"            wParam=%04X, lParam=%08lX\n", 
+		    vkey, keylp.lp2 );
+	dprintf_key(stddeb,"            InputKeyState=%X\n",
+		    InputKeyStateTable[vkey]);
+
+	hardware_event( message, vkey, keylp.lp2, event->x_root - desktopX,
+			event->y_root - desktopY, event->time - MSG_WineStartTicks, 0 );
+      }
+    }
+}
+
 
 /**********************************************************************
  *		GetKeyState			[USER.106]
@@ -201,7 +603,7 @@
          if (GetCapture16())
            mesg=2;
          else
-          if (!IsWindowEnabled(hWnd))
+          if (!IsWindowEnabled16(hWnd))
             mesg=3;
           else
           {
@@ -226,7 +628,7 @@
             {
               if (iStat!=-1)
               {
-                if (IsIconic(hWnd))
+                if (IsIconic32(hWnd))
                   mesg=5;
                 else
                 {
@@ -268,3 +670,264 @@
     GlobalUnlock16(hAccel);
     return 0;
 }
+
+
+DWORD OemKeyScan(WORD wOemChar)
+{
+    dprintf_keyboard(stddeb,"*OemKeyScan (%d)\n",wOemChar);
+
+    return wOemChar;
+}
+
+/* VkKeyScan translates an ANSI character to a virtual-key and shift code
+ * for the current keyboard.
+ * FIXME high-order byte should yield :
+ *	0	Unshifted
+ *	1	Shift
+ *	2	Ctrl
+ *	3-5	Shift-key combinations that are not used for characters
+ *	6	Ctrl-Alt
+ *	7	Ctrl-Alt-Shift
+ *	I.e. :	Shift = 1, Ctrl = 2, Alt = 4.
+ */
+
+WORD VkKeyScan(WORD cChar)
+{
+	KeyCode keycode;
+    	dprintf_keyboard(stddeb,"VkKeyScan '%c'(%d) ",cChar,cChar);
+	
+/* let's do this : char = keysym (for ANSI chars) -> keyc [ + shift ... (?? how ??)]
+keyc -> (keyc2vkey) vkey */
+
+	keycode = XKeysymToKeycode(display, cChar & 0xFF);
+	
+	dprintf_keyboard(stddeb," ... got keycode 0x%x ... returning 0x%x\n",
+			 keycode,keyc2vkey[keycode]);
+	return keyc2vkey[keycode];
+}
+
+WORD VkKeyScan32W(WORD cChar)
+{
+	/* lower part of cChar is used anyway */
+	return VkKeyScan(cChar);
+}
+
+int GetKeyboardType(int nTypeFlag)
+{
+  dprintf_keyboard(stddeb,"GetKeyboardType(%d)\n",nTypeFlag);
+  switch(nTypeFlag)
+    {
+    case 0:      /* Keyboard type */
+      return 4;    /* AT-101 */
+      break;
+    case 1:      /* Keyboard Subtype */
+      return 0;    /* There are no defined subtypes */
+      break;
+    case 2:      /* Number of F-keys */
+      return 12;   /* We're doing an 101 for now, so return 12 F-keys */
+      break;
+    default:     
+      fprintf(stderr, "Unknown type on GetKeyboardType\n");
+      return 0;    /* The book says 0 here, so 0 */
+    }
+}
+
+/* MapVirtualKey translates keycodes from one format to another. */
+
+WORD MapVirtualKey(WORD wCode, WORD wMapType)
+{
+#define returnMVK(value) { dprintf_keyboard(stddeb,"returning 0x%x.\n",value); return value; }
+
+	dprintf_keyboard(stddeb,"MapVirtualKey wCode=0x%x wMapType=%d ... ",wCode,wMapType);
+	switch(wMapType) {
+		case 0:	{ /* vkey-code to scan-code */
+			/* let's do vkey -> keycode -> scan */
+			KeyCode keyc;
+			for (keyc=min_keycode; keyc<=max_keycode; keyc++) /* see event.c */
+				if ((keyc2vkey[keyc] & 0xFF)== wCode)
+					returnMVK (keyc - 8);
+		        return 0; }
+
+		case 1: /* scan-code to vkey-code */
+			/* let's do scan -> keycode -> vkey */
+
+			returnMVK (keyc2vkey[(wCode & 0xFF) + 8]);
+
+		case 2: { /* vkey-code to unshifted ANSI code */
+			/* (was FIXME) : what does unshifted mean ? 'a' or 'A' ? */
+		        /* My Windows returns 'A'. */
+			/* let's do vkey -> keycode -> (XLookupString) ansi char */
+			XKeyEvent e;
+			KeySym keysym;
+			char s[2];
+			e.display = display;
+			e.state = 0; /* unshifted */
+			e.keycode = MapVirtualKey( wCode, 0);
+			if (!XLookupString(&e, s , 2 , &keysym, NULL))
+			  returnMVK (*s);
+			
+			return 0;
+			}
+		default: /* reserved */
+			fprintf(stderr, "MapVirtualKey: unknown wMapType %d !\n",
+				wMapType);
+			return 0;	
+	}
+	return 0;
+}
+
+int GetKbCodePage(void)
+{
+    	dprintf_keyboard(stddeb,"GetKbCodePage()\n");
+	return 850;
+}
+
+/****************************************************************************
+ *	GetKeyNameText32W   (USER32.247)
+ */
+INT32 GetKeyNameText32W(LONG lParam, LPWSTR lpBuffer, INT32 nSize)
+{
+	LPSTR buf = xmalloc(nSize);
+	int	res = GetKeyNameText32A(lParam,buf,nSize);
+
+	lstrcpynAtoW(lpBuffer,buf,nSize);
+	free(buf);
+	return res;
+}
+
+/****************************************************************************
+ *	GetKeyNameText32A   (USER32.246)
+ */
+INT32 GetKeyNameText32A(LONG lParam, LPSTR lpBuffer, INT32 nSize)
+{
+	return GetKeyNameText16(lParam,lpBuffer,nSize);
+}
+
+/****************************************************************************
+ *	GetKeyNameText16   (KEYBOARD.133)
+ */
+INT16 GetKeyNameText16(LONG lParam, LPSTR lpBuffer, INT16 nSize)
+{
+  /*	int i; */
+	
+    	dprintf_keyboard(stddeb,"GetKeyNameText(%ld,<ptr>,%d)\n",lParam,nSize);
+
+	lParam >>= 16;
+	lParam &= 0xff;
+
+	/*	for (i = 0 ; i != KeyTableSize ; i++) 
+		if (KeyTable[i].scancode == lParam)  {
+			lstrcpyn32A( lpBuffer, KeyTable[i].name, nSize );
+			return strlen(lpBuffer);
+		}
+		*/
+	/* FIXME ! GetKeyNameText is still to do...
+ */
+	*lpBuffer = 0;
+	return 0;
+}
+
+int ToAscii(WORD wVirtKey, WORD wScanCode, LPSTR lpKeyState, 
+	LPVOID lpChar, WORD wFlags) 
+{
+    XKeyEvent e;
+    KeySym keysym;
+    static XComposeStatus cs;
+    int ret;
+    WORD keyc;
+
+    e.display = display;
+    e.keycode = 0;
+    for (keyc=min_keycode; keyc<=max_keycode; keyc++)
+      { /* this could be speeded up by making another table, an array of struct vkey,keycode
+	 * (vkey -> keycode) with vkeys sorted .... but it takes memory (512*3 bytes)!  DF */
+	if ((keyc2vkey[keyc] & 0xFF)== wVirtKey) /* no need to make a more precise test (with the extended bit correctly set above wVirtKey ... VK* are different enough... */
+	  {
+	    if ((e.keycode) && ((wVirtKey<0x10) || (wVirtKey>0x12))) 
+		/* it's normal to have 2 shift, control, and alt ! */
+		dprintf_keyboard(stddeb,"ToAscii : The keycodes %X and %X are matching the same vkey %X\n",
+				 e.keycode,keyc,wVirtKey);
+	    e.keycode = keyc;
+	  }
+      }
+    if ((!e.keycode) && (lpKeyState[VK_NUMLOCK] & 0x01)) 
+      {
+	if ((wVirtKey>=VK_NUMPAD0) && (wVirtKey<=VK_NUMPAD9))
+	  e.keycode = XKeysymToKeycode(e.display, wVirtKey-VK_NUMPAD0+XK_KP_0);
+	if (wVirtKey==VK_DECIMAL)
+	  e.keycode = XKeysymToKeycode(e.display, XK_KP_Decimal);
+      }
+    if (!e.keycode)
+      {
+	fprintf(stderr,"ToAscii : Unknown virtual key %X !!! \n",wVirtKey);
+	return wVirtKey; /* whatever */
+      }
+    e.state = 0;
+    if (lpKeyState[VK_SHIFT] & 0x80)
+	e.state |= ShiftMask;
+    dprintf_keyboard(stddeb,"ToAscii : lpKeyState[0x14(VK_CAPITAL)]=%#x\n",lpKeyState[VK_CAPITAL]);
+    if (lpKeyState[VK_CAPITAL] & 0x01)
+	e.state |= LockMask;
+    if (lpKeyState[VK_CONTROL] & 0x80)
+	if (lpKeyState[VK_MENU] & 0x80)
+	    e.state |= AltGrMask;
+	else
+	    e.state |= ControlMask;
+    if (lpKeyState[VK_NUMLOCK] & 0x01)
+	e.state |= NumLockMask;
+    dprintf_key(stddeb, "ToAscii(%04X, %04X) : faked state = %X\n",
+		wVirtKey, wScanCode, e.state);
+    ret = XLookupString(&e, lpChar, 2, &keysym, &cs);
+    if (ret == 0)
+	{
+	BYTE dead_char = 0;
+
+	((char*)lpChar)[1] = '\0';
+	switch (keysym)
+	    {
+	    case XK_dead_tilde :
+	    case 0x1000FE7E : /* Xfree's XK_Dtilde */
+		dead_char = '~';
+		break;
+	    case XK_dead_acute :
+	    case 0x1000FE27 : /* Xfree's XK_Dacute_accent */
+		dead_char = 0xb4;
+		break;
+	    case XK_dead_circumflex :
+	    case 0x1000FE5E : /* Xfree's XK_Dcircumflex_accent */
+		dead_char = '^';
+		break;
+	    case XK_dead_grave :
+	    case 0x1000FE60 : /* Xfree's XK_Dgrave_accent */
+		dead_char = '`';
+		break;
+	    case XK_dead_diaeresis :
+	    case 0x1000FE22 : /* Xfree's XK_Ddiaeresis */
+		dead_char = 0xa8;
+		break;
+	    }
+	if (dead_char)
+	    {
+	    *(char*)lpChar = dead_char;
+	    ret = -1;
+	    }
+	else
+	    {
+	    char	*ksname;
+
+	    ksname = XKeysymToString(keysym);
+	    if (!ksname)
+		ksname = "No Name";
+	    if ((keysym >> 8) != 0xff)
+		{
+		fprintf(stderr, "Please report : no char for keysym %04lX (%s) :\n",
+			keysym, ksname);
+		fprintf(stderr, "  wVirtKey = %X, wScanCode = %X, keycode = %X, state = %X\n",
+			wVirtKey, wScanCode, e.keycode, e.state);
+		}
+	    }
+	}
+    dprintf_key(stddeb, "ToAscii about to return %d with char %x\n",
+		ret, *(char*)lpChar);
+    return ret;
+}