1 /* Wrap openssl crypto hash routines in gnulib interface. -*- coding: utf-8 -*-
3 Copyright (C) 2013-2024 Free Software Foundation, Inc.
5 This file is free software: you can redistribute it and/or modify
6 it under the terms of the GNU Lesser General Public License as
7 published by the Free Software Foundation; either version 2.1 of the
8 License, or (at your option) any later version.
10 This file 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 Lesser General Public License for more details.
15 You should have received a copy of the GNU Lesser General Public License
16 along with this program. If not, see <https://www.gnu.org/licenses/>. */
18 /* Written by Pádraig Brady */
20 /* This file uses _GL_INLINE_HEADER_BEGIN, _GL_INLINE. */
21 #if !_GL_CONFIG_H_INCLUDED
22 #error "Please include config.h first."
25 #ifndef GL_OPENSSL_NAME
26 # error "Please define GL_OPENSSL_NAME to 1,5,256 etc."
29 _GL_INLINE_HEADER_BEGIN
30 #ifndef GL_OPENSSL_INLINE
31 # define GL_OPENSSL_INLINE _GL_INLINE
34 /* Concatenate two preprocessor tokens. */
35 #define _GLCRYPTO_CONCAT_(prefix, suffix) prefix##suffix
36 #define _GLCRYPTO_CONCAT(prefix, suffix) _GLCRYPTO_CONCAT_ (prefix, suffix)
38 #if GL_OPENSSL_NAME == 5
39 # define OPENSSL_ALG md5
41 # define OPENSSL_ALG _GLCRYPTO_CONCAT (sha, GL_OPENSSL_NAME)
44 /* Context type mappings. */
45 #if BASE_OPENSSL_TYPE != GL_OPENSSL_NAME
46 # undef BASE_OPENSSL_TYPE
47 # if GL_OPENSSL_NAME == 224
48 # define BASE_OPENSSL_TYPE 256
49 # elif GL_OPENSSL_NAME == 384
50 # define BASE_OPENSSL_TYPE 512
52 # define md5_CTX MD5_CTX
53 # define sha1_CTX SHA_CTX
54 # define sha224_CTX SHA256_CTX
55 # define sha224_ctx sha256_ctx
56 # define sha256_CTX SHA256_CTX
57 # define sha384_CTX SHA512_CTX
58 # define sha384_ctx sha512_ctx
59 # define sha512_CTX SHA512_CTX
62 # define _gl_CTX _GLCRYPTO_CONCAT (OPENSSL_ALG, _CTX) /* openssl type. */
63 # define _gl_ctx _GLCRYPTO_CONCAT (OPENSSL_ALG, _ctx) /* gnulib type. */
65 struct _gl_ctx
{ _gl_CTX CTX
; };
68 /* Function name mappings. */
69 #define md5_prefix MD5
70 #define sha1_prefix SHA1
71 #define sha224_prefix SHA224
72 #define sha256_prefix SHA256
73 #define sha384_prefix SHA384
74 #define sha512_prefix SHA512
75 #define _GLCRYPTO_PREFIX _GLCRYPTO_CONCAT (OPENSSL_ALG, _prefix)
76 #define OPENSSL_FN(suffix) _GLCRYPTO_CONCAT (_GLCRYPTO_PREFIX, suffix)
77 #define GL_CRYPTO_FN(suffix) _GLCRYPTO_CONCAT (OPENSSL_ALG, suffix)
79 GL_OPENSSL_INLINE
void
80 GL_CRYPTO_FN (_init_ctx
) (struct _gl_ctx
*ctx
)
81 { (void) OPENSSL_FN (_Init
) ((_gl_CTX
*) ctx
); }
83 /* These were never exposed by gnulib. */
84 #if ! (GL_OPENSSL_NAME == 224 || GL_OPENSSL_NAME == 384)
85 GL_OPENSSL_INLINE
void
86 GL_CRYPTO_FN (_process_bytes
) (const void *buf
, size_t len
, struct _gl_ctx
*ctx
)
87 { OPENSSL_FN (_Update
) ((_gl_CTX
*) ctx
, buf
, len
); }
89 GL_OPENSSL_INLINE
void
90 GL_CRYPTO_FN (_process_block
) (const void *buf
, size_t len
, struct _gl_ctx
*ctx
)
91 { GL_CRYPTO_FN (_process_bytes
) (buf
, len
, ctx
); }
94 GL_OPENSSL_INLINE
void *
95 GL_CRYPTO_FN (_finish_ctx
) (struct _gl_ctx
*ctx
, void *restrict res
)
96 { OPENSSL_FN (_Final
) ((unsigned char *) res
, (_gl_CTX
*) ctx
); return res
; }
98 GL_OPENSSL_INLINE
void *
99 GL_CRYPTO_FN (_buffer
) (const char *buf
, size_t len
, void *restrict res
)
100 { return OPENSSL_FN () ((const unsigned char *) buf
, len
, (unsigned char *) res
); }
102 GL_OPENSSL_INLINE
void *
103 GL_CRYPTO_FN (_read_ctx
) (const struct _gl_ctx
*ctx
, void *restrict res
)
105 /* Assume any unprocessed bytes in ctx are not to be ignored. */
106 _gl_CTX tmp_ctx
= *(_gl_CTX
*) ctx
;
107 OPENSSL_FN (_Final
) ((unsigned char *) res
, &tmp_ctx
);
111 /* Undef so we can include multiple times. */
114 #undef _GLCRYPTO_PREFIX
116 #undef GL_OPENSSL_NAME
118 _GL_INLINE_HEADER_END