9
9
 * "browse_callback", and parts of "main".
 
11
11
 * Everything else is
 
12
 
 * Copyright © 2008-2018 Teddy Hogeborn
 
13
 
 * Copyright © 2008-2018 Björn Påhlsson
 
 
12
 * Copyright © 2008-2019 Teddy Hogeborn
 
 
13
 * Copyright © 2008-2019 Björn Påhlsson
 
15
15
 * This file is part of Mandos.
 
 
124
124
                                   init_gnutls_session(),
 
 
126
#if GNUTLS_VERSION_NUMBER < 0x030600
 
126
127
#include <gnutls/openpgp.h>
 
127
128
                         /* gnutls_certificate_set_openpgp_key_file(),
 
128
129
                            GNUTLS_OPENPGP_FMT_BASE64 */
 
 
130
#elif GNUTLS_VERSION_NUMBER >= 0x030606
 
 
131
#include <gnutls/x509.h>        /* gnutls_pkcs_encrypt_flags_t,
 
 
133
                                 GNUTLS_PKCS_NULL_PASSWORD */
 
131
137
#include <gpgme.h>              /* All GPGME types, constants and
 
 
139
145
#define PATHDIR "/conf/conf.d/mandos"
 
140
146
#define SECKEY "seckey.txt"
 
141
147
#define PUBKEY "pubkey.txt"
 
 
148
#define TLS_PRIVKEY "tls-privkey.pem"
 
 
149
#define TLS_PUBKEY "tls-pubkey.pem"
 
142
150
#define HOOKDIR "/lib/mandos/network-hooks.d"
 
144
152
bool debug = false;
 
 
 
283
/* Set effective uid to 0, return errno */
 
 
284
__attribute__((warn_unused_result))
 
 
285
int raise_privileges(void){
 
 
286
  int old_errno = errno;
 
 
288
  if(seteuid(0) == -1){
 
 
295
/* Set effective and real user ID to 0.  Return errno. */
 
 
296
__attribute__((warn_unused_result))
 
 
297
int raise_privileges_permanently(void){
 
 
298
  int old_errno = errno;
 
 
299
  int ret = raise_privileges();
 
 
311
/* Set effective user ID to unprivileged saved user ID */
 
 
312
__attribute__((warn_unused_result))
 
 
313
int lower_privileges(void){
 
 
314
  int old_errno = errno;
 
 
316
  if(seteuid(uid) == -1){
 
 
323
/* Lower privileges permanently */
 
 
324
__attribute__((warn_unused_result))
 
 
325
int lower_privileges_permanently(void){
 
 
326
  int old_errno = errno;
 
 
328
  if(setuid(uid) == -1){
 
276
336
 * Initialize GPGME.
 
 
 
360
    /* Workaround for systems without a real-time clock; see also
 
 
361
       Debian bug #894495: <https://bugs.debian.org/894495> */
 
 
364
        time_t currtime = time(NULL);
 
 
365
        if(currtime != (time_t)-1){
 
 
367
          if(gmtime_r(&currtime, &tm) == NULL) {
 
 
368
            perror_plus("gmtime_r");
 
 
371
          if(tm.tm_year != 70 or tm.tm_mon != 0){
 
 
375
            fprintf_plus(stderr, "System clock is January 1970");
 
 
379
            fprintf_plus(stderr, "System clock is invalid");
 
 
384
      ret = fstat(fd, &keystat);
 
 
386
        perror_plus("fstat");
 
 
389
      ret = raise_privileges();
 
 
392
        perror_plus("Failed to raise privileges");
 
 
397
                     "Setting system clock to key file mtime");
 
 
399
      time_t keytime = keystat.st_mtim.tv_sec;
 
 
400
      if(stime(&keytime) != 0){
 
 
401
        perror_plus("stime");
 
 
403
      ret = lower_privileges();
 
 
406
        perror_plus("Failed to lower privileges");
 
300
410
    rc = gpgme_data_new_from_fd(&pgp_data, fd);
 
301
411
    if(rc != GPG_ERR_NO_ERROR){
 
302
412
      fprintf_plus(stderr, "bad gpgme_data_new_from_fd: %s: %s\n",
 
 
623
 
    fprintf_plus(stderr, "Attempting to use OpenPGP public key %s and"
 
624
 
                 " secret key %s as GnuTLS credentials\n",
 
 
732
    fprintf_plus(stderr, "Attempting to use public key %s and"
 
 
733
                 " private key %s as GnuTLS credentials\n",
 
 
738
#if GNUTLS_VERSION_NUMBER >= 0x030606
 
 
739
  ret = gnutls_certificate_set_rawpk_key_file
 
 
740
    (mc->cred, pubkeyfilename, seckeyfilename,
 
 
741
     GNUTLS_X509_FMT_PEM,       /* format */
 
 
744
     GNUTLS_KEY_DIGITAL_SIGNATURE | GNUTLS_KEY_KEY_ENCIPHERMENT,
 
 
746
     0,                         /* names_length */
 
 
748
     GNUTLS_PKCS_PLAIN | GNUTLS_PKCS_NULL_PASSWORD,
 
 
749
     0);                        /* pkcs11_flags */
 
 
750
#elif GNUTLS_VERSION_NUMBER < 0x030600
 
629
751
  ret = gnutls_certificate_set_openpgp_key_file
 
630
752
    (mc->cred, pubkeyfilename, seckeyfilename,
 
631
753
     GNUTLS_OPENPGP_FMT_BASE64);
 
 
755
#error "Needs GnuTLS 3.6.6 or later, or before 3.6.0"
 
632
757
  if(ret != GNUTLS_E_SUCCESS){
 
633
758
    fprintf_plus(stderr,
 
634
 
                 "Error[%d] while reading the OpenPGP key pair ('%s',"
 
 
759
                 "Error[%d] while reading the key pair ('%s',"
 
635
760
                 " '%s')\n", ret, pubkeyfilename, seckeyfilename);
 
636
761
    fprintf_plus(stderr, "The GnuTLS error is: %s\n",
 
637
762
                 safer_gnutls_strerror(ret));
 
 
709
834
  if(dhparamsfilename == NULL){
 
710
835
    if(mc->dh_bits == 0){
 
 
836
#if GNUTLS_VERSION_NUMBER < 0x030600
 
711
837
      /* Find out the optimal number of DH bits */
 
712
838
      /* Try to read the private key file */
 
713
839
      gnutls_datum_t buffer = { .data = NULL, .size = 0 };
 
 
811
937
                     safer_gnutls_strerror(ret));
 
815
 
      fprintf_plus(stderr, "DH bits explicitly set to %u\n",
 
818
 
    ret = gnutls_dh_params_generate2(mc->dh_params, mc->dh_bits);
 
819
 
    if(ret != GNUTLS_E_SUCCESS){
 
820
 
      fprintf_plus(stderr, "Error in GnuTLS prime generation (%u"
 
821
 
                   " bits): %s\n", mc->dh_bits,
 
822
 
                   safer_gnutls_strerror(ret));
 
 
941
    } else {                    /* dh_bits != 0 */
 
 
943
        fprintf_plus(stderr, "DH bits explicitly set to %u\n",
 
 
946
      ret = gnutls_dh_params_generate2(mc->dh_params, mc->dh_bits);
 
 
947
      if(ret != GNUTLS_E_SUCCESS){
 
 
948
        fprintf_plus(stderr, "Error in GnuTLS prime generation (%u"
 
 
949
                     " bits): %s\n", mc->dh_bits,
 
 
950
                     safer_gnutls_strerror(ret));
 
 
953
      gnutls_certificate_set_dh_params(mc->cred, mc->dh_params);
 
826
 
  gnutls_certificate_set_dh_params(mc->cred, mc->dh_params);
 
 
841
970
  /* GnuTLS session creation */
 
843
 
    ret = gnutls_init(session, GNUTLS_SERVER);
 
 
972
    ret = gnutls_init(session, (GNUTLS_SERVER
 
 
973
#if GNUTLS_VERSION_NUMBER >= 0x030506
 
 
976
#if GNUTLS_VERSION_NUMBER >= 0x030606
 
 
977
                                | GNUTLS_ENABLE_RAWPK
 
 
894
1030
static void empty_log(__attribute__((unused)) AvahiLogLevel level,
 
895
1031
                      __attribute__((unused)) const char *txt){}
 
897
 
/* Set effective uid to 0, return errno */
 
898
 
__attribute__((warn_unused_result))
 
899
 
int raise_privileges(void){
 
900
 
  int old_errno = errno;
 
902
 
  if(seteuid(0) == -1){
 
909
 
/* Set effective and real user ID to 0.  Return errno. */
 
910
 
__attribute__((warn_unused_result))
 
911
 
int raise_privileges_permanently(void){
 
912
 
  int old_errno = errno;
 
913
 
  int ret = raise_privileges();
 
925
 
/* Set effective user ID to unprivileged saved user ID */
 
926
 
__attribute__((warn_unused_result))
 
927
 
int lower_privileges(void){
 
928
 
  int old_errno = errno;
 
930
 
  if(seteuid(uid) == -1){
 
937
 
/* Lower privileges permanently */
 
938
 
__attribute__((warn_unused_result))
 
939
 
int lower_privileges_permanently(void){
 
940
 
  int old_errno = errno;
 
942
 
  if(setuid(uid) == -1){
 
949
1033
/* Helper function to add_local_route() and delete_local_route() */
 
950
1034
__attribute__((nonnull, warn_unused_result))
 
951
1035
static bool add_delete_local_route(const bool add,
 
 
2378
2462
int main(int argc, char *argv[]){
 
2379
2463
  mandos_context mc = { .server = NULL, .dh_bits = 0,
 
 
2464
#if GNUTLS_VERSION_NUMBER >= 0x030606
 
 
2465
                        .priority = "SECURE128:!CTYPE-X.509"
 
 
2466
                        ":+CTYPE-RAWPK:!RSA:!VERS-ALL:+VERS-TLS1.3"
 
 
2468
#elif GNUTLS_VERSION_NUMBER < 0x030600
 
2380
2469
                        .priority = "SECURE256:!CTYPE-X.509"
 
2381
2470
                        ":+CTYPE-OPENPGP:!RSA:+SIGN-DSA-SHA256",
 
 
2472
#error "Needs GnuTLS 3.6.6 or later, or before 3.6.0"
 
2382
2474
                        .current_server = NULL, .interfaces = NULL,
 
2383
2475
                        .interfaces_size = 0 };
 
2384
2476
  AvahiSServiceBrowser *sb = NULL;
 
 
2395
2487
  AvahiIfIndex if_index = AVAHI_IF_UNSPEC;
 
2396
2488
  const char *seckey = PATHDIR "/" SECKEY;
 
2397
2489
  const char *pubkey = PATHDIR "/" PUBKEY;
 
 
2490
#if GNUTLS_VERSION_NUMBER >= 0x030606
 
 
2491
  const char *tls_privkey = PATHDIR "/" TLS_PRIVKEY;
 
 
2492
  const char *tls_pubkey = PATHDIR "/" TLS_PUBKEY;
 
2398
2494
  const char *dh_params_file = NULL;
 
2399
2495
  char *interfaces_hooks = NULL;
 
 
2448
2544
      { .name = "pubkey", .key = 'p',
 
2450
2546
        .doc = "OpenPGP public key file base name",
 
 
2548
      { .name = "tls-privkey", .key = 't',
 
 
2550
#if GNUTLS_VERSION_NUMBER >= 0x030606
 
 
2551
        .doc = "TLS private key file base name",
 
 
2553
        .doc = "Dummy; ignored (requires GnuTLS 3.6.6)",
 
 
2556
      { .name = "tls-pubkey", .key = 'T',
 
 
2558
#if GNUTLS_VERSION_NUMBER >= 0x030606
 
 
2559
        .doc = "TLS public key file base name",
 
 
2561
        .doc = "Dummy; ignored (requires GnuTLS 3.6.6)",
 
2452
2564
      { .name = "dh-bits", .key = 129,
 
2454
2566
        .doc = "Bit length of the prime number used in the"
 
 
2510
2622
      case 'p':                 /* --pubkey */
 
 
2625
      case 't':                 /* --tls-privkey */
 
 
2626
#if GNUTLS_VERSION_NUMBER >= 0x030606
 
 
2630
      case 'T':                 /* --tls-pubkey */
 
 
2631
#if GNUTLS_VERSION_NUMBER >= 0x030606
 
2513
2635
      case 129:                 /* --dh-bits */
 
2515
2637
        tmpmax = strtoimax(arg, &tmp, 10);
 
 
2550
2672
        argp_state_help(state, state->out_stream,
 
2551
2673
                        (ARGP_HELP_STD_HELP | ARGP_HELP_EXIT_ERR)
 
2552
2674
                        & ~(unsigned int)ARGP_HELP_EXIT_OK);
 
 
2675
        __builtin_unreachable();
 
2553
2676
      case -3:                  /* --usage */
 
2554
2677
        argp_state_help(state, state->out_stream,
 
2555
2678
                        ARGP_HELP_USAGE | ARGP_HELP_EXIT_ERR);
 
 
2679
        __builtin_unreachable();
 
2556
2680
      case 'V':                 /* --version */
 
2557
2681
        fprintf_plus(state->out_stream, "%s\n", argp_program_version);
 
2558
2682
        exit(argp_err_exit_status);
 
 
 
2996
#if GNUTLS_VERSION_NUMBER >= 0x030606
 
 
2997
  ret = init_gnutls_global(tls_pubkey, tls_privkey, dh_params_file, &mc);
 
 
2998
#elif GNUTLS_VERSION_NUMBER < 0x030600
 
2872
2999
  ret = init_gnutls_global(pubkey, seckey, dh_params_file, &mc);
 
 
3001
#error "Needs GnuTLS 3.6.6 or later, or before 3.6.0"
 
2874
3004
    fprintf_plus(stderr, "init_gnutls_global failed\n");
 
2875
3005
    exitcode = EX_UNAVAILABLE;