2 * AT-SPI - Assistive Technology Service Provider Interface
3 * (Gnome Accessibility Project; http://developer.gnome.org/projects/gap)
5 * Copyright 2001 Sun Microsystems Inc.
7 * This library is free software; you can redistribute it and/or
8 * modify it under the terms of the GNU Library General Public
9 * License as published by the Free Software Foundation; either
10 * version 2 of the License, or (at your option) any later version.
12 * This library is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 * Library General Public License for more details.
17 * You should have received a copy of the GNU Library General Public
18 * License along with this library; if not, write to the
19 * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
20 * Boston, MA 02111-1307, USA.
24 * listener.c: test for accessibility implementation
33 #include <bonobo/Bonobo.h>
34 #include <libspi/Accessibility.h>
37 * This pulls the definition for the BonoboObject (GType)
42 * Our parent Gtk object type
44 #define PARENT_TYPE BONOBO_OBJECT_TYPE
47 * A pointer to our parent object class
49 static GObjectClass *listener_parent_class;
52 * Implemented GObject::finalize
55 listener_object_finalize (GObject *object)
57 /* Listener *listener = LISTENER (object); */
60 fprintf(stderr, "listener_object_finalize called\n");
62 listener_parent_class->finalize (object);
66 * CORBA Accessibility::Listener::notifyEvent method implementation
70 impl_notify_event (PortableServer_Servant servant,
71 const Accessibility_Event *e,
72 CORBA_Environment *ev)
75 fprintf (stderr, "notify...\n");
76 fprintf (stderr, "source name: '%s'\n",
77 Accessibility_Accessible__get_name(e->target, ev));
78 if (ev->_major != CORBA_NO_EXCEPTION) {
80 ("Accessibility app error: exception during event notification: %s\n"),
81 CORBA_exception_id(ev));
84 fprintf (stderr, "source is component ? : %s\n",
85 Accessibility_Accessible_queryInterface (e->target,
86 "IDL:Accessibility/Component:1.0",
91 Accessibility_Accessible_unref(e->target, ev);
96 listener_class_init (ListenerClass *klass)
98 GObjectClass * object_class = (GObjectClass *) klass;
99 POA_Accessibility_EventListener__epv *epv = &klass->epv;
100 listener_parent_class = g_type_class_ref (BONOBO_OBJECT_TYPE);
102 object_class->finalize = listener_object_finalize;
104 epv->notifyEvent = impl_notify_event;
108 listener_init (Listener *listener)
113 listener_get_type (void)
115 static GType type = 0;
118 static const GTypeInfo tinfo = {
119 sizeof (ListenerClass),
120 (GBaseInitFunc) NULL,
121 (GBaseFinalizeFunc) NULL,
122 (GClassInitFunc) listener_class_init,
123 (GClassFinalizeFunc) NULL,
124 NULL, /* class data */
127 (GInstanceInitFunc) listener_init,
128 NULL /* value table */
131 * Here we use bonobo_type_unique instead of
132 * gtk_type_unique, this auto-generates a load of
133 * CORBA structures for us. All derived types must
134 * use bonobo_type_unique.
136 type = bonobo_type_unique (
138 POA_Accessibility_EventListener__init,
140 G_STRUCT_OFFSET (ListenerClass, epv),
152 LISTENER (g_object_new (listener_get_type (), NULL));