/mandos/release

To get this branch, use:
bzr branch http://bzr.recompile.se/loggerhead/mandos/release

« back to all changes in this revision

Viewing changes to plugins.d/mandos-client.c

  • Committer: Teddy Hogeborn
  • Date: 2015-05-25 07:54:07 UTC
  • mto: (237.7.304 trunk)
  • mto: This revision was merged to the branch mainline in revision 325.
  • Revision ID: teddy@recompile.se-20150525075407-x7u0z4f1zej6bm87
mandos (subprocess_call_pipe): Rename to "call_pipe" and take "func".

Generalize "subprocess_call_pipe" to "call_pipe" which takes an
additional "func" argument which is the function to be run.

Show diffs side-by-side

added added

removed removed

Lines of Context:
plugins.d/mandos-client.c
234
234
                          .af = af };
235
235
  if(new_server->ip == NULL){
236
236
    perror_plus("strdup");
 
237
    free(new_server);
237
238
    return false;
238
239
  }
239
240
  ret = clock_gettime(CLOCK_MONOTONIC, &(new_server->last_seen));
240
241
  if(ret == -1){
241
242
    perror_plus("clock_gettime");
 
243
#ifdef __GNUC__
 
244
#pragma GCC diagnostic push
 
245
#pragma GCC diagnostic ignored "-Wcast-qual"
 
246
#endif
 
247
    free((char *)(new_server->ip));
 
248
#ifdef __GNUC__
 
249
#pragma GCC diagnostic pop
 
250
#endif
 
251
    free(new_server);
242
252
    return false;
243
253
  }
244
254
  /* Special case of first server */
483
493
  return plaintext_length;
484
494
}
485
495
 
 
496
__attribute__((warn_unused_result, const))
 
497
static const char *safe_string(const char *str){
 
498
  if(str == NULL)
 
499
    return "(unknown)";
 
500
  return str;
 
501
}
 
502
 
486
503
__attribute__((warn_unused_result))
487
504
static const char *safer_gnutls_strerror(int value){
488
505
  const char *ret = gnutls_strerror(value);
489
 
  if(ret == NULL)
490
 
    ret = "(unknown)";
491
 
  return ret;
 
506
  return safe_string(ret);
492
507
}
493
508
 
494
509
/* GnuTLS log function callback */
503
518
                              const char *seckeyfilename,
504
519
                              mandos_context *mc){
505
520
  int ret;
 
521
  unsigned int uret;
506
522
  
507
523
  if(debug){
508
524
    fprintf_plus(stderr, "Initializing GnuTLS\n");
559
575
                 safer_gnutls_strerror(ret));
560
576
    goto globalfail;
561
577
  }
 
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 };
 
582
    {
 
583
      int secfile = open(seckeyfilename, O_RDONLY);
 
584
      size_t buffer_capacity = 0;
 
585
      while(true){
 
586
        buffer_capacity = incbuffer((char **)&buffer.data,
 
587
                                    (size_t)buffer.size,
 
588
                                    (size_t)buffer_capacity);
 
589
        if(buffer_capacity == 0){
 
590
          perror_plus("incbuffer");
 
591
          free(buffer.data);
 
592
          buffer.data = NULL;
 
593
          break;
 
594
        }
 
595
        ssize_t bytes_read = read(secfile, buffer.data + buffer.size,
 
596
                                  BUFFER_SIZE);
 
597
        /* EOF */
 
598
        if(bytes_read == 0){
 
599
          break;
 
600
        }
 
601
        /* check bytes_read for failure */
 
602
        if(bytes_read < 0){
 
603
          perror_plus("read");
 
604
          free(buffer.data);
 
605
          buffer.data = NULL;
 
606
          break;
 
607
        }
 
608
        buffer.size += (unsigned int)bytes_read;
 
609
      }
 
610
      close(secfile);
 
611
    }
 
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){
 
615
      {
 
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));
 
621
          free(buffer.data);
 
622
          buffer.data = NULL;
 
623
        } else {
 
624
          ret = gnutls_openpgp_privkey_import(privkey, &buffer,
 
625
                                            GNUTLS_OPENPGP_FMT_BASE64,
 
626
                                              "", 0);
 
627
          if(ret != GNUTLS_E_SUCCESS){
 
628
            fprintf_plus(stderr, "Error importing OpenPGP key : %s",
 
629
                         safer_gnutls_strerror(ret));
 
630
            privkey = NULL;
 
631
          }
 
632
          free(buffer.data);
 
633
          buffer.data = NULL;
 
634
          if(privkey != NULL){
 
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);
 
638
            if(debug){
 
639
              fprintf_plus(stderr, "This OpenPGP key implies using a"
 
640
                           " GnuTLS security parameter \"%s\".\n",
 
641
                           safe_string(gnutls_sec_param_get_name
 
642
                                       (sec_param)));
 
643
            }
 
644
          }
 
645
        }
 
646
      }
 
647
      if(sec_param == GNUTLS_SEC_PARAM_UNKNOWN){
 
648
        /* Err on the side of caution */
 
649
        sec_param = GNUTLS_SEC_PARAM_ULTRA;
 
650
        if(debug){
 
651
          fprintf_plus(stderr, "Falling back to security parameter"
 
652
                       " \"%s\"\n",
 
653
                       safe_string(gnutls_sec_param_get_name
 
654
                                   (sec_param)));
 
655
        }
 
656
      }
 
657
    }
 
658
    uret = gnutls_sec_param_to_pk_bits(GNUTLS_PK_DH, sec_param);
 
659
    if(uret != 0){
 
660
      mc->dh_bits = uret;
 
661
      if(debug){
 
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
 
665
                                 (sec_param)),
 
666
                     mc->dh_bits);
 
667
      }
 
668
    } else {
 
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));
 
673
      goto globalfail;
 
674
    }
 
675
  } else if(debug){
 
676
    fprintf_plus(stderr, "DH bits explicitly set to %u\n",
 
677
                 mc->dh_bits);
 
678
  }
562
679
  ret = gnutls_dh_params_generate2(mc->dh_params, mc->dh_bits);
563
680
  if(ret != GNUTLS_E_SUCCESS){
564
 
    fprintf_plus(stderr, "Error in GnuTLS prime generation: %s\n",
565
 
                 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));
566
683
    goto globalfail;
567
684
  }
568
685
  
1066
1183
     timed out */
1067
1184
  
1068
1185
  if(quit_now){
 
1186
    avahi_s_service_resolver_free(r);
1069
1187
    return;
1070
1188
  }
1071
1189
  
1458
1576
  error_t ret_errno = 0;
1459
1577
  if(seteuid(0) == -1){
1460
1578
    ret_errno = errno;
1461
 
    perror_plus("seteuid");
1462
1579
  }
1463
1580
  errno = old_errno;
1464
1581
  return ret_errno;
1475
1592
  }
1476
1593
  if(setuid(0) == -1){
1477
1594
    ret_errno = errno;
1478
 
    perror_plus("seteuid");
1479
1595
  }
1480
1596
  errno = old_errno;
1481
1597
  return ret_errno;
1488
1604
  error_t ret_errno = 0;
1489
1605
  if(seteuid(uid) == -1){
1490
1606
    ret_errno = errno;
1491
 
    perror_plus("seteuid");
1492
1607
  }
1493
1608
  errno = old_errno;
1494
1609
  return ret_errno;
1501
1616
  error_t ret_errno = 0;
1502
1617
  if(setuid(uid) == -1){
1503
1618
    ret_errno = errno;
1504
 
    perror_plus("setuid");
1505
1619
  }
1506
1620
  errno = old_errno;
1507
1621
  return ret_errno;
1508
1622
}
1509
1623
 
1510
 
#ifndef O_CLOEXEC
1511
 
/*
1512
 
 * Based on the example in the GNU LibC manual chapter 13.13 "File
1513
 
 * Descriptor Flags".
1514
 
 | [[info:libc:Descriptor%20Flags][File Descriptor Flags]] |
1515
 
 */
1516
 
__attribute__((warn_unused_result))
1517
 
static int set_cloexec_flag(int fd){
1518
 
  int ret = (int)TEMP_FAILURE_RETRY(fcntl(fd, F_GETFD, 0));
1519
 
  /* If reading the flags failed, return error indication now. */
1520
 
  if(ret < 0){
1521
 
    return ret;
1522
 
  }
1523
 
  /* Store modified flag word in the descriptor. */
1524
 
  return (int)TEMP_FAILURE_RETRY(fcntl(fd, F_SETFD,
1525
 
                                       ret | FD_CLOEXEC));
1526
 
}
1527
 
#endif  /* not O_CLOEXEC */
1528
 
 
1529
1624
__attribute__((nonnull))
1530
1625
void run_network_hooks(const char *mode, const char *interface,
1531
1626
                       const float delay){
1532
 
  struct dirent **direntries;
 
1627
  struct dirent **direntries = NULL;
1533
1628
  if(hookdir_fd == -1){
1534
 
    hookdir_fd = open(hookdir, O_RDONLY |
1535
 
#ifdef O_CLOEXEC
1536
 
                      O_CLOEXEC
1537
 
#else  /* not O_CLOEXEC */
1538
 
                      0
1539
 
#endif  /* not O_CLOEXEC */
1540
 
                      );
 
1629
    hookdir_fd = open(hookdir, O_RDONLY);
1541
1630
    if(hookdir_fd == -1){
1542
1631
      if(errno == ENOENT){
1543
1632
        if(debug){
1549
1638
      }
1550
1639
      return;
1551
1640
    }
1552
 
#ifndef O_CLOEXEC
1553
 
    if(set_cloexec_flag(hookdir_fd) < 0){
1554
 
      perror_plus("set_cloexec_flag");
1555
 
      if((int)TEMP_FAILURE_RETRY(close(hookdir_fd)) == -1){
1556
 
        perror_plus("close");
1557
 
      } else {
1558
 
        hookdir_fd = -1;
1559
 
      }
1560
 
      return;
1561
 
    }
1562
 
#endif  /* not O_CLOEXEC */
1563
1641
  }
1564
1642
#ifdef __GLIBC__
1565
1643
#if __GLIBC_PREREQ(2, 15)
1590
1668
    if(hook_pid == 0){
1591
1669
      /* Child */
1592
1670
      /* Raise privileges */
1593
 
      if(raise_privileges_permanently() != 0){
 
1671
      errno = raise_privileges_permanently();
 
1672
      if(errno != 0){
1594
1673
        perror_plus("Failed to raise privileges");
1595
1674
        _exit(EX_NOPERM);
1596
1675
      }
1663
1742
          _exit(EX_OSERR);
1664
1743
        }
1665
1744
      }
1666
 
      if(fexecve(hookdir_fd, (char *const [])
1667
 
                 { direntry->d_name, NULL }, environ) == -1){
 
1745
      int hook_fd = openat(hookdir_fd, direntry->d_name, O_RDONLY);
 
1746
      if(hook_fd == -1){
 
1747
        perror_plus("openat");
 
1748
        _exit(EXIT_FAILURE);
 
1749
      }
 
1750
      if((int)TEMP_FAILURE_RETRY(close(hookdir_fd)) == -1){
 
1751
        perror_plus("close");
 
1752
        _exit(EXIT_FAILURE);
 
1753
      }
 
1754
      if(fexecve(hook_fd, (char *const []){ direntry->d_name, NULL },
 
1755
                 environ) == -1){
1668
1756
        perror_plus("fexecve");
1669
1757
        _exit(EXIT_FAILURE);
1670
1758
      }
1671
1759
    } else {
 
1760
      if(hook_pid == -1){
 
1761
        perror_plus("fork");
 
1762
        free(direntry);
 
1763
        continue;
 
1764
      }
1672
1765
      int status;
1673
1766
      if(TEMP_FAILURE_RETRY(waitpid(hook_pid, &status, 0)) == -1){
1674
1767
        perror_plus("waitpid");
 
1768
        free(direntry);
1675
1769
        continue;
1676
1770
      }
1677
1771
      if(WIFEXITED(status)){
1679
1773
          fprintf_plus(stderr, "Warning: network hook \"%s\" exited"
1680
1774
                       " with status %d\n", direntry->d_name,
1681
1775
                       WEXITSTATUS(status));
 
1776
          free(direntry);
1682
1777
          continue;
1683
1778
        }
1684
1779
      } else if(WIFSIGNALED(status)){
1685
1780
        fprintf_plus(stderr, "Warning: network hook \"%s\" died by"
1686
1781
                     " signal %d\n", direntry->d_name,
1687
1782
                     WTERMSIG(status));
 
1783
        free(direntry);
1688
1784
        continue;
1689
1785
      } else {
1690
1786
        fprintf_plus(stderr, "Warning: network hook \"%s\""
1691
1787
                     " crashed\n", direntry->d_name);
 
1788
        free(direntry);
1692
1789
        continue;
1693
1790
      }
1694
1791
    }
1696
1793
      fprintf_plus(stderr, "Network hook \"%s\" ran successfully\n",
1697
1794
                   direntry->d_name);
1698
1795
    }
 
1796
    free(direntry);
1699
1797
  }
 
1798
  free(direntries);
1700
1799
  if((int)TEMP_FAILURE_RETRY(close(hookdir_fd)) == -1){
1701
1800
    perror_plus("close");
1702
1801
  } else {
1759
1858
    /* Raise privileges */
1760
1859
    ret_errno = raise_privileges();
1761
1860
    if(ret_errno != 0){
 
1861
      errno = ret_errno;
1762
1862
      perror_plus("Failed to raise privileges");
1763
1863
    }
1764
1864
    
1868
1968
    /* Raise privileges */
1869
1969
    ret_errno = raise_privileges();
1870
1970
    if(ret_errno != 0){
 
1971
      errno = ret_errno;
1871
1972
      perror_plus("Failed to raise privileges");
1872
1973
    }
1873
1974
    
1906
2007
}
1907
2008
 
1908
2009
int main(int argc, char *argv[]){
1909
 
  mandos_context mc = { .server = NULL, .dh_bits = 1024,
 
2010
  mandos_context mc = { .server = NULL, .dh_bits = 0,
1910
2011
                        .priority = "SECURE256:!CTYPE-X.509:"
1911
 
                        "+CTYPE-OPENPGP", .current_server = NULL,
 
2012
                        "+CTYPE-OPENPGP:!RSA", .current_server = NULL,
1912
2013
                        .interfaces = NULL, .interfaces_size = 0 };
1913
2014
  AvahiSServiceBrowser *sb = NULL;
1914
2015
  error_t ret_errno;
2280
2381
  
2281
2382
  /* If no interfaces were specified, make a list */
2282
2383
  if(mc.interfaces == NULL){
2283
 
    struct dirent **direntries;
 
2384
    struct dirent **direntries = NULL;
2284
2385
    /* Look for any good interfaces */
2285
2386
    ret = scandir(sys_class_net, &direntries, good_interface,
2286
2387
                  alphasort);
2292
2393
        if(ret_errno != 0){
2293
2394
          errno = ret_errno;
2294
2395
          perror_plus("argz_add");
 
2396
          free(direntries[i]);
2295
2397
          continue;
2296
2398
        }
2297
2399
        if(debug){
2298
2400
          fprintf_plus(stderr, "Will use interface \"%s\"\n",
2299
2401
                       direntries[i]->d_name);
2300
2402
        }
 
2403
        free(direntries[i]);
2301
2404
      }
2302
2405
      free(direntries);
2303
2406
    } else {
2304
 
      free(direntries);
 
2407
      if(ret == 0){
 
2408
        free(direntries);
 
2409
      }
2305
2410
      fprintf_plus(stderr, "Could not find a network interface\n");
2306
2411
      exitcode = EXIT_FAILURE;
2307
2412
      goto end;
2571
2676
    mc.current_server->prev->next = NULL;
2572
2677
    while(mc.current_server != NULL){
2573
2678
      server *next = mc.current_server->next;
 
2679
#ifdef __GNUC__
 
2680
#pragma GCC diagnostic push
 
2681
#pragma GCC diagnostic ignored "-Wcast-qual"
 
2682
#endif
 
2683
      free((char *)(mc.current_server->ip));
 
2684
#ifdef __GNUC__
 
2685
#pragma GCC diagnostic pop
 
2686
#endif
2574
2687
      free(mc.current_server);
2575
2688
      mc.current_server = next;
2576
2689
    }
2580
2693
  {
2581
2694
    ret_errno = raise_privileges();
2582
2695
    if(ret_errno != 0){
 
2696
      errno = ret_errno;
2583
2697
      perror_plus("Failed to raise privileges");
2584
2698
    } else {
2585
2699
      
2608
2722
    
2609
2723
    ret_errno = lower_privileges_permanently();
2610
2724
    if(ret_errno != 0){
 
2725
      errno = ret_errno;
2611
2726
      perror_plus("Failed to lower privileges permanently");
2612
2727
    }
2613
2728
  }
2618
2733
  /* Removes the GPGME temp directory and all files inside */
2619
2734
  if(tempdir != NULL){
2620
2735
    struct dirent **direntries = NULL;
2621
 
    int tempdir_fd = (int)TEMP_FAILURE_RETRY(open(tempdir, O_RDONLY));
 
2736
    int tempdir_fd = (int)TEMP_FAILURE_RETRY(open(tempdir, O_RDONLY |
 
2737
                                                  O_NOFOLLOW));
2622
2738
    if(tempdir_fd == -1){
2623
2739
      perror_plus("open");
2624
2740
    } else {
2634
2750
      int numentries = scandir(tempdir, &direntries, notdotentries,
2635
2751
                               alphasort);
2636
2752
#endif  /* not __GLIBC__ */
2637
 
      if(numentries > 0){
 
2753
      if(numentries >= 0){
2638
2754
        for(int i = 0; i < numentries; i++){
2639
2755
          ret = unlinkat(tempdir_fd, direntries[i]->d_name, 0);
2640
2756
          if(ret == -1){
2642
2758
                         " \"%s\", 0): %s\n", tempdir,
2643
2759
                         direntries[i]->d_name, strerror(errno));
2644
2760
          }
 
2761
          free(direntries[i]);
2645
2762
        }
2646
2763
        
2647
2764
        /* need to clean even if 0 because man page doesn't specify */