#include "des.h"

typedef uchar 		block[DESBLOCKLEN];
typedef struct test	test;

struct test
{
	block	key;
	block	plain;
	block	cipher;
};

struct test	tests[]	=
{
	/* 0000000000000000 0000000000000000 8CA64DE9C1B123A7 */
	0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
	0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
	0x8C, 0xA6, 0x4D, 0xE9, 0xC1, 0xB1, 0x23, 0xA7,
	/* FFFFFFFFFFFFFFFF FFFFFFFFFFFFFFFF 7359B2163E4EDC58 */
	0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF,
	0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF,
	0x73, 0x59, 0xB2, 0x16, 0x3E, 0x4E, 0xDC, 0x58,
	/* 1111111111111111 1111111111111111 F40379AB9E0EC533 */
	0x11, 0x11, 0x11, 0x11, 0x11, 0x11, 0x11, 0x11,
	0x11, 0x11, 0x11, 0x11, 0x11, 0x11, 0x11, 0x11,
	0xF4, 0x03, 0x79, 0xAB, 0x9E, 0x0E, 0xC5, 0x33,
	/* 0123456789ABCDEF 1111111111111111 17668DFC7292532D */
	0x01, 0x23, 0x45, 0x67, 0x89, 0xAB, 0xCD, 0xEF,
	0x11, 0x11, 0x11, 0x11, 0x11, 0x11, 0x11, 0x11,
	0x17, 0x66, 0x8D, 0xFC, 0x72, 0x92, 0x53, 0x2D,
	/* 1111111111111111 0123456789ABCDEF 8A5AE1F81AB8F2DD */
	0x11, 0x11, 0x11, 0x11, 0x11, 0x11, 0x11, 0x11,
	0x01, 0x23, 0x45, 0x67, 0x89, 0xAB, 0xCD, 0xEF,
	0x8A, 0x5A, 0xE1, 0xF8, 0x1A, 0xB8, 0xF2, 0xDD,
	/* 0000000000000000 0000000000000000 8CA64DE9C1B123A7 */
	0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
	0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
	0x8C, 0xA6, 0x4D, 0xE9, 0xC1, 0xB1, 0x23, 0xA7,
	/* 0101010101010101 0123456789ABCDEF 617B3A0CE8F07100 */
	0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01,
	0x01, 0x23, 0x45, 0x67, 0x89, 0xAB, 0xCD, 0xEF,
	0x61, 0x7B, 0x3A, 0x0C, 0xE8, 0xF0, 0x71, 0x00,
	/* 0000000000000000 FFFFFFFFFFFFFFFF 355550B2150E2451 */
	0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
	0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF,
	0x35, 0x55, 0x50, 0xB2, 0x15, 0x0E, 0x24, 0x51,
	/* FFFFFFFFFFFFFFFF 0000000000000000 CAAAAF4DEAF1DBAE */
	0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF,
	0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
	0xCA, 0xAA, 0xAF, 0x4D, 0xEA, 0xF1, 0xDB, 0xAE,
	/* 0123456789ABCDEF 0000000000000000 D5D44FF720683D0D */
	0x01, 0x23, 0x45, 0x67, 0x89, 0xAB, 0xCD, 0xEF,
	0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
	0xD5, 0xD4, 0x4F, 0xF7, 0x20, 0x68, 0x3D, 0x0D,
	/* 0101010101010101 95F8A5E5DD31D900 8000000000000000 */
	0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01,
	0x95, 0xF8, 0xA5, 0xE5, 0xDD, 0x31, 0xD9, 0x00,
	0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
	/* 0101010101010101 20B9E767B2FB1456 0800000000000000 */
	0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01,
	0x20, 0xB9, 0xE7, 0x67, 0xB2, 0xFB, 0x14, 0x56,
	0x08, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
	/* 0101010101010101 D9031B0271BD5A0A 0080000000000000 */
	0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01,
	0xD9, 0x03, 0x1B, 0x02, 0x71, 0xBD, 0x5A, 0x0A,
	0x00, 0x80, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
	/* 0101010101010101 ADD0CC8D6E5DEBA1 0008000000000000 */
	0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01,
	0xAD, 0xD0, 0xCC, 0x8D, 0x6E, 0x5D, 0xEB, 0xA1,
	0x00, 0x08, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
	/* 0101010101010101 2B9F982F20037FA9 0000800000000000 */
	0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01,
	0x2B, 0x9F, 0x98, 0x2F, 0x20, 0x03, 0x7F, 0xA9,
	0x00, 0x00, 0x80, 0x00, 0x00, 0x00, 0x00, 0x00,
	/* 0101010101010101 E7FCE22557D23C97 0000080000000000 */
	0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01,
	0xE7, 0xFC, 0xE2, 0x25, 0x57, 0xD2, 0x3C, 0x97,
	0x00, 0x00, 0x08, 0x00, 0x00, 0x00, 0x00, 0x00,
	/* 0101010101010101 750D079407521363 0000008000000000 */
	0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01,
	0x75, 0x0D, 0x07, 0x94, 0x07, 0x52, 0x13, 0x63,
	0x00, 0x00, 0x00, 0x80, 0x00, 0x00, 0x00, 0x00,
	/* 0101010101010101 D106FF0BED5255D7 0000000800000000 */
	0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01,
	0xD1, 0x06, 0xFF, 0x0B, 0xED, 0x52, 0x55, 0xD7,
	0x00, 0x00, 0x00, 0x08, 0x00, 0x00, 0x00, 0x00,
	/* 0101010101010101 E943D7568AEC0C5C 0000000080000000 */
	0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01,
	0xE9, 0x43, 0xD7, 0x56, 0x8A, 0xEC, 0x0C, 0x5C,
	0x00, 0x00, 0x00, 0x00, 0x80, 0x00, 0x00, 0x00,
	/* 0101010101010101 CA3A2B036DBC8502 0000000008000000 */
	0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01,
	0xCA, 0x3A, 0x2B, 0x03, 0x6D, 0xBC, 0x85, 0x02,
	0x00, 0x00, 0x00, 0x00, 0x08, 0x00, 0x00, 0x00,
	/* 0101010101010101 25EB5FC3F8CF0621 0000000000800000 */
	0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01,
	0x25, 0xEB, 0x5F, 0xC3, 0xF8, 0xCF, 0x06, 0x21,
	0x00, 0x00, 0x00, 0x00, 0x00, 0x80, 0x00, 0x00,
	/* 0101010101010101 8B54536F2F3E64A8 0000000000080000 */
	0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01,
	0x8B, 0x54, 0x53, 0x6F, 0x2F, 0x3E, 0x64, 0xA8,
	0x00, 0x00, 0x00, 0x00, 0x00, 0x08, 0x00, 0x00,
	/* 0101010101010101 1029D55E880EC2D0 0000000000008000 */
	0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01,
	0x10, 0x29, 0xD5, 0x5E, 0x88, 0x0E, 0xC2, 0xD0,
	0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x80, 0x00,
	/* 0101010101010101 8405D1ABE24FB942 0000000000000800 */
	0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01,
	0x84, 0x05, 0xD1, 0xAB, 0xE2, 0x4F, 0xB9, 0x42,
	0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x08, 0x00,
	/* 0101010101010101 2FBC291A570DB5C4 0000000000000080 */
	0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01,
	0x2F, 0xBC, 0x29, 0x1A, 0x57, 0x0D, 0xB5, 0xC4,
	0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x80,
	/* 0101010101010101 CC083F1E6D9E85F6 0000000000000008 */
	0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01,
	0xCC, 0x08, 0x3F, 0x1E, 0x6D, 0x9E, 0x85, 0xF6,
	0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x08,
};

static void
log(uchar *b, char *s)
{
	printf("%02x.%02x.%02x.%02x.%02x.%02x.%02x.%02x%s", b[0], b[1], b[2], b[3], b[4], b[5], b[6], b[7], s);
}

int
cmp(block b1, block b2)
{
	int	i;

	for (i = 0; i < DESBLOCKLEN; i++)
	{
		if (b1[i] != b2[i])
			return 1;
	}

	return 0;
}

main()
{
	int	i;
	int	ok;

	ok = 1;

	for (i = 0; i < sizeof tests / sizeof tests[0]; i++)
	{
		deskey(tests[i].key);

		des(tests[i].plain, 0);

		if (cmp(tests[i].plain, tests[i].cipher) != 0)
		{
			printf("E %2d expected ", i);
			log(tests[i].cipher, " encrypted ");
			log(tests[i].plain, "\n");
			ok = 0;
		}
	}

	if (ok)
		printf("all ok\n");

	exit(!ok);
}