Split pidgin import code into its own module. It makes easier to add other import modules for other programs.

svn path=/trunk/; revision=1644

1 files changed, 305 insertions, 0 deletions

diff --git a/src/empathy-import-pidgin.c b/src/empathy-import-pidgin.c
new file mode 100644
index 000000000..0ca8b8a4e
--- /dev/null
+++ b/src/empathy-import-pidgin.c
@@ -0,0 +1,305 @@
+/*
+ * 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 <glib/gstdio.h>
+#include <libxml/parser.h>
+#include <libxml/tree.h>
+
+#include <libmissioncontrol/mc-account.h>
+#include <telepathy-glib/util.h>
+
+#include "empathy-import-dialog.h"
+#include "empathy-import-pidgin.h"
+
+#define DEBUG_FLAG EMPATHY_DEBUG_OTHER
+#include <libempathy/empathy-debug.h>
+#include <libempathy/empathy-utils.h>
+
+#include <libempathy-gtk/empathy-ui-utils.h>
+
+/* 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" },
+};
+
+#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
+import_dialog_pidgin_parse_setting (EmpathyImportAccountData *data,
+                                    xmlNodePtr setting)
+{
+  PidginMcMapItem *item = NULL;
+  gchar *tag_name;
+  gchar *type = NULL;
+  gchar *content;
+  gint i;
+  GValue *value = NULL;
+
+  /* We can't do anything if the setting don't have a name */
+  tag_name = (gchar *) xmlGetProp (setting, PIDGIN_ACCOUNT_TAG_NAME);
+  if (!tag_name)
+    return;
+
+  /* Search for the map corresponding to setting we are parsing */
+  for (i = 0; i < G_N_ELEMENTS (pidgin_mc_map); i++)
+    {
+      if (!tp_strdiff (mc_profile_get_protocol_name (data->profile),
+            pidgin_mc_map[i].protocol) &&
+          !tp_strdiff (tag_name, pidgin_mc_map[i].pidgin_name))
+        {
+          item = pidgin_mc_map + i;
+          break;
+        }
+    }
+  g_free (tag_name);
+
+  /* If we didn't find the item, there is nothing we can do */
+  if (!item)
+    return;
+
+  type = (gchar *) xmlGetProp (setting, PIDGIN_SETTING_PROP_TYPE);
+  content = (gchar *) xmlNodeGetContent (setting);
+
+  if (!tp_strdiff (type, "bool"))
+    {
+      i = (gint) g_ascii_strtod (content, NULL);
+      value = tp_g_value_slice_new (G_TYPE_BOOLEAN);
+      g_value_set_boolean (value, i != 0);
+    }
+  else if (!tp_strdiff (type, "int"))
+    {
+      i = (gint) g_ascii_strtod (content, NULL);
+      value = tp_g_value_slice_new (G_TYPE_INT);
+      g_value_set_int (value, i);
+    }
+  else if (!tp_strdiff (type, "string"))
+    {
+      value = tp_g_value_slice_new (G_TYPE_STRING);
+      g_value_set_string (value, content);
+    }
+
+  if (value)
+    g_hash_table_insert (data->settings, item->mc_name, value);
+
+  g_free (type);
+  g_free (content);
+}
+
+GList *
+empathy_import_pidgin_load (void)
+{
+  xmlNodePtr rootnode, node, child, setting;
+  xmlParserCtxtPtr ctxt;
+  xmlDocPtr doc;
+  gchar *filename;
+  GList *accounts = NULL;
+
+  /* Load pidgin accounts xml */
+  ctxt = xmlNewParserCtxt ();
+  filename = g_build_filename (g_get_home_dir (), ".purple", "accounts.xml",
+      NULL);
+
+  if (g_access (filename, R_OK) != 0)
+    goto FILENAME;
+
+  doc = xmlCtxtReadFile (ctxt, filename, NULL, 0);
+
+  rootnode = xmlDocGetRootElement (doc);
+  if (rootnode == NULL)
+    goto OUT;
+
+  for (node = rootnode->children; node; node = node->next)
+    {
+      EmpathyImportAccountData *data;
+
+      /* If it is not an account node, skip. */
+      if (tp_strdiff ((gchar *) node->name, PIDGIN_ACCOUNT_TAG_ACCOUNT))
+        continue;
+
+      /* Create account data struct */
+      data = empathy_import_account_data_new ();
+
+      /* Parse account's child nodes to fill the account data struct */
+      for (child = node->children; child; child = child->next)
+        {
+          GValue *value;
+
+          /* Protocol */
+          if (!tp_strdiff ((gchar *) child->name,
+              PIDGIN_ACCOUNT_TAG_PROTOCOL))
+            {
+              gchar *content;
+              const gchar *protocol;
+
+              protocol = content = (gchar *) xmlNodeGetContent (child);
+
+              if (g_str_has_prefix (protocol, "prpl-"))
+                protocol += 5;
+
+              if (!tp_strdiff (protocol, PIDGIN_PROTOCOL_BONJOUR))
+                protocol = "salut";
+              else if (!tp_strdiff (protocol, PIDGIN_PROTOCOL_NOVELL))
+                protocol = "groupwise";
+
+              data->profile = mc_profile_lookup (protocol);
+              g_free (content);
+
+              if (data->profile == NULL)
+                break;
+            }
+
+          /* Username and IRC server. */
+          else if (!tp_strdiff ((gchar *) child->name,
+              PIDGIN_ACCOUNT_TAG_NAME))
+            {
+              gchar *name;
+              GStrv name_resource = NULL;
+              GStrv nick_server = NULL;
+              const gchar *username;
+
+              name = (gchar *) xmlNodeGetContent (child);
+
+              /* Split "username/resource" */
+              if (g_strrstr (name, "/") != NULL)
+                {
+                  name_resource = g_strsplit (name, "/", 2);
+                  username = name_resource[0];
+                }
+              else
+                username = name;
+
+             /* Split "username@server" if it is an IRC account */
+             if (strstr (name, "@") && !tp_strdiff (
+                   mc_profile_get_protocol_name (data->profile), "irc"))
+              {
+                nick_server = g_strsplit (name, "@", 2);
+                username = nick_server[0];
+
+                /* Add the server setting */
+                value = tp_g_value_slice_new (G_TYPE_STRING);
+                g_value_set_string (value, nick_server[1]);
+                g_hash_table_insert (data->settings, "server", value);
+              }
+
+              /* Add the account setting */
+              value = tp_g_value_slice_new (G_TYPE_STRING);
+              g_value_set_string (value, username);
+              g_hash_table_insert (data->settings, "account", value);
+
+              g_strfreev (name_resource);
+              g_strfreev (nick_server);
+              g_free (name);
+            }
+
+          /* Password */
+          else if (!tp_strdiff ((gchar *) child->name,
+              PIDGIN_ACCOUNT_TAG_PASSWORD))
+            {
+              gchar *password;
+
+              password = (gchar *) xmlNodeGetContent (child);
+
+              /* Add the password setting */
+              value = tp_g_value_slice_new (G_TYPE_STRING);
+              g_value_set_string (value, password);
+              g_hash_table_insert (data->settings, "password", value);
+
+              g_free (password);
+            }
+
+          /* Other settings */
+          else if (!tp_strdiff ((gchar *) child->name,
+              PIDGIN_ACCOUNT_TAG_SETTINGS))
+              for (setting = child->children; setting; setting = setting->next)
+                import_dialog_pidgin_parse_setting (data, setting);
+        }
+
+      /* If we have the needed settings, add the account data to the list,
+       * otherwise free the data */
+      if (data->profile != NULL && g_hash_table_size (data->settings) > 0)
+        accounts = g_list_prepend (accounts, data);
+      else
+        empathy_import_account_data_free (data);
+    }
+
+OUT:
+  xmlFreeDoc(doc);
+  xmlFreeParserCtxt (ctxt);
+
+FILENAME:
+  g_free (filename);
+
+  return accounts;
+}
+