chiark / gitweb /
hmac seems to work
[chiark-tcl.git] / base / tables-examples.tct
index 922f844..5115813 100644 (file)
@@ -50,7 +50,7 @@ Table hbytes HBytes_SubCommand
                v       hbv
                block   obj
                =>      int
-       blockciph
+       blockcipher
                encrypt charfrom("de","encrypt/decrypt")
                v       hbv
                alg     enum(BlockCipherAlgInfo, "alg")
@@ -58,13 +58,13 @@ Table hbytes HBytes_SubCommand
                mode    enum(BlockCipherModeInfo, "mode")
                ?iv     hb
                =>      hb
-#      hash
-#              alg     enum(HashAlgInfo, "hash alg")
-#              message hb
-#              =>      hb
-#      hmac
-#              alg     enum(HashAlgInfo, "hash alg for hmac")
-#              message hb
-#              key     hb
-#              maclen  int
-#              =>      hb
+       hash
+               alg     enum(HashAlgInfo, "hash alg")
+               message hb
+               =>      hb
+       hmac
+               alg     enum(HashAlgInfo, "hash alg for hmac")
+               message hb
+               key     obj
+               ?maclen obj
+               =>      hb