2001-11-13 Michael Meeks <michael@ximian.com>
[platform/core/uifw/at-spi2-atk.git] / libspi / editabletext.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 SpiEditableText bonobo object
39  */
40 #include "editabletext.h"
41
42 /*
43  * Static function declarations
44  */
45
46 static void
47 spi_editable_text_class_init (SpiEditableTextClass *klass);
48 static void
49 spi_editable_text_init (SpiEditableText *editable);
50 static void
51 spi_editable_text_finalize (GObject *obj);
52 static CORBA_boolean
53 impl_setAttributes (PortableServer_Servant _servant,
54                        const CORBA_char * attributes,
55                        const CORBA_long startPos,
56                        const CORBA_long endPos,
57                        CORBA_Environment * ev);
58 static void
59 impl_setTextContents (PortableServer_Servant _servant,
60                       const CORBA_char * newContents,
61                       CORBA_Environment * ev);
62 static void 
63 impl_insertText (PortableServer_Servant _servant,
64                  const CORBA_long position,
65                  const CORBA_char * text,
66                  const CORBA_long length,
67                  CORBA_Environment * ev);
68 static void 
69 impl_copyText (PortableServer_Servant _servant,
70                const CORBA_long startPos, const CORBA_long endPos,
71                CORBA_Environment * ev);
72 static void 
73 impl_cutText (PortableServer_Servant _servant,
74               const CORBA_long startPos, const CORBA_long endPos,
75               CORBA_Environment * ev);
76 static void 
77 impl_deleteText (PortableServer_Servant _servant,
78                  const CORBA_long startPos, const CORBA_long endPos,
79                  CORBA_Environment * ev);
80 static void
81 impl_pasteText (PortableServer_Servant _servant,
82                 const CORBA_long position, CORBA_Environment * ev);
83
84 static GObjectClass *parent_class;
85
86 GType
87 spi_editable_text_get_type (void)
88 {
89   static GType type = 0;
90
91   if (!type) {
92     static const GTypeInfo tinfo = {
93       sizeof (SpiEditableTextClass),
94       (GBaseInitFunc) NULL,
95       (GBaseFinalizeFunc) NULL,
96       (GClassInitFunc) spi_editable_text_class_init,
97       (GClassFinalizeFunc) NULL,
98       NULL, /* class data */
99       sizeof (SpiEditableText),
100       0, /* n preallocs */
101       (GInstanceInitFunc) spi_editable_text_init,
102                         NULL /* value table */
103     };
104
105     /*
106      * Bonobo_type_unique auto-generates a load of
107      * CORBA structures for us. All derived types must
108      * use bonobo_type_unique.
109      */
110     type = bonobo_type_unique (
111                                SPI_TEXT_TYPE,
112                                POA_Accessibility_EditableText__init,
113                                NULL,
114                                G_STRUCT_OFFSET (SpiEditableTextClass, epv),
115                                &tinfo,
116                                "SpiAccessibleEditableText");
117   }
118
119   return type;
120 }
121
122 static void
123 spi_editable_text_class_init (SpiEditableTextClass *klass)
124 {
125   GObjectClass * object_class = (GObjectClass *) klass;
126   POA_Accessibility_EditableText__epv *epv = &klass->epv;
127   parent_class = g_type_interface_peek_parent (klass);
128
129   object_class->finalize = spi_editable_text_finalize;
130   
131   /* Initialize epv table */
132
133   epv->setAttributes = impl_setAttributes;
134   epv->setTextContents = impl_setTextContents;
135   epv->insertText = impl_insertText;
136   epv->copyText = impl_copyText;
137   epv->cutText = impl_cutText;
138   epv->deleteText = impl_deleteText;
139   epv->pasteText = impl_pasteText;
140 }
141
142 static void
143 spi_editable_text_init (SpiEditableText *editable)
144 {
145 }
146
147 static void
148 spi_editable_text_finalize (GObject *obj)
149 {
150   parent_class->finalize (obj);
151 }
152
153 SpiEditableText *
154 spi_editable_text_interface_new (AtkObject *obj)
155 {
156   SpiEditableText *new_editable =
157     SPI_EDITABLE_TEXT(g_object_new (SPI_EDITABLE_TEXT_TYPE, NULL));
158   (SPI_TEXT (new_editable))->atko = obj;
159   g_object_ref (obj);
160   return new_editable;
161 }
162
163 static CORBA_boolean
164 impl_setAttributes (PortableServer_Servant _servant,
165                        const CORBA_char * attributes,
166                        const CORBA_long startPos,
167                        const CORBA_long endPos,
168                                          CORBA_Environment * ev)
169 {
170   SpiEditableText *editable;
171   BonoboObject *obj;
172   obj = (bonobo_object_from_servant (_servant));
173   g_return_if_fail (IS_SPI_EDITABLE_TEXT (obj));
174   editable = SPI_EDITABLE_TEXT(bonobo_object_from_servant (_servant));
175   g_return_if_fail (ATK_IS_EDITABLE_TEXT ( (SPI_TEXT (obj))->atko));
176
177   g_print ("setRunAttributes not implemented.\n");
178 }
179
180
181
182 static void
183 impl_setTextContents (PortableServer_Servant _servant,
184                       const CORBA_char * newContents,
185                       CORBA_Environment * ev)
186 {
187   SpiEditableText *editable;
188   BonoboObject *obj;
189   obj = (bonobo_object_from_servant (_servant));
190   g_return_if_fail (IS_SPI_EDITABLE_TEXT (obj));
191   editable = SPI_EDITABLE_TEXT(bonobo_object_from_servant (_servant));
192   g_return_if_fail (ATK_IS_EDITABLE_TEXT ( (SPI_TEXT (obj))->atko));
193   
194   atk_editable_text_set_text_contents (ATK_EDITABLE_TEXT( SPI_TEXT (editable)->atko),
195                                        (gchar *) newContents);
196 }
197
198
199
200 static void 
201 impl_insertText (PortableServer_Servant _servant,
202                  const CORBA_long position,
203                  const CORBA_char * text,
204                  const CORBA_long length,
205                  CORBA_Environment * ev)
206 {
207   SpiEditableText *editable;
208   BonoboObject *obj;
209   obj = (bonobo_object_from_servant (_servant));
210   g_return_if_fail (IS_SPI_EDITABLE_TEXT (obj));
211   editable = SPI_EDITABLE_TEXT(bonobo_object_from_servant (_servant));
212   g_return_if_fail (ATK_IS_EDITABLE_TEXT ( (SPI_TEXT (obj))->atko));
213
214   atk_editable_text_insert_text (ATK_EDITABLE_TEXT( SPI_TEXT (editable)->atko),
215                                  (gchar *) text,
216                                  (gint) length,
217                                  (gint *) &position);
218 }
219
220
221 static void 
222 impl_copyText (PortableServer_Servant _servant,
223                const CORBA_long startPos, const CORBA_long endPos,
224                CORBA_Environment * ev)
225 {
226   SpiEditableText *editable;
227   BonoboObject *obj;
228   obj = (bonobo_object_from_servant (_servant));
229   g_return_if_fail (IS_SPI_EDITABLE_TEXT (obj));
230   editable = SPI_EDITABLE_TEXT(bonobo_object_from_servant (_servant));
231   g_return_if_fail (ATK_IS_EDITABLE_TEXT ( (SPI_TEXT (obj))->atko));
232
233   atk_editable_text_copy_text (ATK_EDITABLE_TEXT( SPI_TEXT(editable)->atko),
234                                (gint) startPos, (gint) endPos);
235 }
236
237
238
239 static void 
240 impl_cutText (PortableServer_Servant _servant,
241               const CORBA_long startPos, const CORBA_long endPos,
242               CORBA_Environment * ev)
243 {
244   SpiEditableText *editable;
245   BonoboObject *obj;
246   obj = (bonobo_object_from_servant (_servant));
247   g_return_if_fail (IS_SPI_EDITABLE_TEXT (obj));
248   editable = SPI_EDITABLE_TEXT(bonobo_object_from_servant (_servant));
249   g_return_if_fail (ATK_IS_EDITABLE_TEXT ( (SPI_TEXT (obj))->atko));
250
251   atk_editable_text_cut_text (ATK_EDITABLE_TEXT(SPI_TEXT (editable)->atko),
252                                  (gint) startPos, (gint) endPos);
253 }
254
255
256
257
258 static void 
259 impl_deleteText (PortableServer_Servant _servant,
260                  const CORBA_long startPos, const CORBA_long endPos,
261                  CORBA_Environment * ev)
262 {
263   SpiEditableText *editable;
264   BonoboObject *obj;
265   obj = (bonobo_object_from_servant (_servant));
266   g_return_if_fail (IS_SPI_EDITABLE_TEXT (obj));
267   editable = SPI_EDITABLE_TEXT(bonobo_object_from_servant (_servant));
268   g_return_if_fail (ATK_IS_EDITABLE_TEXT ( (SPI_TEXT (obj))->atko));
269
270   atk_editable_text_delete_text (ATK_EDITABLE_TEXT( SPI_TEXT(editable)->atko),
271                                  (gint) startPos, (gint) endPos);
272 }
273
274
275 static void
276 impl_pasteText (PortableServer_Servant _servant,
277                 const CORBA_long position, CORBA_Environment * ev)
278 {
279   SpiEditableText *editable;
280   BonoboObject *obj;
281   obj = (bonobo_object_from_servant (_servant));
282   g_return_if_fail (IS_SPI_EDITABLE_TEXT (obj));
283   editable = SPI_EDITABLE_TEXT(bonobo_object_from_servant (_servant));
284   g_return_if_fail (ATK_IS_EDITABLE_TEXT ( (SPI_TEXT (obj))->atko));
285
286   atk_editable_text_paste_text (ATK_EDITABLE_TEXT( SPI_TEXT(editable)->atko), position);
287 }
288