src/gcrypt/digest.c

   1 /*
   2     digest.c -- Digest handling
   3     Copyright (C) 2007-2012 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 "digest.h"
  23 #include "logger.h"
  24
  25 static struct {
  26         const char *name;
  27         int algo;
  28         int nid;
  29 } digesttable[] = {
  30         {"none", GCRY_MD_NONE, 0},
  31         {"sha1", GCRY_MD_SHA1, 64},
  32         {"sha256", GCRY_MD_SHA256, 672},
  33         {"sha384", GCRY_MD_SHA384, 673},
  34         {"sha512", GCRY_MD_SHA512, 674},
  35 };
  36
  37 static bool nametodigest(const char *name, int *algo) {
  38         int i;
  39
  40         for(i = 0; i < sizeof(digesttable) / sizeof(*digesttable); i++) {
  41                 if(digesttable[i].name && !strcasecmp(name, digesttable[i].name)) {
  42                         *algo = digesttable[i].algo;
  43                         return true;
  44                 }
  45         }
  46
  47         return false;
  48 }
  49
  50 static bool nidtodigest(int nid, int *algo) {
  51         int i;
  52
  53         for(i = 0; i < sizeof(digesttable) / sizeof(*digesttable); i++) {
  54                 if(nid == digesttable[i].nid) {
  55                         *algo = digesttable[i].algo;
  56                         return true;
  57                 }
  58         }
  59
  60         return false;
  61 }
  62
  63 static bool digesttonid(int algo, int *nid) {
  64         int i;
  65
  66         for(i = 0; i < sizeof(digesttable) / sizeof(*digesttable); i++) {
  67                 if(algo == digesttable[i].algo) {
  68                         *nid = digesttable[i].nid;
  69                         return true;
  70                 }
  71         }
  72
  73         return false;
  74 }
  75
  76 static bool digest_open(digest_t *digest, int algo, int maclength) {
  77         if(!digesttonid(algo, &digest->nid)) {
  78                 logger(DEBUG_ALWAYS, LOG_DEBUG, "Digest %d has no corresponding nid!", algo);
  79                 return false;
  80         }
  81
  82         unsigned int len = gcry_md_get_algo_dlen(algo);
  83
  84         if(maclength > len || maclength < 0) {
  85                 digest->maclength = len;
  86         } else {
  87                 digest->maclength = maclength;
  88         }
  89
  90         digest->algo = algo;
  91         digest->hmac = NULL;
  92
  93         return true;
  94 }
  95
  96 bool digest_open_by_name(digest_t *digest, const char *name, int maclength) {
  97         int algo;
  98
  99         if(!nametodigest(name, &algo)) {
 100                 logger(DEBUG_ALWAYS, LOG_DEBUG, "Unknown digest name '%s'!", name);
 101                 return false;
 102         }
 103
 104         return digest_open(digest, algo, maclength);
 105 }
 106
 107 bool digest_open_by_nid(digest_t *digest, int nid, int maclength) {
 108         int algo;
 109
 110         if(!nidtodigest(nid, &algo)) {
 111                 logger(DEBUG_ALWAYS, LOG_DEBUG, "Unknown digest ID %d!", nid);
 112                 return false;
 113         }
 114
 115         return digest_open(digest, algo, maclength);
 116 }
 117
 118 bool digest_open_sha1(digest_t *digest, int maclength) {
 119         return digest_open(digest, GCRY_MD_SHA1, maclength);
 120 }
 121
 122 void digest_close(digest_t *digest) {
 123         if(digest->hmac) {
 124                 gcry_md_close(digest->hmac);
 125         }
 126
 127         digest->hmac = NULL;
 128 }
 129
 130 bool digest_set_key(digest_t *digest, const void *key, size_t len) {
 131         if(!digest->hmac) {
 132                 gcry_md_open(&digest->hmac, digest->algo, GCRY_MD_FLAG_HMAC);
 133         }
 134
 135         if(!digest->hmac) {
 136                 return false;
 137         }
 138
 139         return !gcry_md_setkey(digest->hmac, key, len);
 140 }
 141
 142 bool digest_create(digest_t *digest, const void *indata, size_t inlen, void *outdata) {
 143         unsigned int len = gcry_md_get_algo_dlen(digest->algo);
 144
 145         if(digest->hmac) {
 146                 char *tmpdata;
 147                 gcry_md_reset(digest->hmac);
 148                 gcry_md_write(digest->hmac, indata, inlen);
 149                 tmpdata = gcry_md_read(digest->hmac, digest->algo);
 150
 151                 if(!tmpdata) {
 152                         return false;
 153                 }
 154
 155                 memcpy(outdata, tmpdata, digest->maclength);
 156         } else {
 157                 char tmpdata[len];
 158                 gcry_md_hash_buffer(digest->algo, tmpdata, indata, inlen);
 159                 memcpy(outdata, tmpdata, digest->maclength);
 160         }
 161
 162         return true;
 163 }
 164
 165 bool digest_verify(digest_t *digest, const void *indata, size_t inlen, const void *cmpdata) {
 166         unsigned int len = digest->maclength;
 167         char outdata[len];
 168
 169         return digest_create(digest, indata, inlen, outdata) && !memcmp(cmpdata, outdata, len);
 170 }
 171
 172 int digest_get_nid(const digest_t *digest) {
 173         return digest->nid;
 174 }
 175
 176 size_t digest_length(const digest_t *digest) {
 177         return digest->maclength;
 178 }
 179
 180 bool digest_active(const digest_t *digest) {
 181         return digest->algo != GCRY_MD_NONE;
 182 }