* Purple is the legal property of its developers, whose names are too numerous
* to list here. Please refer to the COPYRIGHT file distributed with this
* 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 Street, Fifth Floor, Boston, MA 02111-1301 USA
static PurpleAccountUiOps *account_ui_ops = NULL;
static GList *accounts = NULL;
static guint save_timer = 0;
static gboolean accounts_loaded = FALSE;
/*********************************************************************
*********************************************************************/
accounts_to_xmlnode(void)
PurpleXmlNode *node, *child;
node = purple_xmlnode_new("account");
purple_xmlnode_set_attrib(node, "version", "1.0");
for (cur = purple_accounts_get_all(); cur != NULL; cur = cur->next)
child = _purple_account_to_xmlnode(cur->data);
purple_xmlnode_insert_child(node, child);
purple_debug_error("accounts", "Attempted to save accounts before "
node = accounts_to_xmlnode();
data = purple_xmlnode_to_formatted_str(node, NULL);
purple_util_write_data_to_config_file("accounts.xml", data, -1);
purple_xmlnode_free(node);
purple_accounts_schedule_save(void)
save_timer = g_timeout_add_seconds(5, save_cb, NULL);
migrate_icq_server(PurpleAccount *account)
/* Migrate the login server setting for ICQ accounts. See
* 'mtn log --last 1 --no-graph --from b6d7712e90b68610df3bd2d8cbaf46d94c8b3794'
* for details on the change. */
if(purple_strequal(purple_account_get_protocol_id(account), "prpl-icq")) {
const char *tmp = purple_account_get_string(account, "server", NULL);
if(purple_strequal(tmp, "login.messaging.aol.com") ||
purple_strequal(tmp, "login.oscar.aol.com"))
purple_account_set_string(account, "server", "login.icq.com");
if(purple_strequal(tmp, "slogin.oscar.aol.com"))
purple_account_set_string(account, "server", "slogin.icq.com");
migrate_xmpp_encryption(PurpleAccount *account)
/* When this is removed, nuke the "old_ssl" and "require_tls" settings */
if (g_str_equal(purple_account_get_protocol_id(account), "prpl-jabber")) {
const char *sec = purple_account_get_string(account, "connection_security", "");
if (g_str_equal("", sec)) {
const char *val = "require_tls";
if (purple_account_get_bool(account, "old_ssl", FALSE))
else if (!purple_account_get_bool(account, "require_tls", TRUE))
val = "opportunistic_tls";
purple_account_set_string(account, "connection_security", val);
parse_settings(PurpleXmlNode *node, PurpleAccount *account)
/* Get the UI string, if these are UI settings */
ui = purple_xmlnode_get_attrib(node, "ui");
/* Read settings, one by one */
for (child = purple_xmlnode_get_child(node, "setting"); child != NULL;
child = purple_xmlnode_get_next_twin(child))
const char *name, *str_type;
name = purple_xmlnode_get_attrib(child, "name");
/* Ignore this setting */
str_type = purple_xmlnode_get_attrib(child, "type");
/* Ignore this setting */
if (purple_strequal(str_type, "string"))
type = PURPLE_PREF_STRING;
else if (purple_strequal(str_type, "int"))
else if (purple_strequal(str_type, "bool"))
type = PURPLE_PREF_BOOLEAN;
/* Ignore this setting */
data = purple_xmlnode_get_data(child);
/* Ignore this setting */
if (type == PURPLE_PREF_STRING)
purple_account_set_string(account, name, data);
else if (type == PURPLE_PREF_INT)
purple_account_set_int(account, name, atoi(data));
else if (type == PURPLE_PREF_BOOLEAN)
purple_account_set_bool(account, name,
(*data == '0' ? FALSE : TRUE));
if (type == PURPLE_PREF_STRING)
purple_account_set_ui_string(account, ui, name, data);
else if (type == PURPLE_PREF_INT)
purple_account_set_ui_int(account, ui, name, atoi(data));
else if (type == PURPLE_PREF_BOOLEAN)
purple_account_set_ui_bool(account, ui, name,
(*data == '0' ? FALSE : TRUE));
/* we do this here because we need access to account settings to determine
* if we can/should migrate an ICQ account's server setting */
migrate_icq_server(account);
/* we do this here because we need to do it before the user views the
* Edit Account dialog. */
migrate_xmpp_encryption(account);
parse_status_attrs(PurpleXmlNode *node, PurpleStatus *status)
for (child = purple_xmlnode_get_child(node, "attribute"); child != NULL;
child = purple_xmlnode_get_next_twin(child))
const char *id = purple_xmlnode_get_attrib(child, "id");
const char *value = purple_xmlnode_get_attrib(child, "value");
if (!id || !*id || !value || !*value)
attr_value = purple_status_get_attr_value(status, id);
list = g_list_append(list, (char *)id);
switch (G_VALUE_TYPE(attr_value))
list = g_list_append(list, (char *)value);
if (sscanf(value, "%d", &v) == 1)
list = g_list_append(list, GINT_TO_POINTER(v));
list = g_list_remove(list, id);
parse_status(PurpleXmlNode *node, PurpleAccount *account)
/* Get the active/inactive state */
data = purple_xmlnode_get_attrib(node, "active");
if (g_ascii_strcasecmp(data, "true") == 0)
else if (g_ascii_strcasecmp(data, "false") == 0)
/* Get the type of the status */
type = purple_xmlnode_get_attrib(node, "type");
/* Read attributes into a GList */
child = purple_xmlnode_get_child(node, "attributes");
attrs = parse_status_attrs(child,
purple_account_get_status(account, type));
purple_account_set_status_list(account, type, active, attrs);
parse_statuses(PurpleXmlNode *node, PurpleAccount *account)
for (child = purple_xmlnode_get_child(node, "status"); child != NULL;
child = purple_xmlnode_get_next_twin(child))
parse_status(child, account);
parse_proxy_info(PurpleXmlNode *node, PurpleAccount *account)
PurpleProxyInfo *proxy_info;
proxy_info = purple_proxy_info_new();
/* Use the global proxy settings, by default */
purple_proxy_info_set_proxy_type(proxy_info, PURPLE_PROXY_USE_GLOBAL);
child = purple_xmlnode_get_child(node, "type");
if ((child != NULL) && ((data = purple_xmlnode_get_data(child)) != NULL))
if (purple_strequal(data, "global"))
purple_proxy_info_set_proxy_type(proxy_info, PURPLE_PROXY_USE_GLOBAL);
else if (purple_strequal(data, "none"))
purple_proxy_info_set_proxy_type(proxy_info, PURPLE_PROXY_NONE);
else if (purple_strequal(data, "http"))
purple_proxy_info_set_proxy_type(proxy_info, PURPLE_PROXY_HTTP);
else if (purple_strequal(data, "socks4"))
purple_proxy_info_set_proxy_type(proxy_info, PURPLE_PROXY_SOCKS4);
else if (purple_strequal(data, "socks5"))
purple_proxy_info_set_proxy_type(proxy_info, PURPLE_PROXY_SOCKS5);
else if (purple_strequal(data, "tor"))
purple_proxy_info_set_proxy_type(proxy_info, PURPLE_PROXY_TOR);
else if (purple_strequal(data, "envvar"))
purple_proxy_info_set_proxy_type(proxy_info, PURPLE_PROXY_USE_ENVVAR);
purple_debug_error("accounts", "Invalid proxy type found when "
"loading account information for %s\n",
purple_account_get_username(account));
child = purple_xmlnode_get_child(node, "host");
if ((child != NULL) && ((data = purple_xmlnode_get_data(child)) != NULL))
purple_proxy_info_set_host(proxy_info, data);
child = purple_xmlnode_get_child(node, "port");
if ((child != NULL) && ((data = purple_xmlnode_get_data(child)) != NULL))
purple_proxy_info_set_port(proxy_info, atoi(data));
/* Read proxy username */
child = purple_xmlnode_get_child(node, "username");
if ((child != NULL) && ((data = purple_xmlnode_get_data(child)) != NULL))
purple_proxy_info_set_username(proxy_info, data);
/* Read proxy password */
child = purple_xmlnode_get_child(node, "password");
if ((child != NULL) && ((data = purple_xmlnode_get_data(child)) != NULL))
purple_proxy_info_set_password(proxy_info, data);
/* If there are no values set then proxy_info NULL */
if ((purple_proxy_info_get_proxy_type(proxy_info) == PURPLE_PROXY_USE_GLOBAL) &&
(purple_proxy_info_get_host(proxy_info) == NULL) &&
(purple_proxy_info_get_port(proxy_info) == 0) &&
(purple_proxy_info_get_username(proxy_info) == NULL) &&
(purple_proxy_info_get_password(proxy_info) == NULL))
purple_proxy_info_destroy(proxy_info);
purple_account_set_proxy_info(account, proxy_info);
parse_current_error(PurpleXmlNode *node, PurpleAccount *account)
char *type_str = NULL, *description = NULL;
PurpleConnectionErrorInfo *current_error = NULL;
child = purple_xmlnode_get_child(node, "type");
if (child == NULL || (type_str = purple_xmlnode_get_data(child)) == NULL)
if (type > PURPLE_CONNECTION_ERROR_OTHER_ERROR)
purple_debug_error("accounts",
"Invalid PurpleConnectionError value %d found when "
"loading account information for %s\n",
type, purple_account_get_username(account));
type = PURPLE_CONNECTION_ERROR_OTHER_ERROR;
child = purple_xmlnode_get_child(node, "description");
description = purple_xmlnode_get_data(child);
description = g_strdup("");
current_error = g_new0(PurpleConnectionErrorInfo, 1);
current_error->type = type;
current_error->description = description;
_purple_account_set_current_error(account, current_error);
parse_account(PurpleXmlNode *node)
char *protocol_id = NULL;
child = purple_xmlnode_get_child(node, "protocol");
protocol_id = purple_xmlnode_get_data(child);
child = purple_xmlnode_get_child(node, "name");
name = purple_xmlnode_get_data(child);
/* Do we really need to do this? */
child = purple_xmlnode_get_child(node, "username");
name = purple_xmlnode_get_data(child);
if ((protocol_id == NULL) || (name == NULL))
ret = purple_account_new(name, protocol_id);
child = purple_xmlnode_get_child(node, "alias");
if ((child != NULL) && ((data = purple_xmlnode_get_data(child)) != NULL))
purple_account_set_private_alias(ret, data);
child = purple_xmlnode_get_child(node, "statuses");
parse_statuses(child, ret);
child = purple_xmlnode_get_child(node, "userinfo");
if ((child != NULL) && ((data = purple_xmlnode_get_data(child)) != NULL))
purple_account_set_user_info(ret, data);
/* Read an old buddyicon */
child = purple_xmlnode_get_child(node, "buddyicon");
if ((child != NULL) && ((data = purple_xmlnode_get_data(child)) != NULL))
const char *dirname = purple_buddy_icons_get_cache_dir();
char *filename = g_build_filename(dirname, data, NULL);
if (g_file_get_contents(filename, &contents, &len, NULL))
purple_buddy_icons_set_account_icon(ret, (guchar *)contents, len);
/* Read settings (both core and UI) */
for (child = purple_xmlnode_get_child(node, "settings"); child != NULL;
child = purple_xmlnode_get_next_twin(child))
parse_settings(child, ret);
child = purple_xmlnode_get_child(node, "proxy");
parse_proxy_info(child, ret);
child = purple_xmlnode_get_child(node, "current_error");
parse_current_error(child, ret);
child = purple_xmlnode_get_child(node, "password");
const char *keyring_id = purple_xmlnode_get_attrib(child, "keyring_id");
const char *mode = purple_xmlnode_get_attrib(child, "mode");
data = purple_xmlnode_get_data(child);
result = purple_keyring_import_password(ret, keyring_id, mode, data, NULL);
if (result == TRUE || purple_keyring_get_inuse() == NULL) {
purple_account_set_remember_password(ret, TRUE);
purple_debug_error("accounts", "Failed to import password.\n");
PurpleXmlNode *node, *child;
node = purple_util_read_xml_from_config_file("accounts.xml", _("accounts"));
for (child = purple_xmlnode_get_child(node, "account"); child != NULL;
child = purple_xmlnode_get_next_twin(child))
new_acct = parse_account(child);
purple_accounts_add(new_acct);
purple_xmlnode_free(node);
_purple_buddy_icons_account_loaded_cb();
purple_accounts_add(PurpleAccount *account)
g_return_if_fail(account != NULL);
if (g_list_find(accounts, account) != NULL)
accounts = g_list_append(accounts, account);
purple_accounts_schedule_save();
purple_signal_emit(purple_accounts_get_handle(), "account-added", account);
purple_accounts_remove(PurpleAccount *account)
g_return_if_fail(account != NULL);
accounts = g_list_remove(accounts, account);
purple_accounts_schedule_save();
/* Clearing the error ensures that account-error-changed is emitted,
* which is the end of the guarantee that the the error's pointer is
purple_account_clear_current_error(account);
purple_signal_emit(purple_accounts_get_handle(), "account-removed", account);
purple_accounts_delete_set(PurpleAccount *account, GError *error, gpointer data)
g_object_unref(G_OBJECT(account));
purple_accounts_delete(PurpleAccount *account)
PurpleBlistNode *gnode, *cnode, *bnode;
g_return_if_fail(account != NULL);
* Disable the account before blowing it out of the water.
* Conceptually it probably makes more sense to disable the
* account for all UIs rather than the just the current UI,
* but it doesn't really matter.
purple_account_set_enabled(account, purple_core_get_ui(), FALSE);
purple_notify_close_with_handle(account);
purple_request_close_with_handle(account);
purple_accounts_remove(account);
/* Remove this account's buddies */
for (gnode = purple_blist_get_default_root(); gnode != NULL;
gnode = purple_blist_node_get_sibling_next(gnode)) {
if (!PURPLE_IS_GROUP(gnode))
cnode = purple_blist_node_get_first_child(gnode);
PurpleBlistNode *cnode_next = purple_blist_node_get_sibling_next(cnode);
if(PURPLE_IS_CONTACT(cnode)) {
bnode = purple_blist_node_get_first_child(cnode);
PurpleBlistNode *bnode_next = purple_blist_node_get_sibling_next(bnode);
if (PURPLE_IS_BUDDY(bnode)) {
PurpleBuddy *b = (PurpleBuddy *)bnode;
if (purple_buddy_get_account(b) == account)
purple_blist_remove_buddy(b);
} else if (PURPLE_IS_CHAT(cnode)) {
PurpleChat *c = (PurpleChat *)cnode;
if (purple_chat_get_account(c) == account)
purple_blist_remove_chat(c);
/* Remove any open conversation for this account */
for (iter = purple_conversations_get_all(); iter; ) {
PurpleConversation *conv = iter->data;
if (purple_conversation_get_account(conv) == account)
/* Remove this account's pounces */
purple_pounce_destroy_all_by_account(account);
/* This will cause the deletion of an old buddy icon. */
purple_buddy_icons_set_account_icon(account, NULL, 0);
/* This is async because we do not want the
* account being overwritten before we are done.
purple_keyring_set_password(account, NULL,
purple_accounts_delete_set, NULL);
purple_accounts_reorder(PurpleAccount *account, guint new_index)
g_return_if_fail(account != NULL);
g_return_if_fail(new_index <= g_list_length(accounts));
index = g_list_index(accounts, account);
purple_debug_error("accounts",
"Unregistered account (%s) discovered during reorder!\n",
purple_account_get_username(account));
l = g_list_nth(accounts, index);
if (new_index > (guint)index)
/* Remove the old one. */
accounts = g_list_delete_link(accounts, l);
/* Insert it where it should go. */
accounts = g_list_insert(accounts, account, new_index);
purple_accounts_schedule_save();
purple_accounts_get_all(void)
purple_accounts_get_all_active(void)
GList *all = purple_accounts_get_all();
PurpleAccount *account = all->data;
if (purple_account_get_enabled(account, purple_core_get_ui()))
list = g_list_append(list, account);
purple_accounts_find(const char *name, const char *protocol_id)
PurpleAccount *account = NULL;
g_return_val_if_fail(name != NULL, NULL);
g_return_val_if_fail(protocol_id != NULL, NULL);
for (l = purple_accounts_get_all(); l != NULL; l = l->next) {
account = (PurpleAccount *)l->data;
if (!purple_strequal(purple_account_get_protocol_id(account), protocol_id))
who = g_strdup(purple_normalize(account, name));
if (purple_strequal(purple_normalize(account, purple_account_get_username(account)), who)) {
purple_accounts_restore_current_statuses()
/* If we're not connected to the Internet right now, we bail on this */
if (!purple_network_is_available())
purple_debug_warning("accounts", "Network not connected; skipping reconnect\n");
for (l = purple_accounts_get_all(); l != NULL; l = l->next)
account = (PurpleAccount *)l->data;
if (purple_account_get_enabled(account, purple_core_get_ui()) &&
(purple_presence_is_online(purple_account_get_presence(account))))
purple_account_connect(account);
static PurpleAccountUiOps *
purple_account_ui_ops_copy(PurpleAccountUiOps *ops)
PurpleAccountUiOps *ops_new;
g_return_val_if_fail(ops != NULL, NULL);
ops_new = g_new(PurpleAccountUiOps, 1);
purple_account_ui_ops_get_type(void)
type = g_boxed_type_register_static("PurpleAccountUiOps",
(GBoxedCopyFunc)purple_account_ui_ops_copy,
purple_accounts_set_ui_ops(PurpleAccountUiOps *ops)
purple_accounts_get_ui_ops(void)
purple_accounts_get_handle(void)
signed_on_cb(PurpleConnection *gc,
PurpleAccount *account = purple_connection_get_account(gc);
purple_account_clear_current_error(account);
purple_signal_emit(purple_accounts_get_handle(), "account-signed-on",
signed_off_cb(PurpleConnection *gc,
PurpleAccount *account = purple_connection_get_account(gc);
purple_signal_emit(purple_accounts_get_handle(), "account-signed-off",
connection_error_cb(PurpleConnection *gc,
PurpleConnectionError type,
const gchar *description,
PurpleConnectionErrorInfo *err;
account = purple_connection_get_account(gc);
g_return_if_fail(account != NULL);
err = g_new0(PurpleConnectionErrorInfo, 1);
err->description = g_strdup(description);
_purple_account_set_current_error(account, err);
purple_signal_emit(purple_accounts_get_handle(), "account-connection-error",
account, type, description);
password_migration_cb(PurpleAccount *account)
/* account may be NULL (means: all) */
purple_accounts_schedule_save();
purple_accounts_init(void)
void *handle = purple_accounts_get_handle();
void *conn_handle = purple_connections_get_handle();
purple_signal_register(handle, "account-connecting",
purple_marshal_VOID__POINTER, G_TYPE_NONE, 1,
purple_signal_register(handle, "account-disabled",
purple_marshal_VOID__POINTER, G_TYPE_NONE, 1,
purple_signal_register(handle, "account-enabled",
purple_marshal_VOID__POINTER, G_TYPE_NONE, 1,
purple_signal_register(handle, "account-setting-info",
purple_marshal_VOID__POINTER_POINTER, G_TYPE_NONE, 2,
PURPLE_TYPE_ACCOUNT, G_TYPE_STRING);
purple_signal_register(handle, "account-set-info",
purple_marshal_VOID__POINTER_POINTER, G_TYPE_NONE, 2,
PURPLE_TYPE_ACCOUNT, G_TYPE_STRING);
purple_signal_register(handle, "account-created",
purple_marshal_VOID__POINTER, G_TYPE_NONE, 1,
purple_signal_register(handle, "account-destroying",
purple_marshal_VOID__POINTER, G_TYPE_NONE, 1,
purple_signal_register(handle, "account-added",
purple_marshal_VOID__POINTER, G_TYPE_NONE, 1,
purple_signal_register(handle, "account-removed",
purple_marshal_VOID__POINTER, G_TYPE_NONE, 1,
purple_signal_register(handle, "account-status-changing",
purple_marshal_VOID__POINTER_POINTER_POINTER,
G_TYPE_NONE, 3, PURPLE_TYPE_ACCOUNT,
PURPLE_TYPE_STATUS, PURPLE_TYPE_STATUS);
purple_signal_register(handle, "account-status-changed",
purple_marshal_VOID__POINTER_POINTER_POINTER,
G_TYPE_NONE, 3, PURPLE_TYPE_ACCOUNT,
PURPLE_TYPE_STATUS, PURPLE_TYPE_STATUS);
purple_signal_register(handle, "account-actions-changed",
purple_marshal_VOID__POINTER, G_TYPE_NONE, 1,
purple_signal_register(handle, "account-alias-changed",
purple_marshal_VOID__POINTER_POINTER, G_TYPE_NONE, 2,
PURPLE_TYPE_ACCOUNT, G_TYPE_STRING);
purple_signal_register(handle, "account-authorization-requested",
purple_marshal_INT__POINTER_POINTER_POINTER,
G_TYPE_INT, 4, PURPLE_TYPE_ACCOUNT, G_TYPE_STRING,
G_TYPE_STRING, G_TYPE_STRING);
purple_signal_register(handle, "account-authorization-denied",
purple_marshal_VOID__POINTER_POINTER, G_TYPE_NONE, 3,
PURPLE_TYPE_ACCOUNT, G_TYPE_STRING, G_TYPE_STRING);
purple_signal_register(handle, "account-authorization-granted",
purple_marshal_VOID__POINTER_POINTER, G_TYPE_NONE, 3,
PURPLE_TYPE_ACCOUNT, G_TYPE_STRING, G_TYPE_STRING);
purple_signal_register(handle, "account-error-changed",
purple_marshal_VOID__POINTER_POINTER_POINTER,
G_TYPE_NONE, 3, PURPLE_TYPE_ACCOUNT,
PURPLE_TYPE_CONNECTION_ERROR_INFO,
PURPLE_TYPE_CONNECTION_ERROR_INFO);
purple_signal_register(handle, "account-signed-on",
purple_marshal_VOID__POINTER, G_TYPE_NONE, 1,
purple_signal_register(handle, "account-signed-off",
purple_marshal_VOID__POINTER, G_TYPE_NONE, 1,
purple_signal_register(handle, "account-connection-error",
purple_marshal_VOID__POINTER_INT_POINTER,
G_TYPE_NONE, 3, PURPLE_TYPE_ACCOUNT,
PURPLE_TYPE_CONNECTION_ERROR, G_TYPE_STRING);
purple_signal_connect(conn_handle, "signed-on", handle,
PURPLE_CALLBACK(signed_on_cb), NULL);
purple_signal_connect(conn_handle, "signed-off", handle,
PURPLE_CALLBACK(signed_off_cb), NULL);
purple_signal_connect(conn_handle, "connection-error", handle,
PURPLE_CALLBACK(connection_error_cb), NULL);
purple_signal_connect(purple_keyring_get_handle(), "password-migration", handle,
PURPLE_CALLBACK(password_migration_cb), NULL);
purple_accounts_uninit(void)
gpointer handle = purple_accounts_get_handle();
g_source_remove(save_timer);
for (; accounts; accounts = g_list_delete_link(accounts, accounts))
g_object_unref(G_OBJECT(accounts->data));
purple_signals_disconnect_by_handle(handle);
purple_signals_unregister_by_instance(handle);