libspi/action.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  * component.c : bonobo wrapper for accessible component implementation
  25  *
  26  */
  27 #include <config.h>
  28 #include <bonobo/Bonobo.h>
  29
  30 #include <stdio.h>
  31
  32 /*
  33  * This pulls the CORBA definitions for the "Accessibility::Accessible" server
  34  */
  35 #include <libspi/Accessibility.h>
  36
  37 /*
  38  * This pulls the definition of the SpiAction bonobo object
  39  */
  40 #include "action.h"
  41
  42 /*
  43  * Static function declarations
  44  */
  45
  46 static void
  47 spi_action_class_init (SpiActionClass *klass);
  48 static void
  49 spi_action_init (SpiAction *action);
  50 static void
  51 spi_action_finalize (GObject *obj);
  52 static CORBA_long
  53 impl__get_nActions(PortableServer_Servant servant,
  54                  CORBA_Environment * ev);
  55 static CORBA_string
  56 impl_getDescription (PortableServer_Servant servant,
  57                      const CORBA_long index,
  58                      CORBA_Environment * ev);
  59 static CORBA_boolean
  60 impl_doAction (PortableServer_Servant servant,
  61                const CORBA_long index, CORBA_Environment * ev);
  62 static CORBA_string
  63 impl_getName (PortableServer_Servant servant,
  64               const CORBA_long index,
  65               CORBA_Environment * ev);
  66 static CORBA_string
  67 impl_getKeyBinding (PortableServer_Servant servant,
  68                     const CORBA_long index,
  69                     CORBA_Environment * ev);
  70
  71 static GObjectClass *parent_class;
  72
  73 GType
  74 spi_action_get_type (void)
  75 {
  76   static GType type = 0;
  77
  78   if (!type) {
  79     static const GTypeInfo tinfo = {
  80       sizeof (SpiActionClass),
  81       (GBaseInitFunc) NULL,
  82       (GBaseFinalizeFunc) NULL,
  83       (GClassInitFunc) spi_action_class_init,
  84       (GClassFinalizeFunc) NULL,
  85       NULL, /* class data */
  86       sizeof (SpiAction),
  87       0, /* n preallocs */
  88       (GInstanceInitFunc) spi_action_init,
  89                         NULL /* value table */
  90     };
  91
  92     /*
  93      * Bonobo_type_unique auto-generates a load of
  94      * CORBA structures for us. All derived types must
  95      * use bonobo_type_unique.
  96      */
  97     type = bonobo_type_unique (
  98                                BONOBO_OBJECT_TYPE,
  99                                POA_Accessibility_Action__init,
 100                                NULL,
 101                                G_STRUCT_OFFSET (SpiActionClass, epv),
 102                                &tinfo,
 103                                "SpiAccessibleAction");
 104   }
 105
 106   return type;
 107 }
 108
 109 static void
 110 spi_action_class_init (SpiActionClass *klass)
 111 {
 112   GObjectClass * object_class = (GObjectClass *) klass;
 113   POA_Accessibility_Action__epv *epv = &klass->epv;
 114   parent_class = g_type_class_peek_parent (klass);
 115
 116   object_class->finalize = spi_action_finalize;
 117
 118
 119   /* Initialize epv table */
 120
 121   epv->_get_nActions = impl__get_nActions;
 122   epv->doAction = impl_doAction;
 123   epv->getDescription = impl_getDescription;
 124   epv->getName = impl_getName;
 125   epv->getKeyBinding = impl_getKeyBinding;
 126 }
 127
 128 static void
 129 spi_action_init (SpiAction *action)
 130 {
 131 }
 132
 133 static void
 134 spi_action_finalize (GObject *obj)
 135 {
 136   SpiAction *action = SPI_ACTION (obj);
 137   g_object_unref (action->atko);
 138   action->atko = NULL;
 139   parent_class->finalize (obj);
 140 }
 141
 142 SpiAction *
 143 spi_action_interface_new (AtkObject *obj)
 144 {
 145   SpiAction *new_action =
 146     SPI_ACTION(g_object_new (SPI_ACTION_TYPE, NULL));
 147   new_action->atko = obj;
 148   g_object_ref (obj);
 149   return new_action;
 150 }
 151
 152 static CORBA_long
 153 impl__get_nActions(PortableServer_Servant servant,
 154             CORBA_Environment * ev)
 155 {
 156   SpiAction *action = SPI_ACTION (bonobo_object_from_servant(servant));
 157   return (CORBA_long) atk_action_get_n_actions (ATK_ACTION(action->atko));
 158 }
 159
 160 static CORBA_boolean
 161 impl_doAction (PortableServer_Servant servant,
 162                const CORBA_long index, CORBA_Environment * ev)
 163 {
 164   SpiAction *action = SPI_ACTION (bonobo_object_from_servant (servant));
 165   return (CORBA_boolean) atk_action_do_action (ATK_ACTION(action->atko), (gint) index);
 166 }
 167
 168
 169 static CORBA_string
 170 impl_getDescription (PortableServer_Servant servant,
 171                 const CORBA_long index,
 172                 CORBA_Environment * ev)
 173 {
 174   SpiAction *action = SPI_ACTION (bonobo_object_from_servant(servant));
 175   CORBA_char *rv;
 176
 177   rv = atk_action_get_description (ATK_ACTION(action->atko), (gint) index);
 178   if (rv)
 179     return CORBA_string_dup (rv);
 180   else
 181     return CORBA_string_dup ("");
 182 }
 183
 184
 185 static CORBA_string
 186 impl_getName (PortableServer_Servant servant,
 187                 const CORBA_long index,
 188                 CORBA_Environment * ev)
 189 {
 190   SpiAction *action = SPI_ACTION (bonobo_object_from_servant(servant));
 191   CORBA_char *rv;
 192
 193   rv = atk_action_get_name (ATK_ACTION(action->atko), (gint) index);
 194   if (rv)
 195     return CORBA_string_dup (rv);
 196   else
 197     return CORBA_string_dup ("");
 198 }
 199
 200 static CORBA_string
 201 impl_getKeyBinding (PortableServer_Servant servant,
 202                     const CORBA_long index,
 203                     CORBA_Environment * ev)
 204 {
 205   SpiAction *action = SPI_ACTION (bonobo_object_from_servant(servant));
 206   CORBA_char *rv;
 207
 208   rv = atk_action_get_keybinding (ATK_ACTION(action->atko), (gint) index);
 209   if (rv)
 210     return CORBA_string_dup (rv);
 211   else
 212     return CORBA_string_dup ("");
 213 }