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
56
56
#include <sys/stat.h> /* open(), S_ISREG */
57
57
#include <sys/socket.h> /* socket(), struct sockaddr_in6,
58
inet_pton(), connect() */
58
inet_pton(), connect(),
59
60
#include <fcntl.h> /* open() */
60
61
#include <dirent.h> /* opendir(), struct dirent, readdir()
73
74
#include <unistd.h> /* close(), SEEK_SET, off_t, write(),
74
75
getuid(), getgid(), seteuid(),
75
76
setgid(), pause(), _exit() */
76
#include <arpa/inet.h> /* inet_pton(), htons, inet_ntop() */
77
#include <arpa/inet.h> /* inet_pton(), htons() */
77
78
#include <iso646.h> /* not, or, and */
78
79
#include <argp.h> /* struct argp_option, error_t, struct
79
80
argp_state, struct argp,
91
92
argz_delete(), argz_append(),
92
93
argz_stringify(), argz_add(),
95
#include <netdb.h> /* getnameinfo(), NI_NUMERICHOST,
96
EAI_SYSTEM, gai_strerror() */
96
99
#include <sys/klog.h> /* klogctl() */
180
183
perror(print_text);
183
__attribute__((format (gnu_printf, 2, 3)))
186
__attribute__((format (gnu_printf, 2, 3), nonnull))
184
187
int fprintf_plus(FILE *stream, const char *format, ...){
186
189
va_start (ap, format);
188
191
TEMP_FAILURE_RETRY(fprintf(stream, "Mandos plugin %s: ",
189
192
program_invocation_short_name));
190
return TEMP_FAILURE_RETRY(vfprintf(stream, format, ap));
193
return (int)TEMP_FAILURE_RETRY(vfprintf(stream, format, ap));
195
198
* bytes. "buffer_capacity" is how much is currently allocated,
196
199
* "buffer_length" is how much is already used.
201
__attribute__((nonnull, warn_unused_result))
198
202
size_t incbuffer(char **buffer, size_t buffer_length,
199
203
size_t buffer_capacity){
200
204
if(buffer_length + BUFFER_SIZE > buffer_capacity){
201
*buffer = realloc(*buffer, buffer_capacity + BUFFER_SIZE);
205
char *new_buf = realloc(*buffer, buffer_capacity + BUFFER_SIZE);
207
int old_errno = errno;
205
214
buffer_capacity += BUFFER_SIZE;
207
216
return buffer_capacity;
210
219
/* Add server to set of servers to retry periodically */
220
__attribute__((nonnull, warn_unused_result))
211
221
bool add_server(const char *ip, in_port_t port, AvahiIfIndex if_index,
212
222
int af, server **current_server){
224
234
perror_plus("strdup");
237
ret = clock_gettime(CLOCK_MONOTONIC, &(new_server->last_seen));
239
perror_plus("clock_gettime");
227
242
/* Special case of first server */
228
243
if(*current_server == NULL){
229
244
new_server->next = new_server;
230
245
new_server->prev = new_server;
231
246
*current_server = new_server;
232
/* Place the new server last in the list */
248
/* Place the new server last in the list */
234
249
new_server->next = *current_server;
235
250
new_server->prev = (*current_server)->prev;
236
251
new_server->prev->next = new_server;
237
252
(*current_server)->prev = new_server;
239
ret = clock_gettime(CLOCK_MONOTONIC, &(*current_server)->last_seen);
241
perror_plus("clock_gettime");
248
258
* Initialize GPGME.
260
__attribute__((nonnull, warn_unused_result))
250
261
static bool init_gpgme(const char *seckey, const char *pubkey,
251
262
const char *tempdir, mandos_context *mc){
252
263
gpgme_error_t rc;
477
490
/* GnuTLS log function callback */
491
__attribute__((nonnull))
478
492
static void debuggnutls(__attribute__((unused)) int level,
479
493
const char* string){
480
494
fprintf_plus(stderr, "GnuTLS: %s", string);
497
__attribute__((nonnull, warn_unused_result))
483
498
static int init_gnutls_global(const char *pubkeyfilename,
484
499
const char *seckeyfilename,
485
500
mandos_context *mc){
621
637
__attribute__((unused)) const char *txt){}
623
639
/* Called when a Mandos server is found */
640
__attribute__((nonnull, warn_unused_result))
624
641
static int start_mandos_communication(const char *ip, in_port_t port,
625
642
AvahiIfIndex if_index,
626
643
int af, mandos_context *mc){
627
644
int ret, tcp_sd = -1;
630
struct sockaddr_in in;
631
struct sockaddr_in6 in6;
646
struct sockaddr_storage to;
633
647
char *buffer = NULL;
634
648
char *decrypted_buffer = NULL;
635
649
size_t buffer_length = 0;
676
/* If the interface is specified and we have a list of interfaces */
677
if(if_index != AVAHI_IF_UNSPEC and mc->interfaces != NULL){
678
/* Check if the interface is one of the interfaces we are using */
681
char *interface = NULL;
682
while((interface=argz_next(mc->interfaces, mc->interfaces_size,
684
if(if_nametoindex(interface) == (unsigned int)if_index){
691
/* This interface does not match any in the list, so we don't
692
connect to the server */
694
char interface[IF_NAMESIZE];
695
if(if_indextoname((unsigned int)if_index, interface) == NULL){
696
perror_plus("if_indextoname");
698
fprintf_plus(stderr, "Skipping server on non-used interface"
700
if_indextoname((unsigned int)if_index,
662
708
ret = init_gnutls_session(&session, mc);
685
731
memset(&to, 0, sizeof(to));
686
732
if(af == AF_INET6){
687
to.in6.sin6_family = (sa_family_t)af;
688
ret = inet_pton(af, ip, &to.in6.sin6_addr);
733
((struct sockaddr_in6 *)&to)->sin6_family = (sa_family_t)af;
734
ret = inet_pton(af, ip, &((struct sockaddr_in6 *)&to)->sin6_addr);
689
735
} else { /* IPv4 */
690
to.in.sin_family = (sa_family_t)af;
691
ret = inet_pton(af, ip, &to.in.sin_addr);
736
((struct sockaddr_in *)&to)->sin_family = (sa_family_t)af;
737
ret = inet_pton(af, ip, &((struct sockaddr_in *)&to)->sin_addr);
705
751
if(af == AF_INET6){
706
to.in6.sin6_port = htons(port);
707
if(IN6_IS_ADDR_LINKLOCAL /* Spurious warnings from */
708
(&to.in6.sin6_addr)){ /* -Wstrict-aliasing=2 or lower and
752
((struct sockaddr_in6 *)&to)->sin6_port = htons(port);
753
if(IN6_IS_ADDR_LINKLOCAL
754
(&((struct sockaddr_in6 *)&to)->sin6_addr)){
710
755
if(if_index == AVAHI_IF_UNSPEC){
711
756
fprintf_plus(stderr, "An IPv6 link-local address is"
712
757
" incomplete without a network interface\n");
716
761
/* Set the network interface number as scope */
717
to.in6.sin6_scope_id = (uint32_t)if_index;
762
((struct sockaddr_in6 *)&to)->sin6_scope_id = (uint32_t)if_index;
720
to.in.sin_port = htons(port); /* Spurious warnings from
722
-Wunreachable-code */
765
((struct sockaddr_in *)&to)->sin_port = htons(port);
743
786
char addrstr[(INET_ADDRSTRLEN > INET6_ADDRSTRLEN) ?
744
787
INET_ADDRSTRLEN : INET6_ADDRSTRLEN] = "";
746
788
if(af == AF_INET6){
747
pcret = inet_ntop(af, &(to.in6.sin6_addr), addrstr,
789
ret = getnameinfo((struct sockaddr *)&to,
790
sizeof(struct sockaddr_in6),
791
addrstr, sizeof(addrstr), NULL, 0,
750
pcret = inet_ntop(af, &(to.in.sin_addr), addrstr,
794
ret = getnameinfo((struct sockaddr *)&to,
795
sizeof(struct sockaddr_in),
796
addrstr, sizeof(addrstr), NULL, 0,
754
perror_plus("inet_ntop");
756
if(strcmp(addrstr, ip) != 0){
757
fprintf_plus(stderr, "Canonical address form: %s\n", addrstr);
799
if(ret == EAI_SYSTEM){
800
perror_plus("getnameinfo");
801
} else if(ret != 0) {
802
fprintf_plus(stderr, "getnameinfo: %s", gai_strerror(ret));
803
} else if(strcmp(addrstr, ip) != 0){
804
fprintf_plus(stderr, "Canonical address form: %s\n", addrstr);
767
813
if(af == AF_INET6){
768
ret = connect(tcp_sd, &to.in6, sizeof(to));
814
ret = connect(tcp_sd, (struct sockaddr *)&to,
815
sizeof(struct sockaddr_in6));
770
ret = connect(tcp_sd, &to.in, sizeof(to)); /* IPv4 */
817
ret = connect(tcp_sd, (struct sockaddr *)&to, /* IPv4 */
818
sizeof(struct sockaddr_in));
773
if ((errno != ECONNREFUSED and errno != ENETUNREACH) or debug){
821
if((errno != ECONNREFUSED and errno != ENETUNREACH) or debug){
775
823
perror_plus("connect");
1200
1251
* corresponds to an acceptable network device.
1201
1252
* (This function is passed to scandir(3) as a filter function.)
1254
__attribute__((nonnull, warn_unused_result))
1203
1255
int good_interface(const struct dirent *if_entry){
1204
1256
if(if_entry->d_name[0] == '.'){
1224
1276
* This function determines if a network interface is up.
1278
__attribute__((nonnull, warn_unused_result))
1226
1279
bool interface_is_up(const char *interface){
1227
1280
struct ifreq ifr;
1228
1281
if(not get_flags(interface, &ifr)){
1240
1293
* This function determines if a network interface is running
1295
__attribute__((nonnull, warn_unused_result))
1242
1296
bool interface_is_running(const char *interface){
1243
1297
struct ifreq ifr;
1244
1298
if(not get_flags(interface, &ifr)){
1252
1306
return (bool)(ifr.ifr_flags & IFF_RUNNING);
1309
__attribute__((nonnull, pure, warn_unused_result))
1255
1310
int notdotentries(const struct dirent *direntry){
1256
1311
/* Skip "." and ".." */
1257
1312
if(direntry->d_name[0] == '.'
1335
1392
if(mc->current_server == NULL){
1337
1394
fprintf_plus(stderr, "Wait until first server is found."
1338
1395
" No timeout!\n");
1340
1397
ret = avahi_simple_poll_iterate(s, -1);
1343
1400
fprintf_plus(stderr, "Check current_server if we should run"
1344
1401
" it, or wait\n");
1390
1447
ret = avahi_simple_poll_iterate(s, (int)block_time);
1393
if (ret > 0 or errno != EINTR){
1450
if(ret > 0 or errno != EINTR){
1394
1451
return (ret != 1) ? ret : 0;
1400
1457
/* Set effective uid to 0, return errno */
1458
__attribute__((warn_unused_result))
1401
1459
error_t raise_privileges(void){
1402
1460
error_t old_errno = errno;
1403
1461
error_t ret_errno = 0;
1412
1470
/* Set effective and real user ID to 0. Return errno. */
1471
__attribute__((warn_unused_result))
1413
1472
error_t raise_privileges_permanently(void){
1414
1473
error_t old_errno = errno;
1415
1474
error_t ret_errno = raise_privileges();
1449
1510
return ret_errno;
1452
bool run_network_hooks(const char *mode, const char *interface,
1513
__attribute__((nonnull))
1514
void run_network_hooks(const char *mode, const char *interface,
1453
1515
const float delay){
1454
1516
struct dirent **direntries;
1455
struct dirent *direntry;
1457
1517
int numhooks = scandir(hookdir, &direntries, runnable_hook,
1459
1519
if(numhooks == -1){
1483
1545
if(hook_pid == 0){
1485
1547
/* Raise privileges */
1486
raise_privileges_permanently();
1548
if(raise_privileges_permanently() != 0){
1549
perror_plus("Failed to raise privileges");
1487
1552
/* Set group */
1489
1554
ret = setgid(0);
1491
1556
perror_plus("setgid");
1493
1559
/* Reset supplementary groups */
1495
1561
ret = setgroups(0, NULL);
1497
1563
perror_plus("setgroups");
1499
dup2(devnull, STDIN_FILENO);
1501
dup2(STDERR_FILENO, STDOUT_FILENO);
1566
ret = dup2(devnull, STDIN_FILENO);
1568
perror_plus("dup2(devnull, STDIN_FILENO)");
1571
ret = close(devnull);
1573
perror_plus("close");
1576
ret = dup2(STDERR_FILENO, STDOUT_FILENO);
1578
perror_plus("dup2(STDERR_FILENO, STDOUT_FILENO)");
1502
1581
ret = setenv("MANDOSNETHOOKDIR", hookdir, 1);
1504
1583
perror_plus("setenv");
1580
1659
close(devnull);
1663
__attribute__((nonnull, warn_unused_result))
1585
1664
error_t bring_up_interface(const char *const interface,
1586
1665
const float delay){
1588
1666
error_t old_errno = errno;
1589
error_t ret_errno = 0;
1590
int ret, ret_setflags;
1591
1668
struct ifreq network;
1592
1669
unsigned int if_index = if_nametoindex(interface);
1593
1670
if(if_index == 0){
1604
1681
if(not interface_is_up(interface)){
1605
if(not get_flags(interface, &network) and debug){
1682
error_t ret_errno = 0, ioctl_errno = 0;
1683
if(not get_flags(interface, &network)){
1606
1684
ret_errno = errno;
1607
1685
fprintf_plus(stderr, "Failed to get flags for interface "
1608
1686
"\"%s\"\n", interface);
1609
1688
return ret_errno;
1611
network.ifr_flags |= IFF_UP;
1690
network.ifr_flags |= IFF_UP; /* set flag */
1613
sd = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);
1692
int sd = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);
1615
1694
ret_errno = errno;
1616
1695
perror_plus("socket");
1617
1696
errno = old_errno;
1618
1697
return ret_errno;
1701
ret = (int)TEMP_FAILURE_RETRY(close(sd));
1703
perror_plus("close");
1623
1705
errno = old_errno;
1632
/* Raise priviliges */
1714
/* Raise privileges */
1715
ret_errno = raise_privileges();
1716
bool restore_loglevel = false;
1718
perror_plus("Failed to raise privileges");
1635
1720
#ifdef __linux__
1636
/* Lower kernel loglevel to KERN_NOTICE to avoid KERN_INFO
1637
messages about the network interface to mess up the prompt */
1638
int ret_linux = klogctl(8, NULL, 5);
1639
bool restore_loglevel = true;
1640
if(ret_linux == -1){
1641
restore_loglevel = false;
1642
perror_plus("klogctl");
1723
/* Lower kernel loglevel to KERN_NOTICE to avoid KERN_INFO
1724
messages about the network interface to mess up the prompt */
1725
ret_linux = klogctl(8, NULL, 5);
1726
if(ret_linux == -1){
1727
perror_plus("klogctl");
1729
restore_loglevel = true;
1644
1732
#endif /* __linux__ */
1645
ret_setflags = ioctl(sd, SIOCSIFFLAGS, &network);
1733
int ret_setflags = ioctl(sd, SIOCSIFFLAGS, &network);
1734
ioctl_errno = errno;
1647
1735
#ifdef __linux__
1648
1736
if(restore_loglevel){
1649
1737
ret_linux = klogctl(7, NULL, 0);
1788
__attribute__((nonnull, warn_unused_result))
1693
1789
error_t take_down_interface(const char *const interface){
1695
1790
error_t old_errno = errno;
1696
error_t ret_errno = 0;
1697
int ret, ret_setflags;
1698
1791
struct ifreq network;
1699
1792
unsigned int if_index = if_nametoindex(interface);
1700
1793
if(if_index == 0){
1705
1798
if(interface_is_up(interface)){
1799
error_t ret_errno = 0, ioctl_errno = 0;
1706
1800
if(not get_flags(interface, &network) and debug){
1707
1801
ret_errno = errno;
1708
1802
fprintf_plus(stderr, "Failed to get flags for interface "
1709
1803
"\"%s\"\n", interface);
1710
1805
return ret_errno;
1712
1807
network.ifr_flags &= ~(short)IFF_UP; /* clear flag */
1714
sd = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);
1809
int sd = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);
1716
1811
ret_errno = errno;
1717
1812
perror_plus("socket");
1718
1813
errno = old_errno;
1727
/* Raise priviliges */
1730
ret_setflags = ioctl(sd, SIOCSIFFLAGS, &network);
1733
/* Lower privileges */
1822
/* Raise privileges */
1823
ret_errno = raise_privileges();
1825
perror_plus("Failed to raise privileges");
1827
int ret_setflags = ioctl(sd, SIOCSIFFLAGS, &network);
1828
ioctl_errno = errno;
1830
/* If raise_privileges() succeeded above */
1832
/* Lower privileges */
1833
ret_errno = lower_privileges();
1836
perror_plus("Failed to lower privileges");
1736
1840
/* Close the socket */
1737
ret = (int)TEMP_FAILURE_RETRY(close(sd));
1841
int ret = (int)TEMP_FAILURE_RETRY(close(sd));
1739
1843
perror_plus("close");
1742
1846
if(ret_setflags == -1){
1847
errno = ioctl_errno;
1744
1848
perror_plus("ioctl SIOCSIFFLAGS -IFF_UP");
1745
1849
errno = old_errno;
1748
1852
} else if(debug){
1749
1853
fprintf_plus(stderr, "Interface \"%s\" is already down; odd\n",
1757
1861
int main(int argc, char *argv[]){
1758
1862
mandos_context mc = { .server = NULL, .dh_bits = 1024,
1759
1863
.priority = "SECURE256:!CTYPE-X.509:"
1760
"+CTYPE-OPENPGP", .current_server = NULL,
1864
"+CTYPE-OPENPGP", .current_server = NULL,
1761
1865
.interfaces = NULL, .interfaces_size = 0 };
1762
1866
AvahiSServiceBrowser *sb = NULL;
1763
1867
error_t ret_errno;
1773
1877
const char *seckey = PATHDIR "/" SECKEY;
1774
1878
const char *pubkey = PATHDIR "/" PUBKEY;
1775
1879
char *interfaces_hooks = NULL;
1776
size_t interfaces_hooks_size = 0;
1778
1881
bool gnutls_initialized = false;
1779
1882
bool gpgme_initialized = false;
1957
2060
/* Work around Debian bug #633582:
1958
2061
<http://bugs.debian.org/633582> */
1960
/* Re-raise priviliges */
1961
if(raise_privileges() == 0){
2063
/* Re-raise privileges */
2064
ret_errno = raise_privileges();
2067
perror_plus("Failed to raise privileges");
1962
2069
struct stat st;
1964
2071
if(strcmp(seckey, PATHDIR "/" SECKEY) == 0){
2006
2113
/* Lower privileges */
2010
perror_plus("seteuid");
2114
ret_errno = lower_privileges();
2117
perror_plus("Failed to lower privileges");
2015
/* Remove empty interface names */
2122
/* Remove invalid interface names (except "none") */
2017
2124
char *interface = NULL;
2018
2125
while((interface = argz_next(mc.interfaces, mc.interfaces_size,
2020
if(if_nametoindex(interface) == 0){
2021
if(interface[0] != '\0' and strcmp(interface, "none") != 0){
2127
if(strcmp(interface, "none") != 0
2128
and if_nametoindex(interface) == 0){
2129
if(interface[0] != '\0'){
2022
2130
fprintf_plus(stderr, "Not using nonexisting interface"
2023
2131
" \"%s\"\n", interface);
2040
2147
memcpy(interfaces_hooks, mc.interfaces, mc.interfaces_size);
2041
interfaces_hooks_size = mc.interfaces_size;
2042
argz_stringify(interfaces_hooks, interfaces_hooks_size,
2045
if(not run_network_hooks("start", interfaces_hooks != NULL ?
2046
interfaces_hooks : "", delay)){
2148
argz_stringify(interfaces_hooks, mc.interfaces_size, (int)',');
2150
run_network_hooks("start", interfaces_hooks != NULL ?
2151
interfaces_hooks : "", delay);
2263
/* Bring up interfaces which are down, and remove any "none"s */
2265
char *interface = NULL;
2266
while((interface = argz_next(mc.interfaces, mc.interfaces_size,
2268
/* If interface name is "none", stop bringing up interfaces.
2269
Also remove all instances of "none" from the list */
2270
if(strcmp(interface, "none") == 0){
2271
argz_delete(&mc.interfaces, &mc.interfaces_size,
2274
while((interface = argz_next(mc.interfaces,
2275
mc.interfaces_size, interface))){
2276
if(strcmp(interface, "none") == 0){
2277
argz_delete(&mc.interfaces, &mc.interfaces_size,
2284
bool interface_was_up = interface_is_up(interface);
2285
errno = bring_up_interface(interface, delay);
2286
if(not interface_was_up){
2288
perror_plus("Failed to bring up interface");
2290
errno = argz_add(&interfaces_to_take_down,
2291
&interfaces_to_take_down_size,
2294
perror_plus("argz_add");
2299
if(debug and (interfaces_to_take_down == NULL)){
2300
fprintf_plus(stderr, "No interfaces were brought up\n");
2159
2304
/* If we only got one interface, explicitly use only that one */
2160
2305
if(argz_count(mc.interfaces, mc.interfaces_size) == 1){
2165
2310
if_index = (AvahiIfIndex)if_nametoindex(mc.interfaces);
2168
/* Bring up interfaces which are down */
2169
if(not (argz_count(mc.interfaces, mc.interfaces_size) == 1
2170
and strcmp(mc.interfaces, "none") == 0)){
2171
char *interface = NULL;
2172
while((interface = argz_next(mc.interfaces, mc.interfaces_size,
2174
bool interface_was_up = interface_is_up(interface);
2175
ret = bring_up_interface(interface, delay);
2176
if(not interface_was_up){
2179
perror_plus("Failed to bring up interface");
2181
ret_errno = argz_add(&interfaces_to_take_down,
2182
&interfaces_to_take_down_size,
2187
free(mc.interfaces);
2188
mc.interfaces = NULL;
2189
mc.interfaces_size = 0;
2190
if(debug and (interfaces_to_take_down == NULL)){
2191
fprintf_plus(stderr, "No interfaces were brought up\n");
2403
/* Re-raise priviliges */
2523
/* Re-raise privileges */
2407
/* Run network hooks */
2408
run_network_hooks("stop", interfaces_hooks != NULL ?
2409
interfaces_hooks : "", delay);
2411
/* Take down the network interfaces which were brought up */
2413
char *interface = NULL;
2414
while((interface=argz_next(interfaces_to_take_down,
2415
interfaces_to_take_down_size,
2417
ret_errno = take_down_interface(interface);
2420
perror_plus("Failed to take down interface");
2423
if(debug and (interfaces_to_take_down == NULL)){
2424
fprintf_plus(stderr, "No interfaces needed to be taken"
2429
lower_privileges_permanently();
2525
ret_errno = raise_privileges();
2527
perror_plus("Failed to raise privileges");
2530
/* Run network hooks */
2531
run_network_hooks("stop", interfaces_hooks != NULL ?
2532
interfaces_hooks : "", delay);
2534
/* Take down the network interfaces which were brought up */
2536
char *interface = NULL;
2537
while((interface=argz_next(interfaces_to_take_down,
2538
interfaces_to_take_down_size,
2540
ret_errno = take_down_interface(interface);
2543
perror_plus("Failed to take down interface");
2546
if(debug and (interfaces_to_take_down == NULL)){
2547
fprintf_plus(stderr, "No interfaces needed to be taken"
2552
ret_errno = lower_privileges_permanently();
2554
perror_plus("Failed to lower privileges permanently");
2432
2558
free(interfaces_to_take_down);
2438
2564
struct dirent *direntry = NULL;
2439
2565
int numentries = scandir(tempdir, &direntries, notdotentries,
2441
if (numentries > 0){
2442
2568
for(int i = 0; i < numentries; i++){
2443
2569
direntry = direntries[i];
2444
2570
char *fullname = NULL;