/mandos/trunk

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

« back to all changes in this revision

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

  • Committer: Teddy Hogeborn
  • Date: 2015-07-20 00:06:05 UTC
  • Revision ID: teddy@recompile.se-20150720000605-244crrgqx254i3bs
Don't use TEMP_FAILURE_RETRY around close().

* plugin-runner.c: Don't use TEMP_FAILURE_RETRY around close().
* plugins.d/mandos-client.c: - '' -
* plugins.d/usplash.c: - '' -

Show diffs side-by-side

added added

removed removed

Lines of Context:
plugins.d/mandos-client.c
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>             /* memset(), strcmp(), strlen(),
50
 
                                   strerror(), asprintf(), strcpy() */
 
49
#include <string.h>             /* strcmp(), strlen(), strerror(),
 
50
                                   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,
305
305
      return false;
306
306
    }
307
307
    
308
 
    ret = (int)TEMP_FAILURE_RETRY(close(fd));
 
308
    ret = close(fd);
309
309
    if(ret == -1){
310
310
      perror_plus("close");
311
311
    }
516
516
__attribute__((nonnull, warn_unused_result))
517
517
static int init_gnutls_global(const char *pubkeyfilename,
518
518
                              const char *seckeyfilename,
 
519
                              const char *dhparamsfilename,
519
520
                              mandos_context *mc){
520
521
  int ret;
521
522
  unsigned int uret;
575
576
                 safer_gnutls_strerror(ret));
576
577
    goto globalfail;
577
578
  }
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;
 
579
  /* If a Diffie-Hellman parameters file was given, try to use it */
 
580
  if(dhparamsfilename != NULL){
 
581
    gnutls_datum_t params = { .data = NULL, .size = 0 };
 
582
    do {
 
583
      int dhpfile = open(dhparamsfilename, O_RDONLY);
 
584
      if(dhpfile == -1){
 
585
        perror_plus("open");
 
586
        dhparamsfilename = NULL;
 
587
        break;
 
588
      }
 
589
      size_t params_capacity = 0;
585
590
      while(true){
586
 
        buffer_capacity = incbuffer((char **)&buffer.data,
587
 
                                    (size_t)buffer.size,
588
 
                                    (size_t)buffer_capacity);
589
 
        if(buffer_capacity == 0){
 
591
        params_capacity = incbuffer((char **)&params.data,
 
592
                                    (size_t)params.size,
 
593
                                    (size_t)params_capacity);
 
594
        if(params_capacity == 0){
590
595
          perror_plus("incbuffer");
591
 
          free(buffer.data);
592
 
          buffer.data = NULL;
 
596
          free(params.data);
 
597
          params.data = NULL;
 
598
          dhparamsfilename = NULL;
593
599
          break;
594
600
        }
595
 
        ssize_t bytes_read = read(secfile, buffer.data + buffer.size,
 
601
        ssize_t bytes_read = read(dhpfile,
 
602
                                  params.data + params.size,
596
603
                                  BUFFER_SIZE);
597
604
        /* EOF */
598
605
        if(bytes_read == 0){
601
608
        /* check bytes_read for failure */
602
609
        if(bytes_read < 0){
603
610
          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);
 
611
          free(params.data);
 
612
          params.data = NULL;
 
613
          dhparamsfilename = NULL;
 
614
          break;
 
615
        }
 
616
        params.size += (unsigned int)bytes_read;
 
617
      }
 
618
      if(params.data == NULL){
 
619
        dhparamsfilename = NULL;
 
620
      }
 
621
      if(dhparamsfilename == NULL){
 
622
        break;
 
623
      }
 
624
      ret = gnutls_dh_params_import_pkcs3(mc->dh_params, &params,
 
625
                                          GNUTLS_X509_FMT_PEM);
 
626
      if(ret != GNUTLS_E_SUCCESS){
 
627
        fprintf_plus(stderr, "Failed to parse DH parameters in file"
 
628
                     " \"%s\": %s\n", dhparamsfilename,
 
629
                     safer_gnutls_strerror(ret));
 
630
        dhparamsfilename = NULL;
 
631
      }
 
632
    } while(false);
 
633
  }
 
634
  if(dhparamsfilename == NULL){
 
635
    if(mc->dh_bits == 0){
 
636
      /* Find out the optimal number of DH bits */
 
637
      /* Try to read the private key file */
 
638
      gnutls_datum_t buffer = { .data = NULL, .size = 0 };
 
639
      do {
 
640
        int secfile = open(seckeyfilename, O_RDONLY);
 
641
        if(secfile == -1){
 
642
          perror_plus("open");
 
643
          break;
 
644
        }
 
645
        size_t buffer_capacity = 0;
 
646
        while(true){
 
647
          buffer_capacity = incbuffer((char **)&buffer.data,
 
648
                                      (size_t)buffer.size,
 
649
                                      (size_t)buffer_capacity);
 
650
          if(buffer_capacity == 0){
 
651
            perror_plus("incbuffer");
 
652
            free(buffer.data);
 
653
            buffer.data = NULL;
 
654
            break;
 
655
          }
 
656
          ssize_t bytes_read = read(secfile,
 
657
                                    buffer.data + buffer.size,
 
658
                                    BUFFER_SIZE);
 
659
          /* EOF */
 
660
          if(bytes_read == 0){
 
661
            break;
 
662
          }
 
663
          /* check bytes_read for failure */
 
664
          if(bytes_read < 0){
 
665
            perror_plus("read");
 
666
            free(buffer.data);
 
667
            buffer.data = NULL;
 
668
            break;
 
669
          }
 
670
          buffer.size += (unsigned int)bytes_read;
 
671
        }
 
672
        close(secfile);
 
673
      } while(false);
 
674
      /* If successful, use buffer to parse private key */
 
675
      gnutls_sec_param_t sec_param = GNUTLS_SEC_PARAM_ULTRA;
 
676
      if(buffer.data != NULL){
 
677
        {
 
678
          gnutls_openpgp_privkey_t privkey = NULL;
 
679
          ret = gnutls_openpgp_privkey_init(&privkey);
627
680
          if(ret != GNUTLS_E_SUCCESS){
628
 
            fprintf_plus(stderr, "Error importing OpenPGP key : %s",
 
681
            fprintf_plus(stderr, "Error initializing OpenPGP key"
 
682
                         " structure: %s",
629
683
                         safer_gnutls_strerror(ret));
630
 
            privkey = NULL;
 
684
            free(buffer.data);
 
685
            buffer.data = NULL;
 
686
          } else {
 
687
            ret = gnutls_openpgp_privkey_import
 
688
              (privkey, &buffer, GNUTLS_OPENPGP_FMT_BASE64, "", 0);
 
689
            if(ret != GNUTLS_E_SUCCESS){
 
690
              fprintf_plus(stderr, "Error importing OpenPGP key : %s",
 
691
                           safer_gnutls_strerror(ret));
 
692
              privkey = NULL;
 
693
            }
 
694
            free(buffer.data);
 
695
            buffer.data = NULL;
 
696
            if(privkey != NULL){
 
697
              /* Use private key to suggest an appropriate
 
698
                 sec_param */
 
699
              sec_param = gnutls_openpgp_privkey_sec_param(privkey);
 
700
              gnutls_openpgp_privkey_deinit(privkey);
 
701
              if(debug){
 
702
                fprintf_plus(stderr, "This OpenPGP key implies using"
 
703
                             " a GnuTLS security parameter \"%s\".\n",
 
704
                             safe_string(gnutls_sec_param_get_name
 
705
                                         (sec_param)));
 
706
              }
 
707
            }
631
708
          }
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
 
            }
 
709
        }
 
710
        if(sec_param == GNUTLS_SEC_PARAM_UNKNOWN){
 
711
          /* Err on the side of caution */
 
712
          sec_param = GNUTLS_SEC_PARAM_ULTRA;
 
713
          if(debug){
 
714
            fprintf_plus(stderr, "Falling back to security parameter"
 
715
                         " \"%s\"\n",
 
716
                         safe_string(gnutls_sec_param_get_name
 
717
                                     (sec_param)));
644
718
          }
645
719
        }
646
720
      }
647
 
      if(sec_param == GNUTLS_SEC_PARAM_UNKNOWN){
648
 
        /* Err on the side of caution */
649
 
        sec_param = GNUTLS_SEC_PARAM_ULTRA;
 
721
      uret = gnutls_sec_param_to_pk_bits(GNUTLS_PK_DH, sec_param);
 
722
      if(uret != 0){
 
723
        mc->dh_bits = uret;
650
724
        if(debug){
651
 
          fprintf_plus(stderr, "Falling back to security parameter"
652
 
                       " \"%s\"\n",
 
725
          fprintf_plus(stderr, "A \"%s\" GnuTLS security parameter"
 
726
                       " implies %u DH bits; using that.\n",
653
727
                       safe_string(gnutls_sec_param_get_name
654
 
                                   (sec_param)));
 
728
                                   (sec_param)),
 
729
                       mc->dh_bits);
655
730
        }
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",
 
731
      } else {
 
732
        fprintf_plus(stderr, "Failed to get implied number of DH"
 
733
                     " bits for security parameter \"%s\"): %s\n",
664
734
                     safe_string(gnutls_sec_param_get_name
665
735
                                 (sec_param)),
666
 
                     mc->dh_bits);
 
736
                     safer_gnutls_strerror(ret));
 
737
        goto globalfail;
667
738
      }
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)),
 
739
    } else if(debug){
 
740
      fprintf_plus(stderr, "DH bits explicitly set to %u\n",
 
741
                   mc->dh_bits);
 
742
    }
 
743
    ret = gnutls_dh_params_generate2(mc->dh_params, mc->dh_bits);
 
744
    if(ret != GNUTLS_E_SUCCESS){
 
745
      fprintf_plus(stderr, "Error in GnuTLS prime generation (%u"
 
746
                   " bits): %s\n", mc->dh_bits,
672
747
                   safer_gnutls_strerror(ret));
673
748
      goto globalfail;
674
749
    }
675
 
  } else if(debug){
676
 
    fprintf_plus(stderr, "DH bits explicitly set to %u\n",
677
 
                 mc->dh_bits);
678
 
  }
679
 
  ret = gnutls_dh_params_generate2(mc->dh_params, mc->dh_bits);
680
 
  if(ret != GNUTLS_E_SUCCESS){
681
 
    fprintf_plus(stderr, "Error in GnuTLS prime generation (%u bits):"
682
 
                 " %s\n", mc->dh_bits, safer_gnutls_strerror(ret));
683
 
    goto globalfail;
684
 
  }
685
 
  
 
750
  }
686
751
  gnutls_certificate_set_dh_params(mc->cred, mc->dh_params);
687
752
  
688
753
  return 0;
748
813
  /* ignore client certificate if any. */
749
814
  gnutls_certificate_server_set_request(*session, GNUTLS_CERT_IGNORE);
750
815
  
751
 
  gnutls_dh_set_prime_bits(*session, mc->dh_bits);
752
 
  
753
816
  return 0;
754
817
}
755
818
 
868
931
      perror_plus("dup2(devnull, STDIN_FILENO)");
869
932
      _exit(EX_OSERR);
870
933
    }
871
 
    ret = (int)TEMP_FAILURE_RETRY(close(devnull));
 
934
    ret = close(devnull);
872
935
    if(ret == -1){
873
936
      perror_plus("close");
874
937
      _exit(EX_OSERR);
893
956
      perror_plus("openat");
894
957
      _exit(EX_UNAVAILABLE);
895
958
    }
896
 
    TEMP_FAILURE_RETRY(close(helperdir_fd));
 
959
    close(helperdir_fd);
897
960
#ifdef __GNUC__
898
961
#pragma GCC diagnostic push
899
962
#pragma GCC diagnostic ignored "-Wcast-qual"
1067
1130
    goto mandos_end;
1068
1131
  }
1069
1132
  
1070
 
  memset(&to, 0, sizeof(to));
1071
1133
  if(af == AF_INET6){
1072
 
    ((struct sockaddr_in6 *)&to)->sin6_family = (sa_family_t)af;
1073
 
    ret = inet_pton(af, ip, &((struct sockaddr_in6 *)&to)->sin6_addr);
 
1134
    struct sockaddr_in6 *to6 = (struct sockaddr_in6 *)&to;
 
1135
    *to6 = (struct sockaddr_in6){ .sin6_family = (sa_family_t)af };
 
1136
    ret = inet_pton(af, ip, &to6->sin6_addr);
1074
1137
  } else {                      /* IPv4 */
1075
 
    ((struct sockaddr_in *)&to)->sin_family = (sa_family_t)af;
1076
 
    ret = inet_pton(af, ip, &((struct sockaddr_in *)&to)->sin_addr);
 
1138
    struct sockaddr_in *to4 = (struct sockaddr_in *)&to;
 
1139
    *to4 = (struct sockaddr_in){ .sin_family = (sa_family_t)af };
 
1140
    ret = inet_pton(af, ip, &to4->sin_addr);
1077
1141
  }
1078
1142
  if(ret < 0 ){
1079
1143
    int e = errno;
1402
1466
    free(decrypted_buffer);
1403
1467
    free(buffer);
1404
1468
    if(tcp_sd >= 0){
1405
 
      ret = (int)TEMP_FAILURE_RETRY(close(tcp_sd));
 
1469
      ret = close(tcp_sd);
1406
1470
    }
1407
1471
    if(ret == -1){
1408
1472
      if(e == 0){
1947
2011
        perror_plus("openat");
1948
2012
        _exit(EXIT_FAILURE);
1949
2013
      }
1950
 
      if((int)TEMP_FAILURE_RETRY(close(hookdir_fd)) == -1){
 
2014
      if(close(hookdir_fd) == -1){
1951
2015
        perror_plus("close");
1952
2016
        _exit(EXIT_FAILURE);
1953
2017
      }
1956
2020
        perror_plus("dup2(devnull, STDIN_FILENO)");
1957
2021
        _exit(EX_OSERR);
1958
2022
      }
1959
 
      ret = (int)TEMP_FAILURE_RETRY(close(devnull));
 
2023
      ret = close(devnull);
1960
2024
      if(ret == -1){
1961
2025
        perror_plus("close");
1962
2026
        _exit(EX_OSERR);
2011
2075
    free(direntry);
2012
2076
  }
2013
2077
  free(direntries);
2014
 
  if((int)TEMP_FAILURE_RETRY(close(hookdir_fd)) == -1){
 
2078
  if(close(hookdir_fd) == -1){
2015
2079
    perror_plus("close");
2016
2080
  } else {
2017
2081
    hookdir_fd = -1;
2057
2121
    }
2058
2122
    
2059
2123
    if(quit_now){
2060
 
      ret = (int)TEMP_FAILURE_RETRY(close(sd));
 
2124
      ret = close(sd);
2061
2125
      if(ret == -1){
2062
2126
        perror_plus("close");
2063
2127
      }
2113
2177
    }
2114
2178
    
2115
2179
    /* Close the socket */
2116
 
    ret = (int)TEMP_FAILURE_RETRY(close(sd));
 
2180
    ret = close(sd);
2117
2181
    if(ret == -1){
2118
2182
      perror_plus("close");
2119
2183
    }
2201
2265
    }
2202
2266
    
2203
2267
    /* Close the socket */
2204
 
    int ret = (int)TEMP_FAILURE_RETRY(close(sd));
 
2268
    int ret = close(sd);
2205
2269
    if(ret == -1){
2206
2270
      perror_plus("close");
2207
2271
    }
2240
2304
  AvahiIfIndex if_index = AVAHI_IF_UNSPEC;
2241
2305
  const char *seckey = PATHDIR "/" SECKEY;
2242
2306
  const char *pubkey = PATHDIR "/" PUBKEY;
 
2307
  const char *dh_params_file = NULL;
2243
2308
  char *interfaces_hooks = NULL;
2244
2309
  
2245
2310
  bool gnutls_initialized = false;
2298
2363
        .doc = "Bit length of the prime number used in the"
2299
2364
        " Diffie-Hellman key exchange",
2300
2365
        .group = 2 },
 
2366
      { .name = "dh-params", .key = 134,
 
2367
        .arg = "FILE",
 
2368
        .doc = "PEM-encoded PKCS#3 file with pre-generated parameters"
 
2369
        " for the Diffie-Hellman key exchange",
 
2370
        .group = 2 },
2301
2371
      { .name = "priority", .key = 130,
2302
2372
        .arg = "STRING",
2303
2373
        .doc = "GnuTLS priority string for the TLS handshake",
2358
2428
        }
2359
2429
        mc.dh_bits = (typeof(mc.dh_bits))tmpmax;
2360
2430
        break;
 
2431
      case 134:                 /* --dh-params */
 
2432
        dh_params_file = arg;
 
2433
        break;
2361
2434
      case 130:                 /* --priority */
2362
2435
        mc.priority = arg;
2363
2436
        break;
2449
2522
              }
2450
2523
            }
2451
2524
          }
2452
 
          TEMP_FAILURE_RETRY(close(seckey_fd));
 
2525
          close(seckey_fd);
2453
2526
        }
2454
2527
      }
2455
2528
      
2470
2543
              }
2471
2544
            }
2472
2545
          }
2473
 
          TEMP_FAILURE_RETRY(close(pubkey_fd));
 
2546
          close(pubkey_fd);
 
2547
        }
 
2548
      }
 
2549
      
 
2550
      if(strcmp(dh_params_file, PATHDIR "/dhparams.pem" ) == 0){
 
2551
        int dhparams_fd = open(dh_params_file, O_RDONLY);
 
2552
        if(dhparams_fd == -1){
 
2553
          perror_plus("open");
 
2554
        } else {
 
2555
          ret = (int)TEMP_FAILURE_RETRY(fstat(dhparams_fd, &st));
 
2556
          if(ret == -1){
 
2557
            perror_plus("fstat");
 
2558
          } else {
 
2559
            if(S_ISREG(st.st_mode)
 
2560
               and st.st_uid == 0 and st.st_gid == 0){
 
2561
              ret = fchown(dhparams_fd, uid, gid);
 
2562
              if(ret == -1){
 
2563
                perror_plus("fchown");
 
2564
              }
 
2565
            }
 
2566
          }
 
2567
          close(dhparams_fd);
2474
2568
        }
2475
2569
      }
2476
2570
      
2653
2747
      errno = bring_up_interface(interface, delay);
2654
2748
      if(not interface_was_up){
2655
2749
        if(errno != 0){
2656
 
          perror_plus("Failed to bring up interface");
 
2750
          fprintf_plus(stderr, "Failed to bring up interface \"%s\":"
 
2751
                       " %s\n", interface, strerror(errno));
2657
2752
        } else {
2658
2753
          errno = argz_add(&interfaces_to_take_down,
2659
2754
                           &interfaces_to_take_down_size,
2682
2777
    goto end;
2683
2778
  }
2684
2779
  
2685
 
  ret = init_gnutls_global(pubkey, seckey, &mc);
 
2780
  ret = init_gnutls_global(pubkey, seckey, dh_params_file, &mc);
2686
2781
  if(ret == -1){
2687
2782
    fprintf_plus(stderr, "init_gnutls_global failed\n");
2688
2783
    exitcode = EX_UNAVAILABLE;
2988
3083
          perror_plus("rmdir");
2989
3084
        }
2990
3085
      }
2991
 
      TEMP_FAILURE_RETRY(close(tempdir_fd));
 
3086
      close(tempdir_fd);
2992
3087
    }
2993
3088
  }
2994
3089