libspi/listener.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 /*
  24  * listener.c: test for accessibility implementation
  25  *
  26  */
  27
  28 #ifdef SPI_DEBUG
  29 #include <stdio.h>
  30 #endif
  31
  32 #include <config.h>
  33 #include <bonobo/Bonobo.h>
  34 #include <libspi/Accessibility.h>
  35
  36 /*
  37  * This pulls the definition for the BonoboObject (GType)
  38  */
  39 #include "listener.h"
  40
  41 /*
  42  * Our parent Gtk object type
  43  */
  44 #define PARENT_TYPE BONOBO_OBJECT_TYPE
  45
  46 /*
  47  * A pointer to our parent object class
  48  */
  49 static GObjectClass *listener_parent_class;
  50
  51 /*
  52  * Implemented GObject::finalize
  53  */
  54 static void
  55 listener_object_finalize (GObject *object)
  56 {
  57 /*        Listener *listener = LISTENER (object); */
  58
  59 #ifdef SPI_DEBUG
  60         fprintf(stderr, "listener_object_finalize called\n");
  61 #endif
  62         listener_parent_class->finalize (object);
  63 }
  64
  65 /*
  66  * CORBA Accessibility::Listener::notifyEvent method implementation
  67  */
  68
  69 static void
  70 impl_notify_event (PortableServer_Servant     servant,
  71                    const Accessibility_Event *e,
  72                    CORBA_Environment         *ev)
  73 {
  74 #ifdef SPI_DEBUG
  75   fprintf (stderr, "notify %s...\n", e->type);
  76   fprintf (stderr, "source name: '%s'\n",
  77            Accessibility_Accessible__get_name(e->source, ev));
  78   if (ev->_major != CORBA_NO_EXCEPTION) {
  79     fprintf(stderr,
  80             ("Accessibility app error: exception during event notification: %s\n"),
  81             CORBA_exception_id(ev));
  82     exit(-1);
  83   }
  84   /*
  85   fprintf (stderr, "source is component ? : %s\n",
  86            Accessibility_Accessible_queryInterface (e->source,
  87                                                     "IDL:Accessibility/Component:1.0",
  88                                                     ev)
  89            ? "yes" : "no");
  90   */
  91 #endif
  92   Accessibility_Accessible_unref (e->source, ev);
  93 }
  94
  95 static void
  96 listener_class_init (ListenerClass *klass)
  97 {
  98         GObjectClass * object_class = (GObjectClass *) klass;
  99         POA_Accessibility_EventListener__epv *epv = &klass->epv;
 100         listener_parent_class = g_type_class_ref (BONOBO_OBJECT_TYPE);
 101
 102         object_class->finalize = listener_object_finalize;
 103
 104         epv->notifyEvent = impl_notify_event;
 105 }
 106
 107 static void
 108 listener_init (Listener *listener)
 109 {
 110 }
 111
 112 GType
 113 listener_get_type (void)
 114 {
 115         static GType type = 0;
 116
 117         if (!type) {
 118                 static const GTypeInfo tinfo = {
 119                         sizeof (ListenerClass),
 120                         (GBaseInitFunc) NULL,
 121                         (GBaseFinalizeFunc) NULL,
 122                         (GClassInitFunc) listener_class_init,
 123                         (GClassFinalizeFunc) NULL,
 124                         NULL, /* class data */
 125                         sizeof (Listener),
 126                         0, /* n preallocs */
 127                         (GInstanceInitFunc) listener_init,
 128                         NULL /* value table */
 129                 };
 130                 /*
 131                  *   Here we use bonobo_type_unique instead of
 132                  * gtk_type_unique, this auto-generates a load of
 133                  * CORBA structures for us. All derived types must
 134                  * use bonobo_type_unique.
 135                  */
 136                 type = bonobo_type_unique (
 137                         PARENT_TYPE,
 138                         POA_Accessibility_EventListener__init,
 139                         NULL,
 140                         G_STRUCT_OFFSET (ListenerClass, epv),
 141                         &tinfo,
 142                         "Listener");
 143         }
 144
 145         return type;
 146 }
 147
 148 Listener *
 149 listener_new (void)
 150 {
 151     Listener *retval =
 152                LISTENER (g_object_new (listener_get_type (), NULL));
 153     return retval;
 154 }