iframe-proxy | Sunbelt Computer Software

152 lines (112 loc) · 3.61 KB
    *****************************************
    *** Testing OpenSSL version of modexp ***
    *****************************************
    P is 768-bits
    Key exchange succeeded
    Session key = AE0340546496CE3417F2394C3757C0CAA5FA94B3165083998
    *************************************
    *** Testing x86 version of modexp ***
    *************************************
    Key exchange succeeded
    Session key = AE0340546496CE3417F2394C3757C0CAA5FA94B3165083998
    *****************************************
    *** Testing OpenSSL version of modexp ***
    *****************************************
    P is 1024-bits
    Key exchange succeeded
    Session key = 37AB46FE70E306FA27DE3BB594E513CC2601247CEFC5E3278
    *************************************
    *** Testing x86 version of modexp ***
    *************************************
    Key exchange succeeded
    Session key = 37AB46FE70E306FA27DE3BB594E513CC2601247CEFC5E3278
#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#include <stdint.h>
#include <openssl/bn.h>
#include <openssl/rand.h>
const char OAKLEY_PRIME_MODP768[]=
	"FFFFFFFFFFFFFFFFC90FDAA22168C234C4C6628B80DC1CD1"
	"29024E088A67CC74020BBEA63B139B22514A08798E3404DD"
	"EF9519B3CD3A431B302B0A6DF25F14374FE1356D6D51C245"
	"E485B576625E7EC6F44C42E9A63A3620FFFFFFFFFFFFFFFF";
const char OAKLEY_PRIME_MODP1024[]=
	"FFFFFFFFFFFFFFFFC90FDAA22168C234C4C6628B80DC1CD1"
	"29024E088A67CC74020BBEA63B139B22514A08798E3404DD"
	"EF9519B3CD3A431B302B0A6DF25F14374FE1356D6D51C245"
	"E485B576625E7EC6F44C42E9A637ED6B0BFF5CB6F406B7ED"
	"EE386BFB5A899FA5AE9F24117C4B1FE649286651ECE65381"
	"FFFFFFFFFFFFFFFF";
extern "C" void do_keyxchg_asm(uint8_t p[], int p_len,
                               uint8_t g[], int g_len,
                               uint8_t x[], int x_len, 
                               uint8_t y[], int y_len);
void do_dh (const char *p_value)
  BIGNUM *p, *g, *x, *y, *A, *B, *s1, *s2;
  BN_CTX *ctx;
  // initialize context
  ctx = BN_CTX_new ();
  BN_CTX_init (ctx);
  p  = BN_new ();
  g  = BN_new ();
  x  = BN_new ();
  y  = BN_new ();
  A  = BN_new ();
  B  = BN_new ();
  s1 = BN_new ();
  s2 = BN_new ();
  BN_hex2bn (&p, p_value);
  BN_hex2bn (&g, "2");
  // generate 2 128-bit random values, x and y
  BN_rand (x, 128, -1, 0);
  BN_rand (y, 128, -1, 0);
  puts ("\n\n"
        "*****************************************\n"
        "*** Testing OpenSSL version of modexp ***\n"
        "*****************************************");
  printf ("\nP is %i-bits", BN_num_bits (p));
  // Alice does g ^ x mod p
  BN_mod_exp (A, g, x, p, ctx);
  // Bob does g ^ y mod p
  BN_mod_exp (B, g, y, p, ctx);
  // *************************************
  // Bob and Alice exchange A and B values
  // *************************************
  // Alice computes session key
  BN_mod_exp (s1, B, x, p, ctx);
  // Bob computes session key
  BN_mod_exp (s2, A, y, p, ctx);
  // check if both keys match
  if (BN_cmp (s1, s2) == 0) {
    printf ("\n\nKey exchange succeeded");
    printf ("\n\nSession key = %s\n", BN_bn2hex (s1));
    printf ("\n\nKey exchange failed\n");
  do_keyxchg_asm (
    (uint8_t*)&p->d[0], BN_num_bytes(p),
    (uint8_t*)&g->d[0], BN_num_bytes(g),
    (uint8_t*)&x->d[0], BN_num_bytes(x),
    (uint8_t*)&y->d[0], BN_num_bytes(y));
  printf ("\nTest Complete");
  BN_free (s2);
  BN_free (s1);
  BN_free (p);
  BN_free (g);
  BN_free (y);
  BN_free (x);
  BN_free (B);
  BN_free (A);
  // release context
  BN_CTX_free (ctx);
int main (void) 
  do_dh (OAKLEY_PRIME_MODP768);
  do_dh (OAKLEY_PRIME_MODP1024);
  return 0;
Sunbelt Computer Software

PL/B Language Development and Support

Provide feedback

Saved searches

Use saved searches to filter your results more quickly

Sunbelt Computer Software

PL/B Language Development and Support

FilesExpand file tree

modexp_test.cpp

Latest commit

History

modexp_test.cpp

File metadata and controls
