]> git.0d.be Git - empathy.git/blob - libempathy-gtk/empathy-ui-utils.c
Moved empathy_send_file to EmpathyDispatcher and renamed it. (Jonny Lamb)
[empathy.git] / libempathy-gtk / empathy-ui-utils.c
1 /* -*- Mode: C; tab-width: 8; indent-tabs-mode: t; c-basic-offset: 8 -*- */
2 /*
3  * Copyright (C) 2002-2007 Imendio AB
4  * Copyright (C) 2007-2008 Collabora Ltd.
5  *
6  * This program is free software; you can redistribute it and/or
7  * modify it under the terms of the GNU General Public License as
8  * published by the Free Software Foundation; either version 2 of the
9  * License, or (at your option) any later version.
10  *
11  * This program is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14  * General Public License for more details.
15  *
16  * You should have received a copy of the GNU General Public
17  * License along with this program; if not, write to the
18  * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
19  * Boston, MA 02111-1307, USA.
20  * 
21  * Authors: Mikael Hallendal <micke@imendio.com>
22  *          Richard Hult <richard@imendio.com>
23  *          Martyn Russell <martyn@imendio.com>
24  *          Xavier Claessens <xclaesse@gmail.com>
25  *          Jonny Lamb <jonny.lamb@collabora.co.uk>
26  * 
27  *          Part of this file is copied from GtkSourceView (gtksourceiter.c):
28  *          Paolo Maggi
29  *          Jeroen Zwartepoorte
30  */
31
32 #include <config.h>
33
34 #include <string.h>
35 #include <X11/Xatom.h>
36 #include <gdk/gdkx.h>
37 #include <glib/gi18n.h>
38 #include <gtk/gtk.h>
39 #include <gio/gio.h>
40 #include <glade/glade.h>
41
42 #include <libmissioncontrol/mc-profile.h>
43
44 #include "empathy-ui-utils.h"
45 #include "empathy-images.h"
46
47 #define DEBUG_FLAG EMPATHY_DEBUG_OTHER
48 #include <libempathy/empathy-debug.h>
49 #include <libempathy/empathy-utils.h>
50 #include <libempathy/empathy-dispatcher.h>
51
52 struct SizeData {
53         gint     width;
54         gint     height;
55         gboolean preserve_aspect_ratio;
56 };
57
58 static GladeXML *
59 get_glade_file (const gchar *filename,
60                 const gchar *root,
61                 const gchar *domain,
62                 const gchar *first_required_widget,
63                 va_list      args)
64 {
65         GladeXML   *gui;
66         const char *name;
67         GtkWidget **widget_ptr;
68
69         DEBUG ("Loading glade file %s", filename);
70
71         gui = glade_xml_new (filename, root, domain);
72
73         if (!gui) {
74                 g_warning ("Couldn't find necessary glade file '%s'", filename);
75         }
76
77         for (name = first_required_widget; name; name = va_arg (args, char *)) {
78                 widget_ptr = va_arg (args, void *);
79
80                 *widget_ptr = glade_xml_get_widget (gui, name);
81
82                 if (!*widget_ptr) {
83                         g_warning ("Glade file '%s' is missing widget '%s'.",
84                                    filename, name);
85                         continue;
86                 }
87         }
88
89         return gui;
90 }
91
92 void
93 empathy_glade_get_file_simple (const gchar *filename,
94                               const gchar *root,
95                               const gchar *domain,
96                               const gchar *first_required_widget, ...)
97 {
98         va_list   args;
99         GladeXML *gui;
100
101         va_start (args, first_required_widget);
102
103         gui = get_glade_file (filename,
104                               root,
105                               domain,
106                               first_required_widget,
107                               args);
108
109         va_end (args);
110
111         if (gui) {
112                 g_object_unref (gui);
113         }
114 }
115
116 GladeXML *
117 empathy_glade_get_file (const gchar *filename,
118                        const gchar *root,
119                        const gchar *domain,
120                        const gchar *first_required_widget, ...)
121 {
122         va_list   args;
123         GladeXML *gui;
124
125         va_start (args, first_required_widget);
126
127         gui = get_glade_file (filename,
128                               root,
129                               domain,
130                               first_required_widget,
131                               args);
132
133         va_end (args);
134
135         if (!gui) {
136                 return NULL;
137         }
138
139         return gui;
140 }
141
142 void
143 empathy_glade_connect (GladeXML *gui,
144                       gpointer  user_data,
145                       gchar     *first_widget, ...)
146 {
147         va_list      args;
148         const gchar *name;
149         const gchar *signal;
150         GtkWidget   *widget;
151         gpointer    *callback;
152
153         va_start (args, first_widget);
154
155         for (name = first_widget; name; name = va_arg (args, char *)) {
156                 signal = va_arg (args, void *);
157                 callback = va_arg (args, void *);
158
159                 widget = glade_xml_get_widget (gui, name);
160                 if (!widget) {
161                         g_warning ("Glade file is missing widget '%s', aborting",
162                                    name);
163                         continue;
164                 }
165
166                 g_signal_connect (widget,
167                                   signal,
168                                   G_CALLBACK (callback),
169                                   user_data);
170         }
171
172         va_end (args);
173 }
174
175 void
176 empathy_glade_setup_size_group (GladeXML         *gui,
177                                GtkSizeGroupMode  mode,
178                                gchar            *first_widget, ...)
179 {
180         va_list       args;
181         GtkWidget    *widget;
182         GtkSizeGroup *size_group;
183         const gchar  *name;
184
185         va_start (args, first_widget);
186
187         size_group = gtk_size_group_new (mode);
188
189         for (name = first_widget; name; name = va_arg (args, char *)) {
190                 widget = glade_xml_get_widget (gui, name);
191                 if (!widget) {
192                         g_warning ("Glade file is missing widget '%s'", name);
193                         continue;
194                 }
195
196                 gtk_size_group_add_widget (size_group, widget);
197         }
198
199         g_object_unref (size_group);
200
201         va_end (args);
202 }
203
204 const gchar *
205 empathy_icon_name_from_account (McAccount *account)
206 {
207         McProfile *profile;
208
209         profile = mc_account_get_profile (account);
210
211         return mc_profile_get_icon_name (profile);
212 }
213
214 const gchar *
215 empathy_icon_name_for_presence (McPresence presence)
216 {
217         switch (presence) {
218         case MC_PRESENCE_AVAILABLE:
219                 return EMPATHY_IMAGE_AVAILABLE;
220         case MC_PRESENCE_DO_NOT_DISTURB:
221                 return EMPATHY_IMAGE_BUSY;
222         case MC_PRESENCE_AWAY:
223                 return EMPATHY_IMAGE_AWAY;
224         case MC_PRESENCE_EXTENDED_AWAY:
225                 return EMPATHY_IMAGE_EXT_AWAY;
226         case MC_PRESENCE_HIDDEN:
227                 return EMPATHY_IMAGE_HIDDEN;
228         case MC_PRESENCE_OFFLINE:
229         case MC_PRESENCE_UNSET:
230                 return EMPATHY_IMAGE_OFFLINE;
231         default:
232                 g_assert_not_reached ();
233         }
234
235         return NULL;
236 }
237
238 const gchar *
239 empathy_icon_name_for_contact (EmpathyContact *contact)
240 {
241         McPresence presence;
242
243         g_return_val_if_fail (EMPATHY_IS_CONTACT (contact),
244                               EMPATHY_IMAGE_OFFLINE);
245
246         presence = empathy_contact_get_presence (contact);
247         return empathy_icon_name_for_presence (presence);
248 }
249
250 GdkPixbuf *
251 empathy_pixbuf_from_data (gchar *data,
252                           gsize  data_size)
253 {
254         return empathy_pixbuf_from_data_and_mime (data, data_size, NULL);
255 }
256
257 GdkPixbuf *
258 empathy_pixbuf_from_data_and_mime (gchar  *data,
259                                    gsize   data_size,
260                                    gchar **mime_type)
261 {
262         GdkPixbufLoader *loader;
263         GdkPixbufFormat *format;
264         GdkPixbuf       *pixbuf = NULL;
265         gchar          **mime_types;
266         GError          *error = NULL;
267
268         if (!data) {
269                 return NULL;
270         }
271
272         loader = gdk_pixbuf_loader_new ();
273         if (!gdk_pixbuf_loader_write (loader, data, data_size, &error)) {
274                 DEBUG ("Failed to write to pixbuf loader: %s",
275                         error ? error->message : "No error given");
276                 goto out;
277         }
278         if (!gdk_pixbuf_loader_close (loader, &error)) {
279                 DEBUG ("Failed to close pixbuf loader: %s",
280                         error ? error->message : "No error given");
281                 goto out;
282         }
283
284         pixbuf = gdk_pixbuf_loader_get_pixbuf (loader);
285         if (pixbuf) {
286                 g_object_ref (pixbuf);
287
288                 if (mime_type != NULL) {
289                         format = gdk_pixbuf_loader_get_format (loader);
290                         mime_types = gdk_pixbuf_format_get_mime_types (format);
291
292                         *mime_type = g_strdup (*mime_types);
293                         if (mime_types[1] != NULL) {
294                                 DEBUG ("Loader supports more than one mime "
295                                         "type! Picking the first one, %s",
296                                         *mime_type);
297                         }
298                         g_strfreev (mime_types);
299                 }
300         }
301
302 out:
303         g_clear_error (&error);
304         g_object_unref (loader);
305
306         return pixbuf;
307 }
308
309 static void
310 pixbuf_from_avatar_size_prepared_cb (GdkPixbufLoader *loader,
311                                      int              width,
312                                      int              height,
313                                      struct SizeData *data)
314 {
315         g_return_if_fail (width > 0 && height > 0);
316
317         if (data->preserve_aspect_ratio && (data->width > 0 || data->height > 0)) {
318                 if (width < data->width && height < data->height) {
319                         width = width;
320                         height = height;
321                 }
322
323                 if (data->width < 0) {
324                         width = width * (double) data->height / (gdouble) height;
325                         height = data->height;
326                 } else if (data->height < 0) {
327                         height = height * (double) data->width / (double) width;
328                         width = data->width;
329                 } else if ((double) height * (double) data->width >
330                            (double) width * (double) data->height) {
331                         width = 0.5 + (double) width * (double) data->height / (double) height;
332                         height = data->height;
333                 } else {
334                         height = 0.5 + (double) height * (double) data->width / (double) width;
335                         width = data->width;
336                 }
337         } else {
338                 if (data->width > 0) {
339                         width = data->width;
340                 }
341
342                 if (data->height > 0) {
343                         height = data->height;
344                 }
345         }
346
347         gdk_pixbuf_loader_set_size (loader, width, height);
348 }
349
350 static void
351 empathy_avatar_pixbuf_roundify (GdkPixbuf *pixbuf)
352 {
353         gint width, height, rowstride;
354         guchar *pixels;
355
356         width = gdk_pixbuf_get_width (pixbuf);
357         height = gdk_pixbuf_get_height (pixbuf);
358         rowstride = gdk_pixbuf_get_rowstride (pixbuf);
359         pixels = gdk_pixbuf_get_pixels (pixbuf);
360
361         if (width < 6 || height < 6) {
362                 return;
363         }
364
365         /* Top left */
366         pixels[3] = 0;
367         pixels[7] = 0x80;
368         pixels[11] = 0xC0;
369         pixels[rowstride + 3] = 0x80;
370         pixels[rowstride * 2 + 3] = 0xC0;
371
372         /* Top right */
373         pixels[width * 4 - 1] = 0;
374         pixels[width * 4 - 5] = 0x80;
375         pixels[width * 4 - 9] = 0xC0;
376         pixels[rowstride + (width * 4) - 1] = 0x80;
377         pixels[(2 * rowstride) + (width * 4) - 1] = 0xC0;
378
379         /* Bottom left */
380         pixels[(height - 1) * rowstride + 3] = 0;
381         pixels[(height - 1) * rowstride + 7] = 0x80;
382         pixels[(height - 1) * rowstride + 11] = 0xC0;
383         pixels[(height - 2) * rowstride + 3] = 0x80;
384         pixels[(height - 3) * rowstride + 3] = 0xC0;
385
386         /* Bottom right */
387         pixels[height * rowstride - 1] = 0;
388         pixels[(height - 1) * rowstride - 1] = 0x80;
389         pixels[(height - 2) * rowstride - 1] = 0xC0;
390         pixels[height * rowstride - 5] = 0x80;
391         pixels[height * rowstride - 9] = 0xC0;
392 }
393
394 static gboolean
395 empathy_gdk_pixbuf_is_opaque (GdkPixbuf *pixbuf)
396 {
397         gint width, height, rowstride, i;
398         guchar *pixels;
399         guchar *row;
400
401         width = gdk_pixbuf_get_width (pixbuf);
402         height = gdk_pixbuf_get_height (pixbuf);
403         rowstride = gdk_pixbuf_get_rowstride (pixbuf);
404         pixels = gdk_pixbuf_get_pixels (pixbuf);
405
406         row = pixels;
407         for (i = 3; i < rowstride; i+=4) {
408                 if (row[i] < 0xfe) {
409                         return FALSE;
410                 }
411         }
412
413         for (i = 1; i < height - 1; i++) {
414                 row = pixels + (i*rowstride);
415                 if (row[3] < 0xfe || row[rowstride-1] < 0xfe) {
416                         return FALSE;
417                 }
418         }
419
420         row = pixels + ((height-1) * rowstride);
421         for (i = 3; i < rowstride; i+=4) {
422                 if (row[i] < 0xfe) {
423                         return FALSE;
424                 }
425         }
426
427         return TRUE;
428 }
429
430 GdkPixbuf *
431 empathy_pixbuf_from_avatar_scaled (EmpathyAvatar *avatar,
432                                   gint          width,
433                                   gint          height)
434 {
435         GdkPixbuf        *pixbuf;
436         GdkPixbufLoader  *loader;
437         struct SizeData   data;
438         GError           *error = NULL;
439
440         if (!avatar) {
441                 return NULL;
442         }
443
444         data.width = width;
445         data.height = height;
446         data.preserve_aspect_ratio = TRUE;
447
448         loader = gdk_pixbuf_loader_new ();
449
450         g_signal_connect (loader, "size-prepared",
451                           G_CALLBACK (pixbuf_from_avatar_size_prepared_cb),
452                           &data);
453
454         if (!gdk_pixbuf_loader_write (loader, avatar->data, avatar->len, &error)) {
455                 g_warning ("Couldn't write avatar image:%p with "
456                            "length:%" G_GSIZE_FORMAT " to pixbuf loader: %s",
457                            avatar->data, avatar->len, error->message);
458                 g_error_free (error);
459                 return NULL;
460         }
461
462         gdk_pixbuf_loader_close (loader, NULL);
463
464         pixbuf = gdk_pixbuf_loader_get_pixbuf (loader);
465         if (!gdk_pixbuf_get_has_alpha (pixbuf)) {
466                 GdkPixbuf *rounded_pixbuf;
467
468                 rounded_pixbuf = gdk_pixbuf_new (GDK_COLORSPACE_RGB, TRUE, 8,
469                                                  gdk_pixbuf_get_width (pixbuf),
470                                                  gdk_pixbuf_get_height (pixbuf));
471                 gdk_pixbuf_copy_area (pixbuf, 0, 0,
472                                       gdk_pixbuf_get_width (pixbuf),
473                                       gdk_pixbuf_get_height (pixbuf),
474                                       rounded_pixbuf,
475                                       0, 0);
476                 pixbuf = rounded_pixbuf;
477         } else {
478                 g_object_ref (pixbuf);
479         }
480
481         if (empathy_gdk_pixbuf_is_opaque (pixbuf)) {
482                 empathy_avatar_pixbuf_roundify (pixbuf);
483         }
484
485         g_object_unref (loader);
486
487         return pixbuf;
488 }
489
490 GdkPixbuf *
491 empathy_pixbuf_avatar_from_contact_scaled (EmpathyContact *contact,
492                                           gint           width,
493                                           gint           height)
494 {
495         EmpathyAvatar *avatar;
496
497         g_return_val_if_fail (EMPATHY_IS_CONTACT (contact), NULL);
498
499         avatar = empathy_contact_get_avatar (contact);
500
501         return empathy_pixbuf_from_avatar_scaled (avatar, width, height);
502 }
503
504 GdkPixbuf *
505 empathy_pixbuf_scale_down_if_necessary (GdkPixbuf *pixbuf, gint max_size)
506 {
507         gint      width, height;
508         gdouble   factor;
509
510         width = gdk_pixbuf_get_width (pixbuf);
511         height = gdk_pixbuf_get_height (pixbuf);
512
513         if (width > 0 && (width > max_size || height > max_size)) {
514                 factor = (gdouble) max_size / MAX (width, height);
515
516                 width = width * factor;
517                 height = height * factor;
518
519                 return gdk_pixbuf_scale_simple (pixbuf,
520                                                 width, height,
521                                                 GDK_INTERP_HYPER);
522         }
523
524         return g_object_ref (pixbuf);
525 }
526
527 GdkPixbuf *
528 empathy_pixbuf_from_icon_name (const gchar *icon_name,
529                               GtkIconSize  icon_size)
530 {
531         GtkIconTheme  *theme;
532         GdkPixbuf     *pixbuf = NULL;
533         GError        *error = NULL;
534         gint           w, h;
535         gint           size = 48;
536
537         if (!icon_name) {
538                 return NULL;
539         }
540
541         theme = gtk_icon_theme_get_default ();
542
543         if (gtk_icon_size_lookup (icon_size, &w, &h)) {
544                 size = (w + h) / 2;
545         }
546
547         pixbuf = gtk_icon_theme_load_icon (theme,
548                                            icon_name,
549                                            size,
550                                            0,
551                                            &error);
552         if (error) {
553                 DEBUG ("Error loading icon: %s", error->message);
554                 g_clear_error (&error);
555         }
556
557         return pixbuf;
558 }
559
560 /* Stolen from GtkSourceView, hence the weird intendation. Please keep it like
561  * that to make it easier to apply changes from the original code.
562  */
563 #define GTK_TEXT_UNKNOWN_CHAR 0xFFFC
564
565 /* this function acts like g_utf8_offset_to_pointer() except that if it finds a
566  * decomposable character it consumes the decomposition length from the given
567  * offset.  So it's useful when the offset was calculated for the normalized
568  * version of str, but we need a pointer to str itself. */
569 static const gchar *
570 pointer_from_offset_skipping_decomp (const gchar *str, gint offset)
571 {
572         gchar *casefold, *normal;
573         const gchar *p, *q;
574
575         p = str;
576         while (offset > 0)
577         {
578                 q = g_utf8_next_char (p);
579                 casefold = g_utf8_casefold (p, q - p);
580                 normal = g_utf8_normalize (casefold, -1, G_NORMALIZE_NFD);
581                 offset -= g_utf8_strlen (normal, -1);
582                 g_free (casefold);
583                 g_free (normal);
584                 p = q;
585         }
586         return p;
587 }
588
589 static const gchar *
590 g_utf8_strcasestr (const gchar *haystack, const gchar *needle)
591 {
592         gsize needle_len;
593         gsize haystack_len;
594         const gchar *ret = NULL;
595         gchar *p;
596         gchar *casefold;
597         gchar *caseless_haystack;
598         gint i;
599
600         g_return_val_if_fail (haystack != NULL, NULL);
601         g_return_val_if_fail (needle != NULL, NULL);
602
603         casefold = g_utf8_casefold (haystack, -1);
604         caseless_haystack = g_utf8_normalize (casefold, -1, G_NORMALIZE_NFD);
605         g_free (casefold);
606
607         needle_len = g_utf8_strlen (needle, -1);
608         haystack_len = g_utf8_strlen (caseless_haystack, -1);
609
610         if (needle_len == 0)
611         {
612                 ret = (gchar *)haystack;
613                 goto finally_1;
614         }
615
616         if (haystack_len < needle_len)
617         {
618                 ret = NULL;
619                 goto finally_1;
620         }
621
622         p = (gchar*)caseless_haystack;
623         needle_len = strlen (needle);
624         i = 0;
625
626         while (*p)
627         {
628                 if ((strncmp (p, needle, needle_len) == 0))
629                 {
630                         ret = pointer_from_offset_skipping_decomp (haystack, i);
631                         goto finally_1;
632                 }
633
634                 p = g_utf8_next_char (p);
635                 i++;
636         }
637
638 finally_1:
639         g_free (caseless_haystack);
640
641         return ret;
642 }
643
644 static gboolean
645 g_utf8_caselessnmatch (const char *s1, const char *s2,
646                        gssize n1, gssize n2)
647 {
648         gchar *casefold;
649         gchar *normalized_s1;
650         gchar *normalized_s2;
651         gint len_s1;
652         gint len_s2;
653         gboolean ret = FALSE;
654
655         g_return_val_if_fail (s1 != NULL, FALSE);
656         g_return_val_if_fail (s2 != NULL, FALSE);
657         g_return_val_if_fail (n1 > 0, FALSE);
658         g_return_val_if_fail (n2 > 0, FALSE);
659
660         casefold = g_utf8_casefold (s1, n1);
661         normalized_s1 = g_utf8_normalize (casefold, -1, G_NORMALIZE_NFD);
662         g_free (casefold);
663
664         casefold = g_utf8_casefold (s2, n2);
665         normalized_s2 = g_utf8_normalize (casefold, -1, G_NORMALIZE_NFD);
666         g_free (casefold);
667
668         len_s1 = strlen (normalized_s1);
669         len_s2 = strlen (normalized_s2);
670
671         if (len_s1 < len_s2)
672                 goto finally_2;
673
674         ret = (strncmp (normalized_s1, normalized_s2, len_s2) == 0);
675
676 finally_2:
677         g_free (normalized_s1);
678         g_free (normalized_s2);
679
680         return ret;
681 }
682
683 static void
684 forward_chars_with_skipping (GtkTextIter *iter,
685                              gint         count,
686                              gboolean     skip_invisible,
687                              gboolean     skip_nontext,
688                              gboolean     skip_decomp)
689 {
690         gint i;
691
692         g_return_if_fail (count >= 0);
693
694         i = count;
695
696         while (i > 0)
697         {
698                 gboolean ignored = FALSE;
699
700                 /* minimal workaround to avoid the infinite loop of bug #168247.
701                  * It doesn't fix the problemjust the symptom...
702                  */
703                 if (gtk_text_iter_is_end (iter))
704                         return;
705
706                 if (skip_nontext && gtk_text_iter_get_char (iter) == GTK_TEXT_UNKNOWN_CHAR)
707                         ignored = TRUE;
708
709                 if (!ignored && skip_invisible &&
710                     /* _gtk_text_btree_char_is_invisible (iter)*/ FALSE)
711                         ignored = TRUE;
712
713                 if (!ignored && skip_decomp)
714                 {
715                         /* being UTF8 correct sucks; this accounts for extra
716                            offsets coming from canonical decompositions of
717                            UTF8 characters (e.g. accented characters) which
718                            g_utf8_normalize() performs */
719                         gchar *normal;
720                         gchar buffer[6];
721                         gint buffer_len;
722
723                         buffer_len = g_unichar_to_utf8 (gtk_text_iter_get_char (iter), buffer);
724                         normal = g_utf8_normalize (buffer, buffer_len, G_NORMALIZE_NFD);
725                         i -= (g_utf8_strlen (normal, -1) - 1);
726                         g_free (normal);
727                 }
728
729                 gtk_text_iter_forward_char (iter);
730
731                 if (!ignored)
732                         --i;
733         }
734 }
735
736 static gboolean
737 lines_match (const GtkTextIter *start,
738              const gchar      **lines,
739              gboolean           visible_only,
740              gboolean           slice,
741              GtkTextIter       *match_start,
742              GtkTextIter       *match_end)
743 {
744         GtkTextIter next;
745         gchar *line_text;
746         const gchar *found;
747         gint offset;
748
749         if (*lines == NULL || **lines == '\0')
750         {
751                 if (match_start)
752                         *match_start = *start;
753                 if (match_end)
754                         *match_end = *start;
755                 return TRUE;
756         }
757
758         next = *start;
759         gtk_text_iter_forward_line (&next);
760
761         /* No more text in buffer, but *lines is nonempty */
762         if (gtk_text_iter_equal (start, &next))
763                 return FALSE;
764
765         if (slice)
766         {
767                 if (visible_only)
768                         line_text = gtk_text_iter_get_visible_slice (start, &next);
769                 else
770                         line_text = gtk_text_iter_get_slice (start, &next);
771         }
772         else
773         {
774                 if (visible_only)
775                         line_text = gtk_text_iter_get_visible_text (start, &next);
776                 else
777                         line_text = gtk_text_iter_get_text (start, &next);
778         }
779
780         if (match_start) /* if this is the first line we're matching */
781         {
782                 found = g_utf8_strcasestr (line_text, *lines);
783         }
784         else
785         {
786                 /* If it's not the first line, we have to match from the
787                  * start of the line.
788                  */
789                 if (g_utf8_caselessnmatch (line_text, *lines, strlen (line_text),
790                                            strlen (*lines)))
791                         found = line_text;
792                 else
793                         found = NULL;
794         }
795
796         if (found == NULL)
797         {
798                 g_free (line_text);
799                 return FALSE;
800         }
801
802         /* Get offset to start of search string */
803         offset = g_utf8_strlen (line_text, found - line_text);
804
805         next = *start;
806
807         /* If match start needs to be returned, set it to the
808          * start of the search string.
809          */
810         forward_chars_with_skipping (&next, offset, visible_only, !slice, FALSE);
811         if (match_start)
812         {
813                 *match_start = next;
814         }
815
816         /* Go to end of search string */
817         forward_chars_with_skipping (&next, g_utf8_strlen (*lines, -1), visible_only, !slice, TRUE);
818
819         g_free (line_text);
820
821         ++lines;
822
823         if (match_end)
824                 *match_end = next;
825
826         /* pass NULL for match_start, since we don't need to find the
827          * start again.
828          */
829         return lines_match (&next, lines, visible_only, slice, NULL, match_end);
830 }
831
832 /* strsplit () that retains the delimiter as part of the string. */
833 static gchar **
834 strbreakup (const char *string,
835             const char *delimiter,
836             gint        max_tokens)
837 {
838         GSList *string_list = NULL, *slist;
839         gchar **str_array, *s, *casefold, *new_string;
840         guint i, n = 1;
841
842         g_return_val_if_fail (string != NULL, NULL);
843         g_return_val_if_fail (delimiter != NULL, NULL);
844
845         if (max_tokens < 1)
846                 max_tokens = G_MAXINT;
847
848         s = strstr (string, delimiter);
849         if (s)
850         {
851                 guint delimiter_len = strlen (delimiter);
852
853                 do
854                 {
855                         guint len;
856
857                         len = s - string + delimiter_len;
858                         new_string = g_new (gchar, len + 1);
859                         strncpy (new_string, string, len);
860                         new_string[len] = 0;
861                         casefold = g_utf8_casefold (new_string, -1);
862                         g_free (new_string);
863                         new_string = g_utf8_normalize (casefold, -1, G_NORMALIZE_NFD);
864                         g_free (casefold);
865                         string_list = g_slist_prepend (string_list, new_string);
866                         n++;
867                         string = s + delimiter_len;
868                         s = strstr (string, delimiter);
869                 } while (--max_tokens && s);
870         }
871
872         if (*string)
873         {
874                 n++;
875                 casefold = g_utf8_casefold (string, -1);
876                 new_string = g_utf8_normalize (casefold, -1, G_NORMALIZE_NFD);
877                 g_free (casefold);
878                 string_list = g_slist_prepend (string_list, new_string);
879         }
880
881         str_array = g_new (gchar*, n);
882
883         i = n - 1;
884
885         str_array[i--] = NULL;
886         for (slist = string_list; slist; slist = slist->next)
887                 str_array[i--] = slist->data;
888
889         g_slist_free (string_list);
890
891         return str_array;
892 }
893
894 gboolean
895 empathy_text_iter_forward_search (const GtkTextIter   *iter,
896                                  const gchar         *str,
897                                  GtkTextIter         *match_start,
898                                  GtkTextIter         *match_end,
899                                  const GtkTextIter   *limit)
900 {
901         gchar **lines = NULL;
902         GtkTextIter match;
903         gboolean retval = FALSE;
904         GtkTextIter search;
905         gboolean visible_only;
906         gboolean slice;
907
908         g_return_val_if_fail (iter != NULL, FALSE);
909         g_return_val_if_fail (str != NULL, FALSE);
910
911         if (limit && gtk_text_iter_compare (iter, limit) >= 0)
912                 return FALSE;
913
914         if (*str == '\0') {
915                 /* If we can move one char, return the empty string there */
916                 match = *iter;
917
918                 if (gtk_text_iter_forward_char (&match)) {
919                         if (limit && gtk_text_iter_equal (&match, limit)) {
920                                 return FALSE;
921                         }
922
923                         if (match_start) {
924                                 *match_start = match;
925                         }
926                         if (match_end) {
927                                 *match_end = match;
928                         }
929                         return TRUE;
930                 } else {
931                         return FALSE;
932                 }
933         }
934
935         visible_only = TRUE;
936         slice = FALSE;
937
938         /* locate all lines */
939         lines = strbreakup (str, "\n", -1);
940
941         search = *iter;
942
943         do {
944                 /* This loop has an inefficient worst-case, where
945                  * gtk_text_iter_get_text () is called repeatedly on
946                  * a single line.
947                  */
948                 GtkTextIter end;
949
950                 if (limit && gtk_text_iter_compare (&search, limit) >= 0) {
951                         break;
952                 }
953
954                 if (lines_match (&search, (const gchar**)lines,
955                                  visible_only, slice, &match, &end)) {
956                         if (limit == NULL ||
957                             (limit && gtk_text_iter_compare (&end, limit) <= 0)) {
958                                 retval = TRUE;
959
960                                 if (match_start) {
961                                         *match_start = match;
962                                 }
963                                 if (match_end) {
964                                         *match_end = end;
965                                 }
966                         }
967                         break;
968                 }
969         } while (gtk_text_iter_forward_line (&search));
970
971         g_strfreev ((gchar**)lines);
972
973         return retval;
974 }
975
976 static const gchar *
977 g_utf8_strrcasestr (const gchar *haystack, const gchar *needle)
978 {
979         gsize needle_len;
980         gsize haystack_len;
981         const gchar *ret = NULL;
982         gchar *p;
983         gchar *casefold;
984         gchar *caseless_haystack;
985         gint i;
986
987         g_return_val_if_fail (haystack != NULL, NULL);
988         g_return_val_if_fail (needle != NULL, NULL);
989
990         casefold = g_utf8_casefold (haystack, -1);
991         caseless_haystack = g_utf8_normalize (casefold, -1, G_NORMALIZE_NFD);
992         g_free (casefold);
993
994         needle_len = g_utf8_strlen (needle, -1);
995         haystack_len = g_utf8_strlen (caseless_haystack, -1);
996
997         if (needle_len == 0)
998         {
999                 ret = (gchar *)haystack;
1000                 goto finally_1;
1001         }
1002
1003         if (haystack_len < needle_len)
1004         {
1005                 ret = NULL;
1006                 goto finally_1;
1007         }
1008
1009         i = haystack_len - needle_len;
1010         p = g_utf8_offset_to_pointer (caseless_haystack, i);
1011         needle_len = strlen (needle);
1012
1013         while (p >= caseless_haystack)
1014         {
1015                 if (strncmp (p, needle, needle_len) == 0)
1016                 {
1017                         ret = pointer_from_offset_skipping_decomp (haystack, i);
1018                         goto finally_1;
1019                 }
1020
1021                 p = g_utf8_prev_char (p);
1022                 i--;
1023         }
1024
1025 finally_1:
1026         g_free (caseless_haystack);
1027
1028         return ret;
1029 }
1030
1031 static gboolean
1032 backward_lines_match (const GtkTextIter *start,
1033                       const gchar      **lines,
1034                       gboolean           visible_only,
1035                       gboolean           slice,
1036                       GtkTextIter       *match_start,
1037                       GtkTextIter       *match_end)
1038 {
1039         GtkTextIter line, next;
1040         gchar *line_text;
1041         const gchar *found;
1042         gint offset;
1043
1044         if (*lines == NULL || **lines == '\0')
1045         {
1046                 if (match_start)
1047                         *match_start = *start;
1048                 if (match_end)
1049                         *match_end = *start;
1050                 return TRUE;
1051         }
1052
1053         line = next = *start;
1054         if (gtk_text_iter_get_line_offset (&next) == 0)
1055         {
1056                 if (!gtk_text_iter_backward_line (&next))
1057                         return FALSE;
1058         }
1059         else
1060                 gtk_text_iter_set_line_offset (&next, 0);
1061
1062         if (slice)
1063         {
1064                 if (visible_only)
1065                         line_text = gtk_text_iter_get_visible_slice (&next, &line);
1066                 else
1067                         line_text = gtk_text_iter_get_slice (&next, &line);
1068         }
1069         else
1070         {
1071                 if (visible_only)
1072                         line_text = gtk_text_iter_get_visible_text (&next, &line);
1073                 else
1074                         line_text = gtk_text_iter_get_text (&next, &line);
1075         }
1076
1077         if (match_start) /* if this is the first line we're matching */
1078         {
1079                 found = g_utf8_strrcasestr (line_text, *lines);
1080         }
1081         else
1082         {
1083                 /* If it's not the first line, we have to match from the
1084                  * start of the line.
1085                  */
1086                 if (g_utf8_caselessnmatch (line_text, *lines, strlen (line_text),
1087                                            strlen (*lines)))
1088                         found = line_text;
1089                 else
1090                         found = NULL;
1091         }
1092
1093         if (found == NULL)
1094         {
1095                 g_free (line_text);
1096                 return FALSE;
1097         }
1098
1099         /* Get offset to start of search string */
1100         offset = g_utf8_strlen (line_text, found - line_text);
1101
1102         forward_chars_with_skipping (&next, offset, visible_only, !slice, FALSE);
1103
1104         /* If match start needs to be returned, set it to the
1105          * start of the search string.
1106          */
1107         if (match_start)
1108         {
1109                 *match_start = next;
1110         }
1111
1112         /* Go to end of search string */
1113         forward_chars_with_skipping (&next, g_utf8_strlen (*lines, -1), visible_only, !slice, TRUE);
1114
1115         g_free (line_text);
1116
1117         ++lines;
1118
1119         if (match_end)
1120                 *match_end = next;
1121
1122         /* try to match the rest of the lines forward, passing NULL
1123          * for match_start so lines_match will try to match the entire
1124          * line */
1125         return lines_match (&next, lines, visible_only,
1126                             slice, NULL, match_end);
1127 }
1128
1129 gboolean
1130 empathy_text_iter_backward_search (const GtkTextIter   *iter,
1131                                   const gchar         *str,
1132                                   GtkTextIter         *match_start,
1133                                   GtkTextIter         *match_end,
1134                                   const GtkTextIter   *limit)
1135 {
1136         gchar **lines = NULL;
1137         GtkTextIter match;
1138         gboolean retval = FALSE;
1139         GtkTextIter search;
1140         gboolean visible_only;
1141         gboolean slice;
1142
1143         g_return_val_if_fail (iter != NULL, FALSE);
1144         g_return_val_if_fail (str != NULL, FALSE);
1145
1146         if (limit && gtk_text_iter_compare (iter, limit) <= 0)
1147                 return FALSE;
1148
1149         if (*str == '\0')
1150         {
1151                 /* If we can move one char, return the empty string there */
1152                 match = *iter;
1153
1154                 if (gtk_text_iter_backward_char (&match))
1155                 {
1156                         if (limit && gtk_text_iter_equal (&match, limit))
1157                                 return FALSE;
1158
1159                         if (match_start)
1160                                 *match_start = match;
1161                         if (match_end)
1162                                 *match_end = match;
1163                         return TRUE;
1164                 }
1165                 else
1166                 {
1167                         return FALSE;
1168                 }
1169         }
1170
1171         visible_only = TRUE;
1172         slice = TRUE;
1173
1174         /* locate all lines */
1175         lines = strbreakup (str, "\n", -1);
1176
1177         search = *iter;
1178
1179         while (TRUE)
1180         {
1181                 /* This loop has an inefficient worst-case, where
1182                  * gtk_text_iter_get_text () is called repeatedly on
1183                  * a single line.
1184                  */
1185                 GtkTextIter end;
1186
1187                 if (limit && gtk_text_iter_compare (&search, limit) <= 0)
1188                         break;
1189
1190                 if (backward_lines_match (&search, (const gchar**)lines,
1191                                           visible_only, slice, &match, &end))
1192                 {
1193                         if (limit == NULL || (limit &&
1194                                               gtk_text_iter_compare (&end, limit) > 0))
1195                         {
1196                                 retval = TRUE;
1197
1198                                 if (match_start)
1199                                         *match_start = match;
1200                                 if (match_end)
1201                                         *match_end = end;
1202                         }
1203                         break;
1204                 }
1205
1206                 if (gtk_text_iter_get_line_offset (&search) == 0)
1207                 {
1208                         if (!gtk_text_iter_backward_line (&search))
1209                                 break;
1210                 }
1211                 else
1212                 {
1213                         gtk_text_iter_set_line_offset (&search, 0);
1214                 }
1215         }
1216
1217         g_strfreev ((gchar**)lines);
1218
1219         return retval;
1220 }
1221
1222 gboolean
1223 empathy_window_get_is_visible (GtkWindow *window)
1224 {
1225         GdkWindowState  state;
1226         GdkWindow      *gdk_window;
1227
1228         g_return_val_if_fail (GTK_IS_WINDOW (window), FALSE);
1229
1230         gdk_window = GTK_WIDGET (window)->window;
1231         if (!gdk_window) {
1232                 return FALSE;
1233         }
1234
1235         state = gdk_window_get_state (gdk_window);
1236         if (state & (GDK_WINDOW_STATE_WITHDRAWN | GDK_WINDOW_STATE_ICONIFIED)) {
1237                 return FALSE;
1238         }
1239
1240         return TRUE;
1241 }
1242
1243 void 
1244 empathy_window_iconify (GtkWindow *window, GtkStatusIcon *status_icon)
1245 {
1246         GdkRectangle  icon_location;
1247         gulong        data[4];
1248         Display      *dpy;
1249         GdkWindow    *gdk_window;
1250
1251         gtk_status_icon_get_geometry (status_icon, NULL, &icon_location, NULL);
1252         gdk_window = GTK_WIDGET (window)->window;
1253         dpy = gdk_x11_drawable_get_xdisplay (gdk_window);
1254
1255         data[0] = icon_location.x;
1256         data[1] = icon_location.y;
1257         data[2] = icon_location.width;
1258         data[3] = icon_location.height;
1259
1260         XChangeProperty (dpy,
1261                          GDK_WINDOW_XID (gdk_window),
1262                          gdk_x11_get_xatom_by_name_for_display (gdk_drawable_get_display (gdk_window),
1263                          "_NET_WM_ICON_GEOMETRY"),
1264                          XA_CARDINAL, 32, PropModeReplace,
1265                          (guchar *)&data, 4);
1266
1267         gtk_window_set_skip_taskbar_hint (window, TRUE);
1268         gtk_window_iconify (window);
1269 }
1270
1271 /* Takes care of moving the window to the current workspace. */
1272 void
1273 empathy_window_present (GtkWindow *window,
1274                         gboolean   steal_focus)
1275 {
1276         guint32 timestamp;
1277
1278         g_return_if_fail (GTK_IS_WINDOW (window));
1279
1280         /* There are three cases: hidden, visible, visible on another
1281          * workspace.
1282          */
1283
1284         if (!empathy_window_get_is_visible (window)) {
1285                 /* Hide it so present brings it to the current workspace. */
1286                 gtk_widget_hide (GTK_WIDGET (window));
1287         }
1288
1289         timestamp = gtk_get_current_event_time ();
1290         gtk_window_set_skip_taskbar_hint (window, FALSE);
1291         gtk_window_present_with_time (window, timestamp);
1292         /* FIXME: This shouldn't be required as gtk_window_present's doc says
1293          *        it deiconify automatically. */
1294         gtk_window_deiconify (window);
1295 }
1296
1297 GtkWindow *
1298 empathy_get_toplevel_window (GtkWidget *widget)
1299 {
1300         GtkWidget *toplevel;
1301
1302         g_return_val_if_fail (GTK_IS_WIDGET (widget), NULL);
1303
1304         toplevel = gtk_widget_get_toplevel (widget);
1305         if (GTK_IS_WINDOW (toplevel) &&
1306             GTK_WIDGET_TOPLEVEL (toplevel)) {
1307                 return GTK_WINDOW (toplevel);
1308         }
1309
1310         return NULL;
1311 }
1312
1313 /* The URL opening code can't handle schemeless strings, so we try to be
1314  * smart and add http if there is no scheme or doesn't look like a mail
1315  * address. This should work in most cases, and let us click on strings
1316  * like "www.gnome.org".
1317  */
1318 static gchar *
1319 fixup_url (const gchar *url)
1320 {
1321         if (g_str_has_prefix (url, "ghelp:") ||
1322             g_str_has_prefix (url, "mailto:") ||
1323             strstr (url, ":/")) {
1324                 return NULL;
1325         }
1326
1327         if (strstr (url, "@")) {
1328                 return g_strdup_printf ("mailto:%s", url);
1329         }
1330
1331         return g_strdup_printf ("http://%s", url);
1332 }
1333
1334 void
1335 empathy_url_show (const char *url)
1336 {
1337         gchar  *real_url;
1338         GError *error = NULL;
1339
1340         real_url = fixup_url (url);
1341         if (real_url) {
1342                 url = real_url;
1343         }
1344
1345         /* FIXME: this does not work for multihead, we should use
1346          * GdkAppLaunchContext or gtk_show_url, see bug #514396.
1347          */
1348         g_app_info_launch_default_for_uri (url, NULL, &error);
1349         if (error) {
1350                 GtkWidget *dialog;
1351
1352                 dialog = gtk_message_dialog_new (NULL, 0,
1353                                                  GTK_MESSAGE_ERROR, GTK_BUTTONS_CLOSE, 
1354                                                  _("Unable to open URI"));
1355                 gtk_message_dialog_format_secondary_text (GTK_MESSAGE_DIALOG (dialog),
1356                                                           "%s", error->message);
1357
1358                 g_signal_connect (dialog, "response",
1359                                   G_CALLBACK (gtk_widget_destroy),
1360                                   NULL);
1361                 gtk_window_present (GTK_WINDOW (dialog));
1362
1363                 g_clear_error (&error);
1364         }
1365
1366         g_free (real_url);
1367 }
1368
1369 static void
1370 link_button_hook (GtkLinkButton *button,
1371                   const gchar *link,
1372                   gpointer user_data)
1373 {
1374         empathy_url_show (link);
1375 }
1376
1377 GtkWidget *
1378 empathy_link_button_new (const gchar *url,
1379                         const gchar *title)
1380 {
1381         static gboolean hook = FALSE;
1382
1383         if (!hook) {
1384                 hook = TRUE;
1385                 gtk_link_button_set_uri_hook (link_button_hook, NULL, NULL);
1386         }
1387
1388         return gtk_link_button_new_with_label (url, title);
1389 }
1390
1391 void
1392 empathy_toggle_button_set_state_quietly (GtkWidget *widget,
1393                                         GCallback  callback,
1394                                         gpointer   user_data,
1395                                         gboolean   active)
1396 {
1397         g_return_if_fail (GTK_IS_TOGGLE_BUTTON (widget));
1398
1399         g_signal_handlers_block_by_func (widget, callback, user_data);
1400         g_object_set (widget, "active", active, NULL);
1401         g_signal_handlers_unblock_by_func (widget, callback, user_data);
1402 }
1403
1404 GtkTextTag *
1405 empathy_text_buffer_tag_set (GtkTextBuffer *buffer,
1406                              const gchar   *tag_name,
1407                              const gchar   *first_property_name,
1408                              ...)
1409 {
1410         GtkTextTagTable *table;
1411         GtkTextTag      *tag;
1412
1413         g_return_val_if_fail (GTK_IS_TEXT_BUFFER (buffer), NULL);
1414         g_return_val_if_fail (tag_name != NULL, NULL);
1415
1416         table = gtk_text_buffer_get_tag_table (buffer);
1417         tag = gtk_text_tag_table_lookup (table, tag_name);
1418
1419         if (!tag) {
1420                 tag = gtk_text_tag_new (tag_name);
1421                 gtk_text_tag_table_add (table, tag);
1422                 g_object_unref (tag);
1423         } else {
1424                 /* Clear the old values so that we don't affect the new theme. */
1425                 g_object_set (tag,
1426                               "background-set", FALSE,
1427                               "foreground-set", FALSE,
1428                               "invisible-set", FALSE,
1429                               "justification-set", FALSE,
1430                               "paragraph-background-set", FALSE,
1431                               "pixels-above-lines-set", FALSE,
1432                               "pixels-below-lines-set", FALSE,
1433                               "rise-set", FALSE,
1434                               "scale-set", FALSE,
1435                               "size-set", FALSE,
1436                               "style-set", FALSE,
1437                               "weight-set", FALSE,
1438                               NULL);
1439         }
1440
1441         if (first_property_name) {
1442                 va_list list;
1443
1444                 va_start (list, first_property_name);
1445                 g_object_set_valist (G_OBJECT (tag), first_property_name, list);
1446                 va_end (list);
1447         }
1448
1449         return tag;
1450 }
1451
1452 /* Sending files with the file chooser */
1453
1454 static void
1455 file_manager_send_file_response_cb (GtkDialog      *widget,
1456                                     gint            response_id,
1457                                     EmpathyContact *contact)
1458 {
1459         if (response_id == GTK_RESPONSE_OK) {
1460                 GSList *list;
1461                 GSList *l;
1462
1463                 list = gtk_file_chooser_get_uris (GTK_FILE_CHOOSER (widget));
1464
1465                 DEBUG ("File chooser selected files:");
1466
1467                 for (l = list; l; l = l->next) {
1468                         gchar            *uri;
1469                         GFile            *gfile;
1470                         GtkRecentManager *manager;
1471
1472                         uri = l->data;
1473                         gfile = g_file_new_for_uri (uri);
1474
1475                         DEBUG ("\t%s", uri);
1476                         empathy_dispatcher_send_file (contact, gfile);
1477
1478                         manager = gtk_recent_manager_get_default ();
1479                         gtk_recent_manager_add_item (manager, uri);
1480
1481                         g_object_unref (gfile);
1482                         g_free (uri);
1483                 }
1484
1485                         g_slist_free (list);
1486         }
1487
1488         gtk_widget_destroy (GTK_WIDGET (widget));
1489 }
1490
1491 void
1492 empathy_send_file_with_file_chooser (EmpathyContact *contact)
1493 {
1494         GtkWidget               *widget;
1495         GtkWidget               *button;
1496
1497         g_return_if_fail (EMPATHY_IS_CONTACT (contact));
1498
1499         DEBUG ("Creating selection file chooser");
1500
1501         widget = gtk_file_chooser_dialog_new (_("Select a file"),
1502                                               NULL,
1503                                               GTK_FILE_CHOOSER_ACTION_OPEN,
1504                                               GTK_STOCK_CANCEL,
1505                                               GTK_RESPONSE_CANCEL,
1506                                               NULL);
1507
1508         /* send button */
1509         button = gtk_button_new_with_mnemonic (_("_Send"));
1510         gtk_button_set_image (GTK_BUTTON (button),
1511                 gtk_image_new_from_icon_name (EMPATHY_IMAGE_DOCUMENT_SEND,
1512                                               GTK_ICON_SIZE_BUTTON));
1513         gtk_widget_show (button);
1514         gtk_dialog_add_action_widget (GTK_DIALOG (widget), button,
1515                                       GTK_RESPONSE_OK);
1516         GTK_WIDGET_SET_FLAGS (button, GTK_CAN_DEFAULT);
1517         gtk_dialog_set_default_response (GTK_DIALOG (widget),
1518                                          GTK_RESPONSE_OK);
1519
1520         g_signal_connect (widget, "response",
1521                           G_CALLBACK (file_manager_send_file_response_cb),
1522                           contact);
1523
1524         gtk_widget_show (widget);
1525 }