forked from AuroraMiddleware/gtk
13d69e552d
It turns out that my attempt at handling Super, Hyper and Meta better is causing problems, mostly because Alt and Meta are commonly colocated in the modmap, and apps do a check for the Alt modifier regularly. See e.g bug 607697.
560 lines
15 KiB
C
560 lines
15 KiB
C
/* gtkkeyhash.c: Keymap aware matching of key bindings
|
|
*
|
|
* GTK - The GIMP Toolkit
|
|
* Copyright (C) 2002, Red Hat Inc.
|
|
*
|
|
* This library is free software; you can redistribute it and/or
|
|
* modify it under the terms of the GNU Lesser General Public
|
|
* License as published by the Free Software Foundation; either
|
|
* version 2 of the License, or (at your option) any later version.
|
|
*
|
|
* This library is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
* Lesser General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU Lesser General Public
|
|
* License along with this library; if not, write to the
|
|
* Free Software Foundation, Inc., 59 Temple Place - Suite 330,
|
|
* Boston, MA 02111-1307, USA.
|
|
*/
|
|
#include "config.h"
|
|
#include "gtkdebug.h"
|
|
#include "gtkkeyhash.h"
|
|
#include "gtkalias.h"
|
|
|
|
typedef struct _GtkKeyHashEntry GtkKeyHashEntry;
|
|
|
|
struct _GtkKeyHashEntry
|
|
{
|
|
guint keyval;
|
|
GdkModifierType modifiers;
|
|
gpointer value;
|
|
|
|
/* Set as a side effect of generating key_hash->keycode_hash
|
|
*/
|
|
GdkKeymapKey *keys;
|
|
gint n_keys;
|
|
};
|
|
|
|
struct _GtkKeyHash
|
|
{
|
|
GdkKeymap *keymap;
|
|
GHashTable *keycode_hash;
|
|
GHashTable *reverse_hash;
|
|
GList *entries_list;
|
|
GDestroyNotify destroy_notify;
|
|
};
|
|
|
|
static void
|
|
key_hash_clear_keycode (gpointer key,
|
|
gpointer value,
|
|
gpointer data)
|
|
{
|
|
GSList *keys = value;
|
|
g_slist_free (keys);
|
|
}
|
|
|
|
static void
|
|
key_hash_insert_entry (GtkKeyHash *key_hash,
|
|
GtkKeyHashEntry *entry)
|
|
{
|
|
gint i;
|
|
|
|
g_free (entry->keys);
|
|
gdk_keymap_get_entries_for_keyval (key_hash->keymap,
|
|
entry->keyval,
|
|
&entry->keys, &entry->n_keys);
|
|
|
|
for (i = 0; i < entry->n_keys; i++)
|
|
{
|
|
GSList *old_keys = g_hash_table_lookup (key_hash->keycode_hash,
|
|
GUINT_TO_POINTER (entry->keys[i].keycode));
|
|
old_keys = g_slist_prepend (old_keys, entry);
|
|
g_hash_table_insert (key_hash->keycode_hash,
|
|
GUINT_TO_POINTER (entry->keys[i].keycode),
|
|
old_keys);
|
|
}
|
|
}
|
|
|
|
static GHashTable *
|
|
key_hash_get_keycode_hash (GtkKeyHash *key_hash)
|
|
{
|
|
if (!key_hash->keycode_hash)
|
|
{
|
|
GList *tmp_list;
|
|
|
|
key_hash->keycode_hash = g_hash_table_new (g_direct_hash, NULL);
|
|
|
|
/* Preserve the original insertion order
|
|
*/
|
|
for (tmp_list = g_list_last (key_hash->entries_list);
|
|
tmp_list;
|
|
tmp_list = tmp_list->prev)
|
|
key_hash_insert_entry (key_hash, tmp_list->data);
|
|
}
|
|
|
|
return key_hash->keycode_hash;
|
|
}
|
|
|
|
static void
|
|
key_hash_keys_changed (GdkKeymap *keymap,
|
|
GtkKeyHash *key_hash)
|
|
{
|
|
/* The keymap changed, so we have to regenerate the keycode hash
|
|
*/
|
|
if (key_hash->keycode_hash)
|
|
{
|
|
g_hash_table_foreach (key_hash->keycode_hash, key_hash_clear_keycode, NULL);
|
|
g_hash_table_destroy (key_hash->keycode_hash);
|
|
key_hash->keycode_hash = NULL;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* _gtk_key_hash_new:
|
|
* @keymap: a #GdkKeymap
|
|
* @item_destroy_notify: function to be called when items are removed
|
|
* from the hash or %NULL.
|
|
*
|
|
* Create a new key hash object for doing binding resolution.
|
|
*
|
|
* Return value: the newly created object. Free with _gtk_key_hash_free().
|
|
**/
|
|
GtkKeyHash *
|
|
_gtk_key_hash_new (GdkKeymap *keymap,
|
|
GDestroyNotify item_destroy_notify)
|
|
{
|
|
GtkKeyHash *key_hash = g_new (GtkKeyHash, 1);
|
|
|
|
key_hash->keymap = keymap;
|
|
g_signal_connect (keymap, "keys-changed",
|
|
G_CALLBACK (key_hash_keys_changed), key_hash);
|
|
|
|
key_hash->entries_list = NULL;
|
|
key_hash->keycode_hash = NULL;
|
|
key_hash->reverse_hash = g_hash_table_new (g_direct_hash, NULL);
|
|
key_hash->destroy_notify = item_destroy_notify;
|
|
|
|
return key_hash;
|
|
}
|
|
|
|
static void
|
|
key_hash_free_entry (GtkKeyHash *key_hash,
|
|
GtkKeyHashEntry *entry)
|
|
{
|
|
if (key_hash->destroy_notify)
|
|
(*key_hash->destroy_notify) (entry->value);
|
|
|
|
g_free (entry->keys);
|
|
g_slice_free (GtkKeyHashEntry, entry);
|
|
}
|
|
|
|
static void
|
|
key_hash_free_entry_foreach (gpointer value,
|
|
gpointer data)
|
|
{
|
|
GtkKeyHashEntry *entry = value;
|
|
GtkKeyHash *key_hash = data;
|
|
|
|
key_hash_free_entry (key_hash, entry);
|
|
}
|
|
|
|
/**
|
|
* gtk_key_hash_free:
|
|
* @key_hash: a #GtkKeyHash
|
|
*
|
|
* Destroys a key hash created with gtk_key_hash_new()
|
|
**/
|
|
void
|
|
_gtk_key_hash_free (GtkKeyHash *key_hash)
|
|
{
|
|
g_signal_handlers_disconnect_by_func (key_hash->keymap,
|
|
key_hash_keys_changed,
|
|
key_hash);
|
|
|
|
if (key_hash->keycode_hash)
|
|
{
|
|
g_hash_table_foreach (key_hash->keycode_hash, key_hash_clear_keycode, NULL);
|
|
g_hash_table_destroy (key_hash->keycode_hash);
|
|
}
|
|
|
|
g_hash_table_destroy (key_hash->reverse_hash);
|
|
|
|
g_list_foreach (key_hash->entries_list, key_hash_free_entry_foreach, key_hash);
|
|
g_list_free (key_hash->entries_list);
|
|
|
|
g_free (key_hash);
|
|
}
|
|
|
|
/**
|
|
* _gtk_key_hash_add_entry:
|
|
* @key_hash: a #GtkKeyHash
|
|
* @keyval: key symbol for this binding
|
|
* @modifiers: modifiers for this binding
|
|
* @value: value to insert in the key hash
|
|
*
|
|
* Inserts a pair of key symbol and modifier mask into the key hash.
|
|
**/
|
|
void
|
|
_gtk_key_hash_add_entry (GtkKeyHash *key_hash,
|
|
guint keyval,
|
|
GdkModifierType modifiers,
|
|
gpointer value)
|
|
{
|
|
GtkKeyHashEntry *entry = g_slice_new (GtkKeyHashEntry);
|
|
|
|
entry->value = value;
|
|
entry->keyval = keyval;
|
|
entry->modifiers = modifiers;
|
|
entry->keys = NULL;
|
|
|
|
key_hash->entries_list = g_list_prepend (key_hash->entries_list, entry);
|
|
g_hash_table_insert (key_hash->reverse_hash, value, key_hash->entries_list);
|
|
|
|
if (key_hash->keycode_hash)
|
|
key_hash_insert_entry (key_hash, entry);
|
|
}
|
|
|
|
/**
|
|
* _gtk_key_hash_remove_entry:
|
|
* @key_hash: a #GtkKeyHash
|
|
* @value: value previously added with _gtk_key_hash_add_entry()
|
|
*
|
|
* Removes a value previously added to the key hash with
|
|
* _gtk_key_hash_add_entry().
|
|
**/
|
|
void
|
|
_gtk_key_hash_remove_entry (GtkKeyHash *key_hash,
|
|
gpointer value)
|
|
{
|
|
GList *entry_node = g_hash_table_lookup (key_hash->reverse_hash, value);
|
|
|
|
if (entry_node)
|
|
{
|
|
GtkKeyHashEntry *entry = entry_node->data;
|
|
|
|
if (key_hash->keycode_hash)
|
|
{
|
|
gint i;
|
|
|
|
for (i = 0; i < entry->n_keys; i++)
|
|
{
|
|
GSList *old_keys = g_hash_table_lookup (key_hash->keycode_hash,
|
|
GUINT_TO_POINTER (entry->keys[i].keycode));
|
|
|
|
GSList *new_keys = g_slist_remove (old_keys, entry);
|
|
if (new_keys != old_keys)
|
|
{
|
|
if (new_keys)
|
|
g_hash_table_insert (key_hash->keycode_hash,
|
|
GUINT_TO_POINTER (entry->keys[i].keycode),
|
|
new_keys);
|
|
else
|
|
g_hash_table_remove (key_hash->keycode_hash,
|
|
GUINT_TO_POINTER (entry->keys[i].keycode));
|
|
}
|
|
}
|
|
}
|
|
|
|
g_hash_table_remove (key_hash->reverse_hash, entry_node);
|
|
key_hash->entries_list = g_list_delete_link (key_hash->entries_list, entry_node);
|
|
|
|
key_hash_free_entry (key_hash, entry);
|
|
}
|
|
}
|
|
|
|
static gint
|
|
lookup_result_compare (gconstpointer a,
|
|
gconstpointer b)
|
|
{
|
|
const GtkKeyHashEntry *entry_a = a;
|
|
const GtkKeyHashEntry *entry_b = b;
|
|
guint modifiers;
|
|
|
|
gint n_bits_a = 0;
|
|
gint n_bits_b = 0;
|
|
|
|
modifiers = entry_a->modifiers;
|
|
while (modifiers)
|
|
{
|
|
if (modifiers & 1)
|
|
n_bits_a++;
|
|
modifiers >>= 1;
|
|
}
|
|
|
|
modifiers = entry_b->modifiers;
|
|
while (modifiers)
|
|
{
|
|
if (modifiers & 1)
|
|
n_bits_b++;
|
|
modifiers >>= 1;
|
|
}
|
|
|
|
return n_bits_a < n_bits_b ? -1 : (n_bits_a == n_bits_b ? 0 : 1);
|
|
|
|
}
|
|
|
|
/* Sort a list of results so that matches with less modifiers come
|
|
* before matches with more modifiers
|
|
*/
|
|
static GSList *
|
|
sort_lookup_results (GSList *slist)
|
|
{
|
|
return g_slist_sort (slist, lookup_result_compare);
|
|
}
|
|
|
|
static gint
|
|
lookup_result_compare_by_keyval (gconstpointer a,
|
|
gconstpointer b)
|
|
{
|
|
const GtkKeyHashEntry *entry_a = a;
|
|
const GtkKeyHashEntry *entry_b = b;
|
|
|
|
if (entry_a->keyval < entry_b->keyval)
|
|
return -1;
|
|
else if (entry_a->keyval > entry_b->keyval)
|
|
return 1;
|
|
else
|
|
return 0;
|
|
}
|
|
|
|
static GSList *
|
|
sort_lookup_results_by_keyval (GSList *slist)
|
|
{
|
|
return g_slist_sort (slist, lookup_result_compare_by_keyval);
|
|
}
|
|
|
|
/* Return true if keyval is defined in keyboard group
|
|
*/
|
|
static gboolean
|
|
keyval_in_group (GdkKeymap *keymap,
|
|
guint keyval,
|
|
gint group)
|
|
{
|
|
GtkKeyHashEntry entry;
|
|
gint i;
|
|
|
|
gdk_keymap_get_entries_for_keyval (keymap,
|
|
keyval,
|
|
&entry.keys, &entry.n_keys);
|
|
|
|
for (i = 0; i < entry.n_keys; i++)
|
|
{
|
|
if (entry.keys[i].group == group)
|
|
{
|
|
g_free (entry.keys);
|
|
return TRUE;
|
|
}
|
|
}
|
|
|
|
g_free (entry.keys);
|
|
return FALSE;
|
|
}
|
|
|
|
/**
|
|
* _gtk_key_hash_lookup:
|
|
* @key_hash: a #GtkKeyHash
|
|
* @hardware_keycode: hardware keycode field from a #GdkEventKey
|
|
* @state: state field from a #GdkEventKey
|
|
* @mask: mask of modifiers to consider when matching against the
|
|
* modifiers in entries.
|
|
* @group: group field from a #GdkEventKey
|
|
*
|
|
* Looks up the best matching entry or entries in the hash table for
|
|
* a given event. The results are sorted so that entries with less
|
|
* modifiers come before entries with more modifiers.
|
|
*
|
|
* The matches returned by this function can be exact (i.e. keycode, level
|
|
* and group all match) or fuzzy (i.e. keycode and level match, but group
|
|
* does not). As long there are any exact matches, only exact matches
|
|
* are returned. If there are no exact matches, fuzzy matches will be
|
|
* returned, as long as they are not shadowing a possible exact match.
|
|
* This means that fuzzy matches won't be considered if their keyval is
|
|
* present in the current group.
|
|
*
|
|
* Return value: A #GSList of matching entries.
|
|
**/
|
|
GSList *
|
|
_gtk_key_hash_lookup (GtkKeyHash *key_hash,
|
|
guint16 hardware_keycode,
|
|
GdkModifierType state,
|
|
GdkModifierType mask,
|
|
gint group)
|
|
{
|
|
GHashTable *keycode_hash = key_hash_get_keycode_hash (key_hash);
|
|
GSList *keys = g_hash_table_lookup (keycode_hash, GUINT_TO_POINTER ((guint)hardware_keycode));
|
|
GSList *results = NULL;
|
|
GSList *l;
|
|
gboolean have_exact = FALSE;
|
|
guint keyval;
|
|
gint effective_group;
|
|
gint level;
|
|
GdkModifierType modifiers;
|
|
GdkModifierType consumed_modifiers;
|
|
const GdkModifierType xmods = GDK_MOD2_MASK|GDK_MOD3_MASK|GDK_MOD4_MASK|GDK_MOD5_MASK;
|
|
const GdkModifierType vmods = GDK_SUPER_MASK|GDK_HYPER_MASK|GDK_META_MASK;
|
|
|
|
/* We don't want Caps_Lock to affect keybinding lookups.
|
|
*/
|
|
state &= ~GDK_LOCK_MASK;
|
|
|
|
gdk_keymap_map_virtual_modifiers (key_hash->keymap, &mask);
|
|
|
|
gdk_keymap_translate_keyboard_state (key_hash->keymap,
|
|
hardware_keycode, state, group,
|
|
&keyval, &effective_group, &level, &consumed_modifiers);
|
|
gdk_keymap_add_virtual_modifiers (key_hash->keymap, &state);
|
|
|
|
GTK_NOTE (KEYBINDINGS,
|
|
g_message ("Looking up keycode = %u, modifiers = 0x%04x,\n"
|
|
" keyval = %u, group = %d, level = %d, consumed_modifiers = 0x%04x",
|
|
hardware_keycode, state, keyval, effective_group, level, consumed_modifiers));
|
|
|
|
if (keys)
|
|
{
|
|
GSList *tmp_list = keys;
|
|
while (tmp_list)
|
|
{
|
|
GtkKeyHashEntry *entry = tmp_list->data;
|
|
|
|
/* If the virtual Super, Hyper or Meta modifiers are present,
|
|
* they will also be mapped to some of the Mod2 - Mod5 modifiers,
|
|
* so we compare them twice, ignoring either set.
|
|
* We accept combinations involving virtual modifiers only if they
|
|
* are mapped to separate modifiers; i.e. if Super and Hyper are
|
|
* both mapped to Mod4, then pressing a key that is mapped to Mod4
|
|
* will not match a Super+Hyper entry.
|
|
*/
|
|
modifiers = entry->modifiers;
|
|
if (gdk_keymap_map_virtual_modifiers (key_hash->keymap, &modifiers) &&
|
|
((modifiers & ~consumed_modifiers & mask & ~vmods) == (state & ~consumed_modifiers & mask & ~vmods) ||
|
|
(modifiers & ~consumed_modifiers & mask & ~xmods) == (state & ~consumed_modifiers & mask & ~xmods)))
|
|
{
|
|
gint i;
|
|
|
|
if (keyval == entry->keyval) /* Exact match */
|
|
{
|
|
GTK_NOTE (KEYBINDINGS,
|
|
g_message (" found exact match, keyval = %u, modifiers = 0x%04x",
|
|
entry->keyval, entry->modifiers));
|
|
|
|
if (!have_exact)
|
|
{
|
|
g_slist_free (results);
|
|
results = NULL;
|
|
}
|
|
|
|
have_exact = TRUE;
|
|
results = g_slist_prepend (results, entry);
|
|
}
|
|
|
|
if (!have_exact)
|
|
{
|
|
for (i = 0; i < entry->n_keys; i++)
|
|
{
|
|
if (entry->keys[i].keycode == hardware_keycode &&
|
|
entry->keys[i].level == level) /* Match for all but group */
|
|
{
|
|
GTK_NOTE (KEYBINDINGS,
|
|
g_message (" found group = %d, level = %d",
|
|
entry->keys[i].group, entry->keys[i].level));
|
|
results = g_slist_prepend (results, entry);
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
tmp_list = tmp_list->next;
|
|
}
|
|
}
|
|
|
|
if (!have_exact && results)
|
|
{
|
|
/* If there are fuzzy matches, check that the current group doesn't also
|
|
* define these keyvals; if yes, discard results because a widget up in
|
|
* the stack may have an exact match and we don't want to 'steal' it.
|
|
*/
|
|
guint oldkeyval = 0;
|
|
GtkKeyHashEntry *keyhashentry;
|
|
|
|
results = sort_lookup_results_by_keyval (results);
|
|
for (l = results; l; l = l->next)
|
|
{
|
|
keyhashentry = l->data;
|
|
if (l == results || oldkeyval != keyhashentry->keyval)
|
|
{
|
|
oldkeyval = keyhashentry->keyval;
|
|
if (keyval_in_group (key_hash->keymap, oldkeyval, group))
|
|
{
|
|
g_slist_free (results);
|
|
return NULL;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
results = sort_lookup_results (results);
|
|
for (l = results; l; l = l->next)
|
|
l->data = ((GtkKeyHashEntry *)l->data)->value;
|
|
|
|
return results;
|
|
}
|
|
|
|
/**
|
|
* _gtk_key_hash_lookup_keyval:
|
|
* @key_hash: a #GtkKeyHash
|
|
* @event: a #GtkEvent
|
|
*
|
|
* Looks up the best matching entry or entries in the hash table for a
|
|
* given keyval/modifiers pair. It's better to use
|
|
* _gtk_key_hash_lookup() if you have the original #GdkEventKey
|
|
* available. The results are sorted so that entries with less
|
|
* modifiers come before entries with more modifiers.
|
|
*
|
|
* Return value: A #GSList of all matching entries.
|
|
**/
|
|
GSList *
|
|
_gtk_key_hash_lookup_keyval (GtkKeyHash *key_hash,
|
|
guint keyval,
|
|
GdkModifierType modifiers)
|
|
{
|
|
GdkKeymapKey *keys;
|
|
gint n_keys;
|
|
GSList *results = NULL;
|
|
GSList *l;
|
|
|
|
if (!keyval) /* Key without symbol */
|
|
return NULL;
|
|
|
|
/* Find some random keycode for this keyval
|
|
*/
|
|
gdk_keymap_get_entries_for_keyval (key_hash->keymap, keyval,
|
|
&keys, &n_keys);
|
|
|
|
if (n_keys)
|
|
{
|
|
GHashTable *keycode_hash = key_hash_get_keycode_hash (key_hash);
|
|
GSList *entries = g_hash_table_lookup (keycode_hash, GUINT_TO_POINTER (keys[0].keycode));
|
|
|
|
while (entries)
|
|
{
|
|
GtkKeyHashEntry *entry = entries->data;
|
|
|
|
if (entry->keyval == keyval && entry->modifiers == modifiers)
|
|
results = g_slist_prepend (results, entry);
|
|
|
|
entries = entries->next;
|
|
}
|
|
}
|
|
|
|
g_free (keys);
|
|
|
|
results = sort_lookup_results (results);
|
|
for (l = results; l; l = l->next)
|
|
l->data = ((GtkKeyHashEntry *)l->data)->value;
|
|
|
|
return results;
|
|
}
|