granicus.if.org Git - postgresql/blob - contrib/pgcrypto/openssl.c

   1 /*
   2  * openssl.c
   3  *              Wrapper for OpenSSL library.
   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: openssl.c,v 1.1 2000/10/31 13:11:28 petere Exp $
  30  */
  31
  32 #include <postgres.h>
  33 #include "pgcrypto.h"
  34
  35 #include <evp.h>
  36
  37 static uint
  38 pg_ossl_len(pg_digest *h);
  39 static uint8 *
  40 pg_ossl_digest(pg_digest *h, uint8 *src, uint len, uint8 *buf);
  41
  42 static uint
  43 pg_ossl_len(pg_digest *h) {
  44         return EVP_MD_size((EVP_MD*)h->misc.ptr);
  45 }
  46
  47 static uint8 *
  48 pg_ossl_digest(pg_digest *h, uint8 *src, uint len, uint8 *buf)
  49 {
  50         EVP_MD *md = (EVP_MD*)h->misc.ptr;
  51         EVP_MD_CTX ctx;
  52
  53         EVP_DigestInit(&ctx, md);
  54         EVP_DigestUpdate(&ctx, src, len);
  55         EVP_DigestFinal(&ctx, buf, NULL);
  56
  57         return buf;
  58 }
  59
  60 static int pg_openssl_initialized = 0;
  61
  62 pg_digest *
  63 pg_find_digest(pg_digest *h, char *name)
  64 {
  65         const EVP_MD *md;
  66
  67         if (!pg_openssl_initialized) {
  68                 OpenSSL_add_all_digests();
  69                 pg_openssl_initialized = 1;
  70         }
  71
  72         md = EVP_get_digestbyname(name);
  73         if (md == NULL)
  74                 return NULL;
  75
  76         h->name = name;
  77         h->length = pg_ossl_len;
  78         h->digest = pg_ossl_digest;
  79         h->misc.ptr = (void*)md;
  80
  81         return h;
  82 }
  83
  84