source: azure_iot_hub/trunk/wolfssl-3.15.7/wolfcrypt/src/md5.c@ 388

Last change on this file since 388 was 388, checked in by coas-nagasima, 5 years ago

Azure IoT Hub Device C SDK を使ったサンプルの追加
  • Property svn:eol-style set to native
  • Property svn:keywords set to Id
  • Property svn:mime-type set to text/x-csrc
File size: 13.5 KB
Line 
1/* md5.c
2 *
3 * Copyright (C) 2006-2017 wolfSSL Inc.
4 *
5 * This file is part of wolfSSL.
6 *
7 * wolfSSL is free software; you can redistribute it and/or modify
8 * it under the terms of the GNU General Public License as published by
9 * the Free Software Foundation; either version 2 of the License, or
10 * (at your option) any later version.
11 *
12 * wolfSSL is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 * GNU General Public License for more details.
16 *
17 * You should have received a copy of the GNU General Public License
18 * along with this program; if not, write to the Free Software
19 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1335, USA
20 */
21
22
23
24#ifdef HAVE_CONFIG_H
25 #include <config.h>
26#endif
27
28#include <wolfssl/wolfcrypt/settings.h>
29
30#if !defined(NO_MD5)
31
32#if defined(WOLFSSL_TI_HASH)
33 /* #include <wolfcrypt/src/port/ti/ti-hash.c> included by wc_port.c */
34
35#else
36
37#include <wolfssl/wolfcrypt/md5.h>
38#include <wolfssl/wolfcrypt/error-crypt.h>
39#include <wolfssl/wolfcrypt/logging.h>
40
41#ifdef NO_INLINE
42 #include <wolfssl/wolfcrypt/misc.h>
43#else
44 #define WOLFSSL_MISC_INCLUDED
45 #include <wolfcrypt/src/misc.c>
46#endif
47
48
49/* Hardware Acceleration */
50#if defined(STM32_HASH)
51
52 /* Supports CubeMX HAL or Standard Peripheral Library */
53 #define HAVE_MD5_CUST_API
54
55 int wc_InitMd5_ex(wc_Md5* md5, void* heap, int devId)
56 {
57 if (md5 == NULL) {
58 return BAD_FUNC_ARG;
59 }
60
61 (void)devId;
62 (void)heap;
63
64 wc_Stm32_Hash_Init(&md5->stmCtx);
65
66 return 0;
67 }
68
69 int wc_Md5Update(wc_Md5* md5, const byte* data, word32 len)
70 {
71 int ret;
72
73 if (md5 == NULL || (data == NULL && len > 0)) {
74 return BAD_FUNC_ARG;
75 }
76
77 ret = wolfSSL_CryptHwMutexLock();
78 if (ret == 0) {
79 ret = wc_Stm32_Hash_Update(&md5->stmCtx, HASH_AlgoSelection_MD5,
80 data, len);
81 wolfSSL_CryptHwMutexUnLock();
82 }
83 return ret;
84 }
85
86 int wc_Md5Final(wc_Md5* md5, byte* hash)
87 {
88 int ret;
89
90 if (md5 == NULL || hash == NULL) {
91 return BAD_FUNC_ARG;
92 }
93
94 ret = wolfSSL_CryptHwMutexLock();
95 if (ret == 0) {
96 ret = wc_Stm32_Hash_Final(&md5->stmCtx, HASH_AlgoSelection_MD5,
97 hash, WC_MD5_DIGEST_SIZE);
98 wolfSSL_CryptHwMutexUnLock();
99 }
100
101 (void)wc_InitMd5(md5); /* reset state */
102
103 return ret;
104 }
105
106#elif defined(FREESCALE_MMCAU_SHA)
107 #include "cau_api.h"
108 #define XTRANSFORM(S,B) Transform((S), (B))
109
110 static int Transform(wc_Md5* md5, byte* data)
111 {
112 int ret = wolfSSL_CryptHwMutexLock();
113 if(ret == 0) {
114 #ifdef FREESCALE_MMCAU_CLASSIC_SHA
115 cau_md5_hash_n(data, 1, (unsigned char*)md5->digest);
116 #else
117 MMCAU_MD5_HashN(data, 1, (uint32_t*)md5->digest);
118 #endif
119 wolfSSL_CryptHwMutexUnLock();
120 }
121 return ret;
122 }
123
124#elif defined(WOLFSSL_PIC32MZ_HASH)
125 #include <wolfssl/wolfcrypt/port/pic32/pic32mz-crypt.h>
126 #define HAVE_MD5_CUST_API
127
128#elif defined(WOLFSSL_IMX6_CAAM) && !defined(NO_IMX6_CAAM_HASH)
129 /* functions implemented in wolfcrypt/src/port/caam/caam_sha.c */
130 #define HAVE_MD5_CUST_API
131#else
132 #define NEED_SOFT_MD5
133
134#endif /* End Hardware Acceleration */
135
136
137#ifdef NEED_SOFT_MD5
138
139 #define XTRANSFORM(S,B) Transform((S))
140
141 #define F1(x, y, z) (z ^ (x & (y ^ z)))
142 #define F2(x, y, z) F1(z, x, y)
143 #define F3(x, y, z) (x ^ y ^ z)
144 #define F4(x, y, z) (y ^ (x | ~z))
145
146 #define MD5STEP(f, w, x, y, z, data, s) \
147 w = rotlFixed(w + f(x, y, z) + data, s) + x
148
149 static int Transform(wc_Md5* md5)
150 {
151 /* Copy context->state[] to working vars */
152 word32 a = md5->digest[0];
153 word32 b = md5->digest[1];
154 word32 c = md5->digest[2];
155 word32 d = md5->digest[3];
156
157 MD5STEP(F1, a, b, c, d, md5->buffer[0] + 0xd76aa478, 7);
158 MD5STEP(F1, d, a, b, c, md5->buffer[1] + 0xe8c7b756, 12);
159 MD5STEP(F1, c, d, a, b, md5->buffer[2] + 0x242070db, 17);
160 MD5STEP(F1, b, c, d, a, md5->buffer[3] + 0xc1bdceee, 22);
161 MD5STEP(F1, a, b, c, d, md5->buffer[4] + 0xf57c0faf, 7);
162 MD5STEP(F1, d, a, b, c, md5->buffer[5] + 0x4787c62a, 12);
163 MD5STEP(F1, c, d, a, b, md5->buffer[6] + 0xa8304613, 17);
164 MD5STEP(F1, b, c, d, a, md5->buffer[7] + 0xfd469501, 22);
165 MD5STEP(F1, a, b, c, d, md5->buffer[8] + 0x698098d8, 7);
166 MD5STEP(F1, d, a, b, c, md5->buffer[9] + 0x8b44f7af, 12);
167 MD5STEP(F1, c, d, a, b, md5->buffer[10] + 0xffff5bb1, 17);
168 MD5STEP(F1, b, c, d, a, md5->buffer[11] + 0x895cd7be, 22);
169 MD5STEP(F1, a, b, c, d, md5->buffer[12] + 0x6b901122, 7);
170 MD5STEP(F1, d, a, b, c, md5->buffer[13] + 0xfd987193, 12);
171 MD5STEP(F1, c, d, a, b, md5->buffer[14] + 0xa679438e, 17);
172 MD5STEP(F1, b, c, d, a, md5->buffer[15] + 0x49b40821, 22);
173
174 MD5STEP(F2, a, b, c, d, md5->buffer[1] + 0xf61e2562, 5);
175 MD5STEP(F2, d, a, b, c, md5->buffer[6] + 0xc040b340, 9);
176 MD5STEP(F2, c, d, a, b, md5->buffer[11] + 0x265e5a51, 14);
177 MD5STEP(F2, b, c, d, a, md5->buffer[0] + 0xe9b6c7aa, 20);
178 MD5STEP(F2, a, b, c, d, md5->buffer[5] + 0xd62f105d, 5);
179 MD5STEP(F2, d, a, b, c, md5->buffer[10] + 0x02441453, 9);
180 MD5STEP(F2, c, d, a, b, md5->buffer[15] + 0xd8a1e681, 14);
181 MD5STEP(F2, b, c, d, a, md5->buffer[4] + 0xe7d3fbc8, 20);
182 MD5STEP(F2, a, b, c, d, md5->buffer[9] + 0x21e1cde6, 5);
183 MD5STEP(F2, d, a, b, c, md5->buffer[14] + 0xc33707d6, 9);
184 MD5STEP(F2, c, d, a, b, md5->buffer[3] + 0xf4d50d87, 14);
185 MD5STEP(F2, b, c, d, a, md5->buffer[8] + 0x455a14ed, 20);
186 MD5STEP(F2, a, b, c, d, md5->buffer[13] + 0xa9e3e905, 5);
187 MD5STEP(F2, d, a, b, c, md5->buffer[2] + 0xfcefa3f8, 9);
188 MD5STEP(F2, c, d, a, b, md5->buffer[7] + 0x676f02d9, 14);
189 MD5STEP(F2, b, c, d, a, md5->buffer[12] + 0x8d2a4c8a, 20);
190
191 MD5STEP(F3, a, b, c, d, md5->buffer[5] + 0xfffa3942, 4);
192 MD5STEP(F3, d, a, b, c, md5->buffer[8] + 0x8771f681, 11);
193 MD5STEP(F3, c, d, a, b, md5->buffer[11] + 0x6d9d6122, 16);
194 MD5STEP(F3, b, c, d, a, md5->buffer[14] + 0xfde5380c, 23);
195 MD5STEP(F3, a, b, c, d, md5->buffer[1] + 0xa4beea44, 4);
196 MD5STEP(F3, d, a, b, c, md5->buffer[4] + 0x4bdecfa9, 11);
197 MD5STEP(F3, c, d, a, b, md5->buffer[7] + 0xf6bb4b60, 16);
198 MD5STEP(F3, b, c, d, a, md5->buffer[10] + 0xbebfbc70, 23);
199 MD5STEP(F3, a, b, c, d, md5->buffer[13] + 0x289b7ec6, 4);
200 MD5STEP(F3, d, a, b, c, md5->buffer[0] + 0xeaa127fa, 11);
201 MD5STEP(F3, c, d, a, b, md5->buffer[3] + 0xd4ef3085, 16);
202 MD5STEP(F3, b, c, d, a, md5->buffer[6] + 0x04881d05, 23);
203 MD5STEP(F3, a, b, c, d, md5->buffer[9] + 0xd9d4d039, 4);
204 MD5STEP(F3, d, a, b, c, md5->buffer[12] + 0xe6db99e5, 11);
205 MD5STEP(F3, c, d, a, b, md5->buffer[15] + 0x1fa27cf8, 16);
206 MD5STEP(F3, b, c, d, a, md5->buffer[2] + 0xc4ac5665, 23);
207
208 MD5STEP(F4, a, b, c, d, md5->buffer[0] + 0xf4292244, 6);
209 MD5STEP(F4, d, a, b, c, md5->buffer[7] + 0x432aff97, 10);
210 MD5STEP(F4, c, d, a, b, md5->buffer[14] + 0xab9423a7, 15);
211 MD5STEP(F4, b, c, d, a, md5->buffer[5] + 0xfc93a039, 21);
212 MD5STEP(F4, a, b, c, d, md5->buffer[12] + 0x655b59c3, 6);
213 MD5STEP(F4, d, a, b, c, md5->buffer[3] + 0x8f0ccc92, 10);
214 MD5STEP(F4, c, d, a, b, md5->buffer[10] + 0xffeff47d, 15);
215 MD5STEP(F4, b, c, d, a, md5->buffer[1] + 0x85845dd1, 21);
216 MD5STEP(F4, a, b, c, d, md5->buffer[8] + 0x6fa87e4f, 6);
217 MD5STEP(F4, d, a, b, c, md5->buffer[15] + 0xfe2ce6e0, 10);
218 MD5STEP(F4, c, d, a, b, md5->buffer[6] + 0xa3014314, 15);
219 MD5STEP(F4, b, c, d, a, md5->buffer[13] + 0x4e0811a1, 21);
220 MD5STEP(F4, a, b, c, d, md5->buffer[4] + 0xf7537e82, 6);
221 MD5STEP(F4, d, a, b, c, md5->buffer[11] + 0xbd3af235, 10);
222 MD5STEP(F4, c, d, a, b, md5->buffer[2] + 0x2ad7d2bb, 15);
223 MD5STEP(F4, b, c, d, a, md5->buffer[9] + 0xeb86d391, 21);
224
225 /* Add the working vars back into digest state[] */
226 md5->digest[0] += a;
227 md5->digest[1] += b;
228 md5->digest[2] += c;
229 md5->digest[3] += d;
230
231 return 0;
232 }
233#endif /* NEED_SOFT_MD5 */
234
235#ifndef HAVE_MD5_CUST_API
236
237static WC_INLINE void AddLength(wc_Md5* md5, word32 len)
238{
239 word32 tmp = md5->loLen;
240 if ((md5->loLen += len) < tmp) {
241 md5->hiLen++; /* carry low to high */
242 }
243}
244
245static int _InitMd5(wc_Md5* md5)
246{
247 int ret = 0;
248
249 md5->digest[0] = 0x67452301L;
250 md5->digest[1] = 0xefcdab89L;
251 md5->digest[2] = 0x98badcfeL;
252 md5->digest[3] = 0x10325476L;
253
254 md5->buffLen = 0;
255 md5->loLen = 0;
256 md5->hiLen = 0;
257
258 return ret;
259}
260
261int wc_InitMd5_ex(wc_Md5* md5, void* heap, int devId)
262{
263 int ret = 0;
264
265 if (md5 == NULL)
266 return BAD_FUNC_ARG;
267
268 md5->heap = heap;
269
270 ret = _InitMd5(md5);
271 if (ret != 0)
272 return ret;
273
274#if defined(WOLFSSL_ASYNC_CRYPT) && defined(WC_ASYNC_ENABLE_MD5)
275 ret = wolfAsync_DevCtxInit(&md5->asyncDev, WOLFSSL_ASYNC_MARKER_MD5,
276 md5->heap, devId);
277#else
278 (void)devId;
279#endif
280 return ret;
281}
282
283int wc_Md5Update(wc_Md5* md5, const byte* data, word32 len)
284{
285 int ret = 0;
286 byte* local;
287
288 if (md5 == NULL || (data == NULL && len > 0)) {
289 return BAD_FUNC_ARG;
290 }
291
292#if defined(WOLFSSL_ASYNC_CRYPT) && defined(WC_ASYNC_ENABLE_MD5)
293 if (md5->asyncDev.marker == WOLFSSL_ASYNC_MARKER_MD5) {
294 #if defined(HAVE_INTEL_QA)
295 return IntelQaSymMd5(&md5->asyncDev, NULL, data, len);
296 #endif
297 }
298#endif /* WOLFSSL_ASYNC_CRYPT */
299
300 /* do block size increments */
301 local = (byte*)md5->buffer;
302
303 /* check that internal buffLen is valid */
304 if (md5->buffLen >= WC_MD5_BLOCK_SIZE)
305 return BUFFER_E;
306
307 while (len) {
308 word32 add = min(len, WC_MD5_BLOCK_SIZE - md5->buffLen);
309 XMEMCPY(&local[md5->buffLen], data, add);
310
311 md5->buffLen += add;
312 data += add;
313 len -= add;
314
315 if (md5->buffLen == WC_MD5_BLOCK_SIZE) {
316 #if defined(BIG_ENDIAN_ORDER) && !defined(FREESCALE_MMCAU_SHA)
317 ByteReverseWords(md5->buffer, md5->buffer, WC_MD5_BLOCK_SIZE);
318 #endif
319 XTRANSFORM(md5, local);
320 AddLength(md5, WC_MD5_BLOCK_SIZE);
321 md5->buffLen = 0;
322 }
323 }
324 return ret;
325}
326
327int wc_Md5Final(wc_Md5* md5, byte* hash)
328{
329 byte* local;
330
331 if (md5 == NULL || hash == NULL) {
332 return BAD_FUNC_ARG;
333 }
334
335#if defined(WOLFSSL_ASYNC_CRYPT) && defined(WC_ASYNC_ENABLE_MD5)
336 if (md5->asyncDev.marker == WOLFSSL_ASYNC_MARKER_MD5) {
337 #if defined(HAVE_INTEL_QA)
338 return IntelQaSymMd5(&md5->asyncDev, hash, NULL, WC_MD5_DIGEST_SIZE);
339 #endif
340 }
341#endif /* WOLFSSL_ASYNC_CRYPT */
342
343 local = (byte*)md5->buffer;
344
345 AddLength(md5, md5->buffLen); /* before adding pads */
346 local[md5->buffLen++] = 0x80; /* add 1 */
347
348 /* pad with zeros */
349 if (md5->buffLen > WC_MD5_PAD_SIZE) {
350 XMEMSET(&local[md5->buffLen], 0, WC_MD5_BLOCK_SIZE - md5->buffLen);
351 md5->buffLen += WC_MD5_BLOCK_SIZE - md5->buffLen;
352
353 #if defined(BIG_ENDIAN_ORDER) && !defined(FREESCALE_MMCAU_SHA)
354 ByteReverseWords(md5->buffer, md5->buffer, WC_MD5_BLOCK_SIZE);
355 #endif
356 XTRANSFORM(md5, local);
357 md5->buffLen = 0;
358 }
359 XMEMSET(&local[md5->buffLen], 0, WC_MD5_PAD_SIZE - md5->buffLen);
360
361#if defined(BIG_ENDIAN_ORDER) && !defined(FREESCALE_MMCAU_SHA)
362 ByteReverseWords(md5->buffer, md5->buffer, WC_MD5_BLOCK_SIZE);
363#endif
364
365 /* put lengths in bits */
366 md5->hiLen = (md5->loLen >> (8*sizeof(md5->loLen) - 3)) +
367 (md5->hiLen << 3);
368 md5->loLen = md5->loLen << 3;
369
370 /* store lengths */
371 /* ! length ordering dependent on digest endian type ! */
372 XMEMCPY(&local[WC_MD5_PAD_SIZE], &md5->loLen, sizeof(word32));
373 XMEMCPY(&local[WC_MD5_PAD_SIZE + sizeof(word32)], &md5->hiLen, sizeof(word32));
374
375 /* final transform and result to hash */
376 XTRANSFORM(md5, local);
377#ifdef BIG_ENDIAN_ORDER
378 ByteReverseWords(md5->digest, md5->digest, WC_MD5_DIGEST_SIZE);
379#endif
380 XMEMCPY(hash, md5->digest, WC_MD5_DIGEST_SIZE);
381
382 return _InitMd5(md5); /* reset state */
383}
384#endif /* !HAVE_MD5_CUST_API */
385
386
387int wc_InitMd5(wc_Md5* md5)
388{
389 if (md5 == NULL) {
390 return BAD_FUNC_ARG;
391 }
392 return wc_InitMd5_ex(md5, NULL, INVALID_DEVID);
393}
394
395void wc_Md5Free(wc_Md5* md5)
396{
397 if (md5 == NULL)
398 return;
399#if defined(WOLFSSL_ASYNC_CRYPT) && defined(WC_ASYNC_ENABLE_MD5)
400 wolfAsync_DevCtxFree(&md5->asyncDev, WOLFSSL_ASYNC_MARKER_MD5);
401#endif /* WOLFSSL_ASYNC_CRYPT */
402
403#ifdef WOLFSSL_PIC32MZ_HASH
404 wc_Md5Pic32Free(md5);
405#endif
406}
407
408int wc_Md5GetHash(wc_Md5* md5, byte* hash)
409{
410 int ret;
411 wc_Md5 tmpMd5;
412
413 if (md5 == NULL || hash == NULL)
414 return BAD_FUNC_ARG;
415
416 ret = wc_Md5Copy(md5, &tmpMd5);
417 if (ret == 0) {
418 ret = wc_Md5Final(&tmpMd5, hash);
419 }
420
421 return ret;
422}
423
424int wc_Md5Copy(wc_Md5* src, wc_Md5* dst)
425{
426 int ret = 0;
427
428 if (src == NULL || dst == NULL)
429 return BAD_FUNC_ARG;
430
431 XMEMCPY(dst, src, sizeof(wc_Md5));
432
433#ifdef WOLFSSL_ASYNC_CRYPT
434 ret = wolfAsync_DevCopy(&src->asyncDev, &dst->asyncDev);
435#endif
436#ifdef WOLFSSL_PIC32MZ_HASH
437 ret = wc_Pic32HashCopy(&src->cache, &dst->cache);
438#endif
439
440 return ret;
441}
442
443#endif /* WOLFSSL_TI_HASH */
444#endif /* NO_MD5 */
Note: See TracBrowser for help on using the repository browser.