]> Pileus Git - ~andy/gtk/blobdiff - gtk/gtkbindings.c
Update about dialog design to not use a swarm of dialogs
[~andy/gtk] / gtk / gtkbindings.c
index a5af89ea07976b8c411387a25c06844ddbdfb050..6973a6a2bbe2c1dd72073a6cb6519f1b50afff30 100644 (file)
@@ -1,7 +1,7 @@
 /* GTK - The GIMP Toolkit
  * Copyright (C) 1995-1997 Peter Mattis, Spencer Kimball and Josh MacDonald
  *
- * GtkBindingSet: Keybinding manager for GtkObjects.
+ * GtkBindingSet: Keybinding manager for GObjects.
  * Copyright (C) 1998 Tim Janik
  *
  * This library is free software; you can redistribute it and/or
  * GTK+ at ftp://ftp.gtk.org/pub/gtk/. 
  */
 
-#include <ctype.h>
+#include "config.h"
 #include <string.h>
 #include <stdarg.h>
+#include <gdkkeysyms.h>
+
 #include "gtkbindings.h"
-#include "gtksignal.h"
+#include "gtkkeyhash.h"
+#include "gtktypeutils.h"
 #include "gtkwidget.h"
 #include "gtkrc.h"
 
 #define        BINDING_MOD_MASK()      (gtk_accelerator_get_default_mod_mask () | GDK_RELEASE_MASK)
 
 
+/* --- structures --- */
+typedef struct {
+  GtkPathType   type;
+  GPatternSpec *pspec;
+  GSList       *path;
+  gpointer      user_data;
+  guint         seq_id;
+} PatternSpec;
+
+
 /* --- variables --- */
 static GHashTable      *binding_entry_hash_table = NULL;
+static GSList           *binding_key_hashes = NULL;
 static GSList          *binding_set_list = NULL;
-static const gchar     *key_class_binding_set = "gtk-class-binding-set";
+static const gchar      key_class_binding_set[] = "gtk-class-binding-set";
 static GQuark           key_id_class_binding_set = 0;
 
 
 /* --- functions --- */
+static void
+pattern_spec_free (PatternSpec *pspec)
+{
+  _gtk_rc_free_widget_class_path (pspec->path);
+  if (pspec->pspec)
+    g_pattern_spec_free (pspec->pspec);
+  g_free (pspec);
+}
+
 static GtkBindingSignal*
 binding_signal_new (const gchar *signal_name,
                    guint        n_args)
 {
   GtkBindingSignal *signal;
-  
-  signal = g_new (GtkBindingSignal, 1);
+
+  signal = (GtkBindingSignal *) g_slice_alloc0 (sizeof (GtkBindingSignal) + n_args * sizeof (GtkBindingArg));
   signal->next = NULL;
-  signal->signal_name = g_strdup (signal_name);
+  signal->signal_name = (gchar *)g_intern_string (signal_name);
   signal->n_args = n_args;
-  signal->args = g_new0 (GtkBindingArg, n_args);
+  signal->args = (GtkBindingArg *)(signal + 1);
   
   return signal;
 }
@@ -70,12 +93,10 @@ binding_signal_free (GtkBindingSignal *sig)
   
   for (i = 0; i < sig->n_args; i++)
     {
-      if (GTK_FUNDAMENTAL_TYPE (sig->args[i].arg_type) == GTK_TYPE_STRING)
+      if (G_TYPE_FUNDAMENTAL (sig->args[i].arg_type) == G_TYPE_STRING)
        g_free (sig->args[i].d.string_data);
     }
-  g_free (sig->args);
-  g_free (sig->signal_name);
-  g_free (sig);
+  g_slice_free1 (sizeof (GtkBindingSignal) + sig->n_args * sizeof (GtkBindingArg), sig);
 }
 
 static guint
@@ -100,11 +121,81 @@ binding_entries_compare (gconstpointer  a,
   return (ea->keyval == eb->keyval && ea->modifiers == eb->modifiers);
 }
 
+static void
+binding_key_hash_insert_entry (GtkKeyHash      *key_hash,
+                              GtkBindingEntry *entry)
+{
+  guint keyval = entry->keyval;
+  
+  /* We store lowercased accelerators. To deal with this, if <Shift>
+   * was specified, uppercase.
+   */
+  if (entry->modifiers & GDK_SHIFT_MASK)
+    {
+      if (keyval == GDK_KEY_Tab)
+       keyval = GDK_KEY_ISO_Left_Tab;
+      else
+       keyval = gdk_keyval_to_upper (keyval);
+    }
+  
+  _gtk_key_hash_add_entry (key_hash, keyval, entry->modifiers & ~GDK_RELEASE_MASK, entry);
+}
+
+static void
+binding_key_hash_destroy (gpointer data)
+{
+  GtkKeyHash *key_hash = data;
+  
+  binding_key_hashes = g_slist_remove (binding_key_hashes, key_hash);
+  _gtk_key_hash_free (key_hash);
+}
+
+static void
+insert_entries_into_key_hash (gpointer key,
+                             gpointer value,
+                             gpointer data)
+{
+  GtkKeyHash *key_hash = data;
+  GtkBindingEntry *entry = value;
+
+  for (; entry; entry = entry->hash_next)
+    binding_key_hash_insert_entry (key_hash, entry);
+}
+
+static GtkKeyHash *
+binding_key_hash_for_keymap (GdkKeymap *keymap)
+{
+  static GQuark key_hash_quark = 0;
+  GtkKeyHash *key_hash;
+
+  if (!key_hash_quark)
+    key_hash_quark = g_quark_from_static_string ("gtk-binding-key-hash");
+  
+  key_hash = g_object_get_qdata (G_OBJECT (keymap), key_hash_quark);
+
+  if (!key_hash)
+    {
+      key_hash = _gtk_key_hash_new (keymap, NULL);
+      g_object_set_qdata_full (G_OBJECT (keymap), key_hash_quark, key_hash, binding_key_hash_destroy);
+
+      if (binding_entry_hash_table)
+       g_hash_table_foreach (binding_entry_hash_table,
+                             insert_entries_into_key_hash,
+                             key_hash);
+
+      binding_key_hashes = g_slist_prepend (binding_key_hashes, key_hash);
+    }
+
+  return key_hash;
+}
+
+
 static GtkBindingEntry*
-binding_entry_new (GtkBindingSet *binding_set,
-                  guint          keyval,
-                  guint          modifiers)
+binding_entry_new (GtkBindingSet  *binding_set,
+                  guint           keyval,
+                  GdkModifierType modifiers)
 {
+  GSList *tmp_list;
   GtkBindingEntry *entry;
   
   if (!binding_entry_hash_table)
@@ -116,17 +207,22 @@ binding_entry_new (GtkBindingSet *binding_set,
   entry->binding_set = binding_set,
   entry->destroyed = FALSE;
   entry->in_emission = FALSE;
+  entry->marks_unbound = FALSE;
   entry->signals = NULL;
 
   entry->set_next = binding_set->entries;
   binding_set->entries = entry;
 
   entry->hash_next = g_hash_table_lookup (binding_entry_hash_table, entry);
-  g_hash_table_freeze (binding_entry_hash_table);
   if (entry->hash_next)
     g_hash_table_remove (binding_entry_hash_table, entry->hash_next);
   g_hash_table_insert (binding_entry_hash_table, entry, entry);
-  g_hash_table_thaw (binding_entry_hash_table);
+
+  for (tmp_list = binding_key_hashes; tmp_list; tmp_list = tmp_list->next)
+    {
+      GtkKeyHash *key_hash = tmp_list->data;
+      binding_key_hash_insert_entry (key_hash, entry);
+    }
   
   return entry;
 }
@@ -162,6 +258,7 @@ binding_entry_destroy (GtkBindingEntry *entry)
   register GtkBindingEntry *tmp;
   GtkBindingEntry *begin;
   register GtkBindingEntry *last;
+  GSList *tmp_list;
 
   /* unlink from binding set
    */
@@ -205,10 +302,14 @@ binding_entry_destroy (GtkBindingEntry *entry)
     g_hash_table_remove (binding_entry_hash_table, entry);
   else if (begin != o_entry)
     {
-      g_hash_table_freeze (binding_entry_hash_table);
       g_hash_table_remove (binding_entry_hash_table, entry);
       g_hash_table_insert (binding_entry_hash_table, begin, begin);
-      g_hash_table_thaw (binding_entry_hash_table);
+    }
+
+  for (tmp_list = binding_key_hashes; tmp_list; tmp_list = tmp_list->next)
+    {
+      GtkKeyHash *key_hash = tmp_list->data;
+      _gtk_key_hash_remove_entry (key_hash, entry);
     }
 
   entry->destroyed = TRUE;
@@ -218,24 +319,9 @@ binding_entry_destroy (GtkBindingEntry *entry)
 }
 
 static GtkBindingEntry*
-binding_ht_lookup_list (guint keyval,
-                       guint modifiers)
-{
-  GtkBindingEntry lookup_entry = { 0 };
-  
-  if (!binding_entry_hash_table)
-    return NULL;
-  
-  lookup_entry.keyval = keyval;
-  lookup_entry.modifiers = modifiers;
-  
-  return g_hash_table_lookup (binding_entry_hash_table, &lookup_entry);
-}
-
-static GtkBindingEntry*
-binding_ht_lookup_entry (GtkBindingSet *set,
-                        guint          keyval,
-                        guint          modifiers)
+binding_ht_lookup_entry (GtkBindingSet  *set,
+                        guint           keyval,
+                        GdkModifierType modifiers)
 {
   GtkBindingEntry lookup_entry = { 0 };
   GtkBindingEntry *entry;
@@ -255,84 +341,114 @@ binding_ht_lookup_entry (GtkBindingSet *set,
 }
 
 static gboolean
-binding_compose_params (GtkBindingArg  *args,
-                       GtkSignalQuery  *query,
-                       GtkArg          **params_p)
+binding_compose_params (GObject         *object,
+                       GtkBindingArg   *args,
+                       GSignalQuery    *query,
+                       GValue         **params_p)
 {
-  GtkArg *params;
-  const GtkType *types;
+  GValue *params;
+  const GType *types;
   guint i;
   gboolean valid;
   
-  params = g_new0 (GtkArg, query->nparams);
+  params = g_new0 (GValue, query->n_params + 1);
   *params_p = params;
+
+  /* The instance we emit on is the first object in the array
+   */
+  g_value_init (params, G_TYPE_OBJECT);
+  g_value_set_object (params, G_OBJECT (object));
+  params++;
   
-  types = query->params;
+  types = query->param_types;
   valid = TRUE;
-  for (i = 0; i < query->nparams && valid; i++)
+  for (i = 1; i < query->n_params + 1 && valid; i++)
     {
-      GtkType param_ftype;
+      GValue tmp_value = { 0, };
+
+      g_value_init (params, *types);
 
-      params->type = *types;
-      params->name = NULL;
-      param_ftype = GTK_FUNDAMENTAL_TYPE (params->type);
-      switch (GTK_FUNDAMENTAL_TYPE (args->arg_type))
+      switch (G_TYPE_FUNDAMENTAL (args->arg_type))
        {
-       case  GTK_TYPE_DOUBLE:
-         if (param_ftype == GTK_TYPE_FLOAT)
-           GTK_VALUE_FLOAT (*params) = args->d.double_data;
-         else if (param_ftype == GTK_TYPE_DOUBLE)
-           GTK_VALUE_DOUBLE (*params) = args->d.double_data;
-         else
-           valid = FALSE;
+       case G_TYPE_DOUBLE:
+         g_value_init (&tmp_value, G_TYPE_DOUBLE);
+         g_value_set_double (&tmp_value, args->d.double_data);
          break;
-       case  GTK_TYPE_LONG:
-         if (param_ftype == GTK_TYPE_BOOL &&
-             (args->d.long_data == 0 ||
-              args->d.long_data == 1))
-           GTK_VALUE_BOOL (*params) = args->d.long_data;
-         else if (param_ftype == GTK_TYPE_INT ||
-                  param_ftype == GTK_TYPE_ENUM)
-           GTK_VALUE_INT (*params) = args->d.long_data;
-         else if ((param_ftype == GTK_TYPE_UINT ||
-                   param_ftype == GTK_TYPE_FLAGS) &&
-                  args->d.long_data >= 0)
-           GTK_VALUE_UINT (*params) = args->d.long_data;
-         else if (param_ftype == GTK_TYPE_LONG)
-           GTK_VALUE_LONG (*params) = args->d.long_data;
-         else if (param_ftype == GTK_TYPE_ULONG &&
-                  args->d.long_data >= 0)
-           GTK_VALUE_ULONG (*params) = args->d.long_data;
-         else if (param_ftype == GTK_TYPE_FLOAT)
-           GTK_VALUE_FLOAT (*params) = args->d.long_data;
-         else if (param_ftype == GTK_TYPE_DOUBLE)
-           GTK_VALUE_DOUBLE (*params) = args->d.long_data;
-         else
-           valid = FALSE;
+       case G_TYPE_LONG:
+         g_value_init (&tmp_value, G_TYPE_LONG);
+         g_value_set_long (&tmp_value, args->d.long_data);
          break;
-       case  GTK_TYPE_STRING:
-         if (args->arg_type == GTK_TYPE_STRING &&
-             param_ftype == GTK_TYPE_STRING)
-           GTK_VALUE_STRING (*params) = args->d.string_data;
-         else if (args->arg_type == GTK_TYPE_IDENTIFIER &&
-                  (param_ftype == GTK_TYPE_ENUM ||
-                   param_ftype == GTK_TYPE_FLAGS))
+       case G_TYPE_STRING:
+         /* gtk_rc_parse_flags/enum() has fancier parsing for this; we can't call
+          * that since we don't have a GParamSpec, so just do something simple
+          */
+         if (G_TYPE_FUNDAMENTAL (*types) == G_TYPE_ENUM)
            {
-             GtkEnumValue *value;
+             GEnumClass *class = G_ENUM_CLASS (g_type_class_ref (*types));
+             
+             valid = FALSE;
+             
+             if (args->arg_type == GTK_TYPE_IDENTIFIER)
+               {
+                 GEnumValue *enum_value = NULL;
+                 enum_value = g_enum_get_value_by_name (class, args->d.string_data);
+                 if (!enum_value)
+                   enum_value = g_enum_get_value_by_nick (class, args->d.string_data);
+                 if (enum_value)
+                   {
+                     g_value_init (&tmp_value, *types);
+                     g_value_set_enum (&tmp_value, enum_value->value);
+                     valid = TRUE;
+                   }
+               }
+
+             g_type_class_unref (class);
+           }
+         /* This is just a hack for compatibility with GTK+-1.2 where a string
+          * could be used for a single flag value / without the support for multiple
+          * values in gtk_rc_parse_flags(), this isn't very useful.
+          */
+         else if (G_TYPE_FUNDAMENTAL (*types) == G_TYPE_FLAGS)
+           {
+             GFlagsClass *class = G_FLAGS_CLASS (g_type_class_ref (*types));
+             
+             valid = FALSE;
+             
+             if (args->arg_type == GTK_TYPE_IDENTIFIER)
+               {
+                 GFlagsValue *flags_value = NULL;
+                 flags_value = g_flags_get_value_by_name (class, args->d.string_data);
+                 if (!flags_value)
+                   flags_value = g_flags_get_value_by_nick (class, args->d.string_data);
+                 if (flags_value)
+                   {
+                     g_value_init (&tmp_value, *types);
+                     g_value_set_flags (&tmp_value, flags_value->value);
+                     valid = TRUE;
+                   }
+               }
 
-             value = gtk_type_enum_find_value (params->type, args->d.string_data);
-             if (value)
-               GTK_VALUE_ENUM (*params) = value->value;
-             else
-               valid = FALSE;
+             g_type_class_unref (class);
            }
          else
-           valid = FALSE;
+           {
+             g_value_init (&tmp_value, G_TYPE_STRING);
+             g_value_set_static_string (&tmp_value, args->d.string_data);
+           }
          break;
        default:
          valid = FALSE;
          break;
        }
+
+      if (valid)
+       {
+         if (!g_value_transform (&tmp_value, params))
+           valid = FALSE;
+
+         g_value_unset (&tmp_value);
+       }
+      
       types++;
       params++;
       args++;
@@ -340,6 +456,11 @@ binding_compose_params (GtkBindingArg      *args,
   
   if (!valid)
     {
+      guint j;
+
+      for (j = 0; j < i; j++)
+       g_value_unset (&(*params_p)[j]);
+      
       g_free (*params_p);
       *params_p = NULL;
     }
@@ -347,26 +468,29 @@ binding_compose_params (GtkBindingArg     *args,
   return valid;
 }
 
-static void
-gtk_binding_entry_activate (GtkBindingEntry    *entry,
-                           GtkObject   *object)
+static gboolean
+gtk_binding_entry_activate (GtkBindingEntry *entry,
+                           GObject         *object)
 {
   GtkBindingSignal *sig;
   gboolean old_emission;
+  gboolean handled = FALSE;
+  gint i;
   
   old_emission = entry->in_emission;
   entry->in_emission = TRUE;
   
-  gtk_object_ref (object);
+  g_object_ref (object);
   
   for (sig = entry->signals; sig; sig = sig->next)
     {
-      GtkSignalQuery *query;
+      GSignalQuery query;
       guint signal_id;
-      GtkArg *params = NULL;
+      GValue *params = NULL;
+      GValue return_val = { 0, };
       gchar *accelerator = NULL;
       
-      signal_id = gtk_signal_lookup (sig->signal_name, GTK_OBJECT_TYPE (object));
+      signal_id = g_signal_lookup (sig->signal_name, G_OBJECT_TYPE (object));
       if (!signal_id)
        {
          accelerator = gtk_accelerator_name (entry->keyval, entry->modifiers);
@@ -375,15 +499,15 @@ gtk_binding_entry_activate (GtkBindingEntry       *entry,
                     entry->binding_set->set_name,
                     accelerator,
                     sig->signal_name,
-                    gtk_type_name (GTK_OBJECT_TYPE (object)));
+                    g_type_name (G_OBJECT_TYPE (object)));
          g_free (accelerator);
          continue;
        }
       
-      query = gtk_signal_query (signal_id);
-      if (query->nparams != sig->n_args ||
-         query->return_val != GTK_TYPE_NONE ||
-         !binding_compose_params (sig->args, query, &params))
+      g_signal_query (signal_id, &query);
+      if (query.n_params != sig->n_args ||
+         (query.return_type != G_TYPE_NONE && query.return_type != G_TYPE_BOOLEAN) || 
+         !binding_compose_params (object, sig->args, &query, &params))
        {
          accelerator = gtk_accelerator_name (entry->keyval, entry->modifiers);
          g_warning ("gtk_binding_entry_activate(): binding \"%s::%s\": "
@@ -391,9 +515,9 @@ gtk_binding_entry_activate (GtkBindingEntry *entry,
                     entry->binding_set->set_name,
                     accelerator,
                     sig->signal_name,
-                    gtk_type_name (GTK_OBJECT_TYPE (object)));
+                    g_type_name (G_OBJECT_TYPE (object)));
        }
-      else if (!(query->signal_flags & GTK_RUN_ACTION))
+      else if (!(query.signal_flags & G_SIGNAL_ACTION))
        {
          accelerator = gtk_accelerator_name (entry->keyval, entry->modifiers);
          g_warning ("gtk_binding_entry_activate(): binding \"%s::%s\": "
@@ -401,54 +525,90 @@ gtk_binding_entry_activate (GtkBindingEntry       *entry,
                     entry->binding_set->set_name,
                     accelerator,
                     sig->signal_name,
-                    gtk_type_name (GTK_OBJECT_TYPE (object)));
+                    g_type_name (G_OBJECT_TYPE (object)));
        }
       g_free (accelerator);
-      g_free (query);
       if (accelerator)
        continue;
 
-      gtk_signal_emitv (object, signal_id, params);
+      if (query.return_type == G_TYPE_BOOLEAN)
+       g_value_init (&return_val, G_TYPE_BOOLEAN);
+      
+      g_signal_emitv (params, signal_id, 0, &return_val);
+
+      if (query.return_type == G_TYPE_BOOLEAN)
+       {
+         if (g_value_get_boolean (&return_val))
+           handled = TRUE;
+         g_value_unset (&return_val);
+       }
+      else
+       handled = TRUE;
+      
+      for (i = 0; i < query.n_params + 1; i++)
+       g_value_unset (&params[i]);
       g_free (params);
       
-      if (GTK_OBJECT_DESTROYED (object) || entry->destroyed)
+      if (entry->destroyed)
        break;
     }
   
-  gtk_object_unref (object);
+  g_object_unref (object);
 
   entry->in_emission = old_emission;
   if (entry->destroyed && !entry->in_emission)
     binding_entry_free (entry);
+
+  return handled;
 }
 
+/**
+ * gtk_binding_set_new:
+ * @set_name: unique name of this binding set
+ *
+ * GTK+ maintains a global list of binding sets. Each binding set has
+ * a unique name which needs to be specified upon creation.
+ *
+ * Return value: new binding set
+ */
 GtkBindingSet*
-gtk_binding_set_new (const gchar    *set_name)
+gtk_binding_set_new (const gchar *set_name)
 {
   GtkBindingSet *binding_set;
   
   g_return_val_if_fail (set_name != NULL, NULL);
   
   binding_set = g_new (GtkBindingSet, 1);
-  binding_set->set_name = g_strdup (set_name);
+  binding_set->set_name = (gchar *) g_intern_string (set_name);
   binding_set->widget_path_pspecs = NULL;
   binding_set->widget_class_pspecs = NULL;
   binding_set->class_branch_pspecs = NULL;
   binding_set->entries = NULL;
   binding_set->current = NULL;
+  binding_set->parsed = FALSE;
   
   binding_set_list = g_slist_prepend (binding_set_list, binding_set);
   
   return binding_set;
 }
 
+/**
+ * gtk_binding_set_by_class:
+ * @object_class: a valid #GObject class
+ *
+ * This function returns the binding set named after the type name of
+ * the passed in class structure. New binding sets are created on
+ * demand by this function.
+ *
+ * Return value: the binding set corresponding to @object_class
+ */
 GtkBindingSet*
 gtk_binding_set_by_class (gpointer object_class)
 {
-  GtkObjectClass *class = object_class;
+  GObjectClass *class = object_class;
   GtkBindingSet* binding_set;
 
-  g_return_val_if_fail (GTK_IS_OBJECT_CLASS (class), NULL);
+  g_return_val_if_fail (G_IS_OBJECT_CLASS (class), NULL);
 
   if (!key_id_class_binding_set)
     key_id_class_binding_set = g_quark_from_static_string (key_class_binding_set);
@@ -458,18 +618,28 @@ gtk_binding_set_by_class (gpointer object_class)
   if (binding_set)
     return binding_set;
 
-  binding_set = gtk_binding_set_new (gtk_type_name (GTK_CLASS_TYPE (class)));
+  binding_set = gtk_binding_set_new (g_type_name (G_OBJECT_CLASS_TYPE (class)));
   gtk_binding_set_add_path (binding_set,
                            GTK_PATH_CLASS,
-                           gtk_type_name (GTK_CLASS_TYPE (class)),
+                           g_type_name (G_OBJECT_CLASS_TYPE (class)),
                            GTK_PATH_PRIO_GTK);
   g_dataset_id_set_data (class, key_id_class_binding_set, binding_set);
 
   return binding_set;
 }
 
+/**
+ * gtk_binding_set_find:
+ * @set_name: unique binding set name
+ *
+ * Find a binding set by its globally unique name. The @set_name can
+ * either be a name used for gtk_binding_set_new() or the type name of
+ * a class used in gtk_binding_set_by_class().
+ *
+ * Return value: %NULL or the specified binding set
+ */
 GtkBindingSet*
-gtk_binding_set_find (const gchar    *set_name)
+gtk_binding_set_find (const gchar *set_name)
 {
   GSList *slist;
   
@@ -486,58 +656,101 @@ gtk_binding_set_find (const gchar    *set_name)
   return NULL;
 }
 
+/**
+ * gtk_binding_set_activate:
+ * @binding_set: a #GtkBindingSet set to activate
+ * @keyval:      key value of the binding
+ * @modifiers:   key modifier of the binding
+ * @object:      object to activate when binding found
+ *
+ * Find a key binding matching @keyval and @modifiers within
+ * @binding_set and activate the binding on @object.
+ *
+ * Return value: %TRUE if a binding was found and activated
+ */
 gboolean
 gtk_binding_set_activate (GtkBindingSet         *binding_set,
                          guint           keyval,
-                         guint           modifiers,
-                         GtkObject      *object)
+                         GdkModifierType modifiers,
+                         GObject        *object)
 {
   GtkBindingEntry *entry;
   
   g_return_val_if_fail (binding_set != NULL, FALSE);
-  g_return_val_if_fail (object != NULL, FALSE);
-  g_return_val_if_fail (GTK_IS_OBJECT (object), FALSE);
+  g_return_val_if_fail (G_IS_OBJECT (object), FALSE);
   
   keyval = gdk_keyval_to_lower (keyval);
   modifiers = modifiers & BINDING_MOD_MASK ();
   
-  if (!GTK_OBJECT_DESTROYED (object))
-    {
-      entry = binding_ht_lookup_entry (binding_set, keyval, modifiers);
-      if (entry)
-       {
-         gtk_binding_entry_activate (entry, object);
-         
-         return TRUE;
-       }
-    }
+  entry = binding_ht_lookup_entry (binding_set, keyval, modifiers);
+  if (entry)
+    return gtk_binding_entry_activate (entry, object);
   
   return FALSE;
 }
 
+static void
+gtk_binding_entry_clear_internal (GtkBindingSet  *binding_set,
+                                  guint           keyval,
+                                  GdkModifierType modifiers)
+{
+  GtkBindingEntry *entry;
+
+  keyval = gdk_keyval_to_lower (keyval);
+  modifiers = modifiers & BINDING_MOD_MASK ();
+
+  entry = binding_ht_lookup_entry (binding_set, keyval, modifiers);
+  if (entry)
+    binding_entry_destroy (entry);
+
+  entry = binding_entry_new (binding_set, keyval, modifiers);
+}
+
+/**
+ * gtk_binding_entry_skip:
+ * @binding_set: a #GtkBindingSet to skip an entry of
+ * @keyval:      key value of binding to skip
+ * @modifiers:   key modifier of binding to skip
+ *
+ * Install a binding on @binding_set which causes key lookups
+ * to be aborted, to prevent bindings from lower priority sets
+ * to be activated.
+ *
+ * Since: 2.12
+ */
 void
-gtk_binding_entry_clear (GtkBindingSet *binding_set,
-                        guint           keyval,
-                        guint           modifiers)
+gtk_binding_entry_skip (GtkBindingSet  *binding_set,
+                        guint           keyval,
+                        GdkModifierType modifiers)
 {
   GtkBindingEntry *entry;
-  
+
   g_return_if_fail (binding_set != NULL);
-  
+
   keyval = gdk_keyval_to_lower (keyval);
   modifiers = modifiers & BINDING_MOD_MASK ();
-  
+
   entry = binding_ht_lookup_entry (binding_set, keyval, modifiers);
   if (entry)
     binding_entry_destroy (entry);
 
   entry = binding_entry_new (binding_set, keyval, modifiers);
+  entry->marks_unbound = TRUE;
 }
 
+/**
+ * gtk_binding_entry_remove:
+ * @binding_set: a #GtkBindingSet to remove an entry of
+ * @keyval:      key value of binding to remove
+ * @modifiers:   key modifier of binding to remove
+ *
+ * Remove a binding previously installed via
+ * gtk_binding_entry_add_signal() on @binding_set.
+ */
 void
 gtk_binding_entry_remove (GtkBindingSet         *binding_set,
                          guint           keyval,
-                         guint           modifiers)
+                         GdkModifierType modifiers)
 {
   GtkBindingEntry *entry;
   
@@ -551,12 +764,36 @@ gtk_binding_entry_remove (GtkBindingSet    *binding_set,
     binding_entry_destroy (entry);
 }
 
+/**
+ * gtk_binding_entry_add_signall:
+ * @binding_set:  a #GtkBindingSet to add a signal to
+ * @keyval:       key value
+ * @modifiers:    key modifier
+ * @signal_name:  signal name to be bound
+ * @binding_args: (transfer none) (element-type GtkBindingArg):
+ *     list of #GtkBindingArg signal arguments
+ *
+ * Override or install a new key binding for @keyval with @modifiers on
+ * @binding_set.
+ */
 void
 gtk_binding_entry_add_signall (GtkBindingSet  *binding_set,
-                              guint           keyval,
-                              guint           modifiers,
-                              const gchar    *signal_name,
-                              GSList         *binding_args)
+                               guint          keyval,
+                               GdkModifierType modifiers,
+                               const gchar    *signal_name,
+                               GSList        *binding_args)
+{
+  _gtk_binding_entry_add_signall (binding_set,
+                                  keyval, modifiers,
+                                  signal_name, binding_args);
+}
+
+void
+_gtk_binding_entry_add_signall (GtkBindingSet  *binding_set,
+                                guint         keyval,
+                                GdkModifierType modifiers,
+                                const gchar    *signal_name,
+                                GSList       *binding_args)
 {
   GtkBindingEntry *entry;
   GtkBindingSignal *signal, **signal_p;
@@ -584,19 +821,19 @@ gtk_binding_entry_add_signall (GtkBindingSet  *binding_set,
          binding_signal_free (signal);
          return;
        }
-      switch (GTK_FUNDAMENTAL_TYPE (tmp_arg->arg_type))
+      switch (G_TYPE_FUNDAMENTAL (tmp_arg->arg_type))
        {
-       case  GTK_TYPE_LONG:
-         arg->arg_type = GTK_TYPE_LONG;
+       case  G_TYPE_LONG:
+         arg->arg_type = G_TYPE_LONG;
          arg->d.long_data = tmp_arg->d.long_data;
          break;
-       case  GTK_TYPE_DOUBLE:
-         arg->arg_type = GTK_TYPE_DOUBLE;
+       case  G_TYPE_DOUBLE:
+         arg->arg_type = G_TYPE_DOUBLE;
          arg->d.double_data = tmp_arg->d.double_data;
          break;
-       case  GTK_TYPE_STRING:
+       case  G_TYPE_STRING:
           if (tmp_arg->arg_type != GTK_TYPE_IDENTIFIER)
-           arg->arg_type = GTK_TYPE_STRING;
+           arg->arg_type = G_TYPE_STRING;
          else
            arg->arg_type = GTK_TYPE_IDENTIFIER;
          arg->d.string_data = g_strdup (tmp_arg->d.string_data);
@@ -609,7 +846,7 @@ gtk_binding_entry_add_signall (GtkBindingSet  *binding_set,
          break;
        default:
          g_warning ("gtk_binding_entry_add_signall(): unsupported type `%s' for arg[%u]",
-                    gtk_type_name (arg->arg_type), n);
+                    g_type_name (arg->arg_type), n);
          binding_signal_free (signal);
          return;
        }
@@ -620,7 +857,7 @@ gtk_binding_entry_add_signall (GtkBindingSet  *binding_set,
   entry = binding_ht_lookup_entry (binding_set, keyval, modifiers);
   if (!entry)
     {
-      gtk_binding_entry_add (binding_set, keyval, modifiers);
+      gtk_binding_entry_clear_internal (binding_set, keyval, modifiers);
       entry = binding_ht_lookup_entry (binding_set, keyval, modifiers);
     }
   signal_p = &entry->signals;
@@ -629,10 +866,24 @@ gtk_binding_entry_add_signall (GtkBindingSet  *binding_set,
   *signal_p = signal;
 }
 
+/**
+ * gtk_binding_entry_add_signal:
+ * @binding_set: a #GtkBindingSet to install an entry for
+ * @keyval:      key value of binding to install
+ * @modifiers:   key modifier of binding to install
+ * @signal_name: signal to execute upon activation
+ * @n_args:      number of arguments to @signal_name
+ * @Varargs:     arguments to @signal_name
+ *
+ * Override or install a new key binding for @keyval with @modifiers on
+ * @binding_set. When the binding is activated, @signal_name will be
+ * emitted on the target widget, with @n_args @Varargs used as
+ * arguments.
+ */
 void
 gtk_binding_entry_add_signal (GtkBindingSet  *binding_set,
                              guint           keyval,
-                             guint           modifiers,
+                             GdkModifierType modifiers,
                              const gchar    *signal_name,
                              guint           n_args,
                              ...)
@@ -644,59 +895,53 @@ gtk_binding_entry_add_signal (GtkBindingSet  *binding_set,
   g_return_if_fail (binding_set != NULL);
   g_return_if_fail (signal_name != NULL);
   
-  keyval = gdk_keyval_to_lower (keyval);
-  modifiers = modifiers & BINDING_MOD_MASK ();
-
   va_start (args, n_args);
   slist = NULL;
   for (i = 0; i < n_args; i++)
     {
       GtkBindingArg *arg;
 
-      arg = g_new0 (GtkBindingArg, 1);
+      arg = g_slice_new0 (GtkBindingArg);
       slist = g_slist_prepend (slist, arg);
 
-      arg->arg_type = va_arg (args, GtkType);
-      switch (GTK_FUNDAMENTAL_TYPE (arg->arg_type))
+      arg->arg_type = va_arg (args, GType);
+      switch (G_TYPE_FUNDAMENTAL (arg->arg_type))
        {
-         /* for elaborated commenting about var args collection, take a look
-          * at gtk_arg_collect_value() in gtkargcollector.c
-          */
-       case GTK_TYPE_CHAR:
-       case GTK_TYPE_UCHAR:
-       case GTK_TYPE_INT:
-       case GTK_TYPE_UINT:
-       case GTK_TYPE_BOOL:
-       case GTK_TYPE_ENUM:
-       case GTK_TYPE_FLAGS:
-         arg->arg_type = GTK_TYPE_LONG;
+       case G_TYPE_CHAR:
+       case G_TYPE_UCHAR:
+       case G_TYPE_INT:
+       case G_TYPE_UINT:
+       case G_TYPE_BOOLEAN:
+       case G_TYPE_ENUM:
+       case G_TYPE_FLAGS:
+         arg->arg_type = G_TYPE_LONG;
          arg->d.long_data = va_arg (args, gint);
          break;
-       case GTK_TYPE_LONG:
-       case GTK_TYPE_ULONG:
-         arg->arg_type = GTK_TYPE_LONG;
+       case G_TYPE_LONG:
+       case G_TYPE_ULONG:
+         arg->arg_type = G_TYPE_LONG;
          arg->d.long_data = va_arg (args, glong);
          break;
-       case GTK_TYPE_FLOAT:
-       case GTK_TYPE_DOUBLE:
-         arg->arg_type = GTK_TYPE_DOUBLE;
+       case G_TYPE_FLOAT:
+       case G_TYPE_DOUBLE:
+         arg->arg_type = G_TYPE_DOUBLE;
          arg->d.double_data = va_arg (args, gdouble);
          break;
-       case GTK_TYPE_STRING:
+       case G_TYPE_STRING:
          if (arg->arg_type != GTK_TYPE_IDENTIFIER)
-           arg->arg_type = GTK_TYPE_STRING;
+           arg->arg_type = G_TYPE_STRING;
          arg->d.string_data = va_arg (args, gchar*);
          if (!arg->d.string_data)
            {
              g_warning ("gtk_binding_entry_add_signal(): type `%s' arg[%u] is `NULL'",
-                        gtk_type_name (arg->arg_type),
+                        g_type_name (arg->arg_type),
                         i);
              i += n_args + 1;
            }
          break;
        default:
          g_warning ("gtk_binding_entry_add_signal(): unsupported type `%s' for arg[%u]",
-                    gtk_type_name (arg->arg_type), i);
+                    g_type_name (arg->arg_type), i);
          i += n_args + 1;
          break;
        }
@@ -706,30 +951,41 @@ gtk_binding_entry_add_signal (GtkBindingSet  *binding_set,
   if (i == n_args || i == 0)
     {
       slist = g_slist_reverse (slist);
-      gtk_binding_entry_add_signall (binding_set, keyval, modifiers, signal_name, slist);
+      _gtk_binding_entry_add_signall (binding_set, keyval, modifiers, signal_name, slist);
     }
 
   free_slist = slist;
   while (slist)
     {
-      g_free (slist->data);
+      g_slice_free (GtkBindingArg, slist->data);
       slist = slist->next;
     }
   g_slist_free (free_slist);
 }
 
+/**
+ * gtk_binding_set_add_path:
+ * @binding_set:  a #GtkBindingSet to add a path to
+ * @path_type:    path type the pattern applies to
+ * @path_pattern: the actual match pattern
+ * @priority:     binding priority
+ *
+ * This function is used internally by the GtkRC parsing mechanism to
+ * assign match patterns to #GtkBindingSet structures.
+ */
 void
 gtk_binding_set_add_path (GtkBindingSet             *binding_set,
                          GtkPathType         path_type,
                          const gchar        *path_pattern,
                          GtkPathPriorityType priority)
 {
-  GtkPatternSpec *pspec;
+  PatternSpec *pspec;
   GSList **slist_p, *slist;
   static guint seq_id = 0;
   
   g_return_if_fail (binding_set != NULL);
   g_return_if_fail (path_pattern != NULL);
+  g_return_if_fail (priority <= GTK_PATH_PRIO_MASK);
 
   priority &= GTK_PATH_PRIO_MASK;
   
@@ -750,57 +1006,93 @@ gtk_binding_set_add_path (GtkBindingSet       *binding_set,
       break;
     }
   
-  pspec = g_new (GtkPatternSpec, 1);
-  gtk_pattern_spec_init (pspec, path_pattern);
-  pspec->seq_id = seq_id++ & 0x0fffffff;
-  pspec->seq_id |= priority << 28;
+  pspec = g_new (PatternSpec, 1);
+  pspec->type = path_type;
+  if (path_type == GTK_PATH_WIDGET_CLASS)
+    {
+      pspec->pspec = NULL;
+      pspec->path = _gtk_rc_parse_widget_class_path (path_pattern);
+    }
+  else
+    {
+      pspec->pspec = g_pattern_spec_new (path_pattern);
+      pspec->path = NULL;
+    }
+    
+  pspec->seq_id = priority << 28;
   pspec->user_data = binding_set;
   
   slist = *slist_p;
   while (slist)
     {
-      GtkPatternSpec *tmp_pspec;
+      PatternSpec *tmp_pspec;
       
       tmp_pspec = slist->data;
       slist = slist->next;
       
-      if (tmp_pspec->pattern_length == pspec->pattern_length &&
-         g_str_equal (tmp_pspec->pattern_reversed, pspec->pattern_reversed))
+      if (g_pattern_spec_equal (tmp_pspec->pspec, pspec->pspec))
        {
-         gtk_pattern_spec_free_segs (pspec);
-         g_free (pspec);
+         GtkPathPriorityType lprio = tmp_pspec->seq_id >> 28;
+
+         pattern_spec_free (pspec);
          pspec = NULL;
+         if (lprio < priority)
+           {
+             tmp_pspec->seq_id &= 0x0fffffff;
+             tmp_pspec->seq_id |= priority << 28;
+           }
          break;
        }
     }
   if (pspec)
-    *slist_p = g_slist_prepend (*slist_p, pspec);
+    {
+      pspec->seq_id |= seq_id++ & 0x0fffffff;
+      *slist_p = g_slist_prepend (*slist_p, pspec);
+    }
 }
 
-static inline gboolean
+static gboolean
 binding_match_activate (GSList          *pspec_list,
-                       GtkObject       *object,
+                       GObject         *object,
                        guint            path_length,
-                       gchar           *path,
-                       gchar           *path_reversed)
+                       gchar           *path,
+                       gchar           *path_reversed,
+                        gboolean        *unbound)
 {
   GSList *slist;
 
+  *unbound = FALSE;
+
   for (slist = pspec_list; slist; slist = slist->next)
     {
-      GtkPatternSpec *pspec;
+      PatternSpec *pspec;
+      GtkBindingSet *binding_set;
 
+      binding_set = NULL;
       pspec = slist->data;
-      if (gtk_pattern_match (pspec, path_length, path, path_reversed))
-       {
-         GtkBindingSet *binding_set;
-
-         binding_set = pspec->user_data;
-
-         gtk_binding_entry_activate (binding_set->current, object);
-
-         return TRUE;
-       }
+      
+      if (pspec->type == GTK_PATH_WIDGET_CLASS)
+        {
+          if (_gtk_rc_match_widget_class (pspec->path, path_length, path, path_reversed))
+           binding_set = pspec->user_data;
+        }
+      else
+        {
+          if (g_pattern_match (pspec->pspec, path_length, path, path_reversed))
+           binding_set = pspec->user_data;
+        }
+
+      if (binding_set)
+        {
+          if (binding_set->current->marks_unbound)
+            {
+              *unbound = TRUE;
+              return FALSE;
+            }
+
+          if (gtk_binding_entry_activate (binding_set->current, object))
+            return TRUE;
+        }
     }
 
   return FALSE;
@@ -810,8 +1102,8 @@ static gint
 gtk_binding_pattern_compare (gconstpointer new_pattern,
                             gconstpointer existing_pattern)
 {
-  register const GtkPatternSpec *np  = new_pattern;
-  register const GtkPatternSpec *ep  = existing_pattern;
+  register const PatternSpec *np  = new_pattern;
+  register const PatternSpec *ep  = existing_pattern;
 
   /* walk the list as long as the existing patterns have
    * higher priorities.
@@ -820,20 +1112,38 @@ gtk_binding_pattern_compare (gconstpointer new_pattern,
   return np->seq_id < ep->seq_id;
 }
 
-static inline GSList*
-gtk_binding_entries_sort_patterns (GtkBindingEntry    *entries,
-                                  GtkPathType         path_id)
+static GSList*
+gtk_binding_entries_sort_patterns (GSList      *entries,
+                                  GtkPathType  path_id,
+                                  gboolean     is_release)
 {
   GSList *patterns;
+  GSList *tmp_list;
 
   patterns = NULL;
-  while (entries)
+  for (tmp_list = entries; tmp_list; tmp_list = tmp_list->next)
     {
-      register GtkBindingSet *binding_set;
+      GtkBindingEntry *entry = tmp_list->data;
+      GtkBindingSet *binding_set;
+
+      binding_set = entry->binding_set;
+      binding_set->current = NULL;
+    }
+  
+  for (; entries; entries = entries->next)
+    {
+      GtkBindingEntry *entry = entries->data;
+      GtkBindingSet *binding_set;
       GSList *slist = NULL;
 
-      binding_set = entries->binding_set;
-      binding_set->current = entries;
+      if (is_release != ((entry->modifiers & GDK_RELEASE_MASK) != 0))
+       continue;
+
+      binding_set = entry->binding_set;
+
+      if (binding_set->current)
+       continue;
+      binding_set->current = entry;
 
       switch (path_id)
        {
@@ -850,41 +1160,24 @@ gtk_binding_entries_sort_patterns (GtkBindingEntry    *entries,
 
       for (; slist; slist = slist->next)
        {
-         GtkPatternSpec *pspec;
+         PatternSpec *pspec;
 
          pspec = slist->data;
          patterns = g_slist_insert_sorted (patterns, pspec, gtk_binding_pattern_compare);
        }
-
-      entries = entries->hash_next;
     }
 
   return patterns;
 }
-      
 
-gboolean
-gtk_bindings_activate (GtkObject      *object,
-                      guint           keyval,
-                      guint           modifiers)
+static gboolean
+gtk_bindings_activate_list (GObject   *object,
+                           GSList    *entries,
+                           gboolean   is_release)
 {
-  GtkBindingEntry *entries;
-  GtkWidget *widget;
+  GtkWidget *widget = GTK_WIDGET (object);
   gboolean handled = FALSE;
 
-  g_return_val_if_fail (object != NULL, FALSE);
-  g_return_val_if_fail (GTK_IS_OBJECT (object), FALSE);
-
-  if (!GTK_IS_WIDGET (object) || GTK_OBJECT_DESTROYED (object))
-    return FALSE;
-
-  widget = GTK_WIDGET (object);
-
-  keyval = gdk_keyval_to_lower (keyval);
-  modifiers = modifiers & BINDING_MOD_MASK ();
-
-  entries = binding_ht_lookup_list (keyval, modifiers);
-
   if (!entries)
     return FALSE;
 
@@ -893,13 +1186,17 @@ gtk_bindings_activate (GtkObject      *object,
       guint path_length;
       gchar *path, *path_reversed;
       GSList *patterns;
+      gboolean unbound;
 
       gtk_widget_path (widget, &path_length, &path, &path_reversed);
-      patterns = gtk_binding_entries_sort_patterns (entries, GTK_PATH_WIDGET);
-      handled = binding_match_activate (patterns, object, path_length, path, path_reversed);
+      patterns = gtk_binding_entries_sort_patterns (entries, GTK_PATH_WIDGET, is_release);
+      handled = binding_match_activate (patterns, object, path_length, path, path_reversed, &unbound);
       g_slist_free (patterns);
       g_free (path);
       g_free (path_reversed);
+
+      if (unbound)
+        return FALSE;
     }
 
   if (!handled)
@@ -907,296 +1204,141 @@ gtk_bindings_activate (GtkObject      *object,
       guint path_length;
       gchar *path, *path_reversed;
       GSList *patterns;
+      gboolean unbound;
 
       gtk_widget_class_path (widget, &path_length, &path, &path_reversed);
-      patterns = gtk_binding_entries_sort_patterns (entries, GTK_PATH_WIDGET_CLASS);
-      handled = binding_match_activate (patterns, object, path_length, path, path_reversed);
+      patterns = gtk_binding_entries_sort_patterns (entries, GTK_PATH_WIDGET_CLASS, is_release);
+      handled = binding_match_activate (patterns, object, path_length, path, path_reversed, &unbound);
       g_slist_free (patterns);
       g_free (path);
       g_free (path_reversed);
+
+      if (unbound)
+        return FALSE;
     }
 
   if (!handled)
     {
       GSList *patterns;
-      GtkType class_type;
-      
-      patterns = gtk_binding_entries_sort_patterns (entries, GTK_PATH_CLASS);
-      class_type = GTK_OBJECT_TYPE (object);
+      GType class_type;
+      gboolean unbound = FALSE;
+
+      patterns = gtk_binding_entries_sort_patterns (entries, GTK_PATH_CLASS, is_release);
+      class_type = G_TYPE_FROM_INSTANCE (object);
       while (class_type && !handled)
        {
          guint path_length;
-         gchar *path, *path_reversed;
-         
-         path = gtk_type_name (class_type);
+         gchar *path;
+         gchar *path_reversed;
+
+         path = g_strdup (g_type_name (class_type));
          path_reversed = g_strdup (path);
          g_strreverse (path_reversed);
          path_length = strlen (path);
-         handled = binding_match_activate (patterns, object, path_length, path, path_reversed);
+         handled = binding_match_activate (patterns, object, path_length, path, path_reversed, &unbound);
+         g_free (path);
          g_free (path_reversed);
 
-         class_type = gtk_type_parent (class_type);
+          if (unbound)
+            break;
+
+         class_type = g_type_parent (class_type);
        }
       g_slist_free (patterns);
+
+      if (unbound)
+        return FALSE;
     }
 
   return handled;
 }
 
+/**
+ * gtk_bindings_activate:
+ * @object: object to activate when binding found
+ * @keyval: key value of the binding
+ * @modifiers: key modifier of the binding
+ *
+ * Find a key binding matching @keyval and @modifiers and activate the
+ * binding on @object.
+ *
+ * Return value: %TRUE if a binding was found and activated
+ */
+gboolean
+gtk_bindings_activate (GObject         *object,
+                      guint            keyval,
+                      GdkModifierType  modifiers)
+{
+  GSList *entries = NULL;
+  GdkDisplay *display;
+  GtkKeyHash *key_hash;
+  gboolean handled = FALSE;
+  gboolean is_release;
 
+  if (!GTK_IS_WIDGET (object))
+    return FALSE;
 
+  is_release = (modifiers & GDK_RELEASE_MASK) != 0;
+  modifiers = modifiers & BINDING_MOD_MASK () & ~GDK_RELEASE_MASK;
 
+  display = gtk_widget_get_display (GTK_WIDGET (object));
+  key_hash = binding_key_hash_for_keymap (gdk_keymap_get_for_display (display));
+  
+  entries = _gtk_key_hash_lookup_keyval (key_hash, keyval, modifiers);
 
+  handled = gtk_bindings_activate_list (object, entries, is_release);
 
+  g_slist_free (entries);
 
-
-
-
-/* Patterns
- */
-
-static inline gboolean
-gtk_pattern_ph_match (const gchar   *match_pattern,
-                     const gchar   *match_string)
-{
-  register const gchar *pattern, *string;
-  register gchar ch;
-  
-  pattern = match_pattern;
-  string = match_string;
-  
-  ch = *pattern;
-  pattern++;
-  while (ch)
-    {
-      switch (ch)
-       {
-       case  '?':
-         if (!*string)
-           return FALSE;
-         string++;
-         break;
-         
-       case  '*':
-         do
-           {
-             ch = *pattern;
-             pattern++;
-             if (ch == '?')
-               {
-                 if (!*string)
-                   return FALSE;
-                 string++;
-               }
-           }
-         while (ch == '*' || ch == '?');
-         if (!ch)
-           return TRUE;
-         do
-           {
-             while (ch != *string)
-               {
-                 if (!*string)
-                   return FALSE;
-                 string++;
-               }
-             string++;
-             if (gtk_pattern_ph_match (pattern, string))
-               return TRUE;
-           }
-         while (*string);
-         break;
-         
-       default:
-         if (ch == *string)
-           string++;
-         else
-           return FALSE;
-         break;
-       }
-      
-      ch = *pattern;
-      pattern++;
-    }
-  
-  return *string == 0;
+  return handled;
 }
 
+/**
+ * gtk_bindings_activate_event:
+ * @object: a #GObject (generally must be a widget)
+ * @event: a #GdkEventKey
+ * 
+ * Looks up key bindings for @object to find one matching
+ * @event, and if one was found, activate it.
+ * 
+ * Return value: %TRUE if a matching key binding was found
+ *
+ * Since: 2.4
+ */
 gboolean
-gtk_pattern_match (GtkPatternSpec      *pspec,
-                  guint                 string_length,
-                  const gchar          *string,
-                  const gchar          *string_reversed)
+gtk_bindings_activate_event (GObject     *object,
+                             GdkEventKey *event)
 {
-  g_return_val_if_fail (pspec != NULL, FALSE);
-  g_return_val_if_fail (string != NULL, FALSE);
-  g_return_val_if_fail (string_reversed != NULL, FALSE);
-  
-  switch (pspec->match_type)
-    {
-    case  GTK_MATCH_ALL:
-      return gtk_pattern_ph_match (pspec->pattern, string);
-      
-    case  GTK_MATCH_ALL_TAIL:
-      return gtk_pattern_ph_match (pspec->pattern_reversed, string_reversed);
-      
-    case  GTK_MATCH_HEAD:
-      if (pspec->pattern_length > string_length)
-       return FALSE;
-      else if (pspec->pattern_length == string_length)
-       return strcmp (pspec->pattern, string) == 0;
-      else if (pspec->pattern_length)
-       return strncmp (pspec->pattern, string, pspec->pattern_length) == 0;
-      else
-       return TRUE;
-      
-    case  GTK_MATCH_TAIL:
-      if (pspec->pattern_length > string_length)
-       return FALSE;
-      else if (pspec->pattern_length == string_length)
-       return strcmp (pspec->pattern_reversed, string_reversed) == 0;
-      else if (pspec->pattern_length)
-       return strncmp (pspec->pattern_reversed,
-                       string_reversed,
-                       pspec->pattern_length) == 0;
-      else
-       return TRUE;
-      
-    case  GTK_MATCH_EXACT:
-      if (pspec->pattern_length != string_length)
-       return FALSE;
-      else
-       return strcmp (pspec->pattern_reversed, string_reversed) == 0;
-      
-    default:
-      g_return_val_if_fail (pspec->match_type < GTK_MATCH_LAST, FALSE);
-      return FALSE;
-    }
-}
+  GSList *entries = NULL;
+  GdkDisplay *display;
+  GtkKeyHash *key_hash;
+  gboolean handled = FALSE;
 
-void
-gtk_pattern_spec_init (GtkPatternSpec        *pspec,
-                      const gchar            *pattern)
-{
-  gchar *p;
-  
-  g_return_if_fail (pspec != NULL);
-  
-  pspec->match_type = GTK_MATCH_ALL;
-  pspec->seq_id = 0;
-  pspec->user_data = NULL;
-  
-  if (!pattern)
-    pattern = "";
-  
-  pspec->pattern = g_strdup (pattern);
-  pspec->pattern_length = strlen (pspec->pattern);
-  pspec->pattern_reversed = g_strdup (pspec->pattern);
-  g_strreverse (pspec->pattern_reversed);
-  if (pspec->pattern_reversed[0] != '*')
-    pspec->match_type = GTK_MATCH_ALL_TAIL;
-  
-  if (strchr (pspec->pattern, '?'))
-    return;
-  
-  if (!strchr (pspec->pattern, '*'))
-    {
-      pspec->match_type = GTK_MATCH_EXACT;
-      return;
-    }
-  
-  p = pspec->pattern;
-  while (*p == '*')
-    p++;
-  if (p > pspec->pattern &&
-      !strchr (p, '*'))
-    {
-      gchar *t;
-      
-      pspec->match_type = GTK_MATCH_TAIL;
-      t = pspec->pattern;
-      pspec->pattern = g_strdup (p);
-      g_free (t);
-      g_free (pspec->pattern_reversed);
-      pspec->pattern_reversed = g_strdup (pspec->pattern);
-      g_strreverse (pspec->pattern_reversed);
-      pspec->pattern_length = strlen (pspec->pattern);
-      return;
-    }
-  
-  p = pspec->pattern_reversed;
-  while (*p == '*')
-    p++;
-  if (p > pspec->pattern_reversed &&
-      !strchr (p, '*'))
-    {
-      gchar *t;
-      
-      pspec->match_type = GTK_MATCH_HEAD;
-      t = pspec->pattern_reversed;
-      pspec->pattern_reversed = g_strdup (p);
-      g_free (t);
-      g_free (pspec->pattern);
-      pspec->pattern = g_strdup (pspec->pattern_reversed);
-      g_strreverse (pspec->pattern);
-      pspec->pattern_length = strlen (pspec->pattern);
-    }
-}
+  if (!GTK_IS_WIDGET (object))
+    return FALSE;
 
-gboolean
-gtk_pattern_match_string (GtkPatternSpec       *pspec,
-                         const gchar           *string)
-{
-  gchar *string_reversed;
-  guint length;
-  gboolean ergo;
-  
-  g_return_val_if_fail (pspec != NULL, FALSE);
-  g_return_val_if_fail (string != NULL, FALSE);
-  
-  length = strlen (string);
-  string_reversed = g_strdup (string);
-  g_strreverse (string_reversed);
-  
-  ergo = gtk_pattern_match (pspec, length, string, string_reversed);
-  g_free (string_reversed);
-  
-  return ergo;
-}
+  display = gtk_widget_get_display (GTK_WIDGET (object));
+  key_hash = binding_key_hash_for_keymap (gdk_keymap_get_for_display (display));
 
-gboolean
-gtk_pattern_match_simple (const gchar          *pattern,
-                         const gchar           *string)
-{
-  GtkPatternSpec pspec;
-  gboolean ergo;
-  
-  g_return_val_if_fail (pattern != NULL, FALSE);
-  g_return_val_if_fail (string != NULL, FALSE);
-  
-  gtk_pattern_spec_init (&pspec, pattern);
-  ergo = gtk_pattern_match_string (&pspec, string);
-  gtk_pattern_spec_free_segs (&pspec);
+  entries = _gtk_key_hash_lookup (key_hash,
+                                 event->hardware_keycode,
+                                 event->state,
+                                 BINDING_MOD_MASK () & ~GDK_RELEASE_MASK,
+                                 event->group);
   
-  return ergo;
-}
+  handled = gtk_bindings_activate_list (object, entries,
+                                       event->type == GDK_KEY_RELEASE);
 
-void
-gtk_pattern_spec_free_segs (GtkPatternSpec     *pspec)
-{
-  g_return_if_fail (pspec != NULL);
-  
-  g_free (pspec->pattern);
-  pspec->pattern = NULL;
-  g_free (pspec->pattern_reversed);
-  pspec->pattern_reversed = NULL;
+  g_slist_free (entries);
+
+  return handled;
 }
 
 static guint
 gtk_binding_parse_signal (GScanner       *scanner,
                          GtkBindingSet  *binding_set,
                          guint           keyval,
-                         guint           modifiers)
+                         GdkModifierType modifiers)
 {
   gchar *signal;
   guint expected_token = 0;
@@ -1206,6 +1348,7 @@ gtk_binding_parse_signal (GScanner       *scanner,
   gboolean negate;
   gboolean need_arg;
   gboolean seen_comma;
+  guint token;
 
   g_return_val_if_fail (scanner != NULL, G_TOKEN_ERROR);
   
@@ -1233,8 +1376,9 @@ gtk_binding_parse_signal (GScanner       *scanner,
        expected_token = G_TOKEN_INT;
       else
        expected_token = ')';
-      g_scanner_get_next_token (scanner);
-      switch (scanner->token)
+
+      token = g_scanner_get_next_token (scanner);
+      switch (token)
        {
          GtkBindingArg *arg;
 
@@ -1243,7 +1387,7 @@ gtk_binding_parse_signal (GScanner       *scanner,
            {
              need_arg = FALSE;
              arg = g_new (GtkBindingArg, 1);
-             arg->arg_type = GTK_TYPE_DOUBLE;
+             arg->arg_type = G_TYPE_DOUBLE;
              arg->d.double_data = scanner->value.v_float;
              if (negate)
                {
@@ -1260,7 +1404,7 @@ gtk_binding_parse_signal (GScanner       *scanner,
            {
              need_arg = FALSE;
              arg = g_new (GtkBindingArg, 1);
-             arg->arg_type = GTK_TYPE_LONG;
+             arg->arg_type = G_TYPE_LONG;
              arg->d.long_data = scanner->value.v_int;
              if (negate)
                {
@@ -1277,7 +1421,7 @@ gtk_binding_parse_signal (GScanner       *scanner,
            {
              need_arg = FALSE;
              arg = g_new (GtkBindingArg, 1);
-             arg->arg_type = GTK_TYPE_STRING;
+             arg->arg_type = G_TYPE_STRING;
              arg->d.string_data = g_strdup (scanner->value.v_string);
              args = g_slist_prepend (args, arg);
            }
@@ -1318,11 +1462,11 @@ gtk_binding_parse_signal (GScanner       *scanner,
          if (!(need_arg && seen_comma) && !negate)
            {
              args = g_slist_reverse (args);
-             gtk_binding_entry_add_signall (binding_set,
-                                            keyval,
-                                            modifiers,
-                                            signal,
-                                            args);
+             _gtk_binding_entry_add_signall (binding_set,
+                                              keyval,
+                                              modifiers,
+                                              signal,
+                                              args);
              expected_token = G_TOKEN_NONE;
            }
          done = TRUE;
@@ -1340,7 +1484,7 @@ gtk_binding_parse_signal (GScanner       *scanner,
       GtkBindingArg *arg;
 
       arg = slist->data;
-      if (GTK_FUNDAMENTAL_TYPE (arg->arg_type) == GTK_TYPE_STRING)
+      if (G_TYPE_FUNDAMENTAL (arg->arg_type) == G_TYPE_STRING)
        g_free (arg->d.string_data);
       g_free (arg);
     }
@@ -1355,13 +1499,17 @@ gtk_binding_parse_bind (GScanner       *scanner,
                        GtkBindingSet  *binding_set)
 {
   guint keyval = 0;
-  guint modifiers = 0;
+  GdkModifierType modifiers = 0;
+  gboolean unbind = FALSE;
+  guint token;
 
   g_return_val_if_fail (scanner != NULL, G_TOKEN_ERROR);
-  
-  g_scanner_get_next_token (scanner);
-  if (scanner->token != GTK_RC_TOKEN_BIND)
+
+  token = g_scanner_get_next_token (scanner);
+  if (token != GTK_RC_TOKEN_BIND &&
+      token != GTK_RC_TOKEN_UNBIND)
     return GTK_RC_TOKEN_BIND;
+  unbind = token == GTK_RC_TOKEN_UNBIND;
   g_scanner_get_next_token (scanner);
   if (scanner->token != G_TOKEN_STRING)
     return G_TOKEN_STRING;
@@ -1370,12 +1518,19 @@ gtk_binding_parse_bind (GScanner       *scanner,
   if (keyval == 0)
     return G_TOKEN_STRING;
 
+  if (unbind)
+    {
+      gtk_binding_entry_skip (binding_set, keyval, modifiers);
+      return G_TOKEN_NONE;
+    }
+
   g_scanner_get_next_token (scanner);
+
   if (scanner->token != '{')
     return '{';
 
-  gtk_binding_entry_clear (binding_set, keyval, modifiers);
-  
+  gtk_binding_entry_clear_internal (binding_set, keyval, modifiers);
+
   g_scanner_peek_next_token (scanner);
   while (scanner->next_token != '}')
     {
@@ -1403,15 +1558,16 @@ gtk_binding_parse_bind (GScanner       *scanner,
 }
 
 guint
-gtk_binding_parse_binding (GScanner       *scanner)
+_gtk_binding_parse_binding (GScanner *scanner)
 {
-  gchar *name;
   GtkBindingSet *binding_set;
+  gchar *name;
+  guint token;
 
   g_return_val_if_fail (scanner != NULL, G_TOKEN_ERROR);
 
-  g_scanner_get_next_token (scanner);
-  if (scanner->token != GTK_RC_TOKEN_BINDING)
+  token = g_scanner_get_next_token (scanner);
+  if (token != GTK_RC_TOKEN_BINDING)
     return GTK_RC_TOKEN_BINDING;
   g_scanner_get_next_token (scanner);
   if (scanner->token != G_TOKEN_STRING)
@@ -1427,17 +1583,22 @@ gtk_binding_parse_binding (GScanner       *scanner)
 
   binding_set = gtk_binding_set_find (name);
   if (!binding_set)
-    binding_set = gtk_binding_set_new (name);
+    {
+      binding_set = gtk_binding_set_new (name);
+      binding_set->parsed = 1;
+    }
   g_free (name);
 
   g_scanner_peek_next_token (scanner);
   while (scanner->next_token != '}')
     {
-      switch (scanner->next_token)
+      guint next_token = scanner->next_token;
+      switch (next_token)
        {
          guint expected_token;
 
        case GTK_RC_TOKEN_BIND:
+       case GTK_RC_TOKEN_UNBIND:
          expected_token = gtk_binding_parse_bind (scanner, binding_set);
          if (expected_token != G_TOKEN_NONE)
            return expected_token;
@@ -1453,3 +1614,67 @@ gtk_binding_parse_binding (GScanner       *scanner)
   return G_TOKEN_NONE;
 }
 
+static void
+free_pattern_specs (GSList *pattern_specs)
+{
+  GSList *slist;
+
+  for (slist = pattern_specs; slist; slist = slist->next)
+    {
+      PatternSpec *pspec;
+
+      pspec = slist->data;
+
+      pattern_spec_free (pspec);
+    }
+
+  g_slist_free (pattern_specs);
+}
+
+static void
+binding_set_delete (GtkBindingSet *binding_set)
+{
+  GtkBindingEntry *entry, *next;
+
+  entry = binding_set->entries;
+  while (entry)
+    {
+      next = entry->set_next;
+      binding_entry_destroy (entry);
+      entry = next;
+    }
+  
+  free_pattern_specs (binding_set->widget_path_pspecs);
+  free_pattern_specs (binding_set->widget_class_pspecs);
+  free_pattern_specs (binding_set->class_branch_pspecs);
+
+  g_free (binding_set);
+}
+
+/**
+ * _gtk_binding_reset_parsed:
+ * 
+ * Remove all binding sets that were added by gtk_binding_parse_binding().
+ */
+void
+_gtk_binding_reset_parsed (void)
+{
+  GSList *slist, *next;
+  
+  slist = binding_set_list;
+  while (slist)
+    {
+      GtkBindingSet *binding_set;
+
+      binding_set = slist->data;
+      next = slist->next;
+
+      if (binding_set->parsed)
+       {
+         binding_set_list = g_slist_delete_link (binding_set_list, slist);
+         binding_set_delete (binding_set);
+       }
+
+      slist = next;
+    }
+}