src/core/sipe-digest-openssl.c

   1 /**
   2  * @file sipe-digest-openssl.c
   3  *
   4  * pidgin-sipe
   5  *
   6  * Copyright (C) 2013-2017 SIPE Project <http://sipe.sourceforge.net/>
   7  *
   8  * This program is free software; you can redistribute it and/or modify
   9  * it under the terms of the GNU General Public License as published by
  10  * the Free Software Foundation; either version 2 of the License, or
  11  * (at your option) any later version.
  12  *
  13  * This program is distributed in the hope that it will be useful,
  14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16  * GNU General Public License for more details.
  17  *
  18  * You should have received a copy of the GNU General Public License
  19  * along with this program; if not, write to the Free Software
  20  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  21  */
  22
  23 /**
  24  * Digest routines implementation based on OpenSSL
  25  */
  26 #ifdef HAVE_CONFIG_H
  27 #include "config.h"
  28 #endif
  29
  30 #include <openssl/evp.h>
  31 #include <openssl/hmac.h>
  32 #if !(defined(HAVE_GSSAPI_ONLY) || defined(HAVE_SSPI))
  33 #include <openssl/md4.h>
  34 #endif
  35 #include <openssl/md5.h>
  36 #include <openssl/opensslv.h>
  37 #include <openssl/sha.h>
  38
  39 #include "glib.h"
  40
  41 #include "sipe-digest.h"
  42
  43 #if !(defined(HAVE_GSSAPI_ONLY) || defined(HAVE_SSPI))
  44 /* One-shot MD4 digest - only used by internal NTLMv2 implementation */
  45 void sipe_digest_md4(const guchar *data, gsize length, guchar *digest)
  46 {
  47         MD4(data, length, digest);
  48 }
  49 #endif
  50
  51 /* One-shot MD5/SHA-1 digests */
  52 void sipe_digest_md5(const guchar *data, gsize length, guchar *digest)
  53 {
  54         MD5(data, length, digest);
  55 }
  56
  57 void sipe_digest_sha1(const guchar *data, gsize length, guchar *digest)
  58 {
  59         SHA1(data, length, digest);
  60 }
  61
  62 /* One-shot HMAC(MD5/SHA-1) digests */
  63 void sipe_digest_hmac_md5(const guchar *key, gsize key_length,
  64                           const guchar *data, gsize data_length,
  65                           guchar *digest)
  66 {
  67         HMAC(EVP_md5(), key, key_length, data, data_length, digest, NULL);
  68 }
  69
  70 void sipe_digest_hmac_sha1(const guchar *key, gsize key_length,
  71                            const guchar *data, gsize data_length,
  72                            guchar *digest)
  73 {
  74         HMAC(EVP_sha1(), key, key_length, data, data_length, digest, NULL);
  75 }
  76
  77 /* Stream HMAC(SHA1) digest for file transfer */
  78 gpointer sipe_digest_ft_start(const guchar *sha1_digest)
  79 {
  80 #if OPENSSL_VERSION_NUMBER < 0x10100000L
  81         HMAC_CTX *ctx = g_malloc(sizeof(HMAC_CTX));
  82         HMAC_CTX_init(ctx);
  83 #else
  84         /* OpenSSL 1.1.0 or newer */
  85         HMAC_CTX *ctx = HMAC_CTX_new();
  86 #endif
  87         /* used are only the first 16 bytes of the 20 byte SHA1 digest */
  88         HMAC_Init_ex(ctx, sha1_digest, 16, EVP_sha1(), NULL);
  89         return(ctx);
  90 }
  91
  92 void sipe_digest_ft_update(gpointer context, const guchar *data, gsize length)
  93 {
  94         HMAC_Update(context, data, length);
  95 }
  96
  97 void sipe_digest_ft_end(gpointer context, guchar *digest)
  98 {
  99         HMAC_Final(context, digest, NULL);
 100 }
 101
 102 void sipe_digest_ft_destroy(gpointer context)
 103 {
 104 #if OPENSSL_VERSION_NUMBER < 0x10100000L
 105         HMAC_CTX_cleanup(context);
 106         g_free(context);
 107 #else
 108         /* OpenSSL 1.1.0 or newer */
 109         HMAC_CTX_free(context);
 110 #endif
 111 }
 112
 113 /* Stream digests, e.g. for TLS */
 114 gpointer sipe_digest_md5_start(void)
 115 {
 116         MD5_CTX *ctx = g_malloc(sizeof(MD5_CTX));
 117         MD5_Init(ctx);
 118         return(ctx);
 119 }
 120
 121 void sipe_digest_md5_update(gpointer context, const guchar *data, gsize length)
 122 {
 123         MD5_Update(context, data, length);
 124 }
 125
 126 void sipe_digest_md5_end(gpointer context, guchar *digest)
 127 {
 128         /* save context to ensure this function can be called multiple times */
 129         MD5_CTX *orig_ctx = context;
 130         MD5_CTX saved_ctx = *orig_ctx;
 131         MD5_Final(digest, orig_ctx);
 132         *orig_ctx = saved_ctx;
 133 }
 134
 135 void sipe_digest_md5_destroy(gpointer context)
 136 {
 137         g_free(context);
 138 }
 139
 140 gpointer sipe_digest_sha1_start(void)
 141 {
 142         SHA_CTX *ctx = g_malloc(sizeof(SHA_CTX));
 143         SHA1_Init(ctx);
 144         return(ctx);
 145 }
 146
 147 void sipe_digest_sha1_update(gpointer context, const guchar *data, gsize length)
 148 {
 149         SHA1_Update(context, data, length);
 150 }
 151
 152 void sipe_digest_sha1_end(gpointer context, guchar *digest)
 153 {
 154         /* save context to ensure this function can be called multiple times */
 155         SHA_CTX *orig_ctx = context;
 156         SHA_CTX saved_ctx = *orig_ctx;
 157         SHA1_Final(digest, orig_ctx);
 158         *orig_ctx = saved_ctx;
 159 }
 160
 161 void sipe_digest_sha1_destroy(gpointer context)
 162 {
 163         g_free(context);
 164 }
 165
 166 /*
 167   Local Variables:
 168   mode: c
 169   c-file-style: "bsd"
 170   indent-tabs-mode: t
 171   tab-width: 8
 172   End:
 173 */