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() */
60
59
#include <fcntl.h> /* open() */
61
60
#include <dirent.h> /* opendir(), struct dirent, readdir()
74
73
#include <unistd.h> /* close(), SEEK_SET, off_t, write(),
75
74
getuid(), getgid(), seteuid(),
76
75
setgid(), pause(), _exit() */
77
#include <arpa/inet.h> /* inet_pton(), htons() */
76
#include <arpa/inet.h> /* inet_pton(), htons, inet_ntop() */
78
77
#include <iso646.h> /* not, or, and */
79
78
#include <argp.h> /* struct argp_option, error_t, struct
80
79
argp_state, struct argp,
92
91
argz_delete(), argz_append(),
93
92
argz_stringify(), argz_add(),
95
#include <netdb.h> /* getnameinfo(), NI_NUMERICHOST,
96
EAI_SYSTEM, gai_strerror() */
99
96
#include <sys/klog.h> /* klogctl() */
183
180
perror(print_text);
186
__attribute__((format (gnu_printf, 2, 3), nonnull))
183
__attribute__((format (gnu_printf, 2, 3)))
187
184
int fprintf_plus(FILE *stream, const char *format, ...){
189
186
va_start (ap, format);
198
195
* bytes. "buffer_capacity" is how much is currently allocated,
199
196
* "buffer_length" is how much is already used.
201
__attribute__((nonnull, warn_unused_result))
202
198
size_t incbuffer(char **buffer, size_t buffer_length,
203
199
size_t buffer_capacity){
204
200
if(buffer_length + BUFFER_SIZE > buffer_capacity){
205
char *new_buf = realloc(*buffer, buffer_capacity + BUFFER_SIZE);
207
int old_errno = errno;
201
*buffer = realloc(*buffer, buffer_capacity + BUFFER_SIZE);
214
205
buffer_capacity += BUFFER_SIZE;
216
207
return buffer_capacity;
219
210
/* Add server to set of servers to retry periodically */
220
__attribute__((nonnull, warn_unused_result))
221
211
bool add_server(const char *ip, in_port_t port, AvahiIfIndex if_index,
222
212
int af, server **current_server){
234
224
perror_plus("strdup");
237
ret = clock_gettime(CLOCK_MONOTONIC, &(new_server->last_seen));
239
perror_plus("clock_gettime");
242
227
/* Special case of first server */
243
228
if(*current_server == NULL){
244
229
new_server->next = new_server;
245
230
new_server->prev = new_server;
246
231
*current_server = new_server;
232
/* Place the new server last in the list */
248
/* Place the new server last in the list */
249
234
new_server->next = *current_server;
250
235
new_server->prev = (*current_server)->prev;
251
236
new_server->prev->next = new_server;
252
237
(*current_server)->prev = new_server;
239
ret = clock_gettime(CLOCK_MONOTONIC, &(*current_server)->last_seen);
241
perror_plus("clock_gettime");
258
248
* Initialize GPGME.
260
__attribute__((nonnull, warn_unused_result))
261
250
static bool init_gpgme(const char *seckey, const char *pubkey,
262
251
const char *tempdir, mandos_context *mc){
263
252
gpgme_error_t rc;
490
477
/* GnuTLS log function callback */
491
__attribute__((nonnull))
492
478
static void debuggnutls(__attribute__((unused)) int level,
493
479
const char* string){
494
480
fprintf_plus(stderr, "GnuTLS: %s", string);
497
__attribute__((nonnull, warn_unused_result))
498
483
static int init_gnutls_global(const char *pubkeyfilename,
499
484
const char *seckeyfilename,
500
485
mandos_context *mc){
637
621
__attribute__((unused)) const char *txt){}
639
623
/* Called when a Mandos server is found */
640
__attribute__((nonnull, warn_unused_result))
641
624
static int start_mandos_communication(const char *ip, in_port_t port,
642
625
AvahiIfIndex if_index,
643
626
int af, mandos_context *mc){
644
627
int ret, tcp_sd = -1;
646
struct sockaddr_storage to;
630
struct sockaddr_in in;
631
struct sockaddr_in6 in6;
647
633
char *buffer = NULL;
648
634
char *decrypted_buffer = NULL;
649
635
size_t buffer_length = 0;
731
717
memset(&to, 0, sizeof(to));
732
718
if(af == AF_INET6){
733
((struct sockaddr_in6 *)&to)->sin6_family = (sa_family_t)af;
734
ret = inet_pton(af, ip, &((struct sockaddr_in6 *)&to)->sin6_addr);
719
to.in6.sin6_family = (sa_family_t)af;
720
ret = inet_pton(af, ip, &to.in6.sin6_addr);
735
721
} else { /* IPv4 */
736
((struct sockaddr_in *)&to)->sin_family = (sa_family_t)af;
737
ret = inet_pton(af, ip, &((struct sockaddr_in *)&to)->sin_addr);
722
to.in.sin_family = (sa_family_t)af;
723
ret = inet_pton(af, ip, &to.in.sin_addr);
751
737
if(af == AF_INET6){
752
((struct sockaddr_in6 *)&to)->sin6_port = htons(port);
753
if(IN6_IS_ADDR_LINKLOCAL
754
(&((struct sockaddr_in6 *)&to)->sin6_addr)){
738
to.in6.sin6_port = htons(port);
740
#pragma GCC diagnostic push
741
#pragma GCC diagnostic ignored "-Wstrict-aliasing"
743
if(IN6_IS_ADDR_LINKLOCAL /* Spurious warnings from */
744
(&to.in6.sin6_addr)){ /* -Wstrict-aliasing=2 or lower */
746
#pragma GCC diagnostic pop
755
748
if(if_index == AVAHI_IF_UNSPEC){
756
749
fprintf_plus(stderr, "An IPv6 link-local address is"
757
750
" incomplete without a network interface\n");
761
754
/* Set the network interface number as scope */
762
((struct sockaddr_in6 *)&to)->sin6_scope_id = (uint32_t)if_index;
755
to.in6.sin6_scope_id = (uint32_t)if_index;
765
((struct sockaddr_in *)&to)->sin_port = htons(port);
758
to.in.sin_port = htons(port);
786
779
char addrstr[(INET_ADDRSTRLEN > INET6_ADDRSTRLEN) ?
787
780
INET_ADDRSTRLEN : INET6_ADDRSTRLEN] = "";
788
782
if(af == AF_INET6){
789
ret = getnameinfo((struct sockaddr *)&to,
790
sizeof(struct sockaddr_in6),
791
addrstr, sizeof(addrstr), NULL, 0,
783
pcret = inet_ntop(af, &(to.in6.sin6_addr), addrstr,
794
ret = getnameinfo((struct sockaddr *)&to,
795
sizeof(struct sockaddr_in),
796
addrstr, sizeof(addrstr), NULL, 0,
786
pcret = inet_ntop(af, &(to.in.sin_addr), 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);
790
perror_plus("inet_ntop");
792
if(strcmp(addrstr, ip) != 0){
793
fprintf_plus(stderr, "Canonical address form: %s\n", addrstr);
813
803
if(af == AF_INET6){
814
ret = connect(tcp_sd, (struct sockaddr *)&to,
815
sizeof(struct sockaddr_in6));
804
ret = connect(tcp_sd, &to.in6, sizeof(to));
817
ret = connect(tcp_sd, (struct sockaddr *)&to, /* IPv4 */
818
sizeof(struct sockaddr_in));
806
ret = connect(tcp_sd, &to.in, sizeof(to)); /* IPv4 */
821
if((errno != ECONNREFUSED and errno != ENETUNREACH) or debug){
809
if ((errno != ECONNREFUSED and errno != ENETUNREACH) or debug){
823
811
perror_plus("connect");
1251
1236
* corresponds to an acceptable network device.
1252
1237
* (This function is passed to scandir(3) as a filter function.)
1254
__attribute__((nonnull, warn_unused_result))
1255
1239
int good_interface(const struct dirent *if_entry){
1256
1240
if(if_entry->d_name[0] == '.'){
1276
1260
* This function determines if a network interface is up.
1278
__attribute__((nonnull, warn_unused_result))
1279
1262
bool interface_is_up(const char *interface){
1280
1263
struct ifreq ifr;
1281
1264
if(not get_flags(interface, &ifr)){
1293
1276
* This function determines if a network interface is running
1295
__attribute__((nonnull, warn_unused_result))
1296
1278
bool interface_is_running(const char *interface){
1297
1279
struct ifreq ifr;
1298
1280
if(not get_flags(interface, &ifr)){
1306
1288
return (bool)(ifr.ifr_flags & IFF_RUNNING);
1309
__attribute__((nonnull, pure, warn_unused_result))
1310
1291
int notdotentries(const struct dirent *direntry){
1311
1292
/* Skip "." and ".." */
1312
1293
if(direntry->d_name[0] == '.'
1392
1371
if(mc->current_server == NULL){
1394
1373
fprintf_plus(stderr, "Wait until first server is found."
1395
1374
" No timeout!\n");
1397
1376
ret = avahi_simple_poll_iterate(s, -1);
1400
1379
fprintf_plus(stderr, "Check current_server if we should run"
1401
1380
" it, or wait\n");
1447
1426
ret = avahi_simple_poll_iterate(s, (int)block_time);
1450
if(ret > 0 or errno != EINTR){
1429
if (ret > 0 or errno != EINTR){
1451
1430
return (ret != 1) ? ret : 0;
1457
1436
/* Set effective uid to 0, return errno */
1458
__attribute__((warn_unused_result))
1459
1437
error_t raise_privileges(void){
1460
1438
error_t old_errno = errno;
1461
1439
error_t ret_errno = 0;
1470
1448
/* Set effective and real user ID to 0. Return errno. */
1471
__attribute__((warn_unused_result))
1472
1449
error_t raise_privileges_permanently(void){
1473
1450
error_t old_errno = errno;
1474
1451
error_t ret_errno = raise_privileges();
1510
1485
return ret_errno;
1513
__attribute__((nonnull))
1514
void run_network_hooks(const char *mode, const char *interface,
1488
bool run_network_hooks(const char *mode, const char *interface,
1515
1489
const float delay){
1516
1490
struct dirent **direntries;
1491
struct dirent *direntry;
1517
1493
int numhooks = scandir(hookdir, &direntries, runnable_hook,
1519
1495
if(numhooks == -1){
1545
1519
if(hook_pid == 0){
1547
1521
/* Raise privileges */
1548
if(raise_privileges_permanently() != 0){
1549
perror_plus("Failed to raise privileges");
1522
raise_privileges_permanently();
1552
1523
/* Set group */
1554
1525
ret = setgid(0);
1556
1527
perror_plus("setgid");
1559
1529
/* Reset supplementary groups */
1561
1531
ret = setgroups(0, NULL);
1563
1533
perror_plus("setgroups");
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)");
1535
dup2(devnull, STDIN_FILENO);
1537
dup2(STDERR_FILENO, STDOUT_FILENO);
1581
1538
ret = setenv("MANDOSNETHOOKDIR", hookdir, 1);
1583
1540
perror_plus("setenv");
1659
1616
close(devnull);
1663
__attribute__((nonnull, warn_unused_result))
1664
1621
error_t bring_up_interface(const char *const interface,
1665
1622
const float delay){
1666
1624
error_t old_errno = errno;
1625
error_t ret_errno = 0;
1626
int ret, ret_setflags;
1668
1627
struct ifreq network;
1669
1628
unsigned int if_index = if_nametoindex(interface);
1670
1629
if(if_index == 0){
1681
1640
if(not interface_is_up(interface)){
1682
error_t ret_errno = 0, ioctl_errno = 0;
1683
if(not get_flags(interface, &network)){
1641
if(not get_flags(interface, &network) and debug){
1684
1642
ret_errno = errno;
1685
1643
fprintf_plus(stderr, "Failed to get flags for interface "
1686
1644
"\"%s\"\n", interface);
1688
1645
return ret_errno;
1690
network.ifr_flags |= IFF_UP; /* set flag */
1647
network.ifr_flags |= IFF_UP;
1692
int sd = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);
1649
sd = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);
1694
1651
ret_errno = errno;
1695
1652
perror_plus("socket");
1696
1653
errno = old_errno;
1697
1654
return ret_errno;
1701
ret = (int)TEMP_FAILURE_RETRY(close(sd));
1703
perror_plus("close");
1705
1659
errno = old_errno;
1714
/* Raise privileges */
1715
ret_errno = raise_privileges();
1716
bool restore_loglevel = false;
1718
perror_plus("Failed to raise privileges");
1668
/* Raise priviliges */
1720
1671
#ifdef __linux__
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;
1672
/* Lower kernel loglevel to KERN_NOTICE to avoid KERN_INFO
1673
messages about the network interface to mess up the prompt */
1674
int ret_linux = klogctl(8, NULL, 5);
1675
bool restore_loglevel = true;
1676
if(ret_linux == -1){
1677
restore_loglevel = false;
1678
perror_plus("klogctl");
1732
1680
#endif /* __linux__ */
1733
int ret_setflags = ioctl(sd, SIOCSIFFLAGS, &network);
1734
ioctl_errno = errno;
1681
ret_setflags = ioctl(sd, SIOCSIFFLAGS, &network);
1735
1683
#ifdef __linux__
1736
1684
if(restore_loglevel){
1737
1685
ret_linux = klogctl(7, NULL, 0);
1788
__attribute__((nonnull, warn_unused_result))
1789
1729
error_t take_down_interface(const char *const interface){
1790
1731
error_t old_errno = errno;
1732
error_t ret_errno = 0;
1733
int ret, ret_setflags;
1791
1734
struct ifreq network;
1792
1735
unsigned int if_index = if_nametoindex(interface);
1793
1736
if(if_index == 0){
1798
1741
if(interface_is_up(interface)){
1799
error_t ret_errno = 0, ioctl_errno = 0;
1800
1742
if(not get_flags(interface, &network) and debug){
1801
1743
ret_errno = errno;
1802
1744
fprintf_plus(stderr, "Failed to get flags for interface "
1803
1745
"\"%s\"\n", interface);
1805
1746
return ret_errno;
1807
1748
network.ifr_flags &= ~(short)IFF_UP; /* clear flag */
1809
int sd = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);
1750
sd = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);
1811
1752
ret_errno = errno;
1812
1753
perror_plus("socket");
1813
1754
errno = old_errno;
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");
1763
/* Raise priviliges */
1766
ret_setflags = ioctl(sd, SIOCSIFFLAGS, &network);
1769
/* Lower privileges */
1840
1772
/* Close the socket */
1841
int ret = (int)TEMP_FAILURE_RETRY(close(sd));
1773
ret = (int)TEMP_FAILURE_RETRY(close(sd));
1843
1775
perror_plus("close");
1846
1778
if(ret_setflags == -1){
1847
errno = ioctl_errno;
1848
1780
perror_plus("ioctl SIOCSIFFLAGS -IFF_UP");
1849
1781
errno = old_errno;
1852
1784
} else if(debug){
1853
1785
fprintf_plus(stderr, "Interface \"%s\" is already down; odd\n",
1861
1793
int main(int argc, char *argv[]){
1862
1794
mandos_context mc = { .server = NULL, .dh_bits = 1024,
1863
1795
.priority = "SECURE256:!CTYPE-X.509:"
1864
"+CTYPE-OPENPGP", .current_server = NULL,
1796
"+CTYPE-OPENPGP", .current_server = NULL,
1865
1797
.interfaces = NULL, .interfaces_size = 0 };
1866
1798
AvahiSServiceBrowser *sb = NULL;
1867
1799
error_t ret_errno;
1877
1809
const char *seckey = PATHDIR "/" SECKEY;
1878
1810
const char *pubkey = PATHDIR "/" PUBKEY;
1879
1811
char *interfaces_hooks = NULL;
1812
size_t interfaces_hooks_size = 0;
1881
1814
bool gnutls_initialized = false;
1882
1815
bool gpgme_initialized = false;
2060
1993
/* Work around Debian bug #633582:
2061
1994
<http://bugs.debian.org/633582> */
2063
/* Re-raise privileges */
2064
ret_errno = raise_privileges();
2067
perror_plus("Failed to raise privileges");
1996
/* Re-raise priviliges */
1997
if(raise_privileges() == 0){
2069
1998
struct stat st;
2071
2000
if(strcmp(seckey, PATHDIR "/" SECKEY) == 0){
2147
2072
memcpy(interfaces_hooks, mc.interfaces, mc.interfaces_size);
2148
argz_stringify(interfaces_hooks, mc.interfaces_size, (int)',');
2150
run_network_hooks("start", interfaces_hooks != NULL ?
2151
interfaces_hooks : "", delay);
2073
interfaces_hooks_size = mc.interfaces_size;
2074
argz_stringify(interfaces_hooks, interfaces_hooks_size,
2077
if(not run_network_hooks("start", interfaces_hooks != NULL ?
2078
interfaces_hooks : "", delay)){
2284
2212
bool interface_was_up = interface_is_up(interface);
2285
errno = bring_up_interface(interface, delay);
2213
ret = bring_up_interface(interface, delay);
2286
2214
if(not interface_was_up){
2288
2217
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");
2219
ret_errno = argz_add(&interfaces_to_take_down,
2220
&interfaces_to_take_down_size,
2523
/* Re-raise privileges */
2449
/* Re-raise priviliges */
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");
2453
/* Run network hooks */
2454
run_network_hooks("stop", interfaces_hooks != NULL ?
2455
interfaces_hooks : "", delay);
2457
/* Take down the network interfaces which were brought up */
2459
char *interface = NULL;
2460
while((interface=argz_next(interfaces_to_take_down,
2461
interfaces_to_take_down_size,
2463
ret_errno = take_down_interface(interface);
2466
perror_plus("Failed to take down interface");
2469
if(debug and (interfaces_to_take_down == NULL)){
2470
fprintf_plus(stderr, "No interfaces needed to be taken"
2475
lower_privileges_permanently();
2558
2478
free(interfaces_to_take_down);
2564
2484
struct dirent *direntry = NULL;
2565
2485
int numentries = scandir(tempdir, &direntries, notdotentries,
2487
if (numentries > 0){
2568
2488
for(int i = 0; i < numentries; i++){
2569
2489
direntry = direntries[i];
2570
2490
char *fullname = NULL;