Source/charon/sa/states/initiator_init.c

   1 /**
   2  * @file initiator_init.c
   3  *
   4  * @brief Implementation of initiator_init_t.
   5  *
   6  */
   7
   8 /*
   9  * Copyright (C) 2005 Jan Hutter, Martin Willi
  10  * Hochschule fuer Technik Rapperswil
  11  *
  12  * This program is free software; you can redistribute it and/or modify it
  13  * under the terms of the GNU General Public License as published by the
  14  * Free Software Foundation; either version 2 of the License, or (at your
  15  * option) any later version.  See <http://www.fsf.org/copyleft/gpl.txt>.
  16  *
  17  * This program is distributed in the hope that it will be useful, but
  18  * WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
  19  * or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
  20  * for more details.
  21  */
  22
  23 #include "initiator_init.h"
  24
  25
  26 #include <daemon.h>
  27 #include <sa/states/state.h>
  28 #include <sa/states/ike_sa_init_requested.h>
  29 #include <utils/allocator.h>
  30 #include <transforms/diffie_hellman.h>
  31 #include <encoding/payloads/sa_payload.h>
  32 #include <encoding/payloads/ke_payload.h>
  33 #include <encoding/payloads/nonce_payload.h>
  34
  35
  36 typedef struct private_initiator_init_t private_initiator_init_t;
  37
  38 /**
  39  * Private data of a initiator_init_t object..
  40  *
  41  */
  42 struct private_initiator_init_t {
  43         /**
  44          * Methods of the state_t interface.
  45          */
  46         initiator_init_t public;
  47
  48         /**
  49          * Assigned IKE_SA.
  50          */
  51         protected_ike_sa_t *ike_sa;
  52
  53         /**
  54          * Diffie hellman object used to generate public DH value.
  55          * This objet is passed to the next state of type ike_sa_init_requested_t.
  56          */
  57         diffie_hellman_t *diffie_hellman;
  58
  59         /**
  60          * DH group number.
  61          */
  62         u_int16_t dh_group_number;
  63
  64         /**
  65          * DH group priority used to get dh_group_number from configuration manager.
  66          * This priority is passed to the next state of type ike_sa_init_requested_t.
  67          */
  68         u_int16_t dh_group_priority;
  69
  70         /**
  71          * Sent nonce.
  72          * This nonce is passed to the next state of type ike_sa_init_requested_t.
  73          */
  74         chunk_t sent_nonce;
  75
  76         /**
  77          * Logger used to log :-)
  78          *
  79          * Is logger of ike_sa!
  80          */
  81         logger_t *logger;
  82
  83         /**
  84          * Builds the IKE_SA_INIT request message.
  85          *
  86          * @param this          calling object
  87          * @param message       the created message will be stored at this location
  88          */
  89         void (*build_ike_sa_init_request) (private_initiator_init_t *this, message_t **message);
  90
  91         /**
  92          * Builds the SA payload for this state.
  93          *
  94          * @param this          calling object
  95          * @param payload       The generated SA payload object of type ke_payload_t is
  96          *                                      stored at this location.
  97          */
  98         void (*build_sa_payload) (private_initiator_init_t *this, payload_t **payload);
  99
 100         /**
 101          * Builds the KE payload for this state.
 102          *
 103          * @param this          calling object
 104          * @param payload       The generated KE payload object of type ke_payload_t is
 105          *                                      stored at this location.
 106          */
 107         void (*build_ke_payload) (private_initiator_init_t *this, payload_t **payload);
 108
 109         /**
 110          * Builds the NONCE payload for this state.
 111          *
 112          * @param this          calling object
 113          * @param payload       The generated NONCE payload object of type ke_payload_t is
 114          *                                      stored at this location.
 115          */
 116         void (*build_nonce_payload) (private_initiator_init_t *this, payload_t **payload);
 117
 118         /**
 119          * Destroy function called internally of this class after state change succeeded.
 120          *
 121          * This destroy function does not destroy objects which were passed to the new state.
 122          *
 123          * @param this          calling object
 124          */
 125         void (*destroy_after_state_change) (private_initiator_init_t *this);
 126 };
 127
 128 /**
 129  * Implements function initiator_init_t.initiate_connection.
 130  */
 131 static status_t initiate_connection (private_initiator_init_t *this, char *name)
 132 {
 133         ike_sa_init_requested_t *next_state;
 134         init_config_t *init_config;
 135         randomizer_t *randomizer;
 136         sa_config_t *sa_config;
 137         message_t *message;
 138         packet_t *packet;
 139         status_t status;
 140
 141         this->logger->log(this->logger, CONTROL, "Initializing connection %s",name);
 142
 143         status = charon->configuration_manager->get_init_config_for_name(charon->configuration_manager,name,&init_config);
 144         if (status != SUCCESS)
 145         {
 146                 this->logger->log(this->logger, ERROR | MORE, "Could not retrieve INIT configuration informations for %s",name);
 147                 return INVALID_ARG;
 148         }
 149
 150         this->ike_sa->set_init_config(this->ike_sa,init_config);
 151
 152         status = charon->configuration_manager->get_sa_config_for_name(charon->configuration_manager,name,&sa_config);
 153
 154         if (status != SUCCESS)
 155         {
 156                 this->logger->log(this->logger, ERROR | MORE, "Could not retrieve SA configuration informations for %s",name);
 157                 return INVALID_ARG;
 158         }
 159
 160         this->ike_sa->set_sa_config(this->ike_sa,sa_config);
 161
 162
 163
 164         this->ike_sa->set_other_host(this->ike_sa,init_config->get_other_host_clone(init_config));
 165         this->ike_sa->set_my_host(this->ike_sa,init_config->get_my_host_clone(init_config));
 166
 167         this->dh_group_number = init_config->get_dh_group_number(init_config,this->dh_group_priority);
 168         if (this->dh_group_number == MODP_UNDEFINED)
 169         {
 170                 this->logger->log(this->logger, ERROR | MORE, "Diffie hellman group could not be  retrieved with priority %d", this->dh_group_priority);
 171                 return INVALID_ARG;
 172         }
 173
 174         /* a diffie hellman object could allready exist caused by an failed initiate_connection call */
 175         if (this->diffie_hellman == NULL)
 176         {
 177                 this->diffie_hellman = diffie_hellman_create(this->dh_group_number);
 178         }
 179
 180         if (this->sent_nonce.ptr != NULL)
 181         {
 182                 allocator_free(this->sent_nonce.ptr);
 183                 this->sent_nonce = CHUNK_INITIALIZER;
 184         }
 185
 186         this->logger->log(this->logger, CONTROL|MOST, "Get pseudo random bytes for nonce");
 187         randomizer = this->ike_sa->get_randomizer(this->ike_sa);
 188         randomizer->allocate_pseudo_random_bytes(randomizer, NONCE_SIZE, &(this->sent_nonce));
 189
 190         this->logger->log(this->logger, RAW|MOST, "Nonce",&(this->sent_nonce));
 191
 192         this->build_ike_sa_init_request (this,&message);
 193
 194         /* generate packet */
 195         this->logger->log(this->logger, CONTROL|MOST, "generate packet from message");
 196         status = message->generate(message, NULL, NULL, &packet);
 197         if (status != SUCCESS)
 198         {
 199                 this->logger->log(this->logger, ERROR, "could not generate packet from message");
 200                 message->destroy(message);
 201                 return status;
 202         }
 203
 204         this->logger->log(this->logger, CONTROL|MOST, "Add packet to global send queue");
 205         charon->send_queue->add(charon->send_queue, packet);
 206
 207         /* state can now be changed */
 208         this->logger->log(this->logger, CONTROL|MOST, "Create next state object");
 209         next_state = ike_sa_init_requested_create(this->ike_sa, this->dh_group_number, this->diffie_hellman, this->sent_nonce);
 210
 211         /* last message can now be set */
 212         status = this->ike_sa->set_last_requested_message(this->ike_sa, message);
 213
 214         if (status != SUCCESS)
 215         {
 216                 this->logger->log(this->logger, ERROR, "Could not set last requested message");
 217                 (next_state->state_interface).destroy(&(next_state->state_interface));
 218                 message->destroy(message);
 219                 return status;
 220         }
 221
 222         /* state can now be changed */
 223         this->ike_sa->set_new_state(this->ike_sa,(state_t *) next_state);
 224
 225         /* state has NOW changed :-) */
 226         this->logger->log(this->logger, CONTROL|MORE, "Changed state of IKE_SA from %s to %s", mapping_find(ike_sa_state_m,INITIATOR_INIT),mapping_find(ike_sa_state_m,IKE_SA_INIT_REQUESTED) );
 227
 228         this->logger->log(this->logger, CONTROL|MOST, "Destroy old sate object");
 229         this->destroy_after_state_change(this);
 230
 231         return SUCCESS;
 232 }
 233
 234 /**
 235  * implements private_initiator_init_t.build_ike_sa_init_request
 236  */
 237 static void build_ike_sa_init_request (private_initiator_init_t *this, message_t **request)
 238 {
 239         payload_t *payload;
 240         message_t *message;
 241
 242         /* going to build message */
 243         this->logger->log(this->logger, CONTROL|MOST, "Going to build message");
 244         this->ike_sa->build_message(this->ike_sa, IKE_SA_INIT, TRUE, &message);
 245
 246         /* build SA payload */
 247         this->build_sa_payload(this, &payload);
 248         this->logger->log(this->logger, CONTROL|MOST, "add SA payload to message");
 249         message->add_payload(message, payload);
 250
 251         /* build KE payload */
 252         this->build_ke_payload(this, &payload);
 253         this->logger->log(this->logger, CONTROL|MOST, "add KE payload to message");
 254         message->add_payload(message, payload);
 255
 256         /* build Nonce payload */
 257         this->build_nonce_payload(this, &payload);
 258         this->logger->log(this->logger, CONTROL|MOST, "add nonce payload to message");
 259         message->add_payload(message, payload);
 260
 261         *request = message;
 262 }
 263
 264 /**
 265  * implements private_initiator_init_t.build_sa_payload
 266  */
 267 static void build_sa_payload(private_initiator_init_t *this, payload_t **payload)
 268 {
 269         sa_payload_t* sa_payload;
 270         size_t proposal_count;
 271         ike_proposal_t *proposals;
 272         init_config_t *init_config;
 273
 274         this->logger->log(this->logger, CONTROL|MORE, "building sa payload");
 275
 276         init_config = this->ike_sa->get_init_config(this->ike_sa);
 277
 278         proposal_count = init_config->get_proposals(init_config,&proposals);
 279
 280         sa_payload = sa_payload_create_from_ike_proposals(proposals,proposal_count);
 281
 282         allocator_free(proposals);
 283         *payload = (payload_t *) sa_payload;
 284 }
 285
 286 /**
 287  * implements private_initiator_init_t.build_ke_payload
 288  */
 289 static void build_ke_payload(private_initiator_init_t *this, payload_t **payload)
 290 {
 291         ke_payload_t *ke_payload;
 292         chunk_t key_data;
 293
 294         this->logger->log(this->logger, CONTROL|MORE, "building ke payload");
 295
 296         this->diffie_hellman->get_my_public_value(this->diffie_hellman,&key_data);
 297
 298         ke_payload = ke_payload_create();
 299         ke_payload->set_dh_group_number(ke_payload, this->dh_group_number);
 300         ke_payload->set_key_exchange_data(ke_payload, key_data);
 301
 302         allocator_free_chunk(&key_data);
 303         *payload = (payload_t *) ke_payload;
 304 }
 305
 306 /**
 307  * implements private_initiator_init_t.build_nonce_payload
 308  */
 309 static void build_nonce_payload(private_initiator_init_t *this, payload_t **payload)
 310 {
 311         nonce_payload_t *nonce_payload;
 312
 313         this->logger->log(this->logger, CONTROL|MORE, "building nonce payload");
 314
 315         nonce_payload = nonce_payload_create();
 316
 317         nonce_payload->set_nonce(nonce_payload, this->sent_nonce);
 318
 319         *payload = (payload_t *) nonce_payload;
 320 }
 321
 322 /**
 323  * Implements state_t.get_state
 324  */
 325 static status_t process_message(private_initiator_init_t *this, message_t *message, state_t **new_state)
 326 {
 327         *new_state = (state_t *) this;
 328         this->logger->log(this->logger, ERROR|MORE, "In state INITIATOR_INIT no message is processed");
 329         return FAILED;
 330 }
 331
 332 /**
 333  * Implements state_t.get_state
 334  */
 335 static ike_sa_state_t get_state(private_initiator_init_t *this)
 336 {
 337         return INITIATOR_INIT;
 338 }
 339
 340 /**
 341  * Implements state_t.get_state
 342  */
 343 static void destroy(private_initiator_init_t *this)
 344 {
 345         this->logger->log(this->logger, CONTROL | MORE, "Going to destroy initiator_init_t state object");
 346
 347         /* destroy stored proposal */
 348         this->logger->log(this->logger, CONTROL | MOST, "Destroy stored proposals");
 349
 350         /* destroy diffie hellman object */
 351         if (this->diffie_hellman != NULL)
 352         {
 353                 this->logger->log(this->logger, CONTROL | MOST, "Destroy diffie_hellman_t object");
 354                 this->diffie_hellman->destroy(this->diffie_hellman);
 355         }
 356         if (this->sent_nonce.ptr != NULL)
 357         {
 358                 this->logger->log(this->logger, CONTROL | MOST, "Free memory of sent nonce");
 359                 allocator_free(this->sent_nonce.ptr);
 360         }
 361         allocator_free(this);
 362 }
 363
 364 /**
 365  * Implements private_initiator_init_t.destroy_after_state_change
 366  */
 367 static void destroy_after_state_change (private_initiator_init_t *this)
 368 {
 369         this->logger->log(this->logger, CONTROL | MORE, "Going to destroy initiator_init_t state object");
 370
 371         /* destroy stored proposal */
 372         this->logger->log(this->logger, CONTROL | MOST, "Destroy stored proposals");
 373         allocator_free(this);
 374 }
 375
 376 /*
 377  * Described in header.
 378  */
 379 initiator_init_t *initiator_init_create(protected_ike_sa_t *ike_sa)
 380 {
 381         private_initiator_init_t *this = allocator_alloc_thing(private_initiator_init_t);
 382
 383         /* interface functions */
 384         this->public.state_interface.process_message = (status_t (*) (state_t *,message_t *)) process_message;
 385         this->public.state_interface.get_state = (ike_sa_state_t (*) (state_t *)) get_state;
 386         this->public.state_interface.destroy  = (void (*) (state_t *)) destroy;
 387
 388         /* public functions */
 389         this->public.initiate_connection = (status_t (*)(initiator_init_t *, char *)) initiate_connection;
 390
 391         /* private functions */
 392         this->destroy_after_state_change = destroy_after_state_change;
 393         this->build_ike_sa_init_request = build_ike_sa_init_request;
 394         this->build_nonce_payload = build_nonce_payload;
 395         this->build_sa_payload = build_sa_payload;
 396         this->build_ke_payload = build_ke_payload;
 397
 398         /* private data */
 399         this->ike_sa = ike_sa;
 400         this->dh_group_priority = 1;
 401         this->logger = this->ike_sa->get_logger(this->ike_sa);
 402         this->sent_nonce = CHUNK_INITIALIZER;
 403
 404         return &(this->public);
 405 }