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);    
 
 
739
    if(IN6_IS_ADDR_LINKLOCAL /* Spurious warnings from */
 
 
740
       (&to.in6.sin6_addr)){ /* -Wstrict-aliasing=2 or lower and
 
755
742
      if(if_index == AVAHI_IF_UNSPEC){
 
756
743
        fprintf_plus(stderr, "An IPv6 link-local address is"
 
757
744
                     " incomplete without a network interface\n");
 
 
761
748
      /* Set the network interface number as scope */
 
762
 
      ((struct sockaddr_in6 *)&to)->sin6_scope_id = (uint32_t)if_index;
 
 
749
      to.in6.sin6_scope_id = (uint32_t)if_index;
 
765
 
    ((struct sockaddr_in *)&to)->sin_port = htons(port);
 
 
752
    to.in.sin_port = htons(port); /* Spurious warnings from
 
 
754
                                     -Wunreachable-code */
 
 
786
775
    char addrstr[(INET_ADDRSTRLEN > INET6_ADDRSTRLEN) ?
 
787
776
                 INET_ADDRSTRLEN : INET6_ADDRSTRLEN] = "";
 
788
778
    if(af == AF_INET6){
 
789
 
      ret = getnameinfo((struct sockaddr *)&to,
 
790
 
                        sizeof(struct sockaddr_in6),
 
791
 
                        addrstr, sizeof(addrstr), NULL, 0,
 
 
779
      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,
 
 
782
      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);
 
 
786
      perror_plus("inet_ntop");
 
 
788
      if(strcmp(addrstr, ip) != 0){
 
 
789
        fprintf_plus(stderr, "Canonical address form: %s\n", addrstr);
 
 
813
799
  if(af == AF_INET6){
 
814
 
    ret = connect(tcp_sd, (struct sockaddr *)&to,
 
815
 
                  sizeof(struct sockaddr_in6));
 
 
800
    ret = connect(tcp_sd, &to.in6, sizeof(to));
 
817
 
    ret = connect(tcp_sd, (struct sockaddr *)&to, /* IPv4 */
 
818
 
                  sizeof(struct sockaddr_in));
 
 
802
    ret = connect(tcp_sd, &to.in, sizeof(to)); /* IPv4 */
 
821
 
    if((errno != ECONNREFUSED and errno != ENETUNREACH) or debug){
 
 
805
    if ((errno != ECONNREFUSED and errno != ENETUNREACH) or debug){
 
823
807
      perror_plus("connect");
 
 
1251
1232
 * corresponds to an acceptable network device.
 
1252
1233
 * (This function is passed to scandir(3) as a filter function.)
 
1254
 
__attribute__((nonnull, warn_unused_result))
 
1255
1235
int good_interface(const struct dirent *if_entry){
 
1256
1236
  if(if_entry->d_name[0] == '.'){
 
 
1276
1256
 * This function determines if a network interface is up.
 
1278
 
__attribute__((nonnull, warn_unused_result))
 
1279
1258
bool interface_is_up(const char *interface){
 
1280
1259
  struct ifreq ifr;
 
1281
1260
  if(not get_flags(interface, &ifr)){
 
 
1293
1272
 * This function determines if a network interface is running
 
1295
 
__attribute__((nonnull, warn_unused_result))
 
1296
1274
bool interface_is_running(const char *interface){
 
1297
1275
  struct ifreq ifr;
 
1298
1276
  if(not get_flags(interface, &ifr)){
 
 
1306
1284
  return (bool)(ifr.ifr_flags & IFF_RUNNING);
 
1309
 
__attribute__((nonnull, pure, warn_unused_result))
 
1310
1287
int notdotentries(const struct dirent *direntry){
 
1311
1288
  /* Skip "." and ".." */
 
1312
1289
  if(direntry->d_name[0] == '.'
 
 
1392
1367
    if(mc->current_server == NULL){
 
1394
1369
        fprintf_plus(stderr, "Wait until first server is found."
 
1395
1370
                     " No timeout!\n");
 
1397
1372
      ret = avahi_simple_poll_iterate(s, -1);
 
1400
1375
        fprintf_plus(stderr, "Check current_server if we should run"
 
1401
1376
                     " it, or wait\n");
 
 
1447
1422
      ret = avahi_simple_poll_iterate(s, (int)block_time);
 
1450
 
      if(ret > 0 or errno != EINTR){
 
 
1425
      if (ret > 0 or errno != EINTR){
 
1451
1426
        return (ret != 1) ? ret : 0;
 
 
1457
1432
/* Set effective uid to 0, return errno */
 
1458
 
__attribute__((warn_unused_result))
 
1459
1433
error_t raise_privileges(void){
 
1460
1434
  error_t old_errno = errno;
 
1461
1435
  error_t ret_errno = 0;
 
 
1470
1444
/* Set effective and real user ID to 0.  Return errno. */
 
1471
 
__attribute__((warn_unused_result))
 
1472
1445
error_t raise_privileges_permanently(void){
 
1473
1446
  error_t old_errno = errno;
 
1474
1447
  error_t ret_errno = raise_privileges();
 
 
1510
1481
  return ret_errno;
 
1513
 
__attribute__((nonnull))
 
1514
 
void run_network_hooks(const char *mode, const char *interface,
 
 
1484
bool run_network_hooks(const char *mode, const char *interface,
 
1515
1485
                       const float delay){
 
1516
1486
  struct dirent **direntries;
 
 
1487
  struct dirent *direntry;
 
1517
1489
  int numhooks = scandir(hookdir, &direntries, runnable_hook,
 
1519
1491
  if(numhooks == -1){
 
 
1545
1515
      if(hook_pid == 0){
 
1547
1517
        /* Raise privileges */
 
1548
 
        if(raise_privileges_permanently() != 0){
 
1549
 
          perror_plus("Failed to raise privileges");
 
 
1518
        raise_privileges_permanently();
 
1552
1519
        /* Set group */
 
1554
1521
        ret = setgid(0);
 
1556
1523
          perror_plus("setgid");
 
1559
1525
        /* Reset supplementary groups */
 
1561
1527
        ret = setgroups(0, NULL);
 
1563
1529
          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)");
 
 
1531
        dup2(devnull, STDIN_FILENO);
 
 
1533
        dup2(STDERR_FILENO, STDOUT_FILENO);
 
1581
1534
        ret = setenv("MANDOSNETHOOKDIR", hookdir, 1);
 
1583
1536
          perror_plus("setenv");
 
 
1659
1612
    close(devnull);
 
1663
 
__attribute__((nonnull, warn_unused_result))
 
1664
1617
error_t bring_up_interface(const char *const interface,
 
1665
1618
                           const float delay){
 
1666
1620
  error_t old_errno = errno;
 
 
1621
  error_t ret_errno = 0;
 
 
1622
  int ret, ret_setflags;
 
1668
1623
  struct ifreq network;
 
1669
1624
  unsigned int if_index = if_nametoindex(interface);
 
1670
1625
  if(if_index == 0){
 
 
1681
1636
  if(not interface_is_up(interface)){
 
1682
 
    error_t ret_errno = 0, ioctl_errno = 0;
 
1683
 
    if(not get_flags(interface, &network)){
 
 
1637
    if(not get_flags(interface, &network) and debug){
 
1684
1638
      ret_errno = errno;
 
1685
1639
      fprintf_plus(stderr, "Failed to get flags for interface "
 
1686
1640
                   "\"%s\"\n", interface);
 
1688
1641
      return ret_errno;
 
1690
 
    network.ifr_flags |= IFF_UP; /* set flag */
 
 
1643
    network.ifr_flags |= IFF_UP;
 
1692
 
    int sd = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);
 
 
1645
    sd = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);
 
1694
1647
      ret_errno = errno;
 
1695
1648
      perror_plus("socket");
 
1696
1649
      errno = old_errno;
 
1697
1650
      return ret_errno;
 
1701
 
      ret = (int)TEMP_FAILURE_RETRY(close(sd));
 
1703
 
        perror_plus("close");
 
1705
1655
      errno = old_errno;
 
 
1714
 
    /* Raise privileges */
 
1715
 
    ret_errno = raise_privileges();
 
1716
 
    bool restore_loglevel = false;
 
1718
 
      perror_plus("Failed to raise privileges");
 
 
1664
    /* Raise priviliges */
 
1720
1667
#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;
 
 
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");
 
1732
1676
#endif  /* __linux__ */
 
1733
 
    int ret_setflags = ioctl(sd, SIOCSIFFLAGS, &network);
 
1734
 
    ioctl_errno = errno;
 
 
1677
    ret_setflags = ioctl(sd, SIOCSIFFLAGS, &network);
 
1735
1679
#ifdef __linux__
 
1736
1680
    if(restore_loglevel){
 
1737
1681
      ret_linux = klogctl(7, NULL, 0);
 
 
1788
 
__attribute__((nonnull, warn_unused_result))
 
1789
1725
error_t take_down_interface(const char *const interface){
 
1790
1727
  error_t old_errno = errno;
 
 
1728
  error_t ret_errno = 0;
 
 
1729
  int ret, ret_setflags;
 
1791
1730
  struct ifreq network;
 
1792
1731
  unsigned int if_index = if_nametoindex(interface);
 
1793
1732
  if(if_index == 0){
 
 
1798
1737
  if(interface_is_up(interface)){
 
1799
 
    error_t ret_errno = 0, ioctl_errno = 0;
 
1800
1738
    if(not get_flags(interface, &network) and debug){
 
1801
1739
      ret_errno = errno;
 
1802
1740
      fprintf_plus(stderr, "Failed to get flags for interface "
 
1803
1741
                   "\"%s\"\n", interface);
 
1805
1742
      return ret_errno;
 
1807
1744
    network.ifr_flags &= ~(short)IFF_UP; /* clear flag */
 
1809
 
    int sd = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);
 
 
1746
    sd = socket(PF_INET6, SOCK_DGRAM, IPPROTO_IP);
 
1811
1748
      ret_errno = errno;
 
1812
1749
      perror_plus("socket");
 
1813
1750
      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");
 
 
1759
    /* Raise priviliges */
 
 
1762
    ret_setflags = ioctl(sd, SIOCSIFFLAGS, &network);
 
 
1765
    /* Lower privileges */
 
1840
1768
    /* Close the socket */
 
1841
 
    int ret = (int)TEMP_FAILURE_RETRY(close(sd));
 
 
1769
    ret = (int)TEMP_FAILURE_RETRY(close(sd));
 
1843
1771
      perror_plus("close");
 
1846
1774
    if(ret_setflags == -1){
 
1847
 
      errno = ioctl_errno;
 
1848
1776
      perror_plus("ioctl SIOCSIFFLAGS -IFF_UP");
 
1849
1777
      errno = old_errno;
 
1852
1780
  } else if(debug){
 
1853
1781
    fprintf_plus(stderr, "Interface \"%s\" is already down; odd\n",
 
 
1861
1789
int main(int argc, char *argv[]){
 
1862
1790
  mandos_context mc = { .server = NULL, .dh_bits = 1024,
 
1863
1791
                        .priority = "SECURE256:!CTYPE-X.509:"
 
1864
 
                        "+CTYPE-OPENPGP", .current_server = NULL,
 
 
1792
                        "+CTYPE-OPENPGP", .current_server = NULL, 
 
1865
1793
                        .interfaces = NULL, .interfaces_size = 0 };
 
1866
1794
  AvahiSServiceBrowser *sb = NULL;
 
1867
1795
  error_t ret_errno;
 
 
1877
1805
  const char *seckey = PATHDIR "/" SECKEY;
 
1878
1806
  const char *pubkey = PATHDIR "/" PUBKEY;
 
1879
1807
  char *interfaces_hooks = NULL;
 
 
1808
  size_t interfaces_hooks_size = 0;
 
1881
1810
  bool gnutls_initialized = false;
 
1882
1811
  bool gpgme_initialized = false;
 
 
2060
1989
    /* Work around Debian bug #633582:
 
2061
1990
       <http://bugs.debian.org/633582> */
 
2063
 
    /* Re-raise privileges */
 
2064
 
    ret_errno = raise_privileges();
 
2067
 
      perror_plus("Failed to raise privileges");
 
 
1992
    /* Re-raise priviliges */
 
 
1993
    if(raise_privileges() == 0){
 
2069
1994
      struct stat st;
 
2071
1996
      if(strcmp(seckey, PATHDIR "/" SECKEY) == 0){
 
 
2147
2068
      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);
 
 
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)){
 
 
2284
2208
      bool interface_was_up = interface_is_up(interface);
 
2285
 
      errno = bring_up_interface(interface, delay);
 
 
2209
      ret = bring_up_interface(interface, delay);
 
2286
2210
      if(not interface_was_up){
 
2288
2213
          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");
 
 
2215
          ret_errno = argz_add(&interfaces_to_take_down,
 
 
2216
                               &interfaces_to_take_down_size,
 
 
2523
 
  /* Re-raise privileges */
 
 
2445
  /* 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");
 
 
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");
 
 
2465
      if(debug and (interfaces_to_take_down == NULL)){
 
 
2466
        fprintf_plus(stderr, "No interfaces needed to be taken"
 
 
2471
    lower_privileges_permanently();
 
2558
2474
  free(interfaces_to_take_down);
 
 
2564
2480
    struct dirent *direntry = NULL;
 
2565
2481
    int numentries = scandir(tempdir, &direntries, notdotentries,
 
 
2483
    if (numentries > 0){
 
2568
2484
      for(int i = 0; i < numentries; i++){
 
2569
2485
        direntry = direntries[i];
 
2570
2486
        char *fullname = NULL;