www.tinc-vpn.org Git - tinc/blob - src/openssl/digest.c

   1 /*
   2     digest.c -- Digest handling
   3     Copyright (C) 2007-2016 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 #include "../utils.h"
  22 #include "../xalloc.h"
  23
  24 #include <openssl/err.h>
  25 #include <openssl/hmac.h>
  26
  27 #include "digest.h"
  28 #include "../digest.h"
  29 #include "../logger.h"
  30
  31 static digest_t *digest_open(const EVP_MD *evp_md, int maclength) {
  32         digest_t *digest = xzalloc(sizeof *digest);
  33         digest->digest = evp_md;
  34
  35         int digestlen = EVP_MD_size(digest->digest);
  36
  37         if(maclength > digestlen || maclength < 0)
  38                 digest->maclength = digestlen;
  39         else
  40                 digest->maclength = maclength;
  41
  42         return digest;
  43 }
  44
  45 digest_t *digest_open_by_name(const char *name, int maclength) {
  46         const EVP_MD *evp_md = EVP_get_digestbyname(name);
  47
  48         if(!evp_md) {
  49                 logger(DEBUG_ALWAYS, LOG_DEBUG, "Unknown digest name '%s'!", name);
  50                 return false;
  51         }
  52
  53         return digest_open(evp_md, maclength);
  54 }
  55
  56 digest_t *digest_open_by_nid(int nid, int maclength) {
  57         const EVP_MD *evp_md = EVP_get_digestbynid(nid);
  58
  59         if(!evp_md) {
  60                 logger(DEBUG_ALWAYS, LOG_DEBUG, "Unknown digest nid %d!", nid);
  61                 return false;
  62         }
  63
  64         return digest_open(evp_md, maclength);
  65 }
  66
  67 bool digest_set_key(digest_t *digest, const void *key, size_t len) {
  68         digest->key = xrealloc(digest->key, len);
  69         memcpy(digest->key, key, len);
  70         digest->keylength = len;
  71         return true;
  72 }
  73
  74 void digest_close(digest_t *digest) {
  75         if(!digest)
  76                 return;
  77
  78         free(digest->key);
  79         free(digest);
  80 }
  81
  82 bool digest_create(digest_t *digest, const void *indata, size_t inlen, void *outdata) {
  83         size_t len = EVP_MD_size(digest->digest);
  84         unsigned char tmpdata[len];
  85
  86         if(digest->key) {
  87                 if(!HMAC(digest->digest, digest->key, digest->keylength, indata, inlen, tmpdata, NULL)) {
  88                         logger(DEBUG_ALWAYS, LOG_DEBUG, "Error creating digest: %s", ERR_error_string(ERR_get_error(), NULL));
  89                         return false;
  90                 }
  91         } else {
  92                 EVP_MD_CTX *ctx = EVP_MD_CTX_create();
  93                 if(!ctx)
  94                         abort();
  95
  96                 if(!EVP_DigestInit(ctx, digest->digest)
  97                                 || !EVP_DigestUpdate(ctx, indata, inlen)
  98                                 || !EVP_DigestFinal(ctx, tmpdata, NULL)) {
  99                         logger(DEBUG_ALWAYS, LOG_DEBUG, "Error creating digest: %s", ERR_error_string(ERR_get_error(), NULL));
 100                         EVP_MD_CTX_destroy(ctx);
 101                         return false;
 102                 }
 103
 104                 EVP_MD_CTX_destroy(ctx);
 105         }
 106
 107         memcpy(outdata, tmpdata, digest->maclength);
 108         return true;
 109 }
 110
 111 bool digest_verify(digest_t *digest, const void *indata, size_t inlen, const void *cmpdata) {
 112         size_t len = digest->maclength;
 113         unsigned char outdata[len];
 114
 115         return digest_create(digest, indata, inlen, outdata) && !memcmp(cmpdata, outdata, digest->maclength);
 116 }
 117
 118 int digest_get_nid(const digest_t *digest) {
 119         if(!digest || !digest->digest)
 120                 return 0;
 121
 122         return EVP_MD_type(digest->digest);
 123 }
 124
 125 size_t digest_keylength(const digest_t *digest) {
 126         if(!digest || !digest->digest)
 127                 return 0;
 128
 129         return EVP_MD_size(digest->digest);
 130 }
 131
 132 size_t digest_length(const digest_t *digest) {
 133         if(!digest)
 134                 return 0;
 135
 136         return digest->maclength;
 137 }
 138
 139 bool digest_active(const digest_t *digest) {
 140         return digest && digest->digest && EVP_MD_type(digest->digest) != 0;
 141 }