2003-01-27 Padraig O'Briain <padraig.obriain@sun.com
[platform/core/uifw/at-spi2-atk.git] / registryd / desktop.c
index 040e698..4d278dc 100644 (file)
@@ -2,7 +2,8 @@
  * AT-SPI - Assistive Technology Service Provider Interface
  * (Gnome Accessibility Project; http://developer.gnome.org/projects/gap)
  *
- * Copyright 2001 Sun Microsystems Inc.
+ * Copyright 2001, 2002 Sun Microsystems Inc.,
+ * Copyright 2001, 2002 Ximian, Inc., Ximian Inc.
  *
  * This library is free software; you can redistribute it and/or
  * modify it under the terms of the GNU Library General Public
  * Boston, MA 02111-1307, USA.
  */
 
-/*
- * desktop.c: implements Desktop.idl
- *
- */
+/* desktop.c: implements SpiDesktop.idl */
 
-/* #include <config.h> */
+#include <config.h>
+#include <stdio.h>
 #include <libbonobo.h>
+#include "desktop.h"
+#include <atk/atkcomponent.h>
+#include <gdk/gdkscreen.h>
+#include <gdk/gdkx.h>
 
-#include <stdio.h>
+/* SpiDesktop signals */
+enum {
+  APPLICATION_ADDED,
+  APPLICATION_REMOVED,  
+LAST_SIGNAL
+};
+static guint spi_desktop_signals[LAST_SIGNAL];
 
-/*
- * This pulls the CORBA definitions for the "Accessibility::Accessible" server
- */
-#include <libspi/Accessibility.h>
 
-/*
- * This pulls the definition for the BonoboObject (Gtk Type)
- */
-#include "desktop.h"
+/* Our parent Gtk object type */
+#define PARENT_TYPE SPI_ACCESSIBLE_TYPE
 
-/*
- * Our parent Gtk object type
- */
-#define PARENT_TYPE ACCESSIBLE_TYPE
+typedef struct {
+       SpiDesktop *desktop;
+       Accessibility_Application ref;
+} Application;
 
-/*
- * A pointer to our parent object class
- */
-static AccessibleClass *parent_class;
+/* A pointer to our parent object class */
+static SpiAccessibleClass *parent_class;
+
+#define SPI_TYPE_ATK_DESKTOP           (spi_atk_desktop_get_type ())
+#define SPI_ATK_DESKTOP(o)             (G_TYPE_CHECK_INSTANCE_CAST ((o), SPI_TYPE_ATK_DESKTOP, SpiAtkDesktop))
+#define SPI_IS_ATK_DESKTOP(o)          (G_TYPE_CHECK_INSTANCE_TYPE ((o), SPI_TYPE_ATK_DESKTOP))
+
+typedef struct {
+       AtkObject parent;
+
+       GdkScreen *screen;
+} SpiAtkDesktop;
+
+typedef struct {
+       AtkObjectClass parent;
+} SpiAtkDesktopClass;
+
+static void spi_atk_desktop_init (SpiAtkDesktop *desktop);
+static void atk_component_interface_init (AtkComponentIface *iface);
+static void spi_atk_desktop_get_extents         (AtkComponent    *component,
+                                          gint            *x,
+                                          gint            *y,
+                                          gint            *width,
+                                          gint            *height,
+                                          AtkCoordType    coord_type);
+
+static GType 
+spi_atk_desktop_get_type ()
+{
+  static GType type = 0;
+
+  if (!type)
+    {
+      static const GTypeInfo typeInfo =
+      {
+       sizeof (SpiAtkDesktopClass),
+       (GBaseInitFunc) NULL,
+       (GBaseFinalizeFunc) NULL,
+       (GClassInitFunc) NULL,
+       (GClassFinalizeFunc) NULL,
+       NULL,
+       sizeof (SpiAtkDesktop),
+       0,
+       (GInstanceInitFunc) spi_atk_desktop_init,
+      } ;
+      static const GInterfaceInfo atk_component_info =
+       {
+        (GInterfaceInitFunc) atk_component_interface_init,
+       (GInterfaceFinalizeFunc) NULL,
+       NULL
+      };
+
+      type = g_type_register_static (ATK_TYPE_OBJECT,
+                                     "SpiAtkDesktop", &typeInfo, 0);
+      g_type_add_interface_static (type, ATK_TYPE_COMPONENT,
+                                   &atk_component_info);
+    }
+  return type;
+}
+
+static void 
+spi_atk_desktop_init (SpiAtkDesktop *desktop)
+{
+  GdkDisplay *display;
+
+  atk_object_set_name (ATK_OBJECT (desktop), "main");
+  display = gdk_x11_lookup_xdisplay (GDK_DISPLAY ());
+  desktop->screen = gdk_display_get_default_screen (display);
+}
 
 static void
-desktop_init (Desktop  *desktop)
+atk_component_interface_init (AtkComponentIface *iface)
+{
+  g_return_if_fail (iface != NULL);
+
+  iface->get_extents = spi_atk_desktop_get_extents;
+}
+
+static void 
+spi_atk_desktop_get_extents (AtkComponent *component,
+                             gint         *x,
+                             gint        *y,
+                             gint        *width,
+                             gint        *height,
+                             AtkCoordType coord_type)
+{
+  SpiAtkDesktop *desktop;
+
+  g_return_if_fail (SPI_IS_ATK_DESKTOP (component));
+  desktop = SPI_ATK_DESKTOP (component);
+  *x = 0;
+  *y = 0;
+  *width = gdk_screen_get_width (desktop->screen);
+  *height = gdk_screen_get_height (desktop->screen);
+}
+
+static void
+spi_desktop_init (SpiDesktop *desktop)
 {
-  ACCESSIBLE (desktop)->atko = g_object_new (atk_object_get_type(), NULL);
   desktop->applications = NULL;
-  atk_object_set_name (ATK_OBJECT (ACCESSIBLE (desktop)->atko), "main");
+  bonobo_object_set_immortal (BONOBO_OBJECT (desktop), TRUE);
+}
+
+static void
+spi_desktop_dispose (GObject *object)
+{
+  SpiDesktop *desktop = (SpiDesktop *) object;
+
+  while (desktop->applications)
+    {
+      Application *app = desktop->applications->data;
+      g_assert (app->ref != CORBA_OBJECT_NIL);
+      spi_desktop_remove_application (desktop, app->ref);
+    }
+
+  G_OBJECT_CLASS (parent_class)->dispose (object); 
 }
 
 static CORBA_long
 impl_desktop_get_child_count (PortableServer_Servant servant,
-                              CORBA_Environment ev)
+                              CORBA_Environment     *ev)
 {
-  Desktop *desktop = DESKTOP (bonobo_object_from_servant (servant));
+  SpiDesktop *desktop = SPI_DESKTOP (bonobo_object_from_servant (servant));
+
   if (desktop->applications)
     {
       return g_list_length (desktop->applications);
@@ -75,80 +184,162 @@ impl_desktop_get_child_count (PortableServer_Servant servant,
 
 static Accessibility_Accessible
 impl_desktop_get_child_at_index (PortableServer_Servant servant,
-                                 const CORBA_long index,
-                                 CORBA_Environment ev)
+                                 const CORBA_long       index,
+                                 CORBA_Environment     *ev)
 {
-  Desktop *desktop = DESKTOP (bonobo_object_from_servant (servant));
+  SpiDesktop  *desktop = SPI_DESKTOP (bonobo_object_from_servant (servant));
   CORBA_Object retval;
-  if ((desktop->applications) && (index < g_list_length (desktop->applications)))
+  Application *app;
+
+  app = g_list_nth_data (desktop->applications, index);
+
+  if (app)
     {
-      fprintf (stderr, "getting application %ld\n", (long) index);
-      /* */
-      fprintf (stderr, "object address %p\n",
-               g_list_nth_data (desktop->applications, index));
-      retval =  CORBA_Object_duplicate (
-              (CORBA_Object) g_list_nth_data (desktop->applications, index), ev);
+      retval = bonobo_object_dup_ref (app->ref, ev);
+      if (BONOBO_EX (ev))
+        {
+         retval = CORBA_OBJECT_NIL;
+       }
     }
   else
     {
-      fprintf (stderr, "no %ldth child\n", (long) index);
       retval = CORBA_OBJECT_NIL;
     }
+
   return (Accessibility_Accessible) retval;
 }
 
 static void
-desktop_class_init (DesktopClass  *klass)
+spi_desktop_class_init (SpiDesktopClass *klass)
+{
+  GObjectClass * object_class = (GObjectClass *) klass;
+  SpiAccessibleClass * spi_accessible_class = (SpiAccessibleClass *) klass;
+  POA_Accessibility_Accessible__epv *epv = &spi_accessible_class->epv;
+
+  object_class->dispose = spi_desktop_dispose;
+  
+  parent_class = g_type_class_ref (SPI_ACCESSIBLE_TYPE);
+
+  spi_desktop_signals[APPLICATION_ADDED] =
+    g_signal_new ("application_added",
+                 G_TYPE_FROM_CLASS (klass),
+                 G_SIGNAL_RUN_LAST,
+                 G_STRUCT_OFFSET (SpiDesktopClass, application_added),
+                 NULL, NULL,
+                 g_cclosure_marshal_VOID__UINT,
+                 G_TYPE_NONE,
+                 1, G_TYPE_UINT);
+  spi_desktop_signals[APPLICATION_REMOVED] =
+    g_signal_new ("application_removed",
+                 G_TYPE_FROM_CLASS (klass),
+                 G_SIGNAL_RUN_LAST,
+                 G_STRUCT_OFFSET (SpiDesktopClass, application_removed),
+                 NULL, NULL,
+                 g_cclosure_marshal_VOID__UINT,
+                 G_TYPE_NONE,
+                 1, G_TYPE_UINT);
+  epv->_get_childCount = impl_desktop_get_child_count;
+  epv->getChildAtIndex = impl_desktop_get_child_at_index;
+}
+
+BONOBO_TYPE_FUNC_FULL (SpiDesktop,
+                      Accessibility_Desktop,
+                      PARENT_TYPE,
+                      spi_desktop);
+
+SpiDesktop *
+spi_desktop_new (void)
 {
-        AccessibleClass * accessible_class = (AccessibleClass *) klass;
-        POA_Accessibility_Accessible__epv *epv = &accessible_class->epv;
+  SpiDesktop *desktop; 
+  SpiAccessible *accessible; 
 
-        parent_class = g_type_class_ref (ACCESSIBLE_TYPE);
+  accessible = spi_accessible_construct (SPI_DESKTOP_TYPE, g_object_new (SPI_TYPE_ATK_DESKTOP, NULL));
+  g_assert (SPI_IS_DESKTOP (accessible));
+  desktop = SPI_DESKTOP (accessible);
 
-        epv->_get_childCount = impl_desktop_get_child_count;
-        epv->getChildAtIndex = impl_desktop_get_child_at_index;
+  return desktop;
 }
 
-GType
-desktop_get_type (void)
+static void
+abnormal_application_termination (gpointer object, Application *app)
 {
-        static GType type = 0;
-
-        if (!type) {
-                static const GTypeInfo tinfo = {
-                        sizeof (DesktopClass),
-                        (GBaseInitFunc) NULL,
-                        (GBaseFinalizeFunc) NULL,
-                        (GClassInitFunc) desktop_class_init,
-                        (GClassFinalizeFunc) NULL,
-                        NULL, /* class data */
-                        sizeof (Desktop),
-                        0, /* n preallocs */
-                        (GInstanceInitFunc) desktop_init,
-                        NULL /* value table */
-                };
-                /*
-                 *   Here we use bonobo_type_unique instead of
-                 * gtk_type_unique, this 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_Desktop__init,
-                        NULL,
-                        G_STRUCT_OFFSET (DesktopClass, epv),
-                        &tinfo,
-                        "Desktop");
-        }
-
-        return type;
+  g_return_if_fail (SPI_IS_DESKTOP (app->desktop));
+
+  spi_desktop_remove_application (app->desktop, app->ref);
 }
 
-Desktop *
-desktop_new (void)
+void
+spi_desktop_add_application (SpiDesktop *desktop,
+                            const Accessibility_Application application)
 {
-    Desktop *retval =
-               DESKTOP (g_object_new (desktop_get_type (), NULL));
-    return retval;
+  CORBA_Environment ev;
+  Application       *app;
+  Accessibility_Application ref;
+
+  g_return_if_fail (SPI_IS_DESKTOP (desktop));
+
+  spi_desktop_remove_application (desktop, application);
+
+  CORBA_exception_init (&ev);
+
+  ref = bonobo_object_dup_ref (application, &ev);
+
+  if (!BONOBO_EX (&ev))
+    {
+      app = g_new (Application, 1);
+      app->desktop = desktop;
+      app->ref = ref;
+
+      desktop->applications = g_list_append (desktop->applications, app);
+
+      ORBit_small_listen_for_broken (
+             app->ref, G_CALLBACK (abnormal_application_termination), app);
+
+      g_signal_emit (G_OBJECT (desktop),
+                    spi_desktop_signals[APPLICATION_ADDED], 0,
+                    g_list_index (desktop->applications, app));
+    }
+
+  CORBA_exception_free (&ev);
+}
+
+void
+spi_desktop_remove_application (SpiDesktop *desktop,
+                               const Accessibility_Application app_ref)
+{
+  guint idx;
+  GList *l;
+  CORBA_Environment ev;
+
+  g_return_if_fail (app_ref != CORBA_OBJECT_NIL);
+  g_return_if_fail (SPI_IS_DESKTOP (desktop));
+
+  CORBA_exception_init (&ev);
+
+  idx = 0;
+  for (l = desktop->applications; l; l = l->next)
+    {
+      Application *app = (Application *) l->data;
+
+      if (CORBA_Object_is_equivalent (app->ref, app_ref, &ev))
+        {
+         break;
+       }
+      idx++;
+    }
+
+  CORBA_exception_free (&ev);
+
+  if (l)
+    {
+      Application *app = (Application *) l->data;
+
+      desktop->applications = g_list_delete_link (desktop->applications, l);
+
+      ORBit_small_unlisten_for_broken (app->ref, G_CALLBACK (abnormal_application_termination));
+      bonobo_object_release_unref (app->ref, NULL);
+      g_free (app);
+      
+      g_signal_emit (G_OBJECT (desktop), spi_desktop_signals[APPLICATION_REMOVED], 0, idx);
+    }
 }