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 531
- compare with another revision
- download diff
- download tarball
- view history from revision 531
- Committer: teddy at bsnet
- Date: 2011-12-24 19:43:48 UTC
- mfrom: (505.1.27 teddy)
- Revision ID: teddy@fukt.bsnet.se-20111224194348-0buonmve2dnwcnzw
Merge from Teddy
- files removed:
- debian/mandos-client.examples
- debian/upstream
- files modified:
- .bzrignore
added
removed
plugins.d/mandos-client.c
9
9
* "browse_callback", and parts of "main".
10
10
*
11
11
* Everything else is
12
* Copyright © 2008-2014 Teddy Hogeborn
13
* Copyright © 2008-2014 Björn Påhlsson
12
* Copyright © 2008-2011 Teddy Hogeborn
13
* Copyright © 2008-2011 Björn Påhlsson
14
14
*
15
15
* This program is free software: you can redistribute it and/or
16
16
* modify it under the terms of the GNU General Public License as
41
41
42
42
#include <stdio.h> /* fprintf(), stderr, fwrite(),
43
43
stdout, ferror(), remove() */
44
#include <stdint.h> /* uint16_t, uint32_t, intptr_t */
44
#include <stdint.h> /* uint16_t, uint32_t */
45
45
#include <stddef.h> /* NULL, size_t, ssize_t */
46
46
#include <stdlib.h> /* free(), EXIT_SUCCESS, srand(),
47
47
strtof(), abort() */
55
55
opendir(), DIR */
56
56
#include <sys/stat.h> /* open(), S_ISREG */
57
57
#include <sys/socket.h> /* socket(), struct sockaddr_in6,
58
inet_pton(), connect(),
59
getnameinfo() */
58
inet_pton(), connect() */
60
59
#include <fcntl.h> /* open() */
61
60
#include <dirent.h> /* opendir(), struct dirent, readdir()
62
61
*/
63
62
#include <inttypes.h> /* PRIu16, PRIdMAX, intmax_t,
64
63
strtoimax() */
64
#include <assert.h> /* assert() */
65
65
#include <errno.h> /* perror(), errno,
66
66
program_invocation_short_name */
67
67
#include <time.h> /* nanosleep(), time(), sleep() */
74
74
#include <unistd.h> /* close(), SEEK_SET, off_t, write(),
75
75
getuid(), getgid(), seteuid(),
76
76
setgid(), pause(), _exit() */
77
#include <arpa/inet.h> /* inet_pton(), htons() */
77
#include <arpa/inet.h> /* inet_pton(), htons, inet_ntop() */
78
78
#include <iso646.h> /* not, or, and */
79
79
#include <argp.h> /* struct argp_option, error_t, struct
80
80
argp_state, struct argp,
88
88
#include <sys/wait.h> /* waitpid(), WIFEXITED(),
89
89
WEXITSTATUS(), WTERMSIG() */
90
90
#include <grp.h> /* setgroups() */
91
#include <argz.h> /* argz_add_sep(), argz_next(),
92
argz_delete(), argz_append(),
93
argz_stringify(), argz_add(),
94
argz_count() */
95
#include <netdb.h> /* getnameinfo(), NI_NUMERICHOST,
96
EAI_SYSTEM, gai_strerror() */
97
91
98
92
#ifdef __linux__
99
93
#include <sys/klog.h> /* klogctl() */
136
130
137
131
bool debug = false;
138
132
static const char mandos_protocol_version[] = "1";
139
const char * argp_program_version = "mandos-client " VERSION;
140
const char * argp_program_bug_address = "<mandos@recompile.se>";
133
const char *argp_program_version = "mandos-client " VERSION;
134
const char *argp_program_bug_address = "<mandos@recompile.se>";
141
135
static const char sys_class_net[] = "/sys/class/net";
142
136
char *connect_to = NULL;
143
137
const char *hookdir = HOOKDIR;
144
uid_t uid = 65534;
145
gid_t gid = 65534;
146
138
147
139
/* Doubly linked list that need to be circularly linked when used */
148
140
typedef struct server{
149
141
const char *ip;
150
in_port_t port;
142
uint16_t port;
151
143
AvahiIfIndex if_index;
152
144
int af;
153
145
struct timespec last_seen;
157
149
158
150
/* Used for passing in values through the Avahi callback functions */
159
151
typedef struct {
152
AvahiSimplePoll *simple_poll;
160
153
AvahiServer *server;
161
154
gnutls_certificate_credentials_t cred;
162
155
unsigned int dh_bits;
164
157
const char *priority;
165
158
gpgme_ctx_t ctx;
166
159
server *current_server;
167
char *interfaces;
168
size_t interfaces_size;
169
160
} mandos_context;
170
161
171
/* global so signal handler can reach it*/
172
AvahiSimplePoll *simple_poll;
162
/* global context so signal handler can reach it*/
163
mandos_context mc = { .simple_poll = NULL, .server = NULL,
164
.dh_bits = 1024, .priority = "SECURE256"
165
":!CTYPE-X.509:+CTYPE-OPENPGP",
166
.current_server = NULL };
173
167
174
168
sig_atomic_t quit_now = 0;
175
169
int signal_received = 0;
176
170
177
171
/* Function to use when printing errors */
178
172
void perror_plus(const char *print_text){
179
int e = errno;
180
173
fprintf(stderr, "Mandos plugin %s: ",
181
174
program_invocation_short_name);
182
errno = e;
183
175
perror(print_text);
184
176
}
185
177
186
__attribute__((format (gnu_printf, 2, 3), nonnull))
187
178
int fprintf_plus(FILE *stream, const char *format, ...){
188
179
va_list ap;
189
180
va_start (ap, format);
190
181
191
182
TEMP_FAILURE_RETRY(fprintf(stream, "Mandos plugin %s: ",
192
183
program_invocation_short_name));
193
return (int)TEMP_FAILURE_RETRY(vfprintf(stream, format, ap));
184
return TEMP_FAILURE_RETRY(vfprintf(stream, format, ap));
194
185
}
195
186
196
187
/*
198
189
* bytes. "buffer_capacity" is how much is currently allocated,
199
190
* "buffer_length" is how much is already used.
200
191
*/
201
__attribute__((nonnull, warn_unused_result))
202
192
size_t incbuffer(char **buffer, size_t buffer_length,
203
193
size_t buffer_capacity){
204
194
if(buffer_length + BUFFER_SIZE > buffer_capacity){
205
char *new_buf = realloc(*buffer, buffer_capacity + BUFFER_SIZE);
206
if(new_buf == NULL){
207
int old_errno = errno;
208
free(*buffer);
209
errno = old_errno;
210
*buffer = NULL;
195
*buffer = realloc(*buffer, buffer_capacity + BUFFER_SIZE);
196
if(buffer == NULL){
211
197
return 0;
212
198
}
213
*buffer = new_buf;
214
199
buffer_capacity += BUFFER_SIZE;
215
200
}
216
201
return buffer_capacity;
217
202
}
218
203
219
204
/* Add server to set of servers to retry periodically */
220
__attribute__((nonnull, warn_unused_result))
221
bool add_server(const char *ip, in_port_t port, AvahiIfIndex if_index,
222
int af, server **current_server){
205
bool add_server(const char *ip, uint16_t port, AvahiIfIndex if_index,
206
int af){
223
207
int ret;
224
208
server *new_server = malloc(sizeof(server));
225
209
if(new_server == NULL){
234
218
perror_plus("strdup");
235
219
return false;
236
220
}
237
ret = clock_gettime(CLOCK_MONOTONIC, &(new_server->last_seen));
238
if(ret == -1){
239
perror_plus("clock_gettime");
240
return false;
241
}
242
221
/* Special case of first server */
243
if(*current_server == NULL){
222
if (mc.current_server == NULL){
244
223
new_server->next = new_server;
245
224
new_server->prev = new_server;
246
*current_server = new_server;
225
mc.current_server = new_server;
226
/* Place the new server last in the list */
247
227
} else {
248
/* Place the new server last in the list */
249
new_server->next = *current_server;
250
new_server->prev = (*current_server)->prev;
228
new_server->next = mc.current_server;
229
new_server->prev = mc.current_server->prev;
251
230
new_server->prev->next = new_server;
252
(*current_server)->prev = new_server;
231
mc.current_server->prev = new_server;
232
}
233
ret = clock_gettime(CLOCK_MONOTONIC, &mc.current_server->last_seen);
234
if(ret == -1){
235
perror_plus("clock_gettime");
236
return false;
253
237
}
254
238
return true;
255
239
}
257
241
/*
258
242
* Initialize GPGME.
259
243
*/
260
__attribute__((nonnull, warn_unused_result))
261
static bool init_gpgme(const char * const seckey,
262
const char * const pubkey,
263
const char * const tempdir,
264
mandos_context *mc){
244
static bool init_gpgme(const char *seckey, const char *pubkey,
245
const char *tempdir){
265
246
gpgme_error_t rc;
266
247
gpgme_engine_info_t engine_info;
267
248
249
268
250
/*
269
251
* Helper function to insert pub and seckey to the engine keyring.
270
252
*/
271
bool import_key(const char * const filename){
253
bool import_key(const char *filename){
272
254
int ret;
273
255
int fd;
274
256
gpgme_data_t pgp_data;
286
268
return false;
287
269
}
288
270
289
rc = gpgme_op_import(mc->ctx, pgp_data);
271
rc = gpgme_op_import(mc.ctx, pgp_data);
290
272
if(rc != GPG_ERR_NO_ERROR){
291
273
fprintf_plus(stderr, "bad gpgme_op_import: %s: %s\n",
292
274
gpgme_strsource(rc), gpgme_strerror(rc));
336
318
}
337
319
338
320
/* Create new GPGME "context" */
339
rc = gpgme_new(&(mc->ctx));
321
rc = gpgme_new(&(mc.ctx));
340
322
if(rc != GPG_ERR_NO_ERROR){
341
323
fprintf_plus(stderr, "Mandos plugin mandos-client: "
342
324
"bad gpgme_new: %s: %s\n", gpgme_strsource(rc),
355
337
* Decrypt OpenPGP data.
356
338
* Returns -1 on error
357
339
*/
358
__attribute__((nonnull, warn_unused_result))
359
340
static ssize_t pgp_packet_decrypt(const char *cryptotext,
360
341
size_t crypto_size,
361
char **plaintext,
362
mandos_context *mc){
342
char **plaintext){
363
343
gpgme_data_t dh_crypto, dh_plain;
364
344
gpgme_error_t rc;
365
345
ssize_t ret;
391
371
392
372
/* Decrypt data from the cryptotext data buffer to the plaintext
393
373
data buffer */
394
rc = gpgme_op_decrypt(mc->ctx, dh_crypto, dh_plain);
374
rc = gpgme_op_decrypt(mc.ctx, dh_crypto, dh_plain);
395
375
if(rc != GPG_ERR_NO_ERROR){
396
376
fprintf_plus(stderr, "bad gpgme_op_decrypt: %s: %s\n",
397
377
gpgme_strsource(rc), gpgme_strerror(rc));
398
378
plaintext_length = -1;
399
379
if(debug){
400
380
gpgme_decrypt_result_t result;
401
result = gpgme_op_decrypt_result(mc->ctx);
381
result = gpgme_op_decrypt_result(mc.ctx);
402
382
if(result == NULL){
403
383
fprintf_plus(stderr, "gpgme_op_decrypt_result failed\n");
404
384
} else {
481
461
return plaintext_length;
482
462
}
483
463
484
__attribute__((warn_unused_result))
485
static const char *safer_gnutls_strerror(int value){
486
const char *ret = gnutls_strerror(value);
464
static const char * safer_gnutls_strerror(int value){
465
const char *ret = gnutls_strerror(value); /* Spurious warning from
466
-Wunreachable-code */
487
467
if(ret == NULL)
488
468
ret = "(unknown)";
489
469
return ret;
490
470
}
491
471
492
472
/* GnuTLS log function callback */
493
__attribute__((nonnull))
494
473
static void debuggnutls(__attribute__((unused)) int level,
495
474
const char* string){
496
475
fprintf_plus(stderr, "GnuTLS: %s", string);
497
476
}
498
477
499
__attribute__((nonnull, warn_unused_result))
500
478
static int init_gnutls_global(const char *pubkeyfilename,
501
const char *seckeyfilename,
502
mandos_context *mc){
479
const char *seckeyfilename){
503
480
int ret;
504
481
505
482
if(debug){
522
499
}
523
500
524
501
/* OpenPGP credentials */
525
ret = gnutls_certificate_allocate_credentials(&mc->cred);
502
ret = gnutls_certificate_allocate_credentials(&mc.cred);
526
503
if(ret != GNUTLS_E_SUCCESS){
527
504
fprintf_plus(stderr, "GnuTLS memory error: %s\n",
528
505
safer_gnutls_strerror(ret));
538
515
}
539
516
540
517
ret = gnutls_certificate_set_openpgp_key_file
541
(mc->cred, pubkeyfilename, seckeyfilename,
518
(mc.cred, pubkeyfilename, seckeyfilename,
542
519
GNUTLS_OPENPGP_FMT_BASE64);
543
520
if(ret != GNUTLS_E_SUCCESS){
544
521
fprintf_plus(stderr,
550
527
}
551
528
552
529
/* GnuTLS server initialization */
553
ret = gnutls_dh_params_init(&mc->dh_params);
530
ret = gnutls_dh_params_init(&mc.dh_params);
554
531
if(ret != GNUTLS_E_SUCCESS){
555
532
fprintf_plus(stderr, "Error in GnuTLS DH parameter"
556
533
" initialization: %s\n",
557
534
safer_gnutls_strerror(ret));
558
535
goto globalfail;
559
536
}
560
ret = gnutls_dh_params_generate2(mc->dh_params, mc->dh_bits);
537
ret = gnutls_dh_params_generate2(mc.dh_params, mc.dh_bits);
561
538
if(ret != GNUTLS_E_SUCCESS){
562
539
fprintf_plus(stderr, "Error in GnuTLS prime generation: %s\n",
563
540
safer_gnutls_strerror(ret));
564
541
goto globalfail;
565
542
}
566
543
567
gnutls_certificate_set_dh_params(mc->cred, mc->dh_params);
544
gnutls_certificate_set_dh_params(mc.cred, mc.dh_params);
568
545
569
546
return 0;
570
547
571
548
globalfail:
572
549
573
gnutls_certificate_free_credentials(mc->cred);
550
gnutls_certificate_free_credentials(mc.cred);
574
551
gnutls_global_deinit();
575
gnutls_dh_params_deinit(mc->dh_params);
552
gnutls_dh_params_deinit(mc.dh_params);
576
553
return -1;
577
554
}
578
555
579
__attribute__((nonnull, warn_unused_result))
580
static int init_gnutls_session(gnutls_session_t *session,
581
mandos_context *mc){
556
static int init_gnutls_session(gnutls_session_t *session){
582
557
int ret;
583
558
/* GnuTLS session creation */
584
559
do {
596
571
{
597
572
const char *err;
598
573
do {
599
ret = gnutls_priority_set_direct(*session, mc->priority, &err);
574
ret = gnutls_priority_set_direct(*session, mc.priority, &err);
600
575
if(quit_now){
601
576
gnutls_deinit(*session);
602
577
return -1;
613
588
614
589
do {
615
590
ret = gnutls_credentials_set(*session, GNUTLS_CRD_CERTIFICATE,
616
mc->cred);
591
mc.cred);
617
592
if(quit_now){
618
593
gnutls_deinit(*session);
619
594
return -1;
629
604
/* ignore client certificate if any. */
630
605
gnutls_certificate_server_set_request(*session, GNUTLS_CERT_IGNORE);
631
606
632
gnutls_dh_set_prime_bits(*session, mc->dh_bits);
607
gnutls_dh_set_prime_bits(*session, mc.dh_bits);
633
608
634
609
return 0;
635
610
}
639
614
__attribute__((unused)) const char *txt){}
640
615
641
616
/* Called when a Mandos server is found */
642
__attribute__((nonnull, warn_unused_result))
643
static int start_mandos_communication(const char *ip, in_port_t port,
617
static int start_mandos_communication(const char *ip, uint16_t port,
644
618
AvahiIfIndex if_index,
645
int af, mandos_context *mc){
619
int af){
646
620
int ret, tcp_sd = -1;
647
621
ssize_t sret;
648
struct sockaddr_storage to;
622
union {
623
struct sockaddr_in in;
624
struct sockaddr_in6 in6;
625
} to;
649
626
char *buffer = NULL;
650
627
char *decrypted_buffer = NULL;
651
628
size_t buffer_length = 0;
675
652
return -1;
676
653
}
677
654
678
/* If the interface is specified and we have a list of interfaces */
679
if(if_index != AVAHI_IF_UNSPEC and mc->interfaces != NULL){
680
/* Check if the interface is one of the interfaces we are using */
681
bool match = false;
682
{
683
char *interface = NULL;
684
while((interface=argz_next(mc->interfaces, mc->interfaces_size,
685
interface))){
686
if(if_nametoindex(interface) == (unsigned int)if_index){
687
match = true;
688
break;
689
}
690
}
691
}
692
if(not match){
693
/* This interface does not match any in the list, so we don't
694
connect to the server */
695
if(debug){
696
char interface[IF_NAMESIZE];
697
if(if_indextoname((unsigned int)if_index, interface) == NULL){
698
perror_plus("if_indextoname");
699
} else {
700
fprintf_plus(stderr, "Skipping server on non-used interface"
701
" \"%s\"\n",
702
if_indextoname((unsigned int)if_index,
703
interface));
704
}
705
}
706
return -1;
707
}
708
}
709
710
ret = init_gnutls_session(&session, mc);
655
ret = init_gnutls_session(&session);
711
656
if(ret != 0){
712
657
return -1;
713
658
}
714
659
715
660
if(debug){
716
661
fprintf_plus(stderr, "Setting up a TCP connection to %s, port %"
717
PRIuMAX "\n", ip, (uintmax_t)port);
662
PRIu16 "\n", ip, port);
718
663
}
719
664
720
665
tcp_sd = socket(pf, SOCK_STREAM, 0);
732
677
733
678
memset(&to, 0, sizeof(to));
734
679
if(af == AF_INET6){
735
((struct sockaddr_in6 *)&to)->sin6_family = (sa_family_t)af;
736
ret = inet_pton(af, ip, &((struct sockaddr_in6 *)&to)->sin6_addr);
680
to.in6.sin6_family = (sa_family_t)af;
681
ret = inet_pton(af, ip, &to.in6.sin6_addr);
737
682
} else { /* IPv4 */
738
((struct sockaddr_in *)&to)->sin_family = (sa_family_t)af;
739
ret = inet_pton(af, ip, &((struct sockaddr_in *)&to)->sin_addr);
683
to.in.sin_family = (sa_family_t)af;
684
ret = inet_pton(af, ip, &to.in.sin_addr);
740
685
}
741
686
if(ret < 0 ){
742
687
int e = errno;
751
696
goto mandos_end;
752
697
}
753
698
if(af == AF_INET6){
754
((struct sockaddr_in6 *)&to)->sin6_port = htons(port);
755
if(IN6_IS_ADDR_LINKLOCAL
756
(&((struct sockaddr_in6 *)&to)->sin6_addr)){
699
to.in6.sin6_port = htons(port); /* Spurious warnings from
700
-Wconversion and
701
-Wunreachable-code */
702
703
if(IN6_IS_ADDR_LINKLOCAL /* Spurious warnings from */
704
(&to.in6.sin6_addr)){ /* -Wstrict-aliasing=2 or lower and
705
-Wunreachable-code*/
757
706
if(if_index == AVAHI_IF_UNSPEC){
758
707
fprintf_plus(stderr, "An IPv6 link-local address is"
759
708
" incomplete without a network interface\n");
761
710
goto mandos_end;
762
711
}
763
712
/* Set the network interface number as scope */
764
((struct sockaddr_in6 *)&to)->sin6_scope_id = (uint32_t)if_index;
713
to.in6.sin6_scope_id = (uint32_t)if_index;
765
714
}
766
715
} else {
767
((struct sockaddr_in *)&to)->sin_port = htons(port);
716
to.in.sin_port = htons(port); /* Spurious warnings from
717
-Wconversion and
718
-Wunreachable-code */
768
719
}
769
720
770
721
if(quit_now){
778
729
if(if_indextoname((unsigned int)if_index, interface) == NULL){
779
730
perror_plus("if_indextoname");
780
731
} else {
781
fprintf_plus(stderr, "Connection to: %s%%%s, port %" PRIuMAX
782
"\n", ip, interface, (uintmax_t)port);
732
fprintf_plus(stderr, "Connection to: %s%%%s, port %" PRIu16
733
"\n", ip, interface, port);
783
734
}
784
735
} else {
785
fprintf_plus(stderr, "Connection to: %s, port %" PRIuMAX "\n",
786
ip, (uintmax_t)port);
736
fprintf_plus(stderr, "Connection to: %s, port %" PRIu16 "\n",
737
ip, port);
787
738
}
788
739
char addrstr[(INET_ADDRSTRLEN > INET6_ADDRSTRLEN) ?
789
740
INET_ADDRSTRLEN : INET6_ADDRSTRLEN] = "";
741
const char *pcret;
790
742
if(af == AF_INET6){
791
ret = getnameinfo((struct sockaddr *)&to,
792
sizeof(struct sockaddr_in6),
793
addrstr, sizeof(addrstr), NULL, 0,
794
NI_NUMERICHOST);
743
pcret = inet_ntop(af, &(to.in6.sin6_addr), addrstr,
744
sizeof(addrstr));
795
745
} else {
796
ret = getnameinfo((struct sockaddr *)&to,
797
sizeof(struct sockaddr_in),
798
addrstr, sizeof(addrstr), NULL, 0,
799
NI_NUMERICHOST);
746
pcret = inet_ntop(af, &(to.in.sin_addr), addrstr,
747
sizeof(addrstr));
800
748
}
801
if(ret == EAI_SYSTEM){
802
perror_plus("getnameinfo");
803
} else if(ret != 0) {
804
fprintf_plus(stderr, "getnameinfo: %s", gai_strerror(ret));
805
} else if(strcmp(addrstr, ip) != 0){
806
fprintf_plus(stderr, "Canonical address form: %s\n", addrstr);
749
if(pcret == NULL){
750
perror_plus("inet_ntop");
751
} else {
752
if(strcmp(addrstr, ip) != 0){
753
fprintf_plus(stderr, "Canonical address form: %s\n", addrstr);
754
}
807
755
}
808
756
}
809
757
813
761
}
814
762
815
763
if(af == AF_INET6){
816
ret = connect(tcp_sd, (struct sockaddr *)&to,
817
sizeof(struct sockaddr_in6));
764
ret = connect(tcp_sd, &to.in6, sizeof(to));
818
765
} else {
819
ret = connect(tcp_sd, (struct sockaddr *)&to, /* IPv4 */
820
sizeof(struct sockaddr_in));
766
ret = connect(tcp_sd, &to.in, sizeof(to)); /* IPv4 */
821
767
}
822
768
if(ret < 0){
823
if((errno != ECONNREFUSED and errno != ENETUNREACH) or debug){
769
if ((errno != ECONNREFUSED and errno != ENETUNREACH) or debug){
824
770
int e = errno;
825
771
perror_plus("connect");
826
772
errno = e;
872
818
goto mandos_end;
873
819
}
874
820
875
/* This casting via intptr_t is to eliminate warning about casting
876
an int to a pointer type. This is exactly how the GnuTLS Guile
877
function "set-session-transport-fd!" does it. */
878
gnutls_transport_set_ptr(session,
879
(gnutls_transport_ptr_t)(intptr_t)tcp_sd);
821
/* Spurious warning from -Wint-to-pointer-cast */
822
gnutls_transport_set_ptr(session, (gnutls_transport_ptr_t) tcp_sd);
880
823
881
824
if(quit_now){
882
825
errno = EINTR;
987
930
if(buffer_length > 0){
988
931
ssize_t decrypted_buffer_size;
989
932
decrypted_buffer_size = pgp_packet_decrypt(buffer, buffer_length,
990
&decrypted_buffer, mc);
933
&decrypted_buffer);
991
934
if(decrypted_buffer_size >= 0){
992
935
993
936
written = 0;
1041
984
return retval;
1042
985
}
1043
986
1044
__attribute__((nonnull))
1045
987
static void resolve_callback(AvahiSServiceResolver *r,
1046
988
AvahiIfIndex interface,
1047
989
AvahiProtocol proto,
1055
997
AVAHI_GCC_UNUSED AvahiStringList *txt,
1056
998
AVAHI_GCC_UNUSED AvahiLookupResultFlags
1057
999
flags,
1058
void *mc){
1059
if(r == NULL){
1060
return;
1061
}
1000
AVAHI_GCC_UNUSED void* userdata){
1001
assert(r);
1062
1002
1063
1003
/* Called whenever a service has been resolved successfully or
1064
1004
timed out */
1073
1013
fprintf_plus(stderr, "(Avahi Resolver) Failed to resolve service "
1074
1014
"'%s' of type '%s' in domain '%s': %s\n", name, type,
1075
1015
domain,
1076
avahi_strerror(avahi_server_errno
1077
(((mandos_context*)mc)->server)));
1016
avahi_strerror(avahi_server_errno(mc.server)));
1078
1017
break;
1079
1018
1080
1019
case AVAHI_RESOLVER_FOUND:
1086
1025
PRIdMAX ") on port %" PRIu16 "\n", name,
1087
1026
host_name, ip, (intmax_t)interface, port);
1088
1027
}
1089
int ret = start_mandos_communication(ip, (in_port_t)port,
1090
interface,
1091
avahi_proto_to_af(proto),
1092
mc);
1028
int ret = start_mandos_communication(ip, port, interface,
1029
avahi_proto_to_af(proto));
1093
1030
if(ret == 0){
1094
avahi_simple_poll_quit(simple_poll);
1031
avahi_simple_poll_quit(mc.simple_poll);
1095
1032
} else {
1096
if(not add_server(ip, (in_port_t)port, interface,
1097
avahi_proto_to_af(proto),
1098
&((mandos_context*)mc)->current_server)){
1033
if(not add_server(ip, port, interface,
1034
avahi_proto_to_af(proto))){
1099
1035
fprintf_plus(stderr, "Failed to add server \"%s\" to server"
1100
1036
" list\n", name);
1101
1037
}
1114
1050
const char *domain,
1115
1051
AVAHI_GCC_UNUSED AvahiLookupResultFlags
1116
1052
flags,
1117
void *mc){
1118
if(b == NULL){
1119
return;
1120
}
1053
AVAHI_GCC_UNUSED void* userdata){
1054
assert(b);
1121
1055
1122
1056
/* Called whenever a new services becomes available on the LAN or
1123
1057
is removed from the LAN */
1131
1065
case AVAHI_BROWSER_FAILURE:
1132
1066
1133
1067
fprintf_plus(stderr, "(Avahi browser) %s\n",
1134
avahi_strerror(avahi_server_errno
1135
(((mandos_context*)mc)->server)));
1136
avahi_simple_poll_quit(simple_poll);
1068
avahi_strerror(avahi_server_errno(mc.server)));
1069
avahi_simple_poll_quit(mc.simple_poll);
1137
1070
return;
1138
1071
1139
1072
case AVAHI_BROWSER_NEW:
1142
1075
the callback function is called the Avahi server will free the
1143
1076
resolver for us. */
1144
1077
1145
if(avahi_s_service_resolver_new(((mandos_context*)mc)->server,
1146
interface, protocol, name, type,
1147
domain, protocol, 0,
1148
resolve_callback, mc) == NULL)
1078
if(avahi_s_service_resolver_new(mc.server, interface, protocol,
1079
name, type, domain, protocol, 0,
1080
resolve_callback, NULL) == NULL)
1149
1081
fprintf_plus(stderr, "Avahi: Failed to resolve service '%s':"
1150
1082
" %s\n", name,
1151
avahi_strerror(avahi_server_errno
1152
(((mandos_context*)mc)->server)));
1083
avahi_strerror(avahi_server_errno(mc.server)));
1153
1084
break;
1154
1085
1155
1086
case AVAHI_BROWSER_REMOVE:
1174
1105
signal_received = sig;
1175
1106
int old_errno = errno;
1176
1107
/* set main loop to exit */
1177
if(simple_poll != NULL){
1178
avahi_simple_poll_quit(simple_poll);
1108
if(mc.simple_poll != NULL){
1109
avahi_simple_poll_quit(mc.simple_poll);
1179
1110
}
1180
1111
errno = old_errno;
1181
1112
}
1182
1113
1183
__attribute__((nonnull, warn_unused_result))
1184
1114
bool get_flags(const char *ifname, struct ifreq *ifr){
1185
1115
int ret;
1186
error_t ret_errno;
1187
1116
1188
1117
int s = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);
1189
1118
if(s < 0){
1190
ret_errno = errno;
1191
1119
perror_plus("socket");
1192
errno = ret_errno;
1193
1120
return false;
1194
1121
}
1195
1122
strcpy(ifr->ifr_name, ifname);
1196
1123
ret = ioctl(s, SIOCGIFFLAGS, ifr);
1197
1124
if(ret == -1){
1198
1125
if(debug){
1199
ret_errno = errno;
1200
1126
perror_plus("ioctl SIOCGIFFLAGS");
1201
errno = ret_errno;
1202
1127
}
1203
1128
return false;
1204
1129
}
1205
1130
return true;
1206
1131
}
1207
1132
1208
__attribute__((nonnull, warn_unused_result))
1209
1133
bool good_flags(const char *ifname, const struct ifreq *ifr){
1210
1134
1211
1135
/* Reject the loopback device */
1253
1177
* corresponds to an acceptable network device.
1254
1178
* (This function is passed to scandir(3) as a filter function.)
1255
1179
*/
1256
__attribute__((nonnull, warn_unused_result))
1257
1180
int good_interface(const struct dirent *if_entry){
1258
1181
if(if_entry->d_name[0] == '.'){
1259
1182
return 0;
1275
1198
}
1276
1199
1277
1200
/*
1278
* This function determines if a network interface is up.
1279
*/
1280
__attribute__((nonnull, warn_unused_result))
1281
bool interface_is_up(const char *interface){
1282
struct ifreq ifr;
1283
if(not get_flags(interface, &ifr)){
1284
if(debug){
1285
fprintf_plus(stderr, "Failed to get flags for interface "
1286
"\"%s\"\n", interface);
1287
}
1288
return false;
1289
}
1290
1291
return (bool)(ifr.ifr_flags & IFF_UP);
1292
}
1293
1294
/*
1295
* This function determines if a network interface is running
1296
*/
1297
__attribute__((nonnull, warn_unused_result))
1298
bool interface_is_running(const char *interface){
1299
struct ifreq ifr;
1300
if(not get_flags(interface, &ifr)){
1301
if(debug){
1302
fprintf_plus(stderr, "Failed to get flags for interface "
1303
"\"%s\"\n", interface);
1304
}
1305
return false;
1306
}
1307
1308
return (bool)(ifr.ifr_flags & IFF_RUNNING);
1309
}
1310
1311
__attribute__((nonnull, pure, warn_unused_result))
1201
* This function determines if a directory entry in /sys/class/net
1202
* corresponds to an acceptable network device which is up.
1203
* (This function is passed to scandir(3) as a filter function.)
1204
*/
1205
int up_interface(const struct dirent *if_entry){
1206
if(if_entry->d_name[0] == '.'){
1207
return 0;
1208
}
1209
1210
struct ifreq ifr;
1211
if(not get_flags(if_entry->d_name, &ifr)){
1212
if(debug){
1213
fprintf_plus(stderr, "Failed to get flags for interface "
1214
"\"%s\"\n", if_entry->d_name);
1215
}
1216
return 0;
1217
}
1218
1219
/* Reject down interfaces */
1220
if(not (ifr.ifr_flags & IFF_UP)){
1221
if(debug){
1222
fprintf_plus(stderr, "Rejecting down interface \"%s\"\n",
1223
if_entry->d_name);
1224
}
1225
return 0;
1226
}
1227
1228
/* Reject non-running interfaces */
1229
if(not (ifr.ifr_flags & IFF_RUNNING)){
1230
if(debug){
1231
fprintf_plus(stderr, "Rejecting non-running interface \"%s\"\n",
1232
if_entry->d_name);
1233
}
1234
return 0;
1235
}
1236
1237
if(not good_flags(if_entry->d_name, &ifr)){
1238
return 0;
1239
}
1240
return 1;
1241
}
1242
1312
1243
int notdotentries(const struct dirent *direntry){
1313
1244
/* Skip "." and ".." */
1314
1245
if(direntry->d_name[0] == '.'
1321
1252
}
1322
1253
1323
1254
/* Is this directory entry a runnable program? */
1324
__attribute__((nonnull, warn_unused_result))
1325
1255
int runnable_hook(const struct dirent *direntry){
1326
1256
int ret;
1327
1257
size_t sret;
1382
1312
return 1;
1383
1313
}
1384
1314
1385
__attribute__((nonnull, warn_unused_result))
1386
int avahi_loop_with_timeout(AvahiSimplePoll *s, int retry_interval,
1387
mandos_context *mc){
1315
int avahi_loop_with_timeout(AvahiSimplePoll *s, int retry_interval){
1388
1316
int ret;
1389
1317
struct timespec now;
1390
1318
struct timespec waited_time;
1391
1319
intmax_t block_time;
1392
1320
1393
1321
while(true){
1394
if(mc->current_server == NULL){
1395
if(debug){
1322
if(mc.current_server == NULL){
1323
if (debug){
1396
1324
fprintf_plus(stderr, "Wait until first server is found."
1397
1325
" No timeout!\n");
1398
1326
}
1399
1327
ret = avahi_simple_poll_iterate(s, -1);
1400
1328
} else {
1401
if(debug){
1329
if (debug){
1402
1330
fprintf_plus(stderr, "Check current_server if we should run"
1403
1331
" it, or wait\n");
1404
1332
}
1411
1339
/* Calculating in ms how long time between now and server
1412
1340
who we visted longest time ago. Now - last seen. */
1413
1341
waited_time.tv_sec = (now.tv_sec
1414
- mc->current_server->last_seen.tv_sec);
1342
- mc.current_server->last_seen.tv_sec);
1415
1343
waited_time.tv_nsec = (now.tv_nsec
1416
- mc->current_server->last_seen.tv_nsec);
1344
- mc.current_server->last_seen.tv_nsec);
1417
1345
/* total time is 10s/10,000ms.
1418
1346
Converting to s from ms by dividing by 1,000,
1419
1347
and ns to ms by dividing by 1,000,000. */
1421
1349
- ((intmax_t)waited_time.tv_sec * 1000))
1422
1350
- ((intmax_t)waited_time.tv_nsec / 1000000));
1423
1351
1424
if(debug){
1352
if (debug){
1425
1353
fprintf_plus(stderr, "Blocking for %" PRIdMAX " ms\n",
1426
1354
block_time);
1427
1355
}
1428
1356
1429
1357
if(block_time <= 0){
1430
ret = start_mandos_communication(mc->current_server->ip,
1431
mc->current_server->port,
1432
mc->current_server->if_index,
1433
mc->current_server->af, mc);
1358
ret = start_mandos_communication(mc.current_server->ip,
1359
mc.current_server->port,
1360
mc.current_server->if_index,
1361
mc.current_server->af);
1434
1362
if(ret == 0){
1435
avahi_simple_poll_quit(s);
1363
avahi_simple_poll_quit(mc.simple_poll);
1436
1364
return 0;
1437
1365
}
1438
1366
ret = clock_gettime(CLOCK_MONOTONIC,
1439
&mc->current_server->last_seen);
1367
&mc.current_server->last_seen);
1440
1368
if(ret == -1){
1441
1369
perror_plus("clock_gettime");
1442
1370
return -1;
1443
1371
}
1444
mc->current_server = mc->current_server->next;
1372
mc.current_server = mc.current_server->next;
1445
1373
block_time = 0; /* Call avahi to find new Mandos
1446
1374
servers, but don't block */
1447
1375
}
1449
1377
ret = avahi_simple_poll_iterate(s, (int)block_time);
1450
1378
}
1451
1379
if(ret != 0){
1452
if(ret > 0 or errno != EINTR){
1380
if (ret > 0 or errno != EINTR){
1453
1381
return (ret != 1) ? ret : 0;
1454
1382
}
1455
1383
}
1456
1384
}
1457
1385
}
1458
1386
1459
/* Set effective uid to 0, return errno */
1460
__attribute__((warn_unused_result))
1461
error_t raise_privileges(void){
1462
error_t old_errno = errno;
1463
error_t ret_errno = 0;
1464
if(seteuid(0) == -1){
1465
ret_errno = errno;
1466
perror_plus("seteuid");
1467
}
1468
errno = old_errno;
1469
return ret_errno;
1470
}
1471
1472
/* Set effective and real user ID to 0. Return errno. */
1473
__attribute__((warn_unused_result))
1474
error_t raise_privileges_permanently(void){
1475
error_t old_errno = errno;
1476
error_t ret_errno = raise_privileges();
1477
if(ret_errno != 0){
1478
errno = old_errno;
1479
return ret_errno;
1480
}
1481
if(setuid(0) == -1){
1482
ret_errno = errno;
1483
perror_plus("seteuid");
1484
}
1485
errno = old_errno;
1486
return ret_errno;
1487
}
1488
1489
/* Set effective user ID to unprivileged saved user ID */
1490
__attribute__((warn_unused_result))
1491
error_t lower_privileges(void){
1492
error_t old_errno = errno;
1493
error_t ret_errno = 0;
1494
if(seteuid(uid) == -1){
1495
ret_errno = errno;
1496
perror_plus("seteuid");
1497
}
1498
errno = old_errno;
1499
return ret_errno;
1500
}
1501
1502
/* Lower privileges permanently */
1503
__attribute__((warn_unused_result))
1504
error_t lower_privileges_permanently(void){
1505
error_t old_errno = errno;
1506
error_t ret_errno = 0;
1507
if(setuid(uid) == -1){
1508
ret_errno = errno;
1509
perror_plus("setuid");
1510
}
1511
errno = old_errno;
1512
return ret_errno;
1513
}
1514
1515
__attribute__((nonnull))
1516
void run_network_hooks(const char *mode, const char *interface,
1387
bool run_network_hooks(const char *mode, const char *interface,
1517
1388
const float delay){
1518
1389
struct dirent **direntries;
1390
struct dirent *direntry;
1391
int ret;
1519
1392
int numhooks = scandir(hookdir, &direntries, runnable_hook,
1520
1393
alphasort);
1521
1394
if(numhooks == -1){
1522
if(errno == ENOENT){
1523
if(debug){
1524
fprintf_plus(stderr, "Network hook directory \"%s\" not"
1525
" found\n", hookdir);
1526
}
1527
} else {
1528
perror_plus("scandir");
1529
}
1395
perror_plus("scandir");
1530
1396
} else {
1531
struct dirent *direntry;
1532
int ret;
1533
1397
int devnull = open("/dev/null", O_RDONLY);
1534
1398
for(int i = 0; i < numhooks; i++){
1535
1399
direntry = direntries[i];
1547
1411
if(hook_pid == 0){
1548
1412
/* Child */
1549
1413
/* Raise privileges */
1550
if(raise_privileges_permanently() != 0){
1551
perror_plus("Failed to raise privileges");
1552
_exit(EX_NOPERM);
1414
errno = 0;
1415
ret = seteuid(0);
1416
if(ret == -1){
1417
perror_plus("seteuid");
1418
}
1419
/* Raise privileges even more */
1420
errno = 0;
1421
ret = setuid(0);
1422
if(ret == -1){
1423
perror_plus("setuid");
1553
1424
}
1554
1425
/* Set group */
1555
1426
errno = 0;
1556
1427
ret = setgid(0);
1557
1428
if(ret == -1){
1558
1429
perror_plus("setgid");
1559
_exit(EX_NOPERM);
1560
1430
}
1561
1431
/* Reset supplementary groups */
1562
1432
errno = 0;
1563
1433
ret = setgroups(0, NULL);
1564
1434
if(ret == -1){
1565
1435
perror_plus("setgroups");
1566
_exit(EX_NOPERM);
1567
}
1568
ret = dup2(devnull, STDIN_FILENO);
1569
if(ret == -1){
1570
perror_plus("dup2(devnull, STDIN_FILENO)");
1571
_exit(EX_OSERR);
1572
}
1573
ret = close(devnull);
1574
if(ret == -1){
1575
perror_plus("close");
1576
_exit(EX_OSERR);
1577
}
1578
ret = dup2(STDERR_FILENO, STDOUT_FILENO);
1579
if(ret == -1){
1580
perror_plus("dup2(STDERR_FILENO, STDOUT_FILENO)");
1581
_exit(EX_OSERR);
1582
}
1436
}
1437
dup2(devnull, STDIN_FILENO);
1438
close(devnull);
1439
dup2(STDERR_FILENO, STDOUT_FILENO);
1583
1440
ret = setenv("MANDOSNETHOOKDIR", hookdir, 1);
1584
1441
if(ret == -1){
1585
1442
perror_plus("setenv");
1590
1447
perror_plus("setenv");
1591
1448
_exit(EX_OSERR);
1592
1449
}
1593
ret = setenv("VERBOSITY", debug ? "1" : "0", 1);
1450
ret = setenv("VERBOSE", debug ? "1" : "0", 1);
1594
1451
if(ret == -1){
1595
1452
perror_plus("setenv");
1596
1453
_exit(EX_OSERR);
1601
1458
_exit(EX_OSERR);
1602
1459
}
1603
1460
char *delaystring;
1604
ret = asprintf(&delaystring, "%f", (double)delay);
1461
ret = asprintf(&delaystring, "%f", delay);
1605
1462
if(ret == -1){
1606
1463
perror_plus("asprintf");
1607
1464
_exit(EX_OSERR);
1613
1470
_exit(EX_OSERR);
1614
1471
}
1615
1472
free(delaystring);
1616
if(connect_to != NULL){
1617
ret = setenv("CONNECT", connect_to, 1);
1618
if(ret == -1){
1619
perror_plus("setenv");
1620
_exit(EX_OSERR);
1621
}
1622
}
1623
if(execl(fullname, direntry->d_name, mode, NULL) == -1){
1624
perror_plus("execl");
1625
_exit(EXIT_FAILURE);
1626
}
1473
ret = execl(fullname, direntry->d_name, mode, NULL);
1474
perror_plus("execl");
1627
1475
} else {
1628
1476
int status;
1629
1477
if(TEMP_FAILURE_RETRY(waitpid(hook_pid, &status, 0)) == -1){
1660
1508
}
1661
1509
close(devnull);
1662
1510
}
1663
}
1664
1665
__attribute__((nonnull, warn_unused_result))
1666
error_t bring_up_interface(const char *const interface,
1667
const float delay){
1668
error_t old_errno = errno;
1669
int ret;
1670
struct ifreq network;
1671
unsigned int if_index = if_nametoindex(interface);
1672
if(if_index == 0){
1673
fprintf_plus(stderr, "No such interface: \"%s\"\n", interface);
1674
errno = old_errno;
1675
return ENXIO;
1676
}
1677
1678
if(quit_now){
1679
errno = old_errno;
1680
return EINTR;
1681
}
1682
1683
if(not interface_is_up(interface)){
1684
error_t ret_errno = 0, ioctl_errno = 0;
1685
if(not get_flags(interface, &network)){
1686
ret_errno = errno;
1687
fprintf_plus(stderr, "Failed to get flags for interface "
1688
"\"%s\"\n", interface);
1689
errno = old_errno;
1690
return ret_errno;
1691
}
1692
network.ifr_flags |= IFF_UP; /* set flag */
1693
1694
int sd = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);
1695
if(sd == -1){
1696
ret_errno = errno;
1697
perror_plus("socket");
1698
errno = old_errno;
1699
return ret_errno;
1700
}
1701
1702
if(quit_now){
1703
ret = (int)TEMP_FAILURE_RETRY(close(sd));
1704
if(ret == -1){
1705
perror_plus("close");
1706
}
1707
errno = old_errno;
1708
return EINTR;
1709
}
1710
1711
if(debug){
1712
fprintf_plus(stderr, "Bringing up interface \"%s\"\n",
1713
interface);
1714
}
1715
1716
/* Raise privileges */
1717
ret_errno = raise_privileges();
1718
bool restore_loglevel = false;
1719
if(ret_errno != 0){
1720
perror_plus("Failed to raise privileges");
1721
}
1722
#ifdef __linux__
1723
int ret_linux;
1724
if(ret_errno == 0){
1725
/* Lower kernel loglevel to KERN_NOTICE to avoid KERN_INFO
1726
messages about the network interface to mess up the prompt */
1727
ret_linux = klogctl(8, NULL, 5);
1728
if(ret_linux == -1){
1729
perror_plus("klogctl");
1730
} else {
1731
restore_loglevel = true;
1732
}
1733
}
1734
#endif /* __linux__ */
1735
int ret_setflags = ioctl(sd, SIOCSIFFLAGS, &network);
1736
ioctl_errno = errno;
1737
#ifdef __linux__
1738
if(restore_loglevel){
1739
ret_linux = klogctl(7, NULL, 0);
1740
if(ret_linux == -1){
1741
perror_plus("klogctl");
1742
}
1743
}
1744
#endif /* __linux__ */
1745
1746
/* If raise_privileges() succeeded above */
1747
if(ret_errno == 0){
1748
/* Lower privileges */
1749
ret_errno = lower_privileges();
1750
if(ret_errno != 0){
1751
errno = ret_errno;
1752
perror_plus("Failed to lower privileges");
1753
}
1754
}
1755
1756
/* Close the socket */
1757
ret = (int)TEMP_FAILURE_RETRY(close(sd));
1758
if(ret == -1){
1759
perror_plus("close");
1760
}
1761
1762
if(ret_setflags == -1){
1763
errno = ioctl_errno;
1764
perror_plus("ioctl SIOCSIFFLAGS +IFF_UP");
1765
errno = old_errno;
1766
return ioctl_errno;
1767
}
1768
} else if(debug){
1769
fprintf_plus(stderr, "Interface \"%s\" is already up; good\n",
1770
interface);
1771
}
1772
1773
/* Sleep checking until interface is running.
1774
Check every 0.25s, up to total time of delay */
1775
for(int i=0; i < delay * 4; i++){
1776
if(interface_is_running(interface)){
1777
break;
1778
}
1779
struct timespec sleeptime = { .tv_nsec = 250000000 };
1780
ret = nanosleep(&sleeptime, NULL);
1781
if(ret == -1 and errno != EINTR){
1782
perror_plus("nanosleep");
1783
}
1784
}
1785
1786
errno = old_errno;
1787
return 0;
1788
}
1789
1790
__attribute__((nonnull, warn_unused_result))
1791
error_t take_down_interface(const char *const interface){
1792
error_t old_errno = errno;
1793
struct ifreq network;
1794
unsigned int if_index = if_nametoindex(interface);
1795
if(if_index == 0){
1796
fprintf_plus(stderr, "No such interface: \"%s\"\n", interface);
1797
errno = old_errno;
1798
return ENXIO;
1799
}
1800
if(interface_is_up(interface)){
1801
error_t ret_errno = 0, ioctl_errno = 0;
1802
if(not get_flags(interface, &network) and debug){
1803
ret_errno = errno;
1804
fprintf_plus(stderr, "Failed to get flags for interface "
1805
"\"%s\"\n", interface);
1806
errno = old_errno;
1807
return ret_errno;
1808
}
1809
network.ifr_flags &= ~(short)IFF_UP; /* clear flag */
1810
1811
int sd = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);
1812
if(sd == -1){
1813
ret_errno = errno;
1814
perror_plus("socket");
1815
errno = old_errno;
1816
return ret_errno;
1817
}
1818
1819
if(debug){
1820
fprintf_plus(stderr, "Taking down interface \"%s\"\n",
1821
interface);
1822
}
1823
1824
/* Raise privileges */
1825
ret_errno = raise_privileges();
1826
if(ret_errno != 0){
1827
perror_plus("Failed to raise privileges");
1828
}
1829
int ret_setflags = ioctl(sd, SIOCSIFFLAGS, &network);
1830
ioctl_errno = errno;
1831
1832
/* If raise_privileges() succeeded above */
1833
if(ret_errno == 0){
1834
/* Lower privileges */
1835
ret_errno = lower_privileges();
1836
if(ret_errno != 0){
1837
errno = ret_errno;
1838
perror_plus("Failed to lower privileges");
1839
}
1840
}
1841
1842
/* Close the socket */
1843
int ret = (int)TEMP_FAILURE_RETRY(close(sd));
1844
if(ret == -1){
1845
perror_plus("close");
1846
}
1847
1848
if(ret_setflags == -1){
1849
errno = ioctl_errno;
1850
perror_plus("ioctl SIOCSIFFLAGS -IFF_UP");
1851
errno = old_errno;
1852
return ioctl_errno;
1853
}
1854
} else if(debug){
1855
fprintf_plus(stderr, "Interface \"%s\" is already down; odd\n",
1856
interface);
1857
}
1858
1859
errno = old_errno;
1860
return 0;
1511
return true;
1861
1512
}
1862
1513
1863
1514
int main(int argc, char *argv[]){
1864
mandos_context mc = { .server = NULL, .dh_bits = 1024,
1865
.priority = "SECURE256:!CTYPE-X.509:"
1866
"+CTYPE-OPENPGP", .current_server = NULL,
1867
.interfaces = NULL, .interfaces_size = 0 };
1868
1515
AvahiSServiceBrowser *sb = NULL;
1869
error_t ret_errno;
1516
int error;
1870
1517
int ret;
1871
1518
intmax_t tmpmax;
1872
1519
char *tmp;
1873
1520
int exitcode = EXIT_SUCCESS;
1874
char *interfaces_to_take_down = NULL;
1875
size_t interfaces_to_take_down_size = 0;
1876
char run_tempdir[] = "/run/tmp/mandosXXXXXX";
1877
char old_tempdir[] = "/tmp/mandosXXXXXX";
1878
char *tempdir = NULL;
1521
const char *interface = "";
1522
struct ifreq network;
1523
int sd = -1;
1524
bool take_down_interface = false;
1525
uid_t uid;
1526
gid_t gid;
1527
char tempdir[] = "/tmp/mandosXXXXXX";
1528
bool tempdir_created = false;
1879
1529
AvahiIfIndex if_index = AVAHI_IF_UNSPEC;
1880
1530
const char *seckey = PATHDIR "/" SECKEY;
1881
1531
const char *pubkey = PATHDIR "/" PUBKEY;
1882
char *interfaces_hooks = NULL;
1883
1532
1884
1533
bool gnutls_initialized = false;
1885
1534
bool gpgme_initialized = false;
1947
1596
.group = 2 },
1948
1597
{ .name = "retry", .key = 132,
1949
1598
.arg = "SECONDS",
1950
.doc = "Retry interval used when denied by the Mandos server",
1599
.doc = "Retry interval used when denied by the mandos server",
1951
1600
.group = 2 },
1952
1601
{ .name = "network-hook-dir", .key = 133,
1953
1602
.arg = "DIR",
1976
1625
connect_to = arg;
1977
1626
break;
1978
1627
case 'i': /* --interface */
1979
ret_errno = argz_add_sep(&mc.interfaces, &mc.interfaces_size,
1980
arg, (int)',');
1981
if(ret_errno != 0){
1982
argp_error(state, "%s", strerror(ret_errno));
1983
}
1628
interface = arg;
1984
1629
break;
1985
1630
case 's': /* --seckey */
1986
1631
seckey = arg;
2063
1708
/* Work around Debian bug #633582:
2064
1709
<http://bugs.debian.org/633582> */
2065
1710
2066
/* Re-raise privileges */
2067
ret_errno = raise_privileges();
2068
if(ret_errno != 0){
2069
errno = ret_errno;
2070
perror_plus("Failed to raise privileges");
1711
/* Re-raise priviliges */
1712
errno = 0;
1713
ret = seteuid(0);
1714
if(ret == -1){
1715
perror_plus("seteuid");
2071
1716
} else {
2072
1717
struct stat st;
2073
1718
2114
1759
}
2115
1760
2116
1761
/* Lower privileges */
2117
ret_errno = lower_privileges();
2118
if(ret_errno != 0){
2119
errno = ret_errno;
2120
perror_plus("Failed to lower privileges");
2121
}
2122
}
2123
}
2124
2125
/* Remove invalid interface names (except "none") */
2126
{
2127
char *interface = NULL;
2128
while((interface = argz_next(mc.interfaces, mc.interfaces_size,
2129
interface))){
2130
if(strcmp(interface, "none") != 0
2131
and if_nametoindex(interface) == 0){
2132
if(interface[0] != '\0'){
2133
fprintf_plus(stderr, "Not using nonexisting interface"
2134
" \"%s\"\n", interface);
2135
}
2136
argz_delete(&mc.interfaces, &mc.interfaces_size, interface);
2137
interface = NULL;
1762
errno = 0;
1763
ret = seteuid(uid);
1764
if(ret == -1){
1765
perror_plus("seteuid");
2138
1766
}
2139
1767
}
2140
1768
}
2141
1769
2142
1770
/* Run network hooks */
2143
{
2144
if(mc.interfaces != NULL){
2145
interfaces_hooks = malloc(mc.interfaces_size);
2146
if(interfaces_hooks == NULL){
2147
perror_plus("malloc");
2148
goto end;
2149
}
2150
memcpy(interfaces_hooks, mc.interfaces, mc.interfaces_size);
2151
argz_stringify(interfaces_hooks, mc.interfaces_size, (int)',');
2152
}
2153
run_network_hooks("start", interfaces_hooks != NULL ?
2154
interfaces_hooks : "", delay);
1771
if(not run_network_hooks("start", interface, delay)){
1772
goto end;
2155
1773
}
2156
1774
2157
1775
if(not debug){
2158
1776
avahi_set_log_function(empty_log);
2159
1777
}
2160
1778
1779
if(interface[0] == '\0'){
1780
struct dirent **direntries;
1781
/* First look for interfaces that are up */
1782
ret = scandir(sys_class_net, &direntries, up_interface,
1783
alphasort);
1784
if(ret == 0){
1785
/* No up interfaces, look for any good interfaces */
1786
free(direntries);
1787
ret = scandir(sys_class_net, &direntries, good_interface,
1788
alphasort);
1789
}
1790
if(ret >= 1){
1791
/* Pick the first interface returned */
1792
interface = strdup(direntries[0]->d_name);
1793
if(debug){
1794
fprintf_plus(stderr, "Using interface \"%s\"\n", interface);
1795
}
1796
if(interface == NULL){
1797
perror_plus("malloc");
1798
free(direntries);
1799
exitcode = EXIT_FAILURE;
1800
goto end;
1801
}
1802
free(direntries);
1803
} else {
1804
free(direntries);
1805
fprintf_plus(stderr, "Could not find a network interface\n");
1806
exitcode = EXIT_FAILURE;
1807
goto end;
1808
}
1809
}
1810
2161
1811
/* Initialize Avahi early so avahi_simple_poll_quit() can be called
2162
1812
from the signal handler */
2163
1813
/* Initialize the pseudo-RNG for Avahi */
2164
1814
srand((unsigned int) time(NULL));
2165
simple_poll = avahi_simple_poll_new();
2166
if(simple_poll == NULL){
1815
mc.simple_poll = avahi_simple_poll_new();
1816
if(mc.simple_poll == NULL){
2167
1817
fprintf_plus(stderr,
2168
1818
"Avahi: Failed to create simple poll object.\n");
2169
1819
exitcode = EX_UNAVAILABLE;
2233
1883
}
2234
1884
}
2235
1885
2236
/* If no interfaces were specified, make a list */
2237
if(mc.interfaces == NULL){
2238
struct dirent **direntries;
2239
/* Look for any good interfaces */
2240
ret = scandir(sys_class_net, &direntries, good_interface,
2241
alphasort);
2242
if(ret >= 1){
2243
/* Add all found interfaces to interfaces list */
2244
for(int i = 0; i < ret; ++i){
2245
ret_errno = argz_add(&mc.interfaces, &mc.interfaces_size,
2246
direntries[i]->d_name);
2247
if(ret_errno != 0){
2248
errno = ret_errno;
2249
perror_plus("argz_add");
2250
continue;
2251
}
2252
if(debug){
2253
fprintf_plus(stderr, "Will use interface \"%s\"\n",
2254
direntries[i]->d_name);
2255
}
2256
}
2257
free(direntries);
2258
} else {
2259
free(direntries);
2260
fprintf_plus(stderr, "Could not find a network interface\n");
2261
exitcode = EXIT_FAILURE;
2262
goto end;
2263
}
2264
}
2265
2266
/* Bring up interfaces which are down, and remove any "none"s */
2267
{
2268
char *interface = NULL;
2269
while((interface = argz_next(mc.interfaces, mc.interfaces_size,
2270
interface))){
2271
/* If interface name is "none", stop bringing up interfaces.
2272
Also remove all instances of "none" from the list */
2273
if(strcmp(interface, "none") == 0){
2274
argz_delete(&mc.interfaces, &mc.interfaces_size,
2275
interface);
2276
interface = NULL;
2277
while((interface = argz_next(mc.interfaces,
2278
mc.interfaces_size, interface))){
2279
if(strcmp(interface, "none") == 0){
2280
argz_delete(&mc.interfaces, &mc.interfaces_size,
2281
interface);
2282
interface = NULL;
1886
/* If the interface is down, bring it up */
1887
if(strcmp(interface, "none") != 0){
1888
if_index = (AvahiIfIndex) if_nametoindex(interface);
1889
if(if_index == 0){
1890
fprintf_plus(stderr, "No such interface: \"%s\"\n", interface);
1891
exitcode = EX_UNAVAILABLE;
1892
goto end;
1893
}
1894
1895
if(quit_now){
1896
goto end;
1897
}
1898
1899
/* Re-raise priviliges */
1900
errno = 0;
1901
ret = seteuid(0);
1902
if(ret == -1){
1903
perror_plus("seteuid");
1904
}
1905
1906
#ifdef __linux__
1907
/* Lower kernel loglevel to KERN_NOTICE to avoid KERN_INFO
1908
messages about the network interface to mess up the prompt */
1909
ret = klogctl(8, NULL, 5);
1910
bool restore_loglevel = true;
1911
if(ret == -1){
1912
restore_loglevel = false;
1913
perror_plus("klogctl");
1914
}
1915
#endif /* __linux__ */
1916
1917
sd = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);
1918
if(sd < 0){
1919
perror_plus("socket");
1920
exitcode = EX_OSERR;
1921
#ifdef __linux__
1922
if(restore_loglevel){
1923
ret = klogctl(7, NULL, 0);
1924
if(ret == -1){
1925
perror_plus("klogctl");
1926
}
1927
}
1928
#endif /* __linux__ */
1929
/* Lower privileges */
1930
errno = 0;
1931
ret = seteuid(uid);
1932
if(ret == -1){
1933
perror_plus("seteuid");
1934
}
1935
goto end;
1936
}
1937
strcpy(network.ifr_name, interface);
1938
ret = ioctl(sd, SIOCGIFFLAGS, &network);
1939
if(ret == -1){
1940
perror_plus("ioctl SIOCGIFFLAGS");
1941
#ifdef __linux__
1942
if(restore_loglevel){
1943
ret = klogctl(7, NULL, 0);
1944
if(ret == -1){
1945
perror_plus("klogctl");
1946
}
1947
}
1948
#endif /* __linux__ */
1949
exitcode = EX_OSERR;
1950
/* Lower privileges */
1951
errno = 0;
1952
ret = seteuid(uid);
1953
if(ret == -1){
1954
perror_plus("seteuid");
1955
}
1956
goto end;
1957
}
1958
if((network.ifr_flags & IFF_UP) == 0){
1959
network.ifr_flags |= IFF_UP;
1960
take_down_interface = true;
1961
ret = ioctl(sd, SIOCSIFFLAGS, &network);
1962
if(ret == -1){
1963
take_down_interface = false;
1964
perror_plus("ioctl SIOCSIFFLAGS +IFF_UP");
1965
exitcode = EX_OSERR;
1966
#ifdef __linux__
1967
if(restore_loglevel){
1968
ret = klogctl(7, NULL, 0);
1969
if(ret == -1){
1970
perror_plus("klogctl");
2283
1971
}
2284
1972
}
1973
#endif /* __linux__ */
1974
/* Lower privileges */
1975
errno = 0;
1976
ret = seteuid(uid);
1977
if(ret == -1){
1978
perror_plus("seteuid");
1979
}
1980
goto end;
1981
}
1982
}
1983
/* Sleep checking until interface is running.
1984
Check every 0.25s, up to total time of delay */
1985
for(int i=0; i < delay * 4; i++){
1986
ret = ioctl(sd, SIOCGIFFLAGS, &network);
1987
if(ret == -1){
1988
perror_plus("ioctl SIOCGIFFLAGS");
1989
} else if(network.ifr_flags & IFF_RUNNING){
2285
1990
break;
2286
1991
}
2287
bool interface_was_up = interface_is_up(interface);
2288
errno = bring_up_interface(interface, delay);
2289
if(not interface_was_up){
2290
if(errno != 0){
2291
perror_plus("Failed to bring up interface");
2292
} else {
2293
errno = argz_add(&interfaces_to_take_down,
2294
&interfaces_to_take_down_size,
2295
interface);
2296
if(errno != 0){
2297
perror_plus("argz_add");
2298
}
2299
}
2300
}
2301
}
2302
if(debug and (interfaces_to_take_down == NULL)){
2303
fprintf_plus(stderr, "No interfaces were brought up\n");
2304
}
2305
}
2306
2307
/* If we only got one interface, explicitly use only that one */
2308
if(argz_count(mc.interfaces, mc.interfaces_size) == 1){
2309
if(debug){
2310
fprintf_plus(stderr, "Using only interface \"%s\"\n",
2311
mc.interfaces);
2312
}
2313
if_index = (AvahiIfIndex)if_nametoindex(mc.interfaces);
1992
struct timespec sleeptime = { .tv_nsec = 250000000 };
1993
ret = nanosleep(&sleeptime, NULL);
1994
if(ret == -1 and errno != EINTR){
1995
perror_plus("nanosleep");
1996
}
1997
}
1998
if(not take_down_interface){
1999
/* We won't need the socket anymore */
2000
ret = (int)TEMP_FAILURE_RETRY(close(sd));
2001
if(ret == -1){
2002
perror_plus("close");
2003
}
2004
}
2005
#ifdef __linux__
2006
if(restore_loglevel){
2007
/* Restores kernel loglevel to default */
2008
ret = klogctl(7, NULL, 0);
2009
if(ret == -1){
2010
perror_plus("klogctl");
2011
}
2012
}
2013
#endif /* __linux__ */
2014
/* Lower privileges */
2015
errno = 0;
2016
/* Lower privileges */
2017
ret = seteuid(uid);
2018
if(ret == -1){
2019
perror_plus("seteuid");
2020
}
2314
2021
}
2315
2022
2316
2023
if(quit_now){
2317
2024
goto end;
2318
2025
}
2319
2026
2320
ret = init_gnutls_global(pubkey, seckey, &mc);
2027
ret = init_gnutls_global(pubkey, seckey);
2321
2028
if(ret == -1){
2322
2029
fprintf_plus(stderr, "init_gnutls_global failed\n");
2323
2030
exitcode = EX_UNAVAILABLE;
2330
2037
goto end;
2331
2038
}
2332
2039
2333
/* Try /run/tmp before /tmp */
2334
tempdir = mkdtemp(run_tempdir);
2335
if(tempdir == NULL and errno == ENOENT){
2336
if(debug){
2337
fprintf_plus(stderr, "Tempdir %s did not work, trying %s\n",
2338
run_tempdir, old_tempdir);
2339
}
2340
tempdir = mkdtemp(old_tempdir);
2341
}
2342
if(tempdir == NULL){
2040
if(mkdtemp(tempdir) == NULL){
2343
2041
perror_plus("mkdtemp");
2344
2042
goto end;
2345
2043
}
2044
tempdir_created = true;
2346
2045
2347
2046
if(quit_now){
2348
2047
goto end;
2349
2048
}
2350
2049
2351
if(not init_gpgme(pubkey, seckey, tempdir, &mc)){
2050
if(not init_gpgme(pubkey, seckey, tempdir)){
2352
2051
fprintf_plus(stderr, "init_gpgme failed\n");
2353
2052
exitcode = EX_UNAVAILABLE;
2354
2053
goto end;
2364
2063
/* Connect directly, do not use Zeroconf */
2365
2064
/* (Mainly meant for debugging) */
2366
2065
char *address = strrchr(connect_to, ':');
2367
2368
2066
if(address == NULL){
2369
2067
fprintf_plus(stderr, "No colon in address\n");
2370
2068
exitcode = EX_USAGE;
2375
2073
goto end;
2376
2074
}
2377
2075
2378
in_port_t port;
2076
uint16_t port;
2379
2077
errno = 0;
2380
2078
tmpmax = strtoimax(address+1, &tmp, 10);
2381
2079
if(errno != 0 or tmp == address+1 or *tmp != '\0'
2382
or tmpmax != (in_port_t)tmpmax){
2080
or tmpmax != (uint16_t)tmpmax){
2383
2081
fprintf_plus(stderr, "Bad port number\n");
2384
2082
exitcode = EX_USAGE;
2385
2083
goto end;
2386
2084
}
2387
2085
2388
2086
if(quit_now){
2389
2087
goto end;
2390
2088
}
2391
2089
2392
port = (in_port_t)tmpmax;
2090
port = (uint16_t)tmpmax;
2393
2091
*address = '\0';
2394
2092
/* Colon in address indicates IPv6 */
2395
2093
int af;
2411
2109
}
2412
2110
2413
2111
while(not quit_now){
2414
ret = start_mandos_communication(address, port, if_index, af,
2415
&mc);
2112
ret = start_mandos_communication(address, port, if_index, af);
2416
2113
if(quit_now or ret == 0){
2417
2114
break;
2418
2115
}
2420
2117
fprintf_plus(stderr, "Retrying in %d seconds\n",
2421
2118
(int)retry_interval);
2422
2119
}
2423
sleep((unsigned int)retry_interval);
2120
sleep((int)retry_interval);
2424
2121
}
2425
2122
2426
if(not quit_now){
2123
if (not quit_now){
2427
2124
exitcode = EXIT_SUCCESS;
2428
2125
}
2429
2126
2444
2141
config.publish_domain = 0;
2445
2142
2446
2143
/* Allocate a new server */
2447
mc.server = avahi_server_new(avahi_simple_poll_get(simple_poll),
2448
&config, NULL, NULL, &ret_errno);
2144
mc.server = avahi_server_new(avahi_simple_poll_get
2145
(mc.simple_poll), &config, NULL,
2146
NULL, &error);
2449
2147
2450
2148
/* Free the Avahi configuration data */
2451
2149
avahi_server_config_free(&config);
2454
2152
/* Check if creating the Avahi server object succeeded */
2455
2153
if(mc.server == NULL){
2456
2154
fprintf_plus(stderr, "Failed to create Avahi server: %s\n",
2457
avahi_strerror(ret_errno));
2155
avahi_strerror(error));
2458
2156
exitcode = EX_UNAVAILABLE;
2459
2157
goto end;
2460
2158
}
2466
2164
/* Create the Avahi service browser */
2467
2165
sb = avahi_s_service_browser_new(mc.server, if_index,
2468
2166
AVAHI_PROTO_UNSPEC, "_mandos._tcp",
2469
NULL, 0, browse_callback,
2470
(void *)&mc);
2167
NULL, 0, browse_callback, NULL);
2471
2168
if(sb == NULL){
2472
2169
fprintf_plus(stderr, "Failed to create service browser: %s\n",
2473
2170
avahi_strerror(avahi_server_errno(mc.server)));
2485
2182
fprintf_plus(stderr, "Starting Avahi loop search\n");
2486
2183
}
2487
2184
2488
ret = avahi_loop_with_timeout(simple_poll,
2489
(int)(retry_interval * 1000), &mc);
2185
ret = avahi_loop_with_timeout(mc.simple_poll,
2186
(int)(retry_interval * 1000));
2490
2187
if(debug){
2491
2188
fprintf_plus(stderr, "avahi_loop_with_timeout exited %s\n",
2492
2189
(ret == 0) ? "successfully" : "with error");
2499
2196
}
2500
2197
2501
2198
/* Cleanup things */
2502
free(mc.interfaces);
2503
2504
2199
if(sb != NULL)
2505
2200
avahi_s_service_browser_free(sb);
2506
2201
2507
2202
if(mc.server != NULL)
2508
2203
avahi_server_free(mc.server);
2509
2204
2510
if(simple_poll != NULL)
2511
avahi_simple_poll_free(simple_poll);
2205
if(mc.simple_poll != NULL)
2206
avahi_simple_poll_free(mc.simple_poll);
2512
2207
2513
2208
if(gnutls_initialized){
2514
2209
gnutls_certificate_free_credentials(mc.cred);
2531
2226
}
2532
2227
}
2533
2228
2534
/* Re-raise privileges */
2229
/* Run network hooks */
2230
run_network_hooks("stop", interface, delay);
2231
2232
/* Re-raise priviliges */
2535
2233
{
2536
ret_errno = raise_privileges();
2537
if(ret_errno != 0){
2538
perror_plus("Failed to raise privileges");
2539
} else {
2540
2541
/* Run network hooks */
2542
run_network_hooks("stop", interfaces_hooks != NULL ?
2543
interfaces_hooks : "", delay);
2544
2545
/* Take down the network interfaces which were brought up */
2546
{
2547
char *interface = NULL;
2548
while((interface=argz_next(interfaces_to_take_down,
2549
interfaces_to_take_down_size,
2550
interface))){
2551
ret_errno = take_down_interface(interface);
2552
if(ret_errno != 0){
2553
errno = ret_errno;
2554
perror_plus("Failed to take down interface");
2555
}
2556
}
2557
if(debug and (interfaces_to_take_down == NULL)){
2558
fprintf_plus(stderr, "No interfaces needed to be taken"
2559
" down\n");
2560
}
2561
}
2562
}
2563
ret_errno = lower_privileges_permanently();
2564
if(ret_errno != 0){
2565
perror_plus("Failed to lower privileges permanently");
2566
}
2567
}
2568
2569
free(interfaces_to_take_down);
2570
free(interfaces_hooks);
2234
errno = 0;
2235
ret = seteuid(0);
2236
if(ret == -1){
2237
perror_plus("seteuid");
2238
}
2239
2240
/* Take down the network interface */
2241
if(take_down_interface and geteuid() == 0){
2242
ret = ioctl(sd, SIOCGIFFLAGS, &network);
2243
if(ret == -1){
2244
perror_plus("ioctl SIOCGIFFLAGS");
2245
} else if(network.ifr_flags & IFF_UP){
2246
network.ifr_flags &= ~(short)IFF_UP; /* clear flag */
2247
ret = ioctl(sd, SIOCSIFFLAGS, &network);
2248
if(ret == -1){
2249
perror_plus("ioctl SIOCSIFFLAGS -IFF_UP");
2250
}
2251
}
2252
ret = (int)TEMP_FAILURE_RETRY(close(sd));
2253
if(ret == -1){
2254
perror_plus("close");
2255
}
2256
}
2257
}
2258
/* Lower privileges permanently */
2259
errno = 0;
2260
ret = setuid(uid);
2261
if(ret == -1){
2262
perror_plus("setuid");
2263
}
2571
2264
2572
2265
/* Removes the GPGME temp directory and all files inside */
2573
if(tempdir != NULL){
2266
if(tempdir_created){
2574
2267
struct dirent **direntries = NULL;
2575
2268
struct dirent *direntry = NULL;
2576
2269
int numentries = scandir(tempdir, &direntries, notdotentries,
2577
2270
alphasort);
2578
if(numentries > 0){
2271
if (numentries > 0){
2579
2272
for(int i = 0; i < numentries; i++){
2580
2273
direntry = direntries[i];
2581
2274
char *fullname = NULL;
2596
2289
2597
2290
/* need to clean even if 0 because man page doesn't specify */
2598
2291
free(direntries);
2599
if(numentries == -1){
2292
if (numentries == -1){
2600
2293
perror_plus("scandir");
2601
2294
}
2602
2295
ret = rmdir(tempdir);
Loggerhead is a web-based interface for Breezy
Version: 2.0.2.dev0