#! /bin/sh

prog=`echo $0 | sed 's:.*/::'`
alg=${1?}; shift
lc=`echo $alg | tr A-Z a-z`

cat <<EOF
# Test vectors for $alg
#
# Generated on `date +%Y-%m-%d` by $prog

$lc {
EOF

awk "$@" '
function mangle(x, y) {
  if (!rev)
    return x;
  y = "";
  while (length(x) > 1) {
    y = y substr(x, length(x) - 1);
    x = substr(x, 1, length(x) - 2);
  }
  return y;
}

BEGIN { FS = "="; }
/^KEY=/ { key = mangle($2); }
/^PT=/ { pt = mangle($2); }
/^CT=/ {
  ct = mangle($2);
  printf("  %s\n    %s\n    %s;\n", key, pt, ct);
}
'
echo }