/*
* Copyright (C) 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., 59 Temple Place - Suite 330,
* Boston, MA 02111-1307, USA.
*
* Authors: Jonny Lamb <jonny.lamb@collabora.co.uk>
* */
#include <config.h>
#include <string.h>
#include <glib.h>
#include <gtk/gtk.h>
#include <glib/gi18n.h>
#include <libxml/parser.h>
#include <libxml/tree.h>
#include <libmissioncontrol/mc-account.h>
#include "empathy-import-dialog.h"
#define DEBUG_FLAG EMPATHY_DEBUG_OTHER
#include <libempathy/empathy-debug.h>
typedef enum
{
EMPATHY_IMPORT_SETTING_TYPE_STRING,
EMPATHY_IMPORT_SETTING_TYPE_BOOL,
EMPATHY_IMPORT_SETTING_TYPE_INT,
} EmpathyImportSettingType;
typedef struct
{
gpointer value;
EmpathyImportSettingType type;
} EmpathyImportSetting;
/* Pidgin to MC map */
typedef struct
{
gchar *protocol;
gchar *pidgin_name;
gchar *mc_name;
} PidginMcMapItem;
static PidginMcMapItem pidgin_mc_map[] =
{
{ "msn", "server", "server" },
{ "msn", "port", "port" },
{ "jabber", "connect_server", "server" },
{ "jabber", "port", "port" },
{ "jabber", "require_tls", "require-encryption" },
{ "jabber", "old_ssl", "old-ssl" },
{ "aim", "server", "server" },
{ "aim", "port", "port" },
{ "salut", "first", "first-name" },
{ "salut", "last", "last-name" },
{ "salut", "jid", "jid" },
{ "salut", "email", "email" },
{ "groupwise", "server", "server" },
{ "groupwise", "port", "port" },
{ "icq", "server", "server" },
{ "icq", "port", "port" },
{ "irc", "realname", "fullname" },
{ "irc", "ssl", "use-ssl" },
{ "irc", "port", "port" },
{ "yahoo", "server", "server" },
{ "yahoo", "port", "port" },
{ "yahoo", "xfer_port", "xfer-port" },
{ "yahoo", "ignore_invites", "ignore-invites" },
{ "yahoo", "yahoojp", "yahoojp" },
{ "yahoo", "xferjp_host", "xferjp-host" },
{ "yahoo", "serverjp", "serverjp" },
{ "yahoo", "xfer_host", "xfer-host" },
};
typedef struct
{
GtkWidget *window;
GtkWidget *label_select;
GtkWidget *combo;
} EmpathyImportDialog;
#define PIDGIN_ACCOUNT_TAG_NAME "name"
#define PIDGIN_ACCOUNT_TAG_ACCOUNT "account"
#define PIDGIN_ACCOUNT_TAG_PROTOCOL "protocol"
#define PIDGIN_ACCOUNT_TAG_PASSWORD "password"
#define PIDGIN_ACCOUNT_TAG_SETTINGS "settings"
#define PIDGIN_SETTING_PROP_TYPE "type"
#define PIDGIN_PROTOCOL_BONJOUR "bonjour"
#define PIDGIN_PROTOCOL_NOVELL "novell"
static void empathy_import_dialog_add_setting (GHashTable *settings,
gchar *key, gpointer value, EmpathyImportSettingType type);
static gboolean empathy_import_dialog_add_account (gchar *protocol_name,
GHashTable *settings);
static void empathy_import_dialog_pidgin_parse_setting (gchar *protocol,
xmlNodePtr setting, GHashTable *settings);
static void empathy_import_dialog_pidgin_import_accounts ();
static void empathy_import_dialog_response_cb (GtkDialog *dialog_window,
gint response, EmpathyImportDialog *dialog);
static void
empathy_import_dialog_add_setting (GHashTable *settings,
gchar *key,
gpointer value,
EmpathyImportSettingType type)
{
EmpathyImportSetting *set = g_slice_new0 (EmpathyImportSetting);
set->value = value;
set->type = type;
g_hash_table_insert (settings, key, set);
}
static gboolean
empathy_import_dialog_add_account (gchar *protocol_name,
GHashTable *settings)
{
McProfile *profile;
McAccount *account;
gchar *key_char;
GHashTableIter iter;
gpointer key, value;
EmpathyImportSetting *set;
gchar *display_name;
gchar *username;
DEBUG ("Looking up profile with protocol '%s'", protocol_name);
profile = mc_profile_lookup (protocol_name);
if (profile == NULL)
return FALSE;
account = mc_account_create (profile);
g_hash_table_iter_init (&iter, settings);
while (g_hash_table_iter_next (&iter, &key, &value))
{
set = (EmpathyImportSetting *) value;
key_char = (gchar *) key;
switch (((EmpathyImportSetting *) value)->type)
{
case EMPATHY_IMPORT_SETTING_TYPE_STRING:
DEBUG ("Setting %s to (string) %s",
key_char, (gchar *) set->value);
mc_account_set_param_string (account,
key_char, (gchar *) set->value);
break;
case EMPATHY_IMPORT_SETTING_TYPE_BOOL:
DEBUG ("Setting %s to (bool) %i",
key_char, (gboolean) set->value);
mc_account_set_param_boolean (account,
key_char, (gboolean) set->value);
break;
case EMPATHY_IMPORT_SETTING_TYPE_INT:
DEBUG ("Setting %s to (int) %i",
key_char, (gint) set->value);
mc_account_set_param_int (account,
key_char, (gint) set->value);
break;
}
}
mc_account_get_param_string (account, "account", &username);
display_name = g_strdup_printf ("%s (%s)", username,
mc_profile_get_display_name (profile));
mc_account_set_display_name (account, display_name);
g_free (username);
g_free (display_name);
g_object_unref (account);
g_object_unref (profile);
return TRUE;
}
static void
empathy_import_dialog_pidgin_parse_setting (gchar *protocol,
xmlNodePtr setting,
GHashTable *settings)
{
int i;
if (!xmlHasProp (setting, PIDGIN_ACCOUNT_TAG_NAME))
return;
for (i = 0; i < G_N_ELEMENTS (pidgin_mc_map); i++)
{
if (strcmp(protocol, pidgin_mc_map[i].protocol) != 0)
continue;
if (strcmp ((gchar *) xmlGetProp (setting, PIDGIN_ACCOUNT_TAG_NAME),
pidgin_mc_map[i].pidgin_name) == 0)
{
gint arg;
gchar *type = NULL;
type = (gchar *) xmlGetProp (setting, PIDGIN_SETTING_PROP_TYPE);
if (strcmp (type, "bool") == 0)
{
sscanf ((gchar *) xmlNodeGetContent (setting),"%i", &arg);
empathy_import_dialog_add_setting (settings,
pidgin_mc_map[i].mc_name,
(gpointer) arg,
EMPATHY_IMPORT_SETTING_TYPE_BOOL);
}
else if (strcmp (type, "int") == 0)
{
sscanf ((gchar *) xmlNodeGetContent (setting),
"%i", &arg);
empathy_import_dialog_add_setting (settings,
pidgin_mc_map[i].mc_name,
(gpointer) arg,
EMPATHY_IMPORT_SETTING_TYPE_INT);
}
else if (strcmp (type, "string") == 0)
{
empathy_import_dialog_add_setting (settings,
pidgin_mc_map[i].mc_name,
(gpointer) xmlNodeGetContent (setting),
EMPATHY_IMPORT_SETTING_TYPE_STRING);
}
}
}
}
static void
empathy_import_dialog_pidgin_import_accounts ()
{
xmlNodePtr rootnode, node, child, setting;
xmlParserCtxtPtr ctxt;
xmlDocPtr doc;
gchar *filename;
gchar *protocol = NULL;
gchar *name = NULL;
gchar *username = NULL;
GHashTable *settings;
ctxt = xmlNewParserCtxt ();
filename = g_build_filename (g_get_home_dir (), ".purple", "accounts.xml",
NULL);
doc = xmlCtxtReadFile (ctxt, filename, NULL, 0);
g_free (filename);
rootnode = xmlDocGetRootElement (doc);
if (rootnode == NULL)
return;
node = rootnode->children;
while (node)
{
if (strcmp ((gchar *) node->name, PIDGIN_ACCOUNT_TAG_ACCOUNT) == 0)
{
child = node->children;
settings = g_hash_table_new (g_str_hash, g_str_equal);
while (child)
{
if (strcmp ((gchar *) child->name,
PIDGIN_ACCOUNT_TAG_PROTOCOL) == 0)
{
protocol = (gchar *) xmlNodeGetContent (child);
if (g_str_has_prefix (protocol, "prpl-"))
protocol = strchr (protocol, '-') + 1;
if (strcmp (protocol, PIDGIN_PROTOCOL_BONJOUR) == 0)
protocol = "salut";
else if (strcmp (protocol, PIDGIN_PROTOCOL_NOVELL) == 0)
protocol = "groupwise";
empathy_import_dialog_add_setting (settings, "protocol",
(gpointer) protocol,
EMPATHY_IMPORT_SETTING_TYPE_STRING);
}
else if (strcmp ((gchar *) child->name,
PIDGIN_ACCOUNT_TAG_NAME) == 0)
{
name = (gchar *) xmlNodeGetContent (child);
if (g_strrstr (name, "/") != NULL)
{
gchar **name_resource;
name_resource = g_strsplit (name, "/", 2);
username = g_strdup(name_resource[0]);
g_free (name_resource);
}
else
username = name;
if (strstr (name, "@") && strcmp (protocol, "irc") == 0)
{
gchar **nick_server;
nick_server = g_strsplit (name, "@", 2);
username = nick_server[0];
empathy_import_dialog_add_setting (settings,
"server", (gpointer) nick_server[1],
EMPATHY_IMPORT_SETTING_TYPE_STRING);
}
empathy_import_dialog_add_setting (settings, "account",
(gpointer) username, EMPATHY_IMPORT_SETTING_TYPE_STRING);
}
else if (strcmp ((gchar *) child->name,
PIDGIN_ACCOUNT_TAG_PASSWORD) == 0)
{
empathy_import_dialog_add_setting (settings, "password",
(gpointer) xmlNodeGetContent (child),
EMPATHY_IMPORT_SETTING_TYPE_STRING);
}
else if (strcmp ((gchar *) child->name,
PIDGIN_ACCOUNT_TAG_SETTINGS) == 0)
{
setting = child->children;
while (setting)
{
empathy_import_dialog_pidgin_parse_setting (protocol,
setting, settings);
setting = setting->next;
}
}
child = child->next;
}
if (g_hash_table_size (settings) > 0)
empathy_import_dialog_add_account (protocol, settings);
g_free (username);
g_hash_table_unref (settings);
}
node = node->next;
}
xmlFreeDoc(doc);
xmlFreeParserCtxt (ctxt);
}
static void
empathy_import_dialog_response_cb (GtkDialog *dialog_window,
gint response,
EmpathyImportDialog *dialog)
{
gchar *from = NULL;
if (response == GTK_RESPONSE_OK)
{
from = gtk_combo_box_get_active_text (GTK_COMBO_BOX (dialog->combo));
if (strcmp (from, "Pidgin") == 0)
empathy_import_dialog_pidgin_import_accounts ();
}
gtk_widget_hide (GTK_WIDGET (dialog_window));
}
void
empathy_import_dialog_show (GtkWindow *parent)
{
static EmpathyImportDialog *dialog = NULL;
if (dialog)
{
gtk_window_present (GTK_WINDOW (dialog->window));
return;
}
dialog = g_slice_new0 (EmpathyImportDialog);
dialog->window = gtk_dialog_new_with_buttons (_("Import accounts"),
NULL,
GTK_DIALOG_MODAL,
GTK_STOCK_CANCEL, GTK_RESPONSE_CANCEL,
GTK_STOCK_OK, GTK_RESPONSE_OK,
NULL);
g_signal_connect (G_OBJECT (dialog->window), "response",
G_CALLBACK (empathy_import_dialog_response_cb),
dialog);
dialog->label_select = gtk_label_new (
_("Select the program to import accounts from:"));
dialog->combo = gtk_combo_box_new_text ();
gtk_combo_box_append_text (GTK_COMBO_BOX (dialog->combo), "Pidgin");
gtk_combo_box_set_active (GTK_COMBO_BOX (dialog->combo), 0);
gtk_box_pack_start_defaults (GTK_BOX (GTK_DIALOG (dialog->window)->vbox),
dialog->label_select);
gtk_box_pack_start_defaults (GTK_BOX (GTK_DIALOG (dialog->window)->vbox),
dialog->combo);
if (parent)
gtk_window_set_transient_for (GTK_WINDOW (dialog->window), parent);
gtk_widget_show_all (dialog->window);
}