To get this branch, use:
bzr branch
http://bzr.recompile.se/loggerhead/mandos/release
« back to all changes in this revision
Viewing changes to plugins.d/mandosclient.c
- browse files at revision 24.1.13
- compare with another revision
- download diff
- download tarball
- view history from revision 24.1.13
- Committer: Björn Påhlsson
- Date: 2008-08-03 20:35:01 UTC
- mto: (237.7.1 mandos) (24.1.154 mandos)
- mto: This revision was merged to the branch mainline in revision 41.
- Revision ID: belorn@braxen-20080803203501-av7janz21ve7iq0b
mandosclient
Droping privileges
split gnutls function into global and session
* server.py (if_nametoindex): Redefine itself instead of using a
default keyword argument.
Droping privileges
split gnutls function into global and session
* server.py (if_nametoindex): Redefine itself instead of using a
default keyword argument.
- files modified:
- TODO
added
removed
plugins.d/mandosclient.c
32
32
#define _LARGEFILE_SOURCE
33
33
#define _FILE_OFFSET_BITS 64
34
34
35
#define _GNU_SOURCE /* TEMP_FAILURE_RETRY() */
36
35
37
#include <stdio.h>
36
38
#include <assert.h>
37
39
#include <stdlib.h>
38
40
#include <time.h>
39
41
#include <net/if.h> /* if_nametoindex */
40
#include <sys/ioctl.h> // ioctl, ifreq, SIOCGIFFLAGS, IFF_UP, SIOCSIFFLAGS
41
#include <net/if.h> // ioctl, ifreq, SIOCGIFFLAGS, IFF_UP, SIOCSIFFLAGS
42
#include <sys/ioctl.h> /* ioctl, ifreq, SIOCGIFFLAGS, IFF_UP,
43
SIOCSIFFLAGS */
44
#include <net/if.h> /* ioctl, ifreq, SIOCGIFFLAGS, IFF_UP,
45
SIOCSIFFLAGS */
42
46
43
47
#include <avahi-core/core.h>
44
48
#include <avahi-core/lookup.h>
47
51
#include <avahi-common/malloc.h>
48
52
#include <avahi-common/error.h>
49
53
50
//mandos client part
54
/* Mandos client part */
51
55
#include <sys/types.h> /* socket(), inet_pton() */
52
56
#include <sys/socket.h> /* socket(), struct sockaddr_in6,
53
57
struct in6_addr, inet_pton() */
60
64
#include <string.h> /* memset */
61
65
#include <arpa/inet.h> /* inet_pton() */
62
66
#include <iso646.h> /* not */
67
#include <net/if.h> /* IF_NAMESIZE */
63
68
64
// gpgme
69
/* GPGME */
65
70
#include <errno.h> /* perror() */
66
71
#include <gpgme.h>
67
72
68
// getopt long
73
/* getopt_long */
69
74
#include <getopt.h>
70
75
71
76
#define BUFFER_SIZE 256
72
#define DH_BITS 1024
73
77
74
static const char *certdir = "/conf/conf.d/mandos";
75
static const char *certfile = "openpgp-client.txt";
76
static const char *certkey = "openpgp-client-key.txt";
78
static const char *keydir = "/conf/conf.d/mandos";
79
static const char *pubkeyfile = "pubkey.txt";
80
static const char *seckeyfile = "seckey.txt";
77
81
78
82
bool debug = false;
79
83
84
const char mandos_protocol_version[] = "1";
85
86
/* Used for passing in values through all the callback functions */
80
87
typedef struct {
81
88
AvahiSimplePoll *simple_poll;
82
89
AvahiServer *server;
83
90
gnutls_certificate_credentials_t cred;
84
91
unsigned int dh_bits;
92
gnutls_dh_params_t dh_params;
85
93
const char *priority;
86
94
} mandos_context;
87
95
88
static ssize_t pgp_packet_decrypt (char *packet, size_t packet_size,
89
char **new_packet,
96
size_t adjustbuffer(char **buffer, size_t buffer_length,
97
size_t buffer_capacity){
98
if (buffer_length + BUFFER_SIZE > buffer_capacity){
99
*buffer = realloc(*buffer, buffer_capacity + BUFFER_SIZE);
100
if (buffer == NULL){
101
return 0;
102
}
103
buffer_capacity += BUFFER_SIZE;
104
}
105
return buffer_capacity;
106
}
107
108
/*
109
* Decrypt OpenPGP data using keyrings in HOMEDIR.
110
* Returns -1 on error
111
*/
112
static ssize_t pgp_packet_decrypt (const char *cryptotext,
113
size_t crypto_size,
114
char **plaintext,
90
115
const char *homedir){
91
116
gpgme_data_t dh_crypto, dh_plain;
92
117
gpgme_ctx_t ctx;
93
118
gpgme_error_t rc;
94
119
ssize_t ret;
95
ssize_t new_packet_capacity = 0;
96
ssize_t new_packet_length = 0;
120
size_t plaintext_capacity = 0;
121
ssize_t plaintext_length = 0;
97
122
gpgme_engine_info_t engine_info;
98
123
99
124
if (debug){
100
fprintf(stderr, "Trying to decrypt OpenPGP packet\n");
125
fprintf(stderr, "Trying to decrypt OpenPGP data\n");
101
126
}
102
127
103
128
/* Init GPGME */
109
134
return -1;
110
135
}
111
136
112
/* Set GPGME home directory */
137
/* Set GPGME home directory for the OpenPGP engine only */
113
138
rc = gpgme_get_engine_info (&engine_info);
114
139
if (rc != GPG_ERR_NO_ERROR){
115
140
fprintf(stderr, "bad gpgme_get_engine_info: %s: %s\n",
125
150
engine_info = engine_info->next;
126
151
}
127
152
if(engine_info == NULL){
128
fprintf(stderr, "Could not set home dir to %s\n", homedir);
153
fprintf(stderr, "Could not set GPGME home dir to %s\n", homedir);
129
154
return -1;
130
155
}
131
156
132
/* Create new GPGME data buffer from packet buffer */
133
rc = gpgme_data_new_from_mem(&dh_crypto, packet, packet_size, 0);
157
/* Create new GPGME data buffer from memory cryptotext */
158
rc = gpgme_data_new_from_mem(&dh_crypto, cryptotext, crypto_size,
159
0);
134
160
if (rc != GPG_ERR_NO_ERROR){
135
161
fprintf(stderr, "bad gpgme_data_new_from_mem: %s: %s\n",
136
162
gpgme_strsource(rc), gpgme_strerror(rc));
142
168
if (rc != GPG_ERR_NO_ERROR){
143
169
fprintf(stderr, "bad gpgme_data_new: %s: %s\n",
144
170
gpgme_strsource(rc), gpgme_strerror(rc));
171
gpgme_data_release(dh_crypto);
145
172
return -1;
146
173
}
147
174
150
177
if (rc != GPG_ERR_NO_ERROR){
151
178
fprintf(stderr, "bad gpgme_new: %s: %s\n",
152
179
gpgme_strsource(rc), gpgme_strerror(rc));
153
return -1;
180
plaintext_length = -1;
181
goto decrypt_end;
154
182
}
155
183
156
/* Decrypt data from the FILE pointer to the plaintext data
157
buffer */
184
/* Decrypt data from the cryptotext data buffer to the plaintext
185
data buffer */
158
186
rc = gpgme_op_decrypt(ctx, dh_crypto, dh_plain);
159
187
if (rc != GPG_ERR_NO_ERROR){
160
188
fprintf(stderr, "bad gpgme_op_decrypt: %s: %s\n",
161
189
gpgme_strsource(rc), gpgme_strerror(rc));
162
return -1;
190
plaintext_length = -1;
191
goto decrypt_end;
163
192
}
164
193
165
194
if(debug){
166
fprintf(stderr, "Decryption of OpenPGP packet succeeded\n");
195
fprintf(stderr, "Decryption of OpenPGP data succeeded\n");
167
196
}
168
197
169
198
if (debug){
170
199
gpgme_decrypt_result_t result;
171
200
result = gpgme_op_decrypt_result(ctx);
195
224
}
196
225
}
197
226
198
/* Delete the GPGME FILE pointer cryptotext data buffer */
199
gpgme_data_release(dh_crypto);
200
201
227
/* Seek back to the beginning of the GPGME plaintext data buffer */
202
228
if (gpgme_data_seek(dh_plain, (off_t) 0, SEEK_SET) == -1){
203
229
perror("pgpme_data_seek");
230
plaintext_length = -1;
231
goto decrypt_end;
204
232
}
205
233
206
*new_packet = 0;
234
*plaintext = NULL;
207
235
while(true){
208
if (new_packet_length + BUFFER_SIZE > new_packet_capacity){
209
*new_packet = realloc(*new_packet,
210
(unsigned int)new_packet_capacity
211
+ BUFFER_SIZE);
212
if (*new_packet == NULL){
213
perror("realloc");
214
return -1;
215
}
216
new_packet_capacity += BUFFER_SIZE;
236
plaintext_capacity = adjustbuffer(plaintext, (size_t)plaintext_length,
237
plaintext_capacity);
238
if (plaintext_capacity == 0){
239
perror("adjustbuffer");
240
plaintext_length = -1;
241
goto decrypt_end;
217
242
}
218
243
219
ret = gpgme_data_read(dh_plain, *new_packet + new_packet_length,
244
ret = gpgme_data_read(dh_plain, *plaintext + plaintext_length,
220
245
BUFFER_SIZE);
221
246
/* Print the data, if any */
222
247
if (ret == 0){
248
/* EOF */
223
249
break;
224
250
}
225
251
if(ret < 0){
226
252
perror("gpgme_data_read");
227
return -1;
253
plaintext_length = -1;
254
goto decrypt_end;
228
255
}
229
new_packet_length += ret;
256
plaintext_length += ret;
230
257
}
231
258
232
/* FIXME: check characters before printing to screen so to not print
233
terminal control characters */
234
/* if(debug){ */
235
/* fprintf(stderr, "decrypted password is: "); */
236
/* fwrite(*new_packet, 1, new_packet_length, stderr); */
237
/* fprintf(stderr, "\n"); */
238
/* } */
259
if(debug){
260
fprintf(stderr, "Decrypted password is: ");
261
for(ssize_t i = 0; i < plaintext_length; i++){
262
fprintf(stderr, "%02hhX ", (*plaintext)[i]);
263
}
264
fprintf(stderr, "\n");
265
}
266
267
decrypt_end:
268
269
/* Delete the GPGME cryptotext data buffer */
270
gpgme_data_release(dh_crypto);
239
271
240
272
/* Delete the GPGME plaintext data buffer */
241
273
gpgme_data_release(dh_plain);
242
return new_packet_length;
274
return plaintext_length;
243
275
}
244
276
245
277
static const char * safer_gnutls_strerror (int value) {
249
281
return ret;
250
282
}
251
283
284
/* GnuTLS log function callback */
252
285
static void debuggnutls(__attribute__((unused)) int level,
253
286
const char* string){
254
fprintf(stderr, "%s", string);
287
fprintf(stderr, "GnuTLS: %s", string);
255
288
}
256
289
257
static int initgnutls(mandos_context *mc){
258
const char *err;
290
static int init_gnutls_global(mandos_context *mc){
259
291
int ret;
260
292
261
293
if(debug){
264
296
265
297
if ((ret = gnutls_global_init ())
266
298
!= GNUTLS_E_SUCCESS) {
267
fprintf (stderr, "global_init: %s\n", safer_gnutls_strerror(ret));
299
fprintf (stderr, "GnuTLS global_init: %s\n",
300
safer_gnutls_strerror(ret));
268
301
return -1;
269
302
}
270
303
271
304
if (debug){
305
/* "Use a log level over 10 to enable all debugging options."
306
* - GnuTLS manual
307
*/
272
308
gnutls_global_set_log_level(11);
273
309
gnutls_global_set_log_function(debuggnutls);
274
310
}
275
311
276
/* openpgp credentials */
277
if ((ret = gnutls_certificate_allocate_credentials (&es->cred))
312
/* OpenPGP credentials */
313
if ((ret = gnutls_certificate_allocate_credentials (&mc->cred))
278
314
!= GNUTLS_E_SUCCESS) {
279
fprintf (stderr, "memory error: %s\n",
315
fprintf (stderr, "GnuTLS memory error: %s\n",
280
316
safer_gnutls_strerror(ret));
281
317
return -1;
282
318
}
283
319
284
320
if(debug){
285
321
fprintf(stderr, "Attempting to use OpenPGP certificate %s"
286
" and keyfile %s as GnuTLS credentials\n", certfile,
287
certkey);
322
" and keyfile %s as GnuTLS credentials\n", pubkeyfile,
323
seckeyfile);
288
324
}
289
325
290
326
ret = gnutls_certificate_set_openpgp_key_file
291
(es->cred, certfile, certkey, GNUTLS_OPENPGP_FMT_BASE64);
327
(mc->cred, pubkeyfile, seckeyfile, GNUTLS_OPENPGP_FMT_BASE64);
292
328
if (ret != GNUTLS_E_SUCCESS) {
293
fprintf
294
(stderr, "Error[%d] while reading the OpenPGP key pair ('%s',"
295
" '%s')\n",
296
ret, certfile, certkey);
297
fprintf(stdout, "The Error is: %s\n",
329
fprintf(stderr,
330
"Error[%d] while reading the OpenPGP key pair ('%s',"
331
" '%s')\n", ret, pubkeyfile, seckeyfile);
332
fprintf(stdout, "The GnuTLS error is: %s\n",
298
333
safer_gnutls_strerror(ret));
299
334
return -1;
300
335
}
301
336
302
//GnuTLS server initialization
303
if ((ret = gnutls_dh_params_init (&es->dh_params))
304
!= GNUTLS_E_SUCCESS) {
305
fprintf (stderr, "Error in dh parameter initialization: %s\n",
306
safer_gnutls_strerror(ret));
307
return -1;
308
}
309
310
if ((ret = gnutls_dh_params_generate2 (es->dh_params, DH_BITS))
311
!= GNUTLS_E_SUCCESS) {
312
fprintf (stderr, "Error in prime generation: %s\n",
313
safer_gnutls_strerror(ret));
314
return -1;
315
}
316
317
gnutls_certificate_set_dh_params (es->cred, es->dh_params);
318
319
// GnuTLS session creation
320
if ((ret = gnutls_init (&es->session, GNUTLS_SERVER))
321
!= GNUTLS_E_SUCCESS){
337
/* GnuTLS server initialization */
338
ret = gnutls_dh_params_init(&mc->dh_params);
339
if (ret != GNUTLS_E_SUCCESS) {
340
fprintf (stderr, "Error in GnuTLS DH parameter initialization:"
341
" %s\n", safer_gnutls_strerror(ret));
342
return -1;
343
}
344
ret = gnutls_dh_params_generate2(mc->dh_params, mc->dh_bits);
345
if (ret != GNUTLS_E_SUCCESS) {
346
fprintf (stderr, "Error in GnuTLS prime generation: %s\n",
347
safer_gnutls_strerror(ret));
348
return -1;
349
}
350
351
gnutls_certificate_set_dh_params(mc->cred, mc->dh_params);
352
353
return 0;
354
}
355
356
static int init_gnutls_session(mandos_context *mc, gnutls_session_t *session){
357
int ret;
358
/* GnuTLS session creation */
359
ret = gnutls_init(session, GNUTLS_SERVER);
360
if (ret != GNUTLS_E_SUCCESS){
322
361
fprintf(stderr, "Error in GnuTLS session initialization: %s\n",
323
362
safer_gnutls_strerror(ret));
324
363
}
325
364
326
if ((ret = gnutls_priority_set_direct (es->session, mc->priority, &err))
327
!= GNUTLS_E_SUCCESS) {
328
fprintf(stderr, "Syntax error at: %s\n", err);
329
fprintf(stderr, "GnuTLS error: %s\n",
330
safer_gnutls_strerror(ret));
331
return -1;
365
{
366
const char *err;
367
ret = gnutls_priority_set_direct(*session, mc->priority, &err);
368
if (ret != GNUTLS_E_SUCCESS) {
369
fprintf(stderr, "Syntax error at: %s\n", err);
370
fprintf(stderr, "GnuTLS error: %s\n",
371
safer_gnutls_strerror(ret));
372
return -1;
373
}
332
374
}
333
375
334
if ((ret = gnutls_credentials_set
335
(es->session, GNUTLS_CRD_CERTIFICATE, es->cred))
336
!= GNUTLS_E_SUCCESS) {
337
fprintf(stderr, "Error setting a credentials set: %s\n",
376
ret = gnutls_credentials_set(*session, GNUTLS_CRD_CERTIFICATE,
377
mc->cred);
378
if (ret != GNUTLS_E_SUCCESS) {
379
fprintf(stderr, "Error setting GnuTLS credentials: %s\n",
338
380
safer_gnutls_strerror(ret));
339
381
return -1;
340
382
}
341
383
342
384
/* ignore client certificate if any. */
343
gnutls_certificate_server_set_request (es->session,
385
gnutls_certificate_server_set_request (*session,
344
386
GNUTLS_CERT_IGNORE);
345
387
346
gnutls_dh_set_prime_bits (es->session, DH_BITS);
388
gnutls_dh_set_prime_bits (*session, mc->dh_bits);
347
389
348
390
return 0;
349
391
}
350
392
393
/* Avahi log function callback */
351
394
static void empty_log(__attribute__((unused)) AvahiLogLevel level,
352
395
__attribute__((unused)) const char *txt){}
353
396
397
/* Called when a Mandos server is found */
354
398
static int start_mandos_communication(const char *ip, uint16_t port,
355
399
AvahiIfIndex if_index,
356
400
mandos_context *mc){
357
401
int ret, tcp_sd;
358
402
struct sockaddr_in6 to;
359
encrypted_session es;
360
403
char *buffer = NULL;
361
404
char *decrypted_buffer;
362
405
size_t buffer_length = 0;
363
406
size_t buffer_capacity = 0;
364
407
ssize_t decrypted_buffer_size;
365
size_t written = 0;
408
size_t written;
366
409
int retval = 0;
367
410
char interface[IF_NAMESIZE];
411
gnutls_session_t session;
412
gnutls_dh_params_t dh_params;
413
414
ret = init_gnutls_session (mc, &session);
415
if (ret != 0){
416
return -1;
417
}
368
418
369
419
if(debug){
370
420
fprintf(stderr, "Setting up a tcp connection to %s, port %d\n",
379
429
380
430
if(debug){
381
431
if(if_indextoname((unsigned int)if_index, interface) == NULL){
382
if(debug){
383
perror("if_indextoname");
384
}
432
perror("if_indextoname");
385
433
return -1;
386
434
}
387
388
435
fprintf(stderr, "Binding to interface %s\n", interface);
389
436
}
390
437
391
438
memset(&to,0,sizeof(to)); /* Spurious warning */
392
439
to.sin6_family = AF_INET6;
440
/* It would be nice to have a way to detect if we were passed an
441
IPv4 address here. Now we assume an IPv6 address. */
393
442
ret = inet_pton(AF_INET6, ip, &to.sin6_addr);
394
443
if (ret < 0 ){
395
444
perror("inet_pton");
396
445
return -1;
397
}
446
}
398
447
if(ret == 0){
399
448
fprintf(stderr, "Bad address: %s\n", ip);
400
449
return -1;
405
454
406
455
if(debug){
407
456
fprintf(stderr, "Connection to: %s, port %d\n", ip, port);
408
/* char addrstr[INET6_ADDRSTRLEN]; */
409
/* if(inet_ntop(to.sin6_family, &(to.sin6_addr), addrstr, */
410
/* sizeof(addrstr)) == NULL){ */
411
/* perror("inet_ntop"); */
412
/* } else { */
413
/* fprintf(stderr, "Really connecting to: %s, port %d\n", */
414
/* addrstr, ntohs(to.sin6_port)); */
415
/* } */
457
char addrstr[INET6_ADDRSTRLEN] = "";
458
if(inet_ntop(to.sin6_family, &(to.sin6_addr), addrstr,
459
sizeof(addrstr)) == NULL){
460
perror("inet_ntop");
461
} else {
462
if(strcmp(addrstr, ip) != 0){
463
fprintf(stderr, "Canonical address form: %s\n", addrstr);
464
}
465
}
416
466
}
417
467
418
468
ret = connect(tcp_sd, (struct sockaddr *) &to, sizeof(to));
420
470
perror("connect");
421
471
return -1;
422
472
}
423
424
ret = initgnutls (&es);
425
if (ret != 0){
426
retval = -1;
427
return -1;
473
474
const char *out = mandos_protocol_version;
475
written = 0;
476
while (true){
477
size_t out_size = strlen(out);
478
ret = TEMP_FAILURE_RETRY(write(tcp_sd, out + written,
479
out_size - written));
480
if (ret == -1){
481
perror("write");
482
retval = -1;
483
goto mandos_end;
484
}
485
written += (size_t)ret;
486
if(written < out_size){
487
continue;
488
} else {
489
if (out == mandos_protocol_version){
490
written = 0;
491
out = "\r\n";
492
} else {
493
break;
494
}
495
}
428
496
}
429
430
gnutls_transport_set_ptr (es.session,
431
(gnutls_transport_ptr_t) tcp_sd);
432
497
433
498
if(debug){
434
499
fprintf(stderr, "Establishing TLS session with %s\n", ip);
435
500
}
436
501
437
ret = gnutls_handshake (es.session);
502
gnutls_transport_set_ptr (session, (gnutls_transport_ptr_t) tcp_sd);
503
504
ret = gnutls_handshake (session);
438
505
439
506
if (ret != GNUTLS_E_SUCCESS){
440
507
if(debug){
441
fprintf(stderr, "\n*** Handshake failed ***\n");
508
fprintf(stderr, "*** GnuTLS Handshake failed ***\n");
442
509
gnutls_perror (ret);
443
510
}
444
511
retval = -1;
445
goto exit;
512
goto mandos_end;
446
513
}
447
514
448
//Retrieve OpenPGP packet that contains the wanted password
515
/* Read OpenPGP packet that contains the wanted password */
449
516
450
517
if(debug){
451
518
fprintf(stderr, "Retrieving pgp encrypted password from %s\n",
453
520
}
454
521
455
522
while(true){
456
if (buffer_length + BUFFER_SIZE > buffer_capacity){
457
buffer = realloc(buffer, buffer_capacity + BUFFER_SIZE);
458
if (buffer == NULL){
459
perror("realloc");
460
goto exit;
461
}
462
buffer_capacity += BUFFER_SIZE;
523
buffer_capacity = adjustbuffer(&buffer, buffer_length, buffer_capacity);
524
if (buffer_capacity == 0){
525
perror("adjustbuffer");
526
retval = -1;
527
goto mandos_end;
463
528
}
464
529
465
ret = gnutls_record_recv
466
(es.session, buffer+buffer_length, BUFFER_SIZE);
530
ret = gnutls_record_recv(session, buffer+buffer_length,
531
BUFFER_SIZE);
467
532
if (ret == 0){
468
533
break;
469
534
}
473
538
case GNUTLS_E_AGAIN:
474
539
break;
475
540
case GNUTLS_E_REHANDSHAKE:
476
ret = gnutls_handshake (es.session);
541
ret = gnutls_handshake (session);
477
542
if (ret < 0){
478
fprintf(stderr, "\n*** Handshake failed ***\n");
543
fprintf(stderr, "*** GnuTLS Re-handshake failed ***\n");
479
544
gnutls_perror (ret);
480
545
retval = -1;
481
goto exit;
546
goto mandos_end;
482
547
}
483
548
break;
484
549
default:
485
550
fprintf(stderr, "Unknown error while reading data from"
486
" encrypted session with mandos server\n");
551
" encrypted session with Mandos server\n");
487
552
retval = -1;
488
gnutls_bye (es.session, GNUTLS_SHUT_RDWR);
489
goto exit;
553
gnutls_bye (session, GNUTLS_SHUT_RDWR);
554
goto mandos_end;
490
555
}
491
556
} else {
492
557
buffer_length += (size_t) ret;
493
558
}
494
559
}
495
560
561
if(debug){
562
fprintf(stderr, "Closing TLS session\n");
563
}
564
565
gnutls_bye (session, GNUTLS_SHUT_RDWR);
566
496
567
if (buffer_length > 0){
497
568
decrypted_buffer_size = pgp_packet_decrypt(buffer,
498
569
buffer_length,
499
570
&decrypted_buffer,
500
certdir);
571
keydir);
501
572
if (decrypted_buffer_size >= 0){
573
written = 0;
502
574
while(written < (size_t) decrypted_buffer_size){
503
575
ret = (int)fwrite (decrypted_buffer + written, 1,
504
576
(size_t)decrypted_buffer_size - written,
518
590
retval = -1;
519
591
}
520
592
}
521
522
//shutdown procedure
523
524
if(debug){
525
fprintf(stderr, "Closing TLS session\n");
526
}
527
593
594
/* Shutdown procedure */
595
596
mandos_end:
528
597
free(buffer);
529
gnutls_bye (es.session, GNUTLS_SHUT_RDWR);
530
exit:
531
598
close(tcp_sd);
532
gnutls_deinit (es.session);
533
gnutls_certificate_free_credentials (es.cred);
599
gnutls_deinit (session);
600
gnutls_certificate_free_credentials (mc->cred);
534
601
gnutls_global_deinit ();
535
602
return retval;
536
603
}
537
604
538
static void resolve_callback( AvahiSServiceResolver *r,
539
AvahiIfIndex interface,
540
AVAHI_GCC_UNUSED AvahiProtocol protocol,
541
AvahiResolverEvent event,
542
const char *name,
543
const char *type,
544
const char *domain,
545
const char *host_name,
546
const AvahiAddress *address,
547
uint16_t port,
548
AVAHI_GCC_UNUSED AvahiStringList *txt,
549
AVAHI_GCC_UNUSED AvahiLookupResultFlags flags,
550
AVAHI_GCC_UNUSED void* userdata) {
605
static void resolve_callback(AvahiSServiceResolver *r,
606
AvahiIfIndex interface,
607
AVAHI_GCC_UNUSED AvahiProtocol protocol,
608
AvahiResolverEvent event,
609
const char *name,
610
const char *type,
611
const char *domain,
612
const char *host_name,
613
const AvahiAddress *address,
614
uint16_t port,
615
AVAHI_GCC_UNUSED AvahiStringList *txt,
616
AVAHI_GCC_UNUSED AvahiLookupResultFlags
617
flags,
618
void* userdata) {
551
619
mandos_context *mc = userdata;
552
620
assert(r); /* Spurious warning */
553
621
557
625
switch (event) {
558
626
default:
559
627
case AVAHI_RESOLVER_FAILURE:
560
fprintf(stderr, "(Resolver) Failed to resolve service '%s' of"
561
" type '%s' in domain '%s': %s\n", name, type, domain,
628
fprintf(stderr, "(Avahi Resolver) Failed to resolve service '%s'"
629
" of type '%s' in domain '%s': %s\n", name, type, domain,
562
630
avahi_strerror(avahi_server_errno(mc->server)));
563
631
break;
564
632
567
635
char ip[AVAHI_ADDRESS_STR_MAX];
568
636
avahi_address_snprint(ip, sizeof(ip), address);
569
637
if(debug){
570
fprintf(stderr, "Mandos server \"%s\" found on %s (%s) on"
571
" port %d\n", name, host_name, ip, port);
638
fprintf(stderr, "Mandos server \"%s\" found on %s (%s, %d) on"
639
" port %d\n", name, host_name, ip, interface, port);
572
640
}
573
641
int ret = start_mandos_communication(ip, port, interface, mc);
574
642
if (ret == 0){
586
654
const char *name,
587
655
const char *type,
588
656
const char *domain,
589
AVAHI_GCC_UNUSED AvahiLookupResultFlags flags,
657
AVAHI_GCC_UNUSED AvahiLookupResultFlags
658
flags,
590
659
void* userdata) {
591
660
mandos_context *mc = userdata;
592
661
assert(b); /* Spurious warning */
597
666
switch (event) {
598
667
default:
599
668
case AVAHI_BROWSER_FAILURE:
600
601
fprintf(stderr, "(Browser) %s\n",
669
670
fprintf(stderr, "(Avahi browser) %s\n",
602
671
avahi_strerror(avahi_server_errno(mc->server)));
603
672
avahi_simple_poll_quit(mc->simple_poll);
604
673
return;
605
674
606
675
case AVAHI_BROWSER_NEW:
607
/* We ignore the returned resolver object. In the callback
608
function we free it. If the server is terminated before
609
the callback function is called the server will free
610
the resolver for us. */
611
612
if (!(avahi_s_service_resolver_new(mc->server, interface, protocol, name,
613
type, domain,
676
/* We ignore the returned Avahi resolver object. In the callback
677
function we free it. If the Avahi server is terminated before
678
the callback function is called the Avahi server will free the
679
resolver for us. */
680
681
if (!(avahi_s_service_resolver_new(mc->server, interface,
682
protocol, name, type, domain,
614
683
AVAHI_PROTO_INET6, 0,
615
684
resolve_callback, mc)))
616
fprintf(stderr, "Failed to resolve service '%s': %s\n", name,
617
avahi_strerror(avahi_server_errno(s)));
685
fprintf(stderr, "Avahi: Failed to resolve service '%s': %s\n",
686
name, avahi_strerror(avahi_server_errno(mc->server)));
618
687
break;
619
688
620
689
case AVAHI_BROWSER_REMOVE:
621
690
break;
622
691
623
692
case AVAHI_BROWSER_ALL_FOR_NOW:
624
693
case AVAHI_BROWSER_CACHE_EXHAUSTED:
694
if(debug){
695
fprintf(stderr, "No Mandos server found, still searching...\n");
696
}
625
697
break;
626
698
}
627
699
}
636
708
return NULL;
637
709
}
638
710
if(f_len > 0){
639
memcpy(tmp, first, f_len);
711
memcpy(tmp, first, f_len); /* Spurious warning */
640
712
}
641
713
tmp[f_len] = '/';
642
714
if(s_len > 0){
643
memcpy(tmp + f_len + 1, second, s_len);
715
memcpy(tmp + f_len + 1, second, s_len); /* Spurious warning */
644
716
}
645
717
tmp[f_len + 1 + s_len] = '\0';
646
718
return tmp;
647
719
}
648
720
649
721
650
int main(AVAHI_GCC_UNUSED int argc, AVAHI_GCC_UNUSED char*argv[]) {
651
AvahiServerConfig config;
722
int main(int argc, char *argv[]){
652
723
AvahiSServiceBrowser *sb = NULL;
653
724
int error;
654
725
int ret;
655
int returncode = EXIT_SUCCESS;
726
int exitcode = EXIT_SUCCESS;
656
727
const char *interface = "eth0";
657
728
struct ifreq network;
658
729
int sd;
730
uid_t uid;
731
gid_t gid;
659
732
char *connect_to = NULL;
660
733
AvahiIfIndex if_index = AVAHI_IF_UNSPEC;
661
734
mandos_context mc = { .simple_poll = NULL, .server = NULL,
662
.dh_bits = 2048, .priority = "SECURE256"};
735
.dh_bits = 1024, .priority = "SECURE256"};
663
736
664
while (true){
665
static struct option long_options[] = {
666
{"debug", no_argument, (int *)&debug, 1},
667
{"connect", required_argument, 0, 'C'},
668
{"interface", required_argument, 0, 'i'},
669
{"certdir", required_argument, 0, 'd'},
670
{"certkey", required_argument, 0, 'c'},
671
{"certfile", required_argument, 0, 'k'},
672
{"dh_bits", required_argument, 0, 'D'},
673
{"priority", required_argument, 0, 'p'},
674
{0, 0, 0, 0} };
675
676
int option_index = 0;
677
ret = getopt_long (argc, argv, "i:", long_options,
678
&option_index);
679
680
if (ret == -1){
681
break;
682
}
683
684
switch(ret){
685
case 0:
686
break;
687
case 'i':
688
interface = optarg;
689
break;
690
case 'C':
691
connect_to = optarg;
692
break;
693
case 'd':
694
certdir = optarg;
695
break;
696
case 'c':
697
certfile = optarg;
698
break;
699
case 'k':
700
certkey = optarg;
701
break;
702
case 'D':
703
{
704
long int tmp;
737
{
738
/* Temporary int to get the address of for getopt_long */
739
int debug_int = debug ? 1 : 0;
740
while (true){
741
struct option long_options[] = {
742
{"debug", no_argument, &debug_int, 1},
743
{"connect", required_argument, NULL, 'c'},
744
{"interface", required_argument, NULL, 'i'},
745
{"keydir", required_argument, NULL, 'd'},
746
{"seckey", required_argument, NULL, 's'},
747
{"pubkey", required_argument, NULL, 'p'},
748
{"dh-bits", required_argument, NULL, 'D'},
749
{"priority", required_argument, NULL, 'P'},
750
{0, 0, 0, 0} };
751
752
int option_index = 0;
753
ret = getopt_long (argc, argv, "i:", long_options,
754
&option_index);
755
756
if (ret == -1){
757
break;
758
}
759
760
switch(ret){
761
case 0:
762
break;
763
case 'i':
764
interface = optarg;
765
break;
766
case 'c':
767
connect_to = optarg;
768
break;
769
case 'd':
770
keydir = optarg;
771
break;
772
case 'p':
773
pubkeyfile = optarg;
774
break;
775
case 's':
776
seckeyfile = optarg;
777
break;
778
case 'D':
705
779
errno = 0;
706
tmp = strtol(optarg, NULL, 10);
707
if (errno == ERANGE){
780
mc.dh_bits = (unsigned int) strtol(optarg, NULL, 10);
781
if (errno){
708
782
perror("strtol");
709
783
exit(EXIT_FAILURE);
710
784
}
711
mc.dh_bits = tmp;
785
break;
786
case 'P':
787
mc.priority = optarg;
788
break;
789
case '?':
790
default:
791
/* getopt_long() has already printed a message about the
792
unrcognized option, so just exit. */
793
exit(EXIT_FAILURE);
712
794
}
713
break;
714
case 'p':
715
mc.priority = optarg;
716
break;
717
default:
718
exit(EXIT_FAILURE);
719
795
}
720
}
721
722
certfile = combinepath(certdir, certfile);
723
if (certfile == NULL){
724
perror("combinepath");
725
returncode = EXIT_FAILURE;
726
goto exit;
727
}
728
729
certkey = combinepath(certdir, certkey);
730
if (certkey == NULL){
731
perror("combinepath");
732
returncode = EXIT_FAILURE;
733
goto exit;
796
/* Set the global debug flag from the temporary int */
797
debug = debug_int ? true : false;
798
}
799
800
pubkeyfile = combinepath(keydir, pubkeyfile);
801
if (pubkeyfile == NULL){
802
perror("combinepath");
803
exitcode = EXIT_FAILURE;
804
goto end;
805
}
806
807
seckeyfile = combinepath(keydir, seckeyfile);
808
if (seckeyfile == NULL){
809
perror("combinepath");
810
goto end;
811
}
812
813
ret = init_gnutls_global(&mc);
814
if (ret == -1){
815
fprintf(stderr, "init_gnutls_global\n");
816
goto end;
817
}
818
819
uid = getuid();
820
gid = getgid();
821
822
ret = setuid(uid);
823
if (ret == -1){
824
perror("setuid");
825
}
826
827
setgid(gid);
828
if (ret == -1){
829
perror("setgid");
734
830
}
735
831
736
832
if_index = (AvahiIfIndex) if_nametoindex(interface);
745
841
char *address = strrchr(connect_to, ':');
746
842
if(address == NULL){
747
843
fprintf(stderr, "No colon in address\n");
748
exit(EXIT_FAILURE);
844
exitcode = EXIT_FAILURE;
845
goto end;
749
846
}
750
847
errno = 0;
751
848
uint16_t port = (uint16_t) strtol(address+1, NULL, 10);
752
849
if(errno){
753
850
perror("Bad port number");
754
exit(EXIT_FAILURE);
851
exitcode = EXIT_FAILURE;
852
goto end;
755
853
}
756
854
*address = '\0';
757
855
address = connect_to;
758
ret = start_mandos_communication(address, port, if_index);
856
ret = start_mandos_communication(address, port, if_index, &mc);
759
857
if(ret < 0){
760
exit(EXIT_FAILURE);
858
exitcode = EXIT_FAILURE;
761
859
} else {
762
exit(EXIT_SUCCESS);
860
exitcode = EXIT_SUCCESS;
763
861
}
862
goto end;
764
863
}
765
864
766
sd = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);
767
if(sd < 0) {
768
perror("socket");
769
returncode = EXIT_FAILURE;
770
goto exit;
771
}
772
strcpy(network.ifr_name, interface);
773
ret = ioctl(sd, SIOCGIFFLAGS, &network);
774
if(ret == -1){
775
776
perror("ioctl SIOCGIFFLAGS");
777
returncode = EXIT_FAILURE;
778
goto exit;
779
}
780
if((network.ifr_flags & IFF_UP) == 0){
781
network.ifr_flags |= IFF_UP;
782
ret = ioctl(sd, SIOCSIFFLAGS, &network);
865
/* If the interface is down, bring it up */
866
{
867
sd = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);
868
if(sd < 0) {
869
perror("socket");
870
exitcode = EXIT_FAILURE;
871
goto end;
872
}
873
strcpy(network.ifr_name, interface); /* Spurious warning */
874
ret = ioctl(sd, SIOCGIFFLAGS, &network);
783
875
if(ret == -1){
784
perror("ioctl SIOCSIFFLAGS");
785
returncode = EXIT_FAILURE;
786
goto exit;
787
}
876
perror("ioctl SIOCGIFFLAGS");
877
exitcode = EXIT_FAILURE;
878
goto end;
879
}
880
if((network.ifr_flags & IFF_UP) == 0){
881
network.ifr_flags |= IFF_UP;
882
ret = ioctl(sd, SIOCSIFFLAGS, &network);
883
if(ret == -1){
884
perror("ioctl SIOCSIFFLAGS");
885
exitcode = EXIT_FAILURE;
886
goto end;
887
}
888
}
889
close(sd);
788
890
}
789
close(sd);
790
891
791
892
if (not debug){
792
893
avahi_set_log_function(empty_log);
793
894
}
794
895
795
/* Initialize the psuedo-RNG */
896
/* Initialize the pseudo-RNG for Avahi */
796
897
srand((unsigned int) time(NULL));
797
798
/* Allocate main loop object */
799
if (!(mc.simple_poll = avahi_simple_poll_new())) {
800
fprintf(stderr, "Failed to create simple poll object.\n");
801
returncode = EXIT_FAILURE;
802
goto exit;
803
}
804
805
/* Do not publish any local records */
806
avahi_server_config_init(&config);
807
config.publish_hinfo = 0;
808
config.publish_addresses = 0;
809
config.publish_workstation = 0;
810
config.publish_domain = 0;
811
812
/* Allocate a new server */
813
mc.server = avahi_server_new(avahi_simple_poll_get(simple_poll),
814
&config, NULL, NULL, &error);
815
816
/* Free the configuration data */
817
avahi_server_config_free(&config);
818
819
/* Check if creating the server object succeeded */
820
if (!mc.server) {
821
fprintf(stderr, "Failed to create server: %s\n",
898
899
/* Allocate main Avahi loop object */
900
mc.simple_poll = avahi_simple_poll_new();
901
if (mc.simple_poll == NULL) {
902
fprintf(stderr, "Avahi: Failed to create simple poll"
903
" object.\n");
904
exitcode = EXIT_FAILURE;
905
goto end;
906
}
907
908
{
909
AvahiServerConfig config;
910
/* Do not publish any local Zeroconf records */
911
avahi_server_config_init(&config);
912
config.publish_hinfo = 0;
913
config.publish_addresses = 0;
914
config.publish_workstation = 0;
915
config.publish_domain = 0;
916
917
/* Allocate a new server */
918
mc.server = avahi_server_new(avahi_simple_poll_get
919
(mc.simple_poll), &config, NULL,
920
NULL, &error);
921
922
/* Free the Avahi configuration data */
923
avahi_server_config_free(&config);
924
}
925
926
/* Check if creating the Avahi server object succeeded */
927
if (mc.server == NULL) {
928
fprintf(stderr, "Failed to create Avahi server: %s\n",
822
929
avahi_strerror(error));
823
returncode = EXIT_FAILURE;
824
goto exit;
930
exitcode = EXIT_FAILURE;
931
goto end;
825
932
}
826
933
827
/* Create the service browser */
934
/* Create the Avahi service browser */
828
935
sb = avahi_s_service_browser_new(mc.server, if_index,
829
936
AVAHI_PROTO_INET6,
830
937
"_mandos._tcp", NULL, 0,
831
938
browse_callback, &mc);
832
if (!sb) {
939
if (sb == NULL) {
833
940
fprintf(stderr, "Failed to create service browser: %s\n",
834
941
avahi_strerror(avahi_server_errno(mc.server)));
835
returncode = EXIT_FAILURE;
836
goto exit;
942
exitcode = EXIT_FAILURE;
943
goto end;
837
944
}
838
945
839
946
/* Run the main loop */
840
947
841
948
if (debug){
842
fprintf(stderr, "Starting avahi loop search\n");
949
fprintf(stderr, "Starting Avahi loop search\n");
843
950
}
844
951
845
avahi_simple_poll_loop(simple_poll);
952
avahi_simple_poll_loop(mc.simple_poll);
846
953
847
exit:
954
end:
848
955
849
956
if (debug){
850
957
fprintf(stderr, "%s exiting\n", argv[0]);
851
958
}
852
959
853
960
/* Cleanup things */
854
if (sb)
961
if (sb != NULL)
855
962
avahi_s_service_browser_free(sb);
856
963
857
if (mc.server)
964
if (mc.server != NULL)
858
965
avahi_server_free(mc.server);
859
966
860
if (simple_poll)
861
avahi_simple_poll_free(simple_poll);
862
free(certfile);
863
free(certkey);
967
if (mc.simple_poll != NULL)
968
avahi_simple_poll_free(mc.simple_poll);
969
free(pubkeyfile);
970
free(seckeyfile);
864
971
865
return returncode;
972
return exitcode;
866
973
}
Loggerhead is a web-based interface for Breezy
Version: 2.0.2.dev0