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 /* text.c : implements the Text interface */
30 #include <atk/atktext.h>
31 #include <libspi/text.h>
32 #include <libspi/spi-private.h>
34 /* Our parent Gtk object type */
35 #define PARENT_TYPE SPI_TYPE_BASE
45 _spi_text_rect_union (SpiTextRect *aggregate, SpiTextRect *subrect)
49 /* 'normalize' subrect */
52 subrect->x += subrect->w;
57 subrect->y += subrect->h;
60 if (aggregate == NULL)
62 aggregate = g_new (SpiTextRect, 1);
63 memcpy (aggregate, subrect, sizeof (SpiTextRect));
67 gint ax2 = aggregate->x + aggregate->w;
68 gint ay2 = aggregate->y + aggregate->h;
69 gint sx2 = subrect->x + subrect->w;
70 gint sy2 = subrect->y + subrect->h;
71 if (subrect->x < aggregate->x)
73 aggregate->w += (aggregate->x - subrect->x);
74 aggregate->x = subrect->x;
78 aggregate->w += (sx2 - ax2);
80 if (subrect->y < aggregate->y)
82 aggregate->h += (aggregate->y - subrect->y);
83 aggregate->y = subrect->y;
87 aggregate->h += (sy2 - ay2);
95 get_text_from_servant (PortableServer_Servant servant)
97 SpiBase *object = SPI_BASE (bonobo_object_from_servant (servant));
99 g_return_val_if_fail (object, NULL);
100 g_return_val_if_fail (ATK_IS_OBJECT(object->gobj), NULL);
101 return ATK_TEXT (object->gobj);
105 impl_getText (PortableServer_Servant servant,
106 const CORBA_long startOffset,
107 const CORBA_long endOffset,
108 CORBA_Environment *ev)
112 AtkText *text = get_text_from_servant (servant);
114 g_return_val_if_fail (text != NULL, CORBA_string_dup (""));
116 txt = atk_text_get_text (text, startOffset, endOffset);
119 rv = CORBA_string_dup (txt);
123 rv = CORBA_string_dup ("");
130 impl_getTextAfterOffset (PortableServer_Servant servant,
131 const CORBA_long offset,
133 Accessibility_TEXT_BOUNDARY_TYPE
134 type, CORBA_long * startOffset,
135 CORBA_long * endOffset,
136 CORBA_Environment *ev)
140 gint intStartOffset, intEndOffset;
141 AtkText *text = get_text_from_servant (servant);
143 g_return_val_if_fail (text != NULL, CORBA_string_dup (""));
145 txt = atk_text_get_text_after_offset (text,
146 offset, (AtkTextBoundary) type,
147 &intStartOffset, &intEndOffset);
148 *startOffset = intStartOffset;
149 *endOffset = intEndOffset;
153 rv = CORBA_string_dup (txt);
157 rv = CORBA_string_dup ("");
164 impl_getTextAtOffset (PortableServer_Servant servant,
165 const CORBA_long offset,
166 const Accessibility_TEXT_BOUNDARY_TYPE type,
167 CORBA_long * startOffset,
168 CORBA_long * endOffset,
169 CORBA_Environment *ev)
173 gint intStartOffset, intEndOffset;
174 AtkText *text = get_text_from_servant (servant);
176 g_return_val_if_fail (text != NULL, CORBA_string_dup (""));
178 txt = atk_text_get_text_at_offset (
180 offset, (AtkTextBoundary) type,
181 &intStartOffset, &intEndOffset);
183 *startOffset = intStartOffset;
184 *endOffset = intEndOffset;
188 rv = CORBA_string_dup (txt);
192 rv = CORBA_string_dup ("");
198 static CORBA_unsigned_long
199 impl_getCharacterAtOffset (PortableServer_Servant servant,
200 const CORBA_long offset,
201 CORBA_Environment *ev)
203 AtkText *text = get_text_from_servant (servant);
205 g_return_val_if_fail (text != NULL, 0);
207 return atk_text_get_character_at_offset (text, offset);
212 impl_getTextBeforeOffset (PortableServer_Servant servant,
213 const CORBA_long offset,
215 Accessibility_TEXT_BOUNDARY_TYPE
216 type, CORBA_long * startOffset,
217 CORBA_long * endOffset,
218 CORBA_Environment *ev)
222 gint intStartOffset, intEndOffset;
223 AtkText *text = get_text_from_servant (servant);
225 g_return_val_if_fail (text != NULL, CORBA_string_dup (""));
227 txt = atk_text_get_text_before_offset (text,
228 offset, (AtkTextBoundary) type,
229 &intStartOffset, &intEndOffset);
231 *startOffset = intStartOffset;
232 *endOffset = intEndOffset;
236 rv = CORBA_string_dup (txt);
240 rv = CORBA_string_dup ("");
247 impl__get_caretOffset (PortableServer_Servant servant,
248 CORBA_Environment *ev)
250 AtkText *text = get_text_from_servant (servant);
252 g_return_val_if_fail (text != NULL, -1);
254 return atk_text_get_caret_offset (text);
259 _string_from_attribute_set (AtkAttributeSet *set)
261 gchar *attributes, *tmp, *tmp2;
266 attributes = g_strdup ("");
267 cur_attr = (GSList *) set;
270 at = (AtkAttribute *) cur_attr->data;
271 tmp = g_strdup_printf ("%s%s:%s%s",
272 ((GSList *)(set) == cur_attr) ? "" : " ",
274 (cur_attr->next) ? ";" : "");
275 tmp2 = g_strconcat (attributes, tmp, NULL);
279 cur_attr = cur_attr->next;
281 rv = CORBA_string_dup (attributes);
289 impl_getAttributes (PortableServer_Servant servant,
290 const CORBA_long offset,
291 CORBA_long * startOffset,
292 CORBA_long * endOffset,
293 CORBA_Environment *ev)
295 AtkAttributeSet *set;
296 gint intstart_offset, intend_offset;
298 AtkText *text = get_text_from_servant (servant);
300 g_return_val_if_fail (text != NULL, CORBA_string_dup (""));
302 set = atk_text_get_run_attributes (text, offset,
303 &intstart_offset, &intend_offset);
304 *startOffset = intstart_offset;
305 *endOffset = intend_offset;
306 rv = _string_from_attribute_set (set);
307 atk_attribute_set_free (set);
313 impl_getCharacterExtents (PortableServer_Servant servant,
314 const CORBA_long offset, CORBA_long * x,
315 CORBA_long * y, CORBA_long * width,
317 const CORBA_short coordType,
318 CORBA_Environment *ev)
320 AtkText *text = get_text_from_servant (servant);
323 g_return_if_fail (text != NULL);
325 atk_text_get_character_extents (
328 (AtkCoordType) coordType);
337 impl__get_characterCount (PortableServer_Servant servant,
338 CORBA_Environment *ev)
340 AtkText *text = get_text_from_servant (servant);
342 g_return_val_if_fail (text != NULL, 0);
344 return atk_text_get_character_count (text);
349 impl_getOffsetAtPoint (PortableServer_Servant servant,
350 const CORBA_long x, const CORBA_long y,
351 const CORBA_short coordType,
352 CORBA_Environment *ev)
354 AtkText *text = get_text_from_servant (servant);
356 g_return_val_if_fail (text != NULL, -1);
358 return atk_text_get_offset_at_point (text,
360 (AtkCoordType) coordType);
365 impl_getNSelections (PortableServer_Servant servant,
366 CORBA_Environment *ev)
368 AtkText *text = get_text_from_servant (servant);
370 g_return_val_if_fail (text != NULL, 0);
372 return atk_text_get_n_selections (text);
377 impl_getSelection (PortableServer_Servant servant,
378 const CORBA_long selectionNum,
379 CORBA_long * startOffset, CORBA_long * endOffset,
380 CORBA_Environment *ev)
382 AtkText *text = get_text_from_servant (servant);
383 gint intStartOffset, intEndOffset;
385 g_return_if_fail (text != NULL);
387 /* atk_text_get_selection returns gchar* which we discard */
388 g_free (atk_text_get_selection (text, selectionNum,
389 &intStartOffset, &intEndOffset));
391 *startOffset = intStartOffset;
392 *endOffset = intEndOffset;
397 impl_addSelection (PortableServer_Servant servant,
398 const CORBA_long startOffset,
399 const CORBA_long endOffset,
400 CORBA_Environment *ev)
402 AtkText *text = get_text_from_servant (servant);
404 g_return_val_if_fail (text != NULL, FALSE);
406 return atk_text_add_selection (text,
407 startOffset, endOffset);
412 impl_removeSelection (PortableServer_Servant servant,
413 const CORBA_long selectionNum,
414 CORBA_Environment *ev)
416 AtkText *text = get_text_from_servant (servant);
418 g_return_val_if_fail (text != NULL, FALSE);
420 return atk_text_remove_selection (text, selectionNum);
425 impl_setSelection (PortableServer_Servant servant,
426 const CORBA_long selectionNum,
427 const CORBA_long startOffset,
428 const CORBA_long endOffset,
429 CORBA_Environment *ev)
431 AtkText *text = get_text_from_servant (servant);
433 g_return_val_if_fail (text != NULL, FALSE);
435 return atk_text_set_selection (text,
436 selectionNum, startOffset, endOffset);
441 impl_setCaretOffset (PortableServer_Servant servant,
442 const CORBA_long value,
443 CORBA_Environment *ev)
445 AtkText *text = get_text_from_servant (servant);
447 g_return_val_if_fail (text != NULL, FALSE);
449 return atk_text_set_caret_offset (text, value);
452 #define SPI_TEXT_MIN_RANGE_FOR_LINE_CHECK 6
455 impl_getRangeExtents(PortableServer_Servant servant,
456 const CORBA_long startOffset,
457 const CORBA_long endOffset,
458 CORBA_long * x, CORBA_long * y,
461 const CORBA_short coordType,
462 CORBA_Environment * ev)
464 AtkText *text = get_text_from_servant (servant);
465 SpiTextRect cbounds, bounds;
468 g_return_if_fail (text != NULL);
470 atk_text_get_character_extents (text, startOffset,
471 &bounds.x, &bounds.y, &bounds.w, &bounds.h,
472 (AtkCoordType) coordType);
473 /* no equivalent ATK API yet, must do the hard way. :-( */
474 for (i = startOffset + 1; i < endOffset; i++)
476 atk_text_get_character_extents (text, i,
477 &cbounds.x, &cbounds.y, &cbounds.w, &cbounds.h,
478 (AtkCoordType) coordType);
479 _spi_text_rect_union (&bounds, &cbounds);
488 static Accessibility_Text_RangeList *
489 _spi_text_range_seq_from_gslist (GSList *range_list)
491 Accessibility_Text_RangeList *rangeList =
492 Accessibility_Text_RangeList__alloc ();
493 int i, len = g_slist_length (range_list);
494 GSList *list = range_list;
496 rangeList->_length = len;
497 rangeList->_buffer = Accessibility_Text_RangeList_allocbuf (len);
498 for (i = 0; i < len; ++i)
500 memcpy (&rangeList->_buffer[i], list->data, sizeof (Accessibility_Text_Range));
501 spi_init_any_nil (&rangeList->_buffer[i].data);
503 list = g_slist_next (range_list);
505 g_slist_free (range_list);
511 _spi_bounds_contain (SpiTextRect *clip, SpiTextRect *cbounds,
512 Accessibility_TEXT_CLIP_TYPE xClipType,
513 Accessibility_TEXT_CLIP_TYPE yClipType)
515 gint clipx2 = clip->x + clip->w;
516 gint clipy2 = clip->y + clip->h;
517 gint charx2 = cbounds->x + cbounds->w;
518 gint chary2 = cbounds->y + cbounds->h;
519 gboolean x_min_ok, y_min_ok, x_max_ok, y_max_ok;
521 x_min_ok = (cbounds->x >= clip->x) ||
522 ((charx2 >= clip->x) &&
523 ((xClipType == Accessibility_TEXT_CLIP_NONE) ||
524 (xClipType == Accessibility_TEXT_CLIP_MAX)));
525 x_max_ok = (charx2 <= clipx2) ||
526 ((cbounds->x <= clipx2) &&
527 ((xClipType == Accessibility_TEXT_CLIP_NONE) ||
528 (xClipType == Accessibility_TEXT_CLIP_MIN)));
529 y_min_ok = (cbounds->y >= clip->y) ||
530 ((chary2 >= clip->y) &&
531 ((yClipType == Accessibility_TEXT_CLIP_NONE) ||
532 (yClipType == Accessibility_TEXT_CLIP_MAX)));
533 y_max_ok = (chary2 <= clipy2) ||
534 ((cbounds->y <= clipy2) &&
535 ((yClipType == Accessibility_TEXT_CLIP_NONE) ||
536 (yClipType == Accessibility_TEXT_CLIP_MIN)));
538 if (x_min_ok && y_min_ok && x_max_ok && y_max_ok)
544 Accessibility_Text_RangeList *
545 impl_getBoundedRanges(PortableServer_Servant servant,
548 const CORBA_long width,
549 const CORBA_long height,
550 const CORBA_short coordType,
551 const Accessibility_TEXT_CLIP_TYPE xClipType,
552 const Accessibility_TEXT_CLIP_TYPE yClipType,
553 CORBA_Environment * ev)
555 AtkText *text = get_text_from_servant (servant);
556 GSList *range_list = NULL;
558 int startOffset = 0, endOffset = atk_text_get_character_count (text);
560 gint minLineStart, minLineEnd, maxLineStart, maxLineEnd;
561 long bounds_min_offset;
562 long bounds_max_offset;
569 /* for horizontal text layouts, at least, the following check helps. */
570 bounds_min_offset = atk_text_get_offset_at_point (text, x, y,
571 (AtkCoordType) coordType);
572 bounds_max_offset = atk_text_get_offset_at_point (text, x + width, y + height,
573 (AtkCoordType) coordType);
574 atk_text_get_text_at_offset (text, bounds_min_offset,
575 ATK_TEXT_BOUNDARY_LINE_START,
576 &minLineStart, &minLineEnd);
577 atk_text_get_text_at_offset (text, bounds_max_offset,
578 ATK_TEXT_BOUNDARY_LINE_START,
579 &maxLineStart, &maxLineEnd);
580 startOffset = MIN (minLineStart, maxLineStart);
581 endOffset = MAX (minLineEnd, maxLineEnd);
583 curr_offset = startOffset;
585 while (curr_offset < endOffset)
587 int offset = startOffset;
589 while (curr_offset < endOffset)
591 atk_text_get_character_extents (text, curr_offset,
592 &cbounds.x, &cbounds.y,
593 &cbounds.w, &cbounds.h,
594 (AtkCoordType) coordType);
595 if (!_spi_bounds_contain (&clip, &cbounds, xClipType, yClipType))
599 /* add the range to our list */
600 if (curr_offset > offset)
602 Accessibility_Text_Range *range = g_malloc (sizeof (Accessibility_Text_Range));
604 range->startOffset = offset;
605 range->endOffset = curr_offset;
606 s = atk_text_get_text (text, offset, curr_offset);
607 range->content = CORBA_string_dup (s ? s : "");
608 range_list = g_slist_append (range_list, range);
609 offset = curr_offset;
613 return _spi_text_range_seq_from_gslist (range_list); /* frees the GSList too */
618 spi_text_class_init (SpiTextClass *klass)
620 POA_Accessibility_Text__epv *epv = &klass->epv;
622 /* Initialize epv table */
624 epv->getText = impl_getText;
625 epv->getTextAfterOffset = impl_getTextAfterOffset;
626 epv->getCharacterAtOffset = impl_getCharacterAtOffset;
627 epv->getTextAtOffset = impl_getTextAtOffset;
628 epv->getTextBeforeOffset = impl_getTextBeforeOffset;
629 epv->_get_caretOffset = impl__get_caretOffset;
630 epv->getAttributes = impl_getAttributes;
631 epv->getCharacterExtents = impl_getCharacterExtents;
632 epv->_get_characterCount = impl__get_characterCount;
633 epv->getOffsetAtPoint = impl_getOffsetAtPoint;
634 epv->getNSelections = impl_getNSelections;
635 epv->getSelection = impl_getSelection;
636 epv->addSelection = impl_addSelection;
637 epv->removeSelection = impl_removeSelection;
638 epv->setSelection = impl_setSelection;
639 epv->setCaretOffset = impl_setCaretOffset;
640 epv->getRangeExtents = impl_getRangeExtents;
641 epv->getBoundedRanges = impl_getBoundedRanges;
645 spi_text_init (SpiText *text)
649 BONOBO_TYPE_FUNC_FULL (SpiText,
655 spi_text_construct (SpiText *text, AtkObject *obj)
657 spi_base_construct (SPI_BASE (text), G_OBJECT(obj));
662 spi_text_interface_new (AtkObject *obj)
666 g_return_val_if_fail (ATK_IS_TEXT (obj), NULL);
668 retval = g_object_new (SPI_TEXT_TYPE, NULL);
670 spi_text_construct (retval, obj);