lib/silcclient/client_connect.c

   1 /*
   2
   3   client_st_connect.c
   4
   5   Author: Pekka Riikonen <priikone@silcnet.org>
   6
   7   Copyright (C) 2006 - 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; version 2 of the License.
  12
  13   This program is distributed in the hope that it will be useful,
  14   but WITHOUT ANY WARRANTY; without even the implied warranty of
  15   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16   GNU General Public License for more details.
  17
  18 */
  19
  20 #include "silc.h"
  21 #include "silcclient.h"
  22 #include "client_internal.h"
  23
  24 /************************ Static utility functions **************************/
  25
  26 /* Callback called after connected to remote host */
  27
  28 static void silc_client_connect_callback(SilcNetStatus status,
  29                                          SilcStream stream, void *context)
  30 {
  31   SilcFSMThread fsm = context;
  32   SilcClientConnection conn = silc_fsm_get_context(fsm);
  33   SilcClient client = conn->client;
  34
  35   conn->internal->op = NULL;
  36   if (conn->internal->verbose) {
  37     switch (status) {
  38     case SILC_NET_OK:
  39       break;
  40     case SILC_NET_UNKNOWN_IP:
  41       client->internal->ops->say(
  42                    client, conn, SILC_CLIENT_MESSAGE_ERROR,
  43                    "Could not connect to host %s: unknown IP address",
  44                    conn->remote_host);
  45       break;
  46     case SILC_NET_UNKNOWN_HOST:
  47       client->internal->ops->say(
  48                    client, conn, SILC_CLIENT_MESSAGE_ERROR,
  49                    "Could not connect to host %s: unknown host name",
  50                    conn->remote_host);
  51       break;
  52     case SILC_NET_HOST_UNREACHABLE:
  53       client->internal->ops->say(
  54                    client, conn, SILC_CLIENT_MESSAGE_ERROR,
  55                    "Could not connect to host %s: network unreachable",
  56                    conn->remote_host);
  57       break;
  58     case SILC_NET_CONNECTION_REFUSED:
  59       client->internal->ops->say(
  60                    client, conn, SILC_CLIENT_MESSAGE_ERROR,
  61                    "Could not connect to host %s: connection refused",
  62                    conn->remote_host);
  63       break;
  64     case SILC_NET_CONNECTION_TIMEOUT:
  65       client->internal->ops->say(
  66                    client, conn, SILC_CLIENT_MESSAGE_ERROR,
  67                    "Could not connect to host %s: connection timeout",
  68                    conn->remote_host);
  69       break;
  70     default:
  71       client->internal->ops->say(
  72                    client, conn, SILC_CLIENT_MESSAGE_ERROR,
  73                    "Could not connect to host %s",
  74                    conn->remote_host);
  75       break;
  76     }
  77   }
  78
  79   if (status != SILC_NET_OK) {
  80     /* Notify application of failure */
  81     SILC_LOG_DEBUG(("Connecting failed"));
  82     conn->internal->status = SILC_CLIENT_CONN_ERROR;
  83     silc_fsm_next(fsm, silc_client_st_connect_error);
  84     SILC_FSM_CALL_CONTINUE(fsm);
  85     return;
  86   }
  87
  88   /* Connection created successfully */
  89   SILC_LOG_DEBUG(("Connected"));
  90   conn->internal->user_stream = stream;
  91   SILC_FSM_CALL_CONTINUE(fsm);
  92 }
  93
  94 /* Called after application has verified remote host's public key */
  95
  96 static void silc_client_ke_verify_key_cb(SilcBool success, void *context)
  97 {
  98   SilcVerifyKeyContext verify = context;
  99
 100   SILC_LOG_DEBUG(("Start"));
 101
 102   /* Call the completion callback back to the SKE */
 103   verify->completion(verify->ske, success ? SILC_SKE_STATUS_OK :
 104                      SILC_SKE_STATUS_UNSUPPORTED_PUBLIC_KEY,
 105                      verify->completion_context);
 106
 107   silc_free(verify);
 108 }
 109
 110 /* Verify remote host's public key */
 111
 112 static void silc_client_ke_verify_key(SilcSKE ske,
 113                                       SilcPublicKey public_key,
 114                                       void *context,
 115                                       SilcSKEVerifyCbCompletion completion,
 116                                       void *completion_context)
 117 {
 118   SilcFSMThread fsm = context;
 119   SilcClientConnection conn = silc_fsm_get_context(fsm);
 120   SilcClient client = conn->client;
 121   SilcVerifyKeyContext verify;
 122
 123   /* If we provided repository for SKE and we got here the key was not
 124      found from the repository. */
 125   if (conn->internal->params.repository &&
 126       !conn->internal->params.verify_notfound) {
 127     completion(ske, SILC_SKE_STATUS_UNSUPPORTED_PUBLIC_KEY,
 128                completion_context);
 129     return;
 130   }
 131
 132   SILC_LOG_DEBUG(("Verify remote public key"));
 133
 134   verify = silc_calloc(1, sizeof(*verify));
 135   if (!verify) {
 136     completion(ske, SILC_SKE_STATUS_UNSUPPORTED_PUBLIC_KEY,
 137                completion_context);
 138     return;
 139   }
 140   verify->ske = ske;
 141   verify->completion = completion;
 142   verify->completion_context = completion_context;
 143
 144   /* Verify public key in application */
 145   client->internal->ops->verify_public_key(client, conn,
 146                                            conn->type, public_key,
 147                                            silc_client_ke_verify_key_cb,
 148                                            verify);
 149 }
 150
 151 /* Key exchange protocol completion callback */
 152
 153 static void silc_client_ke_completion(SilcSKE ske,
 154                                       SilcSKEStatus status,
 155                                       SilcSKESecurityProperties prop,
 156                                       SilcSKEKeyMaterial keymat,
 157                                       SilcSKERekeyMaterial rekey,
 158                                       void *context)
 159 {
 160   SilcFSMThread fsm = context;
 161   SilcClientConnection conn = silc_fsm_get_context(fsm);
 162   SilcClient client = conn->client;
 163   SilcCipher send_key, receive_key;
 164   SilcHmac hmac_send, hmac_receive;
 165
 166   conn->internal->op = NULL;
 167   if (status != SILC_SKE_STATUS_OK) {
 168     /* Key exchange failed */
 169     SILC_LOG_DEBUG(("Error during key exchange with %s: %s (%d)",
 170                     conn->remote_host, silc_ske_map_status(status), status));
 171
 172     if (conn->internal->verbose)
 173       client->internal->ops->say(client, conn, SILC_CLIENT_MESSAGE_ERROR,
 174                                  "Error during key exchange with %s: %s",
 175                                  conn->remote_host,
 176                                  silc_ske_map_status(status));
 177
 178     conn->internal->status = SILC_CLIENT_CONN_ERROR_KE;
 179     silc_ske_free_rekey_material(rekey);
 180
 181     silc_fsm_next(fsm, silc_client_st_connect_error);
 182     SILC_FSM_CALL_CONTINUE_SYNC(fsm);
 183     return;
 184   }
 185
 186   SILC_LOG_DEBUG(("Setting keys into use"));
 187
 188   /* Allocate the cipher and HMAC contexts */
 189   if (!silc_ske_set_keys(ske, keymat, prop, &send_key, &receive_key,
 190                          &hmac_send, &hmac_receive, &conn->internal->hash)) {
 191     /* Error setting keys */
 192     SILC_LOG_DEBUG(("Could not set keys into use"));
 193
 194     if (conn->internal->verbose)
 195       client->internal->ops->say(
 196                        client, conn, SILC_CLIENT_MESSAGE_ERROR,
 197                        "Error during key exchange with %s: cannot use keys",
 198                        conn->remote_host);
 199
 200     conn->internal->status = SILC_CLIENT_CONN_ERROR_KE;
 201     silc_ske_free_rekey_material(rekey);
 202
 203     silc_fsm_next(fsm, silc_client_st_connect_error);
 204     SILC_FSM_CALL_CONTINUE_SYNC(fsm);
 205     return;
 206   }
 207
 208   /* Set the keys into the packet stream.  After this call packets will be
 209      encrypted with these keys. */
 210   if (!silc_packet_set_keys(conn->stream, send_key, receive_key, hmac_send,
 211                             hmac_receive, FALSE)) {
 212     /* Error setting keys */
 213     SILC_LOG_DEBUG(("Could not set keys into use"));
 214
 215     if (conn->internal->verbose)
 216       client->internal->ops->say(
 217                        client, conn, SILC_CLIENT_MESSAGE_ERROR,
 218                        "Error during key exchange with %s: cannot use keys",
 219                        conn->remote_host);
 220
 221     conn->internal->status = SILC_CLIENT_CONN_ERROR_KE;
 222     silc_ske_free_rekey_material(rekey);
 223
 224     silc_fsm_next(fsm, silc_client_st_connect_error);
 225     SILC_FSM_CALL_CONTINUE_SYNC(fsm);
 226     return;
 227   }
 228
 229   conn->internal->rekey = rekey;
 230
 231   SILC_LOG_DEBUG(("Key Exchange completed"));
 232
 233   /* Key exchange done */
 234   SILC_FSM_CALL_CONTINUE_SYNC(fsm);
 235 }
 236
 237 /* Rekey protocol completion callback */
 238
 239 static void silc_client_rekey_completion(SilcSKE ske,
 240                                          SilcSKEStatus status,
 241                                          SilcSKESecurityProperties prop,
 242                                          SilcSKEKeyMaterial keymat,
 243                                          SilcSKERekeyMaterial rekey,
 244                                          void *context)
 245 {
 246   SilcFSMThread fsm = context;
 247   SilcClientConnection conn = silc_fsm_get_context(fsm);
 248   SilcClient client = conn->client;
 249
 250   conn->internal->op = NULL;
 251   if (status != SILC_SKE_STATUS_OK) {
 252     /* Rekey failed */
 253     SILC_LOG_DEBUG(("Error during rekey with %s: %s (%d)",
 254                     conn->remote_host, silc_ske_map_status(status), status));
 255
 256     if (conn->internal->verbose)
 257       client->internal->ops->say(client, conn, SILC_CLIENT_MESSAGE_ERROR,
 258                                  "Error during rekey with %s: %s",
 259                                  conn->remote_host,
 260                                  silc_ske_map_status(status));
 261
 262     silc_ske_free(conn->internal->ske);
 263     conn->internal->ske = NULL;
 264     silc_fsm_finish(fsm);
 265     return;
 266   }
 267
 268   silc_ske_free_rekey_material(conn->internal->rekey);
 269   conn->internal->rekey = rekey;
 270
 271   silc_ske_free(conn->internal->ske);
 272   conn->internal->ske = NULL;
 273
 274   SILC_LOG_DEBUG(("Rekey completed conn %p", conn));
 275
 276   /* Rekey done */
 277   silc_fsm_finish(fsm);
 278 }
 279
 280 /* Callback called by application to return authentication data */
 281
 282 static void silc_client_connect_auth_method(SilcAuthMethod auth_meth,
 283                                             const void *auth,
 284                                             SilcUInt32 auth_len,
 285                                             void *context)
 286 {
 287   SilcFSMThread fsm = context;
 288   SilcClientConnection conn = silc_fsm_get_context(fsm);
 289
 290   conn->internal->params.auth_method = auth_meth;
 291   if (auth_meth == SILC_AUTH_PASSWORD)
 292     conn->internal->params.auth = silc_memdup(auth, auth_len);
 293   else
 294     conn->internal->params.auth = (void *)auth;
 295   conn->internal->params.auth_len = auth_len;
 296
 297   SILC_FSM_CALL_CONTINUE(fsm);
 298 }
 299
 300 /* Connection authentication completion callback */
 301
 302 static void silc_client_connect_auth_completion(SilcConnAuth connauth,
 303                                                 SilcBool success,
 304                                                 void *context)
 305 {
 306   SilcFSMThread fsm = context;
 307   SilcClientConnection conn = silc_fsm_get_context(fsm);
 308   SilcClient client = conn->client;
 309
 310   conn->internal->op = NULL;
 311   silc_connauth_free(connauth);
 312
 313   if (!success) {
 314     if (conn->internal->verbose)
 315         client->internal->ops->say(
 316                         client, conn, SILC_CLIENT_MESSAGE_ERROR,
 317                         "Authentication failed");
 318
 319     conn->internal->status = SILC_CLIENT_CONN_ERROR_AUTH;
 320     conn->internal->error = SILC_STATUS_ERR_AUTH_FAILED;
 321     silc_fsm_next(fsm, silc_client_st_connect_error);
 322   }
 323
 324   SILC_FSM_CALL_CONTINUE_SYNC(fsm);
 325 }
 326
 327 /********************** CONNECTION_AUTH_REQUEST packet **********************/
 328
 329 /* Received connection authentication request packet.  We get the
 330    required authentication method here. */
 331
 332 SILC_FSM_STATE(silc_client_connect_auth_request)
 333 {
 334   SilcClientConnection conn = fsm_context;
 335   SilcPacket packet = state_context;
 336   SilcUInt16 conn_type, auth_meth;
 337
 338   if (!conn->internal->auth_request) {
 339     silc_packet_free(packet);
 340     return SILC_FSM_FINISH;
 341   }
 342
 343   /* Parse the payload */
 344   if (silc_buffer_unformat(&packet->buffer,
 345                            SILC_STR_UI_SHORT(&conn_type),
 346                            SILC_STR_UI_SHORT(&auth_meth),
 347                            SILC_STR_END) < 0)
 348     auth_meth = SILC_AUTH_NONE;
 349
 350   silc_packet_free(packet);
 351
 352   SILC_LOG_DEBUG(("Resolved authentication method: %s",
 353                   (auth_meth == SILC_AUTH_NONE ? "none" :
 354                    auth_meth == SILC_AUTH_PASSWORD ? "passphrase" :
 355                    "public key")));
 356   conn->internal->params.auth_method = auth_meth;
 357
 358   /* Continue authentication */
 359   silc_fsm_continue_sync(&conn->internal->event_thread);
 360   return SILC_FSM_FINISH;
 361 }
 362
 363 /*************************** Connect remote host ****************************/
 364
 365 /* Connection timeout callback */
 366
 367 SILC_TASK_CALLBACK(silc_client_connect_timeout)
 368 {
 369   SilcClientConnection conn = context;
 370
 371   SILC_LOG_DEBUG(("Connection timeout"));
 372
 373   conn->internal->status = SILC_CLIENT_CONN_ERROR_TIMEOUT;
 374   conn->internal->error = SILC_STATUS_ERR_TIMEDOUT;
 375
 376   silc_fsm_next(&conn->internal->event_thread, silc_client_st_connect_error);
 377   silc_fsm_continue_sync(&conn->internal->event_thread);
 378 }
 379
 380 /* Creates a connection to remote host */
 381
 382 SILC_FSM_STATE(silc_client_st_connect)
 383 {
 384   SilcClientConnection conn = fsm_context;
 385
 386   SILC_LOG_DEBUG(("Connecting to %s:%d", conn->remote_host,
 387                   conn->remote_port));
 388
 389   /** Connect */
 390   silc_fsm_next(fsm, silc_client_st_connect_set_stream);
 391
 392   /* Add connection timeout */
 393   if (conn->internal->params.timeout_secs)
 394     silc_schedule_task_add_timeout(conn->internal->schedule,
 395                                    silc_client_connect_timeout, conn,
 396                                    conn->internal->params.timeout_secs, 0);
 397
 398   if (conn->internal->params.udp) {
 399     SilcStream stream;
 400
 401     if (!conn->internal->params.local_ip) {
 402       /** IP address not given */
 403       SILC_LOG_ERROR(("Local UDP IP address not specified"));
 404       conn->internal->status = SILC_CLIENT_CONN_ERROR;
 405       silc_fsm_next(fsm, silc_client_st_connect_error);
 406       return SILC_FSM_CONTINUE;
 407     }
 408
 409     /* Connect (UDP) */
 410     stream = silc_net_udp_connect(conn->internal->params.bind_ip ?
 411                                   conn->internal->params.bind_ip :
 412                                   conn->internal->params.local_ip,
 413                                   conn->internal->params.local_port,
 414                                   conn->remote_host, conn->remote_port,
 415                                   conn->internal->schedule);
 416
 417     SILC_FSM_CALL(silc_client_connect_callback(stream ? SILC_NET_OK :
 418                                                SILC_NET_HOST_UNREACHABLE,
 419                                                stream, fsm));
 420   } else {
 421     /* Connect (TCP) */
 422     SILC_FSM_CALL(conn->internal->op = silc_net_tcp_connect(
 423                                        NULL, conn->remote_host,
 424                                        conn->remote_port,
 425                                        conn->internal->schedule,
 426                                        silc_client_connect_callback, fsm));
 427   }
 428 }
 429
 430 /* Sets the new connection stream into use and creates packet stream */
 431
 432 SILC_FSM_STATE(silc_client_st_connect_set_stream)
 433 {
 434   SilcClientConnection conn = fsm_context;
 435   SilcClient client = conn->client;
 436
 437   if (conn->internal->disconnected) {
 438     /** Disconnected */
 439     silc_fsm_next(fsm, silc_client_st_connect_error);
 440     return SILC_FSM_CONTINUE;
 441   }
 442
 443   /* Create packet stream */
 444   conn->stream = silc_packet_stream_create(client->internal->packet_engine,
 445                                            conn->internal->schedule,
 446                                            conn->internal->user_stream);
 447   if (!conn->stream) {
 448     /** Cannot create packet stream */
 449     SILC_LOG_DEBUG(("Could not create packet stream"));
 450     conn->internal->status = SILC_CLIENT_CONN_ERROR;
 451     silc_fsm_next(fsm, silc_client_st_connect_error);
 452     return SILC_FSM_CONTINUE;
 453   }
 454
 455   silc_packet_set_context(conn->stream, conn);
 456
 457   /** Start key exchange */
 458   silc_fsm_next(fsm, silc_client_st_connect_key_exchange);
 459   return SILC_FSM_CONTINUE;
 460 }
 461
 462 /* Starts key exchange protocol with remote host */
 463
 464 SILC_FSM_STATE(silc_client_st_connect_key_exchange)
 465 {
 466   SilcClientConnection conn = fsm_context;
 467   SilcClient client = conn->client;
 468   SilcSKEParamsStruct params;
 469   SilcClientID cid;
 470
 471   SILC_LOG_DEBUG(("Starting key exchange protocol"));
 472
 473   /* Allocate SKE */
 474   conn->internal->ske =
 475     silc_ske_alloc(client->rng, conn->internal->schedule,
 476                    conn->internal->params.repository,
 477                    conn->public_key, conn->private_key, fsm);
 478   if (!conn->internal->ske) {
 479     /** Out of memory */
 480     conn->internal->status = SILC_CLIENT_CONN_ERROR_KE;
 481     silc_fsm_next(fsm, silc_client_st_connect_error);
 482     return SILC_FSM_CONTINUE;
 483   }
 484
 485   /* Set SKE callbacks */
 486   silc_ske_set_callbacks(conn->internal->ske, silc_client_ke_verify_key,
 487                          silc_client_ke_completion, fsm);
 488
 489   /* Set up key exchange parameters */
 490   params.version = client->internal->silc_client_version;
 491   params.timeout_secs = conn->internal->params.timeout_secs;
 492   params.flags = SILC_SKE_SP_FLAG_MUTUAL;
 493   if (conn->internal->params.pfs)
 494     params.flags |= SILC_SKE_SP_FLAG_PFS;
 495   if (conn->internal->params.udp) {
 496     params.flags |= SILC_SKE_SP_FLAG_IV_INCLUDED;
 497     params.session_port = conn->internal->params.local_port;
 498   }
 499
 500   if (conn->internal->params.no_authentication)
 501     /** Run key exchange (no auth) */
 502     silc_fsm_next(fsm, silc_client_st_connected);
 503   else if (conn->internal->params.udp)
 504     /** Run key exchange (UDP)*/
 505     silc_fsm_next(fsm, silc_client_st_connect_setup_udp);
 506   else
 507     /** Run key exchange (TCP) */
 508     silc_fsm_next(fsm, silc_client_st_connect_auth_resolve);
 509
 510   /* Old server version requires empty Client ID in packets.  Remove this
 511      backwards support somepoint after 1.1 server is released. */
 512   memset(&cid, 0, sizeof(cid));
 513   cid.ip.data_len = 4;
 514   silc_packet_set_ids(conn->stream, SILC_ID_CLIENT, &cid, 0, NULL);
 515
 516   SILC_FSM_CALL(conn->internal->op = silc_ske_initiator(conn->internal->ske,
 517                                                         conn->stream,
 518                                                         &params, NULL));
 519 }
 520
 521 /* For UDP/IP connections, set up the UDP session after successful key
 522    exchange protocol */
 523
 524 SILC_FSM_STATE(silc_client_st_connect_setup_udp)
 525 {
 526   SilcClientConnection conn = fsm_context;
 527   SilcStream stream, old;
 528   SilcSKESecurityProperties prop;
 529
 530   SILC_LOG_DEBUG(("Setup UDP SILC session"));
 531
 532   if (conn->internal->disconnected) {
 533     /** Disconnected */
 534     silc_fsm_next(fsm, silc_client_st_connect_error);
 535     return SILC_FSM_CONTINUE;
 536   }
 537
 538   /* Create new UDP stream */
 539   prop = silc_ske_get_security_properties(conn->internal->ske);
 540   stream = silc_net_udp_connect(conn->internal->params.local_ip,
 541                                 conn->internal->params.local_port,
 542                                 conn->remote_host, prop->remote_port,
 543                                 conn->internal->schedule);
 544   if (!stream) {
 545     /** Cannot create UDP stream */
 546     conn->internal->status = SILC_CLIENT_CONN_ERROR;
 547     silc_fsm_next(fsm, silc_client_st_connect_error);
 548     return SILC_FSM_CONTINUE;
 549   }
 550
 551   /* Set the new stream to packet stream */
 552   old = silc_packet_stream_get_stream(conn->stream);
 553   silc_packet_stream_set_stream(conn->stream, stream);
 554   silc_packet_stream_set_iv_included(conn->stream);
 555   silc_packet_set_sid(conn->stream, 0);
 556
 557   /* Delete the old stream */
 558   silc_stream_destroy(old);
 559
 560   /** Start authentication */
 561   silc_fsm_next(fsm, silc_client_st_connect_auth_resolve);
 562   return SILC_FSM_CONTINUE;
 563 }
 564
 565 /* Resolve authentication method to be used in authentication protocol */
 566
 567 SILC_FSM_STATE(silc_client_st_connect_auth_resolve)
 568 {
 569   SilcClientConnection conn = fsm_context;
 570
 571   SILC_LOG_DEBUG(("Resolve authentication method"));
 572
 573   if (conn->internal->disconnected) {
 574     /** Disconnected */
 575     silc_fsm_next(fsm, silc_client_st_connect_error);
 576     return SILC_FSM_CONTINUE;
 577   }
 578
 579   /* If authentication method and data is set, use them */
 580   if (conn->internal->params.auth_set) {
 581     /** Got authentication data */
 582     silc_fsm_next(fsm, silc_client_st_connect_auth_start);
 583     return SILC_FSM_CONTINUE;
 584   }
 585
 586   /* Send connection authentication request packet */
 587   silc_packet_send_va(conn->stream,
 588                       SILC_PACKET_CONNECTION_AUTH_REQUEST, 0,
 589                       SILC_STR_UI_SHORT(SILC_CONN_CLIENT),
 590                       SILC_STR_UI_SHORT(SILC_AUTH_NONE),
 591                       SILC_STR_END);
 592
 593   /** Wait for authentication method */
 594   conn->internal->auth_request = TRUE;
 595   conn->internal->params.auth_method = SILC_AUTH_NONE;
 596   silc_fsm_next_later(fsm, silc_client_st_connect_auth_data, 2, 0);
 597   return SILC_FSM_WAIT;
 598 }
 599
 600 /* Get authentication data to be used in authentication protocol */
 601
 602 SILC_FSM_STATE(silc_client_st_connect_auth_data)
 603 {
 604   SilcClientConnection conn = fsm_context;
 605   SilcClient client = conn->client;
 606
 607   SILC_LOG_DEBUG(("Get authentication data"));
 608
 609   if (conn->internal->disconnected) {
 610     /** Disconnected */
 611     silc_fsm_next(fsm, silc_client_st_connect_error);
 612     return SILC_FSM_CONTINUE;
 613   }
 614
 615   conn->internal->auth_request = FALSE;
 616
 617   /** Get authentication data */
 618   silc_fsm_next(fsm, silc_client_st_connect_auth_start);
 619   SILC_FSM_CALL(client->internal->ops->get_auth_method(
 620                                     client, conn,
 621                                     conn->remote_host,
 622                                     conn->remote_port,
 623                                     conn->internal->params.auth_method,
 624                                     silc_client_connect_auth_method, fsm));
 625 }
 626
 627 /* Start connection authentication with remote host */
 628
 629 SILC_FSM_STATE(silc_client_st_connect_auth_start)
 630 {
 631   SilcClientConnection conn = fsm_context;
 632   SilcConnAuth connauth;
 633
 634   SILC_LOG_DEBUG(("Starting connection authentication protocol"));
 635
 636   if (conn->internal->disconnected) {
 637     /** Disconnected */
 638     silc_fsm_next(fsm, silc_client_st_connect_error);
 639     return SILC_FSM_CONTINUE;
 640   }
 641
 642   /* We always use the same key for connection authentication and SKE */
 643   if (conn->internal->params.auth_method == SILC_AUTH_PUBLIC_KEY)
 644     conn->internal->params.auth = conn->private_key;
 645
 646   /* Allocate connection authentication protocol */
 647   connauth = silc_connauth_alloc(conn->internal->schedule,
 648                                  conn->internal->ske,
 649                                  conn->internal->params.rekey_secs);
 650   if (!connauth) {
 651     /** Out of memory */
 652     conn->internal->status = SILC_CLIENT_CONN_ERROR_AUTH;
 653     conn->internal->error = SILC_STATUS_ERR_AUTH_FAILED;
 654     silc_fsm_next(fsm, silc_client_st_connect_error);
 655     return SILC_FSM_CONTINUE;
 656   }
 657
 658   /** Start connection authentication */
 659   silc_fsm_next(fsm, silc_client_st_connected);
 660   SILC_FSM_CALL(conn->internal->op = silc_connauth_initiator(
 661                                         connauth, SILC_CONN_CLIENT,
 662                                         conn->internal->params.auth_method,
 663                                         conn->internal->params.auth,
 664                                         conn->internal->params.auth_len,
 665                                         silc_client_connect_auth_completion,
 666                                         fsm));
 667 }
 668
 669 /* Connection fully established */
 670
 671 SILC_FSM_STATE(silc_client_st_connected)
 672 {
 673   SilcClientConnection conn = fsm_context;
 674   SilcClient client = conn->client;
 675
 676   /* Get SILC protocol version remote supports */
 677   silc_ske_parse_version(conn->internal->ske, &conn->internal->remote_version,
 678                          NULL, NULL, NULL, NULL);
 679
 680   silc_ske_free(conn->internal->ske);
 681   conn->internal->ske = NULL;
 682
 683   if (!conn->internal->params.auth_set &&
 684       conn->internal->params.auth_method == SILC_AUTH_PASSWORD &&
 685       conn->internal->params.auth) {
 686     silc_free(conn->internal->params.auth);
 687     conn->internal->params.auth = NULL;
 688   }
 689
 690   if (conn->internal->disconnected) {
 691     /** Disconnected */
 692     silc_fsm_next(fsm, silc_client_st_connect_error);
 693     return SILC_FSM_CONTINUE;
 694   }
 695
 696   SILC_LOG_DEBUG(("Connection established"));
 697
 698   /* Install rekey timer */
 699   if (conn->type != SILC_CONN_CLIENT)
 700     silc_schedule_task_add_timeout(conn->internal->schedule,
 701                                    silc_client_rekey_timer, conn,
 702                                    conn->internal->params.rekey_secs, 0);
 703
 704   /* If we connected to server, now register to network. */
 705   if (conn->type == SILC_CONN_SERVER &&
 706       !conn->internal->params.no_authentication) {
 707
 708     /* If detach data is provided, resume the session. */
 709     if (conn->internal->params.detach_data &&
 710         conn->internal->params.detach_data_len) {
 711       /** Resume detached session */
 712       silc_fsm_next(fsm, silc_client_st_resume);
 713     } else {
 714       /** Register to network */
 715       silc_fsm_next(fsm, silc_client_st_register);
 716     }
 717
 718     return SILC_FSM_CONTINUE;
 719   }
 720
 721   silc_schedule_task_del_by_all(conn->internal->schedule, 0,
 722                                 silc_client_connect_timeout, conn);
 723
 724   /* Call connection callback */
 725   conn->callback(client, conn, SILC_CLIENT_CONN_SUCCESS, 0, NULL,
 726                  conn->callback_context);
 727
 728   silc_async_free(conn->internal->cop);
 729   conn->internal->cop = NULL;
 730
 731   return SILC_FSM_FINISH;
 732 }
 733
 734 /* Error during connecting */
 735
 736 SILC_FSM_STATE(silc_client_st_connect_error)
 737 {
 738   SilcClientConnection conn = fsm_context;
 739
 740   if (conn->internal->ske) {
 741     silc_ske_free(conn->internal->ske);
 742     conn->internal->ske = NULL;
 743   }
 744
 745   /* Signal to close connection */
 746   if (!conn->internal->disconnected) {
 747     conn->internal->disconnected = TRUE;
 748     SILC_FSM_EVENT_SIGNAL(&conn->internal->wait_event);
 749   }
 750
 751   silc_schedule_task_del_by_all(conn->internal->schedule, 0,
 752                                 silc_client_connect_timeout, conn);
 753
 754   return SILC_FSM_FINISH;
 755 }
 756
 757 /****************************** Connect rekey *******************************/
 758
 759 /* Connection rekey timer callback */
 760
 761 SILC_TASK_CALLBACK(silc_client_rekey_timer)
 762 {
 763   SilcClientConnection conn = context;
 764
 765   /* Signal to start rekey */
 766   if (!silc_fsm_is_started(&conn->internal->event_thread)) {
 767     conn->internal->rekey_responder = FALSE;
 768     conn->internal->rekeying = TRUE;
 769     SILC_FSM_EVENT_SIGNAL(&conn->internal->wait_event);
 770   }
 771
 772   /* Reinstall rekey timer */
 773   silc_schedule_task_add_timeout(conn->internal->schedule,
 774                                  silc_client_rekey_timer, conn,
 775                                  conn->internal->params.rekey_secs, 0);
 776 }
 777
 778 /* Performs rekey */
 779
 780 SILC_FSM_STATE(silc_client_st_rekey)
 781 {
 782   SilcClientConnection conn = fsm_context;
 783   SilcClient client = conn->client;
 784
 785   SILC_LOG_DEBUG(("Rekey conn %p", conn));
 786
 787   if (conn->internal->disconnected)
 788     return SILC_FSM_FINISH;
 789
 790   /* Allocate SKE */
 791   conn->internal->ske =
 792     silc_ske_alloc(client->rng, conn->internal->schedule, NULL,
 793                    conn->public_key, NULL, fsm);
 794   if (!conn->internal->ske)
 795     return SILC_FSM_FINISH;
 796
 797   /* Set SKE callbacks */
 798   silc_ske_set_callbacks(conn->internal->ske, NULL,
 799                          silc_client_rekey_completion, fsm);
 800
 801   /** Perform rekey */
 802   if (!conn->internal->rekey_responder)
 803     SILC_FSM_CALL(conn->internal->op = silc_ske_rekey_initiator(
 804                                                     conn->internal->ske,
 805                                                     conn->stream,
 806                                                     conn->internal->rekey));
 807   else
 808     SILC_FSM_CALL(conn->internal->op = silc_ske_rekey_responder(
 809                                                     conn->internal->ske,
 810                                                     conn->stream,
 811                                                     conn->internal->rekey,
 812                                                     NULL));
 813 }