root/maint/gnulib/tests/test-gc-arcfour.c

/* */

DEFINITIONS

1. main

   1 /*
   2  * Copyright (C) 2005, 2010-2021 Free Software Foundation, Inc.
   3  * Written by Simon Josefsson
   4  *
   5  * This program is free software; you can redistribute it and/or modify
   6  * it under the terms of the GNU General Public License as published by
   7  * the Free Software Foundation; either version 3, or (at your option)
   8  * any later version.
   9  *
  10  * This program is distributed in the hope that it will be useful,
  11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13  * GNU General Public License for more details.
  14  *
  15  * You should have received a copy of the GNU General Public License
  16  * along with this program; if not, see <https://www.gnu.org/licenses/>.  */
  17 
  18 #include <config.h>
  19 
  20 #include "gc.h"
  21 
  22 #include <stdio.h>
  23 #include <string.h>
  24 
  25 int
  26 main (int argc, char *argv[])
     /*  */
  27 {
  28   gc_cipher_handle ctx;
  29   /* Test vector from Cryptlib via Libgcrypt labeled there: "from the
  30      State/Commerce Department". */
  31   static char key_1[] = { 0x61, 0x8A, 0x63, 0xD2, 0xFB };
  32   static char plaintext_1[] = { 0xDC, 0xEE, 0x4C, 0xF9, 0x2C };
  33   static const char ciphertext_1[] = { 0xF1, 0x38, 0x29, 0xC9, 0xDE };
  34   char scratch[16];
  35   Gc_rc rc;
  36 
  37   rc = gc_init ();
  38   if (rc != GC_OK)
  39     {
  40       printf ("gc_init() failed\n");
  41       return 1;
  42     }
  43 
  44   rc = gc_cipher_open (GC_ARCFOUR40, GC_STREAM, &ctx);
  45   if (rc != GC_OK)
  46     return 1;
  47 
  48   rc = gc_cipher_setkey (ctx, sizeof (key_1), key_1);
  49   if (rc != GC_OK)
  50     return 1;
  51 
  52   memcpy (scratch, plaintext_1, sizeof (plaintext_1));
  53   rc = gc_cipher_encrypt_inline (ctx, sizeof (plaintext_1), scratch);
  54   if (rc != GC_OK)
  55     return 1;
  56 
  57   if (memcmp (scratch, ciphertext_1, sizeof (ciphertext_1)))
  58     {
  59       size_t i;
  60       printf ("expected:\n");
  61       for (i = 0; i < 5; i++)
  62         printf ("%02x ", scratch[i] & 0xFF);
  63       printf ("\ncomputed:\n");
  64       for (i = 0; i < 5; i++)
  65         printf ("%02x ", ciphertext_1[i] & 0xFF);
  66       printf ("\n");
  67       return 1;
  68     }
  69 
  70   /* decrypt */
  71 
  72   rc = gc_cipher_setkey (ctx, sizeof (key_1), key_1);
  73   if (rc != GC_OK)
  74     return 1;
  75 
  76   rc = gc_cipher_decrypt_inline (ctx, sizeof (plaintext_1), scratch);
  77   if (rc != GC_OK)
  78     return 1;
  79 
  80   if (memcmp (scratch, plaintext_1, sizeof (plaintext_1)))
  81     {
  82       size_t i;
  83       printf ("expected:\n");
  84       for (i = 0; i < 5; i++)
  85         printf ("%02x ", plaintext_1[i] & 0xFF);
  86       printf ("\ncomputed:\n");
  87       for (i = 0; i < 5; i++)
  88         printf ("%02x ", scratch[i] & 0xFF);
  89       printf ("\n");
  90       return 1;
  91     }
  92 
  93   gc_cipher_close (ctx);
  94 
  95   gc_done ();
  96 
  97   return 0;
  98 }

/* */