2001-11-13 Michael Meeks <michael@ximian.com>
[platform/core/uifw/at-spi2-atk.git] / libspi / application.c
index c305ae4..2a1fcde 100644 (file)
  */
 
 /*
- * application.c: implements Application.idl
+ * application.c: implements SpiApplication.idl
  *
  */
+#include <string.h>
 #include <config.h>
 #include <bonobo/Bonobo.h>
 #include <atk/atkutil.h>
 /*
  * Our parent Gtk object type
  */
-#define PARENT_TYPE ACCESSIBLE_TYPE
+#define PARENT_TYPE SPI_ACCESSIBLE_TYPE
 
 /*
  * A pointer to our parent object class
  */
-static AccessibleClass *application_parent_class;
+static SpiAccessibleClass *spi_application_parent_class;
 
-Accessibility_EventListener the_toolkit_listener;
+static SpiApplication *the_app;
+
+/* static methods */
+
+static void notify_listeners (GList *listeners,
+                             Accessibility_Event *e,
+                             CORBA_Environment *ev);
+
+static char* lookup_toolkit_event_for_name (char *generic_name);
+
+static char* reverse_lookup_name_for_toolkit_event (char *toolkit_name);
 
 /*
  * Implemented GObject::finalize
  */
 static void
-accessible_application_finalize (GObject *object)
+spi_accessible_application_finalize (GObject *object)
 {
   /* TODO: any necessary cleanup */
-  Accessible *accessible = ACCESSIBLE (object);
-
-  g_object_unref (accessible->atko);
-  accessible->atko = NULL;
-
-  /* TODO: chain to parent class instead */
+  (G_OBJECT_CLASS (spi_application_parent_class))->finalize (object);
 }
 
 static CORBA_string
@@ -70,7 +76,7 @@ impl_accessibility_application_get_toolkit_name (PortableServer_Servant servant,
                                                  CORBA_Environment *ev)
 {
   CORBA_char *retval;
-  Application *application = APPLICATION (bonobo_object_from_servant (servant));
+  SpiApplication *application = SPI_APPLICATION (bonobo_object_from_servant (servant));
   retval = CORBA_string_dup (atk_get_toolkit_name ());
   return retval;
 }
@@ -80,41 +86,108 @@ impl_accessibility_application_get_version (PortableServer_Servant servant,
                                             CORBA_Environment *ev)
 {
   CORBA_char *retval;
-  Application *application = APPLICATION (bonobo_object_from_servant (servant));
+  SpiApplication *application = SPI_APPLICATION (bonobo_object_from_servant (servant));
   retval = CORBA_string_dup (atk_get_toolkit_version ());
   return retval;
 }
 
-static CORBA_string
+static CORBA_long
 impl_accessibility_application_get_id (PortableServer_Servant servant,
-                                                 CORBA_Environment *ev)
+                                       CORBA_Environment *ev)
 {
-  CORBA_char *retval;
-  Application *application = APPLICATION (bonobo_object_from_servant (servant));
-  retval = CORBA_string_dup (application->id);
+  CORBA_long retval;
+  SpiApplication *application = SPI_APPLICATION (bonobo_object_from_servant (servant));
+  retval = (CORBA_long) application->id;
   return retval;
 }
 
 static void
 impl_accessibility_application_set_id (PortableServer_Servant servant,
-                                       const CORBA_char *id,
+                                       const CORBA_long id,
                                        CORBA_Environment *ev)
 {
-  Application *application = APPLICATION (bonobo_object_from_servant (servant));
+  SpiApplication *application = SPI_APPLICATION (bonobo_object_from_servant (servant));
   application->id = id;
 }
 
 #define APP_STATIC_BUFF_SZ 64
 
 static gboolean
-application_toolkit_listener (GSignalInvocationHint *signal_hint,
-                              guint n_param_values,
-                              const GValue *param_values,
-                              gpointer data)
+spi_application_object_event_listener (GSignalInvocationHint *signal_hint,
+                                  guint n_param_values,
+                                  const GValue *param_values,
+                                  gpointer data)
+{
+  Accessibility_Event *e = Accessibility_Event__alloc();
+  AtkObject *aobject;
+  GObject *gobject;
+  SpiAccessible *source;
+  CORBA_Environment ev;
+  GSignalQuery signal_query;
+  gchar *name;
+  char sbuf[APP_STATIC_BUFF_SZ];
+  char *generic_name;
+  
+  g_signal_query (signal_hint->signal_id, &signal_query);
+  name = signal_query.signal_name;
+  fprintf (stderr, "Received (object) signal %s:%s\n",
+          g_type_name (signal_query.itype), name);
+
+  /* TODO: move GTK dependency out of app.c into bridge */
+  snprintf(sbuf, APP_STATIC_BUFF_SZ, "Gtk:%s:%s", g_type_name (signal_query.itype), name);
+
+  generic_name = reverse_lookup_name_for_toolkit_event (sbuf);
+  gobject = g_value_get_object (param_values + 0);
+
+  /* notify the actual listeners */
+  if (ATK_IS_IMPLEMENTOR (gobject))
+  {
+    aobject = atk_implementor_ref_accessible (ATK_IMPLEMENTOR (gobject));
+  }
+  else if (ATK_IS_OBJECT (gobject))
+  {
+    aobject = ATK_OBJECT (gobject);
+    g_object_ref (G_OBJECT (aobject));
+  }
+  else
+  {
+    g_error("received event from non-AtkImplementor");
+  }
+
+  g_return_val_if_fail (generic_name, FALSE);
+  if (generic_name)
+    {
+        source = spi_accessible_new (aobject);
+       e->type = CORBA_string_dup (generic_name);
+       e->source = BONOBO_OBJREF (source);
+        /*
+        * no need to dup this ref, since it's inprocess               
+        * and will be dup'ed by (inprocess) notify_listeners() call below
+        */
+       e->detail1 = 0;
+       e->detail2 = 0;
+       if (the_app) notify_listeners (the_app->toolkit_listeners, e, &ev);
+        /* unref because the in-process notify has called b_o_dup_ref (e->source) */
+        bonobo_object_release_unref (e->source, &ev); 
+    }
+  /* and, decrement the refcount on atkobject, incremented moments ago:
+   *  the call to spi_accessible_new() above should have added an extra ref */
+  g_object_unref (G_OBJECT (aobject));
+
+  return TRUE;
+}
+
+
+static gboolean
+spi_application_toolkit_event_listener (GSignalInvocationHint *signal_hint,
+                                   guint n_param_values,
+                                   const GValue *param_values,
+                                   gpointer data)
 {
-  Accessibility_Event *e = g_new0(Accessibility_Event, 1);
+  Accessibility_Event *e = Accessibility_Event__alloc();
   AtkObject *aobject;
   GObject *gobject;
+  SpiAccessible *source;
   CORBA_Environment ev;
   GSignalQuery signal_query;
   gchar *name;
@@ -127,78 +200,173 @@ application_toolkit_listener (GSignalInvocationHint *signal_hint,
   /* TODO: move GTK dependency out of app.c into bridge */
   snprintf(sbuf, APP_STATIC_BUFF_SZ, "Gtk:%s:%s", g_type_name (signal_query.itype), name);
 
-
   gobject = g_value_get_object (param_values + 0);
   /* notify the actual listeners */
   if (ATK_IS_IMPLEMENTOR (gobject))
     {
       aobject = atk_implementor_ref_accessible (ATK_IMPLEMENTOR (gobject));
+      source = spi_accessible_new (aobject);
       e->type = CORBA_string_dup (sbuf);
-      e->target = bonobo_object_corba_objref (bonobo_object (accessible_new (aobject)));
+      e->source = BONOBO_OBJREF (source);
       e->detail1 = 0;
       e->detail2 = 0;
-      Accessibility_EventListener_notifyEvent (the_toolkit_listener, e, &ev);
-      g_object_unref (aobject);
+      if (the_app) notify_listeners (the_app->toolkit_listeners, e, &ev);
+      bonobo_object_unref (source);
+      g_object_unref (G_OBJECT (aobject));
     }
   return TRUE;
 }
 
 static void
 impl_accessibility_application_register_toolkit_event_listener (PortableServer_Servant servant,
-                                                                Accessibility_EventListener listener,
+                                                               Accessibility_EventListener listener,
                                                                 const CORBA_char *event_name,
                                                                 CORBA_Environment *ev)
 {
-  guint listener_id;
-  listener_id =
-     atk_add_global_event_listener (application_toolkit_listener, event_name);
-  the_toolkit_listener = CORBA_Object_duplicate (listener, ev);
+  guint spi_listener_id;
+  spi_listener_id =
+     atk_add_global_event_listener (spi_application_toolkit_event_listener, event_name);
+  the_app->toolkit_listeners = g_list_append (the_app->toolkit_listeners,
+                                             CORBA_Object_duplicate (listener, ev));
 #ifdef SPI_DEBUG
   fprintf (stderr, "registered %d for toolkit events named: %s\n",
-           listener_id,
+           spi_listener_id,
+           event_name);
+#endif
+}
+
+static void
+impl_accessibility_application_register_object_event_listener (PortableServer_Servant servant,
+                                                              Accessibility_EventListener listener,
+                                                              const CORBA_char *event_name,
+                                                              CORBA_Environment *ev)
+{
+  guint spi_listener_id;
+  char *toolkit_specific_event_name = lookup_toolkit_event_for_name (event_name);
+  if (toolkit_specific_event_name)
+  {
+    spi_listener_id =
+       atk_add_global_event_listener (spi_application_object_event_listener,
+                                     CORBA_string_dup (toolkit_specific_event_name));
+    the_app->toolkit_listeners = g_list_append (the_app->toolkit_listeners,
+                                             CORBA_Object_duplicate (listener, ev));
+  }
+#ifdef SPI_DEBUG
+  fprintf (stderr, "registered %d for object events named: %s\n",
+           spi_listener_id,
            event_name);
 #endif
 }
 
 static void
-application_class_init (ApplicationClass *klass)
+notify_listeners (GList *listeners, Accessibility_Event *e, CORBA_Environment *ev)
+{
+    int n_listeners=0;
+    int i;
+    if (listeners) n_listeners = g_list_length (listeners);
+
+    for (i=0; i<n_listeners; ++i) {
+        Accessibility_EventListener listener;
+       e->source = bonobo_object_dup_ref (e->source, ev); 
+       listener = (Accessibility_EventListener) g_list_nth_data (listeners, i);
+       Accessibility_EventListener_notifyEvent (listener, e, ev);
+       /*
+        * when this (oneway) call completes, the CORBA refcount and
+        * Bonobo_Unknown refcount will be decremented by the recipient
+        */
+    }
+}
+
+static char *
+lookup_toolkit_event_for_name (char *generic_name)
+{
+    char *toolkit_specific_name;
+    SpiApplicationClass *klass = g_type_class_peek (SPI_APPLICATION_TYPE);
+#ifdef SPI_DEBUG
+    fprintf (stderr, "looking for %s in hash table.\n", generic_name);
+#endif
+    toolkit_specific_name =
+           (char *) g_hash_table_lookup (klass->toolkit_event_names, generic_name);
+#ifdef SPI_DEBUG
+    fprintf (stderr, "generic event %s converted to %s\n", generic_name, toolkit_specific_name);
+#endif
+    return toolkit_specific_name;
+}
+
+static char *
+reverse_lookup_name_for_toolkit_event (char *toolkit_specific_name)
+{
+    char *generic_name;
+    SpiApplicationClass *klass = g_type_class_peek (SPI_APPLICATION_TYPE);
+#ifdef SPI_DEBUG
+    fprintf (stderr, "(reverse lookup) looking for %s in hash table.\n", toolkit_specific_name);
+#endif
+    generic_name =
+           (char *) g_hash_table_lookup (klass->generic_event_names, toolkit_specific_name);
+#ifdef SPI_DEBUG
+    fprintf (stderr, "toolkit event %s converted to %s\n", toolkit_specific_name, generic_name);
+#endif
+    return generic_name;
+}
+
+static void
+init_toolkit_names (GHashTable **generic_event_names, GHashTable **toolkit_event_names)
+{
+       *toolkit_event_names = g_hash_table_new (g_str_hash, g_str_equal);
+       *generic_event_names = g_hash_table_new (g_str_hash, g_str_equal);
+       g_hash_table_insert (*toolkit_event_names,
+                            "object:property-change",
+                            "Gtk:AtkObject:property-change");
+       g_hash_table_insert (*generic_event_names,
+                            "Gtk:AtkObject:property-change",
+                            "object:property-change");
+#ifdef SPI_DEBUG
+       fprintf (stderr, "inserted spi_selection_changed hash\n");
+#endif
+}
+
+static void
+spi_application_class_init (SpiApplicationClass *klass)
 {
   GObjectClass * object_class = (GObjectClass *) klass;
   POA_Accessibility_Application__epv *epv = &klass->epv;
 
-  application_parent_class = g_type_class_ref (ACCESSIBLE_TYPE);
+  spi_application_parent_class = g_type_class_ref (SPI_ACCESSIBLE_TYPE);
 
-  object_class->finalize = accessible_application_finalize;
+  object_class->finalize = spi_accessible_application_finalize;
 
   epv->_get_toolkitName = impl_accessibility_application_get_toolkit_name;
   epv->_get_version = impl_accessibility_application_get_version;
   epv->_get_id = impl_accessibility_application_get_id;
   epv->_set_id = impl_accessibility_application_set_id;
   epv->registerToolkitEventListener = impl_accessibility_application_register_toolkit_event_listener;
+  init_toolkit_names (&klass->generic_event_names, &klass->toolkit_event_names);
 }
 
 static void
-application_init (Application  *application)
+spi_application_init (SpiApplication  *application)
 {
-  ACCESSIBLE (application)->atko = g_object_new (atk_object_get_type(), NULL);
+  SPI_ACCESSIBLE (application)->atko = g_object_new (atk_object_get_type(), NULL);
+  application->toolkit_listeners = (GList *) NULL;
+  the_app = application;
 }
 
 GType
-application_get_type (void)
+spi_application_get_type (void)
 {
         static GType type = 0;
 
         if (!type) {
                 static const GTypeInfo tinfo = {
-                        sizeof (ApplicationClass),
+                        sizeof (SpiApplicationClass),
                         (GBaseInitFunc) NULL,
                         (GBaseFinalizeFunc) NULL,
-                        (GClassInitFunc) application_class_init,
+                        (GClassInitFunc) spi_application_class_init,
                         (GClassFinalizeFunc) NULL,
                         NULL, /* class data */
-                        sizeof (Application),
+                        sizeof (SpiApplication),
                         0, /* n preallocs */
-                        (GInstanceInitFunc) application_init,
+                        (GInstanceInitFunc) spi_application_init,
                         NULL /* value table */
                 };
                 /*
@@ -210,19 +378,20 @@ application_get_type (void)
                         PARENT_TYPE,
                         POA_Accessibility_Application__init,
                         NULL,
-                        G_STRUCT_OFFSET (ApplicationClass, epv),
+                        G_STRUCT_OFFSET (SpiApplicationClass, epv),
                         &tinfo,
-                        "Application");
+                        "SpiApplication");
         }
 
         return type;
 }
 
-Application *
-application_new (AtkObject *app_root)
+SpiApplication *
+spi_application_new (AtkObject *app_root)
 {
-    Application *retval =
-               APPLICATION (g_object_new (application_get_type (), NULL));
-    ACCESSIBLE (retval)->atko = app_root;
+    SpiApplication *retval =
+               SPI_APPLICATION (g_object_new (spi_application_get_type (), NULL));
+    SPI_ACCESSIBLE (retval)->atko = app_root;
+    g_object_ref (G_OBJECT (app_root));
     return retval;
 }