sjero.net Git - wget/blob - src/gen-md5.c

   1 /* General MD5 support.
   2    Copyright (C) 2001, 2002, 2003, 2004, 2005, 2006, 2007,
   3    2008 Free Software Foundation, Inc.
   4
   5 This file is part of GNU Wget.
   6
   7 GNU Wget is free software; you can redistribute it and/or modify
   8 it under the terms of the GNU General Public License as published by
   9 the Free Software Foundation; either version 3 of the License, or
  10 (at your option) any later version.
  11
  12 GNU Wget is distributed in the hope that it will be useful,
  13 but WITHOUT ANY WARRANTY; without even the implied warranty of
  14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15 GNU General Public License for more details.
  16
  17 You should have received a copy of the GNU General Public License
  18 along with Wget.  If not, see <http://www.gnu.org/licenses/>.
  19
  20 Additional permission under GNU GPL version 3 section 7
  21
  22 If you modify this program, or any covered work, by linking or
  23 combining it with the OpenSSL project's OpenSSL library (or a
  24 modified version of that library), containing parts covered by the
  25 terms of the OpenSSL or SSLeay licenses, the Free Software Foundation
  26 grants you additional permission to convey the resulting work.
  27 Corresponding Source for a non-source form of such a combination
  28 shall include the source code for the parts of OpenSSL used as well
  29 as that of the covered work.  */
  30
  31 #define USE_GNULIB_ALLOC
  32
  33 #include "wget.h"
  34
  35 #include "gen-md5.h"
  36
  37 #ifdef HAVE_BUILTIN_MD5
  38 # include <md5.h>
  39 typedef struct md5_ctx gen_md5_context_imp;
  40 #endif
  41
  42 #ifdef HAVE_SOLARIS_MD5
  43 # include <md5.h>
  44 typedef MD5_CTX gen_md5_context_imp;
  45 #endif
  46
  47 #ifdef HAVE_OPENSSL_MD5
  48 # include <openssl/md5.h>
  49 typedef MD5_CTX gen_md5_context_imp;
  50 #endif
  51
  52 struct gen_md5_context {
  53   gen_md5_context_imp imp;
  54 };
  55
  56 /* Originally I planned for these to be macros, but that's very hard
  57    because some of these MD5 implementations use the same names for
  58    their types.  For example, it is impossible to include <md5.h> and
  59    <openssl/ssl.h> on Solaris, because the latter includes its own MD5
  60    implementation, which clashes with <md5.h>.  */
  61
  62 int
  63 gen_md5_context_size (void)
  64 {
  65   return sizeof (struct gen_md5_context);
  66 }
  67
  68 void
  69 gen_md5_init (gen_md5_context *ctx)
  70 {
  71   gen_md5_context_imp *ctx_imp = &ctx->imp;
  72
  73 #ifdef HAVE_BUILTIN_MD5
  74   md5_init_ctx (ctx_imp);
  75 #endif
  76
  77 #ifdef HAVE_SOLARIS_MD5
  78   MD5Init (ctx_imp);
  79 #endif
  80
  81 #ifdef HAVE_OPENSSL_MD5
  82   MD5_Init (ctx_imp);
  83 #endif
  84 }
  85
  86 void
  87 gen_md5_update (unsigned const char *buffer, int len, gen_md5_context *ctx)
  88 {
  89   gen_md5_context_imp *ctx_imp = &ctx->imp;
  90
  91 #ifdef HAVE_BUILTIN_MD5
  92   md5_process_bytes (buffer, len, ctx_imp);
  93 #endif
  94
  95 #ifdef HAVE_SOLARIS_MD5
  96   MD5Update (ctx_imp, (unsigned char *)buffer, len);
  97 #endif
  98
  99 #ifdef HAVE_OPENSSL_MD5
 100   MD5_Update (ctx_imp, buffer, len);
 101 #endif
 102 }
 103
 104 void
 105 gen_md5_finish (gen_md5_context *ctx, unsigned char *result)
 106 {
 107   gen_md5_context_imp *ctx_imp = &ctx->imp;
 108
 109 #ifdef HAVE_BUILTIN_MD5
 110   md5_finish_ctx (ctx_imp, result);
 111 #endif
 112
 113 #ifdef HAVE_SOLARIS_MD5
 114   MD5Final (result, ctx_imp);
 115 #endif
 116
 117 #ifdef HAVE_OPENSSL_MD5
 118   MD5_Final (result, ctx_imp);
 119 #endif
 120 }
 121
 122 #if 0
 123 /* A debugging function for checking whether an MD5 library works. */
 124
 125 #include "gen-md5.h"
 126
 127 char *
 128 debug_test_md5 (char *buf)
 129 {
 130   unsigned char raw[16];
 131   static char res[33];
 132   unsigned char *p1;
 133   char *p2;
 134   int cnt;
 135   ALLOCA_MD5_CONTEXT (ctx);
 136
 137   gen_md5_init (ctx);
 138   gen_md5_update ((unsigned char *)buf, strlen (buf), ctx);
 139   gen_md5_finish (ctx, raw);
 140
 141   p1 = raw;
 142   p2 = res;
 143   cnt = 16;
 144   while (cnt--)
 145     {
 146       *p2++ = XNUM_TO_digit (*p1 >> 4);
 147       *p2++ = XNUM_TO_digit (*p1 & 0xf);
 148       ++p1;
 149     }
 150   *p2 = '\0';
 151
 152   return res;
 153 }
 154 #endif