From 8843f7c79fadece4b25518f04e320de1910103c6 Mon Sep 17 00:00:00 2001
From: Werner Koch <wk@gnupg.org>
Date: Mon, 6 Sep 1999 18:10:15 +0000
Subject: See ChangeLog: Mon Sep  6 19:59:08 CEST 1999  Werner Koch

---
 cipher/des.c | 69 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 69 insertions(+)

(limited to 'cipher/des.c')

diff --git a/cipher/des.c b/cipher/des.c
index 256e96bc..18bc10a2 100644
--- a/cipher/des.c
+++ b/cipher/des.c
@@ -826,6 +826,75 @@ selftest (void)
       return "TRIPLE-DES test failed.";
   }
 
+    /*
+     * More Triple-DES test.  These are testvectors as used by SSLeay,
+     * thanks to Jeroen C. van Gelderen.
+     */
+    {	struct { byte key[24], byte plain[8], byte cipher[8] } testdata[] = {
+	{ { 0x01,0x01,0x01,0x01,0x01,0x01,0x01,0x01,
+	    0x01,0x01,0x01,0x01,0x01,0x01,0x01,0x01,
+	    0x01,0x01,0x01,0x01,0x01,0x01,0x01,0x01  },
+	  { 0x95,0xF8,0xA5,0xE5,0xDD,0x31,0xD9,0x00  },
+	  { 0x80,0x00,0x00,0x00,0x00,0x00,0x00,0x00  }
+	},
+
+	{ { 0x01,0x01,0x01,0x01,0x01,0x01,0x01,0x01,
+	    0x01,0x01,0x01,0x01,0x01,0x01,0x01,0x01,
+	    0x01,0x01,0x01,0x01,0x01,0x01,0x01,0x01  },
+	  { 0x9D,0x64,0x55,0x5A,0x9A,0x10,0xB8,0x52, },
+	  { 0x00,0x00,0x00,0x10,0x00,0x00,0x00,0x00  }
+	},
+	{ { 0x38,0x49,0x67,0x4C,0x26,0x02,0x31,0x9E,
+	    0x38,0x49,0x67,0x4C,0x26,0x02,0x31,0x9E,
+	    0x38,0x49,0x67,0x4C,0x26,0x02,0x31,0x9E  },
+	  { 0x51,0x45,0x4B,0x58,0x2D,0xDF,0x44,0x0A  },
+	  { 0x71,0x78,0x87,0x6E,0x01,0xF1,0x9B,0x2A  }
+	},
+	{ { 0x04,0xB9,0x15,0xBA,0x43,0xFE,0xB5,0xB6,
+	    0x04,0xB9,0x15,0xBA,0x43,0xFE,0xB5,0xB6,
+	    0x04,0xB9,0x15,0xBA,0x43,0xFE,0xB5,0xB6  },
+	  { 0x42,0xFD,0x44,0x30,0x59,0x57,0x7F,0xA2  },
+	  { 0xAF,0x37,0xFB,0x42,0x1F,0x8C,0x40,0x95  }
+	},
+	{ { 0x01,0x23,0x45,0x67,0x89,0xAB,0xCD,0xEF,
+	    0x01,0x23,0x45,0x67,0x89,0xAB,0xCD,0xEF,
+	    0x01,0x23,0x45,0x67,0x89,0xAB,0xCD,0xEF  },
+	  { 0x73,0x6F,0x6D,0x65,0x64,0x61,0x74,0x61  },
+	  { 0x3D,0x12,0x4F,0xE2,0x19,0x8B,0xA3,0x18  }
+	},
+	{ { 0x01,0x23,0x45,0x67,0x89,0xAB,0xCD,0xEF,
+	    0x55,0x55,0x55,0x55,0x55,0x55,0x55,0x55,
+	    0x01,0x23,0x45,0x67,0x89,0xAB,0xCD,0xEF  },
+	  { 0x73,0x6F,0x6D,0x65,0x64,0x61,0x74,0x61  },
+	  { 0xFB,0xAB,0xA1,0xFF,0x9D,0x05,0xE9,0xB1  }
+	},
+	{ { 0x01,0x23,0x45,0x67,0x89,0xAB,0xCD,0xEF,
+	    0x55,0x55,0x55,0x55,0x55,0x55,0x55,0x55,
+	    0xFE,0xDC,0xBA,0x98,0x76,0x54,0x32,0x10  },
+	  { 0x73,0x6F,0x6D,0x65,0x64,0x61,0x74,0x61  },
+	  { 0x18,0xd7,0x48,0xe5,0x63,0x62,0x05,0x72  }
+	},
+	{ { 0x03,0x52,0x02,0x07,0x67,0x20,0x82,0x17,
+	    0x86,0x02,0x87,0x66,0x59,0x08,0x21,0x98,
+	    0x64,0x05,0x6A,0xBD,0xFE,0xA9,0x34,0x57  },
+	  { 0x73,0x71,0x75,0x69,0x67,0x67,0x6C,0x65  },
+	  { 0xc0,0x7d,0x2a,0x0f,0xa5,0x66,0xfa,0x30  }
+	},
+	{ { 0x01,0x01,0x01,0x01,0x01,0x01,0x01,0x01,
+	    0x80,0x01,0x01,0x01,0x01,0x01,0x01,0x01,
+	    0x01,0x01,0x01,0x01,0x01,0x01,0x01,0x02  },
+	  { 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00  },
+	  { 0xe6,0xe6,0xdd,0x5b,0x7e,0x72,0x29,0x74  }
+	},
+	{ { 0x10,0x46,0x10,0x34,0x89,0x98,0x80,0x20,
+	    0x91,0x07,0xD0,0x15,0x89,0x19,0x01,0x01,
+	    0x19,0x07,0x92,0x10,0x98,0x1A,0x01,0x01  },
+	  { 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00  },
+	  { 0xe1,0xef,0x62,0xc3,0x32,0xfe,0x82,0x5b  }
+	}
+	};
+	/* fixme: do the test */
+    }
 
   /*
    * Check the weak key detection. We simply assume the table with
-- 
cgit v1.2.1