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

   1 /*
   2     cipher.c -- Symmetric block cipher handling
   3     Copyright (C) 2007-2013 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/err.h>
  24 #include <openssl/evp.h>
  25
  26 #include "../cipher.h"
  27 #include "../logger.h"
  28 #include "../xalloc.h"
  29
  30 struct cipher {
  31         EVP_CIPHER_CTX ctx;
  32         const EVP_CIPHER *cipher;
  33 };
  34
  35 static cipher_t *cipher_open(const EVP_CIPHER *evp_cipher) {
  36         cipher_t *cipher = xzalloc(sizeof *cipher);
  37         cipher->cipher = evp_cipher;
  38         EVP_CIPHER_CTX_init(&cipher->ctx);
  39
  40         return cipher;
  41 }
  42
  43 cipher_t *cipher_open_by_name(const char *name) {
  44         const EVP_CIPHER *evp_cipher = EVP_get_cipherbyname(name);
  45         if(!evp_cipher) {
  46                 logger(DEBUG_ALWAYS, LOG_ERR, "Unknown cipher name '%s'!", name);
  47                 return NULL;
  48         }
  49
  50         return cipher_open(evp_cipher);
  51 }
  52
  53 cipher_t *cipher_open_by_nid(int nid) {
  54         const EVP_CIPHER *evp_cipher = EVP_get_cipherbynid(nid);
  55         if(!evp_cipher) {
  56                 logger(DEBUG_ALWAYS, LOG_ERR, "Unknown cipher nid %d!", nid);
  57                 return NULL;
  58         }
  59
  60         return cipher_open(evp_cipher);
  61 }
  62
  63 cipher_t *cipher_open_blowfish_ofb(void) {
  64         return cipher_open(EVP_bf_ofb());
  65 }
  66
  67 void cipher_close(cipher_t *cipher) {
  68         if(!cipher)
  69                 return;
  70
  71         EVP_CIPHER_CTX_cleanup(&cipher->ctx);
  72         free(cipher);
  73 }
  74
  75 size_t cipher_keylength(const cipher_t *cipher) {
  76         if(!cipher || !cipher->cipher)
  77                 return 0;
  78
  79         return cipher->cipher->key_len + cipher->cipher->iv_len;
  80 }
  81
  82 bool cipher_set_key(cipher_t *cipher, void *key, bool encrypt) {
  83         bool result;
  84
  85         if(encrypt)
  86                 result = EVP_EncryptInit_ex(&cipher->ctx, cipher->cipher, NULL, (unsigned char *)key, (unsigned char *)key + cipher->cipher->key_len);
  87         else
  88                 result = EVP_DecryptInit_ex(&cipher->ctx, cipher->cipher, NULL, (unsigned char *)key, (unsigned char *)key + cipher->cipher->key_len);
  89
  90         if(result)
  91                 return true;
  92
  93         logger(DEBUG_ALWAYS, LOG_ERR, "Error while setting key: %s", ERR_error_string(ERR_get_error(), NULL));
  94         return false;
  95 }
  96
  97 bool cipher_set_key_from_rsa(cipher_t *cipher, void *key, size_t len, bool encrypt) {
  98         bool result;
  99
 100         if(encrypt)
 101                 result = EVP_EncryptInit_ex(&cipher->ctx, cipher->cipher, NULL, (unsigned char *)key + len - cipher->cipher->key_len, (unsigned char *)key + len - cipher->cipher->iv_len - cipher->cipher->key_len);
 102         else
 103                 result = EVP_DecryptInit_ex(&cipher->ctx, cipher->cipher, NULL, (unsigned char *)key + len - cipher->cipher->key_len, (unsigned char *)key + len - cipher->cipher->iv_len - cipher->cipher->key_len);
 104
 105         if(result)
 106                 return true;
 107
 108         logger(DEBUG_ALWAYS, LOG_ERR, "Error while setting key: %s", ERR_error_string(ERR_get_error(), NULL));
 109         return false;
 110 }
 111
 112 bool cipher_encrypt(cipher_t *cipher, const void *indata, size_t inlen, void *outdata, size_t *outlen, bool oneshot) {
 113         if(oneshot) {
 114                 int len, pad;
 115                 if(EVP_EncryptInit_ex(&cipher->ctx, NULL, NULL, NULL, NULL)
 116                                 && EVP_EncryptUpdate(&cipher->ctx, (unsigned char *)outdata, &len, indata, inlen)
 117                                 && EVP_EncryptFinal(&cipher->ctx, (unsigned char *)outdata + len, &pad)) {
 118                         if(outlen) *outlen = len + pad;
 119                         return true;
 120                 }
 121         } else {
 122                 int len;
 123                 if(EVP_EncryptUpdate(&cipher->ctx, outdata, &len, indata, inlen)) {
 124                         if(outlen) *outlen = len;
 125                         return true;
 126                 }
 127         }
 128
 129         logger(DEBUG_ALWAYS, LOG_ERR, "Error while encrypting: %s", ERR_error_string(ERR_get_error(), NULL));
 130         return false;
 131 }
 132
 133 bool cipher_decrypt(cipher_t *cipher, const void *indata, size_t inlen, void *outdata, size_t *outlen, bool oneshot) {
 134         if(oneshot) {
 135                 int len, pad;
 136                 if(EVP_DecryptInit_ex(&cipher->ctx, NULL, NULL, NULL, NULL)
 137                                 && EVP_DecryptUpdate(&cipher->ctx, (unsigned char *)outdata, &len, indata, inlen)
 138                                 && EVP_DecryptFinal(&cipher->ctx, (unsigned char *)outdata + len, &pad)) {
 139                         if(outlen) *outlen = len + pad;
 140                         return true;
 141                 }
 142         } else {
 143                 int len;
 144                 if(EVP_EncryptUpdate(&cipher->ctx, outdata, &len, indata, inlen)) {
 145                         if(outlen) *outlen = len;
 146                         return true;
 147                 }
 148         }
 149
 150         logger(DEBUG_ALWAYS, LOG_ERR, "Error while decrypting: %s", ERR_error_string(ERR_get_error(), NULL));
 151         return false;
 152 }
 153
 154 int cipher_get_nid(const cipher_t *cipher) {
 155         if(!cipher || !cipher->cipher)
 156                 return 0;
 157
 158         return cipher->cipher->nid;
 159 }
 160
 161 bool cipher_active(const cipher_t *cipher) {
 162         return cipher && cipher->cipher && cipher->cipher->nid != 0;
 163 }