0000: 2f 2a 20 63 72 79 70 74 2e 68 20 2d 2d 20 62 61 /* crypt.h -- ba
0010: 73 65 20 63 6f 64 65 20 66 6f 72 20 63 72 79 70 se code for cryp
0020: 74 2f 75 6e 63 72 79 70 74 20 5a 49 50 66 69 6c t/uncrypt ZIPfil
0030: 65 0a 0a 0a 20 20 20 56 65 72 73 69 6f 6e 20 31 e... Version 1
0040: 2e 30 31 65 2c 20 46 65 62 72 75 61 72 79 20 31 .01e, February 1
0050: 32 74 68 2c 20 32 30 30 35 0a 0a 20 20 20 43 6f 2th, 2005.. Co
0060: 70 79 72 69 67 68 74 20 28 43 29 20 31 39 39 38 pyright (C) 1998
0070: 2d 32 30 30 35 20 47 69 6c 6c 65 73 20 56 6f 6c -2005 Gilles Vol
0080: 6c 61 6e 74 0a 0a 20 20 20 54 68 69 73 20 63 6f lant.. This co
0090: 64 65 20 69 73 20 61 20 6d 6f 64 69 66 69 65 64 de is a modified
00a0: 20 76 65 72 73 69 6f 6e 20 6f 66 20 63 72 79 70 version of cryp
00b0: 74 69 6e 67 20 63 6f 64 65 20 69 6e 20 49 6e 66 ting code in Inf
00c0: 6f 7a 69 70 20 64 69 73 74 72 69 62 75 74 69 6f ozip distributio
00d0: 6e 0a 0a 20 20 20 54 68 65 20 65 6e 63 72 79 70 n.. The encryp
00e0: 74 69 6f 6e 2f 64 65 63 72 79 70 74 69 6f 6e 20 tion/decryption
00f0: 70 61 72 74 73 20 6f 66 20 74 68 69 73 20 73 6f parts of this so
0100: 75 72 63 65 20 63 6f 64 65 20 28 61 73 20 6f 70 urce code (as op
0110: 70 6f 73 65 64 20 74 6f 20 74 68 65 0a 20 20 20 posed to the.
0120: 6e 6f 6e 2d 65 63 68 6f 69 6e 67 20 70 61 73 73 non-echoing pass
0130: 77 6f 72 64 20 70 61 72 74 73 29 20 77 65 72 65 word parts) were
0140: 20 6f 72 69 67 69 6e 61 6c 6c 79 20 77 72 69 74 originally writ
0150: 74 65 6e 20 69 6e 20 45 75 72 6f 70 65 2e 20 20 ten in Europe.
0160: 54 68 65 0a 20 20 20 77 68 6f 6c 65 20 73 6f 75 The. whole sou
0170: 72 63 65 20 70 61 63 6b 61 67 65 20 63 61 6e 20 rce package can
0180: 62 65 20 66 72 65 65 6c 79 20 64 69 73 74 72 69 be freely distri
0190: 62 75 74 65 64 2c 20 69 6e 63 6c 75 64 69 6e 67 buted, including
01a0: 20 66 72 6f 6d 20 74 68 65 20 55 53 41 2e 0a 20 from the USA..
01b0: 20 20 28 50 72 69 6f 72 20 74 6f 20 4a 61 6e 75 (Prior to Janu
01c0: 61 72 79 20 32 30 30 30 2c 20 72 65 2d 65 78 70 ary 2000, re-exp
01d0: 6f 72 74 20 66 72 6f 6d 20 74 68 65 20 55 53 20 ort from the US
01e0: 77 61 73 20 61 20 76 69 6f 6c 61 74 69 6f 6e 20 was a violation
01f0: 6f 66 20 55 53 20 6c 61 77 2e 29 0a 0a 20 20 20 of US law.)..
0200: 54 68 69 73 20 65 6e 63 72 79 70 74 69 6f 6e 20 This encryption
0210: 63 6f 64 65 20 69 73 20 61 20 64 69 72 65 63 74 code is a direct
0220: 20 74 72 61 6e 73 63 72 69 70 74 69 6f 6e 20 6f transcription o
0230: 66 20 74 68 65 20 61 6c 67 6f 72 69 74 68 6d 20 f the algorithm
0240: 66 72 6f 6d 0a 20 20 20 52 6f 67 65 72 20 53 63 from. Roger Sc
0250: 68 6c 61 66 6c 79 2c 20 64 65 73 63 72 69 62 65 hlafly, describe
0260: 64 20 62 79 20 50 68 69 6c 20 4b 61 74 7a 20 69 d by Phil Katz i
0270: 6e 20 74 68 65 20 66 69 6c 65 20 61 70 70 6e 6f n the file appno
0280: 74 65 2e 74 78 74 2e 20 20 54 68 69 73 0a 20 20 te.txt. This.
0290: 20 66 69 6c 65 20 28 61 70 70 6e 6f 74 65 2e 74 file (appnote.t
02a0: 78 74 29 20 69 73 20 64 69 73 74 72 69 62 75 74 xt) is distribut
02b0: 65 64 20 77 69 74 68 20 74 68 65 20 50 4b 5a 49 ed with the PKZI
02c0: 50 20 70 72 6f 67 72 61 6d 20 28 65 76 65 6e 20 P program (even
02d0: 69 6e 20 74 68 65 0a 20 20 20 76 65 72 73 69 6f in the. versio
02e0: 6e 20 77 69 74 68 6f 75 74 20 65 6e 63 72 79 70 n without encryp
02f0: 74 69 6f 6e 20 63 61 70 61 62 69 6c 69 74 69 65 tion capabilitie
0300: 73 29 2e 0a 0a 20 20 20 49 66 20 79 6f 75 20 64 s)... If you d
0310: 6f 6e 27 74 20 6e 65 65 64 20 63 72 79 70 74 69 on't need crypti
0320: 6e 67 20 69 6e 20 79 6f 75 72 20 61 70 70 6c 69 ng in your appli
0330: 63 61 74 69 6f 6e 2c 20 6a 75 73 74 20 64 65 66 cation, just def
0340: 69 6e 65 20 73 79 6d 62 6f 6c 73 0a 20 20 20 4e ine symbols. N
0350: 4f 43 52 59 50 54 20 61 6e 64 20 4e 4f 55 4e 43 OCRYPT and NOUNC
0360: 52 59 50 54 2e 0a 0a 20 20 20 54 68 69 73 20 63 RYPT... This c
0370: 6f 64 65 20 73 75 70 70 6f 72 74 20 74 68 65 20 ode support the
0380: 22 54 72 61 64 69 74 69 6f 6e 61 6c 20 50 4b 57 "Traditional PKW
0390: 41 52 45 20 45 6e 63 72 79 70 74 69 6f 6e 22 2e ARE Encryption".
03a0: 0a 0a 20 20 20 54 68 65 20 6e 65 77 20 41 45 53 .. The new AES
03b0: 20 65 6e 63 72 79 70 74 69 6f 6e 20 61 64 64 65 encryption adde
03c0: 64 20 6f 6e 20 5a 69 70 20 66 6f 72 6d 61 74 20 d on Zip format
03d0: 62 79 20 57 69 6e 7a 69 70 20 28 73 65 65 20 74 by Winzip (see t
03e0: 68 65 20 70 61 67 65 0a 20 20 20 68 74 74 70 3a he page. http:
03f0: 2f 2f 77 77 77 2e 77 69 6e 7a 69 70 2e 63 6f 6d //www.winzip.com
0400: 2f 61 65 73 5f 69 6e 66 6f 2e 68 74 6d 20 29 20 /aes_info.htm )
0410: 61 6e 64 20 50 4b 57 61 72 65 20 50 4b 5a 69 70 and PKWare PKZip
0420: 20 35 2e 78 20 53 74 72 6f 6e 67 0a 20 20 20 45 5.x Strong. E
0430: 6e 63 72 79 70 74 69 6f 6e 20 69 73 20 6e 6f 74 ncryption is not
0440: 20 73 75 70 70 6f 72 74 65 64 2e 0a 2a 2f 0a 0a supported..*/..
0450: 23 64 65 66 69 6e 65 20 43 52 43 33 32 28 63 2c #define CRC32(c,
0460: 20 62 29 20 28 28 2a 28 70 63 72 63 5f 33 32 5f b) ((*(pcrc_32_
0470: 74 61 62 2b 28 28 28 69 6e 74 29 28 63 29 20 5e tab+(((int)(c) ^
0480: 20 28 62 29 29 20 26 20 30 78 66 66 29 29 29 20 (b)) & 0xff)))
0490: 5e 20 28 28 63 29 20 3e 3e 20 38 29 29 0a 0a 2f ^ ((c) >> 8))../
04a0: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
04b0: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
04c0: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
04d0: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
04e0: 2a 2a 2a 2a 2a 2a 2a 0a 20 2a 20 52 65 74 75 72 *******. * Retur
04f0: 6e 20 74 68 65 20 6e 65 78 74 20 62 79 74 65 20 n the next byte
0500: 69 6e 20 74 68 65 20 70 73 65 75 64 6f 2d 72 61 in the pseudo-ra
0510: 6e 64 6f 6d 20 73 65 71 75 65 6e 63 65 0a 20 2a ndom sequence. *
0520: 2f 0a 73 74 61 74 69 63 20 69 6e 74 20 64 65 63 /.static int dec
0530: 72 79 70 74 5f 62 79 74 65 28 75 6e 73 69 67 6e rypt_byte(unsign
0540: 65 64 20 6c 6f 6e 67 2a 20 70 6b 65 79 73 2c 20 ed long* pkeys,
0550: 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 6c const unsigned l
0560: 6f 6e 67 2a 20 70 63 72 63 5f 33 32 5f 74 61 62 ong* pcrc_32_tab
0570: 29 0a 7b 0a 20 20 20 20 75 6e 73 69 67 6e 65 64 ).{. unsigned
0580: 20 74 65 6d 70 3b 20 20 2f 2a 20 50 4f 54 45 4e temp; /* POTEN
0590: 54 49 41 4c 20 42 55 47 3a 20 20 74 65 6d 70 2a TIAL BUG: temp*
05a0: 28 74 65 6d 70 5e 31 29 20 6d 61 79 20 6f 76 65 (temp^1) may ove
05b0: 72 66 6c 6f 77 20 69 6e 20 61 6e 0a 20 20 20 20 rflow in an.
05c0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
05d0: 20 2a 20 75 6e 70 72 65 64 69 63 74 61 62 6c 65 * unpredictable
05e0: 20 6d 61 6e 6e 65 72 20 6f 6e 20 31 36 2d 62 69 manner on 16-bi
05f0: 74 20 73 79 73 74 65 6d 73 3b 20 6e 6f 74 20 61 t systems; not a
0600: 20 70 72 6f 62 6c 65 6d 0a 20 20 20 20 20 20 20 problem.
0610: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 *
0620: 77 69 74 68 20 61 6e 79 20 6b 6e 6f 77 6e 20 63 with any known c
0630: 6f 6d 70 69 6c 65 72 20 73 6f 20 66 61 72 2c 20 ompiler so far,
0640: 74 68 6f 75 67 68 20 2a 2f 0a 0a 20 20 20 20 74 though */.. t
0650: 65 6d 70 20 3d 20 28 28 75 6e 73 69 67 6e 65 64 emp = ((unsigned
0660: 29 28 2a 28 70 6b 65 79 73 2b 32 29 29 20 26 20 )(*(pkeys+2)) &
0670: 30 78 66 66 66 66 29 20 7c 20 32 3b 0a 20 20 20 0xffff) | 2;.
0680: 20 72 65 74 75 72 6e 20 28 69 6e 74 29 28 28 28 return (int)(((
0690: 74 65 6d 70 20 2a 20 28 74 65 6d 70 20 5e 20 31 temp * (temp ^ 1
06a0: 29 29 20 3e 3e 20 38 29 20 26 20 30 78 66 66 29 )) >> 8) & 0xff)
06b0: 3b 0a 7d 0a 0a 2f 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ;.}../**********
06c0: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
06d0: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
06e0: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
06f0: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 0a 20 2a *************. *
0700: 20 55 70 64 61 74 65 20 74 68 65 20 65 6e 63 72 Update the encr
0710: 79 70 74 69 6f 6e 20 6b 65 79 73 20 77 69 74 68 yption keys with
0720: 20 74 68 65 20 6e 65 78 74 20 62 79 74 65 20 6f the next byte o
0730: 66 20 70 6c 61 69 6e 20 74 65 78 74 0a 20 2a 2f f plain text. */
0740: 0a 73 74 61 74 69 63 20 69 6e 74 20 75 70 64 61 .static int upda
0750: 74 65 5f 6b 65 79 73 28 75 6e 73 69 67 6e 65 64 te_keys(unsigned
0760: 20 6c 6f 6e 67 2a 20 70 6b 65 79 73 2c 63 6f 6e long* pkeys,con
0770: 73 74 20 75 6e 73 69 67 6e 65 64 20 6c 6f 6e 67 st unsigned long
0780: 2a 20 70 63 72 63 5f 33 32 5f 74 61 62 2c 69 6e * pcrc_32_tab,in
0790: 74 20 63 29 0a 7b 0a 20 20 20 20 28 2a 28 70 6b t c).{. (*(pk
07a0: 65 79 73 2b 30 29 29 20 3d 20 43 52 43 33 32 28 eys+0)) = CRC32(
07b0: 28 2a 28 70 6b 65 79 73 2b 30 29 29 2c 20 63 29 (*(pkeys+0)), c)
07c0: 3b 0a 20 20 20 20 28 2a 28 70 6b 65 79 73 2b 31 ;. (*(pkeys+1
07d0: 29 29 20 2b 3d 20 28 2a 28 70 6b 65 79 73 2b 30 )) += (*(pkeys+0
07e0: 29 29 20 26 20 30 78 66 66 3b 0a 20 20 20 20 28 )) & 0xff;. (
07f0: 2a 28 70 6b 65 79 73 2b 31 29 29 20 3d 20 28 2a *(pkeys+1)) = (*
0800: 28 70 6b 65 79 73 2b 31 29 29 20 2a 20 31 33 34 (pkeys+1)) * 134
0810: 37 37 35 38 31 33 4c 20 2b 20 31 3b 0a 20 20 20 775813L + 1;.
0820: 20 7b 0a 20 20 20 20 20 20 72 65 67 69 73 74 65 {. registe
0830: 72 20 69 6e 74 20 6b 65 79 73 68 69 66 74 20 3d r int keyshift =
0840: 20 28 69 6e 74 29 28 28 2a 28 70 6b 65 79 73 2b (int)((*(pkeys+
0850: 31 29 29 20 3e 3e 20 32 34 29 3b 0a 20 20 20 20 1)) >> 24);.
0860: 20 20 28 2a 28 70 6b 65 79 73 2b 32 29 29 20 3d (*(pkeys+2)) =
0870: 20 43 52 43 33 32 28 28 2a 28 70 6b 65 79 73 2b CRC32((*(pkeys+
0880: 32 29 29 2c 20 6b 65 79 73 68 69 66 74 29 3b 0a 2)), keyshift);.
0890: 20 20 20 20 7d 0a 20 20 20 20 72 65 74 75 72 6e }. return
08a0: 20 63 3b 0a 7d 0a 0a 0a 2f 2a 2a 2a 2a 2a 2a 2a c;.}.../*******
08b0: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
08c0: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
08d0: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
08e0: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
08f0: 0a 20 2a 20 49 6e 69 74 69 61 6c 69 7a 65 20 74 . * Initialize t
0900: 68 65 20 65 6e 63 72 79 70 74 69 6f 6e 20 6b 65 he encryption ke
0910: 79 73 20 61 6e 64 20 74 68 65 20 72 61 6e 64 6f ys and the rando
0920: 6d 20 68 65 61 64 65 72 20 61 63 63 6f 72 64 69 m header accordi
0930: 6e 67 20 74 6f 0a 20 2a 20 74 68 65 20 67 69 76 ng to. * the giv
0940: 65 6e 20 70 61 73 73 77 6f 72 64 2e 0a 20 2a 2f en password.. */
0950: 0a 73 74 61 74 69 63 20 76 6f 69 64 20 69 6e 69 .static void ini
0960: 74 5f 6b 65 79 73 28 63 6f 6e 73 74 20 63 68 61 t_keys(const cha
0970: 72 2a 20 70 61 73 73 77 64 2c 75 6e 73 69 67 6e r* passwd,unsign
0980: 65 64 20 6c 6f 6e 67 2a 20 70 6b 65 79 73 2c 63 ed long* pkeys,c
0990: 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 6c 6f onst unsigned lo
09a0: 6e 67 2a 20 70 63 72 63 5f 33 32 5f 74 61 62 29 ng* pcrc_32_tab)
09b0: 0a 7b 0a 20 20 20 20 2a 28 70 6b 65 79 73 2b 30 .{. *(pkeys+0
09c0: 29 20 3d 20 33 30 35 34 31 39 38 39 36 4c 3b 0a ) = 305419896L;.
09d0: 20 20 20 20 2a 28 70 6b 65 79 73 2b 31 29 20 3d *(pkeys+1) =
09e0: 20 35 39 31 37 35 31 30 34 39 4c 3b 0a 20 20 20 591751049L;.
09f0: 20 2a 28 70 6b 65 79 73 2b 32 29 20 3d 20 38 37 *(pkeys+2) = 87
0a00: 38 30 38 32 31 39 32 4c 3b 0a 20 20 20 20 77 68 8082192L;. wh
0a10: 69 6c 65 20 28 2a 70 61 73 73 77 64 20 21 3d 20 ile (*passwd !=
0a20: 27 5c 30 27 29 20 7b 0a 20 20 20 20 20 20 20 20 '\0') {.
0a30: 75 70 64 61 74 65 5f 6b 65 79 73 28 70 6b 65 79 update_keys(pkey
0a40: 73 2c 70 63 72 63 5f 33 32 5f 74 61 62 2c 28 69 s,pcrc_32_tab,(i
0a50: 6e 74 29 2a 70 61 73 73 77 64 29 3b 0a 20 20 20 nt)*passwd);.
0a60: 20 20 20 20 20 70 61 73 73 77 64 2b 2b 3b 0a 20 passwd++;.
0a70: 20 20 20 7d 0a 7d 0a 0a 23 64 65 66 69 6e 65 20 }.}..#define
0a80: 7a 64 65 63 6f 64 65 28 70 6b 65 79 73 2c 70 63 zdecode(pkeys,pc
0a90: 72 63 5f 33 32 5f 74 61 62 2c 63 29 20 5c 0a 20 rc_32_tab,c) \.
0aa0: 20 20 20 28 75 70 64 61 74 65 5f 6b 65 79 73 28 (update_keys(
0ab0: 70 6b 65 79 73 2c 70 63 72 63 5f 33 32 5f 74 61 pkeys,pcrc_32_ta
0ac0: 62 2c 63 20 5e 3d 20 64 65 63 72 79 70 74 5f 62 b,c ^= decrypt_b
0ad0: 79 74 65 28 70 6b 65 79 73 2c 70 63 72 63 5f 33 yte(pkeys,pcrc_3
0ae0: 32 5f 74 61 62 29 29 29 0a 0a 23 64 65 66 69 6e 2_tab)))..#defin
0af0: 65 20 7a 65 6e 63 6f 64 65 28 70 6b 65 79 73 2c e zencode(pkeys,
0b00: 70 63 72 63 5f 33 32 5f 74 61 62 2c 63 2c 74 29 pcrc_32_tab,c,t)
0b10: 20 5c 0a 20 20 20 20 28 74 3d 64 65 63 72 79 70 \. (t=decryp
0b20: 74 5f 62 79 74 65 28 70 6b 65 79 73 2c 70 63 72 t_byte(pkeys,pcr
0b30: 63 5f 33 32 5f 74 61 62 29 2c 20 75 70 64 61 74 c_32_tab), updat
0b40: 65 5f 6b 65 79 73 28 70 6b 65 79 73 2c 70 63 72 e_keys(pkeys,pcr
0b50: 63 5f 33 32 5f 74 61 62 2c 63 29 2c 20 74 5e 28 c_32_tab,c), t^(
0b60: 63 29 29 0a 0a 23 69 66 64 65 66 20 49 4e 43 4c c))..#ifdef INCL
0b70: 55 44 45 43 52 59 50 54 49 4e 47 43 4f 44 45 5f UDECRYPTINGCODE_
0b80: 49 46 43 52 59 50 54 41 4c 4c 4f 57 45 44 0a 0a IFCRYPTALLOWED..
0b90: 23 64 65 66 69 6e 65 20 52 41 4e 44 5f 48 45 41 #define RAND_HEA
0ba0: 44 5f 4c 45 4e 20 20 31 32 0a 20 20 20 2f 2a 20 D_LEN 12. /*
0bb0: 22 6c 61 73 74 20 72 65 73 6f 72 74 22 20 73 6f "last resort" so
0bc0: 75 72 63 65 20 66 6f 72 20 73 65 63 6f 6e 64 20 urce for second
0bd0: 70 61 72 74 20 6f 66 20 63 72 79 70 74 20 73 65 part of crypt se
0be0: 65 64 20 70 61 74 74 65 72 6e 20 2a 2f 0a 23 20 ed pattern */.#
0bf0: 20 69 66 6e 64 65 66 20 5a 43 52 5f 53 45 45 44 ifndef ZCR_SEED
0c00: 32 0a 23 20 20 20 20 64 65 66 69 6e 65 20 5a 43 2.# define ZC
0c10: 52 5f 53 45 45 44 32 20 33 31 34 31 35 39 32 36 R_SEED2 31415926
0c20: 35 34 55 4c 20 20 20 20 20 2f 2a 20 75 73 65 20 54UL /* use
0c30: 50 49 20 61 73 20 64 65 66 61 75 6c 74 20 70 61 PI as default pa
0c40: 74 74 65 72 6e 20 2a 2f 0a 23 20 20 65 6e 64 69 ttern */.# endi
0c50: 66 0a 0a 73 74 61 74 69 63 20 69 6e 74 20 63 72 f..static int cr
0c60: 79 70 74 68 65 61 64 28 63 6f 6e 73 74 20 63 68 ypthead(const ch
0c70: 61 72 2a 20 70 61 73 73 77 64 2c 20 20 20 20 20 ar* passwd,
0c80: 20 2f 2a 20 70 61 73 73 77 6f 72 64 20 73 74 72 /* password str
0c90: 69 6e 67 20 2a 2f 0a 20 20 20 20 20 20 20 20 20 ing */.
0ca0: 20 20 20 20 20 20 20 20 20 20 20 20 75 6e 73 69 unsi
0cb0: 67 6e 65 64 20 63 68 61 72 2a 20 62 75 66 2c 20 gned char* buf,
0cc0: 20 20 20 20 20 2f 2a 20 77 68 65 72 65 20 74 6f /* where to
0cd0: 20 77 72 69 74 65 20 68 65 61 64 65 72 20 2a 2f write header */
0ce0: 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .
0cf0: 20 20 20 20 20 20 69 6e 74 20 62 75 66 53 69 7a int bufSiz
0d00: 65 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 e,.
0d10: 20 20 20 20 20 20 20 20 75 6e 73 69 67 6e 65 64 unsigned
0d20: 20 6c 6f 6e 67 2a 20 70 6b 65 79 73 2c 0a 20 20 long* pkeys,.
0d30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0d40: 20 20 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65 const unsigne
0d50: 64 20 6c 6f 6e 67 2a 20 70 63 72 63 5f 33 32 5f d long* pcrc_32_
0d60: 74 61 62 2c 0a 20 20 20 20 20 20 20 20 20 20 20 tab,.
0d70: 20 20 20 20 20 20 20 20 20 20 75 6e 73 69 67 6e unsign
0d80: 65 64 20 6c 6f 6e 67 20 63 72 63 46 6f 72 43 72 ed long crcForCr
0d90: 79 70 74 69 6e 67 29 0a 7b 0a 20 20 20 20 69 6e ypting).{. in
0da0: 74 20 6e 3b 20 20 20 20 20 20 20 20 20 20 20 20 t n;
0db0: 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 69 6e /* in
0dc0: 64 65 78 20 69 6e 20 72 61 6e 64 6f 6d 20 68 65 dex in random he
0dd0: 61 64 65 72 20 2a 2f 0a 20 20 20 20 69 6e 74 20 ader */. int
0de0: 74 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 t;
0df0: 20 20 20 20 20 20 20 20 20 2f 2a 20 74 65 6d 70 /* temp
0e00: 6f 72 61 72 79 20 2a 2f 0a 20 20 20 20 69 6e 74 orary */. int
0e10: 20 63 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 c;
0e20: 20 20 20 20 20 20 20 20 20 20 2f 2a 20 72 61 6e /* ran
0e30: 64 6f 6d 20 62 79 74 65 20 2a 2f 0a 20 20 20 20 dom byte */.
0e40: 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 68 65 unsigned char he
0e50: 61 64 65 72 5b 52 41 4e 44 5f 48 45 41 44 5f 4c ader[RAND_HEAD_L
0e60: 45 4e 2d 32 5d 3b 20 2f 2a 20 72 61 6e 64 6f 6d EN-2]; /* random
0e70: 20 68 65 61 64 65 72 20 2a 2f 0a 20 20 20 20 73 header */. s
0e80: 74 61 74 69 63 20 75 6e 73 69 67 6e 65 64 20 63 tatic unsigned c
0e90: 61 6c 6c 73 20 3d 20 30 3b 20 20 20 2f 2a 20 65 alls = 0; /* e
0ea0: 6e 73 75 72 65 20 64 69 66 66 65 72 65 6e 74 20 nsure different
0eb0: 72 61 6e 64 6f 6d 20 68 65 61 64 65 72 20 65 61 random header ea
0ec0: 63 68 20 74 69 6d 65 20 2a 2f 0a 0a 20 20 20 20 ch time */..
0ed0: 69 66 20 28 62 75 66 53 69 7a 65 3c 52 41 4e 44 if (bufSize<RAND
0ee0: 5f 48 45 41 44 5f 4c 45 4e 29 0a 20 20 20 20 20 _HEAD_LEN).
0ef0: 20 72 65 74 75 72 6e 20 30 3b 0a 0a 20 20 20 20 return 0;..
0f00: 2f 2a 20 46 69 72 73 74 20 67 65 6e 65 72 61 74 /* First generat
0f10: 65 20 52 41 4e 44 5f 48 45 41 44 5f 4c 45 4e 2d e RAND_HEAD_LEN-
0f20: 32 20 72 61 6e 64 6f 6d 20 62 79 74 65 73 2e 20 2 random bytes.
0f30: 57 65 20 65 6e 63 72 79 70 74 20 74 68 65 0a 20 We encrypt the.
0f40: 20 20 20 20 2a 20 6f 75 74 70 75 74 20 6f 66 20 * output of
0f50: 72 61 6e 64 28 29 20 74 6f 20 67 65 74 20 6c 65 rand() to get le
0f60: 73 73 20 70 72 65 64 69 63 74 61 62 69 6c 69 74 ss predictabilit
0f70: 79 2c 20 73 69 6e 63 65 20 72 61 6e 64 28 29 20 y, since rand()
0f80: 69 73 0a 20 20 20 20 20 2a 20 6f 66 74 65 6e 20 is. * often
0f90: 70 6f 6f 72 6c 79 20 69 6d 70 6c 65 6d 65 6e 74 poorly implement
0fa0: 65 64 2e 0a 20 20 20 20 20 2a 2f 0a 20 20 20 20 ed.. */.
0fb0: 69 66 20 28 2b 2b 63 61 6c 6c 73 20 3d 3d 20 31 if (++calls == 1
0fc0: 29 0a 20 20 20 20 7b 0a 20 20 20 20 20 20 20 20 ). {.
0fd0: 73 72 61 6e 64 28 28 75 6e 73 69 67 6e 65 64 29 srand((unsigned)
0fe0: 28 74 69 6d 65 28 4e 55 4c 4c 29 20 5e 20 5a 43 (time(NULL) ^ ZC
0ff0: 52 5f 53 45 45 44 32 29 29 3b 0a 20 20 20 20 7d R_SEED2));. }
1000: 0a 20 20 20 20 69 6e 69 74 5f 6b 65 79 73 28 70 . init_keys(p
1010: 61 73 73 77 64 2c 20 70 6b 65 79 73 2c 20 70 63 asswd, pkeys, pc
1020: 72 63 5f 33 32 5f 74 61 62 29 3b 0a 20 20 20 20 rc_32_tab);.
1030: 66 6f 72 20 28 6e 20 3d 20 30 3b 20 6e 20 3c 20 for (n = 0; n <
1040: 52 41 4e 44 5f 48 45 41 44 5f 4c 45 4e 2d 32 3b RAND_HEAD_LEN-2;
1050: 20 6e 2b 2b 29 0a 20 20 20 20 7b 0a 20 20 20 20 n++). {.
1060: 20 20 20 20 63 20 3d 20 28 72 61 6e 64 28 29 20 c = (rand()
1070: 3e 3e 20 37 29 20 26 20 30 78 66 66 3b 0a 20 20 >> 7) & 0xff;.
1080: 20 20 20 20 20 20 68 65 61 64 65 72 5b 6e 5d 20 header[n]
1090: 3d 20 28 75 6e 73 69 67 6e 65 64 20 63 68 61 72 = (unsigned char
10a0: 29 7a 65 6e 63 6f 64 65 28 70 6b 65 79 73 2c 20 )zencode(pkeys,
10b0: 70 63 72 63 5f 33 32 5f 74 61 62 2c 20 63 2c 20 pcrc_32_tab, c,
10c0: 74 29 3b 0a 20 20 20 20 7d 0a 20 20 20 20 2f 2a t);. }. /*
10d0: 20 45 6e 63 72 79 70 74 20 72 61 6e 64 6f 6d 20 Encrypt random
10e0: 68 65 61 64 65 72 20 28 6c 61 73 74 20 74 77 6f header (last two
10f0: 20 62 79 74 65 73 20 69 73 20 68 69 67 68 20 77 bytes is high w
1100: 6f 72 64 20 6f 66 20 63 72 63 29 20 2a 2f 0a 20 ord of crc) */.
1110: 20 20 20 69 6e 69 74 5f 6b 65 79 73 28 70 61 73 init_keys(pas
1120: 73 77 64 2c 20 70 6b 65 79 73 2c 20 70 63 72 63 swd, pkeys, pcrc
1130: 5f 33 32 5f 74 61 62 29 3b 0a 20 20 20 20 66 6f _32_tab);. fo
1140: 72 20 28 6e 20 3d 20 30 3b 20 6e 20 3c 20 52 41 r (n = 0; n < RA
1150: 4e 44 5f 48 45 41 44 5f 4c 45 4e 2d 32 3b 20 6e ND_HEAD_LEN-2; n
1160: 2b 2b 29 0a 20 20 20 20 7b 0a 20 20 20 20 20 20 ++). {.
1170: 20 20 62 75 66 5b 6e 5d 20 3d 20 28 75 6e 73 69 buf[n] = (unsi
1180: 67 6e 65 64 20 63 68 61 72 29 7a 65 6e 63 6f 64 gned char)zencod
1190: 65 28 70 6b 65 79 73 2c 20 70 63 72 63 5f 33 32 e(pkeys, pcrc_32
11a0: 5f 74 61 62 2c 20 68 65 61 64 65 72 5b 6e 5d 2c _tab, header[n],
11b0: 20 74 29 3b 0a 20 20 20 20 7d 0a 20 20 20 20 62 t);. }. b
11c0: 75 66 5b 6e 2b 2b 5d 20 3d 20 28 75 6e 73 69 67 uf[n++] = (unsig
11d0: 6e 65 64 20 63 68 61 72 29 7a 65 6e 63 6f 64 65 ned char)zencode
11e0: 28 70 6b 65 79 73 2c 20 70 63 72 63 5f 33 32 5f (pkeys, pcrc_32_
11f0: 74 61 62 2c 20 28 69 6e 74 29 28 63 72 63 46 6f tab, (int)(crcFo
1200: 72 43 72 79 70 74 69 6e 67 20 3e 3e 20 31 36 29 rCrypting >> 16)
1210: 20 26 20 30 78 66 66 2c 20 74 29 3b 0a 20 20 20 & 0xff, t);.
1220: 20 62 75 66 5b 6e 2b 2b 5d 20 3d 20 28 75 6e 73 buf[n++] = (uns
1230: 69 67 6e 65 64 20 63 68 61 72 29 7a 65 6e 63 6f igned char)zenco
1240: 64 65 28 70 6b 65 79 73 2c 20 70 63 72 63 5f 33 de(pkeys, pcrc_3
1250: 32 5f 74 61 62 2c 20 28 69 6e 74 29 28 63 72 63 2_tab, (int)(crc
1260: 46 6f 72 43 72 79 70 74 69 6e 67 20 3e 3e 20 32 ForCrypting >> 2
1270: 34 29 20 26 20 30 78 66 66 2c 20 74 29 3b 0a 20 4) & 0xff, t);.
1280: 20 20 20 72 65 74 75 72 6e 20 6e 3b 0a 7d 0a 0a return n;.}..
1290: 23 65 6e 64 69 66 0a #endif.