tinc-vpn.org Git - tinc/blob - src/openssl/crypto.c

   1 /*
   2     crypto.c -- Cryptographic miscellaneous functions and initialisation
   3     Copyright (C) 2007-2014 Guus Sliepen <guus@tinc-vpn.org>
   4
   5     This program is free software; you can redistribute it and/or modify
   6     it under the terms of the GNU General Public License as published by
   7     the Free Software Foundation; either version 2 of the License, or
   8     (at your option) any later version.
   9
  10     This program is distributed in the hope that it will be useful,
  11     but WITHOUT ANY WARRANTY; without even the implied warranty of
  12     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13     GNU General Public License for more details.
  14
  15     You should have received a copy of the GNU General Public License along
  16     with this program; if not, write to the Free Software Foundation, Inc.,
  17     51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
  18 */
  19
  20 #include "../system.h"
  21
  22 #include <openssl/rand.h>
  23 #include <openssl/evp.h>
  24 #include <openssl/engine.h>
  25
  26 #include "../crypto.h"
  27
  28 #ifndef HAVE_MINGW
  29
  30 static int random_fd = -1;
  31
  32 static void random_init(void) {
  33         random_fd = open("/dev/urandom", O_RDONLY);
  34
  35         if(random_fd < 0) {
  36                 random_fd = open("/dev/random", O_RDONLY);
  37         }
  38
  39         if(random_fd < 0) {
  40                 fprintf(stderr, "Could not open source of random numbers: %s\n", strerror(errno));
  41                 abort();
  42         }
  43 }
  44
  45 static void random_exit(void) {
  46         close(random_fd);
  47 }
  48
  49 void randomize(void *vout, size_t outlen) {
  50         char *out = vout;
  51
  52         while(outlen) {
  53                 size_t len = read(random_fd, out, outlen);
  54
  55                 if(len <= 0) {
  56                         if(errno == EAGAIN || errno == EINTR) {
  57                                 continue;
  58                         }
  59
  60                         fprintf(stderr, "Could not read random numbers: %s\n", strerror(errno));
  61                         abort();
  62                 }
  63
  64                 out += len;
  65                 outlen -= len;
  66         }
  67 }
  68
  69 #else
  70
  71 #include <wincrypt.h>
  72 HCRYPTPROV prov;
  73
  74 void random_init(void) {
  75         if(!CryptAcquireContext(&prov, NULL, NULL, PROV_RSA_FULL, CRYPT_VERIFYCONTEXT)) {
  76                 fprintf(stderr, "CryptAcquireContext() failed!\n");
  77                 abort();
  78         }
  79 }
  80
  81 void random_exit(void) {
  82         CryptReleaseContext(prov, 0);
  83 }
  84
  85 void randomize(void *out, size_t outlen) {
  86         if(!CryptGenRandom(prov, outlen, out)) {
  87                 fprintf(stderr, "CryptGenRandom() failed\n");
  88                 abort();
  89         }
  90 }
  91
  92 #endif
  93
  94 void crypto_init(void) {
  95         random_init();
  96
  97         ENGINE_load_builtin_engines();
  98         ENGINE_register_all_complete();
  99
 100         ERR_load_crypto_strings();
 101         OpenSSL_add_all_algorithms();
 102
 103         if(!RAND_status()) {
 104                 fprintf(stderr, "Not enough entropy for the PRNG!\n");
 105                 abort();
 106         }
 107 }
 108
 109 void crypto_exit(void) {
 110         EVP_cleanup();
 111         ERR_free_strings();
 112         ENGINE_cleanup();
 113         random_exit();
 114 }