libyui-gtk  2.44.5
 All Classes Functions
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  GdkDeviceManager *device_manager = gdk_display_get_device_manager (display);
182  GdkDevice *pointer = gdk_device_manager_get_client_pointer (device_manager);
183 
184  gdk_window_get_device_position (window, pointer, &wx, &wy, NULL);
185 
186  if (wx < 0 || wy < 0 || wx >= alloc.width ||
187  wy >= alloc.height)
188  return;
189  }
190 
191  static gboolean hovering_over_link = FALSE;
192  gboolean hovering = get_link (view, wx, wy) != NULL;
193 
194  if (hovering != hovering_over_link) {
195  hovering_over_link = hovering;
196  YGtkRichText *rtext = YGTK_RICH_TEXT (view);
197  GdkWindow *window = gtk_text_view_get_window (view, GTK_TEXT_WINDOW_TEXT);
198  GdkCursor *cursor = hovering ? rtext->hand_cursor : NULL;
199  gdk_window_set_cursor (window, cursor);
200  }
201 }
202 
203 // Update the cursor image if the pointer moved.
204 static gboolean ygtk_rich_text_motion_notify_event (GtkWidget *widget,
205  GdkEventMotion *event)
206 {
207  set_cursor_if_appropriate (GTK_TEXT_VIEW (widget), event->x, event->y);
208  return TRUE;
209 }
210 
211 static gboolean ygtk_rich_text_draw (GtkWidget *widget, cairo_t *cr)
212 {
213  GtkTextView *text = GTK_TEXT_VIEW (widget);
214  YGtkRichText *rtext = YGTK_RICH_TEXT (widget);
215  GtkAllocation alloc;
216  gtk_widget_get_allocation(widget, &alloc);
217  if (rtext->background_pixbuf) {
218  GdkWindow *window = gtk_text_view_get_window (text, GTK_TEXT_WINDOW_TEXT);
219  if (gtk_cairo_should_draw_window(cr, window)) {
220  int x, y;
221  int width = gdk_pixbuf_get_width (rtext->background_pixbuf);
222  int height = gdk_pixbuf_get_height (rtext->background_pixbuf);
223  gtk_text_view_buffer_to_window_coords (text, GTK_TEXT_WINDOW_TEXT,
224  alloc.width-((2*width)/5), -height/3, &x, &y);
225 
226  gtk_cairo_transform_to_window(cr, widget, window);
227  gdk_cairo_set_source_pixbuf (cr, rtext->background_pixbuf, x, y);
228  cairo_paint (cr);
229  }
230  }
231 
232  gboolean ret;
233  ret = GTK_WIDGET_CLASS (ygtk_rich_text_parent_class)->draw (widget, cr);
234  set_cursor_if_appropriate (text, -1, -1);
235  return ret;
236 }
237 
238 /* Rich Text parsing methods. */
239 
240 typedef struct _HTMLList
241 {
242  gboolean ordered;
243  char enumeration;
244 } HTMLList;
245 
246 static void HTMLList_init (HTMLList *list, gboolean ordered)
247 {
248  list->ordered = ordered;
249  list->enumeration = 1;
250 }
251 
252 typedef struct GRTPTag {
253  GtkTextMark *mark;
254  GtkTextTag *tag;
255 } GRTPTag;
256 typedef struct GRTParseState {
257  GtkTextBuffer *buffer;
258  GtkTextTagTable *tags;
259  GList *htags; // of GRTPTag
260 
261  // Attributes for tags that affect their children
262  gboolean pre_mode;
263  gboolean default_color;
264  int left_margin;
265  GList *html_list; // of HTMLList
266  gboolean closed_block_tag;
267 } GRTParseState;
268 
269 static void GRTParseState_init (GRTParseState *state, GtkTextBuffer *buffer)
270 {
271  state->buffer = buffer;
272  state->pre_mode = FALSE;
273  state->default_color = TRUE;
274  state->left_margin = 0;
275  state->tags = gtk_text_buffer_get_tag_table (buffer);
276  state->html_list = NULL;
277  state->htags = NULL;
278  state->closed_block_tag = FALSE;
279 }
280 
281 static void free_list (GList *list)
282 {
283  GList *i;
284  for (i = g_list_first (list); i; i = i->next)
285  g_free (i->data);
286  g_list_free (list);
287 }
288 
289 static void GRTParseState_free (GRTParseState *state)
290 {
291  // NOTE: some elements might not have been freed because of bad html
292  free_list (state->html_list);
293  free_list (state->htags);
294 }
295 
296 static void insert_li_enumeration (GRTParseState *state, GtkTextIter *iter, gboolean start)
297 {
298  gboolean _start = gtk_widget_get_default_direction() != GTK_TEXT_DIR_RTL;
299  if (_start != start) return;
300 
301  HTMLList *front_list;
302  if (state->html_list && (front_list = g_list_first (state->html_list)->data) &&
303  (front_list->ordered)) {
304  const gchar *form = start ? "%d. " : " .%d";
305  gchar *str = g_strdup_printf (form, front_list->enumeration++);
306  gtk_text_buffer_insert (state->buffer, iter, str, -1);
307  g_free (str);
308  }
309  else { // \\u25cf for bigger bullets
310  const char *str = start ? "\u2022 " : " \u2022";
311  gtk_text_buffer_insert (state->buffer, iter, str, -1);
312  }
313 }
314 
315 // Tags to support: <p> and not </p>:
316 // either 'elide' \ns (turn off with <pre> I guess
317 static void
318 rt_start_element (GMarkupParseContext *context,
319  const gchar *element_name,
320  const gchar **attribute_names,
321  const gchar **attribute_values,
322  gpointer user_data,
323  GError **error)
324 { // Called for open tags <foo bar="baz">
325  GRTParseState *state = (GRTParseState*) user_data;
326  GRTPTag *tag = g_malloc (sizeof (GRTPTag));
327  GtkTextIter iter;
328  gtk_text_buffer_get_end_iter (state->buffer, &iter);
329  tag->mark = gtk_text_buffer_create_mark (state->buffer, NULL, &iter, TRUE);
330 
331  if (!g_ascii_strcasecmp (element_name, "pre"))
332  state->pre_mode = TRUE;
333 
334  // Check if this is a block tag
335  if (isBlockTag (element_name)) {
336  // make sure this opens a new paragraph
337  if (state->html_list && gtk_text_iter_get_line_offset (&iter) < 6)
338  ; // on a list, there is the "1. " in the buffer so we have to do this
339  else if (!gtk_text_iter_starts_line (&iter)) {
340  gtk_text_buffer_insert (state->buffer, &iter, "\n", -1);
341  gtk_text_buffer_get_end_iter (state->buffer, &iter);
342  }
343  }
344  state->closed_block_tag = FALSE;
345 
346  char *lower = g_ascii_strdown (element_name, -1);
347  tag->tag = gtk_text_tag_table_lookup (state->tags, lower);
348 
349  // Special tags that must be inserted manually
350  if (!tag->tag) {
351  if (!g_ascii_strcasecmp (element_name, "font")) {
352  int i;
353  for (i = 0; attribute_names[i]; i++) {
354  const char *attrb = attribute_names[i];
355  const char *value = attribute_values[i];
356  if (!g_ascii_strcasecmp (attrb, "color")) {
357  tag->tag = gtk_text_buffer_create_tag (state->buffer, NULL,
358  "foreground", value, NULL);
359  state->default_color = FALSE;
360  }
361  // not from html -- we use this internally
362  else if (!g_ascii_strcasecmp (attrb, "bgcolor")) {
363  tag->tag = gtk_text_buffer_create_tag (state->buffer, NULL,
364  "background", value, NULL);
365  }
366  else
367  g_warning ("Unknown font attribute: '%s'", attrb);
368  }
369  }
370  else if (!g_ascii_strcasecmp (element_name, "a")) {
371  if (attribute_names[0] &&
372  !g_ascii_strcasecmp (attribute_names[0], "href")) {
373  tag->tag = gtk_text_buffer_create_tag (state->buffer, NULL,
374  "underline", PANGO_UNDERLINE_SINGLE, NULL);
375  if (state->default_color)
376  g_object_set (tag->tag, "foreground-gdk", &link_color, NULL);
377  g_object_set_data (G_OBJECT (tag->tag), "link", g_strdup (attribute_values[0]));
378  }
379  else if (attribute_names[0] &&
380  !g_ascii_strcasecmp (attribute_names[0], "name")) {
381  gtk_text_buffer_create_mark (state->buffer, attribute_values[0], &iter, TRUE);
382  }
383  else
384  g_warning ("Unknown a attribute: '%s'", attribute_names[0]);
385  }
386  else if (!g_ascii_strcasecmp (element_name, "li"))
387  insert_li_enumeration (state, &iter, TRUE);
388  // Tags that affect the margin
389  else if (!g_ascii_strcasecmp (element_name, "ul") ||
390  !g_ascii_strcasecmp (element_name, "ol")) {
391  HTMLList *list = g_malloc (sizeof (HTMLList));
392  HTMLList_init (list, !g_ascii_strcasecmp (element_name, "ol"));
393  state->html_list = g_list_append (state->html_list, list);
394  }
395  else if (!g_ascii_strcasecmp (element_name, "img")) {
396  if (attribute_names[0] &&
397  !g_ascii_strcasecmp (attribute_names[0], "src")) {
398  const char *filename = attribute_values[0];
399  if (filename) {
400  GdkPixbuf *pixbuf;
401  if (filename[0] == '/')
402  pixbuf = gdk_pixbuf_new_from_file (filename, NULL);
403  else
404  pixbuf = gtk_icon_theme_load_icon (gtk_icon_theme_get_default(),
405  filename, 64, 0, NULL);
406  if (pixbuf) {
407  gtk_text_buffer_insert_pixbuf (state->buffer, &iter, pixbuf);
408  g_object_unref (G_OBJECT (pixbuf));
409  }
410  }
411  }
412  else
413  g_warning ("Unknown img attribute: '%s'", attribute_names[0]);
414  }
415  // tags like <br/>, GMarkup will pass them through the end
416  // tag callback too, so we'll deal with them there
417  else if (!g_ascii_strcasecmp (element_name, "br")) ;
418  else if (!g_ascii_strcasecmp (element_name, "hr")) ;
419 
420  else
421  {
422  if (isBlockTag (element_name))
423  ;
424  else
425  g_warning ("Unknown tag '%s'", element_name);
426  }
427  }
428  else if (attribute_names[0]) { // tags that may have extra attributes
429  if (!g_ascii_strcasecmp (element_name, "p")) {
430  // not from html (basic html only supports background color in
431  // tables), but we use this internally
432  if (!g_ascii_strcasecmp (attribute_names[0], "bgcolor"))
433  tag->tag = gtk_text_buffer_create_tag (state->buffer, NULL,
434  "paragraph-background", attribute_values[0], NULL);
435  else
436  g_warning ("Unknown p attribute: '%s'", attribute_names[0]);
437  }
438  }
439 
440  if (!tag->tag && isIdentTag (element_name)) {
441  state->left_margin += IDENT_MARGIN;
442 
443  gboolean reverse = gtk_widget_get_default_direction() == GTK_TEXT_DIR_RTL;
444  const char *margin = reverse ? "right-margin" : "left-margin";
445  tag->tag = gtk_text_buffer_create_tag (state->buffer, NULL,
446  margin, state->left_margin, NULL);
447  }
448 
449  g_free (lower);
450  state->htags = g_list_append (state->htags, tag);
451 }
452 
453 #include "hr.xpm"
454 
455 static void
456 rt_end_element (GMarkupParseContext *context,
457  const gchar *element_name,
458  gpointer user_data,
459  GError **error)
460 { // Called for close tags </foo>
461  GRTParseState *state = (GRTParseState*) user_data;
462 
463  if (g_list_length (state->htags) == 0) {
464  g_warning ("Urgh - empty tag queue closing '%s'", element_name);
465  return;
466  }
467 
468  g_return_if_fail (state->htags != NULL);
469  GRTPTag *tag = g_list_last (state->htags)->data;
470  state->htags = g_list_remove (state->htags, tag);
471 
472  GtkTextIter start, end;
473  gtk_text_buffer_get_iter_at_mark (state->buffer, &start, tag->mark);
474  gtk_text_buffer_get_end_iter (state->buffer, &end);
475 
476  gint appendLines = 0;
477 
478  if (isIdentTag (element_name))
479  state->left_margin -= IDENT_MARGIN;
480 
481  if (!g_ascii_strcasecmp (element_name, "ul") ||
482  !g_ascii_strcasecmp (element_name, "ol")) {
483  HTMLList *last_list = g_list_last (state->html_list)->data;
484  state->html_list = g_list_remove (state->html_list, last_list);
485  g_free (last_list);
486  }
487  else if (!g_ascii_strcasecmp (element_name, "font"))
488  state->default_color = TRUE;
489 
490  else if (!g_ascii_strcasecmp (element_name, "pre"))
491  state->pre_mode = FALSE;
492 
493  else if (!g_ascii_strcasecmp (element_name, "hr")) {
494  GdkPixbuf *pixbuf = gdk_pixbuf_new_from_xpm_data (hr_xpm);
495  gtk_text_buffer_insert_pixbuf (state->buffer, &end, pixbuf);
496  g_object_unref (pixbuf);
497  gtk_text_buffer_get_iter_at_mark (state->buffer, &start, tag->mark);
498  gtk_text_buffer_get_end_iter (state->buffer, &end);
499  gtk_text_buffer_apply_tag_by_name (state->buffer, "center", &start, &end);
500  appendLines = 1;
501  }
502  else if (!g_ascii_strcasecmp (element_name, "li"))
503  insert_li_enumeration (state, &end, FALSE);
504 
505  if (isBlockTag (element_name) || !g_ascii_strcasecmp (element_name, "br")) {
506  appendLines = 1;
507  if (isBlockTag (element_name) && gtk_text_iter_starts_line (&end))
508  appendLines = 0;
509  state->closed_block_tag = TRUE;
510  }
511  else
512  state->closed_block_tag = FALSE;
513 
514  if (appendLines) {
515  gtk_text_buffer_insert (state->buffer, &end,
516  appendLines == 1 ? "\n" : "\n\n", -1);
517  gtk_text_buffer_get_iter_at_mark (state->buffer, &start, tag->mark);
518  gtk_text_buffer_get_end_iter (state->buffer, &end);
519  }
520 
521  if (tag->tag)
522  gtk_text_buffer_apply_tag (state->buffer, tag->tag, &start, &end);
523 
524  gtk_text_buffer_delete_mark (state->buffer, tag->mark);
525  g_free (tag);
526 }
527 
528 static void
529 rt_text (GMarkupParseContext *context,
530  const gchar *text,
531  gsize text_len,
532  gpointer user_data,
533  GError **error)
534 { // Called for character data, NB. text NOT nul-terminated
535  GRTParseState *state = (GRTParseState*) user_data;
536  GtkTextIter start, end;
537  gtk_text_buffer_get_end_iter (state->buffer, &start);
538  if (state->pre_mode)
539  gtk_text_buffer_insert_with_tags (state->buffer, &start,
540  text, text_len, NULL, NULL);
541  else {
542  gboolean rtl = gtk_widget_get_default_direction() == GTK_TEXT_DIR_RTL;
543 
544  int i = 0;
545  if (state->closed_block_tag) {
546  for (; i < text_len; i++)
547  if (!g_ascii_isspace (text[i]))
548  break;
549  }
550 
551  // hack: for right-to-left languages, change "Device:" to ":Device" (bug 581800)
552  if (rtl && text[text_len-1] == ':') {
553  gtk_text_buffer_insert (state->buffer, &start, ":", 1);
554  text_len--;
555  }
556 
557  gtk_text_buffer_insert (state->buffer, &start, text+i, text_len-i);
558  }
559  gtk_text_buffer_get_end_iter (state->buffer, &end);
560 }
561 
562 static void
563 rt_passthrough (GMarkupParseContext *context,
564  const gchar *passthrough_text,
565  gsize text_len,
566  gpointer user_data,
567  GError **error)
568 {
569  // ignore comments etc.
570 }
571 
572 static void
573 rt_error (GMarkupParseContext *context,
574  GError *error,
575  gpointer user_data)
576 {
577 }
578 
579 static GMarkupParser rt_parser = {
580  rt_start_element,
581  rt_end_element,
582  rt_text,
583  rt_passthrough,
584  rt_error
585 };
586 
587 GtkWidget *ygtk_rich_text_new (void)
588 { return g_object_new (YGTK_TYPE_RICH_TEXT, NULL); }
589 
590 static void ygtk_rich_text_set_rtl (YGtkRichText *rtext)
591 {
592  GtkTextView *view = GTK_TEXT_VIEW (rtext);
593  GtkTextBuffer *buffer = gtk_text_view_get_buffer (view);
594  GtkTextIter iter;
595  gtk_text_buffer_get_start_iter (buffer, &iter);
596  do {
597  GtkTextIter end = iter;
598  if (!gtk_text_iter_forward_line (&end))
599  gtk_text_buffer_get_end_iter (buffer, &end);
600 
601  gchar *text = gtk_text_iter_get_text (&iter, &end);
602  PangoDirection dir = pango_find_base_dir (text, -1);
603  if (dir == PANGO_DIRECTION_LTR)
604  gtk_text_buffer_apply_tag_by_name (buffer, "right", &iter, &end);
605 
606  iter = end;
607  } while (!gtk_text_iter_is_end (&iter));
608 }
609 
610 void ygtk_rich_text_set_plain_text (YGtkRichText* rtext, const gchar* text)
611 {
612  GtkTextBuffer *buffer = gtk_text_view_get_buffer (GTK_TEXT_VIEW (rtext));
613  gtk_text_buffer_set_text (buffer, text, -1);
614 }
615 
616 void ygtk_rich_text_set_text (YGtkRichText* rtext, const gchar* text)
617 {
618  GtkTextBuffer *buffer = gtk_text_view_get_buffer (GTK_TEXT_VIEW (rtext));
619  gtk_text_buffer_set_text (buffer, "", 0); // remove any existing text
620 
621  GRTParseState state;
622  GRTParseState_init (&state, buffer);
623 
624  GMarkupParseContext *ctx;
625  ctx = g_markup_parse_context_new (&rt_parser, (GMarkupParseFlags)0, &state, NULL);
626 
627  char *xml = ygutils_convert_to_xhtml (text);
628  GError *error = NULL;
629  if (!g_markup_parse_context_parse (ctx, xml, -1, &error)) {
630  g_warning ("Markup parse error '%s'", error ? error->message : "Unknown");
631  }
632  g_free (xml);
633 
634  g_markup_parse_context_free (ctx);
635  GRTParseState_free (&state);
636 
637  // remove last empty line, if any
638  GtkTextIter end_it, before_end_it;
639  gtk_text_buffer_get_end_iter (buffer, &end_it);
640  before_end_it = end_it;
641  if (gtk_text_iter_backward_char (&before_end_it) &&
642  gtk_text_iter_get_char (&before_end_it) == '\n')
643  gtk_text_buffer_delete (buffer, &before_end_it, &end_it);
644 
645  // GtkTextView does LTR and RTL depending on the paragraph; we want
646  // to change that behavior so it's RTL to the all thing for Arabic
647  if (gtk_widget_get_default_direction() == GTK_TEXT_DIR_RTL)
648  ygtk_rich_text_set_rtl (rtext);
649 }
650 
651 /* gtk_text_iter_forward_search() is case-sensitive so we roll our own.
652  The idea is to keep use get_text and strstr there, but to be more
653  efficient we check per line. */
654 static gboolean ygtk_rich_text_forward_search (const GtkTextIter *begin,
655  const GtkTextIter *end, const gchar *_key, GtkTextIter *match_start,
656  GtkTextIter *match_end)
657 {
658  if (*_key == 0)
659  return FALSE;
660 
661  /* gtk_text_iter_get_char() returns a gunichar (ucs4 coding), so we
662  convert the given string (which is utf-8, like anyhting in gtk+) */
663  gunichar *key = g_utf8_to_ucs4 (_key, -1, NULL, NULL, NULL);
664  if (!key) // conversion error -- should not happen
665  return FALSE;
666 
667  // convert key to lower case, to avoid work later
668  gunichar *k;
669  for (k = key; *k; k++)
670  *k = g_unichar_tolower (*k);
671 
672  GtkTextIter iter = *begin, iiter;
673  while (!gtk_text_iter_is_end (&iter) && gtk_text_iter_compare (&iter, end) <= 0) {
674  iiter = iter;
675  for (k = key; *k == g_unichar_tolower (gtk_text_iter_get_char (&iiter)) && (*k);
676  k++, gtk_text_iter_forward_char (&iiter))
677  ;
678  if (!*k) {
679  *match_start = iter;
680  *match_end = iiter;
681  return TRUE;
682  }
683  gtk_text_iter_forward_char (&iter);
684  }
685  return FALSE;
686 }
687 
688 gboolean ygtk_rich_text_mark_text (YGtkRichText *rtext, const gchar *text)
689 {
690  GtkTextBuffer *buffer = gtk_text_view_get_buffer (GTK_TEXT_VIEW (rtext));
691  GtkTextIter iter, end, match_start, match_end;
692 
693  gtk_text_buffer_get_bounds (buffer, &iter, &end);
694  gtk_text_buffer_remove_tag_by_name (buffer, "keyword", &iter, &end);
695 
696  gtk_text_buffer_select_range (buffer, &iter, &iter); // unselect text
697  if (!text || *text == '\0')
698  return TRUE;
699 
700  gboolean found = FALSE;
701  while (ygtk_rich_text_forward_search (&iter, &end, text,
702  &match_start, &match_end)) {
703  found = TRUE;
704  gtk_text_buffer_apply_tag_by_name (buffer, "keyword", &match_start, &match_end);
705  iter = match_end;
706  gtk_text_iter_forward_char (&iter);
707  }
708  return found;
709 }
710 
711 gboolean ygtk_rich_text_forward_mark (YGtkRichText *rtext, const gchar *text)
712 {
713  GtkTextIter start_iter, end_iter;
714  GtkTextBuffer *buffer = gtk_text_view_get_buffer (GTK_TEXT_VIEW (rtext));
715  gtk_text_buffer_get_iter_at_mark (buffer, &start_iter,
716  gtk_text_buffer_get_selection_bound (buffer));
717  gtk_text_buffer_get_end_iter (buffer, &end_iter);
718 
719  gboolean found;
720  found = ygtk_rich_text_forward_search (&start_iter, &end_iter, text,
721  &start_iter, &end_iter);
722  if (!found) {
723  gtk_text_buffer_get_start_iter (buffer, &start_iter);
724  found = ygtk_rich_text_forward_search (&start_iter, &end_iter, text,
725  &start_iter, &end_iter);
726  }
727 
728  if (found) {
729  gtk_text_view_scroll_to_iter (GTK_TEXT_VIEW (rtext), &start_iter, 0.10,
730  FALSE, 0, 0);
731  gtk_text_buffer_select_range (buffer, &start_iter, &end_iter);
732  return TRUE;
733  }
734  return FALSE;
735 }
736 
737 void ygtk_rich_text_set_background (YGtkRichText *rtext, GdkPixbuf *pixbuf)
738 {
739  if (rtext->background_pixbuf)
740  g_object_unref (G_OBJECT (rtext->background_pixbuf));
741  rtext->background_pixbuf = pixbuf;
742  if (pixbuf)
743  g_object_ref (G_OBJECT (pixbuf));
744 }
745 
746 static void ygtk_rich_text_class_init (YGtkRichTextClass *klass)
747 {
748  GtkWidgetClass *gtkwidget_class = GTK_WIDGET_CLASS (klass);
749  gtkwidget_class->motion_notify_event = ygtk_rich_text_motion_notify_event;
750  gtkwidget_class->draw = ygtk_rich_text_draw;
751  gtkwidget_class->destroy = ygtk_rich_text_destroy;
752 
753  link_clicked_signal = g_signal_new ("link-clicked",
754  G_TYPE_FROM_CLASS (G_OBJECT_CLASS (klass)), G_SIGNAL_RUN_LAST,
755  G_STRUCT_OFFSET (YGtkRichTextClass, link_clicked), NULL, NULL,
756  g_cclosure_marshal_VOID__STRING, G_TYPE_NONE, 1, G_TYPE_STRING);
757 }
758