2 * Copyright 2015-2016 The OpenSSL Project Authors. All Rights Reserved.
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
10 #if !defined(OPENSSL_NO_MD5)
12 # include <openssl/evp.h>
13 # include <openssl/objects.h>
14 # include <openssl/x509.h>
15 # include <openssl/md5.h>
16 # include <openssl/sha.h>
17 # include "internal/cryptlib.h"
18 # include "internal/evp_int.h"
19 # include <openssl/rsa.h>
26 static int init(EVP_MD_CTX
*ctx
)
28 struct md5_sha1_ctx
*mctx
= EVP_MD_CTX_md_data(ctx
);
29 if (!MD5_Init(&mctx
->md5
))
31 return SHA1_Init(&mctx
->sha1
);
34 static int update(EVP_MD_CTX
*ctx
, const void *data
, size_t count
)
36 struct md5_sha1_ctx
*mctx
= EVP_MD_CTX_md_data(ctx
);
37 if (!MD5_Update(&mctx
->md5
, data
, count
))
39 return SHA1_Update(&mctx
->sha1
, data
, count
);
42 static int final(EVP_MD_CTX
*ctx
, unsigned char *md
)
44 struct md5_sha1_ctx
*mctx
= EVP_MD_CTX_md_data(ctx
);
45 if (!MD5_Final(md
, &mctx
->md5
))
47 return SHA1_Final(md
+ MD5_DIGEST_LENGTH
, &mctx
->sha1
);
50 static int ctrl(EVP_MD_CTX
*ctx
, int cmd
, int mslen
, void *ms
)
52 unsigned char padtmp
[48];
53 unsigned char md5tmp
[MD5_DIGEST_LENGTH
];
54 unsigned char sha1tmp
[SHA_DIGEST_LENGTH
];
55 struct md5_sha1_ctx
*mctx
;
57 if (cmd
!= EVP_CTRL_SSL3_MASTER_SECRET
)
63 mctx
= EVP_MD_CTX_md_data(ctx
);
65 /* SSLv3 client auth handling: see RFC-6101 5.6.8 */
69 /* At this point hash contains all handshake messages, update
70 * with master secret and pad_1.
73 if (update(ctx
, ms
, mslen
) <= 0)
76 /* Set padtmp to pad_1 value */
77 memset(padtmp
, 0x36, sizeof(padtmp
));
79 if (!MD5_Update(&mctx
->md5
, padtmp
, sizeof(padtmp
)))
82 if (!MD5_Final(md5tmp
, &mctx
->md5
))
85 if (!SHA1_Update(&mctx
->sha1
, padtmp
, 40))
88 if (!SHA1_Final(sha1tmp
, &mctx
->sha1
))
91 /* Reinitialise context */
96 if (update(ctx
, ms
, mslen
) <= 0)
99 /* Set padtmp to pad_2 value */
100 memset(padtmp
, 0x5c, sizeof(padtmp
));
102 if (!MD5_Update(&mctx
->md5
, padtmp
, sizeof(padtmp
)))
105 if (!MD5_Update(&mctx
->md5
, md5tmp
, sizeof(md5tmp
)))
108 if (!SHA1_Update(&mctx
->sha1
, padtmp
, 40))
111 if (!SHA1_Update(&mctx
->sha1
, sha1tmp
, sizeof(sha1tmp
)))
114 /* Now when ctx is finalised it will return the SSL v3 hash value */
116 OPENSSL_cleanse(md5tmp
, sizeof(md5tmp
));
117 OPENSSL_cleanse(sha1tmp
, sizeof(sha1tmp
));
123 static const EVP_MD md5_sha1_md
= {
126 MD5_DIGEST_LENGTH
+ SHA_DIGEST_LENGTH
,
134 sizeof(EVP_MD
*) + sizeof(struct md5_sha1_ctx
),
138 const EVP_MD
*EVP_md5_sha1(void)