test/stress-test.c

   1 /*
   2  * AT-SPI - Assistive Technology Service Provider Interface
   3  * (Gnome Accessibility Project; http://developer.gnome.org/projects/gap)
   4  *
   5  * Copyright 2001, 2002 Sun Microsystems Inc.,
   6  * Copyright 2001, 2002 Ximian, Inc.
   7  *
   8  * This library is free software; you can redistribute it and/or
   9  * modify it under the terms of the GNU Library General Public
  10  * License as published by the Free Software Foundation; either
  11  * version 2 of the License, or (at your option) any later version.
  12  *
  13  * This library is distributed in the hope that it will be useful,
  14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  16  * Library General Public License for more details.
  17  *
  18  * You should have received a copy of the GNU Library General Public
  19  * License along with this library; if not, write to the
  20  * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  21  * Boston, MA 02111-1307, USA.
  22  */
  23
  24 #include <unistd.h>
  25 #include <stdlib.h>
  26 #include "../cspi/spi-private.h" /* A hack for now */
  27 #include <glib-object.h>
  28 #include <gtk/gtk.h>
  29 #include <atk/atk.h>
  30 #include <atk/atknoopobject.h>
  31 #include <bonobo-activation/bonobo-activation-register.h>
  32 #include <bonobo/bonobo-main.h>
  33 #include <libspi/libspi.h>
  34
  35 int
  36 main (int argc, char **argv)
  37 {
  38         int i;
  39         Accessibility_Event e;
  40         Accessibility_Registry registry;
  41         CORBA_Environment ev;
  42         SpiAccessible *source;
  43         GObject *object;
  44         AtkObject *atko;
  45         GTimer *timer;
  46
  47         gtk_init (&argc, &argv);
  48         SPI_init ();
  49         object = g_object_new (GTK_TYPE_BUTTON, NULL);
  50         atko = atk_no_op_object_new (object);
  51
  52         sleep (1);
  53
  54         g_print ("starting stress test...\n");
  55
  56         CORBA_exception_init (&ev);
  57
  58         registry = bonobo_activation_activate_from_id (
  59                 "OAFIID:Accessibility_Registry:1.0", 0, NULL, &ev);
  60
  61   if (ev._major != CORBA_NO_EXCEPTION)
  62     {
  63       g_error ("Accessibility app error: exception during "
  64                "registry activation from id: %s\n",
  65                CORBA_exception_id (&ev));
  66       CORBA_exception_free (&ev);
  67     }
  68
  69   if (registry == CORBA_OBJECT_NIL)
  70     {
  71       g_error ("Could not locate registry");
  72     }
  73
  74         bonobo_activate ();
  75
  76         source = spi_accessible_new (atko);
  77
  78         e.type = "object:test";
  79         e.source = BONOBO_OBJREF (source);
  80         e.detail1 = 0;
  81         e.detail2 = 0;
  82
  83         timer = g_timer_new ();
  84         g_timer_start (timer);
  85
  86         for (i = 0; i < 500; ++i) {
  87                 Accessibility_Accessible_ref (e.source, &ev);
  88                 Accessibility_Registry_notifyEvent (registry, &e, &ev);
  89         }
  90         g_timer_stop (timer);
  91         g_print ("%d notifications sent in  %f sec.\n", i,
  92                  g_timer_elapsed (timer, NULL));
  93
  94         SPI_event_main ();
  95
  96         sleep (15);
  97
  98   return SPI_exit ();
  99 }
 100