1 /* Copyright © 2007 Carl Worth
2 * Copyright © 2009 Jeremy Huddleston, Julien Cristau, and Matthieu Herrb
3 * Copyright © 2009-2010 Mikhail Gusarov
4 * Copyright © 2012 Yaakov Selkowitz and Keith Packard
5 * Copyright © 2014 Intel Corporation
7 * Permission is hereby granted, free of charge, to any person obtaining a
8 * copy of this software and associated documentation files (the "Software"),
9 * to deal in the Software without restriction, including without limitation
10 * the rights to use, copy, modify, merge, publish, distribute, sublicense,
11 * and/or sell copies of the Software, and to permit persons to whom the
12 * Software is furnished to do so, subject to the following conditions:
14 * The above copyright notice and this permission notice (including the next
15 * paragraph) shall be included in all copies or substantial portions of the
18 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
19 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
20 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
21 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
22 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
23 * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
24 * DEALINGS IN THE SOFTWARE.
27 #include "mesa-sha1.h"
31 #if defined(HAVE_SHA1_IN_LIBMD) /* Use libmd for SHA1 */ \
32 || defined(HAVE_SHA1_IN_LIBC) /* Use libc for SHA1 */
39 SHA1_CTX
*ctx
= malloc(sizeof(*ctx
));
45 return (struct mesa_sha1
*) ctx
;
49 _mesa_sha1_update(struct mesa_sha1
*ctx
, const void *data
, int size
)
51 SHA1_CTX
*sha1_ctx
= (SHA1_CTX
*) ctx
;
53 SHA1Update(sha1_ctx
, data
, size
);
58 _mesa_sha1_final(struct mesa_sha1
*ctx
, unsigned char result
[20])
60 SHA1_CTX
*sha1_ctx
= (SHA1_CTX
*) ctx
;
62 SHA1Final(result
, sha1_ctx
);
67 #elif defined(HAVE_SHA1_IN_COMMONCRYPTO) /* Use CommonCrypto for SHA1 */
69 #include <CommonCrypto/CommonDigest.h>
74 CC_SHA1_CTX
*ctx
= malloc(sizeof(*ctx
));
80 return (struct mesa_sha1
*) ctx
;
84 _mesa_sha1_update(struct mesa_sha1
*ctx
, const void *data
, int size
)
86 CC_SHA1_CTX
*sha1_ctx
= (CC_SHA1_CTX
*) ctx
;
88 CC_SHA1_Update(sha1_ctx
, data
, size
);
93 _mesa_sha1_final(struct mesa_sha1
*ctx
, unsigned char result
[20])
95 CC_SHA1_CTX
*sha1_ctx
= (CC_SHA1_CTX
*) ctx
;
97 CC_SHA1_Final(result
, sha1_ctx
);
102 #elif defined(HAVE_SHA1_IN_CRYPTOAPI) /* Use CryptoAPI for SHA1 */
104 #define WIN32_LEAN_AND_MEAN
106 #include <wincrypt.h>
108 static HCRYPTPROV hProv
;
111 _mesa_sha1_init(void)
113 HCRYPTHASH
*ctx
= malloc(sizeof(*ctx
));
118 CryptAcquireContext(&hProv
, NULL
, MS_DEF_PROV
, PROV_RSA_FULL
, CRYPT_VERIFYCONTEXT
);
119 CryptCreateHash(hProv
, CALG_SHA1
, 0, 0, ctx
);
120 return (struct mesa_sha1
*) ctx
;
124 _mesa_sha1_update(struct mesa_sha1
*ctx
, const void *data
, int size
)
126 HCRYPTHASH
*hHash
= (HCRYPTHASH
*) ctx
;
128 CryptHashData(*hHash
, data
, size
, 0);
133 _mesa_sha1_final(struct mesa_sha1
*ctx
, unsigned char result
[20])
135 HCRYPTHASH
*hHash
= (HCRYPTHASH
*) ctx
;
138 CryptGetHashParam(*hHash
, HP_HASHVAL
, result
, &len
, 0);
139 CryptDestroyHash(*hHash
);
140 CryptReleaseContext(hProv
, 0);
145 #elif defined(HAVE_SHA1_IN_LIBNETTLE) /* Use libnettle for SHA1 */
147 #include <nettle/sha.h>
150 _mesa_sha1_init(void)
152 struct sha1_ctx
*ctx
= malloc(sizeof(*ctx
));
157 return (struct mesa_sha1
*) ctx
;
161 _mesa_sha1_update(struct mesa_sha1
*ctx
, const void *data
, int size
)
163 sha1_update((struct sha1_ctx
*) ctx
, size
, data
);
168 _mesa_sha1_final(struct mesa_sha1
*ctx
, unsigned char result
[20])
170 sha1_digest((struct sha1_ctx
*) ctx
, 20, result
);
175 #elif defined(HAVE_SHA1_IN_LIBGCRYPT) /* Use libgcrypt for SHA1 */
178 #include "c11/threads.h"
180 static void _mesa_libgcrypt_init(void)
182 if (!gcry_check_version(NULL
))
185 gcry_control(GCRYCTL_DISABLE_SECMEM
, 0);
186 gcry_control(GCRYCTL_INITIALIZATION_FINISHED
, 0);
190 _mesa_sha1_init(void)
192 static once_flag flag
= ONCE_FLAG_INIT
;
196 call_once(&flag
, _mesa_libgcrypt_init
);
198 err
= gcry_md_open(&h
, GCRY_MD_SHA1
, 0);
201 return (struct mesa_sha1
*) h
;
205 _mesa_sha1_update(struct mesa_sha1
*ctx
, const void *data
, int size
)
207 gcry_md_hd_t h
= (gcry_md_hd_t
) ctx
;
209 gcry_md_write(h
, data
, size
);
214 _mesa_sha1_final(struct mesa_sha1
*ctx
, unsigned char result
[20])
216 gcry_md_hd_t h
= (gcry_md_hd_t
) ctx
;
218 memcpy(result
, gcry_md_read(h
, GCRY_MD_SHA1
), 20);
223 #elif defined(HAVE_SHA1_IN_LIBSHA1) /* Use libsha1 */
228 _mesa_sha1_init(void)
230 sha1_ctx
*ctx
= malloc(sizeof(*ctx
));
235 return (struct mesa_sha1
*) ctx
;
239 _mesa_sha1_update(struct mesa_sha1
*ctx
, const void *data
, int size
)
241 sha1_hash(data
, size
, (sha1_ctx
*) ctx
);
246 _mesa_sha1_final(struct mesa_sha1
*ctx
, unsigned char result
[20])
248 sha1_end(result
, (sha1_ctx
*) ctx
);
253 #else /* Use OpenSSL's libcrypto */
255 #include <stddef.h> /* buggy openssl/sha.h wants size_t */
256 #include <openssl/sha.h>
259 _mesa_sha1_init(void)
262 SHA_CTX
*ctx
= malloc(sizeof(*ctx
));
266 ret
= SHA1_Init(ctx
);
271 return (struct mesa_sha1
*) ctx
;
275 _mesa_sha1_update(struct mesa_sha1
*ctx
, const void *data
, int size
)
278 SHA_CTX
*sha_ctx
= (SHA_CTX
*) ctx
;
280 ret
= SHA1_Update(sha_ctx
, data
, size
);
287 _mesa_sha1_final(struct mesa_sha1
*ctx
, unsigned char result
[20])
290 SHA_CTX
*sha_ctx
= (SHA_CTX
*) ctx
;
292 ret
= SHA1_Final(result
, (SHA_CTX
*) sha_ctx
);
300 _mesa_sha1_compute(const void *data
, size_t size
, unsigned char result
[20])
302 struct mesa_sha1
*ctx
;
304 ctx
= _mesa_sha1_init();
305 _mesa_sha1_update(ctx
, data
, size
);
306 _mesa_sha1_final(ctx
, result
);
310 _mesa_sha1_format(char *buf
, const unsigned char *sha1
)
312 static const char hex_digits
[] = "0123456789abcdef";
315 for (i
= 0; i
< 40; i
+= 2) {
316 buf
[i
] = hex_digits
[sha1
[i
>> 1] >> 4];
317 buf
[i
+ 1] = hex_digits
[sha1
[i
>> 1] & 0x0f];