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