test/at.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 <libspi/Accessibility.h>
  27 #include "accessible.h"
  28 #include "listener.h"
  29 #include "desktop.h"
  30
  31 int
  32 main(int argc, char **argv)
  33 {
  34         CORBA_Environment ev;
  35         CORBA_Object oclient;
  36         char *obj_id;
  37         CORBA_long i;
  38         CORBA_short n_desktops;
  39         CORBA_long j;
  40         CORBA_long n_apps;
  41         Accessibility_Desktop desktop;
  42         Accessibility_Application app;
  43
  44         Accessibility_Registry registry;
  45         Listener *listener;
  46
  47         CORBA_exception_init(&ev);
  48
  49         if (!bonobo_init (&argc, argv))
  50           {
  51             g_error ("Could not initialize Bonobo");
  52           }
  53
  54         obj_id = "OAFIID:Accessibility_Registry:proto0.1";
  55
  56         oclient = bonobo_activation_activate_from_id (obj_id, 0, NULL, &ev);
  57         if (ev._major != CORBA_NO_EXCEPTION) {
  58                 fprintf(stderr,
  59                 ("Accessibility app error: exception during registry activation from id: %s\n"),
  60                         CORBA_exception_id(&ev));
  61                 CORBA_exception_free(&ev);
  62                 exit(-1);
  63         }
  64
  65         if (CORBA_Object_is_nil (oclient, &ev))
  66           {
  67             g_error ("Could not locate registry");
  68           }
  69
  70         bonobo_activate ();
  71
  72         listener = listener_new ();
  73
  74         registry = (Accessibility_Registry) oclient;
  75
  76         Accessibility_Registry_registerGlobalEventListener
  77                                    (registry,
  78                                     (Accessibility_EventListener)
  79                                          bonobo_object_corba_objref (bonobo_object (listener)),
  80                                     "focus:",
  81                                     &ev);
  82
  83         fprintf (stderr, "AT callback registered.\n");
  84
  85
  86             n_desktops = Accessibility_Registry_getDesktopCount (registry, &ev);
  87
  88             for (i=0; i<n_desktops; ++i)
  89               {
  90                 desktop = Accessibility_Registry_getDesktop (registry, i, &ev);
  91                 fprintf (stderr, "desktop %d name: %s\n", i,
  92                          Accessibility_Desktop__get_name (desktop, &ev));
  93                 n_apps = Accessibility_Desktop__get_childCount (desktop, &ev);
  94                 fprintf (stderr, "desktop has %d apps:\n", n_apps);
  95                 for (j=0; j<n_apps; ++j)
  96                   {
  97                     app = (Accessibility_Application) Accessibility_Desktop_getChildAtIndex (desktop, j, &ev);
  98                     fprintf (stderr, "app %d name: %s\n", j,
  99                              Accessibility_Application__get_name (app, &ev));
 100                   }
 101               }
 102
 103             fprintf (stderr, "finished querying desktop(s).\n");
 104             bonobo_main ();
 105                /* needed by at because it is a server ? */
 106         exit(0);
 107 }