base/tables-examples.tct

   1 Type hb:                        HBytes_Value @
   2 Init hb                         hbytes_sentinel(&@);
   3 Type hbv:                       HBytes_Var @
   4 Init hbv                        @.hb=0; @.obj=0; @.var=0;
   5 Fini hbv                        fini_hbv(ip, rc, &@);
   6
   7 H-Include       "hbytes.h"
   8
   9 Untabled
  10         hbytes
  11                 subcmd  enum(HBytes_SubCommand, "hbytes subcommand")
  12                 obj     ...
  13
  14 Table hbytes HBytes_SubCommand
  15         raw2h
  16                 binary  obj
  17                 =>      hb
  18         h2raw
  19                 hex     hb
  20                 =>      obj
  21         prepend
  22                 v       hbv
  23                 str     ...
  24         append
  25                 v       hbv
  26                 str     ...
  27         rep-info
  28                 v       hb
  29                 =>      obj
  30         concat
  31                 str     ...
  32                 =>      hb
  33         unprepend
  34                 v       hbv
  35                 length  int
  36                 =>      hb
  37         unappend
  38                 v       hbv
  39                 length  int
  40                 =>      hb
  41         chopto
  42                 v       hbv
  43                 length  int
  44                 =>      hb
  45         pkcs5
  46                 meth    enum(PadMethod, "hbytes pad subcommand")
  47                 obj     ...
  48 #       blockcipher
  49 #               encrypt charfrom("de","encrypt/decrypt")
  50 #               v       hbv
  51 #               alg     enum(BlockCipherAlgInfo, "alg")
  52 #               mode    enum(BlockCipherModeInfo, "mode")
  53 #               ?iv     hb
  54 #               =>      hb
  55 #       hash
  56 #               alg     enum(HashAlgInfo, "hash alg")
  57 #               message hb
  58 #               =>      hb
  59 #       hmac
  60 #               alg     enum(HashAlgInfo, "hash alg for hmac")
  61 #               message hb
  62 #               key     hb
  63 #               maclen  int
  64 #               =>      hb
  65
  66 Table padmethod PadMethod
  67         pa      1
  68                 v       hbv
  69                 alg     enum(BlockCipherAlgInfo, "pad alg")
  70         ua      0
  71                 v       hbv
  72                 alg     enum(BlockCipherAlgInfo, "pad alg")
  73         pn      1
  74                 v       hbv
  75                 block   int
  76         un      0
  77                 v       hbv
  78                 block   int
  79
  80 EntryExtra PadMethod
  81         int pad;