libpurple/account.c

   1 /**
   2  * @file account.c Account API
   3  * @ingroup core
   4  */
   5
   6 /* purple
   7  *
   8  * Purple is the legal property of its developers, whose names are too numerous
   9  * to list here.  Please refer to the COPYRIGHT file distributed with this
  10  * source distribution.
  11  *
  12  * This program is free software; you can redistribute it and/or modify
  13  * it under the terms of the GNU General Public License as published by
  14  * the Free Software Foundation; either version 2 of the License, or
  15  * (at your option) any later version.
  16  *
  17  * This program is distributed in the hope that it will be useful,
  18  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  19  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  20  * GNU General Public License for more details.
  21  *
  22  * You should have received a copy of the GNU General Public License
  23  * along with this program; if not, write to the Free Software
  24  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02111-1301  USA
  25  */
  26 #include "internal.h"
  27 #include "account.h"
  28 #include "core.h"
  29 #include "dbus-maybe.h"
  30 #include "debug.h"
  31 #include "network.h"
  32 #include "notify.h"
  33 #include "pounce.h"
  34 #include "prefs.h"
  35 #include "privacy.h"
  36 #include "prpl.h"
  37 #include "request.h"
  38 #include "server.h"
  39 #include "signals.h"
  40 #include "status.h"
  41 #include "util.h"
  42 #include "xmlnode.h"
  43
  44 typedef struct
  45 {
  46         PurpleConnectionErrorInfo *current_error;
  47 } PurpleAccountPrivate;
  48
  49 #define PURPLE_ACCOUNT_GET_PRIVATE(account) \
  50         ((PurpleAccountPrivate *) (account->priv))
  51
  52 /* TODO: Should use PurpleValue instead of this?  What about "ui"? */
  53 typedef struct
  54 {
  55         PurplePrefType type;
  56
  57         char *ui;
  58
  59         union
  60         {
  61                 int integer;
  62                 char *string;
  63                 gboolean boolean;
  64
  65         } value;
  66
  67 } PurpleAccountSetting;
  68
  69 typedef struct
  70 {
  71         PurpleAccountRequestType type;
  72         PurpleAccount *account;
  73         void *ui_handle;
  74         char *user;
  75         gpointer userdata;
  76         PurpleAccountRequestAuthorizationCb auth_cb;
  77         PurpleAccountRequestAuthorizationCb deny_cb;
  78         guint ref;
  79 } PurpleAccountRequestInfo;
  80
  81 static PurpleAccountUiOps *account_ui_ops = NULL;
  82
  83 static GList   *accounts = NULL;
  84 static guint    save_timer = 0;
  85 static gboolean accounts_loaded = FALSE;
  86
  87 static GList *handles = NULL;
  88
  89 static void set_current_error(PurpleAccount *account,
  90         PurpleConnectionErrorInfo *new_err);
  91
  92 /*********************************************************************
  93  * Writing to disk                                                   *
  94  *********************************************************************/
  95
  96 static void
  97 setting_to_xmlnode(gpointer key, gpointer value, gpointer user_data)
  98 {
  99         const char *name;
 100         PurpleAccountSetting *setting;
 101         xmlnode *node, *child;
 102         char buf[21];
 103
 104         name    = (const char *)key;
 105         setting = (PurpleAccountSetting *)value;
 106         node    = (xmlnode *)user_data;
 107
 108         child = xmlnode_new_child(node, "setting");
 109         xmlnode_set_attrib(child, "name", name);
 110
 111         if (setting->type == PURPLE_PREF_INT) {
 112                 xmlnode_set_attrib(child, "type", "int");
 113                 g_snprintf(buf, sizeof(buf), "%d", setting->value.integer);
 114                 xmlnode_insert_data(child, buf, -1);
 115         }
 116         else if (setting->type == PURPLE_PREF_STRING && setting->value.string != NULL) {
 117                 xmlnode_set_attrib(child, "type", "string");
 118                 xmlnode_insert_data(child, setting->value.string, -1);
 119         }
 120         else if (setting->type == PURPLE_PREF_BOOLEAN) {
 121                 xmlnode_set_attrib(child, "type", "bool");
 122                 g_snprintf(buf, sizeof(buf), "%d", setting->value.boolean);
 123                 xmlnode_insert_data(child, buf, -1);
 124         }
 125 }
 126
 127 static void
 128 ui_setting_to_xmlnode(gpointer key, gpointer value, gpointer user_data)
 129 {
 130         const char *ui;
 131         GHashTable *table;
 132         xmlnode *node, *child;
 133
 134         ui    = (const char *)key;
 135         table = (GHashTable *)value;
 136         node  = (xmlnode *)user_data;
 137
 138         if (g_hash_table_size(table) > 0)
 139         {
 140                 child = xmlnode_new_child(node, "settings");
 141                 xmlnode_set_attrib(child, "ui", ui);
 142                 g_hash_table_foreach(table, setting_to_xmlnode, child);
 143         }
 144 }
 145
 146 static xmlnode *
 147 status_attr_to_xmlnode(const PurpleStatus *status, const PurpleStatusType *type, const PurpleStatusAttr *attr)
 148 {
 149         xmlnode *node;
 150         const char *id;
 151         char *value = NULL;
 152         PurpleStatusAttr *default_attr;
 153         PurpleValue *default_value;
 154         PurpleType attr_type;
 155         PurpleValue *attr_value;
 156
 157         id = purple_status_attr_get_id(attr);
 158         g_return_val_if_fail(id, NULL);
 159
 160         attr_value = purple_status_get_attr_value(status, id);
 161         g_return_val_if_fail(attr_value, NULL);
 162         attr_type = purple_value_get_type(attr_value);
 163
 164         /*
 165          * If attr_value is a different type than it should be
 166          * then don't write it to the file.
 167          */
 168         default_attr = purple_status_type_get_attr(type, id);
 169         default_value = purple_status_attr_get_value(default_attr);
 170         if (attr_type != purple_value_get_type(default_value))
 171                 return NULL;
 172
 173         /*
 174          * If attr_value is the same as the default for this status
 175          * then there is no need to write it to the file.
 176          */
 177         if (attr_type == PURPLE_TYPE_STRING)
 178         {
 179                 const char *string_value = purple_value_get_string(attr_value);
 180                 const char *default_string_value = purple_value_get_string(default_value);
 181                 if (purple_strequal(string_value, default_string_value))
 182                         return NULL;
 183                 value = g_strdup(purple_value_get_string(attr_value));
 184         }
 185         else if (attr_type == PURPLE_TYPE_INT)
 186         {
 187                 int int_value = purple_value_get_int(attr_value);
 188                 if (int_value == purple_value_get_int(default_value))
 189                         return NULL;
 190                 value = g_strdup_printf("%d", int_value);
 191         }
 192         else if (attr_type == PURPLE_TYPE_BOOLEAN)
 193         {
 194                 gboolean boolean_value = purple_value_get_boolean(attr_value);
 195                 if (boolean_value == purple_value_get_boolean(default_value))
 196                         return NULL;
 197                 value = g_strdup(boolean_value ?
 198                                                                 "true" : "false");
 199         }
 200         else
 201         {
 202                 return NULL;
 203         }
 204
 205         g_return_val_if_fail(value, NULL);
 206
 207         node = xmlnode_new("attribute");
 208
 209         xmlnode_set_attrib(node, "id", id);
 210         xmlnode_set_attrib(node, "value", value);
 211
 212         g_free(value);
 213
 214         return node;
 215 }
 216
 217 static xmlnode *
 218 status_attrs_to_xmlnode(const PurpleStatus *status)
 219 {
 220         PurpleStatusType *type = purple_status_get_type(status);
 221         xmlnode *node, *child;
 222         GList *attrs, *attr;
 223
 224         node = xmlnode_new("attributes");
 225
 226         attrs = purple_status_type_get_attrs(type);
 227         for (attr = attrs; attr != NULL; attr = attr->next)
 228         {
 229                 child = status_attr_to_xmlnode(status, type, (const PurpleStatusAttr *)attr->data);
 230                 if (child)
 231                         xmlnode_insert_child(node, child);
 232         }
 233
 234         return node;
 235 }
 236
 237 static xmlnode *
 238 status_to_xmlnode(const PurpleStatus *status)
 239 {
 240         xmlnode *node, *child;
 241
 242         node = xmlnode_new("status");
 243         xmlnode_set_attrib(node, "type", purple_status_get_id(status));
 244         if (purple_status_get_name(status) != NULL)
 245                 xmlnode_set_attrib(node, "name", purple_status_get_name(status));
 246         xmlnode_set_attrib(node, "active", purple_status_is_active(status) ? "true" : "false");
 247
 248         child = status_attrs_to_xmlnode(status);
 249         xmlnode_insert_child(node, child);
 250
 251         return node;
 252 }
 253
 254 static xmlnode *
 255 statuses_to_xmlnode(const PurplePresence *presence)
 256 {
 257         xmlnode *node, *child;
 258         GList *statuses;
 259         PurpleStatus *status;
 260
 261         node = xmlnode_new("statuses");
 262
 263         statuses = purple_presence_get_statuses(presence);
 264         for (; statuses != NULL; statuses = statuses->next)
 265         {
 266                 status = statuses->data;
 267                 if (purple_status_type_is_saveable(purple_status_get_type(status)))
 268                 {
 269                         child = status_to_xmlnode(status);
 270                         xmlnode_insert_child(node, child);
 271                 }
 272         }
 273
 274         return node;
 275 }
 276
 277 static xmlnode *
 278 proxy_settings_to_xmlnode(PurpleProxyInfo *proxy_info)
 279 {
 280         xmlnode *node, *child;
 281         PurpleProxyType proxy_type;
 282         const char *value;
 283         int int_value;
 284         char buf[21];
 285
 286         proxy_type = purple_proxy_info_get_type(proxy_info);
 287
 288         node = xmlnode_new("proxy");
 289
 290         child = xmlnode_new_child(node, "type");
 291         xmlnode_insert_data(child,
 292                         (proxy_type == PURPLE_PROXY_USE_GLOBAL ? "global" :
 293                          proxy_type == PURPLE_PROXY_NONE       ? "none"   :
 294                          proxy_type == PURPLE_PROXY_HTTP       ? "http"   :
 295                          proxy_type == PURPLE_PROXY_SOCKS4     ? "socks4" :
 296                          proxy_type == PURPLE_PROXY_SOCKS5     ? "socks5" :
 297                          proxy_type == PURPLE_PROXY_TOR        ? "tor" :
 298                          proxy_type == PURPLE_PROXY_USE_ENVVAR ? "envvar" : "unknown"), -1);
 299
 300         if ((value = purple_proxy_info_get_host(proxy_info)) != NULL)
 301         {
 302                 child = xmlnode_new_child(node, "host");
 303                 xmlnode_insert_data(child, value, -1);
 304         }
 305
 306         if ((int_value = purple_proxy_info_get_port(proxy_info)) != 0)
 307         {
 308                 g_snprintf(buf, sizeof(buf), "%d", int_value);
 309                 child = xmlnode_new_child(node, "port");
 310                 xmlnode_insert_data(child, buf, -1);
 311         }
 312
 313         if ((value = purple_proxy_info_get_username(proxy_info)) != NULL)
 314         {
 315                 child = xmlnode_new_child(node, "username");
 316                 xmlnode_insert_data(child, value, -1);
 317         }
 318
 319         if ((value = purple_proxy_info_get_password(proxy_info)) != NULL)
 320         {
 321                 child = xmlnode_new_child(node, "password");
 322                 xmlnode_insert_data(child, value, -1);
 323         }
 324
 325         return node;
 326 }
 327
 328 static xmlnode *
 329 current_error_to_xmlnode(PurpleConnectionErrorInfo *err)
 330 {
 331         xmlnode *node, *child;
 332         char type_str[3];
 333
 334         node = xmlnode_new("current_error");
 335
 336         if(err == NULL)
 337                 return node;
 338
 339         /* It doesn't make sense to have transient errors persist across a
 340          * restart.
 341          */
 342         if(!purple_connection_error_is_fatal (err->type))
 343                 return node;
 344
 345         child = xmlnode_new_child(node, "type");
 346         g_snprintf(type_str, sizeof(type_str), "%u", err->type);
 347         xmlnode_insert_data(child, type_str, -1);
 348
 349         child = xmlnode_new_child(node, "description");
 350         if(err->description) {
 351                 char *utf8ized = purple_utf8_try_convert(err->description);
 352                 if(utf8ized == NULL)
 353                         utf8ized = purple_utf8_salvage(err->description);
 354                 xmlnode_insert_data(child, utf8ized, -1);
 355                 g_free(utf8ized);
 356         }
 357
 358         return node;
 359 }
 360
 361 static xmlnode *
 362 account_to_xmlnode(PurpleAccount *account)
 363 {
 364         PurpleAccountPrivate *priv = PURPLE_ACCOUNT_GET_PRIVATE(account);
 365
 366         xmlnode *node, *child;
 367         const char *tmp;
 368         PurplePresence *presence;
 369         PurpleProxyInfo *proxy_info;
 370
 371         node = xmlnode_new("account");
 372
 373         child = xmlnode_new_child(node, "protocol");
 374         xmlnode_insert_data(child, purple_account_get_protocol_id(account), -1);
 375
 376         child = xmlnode_new_child(node, "name");
 377         xmlnode_insert_data(child, purple_account_get_username(account), -1);
 378
 379         if (purple_account_get_remember_password(account) &&
 380                 ((tmp = purple_account_get_password(account)) != NULL))
 381         {
 382                 child = xmlnode_new_child(node, "password");
 383                 xmlnode_insert_data(child, tmp, -1);
 384         }
 385
 386         if ((tmp = purple_account_get_alias(account)) != NULL)
 387         {
 388                 child = xmlnode_new_child(node, "alias");
 389                 xmlnode_insert_data(child, tmp, -1);
 390         }
 391
 392         if ((presence = purple_account_get_presence(account)) != NULL)
 393         {
 394                 child = statuses_to_xmlnode(presence);
 395                 xmlnode_insert_child(node, child);
 396         }
 397
 398         if ((tmp = purple_account_get_user_info(account)) != NULL)
 399         {
 400                 /* TODO: Do we need to call purple_str_strip_char(tmp, '\r') here? */
 401                 child = xmlnode_new_child(node, "userinfo");
 402                 xmlnode_insert_data(child, tmp, -1);
 403         }
 404
 405         if (g_hash_table_size(account->settings) > 0)
 406         {
 407                 child = xmlnode_new_child(node, "settings");
 408                 g_hash_table_foreach(account->settings, setting_to_xmlnode, child);
 409         }
 410
 411         if (g_hash_table_size(account->ui_settings) > 0)
 412         {
 413                 g_hash_table_foreach(account->ui_settings, ui_setting_to_xmlnode, node);
 414         }
 415
 416         if ((proxy_info = purple_account_get_proxy_info(account)) != NULL)
 417         {
 418                 child = proxy_settings_to_xmlnode(proxy_info);
 419                 xmlnode_insert_child(node, child);
 420         }
 421
 422         child = current_error_to_xmlnode(priv->current_error);
 423         xmlnode_insert_child(node, child);
 424
 425         return node;
 426 }
 427
 428 static xmlnode *
 429 accounts_to_xmlnode(void)
 430 {
 431         xmlnode *node, *child;
 432         GList *cur;
 433
 434         node = xmlnode_new("account");
 435         xmlnode_set_attrib(node, "version", "1.0");
 436
 437         for (cur = purple_accounts_get_all(); cur != NULL; cur = cur->next)
 438         {
 439                 child = account_to_xmlnode(cur->data);
 440                 xmlnode_insert_child(node, child);
 441         }
 442
 443         return node;
 444 }
 445
 446 static void
 447 sync_accounts(void)
 448 {
 449         xmlnode *node;
 450         char *data;
 451
 452         if (!accounts_loaded)
 453         {
 454                 purple_debug_error("account", "Attempted to save accounts before "
 455                                                  "they were read!\n");
 456                 return;
 457         }
 458
 459         node = accounts_to_xmlnode();
 460         data = xmlnode_to_formatted_str(node, NULL);
 461         purple_util_write_data_to_file("accounts.xml", data, -1);
 462         g_free(data);
 463         xmlnode_free(node);
 464 }
 465
 466 static gboolean
 467 save_cb(gpointer data)
 468 {
 469         sync_accounts();
 470         save_timer = 0;
 471         return FALSE;
 472 }
 473
 474 static void
 475 schedule_accounts_save(void)
 476 {
 477         if (save_timer == 0)
 478                 save_timer = purple_timeout_add_seconds(5, save_cb, NULL);
 479 }
 480
 481
 482 /*********************************************************************
 483  * Reading from disk                                                 *
 484  *********************************************************************/
 485 static void
 486 migrate_yahoo_japan(PurpleAccount *account)
 487 {
 488         /* detect a Yahoo! JAPAN account that existed prior to 2.6.0 and convert it
 489          * to use the new prpl-yahoojp.  Also remove the account-specific settings
 490          * we no longer need */
 491
 492         if(purple_strequal(purple_account_get_protocol_id(account), "prpl-yahoo")) {
 493                 if(purple_account_get_bool(account, "yahoojp", FALSE)) {
 494                         const char *serverjp = purple_account_get_string(account, "serverjp", NULL);
 495                         const char *xferjp_host = purple_account_get_string(account, "xferjp_host", NULL);
 496
 497                         g_return_if_fail(serverjp != NULL);
 498                         g_return_if_fail(xferjp_host != NULL);
 499
 500                         purple_account_set_string(account, "server", serverjp);
 501                         purple_account_set_string(account, "xfer_host", xferjp_host);
 502
 503                         purple_account_set_protocol_id(account, "prpl-yahoojp");
 504                 }
 505
 506                 /* these should always be nuked */
 507                 purple_account_remove_setting(account, "yahoojp");
 508                 purple_account_remove_setting(account, "serverjp");
 509                 purple_account_remove_setting(account, "xferjp_host");
 510
 511         }
 512 }
 513
 514 static void
 515 migrate_icq_server(PurpleAccount *account)
 516 {
 517         /* Migrate the login server setting for ICQ accounts.  See
 518          * 'mtn log --last 1 --no-graph --from b6d7712e90b68610df3bd2d8cbaf46d94c8b3794'
 519          * for details on the change. */
 520
 521         if(purple_strequal(purple_account_get_protocol_id(account), "prpl-icq")) {
 522                 const char *tmp = purple_account_get_string(account, "server", NULL);
 523
 524                 /* Non-secure server */
 525                 if(purple_strequal(tmp, "login.messaging.aol.com") ||
 526                                 purple_strequal(tmp, "login.oscar.aol.com"))
 527                         purple_account_set_string(account, "server", "login.icq.com");
 528
 529                 /* Secure server */
 530                 if(purple_strequal(tmp, "slogin.oscar.aol.com"))
 531                         purple_account_set_string(account, "server", "slogin.icq.com");
 532         }
 533 }
 534
 535 static void
 536 migrate_xmpp_encryption(PurpleAccount *account)
 537 {
 538         /* When this is removed, nuke the "old_ssl" and "require_tls" settings */
 539         if (g_str_equal(purple_account_get_protocol_id(account), "prpl-jabber")) {
 540                 const char *sec = purple_account_get_string(account, "connection_security", "");
 541
 542                 if (g_str_equal("", sec)) {
 543                         const char *val = "require_tls";
 544                         if (purple_account_get_bool(account, "old_ssl", FALSE))
 545                                 val = "old_ssl";
 546                         else if (!purple_account_get_bool(account, "require_tls", TRUE))
 547                                 val = "opportunistic_tls";
 548
 549                         purple_account_set_string(account, "connection_security", val);
 550                 }
 551         }
 552 }
 553
 554 static void
 555 parse_settings(xmlnode *node, PurpleAccount *account)
 556 {
 557         const char *ui;
 558         xmlnode *child;
 559
 560         /* Get the UI string, if these are UI settings */
 561         ui = xmlnode_get_attrib(node, "ui");
 562
 563         /* Read settings, one by one */
 564         for (child = xmlnode_get_child(node, "setting"); child != NULL;
 565                         child = xmlnode_get_next_twin(child))
 566         {
 567                 const char *name, *str_type;
 568                 PurplePrefType type;
 569                 char *data;
 570
 571                 name = xmlnode_get_attrib(child, "name");
 572                 if (name == NULL)
 573                         /* Ignore this setting */
 574                         continue;
 575
 576                 str_type = xmlnode_get_attrib(child, "type");
 577                 if (str_type == NULL)
 578                         /* Ignore this setting */
 579                         continue;
 580
 581                 if (purple_strequal(str_type, "string"))
 582                         type = PURPLE_PREF_STRING;
 583                 else if (purple_strequal(str_type, "int"))
 584                         type = PURPLE_PREF_INT;
 585                 else if (purple_strequal(str_type, "bool"))
 586                         type = PURPLE_PREF_BOOLEAN;
 587                 else
 588                         /* Ignore this setting */
 589                         continue;
 590
 591                 data = xmlnode_get_data(child);
 592                 if (data == NULL)
 593                         /* Ignore this setting */
 594                         continue;
 595
 596                 if (ui == NULL)
 597                 {
 598                         if (type == PURPLE_PREF_STRING)
 599                                 purple_account_set_string(account, name, data);
 600                         else if (type == PURPLE_PREF_INT)
 601                                 purple_account_set_int(account, name, atoi(data));
 602                         else if (type == PURPLE_PREF_BOOLEAN)
 603                                 purple_account_set_bool(account, name,
 604                                                                           (*data == '0' ? FALSE : TRUE));
 605                 } else {
 606                         if (type == PURPLE_PREF_STRING)
 607                                 purple_account_set_ui_string(account, ui, name, data);
 608                         else if (type == PURPLE_PREF_INT)
 609                                 purple_account_set_ui_int(account, ui, name, atoi(data));
 610                         else if (type == PURPLE_PREF_BOOLEAN)
 611                                 purple_account_set_ui_bool(account, ui, name,
 612                                                                                  (*data == '0' ? FALSE : TRUE));
 613                 }
 614
 615                 g_free(data);
 616         }
 617
 618         /* we do this here because we need access to account settings to determine
 619          * if we can/should migrate an old Yahoo! JAPAN account */
 620         migrate_yahoo_japan(account);
 621         /* we do this here because we need access to account settings to determine
 622          * if we can/should migrate an ICQ account's server setting */
 623         migrate_icq_server(account);
 624         /* we do this here because we need to do it before the user views the
 625          * Edit Account dialog. */
 626         migrate_xmpp_encryption(account);
 627 }
 628
 629 static GList *
 630 parse_status_attrs(xmlnode *node, PurpleStatus *status)
 631 {
 632         GList *list = NULL;
 633         xmlnode *child;
 634         PurpleValue *attr_value;
 635
 636         for (child = xmlnode_get_child(node, "attribute"); child != NULL;
 637                         child = xmlnode_get_next_twin(child))
 638         {
 639                 const char *id = xmlnode_get_attrib(child, "id");
 640                 const char *value = xmlnode_get_attrib(child, "value");
 641
 642                 if (!id || !*id || !value || !*value)
 643                         continue;
 644
 645                 attr_value = purple_status_get_attr_value(status, id);
 646                 if (!attr_value)
 647                         continue;
 648
 649                 list = g_list_append(list, (char *)id);
 650
 651                 switch (purple_value_get_type(attr_value))
 652                 {
 653                         case PURPLE_TYPE_STRING:
 654                                 list = g_list_append(list, (char *)value);
 655                                 break;
 656                         case PURPLE_TYPE_INT:
 657                         case PURPLE_TYPE_BOOLEAN:
 658                         {
 659                                 int v;
 660                                 if (sscanf(value, "%d", &v) == 1)
 661                                         list = g_list_append(list, GINT_TO_POINTER(v));
 662                                 else
 663                                         list = g_list_remove(list, id);
 664                                 break;
 665                         }
 666                         default:
 667                                 break;
 668                 }
 669         }
 670
 671         return list;
 672 }
 673
 674 static void
 675 parse_status(xmlnode *node, PurpleAccount *account)
 676 {
 677         gboolean active = FALSE;
 678         const char *data;
 679         const char *type;
 680         xmlnode *child;
 681         GList *attrs = NULL;
 682
 683         /* Get the active/inactive state */
 684         data = xmlnode_get_attrib(node, "active");
 685         if (data == NULL)
 686                 return;
 687         if (g_ascii_strcasecmp(data, "true") == 0)
 688                 active = TRUE;
 689         else if (g_ascii_strcasecmp(data, "false") == 0)
 690                 active = FALSE;
 691         else
 692                 return;
 693
 694         /* Get the type of the status */
 695         type = xmlnode_get_attrib(node, "type");
 696         if (type == NULL)
 697                 return;
 698
 699         /* Read attributes into a GList */
 700         child = xmlnode_get_child(node, "attributes");
 701         if (child != NULL)
 702         {
 703                 attrs = parse_status_attrs(child,
 704                                                 purple_account_get_status(account, type));
 705         }
 706
 707         purple_account_set_status_list(account, type, active, attrs);
 708
 709         g_list_free(attrs);
 710 }
 711
 712 static void
 713 parse_statuses(xmlnode *node, PurpleAccount *account)
 714 {
 715         xmlnode *child;
 716
 717         for (child = xmlnode_get_child(node, "status"); child != NULL;
 718                         child = xmlnode_get_next_twin(child))
 719         {
 720                 parse_status(child, account);
 721         }
 722 }
 723
 724 static void
 725 parse_proxy_info(xmlnode *node, PurpleAccount *account)
 726 {
 727         PurpleProxyInfo *proxy_info;
 728         xmlnode *child;
 729         char *data;
 730
 731         proxy_info = purple_proxy_info_new();
 732
 733         /* Use the global proxy settings, by default */
 734         purple_proxy_info_set_type(proxy_info, PURPLE_PROXY_USE_GLOBAL);
 735
 736         /* Read proxy type */
 737         child = xmlnode_get_child(node, "type");
 738         if ((child != NULL) && ((data = xmlnode_get_data(child)) != NULL))
 739         {
 740                 if (purple_strequal(data, "global"))
 741                         purple_proxy_info_set_type(proxy_info, PURPLE_PROXY_USE_GLOBAL);
 742                 else if (purple_strequal(data, "none"))
 743                         purple_proxy_info_set_type(proxy_info, PURPLE_PROXY_NONE);
 744                 else if (purple_strequal(data, "http"))
 745                         purple_proxy_info_set_type(proxy_info, PURPLE_PROXY_HTTP);
 746                 else if (purple_strequal(data, "socks4"))
 747                         purple_proxy_info_set_type(proxy_info, PURPLE_PROXY_SOCKS4);
 748                 else if (purple_strequal(data, "socks5"))
 749                         purple_proxy_info_set_type(proxy_info, PURPLE_PROXY_SOCKS5);
 750                 else if (purple_strequal(data, "tor"))
 751                         purple_proxy_info_set_type(proxy_info, PURPLE_PROXY_TOR);
 752                 else if (purple_strequal(data, "envvar"))
 753                         purple_proxy_info_set_type(proxy_info, PURPLE_PROXY_USE_ENVVAR);
 754                 else
 755                 {
 756                         purple_debug_error("account", "Invalid proxy type found when "
 757                                                          "loading account information for %s\n",
 758                                                          purple_account_get_username(account));
 759                 }
 760                 g_free(data);
 761         }
 762
 763         /* Read proxy host */
 764         child = xmlnode_get_child(node, "host");
 765         if ((child != NULL) && ((data = xmlnode_get_data(child)) != NULL))
 766         {
 767                 purple_proxy_info_set_host(proxy_info, data);
 768                 g_free(data);
 769         }
 770
 771         /* Read proxy port */
 772         child = xmlnode_get_child(node, "port");
 773         if ((child != NULL) && ((data = xmlnode_get_data(child)) != NULL))
 774         {
 775                 purple_proxy_info_set_port(proxy_info, atoi(data));
 776                 g_free(data);
 777         }
 778
 779         /* Read proxy username */
 780         child = xmlnode_get_child(node, "username");
 781         if ((child != NULL) && ((data = xmlnode_get_data(child)) != NULL))
 782         {
 783                 purple_proxy_info_set_username(proxy_info, data);
 784                 g_free(data);
 785         }
 786
 787         /* Read proxy password */
 788         child = xmlnode_get_child(node, "password");
 789         if ((child != NULL) && ((data = xmlnode_get_data(child)) != NULL))
 790         {
 791                 purple_proxy_info_set_password(proxy_info, data);
 792                 g_free(data);
 793         }
 794
 795         /* If there are no values set then proxy_info NULL */
 796         if ((purple_proxy_info_get_type(proxy_info) == PURPLE_PROXY_USE_GLOBAL) &&
 797                 (purple_proxy_info_get_host(proxy_info) == NULL) &&
 798                 (purple_proxy_info_get_port(proxy_info) == 0) &&
 799                 (purple_proxy_info_get_username(proxy_info) == NULL) &&
 800                 (purple_proxy_info_get_password(proxy_info) == NULL))
 801         {
 802                 purple_proxy_info_destroy(proxy_info);
 803                 return;
 804         }
 805
 806         purple_account_set_proxy_info(account, proxy_info);
 807 }
 808
 809 static void
 810 parse_current_error(xmlnode *node, PurpleAccount *account)
 811 {
 812         guint type;
 813         char *type_str = NULL, *description = NULL;
 814         xmlnode *child;
 815         PurpleConnectionErrorInfo *current_error = NULL;
 816
 817         child = xmlnode_get_child(node, "type");
 818         if (child == NULL || (type_str = xmlnode_get_data(child)) == NULL)
 819                 return;
 820         type = atoi(type_str);
 821         g_free(type_str);
 822
 823         if (type > PURPLE_CONNECTION_ERROR_OTHER_ERROR)
 824         {
 825                 purple_debug_error("account",
 826                         "Invalid PurpleConnectionError value %d found when "
 827                         "loading account information for %s\n",
 828                         type, purple_account_get_username(account));
 829                 type = PURPLE_CONNECTION_ERROR_OTHER_ERROR;
 830         }
 831
 832         child = xmlnode_get_child(node, "description");
 833         if (child)
 834                 description = xmlnode_get_data(child);
 835         if (description == NULL)
 836                 description = g_strdup("");
 837
 838         current_error = g_new0(PurpleConnectionErrorInfo, 1);
 839         PURPLE_DBUS_REGISTER_POINTER(current_error, PurpleConnectionErrorInfo);
 840         current_error->type = type;
 841         current_error->description = description;
 842
 843         set_current_error(account, current_error);
 844 }
 845
 846 static PurpleAccount *
 847 parse_account(xmlnode *node)
 848 {
 849         PurpleAccount *ret;
 850         xmlnode *child;
 851         char *protocol_id = NULL;
 852         char *name = NULL;
 853         char *data;
 854
 855         child = xmlnode_get_child(node, "protocol");
 856         if (child != NULL)
 857                 protocol_id = xmlnode_get_data(child);
 858
 859         child = xmlnode_get_child(node, "name");
 860         if (child != NULL)
 861                 name = xmlnode_get_data(child);
 862         if (name == NULL)
 863         {
 864                 /* Do we really need to do this? */
 865                 child = xmlnode_get_child(node, "username");
 866                 if (child != NULL)
 867                         name = xmlnode_get_data(child);
 868         }
 869
 870         if ((protocol_id == NULL) || (name == NULL))
 871         {
 872                 g_free(protocol_id);
 873                 g_free(name);
 874                 return NULL;
 875         }
 876
 877         ret = purple_account_new(name, _purple_oscar_convert(name, protocol_id)); /* XXX: */
 878         g_free(name);
 879         g_free(protocol_id);
 880
 881         /* Read the password */
 882         child = xmlnode_get_child(node, "password");
 883         if ((child != NULL) && ((data = xmlnode_get_data(child)) != NULL))
 884         {
 885                 purple_account_set_remember_password(ret, TRUE);
 886                 purple_account_set_password(ret, data);
 887                 g_free(data);
 888         }
 889
 890         /* Read the alias */
 891         child = xmlnode_get_child(node, "alias");
 892         if ((child != NULL) && ((data = xmlnode_get_data(child)) != NULL))
 893         {
 894                 if (*data != '\0')
 895                         purple_account_set_alias(ret, data);
 896                 g_free(data);
 897         }
 898
 899         /* Read the statuses */
 900         child = xmlnode_get_child(node, "statuses");
 901         if (child != NULL)
 902         {
 903                 parse_statuses(child, ret);
 904         }
 905
 906         /* Read the userinfo */
 907         child = xmlnode_get_child(node, "userinfo");
 908         if ((child != NULL) && ((data = xmlnode_get_data(child)) != NULL))
 909         {
 910                 purple_account_set_user_info(ret, data);
 911                 g_free(data);
 912         }
 913
 914         /* Read an old buddyicon */
 915         child = xmlnode_get_child(node, "buddyicon");
 916         if ((child != NULL) && ((data = xmlnode_get_data(child)) != NULL))
 917         {
 918                 const char *dirname = purple_buddy_icons_get_cache_dir();
 919                 char *filename = g_build_filename(dirname, data, NULL);
 920                 gchar *contents;
 921                 gsize len;
 922
 923                 if (g_file_get_contents(filename, &contents, &len, NULL))
 924                 {
 925                         purple_buddy_icons_set_account_icon(ret, (guchar *)contents, len);
 926                 }
 927                 else
 928                 {
 929                         /* Try to see if the icon got left behind in the old cache. */
 930                         g_free(filename);
 931                         filename = g_build_filename(g_get_home_dir(), ".gaim", "icons", data, NULL);
 932                         if (g_file_get_contents(filename, &contents, &len, NULL)) {
 933                                 purple_buddy_icons_set_account_icon(ret, (guchar*)contents, len);
 934                         }
 935                 }
 936
 937                 g_free(filename);
 938                 g_free(data);
 939         }
 940
 941         /* Read settings (both core and UI) */
 942         for (child = xmlnode_get_child(node, "settings"); child != NULL;
 943                         child = xmlnode_get_next_twin(child))
 944         {
 945                 parse_settings(child, ret);
 946         }
 947
 948         /* Read proxy */
 949         child = xmlnode_get_child(node, "proxy");
 950         if (child != NULL)
 951         {
 952                 parse_proxy_info(child, ret);
 953         }
 954
 955         /* Read current error */
 956         child = xmlnode_get_child(node, "current_error");
 957         if (child != NULL)
 958         {
 959                 parse_current_error(child, ret);
 960         }
 961
 962         return ret;
 963 }
 964
 965 static void
 966 load_accounts(void)
 967 {
 968         xmlnode *node, *child;
 969
 970         accounts_loaded = TRUE;
 971
 972         node = purple_util_read_xml_from_file("accounts.xml", _("accounts"));
 973
 974         if (node == NULL)
 975                 return;
 976
 977         for (child = xmlnode_get_child(node, "account"); child != NULL;
 978                         child = xmlnode_get_next_twin(child))
 979         {
 980                 PurpleAccount *new_acct;
 981                 new_acct = parse_account(child);
 982                 purple_accounts_add(new_acct);
 983         }
 984
 985         xmlnode_free(node);
 986
 987         _purple_buddy_icons_account_loaded_cb();
 988 }
 989
 990
 991 static void
 992 delete_setting(void *data)
 993 {
 994         PurpleAccountSetting *setting = (PurpleAccountSetting *)data;
 995
 996         g_free(setting->ui);
 997
 998         if (setting->type == PURPLE_PREF_STRING)
 999                 g_free(setting->value.string);
1000
1001         g_free(setting);
1002 }
1003
1004 PurpleAccount *
1005 purple_account_new(const char *username, const char *protocol_id)
1006 {
1007         PurpleAccount *account = NULL;
1008         PurpleAccountPrivate *priv = NULL;
1009         PurplePlugin *prpl = NULL;
1010         PurplePluginProtocolInfo *prpl_info = NULL;
1011         PurpleStatusType *status_type;
1012
1013         g_return_val_if_fail(username != NULL, NULL);
1014         g_return_val_if_fail(protocol_id != NULL, NULL);
1015
1016         account = purple_accounts_find(username, protocol_id);
1017
1018         if (account != NULL)
1019                 return account;
1020
1021         account = g_new0(PurpleAccount, 1);
1022         PURPLE_DBUS_REGISTER_POINTER(account, PurpleAccount);
1023         priv = g_new0(PurpleAccountPrivate, 1);
1024         account->priv = priv;
1025
1026         purple_account_set_username(account, username);
1027
1028         purple_account_set_protocol_id(account, protocol_id);
1029
1030         account->settings = g_hash_table_new_full(g_str_hash, g_str_equal,
1031                                                                                           g_free, delete_setting);
1032         account->ui_settings = g_hash_table_new_full(g_str_hash, g_str_equal,
1033                                 g_free, (GDestroyNotify)g_hash_table_destroy);
1034         account->system_log = NULL;
1035         /* 0 is not a valid privacy setting */
1036         account->perm_deny = PURPLE_PRIVACY_ALLOW_ALL;
1037
1038         purple_signal_emit(purple_accounts_get_handle(), "account-created", account);
1039
1040         prpl = purple_find_prpl(protocol_id);
1041
1042         if (prpl == NULL)
1043                 return account;
1044
1045         prpl_info = PURPLE_PLUGIN_PROTOCOL_INFO(prpl);
1046         if (prpl_info != NULL && prpl_info->status_types != NULL)
1047                 purple_account_set_status_types(account, prpl_info->status_types(account));
1048
1049         account->presence = purple_presence_new_for_account(account);
1050
1051         status_type = purple_account_get_status_type_with_primitive(account, PURPLE_STATUS_AVAILABLE);
1052         if (status_type != NULL)
1053                 purple_presence_set_status_active(account->presence,
1054                                                                                 purple_status_type_get_id(status_type),
1055                                                                                 TRUE);
1056         else
1057                 purple_presence_set_status_active(account->presence,
1058                                                                                 "offline",
1059                                                                                 TRUE);
1060
1061         return account;
1062 }
1063
1064 void
1065 purple_account_destroy(PurpleAccount *account)
1066 {
1067         PurpleAccountPrivate *priv = NULL;
1068         GList *l;
1069
1070         g_return_if_fail(account != NULL);
1071
1072         purple_debug_info("account", "Destroying account %p\n", account);
1073         purple_signal_emit(purple_accounts_get_handle(), "account-destroying", account);
1074
1075         for (l = purple_get_conversations(); l != NULL; l = l->next)
1076         {
1077                 PurpleConversation *conv = (PurpleConversation *)l->data;
1078
1079                 if (purple_conversation_get_account(conv) == account)
1080                         purple_conversation_set_account(conv, NULL);
1081         }
1082
1083         g_free(account->username);
1084         g_free(account->alias);
1085         g_free(account->password);
1086         g_free(account->user_info);
1087         g_free(account->buddy_icon_path);
1088         g_free(account->protocol_id);
1089
1090         g_hash_table_destroy(account->settings);
1091         g_hash_table_destroy(account->ui_settings);
1092
1093         if (account->proxy_info)
1094                 purple_proxy_info_destroy(account->proxy_info);
1095
1096         purple_account_set_status_types(account, NULL);
1097
1098         purple_presence_destroy(account->presence);
1099
1100         if(account->system_log)
1101                 purple_log_free(account->system_log);
1102
1103         while (account->deny) {
1104                 g_free(account->deny->data);
1105                 account->deny = g_slist_delete_link(account->deny, account->deny);
1106         }
1107
1108         while (account->permit) {
1109                 g_free(account->permit->data);
1110                 account->permit = g_slist_delete_link(account->permit, account->permit);
1111         }
1112
1113         priv = PURPLE_ACCOUNT_GET_PRIVATE(account);
1114         PURPLE_DBUS_UNREGISTER_POINTER(priv->current_error);
1115         if (priv->current_error) {
1116                 g_free(priv->current_error->description);
1117                 g_free(priv->current_error);
1118         }
1119         g_free(priv);
1120
1121         PURPLE_DBUS_UNREGISTER_POINTER(account);
1122         g_free(account);
1123 }
1124
1125 void
1126 purple_account_set_register_callback(PurpleAccount *account, PurpleAccountRegistrationCb cb, void *user_data)
1127 {
1128         g_return_if_fail(account != NULL);
1129
1130         account->registration_cb = cb;
1131         account->registration_cb_user_data = user_data;
1132 }
1133
1134 void
1135 purple_account_register(PurpleAccount *account)
1136 {
1137         g_return_if_fail(account != NULL);
1138
1139         purple_debug_info("account", "Registering account %s\n",
1140                                         purple_account_get_username(account));
1141
1142         _purple_connection_new(account, TRUE, purple_account_get_password(account));
1143 }
1144
1145 void
1146 purple_account_unregister(PurpleAccount *account, PurpleAccountUnregistrationCb cb, void *user_data)
1147 {
1148         g_return_if_fail(account != NULL);
1149
1150         purple_debug_info("account", "Unregistering account %s\n",
1151                                           purple_account_get_username(account));
1152
1153         _purple_connection_new_unregister(account, purple_account_get_password(account), cb, user_data);
1154 }
1155
1156 static void
1157 request_password_ok_cb(PurpleAccount *account, PurpleRequestFields *fields)
1158 {
1159         const char *entry;
1160         gboolean remember;
1161
1162         entry = purple_request_fields_get_string(fields, "password");
1163         remember = purple_request_fields_get_bool(fields, "remember");
1164
1165         if (!entry || !*entry)
1166         {
1167                 purple_notify_error(account, NULL, _("Password is required to sign on."), NULL);
1168                 return;
1169         }
1170
1171         if(remember)
1172                 purple_account_set_remember_password(account, TRUE);
1173
1174         purple_account_set_password(account, entry);
1175
1176         _purple_connection_new(account, FALSE, entry);
1177 }
1178
1179 static void
1180 request_password_cancel_cb(PurpleAccount *account, PurpleRequestFields *fields)
1181 {
1182         /* Disable the account as the user has cancelled connecting */
1183         purple_account_set_enabled(account, purple_core_get_ui(), FALSE);
1184 }
1185
1186
1187 void
1188 purple_account_request_password(PurpleAccount *account, GCallback ok_cb,
1189                                 GCallback cancel_cb, void *user_data)
1190 {
1191         gchar *primary;
1192         const gchar *username;
1193         PurpleRequestFieldGroup *group;
1194         PurpleRequestField *field;
1195         PurpleRequestFields *fields;
1196
1197         /* Close any previous password request windows */
1198         purple_request_close_with_handle(account);
1199
1200         username = purple_account_get_username(account);
1201         primary = g_strdup_printf(_("Enter password for %s (%s)"), username,
1202                                                                   purple_account_get_protocol_name(account));
1203
1204         fields = purple_request_fields_new();
1205         group = purple_request_field_group_new(NULL);
1206         purple_request_fields_add_group(fields, group);
1207
1208         field = purple_request_field_string_new("password", _("Enter Password"), NULL, FALSE);
1209         purple_request_field_string_set_masked(field, TRUE);
1210         purple_request_field_set_required(field, TRUE);
1211         purple_request_field_group_add_field(group, field);
1212
1213         field = purple_request_field_bool_new("remember", _("Save password"), FALSE);
1214         purple_request_field_group_add_field(group, field);
1215
1216         purple_request_fields(account,
1217                         NULL,
1218                         primary,
1219                         NULL,
1220                         fields,
1221                         _("OK"), ok_cb,
1222                         _("Cancel"), cancel_cb,
1223                                                 account, NULL, NULL,
1224                         user_data);
1225         g_free(primary);
1226 }
1227
1228 void
1229 purple_account_connect(PurpleAccount *account)
1230 {
1231         PurplePlugin *prpl;
1232         const char *password, *username;
1233         PurplePluginProtocolInfo *prpl_info;
1234
1235         g_return_if_fail(account != NULL);
1236
1237         username = purple_account_get_username(account);
1238
1239         if (!purple_account_get_enabled(account, purple_core_get_ui())) {
1240                 purple_debug_info("account",
1241                                   "Account %s not enabled, not connecting.\n",
1242                                   username);
1243                 return;
1244         }
1245
1246         prpl = purple_find_prpl(purple_account_get_protocol_id(account));
1247         if (prpl == NULL) {
1248                 gchar *message;
1249
1250                 message = g_strdup_printf(_("Missing protocol plugin for %s"), username);
1251                 purple_notify_error(account, _("Connection Error"), message, NULL);
1252                 g_free(message);
1253                 return;
1254         }
1255
1256         purple_debug_info("account", "Connecting to account %s.\n", username);
1257
1258         prpl_info = PURPLE_PLUGIN_PROTOCOL_INFO(prpl);
1259         password = purple_account_get_password(account);
1260         if ((password == NULL) &&
1261                 !(prpl_info->options & OPT_PROTO_NO_PASSWORD) &&
1262                 !(prpl_info->options & OPT_PROTO_PASSWORD_OPTIONAL))
1263                 purple_account_request_password(account, G_CALLBACK(request_password_ok_cb), G_CALLBACK(request_password_cancel_cb), account);
1264         else
1265                 _purple_connection_new(account, FALSE, password);
1266 }
1267
1268 void
1269 purple_account_disconnect(PurpleAccount *account)
1270 {
1271         PurpleConnection *gc;
1272         const char *username;
1273
1274         g_return_if_fail(account != NULL);
1275         g_return_if_fail(!purple_account_is_disconnected(account));
1276
1277         username = purple_account_get_username(account);
1278         purple_debug_info("account", "Disconnecting account %s (%p)\n",
1279                           username ? username : "(null)", account);
1280
1281         account->disconnecting = TRUE;
1282
1283         gc = purple_account_get_connection(account);
1284         _purple_connection_destroy(gc);
1285         if (!purple_account_get_remember_password(account))
1286                 purple_account_set_password(account, NULL);
1287         purple_account_set_connection(account, NULL);
1288
1289         account->disconnecting = FALSE;
1290 }
1291
1292 void
1293 purple_account_notify_added(PurpleAccount *account, const char *remote_user,
1294                           const char *id, const char *alias,
1295                           const char *message)
1296 {
1297         PurpleAccountUiOps *ui_ops;
1298
1299         g_return_if_fail(account     != NULL);
1300         g_return_if_fail(remote_user != NULL);
1301
1302         ui_ops = purple_accounts_get_ui_ops();
1303
1304         if (ui_ops != NULL && ui_ops->notify_added != NULL)
1305                 ui_ops->notify_added(account, remote_user, id, alias, message);
1306 }
1307
1308 void
1309 purple_account_request_add(PurpleAccount *account, const char *remote_user,
1310                          const char *id, const char *alias,
1311                          const char *message)
1312 {
1313         PurpleAccountUiOps *ui_ops;
1314
1315         g_return_if_fail(account     != NULL);
1316         g_return_if_fail(remote_user != NULL);
1317
1318         ui_ops = purple_accounts_get_ui_ops();
1319
1320         if (ui_ops != NULL && ui_ops->request_add != NULL)
1321                 ui_ops->request_add(account, remote_user, id, alias, message);
1322 }
1323
1324 static PurpleAccountRequestInfo *
1325 purple_account_request_info_unref(PurpleAccountRequestInfo *info)
1326 {
1327         if (--info->ref)
1328                 return info;
1329
1330         /* TODO: This will leak info->user_data, but there is no callback to just clean that up */
1331         g_free(info->user);
1332         g_free(info);
1333         return NULL;
1334 }
1335
1336 static void
1337 purple_account_request_close_info(PurpleAccountRequestInfo *info)
1338 {
1339         PurpleAccountUiOps *ops;
1340
1341         ops = purple_accounts_get_ui_ops();
1342
1343         if (ops != NULL && ops->close_account_request != NULL)
1344                 ops->close_account_request(info->ui_handle);
1345
1346         purple_account_request_info_unref(info);
1347 }
1348
1349 void
1350 purple_account_request_close_with_account(PurpleAccount *account)
1351 {
1352         GList *l, *l_next;
1353
1354         g_return_if_fail(account != NULL);
1355
1356         for (l = handles; l != NULL; l = l_next) {
1357                 PurpleAccountRequestInfo *info = l->data;
1358
1359                 l_next = l->next;
1360
1361                 if (info->account == account) {
1362                         handles = g_list_remove(handles, info);
1363                         purple_account_request_close_info(info);
1364                 }
1365         }
1366 }
1367
1368 void
1369 purple_account_request_close(void *ui_handle)
1370 {
1371         GList *l, *l_next;
1372
1373         g_return_if_fail(ui_handle != NULL);
1374
1375         for (l = handles; l != NULL; l = l_next) {
1376                 PurpleAccountRequestInfo *info = l->data;
1377
1378                 l_next = l->next;
1379
1380                 if (info->ui_handle == ui_handle) {
1381                         handles = g_list_remove(handles, info);
1382                         purple_account_request_close_info(info);
1383                 }
1384         }
1385 }
1386
1387 static void
1388 request_auth_cb(void *data)
1389 {
1390         PurpleAccountRequestInfo *info = data;
1391
1392         handles = g_list_remove(handles, info);
1393
1394         if (info->auth_cb != NULL)
1395                 info->auth_cb(info->userdata);
1396
1397         purple_signal_emit(purple_accounts_get_handle(),
1398                         "account-authorization-granted", info->account, info->user);
1399
1400         purple_account_request_info_unref(info);
1401 }
1402
1403 static void
1404 request_deny_cb(void *data)
1405 {
1406         PurpleAccountRequestInfo *info = data;
1407
1408         handles = g_list_remove(handles, info);
1409
1410         if (info->deny_cb != NULL)
1411                 info->deny_cb(info->userdata);
1412
1413         purple_signal_emit(purple_accounts_get_handle(),
1414                         "account-authorization-denied", info->account, info->user);
1415
1416         purple_account_request_info_unref(info);
1417 }
1418
1419 void *
1420 purple_account_request_authorization(PurpleAccount *account, const char *remote_user,
1421                                      const char *id, const char *alias, const char *message, gboolean on_list,
1422                                      PurpleAccountRequestAuthorizationCb auth_cb, PurpleAccountRequestAuthorizationCb deny_cb, void *user_data)
1423 {
1424         PurpleAccountUiOps *ui_ops;
1425         PurpleAccountRequestInfo *info;
1426         int plugin_return;
1427
1428         g_return_val_if_fail(account     != NULL, NULL);
1429         g_return_val_if_fail(remote_user != NULL, NULL);
1430
1431         ui_ops = purple_accounts_get_ui_ops();
1432
1433         plugin_return = GPOINTER_TO_INT(
1434                         purple_signal_emit_return_1(purple_accounts_get_handle(),
1435                                 "account-authorization-requested", account, remote_user));
1436
1437         if (plugin_return > 0) {
1438                 if (auth_cb != NULL)
1439                         auth_cb(user_data);
1440                 return NULL;
1441         } else if (plugin_return < 0) {
1442                 if (deny_cb != NULL)
1443                         deny_cb(user_data);
1444                 return NULL;
1445         }
1446
1447         plugin_return = GPOINTER_TO_INT(
1448                         purple_signal_emit_return_1(
1449                                 purple_accounts_get_handle(),
1450                                 "account-authorization-requested-with-message",
1451                                 account, remote_user, message
1452                         ));
1453
1454         switch (plugin_return)
1455         {
1456                 case PURPLE_ACCOUNT_RESPONSE_IGNORE:
1457                         return NULL;
1458                 case PURPLE_ACCOUNT_RESPONSE_ACCEPT:
1459                         if (auth_cb != NULL)
1460                                 auth_cb(user_data);
1461                         return NULL;
1462                 case PURPLE_ACCOUNT_RESPONSE_DENY:
1463                         if (deny_cb != NULL)
1464                                 deny_cb(user_data);
1465                         return NULL;
1466         }
1467
1468         if (ui_ops != NULL && ui_ops->request_authorize != NULL) {
1469                 info            = g_new0(PurpleAccountRequestInfo, 1);
1470                 info->type      = PURPLE_ACCOUNT_REQUEST_AUTHORIZATION;
1471                 info->account   = account;
1472                 info->auth_cb   = auth_cb;
1473                 info->deny_cb   = deny_cb;
1474                 info->userdata  = user_data;
1475                 info->user      = g_strdup(remote_user);
1476                 info->ref       = 2;  /* We hold an extra ref to make sure info remains valid
1477                                          if any of the callbacks are called synchronously. We
1478                                          unref it after the function call */
1479
1480                 info->ui_handle = ui_ops->request_authorize(account, remote_user, id, alias, message,
1481                                                             on_list, request_auth_cb, request_deny_cb, info);
1482
1483                 info = purple_account_request_info_unref(info);
1484                 if (info) {
1485                         handles = g_list_append(handles, info);
1486                         return info->ui_handle;
1487                 }
1488         }
1489
1490         return NULL;
1491 }
1492
1493 static void
1494 change_password_cb(PurpleAccount *account, PurpleRequestFields *fields)
1495 {
1496         const char *orig_pass, *new_pass_1, *new_pass_2;
1497
1498         orig_pass  = purple_request_fields_get_string(fields, "password");
1499         new_pass_1 = purple_request_fields_get_string(fields, "new_password_1");
1500         new_pass_2 = purple_request_fields_get_string(fields, "new_password_2");
1501
1502         if (g_utf8_collate(new_pass_1, new_pass_2))
1503         {
1504                 purple_notify_error(account, NULL,
1505                                                   _("New passwords do not match."), NULL);
1506
1507                 return;
1508         }
1509
1510         if ((purple_request_fields_is_field_required(fields, "password") &&
1511                         (orig_pass == NULL || *orig_pass == '\0')) ||
1512                 (purple_request_fields_is_field_required(fields, "new_password_1") &&
1513                         (new_pass_1 == NULL || *new_pass_1 == '\0')) ||
1514                 (purple_request_fields_is_field_required(fields, "new_password_2") &&
1515                         (new_pass_2 == NULL || *new_pass_2 == '\0')))
1516         {
1517                 purple_notify_error(account, NULL,
1518                                                   _("Fill out all fields completely."), NULL);
1519                 return;
1520         }
1521
1522         purple_account_change_password(account, orig_pass, new_pass_1);
1523 }
1524
1525 void
1526 purple_account_request_change_password(PurpleAccount *account)
1527 {
1528         PurpleRequestFields *fields;
1529         PurpleRequestFieldGroup *group;
1530         PurpleRequestField *field;
1531         PurpleConnection *gc;
1532         PurplePlugin *prpl = NULL;
1533         PurplePluginProtocolInfo *prpl_info = NULL;
1534         char primary[256];
1535
1536         g_return_if_fail(account != NULL);
1537         g_return_if_fail(purple_account_is_connected(account));
1538
1539         gc = purple_account_get_connection(account);
1540         if (gc != NULL)
1541                 prpl = purple_connection_get_prpl(gc);
1542         if (prpl != NULL)
1543                 prpl_info = PURPLE_PLUGIN_PROTOCOL_INFO(prpl);
1544
1545         fields = purple_request_fields_new();
1546
1547         group = purple_request_field_group_new(NULL);
1548         purple_request_fields_add_group(fields, group);
1549
1550         field = purple_request_field_string_new("password", _("Original password"),
1551                                                                                   NULL, FALSE);
1552         purple_request_field_string_set_masked(field, TRUE);
1553         if (!(prpl_info && (prpl_info->options | OPT_PROTO_PASSWORD_OPTIONAL)))
1554                 purple_request_field_set_required(field, TRUE);
1555         purple_request_field_group_add_field(group, field);
1556
1557         field = purple_request_field_string_new("new_password_1",
1558                                                                                   _("New password"),
1559                                                                                   NULL, FALSE);
1560         purple_request_field_string_set_masked(field, TRUE);
1561         if (!(prpl_info && (prpl_info->options | OPT_PROTO_PASSWORD_OPTIONAL)))
1562                 purple_request_field_set_required(field, TRUE);
1563         purple_request_field_group_add_field(group, field);
1564
1565         field = purple_request_field_string_new("new_password_2",
1566                                                                                   _("New password (again)"),
1567                                                                                   NULL, FALSE);
1568         purple_request_field_string_set_masked(field, TRUE);
1569         if (!(prpl_info && (prpl_info->options | OPT_PROTO_PASSWORD_OPTIONAL)))
1570                 purple_request_field_set_required(field, TRUE);
1571         purple_request_field_group_add_field(group, field);
1572
1573         g_snprintf(primary, sizeof(primary), _("Change password for %s"),
1574                            purple_account_get_username(account));
1575
1576         /* I'm sticking this somewhere in the code: bologna */
1577
1578         purple_request_fields(purple_account_get_connection(account),
1579                                                 NULL,
1580                                                 primary,
1581                                                 _("Please enter your current password and your "
1582                                                   "new password."),
1583                                                 fields,
1584                                                 _("OK"), G_CALLBACK(change_password_cb),
1585                                                 _("Cancel"), NULL,
1586                                                 account, NULL, NULL,
1587                                                 account);
1588 }
1589
1590 static void
1591 set_user_info_cb(PurpleAccount *account, const char *user_info)
1592 {
1593         PurpleConnection *gc;
1594
1595         purple_account_set_user_info(account, user_info);
1596         gc = purple_account_get_connection(account);
1597         serv_set_info(gc, user_info);
1598 }
1599
1600 void
1601 purple_account_request_change_user_info(PurpleAccount *account)
1602 {
1603         PurpleConnection *gc;
1604         char primary[256];
1605
1606         g_return_if_fail(account != NULL);
1607         g_return_if_fail(purple_account_is_connected(account));
1608
1609         gc = purple_account_get_connection(account);
1610
1611         g_snprintf(primary, sizeof(primary),
1612                            _("Change user information for %s"),
1613                            purple_account_get_username(account));
1614
1615         purple_request_input(gc, _("Set User Info"), primary, NULL,
1616                                            purple_account_get_user_info(account),
1617                                            TRUE, FALSE, ((gc != NULL) &&
1618                                            (gc->flags & PURPLE_CONNECTION_HTML) ? "html" : NULL),
1619                                            _("Save"), G_CALLBACK(set_user_info_cb),
1620                                            _("Cancel"), NULL,
1621                                            account, NULL, NULL,
1622                                            account);
1623 }
1624
1625 void
1626 purple_account_set_username(PurpleAccount *account, const char *username)
1627 {
1628         PurpleBlistUiOps *blist_ops;
1629
1630         g_return_if_fail(account != NULL);
1631
1632         g_free(account->username);
1633         account->username = g_strdup(username);
1634
1635         schedule_accounts_save();
1636
1637         /* if the name changes, we should re-write the buddy list
1638          * to disk with the new name */
1639         blist_ops = purple_blist_get_ui_ops();
1640         if (blist_ops != NULL && blist_ops->save_account != NULL)
1641                 blist_ops->save_account(account);
1642 }
1643
1644 void
1645 purple_account_set_password(PurpleAccount *account, const char *password)
1646 {
1647         g_return_if_fail(account != NULL);
1648
1649         g_free(account->password);
1650         account->password = g_strdup(password);
1651
1652         schedule_accounts_save();
1653 }
1654
1655 void
1656 purple_account_set_alias(PurpleAccount *account, const char *alias)
1657 {
1658         g_return_if_fail(account != NULL);
1659
1660         /*
1661          * Do nothing if alias and account->alias are both NULL.  Or if
1662          * they're the exact same string.
1663          */
1664         if (alias == account->alias)
1665                 return;
1666
1667         if ((!alias && account->alias) || (alias && !account->alias) ||
1668                         g_utf8_collate(account->alias, alias))
1669         {
1670                 char *old = account->alias;
1671
1672                 account->alias = g_strdup(alias);
1673                 purple_signal_emit(purple_accounts_get_handle(), "account-alias-changed",
1674                                                  account, old);
1675                 g_free(old);
1676
1677                 schedule_accounts_save();
1678         }
1679 }
1680
1681 void
1682 purple_account_set_user_info(PurpleAccount *account, const char *user_info)
1683 {
1684         g_return_if_fail(account != NULL);
1685
1686         g_free(account->user_info);
1687         account->user_info = g_strdup(user_info);
1688
1689         schedule_accounts_save();
1690 }
1691
1692 void purple_account_set_buddy_icon_path(PurpleAccount *account, const char *path)
1693 {
1694         g_return_if_fail(account != NULL);
1695
1696         g_free(account->buddy_icon_path);
1697         account->buddy_icon_path = g_strdup(path);
1698
1699         schedule_accounts_save();
1700 }
1701
1702 void
1703 purple_account_set_protocol_id(PurpleAccount *account, const char *protocol_id)
1704 {
1705         g_return_if_fail(account     != NULL);
1706         g_return_if_fail(protocol_id != NULL);
1707
1708         g_free(account->protocol_id);
1709         account->protocol_id = g_strdup(protocol_id);
1710
1711         schedule_accounts_save();
1712 }
1713
1714 void
1715 purple_account_set_connection(PurpleAccount *account, PurpleConnection *gc)
1716 {
1717         g_return_if_fail(account != NULL);
1718
1719         account->gc = gc;
1720 }
1721
1722 void
1723 purple_account_set_remember_password(PurpleAccount *account, gboolean value)
1724 {
1725         g_return_if_fail(account != NULL);
1726
1727         account->remember_pass = value;
1728
1729         schedule_accounts_save();
1730 }
1731
1732 void
1733 purple_account_set_check_mail(PurpleAccount *account, gboolean value)
1734 {
1735         g_return_if_fail(account != NULL);
1736
1737         purple_account_set_bool(account, "check-mail", value);
1738 }
1739
1740 void
1741 purple_account_set_enabled(PurpleAccount *account, const char *ui,
1742                          gboolean value)
1743 {
1744         PurpleConnection *gc;
1745         gboolean was_enabled = FALSE;
1746
1747         g_return_if_fail(account != NULL);
1748         g_return_if_fail(ui      != NULL);
1749
1750         was_enabled = purple_account_get_enabled(account, ui);
1751
1752         purple_account_set_ui_bool(account, ui, "auto-login", value);
1753         gc = purple_account_get_connection(account);
1754
1755         if(was_enabled && !value)
1756                 purple_signal_emit(purple_accounts_get_handle(), "account-disabled", account);
1757         else if(!was_enabled && value)
1758                 purple_signal_emit(purple_accounts_get_handle(), "account-enabled", account);
1759
1760         if ((gc != NULL) && (gc->wants_to_die == TRUE))
1761                 return;
1762
1763         if (value && purple_presence_is_online(account->presence))
1764                 purple_account_connect(account);
1765         else if (!value && !purple_account_is_disconnected(account))
1766                 purple_account_disconnect(account);
1767 }
1768
1769 void
1770 purple_account_set_proxy_info(PurpleAccount *account, PurpleProxyInfo *info)
1771 {
1772         g_return_if_fail(account != NULL);
1773
1774         if (account->proxy_info != NULL)
1775                 purple_proxy_info_destroy(account->proxy_info);
1776
1777         account->proxy_info = info;
1778
1779         schedule_accounts_save();
1780 }
1781
1782 void
1783 purple_account_set_privacy_type(PurpleAccount *account, PurplePrivacyType privacy_type)
1784 {
1785         g_return_if_fail(account != NULL);
1786
1787         account->perm_deny = privacy_type;
1788 }
1789
1790 void
1791 purple_account_set_status_types(PurpleAccount *account, GList *status_types)
1792 {
1793         g_return_if_fail(account != NULL);
1794
1795         /* Out with the old... */
1796         if (account->status_types != NULL)
1797         {
1798                 g_list_foreach(account->status_types, (GFunc)purple_status_type_destroy, NULL);
1799                 g_list_free(account->status_types);
1800         }
1801
1802         /* In with the new... */
1803         account->status_types = status_types;
1804 }
1805
1806 void
1807 purple_account_set_status(PurpleAccount *account, const char *status_id,
1808                                                 gboolean active, ...)
1809 {
1810         GList *attrs = NULL;
1811         const gchar *id;
1812         gpointer data;
1813         va_list args;
1814
1815         va_start(args, active);
1816         while ((id = va_arg(args, const char *)) != NULL)
1817         {
1818                 attrs = g_list_append(attrs, (char *)id);
1819                 data = va_arg(args, void *);
1820                 attrs = g_list_append(attrs, data);
1821         }
1822         purple_account_set_status_list(account, status_id, active, attrs);
1823         g_list_free(attrs);
1824         va_end(args);
1825 }
1826
1827 void
1828 purple_account_set_status_list(PurpleAccount *account, const char *status_id,
1829                                                          gboolean active, GList *attrs)
1830 {
1831         PurpleStatus *status;
1832
1833         g_return_if_fail(account   != NULL);
1834         g_return_if_fail(status_id != NULL);
1835
1836         status = purple_account_get_status(account, status_id);
1837         if (status == NULL)
1838         {
1839                 purple_debug_error("account",
1840                                    "Invalid status ID '%s' for account %s (%s)\n",
1841                                    status_id, purple_account_get_username(account),
1842                                    purple_account_get_protocol_id(account));
1843                 return;
1844         }
1845
1846         if (active || purple_status_is_independent(status))
1847                 purple_status_set_active_with_attrs_list(status, active, attrs);
1848
1849         /*
1850          * Our current statuses are saved to accounts.xml (so that when we
1851          * reconnect, we go back to the previous status).
1852          */
1853         schedule_accounts_save();
1854 }
1855
1856 struct public_alias_closure
1857 {
1858         PurpleAccount *account;
1859         gpointer failure_cb;
1860 };
1861
1862 static gboolean
1863 set_public_alias_unsupported(gpointer data)
1864 {
1865         struct public_alias_closure *closure = data;
1866         PurpleSetPublicAliasFailureCallback failure_cb = closure->failure_cb;
1867
1868         failure_cb(closure->account,
1869                    _("This protocol does not support setting a public alias."));
1870         g_free(closure);
1871
1872         return FALSE;
1873 }
1874
1875 void
1876 purple_account_set_public_alias(PurpleAccount *account,
1877                 const char *alias, PurpleSetPublicAliasSuccessCallback success_cb,
1878                 PurpleSetPublicAliasFailureCallback failure_cb)
1879 {
1880         PurpleConnection *gc;
1881         PurplePlugin *prpl = NULL;
1882         PurplePluginProtocolInfo *prpl_info = NULL;
1883
1884         g_return_if_fail(account != NULL);
1885         g_return_if_fail(purple_account_is_connected(account));
1886
1887         gc = purple_account_get_connection(account);
1888         prpl = purple_connection_get_prpl(gc);
1889         prpl_info = PURPLE_PLUGIN_PROTOCOL_INFO(prpl);
1890
1891         if (PURPLE_PROTOCOL_PLUGIN_HAS_FUNC(prpl_info, set_public_alias))
1892                 prpl_info->set_public_alias(gc, alias, success_cb, failure_cb);
1893         else if (failure_cb) {
1894                 struct public_alias_closure *closure =
1895                                 g_new0(struct public_alias_closure, 1);
1896                 closure->account = account;
1897                 closure->failure_cb = failure_cb;
1898                 purple_timeout_add(0, set_public_alias_unsupported, closure);
1899         }
1900 }
1901
1902 static gboolean
1903 get_public_alias_unsupported(gpointer data)
1904 {
1905         struct public_alias_closure *closure = data;
1906         PurpleGetPublicAliasFailureCallback failure_cb = closure->failure_cb;
1907
1908         failure_cb(closure->account,
1909                    _("This protocol does not support fetching the public alias."));
1910         g_free(closure);
1911
1912         return FALSE;
1913 }
1914
1915 void
1916 purple_account_get_public_alias(PurpleAccount *account,
1917                 PurpleGetPublicAliasSuccessCallback success_cb,
1918                 PurpleGetPublicAliasFailureCallback failure_cb)
1919 {
1920         PurpleConnection *gc;
1921         PurplePlugin *prpl = NULL;
1922         PurplePluginProtocolInfo *prpl_info = NULL;
1923
1924         g_return_if_fail(account != NULL);
1925         g_return_if_fail(purple_account_is_connected(account));
1926
1927         gc = purple_account_get_connection(account);
1928         prpl = purple_connection_get_prpl(gc);
1929         prpl_info = PURPLE_PLUGIN_PROTOCOL_INFO(prpl);
1930
1931         if (PURPLE_PROTOCOL_PLUGIN_HAS_FUNC(prpl_info, get_public_alias))
1932                 prpl_info->get_public_alias(gc, success_cb, failure_cb);
1933         else if (failure_cb) {
1934                 struct public_alias_closure *closure =
1935                                 g_new0(struct public_alias_closure, 1);
1936                 closure->account = account;
1937                 closure->failure_cb = failure_cb;
1938                 purple_timeout_add(0, get_public_alias_unsupported, closure);
1939         }
1940 }
1941
1942 gboolean
1943 purple_account_get_silence_suppression(const PurpleAccount *account)
1944 {
1945         return purple_account_get_bool(account, "silence-suppression", FALSE);
1946 }
1947
1948 void
1949 purple_account_set_silence_suppression(PurpleAccount *account, gboolean value)
1950 {
1951         g_return_if_fail(account != NULL);
1952
1953         purple_account_set_bool(account, "silence-suppression", value);
1954 }
1955
1956 void
1957 purple_account_clear_settings(PurpleAccount *account)
1958 {
1959         g_return_if_fail(account != NULL);
1960
1961         g_hash_table_destroy(account->settings);
1962
1963         account->settings = g_hash_table_new_full(g_str_hash, g_str_equal,
1964                                                                                           g_free, delete_setting);
1965 }
1966
1967 void
1968 purple_account_remove_setting(PurpleAccount *account, const char *setting)
1969 {
1970         g_return_if_fail(account != NULL);
1971         g_return_if_fail(setting != NULL);
1972
1973         g_hash_table_remove(account->settings, setting);
1974 }
1975
1976 void
1977 purple_account_set_int(PurpleAccount *account, const char *name, int value)
1978 {
1979         PurpleAccountSetting *setting;
1980
1981         g_return_if_fail(account != NULL);
1982         g_return_if_fail(name    != NULL);
1983
1984         setting = g_new0(PurpleAccountSetting, 1);
1985
1986         setting->type          = PURPLE_PREF_INT;
1987         setting->value.integer = value;
1988
1989         g_hash_table_insert(account->settings, g_strdup(name), setting);
1990
1991         schedule_accounts_save();
1992 }
1993
1994 void
1995 purple_account_set_string(PurpleAccount *account, const char *name,
1996                                                 const char *value)
1997 {
1998         PurpleAccountSetting *setting;
1999
2000         g_return_if_fail(account != NULL);
2001         g_return_if_fail(name    != NULL);
2002
2003         setting = g_new0(PurpleAccountSetting, 1);
2004
2005         setting->type         = PURPLE_PREF_STRING;
2006         setting->value.string = g_strdup(value);
2007
2008         g_hash_table_insert(account->settings, g_strdup(name), setting);
2009
2010         schedule_accounts_save();
2011 }
2012
2013 void
2014 purple_account_set_bool(PurpleAccount *account, const char *name, gboolean value)
2015 {
2016         PurpleAccountSetting *setting;
2017
2018         g_return_if_fail(account != NULL);
2019         g_return_if_fail(name    != NULL);
2020
2021         setting = g_new0(PurpleAccountSetting, 1);
2022
2023         setting->type       = PURPLE_PREF_BOOLEAN;
2024         setting->value.boolean = value;
2025
2026         g_hash_table_insert(account->settings, g_strdup(name), setting);
2027
2028         schedule_accounts_save();
2029 }
2030
2031 static GHashTable *
2032 get_ui_settings_table(PurpleAccount *account, const char *ui)
2033 {
2034         GHashTable *table;
2035
2036         table = g_hash_table_lookup(account->ui_settings, ui);
2037
2038         if (table == NULL) {
2039                 table = g_hash_table_new_full(g_str_hash, g_str_equal, g_free,
2040                                                                           delete_setting);
2041                 g_hash_table_insert(account->ui_settings, g_strdup(ui), table);
2042         }
2043
2044         return table;
2045 }
2046
2047 void
2048 purple_account_set_ui_int(PurpleAccount *account, const char *ui,
2049                                                 const char *name, int value)
2050 {
2051         PurpleAccountSetting *setting;
2052         GHashTable *table;
2053
2054         g_return_if_fail(account != NULL);
2055         g_return_if_fail(ui      != NULL);
2056         g_return_if_fail(name    != NULL);
2057
2058         setting = g_new0(PurpleAccountSetting, 1);
2059
2060         setting->type          = PURPLE_PREF_INT;
2061         setting->ui            = g_strdup(ui);
2062         setting->value.integer = value;
2063
2064         table = get_ui_settings_table(account, ui);
2065
2066         g_hash_table_insert(table, g_strdup(name), setting);
2067
2068         schedule_accounts_save();
2069 }
2070
2071 void
2072 purple_account_set_ui_string(PurpleAccount *account, const char *ui,
2073                                                    const char *name, const char *value)
2074 {
2075         PurpleAccountSetting *setting;
2076         GHashTable *table;
2077
2078         g_return_if_fail(account != NULL);
2079         g_return_if_fail(ui      != NULL);
2080         g_return_if_fail(name    != NULL);
2081
2082         setting = g_new0(PurpleAccountSetting, 1);
2083
2084         setting->type         = PURPLE_PREF_STRING;
2085         setting->ui           = g_strdup(ui);
2086         setting->value.string = g_strdup(value);
2087
2088         table = get_ui_settings_table(account, ui);
2089
2090         g_hash_table_insert(table, g_strdup(name), setting);
2091
2092         schedule_accounts_save();
2093 }
2094
2095 void
2096 purple_account_set_ui_bool(PurpleAccount *account, const char *ui,
2097                                                  const char *name, gboolean value)
2098 {
2099         PurpleAccountSetting *setting;
2100         GHashTable *table;
2101
2102         g_return_if_fail(account != NULL);
2103         g_return_if_fail(ui      != NULL);
2104         g_return_if_fail(name    != NULL);
2105
2106         setting = g_new0(PurpleAccountSetting, 1);
2107
2108         setting->type       = PURPLE_PREF_BOOLEAN;
2109         setting->ui         = g_strdup(ui);
2110         setting->value.boolean = value;
2111
2112         table = get_ui_settings_table(account, ui);
2113
2114         g_hash_table_insert(table, g_strdup(name), setting);
2115
2116         schedule_accounts_save();
2117 }
2118
2119 static PurpleConnectionState
2120 purple_account_get_state(const PurpleAccount *account)
2121 {
2122         PurpleConnection *gc;
2123
2124         g_return_val_if_fail(account != NULL, PURPLE_DISCONNECTED);
2125
2126         gc = purple_account_get_connection(account);
2127         if (!gc)
2128                 return PURPLE_DISCONNECTED;
2129
2130         return purple_connection_get_state(gc);
2131 }
2132
2133 gboolean
2134 purple_account_is_connected(const PurpleAccount *account)
2135 {
2136         return (purple_account_get_state(account) == PURPLE_CONNECTED);
2137 }
2138
2139 gboolean
2140 purple_account_is_connecting(const PurpleAccount *account)
2141 {
2142         return (purple_account_get_state(account) == PURPLE_CONNECTING);
2143 }
2144
2145 gboolean
2146 purple_account_is_disconnected(const PurpleAccount *account)
2147 {
2148         return (purple_account_get_state(account) == PURPLE_DISCONNECTED);
2149 }
2150
2151 const char *
2152 purple_account_get_username(const PurpleAccount *account)
2153 {
2154         g_return_val_if_fail(account != NULL, NULL);
2155
2156         return account->username;
2157 }
2158
2159 const char *
2160 purple_account_get_password(const PurpleAccount *account)
2161 {
2162         g_return_val_if_fail(account != NULL, NULL);
2163
2164         return account->password;
2165 }
2166
2167 const char *
2168 purple_account_get_alias(const PurpleAccount *account)
2169 {
2170         g_return_val_if_fail(account != NULL, NULL);
2171
2172         return account->alias;
2173 }
2174
2175 const char *
2176 purple_account_get_user_info(const PurpleAccount *account)
2177 {
2178         g_return_val_if_fail(account != NULL, NULL);
2179
2180         return account->user_info;
2181 }
2182
2183 const char *
2184 purple_account_get_buddy_icon_path(const PurpleAccount *account)
2185 {
2186         g_return_val_if_fail(account != NULL, NULL);
2187
2188         return account->buddy_icon_path;
2189 }
2190
2191 const char *
2192 purple_account_get_protocol_id(const PurpleAccount *account)
2193 {
2194         g_return_val_if_fail(account != NULL, NULL);
2195         return account->protocol_id;
2196 }
2197
2198 const char *
2199 purple_account_get_protocol_name(const PurpleAccount *account)
2200 {
2201         PurplePlugin *p;
2202
2203         g_return_val_if_fail(account != NULL, NULL);
2204
2205         p = purple_find_prpl(purple_account_get_protocol_id(account));
2206
2207         return ((p && p->info->name) ? _(p->info->name) : _("Unknown"));
2208 }
2209
2210 PurpleConnection *
2211 purple_account_get_connection(const PurpleAccount *account)
2212 {
2213         g_return_val_if_fail(account != NULL, NULL);
2214
2215         return account->gc;
2216 }
2217
2218 const gchar *
2219 purple_account_get_name_for_display(const PurpleAccount *account)
2220 {
2221         PurpleBuddy *self = NULL;
2222         PurpleConnection *gc = NULL;
2223         const gchar *name = NULL, *username = NULL, *displayname = NULL;
2224
2225         name = purple_account_get_alias(account);
2226
2227         if (name) {
2228                 return name;
2229         }
2230
2231         username = purple_account_get_username(account);
2232         self = purple_find_buddy((PurpleAccount *)account, username);
2233
2234         if (self) {
2235                 const gchar *calias= purple_buddy_get_contact_alias(self);
2236
2237                 /* We don't want to return the buddy name if the buddy/contact
2238                  * doesn't have an alias set. */
2239                 if (!purple_strequal(username, calias)) {
2240                         return calias;
2241                 }
2242         }
2243
2244         gc = purple_account_get_connection(account);
2245         displayname = purple_connection_get_display_name(gc);
2246
2247         if (displayname) {
2248                 return displayname;
2249         }
2250
2251         return username;
2252 }
2253
2254 gboolean
2255 purple_account_get_remember_password(const PurpleAccount *account)
2256 {
2257         g_return_val_if_fail(account != NULL, FALSE);
2258
2259         return account->remember_pass;
2260 }
2261
2262 gboolean
2263 purple_account_get_check_mail(const PurpleAccount *account)
2264 {
2265         g_return_val_if_fail(account != NULL, FALSE);
2266
2267         return purple_account_get_bool(account, "check-mail", FALSE);
2268 }
2269
2270 gboolean
2271 purple_account_get_enabled(const PurpleAccount *account, const char *ui)
2272 {
2273         g_return_val_if_fail(account != NULL, FALSE);
2274         g_return_val_if_fail(ui      != NULL, FALSE);
2275
2276         return purple_account_get_ui_bool(account, ui, "auto-login", FALSE);
2277 }
2278
2279 PurpleProxyInfo *
2280 purple_account_get_proxy_info(const PurpleAccount *account)
2281 {
2282         g_return_val_if_fail(account != NULL, NULL);
2283
2284         return account->proxy_info;
2285 }
2286
2287 PurplePrivacyType
2288 purple_account_get_privacy_type(const PurpleAccount *account)
2289 {
2290         g_return_val_if_fail(account != NULL, PURPLE_PRIVACY_ALLOW_ALL);
2291
2292         return account->perm_deny;
2293 }
2294
2295 PurpleStatus *
2296 purple_account_get_active_status(const PurpleAccount *account)
2297 {
2298         g_return_val_if_fail(account   != NULL, NULL);
2299
2300         return purple_presence_get_active_status(account->presence);
2301 }
2302
2303 PurpleStatus *
2304 purple_account_get_status(const PurpleAccount *account, const char *status_id)
2305 {
2306         g_return_val_if_fail(account   != NULL, NULL);
2307         g_return_val_if_fail(status_id != NULL, NULL);
2308
2309         return purple_presence_get_status(account->presence, status_id);
2310 }
2311
2312 PurpleStatusType *
2313 purple_account_get_status_type(const PurpleAccount *account, const char *id)
2314 {
2315         GList *l;
2316
2317         g_return_val_if_fail(account != NULL, NULL);
2318         g_return_val_if_fail(id      != NULL, NULL);
2319
2320         for (l = purple_account_get_status_types(account); l != NULL; l = l->next)
2321         {
2322                 PurpleStatusType *status_type = (PurpleStatusType *)l->data;
2323
2324                 if (purple_strequal(purple_status_type_get_id(status_type), id))
2325                         return status_type;
2326         }
2327
2328         return NULL;
2329 }
2330
2331 PurpleStatusType *
2332 purple_account_get_status_type_with_primitive(const PurpleAccount *account, PurpleStatusPrimitive primitive)
2333 {
2334         GList *l;
2335
2336         g_return_val_if_fail(account != NULL, NULL);
2337
2338         for (l = purple_account_get_status_types(account); l != NULL; l = l->next)
2339         {
2340                 PurpleStatusType *status_type = (PurpleStatusType *)l->data;
2341
2342                 if (purple_status_type_get_primitive(status_type) == primitive)
2343                         return status_type;
2344         }
2345
2346         return NULL;
2347 }
2348
2349 PurplePresence *
2350 purple_account_get_presence(const PurpleAccount *account)
2351 {
2352         g_return_val_if_fail(account != NULL, NULL);
2353
2354         return account->presence;
2355 }
2356
2357 gboolean
2358 purple_account_is_status_active(const PurpleAccount *account,
2359                                                           const char *status_id)
2360 {
2361         g_return_val_if_fail(account   != NULL, FALSE);
2362         g_return_val_if_fail(status_id != NULL, FALSE);
2363
2364         return purple_presence_is_status_active(account->presence, status_id);
2365 }
2366
2367 GList *
2368 purple_account_get_status_types(const PurpleAccount *account)
2369 {
2370         g_return_val_if_fail(account != NULL, NULL);
2371
2372         return account->status_types;
2373 }
2374
2375 int
2376 purple_account_get_int(const PurpleAccount *account, const char *name,
2377                                          int default_value)
2378 {
2379         PurpleAccountSetting *setting;
2380
2381         g_return_val_if_fail(account != NULL, default_value);
2382         g_return_val_if_fail(name    != NULL, default_value);
2383
2384         setting = g_hash_table_lookup(account->settings, name);
2385
2386         if (setting == NULL)
2387                 return default_value;
2388
2389         g_return_val_if_fail(setting->type == PURPLE_PREF_INT, default_value);
2390
2391         return setting->value.integer;
2392 }
2393
2394 const char *
2395 purple_account_get_string(const PurpleAccount *account, const char *name,
2396                                                 const char *default_value)
2397 {
2398         PurpleAccountSetting *setting;
2399
2400         g_return_val_if_fail(account != NULL, default_value);
2401         g_return_val_if_fail(name    != NULL, default_value);
2402
2403         setting = g_hash_table_lookup(account->settings, name);
2404
2405         if (setting == NULL)
2406                 return default_value;
2407
2408         g_return_val_if_fail(setting->type == PURPLE_PREF_STRING, default_value);
2409
2410         return setting->value.string;
2411 }
2412
2413 gboolean
2414 purple_account_get_bool(const PurpleAccount *account, const char *name,
2415                                           gboolean default_value)
2416 {
2417         PurpleAccountSetting *setting;
2418
2419         g_return_val_if_fail(account != NULL, default_value);
2420         g_return_val_if_fail(name    != NULL, default_value);
2421
2422         setting = g_hash_table_lookup(account->settings, name);
2423
2424         if (setting == NULL)
2425                 return default_value;
2426
2427         g_return_val_if_fail(setting->type == PURPLE_PREF_BOOLEAN, default_value);
2428
2429         return setting->value.boolean;
2430 }
2431
2432 int
2433 purple_account_get_ui_int(const PurpleAccount *account, const char *ui,
2434                                                 const char *name, int default_value)
2435 {
2436         PurpleAccountSetting *setting;
2437         GHashTable *table;
2438
2439         g_return_val_if_fail(account != NULL, default_value);
2440         g_return_val_if_fail(ui      != NULL, default_value);
2441         g_return_val_if_fail(name    != NULL, default_value);
2442
2443         if ((table = g_hash_table_lookup(account->ui_settings, ui)) == NULL)
2444                 return default_value;
2445
2446         if ((setting = g_hash_table_lookup(table, name)) == NULL)
2447                 return default_value;
2448
2449         g_return_val_if_fail(setting->type == PURPLE_PREF_INT, default_value);
2450
2451         return setting->value.integer;
2452 }
2453
2454 const char *
2455 purple_account_get_ui_string(const PurpleAccount *account, const char *ui,
2456                                                    const char *name, const char *default_value)
2457 {
2458         PurpleAccountSetting *setting;
2459         GHashTable *table;
2460
2461         g_return_val_if_fail(account != NULL, default_value);
2462         g_return_val_if_fail(ui      != NULL, default_value);
2463         g_return_val_if_fail(name    != NULL, default_value);
2464
2465         if ((table = g_hash_table_lookup(account->ui_settings, ui)) == NULL)
2466                 return default_value;
2467
2468         if ((setting = g_hash_table_lookup(table, name)) == NULL)
2469                 return default_value;
2470
2471         g_return_val_if_fail(setting->type == PURPLE_PREF_STRING, default_value);
2472
2473         return setting->value.string;
2474 }
2475
2476 gboolean
2477 purple_account_get_ui_bool(const PurpleAccount *account, const char *ui,
2478                                                  const char *name, gboolean default_value)
2479 {
2480         PurpleAccountSetting *setting;
2481         GHashTable *table;
2482
2483         g_return_val_if_fail(account != NULL, default_value);
2484         g_return_val_if_fail(ui      != NULL, default_value);
2485         g_return_val_if_fail(name    != NULL, default_value);
2486
2487         if ((table = g_hash_table_lookup(account->ui_settings, ui)) == NULL)
2488                 return default_value;
2489
2490         if ((setting = g_hash_table_lookup(table, name)) == NULL)
2491                 return default_value;
2492
2493         g_return_val_if_fail(setting->type == PURPLE_PREF_BOOLEAN, default_value);
2494
2495         return setting->value.boolean;
2496 }
2497
2498 PurpleLog *
2499 purple_account_get_log(PurpleAccount *account, gboolean create)
2500 {
2501         g_return_val_if_fail(account != NULL, NULL);
2502
2503         if(!account->system_log && create){
2504                 PurplePresence *presence;
2505                 int login_time;
2506
2507                 presence = purple_account_get_presence(account);
2508                 login_time = purple_presence_get_login_time(presence);
2509
2510                 account->system_log      = purple_log_new(PURPLE_LOG_SYSTEM,
2511                                 purple_account_get_username(account), account, NULL,
2512                                 (login_time != 0) ? login_time : time(NULL), NULL);
2513         }
2514
2515         return account->system_log;
2516 }
2517
2518 void
2519 purple_account_destroy_log(PurpleAccount *account)
2520 {
2521         g_return_if_fail(account != NULL);
2522
2523         if(account->system_log){
2524                 purple_log_free(account->system_log);
2525                 account->system_log = NULL;
2526         }
2527 }
2528
2529 void
2530 purple_account_add_buddy(PurpleAccount *account, PurpleBuddy *buddy)
2531 {
2532         PurplePluginProtocolInfo *prpl_info = NULL;
2533         PurpleConnection *gc;
2534         PurplePlugin *prpl = NULL;
2535
2536         g_return_if_fail(account != NULL);
2537         g_return_if_fail(buddy != NULL);
2538
2539         gc = purple_account_get_connection(account);
2540         if (gc != NULL)
2541                 prpl = purple_connection_get_prpl(gc);
2542
2543         if (prpl != NULL)
2544                 prpl_info = PURPLE_PLUGIN_PROTOCOL_INFO(prpl);
2545
2546         if (prpl_info != NULL) {
2547                 if (PURPLE_PROTOCOL_PLUGIN_HAS_FUNC(prpl_info, add_buddy_with_invite))
2548                         prpl_info->add_buddy_with_invite(gc, buddy, purple_buddy_get_group(buddy), NULL);
2549                 else if (PURPLE_PROTOCOL_PLUGIN_HAS_FUNC(prpl_info, add_buddy))
2550                         prpl_info->add_buddy(gc, buddy, purple_buddy_get_group(buddy));
2551         }
2552 }
2553
2554 void
2555 purple_account_add_buddy_with_invite(PurpleAccount *account, PurpleBuddy *buddy, const char *message)
2556 {
2557         PurplePluginProtocolInfo *prpl_info = NULL;
2558         PurpleConnection *gc;
2559         PurplePlugin *prpl = NULL;
2560
2561         g_return_if_fail(account != NULL);
2562         g_return_if_fail(buddy != NULL);
2563
2564         gc = purple_account_get_connection(account);
2565         if (gc != NULL)
2566                 prpl = purple_connection_get_prpl(gc);
2567
2568         if (prpl != NULL)
2569                 prpl_info = PURPLE_PLUGIN_PROTOCOL_INFO(prpl);
2570
2571         if (prpl_info != NULL) {
2572                 if (PURPLE_PROTOCOL_PLUGIN_HAS_FUNC(prpl_info, add_buddy_with_invite))
2573                         prpl_info->add_buddy_with_invite(gc, buddy, purple_buddy_get_group(buddy), message);
2574                 else if (PURPLE_PROTOCOL_PLUGIN_HAS_FUNC(prpl_info, add_buddy))
2575                         prpl_info->add_buddy(gc, buddy, purple_buddy_get_group(buddy));
2576         }
2577 }
2578
2579 void
2580 purple_account_add_buddies(PurpleAccount *account, GList *buddies)
2581 {
2582         PurplePluginProtocolInfo *prpl_info = NULL;
2583         PurpleConnection *gc = purple_account_get_connection(account);
2584         PurplePlugin *prpl = NULL;
2585
2586         if (gc != NULL)
2587                 prpl = purple_connection_get_prpl(gc);
2588
2589         if (prpl != NULL)
2590                 prpl_info = PURPLE_PLUGIN_PROTOCOL_INFO(prpl);
2591
2592         if (prpl_info) {
2593                 GList *cur, *groups = NULL;
2594
2595                 /* Make a list of what group each buddy is in */
2596                 for (cur = buddies; cur != NULL; cur = cur->next) {
2597                         PurpleBuddy *buddy = cur->data;
2598                         groups = g_list_append(groups, purple_buddy_get_group(buddy));
2599                 }
2600
2601                 if (PURPLE_PROTOCOL_PLUGIN_HAS_FUNC(prpl_info, add_buddies_with_invite))
2602                         prpl_info->add_buddies_with_invite(gc, buddies, groups, NULL);
2603                 else if (PURPLE_PROTOCOL_PLUGIN_HAS_FUNC(prpl_info, add_buddies))
2604                         prpl_info->add_buddies(gc, buddies, groups);
2605                 else if (PURPLE_PROTOCOL_PLUGIN_HAS_FUNC(prpl_info, add_buddy_with_invite)) {
2606                         GList *curb = buddies, *curg = groups;
2607
2608                         while ((curb != NULL) && (curg != NULL)) {
2609                                 prpl_info->add_buddy_with_invite(gc, curb->data, curg->data, NULL);
2610                                 curb = curb->next;
2611                                 curg = curg->next;
2612                         }
2613                 }
2614                 else if (PURPLE_PROTOCOL_PLUGIN_HAS_FUNC(prpl_info, add_buddy)) {
2615                         GList *curb = buddies, *curg = groups;
2616
2617                         while ((curb != NULL) && (curg != NULL)) {
2618                                 prpl_info->add_buddy(gc, curb->data, curg->data);
2619                                 curb = curb->next;
2620                                 curg = curg->next;
2621                         }
2622                 }
2623
2624                 g_list_free(groups);
2625         }
2626 }
2627
2628 void
2629 purple_account_add_buddies_with_invite(PurpleAccount *account, GList *buddies, const char *message)
2630 {
2631         PurplePluginProtocolInfo *prpl_info = NULL;
2632         PurpleConnection *gc = purple_account_get_connection(account);
2633         PurplePlugin *prpl = NULL;
2634
2635         if (gc != NULL)
2636                 prpl = purple_connection_get_prpl(gc);
2637
2638         if (prpl != NULL)
2639                 prpl_info = PURPLE_PLUGIN_PROTOCOL_INFO(prpl);
2640
2641         if (prpl_info) {
2642                 GList *cur, *groups = NULL;
2643
2644                 /* Make a list of what group each buddy is in */
2645                 for (cur = buddies; cur != NULL; cur = cur->next) {
2646                         PurpleBuddy *buddy = cur->data;
2647                         groups = g_list_append(groups, purple_buddy_get_group(buddy));
2648                 }
2649
2650                 if (PURPLE_PROTOCOL_PLUGIN_HAS_FUNC(prpl_info, add_buddies_with_invite))
2651                         prpl_info->add_buddies_with_invite(gc, buddies, groups, message);
2652                 else if (PURPLE_PROTOCOL_PLUGIN_HAS_FUNC(prpl_info, add_buddy_with_invite)) {
2653                         GList *curb = buddies, *curg = groups;
2654
2655                         while ((curb != NULL) && (curg != NULL)) {
2656                                 prpl_info->add_buddy_with_invite(gc, curb->data, curg->data, message);
2657                                 curb = curb->next;
2658                                 curg = curg->next;
2659                         }
2660                 }
2661                 else if (PURPLE_PROTOCOL_PLUGIN_HAS_FUNC(prpl_info, add_buddies))
2662                         prpl_info->add_buddies(gc, buddies, groups);
2663                 else if (PURPLE_PROTOCOL_PLUGIN_HAS_FUNC(prpl_info, add_buddy)) {
2664                         GList *curb = buddies, *curg = groups;
2665
2666                         while ((curb != NULL) && (curg != NULL)) {
2667                                 prpl_info->add_buddy(gc, curb->data, curg->data);
2668                                 curb = curb->next;
2669                                 curg = curg->next;
2670                         }
2671                 }
2672
2673                 g_list_free(groups);
2674         }
2675 }
2676
2677 void
2678 purple_account_remove_buddy(PurpleAccount *account, PurpleBuddy *buddy,
2679                 PurpleGroup *group)
2680 {
2681         PurplePluginProtocolInfo *prpl_info = NULL;
2682         PurpleConnection *gc = purple_account_get_connection(account);
2683         PurplePlugin *prpl = NULL;
2684
2685         if (gc != NULL)
2686                 prpl = purple_connection_get_prpl(gc);
2687
2688         if (prpl != NULL)
2689                 prpl_info = PURPLE_PLUGIN_PROTOCOL_INFO(prpl);
2690
2691         if (prpl_info && prpl_info->remove_buddy)
2692                 prpl_info->remove_buddy(gc, buddy, group);
2693 }
2694
2695 void
2696 purple_account_remove_buddies(PurpleAccount *account, GList *buddies, GList *groups)
2697 {
2698         PurplePluginProtocolInfo *prpl_info = NULL;
2699         PurpleConnection *gc = purple_account_get_connection(account);
2700         PurplePlugin *prpl = NULL;
2701
2702         if (gc != NULL)
2703                 prpl = purple_connection_get_prpl(gc);
2704
2705         if (prpl != NULL)
2706                 prpl_info = PURPLE_PLUGIN_PROTOCOL_INFO(prpl);
2707
2708         if (prpl_info) {
2709                 if (prpl_info->remove_buddies)
2710                         prpl_info->remove_buddies(gc, buddies, groups);
2711                 else {
2712                         GList *curb = buddies;
2713                         GList *curg = groups;
2714                         while ((curb != NULL) && (curg != NULL)) {
2715                                 purple_account_remove_buddy(account, curb->data, curg->data);
2716                                 curb = curb->next;
2717                                 curg = curg->next;
2718                         }
2719                 }
2720         }
2721 }
2722
2723 void
2724 purple_account_remove_group(PurpleAccount *account, PurpleGroup *group)
2725 {
2726         PurplePluginProtocolInfo *prpl_info = NULL;
2727         PurpleConnection *gc = purple_account_get_connection(account);
2728         PurplePlugin *prpl = NULL;
2729
2730         if (gc != NULL)
2731                 prpl = purple_connection_get_prpl(gc);
2732
2733         if (prpl != NULL)
2734                 prpl_info = PURPLE_PLUGIN_PROTOCOL_INFO(prpl);
2735
2736         if (prpl_info && prpl_info->remove_group)
2737                 prpl_info->remove_group(gc, group);
2738 }
2739
2740 void
2741 purple_account_change_password(PurpleAccount *account, const char *orig_pw,
2742                 const char *new_pw)
2743 {
2744         PurplePluginProtocolInfo *prpl_info = NULL;
2745         PurpleConnection *gc = purple_account_get_connection(account);
2746         PurplePlugin *prpl = NULL;
2747
2748         purple_account_set_password(account, new_pw);
2749
2750         if (gc != NULL)
2751                 prpl = purple_connection_get_prpl(gc);
2752
2753         if (prpl != NULL)
2754                 prpl_info = PURPLE_PLUGIN_PROTOCOL_INFO(prpl);
2755
2756         if (prpl_info && prpl_info->change_passwd)
2757                 prpl_info->change_passwd(gc, orig_pw, new_pw);
2758 }
2759
2760 gboolean purple_account_supports_offline_message(PurpleAccount *account, PurpleBuddy *buddy)
2761 {
2762         PurpleConnection *gc;
2763         PurplePluginProtocolInfo *prpl_info = NULL;
2764         PurplePlugin *prpl = NULL;
2765
2766         g_return_val_if_fail(account, FALSE);
2767         g_return_val_if_fail(buddy, FALSE);
2768
2769         gc = purple_account_get_connection(account);
2770         if (gc == NULL)
2771                 return FALSE;
2772
2773         prpl = purple_connection_get_prpl(gc);
2774
2775         if (prpl != NULL)
2776                 prpl_info = PURPLE_PLUGIN_PROTOCOL_INFO(prpl);
2777
2778         if (!prpl_info || !prpl_info->offline_message)
2779                 return FALSE;
2780         return prpl_info->offline_message(buddy);
2781 }
2782
2783 static void
2784 signed_on_cb(PurpleConnection *gc,
2785              gpointer unused)
2786 {
2787         PurpleAccount *account = purple_connection_get_account(gc);
2788         purple_account_clear_current_error(account);
2789
2790         purple_signal_emit(purple_accounts_get_handle(), "account-signed-on",
2791                            account);
2792 }
2793
2794 static void
2795 signed_off_cb(PurpleConnection *gc,
2796               gpointer unused)
2797 {
2798         PurpleAccount *account = purple_connection_get_account(gc);
2799
2800         purple_signal_emit(purple_accounts_get_handle(), "account-signed-off",
2801                            account);
2802 }
2803
2804 static void
2805 set_current_error(PurpleAccount *account, PurpleConnectionErrorInfo *new_err)
2806 {
2807         PurpleAccountPrivate *priv;
2808         PurpleConnectionErrorInfo *old_err;
2809
2810         g_return_if_fail(account != NULL);
2811
2812         priv = PURPLE_ACCOUNT_GET_PRIVATE(account);
2813         old_err = priv->current_error;
2814
2815         if(new_err == old_err)
2816                 return;
2817
2818         priv->current_error = new_err;
2819
2820         purple_signal_emit(purple_accounts_get_handle(),
2821                            "account-error-changed",
2822                            account, old_err, new_err);
2823         schedule_accounts_save();
2824
2825         if(old_err)
2826                 g_free(old_err->description);
2827
2828         PURPLE_DBUS_UNREGISTER_POINTER(old_err);
2829         g_free(old_err);
2830 }
2831
2832 static void
2833 connection_error_cb(PurpleConnection *gc,
2834                     PurpleConnectionError type,
2835                     const gchar *description,
2836                     gpointer unused)
2837 {
2838         PurpleAccount *account;
2839         PurpleConnectionErrorInfo *err;
2840
2841         account = purple_connection_get_account(gc);
2842
2843         g_return_if_fail(account != NULL);
2844
2845         err = g_new0(PurpleConnectionErrorInfo, 1);
2846         PURPLE_DBUS_REGISTER_POINTER(err, PurpleConnectionErrorInfo);
2847
2848         err->type = type;
2849         err->description = g_strdup(description);
2850
2851         set_current_error(account, err);
2852
2853         purple_signal_emit(purple_accounts_get_handle(), "account-connection-error",
2854                            account, type, description);
2855 }
2856
2857 const PurpleConnectionErrorInfo *
2858 purple_account_get_current_error(PurpleAccount *account)
2859 {
2860         PurpleAccountPrivate *priv = PURPLE_ACCOUNT_GET_PRIVATE(account);
2861         return priv->current_error;
2862 }
2863
2864 void
2865 purple_account_clear_current_error(PurpleAccount *account)
2866 {
2867         set_current_error(account, NULL);
2868 }
2869
2870 void
2871 purple_accounts_add(PurpleAccount *account)
2872 {
2873         g_return_if_fail(account != NULL);
2874
2875         if (g_list_find(accounts, account) != NULL)
2876                 return;
2877
2878         accounts = g_list_append(accounts, account);
2879
2880         schedule_accounts_save();
2881
2882         purple_signal_emit(purple_accounts_get_handle(), "account-added", account);
2883 }
2884
2885 void
2886 purple_accounts_remove(PurpleAccount *account)
2887 {
2888         g_return_if_fail(account != NULL);
2889
2890         accounts = g_list_remove(accounts, account);
2891
2892         schedule_accounts_save();
2893
2894         /* Clearing the error ensures that account-error-changed is emitted,
2895          * which is the end of the guarantee that the the error's pointer is
2896          * valid.
2897          */
2898         purple_account_clear_current_error(account);
2899         purple_signal_emit(purple_accounts_get_handle(), "account-removed", account);
2900 }
2901
2902 void
2903 purple_accounts_delete(PurpleAccount *account)
2904 {
2905         PurpleBlistNode *gnode, *cnode, *bnode;
2906         GList *iter;
2907
2908         g_return_if_fail(account != NULL);
2909
2910         /*
2911          * Disable the account before blowing it out of the water.
2912          * Conceptually it probably makes more sense to disable the
2913          * account for all UIs rather than the just the current UI,
2914          * but it doesn't really matter.
2915          */
2916         purple_account_set_enabled(account, purple_core_get_ui(), FALSE);
2917
2918         purple_notify_close_with_handle(account);
2919         purple_request_close_with_handle(account);
2920
2921         purple_accounts_remove(account);
2922
2923         /* Remove this account's buddies */
2924         for (gnode = purple_blist_get_root();
2925              gnode != NULL;
2926                  gnode = purple_blist_node_get_sibling_next(gnode))
2927         {
2928                 if (!PURPLE_BLIST_NODE_IS_GROUP(gnode))
2929                         continue;
2930
2931                 cnode = purple_blist_node_get_first_child(gnode);
2932                 while (cnode) {
2933                         PurpleBlistNode *cnode_next = purple_blist_node_get_sibling_next(cnode);
2934
2935                         if(PURPLE_BLIST_NODE_IS_CONTACT(cnode)) {
2936                                 bnode = purple_blist_node_get_first_child(cnode);
2937                                 while (bnode) {
2938                                         PurpleBlistNode *bnode_next = purple_blist_node_get_sibling_next(bnode);
2939
2940                                         if (PURPLE_BLIST_NODE_IS_BUDDY(bnode)) {
2941                                                 PurpleBuddy *b = (PurpleBuddy *)bnode;
2942
2943                                                 if (purple_buddy_get_account(b) == account)
2944                                                         purple_blist_remove_buddy(b);
2945                                         }
2946                                         bnode = bnode_next;
2947                                 }
2948                         } else if (PURPLE_BLIST_NODE_IS_CHAT(cnode)) {
2949                                 PurpleChat *c = (PurpleChat *)cnode;
2950
2951                                 if (purple_chat_get_account(c) == account)
2952                                         purple_blist_remove_chat(c);
2953                         }
2954                         cnode = cnode_next;
2955                 }
2956         }
2957
2958         /* Remove any open conversation for this account */
2959         for (iter = purple_get_conversations(); iter; ) {
2960                 PurpleConversation *conv = iter->data;
2961                 iter = iter->next;
2962                 if (purple_conversation_get_account(conv) == account)
2963                         purple_conversation_destroy(conv);
2964         }
2965
2966         /* Remove this account's pounces */
2967         purple_pounce_destroy_all_by_account(account);
2968
2969         /* This will cause the deletion of an old buddy icon. */
2970         purple_buddy_icons_set_account_icon(account, NULL, 0);
2971
2972         purple_account_destroy(account);
2973 }
2974
2975 void
2976 purple_accounts_reorder(PurpleAccount *account, gint new_index)
2977 {
2978         gint index;
2979         GList *l;
2980
2981         g_return_if_fail(account != NULL);
2982         g_return_if_fail(new_index <= g_list_length(accounts));
2983
2984         index = g_list_index(accounts, account);
2985
2986         if (index == -1) {
2987                 purple_debug_error("account",
2988                                    "Unregistered account (%s) discovered during reorder!\n",
2989                                    purple_account_get_username(account));
2990                 return;
2991         }
2992
2993         l = g_list_nth(accounts, index);
2994
2995         if (new_index > index)
2996                 new_index--;
2997
2998         /* Remove the old one. */
2999         accounts = g_list_delete_link(accounts, l);
3000
3001         /* Insert it where it should go. */
3002         accounts = g_list_insert(accounts, account, new_index);
3003
3004         schedule_accounts_save();
3005 }
3006
3007 GList *
3008 purple_accounts_get_all(void)
3009 {
3010         return accounts;
3011 }
3012
3013 GList *
3014 purple_accounts_get_all_active(void)
3015 {
3016         GList *list = NULL;
3017         GList *all = purple_accounts_get_all();
3018
3019         while (all != NULL) {
3020                 PurpleAccount *account = all->data;
3021
3022                 if (purple_account_get_enabled(account, purple_core_get_ui()))
3023                         list = g_list_append(list, account);
3024
3025                 all = all->next;
3026         }
3027
3028         return list;
3029 }
3030
3031 PurpleAccount *
3032 purple_accounts_find(const char *name, const char *protocol_id)
3033 {
3034         PurpleAccount *account = NULL;
3035         GList *l;
3036         char *who;
3037
3038         g_return_val_if_fail(name != NULL, NULL);
3039         g_return_val_if_fail(protocol_id != NULL, NULL);
3040
3041         for (l = purple_accounts_get_all(); l != NULL; l = l->next) {
3042                 account = (PurpleAccount *)l->data;
3043                 if (!purple_strequal(account->protocol_id, protocol_id))
3044                         continue;
3045
3046                 who = g_strdup(purple_normalize(account, name));
3047                 if (purple_strequal(purple_normalize(account, purple_account_get_username(account)), who)) {
3048                         g_free(who);
3049                         return account;
3050                 }
3051                 g_free(who);
3052         }
3053
3054         return NULL;
3055 }
3056
3057 void
3058 purple_accounts_restore_current_statuses()
3059 {
3060         GList *l;
3061         PurpleAccount *account;
3062
3063         /* If we're not connected to the Internet right now, we bail on this */
3064         if (!purple_network_is_available())
3065         {
3066                 purple_debug_warning("account", "Network not connected; skipping reconnect\n");
3067                 return;
3068         }
3069
3070         for (l = purple_accounts_get_all(); l != NULL; l = l->next)
3071         {
3072                 account = (PurpleAccount *)l->data;
3073                 if (purple_account_get_enabled(account, purple_core_get_ui()) &&
3074                         (purple_presence_is_online(account->presence)))
3075                 {
3076                         purple_account_connect(account);
3077                 }
3078         }
3079 }
3080
3081 void
3082 purple_accounts_set_ui_ops(PurpleAccountUiOps *ops)
3083 {
3084         account_ui_ops = ops;
3085 }
3086
3087 PurpleAccountUiOps *
3088 purple_accounts_get_ui_ops(void)
3089 {
3090         return account_ui_ops;
3091 }
3092
3093 void *
3094 purple_accounts_get_handle(void)
3095 {
3096         static int handle;
3097
3098         return &handle;
3099 }
3100
3101 void
3102 purple_accounts_init(void)
3103 {
3104         void *handle = purple_accounts_get_handle();
3105         void *conn_handle = purple_connections_get_handle();
3106
3107         purple_signal_register(handle, "account-connecting",
3108                                                  purple_marshal_VOID__POINTER, NULL, 1,
3109                                                  purple_value_new(PURPLE_TYPE_SUBTYPE,
3110                                                                                 PURPLE_SUBTYPE_ACCOUNT));
3111
3112         purple_signal_register(handle, "account-disabled",
3113                                                  purple_marshal_VOID__POINTER, NULL, 1,
3114                                                  purple_value_new(PURPLE_TYPE_SUBTYPE,
3115                                                                                 PURPLE_SUBTYPE_ACCOUNT));
3116
3117         purple_signal_register(handle, "account-enabled",
3118                                                  purple_marshal_VOID__POINTER, NULL, 1,
3119                                                  purple_value_new(PURPLE_TYPE_SUBTYPE,
3120                                                                                 PURPLE_SUBTYPE_ACCOUNT));
3121
3122         purple_signal_register(handle, "account-setting-info",
3123                                                  purple_marshal_VOID__POINTER_POINTER, NULL, 2,
3124                                                  purple_value_new(PURPLE_TYPE_SUBTYPE,
3125                                                                                 PURPLE_SUBTYPE_ACCOUNT),
3126                                                  purple_value_new(PURPLE_TYPE_STRING));
3127
3128         purple_signal_register(handle, "account-set-info",
3129                                                  purple_marshal_VOID__POINTER_POINTER, NULL, 2,
3130                                                  purple_value_new(PURPLE_TYPE_SUBTYPE,
3131                                                                                 PURPLE_SUBTYPE_ACCOUNT),
3132                                                  purple_value_new(PURPLE_TYPE_STRING));
3133
3134         purple_signal_register(handle, "account-created",
3135                                                  purple_marshal_VOID__POINTER, NULL, 1,
3136                                                  purple_value_new(PURPLE_TYPE_SUBTYPE, PURPLE_SUBTYPE_ACCOUNT));
3137
3138         purple_signal_register(handle, "account-destroying",
3139                                                  purple_marshal_VOID__POINTER, NULL, 1,
3140                                                  purple_value_new(PURPLE_TYPE_SUBTYPE, PURPLE_SUBTYPE_ACCOUNT));
3141
3142         purple_signal_register(handle, "account-added",
3143                                                  purple_marshal_VOID__POINTER, NULL, 1,
3144                                                  purple_value_new(PURPLE_TYPE_SUBTYPE, PURPLE_SUBTYPE_ACCOUNT));
3145
3146         purple_signal_register(handle, "account-removed",
3147                                                  purple_marshal_VOID__POINTER, NULL, 1,
3148                                                  purple_value_new(PURPLE_TYPE_SUBTYPE, PURPLE_SUBTYPE_ACCOUNT));
3149
3150         purple_signal_register(handle, "account-status-changed",
3151                                                  purple_marshal_VOID__POINTER_POINTER_POINTER, NULL, 3,
3152                                                  purple_value_new(PURPLE_TYPE_SUBTYPE,
3153                                                                                 PURPLE_SUBTYPE_ACCOUNT),
3154                                                  purple_value_new(PURPLE_TYPE_SUBTYPE,
3155                                                                                 PURPLE_SUBTYPE_STATUS),
3156                                                  purple_value_new(PURPLE_TYPE_SUBTYPE,
3157                                                                                 PURPLE_SUBTYPE_STATUS));
3158
3159         purple_signal_register(handle, "account-actions-changed",
3160                                                  purple_marshal_VOID__POINTER, NULL, 1,
3161                                                  purple_value_new(PURPLE_TYPE_SUBTYPE, PURPLE_SUBTYPE_ACCOUNT));
3162
3163         purple_signal_register(handle, "account-alias-changed",
3164                                                  purple_marshal_VOID__POINTER_POINTER, NULL, 2,
3165                                                  purple_value_new(PURPLE_TYPE_SUBTYPE,
3166                                                                                 PURPLE_SUBTYPE_ACCOUNT),
3167                                                  purple_value_new(PURPLE_TYPE_STRING));
3168
3169         purple_signal_register(handle, "account-authorization-requested",
3170                                                 purple_marshal_INT__POINTER_POINTER,
3171                                                 purple_value_new(PURPLE_TYPE_INT), 2,
3172                                                 purple_value_new(PURPLE_TYPE_SUBTYPE,
3173                                                                                 PURPLE_SUBTYPE_ACCOUNT),
3174                                                 purple_value_new(PURPLE_TYPE_STRING));
3175
3176         purple_signal_register(handle, "account-authorization-requested-with-message",
3177                                                 purple_marshal_INT__POINTER_POINTER_POINTER,
3178                                                 purple_value_new(PURPLE_TYPE_INT), 3,
3179                                                 purple_value_new(PURPLE_TYPE_SUBTYPE,
3180                                                                                 PURPLE_SUBTYPE_ACCOUNT),
3181                                                 purple_value_new(PURPLE_TYPE_STRING),
3182                                                 purple_value_new(PURPLE_TYPE_STRING));
3183         purple_signal_register(handle, "account-authorization-denied",
3184                                                 purple_marshal_VOID__POINTER_POINTER, NULL, 2,
3185                                                 purple_value_new(PURPLE_TYPE_SUBTYPE,
3186                                                                                 PURPLE_SUBTYPE_ACCOUNT),
3187                                                 purple_value_new(PURPLE_TYPE_STRING));
3188
3189         purple_signal_register(handle, "account-authorization-granted",
3190                                                 purple_marshal_VOID__POINTER_POINTER, NULL, 2,
3191                                                 purple_value_new(PURPLE_TYPE_SUBTYPE,
3192                                                                                 PURPLE_SUBTYPE_ACCOUNT),
3193                                                 purple_value_new(PURPLE_TYPE_STRING));
3194
3195         purple_signal_register(handle, "account-error-changed",
3196                                purple_marshal_VOID__POINTER_POINTER_POINTER,
3197                                NULL, 3,
3198                                purple_value_new(PURPLE_TYPE_SUBTYPE,
3199                                                 PURPLE_SUBTYPE_ACCOUNT),
3200                                purple_value_new(PURPLE_TYPE_POINTER),
3201                                purple_value_new(PURPLE_TYPE_POINTER));
3202
3203         purple_signal_register(handle, "account-signed-on",
3204                                purple_marshal_VOID__POINTER, NULL, 1,
3205                                purple_value_new(PURPLE_TYPE_SUBTYPE,
3206                                                 PURPLE_SUBTYPE_ACCOUNT));
3207
3208         purple_signal_register(handle, "account-signed-off",
3209                                purple_marshal_VOID__POINTER, NULL, 1,
3210                                purple_value_new(PURPLE_TYPE_SUBTYPE,
3211                                                 PURPLE_SUBTYPE_ACCOUNT));
3212
3213         purple_signal_register(handle, "account-connection-error",
3214                                purple_marshal_VOID__POINTER_INT_POINTER, NULL, 3,
3215                                purple_value_new(PURPLE_TYPE_SUBTYPE,
3216                                                 PURPLE_SUBTYPE_ACCOUNT),
3217                                purple_value_new(PURPLE_TYPE_ENUM),
3218                                purple_value_new(PURPLE_TYPE_STRING));
3219
3220         purple_signal_connect(conn_handle, "signed-on", handle,
3221                               PURPLE_CALLBACK(signed_on_cb), NULL);
3222         purple_signal_connect(conn_handle, "signed-off", handle,
3223                               PURPLE_CALLBACK(signed_off_cb), NULL);
3224         purple_signal_connect(conn_handle, "connection-error", handle,
3225                               PURPLE_CALLBACK(connection_error_cb), NULL);
3226
3227         load_accounts();
3228
3229 }
3230
3231 void
3232 purple_accounts_uninit(void)
3233 {
3234         gpointer handle = purple_accounts_get_handle();
3235         if (save_timer != 0)
3236         {
3237                 purple_timeout_remove(save_timer);
3238                 save_timer = 0;
3239                 sync_accounts();
3240         }
3241
3242         for (; accounts; accounts = g_list_delete_link(accounts, accounts))
3243                 purple_account_destroy(accounts->data);
3244
3245         purple_signals_disconnect_by_handle(handle);
3246         purple_signals_unregister_by_instance(handle);
3247 }