/* -*- Mode: C; tab-width: 8; indent-tabs-mode: t; c-basic-offset: 8 -*- */ /* * Copyright (C) 2002-2007 Imendio AB * Copyright (C) 2007-2008 Collabora Ltd. * * This program is free software; you can redistribute it and/or * modify it under the terms of the GNU General Public License as * published by the Free Software Foundation; either version 2 of the * License, or (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU * General Public License for more details. * * You should have received a copy of the GNU General Public * License along with this program; if not, write to the * Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, * Boston, MA 02110-1301 USA * * Authors: Mikael Hallendal * Richard Hult * Martyn Russell * Xavier Claessens * Jonny Lamb * * Part of this file is copied from GtkSourceView (gtksourceiter.c): * Paolo Maggi * Jeroen Zwartepoorte */ #include #include #include #include #include #include #include #include "empathy-ui-utils.h" #include "empathy-images.h" #include "empathy-smiley-manager.h" #include "empathy-conf.h" #define DEBUG_FLAG EMPATHY_DEBUG_OTHER #include #include #include #include #include #define SCHEMES "([a-zA-Z\\+]+)" #define INVALID_CHARS "\\s\"'" #define INVALID_CHARS_EXT INVALID_CHARS "\\[\\]<>(){},;:?" #define BODY "([^"INVALID_CHARS"]+)" #define BODY_END "([^"INVALID_CHARS"]*)[^"INVALID_CHARS_EXT".]" #define BODY_STRICT "([^"INVALID_CHARS_EXT"]+)" #define URI_REGEX "("SCHEMES"://"BODY_END")" \ "|((www|ftp)\\."BODY_END")" \ "|((mailto:)?"BODY_STRICT"@"BODY"\\."BODY_END")" void empathy_gtk_init (void) { static gboolean initialized = FALSE; if (initialized) return; empathy_init (); gtk_icon_theme_append_search_path (gtk_icon_theme_get_default (), PKGDATADIR G_DIR_SEPARATOR_S "icons"); initialized = TRUE; } GRegex * empathy_uri_regex_dup_singleton (void) { static GRegex *uri_regex = NULL; /* We intentionally leak the regex so it's not recomputed */ if (!uri_regex) { uri_regex = g_regex_new (URI_REGEX, 0, 0, NULL); } return g_regex_ref (uri_regex); } static GtkBuilder * builder_get_file_valist (const gchar *filename, const gchar *first_object, va_list args) { GtkBuilder *gui; const gchar *name; GObject **object_ptr; GError *error = NULL; DEBUG ("Loading file %s", filename); gui = gtk_builder_new (); if (!gtk_builder_add_from_file (gui, filename, &error)) { g_critical ("GtkBuilder Error (%s): %s", filename, error->message); g_clear_error (&error); g_object_unref (gui); /* we need to iterate and set all of the pointers to NULL */ for (name = first_object; name; name = va_arg (args, const gchar *)) { object_ptr = va_arg (args, GObject**); *object_ptr = NULL; } return NULL; } for (name = first_object; name; name = va_arg (args, const gchar *)) { object_ptr = va_arg (args, GObject**); *object_ptr = gtk_builder_get_object (gui, name); if (!*object_ptr) { g_warning ("File is missing object '%s'.", name); continue; } } return gui; } GtkBuilder * empathy_builder_get_file (const gchar *filename, const gchar *first_object, ...) { GtkBuilder *gui; va_list args; va_start (args, first_object); gui = builder_get_file_valist (filename, first_object, args); va_end (args); return gui; } void empathy_builder_connect (GtkBuilder *gui, gpointer user_data, gchar *first_object, ...) { va_list args; const gchar *name; const gchar *sig; GObject *object; GCallback callback; va_start (args, first_object); for (name = first_object; name; name = va_arg (args, const gchar *)) { sig = va_arg (args, const gchar *); callback = va_arg (args, GCallback); object = gtk_builder_get_object (gui, name); if (!object) { g_warning ("File is missing object '%s'.", name); continue; } g_signal_connect (object, sig, callback, user_data); } va_end (args); } GtkWidget * empathy_builder_unref_and_keep_widget (GtkBuilder *gui, GtkWidget *widget) { /* On construction gui sinks the initial reference to widget. When gui * is finalized it will drop its ref to widget. We take our own ref to * prevent widget being finalised. The widget is forced to have a * floating reference, like when it was initially unowned so that it can * be used like any other GtkWidget. */ g_object_ref (widget); g_object_force_floating (G_OBJECT (widget)); g_object_unref (gui); return widget; } const gchar * empathy_icon_name_for_presence (TpConnectionPresenceType presence) { switch (presence) { case TP_CONNECTION_PRESENCE_TYPE_AVAILABLE: return EMPATHY_IMAGE_AVAILABLE; case TP_CONNECTION_PRESENCE_TYPE_BUSY: return EMPATHY_IMAGE_BUSY; case TP_CONNECTION_PRESENCE_TYPE_AWAY: return EMPATHY_IMAGE_AWAY; case TP_CONNECTION_PRESENCE_TYPE_EXTENDED_AWAY: return EMPATHY_IMAGE_EXT_AWAY; case TP_CONNECTION_PRESENCE_TYPE_HIDDEN: return EMPATHY_IMAGE_HIDDEN; case TP_CONNECTION_PRESENCE_TYPE_OFFLINE: case TP_CONNECTION_PRESENCE_TYPE_ERROR: case TP_CONNECTION_PRESENCE_TYPE_UNKNOWN: return EMPATHY_IMAGE_OFFLINE; case TP_CONNECTION_PRESENCE_TYPE_UNSET: return NULL; } return NULL; } const gchar * empathy_icon_name_for_contact (EmpathyContact *contact) { TpConnectionPresenceType presence; g_return_val_if_fail (EMPATHY_IS_CONTACT (contact), EMPATHY_IMAGE_OFFLINE); presence = empathy_contact_get_presence (contact); return empathy_icon_name_for_presence (presence); } const gchar * empathy_protocol_name_for_contact (EmpathyContact *contact) { TpAccount *account; g_return_val_if_fail (EMPATHY_IS_CONTACT (contact), NULL); account = empathy_contact_get_account (contact); if (account == NULL) { return NULL; } return tp_account_get_icon_name (account); } GdkPixbuf * empathy_pixbuf_from_data (gchar *data, gsize data_size) { return empathy_pixbuf_from_data_and_mime (data, data_size, NULL); } GdkPixbuf * empathy_pixbuf_from_data_and_mime (gchar *data, gsize data_size, gchar **mime_type) { GdkPixbufLoader *loader; GdkPixbufFormat *format; GdkPixbuf *pixbuf = NULL; gchar **mime_types; GError *error = NULL; if (!data) { return NULL; } loader = gdk_pixbuf_loader_new (); if (!gdk_pixbuf_loader_write (loader, (guchar *) data, data_size, &error)) { DEBUG ("Failed to write to pixbuf loader: %s", error ? error->message : "No error given"); goto out; } if (!gdk_pixbuf_loader_close (loader, &error)) { DEBUG ("Failed to close pixbuf loader: %s", error ? error->message : "No error given"); goto out; } pixbuf = gdk_pixbuf_loader_get_pixbuf (loader); if (pixbuf) { g_object_ref (pixbuf); if (mime_type != NULL) { format = gdk_pixbuf_loader_get_format (loader); mime_types = gdk_pixbuf_format_get_mime_types (format); *mime_type = g_strdup (*mime_types); if (mime_types[1] != NULL) { DEBUG ("Loader supports more than one mime " "type! Picking the first one, %s", *mime_type); } g_strfreev (mime_types); } } out: g_clear_error (&error); g_object_unref (loader); return pixbuf; } struct SizeData { gint width; gint height; gboolean preserve_aspect_ratio; }; static void pixbuf_from_avatar_size_prepared_cb (GdkPixbufLoader *loader, int width, int height, struct SizeData *data) { g_return_if_fail (width > 0 && height > 0); if (data->preserve_aspect_ratio && (data->width > 0 || data->height > 0)) { if (width < data->width && height < data->height) { width = width; height = height; } if (data->width < 0) { width = width * (double) data->height / (gdouble) height; height = data->height; } else if (data->height < 0) { height = height * (double) data->width / (double) width; width = data->width; } else if ((double) height * (double) data->width > (double) width * (double) data->height) { width = 0.5 + (double) width * (double) data->height / (double) height; height = data->height; } else { height = 0.5 + (double) height * (double) data->width / (double) width; width = data->width; } } else { if (data->width > 0) { width = data->width; } if (data->height > 0) { height = data->height; } } gdk_pixbuf_loader_set_size (loader, width, height); } static void empathy_avatar_pixbuf_roundify (GdkPixbuf *pixbuf) { gint width, height, rowstride; guchar *pixels; width = gdk_pixbuf_get_width (pixbuf); height = gdk_pixbuf_get_height (pixbuf); rowstride = gdk_pixbuf_get_rowstride (pixbuf); pixels = gdk_pixbuf_get_pixels (pixbuf); if (width < 6 || height < 6) { return; } /* Top left */ pixels[3] = 0; pixels[7] = 0x80; pixels[11] = 0xC0; pixels[rowstride + 3] = 0x80; pixels[rowstride * 2 + 3] = 0xC0; /* Top right */ pixels[width * 4 - 1] = 0; pixels[width * 4 - 5] = 0x80; pixels[width * 4 - 9] = 0xC0; pixels[rowstride + (width * 4) - 1] = 0x80; pixels[(2 * rowstride) + (width * 4) - 1] = 0xC0; /* Bottom left */ pixels[(height - 1) * rowstride + 3] = 0; pixels[(height - 1) * rowstride + 7] = 0x80; pixels[(height - 1) * rowstride + 11] = 0xC0; pixels[(height - 2) * rowstride + 3] = 0x80; pixels[(height - 3) * rowstride + 3] = 0xC0; /* Bottom right */ pixels[height * rowstride - 1] = 0; pixels[(height - 1) * rowstride - 1] = 0x80; pixels[(height - 2) * rowstride - 1] = 0xC0; pixels[height * rowstride - 5] = 0x80; pixels[height * rowstride - 9] = 0xC0; } static gboolean empathy_gdk_pixbuf_is_opaque (GdkPixbuf *pixbuf) { gint width, height, rowstride, i; guchar *pixels; guchar *row; width = gdk_pixbuf_get_width (pixbuf); height = gdk_pixbuf_get_height (pixbuf); rowstride = gdk_pixbuf_get_rowstride (pixbuf); pixels = gdk_pixbuf_get_pixels (pixbuf); row = pixels; for (i = 3; i < rowstride; i+=4) { if (row[i] < 0xfe) { return FALSE; } } for (i = 1; i < height - 1; i++) { row = pixels + (i*rowstride); if (row[3] < 0xfe || row[rowstride-1] < 0xfe) { return FALSE; } } row = pixels + ((height-1) * rowstride); for (i = 3; i < rowstride; i+=4) { if (row[i] < 0xfe) { return FALSE; } } return TRUE; } GdkPixbuf * empathy_pixbuf_from_avatar_scaled (EmpathyAvatar *avatar, gint width, gint height) { GdkPixbuf *pixbuf; GdkPixbufLoader *loader; struct SizeData data; GError *error = NULL; if (!avatar) { return NULL; } data.width = width; data.height = height; data.preserve_aspect_ratio = TRUE; loader = gdk_pixbuf_loader_new (); g_signal_connect (loader, "size-prepared", G_CALLBACK (pixbuf_from_avatar_size_prepared_cb), &data); if (!gdk_pixbuf_loader_write (loader, avatar->data, avatar->len, &error)) { g_warning ("Couldn't write avatar image:%p with " "length:%" G_GSIZE_FORMAT " to pixbuf loader: %s", avatar->data, avatar->len, error->message); g_error_free (error); return NULL; } gdk_pixbuf_loader_close (loader, NULL); pixbuf = gdk_pixbuf_loader_get_pixbuf (loader); if (!gdk_pixbuf_get_has_alpha (pixbuf)) { GdkPixbuf *rounded_pixbuf; rounded_pixbuf = gdk_pixbuf_new (GDK_COLORSPACE_RGB, TRUE, 8, gdk_pixbuf_get_width (pixbuf), gdk_pixbuf_get_height (pixbuf)); gdk_pixbuf_copy_area (pixbuf, 0, 0, gdk_pixbuf_get_width (pixbuf), gdk_pixbuf_get_height (pixbuf), rounded_pixbuf, 0, 0); pixbuf = rounded_pixbuf; } else { g_object_ref (pixbuf); } if (empathy_gdk_pixbuf_is_opaque (pixbuf)) { empathy_avatar_pixbuf_roundify (pixbuf); } g_object_unref (loader); return pixbuf; } GdkPixbuf * empathy_pixbuf_avatar_from_contact_scaled (EmpathyContact *contact, gint width, gint height) { EmpathyAvatar *avatar; g_return_val_if_fail (EMPATHY_IS_CONTACT (contact), NULL); avatar = empathy_contact_get_avatar (contact); return empathy_pixbuf_from_avatar_scaled (avatar, width, height); } GdkPixbuf * empathy_pixbuf_contact_status_icon (EmpathyContact *contact, gboolean show_protocol) { const gchar *icon_name; g_return_val_if_fail (EMPATHY_IS_CONTACT (contact), NULL); icon_name = empathy_icon_name_for_contact (contact); if (icon_name == NULL) { return NULL; } return empathy_pixbuf_contact_status_icon_with_icon_name (contact, icon_name, show_protocol); } GdkPixbuf * empathy_pixbuf_contact_status_icon_with_icon_name (EmpathyContact *contact, const gchar *icon_name, gboolean show_protocol) { GdkPixbuf *pix_status; GdkPixbuf *pix_protocol; gchar *icon_filename; gint height, width; gint numerator, denominator; g_return_val_if_fail (EMPATHY_IS_CONTACT (contact), NULL); g_return_val_if_fail (icon_name != NULL, NULL); numerator = 3; denominator = 4; icon_filename = empathy_filename_from_icon_name (icon_name, GTK_ICON_SIZE_MENU); if (icon_filename == NULL) { DEBUG ("icon name: %s could not be found\n", icon_name); return NULL; } pix_status = gdk_pixbuf_new_from_file (icon_filename, NULL); g_free (icon_filename); if (pix_status == NULL) { DEBUG ("Could not open icon %s\n", icon_filename); return NULL; } if (!show_protocol) return pix_status; height = gdk_pixbuf_get_height (pix_status); width = gdk_pixbuf_get_width (pix_status); pix_protocol = empathy_pixbuf_protocol_from_contact_scaled (contact, width * numerator / denominator, height * numerator / denominator); if (pix_protocol == NULL) { return pix_status; } gdk_pixbuf_composite (pix_protocol, pix_status, 0, height - height * numerator / denominator, width * numerator / denominator, height * numerator / denominator, 0, height - height * numerator / denominator, 1, 1, GDK_INTERP_BILINEAR, 255); g_object_unref (pix_protocol); return pix_status; } GdkPixbuf * empathy_pixbuf_protocol_from_contact_scaled (EmpathyContact *contact, gint width, gint height) { TpAccount *account; gchar *filename; GdkPixbuf *pixbuf = NULL; g_return_val_if_fail (EMPATHY_IS_CONTACT (contact), NULL); account = empathy_contact_get_account (contact); filename = empathy_filename_from_icon_name (tp_account_get_icon_name (account), GTK_ICON_SIZE_MENU); if (filename != NULL) { pixbuf = gdk_pixbuf_new_from_file_at_size (filename, width, height, NULL); g_free (filename); } return pixbuf; } GdkPixbuf * empathy_pixbuf_scale_down_if_necessary (GdkPixbuf *pixbuf, gint max_size) { gint width, height; gdouble factor; width = gdk_pixbuf_get_width (pixbuf); height = gdk_pixbuf_get_height (pixbuf); if (width > 0 && (width > max_size || height > max_size)) { factor = (gdouble) max_size / MAX (width, height); width = width * factor; height = height * factor; return gdk_pixbuf_scale_simple (pixbuf, width, height, GDK_INTERP_HYPER); } return g_object_ref (pixbuf); } GdkPixbuf * empathy_pixbuf_from_icon_name_sized (const gchar *icon_name, gint size) { GtkIconTheme *theme; GdkPixbuf *pixbuf; GError *error = NULL; if (!icon_name) { return NULL; } theme = gtk_icon_theme_get_default (); pixbuf = gtk_icon_theme_load_icon (theme, icon_name, size, 0, &error); if (error) { DEBUG ("Error loading icon: %s", error->message); g_clear_error (&error); } return pixbuf; } GdkPixbuf * empathy_pixbuf_from_icon_name (const gchar *icon_name, GtkIconSize icon_size) { gint w, h; gint size = 48; if (!icon_name) { return NULL; } if (gtk_icon_size_lookup (icon_size, &w, &h)) { size = (w + h) / 2; } return empathy_pixbuf_from_icon_name_sized (icon_name, size); } gchar * empathy_filename_from_icon_name (const gchar *icon_name, GtkIconSize icon_size) { GtkIconTheme *icon_theme; GtkIconInfo *icon_info; gint w, h; gint size = 48; gchar *ret; icon_theme = gtk_icon_theme_get_default (); if (gtk_icon_size_lookup (icon_size, &w, &h)) { size = (w + h) / 2; } icon_info = gtk_icon_theme_lookup_icon (icon_theme, icon_name, size, 0); ret = g_strdup (gtk_icon_info_get_filename (icon_info)); gtk_icon_info_free (icon_info); return ret; } /* Stolen from GtkSourceView, hence the weird intendation. Please keep it like * that to make it easier to apply changes from the original code. */ #define GTK_TEXT_UNKNOWN_CHAR 0xFFFC /* this function acts like g_utf8_offset_to_pointer() except that if it finds a * decomposable character it consumes the decomposition length from the given * offset. So it's useful when the offset was calculated for the normalized * version of str, but we need a pointer to str itself. */ static const gchar * pointer_from_offset_skipping_decomp (const gchar *str, gint offset) { gchar *casefold, *normal; const gchar *p, *q; p = str; while (offset > 0) { q = g_utf8_next_char (p); casefold = g_utf8_casefold (p, q - p); normal = g_utf8_normalize (casefold, -1, G_NORMALIZE_NFD); offset -= g_utf8_strlen (normal, -1); g_free (casefold); g_free (normal); p = q; } return p; } static const gchar * g_utf8_strcasestr (const gchar *haystack, const gchar *needle) { gsize needle_len; gsize haystack_len; const gchar *ret = NULL; gchar *p; gchar *casefold; gchar *caseless_haystack; gint i; g_return_val_if_fail (haystack != NULL, NULL); g_return_val_if_fail (needle != NULL, NULL); casefold = g_utf8_casefold (haystack, -1); caseless_haystack = g_utf8_normalize (casefold, -1, G_NORMALIZE_NFD); g_free (casefold); needle_len = g_utf8_strlen (needle, -1); haystack_len = g_utf8_strlen (caseless_haystack, -1); if (needle_len == 0) { ret = (gchar *) haystack; goto finally_1; } if (haystack_len < needle_len) { ret = NULL; goto finally_1; } p = (gchar *) caseless_haystack; needle_len = strlen (needle); i = 0; while (*p) { if ((strncmp (p, needle, needle_len) == 0)) { ret = pointer_from_offset_skipping_decomp (haystack, i); goto finally_1; } p = g_utf8_next_char (p); i++; } finally_1: g_free (caseless_haystack); return ret; } static gboolean g_utf8_caselessnmatch (const char *s1, const char *s2, gssize n1, gssize n2) { gchar *casefold; gchar *normalized_s1; gchar *normalized_s2; gint len_s1; gint len_s2; gboolean ret = FALSE; g_return_val_if_fail (s1 != NULL, FALSE); g_return_val_if_fail (s2 != NULL, FALSE); g_return_val_if_fail (n1 > 0, FALSE); g_return_val_if_fail (n2 > 0, FALSE); casefold = g_utf8_casefold (s1, n1); normalized_s1 = g_utf8_normalize (casefold, -1, G_NORMALIZE_NFD); g_free (casefold); casefold = g_utf8_casefold (s2, n2); normalized_s2 = g_utf8_normalize (casefold, -1, G_NORMALIZE_NFD); g_free (casefold); len_s1 = strlen (normalized_s1); len_s2 = strlen (normalized_s2); if (len_s1 < len_s2) goto finally_2; ret = (strncmp (normalized_s1, normalized_s2, len_s2) == 0); finally_2: g_free (normalized_s1); g_free (normalized_s2); return ret; } static void forward_chars_with_skipping (GtkTextIter *iter, gint count, gboolean skip_invisible, gboolean skip_nontext, gboolean skip_decomp) { gint i; g_return_if_fail (count >= 0); i = count; while (i > 0) { gboolean ignored = FALSE; /* minimal workaround to avoid the infinite loop of bug #168247. * It doesn't fix the problemjust the symptom... */ if (gtk_text_iter_is_end (iter)) return; if (skip_nontext && gtk_text_iter_get_char (iter) == GTK_TEXT_UNKNOWN_CHAR) ignored = TRUE; if (!ignored && skip_invisible && /* _gtk_text_btree_char_is_invisible (iter)*/ FALSE) ignored = TRUE; if (!ignored && skip_decomp) { /* being UTF8 correct sucks; this accounts for extra offsets coming from canonical decompositions of UTF8 characters (e.g. accented characters) which g_utf8_normalize () performs */ gchar *normal; gchar buffer[6]; gint buffer_len; buffer_len = g_unichar_to_utf8 (gtk_text_iter_get_char (iter), buffer); normal = g_utf8_normalize (buffer, buffer_len, G_NORMALIZE_NFD); i -= (g_utf8_strlen (normal, -1) - 1); g_free (normal); } gtk_text_iter_forward_char (iter); if (!ignored) --i; } } static gboolean lines_match (const GtkTextIter *start, const gchar **lines, gboolean visible_only, gboolean slice, GtkTextIter *match_start, GtkTextIter *match_end) { GtkTextIter next; gchar *line_text; const gchar *found; gint offset; if (*lines == NULL || **lines == '\0') { if (match_start) *match_start = *start; if (match_end) *match_end = *start; return TRUE; } next = *start; gtk_text_iter_forward_line (&next); /* No more text in buffer, but *lines is nonempty */ if (gtk_text_iter_equal (start, &next)) return FALSE; if (slice) { if (visible_only) line_text = gtk_text_iter_get_visible_slice (start, &next); else line_text = gtk_text_iter_get_slice (start, &next); } else { if (visible_only) line_text = gtk_text_iter_get_visible_text (start, &next); else line_text = gtk_text_iter_get_text (start, &next); } if (match_start) /* if this is the first line we're matching */ { found = g_utf8_strcasestr (line_text, *lines); } else { /* If it's not the first line, we have to match from the * start of the line. */ if (g_utf8_caselessnmatch (line_text, *lines, strlen (line_text), strlen (*lines))) found = line_text; else found = NULL; } if (found == NULL) { g_free (line_text); return FALSE; } /* Get offset to start of search string */ offset = g_utf8_strlen (line_text, found - line_text); next = *start; /* If match start needs to be returned, set it to the * start of the search string. */ forward_chars_with_skipping (&next, offset, visible_only, !slice, FALSE); if (match_start) { *match_start = next; } /* Go to end of search string */ forward_chars_with_skipping (&next, g_utf8_strlen (*lines, -1), visible_only, !slice, TRUE); g_free (line_text); ++lines; if (match_end) *match_end = next; /* pass NULL for match_start, since we don't need to find the * start again. */ return lines_match (&next, lines, visible_only, slice, NULL, match_end); } /* strsplit () that retains the delimiter as part of the string. */ static gchar ** strbreakup (const char *string, const char *delimiter, gint max_tokens) { GSList *string_list = NULL, *slist; gchar **str_array, *s, *casefold, *new_string; guint i, n = 1; g_return_val_if_fail (string != NULL, NULL); g_return_val_if_fail (delimiter != NULL, NULL); if (max_tokens < 1) max_tokens = G_MAXINT; s = strstr (string, delimiter); if (s) { guint delimiter_len = strlen (delimiter); do { guint len; len = s - string + delimiter_len; new_string = g_new (gchar, len + 1); strncpy (new_string, string, len); new_string[len] = 0; casefold = g_utf8_casefold (new_string, -1); g_free (new_string); new_string = g_utf8_normalize (casefold, -1, G_NORMALIZE_NFD); g_free (casefold); string_list = g_slist_prepend (string_list, new_string); n++; string = s + delimiter_len; s = strstr (string, delimiter); } while (--max_tokens && s); } if (*string) { n++; casefold = g_utf8_casefold (string, -1); new_string = g_utf8_normalize (casefold, -1, G_NORMALIZE_NFD); g_free (casefold); string_list = g_slist_prepend (string_list, new_string); } str_array = g_new (gchar*, n); i = n - 1; str_array[i--] = NULL; for (slist = string_list; slist; slist = slist->next) str_array[i--] = slist->data; g_slist_free (string_list); return str_array; } gboolean empathy_text_iter_forward_search (const GtkTextIter *iter, const gchar *str, GtkTextIter *match_start, GtkTextIter *match_end, const GtkTextIter *limit) { gchar **lines = NULL; GtkTextIter match; gboolean retval = FALSE; GtkTextIter search; gboolean visible_only; gboolean slice; g_return_val_if_fail (iter != NULL, FALSE); g_return_val_if_fail (str != NULL, FALSE); if (limit && gtk_text_iter_compare (iter, limit) >= 0) return FALSE; if (*str == '\0') { /* If we can move one char, return the empty string there */ match = *iter; if (gtk_text_iter_forward_char (&match)) { if (limit && gtk_text_iter_equal (&match, limit)) { return FALSE; } if (match_start) { *match_start = match; } if (match_end) { *match_end = match; } return TRUE; } else { return FALSE; } } visible_only = TRUE; slice = FALSE; /* locate all lines */ lines = strbreakup (str, "\n", -1); search = *iter; do { /* This loop has an inefficient worst-case, where * gtk_text_iter_get_text () is called repeatedly on * a single line. */ GtkTextIter end; if (limit && gtk_text_iter_compare (&search, limit) >= 0) { break; } if (lines_match (&search, (const gchar**)lines, visible_only, slice, &match, &end)) { if (limit == NULL || (limit && gtk_text_iter_compare (&end, limit) <= 0)) { retval = TRUE; if (match_start) { *match_start = match; } if (match_end) { *match_end = end; } } break; } } while (gtk_text_iter_forward_line (&search)); g_strfreev ((gchar **) lines); return retval; } static const gchar * g_utf8_strrcasestr (const gchar *haystack, const gchar *needle) { gsize needle_len; gsize haystack_len; const gchar *ret = NULL; gchar *p; gchar *casefold; gchar *caseless_haystack; gint i; g_return_val_if_fail (haystack != NULL, NULL); g_return_val_if_fail (needle != NULL, NULL); casefold = g_utf8_casefold (haystack, -1); caseless_haystack = g_utf8_normalize (casefold, -1, G_NORMALIZE_NFD); g_free (casefold); needle_len = g_utf8_strlen (needle, -1); haystack_len = g_utf8_strlen (caseless_haystack, -1); if (needle_len == 0) { ret = (gchar *) haystack; goto finally_1; } if (haystack_len < needle_len) { ret = NULL; goto finally_1; } i = haystack_len - needle_len; p = g_utf8_offset_to_pointer (caseless_haystack, i); needle_len = strlen (needle); while (p >= caseless_haystack) { if (strncmp (p, needle, needle_len) == 0) { ret = pointer_from_offset_skipping_decomp (haystack, i); goto finally_1; } p = g_utf8_prev_char (p); i--; } finally_1: g_free (caseless_haystack); return ret; } static gboolean backward_lines_match (const GtkTextIter *start, const gchar **lines, gboolean visible_only, gboolean slice, GtkTextIter *match_start, GtkTextIter *match_end) { GtkTextIter line, next; gchar *line_text; const gchar *found; gint offset; if (*lines == NULL || **lines == '\0') { if (match_start) *match_start = *start; if (match_end) *match_end = *start; return TRUE; } line = next = *start; if (gtk_text_iter_get_line_offset (&next) == 0) { if (!gtk_text_iter_backward_line (&next)) return FALSE; } else gtk_text_iter_set_line_offset (&next, 0); if (slice) { if (visible_only) line_text = gtk_text_iter_get_visible_slice (&next, &line); else line_text = gtk_text_iter_get_slice (&next, &line); } else { if (visible_only) line_text = gtk_text_iter_get_visible_text (&next, &line); else line_text = gtk_text_iter_get_text (&next, &line); } if (match_start) /* if this is the first line we're matching */ { found = g_utf8_strrcasestr (line_text, *lines); } else { /* If it's not the first line, we have to match from the * start of the line. */ if (g_utf8_caselessnmatch (line_text, *lines, strlen (line_text), strlen (*lines))) found = line_text; else found = NULL; } if (found == NULL) { g_free (line_text); return FALSE; } /* Get offset to start of search string */ offset = g_utf8_strlen (line_text, found - line_text); forward_chars_with_skipping (&next, offset, visible_only, !slice, FALSE); /* If match start needs to be returned, set it to the * start of the search string. */ if (match_start) { *match_start = next; } /* Go to end of search string */ forward_chars_with_skipping (&next, g_utf8_strlen (*lines, -1), visible_only, !slice, TRUE); g_free (line_text); ++lines; if (match_end) *match_end = next; /* try to match the rest of the lines forward, passing NULL * for match_start so lines_match will try to match the entire * line */ return lines_match (&next, lines, visible_only, slice, NULL, match_end); } gboolean empathy_text_iter_backward_search (const GtkTextIter *iter, const gchar *str, GtkTextIter *match_start, GtkTextIter *match_end, const GtkTextIter *limit) { gchar **lines = NULL; GtkTextIter match; gboolean retval = FALSE; GtkTextIter search; gboolean visible_only; gboolean slice; g_return_val_if_fail (iter != NULL, FALSE); g_return_val_if_fail (str != NULL, FALSE); if (limit && gtk_text_iter_compare (iter, limit) <= 0) return FALSE; if (*str == '\0') { /* If we can move one char, return the empty string there */ match = *iter; if (gtk_text_iter_backward_char (&match)) { if (limit && gtk_text_iter_equal (&match, limit)) return FALSE; if (match_start) *match_start = match; if (match_end) *match_end = match; return TRUE; } else { return FALSE; } } visible_only = TRUE; slice = TRUE; /* locate all lines */ lines = strbreakup (str, "\n", -1); search = *iter; while (TRUE) { /* This loop has an inefficient worst-case, where * gtk_text_iter_get_text () is called repeatedly on * a single line. */ GtkTextIter end; if (limit && gtk_text_iter_compare (&search, limit) <= 0) break; if (backward_lines_match (&search, (const gchar**)lines, visible_only, slice, &match, &end)) { if (limit == NULL || (limit && gtk_text_iter_compare (&end, limit) > 0)) { retval = TRUE; if (match_start) *match_start = match; if (match_end) *match_end = end; } break; } if (gtk_text_iter_get_line_offset (&search) == 0) { if (!gtk_text_iter_backward_line (&search)) break; } else { gtk_text_iter_set_line_offset (&search, 0); } } g_strfreev ((gchar **) lines); return retval; } gboolean empathy_window_get_is_visible (GtkWindow *window) { GdkWindowState state; GdkWindow *gdk_window; g_return_val_if_fail (GTK_IS_WINDOW (window), FALSE); gdk_window = gtk_widget_get_window (GTK_WIDGET (window)); if (!gdk_window) { return FALSE; } state = gdk_window_get_state (gdk_window); if (state & (GDK_WINDOW_STATE_WITHDRAWN | GDK_WINDOW_STATE_ICONIFIED)) { return FALSE; } return TRUE; } void empathy_window_iconify (GtkWindow *window, GtkStatusIcon *status_icon) { GdkRectangle icon_location; gulong data[4]; Display *dpy; GdkWindow *gdk_window; gtk_status_icon_get_geometry (status_icon, NULL, &icon_location, NULL); gdk_window = gtk_widget_get_window (GTK_WIDGET (window)); dpy = gdk_x11_drawable_get_xdisplay (gdk_window); data[0] = icon_location.x; data[1] = icon_location.y; data[2] = icon_location.width; data[3] = icon_location.height; XChangeProperty (dpy, GDK_WINDOW_XID (gdk_window), gdk_x11_get_xatom_by_name_for_display (gdk_drawable_get_display (gdk_window), "_NET_WM_ICON_GEOMETRY"), XA_CARDINAL, 32, PropModeReplace, (guchar *)&data, 4); gtk_window_set_skip_taskbar_hint (window, TRUE); gtk_window_iconify (window); } /* Takes care of moving the window to the current workspace. */ void empathy_window_present (GtkWindow *window, gboolean steal_focus) { guint32 timestamp; GdkWindow *gdk_window; g_return_if_fail (GTK_IS_WINDOW (window)); /* Move the window to the current workspace before trying to show it. * This is the behaviour people expect when clicking on the statusbar icon. */ gdk_window = gtk_widget_get_window (GTK_WIDGET (window)); if (gdk_window) { gint x, y; gint w, h; /* Has no effect if the WM has viewports, like compiz */ gdk_x11_window_move_to_current_desktop (gdk_window); /* If window is still off-screen, hide it to force it to * reposition on the current workspace. */ gtk_window_get_position (window, &x, &y); gtk_window_get_size (window, &w, &h); if (!EMPATHY_RECT_IS_ON_SCREEN (x, y, w, h)) gtk_widget_hide (GTK_WIDGET (window)); } timestamp = gtk_get_current_event_time (); gtk_window_present_with_time (window, timestamp); gtk_window_set_skip_taskbar_hint (window, FALSE); gtk_window_deiconify (window); } GtkWindow * empathy_get_toplevel_window (GtkWidget *widget) { GtkWidget *toplevel; g_return_val_if_fail (GTK_IS_WIDGET (widget), NULL); toplevel = gtk_widget_get_toplevel (widget); if (GTK_IS_WINDOW (toplevel) && gtk_widget_is_toplevel (toplevel)) { return GTK_WINDOW (toplevel); } return NULL; } /** empathy_make_absolute_url_len: * @url: an url * @len: a length * * Same as #empathy_make_absolute_url but for a limited string length */ gchar * empathy_make_absolute_url_len (const gchar *url, guint len) { g_return_val_if_fail (url != NULL, NULL); if (g_str_has_prefix (url, "ghelp:") || g_str_has_prefix (url, "mailto:") || strstr (url, ":/")) { return g_strndup (url, len); } if (strstr (url, "@")) { return g_strdup_printf ("mailto:%.*s", len, url); } return g_strdup_printf ("http://%.*s", len, url); } /** empathy_make_absolute_url: * @url: an url * * The URL opening code can't handle schemeless strings, so we try to be * smart and add http if there is no scheme or doesn't look like a mail * address. This should work in most cases, and let us click on strings * like "www.gnome.org". * * Returns: a newly allocated url with proper mailto: or http:// prefix, use * g_free when your are done with it */ gchar * empathy_make_absolute_url (const gchar *url) { return empathy_make_absolute_url_len (url, strlen (url)); } void empathy_url_show (GtkWidget *parent, const char *url) { gchar *real_url; GError *error = NULL; g_return_if_fail (parent == NULL || GTK_IS_WIDGET (parent)); g_return_if_fail (url != NULL); real_url = empathy_make_absolute_url (url); gtk_show_uri (parent ? gtk_widget_get_screen (parent) : NULL, real_url, gtk_get_current_event_time (), &error); if (error) { GtkWidget *dialog; dialog = gtk_message_dialog_new (NULL, 0, GTK_MESSAGE_ERROR, GTK_BUTTONS_CLOSE, _("Unable to open URI")); gtk_message_dialog_format_secondary_text (GTK_MESSAGE_DIALOG (dialog), "%s", error->message); g_signal_connect (dialog, "response", G_CALLBACK (gtk_widget_destroy), NULL); gtk_window_present (GTK_WINDOW (dialog)); g_clear_error (&error); } g_free (real_url); } static void link_button_hook (GtkLinkButton *button, const gchar *link, gpointer user_data) { empathy_url_show (GTK_WIDGET (button), link); } GtkWidget * empathy_link_button_new (const gchar *url, const gchar *title) { static gboolean hook = FALSE; if (!hook) { hook = TRUE; gtk_link_button_set_uri_hook (link_button_hook, NULL, NULL); } return gtk_link_button_new_with_label (url, title); } void empathy_toggle_button_set_state_quietly (GtkWidget *widget, GCallback callback, gpointer user_data, gboolean active) { g_return_if_fail (GTK_IS_TOGGLE_BUTTON (widget)); g_signal_handlers_block_by_func (widget, callback, user_data); g_object_set (widget, "active", active, NULL); g_signal_handlers_unblock_by_func (widget, callback, user_data); } void empathy_send_file (EmpathyContact *contact, GFile *file) { EmpathyFTFactory *factory; GtkRecentManager *manager; gchar *uri; g_return_if_fail (EMPATHY_IS_CONTACT (contact)); g_return_if_fail (G_IS_FILE (file)); factory = empathy_ft_factory_dup_singleton (); empathy_ft_factory_new_transfer_outgoing (factory, contact, file); uri = g_file_get_uri (file); manager = gtk_recent_manager_get_default (); gtk_recent_manager_add_item (manager, uri); g_free (uri); g_object_unref (factory); } void empathy_send_file_from_uri_list (EmpathyContact *contact, const gchar *uri_list) { const gchar *nl; GFile *file; /* Only handle a single file for now. It would be wicked cool to be able to do multiple files, offering to zip them or whatever like nautilus-sendto does. Note that text/uri-list is defined to have each line terminated by \r\n, but we can be tolerant of applications that only use \n or don't terminate single-line entries. */ nl = strstr (uri_list, "\r\n"); if (!nl) { nl = strchr (uri_list, '\n'); } if (nl) { gchar *uri = g_strndup (uri_list, nl - uri_list); file = g_file_new_for_uri (uri); g_free (uri); } else { file = g_file_new_for_uri (uri_list); } empathy_send_file (contact, file); g_object_unref (file); } static void file_manager_send_file_response_cb (GtkDialog *widget, gint response_id, EmpathyContact *contact) { GFile *file; if (response_id == GTK_RESPONSE_OK) { file = gtk_file_chooser_get_file (GTK_FILE_CHOOSER (widget)); empathy_send_file (contact, file); g_object_unref (file); } gtk_widget_destroy (GTK_WIDGET (widget)); } void empathy_send_file_with_file_chooser (EmpathyContact *contact) { GtkWidget *widget; GtkWidget *button; g_return_if_fail (EMPATHY_IS_CONTACT (contact)); DEBUG ("Creating selection file chooser"); widget = gtk_file_chooser_dialog_new (_("Select a file"), NULL, GTK_FILE_CHOOSER_ACTION_OPEN, GTK_STOCK_CANCEL, GTK_RESPONSE_CANCEL, NULL); /* send button */ button = gtk_button_new_with_mnemonic (_("_Send")); gtk_button_set_image (GTK_BUTTON (button), gtk_image_new_from_icon_name (EMPATHY_IMAGE_DOCUMENT_SEND, GTK_ICON_SIZE_BUTTON)); gtk_widget_show (button); gtk_dialog_add_action_widget (GTK_DIALOG (widget), button, GTK_RESPONSE_OK); gtk_widget_set_can_default (button, TRUE); gtk_dialog_set_default_response (GTK_DIALOG (widget), GTK_RESPONSE_OK); gtk_file_chooser_set_local_only (GTK_FILE_CHOOSER (widget), FALSE); g_signal_connect (widget, "response", G_CALLBACK (file_manager_send_file_response_cb), contact); gtk_widget_show (widget); } static void file_manager_receive_file_response_cb (GtkDialog *dialog, GtkResponseType response, EmpathyFTHandler *handler) { EmpathyFTFactory *factory; GFile *file; if (response == GTK_RESPONSE_OK) { factory = empathy_ft_factory_dup_singleton (); file = gtk_file_chooser_get_file (GTK_FILE_CHOOSER (dialog)); empathy_ft_factory_set_destination_for_incoming_handler (factory, handler, file); g_object_unref (factory); g_object_unref (file); } else { /* unref the handler, as we dismissed the file chooser, * and refused the transfer. */ g_object_unref (handler); } gtk_widget_destroy (GTK_WIDGET (dialog)); } void empathy_receive_file_with_file_chooser (EmpathyFTHandler *handler) { GtkWidget *widget; widget = gtk_file_chooser_dialog_new (_("Select a destination"), NULL, GTK_FILE_CHOOSER_ACTION_SAVE, GTK_STOCK_CANCEL, GTK_RESPONSE_CANCEL, GTK_STOCK_SAVE, GTK_RESPONSE_OK, NULL); gtk_file_chooser_set_current_name (GTK_FILE_CHOOSER (widget), empathy_ft_handler_get_filename (handler)); gtk_file_chooser_set_do_overwrite_confirmation (GTK_FILE_CHOOSER (widget), TRUE); g_signal_connect (widget, "response", G_CALLBACK (file_manager_receive_file_response_cb), handler); gtk_widget_show (widget); }