/* Pango * pango-layout.c: Highlevel layout driver * * Copyright (C) 2000 Red Hat Software * * This library is free software; you can redistribute it and/or * modify it under the terms of the GNU Library General Public * License as published by the Free Software Foundation; either * version 2 of the License, or (at your option) any later version. * * This library is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU * Library General Public License for more details. * * You should have received a copy of the GNU Library General Public * License along with this library; if not, write to the * Free Software Foundation, Inc., 59 Temple Place - Suite 330, * Boston, MA 02111-1307, USA. */ #include /* For pango_shape() */ #include #include #include #include #include #define LINE_IS_VALID(line) ((line)->layout != NULL) typedef struct _Extents Extents; struct _Extents { /* Vertical position of the line's baseline in layout coords */ int baseline; /* Line extents in layout coords */ PangoRectangle ink_rect; PangoRectangle logical_rect; }; struct _PangoLayoutIter { PangoLayout *layout; GSList *line_list_link; PangoLayoutLine *line; /* If run is NULL, it means we're on a "virtual run" * at the end of the line with 0 width */ GSList *run_list_link; PangoLayoutRun *run; /* FIXME nuke this, just keep the link */ int index; /* layout extents in layout coordinates */ PangoRectangle logical_rect; /* list of Extents for each line in layout coordinates */ GSList *line_extents; GSList *line_extents_link; /* X position of the current run */ int run_x; /* Does the run have a shape attribute */ gboolean run_is_shaped; /* Extents of the current run */ PangoRectangle run_logical_rect; /* this run is left-to-right */ gboolean ltr; /* X position where cluster begins, where "begins" means left or * right side according to text direction */ int cluster_x; /* Byte index of the cluster start from the run start */ int cluster_index; /* Glyph offset to the current cluster start */ int cluster_start; /* The next cluster_start */ int next_cluster_start; }; typedef struct _PangoLayoutLinePrivate PangoLayoutLinePrivate; struct _PangoLayoutLinePrivate { PangoLayoutLine line; guint ref_count; }; struct _PangoLayout { GObject parent_instance; /* If you add fields to PangoLayout, be sure to update both * the _copy function */ PangoContext *context; PangoAttrList *attrs; PangoFontDescription *font_desc; gchar *text; int length; /* length of text in bytes */ int width; /* wrap width, in device units */ int indent; /* amount by which first line should be shorter */ int spacing; /* spacing between lines */ guint justify : 1; guint alignment : 2; gint n_chars; /* Total number of characters in layout */ PangoLogAttr *log_attrs; /* Logical attributes for layout's text */ int tab_width; /* Cached width of a tab. -1 == not yet calculated */ PangoTabArray *tabs; GSList *lines; PangoWrapMode wrap; }; struct _PangoLayoutClass { GObjectClass parent_class; }; static void pango_layout_clear_lines (PangoLayout *layout); static void pango_layout_check_lines (PangoLayout *layout); static PangoLayoutLine * pango_layout_line_new (PangoLayout *layout); static void pango_layout_line_postprocess (PangoLayoutLine *line); static int *pango_layout_line_get_log2vis_map (PangoLayoutLine *line, gboolean strong); static int *pango_layout_line_get_vis2log_map (PangoLayoutLine *line, gboolean strong); static void pango_layout_get_item_properties (PangoItem *item, PangoUnderline *uline, gint *rise, PangoRectangle *ink_rect, PangoRectangle *logical_rect, gboolean *shape_set); static void pango_layout_init (PangoLayout *layout); static void pango_layout_class_init (PangoLayoutClass *klass); static void pango_layout_finalize (GObject *object); static gpointer parent_class; GType pango_layout_get_type (void) { static GType object_type = 0; if (!object_type) { static const GTypeInfo object_info = { sizeof (PangoLayoutClass), (GBaseInitFunc) NULL, (GBaseFinalizeFunc) NULL, (GClassInitFunc) pango_layout_class_init, NULL, /* class_finalize */ NULL, /* class_data */ sizeof (PangoLayout), 0, /* n_preallocs */ (GInstanceInitFunc) pango_layout_init, }; object_type = g_type_register_static (G_TYPE_OBJECT, "PangoLayout", &object_info, 0); } return object_type; } static void pango_layout_init (PangoLayout *layout) { layout->attrs = NULL; layout->font_desc = NULL; layout->text = NULL; layout->length = 0; layout->width = -1; layout->indent = 0; layout->alignment = PANGO_ALIGN_LEFT; layout->justify = FALSE; layout->log_attrs = NULL; layout->lines = NULL; layout->tab_width = -1; layout->wrap = PANGO_WRAP_WORD; } static void pango_layout_class_init (PangoLayoutClass *klass) { GObjectClass *object_class = G_OBJECT_CLASS (klass); parent_class = g_type_class_peek_parent (klass); object_class->finalize = pango_layout_finalize; } static void pango_layout_finalize (GObject *object) { PangoLayout *layout; layout = PANGO_LAYOUT (object); pango_layout_clear_lines (layout); if (layout->context) g_object_unref (G_OBJECT (layout->context)); if (layout->attrs) pango_attr_list_unref (layout->attrs); if (layout->text) g_free (layout->text); if (layout->font_desc) pango_font_description_free (layout->font_desc); if (layout->tabs) pango_tab_array_free (layout->tabs); G_OBJECT_CLASS (parent_class)->finalize (object); } /** * pango_layout_new: * @context: a #PangoContext * * Create a new #PangoLayout object with attributes initialized to * default values for a particular #PangoContext. * * Return value: a new #PangoLayout, with a reference count of one. **/ PangoLayout * pango_layout_new (PangoContext *context) { PangoLayout *layout; g_return_val_if_fail (context != NULL, NULL); layout = PANGO_LAYOUT (g_type_create_instance (pango_layout_get_type ())); layout->context = context; g_object_ref (G_OBJECT (context)); return layout; } /** * pango_layout_copy: * @src: a #PangoLayout * * Does a deep copy-by-value of the @src layout. The attribute list, * tab array, and text from the original layout are all copied by * value. * * Return value: a new #PangoLayout identical to @src **/ PangoLayout* pango_layout_copy (PangoLayout *src) { PangoLayout *layout; g_return_val_if_fail (PANGO_IS_LAYOUT (src), NULL); layout = pango_layout_new (src->context); if (src->attrs) layout->attrs = pango_attr_list_copy (src->attrs); if (src->font_desc) layout->font_desc = pango_font_description_copy (src->font_desc); layout->text = g_strdup (src->text); layout->length = src->length; layout->width = src->width; layout->indent = src->indent; layout->spacing = src->spacing; layout->justify = src->justify; layout->alignment = src->alignment; layout->n_chars = src->n_chars; layout->tab_width = src->tab_width; if (src->tabs) layout->tabs = pango_tab_array_copy (src->tabs); layout->wrap = src->wrap; /* log_attrs, lines fields are updated by check_lines */ return layout; } /** * pango_layout_get_context: * @layout: a #PangoLayout * * Retrieves the #PangoContext used for this layout. * * Return value: The #PangoContext for the layout. This does not * have an additional refcount added, so if you want to keep * a copy of this around, you must reference it yourself. **/ PangoContext * pango_layout_get_context (PangoLayout *layout) { g_return_val_if_fail (layout != NULL, NULL); return layout->context; } /** * pango_layout_set_width: * @layout: a #PangoLayout. * @width: the desired width, or -1 to indicate that no wrapping should be * performed. * * Sets the width to which the lines of the #PangoLayout should be wrapped. **/ void pango_layout_set_width (PangoLayout *layout, int width) { g_return_if_fail (layout != NULL); if (width != layout->width) { layout->width = width; pango_layout_clear_lines (layout); } } /** * pango_layout_get_width: * @layout: a #PangoLayout * * Gets the width to which the lines of the #PangoLayout should be wrapped. * * Return value: the width **/ int pango_layout_get_width (PangoLayout *layout) { g_return_val_if_fail (layout != NULL, 0); return layout->width; } /** * pango_layout_set_wrap: * @layout: a #PangoLayout * @wrap: wrap mode * * Sets the wrap style; the wrap style only has an effect if a width * is set on the layout with pango_layout_set_width(). To turn off wrapping, * set the width to -1. **/ void pango_layout_set_wrap (PangoLayout *layout, PangoWrapMode wrap) { g_return_if_fail (PANGO_IS_LAYOUT (layout)); if (layout->wrap != wrap) { pango_layout_clear_lines (layout); layout->wrap = wrap; } } /** * pango_layout_get_wrap: * @layout: a #PangoLayout * * Get the wrap mode for the layout. * * Return value: Active wrap mode. **/ PangoWrapMode pango_layout_get_wrap (PangoLayout *layout) { g_return_val_if_fail (PANGO_IS_LAYOUT (layout), 0); return layout->wrap; } /** * pango_layout_set_indent * @layout: a #PangoLayout. * @indent: the amount by which to indent * * Sets the amount by which the first line should be shorter than the * rest of the lines. This may be negative, in which case * the subsequent lines will be shorter than the first line. (However, * in either case, the entire width of the layout will be given by * the value **/ void pango_layout_set_indent (PangoLayout *layout, int indent) { g_return_if_fail (layout != NULL); if (indent != layout->indent) { layout->indent = indent; pango_layout_clear_lines (layout); } } /** * pango_layout_get_indent: * @layout: a #PangoLayout * * Gets the amount by which the first line should be shorter than the * rest of the lines. * * Return value: the indent **/ int pango_layout_get_indent (PangoLayout *layout) { g_return_val_if_fail (layout != NULL, 0); return layout->indent; } /** * pango_layout_set_spacing: * @layout: a #PangoLayout. * @spacing: the amount of spacing * * Sets the amount of spacing between the lines of the layout. **/ void pango_layout_set_spacing (PangoLayout *layout, int spacing) { g_return_if_fail (layout != NULL); if (spacing != layout->spacing) { layout->spacing = spacing; pango_layout_clear_lines (layout); } } /** * pango_layout_get_spacing: * @layout: a #PangoLayout * * Gets the amount of spacing between the lines of the layout. * * Return value: the spacing (in thousandths of a device unit) **/ int pango_layout_get_spacing (PangoLayout *layout) { g_return_val_if_fail (layout != NULL, 0); return layout->spacing; } /** * pango_layout_set_attributes: * @layout: a #PangoLayout * @attrs: a #PangoAttrList * * Sets the text attributes for a layout object **/ void pango_layout_set_attributes (PangoLayout *layout, PangoAttrList *attrs) { PangoAttrList *old_attrs; g_return_if_fail (layout != NULL); old_attrs = layout->attrs; layout->attrs = attrs; pango_attr_list_ref (layout->attrs); pango_layout_clear_lines (layout); if (old_attrs) pango_attr_list_unref (old_attrs); } /** * pango_layout_get_attributes: * @layout: a #PangoLayout * * Gets the attribute list for the layout, if any * * Return value: a #PangoAttrList **/ PangoAttrList* pango_layout_get_attributes (PangoLayout *layout) { g_return_val_if_fail (PANGO_IS_LAYOUT (layout), NULL); return layout->attrs; } /** * pango_layout_set_font_description: * @layout: a #PangoLayout * @desc: the new pango font description, or %NULL to unset the * current font description. * * Set the default font description for the layout. If no font * description is set on the layout, the font description from * the layout's context is used. **/ void pango_layout_set_font_description (PangoLayout *layout, const PangoFontDescription *desc) { g_return_if_fail (layout != NULL); g_return_if_fail (desc != NULL); if (layout->font_desc) pango_font_description_free (layout->font_desc); if (desc) layout->font_desc = pango_font_description_copy (desc); else layout->font_desc = NULL; pango_layout_clear_lines (layout); } /** * pango_layout_set_justify: * @layout: a #PangoLayout * @justify: whether the lines in the layout should be justified. * * Sets whether or not each complete line should be stretched to * fill the entire width of the layout. This stretching is typically * done by adding whitespace, but for some scripts (such as Arabic), * the justification is done by extending the characters. **/ void pango_layout_set_justify (PangoLayout *layout, gboolean justify) { g_return_if_fail (layout != NULL); layout->justify = justify; } /** * pango_layout_get_justify: * @layout: a #PangoLayout * * Gets whether or not each complete line should be stretched to * fill the entire width of the layout. * * Return value: the justify **/ gboolean pango_layout_get_justify (PangoLayout *layout) { g_return_val_if_fail (layout != NULL, FALSE); return layout->justify; } /** * pango_layout_set_alignment: * @layout: a #PangoLayout * @alignment: the new alignment * * Sets the alignment for the layout (how partial lines are * positioned within the horizontal space available.) **/ void pango_layout_set_alignment (PangoLayout *layout, PangoAlignment alignment) { g_return_if_fail (layout != NULL); layout->alignment = alignment; } /** * pango_layout_get_alignment: * @layout: a #PangoLayout * * Sets the alignment for the layout (how partial lines are * positioned within the horizontal space available.) * * Return value: the alignment value **/ PangoAlignment pango_layout_get_alignment (PangoLayout *layout) { g_return_val_if_fail (layout != NULL, PANGO_ALIGN_LEFT); return layout->alignment; } /** * pango_layout_set_tabs: * @layout: a #PangoLayout * @tabs: a #PangoTabArray * * Sets the tabs to use for @layout, overriding the default tabs * (by default, tabs are every 8 spaces). If @tabs is %NULL, the default * tabs are reinstated. @tabs is copied into the layout; you must * free your copy of @tabs yourself. **/ void pango_layout_set_tabs (PangoLayout *layout, PangoTabArray *tabs) { g_return_if_fail (PANGO_IS_LAYOUT (layout)); if (layout->tabs) pango_tab_array_free (layout->tabs); layout->tabs = tabs ? pango_tab_array_copy (tabs) : NULL; } /** * pango_layout_get_tabs: * @layout: a #PangoLayout * * Get the current #PangoTabArray used by this layout. If no * #PangoTabArray has been set, then the default tabs are in use * and %NULL is returned. Default tabs are every 8 spaces. * The return value should be freed with pango_tab_array_free(). * * Return value: a copy of the tabs for this layout, or %NULL **/ PangoTabArray* pango_layout_get_tabs (PangoLayout *layout) { g_return_val_if_fail (PANGO_IS_LAYOUT (layout), NULL); if (layout->tabs) return pango_tab_array_copy (layout->tabs); else return NULL; } /** * pango_layout_set_text: * @layout: a #PangoLayout * @text: a UTF8-string * @length: the length of @text, in bytes. -1 indicates that * the string is null terminated and the length should be * calculated. * * Set the text of the layout. **/ void pango_layout_set_text (PangoLayout *layout, const char *text, int length) { g_return_if_fail (layout != NULL); g_return_if_fail (length == 0 || text != NULL); if (layout->text) g_free (layout->text); if (length == 0) { layout->text = g_strdup (""); layout->n_chars = 0; } else { const char *p = text; int n_chars = 0; while (*p && (length < 0 || p < text + length)) { if (g_utf8_get_char (p) == (gunichar)-1) { g_warning ("Invalid UTF8 string passed to pango_layout_set_text()"); return; } p = g_utf8_next_char (p); n_chars++; } if (length < 0) length = p - text; if (length >= 0 && p != text + length) g_warning ("string passed to pango_layout_set_text() contains embedded NULL"); length = p - text; /* NULL-terminate the text for convenience. */ layout->text = g_malloc (length + 1); memcpy (layout->text, text, length); layout->text[length] = '\0'; layout->n_chars = n_chars; } layout->length = length; pango_layout_clear_lines (layout); } /** * pango_layout_get_text: * @layout: a #PangoLayout * * Gets the text in the layout. The returned text should not * be freed or modified. * * Return value: the text in the layout **/ const char* pango_layout_get_text (PangoLayout *layout) { g_return_val_if_fail (PANGO_IS_LAYOUT (layout), NULL); return layout->text; } /** * pango_layout_set_markup: * @layout: a #PangoLayout * @markup: marked-up text * @length: length of marked-up text in bytes, or -1 * * Same as pango_layout_set_markup_with_accel(), but * the markup text isn't scanned for accelerators. * **/ void pango_layout_set_markup (PangoLayout *layout, const char *markup, int length) { pango_layout_set_markup_with_accel (layout, markup, length, 0, NULL); } /** * pango_layout_set_markup_with_accel: * @layout: a #PangoLayout * @markup: some marked-up text (see markup format) * @length: length of @markup in bytes * @accel_marker: marker for accelerators in the text * @accel_char: return location for any located accelerators * * Sets the layout text and attribute list from marked-up text (see * markup format). Replaces * the current text and attribute list. * * If @accel_marker is nonzero, the given character will mark the * character following it as an accelerator. For example, the accel * marker might be an ampersand or underscore. All characters marked * as an accelerator will receive a %PANGO_UNDERLINE_LOW attribute, * and the first character so marked will be returned in @accel_char. * Two @accel_marker characters following each other produce a single * literal @accel_marker character. **/ void pango_layout_set_markup_with_accel (PangoLayout *layout, const char *markup, int length, gunichar accel_marker, gunichar *accel_char) { PangoAttrList *list = NULL; char *text = NULL; GError *error; g_return_if_fail (PANGO_IS_LAYOUT (layout)); g_return_if_fail (markup != NULL); error = NULL; if (!pango_parse_markup (markup, length, accel_marker, &list, &text, accel_char, &error)) { g_warning ("%s: %s", G_STRLOC, error->message); g_error_free (error); return; } pango_layout_set_text (layout, text, -1); pango_layout_set_attributes (layout, list); pango_attr_list_unref (list); } /** * pango_layout_context_changed: * @layout: a #PangoLayout * * Forces recomputation of any state in the #PangoLayout that * might depend on the layout's context. This function should * be called if you make changes to the context subsequent * to creating the layout. **/ void pango_layout_context_changed (PangoLayout *layout) { pango_layout_clear_lines (layout); layout->tab_width = -1; } /** * pango_layout_get_log_attrs: * @layout: a #PangoLayout * @attrs: location to store a pointer to an array of logical attributes * This value must be freed with g_free(). * @n_attrs: location to store the number of the attributes in the * array. (The stored value will be equal to the total number * of characters in the layout.) * * Retrieve an array of logical attributes for each character in * the layout. **/ void pango_layout_get_log_attrs (PangoLayout *layout, PangoLogAttr **attrs, gint *n_attrs) { g_return_if_fail (layout != NULL); pango_layout_check_lines (layout); if (attrs) { *attrs = g_new (PangoLogAttr, layout->n_chars); memcpy (*attrs, layout->log_attrs, sizeof(PangoLogAttr) * layout->n_chars); } if (n_attrs) *n_attrs = layout->n_chars; } /** * pango_layout_get_line_count: * @layout: #PangoLayout * * Retrieve the count of lines for the #PangoLayout * * Return value: the line count **/ int pango_layout_get_line_count (PangoLayout *layout) { g_return_val_if_fail (layout != NULL, 0); pango_layout_check_lines (layout); return g_slist_length (layout->lines); } /** * pango_layout_get_lines: * @layout: a #PangoLayout * * Return the lines of the layout as a list * * Return value: a #GSList containing the lines in the layout. This * points to internal data of the #PangoLayout and must be used with * care. It will become invalid on any change to the layout's * text or properties. **/ GSList * pango_layout_get_lines (PangoLayout *layout) { pango_layout_check_lines (layout); return layout->lines; } /** * pango_layout_get_line: * @layout: a #PangoLayout * @line: the index of a line, which must be between 0 and * pango_layout_get_line_count(layout) - 1, inclusive. * * Retrieves a particular line from a #PangoLayout * * Return value: the requested #PangoLayoutLine, or %NULL if the * index is out of range. This layout line can * be ref'ed and retained, but will become invalid * if changes are made to the #PangoLayout. **/ PangoLayoutLine * pango_layout_get_line (PangoLayout *layout, int line) { GSList *list_item; g_return_val_if_fail (layout != NULL, NULL); g_return_val_if_fail (line >= 0, NULL); if (line < 0) return NULL; pango_layout_check_lines (layout); list_item = g_slist_nth (layout->lines, line); if (list_item) return list_item->data; return NULL; } /** * pango_layout_line_index_to_x: * @line: a #PangoLayoutLine * @index: byte offset within the Layout's text * @trailing: integer indicating where in the cluster the user clicked. * If the script allows positioning within the cluster, it is either * 0 or 1; otherwise it is either 0 or the number * of characters in the cluster. In either case * 0 represents the trailing edge of the cluster. * @x_pos: location to store the x_offset (in thousandths of a device unit) * * Convert index within a line to X pos * * **/ void pango_layout_line_index_to_x (PangoLayoutLine *line, int index, gboolean trailing, int *x_pos) { GSList *run_list = line->runs; int width = 0; while (run_list) { PangoRectangle logical_rect; PangoLayoutRun *run = run_list->data; gboolean shape_set; pango_layout_get_item_properties (run->item, NULL, NULL, NULL, &logical_rect, &shape_set); if (run->item->offset <= index && run->item->offset + run->item->length > index) { if (shape_set) { if (x_pos) *x_pos = width + (trailing ? logical_rect.width : 0); } else { pango_glyph_string_index_to_x (run->glyphs, line->layout->text + run->item->offset, run->item->length, &run->item->analysis, index - run->item->offset, trailing, x_pos); if (x_pos) *x_pos += width; } return; } if (!shape_set) pango_glyph_string_extents (run->glyphs, run->item->analysis.font, NULL, &logical_rect); width += logical_rect.width; run_list = run_list->next; } if(x_pos) *x_pos = width; } /** * pango_layout_index_to_line_x: * @layout: a #PangoLayout * @index: the byte index of the character to find * @trailing: whether we should compute the result for the beginning * or end of the character (or cluster - the decision * for which may be script dependent). * @line: location to store resulting line index. (which will * between 0 and pango_layout_get_line_count(layout) - 1) * @x_pos: location to store resulting position within line * (in thousandths of a device unit) * * Converts from byte index within the layout to line and X position. * (X position is measured from the left edge of the line) */ void pango_layout_index_to_line_x (PangoLayout *layout, int index, gboolean trailing, int *line, int *x_pos) { GSList *tmp_list; int line_num = 0; PangoLayoutLine *layout_line = NULL; g_return_if_fail (layout != NULL); g_return_if_fail (index >= 0); g_return_if_fail (index <= layout->length); pango_layout_check_lines (layout); tmp_list = layout->lines; while (tmp_list) { PangoLayoutLine *tmp_line = tmp_list->data; /* use end of previous layout_line if index was in the paragraph * delimiters */ if (layout_line && layout_line->start_index > index) { if (line) *line = line_num; pango_layout_line_index_to_x (layout_line, layout_line->start_index + layout_line->length, trailing, x_pos); return; } layout_line = tmp_line; ++line_num; if ((layout_line->start_index + layout_line->length) > index) { if (line) *line = line_num; pango_layout_line_index_to_x (layout_line, index, trailing, x_pos); return; } tmp_list = tmp_list->next; } if (line) *line = -1; if (x_pos) *x_pos = -1; } /** * pango_layout_move_cursor_visually: * @layout: a #PangoLayout. * @old_index: the old cursor byte index * @old_trailing: * @direction: direction to move cursor. A negative * value indicates motion to the left. * @new_index: location to store the new cursor byte index. A value of -1 * indicates that the cursor has been moved off the beginning * of the layout. A value of G_MAXINT indicates that * the cursor has been moved off the end of the layout. * @new_trailing: * * Computes a new cursor position from an old position and * a count of positions to move visually. If @count is positive, * then the new strong cursor position will be one position * to the right of the old cursor position. If @count is position * then the new strong cursor position will be one position * to the left of the old cursor position. * * In the presence of bidirection text, the correspondence * between logical and visual order will depend on the direction * of the current run, and there may be jumps when the cursor * is moved off of the end of a run. **/ void pango_layout_move_cursor_visually (PangoLayout *layout, int old_index, int old_trailing, int direction, int *new_index, int *new_trailing) { PangoDirection base_dir; PangoLayoutLine *line = NULL; PangoLayoutLine *prev_line = NULL; PangoLayoutLine *next_line; GSList *tmp_list; int *log2vis_map; int *vis2log_map; int n_vis; int vis_pos; g_return_if_fail (layout != NULL); g_return_if_fail (old_index >= 0 && old_index <= layout->length); g_return_if_fail (old_index < layout->length || old_trailing == 0); g_return_if_fail (new_index != NULL); g_return_if_fail (new_trailing != NULL); pango_layout_check_lines (layout); base_dir = pango_context_get_base_dir (layout->context); /* Find the line the old cursor is on */ tmp_list = layout->lines; while (tmp_list) { PangoLayoutLine *tmp_line = tmp_list->data; if (line && line->start_index > old_index) break; /* stick with the previous line */ prev_line = line; line = tmp_line; if (line->start_index + line->length > old_index || !tmp_list->next) break; tmp_list = tmp_list->next; } if (tmp_list->next) next_line = tmp_list->next->data; else next_line = NULL; if (old_trailing) old_index = g_utf8_next_char (layout->text + old_index) - layout->text; log2vis_map = pango_layout_line_get_log2vis_map (line, TRUE); n_vis = g_utf8_strlen (layout->text + line->start_index, line->length); /* Clamp old_index to fit on the line */ if (old_index > (line->start_index + line->length)) old_index = line->start_index + line->length; vis_pos = log2vis_map[old_index - line->start_index]; g_free (log2vis_map); if (vis_pos == 0 && direction < 0) { if (base_dir == PANGO_DIRECTION_LTR) { if (!prev_line) { *new_index = -1; *new_trailing = 0; return; } line = prev_line; } else { if (!next_line) { *new_index = G_MAXINT; *new_trailing = 0; return; } line = next_line; } vis_pos = g_utf8_strlen (layout->text + line->start_index, line->length); } else if (vis_pos == n_vis && direction > 0) { if (base_dir == PANGO_DIRECTION_LTR) { if (!next_line) { *new_index = G_MAXINT; *new_trailing = 0; return; } line = next_line; } else { if (!prev_line) { *new_index = -1; *new_trailing = 0; return; } line = prev_line; } vis_pos = 0; } vis_pos += (direction > 0) ? 1 : -1; vis2log_map = pango_layout_line_get_vis2log_map (line, TRUE); *new_index = line->start_index + vis2log_map[vis_pos]; g_free (vis2log_map); if (*new_index == line->start_index + line->length && line->length > 0) { *new_index = g_utf8_prev_char (layout->text + *new_index) - layout->text; *new_trailing = 1; } else *new_trailing = 0; } /** * pango_layout_xy_to_index: * @layout: a #PangoLayout * @x: the X offset (in thousandths of a device unit) * from the left edge of the layout. * @y: the Y offset (in thousandths of a device unit) * from the top edge of the layout * @index: location to store calculated byte index * @trailing: location to store a integer indicating where * in the cluster the user clicked. If the script * allows positioning within the cluster, it is either * 0 or 1; otherwise it is either 0 or the number * of characters in the cluster. In either case * 0 represents the trailing edge of the cluster. * * Convert from X and Y position within a layout to the byte * index to the character at that logical position. If the * position is not inside the layout, the closest position is chosen * (the x/y position will be clamped inside the layout). * If a closest position is chosen, then the function returns %FALSE; * on an exact hit, it returns %TRUE. * * Return value: %TRUE if the coordinates were inside text **/ gboolean pango_layout_xy_to_index (PangoLayout *layout, int x, int y, int *index, gboolean *trailing) { PangoLayoutIter *iter; PangoLayoutLine *prev_line = NULL; PangoLayoutLine *found = NULL; int found_line_x = 0; int prev_first = 0; int prev_last = 0; int prev_line_x = 0; gboolean retval = FALSE; gboolean outside = FALSE; g_return_val_if_fail (PANGO_IS_LAYOUT (layout), FALSE); iter = pango_layout_get_iter (layout); do { PangoRectangle line_logical; int first_y, last_y; pango_layout_iter_get_line_extents (iter, NULL, &line_logical); pango_layout_iter_get_line_yrange (iter, &first_y, &last_y); if (y < first_y) { if (prev_line && y < (prev_last + (first_y - prev_last) / 2)) { found = prev_line; found_line_x = prev_line_x; } else { if (prev_line == NULL) outside = TRUE; /* off the top */ found = pango_layout_iter_get_line (iter); found_line_x = x - line_logical.x; } } else if (y >= first_y && y < last_y) { found = pango_layout_iter_get_line (iter); found_line_x = x - line_logical.x; } prev_line = pango_layout_iter_get_line (iter); prev_first = first_y; prev_last = last_y; prev_line_x = x - line_logical.x; if (found != NULL) break; } while (pango_layout_iter_next_line (iter)); pango_layout_iter_free (iter); if (found == NULL) { /* Off the bottom of the layout */ outside = TRUE; found = prev_line; found_line_x = prev_line_x; } retval = pango_layout_line_x_to_index (found, found_line_x, index, trailing); if (outside) retval = FALSE; return retval; } /** * pango_layout_index_to_pos: * @layout: a #PangoLayout * @index: byte index within @layout * @pos: rectangle in which to store the position of the character * * Convert from an index within a PangoLayout to the onscreen position * corresponding to that character, which is represented as rectangle. * Note that pos->x is always the leading edge of the character. If the * and pos->x + pos->width the trailing edge of the character. If the * directionality of the character is right-to-left, then pos->width * will be negative. **/ void pango_layout_index_to_pos (PangoLayout *layout, int index, PangoRectangle *pos) { PangoRectangle logical_rect; PangoLayoutIter *iter; PangoLayoutLine *layout_line = NULL; gboolean notfound = FALSE; g_return_if_fail (layout != NULL); g_return_if_fail (index >= 0); g_return_if_fail (pos != NULL); iter = pango_layout_get_iter (layout); while (TRUE) { PangoLayoutLine *tmp_line = pango_layout_iter_get_line (iter); if (layout_line && tmp_line->start_index > index) { /* index is in the paragraph delimiters, move to * end of previous line */ index = layout_line->start_index + layout_line->length; break; } layout_line = tmp_line; pango_layout_iter_get_line_extents (iter, NULL, &logical_rect); if (layout_line->start_index + layout_line->length > index) break; if (!pango_layout_iter_next_line (iter)) { notfound = TRUE; break; } } if (notfound) { /* Iterator should now be on the "NULL" run at the end of the last * line, which is a zero-width rectangle. Return the extents of * that run. */ pango_layout_iter_get_run_extents (iter, NULL, pos); } else { int x_pos; pos->y = logical_rect.y; pos->height = logical_rect.height; pango_layout_line_index_to_x (layout_line, index, FALSE, &x_pos); pos->x = logical_rect.x + x_pos; pango_layout_line_index_to_x (layout_line, index, TRUE, &x_pos); pos->width = (logical_rect.x + x_pos) - pos->x; } pango_layout_iter_free (iter); } static void pango_layout_line_get_range (PangoLayoutLine *line, char **start, char **end) { char *p; GSList *tmp_list; p = line->layout->text; tmp_list = line->layout->lines; while (tmp_list->data != line) { p += ((PangoLayoutLine *)tmp_list->data)->length; tmp_list = tmp_list->next; } if (start) *start = p; if (end) *end = p + line->length; } int * pango_layout_line_get_vis2log_map (PangoLayoutLine *line, gboolean strong) { PangoLayout *layout = line->layout; PangoDirection base_dir = pango_context_get_base_dir (layout->context); PangoDirection prev_dir = base_dir; GSList *tmp_list; gchar *start, *end; int *result; int pos = 0; int n_chars; pango_layout_line_get_range (line, &start, &end); n_chars = g_utf8_strlen (start, end - start); result = g_new (int, n_chars + 1); if (strong) { if (base_dir == PANGO_DIRECTION_LTR) { result[0] = 0; result[n_chars] = end - start; } else { result[0] = end - start; result[n_chars] = 0; } } tmp_list = line->runs; while (tmp_list) { PangoLayoutRun *run = tmp_list->data; int run_n_chars = run->item->num_chars; PangoDirection run_dir = (run->item->analysis.level % 2) ? PANGO_DIRECTION_RTL : PANGO_DIRECTION_LTR; char *p = layout->text + run->item->offset; int i; if (run_dir == PANGO_DIRECTION_LTR) { if ((strong && base_dir == run_dir) || (!strong && base_dir != run_dir) || (prev_dir == run_dir)) result[pos] = p - start; p = g_utf8_next_char (p); for (i = 1; i < run_n_chars; i++) { result[pos + i] = p - start; p = g_utf8_next_char (p); } if ((strong && base_dir == run_dir) || (!strong && base_dir != run_dir)) result[pos + run_n_chars] = p - start; } else { if ((strong && base_dir == run_dir) || (!strong && base_dir != run_dir)) result[pos + run_n_chars] = p - start; p = g_utf8_next_char (p); for (i = 1; i < run_n_chars; i++) { result[pos + run_n_chars - i] = p - start; p = g_utf8_next_char (p); } if ((strong && base_dir == run_dir) || (!strong && base_dir != run_dir) || (prev_dir == run_dir)) result[pos] = p - start; } pos += run_n_chars; prev_dir = run_dir; tmp_list = tmp_list->next; } return result; } static int * pango_layout_line_get_log2vis_map (PangoLayoutLine *line, gboolean strong) { gchar *start, *end; int *reverse_map; int *result; int i; int n_chars; pango_layout_line_get_range (line, &start, &end); n_chars = g_utf8_strlen (start, end - start); result = g_new0 (int, end - start + 1); reverse_map = pango_layout_line_get_vis2log_map (line, strong); for (i=0; i <= n_chars; i++) result[reverse_map[i]] = i; g_free (reverse_map); return result; } static PangoDirection pango_layout_line_get_char_direction (PangoLayoutLine *layout_line, int index) { GSList *run_list; run_list = layout_line->runs; while (run_list) { PangoLayoutRun *run = run_list->data; if (run->item->offset <= index && run->item->offset + run->item->length > index) return run->item->analysis.level % 2 ? PANGO_DIRECTION_RTL : PANGO_DIRECTION_LTR; run_list = run_list->next; } g_assert_not_reached (); return PANGO_DIRECTION_LTR; } /** * pango_layout_get_cursor_pos: * @layout: a #PangoLayout * @index: the byte index of the cursor * @strong_pos: location to store the strong cursor position (may be %NULL) * @weak_pos: location to store the weak cursor position (may be %NULL) * * Given an index within a layout, determine the positions that of the * strong and weak cursors if the insertion point is at that * index. The position of each cursor is stored as a zero-width * rectangle. The strong cursor location is the location where * characters of the directionality equal to the base direction of the * layout are inserted. The weak cursor location is the location * where characters of the directionality opposite to the base * direction of the layout are inserted. **/ void pango_layout_get_cursor_pos (PangoLayout *layout, int index, PangoRectangle *strong_pos, PangoRectangle *weak_pos) { PangoDirection base_dir; PangoDirection dir1, dir2; PangoRectangle line_rect; PangoLayoutLine *layout_line = NULL; /* Quiet GCC */ int x1_trailing; int x2; PangoLayoutIter *iter; g_return_if_fail (layout != NULL); g_return_if_fail (index >= 0 && index <= layout->length); base_dir = pango_context_get_base_dir (layout->context); iter = pango_layout_get_iter (layout); /* Find the line */ while (TRUE) { PangoLayoutLine *tmp_line; tmp_line = pango_layout_iter_get_line (iter); if (layout_line && layout_line->start_index > index) break; /* keep previous layout_line and line_rect */ layout_line = tmp_line; pango_layout_iter_get_line_extents (iter, NULL, &line_rect); if ((layout_line->start_index + layout_line->length) > index) break; if (!pango_layout_iter_next_line (iter)) break; /* use end of the last line */ } pango_layout_iter_free (iter); iter = NULL; g_assert (index >= layout_line->start_index); /* Examine the trailing edge of the character before the cursor */ if (index == layout_line->start_index) { dir1 = base_dir; if (base_dir == PANGO_DIRECTION_LTR) x1_trailing = 0; else x1_trailing = line_rect.width; } else { gint prev_index = g_utf8_prev_char (layout->text + index) - layout->text; dir1 = pango_layout_line_get_char_direction (layout_line, prev_index); pango_layout_line_index_to_x (layout_line, prev_index, TRUE, &x1_trailing); } /* Examine the leading edge of the character after the cursor */ if (index >= layout_line->start_index + layout_line->length) { dir2 = base_dir; if (base_dir == PANGO_DIRECTION_LTR) x2 = line_rect.width; else x2 = 0; } else { dir2 = pango_layout_line_get_char_direction (layout_line, index); pango_layout_line_index_to_x (layout_line, index, FALSE, &x2); } if (strong_pos) { strong_pos->x = line_rect.x; if (dir1 == base_dir) strong_pos->x += x1_trailing; else strong_pos->x += x2; strong_pos->y = line_rect.y; strong_pos->width = 0; strong_pos->height = line_rect.height; } if (weak_pos) { weak_pos->x = line_rect.x; if (dir1 == base_dir) weak_pos->x += x2; else weak_pos->x += x1_trailing; weak_pos->y = line_rect.y; weak_pos->width = 0; weak_pos->height = line_rect.height; } } static void get_x_offset (PangoLayout *layout, PangoLayoutLine *line, int layout_width, int line_width, int *x_offset) { /* Alignment */ if (layout->alignment == PANGO_ALIGN_RIGHT) *x_offset = layout_width - line_width; else if (layout->alignment == PANGO_ALIGN_CENTER) *x_offset = (layout_width - line_width) / 2; else *x_offset = 0; /* Indentation */ /* For center, we ignore indentation; I think I've seen word * processors that still do the indentation here as if it were * indented left/right, though we can't sensibly do that without * knowing whether left/right is the "normal" thing for this text */ if (layout->alignment == PANGO_ALIGN_CENTER) return; if (line == layout->lines->data) { /* First line */ if (layout->indent > 0) { if (layout->alignment == PANGO_ALIGN_LEFT) *x_offset += layout->indent; else *x_offset -= layout->indent; } } else { if (layout->indent < 0) { if (layout->alignment == PANGO_ALIGN_LEFT) *x_offset -= layout->indent; else *x_offset += layout->indent; } } } static void get_line_extents_layout_coords (PangoLayout *layout, PangoLayoutLine *line, int layout_width, int y_offset, int *baseline, PangoRectangle *line_ink_layout, PangoRectangle *line_logical_layout) { int x_offset; /* Line extents in line coords (origin at line baseline) */ PangoRectangle line_ink; PangoRectangle line_logical; pango_layout_line_get_extents (line, line_ink_layout ? &line_ink : NULL, &line_logical); get_x_offset (layout, line, layout_width, line_logical.width, &x_offset); /* Convert the line's extents into layout coordinates */ if (line_ink_layout) { *line_ink_layout = line_ink; line_ink_layout->x = line_ink.x + x_offset; if (line == layout->lines->data) line_ink_layout->y = line_ink.y; else line_ink_layout->y = y_offset - line_logical.y + line_ink.y; } if (line_logical_layout) { *line_logical_layout = line_logical; line_logical_layout->x = line_logical.x + x_offset; line_logical_layout->y = y_offset; } if (baseline) *baseline = y_offset - line_logical.y; } /* if non-NULL line_extents returns a list of line extents * in layout coordinates */ static void pango_layout_get_extents_internal (PangoLayout *layout, PangoRectangle *ink_rect, PangoRectangle *logical_rect, GSList **line_extents) { GSList *line_list; int y_offset = 0; int width; g_return_if_fail (layout != NULL); pango_layout_check_lines (layout); /* When we are not wrapping, we need the overall width of the layout to figure * out the x_offsets of each line. However, we only need the x_offsets if * we are computing the ink_rect or individual line extents. */ width = layout->width; if (width == -1 && layout->alignment != PANGO_ALIGN_LEFT && (ink_rect || line_extents)) { PangoRectangle overall_logical; pango_layout_get_extents (layout, NULL, &overall_logical); width = overall_logical.width; } line_list = layout->lines; while (line_list) { PangoLayoutLine *line = line_list->data; /* Line extents in layout coords (origin at 0,0 of the layout) */ PangoRectangle line_ink_layout; PangoRectangle line_logical_layout; int new_pos; /* This block gets the line extents in layout coords */ { int baseline; get_line_extents_layout_coords (layout, line, width, y_offset, &baseline, ink_rect ? &line_ink_layout : NULL, &line_logical_layout); if (line_extents) { Extents *ext = g_new (Extents, 1); ext->baseline = baseline; ext->ink_rect = line_ink_layout; ext->logical_rect = line_logical_layout; *line_extents = g_slist_prepend (*line_extents, ext); } } if (ink_rect) { /* Compute the union of the current ink_rect with * line_ink_layout */ if (line_list == layout->lines) { *ink_rect = line_ink_layout; } else { new_pos = MIN (ink_rect->x, line_ink_layout.x); ink_rect->width = MAX (ink_rect->x + ink_rect->width, line_ink_layout.x + line_ink_layout.width) - new_pos; ink_rect->x = new_pos; new_pos = MIN (ink_rect->y, line_ink_layout.y); ink_rect->height = MAX (ink_rect->y + ink_rect->height, line_ink_layout.y + line_ink_layout.height) - new_pos; ink_rect->y = new_pos; } } if (logical_rect) { /* Compute union of line_logical_layout with * current logical_rect */ if (line_list == layout->lines) { *logical_rect = line_logical_layout; } else { new_pos = MIN (logical_rect->x, line_logical_layout.x); logical_rect->width = MAX (logical_rect->x + logical_rect->width, line_logical_layout.x + line_logical_layout.width) - new_pos; logical_rect->x = new_pos; logical_rect->height += line_logical_layout.height; } /* No space after the last line, of course. */ if (line_list->next != NULL) logical_rect->height += layout->spacing; } y_offset += line_logical_layout.height + layout->spacing; line_list = line_list->next; } if (line_extents) *line_extents = g_slist_reverse (*line_extents); } /** * pango_layout_get_extents: * @layout: a #PangoLayout * @ink_rect: rectangle used to store the extents of the glyph string as drawn * or %NULL to indicate that the result is not needed. * @logical_rect: rectangle used to store the logical extents of the glyph string * or %NULL to indicate that the result is not needed. * * Compute the logical and ink extents of a layout. See the documentation * for pango_font_get_glyph_extents() for details about the interpretation * of the rectangles. */ void pango_layout_get_extents (PangoLayout *layout, PangoRectangle *ink_rect, PangoRectangle *logical_rect) { g_return_if_fail (layout != NULL); pango_layout_get_extents_internal (layout, ink_rect, logical_rect, NULL); } /** * pango_layout_get_pixel_extents: * @layout: a #PangoLayout * @ink_rect: rectangle used to store the extents of the glyph string as drawn * or %NULL to indicate that the result is not needed. * @logical_rect: rectangle used to store the logical extents of the glyph string * or %NULL to indicate that the result is not needed. * * Compute the logical and ink extents of a layout. See the documentation * for pango_font_get_glyph_extents() for details about the interpretation * of the rectangles. The returned rectangles are in device units, as * opposed to pango_layout_get_extents(), which returns the extents in * units of device unit / PANGO_SCALE. **/ void pango_layout_get_pixel_extents (PangoLayout *layout, PangoRectangle *ink_rect, PangoRectangle *logical_rect) { g_return_if_fail (PANGO_IS_LAYOUT (layout)); pango_layout_get_extents (layout, ink_rect, logical_rect); if (ink_rect) { ink_rect->width = (ink_rect->width + PANGO_SCALE / 2) / PANGO_SCALE; ink_rect->height = (ink_rect->height + PANGO_SCALE / 2) / PANGO_SCALE; ink_rect->x = PANGO_PIXELS (ink_rect->x); ink_rect->y = PANGO_PIXELS (ink_rect->y); } if (logical_rect) { logical_rect->width = (logical_rect->width + PANGO_SCALE / 2) / PANGO_SCALE; logical_rect->height = (logical_rect->height + PANGO_SCALE / 2) / PANGO_SCALE; logical_rect->x = PANGO_PIXELS (logical_rect->x); logical_rect->y = PANGO_PIXELS (logical_rect->y); } } /** * pango_layout_get_size: * @layout: a #PangoLayout * @width: location to store the logical width, or %NULL * @height: location to store the logical height, or %NULL * * Determine the logical width and height of a #PangoLayout * in Pango units. (device units divided by PANGO_SCALE). This * is simply a convenience function around pango_layout_get_extents. **/ void pango_layout_get_size (PangoLayout *layout, int *width, int *height) { PangoRectangle logical_rect; pango_layout_get_extents (layout, NULL, &logical_rect); if (width) *width = logical_rect.width; if (height) *height = logical_rect.height; } /** * pango_layout_get_pixel_size: * @layout: a #PangoLayout * @width: location to store the logical width, or %NULL * @height: location to store the logical height, or %NULL * * Determine the logical width and height of a #PangoLayout * in device units. (pango_layout_get_size() returns the width * and height in thousandths of a device unit.) This * is simply a convenience function around pango_layout_get_extents. **/ void pango_layout_get_pixel_size (PangoLayout *layout, int *width, int *height) { PangoRectangle logical_rect; pango_layout_get_extents (layout, NULL, &logical_rect); if (width) *width = (logical_rect.width + PANGO_SCALE / 2) / PANGO_SCALE; if (height) *height = (logical_rect.height + PANGO_SCALE / 2) / PANGO_SCALE; } static void pango_layout_clear_lines (PangoLayout *layout) { if (layout->lines) { GSList *tmp_list = layout->lines; while (tmp_list) { PangoLayoutLine *line = tmp_list->data; tmp_list = tmp_list->next; line->layout = NULL; pango_layout_line_unref (line); } g_slist_free (layout->lines); layout->lines = NULL; /* This could be handled separately, since we don't need to * recompute log_attrs on a width change, but this is easiest */ g_free (layout->log_attrs); layout->log_attrs = NULL; } } /************************************************ * Some functions for handling PANGO_ATTR_SHAPE * ************************************************/ static void imposed_shape (gint n_chars, PangoRectangle *shape_ink, PangoRectangle *shape_logical, PangoGlyphString *glyphs) { int i; pango_glyph_string_set_size (glyphs, n_chars); for (i=0; i < n_chars; i++) { glyphs->glyphs[i].glyph = 0; glyphs->glyphs[i].geometry.x_offset = 0; glyphs->glyphs[i].geometry.y_offset = 0; glyphs->glyphs[i].geometry.width = shape_logical->width; glyphs->glyphs[i].attr.is_cluster_start = 1; glyphs->log_clusters[i] = i; } } static void imposed_extents (gint n_chars, PangoRectangle *shape_ink, PangoRectangle *shape_logical, PangoRectangle *ink_rect, PangoRectangle *logical_rect) { if (n_chars > 0) { if (ink_rect) { ink_rect->x = MIN (shape_ink->x, shape_ink->x + shape_logical->width * (n_chars - 1)); ink_rect->width = MAX (shape_ink->width, shape_ink->width + shape_logical->width * (n_chars - 1)); ink_rect->y = shape_ink->y; ink_rect->height = shape_ink->height; } if (logical_rect) { logical_rect->x = MIN (shape_logical->x, shape_logical->x + shape_logical->width * (n_chars - 1)); logical_rect->width = MAX (shape_logical->width, shape_logical->width + shape_logical->width * (n_chars - 1)); logical_rect->y = shape_logical->y; logical_rect->height = shape_logical->height; } } else { if (ink_rect) { ink_rect->x = 0; ink_rect->y = 0; ink_rect->width = 0; ink_rect->height = 0; } if (logical_rect) { logical_rect->x = 0; logical_rect->y = 0; logical_rect->width = 0; logical_rect->height = 0; } } } /***************** * Line Breaking * *****************/ static void insert_run (PangoLayoutLine *line, PangoItem *item, PangoGlyphString *glyphs) { PangoLayoutRun *run = g_new (PangoLayoutRun, 1); run->item = item; run->glyphs = glyphs; line->runs = g_slist_prepend (line->runs, run); line->length += item->length; } static void free_run (PangoLayoutRun *run, gboolean free_item) { if (free_item) pango_item_free (run->item); pango_glyph_string_free (run->glyphs); g_free (run); } PangoItem * uninsert_run (PangoLayoutLine *line) { PangoLayoutRun *run; PangoItem *item; GSList *tmp_node = line->runs; run = tmp_node->data; item = run->item; line->runs = tmp_node->next; line->length -= item->length; g_slist_free_1 (tmp_node); free_run (run, FALSE); return item; } static void ensure_tab_width (PangoLayout *layout) { if (layout->tab_width == -1) { /* Find out how wide 8 spaces are in the context's default * font. Utter performance killer. :-( */ PangoGlyphString *glyphs = pango_glyph_string_new (); PangoItem *item; GList *items; int i; PangoAttrList *attrs = pango_attr_list_new (); if (layout->font_desc) { PangoAttribute *attr = pango_attr_font_desc_new (layout->font_desc); attr->start_index = 0; attr->end_index = layout->length; pango_attr_list_insert_before (attrs, attr); } items = pango_itemize (layout->context, " ", 0, 1, attrs, NULL); pango_attr_list_unref (attrs); item = items->data; pango_shape (" ", 8, &item->analysis, glyphs); pango_item_free (item); g_list_free (items); layout->tab_width = 0; for (i=0; i < glyphs->num_glyphs; i++) layout->tab_width += glyphs->glyphs[i].geometry.width; pango_glyph_string_free (glyphs); /* We need to make sure the tab_width is > 0 so finding tab positions * terminates. This check should be necessary only under extreme * problems with the font. */ if (layout->tab_width <= 0) layout->tab_width = 50 * PANGO_SCALE; /* pretty much arbitrary */ } } /* For now we only need the tab position, we assume * all tabs are left-aligned. */ static int get_tab_pos (PangoLayout *layout, int index) { gint n_tabs; gboolean in_pixels; if (layout->tabs) { n_tabs = pango_tab_array_get_size (layout->tabs); in_pixels = pango_tab_array_get_positions_in_pixels (layout->tabs); } else { n_tabs = 0; in_pixels = FALSE; } if (index < n_tabs) { gint pos = 0; pango_tab_array_get_tab (layout->tabs, index, NULL, &pos); if (in_pixels) return pos * PANGO_SCALE; else return pos; } if (n_tabs > 0) { /* Extrapolate tab position, repeating the last tab gap to * infinity. */ int last_pos = 0; int next_to_last_pos = 0; int tab_width; pango_tab_array_get_tab (layout->tabs, n_tabs - 1, NULL, &last_pos); if (n_tabs > 1) pango_tab_array_get_tab (layout->tabs, n_tabs - 2, NULL, &next_to_last_pos); else next_to_last_pos = 0; if (in_pixels) { next_to_last_pos *= PANGO_SCALE; last_pos *= PANGO_SCALE; } if (last_pos > next_to_last_pos) { tab_width = last_pos - next_to_last_pos; } else { ensure_tab_width (layout); tab_width = layout->tab_width; } return last_pos + tab_width * (index - n_tabs + 1); } else { /* No tab array set, so use default tab width */ ensure_tab_width (layout); return layout->tab_width * index; } } static void shape_tab (PangoLayoutLine *line, PangoGlyphString *glyphs) { int i; GSList *tmp_list; int current_width = 0; /* Compute the width of the line currently - inefficient, but easier * than keeping the current width of the line up to date everywhere */ tmp_list = line->runs; while (tmp_list) { PangoLayoutRun *run = tmp_list->data; for (i=0; i < run->glyphs->num_glyphs; i++) current_width += run->glyphs->glyphs[i].geometry.width; tmp_list = tmp_list->next; } pango_glyph_string_set_size (glyphs, 1); glyphs->glyphs[0].glyph = 0; glyphs->glyphs[0].geometry.x_offset = 0; glyphs->glyphs[0].geometry.y_offset = 0; glyphs->glyphs[0].attr.is_cluster_start = 1; glyphs->log_clusters[0] = 0; for (i=0;;i++) { int tab_pos = get_tab_pos (line->layout, i); if (tab_pos > current_width) { glyphs->glyphs[0].geometry.width = tab_pos - current_width; break; } } } static inline gboolean can_break_at (PangoLayout *layout, gint offset) { /* We probably should have a mode where we treat all white-space as * of fungible width - appropriate for typography but not for * editing. */ if (offset == layout->n_chars) return TRUE; else if (layout->wrap == PANGO_WRAP_WORD) return layout->log_attrs[offset].is_line_break; else if (layout->wrap == PANGO_WRAP_CHAR) return layout->log_attrs[offset].is_char_break; else { g_warning (G_STRLOC": broken PangoLayout"); return TRUE; } } static inline gboolean can_break_in (PangoLayout *layout, int start_offset, int num_chars) { int i; for (i = 1; i < num_chars; i++) if (can_break_at (layout, start_offset + i)) return TRUE; return FALSE; } typedef enum { BREAK_NONE_FIT, BREAK_SOME_FIT, BREAK_ALL_FIT } BreakResult; static BreakResult process_item (PangoLayout *layout, PangoLayoutLine *line, PangoItem *item, const char *text, int start_offset, gboolean no_break_at_start, gboolean no_break_at_end, int *remaining_width) { PangoGlyphString *glyphs = pango_glyph_string_new (); PangoRectangle shape_ink; PangoRectangle shape_logical; gboolean shape_set; int width; int length; int i; pango_layout_get_item_properties (item, NULL, NULL, &shape_ink, &shape_logical, &shape_set); if (shape_set) imposed_shape (item->num_chars, &shape_ink, &shape_logical, glyphs); else if (text[item->offset] == '\t') shape_tab (line, glyphs); else pango_shape (text + item->offset, item->length, &item->analysis, glyphs); if (*remaining_width < 0) /* Wrapping off */ { insert_run (line, item, glyphs); return BREAK_ALL_FIT; } width =0; for (i=0; i < glyphs->num_glyphs; i++) width += glyphs->glyphs[i].geometry.width; if (width <= *remaining_width && !no_break_at_end) { *remaining_width -= width; insert_run (line, item, glyphs); return BREAK_ALL_FIT; } else { int num_chars = item->num_chars; int break_num_chars = num_chars; int break_width = width; PangoGlyphUnit *log_widths = g_new (PangoGlyphUnit, item->num_chars); pango_glyph_string_get_logical_widths (glyphs, text + item->offset, item->length, item->analysis.level, log_widths); /* Shorten the item by one line break */ while (--num_chars > 0) { width -= log_widths[num_chars]; if (can_break_at (layout, start_offset + num_chars)) { break_num_chars = num_chars; break_width = width; if (width <= *remaining_width) break; } } g_free (log_widths); if (no_break_at_start || break_width <= *remaining_width) /* Succesfully broke the item */ { *remaining_width -= break_width; if (break_num_chars == item->num_chars) { insert_run (line, item, glyphs); return BREAK_ALL_FIT; } else { PangoItem *new_item; length = g_utf8_offset_to_pointer (text + item->offset, break_num_chars) - (text + item->offset); new_item = pango_item_split (item, length, break_num_chars); if (shape_set) imposed_shape (item->num_chars, &shape_ink, &shape_logical, glyphs); else pango_shape (text + new_item->offset, new_item->length, &new_item->analysis, glyphs); insert_run (line, new_item, glyphs); return BREAK_SOME_FIT; } } else { pango_glyph_string_free (glyphs); return BREAK_NONE_FIT; } } } typedef struct _ParaBreakState ParaBreakState; struct _ParaBreakState { GList *items; gboolean first_line; const char *text; gint start_offset; gint line_start_index; }; static void process_line (PangoLayout *layout, ParaBreakState *state) { PangoLayoutLine *line; gint remaining_width; gboolean have_break = FALSE; /* If we've seen a possible break yet */ gboolean break_at_start = FALSE; /* If that break is at the start of a run */ int break_remaining_width = 0; /* Remaining width before adding run with break */ int break_start_offset = 0; /* Start width before adding run with break */ GSList *break_link = NULL; /* Link holding run before break */ line = pango_layout_line_new (layout); line->start_index = state->line_start_index; if (state->first_line) remaining_width = (layout->indent >= 0) ? layout->width - layout->indent : layout->width; else remaining_width = (layout->indent >= 0) ? layout->width : layout->width + layout->indent; while (state->items) { PangoItem *item = state->items->data; BreakResult result; int old_num_chars; int old_remaining_width; if (line->runs && can_break_at (layout, state->start_offset)) { if (remaining_width == 0) goto done; have_break = TRUE; break_at_start = TRUE; break_remaining_width = remaining_width; break_start_offset = state->start_offset; break_link = line->runs; } old_num_chars = item->num_chars; old_remaining_width = remaining_width; result = process_item (layout, line, item, layout->text, state->start_offset, !have_break, FALSE, &remaining_width); switch (result) { case BREAK_ALL_FIT: if (can_break_in (layout, state->start_offset, old_num_chars)) { have_break = TRUE; break_at_start = FALSE; break_remaining_width = old_remaining_width; break_start_offset = state->start_offset; break_link = line->runs->next; } state->items = g_list_delete_link (state->items, state->items); state->start_offset += old_num_chars; break; case BREAK_SOME_FIT: state->start_offset += old_num_chars - item->num_chars; goto done; case BREAK_NONE_FIT: /* Back up over unused runs to run where there is a break */ while (line->runs && line->runs != break_link) state->items = g_list_prepend (state->items, uninsert_run (line)); state->start_offset = break_start_offset; if (!break_at_start) { /* Reshape run to break */ PangoItem *item = state->items->data; old_num_chars = item->num_chars; result = process_item (layout, line, item, layout->text, state->start_offset, TRUE, TRUE, &break_remaining_width); g_assert (result == BREAK_SOME_FIT); state->start_offset += old_num_chars - item->num_chars; } goto done; } } done: pango_layout_line_postprocess (line); layout->lines = g_slist_prepend (layout->lines, line); state->first_line = FALSE; state->line_start_index += line->length; } static void get_items_log_attrs (const char *text, GList *items, PangoLogAttr *log_attrs, int para_delimiter_len) { int offset = 0; int index = 0; while (items) { PangoItem tmp_item = *(PangoItem *)items->data; /* Accumulate all the consecutive items that match in language * characteristics, ignoring font, style tags, etc. */ while (items->next) { PangoItem *next_item = items->next->data; /* FIXME: Handle language tags */ if (next_item->analysis.lang_engine != tmp_item.analysis.lang_engine && (!next_item->analysis.lang_engine || !tmp_item.analysis.lang_engine || strcmp (next_item->analysis.lang_engine->engine.id, tmp_item.analysis.lang_engine->engine.id) != 0)) break; else { tmp_item.length += next_item->length; tmp_item.num_chars += next_item->num_chars; } items = items->next; } /* Break the paragraph delimiters with the last item */ if (items->next == NULL) tmp_item.length += para_delimiter_len; pango_break (text + index, tmp_item.length, &tmp_item.analysis, log_attrs + offset); offset += tmp_item.num_chars; index += tmp_item.length; items = items->next; } } static void pango_layout_check_lines (PangoLayout *layout) { const char *start; gboolean done = FALSE; int start_offset; PangoAttrList *attrs; PangoAttrIterator *iter; if (layout->lines) return; g_assert (!layout->log_attrs); /* For simplicity, we make sure at this point that layout->text * is non-NULL even if it is zero length */ if (!layout->text) pango_layout_set_text (layout, NULL, 0); if (layout->attrs) { /* If we were being clever, we'd try to catch the case here * where the set font desc doesn't change the font for any * characters. */ if (layout->font_desc) attrs = pango_attr_list_copy (layout->attrs); else attrs = layout->attrs; } else attrs = pango_attr_list_new (); if (layout->font_desc) { PangoAttribute *attr = pango_attr_font_desc_new (layout->font_desc); attr->start_index = 0; attr->end_index = layout->length; pango_attr_list_insert_before (attrs, attr); } iter = pango_attr_list_get_iterator (attrs); layout->log_attrs = g_new (PangoLogAttr, layout->n_chars); start_offset = 0; start = layout->text; do { int delim_len; const char *end; int delimiter_index, next_para_index; ParaBreakState state; pango_find_paragraph_boundary (start, (layout->text + layout->length) - start, &delimiter_index, &next_para_index); g_assert (next_para_index >= delimiter_index); end = start + delimiter_index; delim_len = next_para_index - delimiter_index; if ((end + delim_len) == (layout->text + layout->length)) done = TRUE; g_assert (end <= (layout->text + layout->length)); g_assert (start <= (layout->text + layout->length)); g_assert (delim_len < 3); g_assert (delim_len >= 0); state.items = pango_itemize (layout->context, layout->text, start - layout->text, end - start, attrs, iter); get_items_log_attrs (start, state.items, layout->log_attrs + start_offset, delim_len); if (state.items) { state.first_line = TRUE; state.start_offset = start_offset; state.text = start; state.line_start_index = state.text - layout->text; while (state.items) process_line (layout, &state); } else { PangoLayoutLine *empty_line; empty_line = pango_layout_line_new (layout); empty_line->start_index = start - layout->text; layout->lines = g_slist_prepend (layout->lines, empty_line); } if (!done) start_offset += g_utf8_strlen (start, (end - start) + delim_len); start = end + delim_len; } while (!done); pango_attr_iterator_destroy (iter); if (attrs != layout->attrs) pango_attr_list_unref (attrs); layout->lines = g_slist_reverse (layout->lines); } /** * pango_layout_line_ref: * @line: a #PangoLayoutLine * * Increase the reference count of a #PangoLayoutLine by one. **/ void pango_layout_line_ref (PangoLayoutLine *line) { PangoLayoutLinePrivate *private = (PangoLayoutLinePrivate *)line; g_return_if_fail (line != NULL); private->ref_count++; } /** * pango_layout_line_unref: * @line: a #PangoLayoutLine * * Decrease the reference count of a #PangoLayoutLine by one. * if the result is zero, the line and all associated memory * will be freed. **/ void pango_layout_line_unref (PangoLayoutLine *line) { PangoLayoutLinePrivate *private = (PangoLayoutLinePrivate *)line; g_return_if_fail (line != NULL); g_return_if_fail (private->ref_count > 0); private->ref_count--; if (private->ref_count == 0) { GSList *tmp_list = line->runs; while (tmp_list) { free_run (tmp_list->data, TRUE); tmp_list = tmp_list->next; } g_slist_free (line->runs); g_free (line); } } /** * pango_layout_line_x_to_index: * @line: a #PangoLayoutLine * @x_pos: the x offset (in thousands of a device unit) * from the left edge of the line. * @index: location to store calculated byte offset. * @trailing: location to store a integer indicating where * in the cluster the user clicked. If the script * allows positioning within the cluster, it is either * 0 or 1; otherwise it is either 0 or the number * of characters in the cluster. In either case * 0 represents the trailing edge of the cluster. * * Convert from x offset to the byte index of the corresponding * character within the text of the layout. If @x_pos is outside the line, * the start or end of the line will be stored at @index. * * Returns: %FALSE if @x_pos was outside the line, %TRUE if inside **/ gboolean pango_layout_line_x_to_index (PangoLayoutLine *line, int x_pos, int *index, int *trailing) { GSList *tmp_list; gint start_pos = 0; gint first_index = 0; /* line->start_index */ gint last_index; /* last char in line */ gint end_index; /* end iterator for line (one char past last_index) */ PangoDirection base_dir; gboolean last_trailing; g_return_val_if_fail (line != NULL, FALSE); g_return_val_if_fail (LINE_IS_VALID (line), FALSE); if (!LINE_IS_VALID (line)) return FALSE; base_dir = pango_context_get_base_dir (line->layout->context); /* Find the last index in the line */ first_index = line->start_index; if (line->length == 0) { if (index) *index = first_index; if (trailing) *trailing = 0; return FALSE; } g_assert (line->length > 0); end_index = first_index + line->length; last_index = g_utf8_prev_char (line->layout->text + end_index) - line->layout->text; /* This is a HACK. If a program only keeps track if cursor (etc) * indices and not the trailing flag, then the trailing index of the * last character on a wrapped line is identical to the leading * index of the next line. Actually, any program keeping cursor * positions with wrapped lines should distinguish leading and * trailing cursors. */ tmp_list = line->layout->lines; while (tmp_list->data != line) tmp_list = tmp_list->next; last_trailing = tmp_list->next ? 0 : 1; if (x_pos < 0) { /* pick the leftmost char */ if (index) *index = (base_dir == PANGO_DIRECTION_LTR) ? first_index : last_index; /* and its leftmost edge */ if (trailing) *trailing = (base_dir == PANGO_DIRECTION_LTR) ? 0 : last_trailing; return FALSE; } tmp_list = line->runs; while (tmp_list) { PangoRectangle logical_rect; PangoLayoutRun *run = tmp_list->data; gboolean shape_set; pango_layout_get_item_properties (run->item, NULL, NULL, NULL, &logical_rect, &shape_set); if (!shape_set) pango_glyph_string_extents (run->glyphs, run->item->analysis.font, NULL, &logical_rect); if (x_pos >= start_pos && x_pos < start_pos + logical_rect.width) { int pos; if (index) *index = run->item->offset; if (shape_set) { *trailing = 0; } else { pango_glyph_string_x_to_index (run->glyphs, line->layout->text + run->item->offset, run->item->length, &run->item->analysis, x_pos - start_pos, &pos, trailing); if (index) *index += pos; } return TRUE; } start_pos += logical_rect.width; tmp_list = tmp_list->next; } /* pick the rightmost char */ if (index) *index = (base_dir == PANGO_DIRECTION_LTR) ? last_index : first_index; /* and its rightmost edge */ if (trailing) *trailing = (base_dir == PANGO_DIRECTION_LTR) ? last_trailing : 0; return FALSE; } /** * pango_layout_line_get_x_ranges: * @line: a #PangoLayoutLine * @start_index: Start byte index of the logical range. If this value * is less than the start index for the line, then * the first range will extend all the way to the leading * edge of the layout. Otherwise it will start at the * leading edge of the first character. * @end_index: Ending byte index of the logical range. If this value * is greater than the end index for the line, then * the last range will extend all the way to the trailing * edge of the layout. Otherwise, it will end at the * trailing edge of the last character. * @ranges: location to store a pointer to an array of arranges. * The array will be of length 2*@n_ranges, with each * range including the pixels from (*ranges)[2*n] to * (*ranges)[2*n + 1] - 1. This array must be freed * with g_free. The pixels are in layout coordinates. * @n_ranges: The number of ranges stored in @ranges. * * Get a list of visual ranges corresponding to a given logical range. * This list is not necessarily minimal - there may be consecutive * ranges which are adjacent. The ranges will be sorted from left to * right. The ranges are with respect to the left edge of the entire * layout, not with respect to the line. **/ void pango_layout_line_get_x_ranges (PangoLayoutLine *line, int start_index, int end_index, int **ranges, int *n_ranges) { PangoDirection base_dir; PangoRectangle logical_rect; gint line_start_index = 0; GSList *tmp_list; int range_count = 0; int accumulated_width = 0; int x_offset; int width; g_return_if_fail (line != NULL); g_return_if_fail (line->layout != NULL); g_return_if_fail (start_index <= end_index); base_dir = pango_context_get_base_dir (line->layout->context); width = line->layout->width; if (width == -1 && line->layout->alignment != PANGO_ALIGN_LEFT) { pango_layout_get_extents (line->layout, NULL, &logical_rect); width = logical_rect.width; } /* FIXME: The computations here could be optimized, by moving the * computations of the x_offset after we go through and figure * out where each range is. */ pango_layout_line_get_extents (line, NULL, &logical_rect); /* FIXME it seems to me that width can be -1 here? */ get_x_offset (line->layout, line, width, logical_rect.width, &x_offset); line_start_index = line->start_index; /* Allocate the maximum possible size */ if (ranges) *ranges = g_new (int, 2 * (2 + g_slist_length (line->runs))); if (x_offset > 0 && ((base_dir == PANGO_DIRECTION_LTR && start_index < line_start_index) || (base_dir == PANGO_DIRECTION_RTL && end_index > line_start_index + line->length))) { if (ranges) { (*ranges)[2*range_count] = 0; (*ranges)[2*range_count + 1] = x_offset; } range_count ++; } tmp_list = line->runs; while (tmp_list) { PangoLayoutRun *run = (PangoLayoutRun *)tmp_list->data; if ((start_index < run->item->offset + run->item->length && end_index > run->item->offset)) { if (ranges) { int run_start_index = MAX (start_index, run->item->offset); int run_end_index = MIN (end_index, run->item->offset + run->item->length); int run_start_x, run_end_x; g_assert (run_end_index > 0); /* Back the end_index off one since we want to find the trailing edge of the preceding character */ run_end_index = g_utf8_prev_char (line->layout->text + run_end_index) - line->layout->text; pango_glyph_string_index_to_x (run->glyphs, line->layout->text + run->item->offset, run->item->length, &run->item->analysis, run_start_index - run->item->offset, FALSE, &run_start_x); pango_glyph_string_index_to_x (run->glyphs, line->layout->text + run->item->offset, run->item->length, &run->item->analysis, run_end_index - run->item->offset, TRUE, &run_end_x); (*ranges)[2*range_count] = x_offset + accumulated_width + MIN (run_start_x, run_end_x); (*ranges)[2*range_count + 1] = x_offset + accumulated_width + MAX (run_start_x, run_end_x); } range_count++; } if (tmp_list->next) { PangoRectangle run_logical; pango_glyph_string_extents (run->glyphs, run->item->analysis.font, NULL, &run_logical); accumulated_width += run_logical.width; } tmp_list = tmp_list->next; } if (x_offset + logical_rect.width < line->layout->width && ((base_dir == PANGO_DIRECTION_LTR && end_index > line_start_index + line->length) || (base_dir == PANGO_DIRECTION_RTL && start_index < line_start_index))) { if (ranges) { (*ranges)[2*range_count] = x_offset + logical_rect.width; (*ranges)[2*range_count + 1] = line->layout->width; } range_count ++; } if (n_ranges) *n_ranges = range_count; } static void pango_layout_line_get_empty_extents (PangoLayoutLine *line, PangoRectangle *ink_rect, PangoRectangle *logical_rect) { if (ink_rect) { ink_rect->x = 0; ink_rect->y = 0; ink_rect->width = 0; ink_rect->height = 0; } if (logical_rect) { char *line_start; int index; PangoLayout *layout = line->layout; PangoFontDescription font_desc; PangoFont *font; PangoFontMetrics metrics; pango_layout_line_get_range (line, &line_start, NULL); index = line_start - layout->text; /* Find the font description for this line */ if (layout->attrs) { PangoAttrIterator *iter = pango_attr_list_get_iterator (layout->attrs); int start, end; while (TRUE) { pango_attr_iterator_range (iter, &start, &end); if (start <= index && index < end) { PangoFontDescription *base_font_desc; if (layout->font_desc) base_font_desc = layout->font_desc; else base_font_desc = pango_context_get_font_description (layout->context); pango_attr_iterator_get_font (iter, base_font_desc, &font_desc, NULL); break; } pango_attr_iterator_next (iter); } pango_attr_iterator_destroy (iter); } else { if (layout->font_desc) font_desc = *layout->font_desc; else font_desc = *pango_context_get_font_description (layout->context); } font = pango_context_load_font (layout->context, &font_desc); if (font) { char *lang = pango_context_get_lang (layout->context); pango_font_get_metrics (font, lang, &metrics); g_free (lang); logical_rect->y = - metrics.ascent; logical_rect->height = metrics.ascent + metrics.descent; g_object_unref (G_OBJECT (font)); } else { logical_rect->y = 0; logical_rect->height = 0; } logical_rect->x = 0; logical_rect->width = 0; } } static void pango_layout_run_get_extents (PangoLayoutRun *run, gboolean *shape_setp, PangoRectangle *run_ink, PangoRectangle *run_logical) { PangoUnderline uline = PANGO_UNDERLINE_NONE; int rise = 0; PangoRectangle shape_ink; PangoRectangle shape_logical; PangoRectangle tmp_ink; gboolean shape_set; gboolean need_ink; pango_layout_get_item_properties (run->item, &uline, &rise, &shape_ink, &shape_logical, &shape_set); if (shape_setp) *shape_setp = shape_set; need_ink = run_ink || uline == PANGO_UNDERLINE_LOW; if (shape_set) imposed_extents (run->item->num_chars, &shape_ink, &shape_logical, need_ink ? &tmp_ink : NULL, run_logical); else pango_glyph_string_extents (run->glyphs, run->item->analysis.font, need_ink ? &tmp_ink : NULL, run_logical); if (run_ink) *run_ink = tmp_ink; switch (uline) { case PANGO_UNDERLINE_NONE: break; case PANGO_UNDERLINE_SINGLE: if (run_ink) run_ink->height = MAX (run_ink->height, 2 * PANGO_SCALE - run_ink->y); run_logical->height = MAX (run_logical->height, 2 * PANGO_SCALE - run_logical->y); break; case PANGO_UNDERLINE_DOUBLE: if (run_ink) run_ink->height = MAX (run_ink->height, 4 * PANGO_SCALE - run_ink->y); run_logical->height = MAX (run_logical->height, 4 * PANGO_SCALE - run_logical->y); break; case PANGO_UNDERLINE_LOW: /* FIXME: Should this simply be run_logical->height += 2 * PANGO_SCALE instead? */ if (run_ink) run_ink->height += 2 * PANGO_SCALE; run_logical->height = MAX (run_logical->height, tmp_ink.y + tmp_ink.height + 2 * PANGO_SCALE - run_logical->y); break; } if (rise != 0) { if (run_ink) run_ink->y -= rise; run_logical->y -= rise; } } /** * pango_layout_line_get_extents: * @line: a #PangoLayoutLine * @ink_rect: rectangle used to store the extents of the glyph string as drawn * or %NULL to indicate that the result is not needed. * @logical_rect: rectangle used to store the logical extents of the glyph string * or %NULL to indicate that the result is not needed. * * Compute the logical and ink extents of a layout line. See the documentation * for pango_font_get_glyph_extents() for details about the interpretation * of the rectangles. */ void pango_layout_line_get_extents (PangoLayoutLine *line, PangoRectangle *ink_rect, PangoRectangle *logical_rect) { GSList *tmp_list; int x_pos = 0; g_return_if_fail (LINE_IS_VALID (line)); if (!LINE_IS_VALID (line)) return; if (!line->runs) { pango_layout_line_get_empty_extents (line, ink_rect, logical_rect); return; } if (ink_rect) { ink_rect->x = 0; ink_rect->y = 0; ink_rect->width = 0; ink_rect->height = 0; } if (logical_rect) { logical_rect->x = 0; logical_rect->y = 0; logical_rect->width = 0; logical_rect->height = 0; } tmp_list = line->runs; while (tmp_list) { PangoLayoutRun *run = tmp_list->data; int new_pos; PangoRectangle run_ink; PangoRectangle run_logical; pango_layout_run_get_extents (run, NULL, ink_rect ? &run_ink : NULL, &run_logical); if (ink_rect) { new_pos = MIN (ink_rect->x, x_pos + run_ink.x); ink_rect->width = MAX (ink_rect->x + ink_rect->width, x_pos + run_ink.x + run_ink.width) - new_pos; ink_rect->x = new_pos; new_pos = MIN (ink_rect->y, run_ink.y); ink_rect->height = MAX (ink_rect->y + ink_rect->height, run_ink.y + run_ink.height) - new_pos; ink_rect->y = new_pos; } if (logical_rect) { new_pos = MIN (logical_rect->x, x_pos + run_logical.x); logical_rect->width = MAX (logical_rect->x + logical_rect->width, x_pos + run_logical.x + run_logical.width) - new_pos; logical_rect->x = new_pos; new_pos = MIN (logical_rect->y, run_logical.y); logical_rect->height = MAX (logical_rect->y + logical_rect->height, run_logical.y + run_logical.height) - new_pos; logical_rect->y = new_pos; } x_pos += run_logical.width; tmp_list = tmp_list->next; } } static PangoLayoutLine * pango_layout_line_new (PangoLayout *layout) { PangoLayoutLinePrivate *private = g_new (PangoLayoutLinePrivate, 1); private->ref_count = 1; private->line.layout = layout; private->line.runs = 0; private->line.length = 0; /* Note that we leave start_index uninitialized */ return (PangoLayoutLine *) private; } /** * pango_layout_line_get_pixel_extents: * @layout_line: a #PangoLayoutLine * @ink_rect: rectangle used to store the extents of the glyph string as drawn * or %NULL to indicate that the result is not needed. * @logical_rect: rectangle used to store the logical extents of the glyph string * or %NULL to indicate that the result is not needed. * * Compute the logical and ink extents of a layout line. See the documentation * for pango_font_get_glyph_extents() for details about the interpretation * of the rectangles. The returned rectangles are in device units, as * opposed to pango_layout_line_get_extents(), which returns the extents in * units of device unit / PANGO_SCALE. **/ void pango_layout_line_get_pixel_extents (PangoLayoutLine *layout_line, PangoRectangle *ink_rect, PangoRectangle *logical_rect) { g_return_if_fail (LINE_IS_VALID (layout_line)); pango_layout_line_get_extents (layout_line, ink_rect, logical_rect); if (ink_rect) { ink_rect->width = (ink_rect->width + PANGO_SCALE / 2) / PANGO_SCALE; ink_rect->height = (ink_rect->height + PANGO_SCALE / 2) / PANGO_SCALE; ink_rect->x = PANGO_PIXELS (ink_rect->x); ink_rect->y = PANGO_PIXELS (ink_rect->y); } if (logical_rect) { logical_rect->width = (logical_rect->width + PANGO_SCALE / 2) / PANGO_SCALE; logical_rect->height = (logical_rect->height + PANGO_SCALE / 2) / PANGO_SCALE; logical_rect->x = PANGO_PIXELS (logical_rect->x); logical_rect->y = PANGO_PIXELS (logical_rect->y); } } /* * NB: This implement the exact same algorithm as * reorder-items.c:pango_reorder_items(). */ static GSList * reorder_runs_recurse (GSList *items, int n_items) { GSList *tmp_list, *level_start_node; int i, level_start_i; int min_level = G_MAXINT; GSList *result = NULL; if (n_items == 0) return NULL; tmp_list = items; for (i=0; idata; min_level = MIN (min_level, run->item->analysis.level); tmp_list = tmp_list->next; } level_start_i = 0; level_start_node = items; tmp_list = items; for (i=0; idata; if (run->item->analysis.level == min_level) { if (min_level % 2) { if (i > level_start_i) result = g_slist_concat (reorder_runs_recurse (level_start_node, i - level_start_i), result); result = g_slist_prepend (result, run); } else { if (i > level_start_i) result = g_slist_concat (result, reorder_runs_recurse (level_start_node, i - level_start_i)); result = g_slist_append (result, run); } level_start_i = i + 1; level_start_node = tmp_list->next; } tmp_list = tmp_list->next; } if (min_level % 2) { if (i > level_start_i) result = g_slist_concat (reorder_runs_recurse (level_start_node, i - level_start_i), result); } else { if (i > level_start_i) result = g_slist_concat (result, reorder_runs_recurse (level_start_node, i - level_start_i)); } return result; } static void pango_layout_line_reorder (PangoLayoutLine *line) { GSList *logical_runs = line->runs; line->runs = reorder_runs_recurse (logical_runs, g_slist_length (logical_runs)); g_slist_free (logical_runs); } static void pango_layout_line_postprocess (PangoLayoutLine *line) { /* NB: the runs are in reverse order at this point, since we prepended them to the list */ /* Reverse the runs */ line->runs = g_slist_reverse (line->runs); /* Now convert logical to visual order */ pango_layout_line_reorder (line); } /* This utility function is duplicated here and in pangox.c; should it be * public? Trouble is - what is the appropriate set of properties? */ static void pango_layout_get_item_properties (PangoItem *item, PangoUnderline *uline, gint *rise, PangoRectangle *ink_rect, PangoRectangle *logical_rect, gboolean *shape_set) { GSList *tmp_list = item->extra_attrs; if (shape_set) *shape_set = FALSE; if (rise) *rise = 0; if (uline) *uline = PANGO_UNDERLINE_NONE; while (tmp_list) { PangoAttribute *attr = tmp_list->data; switch (attr->klass->type) { case PANGO_ATTR_UNDERLINE: if (uline) *uline = ((PangoAttrInt *)attr)->value; break; case PANGO_ATTR_RISE: if (rise) *rise = ((PangoAttrInt *)attr)->value; break; case PANGO_ATTR_SHAPE: if (shape_set) *shape_set = TRUE; if (logical_rect) *logical_rect = ((PangoAttrShape *)attr)->logical_rect; if (ink_rect) *ink_rect = ((PangoAttrShape *)attr)->ink_rect; break; default: break; } tmp_list = tmp_list->next; } } static gboolean check_invalid (PangoLayoutIter *iter, const char *loc) { if (iter->line->layout == NULL) { g_warning ("%s: PangoLayout changed since PangoLayoutIter was created, iterator invalid", loc); return TRUE; } else { return FALSE; } } #ifdef G_DISABLE_CHECKS #define IS_INVALID(iter) FALSE #else #define IS_INVALID(iter) check_invalid ((iter), G_STRLOC) #endif static int next_cluster_start (PangoGlyphString *gs, int cluster_start) { int i; i = cluster_start + 1; while (i < gs->num_glyphs) { if (gs->glyphs[i].attr.is_cluster_start) return i; ++i; } return gs->num_glyphs; } static int cluster_end_index (PangoLayoutIter *iter) { PangoGlyphString *gs; gs = iter->run->glyphs; if (iter->next_cluster_start == gs->num_glyphs) { /* Use the left or right end of the run */ if (iter->ltr) return iter->run->item->offset + iter->run->item->length; else return iter->run->item->offset; } else { return gs->log_clusters[iter->next_cluster_start]; } } static inline void offset_y (PangoLayoutIter *iter, int *y) { Extents *line_ext; line_ext = (Extents*)iter->line_extents_link->data; *y += line_ext->baseline; } static void update_run (PangoLayoutIter *iter) { int old_run_width; Extents *line_ext; line_ext = (Extents*)iter->line_extents_link->data; /* Note that in iter_new() the old_run_width is garbage, * but we don't use it since we're on the first run of * a line. */ old_run_width = iter->run_logical_rect.width; if (iter->run_list_link == iter->line->runs) iter->run_x = line_ext->logical_rect.x; else iter->run_x += old_run_width; if (iter->run) { pango_layout_run_get_extents (iter->run, &iter->run_is_shaped, NULL, &iter->run_logical_rect); /* Fix coordinates of the run extents */ iter->run_logical_rect.x += iter->run_x; offset_y (iter, &iter->run_logical_rect.y); } else { iter->run_is_shaped = FALSE; iter->run_logical_rect.x = iter->run_x; iter->run_logical_rect.y = line_ext->logical_rect.y; iter->run_logical_rect.width = 0; iter->run_logical_rect.height = line_ext->logical_rect.height; } if (iter->run) iter->ltr = (iter->run->item->analysis.level % 2) == 0; else iter->ltr = TRUE; if (iter->ltr) iter->cluster_x = iter->run_logical_rect.x; else iter->cluster_x = iter->run_logical_rect.x + iter->run_logical_rect.width; iter->cluster_start = 0; if (iter->run) iter->next_cluster_start = next_cluster_start (iter->run->glyphs, iter->cluster_start); else iter->next_cluster_start = 0; /* Index of the first cluster in the glyph string, relative * to the start of the run */ if (iter->run) iter->cluster_index = iter->run->glyphs->log_clusters[0]; else iter->cluster_index = iter->index; /* Get an overall index, leaving it unchanged for * a the NULL run */ if (iter->run) iter->index = iter->cluster_index + iter->run->item->offset; } /** * pango_layout_get_iter: * @layout: a #PangoLayout * * Returns an iterator to iterate over the visual extents of the layout. * * Return value: a new #PangoLayoutIter **/ PangoLayoutIter* pango_layout_get_iter (PangoLayout *layout) { PangoLayoutIter *iter; g_return_val_if_fail (PANGO_IS_LAYOUT (layout), NULL); iter = g_new (PangoLayoutIter, 1); iter->layout = layout; g_object_ref (G_OBJECT (iter->layout)); pango_layout_check_lines (layout); iter->line_list_link = layout->lines; iter->line = iter->line_list_link->data; pango_layout_line_ref (iter->line); iter->run_list_link = iter->line->runs; if (iter->run_list_link) iter->run = iter->run_list_link->data; else iter->run = NULL; if (iter->run) iter->index = iter->run->item->offset; else iter->index = 0; iter->line_extents = NULL; pango_layout_get_extents_internal (layout, NULL, &iter->logical_rect, &iter->line_extents); iter->line_extents_link = iter->line_extents; update_run (iter); return iter; } /** * pango_layout_iter_free: * @iter: a #PangoLayoutIter * * Frees an iterator that's no longer in use. **/ void pango_layout_iter_free (PangoLayoutIter *iter) { g_return_if_fail (iter != NULL); g_slist_foreach (iter->line_extents, (GFunc) g_free, NULL); g_slist_free (iter->line_extents); pango_layout_line_unref (iter->line); g_object_unref (G_OBJECT (iter->layout)); g_free (iter); } /** * pango_layout_iter_get_index: * @iter: a #PangoLayoutIter * * Gets the current byte index. Note that iterating forward by char * moves in visual order, not logical order, so indexes may not be * sequential. * * Return value: current byte index **/ int pango_layout_iter_get_index (PangoLayoutIter *iter) { if (IS_INVALID (iter)) return 0; return iter->index; } /** * pango_layout_iter_get_run: * @iter: a #PangoLayoutIter * * Gets the current run. When iterating by run, at the end of each * line, there's a position with a %NULL run, so this function can return * %NULL. The %NULL run at the end of each line ensures that all lines have * at least one run, even lines consisting of only a newline. * * Return value: the current run **/ PangoLayoutRun* pango_layout_iter_get_run (PangoLayoutIter *iter) { if (IS_INVALID (iter)) return NULL; return iter->run; } /** * pango_layout_iter_get_line: * @iter: a #PangoLayoutIter * * Gets the current line. * * Return value: the current line **/ PangoLayoutLine* pango_layout_iter_get_line (PangoLayoutIter *iter) { if (IS_INVALID (iter)) return NULL; return iter->line; } /** * pango_layout_iter_at_last_line: * @iter: a #PangoLayoutIter * * Determines whether @iter is on the last line of the layout. * * Return value: %TRUE if @iter is on the last line **/ gboolean pango_layout_iter_at_last_line (PangoLayoutIter *iter) { if (IS_INVALID (iter)) return FALSE; return iter->line_extents_link->next == NULL; } /** * pango_layout_iter_next_char: * @iter: a #PangoLayoutIter * * Moves @iter forward to the next character in visual order. If @iter was already at * the end of the layout, returns %FALSE. * * Return value: whether motion was possible **/ gboolean pango_layout_iter_next_char (PangoLayoutIter *iter) { const char *p; const char *oldp; const char *item_end; int new_index; int next_cluster_index; PangoGlyphString *gs; if (IS_INVALID (iter)) return FALSE; if (iter->run == NULL) return pango_layout_iter_next_line (iter); gs = iter->run->glyphs; next_cluster_index = cluster_end_index (iter); oldp = iter->layout->text + iter->index; if (iter->ltr) { item_end = iter->layout->text + iter->run->item->offset + iter->run->item->length; p = g_utf8_next_char (oldp); } else { item_end = iter->layout->text + iter->run->item->offset; p = g_utf8_prev_char (oldp); } new_index = iter->index + (p - oldp); /* Make sure we don't go past the next cluster index */ g_assert ((iter->ltr && (new_index <= next_cluster_index)) || (!iter->ltr && (new_index >= next_cluster_index))); if (new_index == next_cluster_index) return pango_layout_iter_next_cluster (iter); else { iter->index = new_index; return TRUE; } } /** * pango_layout_iter_next_cluster: * @iter: a #PangoLayoutIter * * Moves @iter forward to the next cluster in visual order. If @iter * was already at the end of the layout, returns %FALSE. * * Return value: whether motion was possible **/ gboolean pango_layout_iter_next_cluster (PangoLayoutIter *iter) { PangoGlyphString *gs; if (IS_INVALID (iter)) return FALSE; if (iter->run == NULL) return pango_layout_iter_next_line (iter); gs = iter->run->glyphs; if (iter->next_cluster_start == gs->num_glyphs) return pango_layout_iter_next_run (iter); else { if (iter->ltr) iter->cluster_x += gs->glyphs[iter->cluster_start].geometry.width; else iter->cluster_x -= gs->glyphs[iter->cluster_start].geometry.width; iter->cluster_start = iter->next_cluster_start; iter->next_cluster_start = next_cluster_start (gs, iter->cluster_start); iter->cluster_index = gs->log_clusters[iter->cluster_start]; return TRUE; } } /** * pango_layout_iter_next_run: * @iter: a #PangoLayoutIter * * Moves @iter forward to the next run in visual order. If @iter was * already at the end of the layout, returns %FALSE. * * Return value: whether motion was possible **/ gboolean pango_layout_iter_next_run (PangoLayoutIter *iter) { GSList *next_link; if (IS_INVALID (iter)) return FALSE; if (iter->run == NULL) return pango_layout_iter_next_line (iter); next_link = iter->run_list_link->next; if (next_link == NULL) { /* Moving on to the zero-width "virtual run" at the end of each * line */ iter->run = NULL; iter->run_list_link = NULL; } else { iter->run_list_link = next_link; iter->run = iter->run_list_link->data; } update_run (iter); return TRUE; } /** * pango_layout_iter_next_line: * @iter: a #PangoLayoutIter * * Moves @iter forward to the start of the next line. If @iter is * already on the last line, returns %FALSE. * * Return value: whether motion was possible **/ gboolean pango_layout_iter_next_line (PangoLayoutIter *iter) { GSList *next_link; if (IS_INVALID (iter)) return FALSE; next_link = iter->line_list_link->next; if (next_link == NULL) return FALSE; iter->line_list_link = next_link; pango_layout_line_unref (iter->line); iter->line = iter->line_list_link->data; pango_layout_line_ref (iter->line); iter->run_list_link = iter->line->runs; if (iter->run_list_link) iter->run = iter->run_list_link->data; else iter->run = NULL; /* If we move on to an empty line (no runs), it means the empty line * represents a '\n' in layout->text, so advance iter->index */ if (iter->run == NULL) iter->index += 1; /* 1 is the length of '\n' in UTF-8 */ /* update_run() will set the index if we aren't on an empty line */ iter->line_extents_link = iter->line_extents_link->next; g_assert (iter->line_extents_link != NULL); update_run (iter); return TRUE; } /** * pango_layout_iter_get_char_extents: * @iter: a #PangoLayoutIter * @logical_rect: rectangle to fill with logical extents * * Gets the extents of the current character, in layout coordinates * (origin is the top left of the entire layout). Only logical extents * can sensibly be obtained for characters; ink extents make sense only * down to the level of clusters. * **/ void pango_layout_iter_get_char_extents (PangoLayoutIter *iter, PangoRectangle *logical_rect) { PangoRectangle cluster_rect; int end_index; int start_index; const char *p; const char *end; const char *current; int char_count; int cluster_offset; double char_width; if (IS_INVALID (iter)) return; if (logical_rect == NULL) return; pango_layout_iter_get_cluster_extents (iter, NULL, &cluster_rect); if (iter->run == NULL) { /* When on the NULL run, cluster, char, and run all have the * same extents */ *logical_rect = cluster_rect; return; } /* count chars in the cluster */ end_index = iter->run->item->offset + cluster_end_index (iter); start_index = iter->run->item->offset + iter->cluster_index; if (end_index < start_index) { int tmp = end_index; end_index = start_index; start_index = tmp; } p = iter->layout->text + start_index; current = iter->layout->text + iter->index; end = iter->layout->text + end_index; g_assert (p < end); g_assert (p <= current); g_assert (current < end); char_count = 0; cluster_offset = 0; while (p != end) { if (p < current) ++cluster_offset; ++char_count; p = g_utf8_next_char (p); } char_width = ((double)cluster_rect.width) / char_count; logical_rect->width = char_width; logical_rect->height = cluster_rect.height; logical_rect->y = cluster_rect.y; if (iter->ltr) logical_rect->x = cluster_rect.x + char_width * cluster_offset; else logical_rect->x = cluster_rect.x + cluster_rect.width - char_width * cluster_offset; } /** * pango_layout_iter_get_cluster_extents: * @iter: a #PangoLayoutIter * @ink_rect: rectangle to fill with ink extents * @logical_rect: rectangle to fill with logical extents * * Gets the extents of the current cluster, in layout coordinates * (origin is the top left of the entire layout). * **/ void pango_layout_iter_get_cluster_extents (PangoLayoutIter *iter, PangoRectangle *ink_rect, PangoRectangle *logical_rect) { if (IS_INVALID (iter)) return; if (iter->run == NULL) { /* When on the NULL run, cluster, char, and run all have the * same extents */ pango_layout_iter_get_run_extents (iter, ink_rect, logical_rect); return; } pango_glyph_string_extents_range (iter->run->glyphs, iter->cluster_start, iter->next_cluster_start, iter->run->item->analysis.font, ink_rect, logical_rect); if (ink_rect) { ink_rect->x += iter->cluster_x; offset_y (iter, &ink_rect->y); } if (logical_rect) { logical_rect->x += iter->cluster_x; offset_y (iter, &logical_rect->y); } } /** * pango_layout_iter_get_run_extents: * @iter: a #PangoLayoutIter * @ink_rect: rectangle to fill with ink extents * @logical_rect: rectangle to fill with logical extents * * Gets the extents of the current run in layout coordinates * (origin is the top left of the entire layout). * **/ void pango_layout_iter_get_run_extents (PangoLayoutIter *iter, PangoRectangle *ink_rect, PangoRectangle *logical_rect) { IS_INVALID (iter); if (ink_rect) { if (iter->run) { pango_layout_run_get_extents (iter->run, NULL, ink_rect, NULL); offset_y (iter, &ink_rect->y); ink_rect->x += iter->run_x; } else { PangoRectangle line_ink; pango_layout_iter_get_line_extents (iter, &line_ink, NULL); ink_rect->x = iter->run_x; ink_rect->y = line_ink.y; ink_rect->width = 0; ink_rect->height = line_ink.height; } } if (logical_rect) *logical_rect = iter->run_logical_rect; } /** * pango_layout_iter_get_line_extents: * @iter: a #PangoLayoutIter * @ink_rect: rectangle to fill with ink extents * @logical_rect: rectangle to fill with logical extents * * Obtains the extents of the current line. @ink_rect or @logical_rect * can be NULL if you aren't interested in them. Extents are in layout * coordinates (origin is the top-left corner of the entire * #PangoLayout). Thus the extents returned by this function will be * the same width/height but not at the same x/y as the extents * returned from pango_layout_line_get_extents(). * **/ void pango_layout_iter_get_line_extents (PangoLayoutIter *iter, PangoRectangle *ink_rect, PangoRectangle *logical_rect) { Extents *ext; if (IS_INVALID (iter)) return; ext = iter->line_extents_link->data; if (ink_rect) { get_line_extents_layout_coords (iter->layout, iter->line, iter->logical_rect.width, ext->logical_rect.y, NULL, ink_rect, NULL); } if (logical_rect) *logical_rect = ext->logical_rect; } /** * pango_layout_iter_get_line_yrange: * @iter: a #PangoLayoutIter * @y0: start of line * @y1: end of line * * Divides the vertical space in the #PangoLayout being iterated over * between the lines in the layout, and returns the space belonging to * the current line. A line's range includes the line's logical * extents, plus half of the spacing above and below the line, if * pango_layout_set_spacing() has been called to set layout spacing. * The y positions are in layout coordinates (origin at top left of the * entire layout). * **/ void pango_layout_iter_get_line_yrange (PangoLayoutIter *iter, int *y0, int *y1) { Extents *ext; int half_spacing; IS_INVALID (iter); ext = iter->line_extents_link->data; half_spacing = iter->layout->spacing / 2; /* Note that if layout->spacing is odd, the remainder spacing goes * above the line (this is pretty arbitrary of course) */ if (y0) { /* No spacing above the first line */ if (iter->line_extents_link == iter->line_extents) *y0 = ext->logical_rect.y; else *y0 = ext->logical_rect.y - (iter->layout->spacing - half_spacing); } if (y1) { /* No spacing below the last line */ if (iter->line_extents_link->next == NULL) *y1 = ext->logical_rect.y + ext->logical_rect.height; else *y1 = ext->logical_rect.y + ext->logical_rect.height + half_spacing; } } /** * pango_layout_iter_get_baseline: * @iter: a #PangoLayoutIter * * Gets the y position of the current line's baseline, in layout * coordinates (origin at top left of the entire layout). * * Return value: baseline of current line **/ int pango_layout_iter_get_baseline (PangoLayoutIter *iter) { Extents *ext; if (IS_INVALID (iter)) return 0; ext = iter->line_extents_link->data; return ext->baseline; } /** * pango_layout_iter_get_layout_extents: * @iter: a #PangoLayoutIter * @ink_rect: rectangle to fill with ink extents * @logical_rect: rectangle to fill with logical extents * * Obtains the extents of the #PangoLayout being iterated * over. @ink_rect or @logical_rect can be NULL if you * aren't interested in them. * **/ void pango_layout_iter_get_layout_extents (PangoLayoutIter *iter, PangoRectangle *ink_rect, PangoRectangle *logical_rect) { if (IS_INVALID (iter)) return; if (ink_rect) { /* expensive recomputation, woo-hoo */ pango_layout_get_extents (iter->layout, ink_rect, NULL); } if (logical_rect) *logical_rect = iter->logical_rect; }