ad05b50
diff -up openssl-1.0.1-beta2/crypto/md5/md5_dgst.c.md5-allow openssl-1.0.1-beta2/crypto/md5/md5_dgst.c
ad05b50
--- openssl-1.0.1-beta2/crypto/md5/md5_dgst.c.md5-allow	2012-02-06 20:09:56.000000000 +0100
ad05b50
+++ openssl-1.0.1-beta2/crypto/md5/md5_dgst.c	2012-02-06 20:14:02.332117603 +0100
ad05b50
@@ -71,7 +71,16 @@ const char MD5_version[]="MD5" OPENSSL_V
ad05b50
 #define INIT_DATA_C (unsigned long)0x98badcfeL
ad05b50
 #define INIT_DATA_D (unsigned long)0x10325476L
ad05b50
 
ad05b50
-nonfips_md_init(MD5)
ad05b50
+int MD5_Init(MD5_CTX *c)
ad05b50
+#ifdef OPENSSL_FIPS
ad05b50
+	{
ad05b50
+	if (FIPS_mode() && getenv("OPENSSL_FIPS_NON_APPROVED_MD5_ALLOW") == NULL)
ad05b50
+		OpenSSLDie(__FILE__, __LINE__, \
ad05b50
+                "Digest MD5 forbidden in FIPS mode!");
ad05b50
+	return private_MD5_Init(c);
ad05b50
+	}
ad05b50
+int private_MD5_Init(MD5_CTX *c)
ad05b50
+#endif
ad05b50
 	{
ad05b50
 	memset (c,0,sizeof(*c));
ad05b50
 	c->A=INIT_DATA_A;