0000: 2f 2a 0a 2a 2a 20 43 6f 70 79 72 69 67 68 74 20 /*.** Copyright
0010: 28 63 29 20 32 30 30 36 20 44 2e 20 52 69 63 68 (c) 2006 D. Rich
0020: 61 72 64 20 48 69 70 70 0a 2a 2a 0a 2a 2a 20 54 ard Hipp.**.** T
0030: 68 69 73 20 70 72 6f 67 72 61 6d 20 69 73 20 66 his program is f
0040: 72 65 65 20 73 6f 66 74 77 61 72 65 3b 20 79 6f ree software; yo
0050: 75 20 63 61 6e 20 72 65 64 69 73 74 72 69 62 75 u can redistribu
0060: 74 65 20 69 74 20 61 6e 64 2f 6f 72 0a 2a 2a 20 te it and/or.**
0070: 6d 6f 64 69 66 79 20 69 74 20 75 6e 64 65 72 20 modify it under
0080: 74 68 65 20 74 65 72 6d 73 20 6f 66 20 74 68 65 the terms of the
0090: 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 GNU General Pub
00a0: 6c 69 63 0a 2a 2a 20 4c 69 63 65 6e 73 65 20 76 lic.** License v
00b0: 65 72 73 69 6f 6e 20 32 20 61 73 20 70 75 62 6c ersion 2 as publ
00c0: 69 73 68 65 64 20 62 79 20 74 68 65 20 46 72 65 ished by the Fre
00d0: 65 20 53 6f 66 74 77 61 72 65 20 46 6f 75 6e 64 e Software Found
00e0: 61 74 69 6f 6e 2e 0a 2a 2a 0a 2a 2a 20 54 68 69 ation..**.** Thi
00f0: 73 20 70 72 6f 67 72 61 6d 20 69 73 20 64 69 73 s program is dis
0100: 74 72 69 62 75 74 65 64 20 69 6e 20 74 68 65 20 tributed in the
0110: 68 6f 70 65 20 74 68 61 74 20 69 74 20 77 69 6c hope that it wil
0120: 6c 20 62 65 20 75 73 65 66 75 6c 2c 0a 2a 2a 20 l be useful,.**
0130: 62 75 74 20 57 49 54 48 4f 55 54 20 41 4e 59 20 but WITHOUT ANY
0140: 57 41 52 52 41 4e 54 59 3b 20 77 69 74 68 6f 75 WARRANTY; withou
0150: 74 20 65 76 65 6e 20 74 68 65 20 69 6d 70 6c 69 t even the impli
0160: 65 64 20 77 61 72 72 61 6e 74 79 20 6f 66 0a 2a ed warranty of.*
0170: 2a 20 4d 45 52 43 48 41 4e 54 41 42 49 4c 49 54 * MERCHANTABILIT
0180: 59 20 6f 72 20 46 49 54 4e 45 53 53 20 46 4f 52 Y or FITNESS FOR
0190: 20 41 20 50 41 52 54 49 43 55 4c 41 52 20 50 55 A PARTICULAR PU
01a0: 52 50 4f 53 45 2e 20 20 53 65 65 20 74 68 65 20 RPOSE. See the
01b0: 47 4e 55 0a 2a 2a 20 47 65 6e 65 72 61 6c 20 50 GNU.** General P
01c0: 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 66 6f ublic License fo
01d0: 72 20 6d 6f 72 65 20 64 65 74 61 69 6c 73 2e 0a r more details..
01e0: 2a 2a 0a 2a 2a 20 59 6f 75 20 73 68 6f 75 6c 64 **.** You should
01f0: 20 68 61 76 65 20 72 65 63 65 69 76 65 64 20 61 have received a
0200: 20 63 6f 70 79 20 6f 66 20 74 68 65 20 47 4e 55 copy of the GNU
0210: 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 0a General Public.
0220: 2a 2a 20 4c 69 63 65 6e 73 65 20 61 6c 6f 6e 67 ** License along
0230: 20 77 69 74 68 20 74 68 69 73 20 6c 69 62 72 61 with this libra
0240: 72 79 3b 20 69 66 20 6e 6f 74 2c 20 77 72 69 74 ry; if not, writ
0250: 65 20 74 6f 20 74 68 65 0a 2a 2a 20 46 72 65 65 e to the.** Free
0260: 20 53 6f 66 74 77 61 72 65 20 46 6f 75 6e 64 61 Software Founda
0270: 74 69 6f 6e 2c 20 49 6e 63 2e 2c 20 35 39 20 54 tion, Inc., 59 T
0280: 65 6d 70 6c 65 20 50 6c 61 63 65 20 2d 20 53 75 emple Place - Su
0290: 69 74 65 20 33 33 30 2c 0a 2a 2a 20 42 6f 73 74 ite 330,.** Bost
02a0: 6f 6e 2c 20 4d 41 20 20 30 32 31 31 31 2d 31 33 on, MA 02111-13
02b0: 30 37 2c 20 55 53 41 2e 0a 2a 2a 0a 2a 2a 20 41 07, USA..**.** A
02c0: 75 74 68 6f 72 20 63 6f 6e 74 61 63 74 20 69 6e uthor contact in
02d0: 66 6f 72 6d 61 74 69 6f 6e 3a 0a 2a 2a 20 20 20 formation:.**
02e0: 64 72 68 40 68 77 61 63 69 2e 63 6f 6d 0a 2a 2a drh@hwaci.com.**
02f0: 20 20 20 68 74 74 70 3a 2f 2f 77 77 77 2e 68 77 http://www.hw
0300: 61 63 69 2e 63 6f 6d 2f 64 72 68 2f 0a 2a 2a 0a aci.com/drh/.**.
0310: 2a 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 0a ***************.
0360: 2a 2a 0a 2a 2a 20 43 6f 64 65 20 66 6f 72 20 69 **.** Code for i
0370: 6e 74 65 72 66 61 63 69 6e 67 20 74 6f 20 74 68 nterfacing to th
0380: 65 20 76 61 72 69 6f 75 73 20 64 61 74 61 62 61 e various databa
0390: 73 65 73 2e 0a 2a 2a 0a 2a 2a 20 54 68 65 72 65 ses..**.** There
03a0: 20 61 72 65 20 74 68 72 65 65 20 73 65 70 61 72 are three separ
03b0: 61 74 65 20 64 61 74 61 62 61 73 65 20 66 69 6c ate database fil
03c0: 65 73 20 74 68 61 74 20 66 6f 73 73 69 6c 20 69 es that fossil i
03d0: 6e 74 65 72 61 63 74 73 0a 2a 2a 20 77 69 74 68 nteracts.** with
03e0: 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 28 31 29 20 20 :.**.** (1)
03f0: 54 68 65 20 22 75 73 65 72 22 20 64 61 74 61 62 The "user" datab
0400: 61 73 65 20 69 6e 20 7e 2f 2e 66 6f 73 73 69 6c ase in ~/.fossil
0410: 0a 2a 2a 0a 2a 2a 20 20 20 20 28 32 29 20 20 54 .**.** (2) T
0420: 68 65 20 22 72 65 70 6f 73 69 74 6f 72 79 22 20 he "repository"
0430: 64 61 74 61 62 61 73 65 0a 2a 2a 0a 2a 2a 20 20 database.**.**
0440: 20 20 28 33 29 20 20 41 20 6c 6f 63 61 6c 20 63 (3) A local c
0450: 68 65 63 6b 6f 75 74 20 64 61 74 61 62 61 73 65 heckout database
0460: 20 6e 61 6d 65 64 20 22 46 4f 53 53 49 4c 22 20 named "FOSSIL"
0470: 61 6e 64 20 6c 6f 63 61 74 65 64 20 61 74 20 74 and located at t
0480: 68 65 0a 2a 2a 20 20 20 20 20 20 20 20 20 72 6f he.** ro
0490: 6f 74 20 6f 66 20 74 68 65 20 6c 6f 63 61 6c 20 ot of the local
04a0: 63 6f 70 79 20 6f 66 20 74 68 65 20 73 6f 75 72 copy of the sour
04b0: 63 65 20 74 72 65 65 2e 0a 2a 2a 0a 2a 2f 0a 23 ce tree..**.*/.#
04c0: 69 6e 63 6c 75 64 65 20 22 63 6f 6e 66 69 67 2e include "config.
04d0: 68 22 0a 23 69 66 6e 64 65 66 20 5f 5f 4d 49 4e h".#ifndef __MIN
04e0: 47 57 33 32 5f 5f 0a 23 20 20 69 6e 63 6c 75 64 GW32__.# includ
04f0: 65 20 3c 70 77 64 2e 68 3e 0a 23 65 6e 64 69 66 e <pwd.h>.#endif
0500: 0a 23 69 6e 63 6c 75 64 65 20 3c 73 71 6c 69 74 .#include <sqlit
0510: 65 33 2e 68 3e 0a 23 69 6e 63 6c 75 64 65 20 3c e3.h>.#include <
0520: 73 79 73 2f 74 79 70 65 73 2e 68 3e 0a 23 69 6e sys/types.h>.#in
0530: 63 6c 75 64 65 20 3c 73 79 73 2f 73 74 61 74 2e clude <sys/stat.
0540: 68 3e 0a 23 69 6e 63 6c 75 64 65 20 3c 75 6e 69 h>.#include <uni
0550: 73 74 64 2e 68 3e 0a 23 69 6e 63 6c 75 64 65 20 std.h>.#include
0560: 22 64 62 2e 68 22 0a 0a 23 69 66 20 49 4e 54 45 "db.h"..#if INTE
0570: 52 46 41 43 45 0a 2f 2a 0a 2a 2a 20 41 6e 20 73 RFACE./*.** An s
0580: 69 6e 67 6c 65 20 53 51 4c 20 73 74 61 74 65 6d ingle SQL statem
0590: 65 6e 74 20 69 73 20 72 65 70 72 65 73 65 6e 74 ent is represent
05a0: 65 64 20 61 73 20 61 6e 20 69 6e 73 74 61 6e 63 ed as an instanc
05b0: 65 20 6f 66 20 74 68 65 20 66 6f 6c 6c 6f 77 69 e of the followi
05c0: 6e 67 0a 2a 2a 20 73 74 72 75 63 74 75 72 65 2e ng.** structure.
05d0: 0a 2a 2f 0a 73 74 72 75 63 74 20 53 74 6d 74 20 .*/.struct Stmt
05e0: 7b 0a 20 20 42 6c 6f 62 20 73 71 6c 3b 20 20 20 {. Blob sql;
05f0: 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 54 /* T
0600: 68 65 20 53 51 4c 20 66 6f 72 20 74 68 69 73 20 he SQL for this
0610: 73 74 61 74 65 6d 65 6e 74 20 2a 2f 0a 20 20 73 statement */. s
0620: 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 70 53 74 qlite3_stmt *pSt
0630: 6d 74 3b 20 20 20 20 2f 2a 20 54 68 65 20 72 65 mt; /* The re
0640: 73 75 6c 74 73 20 6f 66 20 73 71 6c 69 74 65 33 sults of sqlite3
0650: 5f 70 72 65 70 61 72 65 28 29 20 2a 2f 0a 20 20 _prepare() */.
0660: 53 74 6d 74 20 2a 70 4e 65 78 74 2c 20 2a 70 50 Stmt *pNext, *pP
0670: 72 65 76 3b 20 20 20 20 2f 2a 20 4c 69 73 74 20 rev; /* List
0680: 6f 66 20 61 6c 6c 20 75 6e 66 69 6e 61 6c 69 7a of all unfinaliz
0690: 65 64 20 73 74 61 74 65 6d 65 6e 74 73 20 2a 2f ed statements */
06a0: 0a 7d 3b 0a 23 65 6e 64 69 66 20 2f 2a 20 49 4e .};.#endif /* IN
06b0: 54 45 52 46 41 43 45 20 2a 2f 0a 0a 2f 2a 0a 2a TERFACE */../*.*
06c0: 2a 20 43 61 6c 6c 20 74 68 69 73 20 72 6f 75 74 * Call this rout
06d0: 69 6e 65 20 77 68 65 6e 20 61 20 64 61 74 61 62 ine when a datab
06e0: 61 73 65 20 65 72 72 6f 72 20 6f 63 63 75 72 73 ase error occurs
06f0: 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 ..*/.static void
0700: 20 64 62 5f 65 72 72 28 63 6f 6e 73 74 20 63 68 db_err(const ch
0710: 61 72 20 2a 7a 46 6f 72 6d 61 74 2c 20 2e 2e 2e ar *zFormat, ...
0720: 29 7b 0a 20 20 76 61 5f 6c 69 73 74 20 61 70 3b ){. va_list ap;
0730: 0a 20 20 63 68 61 72 20 2a 7a 3b 0a 20 20 76 61 . char *z;. va
0740: 5f 73 74 61 72 74 28 61 70 2c 20 7a 46 6f 72 6d _start(ap, zForm
0750: 61 74 29 3b 0a 20 20 7a 20 3d 20 76 6d 70 72 69 at);. z = vmpri
0760: 6e 74 66 28 7a 46 6f 72 6d 61 74 2c 20 61 70 29 ntf(zFormat, ap)
0770: 3b 0a 20 20 76 61 5f 65 6e 64 28 61 70 29 3b 0a ;. va_end(ap);.
0780: 20 20 69 66 28 20 67 2e 63 67 69 50 61 6e 69 63 if( g.cgiPanic
0790: 20 29 7b 0a 20 20 20 20 67 2e 63 67 69 50 61 6e ){. g.cgiPan
07a0: 69 63 20 3d 20 30 3b 0a 20 20 20 20 63 67 69 5f ic = 0;. cgi_
07b0: 70 72 69 6e 74 66 28 22 3c 70 3e 3c 66 6f 6e 74 printf("<p><font
07c0: 20 63 6f 6c 6f 72 3d 5c 22 72 65 64 5c 22 3e 25 color=\"red\">%
07d0: 68 3c 2f 66 6f 6e 74 3e 3c 2f 70 3e 22 2c 20 7a h</font></p>", z
07e0: 29 3b 0a 20 20 20 20 73 74 79 6c 65 5f 66 6f 6f );. style_foo
07f0: 74 65 72 28 29 3b 0a 20 20 20 20 63 67 69 5f 72 ter();. cgi_r
0800: 65 70 6c 79 28 29 3b 0a 20 20 7d 65 6c 73 65 7b eply();. }else{
0810: 0a 20 20 20 20 66 70 72 69 6e 74 66 28 73 74 64 . fprintf(std
0820: 65 72 72 2c 20 22 25 73 3a 20 25 73 5c 6e 22 2c err, "%s: %s\n",
0830: 20 67 2e 61 72 67 76 5b 30 5d 2c 20 7a 29 3b 0a g.argv[0], z);.
0840: 20 20 7d 0a 20 20 64 62 5f 66 6f 72 63 65 5f 72 }. db_force_r
0850: 6f 6c 6c 62 61 63 6b 28 29 3b 0a 20 20 65 78 69 ollback();. exi
0860: 74 28 31 29 3b 0a 7d 0a 0a 73 74 61 74 69 63 20 t(1);.}..static
0870: 69 6e 74 20 6e 42 65 67 69 6e 20 3d 20 30 3b 20 int nBegin = 0;
0880: 20 20 20 20 20 2f 2a 20 4e 65 73 74 69 6e 67 20 /* Nesting
0890: 64 65 70 74 68 20 6f 66 20 42 45 47 49 4e 20 2a depth of BEGIN *
08a0: 2f 0a 73 74 61 74 69 63 20 69 6e 74 20 69 73 4e /.static int isN
08b0: 65 77 52 65 70 6f 20 3d 20 30 3b 20 20 20 2f 2a ewRepo = 0; /*
08c0: 20 54 72 75 65 20 69 66 20 74 68 65 20 72 65 70 True if the rep
08d0: 6f 73 69 74 6f 72 79 20 69 73 20 6e 65 77 6c 79 ository is newly
08e0: 20 63 72 65 61 74 65 64 20 2a 2f 0a 73 74 61 74 created */.stat
08f0: 69 63 20 69 6e 74 20 64 6f 52 6f 6c 6c 62 61 63 ic int doRollbac
0900: 6b 20 3d 20 30 3b 20 20 2f 2a 20 54 72 75 65 20 k = 0; /* True
0910: 74 6f 20 66 6f 72 63 65 20 61 20 72 6f 6c 6c 62 to force a rollb
0920: 61 63 6b 20 2a 2f 0a 73 74 61 74 69 63 20 69 6e ack */.static in
0930: 74 20 6e 43 6f 6d 6d 69 74 48 6f 6f 6b 20 3d 20 t nCommitHook =
0940: 30 3b 20 2f 2a 20 4e 75 6d 62 65 72 20 6f 66 20 0; /* Number of
0950: 63 6f 6d 6d 69 74 20 68 6f 6f 6b 73 20 2a 2f 0a commit hooks */.
0960: 73 74 61 74 69 63 20 73 74 72 75 63 74 20 73 43 static struct sC
0970: 6f 6d 6d 69 74 48 6f 6f 6b 20 7b 0a 20 20 69 6e ommitHook {. in
0980: 74 20 28 2a 78 48 6f 6f 6b 29 28 76 6f 69 64 29 t (*xHook)(void)
0990: 3b 20 20 2f 2a 20 46 75 6e 63 74 69 6f 6e 73 20 ; /* Functions
09a0: 74 6f 20 63 61 6c 6c 20 61 74 20 64 62 5f 65 6e to call at db_en
09b0: 64 5f 74 72 61 6e 73 61 63 74 69 6f 6e 28 29 20 d_transaction()
09c0: 2a 2f 0a 20 20 69 6e 74 20 73 65 71 75 65 6e 63 */. int sequenc
09d0: 65 3b 20 20 20 20 20 20 20 20 2f 2a 20 43 61 6c e; /* Cal
09e0: 6c 20 66 75 6e 63 74 69 6f 6e 73 20 69 6e 20 73 l functions in s
09f0: 65 71 75 65 6e 63 65 20 6f 72 64 65 72 20 2a 2f equence order */
0a00: 0a 7d 20 61 48 6f 6f 6b 5b 35 5d 3b 0a 73 74 61 .} aHook[5];.sta
0a10: 74 69 63 20 53 74 6d 74 20 2a 70 41 6c 6c 53 74 tic Stmt *pAllSt
0a20: 6d 74 20 3d 20 30 3b 20 20 2f 2a 20 4c 69 73 74 mt = 0; /* List
0a30: 20 6f 66 20 61 6c 6c 20 75 6e 66 69 6e 61 6c 69 of all unfinali
0a40: 7a 65 64 20 73 74 61 74 65 6d 65 6e 74 73 20 2a zed statements *
0a50: 2f 0a 0a 2f 2a 0a 2a 2a 20 54 68 69 73 20 72 6f /../*.** This ro
0a60: 75 74 69 6e 65 20 69 73 20 63 61 6c 6c 65 64 20 utine is called
0a70: 62 79 20 74 68 65 20 53 51 4c 69 74 65 20 63 6f by the SQLite co
0a80: 6d 6d 69 74 2d 68 6f 6f 6b 20 6d 65 63 68 61 6e mmit-hook mechan
0a90: 69 73 6d 0a 2a 2a 20 6a 75 73 74 20 70 72 69 6f ism.** just prio
0aa0: 72 20 74 6f 20 65 61 63 68 20 6f 6d 69 74 2e 20 r to each omit.
0ab0: 20 41 6c 6c 20 74 68 69 73 20 72 6f 75 74 69 6e All this routin
0ac0: 65 20 64 6f 65 73 20 69 73 20 76 65 72 69 66 79 e does is verify
0ad0: 0a 2a 2a 20 74 68 61 74 20 6e 42 65 67 69 6e 20 .** that nBegin
0ae0: 72 65 61 6c 6c 79 20 69 73 20 7a 65 72 6f 2e 20 really is zero.
0af0: 20 54 68 61 74 20 69 6e 73 75 72 65 73 20 74 68 That insures th
0b00: 61 74 20 74 72 61 6e 73 61 63 74 69 6f 6e 73 0a at transactions.
0b10: 2a 2a 20 63 61 6e 6e 6f 74 20 63 6f 6d 6d 69 74 ** cannot commit
0b20: 20 62 79 20 61 6e 79 20 6d 65 61 6e 73 20 6f 74 by any means ot
0b30: 68 65 72 20 74 68 61 6e 20 62 79 20 63 61 6c 6c her than by call
0b40: 69 6e 67 20 64 62 5f 65 6e 64 5f 74 72 61 6e 73 ing db_end_trans
0b50: 61 63 74 69 6f 6e 28 29 0a 2a 2a 20 62 65 6c 6f action().** belo
0b60: 77 2e 0a 2a 2a 0a 2a 2a 20 54 68 69 73 20 69 73 w..**.** This is
0b70: 20 6a 75 73 74 20 61 20 73 61 66 65 74 79 20 61 just a safety a
0b80: 6e 64 20 73 61 6e 69 74 79 20 63 68 65 63 6b 2e nd sanity check.
0b90: 0a 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74 20 64 .*/.static int d
0ba0: 62 5f 76 65 72 69 66 79 5f 61 74 5f 63 6f 6d 6d b_verify_at_comm
0bb0: 69 74 28 76 6f 69 64 20 2a 6e 6f 74 55 73 65 64 it(void *notUsed
0bc0: 29 7b 0a 20 20 69 66 28 20 6e 42 65 67 69 6e 20 ){. if( nBegin
0bd0: 29 7b 0a 20 20 20 20 66 6f 73 73 69 6c 5f 70 61 ){. fossil_pa
0be0: 6e 69 63 28 22 69 6c 6c 65 67 61 6c 20 63 6f 6d nic("illegal com
0bf0: 6d 69 74 20 61 74 74 65 6d 70 74 22 29 3b 0a 20 mit attempt");.
0c00: 20 20 20 72 65 74 75 72 6e 20 31 3b 0a 20 20 7d return 1;. }
0c10: 0a 20 20 72 65 74 75 72 6e 20 30 3b 0a 7d 0a 0a . return 0;.}..
0c20: 2f 2a 0a 2a 2a 20 42 65 67 69 6e 20 61 6e 64 20 /*.** Begin and
0c30: 65 6e 64 20 61 20 6e 65 73 74 65 64 20 74 72 61 end a nested tra
0c40: 6e 73 61 63 74 69 6f 6e 0a 2a 2f 0a 76 6f 69 64 nsaction.*/.void
0c50: 20 64 62 5f 62 65 67 69 6e 5f 74 72 61 6e 73 61 db_begin_transa
0c60: 63 74 69 6f 6e 28 76 6f 69 64 29 7b 0a 20 20 69 ction(void){. i
0c70: 66 28 20 6e 42 65 67 69 6e 3d 3d 30 20 29 7b 0a f( nBegin==0 ){.
0c80: 20 20 20 20 64 62 5f 6d 75 6c 74 69 5f 65 78 65 db_multi_exe
0c90: 63 28 22 42 45 47 49 4e 22 29 3b 0a 20 20 20 20 c("BEGIN");.
0ca0: 73 71 6c 69 74 65 33 5f 63 6f 6d 6d 69 74 5f 68 sqlite3_commit_h
0cb0: 6f 6f 6b 28 67 2e 64 62 2c 20 64 62 5f 76 65 72 ook(g.db, db_ver
0cc0: 69 66 79 5f 61 74 5f 63 6f 6d 6d 69 74 2c 20 30 ify_at_commit, 0
0cd0: 29 3b 0a 20 20 7d 0a 20 20 6e 42 65 67 69 6e 2b );. }. nBegin+
0ce0: 2b 3b 0a 7d 0a 76 6f 69 64 20 64 62 5f 65 6e 64 +;.}.void db_end
0cf0: 5f 74 72 61 6e 73 61 63 74 69 6f 6e 28 69 6e 74 _transaction(int
0d00: 20 72 6f 6c 6c 62 61 63 6b 46 6c 61 67 29 7b 0a rollbackFlag){.
0d10: 20 20 69 66 28 20 6e 42 65 67 69 6e 3c 3d 30 20 if( nBegin<=0
0d20: 29 20 72 65 74 75 72 6e 3b 0a 20 20 69 66 28 20 ) return;. if(
0d30: 72 6f 6c 6c 62 61 63 6b 46 6c 61 67 20 29 20 64 rollbackFlag ) d
0d40: 6f 52 6f 6c 6c 62 61 63 6b 20 3d 20 31 3b 0a 20 oRollback = 1;.
0d50: 20 6e 42 65 67 69 6e 2d 2d 3b 0a 20 20 69 66 28 nBegin--;. if(
0d60: 20 6e 42 65 67 69 6e 3d 3d 30 20 29 7b 0a 20 20 nBegin==0 ){.
0d70: 20 20 69 6e 74 20 69 3b 0a 20 20 20 20 66 6f 72 int i;. for
0d80: 28 69 3d 30 3b 20 64 6f 52 6f 6c 6c 62 61 63 6b (i=0; doRollback
0d90: 3d 3d 30 20 26 26 20 69 3c 6e 43 6f 6d 6d 69 74 ==0 && i<nCommit
0da0: 48 6f 6f 6b 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 Hook; i++){.
0db0: 20 20 64 6f 52 6f 6c 6c 62 61 63 6b 20 7c 3d 20 doRollback |=
0dc0: 61 48 6f 6f 6b 5b 69 5d 2e 78 48 6f 6f 6b 28 29 aHook[i].xHook()
0dd0: 3b 0a 20 20 20 20 7d 0a 20 20 20 20 64 62 5f 6d ;. }. db_m
0de0: 75 6c 74 69 5f 65 78 65 63 28 64 6f 52 6f 6c 6c ulti_exec(doRoll
0df0: 62 61 63 6b 20 3f 20 22 52 4f 4c 4c 42 41 43 4b back ? "ROLLBACK
0e00: 22 20 3a 20 22 43 4f 4d 4d 49 54 22 29 3b 0a 20 " : "COMMIT");.
0e10: 20 20 20 64 6f 52 6f 6c 6c 62 61 63 6b 20 3d 20 doRollback =
0e20: 30 3b 0a 20 20 7d 0a 7d 0a 76 6f 69 64 20 64 62 0;. }.}.void db
0e30: 5f 66 6f 72 63 65 5f 72 6f 6c 6c 62 61 63 6b 28 _force_rollback(
0e40: 76 6f 69 64 29 7b 0a 20 20 69 66 28 20 6e 42 65 void){. if( nBe
0e50: 67 69 6e 20 29 7b 0a 20 20 20 20 73 71 6c 69 74 gin ){. sqlit
0e60: 65 33 5f 65 78 65 63 28 67 2e 64 62 2c 20 22 52 e3_exec(g.db, "R
0e70: 4f 4c 4c 42 41 43 4b 22 2c 20 30 2c 20 30 2c 20 OLLBACK", 0, 0,
0e80: 30 29 3b 0a 20 20 20 20 69 66 28 20 69 73 4e 65 0);. if( isNe
0e90: 77 52 65 70 6f 20 29 7b 0a 20 20 20 20 20 20 64 wRepo ){. d
0ea0: 62 5f 63 6c 6f 73 65 28 29 3b 0a 20 20 20 20 20 b_close();.
0eb0: 20 75 6e 6c 69 6e 6b 28 67 2e 7a 52 65 70 6f 73 unlink(g.zRepos
0ec0: 69 74 6f 72 79 4e 61 6d 65 29 3b 0a 20 20 20 20 itoryName);.
0ed0: 7d 0a 20 20 7d 0a 20 20 6e 42 65 67 69 6e 20 3d }. }. nBegin =
0ee0: 20 30 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6e 73 0;.}../*.** Ins
0ef0: 74 61 6c 6c 20 61 20 63 6f 6d 6d 69 74 20 68 6f tall a commit ho
0f00: 6f 6b 2e 20 20 48 6f 6f 6b 73 20 61 72 65 20 69 ok. Hooks are i
0f10: 6e 73 74 61 6c 6c 65 64 20 69 6e 20 73 65 71 75 nstalled in sequ
0f20: 65 6e 63 65 20 6f 72 64 65 72 2e 0a 2a 2a 20 49 ence order..** I
0f30: 74 20 69 73 20 61 6e 20 65 72 72 6f 72 20 74 6f t is an error to
0f40: 20 69 6e 73 74 61 6c 6c 20 74 68 65 20 73 61 6d install the sam
0f50: 65 20 63 6f 6d 6d 69 74 20 68 6f 6f 6b 20 6d 6f e commit hook mo
0f60: 72 65 20 74 68 61 6e 20 6f 6e 63 65 2e 0a 2a 2a re than once..**
0f70: 0a 2a 2a 20 45 61 63 68 20 63 6f 6d 6d 69 74 20 .** Each commit
0f80: 68 6f 6f 6b 20 69 73 20 63 61 6c 6c 65 64 20 28 hook is called (
0f90: 69 6e 20 6f 72 64 65 72 20 6f 66 20 61 63 63 65 in order of acce
0fa0: 6e 64 69 6e 67 20 73 65 71 75 65 6e 63 65 29 20 nding sequence)
0fb0: 61 74 0a 2a 2a 20 65 61 63 68 20 63 6f 6d 6d 69 at.** each commi
0fc0: 74 20 6f 70 65 72 61 74 69 6f 6e 2e 20 20 49 66 t operation. If
0fd0: 20 61 6e 79 20 63 6f 6d 6d 69 74 20 68 6f 6f 6b any commit hook
0fe0: 20 72 65 74 75 72 6e 73 20 6e 6f 6e 2d 7a 65 72 returns non-zer
0ff0: 6f 2c 0a 2a 2a 20 74 68 65 20 73 75 62 73 65 71 o,.** the subseq
1000: 75 65 6e 63 65 20 63 6f 6d 6d 69 74 20 68 6f 6f uence commit hoo
1010: 6b 73 20 61 72 65 20 6f 6d 69 74 74 65 64 20 61 ks are omitted a
1020: 6e 64 20 74 68 65 20 74 72 61 6e 73 61 63 74 69 nd the transacti
1030: 6f 6e 0a 2a 2a 20 72 6f 6c 6c 73 20 62 61 63 6b on.** rolls back
1040: 20 72 61 74 68 65 72 20 74 68 61 6e 20 63 6f 6d rather than com
1050: 6d 69 74 2e 20 20 49 74 20 69 73 20 74 68 65 20 mit. It is the
1060: 72 65 73 70 6f 6e 73 69 62 69 6c 69 74 79 20 6f responsibility o
1070: 66 20 74 68 65 0a 2a 2a 20 68 6f 6f 6b 73 20 74 f the.** hooks t
1080: 68 65 6d 73 65 6c 76 65 73 20 74 6f 20 69 73 73 hemselves to iss
1090: 75 65 20 61 6e 79 20 65 72 72 6f 72 20 6d 65 73 ue any error mes
10a0: 73 61 67 65 73 2e 0a 2a 2f 0a 76 6f 69 64 20 64 sages..*/.void d
10b0: 62 5f 63 6f 6d 6d 69 74 5f 68 6f 6f 6b 28 69 6e b_commit_hook(in
10c0: 74 20 28 2a 78 29 28 76 6f 69 64 29 2c 20 69 6e t (*x)(void), in
10d0: 74 20 73 65 71 75 65 6e 63 65 29 7b 0a 20 20 69 t sequence){. i
10e0: 6e 74 20 69 3b 0a 20 20 61 73 73 65 72 74 28 20 nt i;. assert(
10f0: 6e 43 6f 6d 6d 69 74 48 6f 6f 6b 20 3c 20 73 69 nCommitHook < si
1100: 7a 65 6f 66 28 61 48 6f 6f 6b 29 2f 73 69 7a 65 zeof(aHook)/size
1110: 6f 66 28 61 48 6f 6f 6b 5b 31 5d 29 20 29 3b 0a of(aHook[1]) );.
1120: 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c 6e 43 6f for(i=0; i<nCo
1130: 6d 6d 69 74 48 6f 6f 6b 3b 20 69 2b 2b 29 7b 0a mmitHook; i++){.
1140: 20 20 20 20 61 73 73 65 72 74 28 20 78 21 3d 61 assert( x!=a
1150: 48 6f 6f 6b 5b 69 5d 2e 78 48 6f 6f 6b 20 29 3b Hook[i].xHook );
1160: 0a 20 20 20 20 69 66 28 20 61 48 6f 6f 6b 5b 69 . if( aHook[i
1170: 5d 2e 73 65 71 75 65 6e 63 65 3e 73 65 71 75 65 ].sequence>seque
1180: 6e 63 65 20 29 7b 0a 20 20 20 20 20 20 69 6e 74 nce ){. int
1190: 20 73 20 3d 20 73 65 71 75 65 6e 63 65 3b 0a 20 s = sequence;.
11a0: 20 20 20 20 20 69 6e 74 20 28 2a 78 53 29 28 76 int (*xS)(v
11b0: 6f 69 64 29 20 3d 20 78 3b 0a 20 20 20 20 20 20 oid) = x;.
11c0: 73 65 71 75 65 6e 63 65 20 3d 20 61 48 6f 6f 6b sequence = aHook
11d0: 5b 69 5d 2e 73 65 71 75 65 6e 63 65 3b 0a 20 20 [i].sequence;.
11e0: 20 20 20 20 78 20 3d 20 61 48 6f 6f 6b 5b 69 5d x = aHook[i]
11f0: 2e 78 48 6f 6f 6b 3b 0a 20 20 20 20 20 20 61 48 .xHook;. aH
1200: 6f 6f 6b 5b 69 5d 2e 73 65 71 75 65 6e 63 65 20 ook[i].sequence
1210: 3d 20 73 3b 0a 20 20 20 20 20 20 61 48 6f 6f 6b = s;. aHook
1220: 5b 69 5d 2e 78 48 6f 6f 6b 20 3d 20 78 53 3b 0a [i].xHook = xS;.
1230: 20 20 20 20 7d 0a 20 20 7d 0a 20 20 61 48 6f 6f }. }. aHoo
1240: 6b 5b 6e 43 6f 6d 6d 69 74 48 6f 6f 6b 5d 2e 73 k[nCommitHook].s
1250: 65 71 75 65 6e 63 65 20 3d 20 73 65 71 75 65 6e equence = sequen
1260: 63 65 3b 0a 20 20 61 48 6f 6f 6b 5b 6e 43 6f 6d ce;. aHook[nCom
1270: 6d 69 74 48 6f 6f 6b 5d 2e 78 48 6f 6f 6b 20 3d mitHook].xHook =
1280: 20 78 3b 0a 20 20 6e 43 6f 6d 6d 69 74 48 6f 6f x;. nCommitHoo
1290: 6b 2b 2b 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 50 72 k++;.}../*.** Pr
12a0: 65 70 61 72 65 20 61 20 53 74 6d 74 2e 20 20 41 epare a Stmt. A
12b0: 73 73 75 6d 65 20 74 68 61 74 20 74 68 65 20 53 ssume that the S
12c0: 74 6d 74 20 69 73 20 70 72 65 76 69 6f 75 73 6c tmt is previousl
12d0: 79 20 75 6e 69 6e 69 74 69 61 6c 69 7a 65 64 2e y uninitialized.
12e0: 0a 2a 2a 20 49 66 20 74 68 65 20 69 6e 70 75 74 .** If the input
12f0: 20 73 74 72 69 6e 67 20 63 6f 6e 74 61 69 6e 73 string contains
1300: 20 6d 75 6c 74 69 70 6c 65 20 53 51 4c 20 73 74 multiple SQL st
1310: 61 74 65 6d 65 6e 74 73 2c 20 6f 6e 6c 79 20 74 atements, only t
1320: 68 65 20 66 69 72 73 74 0a 2a 2a 20 6f 6e 65 20 he first.** one
1330: 69 73 20 70 72 6f 63 65 73 73 65 64 2e 20 20 41 is processed. A
1340: 6c 6c 20 73 74 61 74 65 6d 65 6e 74 73 20 62 65 ll statements be
1350: 79 6f 6e 64 20 74 68 65 20 66 69 72 73 74 20 61 yond the first a
1360: 72 65 20 73 69 6c 65 6e 74 6c 79 20 69 67 6e 6f re silently igno
1370: 72 65 64 2e 0a 2a 2f 0a 69 6e 74 20 64 62 5f 76 red..*/.int db_v
1380: 70 72 65 70 61 72 65 28 53 74 6d 74 20 2a 70 53 prepare(Stmt *pS
1390: 74 6d 74 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 tmt, const char
13a0: 2a 7a 46 6f 72 6d 61 74 2c 20 76 61 5f 6c 69 73 *zFormat, va_lis
13b0: 74 20 61 70 29 7b 0a 20 20 63 68 61 72 20 2a 7a t ap){. char *z
13c0: 53 71 6c 3b 0a 20 20 62 6c 6f 62 5f 7a 65 72 6f Sql;. blob_zero
13d0: 28 26 70 53 74 6d 74 2d 3e 73 71 6c 29 3b 0a 20 (&pStmt->sql);.
13e0: 20 62 6c 6f 62 5f 76 61 70 70 65 6e 64 66 28 26 blob_vappendf(&
13f0: 70 53 74 6d 74 2d 3e 73 71 6c 2c 20 7a 46 6f 72 pStmt->sql, zFor
1400: 6d 61 74 2c 20 61 70 29 3b 0a 20 20 76 61 5f 65 mat, ap);. va_e
1410: 6e 64 28 61 70 29 3b 0a 20 20 7a 53 71 6c 20 3d nd(ap);. zSql =
1420: 20 62 6c 6f 62 5f 73 74 72 28 26 70 53 74 6d 74 blob_str(&pStmt
1430: 2d 3e 73 71 6c 29 3b 0a 20 20 69 66 28 20 73 71 ->sql);. if( sq
1440: 6c 69 74 65 33 5f 70 72 65 70 61 72 65 5f 76 32 lite3_prepare_v2
1450: 28 67 2e 64 62 2c 20 7a 53 71 6c 2c 20 2d 31 2c (g.db, zSql, -1,
1460: 20 26 70 53 74 6d 74 2d 3e 70 53 74 6d 74 2c 20 &pStmt->pStmt,
1470: 30 29 21 3d 30 20 29 7b 0a 20 20 20 20 64 62 5f 0)!=0 ){. db_
1480: 65 72 72 28 22 25 73 5c 6e 25 73 22 2c 20 7a 53 err("%s\n%s", zS
1490: 71 6c 2c 20 73 71 6c 69 74 65 33 5f 65 72 72 6d ql, sqlite3_errm
14a0: 73 67 28 67 2e 64 62 29 29 3b 0a 20 20 7d 0a 20 sg(g.db));. }.
14b0: 20 70 53 74 6d 74 2d 3e 70 4e 65 78 74 20 3d 20 pStmt->pNext =
14c0: 70 53 74 6d 74 2d 3e 70 50 72 65 76 20 3d 20 30 pStmt->pPrev = 0
14d0: 3b 0a 20 20 72 65 74 75 72 6e 20 30 3b 0a 7d 0a ;. return 0;.}.
14e0: 69 6e 74 20 64 62 5f 70 72 65 70 61 72 65 28 53 int db_prepare(S
14f0: 74 6d 74 20 2a 70 53 74 6d 74 2c 20 63 6f 6e 73 tmt *pStmt, cons
1500: 74 20 63 68 61 72 20 2a 7a 46 6f 72 6d 61 74 2c t char *zFormat,
1510: 20 2e 2e 2e 29 7b 0a 20 20 69 6e 74 20 72 63 3b ...){. int rc;
1520: 0a 20 20 76 61 5f 6c 69 73 74 20 61 70 3b 0a 20 . va_list ap;.
1530: 20 76 61 5f 73 74 61 72 74 28 61 70 2c 20 7a 46 va_start(ap, zF
1540: 6f 72 6d 61 74 29 3b 0a 20 20 72 63 20 3d 20 64 ormat);. rc = d
1550: 62 5f 76 70 72 65 70 61 72 65 28 70 53 74 6d 74 b_vprepare(pStmt
1560: 2c 20 7a 46 6f 72 6d 61 74 2c 20 61 70 29 3b 0a , zFormat, ap);.
1570: 20 20 76 61 5f 65 6e 64 28 61 70 29 3b 0a 20 20 va_end(ap);.
1580: 72 65 74 75 72 6e 20 72 63 3b 0a 7d 0a 69 6e 74 return rc;.}.int
1590: 20 64 62 5f 73 74 61 74 69 63 5f 70 72 65 70 61 db_static_prepa
15a0: 72 65 28 53 74 6d 74 20 2a 70 53 74 6d 74 2c 20 re(Stmt *pStmt,
15b0: 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 46 6f 72 const char *zFor
15c0: 6d 61 74 2c 20 2e 2e 2e 29 7b 0a 20 20 69 6e 74 mat, ...){. int
15d0: 20 72 63 20 3d 20 53 51 4c 49 54 45 5f 4f 4b 3b rc = SQLITE_OK;
15e0: 0a 20 20 69 66 28 20 62 6c 6f 62 5f 73 69 7a 65 . if( blob_size
15f0: 28 26 70 53 74 6d 74 2d 3e 73 71 6c 29 3d 3d 30 (&pStmt->sql)==0
1600: 20 29 7b 0a 20 20 20 20 76 61 5f 6c 69 73 74 20 ){. va_list
1610: 61 70 3b 0a 20 20 20 20 76 61 5f 73 74 61 72 74 ap;. va_start
1620: 28 61 70 2c 20 7a 46 6f 72 6d 61 74 29 3b 0a 20 (ap, zFormat);.
1630: 20 20 20 72 63 20 3d 20 64 62 5f 76 70 72 65 70 rc = db_vprep
1640: 61 72 65 28 70 53 74 6d 74 2c 20 7a 46 6f 72 6d are(pStmt, zForm
1650: 61 74 2c 20 61 70 29 3b 0a 20 20 20 20 70 53 74 at, ap);. pSt
1660: 6d 74 2d 3e 70 4e 65 78 74 20 3d 20 70 41 6c 6c mt->pNext = pAll
1670: 53 74 6d 74 3b 0a 20 20 20 20 70 53 74 6d 74 2d Stmt;. pStmt-
1680: 3e 70 50 72 65 76 20 3d 20 30 3b 0a 20 20 20 20 >pPrev = 0;.
1690: 69 66 28 20 70 41 6c 6c 53 74 6d 74 20 29 20 70 if( pAllStmt ) p
16a0: 41 6c 6c 53 74 6d 74 2d 3e 70 50 72 65 76 20 3d AllStmt->pPrev =
16b0: 20 70 53 74 6d 74 3b 0a 20 20 20 20 70 41 6c 6c pStmt;. pAll
16c0: 53 74 6d 74 20 3d 20 70 53 74 6d 74 3b 0a 20 20 Stmt = pStmt;.
16d0: 20 20 76 61 5f 65 6e 64 28 61 70 29 3b 0a 20 20 va_end(ap);.
16e0: 7d 0a 20 20 72 65 74 75 72 6e 20 72 63 3b 0a 7d }. return rc;.}
16f0: 0a 0a 2f 2a 0a 2a 2a 20 52 65 74 75 72 6e 20 74 ../*.** Return t
1700: 68 65 20 69 6e 64 65 78 20 6f 66 20 61 20 62 69 he index of a bi
1710: 6e 64 20 70 61 72 61 6d 65 74 65 72 0a 2a 2f 0a nd parameter.*/.
1720: 73 74 61 74 69 63 20 69 6e 74 20 70 61 72 61 6d static int param
1730: 49 64 78 28 53 74 6d 74 20 2a 70 53 74 6d 74 2c Idx(Stmt *pStmt,
1740: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 50 61 const char *zPa
1750: 72 61 6d 4e 61 6d 65 29 7b 0a 20 20 69 6e 74 20 ramName){. int
1760: 69 20 3d 20 73 71 6c 69 74 65 33 5f 62 69 6e 64 i = sqlite3_bind
1770: 5f 70 61 72 61 6d 65 74 65 72 5f 69 6e 64 65 78 _parameter_index
1780: 28 70 53 74 6d 74 2d 3e 70 53 74 6d 74 2c 20 7a (pStmt->pStmt, z
1790: 50 61 72 61 6d 4e 61 6d 65 29 3b 0a 20 20 69 66 ParamName);. if
17a0: 28 20 69 3d 3d 30 20 29 7b 0a 20 20 20 20 64 62 ( i==0 ){. db
17b0: 5f 65 72 72 28 22 6e 6f 20 73 75 63 68 20 62 69 _err("no such bi
17c0: 6e 64 20 70 61 72 61 6d 65 74 65 72 3a 20 25 73 nd parameter: %s
17d0: 5c 6e 25 62 22 2c 20 7a 50 61 72 61 6d 4e 61 6d \n%b", zParamNam
17e0: 65 2c 20 26 70 53 74 6d 74 2d 3e 73 71 6c 29 3b e, &pStmt->sql);
17f0: 0a 20 20 7d 0a 20 20 72 65 74 75 72 6e 20 69 3b . }. return i;
1800: 0a 7d 0a 2f 2a 0a 2a 2a 20 42 69 6e 64 20 61 6e .}./*.** Bind an
1810: 20 69 6e 74 65 67 65 72 2c 20 73 74 72 69 6e 67 integer, string
1820: 2c 20 6f 72 20 42 6c 6f 62 20 76 61 6c 75 65 20 , or Blob value
1830: 74 6f 20 61 20 6e 61 6d 65 64 20 70 61 72 61 6d to a named param
1840: 65 74 65 72 2e 0a 2a 2f 0a 69 6e 74 20 64 62 5f eter..*/.int db_
1850: 62 69 6e 64 5f 69 6e 74 28 53 74 6d 74 20 2a 70 bind_int(Stmt *p
1860: 53 74 6d 74 2c 20 63 6f 6e 73 74 20 63 68 61 72 Stmt, const char
1870: 20 2a 7a 50 61 72 61 6d 4e 61 6d 65 2c 20 69 6e *zParamName, in
1880: 74 20 69 56 61 6c 75 65 29 7b 0a 20 20 72 65 74 t iValue){. ret
1890: 75 72 6e 20 73 71 6c 69 74 65 33 5f 62 69 6e 64 urn sqlite3_bind
18a0: 5f 69 6e 74 28 70 53 74 6d 74 2d 3e 70 53 74 6d _int(pStmt->pStm
18b0: 74 2c 20 70 61 72 61 6d 49 64 78 28 70 53 74 6d t, paramIdx(pStm
18c0: 74 2c 20 7a 50 61 72 61 6d 4e 61 6d 65 29 2c 20 t, zParamName),
18d0: 69 56 61 6c 75 65 29 3b 0a 7d 0a 69 6e 74 20 64 iValue);.}.int d
18e0: 62 5f 62 69 6e 64 5f 69 6e 74 36 34 28 53 74 6d b_bind_int64(Stm
18f0: 74 20 2a 70 53 74 6d 74 2c 20 63 6f 6e 73 74 20 t *pStmt, const
1900: 63 68 61 72 20 2a 7a 50 61 72 61 6d 4e 61 6d 65 char *zParamName
1910: 2c 20 69 36 34 20 69 56 61 6c 75 65 29 7b 0a 20 , i64 iValue){.
1920: 20 72 65 74 75 72 6e 20 73 71 6c 69 74 65 33 5f return sqlite3_
1930: 62 69 6e 64 5f 69 6e 74 36 34 28 70 53 74 6d 74 bind_int64(pStmt
1940: 2d 3e 70 53 74 6d 74 2c 20 70 61 72 61 6d 49 64 ->pStmt, paramId
1950: 78 28 70 53 74 6d 74 2c 20 7a 50 61 72 61 6d 4e x(pStmt, zParamN
1960: 61 6d 65 29 2c 20 69 56 61 6c 75 65 29 3b 0a 7d ame), iValue);.}
1970: 0a 69 6e 74 20 64 62 5f 62 69 6e 64 5f 64 6f 75 .int db_bind_dou
1980: 62 6c 65 28 53 74 6d 74 20 2a 70 53 74 6d 74 2c ble(Stmt *pStmt,
1990: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 50 61 const char *zPa
19a0: 72 61 6d 4e 61 6d 65 2c 20 64 6f 75 62 6c 65 20 ramName, double
19b0: 72 56 61 6c 75 65 29 7b 0a 20 20 72 65 74 75 72 rValue){. retur
19c0: 6e 20 73 71 6c 69 74 65 33 5f 62 69 6e 64 5f 64 n sqlite3_bind_d
19d0: 6f 75 62 6c 65 28 70 53 74 6d 74 2d 3e 70 53 74 ouble(pStmt->pSt
19e0: 6d 74 2c 20 70 61 72 61 6d 49 64 78 28 70 53 74 mt, paramIdx(pSt
19f0: 6d 74 2c 20 7a 50 61 72 61 6d 4e 61 6d 65 29 2c mt, zParamName),
1a00: 20 72 56 61 6c 75 65 29 3b 0a 7d 0a 69 6e 74 20 rValue);.}.int
1a10: 64 62 5f 62 69 6e 64 5f 74 65 78 74 28 53 74 6d db_bind_text(Stm
1a20: 74 20 2a 70 53 74 6d 74 2c 20 63 6f 6e 73 74 20 t *pStmt, const
1a30: 63 68 61 72 20 2a 7a 50 61 72 61 6d 4e 61 6d 65 char *zParamName
1a40: 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 56 , const char *zV
1a50: 61 6c 75 65 29 7b 0a 20 20 72 65 74 75 72 6e 20 alue){. return
1a60: 73 71 6c 69 74 65 33 5f 62 69 6e 64 5f 74 65 78 sqlite3_bind_tex
1a70: 74 28 70 53 74 6d 74 2d 3e 70 53 74 6d 74 2c 20 t(pStmt->pStmt,
1a80: 70 61 72 61 6d 49 64 78 28 70 53 74 6d 74 2c 20 paramIdx(pStmt,
1a90: 7a 50 61 72 61 6d 4e 61 6d 65 29 2c 20 7a 56 61 zParamName), zVa
1aa0: 6c 75 65 2c 0a 20 20 20 20 20 20 20 20 20 20 20 lue,.
1ab0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
1ac0: 2d 31 2c 20 53 51 4c 49 54 45 5f 53 54 41 54 49 -1, SQLITE_STATI
1ad0: 43 29 3b 0a 7d 0a 69 6e 74 20 64 62 5f 62 69 6e C);.}.int db_bin
1ae0: 64 5f 6e 75 6c 6c 28 53 74 6d 74 20 2a 70 53 74 d_null(Stmt *pSt
1af0: 6d 74 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a mt, const char *
1b00: 7a 50 61 72 61 6d 4e 61 6d 65 29 7b 0a 20 20 72 zParamName){. r
1b10: 65 74 75 72 6e 20 73 71 6c 69 74 65 33 5f 62 69 eturn sqlite3_bi
1b20: 6e 64 5f 6e 75 6c 6c 28 70 53 74 6d 74 2d 3e 70 nd_null(pStmt->p
1b30: 53 74 6d 74 2c 20 70 61 72 61 6d 49 64 78 28 70 Stmt, paramIdx(p
1b40: 53 74 6d 74 2c 20 7a 50 61 72 61 6d 4e 61 6d 65 Stmt, zParamName
1b50: 29 29 3b 0a 7d 0a 69 6e 74 20 64 62 5f 62 69 6e ));.}.int db_bin
1b60: 64 5f 62 6c 6f 62 28 53 74 6d 74 20 2a 70 53 74 d_blob(Stmt *pSt
1b70: 6d 74 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a mt, const char *
1b80: 7a 50 61 72 61 6d 4e 61 6d 65 2c 20 42 6c 6f 62 zParamName, Blob
1b90: 20 2a 70 42 6c 6f 62 29 7b 0a 20 20 72 65 74 75 *pBlob){. retu
1ba0: 72 6e 20 73 71 6c 69 74 65 33 5f 62 69 6e 64 5f rn sqlite3_bind_
1bb0: 62 6c 6f 62 28 70 53 74 6d 74 2d 3e 70 53 74 6d blob(pStmt->pStm
1bc0: 74 2c 20 70 61 72 61 6d 49 64 78 28 70 53 74 6d t, paramIdx(pStm
1bd0: 74 2c 20 7a 50 61 72 61 6d 4e 61 6d 65 29 2c 0a t, zParamName),.
1be0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
1bf0: 20 20 20 20 20 20 20 20 20 20 62 6c 6f 62 5f 62 blob_b
1c00: 75 66 66 65 72 28 70 42 6c 6f 62 29 2c 20 62 6c uffer(pBlob), bl
1c10: 6f 62 5f 73 69 7a 65 28 70 42 6c 6f 62 29 2c 20 ob_size(pBlob),
1c20: 53 51 4c 49 54 45 5f 53 54 41 54 49 43 29 3b 0a SQLITE_STATIC);.
1c30: 7d 0a 0a 2f 2a 20 62 69 6e 64 5f 73 74 72 28 29 }../* bind_str()
1c40: 20 74 72 65 61 74 73 20 61 20 42 6c 6f 62 20 6f treats a Blob o
1c50: 62 6a 65 63 74 20 6c 69 6b 65 20 61 20 54 45 58 bject like a TEX
1c60: 54 20 73 74 72 69 6e 67 20 61 6e 64 20 62 69 6e T string and bin
1c70: 64 73 20 69 74 0a 2a 2a 20 74 6f 20 74 68 65 20 ds it.** to the
1c80: 53 51 4c 20 76 61 72 69 61 62 6c 65 2e 20 20 43 SQL variable. C
1c90: 6f 6e 73 74 72 61 73 74 20 74 68 69 73 20 74 6f onstrast this to
1ca0: 20 62 69 6e 64 5f 62 6c 6f 62 28 29 20 77 68 69 bind_blob() whi
1cb0: 63 68 20 74 72 65 61 74 73 0a 2a 2a 20 74 68 65 ch treats.** the
1cc0: 20 42 6c 6f 62 20 6f 62 6a 65 63 74 20 6c 69 6b Blob object lik
1cd0: 65 20 61 6e 20 53 51 4c 20 42 4c 4f 42 2e 0a 2a e an SQL BLOB..*
1ce0: 2f 0a 69 6e 74 20 64 62 5f 62 69 6e 64 5f 73 74 /.int db_bind_st
1cf0: 72 28 53 74 6d 74 20 2a 70 53 74 6d 74 2c 20 63 r(Stmt *pStmt, c
1d00: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 50 61 72 61 onst char *zPara
1d10: 6d 4e 61 6d 65 2c 20 42 6c 6f 62 20 2a 70 42 6c mName, Blob *pBl
1d20: 6f 62 29 7b 0a 20 20 72 65 74 75 72 6e 20 73 71 ob){. return sq
1d30: 6c 69 74 65 33 5f 62 69 6e 64 5f 74 65 78 74 28 lite3_bind_text(
1d40: 70 53 74 6d 74 2d 3e 70 53 74 6d 74 2c 20 70 61 pStmt->pStmt, pa
1d50: 72 61 6d 49 64 78 28 70 53 74 6d 74 2c 20 7a 50 ramIdx(pStmt, zP
1d60: 61 72 61 6d 4e 61 6d 65 29 2c 0a 20 20 20 20 20 aramName),.
1d70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
1d80: 20 20 20 20 20 62 6c 6f 62 5f 62 75 66 66 65 72 blob_buffer
1d90: 28 70 42 6c 6f 62 29 2c 20 62 6c 6f 62 5f 73 69 (pBlob), blob_si
1da0: 7a 65 28 70 42 6c 6f 62 29 2c 20 53 51 4c 49 54 ze(pBlob), SQLIT
1db0: 45 5f 53 54 41 54 49 43 29 3b 0a 7d 0a 0a 2f 2a E_STATIC);.}../*
1dc0: 0a 2a 2a 20 53 74 65 70 20 74 68 65 20 53 51 4c .** Step the SQL
1dd0: 20 73 74 61 74 65 6d 65 6e 74 2e 20 20 52 65 74 statement. Ret
1de0: 75 72 6e 20 65 69 74 68 65 72 20 53 51 4c 49 54 urn either SQLIT
1df0: 45 5f 52 4f 57 20 6f 72 20 61 6e 20 65 72 72 6f E_ROW or an erro
1e00: 72 20 63 6f 64 65 0a 2a 2a 20 6f 72 20 53 51 4c r code.** or SQL
1e10: 49 54 45 5f 4f 4b 20 69 66 20 74 68 65 20 73 74 ITE_OK if the st
1e20: 61 74 65 6d 65 6e 74 20 66 69 6e 69 73 68 65 73 atement finishes
1e30: 20 73 75 63 63 65 73 73 66 75 6c 6c 79 2e 0a 2a successfully..*
1e40: 2f 0a 69 6e 74 20 64 62 5f 73 74 65 70 28 53 74 /.int db_step(St
1e50: 6d 74 20 2a 70 53 74 6d 74 29 7b 0a 20 20 69 6e mt *pStmt){. in
1e60: 74 20 72 63 3b 0a 20 20 72 63 20 3d 20 73 71 6c t rc;. rc = sql
1e70: 69 74 65 33 5f 73 74 65 70 28 70 53 74 6d 74 2d ite3_step(pStmt-
1e80: 3e 70 53 74 6d 74 29 3b 0a 20 20 72 65 74 75 72 >pStmt);. retur
1e90: 6e 20 72 63 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 52 n rc;.}../*.** R
1ea0: 65 73 65 74 20 6f 72 20 66 69 6e 61 6c 69 7a 65 eset or finalize
1eb0: 20 61 20 73 74 61 74 65 6d 65 6e 74 2e 0a 2a 2f a statement..*/
1ec0: 0a 69 6e 74 20 64 62 5f 72 65 73 65 74 28 53 74 .int db_reset(St
1ed0: 6d 74 20 2a 70 53 74 6d 74 29 7b 0a 20 20 69 6e mt *pStmt){. in
1ee0: 74 20 72 63 20 3d 20 73 71 6c 69 74 65 33 5f 72 t rc = sqlite3_r
1ef0: 65 73 65 74 28 70 53 74 6d 74 2d 3e 70 53 74 6d eset(pStmt->pStm
1f00: 74 29 3b 0a 20 20 64 62 5f 63 68 65 63 6b 5f 72 t);. db_check_r
1f10: 65 73 75 6c 74 28 72 63 29 3b 0a 20 20 72 65 74 esult(rc);. ret
1f20: 75 72 6e 20 72 63 3b 0a 7d 0a 69 6e 74 20 64 62 urn rc;.}.int db
1f30: 5f 66 69 6e 61 6c 69 7a 65 28 53 74 6d 74 20 2a _finalize(Stmt *
1f40: 70 53 74 6d 74 29 7b 0a 20 20 69 6e 74 20 72 63 pStmt){. int rc
1f50: 3b 0a 20 20 62 6c 6f 62 5f 72 65 73 65 74 28 26 ;. blob_reset(&
1f60: 70 53 74 6d 74 2d 3e 73 71 6c 29 3b 0a 20 20 72 pStmt->sql);. r
1f70: 63 20 3d 20 73 71 6c 69 74 65 33 5f 66 69 6e 61 c = sqlite3_fina
1f80: 6c 69 7a 65 28 70 53 74 6d 74 2d 3e 70 53 74 6d lize(pStmt->pStm
1f90: 74 29 3b 0a 20 20 64 62 5f 63 68 65 63 6b 5f 72 t);. db_check_r
1fa0: 65 73 75 6c 74 28 72 63 29 3b 0a 20 20 70 53 74 esult(rc);. pSt
1fb0: 6d 74 2d 3e 70 53 74 6d 74 20 3d 20 30 3b 0a 20 mt->pStmt = 0;.
1fc0: 20 69 66 28 20 70 53 74 6d 74 2d 3e 70 4e 65 78 if( pStmt->pNex
1fd0: 74 20 29 7b 0a 20 20 20 20 70 53 74 6d 74 2d 3e t ){. pStmt->
1fe0: 70 4e 65 78 74 2d 3e 70 50 72 65 76 20 3d 20 70 pNext->pPrev = p
1ff0: 53 74 6d 74 2d 3e 70 50 72 65 76 3b 0a 20 20 7d Stmt->pPrev;. }
2000: 0a 20 20 69 66 28 20 70 53 74 6d 74 2d 3e 70 50 . if( pStmt->pP
2010: 72 65 76 20 29 7b 0a 20 20 20 20 70 53 74 6d 74 rev ){. pStmt
2020: 2d 3e 70 50 72 65 76 2d 3e 70 4e 65 78 74 20 3d ->pPrev->pNext =
2030: 20 70 53 74 6d 74 2d 3e 70 4e 65 78 74 3b 0a 20 pStmt->pNext;.
2040: 20 7d 65 6c 73 65 20 69 66 28 20 70 41 6c 6c 53 }else if( pAllS
2050: 74 6d 74 3d 3d 70 53 74 6d 74 20 29 7b 0a 20 20 tmt==pStmt ){.
2060: 20 20 70 41 6c 6c 53 74 6d 74 20 3d 20 70 53 74 pAllStmt = pSt
2070: 6d 74 2d 3e 70 4e 65 78 74 3b 0a 20 20 7d 0a 20 mt->pNext;. }.
2080: 20 70 53 74 6d 74 2d 3e 70 4e 65 78 74 20 3d 20 pStmt->pNext =
2090: 30 3b 0a 20 20 70 53 74 6d 74 2d 3e 70 50 72 65 0;. pStmt->pPre
20a0: 76 20 3d 20 30 3b 0a 20 20 72 65 74 75 72 6e 20 v = 0;. return
20b0: 72 63 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65 74 rc;.}../*.** Ret
20c0: 75 72 6e 20 74 68 65 20 72 6f 77 69 64 20 6f 66 urn the rowid of
20d0: 20 74 68 65 20 6d 6f 73 74 20 72 65 63 65 6e 74 the most recent
20e0: 20 69 6e 73 65 72 74 0a 2a 2f 0a 69 36 34 20 64 insert.*/.i64 d
20f0: 62 5f 6c 61 73 74 5f 69 6e 73 65 72 74 5f 72 6f b_last_insert_ro
2100: 77 69 64 28 76 6f 69 64 29 7b 0a 20 20 72 65 74 wid(void){. ret
2110: 75 72 6e 20 73 71 6c 69 74 65 33 5f 6c 61 73 74 urn sqlite3_last
2120: 5f 69 6e 73 65 72 74 5f 72 6f 77 69 64 28 67 2e _insert_rowid(g.
2130: 64 62 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65 db);.}../*.** Re
2140: 74 75 72 6e 20 74 68 65 20 6e 75 6d 62 65 72 20 turn the number
2150: 6f 66 20 72 6f 77 73 20 74 68 61 74 20 77 65 72 of rows that wer
2160: 65 20 63 68 61 6e 67 65 64 20 62 79 20 74 68 65 e changed by the
2170: 20 6d 6f 73 74 20 72 65 63 65 6e 74 0a 2a 2a 20 most recent.**
2180: 49 4e 53 45 52 54 2c 20 55 50 44 41 54 45 2c 20 INSERT, UPDATE,
2190: 6f 72 20 44 45 4c 45 54 45 2e 20 20 41 75 78 69 or DELETE. Auxi
21a0: 6c 69 61 72 79 20 63 68 61 6e 67 65 73 20 63 61 liary changes ca
21b0: 75 73 65 64 20 62 79 20 74 72 69 67 67 65 72 73 used by triggers
21c0: 0a 2a 2a 20 6f 72 20 6f 74 68 65 72 20 73 69 64 .** or other sid
21d0: 65 20 65 66 66 65 63 74 73 20 61 72 65 20 6e 6f e effects are no
21e0: 74 20 63 6f 75 6e 74 65 64 2e 0a 2a 2f 0a 69 6e t counted..*/.in
21f0: 74 20 64 62 5f 63 68 61 6e 67 65 73 28 76 6f 69 t db_changes(voi
2200: 64 29 7b 0a 20 20 72 65 74 75 72 6e 20 73 71 6c d){. return sql
2210: 69 74 65 33 5f 63 68 61 6e 67 65 73 28 67 2e 64 ite3_changes(g.d
2220: 62 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 45 78 74 b);.}../*.** Ext
2230: 72 61 63 74 20 74 65 78 74 2c 20 69 6e 74 65 67 ract text, integ
2240: 65 72 2c 20 6f 72 20 62 6c 6f 62 20 76 61 6c 75 er, or blob valu
2250: 65 73 20 66 72 6f 6d 20 74 68 65 20 4e 2d 74 68 es from the N-th
2260: 20 63 6f 6c 75 6d 6e 20 6f 66 20 74 68 65 0a 2a column of the.*
2270: 2a 20 63 75 72 72 65 6e 74 20 72 6f 77 2e 0a 2a * current row..*
2280: 2f 0a 69 6e 74 20 64 62 5f 63 6f 6c 75 6d 6e 5f /.int db_column_
2290: 62 79 74 65 73 28 53 74 6d 74 20 2a 70 53 74 6d bytes(Stmt *pStm
22a0: 74 2c 20 69 6e 74 20 4e 29 7b 0a 20 20 72 65 74 t, int N){. ret
22b0: 75 72 6e 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 urn sqlite3_colu
22c0: 6d 6e 5f 62 79 74 65 73 28 70 53 74 6d 74 2d 3e mn_bytes(pStmt->
22d0: 70 53 74 6d 74 2c 20 4e 29 3b 0a 7d 0a 69 6e 74 pStmt, N);.}.int
22e0: 20 64 62 5f 63 6f 6c 75 6d 6e 5f 69 6e 74 28 53 db_column_int(S
22f0: 74 6d 74 20 2a 70 53 74 6d 74 2c 20 69 6e 74 20 tmt *pStmt, int
2300: 4e 29 7b 0a 20 20 72 65 74 75 72 6e 20 73 71 6c N){. return sql
2310: 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 69 6e 74 28 ite3_column_int(
2320: 70 53 74 6d 74 2d 3e 70 53 74 6d 74 2c 20 4e 29 pStmt->pStmt, N)
2330: 3b 0a 7d 0a 69 36 34 20 64 62 5f 63 6f 6c 75 6d ;.}.i64 db_colum
2340: 6e 5f 69 6e 74 36 34 28 53 74 6d 74 20 2a 70 53 n_int64(Stmt *pS
2350: 74 6d 74 2c 20 69 6e 74 20 4e 29 7b 0a 20 20 72 tmt, int N){. r
2360: 65 74 75 72 6e 20 73 71 6c 69 74 65 33 5f 63 6f eturn sqlite3_co
2370: 6c 75 6d 6e 5f 69 6e 74 36 34 28 70 53 74 6d 74 lumn_int64(pStmt
2380: 2d 3e 70 53 74 6d 74 2c 20 4e 29 3b 0a 7d 0a 64 ->pStmt, N);.}.d
2390: 6f 75 62 6c 65 20 64 62 5f 63 6f 6c 75 6d 6e 5f ouble db_column_
23a0: 64 6f 75 62 6c 65 28 53 74 6d 74 20 2a 70 53 74 double(Stmt *pSt
23b0: 6d 74 2c 20 69 6e 74 20 4e 29 7b 0a 20 20 72 65 mt, int N){. re
23c0: 74 75 72 6e 20 73 71 6c 69 74 65 33 5f 63 6f 6c turn sqlite3_col
23d0: 75 6d 6e 5f 64 6f 75 62 6c 65 28 70 53 74 6d 74 umn_double(pStmt
23e0: 2d 3e 70 53 74 6d 74 2c 20 4e 29 3b 0a 7d 0a 63 ->pStmt, N);.}.c
23f0: 6f 6e 73 74 20 63 68 61 72 20 2a 64 62 5f 63 6f onst char *db_co
2400: 6c 75 6d 6e 5f 74 65 78 74 28 53 74 6d 74 20 2a lumn_text(Stmt *
2410: 70 53 74 6d 74 2c 20 69 6e 74 20 4e 29 7b 0a 20 pStmt, int N){.
2420: 20 72 65 74 75 72 6e 20 28 63 68 61 72 2a 29 73 return (char*)s
2430: 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 74 65 qlite3_column_te
2440: 78 74 28 70 53 74 6d 74 2d 3e 70 53 74 6d 74 2c xt(pStmt->pStmt,
2450: 20 4e 29 3b 0a 7d 0a 63 6f 6e 73 74 20 63 68 61 N);.}.const cha
2460: 72 20 2a 64 62 5f 63 6f 6c 75 6d 6e 5f 6e 61 6d r *db_column_nam
2470: 65 28 53 74 6d 74 20 2a 70 53 74 6d 74 2c 20 69 e(Stmt *pStmt, i
2480: 6e 74 20 4e 29 7b 0a 20 20 72 65 74 75 72 6e 20 nt N){. return
2490: 28 63 68 61 72 2a 29 73 71 6c 69 74 65 33 5f 63 (char*)sqlite3_c
24a0: 6f 6c 75 6d 6e 5f 6e 61 6d 65 28 70 53 74 6d 74 olumn_name(pStmt
24b0: 2d 3e 70 53 74 6d 74 2c 20 4e 29 3b 0a 7d 0a 69 ->pStmt, N);.}.i
24c0: 6e 74 20 64 62 5f 63 6f 6c 75 6d 6e 5f 63 6f 75 nt db_column_cou
24d0: 6e 74 28 53 74 6d 74 20 2a 70 53 74 6d 74 29 7b nt(Stmt *pStmt){
24e0: 0a 20 20 72 65 74 75 72 6e 20 73 71 6c 69 74 65 . return sqlite
24f0: 33 5f 63 6f 6c 75 6d 6e 5f 63 6f 75 6e 74 28 70 3_column_count(p
2500: 53 74 6d 74 2d 3e 70 53 74 6d 74 29 3b 0a 7d 0a Stmt->pStmt);.}.
2510: 63 68 61 72 20 2a 64 62 5f 63 6f 6c 75 6d 6e 5f char *db_column_
2520: 6d 61 6c 6c 6f 63 28 53 74 6d 74 20 2a 70 53 74 malloc(Stmt *pSt
2530: 6d 74 2c 20 69 6e 74 20 4e 29 7b 0a 20 20 72 65 mt, int N){. re
2540: 74 75 72 6e 20 6d 70 72 69 6e 74 66 28 22 25 73 turn mprintf("%s
2550: 22 2c 20 64 62 5f 63 6f 6c 75 6d 6e 5f 74 65 78 ", db_column_tex
2560: 74 28 70 53 74 6d 74 2c 20 4e 29 29 3b 0a 7d 0a t(pStmt, N));.}.
2570: 76 6f 69 64 20 64 62 5f 63 6f 6c 75 6d 6e 5f 62 void db_column_b
2580: 6c 6f 62 28 53 74 6d 74 20 2a 70 53 74 6d 74 2c lob(Stmt *pStmt,
2590: 20 69 6e 74 20 4e 2c 20 42 6c 6f 62 20 2a 70 42 int N, Blob *pB
25a0: 6c 6f 62 29 7b 0a 20 20 62 6c 6f 62 5f 61 70 70 lob){. blob_app
25b0: 65 6e 64 28 70 42 6c 6f 62 2c 20 73 71 6c 69 74 end(pBlob, sqlit
25c0: 65 33 5f 63 6f 6c 75 6d 6e 5f 62 6c 6f 62 28 70 e3_column_blob(p
25d0: 53 74 6d 74 2d 3e 70 53 74 6d 74 2c 20 4e 29 2c Stmt->pStmt, N),
25e0: 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 . s
25f0: 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 62 79 qlite3_column_by
2600: 74 65 73 28 70 53 74 6d 74 2d 3e 70 53 74 6d 74 tes(pStmt->pStmt
2610: 2c 20 4e 29 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 , N));.}../*.**
2620: 49 6e 69 74 69 61 6c 69 7a 65 20 61 20 62 6c 6f Initialize a blo
2630: 62 20 74 6f 20 61 6e 20 65 70 68 65 72 6d 65 72 b to an ephermer
2640: 61 6c 20 63 6f 70 79 20 6f 66 20 74 68 65 20 63 al copy of the c
2650: 6f 6e 74 65 6e 74 20 6f 66 20 61 0a 2a 2a 20 63 ontent of a.** c
2660: 6f 6c 75 6d 6e 20 69 6e 20 74 68 65 20 63 75 72 olumn in the cur
2670: 72 65 6e 74 20 72 6f 77 2e 20 20 54 68 65 20 64 rent row. The d
2680: 61 74 61 20 69 6e 20 74 68 65 20 62 6c 6f 62 20 ata in the blob
2690: 77 69 6c 6c 20 62 65 63 6f 6d 65 0a 2a 2a 20 69 will become.** i
26a0: 6e 76 61 6c 69 64 20 77 68 65 6e 20 74 68 65 20 nvalid when the
26b0: 73 74 61 74 65 6d 65 6e 74 20 69 73 20 73 74 65 statement is ste
26c0: 70 70 65 64 20 6f 72 20 72 65 73 65 74 2e 0a 2a pped or reset..*
26d0: 2f 0a 76 6f 69 64 20 64 62 5f 65 70 68 65 6d 65 /.void db_epheme
26e0: 72 61 6c 5f 62 6c 6f 62 28 53 74 6d 74 20 2a 70 ral_blob(Stmt *p
26f0: 53 74 6d 74 2c 20 69 6e 74 20 4e 2c 20 42 6c 6f Stmt, int N, Blo
2700: 62 20 2a 70 42 6c 6f 62 29 7b 0a 20 20 62 6c 6f b *pBlob){. blo
2710: 62 5f 69 6e 69 74 28 70 42 6c 6f 62 2c 20 73 71 b_init(pBlob, sq
2720: 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 62 6c 6f lite3_column_blo
2730: 62 28 70 53 74 6d 74 2d 3e 70 53 74 6d 74 2c 20 b(pStmt->pStmt,
2740: 4e 29 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 N),.
2750: 20 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e sqlite3_column
2760: 5f 62 79 74 65 73 28 70 53 74 6d 74 2d 3e 70 53 _bytes(pStmt->pS
2770: 74 6d 74 2c 20 4e 29 29 3b 0a 7d 0a 0a 2f 2a 0a tmt, N));.}../*.
2780: 2a 2a 20 43 68 65 63 6b 20 61 20 72 65 73 75 6c ** Check a resul
2790: 74 20 63 6f 64 65 2e 20 20 49 66 20 69 74 20 69 t code. If it i
27a0: 73 20 6e 6f 74 20 53 51 4c 49 54 45 5f 4f 4b 2c s not SQLITE_OK,
27b0: 20 70 72 69 6e 74 20 74 68 65 0a 2a 2a 20 63 6f print the.** co
27c0: 72 72 65 73 70 6f 6e 64 69 6e 67 20 65 72 72 6f rresponding erro
27d0: 72 20 6d 65 73 73 61 67 65 20 61 6e 64 20 65 78 r message and ex
27e0: 69 74 2e 0a 2a 2f 0a 76 6f 69 64 20 64 62 5f 63 it..*/.void db_c
27f0: 68 65 63 6b 5f 72 65 73 75 6c 74 28 69 6e 74 20 heck_result(int
2800: 72 63 29 7b 0a 20 20 69 66 28 20 72 63 21 3d 53 rc){. if( rc!=S
2810: 51 4c 49 54 45 5f 4f 4b 20 29 7b 0a 20 20 20 20 QLITE_OK ){.
2820: 64 62 5f 65 72 72 28 22 53 51 4c 20 65 72 72 6f db_err("SQL erro
2830: 72 3a 20 25 73 22 2c 20 73 71 6c 69 74 65 33 5f r: %s", sqlite3_
2840: 65 72 72 6d 73 67 28 67 2e 64 62 29 29 3b 0a 20 errmsg(g.db));.
2850: 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 45 78 65 63 }.}../*.** Exec
2860: 75 74 65 20 61 20 73 69 6e 67 6c 65 20 70 72 65 ute a single pre
2870: 70 61 72 65 64 20 73 74 61 74 65 6d 65 6e 74 20 pared statement
2880: 75 6e 74 69 6c 20 69 74 20 66 69 6e 69 73 68 65 until it finishe
2890: 73 2e 0a 2a 2f 0a 69 6e 74 20 64 62 5f 65 78 65 s..*/.int db_exe
28a0: 63 28 53 74 6d 74 20 2a 70 53 74 6d 74 29 7b 0a c(Stmt *pStmt){.
28b0: 20 20 69 6e 74 20 72 63 3b 0a 20 20 77 68 69 6c int rc;. whil
28c0: 65 28 20 28 72 63 20 3d 20 64 62 5f 73 74 65 70 e( (rc = db_step
28d0: 28 70 53 74 6d 74 29 29 3d 3d 53 51 4c 49 54 45 (pStmt))==SQLITE
28e0: 5f 52 4f 57 20 29 7b 7d 0a 20 20 72 63 20 3d 20 _ROW ){}. rc =
28f0: 64 62 5f 72 65 73 65 74 28 70 53 74 6d 74 29 3b db_reset(pStmt);
2900: 0a 20 20 64 62 5f 63 68 65 63 6b 5f 72 65 73 75 . db_check_resu
2910: 6c 74 28 72 63 29 3b 0a 20 20 72 65 74 75 72 6e lt(rc);. return
2920: 20 72 63 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 45 78 rc;.}../*.** Ex
2930: 65 63 75 74 65 20 6d 75 6c 74 69 70 6c 65 20 53 ecute multiple S
2940: 51 4c 20 73 74 61 74 65 6d 65 6e 74 73 2e 0a 2a QL statements..*
2950: 2f 0a 69 6e 74 20 64 62 5f 6d 75 6c 74 69 5f 65 /.int db_multi_e
2960: 78 65 63 28 63 6f 6e 73 74 20 63 68 61 72 20 2a xec(const char *
2970: 7a 53 71 6c 2c 20 2e 2e 2e 29 7b 0a 20 20 42 6c zSql, ...){. Bl
2980: 6f 62 20 73 71 6c 3b 0a 20 20 69 6e 74 20 72 63 ob sql;. int rc
2990: 3b 0a 20 20 76 61 5f 6c 69 73 74 20 61 70 3b 0a ;. va_list ap;.
29a0: 20 20 63 68 61 72 20 2a 7a 45 72 72 20 3d 20 30 char *zErr = 0
29b0: 3b 0a 20 20 62 6c 6f 62 5f 69 6e 69 74 28 26 73 ;. blob_init(&s
29c0: 71 6c 2c 20 30 2c 20 30 29 3b 0a 20 20 76 61 5f ql, 0, 0);. va_
29d0: 73 74 61 72 74 28 61 70 2c 20 7a 53 71 6c 29 3b start(ap, zSql);
29e0: 0a 20 20 62 6c 6f 62 5f 76 61 70 70 65 6e 64 66 . blob_vappendf
29f0: 28 26 73 71 6c 2c 20 7a 53 71 6c 2c 20 61 70 29 (&sql, zSql, ap)
2a00: 3b 0a 20 20 76 61 5f 65 6e 64 28 61 70 29 3b 0a ;. va_end(ap);.
2a10: 20 20 72 63 20 3d 20 73 71 6c 69 74 65 33 5f 65 rc = sqlite3_e
2a20: 78 65 63 28 67 2e 64 62 2c 20 62 6c 6f 62 5f 62 xec(g.db, blob_b
2a30: 75 66 66 65 72 28 26 73 71 6c 29 2c 20 30 2c 20 uffer(&sql), 0,
2a40: 30 2c 20 26 7a 45 72 72 29 3b 0a 20 20 69 66 28 0, &zErr);. if(
2a50: 20 72 63 21 3d 53 51 4c 49 54 45 5f 4f 4b 20 29 rc!=SQLITE_OK )
2a60: 7b 0a 20 20 20 20 64 62 5f 65 72 72 28 22 25 73 {. db_err("%s
2a70: 5c 6e 25 73 22 2c 20 7a 45 72 72 2c 20 62 6c 6f \n%s", zErr, blo
2a80: 62 5f 62 75 66 66 65 72 28 26 73 71 6c 29 29 3b b_buffer(&sql));
2a90: 0a 20 20 7d 0a 20 20 62 6c 6f 62 5f 72 65 73 65 . }. blob_rese
2aa0: 74 28 26 73 71 6c 29 3b 0a 20 20 72 65 74 75 72 t(&sql);. retur
2ab0: 6e 20 72 63 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 45 n rc;.}../*.** E
2ac0: 78 65 63 75 74 65 20 61 20 71 75 65 72 79 20 61 xecute a query a
2ad0: 6e 64 20 72 65 74 75 72 6e 20 61 20 73 69 6e 67 nd return a sing
2ae0: 6c 65 20 69 6e 74 65 67 65 72 20 76 61 6c 75 65 le integer value
2af0: 2e 0a 2a 2f 0a 69 36 34 20 64 62 5f 69 6e 74 36 ..*/.i64 db_int6
2b00: 34 28 69 36 34 20 69 44 66 6c 74 2c 20 63 6f 6e 4(i64 iDflt, con
2b10: 73 74 20 63 68 61 72 20 2a 7a 53 71 6c 2c 20 2e st char *zSql, .
2b20: 2e 2e 29 7b 0a 20 20 76 61 5f 6c 69 73 74 20 61 ..){. va_list a
2b30: 70 3b 0a 20 20 53 74 6d 74 20 73 3b 0a 20 20 69 p;. Stmt s;. i
2b40: 36 34 20 72 63 3b 0a 20 20 76 61 5f 73 74 61 72 64 rc;. va_star
2b50: 74 28 61 70 2c 20 7a 53 71 6c 29 3b 0a 20 20 64 t(ap, zSql);. d
2b60: 62 5f 76 70 72 65 70 61 72 65 28 26 73 2c 20 7a b_vprepare(&s, z
2b70: 53 71 6c 2c 20 61 70 29 3b 0a 20 20 76 61 5f 65 Sql, ap);. va_e
2b80: 6e 64 28 61 70 29 3b 0a 20 20 69 66 28 20 64 62 nd(ap);. if( db
2b90: 5f 73 74 65 70 28 26 73 29 21 3d 53 51 4c 49 54 _step(&s)!=SQLIT
2ba0: 45 5f 52 4f 57 20 29 7b 0a 20 20 20 20 72 63 20 E_ROW ){. rc
2bb0: 3d 20 69 44 66 6c 74 3b 0a 20 20 7d 65 6c 73 65 = iDflt;. }else
2bc0: 7b 0a 20 20 20 20 72 63 20 3d 20 64 62 5f 63 6f {. rc = db_co
2bd0: 6c 75 6d 6e 5f 69 6e 74 36 34 28 26 73 2c 20 30 lumn_int64(&s, 0
2be0: 29 3b 0a 20 20 7d 0a 20 20 64 62 5f 66 69 6e 61 );. }. db_fina
2bf0: 6c 69 7a 65 28 26 73 29 3b 0a 20 20 72 65 74 75 lize(&s);. retu
2c00: 72 6e 20 72 63 3b 0a 7d 0a 69 6e 74 20 64 62 5f rn rc;.}.int db_
2c10: 69 6e 74 28 69 6e 74 20 69 44 66 6c 74 2c 20 63 int(int iDflt, c
2c20: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 53 71 6c 2c onst char *zSql,
2c30: 20 2e 2e 2e 29 7b 0a 20 20 76 61 5f 6c 69 73 74 ...){. va_list
2c40: 20 61 70 3b 0a 20 20 53 74 6d 74 20 73 3b 0a 20 ap;. Stmt s;.
2c50: 20 69 6e 74 20 72 63 3b 0a 20 20 76 61 5f 73 74 int rc;. va_st
2c60: 61 72 74 28 61 70 2c 20 7a 53 71 6c 29 3b 0a 20 art(ap, zSql);.
2c70: 20 64 62 5f 76 70 72 65 70 61 72 65 28 26 73 2c db_vprepare(&s,
2c80: 20 7a 53 71 6c 2c 20 61 70 29 3b 0a 20 20 76 61 zSql, ap);. va
2c90: 5f 65 6e 64 28 61 70 29 3b 0a 20 20 69 66 28 20 _end(ap);. if(
2ca0: 64 62 5f 73 74 65 70 28 26 73 29 21 3d 53 51 4c db_step(&s)!=SQL
2cb0: 49 54 45 5f 52 4f 57 20 29 7b 0a 20 20 20 20 72 ITE_ROW ){. r
2cc0: 63 20 3d 20 69 44 66 6c 74 3b 0a 20 20 7d 65 6c c = iDflt;. }el
2cd0: 73 65 7b 0a 20 20 20 20 72 63 20 3d 20 64 62 5f se{. rc = db_
2ce0: 63 6f 6c 75 6d 6e 5f 69 6e 74 28 26 73 2c 20 30 column_int(&s, 0
2cf0: 29 3b 0a 20 20 7d 0a 20 20 64 62 5f 66 69 6e 61 );. }. db_fina
2d00: 6c 69 7a 65 28 26 73 29 3b 0a 20 20 72 65 74 75 lize(&s);. retu
2d10: 72 6e 20 72 63 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 rn rc;.}../*.**
2d20: 52 65 74 75 72 6e 20 54 52 55 45 20 69 66 20 74 Return TRUE if t
2d30: 68 65 20 71 75 65 72 79 20 77 6f 75 6c 64 20 72 he query would r
2d40: 65 74 75 72 6e 20 31 20 6f 72 20 6d 6f 72 65 20 eturn 1 or more
2d50: 72 6f 77 73 2e 20 20 52 65 74 75 72 6e 0a 2a 2a rows. Return.**
2d60: 20 46 41 4c 53 45 20 69 66 20 74 68 65 20 71 75 FALSE if the qu
2d70: 65 72 79 20 72 65 73 75 6c 74 20 77 6f 75 6c 64 ery result would
2d80: 20 62 65 20 61 6e 20 65 6d 70 74 79 20 73 65 74 be an empty set
2d90: 2e 0a 2a 2f 0a 69 6e 74 20 64 62 5f 65 78 69 73 ..*/.int db_exis
2da0: 74 73 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a ts(const char *z
2db0: 53 71 6c 2c 20 2e 2e 2e 29 7b 0a 20 20 76 61 5f Sql, ...){. va_
2dc0: 6c 69 73 74 20 61 70 3b 0a 20 20 53 74 6d 74 20 list ap;. Stmt
2dd0: 73 3b 0a 20 20 69 6e 74 20 72 63 3b 0a 20 20 76 s;. int rc;. v
2de0: 61 5f 73 74 61 72 74 28 61 70 2c 20 7a 53 71 6c a_start(ap, zSql
2df0: 29 3b 0a 20 20 64 62 5f 76 70 72 65 70 61 72 65 );. db_vprepare
2e00: 28 26 73 2c 20 7a 53 71 6c 2c 20 61 70 29 3b 0a (&s, zSql, ap);.
2e10: 20 20 76 61 5f 65 6e 64 28 61 70 29 3b 0a 20 20 va_end(ap);.
2e20: 69 66 28 20 64 62 5f 73 74 65 70 28 26 73 29 21 if( db_step(&s)!
2e30: 3d 53 51 4c 49 54 45 5f 52 4f 57 20 29 7b 0a 20 =SQLITE_ROW ){.
2e40: 20 20 20 72 63 20 3d 20 30 3b 0a 20 20 7d 65 6c rc = 0;. }el
2e50: 73 65 7b 0a 20 20 20 20 72 63 20 3d 20 31 3b 0a se{. rc = 1;.
2e60: 20 20 7d 0a 20 20 64 62 5f 66 69 6e 61 6c 69 7a }. db_finaliz
2e70: 65 28 26 73 29 3b 0a 20 20 72 65 74 75 72 6e 20 e(&s);. return
2e80: 72 63 3b 0a 7d 0a 0a 0a 2f 2a 0a 2a 2a 20 45 78 rc;.}.../*.** Ex
2e90: 65 63 75 74 65 20 61 20 71 75 65 72 79 20 61 6e ecute a query an
2ea0: 64 20 72 65 74 75 72 6e 20 61 20 66 6c 6f 61 74 d return a float
2eb0: 69 6e 67 2d 70 6f 69 6e 74 20 76 61 6c 75 65 2e ing-point value.
2ec0: 0a 2a 2f 0a 64 6f 75 62 6c 65 20 64 62 5f 64 6f .*/.double db_do
2ed0: 75 62 6c 65 28 64 6f 75 62 6c 65 20 72 44 66 6c uble(double rDfl
2ee0: 74 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a t, const char *z
2ef0: 53 71 6c 2c 20 2e 2e 2e 29 7b 0a 20 20 76 61 5f Sql, ...){. va_
2f00: 6c 69 73 74 20 61 70 3b 0a 20 20 53 74 6d 74 20 list ap;. Stmt
2f10: 73 3b 0a 20 20 64 6f 75 62 6c 65 20 72 3b 0a 20 s;. double r;.
2f20: 20 76 61 5f 73 74 61 72 74 28 61 70 2c 20 7a 53 va_start(ap, zS
2f30: 71 6c 29 3b 0a 20 20 64 62 5f 76 70 72 65 70 61 ql);. db_vprepa
2f40: 72 65 28 26 73 2c 20 7a 53 71 6c 2c 20 61 70 29 re(&s, zSql, ap)
2f50: 3b 0a 20 20 76 61 5f 65 6e 64 28 61 70 29 3b 0a ;. va_end(ap);.
2f60: 20 20 69 66 28 20 64 62 5f 73 74 65 70 28 26 73 if( db_step(&s
2f70: 29 21 3d 53 51 4c 49 54 45 5f 52 4f 57 20 29 7b )!=SQLITE_ROW ){
2f80: 0a 20 20 20 20 72 20 3d 20 72 44 66 6c 74 3b 0a . r = rDflt;.
2f90: 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 72 20 3d }else{. r =
2fa0: 20 64 62 5f 63 6f 6c 75 6d 6e 5f 64 6f 75 62 6c db_column_doubl
2fb0: 65 28 26 73 2c 20 30 29 3b 0a 20 20 7d 0a 20 20 e(&s, 0);. }.
2fc0: 64 62 5f 66 69 6e 61 6c 69 7a 65 28 26 73 29 3b db_finalize(&s);
2fd0: 0a 20 20 72 65 74 75 72 6e 20 72 3b 0a 7d 0a 0a . return r;.}..
2fe0: 2f 2a 0a 2a 2a 20 45 78 65 63 75 74 65 20 61 20 /*.** Execute a
2ff0: 71 75 65 72 79 20 61 6e 64 20 61 70 70 65 6e 64 query and append
3000: 20 74 68 65 20 66 69 72 73 74 20 63 6f 6c 75 6d the first colum
3010: 6e 20 6f 66 20 74 68 65 20 66 69 72 73 74 20 72 n of the first r
3020: 6f 77 0a 2a 2a 20 6f 66 20 74 68 65 20 72 65 73 ow.** of the res
3030: 75 6c 74 20 73 65 74 20 74 6f 20 62 6c 6f 62 20 ult set to blob
3040: 67 69 76 65 6e 20 69 6e 20 74 68 65 20 66 69 72 given in the fir
3050: 73 74 20 61 72 67 75 6d 65 6e 74 2e 0a 2a 2f 0a st argument..*/.
3060: 76 6f 69 64 20 64 62 5f 62 6c 6f 62 28 42 6c 6f void db_blob(Blo
3070: 62 20 2a 70 52 65 73 75 6c 74 2c 20 63 6f 6e 73 b *pResult, cons
3080: 74 20 63 68 61 72 20 2a 7a 53 71 6c 2c 20 2e 2e t char *zSql, ..
3090: 2e 29 7b 0a 20 20 76 61 5f 6c 69 73 74 20 61 70 .){. va_list ap
30a0: 3b 0a 20 20 53 74 6d 74 20 73 3b 0a 20 20 76 61 ;. Stmt s;. va
30b0: 5f 73 74 61 72 74 28 61 70 2c 20 7a 53 71 6c 29 _start(ap, zSql)
30c0: 3b 0a 20 20 64 62 5f 76 70 72 65 70 61 72 65 28 ;. db_vprepare(
30d0: 26 73 2c 20 7a 53 71 6c 2c 20 61 70 29 3b 0a 20 &s, zSql, ap);.
30e0: 20 76 61 5f 65 6e 64 28 61 70 29 3b 0a 20 20 69 va_end(ap);. i
30f0: 66 28 20 64 62 5f 73 74 65 70 28 26 73 29 3d 3d f( db_step(&s)==
3100: 53 51 4c 49 54 45 5f 52 4f 57 20 29 7b 0a 20 20 SQLITE_ROW ){.
3110: 20 20 62 6c 6f 62 5f 61 70 70 65 6e 64 28 70 52 blob_append(pR
3120: 65 73 75 6c 74 2c 20 73 71 6c 69 74 65 33 5f 63 esult, sqlite3_c
3130: 6f 6c 75 6d 6e 5f 62 6c 6f 62 28 73 2e 70 53 74 olumn_blob(s.pSt
3140: 6d 74 2c 20 30 29 2c 0a 20 20 20 20 20 20 20 20 mt, 0),.
3150: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
3160: 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f sqlite3_column_
3170: 62 79 74 65 73 28 73 2e 70 53 74 6d 74 2c 20 30 bytes(s.pStmt, 0
3180: 29 29 3b 0a 20 20 7d 0a 20 20 64 62 5f 66 69 6e ));. }. db_fin
3190: 61 6c 69 7a 65 28 26 73 29 3b 0a 7d 0a 0a 2f 2a alize(&s);.}../*
31a0: 0a 2a 2a 20 45 78 65 63 75 74 65 20 61 20 71 75 .** Execute a qu
31b0: 65 72 79 2e 20 20 52 65 74 75 72 6e 20 74 68 65 ery. Return the
31c0: 20 66 69 72 73 74 20 63 6f 6c 75 6d 6e 20 6f 66 first column of
31d0: 20 74 68 65 20 66 69 72 73 74 20 72 6f 77 0a 2a the first row.*
31e0: 2a 20 6f 66 20 74 68 65 20 72 65 73 75 6c 74 20 * of the result
31f0: 73 65 74 20 61 73 20 61 20 73 74 72 69 6e 67 2e set as a string.
3200: 20 20 53 70 61 63 65 20 74 6f 20 68 6f 6c 64 20 Space to hold
3210: 74 68 65 20 73 74 72 69 6e 67 20 69 73 0a 2a 2a the string is.**
3220: 20 6f 62 74 61 69 6e 65 64 20 66 72 6f 6d 20 6d obtained from m
3230: 61 6c 6c 6f 63 28 29 2e 20 20 49 66 20 74 68 65 alloc(). If the
3240: 20 72 65 73 75 6c 74 20 73 65 74 20 69 73 20 65 result set is e
3250: 6d 70 74 79 2c 20 72 65 74 75 72 6e 0a 2a 2a 20 mpty, return.**
3260: 7a 44 65 66 61 75 6c 74 20 69 6e 73 74 65 61 64 zDefault instead
3270: 2e 0a 2a 2f 0a 63 68 61 72 20 2a 64 62 5f 74 65 ..*/.char *db_te
3280: 78 74 28 63 68 61 72 20 2a 7a 44 65 66 61 75 6c xt(char *zDefaul
3290: 74 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a t, const char *z
32a0: 53 71 6c 2c 20 2e 2e 2e 29 7b 0a 20 20 76 61 5f Sql, ...){. va_
32b0: 6c 69 73 74 20 61 70 3b 0a 20 20 53 74 6d 74 20 list ap;. Stmt
32c0: 73 3b 0a 20 20 63 68 61 72 20 2a 7a 20 3d 20 7a s;. char *z = z
32d0: 44 65 66 61 75 6c 74 3b 0a 20 20 76 61 5f 73 74 Default;. va_st
32e0: 61 72 74 28 61 70 2c 20 7a 53 71 6c 29 3b 0a 20 art(ap, zSql);.
32f0: 20 64 62 5f 76 70 72 65 70 61 72 65 28 26 73 2c db_vprepare(&s,
3300: 20 7a 53 71 6c 2c 20 61 70 29 3b 0a 20 20 76 61 zSql, ap);. va
3310: 5f 65 6e 64 28 61 70 29 3b 0a 20 20 69 66 28 20 _end(ap);. if(
3320: 64 62 5f 73 74 65 70 28 26 73 29 3d 3d 53 51 4c db_step(&s)==SQL
3330: 49 54 45 5f 52 4f 57 20 29 7b 0a 20 20 20 20 7a ITE_ROW ){. z
3340: 20 3d 20 6d 70 72 69 6e 74 66 28 22 25 73 22 2c = mprintf("%s",
3350: 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f sqlite3_column_
3360: 74 65 78 74 28 73 2e 70 53 74 6d 74 2c 20 30 29 text(s.pStmt, 0)
3370: 29 3b 0a 20 20 7d 0a 20 20 64 62 5f 66 69 6e 61 );. }. db_fina
3380: 6c 69 7a 65 28 26 73 29 3b 0a 20 20 72 65 74 75 lize(&s);. retu
3390: 72 6e 20 7a 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 rn z;.}../*.** I
33a0: 6e 69 74 69 61 6c 69 7a 65 20 61 20 6e 65 77 20 nitialize a new
33b0: 64 61 74 61 62 61 73 65 20 66 69 6c 65 20 77 69 database file wi
33c0: 74 68 20 74 68 65 20 67 69 76 65 6e 20 73 63 68 th the given sch
33d0: 65 6d 61 2e 20 20 49 66 20 61 6e 79 74 68 69 6e ema. If anythin
33e0: 67 0a 2a 2a 20 67 6f 65 73 20 77 72 6f 6e 67 2c g.** goes wrong,
33f0: 20 63 61 6c 6c 20 64 62 5f 65 72 72 28 29 20 74 call db_err() t
3400: 6f 20 65 78 69 74 2e 0a 2a 2f 0a 76 6f 69 64 20 o exit..*/.void
3410: 64 62 5f 69 6e 69 74 5f 64 61 74 61 62 61 73 65 db_init_database
3420: 28 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a (. const char *
3430: 7a 46 69 6c 65 4e 61 6d 65 2c 20 20 20 2f 2a 20 zFileName, /*
3440: 4e 61 6d 65 20 6f 66 20 64 61 74 61 62 61 73 65 Name of database
3450: 20 66 69 6c 65 20 74 6f 20 63 72 65 61 74 65 20 file to create
3460: 2a 2f 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 */. const char
3470: 2a 7a 53 63 68 65 6d 61 2c 20 20 20 20 20 2f 2a *zSchema, /*
3480: 20 46 69 72 73 74 20 70 61 72 74 20 6f 66 20 73 First part of s
3490: 63 68 65 6d 61 20 2a 2f 0a 20 20 2e 2e 2e 20 20 chema */. ...
34a0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
34b0: 20 20 20 20 2f 2a 20 41 64 64 69 74 69 6f 6e 61 /* Additiona
34c0: 6c 20 53 51 4c 20 74 6f 20 72 75 6e 2e 20 20 54 l SQL to run. T
34d0: 65 72 6d 69 6e 61 74 65 20 77 69 74 68 20 4e 55 erminate with NU
34e0: 4c 4c 2e 20 2a 2f 0a 29 7b 0a 20 20 73 71 6c 69 LL. */.){. sqli
34f0: 74 65 33 20 2a 64 62 3b 0a 20 20 69 6e 74 20 72 te3 *db;. int r
3500: 63 3b 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 c;. const char
3510: 2a 7a 53 71 6c 3b 0a 20 20 76 61 5f 6c 69 73 74 *zSql;. va_list
3520: 20 61 70 3b 0a 0a 20 20 72 63 20 3d 20 73 71 6c ap;.. rc = sql
3530: 69 74 65 33 5f 6f 70 65 6e 28 7a 46 69 6c 65 4e ite3_open(zFileN
3540: 61 6d 65 2c 20 26 64 62 29 3b 0a 20 20 69 66 28 ame, &db);. if(
3550: 20 72 63 21 3d 53 51 4c 49 54 45 5f 4f 4b 20 29 rc!=SQLITE_OK )
3560: 7b 0a 20 20 20 20 64 62 5f 65 72 72 28 73 71 6c {. db_err(sql
3570: 69 74 65 33 5f 65 72 72 6d 73 67 28 64 62 29 29 ite3_errmsg(db))
3580: 3b 0a 20 20 7d 0a 20 20 73 71 6c 69 74 65 33 5f ;. }. sqlite3_
3590: 65 78 65 63 28 64 62 2c 20 22 42 45 47 49 4e 20 exec(db, "BEGIN
35a0: 45 58 43 4c 55 53 49 56 45 22 2c 20 30 2c 20 30 EXCLUSIVE", 0, 0
35b0: 2c 20 30 29 3b 0a 20 20 72 63 20 3d 20 73 71 6c , 0);. rc = sql
35c0: 69 74 65 33 5f 65 78 65 63 28 64 62 2c 20 7a 53 ite3_exec(db, zS
35d0: 63 68 65 6d 61 2c 20 30 2c 20 30 2c 20 30 29 3b chema, 0, 0, 0);
35e0: 0a 20 20 69 66 28 20 72 63 21 3d 53 51 4c 49 54 . if( rc!=SQLIT
35f0: 45 5f 4f 4b 20 29 7b 0a 20 20 20 20 64 62 5f 65 E_OK ){. db_e
3600: 72 72 28 73 71 6c 69 74 65 33 5f 65 72 72 6d 73 rr(sqlite3_errms
3610: 67 28 64 62 29 29 3b 0a 20 20 7d 0a 20 20 76 61 g(db));. }. va
3620: 5f 73 74 61 72 74 28 61 70 2c 20 7a 53 63 68 65 _start(ap, zSche
3630: 6d 61 29 3b 0a 20 20 77 68 69 6c 65 28 20 28 7a ma);. while( (z
3640: 53 71 6c 20 3d 20 76 61 5f 61 72 67 28 61 70 2c Sql = va_arg(ap,
3650: 20 63 6f 6e 73 74 20 63 68 61 72 2a 29 29 21 3d const char*))!=
3660: 30 20 29 7b 0a 20 20 20 20 72 63 20 3d 20 73 71 0 ){. rc = sq
3670: 6c 69 74 65 33 5f 65 78 65 63 28 64 62 2c 20 7a lite3_exec(db, z
3680: 53 71 6c 2c 20 30 2c 20 30 2c 20 30 29 3b 0a 20 Sql, 0, 0, 0);.
3690: 20 20 20 69 66 28 20 72 63 21 3d 53 51 4c 49 54 if( rc!=SQLIT
36a0: 45 5f 4f 4b 20 29 7b 0a 20 20 20 20 20 20 64 62 E_OK ){. db
36b0: 5f 65 72 72 28 73 71 6c 69 74 65 33 5f 65 72 72 _err(sqlite3_err
36c0: 6d 73 67 28 64 62 29 29 3b 0a 20 20 20 20 7d 0a msg(db));. }.
36d0: 20 20 7d 0a 20 20 76 61 5f 65 6e 64 28 61 70 29 }. va_end(ap)
36e0: 3b 0a 20 20 73 71 6c 69 74 65 33 5f 65 78 65 63 ;. sqlite3_exec
36f0: 28 64 62 2c 20 22 43 4f 4d 4d 49 54 22 2c 20 30 (db, "COMMIT", 0
3700: 2c 20 30 2c 20 30 29 3b 0a 20 20 73 71 6c 69 74 , 0, 0);. sqlit
3710: 65 33 5f 63 6c 6f 73 65 28 64 62 29 3b 0a 7d 0a e3_close(db);.}.
3720: 0a 2f 2a 0a 2a 2a 20 7a 44 62 4e 61 6d 65 20 69 ./*.** zDbName i
3730: 73 20 74 68 65 20 6e 61 6d 65 20 6f 66 20 61 20 s the name of a
3740: 64 61 74 61 62 61 73 65 20 66 69 6c 65 2e 20 20 database file.
3750: 49 66 20 6e 6f 20 6f 74 68 65 72 20 64 61 74 61 If no other data
3760: 62 61 73 65 0a 2a 2a 20 66 69 6c 65 20 69 73 20 base.** file is
3770: 6f 70 65 6e 2c 20 74 68 65 6e 20 6f 70 65 6e 20 open, then open
3780: 74 68 69 73 20 6f 6e 65 2e 20 20 49 66 20 61 6e this one. If an
3790: 6f 74 68 65 72 20 64 61 74 61 62 61 73 65 20 66 other database f
37a0: 69 6c 65 20 69 73 0a 2a 2a 20 61 6c 72 65 61 64 ile is.** alread
37b0: 79 20 6f 70 65 6e 2c 20 74 68 65 6e 20 61 74 74 y open, then att
37c0: 61 63 68 20 7a 44 62 4e 61 6d 65 20 75 73 69 6e ach zDbName usin
37d0: 67 20 74 68 65 20 6e 61 6d 65 20 7a 4c 61 62 65 g the name zLabe
37e0: 6c 2e 0a 2a 2f 0a 76 6f 69 64 20 64 62 5f 6f 70 l..*/.void db_op
37f0: 65 6e 5f 6f 72 5f 61 74 74 61 63 68 28 63 6f 6e en_or_attach(con
3800: 73 74 20 63 68 61 72 20 2a 7a 44 62 4e 61 6d 65 st char *zDbName
3810: 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 4c , const char *zL
3820: 61 62 65 6c 29 7b 0a 20 20 69 66 28 20 21 67 2e abel){. if( !g.
3830: 64 62 20 29 7b 0a 20 20 20 20 69 6e 74 20 72 63 db ){. int rc
3840: 20 3d 20 73 71 6c 69 74 65 33 5f 6f 70 65 6e 28 = sqlite3_open(
3850: 7a 44 62 4e 61 6d 65 2c 20 26 67 2e 64 62 29 3b zDbName, &g.db);
3860: 0a 20 20 20 20 69 66 28 20 72 63 21 3d 53 51 4c . if( rc!=SQL
3870: 49 54 45 5f 4f 4b 20 29 7b 0a 20 20 20 20 20 20 ITE_OK ){.
3880: 64 62 5f 65 72 72 28 73 71 6c 69 74 65 33 5f 65 db_err(sqlite3_e
3890: 72 72 6d 73 67 28 67 2e 64 62 29 29 3b 0a 20 20 rrmsg(g.db));.
38a0: 20 20 7d 0a 20 20 20 20 64 62 5f 63 6f 6e 6e 65 }. db_conne
38b0: 63 74 69 6f 6e 5f 69 6e 69 74 28 29 3b 0a 20 20 ction_init();.
38c0: 7d 65 6c 73 65 7b 0a 20 20 20 20 64 62 5f 6d 75 }else{. db_mu
38d0: 6c 74 69 5f 65 78 65 63 28 22 41 54 54 41 43 48 lti_exec("ATTACH
38e0: 20 44 41 54 41 42 41 53 45 20 25 51 20 41 53 20 DATABASE %Q AS
38f0: 25 73 22 2c 20 7a 44 62 4e 61 6d 65 2c 20 7a 4c %s", zDbName, zL
3900: 61 62 65 6c 29 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a abel);. }.}../*
3910: 0a 2a 2a 20 4f 70 65 6e 20 74 68 65 20 75 73 65 .** Open the use
3920: 72 20 64 61 74 61 62 61 73 65 20 69 6e 20 22 7e r database in "~
3930: 2f 2e 66 6f 73 73 69 6c 22 2e 20 20 43 72 65 61 /.fossil". Crea
3940: 74 65 20 74 68 65 20 64 61 74 61 62 61 73 65 20 te the database
3950: 61 6e 65 77 20 69 66 0a 2a 2a 20 69 74 20 64 6f anew if.** it do
3960: 65 73 20 6e 6f 74 20 61 6c 72 65 61 64 79 20 65 es not already e
3970: 78 69 73 74 2e 0a 2a 2f 0a 76 6f 69 64 20 64 62 xist..*/.void db
3980: 5f 6f 70 65 6e 5f 63 6f 6e 66 69 67 28 76 6f 69 _open_config(voi
3990: 64 29 7b 0a 20 20 63 68 61 72 20 2a 7a 44 62 4e d){. char *zDbN
39a0: 61 6d 65 3b 0a 20 20 63 6f 6e 73 74 20 63 68 61 ame;. const cha
39b0: 72 20 2a 7a 48 6f 6d 65 3b 0a 23 69 66 64 65 66 r *zHome;.#ifdef
39c0: 20 5f 5f 4d 49 4e 47 57 33 32 5f 5f 0a 20 20 7a __MINGW32__. z
39d0: 48 6f 6d 65 20 3d 20 67 65 74 65 6e 76 28 22 4c Home = getenv("L
39e0: 4f 43 41 4c 41 50 50 44 41 54 41 22 29 3b 0a 20 OCALAPPDATA");.
39f0: 20 69 66 28 20 7a 48 6f 6d 65 3d 3d 30 20 29 7b if( zHome==0 ){
3a00: 0a 20 20 20 20 7a 48 6f 6d 65 20 3d 20 67 65 74 . zHome = get
3a10: 65 6e 76 28 22 41 50 50 44 41 54 41 22 29 3b 0a env("APPDATA");.
3a20: 20 20 20 20 69 66 28 20 7a 48 6f 6d 65 3d 3d 30 if( zHome==0
3a30: 20 29 7b 0a 20 20 20 20 20 20 7a 48 6f 6d 65 20 ){. zHome
3a40: 3d 20 67 65 74 65 6e 76 28 22 48 4f 4d 45 50 41 = getenv("HOMEPA
3a50: 54 48 22 29 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a TH");. }. }.
3a60: 23 65 6c 73 65 0a 20 20 7a 48 6f 6d 65 20 3d 20 #else. zHome =
3a70: 67 65 74 65 6e 76 28 22 48 4f 4d 45 22 29 3b 0a getenv("HOME");.
3a80: 23 65 6e 64 69 66 0a 20 20 69 66 28 20 7a 48 6f #endif. if( zHo
3a90: 6d 65 3d 3d 30 20 29 7b 0a 20 20 20 20 64 62 5f me==0 ){. db_
3aa0: 65 72 72 28 22 63 61 6e 6e 6f 74 20 6c 6f 63 61 err("cannot loca
3ab0: 6c 20 68 6f 6d 65 20 64 69 72 65 63 74 6f 72 79 l home directory
3ac0: 22 29 3b 0a 20 20 7d 0a 23 69 66 64 65 66 20 5f ");. }.#ifdef _
3ad0: 5f 4d 49 4e 47 57 33 32 5f 5f 0a 20 20 2f 2a 20 _MINGW32__. /*
3ae0: 2e 20 66 69 6c 65 6e 61 6d 65 73 20 67 69 76 65 . filenames give
3af0: 20 73 6f 6d 65 20 77 69 6e 64 6f 77 20 73 79 73 some window sys
3b00: 74 65 6d 73 20 70 72 6f 62 6c 65 6d 73 20 61 6e tems problems an
3b10: 64 20 6d 61 6e 79 20 61 70 70 73 20 70 72 6f 62 d many apps prob
3b20: 6c 65 6d 73 20 2a 2f 0a 20 20 7a 44 62 4e 61 6d lems */. zDbNam
3b30: 65 20 3d 20 6d 70 72 69 6e 74 66 28 22 25 73 2f e = mprintf("%s/
3b40: 5f 66 6f 73 73 69 6c 22 2c 20 7a 48 6f 6d 65 29 _fossil", zHome)
3b50: 3b 0a 23 65 6c 73 65 0a 20 20 7a 44 62 4e 61 6d ;.#else. zDbNam
3b60: 65 20 3d 20 6d 70 72 69 6e 74 66 28 22 25 73 2f e = mprintf("%s/
3b70: 2e 66 6f 73 73 69 6c 22 2c 20 7a 48 6f 6d 65 29 .fossil", zHome)
3b80: 3b 0a 23 65 6e 64 69 66 0a 20 20 69 66 28 20 67 ;.#endif. if( g
3b90: 2e 63 6f 6e 66 69 67 4f 70 65 6e 20 29 20 72 65 .configOpen ) re
3ba0: 74 75 72 6e 3b 0a 20 20 69 66 28 20 66 69 6c 65 turn;. if( file
3bb0: 5f 73 69 7a 65 28 7a 44 62 4e 61 6d 65 29 3c 31 _size(zDbName)<1
3bc0: 30 32 34 2a 33 20 29 7b 0a 20 20 20 20 64 62 5f 024*3 ){. db_
3bd0: 69 6e 69 74 5f 64 61 74 61 62 61 73 65 28 7a 44 init_database(zD
3be0: 62 4e 61 6d 65 2c 20 7a 43 6f 6e 66 69 67 53 63 bName, zConfigSc
3bf0: 68 65 6d 61 2c 20 28 63 68 61 72 2a 29 30 29 3b hema, (char*)0);
3c00: 0a 20 20 7d 0a 20 20 64 62 5f 6f 70 65 6e 5f 6f . }. db_open_o
3c10: 72 5f 61 74 74 61 63 68 28 7a 44 62 4e 61 6d 65 r_attach(zDbName
3c20: 2c 20 22 63 6f 6e 66 69 67 64 62 22 29 3b 0a 20 , "configdb");.
3c30: 20 67 2e 63 6f 6e 66 69 67 4f 70 65 6e 20 3d 20 g.configOpen =
3c40: 31 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 66 20 7a 1;.}../*.** If z
3c50: 44 62 4e 61 6d 65 20 69 73 20 61 20 76 61 6c 69 DbName is a vali
3c60: 64 20 6c 6f 63 61 6c 20 64 61 74 61 62 61 73 65 d local database
3c70: 20 66 69 6c 65 2c 20 6f 70 65 6e 20 69 74 20 61 file, open it a
3c80: 6e 64 20 72 65 74 75 72 6e 0a 2a 2a 20 74 72 75 nd return.** tru
3c90: 65 2e 20 20 49 66 20 69 74 20 69 73 20 6e 6f 74 e. If it is not
3ca0: 20 61 20 76 61 6c 69 64 20 6c 6f 63 61 6c 20 64 a valid local d
3cb0: 61 74 61 62 61 73 65 20 66 69 6c 65 2c 20 72 65 atabase file, re
3cc0: 74 75 72 6e 20 30 2e 0a 2a 2f 0a 73 74 61 74 69 turn 0..*/.stati
3cd0: 63 20 69 6e 74 20 69 73 56 61 6c 69 64 4c 6f 63 c int isValidLoc
3ce0: 61 6c 44 62 28 63 6f 6e 73 74 20 63 68 61 72 20 alDb(const char
3cf0: 2a 7a 44 62 4e 61 6d 65 29 7b 0a 20 20 69 36 34 *zDbName){. i64
3d00: 20 6c 73 69 7a 65 3b 0a 20 20 69 66 28 20 61 63 lsize;. if( ac
3d10: 63 65 73 73 28 7a 44 62 4e 61 6d 65 2c 20 46 5f cess(zDbName, F_
3d20: 4f 4b 29 20 29 20 72 65 74 75 72 6e 20 30 3b 0a OK) ) return 0;.
3d30: 20 20 6c 73 69 7a 65 20 3d 20 66 69 6c 65 5f 73 lsize = file_s
3d40: 69 7a 65 28 7a 44 62 4e 61 6d 65 29 3b 0a 20 20 ize(zDbName);.
3d50: 69 66 28 20 6c 73 69 7a 65 25 31 30 32 34 21 3d if( lsize%1024!=
3d60: 30 20 7c 7c 20 6c 73 69 7a 65 3c 34 30 39 36 20 0 || lsize<4096
3d70: 29 20 72 65 74 75 72 6e 20 30 3b 0a 20 20 64 62 ) return 0;. db
3d80: 5f 6f 70 65 6e 5f 6f 72 5f 61 74 74 61 63 68 28 _open_or_attach(
3d90: 7a 44 62 4e 61 6d 65 2c 20 22 6c 6f 63 61 6c 64 zDbName, "locald
3da0: 62 22 29 3b 0a 20 20 67 2e 6c 6f 63 61 6c 4f 70 b");. g.localOp
3db0: 65 6e 20 3d 20 31 3b 0a 20 20 64 62 5f 6f 70 65 en = 1;. db_ope
3dc0: 6e 5f 63 6f 6e 66 69 67 28 29 3b 0a 20 20 64 62 n_config();. db
3dd0: 5f 6f 70 65 6e 5f 72 65 70 6f 73 69 74 6f 72 79 _open_repository
3de0: 28 30 29 3b 0a 20 20 72 65 74 75 72 6e 20 31 3b (0);. return 1;
3df0: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 4c 6f 63 61 74 65 .}../*.** Locate
3e00: 20 74 68 65 20 72 6f 6f 74 20 64 69 72 65 63 74 the root direct
3e10: 6f 72 79 20 6f 66 20 74 68 65 20 6c 6f 63 61 6c ory of the local
3e20: 20 72 65 70 6f 73 69 74 6f 72 79 20 74 72 65 65 repository tree
3e30: 2e 20 20 54 68 65 20 72 6f 6f 74 0a 2a 2a 20 64 . The root.** d
3e40: 69 72 65 63 74 6f 72 79 20 69 73 20 66 6f 75 6e irectory is foun
3e50: 64 20 62 79 20 73 65 61 72 63 68 69 6e 67 20 66 d by searching f
3e60: 6f 72 20 61 20 66 69 6c 65 20 6e 61 6d 65 64 20 or a file named
3e70: 22 46 4f 53 53 49 4c 22 20 74 68 61 74 20 63 6f "FOSSIL" that co
3e80: 6e 74 61 69 6e 73 0a 2a 2a 20 61 20 76 61 6c 69 ntains.** a vali
3e90: 64 20 72 65 70 6f 73 69 74 6f 72 79 20 64 61 74 d repository dat
3ea0: 61 62 61 73 65 2e 0a 2a 2a 0a 2a 2a 20 49 66 20 abase..**.** If
3eb0: 6e 6f 20 76 61 6c 69 64 20 46 4f 53 53 49 4c 20 no valid FOSSIL
3ec0: 66 69 6c 65 20 69 73 20 66 6f 75 6e 64 2c 20 77 file is found, w
3ed0: 65 20 6d 6f 76 65 20 75 70 20 6f 6e 65 20 6c 65 e move up one le
3ee0: 76 65 6c 20 61 6e 64 20 74 72 79 20 61 67 61 69 vel and try agai
3ef0: 6e 2e 0a 2a 2a 20 4f 6e 63 65 20 74 68 65 20 66 n..** Once the f
3f00: 69 6c 65 20 69 73 20 66 6f 75 6e 64 2c 20 74 68 ile is found, th
3f10: 65 20 67 2e 7a 4c 6f 63 61 6c 52 6f 6f 74 20 76 e g.zLocalRoot v
3f20: 61 72 69 61 62 6c 65 20 69 73 20 73 65 74 20 74 ariable is set t
3f30: 6f 20 74 68 65 20 72 6f 6f 74 20 6f 66 0a 2a 2a o the root of.**
3f40: 20 74 68 65 20 72 65 70 6f 73 69 74 6f 72 79 20 the repository
3f50: 74 72 65 65 20 61 6e 64 20 74 68 69 73 20 72 6f tree and this ro
3f60: 75 74 69 6e 65 20 72 65 74 75 72 6e 73 20 31 2e utine returns 1.
3f70: 20 20 49 66 20 6e 6f 20 64 61 74 61 62 61 73 65 If no database
3f80: 20 69 73 0a 2a 2a 20 66 6f 75 6e 64 2c 20 74 68 is.** found, th
3f90: 65 6e 20 74 68 69 73 20 72 6f 75 74 69 6e 65 20 en this routine
3fa0: 72 65 74 75 72 6e 20 30 2e 0a 2a 2a 0a 2a 2a 20 return 0..**.**
3fb0: 54 68 69 73 20 72 6f 75 74 69 6e 65 20 61 6c 77 This routine alw
3fc0: 61 79 73 20 6f 70 65 6e 73 20 74 68 65 20 75 73 ays opens the us
3fd0: 65 72 20 64 61 74 61 62 61 73 65 20 72 65 67 61 er database rega
3fe0: 72 64 6c 65 73 73 20 6f 66 20 77 68 65 74 68 65 rdless of whethe
3ff0: 72 20 6f 72 0a 2a 2a 20 6e 6f 74 20 74 68 65 20 r or.** not the
4000: 72 65 70 6f 73 69 74 6f 72 79 20 64 61 74 61 62 repository datab
4010: 61 73 65 20 69 73 20 66 6f 75 6e 64 2e 20 20 49 ase is found. I
4020: 66 20 74 68 65 20 46 4f 53 53 49 4c 20 66 69 6c f the FOSSIL fil
4030: 65 20 69 73 20 66 6f 75 6e 64 2c 0a 2a 2a 20 69 e is found,.** i
4040: 74 20 69 73 20 61 74 74 61 63 68 65 64 20 74 6f t is attached to
4050: 20 74 68 65 20 6f 70 65 6e 20 64 61 74 61 62 61 the open databa
4060: 73 65 20 63 6f 6e 6e 65 63 74 69 6f 6e 20 74 6f se connection to
4070: 6f 2e 0a 2a 2f 0a 69 6e 74 20 64 62 5f 6f 70 65 o..*/.int db_ope
4080: 6e 5f 6c 6f 63 61 6c 28 76 6f 69 64 29 7b 0a 20 n_local(void){.
4090: 20 69 6e 74 20 6e 3b 0a 20 20 63 68 61 72 20 7a int n;. char z
40a0: 50 77 64 5b 32 30 30 30 5d 3b 0a 20 20 63 68 61 Pwd[2000];. cha
40b0: 72 20 2a 7a 50 77 64 43 6f 6e 76 3b 0a 20 20 69 r *zPwdConv;. i
40c0: 66 28 20 67 2e 6c 6f 63 61 6c 4f 70 65 6e 29 20 f( g.localOpen)
40d0: 72 65 74 75 72 6e 20 31 3b 0a 20 20 69 66 28 20 return 1;. if(
40e0: 67 65 74 63 77 64 28 7a 50 77 64 2c 20 73 69 7a getcwd(zPwd, siz
40f0: 65 6f 66 28 7a 50 77 64 29 2d 32 30 29 3d 3d 30 eof(zPwd)-20)==0
4100: 20 29 7b 0a 20 20 20 20 64 62 5f 65 72 72 28 22 ){. db_err("
4110: 70 77 64 20 74 6f 6f 20 62 69 67 3a 20 6d 61 78 pwd too big: max
4120: 20 25 64 22 2c 20 73 69 7a 65 6f 66 28 7a 50 77 %d", sizeof(zPw
4130: 64 29 2d 32 30 29 3b 0a 20 20 7d 0a 20 20 6e 20 d)-20);. }. n
4140: 3d 20 73 74 72 6c 65 6e 28 7a 50 77 64 29 3b 0a = strlen(zPwd);.
4150: 20 20 7a 50 77 64 43 6f 6e 76 20 3d 20 6d 70 72 zPwdConv = mpr
4160: 69 6e 74 66 28 22 25 2f 22 2c 20 7a 50 77 64 29 intf("%/", zPwd)
4170: 3b 0a 20 20 73 74 72 6e 63 70 79 28 7a 50 77 64 ;. strncpy(zPwd
4180: 2c 20 7a 50 77 64 43 6f 6e 76 2c 20 32 30 30 30 , zPwdConv, 2000
4190: 2d 32 30 29 3b 0a 20 20 66 72 65 65 28 7a 50 77 -20);. free(zPw
41a0: 64 43 6f 6e 76 29 3b 0a 20 20 77 68 69 6c 65 28 dConv);. while(
41b0: 20 6e 3e 30 20 29 7b 0a 20 20 20 20 69 66 28 20 n>0 ){. if(
41c0: 61 63 63 65 73 73 28 7a 50 77 64 2c 20 57 5f 4f access(zPwd, W_O
41d0: 4b 29 20 29 20 62 72 65 61 6b 3b 0a 20 20 20 20 K) ) break;.
41e0: 73 74 72 63 70 79 28 26 7a 50 77 64 5b 6e 5d 2c strcpy(&zPwd[n],
41f0: 20 22 2f 5f 46 4f 53 53 49 4c 5f 22 29 3b 0a 20 "/_FOSSIL_");.
4200: 20 20 20 69 66 28 20 69 73 56 61 6c 69 64 4c 6f if( isValidLo
4210: 63 61 6c 44 62 28 7a 50 77 64 29 20 29 7b 0a 20 calDb(zPwd) ){.
4220: 20 20 20 20 20 2f 2a 20 46 6f 75 6e 64 20 61 20 /* Found a
4230: 76 61 6c 69 64 20 5f 46 4f 53 53 49 4c 5f 20 66 valid _FOSSIL_ f
4240: 69 6c 65 20 2a 2f 0a 20 20 20 20 20 20 7a 50 77 ile */. zPw
4250: 64 5b 6e 5d 20 3d 20 30 3b 0a 20 20 20 20 20 20 d[n] = 0;.
4260: 67 2e 7a 4c 6f 63 61 6c 52 6f 6f 74 20 3d 20 6d g.zLocalRoot = m
4270: 70 72 69 6e 74 66 28 22 25 73 2f 22 2c 20 7a 50 printf("%s/", zP
4280: 77 64 29 3b 0a 20 20 20 20 20 20 72 65 74 75 72 wd);. retur
4290: 6e 20 31 3b 0a 20 20 20 20 7d 0a 20 20 20 20 6e n 1;. }. n
42a0: 2d 2d 3b 0a 20 20 20 20 77 68 69 6c 65 28 20 6e --;. while( n
42b0: 3e 30 20 26 26 20 7a 50 77 64 5b 6e 5d 21 3d 27 >0 && zPwd[n]!='
42c0: 2f 27 20 29 7b 20 6e 2d 2d 3b 20 7d 0a 20 20 20 /' ){ n--; }.
42d0: 20 77 68 69 6c 65 28 20 6e 3e 30 20 26 26 20 7a while( n>0 && z
42e0: 50 77 64 5b 6e 2d 31 5d 3d 3d 27 2f 27 20 29 7b Pwd[n-1]=='/' ){
42f0: 20 6e 2d 2d 3b 20 7d 0a 20 20 20 20 7a 50 77 64 n--; }. zPwd
4300: 5b 6e 5d 20 3d 20 30 3b 0a 20 20 7d 0a 0a 20 20 [n] = 0;. }..
4310: 2f 2a 20 41 20 5f 46 4f 53 53 49 4c 5f 20 66 69 /* A _FOSSIL_ fi
4320: 6c 65 20 63 6f 75 6c 64 20 6e 6f 74 20 62 65 20 le could not be
4330: 66 6f 75 6e 64 20 2a 2f 0a 20 20 72 65 74 75 72 found */. retur
4340: 6e 20 30 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 4f 70 n 0;.}../*.** Op
4350: 65 6e 20 74 68 65 20 72 65 70 6f 73 69 74 6f 72 en the repositor
4360: 79 20 64 61 74 61 62 61 73 65 20 67 69 76 65 6e y database given
4370: 20 62 79 20 7a 44 62 4e 61 6d 65 2e 20 20 49 66 by zDbName. If
4380: 20 7a 44 62 4e 61 6d 65 3d 3d 4e 55 4c 4c 20 74 zDbName==NULL t
4390: 68 65 6e 0a 2a 2a 20 67 65 74 20 74 68 65 20 6e hen.** get the n
43a0: 61 6d 65 20 66 72 6f 6d 20 74 68 65 20 61 6c 72 ame from the alr
43b0: 65 61 64 79 20 6f 70 65 6e 20 6c 6f 63 61 6c 20 eady open local
43c0: 64 61 74 61 62 61 73 65 2e 0a 2a 2f 0a 76 6f 69 database..*/.voi
43d0: 64 20 64 62 5f 6f 70 65 6e 5f 72 65 70 6f 73 69 d db_open_reposi
43e0: 74 6f 72 79 28 63 6f 6e 73 74 20 63 68 61 72 20 tory(const char
43f0: 2a 7a 44 62 4e 61 6d 65 29 7b 0a 20 20 69 66 28 *zDbName){. if(
4400: 20 67 2e 72 65 70 6f 73 69 74 6f 72 79 4f 70 65 g.repositoryOpe
4410: 6e 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 69 66 n ) return;. if
4420: 28 20 7a 44 62 4e 61 6d 65 3d 3d 30 20 29 7b 0a ( zDbName==0 ){.
4430: 20 20 20 20 69 66 28 20 67 2e 6c 6f 63 61 6c 4f if( g.localO
4440: 70 65 6e 20 29 7b 0a 20 20 20 20 20 20 7a 44 62 pen ){. zDb
4450: 4e 61 6d 65 20 3d 20 64 62 5f 6c 67 65 74 28 22 Name = db_lget("
4460: 72 65 70 6f 73 69 74 6f 72 79 22 2c 20 30 29 3b repository", 0);
4470: 0a 20 20 20 20 7d 0a 20 20 20 20 69 66 28 20 7a . }. if( z
4480: 44 62 4e 61 6d 65 3d 3d 30 20 29 7b 0a 20 20 20 DbName==0 ){.
4490: 20 20 20 64 62 5f 65 72 72 28 22 75 6e 61 62 6c db_err("unabl
44a0: 65 20 74 6f 20 66 69 6e 64 20 74 68 65 20 6e 61 e to find the na
44b0: 6d 65 20 6f 66 20 61 20 72 65 70 6f 73 69 74 6f me of a reposito
44c0: 72 79 20 64 61 74 61 62 61 73 65 22 29 3b 0a 20 ry database");.
44d0: 20 20 20 7d 0a 20 20 7d 0a 20 20 69 66 28 20 61 }. }. if( a
44e0: 63 63 65 73 73 28 7a 44 62 4e 61 6d 65 2c 20 52 ccess(zDbName, R
44f0: 5f 4f 4b 29 20 7c 7c 20 66 69 6c 65 5f 73 69 7a _OK) || file_siz
4500: 65 28 7a 44 62 4e 61 6d 65 29 3c 31 30 32 34 20 e(zDbName)<1024
4510: 29 7b 0a 20 20 20 20 66 6f 73 73 69 6c 5f 70 61 ){. fossil_pa
4520: 6e 69 63 28 22 6e 6f 20 73 75 63 68 20 72 65 70 nic("no such rep
4530: 6f 73 69 74 6f 72 79 3a 20 25 73 22 2c 20 7a 44 ository: %s", zD
4540: 62 4e 61 6d 65 29 3b 0a 20 20 7d 0a 20 20 64 62 bName);. }. db
4550: 5f 6f 70 65 6e 5f 6f 72 5f 61 74 74 61 63 68 28 _open_or_attach(
4560: 7a 44 62 4e 61 6d 65 2c 20 22 72 65 70 6f 73 69 zDbName, "reposi
4570: 74 6f 72 79 22 29 3b 0a 20 20 67 2e 72 65 70 6f tory");. g.repo
4580: 73 69 74 6f 72 79 4f 70 65 6e 20 3d 20 31 3b 0a sitoryOpen = 1;.
4590: 20 20 67 2e 7a 52 65 70 6f 73 69 74 6f 72 79 4e g.zRepositoryN
45a0: 61 6d 65 20 3d 20 6d 70 72 69 6e 74 66 28 22 25 ame = mprintf("%
45b0: 73 22 2c 20 7a 44 62 4e 61 6d 65 29 3b 0a 7d 0a s", zDbName);.}.
45c0: 0a 2f 2a 0a 2a 2a 20 54 72 79 20 74 6f 20 66 69 ./*.** Try to fi
45d0: 6e 64 20 74 68 65 20 72 65 70 6f 73 69 74 6f 72 nd the repositor
45e0: 79 20 61 6e 64 20 6f 70 65 6e 20 69 74 2e 20 20 y and open it.
45f0: 55 73 65 20 74 68 65 20 2d 52 20 6f 72 20 2d 2d Use the -R or --
4600: 72 65 70 6f 73 69 74 6f 72 79 0a 2a 2a 20 6f 70 repository.** op
4610: 74 69 6f 6e 20 74 6f 20 6c 6f 63 61 74 65 20 74 tion to locate t
4620: 68 65 20 72 65 70 6f 73 69 74 6f 72 79 2e 20 20 he repository.
4630: 49 66 20 6e 6f 20 73 75 63 68 20 6f 70 74 69 6f If no such optio
4640: 6e 20 69 73 20 61 76 61 69 6c 61 62 6c 65 2c 20 n is available,
4650: 74 68 65 6e 0a 2a 2a 20 75 73 65 20 74 68 65 20 then.** use the
4660: 72 65 70 6f 73 69 74 6f 72 79 20 6f 66 20 74 68 repository of th
4670: 65 20 6f 70 65 6e 20 63 68 65 63 6b 6f 75 74 20 e open checkout
4680: 69 66 20 74 68 65 72 65 20 69 73 20 6f 6e 65 2e if there is one.
4690: 0a 2a 2a 0a 2a 2a 20 45 72 72 6f 72 20 6f 75 74 .**.** Error out
46a0: 20 69 66 20 74 68 65 20 72 65 70 6f 73 69 74 6f if the reposito
46b0: 72 79 20 63 61 6e 6e 6f 74 20 62 65 20 6f 70 65 ry cannot be ope
46c0: 6e 65 64 2e 0a 2a 2f 0a 76 6f 69 64 20 64 62 5f ned..*/.void db_
46d0: 66 69 6e 64 5f 61 6e 64 5f 6f 70 65 6e 5f 72 65 find_and_open_re
46e0: 70 6f 73 69 74 6f 72 79 28 69 6e 74 20 65 72 72 pository(int err
46f0: 49 66 4e 6f 74 46 6f 75 6e 64 29 7b 0a 20 20 63 IfNotFound){. c
4700: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 52 65 70 20 onst char *zRep
4710: 3d 20 66 69 6e 64 5f 6f 70 74 69 6f 6e 28 22 72 = find_option("r
4720: 65 70 6f 73 69 74 6f 72 79 22 2c 20 22 52 22 2c epository", "R",
4730: 20 31 29 3b 0a 20 20 69 66 28 20 7a 52 65 70 3d 1);. if( zRep=
4740: 3d 30 20 29 7b 0a 20 20 20 20 69 66 28 20 64 62 =0 ){. if( db
4750: 5f 6f 70 65 6e 5f 6c 6f 63 61 6c 28 29 3d 3d 30 _open_local()==0
4760: 20 29 7b 0a 20 20 20 20 20 20 67 6f 74 6f 20 72 ){. goto r
4770: 65 70 5f 6e 6f 74 5f 66 6f 75 6e 64 3b 0a 20 20 ep_not_found;.
4780: 20 20 7d 0a 20 20 20 20 7a 52 65 70 20 3d 20 64 }. zRep = d
4790: 62 5f 6c 67 65 74 28 22 72 65 70 6f 73 69 74 6f b_lget("reposito
47a0: 72 79 22 2c 20 30 29 3b 0a 20 20 20 20 69 66 28 ry", 0);. if(
47b0: 20 7a 52 65 70 3d 3d 30 20 29 7b 0a 20 20 20 20 zRep==0 ){.
47c0: 20 20 67 6f 74 6f 20 72 65 70 5f 6e 6f 74 5f 66 goto rep_not_f
47d0: 6f 75 6e 64 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a ound;. }. }.
47e0: 20 20 64 62 5f 6f 70 65 6e 5f 72 65 70 6f 73 69 db_open_reposi
47f0: 74 6f 72 79 28 7a 52 65 70 29 3b 0a 20 20 69 66 tory(zRep);. if
4800: 28 20 67 2e 72 65 70 6f 73 69 74 6f 72 79 4f 70 ( g.repositoryOp
4810: 65 6e 20 29 7b 0a 20 20 20 20 72 65 74 75 72 6e en ){. return
4820: 3b 0a 20 20 7d 0a 72 65 70 5f 6e 6f 74 5f 66 6f ;. }.rep_not_fo
4830: 75 6e 64 3a 0a 20 20 69 66 28 20 65 72 72 49 66 und:. if( errIf
4840: 4e 6f 74 46 6f 75 6e 64 20 29 7b 0a 20 20 20 20 NotFound ){.
4850: 66 6f 73 73 69 6c 5f 66 61 74 61 6c 28 22 75 73 fossil_fatal("us
4860: 65 20 2d 2d 72 65 70 6f 73 69 74 6f 72 79 20 6f e --repository o
4870: 72 20 2d 52 20 74 6f 20 73 70 65 63 69 66 69 63 r -R to specific
4880: 20 74 68 65 20 72 65 70 6f 73 69 74 6f 72 79 20 the repository
4890: 64 61 74 61 62 61 73 65 22 29 3b 0a 20 20 7d 0a database");. }.
48a0: 7d 0a 0a 2f 2a 0a 2a 2a 20 4f 70 65 6e 20 74 68 }../*.** Open th
48b0: 65 20 6c 6f 63 61 6c 20 64 61 74 61 62 61 73 65 e local database
48c0: 2e 20 20 49 66 20 75 6e 61 62 6c 65 2c 20 65 78 . If unable, ex
48d0: 69 74 20 77 69 74 68 20 61 6e 20 65 72 72 6f 72 it with an error
48e0: 2e 0a 2a 2f 0a 76 6f 69 64 20 64 62 5f 6d 75 73 ..*/.void db_mus
48f0: 74 5f 62 65 5f 77 69 74 68 69 6e 5f 74 72 65 65 t_be_within_tree
4900: 28 76 6f 69 64 29 7b 0a 20 20 69 66 28 20 64 62 (void){. if( db
4910: 5f 6f 70 65 6e 5f 6c 6f 63 61 6c 28 29 3d 3d 30 _open_local()==0
4920: 20 29 7b 0a 20 20 20 20 66 6f 73 73 69 6c 5f 66 ){. fossil_f
4930: 61 74 61 6c 28 22 6e 6f 74 20 77 69 74 68 69 6e atal("not within
4940: 20 61 6e 20 6f 70 65 6e 20 63 68 65 63 6b 6f 75 an open checkou
4950: 74 22 29 3b 0a 20 20 7d 0a 20 20 64 62 5f 6f 70 t");. }. db_op
4960: 65 6e 5f 72 65 70 6f 73 69 74 6f 72 79 28 30 29 en_repository(0)
4970: 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 43 6c 6f 73 65 ;.}../*.** Close
4980: 20 74 68 65 20 64 61 74 61 62 61 73 65 20 63 6f the database co
4990: 6e 6e 65 63 74 69 6f 6e 2e 0a 2a 2f 0a 76 6f 69 nnection..*/.voi
49a0: 64 20 64 62 5f 63 6c 6f 73 65 28 76 6f 69 64 29 d db_close(void)
49b0: 7b 0a 20 20 69 66 28 20 67 2e 64 62 3d 3d 30 20 {. if( g.db==0
49c0: 29 20 72 65 74 75 72 6e 3b 0a 20 20 77 68 69 6c ) return;. whil
49d0: 65 28 20 70 41 6c 6c 53 74 6d 74 20 29 7b 0a 20 e( pAllStmt ){.
49e0: 20 20 20 64 62 5f 66 69 6e 61 6c 69 7a 65 28 70 db_finalize(p
49f0: 41 6c 6c 53 74 6d 74 29 3b 0a 20 20 7d 0a 20 20 AllStmt);. }.
4a00: 67 2e 72 65 70 6f 73 69 74 6f 72 79 4f 70 65 6e g.repositoryOpen
4a10: 20 3d 20 30 3b 0a 20 20 67 2e 6c 6f 63 61 6c 4f = 0;. g.localO
4a20: 70 65 6e 20 3d 20 30 3b 0a 20 20 67 2e 63 6f 6e pen = 0;. g.con
4a30: 66 69 67 4f 70 65 6e 20 3d 20 30 3b 0a 20 20 73 figOpen = 0;. s
4a40: 71 6c 69 74 65 33 5f 63 6c 6f 73 65 28 67 2e 64 qlite3_close(g.d
4a50: 62 29 3b 0a 20 20 67 2e 64 62 20 3d 20 30 3b 0a b);. g.db = 0;.
4a60: 7d 0a 0a 0a 2f 2a 0a 2a 2a 20 43 72 65 61 74 65 }.../*.** Create
4a70: 20 61 20 6e 65 77 20 65 6d 70 74 79 20 72 65 70 a new empty rep
4a80: 6f 73 69 74 6f 72 79 20 64 61 74 61 62 61 73 65 ository database
4a90: 20 77 69 74 68 20 74 68 65 20 67 69 76 65 6e 20 with the given
4aa0: 6e 61 6d 65 2e 0a 2a 2a 0a 2a 2a 20 4f 6e 6c 79 name..**.** Only
4ab0: 20 74 68 65 20 73 63 68 65 6d 61 20 69 73 20 69 the schema is i
4ac0: 6e 69 74 69 61 6c 69 7a 65 64 2e 20 20 54 68 65 nitialized. The
4ad0: 20 72 65 71 75 69 72 65 64 20 56 41 52 20 74 61 required VAR ta
4ae0: 62 6c 65 73 20 65 6e 74 72 69 65 73 0a 2a 2a 20 bles entries.**
4af0: 61 72 65 20 6e 6f 74 20 73 65 74 20 62 79 20 74 are not set by t
4b00: 68 69 73 20 72 6f 75 74 69 6e 65 20 61 6e 64 20 his routine and
4b10: 6d 75 73 74 20 62 65 20 73 65 74 20 73 65 70 61 must be set sepa
4b20: 72 61 74 65 6c 79 20 69 6e 20 6f 72 64 65 72 0a rately in order.
4b30: 2a 2a 20 74 6f 20 6d 61 6b 65 20 74 68 65 20 6e ** to make the n
4b40: 65 77 20 66 69 6c 65 20 61 20 76 61 6c 69 64 20 ew file a valid
4b50: 64 61 74 61 62 61 73 65 2e 0a 2a 2f 0a 76 6f 69 database..*/.voi
4b60: 64 20 64 62 5f 63 72 65 61 74 65 5f 72 65 70 6f d db_create_repo
4b70: 73 69 74 6f 72 79 28 63 6f 6e 73 74 20 63 68 61 sitory(const cha
4b80: 72 20 2a 7a 46 69 6c 65 6e 61 6d 65 29 7b 0a 20 r *zFilename){.
4b90: 20 64 62 5f 69 6e 69 74 5f 64 61 74 61 62 61 73 db_init_databas
4ba0: 65 28 0a 20 20 20 20 20 7a 46 69 6c 65 6e 61 6d e(. zFilenam
4bb0: 65 2c 0a 20 20 20 20 20 7a 52 65 70 6f 73 69 74 e,. zReposit
4bc0: 6f 72 79 53 63 68 65 6d 61 31 2c 0a 20 20 20 20 orySchema1,.
4bd0: 20 7a 52 65 70 6f 73 69 74 6f 72 79 53 63 68 65 zRepositorySche
4be0: 6d 61 32 2c 0a 20 20 20 20 20 28 63 68 61 72 2a ma2,. (char*
4bf0: 29 30 0a 20 20 29 3b 0a 20 20 69 73 4e 65 77 52 )0. );. isNewR
4c00: 65 70 6f 20 3d 20 31 3b 0a 7d 0a 0a 2f 2a 0a 2a epo = 1;.}../*.*
4c10: 2a 20 46 69 6c 6c 20 61 6e 20 65 6d 70 74 79 20 * Fill an empty
4c20: 72 65 70 6f 73 69 74 6f 72 79 20 64 61 74 61 62 repository datab
4c30: 61 73 65 20 77 69 74 68 20 74 68 65 20 62 61 73 ase with the bas
4c40: 69 63 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 66 ic information f
4c50: 6f 72 20 61 0a 2a 2a 20 72 65 70 6f 73 69 74 6f or a.** reposito
4c60: 72 79 2e 20 54 68 69 73 20 66 75 6e 63 74 69 6f ry. This functio
4c70: 6e 20 69 73 20 73 68 61 72 65 64 20 62 65 74 77 n is shared betw
4c80: 65 65 6e 20 27 63 72 65 61 74 65 5f 72 65 70 6f een 'create_repo
4c90: 73 69 74 6f 72 79 5f 63 6d 64 27 0a 2a 2a 20 28 sitory_cmd'.** (
4ca0: 27 6e 65 77 27 29 20 61 6e 64 20 27 72 65 63 6f 'new') and 'reco
4cb0: 6e 73 74 72 75 63 74 5f 63 6d 64 27 20 28 27 72 nstruct_cmd' ('r
4cc0: 65 63 6f 6e 73 74 72 75 63 74 27 29 2c 20 62 6f econstruct'), bo
4cd0: 74 68 20 6f 66 20 77 68 69 63 68 20 63 72 65 61 th of which crea
4ce0: 74 65 0a 2a 2a 20 6e 65 77 20 72 65 70 6f 73 69 te.** new reposi
4cf0: 74 6f 72 69 65 73 2e 0a 2a 2a 0a 2a 2a 20 54 68 tories..**.** Th
4d00: 65 20 6d 61 6b 65 49 6e 69 74 69 61 6c 56 65 72 e makeInitialVer
4d10: 73 69 6f 6e 20 66 6c 61 67 20 64 65 74 65 72 6d sion flag determ
4d20: 69 6e 65 73 20 77 68 65 74 68 65 72 20 6f 72 20 ines whether or
4d30: 6e 6f 74 20 61 6e 20 69 6e 69 74 69 61 6c 0a 2a not an initial.*
4d40: 2a 20 6d 61 6e 69 66 65 73 74 20 69 73 20 63 72 * manifest is cr
4d50: 65 61 74 65 64 2e 20 20 54 68 65 20 6d 61 6b 65 eated. The make
4d60: 53 65 72 76 65 72 43 6f 64 65 73 20 66 6c 61 67 ServerCodes flag
4d70: 20 64 65 74 65 72 6d 69 6e 65 73 20 77 68 65 74 determines whet
4d80: 68 65 72 20 6f 72 0a 2a 2a 20 6e 6f 74 20 73 65 her or.** not se
4d90: 72 76 65 72 20 61 6e 64 20 70 72 6f 6a 65 63 74 rver and project
4da0: 20 63 6f 64 65 73 20 61 72 65 20 69 6e 76 65 6e codes are inven
4db0: 74 65 64 20 66 6f 72 20 74 68 69 73 20 72 65 70 ted for this rep
4dc0: 6f 73 69 74 6f 72 79 2e 0a 2a 2f 0a 76 6f 69 64 ository..*/.void
4dd0: 20 64 62 5f 69 6e 69 74 69 61 6c 5f 73 65 74 75 db_initial_setu
4de0: 70 20 28 69 6e 74 20 6d 61 6b 65 49 6e 69 74 69 p (int makeIniti
4df0: 61 6c 56 65 72 73 69 6f 6e 2c 20 69 6e 74 20 6d alVersion, int m
4e00: 61 6b 65 53 65 72 76 65 72 43 6f 64 65 73 29 7b akeServerCodes){
4e10: 0a 20 20 63 68 61 72 20 2a 7a 44 61 74 65 3b 0a . char *zDate;.
4e20: 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 55 const char *zU
4e30: 73 65 72 3b 0a 20 20 42 6c 6f 62 20 68 61 73 68 ser;. Blob hash
4e40: 3b 0a 20 20 42 6c 6f 62 20 6d 61 6e 69 66 65 73 ;. Blob manifes
4e50: 74 3b 0a 0a 20 20 64 62 5f 73 65 74 28 22 63 6f t;.. db_set("co
4e60: 6e 74 65 6e 74 2d 73 63 68 65 6d 61 22 2c 20 43 ntent-schema", C
4e70: 4f 4e 54 45 4e 54 5f 53 43 48 45 4d 41 2c 20 30 ONTENT_SCHEMA, 0
4e80: 29 3b 0a 20 20 64 62 5f 73 65 74 28 22 61 75 78 );. db_set("aux
4e90: 2d 73 63 68 65 6d 61 22 2c 20 41 55 58 5f 53 43 -schema", AUX_SC
4ea0: 48 45 4d 41 2c 20 30 29 3b 0a 20 20 69 66 28 20 HEMA, 0);. if(
4eb0: 6d 61 6b 65 53 65 72 76 65 72 43 6f 64 65 73 20 makeServerCodes
4ec0: 29 7b 0a 20 20 20 20 64 62 5f 6d 75 6c 74 69 5f ){. db_multi_
4ed0: 65 78 65 63 28 0a 20 20 20 20 20 20 22 49 4e 53 exec(. "INS
4ee0: 45 52 54 20 49 4e 54 4f 20 63 6f 6e 66 69 67 28 ERT INTO config(
4ef0: 6e 61 6d 65 2c 76 61 6c 75 65 29 22 0a 20 20 20 name,value)".
4f00: 20 20 20 22 20 56 41 4c 55 45 53 28 27 73 65 72 " VALUES('ser
4f10: 76 65 72 2d 63 6f 64 65 27 2c 20 6c 6f 77 65 72 ver-code', lower
4f20: 28 68 65 78 28 72 61 6e 64 6f 6d 62 6c 6f 62 28 (hex(randomblob(
4f30: 32 30 29 29 29 29 3b 22 0a 20 20 20 20 20 20 22 20))));". "
4f40: 49 4e 53 45 52 54 20 49 4e 54 4f 20 63 6f 6e 66 INSERT INTO conf
4f50: 69 67 28 6e 61 6d 65 2c 76 61 6c 75 65 29 22 0a ig(name,value)".
4f60: 20 20 20 20 20 20 22 20 56 41 4c 55 45 53 28 27 " VALUES('
4f70: 70 72 6f 6a 65 63 74 2d 63 6f 64 65 27 2c 20 6c project-code', l
4f80: 6f 77 65 72 28 68 65 78 28 72 61 6e 64 6f 6d 62 ower(hex(randomb
4f90: 6c 6f 62 28 32 30 29 29 29 29 3b 22 0a 20 20 20 lob(20))));".
4fa0: 20 29 3b 0a 20 20 7d 0a 20 20 69 66 28 20 21 64 );. }. if( !d
4fb0: 62 5f 69 73 5f 67 6c 6f 62 61 6c 28 22 61 75 74 b_is_global("aut
4fc0: 6f 73 79 6e 63 22 29 20 29 20 64 62 5f 73 65 74 osync") ) db_set
4fd0: 5f 69 6e 74 28 22 61 75 74 6f 73 79 6e 63 22 2c _int("autosync",
4fe0: 20 31 2c 20 30 29 3b 0a 20 20 69 66 28 20 21 64 1, 0);. if( !d
4ff0: 62 5f 69 73 5f 67 6c 6f 62 61 6c 28 22 6c 6f 63 b_is_global("loc
5000: 61 6c 61 75 74 68 22 29 20 29 20 64 62 5f 73 65 alauth") ) db_se
5010: 74 5f 69 6e 74 28 22 6c 6f 63 61 6c 61 75 74 68 t_int("localauth
5020: 22 2c 20 30 2c 20 30 29 3b 0a 20 20 7a 55 73 65 ", 0, 0);. zUse
5030: 72 20 3d 20 64 62 5f 67 65 74 28 22 64 65 66 61 r = db_get("defa
5040: 75 6c 74 2d 75 73 65 72 22 2c 20 30 29 3b 0a 20 ult-user", 0);.
5050: 20 69 66 28 20 7a 55 73 65 72 3d 3d 30 20 29 7b if( zUser==0 ){
5060: 0a 23 69 66 64 65 66 20 5f 5f 4d 49 4e 47 57 33 .#ifdef __MINGW3
5070: 32 5f 5f 0a 20 20 20 20 7a 55 73 65 72 20 3d 20 2__. zUser =
5080: 67 65 74 65 6e 76 28 22 55 53 45 52 4e 41 4d 45 getenv("USERNAME
5090: 22 29 3b 0a 23 65 6c 73 65 0a 20 20 20 20 7a 55 ");.#else. zU
50a0: 73 65 72 20 3d 20 67 65 74 65 6e 76 28 22 55 53 ser = getenv("US
50b0: 45 52 22 29 3b 0a 23 65 6e 64 69 66 0a 20 20 7d ER");.#endif. }
50c0: 0a 20 20 69 66 28 20 7a 55 73 65 72 3d 3d 30 20 . if( zUser==0
50d0: 29 7b 0a 20 20 20 20 7a 55 73 65 72 20 3d 20 22 ){. zUser = "
50e0: 72 6f 6f 74 22 3b 0a 20 20 7d 0a 20 20 64 62 5f root";. }. db_
50f0: 6d 75 6c 74 69 5f 65 78 65 63 28 0a 20 20 20 20 multi_exec(.
5100: 20 22 49 4e 53 45 52 54 20 49 4e 54 4f 20 75 73 "INSERT INTO us
5110: 65 72 28 6c 6f 67 69 6e 2c 20 70 77 2c 20 63 61 er(login, pw, ca
5120: 70 2c 20 69 6e 66 6f 29 22 0a 20 20 20 20 20 22 p, info)". "
5130: 56 41 4c 55 45 53 28 25 51 2c 27 27 2c 27 73 27 VALUES(%Q,'','s'
5140: 2c 27 27 29 22 2c 20 7a 55 73 65 72 0a 20 20 29 ,'')", zUser. )
5150: 3b 0a 20 20 64 62 5f 6d 75 6c 74 69 5f 65 78 65 ;. db_multi_exe
5160: 63 28 0a 20 20 20 20 20 22 49 4e 53 45 52 54 20 c(. "INSERT
5170: 49 4e 54 4f 20 75 73 65 72 28 6c 6f 67 69 6e 2c INTO user(login,
5180: 70 77 2c 63 61 70 2c 69 6e 66 6f 29 22 0a 20 20 pw,cap,info)".
5190: 20 20 20 22 20 20 20 56 41 4c 55 45 53 28 27 61 " VALUES('a
51a0: 6e 6f 6e 79 6d 6f 75 73 27 2c 27 61 6e 6f 6e 79 nonymous','anony
51b0: 6d 6f 75 73 27 2c 27 68 6a 6b 6f 72 77 27 2c 27 mous','hjkorw','
51c0: 41 6e 6f 6e 27 29 3b 22 0a 20 20 20 20 20 22 49 Anon');". "I
51d0: 4e 53 45 52 54 20 49 4e 54 4f 20 75 73 65 72 28 NSERT INTO user(
51e0: 6c 6f 67 69 6e 2c 70 77 2c 63 61 70 2c 69 6e 66 login,pw,cap,inf
51f0: 6f 29 22 0a 20 20 20 20 20 22 20 20 20 56 41 4c o)". " VAL
5200: 55 45 53 28 27 6e 6f 62 6f 64 79 27 2c 27 27 2c UES('nobody','',
5210: 27 6a 6f 72 27 2c 27 4e 6f 62 6f 64 79 27 29 3b 'jor','Nobody');
5220: 22 0a 20 20 29 3b 0a 20 20 75 73 65 72 5f 73 65 ". );. user_se
5230: 6c 65 63 74 28 29 3b 0a 0a 20 20 69 66 20 28 6d lect();.. if (m
5240: 61 6b 65 49 6e 69 74 69 61 6c 56 65 72 73 69 6f akeInitialVersio
5250: 6e 29 7b 0a 20 20 20 20 62 6c 6f 62 5f 7a 65 72 n){. blob_zer
5260: 6f 28 26 6d 61 6e 69 66 65 73 74 29 3b 0a 20 20 o(&manifest);.
5270: 20 20 62 6c 6f 62 5f 61 70 70 65 6e 64 66 28 26 blob_appendf(&
5280: 6d 61 6e 69 66 65 73 74 2c 20 22 43 20 69 6e 69 manifest, "C ini
5290: 74 69 61 6c 5c 5c 73 65 6d 70 74 79 5c 5c 73 62 tial\\sempty\\sb
52a0: 61 73 65 6c 69 6e 65 5c 6e 22 29 3b 0a 20 20 20 aseline\n");.
52b0: 20 7a 44 61 74 65 20 3d 20 64 62 5f 74 65 78 74 zDate = db_text
52c0: 28 30 2c 20 22 53 45 4c 45 43 54 20 64 61 74 65 (0, "SELECT date
52d0: 74 69 6d 65 28 27 6e 6f 77 27 29 22 29 3b 0a 20 time('now')");.
52e0: 20 20 20 7a 44 61 74 65 5b 31 30 5d 3d 27 54 27 zDate[10]='T'
52f0: 3b 0a 20 20 20 20 62 6c 6f 62 5f 61 70 70 65 6e ;. blob_appen
5300: 64 66 28 26 6d 61 6e 69 66 65 73 74 2c 20 22 44 df(&manifest, "D
5310: 20 25 73 5c 6e 22 2c 20 7a 44 61 74 65 29 3b 0a %s\n", zDate);.
5320: 20 20 20 20 62 6c 6f 62 5f 61 70 70 65 6e 64 66 blob_appendf
5330: 28 26 6d 61 6e 69 66 65 73 74 2c 20 22 50 5c 6e (&manifest, "P\n
5340: 22 29 3b 0a 20 20 20 20 6d 64 35 73 75 6d 5f 69 ");. md5sum_i
5350: 6e 69 74 28 29 3b 0a 20 20 20 20 62 6c 6f 62 5f nit();. blob_
5360: 61 70 70 65 6e 64 66 28 26 6d 61 6e 69 66 65 73 appendf(&manifes
5370: 74 2c 20 22 52 20 25 73 5c 6e 22 2c 20 6d 64 35 t, "R %s\n", md5
5380: 73 75 6d 5f 66 69 6e 69 73 68 28 30 29 29 3b 0a sum_finish(0));.
5390: 20 20 20 20 62 6c 6f 62 5f 61 70 70 65 6e 64 66 blob_appendf
53a0: 28 26 6d 61 6e 69 66 65 73 74 2c 20 22 55 20 25 (&manifest, "U %
53b0: 46 5c 6e 22 2c 20 67 2e 7a 4c 6f 67 69 6e 29 3b F\n", g.zLogin);
53c0: 0a 20 20 20 20 6d 64 35 73 75 6d 5f 62 6c 6f 62 . md5sum_blob
53d0: 28 26 6d 61 6e 69 66 65 73 74 2c 20 26 68 61 73 (&manifest, &has
53e0: 68 29 3b 0a 20 20 20 20 62 6c 6f 62 5f 61 70 70 h);. blob_app
53f0: 65 6e 64 66 28 26 6d 61 6e 69 66 65 73 74 2c 20 endf(&manifest,
5400: 22 5a 20 25 62 5c 6e 22 2c 20 26 68 61 73 68 29 "Z %b\n", &hash)
5410: 3b 0a 20 20 20 20 62 6c 6f 62 5f 72 65 73 65 74 ;. blob_reset
5420: 28 26 68 61 73 68 29 3b 0a 20 20 20 20 63 6f 6e (&hash);. con
5430: 74 65 6e 74 5f 70 75 74 28 26 6d 61 6e 69 66 65 tent_put(&manife
5440: 73 74 2c 20 30 2c 20 30 29 3b 0a 20 20 7d 0a 7d st, 0, 0);. }.}
5450: 0a 0a 2f 2a 0a 2a 2a 20 43 4f 4d 4d 41 4e 44 3a ../*.** COMMAND:
5460: 20 6e 65 77 0a 2a 2a 0a 2a 2a 20 55 73 61 67 65 new.**.** Usage
5470: 3a 20 25 66 6f 73 73 69 6c 20 6e 65 77 20 46 49 : %fossil new FI
5480: 4c 45 4e 41 4d 45 0a 2a 2a 0a 2a 2a 20 43 72 65 LENAME.**.** Cre
5490: 61 74 65 20 61 20 72 65 70 6f 73 69 74 6f 72 79 ate a repository
54a0: 20 66 6f 72 20 61 20 6e 65 77 20 70 72 6f 6a 65 for a new proje
54b0: 63 74 20 69 6e 20 74 68 65 20 66 69 6c 65 20 6e ct in the file n
54c0: 61 6d 65 64 20 46 49 4c 45 4e 41 4d 45 2e 0a 2a amed FILENAME..*
54d0: 2a 20 54 68 69 73 20 63 6f 6d 6d 61 6e 64 20 69 * This command i
54e0: 73 20 64 69 73 74 69 6e 63 74 20 66 72 6f 6d 20 s distinct from
54f0: 22 63 6c 6f 6e 65 22 2e 20 20 54 68 65 20 22 63 "clone". The "c
5500: 6c 6f 6e 65 22 20 63 6f 6d 6d 61 6e 64 20 6d 61 lone" command ma
5510: 6b 65 73 0a 2a 2a 20 61 20 63 6f 70 79 20 6f 66 kes.** a copy of
5520: 20 61 6e 20 65 78 69 73 74 69 6e 67 20 70 72 6f an existing pro
5530: 6a 65 63 74 2e 20 20 54 68 69 73 20 63 6f 6d 6d ject. This comm
5540: 61 6e 64 20 73 74 61 72 74 73 20 61 20 6e 65 77 and starts a new
5550: 20 70 72 6f 6a 65 63 74 2e 0a 2a 2f 0a 76 6f 69 project..*/.voi
5560: 64 20 63 72 65 61 74 65 5f 72 65 70 6f 73 69 74 d create_reposit
5570: 6f 72 79 5f 63 6d 64 28 76 6f 69 64 29 7b 0a 20 ory_cmd(void){.
5580: 20 69 66 28 20 67 2e 61 72 67 63 21 3d 33 20 29 if( g.argc!=3 )
5590: 7b 0a 20 20 20 20 75 73 61 67 65 28 22 52 45 50 {. usage("REP
55a0: 4f 53 49 54 4f 52 59 2d 4e 41 4d 45 22 29 3b 0a OSITORY-NAME");.
55b0: 20 20 7d 0a 20 20 64 62 5f 63 72 65 61 74 65 5f }. db_create_
55c0: 72 65 70 6f 73 69 74 6f 72 79 28 67 2e 61 72 67 repository(g.arg
55d0: 76 5b 32 5d 29 3b 0a 20 20 64 62 5f 6f 70 65 6e v[2]);. db_open
55e0: 5f 72 65 70 6f 73 69 74 6f 72 79 28 67 2e 61 72 _repository(g.ar
55f0: 67 76 5b 32 5d 29 3b 0a 20 20 64 62 5f 6f 70 65 gv[2]);. db_ope
5600: 6e 5f 63 6f 6e 66 69 67 28 29 3b 0a 20 20 64 62 n_config();. db
5610: 5f 62 65 67 69 6e 5f 74 72 61 6e 73 61 63 74 69 _begin_transacti
5620: 6f 6e 28 29 3b 0a 20 20 64 62 5f 69 6e 69 74 69 on();. db_initi
5630: 61 6c 5f 73 65 74 75 70 28 31 2c 20 31 29 3b 0a al_setup(1, 1);.
5640: 20 20 64 62 5f 65 6e 64 5f 74 72 61 6e 73 61 63 db_end_transac
5650: 74 69 6f 6e 28 30 29 3b 0a 20 20 70 72 69 6e 74 tion(0);. print
5660: 66 28 22 70 72 6f 6a 65 63 74 2d 69 64 3a 20 25 f("project-id: %
5670: 73 5c 6e 22 2c 20 64 62 5f 67 65 74 28 22 70 72 s\n", db_get("pr
5680: 6f 6a 65 63 74 2d 63 6f 64 65 22 2c 20 30 29 29 oject-code", 0))
5690: 3b 0a 20 20 70 72 69 6e 74 66 28 22 73 65 72 76 ;. printf("serv
56a0: 65 72 2d 69 64 3a 20 20 25 73 5c 6e 22 2c 20 64 er-id: %s\n", d
56b0: 62 5f 67 65 74 28 22 73 65 72 76 65 72 2d 63 6f b_get("server-co
56c0: 64 65 22 2c 20 30 29 29 3b 0a 20 20 70 72 69 6e de", 0));. prin
56d0: 74 66 28 22 61 64 6d 69 6e 2d 75 73 65 72 3a 20 tf("admin-user:
56e0: 25 73 20 28 6e 6f 20 70 61 73 73 77 6f 72 64 20 %s (no password
56f0: 73 65 74 20 79 65 74 21 29 5c 6e 22 2c 20 67 2e set yet!)\n", g.
5700: 7a 4c 6f 67 69 6e 29 3b 0a 20 20 70 72 69 6e 74 zLogin);. print
5710: 66 28 22 62 61 73 65 6c 69 6e 65 3a 20 20 20 25 f("baseline: %
5720: 73 5c 6e 22 2c 20 64 62 5f 74 65 78 74 28 30 2c s\n", db_text(0,
5730: 20 22 53 45 4c 45 43 54 20 75 75 69 64 20 46 52 "SELECT uuid FR
5740: 4f 4d 20 62 6c 6f 62 22 29 29 3b 0a 7d 0a 0a 2f OM blob"));.}../
5750: 2a 0a 2a 2a 20 53 51 4c 20 66 75 6e 63 74 69 6f *.** SQL functio
5760: 6e 73 20 66 6f 72 20 64 65 62 75 67 67 69 6e 67 ns for debugging
5770: 2e 0a 2a 2a 0a 2a 2a 20 54 68 65 20 70 72 69 6e ..**.** The prin
5780: 74 28 29 20 66 75 6e 63 74 69 6f 6e 20 77 72 69 t() function wri
5790: 74 65 73 20 69 74 73 20 61 72 67 75 6d 65 6e 74 tes its argument
57a0: 73 20 6f 6e 20 73 74 64 6f 75 74 2c 20 62 75 74 s on stdout, but
57b0: 20 6f 6e 6c 79 0a 2a 2a 20 69 66 20 74 68 65 20 only.** if the
57c0: 2d 73 71 6c 70 72 69 6e 74 20 63 6f 6d 6d 61 6e -sqlprint comman
57d0: 64 2d 6c 69 6e 65 20 6f 70 74 69 6f 6e 20 69 73 d-line option is
57e0: 20 74 75 72 6e 65 64 20 6f 6e 2e 0a 2a 2f 0a 73 turned on..*/.s
57f0: 74 61 74 69 63 20 76 6f 69 64 20 64 62 5f 73 71 tatic void db_sq
5800: 6c 5f 70 72 69 6e 74 28 0a 20 20 73 71 6c 69 74 l_print(. sqlit
5810: 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 e3_context *cont
5820: 65 78 74 2c 0a 20 20 69 6e 74 20 61 72 67 63 2c ext,. int argc,
5830: 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 . sqlite3_value
5840: 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 69 6e 74 **argv.){. int
5850: 20 69 3b 0a 20 20 69 66 28 20 67 2e 66 53 71 6c i;. if( g.fSql
5860: 50 72 69 6e 74 20 29 7b 0a 20 20 20 20 66 6f 72 Print ){. for
5870: 28 69 3d 30 3b 20 69 3c 61 72 67 63 3b 20 69 2b (i=0; i<argc; i+
5880: 2b 29 7b 0a 20 20 20 20 20 20 63 68 61 72 20 63 +){. char c
5890: 20 3d 20 69 3d 3d 61 72 67 63 2d 31 20 3f 20 27 = i==argc-1 ? '
58a0: 5c 6e 27 20 3a 20 27 20 27 3b 0a 20 20 20 20 20 \n' : ' ';.
58b0: 20 70 72 69 6e 74 66 28 22 25 73 25 63 22 2c 20 printf("%s%c",
58c0: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 sqlite3_value_te
58d0: 78 74 28 61 72 67 76 5b 69 5d 29 2c 20 63 29 3b xt(argv[i]), c);
58e0: 0a 20 20 20 20 7d 0a 20 20 7d 0a 7d 0a 73 74 61 . }. }.}.sta
58f0: 74 69 63 20 76 6f 69 64 20 64 62 5f 73 71 6c 5f tic void db_sql_
5900: 74 72 61 63 65 28 76 6f 69 64 20 2a 6e 6f 74 55 trace(void *notU
5910: 73 65 64 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 sed, const char
5920: 2a 7a 53 71 6c 29 7b 0a 20 20 70 72 69 6e 74 66 *zSql){. printf
5930: 28 22 25 73 5c 6e 22 2c 20 7a 53 71 6c 29 3b 0a ("%s\n", zSql);.
5940: 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 69 73 20 69 73 }../*.** This is
5950: 20 75 73 65 64 20 62 79 20 74 68 65 20 5b 63 6f used by the [co
5960: 6d 6d 69 74 5d 20 63 6f 6d 6d 61 6e 64 2e 0a 2a mmit] command..*
5970: 2a 0a 2a 2a 20 52 65 74 75 72 6e 20 74 72 75 65 *.** Return true
5980: 20 69 66 20 65 69 74 68 65 72 3a 0a 2a 2a 0a 2a if either:.**.*
5990: 2a 20 20 20 20 20 61 29 20 47 6c 6f 62 61 6c 2e * a) Global.
59a0: 61 43 6f 6d 6d 69 74 46 69 6c 65 20 69 73 20 4e aCommitFile is N
59b0: 55 4c 4c 2c 20 6f 72 0a 2a 2a 20 20 20 20 20 62 ULL, or.** b
59c0: 29 20 47 6c 6f 62 61 6c 2e 61 43 6f 6d 6d 69 74 ) Global.aCommit
59d0: 46 69 6c 65 20 63 6f 6e 74 61 69 6e 73 20 74 68 File contains th
59e0: 65 20 69 6e 74 65 67 65 72 20 70 61 73 73 65 64 e integer passed
59f0: 20 61 73 20 61 6e 20 61 72 67 75 6d 65 6e 74 2e as an argument.
5a00: 0a 2a 2a 0a 2a 2a 20 4f 74 68 65 72 77 69 73 65 .**.** Otherwise
5a10: 20 72 65 74 75 72 6e 20 66 61 6c 73 65 2e 0a 2a return false..*
5a20: 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 66 69 /.static void fi
5a30: 6c 65 5f 69 73 5f 73 65 6c 65 63 74 65 64 28 0a le_is_selected(.
5a40: 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 sqlite3_contex
5a50: 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e t *context,. in
5a60: 74 20 61 72 67 63 2c 0a 20 20 73 71 6c 69 74 65 t argc,. sqlite
5a70: 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29 3_value **argv.)
5a80: 7b 0a 20 20 61 73 73 65 72 74 28 61 72 67 63 3d {. assert(argc=
5a90: 3d 31 29 3b 0a 20 20 69 66 28 20 67 2e 61 43 6f =1);. if( g.aCo
5aa0: 6d 6d 69 74 46 69 6c 65 20 29 7b 0a 20 20 20 20 mmitFile ){.
5ab0: 69 6e 74 20 69 49 64 20 3d 20 73 71 6c 69 74 65 int iId = sqlite
5ac0: 33 5f 76 61 6c 75 65 5f 69 6e 74 28 61 72 67 76 3_value_int(argv
5ad0: 5b 30 5d 29 3b 0a 20 20 20 20 69 6e 74 20 69 69 [0]);. int ii
5ae0: 3b 0a 20 20 20 20 66 6f 72 28 69 69 3d 30 3b 20 ;. for(ii=0;
5af0: 67 2e 61 43 6f 6d 6d 69 74 46 69 6c 65 5b 69 69 g.aCommitFile[ii
5b00: 5d 3b 20 69 69 2b 2b 29 7b 0a 20 20 20 20 20 20 ]; ii++){.
5b10: 69 66 28 20 69 49 64 3d 3d 67 2e 61 43 6f 6d 6d if( iId==g.aComm
5b20: 69 74 46 69 6c 65 5b 69 69 5d 20 29 7b 0a 20 20 itFile[ii] ){.
5b30: 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 sqlite3_re
5b40: 73 75 6c 74 5f 69 6e 74 28 63 6f 6e 74 65 78 74 sult_int(context
5b50: 2c 20 31 29 3b 0a 20 20 20 20 20 20 20 20 72 65 , 1);. re
5b60: 74 75 72 6e 3b 0a 20 20 20 20 20 20 7d 0a 20 20 turn;. }.
5b70: 20 20 7d 0a 20 20 20 20 73 71 6c 69 74 65 33 5f }. sqlite3_
5b80: 72 65 73 75 6c 74 5f 69 6e 74 28 63 6f 6e 74 65 result_int(conte
5b90: 78 74 2c 20 30 29 3b 0a 20 20 7d 65 6c 73 65 7b xt, 0);. }else{
5ba0: 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 . sqlite3_res
5bb0: 75 6c 74 5f 69 6e 74 28 63 6f 6e 74 65 78 74 2c ult_int(context,
5bc0: 20 31 29 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 1);. }.}../*.*
5bd0: 2a 20 54 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 * This function
5be0: 72 65 67 69 73 74 65 72 73 20 61 75 78 69 6c 69 registers auxili
5bf0: 61 72 79 20 66 75 6e 63 74 69 6f 6e 73 20 77 68 ary functions wh
5c00: 65 6e 20 74 68 65 20 53 51 4c 69 74 65 0a 2a 2a en the SQLite.**
5c10: 20 64 61 74 61 62 61 73 65 20 63 6f 6e 6e 65 63 database connec
5c20: 74 69 6f 6e 20 69 73 20 66 69 72 73 74 20 65 73 tion is first es
5c30: 74 61 62 6c 69 73 68 65 64 2e 0a 2a 2f 0a 4c 4f tablished..*/.LO
5c40: 43 41 4c 20 76 6f 69 64 20 64 62 5f 63 6f 6e 6e CAL void db_conn
5c50: 65 63 74 69 6f 6e 5f 69 6e 69 74 28 76 6f 69 64 ection_init(void
5c60: 29 7b 0a 20 20 73 74 61 74 69 63 20 69 6e 74 20 ){. static int
5c70: 6f 6e 63 65 20 3d 20 31 3b 0a 20 20 69 66 28 20 once = 1;. if(
5c80: 6f 6e 63 65 20 29 7b 0a 20 20 20 20 73 71 6c 69 once ){. sqli
5c90: 74 65 33 5f 63 72 65 61 74 65 5f 66 75 6e 63 74 te3_create_funct
5ca0: 69 6f 6e 28 67 2e 64 62 2c 20 22 70 72 69 6e 74 ion(g.db, "print
5cb0: 22 2c 20 2d 31 2c 20 53 51 4c 49 54 45 5f 55 54 ", -1, SQLITE_UT
5cc0: 46 38 2c 20 30 2c 64 62 5f 73 71 6c 5f 70 72 69 F8, 0,db_sql_pri
5cd0: 6e 74 2c 30 2c 30 29 3b 0a 20 20 20 20 73 71 6c nt,0,0);. sql
5ce0: 69 74 65 33 5f 63 72 65 61 74 65 5f 66 75 6e 63 ite3_create_func
5cf0: 74 69 6f 6e 28 0a 20 20 20 20 20 20 67 2e 64 62 tion(. g.db
5d00: 2c 20 22 66 69 6c 65 5f 69 73 5f 73 65 6c 65 63 , "file_is_selec
5d10: 74 65 64 22 2c 20 31 2c 20 53 51 4c 49 54 45 5f ted", 1, SQLITE_
5d20: 55 54 46 38 2c 20 30 2c 20 66 69 6c 65 5f 69 73 UTF8, 0, file_is
5d30: 5f 73 65 6c 65 63 74 65 64 2c 30 2c 30 0a 20 20 _selected,0,0.
5d40: 20 20 29 3b 0a 20 20 20 20 69 66 28 20 67 2e 66 );. if( g.f
5d50: 53 71 6c 54 72 61 63 65 20 29 7b 0a 20 20 20 20 SqlTrace ){.
5d60: 20 20 73 71 6c 69 74 65 33 5f 74 72 61 63 65 28 sqlite3_trace(
5d70: 67 2e 64 62 2c 20 64 62 5f 73 71 6c 5f 74 72 61 g.db, db_sql_tra
5d80: 63 65 2c 20 30 29 3b 0a 20 20 20 20 7d 0a 20 20 ce, 0);. }.
5d90: 20 20 6f 6e 63 65 20 3d 20 30 3b 0a 20 20 7d 0a once = 0;. }.
5da0: 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65 74 75 72 6e 20 }../*.** Return
5db0: 74 72 75 65 20 69 66 20 74 68 65 20 73 74 72 69 true if the stri
5dc0: 6e 67 20 7a 56 61 6c 20 72 65 70 72 65 73 65 6e ng zVal represen
5dd0: 74 73 20 22 74 72 75 65 22 20 28 6f 72 20 22 66 ts "true" (or "f
5de0: 61 6c 73 65 22 29 2e 0a 2a 2f 0a 69 6e 74 20 69 alse")..*/.int i
5df0: 73 5f 74 72 75 74 68 28 63 6f 6e 73 74 20 63 68 s_truth(const ch
5e00: 61 72 20 2a 7a 56 61 6c 29 7b 0a 20 20 73 74 61 ar *zVal){. sta
5e10: 74 69 63 20 63 6f 6e 73 74 20 63 68 61 72 20 2a tic const char *
5e20: 61 7a 4f 6e 5b 5d 20 3d 20 7b 20 22 6f 6e 22 2c azOn[] = { "on",
5e30: 20 22 79 65 73 22 2c 20 22 74 72 75 65 22 2c 20 "yes", "true",
5e40: 22 31 22 20 7d 3b 0a 20 20 69 6e 74 20 69 3b 0a "1" };. int i;.
5e50: 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c 73 69 7a for(i=0; i<siz
5e60: 65 6f 66 28 61 7a 4f 6e 29 2f 73 69 7a 65 6f 66 eof(azOn)/sizeof
5e70: 28 61 7a 4f 6e 5b 30 5d 29 3b 20 69 2b 2b 29 7b (azOn[0]); i++){
5e80: 0a 20 20 20 20 69 66 28 20 73 74 72 63 6d 70 28 . if( strcmp(
5e90: 7a 56 61 6c 2c 61 7a 4f 6e 5b 69 5d 29 3d 3d 30 zVal,azOn[i])==0
5ea0: 20 29 20 72 65 74 75 72 6e 20 31 3b 0a 20 20 7d ) return 1;. }
5eb0: 0a 20 20 72 65 74 75 72 6e 20 30 3b 0a 7d 0a 69 . return 0;.}.i
5ec0: 6e 74 20 69 73 5f 66 61 6c 73 65 28 63 6f 6e 73 nt is_false(cons
5ed0: 74 20 63 68 61 72 20 2a 7a 56 61 6c 29 7b 0a 20 t char *zVal){.
5ee0: 20 73 74 61 74 69 63 20 63 6f 6e 73 74 20 63 68 static const ch
5ef0: 61 72 20 2a 61 7a 4f 66 66 5b 5d 20 3d 20 7b 20 ar *azOff[] = {
5f00: 22 6f 66 66 22 2c 20 22 6e 6f 22 2c 20 22 66 61 "off", "no", "fa
5f10: 6c 73 65 22 2c 20 22 30 22 20 7d 3b 0a 20 20 69 lse", "0" };. i
5f20: 6e 74 20 69 3b 0a 20 20 66 6f 72 28 69 3d 30 3b nt i;. for(i=0;
5f30: 20 69 3c 73 69 7a 65 6f 66 28 61 7a 4f 66 66 29 i<sizeof(azOff)
5f40: 2f 73 69 7a 65 6f 66 28 61 7a 4f 66 66 5b 30 5d /sizeof(azOff[0]
5f50: 29 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 69 66 28 ); i++){. if(
5f60: 20 73 74 72 63 6d 70 28 7a 56 61 6c 2c 61 7a 4f strcmp(zVal,azO
5f70: 66 66 5b 69 5d 29 3d 3d 30 20 29 20 72 65 74 75 ff[i])==0 ) retu
5f80: 72 6e 20 31 3b 0a 20 20 7d 0a 20 20 72 65 74 75 rn 1;. }. retu
5f90: 72 6e 20 30 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 47 rn 0;.}../*.** G
5fa0: 65 74 20 61 6e 64 20 73 65 74 20 76 61 6c 75 65 et and set value
5fb0: 73 20 66 72 6f 6d 20 74 68 65 20 43 4f 4e 46 49 s from the CONFI
5fc0: 47 2c 20 47 4c 4f 42 41 4c 5f 43 4f 4e 46 49 47 G, GLOBAL_CONFIG
5fd0: 20 61 6e 64 20 56 56 41 52 20 74 61 62 6c 65 20 and VVAR table
5fe0: 69 6e 20 74 68 65 0a 2a 2a 20 72 65 70 6f 73 69 in the.** reposi
5ff0: 74 6f 72 79 20 61 6e 64 20 6c 6f 63 61 6c 20 64 tory and local d
6000: 61 74 61 62 61 73 65 73 2e 0a 2a 2f 0a 63 68 61 atabases..*/.cha
6010: 72 20 2a 64 62 5f 67 65 74 28 63 6f 6e 73 74 20 r *db_get(const
6020: 63 68 61 72 20 2a 7a 4e 61 6d 65 2c 20 63 68 61 char *zName, cha
6030: 72 20 2a 7a 44 65 66 61 75 6c 74 29 7b 0a 20 20 r *zDefault){.
6040: 63 68 61 72 20 2a 7a 20 3d 20 30 3b 0a 20 20 69 char *z = 0;. i
6050: 66 28 20 67 2e 72 65 70 6f 73 69 74 6f 72 79 4f f( g.repositoryO
6060: 70 65 6e 20 29 7b 0a 20 20 20 20 7a 20 3d 20 64 pen ){. z = d
6070: 62 5f 74 65 78 74 28 30 2c 20 22 53 45 4c 45 43 b_text(0, "SELEC
6080: 54 20 76 61 6c 75 65 20 46 52 4f 4d 20 63 6f 6e T value FROM con
6090: 66 69 67 20 57 48 45 52 45 20 6e 61 6d 65 3d 25 fig WHERE name=%
60a0: 51 22 2c 20 7a 4e 61 6d 65 29 3b 0a 20 20 7d 0a Q", zName);. }.
60b0: 20 20 69 66 28 20 7a 3d 3d 30 20 26 26 20 67 2e if( z==0 && g.
60c0: 63 6f 6e 66 69 67 4f 70 65 6e 20 29 7b 0a 20 20 configOpen ){.
60d0: 20 20 7a 20 3d 20 64 62 5f 74 65 78 74 28 30 2c z = db_text(0,
60e0: 20 22 53 45 4c 45 43 54 20 76 61 6c 75 65 20 46 "SELECT value F
60f0: 52 4f 4d 20 67 6c 6f 62 61 6c 5f 63 6f 6e 66 69 ROM global_confi
6100: 67 20 57 48 45 52 45 20 6e 61 6d 65 3d 25 51 22 g WHERE name=%Q"
6110: 2c 20 7a 4e 61 6d 65 29 3b 0a 20 20 7d 0a 20 20 , zName);. }.
6120: 69 66 28 20 7a 3d 3d 30 20 29 7b 0a 20 20 20 20 if( z==0 ){.
6130: 7a 20 3d 20 7a 44 65 66 61 75 6c 74 3b 0a 20 20 z = zDefault;.
6140: 7d 0a 20 20 72 65 74 75 72 6e 20 7a 3b 0a 7d 0a }. return z;.}.
6150: 76 6f 69 64 20 64 62 5f 73 65 74 28 63 6f 6e 73 void db_set(cons
6160: 74 20 63 68 61 72 20 2a 7a 4e 61 6d 65 2c 20 63 t char *zName, c
6170: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 56 61 6c 75 onst char *zValu
6180: 65 2c 20 69 6e 74 20 67 6c 6f 62 61 6c 46 6c 61 e, int globalFla
6190: 67 29 7b 0a 20 20 64 62 5f 62 65 67 69 6e 5f 74 g){. db_begin_t
61a0: 72 61 6e 73 61 63 74 69 6f 6e 28 29 3b 0a 20 20 ransaction();.
61b0: 64 62 5f 6d 75 6c 74 69 5f 65 78 65 63 28 22 52 db_multi_exec("R
61c0: 45 50 4c 41 43 45 20 49 4e 54 4f 20 25 73 63 6f EPLACE INTO %sco
61d0: 6e 66 69 67 28 6e 61 6d 65 2c 76 61 6c 75 65 29 nfig(name,value)
61e0: 20 56 41 4c 55 45 53 28 25 51 2c 25 51 29 22 2c VALUES(%Q,%Q)",
61f0: 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .
6200: 20 20 67 6c 6f 62 61 6c 46 6c 61 67 20 3f 20 22 globalFlag ? "
6210: 67 6c 6f 62 61 6c 5f 22 20 3a 20 22 22 2c 20 7a global_" : "", z
6220: 4e 61 6d 65 2c 20 7a 56 61 6c 75 65 29 3b 0a 20 Name, zValue);.
6230: 20 69 66 28 20 67 6c 6f 62 61 6c 46 6c 61 67 20 if( globalFlag
6240: 26 26 20 67 2e 72 65 70 6f 73 69 74 6f 72 79 4f && g.repositoryO
6250: 70 65 6e 20 29 7b 0a 20 20 20 20 64 62 5f 6d 75 pen ){. db_mu
6260: 6c 74 69 5f 65 78 65 63 28 22 44 45 4c 45 54 45 lti_exec("DELETE
6270: 20 46 52 4f 4d 20 63 6f 6e 66 69 67 20 57 48 45 FROM config WHE
6280: 52 45 20 6e 61 6d 65 3d 25 51 22 2c 20 7a 4e 61 RE name=%Q", zNa
6290: 6d 65 29 3b 0a 20 20 7d 0a 20 20 64 62 5f 65 6e me);. }. db_en
62a0: 64 5f 74 72 61 6e 73 61 63 74 69 6f 6e 28 30 29 d_transaction(0)
62b0: 3b 0a 7d 0a 76 6f 69 64 20 64 62 5f 75 6e 73 65 ;.}.void db_unse
62c0: 74 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 4e t(const char *zN
62d0: 61 6d 65 2c 20 69 6e 74 20 67 6c 6f 62 61 6c 46 ame, int globalF
62e0: 6c 61 67 29 7b 0a 20 20 64 62 5f 62 65 67 69 6e lag){. db_begin
62f0: 5f 74 72 61 6e 73 61 63 74 69 6f 6e 28 29 3b 0a _transaction();.
6300: 20 20 64 62 5f 6d 75 6c 74 69 5f 65 78 65 63 28 db_multi_exec(
6310: 22 44 45 4c 45 54 45 20 46 52 4f 4d 20 25 73 63 "DELETE FROM %sc
6320: 6f 6e 66 69 67 20 57 48 45 52 45 20 6e 61 6d 65 onfig WHERE name
6330: 3d 25 51 22 2c 0a 20 20 20 20 20 20 20 20 20 20 =%Q",.
6340: 20 20 20 20 20 20 20 67 6c 6f 62 61 6c 46 6c 61 globalFla
6350: 67 20 3f 20 22 67 6c 6f 62 61 6c 5f 22 20 3a 20 g ? "global_" :
6360: 22 22 2c 20 7a 4e 61 6d 65 29 3b 0a 20 20 69 66 "", zName);. if
6370: 28 20 67 6c 6f 62 61 6c 46 6c 61 67 20 26 26 20 ( globalFlag &&
6380: 67 2e 72 65 70 6f 73 69 74 6f 72 79 4f 70 65 6e g.repositoryOpen
6390: 20 29 7b 0a 20 20 20 20 64 62 5f 6d 75 6c 74 69 ){. db_multi
63a0: 5f 65 78 65 63 28 22 44 45 4c 45 54 45 20 46 52 _exec("DELETE FR
63b0: 4f 4d 20 63 6f 6e 66 69 67 20 57 48 45 52 45 20 OM config WHERE
63c0: 6e 61 6d 65 3d 25 51 22 2c 20 7a 4e 61 6d 65 29 name=%Q", zName)
63d0: 3b 0a 20 20 7d 0a 20 20 64 62 5f 65 6e 64 5f 74 ;. }. db_end_t
63e0: 72 61 6e 73 61 63 74 69 6f 6e 28 30 29 3b 0a 7d ransaction(0);.}
63f0: 0a 69 6e 74 20 64 62 5f 69 73 5f 67 6c 6f 62 61 .int db_is_globa
6400: 6c 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 4e l(const char *zN
6410: 61 6d 65 29 7b 0a 20 20 69 66 28 20 67 2e 63 6f ame){. if( g.co
6420: 6e 66 69 67 4f 70 65 6e 20 29 7b 0a 20 20 20 20 nfigOpen ){.
6430: 72 65 74 75 72 6e 20 64 62 5f 65 78 69 73 74 73 return db_exists
6440: 28 22 53 45 4c 45 43 54 20 31 20 46 52 4f 4d 20 ("SELECT 1 FROM
6450: 67 6c 6f 62 61 6c 5f 63 6f 6e 66 69 67 20 57 48 global_config WH
6460: 45 52 45 20 6e 61 6d 65 3d 25 51 22 2c 20 7a 4e ERE name=%Q", zN
6470: 61 6d 65 29 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 ame);. }else{.
6480: 20 20 20 72 65 74 75 72 6e 20 30 3b 0a 20 20 7d return 0;. }
6490: 0a 7d 0a 69 6e 74 20 64 62 5f 67 65 74 5f 69 6e .}.int db_get_in
64a0: 74 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 4e t(const char *zN
64b0: 61 6d 65 2c 20 69 6e 74 20 64 66 6c 74 29 7b 0a ame, int dflt){.
64c0: 20 20 69 6e 74 20 76 20 3d 20 64 66 6c 74 3b 0a int v = dflt;.
64d0: 20 20 69 6e 74 20 72 63 3b 0a 20 20 69 66 28 20 int rc;. if(
64e0: 67 2e 72 65 70 6f 73 69 74 6f 72 79 4f 70 65 6e g.repositoryOpen
64f0: 20 29 7b 0a 20 20 20 20 53 74 6d 74 20 71 3b 0a ){. Stmt q;.
6500: 20 20 20 20 64 62 5f 70 72 65 70 61 72 65 28 26 db_prepare(&
6510: 71 2c 20 22 53 45 4c 45 43 54 20 76 61 6c 75 65 q, "SELECT value
6520: 20 46 52 4f 4d 20 63 6f 6e 66 69 67 20 57 48 45 FROM config WHE
6530: 52 45 20 6e 61 6d 65 3d 25 51 22 2c 20 7a 4e 61 RE name=%Q", zNa
6540: 6d 65 29 3b 0a 20 20 20 20 72 63 20 3d 20 64 62 me);. rc = db
6550: 5f 73 74 65 70 28 26 71 29 3b 0a 20 20 20 20 69 _step(&q);. i
6560: 66 28 20 72 63 3d 3d 53 51 4c 49 54 45 5f 52 4f f( rc==SQLITE_RO
6570: 57 20 29 7b 0a 20 20 20 20 20 20 76 20 3d 20 64 W ){. v = d
6580: 62 5f 63 6f 6c 75 6d 6e 5f 69 6e 74 28 26 71 2c b_column_int(&q,
6590: 20 30 29 3b 0a 20 20 20 20 7d 0a 20 20 20 20 64 0);. }. d
65a0: 62 5f 66 69 6e 61 6c 69 7a 65 28 26 71 29 3b 0a b_finalize(&q);.
65b0: 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 72 63 20 }else{. rc
65c0: 3d 20 53 51 4c 49 54 45 5f 44 4f 4e 45 3b 0a 20 = SQLITE_DONE;.
65d0: 20 7d 0a 20 20 69 66 28 20 72 63 3d 3d 53 51 4c }. if( rc==SQL
65e0: 49 54 45 5f 44 4f 4e 45 20 26 26 20 67 2e 63 6f ITE_DONE && g.co
65f0: 6e 66 69 67 4f 70 65 6e 20 29 7b 0a 20 20 20 20 nfigOpen ){.
6600: 76 20 3d 20 64 62 5f 69 6e 74 28 64 66 6c 74 2c v = db_int(dflt,
6610: 20 22 53 45 4c 45 43 54 20 76 61 6c 75 65 20 46 "SELECT value F
6620: 52 4f 4d 20 67 6c 6f 62 61 6c 5f 63 6f 6e 66 69 ROM global_confi
6630: 67 20 57 48 45 52 45 20 6e 61 6d 65 3d 25 51 22 g WHERE name=%Q"
6640: 2c 20 7a 4e 61 6d 65 29 3b 0a 20 20 7d 0a 20 20 , zName);. }.
6650: 72 65 74 75 72 6e 20 76 3b 0a 7d 0a 76 6f 69 64 return v;.}.void
6660: 20 64 62 5f 73 65 74 5f 69 6e 74 28 63 6f 6e 73 db_set_int(cons
6670: 74 20 63 68 61 72 20 2a 7a 4e 61 6d 65 2c 20 69 t char *zName, i
6680: 6e 74 20 76 61 6c 75 65 2c 20 69 6e 74 20 67 6c nt value, int gl
6690: 6f 62 61 6c 46 6c 61 67 29 7b 0a 20 20 64 62 5f obalFlag){. db_
66a0: 62 65 67 69 6e 5f 74 72 61 6e 73 61 63 74 69 6f begin_transactio
66b0: 6e 28 29 3b 0a 20 20 64 62 5f 6d 75 6c 74 69 5f n();. db_multi_
66c0: 65 78 65 63 28 22 52 45 50 4c 41 43 45 20 49 4e exec("REPLACE IN
66d0: 54 4f 20 25 73 63 6f 6e 66 69 67 28 6e 61 6d 65 TO %sconfig(name
66e0: 2c 76 61 6c 75 65 29 20 56 41 4c 55 45 53 28 25 ,value) VALUES(%
66f0: 51 2c 25 64 29 22 2c 0a 20 20 20 20 20 20 20 20 Q,%d)",.
6700: 20 20 20 20 20 20 20 20 67 6c 6f 62 61 6c 46 6c globalFl
6710: 61 67 20 3f 20 22 67 6c 6f 62 61 6c 5f 22 20 3a ag ? "global_" :
6720: 20 22 22 2c 20 7a 4e 61 6d 65 2c 20 76 61 6c 75 "", zName, valu
6730: 65 29 3b 0a 20 20 69 66 28 20 67 6c 6f 62 61 6c e);. if( global
6740: 46 6c 61 67 20 26 26 20 67 2e 72 65 70 6f 73 69 Flag && g.reposi
6750: 74 6f 72 79 4f 70 65 6e 20 29 7b 0a 20 20 20 20 toryOpen ){.
6760: 64 62 5f 6d 75 6c 74 69 5f 65 78 65 63 28 22 44 db_multi_exec("D
6770: 45 4c 45 54 45 20 46 52 4f 4d 20 63 6f 6e 66 69 ELETE FROM confi
6780: 67 20 57 48 45 52 45 20 6e 61 6d 65 3d 25 51 22 g WHERE name=%Q"
6790: 2c 20 7a 4e 61 6d 65 29 3b 0a 20 20 7d 0a 20 20 , zName);. }.
67a0: 64 62 5f 65 6e 64 5f 74 72 61 6e 73 61 63 74 69 db_end_transacti
67b0: 6f 6e 28 30 29 3b 0a 7d 0a 69 6e 74 20 64 62 5f on(0);.}.int db_
67c0: 67 65 74 5f 62 6f 6f 6c 65 61 6e 28 63 6f 6e 73 get_boolean(cons
67d0: 74 20 63 68 61 72 20 2a 7a 4e 61 6d 65 2c 20 69 t char *zName, i
67e0: 6e 74 20 64 66 6c 74 29 7b 0a 20 20 63 68 61 72 nt dflt){. char
67f0: 20 2a 7a 56 61 6c 20 3d 20 64 62 5f 67 65 74 28 *zVal = db_get(
6800: 7a 4e 61 6d 65 2c 20 64 66 6c 74 20 3f 20 22 6f zName, dflt ? "o
6810: 6e 22 20 3a 20 22 6f 66 66 22 29 3b 0a 20 20 69 n" : "off");. i
6820: 66 28 20 69 73 5f 74 72 75 74 68 28 7a 56 61 6c f( is_truth(zVal
6830: 29 20 29 20 72 65 74 75 72 6e 20 31 3b 0a 20 20 ) ) return 1;.
6840: 69 66 28 20 69 73 5f 66 61 6c 73 65 28 7a 56 61 if( is_false(zVa
6850: 6c 29 20 29 20 72 65 74 75 72 6e 20 30 3b 0a 20 l) ) return 0;.
6860: 20 72 65 74 75 72 6e 20 64 66 6c 74 3b 0a 7d 0a return dflt;.}.
6870: 63 68 61 72 20 2a 64 62 5f 6c 67 65 74 28 63 6f char *db_lget(co
6880: 6e 73 74 20 63 68 61 72 20 2a 7a 4e 61 6d 65 2c nst char *zName,
6890: 20 63 68 61 72 20 2a 7a 44 65 66 61 75 6c 74 29 char *zDefault)
68a0: 7b 0a 20 20 72 65 74 75 72 6e 20 64 62 5f 74 65 {. return db_te
68b0: 78 74 28 28 63 68 61 72 2a 29 7a 44 65 66 61 75 xt((char*)zDefau
68c0: 6c 74 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 lt,.
68d0: 20 20 20 20 20 22 53 45 4c 45 43 54 20 76 61 6c "SELECT val
68e0: 75 65 20 46 52 4f 4d 20 76 76 61 72 20 57 48 45 ue FROM vvar WHE
68f0: 52 45 20 6e 61 6d 65 3d 25 51 22 2c 20 7a 4e 61 RE name=%Q", zNa
6900: 6d 65 29 3b 0a 7d 0a 76 6f 69 64 20 64 62 5f 6c me);.}.void db_l
6910: 73 65 74 28 63 6f 6e 73 74 20 63 68 61 72 20 2a set(const char *
6920: 7a 4e 61 6d 65 2c 20 63 6f 6e 73 74 20 63 68 61 zName, const cha
6930: 72 20 2a 7a 56 61 6c 75 65 29 7b 0a 20 20 64 62 r *zValue){. db
6940: 5f 6d 75 6c 74 69 5f 65 78 65 63 28 22 52 45 50 _multi_exec("REP
6950: 4c 41 43 45 20 49 4e 54 4f 20 76 76 61 72 28 6e LACE INTO vvar(n
6960: 61 6d 65 2c 76 61 6c 75 65 29 20 56 41 4c 55 45 ame,value) VALUE
6970: 53 28 25 51 2c 25 51 29 22 2c 20 7a 4e 61 6d 65 S(%Q,%Q)", zName
6980: 2c 20 7a 56 61 6c 75 65 29 3b 0a 7d 0a 69 6e 74 , zValue);.}.int
6990: 20 64 62 5f 6c 67 65 74 5f 69 6e 74 28 63 6f 6e db_lget_int(con
69a0: 73 74 20 63 68 61 72 20 2a 7a 4e 61 6d 65 2c 20 st char *zName,
69b0: 69 6e 74 20 64 66 6c 74 29 7b 0a 20 20 72 65 74 int dflt){. ret
69c0: 75 72 6e 20 64 62 5f 69 6e 74 28 64 66 6c 74 2c urn db_int(dflt,
69d0: 20 22 53 45 4c 45 43 54 20 76 61 6c 75 65 20 46 "SELECT value F
69e0: 52 4f 4d 20 76 76 61 72 20 57 48 45 52 45 20 6e ROM vvar WHERE n
69f0: 61 6d 65 3d 25 51 22 2c 20 7a 4e 61 6d 65 29 3b ame=%Q", zName);
6a00: 0a 7d 0a 76 6f 69 64 20 64 62 5f 6c 73 65 74 5f .}.void db_lset_
6a10: 69 6e 74 28 63 6f 6e 73 74 20 63 68 61 72 20 2a int(const char *
6a20: 7a 4e 61 6d 65 2c 20 69 6e 74 20 76 61 6c 75 65 zName, int value
6a30: 29 7b 0a 20 20 64 62 5f 6d 75 6c 74 69 5f 65 78 ){. db_multi_ex
6a40: 65 63 28 22 52 45 50 4c 41 43 45 20 49 4e 54 4f ec("REPLACE INTO
6a50: 20 76 76 61 72 28 6e 61 6d 65 2c 76 61 6c 75 65 vvar(name,value
6a60: 29 20 56 41 4c 55 45 53 28 25 51 2c 25 64 29 22 ) VALUES(%Q,%d)"
6a70: 2c 20 7a 4e 61 6d 65 2c 20 76 61 6c 75 65 29 3b , zName, value);
6a80: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 43 4f 4d 4d 41 4e .}../*.** COMMAN
6a90: 44 3a 20 6f 70 65 6e 0a 2a 2a 0a 2a 2a 20 55 73 D: open.**.** Us
6aa0: 61 67 65 3a 20 6f 70 65 6e 20 46 49 4c 45 4e 41 age: open FILENA
6ab0: 4d 45 0a 2a 2a 0a 2a 2a 20 4f 70 65 6e 20 61 20 ME.**.** Open a
6ac0: 63 6f 6e 6e 65 63 74 69 6f 6e 20 74 6f 20 74 68 connection to th
6ad0: 65 20 6c 6f 63 61 6c 20 72 65 70 6f 73 69 74 6f e local reposito
6ae0: 72 79 20 69 6e 20 46 49 4c 45 4e 41 4d 45 2e 20 ry in FILENAME.
6af0: 20 41 20 63 68 65 63 6b 6f 75 74 0a 2a 2a 20 66 A checkout.** f
6b00: 6f 72 20 74 68 65 20 72 65 70 6f 73 69 74 6f 72 or the repositor
6b10: 79 20 69 73 20 63 72 65 61 74 65 64 20 77 69 74 y is created wit
6b20: 68 20 69 74 73 20 72 6f 6f 74 20 61 74 20 74 68 h its root at th
6b30: 65 20 77 6f 72 6b 69 6e 67 20 64 69 72 65 63 74 e working direct
6b40: 6f 72 79 2e 0a 2a 2a 20 53 65 65 20 61 6c 73 6f ory..** See also
6b50: 20 74 68 65 20 22 63 6c 6f 73 65 22 20 63 6f 6d the "close" com
6b60: 6d 61 6e 64 2e 0a 2a 2f 0a 76 6f 69 64 20 63 6d mand..*/.void cm
6b70: 64 5f 6f 70 65 6e 28 76 6f 69 64 29 7b 0a 20 20 d_open(void){.
6b80: 42 6c 6f 62 20 70 61 74 68 3b 0a 20 20 69 6e 74 Blob path;. int
6b90: 20 76 69 64 3b 0a 20 20 73 74 61 74 69 63 20 63 vid;. static c
6ba0: 68 61 72 20 2a 61 7a 4e 65 77 41 72 67 76 5b 5d har *azNewArgv[]
6bb0: 20 3d 20 7b 20 30 2c 20 22 75 70 64 61 74 65 22 = { 0, "update"
6bc0: 2c 20 22 2d 2d 6c 61 74 65 73 74 22 2c 20 30 20 , "--latest", 0
6bd0: 7d 3b 0a 20 20 75 72 6c 5f 70 72 6f 78 79 5f 6f };. url_proxy_o
6be0: 70 74 69 6f 6e 73 28 29 3b 0a 20 20 69 66 28 20 ptions();. if(
6bf0: 67 2e 61 72 67 63 21 3d 33 20 29 7b 0a 20 20 20 g.argc!=3 ){.
6c00: 20 75 73 61 67 65 28 22 52 45 50 4f 53 49 54 4f usage("REPOSITO
6c10: 52 59 2d 46 49 4c 45 4e 41 4d 45 22 29 3b 0a 20 RY-FILENAME");.
6c20: 20 7d 0a 20 20 69 66 28 20 64 62 5f 6f 70 65 6e }. if( db_open
6c30: 5f 6c 6f 63 61 6c 28 29 20 29 7b 0a 20 20 20 20 _local() ){.
6c40: 66 6f 73 73 69 6c 5f 70 61 6e 69 63 28 22 61 6c fossil_panic("al
6c50: 72 65 61 64 79 20 77 69 74 68 69 6e 20 61 6e 20 ready within an
6c60: 6f 70 65 6e 20 74 72 65 65 20 72 6f 6f 74 65 64 open tree rooted
6c70: 20 61 74 20 25 73 22 2c 20 67 2e 7a 4c 6f 63 61 at %s", g.zLoca
6c80: 6c 52 6f 6f 74 29 3b 0a 20 20 7d 0a 20 20 66 69 lRoot);. }. fi
6c90: 6c 65 5f 63 61 6e 6f 6e 69 63 61 6c 5f 6e 61 6d le_canonical_nam
6ca0: 65 28 67 2e 61 72 67 76 5b 32 5d 2c 20 26 70 61 e(g.argv[2], &pa
6cb0: 74 68 29 3b 0a 20 20 64 62 5f 6f 70 65 6e 5f 72 th);. db_open_r
6cc0: 65 70 6f 73 69 74 6f 72 79 28 62 6c 6f 62 5f 73 epository(blob_s
6cd0: 74 72 28 26 70 61 74 68 29 29 3b 0a 20 20 64 62 tr(&path));. db
6ce0: 5f 69 6e 69 74 5f 64 61 74 61 62 61 73 65 28 22 _init_database("
6cf0: 2e 2f 5f 46 4f 53 53 49 4c 5f 22 2c 20 7a 4c 6f ./_FOSSIL_", zLo
6d00: 63 61 6c 53 63 68 65 6d 61 2c 20 28 63 68 61 72 calSchema, (char
6d10: 2a 29 30 29 3b 0a 20 20 64 62 5f 6f 70 65 6e 5f *)0);. db_open_
6d20: 6c 6f 63 61 6c 28 29 3b 0a 20 20 64 62 5f 6c 73 local();. db_ls
6d30: 65 74 28 22 72 65 70 6f 73 69 74 6f 72 79 22 2c et("repository",
6d40: 20 62 6c 6f 62 5f 73 74 72 28 26 70 61 74 68 29 blob_str(&path)
6d50: 29 3b 0a 20 20 76 69 64 20 3d 20 64 62 5f 69 6e );. vid = db_in
6d60: 74 28 30 2c 20 22 53 45 4c 45 43 54 20 70 69 64 t(0, "SELECT pid
6d70: 20 46 52 4f 4d 20 70 6c 69 6e 6b 20 79 22 0a 20 FROM plink y".
6d80: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
6d90: 20 22 20 57 48 45 52 45 20 4e 4f 54 20 45 58 49 " WHERE NOT EXI
6da0: 53 54 53 28 53 45 4c 45 43 54 20 31 20 46 52 4f STS(SELECT 1 FRO
6db0: 4d 20 70 6c 69 6e 6b 20 78 20 57 48 45 52 45 20 M plink x WHERE
6dc0: 78 2e 63 69 64 3d 79 2e 70 69 64 29 22 29 3b 0a x.cid=y.pid)");.
6dd0: 20 20 69 66 28 20 76 69 64 3d 3d 30 20 29 7b 0a if( vid==0 ){.
6de0: 20 20 20 20 64 62 5f 6c 73 65 74 5f 69 6e 74 28 db_lset_int(
6df0: 22 63 68 65 63 6b 6f 75 74 22 2c 20 31 29 3b 0a "checkout", 1);.
6e00: 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 64 62 5f }else{. db_
6e10: 6c 73 65 74 5f 69 6e 74 28 22 63 68 65 63 6b 6f lset_int("checko
6e20: 75 74 22 2c 20 76 69 64 29 3b 0a 20 20 20 20 67 ut", vid);. g
6e30: 2e 61 72 67 76 20 3d 20 61 7a 4e 65 77 41 72 67 .argv = azNewArg
6e40: 76 3b 0a 20 20 20 20 67 2e 61 72 67 63 20 3d 20 v;. g.argc =
6e50: 33 3b 0a 20 20 20 20 75 70 64 61 74 65 5f 63 6d 3;. update_cm
6e60: 64 28 29 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a d();. }.}../*.*
6e70: 2a 20 50 72 69 6e 74 20 74 68 65 20 76 61 6c 75 * Print the valu
6e80: 65 20 6f 66 20 61 20 73 65 74 74 69 6e 67 20 6e e of a setting n
6e90: 61 6d 65 64 20 7a 4e 61 6d 65 0a 2a 2f 0a 73 74 amed zName.*/.st
6ea0: 61 74 69 63 20 76 6f 69 64 20 70 72 69 6e 74 5f atic void print_
6eb0: 73 65 74 74 69 6e 67 28 63 6f 6e 73 74 20 63 68 setting(const ch
6ec0: 61 72 20 2a 7a 4e 61 6d 65 29 7b 0a 20 20 53 74 ar *zName){. St
6ed0: 6d 74 20 71 3b 0a 20 20 69 66 28 20 67 2e 72 65 mt q;. if( g.re
6ee0: 70 6f 73 69 74 6f 72 79 4f 70 65 6e 20 29 7b 0a positoryOpen ){.
6ef0: 20 20 20 20 64 62 5f 70 72 65 70 61 72 65 28 26 db_prepare(&
6f00: 71 2c 0a 20 20 20 20 20 20 20 22 53 45 4c 45 43 q,. "SELEC
6f10: 54 20 27 28 6c 6f 63 61 6c 29 27 2c 20 76 61 6c T '(local)', val
6f20: 75 65 20 46 52 4f 4d 20 63 6f 6e 66 69 67 20 57 ue FROM config W
6f30: 48 45 52 45 20 6e 61 6d 65 3d 25 51 22 0a 20 20 HERE name=%Q".
6f40: 20 20 20 20 20 22 20 55 4e 49 4f 4e 20 41 4c 4c " UNION ALL
6f50: 20 22 0a 20 20 20 20 20 20 20 22 53 45 4c 45 43 ". "SELEC
6f60: 54 20 27 28 67 6c 6f 62 61 6c 29 27 2c 20 76 61 T '(global)', va
6f70: 6c 75 65 20 46 52 4f 4d 20 67 6c 6f 62 61 6c 5f lue FROM global_
6f80: 63 6f 6e 66 69 67 20 57 48 45 52 45 20 6e 61 6d config WHERE nam
6f90: 65 3d 25 51 22 2c 0a 20 20 20 20 20 20 20 7a 4e e=%Q",. zN
6fa0: 61 6d 65 2c 20 7a 4e 61 6d 65 0a 20 20 20 20 29 ame, zName. )
6fb0: 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 64 ;. }else{. d
6fc0: 62 5f 70 72 65 70 61 72 65 28 26 71 2c 0a 20 20 b_prepare(&q,.
6fd0: 20 20 20 20 22 53 45 4c 45 43 54 20 27 28 67 6c "SELECT '(gl
6fe0: 6f 62 61 6c 29 27 2c 20 76 61 6c 75 65 20 46 52 obal)', value FR
6ff0: 4f 4d 20 67 6c 6f 62 61 6c 5f 63 6f 6e 66 69 67 OM global_config
7000: 20 57 48 45 52 45 20 6e 61 6d 65 3d 25 51 22 2c WHERE name=%Q",
7010: 0a 20 20 20 20 20 20 7a 4e 61 6d 65 0a 20 20 20 . zName.
7020: 20 29 3b 0a 20 20 7d 0a 20 20 69 66 28 20 64 62 );. }. if( db
7030: 5f 73 74 65 70 28 26 71 29 3d 3d 53 51 4c 49 54 _step(&q)==SQLIT
7040: 45 5f 52 4f 57 20 29 7b 0a 20 20 20 20 70 72 69 E_ROW ){. pri
7050: 6e 74 66 28 22 25 2d 32 30 73 20 25 2d 38 73 20 ntf("%-20s %-8s
7060: 25 73 5c 6e 22 2c 20 7a 4e 61 6d 65 2c 20 64 62 %s\n", zName, db
7070: 5f 63 6f 6c 75 6d 6e 5f 74 65 78 74 28 26 71 2c _column_text(&q,
7080: 20 30 29 2c 0a 20 20 20 20 20 20 20 20 64 62 5f 0),. db_
7090: 63 6f 6c 75 6d 6e 5f 74 65 78 74 28 26 71 2c 20 column_text(&q,
70a0: 31 29 29 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 1));. }else{.
70b0: 20 20 70 72 69 6e 74 66 28 22 25 2d 32 30 73 5c printf("%-20s\
70c0: 6e 22 2c 20 7a 4e 61 6d 65 29 3b 0a 20 20 7d 0a n", zName);. }.
70d0: 20 20 64 62 5f 66 69 6e 61 6c 69 7a 65 28 26 71 db_finalize(&q
70e0: 29 3b 0a 7d 0a 0a 0a 2f 2a 0a 2a 2a 20 43 4f 4d );.}.../*.** COM
70f0: 4d 41 4e 44 3a 20 73 65 74 74 69 6e 67 73 0a 2a MAND: settings.*
7100: 2a 20 43 4f 4d 4d 41 4e 44 3a 20 75 6e 73 65 74 * COMMAND: unset
7110: 0a 2a 2a 20 25 66 6f 73 73 69 6c 20 73 65 74 74 .** %fossil sett
7120: 69 6e 67 20 3f 50 52 4f 50 45 52 54 59 3f 20 3f ing ?PROPERTY? ?
7130: 56 41 4c 55 45 3f 20 3f 2d 67 6c 6f 62 61 6c 3f VALUE? ?-global?
7140: 0a 2a 2a 20 25 66 6f 73 73 69 6c 20 75 6e 73 65 .** %fossil unse
7150: 74 20 50 52 4f 50 45 52 54 59 20 3f 2d 67 6c 6f t PROPERTY ?-glo
7160: 62 61 6c 3f 0a 2a 2a 0a 2a 2a 20 54 68 65 20 22 bal?.**.** The "
7170: 73 65 74 74 69 6e 67 22 20 63 6f 6d 6d 61 6e 64 setting" command
7180: 20 77 69 74 68 20 6e 6f 20 61 72 67 75 6d 65 6e with no argumen
7190: 74 73 20 6c 69 73 74 73 20 61 6c 6c 20 70 72 6f ts lists all pro
71a0: 70 65 72 74 69 65 73 20 61 6e 64 20 74 68 65 69 perties and thei
71b0: 72 0a 2a 2a 20 76 61 6c 75 65 73 2e 20 20 57 69 r.** values. Wi
71c0: 74 68 20 6a 75 73 74 20 61 20 70 72 6f 70 65 72 th just a proper
71d0: 74 79 20 6e 61 6d 65 20 69 74 20 73 68 6f 77 73 ty name it shows
71e0: 20 74 68 65 20 76 61 6c 75 65 20 6f 66 20 74 68 the value of th
71f0: 61 74 20 70 72 6f 70 65 72 74 79 2e 0a 2a 2a 20 at property..**
7200: 57 69 74 68 20 61 20 76 61 6c 75 65 20 61 72 67 With a value arg
7210: 75 6d 65 6e 74 20 69 74 20 63 68 61 6e 67 65 73 ument it changes
7220: 20 74 68 65 20 70 72 6f 70 65 72 74 79 20 66 6f the property fo
7230: 72 20 74 68 65 20 63 75 72 72 65 6e 74 20 72 65 r the current re
7240: 70 6f 73 69 74 6f 72 79 2e 0a 2a 2a 0a 2a 2a 20 pository..**.**
7250: 54 68 65 20 22 75 6e 73 65 74 22 20 63 6f 6d 6d The "unset" comm
7260: 61 6e 64 20 63 6c 65 61 72 73 20 61 20 70 72 6f and clears a pro
7270: 70 65 72 74 79 20 73 65 74 74 69 6e 67 2e 0a 2a perty setting..*
7280: 2a 0a 2a 2a 20 20 20 20 61 75 74 6f 73 79 6e 63 *.** autosync
7290: 20 20 20 20 20 20 20 20 20 49 66 20 65 6e 61 62 If enab
72a0: 6c 65 64 2c 20 61 75 74 6f 6d 61 74 69 63 61 6c led, automatical
72b0: 6c 79 20 70 75 6c 6c 20 70 72 69 6f 72 20 74 6f ly pull prior to
72c0: 0a 2a 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 .**
72d0: 20 20 20 20 20 20 20 20 63 6f 6d 6d 69 74 20 6f commit o
72e0: 72 20 75 70 64 61 74 65 20 61 6e 64 20 61 75 74 r update and aut
72f0: 6f 6d 61 74 69 63 61 6c 6c 79 20 70 75 73 68 0a omatically push.
7300: 2a 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 **
7310: 20 20 20 20 20 20 20 61 66 74 65 72 20 63 6f 6d after com
7320: 6d 69 74 20 6f 72 20 74 61 67 20 6f 72 20 62 72 mit or tag or br
7330: 61 6e 63 68 20 63 72 65 61 74 69 6f 6e 2e 0a 2a anch creation..*
7340: 2a 0a 2a 2a 20 20 20 20 64 69 66 66 2d 63 6f 6d *.** diff-com
7350: 6d 61 6e 64 20 20 20 20 20 45 78 74 65 72 6e 61 mand Externa
7360: 6c 20 63 6f 6d 6d 61 6e 64 20 74 6f 20 72 75 6e l command to run
7370: 20 77 68 65 6e 20 70 65 72 66 6f 72 6d 69 6e 67 when performing
7380: 20 61 20 64 69 66 66 2e 0a 2a 2a 20 20 20 20 20 a diff..**
7390: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
73a0: 49 66 20 75 6e 64 65 66 69 6e 65 64 2c 20 74 68 If undefined, th
73b0: 65 20 69 6e 74 65 72 6e 61 6c 20 74 65 78 74 20 e internal text
73c0: 64 69 66 66 20 77 69 6c 6c 20 62 65 20 75 73 65 diff will be use
73d0: 64 2e 0a 2a 2a 0a 2a 2a 20 20 20 20 65 64 69 74 d..**.** edit
73e0: 6f 72 20 20 20 20 20 20 20 20 20 20 20 54 65 78 or Tex
73f0: 74 20 65 64 69 74 6f 72 20 63 6f 6d 6d 61 6e 64 t editor command
7400: 20 75 73 65 64 20 66 6f 72 20 63 68 65 63 6b 2d used for check-
7410: 69 6e 20 63 6f 6d 6d 65 6e 74 73 2e 0a 2a 2a 0a in comments..**.
7420: 2a 2a 20 20 20 20 67 64 69 66 66 2d 63 6f 6d 6d ** gdiff-comm
7430: 61 6e 64 20 20 20 20 45 78 74 65 72 6e 61 6c 20 and External
7440: 63 6f 6d 6d 61 6e 64 20 74 6f 20 72 75 6e 20 77 command to run w
7450: 68 65 6e 20 70 65 72 66 6f 72 6d 69 6e 67 20 61 hen performing a
7460: 20 67 72 61 70 68 69 63 61 6c 0a 2a 2a 20 20 20 graphical.**
7470: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
7480: 20 20 64 69 66 66 2e 20 49 66 20 75 6e 64 65 66 diff. If undef
7490: 69 6e 65 64 2c 20 74 65 78 74 20 64 69 66 66 20 ined, text diff
74a0: 77 69 6c 6c 20 62 65 20 75 73 65 64 2e 0a 2a 2a will be used..**
74b0: 0a 2a 2a 20 20 20 20 6c 6f 63 61 6c 61 75 74 68 .** localauth
74c0: 20 20 20 20 20 20 20 20 49 66 20 65 6e 61 62 6c If enabl
74d0: 65 64 2c 20 72 65 71 75 69 72 65 20 74 68 61 74 ed, require that
74e0: 20 48 54 54 50 20 63 6f 6e 6e 65 63 74 69 6f 6e HTTP connection
74f0: 73 20 66 72 6f 6d 0a 2a 2a 20 20 20 20 20 20 20 s from.**
7500: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31 32 12
7510: 37 2e 30 2e 30 2e 31 20 62 65 20 61 75 74 68 65 7.0.0.1 be authe
7520: 6e 74 69 63 61 74 65 64 20 62 79 20 70 61 73 73 nticated by pass
7530: 77 6f 72 64 2e 20 20 49 66 0a 2a 2a 20 20 20 20 word. If.**
7540: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
7550: 20 66 61 6c 73 65 2c 20 61 6c 6c 20 48 54 54 50 false, all HTTP
7560: 20 72 65 71 75 65 73 74 73 20 66 72 6f 6d 20 6c requests from l
7570: 6f 63 61 6c 68 6f 73 74 20 68 61 76 65 0a 2a 2a ocalhost have.**
7580: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
7590: 20 20 20 20 20 75 6e 72 65 73 74 72 69 63 74 65 unrestricte
75a0: 64 20 61 63 63 65 73 73 20 74 6f 20 74 68 65 20 d access to the
75b0: 72 65 70 6f 73 69 74 6f 72 79 2e 0a 2a 2a 0a 2a repository..**.*
75c0: 2a 20 20 20 20 6f 6d 69 74 73 69 67 6e 20 20 20 * omitsign
75d0: 20 20 20 20 20 20 57 68 65 6e 20 65 6e 61 62 6c When enabl
75e0: 65 64 2c 20 66 6f 73 73 69 6c 20 77 69 6c 6c 20 ed, fossil will
75f0: 6e 6f 74 20 61 74 74 65 6d 70 74 20 74 6f 20 73 not attempt to s
7600: 69 67 6e 20 61 6e 79 0a 2a 2a 20 20 20 20 20 20 ign any.**
7610: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 c
7620: 6f 6d 6d 69 74 20 77 69 74 68 20 67 70 67 2e 20 ommit with gpg.
7630: 41 6c 6c 20 63 6f 6d 6d 69 74 73 20 77 69 6c 6c All commits will
7640: 20 62 65 20 75 6e 73 69 67 6e 65 64 2e 0a 2a 2a be unsigned..**
7650: 0a 2a 2a 20 20 20 20 70 67 70 2d 63 6f 6d 6d 61 .** pgp-comma
7660: 6e 64 20 20 20 20 20 20 43 6f 6d 6d 61 6e 64 20 nd Command
7670: 75 73 65 64 20 74 6f 20 63 6c 65 61 72 2d 73 69 used to clear-si
7680: 67 6e 20 6d 61 6e 69 66 65 73 74 73 20 61 74 20 gn manifests at
7690: 63 68 65 63 6b 2d 69 6e 2e 0a 2a 2a 20 20 20 20 check-in..**
76a0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
76b0: 20 54 68 65 20 64 65 66 61 75 6c 74 20 69 73 20 The default is
76c0: 22 67 70 67 20 2d 2d 63 6c 65 61 72 73 69 67 6e "gpg --clearsign
76d0: 20 2d 6f 20 22 2e 0a 2a 2a 0a 2a 2a 20 20 20 20 -o "..**.**
76e0: 70 72 6f 78 79 20 20 20 20 20 20 20 20 20 20 20 proxy
76f0: 20 55 52 4c 20 6f 66 20 74 68 65 20 48 54 54 50 URL of the HTTP
7700: 20 70 72 6f 78 79 2e 20 20 49 66 20 75 6e 64 65 proxy. If unde
7710: 66 69 6e 65 64 20 6f 72 20 22 6f 66 66 22 20 74 fined or "off" t
7720: 68 65 6e 0a 2a 2a 20 20 20 20 20 20 20 20 20 20 hen.**
7730: 20 20 20 20 20 20 20 20 20 20 20 74 68 65 20 22 the "
7740: 68 74 74 70 5f 70 72 6f 78 79 22 20 65 6e 76 69 http_proxy" envi
7750: 72 6f 6e 6d 65 6e 74 20 76 61 72 69 61 62 6c 65 ronment variable
7760: 20 69 73 20 63 6f 6e 73 75 6c 74 65 64 2e 0a 2a is consulted..*
7770: 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 *
7780: 20 20 20 20 20 20 49 66 20 74 68 65 20 68 74 74 If the htt
7790: 70 5f 70 72 6f 78 79 20 65 6e 76 69 72 6f 6e 6d p_proxy environm
77a0: 65 6e 74 20 76 61 72 69 61 62 6c 65 20 69 73 20 ent variable is
77b0: 75 6e 64 65 66 69 6e 65 64 0a 2a 2a 20 20 20 20 undefined.**
77c0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
77d0: 20 74 68 65 6e 20 61 20 64 69 72 65 63 74 20 48 then a direct H
77e0: 54 54 50 20 63 6f 6e 6e 65 63 74 69 6f 6e 20 69 TTP connection i
77f0: 73 20 75 73 65 64 2e 0a 2a 2a 0a 2a 2a 20 20 20 s used..**.**
7800: 20 77 65 62 2d 62 72 6f 77 73 65 72 20 20 20 20 web-browser
7810: 20 20 41 20 73 68 65 6c 6c 20 63 6f 6d 6d 61 6e A shell comman
7820: 64 20 75 73 65 64 20 74 6f 20 6c 61 75 6e 63 68 d used to launch
7830: 20 79 6f 75 72 20 70 72 65 66 65 72 72 65 64 0a your preferred.
7840: 2a 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 **
7850: 20 20 20 20 20 20 20 77 65 62 20 62 72 6f 77 73 web brows
7860: 65 72 20 77 68 65 6e 20 67 69 76 65 6e 20 61 20 er when given a
7870: 55 52 4c 20 61 73 20 61 6e 20 61 72 67 75 6d 65 URL as an argume
7880: 6e 74 2e 0a 2a 2a 20 20 20 20 20 20 20 20 20 20 nt..**
7890: 20 20 20 20 20 20 20 20 20 20 20 44 65 66 61 75 Defau
78a0: 6c 74 73 20 74 6f 20 22 73 74 61 72 74 22 20 6f lts to "start" o
78b0: 6e 20 77 69 6e 64 6f 77 73 2c 20 22 6f 70 65 6e n windows, "open
78c0: 22 20 6f 6e 20 4d 61 63 2c 0a 2a 2a 20 20 20 20 " on Mac,.**
78d0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
78e0: 20 61 6e 64 20 22 66 69 72 65 66 6f 78 22 20 6f and "firefox" o
78f0: 6e 20 55 6e 69 78 2e 0a 2a 2f 0a 76 6f 69 64 20 n Unix..*/.void
7900: 73 65 74 74 69 6e 67 5f 63 6d 64 28 76 6f 69 64 setting_cmd(void
7910: 29 7b 0a 20 20 73 74 61 74 69 63 20 63 6f 6e 73 ){. static cons
7920: 74 20 63 68 61 72 20 2a 61 7a 4e 61 6d 65 5b 5d t char *azName[]
7930: 20 3d 20 7b 0a 20 20 20 20 22 61 75 74 6f 73 79 = {. "autosy
7940: 6e 63 22 2c 0a 20 20 20 20 22 64 69 66 66 2d 63 nc",. "diff-c
7950: 6f 6d 6d 61 6e 64 22 2c 0a 20 20 20 20 22 65 64 ommand",. "ed
7960: 69 74 6f 72 22 2c 0a 20 20 20 20 22 67 64 69 66 itor",. "gdif
7970: 66 2d 63 6f 6d 6d 61 6e 64 22 2c 0a 20 20 20 20 f-command",.
7980: 22 6c 6f 63 61 6c 61 75 74 68 22 2c 0a 20 20 20 "localauth",.
7990: 20 22 6f 6d 69 74 73 69 67 6e 22 2c 0a 20 20 20 "omitsign",.
79a0: 20 22 70 67 70 2d 63 6f 6d 6d 61 6e 64 22 2c 0a "pgp-command",.
79b0: 20 20 20 20 22 70 72 6f 78 79 22 2c 0a 20 20 20 "proxy",.
79c0: 20 22 77 65 62 2d 62 72 6f 77 73 65 72 22 2c 0a "web-browser",.
79d0: 20 20 7d 3b 0a 20 20 69 6e 74 20 69 3b 0a 20 20 };. int i;.
79e0: 69 6e 74 20 67 6c 6f 62 61 6c 46 6c 61 67 20 3d int globalFlag =
79f0: 20 66 69 6e 64 5f 6f 70 74 69 6f 6e 28 22 67 6c find_option("gl
7a00: 6f 62 61 6c 22 2c 22 67 22 2c 30 29 21 3d 30 3b obal","g",0)!=0;
7a10: 0a 20 20 69 6e 74 20 75 6e 73 65 74 46 6c 61 67 . int unsetFlag
7a20: 20 3d 20 67 2e 61 72 67 76 5b 31 5d 5b 30 5d 3d = g.argv[1][0]=
7a30: 3d 27 75 27 3b 0a 20 20 64 62 5f 66 69 6e 64 5f ='u';. db_find_
7a40: 61 6e 64 5f 6f 70 65 6e 5f 72 65 70 6f 73 69 74 and_open_reposit
7a50: 6f 72 79 28 30 29 3b 0a 20 20 69 66 28 20 21 67 ory(0);. if( !g
7a60: 2e 72 65 70 6f 73 69 74 6f 72 79 4f 70 65 6e 20 .repositoryOpen
7a70: 29 7b 0a 20 20 20 20 64 62 5f 6f 70 65 6e 5f 63 ){. db_open_c
7a80: 6f 6e 66 69 67 28 29 3b 0a 20 20 20 20 67 6c 6f onfig();. glo
7a90: 62 61 6c 46 6c 61 67 20 3d 20 31 3b 0a 20 20 7d balFlag = 1;. }
7aa0: 0a 20 20 69 66 28 20 75 6e 73 65 74 46 6c 61 67 . if( unsetFlag
7ab0: 20 26 26 20 67 2e 61 72 67 63 21 3d 33 20 29 7b && g.argc!=3 ){
7ac0: 0a 20 20 20 20 75 73 61 67 65 28 22 50 52 4f 50 . usage("PROP
7ad0: 45 52 54 59 20 3f 2d 67 6c 6f 62 61 6c 3f 22 29 ERTY ?-global?")
7ae0: 3b 0a 20 20 7d 0a 20 20 69 66 28 20 67 2e 61 72 ;. }. if( g.ar
7af0: 67 63 3d 3d 32 20 29 7b 0a 20 20 20 20 66 6f 72 gc==2 ){. for
7b00: 28 69 3d 30 3b 20 69 3c 73 69 7a 65 6f 66 28 61 (i=0; i<sizeof(a
7b10: 7a 4e 61 6d 65 29 2f 73 69 7a 65 6f 66 28 61 7a zName)/sizeof(az
7b20: 4e 61 6d 65 5b 30 5d 29 3b 20 69 2b 2b 29 7b 0a Name[0]); i++){.
7b30: 20 20 20 20 20 20 70 72 69 6e 74 5f 73 65 74 74 print_sett
7b40: 69 6e 67 28 61 7a 4e 61 6d 65 5b 69 5d 29 3b 0a ing(azName[i]);.
7b50: 20 20 20 20 7d 0a 20 20 7d 65 6c 73 65 20 69 66 }. }else if
7b60: 28 20 67 2e 61 72 67 63 3d 3d 33 20 7c 7c 20 67 ( g.argc==3 || g
7b70: 2e 61 72 67 63 3d 3d 34 20 29 7b 0a 20 20 20 20 .argc==4 ){.
7b80: 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 4e 61 6d const char *zNam
7b90: 65 20 3d 20 67 2e 61 72 67 76 5b 32 5d 3b 0a 20 e = g.argv[2];.
7ba0: 20 20 20 69 6e 74 20 6e 20 3d 20 73 74 72 6c 65 int n = strle
7bb0: 6e 28 7a 4e 61 6d 65 29 3b 0a 20 20 20 20 66 6f n(zName);. fo
7bc0: 72 28 69 3d 30 3b 20 69 3c 73 69 7a 65 6f 66 28 r(i=0; i<sizeof(
7bd0: 61 7a 4e 61 6d 65 29 2f 73 69 7a 65 6f 66 28 61 azName)/sizeof(a
7be0: 7a 4e 61 6d 65 5b 30 5d 29 3b 20 69 2b 2b 29 7b zName[0]); i++){
7bf0: 0a 20 20 20 20 20 20 69 66 28 20 73 74 72 6e 63 . if( strnc
7c00: 6d 70 28 61 7a 4e 61 6d 65 5b 69 5d 2c 20 7a 4e mp(azName[i], zN
7c10: 61 6d 65 2c 20 6e 29 3d 3d 30 20 29 20 62 72 65 ame, n)==0 ) bre
7c20: 61 6b 3b 0a 20 20 20 20 7d 0a 20 20 20 20 69 66 ak;. }. if
7c30: 28 20 69 3e 3d 73 69 7a 65 6f 66 28 61 7a 4e 61 ( i>=sizeof(azNa
7c40: 6d 65 29 2f 73 69 7a 65 6f 66 28 61 7a 4e 61 6d me)/sizeof(azNam
7c50: 65 5b 30 5d 29 20 29 7b 0a 20 20 20 20 20 20 66 e[0]) ){. f
7c60: 6f 73 73 69 6c 5f 66 61 74 61 6c 28 22 6e 6f 20 ossil_fatal("no
7c70: 73 75 63 68 20 73 65 74 74 69 6e 67 3a 20 25 73 such setting: %s
7c80: 22 2c 20 7a 4e 61 6d 65 29 3b 0a 20 20 20 20 7d ", zName);. }
7c90: 0a 20 20 20 20 69 66 28 20 75 6e 73 65 74 46 6c . if( unsetFl
7ca0: 61 67 20 29 7b 0a 20 20 20 20 20 20 64 62 5f 75 ag ){. db_u
7cb0: 6e 73 65 74 28 61 7a 4e 61 6d 65 5b 69 5d 2c 20 nset(azName[i],
7cc0: 67 6c 6f 62 61 6c 46 6c 61 67 29 3b 0a 20 20 20 globalFlag);.
7cd0: 20 7d 65 6c 73 65 20 69 66 28 20 67 2e 61 72 67 }else if( g.arg
7ce0: 63 3d 3d 34 20 29 7b 0a 20 20 20 20 20 20 64 62 c==4 ){. db
7cf0: 5f 73 65 74 28 61 7a 4e 61 6d 65 5b 69 5d 2c 20 _set(azName[i],
7d00: 67 2e 61 72 67 76 5b 33 5d 2c 20 67 6c 6f 62 61 g.argv[3], globa
7d10: 6c 46 6c 61 67 29 3b 0a 20 20 20 20 7d 65 6c 73 lFlag);. }els
7d20: 65 7b 0a 20 20 20 20 20 20 70 72 69 6e 74 5f 73 e{. print_s
7d30: 65 74 74 69 6e 67 28 61 7a 4e 61 6d 65 5b 69 5d etting(azName[i]
7d40: 29 3b 0a 20 20 20 20 7d 0a 20 20 7d 65 6c 73 65 );. }. }else
7d50: 7b 0a 20 20 20 20 75 73 61 67 65 28 22 3f 50 52 {. usage("?PR
7d60: 4f 50 45 52 54 59 3f 20 3f 56 41 4c 55 45 3f 22 OPERTY? ?VALUE?"
7d70: 29 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 );. }.}../*.**
7d80: 53 51 4c 20 66 75 6e 63 74 69 6f 6e 20 74 6f 20 SQL function to
7d90: 72 65 6e 64 65 72 20 61 20 55 55 49 44 20 61 73 render a UUID as
7da0: 20 61 20 68 79 70 65 72 6c 69 6e 6b 20 74 6f 20 a hyperlink to
7db0: 61 20 70 61 67 65 20 64 65 73 63 72 69 62 69 6e a page describin
7dc0: 67 0a 2a 2a 20 74 68 61 74 20 55 55 49 44 2e 0a g.** that UUID..
7dd0: 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 68 */.static void h
7de0: 79 70 65 72 6c 69 6e 6b 55 75 69 64 46 75 6e 63 yperlinkUuidFunc
7df0: 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 (. sqlite3_cont
7e00: 65 78 74 20 2a 70 43 78 74 2c 20 20 20 20 20 2f ext *pCxt, /
7e10: 2a 20 66 75 6e 63 74 69 6f 6e 20 63 6f 6e 74 65 * function conte
7e20: 78 74 20 2a 2f 0a 20 20 69 6e 74 20 61 72 67 63 xt */. int argc
7e30: 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ,
7e40: 20 20 20 2f 2a 20 6e 75 6d 62 65 72 20 6f 66 20 /* number of
7e50: 61 72 67 75 6d 65 6e 74 73 20 74 6f 20 74 68 65 arguments to the
7e60: 20 66 75 6e 63 74 69 6f 6e 20 2a 2f 0a 20 20 73 function */. s
7e70: 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 qlite3_value **a
7e80: 72 67 76 20 20 20 20 20 20 20 2f 2a 20 76 61 6c rgv /* val
7e90: 75 65 73 20 6f 66 20 61 6c 6c 20 66 75 6e 63 74 ues of all funct
7ea0: 69 6f 6e 20 61 72 67 75 6d 65 6e 74 73 20 2a 2f ion arguments */
7eb0: 0a 29 7b 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 .){. const char
7ec0: 20 2a 7a 55 75 69 64 3b 20 20 20 20 20 20 20 20 *zUuid;
7ed0: 20 2f 2a 20 54 68 65 20 55 55 49 44 20 74 6f 20 /* The UUID to
7ee0: 72 65 6e 64 65 72 20 2a 2f 0a 20 20 63 68 61 72 render */. char
7ef0: 20 2a 7a 3b 20 20 20 20 20 20 20 20 20 20 20 20 *z;
7f00: 20 20 20 20 20 20 20 2f 2a 20 52 65 6e 64 65 72 /* Render
7f10: 65 64 20 48 54 4d 4c 20 74 65 78 74 20 2a 2f 0a ed HTML text */.
7f20: 0a 20 20 7a 55 75 69 64 20 3d 20 28 63 6f 6e 73 . zUuid = (cons
7f30: 74 20 63 68 61 72 2a 29 73 71 6c 69 74 65 33 5f t char*)sqlite3_
7f40: 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b value_text(argv[
7f50: 30 5d 29 3b 0a 20 20 69 66 28 20 67 2e 6f 6b 48 0]);. if( g.okH
7f60: 69 73 74 6f 72 79 20 26 26 20 7a 55 75 69 64 20 istory && zUuid
7f70: 26 26 20 73 74 72 6c 65 6e 28 7a 55 75 69 64 29 && strlen(zUuid)
7f80: 3e 3d 31 30 20 29 7b 0a 20 20 20 20 7a 20 3d 20 >=10 ){. z =
7f90: 6d 70 72 69 6e 74 66 28 22 3c 74 74 3e 3c 61 20 mprintf("<tt><a
7fa0: 68 72 65 66 3d 27 25 73 2f 76 69 6e 66 6f 2f 25 href='%s/vinfo/%
7fb0: 74 27 3e 3c 73 70 61 6e 20 73 74 79 6c 65 3d 27 t'><span style='
7fc0: 66 6f 6e 74 2d 73 69 7a 65 3a 31 2e 35 65 6d 27 font-size:1.5em'
7fd0: 3e 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 >".
7fe0: 20 20 20 22 25 23 68 3c 2f 73 70 61 6e 3e 25 68 "%#h</span>%h
7ff0: 3c 2f 61 3e 3c 2f 74 74 3e 22 2c 0a 20 20 20 20 </a></tt>",.
8000: 20 20 20 20 20 20 20 20 20 20 20 20 67 2e 7a 42 g.zB
8010: 61 73 65 55 52 4c 2c 20 7a 55 75 69 64 2c 20 31 aseURL, zUuid, 1
8020: 30 2c 20 7a 55 75 69 64 2c 20 26 7a 55 75 69 64 0, zUuid, &zUuid
8030: 5b 31 30 5d 29 3b 0a 20 20 20 20 73 71 6c 69 74 [10]);. sqlit
8040: 65 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 70 e3_result_text(p
8050: 43 78 74 2c 20 7a 2c 20 2d 31 2c 20 66 72 65 65 Cxt, z, -1, free
8060: 29 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 );. }else{.
8070: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 74 sqlite3_result_t
8080: 65 78 74 28 70 43 78 74 2c 20 7a 55 75 69 64 2c ext(pCxt, zUuid,
8090: 20 2d 31 2c 20 53 51 4c 49 54 45 5f 54 52 41 4e -1, SQLITE_TRAN
80a0: 53 49 45 4e 54 29 3b 0a 20 20 7d 0a 7d 0a 0a 2f SIENT);. }.}../
80b0: 2a 0a 2a 2a 20 53 51 4c 20 66 75 6e 63 74 69 6f *.** SQL functio
80c0: 6e 20 74 6f 20 72 65 6e 64 65 72 20 61 20 54 41 n to render a TA
80d0: 47 49 44 20 61 73 20 61 20 68 79 70 65 72 6c 69 GID as a hyperli
80e0: 6e 6b 20 74 6f 20 61 20 70 61 67 65 20 64 65 73 nk to a page des
80f0: 63 72 69 62 69 6e 67 0a 2a 2a 20 74 68 61 74 20 cribing.** that
8100: 74 61 67 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 tag..*/.static v
8110: 6f 69 64 20 68 79 70 65 72 6c 69 6e 6b 54 61 67 oid hyperlinkTag
8120: 69 64 46 75 6e 63 28 0a 20 20 73 71 6c 69 74 65 idFunc(. sqlite
8130: 33 5f 63 6f 6e 74 65 78 74 20 2a 70 43 78 74 2c 3_context *pCxt,
8140: 20 20 20 20 20 2f 2a 20 66 75 6e 63 74 69 6f 6e /* function
8150: 20 63 6f 6e 74 65 78 74 20 2a 2f 0a 20 20 69 6e context */. in
8160: 74 20 61 72 67 63 2c 20 20 20 20 20 20 20 20 20 t argc,
8170: 20 20 20 20 20 20 20 20 20 2f 2a 20 6e 75 6d 62 /* numb
8180: 65 72 20 6f 66 20 61 72 67 75 6d 65 6e 74 73 20 er of arguments
8190: 74 6f 20 74 68 65 20 66 75 6e 63 74 69 6f 6e 20 to the function
81a0: 2a 2f 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c */. sqlite3_val
81b0: 75 65 20 2a 2a 61 72 67 76 20 20 20 20 20 20 20 ue **argv
81c0: 2f 2a 20 76 61 6c 75 65 73 20 6f 66 20 61 6c 6c /* values of all
81d0: 20 66 75 6e 63 74 69 6f 6e 20 61 72 67 75 6d 65 function argume
81e0: 6e 74 73 20 2a 2f 0a 29 7b 0a 20 20 69 6e 74 20 nts */.){. int
81f0: 74 61 67 69 64 3b 20 20 20 20 20 20 20 20 20 20 tagid;
8200: 20 20 20 20 20 20 20 2f 2a 20 54 68 65 20 74 61 /* The ta
8210: 67 69 64 20 74 6f 20 72 65 6e 64 65 72 20 2a 2f gid to render */
8220: 0a 20 20 63 68 61 72 20 2a 7a 3b 20 20 20 20 20 . char *z;
8230: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a /*
8240: 20 72 65 6e 64 65 72 65 64 20 68 74 6d 6c 20 74 rendered html t
8250: 65 78 74 20 2a 2f 0a 0a 20 20 74 61 67 69 64 20 ext */.. tagid
8260: 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f = sqlite3_value_
8270: 69 6e 74 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 int(argv[0]);.
8280: 69 66 28 20 67 2e 6f 6b 48 69 73 74 6f 72 79 20 if( g.okHistory
8290: 29 7b 0a 20 20 20 20 7a 20 3d 20 6d 70 72 69 6e ){. z = mprin
82a0: 74 66 28 22 3c 61 20 68 72 65 66 3d 27 25 73 2f tf("<a href='%s/
82b0: 74 61 67 76 69 65 77 3f 74 61 67 69 64 3d 25 64 tagview?tagid=%d
82c0: 27 3e 25 64 3c 2f 61 3e 22 2c 20 0a 20 20 20 20 '>%d</a>", .
82d0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 67 2e g.
82e0: 7a 42 61 73 65 55 52 4c 2c 20 74 61 67 69 64 2c zBaseURL, tagid,
82f0: 20 74 61 67 69 64 29 3b 0a 20 20 7d 65 6c 73 65 tagid);. }else
8300: 7b 0a 20 20 20 20 7a 20 3d 20 6d 70 72 69 6e 74 {. z = mprint
8310: 66 28 22 25 64 22 2c 20 74 61 67 69 64 29 3b 0a f("%d", tagid);.
8320: 20 20 7d 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 }. sqlite3_re
8330: 73 75 6c 74 5f 74 65 78 74 28 70 43 78 74 2c 20 sult_text(pCxt,
8340: 7a 2c 20 2d 31 2c 20 66 72 65 65 29 3b 0a 7d 0a z, -1, free);.}.
8350: 0a 2f 2a 0a 2a 2a 20 53 51 4c 20 66 75 6e 63 74 ./*.** SQL funct
8360: 69 6f 6e 20 74 6f 20 72 65 6e 64 65 72 20 61 20 ion to render a
8370: 54 41 47 4e 41 4d 45 20 61 73 20 61 20 68 79 70 TAGNAME as a hyp
8380: 65 72 6c 69 6e 6b 20 74 6f 20 61 20 70 61 67 65 erlink to a page
8390: 20 64 65 73 63 72 69 62 69 6e 67 0a 2a 2a 20 74 describing.** t
83a0: 68 61 74 20 74 61 67 2e 0a 2a 2f 0a 73 74 61 74 hat tag..*/.stat
83b0: 69 63 20 76 6f 69 64 20 68 79 70 65 72 6c 69 6e ic void hyperlin
83c0: 6b 54 61 67 6e 61 6d 65 46 75 6e 63 28 0a 20 20 kTagnameFunc(.
83d0: 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 sqlite3_context
83e0: 2a 70 43 78 74 2c 20 20 20 20 20 2f 2a 20 66 75 *pCxt, /* fu
83f0: 6e 63 74 69 6f 6e 20 63 6f 6e 74 65 78 74 20 2a nction context *
8400: 2f 0a 20 20 69 6e 74 20 61 72 67 63 2c 20 20 20 /. int argc,
8410: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f /
8420: 2a 20 6e 75 6d 62 65 72 20 6f 66 20 61 72 67 75 * number of argu
8430: 6d 65 6e 74 73 20 74 6f 20 74 68 65 20 66 75 6e ments to the fun
8440: 63 74 69 6f 6e 20 2a 2f 0a 20 20 73 71 6c 69 74 ction */. sqlit
8450: 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 20 e3_value **argv
8460: 20 20 20 20 20 20 2f 2a 20 76 61 6c 75 65 73 20 /* values
8470: 6f 66 20 61 6c 6c 20 66 75 6e 63 74 69 6f 6e 20 of all function
8480: 61 72 67 75 6d 65 6e 74 73 20 2a 2f 0a 29 7b 0a arguments */.){.
8490: 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 54 const char *zT
84a0: 61 67 3b 20 20 20 20 20 20 20 20 20 20 2f 2a 20 ag; /*
84b0: 54 68 65 20 74 61 67 20 74 6f 20 72 65 6e 64 65 The tag to rende
84c0: 72 20 2a 2f 0a 20 20 63 68 61 72 20 2a 7a 3b 20 r */. char *z;
84d0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
84e0: 20 20 2f 2a 20 72 65 6e 64 65 72 65 64 20 68 74 /* rendered ht
84f0: 6d 6c 20 74 65 78 74 20 2a 2f 0a 0a 20 20 7a 54 ml text */.. zT
8500: 61 67 20 3d 20 28 63 6f 6e 73 74 20 63 68 61 72 ag = (const char
8510: 2a 29 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f *)sqlite3_value_
8520: 74 65 78 74 28 61 72 67 76 5b 30 5d 29 3b 0a 20 text(argv[0]);.
8530: 20 69 66 28 20 67 2e 6f 6b 48 69 73 74 6f 72 79 if( g.okHistory
8540: 20 29 7b 0a 20 20 20 20 7a 20 3d 20 6d 70 72 69 ){. z = mpri
8550: 6e 74 66 28 22 3c 61 20 68 72 65 66 3d 27 25 73 ntf("<a href='%s
8560: 2f 74 61 67 76 69 65 77 3f 6e 61 6d 65 3d 25 54 /tagview?name=%T
8570: 27 3e 25 68 3c 2f 61 3e 22 2c 20 0a 20 20 20 20 '>%h</a>", .
8580: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 67 2e g.
8590: 7a 42 61 73 65 55 52 4c 2c 20 7a 54 61 67 2c 20 zBaseURL, zTag,
85a0: 7a 54 61 67 29 3b 0a 20 20 7d 65 6c 73 65 7b 0a zTag);. }else{.
85b0: 20 20 20 20 7a 20 3d 20 6d 70 72 69 6e 74 66 28 z = mprintf(
85c0: 22 25 68 22 2c 20 7a 54 61 67 29 3b 0a 20 20 7d "%h", zTag);. }
85d0: 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c . sqlite3_resul
85e0: 74 5f 74 65 78 74 28 70 43 78 74 2c 20 7a 2c 20 t_text(pCxt, z,
85f0: 2d 31 2c 20 66 72 65 65 29 3b 0a 7d 0a 0a 2f 2a -1, free);.}../*
8600: 0a 2a 2a 20 53 51 4c 20 66 75 6e 63 74 69 6f 6e .** SQL function
8610: 20 74 6f 20 65 73 63 61 70 65 20 61 6c 6c 20 63 to escape all c
8620: 68 61 72 61 63 74 65 72 73 20 69 6e 20 61 20 73 haracters in a s
8630: 74 72 69 6e 67 20 74 68 61 74 20 68 61 76 65 20 tring that have
8640: 73 70 65 63 69 61 6c 0a 2a 2a 20 6d 65 61 6e 69 special.** meani
8650: 6e 67 20 74 6f 20 48 54 4d 4c 2e 0a 2a 2f 0a 73 ng to HTML..*/.s
8660: 74 61 74 69 63 20 76 6f 69 64 20 68 74 6d 6c 69 tatic void htmli
8670: 7a 65 46 75 6e 63 28 0a 20 20 73 71 6c 69 74 65 zeFunc(. sqlite
8680: 33 5f 63 6f 6e 74 65 78 74 20 2a 70 43 78 74 2c 3_context *pCxt,
8690: 20 20 20 20 20 2f 2a 20 66 75 6e 63 74 69 6f 6e /* function
86a0: 20 63 6f 6e 74 65 78 74 20 2a 2f 0a 20 20 69 6e context */. in
86b0: 74 20 61 72 67 63 2c 20 20 20 20 20 20 20 20 20 t argc,
86c0: 20 20 20 20 20 20 20 20 20 2f 2a 20 6e 75 6d 62 /* numb
86d0: 65 72 20 6f 66 20 61 72 67 75 6d 65 6e 74 73 20 er of arguments
86e0: 74 6f 20 74 68 65 20 66 75 6e 63 74 69 6f 6e 20 to the function
86f0: 2a 2f 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c */. sqlite3_val
8700: 75 65 20 2a 2a 61 72 67 76 20 20 20 20 20 20 20 ue **argv
8710: 2f 2a 20 76 61 6c 75 65 73 20 6f 66 20 61 6c 6c /* values of all
8720: 20 66 75 6e 63 74 69 6f 6e 20 61 72 67 75 6d 65 function argume
8730: 6e 74 73 20 2a 2f 0a 29 7b 0a 20 20 63 6f 6e 73 nts */.){. cons
8740: 74 20 63 68 61 72 20 2a 7a 54 65 78 74 3b 20 20 t char *zText;
8750: 20 20 20 20 20 20 20 2f 2a 20 54 65 78 74 20 74 /* Text t
8760: 6f 20 62 65 20 68 74 6d 6c 69 7a 65 64 20 2a 2f o be htmlized */
8770: 0a 20 20 63 68 61 72 20 2a 7a 3b 20 20 20 20 20 . char *z;
8780: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a /*
8790: 20 72 65 6e 64 65 72 65 64 20 68 74 6d 6c 20 74 rendered html t
87a0: 65 78 74 20 2a 2f 0a 0a 20 20 7a 54 65 78 74 20 ext */.. zText
87b0: 3d 20 28 63 6f 6e 73 74 20 63 68 61 72 2a 29 73 = (const char*)s
87c0: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 qlite3_value_tex
87d0: 74 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 7a 20 t(argv[0]);. z
87e0: 3d 20 68 74 6d 6c 69 7a 65 28 7a 54 65 78 74 2c = htmlize(zText,
87f0: 20 2d 31 29 3b 0a 20 20 73 71 6c 69 74 65 33 5f -1);. sqlite3_
8800: 72 65 73 75 6c 74 5f 74 65 78 74 28 70 43 78 74 result_text(pCxt
8810: 2c 20 7a 2c 20 2d 31 2c 20 66 72 65 65 29 3b 0a , z, -1, free);.
8820: 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 69 73 20 72 6f }../*.** This ro
8830: 75 74 69 6e 65 20 69 73 20 61 20 68 65 6c 70 65 utine is a helpe
8840: 72 20 74 6f 20 72 75 6e 20 61 6e 20 53 51 4c 20 r to run an SQL
8850: 71 75 65 72 79 20 61 6e 64 20 74 61 62 6c 65 2d query and table-
8860: 69 7a 65 20 74 68 65 0a 2a 2a 20 72 65 73 75 6c ize the.** resul
8870: 74 73 2e 0a 2a 2a 0a 2a 2a 20 54 68 65 20 7a 53 ts..**.** The zS
8880: 71 6c 20 70 61 72 61 6d 65 74 65 72 20 73 68 6f ql parameter sho
8890: 75 6c 64 20 62 65 20 61 20 73 69 6e 67 6c 65 2c uld be a single,
88a0: 20 63 6f 6d 70 6c 65 74 65 20 53 51 4c 20 73 74 complete SQL st
88b0: 61 74 65 6d 65 6e 74 2e 0a 2a 2a 20 54 61 62 6c atement..** Tabl
88c0: 65 69 7a 65 64 20 6f 75 74 70 75 74 20 6f 66 20 eized output of
88d0: 74 68 65 20 53 51 4c 20 73 74 61 74 65 6d 65 6e the SQL statemen
88e0: 74 20 69 73 20 72 65 6e 64 65 72 65 64 20 62 61 t is rendered ba
88f0: 63 6b 20 74 6f 20 74 68 65 20 63 6c 69 65 6e 74 ck to the client
8900: 2e 0a 2a 2a 0a 2a 2a 20 54 68 65 20 69 73 53 61 ..**.** The isSa
8910: 66 65 20 66 6c 61 67 20 69 73 20 74 72 75 65 20 fe flag is true
8920: 69 66 20 61 6c 6c 20 71 75 65 72 79 20 72 65 73 if all query res
8930: 75 6c 74 73 20 68 61 76 65 20 62 65 65 6e 20 70 ults have been p
8940: 72 6f 63 65 73 73 65 64 20 0a 2a 2a 20 62 79 20 rocessed .** by
8950: 72 6f 75 74 69 6e 65 73 20 73 75 63 68 20 61 73 routines such as
8960: 0a 2a 2a 0a 2a 2a 20 20 20 20 20 20 20 20 6c 69 .**.** li
8970: 6e 6b 75 75 69 64 28 29 0a 2a 2a 20 20 20 20 20 nkuuid().**
8980: 20 20 20 6c 69 6e 6b 74 61 67 69 64 28 29 0a 2a linktagid().*
8990: 2a 20 20 20 20 20 20 20 20 6c 69 6e 6b 74 61 67 * linktag
89a0: 6e 61 6d 65 28 29 0a 2a 2a 20 20 20 20 20 20 20 name().**
89b0: 20 68 74 6d 6c 69 7a 65 28 29 0a 2a 2a 0a 2a 2a htmlize().**.**
89c0: 20 61 6e 64 20 61 72 65 20 74 68 65 72 65 66 6f and are therefo
89d0: 72 65 20 73 61 66 65 20 66 6f 72 20 64 69 72 65 re safe for dire
89e0: 63 74 20 72 65 6e 64 65 72 69 6e 67 2e 20 20 49 ct rendering. I
89f0: 66 20 69 73 53 61 66 65 20 69 73 20 66 61 6c 73 f isSafe is fals
8a00: 65 2c 0a 2a 2a 20 74 68 65 6e 20 61 6c 6c 20 63 e,.** then all c
8a10: 68 61 72 61 63 74 65 72 73 20 69 6e 20 74 68 65 haracters in the
8a20: 20 71 75 65 72 79 20 72 65 73 75 6c 74 20 74 68 query result th
8a30: 61 74 20 68 61 76 65 20 73 70 65 63 69 61 6c 20 at have special
8a40: 6d 65 61 6e 69 6e 67 0a 2a 2a 20 74 6f 20 48 54 meaning.** to HT
8a50: 4d 4c 20 61 72 65 20 65 73 63 61 70 65 64 2e 0a ML are escaped..
8a60: 2a 2a 0a 2a 2a 20 52 65 74 75 72 6e 73 20 53 51 **.** Returns SQ
8a70: 4c 49 54 45 5f 4f 4b 20 6f 6e 20 73 75 63 63 65 LITE_OK on succe
8a80: 73 73 20 61 6e 64 20 61 6e 79 20 6f 74 68 65 72 ss and any other
8a90: 20 76 61 6c 75 65 20 6f 6e 20 65 72 72 6f 72 2e value on error.
8aa0: 0a 2a 2f 0a 69 6e 74 20 64 62 5f 67 65 6e 65 72 .*/.int db_gener
8ab0: 69 63 5f 71 75 65 72 79 5f 76 69 65 77 28 63 6f ic_query_view(co
8ac0: 6e 73 74 20 63 68 61 72 20 2a 7a 53 71 6c 2c 20 nst char *zSql,
8ad0: 69 6e 74 20 69 73 53 61 66 65 29 7b 0a 20 20 73 int isSafe){. s
8ae0: 71 6c 69 74 65 33 5f 73 74 6d 74 20 2a 70 53 74 qlite3_stmt *pSt
8af0: 6d 74 3b 0a 20 20 69 6e 74 20 72 63 3b 0a 20 20 mt;. int rc;.
8b00: 69 6e 74 20 6e 43 6f 6c 2c 20 69 3b 0a 20 20 69 int nCol, i;. i
8b10: 6e 74 20 6e 52 6f 77 3b 0a 20 20 63 6f 6e 73 74 nt nRow;. const
8b20: 20 63 68 61 72 20 2a 7a 52 6f 77 3b 0a 20 20 73 char *zRow;. s
8b30: 74 61 74 69 63 20 69 6e 74 20 6f 6e 63 65 20 3d tatic int once =
8b40: 20 31 3b 0a 0a 20 20 2f 2a 20 49 6e 73 74 61 6c 1;.. /* Instal
8b50: 6c 20 74 68 65 20 73 70 65 63 69 61 6c 20 66 75 l the special fu
8b60: 6e 63 74 69 6f 6e 73 20 6f 6e 20 74 68 65 20 66 nctions on the f
8b70: 69 72 73 74 20 63 61 6c 6c 20 74 6f 20 74 68 69 irst call to thi
8b80: 73 20 72 6f 75 74 69 6e 65 20 2a 2f 0a 20 20 69 s routine */. i
8b90: 66 28 20 6f 6e 63 65 20 29 7b 0a 20 20 20 20 6f f( once ){. o
8ba0: 6e 63 65 20 3d 20 30 3b 0a 20 20 20 20 73 71 6c nce = 0;. sql
8bb0: 69 74 65 33 5f 63 72 65 61 74 65 5f 66 75 6e 63 ite3_create_func
8bc0: 74 69 6f 6e 28 67 2e 64 62 2c 20 22 6c 69 6e 6b tion(g.db, "link
8bd0: 75 75 69 64 22 2c 20 31 2c 20 53 51 4c 49 54 45 uuid", 1, SQLITE
8be0: 5f 55 54 46 38 2c 20 30 2c 20 0a 20 20 20 20 20 _UTF8, 0, .
8bf0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
8c00: 20 20 20 20 20 20 20 68 79 70 65 72 6c 69 6e 6b hyperlink
8c10: 55 75 69 64 46 75 6e 63 2c 20 30 2c 20 30 29 3b UuidFunc, 0, 0);
8c20: 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 63 72 65 . sqlite3_cre
8c30: 61 74 65 5f 66 75 6e 63 74 69 6f 6e 28 67 2e 64 ate_function(g.d
8c40: 62 2c 20 22 6c 69 6e 6b 74 61 67 69 64 22 2c 20 b, "linktagid",
8c50: 31 2c 20 53 51 4c 49 54 45 5f 55 54 46 38 2c 20 1, SQLITE_UTF8,
8c60: 30 2c 20 0a 20 20 20 20 20 20 20 20 20 20 20 20 0, .
8c70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
8c80: 68 79 70 65 72 6c 69 6e 6b 54 61 67 69 64 46 75 hyperlinkTagidFu
8c90: 6e 63 2c 20 30 2c 20 30 29 3b 0a 20 20 20 20 73 nc, 0, 0);. s
8ca0: 71 6c 69 74 65 33 5f 63 72 65 61 74 65 5f 66 75 qlite3_create_fu
8cb0: 6e 63 74 69 6f 6e 28 67 2e 64 62 2c 20 22 6c 69 nction(g.db, "li
8cc0: 6e 6b 74 61 67 6e 61 6d 65 22 2c 20 31 2c 20 53 nktagname", 1, S
8cd0: 51 4c 49 54 45 5f 55 54 46 38 2c 20 30 2c 20 0a QLITE_UTF8, 0, .
8ce0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
8cf0: 20 20 20 20 20 20 20 20 20 20 20 20 68 79 70 65 hype
8d00: 72 6c 69 6e 6b 54 61 67 6e 61 6d 65 46 75 6e 63 rlinkTagnameFunc
8d10: 2c 20 30 2c 20 30 29 3b 0a 20 20 20 20 73 71 6c , 0, 0);. sql
8d20: 69 74 65 33 5f 63 72 65 61 74 65 5f 66 75 6e 63 ite3_create_func
8d30: 74 69 6f 6e 28 67 2e 64 62 2c 20 22 68 74 6d 6c tion(g.db, "html
8d40: 69 7a 65 22 2c 20 31 2c 20 53 51 4c 49 54 45 5f ize", 1, SQLITE_
8d50: 55 54 46 38 2c 20 30 2c 20 0a 20 20 20 20 20 20 UTF8, 0, .
8d60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
8d70: 20 20 20 20 20 20 68 74 6d 6c 69 7a 65 46 75 6e htmlizeFun
8d80: 63 2c 20 30 2c 20 30 29 3b 0a 20 20 7d 0a 0a 20 c, 0, 0);. }..
8d90: 20 2f 2a 0a 20 20 2a 2a 20 55 73 65 20 73 71 6c /*. ** Use sql
8da0: 69 74 65 33 5f 73 74 6d 74 20 64 69 72 65 63 74 ite3_stmt direct
8db0: 6c 79 20 72 61 74 68 65 72 20 74 68 61 6e 20 67 ly rather than g
8dc0: 6f 69 6e 67 20 74 68 72 6f 75 67 68 20 64 62 5f oing through db_
8dd0: 70 72 65 70 61 72 65 28 29 2c 0a 20 20 2a 2a 20 prepare(),. **
8de0: 73 6f 20 74 68 61 74 20 77 65 20 63 61 6e 20 74 so that we can t
8df0: 72 65 61 74 20 65 72 72 6f 72 73 20 61 20 6e 6f reat errors a no
8e00: 6e 2d 66 61 74 61 6c 2e 0a 20 20 2a 2f 0a 20 20 n-fatal.. */.
8e10: 72 63 20 3d 20 73 71 6c 69 74 65 33 5f 70 72 65 rc = sqlite3_pre
8e20: 70 61 72 65 28 67 2e 64 62 2c 20 7a 53 71 6c 2c pare(g.db, zSql,
8e30: 20 2d 31 2c 20 26 70 53 74 6d 74 2c 20 30 29 3b -1, &pStmt, 0);
8e40: 0a 20 20 69 66 28 20 53 51 4c 49 54 45 5f 4f 4b . if( SQLITE_OK
8e50: 20 21 3d 20 72 63 20 29 7b 0a 20 20 20 20 40 20 != rc ){. @
8e60: 3c 73 70 61 6e 20 73 74 79 6c 65 3d 27 63 6f 6c <span style='col
8e70: 6f 72 3a 72 65 64 27 3e 64 62 5f 67 65 6e 65 72 or:red'>db_gener
8e80: 69 63 5f 71 75 65 72 79 5f 76 69 65 77 28 29 20 ic_query_view()
8e90: 53 51 4c 20 65 72 72 6f 72 3a 0a 20 20 20 20 40 SQL error:. @
8ea0: 20 25 68 28 73 71 6c 69 74 65 33 5f 65 72 72 6d %h(sqlite3_errm
8eb0: 73 67 28 67 2e 64 62 29 29 3c 2f 73 70 61 6e 3e sg(g.db))</span>
8ec0: 0a 20 20 20 20 72 65 74 75 72 6e 20 72 63 3b 0a . return rc;.
8ed0: 20 20 7d 0a 20 20 6e 43 6f 6c 20 3d 20 73 71 6c }. nCol = sql
8ee0: 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 63 6f 75 6e ite3_column_coun
8ef0: 74 28 70 53 74 6d 74 29 3b 0a 20 20 40 20 3c 74 t(pStmt);. @ <t
8f00: 61 62 6c 65 20 63 6c 61 73 73 3d 27 66 6f 73 73 able class='foss
8f10: 69 6c 5f 64 62 5f 67 65 6e 65 72 69 63 5f 71 75 il_db_generic_qu
8f20: 65 72 79 5f 76 69 65 77 27 3e 3c 74 62 6f 64 79 ery_view'><tbody
8f30: 3e 0a 20 20 40 20 3c 74 72 20 63 6c 61 73 73 3d >. @ <tr class=
8f40: 27 68 65 61 64 65 72 27 3e 0a 20 20 66 6f 72 28 'header'>. for(
8f50: 69 3d 30 3b 20 69 3c 6e 43 6f 6c 3b 20 2b 2b 69 i=0; i<nCol; ++i
8f60: 29 7b 0a 20 20 20 20 40 20 3c 74 64 3e 25 68 28 ){. @ <td>%h(
8f70: 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 6e sqlite3_column_n
8f80: 61 6d 65 28 70 53 74 6d 74 2c 69 29 29 3c 2f 74 ame(pStmt,i))</t
8f90: 64 3e 0a 20 20 7d 0a 20 20 40 20 3c 2f 74 72 3e d>. }. @ </tr>
8fa0: 0a 0a 20 20 6e 52 6f 77 20 3d 20 30 3b 0a 20 20 .. nRow = 0;.
8fb0: 77 68 69 6c 65 28 20 53 51 4c 49 54 45 5f 52 4f while( SQLITE_RO
8fc0: 57 3d 3d 73 71 6c 69 74 65 33 5f 73 74 65 70 28 W==sqlite3_step(
8fd0: 70 53 74 6d 74 29 20 29 7b 0a 20 20 20 20 63 6f pStmt) ){. co
8fe0: 6e 73 74 20 63 68 61 72 20 2a 61 7a 43 6c 61 73 nst char *azClas
8ff0: 73 5b 5d 20 3d 20 7b 20 22 65 76 65 6e 22 2c 20 s[] = { "even",
9000: 22 6f 64 64 22 20 7d 3b 0a 20 20 20 20 40 20 3c "odd" };. @ <
9010: 74 72 20 63 6c 61 73 73 3d 27 25 73 28 61 7a 43 tr class='%s(azC
9020: 6c 61 73 73 5b 28 6e 52 6f 77 2b 2b 29 26 31 5d lass[(nRow++)&1]
9030: 29 27 3e 0a 20 20 20 20 20 20 66 6f 72 28 69 3d )'>. for(i=
9040: 30 3b 20 69 3c 6e 43 6f 6c 3b 20 69 2b 2b 29 7b 0; i<nCol; i++){
9050: 0a 20 20 20 20 20 20 20 20 7a 52 6f 77 20 3d 20 . zRow =
9060: 28 63 68 61 72 20 63 6f 6e 73 74 2a 29 73 71 6c (char const*)sql
9070: 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 74 65 78 74 ite3_column_text
9080: 28 70 53 74 6d 74 2c 69 29 3b 0a 20 20 20 20 20 (pStmt,i);.
9090: 20 20 20 69 66 28 20 69 73 53 61 66 65 20 29 7b if( isSafe ){
90a0: 0a 20 20 20 20 20 20 20 20 20 20 40 20 3c 74 64 . @ <td
90b0: 3e 25 73 28 7a 52 6f 77 29 3c 2f 74 64 3e 0a 20 >%s(zRow)</td>.
90c0: 20 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 }else{.
90d0: 20 20 20 20 20 20 20 20 40 20 3c 74 64 3e 25 68 @ <td>%h
90e0: 28 7a 52 6f 77 29 3c 2f 74 64 3e 0a 20 20 20 20 (zRow)</td>.
90f0: 20 20 20 20 7d 0a 20 20 20 20 20 20 7d 0a 20 20 }. }.
9100: 20 20 40 20 3c 2f 74 72 3e 0a 20 20 7d 0a 20 20 @ </tr>. }.
9110: 40 20 3c 2f 74 62 6f 64 79 3e 3c 2f 74 61 62 6c @ </tbody></tabl
9120: 65 3e 0a 20 20 73 71 6c 69 74 65 33 5f 66 69 6e e>. sqlite3_fin
9130: 61 6c 69 7a 65 28 70 53 74 6d 74 29 3b 0a 20 20 alize(pStmt);.
9140: 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b return SQLITE_OK
9150: 3b 0a 7d 0a ;.}.