initial commit

analyze/analyze.sh

@@ -0,0 +1,32 @@
+#!/bin/sh
+
+an=./analyze
+cr=./stream
+
+mkdir -p t
+
+jot () { 
+    r=$1;
+    if test -z "$r"; then
+        echo "jot <rounds>";
+    else
+        perl -e "foreach(0..$r){print \"\$_\n\";}";
+    fi
+}
+
+./prepare-analyze
+
+for L in `jot 255`; do
+    XL=`printf "%02x" $L`
+    clear="t/$XL.clear"
+    for K in `jot 255`; do
+	XK=`printf "%02x" $K`
+	cipher="t/$XLx$XK.cipher"
+	cat $clear | $cr 0x$K e > $cipher
+	echo -n "$XL w/ $XK: "
+	$an $cipher 1
+	rm -f $cipher
+    done
+done
+
+