2 * AT-SPI - Assistive Technology Service Provider Interface
3 * (Gnome Accessibility Project; http://developer.gnome.org/projects/gap)
5 * Copyright 2001, 2002 Sun Microsystems Inc.,
6 * Copyright 2001, 2002 Ximian, Inc.
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.
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.
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.
24 /* hyperlink.c : implements the Hyperlink interface */
28 #include <libspi/hyperlink.h>
29 #include <libspi/accessible.h>
31 /* Static function declarations */
34 spi_hyperlink_class_init (SpiHyperlinkClass *klass);
36 spi_hyperlink_init (SpiHyperlink *hyperlink);
38 impl_getURI (PortableServer_Servant _servant,
39 const CORBA_long i, CORBA_Environment * ev);
41 impl__get_n_anchors (PortableServer_Servant _servant,
42 CORBA_Environment * ev);
44 impl__get_startIndex (PortableServer_Servant _servant,
45 CORBA_Environment * ev);
47 impl__get_endIndex (PortableServer_Servant _servant,
48 CORBA_Environment * ev);
49 static Accessibility_Accessible
50 impl_getObject (PortableServer_Servant _servant,
52 CORBA_Environment * ev);
54 impl_isValid (PortableServer_Servant _servant,
55 CORBA_Environment * ev);
58 BONOBO_TYPE_FUNC_FULL (SpiHyperlink,
59 Accessibility_Hyperlink,
65 spi_hyperlink_class_init (SpiHyperlinkClass *klass)
67 POA_Accessibility_Hyperlink__epv *epv = &klass->epv;
69 /* Initialize epv table */
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;
81 spi_hyperlink_init (SpiHyperlink *hyperlink)
87 spi_hyperlink_new (AtkHyperlink *object)
89 SpiHyperlink *new_hyperlink = g_object_new (
90 SPI_HYPERLINK_TYPE, NULL);
92 spi_base_construct (SPI_BASE (new_hyperlink), G_OBJECT(object));
99 get_hyperlink_from_servant (PortableServer_Servant servant)
101 SpiBase *object = SPI_BASE (bonobo_object_from_servant (servant));
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);
110 impl__get_n_anchors (PortableServer_Servant servant,
111 CORBA_Environment *ev)
113 AtkHyperlink *link = get_hyperlink_from_servant (servant);
115 g_return_val_if_fail (link != NULL, 0);
117 return atk_hyperlink_get_n_anchors (link);
122 impl__get_startIndex (PortableServer_Servant servant,
123 CORBA_Environment *ev)
125 AtkHyperlink *link = get_hyperlink_from_servant (servant);
127 g_return_val_if_fail (link != NULL, -1);
129 return atk_hyperlink_get_start_index (link);
134 impl__get_endIndex (PortableServer_Servant servant,
135 CORBA_Environment *ev)
137 AtkHyperlink *link = get_hyperlink_from_servant (servant);
139 g_return_val_if_fail (link != NULL, -1);
141 return atk_hyperlink_get_end_index (link);
146 impl_getURI (PortableServer_Servant servant,
147 const CORBA_long i, CORBA_Environment *ev)
151 AtkHyperlink *link = get_hyperlink_from_servant (servant);
153 g_return_val_if_fail (link != NULL, CORBA_string_dup (""));
155 uri = atk_hyperlink_get_uri (link, i);
158 rv = CORBA_string_dup (uri);
162 rv = CORBA_string_dup ("");
168 static Accessibility_Accessible
169 impl_getObject (PortableServer_Servant servant,
171 CORBA_Environment *ev)
173 AtkObject *atk_object;
174 AtkHyperlink *link = get_hyperlink_from_servant (servant);
176 g_return_val_if_fail (link != NULL, CORBA_OBJECT_NIL);
178 atk_object = atk_hyperlink_get_object (link, i);
180 return spi_accessible_new_return (atk_object, FALSE, ev);
185 impl_isValid (PortableServer_Servant servant,
186 CORBA_Environment *ev)
188 AtkHyperlink *link = get_hyperlink_from_servant (servant);
190 g_return_val_if_fail (link != NULL, TRUE);
192 return atk_hyperlink_is_valid (link);