157
161
const char *priority;
159
163
server *current_server;
165
size_t interfaces_size;
160
166
} mandos_context;
162
/* global context so signal handler can reach it*/
163
mandos_context mc = { .simple_poll = NULL, .server = NULL,
164
.dh_bits = 1024, .priority = "SECURE256"
165
":!CTYPE-X.509:+CTYPE-OPENPGP",
166
.current_server = NULL };
168
/* global so signal handler can reach it*/
169
AvahiSimplePoll *simple_poll;
168
171
sig_atomic_t quit_now = 0;
169
172
int signal_received = 0;
171
174
/* Function to use when printing errors */
172
175
void perror_plus(const char *print_text){
173
177
fprintf(stderr, "Mandos plugin %s: ",
174
178
program_invocation_short_name);
175
180
perror(print_text);
183
__attribute__((format (gnu_printf, 2, 3)))
178
184
int fprintf_plus(FILE *stream, const char *format, ...){
180
186
va_start (ap, format);
182
188
TEMP_FAILURE_RETRY(fprintf(stream, "Mandos plugin %s: ",
183
189
program_invocation_short_name));
184
return TEMP_FAILURE_RETRY(vfprintf(stream, format, ap));
190
return (int)TEMP_FAILURE_RETRY(vfprintf(stream, format, ap));
221
227
/* Special case of first server */
222
if (mc.current_server == NULL){
228
if(*current_server == NULL){
223
229
new_server->next = new_server;
224
230
new_server->prev = new_server;
225
mc.current_server = new_server;
231
*current_server = new_server;
226
232
/* Place the new server last in the list */
228
new_server->next = mc.current_server;
229
new_server->prev = mc.current_server->prev;
234
new_server->next = *current_server;
235
new_server->prev = (*current_server)->prev;
230
236
new_server->prev->next = new_server;
231
mc.current_server->prev = new_server;
237
(*current_server)->prev = new_server;
233
ret = clock_gettime(CLOCK_MONOTONIC, &mc.current_server->last_seen);
239
ret = clock_gettime(CLOCK_MONOTONIC, &(*current_server)->last_seen);
235
241
perror_plus("clock_gettime");
529
535
/* GnuTLS server initialization */
530
ret = gnutls_dh_params_init(&mc.dh_params);
536
ret = gnutls_dh_params_init(&mc->dh_params);
531
537
if(ret != GNUTLS_E_SUCCESS){
532
538
fprintf_plus(stderr, "Error in GnuTLS DH parameter"
533
539
" initialization: %s\n",
534
540
safer_gnutls_strerror(ret));
537
ret = gnutls_dh_params_generate2(mc.dh_params, mc.dh_bits);
543
ret = gnutls_dh_params_generate2(mc->dh_params, mc->dh_bits);
538
544
if(ret != GNUTLS_E_SUCCESS){
539
545
fprintf_plus(stderr, "Error in GnuTLS prime generation: %s\n",
540
546
safer_gnutls_strerror(ret));
544
gnutls_certificate_set_dh_params(mc.cred, mc.dh_params);
550
gnutls_certificate_set_dh_params(mc->cred, mc->dh_params);
550
gnutls_certificate_free_credentials(mc.cred);
556
gnutls_certificate_free_credentials(mc->cred);
551
557
gnutls_global_deinit();
552
gnutls_dh_params_deinit(mc.dh_params);
558
gnutls_dh_params_deinit(mc->dh_params);
556
static int init_gnutls_session(gnutls_session_t *session){
562
static int init_gnutls_session(gnutls_session_t *session,
558
565
/* GnuTLS session creation */
655
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);
661
700
fprintf_plus(stderr, "Setting up a TCP connection to %s, port %"
662
PRIu16 "\n", ip, port);
701
PRIuMAX "\n", ip, (uintmax_t)port);
665
704
tcp_sd = socket(pf, SOCK_STREAM, 0);
729
765
if(if_indextoname((unsigned int)if_index, interface) == NULL){
730
766
perror_plus("if_indextoname");
732
fprintf_plus(stderr, "Connection to: %s%%%s, port %" PRIu16
733
"\n", ip, interface, port);
768
fprintf_plus(stderr, "Connection to: %s%%%s, port %" PRIuMAX
769
"\n", ip, interface, (uintmax_t)port);
736
fprintf_plus(stderr, "Connection to: %s, port %" PRIu16 "\n",
772
fprintf_plus(stderr, "Connection to: %s, port %" PRIuMAX "\n",
773
ip, (uintmax_t)port);
739
775
char addrstr[(INET_ADDRSTRLEN > INET6_ADDRSTRLEN) ?
740
776
INET_ADDRSTRLEN : INET6_ADDRSTRLEN] = "";
1025
1067
PRIdMAX ") on port %" PRIu16 "\n", name,
1026
1068
host_name, ip, (intmax_t)interface, port);
1028
int ret = start_mandos_communication(ip, port, interface,
1029
avahi_proto_to_af(proto));
1070
int ret = start_mandos_communication(ip, (in_port_t)port,
1072
avahi_proto_to_af(proto),
1031
avahi_simple_poll_quit(mc.simple_poll);
1075
avahi_simple_poll_quit(simple_poll);
1033
if(not add_server(ip, port, interface,
1034
avahi_proto_to_af(proto))){
1077
if(not add_server(ip, (in_port_t)port, interface,
1078
avahi_proto_to_af(proto),
1079
&((mandos_context*)mc)->current_server)){
1035
1080
fprintf_plus(stderr, "Failed to add server \"%s\" to server"
1036
1081
" list\n", name);
1075
1123
the callback function is called the Avahi server will free the
1076
1124
resolver for us. */
1078
if(avahi_s_service_resolver_new(mc.server, interface, protocol,
1079
name, type, domain, protocol, 0,
1080
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)
1081
1130
fprintf_plus(stderr, "Avahi: Failed to resolve service '%s':"
1083
avahi_strerror(avahi_server_errno(mc.server)));
1132
avahi_strerror(avahi_server_errno
1133
(((mandos_context*)mc)->server)));
1086
1136
case AVAHI_BROWSER_REMOVE:
1201
* This function determines if a directory entry in /sys/class/net
1202
* corresponds to an acceptable network device which is up.
1203
* (This function is passed to scandir(3) as a filter function.)
1205
int up_interface(const struct dirent *if_entry){
1206
if(if_entry->d_name[0] == '.'){
1211
if(not get_flags(if_entry->d_name, &ifr)){
1213
fprintf_plus(stderr, "Failed to get flags for interface "
1214
"\"%s\"\n", if_entry->d_name);
1219
/* Reject down interfaces */
1220
if(not (ifr.ifr_flags & IFF_UP)){
1222
fprintf_plus(stderr, "Rejecting down interface \"%s\"\n",
1228
/* Reject non-running interfaces */
1229
if(not (ifr.ifr_flags & IFF_RUNNING)){
1231
fprintf_plus(stderr, "Rejecting non-running interface \"%s\"\n",
1237
if(not good_flags(if_entry->d_name, &ifr)){
1256
* This function determines if a network interface is up.
1258
bool interface_is_up(const char *interface){
1260
if(not get_flags(interface, &ifr)){
1262
fprintf_plus(stderr, "Failed to get flags for interface "
1263
"\"%s\"\n", interface);
1268
return (bool)(ifr.ifr_flags & IFF_UP);
1272
* This function determines if a network interface is running
1274
bool interface_is_running(const char *interface){
1276
if(not get_flags(interface, &ifr)){
1278
fprintf_plus(stderr, "Failed to get flags for interface "
1279
"\"%s\"\n", interface);
1284
return (bool)(ifr.ifr_flags & IFF_RUNNING);
1243
1287
int notdotentries(const struct dirent *direntry){
1357
1402
if(block_time <= 0){
1358
ret = start_mandos_communication(mc.current_server->ip,
1359
mc.current_server->port,
1360
mc.current_server->if_index,
1361
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);
1363
avahi_simple_poll_quit(mc.simple_poll);
1408
avahi_simple_poll_quit(s);
1366
1411
ret = clock_gettime(CLOCK_MONOTONIC,
1367
&mc.current_server->last_seen);
1412
&mc->current_server->last_seen);
1369
1414
perror_plus("clock_gettime");
1372
mc.current_server = mc.current_server->next;
1417
mc->current_server = mc->current_server->next;
1373
1418
block_time = 0; /* Call avahi to find new Mandos
1374
1419
servers, but don't block */
1617
error_t bring_up_interface(const char *const interface,
1620
error_t old_errno = errno;
1621
error_t ret_errno = 0;
1622
int ret, ret_setflags;
1623
struct ifreq network;
1624
unsigned int if_index = if_nametoindex(interface);
1626
fprintf_plus(stderr, "No such interface: \"%s\"\n", interface);
1636
if(not interface_is_up(interface)){
1637
if(not get_flags(interface, &network) and debug){
1639
fprintf_plus(stderr, "Failed to get flags for interface "
1640
"\"%s\"\n", interface);
1643
network.ifr_flags |= IFF_UP;
1645
sd = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);
1648
perror_plus("socket");
1660
fprintf_plus(stderr, "Bringing up interface \"%s\"\n",
1664
/* Raise priviliges */
1668
/* Lower kernel loglevel to KERN_NOTICE to avoid KERN_INFO
1669
messages about the network interface to mess up the prompt */
1670
int ret_linux = klogctl(8, NULL, 5);
1671
bool restore_loglevel = true;
1672
if(ret_linux == -1){
1673
restore_loglevel = false;
1674
perror_plus("klogctl");
1676
#endif /* __linux__ */
1677
ret_setflags = ioctl(sd, SIOCSIFFLAGS, &network);
1680
if(restore_loglevel){
1681
ret_linux = klogctl(7, NULL, 0);
1682
if(ret_linux == -1){
1683
perror_plus("klogctl");
1686
#endif /* __linux__ */
1688
/* Lower privileges */
1691
/* Close the socket */
1692
ret = (int)TEMP_FAILURE_RETRY(close(sd));
1694
perror_plus("close");
1697
if(ret_setflags == -1){
1699
perror_plus("ioctl SIOCSIFFLAGS +IFF_UP");
1704
fprintf_plus(stderr, "Interface \"%s\" is already up; good\n",
1708
/* Sleep checking until interface is running.
1709
Check every 0.25s, up to total time of delay */
1710
for(int i=0; i < delay * 4; i++){
1711
if(interface_is_running(interface)){
1714
struct timespec sleeptime = { .tv_nsec = 250000000 };
1715
ret = nanosleep(&sleeptime, NULL);
1716
if(ret == -1 and errno != EINTR){
1717
perror_plus("nanosleep");
1725
error_t take_down_interface(const char *const interface){
1727
error_t old_errno = errno;
1728
error_t ret_errno = 0;
1729
int ret, ret_setflags;
1730
struct ifreq network;
1731
unsigned int if_index = if_nametoindex(interface);
1733
fprintf_plus(stderr, "No such interface: \"%s\"\n", interface);
1737
if(interface_is_up(interface)){
1738
if(not get_flags(interface, &network) and debug){
1740
fprintf_plus(stderr, "Failed to get flags for interface "
1741
"\"%s\"\n", interface);
1744
network.ifr_flags &= ~(short)IFF_UP; /* clear flag */
1746
sd = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);
1749
perror_plus("socket");
1755
fprintf_plus(stderr, "Taking down interface \"%s\"\n",
1759
/* Raise priviliges */
1762
ret_setflags = ioctl(sd, SIOCSIFFLAGS, &network);
1765
/* Lower privileges */
1768
/* Close the socket */
1769
ret = (int)TEMP_FAILURE_RETRY(close(sd));
1771
perror_plus("close");
1774
if(ret_setflags == -1){
1776
perror_plus("ioctl SIOCSIFFLAGS -IFF_UP");
1781
fprintf_plus(stderr, "Interface \"%s\" is already down; odd\n",
1514
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 };
1515
1794
AvahiSServiceBrowser *sb = NULL;
1518
1797
intmax_t tmpmax;
1520
1799
int exitcode = EXIT_SUCCESS;
1521
const char *interface = "";
1522
struct ifreq network;
1524
bool take_down_interface = false;
1800
char *interfaces_to_take_down = NULL;
1801
size_t interfaces_to_take_down_size = 0;
1527
1802
char tempdir[] = "/tmp/mandosXXXXXX";
1528
1803
bool tempdir_created = false;
1529
1804
AvahiIfIndex if_index = AVAHI_IF_UNSPEC;
1530
1805
const char *seckey = PATHDIR "/" SECKEY;
1531
1806
const char *pubkey = PATHDIR "/" PUBKEY;
1807
char *interfaces_hooks = NULL;
1808
size_t interfaces_hooks_size = 0;
1533
1810
bool gnutls_initialized = false;
1534
1811
bool gpgme_initialized = false;
1761
2038
/* Lower privileges */
1765
perror_plus("seteuid");
2043
/* Remove invalid interface names (except "none") */
2045
char *interface = NULL;
2046
while((interface = argz_next(mc.interfaces, mc.interfaces_size,
2048
if(strcmp(interface, "none") != 0
2049
and if_nametoindex(interface) == 0){
2050
if(interface[0] != '\0'){
2051
fprintf_plus(stderr, "Not using nonexisting interface"
2052
" \"%s\"\n", interface);
2054
argz_delete(&mc.interfaces, &mc.interfaces_size, interface);
1770
2060
/* Run network hooks */
1771
if(not run_network_hooks("start", interface, delay)){
2062
if(mc.interfaces != NULL){
2063
interfaces_hooks = malloc(mc.interfaces_size);
2064
if(interfaces_hooks == NULL){
2065
perror_plus("malloc");
2068
memcpy(interfaces_hooks, mc.interfaces, mc.interfaces_size);
2069
interfaces_hooks_size = mc.interfaces_size;
2070
argz_stringify(interfaces_hooks, interfaces_hooks_size,
2073
if(not run_network_hooks("start", interfaces_hooks != NULL ?
2074
interfaces_hooks : "", delay)){
1776
2080
avahi_set_log_function(empty_log);
1779
if(interface[0] == '\0'){
1780
struct dirent **direntries;
1781
/* First look for interfaces that are up */
1782
ret = scandir(sys_class_net, &direntries, up_interface,
1785
/* No up interfaces, look for any good interfaces */
1787
ret = scandir(sys_class_net, &direntries, good_interface,
1791
/* Pick the first interface returned */
1792
interface = strdup(direntries[0]->d_name);
1794
fprintf_plus(stderr, "Using interface \"%s\"\n", interface);
1796
if(interface == NULL){
1797
perror_plus("malloc");
1799
exitcode = EXIT_FAILURE;
1805
fprintf_plus(stderr, "Could not find a network interface\n");
1806
exitcode = EXIT_FAILURE;
1811
2083
/* Initialize Avahi early so avahi_simple_poll_quit() can be called
1812
2084
from the signal handler */
1813
2085
/* Initialize the pseudo-RNG for Avahi */
1814
2086
srand((unsigned int) time(NULL));
1815
mc.simple_poll = avahi_simple_poll_new();
1816
if(mc.simple_poll == NULL){
2087
simple_poll = avahi_simple_poll_new();
2088
if(simple_poll == NULL){
1817
2089
fprintf_plus(stderr,
1818
2090
"Avahi: Failed to create simple poll object.\n");
1819
2091
exitcode = EX_UNAVAILABLE;
1886
/* If the interface is down, bring it up */
1887
if(strcmp(interface, "none") != 0){
1888
if_index = (AvahiIfIndex) if_nametoindex(interface);
1890
fprintf_plus(stderr, "No such interface: \"%s\"\n", interface);
1891
exitcode = EX_UNAVAILABLE;
1899
/* Re-raise priviliges */
1903
perror_plus("seteuid");
1907
/* Lower kernel loglevel to KERN_NOTICE to avoid KERN_INFO
1908
messages about the network interface to mess up the prompt */
1909
ret = klogctl(8, NULL, 5);
1910
bool restore_loglevel = true;
1912
restore_loglevel = false;
1913
perror_plus("klogctl");
1915
#endif /* __linux__ */
1917
sd = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);
1919
perror_plus("socket");
1920
exitcode = EX_OSERR;
1922
if(restore_loglevel){
1923
ret = klogctl(7, NULL, 0);
1925
perror_plus("klogctl");
1928
#endif /* __linux__ */
1929
/* Lower privileges */
1933
perror_plus("seteuid");
1937
strcpy(network.ifr_name, interface);
1938
ret = ioctl(sd, SIOCGIFFLAGS, &network);
1940
perror_plus("ioctl SIOCGIFFLAGS");
1942
if(restore_loglevel){
1943
ret = klogctl(7, NULL, 0);
1945
perror_plus("klogctl");
1948
#endif /* __linux__ */
1949
exitcode = EX_OSERR;
1950
/* Lower privileges */
1954
perror_plus("seteuid");
1958
if((network.ifr_flags & IFF_UP) == 0){
1959
network.ifr_flags |= IFF_UP;
1960
take_down_interface = true;
1961
ret = ioctl(sd, SIOCSIFFLAGS, &network);
1963
take_down_interface = false;
1964
perror_plus("ioctl SIOCSIFFLAGS +IFF_UP");
1965
exitcode = EX_OSERR;
1967
if(restore_loglevel){
1968
ret = klogctl(7, NULL, 0);
1970
perror_plus("klogctl");
2158
/* If no interfaces were specified, make a list */
2159
if(mc.interfaces == NULL){
2160
struct dirent **direntries;
2161
/* Look for any good interfaces */
2162
ret = scandir(sys_class_net, &direntries, good_interface,
2165
/* Add all found interfaces to interfaces list */
2166
for(int i = 0; i < ret; ++i){
2167
ret_errno = argz_add(&mc.interfaces, &mc.interfaces_size,
2168
direntries[i]->d_name);
2170
perror_plus("argz_add");
2174
fprintf_plus(stderr, "Will use interface \"%s\"\n",
2175
direntries[i]->d_name);
2181
fprintf_plus(stderr, "Could not find a network interface\n");
2182
exitcode = EXIT_FAILURE;
2187
/* Bring up interfaces which are down, and remove any "none"s */
2189
char *interface = NULL;
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,
1973
#endif /* __linux__ */
1974
/* Lower privileges */
1978
perror_plus("seteuid");
1983
/* Sleep checking until interface is running.
1984
Check every 0.25s, up to total time of delay */
1985
for(int i=0; i < delay * 4; i++){
1986
ret = ioctl(sd, SIOCGIFFLAGS, &network);
1988
perror_plus("ioctl SIOCGIFFLAGS");
1989
} else if(network.ifr_flags & IFF_RUNNING){
1992
struct timespec sleeptime = { .tv_nsec = 250000000 };
1993
ret = nanosleep(&sleeptime, NULL);
1994
if(ret == -1 and errno != EINTR){
1995
perror_plus("nanosleep");
1998
if(not take_down_interface){
1999
/* We won't need the socket anymore */
2000
ret = (int)TEMP_FAILURE_RETRY(close(sd));
2002
perror_plus("close");
2006
if(restore_loglevel){
2007
/* Restores kernel loglevel to default */
2008
ret = klogctl(7, NULL, 0);
2010
perror_plus("klogctl");
2013
#endif /* __linux__ */
2014
/* Lower privileges */
2016
/* Lower privileges */
2019
perror_plus("seteuid");
2208
bool interface_was_up = interface_is_up(interface);
2209
ret = bring_up_interface(interface, delay);
2210
if(not interface_was_up){
2213
perror_plus("Failed to bring up interface");
2215
ret_errno = argz_add(&interfaces_to_take_down,
2216
&interfaces_to_take_down_size,
2221
if(debug and (interfaces_to_take_down == NULL)){
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);
2027
ret = init_gnutls_global(pubkey, seckey);
2239
ret = init_gnutls_global(pubkey, seckey, &mc);
2029
2241
fprintf_plus(stderr, "init_gnutls_global failed\n");
2030
2242
exitcode = EX_UNAVAILABLE;
2229
/* Run network hooks */
2230
run_network_hooks("stop", interface, delay);
2232
2445
/* Re-raise priviliges */
2237
perror_plus("seteuid");
2240
/* Take down the network interface */
2241
if(take_down_interface and geteuid() == 0){
2242
ret = ioctl(sd, SIOCGIFFLAGS, &network);
2244
perror_plus("ioctl SIOCGIFFLAGS");
2245
} else if(network.ifr_flags & IFF_UP){
2246
network.ifr_flags &= ~(short)IFF_UP; /* clear flag */
2247
ret = ioctl(sd, SIOCSIFFLAGS, &network);
2249
perror_plus("ioctl SIOCSIFFLAGS -IFF_UP");
2449
/* Run network hooks */
2450
run_network_hooks("stop", interfaces_hooks != NULL ?
2451
interfaces_hooks : "", delay);
2453
/* Take down the network interfaces which were brought up */
2455
char *interface = NULL;
2456
while((interface=argz_next(interfaces_to_take_down,
2457
interfaces_to_take_down_size,
2459
ret_errno = take_down_interface(interface);
2462
perror_plus("Failed to take down interface");
2252
ret = (int)TEMP_FAILURE_RETRY(close(sd));
2254
perror_plus("close");
2465
if(debug and (interfaces_to_take_down == NULL)){
2466
fprintf_plus(stderr, "No interfaces needed to be taken"
2258
/* Lower privileges permanently */
2262
perror_plus("setuid");
2471
lower_privileges_permanently();
2474
free(interfaces_to_take_down);
2475
free(interfaces_hooks);
2265
2477
/* Removes the GPGME temp directory and all files inside */
2266
2478
if(tempdir_created){