scripts/mk-openssl-bignum.sh

   1 #!/bin/sh
   2
   3 openssl rsa -text -in key.priv.pem 2>/dev/null |\
   4         sed 's/^Private//;T;d' |\
   5         tr '\n' '\t' |\
   6         sed 's/privateExponent:.*//' |\
   7         sed 's/publicExponent:/\npublicExponent:/' |\
   8         sed 's/\s*//g' |\
   9         sed 's/publicExponent:\([^(]*\)(.*/\1/' |\
  10         sed 's/^modulus://' |\
  11         sed 's/://g' |\
  12 (
  13         read modulus
  14         read exponent
  15
  16         echo 'static BN_ULONG e_1[] = {' $exponent', };'
  17         echo ''
  18         echo -n 'static BN_ULONG n_1[] = {'
  19         modulus=$(echo $modulus | sed 's/^00//')
  20         echo $modulus | sed 's/\(........\)/\t0x\1,\n/g' | tac
  21         echo '};'
  22 )