229
256
    new_server->next = new_server;
 
230
257
    new_server->prev = new_server;
 
231
258
    *current_server = new_server;
 
232
 
  /* Place the new server last in the list */
 
 
260
    /* Place the new server last in the list */
 
234
261
    new_server->next = *current_server;
 
235
262
    new_server->prev = (*current_server)->prev;
 
236
263
    new_server->prev->next = new_server;
 
237
264
    (*current_server)->prev = new_server;
 
239
 
  ret = clock_gettime(CLOCK_MONOTONIC, &(*current_server)->last_seen);
 
241
 
    perror_plus("clock_gettime");
 
248
270
 * Initialize GPGME.
 
250
 
static bool init_gpgme(const char *seckey, const char *pubkey,
 
251
 
                       const char *tempdir, mandos_context *mc){
 
 
272
__attribute__((nonnull, warn_unused_result))
 
 
273
static bool init_gpgme(const char * const seckey,
 
 
274
                       const char * const pubkey,
 
 
275
                       const char * const tempdir,
 
252
277
  gpgme_error_t rc;
 
253
278
  gpgme_engine_info_t engine_info;
 
256
281
   * Helper function to insert pub and seckey to the engine keyring.
 
258
 
  bool import_key(const char *filename){
 
 
283
  bool import_key(const char * const filename){
 
261
286
    gpgme_data_t pgp_data;
 
 
540
575
                 safer_gnutls_strerror(ret));
 
 
578
  if(mc->dh_bits == 0){
 
 
579
    /* Find out the optimal number of DH bits */
 
 
580
    /* Try to read the private key file */
 
 
581
    gnutls_datum_t buffer = { .data = NULL, .size = 0 };
 
 
583
      int secfile = open(seckeyfilename, O_RDONLY);
 
 
584
      size_t buffer_capacity = 0;
 
 
586
        buffer_capacity = incbuffer((char **)&buffer.data,
 
 
588
                                    (size_t)buffer_capacity);
 
 
589
        if(buffer_capacity == 0){
 
 
590
          perror_plus("incbuffer");
 
 
595
        ssize_t bytes_read = read(secfile, buffer.data + buffer.size,
 
 
601
        /* check bytes_read for failure */
 
 
608
        buffer.size += (unsigned int)bytes_read;
 
 
612
    /* If successful, use buffer to parse private key */
 
 
613
    gnutls_sec_param_t sec_param = GNUTLS_SEC_PARAM_ULTRA;
 
 
614
    if(buffer.data != NULL){
 
 
616
        gnutls_openpgp_privkey_t privkey = NULL;
 
 
617
        ret = gnutls_openpgp_privkey_init(&privkey);
 
 
618
        if(ret != GNUTLS_E_SUCCESS){
 
 
619
          fprintf_plus(stderr, "Error initializing OpenPGP key"
 
 
620
                       " structure: %s", safer_gnutls_strerror(ret));
 
 
624
          ret = gnutls_openpgp_privkey_import(privkey, &buffer,
 
 
625
                                            GNUTLS_OPENPGP_FMT_BASE64,
 
 
627
          if(ret != GNUTLS_E_SUCCESS){
 
 
628
            fprintf_plus(stderr, "Error importing OpenPGP key : %s",
 
 
629
                         safer_gnutls_strerror(ret));
 
 
635
            /* Use private key to suggest an appropriate sec_param */
 
 
636
            sec_param = gnutls_openpgp_privkey_sec_param(privkey);
 
 
637
            gnutls_openpgp_privkey_deinit(privkey);
 
 
639
              fprintf_plus(stderr, "This OpenPGP key implies using a"
 
 
640
                           " GnuTLS security parameter \"%s\".\n",
 
 
641
                           safe_string(gnutls_sec_param_get_name
 
 
647
      if(sec_param == GNUTLS_SEC_PARAM_UNKNOWN){
 
 
648
        /* Err on the side of caution */
 
 
649
        sec_param = GNUTLS_SEC_PARAM_ULTRA;
 
 
651
          fprintf_plus(stderr, "Falling back to security parameter"
 
 
653
                       safe_string(gnutls_sec_param_get_name
 
 
658
    uret = gnutls_sec_param_to_pk_bits(GNUTLS_PK_DH, sec_param);
 
 
662
        fprintf_plus(stderr, "A \"%s\" GnuTLS security parameter"
 
 
663
                     " implies %u DH bits; using that.\n",
 
 
664
                     safe_string(gnutls_sec_param_get_name
 
 
669
      fprintf_plus(stderr, "Failed to get implied number of DH"
 
 
670
                   " bits for security parameter \"%s\"): %s\n",
 
 
671
                   safe_string(gnutls_sec_param_get_name(sec_param)),
 
 
672
                   safer_gnutls_strerror(ret));
 
 
676
    fprintf_plus(stderr, "DH bits explicitly set to %u\n",
 
543
679
  ret = gnutls_dh_params_generate2(mc->dh_params, mc->dh_bits);
 
544
680
  if(ret != GNUTLS_E_SUCCESS){
 
545
 
    fprintf_plus(stderr, "Error in GnuTLS prime generation: %s\n",
 
546
 
                 safer_gnutls_strerror(ret));
 
 
681
    fprintf_plus(stderr, "Error in GnuTLS prime generation (%u bits):"
 
 
682
                 " %s\n", mc->dh_bits, safer_gnutls_strerror(ret));
 
 
775
907
    char addrstr[(INET_ADDRSTRLEN > INET6_ADDRSTRLEN) ?
 
776
908
                 INET_ADDRSTRLEN : INET6_ADDRSTRLEN] = "";
 
778
909
    if(af == AF_INET6){
 
779
 
      pcret = inet_ntop(af, &(to.in6.sin6_addr), addrstr,
 
 
910
      ret = getnameinfo((struct sockaddr *)&to,
 
 
911
                        sizeof(struct sockaddr_in6),
 
 
912
                        addrstr, sizeof(addrstr), NULL, 0,
 
782
 
      pcret = inet_ntop(af, &(to.in.sin_addr), addrstr,
 
 
915
      ret = getnameinfo((struct sockaddr *)&to,
 
 
916
                        sizeof(struct sockaddr_in),
 
 
917
                        addrstr, sizeof(addrstr), NULL, 0,
 
786
 
      perror_plus("inet_ntop");
 
788
 
      if(strcmp(addrstr, ip) != 0){
 
789
 
        fprintf_plus(stderr, "Canonical address form: %s\n", addrstr);
 
 
920
    if(ret == EAI_SYSTEM){
 
 
921
      perror_plus("getnameinfo");
 
 
922
    } else if(ret != 0) {
 
 
923
      fprintf_plus(stderr, "getnameinfo: %s", gai_strerror(ret));
 
 
924
    } else if(strcmp(addrstr, ip) != 0){
 
 
925
      fprintf_plus(stderr, "Canonical address form: %s\n", addrstr);
 
 
1452
1593
  if(setuid(0) == -1){
 
1453
1594
    ret_errno = errno;
 
1454
 
    perror_plus("seteuid");
 
1456
1596
  errno = old_errno;
 
1457
1597
  return ret_errno;
 
1460
1600
/* Set effective user ID to unprivileged saved user ID */
 
 
1601
__attribute__((warn_unused_result))
 
1461
1602
error_t lower_privileges(void){
 
1462
1603
  error_t old_errno = errno;
 
1463
1604
  error_t ret_errno = 0;
 
1464
1605
  if(seteuid(uid) == -1){
 
1465
1606
    ret_errno = errno;
 
1466
 
    perror_plus("seteuid");
 
1468
1608
  errno = old_errno;
 
1469
1609
  return ret_errno;
 
1472
1612
/* Lower privileges permanently */
 
 
1613
__attribute__((warn_unused_result))
 
1473
1614
error_t lower_privileges_permanently(void){
 
1474
1615
  error_t old_errno = errno;
 
1475
1616
  error_t ret_errno = 0;
 
1476
1617
  if(setuid(uid) == -1){
 
1477
1618
    ret_errno = errno;
 
1478
 
    perror_plus("setuid");
 
1480
1620
  errno = old_errno;
 
1481
1621
  return ret_errno;
 
1484
 
bool run_network_hooks(const char *mode, const char *interface,
 
 
1624
__attribute__((nonnull))
 
 
1625
void run_network_hooks(const char *mode, const char *interface,
 
1485
1626
                       const float delay){
 
1486
 
  struct dirent **direntries;
 
 
1627
  struct dirent **direntries = NULL;
 
 
1628
  if(hookdir_fd == -1){
 
 
1629
    hookdir_fd = open(hookdir, O_RDONLY);
 
 
1630
    if(hookdir_fd == -1){
 
 
1631
      if(errno == ENOENT){
 
 
1633
          fprintf_plus(stderr, "Network hook directory \"%s\" not"
 
 
1634
                       " found\n", hookdir);
 
 
1637
        perror_plus("open");
 
 
1643
#if __GLIBC_PREREQ(2, 15)
 
 
1644
  int numhooks = scandirat(hookdir_fd, ".", &direntries,
 
 
1645
                           runnable_hook, alphasort);
 
 
1646
#else  /* not __GLIBC_PREREQ(2, 15) */
 
 
1647
  int numhooks = scandir(hookdir, &direntries, runnable_hook,
 
 
1649
#endif  /* not __GLIBC_PREREQ(2, 15) */
 
 
1650
#else   /* not __GLIBC__ */
 
 
1651
  int numhooks = scandir(hookdir, &direntries, runnable_hook,
 
 
1653
#endif  /* not __GLIBC__ */
 
 
1655
    perror_plus("scandir");
 
1487
1658
  struct dirent *direntry;
 
1489
 
  int numhooks = scandir(hookdir, &direntries, runnable_hook,
 
1492
 
    if(errno == ENOENT){
 
1494
 
        fprintf_plus(stderr, "Network hook directory \"%s\" not"
 
1495
 
                     " found\n", hookdir);
 
1498
 
      perror_plus("scandir");
 
 
1660
  int devnull = open("/dev/null", O_RDONLY);
 
 
1661
  for(int i = 0; i < numhooks; i++){
 
 
1662
    direntry = direntries[i];
 
 
1664
      fprintf_plus(stderr, "Running network hook \"%s\"\n",
 
1501
 
    int devnull = open("/dev/null", O_RDONLY);
 
1502
 
    for(int i = 0; i < numhooks; i++){
 
1503
 
      direntry = direntries[i];
 
1504
 
      char *fullname = NULL;
 
1505
 
      ret = asprintf(&fullname, "%s/%s", hookdir, direntry->d_name);
 
 
1667
    pid_t hook_pid = fork();
 
 
1670
      /* Raise privileges */
 
 
1671
      errno = raise_privileges_permanently();
 
 
1673
        perror_plus("Failed to raise privileges");
 
 
1680
        perror_plus("setgid");
 
 
1683
      /* Reset supplementary groups */
 
 
1685
      ret = setgroups(0, NULL);
 
 
1687
        perror_plus("setgroups");
 
 
1690
      ret = dup2(devnull, STDIN_FILENO);
 
 
1692
        perror_plus("dup2(devnull, STDIN_FILENO)");
 
 
1695
      ret = close(devnull);
 
 
1697
        perror_plus("close");
 
 
1700
      ret = dup2(STDERR_FILENO, STDOUT_FILENO);
 
 
1702
        perror_plus("dup2(STDERR_FILENO, STDOUT_FILENO)");
 
 
1705
      ret = setenv("MANDOSNETHOOKDIR", hookdir, 1);
 
 
1707
        perror_plus("setenv");
 
 
1710
      ret = setenv("DEVICE", interface, 1);
 
 
1712
        perror_plus("setenv");
 
 
1715
      ret = setenv("VERBOSITY", debug ? "1" : "0", 1);
 
 
1717
        perror_plus("setenv");
 
 
1720
      ret = setenv("MODE", mode, 1);
 
 
1722
        perror_plus("setenv");
 
 
1726
      ret = asprintf(&delaystring, "%f", (double)delay);
 
1507
1728
        perror_plus("asprintf");
 
1511
 
        fprintf_plus(stderr, "Running network hook \"%s\"\n",
 
1514
 
      pid_t hook_pid = fork();
 
1517
 
        /* Raise privileges */
 
1518
 
        raise_privileges_permanently();
 
1523
 
          perror_plus("setgid");
 
1525
 
        /* Reset supplementary groups */
 
1527
 
        ret = setgroups(0, NULL);
 
1529
 
          perror_plus("setgroups");
 
1531
 
        dup2(devnull, STDIN_FILENO);
 
1533
 
        dup2(STDERR_FILENO, STDOUT_FILENO);
 
1534
 
        ret = setenv("MANDOSNETHOOKDIR", hookdir, 1);
 
1536
 
          perror_plus("setenv");
 
1539
 
        ret = setenv("DEVICE", interface, 1);
 
1541
 
          perror_plus("setenv");
 
1544
 
        ret = setenv("VERBOSITY", debug ? "1" : "0", 1);
 
1546
 
          perror_plus("setenv");
 
1549
 
        ret = setenv("MODE", mode, 1);
 
1551
 
          perror_plus("setenv");
 
1555
 
        ret = asprintf(&delaystring, "%f", delay);
 
1557
 
          perror_plus("asprintf");
 
1560
 
        ret = setenv("DELAY", delaystring, 1);
 
1563
 
          perror_plus("setenv");
 
 
1731
      ret = setenv("DELAY", delaystring, 1);
 
1566
1733
        free(delaystring);
 
1567
 
        if(connect_to != NULL){
 
1568
 
          ret = setenv("CONNECT", connect_to, 1);
 
1570
 
            perror_plus("setenv");
 
1574
 
        if(execl(fullname, direntry->d_name, mode, NULL) == -1){
 
1575
 
          perror_plus("execl");
 
1576
 
          _exit(EXIT_FAILURE);
 
 
1734
        perror_plus("setenv");
 
 
1738
      if(connect_to != NULL){
 
 
1739
        ret = setenv("CONNECT", connect_to, 1);
 
 
1741
          perror_plus("setenv");
 
 
1745
      int hook_fd = openat(hookdir_fd, direntry->d_name, O_RDONLY);
 
 
1747
        perror_plus("openat");
 
 
1748
        _exit(EXIT_FAILURE);
 
 
1750
      if((int)TEMP_FAILURE_RETRY(close(hookdir_fd)) == -1){
 
 
1751
        perror_plus("close");
 
 
1752
        _exit(EXIT_FAILURE);
 
 
1754
      if(fexecve(hook_fd, (char *const []){ direntry->d_name, NULL },
 
 
1756
        perror_plus("fexecve");
 
 
1757
        _exit(EXIT_FAILURE);
 
 
1761
        perror_plus("fork");
 
 
1766
      if(TEMP_FAILURE_RETRY(waitpid(hook_pid, &status, 0)) == -1){
 
 
1767
        perror_plus("waitpid");
 
 
1771
      if(WIFEXITED(status)){
 
 
1772
        if(WEXITSTATUS(status) != 0){
 
 
1773
          fprintf_plus(stderr, "Warning: network hook \"%s\" exited"
 
 
1774
                       " with status %d\n", direntry->d_name,
 
 
1775
                       WEXITSTATUS(status));
 
 
1779
      } else if(WIFSIGNALED(status)){
 
 
1780
        fprintf_plus(stderr, "Warning: network hook \"%s\" died by"
 
 
1781
                     " signal %d\n", direntry->d_name,
 
1580
 
        if(TEMP_FAILURE_RETRY(waitpid(hook_pid, &status, 0)) == -1){
 
1581
 
          perror_plus("waitpid");
 
1585
 
        if(WIFEXITED(status)){
 
1586
 
          if(WEXITSTATUS(status) != 0){
 
1587
 
            fprintf_plus(stderr, "Warning: network hook \"%s\" exited"
 
1588
 
                         " with status %d\n", direntry->d_name,
 
1589
 
                         WEXITSTATUS(status));
 
1593
 
        } else if(WIFSIGNALED(status)){
 
1594
 
          fprintf_plus(stderr, "Warning: network hook \"%s\" died by"
 
1595
 
                       " signal %d\n", direntry->d_name,
 
1600
 
          fprintf_plus(stderr, "Warning: network hook \"%s\""
 
1601
 
                       " crashed\n", direntry->d_name);
 
1608
 
        fprintf_plus(stderr, "Network hook \"%s\" ran successfully\n",
 
 
1786
        fprintf_plus(stderr, "Warning: network hook \"%s\""
 
 
1787
                     " crashed\n", direntry->d_name);
 
 
1793
      fprintf_plus(stderr, "Network hook \"%s\" ran successfully\n",
 
 
1799
  if((int)TEMP_FAILURE_RETRY(close(hookdir_fd)) == -1){
 
 
1800
    perror_plus("close");
 
 
1807
__attribute__((nonnull, warn_unused_result))
 
1617
1808
error_t bring_up_interface(const char *const interface,
 
1618
1809
                           const float delay){
 
1620
1810
  error_t old_errno = errno;
 
1621
 
  error_t ret_errno = 0;
 
1622
 
  int ret, ret_setflags;
 
1623
1812
  struct ifreq network;
 
1624
1813
  unsigned int if_index = if_nametoindex(interface);
 
1625
1814
  if(if_index == 0){
 
 
2437
2676
    mc.current_server->prev->next = NULL;
 
2438
2677
    while(mc.current_server != NULL){
 
2439
2678
      server *next = mc.current_server->next;
 
 
2680
#pragma GCC diagnostic push
 
 
2681
#pragma GCC diagnostic ignored "-Wcast-qual"
 
 
2683
      free((char *)(mc.current_server->ip));
 
 
2685
#pragma GCC diagnostic pop
 
2440
2687
      free(mc.current_server);
 
2441
2688
      mc.current_server = next;
 
2445
 
  /* Re-raise priviliges */
 
 
2692
  /* Re-raise privileges */
 
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();
 
 
2694
    ret_errno = raise_privileges();
 
 
2697
      perror_plus("Failed to raise privileges");
 
 
2700
      /* Run network hooks */
 
 
2701
      run_network_hooks("stop", interfaces_hooks != NULL ?
 
 
2702
                        interfaces_hooks : "", delay);
 
 
2704
      /* Take down the network interfaces which were brought up */
 
 
2706
        char *interface = NULL;
 
 
2707
        while((interface=argz_next(interfaces_to_take_down,
 
 
2708
                                   interfaces_to_take_down_size,
 
 
2710
          ret_errno = take_down_interface(interface);
 
 
2713
            perror_plus("Failed to take down interface");
 
 
2716
        if(debug and (interfaces_to_take_down == NULL)){
 
 
2717
          fprintf_plus(stderr, "No interfaces needed to be taken"
 
 
2723
    ret_errno = lower_privileges_permanently();
 
 
2726
      perror_plus("Failed to lower privileges permanently");
 
2474
2730
  free(interfaces_to_take_down);
 
2475
2731
  free(interfaces_hooks);
 
2477
2733
  /* Removes the GPGME temp directory and all files inside */
 
2478
 
  if(tempdir_created){
 
 
2734
  if(tempdir != NULL){
 
2479
2735
    struct dirent **direntries = NULL;
 
2480
 
    struct dirent *direntry = NULL;
 
2481
 
    int numentries = scandir(tempdir, &direntries, notdotentries,
 
2483
 
    if (numentries > 0){
 
2484
 
      for(int i = 0; i < numentries; i++){
 
2485
 
        direntry = direntries[i];
 
2486
 
        char *fullname = NULL;
 
2487
 
        ret = asprintf(&fullname, "%s/%s", tempdir,
 
2490
 
          perror_plus("asprintf");
 
2493
 
        ret = remove(fullname);
 
2495
 
          fprintf_plus(stderr, "remove(\"%s\"): %s\n", fullname,
 
 
2736
    int tempdir_fd = (int)TEMP_FAILURE_RETRY(open(tempdir, O_RDONLY |
 
 
2738
    if(tempdir_fd == -1){
 
 
2739
      perror_plus("open");
 
 
2742
#if __GLIBC_PREREQ(2, 15)
 
 
2743
      int numentries = scandirat(tempdir_fd, ".", &direntries,
 
 
2744
                                 notdotentries, alphasort);
 
 
2745
#else  /* not __GLIBC_PREREQ(2, 15) */
 
 
2746
      int numentries = scandir(tempdir, &direntries, notdotentries,
 
 
2748
#endif  /* not __GLIBC_PREREQ(2, 15) */
 
 
2749
#else   /* not __GLIBC__ */
 
 
2750
      int numentries = scandir(tempdir, &direntries, notdotentries,
 
 
2752
#endif  /* not __GLIBC__ */
 
 
2753
      if(numentries >= 0){
 
 
2754
        for(int i = 0; i < numentries; i++){
 
 
2755
          ret = unlinkat(tempdir_fd, direntries[i]->d_name, 0);
 
 
2757
            fprintf_plus(stderr, "unlinkat(open(\"%s\", O_RDONLY),"
 
 
2758
                         " \"%s\", 0): %s\n", tempdir,
 
 
2759
                         direntries[i]->d_name, strerror(errno));
 
 
2761
          free(direntries[i]);
 
 
2764
        /* need to clean even if 0 because man page doesn't specify */
 
 
2766
        if(numentries == -1){
 
 
2767
          perror_plus("scandir");
 
 
2769
        ret = rmdir(tempdir);
 
 
2770
        if(ret == -1 and errno != ENOENT){
 
 
2771
          perror_plus("rmdir");
 
2502
 
    /* need to clean even if 0 because man page doesn't specify */
 
2504
 
    if (numentries == -1){
 
2505
 
      perror_plus("scandir");
 
2507
 
    ret = rmdir(tempdir);
 
2508
 
    if(ret == -1 and errno != ENOENT){
 
2509
 
      perror_plus("rmdir");
 
 
2774
      TEMP_FAILURE_RETRY(close(tempdir_fd));