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.
25 #include <libbonobo.h>
26 #include <libspi/Accessibility.h>
27 #include "accessible.h"
31 check_ev (CORBA_Environment *ev, char *desc)
33 if (ev->_major != CORBA_NO_EXCEPTION) {
35 ("Accessibility app error: exception during CORBA call %s (%s)\n"),
36 CORBA_exception_id(ev), desc);
37 CORBA_exception_free(ev);
43 main(int argc, char **argv)
49 CORBA_short n_desktops;
53 Accessibility_Desktop desktop;
54 Accessibility_Application app;
55 Accessibility_Registry registry;
56 SpiListener *listener;
58 CORBA_exception_init(&ev);
60 if (!bonobo_init (&argc, argv))
62 g_error ("Could not initialize Bonobo");
65 obj_id = "OAFIID:Accessibility_Registry:1.0";
67 oclient = bonobo_activation_activate_from_id (obj_id, 0, NULL, &ev);
68 if (ev._major != CORBA_NO_EXCEPTION) {
70 ("Accessibility app error: exception during registry activation from id: %s\n"),
71 CORBA_exception_id(&ev));
72 CORBA_exception_free(&ev);
76 if (CORBA_Object_is_nil (oclient, &ev))
78 g_error ("Could not locate registry");
83 listener = spi_listener_new ();
85 registry = (Accessibility_Registry) oclient;
87 Accessibility_Registry_registerGlobalEventListener
89 (Accessibility_EventListener)
90 bonobo_object_corba_objref (bonobo_object (listener)),
93 check_ev (&ev, "register:focus");
94 Accessibility_Registry_registerGlobalEventListener
96 (Accessibility_EventListener)
97 bonobo_object_corba_objref (bonobo_object (listener)),
98 "Gtk:GtkWidget:button-press-event",
100 check_ev (&ev, "register:button_press");
101 fprintf (stderr, "AT callback registered.\n");
103 n_desktops = Accessibility_Registry_getDesktopCount (registry, &ev);
105 for (i=0; i<n_desktops; ++i)
107 desktop = Accessibility_Registry_getDesktop (registry, i, &ev);
108 s = Accessibility_Desktop__get_name (desktop, &ev);
109 fprintf (stderr, "desktop %d name: %s\n", i, s);
111 check_ev (&ev, "desktop:name");
112 n_apps = Accessibility_Desktop__get_childCount (desktop, &ev);
113 check_ev (&ev, "desktop:childCount");
114 fprintf (stderr, "desktop has %d apps:\n", n_apps);
115 for (j=0; j<n_apps; ++j)
117 app = (Accessibility_Application) Accessibility_Desktop_getChildAtIndex (desktop, j, &ev);
118 check_ev (&ev, "desktop:getChildAtIndex");
119 s = Accessibility_Application__get_name (app, &ev);
120 fprintf (stderr, "app %d name: %s\n", j, s);
122 check_ev (&ev, "app:getName");
126 fprintf (stderr, "finished querying desktop(s).\n");
128 /* needed by at because it is a server ? */