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