Subversion Repositories gost28147-89

#include <stdio.h>

#include <string.h>

#include <stdint.h>

#include <openssl/rand.h>

#include "gost89.h"

gost_subst_block gost_sbox = {

  {0x4,0xA,0x9,0x2,0xD,0x8,0x0,0xE,0x6,0xB,0x1,0xC,0x7,0xF,0x5,0x3},

  {0xE,0xB,0x4,0xC,0x6,0xD,0xF,0xA,0x2,0x3,0x8,0x1,0x0,0x7,0x5,0x9},

  {0x5,0x8,0x1,0xD,0xA,0x3,0x4,0x2,0xE,0xF,0xC,0x7,0x6,0x0,0x9,0xB},

  {0x7,0xD,0xA,0x1,0x0,0x8,0x9,0xF,0xE,0x4,0x6,0xC,0xB,0x2,0x5,0x3},

  {0x6,0xC,0x7,0x1,0x5,0xF,0xD,0x8,0x4,0xA,0x9,0xE,0x0,0x3,0xB,0x2},

  {0x4,0xB,0xA,0x0,0x7,0x2,0x1,0xD,0x3,0x6,0x8,0x5,0x9,0xC,0xF,0xE},

  {0xD,0xB,0x4,0x1,0x3,0xF,0x5,0x9,0x0,0xA,0xE,0x7,0x6,0x8,0x2,0xC},

  {0x1,0xF,0xD,0x0,0x5,0x7,0xA,0x4,0x9,0x2,0x3,0xE,0x6,0xB,0x8,0xC}

};

uint8_t gost_key[] = {

  0x04, 0x75, 0xF6, 0xE0, 0x50, 0x38, 0xFB, 0xFA,

  0xD2, 0xC7, 0xC3, 0x90, 0xED, 0xB3, 0xCA, 0x3D,

  0x15, 0x47, 0x12, 0x42, 0x91, 0xAE, 0x1E, 0x8A,

  0x2F, 0x79, 0xCD, 0x9E, 0xD2, 0xBC, 0xEF, 0xBD

};

void print8bytes(const uint8_t* data) {

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

    printf("%02x", data[i]);

}

void printNblocks(const uint8_t* data, size_t blocks) {

  while (blocks--) {

    print8bytes(&data[0]);

    printf(" ");

    data += 8;

  }

}

int main(int argc, char **argv) {

  int i;

  printf("SBox: 512'h ");

  for(i = 0; i < 16; i+=2) printf("%02x", (gost_sbox.k1[i]<<4) | gost_sbox.k1[i+1]);

  for(i = 0; i < 16; i+=2) printf("%02x", (gost_sbox.k2[i]<<4) | gost_sbox.k2[i+1]);

  for(i = 0; i < 16; i+=2) printf("%02x", (gost_sbox.k3[i]<<4) | gost_sbox.k3[i+1]);

  for(i = 0; i < 16; i+=2) printf("%02x", (gost_sbox.k4[i]<<4) | gost_sbox.k4[i+1]);

  for(i = 0; i < 16; i+=2) printf("%02x", (gost_sbox.k5[i]<<4) | gost_sbox.k5[i+1]);

  for(i = 0; i < 16; i+=2) printf("%02x", (gost_sbox.k6[i]<<4) | gost_sbox.k6[i+1]);

  for(i = 0; i < 16; i+=2) printf("%02x", (gost_sbox.k7[i]<<4) | gost_sbox.k7[i+1]);

  for(i = 0; i < 16; i+=2) printf("%02x", (gost_sbox.k8[i]<<4) | gost_sbox.k8[i+1]);

  printf("\n\n");

  printf("Key: 256'h ");

  for (i = 0; i < 32; ++i)

    printf("%02x", gost_key[i]);

  printf("\n\n");

  gost_ctx ctx;

  gost_init(&ctx, &gost_sbox);

  gost_set_key(&ctx, &gost_key[0]);

  uint8_t gamma[8];

  RAND_bytes(gamma, sizeof(gamma));

  uint8_t in[24];

  RAND_bytes(in, sizeof(in));

  uint8_t out1[sizeof(in)];

  uint8_t out2[sizeof(in)];

  /* ECB mode */

  printf("ECB mode:\n");

  printNblocks(&in[0], sizeof(in)/8); printf("\n");

  gost_ecb_encrypt(&ctx, &in[0], &out1[0], sizeof(in)/8);

  printNblocks(&out1[0], sizeof(in)/8); printf("\n");

  gost_ecb_decrypt(&ctx, &out1[0], &out2[0], sizeof(in)/8);

  printNblocks(&out2[0], sizeof(in)/8); printf("\n");

  if (memcmp((const void*) &in[0], (const void*) &out2[0], sizeof(in)))

    printf("error!\n");

  printf("\n");

  /* CFB mode */

  printf("CFB mode (gamma: "); print8bytes(&gamma[0]); printf("):\n");

  printNblocks(&in[0], sizeof(in)/8); printf("\n");

  gost_cfb_encrypt(&ctx, &gamma[0], &in[0], &out1[0], sizeof(in)/8);

  printNblocks(&out1[0], sizeof(in)/8); printf("\n");

  gost_cfb_decrypt(&ctx, &gamma[0], &out1[0], &out2[0], sizeof(in)/8);

  printNblocks(&out2[0], sizeof(in)/8); printf("\n");

  if (memcmp((const void*) &in[0], (const void*) &out2[0], sizeof(in)))

    printf("error!\n");

  printf("\n");

  /* MAC mode */

  printf("MAC mode (length: 32bit): \n");

  printNblocks(&in[0], sizeof(in)/8); printf("\n");

  memset((void*) &out1[0], 0, 8);

  gost_mac(&ctx, &in[0], sizeof(in), &out1[0], 32);

  print8bytes(&out1[0]); printf("\n\n");

  return 0;

}