/* -*- Mode: C; tab-width: 8; indent-tabs-mode: t; c-basic-offset: 8 -*- */
/*
* Copyright (C) 2003-2007 Imendio AB
- * Copyright (C) 2007 Collabora Ltd.
+ * 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
#include <string.h>
#include <time.h>
#include <sys/types.h>
-#include <regex.h>
-#include <glib/gi18n.h>
+#include <glib/gi18n-lib.h>
#include <libxml/uri.h>
-#include <libtelepathy/tp-helpers.h>
+#include <telepathy-glib/connection.h>
+#include <telepathy-glib/channel.h>
+#include <telepathy-glib/dbus.h>
-#include "empathy-debug.h"
#include "empathy-utils.h"
+#include "empathy-contact-factory.h"
#include "empathy-contact-manager.h"
+#include "empathy-dispatcher.h"
+#include "empathy-dispatch-operation.h"
+#include "empathy-idle.h"
+#include "empathy-tp-call.h"
-#define DEBUG_DOMAIN "Utils"
-
-static void regex_init (void);
-
-gchar *
-empathy_substring (const gchar *str,
- gint start,
- gint end)
-{
- return g_strndup (str + start, end - start);
-}
+#include <extensions/extensions.h>
-/*
- * Regular Expression code to match urls.
- */
-#define USERCHARS "-A-Za-z0-9"
-#define PASSCHARS "-A-Za-z0-9,?;.:/!%$^*&~\"#'"
-#define HOSTCHARS "-A-Za-z0-9"
-#define PATHCHARS "-A-Za-z0-9_$.+!*(),;:@&=?/~#%"
-#define SCHEME "(news:|telnet:|nntp:|file:/|https?:|ftps?:|webcal:)"
-#define USER "[" USERCHARS "]+(:["PASSCHARS "]+)?"
-#define URLPATH "/[" PATHCHARS "]*[^]'.}>) \t\r\n,\\\"]"
+#define DEBUG_FLAG EMPATHY_DEBUG_OTHER
+#include "empathy-debug.h"
-static regex_t dingus[EMPATHY_REGEX_ALL];
-static void
-regex_init (void)
+void
+empathy_init (void)
{
- static gboolean inited = FALSE;
- const gchar *expression;
- gint i;
+ static gboolean initialized = FALSE;
- if (inited) {
+ if (initialized)
return;
- }
- for (i = 0; i < EMPATHY_REGEX_ALL; i++) {
- switch (i) {
- case EMPATHY_REGEX_AS_IS:
- expression =
- SCHEME "//(" USER "@)?[" HOSTCHARS ".]+"
- "(:[0-9]+)?(" URLPATH ")?";
- break;
- case EMPATHY_REGEX_BROWSER:
- expression =
- "(www|ftp)[" HOSTCHARS "]*\\.[" HOSTCHARS ".]+"
- "(:[0-9]+)?(" URLPATH ")?";
- break;
- case EMPATHY_REGEX_EMAIL:
- expression =
- "(mailto:)?[a-z0-9][a-z0-9.-]*@[a-z0-9]"
- "[a-z0-9-]*(\\.[a-z0-9][a-z0-9-]*)+";
- break;
- case EMPATHY_REGEX_OTHER:
- expression =
- "news:[-A-Z\\^_a-z{|}~!\"#$%&'()*+,./0-9;:=?`]+"
- "@[" HOSTCHARS ".]+(:[0-9]+)?";
- break;
- default:
- /* Silence the compiler. */
- expression = NULL;
- continue;
- }
+ g_type_init ();
- memset (&dingus[i], 0, sizeof (regex_t));
- regcomp (&dingus[i], expression, REG_EXTENDED | REG_ICASE);
- }
+ /* Setup gettext */
+ bindtextdomain (GETTEXT_PACKAGE, LOCALEDIR);
+ bind_textdomain_codeset (GETTEXT_PACKAGE, "UTF-8");
- inited = TRUE;
-}
-
-gint
-empathy_regex_match (EmpathyRegExType type,
- const gchar *msg,
- GArray *start,
- GArray *end)
-{
- regmatch_t matches[1];
- gint ret = 0;
- gint num_matches = 0;
- gint offset = 0;
- gint i;
-
- g_return_val_if_fail (type >= 0 || type <= EMPATHY_REGEX_ALL, 0);
-
- regex_init ();
-
- while (!ret && type != EMPATHY_REGEX_ALL) {
- ret = regexec (&dingus[type], msg + offset, 1, matches, 0);
- if (ret == 0) {
- gint s;
-
- num_matches++;
-
- s = matches[0].rm_so + offset;
- offset = matches[0].rm_eo + offset;
-
- g_array_append_val (start, s);
- g_array_append_val (end, offset);
- }
- }
-
- if (type != EMPATHY_REGEX_ALL) {
- empathy_debug (DEBUG_DOMAIN,
- "Found %d matches for regex type:%d",
- num_matches, type);
- return num_matches;
+ /* Setup debug output for empathy and telepathy-glib */
+ if (g_getenv ("EMPATHY_TIMING") != NULL) {
+ g_log_set_default_handler (tp_debug_timestamped_log_handler, NULL);
}
+ empathy_debug_set_flags (g_getenv ("EMPATHY_DEBUG"));
+ tp_debug_divert_messages (g_getenv ("EMPATHY_LOGFILE"));
- /* If EMPATHY_REGEX_ALL then we run ALL regex's on the string. */
- for (i = 0; i < EMPATHY_REGEX_ALL; i++, ret = 0) {
- while (!ret) {
- ret = regexec (&dingus[i], msg + offset, 1, matches, 0);
- if (ret == 0) {
- gint s;
+ emp_cli_init ();
- num_matches++;
-
- s = matches[0].rm_so + offset;
- offset = matches[0].rm_eo + offset;
-
- g_array_append_val (start, s);
- g_array_append_val (end, offset);
- }
- }
- }
-
- empathy_debug (DEBUG_DOMAIN,
- "Found %d matches for ALL regex types",
- num_matches);
+ initialized = TRUE;
+}
- return num_matches;
+gchar *
+empathy_substring (const gchar *str,
+ gint start,
+ gint end)
+{
+ return g_strndup (str + start, end - start);
}
gint
xmlDtd *dtd;
gboolean ret;
- path = g_build_filename (DATADIR, "empathy", dtd_filename, NULL);
+ path = g_build_filename (g_getenv ("EMPATHY_SRCDIR"), "libempathy",
+ dtd_filename, NULL);
+ if (!g_file_test (path, G_FILE_TEST_EXISTS)) {
+ g_free (path);
+ path = g_build_filename (DATADIR, "empathy", dtd_filename, NULL);
+ }
+ DEBUG ("Loading dtd file %s", path);
/* The list of valid chars is taken from libxml. */
escaped = xmlURIEscapeStr (path, ":@&=+$,/?;");
-
g_free (path);
memset (&cvp, 0, sizeof (cvp));
return found;
}
-GType
-empathy_dbus_type_to_g_type (const gchar *dbus_type_string)
+guint
+empathy_account_hash (gconstpointer key)
{
- if (dbus_type_string == NULL)
- return G_TYPE_NONE;
+ g_return_val_if_fail (MC_IS_ACCOUNT (key), 0);
- if (dbus_type_string[0] == 's') {
- return G_TYPE_STRING;
- }
- else if (dbus_type_string[0] == 'b') {
- return G_TYPE_BOOLEAN;
- }
- else if (dbus_type_string[0] == 'q') {
- return G_TYPE_UINT;
+ return g_str_hash (mc_account_get_unique_name (MC_ACCOUNT (key)));
+}
+
+gboolean
+empathy_account_equal (gconstpointer a,
+ gconstpointer b)
+{
+ const gchar *name_a;
+ const gchar *name_b;
+
+ g_return_val_if_fail (MC_IS_ACCOUNT (a), FALSE);
+ g_return_val_if_fail (MC_IS_ACCOUNT (b), FALSE);
+
+ name_a = mc_account_get_unique_name (MC_ACCOUNT (a));
+ name_b = mc_account_get_unique_name (MC_ACCOUNT (b));
+
+ return g_str_equal (name_a, name_b);
+}
+
+MissionControl *
+empathy_mission_control_dup_singleton (void)
+{
+ static MissionControl *mc = NULL;
+
+ if (!mc) {
+ mc = mission_control_new (tp_get_bus ());
+ g_object_add_weak_pointer (G_OBJECT (mc), (gpointer) &mc);
+ } else {
+ g_object_ref (mc);
}
- else if (dbus_type_string[0] == 'n') {
- return G_TYPE_INT;
+
+ return mc;
+}
+
+const gchar *
+empathy_presence_get_default_message (McPresence presence)
+{
+ switch (presence) {
+ case MC_PRESENCE_AVAILABLE:
+ return _("Available");
+ case MC_PRESENCE_DO_NOT_DISTURB:
+ return _("Busy");
+ case MC_PRESENCE_AWAY:
+ case MC_PRESENCE_EXTENDED_AWAY:
+ return _("Away");
+ case MC_PRESENCE_HIDDEN:
+ return _("Hidden");
+ case MC_PRESENCE_OFFLINE:
+ case MC_PRESENCE_UNSET:
+ return _("Offline");
+ default:
+ g_assert_not_reached ();
}
- g_assert_not_reached ();
- return G_TYPE_NONE;
+ return NULL;
}
const gchar *
-empathy_g_type_to_dbus_type (GType g_type)
+empathy_presence_to_str (McPresence presence)
{
- switch (g_type) {
- case G_TYPE_STRING:
- return "s";
- case G_TYPE_BOOLEAN:
- return "b";
- case G_TYPE_UINT:
- return "q";
- case G_TYPE_INT:
- return "n";
+ switch (presence) {
+ case MC_PRESENCE_AVAILABLE:
+ return "available";
+ case MC_PRESENCE_DO_NOT_DISTURB:
+ return "busy";
+ case MC_PRESENCE_AWAY:
+ return "away";
+ case MC_PRESENCE_EXTENDED_AWAY:
+ return "ext_away";
+ case MC_PRESENCE_HIDDEN:
+ return "hidden";
+ case MC_PRESENCE_OFFLINE:
+ return "offline";
+ case MC_PRESENCE_UNSET:
+ return "unset";
default:
g_assert_not_reached ();
}
return NULL;
}
+McPresence
+empathy_presence_from_str (const gchar *str)
+{
+ if (strcmp (str, "available") == 0) {
+ return MC_PRESENCE_AVAILABLE;
+ } else if ((strcmp (str, "dnd") == 0) || (strcmp (str, "busy") == 0)) {
+ return MC_PRESENCE_DO_NOT_DISTURB;
+ } else if ((strcmp (str, "away") == 0) || (strcmp (str, "brb") == 0)) {
+ return MC_PRESENCE_AWAY;
+ } else if ((strcmp (str, "xa") == 0) || (strcmp (str, "ext_away") == 0)) {
+ return MC_PRESENCE_EXTENDED_AWAY;
+ } else if (strcmp (str, "hidden") == 0) {
+ return MC_PRESENCE_HIDDEN;
+ } else if (strcmp (str, "offline") == 0) {
+ return MC_PRESENCE_OFFLINE;
+ } else if (strcmp (str, "unset") == 0) {
+ return MC_PRESENCE_UNSET;
+ }
+
+ return MC_PRESENCE_UNSET;
+}
+
gchar *
-empathy_g_value_to_string (const GValue *value)
+empathy_file_lookup (const gchar *filename, const gchar *subdir)
{
- gchar *return_string = NULL;
- GValue string_g_value = {0, };
+ gchar *path;
- g_value_init (&string_g_value, G_TYPE_STRING);
- g_value_transform (value, &string_g_value);
- return_string = g_value_dup_string (&string_g_value);
- g_value_unset (&string_g_value);
+ if (!subdir) {
+ subdir = ".";
+ }
- return return_string;
+ path = g_build_filename (g_getenv ("EMPATHY_SRCDIR"), subdir, filename, NULL);
+ if (!g_file_test (path, G_FILE_TEST_EXISTS)) {
+ g_free (path);
+ path = g_build_filename (DATADIR, "empathy", filename, NULL);
+ }
+
+ return path;
}
-GValue *
-empathy_string_to_g_value (const gchar *str, GType type)
+typedef struct {
+ EmpathyRunUntilReadyFunc func;
+ gpointer user_data;
+ GObject *object;
+ GMainLoop *loop;
+} RunUntilReadyData;
+
+static void
+run_until_ready_cb (RunUntilReadyData *data)
{
- GValue *g_value;
-
- g_value = g_new0 (GValue, 1);
- g_value_init (g_value, type);
-
- switch (type) {
- case G_TYPE_STRING:
- g_value_set_string (g_value, str);
- break;
- case G_TYPE_BOOLEAN:
- g_value_set_boolean (g_value, (str[0] == 'y' || str[0] == 'T'));
- break;
- case G_TYPE_UINT:
- g_value_set_uint (g_value, atoi (str));
- break;
- case G_TYPE_INT:
- g_value_set_int (g_value, atoi (str));
- break;
- default:
- g_assert_not_reached ();
+ if (!data->func || data->func (data->object, data->user_data)) {
+ DEBUG ("Object %p is ready", data->object);
+ g_main_loop_quit (data->loop);
}
+}
- return g_value;
+static gboolean
+object_is_ready (GObject *object,
+ gpointer user_data)
+{
+ gboolean ready;
+
+ g_object_get (object, "ready", &ready, NULL);
+
+ return ready;
}
-gboolean
-empathy_g_value_equal (const GValue *value1,
- const GValue *value2)
+void
+empathy_run_until_ready_full (gpointer object,
+ const gchar *signal,
+ EmpathyRunUntilReadyFunc func,
+ gpointer user_data,
+ GMainLoop **loop)
{
- GType type;
+ RunUntilReadyData data;
+ gulong signal_id;
- g_return_val_if_fail (value1 != NULL, FALSE);
- g_return_val_if_fail (value2 != NULL, FALSE);
+ g_return_if_fail (G_IS_OBJECT (object));
+ g_return_if_fail (signal != NULL);
- type = G_VALUE_TYPE (value1);
- if (type != G_VALUE_TYPE (value2)) {
- return FALSE;
+ if (func && func (object, user_data)) {
+ return;
}
- switch (type)
- {
- case G_TYPE_STRING: {
- const gchar *str1;
- const gchar *str2;
+ DEBUG ("Starting run until ready for object %p", object);
+
+ data.func = func;
+ data.user_data = user_data;
+ data.object = object;
+ data.loop = g_main_loop_new (NULL, FALSE);
- str1 = g_value_get_string (value1);
- str2 = g_value_get_string (value2);
- return (str1 && str2 && strcmp (str1, str2) == 0) ||
- (G_STR_EMPTY (str1) && G_STR_EMPTY (str2));
+ signal_id = g_signal_connect_swapped (object, signal,
+ G_CALLBACK (run_until_ready_cb),
+ &data);
+ if (loop != NULL) {
+ *loop = data.loop;
}
- case G_TYPE_BOOLEAN:
- return g_value_get_boolean (value1) == g_value_get_boolean (value2);
- case G_TYPE_UINT:
- return g_value_get_uint (value1) == g_value_get_uint (value2);
- case G_TYPE_INT:
- return g_value_get_int (value1) == g_value_get_int (value2);
- default:
- g_warning ("Unsupported GType in value comparaison");
+
+ g_main_loop_run (data.loop);
+
+ if (loop != NULL) {
+ *loop = NULL;
}
- return FALSE;
+ g_signal_handler_disconnect (object, signal_id);
+ g_main_loop_unref (data.loop);
}
-guint
-empathy_account_hash (gconstpointer key)
+void
+empathy_run_until_ready (gpointer object)
{
- return g_str_hash (mc_account_get_unique_name (MC_ACCOUNT (key)));
+ empathy_run_until_ready_full (object, "notify::ready", object_is_ready,
+ NULL, NULL);
}
-gboolean
-empathy_account_equal (gconstpointer a,
- gconstpointer b)
+McAccount *
+empathy_channel_get_account (TpChannel *channel)
{
- const gchar *name_a;
- const gchar *name_b;
-
- name_a = mc_account_get_unique_name (MC_ACCOUNT (a));
- name_b = mc_account_get_unique_name (MC_ACCOUNT (b));
+ TpConnection *connection;
+ McAccount *account;
+ MissionControl *mc;
+
+ g_object_get (channel, "connection", &connection, NULL);
+ mc = empathy_mission_control_dup_singleton ();
+ account = mission_control_get_account_for_tpconnection (mc, connection, NULL);
+ g_object_unref (connection);
+ g_object_unref (mc);
- return g_str_equal (name_a, name_b);
+ return account;
}
-MissionControl *
-empathy_mission_control_new (void)
+guint
+empathy_proxy_hash (gconstpointer key)
{
- static MissionControl *mc = NULL;
+ TpProxy *proxy = TP_PROXY (key);
+ TpProxyClass *proxy_class = TP_PROXY_GET_CLASS (key);
- if (!mc) {
- mc = mission_control_new (tp_get_bus ());
- g_object_add_weak_pointer (G_OBJECT (mc), (gpointer) &mc);
- } else {
- g_object_ref (mc);
- }
+ g_return_val_if_fail (TP_IS_PROXY (proxy), 0);
+ g_return_val_if_fail (proxy_class->must_have_unique_name, 0);
- return mc;
+ return g_str_hash (proxy->object_path) ^ g_str_hash (proxy->bus_name);
}
-gchar *
-empathy_get_channel_id (McAccount *account,
- TpChan *tp_chan)
+gboolean
+empathy_proxy_equal (gconstpointer a,
+ gconstpointer b)
{
- MissionControl *mc;
- TpConn *tp_conn;
- GArray *handles;
- gchar **names;
- gchar *name;
- GError *error;
-
- g_return_val_if_fail (MC_IS_ACCOUNT (account), NULL);
- g_return_val_if_fail (TELEPATHY_IS_CHAN (tp_chan), NULL);
-
- mc = empathy_mission_control_new ();
- tp_conn = mission_control_get_connection (mc, account, NULL);
- g_object_unref (mc);
+ TpProxy *proxy_a = TP_PROXY (a);
+ TpProxy *proxy_b = TP_PROXY (b);
+ TpProxyClass *proxy_a_class = TP_PROXY_GET_CLASS (a);
+ TpProxyClass *proxy_b_class = TP_PROXY_GET_CLASS (b);
+
+ g_return_val_if_fail (TP_IS_PROXY (proxy_a), FALSE);
+ g_return_val_if_fail (TP_IS_PROXY (proxy_b), FALSE);
+ g_return_val_if_fail (proxy_a_class->must_have_unique_name, 0);
+ g_return_val_if_fail (proxy_b_class->must_have_unique_name, 0);
+
+ return g_str_equal (proxy_a->object_path, proxy_b->object_path) &&
+ g_str_equal (proxy_a->bus_name, proxy_b->bus_name);
+}
- if (!tp_conn) {
- return NULL;
- }
+gboolean
+empathy_check_available_state (void)
+{
+ McPresence presence;
+ EmpathyIdle *idle;
- /* Get the handle's name */
- handles = g_array_new (FALSE, FALSE, sizeof (guint));
- g_array_append_val (handles, tp_chan->handle);
- if (!tp_conn_inspect_handles (DBUS_G_PROXY (tp_conn),
- tp_chan->handle_type,
- handles,
- &names,
- &error)) {
- empathy_debug (DEBUG_DOMAIN,
- "Couldn't get id: %s",
- error ? error->message : "No error given");
-
- g_clear_error (&error);
- g_array_free (handles, TRUE);
- g_object_unref (tp_conn);
-
- return NULL;
- }
+ idle = empathy_idle_dup_singleton ();
+ presence = empathy_idle_get_state (idle);
+ g_object_unref (idle);
- name = *names;
- g_free (names);
- g_object_unref (tp_conn);
+ if (presence != MC_PRESENCE_AVAILABLE &&
+ presence != MC_PRESENCE_UNSET) {
+ return FALSE;
+ }
- return name;
+ return TRUE;
}
-