apps/irssi/src/silc/core/silc-core.c

   1 /*
   2
   3   silc-core.c
   4
   5   Author: Pekka Riikonen <priikone@silcnet.org>
   6
   7   Copyright (C) 2001 - 2007 Pekka Riikonen
   8
   9   This program is free software; you can redistribute it and/or modify
  10   it under the terms of the GNU General Public License as published by
  11   the Free Software Foundation; either version 2 of the License, or
  12   (at your option) any later version.
  13
  14   This program is distributed in the hope that it will be useful,
  15   but WITHOUT ANY WARRANTY; without even the implied warranty of
  16   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  17   GNU General Public License for more details.
  18
  19 */
  20
  21 #include "module.h"
  22 #include "chat-protocols.h"
  23 #include "args.h"
  24
  25 #include "chatnets.h"
  26 #include "servers-setup.h"
  27 #include "channels-setup.h"
  28 #include "silc-servers.h"
  29 #include "silc-channels.h"
  30 #include "silc-queries.h"
  31 #include "silc-nicklist.h"
  32 #include "silc-chatnets.h"
  33 #include "silc-cmdqueue.h"
  34 #include "silc-commands.h"
  35
  36 #include "signals.h"
  37 #include "levels.h"
  38 #include "settings.h"
  39 #include "commands.h"
  40 #include "fe-common/core/printtext.h"
  41 #include "fe-common/core/fe-channels.h"
  42 #include "fe-common/core/keyboard.h"
  43 #include "fe-common/silc/module-formats.h"
  44
  45 #ifndef SILC_PLUGIN
  46 /* Command line option variables */
  47 static char *opt_pkcs = NULL;
  48 static int opt_bits = 0;
  49 #else
  50 static int init_failed = 0;
  51 #endif
  52
  53 static int running = 0;
  54
  55 /* SILC Client */
  56 SilcClient silc_client = NULL;
  57 extern SilcClientOperations ops;
  58
  59 /* Our keypair */
  60 SilcPublicKey irssi_pubkey = NULL;
  61 SilcPrivateKey irssi_privkey = NULL;
  62
  63 char *opt_nickname = NULL;
  64 char *opt_hostname = NULL;
  65
  66 /* Default hash function */
  67 SilcHash sha1hash = NULL;
  68
  69 void silc_expandos_init(void);
  70 void silc_expandos_deinit(void);
  71
  72 void silc_lag_init(void);
  73 void silc_lag_deinit(void);
  74
  75 #ifdef SILC_PLUGIN
  76 void silc_core_deinit(void);
  77 #endif
  78
  79 static gboolean my_silc_scheduler(gpointer data)
  80 {
  81   SILC_LOG_DEBUG(("Timeout"));
  82   silc_client_run_one(silc_client);
  83   return FALSE;
  84 }
  85
  86 static gboolean my_silc_scheduler_fd(GIOChannel *source,
  87                                      GIOCondition condition,
  88                                      gpointer data)
  89 {
  90   SILC_LOG_DEBUG(("I/O event, %d", SILC_PTR_TO_32(data)));
  91   silc_client_run_one(silc_client);
  92   return TRUE;
  93 }
  94
  95 static void scheduler_notify_cb(SilcSchedule schedule,
  96                                 SilcBool added, SilcTask task,
  97                                 SilcBool fd_task, SilcUInt32 fd,
  98                                 SilcTaskEvent event,
  99                                 long seconds, long useconds,
 100                                 void *context)
 101 {
 102   if (added) {
 103     if (fd_task) {
 104       /* Add fd */
 105       GIOChannel *ch;
 106       guint e = 0;
 107
 108       SILC_LOG_DEBUG(("Add fd %d, events %d", fd, event));
 109       g_source_remove_by_user_data(SILC_32_TO_PTR(fd));
 110
 111       if (event & SILC_TASK_READ)
 112         e |= (G_IO_IN | G_IO_PRI | G_IO_HUP | G_IO_ERR);
 113       if (event & SILC_TASK_WRITE)
 114         e |= (G_IO_OUT | G_IO_HUP | G_IO_ERR | G_IO_NVAL);
 115
 116       if (e) {
 117         ch = g_io_channel_unix_new(fd);
 118         g_io_add_watch(ch, e, my_silc_scheduler_fd, SILC_32_TO_PTR(fd));
 119         g_io_channel_unref(ch);
 120       }
 121     } else {
 122       /* Add timeout */
 123       guint t;
 124
 125       t = (seconds * 1000) + (useconds / 1000);
 126       SILC_LOG_DEBUG(("interval %d msec", t));
 127       g_timeout_add(t, my_silc_scheduler, NULL);
 128     }
 129   } else {
 130     if (fd_task) {
 131       /* Remove fd */
 132       g_source_remove_by_user_data(SILC_32_TO_PTR(fd));
 133     }
 134   }
 135 }
 136
 137 static CHATNET_REC *create_chatnet(void)
 138 {
 139   return g_malloc0(sizeof(CHATNET_REC));
 140 }
 141
 142 static SERVER_SETUP_REC *create_server_setup(void)
 143 {
 144   return g_malloc0(sizeof(SERVER_SETUP_REC));
 145 }
 146
 147 static CHANNEL_SETUP_REC *create_channel_setup(void)
 148 {
 149   return g_malloc0(sizeof(CHANNEL_SETUP_REC));
 150 }
 151
 152 static SERVER_CONNECT_REC *create_server_connect(void)
 153 {
 154   return g_malloc0(sizeof(SILC_SERVER_CONNECT_REC));
 155 }
 156
 157 static void destroy_server_connect(SERVER_CONNECT_REC *conn)
 158 {
 159
 160 }
 161
 162 /* Checks user information and saves them to the config file it they
 163    do not exist there already. */
 164
 165 static void silc_init_userinfo(void)
 166 {
 167   const char *set, *nick, *user_name, *str;
 168   char *tmp;
 169
 170   /* check if nick/username/realname wasn't read from setup.. */
 171   set = settings_get_str("real_name");
 172   if (set == NULL || *set == '\0') {
 173     str = g_getenv("SILCNAME");
 174     if (!str)
 175       str = g_getenv("IRCNAME");
 176     settings_set_str("real_name",
 177                      str != NULL ? str : silc_get_real_name());
 178   }
 179
 180   /* Check that real name is UTF-8 encoded */
 181   set = settings_get_str("real_name");
 182   if (!silc_utf8_valid(set, strlen(set))) {
 183     int len = silc_utf8_encoded_len(set, strlen(set), SILC_STRING_LOCALE);
 184     tmp = silc_calloc(len, sizeof(*tmp));
 185     if (tmp) {
 186       silc_utf8_encode(set, strlen(set), SILC_STRING_LOCALE, tmp, len);
 187       settings_set_str("real_name", tmp);
 188       silc_free(tmp);
 189     }
 190   }
 191
 192   /* username */
 193   user_name = settings_get_str("user_name");
 194   if (user_name == NULL || *user_name == '\0') {
 195     str = g_getenv("SILCUSER");
 196     if (!str)
 197       str = g_getenv("IRCUSER");
 198     settings_set_str("user_name",
 199                      str != NULL ? str : silc_get_username());
 200
 201     user_name = settings_get_str("user_name");
 202   }
 203
 204   /* nick */
 205   nick = settings_get_str("nick");
 206   if (nick == NULL || *nick == '\0') {
 207     str = g_getenv("SILCNICK");
 208     if (!str)
 209       str = g_getenv("IRCNICK");
 210     settings_set_str("nick", str != NULL ? str : user_name);
 211
 212     nick = settings_get_str("nick");
 213   }
 214
 215   /* alternate nick */
 216   set = settings_get_str("alternate_nick");
 217   if (set == NULL || *set == '\0') {
 218     tmp = g_strconcat(nick, "_", NULL);
 219     settings_set_str("alternate_nick", tmp);
 220     g_free(tmp);
 221   }
 222
 223   /* host name */
 224   set = settings_get_str("hostname");
 225   if (set == NULL || *set == '\0') {
 226     str = g_getenv("SILCHOST");
 227     if (!str)
 228       str = g_getenv("IRCHOST");
 229     if (str != NULL)
 230       settings_set_str("hostname", str);
 231   }
 232 }
 233
 234 #if defined(SILC_DEBUG) || defined(SILC_PLUGIN)
 235 static bool i_debug;
 236 #endif
 237
 238 #ifdef SILC_DEBUG
 239 static bool silc_irssi_debug_print(char *file, char *function, int line,
 240                                    char *message, void *context)
 241 {
 242   printtext(NULL, NULL, MSGLEVEL_CLIENTCRAP,
 243             "DEBUG: %s:%d: %s", function, line, message);
 244   return TRUE;
 245 }
 246 #endif
 247
 248 static void sig_setup_changed(void)
 249 {
 250 #ifdef SILC_DEBUG
 251   bool debug = settings_get_bool("debug");
 252   if (debug) {
 253     const char *debug_string = settings_get_str("debug_string");
 254     i_debug = TRUE;
 255     silc_log_debug(TRUE);
 256     if (strlen(debug_string))
 257       silc_log_set_debug_string(debug_string);
 258     silc_log_set_debug_callbacks(silc_irssi_debug_print, NULL, NULL, NULL);
 259     return;
 260   }
 261   if (i_debug)
 262     silc_log_debug(FALSE);
 263 #endif
 264 }
 265
 266 /* Log callbacks */
 267
 268 static bool silc_log_misc(SilcLogType type, char *message, void *context)
 269 {
 270   printtext(NULL, NULL, MSGLEVEL_CLIENTCRAP, "%s: %s",
 271             (type == SILC_LOG_INFO ? "[Info]" :
 272              type == SILC_LOG_WARNING ? "[Warning]" : "[Error]"), message);
 273   return TRUE;
 274 }
 275
 276 static bool silc_log_stderr(SilcLogType type, char *message, void *context)
 277 {
 278   fprintf(stderr, "%s: %s\n",
 279           (type == SILC_LOG_INFO ? "[Info]" :
 280            type == SILC_LOG_WARNING ? "[Warning]" : "[Error]"), message);
 281   return TRUE;
 282 }
 283
 284 static void silc_register_cipher(SilcClient client, const char *cipher)
 285 {
 286   int i;
 287
 288   if (cipher) {
 289     for (i = 0; silc_default_ciphers[i].name; i++)
 290       if (!strcmp(silc_default_ciphers[i].name, cipher)) {
 291         silc_cipher_register(&(silc_default_ciphers[i]));
 292         break;
 293       }
 294
 295     if (!silc_cipher_is_supported(cipher)) {
 296       SILC_LOG_ERROR(("Unknown cipher `%s'", cipher));
 297 #ifdef SILC_PLUGIN
 298       init_failed = -1;
 299       return;
 300 #else
 301       exit(1);
 302 #endif
 303     }
 304   }
 305 }
 306
 307 static void silc_register_hash(SilcClient client, const char *hash)
 308 {
 309   int i;
 310
 311   if (hash) {
 312     for (i = 0; silc_default_hash[i].name; i++)
 313       if (!strcmp(silc_default_hash[i].name, hash)) {
 314         silc_hash_register(&(silc_default_hash[i]));
 315         break;
 316       }
 317
 318     if (!silc_hash_is_supported(hash)) {
 319       SILC_LOG_ERROR(("Unknown hash function `%s'", hash));
 320 #ifdef SILC_PLUGIN
 321       init_failed = -1;
 322       return;
 323 #else
 324       exit(1);
 325 #endif
 326     }
 327   }
 328 }
 329
 330 static void silc_register_hmac(SilcClient client, const char *hmac)
 331 {
 332   int i;
 333
 334   if (hmac) {
 335     for (i = 0; silc_default_hmacs[i].name; i++)
 336       if (!strcmp(silc_default_hmacs[i].name, hmac)) {
 337         silc_hmac_register(&(silc_default_hmacs[i]));
 338         break;
 339       }
 340
 341     if (!silc_hmac_is_supported(hmac)) {
 342       SILC_LOG_ERROR(("Unknown HMAC `%s'", hmac));
 343 #ifdef SILC_PLUGIN
 344       init_failed = -1;
 345       return;
 346 #else
 347       exit(1);
 348 #endif
 349     }
 350   }
 351 }
 352
 353 /* Finalize init. Init finish signal calls this. */
 354
 355 #ifdef SILC_PLUGIN
 356 #define FUNCTION_EXIT goto out
 357 void silc_opt_callback(const char *data, SERVER_REC *server,
 358                         WI_ITEM_REC *item)
 359 #else
 360 #define FUNCTION_EXIT exit(0)
 361 void silc_opt_callback(poptContext con,
 362                        enum poptCallbackReason reason,
 363                        const struct poptOption *opt,
 364                        const char *arg, void *data)
 365 #endif
 366 {
 367 #ifdef SILC_PLUGIN
 368   unsigned char **argv=NULL, *tmp;
 369   SilcUInt32 *argv_lens=NULL, *argv_types=NULL, argc=0;
 370   int i;
 371   unsigned char privkey[128], pubkey[128];
 372
 373   memset(privkey, 0, sizeof(privkey));
 374   memset(pubkey, 0, sizeof(pubkey));
 375   snprintf(pubkey, sizeof(pubkey) - 1, "%s/%s", get_irssi_dir(),
 376            SILC_CLIENT_PUBLIC_KEY_NAME);
 377   snprintf(privkey, sizeof(privkey) - 1, "%s/%s", get_irssi_dir(),
 378            SILC_CLIENT_PRIVATE_KEY_NAME);
 379
 380   tmp = g_strconcat("SILC", " ", data, NULL);
 381   silc_parse_command_line(tmp, &argv, &argv_lens, &argv_types, &argc, 6);
 382   g_free(tmp);
 383
 384   if (argc < 2)
 385     goto err;
 386 #else
 387   if (strcmp(opt->longName, "nick") == 0) {
 388     g_free(opt_nickname);
 389     opt_nickname = g_strdup(arg);
 390   }
 391
 392   if (strcmp(opt->longName, "hostname") == 0) {
 393     silc_free(opt_hostname);
 394     opt_hostname = strdup(arg);
 395   }
 396 #endif
 397
 398 #ifdef SILC_PLUGIN
 399   if ((argc == 2) && (strcasecmp(argv[1], "list-ciphers") == 0)) {
 400 #else
 401   if (strcmp(opt->longName, "list-ciphers") == 0) {
 402 #endif
 403     silc_client_list_ciphers();
 404     FUNCTION_EXIT;
 405   }
 406
 407 #ifdef SILC_PLUGIN
 408   if ((argc == 2) && (strcasecmp(argv[1], "list-hash-funcs") == 0)) {
 409 #else
 410   if (strcmp(opt->longName, "list-hash-funcs") == 0) {
 411 #endif
 412     silc_client_list_hash_funcs();
 413     FUNCTION_EXIT;
 414   }
 415
 416 #ifdef SILC_PLUGIN
 417   if ((argc == 2) && (strcasecmp(argv[1], "list-hmacs") == 0)) {
 418 #else
 419   if (strcmp(opt->longName, "list-hmacs") == 0) {
 420 #endif
 421     silc_client_list_hmacs();
 422     FUNCTION_EXIT;
 423   }
 424
 425 #ifdef SILC_PLUGIN
 426   if ((argc == 2) && (strcasecmp(argv[1], "list-pkcs") == 0)) {
 427 #else
 428   if (strcmp(opt->longName, "list-pkcs") == 0) {
 429 #endif
 430     silc_client_list_pkcs();
 431     FUNCTION_EXIT;
 432   }
 433
 434 #ifdef SILC_PLUGIN
 435   if ((argc < 5) && (strcasecmp(argv[1], "debug") == 0)) {
 436 #else
 437   if (strcmp(opt->longName, "debug") == 0) {
 438     silc_log_debug(TRUE);
 439     silc_log_debug_hexdump(TRUE);
 440     silc_log_set_debug_string(arg);
 441 #endif
 442 #ifdef SILC_PLUGIN
 443     if (argc == 2) {
 444       printformat_module("fe-common/silc", NULL, NULL,
 445                          MSGLEVEL_CRAP, SILCTXT_CONFIG_DEBUG,
 446                          (i_debug == TRUE ? "enabled" : "disabled"));
 447       goto out;
 448     }
 449 #endif
 450 #ifndef SILC_DEBUG
 451 #ifdef SILC_PLUGIN
 452     printformat_module("fe-common/silc", NULL, NULL,
 453                        MSGLEVEL_CRAP, SILCTXT_CONFIG_NODEBUG);
 454 #else
 455     fprintf(stdout,
 456             "Run-time debugging is not enabled. To enable it recompile\n"
 457             "the client with --enable-debug configuration option.\n");
 458     sleep(1);
 459 #endif
 460 #else
 461 #ifdef SILC_PLUGIN
 462     if (strcasecmp(argv[2], "on") == 0) {
 463       settings_set_bool("debug", TRUE);
 464       if (argc == 4)
 465          settings_set_str("debug_string", argv[3]);
 466     } else if ((argc == 3) && (strcasecmp(argv[2], "off") == 0)) {
 467       settings_set_bool("debug", FALSE);
 468     } else
 469       goto err;
 470     sig_setup_changed();
 471     printformat_module("fe-common/silc", NULL, NULL,
 472                        MSGLEVEL_CRAP, SILCTXT_CONFIG_DEBUG,
 473                        (settings_get_bool("debug") == TRUE ?
 474                         "enabled" : "disabled"));
 475     goto out;
 476 #endif
 477 #endif
 478   }
 479
 480 #ifdef SILC_PLUGIN
 481   if (strcasecmp(argv[1], "create-key-pair") == 0) {
 482 #else
 483   if (strcmp(opt->longName, "create-key-pair") == 0) {
 484 #endif
 485     /* Create new key pair and exit */
 486 #ifdef SILC_PLUGIN
 487     char *endptr, *pkcs=NULL;
 488     long int val;
 489     int bits=0;
 490     CREATE_KEY_REC *rec;
 491
 492     if ((argc == 3) || (argc == 5))
 493       goto err;
 494
 495     for (i=2; i<argc-1; i+=2)
 496       if (strcasecmp(argv[i], "-pkcs") == 0) {
 497         if (pkcs == NULL)
 498           pkcs = argv[i+1];
 499         else
 500           goto err;
 501       } else if (strcasecmp(argv[i], "-bits") == 0) {
 502         if (bits == 0) {
 503           val = strtol(argv[i+1], &endptr, 10);
 504           if ((*endptr != '\0') || (val <= 0) || (val >= INT_MAX))
 505             goto err;
 506           bits = val;
 507         } else
 508           goto err;
 509       } else
 510         goto err;
 511
 512     rec = g_new0(CREATE_KEY_REC, 1);
 513     rec->pkcs = (pkcs == NULL ? NULL : g_strdup(pkcs));
 514     rec->bits = bits;
 515
 516     keyboard_entry_redirect((SIGNAL_FUNC) create_key_passphrase,
 517                             format_get_text("fe-common/silc", NULL, NULL,
 518                                             NULL, SILCTXT_CONFIG_PASS_ASK2),
 519                             ENTRY_REDIRECT_FLAG_HIDDEN, rec);
 520     printformat_module("fe-common/silc", NULL, NULL,
 521                        MSGLEVEL_CRAP, SILCTXT_CONFIG_NEXTTIME);
 522     goto out;
 523 #else
 524     silc_crypto_init(NULL);
 525     silc_create_key_pair(opt_pkcs, opt_bits, NULL, NULL,
 526                          NULL, NULL, NULL, NULL, TRUE);
 527     exit(0);
 528 #endif
 529   }
 530
 531 #ifdef SILC_PLUGIN
 532   if ((argc < 4) && (strcasecmp(argv[1], "passphrase-change") == 0)) {
 533 #else
 534   if (strcmp(opt->longName, "passphrase-change") == 0) {
 535 #endif
 536     /* Change the passphrase of the private key file */
 537 #ifdef SILC_PLUGIN
 538     CREATE_KEY_REC *rec;
 539
 540     rec = g_new0(CREATE_KEY_REC, 1);
 541     rec->file = g_strdup((argc == 3 ? argv[2] : privkey));
 542
 543     keyboard_entry_redirect((SIGNAL_FUNC) change_private_key_passphrase,
 544                             format_get_text("fe-common/silc", NULL, NULL,
 545                                             NULL, SILCTXT_CONFIG_PASS_ASK1),
 546                             ENTRY_REDIRECT_FLAG_HIDDEN, rec);
 547     goto out;
 548 #else
 549     silc_crypto_init(NULL);
 550     silc_change_private_key_passphrase(arg, NULL, NULL);
 551     exit(0);
 552 #endif
 553   }
 554
 555 #ifndef SILC_PLUGIN
 556   if (strcmp(opt->longName, "show-key") == 0) {
 557     /* Dump the key */
 558     silc_crypto_init(NULL);
 559     silc_show_public_key_file((char *)arg);
 560     exit(0);
 561   }
 562 #endif
 563
 564 #ifdef SILC_PLUGIN
 565 err:
 566   printformat_module("fe-common/silc", NULL, NULL,
 567                      MSGLEVEL_CRAP, SILCTXT_CONFIG_UNKNOWN,
 568                      data);
 569
 570 out:
 571   for (i=0; i<argc; i++)
 572     silc_free(argv[i]);
 573
 574   silc_free(argv);
 575   silc_free(argv_lens);
 576   silc_free(argv_types);
 577 #endif
 578 }
 579 #undef FUNCTION_EXIT
 580
 581 /* Called to indicate the client library has stopped. */
 582 static void
 583 silc_stopped(SilcClient client, void *context)
 584 {
 585   SILC_LOG_DEBUG(("Client library has stopped"));
 586   *(int*)context = -1;
 587 }
 588
 589 /* Called to indicate the client library is running. */
 590
 591 static void
 592 silc_running(SilcClient client, void *context)
 593 {
 594   running = 1;
 595   SILC_LOG_DEBUG(("Client library is running"));
 596 }
 597
 598 static void sig_init_finished(void)
 599 {
 600   /* Check ~/.silc directory and public and private keys */
 601   if (!silc_client_check_silc_dir()) {
 602 #ifdef SILC_PLUGIN
 603     init_failed = -1;
 604 #else
 605     sleep(1);
 606     exit(1);
 607 #endif
 608     return;
 609   }
 610
 611   /* Load public and private key */
 612   if (!silc_client_load_keys(silc_client)) {
 613 #ifdef SILC_PLUGIN
 614     init_failed = -1;
 615 #else
 616     sleep(1);
 617     exit(1);
 618 #endif
 619     return;
 620   }
 621
 622   /* Initialize the SILC client */
 623   opt_hostname = (opt_hostname ? opt_hostname : silc_net_localhost());
 624   if (!silc_client_init(silc_client, settings_get_str("user_name"),
 625                         opt_hostname, settings_get_str("real_name"),
 626                         silc_running, NULL)) {
 627 #ifdef SILC_PLUGIN
 628     init_failed = -1;
 629 #else
 630     sleep(1);
 631     exit(1);
 632 #endif
 633     return;
 634   }
 635
 636   silc_schedule_set_notify(silc_client->schedule, scheduler_notify_cb, NULL);
 637
 638   silc_log_set_callback(SILC_LOG_INFO, silc_log_misc, NULL);
 639   silc_log_set_callback(SILC_LOG_WARNING, silc_log_misc, NULL);
 640   silc_log_set_callback(SILC_LOG_ERROR, silc_log_misc, NULL);
 641   silc_log_set_callback(SILC_LOG_FATAL, silc_log_misc, NULL);
 642
 643   silc_hash_alloc("sha1", &sha1hash);
 644
 645   /* Run SILC scheduler */
 646   my_silc_scheduler(NULL);
 647 }
 648
 649 /* Init SILC. Called from src/fe-text/silc.c */
 650
 651 void silc_core_init(void)
 652 {
 653 #ifndef SILC_PLUGIN
 654   static struct poptOption silc_options[] = {
 655     { NULL, '\0', POPT_ARG_CALLBACK, (void *)&silc_opt_callback, '\0', NULL },
 656     { "list-ciphers", 0, POPT_ARG_NONE, NULL, 0,
 657       "List supported ciphers", NULL },
 658     { "list-hash-funcs", 0, POPT_ARG_NONE, NULL, 0,
 659       "List supported hash functions", NULL },
 660     { "list-hmacs", 0, POPT_ARG_NONE, NULL, 0,
 661       "List supported HMACs", NULL },
 662     { "list-pkcs", 0, POPT_ARG_NONE, NULL, 0,
 663       "List supported PKCSs", NULL },
 664 #ifdef SILC_DEBUG
 665     { "debug", 'd', POPT_ARG_STRING, NULL, 0,
 666       "Enable debugging", "STRING" },
 667 #endif /* SILC_DEBUG */
 668     { "create-key-pair", 'C', POPT_ARG_NONE, NULL, 0,
 669       "Create new public key pair", NULL },
 670     { "pkcs", 0, POPT_ARG_STRING, &opt_pkcs, 0,
 671       "Set the PKCS of the public key pair (-C)", "PKCS" },
 672     { "bits", 0, POPT_ARG_INT, &opt_bits, 0,
 673       "Set the length of the public key pair (-C)", "VALUE" },
 674     { "passphrase-change", 'P', POPT_ARG_STRING, NULL, 0,
 675       "Change the passphrase of private key file", "FILE" },
 676     { "show-key", 'S', POPT_ARG_STRING, NULL, 0,
 677       "Show the contents of the public key", "FILE" },
 678     { NULL, '\0', 0, NULL }
 679   };
 680 #endif
 681
 682   CHAT_PROTOCOL_REC *rec;
 683   SilcClientParams params;
 684   const char *def_cipher, *def_hash, *def_hmac;
 685
 686 #ifndef SILC_PLUGIN
 687   args_register(silc_options);
 688 #endif
 689
 690   /* Settings */
 691 #ifndef SILC_PLUGIN
 692   settings_add_bool("server", "skip_motd", FALSE);
 693   settings_add_str("server", "alternate_nick", NULL);
 694 #endif
 695   settings_add_bool("server", "use_auto_addr", FALSE);
 696   settings_add_str("server", "auto_bind_ip", "");
 697   settings_add_str("server", "auto_public_ip", "");
 698   settings_add_int("server", "auto_bind_port", 0);
 699   settings_add_str("server", "crypto_default_cipher", SILC_DEFAULT_CIPHER);
 700   settings_add_str("server", "crypto_default_hash", SILC_DEFAULT_HASH);
 701   settings_add_str("server", "crypto_default_hmac", SILC_DEFAULT_HMAC);
 702   settings_add_int("server", "key_exchange_timeout_secs", 120);
 703   settings_add_int("server", "key_exchange_rekey_secs", 3600);
 704   settings_add_bool("server", "key_exchange_rekey_pfs", FALSE);
 705   settings_add_int("server", "heartbeat", 300);
 706   settings_add_bool("server", "ignore_message_signatures", FALSE);
 707   settings_add_str("server", "session_filename", "session.$chatnet");
 708   settings_add_bool("server", "sign_channel_messages", FALSE);
 709   settings_add_bool("server", "sign_private_messages", FALSE);
 710   settings_add_str("silc", "nickname_format", "%n#%a");
 711
 712   /* Requested Attributes settings */
 713   settings_add_bool("silc", "attr_allow", TRUE);
 714   settings_add_str("silc", "attr_vcard", "");
 715   settings_add_str("silc", "attr_services", "");
 716   settings_add_str("silc", "attr_status_mood", "NORMAL");
 717   settings_add_str("silc", "attr_status_text", "");
 718   settings_add_str("silc", "attr_status_message", NULL);
 719   settings_add_str("silc", "attr_preferred_language", "");
 720   settings_add_str("silc", "attr_preferred_contact", "CHAT");
 721   settings_add_bool("silc", "attr_timezone", TRUE);
 722   settings_add_str("silc", "attr_geolocation", "");
 723   settings_add_str("silc", "attr_device_info", NULL);
 724   settings_add_str("silc", "attr_public_keys", "");
 725
 726 #ifdef SILC_DEBUG
 727   settings_add_bool("debug", "debug", FALSE);
 728   settings_add_str("debug", "debug_string", "");
 729 #endif
 730
 731   signal_add("setup changed", (SIGNAL_FUNC) sig_setup_changed);
 732 #ifndef SILC_PLUGIN
 733   signal_add("irssi init finished", (SIGNAL_FUNC) sig_init_finished);
 734 #endif
 735
 736 #if defined (SILC_PLUGIN) && defined (SILC_DEBUG)
 737   if (settings_get_bool("debug") == TRUE)
 738     sig_setup_changed();
 739 #endif
 740
 741   silc_init_userinfo();
 742
 743   silc_log_set_callback(SILC_LOG_INFO, silc_log_stderr, NULL);
 744   silc_log_set_callback(SILC_LOG_WARNING, silc_log_stderr, NULL);
 745   silc_log_set_callback(SILC_LOG_ERROR, silc_log_stderr, NULL);
 746   silc_log_set_callback(SILC_LOG_FATAL, silc_log_stderr, NULL);
 747
 748   /* Initialize client parameters */
 749   memset(&params, 0, sizeof(params));
 750   strcat(params.nickname_format, settings_get_str("nickname_format"));
 751   params.full_channel_names = TRUE;
 752
 753   /* Allocate SILC client */
 754   silc_client = silc_client_alloc(&ops, &params, NULL, silc_version_string);
 755
 756   /* Get the ciphers and stuff from config file */
 757   def_cipher = settings_get_str("crypto_default_cipher");
 758   def_hash = settings_get_str("crypto_default_hash");
 759   def_hmac = settings_get_str("crypto_default_hmac");
 760   silc_register_cipher(silc_client, def_cipher);
 761 #ifdef SILC_PLUGIN
 762   if (init_failed)
 763     return;
 764 #endif
 765   silc_register_hash(silc_client, def_hash);
 766 #ifdef SILC_PLUGIN
 767   if (init_failed)
 768     return;
 769 #endif
 770   silc_register_hmac(silc_client, def_hmac);
 771 #ifdef SILC_PLUGIN
 772   if (init_failed)
 773     return;
 774 #endif
 775
 776 #ifdef SILC_PLUGIN
 777   command_bind("silc", MODULE_NAME, (SIGNAL_FUNC) silc_opt_callback);
 778 #endif
 779
 780   /* Register SILC to the irssi */
 781   rec = g_new0(CHAT_PROTOCOL_REC, 1);
 782   rec->name = "SILC";
 783   rec->fullname = "Secure Internet Live Conferencing";
 784   rec->chatnet = "silcnet";
 785   rec->create_chatnet = create_chatnet;
 786   rec->create_server_setup = create_server_setup;
 787   rec->create_channel_setup = create_channel_setup;
 788   rec->create_server_connect = create_server_connect;
 789   rec->destroy_server_connect = destroy_server_connect;
 790   rec->server_init_connect = silc_server_init_connect;
 791   rec->server_connect = silc_server_connect;
 792   rec->channel_create = (CHANNEL_REC *(*) (SERVER_REC *, const char *,
 793                                            const char *, int))
 794     silc_channel_create;
 795   rec->query_create = (QUERY_REC *(*) (const char *, const char *, int))
 796     silc_query_create;
 797
 798   chat_protocol_register(rec);
 799   g_free(rec);
 800
 801   silc_queue_init();
 802   silc_server_init();
 803   silc_channels_init();
 804   silc_queries_init();
 805   silc_expandos_init();
 806   silc_lag_init();
 807   silc_chatnets_init();
 808
 809 #ifdef SILC_PLUGIN
 810   sig_init_finished();
 811   if (init_failed) {
 812     silc_core_deinit();
 813     return;
 814   }
 815 #endif
 816
 817   module_register("silc", "core");
 818 }
 819
 820 /* Deinit SILC. Called from src/fe-text/silc.c */
 821
 822 void silc_core_deinit(void)
 823 {
 824   if (running) {
 825     volatile int stopped = 0;
 826     silc_client_stop(silc_client, silc_stopped, (void *)&stopped);
 827     while (!stopped)
 828       silc_client_run_one(silc_client);
 829   }
 830
 831   if (opt_hostname)
 832     silc_free(opt_hostname);
 833   if (opt_nickname)
 834     g_free(opt_nickname);
 835
 836   signal_remove("setup changed", (SIGNAL_FUNC) sig_setup_changed);
 837 #ifdef SILC_PLUGIN
 838   command_unbind("silc", (SIGNAL_FUNC) silc_opt_callback);
 839 #else
 840   signal_remove("irssi init finished", (SIGNAL_FUNC) sig_init_finished);
 841 #endif
 842
 843   signal_emit("chat protocol deinit", 1, chat_protocol_find("SILC"));
 844
 845   silc_hash_free(sha1hash);
 846
 847   silc_queue_deinit();
 848   silc_server_deinit();
 849   silc_channels_deinit();
 850   silc_queries_deinit();
 851   silc_expandos_deinit();
 852   silc_lag_deinit();
 853   silc_chatnets_deinit();
 854
 855   chat_protocol_unregister("SILC");
 856
 857   if (irssi_pubkey)
 858     silc_pkcs_public_key_free(irssi_pubkey);
 859   if (irssi_privkey)
 860     silc_pkcs_private_key_free(irssi_privkey);
 861   silc_client_free(silc_client);
 862 }