9
9
* "browse_callback", and parts of "main".
11
11
* Everything else is
12
* Copyright © 2008-2013 Teddy Hogeborn
13
* Copyright © 2008-2013 Björn Påhlsson
12
* Copyright © 2008-2012 Teddy Hogeborn
13
* Copyright © 2008-2012 Björn Påhlsson
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
161
162
const char *priority;
163
164
server *current_server;
165
size_t interfaces_size;
166
165
} mandos_context;
168
/* global so signal handler can reach it*/
169
AvahiSimplePoll *simple_poll;
167
/* global context so signal handler can reach it*/
168
mandos_context mc = { .simple_poll = NULL, .server = NULL,
169
.dh_bits = 1024, .priority = "SECURE256"
170
":!CTYPE-X.509:+CTYPE-OPENPGP",
171
.current_server = NULL };
171
173
sig_atomic_t quit_now = 0;
172
174
int signal_received = 0;
188
190
TEMP_FAILURE_RETRY(fprintf(stream, "Mandos plugin %s: ",
189
191
program_invocation_short_name));
190
return (int)TEMP_FAILURE_RETRY(vfprintf(stream, format, ap));
192
return TEMP_FAILURE_RETRY(vfprintf(stream, format, ap));
198
200
size_t incbuffer(char **buffer, size_t buffer_length,
199
201
size_t buffer_capacity){
200
202
if(buffer_length + BUFFER_SIZE > buffer_capacity){
201
char *new_buf = realloc(*buffer, buffer_capacity + BUFFER_SIZE);
203
int old_errno = errno;
203
*buffer = realloc(*buffer, buffer_capacity + BUFFER_SIZE);
210
207
buffer_capacity += BUFFER_SIZE;
212
209
return buffer_capacity;
215
212
/* Add server to set of servers to retry periodically */
216
213
bool add_server(const char *ip, in_port_t port, AvahiIfIndex if_index,
217
int af, server **current_server){
219
216
server *new_server = malloc(sizeof(server));
220
217
if(new_server == NULL){
232
229
/* Special case of first server */
233
if(*current_server == NULL){
230
if (mc.current_server == NULL){
234
231
new_server->next = new_server;
235
232
new_server->prev = new_server;
236
*current_server = new_server;
233
mc.current_server = new_server;
237
234
/* Place the new server last in the list */
239
new_server->next = *current_server;
240
new_server->prev = (*current_server)->prev;
236
new_server->next = mc.current_server;
237
new_server->prev = mc.current_server->prev;
241
238
new_server->prev->next = new_server;
242
(*current_server)->prev = new_server;
239
mc.current_server->prev = new_server;
244
ret = clock_gettime(CLOCK_MONOTONIC, &(*current_server)->last_seen);
241
ret = clock_gettime(CLOCK_MONOTONIC, &mc.current_server->last_seen);
246
243
perror_plus("clock_gettime");
253
250
* Initialize GPGME.
255
252
static bool init_gpgme(const char *seckey, const char *pubkey,
256
const char *tempdir, mandos_context *mc){
253
const char *tempdir){
257
254
gpgme_error_t rc;
258
255
gpgme_engine_info_t engine_info;
261
259
* Helper function to insert pub and seckey to the engine keyring.
281
rc = gpgme_op_import(mc->ctx, pgp_data);
279
rc = gpgme_op_import(mc.ctx, pgp_data);
282
280
if(rc != GPG_ERR_NO_ERROR){
283
281
fprintf_plus(stderr, "bad gpgme_op_import: %s: %s\n",
284
282
gpgme_strsource(rc), gpgme_strerror(rc));
330
328
/* Create new GPGME "context" */
331
rc = gpgme_new(&(mc->ctx));
329
rc = gpgme_new(&(mc.ctx));
332
330
if(rc != GPG_ERR_NO_ERROR){
333
331
fprintf_plus(stderr, "Mandos plugin mandos-client: "
334
332
"bad gpgme_new: %s: %s\n", gpgme_strsource(rc),
383
380
/* Decrypt data from the cryptotext data buffer to the plaintext
385
rc = gpgme_op_decrypt(mc->ctx, dh_crypto, dh_plain);
382
rc = gpgme_op_decrypt(mc.ctx, dh_crypto, dh_plain);
386
383
if(rc != GPG_ERR_NO_ERROR){
387
384
fprintf_plus(stderr, "bad gpgme_op_decrypt: %s: %s\n",
388
385
gpgme_strsource(rc), gpgme_strerror(rc));
389
386
plaintext_length = -1;
391
388
gpgme_decrypt_result_t result;
392
result = gpgme_op_decrypt_result(mc->ctx);
389
result = gpgme_op_decrypt_result(mc.ctx);
393
390
if(result == NULL){
394
391
fprintf_plus(stderr, "gpgme_op_decrypt_result failed\n");
512
508
/* OpenPGP credentials */
513
ret = gnutls_certificate_allocate_credentials(&mc->cred);
509
ret = gnutls_certificate_allocate_credentials(&mc.cred);
514
510
if(ret != GNUTLS_E_SUCCESS){
515
511
fprintf_plus(stderr, "GnuTLS memory error: %s\n",
516
512
safer_gnutls_strerror(ret));
528
524
ret = gnutls_certificate_set_openpgp_key_file
529
(mc->cred, pubkeyfilename, seckeyfilename,
525
(mc.cred, pubkeyfilename, seckeyfilename,
530
526
GNUTLS_OPENPGP_FMT_BASE64);
531
527
if(ret != GNUTLS_E_SUCCESS){
532
528
fprintf_plus(stderr,
540
536
/* GnuTLS server initialization */
541
ret = gnutls_dh_params_init(&mc->dh_params);
537
ret = gnutls_dh_params_init(&mc.dh_params);
542
538
if(ret != GNUTLS_E_SUCCESS){
543
539
fprintf_plus(stderr, "Error in GnuTLS DH parameter"
544
540
" initialization: %s\n",
545
541
safer_gnutls_strerror(ret));
548
ret = gnutls_dh_params_generate2(mc->dh_params, mc->dh_bits);
544
ret = gnutls_dh_params_generate2(mc.dh_params, mc.dh_bits);
549
545
if(ret != GNUTLS_E_SUCCESS){
550
546
fprintf_plus(stderr, "Error in GnuTLS prime generation: %s\n",
551
547
safer_gnutls_strerror(ret));
555
gnutls_certificate_set_dh_params(mc->cred, mc->dh_params);
551
gnutls_certificate_set_dh_params(mc.cred, mc.dh_params);
561
gnutls_certificate_free_credentials(mc->cred);
557
gnutls_certificate_free_credentials(mc.cred);
562
558
gnutls_global_deinit();
563
gnutls_dh_params_deinit(mc->dh_params);
559
gnutls_dh_params_deinit(mc.dh_params);
567
static int init_gnutls_session(gnutls_session_t *session,
563
static int init_gnutls_session(gnutls_session_t *session){
570
565
/* GnuTLS session creation */
616
611
/* ignore client certificate if any. */
617
612
gnutls_certificate_server_set_request(*session, GNUTLS_CERT_IGNORE);
619
gnutls_dh_set_prime_bits(*session, mc->dh_bits);
614
gnutls_dh_set_prime_bits(*session, mc.dh_bits);
628
623
/* Called when a Mandos server is found */
629
624
static int start_mandos_communication(const char *ip, in_port_t port,
630
625
AvahiIfIndex if_index,
631
int af, mandos_context *mc){
632
627
int ret, tcp_sd = -1;
667
/* If the interface is specified and we have a list of interfaces */
668
if(if_index != AVAHI_IF_UNSPEC and mc->interfaces != NULL){
669
/* Check if the interface is one of the interfaces we are using */
672
char *interface = NULL;
673
while((interface=argz_next(mc->interfaces, mc->interfaces_size,
675
if(if_nametoindex(interface) == (unsigned int)if_index){
682
/* This interface does not match any in the list, so we don't
683
connect to the server */
685
char interface[IF_NAMESIZE];
686
if(if_indextoname((unsigned int)if_index, interface) == NULL){
687
perror_plus("if_indextoname");
689
fprintf_plus(stderr, "Skipping server on non-used interface"
691
if_indextoname((unsigned int)if_index,
699
ret = init_gnutls_session(&session, mc);
662
ret = init_gnutls_session(&session);
742
705
if(af == AF_INET6){
743
706
to.in6.sin6_port = htons(port);
745
#pragma GCC diagnostic push
746
#pragma GCC diagnostic ignored "-Wstrict-aliasing"
748
707
if(IN6_IS_ADDR_LINKLOCAL /* Spurious warnings from */
749
(&to.in6.sin6_addr)){ /* -Wstrict-aliasing=2 or lower */
751
#pragma GCC diagnostic pop
708
(&to.in6.sin6_addr)){ /* -Wstrict-aliasing=2 or lower and
753
710
if(if_index == AVAHI_IF_UNSPEC){
754
711
fprintf_plus(stderr, "An IPv6 link-local address is"
755
712
" incomplete without a network interface\n");
1063
1022
fprintf_plus(stderr, "(Avahi Resolver) Failed to resolve service "
1064
1023
"'%s' of type '%s' in domain '%s': %s\n", name, type,
1066
avahi_strerror(avahi_server_errno
1067
(((mandos_context*)mc)->server)));
1025
avahi_strerror(avahi_server_errno(mc.server)));
1070
1028
case AVAHI_RESOLVER_FOUND:
1079
1037
int ret = start_mandos_communication(ip, (in_port_t)port,
1081
avahi_proto_to_af(proto),
1039
avahi_proto_to_af(proto));
1084
avahi_simple_poll_quit(simple_poll);
1041
avahi_simple_poll_quit(mc.simple_poll);
1086
1043
if(not add_server(ip, (in_port_t)port, interface,
1087
avahi_proto_to_af(proto),
1088
&((mandos_context*)mc)->current_server)){
1044
avahi_proto_to_af(proto))){
1089
1045
fprintf_plus(stderr, "Failed to add server \"%s\" to server"
1090
1046
" list\n", name);
1121
1077
case AVAHI_BROWSER_FAILURE:
1123
1079
fprintf_plus(stderr, "(Avahi browser) %s\n",
1124
avahi_strerror(avahi_server_errno
1125
(((mandos_context*)mc)->server)));
1126
avahi_simple_poll_quit(simple_poll);
1080
avahi_strerror(avahi_server_errno(mc.server)));
1081
avahi_simple_poll_quit(mc.simple_poll);
1129
1084
case AVAHI_BROWSER_NEW:
1132
1087
the callback function is called the Avahi server will free the
1133
1088
resolver for us. */
1135
if(avahi_s_service_resolver_new(((mandos_context*)mc)->server,
1136
interface, protocol, name, type,
1137
domain, protocol, 0,
1138
resolve_callback, mc) == NULL)
1090
if(avahi_s_service_resolver_new(mc.server, interface, protocol,
1091
name, type, domain, protocol, 0,
1092
resolve_callback, NULL) == NULL)
1139
1093
fprintf_plus(stderr, "Avahi: Failed to resolve service '%s':"
1141
avahi_strerror(avahi_server_errno
1142
(((mandos_context*)mc)->server)));
1095
avahi_strerror(avahi_server_errno(mc.server)));
1145
1098
case AVAHI_BROWSER_REMOVE:
1368
int avahi_loop_with_timeout(AvahiSimplePoll *s, int retry_interval,
1369
mandos_context *mc){
1321
int avahi_loop_with_timeout(AvahiSimplePoll *s, int retry_interval){
1371
1323
struct timespec now;
1372
1324
struct timespec waited_time;
1373
1325
intmax_t block_time;
1376
if(mc->current_server == NULL){
1328
if(mc.current_server == NULL){
1378
1330
fprintf_plus(stderr, "Wait until first server is found."
1379
1331
" No timeout!\n");
1393
1345
/* Calculating in ms how long time between now and server
1394
1346
who we visted longest time ago. Now - last seen. */
1395
1347
waited_time.tv_sec = (now.tv_sec
1396
- mc->current_server->last_seen.tv_sec);
1348
- mc.current_server->last_seen.tv_sec);
1397
1349
waited_time.tv_nsec = (now.tv_nsec
1398
- mc->current_server->last_seen.tv_nsec);
1350
- mc.current_server->last_seen.tv_nsec);
1399
1351
/* total time is 10s/10,000ms.
1400
1352
Converting to s from ms by dividing by 1,000,
1401
1353
and ns to ms by dividing by 1,000,000. */
1411
1363
if(block_time <= 0){
1412
ret = start_mandos_communication(mc->current_server->ip,
1413
mc->current_server->port,
1414
mc->current_server->if_index,
1415
mc->current_server->af, mc);
1364
ret = start_mandos_communication(mc.current_server->ip,
1365
mc.current_server->port,
1366
mc.current_server->if_index,
1367
mc.current_server->af);
1417
avahi_simple_poll_quit(s);
1369
avahi_simple_poll_quit(mc.simple_poll);
1420
1372
ret = clock_gettime(CLOCK_MONOTONIC,
1421
&mc->current_server->last_seen);
1373
&mc.current_server->last_seen);
1423
1375
perror_plus("clock_gettime");
1426
mc->current_server = mc->current_server->next;
1378
mc.current_server = mc.current_server->next;
1427
1379
block_time = 0; /* Call avahi to find new Mandos
1428
1380
servers, but don't block */
1493
1445
bool run_network_hooks(const char *mode, const char *interface,
1494
1446
const float delay){
1495
1447
struct dirent **direntries;
1448
struct dirent *direntry;
1496
1450
int numhooks = scandir(hookdir, &direntries, runnable_hook,
1498
1452
if(numhooks == -1){
1751
1705
network.ifr_flags &= ~(short)IFF_UP; /* clear flag */
1753
int sd = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);
1707
sd = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);
1755
1709
ret_errno = errno;
1756
1710
perror_plus("socket");
1766
1720
/* Raise priviliges */
1767
1721
raise_privileges();
1769
int ret_setflags = ioctl(sd, SIOCSIFFLAGS, &network);
1723
ret_setflags = ioctl(sd, SIOCSIFFLAGS, &network);
1770
1724
ret_errno = errno;
1772
1726
/* Lower privileges */
1773
1727
lower_privileges();
1775
1729
/* Close the socket */
1776
int ret = (int)TEMP_FAILURE_RETRY(close(sd));
1730
ret = (int)TEMP_FAILURE_RETRY(close(sd));
1778
1732
perror_plus("close");
1796
1750
int main(int argc, char *argv[]){
1797
mandos_context mc = { .server = NULL, .dh_bits = 1024,
1798
.priority = "SECURE256:!CTYPE-X.509:"
1799
"+CTYPE-OPENPGP", .current_server = NULL,
1800
.interfaces = NULL, .interfaces_size = 0 };
1801
1751
AvahiSServiceBrowser *sb = NULL;
1802
1752
error_t ret_errno;
1804
1754
intmax_t tmpmax;
1806
1756
int exitcode = EXIT_SUCCESS;
1757
char *interfaces = NULL;
1758
size_t interfaces_size = 0;
1807
1759
char *interfaces_to_take_down = NULL;
1808
1760
size_t interfaces_to_take_down_size = 0;
1809
1761
char tempdir[] = "/tmp/mandosXXXXXX";
1812
1764
const char *seckey = PATHDIR "/" SECKEY;
1813
1765
const char *pubkey = PATHDIR "/" PUBKEY;
1814
1766
char *interfaces_hooks = NULL;
1767
size_t interfaces_hooks_size = 0;
1816
1769
bool gnutls_initialized = false;
1817
1770
bool gpgme_initialized = false;
1908
1861
connect_to = arg;
1910
1863
case 'i': /* --interface */
1911
ret_errno = argz_add_sep(&mc.interfaces, &mc.interfaces_size,
1864
ret_errno = argz_add_sep(&interfaces, &interfaces_size, arg,
1913
1866
if(ret_errno != 0){
1914
1867
argp_error(state, "%s", strerror(ret_errno));
2044
1997
/* Lower privileges */
2001
perror_plus("seteuid");
2049
/* Remove invalid interface names (except "none") */
2006
/* Remove empty interface names */
2051
2008
char *interface = NULL;
2052
while((interface = argz_next(mc.interfaces, mc.interfaces_size,
2009
while((interface = argz_next(interfaces, interfaces_size,
2054
if(strcmp(interface, "none") != 0
2055
and if_nametoindex(interface) == 0){
2056
if(interface[0] != '\0'){
2011
if(if_nametoindex(interface) == 0){
2012
if(interface[0] != '\0' and strcmp(interface, "none") != 0){
2057
2013
fprintf_plus(stderr, "Not using nonexisting interface"
2058
2014
" \"%s\"\n", interface);
2060
argz_delete(&mc.interfaces, &mc.interfaces_size, interface);
2016
argz_delete(&interfaces, &interfaces_size, interface);
2061
2017
interface = NULL;
2066
2022
/* Run network hooks */
2068
if(mc.interfaces != NULL){
2069
interfaces_hooks = malloc(mc.interfaces_size);
2025
if(interfaces != NULL){
2026
interfaces_hooks = malloc(interfaces_size);
2070
2027
if(interfaces_hooks == NULL){
2071
2028
perror_plus("malloc");
2074
memcpy(interfaces_hooks, mc.interfaces, mc.interfaces_size);
2075
argz_stringify(interfaces_hooks, mc.interfaces_size, (int)',');
2031
memcpy(interfaces_hooks, interfaces, interfaces_size);
2032
interfaces_hooks_size = interfaces_size;
2033
argz_stringify(interfaces_hooks, interfaces_hooks_size,
2077
2036
if(not run_network_hooks("start", interfaces_hooks != NULL ?
2078
2037
interfaces_hooks : "", delay)){
2088
2047
from the signal handler */
2089
2048
/* Initialize the pseudo-RNG for Avahi */
2090
2049
srand((unsigned int) time(NULL));
2091
simple_poll = avahi_simple_poll_new();
2092
if(simple_poll == NULL){
2050
mc.simple_poll = avahi_simple_poll_new();
2051
if(mc.simple_poll == NULL){
2093
2052
fprintf_plus(stderr,
2094
2053
"Avahi: Failed to create simple poll object.\n");
2095
2054
exitcode = EX_UNAVAILABLE;
2162
2121
/* If no interfaces were specified, make a list */
2163
if(mc.interfaces == NULL){
2122
if(interfaces == NULL){
2164
2123
struct dirent **direntries;
2165
2124
/* Look for any good interfaces */
2166
2125
ret = scandir(sys_class_net, &direntries, good_interface,
2169
2128
/* Add all found interfaces to interfaces list */
2170
2129
for(int i = 0; i < ret; ++i){
2171
ret_errno = argz_add(&mc.interfaces, &mc.interfaces_size,
2130
ret_errno = argz_add(&interfaces, &interfaces_size,
2172
2131
direntries[i]->d_name);
2173
2132
if(ret_errno != 0){
2175
2133
perror_plus("argz_add");
2192
/* Bring up interfaces which are down, and remove any "none"s */
2150
/* If we only got one interface, explicitly use only that one */
2151
if(argz_count(interfaces, interfaces_size) == 1){
2153
fprintf_plus(stderr, "Using only interface \"%s\"\n",
2156
if_index = (AvahiIfIndex)if_nametoindex(interfaces);
2159
/* Bring up interfaces which are down */
2160
if(not (argz_count(interfaces, interfaces_size) == 1
2161
and strcmp(interfaces, "none") == 0)){
2194
2162
char *interface = NULL;
2195
while((interface = argz_next(mc.interfaces, mc.interfaces_size,
2163
while((interface = argz_next(interfaces, interfaces_size,
2197
/* If interface name is "none", stop bringing up interfaces.
2198
Also remove all instances of "none" from the list */
2199
if(strcmp(interface, "none") == 0){
2200
argz_delete(&mc.interfaces, &mc.interfaces_size,
2203
while((interface = argz_next(mc.interfaces,
2204
mc.interfaces_size, interface))){
2205
if(strcmp(interface, "none") == 0){
2206
argz_delete(&mc.interfaces, &mc.interfaces_size,
2213
2165
bool interface_was_up = interface_is_up(interface);
2214
2166
ret = bring_up_interface(interface, delay);
2215
2167
if(not interface_was_up){
2220
2172
ret_errno = argz_add(&interfaces_to_take_down,
2221
2173
&interfaces_to_take_down_size,
2225
perror_plus("argz_add");
2180
interfaces_size = 0;
2230
2181
if(debug and (interfaces_to_take_down == NULL)){
2231
2182
fprintf_plus(stderr, "No interfaces were brought up\n");
2235
/* If we only got one interface, explicitly use only that one */
2236
if(argz_count(mc.interfaces, mc.interfaces_size) == 1){
2238
fprintf_plus(stderr, "Using only interface \"%s\"\n",
2241
if_index = (AvahiIfIndex)if_nametoindex(mc.interfaces);
2248
ret = init_gnutls_global(pubkey, seckey, &mc);
2190
ret = init_gnutls_global(pubkey, seckey);
2250
2192
fprintf_plus(stderr, "init_gnutls_global failed\n");
2251
2193
exitcode = EX_UNAVAILABLE;
2271
if(not init_gpgme(pubkey, seckey, tempdir, &mc)){
2213
if(not init_gpgme(pubkey, seckey, tempdir)){
2272
2214
fprintf_plus(stderr, "init_gpgme failed\n");
2273
2215
exitcode = EX_UNAVAILABLE;
2333
2275
while(not quit_now){
2334
ret = start_mandos_communication(address, port, if_index, af,
2276
ret = start_mandos_communication(address, port, if_index, af);
2336
2277
if(quit_now or ret == 0){
2364
2305
config.publish_domain = 0;
2366
2307
/* Allocate a new server */
2367
mc.server = avahi_server_new(avahi_simple_poll_get(simple_poll),
2368
&config, NULL, NULL, &ret_errno);
2308
mc.server = avahi_server_new(avahi_simple_poll_get
2309
(mc.simple_poll), &config, NULL,
2370
2312
/* Free the Avahi configuration data */
2371
2313
avahi_server_config_free(&config);
2386
2328
/* Create the Avahi service browser */
2387
2329
sb = avahi_s_service_browser_new(mc.server, if_index,
2388
2330
AVAHI_PROTO_UNSPEC, "_mandos._tcp",
2389
NULL, 0, browse_callback,
2331
NULL, 0, browse_callback, NULL);
2391
2332
if(sb == NULL){
2392
2333
fprintf_plus(stderr, "Failed to create service browser: %s\n",
2393
2334
avahi_strerror(avahi_server_errno(mc.server)));
2405
2346
fprintf_plus(stderr, "Starting Avahi loop search\n");
2408
ret = avahi_loop_with_timeout(simple_poll,
2409
(int)(retry_interval * 1000), &mc);
2349
ret = avahi_loop_with_timeout(mc.simple_poll,
2350
(int)(retry_interval * 1000));
2411
2352
fprintf_plus(stderr, "avahi_loop_with_timeout exited %s\n",
2412
2353
(ret == 0) ? "successfully" : "with error");
2421
2362
/* Cleanup things */
2422
free(mc.interfaces);
2425
2364
avahi_s_service_browser_free(sb);
2427
2366
if(mc.server != NULL)
2428
2367
avahi_server_free(mc.server);
2430
if(simple_poll != NULL)
2431
avahi_simple_poll_free(simple_poll);
2369
if(mc.simple_poll != NULL)
2370
avahi_simple_poll_free(mc.simple_poll);
2433
2372
if(gnutls_initialized){
2434
2373
gnutls_certificate_free_credentials(mc.cred);