1/*
2 * Copyright 1995-2016 The OpenSSL Project Authors. All Rights Reserved.
3 *
4 * Licensed under the Apache License 2.0 (the "License"). You may not use
5 * this file except in compliance with the License. You can obtain a copy
6 * in the file LICENSE in the source distribution or at
7 * https://www.openssl.org/source/license.html
8 */
9
10#include <stdlib.h>
11#include <string.h>
12#include <openssl/e_os2.h>
13#include <openssl/md5.h>
14
15#ifdef MD5_ASM
16# if defined(__i386) || defined(__i386__) || defined(_M_IX86) || \
17 defined(__x86_64) || defined(__x86_64__) || defined(_M_AMD64) || defined(_M_X64)
18# define md5_block_data_order md5_block_asm_data_order
19# elif defined(__ia64) || defined(__ia64__) || defined(_M_IA64)
20# define md5_block_data_order md5_block_asm_data_order
21# elif defined(__sparc) || defined(__sparc__)
22# define md5_block_data_order md5_block_asm_data_order
23# endif
24#endif
25
26void md5_block_data_order(MD5_CTX *c, const void *p, size_t num);
27
28#define DATA_ORDER_IS_LITTLE_ENDIAN
29
30#define HASH_LONG MD5_LONG
31#define HASH_CTX MD5_CTX
32#define HASH_CBLOCK MD5_CBLOCK
33#define HASH_UPDATE MD5_Update
34#define HASH_TRANSFORM MD5_Transform
35#define HASH_FINAL MD5_Final
36#define HASH_MAKE_STRING(c,s) do { \
37 unsigned long ll; \
38 ll=(c)->A; (void)HOST_l2c(ll,(s)); \
39 ll=(c)->B; (void)HOST_l2c(ll,(s)); \
40 ll=(c)->C; (void)HOST_l2c(ll,(s)); \
41 ll=(c)->D; (void)HOST_l2c(ll,(s)); \
42 } while (0)
43#define HASH_BLOCK_DATA_ORDER md5_block_data_order
44
45#include "crypto/md32_common.h"
46
47/*-
48#define F(x,y,z) (((x) & (y)) | ((~(x)) & (z)))
49#define G(x,y,z) (((x) & (z)) | ((y) & (~(z))))
50*/
51
52/*
53 * As pointed out by Wei Dai, the above can be simplified to the code
54 * below. Wei attributes these optimizations to Peter Gutmann's
55 * SHS code, and he attributes it to Rich Schroeppel.
56 */
57#define F(b,c,d) ((((c) ^ (d)) & (b)) ^ (d))
58#define G(b,c,d) ((((b) ^ (c)) & (d)) ^ (c))
59#define H(b,c,d) ((b) ^ (c) ^ (d))
60#define I(b,c,d) (((~(d)) | (b)) ^ (c))
61
62#define R0(a,b,c,d,k,s,t) { \
63 a+=((k)+(t)+F((b),(c),(d))); \
64 a=ROTATE(a,s); \
65 a+=b; };
66
67#define R1(a,b,c,d,k,s,t) { \
68 a+=((k)+(t)+G((b),(c),(d))); \
69 a=ROTATE(a,s); \
70 a+=b; };
71
72#define R2(a,b,c,d,k,s,t) { \
73 a+=((k)+(t)+H((b),(c),(d))); \
74 a=ROTATE(a,s); \
75 a+=b; };
76
77#define R3(a,b,c,d,k,s,t) { \
78 a+=((k)+(t)+I((b),(c),(d))); \
79 a=ROTATE(a,s); \
80 a+=b; };
81