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-2010 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., 51 Franklin St, Fifth Floor,
  19  * Boston, MA  02110-1301  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  *          Travis Reitter <travis.reitter@collabora.co.uk>
  27  *
  28  *          Part of this file is copied from GtkSourceView (gtksourceiter.c):
  29  *          Paolo Maggi
  30  *          Jeroen Zwartepoorte
  31  */
  32
  33 #include <config.h>
  34
  35 #include <string.h>
  36 #include <X11/Xatom.h>
  37 #include <gdk/gdkx.h>
  38 #include <glib/gi18n-lib.h>
  39 #include <gtk/gtk.h>
  40 #include <gio/gio.h>
  41
  42 #include <telepathy-glib/util.h>
  43 #include <folks/folks.h>
  44
  45 #include "empathy-ui-utils.h"
  46 #include "empathy-images.h"
  47 #include "empathy-smiley-manager.h"
  48
  49 #define DEBUG_FLAG EMPATHY_DEBUG_OTHER
  50 #include <libempathy/empathy-debug.h>
  51 #include <libempathy/empathy-utils.h>
  52 #include <libempathy/empathy-dispatcher.h>
  53 #include <libempathy/empathy-idle.h>
  54 #include <libempathy/empathy-ft-factory.h>
  55
  56 void
  57 empathy_gtk_init (void)
  58 {
  59         static gboolean initialized = FALSE;
  60
  61         if (initialized)
  62                 return;
  63
  64         empathy_init ();
  65         gtk_icon_theme_append_search_path (gtk_icon_theme_get_default (),
  66                                            PKGDATADIR G_DIR_SEPARATOR_S "icons");
  67
  68         initialized = TRUE;
  69 }
  70
  71 static GtkBuilder *
  72 builder_get_file_valist (const gchar *filename,
  73                          const gchar *first_object,
  74                          va_list      args)
  75 {
  76         GtkBuilder  *gui;
  77         const gchar *name;
  78         GObject    **object_ptr;
  79         GError      *error = NULL;
  80
  81         DEBUG ("Loading file %s", filename);
  82
  83         gui = gtk_builder_new ();
  84         gtk_builder_set_translation_domain (gui, GETTEXT_PACKAGE);
  85         if (!gtk_builder_add_from_file (gui, filename, &error)) {
  86                 g_critical ("GtkBuilder Error (%s): %s",
  87                                 filename, error->message);
  88                 g_clear_error (&error);
  89                 g_object_unref (gui);
  90
  91                 /* we need to iterate and set all of the pointers to NULL */
  92                 for (name = first_object; name;
  93                      name = va_arg (args, const gchar *)) {
  94                         object_ptr = va_arg (args, GObject**);
  95
  96                         *object_ptr = NULL;
  97                 }
  98
  99                 return NULL;
 100         }
 101
 102         for (name = first_object; name; name = va_arg (args, const gchar *)) {
 103                 object_ptr = va_arg (args, GObject**);
 104
 105                 *object_ptr = gtk_builder_get_object (gui, name);
 106
 107                 if (!*object_ptr) {
 108                         g_warning ("File is missing object '%s'.", name);
 109                         continue;
 110                 }
 111         }
 112
 113         return gui;
 114 }
 115
 116 GtkBuilder *
 117 empathy_builder_get_file (const gchar *filename,
 118                           const gchar *first_object,
 119                           ...)
 120 {
 121         GtkBuilder *gui;
 122         va_list     args;
 123
 124         va_start (args, first_object);
 125         gui = builder_get_file_valist (filename, first_object, args);
 126         va_end (args);
 127
 128         return gui;
 129 }
 130
 131 void
 132 empathy_builder_connect (GtkBuilder  *gui,
 133                          gpointer     user_data,
 134                          const gchar *first_object,
 135                          ...)
 136 {
 137         va_list      args;
 138         const gchar *name;
 139         const gchar *sig;
 140         GObject     *object;
 141         GCallback    callback;
 142
 143         va_start (args, first_object);
 144         for (name = first_object; name; name = va_arg (args, const gchar *)) {
 145                 sig = va_arg (args, const gchar *);
 146                 callback = va_arg (args, GCallback);
 147
 148                 object = gtk_builder_get_object (gui, name);
 149                 if (!object) {
 150                         g_warning ("File is missing object '%s'.", name);
 151                         continue;
 152                 }
 153
 154                 g_signal_connect (object, sig, callback, user_data);
 155         }
 156
 157         va_end (args);
 158 }
 159
 160 GtkWidget *
 161 empathy_builder_unref_and_keep_widget (GtkBuilder *gui,
 162                                        GtkWidget  *widget)
 163 {
 164         /* On construction gui sinks the initial reference to widget. When gui
 165          * is finalized it will drop its ref to widget. We take our own ref to
 166          * prevent widget being finalised. The widget is forced to have a
 167          * floating reference, like when it was initially unowned so that it can
 168          * be used like any other GtkWidget. */
 169
 170         g_object_ref (widget);
 171         g_object_force_floating (G_OBJECT (widget));
 172         g_object_unref (gui);
 173
 174         return widget;
 175 }
 176
 177 const gchar *
 178 empathy_icon_name_for_presence (TpConnectionPresenceType presence)
 179 {
 180         switch (presence) {
 181         case TP_CONNECTION_PRESENCE_TYPE_AVAILABLE:
 182                 return EMPATHY_IMAGE_AVAILABLE;
 183         case TP_CONNECTION_PRESENCE_TYPE_BUSY:
 184                 return EMPATHY_IMAGE_BUSY;
 185         case TP_CONNECTION_PRESENCE_TYPE_AWAY:
 186                 return EMPATHY_IMAGE_AWAY;
 187         case TP_CONNECTION_PRESENCE_TYPE_EXTENDED_AWAY:
 188                 if (gtk_icon_theme_has_icon (gtk_icon_theme_get_default (),
 189                                              EMPATHY_IMAGE_EXT_AWAY))
 190                         return EMPATHY_IMAGE_EXT_AWAY;
 191
 192                 /* The 'extended-away' icon is not an official one so we fallback to idle if
 193                  * it's not implemented */
 194                 return EMPATHY_IMAGE_IDLE;
 195         case TP_CONNECTION_PRESENCE_TYPE_HIDDEN:
 196                 if (gtk_icon_theme_has_icon (gtk_icon_theme_get_default (),
 197                                              EMPATHY_IMAGE_HIDDEN))
 198                         return EMPATHY_IMAGE_HIDDEN;
 199
 200                 /* The 'hidden' icon is not an official one so we fallback to offline if
 201                  * it's not implemented */
 202                 return EMPATHY_IMAGE_OFFLINE;
 203         case TP_CONNECTION_PRESENCE_TYPE_OFFLINE:
 204         case TP_CONNECTION_PRESENCE_TYPE_ERROR:
 205                 return EMPATHY_IMAGE_OFFLINE;
 206         case TP_CONNECTION_PRESENCE_TYPE_UNKNOWN:
 207                 return EMPATHY_IMAGE_PENDING;
 208         case TP_CONNECTION_PRESENCE_TYPE_UNSET:
 209         default:
 210                 return NULL;
 211         }
 212
 213         return NULL;
 214 }
 215
 216 const gchar *
 217 empathy_icon_name_for_contact (EmpathyContact *contact)
 218 {
 219         TpConnectionPresenceType presence;
 220
 221         g_return_val_if_fail (EMPATHY_IS_CONTACT (contact),
 222                               EMPATHY_IMAGE_OFFLINE);
 223
 224         presence = empathy_contact_get_presence (contact);
 225         return empathy_icon_name_for_presence (presence);
 226 }
 227
 228 const gchar *
 229 empathy_icon_name_for_individual (FolksIndividual *individual)
 230 {
 231         FolksPresenceType folks_presence;
 232         TpConnectionPresenceType presence;
 233
 234         folks_presence =
 235             folks_presence_get_presence_type (FOLKS_PRESENCE (individual));
 236         presence = empathy_folks_presence_type_to_tp (folks_presence);
 237
 238         return empathy_icon_name_for_presence (presence);
 239 }
 240
 241 const gchar *
 242 empathy_protocol_name_for_contact (EmpathyContact   *contact)
 243 {
 244         TpAccount     *account;
 245
 246         g_return_val_if_fail (EMPATHY_IS_CONTACT (contact), NULL);
 247
 248         account = empathy_contact_get_account (contact);
 249         if (account == NULL) {
 250                 return NULL;
 251         }
 252
 253         return tp_account_get_icon_name (account);
 254 }
 255
 256 GdkPixbuf *
 257 empathy_pixbuf_from_data (gchar *data,
 258                           gsize  data_size)
 259 {
 260         return empathy_pixbuf_from_data_and_mime (data, data_size, NULL);
 261 }
 262
 263 GdkPixbuf *
 264 empathy_pixbuf_from_data_and_mime (gchar  *data,
 265                                    gsize   data_size,
 266                                    gchar **mime_type)
 267 {
 268         GdkPixbufLoader *loader;
 269         GdkPixbufFormat *format;
 270         GdkPixbuf       *pixbuf = NULL;
 271         gchar          **mime_types;
 272         GError          *error = NULL;
 273
 274         if (!data) {
 275                 return NULL;
 276         }
 277
 278         loader = gdk_pixbuf_loader_new ();
 279         if (!gdk_pixbuf_loader_write (loader, (guchar *) data, data_size, &error)) {
 280                 DEBUG ("Failed to write to pixbuf loader: %s",
 281                         error ? error->message : "No error given");
 282                 goto out;
 283         }
 284         if (!gdk_pixbuf_loader_close (loader, &error)) {
 285                 DEBUG ("Failed to close pixbuf loader: %s",
 286                         error ? error->message : "No error given");
 287                 goto out;
 288         }
 289
 290         pixbuf = gdk_pixbuf_loader_get_pixbuf (loader);
 291         if (pixbuf) {
 292                 g_object_ref (pixbuf);
 293
 294                 if (mime_type != NULL) {
 295                         format = gdk_pixbuf_loader_get_format (loader);
 296                         mime_types = gdk_pixbuf_format_get_mime_types (format);
 297
 298                         *mime_type = g_strdup (*mime_types);
 299                         if (mime_types[1] != NULL) {
 300                                 DEBUG ("Loader supports more than one mime "
 301                                         "type! Picking the first one, %s",
 302                                         *mime_type);
 303                         }
 304                         g_strfreev (mime_types);
 305                 }
 306         }
 307
 308 out:
 309         g_clear_error (&error);
 310         g_object_unref (loader);
 311
 312         return pixbuf;
 313 }
 314
 315 struct SizeData {
 316         gint     width;
 317         gint     height;
 318         gboolean preserve_aspect_ratio;
 319 };
 320
 321 static void
 322 pixbuf_from_avatar_size_prepared_cb (GdkPixbufLoader *loader,
 323                                      int              width,
 324                                      int              height,
 325                                      struct SizeData *data)
 326 {
 327         g_return_if_fail (width > 0 && height > 0);
 328
 329         if (data->preserve_aspect_ratio && (data->width > 0 || data->height > 0)) {
 330                 if (width < data->width && height < data->height) {
 331                         width = width;
 332                         height = height;
 333                 }
 334
 335                 if (data->width < 0) {
 336                         width = width * (double) data->height / (gdouble) height;
 337                         height = data->height;
 338                 } else if (data->height < 0) {
 339                         height = height * (double) data->width / (double) width;
 340                         width = data->width;
 341                 } else if ((double) height * (double) data->width >
 342                            (double) width * (double) data->height) {
 343                         width = 0.5 + (double) width * (double) data->height / (double) height;
 344                         height = data->height;
 345                 } else {
 346                         height = 0.5 + (double) height * (double) data->width / (double) width;
 347                         width = data->width;
 348                 }
 349         } else {
 350                 if (data->width > 0) {
 351                         width = data->width;
 352                 }
 353
 354                 if (data->height > 0) {
 355                         height = data->height;
 356                 }
 357         }
 358
 359         gdk_pixbuf_loader_set_size (loader, width, height);
 360 }
 361
 362 static void
 363 empathy_avatar_pixbuf_roundify (GdkPixbuf *pixbuf)
 364 {
 365         gint width, height, rowstride;
 366         guchar *pixels;
 367
 368         width = gdk_pixbuf_get_width (pixbuf);
 369         height = gdk_pixbuf_get_height (pixbuf);
 370         rowstride = gdk_pixbuf_get_rowstride (pixbuf);
 371         pixels = gdk_pixbuf_get_pixels (pixbuf);
 372
 373         if (width < 6 || height < 6) {
 374                 return;
 375         }
 376
 377         /* Top left */
 378         pixels[3] = 0;
 379         pixels[7] = 0x80;
 380         pixels[11] = 0xC0;
 381         pixels[rowstride + 3] = 0x80;
 382         pixels[rowstride * 2 + 3] = 0xC0;
 383
 384         /* Top right */
 385         pixels[width * 4 - 1] = 0;
 386         pixels[width * 4 - 5] = 0x80;
 387         pixels[width * 4 - 9] = 0xC0;
 388         pixels[rowstride + (width * 4) - 1] = 0x80;
 389         pixels[(2 * rowstride) + (width * 4) - 1] = 0xC0;
 390
 391         /* Bottom left */
 392         pixels[(height - 1) * rowstride + 3] = 0;
 393         pixels[(height - 1) * rowstride + 7] = 0x80;
 394         pixels[(height - 1) * rowstride + 11] = 0xC0;
 395         pixels[(height - 2) * rowstride + 3] = 0x80;
 396         pixels[(height - 3) * rowstride + 3] = 0xC0;
 397
 398         /* Bottom right */
 399         pixels[height * rowstride - 1] = 0;
 400         pixels[(height - 1) * rowstride - 1] = 0x80;
 401         pixels[(height - 2) * rowstride - 1] = 0xC0;
 402         pixels[height * rowstride - 5] = 0x80;
 403         pixels[height * rowstride - 9] = 0xC0;
 404 }
 405
 406 static gboolean
 407 empathy_gdk_pixbuf_is_opaque (GdkPixbuf *pixbuf)
 408 {
 409         gint width, height, rowstride, i;
 410         guchar *pixels;
 411         guchar *row;
 412
 413         width = gdk_pixbuf_get_width (pixbuf);
 414         height = gdk_pixbuf_get_height (pixbuf);
 415         rowstride = gdk_pixbuf_get_rowstride (pixbuf);
 416         pixels = gdk_pixbuf_get_pixels (pixbuf);
 417
 418         row = pixels;
 419         for (i = 3; i < rowstride; i+=4) {
 420                 if (row[i] < 0xfe) {
 421                         return FALSE;
 422                 }
 423         }
 424
 425         for (i = 1; i < height - 1; i++) {
 426                 row = pixels + (i*rowstride);
 427                 if (row[3] < 0xfe || row[rowstride-1] < 0xfe) {
 428                         return FALSE;
 429                 }
 430         }
 431
 432         row = pixels + ((height-1) * rowstride);
 433         for (i = 3; i < rowstride; i+=4) {
 434                 if (row[i] < 0xfe) {
 435                         return FALSE;
 436                 }
 437         }
 438
 439         return TRUE;
 440 }
 441
 442 static GdkPixbuf *
 443 avatar_pixbuf_from_loader (GdkPixbufLoader *loader)
 444 {
 445         GdkPixbuf *pixbuf;
 446
 447         pixbuf = gdk_pixbuf_loader_get_pixbuf (loader);
 448         if (!gdk_pixbuf_get_has_alpha (pixbuf)) {
 449                 GdkPixbuf *rounded_pixbuf;
 450
 451                 rounded_pixbuf = gdk_pixbuf_new (GDK_COLORSPACE_RGB, TRUE, 8,
 452                                                  gdk_pixbuf_get_width (pixbuf),
 453                                                  gdk_pixbuf_get_height (pixbuf));
 454                 gdk_pixbuf_copy_area (pixbuf, 0, 0,
 455                                       gdk_pixbuf_get_width (pixbuf),
 456                                       gdk_pixbuf_get_height (pixbuf),
 457                                       rounded_pixbuf,
 458                                       0, 0);
 459                 pixbuf = rounded_pixbuf;
 460         } else {
 461                 g_object_ref (pixbuf);
 462         }
 463
 464         if (empathy_gdk_pixbuf_is_opaque (pixbuf)) {
 465                 empathy_avatar_pixbuf_roundify (pixbuf);
 466         }
 467
 468         return pixbuf;
 469 }
 470
 471 GdkPixbuf *
 472 empathy_pixbuf_from_avatar_scaled (EmpathyAvatar *avatar,
 473                                   gint          width,
 474                                   gint          height)
 475 {
 476         GdkPixbuf        *pixbuf;
 477         GdkPixbufLoader  *loader;
 478         struct SizeData   data;
 479         GError           *error = NULL;
 480
 481         if (!avatar) {
 482                 return NULL;
 483         }
 484
 485         data.width = width;
 486         data.height = height;
 487         data.preserve_aspect_ratio = TRUE;
 488
 489         loader = gdk_pixbuf_loader_new ();
 490
 491         g_signal_connect (loader, "size-prepared",
 492                           G_CALLBACK (pixbuf_from_avatar_size_prepared_cb),
 493                           &data);
 494
 495         if (!gdk_pixbuf_loader_write (loader, avatar->data, avatar->len, &error)) {
 496                 g_warning ("Couldn't write avatar image:%p with "
 497                            "length:%" G_GSIZE_FORMAT " to pixbuf loader: %s",
 498                            avatar->data, avatar->len, error->message);
 499                 g_error_free (error);
 500                 return NULL;
 501         }
 502
 503         gdk_pixbuf_loader_close (loader, NULL);
 504         pixbuf = avatar_pixbuf_from_loader (loader);
 505
 506         g_object_unref (loader);
 507
 508         return pixbuf;
 509 }
 510
 511 GdkPixbuf *
 512 empathy_pixbuf_avatar_from_contact_scaled (EmpathyContact *contact,
 513                                           gint           width,
 514                                           gint           height)
 515 {
 516         EmpathyAvatar *avatar;
 517
 518         g_return_val_if_fail (EMPATHY_IS_CONTACT (contact), NULL);
 519
 520         avatar = empathy_contact_get_avatar (contact);
 521
 522         return empathy_pixbuf_from_avatar_scaled (avatar, width, height);
 523 }
 524
 525 typedef struct {
 526         FolksIndividual *individual;
 527         GSimpleAsyncResult *result;
 528         guint width;
 529         guint height;
 530 } PixbufAvatarFromIndividualClosure;
 531
 532 static PixbufAvatarFromIndividualClosure *
 533 pixbuf_avatar_from_individual_closure_new (FolksIndividual    *individual,
 534                                            GSimpleAsyncResult *result,
 535                                            gint                width,
 536                                            gint                height)
 537 {
 538         PixbufAvatarFromIndividualClosure *closure;
 539
 540         g_return_val_if_fail (FOLKS_IS_INDIVIDUAL (individual), NULL);
 541         g_return_val_if_fail (G_IS_ASYNC_RESULT (result), NULL);
 542
 543         closure = g_new0 (PixbufAvatarFromIndividualClosure, 1);
 544         closure->individual = g_object_ref (individual);
 545         closure->result = g_object_ref (result);
 546         closure->width = width;
 547         closure->height = height;
 548
 549         return closure;
 550 }
 551
 552 static void
 553 pixbuf_avatar_from_individual_closure_free (
 554                 PixbufAvatarFromIndividualClosure *closure)
 555 {
 556         g_object_unref (closure->individual);
 557         g_object_unref (closure->result);
 558         g_free (closure);
 559 }
 560
 561 static void
 562 avatar_file_load_contents_cb (GObject      *object,
 563                               GAsyncResult *result,
 564                               gpointer      user_data)
 565 {
 566         GFile *file = G_FILE (object);
 567         PixbufAvatarFromIndividualClosure *closure = user_data;
 568         char *data = NULL;
 569         gsize data_size;
 570         struct SizeData size_data;
 571         GError *error = NULL;
 572         GdkPixbufLoader *loader = NULL;
 573
 574         if (!g_file_load_contents_finish (file, result, &data, &data_size,
 575                                 NULL, &error)) {
 576                 DEBUG ("failed to load avatar from file: %s",
 577                                 error->message);
 578                 g_simple_async_result_set_from_error (closure->result, error);
 579                 goto out;
 580         }
 581
 582         size_data.width = closure->width;
 583         size_data.height = closure->height;
 584         size_data.preserve_aspect_ratio = TRUE;
 585
 586         loader = gdk_pixbuf_loader_new ();
 587
 588         g_signal_connect (loader, "size-prepared",
 589                           G_CALLBACK (pixbuf_from_avatar_size_prepared_cb),
 590                           &size_data);
 591
 592         if (!gdk_pixbuf_loader_write (loader, (guchar *) data, data_size,
 593                                 &error)) {
 594                 DEBUG ("Failed to write to pixbuf loader: %s",
 595                         error ? error->message : "No error given");
 596                 g_simple_async_result_set_from_error (closure->result, error);
 597                 goto out;
 598         }
 599         if (!gdk_pixbuf_loader_close (loader, &error)) {
 600                 DEBUG ("Failed to close pixbuf loader: %s",
 601                         error ? error->message : "No error given");
 602                 g_simple_async_result_set_from_error (closure->result, error);
 603                 goto out;
 604         }
 605
 606         g_simple_async_result_set_op_res_gpointer (closure->result,
 607                         avatar_pixbuf_from_loader (loader), NULL);
 608
 609 out:
 610         g_simple_async_result_complete (closure->result);
 611
 612         g_clear_error (&error);
 613         g_free (data);
 614         tp_clear_object (&loader);
 615         pixbuf_avatar_from_individual_closure_free (closure);
 616 }
 617
 618 void
 619 empathy_pixbuf_avatar_from_individual_scaled_async (
 620                 FolksIndividual     *individual,
 621                 gint                 width,
 622                 gint                 height,
 623                 GCancellable        *cancellable,
 624                 GAsyncReadyCallback  callback,
 625                 gpointer             user_data)
 626 {
 627         GFile *avatar_file;
 628         GSimpleAsyncResult *result;
 629         PixbufAvatarFromIndividualClosure *closure;
 630
 631         result = g_simple_async_result_new (G_OBJECT (individual),
 632                         callback, user_data,
 633                         empathy_pixbuf_avatar_from_individual_scaled_async);
 634
 635         avatar_file = folks_avatar_get_avatar (FOLKS_AVATAR (individual));
 636         if (avatar_file == NULL)
 637                 goto out;
 638
 639         closure = pixbuf_avatar_from_individual_closure_new (individual, result,
 640                                                              width, height);
 641         if (closure == NULL)
 642                 goto out;
 643
 644         g_file_load_contents_async (avatar_file, cancellable,
 645                         avatar_file_load_contents_cb, closure);
 646
 647         g_object_unref (result);
 648
 649         return;
 650
 651 out:
 652         g_simple_async_result_set_op_res_gpointer (result, NULL, NULL);
 653         g_simple_async_result_complete (result);
 654         g_object_unref (result);
 655 }
 656
 657 GdkPixbuf *
 658 empathy_pixbuf_avatar_from_individual_scaled_finish (
 659                 FolksIndividual *individual,
 660                 GAsyncResult *result,
 661                 GError **error)
 662 {
 663         GSimpleAsyncResult *simple = G_SIMPLE_ASYNC_RESULT (result);
 664         gboolean result_valid;
 665
 666         g_return_val_if_fail (FOLKS_IS_INDIVIDUAL (individual), NULL);
 667         g_return_val_if_fail (G_IS_SIMPLE_ASYNC_RESULT (simple), NULL);
 668
 669         if (g_simple_async_result_propagate_error (simple, error))
 670                 return NULL;
 671
 672         result_valid = g_simple_async_result_is_valid (result,
 673                         G_OBJECT (individual),
 674                         empathy_pixbuf_avatar_from_individual_scaled_async);
 675         g_return_val_if_fail (result_valid, NULL);
 676
 677         return g_simple_async_result_get_op_res_gpointer (simple);
 678 }
 679
 680 GdkPixbuf *
 681 empathy_pixbuf_contact_status_icon (EmpathyContact *contact,
 682                                    gboolean       show_protocol)
 683 {
 684         const gchar *icon_name;
 685
 686         g_return_val_if_fail (EMPATHY_IS_CONTACT (contact), NULL);
 687
 688         icon_name = empathy_icon_name_for_contact (contact);
 689
 690         if (icon_name == NULL) {
 691                 return NULL;
 692         }
 693         return empathy_pixbuf_contact_status_icon_with_icon_name (contact,
 694             icon_name,
 695             show_protocol);
 696 }
 697
 698 GdkPixbuf *
 699 empathy_pixbuf_contact_status_icon_with_icon_name (EmpathyContact *contact,
 700                                           const gchar    *icon_name,
 701                                           gboolean       show_protocol)
 702 {
 703         GdkPixbuf *pix_status;
 704         GdkPixbuf *pix_protocol;
 705         gchar     *icon_filename;
 706         gint       height, width;
 707         gint       numerator, denominator;
 708
 709         g_return_val_if_fail (EMPATHY_IS_CONTACT (contact) ||
 710                         (show_protocol == FALSE), NULL);
 711         g_return_val_if_fail (icon_name != NULL, NULL);
 712
 713         numerator = 3;
 714         denominator = 4;
 715
 716         icon_filename = empathy_filename_from_icon_name (icon_name,
 717                                                          GTK_ICON_SIZE_MENU);
 718         if (icon_filename == NULL) {
 719                 DEBUG ("icon name: %s could not be found\n", icon_name);
 720                 return NULL;
 721         }
 722
 723         pix_status = gdk_pixbuf_new_from_file (icon_filename, NULL);
 724
 725         if (pix_status == NULL) {
 726                 DEBUG ("Could not open icon %s\n", icon_filename);
 727                 g_free (icon_filename);
 728                 return NULL;
 729         }
 730
 731         g_free (icon_filename);
 732
 733         if (!show_protocol)
 734                 return pix_status;
 735
 736         height = gdk_pixbuf_get_height (pix_status);
 737         width = gdk_pixbuf_get_width (pix_status);
 738
 739         pix_protocol = empathy_pixbuf_protocol_from_contact_scaled (contact,
 740                                                                     width * numerator / denominator,
 741                                                                     height * numerator / denominator);
 742
 743         if (pix_protocol == NULL) {
 744                 return pix_status;
 745         }
 746         gdk_pixbuf_composite (pix_protocol, pix_status,
 747             0, height - height * numerator / denominator,
 748             width * numerator / denominator, height * numerator / denominator,
 749             0, height - height * numerator / denominator,
 750             1, 1,
 751             GDK_INTERP_BILINEAR, 255);
 752
 753         g_object_unref (pix_protocol);
 754
 755         return pix_status;
 756 }
 757
 758 GdkPixbuf *
 759 empathy_pixbuf_protocol_from_contact_scaled (EmpathyContact *contact,
 760                                           gint           width,
 761                                           gint           height)
 762 {
 763         TpAccount *account;
 764         gchar     *filename;
 765         GdkPixbuf *pixbuf = NULL;
 766
 767         g_return_val_if_fail (EMPATHY_IS_CONTACT (contact), NULL);
 768
 769         account = empathy_contact_get_account (contact);
 770         filename = empathy_filename_from_icon_name (tp_account_get_icon_name (account),
 771                                                     GTK_ICON_SIZE_MENU);
 772         if (filename != NULL) {
 773                 pixbuf = gdk_pixbuf_new_from_file_at_size (filename, width, height, NULL);
 774                 g_free (filename);
 775         }
 776
 777         return pixbuf;
 778 }
 779
 780 GdkPixbuf *
 781 empathy_pixbuf_scale_down_if_necessary (GdkPixbuf *pixbuf, gint max_size)
 782 {
 783         gint      width, height;
 784         gdouble   factor;
 785
 786         width = gdk_pixbuf_get_width (pixbuf);
 787         height = gdk_pixbuf_get_height (pixbuf);
 788
 789         if (width > 0 && (width > max_size || height > max_size)) {
 790                 factor = (gdouble) max_size / MAX (width, height);
 791
 792                 width = width * factor;
 793                 height = height * factor;
 794
 795                 return gdk_pixbuf_scale_simple (pixbuf,
 796                                                 width, height,
 797                                                 GDK_INTERP_HYPER);
 798         }
 799
 800         return g_object_ref (pixbuf);
 801 }
 802
 803 GdkPixbuf *
 804 empathy_pixbuf_from_icon_name_sized (const gchar *icon_name,
 805                                      gint size)
 806 {
 807         GtkIconTheme *theme;
 808         GdkPixbuf *pixbuf;
 809         GError *error = NULL;
 810
 811         if (!icon_name) {
 812                 return NULL;
 813         }
 814
 815         theme = gtk_icon_theme_get_default ();
 816
 817         pixbuf = gtk_icon_theme_load_icon (theme,
 818                                            icon_name,
 819                                            size,
 820                                            0,
 821                                            &error);
 822         if (error) {
 823                 DEBUG ("Error loading icon: %s", error->message);
 824                 g_clear_error (&error);
 825         }
 826
 827         return pixbuf;
 828 }
 829
 830 GdkPixbuf *
 831 empathy_pixbuf_from_icon_name (const gchar *icon_name,
 832                                GtkIconSize  icon_size)
 833 {
 834         gint  w, h;
 835         gint  size = 48;
 836
 837         if (!icon_name) {
 838                 return NULL;
 839         }
 840
 841         if (gtk_icon_size_lookup (icon_size, &w, &h)) {
 842                 size = (w + h) / 2;
 843         }
 844
 845         return empathy_pixbuf_from_icon_name_sized (icon_name, size);
 846 }
 847
 848 gchar *
 849 empathy_filename_from_icon_name (const gchar *icon_name,
 850                                  GtkIconSize  icon_size)
 851 {
 852         GtkIconTheme *icon_theme;
 853         GtkIconInfo  *icon_info;
 854         gint          w, h;
 855         gint          size = 48;
 856         gchar        *ret;
 857
 858         icon_theme = gtk_icon_theme_get_default ();
 859
 860         if (gtk_icon_size_lookup (icon_size, &w, &h)) {
 861                 size = (w + h) / 2;
 862         }
 863
 864         icon_info = gtk_icon_theme_lookup_icon (icon_theme, icon_name, size, 0);
 865         ret = g_strdup (gtk_icon_info_get_filename (icon_info));
 866         gtk_icon_info_free (icon_info);
 867
 868         return ret;
 869 }
 870
 871 /* Stolen from GtkSourceView, hence the weird intendation. Please keep it like
 872  * that to make it easier to apply changes from the original code.
 873  */
 874 #define GTK_TEXT_UNKNOWN_CHAR 0xFFFC
 875
 876 /* this function acts like g_utf8_offset_to_pointer() except that if it finds a
 877  * decomposable character it consumes the decomposition length from the given
 878  * offset.  So it's useful when the offset was calculated for the normalized
 879  * version of str, but we need a pointer to str itself. */
 880 static const gchar *
 881 pointer_from_offset_skipping_decomp (const gchar *str, gint offset)
 882 {
 883         gchar *casefold, *normal;
 884         const gchar *p, *q;
 885
 886         p = str;
 887         while (offset > 0)
 888         {
 889                 q = g_utf8_next_char (p);
 890                 casefold = g_utf8_casefold (p, q - p);
 891                 normal = g_utf8_normalize (casefold, -1, G_NORMALIZE_NFD);
 892                 offset -= g_utf8_strlen (normal, -1);
 893                 g_free (casefold);
 894                 g_free (normal);
 895                 p = q;
 896         }
 897         return p;
 898 }
 899
 900 static const gchar *
 901 g_utf8_strcasestr (const gchar *haystack, const gchar *needle)
 902 {
 903         gsize needle_len;
 904         gsize haystack_len;
 905         const gchar *ret = NULL;
 906         gchar *p;
 907         gchar *casefold;
 908         gchar *caseless_haystack;
 909         gint i;
 910
 911         g_return_val_if_fail (haystack != NULL, NULL);
 912         g_return_val_if_fail (needle != NULL, NULL);
 913
 914         casefold = g_utf8_casefold (haystack, -1);
 915         caseless_haystack = g_utf8_normalize (casefold, -1, G_NORMALIZE_NFD);
 916         g_free (casefold);
 917
 918         needle_len = g_utf8_strlen (needle, -1);
 919         haystack_len = g_utf8_strlen (caseless_haystack, -1);
 920
 921         if (needle_len == 0)
 922         {
 923                 ret = (gchar *) haystack;
 924                 goto finally_1;
 925         }
 926
 927         if (haystack_len < needle_len)
 928         {
 929                 ret = NULL;
 930                 goto finally_1;
 931         }
 932
 933         p = (gchar *) caseless_haystack;
 934         needle_len = strlen (needle);
 935         i = 0;
 936
 937         while (*p)
 938         {
 939                 if ((strncmp (p, needle, needle_len) == 0))
 940                 {
 941                         ret = pointer_from_offset_skipping_decomp (haystack, i);
 942                         goto finally_1;
 943                 }
 944
 945                 p = g_utf8_next_char (p);
 946                 i++;
 947         }
 948
 949 finally_1:
 950         g_free (caseless_haystack);
 951
 952         return ret;
 953 }
 954
 955 static gboolean
 956 g_utf8_caselessnmatch (const char *s1, const char *s2,
 957                        gssize n1, gssize n2)
 958 {
 959         gchar *casefold;
 960         gchar *normalized_s1;
 961         gchar *normalized_s2;
 962         gint len_s1;
 963         gint len_s2;
 964         gboolean ret = FALSE;
 965
 966         g_return_val_if_fail (s1 != NULL, FALSE);
 967         g_return_val_if_fail (s2 != NULL, FALSE);
 968         g_return_val_if_fail (n1 > 0, FALSE);
 969         g_return_val_if_fail (n2 > 0, FALSE);
 970
 971         casefold = g_utf8_casefold (s1, n1);
 972         normalized_s1 = g_utf8_normalize (casefold, -1, G_NORMALIZE_NFD);
 973         g_free (casefold);
 974
 975         casefold = g_utf8_casefold (s2, n2);
 976         normalized_s2 = g_utf8_normalize (casefold, -1, G_NORMALIZE_NFD);
 977         g_free (casefold);
 978
 979         len_s1 = strlen (normalized_s1);
 980         len_s2 = strlen (normalized_s2);
 981
 982         if (len_s1 < len_s2)
 983                 goto finally_2;
 984
 985         ret = (strncmp (normalized_s1, normalized_s2, len_s2) == 0);
 986
 987 finally_2:
 988         g_free (normalized_s1);
 989         g_free (normalized_s2);
 990
 991         return ret;
 992 }
 993
 994 static void
 995 forward_chars_with_skipping (GtkTextIter *iter,
 996                              gint         count,
 997                              gboolean     skip_invisible,
 998                              gboolean     skip_nontext,
 999                              gboolean     skip_decomp)
1000 {
1001         gint i;
1002
1003         g_return_if_fail (count >= 0);
1004
1005         i = count;
1006
1007         while (i > 0)
1008         {
1009                 gboolean ignored = FALSE;
1010
1011                 /* minimal workaround to avoid the infinite loop of bug #168247.
1012                  * It doesn't fix the problemjust the symptom...
1013                  */
1014                 if (gtk_text_iter_is_end (iter))
1015                         return;
1016
1017                 if (skip_nontext && gtk_text_iter_get_char (iter) == GTK_TEXT_UNKNOWN_CHAR)
1018                         ignored = TRUE;
1019
1020                 if (!ignored && skip_invisible &&
1021                     /* _gtk_text_btree_char_is_invisible (iter)*/ FALSE)
1022                         ignored = TRUE;
1023
1024                 if (!ignored && skip_decomp)
1025                 {
1026                         /* being UTF8 correct sucks; this accounts for extra
1027                            offsets coming from canonical decompositions of
1028                            UTF8 characters (e.g. accented characters) which
1029                            g_utf8_normalize () performs */
1030                         gchar *normal;
1031                         gchar buffer[6];
1032                         gint buffer_len;
1033
1034                         buffer_len = g_unichar_to_utf8 (gtk_text_iter_get_char (iter), buffer);
1035                         normal = g_utf8_normalize (buffer, buffer_len, G_NORMALIZE_NFD);
1036                         i -= (g_utf8_strlen (normal, -1) - 1);
1037                         g_free (normal);
1038                 }
1039
1040                 gtk_text_iter_forward_char (iter);
1041
1042                 if (!ignored)
1043                         --i;
1044         }
1045 }
1046
1047 static gboolean
1048 lines_match (const GtkTextIter *start,
1049              const gchar      **lines,
1050              gboolean           visible_only,
1051              gboolean           slice,
1052              GtkTextIter       *match_start,
1053              GtkTextIter       *match_end)
1054 {
1055         GtkTextIter next;
1056         gchar *line_text;
1057         const gchar *found;
1058         gint offset;
1059
1060         if (*lines == NULL || **lines == '\0')
1061         {
1062                 if (match_start)
1063                         *match_start = *start;
1064                 if (match_end)
1065                         *match_end = *start;
1066                 return TRUE;
1067         }
1068
1069         next = *start;
1070         gtk_text_iter_forward_line (&next);
1071
1072         /* No more text in buffer, but *lines is nonempty */
1073         if (gtk_text_iter_equal (start, &next))
1074                 return FALSE;
1075
1076         if (slice)
1077         {
1078                 if (visible_only)
1079                         line_text = gtk_text_iter_get_visible_slice (start, &next);
1080                 else
1081                         line_text = gtk_text_iter_get_slice (start, &next);
1082         }
1083         else
1084         {
1085                 if (visible_only)
1086                         line_text = gtk_text_iter_get_visible_text (start, &next);
1087                 else
1088                         line_text = gtk_text_iter_get_text (start, &next);
1089         }
1090
1091         if (match_start) /* if this is the first line we're matching */
1092         {
1093                 found = g_utf8_strcasestr (line_text, *lines);
1094         }
1095         else
1096         {
1097                 /* If it's not the first line, we have to match from the
1098                  * start of the line.
1099                  */
1100                 if (g_utf8_caselessnmatch (line_text, *lines, strlen (line_text),
1101                                            strlen (*lines)))
1102                         found = line_text;
1103                 else
1104                         found = NULL;
1105         }
1106
1107         if (found == NULL)
1108         {
1109                 g_free (line_text);
1110                 return FALSE;
1111         }
1112
1113         /* Get offset to start of search string */
1114         offset = g_utf8_strlen (line_text, found - line_text);
1115
1116         next = *start;
1117
1118         /* If match start needs to be returned, set it to the
1119          * start of the search string.
1120          */
1121         forward_chars_with_skipping (&next, offset, visible_only, !slice, FALSE);
1122         if (match_start)
1123         {
1124                 *match_start = next;
1125         }
1126
1127         /* Go to end of search string */
1128         forward_chars_with_skipping (&next, g_utf8_strlen (*lines, -1), visible_only, !slice, TRUE);
1129
1130         g_free (line_text);
1131
1132         ++lines;
1133
1134         if (match_end)
1135                 *match_end = next;
1136
1137         /* pass NULL for match_start, since we don't need to find the
1138          * start again.
1139          */
1140         return lines_match (&next, lines, visible_only, slice, NULL, match_end);
1141 }
1142
1143 /* strsplit () that retains the delimiter as part of the string. */
1144 static gchar **
1145 strbreakup (const char *string,
1146             const char *delimiter,
1147             gint        max_tokens)
1148 {
1149         GSList *string_list = NULL, *slist;
1150         gchar **str_array, *s, *casefold, *new_string;
1151         guint i, n = 1;
1152
1153         g_return_val_if_fail (string != NULL, NULL);
1154         g_return_val_if_fail (delimiter != NULL, NULL);
1155
1156         if (max_tokens < 1)
1157                 max_tokens = G_MAXINT;
1158
1159         s = strstr (string, delimiter);
1160         if (s)
1161         {
1162                 guint delimiter_len = strlen (delimiter);
1163
1164                 do
1165                 {
1166                         guint len;
1167
1168                         len = s - string + delimiter_len;
1169                         new_string = g_new (gchar, len + 1);
1170                         strncpy (new_string, string, len);
1171                         new_string[len] = 0;
1172                         casefold = g_utf8_casefold (new_string, -1);
1173                         g_free (new_string);
1174                         new_string = g_utf8_normalize (casefold, -1, G_NORMALIZE_NFD);
1175                         g_free (casefold);
1176                         string_list = g_slist_prepend (string_list, new_string);
1177                         n++;
1178                         string = s + delimiter_len;
1179                         s = strstr (string, delimiter);
1180                 } while (--max_tokens && s);
1181         }
1182
1183         if (*string)
1184         {
1185                 n++;
1186                 casefold = g_utf8_casefold (string, -1);
1187                 new_string = g_utf8_normalize (casefold, -1, G_NORMALIZE_NFD);
1188                 g_free (casefold);
1189                 string_list = g_slist_prepend (string_list, new_string);
1190         }
1191
1192         str_array = g_new (gchar*, n);
1193
1194         i = n - 1;
1195
1196         str_array[i--] = NULL;
1197         for (slist = string_list; slist; slist = slist->next)
1198                 str_array[i--] = slist->data;
1199
1200         g_slist_free (string_list);
1201
1202         return str_array;
1203 }
1204
1205 gboolean
1206 empathy_text_iter_forward_search (const GtkTextIter   *iter,
1207                                  const gchar         *str,
1208                                  GtkTextIter         *match_start,
1209                                  GtkTextIter         *match_end,
1210                                  const GtkTextIter   *limit)
1211 {
1212         gchar **lines = NULL;
1213         GtkTextIter match;
1214         gboolean retval = FALSE;
1215         GtkTextIter search;
1216         gboolean visible_only;
1217         gboolean slice;
1218
1219         g_return_val_if_fail (iter != NULL, FALSE);
1220         g_return_val_if_fail (str != NULL, FALSE);
1221
1222         if (limit && gtk_text_iter_compare (iter, limit) >= 0)
1223                 return FALSE;
1224
1225         if (*str == '\0') {
1226                 /* If we can move one char, return the empty string there */
1227                 match = *iter;
1228
1229                 if (gtk_text_iter_forward_char (&match)) {
1230                         if (limit && gtk_text_iter_equal (&match, limit)) {
1231                                 return FALSE;
1232                         }
1233
1234                         if (match_start) {
1235                                 *match_start = match;
1236                         }
1237                         if (match_end) {
1238                                 *match_end = match;
1239                         }
1240                         return TRUE;
1241                 } else {
1242                         return FALSE;
1243                 }
1244         }
1245
1246         visible_only = TRUE;
1247         slice = FALSE;
1248
1249         /* locate all lines */
1250         lines = strbreakup (str, "\n", -1);
1251
1252         search = *iter;
1253
1254         do {
1255                 /* This loop has an inefficient worst-case, where
1256                  * gtk_text_iter_get_text () is called repeatedly on
1257                  * a single line.
1258                  */
1259                 GtkTextIter end;
1260
1261                 if (limit && gtk_text_iter_compare (&search, limit) >= 0) {
1262                         break;
1263                 }
1264
1265                 if (lines_match (&search, (const gchar**)lines,
1266                                  visible_only, slice, &match, &end)) {
1267                         if (limit == NULL ||
1268                             (limit && gtk_text_iter_compare (&end, limit) <= 0)) {
1269                                 retval = TRUE;
1270
1271                                 if (match_start) {
1272                                         *match_start = match;
1273                                 }
1274                                 if (match_end) {
1275                                         *match_end = end;
1276                                 }
1277                         }
1278                         break;
1279                 }
1280         } while (gtk_text_iter_forward_line (&search));
1281
1282         g_strfreev ((gchar **) lines);
1283
1284         return retval;
1285 }
1286
1287 static const gchar *
1288 g_utf8_strrcasestr (const gchar *haystack, const gchar *needle)
1289 {
1290         gsize needle_len;
1291         gsize haystack_len;
1292         const gchar *ret = NULL;
1293         gchar *p;
1294         gchar *casefold;
1295         gchar *caseless_haystack;
1296         gint i;
1297
1298         g_return_val_if_fail (haystack != NULL, NULL);
1299         g_return_val_if_fail (needle != NULL, NULL);
1300
1301         casefold = g_utf8_casefold (haystack, -1);
1302         caseless_haystack = g_utf8_normalize (casefold, -1, G_NORMALIZE_NFD);
1303         g_free (casefold);
1304
1305         needle_len = g_utf8_strlen (needle, -1);
1306         haystack_len = g_utf8_strlen (caseless_haystack, -1);
1307
1308         if (needle_len == 0)
1309         {
1310                 ret = (gchar *) haystack;
1311                 goto finally_1;
1312         }
1313
1314         if (haystack_len < needle_len)
1315         {
1316                 ret = NULL;
1317                 goto finally_1;
1318         }
1319
1320         i = haystack_len - needle_len;
1321         p = g_utf8_offset_to_pointer (caseless_haystack, i);
1322         needle_len = strlen (needle);
1323
1324         while (p >= caseless_haystack)
1325         {
1326                 if (strncmp (p, needle, needle_len) == 0)
1327                 {
1328                         ret = pointer_from_offset_skipping_decomp (haystack, i);
1329                         goto finally_1;
1330                 }
1331
1332                 p = g_utf8_prev_char (p);
1333                 i--;
1334         }
1335
1336 finally_1:
1337         g_free (caseless_haystack);
1338
1339         return ret;
1340 }
1341
1342 static gboolean
1343 backward_lines_match (const GtkTextIter *start,
1344                       const gchar      **lines,
1345                       gboolean           visible_only,
1346                       gboolean           slice,
1347                       GtkTextIter       *match_start,
1348                       GtkTextIter       *match_end)
1349 {
1350         GtkTextIter line, next;
1351         gchar *line_text;
1352         const gchar *found;
1353         gint offset;
1354
1355         if (*lines == NULL || **lines == '\0')
1356         {
1357                 if (match_start)
1358                         *match_start = *start;
1359                 if (match_end)
1360                         *match_end = *start;
1361                 return TRUE;
1362         }
1363
1364         line = next = *start;
1365         if (gtk_text_iter_get_line_offset (&next) == 0)
1366         {
1367                 if (!gtk_text_iter_backward_line (&next))
1368                         return FALSE;
1369         }
1370         else
1371                 gtk_text_iter_set_line_offset (&next, 0);
1372
1373         if (slice)
1374         {
1375                 if (visible_only)
1376                         line_text = gtk_text_iter_get_visible_slice (&next, &line);
1377                 else
1378                         line_text = gtk_text_iter_get_slice (&next, &line);
1379         }
1380         else
1381         {
1382                 if (visible_only)
1383                         line_text = gtk_text_iter_get_visible_text (&next, &line);
1384                 else
1385                         line_text = gtk_text_iter_get_text (&next, &line);
1386         }
1387
1388         if (match_start) /* if this is the first line we're matching */
1389         {
1390                 found = g_utf8_strrcasestr (line_text, *lines);
1391         }
1392         else
1393         {
1394                 /* If it's not the first line, we have to match from the
1395                  * start of the line.
1396                  */
1397                 if (g_utf8_caselessnmatch (line_text, *lines, strlen (line_text),
1398                                            strlen (*lines)))
1399                         found = line_text;
1400                 else
1401                         found = NULL;
1402         }
1403
1404         if (found == NULL)
1405         {
1406                 g_free (line_text);
1407                 return FALSE;
1408         }
1409
1410         /* Get offset to start of search string */
1411         offset = g_utf8_strlen (line_text, found - line_text);
1412
1413         forward_chars_with_skipping (&next, offset, visible_only, !slice, FALSE);
1414
1415         /* If match start needs to be returned, set it to the
1416          * start of the search string.
1417          */
1418         if (match_start)
1419         {
1420                 *match_start = next;
1421         }
1422
1423         /* Go to end of search string */
1424         forward_chars_with_skipping (&next, g_utf8_strlen (*lines, -1), visible_only, !slice, TRUE);
1425
1426         g_free (line_text);
1427
1428         ++lines;
1429
1430         if (match_end)
1431                 *match_end = next;
1432
1433         /* try to match the rest of the lines forward, passing NULL
1434          * for match_start so lines_match will try to match the entire
1435          * line */
1436         return lines_match (&next, lines, visible_only,
1437                             slice, NULL, match_end);
1438 }
1439
1440 gboolean
1441 empathy_text_iter_backward_search (const GtkTextIter   *iter,
1442                                   const gchar         *str,
1443                                   GtkTextIter         *match_start,
1444                                   GtkTextIter         *match_end,
1445                                   const GtkTextIter   *limit)
1446 {
1447         gchar **lines = NULL;
1448         GtkTextIter match;
1449         gboolean retval = FALSE;
1450         GtkTextIter search;
1451         gboolean visible_only;
1452         gboolean slice;
1453
1454         g_return_val_if_fail (iter != NULL, FALSE);
1455         g_return_val_if_fail (str != NULL, FALSE);
1456
1457         if (limit && gtk_text_iter_compare (iter, limit) <= 0)
1458                 return FALSE;
1459
1460         if (*str == '\0')
1461         {
1462                 /* If we can move one char, return the empty string there */
1463                 match = *iter;
1464
1465                 if (gtk_text_iter_backward_char (&match))
1466                 {
1467                         if (limit && gtk_text_iter_equal (&match, limit))
1468                                 return FALSE;
1469
1470                         if (match_start)
1471                                 *match_start = match;
1472                         if (match_end)
1473                                 *match_end = match;
1474                         return TRUE;
1475                 }
1476                 else
1477                 {
1478                         return FALSE;
1479                 }
1480         }
1481
1482         visible_only = TRUE;
1483         slice = TRUE;
1484
1485         /* locate all lines */
1486         lines = strbreakup (str, "\n", -1);
1487
1488         search = *iter;
1489
1490         while (TRUE)
1491         {
1492                 /* This loop has an inefficient worst-case, where
1493                  * gtk_text_iter_get_text () is called repeatedly on
1494                  * a single line.
1495                  */
1496                 GtkTextIter end;
1497
1498                 if (limit && gtk_text_iter_compare (&search, limit) <= 0)
1499                         break;
1500
1501                 if (backward_lines_match (&search, (const gchar**)lines,
1502                                           visible_only, slice, &match, &end))
1503                 {
1504                         if (limit == NULL || (limit &&
1505                                               gtk_text_iter_compare (&end, limit) > 0))
1506                         {
1507                                 retval = TRUE;
1508
1509                                 if (match_start)
1510                                         *match_start = match;
1511                                 if (match_end)
1512                                         *match_end = end;
1513                         }
1514                         break;
1515                 }
1516
1517                 if (gtk_text_iter_get_line_offset (&search) == 0)
1518                 {
1519                         if (!gtk_text_iter_backward_line (&search))
1520                                 break;
1521                 }
1522                 else
1523                 {
1524                         gtk_text_iter_set_line_offset (&search, 0);
1525                 }
1526         }
1527
1528         g_strfreev ((gchar **) lines);
1529
1530         return retval;
1531 }
1532
1533 gboolean
1534 empathy_window_get_is_visible (GtkWindow *window)
1535 {
1536         GdkWindowState  state;
1537         GdkWindow      *gdk_window;
1538
1539         g_return_val_if_fail (GTK_IS_WINDOW (window), FALSE);
1540
1541         gdk_window = gtk_widget_get_window (GTK_WIDGET (window));
1542         if (!gdk_window) {
1543                 return FALSE;
1544         }
1545
1546         state = gdk_window_get_state (gdk_window);
1547         if (state & (GDK_WINDOW_STATE_WITHDRAWN | GDK_WINDOW_STATE_ICONIFIED)) {
1548                 return FALSE;
1549         }
1550
1551         return TRUE;
1552 }
1553
1554 void
1555 empathy_window_iconify (GtkWindow *window, GtkStatusIcon *status_icon)
1556 {
1557         GdkRectangle  icon_location;
1558         gulong        data[4];
1559         Display      *dpy;
1560         GdkWindow    *gdk_window;
1561
1562         gtk_status_icon_get_geometry (status_icon, NULL, &icon_location, NULL);
1563         gdk_window = gtk_widget_get_window (GTK_WIDGET (window));
1564         dpy = gdk_x11_drawable_get_xdisplay (gdk_window);
1565
1566         data[0] = icon_location.x;
1567         data[1] = icon_location.y;
1568         data[2] = icon_location.width;
1569         data[3] = icon_location.height;
1570
1571         XChangeProperty (dpy,
1572                          GDK_WINDOW_XID (gdk_window),
1573                          gdk_x11_get_xatom_by_name_for_display (
1574                                 gdk_window_get_display (gdk_window),
1575                          "_NET_WM_ICON_GEOMETRY"),
1576                          XA_CARDINAL, 32, PropModeReplace,
1577                          (guchar *)&data, 4);
1578
1579         gtk_window_set_skip_taskbar_hint (window, TRUE);
1580         gtk_window_iconify (window);
1581 }
1582
1583 /* Takes care of moving the window to the current workspace. */
1584 void
1585 empathy_window_present_with_time (GtkWindow *window,
1586                         guint32 timestamp)
1587 {
1588         GdkWindow *gdk_window;
1589
1590         g_return_if_fail (GTK_IS_WINDOW (window));
1591
1592         /* Move the window to the current workspace before trying to show it.
1593          * This is the behaviour people expect when clicking on the statusbar icon. */
1594         gdk_window = gtk_widget_get_window (GTK_WIDGET (window));
1595         if (gdk_window) {
1596                 gint x, y;
1597                 gint w, h;
1598
1599                 /* Has no effect if the WM has viewports, like compiz */
1600                 gdk_x11_window_move_to_current_desktop (gdk_window);
1601
1602                 /* If window is still off-screen, hide it to force it to
1603                  * reposition on the current workspace. */
1604                 gtk_window_get_position (window, &x, &y);
1605                 gtk_window_get_size (window, &w, &h);
1606                 if (!EMPATHY_RECT_IS_ON_SCREEN (x, y, w, h))
1607                         gtk_widget_hide (GTK_WIDGET (window));
1608         }
1609
1610         if (timestamp == GDK_CURRENT_TIME)
1611                 gtk_window_present (window);
1612         else
1613                 gtk_window_present_with_time (window, timestamp);
1614
1615         gtk_window_set_skip_taskbar_hint (window, FALSE);
1616         gtk_window_deiconify (window);
1617 }
1618
1619 void
1620 empathy_window_present (GtkWindow *window)
1621 {
1622   empathy_window_present_with_time (window, gtk_get_current_event_time ());
1623 }
1624
1625 GtkWindow *
1626 empathy_get_toplevel_window (GtkWidget *widget)
1627 {
1628         GtkWidget *toplevel;
1629
1630         g_return_val_if_fail (GTK_IS_WIDGET (widget), NULL);
1631
1632         toplevel = gtk_widget_get_toplevel (widget);
1633         if (GTK_IS_WINDOW (toplevel) &&
1634             gtk_widget_is_toplevel (toplevel)) {
1635                 return GTK_WINDOW (toplevel);
1636         }
1637
1638         return NULL;
1639 }
1640
1641 /** empathy_make_absolute_url_len:
1642  * @url: an url
1643  * @len: a length
1644  *
1645  * Same as #empathy_make_absolute_url but for a limited string length
1646  */
1647 gchar *
1648 empathy_make_absolute_url_len (const gchar *url,
1649                                guint len)
1650 {
1651         g_return_val_if_fail (url != NULL, NULL);
1652
1653         if (g_str_has_prefix (url, "ghelp:") ||
1654             g_str_has_prefix (url, "mailto:") ||
1655             strstr (url, ":/")) {
1656                 return g_strndup (url, len);
1657         }
1658
1659         if (strstr (url, "@")) {
1660                 return g_strdup_printf ("mailto:%.*s", len, url);
1661         }
1662
1663         return g_strdup_printf ("http://%.*s", len, url);
1664 }
1665
1666 /** empathy_make_absolute_url:
1667  * @url: an url
1668  *
1669  * The URL opening code can't handle schemeless strings, so we try to be
1670  * smart and add http if there is no scheme or doesn't look like a mail
1671  * address. This should work in most cases, and let us click on strings
1672  * like "www.gnome.org".
1673  *
1674  * Returns: a newly allocated url with proper mailto: or http:// prefix, use
1675  * g_free when your are done with it
1676  */
1677 gchar *
1678 empathy_make_absolute_url (const gchar *url)
1679 {
1680         return empathy_make_absolute_url_len (url, strlen (url));
1681 }
1682
1683 void
1684 empathy_url_show (GtkWidget *parent,
1685                   const char *url)
1686 {
1687         gchar  *real_url;
1688         GError *error = NULL;
1689
1690         g_return_if_fail (parent == NULL || GTK_IS_WIDGET (parent));
1691         g_return_if_fail (url != NULL);
1692
1693         real_url = empathy_make_absolute_url (url);
1694
1695         gtk_show_uri (parent ? gtk_widget_get_screen (parent) : NULL, real_url,
1696                       gtk_get_current_event_time (), &error);
1697
1698         if (error) {
1699                 GtkWidget *dialog;
1700
1701                 dialog = gtk_message_dialog_new (NULL, 0,
1702                                                  GTK_MESSAGE_ERROR, GTK_BUTTONS_CLOSE,
1703                                                  _("Unable to open URI"));
1704                 gtk_message_dialog_format_secondary_text (GTK_MESSAGE_DIALOG (dialog),
1705                                                           "%s", error->message);
1706
1707                 g_signal_connect (dialog, "response",
1708                                   G_CALLBACK (gtk_widget_destroy),
1709                                   NULL);
1710                 gtk_window_present (GTK_WINDOW (dialog));
1711
1712                 g_clear_error (&error);
1713         }
1714
1715         g_free (real_url);
1716 }
1717
1718 void
1719 empathy_send_file (EmpathyContact *contact, GFile *file)
1720 {
1721         EmpathyFTFactory *factory;
1722         GtkRecentManager *manager;
1723         gchar *uri;
1724
1725         g_return_if_fail (EMPATHY_IS_CONTACT (contact));
1726         g_return_if_fail (G_IS_FILE (file));
1727
1728         factory = empathy_ft_factory_dup_singleton ();
1729
1730         empathy_ft_factory_new_transfer_outgoing (factory, contact, file);
1731
1732         uri = g_file_get_uri (file);
1733         manager = gtk_recent_manager_get_default ();
1734         gtk_recent_manager_add_item (manager, uri);
1735         g_free (uri);
1736
1737         g_object_unref (factory);
1738 }
1739
1740 void
1741 empathy_send_file_from_uri_list (EmpathyContact *contact, const gchar *uri_list)
1742 {
1743         const gchar *nl;
1744         GFile *file;
1745
1746         /* Only handle a single file for now.  It would be wicked cool to be
1747            able to do multiple files, offering to zip them or whatever like
1748            nautilus-sendto does.  Note that text/uri-list is defined to have
1749            each line terminated by \r\n, but we can be tolerant of applications
1750            that only use \n or don't terminate single-line entries.
1751         */
1752         nl = strstr (uri_list, "\r\n");
1753         if (!nl) {
1754                 nl = strchr (uri_list, '\n');
1755         }
1756         if (nl) {
1757                 gchar *uri = g_strndup (uri_list, nl - uri_list);
1758                 file = g_file_new_for_uri (uri);
1759                 g_free (uri);
1760         }
1761         else {
1762                 file = g_file_new_for_uri (uri_list);
1763         }
1764
1765         empathy_send_file (contact, file);
1766
1767         g_object_unref (file);
1768 }
1769
1770 static void
1771 file_manager_send_file_response_cb (GtkDialog      *widget,
1772                                     gint            response_id,
1773                                     EmpathyContact *contact)
1774 {
1775         GFile *file;
1776
1777         if (response_id == GTK_RESPONSE_OK) {
1778                 file = gtk_file_chooser_get_file (GTK_FILE_CHOOSER (widget));
1779
1780                 empathy_send_file (contact, file);
1781
1782                 g_object_unref (file);
1783         }
1784
1785         gtk_widget_destroy (GTK_WIDGET (widget));
1786 }
1787
1788 void
1789 empathy_send_file_with_file_chooser (EmpathyContact *contact)
1790 {
1791         GtkWidget               *widget;
1792         GtkWidget               *button;
1793
1794         g_return_if_fail (EMPATHY_IS_CONTACT (contact));
1795
1796         DEBUG ("Creating selection file chooser");
1797
1798         widget = gtk_file_chooser_dialog_new (_("Select a file"),
1799                                               NULL,
1800                                               GTK_FILE_CHOOSER_ACTION_OPEN,
1801                                               GTK_STOCK_CANCEL,
1802                                               GTK_RESPONSE_CANCEL,
1803                                               NULL);
1804
1805         /* send button */
1806         button = gtk_button_new_with_mnemonic (_("_Send"));
1807         gtk_button_set_image (GTK_BUTTON (button),
1808                 gtk_image_new_from_icon_name (EMPATHY_IMAGE_DOCUMENT_SEND,
1809                                               GTK_ICON_SIZE_BUTTON));
1810         gtk_widget_show (button);
1811         gtk_dialog_add_action_widget (GTK_DIALOG (widget), button,
1812                                       GTK_RESPONSE_OK);
1813         gtk_widget_set_can_default (button, TRUE);
1814         gtk_dialog_set_default_response (GTK_DIALOG (widget),
1815                                          GTK_RESPONSE_OK);
1816
1817         gtk_file_chooser_set_local_only (GTK_FILE_CHOOSER (widget), FALSE);
1818
1819         gtk_file_chooser_set_current_folder (GTK_FILE_CHOOSER (widget),
1820                 g_get_home_dir ());
1821
1822         g_signal_connect (widget, "response",
1823                           G_CALLBACK (file_manager_send_file_response_cb),
1824                           contact);
1825
1826         gtk_widget_show (widget);
1827 }
1828
1829 static void
1830 file_manager_receive_file_response_cb (GtkDialog *dialog,
1831                                        GtkResponseType response,
1832                                        EmpathyFTHandler *handler)
1833 {
1834         EmpathyFTFactory *factory;
1835         GFile *file;
1836
1837         if (response == GTK_RESPONSE_OK) {
1838                 factory = empathy_ft_factory_dup_singleton ();
1839                 file = gtk_file_chooser_get_file (GTK_FILE_CHOOSER (dialog));
1840
1841                 empathy_ft_factory_set_destination_for_incoming_handler
1842                         (factory, handler, file);
1843
1844                 g_object_unref (factory);
1845                 g_object_unref (file);
1846         } else {
1847                 /* unref the handler, as we dismissed the file chooser,
1848                  * and refused the transfer.
1849                  */
1850                 g_object_unref (handler);
1851         }
1852
1853         gtk_widget_destroy (GTK_WIDGET (dialog));
1854 }
1855
1856 void
1857 empathy_receive_file_with_file_chooser (EmpathyFTHandler *handler)
1858 {
1859         GtkWidget *widget;
1860         const gchar *dir;
1861         EmpathyContact *contact;
1862         gchar *title;
1863
1864         contact = empathy_ft_handler_get_contact (handler);
1865         g_assert (contact != NULL);
1866
1867         title = g_strdup_printf (_("Incoming file from %s"),
1868                 empathy_contact_get_alias (contact));
1869
1870         widget = gtk_file_chooser_dialog_new (title,
1871                                               NULL,
1872                                               GTK_FILE_CHOOSER_ACTION_SAVE,
1873                                               GTK_STOCK_CANCEL,
1874                                               GTK_RESPONSE_CANCEL,
1875                                               GTK_STOCK_SAVE,
1876                                               GTK_RESPONSE_OK,
1877                                               NULL);
1878         gtk_file_chooser_set_current_name (GTK_FILE_CHOOSER (widget),
1879                 empathy_ft_handler_get_filename (handler));
1880         gtk_file_chooser_set_do_overwrite_confirmation
1881                 (GTK_FILE_CHOOSER (widget), TRUE);
1882
1883         dir = g_get_user_special_dir (G_USER_DIRECTORY_DOWNLOAD);
1884         if (dir == NULL)
1885                 /* Fallback to $HOME if $XDG_DOWNLOAD_DIR is not set */
1886                 dir = g_get_home_dir ();
1887
1888         gtk_file_chooser_set_current_folder (GTK_FILE_CHOOSER (widget), dir);
1889
1890         g_signal_connect (widget, "response",
1891                 G_CALLBACK (file_manager_receive_file_response_cb), handler);
1892
1893         gtk_widget_show (widget);
1894         g_free (title);
1895 }