2001-11-13 Michael Meeks <michael@ximian.com>
[platform/core/uifw/at-spi2-atk.git] / atk-bridge / bridge.c
1 /*
2  * AT-SPI - Assistive Technology Service Provider Interface
3  * (Gnome Accessibility Project; http://developer.gnome.org/projects/gap)
4  *
5  * Copyright 2001 Sun Microsystems Inc.
6  *
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.
11  *
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.
16  *
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.
21  */
22
23 #include <stdio.h>
24 #include <stdlib.h>
25 #include <libbonobo.h>
26 #include <orbit/orbit.h>
27 #include <atk/atk.h>
28 #include <atk/atkobject.h>
29 #include <libspi/Accessibility.h>
30 #include "accessible.h"
31 #include "application.h"
32
33 #define APP_STATIC_BUFF_SZ 64
34
35 typedef struct _ArgStruct ArgStruct;
36
37 struct _ArgStruct {
38   gint c;
39   char **v;
40 };
41
42 static CORBA_Environment ev;
43 static Accessibility_Registry registry;
44 static SpiApplication *this_app;
45
46 static gboolean bridge_register_app (gpointer p);
47 static void bridge_focus_tracker (AtkObject *object);
48 static void bridge_exit_func(void);
49 static gboolean bridge_register_event_listener ();
50 static void register_atk_event_listeners();
51 static gboolean bridge_property_event_listener (GSignalInvocationHint *signal_hint,
52                                                 guint n_param_values,
53                                                 const GValue *param_values,
54                                                 gpointer data);
55 static gboolean bridge_signal_listener (GSignalInvocationHint *signal_hint,
56                                         guint n_param_values,
57                                         const GValue *param_values,
58                                         gpointer data);
59
60 int
61 gtk_module_init(gint *argc, gchar **argv[])
62 {
63   ArgStruct *args = (ArgStruct *) g_new0(ArgStruct, 1);
64   args->c = *argc;
65   args->v = *argv;
66   g_idle_add (bridge_register_app, args);
67   g_atexit (bridge_exit_func);
68 }
69
70 static gboolean
71 bridge_register_app (gpointer gp)
72 {
73   CORBA_Object oclient;
74   AtkObject *atko;
75   char *obj_id;
76   ArgStruct *args = (ArgStruct *)gp;
77
78   CORBA_exception_init(&ev);
79
80   if (!bonobo_init (&(args->c), args->v))
81     {
82       g_error ("Could not initialize Bonobo");
83     }
84
85   /* Create the accesssible application server object */
86   this_app = spi_application_new(atk_get_root ());
87
88   obj_id = "OAFIID:Accessibility_Registry:proto0.1";
89
90   oclient = bonobo_activation_activate_from_id (obj_id, 0, NULL, &ev);
91   if (ev._major != CORBA_NO_EXCEPTION) {
92     fprintf(stderr,
93             ("Accessibility app error: exception during registry activation from id: %s\n"),
94             CORBA_exception_id(&ev));
95     CORBA_exception_free(&ev);
96     exit(-1);
97   }
98
99   if (CORBA_Object_is_nil (oclient, &ev))
100     {
101       g_error ("Could not locate registry");
102     }
103
104   registry = (Accessibility_Registry) oclient;
105
106   fprintf(stderr, "About to register application\n");
107
108   bonobo_activate ();
109
110   Accessibility_Registry_registerApplication (registry,
111                                               CORBA_Object_duplicate (BONOBO_OBJREF (this_app), &ev),
112                                               &ev);
113
114   register_atk_event_listeners ();
115
116   return FALSE;
117 }
118
119 static void
120 register_atk_event_listeners ()
121 {
122   /* Register for focus event notifications, and register app with central registry  */
123
124 /* kludge to make sure the Atk interface types are registered, otherwise
125    the AtkText signal handlers below won't get registered */
126
127   ATK_TYPE_TEXT;
128
129   atk_add_focus_tracker (bridge_focus_tracker);
130   atk_add_global_event_listener (bridge_property_event_listener, "Gtk:AtkObject:property-change");
131 /*  atk_add_global_event_listener (bridge_signal_listener, "Gtk:AtkObject:children-changed");
132   atk_add_global_event_listener (bridge_signal_listener, "Gtk:AtkText:text-changed");
133   atk_add_global_event_listener (bridge_signal_listener, "Gtk:AtkText:text-caret-moved");*/
134 }
135
136 static void bridge_exit_func()
137 {
138   fprintf (stderr, "exiting bridge\n");
139   Accessibility_Registry_deregisterApplication (registry,
140                                                 CORBA_Object_duplicate (BONOBO_OBJREF (this_app), &ev),
141                                                 &ev);
142   fprintf (stderr, "bridge exit func complete.\n");
143 }
144
145 static void bridge_focus_tracker (AtkObject *object)
146 {
147   Accessibility_Event *e = Accessibility_Event__alloc();
148   e->type = CORBA_string_dup ("focus:");
149   e->source = CORBA_Object_duplicate (BONOBO_OBJREF (spi_accessible_new (object)), &ev);
150   e->detail1 = 0;
151   e->detail2 = 0;
152   Accessibility_Registry_notifyEvent (registry, e, &ev);
153 }
154
155 static gboolean
156 bridge_property_event_listener (GSignalInvocationHint *signal_hint,
157                                 guint n_param_values,
158                                 const GValue *param_values,
159                                 gpointer data)
160 {
161   Accessibility_Event *e = Accessibility_Event__alloc();
162   Bonobo_Unknown source = NULL;
163   AtkObject *aobject;
164   AtkPropertyValues *values;
165   GObject *gobject;
166   GSignalQuery signal_query;
167   gchar *name;
168   char sbuf[APP_STATIC_BUFF_SZ];
169   
170   g_signal_query (signal_hint->signal_id, &signal_query);
171   name = signal_query.signal_name;
172 #ifdef SPI_BRIDGE_DEBUG
173   fprintf (stderr, "Received (property) signal %s:%s\n",
174            g_type_name (signal_query.itype), name);
175 #endif
176   gobject = g_value_get_object (param_values + 0);
177   values = (AtkPropertyValues*) g_value_get_pointer (param_values + 1);
178
179   /* notify the actual listeners */
180   if (ATK_IS_IMPLEMENTOR (gobject))
181   {
182     aobject = atk_implementor_ref_accessible (ATK_IMPLEMENTOR (gobject));
183     source = CORBA_Object_duplicate (BONOBO_OBJREF (spi_accessible_new (aobject)), &ev);
184     g_object_unref (G_OBJECT(aobject));
185   }
186   else if (ATK_IS_OBJECT (gobject))
187   {
188     aobject = ATK_OBJECT (gobject);
189     source = CORBA_Object_duplicate (BONOBO_OBJREF (spi_accessible_new (aobject)), &ev);
190   }
191   else
192   {
193     g_error("received property-change event from non-AtkImplementor");
194   }
195   
196   snprintf(sbuf, APP_STATIC_BUFF_SZ, "object:property-change:%s", values->property_name);
197   e->type = CORBA_string_dup (sbuf);
198   e->source = source;
199   e->detail1 = 0;
200   e->detail2 = 0;
201   if (source)
202     Accessibility_Registry_notifyEvent (registry, e, &ev);
203   return TRUE;
204 }
205
206 static gboolean
207 bridge_signal_listener (GSignalInvocationHint *signal_hint,
208                         guint n_param_values,
209                         const GValue *param_values,
210                         gpointer data)
211 {
212   Accessibility_Event *e = g_new0(Accessibility_Event, 1);
213   AtkObject *aobject;
214   Bonobo_Unknown source;
215   AtkPropertyValues *values;
216   GObject *gobject;
217   GSignalQuery signal_query;
218   gchar *name;
219   char sbuf[APP_STATIC_BUFF_SZ];
220   
221   g_signal_query (signal_hint->signal_id, &signal_query);
222   name = signal_query.signal_name;
223 #ifdef SPI_BRIDGE_DEBUG
224   fprintf (stderr, "Received (property) signal %s:%s\n",
225            g_type_name (signal_query.itype), name);
226 #endif
227   gobject = g_value_get_object (param_values + 0);
228
229   /* notify the actual listeners */
230   if (ATK_IS_IMPLEMENTOR (gobject))
231   {
232     aobject = atk_implementor_ref_accessible (ATK_IMPLEMENTOR (gobject));
233   }
234   else if (ATK_IS_OBJECT (gobject))
235   {
236     aobject = ATK_OBJECT (gobject);
237     g_object_ref (aobject);
238   }
239   else
240   {
241     g_error("received property-change event from non-AtkImplementor");
242   }
243
244   snprintf(sbuf, APP_STATIC_BUFF_SZ, "%s:%s", name, g_type_name (signal_query.itype));
245   source =  CORBA_Object_duplicate (BONOBO_OBJREF (spi_accessible_new (aobject)), &ev);
246   e->type = CORBA_string_dup (sbuf);
247   e->source = source;
248   e->detail1 = 0;
249   e->detail2 = 0;
250   Accessibility_Registry_notifyEvent (registry, e, &ev);
251   g_object_unref (aobject);
252   return TRUE;
253 }
254
255 static Accessibility_Registry bridge_get_registry ()
256 {
257   return registry;
258 }