static VALUE
rg_get(int argc, VALUE *argv, VALUE self)
{
VALUE type, ret;
PangoAttribute* attr;
int i;
rb_scan_args(argc, argv, "01", &type);
if (NIL_P(type)){
PangoAttrIterator* iter = _SELF(self);
ret = rb_ary_new();
for (i = 0; i < PANGO_ATTR_SCALE + 1; i++){
attr = pango_attr_iterator_get(iter, i);
if (attr)
rb_ary_push(ret, ATTR2RVAL(attr));
}
} else {
attr = pango_attr_iterator_get(_SELF(self), FIX2INT(type));
ret = attr ? ATTR2RVAL(attr) : Qnil;
}
return ret;
}
static void
go_pango_translate_here (PangoAttrIterator *state_iter,
PangoAttrIterator *attr_iter, PangoAttrList *attrs)
{
double font_scale = 1.;
double scale = 1.;
int rise = 0;
PangoAttribute *pa;
PangoFontDescription *desc = pango_font_description_new ();
GSList *the_attrs, *l;
gint range_start, range_end;
pango_attr_iterator_range (attr_iter, &range_start, &range_end);
if (range_start == range_end)
return;
desc = pango_font_description_new ();
pango_attr_iterator_get_font (state_iter, desc, NULL, NULL);
font_scale = pango_font_description_get_size (desc)/
(double)PANGO_SCALE/10.;
pango_font_description_free (desc);
pa = pango_attr_iterator_get
(state_iter, PANGO_ATTR_SCALE);
if (pa)
scale = ((PangoAttrFloat *)pa)->value;
pa = pango_attr_iterator_get
(state_iter, PANGO_ATTR_RISE);
if (pa)
rise = ((PangoAttrInt *)pa)->value;
/* We should probably figured out the default font size used */
/* rather than assuming it is 10 pts * scale */
if (font_scale == 0)
font_scale = scale;
the_attrs = pango_attr_iterator_get_attrs (attr_iter);
for (l = the_attrs; l != NULL; l = l->next) {
PangoAttribute *attribute = l->data;
PangoAttrType type = attribute->klass->type;
if (type == go_pango_attr_superscript_get_attr_type ()) {
GOPangoAttrSuperscript *attr = (GOPangoAttrSuperscript *)attribute;
if (attr->val) {
scale *= GO_SUPERSCRIPT_SCALE;
rise += GO_SUPERSCRIPT_RISE * font_scale;
font_scale *= GO_SUPERSCRIPT_SCALE;
}
} else { /* go_pango_attr_subscript_type */
GOPangoAttrSubscript *attr = (GOPangoAttrSubscript *)attribute;
if (attr->val) {
scale *= GO_SUBSCRIPT_SCALE;
rise += GO_SUBSCRIPT_RISE * font_scale;
font_scale *= GO_SUBSCRIPT_SCALE;
}
}
}
if (the_attrs != NULL) {
PangoAttribute *attr = pango_attr_scale_new (scale);
attr->start_index = range_start;
attr->end_index = range_end;
pango_attr_list_insert (attrs, attr);
attr = pango_attr_rise_new (rise);
attr->start_index = range_start;
attr->end_index = range_end;
pango_attr_list_insert (attrs, attr);
}
g_slist_free_full (the_attrs, (GDestroyNotify)pango_attribute_destroy);
}
/**
* gail_misc_layout_get_run_attributes:
* @attrib_set: The #AtkAttributeSet to add the attribute to
* @layout: The PangoLayout from which the attributes will be obtained
* @text: The text
* @offset: The offset at which the attributes are required
* @start_offset: The start offset of the current run
* @end_offset: The end offset of the current run
*
* Adds the attributes for the run starting at offset to the specified
* attribute set.
*
* Returns: A pointer to the #AtkAttributeSet.
**/
AtkAttributeSet*
gail_misc_layout_get_run_attributes (AtkAttributeSet *attrib_set,
PangoLayout *layout,
const gchar *text,
gint offset,
gint *start_offset,
gint *end_offset)
{
PangoAttrIterator *iter;
PangoAttrList *attr;
PangoAttrString *pango_string;
PangoAttrInt *pango_int;
PangoAttrColor *pango_color;
PangoAttrLanguage *pango_lang;
PangoAttrFloat *pango_float;
gint index, start_index, end_index;
gboolean is_next = TRUE;
gchar *value = NULL;
glong len;
len = g_utf8_strlen (text, -1);
/* Grab the attributes of the PangoLayout, if any */
if ((attr = pango_layout_get_attributes (layout)) == NULL)
{
*start_offset = 0;
*end_offset = len;
return attrib_set;
}
iter = pango_attr_list_get_iterator (attr);
/* Get invariant range offsets */
/* If offset out of range, set offset in range */
if (offset > len)
offset = len;
else if (offset < 0)
offset = 0;
index = g_utf8_offset_to_pointer (text, offset) - text;
pango_attr_iterator_range (iter, &start_index, &end_index);
while (is_next)
{
if (index >= start_index && index < end_index)
{
*start_offset = g_utf8_pointer_to_offset (text,
text + start_index);
if (end_index == G_MAXINT)
/* Last iterator */
end_index = len;
*end_offset = g_utf8_pointer_to_offset (text,
text + end_index);
break;
}
is_next = pango_attr_iterator_next (iter);
pango_attr_iterator_range (iter, &start_index, &end_index);
}
/* Get attributes */
if ((pango_string = (PangoAttrString*) pango_attr_iterator_get (iter,
PANGO_ATTR_FAMILY)) != NULL)
{
value = g_strdup_printf("%s", pango_string->value);
attrib_set = gail_misc_add_attribute (attrib_set,
ATK_TEXT_ATTR_FAMILY_NAME,
value);
}
if ((pango_int = (PangoAttrInt*) pango_attr_iterator_get (iter,
PANGO_ATTR_STYLE)) != NULL)
{
attrib_set = gail_misc_add_attribute (attrib_set,
ATK_TEXT_ATTR_STYLE,
g_strdup (atk_text_attribute_get_value (ATK_TEXT_ATTR_STYLE, pango_int->value)));
}
if ((pango_int = (PangoAttrInt*) pango_attr_iterator_get (iter,
PANGO_ATTR_WEIGHT)) != NULL)
{
value = g_strdup_printf("%i", pango_int->value);
attrib_set = gail_misc_add_attribute (attrib_set,
ATK_TEXT_ATTR_WEIGHT,
value);
}
if ((pango_int = (PangoAttrInt*) pango_attr_iterator_get (iter,
PANGO_ATTR_VARIANT)) != NULL)
{
attrib_set = gail_misc_add_attribute (attrib_set,
ATK_TEXT_ATTR_VARIANT,
g_strdup (atk_text_attribute_get_value (ATK_TEXT_ATTR_VARIANT, pango_int->value)));
}
if ((pango_int = (PangoAttrInt*) pango_attr_iterator_get (iter,
PANGO_ATTR_STRETCH)) != NULL)
{
attrib_set = gail_misc_add_attribute (attrib_set,
ATK_TEXT_ATTR_STRETCH,
g_strdup (atk_text_attribute_get_value (ATK_TEXT_ATTR_STRETCH, pango_int->value)));
}
if ((pango_int = (PangoAttrInt*) pango_attr_iterator_get (iter,
PANGO_ATTR_SIZE)) != NULL)
{
value = g_strdup_printf("%i", pango_int->value / PANGO_SCALE);
attrib_set = gail_misc_add_attribute (attrib_set,
ATK_TEXT_ATTR_SIZE,
value);
}
if ((pango_int = (PangoAttrInt*) pango_attr_iterator_get (iter,
PANGO_ATTR_UNDERLINE)) != NULL)
{
attrib_set = gail_misc_add_attribute (attrib_set,
ATK_TEXT_ATTR_UNDERLINE,
g_strdup (atk_text_attribute_get_value (ATK_TEXT_ATTR_UNDERLINE, pango_int->value)));
}
if ((pango_int = (PangoAttrInt*) pango_attr_iterator_get (iter,
PANGO_ATTR_STRIKETHROUGH)) != NULL)
{
attrib_set = gail_misc_add_attribute (attrib_set,
ATK_TEXT_ATTR_STRIKETHROUGH,
g_strdup (atk_text_attribute_get_value (ATK_TEXT_ATTR_STRIKETHROUGH, pango_int->value)));
}
if ((pango_int = (PangoAttrInt*) pango_attr_iterator_get (iter,
PANGO_ATTR_RISE)) != NULL)
{
value = g_strdup_printf("%i", pango_int->value);
attrib_set = gail_misc_add_attribute (attrib_set,
ATK_TEXT_ATTR_RISE,
value);
}
if ((pango_lang = (PangoAttrLanguage*) pango_attr_iterator_get (iter,
PANGO_ATTR_LANGUAGE)) != NULL)
{
value = g_strdup( pango_language_to_string( pango_lang->value));
attrib_set = gail_misc_add_attribute (attrib_set,
ATK_TEXT_ATTR_LANGUAGE,
value);
}
if ((pango_float = (PangoAttrFloat*) pango_attr_iterator_get (iter,
PANGO_ATTR_SCALE)) != NULL)
{
value = g_strdup_printf("%g", pango_float->value);
attrib_set = gail_misc_add_attribute (attrib_set,
ATK_TEXT_ATTR_SCALE,
value);
}
if ((pango_color = (PangoAttrColor*) pango_attr_iterator_get (iter,
PANGO_ATTR_FOREGROUND)) != NULL)
{
value = g_strdup_printf ("%u,%u,%u",
pango_color->color.red,
pango_color->color.green,
pango_color->color.blue);
attrib_set = gail_misc_add_attribute (attrib_set,
ATK_TEXT_ATTR_FG_COLOR,
value);
}
if ((pango_color = (PangoAttrColor*) pango_attr_iterator_get (iter,
PANGO_ATTR_BACKGROUND)) != NULL)
{
value = g_strdup_printf ("%u,%u,%u",
pango_color->color.red,
pango_color->color.green,
pango_color->color.blue);
attrib_set = gail_misc_add_attribute (attrib_set,
ATK_TEXT_ATTR_BG_COLOR,
value);
}
pango_attr_iterator_destroy (iter);
return attrib_set;
}
static AtkAttributeSet *
get_run_attributes (PangoAttrList *attrs,
const gchar *text,
gint offset,
gint *start_offset,
gint *end_offset)
{
AtkAttributeSet *atk_attr_set = NULL;
PangoAttrString *pango_string;
PangoAttrInt *pango_int;
PangoAttrColor *pango_color;
PangoAttrIterator *iter;
gint i, start, end;
gboolean has_attrs = FALSE;
glong text_length;
gchar *attr_value;
text_length = g_utf8_strlen (text, -1);
if (offset < 0 || offset >= text_length)
return NULL;
/* Check if there are attributes for the offset,
* and set the attributes range if positive */
iter = pango_attr_list_get_iterator (attrs);
i = g_utf8_offset_to_pointer (text, offset) - text;
do {
pango_attr_iterator_range (iter, &start, &end);
if (i >= start && i < end) {
*start_offset = g_utf8_pointer_to_offset (text, text + start);
if (end == G_MAXINT) /* Last iterator */
end = text_length;
*end_offset = g_utf8_pointer_to_offset (text, text + end);
has_attrs = TRUE;
}
} while (!has_attrs && pango_attr_iterator_next (iter));
if (!has_attrs) {
pango_attr_iterator_destroy (iter);
return NULL;
}
/* Create the AtkAttributeSet from the Pango attributes */
pango_string = (PangoAttrString *) pango_attr_iterator_get (iter, PANGO_ATTR_FAMILY);
if (pango_string) {
attr_value = g_strdup (pango_string->value);
atk_attr_set = add_attribute (atk_attr_set, ATK_TEXT_ATTR_FAMILY_NAME, attr_value);
}
pango_int = (PangoAttrInt *) pango_attr_iterator_get (iter, PANGO_ATTR_SIZE);
if (pango_int) {
attr_value = g_strdup_printf ("%i", pango_int->value / PANGO_SCALE);
atk_attr_set = add_attribute (atk_attr_set, ATK_TEXT_ATTR_SIZE, attr_value);
}
pango_int = (PangoAttrInt *) pango_attr_iterator_get (iter, PANGO_ATTR_UNDERLINE);
if (pango_int) {
atk_attr_set = add_attribute (atk_attr_set,
ATK_TEXT_ATTR_UNDERLINE,
g_strdup (atk_text_attribute_get_value (ATK_TEXT_ATTR_UNDERLINE,
pango_int->value)));
}
pango_color = (PangoAttrColor *) pango_attr_iterator_get (iter, PANGO_ATTR_FOREGROUND);
if (pango_color) {
attr_value = g_strdup_printf ("%u,%u,%u",
pango_color->color.red,
pango_color->color.green,
pango_color->color.blue);
atk_attr_set = add_attribute (atk_attr_set, ATK_TEXT_ATTR_FG_COLOR, attr_value);
}
pango_attr_iterator_destroy (iter);
return atk_attr_set;
}
static void
gtk_text_buffer_insert_markup(GtkTextBuffer * buffer, GtkTextIter * iter,
const gchar * markup)
{
PangoAttrIterator *paiter;
PangoAttrList *attrlist;
GtkTextMark *mark;
GError *error = NULL;
gchar *text;
g_return_if_fail(GTK_IS_TEXT_BUFFER(buffer));
g_return_if_fail(markup != NULL);
if (*markup == '\000')
return;
/* invalid */
if (!pango_parse_markup(markup, -1, 0, &attrlist, &text, NULL, &error)) {
g_warning("Invalid markup string: %s", error->message);
g_error_free(error);
return;
}
/* trivial, no markup */
if (attrlist == NULL) {
gtk_text_buffer_insert(buffer, iter, text, -1);
g_free(text);
return;
}
/* create mark with right gravity */
mark = gtk_text_buffer_create_mark(buffer, NULL, iter, FALSE);
paiter = pango_attr_list_get_iterator(attrlist);
do {
PangoAttribute *attr;
GtkTextTag *tag;
GtkTextTag *tag_para;
gint start, end;
pango_attr_iterator_range(paiter, &start, &end);
if (end == G_MAXINT) /* last chunk */
end = start - 1; /* resulting in -1 to be passed to _insert */
tag = gtk_text_tag_new(NULL);
if ((attr = pango_attr_iterator_get(paiter, PANGO_ATTR_LANGUAGE)))
g_object_set(tag, "language",
pango_language_to_string(((PangoAttrLanguage *)
attr)->value), NULL);
if ((attr = pango_attr_iterator_get(paiter, PANGO_ATTR_FAMILY)))
g_object_set(tag, "family", ((PangoAttrString *) attr)->value,
NULL);
if ((attr = pango_attr_iterator_get(paiter, PANGO_ATTR_STYLE)))
g_object_set(tag, "style", ((PangoAttrInt *) attr)->value,
NULL);
if ((attr = pango_attr_iterator_get(paiter, PANGO_ATTR_WEIGHT)))
g_object_set(tag, "weight", ((PangoAttrInt *) attr)->value,
NULL);
if ((attr = pango_attr_iterator_get(paiter, PANGO_ATTR_VARIANT)))
g_object_set(tag, "variant", ((PangoAttrInt *) attr)->value,
NULL);
if ((attr = pango_attr_iterator_get(paiter, PANGO_ATTR_STRETCH)))
g_object_set(tag, "stretch", ((PangoAttrInt *) attr)->value,
NULL);
if ((attr = pango_attr_iterator_get(paiter, PANGO_ATTR_SIZE)))
g_object_set(tag, "size", ((PangoAttrInt *) attr)->value,
NULL);
if ((attr = pango_attr_iterator_get(paiter, PANGO_ATTR_FONT_DESC)))
g_object_set(tag, "font-desc",
((PangoAttrFontDesc *) attr)->desc, NULL);
if ((attr =
pango_attr_iterator_get(paiter, PANGO_ATTR_FOREGROUND))) {
GdkColor col = { 0,
((PangoAttrColor *) attr)->color.red,
((PangoAttrColor *) attr)->color.green,
((PangoAttrColor *) attr)->color.blue
};
g_object_set(tag, "foreground-gdk", &col, NULL);
}
if ((attr =
pango_attr_iterator_get(paiter, PANGO_ATTR_BACKGROUND))) {
GdkColor col = { 0,
((PangoAttrColor *) attr)->color.red,
((PangoAttrColor *) attr)->color.green,
((PangoAttrColor *) attr)->color.blue
};
g_object_set(tag, "background-gdk", &col, NULL);
}
if ((attr = pango_attr_iterator_get(paiter, PANGO_ATTR_UNDERLINE)))
g_object_set(tag, "underline", ((PangoAttrInt *) attr)->value,
NULL);
if ((attr =
pango_attr_iterator_get(paiter, PANGO_ATTR_STRIKETHROUGH)))
g_object_set(tag, "strikethrough",
(gboolean) (((PangoAttrInt *) attr)->value != 0),
NULL);
if ((attr = pango_attr_iterator_get(paiter, PANGO_ATTR_RISE)))
g_object_set(tag, "rise", ((PangoAttrInt *) attr)->value,
NULL);
if ((attr = pango_attr_iterator_get(paiter, PANGO_ATTR_SCALE)))
g_object_set(tag, "scale", ((PangoAttrFloat *) attr)->value,
NULL);
gtk_text_tag_table_add(gtk_text_buffer_get_tag_table(buffer), tag);
tag_para =
gtk_text_tag_table_lookup(gtk_text_buffer_get_tag_table
(buffer), "para");
gtk_text_buffer_insert_with_tags(buffer, iter, text + start,
end - start, tag, tag_para, NULL);
/* mark had right gravity, so it should be
* at the end of the inserted text now */
gtk_text_buffer_get_iter_at_mark(buffer, iter, mark);
} while (pango_attr_iterator_next(paiter));
gtk_text_buffer_delete_mark(buffer, mark);
pango_attr_iterator_destroy(paiter);
pango_attr_list_unref(attrlist);
g_free(text);
}
