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 37 20 44 2e 20 52 69 63 68 (c) 2007 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 54 68 69 73 20 66 69 6c 65 .**.** This file
0370: 20 63 6f 6e 74 61 69 6e 73 20 63 6f 64 65 20 75 contains code u
0380: 73 65 64 20 74 6f 20 63 68 65 63 6b 2d 69 6e 20 sed to check-in
0390: 76 65 72 73 69 6f 6e 73 20 6f 66 20 74 68 65 20 versions of the
03a0: 70 72 6f 6a 65 63 74 0a 2a 2a 20 66 72 6f 6d 20 project.** from
03b0: 74 68 65 20 6c 6f 63 61 6c 20 72 65 70 6f 73 69 the local reposi
03c0: 74 6f 72 79 2e 0a 2a 2f 0a 23 69 6e 63 6c 75 64 tory..*/.#includ
03d0: 65 20 22 63 6f 6e 66 69 67 2e 68 22 0a 23 69 6e e "config.h".#in
03e0: 63 6c 75 64 65 20 22 63 68 65 63 6b 69 6e 2e 68 clude "checkin.h
03f0: 22 0a 23 69 6e 63 6c 75 64 65 20 3c 61 73 73 65 ".#include <asse
0400: 72 74 2e 68 3e 0a 0a 2f 2a 0a 2a 2a 20 47 65 6e rt.h>../*.** Gen
0410: 65 72 61 74 65 20 74 65 78 74 20 64 65 73 63 72 erate text descr
0420: 69 62 69 6e 67 20 61 6c 6c 20 63 68 61 6e 67 65 ibing all change
0430: 73 2e 20 20 50 72 65 70 65 6e 64 20 7a 50 72 65 s. Prepend zPre
0440: 66 69 78 20 74 6f 20 65 61 63 68 20 6c 69 6e 65 fix to each line
0450: 0a 2a 2a 20 6f 66 20 6f 75 74 70 75 74 2e 0a 2a .** of output..*
0460: 2a 0a 2a 2a 20 57 65 20 61 73 73 75 6d 65 20 74 *.** We assume t
0470: 68 61 74 20 76 66 69 6c 65 5f 63 68 65 63 6b 5f hat vfile_check_
0480: 73 69 67 6e 61 74 75 72 65 20 68 61 73 20 62 65 signature has be
0490: 65 6e 20 72 75 6e 2e 0a 2a 2f 0a 73 74 61 74 69 en run..*/.stati
04a0: 63 20 76 6f 69 64 20 73 74 61 74 75 73 5f 72 65 c void status_re
04b0: 70 6f 72 74 28 42 6c 6f 62 20 2a 72 65 70 6f 72 port(Blob *repor
04c0: 74 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a t, const char *z
04d0: 50 72 65 66 69 78 29 7b 0a 20 20 53 74 6d 74 20 Prefix){. Stmt
04e0: 71 3b 0a 20 20 69 6e 74 20 6e 50 72 65 66 69 78 q;. int nPrefix
04f0: 20 3d 20 73 74 72 6c 65 6e 28 7a 50 72 65 66 69 = strlen(zPrefi
0500: 78 29 3b 0a 20 20 64 62 5f 70 72 65 70 61 72 65 x);. db_prepare
0510: 28 26 71 2c 20 0a 20 20 20 20 22 53 45 4c 45 43 (&q, . "SELEC
0520: 54 20 70 61 74 68 6e 61 6d 65 2c 20 64 65 6c 65 T pathname, dele
0530: 74 65 64 2c 20 63 68 6e 67 65 64 2c 20 72 69 64 ted, chnged, rid
0540: 2c 20 63 6f 61 6c 65 73 63 65 28 6f 72 69 67 6e , coalesce(orign
0550: 61 6d 65 21 3d 70 61 74 68 6e 61 6d 65 2c 30 29 ame!=pathname,0)
0560: 22 0a 20 20 20 20 22 20 20 46 52 4f 4d 20 76 66 ". " FROM vf
0570: 69 6c 65 20 22 0a 20 20 20 20 22 20 57 48 45 52 ile ". " WHER
0580: 45 20 66 69 6c 65 5f 69 73 5f 73 65 6c 65 63 74 E file_is_select
0590: 65 64 28 69 64 29 22 0a 20 20 20 20 22 20 20 20 ed(id)". "
05a0: 41 4e 44 20 28 63 68 6e 67 65 64 20 4f 52 20 64 AND (chnged OR d
05b0: 65 6c 65 74 65 64 20 4f 52 20 72 69 64 3d 30 20 eleted OR rid=0
05c0: 4f 52 20 70 61 74 68 6e 61 6d 65 21 3d 6f 72 69 OR pathname!=ori
05d0: 67 6e 61 6d 65 29 20 4f 52 44 45 52 20 42 59 20 gname) ORDER BY
05e0: 31 22 0a 20 20 29 3b 0a 20 20 77 68 69 6c 65 28 1". );. while(
05f0: 20 64 62 5f 73 74 65 70 28 26 71 29 3d 3d 53 51 db_step(&q)==SQ
0600: 4c 49 54 45 5f 52 4f 57 20 29 7b 0a 20 20 20 20 LITE_ROW ){.
0610: 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 50 61 74 const char *zPat
0620: 68 6e 61 6d 65 20 3d 20 64 62 5f 63 6f 6c 75 6d hname = db_colum
0630: 6e 5f 74 65 78 74 28 26 71 2c 30 29 3b 0a 20 20 n_text(&q,0);.
0640: 20 20 69 6e 74 20 69 73 44 65 6c 65 74 65 64 20 int isDeleted
0650: 3d 20 64 62 5f 63 6f 6c 75 6d 6e 5f 69 6e 74 28 = db_column_int(
0660: 26 71 2c 20 31 29 3b 0a 20 20 20 20 69 6e 74 20 &q, 1);. int
0670: 69 73 43 68 6e 67 65 64 20 3d 20 64 62 5f 63 6f isChnged = db_co
0680: 6c 75 6d 6e 5f 69 6e 74 28 26 71 2c 32 29 3b 0a lumn_int(&q,2);.
0690: 20 20 20 20 69 6e 74 20 69 73 4e 65 77 20 3d 20 int isNew =
06a0: 64 62 5f 63 6f 6c 75 6d 6e 5f 69 6e 74 28 26 71 db_column_int(&q
06b0: 2c 33 29 3d 3d 30 3b 0a 20 20 20 20 69 6e 74 20 ,3)==0;. int
06c0: 69 73 52 65 6e 61 6d 65 64 20 3d 20 64 62 5f 63 isRenamed = db_c
06d0: 6f 6c 75 6d 6e 5f 69 6e 74 28 26 71 2c 34 29 3b olumn_int(&q,4);
06e0: 0a 20 20 20 20 63 68 61 72 20 2a 7a 46 75 6c 6c . char *zFull
06f0: 4e 61 6d 65 20 3d 20 6d 70 72 69 6e 74 66 28 22 Name = mprintf("
0700: 25 73 2f 25 73 22 2c 20 67 2e 7a 4c 6f 63 61 6c %s/%s", g.zLocal
0710: 52 6f 6f 74 2c 20 7a 50 61 74 68 6e 61 6d 65 29 Root, zPathname)
0720: 3b 0a 20 20 20 20 62 6c 6f 62 5f 61 70 70 65 6e ;. blob_appen
0730: 64 28 72 65 70 6f 72 74 2c 20 7a 50 72 65 66 69 d(report, zPrefi
0740: 78 2c 20 6e 50 72 65 66 69 78 29 3b 0a 20 20 20 x, nPrefix);.
0750: 20 69 66 28 20 69 73 44 65 6c 65 74 65 64 20 29 if( isDeleted )
0760: 7b 0a 20 20 20 20 20 20 62 6c 6f 62 5f 61 70 70 {. blob_app
0770: 65 6e 64 66 28 72 65 70 6f 72 74 2c 20 22 44 45 endf(report, "DE
0780: 4c 45 54 45 44 20 20 25 73 5c 6e 22 2c 20 7a 50 LETED %s\n", zP
0790: 61 74 68 6e 61 6d 65 29 3b 0a 20 20 20 20 7d 65 athname);. }e
07a0: 6c 73 65 20 69 66 28 20 61 63 63 65 73 73 28 7a lse if( access(z
07b0: 46 75 6c 6c 4e 61 6d 65 2c 20 30 29 20 29 7b 0a FullName, 0) ){.
07c0: 20 20 20 20 20 20 62 6c 6f 62 5f 61 70 70 65 6e blob_appen
07d0: 64 66 28 72 65 70 6f 72 74 2c 20 22 4d 49 53 53 df(report, "MISS
07e0: 49 4e 47 20 20 25 73 5c 6e 22 2c 20 7a 50 61 74 ING %s\n", zPat
07f0: 68 6e 61 6d 65 29 3b 0a 20 20 20 20 7d 65 6c 73 hname);. }els
0800: 65 20 69 66 28 20 69 73 4e 65 77 20 29 7b 0a 20 e if( isNew ){.
0810: 20 20 20 20 20 62 6c 6f 62 5f 61 70 70 65 6e 64 blob_append
0820: 66 28 72 65 70 6f 72 74 2c 20 22 41 44 44 45 44 f(report, "ADDED
0830: 20 20 20 20 25 73 5c 6e 22 2c 20 7a 50 61 74 68 %s\n", zPath
0840: 6e 61 6d 65 29 3b 0a 20 20 20 20 7d 65 6c 73 65 name);. }else
0850: 20 69 66 28 20 69 73 44 65 6c 65 74 65 64 20 29 if( isDeleted )
0860: 7b 0a 20 20 20 20 20 20 62 6c 6f 62 5f 61 70 70 {. blob_app
0870: 65 6e 64 66 28 72 65 70 6f 72 74 2c 20 22 44 45 endf(report, "DE
0880: 4c 45 54 45 44 20 20 25 73 5c 6e 22 2c 20 7a 50 LETED %s\n", zP
0890: 61 74 68 6e 61 6d 65 29 3b 0a 20 20 20 20 7d 65 athname);. }e
08a0: 6c 73 65 20 69 66 28 20 69 73 43 68 6e 67 65 64 lse if( isChnged
08b0: 3d 3d 32 20 29 7b 0a 20 20 20 20 20 20 62 6c 6f ==2 ){. blo
08c0: 62 5f 61 70 70 65 6e 64 66 28 72 65 70 6f 72 74 b_appendf(report
08d0: 2c 20 22 55 50 44 41 54 45 44 5f 42 59 5f 4d 45 , "UPDATED_BY_ME
08e0: 52 47 45 20 25 73 5c 6e 22 2c 20 7a 50 61 74 68 RGE %s\n", zPath
08f0: 6e 61 6d 65 29 3b 0a 20 20 20 20 7d 65 6c 73 65 name);. }else
0900: 20 69 66 28 20 69 73 43 68 6e 67 65 64 3d 3d 33 if( isChnged==3
0910: 20 29 7b 0a 20 20 20 20 20 20 62 6c 6f 62 5f 61 ){. blob_a
0920: 70 70 65 6e 64 66 28 72 65 70 6f 72 74 2c 20 22 ppendf(report, "
0930: 41 44 44 45 44 5f 42 59 5f 4d 45 52 47 45 20 25 ADDED_BY_MERGE %
0940: 73 5c 6e 22 2c 20 7a 50 61 74 68 6e 61 6d 65 29 s\n", zPathname)
0950: 3b 0a 20 20 20 20 7d 65 6c 73 65 20 69 66 28 20 ;. }else if(
0960: 69 73 43 68 6e 67 65 64 3d 3d 31 20 29 7b 0a 20 isChnged==1 ){.
0970: 20 20 20 20 20 62 6c 6f 62 5f 61 70 70 65 6e 64 blob_append
0980: 66 28 72 65 70 6f 72 74 2c 20 22 45 44 49 54 45 f(report, "EDITE
0990: 44 20 20 20 25 73 5c 6e 22 2c 20 7a 50 61 74 68 D %s\n", zPath
09a0: 6e 61 6d 65 29 3b 0a 20 20 20 20 7d 65 6c 73 65 name);. }else
09b0: 20 69 66 28 20 69 73 52 65 6e 61 6d 65 64 20 29 if( isRenamed )
09c0: 7b 0a 20 20 20 20 20 20 62 6c 6f 62 5f 61 70 70 {. blob_app
09d0: 65 6e 64 66 28 72 65 70 6f 72 74 2c 20 22 52 45 endf(report, "RE
09e0: 4e 41 4d 45 44 20 20 25 73 5c 6e 22 2c 20 7a 50 NAMED %s\n", zP
09f0: 61 74 68 6e 61 6d 65 29 3b 0a 20 20 20 20 7d 0a athname);. }.
0a00: 20 20 20 20 66 72 65 65 28 7a 46 75 6c 6c 4e 61 free(zFullNa
0a10: 6d 65 29 3b 0a 20 20 7d 0a 20 20 64 62 5f 66 69 me);. }. db_fi
0a20: 6e 61 6c 69 7a 65 28 26 71 29 3b 0a 20 20 64 62 nalize(&q);. db
0a30: 5f 70 72 65 70 61 72 65 28 26 71 2c 20 22 53 45 _prepare(&q, "SE
0a40: 4c 45 43 54 20 75 75 69 64 20 46 52 4f 4d 20 76 LECT uuid FROM v
0a50: 6d 65 72 67 65 20 4a 4f 49 4e 20 62 6c 6f 62 20 merge JOIN blob
0a60: 4f 4e 20 6d 65 72 67 65 3d 72 69 64 22 0a 20 20 ON merge=rid".
0a70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 "
0a80: 20 57 48 45 52 45 20 69 64 3d 30 22 29 3b 0a 20 WHERE id=0");.
0a90: 20 77 68 69 6c 65 28 20 64 62 5f 73 74 65 70 28 while( db_step(
0aa0: 26 71 29 3d 3d 53 51 4c 49 54 45 5f 52 4f 57 20 &q)==SQLITE_ROW
0ab0: 29 7b 0a 20 20 20 20 62 6c 6f 62 5f 61 70 70 65 ){. blob_appe
0ac0: 6e 64 28 72 65 70 6f 72 74 2c 20 7a 50 72 65 66 nd(report, zPref
0ad0: 69 78 2c 20 6e 50 72 65 66 69 78 29 3b 0a 20 20 ix, nPrefix);.
0ae0: 20 20 62 6c 6f 62 5f 61 70 70 65 6e 64 66 28 72 blob_appendf(r
0af0: 65 70 6f 72 74 2c 20 22 4d 45 52 47 45 44 5f 57 eport, "MERGED_W
0b00: 49 54 48 20 25 73 5c 6e 22 2c 20 64 62 5f 63 6f ITH %s\n", db_co
0b10: 6c 75 6d 6e 5f 74 65 78 74 28 26 71 2c 20 30 29 lumn_text(&q, 0)
0b20: 29 3b 0a 20 20 7d 0a 20 20 64 62 5f 66 69 6e 61 );. }. db_fina
0b30: 6c 69 7a 65 28 26 71 29 3b 0a 7d 0a 0a 2f 2a 0a lize(&q);.}../*.
0b40: 2a 2a 20 43 4f 4d 4d 41 4e 44 3a 20 63 68 61 6e ** COMMAND: chan
0b50: 67 65 73 0a 2a 2a 0a 2a 2a 20 55 73 61 67 65 3a ges.**.** Usage:
0b60: 20 25 66 6f 73 73 69 6c 20 63 68 61 6e 67 65 73 %fossil changes
0b70: 0a 2a 2a 0a 2a 2a 20 52 65 70 6f 72 74 20 6f 6e .**.** Report on
0b80: 20 74 68 65 20 65 64 69 74 20 73 74 61 74 75 73 the edit status
0b90: 20 6f 66 20 61 6c 6c 20 66 69 6c 65 73 20 69 6e of all files in
0ba0: 20 74 68 65 20 63 75 72 72 65 6e 74 20 63 68 65 the current che
0bb0: 63 6b 6f 75 74 2e 0a 2a 2a 20 53 65 65 20 61 6c ckout..** See al
0bc0: 73 6f 20 74 68 65 20 22 73 74 61 74 75 73 22 20 so the "status"
0bd0: 61 6e 64 20 22 65 78 74 72 61 22 20 63 6f 6d 6d and "extra" comm
0be0: 61 6e 64 73 2e 0a 2a 2f 0a 76 6f 69 64 20 63 68 ands..*/.void ch
0bf0: 61 6e 67 65 73 5f 63 6d 64 28 76 6f 69 64 29 7b anges_cmd(void){
0c00: 0a 20 20 42 6c 6f 62 20 72 65 70 6f 72 74 3b 0a . Blob report;.
0c10: 20 20 69 6e 74 20 76 69 64 3b 0a 20 20 64 62 5f int vid;. db_
0c20: 6d 75 73 74 5f 62 65 5f 77 69 74 68 69 6e 5f 74 must_be_within_t
0c30: 72 65 65 28 29 3b 0a 20 20 62 6c 6f 62 5f 7a 65 ree();. blob_ze
0c40: 72 6f 28 26 72 65 70 6f 72 74 29 3b 0a 20 20 76 ro(&report);. v
0c50: 69 64 20 3d 20 64 62 5f 6c 67 65 74 5f 69 6e 74 id = db_lget_int
0c60: 28 22 63 68 65 63 6b 6f 75 74 22 2c 20 30 29 3b ("checkout", 0);
0c70: 0a 20 20 76 66 69 6c 65 5f 63 68 65 63 6b 5f 73 . vfile_check_s
0c80: 69 67 6e 61 74 75 72 65 28 76 69 64 29 3b 0a 20 ignature(vid);.
0c90: 20 73 74 61 74 75 73 5f 72 65 70 6f 72 74 28 26 status_report(&
0ca0: 72 65 70 6f 72 74 2c 20 22 22 29 3b 0a 20 20 62 report, "");. b
0cb0: 6c 6f 62 5f 77 72 69 74 65 5f 74 6f 5f 66 69 6c lob_write_to_fil
0cc0: 65 28 26 72 65 70 6f 72 74 2c 20 22 2d 22 29 3b e(&report, "-");
0cd0: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 43 4f 4d 4d 41 4e .}../*.** COMMAN
0ce0: 44 3a 20 73 74 61 74 75 73 0a 2a 2a 0a 2a 2a 20 D: status.**.**
0cf0: 55 73 61 67 65 3a 20 25 66 6f 73 73 69 6c 20 73 Usage: %fossil s
0d00: 74 61 74 75 73 0a 2a 2a 0a 2a 2a 20 52 65 70 6f tatus.**.** Repo
0d10: 72 74 20 6f 6e 20 74 68 65 20 73 74 61 74 75 73 rt on the status
0d20: 20 6f 66 20 74 68 65 20 63 75 72 72 65 6e 74 20 of the current
0d30: 63 68 65 63 6b 6f 75 74 2e 0a 2a 2f 0a 76 6f 69 checkout..*/.voi
0d40: 64 20 73 74 61 74 75 73 5f 63 6d 64 28 76 6f 69 d status_cmd(voi
0d50: 64 29 7b 0a 20 20 69 6e 74 20 76 69 64 3b 0a 20 d){. int vid;.
0d60: 20 64 62 5f 6d 75 73 74 5f 62 65 5f 77 69 74 68 db_must_be_with
0d70: 69 6e 5f 74 72 65 65 28 29 3b 0a 20 20 20 20 20 in_tree();.
0d80: 20 20 2f 2a 20 30 31 32 33 34 35 36 37 38 39 30 /* 01234567890
0d90: 31 32 33 34 20 2a 2f 0a 20 20 70 72 69 6e 74 66 1234 */. printf
0da0: 28 22 72 65 70 6f 73 69 74 6f 72 79 3a 20 20 20 ("repository:
0db0: 25 73 5c 6e 22 2c 20 64 62 5f 6c 67 65 74 28 22 %s\n", db_lget("
0dc0: 72 65 70 6f 73 69 74 6f 72 79 22 2c 22 22 29 29 repository",""))
0dd0: 3b 0a 20 20 70 72 69 6e 74 66 28 22 6c 6f 63 61 ;. printf("loca
0de0: 6c 2d 72 6f 6f 74 3a 20 20 20 25 73 5c 6e 22 2c l-root: %s\n",
0df0: 20 67 2e 7a 4c 6f 63 61 6c 52 6f 6f 74 29 3b 0a g.zLocalRoot);.
0e00: 20 20 70 72 69 6e 74 66 28 22 73 65 72 76 65 72 printf("server
0e10: 2d 63 6f 64 65 3a 20 20 25 73 5c 6e 22 2c 20 64 -code: %s\n", d
0e20: 62 5f 67 65 74 28 22 73 65 72 76 65 72 2d 63 6f b_get("server-co
0e30: 64 65 22 2c 20 22 22 29 29 3b 0a 20 20 76 69 64 de", ""));. vid
0e40: 20 3d 20 64 62 5f 6c 67 65 74 5f 69 6e 74 28 22 = db_lget_int("
0e50: 63 68 65 63 6b 6f 75 74 22 2c 20 30 29 3b 0a 20 checkout", 0);.
0e60: 20 69 66 28 20 76 69 64 20 29 7b 0a 20 20 20 20 if( vid ){.
0e70: 73 68 6f 77 5f 63 6f 6d 6d 6f 6e 5f 69 6e 66 6f show_common_info
0e80: 28 76 69 64 2c 20 22 63 68 65 63 6b 6f 75 74 3a (vid, "checkout:
0e90: 22 2c 20 30 29 3b 0a 20 20 7d 0a 20 20 63 68 61 ", 0);. }. cha
0ea0: 6e 67 65 73 5f 63 6d 64 28 29 3b 0a 7d 0a 0a 2f nges_cmd();.}../
0eb0: 2a 0a 2a 2a 20 43 4f 4d 4d 41 4e 44 3a 20 6c 73 *.** COMMAND: ls
0ec0: 0a 2a 2a 0a 2a 2a 20 55 73 61 67 65 3a 20 25 66 .**.** Usage: %f
0ed0: 6f 73 73 69 6c 20 6c 73 0a 2a 2a 0a 2a 2a 20 53 ossil ls.**.** S
0ee0: 68 6f 77 20 74 68 65 20 6e 61 6d 65 73 20 6f 66 how the names of
0ef0: 20 61 6c 6c 20 66 69 6c 65 73 20 69 6e 20 74 68 all files in th
0f00: 65 20 63 75 72 72 65 6e 74 20 63 68 65 63 6b 6f e current checko
0f10: 75 74 0a 2a 2f 0a 76 6f 69 64 20 6c 73 5f 63 6d ut.*/.void ls_cm
0f20: 64 28 76 6f 69 64 29 7b 0a 20 20 69 6e 74 20 76 d(void){. int v
0f30: 69 64 3b 0a 20 20 53 74 6d 74 20 71 3b 0a 0a 20 id;. Stmt q;..
0f40: 20 64 62 5f 6d 75 73 74 5f 62 65 5f 77 69 74 68 db_must_be_with
0f50: 69 6e 5f 74 72 65 65 28 29 3b 0a 20 20 76 69 64 in_tree();. vid
0f60: 20 3d 20 64 62 5f 6c 67 65 74 5f 69 6e 74 28 22 = db_lget_int("
0f70: 63 68 65 63 6b 6f 75 74 22 2c 20 30 29 3b 0a 20 checkout", 0);.
0f80: 20 76 66 69 6c 65 5f 63 68 65 63 6b 5f 73 69 67 vfile_check_sig
0f90: 6e 61 74 75 72 65 28 76 69 64 29 3b 0a 20 20 64 nature(vid);. d
0fa0: 62 5f 70 72 65 70 61 72 65 28 26 71 2c 0a 20 20 b_prepare(&q,.
0fb0: 20 20 20 22 53 45 4c 45 43 54 20 70 61 74 68 6e "SELECT pathn
0fc0: 61 6d 65 2c 20 64 65 6c 65 74 65 64 2c 20 72 69 ame, deleted, ri
0fd0: 64 2c 20 63 68 6e 67 65 64 2c 20 63 6f 61 6c 65 d, chnged, coale
0fe0: 73 63 65 28 6f 72 69 67 6e 61 6d 65 21 3d 70 61 sce(origname!=pa
0ff0: 74 68 6e 61 6d 65 2c 30 29 22 0a 20 20 20 20 20 thname,0)".
1000: 22 20 20 46 52 4f 4d 20 76 66 69 6c 65 22 0a 20 " FROM vfile".
1010: 20 20 20 20 22 20 4f 52 44 45 52 20 42 59 20 31 " ORDER BY 1
1020: 22 0a 20 20 29 3b 0a 20 20 77 68 69 6c 65 28 20 ". );. while(
1030: 64 62 5f 73 74 65 70 28 26 71 29 3d 3d 53 51 4c db_step(&q)==SQL
1040: 49 54 45 5f 52 4f 57 20 29 7b 0a 20 20 20 20 63 ITE_ROW ){. c
1050: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 50 61 74 68 onst char *zPath
1060: 6e 61 6d 65 20 3d 20 64 62 5f 63 6f 6c 75 6d 6e name = db_column
1070: 5f 74 65 78 74 28 26 71 2c 30 29 3b 0a 20 20 20 _text(&q,0);.
1080: 20 69 6e 74 20 69 73 44 65 6c 65 74 65 64 20 3d int isDeleted =
1090: 20 64 62 5f 63 6f 6c 75 6d 6e 5f 69 6e 74 28 26 db_column_int(&
10a0: 71 2c 20 31 29 3b 0a 20 20 20 20 69 6e 74 20 69 q, 1);. int i
10b0: 73 4e 65 77 20 3d 20 64 62 5f 63 6f 6c 75 6d 6e sNew = db_column
10c0: 5f 69 6e 74 28 26 71 2c 32 29 3d 3d 30 3b 0a 20 _int(&q,2)==0;.
10d0: 20 20 20 69 6e 74 20 63 68 6e 67 65 64 20 3d 20 int chnged =
10e0: 64 62 5f 63 6f 6c 75 6d 6e 5f 69 6e 74 28 26 71 db_column_int(&q
10f0: 2c 33 29 3b 0a 20 20 20 20 69 6e 74 20 72 65 6e ,3);. int ren
1100: 61 6d 65 64 20 3d 20 64 62 5f 63 6f 6c 75 6d 6e amed = db_column
1110: 5f 69 6e 74 28 26 71 2c 34 29 3b 0a 20 20 20 20 _int(&q,4);.
1120: 63 68 61 72 20 2a 7a 46 75 6c 6c 4e 61 6d 65 20 char *zFullName
1130: 3d 20 6d 70 72 69 6e 74 66 28 22 25 73 2f 25 73 = mprintf("%s/%s
1140: 22 2c 20 67 2e 7a 4c 6f 63 61 6c 52 6f 6f 74 2c ", g.zLocalRoot,
1150: 20 7a 50 61 74 68 6e 61 6d 65 29 3b 0a 20 20 20 zPathname);.
1160: 20 69 66 28 20 69 73 4e 65 77 20 29 7b 0a 20 20 if( isNew ){.
1170: 20 20 20 20 70 72 69 6e 74 66 28 22 41 44 44 45 printf("ADDE
1180: 44 20 20 20 20 20 25 73 5c 6e 22 2c 20 7a 50 61 D %s\n", zPa
1190: 74 68 6e 61 6d 65 29 3b 0a 20 20 20 20 7d 65 6c thname);. }el
11a0: 73 65 20 69 66 28 20 61 63 63 65 73 73 28 7a 46 se if( access(zF
11b0: 75 6c 6c 4e 61 6d 65 2c 20 30 29 20 29 7b 0a 20 ullName, 0) ){.
11c0: 20 20 20 20 20 70 72 69 6e 74 66 28 22 4d 49 53 printf("MIS
11d0: 53 49 4e 47 20 20 20 25 73 5c 6e 22 2c 20 7a 50 SING %s\n", zP
11e0: 61 74 68 6e 61 6d 65 29 3b 0a 20 20 20 20 7d 65 athname);. }e
11f0: 6c 73 65 20 69 66 28 20 69 73 44 65 6c 65 74 65 lse if( isDelete
1200: 64 20 29 7b 0a 20 20 20 20 20 20 70 72 69 6e 74 d ){. print
1210: 66 28 22 44 45 4c 45 54 45 44 20 20 20 25 73 5c f("DELETED %s\
1220: 6e 22 2c 20 7a 50 61 74 68 6e 61 6d 65 29 3b 0a n", zPathname);.
1230: 20 20 20 20 7d 65 6c 73 65 20 69 66 28 20 63 68 }else if( ch
1240: 6e 67 65 64 20 29 7b 0a 20 20 20 20 20 20 70 72 nged ){. pr
1250: 69 6e 74 66 28 22 45 44 49 54 45 44 20 20 20 20 intf("EDITED
1260: 25 73 5c 6e 22 2c 20 7a 50 61 74 68 6e 61 6d 65 %s\n", zPathname
1270: 29 3b 0a 20 20 20 20 7d 65 6c 73 65 20 69 66 28 );. }else if(
1280: 20 72 65 6e 61 6d 65 64 20 29 7b 0a 20 20 20 20 renamed ){.
1290: 20 20 70 72 69 6e 74 66 28 22 52 45 4e 41 4d 45 printf("RENAME
12a0: 44 20 20 20 25 73 5c 6e 22 2c 20 7a 50 61 74 68 D %s\n", zPath
12b0: 6e 61 6d 65 29 3b 0a 20 20 20 20 7d 65 6c 73 65 name);. }else
12c0: 7b 0a 20 20 20 20 20 20 70 72 69 6e 74 66 28 22 {. printf("
12d0: 55 4e 43 48 41 4e 47 45 44 20 25 73 5c 6e 22 2c UNCHANGED %s\n",
12e0: 20 7a 50 61 74 68 6e 61 6d 65 29 3b 0a 20 20 20 zPathname);.
12f0: 20 7d 0a 20 20 20 20 66 72 65 65 28 7a 46 75 6c }. free(zFul
1300: 6c 4e 61 6d 65 29 3b 0a 20 20 7d 0a 20 20 64 62 lName);. }. db
1310: 5f 66 69 6e 61 6c 69 7a 65 28 26 71 29 3b 0a 7d _finalize(&q);.}
1320: 0a 0a 2f 2a 0a 2a 2a 20 43 4f 4d 4d 41 4e 44 3a ../*.** COMMAND:
1330: 20 65 78 74 72 61 0a 2a 2a 20 55 73 61 67 65 3a extra.** Usage:
1340: 20 25 66 6f 73 73 69 6c 20 65 78 74 72 61 0a 2a %fossil extra.*
1350: 2a 0a 2a 2a 20 50 72 69 6e 74 20 61 20 6c 69 73 *.** Print a lis
1360: 74 20 6f 66 20 61 6c 6c 20 66 69 6c 65 73 20 69 t of all files i
1370: 6e 20 74 68 65 20 73 6f 75 72 63 65 20 74 72 65 n the source tre
1380: 65 20 74 68 61 74 20 61 72 65 20 6e 6f 74 20 70 e that are not p
1390: 61 72 74 20 6f 66 0a 2a 2a 20 74 68 65 20 63 75 art of.** the cu
13a0: 72 72 65 6e 74 20 63 68 65 63 6b 6f 75 74 2e 20 rrent checkout.
13b0: 20 53 65 65 20 61 6c 73 6f 20 74 68 65 20 22 63 See also the "c
13c0: 6c 65 61 6e 22 20 63 6f 6d 6d 61 6e 64 2e 0a 2a lean" command..*
13d0: 2f 0a 76 6f 69 64 20 65 78 74 72 61 5f 63 6d 64 /.void extra_cmd
13e0: 28 76 6f 69 64 29 7b 0a 20 20 42 6c 6f 62 20 70 (void){. Blob p
13f0: 61 74 68 3b 0a 20 20 42 6c 6f 62 20 72 65 70 6f ath;. Blob repo
1400: 3b 0a 20 20 53 74 6d 74 20 71 3b 0a 20 20 69 6e ;. Stmt q;. in
1410: 74 20 6e 3b 0a 20 20 64 62 5f 6d 75 73 74 5f 62 t n;. db_must_b
1420: 65 5f 77 69 74 68 69 6e 5f 74 72 65 65 28 29 3b e_within_tree();
1430: 0a 20 20 64 62 5f 6d 75 6c 74 69 5f 65 78 65 63 . db_multi_exec
1440: 28 22 43 52 45 41 54 45 20 54 45 4d 50 20 54 41 ("CREATE TEMP TA
1450: 42 4c 45 20 73 66 69 6c 65 28 78 20 54 45 58 54 BLE sfile(x TEXT
1460: 20 50 52 49 4d 41 52 59 20 4b 45 59 29 22 29 3b PRIMARY KEY)");
1470: 0a 20 20 6e 20 3d 20 73 74 72 6c 65 6e 28 67 2e . n = strlen(g.
1480: 7a 4c 6f 63 61 6c 52 6f 6f 74 29 3b 0a 20 20 62 zLocalRoot);. b
1490: 6c 6f 62 5f 69 6e 69 74 28 26 70 61 74 68 2c 20 lob_init(&path,
14a0: 67 2e 7a 4c 6f 63 61 6c 52 6f 6f 74 2c 20 6e 2d g.zLocalRoot, n-
14b0: 31 29 3b 0a 20 20 76 66 69 6c 65 5f 73 63 61 6e 1);. vfile_scan
14c0: 28 30 2c 20 26 70 61 74 68 2c 20 62 6c 6f 62 5f (0, &path, blob_
14d0: 73 69 7a 65 28 26 70 61 74 68 29 29 3b 0a 20 20 size(&path));.
14e0: 64 62 5f 70 72 65 70 61 72 65 28 26 71 2c 20 0a db_prepare(&q, .
14f0: 20 20 20 20 20 20 22 53 45 4c 45 43 54 20 78 20 "SELECT x
1500: 46 52 4f 4d 20 73 66 69 6c 65 22 0a 20 20 20 20 FROM sfile".
1510: 20 20 22 20 57 48 45 52 45 20 78 20 4e 4f 54 20 " WHERE x NOT
1520: 49 4e 20 28 27 6d 61 6e 69 66 65 73 74 27 2c 27 IN ('manifest','
1530: 6d 61 6e 69 66 65 73 74 2e 75 75 69 64 27 2c 27 manifest.uuid','
1540: 5f 46 4f 53 53 49 4c 5f 27 29 22 0a 20 20 20 20 _FOSSIL_')".
1550: 20 20 22 20 4f 52 44 45 52 20 42 59 20 31 22 29 " ORDER BY 1")
1560: 3b 0a 20 20 69 66 28 20 66 69 6c 65 5f 74 72 65 ;. if( file_tre
1570: 65 5f 6e 61 6d 65 28 67 2e 7a 52 65 70 6f 73 69 e_name(g.zReposi
1580: 74 6f 72 79 4e 61 6d 65 2c 20 26 72 65 70 6f 2c toryName, &repo,
1590: 20 30 29 20 29 7b 0a 20 20 20 20 64 62 5f 6d 75 0) ){. db_mu
15a0: 6c 74 69 5f 65 78 65 63 28 22 44 45 4c 45 54 45 lti_exec("DELETE
15b0: 20 46 52 4f 4d 20 73 66 69 6c 65 20 57 48 45 52 FROM sfile WHER
15c0: 45 20 78 3d 25 42 22 2c 20 26 72 65 70 6f 29 3b E x=%B", &repo);
15d0: 0a 20 20 7d 0a 20 20 77 68 69 6c 65 28 20 64 62 . }. while( db
15e0: 5f 73 74 65 70 28 26 71 29 3d 3d 53 51 4c 49 54 _step(&q)==SQLIT
15f0: 45 5f 52 4f 57 20 29 7b 0a 20 20 20 20 70 72 69 E_ROW ){. pri
1600: 6e 74 66 28 22 25 73 5c 6e 22 2c 20 64 62 5f 63 ntf("%s\n", db_c
1610: 6f 6c 75 6d 6e 5f 74 65 78 74 28 26 71 2c 20 30 olumn_text(&q, 0
1620: 29 29 3b 0a 20 20 7d 0a 20 20 64 62 5f 66 69 6e ));. }. db_fin
1630: 61 6c 69 7a 65 28 26 71 29 3b 0a 7d 0a 0a 2f 2a alize(&q);.}../*
1640: 0a 2a 2a 20 43 4f 4d 4d 41 4e 44 3a 20 63 6c 65 .** COMMAND: cle
1650: 61 6e 0a 2a 2a 20 55 73 61 67 65 3a 20 25 66 6f an.** Usage: %fo
1660: 73 73 69 6c 20 63 6c 65 61 6e 20 3f 2d 61 6c 6c ssil clean ?-all
1670: 3f 0a 2a 2a 0a 2a 2a 20 44 65 6c 65 74 65 20 61 ?.**.** Delete a
1680: 6c 6c 20 22 65 78 74 72 61 22 20 66 69 6c 65 73 ll "extra" files
1690: 20 69 6e 20 74 68 65 20 73 6f 75 72 63 65 20 74 in the source t
16a0: 72 65 65 2e 20 20 22 45 78 74 72 61 22 20 66 69 ree. "Extra" fi
16b0: 6c 65 73 20 61 72 65 0a 2a 2a 20 66 69 6c 65 73 les are.** files
16c0: 20 74 68 61 74 20 61 72 65 20 6e 6f 74 20 6f 66 that are not of
16d0: 66 69 63 69 61 6c 6c 79 20 70 61 72 74 20 6f 66 ficially part of
16e0: 20 74 68 65 20 63 68 65 63 6b 6f 75 74 2e 20 20 the checkout.
16f0: 53 65 65 20 61 6c 73 6f 0a 2a 2a 20 74 68 65 20 See also.** the
1700: 22 65 78 74 72 61 22 20 63 6f 6d 6d 61 6e 64 2e "extra" command.
1710: 20 54 68 69 73 20 6f 70 65 72 61 74 69 6f 6e 20 This operation
1720: 63 61 6e 6e 6f 74 20 62 65 20 75 6e 64 6f 6e 65 cannot be undone
1730: 2e 20 0a 2a 2a 0a 2a 2a 20 59 6f 75 20 77 69 6c . .**.** You wil
1740: 6c 20 62 65 20 70 72 6f 6d 70 74 65 64 20 62 65 l be prompted be
1750: 66 6f 72 65 20 72 65 6d 6f 76 69 6e 67 20 65 61 fore removing ea
1760: 63 68 20 66 69 6c 65 2e 20 49 66 20 79 6f 75 20 ch file. If you
1770: 61 72 65 0a 2a 2a 20 73 75 72 65 20 79 6f 75 20 are.** sure you
1780: 77 69 73 68 20 74 6f 20 72 65 6d 6f 76 65 20 61 wish to remove a
1790: 6c 6c 20 22 65 78 74 72 61 22 20 66 69 6c 65 73 ll "extra" files
17a0: 20 79 6f 75 20 63 61 6e 20 73 70 65 63 69 66 79 you can specify
17b0: 20 74 68 65 0a 2a 2a 20 6f 70 74 69 6f 6e 61 6c the.** optional
17c0: 20 2d 61 6c 6c 20 66 6c 61 67 2e 0a 2a 2f 0a 76 -all flag..*/.v
17d0: 6f 69 64 20 63 6c 65 61 6e 5f 63 6d 64 28 76 6f oid clean_cmd(vo
17e0: 69 64 29 7b 0a 20 20 69 6e 74 20 61 6c 6c 46 6c id){. int allFl
17f0: 61 67 3b 0a 20 20 42 6c 6f 62 20 70 61 74 68 2c ag;. Blob path,
1800: 20 72 65 70 6f 3b 0a 20 20 53 74 6d 74 20 71 3b repo;. Stmt q;
1810: 0a 20 20 69 6e 74 20 6e 3b 0a 20 20 61 6c 6c 46 . int n;. allF
1820: 6c 61 67 20 3d 20 66 69 6e 64 5f 6f 70 74 69 6f lag = find_optio
1830: 6e 28 22 61 6c 6c 22 2c 22 61 22 2c 30 29 21 3d n("all","a",0)!=
1840: 30 3b 0a 20 20 64 62 5f 6d 75 73 74 5f 62 65 5f 0;. db_must_be_
1850: 77 69 74 68 69 6e 5f 74 72 65 65 28 29 3b 0a 20 within_tree();.
1860: 20 64 62 5f 6d 75 6c 74 69 5f 65 78 65 63 28 22 db_multi_exec("
1870: 43 52 45 41 54 45 20 54 45 4d 50 20 54 41 42 4c CREATE TEMP TABL
1880: 45 20 73 66 69 6c 65 28 78 20 54 45 58 54 20 50 E sfile(x TEXT P
1890: 52 49 4d 41 52 59 20 4b 45 59 29 22 29 3b 0a 20 RIMARY KEY)");.
18a0: 20 6e 20 3d 20 73 74 72 6c 65 6e 28 67 2e 7a 4c n = strlen(g.zL
18b0: 6f 63 61 6c 52 6f 6f 74 29 3b 0a 20 20 62 6c 6f ocalRoot);. blo
18c0: 62 5f 69 6e 69 74 28 26 70 61 74 68 2c 20 67 2e b_init(&path, g.
18d0: 7a 4c 6f 63 61 6c 52 6f 6f 74 2c 20 6e 2d 31 29 zLocalRoot, n-1)
18e0: 3b 0a 20 20 76 66 69 6c 65 5f 73 63 61 6e 28 30 ;. vfile_scan(0
18f0: 2c 20 26 70 61 74 68 2c 20 62 6c 6f 62 5f 73 69 , &path, blob_si
1900: 7a 65 28 26 70 61 74 68 29 29 3b 0a 20 20 64 62 ze(&path));. db
1910: 5f 70 72 65 70 61 72 65 28 26 71 2c 20 0a 20 20 _prepare(&q, .
1920: 20 20 20 20 22 53 45 4c 45 43 54 20 25 51 20 7c "SELECT %Q |
1930: 7c 20 78 20 46 52 4f 4d 20 73 66 69 6c 65 22 0a | x FROM sfile".
1940: 20 20 20 20 20 20 22 20 57 48 45 52 45 20 78 20 " WHERE x
1950: 4e 4f 54 20 49 4e 20 28 27 6d 61 6e 69 66 65 73 NOT IN ('manifes
1960: 74 27 2c 27 6d 61 6e 69 66 65 73 74 2e 75 75 69 t','manifest.uui
1970: 64 27 2c 27 5f 46 4f 53 53 49 4c 5f 27 29 22 0a d','_FOSSIL_')".
1980: 20 20 20 20 20 20 22 20 4f 52 44 45 52 20 42 59 " ORDER BY
1990: 20 31 22 2c 20 67 2e 7a 4c 6f 63 61 6c 52 6f 6f 1", g.zLocalRoo
19a0: 74 29 3b 0a 20 20 69 66 28 20 66 69 6c 65 5f 74 t);. if( file_t
19b0: 72 65 65 5f 6e 61 6d 65 28 67 2e 7a 52 65 70 6f ree_name(g.zRepo
19c0: 73 69 74 6f 72 79 4e 61 6d 65 2c 20 26 72 65 70 sitoryName, &rep
19d0: 6f 2c 20 30 29 20 29 7b 0a 20 20 20 20 64 62 5f o, 0) ){. db_
19e0: 6d 75 6c 74 69 5f 65 78 65 63 28 22 44 45 4c 45 multi_exec("DELE
19f0: 54 45 20 46 52 4f 4d 20 73 66 69 6c 65 20 57 48 TE FROM sfile WH
1a00: 45 52 45 20 78 3d 25 42 22 2c 20 26 72 65 70 6f ERE x=%B", &repo
1a10: 29 3b 0a 20 20 7d 0a 20 20 77 68 69 6c 65 28 20 );. }. while(
1a20: 64 62 5f 73 74 65 70 28 26 71 29 3d 3d 53 51 4c db_step(&q)==SQL
1a30: 49 54 45 5f 52 4f 57 20 29 7b 0a 20 20 20 20 69 ITE_ROW ){. i
1a40: 66 28 20 61 6c 6c 46 6c 61 67 20 29 7b 0a 20 20 f( allFlag ){.
1a50: 20 20 20 20 75 6e 6c 69 6e 6b 28 64 62 5f 63 6f unlink(db_co
1a60: 6c 75 6d 6e 5f 74 65 78 74 28 26 71 2c 20 30 29 lumn_text(&q, 0)
1a70: 29 3b 0a 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 );. }else{.
1a80: 20 20 20 20 42 6c 6f 62 20 61 6e 73 3b 0a 20 20 Blob ans;.
1a90: 20 20 20 20 63 68 61 72 20 2a 70 72 6f 6d 70 74 char *prompt
1aa0: 20 3d 20 6d 70 72 69 6e 74 66 28 22 72 65 6d 6f = mprintf("remo
1ab0: 76 65 20 75 6e 6d 61 6e 61 67 65 64 20 66 69 6c ve unmanaged fil
1ac0: 65 20 5c 22 25 73 5c 22 20 5b 79 2f 4e 5d 3f 20 e \"%s\" [y/N]?
1ad0: 22 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ",.
1ae0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
1af0: 20 64 62 5f 63 6f 6c 75 6d 6e 5f 74 65 78 74 28 db_column_text(
1b00: 26 71 2c 20 30 29 29 3b 0a 20 20 20 20 20 20 62 &q, 0));. b
1b10: 6c 6f 62 5f 7a 65 72 6f 28 26 61 6e 73 29 3b 0a lob_zero(&ans);.
1b20: 20 20 20 20 20 20 70 72 6f 6d 70 74 5f 75 73 65 prompt_use
1b30: 72 28 70 72 6f 6d 70 74 2c 20 26 61 6e 73 29 3b r(prompt, &ans);
1b40: 0a 20 20 20 20 20 20 69 66 28 20 62 6c 6f 62 5f . if( blob_
1b50: 73 74 72 28 26 61 6e 73 29 5b 30 5d 3d 3d 27 79 str(&ans)[0]=='y
1b60: 27 20 29 7b 0a 20 20 20 20 20 20 20 20 75 6e 6c ' ){. unl
1b70: 69 6e 6b 28 64 62 5f 63 6f 6c 75 6d 6e 5f 74 65 ink(db_column_te
1b80: 78 74 28 26 71 2c 20 30 29 29 3b 0a 20 20 20 20 xt(&q, 0));.
1b90: 20 20 7d 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20 }. }. }.
1ba0: 64 62 5f 66 69 6e 61 6c 69 7a 65 28 26 71 29 3b db_finalize(&q);
1bb0: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 50 72 65 70 61 72 .}../*.** Prepar
1bc0: 65 20 61 20 63 6f 6d 6d 69 74 20 63 6f 6d 6d 65 e a commit comme
1bd0: 6e 74 2e 20 20 4c 65 74 20 74 68 65 20 75 73 65 nt. Let the use
1be0: 72 20 6d 6f 64 69 66 79 20 69 74 20 75 73 69 6e r modify it usin
1bf0: 67 20 74 68 65 0a 2a 2a 20 65 64 69 74 6f 72 20 g the.** editor
1c00: 73 70 65 63 69 66 69 65 64 20 69 6e 20 74 68 65 specified in the
1c10: 20 67 6c 6f 62 61 6c 5f 63 6f 6e 66 69 67 20 74 global_config t
1c20: 61 62 6c 65 20 6f 72 20 65 69 74 68 65 72 0a 2a able or either.*
1c30: 2a 20 74 68 65 20 56 49 53 55 41 4c 20 6f 72 20 * the VISUAL or
1c40: 45 44 49 54 4f 52 20 65 6e 76 69 72 6f 6e 6d 65 EDITOR environme
1c50: 6e 74 20 76 61 72 69 61 62 6c 65 2e 0a 2a 2a 0a nt variable..**.
1c60: 2a 2a 20 53 74 6f 72 65 20 74 68 65 20 66 69 6e ** Store the fin
1c70: 61 6c 20 63 6f 6d 6d 69 74 20 63 6f 6d 6d 65 6e al commit commen
1c80: 74 20 69 6e 20 70 43 6f 6d 6d 65 6e 74 2e 20 20 t in pComment.
1c90: 70 43 6f 6d 6d 65 6e 74 20 69 73 20 61 73 73 75 pComment is assu
1ca0: 6d 65 64 0a 2a 2a 20 74 6f 20 62 65 20 75 6e 69 med.** to be uni
1cb0: 6e 69 74 69 61 6c 69 7a 65 64 20 2d 20 61 6e 79 nitialized - any
1cc0: 20 70 72 69 6f 72 20 63 6f 6e 74 65 6e 74 20 69 prior content i
1cd0: 73 20 6f 76 65 72 77 72 69 74 74 65 6e 2e 0a 2a s overwritten..*
1ce0: 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 70 72 /.static void pr
1cf0: 65 70 61 72 65 5f 63 6f 6d 6d 69 74 5f 63 6f 6d epare_commit_com
1d00: 6d 65 6e 74 28 42 6c 6f 62 20 2a 70 43 6f 6d 6d ment(Blob *pComm
1d10: 65 6e 74 29 7b 0a 20 20 63 6f 6e 73 74 20 63 68 ent){. const ch
1d20: 61 72 20 2a 7a 45 64 69 74 6f 72 3b 0a 20 20 63 ar *zEditor;. c
1d30: 68 61 72 20 2a 7a 43 6d 64 3b 0a 20 20 63 68 61 har *zCmd;. cha
1d40: 72 20 2a 7a 46 69 6c 65 3b 0a 20 20 42 6c 6f 62 r *zFile;. Blob
1d50: 20 74 65 78 74 2c 20 6c 69 6e 65 3b 0a 20 20 63 text, line;. c
1d60: 68 61 72 20 2a 7a 43 6f 6d 6d 65 6e 74 3b 0a 20 har *zComment;.
1d70: 20 69 6e 74 20 69 3b 0a 20 20 62 6c 6f 62 5f 73 int i;. blob_s
1d80: 65 74 28 26 74 65 78 74 2c 0a 20 20 20 20 22 5c et(&text,. "\
1d90: 6e 22 0a 20 20 20 20 22 23 20 45 6e 74 65 72 20 n". "# Enter
1da0: 63 6f 6d 6d 65 6e 74 73 20 6f 6e 20 74 68 69 73 comments on this
1db0: 20 63 68 65 63 6b 2d 69 6e 2e 20 20 4c 69 6e 65 check-in. Line
1dc0: 73 20 62 65 67 69 6e 6e 69 6e 67 20 77 69 74 68 s beginning with
1dd0: 20 23 20 61 72 65 20 69 67 6e 6f 72 65 64 2e 5c # are ignored.\
1de0: 6e 22 0a 20 20 20 20 22 23 20 54 68 65 20 63 68 n". "# The ch
1df0: 65 63 6b 2d 69 6e 20 63 6f 6d 6d 65 6e 74 20 66 eck-in comment f
1e00: 6f 6c 6c 6f 77 73 20 77 69 6b 69 20 66 6f 72 6d ollows wiki form
1e10: 61 74 74 69 6e 67 20 72 75 6c 65 73 2e 5c 6e 22 atting rules.\n"
1e20: 0a 20 20 20 20 22 23 5c 6e 22 0a 20 20 29 3b 0a . "#\n". );.
1e30: 20 20 73 74 61 74 75 73 5f 72 65 70 6f 72 74 28 status_report(
1e40: 26 74 65 78 74 2c 20 22 23 20 22 29 3b 0a 20 20 &text, "# ");.
1e50: 7a 45 64 69 74 6f 72 20 3d 20 64 62 5f 67 65 74 zEditor = db_get
1e60: 28 22 65 64 69 74 6f 72 22 2c 20 30 29 3b 0a 20 ("editor", 0);.
1e70: 20 69 66 28 20 7a 45 64 69 74 6f 72 3d 3d 30 20 if( zEditor==0
1e80: 29 7b 0a 20 20 20 20 7a 45 64 69 74 6f 72 20 3d ){. zEditor =
1e90: 20 67 65 74 65 6e 76 28 22 56 49 53 55 41 4c 22 getenv("VISUAL"
1ea0: 29 3b 0a 20 20 7d 0a 20 20 69 66 28 20 7a 45 64 );. }. if( zEd
1eb0: 69 74 6f 72 3d 3d 30 20 29 7b 0a 20 20 20 20 7a itor==0 ){. z
1ec0: 45 64 69 74 6f 72 20 3d 20 67 65 74 65 6e 76 28 Editor = getenv(
1ed0: 22 45 44 49 54 4f 52 22 29 3b 0a 20 20 7d 0a 20 "EDITOR");. }.
1ee0: 20 69 66 28 20 7a 45 64 69 74 6f 72 3d 3d 30 20 if( zEditor==0
1ef0: 29 7b 0a 23 69 66 64 65 66 20 5f 5f 4d 49 4e 47 ){.#ifdef __MING
1f00: 57 33 32 5f 5f 0a 20 20 20 20 7a 45 64 69 74 6f W32__. zEdito
1f10: 72 20 3d 20 22 6e 6f 74 65 70 61 64 22 3b 0a 23 r = "notepad";.#
1f20: 65 6c 73 65 0a 20 20 20 20 7a 45 64 69 74 6f 72 else. zEditor
1f30: 20 3d 20 22 65 64 22 3b 0a 23 65 6e 64 69 66 0a = "ed";.#endif.
1f40: 20 20 7d 0a 20 20 7a 46 69 6c 65 20 3d 20 64 62 }. zFile = db
1f50: 5f 74 65 78 74 28 30 2c 20 22 53 45 4c 45 43 54 _text(0, "SELECT
1f60: 20 27 25 71 63 69 2d 63 6f 6d 6d 65 6e 74 2d 27 '%qci-comment-'
1f70: 20 7c 7c 20 68 65 78 28 72 61 6e 64 6f 6d 62 6c || hex(randombl
1f80: 6f 62 28 36 29 29 20 7c 7c 20 27 2e 74 78 74 27 ob(6)) || '.txt'
1f90: 22 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ",.
1fa0: 20 20 20 20 20 20 67 2e 7a 4c 6f 63 61 6c 52 6f g.zLocalRo
1fb0: 6f 74 29 3b 0a 23 69 66 64 65 66 20 5f 5f 4d 49 ot);.#ifdef __MI
1fc0: 4e 47 57 33 32 5f 5f 0a 20 20 62 6c 6f 62 5f 61 NGW32__. blob_a
1fd0: 64 64 5f 63 72 28 26 74 65 78 74 29 3b 0a 23 65 dd_cr(&text);.#e
1fe0: 6e 64 69 66 0a 20 20 62 6c 6f 62 5f 77 72 69 74 ndif. blob_writ
1ff0: 65 5f 74 6f 5f 66 69 6c 65 28 26 74 65 78 74 2c e_to_file(&text,
2000: 20 7a 46 69 6c 65 29 3b 0a 20 20 7a 43 6d 64 20 zFile);. zCmd
2010: 3d 20 6d 70 72 69 6e 74 66 28 22 25 73 20 5c 22 = mprintf("%s \"
2020: 25 73 5c 22 22 2c 20 7a 45 64 69 74 6f 72 2c 20 %s\"", zEditor,
2030: 7a 46 69 6c 65 29 3b 0a 20 20 70 72 69 6e 74 66 zFile);. printf
2040: 28 22 25 73 5c 6e 22 2c 20 7a 43 6d 64 29 3b 0a ("%s\n", zCmd);.
2050: 20 20 69 66 28 20 73 79 73 74 65 6d 28 7a 43 6d if( system(zCm
2060: 64 29 20 29 7b 0a 20 20 20 20 66 6f 73 73 69 6c d) ){. fossil
2070: 5f 70 61 6e 69 63 28 22 65 64 69 74 6f 72 20 61 _panic("editor a
2080: 62 6f 72 74 65 64 22 29 3b 0a 20 20 7d 0a 20 20 borted");. }.
2090: 62 6c 6f 62 5f 72 65 73 65 74 28 26 74 65 78 74 blob_reset(&text
20a0: 29 3b 0a 20 20 62 6c 6f 62 5f 72 65 61 64 5f 66 );. blob_read_f
20b0: 72 6f 6d 5f 66 69 6c 65 28 26 74 65 78 74 2c 20 rom_file(&text,
20c0: 7a 46 69 6c 65 29 3b 0a 20 20 62 6c 6f 62 5f 72 zFile);. blob_r
20d0: 65 6d 6f 76 65 5f 63 72 28 26 74 65 78 74 29 3b emove_cr(&text);
20e0: 0a 20 20 75 6e 6c 69 6e 6b 28 7a 46 69 6c 65 29 . unlink(zFile)
20f0: 3b 0a 20 20 66 72 65 65 28 7a 46 69 6c 65 29 3b ;. free(zFile);
2100: 0a 20 20 62 6c 6f 62 5f 7a 65 72 6f 28 70 43 6f . blob_zero(pCo
2110: 6d 6d 65 6e 74 29 3b 0a 20 20 77 68 69 6c 65 28 mment);. while(
2120: 20 62 6c 6f 62 5f 6c 69 6e 65 28 26 74 65 78 74 blob_line(&text
2130: 2c 20 26 6c 69 6e 65 29 20 29 7b 0a 20 20 20 20 , &line) ){.
2140: 69 6e 74 20 69 2c 20 6e 3b 0a 20 20 20 20 63 68 int i, n;. ch
2150: 61 72 20 2a 7a 3b 0a 20 20 20 20 6e 20 3d 20 62 ar *z;. n = b
2160: 6c 6f 62 5f 73 69 7a 65 28 26 6c 69 6e 65 29 3b lob_size(&line);
2170: 0a 20 20 20 20 7a 20 3d 20 62 6c 6f 62 5f 62 75 . z = blob_bu
2180: 66 66 65 72 28 26 6c 69 6e 65 29 3b 0a 20 20 20 ffer(&line);.
2190: 20 66 6f 72 28 69 3d 30 3b 20 69 3c 6e 20 26 26 for(i=0; i<n &&
21a0: 20 69 73 73 70 61 63 65 28 7a 5b 69 5d 29 3b 20 isspace(z[i]);
21b0: 20 69 2b 2b 29 7b 7d 0a 20 20 20 20 69 66 28 20 i++){}. if(
21c0: 69 3c 6e 20 26 26 20 7a 5b 69 5d 3d 3d 27 23 27 i<n && z[i]=='#'
21d0: 20 29 20 63 6f 6e 74 69 6e 75 65 3b 0a 20 20 20 ) continue;.
21e0: 20 69 66 28 20 69 3c 6e 20 7c 7c 20 62 6c 6f 62 if( i<n || blob
21f0: 5f 73 69 7a 65 28 70 43 6f 6d 6d 65 6e 74 29 3e _size(pComment)>
2200: 30 20 29 7b 0a 20 20 20 20 20 20 62 6c 6f 62 5f 0 ){. blob_
2210: 61 70 70 65 6e 64 66 28 70 43 6f 6d 6d 65 6e 74 appendf(pComment
2220: 2c 20 22 25 62 22 2c 20 26 6c 69 6e 65 29 3b 0a , "%b", &line);.
2230: 20 20 20 20 7d 0a 20 20 7d 0a 20 20 62 6c 6f 62 }. }. blob
2240: 5f 72 65 73 65 74 28 26 74 65 78 74 29 3b 0a 20 _reset(&text);.
2250: 20 7a 43 6f 6d 6d 65 6e 74 20 3d 20 62 6c 6f 62 zComment = blob
2260: 5f 73 74 72 28 70 43 6f 6d 6d 65 6e 74 29 3b 0a _str(pComment);.
2270: 20 20 69 20 3d 20 73 74 72 6c 65 6e 28 7a 43 6f i = strlen(zCo
2280: 6d 6d 65 6e 74 29 3b 0a 20 20 77 68 69 6c 65 28 mment);. while(
2290: 20 69 3e 30 20 26 26 20 69 73 73 70 61 63 65 28 i>0 && isspace(
22a0: 7a 43 6f 6d 6d 65 6e 74 5b 69 2d 31 5d 29 20 29 zComment[i-1]) )
22b0: 7b 20 69 2d 2d 3b 20 7d 0a 20 20 62 6c 6f 62 5f { i--; }. blob_
22c0: 72 65 73 69 7a 65 28 70 43 6f 6d 6d 65 6e 74 2c resize(pComment,
22d0: 20 69 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 50 6f i);.}../*.** Po
22e0: 70 75 6c 61 74 65 20 74 68 65 20 47 6c 6f 62 61 pulate the Globa
22f0: 6c 2e 61 43 6f 6d 6d 69 74 46 69 6c 65 5b 5d 20 l.aCommitFile[]
2300: 62 61 73 65 64 20 6f 6e 20 74 68 65 20 63 6f 6d based on the com
2310: 6d 61 6e 64 20 6c 69 6e 65 20 61 72 67 75 6d 65 mand line argume
2320: 6e 74 73 0a 2a 2a 20 74 6f 20 61 20 5b 63 6f 6d nts.** to a [com
2330: 6d 69 74 5d 20 63 6f 6d 6d 61 6e 64 2e 20 47 6c mit] command. Gl
2340: 6f 62 61 6c 2e 61 43 6f 6d 6d 69 74 46 69 6c 65 obal.aCommitFile
2350: 20 69 73 20 61 6e 20 61 72 72 61 79 20 6f 66 20 is an array of
2360: 69 6e 74 65 67 65 72 73 0a 2a 2a 20 73 69 7a 65 integers.** size
2370: 64 20 61 74 20 28 4e 2b 31 29 2c 20 77 68 65 72 d at (N+1), wher
2380: 65 20 4e 20 69 73 20 74 68 65 20 6e 75 6d 62 65 e N is the numbe
2390: 72 20 6f 66 20 61 72 67 75 6d 65 6e 74 73 20 70 r of arguments p
23a0: 61 73 73 65 64 20 74 6f 20 5b 63 6f 6d 6d 69 74 assed to [commit
23b0: 5d 2e 0a 2a 2a 20 54 68 65 20 63 6f 6e 74 65 6e ]..** The conten
23c0: 74 73 20 61 72 65 20 74 68 65 20 5b 69 64 5d 20 ts are the [id]
23d0: 76 61 6c 75 65 73 20 66 72 6f 6d 20 74 68 65 20 values from the
23e0: 76 66 69 6c 65 20 74 61 62 6c 65 20 63 6f 72 72 vfile table corr
23f0: 65 73 70 6f 6e 64 69 6e 67 0a 2a 2a 20 74 6f 20 esponding.** to
2400: 74 68 65 20 66 69 6c 65 6e 61 6d 65 73 20 70 61 the filenames pa
2410: 73 73 65 64 20 61 73 20 61 72 67 75 6d 65 6e 74 ssed as argument
2420: 73 2e 0a 2a 2a 0a 2a 2a 20 54 68 65 20 6c 61 73 s..**.** The las
2430: 74 20 65 6c 65 6d 65 6e 74 20 6f 66 20 61 43 6f t element of aCo
2440: 6d 6d 69 74 46 69 6c 65 5b 5d 20 69 73 20 61 6c mmitFile[] is al
2450: 77 61 79 73 20 30 20 2d 20 69 6e 64 69 63 61 74 ways 0 - indicat
2460: 69 6e 67 20 74 68 65 20 65 6e 64 0a 2a 2a 20 6f ing the end.** o
2470: 66 20 74 68 65 20 61 72 72 61 79 2e 0a 2a 2a 0a f the array..**.
2480: 2a 2a 20 49 66 20 74 68 65 72 65 20 77 65 72 65 ** If there were
2490: 20 6e 6f 20 61 72 67 75 6d 65 6e 74 73 20 70 61 no arguments pa
24a0: 73 73 65 64 20 74 6f 20 5b 63 6f 6d 6d 69 74 5d ssed to [commit]
24b0: 2c 20 61 43 6f 6d 6d 69 74 46 69 6c 65 20 69 73 , aCommitFile is
24c0: 20 6e 6f 74 0a 2a 2a 20 61 6c 6c 6f 63 61 74 65 not.** allocate
24d0: 64 20 61 6e 64 20 72 65 6d 61 69 6e 73 20 4e 55 d and remains NU
24e0: 4c 4c 2e 20 4f 74 68 65 72 20 70 61 72 74 73 20 LL. Other parts
24f0: 6f 66 20 74 68 65 20 63 6f 64 65 20 69 6e 74 65 of the code inte
2500: 72 70 72 65 74 20 74 68 69 73 0a 2a 2a 20 74 6f rpret this.** to
2510: 20 6d 65 61 6e 20 22 61 6c 6c 20 66 69 6c 65 73 mean "all files
2520: 22 2e 0a 2a 2f 0a 76 6f 69 64 20 73 65 6c 65 63 "..*/.void selec
2530: 74 5f 63 6f 6d 6d 69 74 5f 66 69 6c 65 73 28 76 t_commit_files(v
2540: 6f 69 64 29 7b 0a 20 20 69 66 28 20 67 2e 61 72 oid){. if( g.ar
2550: 67 63 3e 32 20 29 7b 0a 20 20 20 20 69 6e 74 20 gc>2 ){. int
2560: 69 69 3b 0a 20 20 20 20 42 6c 6f 62 20 62 3b 0a ii;. Blob b;.
2570: 20 20 20 20 62 6c 6f 62 5f 7a 65 72 6f 28 26 62 blob_zero(&b
2580: 29 3b 0a 20 20 20 20 67 2e 61 43 6f 6d 6d 69 74 );. g.aCommit
2590: 46 69 6c 65 20 3d 20 6d 61 6c 6c 6f 63 28 73 69 File = malloc(si
25a0: 7a 65 6f 66 28 69 6e 74 29 2a 28 67 2e 61 72 67 zeof(int)*(g.arg
25b0: 63 2d 31 29 29 3b 0a 0a 20 20 20 20 66 6f 72 28 c-1));.. for(
25c0: 69 69 3d 32 3b 20 69 69 3c 67 2e 61 72 67 63 3b ii=2; ii<g.argc;
25d0: 20 69 69 2b 2b 29 7b 0a 20 20 20 20 20 20 69 6e ii++){. in
25e0: 74 20 69 49 64 3b 0a 20 20 20 20 20 20 66 69 6c t iId;. fil
25f0: 65 5f 74 72 65 65 5f 6e 61 6d 65 28 67 2e 61 72 e_tree_name(g.ar
2600: 67 76 5b 69 69 5d 2c 20 26 62 2c 20 31 29 3b 0a gv[ii], &b, 1);.
2610: 20 20 20 20 20 20 69 49 64 20 3d 20 64 62 5f 69 iId = db_i
2620: 6e 74 28 2d 31 2c 20 22 53 45 4c 45 43 54 20 69 nt(-1, "SELECT i
2630: 64 20 46 52 4f 4d 20 76 66 69 6c 65 20 57 48 45 d FROM vfile WHE
2640: 52 45 20 70 61 74 68 6e 61 6d 65 3d 25 51 22 2c RE pathname=%Q",
2650: 20 62 6c 6f 62 5f 73 74 72 28 26 62 29 29 3b 0a blob_str(&b));.
2660: 20 20 20 20 20 20 69 66 28 20 69 49 64 3c 30 20 if( iId<0
2670: 29 7b 0a 20 20 20 20 20 20 20 20 66 6f 73 73 69 ){. fossi
2680: 6c 5f 66 61 74 61 6c 28 22 66 6f 73 73 69 6c 20 l_fatal("fossil
2690: 6b 6e 6f 77 73 20 6e 6f 74 68 69 6e 67 20 61 62 knows nothing ab
26a0: 6f 75 74 3a 20 25 73 22 2c 20 67 2e 61 72 67 76 out: %s", g.argv
26b0: 5b 69 69 5d 29 3b 0a 20 20 20 20 20 20 7d 0a 20 [ii]);. }.
26c0: 20 20 20 20 20 67 2e 61 43 6f 6d 6d 69 74 46 69 g.aCommitFi
26d0: 6c 65 5b 69 69 2d 32 5d 20 3d 20 69 49 64 3b 0a le[ii-2] = iId;.
26e0: 20 20 20 20 20 20 62 6c 6f 62 5f 72 65 73 65 74 blob_reset
26f0: 28 26 62 29 3b 0a 20 20 20 20 7d 0a 20 20 20 20 (&b);. }.
2700: 67 2e 61 43 6f 6d 6d 69 74 46 69 6c 65 5b 69 69 g.aCommitFile[ii
2710: 2d 32 5d 20 3d 20 30 3b 0a 20 20 7d 0a 7d 0a 0a -2] = 0;. }.}..
2720: 2f 2a 0a 2a 2a 20 52 65 74 75 72 6e 20 74 72 75 /*.** Return tru
2730: 65 20 69 66 20 74 68 65 20 63 68 65 63 6b 2d 69 e if the check-i
2740: 6e 20 77 69 74 68 20 52 49 44 3d 72 69 64 20 69 n with RID=rid i
2750: 73 20 61 20 6c 65 61 66 2e 0a 2a 2a 20 41 20 6c s a leaf..** A l
2760: 65 61 66 20 68 61 73 20 6e 6f 20 63 68 69 6c 64 eaf has no child
2770: 72 65 6e 20 69 6e 20 74 68 65 20 73 61 6d 65 20 ren in the same
2780: 62 72 61 6e 63 68 2e 20 0a 2a 2f 0a 69 6e 74 20 branch. .*/.int
2790: 69 73 5f 61 5f 6c 65 61 66 28 69 6e 74 20 72 69 is_a_leaf(int ri
27a0: 64 29 7b 0a 20 20 69 6e 74 20 72 63 3b 0a 20 20 d){. int rc;.
27b0: 73 74 61 74 69 63 20 63 6f 6e 73 74 20 63 68 61 static const cha
27c0: 72 20 7a 53 71 6c 5b 5d 20 3d 20 0a 20 20 20 20 r zSql[] = .
27d0: 40 20 53 45 4c 45 43 54 20 31 20 46 52 4f 4d 20 @ SELECT 1 FROM
27e0: 70 6c 69 6e 6b 0a 20 20 20 20 40 20 20 57 48 45 plink. @ WHE
27f0: 52 45 20 70 69 64 3d 25 64 0a 20 20 20 20 40 20 RE pid=%d. @
2800: 20 20 20 41 4e 44 20 63 6f 61 6c 65 73 63 65 28 AND coalesce(
2810: 28 53 45 4c 45 43 54 20 76 61 6c 75 65 20 46 52 (SELECT value FR
2820: 4f 4d 20 74 61 67 78 72 65 66 0a 20 20 20 20 40 OM tagxref. @
2830: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
2840: 20 20 20 57 48 45 52 45 20 74 61 67 69 64 3d 25 WHERE tagid=%
2850: 64 20 41 4e 44 20 72 69 64 3d 70 6c 69 6e 6b 2e d AND rid=plink.
2860: 70 69 64 29 2c 20 27 74 72 75 6e 6b 27 29 0a 20 pid), 'trunk').
2870: 20 20 20 40 20 20 20 20 20 20 20 3d 63 6f 61 6c @ =coal
2880: 65 73 63 65 28 28 53 45 4c 45 43 54 20 76 61 6c esce((SELECT val
2890: 75 65 20 46 52 4f 4d 20 74 61 67 78 72 65 66 0a ue FROM tagxref.
28a0: 20 20 20 20 40 20 20 20 20 20 20 20 20 20 20 20 @
28b0: 20 20 20 20 20 20 20 20 57 48 45 52 45 20 74 61 WHERE ta
28c0: 67 69 64 3d 25 64 20 41 4e 44 20 72 69 64 3d 70 gid=%d AND rid=p
28d0: 6c 69 6e 6b 2e 63 69 64 29 2c 20 27 74 72 75 6e link.cid), 'trun
28e0: 6b 27 29 0a 20 20 3b 0a 20 20 72 63 20 3d 20 64 k'). ;. rc = d
28f0: 62 5f 69 6e 74 28 30 2c 20 7a 53 71 6c 2c 20 72 b_int(0, zSql, r
2900: 69 64 2c 20 54 41 47 5f 42 52 41 4e 43 48 2c 20 id, TAG_BRANCH,
2910: 54 41 47 5f 42 52 41 4e 43 48 29 3b 0a 20 20 72 TAG_BRANCH);. r
2920: 65 74 75 72 6e 20 72 63 3d 3d 30 3b 0a 7d 0a 0a eturn rc==0;.}..
2930: 2f 2a 0a 2a 2a 20 43 4f 4d 4d 41 4e 44 3a 20 63 /*.** COMMAND: c
2940: 69 0a 2a 2a 20 43 4f 4d 4d 41 4e 44 3a 20 63 6f i.** COMMAND: co
2950: 6d 6d 69 74 0a 2a 2a 0a 2a 2a 20 55 73 61 67 65 mmit.**.** Usage
2960: 3a 20 25 66 6f 73 73 69 6c 20 63 6f 6d 6d 69 74 : %fossil commit
2970: 20 3f 4f 50 54 49 4f 4e 53 3f 20 3f 46 49 4c 45 ?OPTIONS? ?FILE
2980: 2e 2e 2e 3f 0a 2a 2a 0a 2a 2a 20 43 72 65 61 74 ...?.**.** Creat
2990: 65 20 61 20 6e 65 77 20 76 65 72 73 69 6f 6e 20 e a new version
29a0: 63 6f 6e 74 61 69 6e 69 6e 67 20 61 6c 6c 20 6f containing all o
29b0: 66 20 74 68 65 20 63 68 61 6e 67 65 73 20 69 6e f the changes in
29c0: 20 74 68 65 20 63 75 72 72 65 6e 74 0a 2a 2a 20 the current.**
29d0: 63 68 65 63 6b 6f 75 74 2e 20 20 59 6f 75 20 77 checkout. You w
29e0: 69 6c 6c 20 62 65 20 70 72 6f 6d 70 74 65 64 20 ill be prompted
29f0: 74 6f 20 65 6e 74 65 72 20 61 20 63 68 65 63 6b to enter a check
2a00: 2d 69 6e 20 63 6f 6d 6d 65 6e 74 20 75 6e 6c 65 -in comment unle
2a10: 73 73 0a 2a 2a 20 74 68 65 20 22 2d 6d 22 20 6f ss.** the "-m" o
2a20: 70 74 69 6f 6e 20 69 73 20 75 73 65 64 20 74 6f ption is used to
2a30: 20 73 70 65 63 69 66 79 20 61 20 63 6f 6d 6d 65 specify a comme
2a40: 6e 74 20 6c 69 6e 65 2e 20 20 59 6f 75 20 77 69 nt line. You wi
2a50: 6c 6c 20 62 65 0a 2a 2a 20 70 72 6f 6d 70 74 65 ll be.** prompte
2a60: 64 20 66 6f 72 20 79 6f 75 72 20 47 50 47 20 70 d for your GPG p
2a70: 61 73 73 70 68 72 61 73 65 20 69 6e 20 6f 72 64 assphrase in ord
2a80: 65 72 20 74 6f 20 73 69 67 6e 20 74 68 65 20 6e er to sign the n
2a90: 65 77 20 6d 61 6e 69 66 65 73 74 0a 2a 2a 20 75 ew manifest.** u
2aa0: 6e 6c 65 73 73 20 74 68 65 20 22 2d 2d 6e 6f 73 nless the "--nos
2ab0: 69 67 6e 22 20 6f 70 74 69 6f 6e 73 20 69 73 20 ign" options is
2ac0: 75 73 65 64 2e 20 20 41 6c 6c 20 66 69 6c 65 73 used. All files
2ad0: 20 74 68 61 74 20 68 61 76 65 0a 2a 2a 20 63 68 that have.** ch
2ae0: 61 6e 67 65 64 20 77 69 6c 6c 20 62 65 20 63 6f anged will be co
2af0: 6d 6d 69 74 74 65 64 20 75 6e 6c 65 73 73 20 73 mmitted unless s
2b00: 6f 6d 65 20 73 75 62 73 65 74 20 6f 66 20 66 69 ome subset of fi
2b10: 6c 65 73 20 69 73 20 73 70 65 63 69 66 69 65 64 les is specified
2b20: 0a 2a 2a 20 6f 6e 20 74 68 65 20 63 6f 6d 6d 61 .** on the comma
2b30: 6e 64 20 6c 69 6e 65 2e 0a 2a 2a 0a 2a 2a 20 54 nd line..**.** T
2b40: 68 65 20 2d 2d 62 72 61 6e 63 68 20 6f 70 74 69 he --branch opti
2b50: 6f 6e 20 66 6f 6c 6c 6f 77 65 64 20 62 79 20 61 on followed by a
2b60: 20 62 72 61 6e 63 68 20 6e 61 6d 65 20 63 61 73 branch name cas
2b70: 65 73 20 74 68 65 20 6e 65 77 20 63 68 65 63 6b es the new check
2b80: 2d 69 6e 0a 2a 2a 20 74 6f 20 62 65 20 70 6c 61 -in.** to be pla
2b90: 63 65 64 20 69 6e 20 74 68 65 20 6e 61 6d 65 64 ced in the named
2ba0: 20 62 72 61 6e 63 68 2e 20 20 54 68 65 20 2d 2d branch. The --
2bb0: 62 67 63 6f 6c 6f 72 20 6f 70 74 69 6f 6e 20 63 bgcolor option c
2bc0: 61 6e 20 62 65 20 66 6f 6c 6c 6f 77 65 64 0a 2a an be followed.*
2bd0: 2a 20 62 79 20 61 20 63 6f 6c 6f 72 20 6e 61 6d * by a color nam
2be0: 65 20 28 65 78 3a 20 20 27 23 66 66 63 30 63 30 e (ex: '#ffc0c0
2bf0: 27 29 20 74 6f 20 73 70 65 63 69 66 79 20 74 68 ') to specify th
2c00: 65 20 62 61 63 6b 67 72 6f 75 6e 64 20 63 6f 6c e background col
2c10: 6f 72 20 6f 66 0a 2a 2a 20 65 6e 74 72 69 65 73 or of.** entries
2c20: 20 69 6e 20 74 68 65 20 6e 65 77 20 62 72 61 6e in the new bran
2c30: 63 68 20 77 68 65 6e 20 73 68 6f 77 6e 20 69 6e ch when shown in
2c40: 20 74 68 65 20 77 65 62 20 74 69 6d 65 6c 69 6e the web timelin
2c50: 65 20 69 6e 74 65 72 66 61 63 65 2e 0a 2a 2a 0a e interface..**.
2c60: 2a 2a 20 41 20 63 68 65 63 6b 2d 69 6e 20 69 73 ** A check-in is
2c70: 20 6e 6f 74 20 70 65 72 6d 69 74 74 65 64 20 74 not permitted t
2c80: 6f 20 66 6f 72 6b 20 75 6e 6c 65 73 73 20 74 68 o fork unless th
2c90: 65 20 2d 2d 66 6f 72 63 65 20 6f 72 20 2d 66 0a e --force or -f.
2ca0: 2a 2a 20 6f 70 74 69 6f 6e 20 61 70 70 65 61 72 ** option appear
2cb0: 73 2e 20 20 41 20 63 68 65 63 6b 2d 69 6e 20 69 s. A check-in i
2cc0: 73 20 6e 6f 74 20 61 6c 6c 6f 77 65 64 20 61 67 s not allowed ag
2cd0: 61 69 6e 73 74 20 61 20 63 6c 6f 73 65 64 20 63 ainst a closed c
2ce0: 68 65 63 6b 2d 69 6e 2e 0a 2a 2a 0a 2a 2a 20 4f heck-in..**.** O
2cf0: 70 74 69 6f 6e 73 3a 0a 2a 2a 0a 2a 2a 20 20 20 ptions:.**.**
2d00: 20 2d 2d 63 6f 6d 6d 65 6e 74 7c 2d 6d 20 43 4f --comment|-m CO
2d10: 4d 4d 45 4e 54 2d 54 45 58 54 0a 2a 2a 20 20 20 MMENT-TEXT.**
2d20: 20 2d 2d 62 72 61 6e 63 68 20 4e 45 57 2d 42 52 --branch NEW-BR
2d30: 41 4e 43 48 2d 4e 41 4d 45 0a 2a 2a 20 20 20 20 ANCH-NAME.**
2d40: 2d 2d 62 67 63 6f 6c 6f 72 20 43 4f 4c 4f 52 0a --bgcolor COLOR.
2d50: 2a 2a 20 20 20 20 2d 2d 6e 6f 73 69 67 6e 0a 2a ** --nosign.*
2d60: 2a 20 20 20 20 2d 2d 66 6f 72 63 65 7c 2d 66 0a * --force|-f.
2d70: 2a 2a 20 20 20 20 0a 2a 2f 0a 76 6f 69 64 20 63 ** .*/.void c
2d80: 6f 6d 6d 69 74 5f 63 6d 64 28 76 6f 69 64 29 7b ommit_cmd(void){
2d90: 0a 20 20 69 6e 74 20 72 63 3b 0a 20 20 69 6e 74 . int rc;. int
2da0: 20 76 69 64 2c 20 6e 72 69 64 2c 20 6e 76 69 64 vid, nrid, nvid
2db0: 3b 0a 20 20 42 6c 6f 62 20 63 6f 6d 6d 65 6e 74 ;. Blob comment
2dc0: 3b 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a ;. const char *
2dd0: 7a 43 6f 6d 6d 65 6e 74 3b 0a 20 20 53 74 6d 74 zComment;. Stmt
2de0: 20 71 3b 0a 20 20 53 74 6d 74 20 71 32 3b 0a 20 q;. Stmt q2;.
2df0: 20 63 68 61 72 20 2a 7a 55 75 69 64 2c 20 2a 7a char *zUuid, *z
2e00: 44 61 74 65 3b 0a 20 20 69 6e 74 20 6e 6f 53 69 Date;. int noSi
2e10: 67 6e 20 3d 20 30 3b 20 20 20 20 20 20 20 20 2f gn = 0; /
2e20: 2a 20 54 72 75 65 20 74 6f 20 6f 6d 69 74 20 73 * True to omit s
2e30: 69 67 6e 69 6e 67 20 74 68 65 20 6d 61 6e 69 66 igning the manif
2e40: 65 73 74 20 75 73 69 6e 67 20 47 50 47 20 2a 2f est using GPG */
2e50: 0a 20 20 69 6e 74 20 69 73 41 4d 65 72 67 65 20 . int isAMerge
2e60: 3d 20 30 3b 20 20 20 20 20 20 2f 2a 20 54 72 75 = 0; /* Tru
2e70: 65 20 69 66 20 63 68 65 63 6b 69 6e 67 20 69 6e e if checking in
2e80: 20 61 20 6d 65 72 67 65 20 2a 2f 0a 20 20 69 6e a merge */. in
2e90: 74 20 66 6f 72 63 65 46 6c 61 67 20 3d 20 30 3b t forceFlag = 0;
2ea0: 20 20 20 20 20 2f 2a 20 46 6f 72 63 65 20 61 20 /* Force a
2eb0: 66 6f 72 6b 20 2a 2f 0a 20 20 63 68 61 72 20 2a fork */. char *
2ec0: 7a 4d 61 6e 69 66 65 73 74 46 69 6c 65 3b 20 20 zManifestFile;
2ed0: 20 2f 2a 20 4e 61 6d 65 20 6f 66 20 74 68 65 20 /* Name of the
2ee0: 6d 61 6e 69 66 65 73 74 20 66 69 6c 65 20 2a 2f manifest file */
2ef0: 0a 20 20 69 6e 74 20 6e 42 61 73 65 6e 61 6d 65 . int nBasename
2f00: 3b 20 20 20 20 20 20 20 20 20 2f 2a 20 4c 65 6e ; /* Len
2f10: 67 74 68 20 6f 66 20 22 67 2e 7a 4c 6f 63 61 6c gth of "g.zLocal
2f20: 52 6f 6f 74 2f 22 20 2a 2f 0a 20 20 63 6f 6e 73 Root/" */. cons
2f30: 74 20 63 68 61 72 20 2a 7a 42 72 61 6e 63 68 3b t char *zBranch;
2f40: 20 20 20 2f 2a 20 43 72 65 61 74 65 20 61 20 6e /* Create a n
2f50: 65 77 20 62 72 61 6e 63 68 20 77 69 74 68 20 74 ew branch with t
2f60: 68 69 73 20 6e 61 6d 65 20 2a 2f 0a 20 20 63 6f his name */. co
2f70: 6e 73 74 20 63 68 61 72 20 2a 7a 42 67 43 6f 6c nst char *zBgCol
2f80: 6f 72 3b 20 20 2f 2a 20 53 65 74 20 62 61 63 6b or; /* Set back
2f90: 67 72 6f 75 6e 64 20 63 6f 6c 6f 72 20 77 68 65 ground color whe
2fa0: 6e 20 62 72 61 6e 63 68 69 6e 67 20 2a 2f 0a 20 n branching */.
2fb0: 20 42 6c 6f 62 20 66 69 6c 65 6e 61 6d 65 3b 20 Blob filename;
2fc0: 20 20 20 20 20 20 20 20 2f 2a 20 63 6f 6d 70 6c /* compl
2fd0: 65 74 65 20 66 69 6c 65 6e 61 6d 65 20 2a 2f 0a ete filename */.
2fe0: 20 20 42 6c 6f 62 20 6d 61 6e 69 66 65 73 74 3b Blob manifest;
2ff0: 0a 20 20 42 6c 6f 62 20 6d 75 75 69 64 3b 20 20 . Blob muuid;
3000: 20 20 20 20 20 20 20 20 20 20 2f 2a 20 4d 61 6e /* Man
3010: 69 66 65 73 74 20 75 75 69 64 20 2a 2f 0a 20 20 ifest uuid */.
3020: 42 6c 6f 62 20 6d 63 6b 73 75 6d 3b 20 20 20 20 Blob mcksum;
3030: 20 20 20 20 20 20 20 2f 2a 20 53 65 6c 66 2d 63 /* Self-c
3040: 68 65 63 6b 73 75 6d 20 6f 6e 20 74 68 65 20 6d hecksum on the m
3050: 61 6e 69 66 65 73 74 20 2a 2f 0a 20 20 42 6c 6f anifest */. Blo
3060: 62 20 63 6b 73 75 6d 31 2c 20 63 6b 73 75 6d 32 b cksum1, cksum2
3070: 3b 20 20 20 2f 2a 20 42 65 66 6f 72 65 20 61 6e ; /* Before an
3080: 64 20 61 66 74 65 72 20 63 6f 6d 6d 69 74 20 63 d after commit c
3090: 68 65 63 6b 73 75 6d 73 20 2a 2f 0a 20 20 42 6c hecksums */. Bl
30a0: 6f 62 20 63 6b 73 75 6d 31 62 3b 20 20 20 20 20 ob cksum1b;
30b0: 20 20 20 20 20 2f 2a 20 43 68 65 63 6b 73 75 6d /* Checksum
30c0: 20 72 65 63 6f 72 64 65 64 20 69 6e 20 74 68 65 recorded in the
30d0: 20 6d 61 6e 69 66 65 73 74 20 2a 2f 0a 20 0a 20 manifest */. .
30e0: 20 75 72 6c 5f 70 72 6f 78 79 5f 6f 70 74 69 6f url_proxy_optio
30f0: 6e 73 28 29 3b 0a 20 20 6e 6f 53 69 67 6e 20 3d ns();. noSign =
3100: 20 66 69 6e 64 5f 6f 70 74 69 6f 6e 28 22 6e 6f find_option("no
3110: 73 69 67 6e 22 2c 30 2c 30 29 21 3d 30 3b 0a 20 sign",0,0)!=0;.
3120: 20 7a 43 6f 6d 6d 65 6e 74 20 3d 20 66 69 6e 64 zComment = find
3130: 5f 6f 70 74 69 6f 6e 28 22 63 6f 6d 6d 65 6e 74 _option("comment
3140: 22 2c 22 6d 22 2c 31 29 3b 0a 20 20 66 6f 72 63 ","m",1);. forc
3150: 65 46 6c 61 67 20 3d 20 66 69 6e 64 5f 6f 70 74 eFlag = find_opt
3160: 69 6f 6e 28 22 66 6f 72 63 65 22 2c 20 22 66 22 ion("force", "f"
3170: 2c 20 30 29 21 3d 30 3b 0a 20 20 7a 42 72 61 6e , 0)!=0;. zBran
3180: 63 68 20 3d 20 66 69 6e 64 5f 6f 70 74 69 6f 6e ch = find_option
3190: 28 22 62 72 61 6e 63 68 22 2c 22 62 22 2c 31 29 ("branch","b",1)
31a0: 3b 0a 20 20 7a 42 67 43 6f 6c 6f 72 20 3d 20 66 ;. zBgColor = f
31b0: 69 6e 64 5f 6f 70 74 69 6f 6e 28 22 62 67 63 6f ind_option("bgco
31c0: 6c 6f 72 22 2c 30 2c 31 29 3b 0a 20 20 64 62 5f lor",0,1);. db_
31d0: 6d 75 73 74 5f 62 65 5f 77 69 74 68 69 6e 5f 74 must_be_within_t
31e0: 72 65 65 28 29 3b 0a 20 20 6e 6f 53 69 67 6e 20 ree();. noSign
31f0: 3d 20 64 62 5f 67 65 74 5f 62 6f 6f 6c 65 61 6e = db_get_boolean
3200: 28 22 6f 6d 69 74 73 69 67 6e 22 2c 20 30 29 7c ("omitsign", 0)|
3210: 6e 6f 53 69 67 6e 3b 0a 20 20 69 66 28 20 64 62 noSign;. if( db
3220: 5f 67 65 74 5f 62 6f 6f 6c 65 61 6e 28 22 63 6c _get_boolean("cl
3230: 65 61 72 73 69 67 6e 22 2c 20 31 29 3d 3d 30 20 earsign", 1)==0
3240: 29 7b 20 6e 6f 53 69 67 6e 20 3d 20 31 3b 20 7d ){ noSign = 1; }
3250: 0a 20 20 76 65 72 69 66 79 5f 61 6c 6c 5f 6f 70 . verify_all_op
3260: 74 69 6f 6e 73 28 29 3b 0a 0a 20 20 2f 2a 0a 20 tions();.. /*.
3270: 20 2a 2a 20 41 75 74 6f 73 79 6e 63 20 69 66 20 ** Autosync if
3280: 72 65 71 75 65 73 74 65 64 2e 0a 20 20 2a 2f 0a requested.. */.
3290: 20 20 61 75 74 6f 73 79 6e 63 28 41 55 54 4f 53 autosync(AUTOS
32a0: 59 4e 43 5f 50 55 4c 4c 29 3b 0a 0a 20 20 2f 2a YNC_PULL);.. /*
32b0: 20 54 68 65 72 65 20 61 72 65 20 74 77 6f 20 77 There are two w
32c0: 61 79 73 20 74 68 69 73 20 63 6f 6d 6d 61 6e 64 ays this command
32d0: 20 6d 61 79 20 62 65 20 65 78 65 63 75 74 65 64 may be executed
32e0: 2e 20 49 66 20 74 68 65 72 65 20 61 72 65 0a 20 . If there are.
32f0: 20 2a 2a 20 6e 6f 20 61 72 67 75 6d 65 6e 74 73 ** no arguments
3300: 20 66 6f 6c 6c 6f 77 69 6e 67 20 74 68 65 20 77 following the w
3310: 6f 72 64 20 22 63 6f 6d 6d 69 74 22 2c 20 74 68 ord "commit", th
3320: 65 6e 20 61 6c 6c 20 6d 6f 64 69 66 69 65 64 20 en all modified
3330: 66 69 6c 65 73 0a 20 20 2a 2a 20 69 6e 20 74 68 files. ** in th
3340: 65 20 63 68 65 63 6b 65 64 20 6f 75 74 20 64 69 e checked out di
3350: 72 65 63 74 6f 72 79 20 61 72 65 20 63 6f 6d 6d rectory are comm
3360: 69 74 74 65 64 2e 20 49 66 20 6f 6e 65 20 6f 72 itted. If one or
3370: 20 6d 6f 72 65 20 61 72 67 75 6d 65 6e 74 73 0a more arguments.
3380: 20 20 2a 2a 20 66 6f 6c 6c 6f 77 73 20 22 63 6f ** follows "co
3390: 6d 6d 69 74 22 2c 20 74 68 65 6e 20 6f 6e 6c 79 mmit", then only
33a0: 20 74 68 6f 73 65 20 66 69 6c 65 73 20 61 72 65 those files are
33b0: 20 63 6f 6d 6d 69 74 74 65 64 2e 0a 20 20 2a 2a committed.. **
33c0: 0a 20 20 2a 2a 20 41 66 74 65 72 20 74 68 65 20 . ** After the
33d0: 66 6f 6c 6c 6f 77 69 6e 67 20 66 75 6e 63 74 69 following functi
33e0: 6f 6e 20 63 61 6c 6c 20 68 61 73 20 72 65 74 75 on call has retu
33f0: 72 6e 65 64 2c 20 74 68 65 20 47 6c 6f 62 61 6c rned, the Global
3400: 2e 61 43 6f 6d 6d 69 74 46 69 6c 65 5b 5d 0a 20 .aCommitFile[].
3410: 20 2a 2a 20 61 72 72 61 79 20 69 73 20 61 6c 6c ** array is all
3420: 6f 63 61 74 65 64 20 74 6f 20 63 6f 6e 74 61 69 ocated to contai
3430: 6e 20 74 68 65 20 22 69 64 22 20 66 69 65 6c 64 n the "id" field
3440: 20 66 72 6f 6d 20 74 68 65 20 76 66 69 6c 65 20 from the vfile
3450: 74 61 62 6c 65 0a 20 20 2a 2a 20 66 6f 72 20 65 table. ** for e
3460: 61 63 68 20 66 69 6c 65 20 74 6f 20 62 65 20 63 ach file to be c
3470: 6f 6d 6d 69 74 74 65 64 2e 20 4f 72 2c 20 69 66 ommitted. Or, if
3480: 20 61 43 6f 6d 6d 69 74 46 69 6c 65 20 69 73 20 aCommitFile is
3490: 4e 55 4c 4c 2c 20 61 6c 6c 20 66 69 6c 65 73 0a NULL, all files.
34a0: 20 20 2a 2a 20 73 68 6f 75 6c 64 20 62 65 20 63 ** should be c
34b0: 6f 6d 6d 69 74 74 65 64 2e 0a 20 20 2a 2f 0a 20 ommitted.. */.
34c0: 20 73 65 6c 65 63 74 5f 63 6f 6d 6d 69 74 5f 66 select_commit_f
34d0: 69 6c 65 73 28 29 3b 0a 20 20 69 73 41 4d 65 72 iles();. isAMer
34e0: 67 65 20 3d 20 64 62 5f 65 78 69 73 74 73 28 22 ge = db_exists("
34f0: 53 45 4c 45 43 54 20 31 20 46 52 4f 4d 20 76 6d SELECT 1 FROM vm
3500: 65 72 67 65 22 29 3b 0a 20 20 69 66 28 20 67 2e erge");. if( g.
3510: 61 43 6f 6d 6d 69 74 46 69 6c 65 20 26 26 20 69 aCommitFile && i
3520: 73 41 4d 65 72 67 65 20 29 7b 0a 20 20 20 20 66 sAMerge ){. f
3530: 6f 73 73 69 6c 5f 66 61 74 61 6c 28 22 63 61 6e ossil_fatal("can
3540: 6e 6f 74 20 64 6f 20 61 20 70 61 72 74 69 61 6c not do a partial
3550: 20 63 6f 6d 6d 69 74 20 6f 66 20 61 20 6d 65 72 commit of a mer
3560: 67 65 22 29 3b 0a 20 20 7d 0a 0a 20 20 75 73 65 ge");. }.. use
3570: 72 5f 73 65 6c 65 63 74 28 29 3b 0a 20 20 2f 2a r_select();. /*
3580: 0a 20 20 2a 2a 20 43 68 65 63 6b 20 74 68 61 74 . ** Check that
3590: 20 74 68 65 20 75 73 65 72 20 65 78 69 73 74 73 the user exists
35a0: 2e 0a 20 20 2a 2f 0a 20 20 69 66 28 20 21 64 62 .. */. if( !db
35b0: 5f 65 78 69 73 74 73 28 22 53 45 4c 45 43 54 20 _exists("SELECT
35c0: 31 20 46 52 4f 4d 20 75 73 65 72 20 57 48 45 52 1 FROM user WHER
35d0: 45 20 6c 6f 67 69 6e 3d 25 51 22 2c 20 67 2e 7a E login=%Q", g.z
35e0: 4c 6f 67 69 6e 29 20 29 7b 0a 20 20 20 20 66 6f Login) ){. fo
35f0: 73 73 69 6c 5f 66 61 74 61 6c 28 22 6e 6f 20 73 ssil_fatal("no s
3600: 75 63 68 20 75 73 65 72 3a 20 25 73 22 2c 20 67 uch user: %s", g
3610: 2e 7a 4c 6f 67 69 6e 29 3b 0a 20 20 7d 0a 20 20 .zLogin);. }.
3620: 0a 20 20 64 62 5f 62 65 67 69 6e 5f 74 72 61 6e . db_begin_tran
3630: 73 61 63 74 69 6f 6e 28 29 3b 0a 20 20 64 62 5f saction();. db_
3640: 72 65 63 6f 72 64 5f 72 65 70 6f 73 69 74 6f 72 record_repositor
3650: 79 5f 66 69 6c 65 6e 61 6d 65 28 30 29 3b 0a 20 y_filename(0);.
3660: 20 72 63 20 3d 20 75 6e 73 61 76 65 64 5f 63 68 rc = unsaved_ch
3670: 61 6e 67 65 73 28 29 3b 0a 20 20 69 66 28 20 72 anges();. if( r
3680: 63 3d 3d 30 20 26 26 20 21 69 73 41 4d 65 72 67 c==0 && !isAMerg
3690: 65 20 26 26 20 21 66 6f 72 63 65 46 6c 61 67 20 e && !forceFlag
36a0: 29 7b 0a 20 20 20 20 66 6f 73 73 69 6c 5f 70 61 ){. fossil_pa
36b0: 6e 69 63 28 22 6e 6f 74 68 69 6e 67 20 68 61 73 nic("nothing has
36c0: 20 63 68 61 6e 67 65 64 22 29 3b 0a 20 20 7d 0a changed");. }.
36d0: 0a 20 20 2f 2a 20 49 66 20 6f 6e 65 20 6f 72 20 . /* If one or
36e0: 6d 6f 72 65 20 66 69 6c 65 73 20 74 68 61 74 20 more files that
36f0: 77 65 72 65 20 6e 61 6d 65 64 20 6f 6e 20 74 68 were named on th
3700: 65 20 63 6f 6d 6d 61 6e 64 20 6c 69 6e 65 20 68 e command line h
3710: 61 76 65 20 6e 6f 74 0a 20 20 2a 2a 20 62 65 65 ave not. ** bee
3720: 6e 20 6d 6f 64 69 66 69 65 64 2c 20 62 61 69 6c n modified, bail
3730: 20 6f 75 74 20 6e 6f 77 2e 0a 20 20 2a 2f 0a 20 out now.. */.
3740: 20 69 66 28 20 67 2e 61 43 6f 6d 6d 69 74 46 69 if( g.aCommitFi
3750: 6c 65 20 29 7b 0a 20 20 20 20 42 6c 6f 62 20 75 le ){. Blob u
3760: 6e 6d 6f 64 69 66 69 65 64 3b 0a 20 20 20 20 6d nmodified;. m
3770: 65 6d 73 65 74 28 26 75 6e 6d 6f 64 69 66 69 65 emset(&unmodifie
3780: 64 2c 20 30 2c 20 73 69 7a 65 6f 66 28 42 6c 6f d, 0, sizeof(Blo
3790: 62 29 29 3b 0a 20 20 20 20 62 6c 6f 62 5f 69 6e b));. blob_in
37a0: 69 74 28 26 75 6e 6d 6f 64 69 66 69 65 64 2c 20 it(&unmodified,
37b0: 30 2c 20 30 29 3b 0a 20 20 20 20 64 62 5f 62 6c 0, 0);. db_bl
37c0: 6f 62 28 26 75 6e 6d 6f 64 69 66 69 65 64 2c 20 ob(&unmodified,
37d0: 0a 20 20 20 20 20 20 22 53 45 4c 45 43 54 20 70 . "SELECT p
37e0: 61 74 68 6e 61 6d 65 20 46 52 4f 4d 20 76 66 69 athname FROM vfi
37f0: 6c 65 20 57 48 45 52 45 20 63 68 6e 67 65 64 20 le WHERE chnged
3800: 3d 20 30 20 41 4e 44 20 66 69 6c 65 5f 69 73 5f = 0 AND file_is_
3810: 73 65 6c 65 63 74 65 64 28 69 64 29 22 0a 20 20 selected(id)".
3820: 20 20 29 3b 0a 20 20 20 20 69 66 28 20 73 74 72 );. if( str
3830: 6c 65 6e 28 62 6c 6f 62 5f 73 74 72 28 26 75 6e len(blob_str(&un
3840: 6d 6f 64 69 66 69 65 64 29 29 20 29 7b 0a 20 20 modified)) ){.
3850: 20 20 20 20 66 6f 73 73 69 6c 5f 70 61 6e 69 63 fossil_panic
3860: 28 22 66 69 6c 65 20 25 73 20 68 61 73 20 6e 6f ("file %s has no
3870: 74 20 63 68 61 6e 67 65 64 22 2c 20 62 6c 6f 62 t changed", blob
3880: 5f 73 74 72 28 26 75 6e 6d 6f 64 69 66 69 65 64 _str(&unmodified
3890: 29 29 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 0a 20 ));. }. }..
38a0: 20 76 69 64 20 3d 20 64 62 5f 6c 67 65 74 5f 69 vid = db_lget_i
38b0: 6e 74 28 22 63 68 65 63 6b 6f 75 74 22 2c 20 30 nt("checkout", 0
38c0: 29 3b 0a 0a 20 20 2f 2a 0a 20 20 2a 2a 20 44 6f );.. /*. ** Do
38d0: 20 6e 6f 74 20 61 6c 6c 6f 77 20 61 20 63 6f 6d not allow a com
38e0: 6d 69 74 20 74 68 61 74 20 77 69 6c 6c 20 63 61 mit that will ca
38f0: 75 73 65 20 61 20 66 6f 72 6b 20 75 6e 6c 65 73 use a fork unles
3900: 73 20 74 68 65 20 2d 2d 66 6f 72 63 65 20 66 6c s the --force fl
3910: 61 67 0a 20 20 2a 2a 20 69 73 20 75 73 65 64 2e ag. ** is used.
3920: 0a 20 20 2a 2f 0a 20 20 69 66 28 20 7a 42 72 61 . */. if( zBra
3930: 6e 63 68 3d 3d 30 20 26 26 20 66 6f 72 63 65 46 nch==0 && forceF
3940: 6c 61 67 3d 3d 30 20 26 26 20 21 69 73 5f 61 5f lag==0 && !is_a_
3950: 6c 65 61 66 28 76 69 64 29 20 29 7b 0a 20 20 20 leaf(vid) ){.
3960: 20 66 6f 73 73 69 6c 5f 66 61 74 61 6c 28 22 77 fossil_fatal("w
3970: 6f 75 6c 64 20 66 6f 72 6b 2e 20 20 5c 22 75 70 ould fork. \"up
3980: 64 61 74 65 5c 22 20 66 69 72 73 74 20 6f 72 20 date\" first or
3990: 75 73 65 20 2d 66 20 6f 72 20 2d 2d 66 6f 72 63 use -f or --forc
39a0: 65 2e 22 29 3b 0a 20 20 7d 0a 0a 20 20 2f 2a 0a e.");. }.. /*.
39b0: 20 20 2a 2a 20 44 6f 20 6e 6f 74 20 61 6c 6c 6f ** Do not allo
39c0: 77 20 61 20 63 6f 6d 6d 69 74 20 61 67 61 69 6e w a commit again
39d0: 73 74 20 61 20 63 6c 6f 73 65 64 20 6c 65 61 66 st a closed leaf
39e0: 20 0a 20 20 2a 2f 0a 20 20 69 66 28 20 64 62 5f . */. if( db_
39f0: 65 78 69 73 74 73 28 22 53 45 4c 45 43 54 20 31 exists("SELECT 1
3a00: 20 46 52 4f 4d 20 74 61 67 78 72 65 66 22 0a 20 FROM tagxref".
3a10: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 "
3a20: 20 57 48 45 52 45 20 74 61 67 69 64 3d 25 64 20 WHERE tagid=%d
3a30: 41 4e 44 20 72 69 64 3d 25 64 20 41 4e 44 20 74 AND rid=%d AND t
3a40: 61 67 74 79 70 65 3e 30 22 2c 0a 20 20 20 20 20 agtype>0",.
3a50: 20 20 20 20 20 20 20 20 20 20 20 54 41 47 5f 43 TAG_C
3a60: 4c 4f 53 45 44 2c 20 76 69 64 29 20 29 7b 0a 20 LOSED, vid) ){.
3a70: 20 20 20 66 6f 73 73 69 6c 5f 66 61 74 61 6c 28 fossil_fatal(
3a80: 22 63 61 6e 6e 6f 74 20 63 6f 6d 6d 69 74 20 61 "cannot commit a
3a90: 67 61 69 6e 73 74 20 61 20 63 6c 6f 73 65 64 20 gainst a closed
3aa0: 6c 65 61 66 22 29 3b 0a 20 20 7d 0a 0a 20 20 76 leaf");. }.. v
3ab0: 66 69 6c 65 5f 61 67 67 72 65 67 61 74 65 5f 63 file_aggregate_c
3ac0: 68 65 63 6b 73 75 6d 5f 64 69 73 6b 28 76 69 64 hecksum_disk(vid
3ad0: 2c 20 26 63 6b 73 75 6d 31 29 3b 0a 20 20 69 66 , &cksum1);. if
3ae0: 28 20 7a 43 6f 6d 6d 65 6e 74 20 29 7b 0a 20 20 ( zComment ){.
3af0: 20 20 62 6c 6f 62 5f 7a 65 72 6f 28 26 63 6f 6d blob_zero(&com
3b00: 6d 65 6e 74 29 3b 0a 20 20 20 20 62 6c 6f 62 5f ment);. blob_
3b10: 61 70 70 65 6e 64 28 26 63 6f 6d 6d 65 6e 74 2c append(&comment,
3b20: 20 7a 43 6f 6d 6d 65 6e 74 2c 20 2d 31 29 3b 0a zComment, -1);.
3b30: 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 70 72 65 }else{. pre
3b40: 70 61 72 65 5f 63 6f 6d 6d 69 74 5f 63 6f 6d 6d pare_commit_comm
3b50: 65 6e 74 28 26 63 6f 6d 6d 65 6e 74 29 3b 0a 20 ent(&comment);.
3b60: 20 20 20 69 66 28 20 62 6c 6f 62 5f 73 69 7a 65 if( blob_size
3b70: 28 26 63 6f 6d 6d 65 6e 74 29 3d 3d 30 20 29 7b (&comment)==0 ){
3b80: 0a 20 20 20 20 20 20 42 6c 6f 62 20 61 6e 73 3b . Blob ans;
3b90: 0a 20 20 20 20 20 20 62 6c 6f 62 5f 7a 65 72 6f . blob_zero
3ba0: 28 26 61 6e 73 29 3b 0a 20 20 20 20 20 20 70 72 (&ans);. pr
3bb0: 6f 6d 70 74 5f 75 73 65 72 28 22 65 6d 70 74 79 ompt_user("empty
3bc0: 20 63 68 65 63 6b 2d 69 6e 20 63 6f 6d 6d 65 6e check-in commen
3bd0: 74 2e 20 20 63 6f 6e 74 69 6e 75 65 20 5b 79 2f t. continue [y/
3be0: 4e 5d 3f 20 22 2c 20 26 61 6e 73 29 3b 0a 20 20 N]? ", &ans);.
3bf0: 20 20 20 20 69 66 28 20 62 6c 6f 62 5f 73 74 72 if( blob_str
3c00: 28 26 61 6e 73 29 5b 30 5d 21 3d 27 79 27 20 29 (&ans)[0]!='y' )
3c10: 7b 0a 20 20 20 20 20 20 20 20 64 62 5f 65 6e 64 {. db_end
3c20: 5f 74 72 61 6e 73 61 63 74 69 6f 6e 28 31 29 3b _transaction(1);
3c30: 0a 20 20 20 20 20 20 20 20 65 78 69 74 28 31 29 . exit(1)
3c40: 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 7d 0a ;. }. }.
3c50: 20 20 7d 0a 0a 20 20 2f 2a 20 53 74 65 70 20 31 }.. /* Step 1
3c60: 3a 20 49 6e 73 65 72 74 20 72 65 63 6f 72 64 73 : Insert records
3c70: 20 66 6f 72 20 61 6c 6c 20 6d 6f 64 69 66 69 65 for all modifie
3c80: 64 20 66 69 6c 65 73 20 69 6e 74 6f 20 74 68 65 d files into the
3c90: 20 62 6c 6f 62 20 0a 20 20 2a 2a 20 74 61 62 6c blob . ** tabl
3ca0: 65 2e 20 49 66 20 74 68 65 72 65 20 77 65 72 65 e. If there were
3cb0: 20 61 72 67 75 6d 65 6e 74 73 20 70 61 73 73 65 arguments passe
3cc0: 64 20 74 6f 20 74 68 69 73 20 63 6f 6d 6d 61 6e d to this comman
3cd0: 64 2c 20 6f 6e 6c 79 0a 20 20 2a 2a 20 74 68 65 d, only. ** the
3ce0: 20 69 64 65 6e 74 69 66 69 65 64 20 66 69 6c 73 identified fils
3cf0: 20 61 72 65 20 69 6e 73 65 72 74 65 64 20 28 69 are inserted (i
3d00: 66 20 74 68 65 79 20 68 61 76 65 20 62 65 65 6e f they have been
3d10: 20 6d 6f 64 69 66 69 65 64 29 2e 0a 20 20 2a 2f modified).. */
3d20: 0a 20 20 64 62 5f 70 72 65 70 61 72 65 28 26 71 . db_prepare(&q
3d30: 2c 0a 20 20 20 20 22 53 45 4c 45 43 54 20 69 64 ,. "SELECT id
3d40: 2c 20 25 51 20 7c 7c 20 70 61 74 68 6e 61 6d 65 , %Q || pathname
3d50: 2c 20 6d 72 69 64 20 46 52 4f 4d 20 76 66 69 6c , mrid FROM vfil
3d60: 65 20 22 0a 20 20 20 20 22 57 48 45 52 45 20 63 e ". "WHERE c
3d70: 68 6e 67 65 64 3d 3d 31 20 41 4e 44 20 4e 4f 54 hnged==1 AND NOT
3d80: 20 64 65 6c 65 74 65 64 20 41 4e 44 20 66 69 6c deleted AND fil
3d90: 65 5f 69 73 5f 73 65 6c 65 63 74 65 64 28 69 64 e_is_selected(id
3da0: 29 22 0a 20 20 20 20 2c 20 67 2e 7a 4c 6f 63 61 )". , g.zLoca
3db0: 6c 52 6f 6f 74 0a 20 20 29 3b 0a 20 20 77 68 69 lRoot. );. whi
3dc0: 6c 65 28 20 64 62 5f 73 74 65 70 28 26 71 29 3d le( db_step(&q)=
3dd0: 3d 53 51 4c 49 54 45 5f 52 4f 57 20 29 7b 0a 20 =SQLITE_ROW ){.
3de0: 20 20 20 69 6e 74 20 69 64 2c 20 72 69 64 3b 0a int id, rid;.
3df0: 20 20 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a const char *
3e00: 7a 46 75 6c 6c 6e 61 6d 65 3b 0a 20 20 20 20 42 zFullname;. B
3e10: 6c 6f 62 20 63 6f 6e 74 65 6e 74 3b 0a 0a 20 20 lob content;..
3e20: 20 20 69 64 20 3d 20 64 62 5f 63 6f 6c 75 6d 6e id = db_column
3e30: 5f 69 6e 74 28 26 71 2c 20 30 29 3b 0a 20 20 20 _int(&q, 0);.
3e40: 20 7a 46 75 6c 6c 6e 61 6d 65 20 3d 20 64 62 5f zFullname = db_
3e50: 63 6f 6c 75 6d 6e 5f 74 65 78 74 28 26 71 2c 20 column_text(&q,
3e60: 31 29 3b 0a 20 20 20 20 72 69 64 20 3d 20 64 62 1);. rid = db
3e70: 5f 63 6f 6c 75 6d 6e 5f 69 6e 74 28 26 71 2c 20 _column_int(&q,
3e80: 32 29 3b 0a 0a 20 20 20 20 62 6c 6f 62 5f 7a 65 2);.. blob_ze
3e90: 72 6f 28 26 63 6f 6e 74 65 6e 74 29 3b 0a 20 20 ro(&content);.
3ea0: 20 20 62 6c 6f 62 5f 72 65 61 64 5f 66 72 6f 6d blob_read_from
3eb0: 5f 66 69 6c 65 28 26 63 6f 6e 74 65 6e 74 2c 20 _file(&content,
3ec0: 7a 46 75 6c 6c 6e 61 6d 65 29 3b 0a 20 20 20 20 zFullname);.
3ed0: 6e 72 69 64 20 3d 20 63 6f 6e 74 65 6e 74 5f 70 nrid = content_p
3ee0: 75 74 28 26 63 6f 6e 74 65 6e 74 2c 20 30 2c 20 ut(&content, 0,
3ef0: 30 29 3b 0a 20 20 20 20 69 66 28 20 72 69 64 3e 0);. if( rid>
3f00: 30 20 29 7b 0a 20 20 20 20 20 20 63 6f 6e 74 65 0 ){. conte
3f10: 6e 74 5f 64 65 6c 74 69 66 79 28 72 69 64 2c 20 nt_deltify(rid,
3f20: 6e 72 69 64 2c 20 30 29 3b 0a 20 20 20 20 7d 0a nrid, 0);. }.
3f30: 20 20 20 20 64 62 5f 6d 75 6c 74 69 5f 65 78 65 db_multi_exe
3f40: 63 28 22 55 50 44 41 54 45 20 76 66 69 6c 65 20 c("UPDATE vfile
3f50: 53 45 54 20 6d 72 69 64 3d 25 64 2c 20 72 69 64 SET mrid=%d, rid
3f60: 3d 25 64 20 57 48 45 52 45 20 69 64 3d 25 64 22 =%d WHERE id=%d"
3f70: 2c 20 6e 72 69 64 2c 6e 72 69 64 2c 69 64 29 3b , nrid,nrid,id);
3f80: 0a 20 20 20 20 64 62 5f 6d 75 6c 74 69 5f 65 78 . db_multi_ex
3f90: 65 63 28 22 49 4e 53 45 52 54 20 4f 52 20 49 47 ec("INSERT OR IG
3fa0: 4e 4f 52 45 20 49 4e 54 4f 20 75 6e 73 65 6e 74 NORE INTO unsent
3fb0: 20 56 41 4c 55 45 53 28 25 64 29 22 2c 20 6e 72 VALUES(%d)", nr
3fc0: 69 64 29 3b 0a 20 20 7d 0a 20 20 64 62 5f 66 69 id);. }. db_fi
3fd0: 6e 61 6c 69 7a 65 28 26 71 29 3b 0a 0a 20 20 2f nalize(&q);.. /
3fe0: 2a 20 43 72 65 61 74 65 20 74 68 65 20 6d 61 6e * Create the man
3ff0: 69 66 65 73 74 20 2a 2f 0a 20 20 62 6c 6f 62 5f ifest */. blob_
4000: 7a 65 72 6f 28 26 6d 61 6e 69 66 65 73 74 29 3b zero(&manifest);
4010: 0a 20 20 69 66 28 20 62 6c 6f 62 5f 73 69 7a 65 . if( blob_size
4020: 28 26 63 6f 6d 6d 65 6e 74 29 3d 3d 30 20 29 7b (&comment)==0 ){
4030: 0a 20 20 20 20 62 6c 6f 62 5f 61 70 70 65 6e 64 . blob_append
4040: 28 26 63 6f 6d 6d 65 6e 74 2c 20 22 28 6e 6f 20 (&comment, "(no
4050: 63 6f 6d 6d 65 6e 74 29 22 2c 20 2d 31 29 3b 0a comment)", -1);.
4060: 20 20 7d 0a 20 20 62 6c 6f 62 5f 61 70 70 65 6e }. blob_appen
4070: 64 66 28 26 6d 61 6e 69 66 65 73 74 2c 20 22 43 df(&manifest, "C
4080: 20 25 46 5c 6e 22 2c 20 62 6c 6f 62 5f 73 74 72 %F\n", blob_str
4090: 28 26 63 6f 6d 6d 65 6e 74 29 29 3b 0a 20 20 7a (&comment));. z
40a0: 44 61 74 65 20 3d 20 64 62 5f 74 65 78 74 28 30 Date = db_text(0
40b0: 2c 20 22 53 45 4c 45 43 54 20 64 61 74 65 74 69 , "SELECT dateti
40c0: 6d 65 28 27 6e 6f 77 27 29 22 29 3b 0a 20 20 7a me('now')");. z
40d0: 44 61 74 65 5b 31 30 5d 20 3d 20 27 54 27 3b 0a Date[10] = 'T';.
40e0: 20 20 62 6c 6f 62 5f 61 70 70 65 6e 64 66 28 26 blob_appendf(&
40f0: 6d 61 6e 69 66 65 73 74 2c 20 22 44 20 25 73 5c manifest, "D %s\
4100: 6e 22 2c 20 7a 44 61 74 65 29 3b 0a 20 20 64 62 n", zDate);. db
4110: 5f 70 72 65 70 61 72 65 28 26 71 2c 0a 20 20 20 _prepare(&q,.
4120: 20 22 53 45 4c 45 43 54 20 70 61 74 68 6e 61 6d "SELECT pathnam
4130: 65 2c 20 75 75 69 64 2c 20 6f 72 69 67 6e 61 6d e, uuid, orignam
4140: 65 22 0a 20 20 20 20 22 20 20 46 52 4f 4d 20 76 e". " FROM v
4150: 66 69 6c 65 20 4a 4f 49 4e 20 62 6c 6f 62 20 4f file JOIN blob O
4160: 4e 20 76 66 69 6c 65 2e 6d 72 69 64 3d 62 6c 6f N vfile.mrid=blo
4170: 62 2e 72 69 64 22 0a 20 20 20 20 22 20 57 48 45 b.rid". " WHE
4180: 52 45 20 4e 4f 54 20 64 65 6c 65 74 65 64 20 41 RE NOT deleted A
4190: 4e 44 20 76 66 69 6c 65 2e 76 69 64 3d 25 64 22 ND vfile.vid=%d"
41a0: 0a 20 20 20 20 22 20 4f 52 44 45 52 20 42 59 20 . " ORDER BY
41b0: 31 22 2c 20 76 69 64 29 3b 0a 20 20 62 6c 6f 62 1", vid);. blob
41c0: 5f 7a 65 72 6f 28 26 66 69 6c 65 6e 61 6d 65 29 _zero(&filename)
41d0: 3b 0a 20 20 62 6c 6f 62 5f 61 70 70 65 6e 64 66 ;. blob_appendf
41e0: 28 26 66 69 6c 65 6e 61 6d 65 2c 20 22 25 73 2f (&filename, "%s/
41f0: 22 2c 20 67 2e 7a 4c 6f 63 61 6c 52 6f 6f 74 29 ", g.zLocalRoot)
4200: 3b 0a 20 20 6e 42 61 73 65 6e 61 6d 65 20 3d 20 ;. nBasename =
4210: 62 6c 6f 62 5f 73 69 7a 65 28 26 66 69 6c 65 6e blob_size(&filen
4220: 61 6d 65 29 3b 0a 20 20 77 68 69 6c 65 28 20 64 ame);. while( d
4230: 62 5f 73 74 65 70 28 26 71 29 3d 3d 53 51 4c 49 b_step(&q)==SQLI
4240: 54 45 5f 52 4f 57 20 29 7b 0a 20 20 20 20 63 6f TE_ROW ){. co
4250: 6e 73 74 20 63 68 61 72 20 2a 7a 4e 61 6d 65 20 nst char *zName
4260: 3d 20 64 62 5f 63 6f 6c 75 6d 6e 5f 74 65 78 74 = db_column_text
4270: 28 26 71 2c 20 30 29 3b 0a 20 20 20 20 63 6f 6e (&q, 0);. con
4280: 73 74 20 63 68 61 72 20 2a 7a 55 75 69 64 20 3d st char *zUuid =
4290: 20 64 62 5f 63 6f 6c 75 6d 6e 5f 74 65 78 74 28 db_column_text(
42a0: 26 71 2c 20 31 29 3b 0a 20 20 20 20 63 6f 6e 73 &q, 1);. cons
42b0: 74 20 63 68 61 72 20 2a 7a 4f 72 69 67 20 3d 20 t char *zOrig =
42c0: 64 62 5f 63 6f 6c 75 6d 6e 5f 74 65 78 74 28 26 db_column_text(&
42d0: 71 2c 20 32 29 3b 0a 20 20 20 20 63 6f 6e 73 74 q, 2);. const
42e0: 20 63 68 61 72 20 2a 7a 50 65 72 6d 3b 0a 20 20 char *zPerm;.
42f0: 20 20 62 6c 6f 62 5f 61 70 70 65 6e 64 28 26 66 blob_append(&f
4300: 69 6c 65 6e 61 6d 65 2c 20 7a 4e 61 6d 65 2c 20 ilename, zName,
4310: 2d 31 29 3b 0a 20 20 20 20 69 66 28 20 66 69 6c -1);. if( fil
4320: 65 5f 69 73 65 78 65 28 62 6c 6f 62 5f 73 74 72 e_isexe(blob_str
4330: 28 26 66 69 6c 65 6e 61 6d 65 29 29 20 29 7b 0a (&filename)) ){.
4340: 20 20 20 20 20 20 7a 50 65 72 6d 20 3d 20 22 20 zPerm = "
4350: 78 22 3b 0a 20 20 20 20 7d 65 6c 73 65 7b 0a 20 x";. }else{.
4360: 20 20 20 20 20 7a 50 65 72 6d 20 3d 20 22 22 3b zPerm = "";
4370: 0a 20 20 20 20 7d 0a 20 20 20 20 62 6c 6f 62 5f . }. blob_
4380: 72 65 73 69 7a 65 28 26 66 69 6c 65 6e 61 6d 65 resize(&filename
4390: 2c 20 6e 42 61 73 65 6e 61 6d 65 29 3b 0a 20 20 , nBasename);.
43a0: 20 20 69 66 28 20 7a 4f 72 69 67 3d 3d 30 20 7c if( zOrig==0 |
43b0: 7c 20 73 74 72 63 6d 70 28 7a 4f 72 69 67 2c 7a | strcmp(zOrig,z
43c0: 4e 61 6d 65 29 3d 3d 30 20 29 7b 0a 20 20 20 20 Name)==0 ){.
43d0: 20 20 62 6c 6f 62 5f 61 70 70 65 6e 64 66 28 26 blob_appendf(&
43e0: 6d 61 6e 69 66 65 73 74 2c 20 22 46 20 25 46 20 manifest, "F %F
43f0: 25 73 25 73 5c 6e 22 2c 20 7a 4e 61 6d 65 2c 20 %s%s\n", zName,
4400: 7a 55 75 69 64 2c 20 7a 50 65 72 6d 29 3b 0a 20 zUuid, zPerm);.
4410: 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 }else{.
4420: 69 66 28 20 7a 50 65 72 6d 5b 30 5d 3d 3d 30 20 if( zPerm[0]==0
4430: 29 7b 20 7a 50 65 72 6d 20 3d 20 22 20 77 22 3b ){ zPerm = " w";
4440: 20 7d 0a 20 20 20 20 20 20 62 6c 6f 62 5f 61 70 }. blob_ap
4450: 70 65 6e 64 66 28 26 6d 61 6e 69 66 65 73 74 2c pendf(&manifest,
4460: 20 22 46 20 25 46 20 25 73 25 73 20 25 46 5c 6e "F %F %s%s %F\n
4470: 22 2c 20 7a 4e 61 6d 65 2c 20 7a 55 75 69 64 2c ", zName, zUuid,
4480: 20 7a 50 65 72 6d 2c 20 7a 4f 72 69 67 29 3b 0a zPerm, zOrig);.
4490: 20 20 20 20 7d 0a 20 20 7d 0a 20 20 62 6c 6f 62 }. }. blob
44a0: 5f 72 65 73 65 74 28 26 66 69 6c 65 6e 61 6d 65 _reset(&filename
44b0: 29 3b 0a 20 20 64 62 5f 66 69 6e 61 6c 69 7a 65 );. db_finalize
44c0: 28 26 71 29 3b 0a 20 20 7a 55 75 69 64 20 3d 20 (&q);. zUuid =
44d0: 64 62 5f 74 65 78 74 28 30 2c 20 22 53 45 4c 45 db_text(0, "SELE
44e0: 43 54 20 75 75 69 64 20 46 52 4f 4d 20 62 6c 6f CT uuid FROM blo
44f0: 62 20 57 48 45 52 45 20 72 69 64 3d 25 64 22 2c b WHERE rid=%d",
4500: 20 76 69 64 29 3b 0a 20 20 62 6c 6f 62 5f 61 70 vid);. blob_ap
4510: 70 65 6e 64 66 28 26 6d 61 6e 69 66 65 73 74 2c pendf(&manifest,
4520: 20 22 50 20 25 73 22 2c 20 7a 55 75 69 64 29 3b "P %s", zUuid);
4530: 0a 0a 20 20 64 62 5f 70 72 65 70 61 72 65 28 26 .. db_prepare(&
4540: 71 32 2c 20 22 53 45 4c 45 43 54 20 6d 65 72 67 q2, "SELECT merg
4550: 65 20 46 52 4f 4d 20 76 6d 65 72 67 65 20 57 48 e FROM vmerge WH
4560: 45 52 45 20 69 64 3d 3a 69 64 22 29 3b 0a 20 20 ERE id=:id");.
4570: 64 62 5f 62 69 6e 64 5f 69 6e 74 28 26 71 32 2c db_bind_int(&q2,
4580: 20 22 3a 69 64 22 2c 20 30 29 3b 0a 20 20 77 68 ":id", 0);. wh
4590: 69 6c 65 28 20 64 62 5f 73 74 65 70 28 26 71 32 ile( db_step(&q2
45a0: 29 3d 3d 53 51 4c 49 54 45 5f 52 4f 57 20 29 7b )==SQLITE_ROW ){
45b0: 0a 20 20 20 20 69 6e 74 20 6d 69 64 20 3d 20 64 . int mid = d
45c0: 62 5f 63 6f 6c 75 6d 6e 5f 69 6e 74 28 26 71 32 b_column_int(&q2
45d0: 2c 20 30 29 3b 0a 20 20 20 20 7a 55 75 69 64 20 , 0);. zUuid
45e0: 3d 20 64 62 5f 74 65 78 74 28 30 2c 20 22 53 45 = db_text(0, "SE
45f0: 4c 45 43 54 20 75 75 69 64 20 46 52 4f 4d 20 62 LECT uuid FROM b
4600: 6c 6f 62 20 57 48 45 52 45 20 72 69 64 3d 25 64 lob WHERE rid=%d
4610: 22 2c 20 6d 69 64 29 3b 0a 20 20 20 20 69 66 28 ", mid);. if(
4620: 20 7a 55 75 69 64 20 29 7b 0a 20 20 20 20 20 20 zUuid ){.
4630: 62 6c 6f 62 5f 61 70 70 65 6e 64 66 28 26 6d 61 blob_appendf(&ma
4640: 6e 69 66 65 73 74 2c 20 22 20 25 73 22 2c 20 7a nifest, " %s", z
4650: 55 75 69 64 29 3b 0a 20 20 20 20 20 20 66 72 65 Uuid);. fre
4660: 65 28 7a 55 75 69 64 29 3b 0a 20 20 20 20 7d 0a e(zUuid);. }.
4670: 20 20 7d 0a 20 20 64 62 5f 72 65 73 65 74 28 26 }. db_reset(&
4680: 71 32 29 3b 0a 0a 20 20 62 6c 6f 62 5f 61 70 70 q2);.. blob_app
4690: 65 6e 64 66 28 26 6d 61 6e 69 66 65 73 74 2c 20 endf(&manifest,
46a0: 22 5c 6e 22 29 3b 0a 20 20 62 6c 6f 62 5f 61 70 "\n");. blob_ap
46b0: 70 65 6e 64 66 28 26 6d 61 6e 69 66 65 73 74 2c pendf(&manifest,
46c0: 20 22 52 20 25 62 5c 6e 22 2c 20 26 63 6b 73 75 "R %b\n", &cksu
46d0: 6d 31 29 3b 0a 20 20 69 66 28 20 7a 42 72 61 6e m1);. if( zBran
46e0: 63 68 20 26 26 20 7a 42 72 61 6e 63 68 5b 30 5d ch && zBranch[0]
46f0: 20 29 7b 0a 20 20 20 20 53 74 6d 74 20 71 3b 0a ){. Stmt q;.
4700: 20 20 20 20 69 66 28 20 7a 42 67 43 6f 6c 6f 72 if( zBgColor
4710: 20 26 26 20 7a 42 67 43 6f 6c 6f 72 5b 30 5d 20 && zBgColor[0]
4720: 29 7b 0a 20 20 20 20 20 20 62 6c 6f 62 5f 61 70 ){. blob_ap
4730: 70 65 6e 64 66 28 26 6d 61 6e 69 66 65 73 74 2c pendf(&manifest,
4740: 20 22 54 20 2a 62 67 63 6f 6c 6f 72 20 2a 20 25 "T *bgcolor * %
4750: 46 5c 6e 22 2c 20 7a 42 67 43 6f 6c 6f 72 29 3b F\n", zBgColor);
4760: 0a 20 20 20 20 7d 0a 20 20 20 20 62 6c 6f 62 5f . }. blob_
4770: 61 70 70 65 6e 64 66 28 26 6d 61 6e 69 66 65 73 appendf(&manifes
4780: 74 2c 20 22 54 20 2a 62 72 61 6e 63 68 20 2a 20 t, "T *branch *
4790: 25 46 5c 6e 22 2c 20 7a 42 72 61 6e 63 68 29 3b %F\n", zBranch);
47a0: 0a 20 20 20 20 62 6c 6f 62 5f 61 70 70 65 6e 64 . blob_append
47b0: 66 28 26 6d 61 6e 69 66 65 73 74 2c 20 22 54 20 f(&manifest, "T
47c0: 2a 73 79 6d 2d 25 46 20 2a 5c 6e 22 2c 20 7a 42 *sym-%F *\n", zB
47d0: 72 61 6e 63 68 29 3b 0a 0a 20 20 20 20 2f 2a 20 ranch);.. /*
47e0: 43 61 6e 63 65 6c 20 61 6c 6c 20 6f 74 68 65 72 Cancel all other
47f0: 20 73 79 6d 62 6f 6c 69 63 20 74 61 67 73 20 2a symbolic tags *
4800: 2f 0a 20 20 20 20 64 62 5f 70 72 65 70 61 72 65 /. db_prepare
4810: 28 26 71 2c 0a 20 20 20 20 20 20 20 20 22 53 45 (&q,. "SE
4820: 4c 45 43 54 20 74 61 67 6e 61 6d 65 20 46 52 4f LECT tagname FRO
4830: 4d 20 74 61 67 78 72 65 66 2c 20 74 61 67 22 0a M tagxref, tag".
4840: 20 20 20 20 20 20 20 20 22 20 57 48 45 52 45 20 " WHERE
4850: 74 61 67 78 72 65 66 2e 72 69 64 3d 25 64 20 41 tagxref.rid=%d A
4860: 4e 44 20 74 61 67 78 72 65 66 2e 74 61 67 69 64 ND tagxref.tagid
4870: 3d 74 61 67 2e 74 61 67 69 64 22 0a 20 20 20 20 =tag.tagid".
4880: 20 20 20 20 22 20 20 20 41 4e 44 20 74 61 67 74 " AND tagt
4890: 79 70 65 3e 30 20 41 4e 44 20 74 61 67 6e 61 6d ype>0 AND tagnam
48a0: 65 20 47 4c 4f 42 20 27 73 79 6d 2d 2a 27 22 0a e GLOB 'sym-*'".
48b0: 20 20 20 20 20 20 20 20 22 20 20 20 41 4e 44 20 " AND
48c0: 74 61 67 6e 61 6d 65 21 3d 27 73 79 6d 2d 27 7c tagname!='sym-'|
48d0: 7c 25 51 22 0a 20 20 20 20 20 20 20 20 22 20 4f |%Q". " O
48e0: 52 44 45 52 20 42 59 20 74 61 67 6e 61 6d 65 22 RDER BY tagname"
48f0: 2c 0a 20 20 20 20 20 20 20 20 76 69 64 2c 20 7a ,. vid, z
4900: 42 72 61 6e 63 68 29 3b 0a 20 20 20 20 77 68 69 Branch);. whi
4910: 6c 65 28 20 64 62 5f 73 74 65 70 28 26 71 29 3d le( db_step(&q)=
4920: 3d 53 51 4c 49 54 45 5f 52 4f 57 20 29 7b 0a 20 =SQLITE_ROW ){.
4930: 20 20 20 20 20 63 6f 6e 73 74 20 63 68 61 72 20 const char
4940: 2a 7a 54 61 67 20 3d 20 64 62 5f 63 6f 6c 75 6d *zTag = db_colum
4950: 6e 5f 74 65 78 74 28 26 71 2c 20 30 29 3b 0a 20 n_text(&q, 0);.
4960: 20 20 20 20 20 62 6c 6f 62 5f 61 70 70 65 6e 64 blob_append
4970: 66 28 26 6d 61 6e 69 66 65 73 74 2c 20 22 54 20 f(&manifest, "T
4980: 2d 25 46 20 2a 5c 6e 22 2c 20 7a 54 61 67 29 3b -%F *\n", zTag);
4990: 0a 20 20 20 20 7d 0a 20 20 20 20 64 62 5f 66 69 . }. db_fi
49a0: 6e 61 6c 69 7a 65 28 26 71 29 3b 0a 20 20 7d 20 nalize(&q);. }
49b0: 20 0a 20 20 62 6c 6f 62 5f 61 70 70 65 6e 64 66 . blob_appendf
49c0: 28 26 6d 61 6e 69 66 65 73 74 2c 20 22 55 20 25 (&manifest, "U %
49d0: 46 5c 6e 22 2c 20 67 2e 7a 4c 6f 67 69 6e 29 3b F\n", g.zLogin);
49e0: 0a 20 20 6d 64 35 73 75 6d 5f 62 6c 6f 62 28 26 . md5sum_blob(&
49f0: 6d 61 6e 69 66 65 73 74 2c 20 26 6d 63 6b 73 75 manifest, &mcksu
4a00: 6d 29 3b 0a 20 20 62 6c 6f 62 5f 61 70 70 65 6e m);. blob_appen
4a10: 64 66 28 26 6d 61 6e 69 66 65 73 74 2c 20 22 5a df(&manifest, "Z
4a20: 20 25 62 5c 6e 22 2c 20 26 6d 63 6b 73 75 6d 29 %b\n", &mcksum)
4a30: 3b 0a 20 20 7a 4d 61 6e 69 66 65 73 74 46 69 6c ;. zManifestFil
4a40: 65 20 3d 20 6d 70 72 69 6e 74 66 28 22 25 73 6d e = mprintf("%sm
4a50: 61 6e 69 66 65 73 74 22 2c 20 67 2e 7a 4c 6f 63 anifest", g.zLoc
4a60: 61 6c 52 6f 6f 74 29 3b 0a 20 20 69 66 28 20 21 alRoot);. if( !
4a70: 6e 6f 53 69 67 6e 20 26 26 20 63 6c 65 61 72 73 noSign && clears
4a80: 69 67 6e 28 26 6d 61 6e 69 66 65 73 74 2c 20 26 ign(&manifest, &
4a90: 6d 61 6e 69 66 65 73 74 29 20 29 7b 0a 20 20 20 manifest) ){.
4aa0: 20 42 6c 6f 62 20 61 6e 73 3b 0a 20 20 20 20 62 Blob ans;. b
4ab0: 6c 6f 62 5f 7a 65 72 6f 28 26 61 6e 73 29 3b 0a lob_zero(&ans);.
4ac0: 20 20 20 20 70 72 6f 6d 70 74 5f 75 73 65 72 28 prompt_user(
4ad0: 22 75 6e 61 62 6c 65 20 74 6f 20 73 69 67 6e 20 "unable to sign
4ae0: 6d 61 6e 69 66 65 73 74 2e 20 20 63 6f 6e 74 69 manifest. conti
4af0: 6e 75 65 20 5b 79 2f 4e 5d 3f 20 22 2c 20 26 61 nue [y/N]? ", &a
4b00: 6e 73 29 3b 0a 20 20 20 20 69 66 28 20 62 6c 6f ns);. if( blo
4b10: 62 5f 73 74 72 28 26 61 6e 73 29 5b 30 5d 21 3d b_str(&ans)[0]!=
4b20: 27 79 27 20 29 7b 0a 20 20 20 20 20 20 64 62 5f 'y' ){. db_
4b30: 65 6e 64 5f 74 72 61 6e 73 61 63 74 69 6f 6e 28 end_transaction(
4b40: 31 29 3b 0a 20 20 20 20 20 20 65 78 69 74 28 31 1);. exit(1
4b50: 29 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20 62 );. }. }. b
4b60: 6c 6f 62 5f 77 72 69 74 65 5f 74 6f 5f 66 69 6c lob_write_to_fil
4b70: 65 28 26 6d 61 6e 69 66 65 73 74 2c 20 7a 4d 61 e(&manifest, zMa
4b80: 6e 69 66 65 73 74 46 69 6c 65 29 3b 0a 20 20 62 nifestFile);. b
4b90: 6c 6f 62 5f 72 65 73 65 74 28 26 6d 61 6e 69 66 lob_reset(&manif
4ba0: 65 73 74 29 3b 0a 20 20 62 6c 6f 62 5f 72 65 61 est);. blob_rea
4bb0: 64 5f 66 72 6f 6d 5f 66 69 6c 65 28 26 6d 61 6e d_from_file(&man
4bc0: 69 66 65 73 74 2c 20 7a 4d 61 6e 69 66 65 73 74 ifest, zManifest
4bd0: 46 69 6c 65 29 3b 0a 20 20 66 72 65 65 28 7a 4d File);. free(zM
4be0: 61 6e 69 66 65 73 74 46 69 6c 65 29 3b 0a 20 20 anifestFile);.
4bf0: 6e 76 69 64 20 3d 20 63 6f 6e 74 65 6e 74 5f 70 nvid = content_p
4c00: 75 74 28 26 6d 61 6e 69 66 65 73 74 2c 20 30 2c ut(&manifest, 0,
4c10: 20 30 29 3b 0a 20 20 69 66 28 20 6e 76 69 64 3d 0);. if( nvid=
4c20: 3d 30 20 29 7b 0a 20 20 20 20 66 6f 73 73 69 6c =0 ){. fossil
4c30: 5f 70 61 6e 69 63 28 22 74 72 6f 75 62 6c 65 20 _panic("trouble
4c40: 63 6f 6d 6d 69 74 74 69 6e 67 20 6d 61 6e 69 66 committing manif
4c50: 65 73 74 3a 20 25 73 22 2c 20 67 2e 7a 45 72 72 est: %s", g.zErr
4c60: 4d 73 67 29 3b 0a 20 20 7d 0a 20 20 64 62 5f 6d Msg);. }. db_m
4c70: 75 6c 74 69 5f 65 78 65 63 28 22 49 4e 53 45 52 ulti_exec("INSER
4c80: 54 20 4f 52 20 49 47 4e 4f 52 45 20 49 4e 54 4f T OR IGNORE INTO
4c90: 20 75 6e 73 65 6e 74 20 56 41 4c 55 45 53 28 25 unsent VALUES(%
4ca0: 64 29 22 2c 20 6e 76 69 64 29 3b 0a 20 20 6d 61 d)", nvid);. ma
4cb0: 6e 69 66 65 73 74 5f 63 72 6f 73 73 6c 69 6e 6b nifest_crosslink
4cc0: 28 6e 76 69 64 2c 20 26 6d 61 6e 69 66 65 73 74 (nvid, &manifest
4cd0: 29 3b 0a 20 20 63 6f 6e 74 65 6e 74 5f 64 65 6c );. content_del
4ce0: 74 69 66 79 28 76 69 64 2c 20 6e 76 69 64 2c 20 tify(vid, nvid,
4cf0: 30 29 3b 0a 20 20 7a 55 75 69 64 20 3d 20 64 62 0);. zUuid = db
4d00: 5f 74 65 78 74 28 30 2c 20 22 53 45 4c 45 43 54 _text(0, "SELECT
4d10: 20 75 75 69 64 20 46 52 4f 4d 20 62 6c 6f 62 20 uuid FROM blob
4d20: 57 48 45 52 45 20 72 69 64 3d 25 64 22 2c 20 6e WHERE rid=%d", n
4d30: 76 69 64 29 3b 0a 20 20 70 72 69 6e 74 66 28 22 vid);. printf("
4d40: 4e 65 77 5f 56 65 72 73 69 6f 6e 3a 20 25 73 5c New_Version: %s\
4d50: 6e 22 2c 20 7a 55 75 69 64 29 3b 0a 20 20 7a 4d n", zUuid);. zM
4d60: 61 6e 69 66 65 73 74 46 69 6c 65 20 3d 20 6d 70 anifestFile = mp
4d70: 72 69 6e 74 66 28 22 25 73 6d 61 6e 69 66 65 73 rintf("%smanifes
4d80: 74 2e 75 75 69 64 22 2c 20 67 2e 7a 4c 6f 63 61 t.uuid", g.zLoca
4d90: 6c 52 6f 6f 74 29 3b 0a 20 20 62 6c 6f 62 5f 7a lRoot);. blob_z
4da0: 65 72 6f 28 26 6d 75 75 69 64 29 3b 0a 20 20 62 ero(&muuid);. b
4db0: 6c 6f 62 5f 61 70 70 65 6e 64 66 28 26 6d 75 75 lob_appendf(&muu
4dc0: 69 64 2c 20 22 25 73 5c 6e 22 2c 20 7a 55 75 69 id, "%s\n", zUui
4dd0: 64 29 3b 0a 20 20 62 6c 6f 62 5f 77 72 69 74 65 d);. blob_write
4de0: 5f 74 6f 5f 66 69 6c 65 28 26 6d 75 75 69 64 2c _to_file(&muuid,
4df0: 20 7a 4d 61 6e 69 66 65 73 74 46 69 6c 65 29 3b zManifestFile);
4e00: 0a 20 20 66 72 65 65 28 7a 4d 61 6e 69 66 65 73 . free(zManifes
4e10: 74 46 69 6c 65 29 3b 0a 20 20 62 6c 6f 62 5f 72 tFile);. blob_r
4e20: 65 73 65 74 28 26 6d 75 75 69 64 29 3b 0a 0a 20 eset(&muuid);..
4e30: 20 0a 20 20 2f 2a 20 55 70 64 61 74 65 20 74 68 . /* Update th
4e40: 65 20 76 66 69 6c 65 20 61 6e 64 20 76 6d 65 72 e vfile and vmer
4e50: 67 65 20 74 61 62 6c 65 73 20 2a 2f 0a 20 20 64 ge tables */. d
4e60: 62 5f 6d 75 6c 74 69 5f 65 78 65 63 28 0a 20 20 b_multi_exec(.
4e70: 20 20 22 44 45 4c 45 54 45 20 46 52 4f 4d 20 76 "DELETE FROM v
4e80: 66 69 6c 65 20 57 48 45 52 45 20 28 76 69 64 21 file WHERE (vid!
4e90: 3d 25 64 20 4f 52 20 64 65 6c 65 74 65 64 29 20 =%d OR deleted)
4ea0: 41 4e 44 20 66 69 6c 65 5f 69 73 5f 73 65 6c 65 AND file_is_sele
4eb0: 63 74 65 64 28 69 64 29 3b 22 0a 20 20 20 20 22 cted(id);". "
4ec0: 44 45 4c 45 54 45 20 46 52 4f 4d 20 76 6d 65 72 DELETE FROM vmer
4ed0: 67 65 20 57 48 45 52 45 20 66 69 6c 65 5f 69 73 ge WHERE file_is
4ee0: 5f 73 65 6c 65 63 74 65 64 28 69 64 29 20 4f 52 _selected(id) OR
4ef0: 20 69 64 3d 30 3b 22 0a 20 20 20 20 22 55 50 44 id=0;". "UPD
4f00: 41 54 45 20 76 66 69 6c 65 20 53 45 54 20 76 69 ATE vfile SET vi
4f10: 64 3d 25 64 3b 22 0a 20 20 20 20 22 55 50 44 41 d=%d;". "UPDA
4f20: 54 45 20 76 66 69 6c 65 20 53 45 54 20 72 69 64 TE vfile SET rid
4f30: 3d 6d 72 69 64 2c 20 63 68 6e 67 65 64 3d 30 2c =mrid, chnged=0,
4f40: 20 64 65 6c 65 74 65 64 3d 30 2c 20 6f 72 69 67 deleted=0, orig
4f50: 6e 61 6d 65 3d 4e 55 4c 4c 22 0a 20 20 20 20 22 name=NULL". "
4f60: 20 57 48 45 52 45 20 66 69 6c 65 5f 69 73 5f 73 WHERE file_is_s
4f70: 65 6c 65 63 74 65 64 28 69 64 29 3b 22 0a 20 20 elected(id);".
4f80: 20 20 2c 20 76 69 64 2c 20 6e 76 69 64 0a 20 20 , vid, nvid.
4f90: 29 3b 0a 20 20 64 62 5f 6c 73 65 74 5f 69 6e 74 );. db_lset_int
4fa0: 28 22 63 68 65 63 6b 6f 75 74 22 2c 20 6e 76 69 ("checkout", nvi
4fb0: 64 29 3b 0a 0a 20 20 2f 2a 20 56 65 72 69 66 79 d);.. /* Verify
4fc0: 20 74 68 61 74 20 74 68 65 20 72 65 70 6f 73 69 that the reposi
4fd0: 74 6f 72 79 20 63 68 65 63 6b 73 75 6d 20 6d 61 tory checksum ma
4fe0: 74 63 68 65 73 20 74 68 65 20 65 78 70 65 63 74 tches the expect
4ff0: 65 64 20 63 68 65 63 6b 73 75 6d 0a 20 20 2a 2a ed checksum. **
5000: 20 63 61 6c 63 75 6c 61 74 65 64 20 62 65 66 6f calculated befo
5010: 72 65 20 74 68 65 20 63 68 65 63 6b 69 6e 20 73 re the checkin s
5020: 74 61 72 74 65 64 20 28 61 6e 64 20 73 74 6f 72 tarted (and stor
5030: 65 64 20 61 73 20 74 68 65 20 52 20 72 65 63 6f ed as the R reco
5040: 72 64 0a 20 20 2a 2a 20 6f 66 20 74 68 65 20 6d rd. ** of the m
5050: 61 6e 69 66 65 73 74 20 66 69 6c 65 29 2e 0a 20 anifest file)..
5060: 20 2a 2f 0a 20 20 76 66 69 6c 65 5f 61 67 67 72 */. vfile_aggr
5070: 65 67 61 74 65 5f 63 68 65 63 6b 73 75 6d 5f 72 egate_checksum_r
5080: 65 70 6f 73 69 74 6f 72 79 28 6e 76 69 64 2c 20 epository(nvid,
5090: 26 63 6b 73 75 6d 32 29 3b 0a 20 20 69 66 28 20 &cksum2);. if(
50a0: 62 6c 6f 62 5f 63 6f 6d 70 61 72 65 28 26 63 6b blob_compare(&ck
50b0: 73 75 6d 31 2c 20 26 63 6b 73 75 6d 32 29 20 29 sum1, &cksum2) )
50c0: 7b 0a 20 20 20 20 66 6f 73 73 69 6c 5f 70 61 6e {. fossil_pan
50d0: 69 63 28 22 74 72 65 65 20 63 68 65 63 6b 73 75 ic("tree checksu
50e0: 6d 20 64 6f 65 73 20 6e 6f 74 20 6d 61 74 63 68 m does not match
50f0: 20 72 65 70 6f 73 69 74 6f 72 79 20 61 66 74 65 repository afte
5100: 72 20 63 6f 6d 6d 69 74 22 29 3b 0a 20 20 7d 0a r commit");. }.
5110: 0a 20 20 2f 2a 20 56 65 72 69 66 79 20 74 68 61 . /* Verify tha
5120: 74 20 74 68 65 20 6d 61 6e 69 66 65 73 74 20 63 t the manifest c
5130: 68 65 63 6b 73 75 6d 20 6d 61 74 63 68 65 73 20 hecksum matches
5140: 74 68 65 20 65 78 70 65 63 74 65 64 20 63 68 65 the expected che
5150: 63 6b 73 75 6d 20 2a 2f 0a 20 20 76 66 69 6c 65 cksum */. vfile
5160: 5f 61 67 67 72 65 67 61 74 65 5f 63 68 65 63 6b _aggregate_check
5170: 73 75 6d 5f 6d 61 6e 69 66 65 73 74 28 6e 76 69 sum_manifest(nvi
5180: 64 2c 20 26 63 6b 73 75 6d 32 2c 20 26 63 6b 73 d, &cksum2, &cks
5190: 75 6d 31 62 29 3b 0a 20 20 69 66 28 20 62 6c 6f um1b);. if( blo
51a0: 62 5f 63 6f 6d 70 61 72 65 28 26 63 6b 73 75 6d b_compare(&cksum
51b0: 31 2c 20 26 63 6b 73 75 6d 31 62 29 20 29 7b 0a 1, &cksum1b) ){.
51c0: 20 20 20 20 66 6f 73 73 69 6c 5f 70 61 6e 69 63 fossil_panic
51d0: 28 22 6d 61 6e 69 66 65 73 74 20 63 68 65 63 6b ("manifest check
51e0: 73 75 6d 20 64 6f 65 73 20 6e 6f 74 20 61 67 72 sum does not agr
51f0: 65 65 20 77 69 74 68 20 6d 61 6e 69 66 65 73 74 ee with manifest
5200: 3a 20 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 : ".
5210: 20 20 20 20 20 22 25 62 20 76 65 72 73 75 73 20 "%b versus
5220: 25 62 22 2c 20 26 63 6b 73 75 6d 31 2c 20 26 63 %b", &cksum1, &c
5230: 6b 73 75 6d 31 62 29 3b 0a 20 20 7d 0a 20 20 69 ksum1b);. }. i
5240: 66 28 20 62 6c 6f 62 5f 63 6f 6d 70 61 72 65 28 f( blob_compare(
5250: 26 63 6b 73 75 6d 31 2c 20 26 63 6b 73 75 6d 32 &cksum1, &cksum2
5260: 29 20 29 7b 0a 20 20 20 20 66 6f 73 73 69 6c 5f ) ){. fossil_
5270: 70 61 6e 69 63 28 22 74 72 65 65 20 63 68 65 63 panic("tree chec
5280: 6b 73 75 6d 20 64 6f 65 73 20 6e 6f 74 20 6d 61 ksum does not ma
5290: 74 63 68 20 6d 61 6e 69 66 65 73 74 20 61 66 74 tch manifest aft
52a0: 65 72 20 63 6f 6d 6d 69 74 3a 20 22 0a 20 20 20 er commit: ".
52b0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 25 "%
52c0: 62 20 76 65 72 73 75 73 20 25 62 22 2c 20 26 63 b versus %b", &c
52d0: 6b 73 75 6d 31 2c 20 26 63 6b 73 75 6d 32 29 3b ksum1, &cksum2);
52e0: 0a 20 20 7d 0a 0a 20 20 2f 2a 20 56 65 72 69 66 . }.. /* Verif
52f0: 79 20 74 68 61 74 20 74 68 65 20 63 6f 6d 6d 69 y that the commi
5300: 74 20 64 69 64 20 6e 6f 74 20 6d 6f 64 69 66 79 t did not modify
5310: 20 61 6e 79 20 64 69 73 6b 20 69 6d 61 67 65 73 any disk images
5320: 2e 20 2a 2f 0a 20 20 76 66 69 6c 65 5f 61 67 67 . */. vfile_agg
5330: 72 65 67 61 74 65 5f 63 68 65 63 6b 73 75 6d 5f regate_checksum_
5340: 64 69 73 6b 28 6e 76 69 64 2c 20 26 63 6b 73 75 disk(nvid, &cksu
5350: 6d 32 29 3b 0a 20 20 69 66 28 20 62 6c 6f 62 5f m2);. if( blob_
5360: 63 6f 6d 70 61 72 65 28 26 63 6b 73 75 6d 31 2c compare(&cksum1,
5370: 20 26 63 6b 73 75 6d 32 29 20 29 7b 0a 20 20 20 &cksum2) ){.
5380: 20 66 6f 73 73 69 6c 5f 70 61 6e 69 63 28 22 74 fossil_panic("t
5390: 72 65 65 20 63 68 65 63 6b 73 75 6d 73 20 62 65 ree checksums be
53a0: 66 6f 72 65 20 61 6e 64 20 61 66 74 65 72 20 63 fore and after c
53b0: 6f 6d 6d 69 74 20 64 6f 20 6e 6f 74 20 6d 61 74 ommit do not mat
53c0: 63 68 22 29 3b 0a 20 20 7d 0a 0a 20 20 2f 2a 20 ch");. }.. /*
53d0: 43 6c 65 61 72 20 74 68 65 20 75 6e 64 6f 2f 72 Clear the undo/r
53e0: 65 64 6f 20 73 74 61 63 6b 20 2a 2f 0a 20 20 75 edo stack */. u
53f0: 6e 64 6f 5f 72 65 73 65 74 28 29 3b 0a 0a 20 20 ndo_reset();..
5400: 2f 2a 20 43 6f 6d 6d 69 74 20 2a 2f 0a 20 20 64 /* Commit */. d
5410: 62 5f 65 6e 64 5f 74 72 61 6e 73 61 63 74 69 6f b_end_transactio
5420: 6e 28 30 29 3b 0a 0a 20 20 61 75 74 6f 73 79 6e n(0);.. autosyn
5430: 63 28 41 55 54 4f 53 59 4e 43 5f 50 55 53 48 29 c(AUTOSYNC_PUSH)
5440: 3b 20 20 0a 20 20 69 66 28 20 63 6f 75 6e 74 5f ; . if( count_
5450: 6e 6f 6e 62 72 61 6e 63 68 5f 63 68 69 6c 64 72 nonbranch_childr
5460: 65 6e 28 76 69 64 29 3e 31 20 29 7b 0a 20 20 20 en(vid)>1 ){.
5470: 20 70 72 69 6e 74 66 28 22 2a 2a 2a 2a 20 77 61 printf("**** wa
5480: 72 6e 69 6e 67 3a 20 61 20 66 6f 72 6b 20 68 61 rning: a fork ha
5490: 73 20 6f 63 63 75 72 72 65 64 20 2a 2a 2a 2a 2a s occurred *****
54a0: 5c 6e 22 29 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a \n");. }.}../*.
54b0: 2a 2a 20 43 4f 4d 4d 41 4e 44 3a 20 74 65 73 74 ** COMMAND: test
54c0: 2d 69 6d 70 6f 72 74 2d 6d 61 6e 69 66 65 73 74 -import-manifest
54d0: 0a 2a 2a 0a 2a 2a 20 55 73 61 67 65 3a 20 25 66 .**.** Usage: %f
54e0: 6f 73 73 69 6c 20 74 65 73 74 2d 69 6d 70 6f 72 ossil test-impor
54f0: 74 2d 6d 61 6e 69 66 65 73 74 20 44 41 54 45 20 t-manifest DATE
5500: 43 4f 4d 4d 45 4e 54 20 3f 2d 70 20 50 41 52 45 COMMENT ?-p PARE
5510: 4e 54 5f 52 45 43 4f 52 44 49 44 3f 2e 2e 2e 20 NT_RECORDID?...
5520: 3f 2d 66 20 28 46 49 4c 45 5f 52 45 43 4f 52 44 ?-f (FILE_RECORD
5530: 49 44 20 50 41 54 48 29 3f 2e 2e 2e 0a 2a 2a 0a ID PATH)?....**.
5540: 2a 2a 20 43 72 65 61 74 65 20 61 20 6e 65 77 20 ** Create a new
5550: 76 65 72 73 69 6f 6e 20 63 6f 6e 74 61 69 6e 69 version containi
5560: 6e 67 20 74 68 65 20 73 70 65 63 69 66 69 65 64 ng the specified
5570: 20 66 69 6c 65 0a 2a 2a 20 72 65 76 69 73 69 6f file.** revisio
5580: 6e 73 20 28 69 66 20 61 6e 79 29 2c 20 61 6e 64 ns (if any), and
5590: 20 63 68 69 6c 64 20 6f 66 20 74 68 65 20 67 69 child of the gi
55a0: 76 65 6e 20 50 41 52 45 4e 54 20 76 65 72 73 69 ven PARENT versi
55b0: 6f 6e 2e 0a 2a 2f 0a 76 6f 69 64 20 69 6d 70 6f on..*/.void impo
55c0: 72 74 5f 6d 61 6e 69 66 65 73 74 5f 63 6d 64 28 rt_manifest_cmd(
55d0: 76 6f 69 64 29 7b 0a 20 20 63 6f 6e 73 74 20 63 void){. const c
55e0: 68 61 72 2a 20 7a 44 61 74 65 3b 20 20 20 20 2f har* zDate; /
55f0: 2a 20 61 72 67 75 6d 65 6e 74 20 2d 20 74 69 6d * argument - tim
5600: 65 73 74 61 6d 70 2c 20 61 73 20 73 65 63 6f 6e estamp, as secon
5610: 64 73 20 73 69 6e 63 65 20 65 70 6f 63 68 20 28 ds since epoch (
5620: 69 6e 74 29 20 2a 2f 0a 20 20 63 6f 6e 73 74 20 int) */. const
5630: 63 68 61 72 2a 20 7a 43 6f 6d 6d 65 6e 74 3b 20 char* zComment;
5640: 2f 2a 20 61 72 67 75 6d 65 6e 74 20 2d 20 6d 61 /* argument - ma
5650: 6e 69 66 65 73 74 20 63 6f 6d 6d 65 6e 74 20 2a nifest comment *
5660: 2f 0a 20 20 63 68 61 72 2a 20 7a 44 61 74 65 46 /. char* zDateF
5670: 6d 74 3b 20 20 20 20 20 20 20 2f 2a 20 74 69 6d mt; /* tim
5680: 65 73 74 61 6d 70 20 66 6f 72 6d 61 74 74 65 64 estamp formatted
5690: 20 66 6f 72 20 74 68 65 20 6d 61 6e 69 66 65 73 for the manifes
56a0: 74 20 2a 2f 0a 20 20 69 6e 74 2a 20 7a 50 61 72 t */. int* zPar
56b0: 65 6e 74 73 3b 20 20 20 20 20 20 20 20 2f 2a 20 ents; /*
56c0: 61 72 67 75 6d 65 6e 74 73 20 2d 20 61 72 72 61 arguments - arra
56d0: 79 20 6f 66 20 70 61 72 65 6e 74 20 72 65 66 65 y of parent refe
56e0: 72 65 6e 63 65 73 20 2a 2f 0a 20 20 69 6e 74 20 rences */. int
56f0: 7a 50 61 72 65 6e 74 43 6f 75 6e 74 3b 20 20 20 zParentCount;
5700: 20 20 2f 2a 20 6e 75 6d 62 65 72 20 6f 66 20 66 /* number of f
5710: 6f 75 6e 64 20 70 61 72 65 6e 74 20 72 65 66 65 ound parent refe
5720: 72 65 6e 63 65 73 20 2a 2f 0a 20 20 42 6c 6f 62 rences */. Blob
5730: 20 6d 61 6e 69 66 65 73 74 3b 20 20 20 20 20 20 manifest;
5740: 20 20 2f 2a 20 63 6f 6e 74 61 69 6e 65 72 20 66 /* container f
5750: 6f 72 20 74 68 65 20 6d 61 6e 69 66 65 73 74 20 or the manifest
5760: 74 6f 20 62 65 20 67 65 6e 65 72 61 74 65 64 20 to be generated
5770: 2a 2f 0a 20 20 42 6c 6f 62 20 6d 63 6b 73 75 6d */. Blob mcksum
5780: 3b 20 20 20 20 20 20 20 20 20 20 2f 2a 20 53 65 ; /* Se
5790: 6c 66 2d 63 68 65 63 6b 73 75 6d 20 6f 6e 20 74 lf-checksum on t
57a0: 68 65 20 6d 61 6e 69 66 65 73 74 20 2a 2f 0a 20 he manifest */.
57b0: 20 42 6c 6f 62 20 63 6b 73 75 6d 2c 20 63 6b 73 Blob cksum, cks
57c0: 75 6d 32 3b 20 20 20 2f 2a 20 42 65 66 6f 72 65 um2; /* Before
57d0: 20 61 6e 64 20 61 66 74 65 72 20 63 6f 6d 6d 69 and after commi
57e0: 74 20 63 68 65 63 6b 73 75 6d 73 20 2a 2f 0a 20 t checksums */.
57f0: 20 42 6c 6f 62 20 63 6b 73 75 6d 31 62 3b 20 20 Blob cksum1b;
5800: 20 20 20 20 20 20 20 2f 2a 20 43 68 65 63 6b 73 /* Checks
5810: 75 6d 20 72 65 63 6f 72 64 65 64 20 69 6e 20 74 um recorded in t
5820: 68 65 20 6d 61 6e 69 66 65 73 74 20 2a 2f 0a 20 he manifest */.
5830: 20 63 6f 6e 73 74 20 63 68 61 72 2a 20 70 61 72 const char* par
5840: 65 6e 74 3b 20 20 20 2f 2a 20 6c 6f 6f 70 20 76 ent; /* loop v
5850: 61 72 69 61 62 6c 65 20 77 68 65 6e 20 63 6f 6c ariable when col
5860: 6c 65 63 74 69 6e 67 20 70 61 72 65 6e 74 20 72 lecting parent r
5870: 65 66 65 72 65 6e 63 65 73 20 2a 2f 0a 20 20 69 eferences */. i
5880: 6e 74 20 69 2c 20 6d 69 64 3b 20 20 20 20 20 20 nt i, mid;
5890: 20 20 20 20 20 2f 2a 20 41 6e 6f 74 68 65 72 20 /* Another
58a0: 6c 6f 6f 70 20 69 6e 64 65 78 2c 20 61 6e 64 20 loop index, and
58b0: 69 64 20 6f 66 20 6e 65 77 20 6d 61 6e 69 66 65 id of new manife
58c0: 73 74 20 2a 2f 0a 20 20 53 74 6d 74 20 71 3b 20 st */. Stmt q;
58d0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a /*
58e0: 20 73 71 6c 20 73 74 61 74 65 6d 65 6e 74 20 74 sql statement t
58f0: 6f 20 71 75 65 72 79 20 74 61 62 6c 65 20 6f 66 o query table of
5900: 20 66 69 6c 65 73 20 2a 2f 0a 20 20 63 68 61 72 files */. char
5910: 2a 20 7a 4d 69 64 55 75 69 64 3b 20 20 20 20 20 * zMidUuid;
5920: 20 20 2f 2a 20 55 75 69 64 20 66 6f 72 20 74 68 /* Uuid for th
5930: 65 20 6e 65 77 6c 79 20 67 65 6e 65 72 61 74 65 e newly generate
5940: 64 20 6d 61 6e 69 66 65 73 74 20 2a 2f 0a 0a 0a d manifest */...
5950: 23 64 65 66 69 6e 65 20 55 53 41 47 45 20 28 22 #define USAGE ("
5960: 44 41 54 45 20 43 4f 4d 4d 45 4e 54 20 3f 2d 70 DATE COMMENT ?-p
5970: 7c 2d 70 61 72 65 6e 74 20 50 41 52 45 4e 54 5f |-parent PARENT_
5980: 52 49 44 2e 2e 2e 3f 20 3f 2d 66 7c 2d 66 69 6c RID...? ?-f|-fil
5990: 65 20 28 46 49 4c 45 5f 52 49 44 20 50 41 54 48 e (FILE_RID PATH
59a0: 29 2e 2e 2e 3f 22 29 0a 0a 20 20 2f 2a 0a 20 20 )...?").. /*.
59b0: 2a 2a 20 56 61 6c 69 64 61 74 65 20 61 6e 64 20 ** Validate and
59c0: 70 72 6f 63 65 73 73 20 61 72 67 75 6d 65 6e 74 process argument
59d0: 73 2c 20 63 6f 6c 6c 65 63 74 20 69 6e 66 6f 72 s, collect infor
59e0: 6d 61 74 69 6f 6e 2e 0a 20 20 2a 2f 0a 0a 20 20 mation.. */..
59f0: 64 62 5f 6d 75 73 74 5f 62 65 5f 77 69 74 68 69 db_must_be_withi
5a00: 6e 5f 74 72 65 65 28 29 3b 0a 0a 20 20 2f 2a 20 n_tree();.. /*
5a10: 4d 61 6e 64 61 74 6f 72 79 20 61 72 67 75 6d 65 Mandatory argume
5a20: 6e 74 73 20 2a 2f 0a 20 20 69 66 20 28 67 2e 61 nts */. if (g.a
5a30: 72 67 63 20 3c 20 34 29 20 7b 0a 20 20 20 20 75 rgc < 4) {. u
5a40: 73 61 67 65 20 28 55 53 41 47 45 29 3b 0a 20 20 sage (USAGE);.
5a50: 7d 0a 0a 20 20 7a 44 61 74 65 20 20 20 20 3d 20 }.. zDate =
5a60: 67 2e 61 72 67 76 5b 32 5d 3b 0a 20 20 7a 43 6f g.argv[2];. zCo
5a70: 6d 6d 65 6e 74 20 3d 20 67 2e 61 72 67 76 5b 33 mment = g.argv[3
5a80: 5d 3b 0a 0a 20 20 72 65 6d 6f 76 65 5f 66 72 6f ];.. remove_fro
5a90: 6d 5f 61 72 67 76 20 28 32 2c 32 29 3b 0a 0a 20 m_argv (2,2);..
5aa0: 20 2f 2a 20 50 75 6c 6c 20 74 68 65 20 6f 70 74 /* Pull the opt
5ab0: 69 6f 6e 61 6c 20 70 61 72 65 6e 74 20 61 72 67 ional parent arg
5ac0: 75 6d 65 6e 74 73 0a 20 20 2a 2a 0a 20 20 2a 2a uments. **. **
5ad0: 20 4e 6f 74 65 3a 20 49 6e 20 70 72 69 6e 63 69 Note: In princi
5ae0: 70 6c 65 20 69 74 20 69 73 20 70 6f 73 73 69 62 ple it is possib
5af0: 6c 65 20 74 68 61 74 20 74 68 65 20 6c 6f 6f 70 le that the loop
5b00: 20 62 65 6c 6f 77 20 65 78 74 72 61 63 74 73 0a below extracts.
5b10: 20 20 2a 2a 20 74 68 65 20 77 72 6f 6e 67 20 61 ** the wrong a
5b20: 72 67 75 6d 65 6e 74 73 2c 20 69 66 20 77 65 20 rguments, if we
5b30: 65 76 65 72 20 74 72 79 20 74 6f 20 69 6d 70 6f ever try to impo
5b40: 72 74 20 61 20 66 69 6c 65 20 77 68 6f 73 65 20 rt a file whose
5b50: 70 61 74 68 0a 20 20 2a 2a 20 73 74 61 72 74 73 path. ** starts
5b60: 20 77 69 74 68 20 2d 70 2f 2d 70 61 72 65 6e 74 with -p/-parent
5b70: 2e 20 49 6e 20 74 68 61 74 20 63 61 73 65 20 68 . In that case h
5b80: 6f 77 65 76 65 72 20 74 68 65 20 72 65 6d 6f 76 owever the remov
5b90: 61 6c 20 6f 66 20 74 77 6f 0a 20 20 2a 2a 20 61 al of two. ** a
5ba0: 72 67 75 6d 65 6e 74 73 20 77 69 6c 6c 20 6c 65 rguments will le
5bb0: 61 76 65 20 74 68 65 20 66 69 6c 65 20 62 65 72 ave the file ber
5bc0: 65 66 74 20 6f 66 20 61 6e 20 61 72 67 75 6d 65 eft of an argume
5bd0: 6e 74 20 61 6e 64 20 74 68 65 0a 20 20 2a 2a 20 nt and the. **
5be0: 72 65 63 68 65 63 6b 20 6f 66 20 74 68 65 20 6e recheck of the n
5bf0: 75 6d 62 65 72 20 6f 66 20 61 72 67 75 6d 65 6e umber of argumen
5c00: 74 73 20 62 65 6c 6f 77 20 73 68 6f 75 6c 64 20 ts below should
5c10: 63 61 74 63 68 20 74 68 61 74 2e 0a 20 20 2a 2a catch that.. **
5c20: 0a 20 20 2a 2a 20 46 6f 72 20 61 20 74 65 73 74 . ** For a test
5c30: 20 63 6f 6d 6d 61 6e 64 20 74 68 69 73 20 69 73 command this is
5c40: 20 61 63 63 65 70 74 61 62 6c 65 2c 20 69 74 20 acceptable, it
5c50: 77 6f 6e 27 74 20 68 61 76 65 20 6c 6f 74 73 20 won't have lots
5c60: 6f 66 0a 20 20 2a 2a 20 73 61 66 65 74 79 20 6e of. ** safety n
5c70: 65 74 73 2e 0a 20 20 2a 2f 0a 0a 20 20 7a 50 61 ets.. */.. zPa
5c80: 72 65 6e 74 43 6f 75 6e 74 20 3d 20 30 3b 0a 20 rentCount = 0;.
5c90: 20 7a 50 61 72 65 6e 74 73 20 3d 20 28 69 6e 74 zParents = (int
5ca0: 2a 29 6d 61 6c 6c 6f 63 28 73 69 7a 65 6f 66 28 *)malloc(sizeof(
5cb0: 69 6e 74 29 2a 28 31 2b 67 2e 61 72 67 63 29 29 int)*(1+g.argc))
5cc0: 3b 0a 20 20 2f 2a 20 31 2b 2c 20 74 6f 20 62 65 ;. /* 1+, to be
5cd0: 20 6f 6b 20 77 69 74 68 20 74 68 65 20 64 65 66 ok with the def
5ce0: 61 75 6c 74 20 65 76 65 6e 20 69 66 20 6e 6f 20 ault even if no
5cf0: 61 72 67 75 6d 65 6e 74 73 20 61 72 6f 75 6e 64 arguments around
5d00: 20 2a 2f 0a 0a 20 20 77 68 69 6c 65 20 28 28 70 */.. while ((p
5d10: 61 72 65 6e 74 20 3d 20 66 69 6e 64 5f 6f 70 74 arent = find_opt
5d20: 69 6f 6e 28 22 70 61 72 65 6e 74 22 2c 22 70 22 ion("parent","p"
5d30: 2c 31 29 29 20 21 3d 20 4e 55 4c 4c 29 20 7b 0a ,1)) != NULL) {.
5d40: 20 20 20 20 2f 2a 20 43 68 65 63 6b 20 61 6e 64 /* Check and
5d50: 20 73 74 6f 72 65 20 2e 2e 2e 20 2a 2f 0a 20 20 store ... */.
5d60: 20 20 7a 50 61 72 65 6e 74 73 20 5b 7a 50 61 72 zParents [zPar
5d70: 65 6e 74 43 6f 75 6e 74 5d 20 3d 20 6e 61 6d 65 entCount] = name
5d80: 5f 74 6f 5f 72 69 64 20 28 70 61 72 65 6e 74 29 _to_rid (parent)
5d90: 3b 0a 20 20 20 20 7a 50 61 72 65 6e 74 43 6f 75 ;. zParentCou
5da0: 6e 74 20 2b 2b 3b 0a 20 20 7d 0a 0a 20 20 2f 2a nt ++;. }.. /*
5db0: 0a 20 20 2a 2a 20 46 61 6c 6c 20 62 61 63 6b 20 . ** Fall back
5dc0: 74 6f 20 74 68 65 20 72 6f 6f 74 20 6d 61 6e 69 to the root mani
5dd0: 66 65 73 74 20 61 73 20 70 61 72 65 6e 74 20 69 fest as parent i
5de0: 66 20 6e 6f 6e 65 20 77 65 72 65 20 73 70 65 63 f none were spec
5df0: 69 66 69 65 64 0a 20 20 2a 2a 20 65 78 70 6c 69 ified. ** expli
5e00: 63 69 74 6c 79 2e 0a 20 20 2a 2f 0a 0a 20 20 69 citly.. */.. i
5e10: 66 20 28 21 7a 50 61 72 65 6e 74 43 6f 75 6e 74 f (!zParentCount
5e20: 29 20 7b 0a 20 20 20 20 7a 50 61 72 65 6e 74 73 ) {. zParents
5e30: 20 5b 7a 50 61 72 65 6e 74 43 6f 75 6e 74 5d 20 [zParentCount]
5e40: 3d 20 31 3b 20 2f 2a 20 48 41 43 4b 3a 20 72 69 = 1; /* HACK: ri
5e50: 64 20 31 20 69 73 20 74 68 65 20 62 61 73 65 6c d 1 is the basel
5e60: 69 6e 65 20 6d 61 6e 69 66 65 73 74 0a 09 09 09 ine manifest....
5e70: 09 20 2a 2a 20 77 68 69 63 68 20 77 61 73 20 65 . ** which was e
5e80: 6e 74 65 72 65 64 20 77 68 65 6e 20 74 68 65 20 ntered when the
5e90: 72 65 70 6f 73 69 74 6f 72 79 0a 09 09 09 09 20 repository.....
5ea0: 2a 2a 20 77 61 73 20 63 72 65 61 74 65 64 20 76 ** was created v
5eb0: 69 61 20 27 6e 65 77 27 2e 20 49 74 20 61 6c 77 ia 'new'. It alw
5ec0: 61 79 73 20 68 61 73 0a 09 09 09 09 20 2a 2a 20 ays has..... **
5ed0: 72 69 64 20 31 2e 0a 09 09 09 09 20 2a 2f 0a 20 rid 1...... */.
5ee0: 20 20 20 7a 50 61 72 65 6e 74 43 6f 75 6e 74 20 zParentCount
5ef0: 2b 2b 3b 0a 20 20 7d 0a 0a 20 20 2f 2a 20 50 75 ++;. }.. /* Pu
5f00: 6c 6c 20 74 68 65 20 66 69 6c 65 20 61 72 67 75 ll the file argu
5f10: 6d 65 6e 74 73 2c 20 61 74 20 6c 65 61 73 74 20 ments, at least
5f20: 6f 6e 65 20 68 61 73 20 74 6f 20 62 65 20 70 72 one has to be pr
5f30: 65 73 65 6e 74 2e 20 54 68 65 79 20 61 72 65 0a esent. They are.
5f40: 20 20 2a 2a 20 74 68 65 20 6f 6e 6c 79 20 74 68 ** the only th
5f50: 69 6e 67 73 20 77 65 20 63 61 6e 20 68 61 76 65 ings we can have
5f60: 20 68 65 72 65 2c 20 6e 6f 77 2c 20 61 6e 64 20 here, now, and
5f70: 74 68 65 79 20 61 72 65 20 74 72 69 70 6c 65 73 they are triples
5f80: 20 6f 66 0a 20 20 2a 2a 20 27 2d 66 20 46 49 44 of. ** '-f FID
5f90: 20 50 41 54 48 27 2c 20 73 6f 20 75 73 65 20 6f PATH', so use o
5fa0: 66 20 66 69 6e 64 5f 6f 70 74 69 6f 6e 20 69 73 f find_option is
5fb0: 20 6f 75 74 2c 20 61 6e 64 20 77 65 20 63 61 6e out, and we can
5fc0: 20 63 68 65 63 6b 20 74 68 65 0a 20 20 2a 2a 20 check the. **
5fd0: 6e 75 6d 62 65 72 20 6f 66 20 61 72 67 75 6d 65 number of argume
5fe0: 6e 74 73 2e 0a 20 20 2a 2a 0a 20 20 2a 2a 20 4e nts.. **. ** N
5ff0: 6f 74 65 3a 20 57 65 20 73 74 6f 72 65 20 74 68 ote: We store th
6000: 65 20 64 61 74 61 20 69 6e 20 61 20 74 65 6d 70 e data in a temp
6010: 2e 20 74 61 62 6c 65 2c 20 73 6f 20 74 68 61 74 . table, so that
6020: 20 77 65 20 6c 61 74 65 72 20 63 61 6e 0a 20 20 we later can.
6030: 2a 2a 20 20 20 20 20 20 20 70 75 6c 6c 20 69 74 ** pull it
6040: 20 73 6f 72 74 65 64 2c 20 61 6e 64 20 61 6c 73 sorted, and als
6050: 6f 20 65 61 73 69 6c 79 20 67 65 74 20 74 68 65 o easily get the
6060: 20 61 73 73 6f 63 69 61 74 65 64 20 68 61 73 68 associated hash
6070: 0a 20 20 2a 2a 20 20 20 20 20 20 20 69 64 65 6e . ** iden
6080: 74 69 66 69 65 72 73 2e 0a 20 20 2a 2a 0a 20 20 tifiers.. **.
6090: 2a 2a 20 4e 6f 74 65 20 32 3a 20 57 65 20 65 78 ** Note 2: We ex
60a0: 70 65 63 74 20 61 74 20 6c 65 61 73 74 20 6f 6e pect at least on
60b0: 65 20 66 69 6c 65 2c 20 6f 74 68 65 72 77 69 73 e file, otherwis
60c0: 65 20 74 68 65 20 6d 61 6e 69 66 65 73 74 20 77 e the manifest w
60d0: 6f 6e 27 74 0a 20 20 2a 2a 20 62 65 20 72 65 63 on't. ** be rec
60e0: 6f 67 6e 69 7a 65 64 20 61 73 20 61 20 62 61 73 ognized as a bas
60f0: 65 6c 69 6e 65 20 62 79 20 74 68 65 20 6d 61 6e eline by the man
6100: 69 66 65 73 74 20 70 61 72 73 65 72 2e 0a 20 20 ifest parser..
6110: 2a 2f 0a 0a 20 20 69 66 20 28 28 28 67 2e 61 72 */.. if (((g.ar
6120: 67 63 2d 32 29 20 25 20 33 20 21 3d 20 30 29 20 gc-2) % 3 != 0)
6130: 7c 7c 20 28 67 2e 61 72 67 63 20 3c 20 35 29 29 || (g.argc < 5))
6140: 20 7b 0a 20 20 20 20 75 73 61 67 65 20 28 55 53 {. usage (US
6150: 41 47 45 29 3b 0a 20 20 7d 0a 0a 20 20 64 62 5f AGE);. }.. db_
6160: 62 65 67 69 6e 5f 74 72 61 6e 73 61 63 74 69 6f begin_transactio
6170: 6e 28 29 3b 0a 20 20 64 62 5f 6d 75 6c 74 69 5f n();. db_multi_
6180: 65 78 65 63 20 28 22 43 52 45 41 54 45 20 54 45 exec ("CREATE TE
6190: 4d 50 20 54 41 42 4c 45 20 5f 5f 69 6d 20 28 22 MP TABLE __im ("
61a0: 0a 09 09 20 22 72 69 64 20 20 20 20 20 20 49 4e ... "rid IN
61b0: 54 45 47 45 52 20 4e 4f 54 20 4e 55 4c 4c 2c 22 TEGER NOT NULL,"
61c0: 0a 09 09 20 22 70 61 74 68 6e 61 6d 65 20 54 45 ... "pathname TE
61d0: 58 54 20 20 20 20 4e 4f 54 20 4e 55 4c 4c 29 22 XT NOT NULL)"
61e0: 20 29 3b 0a 0a 20 20 77 68 69 6c 65 20 28 67 2e );.. while (g.
61f0: 61 72 67 63 20 3e 20 32 29 20 7b 0a 20 20 20 20 argc > 2) {.
6200: 2f 2a 20 43 68 65 63 6b 20 61 6e 64 20 73 74 6f /* Check and sto
6210: 72 65 20 2e 2e 2e 20 2a 2f 0a 20 20 20 20 69 66 re ... */. if
6220: 20 28 73 74 72 63 6d 70 28 22 2d 66 22 2c 20 20 (strcmp("-f",
6230: 20 67 2e 61 72 67 76 5b 32 5d 29 20 26 26 0a 09 g.argv[2]) &&..
6240: 73 74 72 63 6d 70 28 22 2d 66 69 6c 65 22 2c 67 strcmp("-file",g
6250: 2e 61 72 67 76 5b 32 5d 29 29 20 7b 0a 20 20 20 .argv[2])) {.
6260: 20 20 20 75 73 61 67 65 20 28 55 53 41 47 45 29 usage (USAGE)
6270: 3b 0a 20 20 20 20 7d 0a 0a 20 20 20 20 2f 2a 20 ;. }.. /*
6280: 44 41 4e 47 45 52 20 54 68 65 20 25 73 20 66 6f DANGER The %s fo
6290: 72 20 74 68 65 20 70 61 74 68 20 6d 69 67 68 74 r the path might
62a0: 20 6c 65 61 64 20 69 74 73 65 6c 66 20 74 6f 20 lead itself to
62b0: 61 6e 20 69 6e 6a 65 63 74 69 6f 6e 0a 20 20 20 an injection.
62c0: 20 2a 2a 20 61 74 74 61 63 6b 2e 20 46 6f 72 20 ** attack. For
62d0: 6e 6f 77 20 28 69 2e 65 2e 20 74 65 73 74 69 6e now (i.e. testin
62e0: 67 29 20 74 68 69 73 20 69 73 20 6f 6b 2c 20 62 g) this is ok, b
62f0: 75 74 20 64 6f 20 73 6f 6d 65 74 68 69 6e 67 0a ut do something.
6300: 20 20 20 20 2a 2a 20 62 65 74 74 65 72 20 69 6e ** better in
6310: 20 74 68 65 20 66 75 74 75 72 65 2e 0a 20 20 20 the future..
6320: 20 2a 2f 0a 0a 20 20 20 20 64 62 5f 6d 75 6c 74 */.. db_mult
6330: 69 5f 65 78 65 63 28 22 49 4e 53 45 52 54 20 49 i_exec("INSERT I
6340: 4e 54 4f 20 5f 5f 69 6d 20 56 41 4c 55 45 53 28 NTO __im VALUES(
6350: 25 64 2c 27 25 73 27 29 22 2c 0a 09 09 20 20 6e %d,'%s')",... n
6360: 61 6d 65 5f 74 6f 5f 72 69 64 20 28 67 2e 61 72 ame_to_rid (g.ar
6370: 67 76 5b 33 5d 29 2c 20 67 2e 61 72 67 76 5b 34 gv[3]), g.argv[4
6380: 5d 20 29 3b 0a 20 20 20 20 72 65 6d 6f 76 65 5f ] );. remove_
6390: 66 72 6f 6d 5f 61 72 67 76 20 28 32 2c 33 29 3b from_argv (2,3);
63a0: 0a 20 20 7d 0a 0a 20 20 76 65 72 69 66 79 5f 61 . }.. verify_a
63b0: 6c 6c 5f 6f 70 74 69 6f 6e 73 28 29 3b 0a 0a 20 ll_options();..
63c0: 20 2f 2a 0a 20 20 2a 2a 20 44 65 74 65 72 6d 69 /*. ** Determi
63d0: 6e 65 20 74 68 65 20 75 73 65 72 20 74 68 65 20 ne the user the
63e0: 6d 61 6e 69 66 65 73 74 20 77 69 6c 6c 20 62 65 manifest will be
63f0: 6c 6f 6e 67 20 74 6f 2c 20 61 6e 64 20 63 68 65 long to, and che
6400: 63 6b 20 74 68 61 74 0a 20 20 2a 2a 20 74 68 69 ck that. ** thi
6410: 73 20 75 73 65 72 20 65 78 69 73 74 73 2e 0a 20 s user exists..
6420: 20 2a 2f 0a 0a 20 20 75 73 65 72 5f 73 65 6c 65 */.. user_sele
6430: 63 74 28 29 3b 0a 20 20 69 66 28 20 21 64 62 5f ct();. if( !db_
6440: 65 78 69 73 74 73 28 22 53 45 4c 45 43 54 20 31 exists("SELECT 1
6450: 20 46 52 4f 4d 20 75 73 65 72 20 57 48 45 52 45 FROM user WHERE
6460: 20 6c 6f 67 69 6e 3d 25 51 22 2c 20 67 2e 7a 4c login=%Q", g.zL
6470: 6f 67 69 6e 29 20 29 7b 0a 20 20 20 20 66 6f 73 ogin) ){. fos
6480: 73 69 6c 5f 66 61 74 61 6c 28 22 6e 6f 20 73 75 sil_fatal("no su
6490: 63 68 20 75 73 65 72 3a 20 25 73 22 2c 20 67 2e ch user: %s", g.
64a0: 7a 4c 6f 67 69 6e 29 3b 0a 20 20 7d 0a 0a 20 20 zLogin);. }..
64b0: 2f 2a 0a 20 20 2a 2a 20 4e 6f 77 20 67 65 6e 65 /*. ** Now gene
64c0: 72 61 74 65 20 74 68 65 20 6d 61 6e 69 66 65 73 rate the manifes
64d0: 74 20 69 6e 20 6d 65 6d 6f 72 79 2e 0a 20 20 2a t in memory.. *
64e0: 2a 0a 20 20 2a 2a 20 53 74 61 72 74 20 77 69 74 *. ** Start wit
64f0: 68 20 63 6f 6d 6d 65 6e 74 20 61 6e 64 20 64 61 h comment and da
6500: 74 65 2e 20 54 68 65 20 6c 61 74 74 65 72 20 69 te. The latter i
6510: 73 20 63 6f 6e 76 65 72 74 65 64 20 74 6f 20 74 s converted to t
6520: 68 65 0a 20 20 2a 2a 20 70 72 6f 70 65 72 20 66 he. ** proper f
6530: 6f 72 6d 61 74 20 62 65 66 6f 72 65 20 69 6e 73 ormat before ins
6540: 65 72 74 69 6f 6e 2e 0a 20 20 2a 2f 0a 0a 20 20 ertion.. */..
6550: 62 6c 6f 62 5f 7a 65 72 6f 28 26 6d 61 6e 69 66 blob_zero(&manif
6560: 65 73 74 29 3b 0a 0a 20 20 69 66 20 28 21 73 74 est);.. if (!st
6570: 72 6c 65 6e 28 7a 43 6f 6d 6d 65 6e 74 29 29 20 rlen(zComment))
6580: 7b 0a 20 20 20 20 62 6c 6f 62 5f 61 70 70 65 6e {. blob_appen
6590: 64 66 28 26 6d 61 6e 69 66 65 73 74 2c 20 22 43 df(&manifest, "C
65a0: 20 25 46 5c 6e 22 2c 20 22 28 6e 6f 20 63 6f 6d %F\n", "(no com
65b0: 6d 65 6e 74 29 22 29 3b 0a 20 20 7d 20 65 6c 73 ment)");. } els
65c0: 65 20 7b 0a 20 20 20 20 62 6c 6f 62 5f 61 70 70 e {. blob_app
65d0: 65 6e 64 66 28 26 6d 61 6e 69 66 65 73 74 2c 20 endf(&manifest,
65e0: 22 43 20 25 46 5c 6e 22 2c 20 7a 43 6f 6d 6d 65 "C %F\n", zComme
65f0: 6e 74 29 3b 0a 20 20 7d 0a 0a 20 20 7a 44 61 74 nt);. }.. zDat
6600: 65 46 6d 74 20 3d 20 64 62 5f 74 65 78 74 28 30 eFmt = db_text(0
6610: 2c 20 22 53 45 4c 45 43 54 20 64 61 74 65 74 69 , "SELECT dateti
6620: 6d 65 28 25 51 2c 27 75 6e 69 78 65 70 6f 63 68 me(%Q,'unixepoch
6630: 27 29 22 2c 7a 44 61 74 65 29 3b 0a 20 20 7a 44 ')",zDate);. zD
6640: 61 74 65 46 6d 74 5b 31 30 5d 20 3d 20 27 54 27 ateFmt[10] = 'T'
6650: 3b 0a 20 20 62 6c 6f 62 5f 61 70 70 65 6e 64 66 ;. blob_appendf
6660: 28 26 6d 61 6e 69 66 65 73 74 2c 20 22 44 20 25 (&manifest, "D %
6670: 73 5c 6e 22 2c 20 7a 44 61 74 65 46 6d 74 29 3b s\n", zDateFmt);
6680: 0a 20 20 66 72 65 65 28 7a 44 61 74 65 46 6d 74 . free(zDateFmt
6690: 29 3b 0a 0a 20 20 2f 2a 0a 20 20 2a 2a 20 46 6f );.. /*. ** Fo
66a0: 6c 6c 6f 77 20 77 69 74 68 20 61 6c 6c 20 74 68 llow with all th
66b0: 65 20 63 6f 6c 6c 65 63 74 65 64 20 66 69 6c 65 e collected file
66c0: 73 2c 20 70 72 6f 70 65 72 6c 79 20 73 6f 72 74 s, properly sort
66d0: 65 64 2e 20 48 65 72 65 20 77 65 72 65 0a 20 20 ed. Here were.
66e0: 2a 2a 20 61 6c 73 6f 20 63 6f 6d 70 75 74 65 20 ** also compute
66f0: 74 68 65 20 63 68 65 63 6b 73 75 6d 20 6f 76 65 the checksum ove
6700: 72 20 74 68 65 20 66 69 6c 65 73 20 28 70 61 74 r the files (pat
6710: 68 73 2c 20 73 69 7a 65 73 2c 0a 20 20 2a 2a 20 hs, sizes,. **
6720: 63 6f 6e 74 65 6e 74 73 29 2c 20 73 69 6d 69 6c contents), simil
6730: 61 72 20 74 6f 20 77 68 61 74 20 27 76 66 69 6c ar to what 'vfil
6740: 65 5f 61 67 67 72 65 67 61 74 65 5f 63 68 65 63 e_aggregate_chec
6750: 6b 73 75 6d 5f 72 65 70 6f 73 69 74 6f 72 79 27 ksum_repository'
6760: 0a 20 20 2a 2a 20 64 6f 65 73 2e 0a 20 20 2a 2f . ** does.. */
6770: 0a 0a 20 20 6d 64 35 73 75 6d 5f 69 6e 69 74 28 .. md5sum_init(
6780: 29 3b 0a 20 20 64 62 5f 70 72 65 70 61 72 65 28 );. db_prepare(
6790: 26 71 2c 0a 09 20 20 20 20 20 22 53 45 4c 45 43 &q,.. "SELEC
67a0: 54 20 70 61 74 68 6e 61 6d 65 2c 20 75 75 69 64 T pathname, uuid
67b0: 2c 20 5f 5f 69 6d 2e 72 69 64 22 0a 09 20 20 20 , __im.rid"..
67c0: 20 20 22 20 46 52 4f 4d 20 5f 5f 69 6d 20 4a 4f " FROM __im JO
67d0: 49 4e 20 62 6c 6f 62 20 4f 4e 20 5f 5f 69 6d 2e IN blob ON __im.
67e0: 72 69 64 3d 62 6c 6f 62 2e 72 69 64 22 0a 09 20 rid=blob.rid"..
67f0: 20 20 20 20 22 20 4f 52 44 45 52 20 42 59 20 31 " ORDER BY 1
6800: 22 29 3b 0a 0a 20 20 77 68 69 6c 65 28 20 64 62 ");.. while( db
6810: 5f 73 74 65 70 28 26 71 29 3d 3d 53 51 4c 49 54 _step(&q)==SQLIT
6820: 45 5f 52 4f 57 20 29 7b 0a 20 20 20 20 63 68 61 E_ROW ){. cha
6830: 72 20 7a 42 75 66 5b 31 30 30 5d 3b 0a 20 20 20 r zBuf[100];.
6840: 20 42 6c 6f 62 20 66 69 6c 65 3b 0a 20 20 20 20 Blob file;.
6850: 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 4e 61 6d const char *zNam
6860: 65 20 3d 20 64 62 5f 63 6f 6c 75 6d 6e 5f 74 65 e = db_column_te
6870: 78 74 28 26 71 2c 20 30 29 3b 0a 20 20 20 20 63 xt(&q, 0);. c
6880: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 55 75 69 64 onst char *zUuid
6890: 20 3d 20 64 62 5f 63 6f 6c 75 6d 6e 5f 74 65 78 = db_column_tex
68a0: 74 28 26 71 2c 20 31 29 3b 0a 20 20 20 20 69 6e t(&q, 1);. in
68b0: 74 20 20 20 20 20 20 20 20 20 7a 52 69 64 20 20 t zRid
68c0: 3d 20 64 62 5f 63 6f 6c 75 6d 6e 5f 69 6e 74 20 = db_column_int
68d0: 28 26 71 2c 20 32 29 3b 0a 0a 20 20 20 20 2f 2a (&q, 2);.. /*
68e0: 20 45 78 74 65 6e 64 20 74 68 65 20 6d 61 6e 69 Extend the mani
68f0: 66 65 73 74 20 2a 2f 0a 20 20 20 20 62 6c 6f 62 fest */. blob
6900: 5f 61 70 70 65 6e 64 66 28 26 6d 61 6e 69 66 65 _appendf(&manife
6910: 73 74 2c 20 22 46 20 25 46 20 25 73 5c 6e 22 2c st, "F %F %s\n",
6920: 20 7a 4e 61 6d 65 2c 20 7a 55 75 69 64 29 3b 0a zName, zUuid);.
6930: 0a 20 20 20 20 2f 2a 20 55 70 64 61 74 65 20 74 . /* Update t
6940: 68 65 20 63 68 65 63 6b 73 75 6d 20 2a 2f 0a 20 he checksum */.
6950: 20 20 20 6d 64 35 73 75 6d 5f 73 74 65 70 5f 74 md5sum_step_t
6960: 65 78 74 28 7a 4e 61 6d 65 2c 20 2d 31 29 3b 0a ext(zName, -1);.
6970: 20 20 20 20 62 6c 6f 62 5f 7a 65 72 6f 28 26 66 blob_zero(&f
6980: 69 6c 65 29 3b 0a 20 20 20 20 63 6f 6e 74 65 6e ile);. conten
6990: 74 5f 67 65 74 28 7a 52 69 64 2c 20 26 66 69 6c t_get(zRid, &fil
69a0: 65 29 3b 0a 20 20 20 20 73 70 72 69 6e 74 66 28 e);. sprintf(
69b0: 7a 42 75 66 2c 20 22 20 25 64 5c 6e 22 2c 20 62 zBuf, " %d\n", b
69c0: 6c 6f 62 5f 73 69 7a 65 28 26 66 69 6c 65 29 29 lob_size(&file))
69d0: 3b 0a 20 20 20 20 6d 64 35 73 75 6d 5f 73 74 65 ;. md5sum_ste
69e0: 70 5f 74 65 78 74 28 7a 42 75 66 2c 20 2d 31 29 p_text(zBuf, -1)
69f0: 3b 0a 20 20 20 20 6d 64 35 73 75 6d 5f 73 74 65 ;. md5sum_ste
6a00: 70 5f 62 6c 6f 62 28 26 66 69 6c 65 29 3b 0a 20 p_blob(&file);.
6a10: 20 20 20 62 6c 6f 62 5f 72 65 73 65 74 28 26 66 blob_reset(&f
6a20: 69 6c 65 29 3b 0a 20 20 7d 0a 20 20 64 62 5f 66 ile);. }. db_f
6a30: 69 6e 61 6c 69 7a 65 28 26 71 29 3b 0a 20 20 6d inalize(&q);. m
6a40: 64 35 73 75 6d 5f 66 69 6e 69 73 68 20 28 26 63 d5sum_finish (&c
6a50: 6b 73 75 6d 29 3b 0a 0a 20 20 2f 2a 0a 20 20 2a ksum);.. /*. *
6a60: 2a 20 46 6f 6c 6c 6f 77 20 77 69 74 68 20 61 6c * Follow with al
6a70: 6c 20 74 68 65 20 73 70 65 63 69 66 69 65 64 20 l the specified
6a80: 70 61 72 65 6e 74 73 2e 20 57 65 20 6b 6e 6f 77 parents. We know
6a90: 20 74 68 61 74 20 74 68 65 72 65 20 69 73 20 61 that there is a
6aa0: 74 0a 20 20 2a 2a 20 6c 65 61 73 74 20 6f 6e 65 t. ** least one
6ab0: 2e 0a 20 20 2a 2f 0a 0a 20 20 62 6c 6f 62 5f 61 .. */.. blob_a
6ac0: 70 70 65 6e 64 66 28 26 6d 61 6e 69 66 65 73 74 ppendf(&manifest
6ad0: 2c 20 22 50 22 29 3b 0a 20 20 66 6f 72 20 28 69 , "P");. for (i
6ae0: 3d 30 3b 69 3c 7a 50 61 72 65 6e 74 43 6f 75 6e =0;i<zParentCoun
6af0: 74 3b 69 2b 2b 29 20 7b 0a 20 20 20 20 63 68 61 t;i++) {. cha
6b00: 72 2a 20 7a 55 75 69 64 20 3d 20 64 62 5f 74 65 r* zUuid = db_te
6b10: 78 74 28 30 2c 20 22 53 45 4c 45 43 54 20 75 75 xt(0, "SELECT uu
6b20: 69 64 20 46 52 4f 4d 20 62 6c 6f 62 20 57 48 45 id FROM blob WHE
6b30: 52 45 20 72 69 64 3d 25 64 22 2c 20 7a 50 61 72 RE rid=%d", zPar
6b40: 65 6e 74 73 5b 69 5d 29 3b 0a 20 20 20 20 62 6c ents[i]);. bl
6b50: 6f 62 5f 61 70 70 65 6e 64 66 28 26 6d 61 6e 69 ob_appendf(&mani
6b60: 66 65 73 74 2c 20 22 20 25 73 22 2c 20 7a 55 75 fest, " %s", zUu
6b70: 69 64 29 3b 0a 20 20 20 20 66 72 65 65 28 7a 55 id);. free(zU
6b80: 75 69 64 29 3b 0a 20 20 7d 0a 20 20 62 6c 6f 62 uid);. }. blob
6b90: 5f 61 70 70 65 6e 64 66 28 26 6d 61 6e 69 66 65 _appendf(&manife
6ba0: 73 74 2c 20 22 5c 6e 22 29 3b 0a 0a 20 20 2f 2a st, "\n");.. /*
6bb0: 0a 20 20 2a 2a 20 43 6f 6d 70 6c 65 74 65 20 74 . ** Complete t
6bc0: 68 65 20 6d 61 6e 69 66 65 73 74 20 77 69 74 68 he manifest with
6bd0: 20 75 73 65 72 20 6e 61 6d 65 20 61 6e 64 20 74 user name and t
6be0: 68 65 20 76 61 72 69 6f 75 73 20 63 68 65 63 6b he various check
6bf0: 73 75 6d 73 0a 20 20 2a 2f 0a 0a 20 20 62 6c 6f sums. */.. blo
6c00: 62 5f 61 70 70 65 6e 64 66 28 26 6d 61 6e 69 66 b_appendf(&manif
6c10: 65 73 74 2c 20 22 52 20 25 62 5c 6e 22 2c 20 26 est, "R %b\n", &
6c20: 63 6b 73 75 6d 29 3b 0a 20 20 62 6c 6f 62 5f 61 cksum);. blob_a
6c30: 70 70 65 6e 64 66 28 26 6d 61 6e 69 66 65 73 74 ppendf(&manifest
6c40: 2c 20 22 55 20 25 46 5c 6e 22 2c 20 67 2e 7a 4c , "U %F\n", g.zL
6c50: 6f 67 69 6e 29 3b 0a 20 20 6d 64 35 73 75 6d 5f ogin);. md5sum_
6c60: 62 6c 6f 62 28 26 6d 61 6e 69 66 65 73 74 2c 20 blob(&manifest,
6c70: 26 6d 63 6b 73 75 6d 29 3b 0a 20 20 62 6c 6f 62 &mcksum);. blob
6c80: 5f 61 70 70 65 6e 64 66 28 26 6d 61 6e 69 66 65 _appendf(&manife
6c90: 73 74 2c 20 22 5a 20 25 62 5c 6e 22 2c 20 26 6d st, "Z %b\n", &m
6ca0: 63 6b 73 75 6d 29 3b 0a 0a 20 20 2f 2a 0a 20 20 cksum);.. /*.
6cb0: 2a 2a 20 4e 6f 77 20 69 6e 73 65 72 74 20 74 68 ** Now insert th
6cc0: 65 20 6e 65 77 20 6d 61 6e 69 66 65 73 74 2c 20 e new manifest,
6cd0: 74 72 79 20 74 6f 20 63 6f 6d 70 72 65 73 73 20 try to compress
6ce0: 69 74 20 72 65 6c 61 74 69 76 65 20 74 6f 20 66 it relative to f
6cf0: 69 72 73 74 0a 20 20 2a 2a 20 70 61 72 65 6e 74 irst. ** parent
6d00: 20 28 70 72 69 6d 61 72 79 29 2e 0a 20 20 20 2a (primary).. *
6d10: 2f 0a 0a 20 20 2f 2a 62 6c 6f 62 5f 77 72 69 74 /.. /*blob_writ
6d20: 65 5f 74 6f 5f 66 69 6c 65 20 28 26 6d 61 6e 69 e_to_file (&mani
6d30: 66 65 73 74 2c 20 22 54 45 53 54 5f 4d 41 4e 49 fest, "TEST_MANI
6d40: 46 45 53 54 22 29 3b 2a 2f 0a 0a 20 20 6d 69 64 FEST");*/.. mid
6d50: 20 3d 20 63 6f 6e 74 65 6e 74 5f 70 75 74 28 26 = content_put(&
6d60: 6d 61 6e 69 66 65 73 74 2c 20 30 2c 20 30 29 3b manifest, 0, 0);
6d70: 0a 20 20 69 66 28 20 6d 69 64 3d 3d 30 20 29 7b . if( mid==0 ){
6d80: 0a 20 20 20 20 66 6f 73 73 69 6c 5f 70 61 6e 69 . fossil_pani
6d90: 63 28 22 74 72 6f 75 62 6c 65 20 63 6f 6d 6d 69 c("trouble commi
6da0: 74 74 69 6e 67 20 6d 61 6e 69 66 65 73 74 3a 20 tting manifest:
6db0: 25 73 22 2c 20 67 2e 7a 45 72 72 4d 73 67 29 3b %s", g.zErrMsg);
6dc0: 0a 20 20 7d 0a 0a 20 20 63 6f 6e 74 65 6e 74 5f . }.. content_
6dd0: 64 65 6c 74 69 66 79 28 7a 50 61 72 65 6e 74 73 deltify(zParents
6de0: 5b 30 5d 2c 20 6d 69 64 2c 20 30 29 3b 0a 0a 20 [0], mid, 0);..
6df0: 20 2f 2a 20 56 65 72 69 66 79 20 74 68 61 74 20 /* Verify that
6e00: 74 68 65 20 72 65 70 6f 73 69 74 6f 72 79 20 63 the repository c
6e10: 68 65 63 6b 73 75 6d 20 6d 61 74 63 68 65 73 20 hecksum matches
6e20: 74 68 65 20 65 78 70 65 63 74 65 64 20 63 68 65 the expected che
6e30: 63 6b 73 75 6d 0a 20 20 2a 2a 20 63 61 6c 63 75 cksum. ** calcu
6e40: 6c 61 74 65 64 20 62 65 66 6f 72 65 20 74 68 65 lated before the
6e50: 20 63 68 65 63 6b 69 6e 20 73 74 61 72 74 65 64 checkin started
6e60: 20 28 61 6e 64 20 73 74 6f 72 65 64 20 61 73 20 (and stored as
6e70: 74 68 65 20 52 20 72 65 63 6f 72 64 0a 20 20 2a the R record. *
6e80: 2a 20 6f 66 20 74 68 65 20 6d 61 6e 69 66 65 73 * of the manifes
6e90: 74 20 66 69 6c 65 29 2e 0a 20 20 2a 2f 0a 0a 20 t file).. */..
6ea0: 20 76 66 69 6c 65 5f 61 67 67 72 65 67 61 74 65 vfile_aggregate
6eb0: 5f 63 68 65 63 6b 73 75 6d 5f 6d 61 6e 69 66 65 _checksum_manife
6ec0: 73 74 28 6d 69 64 2c 20 26 63 6b 73 75 6d 32 2c st(mid, &cksum2,
6ed0: 20 26 63 6b 73 75 6d 31 62 29 3b 0a 20 20 69 66 &cksum1b);. if
6ee0: 28 20 62 6c 6f 62 5f 63 6f 6d 70 61 72 65 28 26 ( blob_compare(&
6ef0: 63 6b 73 75 6d 2c 20 26 63 6b 73 75 6d 31 62 29 cksum, &cksum1b)
6f00: 20 29 7b 0a 20 20 20 20 66 6f 73 73 69 6c 5f 70 ){. fossil_p
6f10: 61 6e 69 63 28 22 6d 61 6e 69 66 65 73 74 20 63 anic("manifest c
6f20: 68 65 63 6b 73 75 6d 20 64 6f 65 73 20 6e 6f 74 hecksum does not
6f30: 20 61 67 72 65 65 20 77 69 74 68 20 6d 61 6e 69 agree with mani
6f40: 66 65 73 74 3a 20 22 0a 20 20 20 20 20 20 20 20 fest: ".
6f50: 20 20 20 20 20 20 20 20 20 22 25 62 20 76 65 72 "%b ver
6f60: 73 75 73 20 25 62 22 2c 20 26 63 6b 73 75 6d 2c sus %b", &cksum,
6f70: 20 26 63 6b 73 75 6d 31 62 29 3b 0a 20 20 7d 0a &cksum1b);. }.
6f80: 20 20 69 66 28 20 62 6c 6f 62 5f 63 6f 6d 70 61 if( blob_compa
6f90: 72 65 28 26 63 6b 73 75 6d 2c 20 26 63 6b 73 75 re(&cksum, &cksu
6fa0: 6d 32 29 20 29 7b 0a 20 20 20 20 66 6f 73 73 69 m2) ){. fossi
6fb0: 6c 5f 70 61 6e 69 63 28 22 74 72 65 65 20 63 68 l_panic("tree ch
6fc0: 65 63 6b 73 75 6d 20 64 6f 65 73 20 6e 6f 74 20 ecksum does not
6fd0: 6d 61 74 63 68 20 6d 61 6e 69 66 65 73 74 20 61 match manifest a
6fe0: 66 74 65 72 20 63 6f 6d 6d 69 74 3a 20 22 0a 20 fter commit: ".
6ff0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
7000: 22 25 62 20 76 65 72 73 75 73 20 25 62 22 2c 20 "%b versus %b",
7010: 26 63 6b 73 75 6d 2c 20 26 63 6b 73 75 6d 32 29 &cksum, &cksum2)
7020: 3b 0a 20 20 7d 0a 0a 20 20 2f 2a 0a 20 20 2a 2a ;. }.. /*. **
7030: 20 41 74 20 6c 61 73 74 20 63 6f 6d 6d 69 74 20 At last commit
7040: 61 6c 6c 20 63 68 61 6e 67 65 73 2c 20 61 66 74 all changes, aft
7050: 65 72 20 67 65 74 74 69 6e 67 20 72 69 64 20 6f er getting rid o
7060: 66 20 74 68 65 20 74 65 6d 70 0a 20 20 2a 2a 20 f the temp. **
7070: 68 6f 6c 64 65 72 20 66 6f 72 20 74 68 65 20 66 holder for the f
7080: 69 6c 65 73 2c 20 61 6e 64 20 72 65 6c 65 61 73 iles, and releas
7090: 65 20 61 6c 6c 6f 63 61 74 65 64 20 6d 65 6d 6f e allocated memo
70a0: 72 79 2e 0a 20 20 2a 2f 0a 0a 20 20 64 62 5f 6d ry.. */.. db_m
70b0: 75 6c 74 69 5f 65 78 65 63 28 22 44 52 4f 50 20 ulti_exec("DROP
70c0: 54 41 42 4c 45 20 5f 5f 69 6d 22 29 3b 0a 20 20 TABLE __im");.
70d0: 7a 4d 69 64 55 75 69 64 20 3d 20 64 62 5f 74 65 zMidUuid = db_te
70e0: 78 74 28 30 2c 20 22 53 45 4c 45 43 54 20 75 75 xt(0, "SELECT uu
70f0: 69 64 20 46 52 4f 4d 20 62 6c 6f 62 20 57 48 45 id FROM blob WHE
7100: 52 45 20 72 69 64 3d 25 64 22 2c 20 6d 69 64 29 RE rid=%d", mid)
7110: 3b 0a 20 20 64 62 5f 65 6e 64 5f 74 72 61 6e 73 ;. db_end_trans
7120: 61 63 74 69 6f 6e 28 30 29 3b 0a 20 20 66 72 65 action(0);. fre
7130: 65 28 7a 50 61 72 65 6e 74 73 29 3b 0a 0a 20 20 e(zParents);..
7140: 2f 2a 0a 20 20 2a 2a 20 41 74 20 74 68 65 20 76 /*. ** At the v
7150: 65 72 79 20 6c 61 73 74 20 69 6e 66 6f 72 6d 20 ery last inform
7160: 74 68 65 20 63 61 6c 6c 65 72 20 61 62 6f 75 74 the caller about
7170: 20 74 68 65 20 69 64 20 61 6e 64 20 75 75 69 64 the id and uuid
7180: 20 6f 66 20 74 68 65 0a 20 20 2a 2a 20 6e 65 77 of the. ** new
7190: 20 6d 61 6e 69 66 65 73 74 2e 0a 20 20 2a 2f 0a manifest.. */.
71a0: 0a 0a 20 20 70 72 69 6e 74 66 28 22 69 6e 73 65 .. printf("inse
71b0: 72 74 65 64 20 61 73 20 72 65 63 6f 72 64 20 25 rted as record %
71c0: 64 2c 20 25 73 5c 6e 22 2c 20 6d 69 64 2c 20 7a d, %s\n", mid, z
71d0: 4d 69 64 55 75 69 64 29 3b 0a 20 20 66 72 65 65 MidUuid);. free
71e0: 28 7a 4d 69 64 55 75 69 64 29 3b 0a 20 20 72 65 (zMidUuid);. re
71f0: 74 75 72 6e 3b 0a 0a 23 75 6e 64 65 66 20 55 53 turn;..#undef US
7200: 41 47 45 0a 7d 0a AGE.}.