Artifact 38d72580d6a004d4464c72f87d9e149c3b361a39:
- File net2o-err.fs — part of check-in [e9a12ca6e5] at 2015-11-16 01:12:07 on branch trunk — Add permission check (user: bernd size: 4366)
0000: 5c 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 \ Copyright (C) 0010: 32 30 31 30 2d 32 30 31 34 20 20 20 42 65 72 6e 2010-2014 Bern 0020: 64 20 50 61 79 73 61 6e 0a 0a 5c 20 54 68 69 73 d Paysan..\ This 0030: 20 70 72 6f 67 72 61 6d 20 69 73 20 66 72 65 65 program is free 0040: 20 73 6f 66 74 77 61 72 65 3a 20 79 6f 75 20 63 software: you c 0050: 61 6e 20 72 65 64 69 73 74 72 69 62 75 74 65 20 an redistribute 0060: 69 74 20 61 6e 64 2f 6f 72 20 6d 6f 64 69 66 79 it and/or modify 0070: 0a 5c 20 69 74 20 75 6e 64 65 72 20 74 68 65 20 .\ it under the 0080: 74 65 72 6d 73 20 6f 66 20 74 68 65 20 47 4e 55 terms of the GNU 0090: 20 41 66 66 65 72 6f 20 47 65 6e 65 72 61 6c 20 Affero General 00a0: 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 61 Public License a 00b0: 73 20 70 75 62 6c 69 73 68 65 64 20 62 79 0a 5c s published by.\ 00c0: 20 74 68 65 20 46 72 65 65 20 53 6f 66 74 77 61 the Free Softwa 00d0: 72 65 20 46 6f 75 6e 64 61 74 69 6f 6e 2c 20 65 re Foundation, e 00e0: 69 74 68 65 72 20 76 65 72 73 69 6f 6e 20 33 20 ither version 3 00f0: 6f 66 20 74 68 65 20 4c 69 63 65 6e 73 65 2c 20 of the License, 0100: 6f 72 0a 5c 20 28 61 74 20 79 6f 75 72 20 6f 70 or.\ (at your op 0110: 74 69 6f 6e 29 20 61 6e 79 20 6c 61 74 65 72 20 tion) any later 0120: 76 65 72 73 69 6f 6e 2e 0a 0a 5c 20 54 68 69 73 version...\ This 0130: 20 70 72 6f 67 72 61 6d 20 69 73 20 64 69 73 74 program is dist 0140: 72 69 62 75 74 65 64 20 69 6e 20 74 68 65 20 68 ributed in the h 0150: 6f 70 65 20 74 68 61 74 20 69 74 20 77 69 6c 6c ope that it will 0160: 20 62 65 20 75 73 65 66 75 6c 2c 0a 5c 20 62 75 be useful,.\ bu 0170: 74 20 57 49 54 48 4f 55 54 20 41 4e 59 20 57 41 t WITHOUT ANY WA 0180: 52 52 41 4e 54 59 3b 20 77 69 74 68 6f 75 74 20 RRANTY; without 0190: 65 76 65 6e 20 74 68 65 20 69 6d 70 6c 69 65 64 even the implied 01a0: 20 77 61 72 72 61 6e 74 79 20 6f 66 0a 5c 20 4d warranty of.\ M 01b0: 45 52 43 48 41 4e 54 41 42 49 4c 49 54 59 20 6f ERCHANTABILITY o 01c0: 72 20 46 49 54 4e 45 53 53 20 46 4f 52 20 41 20 r FITNESS FOR A 01d0: 50 41 52 54 49 43 55 4c 41 52 20 50 55 52 50 4f PARTICULAR PURPO 01e0: 53 45 2e 20 20 53 65 65 20 74 68 65 0a 5c 20 47 SE. See the.\ G 01f0: 4e 55 20 41 66 66 65 72 6f 20 47 65 6e 65 72 61 NU Affero Genera 0200: 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 l Public License 0210: 20 66 6f 72 20 6d 6f 72 65 20 64 65 74 61 69 6c for more detail 0220: 73 2e 0a 0a 5c 20 59 6f 75 20 73 68 6f 75 6c 64 s...\ You should 0230: 20 68 61 76 65 20 72 65 63 65 69 76 65 64 20 61 have received a 0240: 20 63 6f 70 79 20 6f 66 20 74 68 65 20 47 4e 55 copy of the GNU 0250: 20 41 66 66 65 72 6f 20 47 65 6e 65 72 61 6c 20 Affero General 0260: 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 0a 5c Public License.\ 0270: 20 61 6c 6f 6e 67 20 77 69 74 68 20 74 68 69 73 along with this 0280: 20 70 72 6f 67 72 61 6d 2e 20 20 49 66 20 6e 6f program. If no 0290: 74 2c 20 73 65 65 20 3c 68 74 74 70 3a 2f 2f 77 t, see <http://w 02a0: 77 77 2e 67 6e 75 2e 6f 72 67 2f 6c 69 63 65 6e ww.gnu.org/licen 02b0: 73 65 73 2f 3e 2e 0a 0a 5c 20 64 65 66 69 6e 65 ses/>...\ define 02c0: 64 20 65 78 63 65 70 74 69 6f 6e 73 0a 0a 3a 20 d exceptions..: 02d0: 74 68 72 6f 77 63 6f 64 65 20 28 20 61 64 64 72 throwcode ( addr 02e0: 20 75 20 2d 2d 20 29 20 20 65 78 63 65 70 74 69 u -- ) excepti 02f0: 6f 6e 20 43 72 65 61 74 65 20 2c 0a 20 20 20 20 on Create ,. 0300: 5b 3a 20 3e 62 6f 64 79 20 40 20 3e 72 20 5d 5d [: >body @ >r ]] 0310: 20 49 46 20 5b 5b 20 72 3e 20 5d 5d 20 6c 69 74 IF [[ r> ]] lit 0320: 65 72 61 6c 20 74 68 72 6f 77 20 54 48 45 4e 20 eral throw THEN 0330: 5b 5b 20 3b 5d 20 73 65 74 2d 63 6f 6d 70 69 6c [[ ;] set-compil 0340: 65 72 0a 20 20 20 20 5b 3a 20 28 20 66 6c 61 67 er. [: ( flag 0350: 20 2d 2d 20 29 20 40 20 61 6e 64 20 74 68 72 6f -- ) @ and thro 0360: 77 20 3b 5d 20 73 65 74 2d 64 6f 65 73 3e 20 3b w ;] set-does> ; 0370: 0a 0a 73 22 20 67 61 70 20 69 6e 20 66 69 6c 65 ..s" gap in file 0380: 20 68 61 6e 64 6c 65 73 22 20 20 20 20 20 20 20 handles" 0390: 20 20 20 74 68 72 6f 77 63 6f 64 65 20 21 21 67 throwcode !!g 03a0: 61 70 21 21 0a 73 22 20 69 6e 76 61 6c 69 64 20 ap!!.s" invalid 03b0: 66 69 6c 65 20 69 64 22 20 20 20 20 20 20 20 20 file id" 03c0: 20 20 20 20 20 20 74 68 72 6f 77 63 6f 64 65 20 throwcode 03d0: 21 21 66 69 6c 65 69 64 21 21 0a 73 22 20 63 6f !!fileid!!.s" co 03e0: 75 6c 64 20 6e 6f 74 20 73 65 6e 64 22 20 20 20 uld not send" 03f0: 20 20 20 20 20 20 20 20 20 20 20 20 74 68 72 6f thro 0400: 77 63 6f 64 65 20 21 21 73 65 6e 64 21 21 0a 73 wcode !!send!!.s 0410: 22 20 77 72 6f 6e 67 20 70 61 63 6b 65 74 20 73 " wrong packet s 0420: 69 7a 65 22 20 20 20 20 20 20 20 20 20 20 20 20 ize" 0430: 74 68 72 6f 77 63 6f 64 65 20 21 21 73 69 7a 65 throwcode !!size 0440: 21 21 0a 73 22 20 6d 61 70 20 73 69 7a 65 20 74 !!.s" map size t 0450: 6f 6f 20 62 69 67 22 20 20 20 20 20 20 20 20 20 oo big" 0460: 20 20 20 20 74 68 72 6f 77 63 6f 64 65 20 21 21 throwcode !! 0470: 6d 61 70 73 69 7a 65 21 21 0a 73 22 20 75 6e 69 mapsize!!.s" uni 0480: 6d 70 6c 65 6d 65 6e 74 65 64 20 6e 65 74 32 6f mplemented net2o 0490: 20 66 75 6e 63 74 69 6f 6e 22 20 74 68 72 6f 77 function" throw 04a0: 63 6f 64 65 20 21 21 66 75 6e 63 74 69 6f 6e 21 code !!function! 04b0: 21 0a 73 22 20 69 6e 76 61 6c 69 64 20 6e 65 74 !.s" invalid net 04c0: 32 6f 20 66 75 6e 63 74 69 6f 6e 22 20 20 20 20 2o function" 04d0: 20 20 20 74 68 72 6f 77 63 6f 64 65 20 21 21 69 throwcode !!i 04e0: 6e 76 61 6c 69 64 21 21 0a 73 22 20 74 6f 6f 20 nvalid!!.s" too 04f0: 6d 61 6e 79 20 63 6f 6d 6d 61 6e 64 73 22 20 20 many commands" 0500: 20 20 20 20 20 20 20 20 20 20 74 68 72 6f 77 63 throwc 0510: 6f 64 65 20 21 21 63 6f 6d 6d 61 6e 64 73 21 21 ode !!commands!! 0520: 0a 73 22 20 66 6c 6f 61 74 20 64 6f 65 73 20 6e .s" float does n 0530: 6f 74 20 66 69 74 22 20 20 20 20 20 20 20 20 20 ot fit" 0540: 20 20 74 68 72 6f 77 63 6f 64 65 20 21 21 66 6c throwcode !!fl 0550: 6f 61 74 66 69 74 21 21 0a 73 22 20 73 74 72 69 oatfit!!.s" stri 0560: 6e 67 20 64 6f 65 73 20 6e 6f 74 20 66 69 74 22 ng does not fit" 0570: 20 20 20 20 20 20 20 20 20 20 74 68 72 6f 77 63 throwc 0580: 6f 64 65 20 21 21 73 74 72 69 6e 67 66 69 74 21 ode !!stringfit! 0590: 21 0a 73 22 20 63 6d 64 20 64 6f 65 73 20 6e 6f !.s" cmd does no 05a0: 74 20 66 69 74 22 20 20 20 20 20 20 20 20 20 20 t fit" 05b0: 20 20 20 74 68 72 6f 77 63 6f 64 65 20 21 21 63 throwcode !!c 05c0: 6d 64 66 69 74 21 21 0a 73 22 20 69 76 73 20 6d mdfit!!.s" ivs m 05d0: 75 73 74 20 62 65 20 36 34 20 62 79 74 65 73 22 ust be 64 bytes" 05e0: 20 20 20 20 20 20 20 20 20 74 68 72 6f 77 63 6f throwco 05f0: 64 65 20 21 21 69 76 73 21 21 0a 73 22 20 6e 65 de !!ivs!!.s" ne 0600: 74 32 6f 20 74 69 6d 65 64 20 6f 75 74 22 20 20 t2o timed out" 0610: 20 20 20 20 20 20 20 20 20 20 20 20 74 68 72 6f thro 0620: 77 63 6f 64 65 20 21 21 74 69 6d 65 6f 75 74 21 wcode !!timeout! 0630: 21 0a 73 22 20 6d 61 78 69 6d 75 6d 20 6e 65 73 !.s" maximum nes 0640: 74 69 6e 67 20 72 65 61 63 68 65 64 22 20 20 20 ting reached" 0650: 20 20 20 74 68 72 6f 77 63 6f 64 65 20 21 21 6d throwcode !!m 0660: 61 78 6e 65 73 74 21 21 0a 73 22 20 6e 65 73 74 axnest!!.s" nest 0670: 69 6e 67 20 73 74 61 63 6b 20 65 6d 70 74 79 22 ing stack empty" 0680: 20 20 20 20 20 20 20 20 20 20 74 68 72 6f 77 63 throwc 0690: 6f 64 65 20 21 21 6d 69 6e 6e 65 73 74 21 21 0a ode !!minnest!!. 06a0: 73 22 20 69 6e 76 61 6c 69 64 20 6e 65 73 74 22 s" invalid nest" 06b0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 06c0: 20 74 68 72 6f 77 63 6f 64 65 20 21 21 6e 65 73 throwcode !!nes 06d0: 74 21 21 0a 73 22 20 69 6e 76 61 6c 69 64 20 74 t!!.s" invalid t 06e0: 6d 70 6e 65 73 74 22 20 20 20 20 20 20 20 20 20 mpnest" 06f0: 20 20 20 20 20 74 68 72 6f 77 63 6f 64 65 20 21 throwcode ! 0700: 21 74 6d 70 6e 65 73 74 21 21 0a 73 22 20 63 6f !tmpnest!!.s" co 0710: 6f 6b 69 65 20 72 65 63 69 65 76 65 64 20 74 77 okie recieved tw 0720: 69 63 65 22 20 20 20 20 20 20 20 20 74 68 72 6f ice" thro 0730: 77 63 6f 64 65 20 21 21 64 6f 75 62 6c 65 2d 63 wcode !!double-c 0740: 6f 6f 6b 69 65 21 21 0a 73 22 20 63 6f 64 65 20 ookie!!.s" code 0750: 64 65 73 74 69 6e 61 74 69 6f 6e 20 69 73 20 30 destination is 0 0760: 22 20 20 20 20 20 20 20 20 74 68 72 6f 77 63 6f " throwco 0770: 64 65 20 21 21 6e 6f 2d 64 65 73 74 21 21 0a 73 de !!no-dest!!.s 0780: 22 20 6e 6f 20 49 50 20 61 64 64 72 22 20 20 20 " no IP addr" 0790: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 07a0: 74 68 72 6f 77 63 6f 64 65 20 21 21 6e 6f 2d 61 throwcode !!no-a 07b0: 64 64 72 21 21 0a 73 22 20 61 62 73 6f 6c 75 74 ddr!!.s" absolut 07c0: 65 20 70 61 74 68 20 6e 6f 74 20 61 6c 6c 6f 77 e path not allow 07d0: 65 64 21 22 20 20 20 74 68 72 6f 77 63 6f 64 65 ed!" throwcode 07e0: 20 21 21 61 62 73 2d 70 61 74 68 21 21 0a 73 22 !!abs-path!!.s" 07f0: 20 69 6e 76 61 6c 69 64 20 70 61 63 6b 65 74 20 invalid packet 0800: 64 65 73 74 69 6e 61 74 69 6f 6e 22 20 20 20 74 destination" t 0810: 68 72 6f 77 63 6f 64 65 20 21 21 69 6e 76 2d 64 hrowcode !!inv-d 0820: 65 73 74 21 21 0a 73 22 20 75 6e 6b 6e 6f 77 6e est!!.s" unknown 0830: 20 6b 65 79 22 20 20 20 20 20 20 20 20 20 20 20 key" 0840: 20 20 20 20 20 20 20 74 68 72 6f 77 63 6f 64 65 throwcode 0850: 20 21 21 75 6e 6b 6e 6f 77 6e 2d 6b 65 79 21 21 !!unknown-key!! 0860: 0a 73 22 20 77 72 6f 6e 67 20 6b 65 79 22 20 20 .s" wrong key" 0870: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0880: 20 20 74 68 72 6f 77 63 6f 64 65 20 21 21 77 72 throwcode !!wr 0890: 6f 6e 67 2d 6b 65 79 21 21 0a 73 22 20 6e 6f 20 ong-key!!.s" no 08a0: 6b 65 79 20 66 69 6c 65 22 20 20 20 20 20 20 20 key file" 08b0: 20 20 20 20 20 20 20 20 20 20 20 74 68 72 6f 77 throw 08c0: 63 6f 64 65 20 21 21 6e 6f 6b 65 79 21 21 0a 73 code !!nokey!!.s 08d0: 22 20 69 6e 76 61 6c 69 64 20 45 64 32 35 35 31 " invalid Ed2551 08e0: 39 20 6b 65 79 22 20 20 20 20 20 20 20 20 20 20 9 key" 08f0: 74 68 72 6f 77 63 6f 64 65 20 21 21 6e 6f 2d 65 throwcode !!no-e 0900: 64 2d 6b 65 79 21 21 0a 73 22 20 77 72 6f 6e 67 d-key!!.s" wrong 0910: 20 6b 65 79 20 73 69 7a 65 22 20 20 20 20 20 20 key size" 0920: 20 20 20 20 20 20 20 20 20 74 68 72 6f 77 63 6f throwco 0930: 64 65 20 21 21 6b 65 79 73 69 7a 65 21 21 0a 73 de !!keysize!!.s 0940: 22 20 6e 6f 20 73 69 67 6e 61 74 75 72 65 20 61 " no signature a 0950: 70 70 65 6e 64 65 64 22 20 20 20 20 20 20 20 20 ppended" 0960: 74 68 72 6f 77 63 6f 64 65 20 21 21 6e 6f 2d 73 throwcode !!no-s 0970: 69 67 21 21 0a 73 22 20 66 75 74 75 72 65 20 73 ig!!.s" future s 0980: 69 67 6e 61 74 75 72 65 22 20 20 20 20 20 20 20 ignature" 0990: 20 20 20 20 20 20 74 68 72 6f 77 63 6f 64 65 20 throwcode 09a0: 21 21 6e 65 77 2d 73 69 67 21 21 0a 73 22 20 65 !!new-sig!!.s" e 09b0: 78 70 69 72 65 64 20 73 69 67 6e 61 74 75 72 65 xpired signature 09c0: 22 20 20 20 20 20 20 20 20 20 20 20 20 74 68 72 " thr 09d0: 6f 77 63 6f 64 65 20 21 21 6f 6c 64 2d 73 69 67 owcode !!old-sig 09e0: 21 21 0a 73 22 20 69 6e 76 61 6c 69 64 20 73 69 !!.s" invalid si 09f0: 67 6e 61 74 75 72 65 22 20 20 20 20 20 20 20 20 gnature" 0a00: 20 20 20 20 74 68 72 6f 77 63 6f 64 65 20 21 21 throwcode !! 0a10: 69 6e 76 2d 73 69 67 21 21 0a 73 22 20 6e 6f 20 inv-sig!!.s" no 0a20: 74 65 6d 70 6f 72 61 72 79 20 6b 65 79 22 20 20 temporary key" 0a30: 20 20 20 20 20 20 20 20 20 20 20 74 68 72 6f 77 throw 0a40: 63 6f 64 65 20 21 21 6e 6f 2d 74 6d 70 6b 65 79 code !!no-tmpkey 0a50: 21 21 0a 73 22 20 67 65 6e 65 72 69 63 20 73 74 !!.s" generic st 0a60: 61 63 6b 20 65 6d 70 74 79 22 20 20 20 20 20 20 ack empty" 0a70: 20 20 20 20 74 68 72 6f 77 63 6f 64 65 20 21 21 throwcode !! 0a80: 73 74 61 63 6b 2d 65 6d 70 74 79 21 21 0a 73 22 stack-empty!!.s" 0a90: 20 53 74 72 69 6e 67 20 73 74 61 63 6b 20 66 75 String stack fu 0aa0: 6c 6c 22 20 20 20 20 20 20 20 20 20 20 20 20 74 ll" t 0ab0: 68 72 6f 77 63 6f 64 65 20 21 21 73 74 72 69 6e hrowcode !!strin 0ac0: 67 2d 66 75 6c 6c 21 21 0a 73 22 20 53 74 72 69 g-full!!.s" Stri 0ad0: 6e 67 20 73 74 61 63 6b 20 65 6d 70 74 79 22 20 ng stack empty" 0ae0: 20 20 20 20 20 20 20 20 20 20 74 68 72 6f 77 63 throwc 0af0: 6f 64 65 20 21 21 73 74 72 69 6e 67 2d 65 6d 70 ode !!string-emp 0b00: 74 79 21 21 0a 73 22 20 4f 62 6a 65 63 74 20 73 ty!!.s" Object s 0b10: 74 61 63 6b 20 66 75 6c 6c 22 20 20 20 20 20 20 tack full" 0b20: 20 20 20 20 20 20 74 68 72 6f 77 63 6f 64 65 20 throwcode 0b30: 21 21 6f 62 6a 65 63 74 2d 66 75 6c 6c 21 21 0a !!object-full!!. 0b40: 73 22 20 4f 62 6a 65 63 74 20 73 74 61 63 6b 20 s" Object stack 0b50: 65 6d 70 74 79 22 20 20 20 20 20 20 20 20 20 20 empty" 0b60: 20 74 68 72 6f 77 63 6f 64 65 20 21 21 6f 62 6a throwcode !!obj 0b70: 65 63 74 2d 65 6d 70 74 79 21 21 0a 73 22 20 55 ect-empty!!.s" U 0b80: 6e 6b 6e 6f 77 6e 20 63 72 79 70 74 6f 20 66 75 nknown crypto fu 0b90: 6e 63 74 69 6f 6e 22 20 20 20 20 20 20 74 68 72 nction" thr 0ba0: 6f 77 63 6f 64 65 20 21 21 75 6e 6b 6e 6f 77 6e owcode !!unknown 0bb0: 2d 63 72 79 70 74 21 21 0a 73 22 20 57 72 6f 6e -crypt!!.s" Wron 0bc0: 67 20 72 65 76 6f 63 61 74 69 6f 6e 20 73 65 63 g revocation sec 0bd0: 72 65 74 22 20 20 20 20 20 20 74 68 72 6f 77 63 ret" throwc 0be0: 6f 64 65 20 21 21 6e 6f 74 2d 6d 79 2d 72 65 76 ode !!not-my-rev 0bf0: 73 6b 21 21 0a 73 22 20 6b 72 79 70 74 6f 20 6d sk!!.s" krypto m 0c00: 65 6d 20 72 65 71 75 65 73 74 20 74 6f 6f 20 62 em request too b 0c10: 69 67 22 20 20 20 74 68 72 6f 77 63 6f 64 65 20 ig" throwcode 0c20: 21 21 6b 72 2d 73 69 7a 65 21 21 0a 73 22 20 73 !!kr-size!!.s" s 0c30: 65 63 72 65 74 20 73 74 6f 72 61 67 65 20 73 69 ecret storage si 0c40: 7a 65 20 77 72 6f 6e 67 22 20 20 20 20 74 68 72 ze wrong" thr 0c50: 6f 77 63 6f 64 65 20 21 21 73 65 63 2d 73 69 7a owcode !!sec-siz 0c60: 65 21 21 0a 73 22 20 6e 65 74 32 6f 20 69 64 20 e!!.s" net2o id 0c70: 6e 6f 74 20 66 6f 75 6e 64 22 20 20 20 20 20 20 not found" 0c80: 20 20 20 20 20 74 68 72 6f 77 63 6f 64 65 20 21 throwcode ! 0c90: 21 68 6f 73 74 2d 6e 6f 74 66 6f 75 6e 64 21 21 !host-notfound!! 0ca0: 0a 73 22 20 74 6f 6f 20 6d 61 6e 79 20 72 65 76 .s" too many rev 0cb0: 6f 6b 65 73 20 63 68 61 69 6e 65 64 22 20 20 20 okes chained" 0cc0: 20 20 74 68 72 6f 77 63 6f 64 65 20 21 21 6d 61 throwcode !!ma 0cd0: 78 6c 6f 6f 6b 75 70 21 21 0a 73 22 20 66 69 6c xlookup!!.s" fil 0ce0: 65 20 63 6c 61 73 73 20 64 65 6e 69 65 64 22 20 e class denied" 0cf0: 20 20 20 20 20 20 20 20 20 20 20 74 68 72 6f 77 throw 0d00: 63 6f 64 65 20 21 21 66 69 6c 65 63 6c 61 73 73 code !!fileclass 0d10: 21 21 0a 73 22 20 6e 6f 20 66 72 65 65 20 74 65 !!.s" no free te 0d20: 72 6d 73 65 72 76 65 72 73 22 20 20 20 20 20 20 rmservers" 0d30: 20 20 20 20 74 68 72 6f 77 63 6f 64 65 20 21 21 throwcode !! 0d40: 6e 6f 2d 74 65 72 6d 73 65 72 76 65 72 21 21 0a no-termserver!!. 0d50: 73 22 20 64 65 63 72 79 70 74 69 6f 6e 20 66 61 s" decryption fa 0d60: 69 6c 65 64 22 20 20 20 20 20 20 20 20 20 20 20 iled" 0d70: 20 74 68 72 6f 77 63 6f 64 65 20 21 21 6e 6f 2d throwcode !!no- 0d80: 64 65 63 72 79 70 74 21 21 0a 73 22 20 6e 6f 20 decrypt!!.s" no 0d90: 64 61 74 61 22 20 20 20 20 20 20 20 20 20 20 20 data" 0da0: 20 20 20 20 20 20 20 20 20 20 20 74 68 72 6f 77 throw 0db0: 63 6f 64 65 20 21 21 6e 6f 2d 64 61 74 61 21 21 code !!no-data!! 0dc0: 0a 73 22 20 69 6e 76 61 6c 69 64 20 63 6f 6d 6d .s" invalid comm 0dd0: 61 6e 64 20 6f 72 64 65 72 22 20 20 20 20 20 20 and order" 0de0: 20 20 74 68 72 6f 77 63 6f 64 65 20 21 21 69 6e throwcode !!in 0df0: 76 2d 6f 72 64 65 72 21 21 0a 73 22 20 6e 69 63 v-order!!.s" nic 0e00: 6b 20 6e 6f 74 20 66 6f 75 6e 64 22 20 20 20 20 k not found" 0e10: 20 20 20 20 20 20 20 20 20 20 20 74 68 72 6f 77 throw 0e20: 63 6f 64 65 20 21 21 6e 6f 2d 6e 69 63 6b 21 21 code !!no-nick!! 0e30: 0a 73 22 20 70 61 73 73 70 68 72 61 73 65 73 20 .s" passphrases 0e40: 64 6f 6e 27 74 20 6d 61 74 63 68 22 20 20 20 20 don't match" 0e50: 20 20 74 68 72 6f 77 63 6f 64 65 20 21 21 70 61 throwcode !!pa 0e60: 73 73 70 68 72 61 73 65 2d 75 6e 6d 61 74 63 68 ssphrase-unmatch 0e70: 21 21 0a 73 22 20 64 61 74 61 20 6e 65 65 64 73 !!.s" data needs 0e80: 20 74 6f 20 62 65 20 73 69 67 6e 65 64 22 20 20 to be signed" 0e90: 20 20 20 20 74 68 72 6f 77 63 6f 64 65 20 21 21 throwcode !! 0ea0: 75 6e 73 69 67 6e 65 64 21 21 0a 73 22 20 64 61 unsigned!!.s" da 0eb0: 74 61 20 6e 65 65 64 73 20 74 6f 20 62 65 20 75 ta needs to be u 0ec0: 6e 73 69 67 6e 65 64 22 20 20 20 20 74 68 72 6f nsigned" thro 0ed0: 77 63 6f 64 65 20 21 21 73 69 67 6e 65 64 21 21 wcode !!signed!! 0ee0: 0a 73 22 20 69 6e 76 61 6c 69 64 20 44 48 54 20 .s" invalid DHT 0ef0: 6b 65 79 22 20 20 20 20 20 20 20 20 20 20 20 20 key" 0f00: 20 20 74 68 72 6f 77 63 6f 64 65 20 21 21 6e 6f throwcode !!no 0f10: 2d 64 68 74 2d 6b 65 79 21 21 0a 73 22 20 64 68 -dht-key!!.s" dh 0f20: 74 20 65 78 68 61 75 73 74 65 64 20 2d 20 74 68 t exhausted - th 0f30: 69 73 20 73 68 6f 75 6c 64 20 6e 6f 74 20 68 61 is should not ha 0f40: 70 70 65 6e 22 20 74 68 72 6f 77 63 6f 64 65 20 ppen" throwcode 0f50: 21 21 64 68 74 2d 66 75 6c 6c 21 21 0a 73 22 20 !!dht-full!!.s" 0f60: 43 6f 6e 6e 65 63 74 20 64 65 6e 69 65 64 22 20 Connect denied" 0f70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 74 68 th 0f80: 72 6f 77 63 6f 64 65 20 21 21 63 6f 6e 6e 65 63 rowcode !!connec 0f90: 74 2d 70 65 72 6d 21 21 0a 73 22 20 44 48 54 20 t-perm!!.s" DHT 0fa0: 70 65 72 6d 69 73 73 69 6f 6e 20 64 65 6e 69 65 permission denie 0fb0: 64 22 20 20 20 20 20 20 20 20 74 68 72 6f 77 63 d" throwc 0fc0: 6f 64 65 20 21 21 64 68 74 2d 70 65 72 6d 21 21 ode !!dht-perm!! 0fd0: 0a 73 22 20 4d 53 47 20 70 65 72 6d 69 73 73 69 .s" MSG permissi 0fe0: 6f 6e 20 64 65 6e 69 65 64 22 20 20 20 20 20 20 on denied" 0ff0: 20 20 74 68 72 6f 77 63 6f 64 65 20 21 21 6d 73 throwcode !!ms 1000: 67 2d 70 65 72 6d 21 21 0a 73 22 20 66 69 6c 65 g-perm!!.s" file 1010: 20 72 65 61 64 20 70 65 72 6d 69 73 73 69 6f 6e read permission 1020: 20 64 65 6e 69 65 64 22 20 20 74 68 72 6f 77 63 denied" throwc 1030: 6f 64 65 20 21 21 66 69 6c 65 72 64 2d 70 65 72 ode !!filerd-per 1040: 6d 21 21 0a 73 22 20 66 69 6c 65 20 77 72 69 74 m!!.s" file writ 1050: 65 20 70 65 72 6d 69 73 73 69 6f 6e 20 64 65 6e e permission den 1060: 69 65 64 22 20 74 68 72 6f 77 63 6f 64 65 20 21 ied" throwcode ! 1070: 21 66 69 6c 65 77 72 2d 70 65 72 6d 21 21 0a 0a !filewr-perm!!.. 1080: 3a 20 73 69 67 2d 65 6e 75 6d 3e 74 68 72 6f 77 : sig-enum>throw 1090: 20 28 20 65 6e 75 6d 20 2d 2d 20 74 68 72 6f 77 ( enum -- throw 10a0: 63 6f 64 65 20 29 0a 20 20 20 20 5b 20 27 20 21 code ). [ ' ! 10b0: 21 69 6e 76 2d 73 69 67 21 21 20 3e 62 6f 64 79 !inv-sig!! >body 10c0: 20 40 20 31 2d 20 5d 4c 20 73 77 61 70 20 2d 20 @ 1- ]L swap - 10d0: 3b 0a 3a 20 21 21 73 69 67 21 21 20 28 20 6e 20 ;.: !!sig!! ( n 10e0: 2d 2d 20 29 0a 20 20 20 20 3f 64 75 70 2d 49 46 -- ). ?dup-IF 10f0: 20 20 73 69 67 2d 65 6e 75 6d 3e 74 68 72 6f 77 sig-enum>throw 1100: 20 74 68 72 6f 77 20 20 54 48 45 4e 20 3b throw THEN ;