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.
29 #if defined(HAVE_SHA1_IN_LIBMD) /* Use libmd for SHA1 */ \
30 || defined(HAVE_SHA1_IN_LIBC) /* Use libc for SHA1 */
37 SHA1_CTX
*ctx
= malloc(sizeof(*ctx
));
43 return (struct mesa_sha1
*) ctx
;
47 _mesa_sha1_update(struct mesa_sha1
*ctx
, const void *data
, int size
)
49 SHA1_CTX
*sha1_ctx
= (SHA1_CTX
*) ctx
;
51 SHA1Update(sha1_ctx
, data
, size
);
56 _mesa_sha1_final(struct mesa_sha1
*ctx
, unsigned char result
[20])
58 SHA1_CTX
*sha1_ctx
= (SHA1_CTX
*) ctx
;
60 SHA1Final(result
, sha1_ctx
);
65 #elif defined(HAVE_SHA1_IN_COMMONCRYPTO) /* Use CommonCrypto for SHA1 */
67 #include <CommonCrypto/CommonDigest.h>
72 CC_SHA1_CTX
*ctx
= malloc(sizeof(*ctx
));
78 return (struct mesa_sha1
*) ctx
;
82 _mesa_sha1_update(struct mesa_sha1
*ctx
, const void *data
, int size
)
84 CC_SHA1_CTX
*sha1_ctx
= (CC_SHA1_CTX
*) ctx
;
86 CC_SHA1_Update(sha1_ctx
, data
, size
);
91 _mesa_sha1_final(struct mesa_sha1
*ctx
, unsigned char result
[20])
93 CC_SHA1_CTX
*sha1_ctx
= (CC_SHA1_CTX
*) ctx
;
95 CC_SHA1_Final(result
, sha1_ctx
);
100 #elif defined(HAVE_SHA1_IN_CRYPTOAPI) /* Use CryptoAPI for SHA1 */
102 #define WIN32_LEAN_AND_MEAN
104 #include <wincrypt.h>
106 static HCRYPTPROV hProv
;
109 _mesa_sha1_init(void)
111 HCRYPTHASH
*ctx
= malloc(sizeof(*ctx
));
116 CryptAcquireContext(&hProv
, NULL
, MS_DEF_PROV
, PROV_RSA_FULL
, CRYPT_VERIFYCONTEXT
);
117 CryptCreateHash(hProv
, CALG_SHA1
, 0, 0, ctx
);
118 return (struct mesa_sha1
*) ctx
;
122 _mesa_sha1_update(struct mesa_sha1
*ctx
, const void *data
, int size
)
124 HCRYPTHASH
*hHash
= (HCRYPTHASH
*) ctx
;
126 CryptHashData(*hHash
, data
, size
, 0);
131 _mesa_sha1_final(struct mesa_sha1
*ctx
, unsigned char result
[20])
133 HCRYPTHASH
*hHash
= (HCRYPTHASH
*) ctx
;
136 CryptGetHashParam(*hHash
, HP_HASHVAL
, result
, &len
, 0);
137 CryptDestroyHash(*hHash
);
138 CryptReleaseContext(hProv
, 0);
143 #elif defined(HAVE_SHA1_IN_LIBNETTLE) /* Use libnettle for SHA1 */
145 #include <nettle/sha.h>
148 _mesa_sha1_init(void)
150 struct sha1_ctx
*ctx
= malloc(sizeof(*ctx
));
155 return (struct mesa_sha1
*) ctx
;
159 _mesa_sha1_update(struct mesa_sha1
*ctx
, const void *data
, int size
)
161 sha1_update((struct sha1_ctx
*) ctx
, size
, data
);
166 _mesa_sha1_final(struct mesa_sha1
*ctx
, unsigned char result
[20])
168 sha1_digest((struct sha1_ctx
*) ctx
, 20, result
);
173 #elif defined(HAVE_SHA1_IN_LIBGCRYPT) /* Use libgcrypt for SHA1 */
178 _mesa_sha1_init(void)
185 if (!gcry_check_version(NULL
))
187 gcry_control(GCRYCTL_DISABLE_SECMEM
, 0);
188 gcry_control(GCRYCTL_INITIALIZATION_FINISHED
, 0);
192 err
= gcry_md_open(&h
, GCRY_MD_SHA1
, 0);
195 return (struct mesa_sha1
*) h
;
199 _mesa_sha1_update(struct mesa_sha1
*ctx
, const void *data
, int size
)
201 gcry_md_hd_t h
= (gcry_md_hd_t
) ctx
;
203 gcry_md_write(h
, data
, size
);
208 _mesa_sha1_final(struct mesa_sha1
*ctx
, unsigned char result
[20])
210 gcry_md_hd_t h
= (gcry_md_hd_t
) ctx
;
212 memcpy(result
, gcry_md_read(h
, GCRY_MD_SHA1
), 20);
217 #elif defined(HAVE_SHA1_IN_LIBSHA1) /* Use libsha1 */
222 _mesa_sha1_init(void)
224 sha1_ctx
*ctx
= malloc(sizeof(*ctx
));
229 return (struct mesa_sha1
*) ctx
;
233 _mesa_sha1_update(struct mesa_sha1
*ctx
, const void *data
, int size
)
235 sha1_hash(data
, size
, (sha1_ctx
*) ctx
);
240 _mesa_sha1_final(struct mesa_sha1
*ctx
, unsigned char result
[20])
242 sha1_end(result
, (sha1_ctx
*) ctx
);
247 #else /* Use OpenSSL's libcrypto */
249 #include <stddef.h> /* buggy openssl/sha.h wants size_t */
250 #include <openssl/sha.h>
253 _mesa_sha1_init(void)
256 SHA_CTX
*ctx
= malloc(sizeof(*ctx
));
260 ret
= SHA1_Init(ctx
);
265 return (struct mesa_sha1
*) ctx
;
269 _mesa_sha1_update(struct mesa_sha1
*ctx
, const void *data
, int size
)
272 SHA_CTX
*sha_ctx
= (SHA_CTX
*) ctx
;
274 ret
= SHA1_Update(sha_ctx
, data
, size
);
281 _mesa_sha1_final(struct mesa_sha1
*ctx
, unsigned char result
[20])
284 SHA_CTX
*sha_ctx
= (SHA_CTX
*) ctx
;
286 ret
= SHA1_Final(result
, (SHA_CTX
*) sha_ctx
);
294 _mesa_sha1_compute(const void *data
, size_t size
, unsigned char result
[20])
296 struct mesa_sha1
*ctx
;
298 ctx
= _mesa_sha1_init();
299 _mesa_sha1_update(ctx
, data
, size
);
300 _mesa_sha1_final(ctx
, result
);
304 _mesa_sha1_format(char *buf
, const unsigned char *sha1
)
306 static const char hex_digits
[] = "0123456789abcdef";
309 for (i
= 0; i
< 40; i
+= 2) {
310 buf
[i
] = hex_digits
[sha1
[i
>> 1] >> 4];
311 buf
[i
+ 1] = hex_digits
[sha1
[i
>> 1] & 0x0f];