]> Pileus Git - ~andy/gtk/blobdiff - gtk/gtksignal.c
Fix some problems with vertical alignment.
[~andy/gtk] / gtk / gtksignal.c
index b3488f8f6b273de168761a911e16a77f0779410e..292315e3d3a17cdc7312e3e9454d599db593c5e3 100644 (file)
  * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  * Boston, MA 02111-1307, USA.
  */
+
+/*
+ * Modified by the GTK+ Team and others 1997-1999.  See the AUTHORS
+ * file for a list of people on the GTK+ Team.  See the ChangeLog
+ * files for a list of changes.  These files are distributed with
+ * GTK+ at ftp://ftp.gtk.org/pub/gtk/. 
+ */
+
 #include <stdarg.h>
 #include <string.h>
 #include <stdio.h>
@@ -36,14 +44,14 @@ enum
   EMISSION_DONE
 };
 
-#define GTK_RUN_TYPE(x)         ((x) & GTK_RUN_MASK)
+#define GTK_RUN_TYPE(x)         ((x) & GTK_RUN_BOTH)
 
 
 typedef struct _GtkSignal              GtkSignal;
 typedef struct _GtkSignalHash          GtkSignalHash;
 typedef struct _GtkHandler             GtkHandler;
 typedef struct _GtkEmission            GtkEmission;
-typedef union  _GtkEmissionAllocator   GtkEmissionAllocator;
+typedef struct _GtkEmissionHookData    GtkEmissionHookData;
 typedef struct _GtkDisconnectInfo      GtkDisconnectInfo;
 
 typedef void (*GtkSignalMarshaller0) (GtkObject *object,
@@ -55,11 +63,12 @@ struct _GtkSignal
   GtkType            object_type;
   gchar                     *name;
   guint                      function_offset;
-  GtkSignalRunType    signal_flags;
   GtkSignalMarshaller marshaller;
   GtkType            return_val;
+  guint                      signal_flags : 16;
+  guint                      nparams : 16;
   GtkType           *params;
-  guint                      nparams;
+  GHookList         *hook_list;
 };
 
 struct _GtkSignalHash
@@ -72,6 +81,8 @@ struct _GtkSignalHash
 struct _GtkHandler
 {
   guint                   id;
+  GtkHandler     *next;
+  GtkHandler     *prev;
   guint                   blocked : 20;
   guint                   object_signal : 1;
   guint                   after : 1;
@@ -81,20 +92,22 @@ struct _GtkHandler
   GtkSignalFunc           func;
   gpointer        func_data;
   GtkSignalDestroy destroy_func;
-  GtkHandler     *prev;
-  GtkHandler     *next;
 };
 
 struct _GtkEmission
 {
-  GtkObject *object;
-  guint             signal_id;
+  GtkObject   *object;
+  guint16      signal_id;
+  guint               in_hook : 1;
+  GtkEmission *next;
 };
 
-union _GtkEmissionAllocator
+struct _GtkEmissionHookData
 {
-  GtkEmissionAllocator *next;
-  GtkEmission          emission;
+  GtkObject *object;
+  guint signal_id;
+  guint n_params;
+  GtkArg *params;
 };
 
 struct _GtkDisconnectInfo
@@ -119,8 +132,6 @@ static void     gtk_signal_handler_insert  (GtkObject     *object,
 static void        gtk_signal_real_emit       (GtkObject     *object,
                                                guint          signal_id,
                                                GtkArg        *params);
-static GtkHandler*  gtk_signal_get_handlers    (GtkObject     *object,
-                                               guint          signal_type);
 static guint       gtk_signal_connect_by_type (GtkObject     *object,
                                                guint          signal_id,
                                                GtkSignalFunc  func,
@@ -131,13 +142,13 @@ static guint          gtk_signal_connect_by_type (GtkObject     *object,
                                                gint           no_marshal);
 static guint       gtk_alive_disconnecter     (GtkDisconnectInfo *info);
 static GtkEmission* gtk_emission_new          (void);
-static void        gtk_emission_add           (GList         **emissions,
+static void        gtk_emission_add           (GtkEmission   **emissions,
                                                GtkObject      *object,
                                                guint           signal_type);
-static void        gtk_emission_remove        (GList         **emissions,
+static void        gtk_emission_remove        (GtkEmission   **emissions,
                                                GtkObject      *object,
                                                guint           signal_type);
-static gint        gtk_emission_check         (GList          *emissions,
+static gint        gtk_emission_check         (GtkEmission    *emissions,
                                                GtkObject      *object,
                                                guint           signal_type);
 static gint        gtk_handlers_run           (GtkHandler     *handlers,
@@ -145,15 +156,17 @@ static gint           gtk_handlers_run           (GtkHandler     *handlers,
                                                GtkObject      *object,
                                                GtkArg         *params,
                                                gint            after);
-static gboolean            gtk_signal_collect_params  (GtkArg         *params,
+static gboolean gtk_emission_hook_marshaller   (GHook          *hook,
+                                               gpointer        data);
+static gboolean        gtk_signal_collect_params      (GtkArg         *params,
                                                guint           nparams,
                                                GtkType        *param_types,
                                                GtkType         return_type,
                                                va_list         var_args);
 
 #define LOOKUP_SIGNAL_ID(signal_id)    ( \
-  signal_id > 0 && signal_id < gtk_n_signals ? \
-    (GtkSignal*) gtk_signals + signal_id : \
+  signal_id > 0 && signal_id < _gtk_private_n_signals ? \
+    (GtkSignal*) _gtk_private_signals + signal_id : \
     (GtkSignal*) 0 \
 )
 
@@ -162,20 +175,25 @@ static GtkSignalMarshal global_marshaller = NULL;
 static GtkSignalDestroy global_destroy_notify = NULL;
 
 static guint                    gtk_handler_id = 1;
-static guint                    handler_quark = 0;
+static guint                    gtk_handler_quark = 0;
 static GHashTable              *gtk_signal_hash_table = NULL;
-static GtkSignal               *gtk_signals = NULL;
-static guint                    gtk_n_signals = 0;
+#ifdef G_OS_WIN32
+#define EXPORT __declspec(dllexport)
+#else
+#define EXPORT
+#endif
+EXPORT GtkSignal               *_gtk_private_signals = NULL;
+EXPORT guint                    _gtk_private_n_signals = 0;
 static GMemChunk               *gtk_signal_hash_mem_chunk = NULL;
 static GMemChunk               *gtk_disconnect_info_mem_chunk = NULL;
 static GtkHandler              *gtk_handler_free_list = NULL;
-static GtkEmissionAllocator    *gtk_emission_free_list = NULL;
+static GtkEmission             *gtk_free_emissions = NULL;
 
 
 
-static GList *current_emissions = NULL;
-static GList *stop_emissions = NULL;
-static GList *restart_emissions = NULL;
+static GtkEmission *current_emissions = NULL;
+static GtkEmission *stop_emissions = NULL;
+static GtkEmission *restart_emissions = NULL;
 
 static GtkSignal*
 gtk_signal_next_and_invalidate (void)
@@ -194,22 +212,24 @@ gtk_signal_next_and_invalidate (void)
       
       /* nearest pow
        */
-      size = gtk_n_signals + SIGNAL_BLOCK_SIZE;
+      size = _gtk_private_n_signals + SIGNAL_BLOCK_SIZE;
       size *= sizeof (GtkSignal);
       i = 1;
       while (i < size)
        i <<= 1;
       size = i;
       
-      gtk_signals = g_realloc (gtk_signals, size);
+      _gtk_private_signals = g_realloc (_gtk_private_signals, size);
       
-      gtk_n_free_signals = size / sizeof (GtkSignal) - gtk_n_signals;
+      gtk_n_free_signals = size / sizeof (GtkSignal) - _gtk_private_n_signals;
       
-      memset (gtk_signals + gtk_n_signals, 0, gtk_n_free_signals * sizeof (GtkSignal));
+      memset (_gtk_private_signals + _gtk_private_n_signals, 0, gtk_n_free_signals * sizeof (GtkSignal));
     }
   
-  new_signal_id = gtk_n_signals++;
+  new_signal_id = _gtk_private_n_signals++;
   gtk_n_free_signals--;
+
+  g_assert (_gtk_private_n_signals < 65535);
   
   signal = LOOKUP_SIGNAL_ID (new_signal_id);
   if (signal)
@@ -218,17 +238,35 @@ gtk_signal_next_and_invalidate (void)
   return signal;
 }
 
+static inline GtkHandler*
+gtk_signal_get_handlers (GtkObject *object,
+                        guint      signal_id)
+{
+  GtkHandler *handlers;
+  
+  handlers = gtk_object_get_data_by_id (object, gtk_handler_quark);
+  
+  while (handlers)
+    {
+      if (handlers->signal_id == signal_id)
+       return handlers;
+      handlers = handlers->next;
+    }
+  
+  return NULL;
+}
+
 void
 gtk_signal_init (void)
 {
-  if (!handler_quark)
+  if (!gtk_handler_quark)
     {
       GtkSignal *zero;
       
       zero = gtk_signal_next_and_invalidate ();
       g_assert (zero == NULL);
       
-      handler_quark = g_quark_from_static_string ("gtk-signal-handlers");
+      gtk_handler_quark = g_quark_from_static_string ("gtk-signal-handlers");
       
       gtk_signal_hash_mem_chunk =
        g_mem_chunk_new ("GtkSignalHash mem chunk",
@@ -241,7 +279,7 @@ gtk_signal_init (void)
                         sizeof (GtkDisconnectInfo) * DISCONNECT_INFO_BLOCK_SIZE,
                         G_ALLOC_AND_FREE);
       gtk_handler_free_list = NULL;
-      gtk_emission_free_list = NULL;
+      gtk_free_emissions = NULL;
       
       gtk_signal_hash_table = g_hash_table_new (gtk_signal_hash,
                                                gtk_signal_compare);
@@ -270,7 +308,7 @@ gtk_signal_newv (const gchar             *r_name,
   if (nparams)
     g_return_val_if_fail (params != NULL, 0);
   
-  if (!handler_quark)
+  if (!gtk_handler_quark)
     gtk_signal_init ();
 
 
@@ -290,7 +328,7 @@ gtk_signal_newv (const gchar             *r_name,
   if (return_val != GTK_TYPE_NONE &&
       (signal_flags & GTK_RUN_BOTH) == GTK_RUN_FIRST)
     {
-      g_warning ("gtk_signal_newv(): signal \"%s\" with return value `%s' excludes GTK_RUN_LAST",
+      g_warning ("gtk_signal_newv(): signal \"%s\" - return value `%s' incompatible with GTK_RUN_FIRST",
                 name, gtk_type_name (return_val));
       g_free (name);
       return 0;
@@ -303,10 +341,11 @@ gtk_signal_newv (const gchar           *r_name,
   signal->object_type = object_type;
   signal->name = name;
   signal->function_offset = function_offset;
-  signal->signal_flags = signal_flags;
   signal->marshaller = marshaller;
   signal->return_val = return_val;
+  signal->signal_flags = signal_flags;
   signal->nparams = nparams;
+  signal->hook_list = NULL;
   
   if (nparams > 0)
     {
@@ -392,27 +431,38 @@ gtk_signal_lookup (const gchar *name,
                   GtkType      object_type)
 {
   GtkSignalHash hash;
-  
+  GtkType lookup_type;
+  gpointer class = NULL;
+
   g_return_val_if_fail (name != NULL, 0);
-  g_return_val_if_fail (gtk_type_is_a (object_type, GTK_TYPE_OBJECT), 0);
+  g_return_val_if_fail (GTK_TYPE_IS_OBJECT (object_type), 0);
   
+ relookup:
+
+  lookup_type = object_type;
   hash.quark = g_quark_try_string (name);
   if (hash.quark)
     {
-      while (object_type)
+      while (lookup_type)
        {
          guint signal_id;
          
-         hash.object_type = object_type;
+         hash.object_type = lookup_type;
          
          signal_id = GPOINTER_TO_UINT (g_hash_table_lookup (gtk_signal_hash_table, &hash));
          if (signal_id)
            return signal_id;
          
-         object_type = gtk_type_parent (object_type);
+         lookup_type = gtk_type_parent (lookup_type);
        }
     }
-  
+
+  if (!class)
+    {
+      class = gtk_type_class (object_type);
+      goto relookup;
+    }
+
   return 0;
 }
 
@@ -584,11 +634,21 @@ void
 gtk_signal_emit_stop (GtkObject *object,
                      guint       signal_id)
 {
+  gint state;
+
   g_return_if_fail (object != NULL);
   g_return_if_fail (signal_id >= 1);
   
-  if (gtk_emission_check (current_emissions, object, signal_id))
-    gtk_emission_add (&stop_emissions, object, signal_id);
+  state = gtk_emission_check (current_emissions, object, signal_id);
+  if (state > 1)
+    g_warning ("gtk_signal_emit_stop(): emission (%u) for object `%s' cannot be stopped from emission hook",
+              signal_id,
+              gtk_type_name (GTK_OBJECT_TYPE (object)));
+  else if (state)
+    {
+      if (!gtk_emission_check (stop_emissions, object, signal_id))
+       gtk_emission_add (&stop_emissions, object, signal_id);
+    }
   else
     g_warning ("gtk_signal_emit_stop(): no current emission (%u) for object `%s'",
               signal_id,
@@ -617,21 +677,16 @@ guint
 gtk_signal_n_emissions (GtkObject  *object,
                        guint       signal_id)
 {
-  GList *list;
+  GtkEmission *emission;
   guint n;
   
   g_return_val_if_fail (object != NULL, 0);
   g_return_val_if_fail (GTK_IS_OBJECT (object), 0);
   
   n = 0;
-  for (list = current_emissions; list; list = list->next)
+  for (emission = current_emissions; emission; emission = emission->next)
     {
-      GtkEmission *emission;
-      
-      emission = list->data;
-      
-      if ((emission->object == object) &&
-         (emission->signal_id == signal_id))
+      if (emission->object == object && emission->signal_id == signal_id)
        n++;
     }
   
@@ -745,18 +800,6 @@ gtk_signal_connect_full (GtkObject      *object,
                                       object_signal, after, FALSE);
 }
 
-guint
-gtk_signal_connect_interp (GtkObject        *object,
-                          const gchar       *name,
-                          GtkCallbackMarshal func,
-                          gpointer           func_data,
-                          GtkDestroyNotify   destroy_func,
-                          gint               after)
-{
-  return gtk_signal_connect_full (object, name, NULL, func,
-                                 func_data, destroy_func, FALSE, after);
-}
-
 guint
 gtk_signal_connect_object (GtkObject    *object,
                           const gchar   *name,
@@ -881,7 +924,7 @@ gtk_signal_disconnect (GtkObject *object,
   g_return_if_fail (object != NULL);
   g_return_if_fail (handler_id > 0);
   
-  handler = gtk_object_get_data_by_id (object, handler_quark);
+  handler = gtk_object_get_data_by_id (object, gtk_handler_quark);
   
   while (handler)
     {
@@ -910,7 +953,7 @@ gtk_signal_disconnect_by_func (GtkObject     *object,
   g_return_if_fail (func != NULL);
   
   found_one = FALSE;
-  handler = gtk_object_get_data_by_id (object, handler_quark);
+  handler = gtk_object_get_data_by_id (object, gtk_handler_quark);
   
   while (handler)
     {
@@ -943,7 +986,7 @@ gtk_signal_disconnect_by_data (GtkObject *object,
   g_return_if_fail (object != NULL);
   
   found_one = FALSE;
-  handler = gtk_object_get_data_by_id (object, handler_quark);
+  handler = gtk_object_get_data_by_id (object, gtk_handler_quark);
   
   while (handler)
     {
@@ -974,7 +1017,7 @@ gtk_signal_handler_block (GtkObject *object,
   g_return_if_fail (object != NULL);
   g_return_if_fail (handler_id > 0);
   
-  handler = gtk_object_get_data_by_id (object, handler_quark);
+  handler = gtk_object_get_data_by_id (object, gtk_handler_quark);
   
   while (handler)
     {
@@ -1001,7 +1044,7 @@ gtk_signal_handler_block_by_func (GtkObject       *object,
   g_return_if_fail (func != NULL);
   
   found_one = FALSE;
-  handler = gtk_object_get_data_by_id (object, handler_quark);
+  handler = gtk_object_get_data_by_id (object, gtk_handler_quark);
   
   while (handler)
     {
@@ -1029,7 +1072,7 @@ gtk_signal_handler_block_by_data (GtkObject *object,
   g_return_if_fail (object != NULL);
   
   found_one = FALSE;
-  handler = gtk_object_get_data_by_id (object, handler_quark);
+  handler = gtk_object_get_data_by_id (object, gtk_handler_quark);
   
   while (handler)
     {
@@ -1055,7 +1098,7 @@ gtk_signal_handler_unblock (GtkObject *object,
   g_return_if_fail (object != NULL);
   g_return_if_fail (handler_id > 0);
   
-  handler = gtk_object_get_data_by_id (object, handler_quark);
+  handler = gtk_object_get_data_by_id (object, gtk_handler_quark);
   
   while (handler)
     {
@@ -1085,7 +1128,7 @@ gtk_signal_handler_unblock_by_func (GtkObject       *object,
   g_return_if_fail (func != NULL);
   
   found_one = FALSE;
-  handler = gtk_object_get_data_by_id (object, handler_quark);
+  handler = gtk_object_get_data_by_id (object, gtk_handler_quark);
   
   while (handler)
     {
@@ -1114,7 +1157,7 @@ gtk_signal_handler_unblock_by_data (GtkObject *object,
   g_return_if_fail (object != NULL);
   
   found_one = FALSE;
-  handler = gtk_object_get_data_by_id (object, handler_quark);
+  handler = gtk_object_get_data_by_id (object, gtk_handler_quark);
   
   while (handler)
     {
@@ -1142,7 +1185,7 @@ gtk_signal_handlers_destroy (GtkObject *object)
    * handler_key data on each removal
    */
   
-  handler = gtk_object_get_data_by_id (object, handler_quark);
+  handler = gtk_object_get_data_by_id (object, gtk_handler_quark);
   if (handler)
     {
       handler = handler->next;
@@ -1151,11 +1194,21 @@ gtk_signal_handlers_destroy (GtkObject *object)
          GtkHandler *next;
          
          next = handler->next;
-         gtk_signal_handler_unref (handler, object);
+         if (handler->id > 0)
+            {
+             handler->id = 0;
+             handler->blocked += 1;
+             gtk_signal_handler_unref (handler, object);
+           }
          handler = next;
        }
-      handler = gtk_object_get_data_by_id (object, handler_quark);
-      gtk_signal_handler_unref (handler, object);
+      handler = gtk_object_get_data_by_id (object, gtk_handler_quark);
+      if (handler->id > 0)
+        {
+         handler->id = 0;
+         handler->blocked += 1;
+         gtk_signal_handler_unref (handler, object);
+       }
     }
 }
 
@@ -1270,11 +1323,11 @@ gtk_signal_handler_unref (GtkHandler *handler,
       if (handler->prev)
        handler->prev->next = handler->next;
       else if (handler->next)
-       gtk_object_set_data_by_id (object, handler_quark, handler->next);
+       gtk_object_set_data_by_id (object, gtk_handler_quark, handler->next);
       else
        {
          GTK_OBJECT_UNSET_FLAGS (object, GTK_CONNECTED);
-         gtk_object_set_data_by_id (object, handler_quark, NULL);
+         gtk_object_set_data_by_id (object, gtk_handler_quark, NULL);
        }
       if (handler->next)
        handler->next->prev = handler->prev;
@@ -1293,11 +1346,11 @@ gtk_signal_handler_insert (GtkObject  *object,
   /* FIXME: remove */ g_assert (handler->next == NULL);
   /* FIXME: remove */ g_assert (handler->prev == NULL);
   
-  tmp = gtk_object_get_data_by_id (object, handler_quark);
+  tmp = gtk_object_get_data_by_id (object, gtk_handler_quark);
   if (!tmp)
     {
       GTK_OBJECT_SET_FLAGS (object, GTK_CONNECTED);
-      gtk_object_set_data_by_id (object, handler_quark, handler);
+      gtk_object_set_data_by_id (object, gtk_handler_quark, handler);
     }
   else
     while (tmp)
@@ -1310,7 +1363,7 @@ gtk_signal_handler_insert (GtkObject  *object,
                handler->prev = tmp->prev;
              }
            else
-             gtk_object_set_data_by_id (object, handler_quark, handler);
+             gtk_object_set_data_by_id (object, gtk_handler_quark, handler);
            tmp->prev = handler;
            handler->next = tmp;
            break;
@@ -1326,7 +1379,12 @@ gtk_signal_handler_insert (GtkObject  *object,
       }
 }
 
+
+#ifdef  G_ENABLE_DEBUG
+/* value typically set via gdb */
 static GtkObject *gtk_trace_signal_object = NULL;
+#endif  /* G_ENABLE_DEBUG */
+
 
 static void
 gtk_signal_real_emit (GtkObject *object,
@@ -1335,68 +1393,123 @@ gtk_signal_real_emit (GtkObject *object,
 {
   GtkSignal     signal;
   GtkHandler   *handlers;
-  GtkSignalFunc *signal_func_offset;
+  GtkSignalFunc  signal_func;
+  GtkEmission   *emission;
 
   /* gtk_handlers_run() expects a reentrant GtkSignal*, so we allocate
    * it locally on the stack. we save some lookups ourselves with this as well.
    */
   signal = *LOOKUP_SIGNAL_ID (signal_id);
   if (signal.function_offset)
-    {
-      signal_func_offset = (GtkSignalFunc*) ((guchar*) object->klass + signal.function_offset);
-      if (!*signal_func_offset)
-       signal_func_offset = (GtkSignalFunc*) 0;
-    }
+    signal_func = G_STRUCT_MEMBER (GtkSignalFunc, ((GTypeInstance*) object)->g_class, signal.function_offset);
   else
-    signal_func_offset = NULL;
+    signal_func = NULL;
   
 #ifdef  G_ENABLE_DEBUG
   if (gtk_debug_flags & GTK_DEBUG_SIGNALS ||
       object == gtk_trace_signal_object)
-    fprintf (stdout, "GTK-DEBUG: signal_emit (\"%s\") for %s:%p (class-pointer %p)\n",
-            signal.name,
-            gtk_type_name (GTK_OBJECT_TYPE (object)),
-            object,
-            signal_func_offset);
+    g_message ("%s::%s emitted (object=%p class-method=%p)\n",
+              gtk_type_name (GTK_OBJECT_TYPE (object)),
+              signal.name,
+              object,
+              signal_func);
 #endif  /* G_ENABLE_DEBUG */
   
-  if ((signal.signal_flags & GTK_RUN_NO_RECURSE) &&
-      gtk_emission_check (current_emissions, object, signal_id))
+  if (signal.signal_flags & GTK_RUN_NO_RECURSE)
     {
-      gtk_emission_add (&restart_emissions, object, signal_id);
-      return;
+      gint state;
+      
+      state = gtk_emission_check (current_emissions, object, signal_id);
+      if (state)
+       {
+         if (state > 1)
+           g_warning ("gtk_signal_real_emit(): emission (%u) for object `%s' cannot be restarted from emission hook",
+                      signal_id,
+                      gtk_type_name (GTK_OBJECT_TYPE (object)));
+         else if (!gtk_emission_check (restart_emissions, object, signal_id))
+           gtk_emission_add (&restart_emissions, object, signal_id);
+         
+         return;
+       }
     }
   
   gtk_object_ref (object);
-
+  
   gtk_emission_add (&current_emissions, object, signal_id);
+  emission = current_emissions;
   
  emission_restart:
-  if (GTK_RUN_TYPE (signal.signal_flags) != GTK_RUN_LAST && signal_func_offset)
-    signal.marshaller (object, *signal_func_offset, NULL, params);
   
+  if (signal.signal_flags & GTK_RUN_FIRST && signal_func)
+    {
+      signal.marshaller (object, signal_func, NULL, params);
+      
+      if (stop_emissions && gtk_emission_check (stop_emissions, object, signal_id))
+       {
+         gtk_emission_remove (&stop_emissions, object, signal_id);
+         goto emission_done;
+       }
+      else if (restart_emissions &&
+              signal.signal_flags & GTK_RUN_NO_RECURSE &&
+              gtk_emission_check (restart_emissions, object, signal_id))
+       {
+         gtk_emission_remove (&restart_emissions, object, signal_id);
+         
+         goto emission_restart;
+       }
+    }
+  
+  if (signal.hook_list && !GTK_OBJECT_DESTROYED (object))
+    {
+      GtkEmissionHookData data;
+
+      data.object = object;
+      data.n_params = signal.nparams;
+      data.params = params;
+      data.signal_id = signal_id;
+      emission->in_hook = 1;
+      g_hook_list_marshal_check (signal.hook_list, TRUE, gtk_emission_hook_marshaller, &data);
+      emission->in_hook = 0;
+    }
+
   if (GTK_OBJECT_CONNECTED (object))
     {
       handlers = gtk_signal_get_handlers (object, signal_id);
       if (handlers)
        {
          gint return_val;
-
+         
          return_val = gtk_handlers_run (handlers, &signal, object, params, FALSE);
          switch (return_val)
            {
-           case  EMISSION_CONTINUE:
+           case EMISSION_CONTINUE:
              break;
-           case  EMISSION_RESTART:
+           case EMISSION_RESTART:
              goto emission_restart;
-           case  EMISSION_DONE:
+           case EMISSION_DONE:
              goto emission_done;
            }
        }
     }
   
-  if (GTK_RUN_TYPE (signal.signal_flags) != GTK_RUN_FIRST && signal_func_offset)
-    signal.marshaller (object, *signal_func_offset, NULL, params);
+  if (signal.signal_flags & GTK_RUN_LAST && signal_func)
+    {
+      signal.marshaller (object, signal_func, NULL, params);
+      
+      if (stop_emissions && gtk_emission_check (stop_emissions, object, signal_id))
+       {
+         gtk_emission_remove (&stop_emissions, object, signal_id);
+         goto emission_done;
+       }
+      else if (restart_emissions &&
+              signal.signal_flags & GTK_RUN_NO_RECURSE &&
+              gtk_emission_check (restart_emissions, object, signal_id))
+       {
+         gtk_emission_remove (&restart_emissions, object, signal_id);
+         
+         goto emission_restart;
+       }
+    }
   
   if (GTK_OBJECT_CONNECTED (object))
     {
@@ -1404,7 +1517,7 @@ gtk_signal_real_emit (GtkObject *object,
       if (handlers)
        {
          gint return_val;
-
+         
          return_val = gtk_handlers_run (handlers, &signal, object, params, TRUE);
          switch (return_val)
            {
@@ -1419,33 +1532,14 @@ gtk_signal_real_emit (GtkObject *object,
     }
   
  emission_done:
+  if (restart_emissions && signal.signal_flags & GTK_RUN_NO_RECURSE)
+    gtk_emission_remove (&restart_emissions, object, signal_id);
   
   gtk_emission_remove (&current_emissions, object, signal_id);
   
-  if (signal.signal_flags & GTK_RUN_NO_RECURSE)
-    gtk_emission_remove (&restart_emissions, object, signal_id);
-  
   gtk_object_unref (object);
 }
 
-static GtkHandler*
-gtk_signal_get_handlers (GtkObject *object,
-                        guint      signal_id)
-{
-  GtkHandler *handlers;
-  
-  handlers = gtk_object_get_data_by_id (object, handler_quark);
-  
-  while (handlers)
-    {
-      if (handlers->signal_id == signal_id)
-       return handlers;
-      handlers = handlers->next;
-    }
-  
-  return NULL;
-}
-
 guint
 gtk_signal_handler_pending (GtkObject          *object,
                            guint                signal_id,
@@ -1503,7 +1597,7 @@ gtk_signal_handler_pending_by_func (GtkObject           *object,
       if (handlers->id > 0 &&
          handlers->func == func &&
          handlers->func_data == data &&
-         (may_be_blocked || handlers->blocked == FALSE))
+         (may_be_blocked || handlers->blocked == 0))
        {
          handler_id = handlers->id;
          break;
@@ -1515,6 +1609,113 @@ gtk_signal_handler_pending_by_func (GtkObject           *object,
   return handler_id;
 }
 
+gint
+gtk_signal_handler_pending_by_id (GtkObject *object,
+                                 guint      handler_id,
+                                 gboolean   may_be_blocked)
+{
+  GtkHandler *handlers;
+  
+  g_return_val_if_fail (object != NULL, FALSE);
+  g_return_val_if_fail (handler_id >= 1, FALSE);
+
+  if (GTK_OBJECT_CONNECTED (object))
+    handlers = gtk_object_get_data_by_id (object, gtk_handler_quark);
+  else
+    return FALSE;
+  
+  while (handlers)
+    {
+      if (handlers->id == handler_id)
+       return may_be_blocked || handlers->blocked == 0;
+      
+      handlers = handlers->next;
+    }
+  
+  return FALSE;
+}
+
+guint
+gtk_signal_add_emission_hook (guint           signal_id,
+                             GtkEmissionHook hook_func,
+                             gpointer        data)
+{
+  return gtk_signal_add_emission_hook_full (signal_id, hook_func, data, NULL);
+}
+
+guint
+gtk_signal_add_emission_hook_full (guint           signal_id,
+                                  GtkEmissionHook hook_func,
+                                  gpointer        data,
+                                  GDestroyNotify  destroy)
+{
+  static guint seq_hook_id = 1;
+  GtkSignal *signal;
+  GHook *hook;
+
+  g_return_val_if_fail (signal_id > 0, 0);
+  g_return_val_if_fail (hook_func != NULL, 0);
+  
+  signal = LOOKUP_SIGNAL_ID (signal_id);
+  g_return_val_if_fail (signal != NULL, 0);
+  if (signal->signal_flags & GTK_RUN_NO_HOOKS)
+    {
+      g_warning ("gtk_signal_add_emission_hook_full(): signal \"%s\" does not support emission hooks",
+                signal->name);
+      return 0;
+    }
+
+  if (!signal->hook_list)
+    {
+      signal->hook_list = g_new (GHookList, 1);
+      g_hook_list_init (signal->hook_list, sizeof (GHook));
+    }
+
+  hook = g_hook_alloc (signal->hook_list);
+  hook->data = data;
+  hook->func = hook_func;
+  hook->destroy = destroy;
+
+  signal->hook_list->seq_id = seq_hook_id;
+  g_hook_prepend (signal->hook_list, hook);
+  seq_hook_id = signal->hook_list->seq_id;
+
+  return hook->hook_id;
+}
+
+void
+gtk_signal_remove_emission_hook (guint signal_id,
+                                guint hook_id)
+{
+  GtkSignal *signal;
+
+  g_return_if_fail (signal_id > 0);
+  g_return_if_fail (hook_id > 0);
+
+  signal = LOOKUP_SIGNAL_ID (signal_id);
+  g_return_if_fail (signal != NULL);
+
+  if (!signal->hook_list || !g_hook_destroy (signal->hook_list, hook_id))
+    g_warning ("gtk_signal_remove_emission_hook(): could not find hook (%u)", hook_id);
+}
+
+static gboolean
+gtk_emission_hook_marshaller (GHook   *hook,
+                             gpointer data_p)
+{
+  GtkEmissionHookData *data = data_p;
+  GtkEmissionHook func;
+
+  func = hook->func;
+
+  if (!GTK_OBJECT_DESTROYED (data->object))
+    return func (data->object, data->signal_id,
+                data->n_params, data->params,
+                hook->data);
+  else
+    return TRUE;
+}
+
 static guint
 gtk_signal_connect_by_type (GtkObject      *object,
                            guint            signal_id,
@@ -1528,10 +1729,12 @@ gtk_signal_connect_by_type (GtkObject       *object,
   GtkObjectClass *class;
   GtkHandler *handler;
   gint found_it;
+  GtkSignal *signal;
+  g_return_val_if_fail (GTK_IS_OBJECT (object), 0);
   
-  g_return_val_if_fail (object != NULL, 0);
-  g_return_val_if_fail (object->klass != NULL, 0);
-  
+  signal = LOOKUP_SIGNAL_ID (signal_id);
+
   /* Search through the signals for this object and make
    *  sure the one we are adding is valid. We need to perform
    *  the lookup on the objects parents as well. If it isn't
@@ -1541,7 +1744,7 @@ gtk_signal_connect_by_type (GtkObject         *object,
    *  return correct signal ids per class-branch.
    */
   found_it = FALSE;
-  class = object->klass;
+  class = GTK_OBJECT_GET_CLASS (object);
   while (class)
     {
       GtkType parent;
@@ -1559,9 +1762,9 @@ gtk_signal_connect_by_type (GtkObject         *object,
            break;
          }
       
-      parent = gtk_type_parent (class->type);
-      if (parent)
-       class = gtk_type_class (parent);
+      parent = g_type_parent (GTK_CLASS_TYPE (class));
+      if (GTK_TYPE_IS_OBJECT (parent))
+       class = g_type_class_peek (parent);
       else
        class = NULL;
     }
@@ -1570,14 +1773,14 @@ gtk_signal_connect_by_type (GtkObject       *object,
     {
       g_warning ("gtk_signal_connect_by_type(): could not find signal id (%u) in the `%s' class ancestry",
                 signal_id,
-                gtk_type_name (object->klass->type));
+                GTK_OBJECT_TYPE_NAME (object));
       return 0;
     }
   
   handler = gtk_signal_handler_new ();
   handler->id = gtk_handler_id++;
   handler->signal_id = signal_id;
-  handler->object_signal = object_signal;
+  handler->object_signal = object_signal != FALSE;
   handler->func = func;
   handler->func_data = func_data;
   handler->destroy_func = destroy_func;
@@ -1593,36 +1796,38 @@ gtk_emission_new (void)
 {
   GtkEmission *emission;
   
-  if (!gtk_emission_free_list)
+  if (!gtk_free_emissions)
     {
-      GtkEmissionAllocator *emission_block;
+      GtkEmission *emission_block;
       guint i;
 
-      emission_block = g_new0 (GtkEmissionAllocator, EMISSION_BLOCK_SIZE);
+      emission_block = g_new0 (GtkEmission, EMISSION_BLOCK_SIZE);
       for (i = 1; i < EMISSION_BLOCK_SIZE; i++)
        {
-         (emission_block + i)->next = gtk_emission_free_list;
-         gtk_emission_free_list = (emission_block + i);
+         (emission_block + i)->next = gtk_free_emissions;
+         gtk_free_emissions = (emission_block + i);
        }
 
-      emission = &emission_block->emission;
+      emission = emission_block;
     }
   else
     {
-      emission = &gtk_emission_free_list->emission;
-      gtk_emission_free_list = gtk_emission_free_list->next;
+      emission = gtk_free_emissions;
+      gtk_free_emissions = emission->next;
     }
 
   emission->object = NULL;
   emission->signal_id = 0;
+  emission->in_hook = 0;
+  emission->next = NULL;
   
   return emission;
 }
 
 static void
-gtk_emission_add (GList            **emissions,
-                 GtkObject  *object,
-                 guint       signal_id)
+gtk_emission_add (GtkEmission **emissions,
+                 GtkObject    *object,
+                 guint         signal_id)
 {
   GtkEmission *emission;
   
@@ -1632,58 +1837,51 @@ gtk_emission_add (GList     **emissions,
   emission = gtk_emission_new ();
   emission->object = object;
   emission->signal_id = signal_id;
-  
-  *emissions = g_list_prepend (*emissions, emission);
+
+  emission->next = *emissions;
+  *emissions = emission;
 }
 
 static void
-gtk_emission_remove (GList     **emissions,
-                    GtkObject  *object,
-                    guint       signal_id)
+gtk_emission_remove (GtkEmission **emissions,
+                    GtkObject    *object,
+                    guint         signal_id)
 {
-  GList *tmp;
+  GtkEmission *emission, *last;
   
   g_return_if_fail (emissions != NULL);
-  
-  tmp = *emissions;
-  while (tmp)
+
+  last = NULL;
+  emission = *emissions;
+  while (emission)
     {
-      GtkEmissionAllocator *ea;
-      
-      ea = tmp->data;
-      
-      if ((ea->emission.object == object) &&
-         (ea->emission.signal_id == signal_id))
+      if (emission->object == object && emission->signal_id == signal_id)
        {
-         *emissions = g_list_remove_link (*emissions, tmp);
-         g_list_free (tmp);
+         if (last)
+           last->next = emission->next;
+         else
+           *emissions = emission->next;
 
-         ea->next = gtk_emission_free_list;
-         gtk_emission_free_list = ea;
+         emission->next = gtk_free_emissions;
+         gtk_free_emissions = emission;
          break;
        }
-      
-      tmp = tmp->next;
+
+      last = emission;
+      emission = last->next;
     }
 }
 
 static gint
-gtk_emission_check (GList     *emissions,
-                   GtkObject *object,
-                   guint      signal_id)
+gtk_emission_check (GtkEmission *emission,
+                   GtkObject   *object,
+                   guint        signal_id)
 {
-  GtkEmission *emission;
-  GList *tmp;
-  
-  tmp = emissions;
-  while (tmp)
+  while (emission)
     {
-      emission = tmp->data;
-      tmp = tmp->next;
-      
-      if ((emission->object == object) &&
-         (emission->signal_id == signal_id))
-       return TRUE;
+      if (emission->object == object && emission->signal_id == signal_id)
+       return 1 + emission->in_hook;
+      emission = emission->next;
     }
   return FALSE;
 }
@@ -1704,7 +1902,7 @@ gtk_handlers_run (GtkHandler       *handlers,
       
       gtk_signal_handler_ref (handlers);
       
-      if (handlers->blocked == 0 && (handlers->after == after))
+      if (!handlers->blocked && handlers->after == after)
        {
          if (handlers->func)
            {
@@ -1714,10 +1912,10 @@ gtk_handlers_run (GtkHandler     *handlers,
                                                         signal->nparams,
                                                         params);
              else if (handlers->object_signal)
-               /* don't GTK_OBJECT(handlers->func_data) cast */
+               /* don't cast with GTK_OBJECT () */
                (* signal->marshaller) ((GtkObject*) handlers->func_data,
                                        handlers->func,
-                                       handlers->func_data,
+                                       object,
                                        params);
              else
                (* signal->marshaller) (object,
@@ -1733,25 +1931,24 @@ gtk_handlers_run (GtkHandler     *handlers,
                                   signal->params,
                                   signal->return_val);
          
-         if (gtk_emission_check (stop_emissions, object,
-                                 signal->signal_id))
+         if (stop_emissions && gtk_emission_check (stop_emissions,
+                                                   object,
+                                                   signal->signal_id))
            {
-             gtk_emission_remove (&stop_emissions, object,
-                                  signal->signal_id);
+             gtk_emission_remove (&stop_emissions, object, signal->signal_id);
              
-             if (signal->signal_flags & GTK_RUN_NO_RECURSE)
-               gtk_emission_remove (&restart_emissions, object,
-                                    signal->signal_id);
              gtk_signal_handler_unref (handlers, object);
+
              return EMISSION_DONE;
            }
-         else if ((signal->signal_flags & GTK_RUN_NO_RECURSE) &&
-                  gtk_emission_check (restart_emissions, object,
-                                      signal->signal_id))
+         else if (restart_emissions &&
+                  signal->signal_flags & GTK_RUN_NO_RECURSE &&
+                  gtk_emission_check (restart_emissions, object, signal->signal_id))
            {
-             gtk_emission_remove (&restart_emissions, object,
-                                  signal->signal_id);
+             gtk_emission_remove (&restart_emissions, object, signal->signal_id);
+
              gtk_signal_handler_unref (handlers, object);
+
              return EMISSION_RESTART;
            }
        }
@@ -1778,10 +1975,9 @@ gtk_signal_collect_params (GtkArg               *params,
     {
       register gchar *error;
 
-      params->type = *(param_types++);
       params->name = NULL;
-      GTK_ARG_COLLECT_VALUE (GTK_FUNDAMENTAL_TYPE (params->type),
-                            params,
+      params->type = *(param_types++);
+      GTK_ARG_COLLECT_VALUE (params,
                             var_args,
                             error);
       if (error)
@@ -1798,9 +1994,7 @@ gtk_signal_collect_params (GtkArg        *params,
   return_type = GTK_FUNDAMENTAL_TYPE (return_type);
   if (return_type != GTK_TYPE_NONE)
     {
-      if ((return_type >= GTK_TYPE_FLAT_FIRST &&
-          return_type <= GTK_TYPE_FLAT_LAST) ||
-         (return_type == GTK_TYPE_OBJECT))
+      if (return_type != 0) /* FIXME: check for IS_PARAM */
        {
          GTK_VALUE_POINTER (*params) = va_arg (var_args, gpointer);