libyui-gtk  2.44.9
ygtkrichtext.c
1 /********************************************************************
2  * YaST2-GTK - http://en.opensuse.org/YaST2-GTK *
3  ********************************************************************/
4 
5 /* YGtkRichText widget */
6 // check the header file for information about this widget
7 
8 #include <yui/Libyui_config.h>
9 #include "ygtkrichtext.h"
10 #include <gtk/gtk.h>
11 #include <string.h>
12 
13 #define IDENT_MARGIN 20
14 #define PARAGRAPH_SPACING 12
15 
16 // convert liberal html to xhtml, as we use a xhtml parser
17 extern gchar *ygutils_convert_to_xhtml (const char *instr);
18 
19 G_DEFINE_TYPE (YGtkRichText, ygtk_rich_text, YGTK_TYPE_TEXT_VIEW)
20 
21 static guint link_clicked_signal;
22 static GdkColor link_color = { 0, 0, 0, 0xeeee };
23 
24 // utilities
25 // Looks at all tags covering the position of iter in the text view,
26 // and returns the link the text points to, in case that text is a link.
27 static const char *get_link_at_iter (GtkTextView *text_view, GtkTextIter *iter)
28 {
29  char *link = NULL;
30  GSList *tags = gtk_text_iter_get_tags (iter), *tagp;
31  for (tagp = tags; tagp != NULL; tagp = tagp->next) {
32  GtkTextTag *tag = (GtkTextTag*) tagp->data;
33  link = (char*) g_object_get_data (G_OBJECT (tag), "link");
34  if (link)
35  break;
36  }
37 
38  if (tags)
39  g_slist_free (tags);
40  return link;
41 }
42 static const char *get_link (GtkTextView *text_view, gint win_x, gint win_y)
43 {
44  gint buffer_x, buffer_y;
45  gtk_text_view_window_to_buffer_coords (GTK_TEXT_VIEW (text_view),
46  GTK_TEXT_WINDOW_WIDGET, win_x, win_y, &buffer_x, &buffer_y);
47  GtkTextIter iter;
48  gtk_text_view_get_iter_at_location (text_view, &iter, buffer_x, buffer_y);
49  return get_link_at_iter (text_view, &iter);
50 }
51 
52 // callbacks
53 // Links can also be activated by clicking.
54 static gboolean event_after (GtkWidget *text_view, GdkEvent *ev)
55 {
56  if (ev->type != GDK_BUTTON_RELEASE)
57  return FALSE;
58  GtkTextIter start, end;
59  GtkTextBuffer *buffer;
60  GdkEventButton *event = (GdkEventButton *) ev;
61  if (event->button != 1)
62  return FALSE;
63  buffer = gtk_text_view_get_buffer (GTK_TEXT_VIEW (text_view));
64 
65  // We shouldn't follow a link if the user is selecting something.
66  gtk_text_buffer_get_selection_bounds (buffer, &start, &end);
67  if (gtk_text_iter_get_offset (&start) != gtk_text_iter_get_offset (&end))
68  return FALSE;
69 
70  const char *link = get_link (GTK_TEXT_VIEW (text_view), event->x, event->y);
71  if (link) {
72  if (*link == '#') {
73  GtkTextMark *mark = gtk_text_buffer_get_mark (buffer, link + 1);
74  if (mark)
75  gtk_text_view_scroll_to_mark (GTK_TEXT_VIEW (text_view), mark, 0.4, TRUE, 0, 0);
76  } else {
77  // report link
78  g_signal_emit (YGTK_RICH_TEXT (text_view), link_clicked_signal, 0, link);
79  }
80  }
81  return FALSE;
82 }
83 
84 #include <stdlib.h>
85 static int mystrcmp(void *a, void *b)
86 { return g_ascii_strcasecmp (*(char **)a, *(char **)b); }
87 
88 static gboolean isBlockTag (const char *tag)
89 {
90  static const char *Tags[] =
91  { "blockquote", "dd", "dl", "dt", "h1", "h2", "h3", "h4", "h5", "li", "p", "pre" };
92  void *ret;
93  ret = bsearch (&tag, Tags, sizeof (Tags)/sizeof(char*), sizeof(char *), (void*)mystrcmp);
94  return ret != 0;
95 }
96 static gboolean isIdentTag (const char *tag)
97 {
98  static const char *Tags[] =
99  { "blockquote", "dd", "ol", "ul" };
100  void *ret;
101  ret = bsearch (&tag, Tags, sizeof (Tags)/sizeof(char*), sizeof(char *), (void*)mystrcmp);
102  return ret != 0;
103 }
104 
105 void ygtk_rich_text_init (YGtkRichText *rtext)
106 {
107  GtkWidget *widget = GTK_WIDGET (rtext);
108  GtkTextView *tview = GTK_TEXT_VIEW (rtext);
109  gtk_text_view_set_editable (tview, FALSE);
110  gtk_text_view_set_wrap_mode (tview, GTK_WRAP_WORD_CHAR);
111  gtk_text_view_set_pixels_below_lines (tview, 4);
112  gtk_text_view_set_left_margin (tview, 4);
113 
114  // Init link support
115  GdkDisplay *display = gtk_widget_get_display (widget);
116  rtext->hand_cursor = gdk_cursor_new_for_display (display, GDK_HAND2);
117  g_object_ref (rtext->hand_cursor);
118 
119  gtk_widget_style_get (widget, "link_color", &link_color, NULL);
120  g_signal_connect (tview, "event-after",
121  G_CALLBACK (event_after), NULL);
122 
123  // Create a few tags like 'h3', 'b', 'i'. others need to be created as we parse
124  GtkTextBuffer *buffer = gtk_text_view_get_buffer (tview);
125 
126  gboolean reverse = gtk_widget_get_default_direction() == GTK_TEXT_DIR_RTL;
127  const char *left_margin = reverse ? "right-margin" : "left-margin";
128  const char *right_margin = reverse ? "left-margin" : "right-margin";
129 
130  gtk_text_buffer_create_tag (buffer, "body", NULL);
131  gtk_text_buffer_create_tag (buffer, "h1", "weight", PANGO_WEIGHT_HEAVY,
132  "scale", PANGO_SCALE_XX_LARGE, "pixels-below-lines", 16,
133  "foreground", "#5c5c5c", NULL);
134  gtk_text_buffer_create_tag (buffer, "h2", "weight", PANGO_WEIGHT_ULTRABOLD,
135  "scale", PANGO_SCALE_X_LARGE, "pixels-below-lines", 15,
136  "foreground", "#5c5c5c", NULL);
137  gtk_text_buffer_create_tag (buffer, "h3", "weight", PANGO_WEIGHT_BOLD,
138  "scale", PANGO_SCALE_LARGE, "pixels-below-lines", 14,
139  "foreground", "#5c5c5c", NULL);
140  gtk_text_buffer_create_tag (buffer, "h4", "weight", PANGO_WEIGHT_SEMIBOLD,
141  "scale", PANGO_SCALE_LARGE, "pixels-below-lines", 13,
142  "foreground", "#5c5c5c", NULL);
143  gtk_text_buffer_create_tag (buffer, "h5",
144  "scale", PANGO_SCALE_LARGE, "foreground", "#5c5c5c", NULL);
145  gtk_text_buffer_create_tag (buffer, "p", "pixels-below-lines", 12, NULL);
146  gtk_text_buffer_create_tag (buffer, "big", "scale", PANGO_SCALE_LARGE, NULL);
147  gtk_text_buffer_create_tag (buffer, "small", "scale", PANGO_SCALE_SMALL, NULL);
148  gtk_text_buffer_create_tag (buffer, "tt", "family", "monospace", NULL);
149  gtk_text_buffer_create_tag (buffer, "pre", "family", "monospace",
150  "paragraph-background", "#f0f0f0", left_margin, 16, right_margin, 20, NULL);
151  gtk_text_buffer_create_tag (buffer, "b", "weight", PANGO_WEIGHT_BOLD, NULL);
152  gtk_text_buffer_create_tag (buffer, "i", "style", PANGO_STYLE_ITALIC, NULL);
153  gtk_text_buffer_create_tag (buffer, "u", "underline", PANGO_UNDERLINE_SINGLE, NULL);
154  gtk_text_buffer_create_tag (buffer, "center", "justification", GTK_JUSTIFY_CENTER, NULL);
155  gtk_text_buffer_create_tag (buffer, "right", "justification", GTK_JUSTIFY_RIGHT, NULL);
156  // helpers
157  gtk_text_buffer_create_tag (buffer, "keyword", "background", "yellow",
158  "foreground", "#000000", NULL);
159 }
160 
161 static void ygtk_rich_text_destroy (GtkWidget *widget)
162 {
163  // destroy can be called multiple times, and we must ref only once
164  YGtkRichText *rtext = YGTK_RICH_TEXT (widget);
165  g_object_unref (rtext->hand_cursor);
166  ygtk_rich_text_set_background (rtext, NULL);
167  GTK_WIDGET_CLASS (ygtk_rich_text_parent_class)->destroy(widget);
168 }
169 
170 // Change the cursor to the "hands" cursor typically used by web browsers,
171 // if there is a link in the given position.
172 static void set_cursor_if_appropriate (GtkTextView *view, gint wx, gint wy)
173 {
174  if (wx == -1) {
175  GtkWidget *widget = GTK_WIDGET (view);
176  GtkAllocation alloc;
177  gtk_widget_get_allocation(widget, &alloc);
178 
179  GdkWindow *window = gtk_widget_get_window (widget);
180  GdkDisplay *display = gdk_window_get_display (window);
181 
182  // GdkDeviceManager *device_manager = gdk_display_get_device_manager (display);
183  // GdkDevice *pointer = gdk_device_manager_get_client_pointer (device_manager);
184  GdkSeat *seat = gdk_display_get_default_seat (display);
185  GdkDevice *pointer = gdk_seat_get_pointer (seat);
186 
187  gdk_window_get_device_position (window, pointer, &wx, &wy, NULL);
188 
189  if (wx < 0 || wy < 0 || wx >= alloc.width ||
190  wy >= alloc.height)
191  return;
192  }
193 
194  static gboolean hovering_over_link = FALSE;
195  gboolean hovering = get_link (view, wx, wy) != NULL;
196 
197  if (hovering != hovering_over_link) {
198  hovering_over_link = hovering;
199  YGtkRichText *rtext = YGTK_RICH_TEXT (view);
200  GdkWindow *window = gtk_text_view_get_window (view, GTK_TEXT_WINDOW_TEXT);
201  GdkCursor *cursor = hovering ? rtext->hand_cursor : NULL;
202  gdk_window_set_cursor (window, cursor);
203  }
204 }
205 
206 // Update the cursor image if the pointer moved.
207 static gboolean ygtk_rich_text_motion_notify_event (GtkWidget *widget,
208  GdkEventMotion *event)
209 {
210  set_cursor_if_appropriate (GTK_TEXT_VIEW (widget), event->x, event->y);
211  return TRUE;
212 }
213 
214 static gboolean ygtk_rich_text_draw (GtkWidget *widget, cairo_t *cr)
215 {
216  GtkTextView *text = GTK_TEXT_VIEW (widget);
217  YGtkRichText *rtext = YGTK_RICH_TEXT (widget);
218  GtkAllocation alloc;
219  gtk_widget_get_allocation(widget, &alloc);
220  if (rtext->background_pixbuf) {
221  GdkWindow *window = gtk_text_view_get_window (text, GTK_TEXT_WINDOW_TEXT);
222  if (gtk_cairo_should_draw_window(cr, window)) {
223  int x, y;
224  int width = gdk_pixbuf_get_width (rtext->background_pixbuf);
225  int height = gdk_pixbuf_get_height (rtext->background_pixbuf);
226  gtk_text_view_buffer_to_window_coords (text, GTK_TEXT_WINDOW_TEXT,
227  alloc.width-((2*width)/5), -height/3, &x, &y);
228 
229  gtk_cairo_transform_to_window(cr, widget, window);
230  gdk_cairo_set_source_pixbuf (cr, rtext->background_pixbuf, x, y);
231  cairo_paint (cr);
232  }
233  }
234 
235  gboolean ret;
236  ret = GTK_WIDGET_CLASS (ygtk_rich_text_parent_class)->draw (widget, cr);
237  set_cursor_if_appropriate (text, -1, -1);
238  return ret;
239 }
240 
241 /* Rich Text parsing methods. */
242 
243 typedef struct _HTMLList
244 {
245  gboolean ordered;
246  char enumeration;
247 } HTMLList;
248 
249 static void HTMLList_init (HTMLList *list, gboolean ordered)
250 {
251  list->ordered = ordered;
252  list->enumeration = 1;
253 }
254 
255 typedef struct GRTPTag {
256  GtkTextMark *mark;
257  GtkTextTag *tag;
258 } GRTPTag;
259 typedef struct GRTParseState {
260  GtkTextBuffer *buffer;
261  GtkTextTagTable *tags;
262  GList *htags; // of GRTPTag
263 
264  // Attributes for tags that affect their children
265  gboolean pre_mode;
266  gboolean default_color;
267  int left_margin;
268  GList *html_list; // of HTMLList
269  gboolean closed_block_tag;
270 } GRTParseState;
271 
272 static void GRTParseState_init (GRTParseState *state, GtkTextBuffer *buffer)
273 {
274  state->buffer = buffer;
275  state->pre_mode = FALSE;
276  state->default_color = TRUE;
277  state->left_margin = 0;
278  state->tags = gtk_text_buffer_get_tag_table (buffer);
279  state->html_list = NULL;
280  state->htags = NULL;
281  state->closed_block_tag = FALSE;
282 }
283 
284 static void free_list (GList *list)
285 {
286  GList *i;
287  for (i = g_list_first (list); i; i = i->next)
288  g_free (i->data);
289  g_list_free (list);
290 }
291 
292 static void GRTParseState_free (GRTParseState *state)
293 {
294  // NOTE: some elements might not have been freed because of bad html
295  free_list (state->html_list);
296  free_list (state->htags);
297 }
298 
299 static void insert_li_enumeration (GRTParseState *state, GtkTextIter *iter, gboolean start)
300 {
301  gboolean _start = gtk_widget_get_default_direction() != GTK_TEXT_DIR_RTL;
302  if (_start != start) return;
303 
304  HTMLList *front_list;
305  if (state->html_list && (front_list = g_list_first (state->html_list)->data) &&
306  (front_list->ordered)) {
307  const gchar *form = start ? "%d. " : " .%d";
308  gchar *str = g_strdup_printf (form, front_list->enumeration++);
309  gtk_text_buffer_insert (state->buffer, iter, str, -1);
310  g_free (str);
311  }
312  else { // \\u25cf for bigger bullets
313  const char *str = start ? "\u2022 " : " \u2022";
314  gtk_text_buffer_insert (state->buffer, iter, str, -1);
315  }
316 }
317 
318 // Tags to support: <p> and not </p>:
319 // either 'elide' \ns (turn off with <pre> I guess
320 static void
321 rt_start_element (GMarkupParseContext *context,
322  const gchar *element_name,
323  const gchar **attribute_names,
324  const gchar **attribute_values,
325  gpointer user_data,
326  GError **error)
327 { // Called for open tags <foo bar="baz">
328  GRTParseState *state = (GRTParseState*) user_data;
329  GRTPTag *tag = g_malloc (sizeof (GRTPTag));
330  GtkTextIter iter;
331  gtk_text_buffer_get_end_iter (state->buffer, &iter);
332  tag->mark = gtk_text_buffer_create_mark (state->buffer, NULL, &iter, TRUE);
333 
334  if (!g_ascii_strcasecmp (element_name, "pre"))
335  state->pre_mode = TRUE;
336 
337  // Check if this is a block tag
338  if (isBlockTag (element_name)) {
339  // make sure this opens a new paragraph
340  if (state->html_list && gtk_text_iter_get_line_offset (&iter) < 6)
341  ; // on a list, there is the "1. " in the buffer so we have to do this
342  else if (!gtk_text_iter_starts_line (&iter)) {
343  gtk_text_buffer_insert (state->buffer, &iter, "\n", -1);
344  gtk_text_buffer_get_end_iter (state->buffer, &iter);
345  }
346  }
347  state->closed_block_tag = FALSE;
348 
349  char *lower = g_ascii_strdown (element_name, -1);
350  tag->tag = gtk_text_tag_table_lookup (state->tags, lower);
351 
352  // Special tags that must be inserted manually
353  if (!tag->tag) {
354  if (!g_ascii_strcasecmp (element_name, "font")) {
355  int i;
356  for (i = 0; attribute_names[i]; i++) {
357  const char *attrb = attribute_names[i];
358  const char *value = attribute_values[i];
359  if (!g_ascii_strcasecmp (attrb, "color")) {
360  tag->tag = gtk_text_buffer_create_tag (state->buffer, NULL,
361  "foreground", value, NULL);
362  state->default_color = FALSE;
363  }
364  // not from html -- we use this internally
365  else if (!g_ascii_strcasecmp (attrb, "bgcolor")) {
366  tag->tag = gtk_text_buffer_create_tag (state->buffer, NULL,
367  "background", value, NULL);
368  }
369  else
370  g_warning ("Unknown font attribute: '%s'", attrb);
371  }
372  }
373  else if (!g_ascii_strcasecmp (element_name, "a")) {
374  if (attribute_names[0] &&
375  !g_ascii_strcasecmp (attribute_names[0], "href")) {
376  tag->tag = gtk_text_buffer_create_tag (state->buffer, NULL,
377  "underline", PANGO_UNDERLINE_SINGLE, NULL);
378  if (state->default_color)
379  g_object_set (tag->tag, "foreground-gdk", &link_color, NULL);
380  g_object_set_data (G_OBJECT (tag->tag), "link", g_strdup (attribute_values[0]));
381  }
382  else if (attribute_names[0] &&
383  !g_ascii_strcasecmp (attribute_names[0], "name")) {
384  gtk_text_buffer_create_mark (state->buffer, attribute_values[0], &iter, TRUE);
385  }
386  else
387  g_warning ("Unknown a attribute: '%s'", attribute_names[0]);
388  }
389  else if (!g_ascii_strcasecmp (element_name, "li"))
390  insert_li_enumeration (state, &iter, TRUE);
391  // Tags that affect the margin
392  else if (!g_ascii_strcasecmp (element_name, "ul") ||
393  !g_ascii_strcasecmp (element_name, "ol")) {
394  HTMLList *list = g_malloc (sizeof (HTMLList));
395  HTMLList_init (list, !g_ascii_strcasecmp (element_name, "ol"));
396  state->html_list = g_list_append (state->html_list, list);
397  }
398  else if (!g_ascii_strcasecmp (element_name, "img")) {
399  if (attribute_names[0] &&
400  !g_ascii_strcasecmp (attribute_names[0], "src")) {
401  const char *filename = attribute_values[0];
402  if (filename) {
403  GdkPixbuf *pixbuf;
404  if (filename[0] == '/')
405  pixbuf = gdk_pixbuf_new_from_file (filename, NULL);
406  else
407  pixbuf = gtk_icon_theme_load_icon (gtk_icon_theme_get_default(),
408  filename, 64, 0, NULL);
409  if (pixbuf) {
410  gtk_text_buffer_insert_pixbuf (state->buffer, &iter, pixbuf);
411  g_object_unref (G_OBJECT (pixbuf));
412  }
413  }
414  }
415  else
416  g_warning ("Unknown img attribute: '%s'", attribute_names[0]);
417  }
418  // tags like <br/>, GMarkup will pass them through the end
419  // tag callback too, so we'll deal with them there
420  else if (!g_ascii_strcasecmp (element_name, "br")) ;
421  else if (!g_ascii_strcasecmp (element_name, "hr")) ;
422 
423  else
424  {
425  if (isBlockTag (element_name))
426  ;
427  else
428  g_warning ("Unknown tag '%s'", element_name);
429  }
430  }
431  else if (attribute_names[0]) { // tags that may have extra attributes
432  if (!g_ascii_strcasecmp (element_name, "p")) {
433  // not from html (basic html only supports background color in
434  // tables), but we use this internally
435  if (!g_ascii_strcasecmp (attribute_names[0], "bgcolor"))
436  tag->tag = gtk_text_buffer_create_tag (state->buffer, NULL,
437  "paragraph-background", attribute_values[0], NULL);
438  else
439  g_warning ("Unknown p attribute: '%s'", attribute_names[0]);
440  }
441  }
442 
443  if (!tag->tag && isIdentTag (element_name)) {
444  state->left_margin += IDENT_MARGIN;
445 
446  gboolean reverse = gtk_widget_get_default_direction() == GTK_TEXT_DIR_RTL;
447  const char *margin = reverse ? "right-margin" : "left-margin";
448  tag->tag = gtk_text_buffer_create_tag (state->buffer, NULL,
449  margin, state->left_margin, NULL);
450  }
451 
452  g_free (lower);
453  state->htags = g_list_append (state->htags, tag);
454 }
455 
456 #include "hr.xpm"
457 
458 static void
459 rt_end_element (GMarkupParseContext *context,
460  const gchar *element_name,
461  gpointer user_data,
462  GError **error)
463 { // Called for close tags </foo>
464  GRTParseState *state = (GRTParseState*) user_data;
465 
466  if (g_list_length (state->htags) == 0) {
467  g_warning ("Urgh - empty tag queue closing '%s'", element_name);
468  return;
469  }
470 
471  g_return_if_fail (state->htags != NULL);
472  GRTPTag *tag = g_list_last (state->htags)->data;
473  state->htags = g_list_remove (state->htags, tag);
474 
475  GtkTextIter start, end;
476  gtk_text_buffer_get_iter_at_mark (state->buffer, &start, tag->mark);
477  gtk_text_buffer_get_end_iter (state->buffer, &end);
478 
479  gint appendLines = 0;
480 
481  if (isIdentTag (element_name))
482  state->left_margin -= IDENT_MARGIN;
483 
484  if (!g_ascii_strcasecmp (element_name, "ul") ||
485  !g_ascii_strcasecmp (element_name, "ol")) {
486  HTMLList *last_list = g_list_last (state->html_list)->data;
487  state->html_list = g_list_remove (state->html_list, last_list);
488  g_free (last_list);
489  }
490  else if (!g_ascii_strcasecmp (element_name, "font"))
491  state->default_color = TRUE;
492 
493  else if (!g_ascii_strcasecmp (element_name, "pre"))
494  state->pre_mode = FALSE;
495 
496  else if (!g_ascii_strcasecmp (element_name, "hr")) {
497  GdkPixbuf *pixbuf = gdk_pixbuf_new_from_xpm_data (hr_xpm);
498  gtk_text_buffer_insert_pixbuf (state->buffer, &end, pixbuf);
499  g_object_unref (pixbuf);
500  gtk_text_buffer_get_iter_at_mark (state->buffer, &start, tag->mark);
501  gtk_text_buffer_get_end_iter (state->buffer, &end);
502  gtk_text_buffer_apply_tag_by_name (state->buffer, "center", &start, &end);
503  appendLines = 1;
504  }
505  else if (!g_ascii_strcasecmp (element_name, "li"))
506  insert_li_enumeration (state, &end, FALSE);
507 
508  if (isBlockTag (element_name) || !g_ascii_strcasecmp (element_name, "br")) {
509  appendLines = 1;
510  if (isBlockTag (element_name) && gtk_text_iter_starts_line (&end))
511  appendLines = 0;
512  state->closed_block_tag = TRUE;
513  }
514  else
515  state->closed_block_tag = FALSE;
516 
517  if (appendLines) {
518  gtk_text_buffer_insert (state->buffer, &end,
519  appendLines == 1 ? "\n" : "\n\n", -1);
520  gtk_text_buffer_get_iter_at_mark (state->buffer, &start, tag->mark);
521  gtk_text_buffer_get_end_iter (state->buffer, &end);
522  }
523 
524  if (tag->tag)
525  gtk_text_buffer_apply_tag (state->buffer, tag->tag, &start, &end);
526 
527  gtk_text_buffer_delete_mark (state->buffer, tag->mark);
528  g_free (tag);
529 }
530 
531 static void
532 rt_text (GMarkupParseContext *context,
533  const gchar *text,
534  gsize text_len,
535  gpointer user_data,
536  GError **error)
537 { // Called for character data, NB. text NOT nul-terminated
538  GRTParseState *state = (GRTParseState*) user_data;
539  GtkTextIter start, end;
540  gtk_text_buffer_get_end_iter (state->buffer, &start);
541  if (state->pre_mode)
542  gtk_text_buffer_insert_with_tags (state->buffer, &start,
543  text, text_len, NULL, NULL);
544  else {
545  gboolean rtl = gtk_widget_get_default_direction() == GTK_TEXT_DIR_RTL;
546 
547  int i = 0;
548  if (state->closed_block_tag) {
549  for (; i < text_len; i++)
550  if (!g_ascii_isspace (text[i]))
551  break;
552  }
553 
554  // hack: for right-to-left languages, change "Device:" to ":Device" (bug 581800)
555  if (rtl && text[text_len-1] == ':') {
556  gtk_text_buffer_insert (state->buffer, &start, ":", 1);
557  text_len--;
558  }
559 
560  gtk_text_buffer_insert (state->buffer, &start, text+i, text_len-i);
561  }
562  gtk_text_buffer_get_end_iter (state->buffer, &end);
563 }
564 
565 static void
566 rt_passthrough (GMarkupParseContext *context,
567  const gchar *passthrough_text,
568  gsize text_len,
569  gpointer user_data,
570  GError **error)
571 {
572  // ignore comments etc.
573 }
574 
575 static void
576 rt_error (GMarkupParseContext *context,
577  GError *error,
578  gpointer user_data)
579 {
580 }
581 
582 static GMarkupParser rt_parser = {
583  rt_start_element,
584  rt_end_element,
585  rt_text,
586  rt_passthrough,
587  rt_error
588 };
589 
590 GtkWidget *ygtk_rich_text_new (void)
591 { return g_object_new (YGTK_TYPE_RICH_TEXT, NULL); }
592 
593 static void ygtk_rich_text_set_rtl (YGtkRichText *rtext)
594 {
595  GtkTextView *view = GTK_TEXT_VIEW (rtext);
596  GtkTextBuffer *buffer = gtk_text_view_get_buffer (view);
597  GtkTextIter iter;
598  gtk_text_buffer_get_start_iter (buffer, &iter);
599  do {
600  GtkTextIter end = iter;
601  if (!gtk_text_iter_forward_line (&end))
602  gtk_text_buffer_get_end_iter (buffer, &end);
603 
604  gchar *text = gtk_text_iter_get_text (&iter, &end);
605  PangoDirection dir = pango_find_base_dir (text, -1);
606  if (dir == PANGO_DIRECTION_LTR)
607  gtk_text_buffer_apply_tag_by_name (buffer, "right", &iter, &end);
608 
609  iter = end;
610  } while (!gtk_text_iter_is_end (&iter));
611 }
612 
613 void ygtk_rich_text_set_plain_text (YGtkRichText* rtext, const gchar* text)
614 {
615  GtkTextBuffer *buffer = gtk_text_view_get_buffer (GTK_TEXT_VIEW (rtext));
616  gtk_text_buffer_set_text (buffer, text, -1);
617 }
618 
619 void ygtk_rich_text_set_text (YGtkRichText* rtext, const gchar* text)
620 {
621  GtkTextBuffer *buffer = gtk_text_view_get_buffer (GTK_TEXT_VIEW (rtext));
622  gtk_text_buffer_set_text (buffer, "", 0); // remove any existing text
623 
624  GRTParseState state;
625  GRTParseState_init (&state, buffer);
626 
627  GMarkupParseContext *ctx;
628  ctx = g_markup_parse_context_new (&rt_parser, (GMarkupParseFlags)0, &state, NULL);
629 
630  char *xml = ygutils_convert_to_xhtml (text);
631  GError *error = NULL;
632  if (!g_markup_parse_context_parse (ctx, xml, -1, &error)) {
633  g_warning ("Markup parse error '%s'", error ? error->message : "Unknown");
634  }
635  g_free (xml);
636 
637  g_markup_parse_context_free (ctx);
638  GRTParseState_free (&state);
639 
640  // remove last empty line, if any
641  GtkTextIter end_it, before_end_it;
642  gtk_text_buffer_get_end_iter (buffer, &end_it);
643  before_end_it = end_it;
644  if (gtk_text_iter_backward_char (&before_end_it) &&
645  gtk_text_iter_get_char (&before_end_it) == '\n')
646  gtk_text_buffer_delete (buffer, &before_end_it, &end_it);
647 
648  // GtkTextView does LTR and RTL depending on the paragraph; we want
649  // to change that behavior so it's RTL to the all thing for Arabic
650  if (gtk_widget_get_default_direction() == GTK_TEXT_DIR_RTL)
651  ygtk_rich_text_set_rtl (rtext);
652 }
653 
654 /* gtk_text_iter_forward_search() is case-sensitive so we roll our own.
655  The idea is to keep use get_text and strstr there, but to be more
656  efficient we check per line. */
657 static gboolean ygtk_rich_text_forward_search (const GtkTextIter *begin,
658  const GtkTextIter *end, const gchar *_key, GtkTextIter *match_start,
659  GtkTextIter *match_end)
660 {
661  if (*_key == 0)
662  return FALSE;
663 
664  /* gtk_text_iter_get_char() returns a gunichar (ucs4 coding), so we
665  convert the given string (which is utf-8, like anyhting in gtk+) */
666  gunichar *key = g_utf8_to_ucs4 (_key, -1, NULL, NULL, NULL);
667  if (!key) // conversion error -- should not happen
668  return FALSE;
669 
670  // convert key to lower case, to avoid work later
671  gunichar *k;
672  for (k = key; *k; k++)
673  *k = g_unichar_tolower (*k);
674 
675  GtkTextIter iter = *begin, iiter;
676  while (!gtk_text_iter_is_end (&iter) && gtk_text_iter_compare (&iter, end) <= 0) {
677  iiter = iter;
678  for (k = key; *k == g_unichar_tolower (gtk_text_iter_get_char (&iiter)) && (*k);
679  k++, gtk_text_iter_forward_char (&iiter))
680  ;
681  if (!*k) {
682  *match_start = iter;
683  *match_end = iiter;
684  return TRUE;
685  }
686  gtk_text_iter_forward_char (&iter);
687  }
688  return FALSE;
689 }
690 
691 gboolean ygtk_rich_text_mark_text (YGtkRichText *rtext, const gchar *text)
692 {
693  GtkTextBuffer *buffer = gtk_text_view_get_buffer (GTK_TEXT_VIEW (rtext));
694  GtkTextIter iter, end, match_start, match_end;
695 
696  gtk_text_buffer_get_bounds (buffer, &iter, &end);
697  gtk_text_buffer_remove_tag_by_name (buffer, "keyword", &iter, &end);
698 
699  gtk_text_buffer_select_range (buffer, &iter, &iter); // unselect text
700  if (!text || *text == '\0')
701  return TRUE;
702 
703  gboolean found = FALSE;
704  while (ygtk_rich_text_forward_search (&iter, &end, text,
705  &match_start, &match_end)) {
706  found = TRUE;
707  gtk_text_buffer_apply_tag_by_name (buffer, "keyword", &match_start, &match_end);
708  iter = match_end;
709  gtk_text_iter_forward_char (&iter);
710  }
711  return found;
712 }
713 
714 gboolean ygtk_rich_text_forward_mark (YGtkRichText *rtext, const gchar *text)
715 {
716  GtkTextIter start_iter, end_iter;
717  GtkTextBuffer *buffer = gtk_text_view_get_buffer (GTK_TEXT_VIEW (rtext));
718  gtk_text_buffer_get_iter_at_mark (buffer, &start_iter,
719  gtk_text_buffer_get_selection_bound (buffer));
720  gtk_text_buffer_get_end_iter (buffer, &end_iter);
721 
722  gboolean found;
723  found = ygtk_rich_text_forward_search (&start_iter, &end_iter, text,
724  &start_iter, &end_iter);
725  if (!found) {
726  gtk_text_buffer_get_start_iter (buffer, &start_iter);
727  found = ygtk_rich_text_forward_search (&start_iter, &end_iter, text,
728  &start_iter, &end_iter);
729  }
730 
731  if (found) {
732  gtk_text_view_scroll_to_iter (GTK_TEXT_VIEW (rtext), &start_iter, 0.10,
733  FALSE, 0, 0);
734  gtk_text_buffer_select_range (buffer, &start_iter, &end_iter);
735  return TRUE;
736  }
737  return FALSE;
738 }
739 
740 void ygtk_rich_text_set_background (YGtkRichText *rtext, GdkPixbuf *pixbuf)
741 {
742  if (rtext->background_pixbuf)
743  g_object_unref (G_OBJECT (rtext->background_pixbuf));
744  rtext->background_pixbuf = pixbuf;
745  if (pixbuf)
746  g_object_ref (G_OBJECT (pixbuf));
747 }
748 
749 static void ygtk_rich_text_class_init (YGtkRichTextClass *klass)
750 {
751  GtkWidgetClass *gtkwidget_class = GTK_WIDGET_CLASS (klass);
752  gtkwidget_class->motion_notify_event = ygtk_rich_text_motion_notify_event;
753  gtkwidget_class->draw = ygtk_rich_text_draw;
754  gtkwidget_class->destroy = ygtk_rich_text_destroy;
755 
756  link_clicked_signal = g_signal_new ("link-clicked",
757  G_TYPE_FROM_CLASS (G_OBJECT_CLASS (klass)), G_SIGNAL_RUN_LAST,
758  G_STRUCT_OFFSET (YGtkRichTextClass, link_clicked), NULL, NULL,
759  g_cclosure_marshal_VOID__STRING, G_TYPE_NONE, 1, G_TYPE_STRING);
760 }
761