libspi/hyperlink.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 /* hyperlink.c : implements the Hyperlink interface */
  25
  26 #include <config.h>
  27 #include <stdio.h>
  28 #include <libspi/hyperlink.h>
  29 #include <libspi/accessible.h>
  30
  31 /* Static function declarations */
  32
  33 static void
  34 spi_hyperlink_class_init (SpiHyperlinkClass *klass);
  35 static void
  36 spi_hyperlink_init (SpiHyperlink *hyperlink);
  37 static CORBA_string
  38 impl_getURI (PortableServer_Servant _servant,
  39              const CORBA_long i, CORBA_Environment * ev);
  40 static CORBA_short
  41 impl__get_n_anchors (PortableServer_Servant _servant,
  42                      CORBA_Environment * ev);
  43 static CORBA_long
  44 impl__get_startIndex (PortableServer_Servant _servant,
  45                       CORBA_Environment * ev);
  46 static CORBA_long
  47 impl__get_endIndex (PortableServer_Servant _servant,
  48                     CORBA_Environment * ev);
  49 static Accessibility_Accessible
  50 impl_getObject (PortableServer_Servant _servant,
  51                 const CORBA_long i,
  52                 CORBA_Environment * ev);
  53 static CORBA_boolean
  54 impl_isValid (PortableServer_Servant _servant,
  55               CORBA_Environment * ev);
  56
  57
  58 BONOBO_TYPE_FUNC_FULL (SpiHyperlink,
  59                        Accessibility_Hyperlink,
  60                        SPI_TYPE_BASE,
  61                        spi_hyperlink);
  62
  63
  64 static void
  65 spi_hyperlink_class_init (SpiHyperlinkClass *klass)
  66 {
  67   POA_Accessibility_Hyperlink__epv *epv = &klass->epv;
  68
  69   /* Initialize epv table */
  70
  71   epv->_get_nAnchors = impl__get_n_anchors;
  72   epv->getURI = impl_getURI;
  73   epv->_get_startIndex = impl__get_startIndex;
  74   epv->_get_endIndex = impl__get_endIndex;
  75   epv->getObject = impl_getObject;
  76   epv->isValid = impl_isValid;
  77 }
  78
  79
  80 static void
  81 spi_hyperlink_init (SpiHyperlink *hyperlink)
  82 {
  83 }
  84
  85
  86 SpiHyperlink *
  87 spi_hyperlink_new (AtkHyperlink *object)
  88 {
  89   SpiHyperlink *new_hyperlink = g_object_new (
  90           SPI_HYPERLINK_TYPE, NULL);
  91
  92   spi_base_construct (SPI_BASE (new_hyperlink), G_OBJECT(object));
  93
  94   return new_hyperlink;
  95 }
  96
  97
  98 static AtkHyperlink *
  99 get_hyperlink_from_servant (PortableServer_Servant servant)
 100 {
 101   SpiBase *object = SPI_BASE (bonobo_object_from_servant (servant));
 102
 103   g_return_val_if_fail (object != NULL, NULL);
 104   g_return_val_if_fail (ATK_IS_HYPERLINK(object->gobj), NULL);
 105   return ATK_HYPERLINK (object->gobj);
 106 }
 107
 108
 109 static CORBA_short
 110 impl__get_n_anchors (PortableServer_Servant servant,
 111                      CORBA_Environment     *ev)
 112 {
 113   AtkHyperlink *link = get_hyperlink_from_servant (servant);
 114
 115   g_return_val_if_fail (link != NULL, 0);
 116
 117   return atk_hyperlink_get_n_anchors (link);
 118 }
 119
 120
 121 static CORBA_long
 122 impl__get_startIndex (PortableServer_Servant servant,
 123                       CORBA_Environment     *ev)
 124 {
 125   AtkHyperlink *link = get_hyperlink_from_servant (servant);
 126
 127   g_return_val_if_fail (link != NULL, -1);
 128
 129   return atk_hyperlink_get_start_index (link);
 130 }
 131
 132
 133 static CORBA_long
 134 impl__get_endIndex (PortableServer_Servant servant,
 135                     CORBA_Environment     *ev)
 136 {
 137   AtkHyperlink *link = get_hyperlink_from_servant (servant);
 138
 139   g_return_val_if_fail (link != NULL, -1);
 140
 141   return atk_hyperlink_get_end_index (link);
 142 }
 143
 144
 145 static CORBA_string
 146 impl_getURI (PortableServer_Servant servant,
 147              const CORBA_long i, CORBA_Environment *ev)
 148 {
 149   gchar *uri;
 150   CORBA_char *rv;
 151   AtkHyperlink *link = get_hyperlink_from_servant (servant);
 152
 153   g_return_val_if_fail (link != NULL, CORBA_string_dup (""));
 154
 155   uri = atk_hyperlink_get_uri (link, i);
 156   if (uri)
 157     {
 158       rv = CORBA_string_dup (uri);
 159       g_free (uri);
 160     }
 161   else
 162     rv = CORBA_string_dup ("");
 163
 164   return rv;
 165 }
 166
 167
 168 static Accessibility_Accessible
 169 impl_getObject (PortableServer_Servant servant,
 170                 const CORBA_long       i,
 171                 CORBA_Environment     *ev)
 172 {
 173   AtkObject    *atk_object;
 174   AtkHyperlink *link = get_hyperlink_from_servant (servant);
 175
 176   g_return_val_if_fail (link != NULL, CORBA_OBJECT_NIL);
 177
 178   atk_object = atk_hyperlink_get_object (link, i);
 179
 180   return spi_accessible_new_return (atk_object, FALSE, ev);
 181 }
 182
 183
 184 static CORBA_boolean
 185 impl_isValid (PortableServer_Servant servant,
 186               CORBA_Environment     *ev)
 187 {
 188   AtkHyperlink *link = get_hyperlink_from_servant (servant);
 189
 190   g_return_val_if_fail (link != NULL, TRUE);
 191
 192   return atk_hyperlink_is_valid (link);
 193 }
 194