chiark
/
gitweb
/
~ian
/
chiark-tcl.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
hbytes xor
[chiark-tcl.git]
/
base
/
tables-examples.tct
diff --git
a/base/tables-examples.tct
b/base/tables-examples.tct
index 3fd080147af3662f163d7ec7a0889773c7834d67..2e1e573d62ec546b69081dad820feed1c25c8279 100644
(file)
--- a/
base/tables-examples.tct
+++ b/
base/tables-examples.tct
@@
-40,6
+40,10
@@
Table ulong ULong_SubCommand
a ulong
b ulong
=> ulong
a ulong
b ulong
=> ulong
+ multiply
+ a ulong
+ b ulong
+ => ulong
subtract
a ulong
b ulong
subtract
a ulong
b ulong
@@
-124,14
+128,18
@@
Table hbytes HBytes_SubCommand
v hb
count int
=> hb
v hb
count int
=> hb
+ xor
+ v hbv
+ d hb
random
length int
=> hb
random
length int
=> hb
- p
kcs5
-
meth enum(PadMethod
, "hbytes pad subcommand")
+ p
ad
+
op enum(PadOp
, "hbytes pad subcommand")
v hbv
v hbv
- block obj
- => int
+ blocksz obj
+ meth enum(PadMethodInfo, "pad method")
+ ... methargs
blockcipher
op enum(BlockCipherOp, "op")
... obj
blockcipher
op enum(BlockCipherOp, "op")
... obj
@@
-145,6
+153,17
@@
Table hbytes HBytes_SubCommand
key obj
?maclen obj
=> hb
key obj
?maclen obj
=> hb
+ hash-prop
+ prop enum(HashAlgPropInfo, "prop")
+ alg enum(HashAlgInfo, "alg")
+ => int
+
+Table padmethodinfo PadMethodInfo
+ pkcs5
+ => int
+ rfc2406
+ nxthdr obj
+ => int
Table dgram_socket DgramSocket_SubCommand
create
Table dgram_socket DgramSocket_SubCommand
create
@@
-182,6
+201,10
@@
Table blockcipherop BlockCipherOp
mode enum(BlockCipherModeInfo, "mode")
iv hb
=> hb
mode enum(BlockCipherModeInfo, "mode")
iv hb
=> hb
+ prop -1
+ prop enum(BlockCipherPropInfo, "prop")
+ alg enum(BlockCipherAlgInfo, "alg")
+ => int
EntryExtra BlockCipherOp
int encrypt;
EntryExtra BlockCipherOp
int encrypt;