32
32
/* Needed by GPGME, specifically gpgme_data_seek() */
33
33
#ifndef _LARGEFILE_SOURCE
34
34
#define _LARGEFILE_SOURCE
35
#endif /* not _LARGEFILE_SOURCE */
36
36
#ifndef _FILE_OFFSET_BITS
37
37
#define _FILE_OFFSET_BITS 64
38
#endif /* not _FILE_OFFSET_BITS */
40
40
#define _GNU_SOURCE /* TEMP_FAILURE_RETRY(), asprintf() */
42
42
#include <stdio.h> /* fprintf(), stderr, fwrite(),
43
stdout, ferror(), remove() */
44
44
#include <stdint.h> /* uint16_t, uint32_t, intptr_t */
45
45
#include <stddef.h> /* NULL, size_t, ssize_t */
46
46
#include <stdlib.h> /* free(), EXIT_SUCCESS, srand(),
47
47
strtof(), abort() */
48
48
#include <stdbool.h> /* bool, false, true */
49
#include <string.h> /* strcmp(), strlen(), strerror(),
50
asprintf(), strncpy() */
49
#include <string.h> /* memset(), strcmp(), strlen(),
50
strerror(), asprintf(), strcpy() */
51
51
#include <sys/ioctl.h> /* ioctl */
52
52
#include <sys/types.h> /* socket(), inet_pton(), sockaddr,
53
53
sockaddr_in6, PF_INET6,
568
557
safer_gnutls_strerror(ret));
571
/* If a Diffie-Hellman parameters file was given, try to use it */
572
if(dhparamsfilename != NULL){
573
gnutls_datum_t params = { .data = NULL, .size = 0 };
575
int dhpfile = open(dhparamsfilename, O_RDONLY);
578
dhparamsfilename = NULL;
581
size_t params_capacity = 0;
583
params_capacity = incbuffer((char **)¶ms.data,
585
(size_t)params_capacity);
586
if(params_capacity == 0){
587
perror_plus("incbuffer");
590
dhparamsfilename = NULL;
593
ssize_t bytes_read = read(dhpfile,
594
params.data + params.size,
600
/* check bytes_read for failure */
605
dhparamsfilename = NULL;
608
params.size += (unsigned int)bytes_read;
610
if(params.data == NULL){
611
dhparamsfilename = NULL;
613
if(dhparamsfilename == NULL){
616
ret = gnutls_dh_params_import_pkcs3(mc->dh_params, ¶ms,
617
GNUTLS_X509_FMT_PEM);
618
if(ret != GNUTLS_E_SUCCESS){
619
fprintf_plus(stderr, "Failed to parse DH parameters in file"
620
" \"%s\": %s\n", dhparamsfilename,
621
safer_gnutls_strerror(ret));
622
dhparamsfilename = NULL;
626
if(dhparamsfilename == NULL){
627
if(mc->dh_bits == 0){
628
/* Find out the optimal number of DH bits */
629
/* Try to read the private key file */
630
gnutls_datum_t buffer = { .data = NULL, .size = 0 };
632
int secfile = open(seckeyfilename, O_RDONLY);
637
size_t buffer_capacity = 0;
639
buffer_capacity = incbuffer((char **)&buffer.data,
641
(size_t)buffer_capacity);
642
if(buffer_capacity == 0){
643
perror_plus("incbuffer");
648
ssize_t bytes_read = read(secfile,
649
buffer.data + buffer.size,
655
/* check bytes_read for failure */
662
buffer.size += (unsigned int)bytes_read;
666
/* If successful, use buffer to parse private key */
667
gnutls_sec_param_t sec_param = GNUTLS_SEC_PARAM_ULTRA;
668
if(buffer.data != NULL){
670
gnutls_openpgp_privkey_t privkey = NULL;
671
ret = gnutls_openpgp_privkey_init(&privkey);
672
if(ret != GNUTLS_E_SUCCESS){
673
fprintf_plus(stderr, "Error initializing OpenPGP key"
675
safer_gnutls_strerror(ret));
679
ret = gnutls_openpgp_privkey_import
680
(privkey, &buffer, GNUTLS_OPENPGP_FMT_BASE64, "", 0);
681
if(ret != GNUTLS_E_SUCCESS){
682
fprintf_plus(stderr, "Error importing OpenPGP key : %s",
683
safer_gnutls_strerror(ret));
689
/* Use private key to suggest an appropriate
691
sec_param = gnutls_openpgp_privkey_sec_param(privkey);
692
gnutls_openpgp_privkey_deinit(privkey);
694
fprintf_plus(stderr, "This OpenPGP key implies using"
695
" a GnuTLS security parameter \"%s\".\n",
696
safe_string(gnutls_sec_param_get_name
702
if(sec_param == GNUTLS_SEC_PARAM_UNKNOWN){
703
/* Err on the side of caution */
704
sec_param = GNUTLS_SEC_PARAM_ULTRA;
706
fprintf_plus(stderr, "Falling back to security parameter"
708
safe_string(gnutls_sec_param_get_name
713
uret = gnutls_sec_param_to_pk_bits(GNUTLS_PK_DH, sec_param);
717
fprintf_plus(stderr, "A \"%s\" GnuTLS security parameter"
718
" implies %u DH bits; using that.\n",
719
safe_string(gnutls_sec_param_get_name
724
fprintf_plus(stderr, "Failed to get implied number of DH"
725
" bits for security parameter \"%s\"): %s\n",
726
safe_string(gnutls_sec_param_get_name
728
safer_gnutls_strerror(ret));
732
fprintf_plus(stderr, "DH bits explicitly set to %u\n",
735
ret = gnutls_dh_params_generate2(mc->dh_params, mc->dh_bits);
736
if(ret != GNUTLS_E_SUCCESS){
737
fprintf_plus(stderr, "Error in GnuTLS prime generation (%u"
738
" bits): %s\n", mc->dh_bits,
739
safer_gnutls_strerror(ret));
560
ret = gnutls_dh_params_generate2(mc->dh_params, mc->dh_bits);
561
if(ret != GNUTLS_E_SUCCESS){
562
fprintf_plus(stderr, "Error in GnuTLS prime generation: %s\n",
563
safer_gnutls_strerror(ret));
743
567
gnutls_certificate_set_dh_params(mc->cred, mc->dh_params);
811
638
static void empty_log(__attribute__((unused)) AvahiLogLevel level,
812
639
__attribute__((unused)) const char *txt){}
814
/* Set effective uid to 0, return errno */
815
__attribute__((warn_unused_result))
816
error_t raise_privileges(void){
817
error_t old_errno = errno;
818
error_t ret_errno = 0;
819
if(seteuid(0) == -1){
826
/* Set effective and real user ID to 0. Return errno. */
827
__attribute__((warn_unused_result))
828
error_t raise_privileges_permanently(void){
829
error_t old_errno = errno;
830
error_t ret_errno = raise_privileges();
842
/* Set effective user ID to unprivileged saved user ID */
843
__attribute__((warn_unused_result))
844
error_t lower_privileges(void){
845
error_t old_errno = errno;
846
error_t ret_errno = 0;
847
if(seteuid(uid) == -1){
854
/* Lower privileges permanently */
855
__attribute__((warn_unused_result))
856
error_t lower_privileges_permanently(void){
857
error_t old_errno = errno;
858
error_t ret_errno = 0;
859
if(setuid(uid) == -1){
866
/* Helper function to add_local_route() and delete_local_route() */
867
__attribute__((nonnull, warn_unused_result))
868
static bool add_delete_local_route(const bool add,
870
AvahiIfIndex if_index){
872
char helper[] = "mandos-client-iprouteadddel";
873
char add_arg[] = "add";
874
char delete_arg[] = "delete";
875
char debug_flag[] = "--debug";
876
char *pluginhelperdir = getenv("MANDOSPLUGINHELPERDIR");
877
if(pluginhelperdir == NULL){
879
fprintf_plus(stderr, "MANDOSPLUGINHELPERDIR environment"
880
" variable not set; cannot run helper\n");
885
char interface[IF_NAMESIZE];
886
if(if_indextoname((unsigned int)if_index, interface) == NULL){
887
perror_plus("if_indextoname");
891
int devnull = (int)TEMP_FAILURE_RETRY(open("/dev/null", O_RDONLY));
893
perror_plus("open(\"/dev/null\", O_RDONLY)");
899
/* Raise privileges */
900
errno = raise_privileges_permanently();
902
perror_plus("Failed to raise privileges");
903
/* _exit(EX_NOPERM); */
909
perror_plus("setgid");
912
/* Reset supplementary groups */
914
ret = setgroups(0, NULL);
916
perror_plus("setgroups");
920
ret = dup2(devnull, STDIN_FILENO);
922
perror_plus("dup2(devnull, STDIN_FILENO)");
925
ret = close(devnull);
927
perror_plus("close");
930
ret = dup2(STDERR_FILENO, STDOUT_FILENO);
932
perror_plus("dup2(STDERR_FILENO, STDOUT_FILENO)");
935
int helperdir_fd = (int)TEMP_FAILURE_RETRY(open(pluginhelperdir,
940
if(helperdir_fd == -1){
942
_exit(EX_UNAVAILABLE);
944
int helper_fd = (int)TEMP_FAILURE_RETRY(openat(helperdir_fd,
947
perror_plus("openat");
949
_exit(EX_UNAVAILABLE);
953
#pragma GCC diagnostic push
954
#pragma GCC diagnostic ignored "-Wcast-qual"
956
if(fexecve(helper_fd, (char *const [])
957
{ helper, add ? add_arg : delete_arg, (char *)address,
958
interface, debug ? debug_flag : NULL, NULL },
961
#pragma GCC diagnostic pop
963
perror_plus("fexecve");
975
pret = waitpid(pid, &status, 0);
976
if(pret == -1 and errno == EINTR and quit_now){
977
int errno_raising = 0;
978
if((errno = raise_privileges()) != 0){
979
errno_raising = errno;
980
perror_plus("Failed to raise privileges in order to"
981
" kill helper program");
983
if(kill(pid, SIGTERM) == -1){
986
if((errno_raising == 0) and (errno = lower_privileges()) != 0){
987
perror_plus("Failed to lower privileges after killing"
992
} while(pret == -1 and errno == EINTR);
994
perror_plus("waitpid");
997
if(WIFEXITED(status)){
998
if(WEXITSTATUS(status) != 0){
999
fprintf_plus(stderr, "Error: iprouteadddel exited"
1000
" with status %d\n", WEXITSTATUS(status));
1005
if(WIFSIGNALED(status)){
1006
fprintf_plus(stderr, "Error: iprouteadddel died by"
1007
" signal %d\n", WTERMSIG(status));
1010
fprintf_plus(stderr, "Error: iprouteadddel crashed\n");
1014
__attribute__((nonnull, warn_unused_result))
1015
static bool add_local_route(const char *address,
1016
AvahiIfIndex if_index){
1018
fprintf_plus(stderr, "Adding route to %s\n", address);
1020
return add_delete_local_route(true, address, if_index);
1023
__attribute__((nonnull, warn_unused_result))
1024
static bool delete_local_route(const char *address,
1025
AvahiIfIndex if_index){
1027
fprintf_plus(stderr, "Removing route to %s\n", address);
1029
return add_delete_local_route(false, address, if_index);
1032
641
/* Called when a Mandos server is found */
1033
642
__attribute__((nonnull, warn_unused_result))
1034
643
static int start_mandos_communication(const char *ip, in_port_t port,
1205
812
goto mandos_end;
1210
ret = connect(tcp_sd, (struct sockaddr *)&to,
1211
sizeof(struct sockaddr_in6));
1213
ret = connect(tcp_sd, (struct sockaddr *)&to, /* IPv4 */
1214
sizeof(struct sockaddr_in));
1217
if(((errno == ENETUNREACH) or (errno == EHOSTUNREACH))
1218
and if_index != AVAHI_IF_UNSPEC
1219
and connect_to == NULL
1220
and not route_added and
1221
((af == AF_INET6 and not
1222
IN6_IS_ADDR_LINKLOCAL(&(((struct sockaddr_in6 *)
1224
or (af == AF_INET and
1225
/* Not a a IPv4LL address */
1226
(ntohl(((struct sockaddr_in *)&to)->sin_addr.s_addr)
1227
& 0xFFFF0000L) != 0xA9FE0000L))){
1228
/* Work around Avahi bug - Avahi does not announce link-local
1229
addresses if it has a global address, so local hosts with
1230
*only* a link-local address (e.g. Mandos clients) cannot
1231
connect to a Mandos server announced by Avahi on a server
1232
host with a global address. Work around this by retrying
1233
with an explicit route added with the server's address.
1235
Avahi bug reference:
1236
http://lists.freedesktop.org/archives/avahi/2010-February/001833.html
1237
https://bugs.debian.org/587961
1240
fprintf_plus(stderr, "Mandos server unreachable, trying"
1244
route_added = add_local_route(ip, if_index);
1250
if(errno != ECONNREFUSED or debug){
1252
perror_plus("connect");
816
ret = connect(tcp_sd, (struct sockaddr *)&to,
817
sizeof(struct sockaddr_in6));
819
ret = connect(tcp_sd, (struct sockaddr *)&to, /* IPv4 */
820
sizeof(struct sockaddr_in));
823
if((errno != ECONNREFUSED and errno != ENETUNREACH) or debug){
825
perror_plus("connect");
1265
836
const char *out = mandos_protocol_version;
1459
/* Set effective uid to 0, return errno */
1460
__attribute__((warn_unused_result))
1461
error_t raise_privileges(void){
1462
error_t old_errno = errno;
1463
error_t ret_errno = 0;
1464
if(seteuid(0) == -1){
1466
perror_plus("seteuid");
1472
/* Set effective and real user ID to 0. Return errno. */
1473
__attribute__((warn_unused_result))
1474
error_t raise_privileges_permanently(void){
1475
error_t old_errno = errno;
1476
error_t ret_errno = raise_privileges();
1481
if(setuid(0) == -1){
1483
perror_plus("seteuid");
1489
/* Set effective user ID to unprivileged saved user ID */
1490
__attribute__((warn_unused_result))
1491
error_t lower_privileges(void){
1492
error_t old_errno = errno;
1493
error_t ret_errno = 0;
1494
if(seteuid(uid) == -1){
1496
perror_plus("seteuid");
1502
/* Lower privileges permanently */
1503
__attribute__((warn_unused_result))
1504
error_t lower_privileges_permanently(void){
1505
error_t old_errno = errno;
1506
error_t ret_errno = 0;
1507
if(setuid(uid) == -1){
1509
perror_plus("setuid");
1889
1515
__attribute__((nonnull))
1890
1516
void run_network_hooks(const char *mode, const char *interface,
1891
1517
const float delay){
1892
struct dirent **direntries = NULL;
1893
if(hookdir_fd == -1){
1894
hookdir_fd = open(hookdir, O_RDONLY | O_DIRECTORY | O_PATH
1896
if(hookdir_fd == -1){
1897
if(errno == ENOENT){
1899
fprintf_plus(stderr, "Network hook directory \"%s\" not"
1900
" found\n", hookdir);
1903
perror_plus("open");
1908
int numhooks = scandirat(hookdir_fd, ".", &direntries,
1909
runnable_hook, alphasort);
1518
struct dirent **direntries;
1519
int numhooks = scandir(hookdir, &direntries, runnable_hook,
1910
1521
if(numhooks == -1){
1911
perror_plus("scandir");
1914
struct dirent *direntry;
1916
int devnull = (int)TEMP_FAILURE_RETRY(open("/dev/null", O_RDONLY));
1918
perror_plus("open(\"/dev/null\", O_RDONLY)");
1921
for(int i = 0; i < numhooks; i++){
1922
direntry = direntries[i];
1924
fprintf_plus(stderr, "Running network hook \"%s\"\n",
1522
if(errno == ENOENT){
1524
fprintf_plus(stderr, "Network hook directory \"%s\" not"
1525
" found\n", hookdir);
1528
perror_plus("scandir");
1927
pid_t hook_pid = fork();
1930
/* Raise privileges */
1931
errno = raise_privileges_permanently();
1933
perror_plus("Failed to raise privileges");
1940
perror_plus("setgid");
1943
/* Reset supplementary groups */
1945
ret = setgroups(0, NULL);
1947
perror_plus("setgroups");
1950
ret = setenv("MANDOSNETHOOKDIR", hookdir, 1);
1952
perror_plus("setenv");
1955
ret = setenv("DEVICE", interface, 1);
1957
perror_plus("setenv");
1960
ret = setenv("VERBOSITY", debug ? "1" : "0", 1);
1962
perror_plus("setenv");
1965
ret = setenv("MODE", mode, 1);
1967
perror_plus("setenv");
1971
ret = asprintf(&delaystring, "%f", (double)delay);
1531
struct dirent *direntry;
1533
int devnull = open("/dev/null", O_RDONLY);
1534
for(int i = 0; i < numhooks; i++){
1535
direntry = direntries[i];
1536
char *fullname = NULL;
1537
ret = asprintf(&fullname, "%s/%s", hookdir, direntry->d_name);
1973
1539
perror_plus("asprintf");
1976
ret = setenv("DELAY", delaystring, 1);
1543
fprintf_plus(stderr, "Running network hook \"%s\"\n",
1546
pid_t hook_pid = fork();
1549
/* Raise privileges */
1550
if(raise_privileges_permanently() != 0){
1551
perror_plus("Failed to raise privileges");
1558
perror_plus("setgid");
1561
/* Reset supplementary groups */
1563
ret = setgroups(0, NULL);
1565
perror_plus("setgroups");
1568
ret = dup2(devnull, STDIN_FILENO);
1570
perror_plus("dup2(devnull, STDIN_FILENO)");
1573
ret = close(devnull);
1575
perror_plus("close");
1578
ret = dup2(STDERR_FILENO, STDOUT_FILENO);
1580
perror_plus("dup2(STDERR_FILENO, STDOUT_FILENO)");
1583
ret = setenv("MANDOSNETHOOKDIR", hookdir, 1);
1585
perror_plus("setenv");
1588
ret = setenv("DEVICE", interface, 1);
1590
perror_plus("setenv");
1593
ret = setenv("VERBOSITY", debug ? "1" : "0", 1);
1595
perror_plus("setenv");
1598
ret = setenv("MODE", mode, 1);
1600
perror_plus("setenv");
1604
ret = asprintf(&delaystring, "%f", (double)delay);
1606
perror_plus("asprintf");
1609
ret = setenv("DELAY", delaystring, 1);
1612
perror_plus("setenv");
1978
1615
free(delaystring);
1979
perror_plus("setenv");
1983
if(connect_to != NULL){
1984
ret = setenv("CONNECT", connect_to, 1);
1986
perror_plus("setenv");
1990
int hook_fd = (int)TEMP_FAILURE_RETRY(openat(hookdir_fd,
1994
perror_plus("openat");
1995
_exit(EXIT_FAILURE);
1997
if(close(hookdir_fd) == -1){
1998
perror_plus("close");
1999
_exit(EXIT_FAILURE);
2001
ret = dup2(devnull, STDIN_FILENO);
2003
perror_plus("dup2(devnull, STDIN_FILENO)");
2006
ret = close(devnull);
2008
perror_plus("close");
2011
ret = dup2(STDERR_FILENO, STDOUT_FILENO);
2013
perror_plus("dup2(STDERR_FILENO, STDOUT_FILENO)");
2016
if(fexecve(hook_fd, (char *const []){ direntry->d_name, NULL },
2018
perror_plus("fexecve");
2019
_exit(EXIT_FAILURE);
2023
perror_plus("fork");
2028
if(TEMP_FAILURE_RETRY(waitpid(hook_pid, &status, 0)) == -1){
2029
perror_plus("waitpid");
2033
if(WIFEXITED(status)){
2034
if(WEXITSTATUS(status) != 0){
2035
fprintf_plus(stderr, "Warning: network hook \"%s\" exited"
2036
" with status %d\n", direntry->d_name,
2037
WEXITSTATUS(status));
2041
} else if(WIFSIGNALED(status)){
2042
fprintf_plus(stderr, "Warning: network hook \"%s\" died by"
2043
" signal %d\n", direntry->d_name,
1616
if(connect_to != NULL){
1617
ret = setenv("CONNECT", connect_to, 1);
1619
perror_plus("setenv");
1623
if(execl(fullname, direntry->d_name, mode, NULL) == -1){
1624
perror_plus("execl");
1625
_exit(EXIT_FAILURE);
2048
fprintf_plus(stderr, "Warning: network hook \"%s\""
2049
" crashed\n", direntry->d_name);
2055
fprintf_plus(stderr, "Network hook \"%s\" ran successfully\n",
2061
if(close(hookdir_fd) == -1){
2062
perror_plus("close");
1629
if(TEMP_FAILURE_RETRY(waitpid(hook_pid, &status, 0)) == -1){
1630
perror_plus("waitpid");
1634
if(WIFEXITED(status)){
1635
if(WEXITSTATUS(status) != 0){
1636
fprintf_plus(stderr, "Warning: network hook \"%s\" exited"
1637
" with status %d\n", direntry->d_name,
1638
WEXITSTATUS(status));
1642
} else if(WIFSIGNALED(status)){
1643
fprintf_plus(stderr, "Warning: network hook \"%s\" died by"
1644
" signal %d\n", direntry->d_name,
1649
fprintf_plus(stderr, "Warning: network hook \"%s\""
1650
" crashed\n", direntry->d_name);
1657
fprintf_plus(stderr, "Network hook \"%s\" ran successfully\n",
2069
1665
__attribute__((nonnull, warn_unused_result))
3027
2575
/* Removes the GPGME temp directory and all files inside */
3028
2576
if(tempdir != NULL){
3029
2577
struct dirent **direntries = NULL;
3030
int tempdir_fd = (int)TEMP_FAILURE_RETRY(open(tempdir, O_RDONLY
3034
if(tempdir_fd == -1){
3035
perror_plus("open");
3037
int numentries = scandirat(tempdir_fd, ".", &direntries,
3038
notdotentries, alphasort);
3039
if(numentries >= 0){
3040
for(int i = 0; i < numentries; i++){
3041
ret = unlinkat(tempdir_fd, direntries[i]->d_name, 0);
3043
fprintf_plus(stderr, "unlinkat(open(\"%s\", O_RDONLY),"
3044
" \"%s\", 0): %s\n", tempdir,
3045
direntries[i]->d_name, strerror(errno));
3047
free(direntries[i]);
3050
/* need to clean even if 0 because man page doesn't specify */
3052
if(numentries == -1){
3053
perror_plus("scandir");
3055
ret = rmdir(tempdir);
3056
if(ret == -1 and errno != ENOENT){
3057
perror_plus("rmdir");
2578
struct dirent *direntry = NULL;
2579
int numentries = scandir(tempdir, &direntries, notdotentries,
2582
for(int i = 0; i < numentries; i++){
2583
direntry = direntries[i];
2584
char *fullname = NULL;
2585
ret = asprintf(&fullname, "%s/%s", tempdir,
2588
perror_plus("asprintf");
2591
ret = remove(fullname);
2593
fprintf_plus(stderr, "remove(\"%s\"): %s\n", fullname,
2600
/* need to clean even if 0 because man page doesn't specify */
2602
if(numentries == -1){
2603
perror_plus("scandir");
2605
ret = rmdir(tempdir);
2606
if(ret == -1 and errno != ENOENT){
2607
perror_plus("rmdir");