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 68 31 3e 44 61 74 61 printf("<h1>Data
07c0: 62 61 73 65 20 45 72 72 6f 72 3c 2f 68 31 3e 5c base Error</h1>\
07d0: 6e 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 n".
07e0: 20 20 22 3c 70 72 65 3e 25 68 3c 2f 70 72 65 3e "<pre>%h</pre>
07f0: 22 2c 20 7a 29 3b 0a 20 20 20 20 63 67 69 5f 72 ", z);. 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 73 71 err("%s\n%s", sq
1490: 6c 69 74 65 33 5f 65 72 72 6d 73 67 28 67 2e 64 lite3_errmsg(g.d
14a0: 62 29 2c 20 7a 53 71 6c 29 3b 0a 20 20 7d 0a 20 b), zSql);. }.
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 53 51 4c 3a 20 25 62 22 2c 20 7a 50 61 72 \nSQL: %b", zPar
17e0: 61 6d 4e 61 6d 65 2c 20 26 70 53 74 6d 74 2d 3e amName, &pStmt->
17f0: 73 71 6c 29 3b 0a 20 20 7d 0a 20 20 72 65 74 75 sql);. }. retu
1800: 72 6e 20 69 3b 0a 7d 0a 2f 2a 0a 2a 2a 20 42 69 rn i;.}./*.** Bi
1810: 6e 64 20 61 6e 20 69 6e 74 65 67 65 72 2c 20 73 nd an integer, s
1820: 74 72 69 6e 67 2c 20 6f 72 20 42 6c 6f 62 20 76 tring, or Blob v
1830: 61 6c 75 65 20 74 6f 20 61 20 6e 61 6d 65 64 20 alue to a named
1840: 70 61 72 61 6d 65 74 65 72 2e 0a 2a 2f 0a 69 6e parameter..*/.in
1850: 74 20 64 62 5f 62 69 6e 64 5f 69 6e 74 28 53 74 t db_bind_int(St
1860: 6d 74 20 2a 70 53 74 6d 74 2c 20 63 6f 6e 73 74 mt *pStmt, const
1870: 20 63 68 61 72 20 2a 7a 50 61 72 61 6d 4e 61 6d char *zParamNam
1880: 65 2c 20 69 6e 74 20 69 56 61 6c 75 65 29 7b 0a e, int iValue){.
1890: 20 20 72 65 74 75 72 6e 20 73 71 6c 69 74 65 33 return sqlite3
18a0: 5f 62 69 6e 64 5f 69 6e 74 28 70 53 74 6d 74 2d _bind_int(pStmt-
18b0: 3e 70 53 74 6d 74 2c 20 70 61 72 61 6d 49 64 78 >pStmt, paramIdx
18c0: 28 70 53 74 6d 74 2c 20 7a 50 61 72 61 6d 4e 61 (pStmt, zParamNa
18d0: 6d 65 29 2c 20 69 56 61 6c 75 65 29 3b 0a 7d 0a me), iValue);.}.
18e0: 69 6e 74 20 64 62 5f 62 69 6e 64 5f 69 6e 74 36 int db_bind_int6
18f0: 34 28 53 74 6d 74 20 2a 70 53 74 6d 74 2c 20 63 4(Stmt *pStmt, c
1900: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 50 61 72 61 onst char *zPara
1910: 6d 4e 61 6d 65 2c 20 69 36 34 20 69 56 61 6c 75 mName, i64 iValu
1920: 65 29 7b 0a 20 20 72 65 74 75 72 6e 20 73 71 6c e){. return sql
1930: 69 74 65 33 5f 62 69 6e 64 5f 69 6e 74 36 34 28 ite3_bind_int64(
1940: 70 53 74 6d 74 2d 3e 70 53 74 6d 74 2c 20 70 61 pStmt->pStmt, pa
1950: 72 61 6d 49 64 78 28 70 53 74 6d 74 2c 20 7a 50 ramIdx(pStmt, zP
1960: 61 72 61 6d 4e 61 6d 65 29 2c 20 69 56 61 6c 75 aramName), iValu
1970: 65 29 3b 0a 7d 0a 69 6e 74 20 64 62 5f 62 69 6e e);.}.int db_bin
1980: 64 5f 64 6f 75 62 6c 65 28 53 74 6d 74 20 2a 70 d_double(Stmt *p
1990: 53 74 6d 74 2c 20 63 6f 6e 73 74 20 63 68 61 72 Stmt, const char
19a0: 20 2a 7a 50 61 72 61 6d 4e 61 6d 65 2c 20 64 6f *zParamName, do
19b0: 75 62 6c 65 20 72 56 61 6c 75 65 29 7b 0a 20 20 uble rValue){.
19c0: 72 65 74 75 72 6e 20 73 71 6c 69 74 65 33 5f 62 return sqlite3_b
19d0: 69 6e 64 5f 64 6f 75 62 6c 65 28 70 53 74 6d 74 ind_double(pStmt
19e0: 2d 3e 70 53 74 6d 74 2c 20 70 61 72 61 6d 49 64 ->pStmt, paramId
19f0: 78 28 70 53 74 6d 74 2c 20 7a 50 61 72 61 6d 4e x(pStmt, zParamN
1a00: 61 6d 65 29 2c 20 72 56 61 6c 75 65 29 3b 0a 7d ame), rValue);.}
1a10: 0a 69 6e 74 20 64 62 5f 62 69 6e 64 5f 74 65 78 .int db_bind_tex
1a20: 74 28 53 74 6d 74 20 2a 70 53 74 6d 74 2c 20 63 t(Stmt *pStmt, c
1a30: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 50 61 72 61 onst char *zPara
1a40: 6d 4e 61 6d 65 2c 20 63 6f 6e 73 74 20 63 68 61 mName, const cha
1a50: 72 20 2a 7a 56 61 6c 75 65 29 7b 0a 20 20 72 65 r *zValue){. re
1a60: 74 75 72 6e 20 73 71 6c 69 74 65 33 5f 62 69 6e turn sqlite3_bin
1a70: 64 5f 74 65 78 74 28 70 53 74 6d 74 2d 3e 70 53 d_text(pStmt->pS
1a80: 74 6d 74 2c 20 70 61 72 61 6d 49 64 78 28 70 53 tmt, paramIdx(pS
1a90: 74 6d 74 2c 20 7a 50 61 72 61 6d 4e 61 6d 65 29 tmt, zParamName)
1aa0: 2c 20 7a 56 61 6c 75 65 2c 0a 20 20 20 20 20 20 , zValue,.
1ab0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
1ac0: 20 20 20 20 20 2d 31 2c 20 53 51 4c 49 54 45 5f -1, SQLITE_
1ad0: 53 54 41 54 49 43 29 3b 0a 7d 0a 69 6e 74 20 64 STATIC);.}.int d
1ae0: 62 5f 62 69 6e 64 5f 6e 75 6c 6c 28 53 74 6d 74 b_bind_null(Stmt
1af0: 20 2a 70 53 74 6d 74 2c 20 63 6f 6e 73 74 20 63 *pStmt, const c
1b00: 68 61 72 20 2a 7a 50 61 72 61 6d 4e 61 6d 65 29 har *zParamName)
1b10: 7b 0a 20 20 72 65 74 75 72 6e 20 73 71 6c 69 74 {. return sqlit
1b20: 65 33 5f 62 69 6e 64 5f 6e 75 6c 6c 28 70 53 74 e3_bind_null(pSt
1b30: 6d 74 2d 3e 70 53 74 6d 74 2c 20 70 61 72 61 6d mt->pStmt, param
1b40: 49 64 78 28 70 53 74 6d 74 2c 20 7a 50 61 72 61 Idx(pStmt, zPara
1b50: 6d 4e 61 6d 65 29 29 3b 0a 7d 0a 69 6e 74 20 64 mName));.}.int d
1b60: 62 5f 62 69 6e 64 5f 62 6c 6f 62 28 53 74 6d 74 b_bind_blob(Stmt
1b70: 20 2a 70 53 74 6d 74 2c 20 63 6f 6e 73 74 20 63 *pStmt, const c
1b80: 68 61 72 20 2a 7a 50 61 72 61 6d 4e 61 6d 65 2c har *zParamName,
1b90: 20 42 6c 6f 62 20 2a 70 42 6c 6f 62 29 7b 0a 20 Blob *pBlob){.
1ba0: 20 72 65 74 75 72 6e 20 73 71 6c 69 74 65 33 5f return sqlite3_
1bb0: 62 69 6e 64 5f 62 6c 6f 62 28 70 53 74 6d 74 2d bind_blob(pStmt-
1bc0: 3e 70 53 74 6d 74 2c 20 70 61 72 61 6d 49 64 78 >pStmt, paramIdx
1bd0: 28 70 53 74 6d 74 2c 20 7a 50 61 72 61 6d 4e 61 (pStmt, zParamNa
1be0: 6d 65 29 2c 0a 20 20 20 20 20 20 20 20 20 20 20 me),.
1bf0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 62 b
1c00: 6c 6f 62 5f 62 75 66 66 65 72 28 70 42 6c 6f 62 lob_buffer(pBlob
1c10: 29 2c 20 62 6c 6f 62 5f 73 69 7a 65 28 70 42 6c ), blob_size(pBl
1c20: 6f 62 29 2c 20 53 51 4c 49 54 45 5f 53 54 41 54 ob), SQLITE_STAT
1c30: 49 43 29 3b 0a 7d 0a 0a 2f 2a 20 62 69 6e 64 5f IC);.}../* bind_
1c40: 73 74 72 28 29 20 74 72 65 61 74 73 20 61 20 42 str() treats a B
1c50: 6c 6f 62 20 6f 62 6a 65 63 74 20 6c 69 6b 65 20 lob object like
1c60: 61 20 54 45 58 54 20 73 74 72 69 6e 67 20 61 6e a TEXT string an
1c70: 64 20 62 69 6e 64 73 20 69 74 0a 2a 2a 20 74 6f d binds it.** to
1c80: 20 74 68 65 20 53 51 4c 20 76 61 72 69 61 62 6c the SQL variabl
1c90: 65 2e 20 20 43 6f 6e 73 74 72 61 73 74 20 74 68 e. Constrast th
1ca0: 69 73 20 74 6f 20 62 69 6e 64 5f 62 6c 6f 62 28 is to bind_blob(
1cb0: 29 20 77 68 69 63 68 20 74 72 65 61 74 73 0a 2a ) which treats.*
1cc0: 2a 20 74 68 65 20 42 6c 6f 62 20 6f 62 6a 65 63 * the Blob objec
1cd0: 74 20 6c 69 6b 65 20 61 6e 20 53 51 4c 20 42 4c t like an SQL BL
1ce0: 4f 42 2e 0a 2a 2f 0a 69 6e 74 20 64 62 5f 62 69 OB..*/.int db_bi
1cf0: 6e 64 5f 73 74 72 28 53 74 6d 74 20 2a 70 53 74 nd_str(Stmt *pSt
1d00: 6d 74 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a mt, const char *
1d10: 7a 50 61 72 61 6d 4e 61 6d 65 2c 20 42 6c 6f 62 zParamName, Blob
1d20: 20 2a 70 42 6c 6f 62 29 7b 0a 20 20 72 65 74 75 *pBlob){. retu
1d30: 72 6e 20 73 71 6c 69 74 65 33 5f 62 69 6e 64 5f rn sqlite3_bind_
1d40: 74 65 78 74 28 70 53 74 6d 74 2d 3e 70 53 74 6d text(pStmt->pStm
1d50: 74 2c 20 70 61 72 61 6d 49 64 78 28 70 53 74 6d t, paramIdx(pStm
1d60: 74 2c 20 7a 50 61 72 61 6d 4e 61 6d 65 29 2c 0a t, zParamName),.
1d70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
1d80: 20 20 20 20 20 20 20 20 20 20 62 6c 6f 62 5f 62 blob_b
1d90: 75 66 66 65 72 28 70 42 6c 6f 62 29 2c 20 62 6c uffer(pBlob), bl
1da0: 6f 62 5f 73 69 7a 65 28 70 42 6c 6f 62 29 2c 20 ob_size(pBlob),
1db0: 53 51 4c 49 54 45 5f 53 54 41 54 49 43 29 3b 0a SQLITE_STATIC);.
1dc0: 7d 0a 0a 2f 2a 0a 2a 2a 20 53 74 65 70 20 74 68 }../*.** Step th
1dd0: 65 20 53 51 4c 20 73 74 61 74 65 6d 65 6e 74 2e e SQL statement.
1de0: 20 20 52 65 74 75 72 6e 20 65 69 74 68 65 72 20 Return either
1df0: 53 51 4c 49 54 45 5f 52 4f 57 20 6f 72 20 61 6e SQLITE_ROW or an
1e00: 20 65 72 72 6f 72 20 63 6f 64 65 0a 2a 2a 20 6f error code.** o
1e10: 72 20 53 51 4c 49 54 45 5f 4f 4b 20 69 66 20 74 r SQLITE_OK if t
1e20: 68 65 20 73 74 61 74 65 6d 65 6e 74 20 66 69 6e he statement fin
1e30: 69 73 68 65 73 20 73 75 63 63 65 73 73 66 75 6c ishes successful
1e40: 6c 79 2e 0a 2a 2f 0a 69 6e 74 20 64 62 5f 73 74 ly..*/.int db_st
1e50: 65 70 28 53 74 6d 74 20 2a 70 53 74 6d 74 29 7b ep(Stmt *pStmt){
1e60: 0a 20 20 69 6e 74 20 72 63 3b 0a 20 20 72 63 20 . int rc;. rc
1e70: 3d 20 73 71 6c 69 74 65 33 5f 73 74 65 70 28 70 = sqlite3_step(p
1e80: 53 74 6d 74 2d 3e 70 53 74 6d 74 29 3b 0a 20 20 Stmt->pStmt);.
1e90: 72 65 74 75 72 6e 20 72 63 3b 0a 7d 0a 0a 2f 2a return rc;.}../*
1ea0: 0a 2a 2a 20 52 65 73 65 74 20 6f 72 20 66 69 6e .** Reset or fin
1eb0: 61 6c 69 7a 65 20 61 20 73 74 61 74 65 6d 65 6e alize a statemen
1ec0: 74 2e 0a 2a 2f 0a 69 6e 74 20 64 62 5f 72 65 73 t..*/.int db_res
1ed0: 65 74 28 53 74 6d 74 20 2a 70 53 74 6d 74 29 7b et(Stmt *pStmt){
1ee0: 0a 20 20 69 6e 74 20 72 63 20 3d 20 73 71 6c 69 . int rc = sqli
1ef0: 74 65 33 5f 72 65 73 65 74 28 70 53 74 6d 74 2d te3_reset(pStmt-
1f00: 3e 70 53 74 6d 74 29 3b 0a 20 20 64 62 5f 63 68 >pStmt);. db_ch
1f10: 65 63 6b 5f 72 65 73 75 6c 74 28 72 63 29 3b 0a eck_result(rc);.
1f20: 20 20 72 65 74 75 72 6e 20 72 63 3b 0a 7d 0a 69 return rc;.}.i
1f30: 6e 74 20 64 62 5f 66 69 6e 61 6c 69 7a 65 28 53 nt db_finalize(S
1f40: 74 6d 74 20 2a 70 53 74 6d 74 29 7b 0a 20 20 69 tmt *pStmt){. i
1f50: 6e 74 20 72 63 3b 0a 20 20 62 6c 6f 62 5f 72 65 nt rc;. blob_re
1f60: 73 65 74 28 26 70 53 74 6d 74 2d 3e 73 71 6c 29 set(&pStmt->sql)
1f70: 3b 0a 20 20 72 63 20 3d 20 73 71 6c 69 74 65 33 ;. rc = sqlite3
1f80: 5f 66 69 6e 61 6c 69 7a 65 28 70 53 74 6d 74 2d _finalize(pStmt-
1f90: 3e 70 53 74 6d 74 29 3b 0a 20 20 64 62 5f 63 68 >pStmt);. db_ch
1fa0: 65 63 6b 5f 72 65 73 75 6c 74 28 72 63 29 3b 0a eck_result(rc);.
1fb0: 20 20 70 53 74 6d 74 2d 3e 70 53 74 6d 74 20 3d pStmt->pStmt =
1fc0: 20 30 3b 0a 20 20 69 66 28 20 70 53 74 6d 74 2d 0;. if( pStmt-
1fd0: 3e 70 4e 65 78 74 20 29 7b 0a 20 20 20 20 70 53 >pNext ){. pS
1fe0: 74 6d 74 2d 3e 70 4e 65 78 74 2d 3e 70 50 72 65 tmt->pNext->pPre
1ff0: 76 20 3d 20 70 53 74 6d 74 2d 3e 70 50 72 65 76 v = pStmt->pPrev
2000: 3b 0a 20 20 7d 0a 20 20 69 66 28 20 70 53 74 6d ;. }. if( pStm
2010: 74 2d 3e 70 50 72 65 76 20 29 7b 0a 20 20 20 20 t->pPrev ){.
2020: 70 53 74 6d 74 2d 3e 70 50 72 65 76 2d 3e 70 4e pStmt->pPrev->pN
2030: 65 78 74 20 3d 20 70 53 74 6d 74 2d 3e 70 4e 65 ext = pStmt->pNe
2040: 78 74 3b 0a 20 20 7d 65 6c 73 65 20 69 66 28 20 xt;. }else if(
2050: 70 41 6c 6c 53 74 6d 74 3d 3d 70 53 74 6d 74 20 pAllStmt==pStmt
2060: 29 7b 0a 20 20 20 20 70 41 6c 6c 53 74 6d 74 20 ){. pAllStmt
2070: 3d 20 70 53 74 6d 74 2d 3e 70 4e 65 78 74 3b 0a = pStmt->pNext;.
2080: 20 20 7d 0a 20 20 70 53 74 6d 74 2d 3e 70 4e 65 }. pStmt->pNe
2090: 78 74 20 3d 20 30 3b 0a 20 20 70 53 74 6d 74 2d xt = 0;. pStmt-
20a0: 3e 70 50 72 65 76 20 3d 20 30 3b 0a 20 20 72 65 >pPrev = 0;. re
20b0: 74 75 72 6e 20 72 63 3b 0a 7d 0a 0a 2f 2a 0a 2a turn rc;.}../*.*
20c0: 2a 20 52 65 74 75 72 6e 20 74 68 65 20 72 6f 77 * Return the row
20d0: 69 64 20 6f 66 20 74 68 65 20 6d 6f 73 74 20 72 id of the most r
20e0: 65 63 65 6e 74 20 69 6e 73 65 72 74 0a 2a 2f 0a ecent insert.*/.
20f0: 69 36 34 20 64 62 5f 6c 61 73 74 5f 69 6e 73 65 i64 db_last_inse
2100: 72 74 5f 72 6f 77 69 64 28 76 6f 69 64 29 7b 0a rt_rowid(void){.
2110: 20 20 72 65 74 75 72 6e 20 73 71 6c 69 74 65 33 return sqlite3
2120: 5f 6c 61 73 74 5f 69 6e 73 65 72 74 5f 72 6f 77 _last_insert_row
2130: 69 64 28 67 2e 64 62 29 3b 0a 7d 0a 0a 2f 2a 0a id(g.db);.}../*.
2140: 2a 2a 20 52 65 74 75 72 6e 20 74 68 65 20 6e 75 ** Return the nu
2150: 6d 62 65 72 20 6f 66 20 72 6f 77 73 20 74 68 61 mber of rows tha
2160: 74 20 77 65 72 65 20 63 68 61 6e 67 65 64 20 62 t were changed b
2170: 79 20 74 68 65 20 6d 6f 73 74 20 72 65 63 65 6e y the most recen
2180: 74 0a 2a 2a 20 49 4e 53 45 52 54 2c 20 55 50 44 t.** INSERT, UPD
2190: 41 54 45 2c 20 6f 72 20 44 45 4c 45 54 45 2e 20 ATE, or DELETE.
21a0: 20 41 75 78 69 6c 69 61 72 79 20 63 68 61 6e 67 Auxiliary chang
21b0: 65 73 20 63 61 75 73 65 64 20 62 79 20 74 72 69 es caused by tri
21c0: 67 67 65 72 73 0a 2a 2a 20 6f 72 20 6f 74 68 65 ggers.** or othe
21d0: 72 20 73 69 64 65 20 65 66 66 65 63 74 73 20 61 r side effects a
21e0: 72 65 20 6e 6f 74 20 63 6f 75 6e 74 65 64 2e 0a re not counted..
21f0: 2a 2f 0a 69 6e 74 20 64 62 5f 63 68 61 6e 67 65 */.int db_change
2200: 73 28 76 6f 69 64 29 7b 0a 20 20 72 65 74 75 72 s(void){. retur
2210: 6e 20 73 71 6c 69 74 65 33 5f 63 68 61 6e 67 65 n sqlite3_change
2220: 73 28 67 2e 64 62 29 3b 0a 7d 0a 0a 2f 2a 0a 2a s(g.db);.}../*.*
2230: 2a 20 45 78 74 72 61 63 74 20 74 65 78 74 2c 20 * Extract text,
2240: 69 6e 74 65 67 65 72 2c 20 6f 72 20 62 6c 6f 62 integer, or blob
2250: 20 76 61 6c 75 65 73 20 66 72 6f 6d 20 74 68 65 values from the
2260: 20 4e 2d 74 68 20 63 6f 6c 75 6d 6e 20 6f 66 20 N-th column of
2270: 74 68 65 0a 2a 2a 20 63 75 72 72 65 6e 74 20 72 the.** current r
2280: 6f 77 2e 0a 2a 2f 0a 69 6e 74 20 64 62 5f 63 6f ow..*/.int db_co
2290: 6c 75 6d 6e 5f 62 79 74 65 73 28 53 74 6d 74 20 lumn_bytes(Stmt
22a0: 2a 70 53 74 6d 74 2c 20 69 6e 74 20 4e 29 7b 0a *pStmt, int N){.
22b0: 20 20 72 65 74 75 72 6e 20 73 71 6c 69 74 65 33 return sqlite3
22c0: 5f 63 6f 6c 75 6d 6e 5f 62 79 74 65 73 28 70 53 _column_bytes(pS
22d0: 74 6d 74 2d 3e 70 53 74 6d 74 2c 20 4e 29 3b 0a tmt->pStmt, N);.
22e0: 7d 0a 69 6e 74 20 64 62 5f 63 6f 6c 75 6d 6e 5f }.int db_column_
22f0: 69 6e 74 28 53 74 6d 74 20 2a 70 53 74 6d 74 2c int(Stmt *pStmt,
2300: 20 69 6e 74 20 4e 29 7b 0a 20 20 72 65 74 75 72 int N){. retur
2310: 6e 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e n sqlite3_column
2320: 5f 69 6e 74 28 70 53 74 6d 74 2d 3e 70 53 74 6d _int(pStmt->pStm
2330: 74 2c 20 4e 29 3b 0a 7d 0a 69 36 34 20 64 62 5f t, N);.}.i64 db_
2340: 63 6f 6c 75 6d 6e 5f 69 6e 74 36 34 28 53 74 6d column_int64(Stm
2350: 74 20 2a 70 53 74 6d 74 2c 20 69 6e 74 20 4e 29 t *pStmt, int N)
2360: 7b 0a 20 20 72 65 74 75 72 6e 20 73 71 6c 69 74 {. return sqlit
2370: 65 33 5f 63 6f 6c 75 6d 6e 5f 69 6e 74 36 34 28 e3_column_int64(
2380: 70 53 74 6d 74 2d 3e 70 53 74 6d 74 2c 20 4e 29 pStmt->pStmt, N)
2390: 3b 0a 7d 0a 64 6f 75 62 6c 65 20 64 62 5f 63 6f ;.}.double db_co
23a0: 6c 75 6d 6e 5f 64 6f 75 62 6c 65 28 53 74 6d 74 lumn_double(Stmt
23b0: 20 2a 70 53 74 6d 74 2c 20 69 6e 74 20 4e 29 7b *pStmt, int N){
23c0: 0a 20 20 72 65 74 75 72 6e 20 73 71 6c 69 74 65 . return sqlite
23d0: 33 5f 63 6f 6c 75 6d 6e 5f 64 6f 75 62 6c 65 28 3_column_double(
23e0: 70 53 74 6d 74 2d 3e 70 53 74 6d 74 2c 20 4e 29 pStmt->pStmt, N)
23f0: 3b 0a 7d 0a 63 6f 6e 73 74 20 63 68 61 72 20 2a ;.}.const char *
2400: 64 62 5f 63 6f 6c 75 6d 6e 5f 74 65 78 74 28 53 db_column_text(S
2410: 74 6d 74 20 2a 70 53 74 6d 74 2c 20 69 6e 74 20 tmt *pStmt, int
2420: 4e 29 7b 0a 20 20 72 65 74 75 72 6e 20 28 63 68 N){. return (ch
2430: 61 72 2a 29 73 71 6c 69 74 65 33 5f 63 6f 6c 75 ar*)sqlite3_colu
2440: 6d 6e 5f 74 65 78 74 28 70 53 74 6d 74 2d 3e 70 mn_text(pStmt->p
2450: 53 74 6d 74 2c 20 4e 29 3b 0a 7d 0a 63 6f 6e 73 Stmt, N);.}.cons
2460: 74 20 63 68 61 72 20 2a 64 62 5f 63 6f 6c 75 6d t char *db_colum
2470: 6e 5f 6e 61 6d 65 28 53 74 6d 74 20 2a 70 53 74 n_name(Stmt *pSt
2480: 6d 74 2c 20 69 6e 74 20 4e 29 7b 0a 20 20 72 65 mt, int N){. re
2490: 74 75 72 6e 20 28 63 68 61 72 2a 29 73 71 6c 69 turn (char*)sqli
24a0: 74 65 33 5f 63 6f 6c 75 6d 6e 5f 6e 61 6d 65 28 te3_column_name(
24b0: 70 53 74 6d 74 2d 3e 70 53 74 6d 74 2c 20 4e 29 pStmt->pStmt, N)
24c0: 3b 0a 7d 0a 69 6e 74 20 64 62 5f 63 6f 6c 75 6d ;.}.int db_colum
24d0: 6e 5f 63 6f 75 6e 74 28 53 74 6d 74 20 2a 70 53 n_count(Stmt *pS
24e0: 74 6d 74 29 7b 0a 20 20 72 65 74 75 72 6e 20 73 tmt){. return s
24f0: 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 63 6f qlite3_column_co
2500: 75 6e 74 28 70 53 74 6d 74 2d 3e 70 53 74 6d 74 unt(pStmt->pStmt
2510: 29 3b 0a 7d 0a 63 68 61 72 20 2a 64 62 5f 63 6f );.}.char *db_co
2520: 6c 75 6d 6e 5f 6d 61 6c 6c 6f 63 28 53 74 6d 74 lumn_malloc(Stmt
2530: 20 2a 70 53 74 6d 74 2c 20 69 6e 74 20 4e 29 7b *pStmt, int N){
2540: 0a 20 20 72 65 74 75 72 6e 20 6d 70 72 69 6e 74 . return mprint
2550: 66 28 22 25 73 22 2c 20 64 62 5f 63 6f 6c 75 6d f("%s", db_colum
2560: 6e 5f 74 65 78 74 28 70 53 74 6d 74 2c 20 4e 29 n_text(pStmt, N)
2570: 29 3b 0a 7d 0a 76 6f 69 64 20 64 62 5f 63 6f 6c );.}.void db_col
2580: 75 6d 6e 5f 62 6c 6f 62 28 53 74 6d 74 20 2a 70 umn_blob(Stmt *p
2590: 53 74 6d 74 2c 20 69 6e 74 20 4e 2c 20 42 6c 6f Stmt, int N, Blo
25a0: 62 20 2a 70 42 6c 6f 62 29 7b 0a 20 20 62 6c 6f b *pBlob){. blo
25b0: 62 5f 61 70 70 65 6e 64 28 70 42 6c 6f 62 2c 20 b_append(pBlob,
25c0: 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 62 sqlite3_column_b
25d0: 6c 6f 62 28 70 53 74 6d 74 2d 3e 70 53 74 6d 74 lob(pStmt->pStmt
25e0: 2c 20 4e 29 2c 0a 20 20 20 20 20 20 20 20 20 20 , N),.
25f0: 20 20 20 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 sqlite3_colu
2600: 6d 6e 5f 62 79 74 65 73 28 70 53 74 6d 74 2d 3e mn_bytes(pStmt->
2610: 70 53 74 6d 74 2c 20 4e 29 29 3b 0a 7d 0a 0a 2f pStmt, N));.}../
2620: 2a 0a 2a 2a 20 49 6e 69 74 69 61 6c 69 7a 65 20 *.** Initialize
2630: 61 20 62 6c 6f 62 20 74 6f 20 61 6e 20 65 70 68 a blob to an eph
2640: 65 72 6d 65 72 61 6c 20 63 6f 70 79 20 6f 66 20 ermeral copy of
2650: 74 68 65 20 63 6f 6e 74 65 6e 74 20 6f 66 20 61 the content of a
2660: 0a 2a 2a 20 63 6f 6c 75 6d 6e 20 69 6e 20 74 68 .** column in th
2670: 65 20 63 75 72 72 65 6e 74 20 72 6f 77 2e 20 20 e current row.
2680: 54 68 65 20 64 61 74 61 20 69 6e 20 74 68 65 20 The data in the
2690: 62 6c 6f 62 20 77 69 6c 6c 20 62 65 63 6f 6d 65 blob will become
26a0: 0a 2a 2a 20 69 6e 76 61 6c 69 64 20 77 68 65 6e .** invalid when
26b0: 20 74 68 65 20 73 74 61 74 65 6d 65 6e 74 20 69 the statement i
26c0: 73 20 73 74 65 70 70 65 64 20 6f 72 20 72 65 73 s stepped or res
26d0: 65 74 2e 0a 2a 2f 0a 76 6f 69 64 20 64 62 5f 65 et..*/.void db_e
26e0: 70 68 65 6d 65 72 61 6c 5f 62 6c 6f 62 28 53 74 phemeral_blob(St
26f0: 6d 74 20 2a 70 53 74 6d 74 2c 20 69 6e 74 20 4e mt *pStmt, int N
2700: 2c 20 42 6c 6f 62 20 2a 70 42 6c 6f 62 29 7b 0a , Blob *pBlob){.
2710: 20 20 62 6c 6f 62 5f 69 6e 69 74 28 70 42 6c 6f blob_init(pBlo
2720: 62 2c 20 73 71 6c 69 74 65 33 5f 63 6f 6c 75 6d b, sqlite3_colum
2730: 6e 5f 62 6c 6f 62 28 70 53 74 6d 74 2d 3e 70 53 n_blob(pStmt->pS
2740: 74 6d 74 2c 20 4e 29 2c 0a 20 20 20 20 20 20 20 tmt, N),.
2750: 20 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 63 sqlite3_c
2760: 6f 6c 75 6d 6e 5f 62 79 74 65 73 28 70 53 74 6d olumn_bytes(pStm
2770: 74 2d 3e 70 53 74 6d 74 2c 20 4e 29 29 3b 0a 7d t->pStmt, N));.}
2780: 0a 0a 2f 2a 0a 2a 2a 20 43 68 65 63 6b 20 61 20 ../*.** Check a
2790: 72 65 73 75 6c 74 20 63 6f 64 65 2e 20 20 49 66 result code. If
27a0: 20 69 74 20 69 73 20 6e 6f 74 20 53 51 4c 49 54 it is not SQLIT
27b0: 45 5f 4f 4b 2c 20 70 72 69 6e 74 20 74 68 65 0a E_OK, print the.
27c0: 2a 2a 20 63 6f 72 72 65 73 70 6f 6e 64 69 6e 67 ** corresponding
27d0: 20 65 72 72 6f 72 20 6d 65 73 73 61 67 65 20 61 error message a
27e0: 6e 64 20 65 78 69 74 2e 0a 2a 2f 0a 76 6f 69 64 nd exit..*/.void
27f0: 20 64 62 5f 63 68 65 63 6b 5f 72 65 73 75 6c 74 db_check_result
2800: 28 69 6e 74 20 72 63 29 7b 0a 20 20 69 66 28 20 (int rc){. if(
2810: 72 63 21 3d 53 51 4c 49 54 45 5f 4f 4b 20 29 7b rc!=SQLITE_OK ){
2820: 0a 20 20 20 20 64 62 5f 65 72 72 28 22 53 51 4c . db_err("SQL
2830: 20 65 72 72 6f 72 3a 20 25 73 22 2c 20 73 71 6c error: %s", sql
2840: 69 74 65 33 5f 65 72 72 6d 73 67 28 67 2e 64 62 ite3_errmsg(g.db
2850: 29 29 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a ));. }.}../*.**
2860: 20 45 78 65 63 75 74 65 20 61 20 73 69 6e 67 6c Execute a singl
2870: 65 20 70 72 65 70 61 72 65 64 20 73 74 61 74 65 e prepared state
2880: 6d 65 6e 74 20 75 6e 74 69 6c 20 69 74 20 66 69 ment until it fi
2890: 6e 69 73 68 65 73 2e 0a 2a 2f 0a 69 6e 74 20 64 nishes..*/.int d
28a0: 62 5f 65 78 65 63 28 53 74 6d 74 20 2a 70 53 74 b_exec(Stmt *pSt
28b0: 6d 74 29 7b 0a 20 20 69 6e 74 20 72 63 3b 0a 20 mt){. int rc;.
28c0: 20 77 68 69 6c 65 28 20 28 72 63 20 3d 20 64 62 while( (rc = db
28d0: 5f 73 74 65 70 28 70 53 74 6d 74 29 29 3d 3d 53 _step(pStmt))==S
28e0: 51 4c 49 54 45 5f 52 4f 57 20 29 7b 7d 0a 20 20 QLITE_ROW ){}.
28f0: 72 63 20 3d 20 64 62 5f 72 65 73 65 74 28 70 53 rc = db_reset(pS
2900: 74 6d 74 29 3b 0a 20 20 64 62 5f 63 68 65 63 6b tmt);. db_check
2910: 5f 72 65 73 75 6c 74 28 72 63 29 3b 0a 20 20 72 _result(rc);. r
2920: 65 74 75 72 6e 20 72 63 3b 0a 7d 0a 0a 2f 2a 0a eturn rc;.}../*.
2930: 2a 2a 20 45 78 65 63 75 74 65 20 6d 75 6c 74 69 ** Execute multi
2940: 70 6c 65 20 53 51 4c 20 73 74 61 74 65 6d 65 6e ple SQL statemen
2950: 74 73 2e 0a 2a 2f 0a 69 6e 74 20 64 62 5f 6d 75 ts..*/.int db_mu
2960: 6c 74 69 5f 65 78 65 63 28 63 6f 6e 73 74 20 63 lti_exec(const c
2970: 68 61 72 20 2a 7a 53 71 6c 2c 20 2e 2e 2e 29 7b har *zSql, ...){
2980: 0a 20 20 42 6c 6f 62 20 73 71 6c 3b 0a 20 20 69 . Blob sql;. i
2990: 6e 74 20 72 63 3b 0a 20 20 76 61 5f 6c 69 73 74 nt rc;. va_list
29a0: 20 61 70 3b 0a 20 20 63 68 61 72 20 2a 7a 45 72 ap;. char *zEr
29b0: 72 20 3d 20 30 3b 0a 20 20 62 6c 6f 62 5f 69 6e r = 0;. blob_in
29c0: 69 74 28 26 73 71 6c 2c 20 30 2c 20 30 29 3b 0a it(&sql, 0, 0);.
29d0: 20 20 76 61 5f 73 74 61 72 74 28 61 70 2c 20 7a va_start(ap, z
29e0: 53 71 6c 29 3b 0a 20 20 62 6c 6f 62 5f 76 61 70 Sql);. blob_vap
29f0: 70 65 6e 64 66 28 26 73 71 6c 2c 20 7a 53 71 6c pendf(&sql, zSql
2a00: 2c 20 61 70 29 3b 0a 20 20 76 61 5f 65 6e 64 28 , ap);. va_end(
2a10: 61 70 29 3b 0a 20 20 72 63 20 3d 20 73 71 6c 69 ap);. rc = sqli
2a20: 74 65 33 5f 65 78 65 63 28 67 2e 64 62 2c 20 62 te3_exec(g.db, b
2a30: 6c 6f 62 5f 62 75 66 66 65 72 28 26 73 71 6c 29 lob_buffer(&sql)
2a40: 2c 20 30 2c 20 30 2c 20 26 7a 45 72 72 29 3b 0a , 0, 0, &zErr);.
2a50: 20 20 69 66 28 20 72 63 21 3d 53 51 4c 49 54 45 if( rc!=SQLITE
2a60: 5f 4f 4b 20 29 7b 0a 20 20 20 20 64 62 5f 65 72 _OK ){. db_er
2a70: 72 28 22 25 73 5c 6e 25 73 22 2c 20 7a 45 72 72 r("%s\n%s", zErr
2a80: 2c 20 62 6c 6f 62 5f 62 75 66 66 65 72 28 26 73 , blob_buffer(&s
2a90: 71 6c 29 29 3b 0a 20 20 7d 0a 20 20 62 6c 6f 62 ql));. }. blob
2aa0: 5f 72 65 73 65 74 28 26 73 71 6c 29 3b 0a 20 20 _reset(&sql);.
2ab0: 72 65 74 75 72 6e 20 72 63 3b 0a 7d 0a 0a 2f 2a return rc;.}../*
2ac0: 0a 2a 2a 20 45 78 65 63 75 74 65 20 61 20 71 75 .** Execute a qu
2ad0: 65 72 79 20 61 6e 64 20 72 65 74 75 72 6e 20 61 ery and return a
2ae0: 20 73 69 6e 67 6c 65 20 69 6e 74 65 67 65 72 20 single integer
2af0: 76 61 6c 75 65 2e 0a 2a 2f 0a 69 36 34 20 64 62 value..*/.i64 db
2b00: 5f 69 6e 74 36 34 28 69 36 34 20 69 44 66 6c 74 _int64(i64 iDflt
2b10: 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 53 , const char *zS
2b20: 71 6c 2c 20 2e 2e 2e 29 7b 0a 20 20 76 61 5f 6c ql, ...){. va_l
2b30: 69 73 74 20 61 70 3b 0a 20 20 53 74 6d 74 20 73 ist ap;. Stmt s
2b40: 3b 0a 20 20 69 36 34 20 72 63 3b 0a 20 20 76 61 ;. i64 rc;. va
2b50: 5f 73 74 61 72 74 28 61 70 2c 20 7a 53 71 6c 29 _start(ap, zSql)
2b60: 3b 0a 20 20 64 62 5f 76 70 72 65 70 61 72 65 28 ;. db_vprepare(
2b70: 26 73 2c 20 7a 53 71 6c 2c 20 61 70 29 3b 0a 20 &s, zSql, ap);.
2b80: 20 76 61 5f 65 6e 64 28 61 70 29 3b 0a 20 20 69 va_end(ap);. i
2b90: 66 28 20 64 62 5f 73 74 65 70 28 26 73 29 21 3d f( db_step(&s)!=
2ba0: 53 51 4c 49 54 45 5f 52 4f 57 20 29 7b 0a 20 20 SQLITE_ROW ){.
2bb0: 20 20 72 63 20 3d 20 69 44 66 6c 74 3b 0a 20 20 rc = iDflt;.
2bc0: 7d 65 6c 73 65 7b 0a 20 20 20 20 72 63 20 3d 20 }else{. rc =
2bd0: 64 62 5f 63 6f 6c 75 6d 6e 5f 69 6e 74 36 34 28 db_column_int64(
2be0: 26 73 2c 20 30 29 3b 0a 20 20 7d 0a 20 20 64 62 &s, 0);. }. db
2bf0: 5f 66 69 6e 61 6c 69 7a 65 28 26 73 29 3b 0a 20 _finalize(&s);.
2c00: 20 72 65 74 75 72 6e 20 72 63 3b 0a 7d 0a 69 6e return rc;.}.in
2c10: 74 20 64 62 5f 69 6e 74 28 69 6e 74 20 69 44 66 t db_int(int iDf
2c20: 6c 74 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a lt, const char *
2c30: 7a 53 71 6c 2c 20 2e 2e 2e 29 7b 0a 20 20 76 61 zSql, ...){. va
2c40: 5f 6c 69 73 74 20 61 70 3b 0a 20 20 53 74 6d 74 _list ap;. Stmt
2c50: 20 73 3b 0a 20 20 69 6e 74 20 72 63 3b 0a 20 20 s;. int rc;.
2c60: 76 61 5f 73 74 61 72 74 28 61 70 2c 20 7a 53 71 va_start(ap, zSq
2c70: 6c 29 3b 0a 20 20 64 62 5f 76 70 72 65 70 61 72 l);. db_vprepar
2c80: 65 28 26 73 2c 20 7a 53 71 6c 2c 20 61 70 29 3b e(&s, zSql, ap);
2c90: 0a 20 20 76 61 5f 65 6e 64 28 61 70 29 3b 0a 20 . va_end(ap);.
2ca0: 20 69 66 28 20 64 62 5f 73 74 65 70 28 26 73 29 if( db_step(&s)
2cb0: 21 3d 53 51 4c 49 54 45 5f 52 4f 57 20 29 7b 0a !=SQLITE_ROW ){.
2cc0: 20 20 20 20 72 63 20 3d 20 69 44 66 6c 74 3b 0a rc = iDflt;.
2cd0: 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 72 63 20 }else{. rc
2ce0: 3d 20 64 62 5f 63 6f 6c 75 6d 6e 5f 69 6e 74 28 = db_column_int(
2cf0: 26 73 2c 20 30 29 3b 0a 20 20 7d 0a 20 20 64 62 &s, 0);. }. db
2d00: 5f 66 69 6e 61 6c 69 7a 65 28 26 73 29 3b 0a 20 _finalize(&s);.
2d10: 20 72 65 74 75 72 6e 20 72 63 3b 0a 7d 0a 0a 2f return rc;.}../
2d20: 2a 0a 2a 2a 20 52 65 74 75 72 6e 20 54 52 55 45 *.** Return TRUE
2d30: 20 69 66 20 74 68 65 20 71 75 65 72 79 20 77 6f if the query wo
2d40: 75 6c 64 20 72 65 74 75 72 6e 20 31 20 6f 72 20 uld return 1 or
2d50: 6d 6f 72 65 20 72 6f 77 73 2e 20 20 52 65 74 75 more rows. Retu
2d60: 72 6e 0a 2a 2a 20 46 41 4c 53 45 20 69 66 20 74 rn.** FALSE if t
2d70: 68 65 20 71 75 65 72 79 20 72 65 73 75 6c 74 20 he query result
2d80: 77 6f 75 6c 64 20 62 65 20 61 6e 20 65 6d 70 74 would be an empt
2d90: 79 20 73 65 74 2e 0a 2a 2f 0a 69 6e 74 20 64 62 y set..*/.int db
2da0: 5f 65 78 69 73 74 73 28 63 6f 6e 73 74 20 63 68 _exists(const ch
2db0: 61 72 20 2a 7a 53 71 6c 2c 20 2e 2e 2e 29 7b 0a ar *zSql, ...){.
2dc0: 20 20 76 61 5f 6c 69 73 74 20 61 70 3b 0a 20 20 va_list ap;.
2dd0: 53 74 6d 74 20 73 3b 0a 20 20 69 6e 74 20 72 63 Stmt s;. int rc
2de0: 3b 0a 20 20 76 61 5f 73 74 61 72 74 28 61 70 2c ;. va_start(ap,
2df0: 20 7a 53 71 6c 29 3b 0a 20 20 64 62 5f 76 70 72 zSql);. db_vpr
2e00: 65 70 61 72 65 28 26 73 2c 20 7a 53 71 6c 2c 20 epare(&s, zSql,
2e10: 61 70 29 3b 0a 20 20 76 61 5f 65 6e 64 28 61 70 ap);. va_end(ap
2e20: 29 3b 0a 20 20 69 66 28 20 64 62 5f 73 74 65 70 );. if( db_step
2e30: 28 26 73 29 21 3d 53 51 4c 49 54 45 5f 52 4f 57 (&s)!=SQLITE_ROW
2e40: 20 29 7b 0a 20 20 20 20 72 63 20 3d 20 30 3b 0a ){. rc = 0;.
2e50: 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 72 63 20 }else{. rc
2e60: 3d 20 31 3b 0a 20 20 7d 0a 20 20 64 62 5f 66 69 = 1;. }. db_fi
2e70: 6e 61 6c 69 7a 65 28 26 73 29 3b 0a 20 20 72 65 nalize(&s);. re
2e80: 74 75 72 6e 20 72 63 3b 0a 7d 0a 0a 0a 2f 2a 0a turn rc;.}.../*.
2e90: 2a 2a 20 45 78 65 63 75 74 65 20 61 20 71 75 65 ** Execute a que
2ea0: 72 79 20 61 6e 64 20 72 65 74 75 72 6e 20 61 20 ry and return a
2eb0: 66 6c 6f 61 74 69 6e 67 2d 70 6f 69 6e 74 20 76 floating-point v
2ec0: 61 6c 75 65 2e 0a 2a 2f 0a 64 6f 75 62 6c 65 20 alue..*/.double
2ed0: 64 62 5f 64 6f 75 62 6c 65 28 64 6f 75 62 6c 65 db_double(double
2ee0: 20 72 44 66 6c 74 2c 20 63 6f 6e 73 74 20 63 68 rDflt, const ch
2ef0: 61 72 20 2a 7a 53 71 6c 2c 20 2e 2e 2e 29 7b 0a ar *zSql, ...){.
2f00: 20 20 76 61 5f 6c 69 73 74 20 61 70 3b 0a 20 20 va_list ap;.
2f10: 53 74 6d 74 20 73 3b 0a 20 20 64 6f 75 62 6c 65 Stmt s;. double
2f20: 20 72 3b 0a 20 20 76 61 5f 73 74 61 72 74 28 61 r;. va_start(a
2f30: 70 2c 20 7a 53 71 6c 29 3b 0a 20 20 64 62 5f 76 p, zSql);. db_v
2f40: 70 72 65 70 61 72 65 28 26 73 2c 20 7a 53 71 6c prepare(&s, zSql
2f50: 2c 20 61 70 29 3b 0a 20 20 76 61 5f 65 6e 64 28 , ap);. va_end(
2f60: 61 70 29 3b 0a 20 20 69 66 28 20 64 62 5f 73 74 ap);. if( db_st
2f70: 65 70 28 26 73 29 21 3d 53 51 4c 49 54 45 5f 52 ep(&s)!=SQLITE_R
2f80: 4f 57 20 29 7b 0a 20 20 20 20 72 20 3d 20 72 44 OW ){. r = rD
2f90: 66 6c 74 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 flt;. }else{.
2fa0: 20 20 72 20 3d 20 64 62 5f 63 6f 6c 75 6d 6e 5f r = db_column_
2fb0: 64 6f 75 62 6c 65 28 26 73 2c 20 30 29 3b 0a 20 double(&s, 0);.
2fc0: 20 7d 0a 20 20 64 62 5f 66 69 6e 61 6c 69 7a 65 }. db_finalize
2fd0: 28 26 73 29 3b 0a 20 20 72 65 74 75 72 6e 20 72 (&s);. return r
2fe0: 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 45 78 65 63 75 ;.}../*.** Execu
2ff0: 74 65 20 61 20 71 75 65 72 79 20 61 6e 64 20 61 te a query and a
3000: 70 70 65 6e 64 20 74 68 65 20 66 69 72 73 74 20 ppend the first
3010: 63 6f 6c 75 6d 6e 20 6f 66 20 74 68 65 20 66 69 column of the fi
3020: 72 73 74 20 72 6f 77 0a 2a 2a 20 6f 66 20 74 68 rst row.** of th
3030: 65 20 72 65 73 75 6c 74 20 73 65 74 20 74 6f 20 e result set to
3040: 62 6c 6f 62 20 67 69 76 65 6e 20 69 6e 20 74 68 blob given in th
3050: 65 20 66 69 72 73 74 20 61 72 67 75 6d 65 6e 74 e first argument
3060: 2e 0a 2a 2f 0a 76 6f 69 64 20 64 62 5f 62 6c 6f ..*/.void db_blo
3070: 62 28 42 6c 6f 62 20 2a 70 52 65 73 75 6c 74 2c b(Blob *pResult,
3080: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 53 71 const char *zSq
3090: 6c 2c 20 2e 2e 2e 29 7b 0a 20 20 76 61 5f 6c 69 l, ...){. va_li
30a0: 73 74 20 61 70 3b 0a 20 20 53 74 6d 74 20 73 3b st ap;. Stmt s;
30b0: 0a 20 20 76 61 5f 73 74 61 72 74 28 61 70 2c 20 . va_start(ap,
30c0: 7a 53 71 6c 29 3b 0a 20 20 64 62 5f 76 70 72 65 zSql);. db_vpre
30d0: 70 61 72 65 28 26 73 2c 20 7a 53 71 6c 2c 20 61 pare(&s, zSql, a
30e0: 70 29 3b 0a 20 20 76 61 5f 65 6e 64 28 61 70 29 p);. va_end(ap)
30f0: 3b 0a 20 20 69 66 28 20 64 62 5f 73 74 65 70 28 ;. if( db_step(
3100: 26 73 29 3d 3d 53 51 4c 49 54 45 5f 52 4f 57 20 &s)==SQLITE_ROW
3110: 29 7b 0a 20 20 20 20 62 6c 6f 62 5f 61 70 70 65 ){. blob_appe
3120: 6e 64 28 70 52 65 73 75 6c 74 2c 20 73 71 6c 69 nd(pResult, sqli
3130: 74 65 33 5f 63 6f 6c 75 6d 6e 5f 62 6c 6f 62 28 te3_column_blob(
3140: 73 2e 70 53 74 6d 74 2c 20 30 29 2c 0a 20 20 20 s.pStmt, 0),.
3150: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
3160: 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 63 6f sqlite3_co
3170: 6c 75 6d 6e 5f 62 79 74 65 73 28 73 2e 70 53 74 lumn_bytes(s.pSt
3180: 6d 74 2c 20 30 29 29 3b 0a 20 20 7d 0a 20 20 64 mt, 0));. }. d
3190: 62 5f 66 69 6e 61 6c 69 7a 65 28 26 73 29 3b 0a b_finalize(&s);.
31a0: 7d 0a 0a 2f 2a 0a 2a 2a 20 45 78 65 63 75 74 65 }../*.** Execute
31b0: 20 61 20 71 75 65 72 79 2e 20 20 52 65 74 75 72 a query. Retur
31c0: 6e 20 74 68 65 20 66 69 72 73 74 20 63 6f 6c 75 n the first colu
31d0: 6d 6e 20 6f 66 20 74 68 65 20 66 69 72 73 74 20 mn of the first
31e0: 72 6f 77 0a 2a 2a 20 6f 66 20 74 68 65 20 72 65 row.** of the re
31f0: 73 75 6c 74 20 73 65 74 20 61 73 20 61 20 73 74 sult set as a st
3200: 72 69 6e 67 2e 20 20 53 70 61 63 65 20 74 6f 20 ring. Space to
3210: 68 6f 6c 64 20 74 68 65 20 73 74 72 69 6e 67 20 hold the string
3220: 69 73 0a 2a 2a 20 6f 62 74 61 69 6e 65 64 20 66 is.** obtained f
3230: 72 6f 6d 20 6d 61 6c 6c 6f 63 28 29 2e 20 20 49 rom malloc(). I
3240: 66 20 74 68 65 20 72 65 73 75 6c 74 20 73 65 74 f the result set
3250: 20 69 73 20 65 6d 70 74 79 2c 20 72 65 74 75 72 is empty, retur
3260: 6e 0a 2a 2a 20 7a 44 65 66 61 75 6c 74 20 69 6e n.** zDefault in
3270: 73 74 65 61 64 2e 0a 2a 2f 0a 63 68 61 72 20 2a stead..*/.char *
3280: 64 62 5f 74 65 78 74 28 63 68 61 72 20 2a 7a 44 db_text(char *zD
3290: 65 66 61 75 6c 74 2c 20 63 6f 6e 73 74 20 63 68 efault, const ch
32a0: 61 72 20 2a 7a 53 71 6c 2c 20 2e 2e 2e 29 7b 0a ar *zSql, ...){.
32b0: 20 20 76 61 5f 6c 69 73 74 20 61 70 3b 0a 20 20 va_list ap;.
32c0: 53 74 6d 74 20 73 3b 0a 20 20 63 68 61 72 20 2a Stmt s;. char *
32d0: 7a 20 3d 20 7a 44 65 66 61 75 6c 74 3b 0a 20 20 z = zDefault;.
32e0: 76 61 5f 73 74 61 72 74 28 61 70 2c 20 7a 53 71 va_start(ap, zSq
32f0: 6c 29 3b 0a 20 20 64 62 5f 76 70 72 65 70 61 72 l);. db_vprepar
3300: 65 28 26 73 2c 20 7a 53 71 6c 2c 20 61 70 29 3b e(&s, zSql, ap);
3310: 0a 20 20 76 61 5f 65 6e 64 28 61 70 29 3b 0a 20 . va_end(ap);.
3320: 20 69 66 28 20 64 62 5f 73 74 65 70 28 26 73 29 if( db_step(&s)
3330: 3d 3d 53 51 4c 49 54 45 5f 52 4f 57 20 29 7b 0a ==SQLITE_ROW ){.
3340: 20 20 20 20 7a 20 3d 20 6d 70 72 69 6e 74 66 28 z = mprintf(
3350: 22 25 73 22 2c 20 73 71 6c 69 74 65 33 5f 63 6f "%s", sqlite3_co
3360: 6c 75 6d 6e 5f 74 65 78 74 28 73 2e 70 53 74 6d lumn_text(s.pStm
3370: 74 2c 20 30 29 29 3b 0a 20 20 7d 0a 20 20 64 62 t, 0));. }. db
3380: 5f 66 69 6e 61 6c 69 7a 65 28 26 73 29 3b 0a 20 _finalize(&s);.
3390: 20 72 65 74 75 72 6e 20 7a 3b 0a 7d 0a 0a 2f 2a return z;.}../*
33a0: 0a 2a 2a 20 49 6e 69 74 69 61 6c 69 7a 65 20 61 .** Initialize a
33b0: 20 6e 65 77 20 64 61 74 61 62 61 73 65 20 66 69 new database fi
33c0: 6c 65 20 77 69 74 68 20 74 68 65 20 67 69 76 65 le with the give
33d0: 6e 20 73 63 68 65 6d 61 2e 20 20 49 66 20 61 6e n schema. If an
33e0: 79 74 68 69 6e 67 0a 2a 2a 20 67 6f 65 73 20 77 ything.** goes w
33f0: 72 6f 6e 67 2c 20 63 61 6c 6c 20 64 62 5f 65 72 rong, call db_er
3400: 72 28 29 20 74 6f 20 65 78 69 74 2e 0a 2a 2f 0a r() to exit..*/.
3410: 76 6f 69 64 20 64 62 5f 69 6e 69 74 5f 64 61 74 void db_init_dat
3420: 61 62 61 73 65 28 0a 20 20 63 6f 6e 73 74 20 63 abase(. const c
3430: 68 61 72 20 2a 7a 46 69 6c 65 4e 61 6d 65 2c 20 har *zFileName,
3440: 20 20 2f 2a 20 4e 61 6d 65 20 6f 66 20 64 61 74 /* Name of dat
3450: 61 62 61 73 65 20 66 69 6c 65 20 74 6f 20 63 72 abase file to cr
3460: 65 61 74 65 20 2a 2f 0a 20 20 63 6f 6e 73 74 20 eate */. const
3470: 63 68 61 72 20 2a 7a 53 63 68 65 6d 61 2c 20 20 char *zSchema,
3480: 20 20 20 2f 2a 20 46 69 72 73 74 20 70 61 72 74 /* First part
3490: 20 6f 66 20 73 63 68 65 6d 61 20 2a 2f 0a 20 20 of schema */.
34a0: 2e 2e 2e 20 20 20 20 20 20 20 20 20 20 20 20 20 ...
34b0: 20 20 20 20 20 20 20 20 20 2f 2a 20 41 64 64 69 /* Addi
34c0: 74 69 6f 6e 61 6c 20 53 51 4c 20 74 6f 20 72 75 tional SQL to ru
34d0: 6e 2e 20 20 54 65 72 6d 69 6e 61 74 65 20 77 69 n. Terminate wi
34e0: 74 68 20 4e 55 4c 4c 2e 20 2a 2f 0a 29 7b 0a 20 th NULL. */.){.
34f0: 20 73 71 6c 69 74 65 33 20 2a 64 62 3b 0a 20 20 sqlite3 *db;.
3500: 69 6e 74 20 72 63 3b 0a 20 20 63 6f 6e 73 74 20 int rc;. const
3510: 63 68 61 72 20 2a 7a 53 71 6c 3b 0a 20 20 76 61 char *zSql;. va
3520: 5f 6c 69 73 74 20 61 70 3b 0a 0a 20 20 72 63 20 _list ap;.. rc
3530: 3d 20 73 71 6c 69 74 65 33 5f 6f 70 65 6e 28 7a = sqlite3_open(z
3540: 46 69 6c 65 4e 61 6d 65 2c 20 26 64 62 29 3b 0a FileName, &db);.
3550: 20 20 69 66 28 20 72 63 21 3d 53 51 4c 49 54 45 if( rc!=SQLITE
3560: 5f 4f 4b 20 29 7b 0a 20 20 20 20 64 62 5f 65 72 _OK ){. db_er
3570: 72 28 73 71 6c 69 74 65 33 5f 65 72 72 6d 73 67 r(sqlite3_errmsg
3580: 28 64 62 29 29 3b 0a 20 20 7d 0a 20 20 73 71 6c (db));. }. sql
3590: 69 74 65 33 5f 65 78 65 63 28 64 62 2c 20 22 42 ite3_exec(db, "B
35a0: 45 47 49 4e 20 45 58 43 4c 55 53 49 56 45 22 2c EGIN EXCLUSIVE",
35b0: 20 30 2c 20 30 2c 20 30 29 3b 0a 20 20 72 63 20 0, 0, 0);. rc
35c0: 3d 20 73 71 6c 69 74 65 33 5f 65 78 65 63 28 64 = sqlite3_exec(d
35d0: 62 2c 20 7a 53 63 68 65 6d 61 2c 20 30 2c 20 30 b, zSchema, 0, 0
35e0: 2c 20 30 29 3b 0a 20 20 69 66 28 20 72 63 21 3d , 0);. if( rc!=
35f0: 53 51 4c 49 54 45 5f 4f 4b 20 29 7b 0a 20 20 20 SQLITE_OK ){.
3600: 20 64 62 5f 65 72 72 28 73 71 6c 69 74 65 33 5f db_err(sqlite3_
3610: 65 72 72 6d 73 67 28 64 62 29 29 3b 0a 20 20 7d errmsg(db));. }
3620: 0a 20 20 76 61 5f 73 74 61 72 74 28 61 70 2c 20 . va_start(ap,
3630: 7a 53 63 68 65 6d 61 29 3b 0a 20 20 77 68 69 6c zSchema);. whil
3640: 65 28 20 28 7a 53 71 6c 20 3d 20 76 61 5f 61 72 e( (zSql = va_ar
3650: 67 28 61 70 2c 20 63 6f 6e 73 74 20 63 68 61 72 g(ap, const char
3660: 2a 29 29 21 3d 30 20 29 7b 0a 20 20 20 20 72 63 *))!=0 ){. rc
3670: 20 3d 20 73 71 6c 69 74 65 33 5f 65 78 65 63 28 = sqlite3_exec(
3680: 64 62 2c 20 7a 53 71 6c 2c 20 30 2c 20 30 2c 20 db, zSql, 0, 0,
3690: 30 29 3b 0a 20 20 20 20 69 66 28 20 72 63 21 3d 0);. if( rc!=
36a0: 53 51 4c 49 54 45 5f 4f 4b 20 29 7b 0a 20 20 20 SQLITE_OK ){.
36b0: 20 20 20 64 62 5f 65 72 72 28 73 71 6c 69 74 65 db_err(sqlite
36c0: 33 5f 65 72 72 6d 73 67 28 64 62 29 29 3b 0a 20 3_errmsg(db));.
36d0: 20 20 20 7d 0a 20 20 7d 0a 20 20 76 61 5f 65 6e }. }. va_en
36e0: 64 28 61 70 29 3b 0a 20 20 73 71 6c 69 74 65 33 d(ap);. sqlite3
36f0: 5f 65 78 65 63 28 64 62 2c 20 22 43 4f 4d 4d 49 _exec(db, "COMMI
3700: 54 22 2c 20 30 2c 20 30 2c 20 30 29 3b 0a 20 20 T", 0, 0, 0);.
3710: 73 71 6c 69 74 65 33 5f 63 6c 6f 73 65 28 64 62 sqlite3_close(db
3720: 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 7a 44 62 4e );.}../*.** zDbN
3730: 61 6d 65 20 69 73 20 74 68 65 20 6e 61 6d 65 20 ame is the name
3740: 6f 66 20 61 20 64 61 74 61 62 61 73 65 20 66 69 of a database fi
3750: 6c 65 2e 20 20 49 66 20 6e 6f 20 6f 74 68 65 72 le. If no other
3760: 20 64 61 74 61 62 61 73 65 0a 2a 2a 20 66 69 6c database.** fil
3770: 65 20 69 73 20 6f 70 65 6e 2c 20 74 68 65 6e 20 e is open, then
3780: 6f 70 65 6e 20 74 68 69 73 20 6f 6e 65 2e 20 20 open this one.
3790: 49 66 20 61 6e 6f 74 68 65 72 20 64 61 74 61 62 If another datab
37a0: 61 73 65 20 66 69 6c 65 20 69 73 0a 2a 2a 20 61 ase file is.** a
37b0: 6c 72 65 61 64 79 20 6f 70 65 6e 2c 20 74 68 65 lready open, the
37c0: 6e 20 61 74 74 61 63 68 20 7a 44 62 4e 61 6d 65 n attach zDbName
37d0: 20 75 73 69 6e 67 20 74 68 65 20 6e 61 6d 65 20 using the name
37e0: 7a 4c 61 62 65 6c 2e 0a 2a 2f 0a 76 6f 69 64 20 zLabel..*/.void
37f0: 64 62 5f 6f 70 65 6e 5f 6f 72 5f 61 74 74 61 63 db_open_or_attac
3800: 68 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 44 h(const char *zD
3810: 62 4e 61 6d 65 2c 20 63 6f 6e 73 74 20 63 68 61 bName, const cha
3820: 72 20 2a 7a 4c 61 62 65 6c 29 7b 0a 20 20 69 66 r *zLabel){. if
3830: 28 20 21 67 2e 64 62 20 29 7b 0a 20 20 20 20 69 ( !g.db ){. i
3840: 6e 74 20 72 63 20 3d 20 73 71 6c 69 74 65 33 5f nt rc = sqlite3_
3850: 6f 70 65 6e 28 7a 44 62 4e 61 6d 65 2c 20 26 67 open(zDbName, &g
3860: 2e 64 62 29 3b 0a 20 20 20 20 69 66 28 20 72 63 .db);. if( rc
3870: 21 3d 53 51 4c 49 54 45 5f 4f 4b 20 29 7b 0a 20 !=SQLITE_OK ){.
3880: 20 20 20 20 20 64 62 5f 65 72 72 28 73 71 6c 69 db_err(sqli
3890: 74 65 33 5f 65 72 72 6d 73 67 28 67 2e 64 62 29 te3_errmsg(g.db)
38a0: 29 3b 0a 20 20 20 20 7d 0a 20 20 20 20 64 62 5f );. }. db_
38b0: 63 6f 6e 6e 65 63 74 69 6f 6e 5f 69 6e 69 74 28 connection_init(
38c0: 29 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 );. }else{.
38d0: 64 62 5f 6d 75 6c 74 69 5f 65 78 65 63 28 22 41 db_multi_exec("A
38e0: 54 54 41 43 48 20 44 41 54 41 42 41 53 45 20 25 TTACH DATABASE %
38f0: 51 20 41 53 20 25 73 22 2c 20 7a 44 62 4e 61 6d Q AS %s", zDbNam
3900: 65 2c 20 7a 4c 61 62 65 6c 29 3b 0a 20 20 7d 0a e, zLabel);. }.
3910: 7d 0a 0a 2f 2a 0a 2a 2a 20 4f 70 65 6e 20 74 68 }../*.** Open th
3920: 65 20 75 73 65 72 20 64 61 74 61 62 61 73 65 20 e user database
3930: 69 6e 20 22 7e 2f 2e 66 6f 73 73 69 6c 22 2e 20 in "~/.fossil".
3940: 20 43 72 65 61 74 65 20 74 68 65 20 64 61 74 61 Create the data
3950: 62 61 73 65 20 61 6e 65 77 20 69 66 0a 2a 2a 20 base anew if.**
3960: 69 74 20 64 6f 65 73 20 6e 6f 74 20 61 6c 72 65 it does not alre
3970: 61 64 79 20 65 78 69 73 74 2e 0a 2a 2f 0a 76 6f ady exist..*/.vo
3980: 69 64 20 64 62 5f 6f 70 65 6e 5f 63 6f 6e 66 69 id db_open_confi
3990: 67 28 76 6f 69 64 29 7b 0a 20 20 63 68 61 72 20 g(void){. char
39a0: 2a 7a 44 62 4e 61 6d 65 3b 0a 20 20 63 6f 6e 73 *zDbName;. cons
39b0: 74 20 63 68 61 72 20 2a 7a 48 6f 6d 65 3b 0a 23 t char *zHome;.#
39c0: 69 66 64 65 66 20 5f 5f 4d 49 4e 47 57 33 32 5f ifdef __MINGW32_
39d0: 5f 0a 20 20 7a 48 6f 6d 65 20 3d 20 67 65 74 65 _. zHome = gete
39e0: 6e 76 28 22 4c 4f 43 41 4c 41 50 50 44 41 54 41 nv("LOCALAPPDATA
39f0: 22 29 3b 0a 20 20 69 66 28 20 7a 48 6f 6d 65 3d ");. if( zHome=
3a00: 3d 30 20 29 7b 0a 20 20 20 20 7a 48 6f 6d 65 20 =0 ){. zHome
3a10: 3d 20 67 65 74 65 6e 76 28 22 41 50 50 44 41 54 = getenv("APPDAT
3a20: 41 22 29 3b 0a 20 20 20 20 69 66 28 20 7a 48 6f A");. if( zHo
3a30: 6d 65 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 7a me==0 ){. z
3a40: 48 6f 6d 65 20 3d 20 67 65 74 65 6e 76 28 22 48 Home = getenv("H
3a50: 4f 4d 45 50 41 54 48 22 29 3b 0a 20 20 20 20 7d OMEPATH");. }
3a60: 0a 20 20 7d 0a 23 65 6c 73 65 0a 20 20 7a 48 6f . }.#else. zHo
3a70: 6d 65 20 3d 20 67 65 74 65 6e 76 28 22 48 4f 4d me = getenv("HOM
3a80: 45 22 29 3b 0a 23 65 6e 64 69 66 0a 20 20 69 66 E");.#endif. if
3a90: 28 20 7a 48 6f 6d 65 3d 3d 30 20 29 7b 0a 20 20 ( zHome==0 ){.
3aa0: 20 20 64 62 5f 65 72 72 28 22 63 61 6e 6e 6f 74 db_err("cannot
3ab0: 20 6c 6f 63 61 6c 20 68 6f 6d 65 20 64 69 72 65 local home dire
3ac0: 63 74 6f 72 79 22 29 3b 0a 20 20 7d 0a 23 69 66 ctory");. }.#if
3ad0: 64 65 66 20 5f 5f 4d 49 4e 47 57 33 32 5f 5f 0a def __MINGW32__.
3ae0: 20 20 2f 2a 20 2e 20 66 69 6c 65 6e 61 6d 65 73 /* . filenames
3af0: 20 67 69 76 65 20 73 6f 6d 65 20 77 69 6e 64 6f give some windo
3b00: 77 20 73 79 73 74 65 6d 73 20 70 72 6f 62 6c 65 w systems proble
3b10: 6d 73 20 61 6e 64 20 6d 61 6e 79 20 61 70 70 73 ms and many apps
3b20: 20 70 72 6f 62 6c 65 6d 73 20 2a 2f 0a 20 20 7a problems */. z
3b30: 44 62 4e 61 6d 65 20 3d 20 6d 70 72 69 6e 74 66 DbName = mprintf
3b40: 28 22 25 2f 2f 5f 66 6f 73 73 69 6c 22 2c 20 7a ("%//_fossil", z
3b50: 48 6f 6d 65 29 3b 0a 23 65 6c 73 65 0a 20 20 7a Home);.#else. z
3b60: 44 62 4e 61 6d 65 20 3d 20 6d 70 72 69 6e 74 66 DbName = mprintf
3b70: 28 22 25 73 2f 2e 66 6f 73 73 69 6c 22 2c 20 7a ("%s/.fossil", z
3b80: 48 6f 6d 65 29 3b 0a 23 65 6e 64 69 66 0a 20 20 Home);.#endif.
3b90: 69 66 28 20 67 2e 63 6f 6e 66 69 67 4f 70 65 6e if( g.configOpen
3ba0: 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 69 66 28 ) return;. if(
3bb0: 20 66 69 6c 65 5f 73 69 7a 65 28 7a 44 62 4e 61 file_size(zDbNa
3bc0: 6d 65 29 3c 31 30 32 34 2a 33 20 29 7b 0a 20 20 me)<1024*3 ){.
3bd0: 20 20 64 62 5f 69 6e 69 74 5f 64 61 74 61 62 61 db_init_databa
3be0: 73 65 28 7a 44 62 4e 61 6d 65 2c 20 7a 43 6f 6e se(zDbName, zCon
3bf0: 66 69 67 53 63 68 65 6d 61 2c 20 28 63 68 61 72 figSchema, (char
3c00: 2a 29 30 29 3b 0a 20 20 7d 0a 20 20 64 62 5f 6f *)0);. }. db_o
3c10: 70 65 6e 5f 6f 72 5f 61 74 74 61 63 68 28 7a 44 pen_or_attach(zD
3c20: 62 4e 61 6d 65 2c 20 22 63 6f 6e 66 69 67 64 62 bName, "configdb
3c30: 22 29 3b 0a 20 20 67 2e 63 6f 6e 66 69 67 4f 70 ");. g.configOp
3c40: 65 6e 20 3d 20 31 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a en = 1;.}../*.**
3c50: 20 49 66 20 7a 44 62 4e 61 6d 65 20 69 73 20 61 If zDbName is a
3c60: 20 76 61 6c 69 64 20 6c 6f 63 61 6c 20 64 61 74 valid local dat
3c70: 61 62 61 73 65 20 66 69 6c 65 2c 20 6f 70 65 6e abase file, open
3c80: 20 69 74 20 61 6e 64 20 72 65 74 75 72 6e 0a 2a it and return.*
3c90: 2a 20 74 72 75 65 2e 20 20 49 66 20 69 74 20 69 * true. If it i
3ca0: 73 20 6e 6f 74 20 61 20 76 61 6c 69 64 20 6c 6f s not a valid lo
3cb0: 63 61 6c 20 64 61 74 61 62 61 73 65 20 66 69 6c cal database fil
3cc0: 65 2c 20 72 65 74 75 72 6e 20 30 2e 0a 2a 2f 0a e, return 0..*/.
3cd0: 73 74 61 74 69 63 20 69 6e 74 20 69 73 56 61 6c static int isVal
3ce0: 69 64 4c 6f 63 61 6c 44 62 28 63 6f 6e 73 74 20 idLocalDb(const
3cf0: 63 68 61 72 20 2a 7a 44 62 4e 61 6d 65 29 7b 0a char *zDbName){.
3d00: 20 20 69 36 34 20 6c 73 69 7a 65 3b 0a 20 20 69 i64 lsize;. i
3d10: 66 28 20 61 63 63 65 73 73 28 7a 44 62 4e 61 6d f( access(zDbNam
3d20: 65 2c 20 46 5f 4f 4b 29 20 29 20 72 65 74 75 72 e, F_OK) ) retur
3d30: 6e 20 30 3b 0a 20 20 6c 73 69 7a 65 20 3d 20 66 n 0;. lsize = f
3d40: 69 6c 65 5f 73 69 7a 65 28 7a 44 62 4e 61 6d 65 ile_size(zDbName
3d50: 29 3b 0a 20 20 69 66 28 20 6c 73 69 7a 65 25 31 );. if( lsize%1
3d60: 30 32 34 21 3d 30 20 7c 7c 20 6c 73 69 7a 65 3c 024!=0 || lsize<
3d70: 34 30 39 36 20 29 20 72 65 74 75 72 6e 20 30 3b 4096 ) return 0;
3d80: 0a 20 20 64 62 5f 6f 70 65 6e 5f 6f 72 5f 61 74 . db_open_or_at
3d90: 74 61 63 68 28 7a 44 62 4e 61 6d 65 2c 20 22 6c tach(zDbName, "l
3da0: 6f 63 61 6c 64 62 22 29 3b 0a 20 20 67 2e 6c 6f ocaldb");. g.lo
3db0: 63 61 6c 4f 70 65 6e 20 3d 20 31 3b 0a 20 20 64 calOpen = 1;. d
3dc0: 62 5f 6f 70 65 6e 5f 63 6f 6e 66 69 67 28 29 3b b_open_config();
3dd0: 0a 20 20 64 62 5f 6f 70 65 6e 5f 72 65 70 6f 73 . db_open_repos
3de0: 69 74 6f 72 79 28 30 29 3b 0a 20 20 72 65 74 75 itory(0);. retu
3df0: 72 6e 20 31 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 4c rn 1;.}../*.** L
3e00: 6f 63 61 74 65 20 74 68 65 20 72 6f 6f 74 20 64 ocate the root d
3e10: 69 72 65 63 74 6f 72 79 20 6f 66 20 74 68 65 20 irectory of the
3e20: 6c 6f 63 61 6c 20 72 65 70 6f 73 69 74 6f 72 79 local repository
3e30: 20 74 72 65 65 2e 20 20 54 68 65 20 72 6f 6f 74 tree. The root
3e40: 0a 2a 2a 20 64 69 72 65 63 74 6f 72 79 20 69 73 .** directory is
3e50: 20 66 6f 75 6e 64 20 62 79 20 73 65 61 72 63 68 found by search
3e60: 69 6e 67 20 66 6f 72 20 61 20 66 69 6c 65 20 6e ing for a file n
3e70: 61 6d 65 64 20 22 46 4f 53 53 49 4c 22 20 74 68 amed "FOSSIL" th
3e80: 61 74 20 63 6f 6e 74 61 69 6e 73 0a 2a 2a 20 61 at contains.** a
3e90: 20 76 61 6c 69 64 20 72 65 70 6f 73 69 74 6f 72 valid repositor
3ea0: 79 20 64 61 74 61 62 61 73 65 2e 0a 2a 2a 0a 2a y database..**.*
3eb0: 2a 20 49 66 20 6e 6f 20 76 61 6c 69 64 20 46 4f * If no valid FO
3ec0: 53 53 49 4c 20 66 69 6c 65 20 69 73 20 66 6f 75 SSIL file is fou
3ed0: 6e 64 2c 20 77 65 20 6d 6f 76 65 20 75 70 20 6f nd, we move up o
3ee0: 6e 65 20 6c 65 76 65 6c 20 61 6e 64 20 74 72 79 ne level and try
3ef0: 20 61 67 61 69 6e 2e 0a 2a 2a 20 4f 6e 63 65 20 again..** Once
3f00: 74 68 65 20 66 69 6c 65 20 69 73 20 66 6f 75 6e the file is foun
3f10: 64 2c 20 74 68 65 20 67 2e 7a 4c 6f 63 61 6c 52 d, the g.zLocalR
3f20: 6f 6f 74 20 76 61 72 69 61 62 6c 65 20 69 73 20 oot variable is
3f30: 73 65 74 20 74 6f 20 74 68 65 20 72 6f 6f 74 20 set to the root
3f40: 6f 66 0a 2a 2a 20 74 68 65 20 72 65 70 6f 73 69 of.** the reposi
3f50: 74 6f 72 79 20 74 72 65 65 20 61 6e 64 20 74 68 tory tree and th
3f60: 69 73 20 72 6f 75 74 69 6e 65 20 72 65 74 75 72 is routine retur
3f70: 6e 73 20 31 2e 20 20 49 66 20 6e 6f 20 64 61 74 ns 1. If no dat
3f80: 61 62 61 73 65 20 69 73 0a 2a 2a 20 66 6f 75 6e abase is.** foun
3f90: 64 2c 20 74 68 65 6e 20 74 68 69 73 20 72 6f 75 d, then this rou
3fa0: 74 69 6e 65 20 72 65 74 75 72 6e 20 30 2e 0a 2a tine return 0..*
3fb0: 2a 0a 2a 2a 20 54 68 69 73 20 72 6f 75 74 69 6e *.** This routin
3fc0: 65 20 61 6c 77 61 79 73 20 6f 70 65 6e 73 20 74 e always opens t
3fd0: 68 65 20 75 73 65 72 20 64 61 74 61 62 61 73 65 he user database
3fe0: 20 72 65 67 61 72 64 6c 65 73 73 20 6f 66 20 77 regardless of w
3ff0: 68 65 74 68 65 72 20 6f 72 0a 2a 2a 20 6e 6f 74 hether or.** not
4000: 20 74 68 65 20 72 65 70 6f 73 69 74 6f 72 79 20 the repository
4010: 64 61 74 61 62 61 73 65 20 69 73 20 66 6f 75 6e database is foun
4020: 64 2e 20 20 49 66 20 74 68 65 20 46 4f 53 53 49 d. If the FOSSI
4030: 4c 20 66 69 6c 65 20 69 73 20 66 6f 75 6e 64 2c L file is found,
4040: 0a 2a 2a 20 69 74 20 69 73 20 61 74 74 61 63 68 .** it is attach
4050: 65 64 20 74 6f 20 74 68 65 20 6f 70 65 6e 20 64 ed to the open d
4060: 61 74 61 62 61 73 65 20 63 6f 6e 6e 65 63 74 69 atabase connecti
4070: 6f 6e 20 74 6f 6f 2e 0a 2a 2f 0a 69 6e 74 20 64 on too..*/.int d
4080: 62 5f 6f 70 65 6e 5f 6c 6f 63 61 6c 28 76 6f 69 b_open_local(voi
4090: 64 29 7b 0a 20 20 69 6e 74 20 6e 3b 0a 20 20 63 d){. int n;. c
40a0: 68 61 72 20 7a 50 77 64 5b 32 30 30 30 5d 3b 0a har zPwd[2000];.
40b0: 20 20 63 68 61 72 20 2a 7a 50 77 64 43 6f 6e 76 char *zPwdConv
40c0: 3b 0a 20 20 69 66 28 20 67 2e 6c 6f 63 61 6c 4f ;. if( g.localO
40d0: 70 65 6e 29 20 72 65 74 75 72 6e 20 31 3b 0a 20 pen) return 1;.
40e0: 20 69 66 28 20 67 65 74 63 77 64 28 7a 50 77 64 if( getcwd(zPwd
40f0: 2c 20 73 69 7a 65 6f 66 28 7a 50 77 64 29 2d 32 , sizeof(zPwd)-2
4100: 30 29 3d 3d 30 20 29 7b 0a 20 20 20 20 64 62 5f 0)==0 ){. db_
4110: 65 72 72 28 22 70 77 64 20 74 6f 6f 20 62 69 67 err("pwd too big
4120: 3a 20 6d 61 78 20 25 64 22 2c 20 73 69 7a 65 6f : max %d", sizeo
4130: 66 28 7a 50 77 64 29 2d 32 30 29 3b 0a 20 20 7d f(zPwd)-20);. }
4140: 0a 20 20 6e 20 3d 20 73 74 72 6c 65 6e 28 7a 50 . n = strlen(zP
4150: 77 64 29 3b 0a 20 20 7a 50 77 64 43 6f 6e 76 20 wd);. zPwdConv
4160: 3d 20 6d 70 72 69 6e 74 66 28 22 25 2f 22 2c 20 = mprintf("%/",
4170: 7a 50 77 64 29 3b 0a 20 20 73 74 72 6e 63 70 79 zPwd);. strncpy
4180: 28 7a 50 77 64 2c 20 7a 50 77 64 43 6f 6e 76 2c (zPwd, zPwdConv,
4190: 20 32 30 30 30 2d 32 30 29 3b 0a 20 20 66 72 65 2000-20);. fre
41a0: 65 28 7a 50 77 64 43 6f 6e 76 29 3b 0a 20 20 77 e(zPwdConv);. w
41b0: 68 69 6c 65 28 20 6e 3e 30 20 29 7b 0a 20 20 20 hile( n>0 ){.
41c0: 20 69 66 28 20 61 63 63 65 73 73 28 7a 50 77 64 if( access(zPwd
41d0: 2c 20 57 5f 4f 4b 29 20 29 20 62 72 65 61 6b 3b , W_OK) ) break;
41e0: 0a 20 20 20 20 73 74 72 63 70 79 28 26 7a 50 77 . strcpy(&zPw
41f0: 64 5b 6e 5d 2c 20 22 2f 5f 46 4f 53 53 49 4c 5f d[n], "/_FOSSIL_
4200: 22 29 3b 0a 20 20 20 20 69 66 28 20 69 73 56 61 ");. if( isVa
4210: 6c 69 64 4c 6f 63 61 6c 44 62 28 7a 50 77 64 29 lidLocalDb(zPwd)
4220: 20 29 7b 0a 20 20 20 20 20 20 2f 2a 20 46 6f 75 ){. /* Fou
4230: 6e 64 20 61 20 76 61 6c 69 64 20 5f 46 4f 53 53 nd a valid _FOSS
4240: 49 4c 5f 20 66 69 6c 65 20 2a 2f 0a 20 20 20 20 IL_ file */.
4250: 20 20 7a 50 77 64 5b 6e 5d 20 3d 20 30 3b 0a 20 zPwd[n] = 0;.
4260: 20 20 20 20 20 67 2e 7a 4c 6f 63 61 6c 52 6f 6f g.zLocalRoo
4270: 74 20 3d 20 6d 70 72 69 6e 74 66 28 22 25 73 2f t = mprintf("%s/
4280: 22 2c 20 7a 50 77 64 29 3b 0a 20 20 20 20 20 20 ", zPwd);.
4290: 72 65 74 75 72 6e 20 31 3b 0a 20 20 20 20 7d 0a return 1;. }.
42a0: 20 20 20 20 6e 2d 2d 3b 0a 20 20 20 20 77 68 69 n--;. whi
42b0: 6c 65 28 20 6e 3e 30 20 26 26 20 7a 50 77 64 5b le( n>0 && zPwd[
42c0: 6e 5d 21 3d 27 2f 27 20 29 7b 20 6e 2d 2d 3b 20 n]!='/' ){ n--;
42d0: 7d 0a 20 20 20 20 77 68 69 6c 65 28 20 6e 3e 30 }. while( n>0
42e0: 20 26 26 20 7a 50 77 64 5b 6e 2d 31 5d 3d 3d 27 && zPwd[n-1]=='
42f0: 2f 27 20 29 7b 20 6e 2d 2d 3b 20 7d 0a 20 20 20 /' ){ n--; }.
4300: 20 7a 50 77 64 5b 6e 5d 20 3d 20 30 3b 0a 20 20 zPwd[n] = 0;.
4310: 7d 0a 0a 20 20 2f 2a 20 41 20 5f 46 4f 53 53 49 }.. /* A _FOSSI
4320: 4c 5f 20 66 69 6c 65 20 63 6f 75 6c 64 20 6e 6f L_ file could no
4330: 74 20 62 65 20 66 6f 75 6e 64 20 2a 2f 0a 20 20 t be found */.
4340: 72 65 74 75 72 6e 20 30 3b 0a 7d 0a 0a 2f 2a 0a return 0;.}../*.
4350: 2a 2a 20 4f 70 65 6e 20 74 68 65 20 72 65 70 6f ** Open the repo
4360: 73 69 74 6f 72 79 20 64 61 74 61 62 61 73 65 20 sitory database
4370: 67 69 76 65 6e 20 62 79 20 7a 44 62 4e 61 6d 65 given by zDbName
4380: 2e 20 20 49 66 20 7a 44 62 4e 61 6d 65 3d 3d 4e . If zDbName==N
4390: 55 4c 4c 20 74 68 65 6e 0a 2a 2a 20 67 65 74 20 ULL then.** get
43a0: 74 68 65 20 6e 61 6d 65 20 66 72 6f 6d 20 74 68 the name from th
43b0: 65 20 61 6c 72 65 61 64 79 20 6f 70 65 6e 20 6c e already open l
43c0: 6f 63 61 6c 20 64 61 74 61 62 61 73 65 2e 0a 2a ocal database..*
43d0: 2f 0a 76 6f 69 64 20 64 62 5f 6f 70 65 6e 5f 72 /.void db_open_r
43e0: 65 70 6f 73 69 74 6f 72 79 28 63 6f 6e 73 74 20 epository(const
43f0: 63 68 61 72 20 2a 7a 44 62 4e 61 6d 65 29 7b 0a char *zDbName){.
4400: 20 20 69 66 28 20 67 2e 72 65 70 6f 73 69 74 6f if( g.reposito
4410: 72 79 4f 70 65 6e 20 29 20 72 65 74 75 72 6e 3b ryOpen ) return;
4420: 0a 20 20 69 66 28 20 7a 44 62 4e 61 6d 65 3d 3d . if( zDbName==
4430: 30 20 29 7b 0a 20 20 20 20 69 66 28 20 67 2e 6c 0 ){. if( g.l
4440: 6f 63 61 6c 4f 70 65 6e 20 29 7b 0a 20 20 20 20 ocalOpen ){.
4450: 20 20 7a 44 62 4e 61 6d 65 20 3d 20 64 62 5f 6c zDbName = db_l
4460: 67 65 74 28 22 72 65 70 6f 73 69 74 6f 72 79 22 get("repository"
4470: 2c 20 30 29 3b 0a 20 20 20 20 7d 0a 20 20 20 20 , 0);. }.
4480: 69 66 28 20 7a 44 62 4e 61 6d 65 3d 3d 30 20 29 if( zDbName==0 )
4490: 7b 0a 20 20 20 20 20 20 64 62 5f 65 72 72 28 22 {. db_err("
44a0: 75 6e 61 62 6c 65 20 74 6f 20 66 69 6e 64 20 74 unable to find t
44b0: 68 65 20 6e 61 6d 65 20 6f 66 20 61 20 72 65 70 he name of a rep
44c0: 6f 73 69 74 6f 72 79 20 64 61 74 61 62 61 73 65 ository database
44d0: 22 29 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20 ");. }. }.
44e0: 69 66 28 20 61 63 63 65 73 73 28 7a 44 62 4e 61 if( access(zDbNa
44f0: 6d 65 2c 20 52 5f 4f 4b 29 20 7c 7c 20 66 69 6c me, R_OK) || fil
4500: 65 5f 73 69 7a 65 28 7a 44 62 4e 61 6d 65 29 3c e_size(zDbName)<
4510: 31 30 32 34 20 29 7b 0a 20 20 20 20 69 66 28 20 1024 ){. if(
4520: 61 63 63 65 73 73 28 7a 44 62 4e 61 6d 65 2c 20 access(zDbName,
4530: 30 29 20 29 7b 0a 20 20 20 20 20 20 66 6f 73 73 0) ){. foss
4540: 69 6c 5f 70 61 6e 69 63 28 22 72 65 70 6f 73 69 il_panic("reposi
4550: 74 6f 72 79 20 64 6f 65 73 20 6e 6f 74 20 65 78 tory does not ex
4560: 69 73 74 73 20 6f 72 22 0a 20 20 20 20 20 20 20 ists or".
4570: 20 20 20 20 20 20 20 20 20 20 20 20 22 20 69 73 " is
4580: 20 69 6e 20 61 6e 20 75 6e 72 65 61 64 61 62 6c in an unreadabl
4590: 65 20 64 69 72 65 63 74 6f 72 79 3a 20 25 73 22 e directory: %s"
45a0: 2c 20 7a 44 62 4e 61 6d 65 29 3b 0a 20 20 20 20 , zDbName);.
45b0: 7d 65 6c 73 65 20 69 66 28 20 61 63 63 65 73 73 }else if( access
45c0: 28 7a 44 62 4e 61 6d 65 2c 20 52 5f 4f 4b 29 20 (zDbName, R_OK)
45d0: 29 7b 0a 20 20 20 20 20 20 66 6f 73 73 69 6c 5f ){. fossil_
45e0: 70 61 6e 69 63 28 22 72 65 61 64 20 70 65 72 6d panic("read perm
45f0: 69 73 73 69 6f 6e 20 64 65 6e 69 65 64 20 66 6f ission denied fo
4600: 72 20 72 65 70 6f 73 69 74 6f 72 79 20 25 73 22 r repository %s"
4610: 2c 20 7a 44 62 4e 61 6d 65 29 3b 0a 20 20 20 20 , zDbName);.
4620: 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 66 6f 73 }else{. fos
4630: 73 69 6c 5f 70 61 6e 69 63 28 22 6e 6f 74 20 61 sil_panic("not a
4640: 20 76 61 6c 69 64 20 72 65 70 6f 73 69 74 6f 72 valid repositor
4650: 79 3a 20 25 73 22 2c 20 7a 44 62 4e 61 6d 65 29 y: %s", zDbName)
4660: 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20 64 62 ;. }. }. db
4670: 5f 6f 70 65 6e 5f 6f 72 5f 61 74 74 61 63 68 28 _open_or_attach(
4680: 7a 44 62 4e 61 6d 65 2c 20 22 72 65 70 6f 73 69 zDbName, "reposi
4690: 74 6f 72 79 22 29 3b 0a 20 20 67 2e 72 65 70 6f tory");. g.repo
46a0: 73 69 74 6f 72 79 4f 70 65 6e 20 3d 20 31 3b 0a sitoryOpen = 1;.
46b0: 20 20 67 2e 7a 52 65 70 6f 73 69 74 6f 72 79 4e g.zRepositoryN
46c0: 61 6d 65 20 3d 20 6d 70 72 69 6e 74 66 28 22 25 ame = mprintf("%
46d0: 73 22 2c 20 7a 44 62 4e 61 6d 65 29 3b 0a 7d 0a s", zDbName);.}.
46e0: 0a 2f 2a 0a 2a 2a 20 54 72 79 20 74 6f 20 66 69 ./*.** Try to fi
46f0: 6e 64 20 74 68 65 20 72 65 70 6f 73 69 74 6f 72 nd the repositor
4700: 79 20 61 6e 64 20 6f 70 65 6e 20 69 74 2e 20 20 y and open it.
4710: 55 73 65 20 74 68 65 20 2d 52 20 6f 72 20 2d 2d Use the -R or --
4720: 72 65 70 6f 73 69 74 6f 72 79 0a 2a 2a 20 6f 70 repository.** op
4730: 74 69 6f 6e 20 74 6f 20 6c 6f 63 61 74 65 20 74 tion to locate t
4740: 68 65 20 72 65 70 6f 73 69 74 6f 72 79 2e 20 20 he repository.
4750: 49 66 20 6e 6f 20 73 75 63 68 20 6f 70 74 69 6f If no such optio
4760: 6e 20 69 73 20 61 76 61 69 6c 61 62 6c 65 2c 20 n is available,
4770: 74 68 65 6e 0a 2a 2a 20 75 73 65 20 74 68 65 20 then.** use the
4780: 72 65 70 6f 73 69 74 6f 72 79 20 6f 66 20 74 68 repository of th
4790: 65 20 6f 70 65 6e 20 63 68 65 63 6b 6f 75 74 20 e open checkout
47a0: 69 66 20 74 68 65 72 65 20 69 73 20 6f 6e 65 2e if there is one.
47b0: 0a 2a 2a 0a 2a 2a 20 45 72 72 6f 72 20 6f 75 74 .**.** Error out
47c0: 20 69 66 20 74 68 65 20 72 65 70 6f 73 69 74 6f if the reposito
47d0: 72 79 20 63 61 6e 6e 6f 74 20 62 65 20 6f 70 65 ry cannot be ope
47e0: 6e 65 64 2e 0a 2a 2f 0a 76 6f 69 64 20 64 62 5f ned..*/.void db_
47f0: 66 69 6e 64 5f 61 6e 64 5f 6f 70 65 6e 5f 72 65 find_and_open_re
4800: 70 6f 73 69 74 6f 72 79 28 69 6e 74 20 65 72 72 pository(int err
4810: 49 66 4e 6f 74 46 6f 75 6e 64 29 7b 0a 20 20 63 IfNotFound){. c
4820: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 52 65 70 20 onst char *zRep
4830: 3d 20 66 69 6e 64 5f 6f 70 74 69 6f 6e 28 22 72 = find_option("r
4840: 65 70 6f 73 69 74 6f 72 79 22 2c 20 22 52 22 2c epository", "R",
4850: 20 31 29 3b 0a 20 20 69 66 28 20 7a 52 65 70 3d 1);. if( zRep=
4860: 3d 30 20 29 7b 0a 20 20 20 20 69 66 28 20 64 62 =0 ){. if( db
4870: 5f 6f 70 65 6e 5f 6c 6f 63 61 6c 28 29 3d 3d 30 _open_local()==0
4880: 20 29 7b 0a 20 20 20 20 20 20 67 6f 74 6f 20 72 ){. goto r
4890: 65 70 5f 6e 6f 74 5f 66 6f 75 6e 64 3b 0a 20 20 ep_not_found;.
48a0: 20 20 7d 0a 20 20 20 20 7a 52 65 70 20 3d 20 64 }. zRep = d
48b0: 62 5f 6c 67 65 74 28 22 72 65 70 6f 73 69 74 6f b_lget("reposito
48c0: 72 79 22 2c 20 30 29 3b 0a 20 20 20 20 69 66 28 ry", 0);. if(
48d0: 20 7a 52 65 70 3d 3d 30 20 29 7b 0a 20 20 20 20 zRep==0 ){.
48e0: 20 20 67 6f 74 6f 20 72 65 70 5f 6e 6f 74 5f 66 goto rep_not_f
48f0: 6f 75 6e 64 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a ound;. }. }.
4900: 20 20 64 62 5f 6f 70 65 6e 5f 72 65 70 6f 73 69 db_open_reposi
4910: 74 6f 72 79 28 7a 52 65 70 29 3b 0a 20 20 69 66 tory(zRep);. if
4920: 28 20 67 2e 72 65 70 6f 73 69 74 6f 72 79 4f 70 ( g.repositoryOp
4930: 65 6e 20 29 7b 0a 20 20 20 20 72 65 74 75 72 6e en ){. return
4940: 3b 0a 20 20 7d 0a 72 65 70 5f 6e 6f 74 5f 66 6f ;. }.rep_not_fo
4950: 75 6e 64 3a 0a 20 20 69 66 28 20 65 72 72 49 66 und:. if( errIf
4960: 4e 6f 74 46 6f 75 6e 64 20 29 7b 0a 20 20 20 20 NotFound ){.
4970: 66 6f 73 73 69 6c 5f 66 61 74 61 6c 28 22 75 73 fossil_fatal("us
4980: 65 20 2d 2d 72 65 70 6f 73 69 74 6f 72 79 20 6f e --repository o
4990: 72 20 2d 52 20 74 6f 20 73 70 65 63 69 66 69 63 r -R to specific
49a0: 20 74 68 65 20 72 65 70 6f 73 69 74 6f 72 79 20 the repository
49b0: 64 61 74 61 62 61 73 65 22 29 3b 0a 20 20 7d 0a database");. }.
49c0: 7d 0a 0a 2f 2a 0a 2a 2a 20 4f 70 65 6e 20 74 68 }../*.** Open th
49d0: 65 20 6c 6f 63 61 6c 20 64 61 74 61 62 61 73 65 e local database
49e0: 2e 20 20 49 66 20 75 6e 61 62 6c 65 2c 20 65 78 . If unable, ex
49f0: 69 74 20 77 69 74 68 20 61 6e 20 65 72 72 6f 72 it with an error
4a00: 2e 0a 2a 2f 0a 76 6f 69 64 20 64 62 5f 6d 75 73 ..*/.void db_mus
4a10: 74 5f 62 65 5f 77 69 74 68 69 6e 5f 74 72 65 65 t_be_within_tree
4a20: 28 76 6f 69 64 29 7b 0a 20 20 69 66 28 20 64 62 (void){. if( db
4a30: 5f 6f 70 65 6e 5f 6c 6f 63 61 6c 28 29 3d 3d 30 _open_local()==0
4a40: 20 29 7b 0a 20 20 20 20 66 6f 73 73 69 6c 5f 66 ){. fossil_f
4a50: 61 74 61 6c 28 22 6e 6f 74 20 77 69 74 68 69 6e atal("not within
4a60: 20 61 6e 20 6f 70 65 6e 20 63 68 65 63 6b 6f 75 an open checkou
4a70: 74 22 29 3b 0a 20 20 7d 0a 20 20 64 62 5f 6f 70 t");. }. db_op
4a80: 65 6e 5f 72 65 70 6f 73 69 74 6f 72 79 28 30 29 en_repository(0)
4a90: 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 43 6c 6f 73 65 ;.}../*.** Close
4aa0: 20 74 68 65 20 64 61 74 61 62 61 73 65 20 63 6f the database co
4ab0: 6e 6e 65 63 74 69 6f 6e 2e 0a 2a 2f 0a 76 6f 69 nnection..*/.voi
4ac0: 64 20 64 62 5f 63 6c 6f 73 65 28 76 6f 69 64 29 d db_close(void)
4ad0: 7b 0a 20 20 69 66 28 20 67 2e 64 62 3d 3d 30 20 {. if( g.db==0
4ae0: 29 20 72 65 74 75 72 6e 3b 0a 20 20 77 68 69 6c ) return;. whil
4af0: 65 28 20 70 41 6c 6c 53 74 6d 74 20 29 7b 0a 20 e( pAllStmt ){.
4b00: 20 20 20 64 62 5f 66 69 6e 61 6c 69 7a 65 28 70 db_finalize(p
4b10: 41 6c 6c 53 74 6d 74 29 3b 0a 20 20 7d 0a 20 20 AllStmt);. }.
4b20: 67 2e 72 65 70 6f 73 69 74 6f 72 79 4f 70 65 6e g.repositoryOpen
4b30: 20 3d 20 30 3b 0a 20 20 67 2e 6c 6f 63 61 6c 4f = 0;. g.localO
4b40: 70 65 6e 20 3d 20 30 3b 0a 20 20 67 2e 63 6f 6e pen = 0;. g.con
4b50: 66 69 67 4f 70 65 6e 20 3d 20 30 3b 0a 20 20 73 figOpen = 0;. s
4b60: 71 6c 69 74 65 33 5f 63 6c 6f 73 65 28 67 2e 64 qlite3_close(g.d
4b70: 62 29 3b 0a 20 20 67 2e 64 62 20 3d 20 30 3b 0a b);. g.db = 0;.
4b80: 7d 0a 0a 0a 2f 2a 0a 2a 2a 20 43 72 65 61 74 65 }.../*.** Create
4b90: 20 61 20 6e 65 77 20 65 6d 70 74 79 20 72 65 70 a new empty rep
4ba0: 6f 73 69 74 6f 72 79 20 64 61 74 61 62 61 73 65 ository database
4bb0: 20 77 69 74 68 20 74 68 65 20 67 69 76 65 6e 20 with the given
4bc0: 6e 61 6d 65 2e 0a 2a 2a 0a 2a 2a 20 4f 6e 6c 79 name..**.** Only
4bd0: 20 74 68 65 20 73 63 68 65 6d 61 20 69 73 20 69 the schema is i
4be0: 6e 69 74 69 61 6c 69 7a 65 64 2e 20 20 54 68 65 nitialized. The
4bf0: 20 72 65 71 75 69 72 65 64 20 56 41 52 20 74 61 required VAR ta
4c00: 62 6c 65 73 20 65 6e 74 72 69 65 73 0a 2a 2a 20 bles entries.**
4c10: 61 72 65 20 6e 6f 74 20 73 65 74 20 62 79 20 74 are not set by t
4c20: 68 69 73 20 72 6f 75 74 69 6e 65 20 61 6e 64 20 his routine and
4c30: 6d 75 73 74 20 62 65 20 73 65 74 20 73 65 70 61 must be set sepa
4c40: 72 61 74 65 6c 79 20 69 6e 20 6f 72 64 65 72 0a rately in order.
4c50: 2a 2a 20 74 6f 20 6d 61 6b 65 20 74 68 65 20 6e ** to make the n
4c60: 65 77 20 66 69 6c 65 20 61 20 76 61 6c 69 64 20 ew file a valid
4c70: 64 61 74 61 62 61 73 65 2e 0a 2a 2f 0a 76 6f 69 database..*/.voi
4c80: 64 20 64 62 5f 63 72 65 61 74 65 5f 72 65 70 6f d db_create_repo
4c90: 73 69 74 6f 72 79 28 63 6f 6e 73 74 20 63 68 61 sitory(const cha
4ca0: 72 20 2a 7a 46 69 6c 65 6e 61 6d 65 29 7b 0a 20 r *zFilename){.
4cb0: 20 64 62 5f 69 6e 69 74 5f 64 61 74 61 62 61 73 db_init_databas
4cc0: 65 28 0a 20 20 20 20 20 7a 46 69 6c 65 6e 61 6d e(. zFilenam
4cd0: 65 2c 0a 20 20 20 20 20 7a 52 65 70 6f 73 69 74 e,. zReposit
4ce0: 6f 72 79 53 63 68 65 6d 61 31 2c 0a 20 20 20 20 orySchema1,.
4cf0: 20 7a 52 65 70 6f 73 69 74 6f 72 79 53 63 68 65 zRepositorySche
4d00: 6d 61 32 2c 0a 20 20 20 20 20 28 63 68 61 72 2a ma2,. (char*
4d10: 29 30 0a 20 20 29 3b 0a 20 20 69 73 4e 65 77 52 )0. );. isNewR
4d20: 65 70 6f 20 3d 20 31 3b 0a 7d 0a 0a 2f 2a 0a 2a epo = 1;.}../*.*
4d30: 2a 20 46 69 6c 6c 20 61 6e 20 65 6d 70 74 79 20 * Fill an empty
4d40: 72 65 70 6f 73 69 74 6f 72 79 20 64 61 74 61 62 repository datab
4d50: 61 73 65 20 77 69 74 68 20 74 68 65 20 62 61 73 ase with the bas
4d60: 69 63 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 66 ic information f
4d70: 6f 72 20 61 0a 2a 2a 20 72 65 70 6f 73 69 74 6f or a.** reposito
4d80: 72 79 2e 20 54 68 69 73 20 66 75 6e 63 74 69 6f ry. This functio
4d90: 6e 20 69 73 20 73 68 61 72 65 64 20 62 65 74 77 n is shared betw
4da0: 65 65 6e 20 27 63 72 65 61 74 65 5f 72 65 70 6f een 'create_repo
4db0: 73 69 74 6f 72 79 5f 63 6d 64 27 0a 2a 2a 20 28 sitory_cmd'.** (
4dc0: 27 6e 65 77 27 29 20 61 6e 64 20 27 72 65 63 6f 'new') and 'reco
4dd0: 6e 73 74 72 75 63 74 5f 63 6d 64 27 20 28 27 72 nstruct_cmd' ('r
4de0: 65 63 6f 6e 73 74 72 75 63 74 27 29 2c 20 62 6f econstruct'), bo
4df0: 74 68 20 6f 66 20 77 68 69 63 68 20 63 72 65 61 th of which crea
4e00: 74 65 0a 2a 2a 20 6e 65 77 20 72 65 70 6f 73 69 te.** new reposi
4e10: 74 6f 72 69 65 73 2e 0a 2a 2a 0a 2a 2a 20 54 68 tories..**.** Th
4e20: 65 20 6d 61 6b 65 49 6e 69 74 69 61 6c 56 65 72 e makeInitialVer
4e30: 73 69 6f 6e 20 66 6c 61 67 20 64 65 74 65 72 6d sion flag determ
4e40: 69 6e 65 73 20 77 68 65 74 68 65 72 20 6f 72 20 ines whether or
4e50: 6e 6f 74 20 61 6e 20 69 6e 69 74 69 61 6c 0a 2a not an initial.*
4e60: 2a 20 6d 61 6e 69 66 65 73 74 20 69 73 20 63 72 * manifest is cr
4e70: 65 61 74 65 64 2e 20 20 54 68 65 20 6d 61 6b 65 eated. The make
4e80: 53 65 72 76 65 72 43 6f 64 65 73 20 66 6c 61 67 ServerCodes flag
4e90: 20 64 65 74 65 72 6d 69 6e 65 73 20 77 68 65 74 determines whet
4ea0: 68 65 72 20 6f 72 0a 2a 2a 20 6e 6f 74 20 73 65 her or.** not se
4eb0: 72 76 65 72 20 61 6e 64 20 70 72 6f 6a 65 63 74 rver and project
4ec0: 20 63 6f 64 65 73 20 61 72 65 20 69 6e 76 65 6e codes are inven
4ed0: 74 65 64 20 66 6f 72 20 74 68 69 73 20 72 65 70 ted for this rep
4ee0: 6f 73 69 74 6f 72 79 2e 0a 2a 2f 0a 76 6f 69 64 ository..*/.void
4ef0: 20 64 62 5f 69 6e 69 74 69 61 6c 5f 73 65 74 75 db_initial_setu
4f00: 70 20 28 69 6e 74 20 6d 61 6b 65 49 6e 69 74 69 p (int makeIniti
4f10: 61 6c 56 65 72 73 69 6f 6e 2c 20 69 6e 74 20 6d alVersion, int m
4f20: 61 6b 65 53 65 72 76 65 72 43 6f 64 65 73 29 7b akeServerCodes){
4f30: 0a 20 20 63 68 61 72 20 2a 7a 44 61 74 65 3b 0a . char *zDate;.
4f40: 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 55 const char *zU
4f50: 73 65 72 3b 0a 20 20 42 6c 6f 62 20 68 61 73 68 ser;. Blob hash
4f60: 3b 0a 20 20 42 6c 6f 62 20 6d 61 6e 69 66 65 73 ;. Blob manifes
4f70: 74 3b 0a 0a 20 20 64 62 5f 73 65 74 28 22 63 6f t;.. db_set("co
4f80: 6e 74 65 6e 74 2d 73 63 68 65 6d 61 22 2c 20 43 ntent-schema", C
4f90: 4f 4e 54 45 4e 54 5f 53 43 48 45 4d 41 2c 20 30 ONTENT_SCHEMA, 0
4fa0: 29 3b 0a 20 20 64 62 5f 73 65 74 28 22 61 75 78 );. db_set("aux
4fb0: 2d 73 63 68 65 6d 61 22 2c 20 41 55 58 5f 53 43 -schema", AUX_SC
4fc0: 48 45 4d 41 2c 20 30 29 3b 0a 20 20 69 66 28 20 HEMA, 0);. if(
4fd0: 6d 61 6b 65 53 65 72 76 65 72 43 6f 64 65 73 20 makeServerCodes
4fe0: 29 7b 0a 20 20 20 20 64 62 5f 6d 75 6c 74 69 5f ){. db_multi_
4ff0: 65 78 65 63 28 0a 20 20 20 20 20 20 22 49 4e 53 exec(. "INS
5000: 45 52 54 20 49 4e 54 4f 20 63 6f 6e 66 69 67 28 ERT INTO config(
5010: 6e 61 6d 65 2c 76 61 6c 75 65 29 22 0a 20 20 20 name,value)".
5020: 20 20 20 22 20 56 41 4c 55 45 53 28 27 73 65 72 " VALUES('ser
5030: 76 65 72 2d 63 6f 64 65 27 2c 20 6c 6f 77 65 72 ver-code', lower
5040: 28 68 65 78 28 72 61 6e 64 6f 6d 62 6c 6f 62 28 (hex(randomblob(
5050: 32 30 29 29 29 29 3b 22 0a 20 20 20 20 20 20 22 20))));". "
5060: 49 4e 53 45 52 54 20 49 4e 54 4f 20 63 6f 6e 66 INSERT INTO conf
5070: 69 67 28 6e 61 6d 65 2c 76 61 6c 75 65 29 22 0a ig(name,value)".
5080: 20 20 20 20 20 20 22 20 56 41 4c 55 45 53 28 27 " VALUES('
5090: 70 72 6f 6a 65 63 74 2d 63 6f 64 65 27 2c 20 6c project-code', l
50a0: 6f 77 65 72 28 68 65 78 28 72 61 6e 64 6f 6d 62 ower(hex(randomb
50b0: 6c 6f 62 28 32 30 29 29 29 29 3b 22 0a 20 20 20 lob(20))));".
50c0: 20 29 3b 0a 20 20 7d 0a 20 20 69 66 28 20 21 64 );. }. if( !d
50d0: 62 5f 69 73 5f 67 6c 6f 62 61 6c 28 22 61 75 74 b_is_global("aut
50e0: 6f 73 79 6e 63 22 29 20 29 20 64 62 5f 73 65 74 osync") ) db_set
50f0: 5f 69 6e 74 28 22 61 75 74 6f 73 79 6e 63 22 2c _int("autosync",
5100: 20 31 2c 20 30 29 3b 0a 20 20 69 66 28 20 21 64 1, 0);. if( !d
5110: 62 5f 69 73 5f 67 6c 6f 62 61 6c 28 22 6c 6f 63 b_is_global("loc
5120: 61 6c 61 75 74 68 22 29 20 29 20 64 62 5f 73 65 alauth") ) db_se
5130: 74 5f 69 6e 74 28 22 6c 6f 63 61 6c 61 75 74 68 t_int("localauth
5140: 22 2c 20 30 2c 20 30 29 3b 0a 20 20 7a 55 73 65 ", 0, 0);. zUse
5150: 72 20 3d 20 64 62 5f 67 65 74 28 22 64 65 66 61 r = db_get("defa
5160: 75 6c 74 2d 75 73 65 72 22 2c 20 30 29 3b 0a 20 ult-user", 0);.
5170: 20 69 66 28 20 7a 55 73 65 72 3d 3d 30 20 29 7b if( zUser==0 ){
5180: 0a 23 69 66 64 65 66 20 5f 5f 4d 49 4e 47 57 33 .#ifdef __MINGW3
5190: 32 5f 5f 0a 20 20 20 20 7a 55 73 65 72 20 3d 20 2__. zUser =
51a0: 67 65 74 65 6e 76 28 22 55 53 45 52 4e 41 4d 45 getenv("USERNAME
51b0: 22 29 3b 0a 23 65 6c 73 65 0a 20 20 20 20 7a 55 ");.#else. zU
51c0: 73 65 72 20 3d 20 67 65 74 65 6e 76 28 22 55 53 ser = getenv("US
51d0: 45 52 22 29 3b 0a 23 65 6e 64 69 66 0a 20 20 7d ER");.#endif. }
51e0: 0a 20 20 69 66 28 20 7a 55 73 65 72 3d 3d 30 20 . if( zUser==0
51f0: 29 7b 0a 20 20 20 20 7a 55 73 65 72 20 3d 20 22 ){. zUser = "
5200: 72 6f 6f 74 22 3b 0a 20 20 7d 0a 20 20 64 62 5f root";. }. db_
5210: 6d 75 6c 74 69 5f 65 78 65 63 28 0a 20 20 20 20 multi_exec(.
5220: 20 22 49 4e 53 45 52 54 20 49 4e 54 4f 20 75 73 "INSERT INTO us
5230: 65 72 28 6c 6f 67 69 6e 2c 20 70 77 2c 20 63 61 er(login, pw, ca
5240: 70 2c 20 69 6e 66 6f 29 22 0a 20 20 20 20 20 22 p, info)". "
5250: 56 41 4c 55 45 53 28 25 51 2c 27 27 2c 27 73 27 VALUES(%Q,'','s'
5260: 2c 27 27 29 22 2c 20 7a 55 73 65 72 0a 20 20 29 ,'')", zUser. )
5270: 3b 0a 20 20 64 62 5f 6d 75 6c 74 69 5f 65 78 65 ;. db_multi_exe
5280: 63 28 0a 20 20 20 20 20 22 49 4e 53 45 52 54 20 c(. "INSERT
5290: 49 4e 54 4f 20 75 73 65 72 28 6c 6f 67 69 6e 2c INTO user(login,
52a0: 70 77 2c 63 61 70 2c 69 6e 66 6f 29 22 0a 20 20 pw,cap,info)".
52b0: 20 20 20 22 20 20 20 56 41 4c 55 45 53 28 27 61 " VALUES('a
52c0: 6e 6f 6e 79 6d 6f 75 73 27 2c 27 61 6e 6f 6e 79 nonymous','anony
52d0: 6d 6f 75 73 27 2c 27 68 6a 6b 6f 72 77 27 2c 27 mous','hjkorw','
52e0: 41 6e 6f 6e 27 29 3b 22 0a 20 20 20 20 20 22 49 Anon');". "I
52f0: 4e 53 45 52 54 20 49 4e 54 4f 20 75 73 65 72 28 NSERT INTO user(
5300: 6c 6f 67 69 6e 2c 70 77 2c 63 61 70 2c 69 6e 66 login,pw,cap,inf
5310: 6f 29 22 0a 20 20 20 20 20 22 20 20 20 56 41 4c o)". " VAL
5320: 55 45 53 28 27 6e 6f 62 6f 64 79 27 2c 27 27 2c UES('nobody','',
5330: 27 6a 6f 72 27 2c 27 4e 6f 62 6f 64 79 27 29 3b 'jor','Nobody');
5340: 22 0a 20 20 29 3b 0a 20 20 75 73 65 72 5f 73 65 ". );. user_se
5350: 6c 65 63 74 28 29 3b 0a 0a 20 20 69 66 20 28 6d lect();.. if (m
5360: 61 6b 65 49 6e 69 74 69 61 6c 56 65 72 73 69 6f akeInitialVersio
5370: 6e 29 7b 0a 20 20 20 20 62 6c 6f 62 5f 7a 65 72 n){. blob_zer
5380: 6f 28 26 6d 61 6e 69 66 65 73 74 29 3b 0a 20 20 o(&manifest);.
5390: 20 20 62 6c 6f 62 5f 61 70 70 65 6e 64 66 28 26 blob_appendf(&
53a0: 6d 61 6e 69 66 65 73 74 2c 20 22 43 20 69 6e 69 manifest, "C ini
53b0: 74 69 61 6c 5c 5c 73 65 6d 70 74 79 5c 5c 73 62 tial\\sempty\\sb
53c0: 61 73 65 6c 69 6e 65 5c 6e 22 29 3b 0a 20 20 20 aseline\n");.
53d0: 20 7a 44 61 74 65 20 3d 20 64 62 5f 74 65 78 74 zDate = db_text
53e0: 28 30 2c 20 22 53 45 4c 45 43 54 20 64 61 74 65 (0, "SELECT date
53f0: 74 69 6d 65 28 27 6e 6f 77 27 29 22 29 3b 0a 20 time('now')");.
5400: 20 20 20 7a 44 61 74 65 5b 31 30 5d 3d 27 54 27 zDate[10]='T'
5410: 3b 0a 20 20 20 20 62 6c 6f 62 5f 61 70 70 65 6e ;. blob_appen
5420: 64 66 28 26 6d 61 6e 69 66 65 73 74 2c 20 22 44 df(&manifest, "D
5430: 20 25 73 5c 6e 22 2c 20 7a 44 61 74 65 29 3b 0a %s\n", zDate);.
5440: 20 20 20 20 62 6c 6f 62 5f 61 70 70 65 6e 64 66 blob_appendf
5450: 28 26 6d 61 6e 69 66 65 73 74 2c 20 22 50 5c 6e (&manifest, "P\n
5460: 22 29 3b 0a 20 20 20 20 6d 64 35 73 75 6d 5f 69 ");. md5sum_i
5470: 6e 69 74 28 29 3b 0a 20 20 20 20 62 6c 6f 62 5f nit();. blob_
5480: 61 70 70 65 6e 64 66 28 26 6d 61 6e 69 66 65 73 appendf(&manifes
5490: 74 2c 20 22 52 20 25 73 5c 6e 22 2c 20 6d 64 35 t, "R %s\n", md5
54a0: 73 75 6d 5f 66 69 6e 69 73 68 28 30 29 29 3b 0a sum_finish(0));.
54b0: 20 20 20 20 62 6c 6f 62 5f 61 70 70 65 6e 64 66 blob_appendf
54c0: 28 26 6d 61 6e 69 66 65 73 74 2c 20 22 55 20 25 (&manifest, "U %
54d0: 46 5c 6e 22 2c 20 67 2e 7a 4c 6f 67 69 6e 29 3b F\n", g.zLogin);
54e0: 0a 20 20 20 20 6d 64 35 73 75 6d 5f 62 6c 6f 62 . md5sum_blob
54f0: 28 26 6d 61 6e 69 66 65 73 74 2c 20 26 68 61 73 (&manifest, &has
5500: 68 29 3b 0a 20 20 20 20 62 6c 6f 62 5f 61 70 70 h);. blob_app
5510: 65 6e 64 66 28 26 6d 61 6e 69 66 65 73 74 2c 20 endf(&manifest,
5520: 22 5a 20 25 62 5c 6e 22 2c 20 26 68 61 73 68 29 "Z %b\n", &hash)
5530: 3b 0a 20 20 20 20 62 6c 6f 62 5f 72 65 73 65 74 ;. blob_reset
5540: 28 26 68 61 73 68 29 3b 0a 20 20 20 20 63 6f 6e (&hash);. con
5550: 74 65 6e 74 5f 70 75 74 28 26 6d 61 6e 69 66 65 tent_put(&manife
5560: 73 74 2c 20 30 2c 20 30 29 3b 0a 20 20 7d 0a 7d st, 0, 0);. }.}
5570: 0a 0a 2f 2a 0a 2a 2a 20 43 4f 4d 4d 41 4e 44 3a ../*.** COMMAND:
5580: 20 6e 65 77 0a 2a 2a 0a 2a 2a 20 55 73 61 67 65 new.**.** Usage
5590: 3a 20 25 66 6f 73 73 69 6c 20 6e 65 77 20 46 49 : %fossil new FI
55a0: 4c 45 4e 41 4d 45 0a 2a 2a 0a 2a 2a 20 43 72 65 LENAME.**.** Cre
55b0: 61 74 65 20 61 20 72 65 70 6f 73 69 74 6f 72 79 ate a repository
55c0: 20 66 6f 72 20 61 20 6e 65 77 20 70 72 6f 6a 65 for a new proje
55d0: 63 74 20 69 6e 20 74 68 65 20 66 69 6c 65 20 6e ct in the file n
55e0: 61 6d 65 64 20 46 49 4c 45 4e 41 4d 45 2e 0a 2a amed FILENAME..*
55f0: 2a 20 54 68 69 73 20 63 6f 6d 6d 61 6e 64 20 69 * This command i
5600: 73 20 64 69 73 74 69 6e 63 74 20 66 72 6f 6d 20 s distinct from
5610: 22 63 6c 6f 6e 65 22 2e 20 20 54 68 65 20 22 63 "clone". The "c
5620: 6c 6f 6e 65 22 20 63 6f 6d 6d 61 6e 64 20 6d 61 lone" command ma
5630: 6b 65 73 0a 2a 2a 20 61 20 63 6f 70 79 20 6f 66 kes.** a copy of
5640: 20 61 6e 20 65 78 69 73 74 69 6e 67 20 70 72 6f an existing pro
5650: 6a 65 63 74 2e 20 20 54 68 69 73 20 63 6f 6d 6d ject. This comm
5660: 61 6e 64 20 73 74 61 72 74 73 20 61 20 6e 65 77 and starts a new
5670: 20 70 72 6f 6a 65 63 74 2e 0a 2a 2f 0a 76 6f 69 project..*/.voi
5680: 64 20 63 72 65 61 74 65 5f 72 65 70 6f 73 69 74 d create_reposit
5690: 6f 72 79 5f 63 6d 64 28 76 6f 69 64 29 7b 0a 20 ory_cmd(void){.
56a0: 20 69 66 28 20 67 2e 61 72 67 63 21 3d 33 20 29 if( g.argc!=3 )
56b0: 7b 0a 20 20 20 20 75 73 61 67 65 28 22 52 45 50 {. usage("REP
56c0: 4f 53 49 54 4f 52 59 2d 4e 41 4d 45 22 29 3b 0a OSITORY-NAME");.
56d0: 20 20 7d 0a 20 20 64 62 5f 63 72 65 61 74 65 5f }. db_create_
56e0: 72 65 70 6f 73 69 74 6f 72 79 28 67 2e 61 72 67 repository(g.arg
56f0: 76 5b 32 5d 29 3b 0a 20 20 64 62 5f 6f 70 65 6e v[2]);. db_open
5700: 5f 72 65 70 6f 73 69 74 6f 72 79 28 67 2e 61 72 _repository(g.ar
5710: 67 76 5b 32 5d 29 3b 0a 20 20 64 62 5f 6f 70 65 gv[2]);. db_ope
5720: 6e 5f 63 6f 6e 66 69 67 28 29 3b 0a 20 20 64 62 n_config();. db
5730: 5f 62 65 67 69 6e 5f 74 72 61 6e 73 61 63 74 69 _begin_transacti
5740: 6f 6e 28 29 3b 0a 20 20 64 62 5f 69 6e 69 74 69 on();. db_initi
5750: 61 6c 5f 73 65 74 75 70 28 31 2c 20 31 29 3b 0a al_setup(1, 1);.
5760: 20 20 64 62 5f 65 6e 64 5f 74 72 61 6e 73 61 63 db_end_transac
5770: 74 69 6f 6e 28 30 29 3b 0a 20 20 70 72 69 6e 74 tion(0);. print
5780: 66 28 22 70 72 6f 6a 65 63 74 2d 69 64 3a 20 25 f("project-id: %
5790: 73 5c 6e 22 2c 20 64 62 5f 67 65 74 28 22 70 72 s\n", db_get("pr
57a0: 6f 6a 65 63 74 2d 63 6f 64 65 22 2c 20 30 29 29 oject-code", 0))
57b0: 3b 0a 20 20 70 72 69 6e 74 66 28 22 73 65 72 76 ;. printf("serv
57c0: 65 72 2d 69 64 3a 20 20 25 73 5c 6e 22 2c 20 64 er-id: %s\n", d
57d0: 62 5f 67 65 74 28 22 73 65 72 76 65 72 2d 63 6f b_get("server-co
57e0: 64 65 22 2c 20 30 29 29 3b 0a 20 20 70 72 69 6e de", 0));. prin
57f0: 74 66 28 22 61 64 6d 69 6e 2d 75 73 65 72 3a 20 tf("admin-user:
5800: 25 73 20 28 6e 6f 20 70 61 73 73 77 6f 72 64 20 %s (no password
5810: 73 65 74 20 79 65 74 21 29 5c 6e 22 2c 20 67 2e set yet!)\n", g.
5820: 7a 4c 6f 67 69 6e 29 3b 0a 20 20 70 72 69 6e 74 zLogin);. print
5830: 66 28 22 62 61 73 65 6c 69 6e 65 3a 20 20 20 25 f("baseline: %
5840: 73 5c 6e 22 2c 20 64 62 5f 74 65 78 74 28 30 2c s\n", db_text(0,
5850: 20 22 53 45 4c 45 43 54 20 75 75 69 64 20 46 52 "SELECT uuid FR
5860: 4f 4d 20 62 6c 6f 62 22 29 29 3b 0a 7d 0a 0a 2f OM blob"));.}../
5870: 2a 0a 2a 2a 20 53 51 4c 20 66 75 6e 63 74 69 6f *.** SQL functio
5880: 6e 73 20 66 6f 72 20 64 65 62 75 67 67 69 6e 67 ns for debugging
5890: 2e 0a 2a 2a 0a 2a 2a 20 54 68 65 20 70 72 69 6e ..**.** The prin
58a0: 74 28 29 20 66 75 6e 63 74 69 6f 6e 20 77 72 69 t() function wri
58b0: 74 65 73 20 69 74 73 20 61 72 67 75 6d 65 6e 74 tes its argument
58c0: 73 20 6f 6e 20 73 74 64 6f 75 74 2c 20 62 75 74 s on stdout, but
58d0: 20 6f 6e 6c 79 0a 2a 2a 20 69 66 20 74 68 65 20 only.** if the
58e0: 2d 73 71 6c 70 72 69 6e 74 20 63 6f 6d 6d 61 6e -sqlprint comman
58f0: 64 2d 6c 69 6e 65 20 6f 70 74 69 6f 6e 20 69 73 d-line option is
5900: 20 74 75 72 6e 65 64 20 6f 6e 2e 0a 2a 2f 0a 73 turned on..*/.s
5910: 74 61 74 69 63 20 76 6f 69 64 20 64 62 5f 73 71 tatic void db_sq
5920: 6c 5f 70 72 69 6e 74 28 0a 20 20 73 71 6c 69 74 l_print(. sqlit
5930: 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 e3_context *cont
5940: 65 78 74 2c 0a 20 20 69 6e 74 20 61 72 67 63 2c ext,. int argc,
5950: 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 . sqlite3_value
5960: 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 69 6e 74 **argv.){. int
5970: 20 69 3b 0a 20 20 69 66 28 20 67 2e 66 53 71 6c i;. if( g.fSql
5980: 50 72 69 6e 74 20 29 7b 0a 20 20 20 20 66 6f 72 Print ){. for
5990: 28 69 3d 30 3b 20 69 3c 61 72 67 63 3b 20 69 2b (i=0; i<argc; i+
59a0: 2b 29 7b 0a 20 20 20 20 20 20 63 68 61 72 20 63 +){. char c
59b0: 20 3d 20 69 3d 3d 61 72 67 63 2d 31 20 3f 20 27 = i==argc-1 ? '
59c0: 5c 6e 27 20 3a 20 27 20 27 3b 0a 20 20 20 20 20 \n' : ' ';.
59d0: 20 70 72 69 6e 74 66 28 22 25 73 25 63 22 2c 20 printf("%s%c",
59e0: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 sqlite3_value_te
59f0: 78 74 28 61 72 67 76 5b 69 5d 29 2c 20 63 29 3b xt(argv[i]), c);
5a00: 0a 20 20 20 20 7d 0a 20 20 7d 0a 7d 0a 73 74 61 . }. }.}.sta
5a10: 74 69 63 20 76 6f 69 64 20 64 62 5f 73 71 6c 5f tic void db_sql_
5a20: 74 72 61 63 65 28 76 6f 69 64 20 2a 6e 6f 74 55 trace(void *notU
5a30: 73 65 64 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 sed, const char
5a40: 2a 7a 53 71 6c 29 7b 0a 20 20 70 72 69 6e 74 66 *zSql){. printf
5a50: 28 22 25 73 5c 6e 22 2c 20 7a 53 71 6c 29 3b 0a ("%s\n", zSql);.
5a60: 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 69 73 20 69 73 }../*.** This is
5a70: 20 75 73 65 64 20 62 79 20 74 68 65 20 5b 63 6f used by the [co
5a80: 6d 6d 69 74 5d 20 63 6f 6d 6d 61 6e 64 2e 0a 2a mmit] command..*
5a90: 2a 0a 2a 2a 20 52 65 74 75 72 6e 20 74 72 75 65 *.** Return true
5aa0: 20 69 66 20 65 69 74 68 65 72 3a 0a 2a 2a 0a 2a if either:.**.*
5ab0: 2a 20 20 20 20 20 61 29 20 47 6c 6f 62 61 6c 2e * a) Global.
5ac0: 61 43 6f 6d 6d 69 74 46 69 6c 65 20 69 73 20 4e aCommitFile is N
5ad0: 55 4c 4c 2c 20 6f 72 0a 2a 2a 20 20 20 20 20 62 ULL, or.** b
5ae0: 29 20 47 6c 6f 62 61 6c 2e 61 43 6f 6d 6d 69 74 ) Global.aCommit
5af0: 46 69 6c 65 20 63 6f 6e 74 61 69 6e 73 20 74 68 File contains th
5b00: 65 20 69 6e 74 65 67 65 72 20 70 61 73 73 65 64 e integer passed
5b10: 20 61 73 20 61 6e 20 61 72 67 75 6d 65 6e 74 2e as an argument.
5b20: 0a 2a 2a 0a 2a 2a 20 4f 74 68 65 72 77 69 73 65 .**.** Otherwise
5b30: 20 72 65 74 75 72 6e 20 66 61 6c 73 65 2e 0a 2a return false..*
5b40: 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 66 69 /.static void fi
5b50: 6c 65 5f 69 73 5f 73 65 6c 65 63 74 65 64 28 0a le_is_selected(.
5b60: 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 sqlite3_contex
5b70: 74 20 2a 63 6f 6e 74 65 78 74 2c 0a 20 20 69 6e t *context,. in
5b80: 74 20 61 72 67 63 2c 0a 20 20 73 71 6c 69 74 65 t argc,. sqlite
5b90: 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 0a 29 3_value **argv.)
5ba0: 7b 0a 20 20 61 73 73 65 72 74 28 61 72 67 63 3d {. assert(argc=
5bb0: 3d 31 29 3b 0a 20 20 69 66 28 20 67 2e 61 43 6f =1);. if( g.aCo
5bc0: 6d 6d 69 74 46 69 6c 65 20 29 7b 0a 20 20 20 20 mmitFile ){.
5bd0: 69 6e 74 20 69 49 64 20 3d 20 73 71 6c 69 74 65 int iId = sqlite
5be0: 33 5f 76 61 6c 75 65 5f 69 6e 74 28 61 72 67 76 3_value_int(argv
5bf0: 5b 30 5d 29 3b 0a 20 20 20 20 69 6e 74 20 69 69 [0]);. int ii
5c00: 3b 0a 20 20 20 20 66 6f 72 28 69 69 3d 30 3b 20 ;. for(ii=0;
5c10: 67 2e 61 43 6f 6d 6d 69 74 46 69 6c 65 5b 69 69 g.aCommitFile[ii
5c20: 5d 3b 20 69 69 2b 2b 29 7b 0a 20 20 20 20 20 20 ]; ii++){.
5c30: 69 66 28 20 69 49 64 3d 3d 67 2e 61 43 6f 6d 6d if( iId==g.aComm
5c40: 69 74 46 69 6c 65 5b 69 69 5d 20 29 7b 0a 20 20 itFile[ii] ){.
5c50: 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 sqlite3_re
5c60: 73 75 6c 74 5f 69 6e 74 28 63 6f 6e 74 65 78 74 sult_int(context
5c70: 2c 20 31 29 3b 0a 20 20 20 20 20 20 20 20 72 65 , 1);. re
5c80: 74 75 72 6e 3b 0a 20 20 20 20 20 20 7d 0a 20 20 turn;. }.
5c90: 20 20 7d 0a 20 20 20 20 73 71 6c 69 74 65 33 5f }. sqlite3_
5ca0: 72 65 73 75 6c 74 5f 69 6e 74 28 63 6f 6e 74 65 result_int(conte
5cb0: 78 74 2c 20 30 29 3b 0a 20 20 7d 65 6c 73 65 7b xt, 0);. }else{
5cc0: 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 . sqlite3_res
5cd0: 75 6c 74 5f 69 6e 74 28 63 6f 6e 74 65 78 74 2c ult_int(context,
5ce0: 20 31 29 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 1);. }.}../*.*
5cf0: 2a 20 43 6f 6e 76 65 72 74 20 74 68 65 20 69 6e * Convert the in
5d00: 70 75 74 20 73 74 72 69 6e 67 20 69 6e 74 6f 20 put string into
5d10: 61 6e 20 53 48 41 31 2e 20 20 4d 61 6b 65 20 61 an SHA1. Make a
5d20: 20 6e 6f 74 61 74 69 6f 6e 20 69 6e 20 74 68 65 notation in the
5d30: 0a 2a 2a 20 43 4f 4e 43 45 41 4c 45 44 20 74 61 .** CONCEALED ta
5d40: 62 6c 65 20 73 6f 20 74 68 61 74 20 74 68 65 20 ble so that the
5d50: 68 61 73 68 20 63 61 6e 20 62 65 20 75 6e 64 6f hash can be undo
5d60: 20 75 73 69 6e 67 20 74 68 65 20 64 62 5f 72 65 using the db_re
5d70: 76 65 61 6c 28 29 0a 2a 2a 20 66 75 6e 63 74 69 veal().** functi
5d80: 6f 6e 20 61 74 20 73 6f 6d 65 20 6c 61 74 65 72 on at some later
5d90: 20 74 69 6d 65 2e 0a 2a 2a 0a 2a 2a 20 54 68 65 time..**.** The
5da0: 20 76 61 6c 75 65 20 72 65 74 75 72 6e 65 64 20 value returned
5db0: 69 73 20 73 74 6f 72 65 64 20 69 6e 20 73 74 61 is stored in sta
5dc0: 74 69 63 20 73 70 61 63 65 20 61 6e 64 20 77 69 tic space and wi
5dd0: 6c 6c 20 62 65 20 6f 76 65 72 77 72 69 74 74 65 ll be overwritte
5de0: 6e 0a 2a 2a 20 6f 6e 20 73 75 62 73 65 71 75 65 n.** on subseque
5df0: 6e 74 20 63 61 6c 6c 73 2e 0a 2a 2f 0a 63 68 61 nt calls..*/.cha
5e00: 72 20 2a 64 62 5f 63 6f 6e 63 65 61 6c 28 63 6f r *db_conceal(co
5e10: 6e 73 74 20 63 68 61 72 20 2a 7a 43 6f 6e 74 65 nst char *zConte
5e20: 6e 74 2c 20 69 6e 74 20 6e 29 7b 0a 20 20 73 74 nt, int n){. st
5e30: 61 74 69 63 20 63 68 61 72 20 7a 48 61 73 68 5b atic char zHash[
5e40: 34 32 5d 3b 0a 20 20 42 6c 6f 62 20 6f 75 74 3b 42];. Blob out;
5e50: 0a 20 20 73 68 61 31 73 75 6d 5f 73 74 65 70 5f . sha1sum_step_
5e60: 74 65 78 74 28 7a 43 6f 6e 74 65 6e 74 2c 20 6e text(zContent, n
5e70: 29 3b 0a 20 20 73 68 61 31 73 75 6d 5f 66 69 6e );. sha1sum_fin
5e80: 69 73 68 28 26 6f 75 74 29 3b 0a 20 20 73 74 72 ish(&out);. str
5e90: 63 70 79 28 7a 48 61 73 68 2c 20 62 6c 6f 62 5f cpy(zHash, blob_
5ea0: 73 74 72 28 26 6f 75 74 29 29 3b 0a 20 20 62 6c str(&out));. bl
5eb0: 6f 62 5f 72 65 73 65 74 28 26 6f 75 74 29 3b 0a ob_reset(&out);.
5ec0: 20 20 64 62 5f 6d 75 6c 74 69 5f 65 78 65 63 28 db_multi_exec(
5ed0: 0a 20 20 20 20 20 22 49 4e 53 45 52 54 20 4f 52 . "INSERT OR
5ee0: 20 49 47 4e 4f 52 45 20 49 4e 54 4f 20 63 6f 6e IGNORE INTO con
5ef0: 63 65 61 6c 65 64 20 56 41 4c 55 45 53 28 25 51 cealed VALUES(%Q
5f00: 2c 25 23 51 29 22 2c 0a 20 20 20 20 20 7a 48 61 ,%#Q)",. zHa
5f10: 73 68 2c 20 6e 2c 20 7a 43 6f 6e 74 65 6e 74 0a sh, n, zContent.
5f20: 20 20 29 3b 0a 20 20 72 65 74 75 72 6e 20 7a 48 );. return zH
5f30: 61 73 68 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 41 74 ash;.}../*.** At
5f40: 74 65 6d 70 74 20 74 6f 20 6c 6f 6f 6b 20 75 70 tempt to look up
5f50: 20 74 68 65 20 69 6e 70 75 74 20 69 6e 20 74 68 the input in th
5f60: 65 20 43 4f 4e 43 45 41 4c 45 44 20 74 61 62 6c e CONCEALED tabl
5f70: 65 2e 20 20 49 66 20 66 6f 75 6e 64 2c 0a 2a 2a e. If found,.**
5f80: 20 61 6e 64 20 69 66 20 74 68 65 20 6f 6b 52 64 and if the okRd
5f90: 41 64 64 72 20 70 65 72 6d 69 73 73 69 6f 6e 20 Addr permission
5fa0: 69 73 20 65 6e 61 62 6c 65 64 20 74 68 65 6e 20 is enabled then
5fb0: 72 65 74 75 72 6e 20 74 68 65 0a 2a 2a 20 6f 72 return the.** or
5fc0: 69 67 69 6e 61 6c 20 76 61 6c 75 65 20 66 6f 72 iginal value for
5fd0: 20 77 68 69 63 68 20 74 68 65 20 69 6e 70 75 74 which the input
5fe0: 20 69 73 20 61 20 68 61 73 68 2e 20 20 49 66 20 is a hash. If
5ff0: 6f 6b 52 64 41 64 64 72 20 69 73 0a 2a 2a 20 66 okRdAddr is.** f
6000: 61 6c 73 65 20 6f 72 20 69 66 20 74 68 65 20 6c alse or if the l
6010: 6f 6f 6b 75 70 20 66 61 69 6c 73 2c 20 72 65 74 ookup fails, ret
6020: 75 72 6e 20 74 68 65 20 6f 72 69 67 69 6e 61 6c urn the original
6030: 20 69 6e 70 75 74 2e 0a 2a 2a 0a 2a 2a 20 49 6e input..**.** In
6040: 20 65 69 74 68 65 72 20 63 61 73 65 2c 20 74 68 either case, th
6050: 65 20 73 74 72 69 6e 67 20 72 65 74 75 72 6e 65 e string returne
6060: 64 20 69 73 20 73 74 6f 72 65 64 20 69 6e 20 73 d is stored in s
6070: 70 61 63 65 20 6f 62 74 61 69 6e 65 64 0a 2a 2a pace obtained.**
6080: 20 66 72 6f 6d 20 6d 61 6c 6c 6f 63 20 61 6e 64 from malloc and
6090: 20 73 68 6f 75 6c 64 20 62 65 20 66 72 65 65 64 should be freed
60a0: 20 62 79 20 74 68 65 20 63 61 6c 6c 69 6e 67 20 by the calling
60b0: 66 75 6e 63 74 69 6f 6e 2e 0a 2a 2f 0a 63 68 61 function..*/.cha
60c0: 72 20 2a 64 62 5f 72 65 76 65 61 6c 28 63 6f 6e r *db_reveal(con
60d0: 73 74 20 63 68 61 72 20 2a 7a 4b 65 79 29 7b 0a st char *zKey){.
60e0: 20 20 63 68 61 72 20 2a 7a 4f 75 74 3b 0a 20 20 char *zOut;.
60f0: 69 66 28 20 67 2e 6f 6b 52 64 41 64 64 72 20 29 if( g.okRdAddr )
6100: 7b 0a 20 20 20 20 7a 4f 75 74 20 3d 20 64 62 5f {. zOut = db_
6110: 74 65 78 74 28 30 2c 20 22 53 45 4c 45 43 54 20 text(0, "SELECT
6120: 63 6f 6e 74 65 6e 74 20 46 52 4f 4d 20 63 6f 6e content FROM con
6130: 63 65 61 6c 65 64 20 57 48 45 52 45 20 68 61 73 cealed WHERE has
6140: 68 3d 25 51 22 2c 20 7a 4b 65 79 29 3b 0a 20 20 h=%Q", zKey);.
6150: 7d 65 6c 73 65 7b 0a 20 20 20 20 7a 4f 75 74 20 }else{. zOut
6160: 3d 20 30 3b 0a 20 20 7d 0a 20 20 69 66 28 20 7a = 0;. }. if( z
6170: 4f 75 74 3d 3d 30 20 29 7b 0a 20 20 20 20 7a 4f Out==0 ){. zO
6180: 75 74 20 3d 20 6d 70 72 69 6e 74 66 28 22 25 73 ut = mprintf("%s
6190: 22 2c 20 7a 4b 65 79 29 3b 0a 20 20 7d 0a 20 20 ", zKey);. }.
61a0: 72 65 74 75 72 6e 20 7a 4f 75 74 3b 0a 7d 0a 0a return zOut;.}..
61b0: 2f 2a 0a 2a 2a 20 54 68 65 20 63 6f 6e 63 65 61 /*.** The concea
61c0: 6c 28 29 20 53 51 4c 20 66 75 6e 63 74 69 6f 6e l() SQL function
61d0: 2e 20 20 43 6f 6d 70 75 74 65 20 61 6e 20 53 48 . Compute an SH
61e0: 41 31 20 68 61 73 68 20 6f 66 20 74 68 65 20 61 A1 hash of the a
61f0: 72 67 75 6d 65 6e 74 0a 2a 2a 20 61 6e 64 20 72 rgument.** and r
6200: 65 74 75 72 6e 20 74 68 61 74 20 68 61 73 68 20 eturn that hash
6210: 61 73 20 61 20 34 30 2d 63 68 61 72 61 63 74 65 as a 40-characte
6220: 72 20 6c 6f 77 65 72 2d 63 61 73 65 20 68 65 78 r lower-case hex
6230: 20 6e 75 6d 62 65 72 2e 0a 2a 2f 0a 73 74 61 74 number..*/.stat
6240: 69 63 20 76 6f 69 64 20 73 68 61 31 5f 66 75 6e ic void sha1_fun
6250: 63 74 69 6f 6e 28 0a 20 20 73 71 6c 69 74 65 33 ction(. sqlite3
6260: 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 _context *contex
6270: 74 2c 0a 20 20 69 6e 74 20 61 72 67 63 2c 0a 20 t,. int argc,.
6280: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a sqlite3_value *
6290: 2a 61 72 67 76 0a 29 7b 0a 20 20 63 6f 6e 73 74 *argv.){. const
62a0: 20 63 68 61 72 20 2a 7a 49 6e 3b 0a 20 20 69 6e char *zIn;. in
62b0: 74 20 6e 49 6e 3b 0a 20 20 63 68 61 72 20 2a 7a t nIn;. char *z
62c0: 4f 75 74 3b 0a 20 20 61 73 73 65 72 74 28 61 72 Out;. assert(ar
62d0: 67 63 3d 3d 31 29 3b 0a 20 20 0a 20 20 7a 49 6e gc==1);. . zIn
62e0: 20 3d 20 28 63 6f 6e 73 74 20 63 68 61 72 2a 29 = (const char*)
62f0: 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 sqlite3_value_te
6300: 78 74 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 69 xt(argv[0]);. i
6310: 66 28 20 7a 49 6e 20 29 7b 0a 20 20 20 20 6e 49 f( zIn ){. nI
6320: 6e 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 n = sqlite3_valu
6330: 65 5f 62 79 74 65 73 28 61 72 67 76 5b 30 5d 29 e_bytes(argv[0])
6340: 3b 0a 20 20 20 20 7a 4f 75 74 20 3d 20 64 62 5f ;. zOut = db_
6350: 63 6f 6e 63 65 61 6c 28 7a 49 6e 2c 20 6e 49 6e conceal(zIn, nIn
6360: 29 3b 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72 );. sqlite3_r
6370: 65 73 75 6c 74 5f 74 65 78 74 28 63 6f 6e 74 65 esult_text(conte
6380: 78 74 2c 20 7a 4f 75 74 2c 20 2d 31 2c 20 53 51 xt, zOut, -1, SQ
6390: 4c 49 54 45 5f 54 52 41 4e 53 49 45 4e 54 29 3b LITE_TRANSIENT);
63a0: 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 . }.}../*.** Th
63b0: 65 20 72 65 76 65 61 6c 28 29 20 53 51 4c 20 66 e reveal() SQL f
63c0: 75 6e 63 74 69 6f 6e 20 69 6e 76 6f 6b 65 73 20 unction invokes
63d0: 74 68 65 20 64 62 5f 72 65 76 65 61 6c 28 29 20 the db_reveal()
63e0: 66 75 6e 63 74 69 6f 6e 2e 0a 2a 2f 0a 73 74 61 function..*/.sta
63f0: 74 69 63 20 76 6f 69 64 20 72 65 76 65 61 6c 5f tic void reveal_
6400: 66 75 6e 63 74 69 6f 6e 28 0a 20 20 73 71 6c 69 function(. sqli
6410: 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e te3_context *con
6420: 74 65 78 74 2c 0a 20 20 69 6e 74 20 61 72 67 63 text,. int argc
6430: 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 ,. sqlite3_valu
6440: 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 63 6f e **argv.){. co
6450: 6e 73 74 20 63 68 61 72 20 2a 7a 49 6e 3b 0a 20 nst char *zIn;.
6460: 20 63 68 61 72 20 2a 7a 4f 75 74 3b 0a 20 20 61 char *zOut;. a
6470: 73 73 65 72 74 28 61 72 67 63 3d 3d 31 29 3b 0a ssert(argc==1);.
6480: 20 20 0a 20 20 7a 49 6e 20 3d 20 28 63 6f 6e 73 . zIn = (cons
6490: 74 20 63 68 61 72 2a 29 73 71 6c 69 74 65 33 5f t char*)sqlite3_
64a0: 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b value_text(argv[
64b0: 30 5d 29 3b 0a 20 20 69 66 28 20 7a 49 6e 20 29 0]);. if( zIn )
64c0: 7b 0a 20 20 20 20 7a 4f 75 74 20 3d 20 64 62 5f {. zOut = db_
64d0: 72 65 76 65 61 6c 28 7a 49 6e 29 3b 0a 20 20 20 reveal(zIn);.
64e0: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f sqlite3_result_
64f0: 74 65 78 74 28 63 6f 6e 74 65 78 74 2c 20 7a 4f text(context, zO
6500: 75 74 2c 20 2d 31 2c 20 66 72 65 65 29 3b 0a 20 ut, -1, free);.
6510: 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 69 73 }.}../*.** This
6520: 20 66 75 6e 63 74 69 6f 6e 20 72 65 67 69 73 74 function regist
6530: 65 72 73 20 61 75 78 69 6c 69 61 72 79 20 66 75 ers auxiliary fu
6540: 6e 63 74 69 6f 6e 73 20 77 68 65 6e 20 74 68 65 nctions when the
6550: 20 53 51 4c 69 74 65 0a 2a 2a 20 64 61 74 61 62 SQLite.** datab
6560: 61 73 65 20 63 6f 6e 6e 65 63 74 69 6f 6e 20 69 ase connection i
6570: 73 20 66 69 72 73 74 20 65 73 74 61 62 6c 69 73 s first establis
6580: 68 65 64 2e 0a 2a 2f 0a 4c 4f 43 41 4c 20 76 6f hed..*/.LOCAL vo
6590: 69 64 20 64 62 5f 63 6f 6e 6e 65 63 74 69 6f 6e id db_connection
65a0: 5f 69 6e 69 74 28 76 6f 69 64 29 7b 0a 20 20 73 _init(void){. s
65b0: 74 61 74 69 63 20 69 6e 74 20 6f 6e 63 65 20 3d tatic int once =
65c0: 20 31 3b 0a 20 20 69 66 28 20 6f 6e 63 65 20 29 1;. if( once )
65d0: 7b 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 63 72 {. sqlite3_cr
65e0: 65 61 74 65 5f 66 75 6e 63 74 69 6f 6e 28 67 2e eate_function(g.
65f0: 64 62 2c 20 22 70 72 69 6e 74 22 2c 20 2d 31 2c db, "print", -1,
6600: 20 53 51 4c 49 54 45 5f 55 54 46 38 2c 20 30 2c SQLITE_UTF8, 0,
6610: 64 62 5f 73 71 6c 5f 70 72 69 6e 74 2c 30 2c 30 db_sql_print,0,0
6620: 29 3b 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 63 );. sqlite3_c
6630: 72 65 61 74 65 5f 66 75 6e 63 74 69 6f 6e 28 0a reate_function(.
6640: 20 20 20 20 20 20 67 2e 64 62 2c 20 22 66 69 6c g.db, "fil
6650: 65 5f 69 73 5f 73 65 6c 65 63 74 65 64 22 2c 20 e_is_selected",
6660: 31 2c 20 53 51 4c 49 54 45 5f 55 54 46 38 2c 20 1, SQLITE_UTF8,
6670: 30 2c 20 66 69 6c 65 5f 69 73 5f 73 65 6c 65 63 0, file_is_selec
6680: 74 65 64 2c 30 2c 30 0a 20 20 20 20 29 3b 0a 20 ted,0,0. );.
6690: 20 20 20 73 71 6c 69 74 65 33 5f 63 72 65 61 74 sqlite3_creat
66a0: 65 5f 66 75 6e 63 74 69 6f 6e 28 0a 20 20 20 20 e_function(.
66b0: 20 20 67 2e 64 62 2c 20 22 63 6f 6e 63 65 61 6c g.db, "conceal
66c0: 22 2c 20 31 2c 20 53 51 4c 49 54 45 5f 55 54 46 ", 1, SQLITE_UTF
66d0: 38 2c 20 30 2c 20 73 68 61 31 5f 66 75 6e 63 74 8, 0, sha1_funct
66e0: 69 6f 6e 2c 30 2c 30 0a 20 20 20 20 29 3b 0a 20 ion,0,0. );.
66f0: 20 20 20 73 71 6c 69 74 65 33 5f 63 72 65 61 74 sqlite3_creat
6700: 65 5f 66 75 6e 63 74 69 6f 6e 28 0a 20 20 20 20 e_function(.
6710: 20 20 67 2e 64 62 2c 20 22 72 65 76 65 61 6c 22 g.db, "reveal"
6720: 2c 20 31 2c 20 53 51 4c 49 54 45 5f 55 54 46 38 , 1, SQLITE_UTF8
6730: 2c 20 30 2c 20 72 65 76 65 61 6c 5f 66 75 6e 63 , 0, reveal_func
6740: 74 69 6f 6e 2c 30 2c 30 0a 20 20 20 20 29 3b 0a tion,0,0. );.
6750: 20 20 20 20 69 66 28 20 67 2e 66 53 71 6c 54 72 if( g.fSqlTr
6760: 61 63 65 20 29 7b 0a 20 20 20 20 20 20 73 71 6c ace ){. sql
6770: 69 74 65 33 5f 74 72 61 63 65 28 67 2e 64 62 2c ite3_trace(g.db,
6780: 20 64 62 5f 73 71 6c 5f 74 72 61 63 65 2c 20 30 db_sql_trace, 0
6790: 29 3b 0a 20 20 20 20 7d 0a 20 20 20 20 6f 6e 63 );. }. onc
67a0: 65 20 3d 20 30 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a e = 0;. }.}../*
67b0: 0a 2a 2a 20 52 65 74 75 72 6e 20 74 72 75 65 20 .** Return true
67c0: 69 66 20 74 68 65 20 73 74 72 69 6e 67 20 7a 56 if the string zV
67d0: 61 6c 20 72 65 70 72 65 73 65 6e 74 73 20 22 74 al represents "t
67e0: 72 75 65 22 20 28 6f 72 20 22 66 61 6c 73 65 22 rue" (or "false"
67f0: 29 2e 0a 2a 2f 0a 69 6e 74 20 69 73 5f 74 72 75 )..*/.int is_tru
6800: 74 68 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a th(const char *z
6810: 56 61 6c 29 7b 0a 20 20 73 74 61 74 69 63 20 63 Val){. static c
6820: 6f 6e 73 74 20 63 68 61 72 20 2a 61 7a 4f 6e 5b onst char *azOn[
6830: 5d 20 3d 20 7b 20 22 6f 6e 22 2c 20 22 79 65 73 ] = { "on", "yes
6840: 22 2c 20 22 74 72 75 65 22 2c 20 22 31 22 20 7d ", "true", "1" }
6850: 3b 0a 20 20 69 6e 74 20 69 3b 0a 20 20 66 6f 72 ;. int i;. for
6860: 28 69 3d 30 3b 20 69 3c 73 69 7a 65 6f 66 28 61 (i=0; i<sizeof(a
6870: 7a 4f 6e 29 2f 73 69 7a 65 6f 66 28 61 7a 4f 6e zOn)/sizeof(azOn
6880: 5b 30 5d 29 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 [0]); i++){.
6890: 69 66 28 20 73 74 72 63 6d 70 28 7a 56 61 6c 2c if( strcmp(zVal,
68a0: 61 7a 4f 6e 5b 69 5d 29 3d 3d 30 20 29 20 72 65 azOn[i])==0 ) re
68b0: 74 75 72 6e 20 31 3b 0a 20 20 7d 0a 20 20 72 65 turn 1;. }. re
68c0: 74 75 72 6e 20 30 3b 0a 7d 0a 69 6e 74 20 69 73 turn 0;.}.int is
68d0: 5f 66 61 6c 73 65 28 63 6f 6e 73 74 20 63 68 61 _false(const cha
68e0: 72 20 2a 7a 56 61 6c 29 7b 0a 20 20 73 74 61 74 r *zVal){. stat
68f0: 69 63 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 61 ic const char *a
6900: 7a 4f 66 66 5b 5d 20 3d 20 7b 20 22 6f 66 66 22 zOff[] = { "off"
6910: 2c 20 22 6e 6f 22 2c 20 22 66 61 6c 73 65 22 2c , "no", "false",
6920: 20 22 30 22 20 7d 3b 0a 20 20 69 6e 74 20 69 3b "0" };. int i;
6930: 0a 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c 73 69 . for(i=0; i<si
6940: 7a 65 6f 66 28 61 7a 4f 66 66 29 2f 73 69 7a 65 zeof(azOff)/size
6950: 6f 66 28 61 7a 4f 66 66 5b 30 5d 29 3b 20 69 2b of(azOff[0]); i+
6960: 2b 29 7b 0a 20 20 20 20 69 66 28 20 73 74 72 63 +){. if( strc
6970: 6d 70 28 7a 56 61 6c 2c 61 7a 4f 66 66 5b 69 5d mp(zVal,azOff[i]
6980: 29 3d 3d 30 20 29 20 72 65 74 75 72 6e 20 31 3b )==0 ) return 1;
6990: 0a 20 20 7d 0a 20 20 72 65 74 75 72 6e 20 30 3b . }. return 0;
69a0: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 47 65 74 20 61 6e .}../*.** Get an
69b0: 64 20 73 65 74 20 76 61 6c 75 65 73 20 66 72 6f d set values fro
69c0: 6d 20 74 68 65 20 43 4f 4e 46 49 47 2c 20 47 4c m the CONFIG, GL
69d0: 4f 42 41 4c 5f 43 4f 4e 46 49 47 20 61 6e 64 20 OBAL_CONFIG and
69e0: 56 56 41 52 20 74 61 62 6c 65 20 69 6e 20 74 68 VVAR table in th
69f0: 65 0a 2a 2a 20 72 65 70 6f 73 69 74 6f 72 79 20 e.** repository
6a00: 61 6e 64 20 6c 6f 63 61 6c 20 64 61 74 61 62 61 and local databa
6a10: 73 65 73 2e 0a 2a 2f 0a 63 68 61 72 20 2a 64 62 ses..*/.char *db
6a20: 5f 67 65 74 28 63 6f 6e 73 74 20 63 68 61 72 20 _get(const char
6a30: 2a 7a 4e 61 6d 65 2c 20 63 68 61 72 20 2a 7a 44 *zName, char *zD
6a40: 65 66 61 75 6c 74 29 7b 0a 20 20 63 68 61 72 20 efault){. char
6a50: 2a 7a 20 3d 20 30 3b 0a 20 20 69 66 28 20 67 2e *z = 0;. if( g.
6a60: 72 65 70 6f 73 69 74 6f 72 79 4f 70 65 6e 20 29 repositoryOpen )
6a70: 7b 0a 20 20 20 20 7a 20 3d 20 64 62 5f 74 65 78 {. z = db_tex
6a80: 74 28 30 2c 20 22 53 45 4c 45 43 54 20 76 61 6c t(0, "SELECT val
6a90: 75 65 20 46 52 4f 4d 20 63 6f 6e 66 69 67 20 57 ue FROM config W
6aa0: 48 45 52 45 20 6e 61 6d 65 3d 25 51 22 2c 20 7a HERE name=%Q", z
6ab0: 4e 61 6d 65 29 3b 0a 20 20 7d 0a 20 20 69 66 28 Name);. }. if(
6ac0: 20 7a 3d 3d 30 20 26 26 20 67 2e 63 6f 6e 66 69 z==0 && g.confi
6ad0: 67 4f 70 65 6e 20 29 7b 0a 20 20 20 20 7a 20 3d gOpen ){. z =
6ae0: 20 64 62 5f 74 65 78 74 28 30 2c 20 22 53 45 4c db_text(0, "SEL
6af0: 45 43 54 20 76 61 6c 75 65 20 46 52 4f 4d 20 67 ECT value FROM g
6b00: 6c 6f 62 61 6c 5f 63 6f 6e 66 69 67 20 57 48 45 lobal_config WHE
6b10: 52 45 20 6e 61 6d 65 3d 25 51 22 2c 20 7a 4e 61 RE name=%Q", zNa
6b20: 6d 65 29 3b 0a 20 20 7d 0a 20 20 69 66 28 20 7a me);. }. if( z
6b30: 3d 3d 30 20 29 7b 0a 20 20 20 20 7a 20 3d 20 7a ==0 ){. z = z
6b40: 44 65 66 61 75 6c 74 3b 0a 20 20 7d 0a 20 20 72 Default;. }. r
6b50: 65 74 75 72 6e 20 7a 3b 0a 7d 0a 76 6f 69 64 20 eturn z;.}.void
6b60: 64 62 5f 73 65 74 28 63 6f 6e 73 74 20 63 68 61 db_set(const cha
6b70: 72 20 2a 7a 4e 61 6d 65 2c 20 63 6f 6e 73 74 20 r *zName, const
6b80: 63 68 61 72 20 2a 7a 56 61 6c 75 65 2c 20 69 6e char *zValue, in
6b90: 74 20 67 6c 6f 62 61 6c 46 6c 61 67 29 7b 0a 20 t globalFlag){.
6ba0: 20 64 62 5f 62 65 67 69 6e 5f 74 72 61 6e 73 61 db_begin_transa
6bb0: 63 74 69 6f 6e 28 29 3b 0a 20 20 64 62 5f 6d 75 ction();. db_mu
6bc0: 6c 74 69 5f 65 78 65 63 28 22 52 45 50 4c 41 43 lti_exec("REPLAC
6bd0: 45 20 49 4e 54 4f 20 25 73 63 6f 6e 66 69 67 28 E INTO %sconfig(
6be0: 6e 61 6d 65 2c 76 61 6c 75 65 29 20 56 41 4c 55 name,value) VALU
6bf0: 45 53 28 25 51 2c 25 51 29 22 2c 0a 20 20 20 20 ES(%Q,%Q)",.
6c00: 20 20 20 20 20 20 20 20 20 20 20 20 20 67 6c 6f glo
6c10: 62 61 6c 46 6c 61 67 20 3f 20 22 67 6c 6f 62 61 balFlag ? "globa
6c20: 6c 5f 22 20 3a 20 22 22 2c 20 7a 4e 61 6d 65 2c l_" : "", zName,
6c30: 20 7a 56 61 6c 75 65 29 3b 0a 20 20 69 66 28 20 zValue);. if(
6c40: 67 6c 6f 62 61 6c 46 6c 61 67 20 26 26 20 67 2e globalFlag && g.
6c50: 72 65 70 6f 73 69 74 6f 72 79 4f 70 65 6e 20 29 repositoryOpen )
6c60: 7b 0a 20 20 20 20 64 62 5f 6d 75 6c 74 69 5f 65 {. db_multi_e
6c70: 78 65 63 28 22 44 45 4c 45 54 45 20 46 52 4f 4d xec("DELETE FROM
6c80: 20 63 6f 6e 66 69 67 20 57 48 45 52 45 20 6e 61 config WHERE na
6c90: 6d 65 3d 25 51 22 2c 20 7a 4e 61 6d 65 29 3b 0a me=%Q", zName);.
6ca0: 20 20 7d 0a 20 20 64 62 5f 65 6e 64 5f 74 72 61 }. db_end_tra
6cb0: 6e 73 61 63 74 69 6f 6e 28 30 29 3b 0a 7d 0a 76 nsaction(0);.}.v
6cc0: 6f 69 64 20 64 62 5f 75 6e 73 65 74 28 63 6f 6e oid db_unset(con
6cd0: 73 74 20 63 68 61 72 20 2a 7a 4e 61 6d 65 2c 20 st char *zName,
6ce0: 69 6e 74 20 67 6c 6f 62 61 6c 46 6c 61 67 29 7b int globalFlag){
6cf0: 0a 20 20 64 62 5f 62 65 67 69 6e 5f 74 72 61 6e . db_begin_tran
6d00: 73 61 63 74 69 6f 6e 28 29 3b 0a 20 20 64 62 5f saction();. db_
6d10: 6d 75 6c 74 69 5f 65 78 65 63 28 22 44 45 4c 45 multi_exec("DELE
6d20: 54 45 20 46 52 4f 4d 20 25 73 63 6f 6e 66 69 67 TE FROM %sconfig
6d30: 20 57 48 45 52 45 20 6e 61 6d 65 3d 25 51 22 2c WHERE name=%Q",
6d40: 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .
6d50: 20 20 67 6c 6f 62 61 6c 46 6c 61 67 20 3f 20 22 globalFlag ? "
6d60: 67 6c 6f 62 61 6c 5f 22 20 3a 20 22 22 2c 20 7a global_" : "", z
6d70: 4e 61 6d 65 29 3b 0a 20 20 69 66 28 20 67 6c 6f Name);. if( glo
6d80: 62 61 6c 46 6c 61 67 20 26 26 20 67 2e 72 65 70 balFlag && g.rep
6d90: 6f 73 69 74 6f 72 79 4f 70 65 6e 20 29 7b 0a 20 ositoryOpen ){.
6da0: 20 20 20 64 62 5f 6d 75 6c 74 69 5f 65 78 65 63 db_multi_exec
6db0: 28 22 44 45 4c 45 54 45 20 46 52 4f 4d 20 63 6f ("DELETE FROM co
6dc0: 6e 66 69 67 20 57 48 45 52 45 20 6e 61 6d 65 3d nfig WHERE name=
6dd0: 25 51 22 2c 20 7a 4e 61 6d 65 29 3b 0a 20 20 7d %Q", zName);. }
6de0: 0a 20 20 64 62 5f 65 6e 64 5f 74 72 61 6e 73 61 . db_end_transa
6df0: 63 74 69 6f 6e 28 30 29 3b 0a 7d 0a 69 6e 74 20 ction(0);.}.int
6e00: 64 62 5f 69 73 5f 67 6c 6f 62 61 6c 28 63 6f 6e db_is_global(con
6e10: 73 74 20 63 68 61 72 20 2a 7a 4e 61 6d 65 29 7b st char *zName){
6e20: 0a 20 20 69 66 28 20 67 2e 63 6f 6e 66 69 67 4f . if( g.configO
6e30: 70 65 6e 20 29 7b 0a 20 20 20 20 72 65 74 75 72 pen ){. retur
6e40: 6e 20 64 62 5f 65 78 69 73 74 73 28 22 53 45 4c n db_exists("SEL
6e50: 45 43 54 20 31 20 46 52 4f 4d 20 67 6c 6f 62 61 ECT 1 FROM globa
6e60: 6c 5f 63 6f 6e 66 69 67 20 57 48 45 52 45 20 6e l_config WHERE n
6e70: 61 6d 65 3d 25 51 22 2c 20 7a 4e 61 6d 65 29 3b ame=%Q", zName);
6e80: 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 72 65 . }else{. re
6e90: 74 75 72 6e 20 30 3b 0a 20 20 7d 0a 7d 0a 69 6e turn 0;. }.}.in
6ea0: 74 20 64 62 5f 67 65 74 5f 69 6e 74 28 63 6f 6e t db_get_int(con
6eb0: 73 74 20 63 68 61 72 20 2a 7a 4e 61 6d 65 2c 20 st char *zName,
6ec0: 69 6e 74 20 64 66 6c 74 29 7b 0a 20 20 69 6e 74 int dflt){. int
6ed0: 20 76 20 3d 20 64 66 6c 74 3b 0a 20 20 69 6e 74 v = dflt;. int
6ee0: 20 72 63 3b 0a 20 20 69 66 28 20 67 2e 72 65 70 rc;. if( g.rep
6ef0: 6f 73 69 74 6f 72 79 4f 70 65 6e 20 29 7b 0a 20 ositoryOpen ){.
6f00: 20 20 20 53 74 6d 74 20 71 3b 0a 20 20 20 20 64 Stmt q;. d
6f10: 62 5f 70 72 65 70 61 72 65 28 26 71 2c 20 22 53 b_prepare(&q, "S
6f20: 45 4c 45 43 54 20 76 61 6c 75 65 20 46 52 4f 4d ELECT value FROM
6f30: 20 63 6f 6e 66 69 67 20 57 48 45 52 45 20 6e 61 config WHERE na
6f40: 6d 65 3d 25 51 22 2c 20 7a 4e 61 6d 65 29 3b 0a me=%Q", zName);.
6f50: 20 20 20 20 72 63 20 3d 20 64 62 5f 73 74 65 70 rc = db_step
6f60: 28 26 71 29 3b 0a 20 20 20 20 69 66 28 20 72 63 (&q);. if( rc
6f70: 3d 3d 53 51 4c 49 54 45 5f 52 4f 57 20 29 7b 0a ==SQLITE_ROW ){.
6f80: 20 20 20 20 20 20 76 20 3d 20 64 62 5f 63 6f 6c v = db_col
6f90: 75 6d 6e 5f 69 6e 74 28 26 71 2c 20 30 29 3b 0a umn_int(&q, 0);.
6fa0: 20 20 20 20 7d 0a 20 20 20 20 64 62 5f 66 69 6e }. db_fin
6fb0: 61 6c 69 7a 65 28 26 71 29 3b 0a 20 20 7d 65 6c alize(&q);. }el
6fc0: 73 65 7b 0a 20 20 20 20 72 63 20 3d 20 53 51 4c se{. rc = SQL
6fd0: 49 54 45 5f 44 4f 4e 45 3b 0a 20 20 7d 0a 20 20 ITE_DONE;. }.
6fe0: 69 66 28 20 72 63 3d 3d 53 51 4c 49 54 45 5f 44 if( rc==SQLITE_D
6ff0: 4f 4e 45 20 26 26 20 67 2e 63 6f 6e 66 69 67 4f ONE && g.configO
7000: 70 65 6e 20 29 7b 0a 20 20 20 20 76 20 3d 20 64 pen ){. v = d
7010: 62 5f 69 6e 74 28 64 66 6c 74 2c 20 22 53 45 4c b_int(dflt, "SEL
7020: 45 43 54 20 76 61 6c 75 65 20 46 52 4f 4d 20 67 ECT value FROM g
7030: 6c 6f 62 61 6c 5f 63 6f 6e 66 69 67 20 57 48 45 lobal_config WHE
7040: 52 45 20 6e 61 6d 65 3d 25 51 22 2c 20 7a 4e 61 RE name=%Q", zNa
7050: 6d 65 29 3b 0a 20 20 7d 0a 20 20 72 65 74 75 72 me);. }. retur
7060: 6e 20 76 3b 0a 7d 0a 76 6f 69 64 20 64 62 5f 73 n v;.}.void db_s
7070: 65 74 5f 69 6e 74 28 63 6f 6e 73 74 20 63 68 61 et_int(const cha
7080: 72 20 2a 7a 4e 61 6d 65 2c 20 69 6e 74 20 76 61 r *zName, int va
7090: 6c 75 65 2c 20 69 6e 74 20 67 6c 6f 62 61 6c 46 lue, int globalF
70a0: 6c 61 67 29 7b 0a 20 20 64 62 5f 62 65 67 69 6e lag){. db_begin
70b0: 5f 74 72 61 6e 73 61 63 74 69 6f 6e 28 29 3b 0a _transaction();.
70c0: 20 20 64 62 5f 6d 75 6c 74 69 5f 65 78 65 63 28 db_multi_exec(
70d0: 22 52 45 50 4c 41 43 45 20 49 4e 54 4f 20 25 73 "REPLACE INTO %s
70e0: 63 6f 6e 66 69 67 28 6e 61 6d 65 2c 76 61 6c 75 config(name,valu
70f0: 65 29 20 56 41 4c 55 45 53 28 25 51 2c 25 64 29 e) VALUES(%Q,%d)
7100: 22 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ",.
7110: 20 20 20 67 6c 6f 62 61 6c 46 6c 61 67 20 3f 20 globalFlag ?
7120: 22 67 6c 6f 62 61 6c 5f 22 20 3a 20 22 22 2c 20 "global_" : "",
7130: 7a 4e 61 6d 65 2c 20 76 61 6c 75 65 29 3b 0a 20 zName, value);.
7140: 20 69 66 28 20 67 6c 6f 62 61 6c 46 6c 61 67 20 if( globalFlag
7150: 26 26 20 67 2e 72 65 70 6f 73 69 74 6f 72 79 4f && g.repositoryO
7160: 70 65 6e 20 29 7b 0a 20 20 20 20 64 62 5f 6d 75 pen ){. db_mu
7170: 6c 74 69 5f 65 78 65 63 28 22 44 45 4c 45 54 45 lti_exec("DELETE
7180: 20 46 52 4f 4d 20 63 6f 6e 66 69 67 20 57 48 45 FROM config WHE
7190: 52 45 20 6e 61 6d 65 3d 25 51 22 2c 20 7a 4e 61 RE name=%Q", zNa
71a0: 6d 65 29 3b 0a 20 20 7d 0a 20 20 64 62 5f 65 6e me);. }. db_en
71b0: 64 5f 74 72 61 6e 73 61 63 74 69 6f 6e 28 30 29 d_transaction(0)
71c0: 3b 0a 7d 0a 69 6e 74 20 64 62 5f 67 65 74 5f 62 ;.}.int db_get_b
71d0: 6f 6f 6c 65 61 6e 28 63 6f 6e 73 74 20 63 68 61 oolean(const cha
71e0: 72 20 2a 7a 4e 61 6d 65 2c 20 69 6e 74 20 64 66 r *zName, int df
71f0: 6c 74 29 7b 0a 20 20 63 68 61 72 20 2a 7a 56 61 lt){. char *zVa
7200: 6c 20 3d 20 64 62 5f 67 65 74 28 7a 4e 61 6d 65 l = db_get(zName
7210: 2c 20 64 66 6c 74 20 3f 20 22 6f 6e 22 20 3a 20 , dflt ? "on" :
7220: 22 6f 66 66 22 29 3b 0a 20 20 69 66 28 20 69 73 "off");. if( is
7230: 5f 74 72 75 74 68 28 7a 56 61 6c 29 20 29 20 72 _truth(zVal) ) r
7240: 65 74 75 72 6e 20 31 3b 0a 20 20 69 66 28 20 69 eturn 1;. if( i
7250: 73 5f 66 61 6c 73 65 28 7a 56 61 6c 29 20 29 20 s_false(zVal) )
7260: 72 65 74 75 72 6e 20 30 3b 0a 20 20 72 65 74 75 return 0;. retu
7270: 72 6e 20 64 66 6c 74 3b 0a 7d 0a 63 68 61 72 20 rn dflt;.}.char
7280: 2a 64 62 5f 6c 67 65 74 28 63 6f 6e 73 74 20 63 *db_lget(const c
7290: 68 61 72 20 2a 7a 4e 61 6d 65 2c 20 63 68 61 72 har *zName, char
72a0: 20 2a 7a 44 65 66 61 75 6c 74 29 7b 0a 20 20 72 *zDefault){. r
72b0: 65 74 75 72 6e 20 64 62 5f 74 65 78 74 28 28 63 eturn db_text((c
72c0: 68 61 72 2a 29 7a 44 65 66 61 75 6c 74 2c 0a 20 har*)zDefault,.
72d0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
72e0: 22 53 45 4c 45 43 54 20 76 61 6c 75 65 20 46 52 "SELECT value FR
72f0: 4f 4d 20 76 76 61 72 20 57 48 45 52 45 20 6e 61 OM vvar WHERE na
7300: 6d 65 3d 25 51 22 2c 20 7a 4e 61 6d 65 29 3b 0a me=%Q", zName);.
7310: 7d 0a 76 6f 69 64 20 64 62 5f 6c 73 65 74 28 63 }.void db_lset(c
7320: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 4e 61 6d 65 onst char *zName
7330: 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 56 , const char *zV
7340: 61 6c 75 65 29 7b 0a 20 20 64 62 5f 6d 75 6c 74 alue){. db_mult
7350: 69 5f 65 78 65 63 28 22 52 45 50 4c 41 43 45 20 i_exec("REPLACE
7360: 49 4e 54 4f 20 76 76 61 72 28 6e 61 6d 65 2c 76 INTO vvar(name,v
7370: 61 6c 75 65 29 20 56 41 4c 55 45 53 28 25 51 2c alue) VALUES(%Q,
7380: 25 51 29 22 2c 20 7a 4e 61 6d 65 2c 20 7a 56 61 %Q)", zName, zVa
7390: 6c 75 65 29 3b 0a 7d 0a 69 6e 74 20 64 62 5f 6c lue);.}.int db_l
73a0: 67 65 74 5f 69 6e 74 28 63 6f 6e 73 74 20 63 68 get_int(const ch
73b0: 61 72 20 2a 7a 4e 61 6d 65 2c 20 69 6e 74 20 64 ar *zName, int d
73c0: 66 6c 74 29 7b 0a 20 20 72 65 74 75 72 6e 20 64 flt){. return d
73d0: 62 5f 69 6e 74 28 64 66 6c 74 2c 20 22 53 45 4c b_int(dflt, "SEL
73e0: 45 43 54 20 76 61 6c 75 65 20 46 52 4f 4d 20 76 ECT value FROM v
73f0: 76 61 72 20 57 48 45 52 45 20 6e 61 6d 65 3d 25 var WHERE name=%
7400: 51 22 2c 20 7a 4e 61 6d 65 29 3b 0a 7d 0a 76 6f Q", zName);.}.vo
7410: 69 64 20 64 62 5f 6c 73 65 74 5f 69 6e 74 28 63 id db_lset_int(c
7420: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 4e 61 6d 65 onst char *zName
7430: 2c 20 69 6e 74 20 76 61 6c 75 65 29 7b 0a 20 20 , int value){.
7440: 64 62 5f 6d 75 6c 74 69 5f 65 78 65 63 28 22 52 db_multi_exec("R
7450: 45 50 4c 41 43 45 20 49 4e 54 4f 20 76 76 61 72 EPLACE INTO vvar
7460: 28 6e 61 6d 65 2c 76 61 6c 75 65 29 20 56 41 4c (name,value) VAL
7470: 55 45 53 28 25 51 2c 25 64 29 22 2c 20 7a 4e 61 UES(%Q,%d)", zNa
7480: 6d 65 2c 20 76 61 6c 75 65 29 3b 0a 7d 0a 0a 2f me, value);.}../
7490: 2a 0a 2a 2a 20 43 4f 4d 4d 41 4e 44 3a 20 6f 70 *.** COMMAND: op
74a0: 65 6e 0a 2a 2a 0a 2a 2a 20 55 73 61 67 65 3a 20 en.**.** Usage:
74b0: 6f 70 65 6e 20 46 49 4c 45 4e 41 4d 45 0a 2a 2a open FILENAME.**
74c0: 0a 2a 2a 20 4f 70 65 6e 20 61 20 63 6f 6e 6e 65 .** Open a conne
74d0: 63 74 69 6f 6e 20 74 6f 20 74 68 65 20 6c 6f 63 ction to the loc
74e0: 61 6c 20 72 65 70 6f 73 69 74 6f 72 79 20 69 6e al repository in
74f0: 20 46 49 4c 45 4e 41 4d 45 2e 20 20 41 20 63 68 FILENAME. A ch
7500: 65 63 6b 6f 75 74 0a 2a 2a 20 66 6f 72 20 74 68 eckout.** for th
7510: 65 20 72 65 70 6f 73 69 74 6f 72 79 20 69 73 20 e repository is
7520: 63 72 65 61 74 65 64 20 77 69 74 68 20 69 74 73 created with its
7530: 20 72 6f 6f 74 20 61 74 20 74 68 65 20 77 6f 72 root at the wor
7540: 6b 69 6e 67 20 64 69 72 65 63 74 6f 72 79 2e 0a king directory..
7550: 2a 2a 20 53 65 65 20 61 6c 73 6f 20 74 68 65 20 ** See also the
7560: 22 63 6c 6f 73 65 22 20 63 6f 6d 6d 61 6e 64 2e "close" command.
7570: 0a 2a 2f 0a 76 6f 69 64 20 63 6d 64 5f 6f 70 65 .*/.void cmd_ope
7580: 6e 28 76 6f 69 64 29 7b 0a 20 20 42 6c 6f 62 20 n(void){. Blob
7590: 70 61 74 68 3b 0a 20 20 69 6e 74 20 76 69 64 3b path;. int vid;
75a0: 0a 20 20 73 74 61 74 69 63 20 63 68 61 72 20 2a . static char *
75b0: 61 7a 4e 65 77 41 72 67 76 5b 5d 20 3d 20 7b 20 azNewArgv[] = {
75c0: 30 2c 20 22 75 70 64 61 74 65 22 2c 20 22 2d 2d 0, "update", "--
75d0: 6c 61 74 65 73 74 22 2c 20 30 20 7d 3b 0a 20 20 latest", 0 };.
75e0: 75 72 6c 5f 70 72 6f 78 79 5f 6f 70 74 69 6f 6e url_proxy_option
75f0: 73 28 29 3b 0a 20 20 69 66 28 20 67 2e 61 72 67 s();. if( g.arg
7600: 63 21 3d 33 20 29 7b 0a 20 20 20 20 75 73 61 67 c!=3 ){. usag
7610: 65 28 22 52 45 50 4f 53 49 54 4f 52 59 2d 46 49 e("REPOSITORY-FI
7620: 4c 45 4e 41 4d 45 22 29 3b 0a 20 20 7d 0a 20 20 LENAME");. }.
7630: 69 66 28 20 64 62 5f 6f 70 65 6e 5f 6c 6f 63 61 if( db_open_loca
7640: 6c 28 29 20 29 7b 0a 20 20 20 20 66 6f 73 73 69 l() ){. fossi
7650: 6c 5f 70 61 6e 69 63 28 22 61 6c 72 65 61 64 79 l_panic("already
7660: 20 77 69 74 68 69 6e 20 61 6e 20 6f 70 65 6e 20 within an open
7670: 74 72 65 65 20 72 6f 6f 74 65 64 20 61 74 20 25 tree rooted at %
7680: 73 22 2c 20 67 2e 7a 4c 6f 63 61 6c 52 6f 6f 74 s", g.zLocalRoot
7690: 29 3b 0a 20 20 7d 0a 20 20 66 69 6c 65 5f 63 61 );. }. file_ca
76a0: 6e 6f 6e 69 63 61 6c 5f 6e 61 6d 65 28 67 2e 61 nonical_name(g.a
76b0: 72 67 76 5b 32 5d 2c 20 26 70 61 74 68 29 3b 0a rgv[2], &path);.
76c0: 20 20 64 62 5f 6f 70 65 6e 5f 72 65 70 6f 73 69 db_open_reposi
76d0: 74 6f 72 79 28 62 6c 6f 62 5f 73 74 72 28 26 70 tory(blob_str(&p
76e0: 61 74 68 29 29 3b 0a 20 20 64 62 5f 69 6e 69 74 ath));. db_init
76f0: 5f 64 61 74 61 62 61 73 65 28 22 2e 2f 5f 46 4f _database("./_FO
7700: 53 53 49 4c 5f 22 2c 20 7a 4c 6f 63 61 6c 53 63 SSIL_", zLocalSc
7710: 68 65 6d 61 2c 20 28 63 68 61 72 2a 29 30 29 3b hema, (char*)0);
7720: 0a 20 20 64 62 5f 6f 70 65 6e 5f 6c 6f 63 61 6c . db_open_local
7730: 28 29 3b 0a 20 20 64 62 5f 6c 73 65 74 28 22 72 ();. db_lset("r
7740: 65 70 6f 73 69 74 6f 72 79 22 2c 20 62 6c 6f 62 epository", blob
7750: 5f 73 74 72 28 26 70 61 74 68 29 29 3b 0a 20 20 _str(&path));.
7760: 76 69 64 20 3d 20 64 62 5f 69 6e 74 28 30 2c 20 vid = db_int(0,
7770: 22 53 45 4c 45 43 54 20 70 69 64 20 46 52 4f 4d "SELECT pid FROM
7780: 20 70 6c 69 6e 6b 20 79 22 0a 20 20 20 20 20 20 plink y".
7790: 20 20 20 20 20 20 20 20 20 20 20 20 22 20 57 48 " WH
77a0: 45 52 45 20 4e 4f 54 20 45 58 49 53 54 53 28 53 ERE NOT EXISTS(S
77b0: 45 4c 45 43 54 20 31 20 46 52 4f 4d 20 70 6c 69 ELECT 1 FROM pli
77c0: 6e 6b 20 78 20 57 48 45 52 45 20 78 2e 63 69 64 nk x WHERE x.cid
77d0: 3d 79 2e 70 69 64 29 22 29 3b 0a 20 20 69 66 28 =y.pid)");. if(
77e0: 20 76 69 64 3d 3d 30 20 29 7b 0a 20 20 20 20 64 vid==0 ){. d
77f0: 62 5f 6c 73 65 74 5f 69 6e 74 28 22 63 68 65 63 b_lset_int("chec
7800: 6b 6f 75 74 22 2c 20 31 29 3b 0a 20 20 7d 65 6c kout", 1);. }el
7810: 73 65 7b 0a 20 20 20 20 64 62 5f 6c 73 65 74 5f se{. db_lset_
7820: 69 6e 74 28 22 63 68 65 63 6b 6f 75 74 22 2c 20 int("checkout",
7830: 76 69 64 29 3b 0a 20 20 20 20 67 2e 61 72 67 76 vid);. g.argv
7840: 20 3d 20 61 7a 4e 65 77 41 72 67 76 3b 0a 20 20 = azNewArgv;.
7850: 20 20 67 2e 61 72 67 63 20 3d 20 33 3b 0a 20 20 g.argc = 3;.
7860: 20 20 75 70 64 61 74 65 5f 63 6d 64 28 29 3b 0a update_cmd();.
7870: 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 50 72 69 }.}../*.** Pri
7880: 6e 74 20 74 68 65 20 76 61 6c 75 65 20 6f 66 20 nt the value of
7890: 61 20 73 65 74 74 69 6e 67 20 6e 61 6d 65 64 20 a setting named
78a0: 7a 4e 61 6d 65 0a 2a 2f 0a 73 74 61 74 69 63 20 zName.*/.static
78b0: 76 6f 69 64 20 70 72 69 6e 74 5f 73 65 74 74 69 void print_setti
78c0: 6e 67 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a ng(const char *z
78d0: 4e 61 6d 65 29 7b 0a 20 20 53 74 6d 74 20 71 3b Name){. Stmt q;
78e0: 0a 20 20 69 66 28 20 67 2e 72 65 70 6f 73 69 74 . if( g.reposit
78f0: 6f 72 79 4f 70 65 6e 20 29 7b 0a 20 20 20 20 64 oryOpen ){. d
7900: 62 5f 70 72 65 70 61 72 65 28 26 71 2c 0a 20 20 b_prepare(&q,.
7910: 20 20 20 20 20 22 53 45 4c 45 43 54 20 27 28 6c "SELECT '(l
7920: 6f 63 61 6c 29 27 2c 20 76 61 6c 75 65 20 46 52 ocal)', value FR
7930: 4f 4d 20 63 6f 6e 66 69 67 20 57 48 45 52 45 20 OM config WHERE
7940: 6e 61 6d 65 3d 25 51 22 0a 20 20 20 20 20 20 20 name=%Q".
7950: 22 20 55 4e 49 4f 4e 20 41 4c 4c 20 22 0a 20 20 " UNION ALL ".
7960: 20 20 20 20 20 22 53 45 4c 45 43 54 20 27 28 67 "SELECT '(g
7970: 6c 6f 62 61 6c 29 27 2c 20 76 61 6c 75 65 20 46 lobal)', value F
7980: 52 4f 4d 20 67 6c 6f 62 61 6c 5f 63 6f 6e 66 69 ROM global_confi
7990: 67 20 57 48 45 52 45 20 6e 61 6d 65 3d 25 51 22 g WHERE name=%Q"
79a0: 2c 0a 20 20 20 20 20 20 20 7a 4e 61 6d 65 2c 20 ,. zName,
79b0: 7a 4e 61 6d 65 0a 20 20 20 20 29 3b 0a 20 20 7d zName. );. }
79c0: 65 6c 73 65 7b 0a 20 20 20 20 64 62 5f 70 72 65 else{. db_pre
79d0: 70 61 72 65 28 26 71 2c 0a 20 20 20 20 20 20 22 pare(&q,. "
79e0: 53 45 4c 45 43 54 20 27 28 67 6c 6f 62 61 6c 29 SELECT '(global)
79f0: 27 2c 20 76 61 6c 75 65 20 46 52 4f 4d 20 67 6c ', value FROM gl
7a00: 6f 62 61 6c 5f 63 6f 6e 66 69 67 20 57 48 45 52 obal_config WHER
7a10: 45 20 6e 61 6d 65 3d 25 51 22 2c 0a 20 20 20 20 E name=%Q",.
7a20: 20 20 7a 4e 61 6d 65 0a 20 20 20 20 29 3b 0a 20 zName. );.
7a30: 20 7d 0a 20 20 69 66 28 20 64 62 5f 73 74 65 70 }. if( db_step
7a40: 28 26 71 29 3d 3d 53 51 4c 49 54 45 5f 52 4f 57 (&q)==SQLITE_ROW
7a50: 20 29 7b 0a 20 20 20 20 70 72 69 6e 74 66 28 22 ){. printf("
7a60: 25 2d 32 30 73 20 25 2d 38 73 20 25 73 5c 6e 22 %-20s %-8s %s\n"
7a70: 2c 20 7a 4e 61 6d 65 2c 20 64 62 5f 63 6f 6c 75 , zName, db_colu
7a80: 6d 6e 5f 74 65 78 74 28 26 71 2c 20 30 29 2c 0a mn_text(&q, 0),.
7a90: 20 20 20 20 20 20 20 20 64 62 5f 63 6f 6c 75 6d db_colum
7aa0: 6e 5f 74 65 78 74 28 26 71 2c 20 31 29 29 3b 0a n_text(&q, 1));.
7ab0: 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 70 72 69 }else{. pri
7ac0: 6e 74 66 28 22 25 2d 32 30 73 5c 6e 22 2c 20 7a ntf("%-20s\n", z
7ad0: 4e 61 6d 65 29 3b 0a 20 20 7d 0a 20 20 64 62 5f Name);. }. db_
7ae0: 66 69 6e 61 6c 69 7a 65 28 26 71 29 3b 0a 7d 0a finalize(&q);.}.
7af0: 0a 0a 2f 2a 0a 2a 2a 20 43 4f 4d 4d 41 4e 44 3a ../*.** COMMAND:
7b00: 20 73 65 74 74 69 6e 67 73 0a 2a 2a 20 43 4f 4d settings.** COM
7b10: 4d 41 4e 44 3a 20 75 6e 73 65 74 0a 2a 2a 20 25 MAND: unset.** %
7b20: 66 6f 73 73 69 6c 20 73 65 74 74 69 6e 67 20 3f fossil setting ?
7b30: 50 52 4f 50 45 52 54 59 3f 20 3f 56 41 4c 55 45 PROPERTY? ?VALUE
7b40: 3f 20 3f 2d 67 6c 6f 62 61 6c 3f 0a 2a 2a 20 25 ? ?-global?.** %
7b50: 66 6f 73 73 69 6c 20 75 6e 73 65 74 20 50 52 4f fossil unset PRO
7b60: 50 45 52 54 59 20 3f 2d 67 6c 6f 62 61 6c 3f 0a PERTY ?-global?.
7b70: 2a 2a 0a 2a 2a 20 54 68 65 20 22 73 65 74 74 69 **.** The "setti
7b80: 6e 67 22 20 63 6f 6d 6d 61 6e 64 20 77 69 74 68 ng" command with
7b90: 20 6e 6f 20 61 72 67 75 6d 65 6e 74 73 20 6c 69 no arguments li
7ba0: 73 74 73 20 61 6c 6c 20 70 72 6f 70 65 72 74 69 sts all properti
7bb0: 65 73 20 61 6e 64 20 74 68 65 69 72 0a 2a 2a 20 es and their.**
7bc0: 76 61 6c 75 65 73 2e 20 20 57 69 74 68 20 6a 75 values. With ju
7bd0: 73 74 20 61 20 70 72 6f 70 65 72 74 79 20 6e 61 st a property na
7be0: 6d 65 20 69 74 20 73 68 6f 77 73 20 74 68 65 20 me it shows the
7bf0: 76 61 6c 75 65 20 6f 66 20 74 68 61 74 20 70 72 value of that pr
7c00: 6f 70 65 72 74 79 2e 0a 2a 2a 20 57 69 74 68 20 operty..** With
7c10: 61 20 76 61 6c 75 65 20 61 72 67 75 6d 65 6e 74 a value argument
7c20: 20 69 74 20 63 68 61 6e 67 65 73 20 74 68 65 20 it changes the
7c30: 70 72 6f 70 65 72 74 79 20 66 6f 72 20 74 68 65 property for the
7c40: 20 63 75 72 72 65 6e 74 20 72 65 70 6f 73 69 74 current reposit
7c50: 6f 72 79 2e 0a 2a 2a 0a 2a 2a 20 54 68 65 20 22 ory..**.** The "
7c60: 75 6e 73 65 74 22 20 63 6f 6d 6d 61 6e 64 20 63 unset" command c
7c70: 6c 65 61 72 73 20 61 20 70 72 6f 70 65 72 74 79 lears a property
7c80: 20 73 65 74 74 69 6e 67 2e 0a 2a 2a 0a 2a 2a 20 setting..**.**
7c90: 20 20 20 61 75 74 6f 73 79 6e 63 20 20 20 20 20 autosync
7ca0: 20 20 20 20 49 66 20 65 6e 61 62 6c 65 64 2c 20 If enabled,
7cb0: 61 75 74 6f 6d 61 74 69 63 61 6c 6c 79 20 70 75 automatically pu
7cc0: 6c 6c 20 70 72 69 6f 72 20 74 6f 0a 2a 2a 20 20 ll prior to.**
7cd0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
7ce0: 20 20 20 63 6f 6d 6d 69 74 20 6f 72 20 75 70 64 commit or upd
7cf0: 61 74 65 20 61 6e 64 20 61 75 74 6f 6d 61 74 69 ate and automati
7d00: 63 61 6c 6c 79 20 70 75 73 68 0a 2a 2a 20 20 20 cally push.**
7d10: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
7d20: 20 20 61 66 74 65 72 20 63 6f 6d 6d 69 74 20 6f after commit o
7d30: 72 20 74 61 67 20 6f 72 20 62 72 61 6e 63 68 20 r tag or branch
7d40: 63 72 65 61 74 69 6f 6e 2e 0a 2a 2a 0a 2a 2a 20 creation..**.**
7d50: 20 20 20 64 69 66 66 2d 63 6f 6d 6d 61 6e 64 20 diff-command
7d60: 20 20 20 20 45 78 74 65 72 6e 61 6c 20 63 6f 6d External com
7d70: 6d 61 6e 64 20 74 6f 20 72 75 6e 20 77 68 65 6e mand to run when
7d80: 20 70 65 72 66 6f 72 6d 69 6e 67 20 61 20 64 69 performing a di
7d90: 66 66 2e 0a 2a 2a 20 20 20 20 20 20 20 20 20 20 ff..**
7da0: 20 20 20 20 20 20 20 20 20 20 20 49 66 20 75 6e If un
7db0: 64 65 66 69 6e 65 64 2c 20 74 68 65 20 69 6e 74 defined, the int
7dc0: 65 72 6e 61 6c 20 74 65 78 74 20 64 69 66 66 20 ernal text diff
7dd0: 77 69 6c 6c 20 62 65 20 75 73 65 64 2e 0a 2a 2a will be used..**
7de0: 0a 2a 2a 20 20 20 20 65 64 69 74 6f 72 20 20 20 .** editor
7df0: 20 20 20 20 20 20 20 20 54 65 78 74 20 65 64 69 Text edi
7e00: 74 6f 72 20 63 6f 6d 6d 61 6e 64 20 75 73 65 64 tor command used
7e10: 20 66 6f 72 20 63 68 65 63 6b 2d 69 6e 20 63 6f for check-in co
7e20: 6d 6d 65 6e 74 73 2e 0a 2a 2a 0a 2a 2a 20 20 20 mments..**.**
7e30: 20 67 64 69 66 66 2d 63 6f 6d 6d 61 6e 64 20 20 gdiff-command
7e40: 20 20 45 78 74 65 72 6e 61 6c 20 63 6f 6d 6d 61 External comma
7e50: 6e 64 20 74 6f 20 72 75 6e 20 77 68 65 6e 20 70 nd to run when p
7e60: 65 72 66 6f 72 6d 69 6e 67 20 61 20 67 72 61 70 erforming a grap
7e70: 68 69 63 61 6c 0a 2a 2a 20 20 20 20 20 20 20 20 hical.**
7e80: 20 20 20 20 20 20 20 20 20 20 20 20 20 64 69 66 dif
7e90: 66 2e 20 49 66 20 75 6e 64 65 66 69 6e 65 64 2c f. If undefined,
7ea0: 20 74 65 78 74 20 64 69 66 66 20 77 69 6c 6c 20 text diff will
7eb0: 62 65 20 75 73 65 64 2e 0a 2a 2a 0a 2a 2a 20 20 be used..**.**
7ec0: 20 20 6c 6f 63 61 6c 61 75 74 68 20 20 20 20 20 localauth
7ed0: 20 20 20 49 66 20 65 6e 61 62 6c 65 64 2c 20 72 If enabled, r
7ee0: 65 71 75 69 72 65 20 74 68 61 74 20 48 54 54 50 equire that HTTP
7ef0: 20 63 6f 6e 6e 65 63 74 69 6f 6e 73 20 66 72 6f connections fro
7f00: 6d 0a 2a 2a 20 20 20 20 20 20 20 20 20 20 20 20 m.**
7f10: 20 20 20 20 20 20 20 20 20 31 32 37 2e 30 2e 30 127.0.0
7f20: 2e 31 20 62 65 20 61 75 74 68 65 6e 74 69 63 61 .1 be authentica
7f30: 74 65 64 20 62 79 20 70 61 73 73 77 6f 72 64 2e ted by password.
7f40: 20 20 49 66 0a 2a 2a 20 20 20 20 20 20 20 20 20 If.**
7f50: 20 20 20 20 20 20 20 20 20 20 20 20 66 61 6c 73 fals
7f60: 65 2c 20 61 6c 6c 20 48 54 54 50 20 72 65 71 75 e, all HTTP requ
7f70: 65 73 74 73 20 66 72 6f 6d 20 6c 6f 63 61 6c 68 ests from localh
7f80: 6f 73 74 20 68 61 76 65 0a 2a 2a 20 20 20 20 20 ost have.**
7f90: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
7fa0: 75 6e 72 65 73 74 72 69 63 74 65 64 20 61 63 63 unrestricted acc
7fb0: 65 73 73 20 74 6f 20 74 68 65 20 72 65 70 6f 73 ess to the repos
7fc0: 69 74 6f 72 79 2e 0a 2a 2a 0a 2a 2a 20 20 20 20 itory..**.**
7fd0: 63 6c 65 61 72 73 69 67 6e 20 20 20 20 20 20 20 clearsign
7fe0: 20 57 68 65 6e 20 65 6e 61 62 6c 65 64 20 28 74 When enabled (t
7ff0: 68 65 20 64 65 66 61 75 6c 74 29 2c 20 66 6f 73 he default), fos
8000: 73 69 6c 20 77 69 6c 6c 20 61 74 74 65 6d 70 74 sil will attempt
8010: 20 74 6f 0a 2a 2a 20 20 20 20 20 20 20 20 20 20 to.**
8020: 20 20 20 20 20 20 20 20 20 20 20 73 69 67 6e 20 sign
8030: 61 6c 6c 20 63 6f 6d 6d 69 74 73 20 77 69 74 68 all commits with
8040: 20 67 70 67 2e 20 20 57 68 65 6e 20 64 69 73 61 gpg. When disa
8050: 62 6c 65 64 2c 20 63 6f 6d 6d 69 74 73 20 77 69 bled, commits wi
8060: 6c 6c 0a 2a 2a 20 20 20 20 20 20 20 20 20 20 20 ll.**
8070: 20 20 20 20 20 20 20 20 20 20 62 65 20 75 6e 73 be uns
8080: 69 67 6e 65 64 2e 0a 2a 2a 0a 2a 2a 20 20 20 20 igned..**.**
8090: 70 67 70 2d 63 6f 6d 6d 61 6e 64 20 20 20 20 20 pgp-command
80a0: 20 43 6f 6d 6d 61 6e 64 20 75 73 65 64 20 74 6f Command used to
80b0: 20 63 6c 65 61 72 2d 73 69 67 6e 20 6d 61 6e 69 clear-sign mani
80c0: 66 65 73 74 73 20 61 74 20 63 68 65 63 6b 2d 69 fests at check-i
80d0: 6e 2e 0a 2a 2a 20 20 20 20 20 20 20 20 20 20 20 n..**
80e0: 20 20 20 20 20 20 20 20 20 20 54 68 65 20 64 65 The de
80f0: 66 61 75 6c 74 20 69 73 20 22 67 70 67 20 2d 2d fault is "gpg --
8100: 63 6c 65 61 72 73 69 67 6e 20 2d 6f 20 22 2e 0a clearsign -o "..
8110: 2a 2a 0a 2a 2a 20 20 20 20 70 72 6f 78 79 20 20 **.** proxy
8120: 20 20 20 20 20 20 20 20 20 20 55 52 4c 20 6f 66 URL of
8130: 20 74 68 65 20 48 54 54 50 20 70 72 6f 78 79 2e the HTTP proxy.
8140: 20 20 49 66 20 75 6e 64 65 66 69 6e 65 64 20 6f If undefined o
8150: 72 20 22 6f 66 66 22 20 74 68 65 6e 0a 2a 2a 20 r "off" then.**
8160: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
8170: 20 20 20 20 74 68 65 20 22 68 74 74 70 5f 70 72 the "http_pr
8180: 6f 78 79 22 20 65 6e 76 69 72 6f 6e 6d 65 6e 74 oxy" environment
8190: 20 76 61 72 69 61 62 6c 65 20 69 73 20 63 6f 6e variable is con
81a0: 73 75 6c 74 65 64 2e 0a 2a 2a 20 20 20 20 20 20 sulted..**
81b0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 I
81c0: 66 20 74 68 65 20 68 74 74 70 5f 70 72 6f 78 79 f the http_proxy
81d0: 20 65 6e 76 69 72 6f 6e 6d 65 6e 74 20 76 61 72 environment var
81e0: 69 61 62 6c 65 20 69 73 20 75 6e 64 65 66 69 6e iable is undefin
81f0: 65 64 0a 2a 2a 20 20 20 20 20 20 20 20 20 20 20 ed.**
8200: 20 20 20 20 20 20 20 20 20 20 74 68 65 6e 20 61 then a
8210: 20 64 69 72 65 63 74 20 48 54 54 50 20 63 6f 6e direct HTTP con
8220: 6e 65 63 74 69 6f 6e 20 69 73 20 75 73 65 64 2e nection is used.
8230: 0a 2a 2a 0a 2a 2a 20 20 20 20 77 65 62 2d 62 72 .**.** web-br
8240: 6f 77 73 65 72 20 20 20 20 20 20 41 20 73 68 65 owser A she
8250: 6c 6c 20 63 6f 6d 6d 61 6e 64 20 75 73 65 64 20 ll command used
8260: 74 6f 20 6c 61 75 6e 63 68 20 79 6f 75 72 20 70 to launch your p
8270: 72 65 66 65 72 72 65 64 0a 2a 2a 20 20 20 20 20 referred.**
8280: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
8290: 77 65 62 20 62 72 6f 77 73 65 72 20 77 68 65 6e web browser when
82a0: 20 67 69 76 65 6e 20 61 20 55 52 4c 20 61 73 20 given a URL as
82b0: 61 6e 20 61 72 67 75 6d 65 6e 74 2e 0a 2a 2a 20 an argument..**
82c0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
82d0: 20 20 20 20 44 65 66 61 75 6c 74 73 20 74 6f 20 Defaults to
82e0: 22 73 74 61 72 74 22 20 6f 6e 20 77 69 6e 64 6f "start" on windo
82f0: 77 73 2c 20 22 6f 70 65 6e 22 20 6f 6e 20 4d 61 ws, "open" on Ma
8300: 63 2c 0a 2a 2a 20 20 20 20 20 20 20 20 20 20 20 c,.**
8310: 20 20 20 20 20 20 20 20 20 20 61 6e 64 20 22 66 and "f
8320: 69 72 65 66 6f 78 22 20 6f 6e 20 55 6e 69 78 2e irefox" on Unix.
8330: 0a 2a 2f 0a 76 6f 69 64 20 73 65 74 74 69 6e 67 .*/.void setting
8340: 5f 63 6d 64 28 76 6f 69 64 29 7b 0a 20 20 73 74 _cmd(void){. st
8350: 61 74 69 63 20 63 6f 6e 73 74 20 63 68 61 72 20 atic const char
8360: 2a 61 7a 4e 61 6d 65 5b 5d 20 3d 20 7b 0a 20 20 *azName[] = {.
8370: 20 20 22 61 75 74 6f 73 79 6e 63 22 2c 0a 20 20 "autosync",.
8380: 20 20 22 64 69 66 66 2d 63 6f 6d 6d 61 6e 64 22 "diff-command"
8390: 2c 0a 20 20 20 20 22 65 64 69 74 6f 72 22 2c 0a ,. "editor",.
83a0: 20 20 20 20 22 67 64 69 66 66 2d 63 6f 6d 6d 61 "gdiff-comma
83b0: 6e 64 22 2c 0a 20 20 20 20 22 6c 6f 63 61 6c 61 nd",. "locala
83c0: 75 74 68 22 2c 0a 20 20 20 20 22 63 6c 65 61 72 uth",. "clear
83d0: 73 69 67 6e 22 2c 0a 20 20 20 20 22 70 67 70 2d sign",. "pgp-
83e0: 63 6f 6d 6d 61 6e 64 22 2c 0a 20 20 20 20 22 70 command",. "p
83f0: 72 6f 78 79 22 2c 0a 20 20 20 20 22 77 65 62 2d roxy",. "web-
8400: 62 72 6f 77 73 65 72 22 2c 0a 20 20 7d 3b 0a 20 browser",. };.
8410: 20 69 6e 74 20 69 3b 0a 20 20 69 6e 74 20 67 6c int i;. int gl
8420: 6f 62 61 6c 46 6c 61 67 20 3d 20 66 69 6e 64 5f obalFlag = find_
8430: 6f 70 74 69 6f 6e 28 22 67 6c 6f 62 61 6c 22 2c option("global",
8440: 22 67 22 2c 30 29 21 3d 30 3b 0a 20 20 69 6e 74 "g",0)!=0;. int
8450: 20 75 6e 73 65 74 46 6c 61 67 20 3d 20 67 2e 61 unsetFlag = g.a
8460: 72 67 76 5b 31 5d 5b 30 5d 3d 3d 27 75 27 3b 0a rgv[1][0]=='u';.
8470: 20 20 64 62 5f 66 69 6e 64 5f 61 6e 64 5f 6f 70 db_find_and_op
8480: 65 6e 5f 72 65 70 6f 73 69 74 6f 72 79 28 30 29 en_repository(0)
8490: 3b 0a 20 20 69 66 28 20 21 67 2e 72 65 70 6f 73 ;. if( !g.repos
84a0: 69 74 6f 72 79 4f 70 65 6e 20 29 7b 0a 20 20 20 itoryOpen ){.
84b0: 20 64 62 5f 6f 70 65 6e 5f 63 6f 6e 66 69 67 28 db_open_config(
84c0: 29 3b 0a 20 20 20 20 67 6c 6f 62 61 6c 46 6c 61 );. globalFla
84d0: 67 20 3d 20 31 3b 0a 20 20 7d 0a 20 20 69 66 28 g = 1;. }. if(
84e0: 20 75 6e 73 65 74 46 6c 61 67 20 26 26 20 67 2e unsetFlag && g.
84f0: 61 72 67 63 21 3d 33 20 29 7b 0a 20 20 20 20 75 argc!=3 ){. u
8500: 73 61 67 65 28 22 50 52 4f 50 45 52 54 59 20 3f sage("PROPERTY ?
8510: 2d 67 6c 6f 62 61 6c 3f 22 29 3b 0a 20 20 7d 0a -global?");. }.
8520: 20 20 69 66 28 20 67 2e 61 72 67 63 3d 3d 32 20 if( g.argc==2
8530: 29 7b 0a 20 20 20 20 66 6f 72 28 69 3d 30 3b 20 ){. for(i=0;
8540: 69 3c 73 69 7a 65 6f 66 28 61 7a 4e 61 6d 65 29 i<sizeof(azName)
8550: 2f 73 69 7a 65 6f 66 28 61 7a 4e 61 6d 65 5b 30 /sizeof(azName[0
8560: 5d 29 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 20 20 ]); i++){.
8570: 70 72 69 6e 74 5f 73 65 74 74 69 6e 67 28 61 7a print_setting(az
8580: 4e 61 6d 65 5b 69 5d 29 3b 0a 20 20 20 20 7d 0a Name[i]);. }.
8590: 20 20 7d 65 6c 73 65 20 69 66 28 20 67 2e 61 72 }else if( g.ar
85a0: 67 63 3d 3d 33 20 7c 7c 20 67 2e 61 72 67 63 3d gc==3 || g.argc=
85b0: 3d 34 20 29 7b 0a 20 20 20 20 63 6f 6e 73 74 20 =4 ){. const
85c0: 63 68 61 72 20 2a 7a 4e 61 6d 65 20 3d 20 67 2e char *zName = g.
85d0: 61 72 67 76 5b 32 5d 3b 0a 20 20 20 20 69 6e 74 argv[2];. int
85e0: 20 6e 20 3d 20 73 74 72 6c 65 6e 28 7a 4e 61 6d n = strlen(zNam
85f0: 65 29 3b 0a 20 20 20 20 66 6f 72 28 69 3d 30 3b e);. for(i=0;
8600: 20 69 3c 73 69 7a 65 6f 66 28 61 7a 4e 61 6d 65 i<sizeof(azName
8610: 29 2f 73 69 7a 65 6f 66 28 61 7a 4e 61 6d 65 5b )/sizeof(azName[
8620: 30 5d 29 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 20 0]); i++){.
8630: 20 69 66 28 20 73 74 72 6e 63 6d 70 28 61 7a 4e if( strncmp(azN
8640: 61 6d 65 5b 69 5d 2c 20 7a 4e 61 6d 65 2c 20 6e ame[i], zName, n
8650: 29 3d 3d 30 20 29 20 62 72 65 61 6b 3b 0a 20 20 )==0 ) break;.
8660: 20 20 7d 0a 20 20 20 20 69 66 28 20 69 3e 3d 73 }. if( i>=s
8670: 69 7a 65 6f 66 28 61 7a 4e 61 6d 65 29 2f 73 69 izeof(azName)/si
8680: 7a 65 6f 66 28 61 7a 4e 61 6d 65 5b 30 5d 29 20 zeof(azName[0])
8690: 29 7b 0a 20 20 20 20 20 20 66 6f 73 73 69 6c 5f ){. fossil_
86a0: 66 61 74 61 6c 28 22 6e 6f 20 73 75 63 68 20 73 fatal("no such s
86b0: 65 74 74 69 6e 67 3a 20 25 73 22 2c 20 7a 4e 61 etting: %s", zNa
86c0: 6d 65 29 3b 0a 20 20 20 20 7d 0a 20 20 20 20 69 me);. }. i
86d0: 66 28 20 75 6e 73 65 74 46 6c 61 67 20 29 7b 0a f( unsetFlag ){.
86e0: 20 20 20 20 20 20 64 62 5f 75 6e 73 65 74 28 61 db_unset(a
86f0: 7a 4e 61 6d 65 5b 69 5d 2c 20 67 6c 6f 62 61 6c zName[i], global
8700: 46 6c 61 67 29 3b 0a 20 20 20 20 7d 65 6c 73 65 Flag);. }else
8710: 20 69 66 28 20 67 2e 61 72 67 63 3d 3d 34 20 29 if( g.argc==4 )
8720: 7b 0a 20 20 20 20 20 20 64 62 5f 73 65 74 28 61 {. db_set(a
8730: 7a 4e 61 6d 65 5b 69 5d 2c 20 67 2e 61 72 67 76 zName[i], g.argv
8740: 5b 33 5d 2c 20 67 6c 6f 62 61 6c 46 6c 61 67 29 [3], globalFlag)
8750: 3b 0a 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 ;. }else{.
8760: 20 20 20 70 72 69 6e 74 5f 73 65 74 74 69 6e 67 print_setting
8770: 28 61 7a 4e 61 6d 65 5b 69 5d 29 3b 0a 20 20 20 (azName[i]);.
8780: 20 7d 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 }. }else{.
8790: 75 73 61 67 65 28 22 3f 50 52 4f 50 45 52 54 59 usage("?PROPERTY
87a0: 3f 20 3f 56 41 4c 55 45 3f 22 29 3b 0a 20 20 7d ? ?VALUE?");. }
87b0: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 53 51 4c 20 66 75 .}../*.** SQL fu
87c0: 6e 63 74 69 6f 6e 20 74 6f 20 72 65 6e 64 65 72 nction to render
87d0: 20 61 20 55 55 49 44 20 61 73 20 61 20 68 79 70 a UUID as a hyp
87e0: 65 72 6c 69 6e 6b 20 74 6f 20 61 20 70 61 67 65 erlink to a page
87f0: 20 64 65 73 63 72 69 62 69 6e 67 0a 2a 2a 20 74 describing.** t
8800: 68 61 74 20 55 55 49 44 2e 0a 2a 2f 0a 73 74 61 hat UUID..*/.sta
8810: 74 69 63 20 76 6f 69 64 20 68 79 70 65 72 6c 69 tic void hyperli
8820: 6e 6b 55 75 69 64 46 75 6e 63 28 0a 20 20 73 71 nkUuidFunc(. sq
8830: 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 70 lite3_context *p
8840: 43 78 74 2c 20 20 20 20 20 2f 2a 20 66 75 6e 63 Cxt, /* func
8850: 74 69 6f 6e 20 63 6f 6e 74 65 78 74 20 2a 2f 0a tion context */.
8860: 20 20 69 6e 74 20 61 72 67 63 2c 20 20 20 20 20 int argc,
8870: 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 /*
8880: 6e 75 6d 62 65 72 20 6f 66 20 61 72 67 75 6d 65 number of argume
8890: 6e 74 73 20 74 6f 20 74 68 65 20 66 75 6e 63 74 nts to the funct
88a0: 69 6f 6e 20 2a 2f 0a 20 20 73 71 6c 69 74 65 33 ion */. sqlite3
88b0: 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 20 20 20 _value **argv
88c0: 20 20 20 20 2f 2a 20 76 61 6c 75 65 73 20 6f 66 /* values of
88d0: 20 61 6c 6c 20 66 75 6e 63 74 69 6f 6e 20 61 72 all function ar
88e0: 67 75 6d 65 6e 74 73 20 2a 2f 0a 29 7b 0a 20 20 guments */.){.
88f0: 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 55 75 69 const char *zUui
8900: 64 3b 20 20 20 20 20 20 20 20 20 2f 2a 20 54 68 d; /* Th
8910: 65 20 55 55 49 44 20 74 6f 20 72 65 6e 64 65 72 e UUID to render
8920: 20 2a 2f 0a 20 20 63 68 61 72 20 2a 7a 3b 20 20 */. char *z;
8930: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
8940: 20 2f 2a 20 52 65 6e 64 65 72 65 64 20 48 54 4d /* Rendered HTM
8950: 4c 20 74 65 78 74 20 2a 2f 0a 0a 20 20 7a 55 75 L text */.. zUu
8960: 69 64 20 3d 20 28 63 6f 6e 73 74 20 63 68 61 72 id = (const char
8970: 2a 29 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f *)sqlite3_value_
8980: 74 65 78 74 28 61 72 67 76 5b 30 5d 29 3b 0a 20 text(argv[0]);.
8990: 20 69 66 28 20 67 2e 6f 6b 48 69 73 74 6f 72 79 if( g.okHistory
89a0: 20 26 26 20 7a 55 75 69 64 20 26 26 20 73 74 72 && zUuid && str
89b0: 6c 65 6e 28 7a 55 75 69 64 29 3e 3d 31 30 20 29 len(zUuid)>=10 )
89c0: 7b 0a 20 20 20 20 7a 20 3d 20 6d 70 72 69 6e 74 {. z = mprint
89d0: 66 28 22 3c 74 74 3e 3c 61 20 68 72 65 66 3d 27 f("<tt><a href='
89e0: 25 73 2f 76 69 6e 66 6f 2f 25 74 27 3e 3c 73 70 %s/vinfo/%t'><sp
89f0: 61 6e 20 73 74 79 6c 65 3d 27 66 6f 6e 74 2d 73 an style='font-s
8a00: 69 7a 65 3a 31 2e 35 65 6d 27 3e 22 0a 20 20 20 ize:1.5em'>".
8a10: 20 20 20 20 20 20 20 20 20 20 20 20 20 22 25 23 "%#
8a20: 68 3c 2f 73 70 61 6e 3e 25 68 3c 2f 61 3e 3c 2f h</span>%h</a></
8a30: 74 74 3e 22 2c 0a 20 20 20 20 20 20 20 20 20 20 tt>",.
8a40: 20 20 20 20 20 20 67 2e 7a 42 61 73 65 55 52 4c g.zBaseURL
8a50: 2c 20 7a 55 75 69 64 2c 20 31 30 2c 20 7a 55 75 , zUuid, 10, zUu
8a60: 69 64 2c 20 26 7a 55 75 69 64 5b 31 30 5d 29 3b id, &zUuid[10]);
8a70: 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 . sqlite3_res
8a80: 75 6c 74 5f 74 65 78 74 28 70 43 78 74 2c 20 7a ult_text(pCxt, z
8a90: 2c 20 2d 31 2c 20 66 72 65 65 29 3b 0a 20 20 7d , -1, free);. }
8aa0: 65 6c 73 65 7b 0a 20 20 20 20 73 71 6c 69 74 65 else{. sqlite
8ab0: 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 70 43 3_result_text(pC
8ac0: 78 74 2c 20 7a 55 75 69 64 2c 20 2d 31 2c 20 53 xt, zUuid, -1, S
8ad0: 51 4c 49 54 45 5f 54 52 41 4e 53 49 45 4e 54 29 QLITE_TRANSIENT)
8ae0: 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 53 ;. }.}../*.** S
8af0: 51 4c 20 66 75 6e 63 74 69 6f 6e 20 74 6f 20 72 QL function to r
8b00: 65 6e 64 65 72 20 61 20 54 41 47 49 44 20 61 73 ender a TAGID as
8b10: 20 61 20 68 79 70 65 72 6c 69 6e 6b 20 74 6f 20 a hyperlink to
8b20: 61 20 70 61 67 65 20 64 65 73 63 72 69 62 69 6e a page describin
8b30: 67 0a 2a 2a 20 74 68 61 74 20 74 61 67 2e 0a 2a g.** that tag..*
8b40: 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 68 79 /.static void hy
8b50: 70 65 72 6c 69 6e 6b 54 61 67 69 64 46 75 6e 63 perlinkTagidFunc
8b60: 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 (. sqlite3_cont
8b70: 65 78 74 20 2a 70 43 78 74 2c 20 20 20 20 20 2f ext *pCxt, /
8b80: 2a 20 66 75 6e 63 74 69 6f 6e 20 63 6f 6e 74 65 * function conte
8b90: 78 74 20 2a 2f 0a 20 20 69 6e 74 20 61 72 67 63 xt */. int argc
8ba0: 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ,
8bb0: 20 20 20 2f 2a 20 6e 75 6d 62 65 72 20 6f 66 20 /* number of
8bc0: 61 72 67 75 6d 65 6e 74 73 20 74 6f 20 74 68 65 arguments to the
8bd0: 20 66 75 6e 63 74 69 6f 6e 20 2a 2f 0a 20 20 73 function */. s
8be0: 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 qlite3_value **a
8bf0: 72 67 76 20 20 20 20 20 20 20 2f 2a 20 76 61 6c rgv /* val
8c00: 75 65 73 20 6f 66 20 61 6c 6c 20 66 75 6e 63 74 ues of all funct
8c10: 69 6f 6e 20 61 72 67 75 6d 65 6e 74 73 20 2a 2f ion arguments */
8c20: 0a 29 7b 0a 20 20 69 6e 74 20 74 61 67 69 64 3b .){. int tagid;
8c30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
8c40: 20 2f 2a 20 54 68 65 20 74 61 67 69 64 20 74 6f /* The tagid to
8c50: 20 72 65 6e 64 65 72 20 2a 2f 0a 20 20 63 68 61 render */. cha
8c60: 72 20 2a 7a 3b 20 20 20 20 20 20 20 20 20 20 20 r *z;
8c70: 20 20 20 20 20 20 20 20 2f 2a 20 72 65 6e 64 65 /* rende
8c80: 72 65 64 20 68 74 6d 6c 20 74 65 78 74 20 2a 2f red html text */
8c90: 0a 0a 20 20 74 61 67 69 64 20 3d 20 73 71 6c 69 .. tagid = sqli
8ca0: 74 65 33 5f 76 61 6c 75 65 5f 69 6e 74 28 61 72 te3_value_int(ar
8cb0: 67 76 5b 30 5d 29 3b 0a 20 20 69 66 28 20 67 2e gv[0]);. if( g.
8cc0: 6f 6b 48 69 73 74 6f 72 79 20 29 7b 0a 20 20 20 okHistory ){.
8cd0: 20 7a 20 3d 20 6d 70 72 69 6e 74 66 28 22 3c 61 z = mprintf("<a
8ce0: 20 68 72 65 66 3d 27 25 73 2f 74 61 67 76 69 65 href='%s/tagvie
8cf0: 77 3f 74 61 67 69 64 3d 25 64 27 3e 25 64 3c 2f w?tagid=%d'>%d</
8d00: 61 3e 22 2c 20 0a 20 20 20 20 20 20 20 20 20 20 a>", .
8d10: 20 20 20 20 20 20 20 20 67 2e 7a 42 61 73 65 55 g.zBaseU
8d20: 52 4c 2c 20 74 61 67 69 64 2c 20 74 61 67 69 64 RL, tagid, tagid
8d30: 29 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 );. }else{.
8d40: 7a 20 3d 20 6d 70 72 69 6e 74 66 28 22 25 64 22 z = mprintf("%d"
8d50: 2c 20 74 61 67 69 64 29 3b 0a 20 20 7d 0a 20 20 , tagid);. }.
8d60: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 74 sqlite3_result_t
8d70: 65 78 74 28 70 43 78 74 2c 20 7a 2c 20 2d 31 2c ext(pCxt, z, -1,
8d80: 20 66 72 65 65 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a free);.}../*.**
8d90: 20 53 51 4c 20 66 75 6e 63 74 69 6f 6e 20 74 6f SQL function to
8da0: 20 72 65 6e 64 65 72 20 61 20 54 41 47 4e 41 4d render a TAGNAM
8db0: 45 20 61 73 20 61 20 68 79 70 65 72 6c 69 6e 6b E as a hyperlink
8dc0: 20 74 6f 20 61 20 70 61 67 65 20 64 65 73 63 72 to a page descr
8dd0: 69 62 69 6e 67 0a 2a 2a 20 74 68 61 74 20 74 61 ibing.** that ta
8de0: 67 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 g..*/.static voi
8df0: 64 20 68 79 70 65 72 6c 69 6e 6b 54 61 67 6e 61 d hyperlinkTagna
8e00: 6d 65 46 75 6e 63 28 0a 20 20 73 71 6c 69 74 65 meFunc(. sqlite
8e10: 33 5f 63 6f 6e 74 65 78 74 20 2a 70 43 78 74 2c 3_context *pCxt,
8e20: 20 20 20 20 20 2f 2a 20 66 75 6e 63 74 69 6f 6e /* function
8e30: 20 63 6f 6e 74 65 78 74 20 2a 2f 0a 20 20 69 6e context */. in
8e40: 74 20 61 72 67 63 2c 20 20 20 20 20 20 20 20 20 t argc,
8e50: 20 20 20 20 20 20 20 20 20 2f 2a 20 6e 75 6d 62 /* numb
8e60: 65 72 20 6f 66 20 61 72 67 75 6d 65 6e 74 73 20 er of arguments
8e70: 74 6f 20 74 68 65 20 66 75 6e 63 74 69 6f 6e 20 to the function
8e80: 2a 2f 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c */. sqlite3_val
8e90: 75 65 20 2a 2a 61 72 67 76 20 20 20 20 20 20 20 ue **argv
8ea0: 2f 2a 20 76 61 6c 75 65 73 20 6f 66 20 61 6c 6c /* values of all
8eb0: 20 66 75 6e 63 74 69 6f 6e 20 61 72 67 75 6d 65 function argume
8ec0: 6e 74 73 20 2a 2f 0a 29 7b 0a 20 20 63 6f 6e 73 nts */.){. cons
8ed0: 74 20 63 68 61 72 20 2a 7a 54 61 67 3b 20 20 20 t char *zTag;
8ee0: 20 20 20 20 20 20 20 2f 2a 20 54 68 65 20 74 61 /* The ta
8ef0: 67 20 74 6f 20 72 65 6e 64 65 72 20 2a 2f 0a 20 g to render */.
8f00: 20 63 68 61 72 20 2a 7a 3b 20 20 20 20 20 20 20 char *z;
8f10: 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 72 /* r
8f20: 65 6e 64 65 72 65 64 20 68 74 6d 6c 20 74 65 78 endered html tex
8f30: 74 20 2a 2f 0a 0a 20 20 7a 54 61 67 20 3d 20 28 t */.. zTag = (
8f40: 63 6f 6e 73 74 20 63 68 61 72 2a 29 73 71 6c 69 const char*)sqli
8f50: 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 te3_value_text(a
8f60: 72 67 76 5b 30 5d 29 3b 0a 20 20 69 66 28 20 67 rgv[0]);. if( g
8f70: 2e 6f 6b 48 69 73 74 6f 72 79 20 29 7b 0a 20 20 .okHistory ){.
8f80: 20 20 7a 20 3d 20 6d 70 72 69 6e 74 66 28 22 3c z = mprintf("<
8f90: 61 20 68 72 65 66 3d 27 25 73 2f 74 61 67 76 69 a href='%s/tagvi
8fa0: 65 77 3f 6e 61 6d 65 3d 25 54 27 3e 25 68 3c 2f ew?name=%T'>%h</
8fb0: 61 3e 22 2c 20 0a 20 20 20 20 20 20 20 20 20 20 a>", .
8fc0: 20 20 20 20 20 20 20 20 67 2e 7a 42 61 73 65 55 g.zBaseU
8fd0: 52 4c 2c 20 7a 54 61 67 2c 20 7a 54 61 67 29 3b RL, zTag, zTag);
8fe0: 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 7a 20 . }else{. z
8ff0: 3d 20 6d 70 72 69 6e 74 66 28 22 25 68 22 2c 20 = mprintf("%h",
9000: 7a 54 61 67 29 3b 0a 20 20 7d 0a 20 20 73 71 6c zTag);. }. sql
9010: 69 74 65 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 ite3_result_text
9020: 28 70 43 78 74 2c 20 7a 2c 20 2d 31 2c 20 66 72 (pCxt, z, -1, fr
9030: 65 65 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 53 51 ee);.}../*.** SQ
9040: 4c 20 66 75 6e 63 74 69 6f 6e 20 74 6f 20 65 73 L function to es
9050: 63 61 70 65 20 61 6c 6c 20 63 68 61 72 61 63 74 cape all charact
9060: 65 72 73 20 69 6e 20 61 20 73 74 72 69 6e 67 20 ers in a string
9070: 74 68 61 74 20 68 61 76 65 20 73 70 65 63 69 61 that have specia
9080: 6c 0a 2a 2a 20 6d 65 61 6e 69 6e 67 20 74 6f 20 l.** meaning to
9090: 48 54 4d 4c 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 HTML..*/.static
90a0: 76 6f 69 64 20 68 74 6d 6c 69 7a 65 46 75 6e 63 void htmlizeFunc
90b0: 28 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 (. sqlite3_cont
90c0: 65 78 74 20 2a 70 43 78 74 2c 20 20 20 20 20 2f ext *pCxt, /
90d0: 2a 20 66 75 6e 63 74 69 6f 6e 20 63 6f 6e 74 65 * function conte
90e0: 78 74 20 2a 2f 0a 20 20 69 6e 74 20 61 72 67 63 xt */. int argc
90f0: 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ,
9100: 20 20 20 2f 2a 20 6e 75 6d 62 65 72 20 6f 66 20 /* number of
9110: 61 72 67 75 6d 65 6e 74 73 20 74 6f 20 74 68 65 arguments to the
9120: 20 66 75 6e 63 74 69 6f 6e 20 2a 2f 0a 20 20 73 function */. s
9130: 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 qlite3_value **a
9140: 72 67 76 20 20 20 20 20 20 20 2f 2a 20 76 61 6c rgv /* val
9150: 75 65 73 20 6f 66 20 61 6c 6c 20 66 75 6e 63 74 ues of all funct
9160: 69 6f 6e 20 61 72 67 75 6d 65 6e 74 73 20 2a 2f ion arguments */
9170: 0a 29 7b 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 .){. const char
9180: 20 2a 7a 54 65 78 74 3b 20 20 20 20 20 20 20 20 *zText;
9190: 20 2f 2a 20 54 65 78 74 20 74 6f 20 62 65 20 68 /* Text to be h
91a0: 74 6d 6c 69 7a 65 64 20 2a 2f 0a 20 20 63 68 61 tmlized */. cha
91b0: 72 20 2a 7a 3b 20 20 20 20 20 20 20 20 20 20 20 r *z;
91c0: 20 20 20 20 20 20 20 20 2f 2a 20 72 65 6e 64 65 /* rende
91d0: 72 65 64 20 68 74 6d 6c 20 74 65 78 74 20 2a 2f red html text */
91e0: 0a 0a 20 20 7a 54 65 78 74 20 3d 20 28 63 6f 6e .. zText = (con
91f0: 73 74 20 63 68 61 72 2a 29 73 71 6c 69 74 65 33 st char*)sqlite3
9200: 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76 _value_text(argv
9210: 5b 30 5d 29 3b 0a 20 20 7a 20 3d 20 68 74 6d 6c [0]);. z = html
9220: 69 7a 65 28 7a 54 65 78 74 2c 20 2d 31 29 3b 0a ize(zText, -1);.
9230: 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 sqlite3_result
9240: 5f 74 65 78 74 28 70 43 78 74 2c 20 7a 2c 20 2d _text(pCxt, z, -
9250: 31 2c 20 66 72 65 65 29 3b 0a 7d 0a 0a 2f 2a 0a 1, free);.}../*.
9260: 2a 2a 20 54 68 69 73 20 72 6f 75 74 69 6e 65 20 ** This routine
9270: 69 73 20 61 20 68 65 6c 70 65 72 20 74 6f 20 72 is a helper to r
9280: 75 6e 20 61 6e 20 53 51 4c 20 71 75 65 72 79 20 un an SQL query
9290: 61 6e 64 20 74 61 62 6c 65 2d 69 7a 65 20 74 68 and table-ize th
92a0: 65 0a 2a 2a 20 72 65 73 75 6c 74 73 2e 0a 2a 2a e.** results..**
92b0: 0a 2a 2a 20 54 68 65 20 7a 53 71 6c 20 70 61 72 .** The zSql par
92c0: 61 6d 65 74 65 72 20 73 68 6f 75 6c 64 20 62 65 ameter should be
92d0: 20 61 20 73 69 6e 67 6c 65 2c 20 63 6f 6d 70 6c a single, compl
92e0: 65 74 65 20 53 51 4c 20 73 74 61 74 65 6d 65 6e ete SQL statemen
92f0: 74 2e 0a 2a 2a 20 54 61 62 6c 65 69 7a 65 64 20 t..** Tableized
9300: 6f 75 74 70 75 74 20 6f 66 20 74 68 65 20 53 51 output of the SQ
9310: 4c 20 73 74 61 74 65 6d 65 6e 74 20 69 73 20 72 L statement is r
9320: 65 6e 64 65 72 65 64 20 62 61 63 6b 20 74 6f 20 endered back to
9330: 74 68 65 20 63 6c 69 65 6e 74 2e 0a 2a 2a 0a 2a the client..**.*
9340: 2a 20 54 68 65 20 69 73 53 61 66 65 20 66 6c 61 * The isSafe fla
9350: 67 20 69 73 20 74 72 75 65 20 69 66 20 61 6c 6c g is true if all
9360: 20 71 75 65 72 79 20 72 65 73 75 6c 74 73 20 68 query results h
9370: 61 76 65 20 62 65 65 6e 20 70 72 6f 63 65 73 73 ave been process
9380: 65 64 20 0a 2a 2a 20 62 79 20 72 6f 75 74 69 6e ed .** by routin
9390: 65 73 20 73 75 63 68 20 61 73 0a 2a 2a 0a 2a 2a es such as.**.**
93a0: 20 20 20 20 20 20 20 20 6c 69 6e 6b 75 75 69 64 linkuuid
93b0: 28 29 0a 2a 2a 20 20 20 20 20 20 20 20 6c 69 6e ().** lin
93c0: 6b 74 61 67 69 64 28 29 0a 2a 2a 20 20 20 20 20 ktagid().**
93d0: 20 20 20 6c 69 6e 6b 74 61 67 6e 61 6d 65 28 29 linktagname()
93e0: 0a 2a 2a 20 20 20 20 20 20 20 20 68 74 6d 6c 69 .** htmli
93f0: 7a 65 28 29 0a 2a 2a 0a 2a 2a 20 61 6e 64 20 61 ze().**.** and a
9400: 72 65 20 74 68 65 72 65 66 6f 72 65 20 73 61 66 re therefore saf
9410: 65 20 66 6f 72 20 64 69 72 65 63 74 20 72 65 6e e for direct ren
9420: 64 65 72 69 6e 67 2e 20 20 49 66 20 69 73 53 61 dering. If isSa
9430: 66 65 20 69 73 20 66 61 6c 73 65 2c 0a 2a 2a 20 fe is false,.**
9440: 74 68 65 6e 20 61 6c 6c 20 63 68 61 72 61 63 74 then all charact
9450: 65 72 73 20 69 6e 20 74 68 65 20 71 75 65 72 79 ers in the query
9460: 20 72 65 73 75 6c 74 20 74 68 61 74 20 68 61 76 result that hav
9470: 65 20 73 70 65 63 69 61 6c 20 6d 65 61 6e 69 6e e special meanin
9480: 67 0a 2a 2a 20 74 6f 20 48 54 4d 4c 20 61 72 65 g.** to HTML are
9490: 20 65 73 63 61 70 65 64 2e 0a 2a 2a 0a 2a 2a 20 escaped..**.**
94a0: 52 65 74 75 72 6e 73 20 53 51 4c 49 54 45 5f 4f Returns SQLITE_O
94b0: 4b 20 6f 6e 20 73 75 63 63 65 73 73 20 61 6e 64 K on success and
94c0: 20 61 6e 79 20 6f 74 68 65 72 20 76 61 6c 75 65 any other value
94d0: 20 6f 6e 20 65 72 72 6f 72 2e 0a 2a 2f 0a 69 6e on error..*/.in
94e0: 74 20 64 62 5f 67 65 6e 65 72 69 63 5f 71 75 65 t db_generic_que
94f0: 72 79 5f 76 69 65 77 28 63 6f 6e 73 74 20 63 68 ry_view(const ch
9500: 61 72 20 2a 7a 53 71 6c 2c 20 69 6e 74 20 69 73 ar *zSql, int is
9510: 53 61 66 65 29 7b 0a 20 20 73 71 6c 69 74 65 33 Safe){. sqlite3
9520: 5f 73 74 6d 74 20 2a 70 53 74 6d 74 3b 0a 20 20 _stmt *pStmt;.
9530: 69 6e 74 20 72 63 3b 0a 20 20 69 6e 74 20 6e 43 int rc;. int nC
9540: 6f 6c 2c 20 69 3b 0a 20 20 69 6e 74 20 6e 52 6f ol, i;. int nRo
9550: 77 3b 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 w;. const char
9560: 2a 7a 52 6f 77 3b 0a 20 20 73 74 61 74 69 63 20 *zRow;. static
9570: 69 6e 74 20 6f 6e 63 65 20 3d 20 31 3b 0a 0a 20 int once = 1;..
9580: 20 2f 2a 20 49 6e 73 74 61 6c 6c 20 74 68 65 20 /* Install the
9590: 73 70 65 63 69 61 6c 20 66 75 6e 63 74 69 6f 6e special function
95a0: 73 20 6f 6e 20 74 68 65 20 66 69 72 73 74 20 63 s on the first c
95b0: 61 6c 6c 20 74 6f 20 74 68 69 73 20 72 6f 75 74 all to this rout
95c0: 69 6e 65 20 2a 2f 0a 20 20 69 66 28 20 6f 6e 63 ine */. if( onc
95d0: 65 20 29 7b 0a 20 20 20 20 6f 6e 63 65 20 3d 20 e ){. once =
95e0: 30 3b 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 63 0;. sqlite3_c
95f0: 72 65 61 74 65 5f 66 75 6e 63 74 69 6f 6e 28 67 reate_function(g
9600: 2e 64 62 2c 20 22 6c 69 6e 6b 75 75 69 64 22 2c .db, "linkuuid",
9610: 20 31 2c 20 53 51 4c 49 54 45 5f 55 54 46 38 2c 1, SQLITE_UTF8,
9620: 20 30 2c 20 0a 20 20 20 20 20 20 20 20 20 20 20 0, .
9630: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
9640: 20 68 79 70 65 72 6c 69 6e 6b 55 75 69 64 46 75 hyperlinkUuidFu
9650: 6e 63 2c 20 30 2c 20 30 29 3b 0a 20 20 20 20 73 nc, 0, 0);. s
9660: 71 6c 69 74 65 33 5f 63 72 65 61 74 65 5f 66 75 qlite3_create_fu
9670: 6e 63 74 69 6f 6e 28 67 2e 64 62 2c 20 22 6c 69 nction(g.db, "li
9680: 6e 6b 74 61 67 69 64 22 2c 20 31 2c 20 53 51 4c nktagid", 1, SQL
9690: 49 54 45 5f 55 54 46 38 2c 20 30 2c 20 0a 20 20 ITE_UTF8, 0, .
96a0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
96b0: 20 20 20 20 20 20 20 20 20 20 68 79 70 65 72 6c hyperl
96c0: 69 6e 6b 54 61 67 69 64 46 75 6e 63 2c 20 30 2c inkTagidFunc, 0,
96d0: 20 30 29 3b 0a 20 20 20 20 73 71 6c 69 74 65 33 0);. sqlite3
96e0: 5f 63 72 65 61 74 65 5f 66 75 6e 63 74 69 6f 6e _create_function
96f0: 28 67 2e 64 62 2c 20 22 6c 69 6e 6b 74 61 67 6e (g.db, "linktagn
9700: 61 6d 65 22 2c 20 31 2c 20 53 51 4c 49 54 45 5f ame", 1, SQLITE_
9710: 55 54 46 38 2c 20 30 2c 20 0a 20 20 20 20 20 20 UTF8, 0, .
9720: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
9730: 20 20 20 20 20 20 68 79 70 65 72 6c 69 6e 6b 54 hyperlinkT
9740: 61 67 6e 61 6d 65 46 75 6e 63 2c 20 30 2c 20 30 agnameFunc, 0, 0
9750: 29 3b 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 63 );. sqlite3_c
9760: 72 65 61 74 65 5f 66 75 6e 63 74 69 6f 6e 28 67 reate_function(g
9770: 2e 64 62 2c 20 22 68 74 6d 6c 69 7a 65 22 2c 20 .db, "htmlize",
9780: 31 2c 20 53 51 4c 49 54 45 5f 55 54 46 38 2c 20 1, SQLITE_UTF8,
9790: 30 2c 20 0a 20 20 20 20 20 20 20 20 20 20 20 20 0, .
97a0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
97b0: 68 74 6d 6c 69 7a 65 46 75 6e 63 2c 20 30 2c 20 htmlizeFunc, 0,
97c0: 30 29 3b 0a 20 20 7d 0a 0a 20 20 2f 2a 0a 20 20 0);. }.. /*.
97d0: 2a 2a 20 55 73 65 20 73 71 6c 69 74 65 33 5f 73 ** Use sqlite3_s
97e0: 74 6d 74 20 64 69 72 65 63 74 6c 79 20 72 61 74 tmt directly rat
97f0: 68 65 72 20 74 68 61 6e 20 67 6f 69 6e 67 20 74 her than going t
9800: 68 72 6f 75 67 68 20 64 62 5f 70 72 65 70 61 72 hrough db_prepar
9810: 65 28 29 2c 0a 20 20 2a 2a 20 73 6f 20 74 68 61 e(),. ** so tha
9820: 74 20 77 65 20 63 61 6e 20 74 72 65 61 74 20 65 t we can treat e
9830: 72 72 6f 72 73 20 61 20 6e 6f 6e 2d 66 61 74 61 rrors a non-fata
9840: 6c 2e 0a 20 20 2a 2f 0a 20 20 72 63 20 3d 20 73 l.. */. rc = s
9850: 71 6c 69 74 65 33 5f 70 72 65 70 61 72 65 28 67 qlite3_prepare(g
9860: 2e 64 62 2c 20 7a 53 71 6c 2c 20 2d 31 2c 20 26 .db, zSql, -1, &
9870: 70 53 74 6d 74 2c 20 30 29 3b 0a 20 20 69 66 28 pStmt, 0);. if(
9880: 20 53 51 4c 49 54 45 5f 4f 4b 20 21 3d 20 72 63 SQLITE_OK != rc
9890: 20 29 7b 0a 20 20 20 20 40 20 3c 73 70 61 6e 20 ){. @ <span
98a0: 73 74 79 6c 65 3d 27 63 6f 6c 6f 72 3a 72 65 64 style='color:red
98b0: 27 3e 64 62 5f 67 65 6e 65 72 69 63 5f 71 75 65 '>db_generic_que
98c0: 72 79 5f 76 69 65 77 28 29 20 53 51 4c 20 65 72 ry_view() SQL er
98d0: 72 6f 72 3a 0a 20 20 20 20 40 20 25 68 28 73 71 ror:. @ %h(sq
98e0: 6c 69 74 65 33 5f 65 72 72 6d 73 67 28 67 2e 64 lite3_errmsg(g.d
98f0: 62 29 29 3c 2f 73 70 61 6e 3e 0a 20 20 20 20 72 b))</span>. r
9900: 65 74 75 72 6e 20 72 63 3b 0a 20 20 7d 0a 20 20 eturn rc;. }.
9910: 6e 43 6f 6c 20 3d 20 73 71 6c 69 74 65 33 5f 63 nCol = sqlite3_c
9920: 6f 6c 75 6d 6e 5f 63 6f 75 6e 74 28 70 53 74 6d olumn_count(pStm
9930: 74 29 3b 0a 20 20 40 20 3c 74 61 62 6c 65 20 63 t);. @ <table c
9940: 6c 61 73 73 3d 27 66 6f 73 73 69 6c 5f 64 62 5f lass='fossil_db_
9950: 67 65 6e 65 72 69 63 5f 71 75 65 72 79 5f 76 69 generic_query_vi
9960: 65 77 27 3e 3c 74 62 6f 64 79 3e 0a 20 20 40 20 ew'><tbody>. @
9970: 3c 74 72 20 63 6c 61 73 73 3d 27 68 65 61 64 65 <tr class='heade
9980: 72 27 3e 0a 20 20 66 6f 72 28 69 3d 30 3b 20 69 r'>. for(i=0; i
9990: 3c 6e 43 6f 6c 3b 20 2b 2b 69 29 7b 0a 20 20 20 <nCol; ++i){.
99a0: 20 40 20 3c 74 64 3e 25 68 28 73 71 6c 69 74 65 @ <td>%h(sqlite
99b0: 33 5f 63 6f 6c 75 6d 6e 5f 6e 61 6d 65 28 70 53 3_column_name(pS
99c0: 74 6d 74 2c 69 29 29 3c 2f 74 64 3e 0a 20 20 7d tmt,i))</td>. }
99d0: 0a 20 20 40 20 3c 2f 74 72 3e 0a 0a 20 20 6e 52 . @ </tr>.. nR
99e0: 6f 77 20 3d 20 30 3b 0a 20 20 77 68 69 6c 65 28 ow = 0;. while(
99f0: 20 53 51 4c 49 54 45 5f 52 4f 57 3d 3d 73 71 6c SQLITE_ROW==sql
9a00: 69 74 65 33 5f 73 74 65 70 28 70 53 74 6d 74 29 ite3_step(pStmt)
9a10: 20 29 7b 0a 20 20 20 20 63 6f 6e 73 74 20 63 68 ){. const ch
9a20: 61 72 20 2a 61 7a 43 6c 61 73 73 5b 5d 20 3d 20 ar *azClass[] =
9a30: 7b 20 22 65 76 65 6e 22 2c 20 22 6f 64 64 22 20 { "even", "odd"
9a40: 7d 3b 0a 20 20 20 20 40 20 3c 74 72 20 63 6c 61 };. @ <tr cla
9a50: 73 73 3d 27 25 73 28 61 7a 43 6c 61 73 73 5b 28 ss='%s(azClass[(
9a60: 6e 52 6f 77 2b 2b 29 26 31 5d 29 27 3e 0a 20 20 nRow++)&1])'>.
9a70: 20 20 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c 6e for(i=0; i<n
9a80: 43 6f 6c 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 20 Col; i++){.
9a90: 20 20 20 7a 52 6f 77 20 3d 20 28 63 68 61 72 20 zRow = (char
9aa0: 63 6f 6e 73 74 2a 29 73 71 6c 69 74 65 33 5f 63 const*)sqlite3_c
9ab0: 6f 6c 75 6d 6e 5f 74 65 78 74 28 70 53 74 6d 74 olumn_text(pStmt
9ac0: 2c 69 29 3b 0a 20 20 20 20 20 20 20 20 69 66 28 ,i);. if(
9ad0: 20 69 73 53 61 66 65 20 29 7b 0a 20 20 20 20 20 isSafe ){.
9ae0: 20 20 20 20 20 40 20 3c 74 64 3e 25 73 28 7a 52 @ <td>%s(zR
9af0: 6f 77 29 3c 2f 74 64 3e 0a 20 20 20 20 20 20 20 ow)</td>.
9b00: 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 20 20 }else{.
9b10: 20 20 40 20 3c 74 64 3e 25 68 28 7a 52 6f 77 29 @ <td>%h(zRow)
9b20: 3c 2f 74 64 3e 0a 20 20 20 20 20 20 20 20 7d 0a </td>. }.
9b30: 20 20 20 20 20 20 7d 0a 20 20 20 20 40 20 3c 2f }. @ </
9b40: 74 72 3e 0a 20 20 7d 0a 20 20 40 20 3c 2f 74 62 tr>. }. @ </tb
9b50: 6f 64 79 3e 3c 2f 74 61 62 6c 65 3e 0a 20 20 73 ody></table>. s
9b60: 71 6c 69 74 65 33 5f 66 69 6e 61 6c 69 7a 65 28 qlite3_finalize(
9b70: 70 53 74 6d 74 29 3b 0a 20 20 72 65 74 75 72 6e pStmt);. return
9b80: 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 7d 0a SQLITE_OK;.}.