~ubuntu-branches/ubuntu/gutsy/wpasupplicant/gutsy

« back to all changes in this revision

Viewing changes to src/eap_server/eap_sake.c

  • Committer: Bazaar Package Importer
  • Author(s): Reinhard Tartler, Alexander Sack
  • Date: 2007-08-26 16:06:57 UTC
  • mfrom: (1.1.9 upstream)
  • Revision ID: james.westby@ubuntu.com-20070826160657-2m8pxoweuxe8f93t
Tags: 0.6.0+0.5.8-0ubuntu1
* New upstream release
* remove patch 11_erroneous_manpage_ref, applied upstream
* remove patch 25_wpas_dbus_unregister_iface_fix, applied upstream

[ Alexander Sack ]
* bumping upstream version to replace development version 0.6.0 with
  this package from stable release branch.
* attempt to fix wierd timeout and high latency issues by going
  back to stable upstream version (0.5.9) (LP: #140763,
  LP: #141233).

Show diffs side-by-side

added added

removed removed

Lines of Context:
1
 
/*
2
 
 * hostapd / EAP-SAKE (RFC 4763) server
3
 
 * Copyright (c) 2006-2007, Jouni Malinen <j@w1.fi>
4
 
 *
5
 
 * This program is free software; you can redistribute it and/or modify
6
 
 * it under the terms of the GNU General Public License version 2 as
7
 
 * published by the Free Software Foundation.
8
 
 *
9
 
 * Alternatively, this software may be distributed under the terms of BSD
10
 
 * license.
11
 
 *
12
 
 * See README and COPYING for more details.
13
 
 */
14
 
 
15
 
#include "includes.h"
16
 
 
17
 
#include "common.h"
18
 
#include "eap_server/eap_i.h"
19
 
#include "eap_common/eap_sake_common.h"
20
 
 
21
 
 
22
 
struct eap_sake_data {
23
 
        enum { IDENTITY, CHALLENGE, CONFIRM, SUCCESS, FAILURE } state;
24
 
        u8 rand_s[EAP_SAKE_RAND_LEN];
25
 
        u8 rand_p[EAP_SAKE_RAND_LEN];
26
 
        struct {
27
 
                u8 auth[EAP_SAKE_TEK_AUTH_LEN];
28
 
                u8 cipher[EAP_SAKE_TEK_CIPHER_LEN];
29
 
        } tek;
30
 
        u8 msk[EAP_MSK_LEN];
31
 
        u8 emsk[EAP_EMSK_LEN];
32
 
        u8 session_id;
33
 
        u8 *peerid;
34
 
        size_t peerid_len;
35
 
        u8 *serverid;
36
 
        size_t serverid_len;
37
 
};
38
 
 
39
 
 
40
 
static const char * eap_sake_state_txt(int state)
41
 
{
42
 
        switch (state) {
43
 
        case IDENTITY:
44
 
                return "IDENTITY";
45
 
        case CHALLENGE:
46
 
                return "CHALLENGE";
47
 
        case CONFIRM:
48
 
                return "CONFIRM";
49
 
        case SUCCESS:
50
 
                return "SUCCESS";
51
 
        case FAILURE:
52
 
                return "FAILURE";
53
 
        default:
54
 
                return "?";
55
 
        }
56
 
}
57
 
 
58
 
 
59
 
static void eap_sake_state(struct eap_sake_data *data, int state)
60
 
{
61
 
        wpa_printf(MSG_DEBUG, "EAP-SAKE: %s -> %s",
62
 
                   eap_sake_state_txt(data->state),
63
 
                   eap_sake_state_txt(state));
64
 
        data->state = state;
65
 
}
66
 
 
67
 
 
68
 
static void * eap_sake_init(struct eap_sm *sm)
69
 
{
70
 
        struct eap_sake_data *data;
71
 
 
72
 
        data = os_zalloc(sizeof(*data));
73
 
        if (data == NULL)
74
 
                return NULL;
75
 
        data->state = CHALLENGE;
76
 
 
77
 
        if (hostapd_get_rand(&data->session_id, 1)) {
78
 
                wpa_printf(MSG_ERROR, "EAP-SAKE: Failed to get random data");
79
 
                os_free(data);
80
 
                return NULL;
81
 
        }
82
 
        wpa_printf(MSG_DEBUG, "EAP-SAKE: Initialized Session ID %d",
83
 
                   data->session_id);
84
 
 
85
 
        /* TODO: add support for configuring SERVERID */
86
 
        data->serverid = (u8 *) strdup("hostapd");
87
 
        if (data->serverid)
88
 
                data->serverid_len = strlen((char *) data->serverid);
89
 
 
90
 
        return data;
91
 
}
92
 
 
93
 
 
94
 
static void eap_sake_reset(struct eap_sm *sm, void *priv)
95
 
{
96
 
        struct eap_sake_data *data = priv;
97
 
        os_free(data->serverid);
98
 
        os_free(data->peerid);
99
 
        os_free(data);
100
 
}
101
 
 
102
 
 
103
 
static u8 * eap_sake_build_msg(struct eap_sake_data *data, u8 **payload,
104
 
                               int id, size_t *length, u8 subtype)
105
 
{
106
 
        struct eap_sake_hdr *req;
107
 
        u8 *msg;
108
 
 
109
 
        *length += sizeof(struct eap_sake_hdr);
110
 
 
111
 
        msg = os_zalloc(*length);
112
 
        if (msg == NULL) {
113
 
                wpa_printf(MSG_ERROR, "EAP-SAKE: Failed to allocate memory "
114
 
                           "request");
115
 
                return NULL;
116
 
        }
117
 
 
118
 
        req = (struct eap_sake_hdr *) msg;
119
 
        req->code = EAP_CODE_REQUEST;
120
 
        req->identifier = id;
121
 
        req->length = host_to_be16((u16) *length);
122
 
        req->type = EAP_TYPE_SAKE;
123
 
        req->version = EAP_SAKE_VERSION;
124
 
        req->session_id = data->session_id;
125
 
        req->subtype = subtype;
126
 
        *payload = (u8 *) (req + 1);
127
 
 
128
 
        return msg;
129
 
}
130
 
 
131
 
 
132
 
static u8 * eap_sake_build_identity(struct eap_sm *sm,
133
 
                                    struct eap_sake_data *data,
134
 
                                    int id, size_t *reqDataLen)
135
 
{
136
 
        u8 *msg, *pos;
137
 
 
138
 
        wpa_printf(MSG_DEBUG, "EAP-SAKE: Request/Identity");
139
 
 
140
 
        *reqDataLen = 4;
141
 
        if (data->serverid)
142
 
                *reqDataLen += 2 + data->serverid_len;
143
 
        msg = eap_sake_build_msg(data, &pos, id, reqDataLen,
144
 
                                 EAP_SAKE_SUBTYPE_IDENTITY);
145
 
        if (msg == NULL) {
146
 
                data->state = FAILURE;
147
 
                return NULL;
148
 
        }
149
 
 
150
 
        wpa_printf(MSG_DEBUG, "EAP-SAKE: * AT_PERM_ID_REQ");
151
 
        *pos++ = EAP_SAKE_AT_PERM_ID_REQ;
152
 
        *pos++ = 4;
153
 
        *pos++ = 0;
154
 
        *pos++ = 0;
155
 
 
156
 
        if (data->serverid) {
157
 
                wpa_printf(MSG_DEBUG, "EAP-SAKE: * AT_SERVERID");
158
 
                *pos++ = EAP_SAKE_AT_SERVERID;
159
 
                *pos++ = 2 + data->serverid_len;
160
 
                os_memcpy(pos, data->serverid, data->serverid_len);
161
 
        }
162
 
 
163
 
        return msg;
164
 
}
165
 
 
166
 
 
167
 
static u8 * eap_sake_build_challenge(struct eap_sm *sm,
168
 
                                     struct eap_sake_data *data,
169
 
                                     int id, size_t *reqDataLen)
170
 
{
171
 
        u8 *msg, *pos;
172
 
 
173
 
        wpa_printf(MSG_DEBUG, "EAP-SAKE: Request/Challenge");
174
 
 
175
 
        if (hostapd_get_rand(data->rand_s, EAP_SAKE_RAND_LEN)) {
176
 
                wpa_printf(MSG_ERROR, "EAP-SAKE: Failed to get random data");
177
 
                data->state = FAILURE;
178
 
                return NULL;
179
 
        }
180
 
        wpa_hexdump(MSG_MSGDUMP, "EAP-SAKE: RAND_S (server rand)",
181
 
                    data->rand_s, EAP_SAKE_RAND_LEN);
182
 
 
183
 
        *reqDataLen = 2 + EAP_SAKE_RAND_LEN;
184
 
        if (data->serverid)
185
 
                *reqDataLen += 2 + data->serverid_len;
186
 
        msg = eap_sake_build_msg(data, &pos, id, reqDataLen,
187
 
                                 EAP_SAKE_SUBTYPE_CHALLENGE);
188
 
        if (msg == NULL) {
189
 
                data->state = FAILURE;
190
 
                return NULL;
191
 
        }
192
 
 
193
 
        wpa_printf(MSG_DEBUG, "EAP-SAKE: * AT_RAND_S");
194
 
        *pos++ = EAP_SAKE_AT_RAND_S;
195
 
        *pos++ = 2 + EAP_SAKE_RAND_LEN;
196
 
        os_memcpy(pos, data->rand_s, EAP_SAKE_RAND_LEN);
197
 
        pos += EAP_SAKE_RAND_LEN;
198
 
 
199
 
        if (data->serverid) {
200
 
                wpa_printf(MSG_DEBUG, "EAP-SAKE: * AT_SERVERID");
201
 
                *pos++ = EAP_SAKE_AT_SERVERID;
202
 
                *pos++ = 2 + data->serverid_len;
203
 
                os_memcpy(pos, data->serverid, data->serverid_len);
204
 
        }
205
 
 
206
 
        return msg;
207
 
}
208
 
 
209
 
 
210
 
static u8 * eap_sake_build_confirm(struct eap_sm *sm,
211
 
                                   struct eap_sake_data *data,
212
 
                                   int id, size_t *reqDataLen)
213
 
{
214
 
        u8 *msg, *pos;
215
 
 
216
 
        wpa_printf(MSG_DEBUG, "EAP-SAKE: Request/Confirm");
217
 
 
218
 
        *reqDataLen = 2 + EAP_SAKE_MIC_LEN;
219
 
        msg = eap_sake_build_msg(data, &pos, id, reqDataLen,
220
 
                                 EAP_SAKE_SUBTYPE_CONFIRM);
221
 
        if (msg == NULL) {
222
 
                data->state = FAILURE;
223
 
                return NULL;
224
 
        }
225
 
 
226
 
        wpa_printf(MSG_DEBUG, "EAP-SAKE: * AT_MIC_S");
227
 
        *pos++ = EAP_SAKE_AT_MIC_S;
228
 
        *pos++ = 2 + EAP_SAKE_MIC_LEN;
229
 
        if (eap_sake_compute_mic(data->tek.auth, data->rand_s, data->rand_p,
230
 
                                 data->serverid, data->serverid_len,
231
 
                                 data->peerid, data->peerid_len, 0,
232
 
                                 msg, *reqDataLen, pos, pos)) {
233
 
                wpa_printf(MSG_INFO, "EAP-SAKE: Failed to compute MIC");
234
 
                data->state = FAILURE;
235
 
                os_free(msg);
236
 
                return NULL;
237
 
        }
238
 
 
239
 
        return msg;
240
 
}
241
 
 
242
 
 
243
 
static u8 * eap_sake_buildReq(struct eap_sm *sm, void *priv, int id,
244
 
                              size_t *reqDataLen)
245
 
{
246
 
        struct eap_sake_data *data = priv;
247
 
 
248
 
        switch (data->state) {
249
 
        case IDENTITY:
250
 
                return eap_sake_build_identity(sm, data, id, reqDataLen);
251
 
        case CHALLENGE:
252
 
                return eap_sake_build_challenge(sm, data, id, reqDataLen);
253
 
        case CONFIRM:
254
 
                return eap_sake_build_confirm(sm, data, id, reqDataLen);
255
 
        default:
256
 
                wpa_printf(MSG_DEBUG, "EAP-SAKE: Unknown state %d in buildReq",
257
 
                           data->state);
258
 
                break;
259
 
        }
260
 
        return NULL;
261
 
}
262
 
 
263
 
 
264
 
static Boolean eap_sake_check(struct eap_sm *sm, void *priv,
265
 
                              u8 *respData, size_t respDataLen)
266
 
{
267
 
        struct eap_sake_data *data = priv;
268
 
        struct eap_sake_hdr *resp;
269
 
        size_t len;
270
 
        u8 version, session_id, subtype;
271
 
 
272
 
        resp = (struct eap_sake_hdr *) respData;
273
 
        if (respDataLen < sizeof(*resp) ||
274
 
            resp->type != EAP_TYPE_SAKE ||
275
 
            (len = be_to_host16(resp->length)) > respDataLen ||
276
 
            len < sizeof(*resp)) {
277
 
                wpa_printf(MSG_INFO, "EAP-SAKE: Invalid frame");
278
 
                return TRUE;
279
 
        }
280
 
        version = resp->version;
281
 
        session_id = resp->session_id;
282
 
        subtype = resp->subtype;
283
 
 
284
 
        if (version != EAP_SAKE_VERSION) {
285
 
                wpa_printf(MSG_INFO, "EAP-SAKE: Unknown version %d", version);
286
 
                return TRUE;
287
 
        }
288
 
 
289
 
        if (session_id != data->session_id) {
290
 
                wpa_printf(MSG_INFO, "EAP-SAKE: Session ID mismatch (%d,%d)",
291
 
                           session_id, data->session_id);
292
 
                return TRUE;
293
 
        }
294
 
 
295
 
        wpa_printf(MSG_DEBUG, "EAP-SAKE: Received frame: subtype=%d", subtype);
296
 
 
297
 
        if (data->state == IDENTITY && subtype == EAP_SAKE_SUBTYPE_IDENTITY)
298
 
                return FALSE;
299
 
 
300
 
        if (data->state == CHALLENGE && subtype == EAP_SAKE_SUBTYPE_CHALLENGE)
301
 
                return FALSE;
302
 
 
303
 
        if (data->state == CONFIRM && subtype == EAP_SAKE_SUBTYPE_CONFIRM)
304
 
                return FALSE;
305
 
 
306
 
        if (subtype == EAP_SAKE_SUBTYPE_AUTH_REJECT)
307
 
                return FALSE;
308
 
 
309
 
        wpa_printf(MSG_INFO, "EAP-SAKE: Unexpected subtype=%d in state=%d",
310
 
                   subtype, data->state);
311
 
 
312
 
        return TRUE;
313
 
}
314
 
 
315
 
 
316
 
static void eap_sake_process_identity(struct eap_sm *sm,
317
 
                                      struct eap_sake_data *data,
318
 
                                      u8 *respData, size_t respDataLen,
319
 
                                      u8 *payload, size_t payloadlen)
320
 
{
321
 
        if (data->state != IDENTITY)
322
 
                return;
323
 
 
324
 
        wpa_printf(MSG_DEBUG, "EAP-SAKE: Received Response/Identity");
325
 
        /* TODO: update identity and select new user data */
326
 
        eap_sake_state(data, CHALLENGE);
327
 
}
328
 
 
329
 
 
330
 
static void eap_sake_process_challenge(struct eap_sm *sm,
331
 
                                       struct eap_sake_data *data,
332
 
                                       u8 *respData, size_t respDataLen,
333
 
                                       u8 *payload, size_t payloadlen)
334
 
{
335
 
        struct eap_sake_parse_attr attr;
336
 
        u8 mic_p[EAP_SAKE_MIC_LEN];
337
 
 
338
 
        if (data->state != CHALLENGE)
339
 
                return;
340
 
 
341
 
        wpa_printf(MSG_DEBUG, "EAP-SAKE: Received Response/Challenge");
342
 
 
343
 
        if (eap_sake_parse_attributes(payload, payloadlen, &attr))
344
 
                return;
345
 
 
346
 
        if (!attr.rand_p || !attr.mic_p) {
347
 
                wpa_printf(MSG_INFO, "EAP-SAKE: Response/Challenge did not "
348
 
                           "include AT_RAND_P or AT_MIC_P");
349
 
                return;
350
 
        }
351
 
 
352
 
        os_memcpy(data->rand_p, attr.rand_p, EAP_SAKE_RAND_LEN);
353
 
 
354
 
        os_free(data->peerid);
355
 
        data->peerid = NULL;
356
 
        data->peerid_len = 0;
357
 
        if (attr.peerid) {
358
 
                data->peerid = os_malloc(attr.peerid_len);
359
 
                if (data->peerid == NULL)
360
 
                        return;
361
 
                os_memcpy(data->peerid, attr.peerid, attr.peerid_len);
362
 
                data->peerid_len = attr.peerid_len;
363
 
        }
364
 
 
365
 
        if (sm->user == NULL || sm->user->password == NULL ||
366
 
            sm->user->password_len != 2 * EAP_SAKE_ROOT_SECRET_LEN) {
367
 
                wpa_printf(MSG_INFO, "EAP-SAKE: Plaintext password with "
368
 
                           "%d-byte key not configured",
369
 
                           2 * EAP_SAKE_ROOT_SECRET_LEN);
370
 
                data->state = FAILURE;
371
 
                return;
372
 
        }
373
 
        eap_sake_derive_keys(sm->user->password,
374
 
                             sm->user->password + EAP_SAKE_ROOT_SECRET_LEN,
375
 
                             data->rand_s, data->rand_p,
376
 
                             (u8 *) &data->tek, data->msk, data->emsk);
377
 
 
378
 
        eap_sake_compute_mic(data->tek.auth, data->rand_s, data->rand_p,
379
 
                             data->serverid, data->serverid_len,
380
 
                             data->peerid, data->peerid_len, 1,
381
 
                             respData, respDataLen, attr.mic_p, mic_p);
382
 
        if (os_memcmp(attr.mic_p, mic_p, EAP_SAKE_MIC_LEN) != 0) {
383
 
                wpa_printf(MSG_INFO, "EAP-SAKE: Incorrect AT_MIC_P");
384
 
                eap_sake_state(data, FAILURE);
385
 
                return;
386
 
        }
387
 
 
388
 
        eap_sake_state(data, CONFIRM);
389
 
}
390
 
 
391
 
 
392
 
static void eap_sake_process_confirm(struct eap_sm *sm,
393
 
                                     struct eap_sake_data *data,
394
 
                                     u8 *respData, size_t respDataLen,
395
 
                                     u8 *payload, size_t payloadlen)
396
 
{
397
 
        struct eap_sake_parse_attr attr;
398
 
        u8 mic_p[EAP_SAKE_MIC_LEN];
399
 
 
400
 
        if (data->state != CONFIRM)
401
 
                return;
402
 
 
403
 
        wpa_printf(MSG_DEBUG, "EAP-SAKE: Received Response/Confirm");
404
 
 
405
 
        if (eap_sake_parse_attributes(payload, payloadlen, &attr))
406
 
                return;
407
 
 
408
 
        if (!attr.mic_p) {
409
 
                wpa_printf(MSG_INFO, "EAP-SAKE: Response/Confirm did not "
410
 
                           "include AT_MIC_P");
411
 
                return;
412
 
        }
413
 
 
414
 
        eap_sake_compute_mic(data->tek.auth, data->rand_s, data->rand_p,
415
 
                             data->serverid, data->serverid_len,
416
 
                             data->peerid, data->peerid_len, 1,
417
 
                             respData, respDataLen, attr.mic_p, mic_p);
418
 
        if (os_memcmp(attr.mic_p, mic_p, EAP_SAKE_MIC_LEN) != 0) {
419
 
                wpa_printf(MSG_INFO, "EAP-SAKE: Incorrect AT_MIC_P");
420
 
                eap_sake_state(data, FAILURE);
421
 
        } else
422
 
                eap_sake_state(data, SUCCESS);
423
 
}
424
 
 
425
 
 
426
 
static void eap_sake_process_auth_reject(struct eap_sm *sm,
427
 
                                         struct eap_sake_data *data,
428
 
                                         u8 *respData, size_t respDataLen,
429
 
                                         u8 *payload, size_t payloadlen)
430
 
{
431
 
        wpa_printf(MSG_DEBUG, "EAP-SAKE: Received Response/Auth-Reject");
432
 
        eap_sake_state(data, FAILURE);
433
 
}
434
 
 
435
 
 
436
 
static void eap_sake_process(struct eap_sm *sm, void *priv,
437
 
                             u8 *respData, size_t respDataLen)
438
 
{
439
 
        struct eap_sake_data *data = priv;
440
 
        struct eap_sake_hdr *resp;
441
 
        u8 subtype, *pos, *end;
442
 
 
443
 
        resp = (struct eap_sake_hdr *) respData;
444
 
        subtype = resp->subtype;
445
 
        pos = (u8 *) (resp + 1);
446
 
        end = respData + be_to_host16(resp->length);
447
 
 
448
 
        wpa_hexdump(MSG_DEBUG, "EAP-SAKE: Received attributes",
449
 
                    pos, end - pos);
450
 
 
451
 
        switch (subtype) {
452
 
        case EAP_SAKE_SUBTYPE_IDENTITY:
453
 
                eap_sake_process_identity(sm, data, respData, respDataLen, pos,
454
 
                                          end - pos);
455
 
                break;
456
 
        case EAP_SAKE_SUBTYPE_CHALLENGE:
457
 
                eap_sake_process_challenge(sm, data, respData, respDataLen,
458
 
                                           pos, end - pos);
459
 
                break;
460
 
        case EAP_SAKE_SUBTYPE_CONFIRM:
461
 
                eap_sake_process_confirm(sm, data, respData, respDataLen, pos,
462
 
                                         end - pos);
463
 
                break;
464
 
        case EAP_SAKE_SUBTYPE_AUTH_REJECT:
465
 
                eap_sake_process_auth_reject(sm, data, respData, respDataLen,
466
 
                                             pos, end - pos);
467
 
                break;
468
 
        }
469
 
}
470
 
 
471
 
 
472
 
static Boolean eap_sake_isDone(struct eap_sm *sm, void *priv)
473
 
{
474
 
        struct eap_sake_data *data = priv;
475
 
        return data->state == SUCCESS || data->state == FAILURE;
476
 
}
477
 
 
478
 
 
479
 
static u8 * eap_sake_getKey(struct eap_sm *sm, void *priv, size_t *len)
480
 
{
481
 
        struct eap_sake_data *data = priv;
482
 
        u8 *key;
483
 
 
484
 
        if (data->state != SUCCESS)
485
 
                return NULL;
486
 
 
487
 
        key = os_malloc(EAP_MSK_LEN);
488
 
        if (key == NULL)
489
 
                return NULL;
490
 
        os_memcpy(key, data->msk, EAP_MSK_LEN);
491
 
        *len = EAP_MSK_LEN;
492
 
 
493
 
        return key;
494
 
}
495
 
 
496
 
 
497
 
static u8 * eap_sake_get_emsk(struct eap_sm *sm, void *priv, size_t *len)
498
 
{
499
 
        struct eap_sake_data *data = priv;
500
 
        u8 *key;
501
 
 
502
 
        if (data->state != SUCCESS)
503
 
                return NULL;
504
 
 
505
 
        key = os_malloc(EAP_EMSK_LEN);
506
 
        if (key == NULL)
507
 
                return NULL;
508
 
        os_memcpy(key, data->emsk, EAP_EMSK_LEN);
509
 
        *len = EAP_EMSK_LEN;
510
 
 
511
 
        return key;
512
 
}
513
 
 
514
 
 
515
 
static Boolean eap_sake_isSuccess(struct eap_sm *sm, void *priv)
516
 
{
517
 
        struct eap_sake_data *data = priv;
518
 
        return data->state == SUCCESS;
519
 
}
520
 
 
521
 
 
522
 
int eap_server_sake_register(void)
523
 
{
524
 
        struct eap_method *eap;
525
 
        int ret;
526
 
 
527
 
        eap = eap_server_method_alloc(EAP_SERVER_METHOD_INTERFACE_VERSION,
528
 
                                      EAP_VENDOR_IETF, EAP_TYPE_SAKE, "SAKE");
529
 
        if (eap == NULL)
530
 
                return -1;
531
 
 
532
 
        eap->init = eap_sake_init;
533
 
        eap->reset = eap_sake_reset;
534
 
        eap->buildReq = eap_sake_buildReq;
535
 
        eap->check = eap_sake_check;
536
 
        eap->process = eap_sake_process;
537
 
        eap->isDone = eap_sake_isDone;
538
 
        eap->getKey = eap_sake_getKey;
539
 
        eap->isSuccess = eap_sake_isSuccess;
540
 
        eap->get_emsk = eap_sake_get_emsk;
541
 
 
542
 
        ret = eap_server_method_register(eap);
543
 
        if (ret)
544
 
                eap_server_method_free(eap);
545
 
        return ret;
546
 
}