Add a check for lack of memory
[platform/core/uifw/at-spi2-atk.git] / libspi / application.c
index 32f8f90..c99064f 100644 (file)
@@ -2,6 +2,7 @@
  * AT-SPI - Assistive Technology Service Provider Interface
  * (Gnome Accessibility Project; http://developer.gnome.org/projects/gap)
  *
+ * Copyright 2008 Novell, Inc.
  * Copyright 2001, 2002 Sun Microsystems Inc.,
  * Copyright 2001, 2002 Ximian, Inc.
  *
  * 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,
-                             SpiAccessible *source,
-                             Accessibility_Event *e);
-
-static const 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)
 {
-  GList *l;
-  SpiApplication *application = (SpiApplication *) object;
-  CORBA_Environment ev;
-
-  CORBA_exception_init (&ev);
-
-  for (l = application->toolkit_listeners; l; l = l->next)
-    {
-      CORBA_Object_release ((CORBA_Object) l->data, &ev);
-    }
-
-  CORBA_exception_free (&ev);
-
-  g_list_free (application->toolkit_listeners);
-  application->toolkit_listeners = NULL;
-
-  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);
 }
 
-static AtkObject *
-get_atk_object_ref (GObject *gobject)
+static char *
+impl_get_id_str (void *datum)
 {
-  AtkObject *aobject;
-
-  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");
-    }
-
-  return aobject;
+  return g_strdup_printf ("%d", id);
 }
 
-static gboolean
-spi_application_object_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;
-  AtkObject     *aobject;
-  SpiAccessible *source;
-  GSignalQuery   signal_query;
-  gchar         *event_name;
-  const char    *generic_name;
-
-  g_return_val_if_fail (the_app != NULL, FALSE);
-  
-  g_signal_query (signal_hint->signal_id, &signal_query);
-
-  /* TODO: move GTK reference out of app.c into bridge */
-  event_name = g_strdup_printf ("Gtk:%s:%s",
-                               g_type_name (signal_query.itype),
-                               signal_query.signal_name);
-
-  generic_name = reverse_lookup_name_for_toolkit_event (event_name);
-
-  fprintf (stderr, "Received (object) signal %s maps to '%s'\n",
-          event_name, generic_name);
-
-  g_free (event_name);
-
-  g_return_val_if_fail (generic_name, FALSE);
-
-  aobject = get_atk_object_ref (g_value_get_object (param_values + 0));
-
-  source = spi_accessible_new (aobject);
-  e.type = CORBA_string_dup (generic_name);
-  e.source = CORBA_OBJECT_NIL;
-  e.detail1 = 0;
-  e.detail2 = 0;
-  spi_init_any_nil (&e.any_data);
-  notify_listeners (the_app->toolkit_listeners, source, &e);
-
-  bonobo_object_unref (BONOBO_OBJECT (source));
-
-  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;
-  AtkObject      *aobject;
-  SpiAccessible *source;
-  GSignalQuery   signal_query;
-  char          *event_name;
-
-  g_return_val_if_fail (the_app != NULL, FALSE);
-
-  g_signal_query (signal_hint->signal_id, &signal_query);
-
-  /* TODO: move GTK reference out of app.c into bridge */
-  event_name = g_strdup_printf ("Gtk:%s:%s",
-                               g_type_name (signal_query.itype), 
-                               signal_query.signal_name);
-
-#ifdef SPI_DEBUG  
-  fprintf (stderr, "Received signal %s\n", event_name);
-#endif
-  
-  aobject = get_atk_object_ref (g_value_get_object (param_values + 0));
-
-  source = spi_accessible_new (aobject);
-  e.type = CORBA_string_dup (event_name);
-  e.source = CORBA_OBJECT_NIL;
-  e.detail1 = 0;
-  e.detail2 = 0;
-  spi_init_any_nil (&e.any_data);
-  notify_listeners (the_app->toolkit_listeners, source, &e);
-
-  bonobo_object_unref (BONOBO_OBJECT (source));
-  g_object_unref (G_OBJECT (aobject));
-
-  g_free (event_name);
-
+  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, 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,
-                                     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, SpiAccessible *source, Accessibility_Event *e)
+static DBusMessage *
+impl_pause (DBusConnection * bus, DBusMessage * message, void *user_data)
 {
-  GList *l;
-  CORBA_Environment ev;
-
-  CORBA_exception_init (&ev);
-
-  for (l = listeners; l; l = l->next)
-    {
-      Accessibility_EventListener listener = l->data;
-
-      e->source = bonobo_object_dup_ref (BONOBO_OBJREF (source), &ev);
-
-      Accessibility_EventListener_notifyEvent (listener, e, &ev);
-      /*
-       * when this (oneway) call completes, the CORBA refcount and
-       * Bonobo_Unknown refcount will be decremented by the recipient
-       */
-      CORBA_exception_free (&ev);
-    }
 }
 
-static const char *
-reverse_lookup_name_for_toolkit_event (char *toolkit_specific_name)
+static DBusMessage *
+impl_resume (DBusConnection * bus, DBusMessage * message, void *user_data)
 {
-    const 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 =
-           (const 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);
-
-  object_class->finalize = spi_accessible_application_finalize;
+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}
+};
 
-  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 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}
+};
 
-static void
-spi_application_init (SpiApplication *application)
+static long
+obj_is_root (const char *path, void *user_data)
 {
-  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)
 {
-  return SPI_APPLICATION (spi_accessible_construct (
-       SPI_APPLICATION_TYPE, app_root));
-}
+  droute_add_interface (data, "org.freedesktop.accessibility.Application",
+                       methods, properties,
+                       (DRouteGetDatumFunction) obj_is_root, NULL);
+};