Started fixing IDL docs.
[platform/core/uifw/at-spi2-atk.git] / libspi / application.c
index 8c31dd7..e7d1a66 100644 (file)
  * Boston, MA 02111-1307, USA.
  */
 
-/*
- * application.c: implements Application.idl
- *
- */
+/* application.c: implements SpiApplication.idl */
+
+#include <string.h>
 #include <config.h>
-#include <bonobo/Bonobo.h>
 #include <atk/atkutil.h>
-
-/*
- * This pulls the CORBA definitions for the "Accessibility::Accessible" server
- */
-#include <libspi/Accessibility.h>
-
-/*
- * This pulls the definition for the BonoboObject (GObject Type)
- */
-#include "application.h"
+#include <libspi/application.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 *reverse_lookup_name_for_toolkit_event (char *toolkit_name);
+
+static const char *
+lookup_toolkit_event_for_name (const 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;
+}
 
 /*
  * 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
 impl_accessibility_application_get_toolkit_name (PortableServer_Servant servant,
                                                  CORBA_Environment *ev)
 {
-  CORBA_char *retval;
-  Application *application = APPLICATION (bonobo_object_from_servant (servant));
-  retval = CORBA_string_dup (atk_get_toolkit_name ());
-  return retval;
+       return CORBA_string_dup (atk_get_toolkit_name ());
 }
 
 static CORBA_string
 impl_accessibility_application_get_version (PortableServer_Servant servant,
                                             CORBA_Environment *ev)
 {
-  CORBA_char *retval;
-  Application *application = APPLICATION (bonobo_object_from_servant (servant));
-  retval = CORBA_string_dup (atk_get_toolkit_version ());
-  return retval;
+       return CORBA_string_dup (atk_get_toolkit_version ());
 }
 
 static CORBA_long
 impl_accessibility_application_get_id (PortableServer_Servant servant,
                                        CORBA_Environment *ev)
 {
-  CORBA_long retval;
-  Application *application = APPLICATION (bonobo_object_from_servant (servant));
-  retval = (CORBA_long) application->id;
-  return retval;
+       SpiApplication *application = SPI_APPLICATION (
+               bonobo_object_from_servant (servant));
+       return application->id;
 }
 
 static void
@@ -100,24 +101,93 @@ impl_accessibility_application_set_id (PortableServer_Servant servant,
                                        const CORBA_long id,
                                        CORBA_Environment *ev)
 {
-  Application *application = APPLICATION (bonobo_object_from_servant (servant));
-  application->id = id;
+       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 = 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;
+  const 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
+  {
+    aobject = NULL;
+    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 = Accessibility_Event__alloc();
+  AtkObject *aobject;
+  GObject *gobject;
+  SpiAccessible *source;
+  CORBA_Environment ev;
+  GSignalQuery signal_query;
+  const char *name;
   char sbuf[APP_STATIC_BUFF_SZ];
 
   g_signal_query (signal_hint->signal_id, &signal_query);
@@ -127,102 +197,151 @@ 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->source = 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 (BONOBO_OBJECT (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, (char *) 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 = 0;
+  const 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 *
+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)
-{
-  ACCESSIBLE (application)->atko = g_object_new (atk_object_get_type(), NULL);
-}
-
-GType
-application_get_type (void)
-{
-        static GType type = 0;
-
-        if (!type) {
-                static const GTypeInfo tinfo = {
-                        sizeof (ApplicationClass),
-                        (GBaseInitFunc) NULL,
-                        (GBaseFinalizeFunc) NULL,
-                        (GClassInitFunc) application_class_init,
-                        (GClassFinalizeFunc) NULL,
-                        NULL, /* class data */
-                        sizeof (Application),
-                        0, /* n preallocs */
-                        (GInstanceInitFunc) application_init,
-                        NULL /* value table */
-                };
-                /*
-                 * Bonobo_type_unique auto-generates a load of
-                 * CORBA structures for us. All derived types must
-                 * use bonobo_type_unique.
-                 */
-                type = bonobo_type_unique (
-                        PARENT_TYPE,
-                        POA_Accessibility_Application__init,
-                        NULL,
-                        G_STRUCT_OFFSET (ApplicationClass, epv),
-                        &tinfo,
-                        "Application");
-        }
-
-        return type;
-}
-
-Application *
-application_new (AtkObject *app_root)
-{
-    Application *retval =
-               APPLICATION (g_object_new (application_get_type (), NULL));
-    ACCESSIBLE (retval)->atko = app_root;
+spi_application_init (SpiApplication  *application)
+{
+  application->parent.atko = g_object_new (ATK_TYPE_OBJECT, NULL);
+  application->toolkit_listeners = NULL;
+  the_app = application;
+}
+
+BONOBO_TYPE_FUNC_FULL (SpiApplication,
+                      Accessibility_Application,
+                      PARENT_TYPE, spi_application);
+
+SpiApplication *
+spi_application_new (AtkObject *app_root)
+{
+    SpiApplication *retval = g_object_new (SPI_APPLICATION_TYPE, NULL);
+    retval->parent.atko = app_root;
+    g_object_ref (G_OBJECT (app_root));
     return retval;
 }