Initial commit.
[platform/core/uifw/at-spi2-atk.git] / libspi / application.c
index 1b5e14b..c99064f 100644 (file)
@@ -2,7 +2,9 @@
  * AT-SPI - Assistive Technology Service Provider Interface
  * (Gnome Accessibility Project; http://developer.gnome.org/projects/gap)
  *
- * Copyright 2001 Sun Microsystems Inc.
+ * Copyright 2008 Novell, Inc.
+ * Copyright 2001, 2002 Sun Microsystems Inc.,
+ * Copyright 2001, 2002 Ximian, Inc.
  *
  * This library is free software; you can redistribute it and/or
  * modify it under the terms of the GNU Library General Public
  * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  * Boston, MA 02111-1307, USA.
  */
+#include "accessible.h"
 
-/* application.c: implements SpiApplication.idl */
 
-#include <string.h>
-#include <config.h>
-#include <atk/atkutil.h>
-#include <libspi/application.h>
-
-/*
- * Our parent Gtk object type
- */
-#define PARENT_TYPE SPI_ACCESSIBLE_TYPE
-
-/*
- * A pointer to our parent object class
- */
-static SpiAccessibleClass *spi_application_parent_class;
-
-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)
+static dbus_bool_t
+impl_get_toolkitName (const char *path, DBusMessageIter * iter,
+                     void *user_data)
 {
-    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;
+  return droute_return_v_string (iter, atk_get_toolkit_name ());
 }
 
-/*
- * Implemented GObject::finalize
- */
-static void
-spi_accessible_application_finalize (GObject *object)
+static char *
+impl_get_toolkitName_str (void *datum)
 {
-  /* TODO: any necessary cleanup */
-  g_print ("application finalize called\n");
-  (G_OBJECT_CLASS (spi_application_parent_class))->finalize (object);
+  return g_strdup (atk_get_toolkit_name ());
 }
 
-static CORBA_string
-impl_accessibility_application_get_toolkit_name (PortableServer_Servant servant,
-                                                 CORBA_Environment *ev)
+static dbus_bool_t
+impl_get_version (const char *path, DBusMessageIter * iter, void *user_data)
 {
-       return CORBA_string_dup (atk_get_toolkit_name ());
+  return droute_return_v_string (iter, atk_get_toolkit_version ());
 }
 
-static CORBA_string
-impl_accessibility_application_get_version (PortableServer_Servant servant,
-                                            CORBA_Environment *ev)
+static char *
+impl_get_version_str (void *datum)
 {
-       return CORBA_string_dup (atk_get_toolkit_version ());
+  return g_strdup (atk_get_toolkit_version ());
 }
 
-static CORBA_long
-impl_accessibility_application_get_id (PortableServer_Servant servant,
-                                       CORBA_Environment *ev)
-{
-       SpiApplication *application = SPI_APPLICATION (
-               bonobo_object_from_servant (servant));
-       return application->id;
-}
+static dbus_int32_t id;
 
-static void
-impl_accessibility_application_set_id (PortableServer_Servant servant,
-                                       const CORBA_long id,
-                                       CORBA_Environment *ev)
+static dbus_bool_t
+impl_get_id (const char *path, DBusMessageIter * iter, void *user_data)
 {
-       SpiApplication *application = SPI_APPLICATION (
-               bonobo_object_from_servant (servant));
-       application->id = id;
+  return droute_return_v_int32 (iter, id);
 }
 
-#define APP_STATIC_BUFF_SZ 64
-
-static gboolean
-spi_application_object_event_listener (GSignalInvocationHint *signal_hint,
-                                  guint n_param_values,
-                                  const GValue *param_values,
-                                  gpointer data)
+static char *
+impl_get_id_str (void *datum)
 {
-  Accessibility_Event *e = Accessibility_Event__alloc();
-  AtkObject *aobject;
-  GObject *gobject;
-  SpiAccessible *source;
-  CORBA_Environment ev;
-  GSignalQuery signal_query;
-  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;
+  return g_strdup_printf ("%d", id);
 }
 
-
-static gboolean
-spi_application_toolkit_event_listener (GSignalInvocationHint *signal_hint,
-                                   guint n_param_values,
-                                   const GValue *param_values,
-                                   gpointer data)
+static dbus_bool_t
+impl_set_id (const char *path, DBusMessageIter * iter, void *user_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);
-  name = signal_query.signal_name;
-  fprintf (stderr, "Received 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);
-
-  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_OBJREF (source);
-      e->detail1 = 0;
-      e->detail2 = 0;
-      if (the_app) notify_listeners (the_app->toolkit_listeners, e, &ev);
-      bonobo_object_unref (BONOBO_OBJECT (source));
-      g_object_unref (G_OBJECT (aobject));
-    }
+  id = droute_get_v_int32 (iter);
   return TRUE;
 }
 
-static void
-impl_accessibility_application_register_toolkit_event_listener (PortableServer_Servant servant,
-                                                               Accessibility_EventListener listener,
-                                                                const CORBA_char *event_name,
-                                                                CORBA_Environment *ev)
+static DBusMessage *
+impl_registerToolkitEventListener (DBusConnection * bus,
+                                  DBusMessage * message, void *user_data)
 {
-  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",
-           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)
+static DBusMessage *
+impl_registerObjectEventListener (DBusConnection * bus, DBusMessage * message,
+                                 void *user_data)
 {
-  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
-notify_listeners (GList *listeners, Accessibility_Event *e, CORBA_Environment *ev)
+static DBusMessage *
+impl_pause (DBusConnection * bus, DBusMessage * message, void *user_data)
 {
-    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)
+static DBusMessage *
+impl_resume (DBusConnection * bus, DBusMessage * message, void *user_data)
 {
-    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)
+static DBusMessage *
+impl_getLocale (DBusConnection * bus, DBusMessage * message, void *user_data)
 {
-       *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;
-
-  spi_application_parent_class = g_type_class_ref (SPI_ACCESSIBLE_TYPE);
+static DRouteMethod methods[] = {
+  {DROUTE_METHOD, impl_registerToolkitEventListener,
+   "registerToolkitEventListener", "o,listener,i:s,eventName,i"},
+  {DROUTE_METHOD, impl_registerObjectEventListener,
+   "registerObjectEventListener", "o,listener,i:s,eventName,i"},
+  {DROUTE_METHOD, impl_pause, "pause", "b,,o"},
+  {DROUTE_METHOD, impl_resume, "resume", "b,,o"},
+  {DROUTE_METHOD, impl_getLocale, "getLocale", "u,lctype,i:s,,o"},
+  {0, NULL, NULL, NULL}
+};
 
-  object_class->finalize = spi_accessible_application_finalize;
+static DRouteProperty properties[] = {
+  {impl_get_toolkitName, impl_get_toolkitName_str, NULL, NULL, "toolkitName",
+   "s"},
+  {impl_get_version, impl_get_version_str, NULL, NULL, "version", "s"},
+  {impl_get_id, impl_get_id_str, impl_set_id, NULL, "id", "i"},
+  {NULL, NULL, NULL, NULL, NULL, NULL}
+};
 
-  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
-spi_application_init (SpiApplication  *application)
+static long
+obj_is_root (const char *path, void *user_data)
 {
-  application->parent.atko = g_object_new (ATK_TYPE_OBJECT, NULL);
-  application->toolkit_listeners = NULL;
-  the_app = application;
+  AtkObject *obj = spi_dbus_get_object (path);
+  return (obj == atk_get_root ());
 }
 
-BONOBO_TYPE_FUNC_FULL (SpiApplication,
-                      Accessibility_Application,
-                      PARENT_TYPE, spi_application);
-
-SpiApplication *
-spi_application_new (AtkObject *app_root)
+void
+spi_initialize_application (DRouteData * data)
 {
-    SpiApplication *retval = g_object_new (SPI_APPLICATION_TYPE, NULL);
-    g_object_unref (retval->parent.atko);
-    retval->parent.atko = app_root;
-    g_object_ref (G_OBJECT (app_root));
-    return retval;
-}
+  droute_add_interface (data, "org.freedesktop.accessibility.Application",
+                       methods, properties,
+                       (DRouteGetDatumFunction) obj_is_root, NULL);
+};