test/simple-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 <stdlib.h>
  24 #include <sys/socket.h>
  25 #include <sys/un.h>
  26 #include "spi.h"
  27
  28 static void report_focus_event (void *fp);
  29 static void report_button_press (void *fp);
  30 static boolean report_key_event (void *fp);
  31 static void check_property_change (void *fp);
  32 static void get_environment_vars (void);
  33
  34 static int _festival_init ();
  35 static void _festival_say (const char *text, const char *voice, boolean shutup);
  36 static void _festival_write (const char *buff, int fd);
  37
  38 static boolean use_magnifier = FALSE;
  39 static boolean use_festival = FALSE;
  40 static boolean festival_chatty = FALSE;
  41
  42 static AccessibleEventListener *focus_listener;
  43 static AccessibleEventListener *property_listener;
  44 static AccessibleEventListener *button_listener;
  45 static KeystrokeListener *key_listener;
  46
  47 int
  48 main(int argc, char **argv)
  49 {
  50   int i, j;
  51   int n_desktops;
  52   int n_apps;
  53   Accessible *desktop;
  54   Accessible *application;
  55
  56   if ((argc > 1) && (!strncmp(argv[1],"-h",2)))
  57   {
  58     printf ("Usage: simple-at\n");
  59     printf ("\tEnvironment variables used:\n\t\tFESTIVAL\n\t\tMAGNIFIER\n\t\tFESTIVAL_CHATTY\n");
  60     exit(0);
  61   }
  62
  63   SPI_init();
  64
  65   focus_listener = createEventListener (report_focus_event);
  66   property_listener = createEventListener (check_property_change);
  67   button_listener = createEventListener (report_button_press);
  68   registerGlobalEventListener (focus_listener, "focus:");
  69   registerGlobalEventListener (property_listener, "object:property-change:accessible-selection");
  70   registerGlobalEventListener (button_listener, "Gtk:GtkWidget:button-press-event");
  71   n_desktops = getDesktopCount ();
  72
  73   for (i=0; i<n_desktops; ++i)
  74     {
  75       desktop = getDesktop (i);
  76       fprintf (stderr, "desktop %d name: %s\n", i, Accessible_getName (desktop));
  77       n_apps = Accessible_getChildCount (desktop);
  78       for (j=0; j<n_apps; ++j)
  79         {
  80           application = Accessible_getChildAtIndex (desktop, j);
  81           fprintf (stderr, "app %d name: %s\n", j, Accessible_getName (application));
  82           Accessible_unref (application);
  83         }
  84     }
  85
  86   /* prepare the keyboard snoopers */
  87   key_listener = createKeystrokeListener(report_key_event);
  88   /* will listen only to Alt-key combinations */
  89   registerKeystrokeListener(key_listener,
  90                             (KeySet *) ALL_KEYS,
  91                             KEYMASK_ALT,
  92                             (unsigned long) ( KeyPress | KeyRelease),
  93                             KEYLISTENER_CANCONSUME);
  94
  95   get_environment_vars();
  96
  97   SPI_event_main(TRUE);
  98 }
  99
 100 static void
 101 get_environment_vars()
 102 {
 103   if (getenv ("FESTIVAL"))
 104   {
 105     use_festival = TRUE;
 106     if (getenv ("FESTIVAL_CHATTY"))
 107     {
 108       festival_chatty = TRUE;
 109     }
 110   }
 111   if (getenv("MAGNIFIER"))
 112   {
 113     use_magnifier = TRUE;
 114   }
 115 }
 116
 117 void
 118 report_focussed_accessible (Accessible *obj, boolean shutup_previous_speech)
 119 {
 120   if (use_festival)
 121     {
 122     if (festival_chatty)
 123       {
 124         _festival_say (Accessible_getRole (obj), "voice_don_diphone", shutup_previous_speech);
 125       }
 126       fprintf (stderr, "getting Name\n");
 127       _festival_say (Accessible_getName (obj), "voice_kal_diphone",
 128                      shutup_previous_speech || festival_chatty);
 129     }
 130
 131   if (Accessible_isComponent (obj))
 132     {
 133       long x, y, width, height;
 134       AccessibleComponent *component = Accessible_getComponent (obj);
 135       AccessibleComponent_getExtents (component, &x, &y, &width, &height,
 136                                       COORD_TYPE_SCREEN);
 137       fprintf (stderr, "Bounding box: (%ld, %ld) ; (%ld, %ld)\n",
 138                x, y, x+width, y+height);
 139       if (use_magnifier) {
 140               magnifier_set_roi ((short) 0, x, y, width, height);
 141       }
 142     }
 143   /* if this is a text object, speak the first sentence. */
 144   if (Accessible_isText(obj))
 145   {
 146      AccessibleText *text_interface;
 147      long start_offset, end_offset;
 148      char *first_sentence = "empty";
 149      text_interface = Accessible_getText (obj);
 150      fprintf (stderr, "isText...%p %p\n", text_interface, (void *)*text_interface);
 151      first_sentence = AccessibleText_getTextAtOffset (
 152                text_interface, (long) 0, TEXT_BOUNDARY_SENTENCE_START, &start_offset, &end_offset);
 153      if (first_sentence) _festival_say(first_sentence, "voice_don_diphone", FALSE);
 154      fprintf (stderr, "done reporting on focussed object\n");
 155   }
 156 }
 157
 158 void
 159 report_focus_event (void *p)
 160 {
 161   AccessibleEvent *ev = (AccessibleEvent *) p;
 162   fprintf (stderr, "%s event from %s\n", ev->type,
 163            Accessible_getName (&ev->source));
 164   report_focussed_accessible (&ev->source, TRUE);
 165 }
 166
 167 void
 168 report_button_press (void *p)
 169 {
 170   AccessibleEvent *ev = (AccessibleEvent *) p;
 171   fprintf (stderr, "%s event from %s\n", ev->type,
 172            Accessible_getName (&ev->source));
 173 }
 174
 175
 176 void
 177 check_property_change (void *p)
 178 {
 179   AccessibleEvent *ev = (AccessibleEvent *) p;
 180   AccessibleSelection *selection = Accessible_getSelection (&ev->source);
 181   int n_selections;
 182   int i;
 183   if (selection)
 184   {
 185     n_selections = (int) AccessibleSelection_getNSelectedChildren (selection);
 186     fprintf (stderr, "(Property) %s event from %s, %d selected children\n", ev->type,
 187            Accessible_getName (&ev->source), n_selections);
 188   /* for now, speak entire selection set */
 189     for (i=0; i<n_selections; ++i)
 190     {
 191           Accessible *obj = AccessibleSelection_getSelectedChild (selection, (long) i);
 192           g_return_if_fail (obj);
 193           fprintf (stderr, "Child %d, name=%s\n", i, Accessible_getName (obj));
 194           report_focussed_accessible (obj, i==0);
 195     }
 196   }
 197 }
 198
 199 static void
 200 simple_at_exit()
 201 {
 202   deregisterGlobalEventListenerAll (focus_listener);
 203   deregisterGlobalEventListenerAll (property_listener);
 204   deregisterGlobalEventListenerAll (button_listener);
 205   deregisterKeystrokeListener (key_listener, KEYMASK_ALT );
 206
 207   SPI_exit ();
 208 }
 209
 210 static boolean
 211 is_command_key (KeyStroke *key)
 212 {
 213   switch (key->keyID)
 214     {
 215     case 'Q':
 216     case 'q':
 217             simple_at_exit();
 218             return TRUE; /* not reached */
 219     case 'M':
 220     case 'm':
 221             use_magnifier = ! use_magnifier;
 222             return TRUE;
 223     case 'F':
 224     case 'f':
 225             use_festival = ! use_festival;
 226             return TRUE;
 227     default:
 228             return FALSE;
 229     }
 230 }
 231
 232 static boolean
 233 report_key_event (void *p)
 234 {
 235   KeyStroke *key = (KeyStroke *) p;
 236   fprintf(stderr, "KeyEvent %s%c (keycode %d)\n",
 237           (key->modifiers & KEYMASK_ALT)?"Alt-":"",
 238           ((key->modifiers & KEYMASK_SHIFT)^(key->modifiers & KEYMASK_SHIFTLOCK))?
 239           (char) toupper((int) key->keyID) : (char) tolower((int) key->keyID),
 240           (int) key->keycode);
 241   return is_command_key (key);
 242 }
 243
 244 static int _festival_init ()
 245 {
 246   int fd;
 247   struct sockaddr_in name;
 248   int tries = 2;
 249
 250   name.sin_family = AF_INET;
 251   name.sin_port = htons (1314);
 252   name.sin_addr.s_addr = htonl(INADDR_ANY);
 253   fd = socket (PF_INET, SOCK_STREAM, 0);
 254
 255   while (connect(fd, (struct sockaddr *) &name, sizeof (name)) < 0) {
 256     if (!tries--) {
 257       perror ("connect");
 258       return -1;
 259     }
 260   }
 261
 262   _festival_write ("(audio_mode'async)\n", fd);
 263   _festival_write ("(Parameter.set 'Duration_Model 'Tree_ZScore)\n", fd);
 264   _festival_write ("(Parameter.set 'Duration_Stretch 0.75)\n", fd);
 265   return fd;
 266 }
 267
 268 static void _festival_say (const char *text, const char *voice, boolean shutup)
 269 {
 270   static int fd = 0;
 271   gchar *quoted;
 272   gchar *p;
 273   gchar prefix[50];
 274   static gchar voice_spec[32];
 275
 276   if (!fd)
 277     {
 278       fd = _festival_init ();
 279     }
 280
 281   fprintf (stderr, "saying text: %s\n", text);
 282
 283   quoted = g_malloc(64+strlen(text)*2);
 284
 285   sprintf (prefix, "(SayText \"");
 286
 287   strncpy(quoted, prefix, 10);
 288   p = quoted+strlen(prefix);
 289   while (*text) {
 290     if ( *text == '\\' || *text == '"' )
 291       *p = '\\';
 292     *p++ = *text++;
 293   }
 294   *p++ = '"';
 295   *p++ = ')';
 296   *p++ = '\n';
 297   *p = 0;
 298
 299   if (shutup) _festival_write ("(audio_mode'shutup)\n", fd);
 300   if (voice && (strncmp (voice, (char *) (voice_spec+1), strlen(voice))))
 301     {
 302       snprintf (voice_spec, 32, "(%s)\n", voice);
 303       _festival_write (voice_spec, fd);
 304       _festival_write ("(Parameter.set 'Duration_Model 'Tree_ZScore)\n", fd);
 305       _festival_write ("(Parameter.set 'Duration_Stretch 0.75)\n", fd);
 306     }
 307
 308   _festival_write (quoted, fd);
 309
 310   g_free(quoted);
 311 }
 312
 313 static void _festival_write (const gchar *command_string, int fd)
 314 {
 315   fprintf(stderr, command_string);
 316   if (fd < 0) {
 317     perror("socket");
 318     return;
 319   }
 320   write(fd, command_string, strlen(command_string));
 321 }
 322