0000: 2f 2a 0a 2a 2a 20 43 6f 70 79 72 69 67 68 74 20 /*.** Copyright
0010: 28 63 29 20 32 30 30 36 20 44 2e 20 52 69 63 68 (c) 2006 D. Rich
0020: 61 72 64 20 48 69 70 70 0a 2a 2a 0a 2a 2a 20 54 ard Hipp.**.** T
0030: 68 69 73 20 70 72 6f 67 72 61 6d 20 69 73 20 66 his program is f
0040: 72 65 65 20 73 6f 66 74 77 61 72 65 3b 20 79 6f ree software; yo
0050: 75 20 63 61 6e 20 72 65 64 69 73 74 72 69 62 75 u can redistribu
0060: 74 65 20 69 74 20 61 6e 64 2f 6f 72 0a 2a 2a 20 te it and/or.**
0070: 6d 6f 64 69 66 79 20 69 74 20 75 6e 64 65 72 20 modify it under
0080: 74 68 65 20 74 65 72 6d 73 20 6f 66 20 74 68 65 the terms of the
0090: 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 GNU General Pub
00a0: 6c 69 63 0a 2a 2a 20 4c 69 63 65 6e 73 65 20 76 lic.** License v
00b0: 65 72 73 69 6f 6e 20 32 20 61 73 20 70 75 62 6c ersion 2 as publ
00c0: 69 73 68 65 64 20 62 79 20 74 68 65 20 46 72 65 ished by the Fre
00d0: 65 20 53 6f 66 74 77 61 72 65 20 46 6f 75 6e 64 e Software Found
00e0: 61 74 69 6f 6e 2e 0a 2a 2a 0a 2a 2a 20 54 68 69 ation..**.** Thi
00f0: 73 20 70 72 6f 67 72 61 6d 20 69 73 20 64 69 73 s program is dis
0100: 74 72 69 62 75 74 65 64 20 69 6e 20 74 68 65 20 tributed in the
0110: 68 6f 70 65 20 74 68 61 74 20 69 74 20 77 69 6c hope that it wil
0120: 6c 20 62 65 20 75 73 65 66 75 6c 2c 0a 2a 2a 20 l be useful,.**
0130: 62 75 74 20 57 49 54 48 4f 55 54 20 41 4e 59 20 but WITHOUT ANY
0140: 57 41 52 52 41 4e 54 59 3b 20 77 69 74 68 6f 75 WARRANTY; withou
0150: 74 20 65 76 65 6e 20 74 68 65 20 69 6d 70 6c 69 t even the impli
0160: 65 64 20 77 61 72 72 61 6e 74 79 20 6f 66 0a 2a ed warranty of.*
0170: 2a 20 4d 45 52 43 48 41 4e 54 41 42 49 4c 49 54 * MERCHANTABILIT
0180: 59 20 6f 72 20 46 49 54 4e 45 53 53 20 46 4f 52 Y or FITNESS FOR
0190: 20 41 20 50 41 52 54 49 43 55 4c 41 52 20 50 55 A PARTICULAR PU
01a0: 52 50 4f 53 45 2e 20 20 53 65 65 20 74 68 65 20 RPOSE. See the
01b0: 47 4e 55 0a 2a 2a 20 47 65 6e 65 72 61 6c 20 50 GNU.** General P
01c0: 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 66 6f ublic License fo
01d0: 72 20 6d 6f 72 65 20 64 65 74 61 69 6c 73 2e 0a r more details..
01e0: 2a 2a 20 0a 2a 2a 20 59 6f 75 20 73 68 6f 75 6c ** .** You shoul
01f0: 64 20 68 61 76 65 20 72 65 63 65 69 76 65 64 20 d have received
0200: 61 20 63 6f 70 79 20 6f 66 20 74 68 65 20 47 4e a copy of the GN
0210: 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 U General Public
0220: 0a 2a 2a 20 4c 69 63 65 6e 73 65 20 61 6c 6f 6e .** License alon
0230: 67 20 77 69 74 68 20 74 68 69 73 20 6c 69 62 72 g with this libr
0240: 61 72 79 3b 20 69 66 20 6e 6f 74 2c 20 77 72 69 ary; if not, wri
0250: 74 65 20 74 6f 20 74 68 65 0a 2a 2a 20 46 72 65 te to the.** Fre
0260: 65 20 53 6f 66 74 77 61 72 65 20 46 6f 75 6e 64 e Software Found
0270: 61 74 69 6f 6e 2c 20 49 6e 63 2e 2c 20 35 39 20 ation, Inc., 59
0280: 54 65 6d 70 6c 65 20 50 6c 61 63 65 20 2d 20 53 Temple Place - S
0290: 75 69 74 65 20 33 33 30 2c 0a 2a 2a 20 42 6f 73 uite 330,.** Bos
02a0: 74 6f 6e 2c 20 4d 41 20 20 30 32 31 31 31 2d 31 ton, MA 02111-1
02b0: 33 30 37 2c 20 55 53 41 2e 0a 2a 2a 0a 2a 2a 20 307, USA..**.**
02c0: 41 75 74 68 6f 72 20 63 6f 6e 74 61 63 74 20 69 Author contact i
02d0: 6e 66 6f 72 6d 61 74 69 6f 6e 3a 0a 2a 2a 20 20 nformation:.**
02e0: 20 64 72 68 40 68 77 61 63 69 2e 63 6f 6d 0a 2a drh@hwaci.com.*
02f0: 2a 20 20 20 68 74 74 70 3a 2f 2f 77 77 77 2e 68 * http://www.h
0300: 77 61 63 69 2e 63 6f 6d 2f 64 72 68 2f 0a 2a 2a waci.com/drh/.**
0310: 0a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a .***************
0320: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0330: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0340: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0350: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0360: 0a 2a 2a 0a 2a 2a 20 41 20 42 6c 6f 62 20 69 73 .**.** A Blob is
0370: 20 61 20 76 61 72 69 61 62 6c 65 2d 6c 65 6e 67 a variable-leng
0380: 74 68 20 63 6f 6e 74 61 69 6e 65 72 73 20 66 6f th containers fo
0390: 72 20 61 72 62 69 74 72 61 72 79 20 73 74 72 69 r arbitrary stri
03a0: 6e 67 0a 2a 2a 20 6f 72 20 62 69 6e 61 72 79 20 ng.** or binary
03b0: 64 61 74 61 2e 0a 2a 2f 0a 23 69 6e 63 6c 75 64 data..*/.#includ
03c0: 65 20 22 63 6f 6e 66 69 67 2e 68 22 0a 23 69 6e e "config.h".#in
03d0: 63 6c 75 64 65 20 3c 7a 6c 69 62 2e 68 3e 0a 23 clude <zlib.h>.#
03e0: 69 6e 63 6c 75 64 65 20 22 62 6c 6f 62 2e 68 22 include "blob.h"
03f0: 0a 0a 23 69 66 20 49 4e 54 45 52 46 41 43 45 0a ..#if INTERFACE.
0400: 2f 2a 0a 2a 2a 20 41 20 42 6c 6f 62 20 63 61 6e /*.** A Blob can
0410: 20 68 6f 6c 64 20 61 20 73 74 72 69 6e 67 20 6f hold a string o
0420: 72 20 61 20 62 69 6e 61 72 79 20 6f 62 6a 65 63 r a binary objec
0430: 74 20 6f 66 20 61 72 62 69 74 72 61 72 79 20 73 t of arbitrary s
0440: 69 7a 65 2e 20 20 54 68 65 0a 2a 2a 20 73 69 7a ize. The.** siz
0450: 65 20 63 68 61 6e 67 65 73 20 61 73 20 6e 65 63 e changes as nec
0460: 65 73 73 61 72 79 2e 0a 2a 2f 0a 73 74 72 75 63 essary..*/.struc
0470: 74 20 42 6c 6f 62 20 7b 0a 20 20 75 6e 73 69 67 t Blob {. unsig
0480: 6e 65 64 20 69 6e 74 20 6e 55 73 65 64 3b 20 20 ned int nUsed;
0490: 20 20 20 20 20 20 20 20 20 20 2f 2a 20 4e 75 6d /* Num
04a0: 62 65 72 20 6f 66 20 62 79 74 65 73 20 75 73 65 ber of bytes use
04b0: 64 20 69 6e 20 61 44 61 74 61 5b 5d 20 2a 2f 0a d in aData[] */.
04c0: 20 20 75 6e 73 69 67 6e 65 64 20 69 6e 74 20 6e unsigned int n
04d0: 41 6c 6c 6f 63 3b 20 20 20 20 20 20 20 20 20 20 Alloc;
04e0: 20 2f 2a 20 4e 75 6d 62 65 72 20 6f 66 20 62 79 /* Number of by
04f0: 74 65 73 20 61 6c 6c 6f 63 61 74 65 64 20 66 6f tes allocated fo
0500: 72 20 61 44 61 74 61 5b 5d 20 2a 2f 0a 20 20 75 r aData[] */. u
0510: 6e 73 69 67 6e 65 64 20 69 6e 74 20 69 43 75 72 nsigned int iCur
0520: 73 6f 72 3b 20 20 20 20 20 20 20 20 20 20 2f 2a sor; /*
0530: 20 4e 65 78 74 20 63 68 61 72 61 63 74 65 72 20 Next character
0540: 6f 66 20 69 6e 70 75 74 20 74 6f 20 70 61 72 73 of input to pars
0550: 65 20 2a 2f 0a 20 20 63 68 61 72 20 2a 61 44 61 e */. char *aDa
0560: 74 61 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ta;
0570: 20 20 20 20 20 20 2f 2a 20 57 68 65 72 65 20 74 /* Where t
0580: 68 65 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 69 he information i
0590: 73 20 73 74 6f 72 65 64 20 2a 2f 0a 20 20 76 6f s stored */. vo
05a0: 69 64 20 28 2a 78 52 65 61 6c 6c 6f 63 29 28 42 id (*xRealloc)(B
05b0: 6c 6f 62 2a 2c 20 75 6e 73 69 67 6e 65 64 20 69 lob*, unsigned i
05c0: 6e 74 29 3b 20 2f 2a 20 46 75 6e 63 74 69 6f 6e nt); /* Function
05d0: 20 74 6f 20 72 65 61 6c 6c 6f 63 61 74 65 20 74 to reallocate t
05e0: 68 65 20 62 75 66 66 65 72 20 2a 2f 0a 7d 3b 0a he buffer */.};.
05f0: 0a 2f 2a 0a 2a 2a 20 54 68 65 20 63 75 72 72 65 ./*.** The curre
0600: 6e 74 20 73 69 7a 65 20 6f 66 20 61 20 42 6c 6f nt size of a Blo
0610: 62 0a 2a 2f 0a 23 64 65 66 69 6e 65 20 62 6c 6f b.*/.#define blo
0620: 62 5f 73 69 7a 65 28 58 29 20 20 28 28 58 29 2d b_size(X) ((X)-
0630: 3e 6e 55 73 65 64 29 0a 0a 2f 2a 0a 2a 2a 20 54 >nUsed)../*.** T
0640: 68 65 20 62 75 66 66 65 72 20 68 6f 6c 64 69 6e he buffer holdin
0650: 67 20 74 68 65 20 62 6c 6f 62 20 64 61 74 61 0a g the blob data.
0660: 2a 2f 0a 23 64 65 66 69 6e 65 20 62 6c 6f 62 5f */.#define blob_
0670: 62 75 66 66 65 72 28 58 29 20 20 28 28 58 29 2d buffer(X) ((X)-
0680: 3e 61 44 61 74 61 29 0a 0a 2f 2a 0a 2a 2a 20 53 >aData)../*.** S
0690: 65 65 6b 20 77 68 65 6e 63 65 20 70 61 72 61 6d eek whence param
06a0: 65 74 65 72 20 76 61 6c 75 65 73 0a 2a 2f 0a 23 eter values.*/.#
06b0: 64 65 66 69 6e 65 20 42 4c 4f 42 5f 53 45 45 4b define BLOB_SEEK
06c0: 5f 53 45 54 20 31 0a 23 64 65 66 69 6e 65 20 42 _SET 1.#define B
06d0: 4c 4f 42 5f 53 45 45 4b 5f 43 55 52 20 32 0a 23 LOB_SEEK_CUR 2.#
06e0: 64 65 66 69 6e 65 20 42 4c 4f 42 5f 53 45 45 4b define BLOB_SEEK
06f0: 5f 45 4e 44 20 33 0a 0a 23 65 6e 64 69 66 20 2f _END 3..#endif /
0700: 2a 20 49 4e 54 45 52 46 41 43 45 20 2a 2f 0a 0a * INTERFACE */..
0710: 2f 2a 0a 2a 2a 20 4d 61 6b 65 20 73 75 72 65 20 /*.** Make sure
0720: 61 20 62 6c 6f 62 20 69 73 20 69 6e 69 74 69 61 a blob is initia
0730: 6c 69 7a 65 64 0a 2a 2f 0a 23 64 65 66 69 6e 65 lized.*/.#define
0740: 20 62 6c 6f 62 5f 69 73 5f 69 6e 69 74 28 78 29 blob_is_init(x)
0750: 20 5c 0a 20 20 61 73 73 65 72 74 28 28 78 29 2d \. assert((x)-
0760: 3e 78 52 65 61 6c 6c 6f 63 3d 3d 62 6c 6f 62 52 >xRealloc==blobR
0770: 65 61 6c 6c 6f 63 4d 61 6c 6c 6f 63 20 7c 7c 20 eallocMalloc ||
0780: 28 78 29 2d 3e 78 52 65 61 6c 6c 6f 63 3d 3d 62 (x)->xRealloc==b
0790: 6c 6f 62 52 65 61 6c 6c 6f 63 53 74 61 74 69 63 lobReallocStatic
07a0: 29 0a 0a 2f 2a 0a 2a 2a 20 4d 61 6b 65 20 73 75 )../*.** Make su
07b0: 72 65 20 61 20 62 6c 6f 62 20 64 6f 65 73 20 6e re a blob does n
07c0: 6f 74 20 63 6f 6e 74 61 69 6e 20 6d 61 6c 6c 6f ot contain mallo
07d0: 63 65 64 20 6d 65 6d 6f 72 79 2e 0a 2a 2f 0a 23 ced memory..*/.#
07e0: 69 66 20 30 20 20 2f 2a 20 45 6e 61 62 6c 65 20 if 0 /* Enable
07f0: 66 6f 72 20 64 65 62 75 67 67 69 6e 67 20 6f 6e for debugging on
0800: 6c 79 20 2a 2f 0a 23 64 65 66 69 6e 65 20 62 6c ly */.#define bl
0810: 6f 62 5f 69 73 5f 72 65 73 65 74 28 78 29 20 5c ob_is_reset(x) \
0820: 0a 20 20 61 73 73 65 72 74 28 28 78 29 2d 3e 78 . assert((x)->x
0830: 52 65 61 6c 6c 6f 63 21 3d 62 6c 6f 62 52 65 61 Realloc!=blobRea
0840: 6c 6c 6f 63 4d 61 6c 6c 6f 63 20 7c 7c 20 28 78 llocMalloc || (x
0850: 29 2d 3e 6e 41 6c 6c 6f 63 3d 3d 30 29 0a 23 65 )->nAlloc==0).#e
0860: 6c 73 65 0a 23 64 65 66 69 6e 65 20 62 6c 6f 62 lse.#define blob
0870: 5f 69 73 5f 72 65 73 65 74 28 78 29 0a 23 65 6e _is_reset(x).#en
0880: 64 69 66 0a 0a 2f 2a 0a 2a 2a 20 57 65 20 66 69 dif../*.** We fi
0890: 6e 64 20 74 68 61 74 20 74 68 65 20 62 75 69 6c nd that the buil
08a0: 74 2d 69 6e 20 69 73 73 70 61 63 65 28 29 20 66 t-in isspace() f
08b0: 75 6e 63 74 69 6f 6e 20 64 6f 65 73 20 6e 6f 74 unction does not
08c0: 20 77 6f 72 6b 20 66 6f 72 0a 2a 2a 20 73 6f 6d work for.** som
08d0: 65 20 69 6e 74 65 72 6e 61 74 69 6f 6e 61 6c 20 e international
08e0: 63 68 61 72 61 63 74 65 72 20 73 65 74 73 2e 20 character sets.
08f0: 20 53 6f 20 68 65 72 65 20 69 73 20 61 20 73 75 So here is a su
0900: 62 73 74 69 74 75 74 65 2e 0a 2a 2f 0a 73 74 61 bstitute..*/.sta
0910: 74 69 63 20 69 6e 74 20 62 6c 6f 62 5f 69 73 73 tic int blob_iss
0920: 70 61 63 65 28 63 68 61 72 20 63 29 7b 0a 20 20 pace(char c){.
0930: 72 65 74 75 72 6e 20 63 3d 3d 27 20 27 20 7c 7c return c==' ' ||
0940: 20 28 63 3c 3d 27 5c 72 27 20 26 26 20 63 3e 3d (c<='\r' && c>=
0950: 27 5c 74 27 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 '\t');.}../*.**
0960: 43 4f 4d 4d 41 4e 44 3a 20 74 65 73 74 2d 69 73 COMMAND: test-is
0970: 73 70 61 63 65 0a 2a 2f 0a 76 6f 69 64 20 69 73 space.*/.void is
0980: 73 70 61 63 65 5f 63 6d 64 28 76 6f 69 64 29 7b space_cmd(void){
0990: 0a 20 20 69 6e 74 20 69 3b 0a 20 20 66 6f 72 28 . int i;. for(
09a0: 69 3d 30 3b 20 69 3c 3d 32 35 35 3b 20 69 2b 2b i=0; i<=255; i++
09b0: 29 7b 0a 20 20 20 20 69 66 28 20 69 3d 3d 27 20 ){. if( i=='
09c0: 27 20 7c 7c 20 69 3d 3d 27 5c 6e 27 20 7c 7c 20 ' || i=='\n' ||
09d0: 69 3d 3d 27 5c 74 27 20 7c 7c 20 69 3d 3d 27 5c i=='\t' || i=='\
09e0: 76 27 0a 20 20 20 20 20 20 20 20 7c 7c 20 69 3d v'. || i=
09f0: 3d 27 5c 66 27 20 7c 7c 20 69 3d 3d 27 5c 72 27 ='\f' || i=='\r'
0a00: 20 29 7b 0a 20 20 20 20 20 20 61 73 73 65 72 74 ){. assert
0a10: 28 20 62 6c 6f 62 5f 69 73 73 70 61 63 65 28 28 ( blob_isspace((
0a20: 63 68 61 72 29 69 29 20 29 3b 0a 20 20 20 20 7d char)i) );. }
0a30: 65 6c 73 65 7b 0a 20 20 20 20 20 20 61 73 73 65 else{. asse
0a40: 72 74 28 20 21 62 6c 6f 62 5f 69 73 73 70 61 63 rt( !blob_isspac
0a50: 65 28 28 63 68 61 72 29 69 29 20 29 3b 0a 20 20 e((char)i) );.
0a60: 20 20 7d 0a 20 20 7d 0a 20 20 70 72 69 6e 74 66 }. }. printf
0a70: 28 22 41 6c 6c 20 32 35 36 20 63 68 61 72 61 63 ("All 256 charac
0a80: 74 65 72 73 20 4f 4b 5c 6e 22 29 3b 0a 7d 0a 0a ters OK\n");.}..
0a90: 2f 2a 0a 2a 2a 20 54 68 69 73 20 72 6f 75 74 69 /*.** This routi
0aa0: 6e 65 20 69 73 20 63 61 6c 6c 65 64 20 69 66 20 ne is called if
0ab0: 61 20 62 6c 6f 62 20 6f 70 65 72 61 74 69 6f 6e a blob operation
0ac0: 20 66 61 69 6c 73 20 62 65 63 61 75 73 65 20 77 fails because w
0ad0: 65 0a 2a 2a 20 68 61 76 65 20 72 75 6e 20 6f 75 e.** have run ou
0ae0: 74 20 6f 66 20 6d 65 6d 6f 72 79 2e 0a 2a 2f 0a t of memory..*/.
0af0: 73 74 61 74 69 63 20 76 6f 69 64 20 62 6c 6f 62 static void blob
0b00: 5f 70 61 6e 69 63 28 76 6f 69 64 29 7b 0a 20 20 _panic(void){.
0b10: 73 74 61 74 69 63 20 63 6f 6e 73 74 20 63 68 61 static const cha
0b20: 72 20 7a 45 72 72 4d 73 67 5b 5d 20 3d 20 22 6f r zErrMsg[] = "o
0b30: 75 74 20 6f 66 20 6d 65 6d 6f 72 79 5c 6e 22 3b ut of memory\n";
0b40: 0a 20 20 77 72 69 74 65 28 32 2c 20 7a 45 72 72 . write(2, zErr
0b50: 4d 73 67 2c 20 73 69 7a 65 6f 66 28 7a 45 72 72 Msg, sizeof(zErr
0b60: 4d 73 67 29 2d 31 29 3b 0a 20 20 65 78 69 74 28 Msg)-1);. exit(
0b70: 31 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 41 20 72 1);.}../*.** A r
0b80: 65 61 6c 6c 6f 63 61 74 69 6f 6e 20 66 75 6e 63 eallocation func
0b90: 74 69 6f 6e 20 74 68 61 74 20 61 73 73 75 6d 65 tion that assume
0ba0: 73 20 74 68 61 74 20 61 44 61 74 61 20 63 61 6d s that aData cam
0bb0: 65 20 66 72 6f 6d 20 6d 61 6c 6c 6f 63 28 29 2e e from malloc().
0bc0: 0a 2a 2a 20 54 68 69 73 20 66 75 6e 63 74 69 6f .** This functio
0bd0: 6e 20 61 74 74 65 6d 70 74 73 20 74 6f 20 72 65 n attempts to re
0be0: 73 69 7a 65 20 74 68 65 20 62 75 66 66 65 72 20 size the buffer
0bf0: 6f 66 20 74 68 65 20 62 6c 6f 62 20 74 6f 20 68 of the blob to h
0c00: 6f 6c 64 0a 2a 2a 20 6e 65 77 53 69 7a 65 20 62 old.** newSize b
0c10: 79 74 65 73 2e 20 20 0a 2a 2a 0a 2a 2a 20 4e 6f ytes. .**.** No
0c20: 20 61 74 74 65 6d 70 74 20 69 73 20 6d 61 64 65 attempt is made
0c30: 20 74 6f 20 72 65 63 6f 76 65 72 20 66 72 6f 6d to recover from
0c40: 20 61 6e 20 6f 75 74 2d 6f 66 2d 6d 65 6d 6f 72 an out-of-memor
0c50: 79 20 65 72 72 6f 72 2e 0a 2a 2a 20 49 66 20 61 y error..** If a
0c60: 6e 20 4f 4f 4d 20 65 72 72 6f 72 20 6f 63 63 75 n OOM error occu
0c70: 72 73 2c 20 61 6e 20 65 72 72 6f 72 20 6d 65 73 rs, an error mes
0c80: 73 61 67 65 20 69 73 20 70 72 69 6e 74 65 64 20 sage is printed
0c90: 6f 6e 20 73 74 64 65 72 72 0a 2a 2a 20 61 6e 64 on stderr.** and
0ca0: 20 74 68 65 20 70 72 6f 67 72 61 6d 20 65 78 69 the program exi
0cb0: 74 73 2e 0a 2a 2f 0a 76 6f 69 64 20 62 6c 6f 62 ts..*/.void blob
0cc0: 52 65 61 6c 6c 6f 63 4d 61 6c 6c 6f 63 28 42 6c ReallocMalloc(Bl
0cd0: 6f 62 20 2a 70 42 6c 6f 62 2c 20 75 6e 73 69 67 ob *pBlob, unsig
0ce0: 6e 65 64 20 69 6e 74 20 6e 65 77 53 69 7a 65 29 ned int newSize)
0cf0: 7b 0a 20 20 69 66 28 20 6e 65 77 53 69 7a 65 3d {. if( newSize=
0d00: 3d 30 20 29 7b 0a 20 20 20 20 66 72 65 65 28 70 =0 ){. free(p
0d10: 42 6c 6f 62 2d 3e 61 44 61 74 61 29 3b 0a 20 20 Blob->aData);.
0d20: 20 20 70 42 6c 6f 62 2d 3e 61 44 61 74 61 20 3d pBlob->aData =
0d30: 20 30 3b 0a 20 20 20 20 70 42 6c 6f 62 2d 3e 6e 0;. pBlob->n
0d40: 41 6c 6c 6f 63 20 3d 20 30 3b 0a 20 20 20 20 70 Alloc = 0;. p
0d50: 42 6c 6f 62 2d 3e 6e 55 73 65 64 20 3d 20 30 3b Blob->nUsed = 0;
0d60: 0a 20 20 20 20 70 42 6c 6f 62 2d 3e 69 43 75 72 . pBlob->iCur
0d70: 73 6f 72 20 3d 20 30 3b 0a 20 20 7d 65 6c 73 65 sor = 0;. }else
0d80: 20 69 66 28 20 6e 65 77 53 69 7a 65 3e 70 42 6c if( newSize>pBl
0d90: 6f 62 2d 3e 6e 41 6c 6c 6f 63 20 7c 7c 20 6e 65 ob->nAlloc || ne
0da0: 77 53 69 7a 65 3c 70 42 6c 6f 62 2d 3e 6e 41 6c wSize<pBlob->nAl
0db0: 6c 6f 63 2d 34 30 30 30 20 29 7b 0a 20 20 20 20 loc-4000 ){.
0dc0: 63 68 61 72 20 2a 70 4e 65 77 20 3d 20 72 65 61 char *pNew = rea
0dd0: 6c 6c 6f 63 28 70 42 6c 6f 62 2d 3e 61 44 61 74 lloc(pBlob->aDat
0de0: 61 2c 20 6e 65 77 53 69 7a 65 29 3b 0a 20 20 20 a, newSize);.
0df0: 20 69 66 28 20 70 4e 65 77 3d 3d 30 20 29 20 62 if( pNew==0 ) b
0e00: 6c 6f 62 5f 70 61 6e 69 63 28 29 3b 0a 20 20 20 lob_panic();.
0e10: 20 70 42 6c 6f 62 2d 3e 61 44 61 74 61 20 3d 20 pBlob->aData =
0e20: 70 4e 65 77 3b 0a 20 20 20 20 70 42 6c 6f 62 2d pNew;. pBlob-
0e30: 3e 6e 41 6c 6c 6f 63 20 3d 20 6e 65 77 53 69 7a >nAlloc = newSiz
0e40: 65 3b 0a 20 20 20 20 69 66 28 20 70 42 6c 6f 62 e;. if( pBlob
0e50: 2d 3e 6e 55 73 65 64 3e 70 42 6c 6f 62 2d 3e 6e ->nUsed>pBlob->n
0e60: 41 6c 6c 6f 63 20 29 7b 0a 20 20 20 20 20 20 70 Alloc ){. p
0e70: 42 6c 6f 62 2d 3e 6e 55 73 65 64 20 3d 20 70 42 Blob->nUsed = pB
0e80: 6c 6f 62 2d 3e 6e 41 6c 6c 6f 63 3b 0a 20 20 20 lob->nAlloc;.
0e90: 20 7d 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 }. }.}../*.**
0ea0: 41 6e 20 69 6e 69 74 69 61 6c 69 7a 65 72 20 66 An initializer f
0eb0: 6f 72 20 42 6c 6f 62 73 0a 2a 2f 0a 23 69 66 20 or Blobs.*/.#if
0ec0: 49 4e 54 45 52 46 41 43 45 0a 23 64 65 66 69 6e INTERFACE.#defin
0ed0: 65 20 42 4c 4f 42 5f 49 4e 49 54 49 41 4c 49 5a e BLOB_INITIALIZ
0ee0: 45 52 20 20 7b 30 2c 30 2c 30 2c 30 2c 62 6c 6f ER {0,0,0,0,blo
0ef0: 62 52 65 61 6c 6c 6f 63 4d 61 6c 6c 6f 63 7d 0a bReallocMalloc}.
0f00: 23 65 6e 64 69 66 0a 63 6f 6e 73 74 20 42 6c 6f #endif.const Blo
0f10: 62 20 65 6d 70 74 79 5f 62 6c 6f 62 20 3d 20 42 b empty_blob = B
0f20: 4c 4f 42 5f 49 4e 49 54 49 41 4c 49 5a 45 52 3b LOB_INITIALIZER;
0f30: 0a 0a 2f 2a 0a 2a 2a 20 41 20 72 65 61 6c 6c 6f ../*.** A reallo
0f40: 63 61 74 69 6f 6e 20 66 75 6e 63 74 69 6f 6e 20 cation function
0f50: 66 6f 72 20 77 68 65 6e 20 74 68 65 20 69 6e 69 for when the ini
0f60: 74 69 61 6c 20 73 74 72 69 6e 67 20 69 73 20 69 tial string is i
0f70: 6e 20 75 6e 6d 61 6e 61 67 65 64 0a 2a 2a 20 73 n unmanaged.** s
0f80: 70 61 63 65 2e 20 20 43 6f 70 79 20 74 68 65 20 pace. Copy the
0f90: 73 74 72 69 6e 67 20 74 6f 20 6d 65 6d 6f 72 79 string to memory
0fa0: 20 6f 62 74 61 69 6e 65 64 20 66 72 6f 6d 20 6d obtained from m
0fb0: 61 6c 6c 6f 63 28 29 2e 0a 2a 2f 0a 73 74 61 74 alloc()..*/.stat
0fc0: 69 63 20 76 6f 69 64 20 62 6c 6f 62 52 65 61 6c ic void blobReal
0fd0: 6c 6f 63 53 74 61 74 69 63 28 42 6c 6f 62 20 2a locStatic(Blob *
0fe0: 70 42 6c 6f 62 2c 20 75 6e 73 69 67 6e 65 64 20 pBlob, unsigned
0ff0: 69 6e 74 20 6e 65 77 53 69 7a 65 29 7b 0a 20 20 int newSize){.
1000: 69 66 28 20 6e 65 77 53 69 7a 65 3d 3d 30 20 29 if( newSize==0 )
1010: 7b 0a 20 20 20 20 2a 70 42 6c 6f 62 20 3d 20 65 {. *pBlob = e
1020: 6d 70 74 79 5f 62 6c 6f 62 3b 0a 20 20 7d 65 6c mpty_blob;. }el
1030: 73 65 7b 0a 20 20 20 20 63 68 61 72 20 2a 70 4e se{. char *pN
1040: 65 77 20 3d 20 6d 61 6c 6c 6f 63 28 20 6e 65 77 ew = malloc( new
1050: 53 69 7a 65 20 29 3b 0a 20 20 20 20 69 66 28 20 Size );. if(
1060: 70 4e 65 77 3d 3d 30 20 29 20 62 6c 6f 62 5f 70 pNew==0 ) blob_p
1070: 61 6e 69 63 28 29 3b 0a 20 20 20 20 69 66 28 20 anic();. if(
1080: 70 42 6c 6f 62 2d 3e 6e 55 73 65 64 3e 6e 65 77 pBlob->nUsed>new
1090: 53 69 7a 65 20 29 20 70 42 6c 6f 62 2d 3e 6e 55 Size ) pBlob->nU
10a0: 73 65 64 20 3d 20 6e 65 77 53 69 7a 65 3b 0a 20 sed = newSize;.
10b0: 20 20 20 6d 65 6d 63 70 79 28 70 4e 65 77 2c 20 memcpy(pNew,
10c0: 70 42 6c 6f 62 2d 3e 61 44 61 74 61 2c 20 70 42 pBlob->aData, pB
10d0: 6c 6f 62 2d 3e 6e 55 73 65 64 29 3b 0a 20 20 20 lob->nUsed);.
10e0: 20 70 42 6c 6f 62 2d 3e 61 44 61 74 61 20 3d 20 pBlob->aData =
10f0: 70 4e 65 77 3b 0a 20 20 20 20 70 42 6c 6f 62 2d pNew;. pBlob-
1100: 3e 78 52 65 61 6c 6c 6f 63 20 3d 20 62 6c 6f 62 >xRealloc = blob
1110: 52 65 61 6c 6c 6f 63 4d 61 6c 6c 6f 63 3b 0a 20 ReallocMalloc;.
1120: 20 20 20 70 42 6c 6f 62 2d 3e 6e 41 6c 6c 6f 63 pBlob->nAlloc
1130: 20 3d 20 6e 65 77 53 69 7a 65 3b 0a 20 20 7d 0a = newSize;. }.
1140: 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65 73 65 74 20 61 }../*.** Reset a
1150: 20 62 6c 6f 62 20 74 6f 20 62 65 20 61 6e 20 65 blob to be an e
1160: 6d 70 74 79 20 63 6f 6e 74 61 69 6e 65 72 2e 0a mpty container..
1170: 2a 2f 0a 76 6f 69 64 20 62 6c 6f 62 5f 72 65 73 */.void blob_res
1180: 65 74 28 42 6c 6f 62 20 2a 70 42 6c 6f 62 29 7b et(Blob *pBlob){
1190: 0a 20 20 62 6c 6f 62 5f 69 73 5f 69 6e 69 74 28 . blob_is_init(
11a0: 70 42 6c 6f 62 29 3b 0a 20 20 70 42 6c 6f 62 2d pBlob);. pBlob-
11b0: 3e 78 52 65 61 6c 6c 6f 63 28 70 42 6c 6f 62 2c >xRealloc(pBlob,
11c0: 20 30 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6e 0);.}../*.** In
11d0: 69 74 69 61 6c 69 7a 65 20 61 20 62 6c 6f 62 20 itialize a blob
11e0: 74 6f 20 61 20 73 74 72 69 6e 67 20 6f 72 20 62 to a string or b
11f0: 79 74 65 2d 61 72 72 61 79 20 63 6f 6e 73 74 61 yte-array consta
1200: 6e 74 20 6f 66 20 61 20 73 70 65 63 69 66 69 65 nt of a specifie
1210: 64 20 6c 65 6e 67 74 68 2e 0a 2a 2a 20 41 6e 79 d length..** Any
1220: 20 70 72 69 6f 72 20 64 61 74 61 20 69 6e 20 74 prior data in t
1230: 68 65 20 62 6c 6f 62 20 69 73 20 64 69 73 63 61 he blob is disca
1240: 72 64 65 64 2e 0a 2a 2f 0a 76 6f 69 64 20 62 6c rded..*/.void bl
1250: 6f 62 5f 69 6e 69 74 28 42 6c 6f 62 20 2a 70 42 ob_init(Blob *pB
1260: 6c 6f 62 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 lob, const char
1270: 2a 7a 44 61 74 61 2c 20 69 6e 74 20 73 69 7a 65 *zData, int size
1280: 29 7b 0a 20 20 62 6c 6f 62 5f 69 73 5f 72 65 73 ){. blob_is_res
1290: 65 74 28 70 42 6c 6f 62 29 3b 0a 20 20 69 66 28 et(pBlob);. if(
12a0: 20 7a 44 61 74 61 3d 3d 30 20 29 7b 0a 20 20 20 zData==0 ){.
12b0: 20 2a 70 42 6c 6f 62 20 3d 20 65 6d 70 74 79 5f *pBlob = empty_
12c0: 62 6c 6f 62 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 blob;. }else{.
12d0: 20 20 20 69 66 28 20 73 69 7a 65 3c 3d 30 20 29 if( size<=0 )
12e0: 20 73 69 7a 65 20 3d 20 73 74 72 6c 65 6e 28 7a size = strlen(z
12f0: 44 61 74 61 29 3b 0a 20 20 20 20 70 42 6c 6f 62 Data);. pBlob
1300: 2d 3e 6e 55 73 65 64 20 3d 20 70 42 6c 6f 62 2d ->nUsed = pBlob-
1310: 3e 6e 41 6c 6c 6f 63 20 3d 20 73 69 7a 65 3b 0a >nAlloc = size;.
1320: 20 20 20 20 70 42 6c 6f 62 2d 3e 61 44 61 74 61 pBlob->aData
1330: 20 3d 20 28 63 68 61 72 2a 29 7a 44 61 74 61 3b = (char*)zData;
1340: 0a 20 20 20 20 70 42 6c 6f 62 2d 3e 69 43 75 72 . pBlob->iCur
1350: 73 6f 72 20 3d 20 30 3b 0a 20 20 20 20 70 42 6c sor = 0;. pBl
1360: 6f 62 2d 3e 78 52 65 61 6c 6c 6f 63 20 3d 20 62 ob->xRealloc = b
1370: 6c 6f 62 52 65 61 6c 6c 6f 63 53 74 61 74 69 63 lobReallocStatic
1380: 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 ;. }.}../*.** I
1390: 6e 69 74 69 61 6c 69 7a 65 20 61 20 62 6c 6f 62 nitialize a blob
13a0: 20 74 6f 20 61 20 6e 75 6c 2d 74 65 72 6d 69 6e to a nul-termin
13b0: 61 74 65 64 20 73 74 72 69 6e 67 2e 0a 2a 2a 20 ated string..**
13c0: 41 6e 79 20 70 72 69 6f 72 20 64 61 74 61 20 69 Any prior data i
13d0: 6e 20 74 68 65 20 62 6c 6f 62 20 69 73 20 64 69 n the blob is di
13e0: 73 63 61 72 64 65 64 2e 0a 2a 2f 0a 76 6f 69 64 scarded..*/.void
13f0: 20 62 6c 6f 62 5f 73 65 74 28 42 6c 6f 62 20 2a blob_set(Blob *
1400: 70 42 6c 6f 62 2c 20 63 6f 6e 73 74 20 63 68 61 pBlob, const cha
1410: 72 20 2a 7a 53 74 72 29 7b 0a 20 20 62 6c 6f 62 r *zStr){. blob
1420: 5f 69 6e 69 74 28 70 42 6c 6f 62 2c 20 7a 53 74 _init(pBlob, zSt
1430: 72 2c 20 2d 31 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a r, -1);.}../*.**
1440: 20 49 6e 69 74 69 61 6c 69 7a 65 20 61 20 62 6c Initialize a bl
1450: 6f 62 20 74 6f 20 61 6e 20 65 6d 70 74 79 20 73 ob to an empty s
1460: 74 72 69 6e 67 2e 0a 2a 2f 0a 76 6f 69 64 20 62 tring..*/.void b
1470: 6c 6f 62 5f 7a 65 72 6f 28 42 6c 6f 62 20 2a 70 lob_zero(Blob *p
1480: 42 6c 6f 62 29 7b 0a 20 20 73 74 61 74 69 63 20 Blob){. static
1490: 63 6f 6e 73 74 20 63 68 61 72 20 7a 45 6d 70 74 const char zEmpt
14a0: 79 5b 5d 20 3d 20 22 22 3b 0a 20 20 62 6c 6f 62 y[] = "";. blob
14b0: 5f 69 73 5f 72 65 73 65 74 28 70 42 6c 6f 62 29 _is_reset(pBlob)
14c0: 3b 0a 20 20 70 42 6c 6f 62 2d 3e 6e 55 73 65 64 ;. pBlob->nUsed
14d0: 20 3d 20 30 3b 0a 20 20 70 42 6c 6f 62 2d 3e 6e = 0;. pBlob->n
14e0: 41 6c 6c 6f 63 20 3d 20 31 3b 0a 20 20 70 42 6c Alloc = 1;. pBl
14f0: 6f 62 2d 3e 61 44 61 74 61 20 3d 20 28 63 68 61 ob->aData = (cha
1500: 72 2a 29 7a 45 6d 70 74 79 3b 0a 20 20 70 42 6c r*)zEmpty;. pBl
1510: 6f 62 2d 3e 69 43 75 72 73 6f 72 20 3d 20 30 3b ob->iCursor = 0;
1520: 0a 20 20 70 42 6c 6f 62 2d 3e 78 52 65 61 6c 6c . pBlob->xReall
1530: 6f 63 20 3d 20 62 6c 6f 62 52 65 61 6c 6c 6f 63 oc = blobRealloc
1540: 53 74 61 74 69 63 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a Static;.}../*.**
1550: 20 41 70 70 65 6e 64 20 74 65 78 74 20 6f 72 20 Append text or
1560: 64 61 74 61 20 74 6f 20 74 68 65 20 65 6e 64 20 data to the end
1570: 6f 66 20 61 20 62 6c 6f 62 2e 0a 2a 2f 0a 76 6f of a blob..*/.vo
1580: 69 64 20 62 6c 6f 62 5f 61 70 70 65 6e 64 28 42 id blob_append(B
1590: 6c 6f 62 20 2a 70 42 6c 6f 62 2c 20 63 6f 6e 73 lob *pBlob, cons
15a0: 74 20 63 68 61 72 20 2a 61 44 61 74 61 2c 20 69 t char *aData, i
15b0: 6e 74 20 6e 44 61 74 61 29 7b 0a 20 20 62 6c 6f nt nData){. blo
15c0: 62 5f 69 73 5f 69 6e 69 74 28 70 42 6c 6f 62 29 b_is_init(pBlob)
15d0: 3b 0a 20 20 69 66 28 20 6e 44 61 74 61 3c 30 20 ;. if( nData<0
15e0: 29 20 6e 44 61 74 61 20 3d 20 73 74 72 6c 65 6e ) nData = strlen
15f0: 28 61 44 61 74 61 29 3b 0a 20 20 69 66 28 20 6e (aData);. if( n
1600: 44 61 74 61 3d 3d 30 20 29 20 72 65 74 75 72 6e Data==0 ) return
1610: 3b 0a 20 20 69 66 28 20 70 42 6c 6f 62 2d 3e 6e ;. if( pBlob->n
1620: 55 73 65 64 20 2b 20 6e 44 61 74 61 20 3e 3d 20 Used + nData >=
1630: 70 42 6c 6f 62 2d 3e 6e 41 6c 6c 6f 63 20 29 7b pBlob->nAlloc ){
1640: 0a 20 20 20 20 70 42 6c 6f 62 2d 3e 78 52 65 61 . pBlob->xRea
1650: 6c 6c 6f 63 28 70 42 6c 6f 62 2c 20 70 42 6c 6f lloc(pBlob, pBlo
1660: 62 2d 3e 6e 55 73 65 64 20 2b 20 6e 44 61 74 61 b->nUsed + nData
1670: 20 2b 20 70 42 6c 6f 62 2d 3e 6e 41 6c 6c 6f 63 + pBlob->nAlloc
1680: 20 2b 20 31 30 30 29 3b 0a 20 20 20 20 69 66 28 + 100);. if(
1690: 20 70 42 6c 6f 62 2d 3e 6e 55 73 65 64 20 2b 20 pBlob->nUsed +
16a0: 6e 44 61 74 61 20 3e 3d 20 70 42 6c 6f 62 2d 3e nData >= pBlob->
16b0: 6e 41 6c 6c 6f 63 20 29 7b 0a 20 20 20 20 20 20 nAlloc ){.
16c0: 62 6c 6f 62 5f 70 61 6e 69 63 28 29 3b 0a 20 20 blob_panic();.
16d0: 20 20 7d 0a 20 20 7d 0a 20 20 6d 65 6d 63 70 79 }. }. memcpy
16e0: 28 26 70 42 6c 6f 62 2d 3e 61 44 61 74 61 5b 70 (&pBlob->aData[p
16f0: 42 6c 6f 62 2d 3e 6e 55 73 65 64 5d 2c 20 61 44 Blob->nUsed], aD
1700: 61 74 61 2c 20 6e 44 61 74 61 29 3b 0a 20 20 70 ata, nData);. p
1710: 42 6c 6f 62 2d 3e 6e 55 73 65 64 20 2b 3d 20 6e Blob->nUsed += n
1720: 44 61 74 61 3b 0a 20 20 70 42 6c 6f 62 2d 3e 61 Data;. pBlob->a
1730: 44 61 74 61 5b 70 42 6c 6f 62 2d 3e 6e 55 73 65 Data[pBlob->nUse
1740: 64 5d 20 3d 20 30 3b 20 20 20 2f 2a 20 42 6c 6f d] = 0; /* Blo
1750: 62 73 20 61 72 65 20 61 6c 77 61 79 73 20 6e 75 bs are always nu
1760: 6c 2d 74 65 72 6d 69 6e 61 74 65 64 20 2a 2f 0a l-terminated */.
1770: 7d 0a 0a 2f 2a 0a 2a 2a 20 43 6f 70 79 20 61 20 }../*.** Copy a
1780: 62 6c 6f 62 0a 2a 2f 0a 76 6f 69 64 20 62 6c 6f blob.*/.void blo
1790: 62 5f 63 6f 70 79 28 42 6c 6f 62 20 2a 70 54 6f b_copy(Blob *pTo
17a0: 2c 20 42 6c 6f 62 20 2a 70 46 72 6f 6d 29 7b 0a , Blob *pFrom){.
17b0: 20 20 62 6c 6f 62 5f 69 73 5f 69 6e 69 74 28 70 blob_is_init(p
17c0: 46 72 6f 6d 29 3b 0a 20 20 62 6c 6f 62 5f 7a 65 From);. blob_ze
17d0: 72 6f 28 70 54 6f 29 3b 0a 20 20 62 6c 6f 62 5f ro(pTo);. blob_
17e0: 61 70 70 65 6e 64 28 70 54 6f 2c 20 62 6c 6f 62 append(pTo, blob
17f0: 5f 62 75 66 66 65 72 28 70 46 72 6f 6d 29 2c 20 _buffer(pFrom),
1800: 62 6c 6f 62 5f 73 69 7a 65 28 70 46 72 6f 6d 29 blob_size(pFrom)
1810: 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65 74 75 );.}../*.** Retu
1820: 72 6e 20 61 20 70 6f 69 6e 74 65 72 20 74 6f 20 rn a pointer to
1830: 61 20 6e 75 6c 6c 2d 74 65 72 6d 69 6e 61 74 65 a null-terminate
1840: 64 20 73 74 72 69 6e 67 20 66 6f 72 20 61 20 62 d string for a b
1850: 6c 6f 62 2e 0a 2a 2f 0a 63 68 61 72 20 2a 62 6c lob..*/.char *bl
1860: 6f 62 5f 73 74 72 28 42 6c 6f 62 20 2a 70 29 7b ob_str(Blob *p){
1870: 0a 20 20 62 6c 6f 62 5f 69 73 5f 69 6e 69 74 28 . blob_is_init(
1880: 70 29 3b 0a 20 20 69 66 28 20 70 2d 3e 6e 55 73 p);. if( p->nUs
1890: 65 64 3d 3d 30 20 29 7b 0a 20 20 20 20 62 6c 6f ed==0 ){. blo
18a0: 62 5f 61 70 70 65 6e 64 28 70 2c 20 22 22 2c 20 b_append(p, "",
18b0: 31 29 3b 0a 20 20 20 20 70 2d 3e 6e 55 73 65 64 1);. p->nUsed
18c0: 20 3d 20 30 3b 0a 20 20 7d 0a 20 20 69 66 28 20 = 0;. }. if(
18d0: 70 2d 3e 61 44 61 74 61 5b 70 2d 3e 6e 55 73 65 p->aData[p->nUse
18e0: 64 5d 21 3d 30 20 29 7b 0a 20 20 20 20 62 6c 6f d]!=0 ){. blo
18f0: 62 5f 6d 61 74 65 72 69 61 6c 69 7a 65 28 70 29 b_materialize(p)
1900: 3b 0a 20 20 7d 0a 20 20 72 65 74 75 72 6e 20 70 ;. }. return p
1910: 2d 3e 61 44 61 74 61 3b 0a 7d 0a 0a 2f 2a 0a 2a ->aData;.}../*.*
1920: 2a 20 52 65 74 75 72 6e 20 61 20 70 6f 69 6e 74 * Return a point
1930: 65 72 20 74 6f 20 61 20 6e 75 6c 6c 2d 74 65 72 er to a null-ter
1940: 6d 69 6e 61 74 65 64 20 73 74 72 69 6e 67 20 66 minated string f
1950: 6f 72 20 61 20 62 6c 6f 62 2e 0a 2a 2a 0a 2a 2a or a blob..**.**
1960: 20 57 41 52 4e 49 4e 47 3a 20 20 49 66 20 74 68 WARNING: If th
1970: 65 20 62 6c 6f 62 20 69 73 20 65 70 68 65 6d 65 e blob is epheme
1980: 72 61 6c 2c 20 69 74 20 6d 69 67 68 74 20 63 61 ral, it might ca
1990: 75 73 65 20 61 20 27 5c 30 30 30 27 0a 2a 2a 20 use a '\000'.**
19a0: 63 68 61 72 61 63 74 65 72 20 74 6f 20 62 65 20 character to be
19b0: 69 6e 73 65 72 74 65 64 20 69 6e 74 6f 20 74 68 inserted into th
19c0: 65 20 6d 69 64 64 6c 65 20 6f 66 20 74 68 65 20 e middle of the
19d0: 70 61 72 65 6e 74 20 62 6c 6f 62 2e 0a 2a 2a 20 parent blob..**
19e0: 45 78 61 6d 70 6c 65 3a 20 20 53 75 70 70 6f 73 Example: Suppos
19f0: 65 20 70 20 69 73 20 61 20 74 6f 6b 65 6e 20 65 e p is a token e
1a00: 78 74 72 61 63 74 65 64 20 66 72 6f 6d 20 73 6f xtracted from so
1a10: 6d 65 20 6c 61 72 67 65 72 0a 2a 2a 20 62 6c 6f me larger.** blo
1a20: 62 20 70 42 69 67 20 75 73 69 6e 67 20 62 6c 6f b pBig using blo
1a30: 62 5f 74 6f 6b 65 6e 28 29 2e 20 20 49 66 20 79 b_token(). If y
1a40: 6f 75 20 63 61 6c 6c 20 74 68 69 73 20 72 6f 75 ou call this rou
1a50: 74 69 6e 65 20 6f 6e 20 70 2c 0a 2a 2a 20 74 68 tine on p,.** th
1a60: 65 6e 20 61 20 27 5c 30 30 30 27 20 63 68 61 72 en a '\000' char
1a70: 61 63 74 65 72 20 77 69 6c 6c 20 62 65 20 69 6e acter will be in
1a80: 73 65 72 74 65 64 20 69 6e 20 74 68 65 20 6d 69 serted in the mi
1a90: 64 64 6c 65 20 6f 66 0a 2a 2a 20 70 42 69 67 20 ddle of.** pBig
1aa0: 69 6e 20 6f 72 64 65 72 20 74 6f 20 63 61 75 73 in order to caus
1ab0: 65 20 70 20 74 6f 20 62 65 20 6e 75 6c 2d 74 65 e p to be nul-te
1ac0: 72 6d 69 6e 61 74 65 64 2e 20 20 49 66 20 70 42 rminated. If pB
1ad0: 69 67 0a 2a 2a 20 73 68 6f 75 6c 64 20 6e 6f 74 ig.** should not
1ae0: 20 62 65 20 6d 6f 64 69 66 69 65 64 2c 20 74 68 be modified, th
1af0: 65 6e 20 75 73 65 20 62 6c 6f 62 5f 73 74 72 28 en use blob_str(
1b00: 29 20 69 6e 73 74 65 61 64 20 6f 66 20 74 68 69 ) instead of thi
1b10: 73 0a 2a 2a 20 72 6f 75 74 69 6e 65 2e 20 20 62 s.** routine. b
1b20: 6c 6f 62 5f 73 74 72 28 29 20 77 69 6c 6c 20 6d lob_str() will m
1b30: 61 6b 65 20 61 20 63 6f 70 79 20 6f 66 20 74 68 ake a copy of th
1b40: 65 20 70 20 69 66 20 6e 65 63 65 73 73 61 72 79 e p if necessary
1b50: 0a 2a 2a 20 74 6f 20 61 76 6f 69 64 20 6d 6f 64 .** to avoid mod
1b60: 69 66 79 69 6e 67 20 70 42 69 67 2e 0a 2a 2f 0a ifying pBig..*/.
1b70: 63 68 61 72 20 2a 62 6c 6f 62 5f 74 65 72 6d 69 char *blob_termi
1b80: 6e 61 74 65 28 42 6c 6f 62 20 2a 70 29 7b 0a 20 nate(Blob *p){.
1b90: 20 62 6c 6f 62 5f 69 73 5f 69 6e 69 74 28 70 29 blob_is_init(p)
1ba0: 3b 0a 20 20 69 66 28 20 70 2d 3e 6e 55 73 65 64 ;. if( p->nUsed
1bb0: 3d 3d 30 20 29 20 72 65 74 75 72 6e 20 22 22 3b ==0 ) return "";
1bc0: 0a 20 20 70 2d 3e 61 44 61 74 61 5b 70 2d 3e 6e . p->aData[p->n
1bd0: 55 73 65 64 5d 20 3d 20 30 3b 0a 20 20 72 65 74 Used] = 0;. ret
1be0: 75 72 6e 20 70 2d 3e 61 44 61 74 61 3b 0a 7d 0a urn p->aData;.}.
1bf0: 0a 2f 2a 0a 2a 2a 20 43 6f 6d 70 61 72 65 20 74 ./*.** Compare t
1c00: 77 6f 20 62 6c 6f 62 73 2e 0a 2a 2f 0a 69 6e 74 wo blobs..*/.int
1c10: 20 62 6c 6f 62 5f 63 6f 6d 70 61 72 65 28 42 6c blob_compare(Bl
1c20: 6f 62 20 2a 70 41 2c 20 42 6c 6f 62 20 2a 70 42 ob *pA, Blob *pB
1c30: 29 7b 0a 20 20 69 6e 74 20 73 7a 41 2c 20 73 7a ){. int szA, sz
1c40: 42 2c 20 73 7a 2c 20 72 63 3b 0a 20 20 62 6c 6f B, sz, rc;. blo
1c50: 62 5f 69 73 5f 69 6e 69 74 28 70 41 29 3b 0a 20 b_is_init(pA);.
1c60: 20 62 6c 6f 62 5f 69 73 5f 69 6e 69 74 28 70 42 blob_is_init(pB
1c70: 29 3b 0a 20 20 73 7a 41 20 3d 20 62 6c 6f 62 5f );. szA = blob_
1c80: 73 69 7a 65 28 70 41 29 3b 0a 20 20 73 7a 42 20 size(pA);. szB
1c90: 3d 20 62 6c 6f 62 5f 73 69 7a 65 28 70 42 29 3b = blob_size(pB);
1ca0: 0a 20 20 73 7a 20 3d 20 73 7a 41 3c 73 7a 42 20 . sz = szA<szB
1cb0: 3f 20 73 7a 41 20 3a 20 73 7a 42 3b 0a 20 20 72 ? szA : szB;. r
1cc0: 63 20 3d 20 6d 65 6d 63 6d 70 28 62 6c 6f 62 5f c = memcmp(blob_
1cd0: 62 75 66 66 65 72 28 70 41 29 2c 20 62 6c 6f 62 buffer(pA), blob
1ce0: 5f 62 75 66 66 65 72 28 70 42 29 2c 20 73 7a 29 _buffer(pB), sz)
1cf0: 3b 0a 20 20 69 66 28 20 72 63 3d 3d 30 20 29 7b ;. if( rc==0 ){
1d00: 0a 20 20 20 20 72 63 20 3d 20 73 7a 41 20 2d 20 . rc = szA -
1d10: 73 7a 42 3b 0a 20 20 7d 0a 20 20 72 65 74 75 72 szB;. }. retur
1d20: 6e 20 72 63 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 43 n rc;.}../*.** C
1d30: 6f 6d 70 61 72 65 20 61 20 62 6c 6f 62 20 74 6f ompare a blob to
1d40: 20 61 20 73 74 72 69 6e 67 2e 20 20 52 65 74 75 a string. Retu
1d50: 72 6e 20 54 52 55 45 20 69 66 20 74 68 65 79 20 rn TRUE if they
1d60: 61 72 65 20 65 71 75 61 6c 2e 0a 2a 2f 0a 69 6e are equal..*/.in
1d70: 74 20 62 6c 6f 62 5f 65 71 5f 73 74 72 28 42 6c t blob_eq_str(Bl
1d80: 6f 62 20 2a 70 42 6c 6f 62 2c 20 63 6f 6e 73 74 ob *pBlob, const
1d90: 20 63 68 61 72 20 2a 7a 2c 20 69 6e 74 20 6e 29 char *z, int n)
1da0: 7b 0a 20 20 42 6c 6f 62 20 74 3b 0a 20 20 62 6c {. Blob t;. bl
1db0: 6f 62 5f 69 73 5f 69 6e 69 74 28 70 42 6c 6f 62 ob_is_init(pBlob
1dc0: 29 3b 0a 20 20 69 66 28 20 6e 3c 3d 30 20 29 20 );. if( n<=0 )
1dd0: 6e 20 3d 20 73 74 72 6c 65 6e 28 7a 29 3b 0a 20 n = strlen(z);.
1de0: 20 74 2e 61 44 61 74 61 20 3d 20 28 63 68 61 72 t.aData = (char
1df0: 2a 29 7a 3b 0a 20 20 74 2e 6e 55 73 65 64 20 3d *)z;. t.nUsed =
1e00: 20 6e 3b 0a 20 20 74 2e 78 52 65 61 6c 6c 6f 63 n;. t.xRealloc
1e10: 20 3d 20 62 6c 6f 62 52 65 61 6c 6c 6f 63 53 74 = blobReallocSt
1e20: 61 74 69 63 3b 0a 20 20 72 65 74 75 72 6e 20 62 atic;. return b
1e30: 6c 6f 62 5f 63 6f 6d 70 61 72 65 28 70 42 6c 6f lob_compare(pBlo
1e40: 62 2c 20 26 74 29 3d 3d 30 3b 0a 7d 0a 0a 2f 2a b, &t)==0;.}../*
1e50: 0a 2a 2a 20 54 68 69 73 20 6d 61 63 72 6f 20 63 .** This macro c
1e60: 6f 6d 70 61 72 65 73 20 61 20 62 6c 6f 62 20 61 ompares a blob a
1e70: 67 61 69 6e 73 74 20 61 20 73 74 72 69 6e 67 20 gainst a string
1e80: 63 6f 6e 73 74 61 6e 74 2e 20 20 57 65 20 75 73 constant. We us
1e90: 65 20 74 68 65 20 73 69 7a 65 6f 66 28 29 0a 2a e the sizeof().*
1ea0: 2a 20 6f 70 65 72 61 74 6f 72 20 6f 6e 20 74 68 * operator on th
1eb0: 65 20 73 74 72 69 6e 67 20 63 6f 6e 73 74 61 6e e string constan
1ec0: 74 20 74 77 69 63 65 2c 20 73 6f 20 69 74 20 72 t twice, so it r
1ed0: 65 61 6c 6c 79 20 64 6f 65 73 20 6e 65 65 64 20 eally does need
1ee0: 74 6f 20 62 65 20 61 0a 2a 2a 20 73 74 72 69 6e to be a.** strin
1ef0: 67 20 6c 69 74 65 72 61 6c 20 6f 72 20 63 68 61 g literal or cha
1f00: 72 61 63 74 65 72 20 61 72 72 61 79 20 2d 20 6e racter array - n
1f10: 6f 74 20 61 20 63 68 61 72 61 63 74 65 72 20 70 ot a character p
1f20: 6f 69 6e 74 65 72 2e 0a 2a 2f 0a 23 69 66 20 49 ointer..*/.#if I
1f30: 4e 54 45 52 46 41 43 45 0a 23 20 64 65 66 69 6e NTERFACE.# defin
1f40: 65 20 62 6c 6f 62 5f 65 71 28 42 2c 53 29 20 5c e blob_eq(B,S) \
1f50: 0a 20 20 20 20 20 28 28 42 29 2d 3e 6e 55 73 65 . ((B)->nUse
1f60: 64 3d 3d 73 69 7a 65 6f 66 28 53 29 2d 31 20 26 d==sizeof(S)-1 &
1f70: 26 20 6d 65 6d 63 6d 70 28 28 42 29 2d 3e 61 44 & memcmp((B)->aD
1f80: 61 74 61 2c 53 2c 73 69 7a 65 6f 66 28 53 29 2d ata,S,sizeof(S)-
1f90: 31 29 3d 3d 30 29 0a 23 65 6e 64 69 66 0a 0a 0a 1)==0).#endif...
1fa0: 2f 2a 0a 2a 2a 20 41 74 74 65 6d 70 74 20 74 6f /*.** Attempt to
1fb0: 20 72 65 73 69 7a 65 20 61 20 62 6c 6f 62 20 73 resize a blob s
1fc0: 6f 20 74 68 61 74 20 69 74 73 20 69 6e 74 65 72 o that its inter
1fd0: 6e 61 6c 20 62 75 66 66 65 72 20 69 73 20 0a 2a nal buffer is .*
1fe0: 2a 20 6e 42 79 74 65 20 69 6e 20 73 69 7a 65 2e * nByte in size.
1ff0: 20 20 54 68 65 20 62 6c 6f 62 20 69 73 20 74 72 The blob is tr
2000: 75 6e 63 61 74 65 64 20 69 66 20 6e 65 63 65 73 uncated if neces
2010: 73 61 72 79 2e 0a 2a 2f 0a 76 6f 69 64 20 62 6c sary..*/.void bl
2020: 6f 62 5f 72 65 73 69 7a 65 28 42 6c 6f 62 20 2a ob_resize(Blob *
2030: 70 42 6c 6f 62 2c 20 75 6e 73 69 67 6e 65 64 20 pBlob, unsigned
2040: 69 6e 74 20 6e 65 77 53 69 7a 65 29 7b 0a 20 20 int newSize){.
2050: 70 42 6c 6f 62 2d 3e 78 52 65 61 6c 6c 6f 63 28 pBlob->xRealloc(
2060: 70 42 6c 6f 62 2c 20 6e 65 77 53 69 7a 65 2b 31 pBlob, newSize+1
2070: 29 3b 0a 20 20 70 42 6c 6f 62 2d 3e 6e 55 73 65 );. pBlob->nUse
2080: 64 20 3d 20 6e 65 77 53 69 7a 65 3b 0a 20 20 70 d = newSize;. p
2090: 42 6c 6f 62 2d 3e 61 44 61 74 61 5b 6e 65 77 53 Blob->aData[newS
20a0: 69 7a 65 5d 20 3d 20 30 3b 0a 7d 0a 0a 2f 2a 0a ize] = 0;.}../*.
20b0: 2a 2a 20 4d 61 6b 65 20 73 75 72 65 20 61 20 62 ** Make sure a b
20c0: 6c 6f 62 20 69 73 20 6e 75 6c 2d 74 65 72 6d 69 lob is nul-termi
20d0: 6e 61 74 65 64 20 61 6e 64 20 69 73 20 6e 6f 74 nated and is not
20e0: 20 61 20 70 6f 69 6e 74 65 72 20 74 6f 20 75 6e a pointer to un
20f0: 6d 61 6e 61 67 65 64 0a 2a 2a 20 73 70 61 63 65 managed.** space
2100: 2e 20 20 52 65 74 75 72 6e 20 61 20 70 6f 69 6e . Return a poin
2110: 74 65 72 20 74 6f 20 74 68 65 0a 2a 2f 0a 63 68 ter to the.*/.ch
2120: 61 72 20 2a 62 6c 6f 62 5f 6d 61 74 65 72 69 61 ar *blob_materia
2130: 6c 69 7a 65 28 42 6c 6f 62 20 2a 70 42 6c 6f 62 lize(Blob *pBlob
2140: 29 7b 0a 20 20 62 6c 6f 62 5f 72 65 73 69 7a 65 ){. blob_resize
2150: 28 70 42 6c 6f 62 2c 20 70 42 6c 6f 62 2d 3e 6e (pBlob, pBlob->n
2160: 55 73 65 64 29 3b 0a 20 20 72 65 74 75 72 6e 20 Used);. return
2170: 70 42 6c 6f 62 2d 3e 61 44 61 74 61 3b 0a 7d 0a pBlob->aData;.}.
2180: 0a 0a 2f 2a 0a 2a 2a 20 43 61 6c 6c 20 64 65 68 ../*.** Call deh
2190: 74 74 70 69 7a 65 20 6f 6e 20 61 20 62 6c 6f 62 ttpize on a blob
21a0: 2e 20 20 54 68 69 73 20 63 61 75 73 65 73 20 61 . This causes a
21b0: 6e 20 65 70 68 65 6d 65 72 61 6c 20 62 6c 6f 62 n ephemeral blob
21c0: 20 74 6f 20 62 65 0a 2a 2a 20 6d 61 74 65 72 69 to be.** materi
21d0: 61 6c 69 7a 65 64 2e 0a 2a 2f 0a 76 6f 69 64 20 alized..*/.void
21e0: 62 6c 6f 62 5f 64 65 68 74 74 70 69 7a 65 28 42 blob_dehttpize(B
21f0: 6c 6f 62 20 2a 70 42 6c 6f 62 29 7b 0a 20 20 62 lob *pBlob){. b
2200: 6c 6f 62 5f 6d 61 74 65 72 69 61 6c 69 7a 65 28 lob_materialize(
2210: 70 42 6c 6f 62 29 3b 0a 20 20 70 42 6c 6f 62 2d pBlob);. pBlob-
2220: 3e 6e 55 73 65 64 20 3d 20 64 65 68 74 74 70 69 >nUsed = dehttpi
2230: 7a 65 28 70 42 6c 6f 62 2d 3e 61 44 61 74 61 29 ze(pBlob->aData)
2240: 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 45 78 74 72 61 ;.}../*.** Extra
2250: 63 74 20 4e 20 62 79 74 65 73 20 66 72 6f 6d 20 ct N bytes from
2260: 62 6c 6f 62 20 70 46 72 6f 6d 20 61 6e 64 20 75 blob pFrom and u
2270: 73 65 20 69 74 20 74 6f 20 69 6e 69 74 69 61 6c se it to initial
2280: 69 7a 65 20 62 6c 6f 62 20 70 54 6f 2e 0a 2a 2a ize blob pTo..**
2290: 20 52 65 74 75 72 6e 20 74 68 65 20 61 63 74 75 Return the actu
22a0: 61 6c 20 6e 75 6d 62 65 72 20 6f 66 20 62 79 74 al number of byt
22b0: 65 73 20 65 78 74 72 61 63 74 65 64 2e 0a 2a 2a es extracted..**
22c0: 0a 2a 2a 20 41 66 74 65 72 20 74 68 69 73 20 63 .** After this c
22d0: 61 6c 6c 20 63 6f 6d 70 6c 65 74 65 73 2c 20 70 all completes, p
22e0: 54 6f 20 77 69 6c 6c 20 62 65 20 61 6e 20 65 70 To will be an ep
22f0: 68 65 6d 65 72 61 6c 20 62 6c 6f 62 2e 0a 2a 2f hemeral blob..*/
2300: 0a 69 6e 74 20 62 6c 6f 62 5f 65 78 74 72 61 63 .int blob_extrac
2310: 74 28 42 6c 6f 62 20 2a 70 46 72 6f 6d 2c 20 69 t(Blob *pFrom, i
2320: 6e 74 20 4e 2c 20 42 6c 6f 62 20 2a 70 54 6f 29 nt N, Blob *pTo)
2330: 7b 0a 20 20 62 6c 6f 62 5f 69 73 5f 69 6e 69 74 {. blob_is_init
2340: 28 70 46 72 6f 6d 29 3b 0a 20 20 62 6c 6f 62 5f (pFrom);. blob_
2350: 69 73 5f 72 65 73 65 74 28 70 54 6f 29 3b 0a 20 is_reset(pTo);.
2360: 20 69 66 28 20 70 46 72 6f 6d 2d 3e 69 43 75 72 if( pFrom->iCur
2370: 73 6f 72 20 2b 20 4e 20 3e 20 70 46 72 6f 6d 2d sor + N > pFrom-
2380: 3e 6e 55 73 65 64 20 29 7b 0a 20 20 20 20 4e 20 >nUsed ){. N
2390: 3d 20 70 46 72 6f 6d 2d 3e 6e 55 73 65 64 20 2d = pFrom->nUsed -
23a0: 20 70 46 72 6f 6d 2d 3e 69 43 75 72 73 6f 72 3b pFrom->iCursor;
23b0: 0a 20 20 20 20 69 66 28 20 4e 3c 3d 30 20 29 7b . if( N<=0 ){
23c0: 0a 20 20 20 20 20 20 62 6c 6f 62 5f 7a 65 72 6f . blob_zero
23d0: 28 70 54 6f 29 3b 0a 20 20 20 20 20 20 72 65 74 (pTo);. ret
23e0: 75 72 6e 20 30 3b 0a 20 20 20 20 7d 0a 20 20 7d urn 0;. }. }
23f0: 0a 20 20 70 54 6f 2d 3e 6e 55 73 65 64 20 3d 20 . pTo->nUsed =
2400: 4e 3b 0a 20 20 70 54 6f 2d 3e 6e 41 6c 6c 6f 63 N;. pTo->nAlloc
2410: 20 3d 20 4e 3b 0a 20 20 70 54 6f 2d 3e 61 44 61 = N;. pTo->aDa
2420: 74 61 20 3d 20 26 70 46 72 6f 6d 2d 3e 61 44 61 ta = &pFrom->aDa
2430: 74 61 5b 70 46 72 6f 6d 2d 3e 69 43 75 72 73 6f ta[pFrom->iCurso
2440: 72 5d 3b 0a 20 20 70 54 6f 2d 3e 69 43 75 72 73 r];. pTo->iCurs
2450: 6f 72 20 3d 20 30 3b 0a 20 20 70 54 6f 2d 3e 78 or = 0;. pTo->x
2460: 52 65 61 6c 6c 6f 63 20 3d 20 62 6c 6f 62 52 65 Realloc = blobRe
2470: 61 6c 6c 6f 63 53 74 61 74 69 63 3b 0a 20 20 70 allocStatic;. p
2480: 46 72 6f 6d 2d 3e 69 43 75 72 73 6f 72 20 2b 3d From->iCursor +=
2490: 20 4e 3b 0a 20 20 72 65 74 75 72 6e 20 4e 3b 0a N;. return N;.
24a0: 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65 77 69 6e 64 20 }../*.** Rewind
24b0: 74 68 65 20 63 75 72 73 6f 72 20 6f 6e 20 61 20 the cursor on a
24c0: 62 6c 6f 62 20 62 61 63 6b 20 74 6f 20 74 68 65 blob back to the
24d0: 20 62 65 67 69 6e 6e 69 6e 67 2e 0a 2a 2f 0a 76 beginning..*/.v
24e0: 6f 69 64 20 62 6c 6f 62 5f 72 65 77 69 6e 64 28 oid blob_rewind(
24f0: 42 6c 6f 62 20 2a 70 29 7b 0a 20 20 70 2d 3e 69 Blob *p){. p->i
2500: 43 75 72 73 6f 72 20 3d 20 30 3b 0a 7d 0a 0a 2f Cursor = 0;.}../
2510: 2a 0a 2a 2a 20 53 65 65 6b 20 74 68 65 20 63 75 *.** Seek the cu
2520: 72 73 6f 72 20 69 6e 20 61 20 62 6c 6f 62 20 74 rsor in a blob t
2530: 6f 20 74 68 65 20 69 6e 64 69 63 61 74 65 64 20 o the indicated
2540: 6f 66 66 73 65 74 2e 0a 2a 2f 0a 69 6e 74 20 62 offset..*/.int b
2550: 6c 6f 62 5f 73 65 65 6b 28 42 6c 6f 62 20 2a 70 lob_seek(Blob *p
2560: 2c 20 69 6e 74 20 6f 66 66 73 65 74 2c 20 69 6e , int offset, in
2570: 74 20 77 68 65 6e 63 65 29 7b 0a 20 20 69 66 28 t whence){. if(
2580: 20 77 68 65 6e 63 65 3d 3d 42 4c 4f 42 5f 53 45 whence==BLOB_SE
2590: 45 4b 5f 53 45 54 20 29 7b 0a 20 20 20 20 70 2d EK_SET ){. p-
25a0: 3e 69 43 75 72 73 6f 72 20 3d 20 6f 66 66 73 65 >iCursor = offse
25b0: 74 3b 0a 20 20 7d 65 6c 73 65 20 69 66 28 20 77 t;. }else if( w
25c0: 68 65 6e 63 65 3d 3d 42 4c 4f 42 5f 53 45 45 4b hence==BLOB_SEEK
25d0: 5f 43 55 52 20 29 7b 0a 20 20 20 20 70 2d 3e 69 _CUR ){. p->i
25e0: 43 75 72 73 6f 72 20 2b 3d 20 6f 66 66 73 65 74 Cursor += offset
25f0: 3b 0a 20 20 7d 65 6c 73 65 20 69 66 28 20 77 68 ;. }else if( wh
2600: 65 6e 63 65 3d 3d 42 4c 4f 42 5f 53 45 45 4b 5f ence==BLOB_SEEK_
2610: 45 4e 44 20 29 7b 0a 20 20 20 20 70 2d 3e 69 43 END ){. p->iC
2620: 75 72 73 6f 72 20 3d 20 70 2d 3e 6e 55 73 65 64 ursor = p->nUsed
2630: 20 2b 20 6f 66 66 73 65 74 20 2d 20 31 3b 0a 20 + offset - 1;.
2640: 20 7d 0a 20 20 69 66 28 20 70 2d 3e 69 43 75 72 }. if( p->iCur
2650: 73 6f 72 3c 30 20 29 7b 0a 20 20 20 20 70 2d 3e sor<0 ){. p->
2660: 69 43 75 72 73 6f 72 20 3d 20 30 3b 0a 20 20 7d iCursor = 0;. }
2670: 0a 20 20 69 66 28 20 70 2d 3e 69 43 75 72 73 6f . if( p->iCurso
2680: 72 3e 70 2d 3e 6e 55 73 65 64 20 29 7b 0a 20 20 r>p->nUsed ){.
2690: 20 20 70 2d 3e 69 43 75 72 73 6f 72 20 3d 20 70 p->iCursor = p
26a0: 2d 3e 6e 55 73 65 64 3b 0a 20 20 7d 0a 20 20 72 ->nUsed;. }. r
26b0: 65 74 75 72 6e 20 70 2d 3e 69 43 75 72 73 6f 72 eturn p->iCursor
26c0: 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65 74 75 72 ;.}../*.** Retur
26d0: 6e 20 74 68 65 20 63 75 72 72 65 6e 74 20 6f 66 n the current of
26e0: 66 73 65 74 20 69 6e 74 6f 20 74 68 65 20 62 6c fset into the bl
26f0: 6f 62 0a 2a 2f 0a 69 6e 74 20 62 6c 6f 62 5f 74 ob.*/.int blob_t
2700: 65 6c 6c 28 42 6c 6f 62 20 2a 70 29 7b 0a 20 20 ell(Blob *p){.
2710: 72 65 74 75 72 6e 20 70 2d 3e 69 43 75 72 73 6f return p->iCurso
2720: 72 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 45 78 74 72 r;.}../*.** Extr
2730: 61 63 74 20 61 20 73 69 6e 67 6c 65 20 6c 69 6e act a single lin
2740: 65 20 6f 66 20 74 65 78 74 20 66 72 6f 6d 20 70 e of text from p
2750: 46 72 6f 6d 20 62 65 67 69 6e 6e 69 6e 67 20 61 From beginning a
2760: 74 20 74 68 65 20 63 75 72 72 65 6e 74 20 0a 2a t the current .*
2770: 2a 20 63 75 72 73 6f 72 20 6c 6f 63 61 74 69 6f * cursor locatio
2780: 6e 20 61 6e 64 20 75 73 65 20 74 68 61 74 20 6c n and use that l
2790: 69 6e 65 20 6f 66 20 74 65 78 74 20 74 6f 20 69 ine of text to i
27a0: 6e 69 74 69 61 6c 69 7a 65 20 70 54 6f 2e 0a 2a nitialize pTo..*
27b0: 2a 20 70 54 6f 20 77 69 6c 6c 20 69 6e 63 6c 75 * pTo will inclu
27c0: 64 65 20 74 68 65 20 74 65 72 6d 69 6e 61 74 69 de the terminati
27d0: 6e 67 20 5c 6e 2e 20 20 52 65 74 75 72 6e 20 74 ng \n. Return t
27e0: 68 65 20 6e 75 6d 62 65 72 20 6f 66 20 62 79 74 he number of byt
27f0: 65 73 0a 2a 2a 20 69 6e 20 74 68 65 20 6c 69 6e es.** in the lin
2800: 65 20 69 6e 63 6c 75 64 69 6e 67 20 74 68 65 20 e including the
2810: 5c 6e 20 61 74 20 74 68 65 20 65 6e 64 2e 20 20 \n at the end.
2820: 30 20 69 73 20 72 65 74 75 72 6e 65 64 20 61 74 0 is returned at
2830: 0a 2a 2a 20 65 6e 64 2d 6f 66 2d 66 69 6c 65 2e .** end-of-file.
2840: 0a 2a 2a 0a 2a 2a 20 54 68 65 20 63 75 72 73 6f .**.** The curso
2850: 72 20 6f 66 20 70 46 72 6f 6d 20 69 73 20 6c 65 r of pFrom is le
2860: 66 74 20 70 6f 69 6e 74 69 6e 67 20 61 74 20 74 ft pointing at t
2870: 68 65 20 66 69 72 73 74 20 62 79 74 65 20 70 61 he first byte pa
2880: 73 74 20 74 68 65 0a 2a 2a 20 5c 6e 20 74 68 61 st the.** \n tha
2890: 74 20 74 65 72 6d 69 6e 61 74 65 64 20 74 68 65 t terminated the
28a0: 20 6c 69 6e 65 2e 0a 2a 2a 0a 2a 2a 20 70 54 6f line..**.** pTo
28b0: 20 77 69 6c 6c 20 62 65 20 61 6e 20 65 70 68 65 will be an ephe
28c0: 72 6d 65 72 61 6c 20 62 6c 6f 62 2e 20 20 49 66 rmeral blob. If
28d0: 20 70 46 72 6f 6d 20 63 68 61 6e 67 65 73 2c 20 pFrom changes,
28e0: 69 74 20 6d 69 67 68 74 20 61 6c 74 65 72 0a 2a it might alter.*
28f0: 2a 20 70 54 6f 20 61 73 20 77 65 6c 6c 2e 0a 2a * pTo as well..*
2900: 2f 0a 69 6e 74 20 62 6c 6f 62 5f 6c 69 6e 65 28 /.int blob_line(
2910: 42 6c 6f 62 20 2a 70 46 72 6f 6d 2c 20 42 6c 6f Blob *pFrom, Blo
2920: 62 20 2a 70 54 6f 29 7b 0a 20 20 63 68 61 72 20 b *pTo){. char
2930: 2a 61 44 61 74 61 20 3d 20 70 46 72 6f 6d 2d 3e *aData = pFrom->
2940: 61 44 61 74 61 3b 0a 20 20 69 6e 74 20 6e 20 3d aData;. int n =
2950: 20 70 46 72 6f 6d 2d 3e 6e 55 73 65 64 3b 0a 20 pFrom->nUsed;.
2960: 20 69 6e 74 20 69 20 3d 20 70 46 72 6f 6d 2d 3e int i = pFrom->
2970: 69 43 75 72 73 6f 72 3b 0a 0a 20 20 77 68 69 6c iCursor;.. whil
2980: 65 28 20 69 3c 6e 20 26 26 20 61 44 61 74 61 5b e( i<n && aData[
2990: 69 5d 21 3d 27 5c 6e 27 20 29 7b 20 69 2b 2b 3b i]!='\n' ){ i++;
29a0: 20 7d 0a 20 20 69 66 28 20 69 3c 6e 20 29 7b 0a }. if( i<n ){.
29b0: 20 20 20 20 61 73 73 65 72 74 28 20 61 44 61 74 assert( aDat
29c0: 61 5b 69 5d 3d 3d 27 5c 6e 27 20 29 3b 0a 20 20 a[i]=='\n' );.
29d0: 20 20 69 2b 2b 3b 0a 20 20 7d 0a 20 20 62 6c 6f i++;. }. blo
29e0: 62 5f 65 78 74 72 61 63 74 28 70 46 72 6f 6d 2c b_extract(pFrom,
29f0: 20 69 2d 70 46 72 6f 6d 2d 3e 69 43 75 72 73 6f i-pFrom->iCurso
2a00: 72 2c 20 70 54 6f 29 3b 0a 20 20 72 65 74 75 72 r, pTo);. retur
2a10: 6e 20 70 54 6f 2d 3e 6e 55 73 65 64 3b 0a 7d 0a n pTo->nUsed;.}.
2a20: 0a 2f 2a 0a 2a 2a 20 54 72 69 6d 20 77 68 69 74 ./*.** Trim whit
2a30: 65 73 70 61 63 65 20 6f 66 66 20 6f 66 20 74 68 espace off of th
2a40: 65 20 65 6e 64 20 6f 66 20 61 20 62 6c 6f 62 2e e end of a blob.
2a50: 20 20 52 65 74 75 72 6e 20 74 68 65 20 6e 75 6d Return the num
2a60: 62 65 72 0a 2a 2a 20 6f 66 20 63 68 61 72 61 63 ber.** of charac
2a70: 74 65 72 73 20 72 65 6d 61 69 6e 69 6e 67 2e 0a ters remaining..
2a80: 2a 2a 0a 2a 2a 20 41 6c 6c 20 74 68 69 73 20 64 **.** All this d
2a90: 6f 65 73 20 69 73 20 72 65 64 75 63 65 20 74 68 oes is reduce th
2aa0: 65 20 6c 65 6e 67 74 68 20 63 6f 75 6e 74 65 72 e length counter
2ab0: 2e 20 20 54 68 69 73 20 72 6f 75 74 69 6e 65 20 . This routine
2ac0: 64 6f 65 73 0a 2a 2a 20 6e 6f 74 20 69 6e 73 65 does.** not inse
2ad0: 72 74 20 61 20 6e 65 77 20 7a 65 72 6f 20 74 65 rt a new zero te
2ae0: 72 6d 69 6e 61 74 6f 72 2e 0a 2a 2f 0a 69 6e 74 rminator..*/.int
2af0: 20 62 6c 6f 62 5f 74 72 69 6d 28 42 6c 6f 62 20 blob_trim(Blob
2b00: 2a 70 29 7b 0a 20 20 63 68 61 72 20 2a 7a 20 3d *p){. char *z =
2b10: 20 70 2d 3e 61 44 61 74 61 3b 0a 20 20 69 6e 74 p->aData;. int
2b20: 20 6e 20 3d 20 70 2d 3e 6e 55 73 65 64 3b 0a 20 n = p->nUsed;.
2b30: 20 77 68 69 6c 65 28 20 6e 3e 30 20 26 26 20 62 while( n>0 && b
2b40: 6c 6f 62 5f 69 73 73 70 61 63 65 28 7a 5b 6e 2d lob_isspace(z[n-
2b50: 31 5d 29 20 29 7b 20 6e 2d 2d 3b 20 7d 0a 20 20 1]) ){ n--; }.
2b60: 70 2d 3e 6e 55 73 65 64 20 3d 20 6e 3b 0a 20 20 p->nUsed = n;.
2b70: 72 65 74 75 72 6e 20 6e 3b 0a 7d 0a 0a 2f 2a 0a return n;.}../*.
2b80: 2a 2a 20 45 78 74 72 61 63 74 20 61 20 73 69 6e ** Extract a sin
2b90: 67 6c 65 20 74 6f 6b 65 6e 20 66 72 6f 6d 20 70 gle token from p
2ba0: 46 72 6f 6d 20 61 6e 64 20 75 73 65 20 69 74 20 From and use it
2bb0: 74 6f 20 69 6e 69 74 69 61 6c 69 7a 65 20 70 54 to initialize pT
2bc0: 6f 2e 0a 2a 2a 20 52 65 74 75 72 6e 20 74 68 65 o..** Return the
2bd0: 20 6e 75 6d 62 65 72 20 6f 66 20 62 79 74 65 73 number of bytes
2be0: 20 69 6e 20 74 68 65 20 74 6f 6b 65 6e 2e 20 20 in the token.
2bf0: 49 66 20 6e 6f 20 74 6f 6b 65 6e 20 69 73 20 66 If no token is f
2c00: 6f 75 6e 64 2c 0a 2a 2a 20 72 65 74 75 72 6e 20 ound,.** return
2c10: 30 2e 0a 2a 2a 0a 2a 2a 20 41 20 74 6f 6b 65 6e 0..**.** A token
2c20: 20 63 6f 6e 73 69 73 74 73 20 6f 66 20 6f 6e 65 consists of one
2c30: 20 6f 72 20 6d 6f 72 65 20 6e 6f 6e 2d 73 70 61 or more non-spa
2c40: 63 65 20 63 68 61 72 61 63 74 65 72 73 2e 20 20 ce characters.
2c50: 4c 65 61 64 69 6e 67 0a 2a 2a 20 77 68 69 74 65 Leading.** white
2c60: 73 70 61 63 65 20 69 73 20 69 67 6e 6f 72 65 64 space is ignored
2c70: 2e 0a 2a 2a 0a 2a 2a 20 54 68 65 20 63 75 72 73 ..**.** The curs
2c80: 6f 72 20 6f 66 20 70 46 72 6f 6d 20 69 73 20 6c or of pFrom is l
2c90: 65 66 74 20 70 6f 69 6e 74 69 6e 67 20 61 74 20 eft pointing at
2ca0: 74 68 65 20 66 69 72 73 74 20 63 68 61 72 61 63 the first charac
2cb0: 74 65 72 20 70 61 73 74 0a 2a 2a 20 74 68 65 20 ter past.** the
2cc0: 65 6e 64 20 6f 66 20 74 68 65 20 74 6f 6b 65 6e end of the token
2cd0: 2e 0a 2a 2a 0a 2a 2a 20 70 54 6f 20 77 69 6c 6c ..**.** pTo will
2ce0: 20 62 65 20 61 6e 20 65 70 68 65 72 6d 65 72 61 be an ephermera
2cf0: 6c 20 62 6c 6f 62 2e 20 20 49 66 20 70 46 72 6f l blob. If pFro
2d00: 6d 20 63 68 61 6e 67 65 73 2c 20 69 74 20 6d 69 m changes, it mi
2d10: 67 68 74 20 61 6c 74 65 72 0a 2a 2a 20 70 54 6f ght alter.** pTo
2d20: 20 61 73 20 77 65 6c 6c 2e 0a 2a 2f 0a 69 6e 74 as well..*/.int
2d30: 20 62 6c 6f 62 5f 74 6f 6b 65 6e 28 42 6c 6f 62 blob_token(Blob
2d40: 20 2a 70 46 72 6f 6d 2c 20 42 6c 6f 62 20 2a 70 *pFrom, Blob *p
2d50: 54 6f 29 7b 0a 20 20 63 68 61 72 20 2a 61 44 61 To){. char *aDa
2d60: 74 61 20 3d 20 70 46 72 6f 6d 2d 3e 61 44 61 74 ta = pFrom->aDat
2d70: 61 3b 0a 20 20 69 6e 74 20 6e 20 3d 20 70 46 72 a;. int n = pFr
2d80: 6f 6d 2d 3e 6e 55 73 65 64 3b 0a 20 20 69 6e 74 om->nUsed;. int
2d90: 20 69 20 3d 20 70 46 72 6f 6d 2d 3e 69 43 75 72 i = pFrom->iCur
2da0: 73 6f 72 3b 0a 20 20 77 68 69 6c 65 28 20 69 3c sor;. while( i<
2db0: 6e 20 26 26 20 62 6c 6f 62 5f 69 73 73 70 61 63 n && blob_isspac
2dc0: 65 28 61 44 61 74 61 5b 69 5d 29 20 29 7b 20 69 e(aData[i]) ){ i
2dd0: 2b 2b 3b 20 7d 0a 20 20 70 46 72 6f 6d 2d 3e 69 ++; }. pFrom->i
2de0: 43 75 72 73 6f 72 20 3d 20 69 3b 0a 20 20 77 68 Cursor = i;. wh
2df0: 69 6c 65 28 20 69 3c 6e 20 26 26 20 21 62 6c 6f ile( i<n && !blo
2e00: 62 5f 69 73 73 70 61 63 65 28 61 44 61 74 61 5b b_isspace(aData[
2e10: 69 5d 29 20 29 7b 20 69 2b 2b 3b 20 7d 0a 20 20 i]) ){ i++; }.
2e20: 62 6c 6f 62 5f 65 78 74 72 61 63 74 28 70 46 72 blob_extract(pFr
2e30: 6f 6d 2c 20 69 2d 70 46 72 6f 6d 2d 3e 69 43 75 om, i-pFrom->iCu
2e40: 72 73 6f 72 2c 20 70 54 6f 29 3b 0a 20 20 77 68 rsor, pTo);. wh
2e50: 69 6c 65 28 20 69 3c 6e 20 26 26 20 62 6c 6f 62 ile( i<n && blob
2e60: 5f 69 73 73 70 61 63 65 28 61 44 61 74 61 5b 69 _isspace(aData[i
2e70: 5d 29 20 29 7b 20 69 2b 2b 3b 20 7d 0a 20 20 70 ]) ){ i++; }. p
2e80: 46 72 6f 6d 2d 3e 69 43 75 72 73 6f 72 20 3d 20 From->iCursor =
2e90: 69 3b 0a 20 20 72 65 74 75 72 6e 20 70 54 6f 2d i;. return pTo-
2ea0: 3e 6e 55 73 65 64 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a >nUsed;.}../*.**
2eb0: 20 45 78 74 72 61 63 74 20 65 76 65 72 79 74 68 Extract everyth
2ec0: 69 6e 67 20 66 72 6f 6d 20 74 68 65 20 63 75 72 ing from the cur
2ed0: 72 65 6e 74 20 63 75 72 73 6f 72 20 74 6f 20 74 rent cursor to t
2ee0: 68 65 20 65 6e 64 20 6f 66 20 74 68 65 20 62 6c he end of the bl
2ef0: 6f 62 0a 2a 2a 20 69 6e 74 6f 20 61 20 6e 65 77 ob.** into a new
2f00: 20 62 6c 6f 62 2e 20 20 54 68 65 20 6e 65 77 20 blob. The new
2f10: 62 6c 6f 62 20 69 73 20 61 6e 20 65 70 68 65 6d blob is an ephem
2f20: 65 72 69 61 6c 20 72 65 66 65 72 65 6e 63 65 20 erial reference
2f30: 74 6f 20 74 68 65 0a 2a 2a 20 6f 72 69 67 69 6e to the.** origin
2f40: 61 6c 20 62 6c 6f 62 2e 20 20 54 68 65 20 63 75 al blob. The cu
2f50: 72 73 6f 72 20 6f 66 20 74 68 65 20 6f 72 69 67 rsor of the orig
2f60: 69 6e 61 6c 20 62 6c 6f 62 20 69 73 20 75 6e 63 inal blob is unc
2f70: 68 61 6e 67 65 64 2e 0a 2a 2f 0a 69 6e 74 20 62 hanged..*/.int b
2f80: 6c 6f 62 5f 74 61 69 6c 28 42 6c 6f 62 20 2a 70 lob_tail(Blob *p
2f90: 46 72 6f 6d 2c 20 42 6c 6f 62 20 2a 70 54 6f 29 From, Blob *pTo)
2fa0: 7b 0a 20 20 69 6e 74 20 69 43 75 72 73 6f 72 20 {. int iCursor
2fb0: 3d 20 70 46 72 6f 6d 2d 3e 69 43 75 72 73 6f 72 = pFrom->iCursor
2fc0: 3b 0a 20 20 62 6c 6f 62 5f 65 78 74 72 61 63 74 ;. blob_extract
2fd0: 28 70 46 72 6f 6d 2c 20 70 46 72 6f 6d 2d 3e 6e (pFrom, pFrom->n
2fe0: 55 73 65 64 2d 70 46 72 6f 6d 2d 3e 69 43 75 72 Used-pFrom->iCur
2ff0: 73 6f 72 2c 20 70 54 6f 29 3b 0a 20 20 70 46 72 sor, pTo);. pFr
3000: 6f 6d 2d 3e 69 43 75 72 73 6f 72 20 3d 20 69 43 om->iCursor = iC
3010: 75 72 73 6f 72 3b 0a 20 20 72 65 74 75 72 6e 20 ursor;. return
3020: 70 54 6f 2d 3e 6e 55 73 65 64 3b 0a 7d 0a 0a 2f pTo->nUsed;.}../
3030: 2a 0a 2a 2a 20 43 6f 70 79 20 4e 20 6c 69 6e 65 *.** Copy N line
3040: 73 20 6f 66 20 74 65 78 74 20 66 72 6f 6d 20 70 s of text from p
3050: 46 72 6f 6d 20 69 6e 74 6f 20 70 54 6f 2e 20 20 From into pTo.
3060: 54 68 65 20 63 6f 70 79 20 62 65 67 69 6e 73 20 The copy begins
3070: 61 74 20 74 68 65 0a 2a 2a 20 63 75 72 72 65 6e at the.** curren
3080: 74 20 63 75 72 73 6f 72 20 70 6f 73 69 74 69 6f t cursor positio
3090: 6e 20 6f 66 20 70 49 6e 2e 20 20 54 68 65 20 70 n of pIn. The p
30a0: 49 6e 20 63 75 72 73 6f 72 20 69 73 20 6c 65 66 In cursor is lef
30b0: 74 20 70 6f 69 6e 74 69 6e 67 0a 2a 2a 20 61 74 t pointing.** at
30c0: 20 74 68 65 20 66 69 72 73 74 20 63 68 61 72 61 the first chara
30d0: 63 74 65 72 20 70 61 73 74 20 74 68 65 20 6c 61 cter past the la
30e0: 73 74 20 5c 6e 20 63 6f 70 69 65 64 2e 0a 2a 2a st \n copied..**
30f0: 0a 2a 2a 20 49 66 20 70 54 6f 3d 3d 4e 55 4c 4c .** If pTo==NULL
3100: 20 74 68 65 6e 20 74 68 69 73 20 72 6f 75 74 69 then this routi
3110: 6e 65 20 73 69 6d 70 6c 79 20 73 6b 69 70 73 20 ne simply skips
3120: 6f 76 65 72 20 4e 20 6c 69 6e 65 73 2e 0a 2a 2f over N lines..*/
3130: 0a 76 6f 69 64 20 62 6c 6f 62 5f 63 6f 70 79 5f .void blob_copy_
3140: 6c 69 6e 65 73 28 42 6c 6f 62 20 2a 70 54 6f 2c lines(Blob *pTo,
3150: 20 42 6c 6f 62 20 2a 70 46 72 6f 6d 2c 20 69 6e Blob *pFrom, in
3160: 74 20 4e 29 7b 0a 20 20 63 68 61 72 20 2a 7a 20 t N){. char *z
3170: 3d 20 70 46 72 6f 6d 2d 3e 61 44 61 74 61 3b 0a = pFrom->aData;.
3180: 20 20 69 6e 74 20 69 20 3d 20 70 46 72 6f 6d 2d int i = pFrom-
3190: 3e 69 43 75 72 73 6f 72 3b 0a 20 20 69 6e 74 20 >iCursor;. int
31a0: 6e 20 3d 20 70 46 72 6f 6d 2d 3e 6e 55 73 65 64 n = pFrom->nUsed
31b0: 3b 0a 20 20 69 6e 74 20 63 6e 74 20 3d 20 30 3b ;. int cnt = 0;
31c0: 0a 0a 20 20 69 66 28 20 4e 3d 3d 30 20 29 20 72 .. if( N==0 ) r
31d0: 65 74 75 72 6e 3b 0a 20 20 77 68 69 6c 65 28 20 eturn;. while(
31e0: 69 3c 6e 20 29 7b 0a 20 20 20 20 69 66 28 20 7a i<n ){. if( z
31f0: 5b 69 5d 3d 3d 27 5c 6e 27 20 29 7b 0a 20 20 20 [i]=='\n' ){.
3200: 20 20 20 63 6e 74 2b 2b 3b 0a 20 20 20 20 20 20 cnt++;.
3210: 69 66 28 20 63 6e 74 3d 3d 4e 20 29 7b 0a 20 20 if( cnt==N ){.
3220: 20 20 20 20 20 20 69 2b 2b 3b 0a 20 20 20 20 20 i++;.
3230: 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 20 20 break;.
3240: 7d 0a 20 20 20 20 7d 0a 20 20 20 20 69 2b 2b 3b }. }. i++;
3250: 0a 20 20 7d 0a 20 20 69 66 28 20 70 54 6f 20 29 . }. if( pTo )
3260: 7b 0a 20 20 20 20 62 6c 6f 62 5f 61 70 70 65 6e {. blob_appen
3270: 64 28 70 54 6f 2c 20 26 70 46 72 6f 6d 2d 3e 61 d(pTo, &pFrom->a
3280: 44 61 74 61 5b 70 46 72 6f 6d 2d 3e 69 43 75 72 Data[pFrom->iCur
3290: 73 6f 72 5d 2c 20 69 20 2d 20 70 46 72 6f 6d 2d sor], i - pFrom-
32a0: 3e 69 43 75 72 73 6f 72 29 3b 0a 20 20 7d 0a 20 >iCursor);. }.
32b0: 20 70 46 72 6f 6d 2d 3e 69 43 75 72 73 6f 72 20 pFrom->iCursor
32c0: 3d 20 69 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65 = i;.}../*.** Re
32d0: 74 75 72 6e 20 74 72 75 65 20 69 66 20 74 68 65 turn true if the
32e0: 20 62 6c 6f 62 20 63 6f 6e 74 61 69 6e 73 20 61 blob contains a
32f0: 20 76 61 6c 69 64 20 55 55 49 44 5f 53 49 5a 45 valid UUID_SIZE
3300: 2d 64 69 67 69 74 20 62 61 73 65 31 36 20 69 64 -digit base16 id
3310: 65 6e 74 69 66 69 65 72 2e 0a 2a 2f 0a 69 6e 74 entifier..*/.int
3320: 20 62 6c 6f 62 5f 69 73 5f 75 75 69 64 28 42 6c blob_is_uuid(Bl
3330: 6f 62 20 2a 70 42 6c 6f 62 29 7b 0a 20 20 72 65 ob *pBlob){. re
3340: 74 75 72 6e 20 62 6c 6f 62 5f 73 69 7a 65 28 70 turn blob_size(p
3350: 42 6c 6f 62 29 3d 3d 55 55 49 44 5f 53 49 5a 45 Blob)==UUID_SIZE
3360: 0a 20 20 20 20 20 20 20 20 20 26 26 20 76 61 6c . && val
3370: 69 64 61 74 65 31 36 28 62 6c 6f 62 5f 62 75 66 idate16(blob_buf
3380: 66 65 72 28 70 42 6c 6f 62 29 2c 20 55 55 49 44 fer(pBlob), UUID
3390: 5f 53 49 5a 45 29 3b 0a 7d 0a 69 6e 74 20 62 6c _SIZE);.}.int bl
33a0: 6f 62 5f 69 73 5f 75 75 69 64 5f 6e 28 42 6c 6f ob_is_uuid_n(Blo
33b0: 62 20 2a 70 42 6c 6f 62 2c 20 69 6e 74 20 6e 29 b *pBlob, int n)
33c0: 7b 0a 20 20 72 65 74 75 72 6e 20 62 6c 6f 62 5f {. return blob_
33d0: 73 69 7a 65 28 70 42 6c 6f 62 29 3d 3d 6e 20 26 size(pBlob)==n &
33e0: 26 20 76 61 6c 69 64 61 74 65 31 36 28 62 6c 6f & validate16(blo
33f0: 62 5f 62 75 66 66 65 72 28 70 42 6c 6f 62 29 2c b_buffer(pBlob),
3400: 20 6e 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65 n);.}../*.** Re
3410: 74 75 72 6e 20 74 72 75 65 20 69 66 20 74 68 65 turn true if the
3420: 20 62 6c 6f 62 20 63 6f 6e 74 61 69 6e 73 20 61 blob contains a
3430: 20 76 61 6c 69 64 20 33 32 2d 62 69 74 20 69 6e valid 32-bit in
3440: 74 65 67 65 72 2e 20 20 53 74 6f 72 65 0a 2a 2a teger. Store.**
3450: 20 74 68 65 20 69 6e 74 65 67 65 72 20 76 61 6c the integer val
3460: 75 65 20 69 6e 20 2a 70 56 61 6c 75 65 2e 0a 2a ue in *pValue..*
3470: 2f 0a 69 6e 74 20 62 6c 6f 62 5f 69 73 5f 69 6e /.int blob_is_in
3480: 74 28 42 6c 6f 62 20 2a 70 42 6c 6f 62 2c 20 69 t(Blob *pBlob, i
3490: 6e 74 20 2a 70 56 61 6c 75 65 29 7b 0a 20 20 63 nt *pValue){. c
34a0: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 20 3d 20 62 onst char *z = b
34b0: 6c 6f 62 5f 62 75 66 66 65 72 28 70 42 6c 6f 62 lob_buffer(pBlob
34c0: 29 3b 0a 20 20 69 6e 74 20 69 2c 20 6e 2c 20 63 );. int i, n, c
34d0: 2c 20 76 3b 0a 20 20 6e 20 3d 20 62 6c 6f 62 5f , v;. n = blob_
34e0: 73 69 7a 65 28 70 42 6c 6f 62 29 3b 0a 20 20 76 size(pBlob);. v
34f0: 20 3d 20 30 3b 0a 20 20 66 6f 72 28 69 3d 30 3b = 0;. for(i=0;
3500: 20 69 3c 6e 20 26 26 20 28 63 20 3d 20 7a 5b 69 i<n && (c = z[i
3510: 5d 29 21 3d 30 20 26 26 20 69 73 64 69 67 69 74 ])!=0 && isdigit
3520: 28 63 29 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 76 (c); i++){. v
3530: 20 3d 20 76 2a 31 30 20 2b 20 63 20 2d 20 27 30 = v*10 + c - '0
3540: 27 3b 0a 20 20 7d 0a 20 20 69 66 28 20 69 3d 3d ';. }. if( i==
3550: 6e 20 29 7b 0a 20 20 20 20 2a 70 56 61 6c 75 65 n ){. *pValue
3560: 20 3d 20 76 3b 0a 20 20 20 20 72 65 74 75 72 6e = v;. return
3570: 20 31 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 1;. }else{.
3580: 20 72 65 74 75 72 6e 20 30 3b 0a 20 20 7d 0a 7d return 0;. }.}
3590: 0a 0a 2f 2a 0a 2a 2a 20 5a 65 72 6f 20 6f 72 20 ../*.** Zero or
35a0: 72 65 73 65 74 20 61 6e 20 61 72 72 61 79 20 6f reset an array o
35b0: 66 20 42 6c 6f 62 73 2e 0a 2a 2f 0a 76 6f 69 64 f Blobs..*/.void
35c0: 20 62 6c 6f 62 61 72 72 61 79 5f 7a 65 72 6f 28 blobarray_zero(
35d0: 42 6c 6f 62 20 2a 61 42 6c 6f 62 2c 20 69 6e 74 Blob *aBlob, int
35e0: 20 6e 29 7b 0a 20 20 69 6e 74 20 69 3b 0a 20 20 n){. int i;.
35f0: 66 6f 72 28 69 3d 30 3b 20 69 3c 6e 3b 20 69 2b for(i=0; i<n; i+
3600: 2b 29 20 62 6c 6f 62 5f 7a 65 72 6f 28 26 61 42 +) blob_zero(&aB
3610: 6c 6f 62 5b 69 5d 29 3b 0a 7d 0a 76 6f 69 64 20 lob[i]);.}.void
3620: 62 6c 6f 62 61 72 72 61 79 5f 72 65 73 65 74 28 blobarray_reset(
3630: 42 6c 6f 62 20 2a 61 42 6c 6f 62 2c 20 69 6e 74 Blob *aBlob, int
3640: 20 6e 29 7b 0a 20 20 69 6e 74 20 69 3b 0a 20 20 n){. int i;.
3650: 66 6f 72 28 69 3d 30 3b 20 69 3c 6e 3b 20 69 2b for(i=0; i<n; i+
3660: 2b 29 20 62 6c 6f 62 5f 72 65 73 65 74 28 26 61 +) blob_reset(&a
3670: 42 6c 6f 62 5b 69 5d 29 3b 0a 7d 0a 0a 2f 2a 0a Blob[i]);.}../*.
3680: 2a 2a 20 50 61 72 73 65 20 61 20 62 6c 6f 62 20 ** Parse a blob
3690: 69 6e 74 6f 20 73 70 61 63 65 2d 73 65 70 61 72 into space-separ
36a0: 61 74 65 64 20 74 6f 6b 65 6e 73 2e 20 20 53 74 ated tokens. St
36b0: 6f 72 65 20 65 61 63 68 20 74 6f 6b 65 6e 20 69 ore each token i
36c0: 6e 0a 2a 2a 20 61 6e 20 65 6c 65 6d 65 6e 74 20 n.** an element
36d0: 6f 66 20 74 68 65 20 62 6c 6f 62 61 72 72 61 79 of the blobarray
36e0: 20 61 54 6f 6b 65 6e 5b 5d 2e 20 20 61 54 6f 6b aToken[]. aTok
36f0: 65 6e 5b 5d 20 69 73 20 6e 54 6f 6b 65 6e 20 65 en[] is nToken e
3700: 6c 65 6d 65 6e 74 73 20 69 6e 0a 2a 2a 20 73 69 lements in.** si
3710: 7a 65 2e 20 20 52 65 74 75 72 6e 20 74 68 65 20 ze. Return the
3720: 6e 75 6d 62 65 72 20 6f 66 20 74 6f 6b 65 6e 73 number of tokens
3730: 20 73 65 65 6e 2e 0a 2a 2f 0a 69 6e 74 20 62 6c seen..*/.int bl
3740: 6f 62 5f 74 6f 6b 65 6e 69 7a 65 28 42 6c 6f 62 ob_tokenize(Blob
3750: 20 2a 70 49 6e 2c 20 42 6c 6f 62 20 2a 61 54 6f *pIn, Blob *aTo
3760: 6b 65 6e 2c 20 69 6e 74 20 6e 54 6f 6b 65 6e 29 ken, int nToken)
3770: 7b 0a 20 20 69 6e 74 20 69 3b 0a 20 20 66 6f 72 {. int i;. for
3780: 28 69 3d 30 3b 20 69 3c 6e 54 6f 6b 65 6e 20 26 (i=0; i<nToken &
3790: 26 20 62 6c 6f 62 5f 74 6f 6b 65 6e 28 70 49 6e & blob_token(pIn
37a0: 2c 20 26 61 54 6f 6b 65 6e 5b 69 5d 29 3b 20 69 , &aToken[i]); i
37b0: 2b 2b 29 7b 7d 0a 20 20 72 65 74 75 72 6e 20 69 ++){}. return i
37c0: 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 44 6f 20 70 72 ;.}../*.** Do pr
37d0: 69 6e 74 66 2d 73 74 79 6c 65 20 73 74 72 69 6e intf-style strin
37e0: 67 20 72 65 6e 64 65 72 69 6e 67 20 61 6e 64 20 g rendering and
37f0: 61 70 70 65 6e 64 20 74 68 65 20 72 65 73 75 6c append the resul
3800: 74 73 20 74 6f 20 61 20 62 6c 6f 62 2e 0a 2a 2f ts to a blob..*/
3810: 0a 76 6f 69 64 20 62 6c 6f 62 5f 61 70 70 65 6e .void blob_appen
3820: 64 66 28 42 6c 6f 62 20 2a 70 42 6c 6f 62 2c 20 df(Blob *pBlob,
3830: 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 46 6f 72 const char *zFor
3840: 6d 61 74 2c 20 2e 2e 2e 29 7b 0a 20 20 76 61 5f mat, ...){. va_
3850: 6c 69 73 74 20 61 70 3b 0a 20 20 76 61 5f 73 74 list ap;. va_st
3860: 61 72 74 28 61 70 2c 20 7a 46 6f 72 6d 61 74 29 art(ap, zFormat)
3870: 3b 0a 20 20 76 78 70 72 69 6e 74 66 28 70 42 6c ;. vxprintf(pBl
3880: 6f 62 2c 20 7a 46 6f 72 6d 61 74 2c 20 61 70 29 ob, zFormat, ap)
3890: 3b 0a 20 20 76 61 5f 65 6e 64 28 61 70 29 3b 0a ;. va_end(ap);.
38a0: 7d 0a 76 6f 69 64 20 62 6c 6f 62 5f 76 61 70 70 }.void blob_vapp
38b0: 65 6e 64 66 28 42 6c 6f 62 20 2a 70 42 6c 6f 62 endf(Blob *pBlob
38c0: 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 46 , const char *zF
38d0: 6f 72 6d 61 74 2c 20 76 61 5f 6c 69 73 74 20 61 ormat, va_list a
38e0: 70 29 7b 0a 20 20 76 78 70 72 69 6e 74 66 28 70 p){. vxprintf(p
38f0: 42 6c 6f 62 2c 20 7a 46 6f 72 6d 61 74 2c 20 61 Blob, zFormat, a
3900: 70 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6e 69 p);.}../*.** Ini
3910: 74 61 6c 69 7a 65 20 61 20 62 6c 6f 62 20 74 6f talize a blob to
3920: 20 74 68 65 20 64 61 74 61 20 6f 6e 20 61 6e 20 the data on an
3930: 69 6e 70 75 74 20 63 68 61 6e 6e 65 6c 2e 20 20 input channel.
3940: 52 65 74 75 72 6e 20 0a 2a 2a 20 74 68 65 20 6e Return .** the n
3950: 75 6d 62 65 72 20 6f 66 20 62 79 74 65 73 20 72 umber of bytes r
3960: 65 61 64 20 69 6e 74 6f 20 74 68 65 20 62 6c 6f ead into the blo
3970: 62 2e 20 20 41 6e 79 20 70 72 69 6f 72 20 63 6f b. Any prior co
3980: 6e 74 65 6e 74 0a 2a 2a 20 6f 66 20 74 68 65 20 ntent.** of the
3990: 62 6c 6f 62 20 69 73 20 64 69 73 63 61 72 64 65 blob is discarde
39a0: 64 2c 20 6e 6f 74 20 66 72 65 65 64 2e 0a 2a 2f d, not freed..*/
39b0: 0a 69 6e 74 20 62 6c 6f 62 5f 72 65 61 64 5f 66 .int blob_read_f
39c0: 72 6f 6d 5f 63 68 61 6e 6e 65 6c 28 42 6c 6f 62 rom_channel(Blob
39d0: 20 2a 70 42 6c 6f 62 2c 20 46 49 4c 45 20 2a 69 *pBlob, FILE *i
39e0: 6e 2c 20 69 6e 74 20 6e 54 6f 52 65 61 64 29 7b n, int nToRead){
39f0: 0a 20 20 73 69 7a 65 5f 74 20 6e 3b 0a 20 20 62 . size_t n;. b
3a00: 6c 6f 62 5f 7a 65 72 6f 28 70 42 6c 6f 62 29 3b lob_zero(pBlob);
3a10: 0a 20 20 69 66 28 20 6e 54 6f 52 65 61 64 3c 30 . if( nToRead<0
3a20: 20 29 7b 0a 20 20 20 20 63 68 61 72 20 7a 42 75 ){. char zBu
3a30: 66 5b 31 30 30 30 30 5d 3b 0a 20 20 20 20 77 68 f[10000];. wh
3a40: 69 6c 65 28 20 21 66 65 6f 66 28 69 6e 29 20 29 ile( !feof(in) )
3a50: 7b 0a 20 20 20 20 20 20 6e 20 3d 20 66 72 65 61 {. n = frea
3a60: 64 28 7a 42 75 66 2c 20 31 2c 20 73 69 7a 65 6f d(zBuf, 1, sizeo
3a70: 66 28 7a 42 75 66 29 2c 20 69 6e 29 3b 0a 20 20 f(zBuf), in);.
3a80: 20 20 20 20 69 66 28 20 6e 3e 30 20 29 7b 0a 20 if( n>0 ){.
3a90: 20 20 20 20 20 20 20 62 6c 6f 62 5f 61 70 70 65 blob_appe
3aa0: 6e 64 28 70 42 6c 6f 62 2c 20 7a 42 75 66 2c 20 nd(pBlob, zBuf,
3ab0: 6e 29 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 n);. }.
3ac0: 7d 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 62 }. }else{. b
3ad0: 6c 6f 62 5f 72 65 73 69 7a 65 28 70 42 6c 6f 62 lob_resize(pBlob
3ae0: 2c 20 6e 54 6f 52 65 61 64 29 3b 0a 20 20 20 20 , nToRead);.
3af0: 6e 20 3d 20 66 72 65 61 64 28 62 6c 6f 62 5f 62 n = fread(blob_b
3b00: 75 66 66 65 72 28 70 42 6c 6f 62 29 2c 20 31 2c uffer(pBlob), 1,
3b10: 20 6e 54 6f 52 65 61 64 2c 20 69 6e 29 3b 0a 20 nToRead, in);.
3b20: 20 20 20 62 6c 6f 62 5f 72 65 73 69 7a 65 28 70 blob_resize(p
3b30: 42 6c 6f 62 2c 20 6e 29 3b 0a 20 20 7d 0a 20 20 Blob, n);. }.
3b40: 72 65 74 75 72 6e 20 62 6c 6f 62 5f 73 69 7a 65 return blob_size
3b50: 28 70 42 6c 6f 62 29 3b 0a 7d 0a 0a 2f 2a 0a 2a (pBlob);.}../*.*
3b60: 2a 20 49 6e 69 74 69 61 6c 69 7a 65 20 61 20 62 * Initialize a b
3b70: 6c 6f 62 20 74 6f 20 62 65 20 74 68 65 20 63 6f lob to be the co
3b80: 6e 74 65 6e 74 20 6f 66 20 61 20 66 69 6c 65 2e ntent of a file.
3b90: 20 20 49 66 20 74 68 65 20 66 69 6c 65 6e 61 6d If the filenam
3ba0: 65 0a 2a 2a 20 69 73 20 62 6c 61 6e 6b 20 6f 72 e.** is blank or
3bb0: 20 22 2d 22 20 74 68 65 6e 20 72 65 61 64 20 66 "-" then read f
3bc0: 72 6f 6d 20 73 74 61 6e 64 61 72 64 20 69 6e 70 rom standard inp
3bd0: 75 74 2e 0a 2a 2a 0a 2a 2a 20 41 6e 79 20 70 72 ut..**.** Any pr
3be0: 69 6f 72 20 63 6f 6e 74 65 6e 74 20 6f 66 20 74 ior content of t
3bf0: 68 65 20 62 6c 6f 62 20 69 73 20 64 69 73 63 61 he blob is disca
3c00: 72 64 65 64 2c 20 6e 6f 74 20 66 72 65 65 64 2e rded, not freed.
3c10: 0a 2a 2a 0a 2a 2a 20 52 65 74 75 72 6e 20 74 68 .**.** Return th
3c20: 65 20 6e 75 6d 62 65 72 20 6f 66 20 62 79 74 65 e number of byte
3c30: 73 20 72 65 61 64 2e 20 20 52 65 74 75 72 6e 20 s read. Return
3c40: 2d 31 20 66 6f 72 20 61 6e 20 65 72 72 6f 72 2e -1 for an error.
3c50: 0a 2a 2f 0a 69 6e 74 20 62 6c 6f 62 5f 72 65 61 .*/.int blob_rea
3c60: 64 5f 66 72 6f 6d 5f 66 69 6c 65 28 42 6c 6f 62 d_from_file(Blob
3c70: 20 2a 70 42 6c 6f 62 2c 20 63 6f 6e 73 74 20 63 *pBlob, const c
3c80: 68 61 72 20 2a 7a 46 69 6c 65 6e 61 6d 65 29 7b har *zFilename){
3c90: 0a 20 20 69 6e 74 20 73 69 7a 65 2c 20 67 6f 74 . int size, got
3ca0: 3b 0a 20 20 46 49 4c 45 20 2a 69 6e 3b 0a 20 20 ;. FILE *in;.
3cb0: 69 66 28 20 7a 46 69 6c 65 6e 61 6d 65 3d 3d 30 if( zFilename==0
3cc0: 20 7c 7c 20 7a 46 69 6c 65 6e 61 6d 65 5b 30 5d || zFilename[0]
3cd0: 3d 3d 30 0a 20 20 20 20 20 20 20 20 7c 7c 20 28 ==0. || (
3ce0: 7a 46 69 6c 65 6e 61 6d 65 5b 30 5d 3d 3d 27 2d zFilename[0]=='-
3cf0: 27 20 26 26 20 7a 46 69 6c 65 6e 61 6d 65 5b 31 ' && zFilename[1
3d00: 5d 3d 3d 30 29 20 29 7b 0a 20 20 20 20 72 65 74 ]==0) ){. ret
3d10: 75 72 6e 20 62 6c 6f 62 5f 72 65 61 64 5f 66 72 urn blob_read_fr
3d20: 6f 6d 5f 63 68 61 6e 6e 65 6c 28 70 42 6c 6f 62 om_channel(pBlob
3d30: 2c 20 73 74 64 69 6e 2c 20 2d 31 29 3b 0a 20 20 , stdin, -1);.
3d40: 7d 0a 20 20 73 69 7a 65 20 3d 20 66 69 6c 65 5f }. size = file_
3d50: 73 69 7a 65 28 7a 46 69 6c 65 6e 61 6d 65 29 3b size(zFilename);
3d60: 0a 20 20 62 6c 6f 62 5f 7a 65 72 6f 28 70 42 6c . blob_zero(pBl
3d70: 6f 62 29 3b 0a 20 20 69 66 28 20 73 69 7a 65 3c ob);. if( size<
3d80: 30 20 29 7b 0a 20 20 20 20 66 6f 73 73 69 6c 5f 0 ){. fossil_
3d90: 70 61 6e 69 63 28 22 6e 6f 20 73 75 63 68 20 66 panic("no such f
3da0: 69 6c 65 3a 20 25 73 22 2c 20 7a 46 69 6c 65 6e ile: %s", zFilen
3db0: 61 6d 65 29 3b 0a 20 20 7d 0a 20 20 69 66 28 20 ame);. }. if(
3dc0: 73 69 7a 65 3d 3d 30 20 29 7b 0a 20 20 20 20 72 size==0 ){. r
3dd0: 65 74 75 72 6e 20 30 3b 0a 20 20 7d 0a 20 20 62 eturn 0;. }. b
3de0: 6c 6f 62 5f 72 65 73 69 7a 65 28 70 42 6c 6f 62 lob_resize(pBlob
3df0: 2c 20 73 69 7a 65 29 3b 0a 20 20 69 6e 20 3d 20 , size);. in =
3e00: 66 6f 70 65 6e 28 7a 46 69 6c 65 6e 61 6d 65 2c fopen(zFilename,
3e10: 20 22 72 62 22 29 3b 0a 20 20 69 66 28 20 69 6e "rb");. if( in
3e20: 3d 3d 30 20 29 7b 0a 20 20 20 20 66 6f 73 73 69 ==0 ){. fossi
3e30: 6c 5f 70 61 6e 69 63 28 22 63 61 6e 6e 6f 74 20 l_panic("cannot
3e40: 6f 70 65 6e 20 25 73 20 66 6f 72 20 72 65 61 64 open %s for read
3e50: 69 6e 67 22 2c 20 7a 46 69 6c 65 6e 61 6d 65 29 ing", zFilename)
3e60: 3b 0a 20 20 7d 0a 20 20 67 6f 74 20 3d 20 66 72 ;. }. got = fr
3e70: 65 61 64 28 62 6c 6f 62 5f 62 75 66 66 65 72 28 ead(blob_buffer(
3e80: 70 42 6c 6f 62 29 2c 20 31 2c 20 73 69 7a 65 2c pBlob), 1, size,
3e90: 20 69 6e 29 3b 0a 20 20 66 63 6c 6f 73 65 28 69 in);. fclose(i
3ea0: 6e 29 3b 0a 20 20 69 66 28 20 67 6f 74 3c 73 69 n);. if( got<si
3eb0: 7a 65 20 29 7b 0a 20 20 20 20 62 6c 6f 62 5f 72 ze ){. blob_r
3ec0: 65 73 69 7a 65 28 70 42 6c 6f 62 2c 20 67 6f 74 esize(pBlob, got
3ed0: 29 3b 0a 20 20 7d 0a 20 20 72 65 74 75 72 6e 20 );. }. return
3ee0: 67 6f 74 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 57 72 got;.}../*.** Wr
3ef0: 69 74 65 20 74 68 65 20 63 6f 6e 74 65 6e 74 20 ite the content
3f00: 6f 66 20 61 20 62 6c 6f 62 20 69 6e 74 6f 20 61 of a blob into a
3f10: 20 66 69 6c 65 2e 0a 2a 2a 0a 2a 2a 20 49 66 20 file..**.** If
3f20: 74 68 65 20 66 69 6c 65 6e 61 6d 65 20 69 73 20 the filename is
3f30: 62 6c 61 6e 6b 20 6f 72 20 22 2d 22 20 74 68 65 blank or "-" the
3f40: 6e 20 77 72 69 74 65 20 74 6f 20 73 74 61 6e 64 n write to stand
3f50: 61 72 64 20 6f 75 74 70 75 74 2e 0a 2a 2a 0a 2a ard output..**.*
3f60: 2a 20 52 65 74 75 72 6e 20 74 68 65 20 6e 75 6d * Return the num
3f70: 62 65 72 20 6f 66 20 62 79 74 65 73 20 77 72 69 ber of bytes wri
3f80: 74 74 65 6e 2e 0a 2a 2f 0a 69 6e 74 20 62 6c 6f tten..*/.int blo
3f90: 62 5f 77 72 69 74 65 5f 74 6f 5f 66 69 6c 65 28 b_write_to_file(
3fa0: 42 6c 6f 62 20 2a 70 42 6c 6f 62 2c 20 63 6f 6e Blob *pBlob, con
3fb0: 73 74 20 63 68 61 72 20 2a 7a 46 69 6c 65 6e 61 st char *zFilena
3fc0: 6d 65 29 7b 0a 20 20 46 49 4c 45 20 2a 6f 75 74 me){. FILE *out
3fd0: 3b 0a 20 20 69 6e 74 20 6e 65 65 64 54 6f 43 6c ;. int needToCl
3fe0: 6f 73 65 3b 0a 20 20 69 6e 74 20 77 72 6f 74 65 ose;. int wrote
3ff0: 3b 0a 0a 20 20 69 66 28 20 7a 46 69 6c 65 6e 61 ;.. if( zFilena
4000: 6d 65 5b 30 5d 3d 3d 30 20 7c 7c 20 28 7a 46 69 me[0]==0 || (zFi
4010: 6c 65 6e 61 6d 65 5b 30 5d 3d 3d 27 2d 27 20 26 lename[0]=='-' &
4020: 26 20 7a 46 69 6c 65 6e 61 6d 65 5b 31 5d 3d 3d & zFilename[1]==
4030: 30 29 20 29 7b 0a 20 20 20 20 6f 75 74 20 3d 20 0) ){. out =
4040: 73 74 64 6f 75 74 3b 0a 20 20 20 20 6e 65 65 64 stdout;. need
4050: 54 6f 43 6c 6f 73 65 20 3d 20 30 3b 0a 20 20 7d ToClose = 0;. }
4060: 65 6c 73 65 7b 0a 20 20 20 20 69 6e 74 20 69 2c else{. int i,
4070: 20 6e 4e 61 6d 65 3b 0a 20 20 20 20 63 68 61 72 nName;. char
4080: 20 2a 7a 4e 61 6d 65 2c 20 7a 42 75 66 5b 31 30 *zName, zBuf[10
4090: 30 30 5d 3b 0a 0a 20 20 20 20 6e 4e 61 6d 65 20 00];.. nName
40a0: 3d 20 73 74 72 6c 65 6e 28 7a 46 69 6c 65 6e 61 = strlen(zFilena
40b0: 6d 65 29 3b 0a 20 20 20 20 69 66 28 20 6e 4e 61 me);. if( nNa
40c0: 6d 65 3e 3d 73 69 7a 65 6f 66 28 7a 42 75 66 29 me>=sizeof(zBuf)
40d0: 20 29 7b 0a 20 20 20 20 20 20 7a 4e 61 6d 65 20 ){. zName
40e0: 3d 20 6d 70 72 69 6e 74 66 28 22 25 73 22 2c 20 = mprintf("%s",
40f0: 7a 46 69 6c 65 6e 61 6d 65 29 3b 0a 20 20 20 20 zFilename);.
4100: 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 7a 4e 61 }else{. zNa
4110: 6d 65 20 3d 20 7a 42 75 66 3b 0a 20 20 20 20 20 me = zBuf;.
4120: 20 73 74 72 63 70 79 28 7a 4e 61 6d 65 2c 20 7a strcpy(zName, z
4130: 46 69 6c 65 6e 61 6d 65 29 3b 0a 20 20 20 20 7d Filename);. }
4140: 0a 20 20 20 20 6e 4e 61 6d 65 20 3d 20 66 69 6c . nName = fil
4150: 65 5f 73 69 6d 70 6c 69 66 79 5f 6e 61 6d 65 28 e_simplify_name(
4160: 7a 4e 61 6d 65 2c 20 6e 4e 61 6d 65 29 3b 0a 20 zName, nName);.
4170: 20 20 20 66 6f 72 28 69 3d 31 3b 20 69 3c 6e 4e for(i=1; i<nN
4180: 61 6d 65 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 20 ame; i++){.
4190: 20 69 66 28 20 7a 4e 61 6d 65 5b 69 5d 3d 3d 27 if( zName[i]=='
41a0: 2f 27 20 29 7b 0a 20 20 20 20 20 20 20 20 7a 4e /' ){. zN
41b0: 61 6d 65 5b 69 5d 20 3d 20 30 3b 0a 23 69 66 64 ame[i] = 0;.#ifd
41c0: 65 66 20 5f 5f 4d 49 4e 47 57 33 32 5f 5f 0a 20 ef __MINGW32__.
41d0: 20 20 20 20 20 20 20 2f 2a 0a 20 20 20 20 20 20 /*.
41e0: 20 20 2a 2a 20 4f 6e 20 57 69 6e 64 6f 77 73 2c ** On Windows,
41f0: 20 6c 6f 63 61 6c 20 70 61 74 68 20 6c 6f 6f 6b local path look
4200: 73 20 6c 69 6b 65 3a 20 43 3a 2f 64 65 76 65 6c s like: C:/devel
4210: 6f 70 2f 70 72 6f 6a 65 63 74 2f 66 69 6c 65 2e op/project/file.
4220: 74 78 74 0a 20 20 20 20 20 20 20 20 2a 2a 20 54 txt. ** T
4230: 68 65 20 69 66 20 73 74 6f 70 73 20 75 73 20 66 he if stops us f
4240: 72 6f 6d 20 74 72 79 69 6e 67 20 74 6f 20 63 72 rom trying to cr
4250: 65 61 74 65 20 61 20 64 69 72 65 63 74 6f 72 79 eate a directory
4260: 20 6f 66 20 61 20 64 72 69 76 65 20 6c 65 74 74 of a drive lett
4270: 65 72 0a 20 20 20 20 20 20 20 20 2a 2a 20 43 3a er. ** C:
4280: 20 69 6e 20 74 68 69 73 20 65 78 61 6d 70 6c 65 in this example
4290: 2e 0a 20 20 20 20 20 20 20 20 2a 2f 0a 20 20 20 .. */.
42a0: 20 20 20 20 20 69 66 28 20 21 28 69 3d 3d 32 20 if( !(i==2
42b0: 26 26 20 7a 4e 61 6d 65 5b 31 5d 3d 3d 27 3a 27 && zName[1]==':'
42c0: 29 20 29 7b 0a 23 65 6e 64 69 66 0a 20 20 20 20 ) ){.#endif.
42d0: 20 20 20 20 20 20 69 66 28 20 66 69 6c 65 5f 6d if( file_m
42e0: 6b 64 69 72 28 7a 4e 61 6d 65 2c 20 31 29 20 29 kdir(zName, 1) )
42f0: 7b 0a 20 20 20 20 20 20 20 20 20 20 20 20 66 6f {. fo
4300: 73 73 69 6c 5f 70 61 6e 69 63 28 22 75 6e 61 62 ssil_panic("unab
4310: 6c 65 20 74 6f 20 63 72 65 61 74 65 20 64 69 72 le to create dir
4320: 65 63 74 6f 72 79 20 25 73 22 2c 20 7a 4e 61 6d ectory %s", zNam
4330: 65 29 3b 0a 20 20 20 20 20 20 20 20 20 20 7d 0a e);. }.
4340: 23 69 66 64 65 66 20 5f 5f 4d 49 4e 47 57 33 32 #ifdef __MINGW32
4350: 5f 5f 0a 20 20 20 20 20 20 20 20 7d 0a 23 65 6e __. }.#en
4360: 64 69 66 0a 20 20 20 20 20 20 20 20 7a 4e 61 6d dif. zNam
4370: 65 5b 69 5d 20 3d 20 27 2f 27 3b 0a 20 20 20 20 e[i] = '/';.
4380: 20 20 7d 0a 20 20 20 20 7d 0a 20 20 20 20 6f 75 }. }. ou
4390: 74 20 3d 20 66 6f 70 65 6e 28 7a 4e 61 6d 65 2c t = fopen(zName,
43a0: 20 22 77 62 22 29 3b 0a 20 20 20 20 69 66 28 20 "wb");. if(
43b0: 6f 75 74 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 out==0 ){.
43c0: 66 6f 73 73 69 6c 5f 70 61 6e 69 63 28 22 75 6e fossil_panic("un
43d0: 61 62 6c 65 20 74 6f 20 6f 70 65 6e 20 66 69 6c able to open fil
43e0: 65 20 5c 22 25 73 5c 22 20 66 6f 72 20 77 72 69 e \"%s\" for wri
43f0: 74 69 6e 67 22 2c 20 7a 4e 61 6d 65 29 3b 0a 20 ting", zName);.
4400: 20 20 20 7d 0a 20 20 20 20 6e 65 65 64 54 6f 43 }. needToC
4410: 6c 6f 73 65 20 3d 20 31 3b 0a 20 20 20 20 69 66 lose = 1;. if
4420: 28 20 7a 4e 61 6d 65 21 3d 7a 42 75 66 20 29 20 ( zName!=zBuf )
4430: 66 72 65 65 28 7a 4e 61 6d 65 29 3b 0a 20 20 7d free(zName);. }
4440: 0a 20 20 62 6c 6f 62 5f 69 73 5f 69 6e 69 74 28 . blob_is_init(
4450: 70 42 6c 6f 62 29 3b 0a 20 20 77 72 6f 74 65 20 pBlob);. wrote
4460: 3d 20 66 77 72 69 74 65 28 62 6c 6f 62 5f 62 75 = fwrite(blob_bu
4470: 66 66 65 72 28 70 42 6c 6f 62 29 2c 20 31 2c 20 ffer(pBlob), 1,
4480: 62 6c 6f 62 5f 73 69 7a 65 28 70 42 6c 6f 62 29 blob_size(pBlob)
4490: 2c 20 6f 75 74 29 3b 0a 20 20 69 66 28 20 6e 65 , out);. if( ne
44a0: 65 64 54 6f 43 6c 6f 73 65 20 29 20 66 63 6c 6f edToClose ) fclo
44b0: 73 65 28 6f 75 74 29 3b 0a 20 20 69 66 28 20 77 se(out);. if( w
44c0: 72 6f 74 65 21 3d 62 6c 6f 62 5f 73 69 7a 65 28 rote!=blob_size(
44d0: 70 42 6c 6f 62 29 20 29 7b 0a 20 20 20 20 66 6f pBlob) ){. fo
44e0: 73 73 69 6c 5f 70 61 6e 69 63 28 22 73 68 6f 72 ssil_panic("shor
44f0: 74 20 77 72 69 74 65 3a 20 25 64 20 6f 66 20 25 t write: %d of %
4500: 64 20 62 79 74 65 73 20 74 6f 20 25 73 22 2c 20 d bytes to %s",
4510: 77 72 6f 74 65 2c 0a 20 20 20 20 20 20 20 62 6c wrote,. bl
4520: 6f 62 5f 73 69 7a 65 28 70 42 6c 6f 62 29 2c 20 ob_size(pBlob),
4530: 7a 46 69 6c 65 6e 61 6d 65 29 3b 0a 20 20 7d 0a zFilename);. }.
4540: 20 20 72 65 74 75 72 6e 20 77 72 6f 74 65 3b 0a return wrote;.
4550: 7d 0a 0a 2f 2a 0a 2a 2a 20 43 6f 6d 70 72 65 73 }../*.** Compres
4560: 73 20 61 20 62 6c 6f 62 20 70 49 6e 2e 20 20 53 s a blob pIn. S
4570: 74 6f 72 65 20 74 68 65 20 72 65 73 75 6c 74 20 tore the result
4580: 69 6e 20 70 4f 75 74 2e 20 20 49 74 20 69 73 20 in pOut. It is
4590: 6f 6b 20 66 6f 72 20 70 49 6e 20 61 6e 64 0a 2a ok for pIn and.*
45a0: 2a 20 70 4f 75 74 20 74 6f 20 62 65 20 74 68 65 * pOut to be the
45b0: 20 73 61 6d 65 20 62 6c 6f 62 2e 20 0a 2a 2a 20 same blob. .**
45c0: 0a 2a 2a 20 70 4f 75 74 20 6d 75 73 74 20 65 69 .** pOut must ei
45d0: 74 68 65 72 20 62 65 20 74 68 65 20 73 61 6d 65 ther be the same
45e0: 20 61 73 20 70 49 6e 20 6f 72 20 65 6c 73 65 20 as pIn or else
45f0: 75 6e 69 6e 69 74 69 61 6c 69 7a 65 64 2e 0a 2a uninitialized..*
4600: 2f 0a 76 6f 69 64 20 62 6c 6f 62 5f 63 6f 6d 70 /.void blob_comp
4610: 72 65 73 73 28 42 6c 6f 62 20 2a 70 49 6e 2c 20 ress(Blob *pIn,
4620: 42 6c 6f 62 20 2a 70 4f 75 74 29 7b 0a 20 20 75 Blob *pOut){. u
4630: 6e 73 69 67 6e 65 64 20 69 6e 74 20 6e 49 6e 20 nsigned int nIn
4640: 3d 20 62 6c 6f 62 5f 73 69 7a 65 28 70 49 6e 29 = blob_size(pIn)
4650: 3b 0a 20 20 75 6e 73 69 67 6e 65 64 20 69 6e 74 ;. unsigned int
4660: 20 6e 4f 75 74 20 3d 20 31 33 20 2b 20 6e 49 6e nOut = 13 + nIn
4670: 20 2b 20 28 6e 49 6e 2b 39 39 39 29 2f 31 30 30 + (nIn+999)/100
4680: 30 3b 0a 20 20 75 6e 73 69 67 6e 65 64 20 6c 6f 0;. unsigned lo
4690: 6e 67 20 69 6e 74 20 6e 4f 75 74 32 3b 0a 20 20 ng int nOut2;.
46a0: 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 6f unsigned char *o
46b0: 75 74 42 75 66 3b 0a 20 20 42 6c 6f 62 20 74 65 utBuf;. Blob te
46c0: 6d 70 3b 0a 20 20 62 6c 6f 62 5f 7a 65 72 6f 28 mp;. blob_zero(
46d0: 26 74 65 6d 70 29 3b 0a 20 20 62 6c 6f 62 5f 72 &temp);. blob_r
46e0: 65 73 69 7a 65 28 26 74 65 6d 70 2c 20 6e 4f 75 esize(&temp, nOu
46f0: 74 2b 34 29 3b 0a 20 20 6f 75 74 42 75 66 20 3d t+4);. outBuf =
4700: 20 28 75 6e 73 69 67 6e 65 64 20 63 68 61 72 2a (unsigned char*
4710: 29 62 6c 6f 62 5f 62 75 66 66 65 72 28 26 74 65 )blob_buffer(&te
4720: 6d 70 29 3b 0a 20 20 6f 75 74 42 75 66 5b 30 5d mp);. outBuf[0]
4730: 20 3d 20 6e 49 6e 3e 3e 32 34 20 26 20 30 78 66 = nIn>>24 & 0xf
4740: 66 3b 0a 20 20 6f 75 74 42 75 66 5b 31 5d 20 3d f;. outBuf[1] =
4750: 20 6e 49 6e 3e 3e 31 36 20 26 20 30 78 66 66 3b nIn>>16 & 0xff;
4760: 0a 20 20 6f 75 74 42 75 66 5b 32 5d 20 3d 20 6e . outBuf[2] = n
4770: 49 6e 3e 3e 38 20 26 20 30 78 66 66 3b 0a 20 20 In>>8 & 0xff;.
4780: 6f 75 74 42 75 66 5b 33 5d 20 3d 20 6e 49 6e 20 outBuf[3] = nIn
4790: 26 20 30 78 66 66 3b 0a 20 20 6e 4f 75 74 32 20 & 0xff;. nOut2
47a0: 3d 20 28 6c 6f 6e 67 20 69 6e 74 29 6e 4f 75 74 = (long int)nOut
47b0: 3b 0a 20 20 63 6f 6d 70 72 65 73 73 28 26 6f 75 ;. compress(&ou
47c0: 74 42 75 66 5b 34 5d 2c 20 26 6e 4f 75 74 32 2c tBuf[4], &nOut2,
47d0: 0a 20 20 20 20 20 20 20 20 20 20 20 28 75 6e 73 . (uns
47e0: 69 67 6e 65 64 20 63 68 61 72 2a 29 62 6c 6f 62 igned char*)blob
47f0: 5f 62 75 66 66 65 72 28 70 49 6e 29 2c 20 62 6c _buffer(pIn), bl
4800: 6f 62 5f 73 69 7a 65 28 70 49 6e 29 29 3b 0a 20 ob_size(pIn));.
4810: 20 69 66 28 20 70 4f 75 74 3d 3d 70 49 6e 20 29 if( pOut==pIn )
4820: 20 62 6c 6f 62 5f 72 65 73 65 74 28 70 4f 75 74 blob_reset(pOut
4830: 29 3b 0a 20 20 62 6c 6f 62 5f 69 73 5f 72 65 73 );. blob_is_res
4840: 65 74 28 70 4f 75 74 29 3b 0a 20 20 2a 70 4f 75 et(pOut);. *pOu
4850: 74 20 3d 20 74 65 6d 70 3b 0a 20 20 62 6c 6f 62 t = temp;. blob
4860: 5f 72 65 73 69 7a 65 28 70 4f 75 74 2c 20 6e 4f _resize(pOut, nO
4870: 75 74 32 2b 34 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a ut2+4);.}../*.**
4880: 20 43 4f 4d 4d 41 4e 44 3a 20 74 65 73 74 2d 63 COMMAND: test-c
4890: 6f 6d 70 72 65 73 73 0a 2a 2f 0a 76 6f 69 64 20 ompress.*/.void
48a0: 63 6f 6d 70 72 65 73 73 5f 63 6d 64 28 76 6f 69 compress_cmd(voi
48b0: 64 29 7b 0a 20 20 42 6c 6f 62 20 66 3b 0a 20 20 d){. Blob f;.
48c0: 69 66 28 20 67 2e 61 72 67 63 21 3d 34 20 29 20 if( g.argc!=4 )
48d0: 75 73 61 67 65 28 22 49 4e 50 55 54 46 49 4c 45 usage("INPUTFILE
48e0: 20 4f 55 54 50 55 54 46 49 4c 45 22 29 3b 0a 20 OUTPUTFILE");.
48f0: 20 62 6c 6f 62 5f 72 65 61 64 5f 66 72 6f 6d 5f blob_read_from_
4900: 66 69 6c 65 28 26 66 2c 20 67 2e 61 72 67 76 5b file(&f, g.argv[
4910: 32 5d 29 3b 0a 20 20 62 6c 6f 62 5f 63 6f 6d 70 2]);. blob_comp
4920: 72 65 73 73 28 26 66 2c 20 26 66 29 3b 0a 20 20 ress(&f, &f);.
4930: 62 6c 6f 62 5f 77 72 69 74 65 5f 74 6f 5f 66 69 blob_write_to_fi
4940: 6c 65 28 26 66 2c 20 67 2e 61 72 67 76 5b 33 5d le(&f, g.argv[3]
4950: 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 43 6f 6d 70 );.}../*.** Comp
4960: 72 65 73 73 20 74 68 65 20 63 6f 6e 63 61 74 65 ress the concate
4970: 6e 61 74 69 6f 6e 20 6f 66 20 61 20 62 6c 6f 62 nation of a blob
4980: 73 20 70 49 6e 31 20 61 6e 64 20 70 49 6e 32 2e s pIn1 and pIn2.
4990: 20 20 53 74 6f 72 65 20 74 68 65 20 72 65 73 75 Store the resu
49a0: 6c 74 20 0a 2a 2a 20 69 6e 20 70 4f 75 74 2e 20 lt .** in pOut.
49b0: 0a 2a 2a 20 0a 2a 2a 20 70 4f 75 74 20 6d 75 73 .** .** pOut mus
49c0: 74 20 62 65 20 65 69 74 68 65 72 20 75 6e 69 6e t be either unin
49d0: 69 74 69 61 6c 69 7a 65 64 20 6f 72 20 6d 75 73 itialized or mus
49e0: 74 20 62 65 20 74 68 65 20 73 61 6d 65 20 61 73 t be the same as
49f0: 20 65 69 74 68 65 72 20 70 49 6e 31 20 6f 72 0a either pIn1 or.
4a00: 2a 2a 20 70 49 6e 32 2e 0a 2a 2f 0a 76 6f 69 64 ** pIn2..*/.void
4a10: 20 62 6c 6f 62 5f 63 6f 6d 70 72 65 73 73 32 28 blob_compress2(
4a20: 42 6c 6f 62 20 2a 70 49 6e 31 2c 20 42 6c 6f 62 Blob *pIn1, Blob
4a30: 20 2a 70 49 6e 32 2c 20 42 6c 6f 62 20 2a 70 4f *pIn2, Blob *pO
4a40: 75 74 29 7b 0a 20 20 75 6e 73 69 67 6e 65 64 20 ut){. unsigned
4a50: 69 6e 74 20 6e 49 6e 20 3d 20 62 6c 6f 62 5f 73 int nIn = blob_s
4a60: 69 7a 65 28 70 49 6e 31 29 20 2b 20 62 6c 6f 62 ize(pIn1) + blob
4a70: 5f 73 69 7a 65 28 70 49 6e 32 29 3b 0a 20 20 75 _size(pIn2);. u
4a80: 6e 73 69 67 6e 65 64 20 69 6e 74 20 6e 4f 75 74 nsigned int nOut
4a90: 20 3d 20 31 33 20 2b 20 6e 49 6e 20 2b 20 28 6e = 13 + nIn + (n
4aa0: 49 6e 2b 39 39 39 29 2f 31 30 30 30 3b 0a 20 20 In+999)/1000;.
4ab0: 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 6f unsigned char *o
4ac0: 75 74 42 75 66 3b 0a 20 20 7a 5f 73 74 72 65 61 utBuf;. z_strea
4ad0: 6d 20 73 74 72 65 61 6d 3b 0a 20 20 42 6c 6f 62 m stream;. Blob
4ae0: 20 74 65 6d 70 3b 0a 20 20 62 6c 6f 62 5f 7a 65 temp;. blob_ze
4af0: 72 6f 28 26 74 65 6d 70 29 3b 0a 20 20 62 6c 6f ro(&temp);. blo
4b00: 62 5f 72 65 73 69 7a 65 28 26 74 65 6d 70 2c 20 b_resize(&temp,
4b10: 6e 4f 75 74 2b 34 29 3b 0a 20 20 6f 75 74 42 75 nOut+4);. outBu
4b20: 66 20 3d 20 28 75 6e 73 69 67 6e 65 64 20 63 68 f = (unsigned ch
4b30: 61 72 2a 29 62 6c 6f 62 5f 62 75 66 66 65 72 28 ar*)blob_buffer(
4b40: 26 74 65 6d 70 29 3b 0a 20 20 6f 75 74 42 75 66 &temp);. outBuf
4b50: 5b 30 5d 20 3d 20 6e 49 6e 3e 3e 32 34 20 26 20 [0] = nIn>>24 &
4b60: 30 78 66 66 3b 0a 20 20 6f 75 74 42 75 66 5b 31 0xff;. outBuf[1
4b70: 5d 20 3d 20 6e 49 6e 3e 3e 31 36 20 26 20 30 78 ] = nIn>>16 & 0x
4b80: 66 66 3b 0a 20 20 6f 75 74 42 75 66 5b 32 5d 20 ff;. outBuf[2]
4b90: 3d 20 6e 49 6e 3e 3e 38 20 26 20 30 78 66 66 3b = nIn>>8 & 0xff;
4ba0: 0a 20 20 6f 75 74 42 75 66 5b 33 5d 20 3d 20 6e . outBuf[3] = n
4bb0: 49 6e 20 26 20 30 78 66 66 3b 0a 20 20 73 74 72 In & 0xff;. str
4bc0: 65 61 6d 2e 7a 61 6c 6c 6f 63 20 3d 20 28 61 6c eam.zalloc = (al
4bd0: 6c 6f 63 5f 66 75 6e 63 29 30 3b 0a 20 20 73 74 loc_func)0;. st
4be0: 72 65 61 6d 2e 7a 66 72 65 65 20 3d 20 28 66 72 ream.zfree = (fr
4bf0: 65 65 5f 66 75 6e 63 29 30 3b 0a 20 20 73 74 72 ee_func)0;. str
4c00: 65 61 6d 2e 6f 70 61 71 75 65 20 3d 20 30 3b 0a eam.opaque = 0;.
4c10: 20 20 73 74 72 65 61 6d 2e 61 76 61 69 6c 5f 6f stream.avail_o
4c20: 75 74 20 3d 20 6e 4f 75 74 3b 0a 20 20 73 74 72 ut = nOut;. str
4c30: 65 61 6d 2e 6e 65 78 74 5f 6f 75 74 20 3d 20 26 eam.next_out = &
4c40: 6f 75 74 42 75 66 5b 34 5d 3b 0a 20 20 64 65 66 outBuf[4];. def
4c50: 6c 61 74 65 49 6e 69 74 28 26 73 74 72 65 61 6d lateInit(&stream
4c60: 2c 20 39 29 3b 0a 20 20 73 74 72 65 61 6d 2e 61 , 9);. stream.a
4c70: 76 61 69 6c 5f 69 6e 20 3d 20 62 6c 6f 62 5f 73 vail_in = blob_s
4c80: 69 7a 65 28 70 49 6e 31 29 3b 0a 20 20 73 74 72 ize(pIn1);. str
4c90: 65 61 6d 2e 6e 65 78 74 5f 69 6e 20 3d 20 28 75 eam.next_in = (u
4ca0: 6e 73 69 67 6e 65 64 20 63 68 61 72 2a 29 62 6c nsigned char*)bl
4cb0: 6f 62 5f 62 75 66 66 65 72 28 70 49 6e 31 29 3b ob_buffer(pIn1);
4cc0: 0a 20 20 64 65 66 6c 61 74 65 28 26 73 74 72 65 . deflate(&stre
4cd0: 61 6d 2c 20 30 29 3b 0a 20 20 73 74 72 65 61 6d am, 0);. stream
4ce0: 2e 61 76 61 69 6c 5f 69 6e 20 3d 20 62 6c 6f 62 .avail_in = blob
4cf0: 5f 73 69 7a 65 28 70 49 6e 32 29 3b 0a 20 20 73 _size(pIn2);. s
4d00: 74 72 65 61 6d 2e 6e 65 78 74 5f 69 6e 20 3d 20 tream.next_in =
4d10: 28 75 6e 73 69 67 6e 65 64 20 63 68 61 72 2a 29 (unsigned char*)
4d20: 62 6c 6f 62 5f 62 75 66 66 65 72 28 70 49 6e 32 blob_buffer(pIn2
4d30: 29 3b 0a 20 20 64 65 66 6c 61 74 65 28 26 73 74 );. deflate(&st
4d40: 72 65 61 6d 2c 20 30 29 3b 0a 20 20 64 65 66 6c ream, 0);. defl
4d50: 61 74 65 28 26 73 74 72 65 61 6d 2c 20 5a 5f 46 ate(&stream, Z_F
4d60: 49 4e 49 53 48 29 3b 0a 20 20 62 6c 6f 62 5f 72 INISH);. blob_r
4d70: 65 73 69 7a 65 28 26 74 65 6d 70 2c 20 73 74 72 esize(&temp, str
4d80: 65 61 6d 2e 74 6f 74 61 6c 5f 6f 75 74 20 2b 20 eam.total_out +
4d90: 34 29 3b 0a 20 20 64 65 66 6c 61 74 65 45 6e 64 4);. deflateEnd
4da0: 28 26 73 74 72 65 61 6d 29 3b 0a 20 20 69 66 28 (&stream);. if(
4db0: 20 70 4f 75 74 3d 3d 70 49 6e 31 20 29 20 62 6c pOut==pIn1 ) bl
4dc0: 6f 62 5f 72 65 73 65 74 28 70 4f 75 74 29 3b 0a ob_reset(pOut);.
4dd0: 20 20 69 66 28 20 70 4f 75 74 3d 3d 70 49 6e 32 if( pOut==pIn2
4de0: 20 29 20 62 6c 6f 62 5f 72 65 73 65 74 28 70 4f ) blob_reset(pO
4df0: 75 74 29 3b 0a 20 20 62 6c 6f 62 5f 69 73 5f 72 ut);. blob_is_r
4e00: 65 73 65 74 28 70 4f 75 74 29 3b 0a 20 20 2a 70 eset(pOut);. *p
4e10: 4f 75 74 20 3d 20 74 65 6d 70 3b 0a 7d 0a 0a 2f Out = temp;.}../
4e20: 2a 0a 2a 2a 20 43 4f 4d 4d 41 4e 44 3a 20 74 65 *.** COMMAND: te
4e30: 73 74 2d 63 6f 6d 70 72 65 73 73 2d 32 0a 2a 2f st-compress-2.*/
4e40: 0a 76 6f 69 64 20 63 6f 6d 70 72 65 73 73 32 5f .void compress2_
4e50: 63 6d 64 28 76 6f 69 64 29 7b 0a 20 20 42 6c 6f cmd(void){. Blo
4e60: 62 20 66 31 2c 20 66 32 3b 0a 20 20 69 66 28 20 b f1, f2;. if(
4e70: 67 2e 61 72 67 63 21 3d 35 20 29 20 75 73 61 67 g.argc!=5 ) usag
4e80: 65 28 22 49 4e 50 55 54 46 49 4c 45 31 20 49 4e e("INPUTFILE1 IN
4e90: 50 55 54 46 49 4c 45 32 20 4f 55 54 50 55 54 46 PUTFILE2 OUTPUTF
4ea0: 49 4c 45 22 29 3b 0a 20 20 62 6c 6f 62 5f 72 65 ILE");. blob_re
4eb0: 61 64 5f 66 72 6f 6d 5f 66 69 6c 65 28 26 66 31 ad_from_file(&f1
4ec0: 2c 20 67 2e 61 72 67 76 5b 32 5d 29 3b 0a 20 20 , g.argv[2]);.
4ed0: 62 6c 6f 62 5f 72 65 61 64 5f 66 72 6f 6d 5f 66 blob_read_from_f
4ee0: 69 6c 65 28 26 66 32 2c 20 67 2e 61 72 67 76 5b ile(&f2, g.argv[
4ef0: 33 5d 29 3b 0a 20 20 62 6c 6f 62 5f 63 6f 6d 70 3]);. blob_comp
4f00: 72 65 73 73 32 28 26 66 31 2c 20 26 66 32 2c 20 ress2(&f1, &f2,
4f10: 26 66 31 29 3b 0a 20 20 62 6c 6f 62 5f 77 72 69 &f1);. blob_wri
4f20: 74 65 5f 74 6f 5f 66 69 6c 65 28 26 66 31 2c 20 te_to_file(&f1,
4f30: 67 2e 61 72 67 76 5b 34 5d 29 3b 0a 7d 0a 0a 2f g.argv[4]);.}../
4f40: 2a 0a 2a 2a 20 55 6e 63 6f 6d 70 72 65 73 73 20 *.** Uncompress
4f50: 62 6c 6f 62 20 70 49 6e 20 61 6e 64 20 73 74 6f blob pIn and sto
4f60: 72 65 20 74 68 65 20 72 65 73 75 6c 74 20 69 6e re the result in
4f70: 20 70 4f 75 74 2e 20 20 49 74 20 69 73 20 6f 6b pOut. It is ok
4f80: 20 66 6f 72 20 70 49 6e 20 61 6e 64 0a 2a 2a 20 for pIn and.**
4f90: 70 4f 75 74 20 74 6f 20 62 65 20 74 68 65 20 73 pOut to be the s
4fa0: 61 6d 65 20 62 6c 6f 62 2e 0a 2a 2a 0a 2a 2a 20 ame blob..**.**
4fb0: 70 4f 75 74 20 6d 75 73 74 20 62 65 20 65 69 74 pOut must be eit
4fc0: 68 65 72 20 75 6e 69 6e 69 74 69 61 6c 69 7a 65 her uninitialize
4fd0: 64 20 6f 72 20 74 68 65 20 73 61 6d 65 20 61 73 d or the same as
4fe0: 20 70 49 6e 2e 0a 2a 2f 0a 69 6e 74 20 62 6c 6f pIn..*/.int blo
4ff0: 62 5f 75 6e 63 6f 6d 70 72 65 73 73 28 42 6c 6f b_uncompress(Blo
5000: 62 20 2a 70 49 6e 2c 20 42 6c 6f 62 20 2a 70 4f b *pIn, Blob *pO
5010: 75 74 29 7b 0a 20 20 75 6e 73 69 67 6e 65 64 20 ut){. unsigned
5020: 69 6e 74 20 6e 4f 75 74 3b 0a 20 20 75 6e 73 69 int nOut;. unsi
5030: 67 6e 65 64 20 63 68 61 72 20 2a 69 6e 42 75 66 gned char *inBuf
5040: 3b 0a 20 20 75 6e 73 69 67 6e 65 64 20 69 6e 74 ;. unsigned int
5050: 20 6e 49 6e 20 3d 20 62 6c 6f 62 5f 73 69 7a 65 nIn = blob_size
5060: 28 70 49 6e 29 3b 0a 20 20 42 6c 6f 62 20 74 65 (pIn);. Blob te
5070: 6d 70 3b 0a 20 20 69 6e 74 20 72 63 3b 0a 20 20 mp;. int rc;.
5080: 75 6e 73 69 67 6e 65 64 20 6c 6f 6e 67 20 69 6e unsigned long in
5090: 74 20 6e 4f 75 74 32 3b 0a 20 20 69 66 28 20 6e t nOut2;. if( n
50a0: 49 6e 3c 3d 34 20 29 7b 0a 20 20 20 20 72 65 74 In<=4 ){. ret
50b0: 75 72 6e 20 30 3b 0a 20 20 7d 0a 20 20 69 6e 42 urn 0;. }. inB
50c0: 75 66 20 3d 20 28 75 6e 73 69 67 6e 65 64 20 63 uf = (unsigned c
50d0: 68 61 72 2a 29 62 6c 6f 62 5f 62 75 66 66 65 72 har*)blob_buffer
50e0: 28 70 49 6e 29 3b 0a 20 20 6e 4f 75 74 20 3d 20 (pIn);. nOut =
50f0: 28 69 6e 42 75 66 5b 30 5d 3c 3c 32 34 29 20 2b (inBuf[0]<<24) +
5100: 20 28 69 6e 42 75 66 5b 31 5d 3c 3c 31 36 29 20 (inBuf[1]<<16)
5110: 2b 20 28 69 6e 42 75 66 5b 32 5d 3c 3c 38 29 20 + (inBuf[2]<<8)
5120: 2b 20 69 6e 42 75 66 5b 33 5d 3b 0a 20 20 62 6c + inBuf[3];. bl
5130: 6f 62 5f 7a 65 72 6f 28 26 74 65 6d 70 29 3b 0a ob_zero(&temp);.
5140: 20 20 62 6c 6f 62 5f 72 65 73 69 7a 65 28 26 74 blob_resize(&t
5150: 65 6d 70 2c 20 6e 4f 75 74 2b 31 29 3b 0a 20 20 emp, nOut+1);.
5160: 6e 4f 75 74 32 20 3d 20 28 6c 6f 6e 67 20 69 6e nOut2 = (long in
5170: 74 29 6e 4f 75 74 3b 0a 20 20 72 63 20 3d 20 75 t)nOut;. rc = u
5180: 6e 63 6f 6d 70 72 65 73 73 28 28 75 6e 73 69 67 ncompress((unsig
5190: 6e 65 64 20 63 68 61 72 2a 29 62 6c 6f 62 5f 62 ned char*)blob_b
51a0: 75 66 66 65 72 28 26 74 65 6d 70 29 2c 20 26 6e uffer(&temp), &n
51b0: 4f 75 74 32 2c 20 0a 20 20 20 20 20 20 20 20 20 Out2, .
51c0: 20 20 20 20 20 20 20 20 20 26 69 6e 42 75 66 5b &inBuf[
51d0: 34 5d 2c 20 62 6c 6f 62 5f 73 69 7a 65 28 70 49 4], blob_size(pI
51e0: 6e 29 29 3b 0a 20 20 69 66 28 20 72 63 21 3d 5a n));. if( rc!=Z
51f0: 5f 4f 4b 20 29 7b 0a 20 20 20 20 62 6c 6f 62 5f _OK ){. blob_
5200: 72 65 73 65 74 28 26 74 65 6d 70 29 3b 0a 20 20 reset(&temp);.
5210: 20 20 72 65 74 75 72 6e 20 31 3b 0a 20 20 7d 0a return 1;. }.
5220: 20 20 62 6c 6f 62 5f 72 65 73 69 7a 65 28 26 74 blob_resize(&t
5230: 65 6d 70 2c 20 6e 4f 75 74 32 29 3b 0a 20 20 69 emp, nOut2);. i
5240: 66 28 20 70 4f 75 74 3d 3d 70 49 6e 20 29 20 62 f( pOut==pIn ) b
5250: 6c 6f 62 5f 72 65 73 65 74 28 70 4f 75 74 29 3b lob_reset(pOut);
5260: 0a 20 20 62 6c 6f 62 5f 69 73 5f 72 65 73 65 74 . blob_is_reset
5270: 28 70 4f 75 74 29 3b 0a 20 20 2a 70 4f 75 74 20 (pOut);. *pOut
5280: 3d 20 74 65 6d 70 3b 0a 20 20 72 65 74 75 72 6e = temp;. return
5290: 20 30 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 43 4f 4d 0;.}../*.** COM
52a0: 4d 41 4e 44 3a 20 74 65 73 74 2d 75 6e 63 6f 6d MAND: test-uncom
52b0: 70 72 65 73 73 0a 2a 2f 0a 76 6f 69 64 20 75 6e press.*/.void un
52c0: 63 6f 6d 70 72 65 73 73 5f 63 6d 64 28 76 6f 69 compress_cmd(voi
52d0: 64 29 7b 0a 20 20 42 6c 6f 62 20 66 3b 0a 20 20 d){. Blob f;.
52e0: 69 66 28 20 67 2e 61 72 67 63 21 3d 34 20 29 20 if( g.argc!=4 )
52f0: 75 73 61 67 65 28 22 49 4e 50 55 54 46 49 4c 45 usage("INPUTFILE
5300: 20 4f 55 54 50 55 54 46 49 4c 45 22 29 3b 0a 20 OUTPUTFILE");.
5310: 20 62 6c 6f 62 5f 72 65 61 64 5f 66 72 6f 6d 5f blob_read_from_
5320: 66 69 6c 65 28 26 66 2c 20 67 2e 61 72 67 76 5b file(&f, g.argv[
5330: 32 5d 29 3b 0a 20 20 62 6c 6f 62 5f 75 6e 63 6f 2]);. blob_unco
5340: 6d 70 72 65 73 73 28 26 66 2c 20 26 66 29 3b 0a mpress(&f, &f);.
5350: 20 20 62 6c 6f 62 5f 77 72 69 74 65 5f 74 6f 5f blob_write_to_
5360: 66 69 6c 65 28 26 66 2c 20 67 2e 61 72 67 76 5b file(&f, g.argv[
5370: 33 5d 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 43 4f 3]);.}../*.** CO
5380: 4d 4d 41 4e 44 3a 20 74 65 73 74 2d 63 79 63 6c MMAND: test-cycl
5390: 65 2d 63 6f 6d 70 72 65 73 73 0a 2a 2a 0a 2a 2a e-compress.**.**
53a0: 20 43 6f 6d 70 72 65 73 73 20 61 6e 64 20 75 6e Compress and un
53b0: 63 6f 6d 70 72 65 73 73 20 65 61 63 68 20 66 69 compress each fi
53c0: 6c 65 20 6e 61 6d 65 64 20 6f 6e 20 74 68 65 20 le named on the
53d0: 63 6f 6d 6d 61 6e 64 20 6c 69 6e 65 2e 0a 2a 2a command line..**
53e0: 20 56 65 72 69 66 79 20 74 68 61 74 20 74 68 65 Verify that the
53f0: 20 6f 72 69 67 69 6e 61 6c 20 63 6f 6e 74 65 6e original conten
5400: 74 20 69 73 20 72 65 63 6f 76 65 72 65 64 2e 0a t is recovered..
5410: 2a 2f 0a 76 6f 69 64 20 74 65 73 74 5f 63 79 63 */.void test_cyc
5420: 6c 65 5f 63 6f 6d 70 72 65 73 73 28 76 6f 69 64 le_compress(void
5430: 29 7b 0a 20 20 69 6e 74 20 69 3b 0a 20 20 42 6c ){. int i;. Bl
5440: 6f 62 20 62 31 2c 20 62 32 2c 20 62 33 3b 0a 20 ob b1, b2, b3;.
5450: 20 66 6f 72 28 69 3d 32 3b 20 69 3c 67 2e 61 72 for(i=2; i<g.ar
5460: 67 63 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 62 6c gc; i++){. bl
5470: 6f 62 5f 72 65 61 64 5f 66 72 6f 6d 5f 66 69 6c ob_read_from_fil
5480: 65 28 26 62 31 2c 20 67 2e 61 72 67 76 5b 69 5d e(&b1, g.argv[i]
5490: 29 3b 0a 20 20 20 20 62 6c 6f 62 5f 63 6f 6d 70 );. blob_comp
54a0: 72 65 73 73 28 26 62 31 2c 20 26 62 32 29 3b 0a ress(&b1, &b2);.
54b0: 20 20 20 20 62 6c 6f 62 5f 75 6e 63 6f 6d 70 72 blob_uncompr
54c0: 65 73 73 28 26 62 32 2c 20 26 62 33 29 3b 0a 20 ess(&b2, &b3);.
54d0: 20 20 20 69 66 28 20 62 6c 6f 62 5f 63 6f 6d 70 if( blob_comp
54e0: 61 72 65 28 26 62 31 2c 20 26 62 33 29 20 29 7b are(&b1, &b3) ){
54f0: 0a 20 20 20 20 20 20 66 6f 73 73 69 6c 5f 70 61 . fossil_pa
5500: 6e 69 63 28 22 63 6f 6d 70 72 65 73 73 2f 75 6e nic("compress/un
5510: 63 6f 6d 70 72 65 73 73 20 63 79 63 6c 65 20 66 compress cycle f
5520: 61 69 6c 65 64 20 66 6f 72 20 25 73 22 2c 20 67 ailed for %s", g
5530: 2e 61 72 67 76 5b 69 5d 29 3b 0a 20 20 20 20 7d .argv[i]);. }
5540: 0a 20 20 20 20 62 6c 6f 62 5f 72 65 73 65 74 28 . blob_reset(
5550: 26 62 31 29 3b 0a 20 20 20 20 62 6c 6f 62 5f 72 &b1);. blob_r
5560: 65 73 65 74 28 26 62 32 29 3b 0a 20 20 20 20 62 eset(&b2);. b
5570: 6c 6f 62 5f 72 65 73 65 74 28 26 62 33 29 3b 0a lob_reset(&b3);.
5580: 20 20 7d 0a 20 20 70 72 69 6e 74 66 28 22 6f 6b }. printf("ok
5590: 5c 6e 22 29 3b 0a 7d 0a 0a 23 69 66 64 65 66 20 \n");.}..#ifdef
55a0: 5f 5f 4d 49 4e 47 57 33 32 5f 5f 0a 2f 2a 0a 2a __MINGW32__./*.*
55b0: 2a 20 43 6f 6e 76 65 72 74 20 65 76 65 72 79 20 * Convert every
55c0: 5c 6e 20 63 68 61 72 61 63 74 65 72 20 69 6e 20 \n character in
55d0: 74 68 65 20 67 69 76 65 6e 20 62 6c 6f 62 20 69 the given blob i
55e0: 6e 74 6f 20 5c 72 5c 6e 2e 0a 2a 2f 0a 76 6f 69 nto \r\n..*/.voi
55f0: 64 20 62 6c 6f 62 5f 61 64 64 5f 63 72 28 42 6c d blob_add_cr(Bl
5600: 6f 62 20 2a 70 29 7b 0a 20 20 63 68 61 72 20 2a ob *p){. char *
5610: 7a 20 3d 20 70 2d 3e 61 44 61 74 61 3b 0a 20 20 z = p->aData;.
5620: 69 6e 74 20 6a 20 20 20 3d 20 70 2d 3e 6e 55 73 int j = p->nUs
5630: 65 64 3b 0a 20 20 69 6e 74 20 69 2c 20 6e 3b 0a ed;. int i, n;.
5640: 20 20 66 6f 72 28 69 3d 6e 3d 30 3b 20 69 3c 6a for(i=n=0; i<j
5650: 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 69 66 28 20 ; i++){. if(
5660: 7a 5b 69 5d 3d 3d 27 5c 6e 27 20 29 20 6e 2b 2b z[i]=='\n' ) n++
5670: 3b 0a 20 20 7d 0a 20 20 6a 20 2b 3d 20 6e 3b 0a ;. }. j += n;.
5680: 20 20 69 66 28 20 6a 3e 3d 70 2d 3e 6e 41 6c 6c if( j>=p->nAll
5690: 6f 63 20 29 7b 0a 20 20 20 20 62 6c 6f 62 5f 72 oc ){. blob_r
56a0: 65 73 69 7a 65 28 70 2c 20 6a 29 3b 0a 20 20 20 esize(p, j);.
56b0: 20 7a 20 3d 20 70 2d 3e 61 44 61 74 61 3b 0a 20 z = p->aData;.
56c0: 20 7d 0a 20 20 70 2d 3e 6e 55 73 65 64 20 3d 20 }. p->nUsed =
56d0: 6a 3b 0a 20 20 7a 5b 6a 5d 20 3d 20 30 3b 0a 20 j;. z[j] = 0;.
56e0: 20 77 68 69 6c 65 28 20 6a 3e 69 20 29 7b 0a 20 while( j>i ){.
56f0: 20 20 20 69 66 28 20 28 7a 5b 2d 2d 6a 5d 20 3d if( (z[--j] =
5700: 20 7a 5b 2d 2d 69 5d 29 20 3d 3d 27 5c 6e 27 20 z[--i]) =='\n'
5710: 29 7b 0a 20 20 20 20 20 20 7a 5b 2d 2d 6a 5d 20 ){. z[--j]
5720: 3d 20 27 5c 72 27 3b 0a 20 20 20 20 7d 0a 20 20 = '\r';. }.
5730: 7d 0a 7d 0a 23 65 6e 64 69 66 0a 0a 2f 2a 0a 2a }.}.#endif../*.*
5740: 2a 20 52 65 6d 6f 76 65 20 65 76 65 72 79 20 5c * Remove every \
5750: 72 20 63 68 61 72 61 63 74 65 72 20 66 72 6f 6d r character from
5760: 20 74 68 65 20 67 69 76 65 6e 20 62 6c 6f 62 2e the given blob.
5770: 0a 2a 2f 0a 76 6f 69 64 20 62 6c 6f 62 5f 72 65 .*/.void blob_re
5780: 6d 6f 76 65 5f 63 72 28 42 6c 6f 62 20 2a 70 29 move_cr(Blob *p)
5790: 7b 0a 20 20 69 6e 74 20 69 2c 20 6a 3b 0a 20 20 {. int i, j;.
57a0: 63 68 61 72 20 2a 7a 3b 0a 20 20 62 6c 6f 62 5f char *z;. blob_
57b0: 6d 61 74 65 72 69 61 6c 69 7a 65 28 70 29 3b 0a materialize(p);.
57c0: 20 20 7a 20 3d 20 70 2d 3e 61 44 61 74 61 3b 0a z = p->aData;.
57d0: 20 20 66 6f 72 28 69 3d 6a 3d 30 3b 20 7a 5b 69 for(i=j=0; z[i
57e0: 5d 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 69 66 28 ]; i++){. if(
57f0: 20 7a 5b 69 5d 21 3d 27 5c 72 27 20 29 20 7a 5b z[i]!='\r' ) z[
5800: 6a 2b 2b 5d 20 3d 20 7a 5b 69 5d 3b 0a 20 20 7d j++] = z[i];. }
5810: 0a 20 20 7a 5b 6a 5d 20 3d 20 30 3b 0a 20 20 70 . z[j] = 0;. p
5820: 2d 3e 6e 55 73 65 64 20 3d 20 6a 3b 0a 7d 0a ->nUsed = j;.}.