* 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
* Boston, MA 02111-1307, USA.
*/
-/*
- * component.c : bonobo wrapper for accessible component implementation
- *
- */
-#include <config.h>
-#include <bonobo/Bonobo.h>
-
-#include <stdio.h>
-
-/*
- * This pulls the CORBA definitions for the "Accessibility::Accessible" server
- */
-#include <libspi/Accessibility.h>
-
-/*
- * This pulls the definition of the hyperlink bonobo object
- */
-#include "hyperlink.h"
+#include "accessible.h"
-/*
- * Static function declarations
- */
-
-static void
-hyperlink_class_init (HyperlinkClass *klass);
-static void
-hyperlink_init (Hyperlink *hyperlink);
-static void
-hyperlink_finalize (GObject *obj);
-static CORBA_string
-impl_getURI (PortableServer_Servant _servant,
- const CORBA_long i, CORBA_Environment * ev);
-static CORBA_short
-impl__get_n_anchors (PortableServer_Servant _servant,
- CORBA_Environment * ev);
-static CORBA_long
-impl__get_startIndex (PortableServer_Servant _servant,
- CORBA_Environment * ev);
-static CORBA_long
-impl__get_endIndex (PortableServer_Servant _servant,
- CORBA_Environment * ev);
-static Accessibility_Accessible
-impl_getObject (PortableServer_Servant _servant,
- const CORBA_long i,
- CORBA_Environment * ev);
-static CORBA_boolean
-impl_isValid (PortableServer_Servant _servant,
- CORBA_Environment * ev);
-
-static GObjectClass *parent_class;
-
-GType
-hyperlink_get_type (void)
+static AtkHyperlink *
+get_hyperlink (DBusMessage * message)
{
- static GType type = 0;
-
- if (!type) {
- static const GTypeInfo tinfo = {
- sizeof (HyperlinkClass),
- (GBaseInitFunc) NULL,
- (GBaseFinalizeFunc) NULL,
- (GClassInitFunc) hyperlink_class_init,
- (GClassFinalizeFunc) NULL,
- NULL, /* class data */
- sizeof (Hyperlink),
- 0, /* n preallocs */
- (GInstanceInitFunc) hyperlink_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 (
- BONOBO_OBJECT_TYPE,
- POA_Accessibility_Hyperlink__init,
- NULL,
- G_STRUCT_OFFSET (HyperlinkClass, epv),
- &tinfo,
- "AccessibleHyperlink");
- }
-
- return type;
+ AtkObject *obj = spi_dbus_get_object (dbus_message_get_path (message));
+ if (!obj)
+ return NULL;
+ return ATK_HYPERLINK (obj);
}
-static void
-hyperlink_class_init (HyperlinkClass *klass)
+static AtkHyperlink *
+get_hyperlink_from_path (const char *path, void *user_data)
{
- GObjectClass * object_class = (GObjectClass *) klass;
- POA_Accessibility_Hyperlink__epv *epv = &klass->epv;
- parent_class = g_type_class_peek_parent (klass);
-
- object_class->finalize = hyperlink_finalize;
-
- /* Initialize epv table */
-
- epv->_get_n_anchors = impl__get_n_anchors;
- epv->getURI = impl_getURI;
- epv->_get_startIndex = impl__get_startIndex;
- epv->_get_endIndex = impl__get_endIndex;
- epv->getObject = impl_getObject;
- epv->isValid = impl_isValid;
+ AtkObject *obj = spi_dbus_get_object (path);
+ if (!obj || !ATK_IS_HYPERLINK(obj))
+ return NULL;
+ return ATK_HYPERLINK (obj);
}
-static void
-hyperlink_init (Hyperlink *hyperlink)
+static dbus_bool_t
+impl_get_nAnchors (const char *path, DBusMessageIter * iter, void *user_data)
{
+ AtkHyperlink *link = get_hyperlink_from_path (path, user_data);
+ if (!link)
+ return FALSE;
+ return droute_return_v_int32 (iter, atk_hyperlink_get_n_anchors (link));
}
-static void
-hyperlink_finalize (GObject *obj)
-{
- Hyperlink *hyperlink = HYPERLINK(obj);
- g_object_unref (hyperlink->atko);
- hyperlink->atko = NULL;
- parent_class->finalize (obj);
-}
-Hyperlink *
-hyperlink_interface_new (AtkObject *obj)
+static dbus_bool_t
+impl_get_startIndex (const char *path, DBusMessageIter * iter,
+ void *user_data)
{
- Hyperlink *new_hyperlink =
- HYPERLINK(g_object_new (HYPERLINK_TYPE, NULL));
- new_hyperlink->atko = obj;
- g_object_ref (obj);
- return new_hyperlink;
+ AtkHyperlink *link = get_hyperlink_from_path (path, user_data);
+ if (!link)
+ return FALSE;
+ return droute_return_v_int32 (iter, atk_hyperlink_get_start_index (link));
}
-
-
-static CORBA_short
-impl__get_n_anchors (PortableServer_Servant _servant,
- CORBA_Environment * ev)
+static dbus_bool_t
+impl_get_endIndex (const char *path, DBusMessageIter * iter, void *user_data)
{
- Hyperlink *link = HYPERLINK(bonobo_object_from_servant(_servant));
- return (CORBA_short) atk_hyperlink_get_n_anchors (ATK_HYPERLINK(link->atko));
+ AtkHyperlink *link = get_hyperlink_from_path (path, user_data);
+ if (!link)
+ return FALSE;
+ return droute_return_v_int32 (iter, atk_hyperlink_get_end_index (link));
}
-
-
-static CORBA_long
-impl__get_startIndex (PortableServer_Servant _servant,
- CORBA_Environment * ev)
+static DBusMessage *
+impl_getObject (DBusConnection * bus, DBusMessage * message, void *user_data)
{
- Hyperlink *link = HYPERLINK(bonobo_object_from_servant(_servant));
- return (CORBA_long) atk_hyperlink_get_start_index (ATK_HYPERLINK(link->atko));
-}
-
-
+ AtkHyperlink *link = get_hyperlink (message);
+ DBusError error;
+ dbus_int32_t i;
+ AtkObject *atk_object;
-static CORBA_long
-impl__get_endIndex (PortableServer_Servant _servant,
- CORBA_Environment * ev)
-{
- Hyperlink *link = HYPERLINK(bonobo_object_from_servant(_servant));
- return (CORBA_long) atk_hyperlink_get_end_index (ATK_HYPERLINK(link->atko));
+ if (!link)
+ return spi_dbus_general_error (message);
+ dbus_error_init (&error);
+ if (!dbus_message_get_args
+ (message, &error, DBUS_TYPE_INT32, &i, DBUS_TYPE_INVALID))
+ {
+ return SPI_DBUS_RETURN_ERROR (message, &error);
+ }
+ atk_object = atk_hyperlink_get_object (link, i);
+ return spi_dbus_return_object (message, atk_object, FALSE);
}
-
-
-static CORBA_string
-impl_getURI (PortableServer_Servant _servant,
- const CORBA_long i, CORBA_Environment * ev)
+static DBusMessage *
+impl_getURI (DBusConnection * bus, DBusMessage * message, void *user_data)
{
- Hyperlink *link = HYPERLINK(bonobo_object_from_servant(_servant));
- gchar *uri;
- CORBA_char *rv;
- uri = atk_hyperlink_get_uri (ATK_HYPERLINK(link->atko), (gint) i);
- rv = CORBA_string_dup (uri);
- g_free (uri);
- return rv;
-}
-
-
-
-static Accessibility_Accessible
-impl_getObject (PortableServer_Servant _servant,
- const CORBA_long i,
- CORBA_Environment * ev)
-{
- Hyperlink *link = HYPERLINK(bonobo_object_from_servant(_servant));
- AtkObject *atk_object;
- Accessibility_Accessible rv;
- atk_object = atk_hyperlink_get_object (ATK_HYPERLINK(link->atko), (gint) i);
- rv = bonobo_object_corba_objref (BONOBO_OBJECT(accessible_new(atk_object)));
- return rv;
+ AtkHyperlink *link = get_hyperlink (message);
+ dbus_int32_t i;
+ DBusError error;
+ gchar *rv;
+ DBusMessage *reply;
+
+ if (!link)
+ return spi_dbus_general_error (message);
+ dbus_error_init (&error);
+ if (!dbus_message_get_args
+ (message, &error, DBUS_TYPE_INT32, &i, DBUS_TYPE_INT32, &i,
+ DBUS_TYPE_INVALID))
+ {
+ return SPI_DBUS_RETURN_ERROR (message, &error);
+ }
+
+ rv = atk_hyperlink_get_uri (link, i);
+ if (!rv)
+ rv = g_strdup ("");
+ reply = dbus_message_new_method_return (message);
+ if (reply)
+ {
+ dbus_message_append_args (reply, DBUS_TYPE_STRING, &rv,
+ DBUS_TYPE_INVALID);
+ }
+ g_free (rv);
+ return reply;
}
-
-
-static CORBA_boolean
-impl_isValid (PortableServer_Servant _servant,
- CORBA_Environment * ev)
+static DBusMessage *
+impl_isValid (DBusConnection * bus, DBusMessage * message, void *user_data)
{
- Hyperlink *link = HYPERLINK(bonobo_object_from_servant(_servant));
- return (CORBA_boolean) atk_hyperlink_is_valid (ATK_HYPERLINK(link->atko));
+ AtkHyperlink *link = get_hyperlink (message);
+ dbus_bool_t rv;
+ DBusMessage *reply;
+
+ if (!link)
+ return spi_dbus_general_error (message);
+
+ rv = atk_hyperlink_is_valid (link);
+ reply = dbus_message_new_method_return (message);
+ if (reply)
+ {
+ dbus_message_append_args (reply, DBUS_TYPE_BOOLEAN, &rv,
+ DBUS_TYPE_INVALID);
+ }
+ return reply;
}
-
+static DRouteMethod methods[] = {
+ {impl_getObject, "getObject"},
+ {impl_getURI, "getURI"},
+ {impl_isValid, "isValid"},
+ {NULL, NULL}
+};
+
+static DRouteProperty properties[] = {
+ {impl_get_nAnchors, NULL, "nAnchors"},
+ {impl_get_startIndex, NULL, "startIndex"},
+ {impl_get_endIndex, NULL, "endIndex"},
+ {NULL, NULL, NULL}
+};
+
+void
+spi_initialize_hyperlink (DRouteData * data)
+{
+ droute_add_interface (data, "org.freedesktop.atspi.Hyperlink",
+ methods, properties,
+ (DRouteGetDatumFunction) get_hyperlink_from_path,
+ NULL);
+};