(no commit message)
[strongswan.git] / 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 }