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 <stdlib.h>
  25 #include "../cspi/spi-private.h" /* A hack for now */
  26 #include <glib-object.h>
  27 #include <gtk/gtk.h>
  28 #include <atk/atk.h>
  29 #include <atk/atknoopobject.h>
  30 #include <bonobo-activation/bonobo-activation-register.h>
  31 #include <libspi.h>
  32
  33 int
  34 main (int argc, char **argv)
  35 {
  36         int i;
  37         Accessibility_Event e;
  38         Accessibility_Registry registry;
  39         CORBA_Environment ev;
  40         SpiAccessible *source;
  41         GObject *object;
  42         AtkObject *atko;
  43         GTimer *timer;
  44         gdouble elapsed_time;
  45
  46         gtk_init (&argc, &argv);
  47         SPI_init ();
  48         object = g_object_new (GTK_TYPE_BUTTON, NULL);
  49         atko = atk_no_op_object_new (object);
  50
  51         sleep (1);
  52
  53         g_print ("starting stress test...\n");
  54
  55         CORBA_exception_init (&ev);
  56
  57         registry = bonobo_activation_activate_from_id (
  58                 "OAFIID:Accessibility_Registry:1.0", 0, NULL, &ev);
  59
  60   if (ev._major != CORBA_NO_EXCEPTION)
  61     {
  62       g_error ("Accessibility app error: exception during "
  63                "registry activation from id: %s\n",
  64                CORBA_exception_id (&ev));
  65       CORBA_exception_free (&ev);
  66     }
  67
  68   if (registry == CORBA_OBJECT_NIL)
  69     {
  70       g_error ("Could not locate registry");
  71     }
  72
  73         bonobo_activate ();
  74
  75         source = spi_accessible_new (atko);
  76
  77         e.type = "object:test";
  78         e.source = BONOBO_OBJREF (source);
  79         e.detail1 = 0;
  80         e.detail2 = 0;
  81
  82         timer = g_timer_new ();
  83         g_timer_start (timer);
  84
  85         for (i = 0; i < 500; ++i) {
  86                 Accessibility_Accessible_ref (e.source, &ev);
  87                 Accessibility_Registry_notifyEvent (registry, &e, &ev);
  88         }
  89         g_timer_stop (timer);
  90         g_print ("%d notifications sent in  %f sec.\n", i,
  91                  g_timer_elapsed (timer, NULL));
  92
  93         SPI_event_main ();
  94
  95         sleep (15);
  96
  97   return SPI_exit ();
  98 }
  99