contrib/pgcrypto/internal.c

   1 /*
   2  * internal.c
   3  *              Wrapper for builtin functions
   4  *
   5  * Copyright (c) 2000 Marko Kreen
   6  * All rights reserved.
   7  *
   8  * Redistribution and use in source and binary forms, with or without
   9  * modification, are permitted provided that the following conditions
  10  * are met:
  11  * 1. Redistributions of source code must retain the above copyright
  12  *        notice, this list of conditions and the following disclaimer.
  13  * 2. Redistributions in binary form must reproduce the above copyright
  14  *        notice, this list of conditions and the following disclaimer in the
  15  *        documentation and/or other materials provided with the distribution.
  16  *
  17  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
  18  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  19  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  20  * ARE DISCLAIMED.      IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
  21  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  22  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  23  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  24  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  25  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  26  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  27  * SUCH DAMAGE.
  28  *
  29  * $Id: internal.c,v 1.3 2001/03/22 03:59:10 momjian Exp $
  30  */
  31
  32 #include "postgres.h"
  33
  34 #include "pgcrypto.h"
  35
  36 #include "md5.h"
  37 #include "sha1.h"
  38
  39 #ifndef MD5_DIGEST_LENGTH
  40 #define MD5_DIGEST_LENGTH 16
  41 #endif
  42
  43 #ifndef SHA1_DIGEST_LENGTH
  44 #ifdef SHA1_RESULTLEN
  45 #define SHA1_DIGEST_LENGTH SHA1_RESULTLEN
  46 #else
  47 #define SHA1_DIGEST_LENGTH 20
  48 #endif
  49 #endif
  50
  51 static uint
  52                         pg_md5_len(pg_digest * h);
  53 static uint8 *
  54                         pg_md5_digest(pg_digest * h, uint8 *src, uint len, uint8 *buf);
  55
  56 static uint
  57                         pg_sha1_len(pg_digest * h);
  58 static uint8 *
  59                         pg_sha1_digest(pg_digest * h, uint8 *src, uint len, uint8 *buf);
  60
  61 static pg_digest
  62                         int_digest_list[] = {
  63         {"md5", pg_md5_len, pg_md5_digest, {0}},
  64         {"sha1", pg_sha1_len, pg_sha1_digest, {0}},
  65         {NULL, NULL, NULL, {0}}
  66 };
  67
  68 static uint
  69 pg_md5_len(pg_digest * h)
  70 {
  71         return MD5_DIGEST_LENGTH;
  72 }
  73
  74 static uint8 *
  75 pg_md5_digest(pg_digest * h, uint8 *src, uint len, uint8 *buf)
  76 {
  77         MD5_CTX         ctx;
  78
  79         MD5Init(&ctx);
  80         MD5Update(&ctx, src, len);
  81         MD5Final(buf, &ctx);
  82
  83         return buf;
  84 }
  85
  86 static uint
  87 pg_sha1_len(pg_digest * h)
  88 {
  89         return SHA1_DIGEST_LENGTH;
  90 }
  91
  92 static uint8 *
  93 pg_sha1_digest(pg_digest * h, uint8 *src, uint len, uint8 *buf)
  94 {
  95         SHA1_CTX        ctx;
  96
  97         SHA1Init(&ctx);
  98         SHA1Update(&ctx, src, len);
  99         SHA1Final(buf, &ctx);
 100
 101         return buf;
 102 }
 103
 104
 105 pg_digest  *
 106 pg_find_digest(pg_digest * h, char *name)
 107 {
 108         pg_digest  *p;
 109
 110         for (p = int_digest_list; p->name; p++)
 111                 if (!strcasecmp(p->name, name))
 112                         return p;
 113         return NULL;
 114 }