9
9
* "browse_callback", and parts of "main".
11
11
* Everything else is
12
* Copyright © 2008-2012 Teddy Hogeborn
13
* Copyright © 2008-2012 Björn Påhlsson
12
* Copyright © 2008-2013 Teddy Hogeborn
13
* Copyright © 2008-2013 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
162
161
const char *priority;
164
163
server *current_server;
165
size_t interfaces_size;
165
166
} mandos_context;
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 };
168
/* global so signal handler can reach it*/
169
AvahiSimplePoll *simple_poll;
173
171
sig_atomic_t quit_now = 0;
174
172
int signal_received = 0;
190
188
TEMP_FAILURE_RETRY(fprintf(stream, "Mandos plugin %s: ",
191
189
program_invocation_short_name));
192
return TEMP_FAILURE_RETRY(vfprintf(stream, format, ap));
190
return (int)TEMP_FAILURE_RETRY(vfprintf(stream, format, ap));
212
210
/* Add server to set of servers to retry periodically */
213
211
bool add_server(const char *ip, in_port_t port, AvahiIfIndex if_index,
212
int af, server **current_server){
216
214
server *new_server = malloc(sizeof(server));
217
215
if(new_server == NULL){
229
227
/* Special case of first server */
230
if (mc.current_server == NULL){
228
if(*current_server == NULL){
231
229
new_server->next = new_server;
232
230
new_server->prev = new_server;
233
mc.current_server = new_server;
231
*current_server = new_server;
234
232
/* Place the new server last in the list */
236
new_server->next = mc.current_server;
237
new_server->prev = mc.current_server->prev;
234
new_server->next = *current_server;
235
new_server->prev = (*current_server)->prev;
238
236
new_server->prev->next = new_server;
239
mc.current_server->prev = new_server;
237
(*current_server)->prev = new_server;
241
ret = clock_gettime(CLOCK_MONOTONIC, &mc.current_server->last_seen);
239
ret = clock_gettime(CLOCK_MONOTONIC, &(*current_server)->last_seen);
243
241
perror_plus("clock_gettime");
250
248
* Initialize GPGME.
252
250
static bool init_gpgme(const char *seckey, const char *pubkey,
253
const char *tempdir){
251
const char *tempdir, mandos_context *mc){
254
252
gpgme_error_t rc;
255
253
gpgme_engine_info_t engine_info;
259
256
* Helper function to insert pub and seckey to the engine keyring.
279
rc = gpgme_op_import(mc.ctx, pgp_data);
276
rc = gpgme_op_import(mc->ctx, pgp_data);
280
277
if(rc != GPG_ERR_NO_ERROR){
281
278
fprintf_plus(stderr, "bad gpgme_op_import: %s: %s\n",
282
279
gpgme_strsource(rc), gpgme_strerror(rc));
328
325
/* Create new GPGME "context" */
329
rc = gpgme_new(&(mc.ctx));
326
rc = gpgme_new(&(mc->ctx));
330
327
if(rc != GPG_ERR_NO_ERROR){
331
328
fprintf_plus(stderr, "Mandos plugin mandos-client: "
332
329
"bad gpgme_new: %s: %s\n", gpgme_strsource(rc),
380
378
/* Decrypt data from the cryptotext data buffer to the plaintext
382
rc = gpgme_op_decrypt(mc.ctx, dh_crypto, dh_plain);
380
rc = gpgme_op_decrypt(mc->ctx, dh_crypto, dh_plain);
383
381
if(rc != GPG_ERR_NO_ERROR){
384
382
fprintf_plus(stderr, "bad gpgme_op_decrypt: %s: %s\n",
385
383
gpgme_strsource(rc), gpgme_strerror(rc));
386
384
plaintext_length = -1;
388
386
gpgme_decrypt_result_t result;
389
result = gpgme_op_decrypt_result(mc.ctx);
387
result = gpgme_op_decrypt_result(mc->ctx);
390
388
if(result == NULL){
391
389
fprintf_plus(stderr, "gpgme_op_decrypt_result failed\n");
508
507
/* OpenPGP credentials */
509
ret = gnutls_certificate_allocate_credentials(&mc.cred);
508
ret = gnutls_certificate_allocate_credentials(&mc->cred);
510
509
if(ret != GNUTLS_E_SUCCESS){
511
510
fprintf_plus(stderr, "GnuTLS memory error: %s\n",
512
511
safer_gnutls_strerror(ret));
524
523
ret = gnutls_certificate_set_openpgp_key_file
525
(mc.cred, pubkeyfilename, seckeyfilename,
524
(mc->cred, pubkeyfilename, seckeyfilename,
526
525
GNUTLS_OPENPGP_FMT_BASE64);
527
526
if(ret != GNUTLS_E_SUCCESS){
528
527
fprintf_plus(stderr,
536
535
/* GnuTLS server initialization */
537
ret = gnutls_dh_params_init(&mc.dh_params);
536
ret = gnutls_dh_params_init(&mc->dh_params);
538
537
if(ret != GNUTLS_E_SUCCESS){
539
538
fprintf_plus(stderr, "Error in GnuTLS DH parameter"
540
539
" initialization: %s\n",
541
540
safer_gnutls_strerror(ret));
544
ret = gnutls_dh_params_generate2(mc.dh_params, mc.dh_bits);
543
ret = gnutls_dh_params_generate2(mc->dh_params, mc->dh_bits);
545
544
if(ret != GNUTLS_E_SUCCESS){
546
545
fprintf_plus(stderr, "Error in GnuTLS prime generation: %s\n",
547
546
safer_gnutls_strerror(ret));
551
gnutls_certificate_set_dh_params(mc.cred, mc.dh_params);
550
gnutls_certificate_set_dh_params(mc->cred, mc->dh_params);
557
gnutls_certificate_free_credentials(mc.cred);
556
gnutls_certificate_free_credentials(mc->cred);
558
557
gnutls_global_deinit();
559
gnutls_dh_params_deinit(mc.dh_params);
558
gnutls_dh_params_deinit(mc->dh_params);
563
static int init_gnutls_session(gnutls_session_t *session){
562
static int init_gnutls_session(gnutls_session_t *session,
565
565
/* GnuTLS session creation */
611
611
/* ignore client certificate if any. */
612
612
gnutls_certificate_server_set_request(*session, GNUTLS_CERT_IGNORE);
614
gnutls_dh_set_prime_bits(*session, mc.dh_bits);
614
gnutls_dh_set_prime_bits(*session, mc->dh_bits);
623
623
/* Called when a Mandos server is found */
624
624
static int start_mandos_communication(const char *ip, in_port_t port,
625
625
AvahiIfIndex if_index,
626
int af, mandos_context *mc){
627
627
int ret, tcp_sd = -1;
662
ret = init_gnutls_session(&session);
662
/* If the interface is specified and we have a list of interfaces */
663
if(if_index != AVAHI_IF_UNSPEC and mc->interfaces != NULL){
664
/* Check if the interface is one of the interfaces we are using */
667
char *interface = NULL;
668
while((interface=argz_next(mc->interfaces, mc->interfaces_size,
670
if(if_nametoindex(interface) == (unsigned int)if_index){
677
/* This interface does not match any in the list, so we don't
678
connect to the server */
680
char interface[IF_NAMESIZE];
681
if(if_indextoname((unsigned int)if_index, interface) == NULL){
682
perror_plus("if_indextoname");
684
fprintf_plus(stderr, "Skipping server on non-used interface"
686
if_indextoname((unsigned int)if_index,
694
ret = init_gnutls_session(&session, mc);
1022
1054
fprintf_plus(stderr, "(Avahi Resolver) Failed to resolve service "
1023
1055
"'%s' of type '%s' in domain '%s': %s\n", name, type,
1025
avahi_strerror(avahi_server_errno(mc.server)));
1057
avahi_strerror(avahi_server_errno
1058
(((mandos_context*)mc)->server)));
1028
1061
case AVAHI_RESOLVER_FOUND:
1037
1070
int ret = start_mandos_communication(ip, (in_port_t)port,
1039
avahi_proto_to_af(proto));
1072
avahi_proto_to_af(proto),
1041
avahi_simple_poll_quit(mc.simple_poll);
1075
avahi_simple_poll_quit(simple_poll);
1043
1077
if(not add_server(ip, (in_port_t)port, interface,
1044
avahi_proto_to_af(proto))){
1078
avahi_proto_to_af(proto),
1079
&((mandos_context*)mc)->current_server)){
1045
1080
fprintf_plus(stderr, "Failed to add server \"%s\" to server"
1046
1081
" list\n", name);
1077
1112
case AVAHI_BROWSER_FAILURE:
1079
1114
fprintf_plus(stderr, "(Avahi browser) %s\n",
1080
avahi_strerror(avahi_server_errno(mc.server)));
1081
avahi_simple_poll_quit(mc.simple_poll);
1115
avahi_strerror(avahi_server_errno
1116
(((mandos_context*)mc)->server)));
1117
avahi_simple_poll_quit(simple_poll);
1084
1120
case AVAHI_BROWSER_NEW:
1087
1123
the callback function is called the Avahi server will free the
1088
1124
resolver for us. */
1090
if(avahi_s_service_resolver_new(mc.server, interface, protocol,
1091
name, type, domain, protocol, 0,
1092
resolve_callback, NULL) == NULL)
1126
if(avahi_s_service_resolver_new(((mandos_context*)mc)->server,
1127
interface, protocol, name, type,
1128
domain, protocol, 0,
1129
resolve_callback, mc) == NULL)
1093
1130
fprintf_plus(stderr, "Avahi: Failed to resolve service '%s':"
1095
avahi_strerror(avahi_server_errno(mc.server)));
1132
avahi_strerror(avahi_server_errno
1133
(((mandos_context*)mc)->server)));
1098
1136
case AVAHI_BROWSER_REMOVE:
1321
int avahi_loop_with_timeout(AvahiSimplePoll *s, int retry_interval){
1359
int avahi_loop_with_timeout(AvahiSimplePoll *s, int retry_interval,
1360
mandos_context *mc){
1323
1362
struct timespec now;
1324
1363
struct timespec waited_time;
1325
1364
intmax_t block_time;
1328
if(mc.current_server == NULL){
1367
if(mc->current_server == NULL){
1330
1369
fprintf_plus(stderr, "Wait until first server is found."
1331
1370
" No timeout!\n");
1345
1384
/* Calculating in ms how long time between now and server
1346
1385
who we visted longest time ago. Now - last seen. */
1347
1386
waited_time.tv_sec = (now.tv_sec
1348
- mc.current_server->last_seen.tv_sec);
1387
- mc->current_server->last_seen.tv_sec);
1349
1388
waited_time.tv_nsec = (now.tv_nsec
1350
- mc.current_server->last_seen.tv_nsec);
1389
- mc->current_server->last_seen.tv_nsec);
1351
1390
/* total time is 10s/10,000ms.
1352
1391
Converting to s from ms by dividing by 1,000,
1353
1392
and ns to ms by dividing by 1,000,000. */
1363
1402
if(block_time <= 0){
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);
1403
ret = start_mandos_communication(mc->current_server->ip,
1404
mc->current_server->port,
1405
mc->current_server->if_index,
1406
mc->current_server->af, mc);
1369
avahi_simple_poll_quit(mc.simple_poll);
1408
avahi_simple_poll_quit(s);
1372
1411
ret = clock_gettime(CLOCK_MONOTONIC,
1373
&mc.current_server->last_seen);
1412
&mc->current_server->last_seen);
1375
1414
perror_plus("clock_gettime");
1378
mc.current_server = mc.current_server->next;
1417
mc->current_server = mc->current_server->next;
1379
1418
block_time = 0; /* Call avahi to find new Mandos
1380
1419
servers, but don't block */
1750
1789
int main(int argc, char *argv[]){
1790
mandos_context mc = { .server = NULL, .dh_bits = 1024,
1791
.priority = "SECURE256:!CTYPE-X.509:"
1792
"+CTYPE-OPENPGP", .current_server = NULL,
1793
.interfaces = NULL, .interfaces_size = 0 };
1751
1794
AvahiSServiceBrowser *sb = NULL;
1752
1795
error_t ret_errno;
1754
1797
intmax_t tmpmax;
1756
1799
int exitcode = EXIT_SUCCESS;
1757
char *interfaces = NULL;
1758
size_t interfaces_size = 0;
1759
1800
char *interfaces_to_take_down = NULL;
1760
1801
size_t interfaces_to_take_down_size = 0;
1761
1802
char tempdir[] = "/tmp/mandosXXXXXX";
1861
1902
connect_to = arg;
1863
1904
case 'i': /* --interface */
1864
ret_errno = argz_add_sep(&interfaces, &interfaces_size, arg,
1905
ret_errno = argz_add_sep(&mc.interfaces, &mc.interfaces_size,
1866
1907
if(ret_errno != 0){
1867
1908
argp_error(state, "%s", strerror(ret_errno));
1997
2038
/* Lower privileges */
2001
perror_plus("seteuid");
2006
/* Remove empty interface names */
2043
/* Remove invalid interface names (except "none") */
2008
2045
char *interface = NULL;
2009
while((interface = argz_next(interfaces, interfaces_size,
2046
while((interface = argz_next(mc.interfaces, mc.interfaces_size,
2011
if(if_nametoindex(interface) == 0){
2012
if(interface[0] != '\0' and strcmp(interface, "none") != 0){
2048
if(strcmp(interface, "none") != 0
2049
and if_nametoindex(interface) == 0){
2050
if(interface[0] != '\0'){
2013
2051
fprintf_plus(stderr, "Not using nonexisting interface"
2014
2052
" \"%s\"\n", interface);
2016
argz_delete(&interfaces, &interfaces_size, interface);
2054
argz_delete(&mc.interfaces, &mc.interfaces_size, interface);
2017
2055
interface = NULL;
2022
2060
/* Run network hooks */
2025
if(interfaces != NULL){
2026
interfaces_hooks = malloc(interfaces_size);
2062
if(mc.interfaces != NULL){
2063
interfaces_hooks = malloc(mc.interfaces_size);
2027
2064
if(interfaces_hooks == NULL){
2028
2065
perror_plus("malloc");
2031
memcpy(interfaces_hooks, interfaces, interfaces_size);
2032
interfaces_hooks_size = interfaces_size;
2068
memcpy(interfaces_hooks, mc.interfaces, mc.interfaces_size);
2069
interfaces_hooks_size = mc.interfaces_size;
2033
2070
argz_stringify(interfaces_hooks, interfaces_hooks_size,
2047
2084
from the signal handler */
2048
2085
/* Initialize the pseudo-RNG for Avahi */
2049
2086
srand((unsigned int) time(NULL));
2050
mc.simple_poll = avahi_simple_poll_new();
2051
if(mc.simple_poll == NULL){
2087
simple_poll = avahi_simple_poll_new();
2088
if(simple_poll == NULL){
2052
2089
fprintf_plus(stderr,
2053
2090
"Avahi: Failed to create simple poll object.\n");
2054
2091
exitcode = EX_UNAVAILABLE;
2121
2158
/* If no interfaces were specified, make a list */
2122
if(interfaces == NULL){
2159
if(mc.interfaces == NULL){
2123
2160
struct dirent **direntries;
2124
2161
/* Look for any good interfaces */
2125
2162
ret = scandir(sys_class_net, &direntries, good_interface,
2128
2165
/* Add all found interfaces to interfaces list */
2129
2166
for(int i = 0; i < ret; ++i){
2130
ret_errno = argz_add(&interfaces, &interfaces_size,
2167
ret_errno = argz_add(&mc.interfaces, &mc.interfaces_size,
2131
2168
direntries[i]->d_name);
2132
2169
if(ret_errno != 0){
2133
2170
perror_plus("argz_add");
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)){
2187
/* Bring up interfaces which are down, and remove any "none"s */
2162
2189
char *interface = NULL;
2163
while((interface = argz_next(interfaces, interfaces_size,
2190
while((interface = argz_next(mc.interfaces, mc.interfaces_size,
2192
/* If interface name is "none", stop bringing up interfaces.
2193
Also remove all instances of "none" from the list */
2194
if(strcmp(interface, "none") == 0){
2195
argz_delete(&mc.interfaces, &mc.interfaces_size,
2198
while((interface = argz_next(mc.interfaces,
2199
mc.interfaces_size, interface))){
2200
if(strcmp(interface, "none") == 0){
2201
argz_delete(&mc.interfaces, &mc.interfaces_size,
2165
2208
bool interface_was_up = interface_is_up(interface);
2166
2209
ret = bring_up_interface(interface, delay);
2167
2210
if(not interface_was_up){
2180
interfaces_size = 0;
2181
2221
if(debug and (interfaces_to_take_down == NULL)){
2182
2222
fprintf_plus(stderr, "No interfaces were brought up\n");
2226
/* If we only got one interface, explicitly use only that one */
2227
if(argz_count(mc.interfaces, mc.interfaces_size) == 1){
2229
fprintf_plus(stderr, "Using only interface \"%s\"\n",
2232
if_index = (AvahiIfIndex)if_nametoindex(mc.interfaces);
2190
ret = init_gnutls_global(pubkey, seckey);
2239
ret = init_gnutls_global(pubkey, seckey, &mc);
2192
2241
fprintf_plus(stderr, "init_gnutls_global failed\n");
2193
2242
exitcode = EX_UNAVAILABLE;
2213
if(not init_gpgme(pubkey, seckey, tempdir)){
2262
if(not init_gpgme(pubkey, seckey, tempdir, &mc)){
2214
2263
fprintf_plus(stderr, "init_gpgme failed\n");
2215
2264
exitcode = EX_UNAVAILABLE;
2275
2324
while(not quit_now){
2276
ret = start_mandos_communication(address, port, if_index, af);
2325
ret = start_mandos_communication(address, port, if_index, af,
2277
2327
if(quit_now or ret == 0){
2305
2355
config.publish_domain = 0;
2307
2357
/* Allocate a new server */
2308
mc.server = avahi_server_new(avahi_simple_poll_get
2309
(mc.simple_poll), &config, NULL,
2358
mc.server = avahi_server_new(avahi_simple_poll_get(simple_poll),
2359
&config, NULL, NULL, &ret_errno);
2312
2361
/* Free the Avahi configuration data */
2313
2362
avahi_server_config_free(&config);
2328
2377
/* Create the Avahi service browser */
2329
2378
sb = avahi_s_service_browser_new(mc.server, if_index,
2330
2379
AVAHI_PROTO_UNSPEC, "_mandos._tcp",
2331
NULL, 0, browse_callback, NULL);
2380
NULL, 0, browse_callback,
2332
2382
if(sb == NULL){
2333
2383
fprintf_plus(stderr, "Failed to create service browser: %s\n",
2334
2384
avahi_strerror(avahi_server_errno(mc.server)));
2346
2396
fprintf_plus(stderr, "Starting Avahi loop search\n");
2349
ret = avahi_loop_with_timeout(mc.simple_poll,
2350
(int)(retry_interval * 1000));
2399
ret = avahi_loop_with_timeout(simple_poll,
2400
(int)(retry_interval * 1000), &mc);
2352
2402
fprintf_plus(stderr, "avahi_loop_with_timeout exited %s\n",
2353
2403
(ret == 0) ? "successfully" : "with error");
2362
2412
/* Cleanup things */
2413
free(mc.interfaces);
2364
2416
avahi_s_service_browser_free(sb);
2366
2418
if(mc.server != NULL)
2367
2419
avahi_server_free(mc.server);
2369
if(mc.simple_poll != NULL)
2370
avahi_simple_poll_free(mc.simple_poll);
2421
if(simple_poll != NULL)
2422
avahi_simple_poll_free(simple_poll);
2372
2424
if(gnutls_initialized){
2373
2425
gnutls_certificate_free_credentials(mc.cred);