From 91182b1b282fad689f6f857693aaca226f9e2b61 Mon Sep 17 00:00:00 2001
From: Ben Laurie <ben@openssl.org>
Date: Thu, 18 Dec 2003 12:44:27 +0000
Subject: [PATCH] Output keys correctly.

---
 fips/des/fips_desmovs.c | 11 ++++++++++-
 1 file changed, 10 insertions(+), 1 deletion(-)

diff --git a/fips/des/fips_desmovs.c b/fips/des/fips_desmovs.c
index d38e2601db..b90d5cb376 100644
--- a/fips/des/fips_desmovs.c
+++ b/fips/des/fips_desmovs.c
@@ -284,9 +284,18 @@ void do_mct(char *amode,
 	int n;
 	EVP_CIPHER_CTX ctx;
 	unsigned char old_iv[8];
+	int kp=akeysz/64;
 
 	fprintf(rfp,"\nCOUNT = %d\n",i);
-	OutputValue("KEY",akey,akeysz/8,rfp,0);
+	if(kp == 1)
+	    OutputValue("KEY",akey,8,rfp,0);
+	else
+	    for(n=0 ; n < kp ; ++n)
+		{
+		fprintf(rfp,"KEY%d",n+1);
+		OutputValue("",akey+n*8,8,rfp,0);
+		}
+
 	if(imode != ECB)
 	    OutputValue("IV",ivec,8,rfp,0);
 	OutputValue(t_tag[dir^1],text,len,rfp,imode == CFB1);
-- 
2.25.1