235
225
if(new_server->ip == NULL){
236
226
perror_plus("strdup");
240
ret = clock_gettime(CLOCK_MONOTONIC, &(new_server->last_seen));
242
perror_plus("clock_gettime");
244
#pragma GCC diagnostic push
245
#pragma GCC diagnostic ignored "-Wcast-qual"
247
free((char *)(new_server->ip));
249
#pragma GCC diagnostic pop
254
229
/* Special case of first server */
255
if(*current_server == NULL){
230
if (mc.current_server == NULL){
256
231
new_server->next = new_server;
257
232
new_server->prev = new_server;
258
*current_server = new_server;
233
mc.current_server = new_server;
234
/* Place the new server last in the list */
260
/* Place the new server last in the list */
261
new_server->next = *current_server;
262
new_server->prev = (*current_server)->prev;
236
new_server->next = mc.current_server;
237
new_server->prev = mc.current_server->prev;
263
238
new_server->prev->next = new_server;
264
(*current_server)->prev = new_server;
239
mc.current_server->prev = new_server;
241
ret = clock_gettime(CLOCK_MONOTONIC, &mc.current_server->last_seen);
243
perror_plus("clock_gettime");
564
536
/* GnuTLS server initialization */
565
ret = gnutls_dh_params_init(&mc->dh_params);
537
ret = gnutls_dh_params_init(&mc.dh_params);
566
538
if(ret != GNUTLS_E_SUCCESS){
567
539
fprintf_plus(stderr, "Error in GnuTLS DH parameter"
568
540
" initialization: %s\n",
569
541
safer_gnutls_strerror(ret));
572
ret = gnutls_dh_params_generate2(mc->dh_params, mc->dh_bits);
544
ret = gnutls_dh_params_generate2(mc.dh_params, mc.dh_bits);
573
545
if(ret != GNUTLS_E_SUCCESS){
574
546
fprintf_plus(stderr, "Error in GnuTLS prime generation: %s\n",
575
547
safer_gnutls_strerror(ret));
579
gnutls_certificate_set_dh_params(mc->cred, mc->dh_params);
551
gnutls_certificate_set_dh_params(mc.cred, mc.dh_params);
585
gnutls_certificate_free_credentials(mc->cred);
557
gnutls_certificate_free_credentials(mc.cred);
586
558
gnutls_global_deinit();
587
gnutls_dh_params_deinit(mc->dh_params);
559
gnutls_dh_params_deinit(mc.dh_params);
591
__attribute__((nonnull, warn_unused_result))
592
static int init_gnutls_session(gnutls_session_t *session,
563
static int init_gnutls_session(gnutls_session_t *session){
595
565
/* GnuTLS session creation */
800
743
char addrstr[(INET_ADDRSTRLEN > INET6_ADDRSTRLEN) ?
801
744
INET_ADDRSTRLEN : INET6_ADDRSTRLEN] = "";
802
746
if(af == AF_INET6){
803
ret = getnameinfo((struct sockaddr *)&to,
804
sizeof(struct sockaddr_in6),
805
addrstr, sizeof(addrstr), NULL, 0,
747
pcret = inet_ntop(af, &(to.in6.sin6_addr), addrstr,
808
ret = getnameinfo((struct sockaddr *)&to,
809
sizeof(struct sockaddr_in),
810
addrstr, sizeof(addrstr), NULL, 0,
750
pcret = inet_ntop(af, &(to.in.sin_addr), addrstr,
813
if(ret == EAI_SYSTEM){
814
perror_plus("getnameinfo");
815
} else if(ret != 0) {
816
fprintf_plus(stderr, "getnameinfo: %s", gai_strerror(ret));
817
} else if(strcmp(addrstr, ip) != 0){
818
fprintf_plus(stderr, "Canonical address form: %s\n", addrstr);
754
perror_plus("inet_ntop");
756
if(strcmp(addrstr, ip) != 0){
757
fprintf_plus(stderr, "Canonical address form: %s\n", addrstr);
1485
1413
if(setuid(0) == -1){
1486
1414
ret_errno = errno;
1415
perror_plus("seteuid");
1488
1417
errno = old_errno;
1489
1418
return ret_errno;
1492
1421
/* Set effective user ID to unprivileged saved user ID */
1493
__attribute__((warn_unused_result))
1494
1422
error_t lower_privileges(void){
1495
1423
error_t old_errno = errno;
1496
1424
error_t ret_errno = 0;
1497
1425
if(seteuid(uid) == -1){
1498
1426
ret_errno = errno;
1427
perror_plus("seteuid");
1500
1429
errno = old_errno;
1501
1430
return ret_errno;
1504
1433
/* Lower privileges permanently */
1505
__attribute__((warn_unused_result))
1506
1434
error_t lower_privileges_permanently(void){
1507
1435
error_t old_errno = errno;
1508
1436
error_t ret_errno = 0;
1509
1437
if(setuid(uid) == -1){
1510
1438
ret_errno = errno;
1439
perror_plus("setuid");
1512
1441
errno = old_errno;
1513
1442
return ret_errno;
1516
__attribute__((nonnull))
1517
void run_network_hooks(const char *mode, const char *interface,
1445
bool run_network_hooks(const char *mode, const char *interface,
1518
1446
const float delay){
1519
struct dirent **direntries = NULL;
1520
if(hookdir_fd == -1){
1521
hookdir_fd = open(hookdir, O_RDONLY);
1522
if(hookdir_fd == -1){
1523
if(errno == ENOENT){
1525
fprintf_plus(stderr, "Network hook directory \"%s\" not"
1526
" found\n", hookdir);
1529
perror_plus("open");
1535
#if __GLIBC_PREREQ(2, 15)
1536
int numhooks = scandirat(hookdir_fd, ".", &direntries,
1537
runnable_hook, alphasort);
1538
#else /* not __GLIBC_PREREQ(2, 15) */
1539
int numhooks = scandir(hookdir, &direntries, runnable_hook,
1541
#endif /* not __GLIBC_PREREQ(2, 15) */
1542
#else /* not __GLIBC__ */
1543
int numhooks = scandir(hookdir, &direntries, runnable_hook,
1545
#endif /* not __GLIBC__ */
1447
struct dirent **direntries;
1448
struct dirent *direntry;
1450
int numhooks = scandir(hookdir, &direntries, runnable_hook,
1546
1452
if(numhooks == -1){
1547
perror_plus("scandir");
1550
struct dirent *direntry;
1552
int devnull = open("/dev/null", O_RDONLY);
1553
for(int i = 0; i < numhooks; i++){
1554
direntry = direntries[i];
1556
fprintf_plus(stderr, "Running network hook \"%s\"\n",
1453
if(errno == ENOENT){
1455
fprintf_plus(stderr, "Network hook directory \"%s\" not"
1456
" found\n", hookdir);
1459
perror_plus("scandir");
1559
pid_t hook_pid = fork();
1562
/* Raise privileges */
1563
errno = raise_privileges_permanently();
1565
perror_plus("Failed to raise privileges");
1572
perror_plus("setgid");
1575
/* Reset supplementary groups */
1577
ret = setgroups(0, NULL);
1579
perror_plus("setgroups");
1582
ret = dup2(devnull, STDIN_FILENO);
1584
perror_plus("dup2(devnull, STDIN_FILENO)");
1587
ret = close(devnull);
1589
perror_plus("close");
1592
ret = dup2(STDERR_FILENO, STDOUT_FILENO);
1594
perror_plus("dup2(STDERR_FILENO, STDOUT_FILENO)");
1597
ret = setenv("MANDOSNETHOOKDIR", hookdir, 1);
1599
perror_plus("setenv");
1602
ret = setenv("DEVICE", interface, 1);
1604
perror_plus("setenv");
1607
ret = setenv("VERBOSITY", debug ? "1" : "0", 1);
1609
perror_plus("setenv");
1612
ret = setenv("MODE", mode, 1);
1614
perror_plus("setenv");
1618
ret = asprintf(&delaystring, "%f", (double)delay);
1462
int devnull = open("/dev/null", O_RDONLY);
1463
for(int i = 0; i < numhooks; i++){
1464
direntry = direntries[i];
1465
char *fullname = NULL;
1466
ret = asprintf(&fullname, "%s/%s", hookdir, direntry->d_name);
1620
1468
perror_plus("asprintf");
1623
ret = setenv("DELAY", delaystring, 1);
1472
fprintf_plus(stderr, "Running network hook \"%s\"\n",
1475
pid_t hook_pid = fork();
1478
/* Raise privileges */
1479
raise_privileges_permanently();
1484
perror_plus("setgid");
1486
/* Reset supplementary groups */
1488
ret = setgroups(0, NULL);
1490
perror_plus("setgroups");
1492
dup2(devnull, STDIN_FILENO);
1494
dup2(STDERR_FILENO, STDOUT_FILENO);
1495
ret = setenv("MANDOSNETHOOKDIR", hookdir, 1);
1497
perror_plus("setenv");
1500
ret = setenv("DEVICE", interface, 1);
1502
perror_plus("setenv");
1505
ret = setenv("VERBOSITY", debug ? "1" : "0", 1);
1507
perror_plus("setenv");
1510
ret = setenv("MODE", mode, 1);
1512
perror_plus("setenv");
1516
ret = asprintf(&delaystring, "%f", delay);
1518
perror_plus("asprintf");
1521
ret = setenv("DELAY", delaystring, 1);
1524
perror_plus("setenv");
1625
1527
free(delaystring);
1626
perror_plus("setenv");
1630
if(connect_to != NULL){
1631
ret = setenv("CONNECT", connect_to, 1);
1633
perror_plus("setenv");
1637
int hook_fd = openat(hookdir_fd, direntry->d_name, O_RDONLY);
1639
perror_plus("openat");
1640
_exit(EXIT_FAILURE);
1642
if((int)TEMP_FAILURE_RETRY(close(hookdir_fd)) == -1){
1643
perror_plus("close");
1644
_exit(EXIT_FAILURE);
1646
if(fexecve(hook_fd, (char *const []){ direntry->d_name, NULL },
1648
perror_plus("fexecve");
1649
_exit(EXIT_FAILURE);
1653
if(TEMP_FAILURE_RETRY(waitpid(hook_pid, &status, 0)) == -1){
1654
perror_plus("waitpid");
1657
if(WIFEXITED(status)){
1658
if(WEXITSTATUS(status) != 0){
1659
fprintf_plus(stderr, "Warning: network hook \"%s\" exited"
1660
" with status %d\n", direntry->d_name,
1661
WEXITSTATUS(status));
1664
} else if(WIFSIGNALED(status)){
1665
fprintf_plus(stderr, "Warning: network hook \"%s\" died by"
1666
" signal %d\n", direntry->d_name,
1528
if(connect_to != NULL){
1529
ret = setenv("CONNECT", connect_to, 1);
1531
perror_plus("setenv");
1535
if(execl(fullname, direntry->d_name, mode, NULL) == -1){
1536
perror_plus("execl");
1537
_exit(EXIT_FAILURE);
1670
fprintf_plus(stderr, "Warning: network hook \"%s\""
1671
" crashed\n", direntry->d_name);
1676
fprintf_plus(stderr, "Network hook \"%s\" ran successfully\n",
1681
if((int)TEMP_FAILURE_RETRY(close(hookdir_fd)) == -1){
1682
perror_plus("close");
1541
if(TEMP_FAILURE_RETRY(waitpid(hook_pid, &status, 0)) == -1){
1542
perror_plus("waitpid");
1546
if(WIFEXITED(status)){
1547
if(WEXITSTATUS(status) != 0){
1548
fprintf_plus(stderr, "Warning: network hook \"%s\" exited"
1549
" with status %d\n", direntry->d_name,
1550
WEXITSTATUS(status));
1554
} else if(WIFSIGNALED(status)){
1555
fprintf_plus(stderr, "Warning: network hook \"%s\" died by"
1556
" signal %d\n", direntry->d_name,
1561
fprintf_plus(stderr, "Warning: network hook \"%s\""
1562
" crashed\n", direntry->d_name);
1569
fprintf_plus(stderr, "Network hook \"%s\" ran successfully\n",
1689
__attribute__((nonnull, warn_unused_result))
1690
1578
error_t bring_up_interface(const char *const interface,
1691
1579
const float delay){
1692
1581
error_t old_errno = errno;
1582
error_t ret_errno = 0;
1583
int ret, ret_setflags;
1694
1584
struct ifreq network;
1695
1585
unsigned int if_index = if_nametoindex(interface);
1696
1586
if(if_index == 0){
2285
2141
free(direntries);
2290
2144
fprintf_plus(stderr, "Could not find a network interface\n");
2291
2145
exitcode = EXIT_FAILURE;
2296
/* 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)){
2298
2162
char *interface = NULL;
2299
while((interface = argz_next(mc.interfaces, mc.interfaces_size,
2163
while((interface = argz_next(interfaces, interfaces_size,
2301
/* If interface name is "none", stop bringing up interfaces.
2302
Also remove all instances of "none" from the list */
2303
if(strcmp(interface, "none") == 0){
2304
argz_delete(&mc.interfaces, &mc.interfaces_size,
2307
while((interface = argz_next(mc.interfaces,
2308
mc.interfaces_size, interface))){
2309
if(strcmp(interface, "none") == 0){
2310
argz_delete(&mc.interfaces, &mc.interfaces_size,
2317
2165
bool interface_was_up = interface_is_up(interface);
2318
errno = bring_up_interface(interface, delay);
2166
ret = bring_up_interface(interface, delay);
2319
2167
if(not interface_was_up){
2321
2170
perror_plus("Failed to bring up interface");
2323
errno = argz_add(&interfaces_to_take_down,
2324
&interfaces_to_take_down_size,
2327
perror_plus("argz_add");
2172
ret_errno = argz_add(&interfaces_to_take_down,
2173
&interfaces_to_take_down_size,
2180
interfaces_size = 0;
2332
2181
if(debug and (interfaces_to_take_down == NULL)){
2333
2182
fprintf_plus(stderr, "No interfaces were brought up\n");
2337
/* If we only got one interface, explicitly use only that one */
2338
if(argz_count(mc.interfaces, mc.interfaces_size) == 1){
2340
fprintf_plus(stderr, "Using only interface \"%s\"\n",
2343
if_index = (AvahiIfIndex)if_nametoindex(mc.interfaces);
2350
ret = init_gnutls_global(pubkey, seckey, &mc);
2190
ret = init_gnutls_global(pubkey, seckey);
2352
2192
fprintf_plus(stderr, "init_gnutls_global failed\n");
2353
2193
exitcode = EX_UNAVAILABLE;
2556
2385
mc.current_server->prev->next = NULL;
2557
2386
while(mc.current_server != NULL){
2558
2387
server *next = mc.current_server->next;
2560
#pragma GCC diagnostic push
2561
#pragma GCC diagnostic ignored "-Wcast-qual"
2563
free((char *)(mc.current_server->ip));
2565
#pragma GCC diagnostic pop
2567
2388
free(mc.current_server);
2568
2389
mc.current_server = next;
2572
/* Re-raise privileges */
2393
/* Re-raise priviliges */
2574
ret_errno = raise_privileges();
2577
perror_plus("Failed to raise privileges");
2580
/* Run network hooks */
2581
run_network_hooks("stop", interfaces_hooks != NULL ?
2582
interfaces_hooks : "", delay);
2584
/* Take down the network interfaces which were brought up */
2586
char *interface = NULL;
2587
while((interface=argz_next(interfaces_to_take_down,
2588
interfaces_to_take_down_size,
2590
ret_errno = take_down_interface(interface);
2593
perror_plus("Failed to take down interface");
2596
if(debug and (interfaces_to_take_down == NULL)){
2597
fprintf_plus(stderr, "No interfaces needed to be taken"
2603
ret_errno = lower_privileges_permanently();
2606
perror_plus("Failed to lower privileges permanently");
2397
/* Run network hooks */
2398
run_network_hooks("stop", interfaces_hooks != NULL ?
2399
interfaces_hooks : "", delay);
2401
/* Take down the network interfaces which were brought up */
2403
char *interface = NULL;
2404
while((interface=argz_next(interfaces_to_take_down,
2405
interfaces_to_take_down_size,
2407
ret_errno = take_down_interface(interface);
2410
perror_plus("Failed to take down interface");
2413
if(debug and (interfaces_to_take_down == NULL)){
2414
fprintf_plus(stderr, "No interfaces needed to be taken"
2419
lower_privileges_permanently();
2610
2422
free(interfaces_to_take_down);
2611
2423
free(interfaces_hooks);
2613
2425
/* Removes the GPGME temp directory and all files inside */
2614
if(tempdir != NULL){
2426
if(tempdir_created){
2615
2427
struct dirent **direntries = NULL;
2616
int tempdir_fd = (int)TEMP_FAILURE_RETRY(open(tempdir, O_RDONLY |
2618
if(tempdir_fd == -1){
2619
perror_plus("open");
2622
#if __GLIBC_PREREQ(2, 15)
2623
int numentries = scandirat(tempdir_fd, ".", &direntries,
2624
notdotentries, alphasort);
2625
#else /* not __GLIBC_PREREQ(2, 15) */
2626
int numentries = scandir(tempdir, &direntries, notdotentries,
2628
#endif /* not __GLIBC_PREREQ(2, 15) */
2629
#else /* not __GLIBC__ */
2630
int numentries = scandir(tempdir, &direntries, notdotentries,
2632
#endif /* not __GLIBC__ */
2633
if(numentries >= 0){
2634
for(int i = 0; i < numentries; i++){
2635
ret = unlinkat(tempdir_fd, direntries[i]->d_name, 0);
2637
fprintf_plus(stderr, "unlinkat(open(\"%s\", O_RDONLY),"
2638
" \"%s\", 0): %s\n", tempdir,
2639
direntries[i]->d_name, strerror(errno));
2643
/* need to clean even if 0 because man page doesn't specify */
2645
if(numentries == -1){
2646
perror_plus("scandir");
2648
ret = rmdir(tempdir);
2649
if(ret == -1 and errno != ENOENT){
2650
perror_plus("rmdir");
2428
struct dirent *direntry = NULL;
2429
int numentries = scandir(tempdir, &direntries, notdotentries,
2431
if (numentries > 0){
2432
for(int i = 0; i < numentries; i++){
2433
direntry = direntries[i];
2434
char *fullname = NULL;
2435
ret = asprintf(&fullname, "%s/%s", tempdir,
2438
perror_plus("asprintf");
2441
ret = remove(fullname);
2443
fprintf_plus(stderr, "remove(\"%s\"): %s\n", fullname,
2653
TEMP_FAILURE_RETRY(close(tempdir_fd));
2450
/* need to clean even if 0 because man page doesn't specify */
2452
if (numentries == -1){
2453
perror_plus("scandir");
2455
ret = rmdir(tempdir);
2456
if(ret == -1 and errno != ENOENT){
2457
perror_plus("rmdir");