To get this branch, use:
bzr branch
http://bzr.recompile.se/loggerhead/mandos/trunk
« back to all changes in this revision
Viewing changes to plugins.d/mandos-client.c
- browse files at revision 237.2.33
- compare with another revision
- download diff
- download tarball
- view history from revision 237.2.33
- Committer: teddy at bsnet
- Date: 2010-08-10 19:08:24 UTC
- mto: This revision was merged to the branch mainline in revision 419.
- Revision ID: teddy@fukt.bsnet.se-20100810190824-5yquozxy4kh6py3f
* plugins.d/mandos-client.c: An empty interface name now means to
autodetect an interface; to specify no
particular interface, use "none".
(sys_class_net): New global variable for the "/sys/class/net" path.
(good_interface): New function to determine the suitability of an
interface. Used by a scandir() call in main().
(main): Changed default value for "interface" to the empty string.
Moved "connect_to" to be a global variable. Only take down
and up interface if its name is not "none".
* plugins.d/mandos-client.xml (OPTIONS): Update documentation for the
"--interface" option.
autodetect an interface; to specify no
particular interface, use "none".
(sys_class_net): New global variable for the "/sys/class/net" path.
(good_interface): New function to determine the suitability of an
interface. Used by a scandir() call in main().
(main): Changed default value for "interface" to the empty string.
Moved "connect_to" to be a global variable. Only take down
and up interface if its name is not "none".
* plugins.d/mandos-client.xml (OPTIONS): Update documentation for the
"--interface" option.
- files modified:
- INSTALL
added
removed
plugins.d/mandos-client.c
30
30
*/
31
31
32
32
/* Needed by GPGME, specifically gpgme_data_seek() */
33
#ifndef _LARGEFILE_SOURCE
33
34
#define _LARGEFILE_SOURCE
35
#endif
36
#ifndef _FILE_OFFSET_BITS
34
37
#define _FILE_OFFSET_BITS 64
38
#endif
35
39
36
40
#define _GNU_SOURCE /* TEMP_FAILURE_RETRY(), asprintf() */
37
41
38
42
#include <stdio.h> /* fprintf(), stderr, fwrite(),
39
stdout, ferror(), sscanf(),
40
remove() */
43
stdout, ferror(), remove() */
41
44
#include <stdint.h> /* uint16_t, uint32_t */
42
45
#include <stddef.h> /* NULL, size_t, ssize_t */
43
46
#include <stdlib.h> /* free(), EXIT_SUCCESS, EXIT_FAILURE,
44
srand() */
45
#include <stdbool.h> /* bool, true */
47
srand(), strtof(), abort() */
48
#include <stdbool.h> /* bool, false, true */
46
49
#include <string.h> /* memset(), strcmp(), strlen(),
47
50
strerror(), asprintf(), strcpy() */
48
#include <sys/ioctl.h> /* ioctl */
51
#include <sys/ioctl.h> /* ioctl */
49
52
#include <sys/types.h> /* socket(), inet_pton(), sockaddr,
50
53
sockaddr_in6, PF_INET6,
51
SOCK_STREAM, INET6_ADDRSTRLEN,
52
uid_t, gid_t, open(), opendir(),
53
DIR */
54
SOCK_STREAM, uid_t, gid_t, open(),
55
opendir(), DIR */
54
56
#include <sys/stat.h> /* open() */
55
57
#include <sys/socket.h> /* socket(), struct sockaddr_in6,
56
struct in6_addr, inet_pton(),
57
connect() */
58
inet_pton(), connect() */
58
59
#include <fcntl.h> /* open() */
59
60
#include <dirent.h> /* opendir(), struct dirent, readdir()
60
61
*/
61
#include <inttypes.h> /* PRIu16, intmax_t, SCNdMAX */
62
#include <inttypes.h> /* PRIu16, PRIdMAX, intmax_t,
63
strtoimax() */
62
64
#include <assert.h> /* assert() */
63
65
#include <errno.h> /* perror(), errno */
64
#include <time.h> /* time() */
66
#include <time.h> /* nanosleep(), time() */
65
67
#include <net/if.h> /* ioctl, ifreq, SIOCGIFFLAGS, IFF_UP,
66
68
SIOCSIFFLAGS, if_indextoname(),
67
69
if_nametoindex(), IF_NAMESIZE */
68
#include <netinet/in.h>
70
#include <netinet/in.h> /* IN6_IS_ADDR_LINKLOCAL,
71
INET_ADDRSTRLEN, INET6_ADDRSTRLEN
72
*/
69
73
#include <unistd.h> /* close(), SEEK_SET, off_t, write(),
70
getuid(), getgid(), setuid(),
71
setgid() */
74
getuid(), getgid(), seteuid(),
75
setgid(), pause() */
72
76
#include <arpa/inet.h> /* inet_pton(), htons */
73
#include <iso646.h> /* not, and, or */
77
#include <iso646.h> /* not, or, and */
74
78
#include <argp.h> /* struct argp_option, error_t, struct
75
79
argp_state, struct argp,
76
80
argp_parse(), ARGP_KEY_ARG,
77
81
ARGP_KEY_END, ARGP_ERR_UNKNOWN */
82
#include <signal.h> /* sigemptyset(), sigaddset(),
83
sigaction(), SIGTERM, sig_atomic_t,
84
raise() */
85
86
#ifdef __linux__
87
#include <sys/klog.h> /* klogctl() */
88
#endif /* __linux__ */
78
89
79
90
/* Avahi */
80
91
/* All Avahi types, constants and functions
114
125
static const char mandos_protocol_version[] = "1";
115
126
const char *argp_program_version = "mandos-client " VERSION;
116
127
const char *argp_program_bug_address = "<mandos@fukt.bsnet.se>";
128
static const char sys_class_net[] = "/sys/class/net";
129
char *connect_to = NULL;
117
130
118
131
/* Used for passing in values through the Avahi callback functions */
119
132
typedef struct {
126
139
gpgme_ctx_t ctx;
127
140
} mandos_context;
128
141
142
/* global context so signal handler can reach it*/
143
mandos_context mc = { .simple_poll = NULL, .server = NULL,
144
.dh_bits = 1024, .priority = "SECURE256"
145
":!CTYPE-X.509:+CTYPE-OPENPGP" };
146
147
sig_atomic_t quit_now = 0;
148
int signal_received = 0;
149
129
150
/*
130
* Make room in "buffer" for at least BUFFER_SIZE additional bytes.
131
* "buffer_capacity" is how much is currently allocated,
151
* Make additional room in "buffer" for at least BUFFER_SIZE more
152
* bytes. "buffer_capacity" is how much is currently allocated,
132
153
* "buffer_length" is how much is already used.
133
154
*/
134
size_t adjustbuffer(char **buffer, size_t buffer_length,
155
size_t incbuffer(char **buffer, size_t buffer_length,
135
156
size_t buffer_capacity){
136
157
if(buffer_length + BUFFER_SIZE > buffer_capacity){
137
158
*buffer = realloc(*buffer, buffer_capacity + BUFFER_SIZE);
146
167
/*
147
168
* Initialize GPGME.
148
169
*/
149
static bool init_gpgme(mandos_context *mc, const char *seckey,
170
static bool init_gpgme(const char *seckey,
150
171
const char *pubkey, const char *tempdir){
151
int ret;
152
172
gpgme_error_t rc;
153
173
gpgme_engine_info_t engine_info;
154
174
155
175
156
176
/*
157
* Helper function to insert pub and seckey to the enigne keyring.
177
* Helper function to insert pub and seckey to the engine keyring.
158
178
*/
159
179
bool import_key(const char *filename){
180
int ret;
160
181
int fd;
161
182
gpgme_data_t pgp_data;
162
183
173
194
return false;
174
195
}
175
196
176
rc = gpgme_op_import(mc->ctx, pgp_data);
197
rc = gpgme_op_import(mc.ctx, pgp_data);
177
198
if(rc != GPG_ERR_NO_ERROR){
178
199
fprintf(stderr, "bad gpgme_op_import: %s: %s\n",
179
200
gpgme_strsource(rc), gpgme_strerror(rc));
189
210
}
190
211
191
212
if(debug){
192
fprintf(stderr, "Initialize gpgme\n");
213
fprintf(stderr, "Initializing GPGME\n");
193
214
}
194
215
195
216
/* Init GPGME */
222
243
}
223
244
224
245
/* Create new GPGME "context" */
225
rc = gpgme_new(&(mc->ctx));
246
rc = gpgme_new(&(mc.ctx));
226
247
if(rc != GPG_ERR_NO_ERROR){
227
248
fprintf(stderr, "bad gpgme_new: %s: %s\n",
228
249
gpgme_strsource(rc), gpgme_strerror(rc));
233
254
return false;
234
255
}
235
256
236
return true;
257
return true;
237
258
}
238
259
239
260
/*
240
261
* Decrypt OpenPGP data.
241
262
* Returns -1 on error
242
263
*/
243
static ssize_t pgp_packet_decrypt(const mandos_context *mc,
244
const char *cryptotext,
264
static ssize_t pgp_packet_decrypt(const char *cryptotext,
245
265
size_t crypto_size,
246
266
char **plaintext){
247
267
gpgme_data_t dh_crypto, dh_plain;
274
294
275
295
/* Decrypt data from the cryptotext data buffer to the plaintext
276
296
data buffer */
277
rc = gpgme_op_decrypt(mc->ctx, dh_crypto, dh_plain);
297
rc = gpgme_op_decrypt(mc.ctx, dh_crypto, dh_plain);
278
298
if(rc != GPG_ERR_NO_ERROR){
279
299
fprintf(stderr, "bad gpgme_op_decrypt: %s: %s\n",
280
300
gpgme_strsource(rc), gpgme_strerror(rc));
281
301
plaintext_length = -1;
282
302
if(debug){
283
303
gpgme_decrypt_result_t result;
284
result = gpgme_op_decrypt_result(mc->ctx);
304
result = gpgme_op_decrypt_result(mc.ctx);
285
305
if(result == NULL){
286
306
fprintf(stderr, "gpgme_op_decrypt_result failed\n");
287
307
} else {
294
314
}
295
315
gpgme_recipient_t recipient;
296
316
recipient = result->recipients;
297
if(recipient){
298
while(recipient != NULL){
299
fprintf(stderr, "Public key algorithm: %s\n",
300
gpgme_pubkey_algo_name(recipient->pubkey_algo));
301
fprintf(stderr, "Key ID: %s\n", recipient->keyid);
302
fprintf(stderr, "Secret key available: %s\n",
303
recipient->status == GPG_ERR_NO_SECKEY
304
? "No" : "Yes");
305
recipient = recipient->next;
306
}
317
while(recipient != NULL){
318
fprintf(stderr, "Public key algorithm: %s\n",
319
gpgme_pubkey_algo_name(recipient->pubkey_algo));
320
fprintf(stderr, "Key ID: %s\n", recipient->keyid);
321
fprintf(stderr, "Secret key available: %s\n",
322
recipient->status == GPG_ERR_NO_SECKEY
323
? "No" : "Yes");
324
recipient = recipient->next;
307
325
}
308
326
}
309
327
}
323
341
324
342
*plaintext = NULL;
325
343
while(true){
326
plaintext_capacity = adjustbuffer(plaintext,
344
plaintext_capacity = incbuffer(plaintext,
327
345
(size_t)plaintext_length,
328
346
plaintext_capacity);
329
347
if(plaintext_capacity == 0){
330
perror("adjustbuffer");
348
perror("incbuffer");
331
349
plaintext_length = -1;
332
350
goto decrypt_end;
333
351
}
365
383
return plaintext_length;
366
384
}
367
385
368
static const char * safer_gnutls_strerror(int value) {
386
static const char * safer_gnutls_strerror(int value){
369
387
const char *ret = gnutls_strerror(value); /* Spurious warning from
370
388
-Wunreachable-code */
371
389
if(ret == NULL)
379
397
fprintf(stderr, "GnuTLS: %s", string);
380
398
}
381
399
382
static int init_gnutls_global(mandos_context *mc,
383
const char *pubkeyfilename,
400
static int init_gnutls_global(const char *pubkeyfilename,
384
401
const char *seckeyfilename){
385
402
int ret;
386
403
389
406
}
390
407
391
408
ret = gnutls_global_init();
392
if(ret != GNUTLS_E_SUCCESS) {
409
if(ret != GNUTLS_E_SUCCESS){
393
410
fprintf(stderr, "GnuTLS global_init: %s\n",
394
411
safer_gnutls_strerror(ret));
395
412
return -1;
404
421
}
405
422
406
423
/* OpenPGP credentials */
407
gnutls_certificate_allocate_credentials(&mc->cred);
424
gnutls_certificate_allocate_credentials(&mc.cred);
408
425
if(ret != GNUTLS_E_SUCCESS){
409
426
fprintf(stderr, "GnuTLS memory error: %s\n", /* Spurious warning
410
* from
411
* -Wunreachable-code
412
*/
427
from
428
-Wunreachable-code
429
*/
413
430
safer_gnutls_strerror(ret));
414
431
gnutls_global_deinit();
415
432
return -1;
422
439
}
423
440
424
441
ret = gnutls_certificate_set_openpgp_key_file
425
(mc->cred, pubkeyfilename, seckeyfilename,
442
(mc.cred, pubkeyfilename, seckeyfilename,
426
443
GNUTLS_OPENPGP_FMT_BASE64);
427
if(ret != GNUTLS_E_SUCCESS) {
444
if(ret != GNUTLS_E_SUCCESS){
428
445
fprintf(stderr,
429
446
"Error[%d] while reading the OpenPGP key pair ('%s',"
430
447
" '%s')\n", ret, pubkeyfilename, seckeyfilename);
434
451
}
435
452
436
453
/* GnuTLS server initialization */
437
ret = gnutls_dh_params_init(&mc->dh_params);
438
if(ret != GNUTLS_E_SUCCESS) {
454
ret = gnutls_dh_params_init(&mc.dh_params);
455
if(ret != GNUTLS_E_SUCCESS){
439
456
fprintf(stderr, "Error in GnuTLS DH parameter initialization:"
440
457
" %s\n", safer_gnutls_strerror(ret));
441
458
goto globalfail;
442
459
}
443
ret = gnutls_dh_params_generate2(mc->dh_params, mc->dh_bits);
444
if(ret != GNUTLS_E_SUCCESS) {
460
ret = gnutls_dh_params_generate2(mc.dh_params, mc.dh_bits);
461
if(ret != GNUTLS_E_SUCCESS){
445
462
fprintf(stderr, "Error in GnuTLS prime generation: %s\n",
446
463
safer_gnutls_strerror(ret));
447
464
goto globalfail;
448
465
}
449
466
450
gnutls_certificate_set_dh_params(mc->cred, mc->dh_params);
467
gnutls_certificate_set_dh_params(mc.cred, mc.dh_params);
451
468
452
469
return 0;
453
470
454
471
globalfail:
455
472
456
gnutls_certificate_free_credentials(mc->cred);
473
gnutls_certificate_free_credentials(mc.cred);
457
474
gnutls_global_deinit();
458
gnutls_dh_params_deinit(mc->dh_params);
475
gnutls_dh_params_deinit(mc.dh_params);
459
476
return -1;
460
477
}
461
478
462
static int init_gnutls_session(mandos_context *mc,
463
gnutls_session_t *session){
479
static int init_gnutls_session(gnutls_session_t *session){
464
480
int ret;
465
481
/* GnuTLS session creation */
466
ret = gnutls_init(session, GNUTLS_SERVER);
482
do {
483
ret = gnutls_init(session, GNUTLS_SERVER);
484
if(quit_now){
485
return -1;
486
}
487
} while(ret == GNUTLS_E_INTERRUPTED or ret == GNUTLS_E_AGAIN);
467
488
if(ret != GNUTLS_E_SUCCESS){
468
489
fprintf(stderr, "Error in GnuTLS session initialization: %s\n",
469
490
safer_gnutls_strerror(ret));
471
492
472
493
{
473
494
const char *err;
474
ret = gnutls_priority_set_direct(*session, mc->priority, &err);
475
if(ret != GNUTLS_E_SUCCESS) {
495
do {
496
ret = gnutls_priority_set_direct(*session, mc.priority, &err);
497
if(quit_now){
498
gnutls_deinit(*session);
499
return -1;
500
}
501
} while(ret == GNUTLS_E_INTERRUPTED or ret == GNUTLS_E_AGAIN);
502
if(ret != GNUTLS_E_SUCCESS){
476
503
fprintf(stderr, "Syntax error at: %s\n", err);
477
504
fprintf(stderr, "GnuTLS error: %s\n",
478
505
safer_gnutls_strerror(ret));
481
508
}
482
509
}
483
510
484
ret = gnutls_credentials_set(*session, GNUTLS_CRD_CERTIFICATE,
485
mc->cred);
486
if(ret != GNUTLS_E_SUCCESS) {
511
do {
512
ret = gnutls_credentials_set(*session, GNUTLS_CRD_CERTIFICATE,
513
mc.cred);
514
if(quit_now){
515
gnutls_deinit(*session);
516
return -1;
517
}
518
} while(ret == GNUTLS_E_INTERRUPTED or ret == GNUTLS_E_AGAIN);
519
if(ret != GNUTLS_E_SUCCESS){
487
520
fprintf(stderr, "Error setting GnuTLS credentials: %s\n",
488
521
safer_gnutls_strerror(ret));
489
522
gnutls_deinit(*session);
491
524
}
492
525
493
526
/* ignore client certificate if any. */
494
gnutls_certificate_server_set_request(*session,
495
GNUTLS_CERT_IGNORE);
527
gnutls_certificate_server_set_request(*session, GNUTLS_CERT_IGNORE);
496
528
497
gnutls_dh_set_prime_bits(*session, mc->dh_bits);
529
gnutls_dh_set_prime_bits(*session, mc.dh_bits);
498
530
499
531
return 0;
500
532
}
506
538
/* Called when a Mandos server is found */
507
539
static int start_mandos_communication(const char *ip, uint16_t port,
508
540
AvahiIfIndex if_index,
509
mandos_context *mc){
510
int ret, tcp_sd;
541
int af){
542
int ret, tcp_sd = -1;
511
543
ssize_t sret;
512
union { struct sockaddr in; struct sockaddr_in6 in6; } to;
544
union {
545
struct sockaddr_in in;
546
struct sockaddr_in6 in6;
547
} to;
513
548
char *buffer = NULL;
514
char *decrypted_buffer;
549
char *decrypted_buffer = NULL;
515
550
size_t buffer_length = 0;
516
551
size_t buffer_capacity = 0;
517
ssize_t decrypted_buffer_size;
518
552
size_t written;
519
int retval = 0;
520
char interface[IF_NAMESIZE];
553
int retval = -1;
521
554
gnutls_session_t session;
522
523
ret = init_gnutls_session(mc, &session);
555
int pf; /* Protocol family */
556
557
if(quit_now){
558
return -1;
559
}
560
561
switch(af){
562
case AF_INET6:
563
pf = PF_INET6;
564
break;
565
case AF_INET:
566
pf = PF_INET;
567
break;
568
default:
569
fprintf(stderr, "Bad address family: %d\n", af);
570
return -1;
571
}
572
573
ret = init_gnutls_session(&session);
524
574
if(ret != 0){
525
575
return -1;
526
576
}
527
577
528
578
if(debug){
529
fprintf(stderr, "Setting up a tcp connection to %s, port %" PRIu16
579
fprintf(stderr, "Setting up a TCP connection to %s, port %" PRIu16
530
580
"\n", ip, port);
531
581
}
532
582
533
tcp_sd = socket(PF_INET6, SOCK_STREAM, 0);
534
if(tcp_sd < 0) {
583
tcp_sd = socket(pf, SOCK_STREAM, 0);
584
if(tcp_sd < 0){
535
585
perror("socket");
536
return -1;
586
goto mandos_end;
537
587
}
538
588
539
if(debug){
540
if(if_indextoname((unsigned int)if_index, interface) == NULL){
541
perror("if_indextoname");
542
return -1;
543
}
544
fprintf(stderr, "Binding to interface %s\n", interface);
589
if(quit_now){
590
goto mandos_end;
545
591
}
546
592
547
593
memset(&to, 0, sizeof(to));
548
to.in6.sin6_family = AF_INET6;
549
/* It would be nice to have a way to detect if we were passed an
550
IPv4 address here. Now we assume an IPv6 address. */
551
ret = inet_pton(AF_INET6, ip, &to.in6.sin6_addr);
594
if(af == AF_INET6){
595
to.in6.sin6_family = (sa_family_t)af;
596
ret = inet_pton(af, ip, &to.in6.sin6_addr);
597
} else { /* IPv4 */
598
to.in.sin_family = (sa_family_t)af;
599
ret = inet_pton(af, ip, &to.in.sin_addr);
600
}
552
601
if(ret < 0 ){
553
602
perror("inet_pton");
554
return -1;
603
goto mandos_end;
555
604
}
556
605
if(ret == 0){
557
606
fprintf(stderr, "Bad address: %s\n", ip);
558
return -1;
607
goto mandos_end;
559
608
}
560
to.in6.sin6_port = htons(port); /* Spurious warnings from
609
if(af == AF_INET6){
610
to.in6.sin6_port = htons(port); /* Spurious warnings from
611
-Wconversion and
612
-Wunreachable-code */
613
614
if(IN6_IS_ADDR_LINKLOCAL /* Spurious warnings from */
615
(&to.in6.sin6_addr)){ /* -Wstrict-aliasing=2 or lower and
616
-Wunreachable-code*/
617
if(if_index == AVAHI_IF_UNSPEC){
618
fprintf(stderr, "An IPv6 link-local address is incomplete"
619
" without a network interface\n");
620
goto mandos_end;
621
}
622
/* Set the network interface number as scope */
623
to.in6.sin6_scope_id = (uint32_t)if_index;
624
}
625
} else {
626
to.in.sin_port = htons(port); /* Spurious warnings from
561
627
-Wconversion and
562
628
-Wunreachable-code */
629
}
563
630
564
to.in6.sin6_scope_id = (uint32_t)if_index;
631
if(quit_now){
632
goto mandos_end;
633
}
565
634
566
635
if(debug){
567
fprintf(stderr, "Connection to: %s, port %" PRIu16 "\n", ip,
568
port);
569
char addrstr[INET6_ADDRSTRLEN] = "";
570
if(inet_ntop(to.in6.sin6_family, &(to.in6.sin6_addr), addrstr,
571
sizeof(addrstr)) == NULL){
636
if(af == AF_INET6 and if_index != AVAHI_IF_UNSPEC){
637
char interface[IF_NAMESIZE];
638
if(if_indextoname((unsigned int)if_index, interface) == NULL){
639
perror("if_indextoname");
640
} else {
641
fprintf(stderr, "Connection to: %s%%%s, port %" PRIu16 "\n",
642
ip, interface, port);
643
}
644
} else {
645
fprintf(stderr, "Connection to: %s, port %" PRIu16 "\n", ip,
646
port);
647
}
648
char addrstr[(INET_ADDRSTRLEN > INET6_ADDRSTRLEN) ?
649
INET_ADDRSTRLEN : INET6_ADDRSTRLEN] = "";
650
const char *pcret;
651
if(af == AF_INET6){
652
pcret = inet_ntop(af, &(to.in6.sin6_addr), addrstr,
653
sizeof(addrstr));
654
} else {
655
pcret = inet_ntop(af, &(to.in.sin_addr), addrstr,
656
sizeof(addrstr));
657
}
658
if(pcret == NULL){
572
659
perror("inet_ntop");
573
660
} else {
574
661
if(strcmp(addrstr, ip) != 0){
577
664
}
578
665
}
579
666
580
ret = connect(tcp_sd, &to.in, sizeof(to));
667
if(quit_now){
668
goto mandos_end;
669
}
670
671
if(af == AF_INET6){
672
ret = connect(tcp_sd, &to.in6, sizeof(to));
673
} else {
674
ret = connect(tcp_sd, &to.in, sizeof(to)); /* IPv4 */
675
}
581
676
if(ret < 0){
582
677
perror("connect");
583
return -1;
678
goto mandos_end;
679
}
680
681
if(quit_now){
682
goto mandos_end;
584
683
}
585
684
586
685
const char *out = mandos_protocol_version;
591
690
out_size - written));
592
691
if(ret == -1){
593
692
perror("write");
594
retval = -1;
595
693
goto mandos_end;
596
694
}
597
695
written += (size_t)ret;
605
703
break;
606
704
}
607
705
}
706
707
if(quit_now){
708
goto mandos_end;
709
}
608
710
}
609
711
610
712
if(debug){
611
713
fprintf(stderr, "Establishing TLS session with %s\n", ip);
612
714
}
613
715
716
if(quit_now){
717
goto mandos_end;
718
}
719
614
720
gnutls_transport_set_ptr(session, (gnutls_transport_ptr_t) tcp_sd);
615
721
616
do{
722
if(quit_now){
723
goto mandos_end;
724
}
725
726
do {
617
727
ret = gnutls_handshake(session);
728
if(quit_now){
729
goto mandos_end;
730
}
618
731
} while(ret == GNUTLS_E_AGAIN or ret == GNUTLS_E_INTERRUPTED);
619
732
620
733
if(ret != GNUTLS_E_SUCCESS){
622
735
fprintf(stderr, "*** GnuTLS Handshake failed ***\n");
623
736
gnutls_perror(ret);
624
737
}
625
retval = -1;
626
738
goto mandos_end;
627
739
}
628
740
629
741
/* Read OpenPGP packet that contains the wanted password */
630
742
631
743
if(debug){
632
fprintf(stderr, "Retrieving pgp encrypted password from %s\n",
744
fprintf(stderr, "Retrieving OpenPGP encrypted password from %s\n",
633
745
ip);
634
746
}
635
747
636
748
while(true){
637
buffer_capacity = adjustbuffer(&buffer, buffer_length,
749
750
if(quit_now){
751
goto mandos_end;
752
}
753
754
buffer_capacity = incbuffer(&buffer, buffer_length,
638
755
buffer_capacity);
639
756
if(buffer_capacity == 0){
640
perror("adjustbuffer");
641
retval = -1;
757
perror("incbuffer");
758
goto mandos_end;
759
}
760
761
if(quit_now){
642
762
goto mandos_end;
643
763
}
644
764
653
773
case GNUTLS_E_AGAIN:
654
774
break;
655
775
case GNUTLS_E_REHANDSHAKE:
656
do{
776
do {
657
777
ret = gnutls_handshake(session);
778
779
if(quit_now){
780
goto mandos_end;
781
}
658
782
} while(ret == GNUTLS_E_AGAIN or ret == GNUTLS_E_INTERRUPTED);
659
783
if(ret < 0){
660
784
fprintf(stderr, "*** GnuTLS Re-handshake failed ***\n");
661
785
gnutls_perror(ret);
662
retval = -1;
663
786
goto mandos_end;
664
787
}
665
788
break;
666
789
default:
667
790
fprintf(stderr, "Unknown error while reading data from"
668
791
" encrypted session with Mandos server\n");
669
retval = -1;
670
792
gnutls_bye(session, GNUTLS_SHUT_RDWR);
671
793
goto mandos_end;
672
794
}
679
801
fprintf(stderr, "Closing TLS session\n");
680
802
}
681
803
682
gnutls_bye(session, GNUTLS_SHUT_RDWR);
804
if(quit_now){
805
goto mandos_end;
806
}
807
808
do {
809
ret = gnutls_bye(session, GNUTLS_SHUT_RDWR);
810
if(quit_now){
811
goto mandos_end;
812
}
813
} while(ret == GNUTLS_E_AGAIN or ret == GNUTLS_E_INTERRUPTED);
683
814
684
815
if(buffer_length > 0){
685
decrypted_buffer_size = pgp_packet_decrypt(mc, buffer,
816
ssize_t decrypted_buffer_size;
817
decrypted_buffer_size = pgp_packet_decrypt(buffer,
686
818
buffer_length,
687
819
&decrypted_buffer);
688
820
if(decrypted_buffer_size >= 0){
821
689
822
written = 0;
690
823
while(written < (size_t) decrypted_buffer_size){
824
if(quit_now){
825
goto mandos_end;
826
}
827
691
828
ret = (int)fwrite(decrypted_buffer + written, 1,
692
829
(size_t)decrypted_buffer_size - written,
693
830
stdout);
696
833
fprintf(stderr, "Error writing encrypted data: %s\n",
697
834
strerror(errno));
698
835
}
699
retval = -1;
700
break;
836
goto mandos_end;
701
837
}
702
838
written += (size_t)ret;
703
839
}
704
free(decrypted_buffer);
705
} else {
706
retval = -1;
840
retval = 0;
707
841
}
708
} else {
709
retval = -1;
710
842
}
711
843
712
844
/* Shutdown procedure */
713
845
714
846
mandos_end:
847
free(decrypted_buffer);
715
848
free(buffer);
716
ret = (int)TEMP_FAILURE_RETRY(close(tcp_sd));
849
if(tcp_sd >= 0){
850
ret = (int)TEMP_FAILURE_RETRY(close(tcp_sd));
851
}
717
852
if(ret == -1){
718
853
perror("close");
719
854
}
720
855
gnutls_deinit(session);
856
if(quit_now){
857
retval = -1;
858
}
721
859
return retval;
722
860
}
723
861
724
862
static void resolve_callback(AvahiSServiceResolver *r,
725
863
AvahiIfIndex interface,
726
AVAHI_GCC_UNUSED AvahiProtocol protocol,
864
AvahiProtocol proto,
727
865
AvahiResolverEvent event,
728
866
const char *name,
729
867
const char *type,
734
872
AVAHI_GCC_UNUSED AvahiStringList *txt,
735
873
AVAHI_GCC_UNUSED AvahiLookupResultFlags
736
874
flags,
737
void* userdata) {
738
mandos_context *mc = userdata;
875
AVAHI_GCC_UNUSED void* userdata){
739
876
assert(r);
740
877
741
878
/* Called whenever a service has been resolved successfully or
742
879
timed out */
743
880
744
switch(event) {
881
if(quit_now){
882
return;
883
}
884
885
switch(event){
745
886
default:
746
887
case AVAHI_RESOLVER_FAILURE:
747
888
fprintf(stderr, "(Avahi Resolver) Failed to resolve service '%s'"
748
889
" of type '%s' in domain '%s': %s\n", name, type, domain,
749
avahi_strerror(avahi_server_errno(mc->server)));
890
avahi_strerror(avahi_server_errno(mc.server)));
750
891
break;
751
892
752
893
case AVAHI_RESOLVER_FOUND:
758
899
PRIdMAX ") on port %" PRIu16 "\n", name, host_name,
759
900
ip, (intmax_t)interface, port);
760
901
}
761
int ret = start_mandos_communication(ip, port, interface, mc);
902
int ret = start_mandos_communication(ip, port, interface,
903
avahi_proto_to_af(proto));
762
904
if(ret == 0){
763
avahi_simple_poll_quit(mc->simple_poll);
905
avahi_simple_poll_quit(mc.simple_poll);
764
906
}
765
907
}
766
908
}
767
909
avahi_s_service_resolver_free(r);
768
910
}
769
911
770
static void browse_callback( AvahiSServiceBrowser *b,
771
AvahiIfIndex interface,
772
AvahiProtocol protocol,
773
AvahiBrowserEvent event,
774
const char *name,
775
const char *type,
776
const char *domain,
777
AVAHI_GCC_UNUSED AvahiLookupResultFlags
778
flags,
779
void* userdata) {
780
mandos_context *mc = userdata;
912
static void browse_callback(AvahiSServiceBrowser *b,
913
AvahiIfIndex interface,
914
AvahiProtocol protocol,
915
AvahiBrowserEvent event,
916
const char *name,
917
const char *type,
918
const char *domain,
919
AVAHI_GCC_UNUSED AvahiLookupResultFlags
920
flags,
921
AVAHI_GCC_UNUSED void* userdata){
781
922
assert(b);
782
923
783
924
/* Called whenever a new services becomes available on the LAN or
784
925
is removed from the LAN */
785
926
786
switch(event) {
927
if(quit_now){
928
return;
929
}
930
931
switch(event){
787
932
default:
788
933
case AVAHI_BROWSER_FAILURE:
789
934
790
935
fprintf(stderr, "(Avahi browser) %s\n",
791
avahi_strerror(avahi_server_errno(mc->server)));
792
avahi_simple_poll_quit(mc->simple_poll);
936
avahi_strerror(avahi_server_errno(mc.server)));
937
avahi_simple_poll_quit(mc.simple_poll);
793
938
return;
794
939
795
940
case AVAHI_BROWSER_NEW:
798
943
the callback function is called the Avahi server will free the
799
944
resolver for us. */
800
945
801
if(!(avahi_s_service_resolver_new(mc->server, interface,
802
protocol, name, type, domain,
803
AVAHI_PROTO_INET6, 0,
804
resolve_callback, mc)))
946
if(avahi_s_service_resolver_new(mc.server, interface, protocol,
947
name, type, domain, protocol, 0,
948
resolve_callback, NULL) == NULL)
805
949
fprintf(stderr, "Avahi: Failed to resolve service '%s': %s\n",
806
name, avahi_strerror(avahi_server_errno(mc->server)));
950
name, avahi_strerror(avahi_server_errno(mc.server)));
807
951
break;
808
952
809
953
case AVAHI_BROWSER_REMOVE:
818
962
}
819
963
}
820
964
965
/* stop main loop after sigterm has been called */
966
static void handle_sigterm(int sig){
967
if(quit_now){
968
return;
969
}
970
quit_now = 1;
971
signal_received = sig;
972
int old_errno = errno;
973
if(mc.simple_poll != NULL){
974
avahi_simple_poll_quit(mc.simple_poll);
975
}
976
errno = old_errno;
977
}
978
979
/*
980
* This function determines if a directory entry in /sys/class/net
981
* corresponds to an acceptable network device.
982
* (This function is passed to scandir(3) as a filter function.)
983
*/
984
int good_interface(const struct dirent *if_entry){
985
ssize_t ssret;
986
char *flagname = NULL;
987
int ret = asprintf(&flagname, "%s/%s/flags", sys_class_net,
988
if_entry->d_name);
989
if(ret < 0){
990
perror("asprintf");
991
return 0;
992
}
993
if(if_entry->d_name[0] == '.'){
994
return 0;
995
}
996
int flags_fd = (int)TEMP_FAILURE_RETRY(open(flagname, O_RDONLY));
997
if(flags_fd == -1){
998
perror("open");
999
return 0;
1000
}
1001
typedef short ifreq_flags; /* ifreq.ifr_flags in netdevice(7) */
1002
/* read line from flags_fd */
1003
ssize_t to_read = (sizeof(ifreq_flags)*2)+3; /* "0x1003\n" */
1004
char *flagstring = malloc((size_t)to_read);
1005
if(flagstring == NULL){
1006
perror("malloc");
1007
close(flags_fd);
1008
return 0;
1009
}
1010
while(to_read > 0){
1011
ssret = (ssize_t)TEMP_FAILURE_RETRY(read(flags_fd, flagstring,
1012
(size_t)to_read));
1013
if(ssret == -1){
1014
perror("read");
1015
free(flagstring);
1016
close(flags_fd);
1017
return 0;
1018
}
1019
to_read -= ssret;
1020
if(ssret == 0){
1021
break;
1022
}
1023
}
1024
close(flags_fd);
1025
intmax_t tmpmax;
1026
char *tmp;
1027
errno = 0;
1028
tmpmax = strtoimax(flagstring, &tmp, 0);
1029
if(errno != 0 or tmp == flagstring or (*tmp != '\0'
1030
and not (isspace(*tmp)))
1031
or tmpmax != (ifreq_flags)tmpmax){
1032
free(flagstring);
1033
return 0;
1034
}
1035
free(flagstring);
1036
ifreq_flags flags = (ifreq_flags)tmpmax;
1037
/* Reject the loopback device */
1038
if(flags & IFF_LOOPBACK){
1039
return 0;
1040
}
1041
/* Accept point-to-point devices only if connect_to is specified */
1042
if(connect_to != NULL and (flags & IFF_POINTOPOINT)){
1043
return 1;
1044
}
1045
/* Otherwise, reject non-broadcast-capable devices */
1046
if(not (flags & IFF_BROADCAST)){
1047
return 0;
1048
}
1049
/* Accept this device */
1050
return 1;
1051
}
1052
821
1053
int main(int argc, char *argv[]){
822
AvahiSServiceBrowser *sb = NULL;
823
int error;
824
int ret;
825
intmax_t tmpmax;
826
int numchars;
827
int exitcode = EXIT_SUCCESS;
828
const char *interface = "eth0";
829
struct ifreq network;
830
int sd;
831
uid_t uid;
832
gid_t gid;
833
char *connect_to = NULL;
834
char tempdir[] = "/tmp/mandosXXXXXX";
835
AvahiIfIndex if_index = AVAHI_IF_UNSPEC;
836
const char *seckey = PATHDIR "/" SECKEY;
837
const char *pubkey = PATHDIR "/" PUBKEY;
838
839
mandos_context mc = { .simple_poll = NULL, .server = NULL,
840
.dh_bits = 1024, .priority = "SECURE256"
841
":!CTYPE-X.509:+CTYPE-OPENPGP" };
842
bool gnutls_initialized = false;
843
bool gpgme_initialized = false;
844
845
{
846
struct argp_option options[] = {
847
{ .name = "debug", .key = 128,
848
.doc = "Debug mode", .group = 3 },
849
{ .name = "connect", .key = 'c',
850
.arg = "ADDRESS:PORT",
851
.doc = "Connect directly to a specific Mandos server",
852
.group = 1 },
853
{ .name = "interface", .key = 'i',
854
.arg = "NAME",
855
.doc = "Interface that will be used to search for Mandos"
856
" servers",
857
.group = 1 },
858
{ .name = "seckey", .key = 's',
859
.arg = "FILE",
860
.doc = "OpenPGP secret key file base name",
861
.group = 1 },
862
{ .name = "pubkey", .key = 'p',
863
.arg = "FILE",
864
.doc = "OpenPGP public key file base name",
865
.group = 2 },
866
{ .name = "dh-bits", .key = 129,
867
.arg = "BITS",
868
.doc = "Bit length of the prime number used in the"
869
" Diffie-Hellman key exchange",
870
.group = 2 },
871
{ .name = "priority", .key = 130,
872
.arg = "STRING",
873
.doc = "GnuTLS priority string for the TLS handshake",
874
.group = 1 },
875
{ .name = NULL }
876
};
877
878
error_t parse_opt(int key, char *arg,
879
struct argp_state *state) {
880
switch(key) {
881
case 128: /* --debug */
882
debug = true;
883
break;
884
case 'c': /* --connect */
885
connect_to = arg;
886
break;
887
case 'i': /* --interface */
888
interface = arg;
889
break;
890
case 's': /* --seckey */
891
seckey = arg;
892
break;
893
case 'p': /* --pubkey */
894
pubkey = arg;
895
break;
896
case 129: /* --dh-bits */
897
ret = sscanf(arg, "%" SCNdMAX "%n", &tmpmax, &numchars);
898
if(ret < 1 or tmpmax != (typeof(mc.dh_bits))tmpmax
899
or arg[numchars] != '\0'){
900
fprintf(stderr, "Bad number of DH bits\n");
901
exit(EXIT_FAILURE);
902
}
903
mc.dh_bits = (typeof(mc.dh_bits))tmpmax;
904
break;
905
case 130: /* --priority */
906
mc.priority = arg;
907
break;
908
case ARGP_KEY_ARG:
909
argp_usage(state);
910
case ARGP_KEY_END:
911
break;
912
default:
913
return ARGP_ERR_UNKNOWN;
914
}
915
return 0;
916
}
917
918
struct argp argp = { .options = options, .parser = parse_opt,
919
.args_doc = "",
920
.doc = "Mandos client -- Get and decrypt"
921
" passwords from a Mandos server" };
922
ret = argp_parse(&argp, argc, argv, 0, 0, NULL);
923
if(ret == ARGP_ERR_UNKNOWN){
924
fprintf(stderr, "Unknown error while parsing arguments\n");
925
exitcode = EXIT_FAILURE;
926
goto end;
927
}
928
}
929
930
/* If the interface is down, bring it up */
931
{
932
sd = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);
933
if(sd < 0) {
934
perror("socket");
935
exitcode = EXIT_FAILURE;
936
goto end;
937
}
938
strcpy(network.ifr_name, interface);
939
ret = ioctl(sd, SIOCGIFFLAGS, &network);
940
if(ret == -1){
941
perror("ioctl SIOCGIFFLAGS");
942
exitcode = EXIT_FAILURE;
943
goto end;
944
}
945
if((network.ifr_flags & IFF_UP) == 0){
946
network.ifr_flags |= IFF_UP;
947
ret = ioctl(sd, SIOCSIFFLAGS, &network);
948
if(ret == -1){
949
perror("ioctl SIOCSIFFLAGS");
950
exitcode = EXIT_FAILURE;
951
goto end;
952
}
953
}
954
ret = (int)TEMP_FAILURE_RETRY(close(sd));
955
if(ret == -1){
956
perror("close");
957
}
958
}
959
960
uid = getuid();
961
gid = getgid();
962
963
ret = setuid(uid);
964
if(ret == -1){
965
perror("setuid");
966
}
967
968
setgid(gid);
969
if(ret == -1){
970
perror("setgid");
971
}
972
973
ret = init_gnutls_global(&mc, pubkey, seckey);
974
if(ret == -1){
975
fprintf(stderr, "init_gnutls_global failed\n");
976
exitcode = EXIT_FAILURE;
977
goto end;
978
} else {
979
gnutls_initialized = true;
980
}
981
982
if(mkdtemp(tempdir) == NULL){
983
perror("mkdtemp");
984
tempdir[0] = '\0';
985
goto end;
986
}
987
988
if(not init_gpgme(&mc, pubkey, seckey, tempdir)){
989
fprintf(stderr, "init_gpgme failed\n");
990
exitcode = EXIT_FAILURE;
991
goto end;
992
} else {
993
gpgme_initialized = true;
994
}
995
1054
AvahiSServiceBrowser *sb = NULL;
1055
int error;
1056
int ret;
1057
intmax_t tmpmax;
1058
char *tmp;
1059
int exitcode = EXIT_SUCCESS;
1060
const char *interface = "";
1061
struct ifreq network;
1062
int sd = -1;
1063
bool take_down_interface = false;
1064
uid_t uid;
1065
gid_t gid;
1066
char tempdir[] = "/tmp/mandosXXXXXX";
1067
bool tempdir_created = false;
1068
AvahiIfIndex if_index = AVAHI_IF_UNSPEC;
1069
const char *seckey = PATHDIR "/" SECKEY;
1070
const char *pubkey = PATHDIR "/" PUBKEY;
1071
1072
bool gnutls_initialized = false;
1073
bool gpgme_initialized = false;
1074
float delay = 2.5f;
1075
1076
struct sigaction old_sigterm_action = { .sa_handler = SIG_DFL };
1077
struct sigaction sigterm_action = { .sa_handler = handle_sigterm };
1078
1079
uid = getuid();
1080
gid = getgid();
1081
1082
/* Lower any group privileges we might have, just to be safe */
1083
errno = 0;
1084
ret = setgid(gid);
1085
if(ret == -1){
1086
perror("setgid");
1087
}
1088
1089
/* Lower user privileges (temporarily) */
1090
errno = 0;
1091
ret = seteuid(uid);
1092
if(ret == -1){
1093
perror("seteuid");
1094
}
1095
1096
if(quit_now){
1097
goto end;
1098
}
1099
1100
{
1101
struct argp_option options[] = {
1102
{ .name = "debug", .key = 128,
1103
.doc = "Debug mode", .group = 3 },
1104
{ .name = "connect", .key = 'c',
1105
.arg = "ADDRESS:PORT",
1106
.doc = "Connect directly to a specific Mandos server",
1107
.group = 1 },
1108
{ .name = "interface", .key = 'i',
1109
.arg = "NAME",
1110
.doc = "Network interface that will be used to search for"
1111
" Mandos servers",
1112
.group = 1 },
1113
{ .name = "seckey", .key = 's',
1114
.arg = "FILE",
1115
.doc = "OpenPGP secret key file base name",
1116
.group = 1 },
1117
{ .name = "pubkey", .key = 'p',
1118
.arg = "FILE",
1119
.doc = "OpenPGP public key file base name",
1120
.group = 2 },
1121
{ .name = "dh-bits", .key = 129,
1122
.arg = "BITS",
1123
.doc = "Bit length of the prime number used in the"
1124
" Diffie-Hellman key exchange",
1125
.group = 2 },
1126
{ .name = "priority", .key = 130,
1127
.arg = "STRING",
1128
.doc = "GnuTLS priority string for the TLS handshake",
1129
.group = 1 },
1130
{ .name = "delay", .key = 131,
1131
.arg = "SECONDS",
1132
.doc = "Maximum delay to wait for interface startup",
1133
.group = 2 },
1134
{ .name = NULL }
1135
};
1136
1137
error_t parse_opt(int key, char *arg,
1138
struct argp_state *state){
1139
switch(key){
1140
case 128: /* --debug */
1141
debug = true;
1142
break;
1143
case 'c': /* --connect */
1144
connect_to = arg;
1145
break;
1146
case 'i': /* --interface */
1147
interface = arg;
1148
break;
1149
case 's': /* --seckey */
1150
seckey = arg;
1151
break;
1152
case 'p': /* --pubkey */
1153
pubkey = arg;
1154
break;
1155
case 129: /* --dh-bits */
1156
errno = 0;
1157
tmpmax = strtoimax(arg, &tmp, 10);
1158
if(errno != 0 or tmp == arg or *tmp != '\0'
1159
or tmpmax != (typeof(mc.dh_bits))tmpmax){
1160
fprintf(stderr, "Bad number of DH bits\n");
1161
exit(EXIT_FAILURE);
1162
}
1163
mc.dh_bits = (typeof(mc.dh_bits))tmpmax;
1164
break;
1165
case 130: /* --priority */
1166
mc.priority = arg;
1167
break;
1168
case 131: /* --delay */
1169
errno = 0;
1170
delay = strtof(arg, &tmp);
1171
if(errno != 0 or tmp == arg or *tmp != '\0'){
1172
fprintf(stderr, "Bad delay\n");
1173
exit(EXIT_FAILURE);
1174
}
1175
break;
1176
case ARGP_KEY_ARG:
1177
argp_usage(state);
1178
case ARGP_KEY_END:
1179
break;
1180
default:
1181
return ARGP_ERR_UNKNOWN;
1182
}
1183
return 0;
1184
}
1185
1186
struct argp argp = { .options = options, .parser = parse_opt,
1187
.args_doc = "",
1188
.doc = "Mandos client -- Get and decrypt"
1189
" passwords from a Mandos server" };
1190
ret = argp_parse(&argp, argc, argv, 0, 0, NULL);
1191
if(ret == ARGP_ERR_UNKNOWN){
1192
fprintf(stderr, "Unknown error while parsing arguments\n");
1193
exitcode = EXIT_FAILURE;
1194
goto end;
1195
}
1196
}
1197
1198
if(not debug){
1199
avahi_set_log_function(empty_log);
1200
}
1201
1202
if(interface[0] == '\0'){
1203
struct dirent **direntries;
1204
ret = scandir(sys_class_net, &direntries, good_interface,
1205
alphasort);
1206
if(ret >= 1){
1207
/* Pick the first good interface */
1208
interface = strdup(direntries[0]->d_name);
1209
if(interface == NULL){
1210
perror("malloc");
1211
free(direntries);
1212
exitcode = EXIT_FAILURE;
1213
goto end;
1214
}
1215
free(direntries);
1216
} else {
1217
free(direntries);
1218
fprintf(stderr, "Could not find a network interface\n");
1219
exitcode = EXIT_FAILURE;
1220
goto end;
1221
}
1222
}
1223
1224
/* Initialize Avahi early so avahi_simple_poll_quit() can be called
1225
from the signal handler */
1226
/* Initialize the pseudo-RNG for Avahi */
1227
srand((unsigned int) time(NULL));
1228
mc.simple_poll = avahi_simple_poll_new();
1229
if(mc.simple_poll == NULL){
1230
fprintf(stderr, "Avahi: Failed to create simple poll object.\n");
1231
exitcode = EXIT_FAILURE;
1232
goto end;
1233
}
1234
1235
sigemptyset(&sigterm_action.sa_mask);
1236
ret = sigaddset(&sigterm_action.sa_mask, SIGINT);
1237
if(ret == -1){
1238
perror("sigaddset");
1239
exitcode = EXIT_FAILURE;
1240
goto end;
1241
}
1242
ret = sigaddset(&sigterm_action.sa_mask, SIGHUP);
1243
if(ret == -1){
1244
perror("sigaddset");
1245
exitcode = EXIT_FAILURE;
1246
goto end;
1247
}
1248
ret = sigaddset(&sigterm_action.sa_mask, SIGTERM);
1249
if(ret == -1){
1250
perror("sigaddset");
1251
exitcode = EXIT_FAILURE;
1252
goto end;
1253
}
1254
/* Need to check if the handler is SIG_IGN before handling:
1255
| [[info:libc:Initial Signal Actions]] |
1256
| [[info:libc:Basic Signal Handling]] |
1257
*/
1258
ret = sigaction(SIGINT, NULL, &old_sigterm_action);
1259
if(ret == -1){
1260
perror("sigaction");
1261
return EXIT_FAILURE;
1262
}
1263
if(old_sigterm_action.sa_handler != SIG_IGN){
1264
ret = sigaction(SIGINT, &sigterm_action, NULL);
1265
if(ret == -1){
1266
perror("sigaction");
1267
exitcode = EXIT_FAILURE;
1268
goto end;
1269
}
1270
}
1271
ret = sigaction(SIGHUP, NULL, &old_sigterm_action);
1272
if(ret == -1){
1273
perror("sigaction");
1274
return EXIT_FAILURE;
1275
}
1276
if(old_sigterm_action.sa_handler != SIG_IGN){
1277
ret = sigaction(SIGHUP, &sigterm_action, NULL);
1278
if(ret == -1){
1279
perror("sigaction");
1280
exitcode = EXIT_FAILURE;
1281
goto end;
1282
}
1283
}
1284
ret = sigaction(SIGTERM, NULL, &old_sigterm_action);
1285
if(ret == -1){
1286
perror("sigaction");
1287
return EXIT_FAILURE;
1288
}
1289
if(old_sigterm_action.sa_handler != SIG_IGN){
1290
ret = sigaction(SIGTERM, &sigterm_action, NULL);
1291
if(ret == -1){
1292
perror("sigaction");
1293
exitcode = EXIT_FAILURE;
1294
goto end;
1295
}
1296
}
1297
1298
/* If the interface is down, bring it up */
1299
if(strcmp(interface, "none") != 0){
996
1300
if_index = (AvahiIfIndex) if_nametoindex(interface);
997
1301
if(if_index == 0){
998
1302
fprintf(stderr, "No such interface: \"%s\"\n", interface);
999
exit(EXIT_FAILURE);
1000
}
1001
1002
if(connect_to != NULL){
1003
/* Connect directly, do not use Zeroconf */
1004
/* (Mainly meant for debugging) */
1005
char *address = strrchr(connect_to, ':');
1006
if(address == NULL){
1007
fprintf(stderr, "No colon in address\n");
1008
exitcode = EXIT_FAILURE;
1009
goto end;
1010
}
1011
uint16_t port;
1012
ret = sscanf(address+1, "%" SCNdMAX "%n", &tmpmax, &numchars);
1013
if(ret < 1 or tmpmax != (uint16_t)tmpmax
1014
or address[numchars+1] != '\0'){
1015
fprintf(stderr, "Bad port number\n");
1016
exitcode = EXIT_FAILURE;
1017
goto end;
1018
}
1019
port = (uint16_t)tmpmax;
1020
*address = '\0';
1021
address = connect_to;
1022
ret = start_mandos_communication(address, port, if_index, &mc);
1023
if(ret < 0){
1024
exitcode = EXIT_FAILURE;
1025
} else {
1026
exitcode = EXIT_SUCCESS;
1027
}
1028
goto end;
1029
}
1030
1031
if(not debug){
1032
avahi_set_log_function(empty_log);
1033
}
1034
1035
/* Initialize the pseudo-RNG for Avahi */
1036
srand((unsigned int) time(NULL));
1037
1038
/* Allocate main Avahi loop object */
1039
mc.simple_poll = avahi_simple_poll_new();
1040
if(mc.simple_poll == NULL) {
1041
fprintf(stderr, "Avahi: Failed to create simple poll"
1042
" object.\n");
1043
exitcode = EXIT_FAILURE;
1044
goto end;
1045
}
1046
1047
{
1048
AvahiServerConfig config;
1049
/* Do not publish any local Zeroconf records */
1050
avahi_server_config_init(&config);
1051
config.publish_hinfo = 0;
1052
config.publish_addresses = 0;
1053
config.publish_workstation = 0;
1054
config.publish_domain = 0;
1055
1056
/* Allocate a new server */
1057
mc.server = avahi_server_new(avahi_simple_poll_get
1058
(mc.simple_poll), &config, NULL,
1059
NULL, &error);
1060
1061
/* Free the Avahi configuration data */
1062
avahi_server_config_free(&config);
1063
}
1064
1065
/* Check if creating the Avahi server object succeeded */
1066
if(mc.server == NULL) {
1067
fprintf(stderr, "Failed to create Avahi server: %s\n",
1068
avahi_strerror(error));
1069
exitcode = EXIT_FAILURE;
1070
goto end;
1071
}
1072
1073
/* Create the Avahi service browser */
1074
sb = avahi_s_service_browser_new(mc.server, if_index,
1075
AVAHI_PROTO_INET6,
1076
"_mandos._tcp", NULL, 0,
1077
browse_callback, &mc);
1078
if(sb == NULL) {
1079
fprintf(stderr, "Failed to create service browser: %s\n",
1080
avahi_strerror(avahi_server_errno(mc.server)));
1081
exitcode = EXIT_FAILURE;
1082
goto end;
1083
}
1084
1085
/* Run the main loop */
1086
1087
if(debug){
1088
fprintf(stderr, "Starting Avahi loop search\n");
1089
}
1090
1091
avahi_simple_poll_loop(mc.simple_poll);
1092
1303
exitcode = EXIT_FAILURE;
1304
goto end;
1305
}
1306
1307
if(quit_now){
1308
goto end;
1309
}
1310
1311
/* Re-raise priviliges */
1312
errno = 0;
1313
ret = seteuid(0);
1314
if(ret == -1){
1315
perror("seteuid");
1316
}
1317
1318
#ifdef __linux__
1319
/* Lower kernel loglevel to KERN_NOTICE to avoid KERN_INFO
1320
messages to mess up the prompt */
1321
ret = klogctl(8, NULL, 5);
1322
bool restore_loglevel = true;
1323
if(ret == -1){
1324
restore_loglevel = false;
1325
perror("klogctl");
1326
}
1327
#endif /* __linux__ */
1328
1329
sd = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);
1330
if(sd < 0){
1331
perror("socket");
1332
exitcode = EXIT_FAILURE;
1333
#ifdef __linux__
1334
if(restore_loglevel){
1335
ret = klogctl(7, NULL, 0);
1336
if(ret == -1){
1337
perror("klogctl");
1338
}
1339
}
1340
#endif /* __linux__ */
1341
/* Lower privileges */
1342
errno = 0;
1343
ret = seteuid(uid);
1344
if(ret == -1){
1345
perror("seteuid");
1346
}
1347
goto end;
1348
}
1349
strcpy(network.ifr_name, interface);
1350
ret = ioctl(sd, SIOCGIFFLAGS, &network);
1351
if(ret == -1){
1352
perror("ioctl SIOCGIFFLAGS");
1353
#ifdef __linux__
1354
if(restore_loglevel){
1355
ret = klogctl(7, NULL, 0);
1356
if(ret == -1){
1357
perror("klogctl");
1358
}
1359
}
1360
#endif /* __linux__ */
1361
exitcode = EXIT_FAILURE;
1362
/* Lower privileges */
1363
errno = 0;
1364
ret = seteuid(uid);
1365
if(ret == -1){
1366
perror("seteuid");
1367
}
1368
goto end;
1369
}
1370
if((network.ifr_flags & IFF_UP) == 0){
1371
network.ifr_flags |= IFF_UP;
1372
take_down_interface = true;
1373
ret = ioctl(sd, SIOCSIFFLAGS, &network);
1374
if(ret == -1){
1375
take_down_interface = false;
1376
perror("ioctl SIOCSIFFLAGS");
1377
exitcode = EXIT_FAILURE;
1378
#ifdef __linux__
1379
if(restore_loglevel){
1380
ret = klogctl(7, NULL, 0);
1381
if(ret == -1){
1382
perror("klogctl");
1383
}
1384
}
1385
#endif /* __linux__ */
1386
/* Lower privileges */
1387
errno = 0;
1388
ret = seteuid(uid);
1389
if(ret == -1){
1390
perror("seteuid");
1391
}
1392
goto end;
1393
}
1394
}
1395
/* sleep checking until interface is running */
1396
for(int i=0; i < delay * 4; i++){
1397
ret = ioctl(sd, SIOCGIFFLAGS, &network);
1398
if(ret == -1){
1399
perror("ioctl SIOCGIFFLAGS");
1400
} else if(network.ifr_flags & IFF_RUNNING){
1401
break;
1402
}
1403
struct timespec sleeptime = { .tv_nsec = 250000000 };
1404
ret = nanosleep(&sleeptime, NULL);
1405
if(ret == -1 and errno != EINTR){
1406
perror("nanosleep");
1407
}
1408
}
1409
if(not take_down_interface){
1410
/* We won't need the socket anymore */
1411
ret = (int)TEMP_FAILURE_RETRY(close(sd));
1412
if(ret == -1){
1413
perror("close");
1414
}
1415
}
1416
#ifdef __linux__
1417
if(restore_loglevel){
1418
/* Restores kernel loglevel to default */
1419
ret = klogctl(7, NULL, 0);
1420
if(ret == -1){
1421
perror("klogctl");
1422
}
1423
}
1424
#endif /* __linux__ */
1425
/* Lower privileges */
1426
errno = 0;
1427
if(take_down_interface){
1428
/* Lower privileges */
1429
ret = seteuid(uid);
1430
if(ret == -1){
1431
perror("seteuid");
1432
}
1433
} else {
1434
/* Lower privileges permanently */
1435
ret = setuid(uid);
1436
if(ret == -1){
1437
perror("setuid");
1438
}
1439
}
1440
}
1441
1442
if(quit_now){
1443
goto end;
1444
}
1445
1446
ret = init_gnutls_global(pubkey, seckey);
1447
if(ret == -1){
1448
fprintf(stderr, "init_gnutls_global failed\n");
1449
exitcode = EXIT_FAILURE;
1450
goto end;
1451
} else {
1452
gnutls_initialized = true;
1453
}
1454
1455
if(quit_now){
1456
goto end;
1457
}
1458
1459
tempdir_created = true;
1460
if(mkdtemp(tempdir) == NULL){
1461
tempdir_created = false;
1462
perror("mkdtemp");
1463
goto end;
1464
}
1465
1466
if(quit_now){
1467
goto end;
1468
}
1469
1470
if(not init_gpgme(pubkey, seckey, tempdir)){
1471
fprintf(stderr, "init_gpgme failed\n");
1472
exitcode = EXIT_FAILURE;
1473
goto end;
1474
} else {
1475
gpgme_initialized = true;
1476
}
1477
1478
if(quit_now){
1479
goto end;
1480
}
1481
1482
if(connect_to != NULL){
1483
/* Connect directly, do not use Zeroconf */
1484
/* (Mainly meant for debugging) */
1485
char *address = strrchr(connect_to, ':');
1486
if(address == NULL){
1487
fprintf(stderr, "No colon in address\n");
1488
exitcode = EXIT_FAILURE;
1489
goto end;
1490
}
1491
1492
if(quit_now){
1493
goto end;
1494
}
1495
1496
uint16_t port;
1497
errno = 0;
1498
tmpmax = strtoimax(address+1, &tmp, 10);
1499
if(errno != 0 or tmp == address+1 or *tmp != '\0'
1500
or tmpmax != (uint16_t)tmpmax){
1501
fprintf(stderr, "Bad port number\n");
1502
exitcode = EXIT_FAILURE;
1503
goto end;
1504
}
1505
1506
if(quit_now){
1507
goto end;
1508
}
1509
1510
port = (uint16_t)tmpmax;
1511
*address = '\0';
1512
address = connect_to;
1513
/* Colon in address indicates IPv6 */
1514
int af;
1515
if(strchr(address, ':') != NULL){
1516
af = AF_INET6;
1517
} else {
1518
af = AF_INET;
1519
}
1520
1521
if(quit_now){
1522
goto end;
1523
}
1524
1525
ret = start_mandos_communication(address, port, if_index, af);
1526
if(ret < 0){
1527
exitcode = EXIT_FAILURE;
1528
} else {
1529
exitcode = EXIT_SUCCESS;
1530
}
1531
goto end;
1532
}
1533
1534
if(quit_now){
1535
goto end;
1536
}
1537
1538
{
1539
AvahiServerConfig config;
1540
/* Do not publish any local Zeroconf records */
1541
avahi_server_config_init(&config);
1542
config.publish_hinfo = 0;
1543
config.publish_addresses = 0;
1544
config.publish_workstation = 0;
1545
config.publish_domain = 0;
1546
1547
/* Allocate a new server */
1548
mc.server = avahi_server_new(avahi_simple_poll_get
1549
(mc.simple_poll), &config, NULL,
1550
NULL, &error);
1551
1552
/* Free the Avahi configuration data */
1553
avahi_server_config_free(&config);
1554
}
1555
1556
/* Check if creating the Avahi server object succeeded */
1557
if(mc.server == NULL){
1558
fprintf(stderr, "Failed to create Avahi server: %s\n",
1559
avahi_strerror(error));
1560
exitcode = EXIT_FAILURE;
1561
goto end;
1562
}
1563
1564
if(quit_now){
1565
goto end;
1566
}
1567
1568
/* Create the Avahi service browser */
1569
sb = avahi_s_service_browser_new(mc.server, if_index,
1570
AVAHI_PROTO_UNSPEC, "_mandos._tcp",
1571
NULL, 0, browse_callback, NULL);
1572
if(sb == NULL){
1573
fprintf(stderr, "Failed to create service browser: %s\n",
1574
avahi_strerror(avahi_server_errno(mc.server)));
1575
exitcode = EXIT_FAILURE;
1576
goto end;
1577
}
1578
1579
if(quit_now){
1580
goto end;
1581
}
1582
1583
/* Run the main loop */
1584
1585
if(debug){
1586
fprintf(stderr, "Starting Avahi loop search\n");
1587
}
1588
1589
avahi_simple_poll_loop(mc.simple_poll);
1590
1093
1591
end:
1094
1095
if(debug){
1096
fprintf(stderr, "%s exiting\n", argv[0]);
1097
}
1098
1099
/* Cleanup things */
1100
if(sb != NULL)
1101
avahi_s_service_browser_free(sb);
1102
1103
if(mc.server != NULL)
1104
avahi_server_free(mc.server);
1105
1106
if(mc.simple_poll != NULL)
1107
avahi_simple_poll_free(mc.simple_poll);
1108
1109
if(gnutls_initialized){
1110
gnutls_certificate_free_credentials(mc.cred);
1111
gnutls_global_deinit();
1112
gnutls_dh_params_deinit(mc.dh_params);
1113
}
1114
1115
if(gpgme_initialized){
1116
gpgme_release(mc.ctx);
1117
}
1118
1119
/* Removes the temp directory used by GPGME */
1120
if(tempdir[0] != '\0'){
1121
DIR *d;
1122
struct dirent *direntry;
1123
d = opendir(tempdir);
1124
if(d == NULL){
1125
if(errno != ENOENT){
1126
perror("opendir");
1127
}
1128
} else {
1129
while(true){
1130
direntry = readdir(d);
1131
if(direntry == NULL){
1132
break;
1133
}
1134
/* Skip "." and ".." */
1135
if(direntry->d_name[0] == '.'
1136
and (direntry->d_name[1] == '\0'
1137
or (direntry->d_name[1] == '.'
1138
and direntry->d_name[2] == '\0'))){
1139
continue;
1140
}
1141
char *fullname = NULL;
1142
ret = asprintf(&fullname, "%s/%s", tempdir,
1143
direntry->d_name);
1144
if(ret < 0){
1145
perror("asprintf");
1146
continue;
1147
}
1148
ret = remove(fullname);
1149
if(ret == -1){
1150
fprintf(stderr, "remove(\"%s\"): %s\n", fullname,
1151
strerror(errno));
1152
}
1153
free(fullname);
1154
}
1155
closedir(d);
1156
}
1157
ret = rmdir(tempdir);
1158
if(ret == -1 and errno != ENOENT){
1159
perror("rmdir");
1160
}
1161
}
1162
1163
return exitcode;
1592
1593
if(debug){
1594
fprintf(stderr, "%s exiting\n", argv[0]);
1595
}
1596
1597
/* Cleanup things */
1598
if(sb != NULL)
1599
avahi_s_service_browser_free(sb);
1600
1601
if(mc.server != NULL)
1602
avahi_server_free(mc.server);
1603
1604
if(mc.simple_poll != NULL)
1605
avahi_simple_poll_free(mc.simple_poll);
1606
1607
if(gnutls_initialized){
1608
gnutls_certificate_free_credentials(mc.cred);
1609
gnutls_global_deinit();
1610
gnutls_dh_params_deinit(mc.dh_params);
1611
}
1612
1613
if(gpgme_initialized){
1614
gpgme_release(mc.ctx);
1615
}
1616
1617
/* Take down the network interface */
1618
if(take_down_interface){
1619
/* Re-raise priviliges */
1620
errno = 0;
1621
ret = seteuid(0);
1622
if(ret == -1){
1623
perror("seteuid");
1624
}
1625
if(geteuid() == 0){
1626
ret = ioctl(sd, SIOCGIFFLAGS, &network);
1627
if(ret == -1){
1628
perror("ioctl SIOCGIFFLAGS");
1629
} else if(network.ifr_flags & IFF_UP) {
1630
network.ifr_flags &= ~IFF_UP; /* clear flag */
1631
ret = ioctl(sd, SIOCSIFFLAGS, &network);
1632
if(ret == -1){
1633
perror("ioctl SIOCSIFFLAGS");
1634
}
1635
}
1636
ret = (int)TEMP_FAILURE_RETRY(close(sd));
1637
if(ret == -1){
1638
perror("close");
1639
}
1640
/* Lower privileges permanently */
1641
errno = 0;
1642
ret = setuid(uid);
1643
if(ret == -1){
1644
perror("setuid");
1645
}
1646
}
1647
}
1648
1649
/* Removes the temp directory used by GPGME */
1650
if(tempdir_created){
1651
DIR *d;
1652
struct dirent *direntry;
1653
d = opendir(tempdir);
1654
if(d == NULL){
1655
if(errno != ENOENT){
1656
perror("opendir");
1657
}
1658
} else {
1659
while(true){
1660
direntry = readdir(d);
1661
if(direntry == NULL){
1662
break;
1663
}
1664
/* Skip "." and ".." */
1665
if(direntry->d_name[0] == '.'
1666
and (direntry->d_name[1] == '\0'
1667
or (direntry->d_name[1] == '.'
1668
and direntry->d_name[2] == '\0'))){
1669
continue;
1670
}
1671
char *fullname = NULL;
1672
ret = asprintf(&fullname, "%s/%s", tempdir,
1673
direntry->d_name);
1674
if(ret < 0){
1675
perror("asprintf");
1676
continue;
1677
}
1678
ret = remove(fullname);
1679
if(ret == -1){
1680
fprintf(stderr, "remove(\"%s\"): %s\n", fullname,
1681
strerror(errno));
1682
}
1683
free(fullname);
1684
}
1685
closedir(d);
1686
}
1687
ret = rmdir(tempdir);
1688
if(ret == -1 and errno != ENOENT){
1689
perror("rmdir");
1690
}
1691
}
1692
1693
if(quit_now){
1694
sigemptyset(&old_sigterm_action.sa_mask);
1695
old_sigterm_action.sa_handler = SIG_DFL;
1696
ret = (int)TEMP_FAILURE_RETRY(sigaction(signal_received,
1697
&old_sigterm_action,
1698
NULL));
1699
if(ret == -1){
1700
perror("sigaction");
1701
}
1702
do {
1703
ret = raise(signal_received);
1704
} while(ret != 0 and errno == EINTR);
1705
if(ret != 0){
1706
perror("raise");
1707
abort();
1708
}
1709
TEMP_FAILURE_RETRY(pause());
1710
}
1711
1712
return exitcode;
1164
1713
}
Loggerhead is a web-based interface for Breezy
Version: 2.0.2.dev0