/*

 * This crypt(3) validation program shipped with UFC-crypt

 * is derived from one distributed with Phil Karns PD DES package.

 *

 * @(#)cert.c   1.8 11 Aug 1996

 */

#include "crypt-port.h"

#include "alg-des.h"

#include "test-des-cases.h"

#include <stdio.h>

#if INCLUDE_des || INCLUDE_des_xbsd || INCLUDE_des_big

static void

v_print (const unsigned char v[8])

{

  for (int i = 0; i < 8; i++)

    printf ("%02x", (unsigned int)v[i]);

}

static void

report_failure (size_t n, bool decrypt,

                const struct des_testcase *tc, const unsigned char got[8])

{

  printf ("FAIL: %zu/%s: k=", n, decrypt ? "de" : "en");

  v_print (tc->key);

  fputs ("  exp ", stdout);

  if (decrypt)

    v_print (tc->plain);

  else

    v_print (tc->answer);

  fputs ("  got ", stdout);

  v_print (got);

  putchar ('\n');

}

int

main (void)

{

  struct des_ctx ctx;

  const struct des_testcase *tc;

  unsigned char got[8];

  size_t t;

  int status = 0;

  des_set_salt (&ctx, 0);

  for (t = 0; t < N_DES_TESTCASES; t++)

    {

      tc = &des_testcases[t];

      des_set_key (&ctx, tc->key);

      des_crypt_block (&ctx, got, tc->plain, 1, false);

      if (memcmp (got, tc->answer, 8) != 0)

        {

          status = 1;

          report_failure (t, false, tc, got);

        }

      des_crypt_block (&ctx, got, tc->answer, 1, true);

      if (memcmp (got, tc->plain, 8) != 0)

        {

          status = 1;

          report_failure (t, true, tc, got);

        }

    }

  return status;

}

#else

int

main (void)

{

  return 77; /* UNSUPPORTED */

}

#endif