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-live-search.h"
  48 #include "empathy-smiley-manager.h"
  49
  50 #define DEBUG_FLAG EMPATHY_DEBUG_OTHER
  51 #include <libempathy/empathy-debug.h>
  52 #include <libempathy/empathy-utils.h>
  53 #include <libempathy/empathy-ft-factory.h>
  54
  55 void
  56 empathy_gtk_init (void)
  57 {
  58         static gboolean initialized = FALSE;
  59
  60         if (initialized)
  61                 return;
  62
  63         empathy_init ();
  64         gtk_icon_theme_append_search_path (gtk_icon_theme_get_default (),
  65                                            PKGDATADIR G_DIR_SEPARATOR_S "icons");
  66
  67         initialized = TRUE;
  68 }
  69
  70 static GtkBuilder *
  71 builder_get_file_valist (const gchar *filename,
  72                          const gchar *first_object,
  73                          va_list      args)
  74 {
  75         GtkBuilder  *gui;
  76         const gchar *name;
  77         GObject    **object_ptr;
  78         GError      *error = NULL;
  79
  80         DEBUG ("Loading file %s", filename);
  81
  82         gui = gtk_builder_new ();
  83         gtk_builder_set_translation_domain (gui, GETTEXT_PACKAGE);
  84         if (!gtk_builder_add_from_file (gui, filename, &error)) {
  85                 g_critical ("GtkBuilder Error (%s): %s",
  86                                 filename, error->message);
  87                 g_clear_error (&error);
  88                 g_object_unref (gui);
  89
  90                 /* we need to iterate and set all of the pointers to NULL */
  91                 for (name = first_object; name;
  92                      name = va_arg (args, const gchar *)) {
  93                         object_ptr = va_arg (args, GObject**);
  94
  95                         *object_ptr = NULL;
  96                 }
  97
  98                 return NULL;
  99         }
 100
 101         for (name = first_object; name; name = va_arg (args, const gchar *)) {
 102                 object_ptr = va_arg (args, GObject**);
 103
 104                 *object_ptr = gtk_builder_get_object (gui, name);
 105
 106                 if (!*object_ptr) {
 107                         g_warning ("File is missing object '%s'.", name);
 108                         continue;
 109                 }
 110         }
 111
 112         return gui;
 113 }
 114
 115 GtkBuilder *
 116 empathy_builder_get_file (const gchar *filename,
 117                           const gchar *first_object,
 118                           ...)
 119 {
 120         GtkBuilder *gui;
 121         va_list     args;
 122
 123         va_start (args, first_object);
 124         gui = builder_get_file_valist (filename, first_object, args);
 125         va_end (args);
 126
 127         return gui;
 128 }
 129
 130 void
 131 empathy_builder_connect (GtkBuilder  *gui,
 132                          gpointer     user_data,
 133                          const gchar *first_object,
 134                          ...)
 135 {
 136         va_list      args;
 137         const gchar *name;
 138         const gchar *sig;
 139         GObject     *object;
 140         GCallback    callback;
 141
 142         va_start (args, first_object);
 143         for (name = first_object; name; name = va_arg (args, const gchar *)) {
 144                 sig = va_arg (args, const gchar *);
 145                 callback = va_arg (args, GCallback);
 146
 147                 object = gtk_builder_get_object (gui, name);
 148                 if (!object) {
 149                         g_warning ("File is missing object '%s'.", name);
 150                         continue;
 151                 }
 152
 153                 g_signal_connect (object, sig, callback, user_data);
 154         }
 155
 156         va_end (args);
 157 }
 158
 159 GtkWidget *
 160 empathy_builder_unref_and_keep_widget (GtkBuilder *gui,
 161                                        GtkWidget  *widget)
 162 {
 163         /* On construction gui sinks the initial reference to widget. When gui
 164          * is finalized it will drop its ref to widget. We take our own ref to
 165          * prevent widget being finalised. The widget is forced to have a
 166          * floating reference, like when it was initially unowned so that it can
 167          * be used like any other GtkWidget. */
 168
 169         g_object_ref (widget);
 170         g_object_force_floating (G_OBJECT (widget));
 171         g_object_unref (gui);
 172
 173         return widget;
 174 }
 175
 176 const gchar *
 177 empathy_icon_name_for_presence (TpConnectionPresenceType presence)
 178 {
 179         switch (presence) {
 180         case TP_CONNECTION_PRESENCE_TYPE_AVAILABLE:
 181                 return EMPATHY_IMAGE_AVAILABLE;
 182         case TP_CONNECTION_PRESENCE_TYPE_BUSY:
 183                 return EMPATHY_IMAGE_BUSY;
 184         case TP_CONNECTION_PRESENCE_TYPE_AWAY:
 185                 return EMPATHY_IMAGE_AWAY;
 186         case TP_CONNECTION_PRESENCE_TYPE_EXTENDED_AWAY:
 187                 if (gtk_icon_theme_has_icon (gtk_icon_theme_get_default (),
 188                                              EMPATHY_IMAGE_EXT_AWAY))
 189                         return EMPATHY_IMAGE_EXT_AWAY;
 190
 191                 /* The 'extended-away' icon is not an official one so we fallback to idle if
 192                  * it's not implemented */
 193                 return EMPATHY_IMAGE_IDLE;
 194         case TP_CONNECTION_PRESENCE_TYPE_HIDDEN:
 195                 if (gtk_icon_theme_has_icon (gtk_icon_theme_get_default (),
 196                                              EMPATHY_IMAGE_HIDDEN))
 197                         return EMPATHY_IMAGE_HIDDEN;
 198
 199                 /* The 'hidden' icon is not an official one so we fallback to offline if
 200                  * it's not implemented */
 201                 return EMPATHY_IMAGE_OFFLINE;
 202         case TP_CONNECTION_PRESENCE_TYPE_OFFLINE:
 203         case TP_CONNECTION_PRESENCE_TYPE_ERROR:
 204                 return EMPATHY_IMAGE_OFFLINE;
 205         case TP_CONNECTION_PRESENCE_TYPE_UNKNOWN:
 206                 return EMPATHY_IMAGE_PENDING;
 207         case TP_CONNECTION_PRESENCE_TYPE_UNSET:
 208         default:
 209                 return NULL;
 210         }
 211
 212         return NULL;
 213 }
 214
 215 const gchar *
 216 empathy_icon_name_for_contact (EmpathyContact *contact)
 217 {
 218         TpConnectionPresenceType presence;
 219
 220         g_return_val_if_fail (EMPATHY_IS_CONTACT (contact),
 221                               EMPATHY_IMAGE_OFFLINE);
 222
 223         presence = empathy_contact_get_presence (contact);
 224         return empathy_icon_name_for_presence (presence);
 225 }
 226
 227 const gchar *
 228 empathy_icon_name_for_individual (FolksIndividual *individual)
 229 {
 230         FolksPresenceType folks_presence;
 231         TpConnectionPresenceType presence;
 232
 233         folks_presence =
 234             folks_presence_details_get_presence_type (
 235                 FOLKS_PRESENCE_DETAILS (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 height, rowstride, i;
 410         guchar *pixels;
 411         guchar *row;
 412
 413         height = gdk_pixbuf_get_height (pixbuf);
 414         rowstride = gdk_pixbuf_get_rowstride (pixbuf);
 415         pixels = gdk_pixbuf_get_pixels (pixbuf);
 416
 417         row = pixels;
 418         for (i = 3; i < rowstride; i+=4) {
 419                 if (row[i] < 0xfe) {
 420                         return FALSE;
 421                 }
 422         }
 423
 424         for (i = 1; i < height - 1; i++) {
 425                 row = pixels + (i*rowstride);
 426                 if (row[3] < 0xfe || row[rowstride-1] < 0xfe) {
 427                         return FALSE;
 428                 }
 429         }
 430
 431         row = pixels + ((height-1) * rowstride);
 432         for (i = 3; i < rowstride; i+=4) {
 433                 if (row[i] < 0xfe) {
 434                         return FALSE;
 435                 }
 436         }
 437
 438         return TRUE;
 439 }
 440
 441 static GdkPixbuf *
 442 avatar_pixbuf_from_loader (GdkPixbufLoader *loader)
 443 {
 444         GdkPixbuf *pixbuf;
 445
 446         pixbuf = gdk_pixbuf_loader_get_pixbuf (loader);
 447         if (!gdk_pixbuf_get_has_alpha (pixbuf)) {
 448                 GdkPixbuf *rounded_pixbuf;
 449
 450                 rounded_pixbuf = gdk_pixbuf_new (GDK_COLORSPACE_RGB, TRUE, 8,
 451                                                  gdk_pixbuf_get_width (pixbuf),
 452                                                  gdk_pixbuf_get_height (pixbuf));
 453                 gdk_pixbuf_copy_area (pixbuf, 0, 0,
 454                                       gdk_pixbuf_get_width (pixbuf),
 455                                       gdk_pixbuf_get_height (pixbuf),
 456                                       rounded_pixbuf,
 457                                       0, 0);
 458                 pixbuf = rounded_pixbuf;
 459         } else {
 460                 g_object_ref (pixbuf);
 461         }
 462
 463         if (empathy_gdk_pixbuf_is_opaque (pixbuf)) {
 464                 empathy_avatar_pixbuf_roundify (pixbuf);
 465         }
 466
 467         return pixbuf;
 468 }
 469
 470 GdkPixbuf *
 471 empathy_pixbuf_from_avatar_scaled (EmpathyAvatar *avatar,
 472                                   gint          width,
 473                                   gint          height)
 474 {
 475         GdkPixbuf        *pixbuf;
 476         GdkPixbufLoader  *loader;
 477         struct SizeData   data;
 478         GError           *error = NULL;
 479
 480         if (!avatar) {
 481                 return NULL;
 482         }
 483
 484         data.width = width;
 485         data.height = height;
 486         data.preserve_aspect_ratio = TRUE;
 487
 488         loader = gdk_pixbuf_loader_new ();
 489
 490         g_signal_connect (loader, "size-prepared",
 491                           G_CALLBACK (pixbuf_from_avatar_size_prepared_cb),
 492                           &data);
 493
 494         if (!gdk_pixbuf_loader_write (loader, avatar->data, avatar->len, &error)) {
 495                 g_warning ("Couldn't write avatar image:%p with "
 496                            "length:%" G_GSIZE_FORMAT " to pixbuf loader: %s",
 497                            avatar->data, avatar->len, error->message);
 498                 g_error_free (error);
 499                 return NULL;
 500         }
 501
 502         gdk_pixbuf_loader_close (loader, NULL);
 503         pixbuf = avatar_pixbuf_from_loader (loader);
 504
 505         g_object_unref (loader);
 506
 507         return pixbuf;
 508 }
 509
 510 GdkPixbuf *
 511 empathy_pixbuf_avatar_from_contact_scaled (EmpathyContact *contact,
 512                                           gint           width,
 513                                           gint           height)
 514 {
 515         EmpathyAvatar *avatar;
 516
 517         g_return_val_if_fail (EMPATHY_IS_CONTACT (contact), NULL);
 518
 519         avatar = empathy_contact_get_avatar (contact);
 520
 521         return empathy_pixbuf_from_avatar_scaled (avatar, width, height);
 522 }
 523
 524 typedef struct {
 525         FolksIndividual *individual;
 526         GSimpleAsyncResult *result;
 527         guint width;
 528         guint height;
 529         struct SizeData size_data;
 530         GdkPixbufLoader *loader;
 531         GCancellable *cancellable;
 532         guint8 data[512];
 533 } PixbufAvatarFromIndividualClosure;
 534
 535 static PixbufAvatarFromIndividualClosure *
 536 pixbuf_avatar_from_individual_closure_new (FolksIndividual    *individual,
 537                                            GSimpleAsyncResult *result,
 538                                            gint                width,
 539                                            gint                height,
 540                                            GCancellable       *cancellable)
 541 {
 542         PixbufAvatarFromIndividualClosure *closure;
 543
 544         g_return_val_if_fail (FOLKS_IS_INDIVIDUAL (individual), NULL);
 545         g_return_val_if_fail (G_IS_ASYNC_RESULT (result), NULL);
 546
 547         closure = g_new0 (PixbufAvatarFromIndividualClosure, 1);
 548         closure->individual = g_object_ref (individual);
 549         closure->result = g_object_ref (result);
 550         closure->width = width;
 551         closure->height = height;
 552         closure->cancellable = g_object_ref (cancellable);
 553
 554         return closure;
 555 }
 556
 557 static void
 558 pixbuf_avatar_from_individual_closure_free (
 559                 PixbufAvatarFromIndividualClosure *closure)
 560 {
 561         g_object_unref (closure->cancellable);
 562         tp_clear_object (&closure->loader);
 563         g_object_unref (closure->individual);
 564         g_object_unref (closure->result);
 565         g_free (closure);
 566 }
 567
 568 static void
 569 avatar_icon_load_close_cb (GObject      *object,
 570                            GAsyncResult *result,
 571                            gpointer      user_data)
 572 {
 573         GError *error = NULL;
 574
 575         g_input_stream_close_finish (G_INPUT_STREAM (object), result, &error);
 576
 577         if (error != NULL) {
 578                 DEBUG ("Failed to close pixbuf stream: %s", error->message);
 579                 g_error_free (error);
 580         }
 581 }
 582
 583 static void
 584 avatar_icon_load_read_cb (GObject      *object,
 585                           GAsyncResult *result,
 586                           gpointer      user_data)
 587 {
 588         GInputStream *stream = G_INPUT_STREAM (object);
 589         PixbufAvatarFromIndividualClosure *closure = user_data;
 590         gssize n_read;
 591         GError *error = NULL;
 592
 593         /* Finish reading this chunk from the stream */
 594         n_read = g_input_stream_read_finish (stream, result, &error);
 595         if (error != NULL) {
 596                 DEBUG ("Failed to finish read from pixbuf stream: %s",
 597                         error->message);
 598                 g_simple_async_result_set_from_error (closure->result, error);
 599                 goto out_close;
 600         }
 601
 602         /* Write the chunk to the pixbuf loader */
 603         if (!gdk_pixbuf_loader_write (closure->loader, (guchar *) closure->data,
 604                         n_read, &error)) {
 605                 DEBUG ("Failed to write to pixbuf loader: %s",
 606                         error ? error->message : "No error given");
 607                 g_simple_async_result_set_from_error (closure->result, error);
 608                 goto out_close;
 609         }
 610
 611         if (n_read == 0) {
 612                 /* EOF? */
 613                 if (!gdk_pixbuf_loader_close (closure->loader, &error)) {
 614                         DEBUG ("Failed to close pixbuf loader: %s",
 615                                 error ? error->message : "No error given");
 616                         g_simple_async_result_set_from_error (closure->result, error);
 617                         goto out;
 618                 }
 619
 620                 /* We're done. */
 621                 g_simple_async_result_set_op_res_gpointer (closure->result,
 622                         avatar_pixbuf_from_loader (closure->loader),
 623                         g_object_unref);
 624
 625                 goto out;
 626         } else {
 627                 /* Loop round and read another chunk. */
 628                 g_input_stream_read_async (stream, closure->data,
 629                         G_N_ELEMENTS (closure->data),
 630                         G_PRIORITY_DEFAULT, closure->cancellable,
 631                         avatar_icon_load_read_cb, closure);
 632
 633                 return;
 634         }
 635
 636 out_close:
 637         /* We must close the pixbuf loader before unreffing it. */
 638         gdk_pixbuf_loader_close (closure->loader, NULL);
 639
 640 out:
 641         /* Close the file for safety (even though it should be
 642          * automatically closed when the stream is finalised). */
 643         g_input_stream_close_async (stream, G_PRIORITY_DEFAULT, NULL,
 644                 (GAsyncReadyCallback) avatar_icon_load_close_cb, NULL);
 645
 646         g_simple_async_result_complete (closure->result);
 647
 648         g_clear_error (&error);
 649         pixbuf_avatar_from_individual_closure_free (closure);
 650 }
 651
 652 static void
 653 avatar_icon_load_cb (GObject      *object,
 654                      GAsyncResult *result,
 655                      gpointer      user_data)
 656 {
 657         GLoadableIcon *icon = G_LOADABLE_ICON (object);
 658         PixbufAvatarFromIndividualClosure *closure = user_data;
 659         GInputStream *stream;
 660         GError *error = NULL;
 661
 662         stream = g_loadable_icon_load_finish (icon, result, NULL, &error);
 663         if (error != NULL) {
 664                 DEBUG ("Failed to open avatar stream: %s", error->message);
 665                 g_simple_async_result_set_from_error (closure->result, error);
 666                 goto out;
 667         }
 668
 669         closure->size_data.width = closure->width;
 670         closure->size_data.height = closure->height;
 671         closure->size_data.preserve_aspect_ratio = TRUE;
 672
 673         /* Load the data into a pixbuf loader in chunks. */
 674         closure->loader = gdk_pixbuf_loader_new ();
 675
 676         g_signal_connect (closure->loader, "size-prepared",
 677                           G_CALLBACK (pixbuf_from_avatar_size_prepared_cb),
 678                           &(closure->size_data));
 679
 680         /* Begin to read the first chunk. */
 681         g_input_stream_read_async (stream, closure->data,
 682                         G_N_ELEMENTS (closure->data),
 683                         G_PRIORITY_DEFAULT, closure->cancellable,
 684                         avatar_icon_load_read_cb, closure);
 685
 686         g_object_unref (stream);
 687
 688         return;
 689
 690 out:
 691         g_simple_async_result_complete (closure->result);
 692
 693         g_clear_error (&error);
 694         tp_clear_object (&stream);
 695         pixbuf_avatar_from_individual_closure_free (closure);
 696 }
 697
 698 void
 699 empathy_pixbuf_avatar_from_individual_scaled_async (
 700                 FolksIndividual     *individual,
 701                 gint                 width,
 702                 gint                 height,
 703                 GCancellable        *cancellable,
 704                 GAsyncReadyCallback  callback,
 705                 gpointer             user_data)
 706 {
 707         GLoadableIcon *avatar_icon;
 708         GSimpleAsyncResult *result;
 709         PixbufAvatarFromIndividualClosure *closure;
 710
 711         result = g_simple_async_result_new (G_OBJECT (individual),
 712                         callback, user_data,
 713                         empathy_pixbuf_avatar_from_individual_scaled_async);
 714
 715         avatar_icon =
 716                 folks_avatar_details_get_avatar (FOLKS_AVATAR_DETAILS (individual));
 717         if (avatar_icon == NULL)
 718                 goto out;
 719
 720         closure = pixbuf_avatar_from_individual_closure_new (individual, result,
 721                                                              width, height,
 722                                                              cancellable);
 723         if (closure == NULL)
 724                 goto out;
 725
 726         g_loadable_icon_load_async (avatar_icon, width, cancellable,
 727                         avatar_icon_load_cb, closure);
 728
 729         g_object_unref (result);
 730
 731         return;
 732
 733 out:
 734         g_simple_async_result_set_op_res_gpointer (result, NULL, NULL);
 735         g_simple_async_result_complete (result);
 736         g_object_unref (result);
 737 }
 738
 739 /* Return a ref on the GdkPixbuf */
 740 GdkPixbuf *
 741 empathy_pixbuf_avatar_from_individual_scaled_finish (
 742                 FolksIndividual *individual,
 743                 GAsyncResult *result,
 744                 GError **error)
 745 {
 746         GSimpleAsyncResult *simple = G_SIMPLE_ASYNC_RESULT (result);
 747         gboolean result_valid;
 748         GdkPixbuf *pixbuf;
 749
 750         g_return_val_if_fail (FOLKS_IS_INDIVIDUAL (individual), NULL);
 751         g_return_val_if_fail (G_IS_SIMPLE_ASYNC_RESULT (simple), NULL);
 752
 753         if (g_simple_async_result_propagate_error (simple, error))
 754                 return NULL;
 755
 756         result_valid = g_simple_async_result_is_valid (result,
 757                         G_OBJECT (individual),
 758                         empathy_pixbuf_avatar_from_individual_scaled_async);
 759         g_return_val_if_fail (result_valid, NULL);
 760
 761         pixbuf = g_simple_async_result_get_op_res_gpointer (simple);
 762         return pixbuf != NULL ? g_object_ref (pixbuf) : NULL;
 763 }
 764
 765 GdkPixbuf *
 766 empathy_pixbuf_contact_status_icon (EmpathyContact *contact,
 767                                    gboolean       show_protocol)
 768 {
 769         const gchar *icon_name;
 770
 771         g_return_val_if_fail (EMPATHY_IS_CONTACT (contact), NULL);
 772
 773         icon_name = empathy_icon_name_for_contact (contact);
 774
 775         if (icon_name == NULL) {
 776                 return NULL;
 777         }
 778         return empathy_pixbuf_contact_status_icon_with_icon_name (contact,
 779             icon_name,
 780             show_protocol);
 781 }
 782
 783 GdkPixbuf *
 784 empathy_pixbuf_contact_status_icon_with_icon_name (EmpathyContact *contact,
 785                                           const gchar    *icon_name,
 786                                           gboolean       show_protocol)
 787 {
 788         GdkPixbuf *pix_status;
 789         GdkPixbuf *pix_protocol;
 790         gchar     *icon_filename;
 791         gint       height, width;
 792         gint       numerator, denominator;
 793
 794         g_return_val_if_fail (EMPATHY_IS_CONTACT (contact) ||
 795                         (show_protocol == FALSE), NULL);
 796         g_return_val_if_fail (icon_name != NULL, NULL);
 797
 798         numerator = 3;
 799         denominator = 4;
 800
 801         icon_filename = empathy_filename_from_icon_name (icon_name,
 802                                                          GTK_ICON_SIZE_MENU);
 803         if (icon_filename == NULL) {
 804                 DEBUG ("icon name: %s could not be found\n", icon_name);
 805                 return NULL;
 806         }
 807
 808         pix_status = gdk_pixbuf_new_from_file (icon_filename, NULL);
 809
 810         if (pix_status == NULL) {
 811                 DEBUG ("Could not open icon %s\n", icon_filename);
 812                 g_free (icon_filename);
 813                 return NULL;
 814         }
 815
 816         g_free (icon_filename);
 817
 818         if (!show_protocol)
 819                 return pix_status;
 820
 821         height = gdk_pixbuf_get_height (pix_status);
 822         width = gdk_pixbuf_get_width (pix_status);
 823
 824         pix_protocol = empathy_pixbuf_protocol_from_contact_scaled (contact,
 825                                                                     width * numerator / denominator,
 826                                                                     height * numerator / denominator);
 827
 828         if (pix_protocol == NULL) {
 829                 return pix_status;
 830         }
 831         gdk_pixbuf_composite (pix_protocol, pix_status,
 832             0, height - height * numerator / denominator,
 833             width * numerator / denominator, height * numerator / denominator,
 834             0, height - height * numerator / denominator,
 835             1, 1,
 836             GDK_INTERP_BILINEAR, 255);
 837
 838         g_object_unref (pix_protocol);
 839
 840         return pix_status;
 841 }
 842
 843 GdkPixbuf *
 844 empathy_pixbuf_protocol_from_contact_scaled (EmpathyContact *contact,
 845                                           gint           width,
 846                                           gint           height)
 847 {
 848         TpAccount *account;
 849         gchar     *filename;
 850         GdkPixbuf *pixbuf = NULL;
 851
 852         g_return_val_if_fail (EMPATHY_IS_CONTACT (contact), NULL);
 853
 854         account = empathy_contact_get_account (contact);
 855         filename = empathy_filename_from_icon_name (tp_account_get_icon_name (account),
 856                                                     GTK_ICON_SIZE_MENU);
 857         if (filename != NULL) {
 858                 pixbuf = gdk_pixbuf_new_from_file_at_size (filename, width, height, NULL);
 859                 g_free (filename);
 860         }
 861
 862         return pixbuf;
 863 }
 864
 865 GdkPixbuf *
 866 empathy_pixbuf_scale_down_if_necessary (GdkPixbuf *pixbuf, gint max_size)
 867 {
 868         gint      width, height;
 869         gdouble   factor;
 870
 871         width = gdk_pixbuf_get_width (pixbuf);
 872         height = gdk_pixbuf_get_height (pixbuf);
 873
 874         if (width > 0 && (width > max_size || height > max_size)) {
 875                 factor = (gdouble) max_size / MAX (width, height);
 876
 877                 width = width * factor;
 878                 height = height * factor;
 879
 880                 return gdk_pixbuf_scale_simple (pixbuf,
 881                                                 width, height,
 882                                                 GDK_INTERP_HYPER);
 883         }
 884
 885         return g_object_ref (pixbuf);
 886 }
 887
 888 GdkPixbuf *
 889 empathy_pixbuf_from_icon_name_sized (const gchar *icon_name,
 890                                      gint size)
 891 {
 892         GtkIconTheme *theme;
 893         GdkPixbuf *pixbuf;
 894         GError *error = NULL;
 895
 896         if (!icon_name) {
 897                 return NULL;
 898         }
 899
 900         theme = gtk_icon_theme_get_default ();
 901
 902         pixbuf = gtk_icon_theme_load_icon (theme,
 903                                            icon_name,
 904                                            size,
 905                                            0,
 906                                            &error);
 907         if (error) {
 908                 DEBUG ("Error loading icon: %s", error->message);
 909                 g_clear_error (&error);
 910         }
 911
 912         return pixbuf;
 913 }
 914
 915 GdkPixbuf *
 916 empathy_pixbuf_from_icon_name (const gchar *icon_name,
 917                                GtkIconSize  icon_size)
 918 {
 919         gint  w, h;
 920         gint  size = 48;
 921
 922         if (!icon_name) {
 923                 return NULL;
 924         }
 925
 926         if (gtk_icon_size_lookup (icon_size, &w, &h)) {
 927                 size = (w + h) / 2;
 928         }
 929
 930         return empathy_pixbuf_from_icon_name_sized (icon_name, size);
 931 }
 932
 933 gchar *
 934 empathy_filename_from_icon_name (const gchar *icon_name,
 935                                  GtkIconSize  icon_size)
 936 {
 937         GtkIconTheme *icon_theme;
 938         GtkIconInfo  *icon_info;
 939         gint          w, h;
 940         gint          size = 48;
 941         gchar        *ret;
 942
 943         icon_theme = gtk_icon_theme_get_default ();
 944
 945         if (gtk_icon_size_lookup (icon_size, &w, &h)) {
 946                 size = (w + h) / 2;
 947         }
 948
 949         icon_info = gtk_icon_theme_lookup_icon (icon_theme, icon_name, size, 0);
 950         if (icon_info == NULL)
 951                 return NULL;
 952
 953         ret = g_strdup (gtk_icon_info_get_filename (icon_info));
 954         gtk_icon_info_free (icon_info);
 955
 956         return ret;
 957 }
 958
 959 /* Stolen from GtkSourceView, hence the weird intendation. Please keep it like
 960  * that to make it easier to apply changes from the original code.
 961  */
 962 #define GTK_TEXT_UNKNOWN_CHAR 0xFFFC
 963
 964 /* this function acts like g_utf8_offset_to_pointer() except that if it finds a
 965  * decomposable character it consumes the decomposition length from the given
 966  * offset.  So it's useful when the offset was calculated for the normalized
 967  * version of str, but we need a pointer to str itself. */
 968 static const gchar *
 969 pointer_from_offset_skipping_decomp (const gchar *str, gint offset)
 970 {
 971         gchar *casefold, *normal;
 972         const gchar *p, *q;
 973
 974         p = str;
 975         while (offset > 0)
 976         {
 977                 q = g_utf8_next_char (p);
 978                 casefold = g_utf8_casefold (p, q - p);
 979                 normal = g_utf8_normalize (casefold, -1, G_NORMALIZE_NFD);
 980                 offset -= g_utf8_strlen (normal, -1);
 981                 g_free (casefold);
 982                 g_free (normal);
 983                 p = q;
 984         }
 985         return p;
 986 }
 987
 988 static const gchar *
 989 g_utf8_strcasestr (const gchar *haystack, const gchar *needle)
 990 {
 991         gsize needle_len;
 992         gsize haystack_len;
 993         const gchar *ret = NULL;
 994         gchar *p;
 995         gchar *casefold;
 996         gchar *caseless_haystack;
 997         gint i;
 998
 999         g_return_val_if_fail (haystack != NULL, NULL);
1000         g_return_val_if_fail (needle != NULL, NULL);
1001
1002         casefold = g_utf8_casefold (haystack, -1);
1003         caseless_haystack = g_utf8_normalize (casefold, -1, G_NORMALIZE_NFD);
1004         g_free (casefold);
1005
1006         needle_len = g_utf8_strlen (needle, -1);
1007         haystack_len = g_utf8_strlen (caseless_haystack, -1);
1008
1009         if (needle_len == 0)
1010         {
1011                 ret = (gchar *) haystack;
1012                 goto finally_1;
1013         }
1014
1015         if (haystack_len < needle_len)
1016         {
1017                 ret = NULL;
1018                 goto finally_1;
1019         }
1020
1021         p = (gchar *) caseless_haystack;
1022         needle_len = strlen (needle);
1023         i = 0;
1024
1025         while (*p)
1026         {
1027                 if ((strncmp (p, needle, needle_len) == 0))
1028                 {
1029                         ret = pointer_from_offset_skipping_decomp (haystack, i);
1030                         goto finally_1;
1031                 }
1032
1033                 p = g_utf8_next_char (p);
1034                 i++;
1035         }
1036
1037 finally_1:
1038         g_free (caseless_haystack);
1039
1040         return ret;
1041 }
1042
1043 static gboolean
1044 g_utf8_caselessnmatch (const char *s1, const char *s2,
1045                        gssize n1, gssize n2)
1046 {
1047         gchar *casefold;
1048         gchar *normalized_s1;
1049         gchar *normalized_s2;
1050         gint len_s1;
1051         gint len_s2;
1052         gboolean ret = FALSE;
1053
1054         g_return_val_if_fail (s1 != NULL, FALSE);
1055         g_return_val_if_fail (s2 != NULL, FALSE);
1056         g_return_val_if_fail (n1 > 0, FALSE);
1057         g_return_val_if_fail (n2 > 0, FALSE);
1058
1059         casefold = g_utf8_casefold (s1, n1);
1060         normalized_s1 = g_utf8_normalize (casefold, -1, G_NORMALIZE_NFD);
1061         g_free (casefold);
1062
1063         casefold = g_utf8_casefold (s2, n2);
1064         normalized_s2 = g_utf8_normalize (casefold, -1, G_NORMALIZE_NFD);
1065         g_free (casefold);
1066
1067         len_s1 = strlen (normalized_s1);
1068         len_s2 = strlen (normalized_s2);
1069
1070         if (len_s1 < len_s2)
1071                 goto finally_2;
1072
1073         ret = (strncmp (normalized_s1, normalized_s2, len_s2) == 0);
1074
1075 finally_2:
1076         g_free (normalized_s1);
1077         g_free (normalized_s2);
1078
1079         return ret;
1080 }
1081
1082 static void
1083 forward_chars_with_skipping (GtkTextIter *iter,
1084                              gint         count,
1085                              gboolean     skip_invisible,
1086                              gboolean     skip_nontext,
1087                              gboolean     skip_decomp)
1088 {
1089         gint i;
1090
1091         g_return_if_fail (count >= 0);
1092
1093         i = count;
1094
1095         while (i > 0)
1096         {
1097                 gboolean ignored = FALSE;
1098
1099                 /* minimal workaround to avoid the infinite loop of bug #168247.
1100                  * It doesn't fix the problemjust the symptom...
1101                  */
1102                 if (gtk_text_iter_is_end (iter))
1103                         return;
1104
1105                 if (skip_nontext && gtk_text_iter_get_char (iter) == GTK_TEXT_UNKNOWN_CHAR)
1106                         ignored = TRUE;
1107
1108                 if (!ignored && skip_invisible &&
1109                     /* _gtk_text_btree_char_is_invisible (iter)*/ FALSE)
1110                         ignored = TRUE;
1111
1112                 if (!ignored && skip_decomp)
1113                 {
1114                         /* being UTF8 correct sucks; this accounts for extra
1115                            offsets coming from canonical decompositions of
1116                            UTF8 characters (e.g. accented characters) which
1117                            g_utf8_normalize () performs */
1118                         gchar *normal;
1119                         gchar buffer[6];
1120                         gint buffer_len;
1121
1122                         buffer_len = g_unichar_to_utf8 (gtk_text_iter_get_char (iter), buffer);
1123                         normal = g_utf8_normalize (buffer, buffer_len, G_NORMALIZE_NFD);
1124                         i -= (g_utf8_strlen (normal, -1) - 1);
1125                         g_free (normal);
1126                 }
1127
1128                 gtk_text_iter_forward_char (iter);
1129
1130                 if (!ignored)
1131                         --i;
1132         }
1133 }
1134
1135 static gboolean
1136 lines_match (const GtkTextIter *start,
1137              const gchar      **lines,
1138              gboolean           visible_only,
1139              gboolean           slice,
1140              GtkTextIter       *match_start,
1141              GtkTextIter       *match_end)
1142 {
1143         GtkTextIter next;
1144         gchar *line_text;
1145         const gchar *found;
1146         gint offset;
1147
1148         if (*lines == NULL || **lines == '\0')
1149         {
1150                 if (match_start)
1151                         *match_start = *start;
1152                 if (match_end)
1153                         *match_end = *start;
1154                 return TRUE;
1155         }
1156
1157         next = *start;
1158         gtk_text_iter_forward_line (&next);
1159
1160         /* No more text in buffer, but *lines is nonempty */
1161         if (gtk_text_iter_equal (start, &next))
1162                 return FALSE;
1163
1164         if (slice)
1165         {
1166                 if (visible_only)
1167                         line_text = gtk_text_iter_get_visible_slice (start, &next);
1168                 else
1169                         line_text = gtk_text_iter_get_slice (start, &next);
1170         }
1171         else
1172         {
1173                 if (visible_only)
1174                         line_text = gtk_text_iter_get_visible_text (start, &next);
1175                 else
1176                         line_text = gtk_text_iter_get_text (start, &next);
1177         }
1178
1179         if (match_start) /* if this is the first line we're matching */
1180         {
1181                 found = g_utf8_strcasestr (line_text, *lines);
1182         }
1183         else
1184         {
1185                 /* If it's not the first line, we have to match from the
1186                  * start of the line.
1187                  */
1188                 if (g_utf8_caselessnmatch (line_text, *lines, strlen (line_text),
1189                                            strlen (*lines)))
1190                         found = line_text;
1191                 else
1192                         found = NULL;
1193         }
1194
1195         if (found == NULL)
1196         {
1197                 g_free (line_text);
1198                 return FALSE;
1199         }
1200
1201         /* Get offset to start of search string */
1202         offset = g_utf8_strlen (line_text, found - line_text);
1203
1204         next = *start;
1205
1206         /* If match start needs to be returned, set it to the
1207          * start of the search string.
1208          */
1209         forward_chars_with_skipping (&next, offset, visible_only, !slice, FALSE);
1210         if (match_start)
1211         {
1212                 *match_start = next;
1213         }
1214
1215         /* Go to end of search string */
1216         forward_chars_with_skipping (&next, g_utf8_strlen (*lines, -1), visible_only, !slice, TRUE);
1217
1218         g_free (line_text);
1219
1220         ++lines;
1221
1222         if (match_end)
1223                 *match_end = next;
1224
1225         /* pass NULL for match_start, since we don't need to find the
1226          * start again.
1227          */
1228         return lines_match (&next, lines, visible_only, slice, NULL, match_end);
1229 }
1230
1231 /* strsplit () that retains the delimiter as part of the string. */
1232 static gchar **
1233 strbreakup (const char *string,
1234             const char *delimiter,
1235             gint        max_tokens)
1236 {
1237         GSList *string_list = NULL, *slist;
1238         gchar **str_array, *s, *casefold, *new_string;
1239         guint i, n = 1;
1240
1241         g_return_val_if_fail (string != NULL, NULL);
1242         g_return_val_if_fail (delimiter != NULL, NULL);
1243
1244         if (max_tokens < 1)
1245                 max_tokens = G_MAXINT;
1246
1247         s = strstr (string, delimiter);
1248         if (s)
1249         {
1250                 guint delimiter_len = strlen (delimiter);
1251
1252                 do
1253                 {
1254                         guint len;
1255
1256                         len = s - string + delimiter_len;
1257                         new_string = g_new (gchar, len + 1);
1258                         strncpy (new_string, string, len);
1259                         new_string[len] = 0;
1260                         casefold = g_utf8_casefold (new_string, -1);
1261                         g_free (new_string);
1262                         new_string = g_utf8_normalize (casefold, -1, G_NORMALIZE_NFD);
1263                         g_free (casefold);
1264                         string_list = g_slist_prepend (string_list, new_string);
1265                         n++;
1266                         string = s + delimiter_len;
1267                         s = strstr (string, delimiter);
1268                 } while (--max_tokens && s);
1269         }
1270
1271         if (*string)
1272         {
1273                 n++;
1274                 casefold = g_utf8_casefold (string, -1);
1275                 new_string = g_utf8_normalize (casefold, -1, G_NORMALIZE_NFD);
1276                 g_free (casefold);
1277                 string_list = g_slist_prepend (string_list, new_string);
1278         }
1279
1280         str_array = g_new (gchar*, n);
1281
1282         i = n - 1;
1283
1284         str_array[i--] = NULL;
1285         for (slist = string_list; slist; slist = slist->next)
1286                 str_array[i--] = slist->data;
1287
1288         g_slist_free (string_list);
1289
1290         return str_array;
1291 }
1292
1293 gboolean
1294 empathy_text_iter_forward_search (const GtkTextIter   *iter,
1295                                  const gchar         *str,
1296                                  GtkTextIter         *match_start,
1297                                  GtkTextIter         *match_end,
1298                                  const GtkTextIter   *limit)
1299 {
1300         gchar **lines = NULL;
1301         GtkTextIter match;
1302         gboolean retval = FALSE;
1303         GtkTextIter search;
1304         gboolean visible_only;
1305         gboolean slice;
1306
1307         g_return_val_if_fail (iter != NULL, FALSE);
1308         g_return_val_if_fail (str != NULL, FALSE);
1309
1310         if (limit && gtk_text_iter_compare (iter, limit) >= 0)
1311                 return FALSE;
1312
1313         if (*str == '\0') {
1314                 /* If we can move one char, return the empty string there */
1315                 match = *iter;
1316
1317                 if (gtk_text_iter_forward_char (&match)) {
1318                         if (limit && gtk_text_iter_equal (&match, limit)) {
1319                                 return FALSE;
1320                         }
1321
1322                         if (match_start) {
1323                                 *match_start = match;
1324                         }
1325                         if (match_end) {
1326                                 *match_end = match;
1327                         }
1328                         return TRUE;
1329                 } else {
1330                         return FALSE;
1331                 }
1332         }
1333
1334         visible_only = TRUE;
1335         slice = FALSE;
1336
1337         /* locate all lines */
1338         lines = strbreakup (str, "\n", -1);
1339
1340         search = *iter;
1341
1342         do {
1343                 /* This loop has an inefficient worst-case, where
1344                  * gtk_text_iter_get_text () is called repeatedly on
1345                  * a single line.
1346                  */
1347                 GtkTextIter end;
1348
1349                 if (limit && gtk_text_iter_compare (&search, limit) >= 0) {
1350                         break;
1351                 }
1352
1353                 if (lines_match (&search, (const gchar**)lines,
1354                                  visible_only, slice, &match, &end)) {
1355                         if (limit == NULL ||
1356                             (limit && gtk_text_iter_compare (&end, limit) <= 0)) {
1357                                 retval = TRUE;
1358
1359                                 if (match_start) {
1360                                         *match_start = match;
1361                                 }
1362                                 if (match_end) {
1363                                         *match_end = end;
1364                                 }
1365                         }
1366                         break;
1367                 }
1368         } while (gtk_text_iter_forward_line (&search));
1369
1370         g_strfreev ((gchar **) lines);
1371
1372         return retval;
1373 }
1374
1375 static const gchar *
1376 g_utf8_strrcasestr (const gchar *haystack, const gchar *needle)
1377 {
1378         gsize needle_len;
1379         gsize haystack_len;
1380         const gchar *ret = NULL;
1381         gchar *p;
1382         gchar *casefold;
1383         gchar *caseless_haystack;
1384         gint i;
1385
1386         g_return_val_if_fail (haystack != NULL, NULL);
1387         g_return_val_if_fail (needle != NULL, NULL);
1388
1389         casefold = g_utf8_casefold (haystack, -1);
1390         caseless_haystack = g_utf8_normalize (casefold, -1, G_NORMALIZE_NFD);
1391         g_free (casefold);
1392
1393         needle_len = g_utf8_strlen (needle, -1);
1394         haystack_len = g_utf8_strlen (caseless_haystack, -1);
1395
1396         if (needle_len == 0)
1397         {
1398                 ret = (gchar *) haystack;
1399                 goto finally_1;
1400         }
1401
1402         if (haystack_len < needle_len)
1403         {
1404                 ret = NULL;
1405                 goto finally_1;
1406         }
1407
1408         i = haystack_len - needle_len;
1409         p = g_utf8_offset_to_pointer (caseless_haystack, i);
1410         needle_len = strlen (needle);
1411
1412         while (p >= caseless_haystack)
1413         {
1414                 if (strncmp (p, needle, needle_len) == 0)
1415                 {
1416                         ret = pointer_from_offset_skipping_decomp (haystack, i);
1417                         goto finally_1;
1418                 }
1419
1420                 p = g_utf8_prev_char (p);
1421                 i--;
1422         }
1423
1424 finally_1:
1425         g_free (caseless_haystack);
1426
1427         return ret;
1428 }
1429
1430 static gboolean
1431 backward_lines_match (const GtkTextIter *start,
1432                       const gchar      **lines,
1433                       gboolean           visible_only,
1434                       gboolean           slice,
1435                       GtkTextIter       *match_start,
1436                       GtkTextIter       *match_end)
1437 {
1438         GtkTextIter line, next;
1439         gchar *line_text;
1440         const gchar *found;
1441         gint offset;
1442
1443         if (*lines == NULL || **lines == '\0')
1444         {
1445                 if (match_start)
1446                         *match_start = *start;
1447                 if (match_end)
1448                         *match_end = *start;
1449                 return TRUE;
1450         }
1451
1452         line = next = *start;
1453         if (gtk_text_iter_get_line_offset (&next) == 0)
1454         {
1455                 if (!gtk_text_iter_backward_line (&next))
1456                         return FALSE;
1457         }
1458         else
1459                 gtk_text_iter_set_line_offset (&next, 0);
1460
1461         if (slice)
1462         {
1463                 if (visible_only)
1464                         line_text = gtk_text_iter_get_visible_slice (&next, &line);
1465                 else
1466                         line_text = gtk_text_iter_get_slice (&next, &line);
1467         }
1468         else
1469         {
1470                 if (visible_only)
1471                         line_text = gtk_text_iter_get_visible_text (&next, &line);
1472                 else
1473                         line_text = gtk_text_iter_get_text (&next, &line);
1474         }
1475
1476         if (match_start) /* if this is the first line we're matching */
1477         {
1478                 found = g_utf8_strrcasestr (line_text, *lines);
1479         }
1480         else
1481         {
1482                 /* If it's not the first line, we have to match from the
1483                  * start of the line.
1484                  */
1485                 if (g_utf8_caselessnmatch (line_text, *lines, strlen (line_text),
1486                                            strlen (*lines)))
1487                         found = line_text;
1488                 else
1489                         found = NULL;
1490         }
1491
1492         if (found == NULL)
1493         {
1494                 g_free (line_text);
1495                 return FALSE;
1496         }
1497
1498         /* Get offset to start of search string */
1499         offset = g_utf8_strlen (line_text, found - line_text);
1500
1501         forward_chars_with_skipping (&next, offset, visible_only, !slice, FALSE);
1502
1503         /* If match start needs to be returned, set it to the
1504          * start of the search string.
1505          */
1506         if (match_start)
1507         {
1508                 *match_start = next;
1509         }
1510
1511         /* Go to end of search string */
1512         forward_chars_with_skipping (&next, g_utf8_strlen (*lines, -1), visible_only, !slice, TRUE);
1513
1514         g_free (line_text);
1515
1516         ++lines;
1517
1518         if (match_end)
1519                 *match_end = next;
1520
1521         /* try to match the rest of the lines forward, passing NULL
1522          * for match_start so lines_match will try to match the entire
1523          * line */
1524         return lines_match (&next, lines, visible_only,
1525                             slice, NULL, match_end);
1526 }
1527
1528 gboolean
1529 empathy_text_iter_backward_search (const GtkTextIter   *iter,
1530                                   const gchar         *str,
1531                                   GtkTextIter         *match_start,
1532                                   GtkTextIter         *match_end,
1533                                   const GtkTextIter   *limit)
1534 {
1535         gchar **lines = NULL;
1536         GtkTextIter match;
1537         gboolean retval = FALSE;
1538         GtkTextIter search;
1539         gboolean visible_only;
1540         gboolean slice;
1541
1542         g_return_val_if_fail (iter != NULL, FALSE);
1543         g_return_val_if_fail (str != NULL, FALSE);
1544
1545         if (limit && gtk_text_iter_compare (iter, limit) <= 0)
1546                 return FALSE;
1547
1548         if (*str == '\0')
1549         {
1550                 /* If we can move one char, return the empty string there */
1551                 match = *iter;
1552
1553                 if (gtk_text_iter_backward_char (&match))
1554                 {
1555                         if (limit && gtk_text_iter_equal (&match, limit))
1556                                 return FALSE;
1557
1558                         if (match_start)
1559                                 *match_start = match;
1560                         if (match_end)
1561                                 *match_end = match;
1562                         return TRUE;
1563                 }
1564                 else
1565                 {
1566                         return FALSE;
1567                 }
1568         }
1569
1570         visible_only = TRUE;
1571         slice = TRUE;
1572
1573         /* locate all lines */
1574         lines = strbreakup (str, "\n", -1);
1575
1576         search = *iter;
1577
1578         while (TRUE)
1579         {
1580                 /* This loop has an inefficient worst-case, where
1581                  * gtk_text_iter_get_text () is called repeatedly on
1582                  * a single line.
1583                  */
1584                 GtkTextIter end;
1585
1586                 if (limit && gtk_text_iter_compare (&search, limit) <= 0)
1587                         break;
1588
1589                 if (backward_lines_match (&search, (const gchar**)lines,
1590                                           visible_only, slice, &match, &end))
1591                 {
1592                         if (limit == NULL || (limit &&
1593                                               gtk_text_iter_compare (&end, limit) > 0))
1594                         {
1595                                 retval = TRUE;
1596
1597                                 if (match_start)
1598                                         *match_start = match;
1599                                 if (match_end)
1600                                         *match_end = end;
1601                         }
1602                         break;
1603                 }
1604
1605                 if (gtk_text_iter_get_line_offset (&search) == 0)
1606                 {
1607                         if (!gtk_text_iter_backward_line (&search))
1608                                 break;
1609                 }
1610                 else
1611                 {
1612                         gtk_text_iter_set_line_offset (&search, 0);
1613                 }
1614         }
1615
1616         g_strfreev ((gchar **) lines);
1617
1618         return retval;
1619 }
1620
1621 /* Takes care of moving the window to the current workspace. */
1622 void
1623 empathy_window_present_with_time (GtkWindow *window,
1624                         guint32 timestamp)
1625 {
1626         GdkWindow *gdk_window;
1627
1628         g_return_if_fail (GTK_IS_WINDOW (window));
1629
1630         /* Move the window to the current workspace before trying to show it.
1631          * This is the behaviour people expect when clicking on the statusbar icon. */
1632         gdk_window = gtk_widget_get_window (GTK_WIDGET (window));
1633         if (gdk_window) {
1634                 gint x, y;
1635                 gint w, h;
1636
1637                 /* Has no effect if the WM has viewports, like compiz */
1638                 gdk_x11_window_move_to_current_desktop (gdk_window);
1639
1640                 /* If window is still off-screen, hide it to force it to
1641                  * reposition on the current workspace. */
1642                 gtk_window_get_position (window, &x, &y);
1643                 gtk_window_get_size (window, &w, &h);
1644                 if (!EMPATHY_RECT_IS_ON_SCREEN (x, y, w, h))
1645                         gtk_widget_hide (GTK_WIDGET (window));
1646         }
1647
1648         if (timestamp == GDK_CURRENT_TIME)
1649                 gtk_window_present (window);
1650         else
1651                 gtk_window_present_with_time (window, timestamp);
1652 }
1653
1654 void
1655 empathy_window_present (GtkWindow *window)
1656 {
1657   empathy_window_present_with_time (window, gtk_get_current_event_time ());
1658 }
1659
1660 GtkWindow *
1661 empathy_get_toplevel_window (GtkWidget *widget)
1662 {
1663         GtkWidget *toplevel;
1664
1665         g_return_val_if_fail (GTK_IS_WIDGET (widget), NULL);
1666
1667         toplevel = gtk_widget_get_toplevel (widget);
1668         if (GTK_IS_WINDOW (toplevel) &&
1669             gtk_widget_is_toplevel (toplevel)) {
1670                 return GTK_WINDOW (toplevel);
1671         }
1672
1673         return NULL;
1674 }
1675
1676 /** empathy_make_absolute_url_len:
1677  * @url: an url
1678  * @len: a length
1679  *
1680  * Same as #empathy_make_absolute_url but for a limited string length
1681  */
1682 gchar *
1683 empathy_make_absolute_url_len (const gchar *url,
1684                                guint len)
1685 {
1686         g_return_val_if_fail (url != NULL, NULL);
1687
1688         if (g_str_has_prefix (url, "ghelp:") ||
1689             g_str_has_prefix (url, "mailto:") ||
1690             strstr (url, ":/")) {
1691                 return g_strndup (url, len);
1692         }
1693
1694         if (strstr (url, "@")) {
1695                 return g_strdup_printf ("mailto:%.*s", len, url);
1696         }
1697
1698         return g_strdup_printf ("http://%.*s", len, url);
1699 }
1700
1701 /** empathy_make_absolute_url:
1702  * @url: an url
1703  *
1704  * The URL opening code can't handle schemeless strings, so we try to be
1705  * smart and add http if there is no scheme or doesn't look like a mail
1706  * address. This should work in most cases, and let us click on strings
1707  * like "www.gnome.org".
1708  *
1709  * Returns: a newly allocated url with proper mailto: or http:// prefix, use
1710  * g_free when your are done with it
1711  */
1712 gchar *
1713 empathy_make_absolute_url (const gchar *url)
1714 {
1715         return empathy_make_absolute_url_len (url, strlen (url));
1716 }
1717
1718 void
1719 empathy_url_show (GtkWidget *parent,
1720                   const char *url)
1721 {
1722         gchar  *real_url;
1723         GError *error = NULL;
1724
1725         g_return_if_fail (parent == NULL || GTK_IS_WIDGET (parent));
1726         g_return_if_fail (url != NULL);
1727
1728         real_url = empathy_make_absolute_url (url);
1729
1730         gtk_show_uri (parent ? gtk_widget_get_screen (parent) : NULL, real_url,
1731                       gtk_get_current_event_time (), &error);
1732
1733         if (error) {
1734                 GtkWidget *dialog;
1735
1736                 dialog = gtk_message_dialog_new (NULL, 0,
1737                                                  GTK_MESSAGE_ERROR, GTK_BUTTONS_CLOSE,
1738                                                  _("Unable to open URI"));
1739                 gtk_message_dialog_format_secondary_text (GTK_MESSAGE_DIALOG (dialog),
1740                                                           "%s", error->message);
1741
1742                 g_signal_connect (dialog, "response",
1743                                   G_CALLBACK (gtk_widget_destroy),
1744                                   NULL);
1745                 gtk_window_present (GTK_WINDOW (dialog));
1746
1747                 g_clear_error (&error);
1748         }
1749
1750         g_free (real_url);
1751 }
1752
1753 void
1754 empathy_send_file (EmpathyContact *contact, GFile *file)
1755 {
1756         EmpathyFTFactory *factory;
1757         GtkRecentManager *manager;
1758         gchar *uri;
1759
1760         g_return_if_fail (EMPATHY_IS_CONTACT (contact));
1761         g_return_if_fail (G_IS_FILE (file));
1762
1763         factory = empathy_ft_factory_dup_singleton ();
1764
1765         empathy_ft_factory_new_transfer_outgoing (factory, contact, file);
1766
1767         uri = g_file_get_uri (file);
1768         manager = gtk_recent_manager_get_default ();
1769         gtk_recent_manager_add_item (manager, uri);
1770         g_free (uri);
1771
1772         g_object_unref (factory);
1773 }
1774
1775 void
1776 empathy_send_file_from_uri_list (EmpathyContact *contact, const gchar *uri_list)
1777 {
1778         const gchar *nl;
1779         GFile *file;
1780
1781         /* Only handle a single file for now.  It would be wicked cool to be
1782            able to do multiple files, offering to zip them or whatever like
1783            nautilus-sendto does.  Note that text/uri-list is defined to have
1784            each line terminated by \r\n, but we can be tolerant of applications
1785            that only use \n or don't terminate single-line entries.
1786         */
1787         nl = strstr (uri_list, "\r\n");
1788         if (!nl) {
1789                 nl = strchr (uri_list, '\n');
1790         }
1791         if (nl) {
1792                 gchar *uri = g_strndup (uri_list, nl - uri_list);
1793                 file = g_file_new_for_uri (uri);
1794                 g_free (uri);
1795         }
1796         else {
1797                 file = g_file_new_for_uri (uri_list);
1798         }
1799
1800         empathy_send_file (contact, file);
1801
1802         g_object_unref (file);
1803 }
1804
1805 static void
1806 file_manager_send_file_response_cb (GtkDialog      *widget,
1807                                     gint            response_id,
1808                                     EmpathyContact *contact)
1809 {
1810         GFile *file;
1811
1812         if (response_id == GTK_RESPONSE_OK) {
1813                 file = gtk_file_chooser_get_file (GTK_FILE_CHOOSER (widget));
1814
1815                 empathy_send_file (contact, file);
1816
1817                 g_object_unref (file);
1818         }
1819
1820         g_object_unref (contact);
1821         gtk_widget_destroy (GTK_WIDGET (widget));
1822 }
1823
1824 void
1825 empathy_send_file_with_file_chooser (EmpathyContact *contact)
1826 {
1827         GtkWidget               *widget;
1828         GtkWidget               *button;
1829
1830         g_return_if_fail (EMPATHY_IS_CONTACT (contact));
1831
1832         DEBUG ("Creating selection file chooser");
1833
1834         widget = gtk_file_chooser_dialog_new (_("Select a file"),
1835                                               NULL,
1836                                               GTK_FILE_CHOOSER_ACTION_OPEN,
1837                                               GTK_STOCK_CANCEL,
1838                                               GTK_RESPONSE_CANCEL,
1839                                               NULL);
1840
1841         /* send button */
1842         button = gtk_button_new_with_mnemonic (_("_Send"));
1843         gtk_button_set_image (GTK_BUTTON (button),
1844                 gtk_image_new_from_icon_name (EMPATHY_IMAGE_DOCUMENT_SEND,
1845                                               GTK_ICON_SIZE_BUTTON));
1846         gtk_widget_show (button);
1847         gtk_dialog_add_action_widget (GTK_DIALOG (widget), button,
1848                                       GTK_RESPONSE_OK);
1849         gtk_widget_set_can_default (button, TRUE);
1850         gtk_dialog_set_default_response (GTK_DIALOG (widget),
1851                                          GTK_RESPONSE_OK);
1852
1853         gtk_file_chooser_set_local_only (GTK_FILE_CHOOSER (widget), FALSE);
1854
1855         gtk_file_chooser_set_current_folder (GTK_FILE_CHOOSER (widget),
1856                 g_get_home_dir ());
1857
1858         g_signal_connect (widget, "response",
1859                           G_CALLBACK (file_manager_send_file_response_cb),
1860                           g_object_ref (contact));
1861
1862         gtk_widget_show (widget);
1863 }
1864
1865 static void
1866 file_manager_receive_file_response_cb (GtkDialog *dialog,
1867                                        GtkResponseType response,
1868                                        EmpathyFTHandler *handler)
1869 {
1870         EmpathyFTFactory *factory;
1871         GFile *file;
1872
1873         if (response == GTK_RESPONSE_OK) {
1874                 GFile *parent;
1875                 GFileInfo *info;
1876                 guint64 free_space, file_size;
1877                 GError *error = NULL;
1878
1879                 file = gtk_file_chooser_get_file (GTK_FILE_CHOOSER (dialog));
1880                 parent = g_file_get_parent (file);
1881                 info = g_file_query_filesystem_info (parent,
1882                                 G_FILE_ATTRIBUTE_FILESYSTEM_FREE,
1883                                 NULL, &error);
1884
1885                 g_object_unref (parent);
1886
1887                 if (error != NULL) {
1888                         g_warning ("Error: %s", error->message);
1889
1890                         g_object_unref (file);
1891                         return;
1892                 }
1893
1894                 free_space = g_file_info_get_attribute_uint64 (info,
1895                                 G_FILE_ATTRIBUTE_FILESYSTEM_FREE);
1896                 file_size = empathy_ft_handler_get_total_bytes (handler);
1897
1898                 g_object_unref (info);
1899
1900                 if (file_size > free_space) {
1901                         GtkWidget *message = gtk_message_dialog_new (
1902                                 GTK_WINDOW (dialog),
1903                                 GTK_DIALOG_MODAL,
1904                                 GTK_MESSAGE_ERROR,
1905                                 GTK_BUTTONS_CLOSE,
1906                                 _("Insufficient free space to save file"));
1907                         char *file_size_str, *free_space_str;
1908
1909                         file_size_str = g_format_size_for_display (file_size);
1910                         free_space_str = g_format_size_for_display (free_space);
1911
1912                         gtk_message_dialog_format_secondary_text (
1913                                 GTK_MESSAGE_DIALOG (message),
1914                                 _("%s of free space are required to save this "
1915                                   "file, but only %s is available. Please "
1916                                   "choose another location."),
1917                                 file_size_str, free_space_str);
1918
1919                         gtk_dialog_run (GTK_DIALOG (message));
1920
1921                         g_free (file_size_str);
1922                         g_free (free_space_str);
1923                         gtk_widget_destroy (message);
1924
1925                         g_object_unref (file);
1926
1927                         return;
1928                 }
1929
1930                 factory = empathy_ft_factory_dup_singleton ();
1931
1932                 empathy_ft_factory_set_destination_for_incoming_handler (
1933                                 factory, handler, file);
1934
1935                 g_object_unref (factory);
1936                 g_object_unref (file);
1937         } else {
1938                 /* unref the handler, as we dismissed the file chooser,
1939                  * and refused the transfer.
1940                  */
1941                 g_object_unref (handler);
1942         }
1943
1944         gtk_widget_destroy (GTK_WIDGET (dialog));
1945 }
1946
1947 void
1948 empathy_receive_file_with_file_chooser (EmpathyFTHandler *handler)
1949 {
1950         GtkWidget *widget;
1951         const gchar *dir;
1952         EmpathyContact *contact;
1953         gchar *title;
1954
1955         contact = empathy_ft_handler_get_contact (handler);
1956         g_assert (contact != NULL);
1957
1958         title = g_strdup_printf (_("Incoming file from %s"),
1959                 empathy_contact_get_alias (contact));
1960
1961         widget = gtk_file_chooser_dialog_new (title,
1962                                               NULL,
1963                                               GTK_FILE_CHOOSER_ACTION_SAVE,
1964                                               GTK_STOCK_CANCEL,
1965                                               GTK_RESPONSE_CANCEL,
1966                                               GTK_STOCK_SAVE,
1967                                               GTK_RESPONSE_OK,
1968                                               NULL);
1969         gtk_file_chooser_set_current_name (GTK_FILE_CHOOSER (widget),
1970                 empathy_ft_handler_get_filename (handler));
1971         gtk_file_chooser_set_do_overwrite_confirmation
1972                 (GTK_FILE_CHOOSER (widget), TRUE);
1973
1974         dir = g_get_user_special_dir (G_USER_DIRECTORY_DOWNLOAD);
1975         if (dir == NULL)
1976                 /* Fallback to $HOME if $XDG_DOWNLOAD_DIR is not set */
1977                 dir = g_get_home_dir ();
1978
1979         gtk_file_chooser_set_current_folder (GTK_FILE_CHOOSER (widget), dir);
1980
1981         g_signal_connect (widget, "response",
1982                 G_CALLBACK (file_manager_receive_file_response_cb), handler);
1983
1984         gtk_widget_show (widget);
1985         g_free (title);
1986 }
1987
1988 void
1989 empathy_make_color_whiter (GdkRGBA *color)
1990 {
1991         const GdkRGBA white = { 1.0, 1.0, 1.0, 1.0 };
1992
1993         color->red = (color->red + white.red) / 2;
1994         color->green = (color->green + white.green) / 2;
1995         color->blue = (color->blue + white.blue) / 2;
1996 }
1997
1998 static void
1999 menu_deactivate_cb (GtkMenu *menu,
2000         gpointer user_data)
2001 {
2002         /* FIXME: we shouldn't have to disconnect the signal (bgo #641327) */
2003         g_signal_handlers_disconnect_by_func (menu,
2004                      menu_deactivate_cb, user_data);
2005
2006         gtk_menu_detach (menu);
2007 }
2008
2009 /* Convenient function to create a GtkMenu attached to @attach_to and detach
2010  * it when the menu is not displayed any more. This is useful when creating a
2011  * context menu that we want to get rid as soon as it as been displayed. */
2012 GtkWidget *
2013 empathy_context_menu_new (GtkWidget *attach_to)
2014 {
2015         GtkWidget *menu;
2016
2017         menu = gtk_menu_new ();
2018
2019         gtk_menu_attach_to_widget (GTK_MENU (menu), attach_to, NULL);
2020
2021         /* menu is initially unowned but gtk_menu_attach_to_widget () taked its
2022          * floating ref. We can either wait that @attach_to releases its ref when
2023          * it will be destroyed (when leaving Empathy most of the time) or explicitely
2024          * detach the menu when it's not displayed any more.
2025          * We go for the latter as we don't want to keep useless menus in memory
2026          * during the whole lifetime of Empathy. */
2027         g_signal_connect (menu, "deactivate", G_CALLBACK (menu_deactivate_cb), NULL);
2028
2029         return menu;
2030 }
2031
2032 gint64
2033 empathy_get_current_action_time (void)
2034 {
2035   return (tp_user_action_time_from_x11 (gtk_get_current_event_time ()));
2036 }
2037
2038 /* @words = empathy_live_search_strip_utf8_string (@text);
2039  *
2040  * User has to pass both so we don't have to compute @words ourself each time
2041  * this function is called. */
2042 gboolean
2043 empathy_individual_match_string (FolksIndividual *individual,
2044     const char *text,
2045     GPtrArray *words)
2046 {
2047   const gchar *str;
2048   GeeSet *personas;
2049   GeeIterator *iter;
2050   gboolean retval = FALSE;
2051
2052   /* check alias name */
2053   str = folks_alias_details_get_alias (FOLKS_ALIAS_DETAILS (individual));
2054
2055   if (empathy_live_search_match_words (str, words))
2056     return TRUE;
2057
2058   personas = folks_individual_get_personas (individual);
2059
2060   /* check contact id, remove the @server.com part */
2061   iter = gee_iterable_iterator (GEE_ITERABLE (personas));
2062   while (retval == FALSE && gee_iterator_next (iter))
2063     {
2064       FolksPersona *persona = gee_iterator_get (iter);
2065       const gchar *p;
2066
2067       if (empathy_folks_persona_is_interesting (persona))
2068         {
2069           str = folks_persona_get_display_id (persona);
2070
2071           /* Accept the persona if @text is a full prefix of his ID; that allows
2072            * user to find, say, a jabber contact by typing his JID. */
2073           if (g_str_has_prefix (str, text))
2074             {
2075               retval = TRUE;
2076             }
2077           else
2078             {
2079               gchar *dup_str = NULL;
2080               gboolean visible;
2081
2082               p = strstr (str, "@");
2083               if (p != NULL)
2084                 str = dup_str = g_strndup (str, p - str);
2085
2086               visible = empathy_live_search_match_words (str, words);
2087               g_free (dup_str);
2088               if (visible)
2089                 retval = TRUE;
2090             }
2091         }
2092       g_clear_object (&persona);
2093     }
2094   g_clear_object (&iter);
2095
2096   /* FIXME: Add more rules here, we could check phone numbers in
2097    * contact's vCard for example. */
2098   return retval;
2099 }
2100
2101 static gboolean
2102 dtmf_dialpad_button_pressed_cb (GObject *button,
2103     GtkEntry *entry)
2104 {
2105   GtkEntryBuffer *buffer = gtk_entry_get_buffer (entry);
2106   const gchar *label;
2107
2108   label = g_object_get_data (button, "label");
2109   gtk_entry_buffer_insert_text (buffer, -1, label, -1);
2110
2111   return FALSE;
2112 }
2113
2114 GtkWidget *
2115 empathy_create_dtmf_dialpad (GObject *self,
2116     GCallback dtmf_button_pressed_cb,
2117     GCallback dtmf_button_released_cb)
2118 {
2119   GtkWidget *box, *entry, *table;
2120   int i;
2121   GQuark button_quark;
2122   struct {
2123     const gchar *label;
2124     const gchar *sublabel;
2125     TpDTMFEvent event;
2126   } dtmfbuttons[] = { { "1", "",     TP_DTMF_EVENT_DIGIT_1 },
2127                       { "2", "abc",  TP_DTMF_EVENT_DIGIT_2 },
2128                       { "3", "def",  TP_DTMF_EVENT_DIGIT_3 },
2129                       { "4", "ghi",  TP_DTMF_EVENT_DIGIT_4 },
2130                       { "5", "jkl",  TP_DTMF_EVENT_DIGIT_5 },
2131                       { "6", "mno",  TP_DTMF_EVENT_DIGIT_6 },
2132                       { "7", "pqrs", TP_DTMF_EVENT_DIGIT_7 },
2133                       { "8", "tuv",  TP_DTMF_EVENT_DIGIT_8 },
2134                       { "9", "wxyz", TP_DTMF_EVENT_DIGIT_9 },
2135                       { "#", "",     TP_DTMF_EVENT_HASH },
2136                       { "0", "",     TP_DTMF_EVENT_DIGIT_0 },
2137                       { "*", "",     TP_DTMF_EVENT_ASTERISK },
2138                       { NULL, } };
2139
2140   box = gtk_box_new (GTK_ORIENTATION_VERTICAL, 3);
2141
2142   entry = gtk_entry_new ();
2143   gtk_editable_set_editable (GTK_EDITABLE (entry), FALSE);
2144
2145   gtk_box_pack_start (GTK_BOX (box), entry, FALSE, FALSE, 3);
2146
2147   button_quark = g_quark_from_static_string (EMPATHY_DTMF_BUTTON_ID);
2148
2149   table = gtk_table_new (4, 3, TRUE);
2150
2151   for (i = 0; dtmfbuttons[i].label != NULL; i++)
2152     {
2153       GtkWidget *vbox = gtk_vbox_new (FALSE, 0);
2154       GtkWidget *button = gtk_button_new ();
2155       GtkWidget *label;
2156       gchar *str;
2157
2158       gtk_container_add (GTK_CONTAINER (button), vbox);
2159
2160       /* main label */
2161       label = gtk_label_new ("");
2162       str = g_strdup_printf ("<span size='x-large'>%s</span>",
2163           dtmfbuttons[i].label);
2164       gtk_label_set_markup (GTK_LABEL (label), str);
2165       g_free (str);
2166
2167       g_object_set_data (G_OBJECT (button), "label",
2168           (gpointer) dtmfbuttons[i].label);
2169
2170       gtk_box_pack_start (GTK_BOX (vbox), label, TRUE, TRUE, 3);
2171
2172       /* sub label */
2173       label = gtk_label_new ("");
2174       str = g_strdup_printf (
2175           "<span foreground='#555555'>%s</span>",
2176           dtmfbuttons[i].sublabel);
2177       gtk_label_set_markup (GTK_LABEL (label), str);
2178       g_free (str);
2179
2180       gtk_box_pack_start (GTK_BOX (vbox), label, FALSE, TRUE, 0);
2181
2182       gtk_table_attach (GTK_TABLE (table), button, i % 3, i % 3 + 1,
2183         i/3, i/3 + 1, GTK_EXPAND | GTK_FILL, GTK_EXPAND | GTK_FILL, 1, 1);
2184
2185       g_object_set_qdata (G_OBJECT (button), button_quark,
2186         GUINT_TO_POINTER (dtmfbuttons[i].event));
2187
2188       /* To update the GtkEntry */
2189       g_signal_connect (G_OBJECT (button), "pressed",
2190         G_CALLBACK (dtmf_dialpad_button_pressed_cb), entry);
2191
2192       g_signal_connect (G_OBJECT (button), "pressed",
2193         dtmf_button_pressed_cb, self);
2194       g_signal_connect (G_OBJECT (button), "released",
2195         dtmf_button_released_cb, self);
2196     }
2197
2198   gtk_box_pack_start (GTK_BOX (box), table, FALSE, FALSE, 3);
2199
2200   return box;
2201 }
2202
2203 void
2204 empathy_launch_program (const gchar *dir,
2205     const gchar *name,
2206     const gchar *args)
2207 {
2208   GdkDisplay *display;
2209   GError *error = NULL;
2210   gchar *path, *cmd;
2211   GAppInfo *app_info;
2212   GdkAppLaunchContext *context = NULL;
2213
2214   /* Try to run from source directory if possible */
2215   path = g_build_filename (g_getenv ("EMPATHY_SRCDIR"), "src",
2216       name, NULL);
2217
2218   if (!g_file_test (path, G_FILE_TEST_EXISTS))
2219     {
2220       g_free (path);
2221       path = g_build_filename (dir, name, NULL);
2222     }
2223
2224   if (args != NULL)
2225     cmd = g_strconcat (path, " ", args, NULL);
2226   else
2227     cmd = g_strdup (path);
2228
2229   app_info = g_app_info_create_from_commandline (cmd, NULL, 0, &error);
2230   if (app_info == NULL)
2231     {
2232       DEBUG ("Failed to create app info: %s", error->message);
2233       g_error_free (error);
2234       goto out;
2235     }
2236
2237   display = gdk_display_get_default ();
2238   context = gdk_display_get_app_launch_context (display);
2239
2240   if (!g_app_info_launch (app_info, NULL, (GAppLaunchContext *) context,
2241       &error))
2242     {
2243       g_warning ("Failed to launch %s: %s", name, error->message);
2244       g_error_free (error);
2245       goto out;
2246     }
2247
2248 out:
2249   tp_clear_object (&app_info);
2250   tp_clear_object (&context);
2251   g_free (path);
2252   g_free (cmd);
2253 }