Pileus Git - ~andy/gtk/blob - gdk/win32/gdkkeys-win32.c

   1 /* GDK - The GIMP Drawing Kit
   2  * Copyright (C) 2000 Red Hat, Inc.
   3  *
   4  * This library is free software; you can redistribute it and/or
   5  * modify it under the terms of the GNU Lesser General Public
   6  * License as published by the Free Software Foundation; either
   7  * version 2 of the License, or (at your option) any later version.
   8  *
   9  * This library is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12  * Lesser General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU Lesser General Public
  15  * License along with this library. If not, see <http://www.gnu.org/licenses/>.
  16  */
  17
  18 /*
  19  * Modified by the GTK+ Team and others 1997-2000.  See the AUTHORS
  20  * file for a list of people on the GTK+ Team.  See the ChangeLog
  21  * files for a list of changes.  These files are distributed with
  22  * GTK+ at ftp://ftp.gtk.org/pub/gtk/.
  23  */
  24 #include <ctype.h>
  25 #include <stdio.h>
  26 #include <stdlib.h>
  27 #include <string.h>
  28 #include <limits.h>
  29 #include <errno.h>
  30
  31 #include "gdk.h"
  32
  33 #include "gdkprivate-win32.h"
  34 #include "gdkinternals.h"
  35 #include "gdkkeysyms.h"
  36 #include "gdkkeysprivate.h"
  37 #include "gdkwin32keys.h"
  38
  39 #include "config.h"
  40
  41 struct _GdkWin32KeymapClass
  42 {
  43   GdkKeymapClass parent_class;
  44 };
  45
  46 struct _GdkWin32Keymap
  47 {
  48   GdkKeymap parent_instance;
  49 };
  50
  51 G_DEFINE_TYPE (GdkWin32Keymap, gdk_win32_keymap, GDK_TYPE_KEYMAP)
  52
  53 static void
  54 gdk_win32_keymap_init (GdkWin32Keymap *keymap)
  55 {
  56 }
  57
  58 guint _gdk_keymap_serial = 0;
  59 gboolean _gdk_keyboard_has_altgr = FALSE;
  60 guint _scancode_rshift = 0;
  61
  62 static GdkModifierType gdk_shift_modifiers = GDK_SHIFT_MASK;
  63
  64 static GdkKeymap *default_keymap = NULL;
  65
  66 static guint *keysym_tab = NULL;
  67
  68 #ifdef G_ENABLE_DEBUG
  69 static void
  70 print_keysym_tab (void)
  71 {
  72   gint vk;
  73
  74   g_print ("keymap:%s%s\n",
  75            _gdk_keyboard_has_altgr ? " (uses AltGr)" : "",
  76            (gdk_shift_modifiers & GDK_LOCK_MASK) ? " (has ShiftLock)" : "");
  77   for (vk = 0; vk < 256; vk++)
  78     {
  79       gint state;
  80
  81       g_print ("%#.02x: ", vk);
  82       for (state = 0; state < 4; state++)
  83         {
  84           gchar *name = gdk_keyval_name (keysym_tab[vk*4 + state]);
  85           if (name == NULL)
  86             name = "(none)";
  87           g_print ("%s ", name);
  88         }
  89       g_print ("\n");
  90     }
  91 }
  92 #endif
  93
  94 static void
  95 handle_special (guint  vk,
  96                 guint *ksymp,
  97                 gint   shift)
  98
  99 {
 100   switch (vk)
 101     {
 102     case VK_CANCEL:
 103       *ksymp = GDK_KEY_Cancel; break;
 104     case VK_BACK:
 105       *ksymp = GDK_KEY_BackSpace; break;
 106     case VK_TAB:
 107       if (shift & 0x1)
 108         *ksymp = GDK_KEY_ISO_Left_Tab;
 109       else
 110         *ksymp = GDK_KEY_Tab;
 111       break;
 112     case VK_CLEAR:
 113       *ksymp = GDK_KEY_Clear; break;
 114     case VK_RETURN:
 115       *ksymp = GDK_KEY_Return; break;
 116     case VK_SHIFT:
 117     case VK_LSHIFT:
 118       *ksymp = GDK_KEY_Shift_L; break;
 119     case VK_CONTROL:
 120     case VK_LCONTROL:
 121       *ksymp = GDK_KEY_Control_L; break;
 122     case VK_MENU:
 123     case VK_LMENU:
 124       *ksymp = GDK_KEY_Alt_L; break;
 125     case VK_PAUSE:
 126       *ksymp = GDK_KEY_Pause; break;
 127     case VK_ESCAPE:
 128       *ksymp = GDK_KEY_Escape; break;
 129     case VK_PRIOR:
 130       *ksymp = GDK_KEY_Prior; break;
 131     case VK_NEXT:
 132       *ksymp = GDK_KEY_Next; break;
 133     case VK_END:
 134       *ksymp = GDK_KEY_End; break;
 135     case VK_HOME:
 136       *ksymp = GDK_KEY_Home; break;
 137     case VK_LEFT:
 138       *ksymp = GDK_KEY_Left; break;
 139     case VK_UP:
 140       *ksymp = GDK_KEY_Up; break;
 141     case VK_RIGHT:
 142       *ksymp = GDK_KEY_Right; break;
 143     case VK_DOWN:
 144       *ksymp = GDK_KEY_Down; break;
 145     case VK_SELECT:
 146       *ksymp = GDK_KEY_Select; break;
 147     case VK_PRINT:
 148       *ksymp = GDK_KEY_Print; break;
 149     case VK_EXECUTE:
 150       *ksymp = GDK_KEY_Execute; break;
 151     case VK_INSERT:
 152       *ksymp = GDK_KEY_Insert; break;
 153     case VK_DELETE:
 154       *ksymp = GDK_KEY_Delete; break;
 155     case VK_HELP:
 156       *ksymp = GDK_KEY_Help; break;
 157     case VK_LWIN:
 158       *ksymp = GDK_KEY_Meta_L; break;
 159     case VK_RWIN:
 160       *ksymp = GDK_KEY_Meta_R; break;
 161     case VK_APPS:
 162       *ksymp = GDK_KEY_Menu; break;
 163     case VK_MULTIPLY:
 164       *ksymp = GDK_KEY_KP_Multiply; break;
 165     case VK_ADD:
 166       *ksymp = GDK_KEY_KP_Add; break;
 167     case VK_SEPARATOR:
 168       *ksymp = GDK_KEY_KP_Separator; break;
 169     case VK_SUBTRACT:
 170       *ksymp = GDK_KEY_KP_Subtract; break;
 171     case VK_DIVIDE:
 172       *ksymp = GDK_KEY_KP_Divide; break;
 173     case VK_NUMPAD0:
 174       *ksymp = GDK_KEY_KP_0; break;
 175     case VK_NUMPAD1:
 176       *ksymp = GDK_KEY_KP_1; break;
 177     case VK_NUMPAD2:
 178       *ksymp = GDK_KEY_KP_2; break;
 179     case VK_NUMPAD3:
 180       *ksymp = GDK_KEY_KP_3; break;
 181     case VK_NUMPAD4:
 182       *ksymp = GDK_KEY_KP_4; break;
 183     case VK_NUMPAD5:
 184       *ksymp = GDK_KEY_KP_5; break;
 185     case VK_NUMPAD6:
 186       *ksymp = GDK_KEY_KP_6; break;
 187     case VK_NUMPAD7:
 188       *ksymp = GDK_KEY_KP_7; break;
 189     case VK_NUMPAD8:
 190       *ksymp = GDK_KEY_KP_8; break;
 191     case VK_NUMPAD9:
 192       *ksymp = GDK_KEY_KP_9; break;
 193     case VK_F1:
 194       *ksymp = GDK_KEY_F1; break;
 195     case VK_F2:
 196       *ksymp = GDK_KEY_F2; break;
 197     case VK_F3:
 198       *ksymp = GDK_KEY_F3; break;
 199     case VK_F4:
 200       *ksymp = GDK_KEY_F4; break;
 201     case VK_F5:
 202       *ksymp = GDK_KEY_F5; break;
 203     case VK_F6:
 204       *ksymp = GDK_KEY_F6; break;
 205     case VK_F7:
 206       *ksymp = GDK_KEY_F7; break;
 207     case VK_F8:
 208       *ksymp = GDK_KEY_F8; break;
 209     case VK_F9:
 210       *ksymp = GDK_KEY_F9; break;
 211     case VK_F10:
 212       *ksymp = GDK_KEY_F10; break;
 213     case VK_F11:
 214       *ksymp = GDK_KEY_F11; break;
 215     case VK_F12:
 216       *ksymp = GDK_KEY_F12; break;
 217     case VK_F13:
 218       *ksymp = GDK_KEY_F13; break;
 219     case VK_F14:
 220       *ksymp = GDK_KEY_F14; break;
 221     case VK_F15:
 222       *ksymp = GDK_KEY_F15; break;
 223     case VK_F16:
 224       *ksymp = GDK_KEY_F16; break;
 225     case VK_F17:
 226       *ksymp = GDK_KEY_F17; break;
 227     case VK_F18:
 228       *ksymp = GDK_KEY_F18; break;
 229     case VK_F19:
 230       *ksymp = GDK_KEY_F19; break;
 231     case VK_F20:
 232       *ksymp = GDK_KEY_F20; break;
 233     case VK_F21:
 234       *ksymp = GDK_KEY_F21; break;
 235     case VK_F22:
 236       *ksymp = GDK_KEY_F22; break;
 237     case VK_F23:
 238       *ksymp = GDK_KEY_F23; break;
 239     case VK_F24:
 240       *ksymp = GDK_KEY_F24; break;
 241     case VK_NUMLOCK:
 242       *ksymp = GDK_KEY_Num_Lock; break;
 243     case VK_SCROLL:
 244       *ksymp = GDK_KEY_Scroll_Lock; break;
 245     case VK_RSHIFT:
 246       *ksymp = GDK_KEY_Shift_R; break;
 247     case VK_RCONTROL:
 248       *ksymp = GDK_KEY_Control_R; break;
 249     case VK_RMENU:
 250       *ksymp = GDK_KEY_Alt_R; break;
 251     }
 252 }
 253
 254 static void
 255 set_shift_vks (guchar *key_state,
 256                gint    shift)
 257 {
 258   switch (shift)
 259     {
 260     case 0:
 261       key_state[VK_SHIFT] = 0;
 262       key_state[VK_CONTROL] = key_state[VK_MENU] = 0;
 263       break;
 264     case 1:
 265       key_state[VK_SHIFT] = 0x80;
 266       key_state[VK_CONTROL] = key_state[VK_MENU] = 0;
 267       break;
 268     case 2:
 269       key_state[VK_SHIFT] = 0;
 270       key_state[VK_CONTROL] = key_state[VK_MENU] = 0x80;
 271       break;
 272     case 3:
 273       key_state[VK_SHIFT] = 0x80;
 274       key_state[VK_CONTROL] = key_state[VK_MENU] = 0x80;
 275       break;
 276     }
 277 }
 278
 279 static void
 280 reset_after_dead (guchar key_state[256])
 281 {
 282   guchar temp_key_state[256];
 283   wchar_t wcs[2];
 284
 285   memmove (temp_key_state, key_state, sizeof (key_state));
 286
 287   temp_key_state[VK_SHIFT] =
 288     temp_key_state[VK_CONTROL] =
 289     temp_key_state[VK_MENU] = 0;
 290
 291   ToUnicodeEx (VK_SPACE, MapVirtualKey (VK_SPACE, 0),
 292                temp_key_state, wcs, G_N_ELEMENTS (wcs),
 293                0, _gdk_input_locale);
 294 }
 295
 296 static void
 297 handle_dead (guint  keysym,
 298              guint *ksymp)
 299 {
 300   switch (keysym)
 301     {
 302     case '"': /* 0x022 */
 303       *ksymp = GDK_KEY_dead_diaeresis; break;
 304     case '\'': /* 0x027 */
 305       *ksymp = GDK_KEY_dead_acute; break;
 306     case GDK_KEY_asciicircum: /* 0x05e */
 307       *ksymp = GDK_KEY_dead_circumflex; break;
 308     case GDK_KEY_grave: /* 0x060 */
 309       *ksymp = GDK_KEY_dead_grave; break;
 310     case GDK_KEY_asciitilde: /* 0x07e */
 311       *ksymp = GDK_KEY_dead_tilde; break;
 312     case GDK_KEY_diaeresis: /* 0x0a8 */
 313       *ksymp = GDK_KEY_dead_diaeresis; break;
 314     case GDK_KEY_degree: /* 0x0b0 */
 315       *ksymp = GDK_KEY_dead_abovering; break;
 316     case GDK_KEY_acute: /* 0x0b4 */
 317       *ksymp = GDK_KEY_dead_acute; break;
 318     case GDK_KEY_periodcentered: /* 0x0b7 */
 319       *ksymp = GDK_KEY_dead_abovedot; break;
 320     case GDK_KEY_cedilla: /* 0x0b8 */
 321       *ksymp = GDK_KEY_dead_cedilla; break;
 322     case GDK_KEY_breve: /* 0x1a2 */
 323       *ksymp = GDK_KEY_dead_breve; break;
 324     case GDK_KEY_ogonek: /* 0x1b2 */
 325       *ksymp = GDK_KEY_dead_ogonek; break;
 326     case GDK_KEY_caron: /* 0x1b7 */
 327       *ksymp = GDK_KEY_dead_caron; break;
 328     case GDK_KEY_doubleacute: /* 0x1bd */
 329       *ksymp = GDK_KEY_dead_doubleacute; break;
 330     case GDK_KEY_abovedot: /* 0x1ff */
 331       *ksymp = GDK_KEY_dead_abovedot; break;
 332     case 0x1000384: /* Greek tonos */
 333       *ksymp = GDK_KEY_dead_acute; break;
 334     case GDK_KEY_Greek_accentdieresis: /* 0x7ae */
 335       *ksymp = GDK_KEY_Greek_accentdieresis; break;
 336     default:
 337       /* By default use the keysym as such. This takes care of for
 338        * instance the dead U+09CD (BENGALI VIRAMA) on the ekushey
 339        * Bengali layout.
 340        */
 341       *ksymp = keysym; break;
 342     }
 343 }
 344
 345 static void
 346 update_keymap (void)
 347 {
 348   static guint current_serial = 0;
 349   guchar key_state[256];
 350   guint scancode;
 351   guint vk;
 352   gboolean capslock_tested = FALSE;
 353
 354   if (keysym_tab != NULL && current_serial == _gdk_keymap_serial)
 355     return;
 356
 357   current_serial = _gdk_keymap_serial;
 358
 359   if (keysym_tab == NULL)
 360     keysym_tab = g_new (guint, 4*256);
 361
 362   memset (key_state, 0, sizeof (key_state));
 363
 364   _gdk_keyboard_has_altgr = FALSE;
 365   gdk_shift_modifiers = GDK_SHIFT_MASK;
 366
 367   for (vk = 0; vk < 256; vk++)
 368     {
 369       if ((scancode = MapVirtualKey (vk, 0)) == 0 &&
 370           vk != VK_DIVIDE)
 371         keysym_tab[vk*4+0] =
 372           keysym_tab[vk*4+1] =
 373           keysym_tab[vk*4+2] =
 374           keysym_tab[vk*4+3] = GDK_KEY_VoidSymbol;
 375       else
 376         {
 377           gint shift;
 378
 379           if (vk == VK_RSHIFT)
 380             _scancode_rshift = scancode;
 381
 382           key_state[vk] = 0x80;
 383           for (shift = 0; shift < 4; shift++)
 384             {
 385               guint *ksymp = keysym_tab + vk*4 + shift;
 386
 387               set_shift_vks (key_state, shift);
 388
 389               *ksymp = 0;
 390
 391               /* First, handle those virtual keys that we always want
 392                * as special GDK_* keysyms, even if ToAsciiEx might
 393                * turn some them into a ASCII character (like TAB and
 394                * ESC).
 395                */
 396               handle_special (vk, ksymp, shift);
 397
 398               if (*ksymp == 0)
 399                 {
 400                   wchar_t wcs[10];
 401                   gint k;
 402
 403                   wcs[0] = wcs[1] = 0;
 404                   k = ToUnicodeEx (vk, scancode, key_state,
 405                                    wcs, G_N_ELEMENTS (wcs),
 406                                    0, _gdk_input_locale);
 407 #if 0
 408                   g_print ("ToUnicodeEx(%#02x, %d: %d): %d, %04x %04x\n",
 409                            vk, scancode, shift, k,
 410                            wcs[0], wcs[1]);
 411 #endif
 412                   if (k == 1)
 413                     *ksymp = gdk_unicode_to_keyval (wcs[0]);
 414                   else if (k == -1)
 415                     {
 416                       guint keysym = gdk_unicode_to_keyval (wcs[0]);
 417
 418                       /* It is a dead key, and it has been stored in
 419                        * the keyboard layout's state by
 420                        * ToAsciiEx()/ToUnicodeEx(). Yes, this is an
 421                        * incredibly silly API! Make the keyboard
 422                        * layout forget it by calling
 423                        * ToAsciiEx()/ToUnicodeEx() once more, with the
 424                        * virtual key code and scancode for the
 425                        * spacebar, without shift or AltGr. Otherwise
 426                        * the next call to ToAsciiEx() with a different
 427                        * key would try to combine with the dead key.
 428                        */
 429                       reset_after_dead (key_state);
 430
 431                       /* Use dead keysyms instead of "undead" ones */
 432                       handle_dead (keysym, ksymp);
 433                     }
 434                   else if (k == 0)
 435                     {
 436                       /* Seems to be necessary to "reset" the keyboard layout
 437                        * in this case, too. Otherwise problems on NT4.
 438                        */
 439                       reset_after_dead (key_state);
 440                     }
 441                   else
 442                     {
 443 #if 0
 444                       GDK_NOTE (EVENTS,
 445                                 g_print ("ToUnicodeEx returns %d "
 446                                          "for vk:%02x, sc:%02x%s%s\n",
 447                                          k, vk, scancode,
 448                                          (shift&0x1 ? " shift" : ""),
 449                                          (shift&0x2 ? " altgr" : "")));
 450 #endif
 451                     }
 452                 }
 453               if (*ksymp == 0)
 454                 *ksymp = GDK_KEY_VoidSymbol;
 455             }
 456           key_state[vk] = 0;
 457
 458           /* Check if keyboard has an AltGr key by checking if
 459            * the mapping with Control+Alt is different.
 460            */
 461           if (!_gdk_keyboard_has_altgr)
 462             if ((keysym_tab[vk*4 + 2] != GDK_KEY_VoidSymbol &&
 463                  keysym_tab[vk*4] != keysym_tab[vk*4 + 2]) ||
 464                 (keysym_tab[vk*4 + 3] != GDK_KEY_VoidSymbol &&
 465                  keysym_tab[vk*4 + 1] != keysym_tab[vk*4 + 3]))
 466               _gdk_keyboard_has_altgr = TRUE;
 467
 468           if (!capslock_tested)
 469             {
 470               /* Can we use this virtual key to determine the CapsLock
 471                * key behaviour: CapsLock or ShiftLock? If it generates
 472                * keysyms for printable characters and has a shifted
 473                * keysym that isn't just the upperacase of the
 474                * unshifted keysym, check the behaviour of VK_CAPITAL.
 475                */
 476               if (g_unichar_isgraph (gdk_keyval_to_unicode (keysym_tab[vk*4 + 0])) &&
 477                   keysym_tab[vk*4 + 1] != keysym_tab[vk*4 + 0] &&
 478                   g_unichar_isgraph (gdk_keyval_to_unicode (keysym_tab[vk*4 + 1])) &&
 479                   keysym_tab[vk*4 + 1] != gdk_keyval_to_upper (keysym_tab[vk*4 + 0]))
 480                 {
 481                   guchar chars[2];
 482
 483                   capslock_tested = TRUE;
 484
 485                   key_state[VK_SHIFT] = 0;
 486                   key_state[VK_CONTROL] = key_state[VK_MENU] = 0;
 487                   key_state[VK_CAPITAL] = 1;
 488
 489                   if (ToAsciiEx (vk, scancode, key_state,
 490                                  (LPWORD) chars, 0, _gdk_input_locale) == 1)
 491                     {
 492                       if (chars[0] >= GDK_KEY_space &&
 493                           chars[0] <= GDK_KEY_asciitilde &&
 494                           chars[0] == keysym_tab[vk*4 + 1])
 495                         {
 496                           /* CapsLock acts as ShiftLock */
 497                           gdk_shift_modifiers |= GDK_LOCK_MASK;
 498                         }
 499                     }
 500                   key_state[VK_CAPITAL] = 0;
 501                 }
 502             }
 503         }
 504     }
 505   GDK_NOTE (EVENTS, print_keysym_tab ());
 506 }
 507
 508 GdkKeymap*
 509 _gdk_win32_display_get_keymap (GdkDisplay *display)
 510 {
 511   g_return_val_if_fail (display == gdk_display_get_default (), NULL);
 512
 513   if (default_keymap == NULL)
 514     default_keymap = g_object_new (gdk_win32_keymap_get_type (), NULL);
 515
 516   return default_keymap;
 517 }
 518
 519 static PangoDirection
 520 gdk_win32_keymap_get_direction (GdkKeymap *keymap)
 521 {
 522   update_keymap ();
 523
 524   switch (PRIMARYLANGID (LOWORD ((DWORD) (gintptr) _gdk_input_locale)))
 525     {
 526     case LANG_HEBREW:
 527     case LANG_ARABIC:
 528 #ifdef LANG_URDU
 529     case LANG_URDU:
 530 #endif
 531     case LANG_FARSI:
 532       /* Others? */
 533       return PANGO_DIRECTION_RTL;
 534
 535     default:
 536       return PANGO_DIRECTION_LTR;
 537     }
 538 }
 539
 540 static gboolean
 541 gdk_win32_keymap_have_bidi_layouts (GdkKeymap *keymap)
 542 {
 543   /* Should we check if the kayboard layouts switchable at the moment
 544    * cover both directionalities? What does the doc comment in
 545    * ../x11/gdkkeys-x11.c exactly mean?
 546    */
 547   return FALSE;
 548 }
 549
 550 static gboolean
 551 gdk_win32_keymap_get_caps_lock_state (GdkKeymap *keymap)
 552 {
 553   return ((GetKeyState (VK_CAPITAL) & 1) != 0);
 554 }
 555
 556 static gboolean
 557 gdk_win32_keymap_get_num_lock_state (GdkKeymap *keymap)
 558 {
 559   return ((GetKeyState (VK_NUMLOCK) & 1) != 0);
 560 }
 561
 562 static gboolean
 563 gdk_win32_keymap_get_entries_for_keyval (GdkKeymap     *keymap,
 564                                    guint          keyval,
 565                                    GdkKeymapKey **keys,
 566                                    gint          *n_keys)
 567 {
 568   GArray *retval;
 569
 570   g_return_val_if_fail (keymap == NULL || GDK_IS_KEYMAP (keymap), FALSE);
 571   g_return_val_if_fail (keys != NULL, FALSE);
 572   g_return_val_if_fail (n_keys != NULL, FALSE);
 573   g_return_val_if_fail (keyval != 0, FALSE);
 574
 575   retval = g_array_new (FALSE, FALSE, sizeof (GdkKeymapKey));
 576
 577   /* Accept only the default keymap */
 578   if (keymap == NULL || keymap == gdk_keymap_get_default ())
 579     {
 580       gint vk;
 581
 582       update_keymap ();
 583
 584       for (vk = 0; vk < 256; vk++)
 585         {
 586           gint i;
 587
 588           for (i = 0; i < 4; i++)
 589             {
 590               if (keysym_tab[vk*4+i] == keyval)
 591                 {
 592                   GdkKeymapKey key;
 593
 594                   key.keycode = vk;
 595
 596                   /* 2 levels (normal, shift), two groups (normal, AltGr) */
 597                   key.group = i / 2;
 598                   key.level = i % 2;
 599
 600                   g_array_append_val (retval, key);
 601                 }
 602             }
 603         }
 604     }
 605
 606 #ifdef G_ENABLE_DEBUG
 607   if (_gdk_debug_flags & GDK_DEBUG_EVENTS)
 608     {
 609       gint i;
 610
 611       g_print ("gdk_keymap_get_entries_for_keyval: %#.04x (%s):",
 612                keyval, gdk_keyval_name (keyval));
 613       for (i = 0; i < retval->len; i++)
 614         {
 615           GdkKeymapKey *entry = (GdkKeymapKey *) retval->data + i;
 616           g_print ("  %#.02x %d %d", entry->keycode, entry->group, entry->level);
 617         }
 618       g_print ("\n");
 619     }
 620 #endif
 621
 622   if (retval->len > 0)
 623     {
 624       *keys = (GdkKeymapKey*) retval->data;
 625       *n_keys = retval->len;
 626     }
 627   else
 628     {
 629       *keys = NULL;
 630       *n_keys = 0;
 631     }
 632
 633   g_array_free (retval, retval->len > 0 ? FALSE : TRUE);
 634
 635   return *n_keys > 0;
 636 }
 637
 638 static gboolean
 639 gdk_win32_keymap_get_entries_for_keycode (GdkKeymap     *keymap,
 640                                     guint          hardware_keycode,
 641                                     GdkKeymapKey **keys,
 642                                     guint        **keyvals,
 643                                     gint          *n_entries)
 644 {
 645   GArray *key_array;
 646   GArray *keyval_array;
 647
 648   g_return_val_if_fail (keymap == NULL || GDK_IS_KEYMAP (keymap), FALSE);
 649   g_return_val_if_fail (n_entries != NULL, FALSE);
 650
 651   if (hardware_keycode <= 0 ||
 652       hardware_keycode >= 256)
 653     {
 654       if (keys)
 655         *keys = NULL;
 656       if (keyvals)
 657         *keyvals = NULL;
 658
 659       *n_entries = 0;
 660       return FALSE;
 661     }
 662
 663   if (keys)
 664     key_array = g_array_new (FALSE, FALSE, sizeof (GdkKeymapKey));
 665   else
 666     key_array = NULL;
 667
 668   if (keyvals)
 669     keyval_array = g_array_new (FALSE, FALSE, sizeof (guint));
 670   else
 671     keyval_array = NULL;
 672
 673   /* Accept only the default keymap */
 674   if (keymap == NULL || keymap == gdk_keymap_get_default ())
 675     {
 676       gint i;
 677
 678       update_keymap ();
 679
 680       for (i = 0; i < 4; i++)
 681         {
 682           if (key_array)
 683             {
 684               GdkKeymapKey key;
 685
 686               key.keycode = hardware_keycode;
 687
 688               key.group = i / 2;
 689               key.level = i % 2;
 690
 691               g_array_append_val (key_array, key);
 692             }
 693
 694           if (keyval_array)
 695             g_array_append_val (keyval_array, keysym_tab[hardware_keycode*4+i]);
 696         }
 697     }
 698
 699   if ((key_array && key_array->len > 0) ||
 700       (keyval_array && keyval_array->len > 0))
 701     {
 702       if (keys)
 703         *keys = (GdkKeymapKey*) key_array->data;
 704
 705       if (keyvals)
 706         *keyvals = (guint*) keyval_array->data;
 707
 708       if (key_array)
 709         *n_entries = key_array->len;
 710       else
 711         *n_entries = keyval_array->len;
 712     }
 713   else
 714     {
 715       if (keys)
 716         *keys = NULL;
 717
 718       if (keyvals)
 719         *keyvals = NULL;
 720
 721       *n_entries = 0;
 722     }
 723
 724   if (key_array)
 725     g_array_free (key_array, key_array->len > 0 ? FALSE : TRUE);
 726   if (keyval_array)
 727     g_array_free (keyval_array, keyval_array->len > 0 ? FALSE : TRUE);
 728
 729   return *n_entries > 0;
 730 }
 731
 732 static guint
 733 gdk_win32_keymap_lookup_key (GdkKeymap          *keymap,
 734                        const GdkKeymapKey *key)
 735 {
 736   guint sym;
 737
 738   g_return_val_if_fail (keymap == NULL || GDK_IS_KEYMAP (keymap), 0);
 739   g_return_val_if_fail (key != NULL, 0);
 740   g_return_val_if_fail (key->group < 4, 0);
 741
 742   /* Accept only the default keymap */
 743   if (keymap != NULL && keymap != gdk_keymap_get_default ())
 744     return 0;
 745
 746   update_keymap ();
 747
 748   if (key->keycode >= 256 ||
 749       key->group < 0 || key->group >= 2 ||
 750       key->level < 0 || key->level >= 2)
 751     return 0;
 752
 753   sym = keysym_tab[key->keycode*4 + key->group*2 + key->level];
 754
 755   if (sym == GDK_KEY_VoidSymbol)
 756     return 0;
 757   else
 758     return sym;
 759 }
 760
 761 static gboolean
 762 gdk_win32_keymap_translate_keyboard_state (GdkKeymap       *keymap,
 763                                      guint            hardware_keycode,
 764                                      GdkModifierType  state,
 765                                      gint             group,
 766                                      guint           *keyval,
 767                                      gint            *effective_group,
 768                                      gint            *level,
 769                                      GdkModifierType *consumed_modifiers)
 770 {
 771   guint tmp_keyval;
 772   guint *keyvals;
 773   gint shift_level;
 774   gboolean ignore_shift = FALSE;
 775   gboolean ignore_group = FALSE;
 776
 777   g_return_val_if_fail (keymap == NULL || GDK_IS_KEYMAP (keymap), FALSE);
 778   g_return_val_if_fail (group < 4, FALSE);
 779
 780 #if 0
 781   GDK_NOTE (EVENTS, g_print ("gdk_keymap_translate_keyboard_state: keycode=%#x state=%#x group=%d\n",
 782                              hardware_keycode, state, group));
 783 #endif
 784   if (keyval)
 785     *keyval = 0;
 786   if (effective_group)
 787     *effective_group = 0;
 788   if (level)
 789     *level = 0;
 790   if (consumed_modifiers)
 791     *consumed_modifiers = 0;
 792
 793   /* Accept only the default keymap */
 794   if (keymap != NULL && keymap != gdk_keymap_get_default ())
 795     return FALSE;
 796
 797   if (hardware_keycode >= 256)
 798     return FALSE;
 799
 800   if (group < 0 || group >= 2)
 801     return FALSE;
 802
 803   update_keymap ();
 804
 805   keyvals = keysym_tab + hardware_keycode*4;
 806
 807   if ((state & GDK_LOCK_MASK) &&
 808       (state & GDK_SHIFT_MASK) &&
 809       ((gdk_shift_modifiers & GDK_LOCK_MASK) ||
 810        (keyvals[group*2 + 1] == gdk_keyval_to_upper (keyvals[group*2 + 0]))))
 811     /* Shift always disables ShiftLock. Shift disables CapsLock for
 812      * keys with lowercase/uppercase letter pairs.
 813      */
 814     shift_level = 0;
 815   else if (state & gdk_shift_modifiers)
 816     shift_level = 1;
 817   else
 818     shift_level = 0;
 819
 820   /* Drop group and shift if there are no keysymbols on
 821    * the key for those.
 822    */
 823   if (shift_level == 1 &&
 824       keyvals[group*2 + 1] == GDK_KEY_VoidSymbol &&
 825       keyvals[group*2] != GDK_KEY_VoidSymbol)
 826     {
 827       shift_level = 0;
 828       ignore_shift = TRUE;
 829     }
 830
 831   if (group == 1 &&
 832       keyvals[2 + shift_level] == GDK_KEY_VoidSymbol &&
 833       keyvals[0 + shift_level] != GDK_KEY_VoidSymbol)
 834     {
 835       group = 0;
 836       ignore_group = TRUE;
 837     }
 838
 839   if (keyvals[group *2 + shift_level] == GDK_KEY_VoidSymbol &&
 840       keyvals[0 + 0] != GDK_KEY_VoidSymbol)
 841     {
 842       shift_level = 0;
 843       group = 0;
 844       ignore_group = TRUE;
 845       ignore_shift = TRUE;
 846     }
 847
 848   /* See whether the group and shift level actually mattered
 849    * to know what to put in consumed_modifiers
 850    */
 851   if (keyvals[group*2 + 1] == GDK_KEY_VoidSymbol ||
 852       keyvals[group*2 + 0] == keyvals[group*2 + 1])
 853     ignore_shift = TRUE;
 854
 855   if (keyvals[2 + shift_level] == GDK_KEY_VoidSymbol ||
 856       keyvals[0 + shift_level] == keyvals[2 + shift_level])
 857     ignore_group = TRUE;
 858
 859   tmp_keyval = keyvals[group*2 + shift_level];
 860
 861   /* If a true CapsLock is toggled, and Shift is not down,
 862    * and the shifted keysym is the uppercase of the unshifted,
 863    * use it.
 864    */
 865   if (!(gdk_shift_modifiers & GDK_LOCK_MASK) &&
 866       !(state & GDK_SHIFT_MASK) &&
 867       (state & GDK_LOCK_MASK))
 868     {
 869       guint upper = gdk_keyval_to_upper (tmp_keyval);
 870       if (upper == keyvals[group*2 + 1])
 871         tmp_keyval = upper;
 872     }
 873
 874   if (keyval)
 875     *keyval = tmp_keyval;
 876
 877   if (effective_group)
 878     *effective_group = group;
 879
 880   if (level)
 881     *level = shift_level;
 882
 883   if (consumed_modifiers)
 884     {
 885       *consumed_modifiers =
 886         (ignore_group ? 0 : GDK_MOD2_MASK) |
 887         (ignore_shift ? 0 : (GDK_SHIFT_MASK|GDK_LOCK_MASK));
 888     }
 889
 890 #if 0
 891   GDK_NOTE (EVENTS, g_print ("... group=%d level=%d cmods=%#x keyval=%s\n",
 892                              group, shift_level, tmp_modifiers, gdk_keyval_name (tmp_keyval)));
 893 #endif
 894
 895   return tmp_keyval != GDK_KEY_VoidSymbol;
 896 }
 897
 898 static void
 899 gdk_win32_keymap_add_virtual_modifiers (GdkKeymap       *keymap,
 900                                   GdkModifierType *state)
 901 {
 902 }
 903
 904 static gboolean
 905 gdk_win32_keymap_map_virtual_modifiers (GdkKeymap       *keymap,
 906                                   GdkModifierType *state)
 907 {
 908   /* FIXME: Is this the right thing to do? */
 909   return TRUE;
 910 }
 911
 912 static void
 913 gdk_win32_keymap_finalize (GObject *object)
 914 {
 915 }
 916
 917 static void
 918 gdk_win32_keymap_class_init (GdkWin32KeymapClass *klass)
 919 {
 920   GObjectClass *object_class = G_OBJECT_CLASS (klass);
 921   GdkKeymapClass *keymap_class = GDK_KEYMAP_CLASS (klass);
 922
 923   object_class->finalize = gdk_win32_keymap_finalize;
 924
 925   keymap_class->get_direction = gdk_win32_keymap_get_direction;
 926   keymap_class->have_bidi_layouts = gdk_win32_keymap_have_bidi_layouts;
 927   keymap_class->get_caps_lock_state = gdk_win32_keymap_get_caps_lock_state;
 928   keymap_class->get_num_lock_state = gdk_win32_keymap_get_num_lock_state;
 929   keymap_class->get_entries_for_keyval = gdk_win32_keymap_get_entries_for_keyval;
 930   keymap_class->get_entries_for_keycode = gdk_win32_keymap_get_entries_for_keycode;
 931   keymap_class->lookup_key = gdk_win32_keymap_lookup_key;
 932   keymap_class->translate_keyboard_state = gdk_win32_keymap_translate_keyboard_state;
 933   keymap_class->add_virtual_modifiers = gdk_win32_keymap_add_virtual_modifiers;
 934   keymap_class->map_virtual_modifiers = gdk_win32_keymap_map_virtual_modifiers;
 935 }