Artifact 1924cbd5b75b43689c5fb2dc3358952ff503445a:

• File tests/test-keys.fs — part of check-in [ad3b70a512] at 2016-05-01 21:41:59 on branch trunk — Move tests (need to make them run again) (user: bernd size: 2181)

0000: 5c 20 74 65 73 74 20 6b 65 79 73 0a 0a 3a 20 74  \ test keys..: t
0010: 65 73 74 2d 6b 65 79 73 20 28 20 2d 2d 20 29 20  est-keys ( -- ) 
0020: 5c 20 79 65 73 2c 20 75 73 65 20 74 68 65 73 65  \ yes, use these
0030: 20 6b 65 79 73 20 2a 6f 6e 6c 79 2a 20 66 6f 72   keys *only* for
0040: 20 74 65 73 74 69 6e 67 21 0a 20 20 20 20 5c 20   testing!.    \ 
0050: 72 65 76 6f 6b 65 3a 20 35 38 41 42 38 46 35 32  revoke: 58AB8F52
0060: 46 34 36 45 37 33 45 46 41 42 30 36 38 46 36 33  F46E73EFAB068F63
0070: 33 37 46 33 37 31 45 31 34 44 44 35 38 39 42 46  37F371E14DD589BF
0080: 30 38 39 34 44 32 46 30 41 46 35 31 41 45 37 45  0894D2F0AF51AE7E
0090: 42 42 38 35 38 41 36 38 0a 20 20 20 20 78 22 20  BB858A68.    x" 
00a0: 41 39 31 31 35 38 46 32 43 35 36 30 41 43 43 44  A91158F2C560ACCD
00b0: 46 45 46 43 30 35 31 30 34 42 39 32 32 45 34 39  FEFC05104B922E49
00c0: 43 39 44 44 30 32 32 44 30 31 36 33 39 32 31 44  C9DD022D0163921D
00d0: 41 45 30 38 45 36 43 32 31 34 38 41 37 42 45 42  AE08E6C2148A7BEB
00e0: 43 38 33 43 37 31 46 43 42 33 34 35 44 32 34 34  C83C71FCB345D244
00f0: 30 30 44 38 36 36 43 37 46 44 33 32 30 39 32 43  00D866C7FD32092C
0100: 32 44 31 45 43 30 35 36 46 44 31 37 42 39 35 33  2D1EC056FD17B953
0110: 37 30 33 37 35 39 30 42 44 30 32 31 45 45 42 46  7037590BD021EEBF
0120: 22 20 6b 65 79 3a 6e 65 77 20 3e 6f 0a 20 20 20  " key:new >o.   
0130: 20 78 22 20 42 32 35 37 38 42 38 37 36 36 44 42   x" B2578B8766DB
0140: 33 41 36 30 46 31 46 34 46 33 36 42 32 37 36 39  3A60F1F4F36B2769
0150: 32 34 46 44 41 36 45 37 46 35 35 39 46 36 32 39  24FDA6E7F559F629
0160: 37 31 36 42 43 37 38 44 39 35 44 42 31 43 44 38  716BC78D95DB1CD8
0170: 44 34 30 30 22 20 6b 65 2d 73 6b 20 73 65 63 21  D400" ke-sk sec!
0180: 20 2b 73 65 63 6b 65 79 0a 20 20 20 20 22 74 65   +seckey.    "te
0190: 73 74 22 20 6b 65 2d 6e 69 63 6b 20 24 21 20 6e  st" ke-nick $! n
01a0: 69 63 6b 21 20 24 31 33 36 37 42 30 38 36 41 32  ick! $1367B086A2
01b0: 34 45 36 42 31 30 2e 20 64 3e 36 34 20 6b 65 2d  4E6B10. d>64 ke-
01c0: 66 69 72 73 74 21 20 30 20 6b 65 2d 74 79 70 65  first! 0 ke-type
01d0: 20 21 20 70 65 72 6d 25 6d 79 73 65 6c 66 20 6b   ! perm%myself k
01e0: 65 2d 6d 61 73 6b 20 21 20 6f 3e 0a 20 20 20 20  e-mask ! o>.    
01f0: 5c 20 72 65 76 6f 6b 65 3a 20 35 38 34 33 45 32  \ revoke: 5843E2
0200: 44 43 30 35 35 45 31 46 38 42 45 31 34 35 37 30  DC055E1F8BE14570
0210: 41 33 37 42 30 46 38 31 31 34 36 30 34 30 41 32  A37B0F81146040A2
0220: 43 45 45 31 44 36 43 30 31 42 39 37 43 33 42 42  CEE1D6C01B97C3BB
0230: 38 30 31 43 44 45 44 38 36 34 0a 20 20 20 20 78  801CDED864.    x
0240: 22 20 36 39 44 38 36 43 34 37 31 45 35 46 45 45  " 69D86C471E5FEE
0250: 44 38 39 34 37 38 46 42 34 32 36 30 43 38 39 38  D89478FB4260C898
0260: 42 36 46 36 39 30 32 36 42 41 34 45 37 38 41 39  B6F69026BA4E78A9
0270: 44 38 31 35 42 35 33 45 42 33 33 43 41 39 30 31  D815B53EB33CA901
0280: 33 41 38 45 37 35 33 45 43 33 38 31 38 38 31 46  3A8E753EC381881F
0290: 41 41 46 46 41 36 36 43 44 39 44 44 34 37 44 33  AAFFA66CD9DD47D3
02a0: 46 32 43 30 38 36 37 45 31 41 32 42 34 38 30 36  F2C0867E1A2B4806
02b0: 37 43 41 32 31 38 38 44 46 34 30 30 43 31 31 30  7CA2188DF400C110
02c0: 37 34 22 20 6b 65 79 3a 6e 65 77 20 3e 6f 0a 20  74" key:new >o. 
02d0: 20 20 20 78 22 20 35 39 30 35 33 35 30 41 36 42     x" 5905350A6B
02e0: 34 42 35 44 45 32 39 43 32 43 41 34 35 36 32 42  4B5DE29C2CA4562B
02f0: 42 31 30 35 45 46 35 37 30 37 31 33 43 45 36 34  B105EF570713CE64
0300: 38 45 33 38 46 36 46 42 42 42 36 44 30 37 36 44  8E38F6FBBB6D076D
0310: 31 34 31 42 30 41 22 20 6b 65 2d 73 6b 20 73 65  141B0A" ke-sk se
0320: 63 21 20 2b 73 65 63 6b 65 79 0a 20 20 20 20 22  c! +seckey.    "
0330: 61 6e 6f 6e 79 6d 6f 75 73 22 20 6b 65 2d 6e 69  anonymous" ke-ni
0340: 63 6b 20 24 21 20 6e 69 63 6b 21 20 24 31 33 36  ck $! nick! $136
0350: 37 42 30 38 36 41 32 35 35 43 39 43 32 2e 20 64  7B086A255C9C2. d
0360: 3e 36 34 20 6b 65 2d 66 69 72 73 74 21 20 30 20  >64 ke-first! 0 
0370: 6b 65 2d 74 79 70 65 20 21 20 70 65 72 6d 25 6d  ke-type ! perm%m
0380: 79 73 65 6c 66 20 6b 65 2d 6d 61 73 6b 20 21 20  yself ke-mask ! 
0390: 6f 3e 0a 20 20 20 20 5c 20 72 65 76 6f 6b 65 3a  o>.    \ revoke:
03a0: 20 33 38 41 36 46 42 34 32 46 46 34 31 41 36 39   38A6FB42FF41A69
03b0: 30 41 31 30 38 44 43 41 34 36 30 43 43 30 44 31  0A108DCA460CC0D1
03c0: 35 41 45 33 43 31 43 32 33 46 46 46 41 39 45 39  5AE3C1C23FFFA9E9
03d0: 32 35 38 33 46 46 44 39 46 42 31 36 41 44 32 37  2583FFD9FB16AD27
03e0: 36 0a 20 20 20 20 78 22 20 37 41 30 46 46 44 33  6.    x" 7A0FFD3
03f0: 44 33 31 45 44 38 32 32 44 36 38 33 44 36 38 35  D31ED822D683D685
0400: 45 41 35 36 38 39 43 39 31 43 42 31 37 30 42 35  EA5689C91CB170B5
0410: 34 41 38 32 46 30 45 35 33 35 35 34 44 33 34 35  4A82F0E53554D345
0420: 38 34 46 39 30 44 42 30 31 37 37 35 30 35 31 33  84F90DB017750513
0430: 43 44 43 31 46 31 44 43 37 46 38 46 36 31 32 31  CDC1F1DC7F8F6121
0440: 34 45 44 34 42 43 38 30 31 43 46 37 30 43 33 44  4ED4BC801CF70C3D
0450: 35 46 43 39 30 46 37 31 36 46 32 33 36 33 30 33  5FC90F716F236303
0460: 38 41 43 45 45 35 38 42 44 22 20 6b 65 79 3a 6e  8ACEE58BD" key:n
0470: 65 77 20 3e 6f 0a 20 20 20 20 78 22 20 41 41 42  ew >o.    x" AAB
0480: 39 35 32 44 44 35 44 31 38 35 30 46 31 42 34 36  952DD5D1850F1B46
0490: 38 45 45 46 38 34 46 37 32 35 35 32 31 34 38 30  8EEF84F725521480
04a0: 37 30 43 33 46 34 39 39 36 30 30 46 45 33 36 32  70C3F499600FE362
04b0: 39 33 34 39 37 30 33 32 39 46 45 30 34 22 20 6b  934970329FE04" k
04c0: 65 2d 73 6b 20 73 65 63 21 20 2b 73 65 63 6b 65  e-sk sec! +secke
04d0: 79 0a 20 20 20 20 22 61 6c 69 63 65 22 20 6b 65  y.    "alice" ke
04e0: 2d 6e 69 63 6b 20 24 21 20 6e 69 63 6b 21 20 24  -nick $! nick! $
04f0: 31 33 36 37 42 30 38 36 41 32 35 43 45 46 37 30  1367B086A25CEF70
0500: 2e 20 64 3e 36 34 20 6b 65 2d 66 69 72 73 74 21  . d>64 ke-first!
0510: 20 31 20 6b 65 2d 74 79 70 65 20 21 20 70 65 72   1 ke-type ! per
0520: 6d 25 6d 79 73 65 6c 66 20 6b 65 2d 6d 61 73 6b  m%myself ke-mask
0530: 20 21 20 6f 3e 0a 20 20 20 20 5c 20 72 65 76 6f   ! o>.    \ revo
0540: 6b 65 3a 20 44 38 32 41 46 34 41 45 37 43 44 33  ke: D82AF4AE7CD3
0550: 44 41 37 33 31 36 43 45 36 46 32 36 42 43 35 37  DA7316CE6F26BC57
0560: 39 32 46 34 46 35 45 36 42 33 36 42 34 43 31 34  92F4F5E6B36B4C14
0570: 46 37 44 36 30 43 34 39 42 34 32 31 41 45 31 44  F7D60C49B421AE1D
0580: 35 34 36 38 0a 20 20 20 20 78 22 20 31 41 32 30  5468.    x" 1A20
0590: 31 37 36 43 37 39 44 32 36 34 30 32 38 31 31 39  176C79D264028119
05a0: 34 35 43 46 43 32 34 31 31 31 36 42 41 46 42 35  45CFC241116BAFB5
05b0: 32 44 44 30 33 33 34 39 32 30 34 34 44 42 35 43  2DD033492044DB5C
05c0: 46 45 45 43 43 41 32 31 45 36 45 34 39 46 33 35  FEECCA21E6E49F35
05d0: 30 42 34 30 41 32 38 44 38 33 42 36 31 38 33 36  0B40A28D83B61836
05e0: 31 31 36 37 44 31 33 42 35 31 41 34 45 46 43 45  1167D13B51A4EFCE
05f0: 39 31 39 43 37 42 42 36 42 44 43 43 35 37 30 44  919C7BB6BDCC570D
0600: 39 42 37 30 33 31 41 30 34 32 38 45 22 20 6b 65  9B7031A0428E" ke
0610: 79 3a 6e 65 77 20 3e 6f 0a 20 20 20 20 78 22 20  y:new >o.    x" 
0620: 36 42 36 35 35 37 37 39 38 35 44 38 35 31 37 35  6B65577985D85175
0630: 33 41 43 46 46 46 46 42 30 30 33 36 30 43 37 30  3ACFFFFB00360C70
0640: 43 32 36 37 34 32 30 31 33 32 32 30 34 41 31 37  C267420132204A17
0650: 46 34 34 36 38 44 39 43 41 43 44 42 30 31 30 46  F4468D9CACDB010F
0660: 22 20 6b 65 2d 73 6b 20 73 65 63 21 20 2b 73 65  " ke-sk sec! +se
0670: 63 6b 65 79 0a 20 20 20 20 22 62 6f 62 22 20 6b  ckey.    "bob" k
0680: 65 2d 6e 69 63 6b 20 24 21 20 6e 69 63 6b 21 20  e-nick $! nick! 
0690: 24 31 33 36 37 42 30 38 36 41 32 36 34 33 36 41  $1367B086A26436A
06a0: 39 2e 20 64 3e 36 34 20 6b 65 2d 66 69 72 73 74  9. d>64 ke-first
06b0: 21 20 31 20 6b 65 2d 74 79 70 65 20 21 20 70 65  ! 1 ke-type ! pe
06c0: 72 6d 25 6d 79 73 65 6c 66 20 6b 65 2d 6d 61 73  rm%myself ke-mas
06d0: 6b 20 21 20 6f 3e 0a 20 20 20 20 5c 20 72 65 76  k ! o>.    \ rev
06e0: 6f 6b 65 3a 20 37 38 32 31 44 41 34 31 41 46 42  oke: 7821DA41AFB
06f0: 42 38 46 37 33 35 36 45 32 45 42 37 30 35 39 42  B8F7356E2EB7059B
0700: 45 37 30 33 32 31 44 37 41 44 43 44 41 44 38 43  E70321D7ADCDAD8C
0710: 35 30 34 39 39 38 36 32 37 43 42 42 39 33 36 36  504998627CBB9366
0720: 41 42 37 35 32 0a 20 20 20 20 78 22 20 39 34 38  AB752.    x" 948
0730: 33 46 42 42 42 39 38 41 35 42 46 45 37 39 32 32  3FBBB98A5BFE7922
0740: 30 36 35 31 39 46 42 32 42 41 46 39 45 45 32 31  06519FB2BAF9EE21
0750: 46 45 38 36 33 41 42 45 39 38 31 41 42 31 43 32  FE863ABE981AB1C2
0760: 30 39 31 32 33 44 34 30 45 31 39 36 39 45 41 37  09123D40E1969EA7
0770: 43 36 38 31 36 32 44 46 35 33 34 30 31 34 32 35  C68162DF53401425
0780: 32 34 44 36 42 45 33 45 34 30 37 42 30 36 35 38  24D6BE3E407B0658
0790: 32 34 44 31 45 33 35 38 32 45 36 32 30 39 43 41  24D1E3582E6209CA
07a0: 30 33 38 37 36 46 34 30 36 45 42 43 41 22 20 6b  03876F406EBCA" k
07b0: 65 79 3a 6e 65 77 20 3e 6f 0a 20 20 20 20 78 22  ey:new >o.    x"
07c0: 20 36 39 33 44 37 45 46 36 42 46 30 45 30 43 45   693D7EF6BF0E0CE
07d0: 46 42 30 36 35 34 45 42 39 35 41 42 37 43 37 32  FB0654EB95AB7C72
07e0: 39 42 38 37 39 39 46 38 35 30 43 41 42 32 34 42  9B8799F850CAB24B
07f0: 31 32 31 31 31 31 36 45 44 37 32 45 41 33 36 30  1211116ED72EA360
0800: 32 22 20 6b 65 2d 73 6b 20 73 65 63 21 20 2b 73  2" ke-sk sec! +s
0810: 65 63 6b 65 79 0a 20 20 20 20 22 65 76 65 22 20  eckey.    "eve" 
0820: 6b 65 2d 6e 69 63 6b 20 24 21 20 6e 69 63 6b 21  ke-nick $! nick!
0830: 20 24 31 33 36 37 42 30 38 36 41 32 36 42 34 45   $1367B086A26B4E
0840: 34 32 2e 20 64 3e 36 34 20 6b 65 2d 66 69 72 73  42. d>64 ke-firs
0850: 74 21 20 31 20 6b 65 2d 74 79 70 65 20 21 20 70  t! 1 ke-type ! p
0860: 65 72 6d 25 6d 79 73 65 6c 66 20 6b 65 2d 6d 61  erm%myself ke-ma
0870: 73 6b 20 21 20 6f 3e 0a 3b 0a 0a 74 65 73 74 2d  sk ! o>.;..test-
0880: 6b 65 79 73 0a                                   keys.