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 73 2f 5f 66 6f 73 73 69 6c 22 2c 20 7a ("%s/_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 54 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 * This function
5d00: 72 65 67 69 73 74 65 72 73 20 61 75 78 69 6c 69 registers auxili
5d10: 61 72 79 20 66 75 6e 63 74 69 6f 6e 73 20 77 68 ary functions wh
5d20: 65 6e 20 74 68 65 20 53 51 4c 69 74 65 0a 2a 2a en the SQLite.**
5d30: 20 64 61 74 61 62 61 73 65 20 63 6f 6e 6e 65 63 database connec
5d40: 74 69 6f 6e 20 69 73 20 66 69 72 73 74 20 65 73 tion is first es
5d50: 74 61 62 6c 69 73 68 65 64 2e 0a 2a 2f 0a 4c 4f tablished..*/.LO
5d60: 43 41 4c 20 76 6f 69 64 20 64 62 5f 63 6f 6e 6e CAL void db_conn
5d70: 65 63 74 69 6f 6e 5f 69 6e 69 74 28 76 6f 69 64 ection_init(void
5d80: 29 7b 0a 20 20 73 74 61 74 69 63 20 69 6e 74 20 ){. static int
5d90: 6f 6e 63 65 20 3d 20 31 3b 0a 20 20 69 66 28 20 once = 1;. if(
5da0: 6f 6e 63 65 20 29 7b 0a 20 20 20 20 73 71 6c 69 once ){. sqli
5db0: 74 65 33 5f 63 72 65 61 74 65 5f 66 75 6e 63 74 te3_create_funct
5dc0: 69 6f 6e 28 67 2e 64 62 2c 20 22 70 72 69 6e 74 ion(g.db, "print
5dd0: 22 2c 20 2d 31 2c 20 53 51 4c 49 54 45 5f 55 54 ", -1, SQLITE_UT
5de0: 46 38 2c 20 30 2c 64 62 5f 73 71 6c 5f 70 72 69 F8, 0,db_sql_pri
5df0: 6e 74 2c 30 2c 30 29 3b 0a 20 20 20 20 73 71 6c nt,0,0);. sql
5e00: 69 74 65 33 5f 63 72 65 61 74 65 5f 66 75 6e 63 ite3_create_func
5e10: 74 69 6f 6e 28 0a 20 20 20 20 20 20 67 2e 64 62 tion(. g.db
5e20: 2c 20 22 66 69 6c 65 5f 69 73 5f 73 65 6c 65 63 , "file_is_selec
5e30: 74 65 64 22 2c 20 31 2c 20 53 51 4c 49 54 45 5f ted", 1, SQLITE_
5e40: 55 54 46 38 2c 20 30 2c 20 66 69 6c 65 5f 69 73 UTF8, 0, file_is
5e50: 5f 73 65 6c 65 63 74 65 64 2c 30 2c 30 0a 20 20 _selected,0,0.
5e60: 20 20 29 3b 0a 20 20 20 20 69 66 28 20 67 2e 66 );. if( g.f
5e70: 53 71 6c 54 72 61 63 65 20 29 7b 0a 20 20 20 20 SqlTrace ){.
5e80: 20 20 73 71 6c 69 74 65 33 5f 74 72 61 63 65 28 sqlite3_trace(
5e90: 67 2e 64 62 2c 20 64 62 5f 73 71 6c 5f 74 72 61 g.db, db_sql_tra
5ea0: 63 65 2c 20 30 29 3b 0a 20 20 20 20 7d 0a 20 20 ce, 0);. }.
5eb0: 20 20 6f 6e 63 65 20 3d 20 30 3b 0a 20 20 7d 0a once = 0;. }.
5ec0: 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65 74 75 72 6e 20 }../*.** Return
5ed0: 74 72 75 65 20 69 66 20 74 68 65 20 73 74 72 69 true if the stri
5ee0: 6e 67 20 7a 56 61 6c 20 72 65 70 72 65 73 65 6e ng zVal represen
5ef0: 74 73 20 22 74 72 75 65 22 20 28 6f 72 20 22 66 ts "true" (or "f
5f00: 61 6c 73 65 22 29 2e 0a 2a 2f 0a 69 6e 74 20 69 alse")..*/.int i
5f10: 73 5f 74 72 75 74 68 28 63 6f 6e 73 74 20 63 68 s_truth(const ch
5f20: 61 72 20 2a 7a 56 61 6c 29 7b 0a 20 20 73 74 61 ar *zVal){. sta
5f30: 74 69 63 20 63 6f 6e 73 74 20 63 68 61 72 20 2a tic const char *
5f40: 61 7a 4f 6e 5b 5d 20 3d 20 7b 20 22 6f 6e 22 2c azOn[] = { "on",
5f50: 20 22 79 65 73 22 2c 20 22 74 72 75 65 22 2c 20 "yes", "true",
5f60: 22 31 22 20 7d 3b 0a 20 20 69 6e 74 20 69 3b 0a "1" };. int i;.
5f70: 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c 73 69 7a for(i=0; i<siz
5f80: 65 6f 66 28 61 7a 4f 6e 29 2f 73 69 7a 65 6f 66 eof(azOn)/sizeof
5f90: 28 61 7a 4f 6e 5b 30 5d 29 3b 20 69 2b 2b 29 7b (azOn[0]); i++){
5fa0: 0a 20 20 20 20 69 66 28 20 73 74 72 63 6d 70 28 . if( strcmp(
5fb0: 7a 56 61 6c 2c 61 7a 4f 6e 5b 69 5d 29 3d 3d 30 zVal,azOn[i])==0
5fc0: 20 29 20 72 65 74 75 72 6e 20 31 3b 0a 20 20 7d ) return 1;. }
5fd0: 0a 20 20 72 65 74 75 72 6e 20 30 3b 0a 7d 0a 69 . return 0;.}.i
5fe0: 6e 74 20 69 73 5f 66 61 6c 73 65 28 63 6f 6e 73 nt is_false(cons
5ff0: 74 20 63 68 61 72 20 2a 7a 56 61 6c 29 7b 0a 20 t char *zVal){.
6000: 20 73 74 61 74 69 63 20 63 6f 6e 73 74 20 63 68 static const ch
6010: 61 72 20 2a 61 7a 4f 66 66 5b 5d 20 3d 20 7b 20 ar *azOff[] = {
6020: 22 6f 66 66 22 2c 20 22 6e 6f 22 2c 20 22 66 61 "off", "no", "fa
6030: 6c 73 65 22 2c 20 22 30 22 20 7d 3b 0a 20 20 69 lse", "0" };. i
6040: 6e 74 20 69 3b 0a 20 20 66 6f 72 28 69 3d 30 3b nt i;. for(i=0;
6050: 20 69 3c 73 69 7a 65 6f 66 28 61 7a 4f 66 66 29 i<sizeof(azOff)
6060: 2f 73 69 7a 65 6f 66 28 61 7a 4f 66 66 5b 30 5d /sizeof(azOff[0]
6070: 29 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 69 66 28 ); i++){. if(
6080: 20 73 74 72 63 6d 70 28 7a 56 61 6c 2c 61 7a 4f strcmp(zVal,azO
6090: 66 66 5b 69 5d 29 3d 3d 30 20 29 20 72 65 74 75 ff[i])==0 ) retu
60a0: 72 6e 20 31 3b 0a 20 20 7d 0a 20 20 72 65 74 75 rn 1;. }. retu
60b0: 72 6e 20 30 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 47 rn 0;.}../*.** G
60c0: 65 74 20 61 6e 64 20 73 65 74 20 76 61 6c 75 65 et and set value
60d0: 73 20 66 72 6f 6d 20 74 68 65 20 43 4f 4e 46 49 s from the CONFI
60e0: 47 2c 20 47 4c 4f 42 41 4c 5f 43 4f 4e 46 49 47 G, GLOBAL_CONFIG
60f0: 20 61 6e 64 20 56 56 41 52 20 74 61 62 6c 65 20 and VVAR table
6100: 69 6e 20 74 68 65 0a 2a 2a 20 72 65 70 6f 73 69 in the.** reposi
6110: 74 6f 72 79 20 61 6e 64 20 6c 6f 63 61 6c 20 64 tory and local d
6120: 61 74 61 62 61 73 65 73 2e 0a 2a 2f 0a 63 68 61 atabases..*/.cha
6130: 72 20 2a 64 62 5f 67 65 74 28 63 6f 6e 73 74 20 r *db_get(const
6140: 63 68 61 72 20 2a 7a 4e 61 6d 65 2c 20 63 68 61 char *zName, cha
6150: 72 20 2a 7a 44 65 66 61 75 6c 74 29 7b 0a 20 20 r *zDefault){.
6160: 63 68 61 72 20 2a 7a 20 3d 20 30 3b 0a 20 20 69 char *z = 0;. i
6170: 66 28 20 67 2e 72 65 70 6f 73 69 74 6f 72 79 4f f( g.repositoryO
6180: 70 65 6e 20 29 7b 0a 20 20 20 20 7a 20 3d 20 64 pen ){. z = d
6190: 62 5f 74 65 78 74 28 30 2c 20 22 53 45 4c 45 43 b_text(0, "SELEC
61a0: 54 20 76 61 6c 75 65 20 46 52 4f 4d 20 63 6f 6e T value FROM con
61b0: 66 69 67 20 57 48 45 52 45 20 6e 61 6d 65 3d 25 fig WHERE name=%
61c0: 51 22 2c 20 7a 4e 61 6d 65 29 3b 0a 20 20 7d 0a Q", zName);. }.
61d0: 20 20 69 66 28 20 7a 3d 3d 30 20 26 26 20 67 2e if( z==0 && g.
61e0: 63 6f 6e 66 69 67 4f 70 65 6e 20 29 7b 0a 20 20 configOpen ){.
61f0: 20 20 7a 20 3d 20 64 62 5f 74 65 78 74 28 30 2c z = db_text(0,
6200: 20 22 53 45 4c 45 43 54 20 76 61 6c 75 65 20 46 "SELECT value F
6210: 52 4f 4d 20 67 6c 6f 62 61 6c 5f 63 6f 6e 66 69 ROM global_confi
6220: 67 20 57 48 45 52 45 20 6e 61 6d 65 3d 25 51 22 g WHERE name=%Q"
6230: 2c 20 7a 4e 61 6d 65 29 3b 0a 20 20 7d 0a 20 20 , zName);. }.
6240: 69 66 28 20 7a 3d 3d 30 20 29 7b 0a 20 20 20 20 if( z==0 ){.
6250: 7a 20 3d 20 7a 44 65 66 61 75 6c 74 3b 0a 20 20 z = zDefault;.
6260: 7d 0a 20 20 72 65 74 75 72 6e 20 7a 3b 0a 7d 0a }. return z;.}.
6270: 76 6f 69 64 20 64 62 5f 73 65 74 28 63 6f 6e 73 void db_set(cons
6280: 74 20 63 68 61 72 20 2a 7a 4e 61 6d 65 2c 20 63 t char *zName, c
6290: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 56 61 6c 75 onst char *zValu
62a0: 65 2c 20 69 6e 74 20 67 6c 6f 62 61 6c 46 6c 61 e, int globalFla
62b0: 67 29 7b 0a 20 20 64 62 5f 62 65 67 69 6e 5f 74 g){. db_begin_t
62c0: 72 61 6e 73 61 63 74 69 6f 6e 28 29 3b 0a 20 20 ransaction();.
62d0: 64 62 5f 6d 75 6c 74 69 5f 65 78 65 63 28 22 52 db_multi_exec("R
62e0: 45 50 4c 41 43 45 20 49 4e 54 4f 20 25 73 63 6f EPLACE INTO %sco
62f0: 6e 66 69 67 28 6e 61 6d 65 2c 76 61 6c 75 65 29 nfig(name,value)
6300: 20 56 41 4c 55 45 53 28 25 51 2c 25 51 29 22 2c VALUES(%Q,%Q)",
6310: 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .
6320: 20 20 67 6c 6f 62 61 6c 46 6c 61 67 20 3f 20 22 globalFlag ? "
6330: 67 6c 6f 62 61 6c 5f 22 20 3a 20 22 22 2c 20 7a global_" : "", z
6340: 4e 61 6d 65 2c 20 7a 56 61 6c 75 65 29 3b 0a 20 Name, zValue);.
6350: 20 69 66 28 20 67 6c 6f 62 61 6c 46 6c 61 67 20 if( globalFlag
6360: 26 26 20 67 2e 72 65 70 6f 73 69 74 6f 72 79 4f && g.repositoryO
6370: 70 65 6e 20 29 7b 0a 20 20 20 20 64 62 5f 6d 75 pen ){. db_mu
6380: 6c 74 69 5f 65 78 65 63 28 22 44 45 4c 45 54 45 lti_exec("DELETE
6390: 20 46 52 4f 4d 20 63 6f 6e 66 69 67 20 57 48 45 FROM config WHE
63a0: 52 45 20 6e 61 6d 65 3d 25 51 22 2c 20 7a 4e 61 RE name=%Q", zNa
63b0: 6d 65 29 3b 0a 20 20 7d 0a 20 20 64 62 5f 65 6e me);. }. db_en
63c0: 64 5f 74 72 61 6e 73 61 63 74 69 6f 6e 28 30 29 d_transaction(0)
63d0: 3b 0a 7d 0a 76 6f 69 64 20 64 62 5f 75 6e 73 65 ;.}.void db_unse
63e0: 74 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 4e t(const char *zN
63f0: 61 6d 65 2c 20 69 6e 74 20 67 6c 6f 62 61 6c 46 ame, int globalF
6400: 6c 61 67 29 7b 0a 20 20 64 62 5f 62 65 67 69 6e lag){. db_begin
6410: 5f 74 72 61 6e 73 61 63 74 69 6f 6e 28 29 3b 0a _transaction();.
6420: 20 20 64 62 5f 6d 75 6c 74 69 5f 65 78 65 63 28 db_multi_exec(
6430: 22 44 45 4c 45 54 45 20 46 52 4f 4d 20 25 73 63 "DELETE FROM %sc
6440: 6f 6e 66 69 67 20 57 48 45 52 45 20 6e 61 6d 65 onfig WHERE name
6450: 3d 25 51 22 2c 0a 20 20 20 20 20 20 20 20 20 20 =%Q",.
6460: 20 20 20 20 20 20 20 67 6c 6f 62 61 6c 46 6c 61 globalFla
6470: 67 20 3f 20 22 67 6c 6f 62 61 6c 5f 22 20 3a 20 g ? "global_" :
6480: 22 22 2c 20 7a 4e 61 6d 65 29 3b 0a 20 20 69 66 "", zName);. if
6490: 28 20 67 6c 6f 62 61 6c 46 6c 61 67 20 26 26 20 ( globalFlag &&
64a0: 67 2e 72 65 70 6f 73 69 74 6f 72 79 4f 70 65 6e g.repositoryOpen
64b0: 20 29 7b 0a 20 20 20 20 64 62 5f 6d 75 6c 74 69 ){. db_multi
64c0: 5f 65 78 65 63 28 22 44 45 4c 45 54 45 20 46 52 _exec("DELETE FR
64d0: 4f 4d 20 63 6f 6e 66 69 67 20 57 48 45 52 45 20 OM config WHERE
64e0: 6e 61 6d 65 3d 25 51 22 2c 20 7a 4e 61 6d 65 29 name=%Q", zName)
64f0: 3b 0a 20 20 7d 0a 20 20 64 62 5f 65 6e 64 5f 74 ;. }. db_end_t
6500: 72 61 6e 73 61 63 74 69 6f 6e 28 30 29 3b 0a 7d ransaction(0);.}
6510: 0a 69 6e 74 20 64 62 5f 69 73 5f 67 6c 6f 62 61 .int db_is_globa
6520: 6c 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 4e l(const char *zN
6530: 61 6d 65 29 7b 0a 20 20 69 66 28 20 67 2e 63 6f ame){. if( g.co
6540: 6e 66 69 67 4f 70 65 6e 20 29 7b 0a 20 20 20 20 nfigOpen ){.
6550: 72 65 74 75 72 6e 20 64 62 5f 65 78 69 73 74 73 return db_exists
6560: 28 22 53 45 4c 45 43 54 20 31 20 46 52 4f 4d 20 ("SELECT 1 FROM
6570: 67 6c 6f 62 61 6c 5f 63 6f 6e 66 69 67 20 57 48 global_config WH
6580: 45 52 45 20 6e 61 6d 65 3d 25 51 22 2c 20 7a 4e ERE name=%Q", zN
6590: 61 6d 65 29 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 ame);. }else{.
65a0: 20 20 20 72 65 74 75 72 6e 20 30 3b 0a 20 20 7d return 0;. }
65b0: 0a 7d 0a 69 6e 74 20 64 62 5f 67 65 74 5f 69 6e .}.int db_get_in
65c0: 74 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 4e t(const char *zN
65d0: 61 6d 65 2c 20 69 6e 74 20 64 66 6c 74 29 7b 0a ame, int dflt){.
65e0: 20 20 69 6e 74 20 76 20 3d 20 64 66 6c 74 3b 0a int v = dflt;.
65f0: 20 20 69 6e 74 20 72 63 3b 0a 20 20 69 66 28 20 int rc;. if(
6600: 67 2e 72 65 70 6f 73 69 74 6f 72 79 4f 70 65 6e g.repositoryOpen
6610: 20 29 7b 0a 20 20 20 20 53 74 6d 74 20 71 3b 0a ){. Stmt q;.
6620: 20 20 20 20 64 62 5f 70 72 65 70 61 72 65 28 26 db_prepare(&
6630: 71 2c 20 22 53 45 4c 45 43 54 20 76 61 6c 75 65 q, "SELECT value
6640: 20 46 52 4f 4d 20 63 6f 6e 66 69 67 20 57 48 45 FROM config WHE
6650: 52 45 20 6e 61 6d 65 3d 25 51 22 2c 20 7a 4e 61 RE name=%Q", zNa
6660: 6d 65 29 3b 0a 20 20 20 20 72 63 20 3d 20 64 62 me);. rc = db
6670: 5f 73 74 65 70 28 26 71 29 3b 0a 20 20 20 20 69 _step(&q);. i
6680: 66 28 20 72 63 3d 3d 53 51 4c 49 54 45 5f 52 4f f( rc==SQLITE_RO
6690: 57 20 29 7b 0a 20 20 20 20 20 20 76 20 3d 20 64 W ){. v = d
66a0: 62 5f 63 6f 6c 75 6d 6e 5f 69 6e 74 28 26 71 2c b_column_int(&q,
66b0: 20 30 29 3b 0a 20 20 20 20 7d 0a 20 20 20 20 64 0);. }. d
66c0: 62 5f 66 69 6e 61 6c 69 7a 65 28 26 71 29 3b 0a b_finalize(&q);.
66d0: 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 72 63 20 }else{. rc
66e0: 3d 20 53 51 4c 49 54 45 5f 44 4f 4e 45 3b 0a 20 = SQLITE_DONE;.
66f0: 20 7d 0a 20 20 69 66 28 20 72 63 3d 3d 53 51 4c }. if( rc==SQL
6700: 49 54 45 5f 44 4f 4e 45 20 26 26 20 67 2e 63 6f ITE_DONE && g.co
6710: 6e 66 69 67 4f 70 65 6e 20 29 7b 0a 20 20 20 20 nfigOpen ){.
6720: 76 20 3d 20 64 62 5f 69 6e 74 28 64 66 6c 74 2c v = db_int(dflt,
6730: 20 22 53 45 4c 45 43 54 20 76 61 6c 75 65 20 46 "SELECT value F
6740: 52 4f 4d 20 67 6c 6f 62 61 6c 5f 63 6f 6e 66 69 ROM global_confi
6750: 67 20 57 48 45 52 45 20 6e 61 6d 65 3d 25 51 22 g WHERE name=%Q"
6760: 2c 20 7a 4e 61 6d 65 29 3b 0a 20 20 7d 0a 20 20 , zName);. }.
6770: 72 65 74 75 72 6e 20 76 3b 0a 7d 0a 76 6f 69 64 return v;.}.void
6780: 20 64 62 5f 73 65 74 5f 69 6e 74 28 63 6f 6e 73 db_set_int(cons
6790: 74 20 63 68 61 72 20 2a 7a 4e 61 6d 65 2c 20 69 t char *zName, i
67a0: 6e 74 20 76 61 6c 75 65 2c 20 69 6e 74 20 67 6c nt value, int gl
67b0: 6f 62 61 6c 46 6c 61 67 29 7b 0a 20 20 64 62 5f obalFlag){. db_
67c0: 62 65 67 69 6e 5f 74 72 61 6e 73 61 63 74 69 6f begin_transactio
67d0: 6e 28 29 3b 0a 20 20 64 62 5f 6d 75 6c 74 69 5f n();. db_multi_
67e0: 65 78 65 63 28 22 52 45 50 4c 41 43 45 20 49 4e exec("REPLACE IN
67f0: 54 4f 20 25 73 63 6f 6e 66 69 67 28 6e 61 6d 65 TO %sconfig(name
6800: 2c 76 61 6c 75 65 29 20 56 41 4c 55 45 53 28 25 ,value) VALUES(%
6810: 51 2c 25 64 29 22 2c 0a 20 20 20 20 20 20 20 20 Q,%d)",.
6820: 20 20 20 20 20 20 20 20 67 6c 6f 62 61 6c 46 6c globalFl
6830: 61 67 20 3f 20 22 67 6c 6f 62 61 6c 5f 22 20 3a ag ? "global_" :
6840: 20 22 22 2c 20 7a 4e 61 6d 65 2c 20 76 61 6c 75 "", zName, valu
6850: 65 29 3b 0a 20 20 69 66 28 20 67 6c 6f 62 61 6c e);. if( global
6860: 46 6c 61 67 20 26 26 20 67 2e 72 65 70 6f 73 69 Flag && g.reposi
6870: 74 6f 72 79 4f 70 65 6e 20 29 7b 0a 20 20 20 20 toryOpen ){.
6880: 64 62 5f 6d 75 6c 74 69 5f 65 78 65 63 28 22 44 db_multi_exec("D
6890: 45 4c 45 54 45 20 46 52 4f 4d 20 63 6f 6e 66 69 ELETE FROM confi
68a0: 67 20 57 48 45 52 45 20 6e 61 6d 65 3d 25 51 22 g WHERE name=%Q"
68b0: 2c 20 7a 4e 61 6d 65 29 3b 0a 20 20 7d 0a 20 20 , zName);. }.
68c0: 64 62 5f 65 6e 64 5f 74 72 61 6e 73 61 63 74 69 db_end_transacti
68d0: 6f 6e 28 30 29 3b 0a 7d 0a 69 6e 74 20 64 62 5f on(0);.}.int db_
68e0: 67 65 74 5f 62 6f 6f 6c 65 61 6e 28 63 6f 6e 73 get_boolean(cons
68f0: 74 20 63 68 61 72 20 2a 7a 4e 61 6d 65 2c 20 69 t char *zName, i
6900: 6e 74 20 64 66 6c 74 29 7b 0a 20 20 63 68 61 72 nt dflt){. char
6910: 20 2a 7a 56 61 6c 20 3d 20 64 62 5f 67 65 74 28 *zVal = db_get(
6920: 7a 4e 61 6d 65 2c 20 64 66 6c 74 20 3f 20 22 6f zName, dflt ? "o
6930: 6e 22 20 3a 20 22 6f 66 66 22 29 3b 0a 20 20 69 n" : "off");. i
6940: 66 28 20 69 73 5f 74 72 75 74 68 28 7a 56 61 6c f( is_truth(zVal
6950: 29 20 29 20 72 65 74 75 72 6e 20 31 3b 0a 20 20 ) ) return 1;.
6960: 69 66 28 20 69 73 5f 66 61 6c 73 65 28 7a 56 61 if( is_false(zVa
6970: 6c 29 20 29 20 72 65 74 75 72 6e 20 30 3b 0a 20 l) ) return 0;.
6980: 20 72 65 74 75 72 6e 20 64 66 6c 74 3b 0a 7d 0a return dflt;.}.
6990: 63 68 61 72 20 2a 64 62 5f 6c 67 65 74 28 63 6f char *db_lget(co
69a0: 6e 73 74 20 63 68 61 72 20 2a 7a 4e 61 6d 65 2c nst char *zName,
69b0: 20 63 68 61 72 20 2a 7a 44 65 66 61 75 6c 74 29 char *zDefault)
69c0: 7b 0a 20 20 72 65 74 75 72 6e 20 64 62 5f 74 65 {. return db_te
69d0: 78 74 28 28 63 68 61 72 2a 29 7a 44 65 66 61 75 xt((char*)zDefau
69e0: 6c 74 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 lt,.
69f0: 20 20 20 20 20 22 53 45 4c 45 43 54 20 76 61 6c "SELECT val
6a00: 75 65 20 46 52 4f 4d 20 76 76 61 72 20 57 48 45 ue FROM vvar WHE
6a10: 52 45 20 6e 61 6d 65 3d 25 51 22 2c 20 7a 4e 61 RE name=%Q", zNa
6a20: 6d 65 29 3b 0a 7d 0a 76 6f 69 64 20 64 62 5f 6c me);.}.void db_l
6a30: 73 65 74 28 63 6f 6e 73 74 20 63 68 61 72 20 2a set(const char *
6a40: 7a 4e 61 6d 65 2c 20 63 6f 6e 73 74 20 63 68 61 zName, const cha
6a50: 72 20 2a 7a 56 61 6c 75 65 29 7b 0a 20 20 64 62 r *zValue){. db
6a60: 5f 6d 75 6c 74 69 5f 65 78 65 63 28 22 52 45 50 _multi_exec("REP
6a70: 4c 41 43 45 20 49 4e 54 4f 20 76 76 61 72 28 6e LACE INTO vvar(n
6a80: 61 6d 65 2c 76 61 6c 75 65 29 20 56 41 4c 55 45 ame,value) VALUE
6a90: 53 28 25 51 2c 25 51 29 22 2c 20 7a 4e 61 6d 65 S(%Q,%Q)", zName
6aa0: 2c 20 7a 56 61 6c 75 65 29 3b 0a 7d 0a 69 6e 74 , zValue);.}.int
6ab0: 20 64 62 5f 6c 67 65 74 5f 69 6e 74 28 63 6f 6e db_lget_int(con
6ac0: 73 74 20 63 68 61 72 20 2a 7a 4e 61 6d 65 2c 20 st char *zName,
6ad0: 69 6e 74 20 64 66 6c 74 29 7b 0a 20 20 72 65 74 int dflt){. ret
6ae0: 75 72 6e 20 64 62 5f 69 6e 74 28 64 66 6c 74 2c urn db_int(dflt,
6af0: 20 22 53 45 4c 45 43 54 20 76 61 6c 75 65 20 46 "SELECT value F
6b00: 52 4f 4d 20 76 76 61 72 20 57 48 45 52 45 20 6e ROM vvar WHERE n
6b10: 61 6d 65 3d 25 51 22 2c 20 7a 4e 61 6d 65 29 3b ame=%Q", zName);
6b20: 0a 7d 0a 76 6f 69 64 20 64 62 5f 6c 73 65 74 5f .}.void db_lset_
6b30: 69 6e 74 28 63 6f 6e 73 74 20 63 68 61 72 20 2a int(const char *
6b40: 7a 4e 61 6d 65 2c 20 69 6e 74 20 76 61 6c 75 65 zName, int value
6b50: 29 7b 0a 20 20 64 62 5f 6d 75 6c 74 69 5f 65 78 ){. db_multi_ex
6b60: 65 63 28 22 52 45 50 4c 41 43 45 20 49 4e 54 4f ec("REPLACE INTO
6b70: 20 76 76 61 72 28 6e 61 6d 65 2c 76 61 6c 75 65 vvar(name,value
6b80: 29 20 56 41 4c 55 45 53 28 25 51 2c 25 64 29 22 ) VALUES(%Q,%d)"
6b90: 2c 20 7a 4e 61 6d 65 2c 20 76 61 6c 75 65 29 3b , zName, value);
6ba0: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 43 4f 4d 4d 41 4e .}../*.** COMMAN
6bb0: 44 3a 20 6f 70 65 6e 0a 2a 2a 0a 2a 2a 20 55 73 D: open.**.** Us
6bc0: 61 67 65 3a 20 6f 70 65 6e 20 46 49 4c 45 4e 41 age: open FILENA
6bd0: 4d 45 0a 2a 2a 0a 2a 2a 20 4f 70 65 6e 20 61 20 ME.**.** Open a
6be0: 63 6f 6e 6e 65 63 74 69 6f 6e 20 74 6f 20 74 68 connection to th
6bf0: 65 20 6c 6f 63 61 6c 20 72 65 70 6f 73 69 74 6f e local reposito
6c00: 72 79 20 69 6e 20 46 49 4c 45 4e 41 4d 45 2e 20 ry in FILENAME.
6c10: 20 41 20 63 68 65 63 6b 6f 75 74 0a 2a 2a 20 66 A checkout.** f
6c20: 6f 72 20 74 68 65 20 72 65 70 6f 73 69 74 6f 72 or the repositor
6c30: 79 20 69 73 20 63 72 65 61 74 65 64 20 77 69 74 y is created wit
6c40: 68 20 69 74 73 20 72 6f 6f 74 20 61 74 20 74 68 h its root at th
6c50: 65 20 77 6f 72 6b 69 6e 67 20 64 69 72 65 63 74 e working direct
6c60: 6f 72 79 2e 0a 2a 2a 20 53 65 65 20 61 6c 73 6f ory..** See also
6c70: 20 74 68 65 20 22 63 6c 6f 73 65 22 20 63 6f 6d the "close" com
6c80: 6d 61 6e 64 2e 0a 2a 2f 0a 76 6f 69 64 20 63 6d mand..*/.void cm
6c90: 64 5f 6f 70 65 6e 28 76 6f 69 64 29 7b 0a 20 20 d_open(void){.
6ca0: 42 6c 6f 62 20 70 61 74 68 3b 0a 20 20 69 6e 74 Blob path;. int
6cb0: 20 76 69 64 3b 0a 20 20 73 74 61 74 69 63 20 63 vid;. static c
6cc0: 68 61 72 20 2a 61 7a 4e 65 77 41 72 67 76 5b 5d har *azNewArgv[]
6cd0: 20 3d 20 7b 20 30 2c 20 22 75 70 64 61 74 65 22 = { 0, "update"
6ce0: 2c 20 22 2d 2d 6c 61 74 65 73 74 22 2c 20 30 20 , "--latest", 0
6cf0: 7d 3b 0a 20 20 75 72 6c 5f 70 72 6f 78 79 5f 6f };. url_proxy_o
6d00: 70 74 69 6f 6e 73 28 29 3b 0a 20 20 69 66 28 20 ptions();. if(
6d10: 67 2e 61 72 67 63 21 3d 33 20 29 7b 0a 20 20 20 g.argc!=3 ){.
6d20: 20 75 73 61 67 65 28 22 52 45 50 4f 53 49 54 4f usage("REPOSITO
6d30: 52 59 2d 46 49 4c 45 4e 41 4d 45 22 29 3b 0a 20 RY-FILENAME");.
6d40: 20 7d 0a 20 20 69 66 28 20 64 62 5f 6f 70 65 6e }. if( db_open
6d50: 5f 6c 6f 63 61 6c 28 29 20 29 7b 0a 20 20 20 20 _local() ){.
6d60: 66 6f 73 73 69 6c 5f 70 61 6e 69 63 28 22 61 6c fossil_panic("al
6d70: 72 65 61 64 79 20 77 69 74 68 69 6e 20 61 6e 20 ready within an
6d80: 6f 70 65 6e 20 74 72 65 65 20 72 6f 6f 74 65 64 open tree rooted
6d90: 20 61 74 20 25 73 22 2c 20 67 2e 7a 4c 6f 63 61 at %s", g.zLoca
6da0: 6c 52 6f 6f 74 29 3b 0a 20 20 7d 0a 20 20 66 69 lRoot);. }. fi
6db0: 6c 65 5f 63 61 6e 6f 6e 69 63 61 6c 5f 6e 61 6d le_canonical_nam
6dc0: 65 28 67 2e 61 72 67 76 5b 32 5d 2c 20 26 70 61 e(g.argv[2], &pa
6dd0: 74 68 29 3b 0a 20 20 64 62 5f 6f 70 65 6e 5f 72 th);. db_open_r
6de0: 65 70 6f 73 69 74 6f 72 79 28 62 6c 6f 62 5f 73 epository(blob_s
6df0: 74 72 28 26 70 61 74 68 29 29 3b 0a 20 20 64 62 tr(&path));. db
6e00: 5f 69 6e 69 74 5f 64 61 74 61 62 61 73 65 28 22 _init_database("
6e10: 2e 2f 5f 46 4f 53 53 49 4c 5f 22 2c 20 7a 4c 6f ./_FOSSIL_", zLo
6e20: 63 61 6c 53 63 68 65 6d 61 2c 20 28 63 68 61 72 calSchema, (char
6e30: 2a 29 30 29 3b 0a 20 20 64 62 5f 6f 70 65 6e 5f *)0);. db_open_
6e40: 6c 6f 63 61 6c 28 29 3b 0a 20 20 64 62 5f 6c 73 local();. db_ls
6e50: 65 74 28 22 72 65 70 6f 73 69 74 6f 72 79 22 2c et("repository",
6e60: 20 62 6c 6f 62 5f 73 74 72 28 26 70 61 74 68 29 blob_str(&path)
6e70: 29 3b 0a 20 20 76 69 64 20 3d 20 64 62 5f 69 6e );. vid = db_in
6e80: 74 28 30 2c 20 22 53 45 4c 45 43 54 20 70 69 64 t(0, "SELECT pid
6e90: 20 46 52 4f 4d 20 70 6c 69 6e 6b 20 79 22 0a 20 FROM plink y".
6ea0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
6eb0: 20 22 20 57 48 45 52 45 20 4e 4f 54 20 45 58 49 " WHERE NOT EXI
6ec0: 53 54 53 28 53 45 4c 45 43 54 20 31 20 46 52 4f STS(SELECT 1 FRO
6ed0: 4d 20 70 6c 69 6e 6b 20 78 20 57 48 45 52 45 20 M plink x WHERE
6ee0: 78 2e 63 69 64 3d 79 2e 70 69 64 29 22 29 3b 0a x.cid=y.pid)");.
6ef0: 20 20 69 66 28 20 76 69 64 3d 3d 30 20 29 7b 0a if( vid==0 ){.
6f00: 20 20 20 20 64 62 5f 6c 73 65 74 5f 69 6e 74 28 db_lset_int(
6f10: 22 63 68 65 63 6b 6f 75 74 22 2c 20 31 29 3b 0a "checkout", 1);.
6f20: 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 64 62 5f }else{. db_
6f30: 6c 73 65 74 5f 69 6e 74 28 22 63 68 65 63 6b 6f lset_int("checko
6f40: 75 74 22 2c 20 76 69 64 29 3b 0a 20 20 20 20 67 ut", vid);. g
6f50: 2e 61 72 67 76 20 3d 20 61 7a 4e 65 77 41 72 67 .argv = azNewArg
6f60: 76 3b 0a 20 20 20 20 67 2e 61 72 67 63 20 3d 20 v;. g.argc =
6f70: 33 3b 0a 20 20 20 20 75 70 64 61 74 65 5f 63 6d 3;. update_cm
6f80: 64 28 29 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a d();. }.}../*.*
6f90: 2a 20 50 72 69 6e 74 20 74 68 65 20 76 61 6c 75 * Print the valu
6fa0: 65 20 6f 66 20 61 20 73 65 74 74 69 6e 67 20 6e e of a setting n
6fb0: 61 6d 65 64 20 7a 4e 61 6d 65 0a 2a 2f 0a 73 74 amed zName.*/.st
6fc0: 61 74 69 63 20 76 6f 69 64 20 70 72 69 6e 74 5f atic void print_
6fd0: 73 65 74 74 69 6e 67 28 63 6f 6e 73 74 20 63 68 setting(const ch
6fe0: 61 72 20 2a 7a 4e 61 6d 65 29 7b 0a 20 20 53 74 ar *zName){. St
6ff0: 6d 74 20 71 3b 0a 20 20 69 66 28 20 67 2e 72 65 mt q;. if( g.re
7000: 70 6f 73 69 74 6f 72 79 4f 70 65 6e 20 29 7b 0a positoryOpen ){.
7010: 20 20 20 20 64 62 5f 70 72 65 70 61 72 65 28 26 db_prepare(&
7020: 71 2c 0a 20 20 20 20 20 20 20 22 53 45 4c 45 43 q,. "SELEC
7030: 54 20 27 28 6c 6f 63 61 6c 29 27 2c 20 76 61 6c T '(local)', val
7040: 75 65 20 46 52 4f 4d 20 63 6f 6e 66 69 67 20 57 ue FROM config W
7050: 48 45 52 45 20 6e 61 6d 65 3d 25 51 22 0a 20 20 HERE name=%Q".
7060: 20 20 20 20 20 22 20 55 4e 49 4f 4e 20 41 4c 4c " UNION ALL
7070: 20 22 0a 20 20 20 20 20 20 20 22 53 45 4c 45 43 ". "SELEC
7080: 54 20 27 28 67 6c 6f 62 61 6c 29 27 2c 20 76 61 T '(global)', va
7090: 6c 75 65 20 46 52 4f 4d 20 67 6c 6f 62 61 6c 5f lue FROM global_
70a0: 63 6f 6e 66 69 67 20 57 48 45 52 45 20 6e 61 6d config WHERE nam
70b0: 65 3d 25 51 22 2c 0a 20 20 20 20 20 20 20 7a 4e e=%Q",. zN
70c0: 61 6d 65 2c 20 7a 4e 61 6d 65 0a 20 20 20 20 29 ame, zName. )
70d0: 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 64 ;. }else{. d
70e0: 62 5f 70 72 65 70 61 72 65 28 26 71 2c 0a 20 20 b_prepare(&q,.
70f0: 20 20 20 20 22 53 45 4c 45 43 54 20 27 28 67 6c "SELECT '(gl
7100: 6f 62 61 6c 29 27 2c 20 76 61 6c 75 65 20 46 52 obal)', value FR
7110: 4f 4d 20 67 6c 6f 62 61 6c 5f 63 6f 6e 66 69 67 OM global_config
7120: 20 57 48 45 52 45 20 6e 61 6d 65 3d 25 51 22 2c WHERE name=%Q",
7130: 0a 20 20 20 20 20 20 7a 4e 61 6d 65 0a 20 20 20 . zName.
7140: 20 29 3b 0a 20 20 7d 0a 20 20 69 66 28 20 64 62 );. }. if( db
7150: 5f 73 74 65 70 28 26 71 29 3d 3d 53 51 4c 49 54 _step(&q)==SQLIT
7160: 45 5f 52 4f 57 20 29 7b 0a 20 20 20 20 70 72 69 E_ROW ){. pri
7170: 6e 74 66 28 22 25 2d 32 30 73 20 25 2d 38 73 20 ntf("%-20s %-8s
7180: 25 73 5c 6e 22 2c 20 7a 4e 61 6d 65 2c 20 64 62 %s\n", zName, db
7190: 5f 63 6f 6c 75 6d 6e 5f 74 65 78 74 28 26 71 2c _column_text(&q,
71a0: 20 30 29 2c 0a 20 20 20 20 20 20 20 20 64 62 5f 0),. db_
71b0: 63 6f 6c 75 6d 6e 5f 74 65 78 74 28 26 71 2c 20 column_text(&q,
71c0: 31 29 29 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 1));. }else{.
71d0: 20 20 70 72 69 6e 74 66 28 22 25 2d 32 30 73 5c printf("%-20s\
71e0: 6e 22 2c 20 7a 4e 61 6d 65 29 3b 0a 20 20 7d 0a n", zName);. }.
71f0: 20 20 64 62 5f 66 69 6e 61 6c 69 7a 65 28 26 71 db_finalize(&q
7200: 29 3b 0a 7d 0a 0a 0a 2f 2a 0a 2a 2a 20 43 4f 4d );.}.../*.** COM
7210: 4d 41 4e 44 3a 20 73 65 74 74 69 6e 67 73 0a 2a MAND: settings.*
7220: 2a 20 43 4f 4d 4d 41 4e 44 3a 20 75 6e 73 65 74 * COMMAND: unset
7230: 0a 2a 2a 20 25 66 6f 73 73 69 6c 20 73 65 74 74 .** %fossil sett
7240: 69 6e 67 20 3f 50 52 4f 50 45 52 54 59 3f 20 3f ing ?PROPERTY? ?
7250: 56 41 4c 55 45 3f 20 3f 2d 67 6c 6f 62 61 6c 3f VALUE? ?-global?
7260: 0a 2a 2a 20 25 66 6f 73 73 69 6c 20 75 6e 73 65 .** %fossil unse
7270: 74 20 50 52 4f 50 45 52 54 59 20 3f 2d 67 6c 6f t PROPERTY ?-glo
7280: 62 61 6c 3f 0a 2a 2a 0a 2a 2a 20 54 68 65 20 22 bal?.**.** The "
7290: 73 65 74 74 69 6e 67 22 20 63 6f 6d 6d 61 6e 64 setting" command
72a0: 20 77 69 74 68 20 6e 6f 20 61 72 67 75 6d 65 6e with no argumen
72b0: 74 73 20 6c 69 73 74 73 20 61 6c 6c 20 70 72 6f ts lists all pro
72c0: 70 65 72 74 69 65 73 20 61 6e 64 20 74 68 65 69 perties and thei
72d0: 72 0a 2a 2a 20 76 61 6c 75 65 73 2e 20 20 57 69 r.** values. Wi
72e0: 74 68 20 6a 75 73 74 20 61 20 70 72 6f 70 65 72 th just a proper
72f0: 74 79 20 6e 61 6d 65 20 69 74 20 73 68 6f 77 73 ty name it shows
7300: 20 74 68 65 20 76 61 6c 75 65 20 6f 66 20 74 68 the value of th
7310: 61 74 20 70 72 6f 70 65 72 74 79 2e 0a 2a 2a 20 at property..**
7320: 57 69 74 68 20 61 20 76 61 6c 75 65 20 61 72 67 With a value arg
7330: 75 6d 65 6e 74 20 69 74 20 63 68 61 6e 67 65 73 ument it changes
7340: 20 74 68 65 20 70 72 6f 70 65 72 74 79 20 66 6f the property fo
7350: 72 20 74 68 65 20 63 75 72 72 65 6e 74 20 72 65 r the current re
7360: 70 6f 73 69 74 6f 72 79 2e 0a 2a 2a 0a 2a 2a 20 pository..**.**
7370: 54 68 65 20 22 75 6e 73 65 74 22 20 63 6f 6d 6d The "unset" comm
7380: 61 6e 64 20 63 6c 65 61 72 73 20 61 20 70 72 6f and clears a pro
7390: 70 65 72 74 79 20 73 65 74 74 69 6e 67 2e 0a 2a perty setting..*
73a0: 2a 0a 2a 2a 20 20 20 20 61 75 74 6f 73 79 6e 63 *.** autosync
73b0: 20 20 20 20 20 20 20 20 20 49 66 20 65 6e 61 62 If enab
73c0: 6c 65 64 2c 20 61 75 74 6f 6d 61 74 69 63 61 6c led, automatical
73d0: 6c 79 20 70 75 6c 6c 20 70 72 69 6f 72 20 74 6f ly pull prior to
73e0: 0a 2a 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 .**
73f0: 20 20 20 20 20 20 20 20 63 6f 6d 6d 69 74 20 6f commit o
7400: 72 20 75 70 64 61 74 65 20 61 6e 64 20 61 75 74 r update and aut
7410: 6f 6d 61 74 69 63 61 6c 6c 79 20 70 75 73 68 0a omatically push.
7420: 2a 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 **
7430: 20 20 20 20 20 20 20 61 66 74 65 72 20 63 6f 6d after com
7440: 6d 69 74 20 6f 72 20 74 61 67 20 6f 72 20 62 72 mit or tag or br
7450: 61 6e 63 68 20 63 72 65 61 74 69 6f 6e 2e 0a 2a anch creation..*
7460: 2a 0a 2a 2a 20 20 20 20 64 69 66 66 2d 63 6f 6d *.** diff-com
7470: 6d 61 6e 64 20 20 20 20 20 45 78 74 65 72 6e 61 mand Externa
7480: 6c 20 63 6f 6d 6d 61 6e 64 20 74 6f 20 72 75 6e l command to run
7490: 20 77 68 65 6e 20 70 65 72 66 6f 72 6d 69 6e 67 when performing
74a0: 20 61 20 64 69 66 66 2e 0a 2a 2a 20 20 20 20 20 a diff..**
74b0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
74c0: 49 66 20 75 6e 64 65 66 69 6e 65 64 2c 20 74 68 If undefined, th
74d0: 65 20 69 6e 74 65 72 6e 61 6c 20 74 65 78 74 20 e internal text
74e0: 64 69 66 66 20 77 69 6c 6c 20 62 65 20 75 73 65 diff will be use
74f0: 64 2e 0a 2a 2a 0a 2a 2a 20 20 20 20 65 64 69 74 d..**.** edit
7500: 6f 72 20 20 20 20 20 20 20 20 20 20 20 54 65 78 or Tex
7510: 74 20 65 64 69 74 6f 72 20 63 6f 6d 6d 61 6e 64 t editor command
7520: 20 75 73 65 64 20 66 6f 72 20 63 68 65 63 6b 2d used for check-
7530: 69 6e 20 63 6f 6d 6d 65 6e 74 73 2e 0a 2a 2a 0a in comments..**.
7540: 2a 2a 20 20 20 20 67 64 69 66 66 2d 63 6f 6d 6d ** gdiff-comm
7550: 61 6e 64 20 20 20 20 45 78 74 65 72 6e 61 6c 20 and External
7560: 63 6f 6d 6d 61 6e 64 20 74 6f 20 72 75 6e 20 77 command to run w
7570: 68 65 6e 20 70 65 72 66 6f 72 6d 69 6e 67 20 61 hen performing a
7580: 20 67 72 61 70 68 69 63 61 6c 0a 2a 2a 20 20 20 graphical.**
7590: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
75a0: 20 20 64 69 66 66 2e 20 49 66 20 75 6e 64 65 66 diff. If undef
75b0: 69 6e 65 64 2c 20 74 65 78 74 20 64 69 66 66 20 ined, text diff
75c0: 77 69 6c 6c 20 62 65 20 75 73 65 64 2e 0a 2a 2a will be used..**
75d0: 0a 2a 2a 20 20 20 20 6c 6f 63 61 6c 61 75 74 68 .** localauth
75e0: 20 20 20 20 20 20 20 20 49 66 20 65 6e 61 62 6c If enabl
75f0: 65 64 2c 20 72 65 71 75 69 72 65 20 74 68 61 74 ed, require that
7600: 20 48 54 54 50 20 63 6f 6e 6e 65 63 74 69 6f 6e HTTP connection
7610: 73 20 66 72 6f 6d 0a 2a 2a 20 20 20 20 20 20 20 s from.**
7620: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 31 32 12
7630: 37 2e 30 2e 30 2e 31 20 62 65 20 61 75 74 68 65 7.0.0.1 be authe
7640: 6e 74 69 63 61 74 65 64 20 62 79 20 70 61 73 73 nticated by pass
7650: 77 6f 72 64 2e 20 20 49 66 0a 2a 2a 20 20 20 20 word. If.**
7660: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
7670: 20 66 61 6c 73 65 2c 20 61 6c 6c 20 48 54 54 50 false, all HTTP
7680: 20 72 65 71 75 65 73 74 73 20 66 72 6f 6d 20 6c requests from l
7690: 6f 63 61 6c 68 6f 73 74 20 68 61 76 65 0a 2a 2a ocalhost have.**
76a0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
76b0: 20 20 20 20 20 75 6e 72 65 73 74 72 69 63 74 65 unrestricte
76c0: 64 20 61 63 63 65 73 73 20 74 6f 20 74 68 65 20 d access to the
76d0: 72 65 70 6f 73 69 74 6f 72 79 2e 0a 2a 2a 0a 2a repository..**.*
76e0: 2a 20 20 20 20 63 6c 65 61 72 73 69 67 6e 20 20 * clearsign
76f0: 20 20 20 20 20 20 57 68 65 6e 20 65 6e 61 62 6c When enabl
7700: 65 64 20 28 74 68 65 20 64 65 66 61 75 6c 74 29 ed (the default)
7710: 2c 20 66 6f 73 73 69 6c 20 77 69 6c 6c 20 61 74 , fossil will at
7720: 74 65 6d 70 74 20 74 6f 0a 2a 2a 20 20 20 20 20 tempt to.**
7730: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
7740: 73 69 67 6e 20 61 6c 6c 20 63 6f 6d 6d 69 74 73 sign all commits
7750: 20 77 69 74 68 20 67 70 67 2e 20 20 57 68 65 6e with gpg. When
7760: 20 64 69 73 61 62 6c 65 64 2c 20 63 6f 6d 6d 69 disabled, commi
7770: 74 73 20 77 69 6c 6c 0a 2a 2a 20 20 20 20 20 20 ts will.**
7780: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 62 b
7790: 65 20 75 6e 73 69 67 6e 65 64 2e 0a 2a 2a 0a 2a e unsigned..**.*
77a0: 2a 20 20 20 20 70 67 70 2d 63 6f 6d 6d 61 6e 64 * pgp-command
77b0: 20 20 20 20 20 20 43 6f 6d 6d 61 6e 64 20 75 73 Command us
77c0: 65 64 20 74 6f 20 63 6c 65 61 72 2d 73 69 67 6e ed to clear-sign
77d0: 20 6d 61 6e 69 66 65 73 74 73 20 61 74 20 63 68 manifests at ch
77e0: 65 63 6b 2d 69 6e 2e 0a 2a 2a 20 20 20 20 20 20 eck-in..**
77f0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 54 T
7800: 68 65 20 64 65 66 61 75 6c 74 20 69 73 20 22 67 he default is "g
7810: 70 67 20 2d 2d 63 6c 65 61 72 73 69 67 6e 20 2d pg --clearsign -
7820: 6f 20 22 2e 0a 2a 2a 0a 2a 2a 20 20 20 20 70 72 o "..**.** pr
7830: 6f 78 79 20 20 20 20 20 20 20 20 20 20 20 20 55 oxy U
7840: 52 4c 20 6f 66 20 74 68 65 20 48 54 54 50 20 70 RL of the HTTP p
7850: 72 6f 78 79 2e 20 20 49 66 20 75 6e 64 65 66 69 roxy. If undefi
7860: 6e 65 64 20 6f 72 20 22 6f 66 66 22 20 74 68 65 ned or "off" the
7870: 6e 0a 2a 2a 20 20 20 20 20 20 20 20 20 20 20 20 n.**
7880: 20 20 20 20 20 20 20 20 20 74 68 65 20 22 68 74 the "ht
7890: 74 70 5f 70 72 6f 78 79 22 20 65 6e 76 69 72 6f tp_proxy" enviro
78a0: 6e 6d 65 6e 74 20 76 61 72 69 61 62 6c 65 20 69 nment variable i
78b0: 73 20 63 6f 6e 73 75 6c 74 65 64 2e 0a 2a 2a 20 s consulted..**
78c0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
78d0: 20 20 20 20 49 66 20 74 68 65 20 68 74 74 70 5f If the http_
78e0: 70 72 6f 78 79 20 65 6e 76 69 72 6f 6e 6d 65 6e proxy environmen
78f0: 74 20 76 61 72 69 61 62 6c 65 20 69 73 20 75 6e t variable is un
7900: 64 65 66 69 6e 65 64 0a 2a 2a 20 20 20 20 20 20 defined.**
7910: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 74 t
7920: 68 65 6e 20 61 20 64 69 72 65 63 74 20 48 54 54 hen a direct HTT
7930: 50 20 63 6f 6e 6e 65 63 74 69 6f 6e 20 69 73 20 P connection is
7940: 75 73 65 64 2e 0a 2a 2a 0a 2a 2a 20 20 20 20 77 used..**.** w
7950: 65 62 2d 62 72 6f 77 73 65 72 20 20 20 20 20 20 eb-browser
7960: 41 20 73 68 65 6c 6c 20 63 6f 6d 6d 61 6e 64 20 A shell command
7970: 75 73 65 64 20 74 6f 20 6c 61 75 6e 63 68 20 79 used to launch y
7980: 6f 75 72 20 70 72 65 66 65 72 72 65 64 0a 2a 2a our preferred.**
7990: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
79a0: 20 20 20 20 20 77 65 62 20 62 72 6f 77 73 65 72 web browser
79b0: 20 77 68 65 6e 20 67 69 76 65 6e 20 61 20 55 52 when given a UR
79c0: 4c 20 61 73 20 61 6e 20 61 72 67 75 6d 65 6e 74 L as an argument
79d0: 2e 0a 2a 2a 20 20 20 20 20 20 20 20 20 20 20 20 ..**
79e0: 20 20 20 20 20 20 20 20 20 44 65 66 61 75 6c 74 Default
79f0: 73 20 74 6f 20 22 73 74 61 72 74 22 20 6f 6e 20 s to "start" on
7a00: 77 69 6e 64 6f 77 73 2c 20 22 6f 70 65 6e 22 20 windows, "open"
7a10: 6f 6e 20 4d 61 63 2c 0a 2a 2a 20 20 20 20 20 20 on Mac,.**
7a20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 61 a
7a30: 6e 64 20 22 66 69 72 65 66 6f 78 22 20 6f 6e 20 nd "firefox" on
7a40: 55 6e 69 78 2e 0a 2a 2f 0a 76 6f 69 64 20 73 65 Unix..*/.void se
7a50: 74 74 69 6e 67 5f 63 6d 64 28 76 6f 69 64 29 7b tting_cmd(void){
7a60: 0a 20 20 73 74 61 74 69 63 20 63 6f 6e 73 74 20 . static const
7a70: 63 68 61 72 20 2a 61 7a 4e 61 6d 65 5b 5d 20 3d char *azName[] =
7a80: 20 7b 0a 20 20 20 20 22 61 75 74 6f 73 79 6e 63 {. "autosync
7a90: 22 2c 0a 20 20 20 20 22 64 69 66 66 2d 63 6f 6d ",. "diff-com
7aa0: 6d 61 6e 64 22 2c 0a 20 20 20 20 22 65 64 69 74 mand",. "edit
7ab0: 6f 72 22 2c 0a 20 20 20 20 22 67 64 69 66 66 2d or",. "gdiff-
7ac0: 63 6f 6d 6d 61 6e 64 22 2c 0a 20 20 20 20 22 6c command",. "l
7ad0: 6f 63 61 6c 61 75 74 68 22 2c 0a 20 20 20 20 22 ocalauth",. "
7ae0: 63 6c 65 61 72 73 69 67 6e 22 2c 0a 20 20 20 20 clearsign",.
7af0: 22 70 67 70 2d 63 6f 6d 6d 61 6e 64 22 2c 0a 20 "pgp-command",.
7b00: 20 20 20 22 70 72 6f 78 79 22 2c 0a 20 20 20 20 "proxy",.
7b10: 22 77 65 62 2d 62 72 6f 77 73 65 72 22 2c 0a 20 "web-browser",.
7b20: 20 7d 3b 0a 20 20 69 6e 74 20 69 3b 0a 20 20 69 };. int i;. i
7b30: 6e 74 20 67 6c 6f 62 61 6c 46 6c 61 67 20 3d 20 nt globalFlag =
7b40: 66 69 6e 64 5f 6f 70 74 69 6f 6e 28 22 67 6c 6f find_option("glo
7b50: 62 61 6c 22 2c 22 67 22 2c 30 29 21 3d 30 3b 0a bal","g",0)!=0;.
7b60: 20 20 69 6e 74 20 75 6e 73 65 74 46 6c 61 67 20 int unsetFlag
7b70: 3d 20 67 2e 61 72 67 76 5b 31 5d 5b 30 5d 3d 3d = g.argv[1][0]==
7b80: 27 75 27 3b 0a 20 20 64 62 5f 66 69 6e 64 5f 61 'u';. db_find_a
7b90: 6e 64 5f 6f 70 65 6e 5f 72 65 70 6f 73 69 74 6f nd_open_reposito
7ba0: 72 79 28 30 29 3b 0a 20 20 69 66 28 20 21 67 2e ry(0);. if( !g.
7bb0: 72 65 70 6f 73 69 74 6f 72 79 4f 70 65 6e 20 29 repositoryOpen )
7bc0: 7b 0a 20 20 20 20 64 62 5f 6f 70 65 6e 5f 63 6f {. db_open_co
7bd0: 6e 66 69 67 28 29 3b 0a 20 20 20 20 67 6c 6f 62 nfig();. glob
7be0: 61 6c 46 6c 61 67 20 3d 20 31 3b 0a 20 20 7d 0a alFlag = 1;. }.
7bf0: 20 20 69 66 28 20 75 6e 73 65 74 46 6c 61 67 20 if( unsetFlag
7c00: 26 26 20 67 2e 61 72 67 63 21 3d 33 20 29 7b 0a && g.argc!=3 ){.
7c10: 20 20 20 20 75 73 61 67 65 28 22 50 52 4f 50 45 usage("PROPE
7c20: 52 54 59 20 3f 2d 67 6c 6f 62 61 6c 3f 22 29 3b RTY ?-global?");
7c30: 0a 20 20 7d 0a 20 20 69 66 28 20 67 2e 61 72 67 . }. if( g.arg
7c40: 63 3d 3d 32 20 29 7b 0a 20 20 20 20 66 6f 72 28 c==2 ){. for(
7c50: 69 3d 30 3b 20 69 3c 73 69 7a 65 6f 66 28 61 7a i=0; i<sizeof(az
7c60: 4e 61 6d 65 29 2f 73 69 7a 65 6f 66 28 61 7a 4e Name)/sizeof(azN
7c70: 61 6d 65 5b 30 5d 29 3b 20 69 2b 2b 29 7b 0a 20 ame[0]); i++){.
7c80: 20 20 20 20 20 70 72 69 6e 74 5f 73 65 74 74 69 print_setti
7c90: 6e 67 28 61 7a 4e 61 6d 65 5b 69 5d 29 3b 0a 20 ng(azName[i]);.
7ca0: 20 20 20 7d 0a 20 20 7d 65 6c 73 65 20 69 66 28 }. }else if(
7cb0: 20 67 2e 61 72 67 63 3d 3d 33 20 7c 7c 20 67 2e g.argc==3 || g.
7cc0: 61 72 67 63 3d 3d 34 20 29 7b 0a 20 20 20 20 63 argc==4 ){. c
7cd0: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 4e 61 6d 65 onst char *zName
7ce0: 20 3d 20 67 2e 61 72 67 76 5b 32 5d 3b 0a 20 20 = g.argv[2];.
7cf0: 20 20 69 6e 74 20 6e 20 3d 20 73 74 72 6c 65 6e int n = strlen
7d00: 28 7a 4e 61 6d 65 29 3b 0a 20 20 20 20 66 6f 72 (zName);. for
7d10: 28 69 3d 30 3b 20 69 3c 73 69 7a 65 6f 66 28 61 (i=0; i<sizeof(a
7d20: 7a 4e 61 6d 65 29 2f 73 69 7a 65 6f 66 28 61 7a zName)/sizeof(az
7d30: 4e 61 6d 65 5b 30 5d 29 3b 20 69 2b 2b 29 7b 0a Name[0]); i++){.
7d40: 20 20 20 20 20 20 69 66 28 20 73 74 72 6e 63 6d if( strncm
7d50: 70 28 61 7a 4e 61 6d 65 5b 69 5d 2c 20 7a 4e 61 p(azName[i], zNa
7d60: 6d 65 2c 20 6e 29 3d 3d 30 20 29 20 62 72 65 61 me, n)==0 ) brea
7d70: 6b 3b 0a 20 20 20 20 7d 0a 20 20 20 20 69 66 28 k;. }. if(
7d80: 20 69 3e 3d 73 69 7a 65 6f 66 28 61 7a 4e 61 6d i>=sizeof(azNam
7d90: 65 29 2f 73 69 7a 65 6f 66 28 61 7a 4e 61 6d 65 e)/sizeof(azName
7da0: 5b 30 5d 29 20 29 7b 0a 20 20 20 20 20 20 66 6f [0]) ){. fo
7db0: 73 73 69 6c 5f 66 61 74 61 6c 28 22 6e 6f 20 73 ssil_fatal("no s
7dc0: 75 63 68 20 73 65 74 74 69 6e 67 3a 20 25 73 22 uch setting: %s"
7dd0: 2c 20 7a 4e 61 6d 65 29 3b 0a 20 20 20 20 7d 0a , zName);. }.
7de0: 20 20 20 20 69 66 28 20 75 6e 73 65 74 46 6c 61 if( unsetFla
7df0: 67 20 29 7b 0a 20 20 20 20 20 20 64 62 5f 75 6e g ){. db_un
7e00: 73 65 74 28 61 7a 4e 61 6d 65 5b 69 5d 2c 20 67 set(azName[i], g
7e10: 6c 6f 62 61 6c 46 6c 61 67 29 3b 0a 20 20 20 20 lobalFlag);.
7e20: 7d 65 6c 73 65 20 69 66 28 20 67 2e 61 72 67 63 }else if( g.argc
7e30: 3d 3d 34 20 29 7b 0a 20 20 20 20 20 20 64 62 5f ==4 ){. db_
7e40: 73 65 74 28 61 7a 4e 61 6d 65 5b 69 5d 2c 20 67 set(azName[i], g
7e50: 2e 61 72 67 76 5b 33 5d 2c 20 67 6c 6f 62 61 6c .argv[3], global
7e60: 46 6c 61 67 29 3b 0a 20 20 20 20 7d 65 6c 73 65 Flag);. }else
7e70: 7b 0a 20 20 20 20 20 20 70 72 69 6e 74 5f 73 65 {. print_se
7e80: 74 74 69 6e 67 28 61 7a 4e 61 6d 65 5b 69 5d 29 tting(azName[i])
7e90: 3b 0a 20 20 20 20 7d 0a 20 20 7d 65 6c 73 65 7b ;. }. }else{
7ea0: 0a 20 20 20 20 75 73 61 67 65 28 22 3f 50 52 4f . usage("?PRO
7eb0: 50 45 52 54 59 3f 20 3f 56 41 4c 55 45 3f 22 29 PERTY? ?VALUE?")
7ec0: 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 53 ;. }.}../*.** S
7ed0: 51 4c 20 66 75 6e 63 74 69 6f 6e 20 74 6f 20 72 QL function to r
7ee0: 65 6e 64 65 72 20 61 20 55 55 49 44 20 61 73 20 ender a UUID as
7ef0: 61 20 68 79 70 65 72 6c 69 6e 6b 20 74 6f 20 61 a hyperlink to a
7f00: 20 70 61 67 65 20 64 65 73 63 72 69 62 69 6e 67 page describing
7f10: 0a 2a 2a 20 74 68 61 74 20 55 55 49 44 2e 0a 2a .** that UUID..*
7f20: 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 68 79 /.static void hy
7f30: 70 65 72 6c 69 6e 6b 55 75 69 64 46 75 6e 63 28 perlinkUuidFunc(
7f40: 0a 20 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 . sqlite3_conte
7f50: 78 74 20 2a 70 43 78 74 2c 20 20 20 20 20 2f 2a xt *pCxt, /*
7f60: 20 66 75 6e 63 74 69 6f 6e 20 63 6f 6e 74 65 78 function contex
7f70: 74 20 2a 2f 0a 20 20 69 6e 74 20 61 72 67 63 2c t */. int argc,
7f80: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
7f90: 20 20 2f 2a 20 6e 75 6d 62 65 72 20 6f 66 20 61 /* number of a
7fa0: 72 67 75 6d 65 6e 74 73 20 74 6f 20 74 68 65 20 rguments to the
7fb0: 66 75 6e 63 74 69 6f 6e 20 2a 2f 0a 20 20 73 71 function */. sq
7fc0: 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61 72 lite3_value **ar
7fd0: 67 76 20 20 20 20 20 20 20 2f 2a 20 76 61 6c 75 gv /* valu
7fe0: 65 73 20 6f 66 20 61 6c 6c 20 66 75 6e 63 74 69 es of all functi
7ff0: 6f 6e 20 61 72 67 75 6d 65 6e 74 73 20 2a 2f 0a on arguments */.
8000: 29 7b 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 ){. const char
8010: 2a 7a 55 75 69 64 3b 20 20 20 20 20 20 20 20 20 *zUuid;
8020: 2f 2a 20 54 68 65 20 55 55 49 44 20 74 6f 20 72 /* The UUID to r
8030: 65 6e 64 65 72 20 2a 2f 0a 20 20 63 68 61 72 20 ender */. char
8040: 2a 7a 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 *z;
8050: 20 20 20 20 20 20 2f 2a 20 52 65 6e 64 65 72 65 /* Rendere
8060: 64 20 48 54 4d 4c 20 74 65 78 74 20 2a 2f 0a 0a d HTML text */..
8070: 20 20 7a 55 75 69 64 20 3d 20 28 63 6f 6e 73 74 zUuid = (const
8080: 20 63 68 61 72 2a 29 73 71 6c 69 74 65 33 5f 76 char*)sqlite3_v
8090: 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b 30 alue_text(argv[0
80a0: 5d 29 3b 0a 20 20 69 66 28 20 67 2e 6f 6b 48 69 ]);. if( g.okHi
80b0: 73 74 6f 72 79 20 26 26 20 7a 55 75 69 64 20 26 story && zUuid &
80c0: 26 20 73 74 72 6c 65 6e 28 7a 55 75 69 64 29 3e & strlen(zUuid)>
80d0: 3d 31 30 20 29 7b 0a 20 20 20 20 7a 20 3d 20 6d =10 ){. z = m
80e0: 70 72 69 6e 74 66 28 22 3c 74 74 3e 3c 61 20 68 printf("<tt><a h
80f0: 72 65 66 3d 27 25 73 2f 76 69 6e 66 6f 2f 25 74 ref='%s/vinfo/%t
8100: 27 3e 3c 73 70 61 6e 20 73 74 79 6c 65 3d 27 66 '><span style='f
8110: 6f 6e 74 2d 73 69 7a 65 3a 31 2e 35 65 6d 27 3e ont-size:1.5em'>
8120: 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ".
8130: 20 20 22 25 23 68 3c 2f 73 70 61 6e 3e 25 68 3c "%#h</span>%h<
8140: 2f 61 3e 3c 2f 74 74 3e 22 2c 0a 20 20 20 20 20 /a></tt>",.
8150: 20 20 20 20 20 20 20 20 20 20 20 67 2e 7a 42 61 g.zBa
8160: 73 65 55 52 4c 2c 20 7a 55 75 69 64 2c 20 31 30 seURL, zUuid, 10
8170: 2c 20 7a 55 75 69 64 2c 20 26 7a 55 75 69 64 5b , zUuid, &zUuid[
8180: 31 30 5d 29 3b 0a 20 20 20 20 73 71 6c 69 74 65 10]);. sqlite
8190: 33 5f 72 65 73 75 6c 74 5f 74 65 78 74 28 70 43 3_result_text(pC
81a0: 78 74 2c 20 7a 2c 20 2d 31 2c 20 66 72 65 65 29 xt, z, -1, free)
81b0: 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 73 ;. }else{. s
81c0: 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 74 65 qlite3_result_te
81d0: 78 74 28 70 43 78 74 2c 20 7a 55 75 69 64 2c 20 xt(pCxt, zUuid,
81e0: 2d 31 2c 20 53 51 4c 49 54 45 5f 54 52 41 4e 53 -1, SQLITE_TRANS
81f0: 49 45 4e 54 29 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a IENT);. }.}../*
8200: 0a 2a 2a 20 53 51 4c 20 66 75 6e 63 74 69 6f 6e .** SQL function
8210: 20 74 6f 20 72 65 6e 64 65 72 20 61 20 54 41 47 to render a TAG
8220: 49 44 20 61 73 20 61 20 68 79 70 65 72 6c 69 6e ID as a hyperlin
8230: 6b 20 74 6f 20 61 20 70 61 67 65 20 64 65 73 63 k to a page desc
8240: 72 69 62 69 6e 67 0a 2a 2a 20 74 68 61 74 20 74 ribing.** that t
8250: 61 67 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f ag..*/.static vo
8260: 69 64 20 68 79 70 65 72 6c 69 6e 6b 54 61 67 69 id hyperlinkTagi
8270: 64 46 75 6e 63 28 0a 20 20 73 71 6c 69 74 65 33 dFunc(. sqlite3
8280: 5f 63 6f 6e 74 65 78 74 20 2a 70 43 78 74 2c 20 _context *pCxt,
8290: 20 20 20 20 2f 2a 20 66 75 6e 63 74 69 6f 6e 20 /* function
82a0: 63 6f 6e 74 65 78 74 20 2a 2f 0a 20 20 69 6e 74 context */. int
82b0: 20 61 72 67 63 2c 20 20 20 20 20 20 20 20 20 20 argc,
82c0: 20 20 20 20 20 20 20 20 2f 2a 20 6e 75 6d 62 65 /* numbe
82d0: 72 20 6f 66 20 61 72 67 75 6d 65 6e 74 73 20 74 r of arguments t
82e0: 6f 20 74 68 65 20 66 75 6e 63 74 69 6f 6e 20 2a o the function *
82f0: 2f 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 /. sqlite3_valu
8300: 65 20 2a 2a 61 72 67 76 20 20 20 20 20 20 20 2f e **argv /
8310: 2a 20 76 61 6c 75 65 73 20 6f 66 20 61 6c 6c 20 * values of all
8320: 66 75 6e 63 74 69 6f 6e 20 61 72 67 75 6d 65 6e function argumen
8330: 74 73 20 2a 2f 0a 29 7b 0a 20 20 69 6e 74 20 74 ts */.){. int t
8340: 61 67 69 64 3b 20 20 20 20 20 20 20 20 20 20 20 agid;
8350: 20 20 20 20 20 20 2f 2a 20 54 68 65 20 74 61 67 /* The tag
8360: 69 64 20 74 6f 20 72 65 6e 64 65 72 20 2a 2f 0a id to render */.
8370: 20 20 63 68 61 72 20 2a 7a 3b 20 20 20 20 20 20 char *z;
8380: 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 /*
8390: 72 65 6e 64 65 72 65 64 20 68 74 6d 6c 20 74 65 rendered html te
83a0: 78 74 20 2a 2f 0a 0a 20 20 74 61 67 69 64 20 3d xt */.. tagid =
83b0: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 69 sqlite3_value_i
83c0: 6e 74 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 69 nt(argv[0]);. i
83d0: 66 28 20 67 2e 6f 6b 48 69 73 74 6f 72 79 20 29 f( g.okHistory )
83e0: 7b 0a 20 20 20 20 7a 20 3d 20 6d 70 72 69 6e 74 {. z = mprint
83f0: 66 28 22 3c 61 20 68 72 65 66 3d 27 25 73 2f 74 f("<a href='%s/t
8400: 61 67 76 69 65 77 3f 74 61 67 69 64 3d 25 64 27 agview?tagid=%d'
8410: 3e 25 64 3c 2f 61 3e 22 2c 20 0a 20 20 20 20 20 >%d</a>", .
8420: 20 20 20 20 20 20 20 20 20 20 20 20 20 67 2e 7a g.z
8430: 42 61 73 65 55 52 4c 2c 20 74 61 67 69 64 2c 20 BaseURL, tagid,
8440: 74 61 67 69 64 29 3b 0a 20 20 7d 65 6c 73 65 7b tagid);. }else{
8450: 0a 20 20 20 20 7a 20 3d 20 6d 70 72 69 6e 74 66 . z = mprintf
8460: 28 22 25 64 22 2c 20 74 61 67 69 64 29 3b 0a 20 ("%d", tagid);.
8470: 20 7d 0a 20 20 73 71 6c 69 74 65 33 5f 72 65 73 }. sqlite3_res
8480: 75 6c 74 5f 74 65 78 74 28 70 43 78 74 2c 20 7a ult_text(pCxt, z
8490: 2c 20 2d 31 2c 20 66 72 65 65 29 3b 0a 7d 0a 0a , -1, free);.}..
84a0: 2f 2a 0a 2a 2a 20 53 51 4c 20 66 75 6e 63 74 69 /*.** SQL functi
84b0: 6f 6e 20 74 6f 20 72 65 6e 64 65 72 20 61 20 54 on to render a T
84c0: 41 47 4e 41 4d 45 20 61 73 20 61 20 68 79 70 65 AGNAME as a hype
84d0: 72 6c 69 6e 6b 20 74 6f 20 61 20 70 61 67 65 20 rlink to a page
84e0: 64 65 73 63 72 69 62 69 6e 67 0a 2a 2a 20 74 68 describing.** th
84f0: 61 74 20 74 61 67 2e 0a 2a 2f 0a 73 74 61 74 69 at tag..*/.stati
8500: 63 20 76 6f 69 64 20 68 79 70 65 72 6c 69 6e 6b c void hyperlink
8510: 54 61 67 6e 61 6d 65 46 75 6e 63 28 0a 20 20 73 TagnameFunc(. s
8520: 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a qlite3_context *
8530: 70 43 78 74 2c 20 20 20 20 20 2f 2a 20 66 75 6e pCxt, /* fun
8540: 63 74 69 6f 6e 20 63 6f 6e 74 65 78 74 20 2a 2f ction context */
8550: 0a 20 20 69 6e 74 20 61 72 67 63 2c 20 20 20 20 . int argc,
8560: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a /*
8570: 20 6e 75 6d 62 65 72 20 6f 66 20 61 72 67 75 6d number of argum
8580: 65 6e 74 73 20 74 6f 20 74 68 65 20 66 75 6e 63 ents to the func
8590: 74 69 6f 6e 20 2a 2f 0a 20 20 73 71 6c 69 74 65 tion */. sqlite
85a0: 33 5f 76 61 6c 75 65 20 2a 2a 61 72 67 76 20 20 3_value **argv
85b0: 20 20 20 20 20 2f 2a 20 76 61 6c 75 65 73 20 6f /* values o
85c0: 66 20 61 6c 6c 20 66 75 6e 63 74 69 6f 6e 20 61 f all function a
85d0: 72 67 75 6d 65 6e 74 73 20 2a 2f 0a 29 7b 0a 20 rguments */.){.
85e0: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 54 61 const char *zTa
85f0: 67 3b 20 20 20 20 20 20 20 20 20 20 2f 2a 20 54 g; /* T
8600: 68 65 20 74 61 67 20 74 6f 20 72 65 6e 64 65 72 he tag to render
8610: 20 2a 2f 0a 20 20 63 68 61 72 20 2a 7a 3b 20 20 */. char *z;
8620: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
8630: 20 2f 2a 20 72 65 6e 64 65 72 65 64 20 68 74 6d /* rendered htm
8640: 6c 20 74 65 78 74 20 2a 2f 0a 0a 20 20 7a 54 61 l text */.. zTa
8650: 67 20 3d 20 28 63 6f 6e 73 74 20 63 68 61 72 2a g = (const char*
8660: 29 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 )sqlite3_value_t
8670: 65 78 74 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 ext(argv[0]);.
8680: 69 66 28 20 67 2e 6f 6b 48 69 73 74 6f 72 79 20 if( g.okHistory
8690: 29 7b 0a 20 20 20 20 7a 20 3d 20 6d 70 72 69 6e ){. z = mprin
86a0: 74 66 28 22 3c 61 20 68 72 65 66 3d 27 25 73 2f tf("<a href='%s/
86b0: 74 61 67 76 69 65 77 3f 6e 61 6d 65 3d 25 54 27 tagview?name=%T'
86c0: 3e 25 68 3c 2f 61 3e 22 2c 20 0a 20 20 20 20 20 >%h</a>", .
86d0: 20 20 20 20 20 20 20 20 20 20 20 20 20 67 2e 7a g.z
86e0: 42 61 73 65 55 52 4c 2c 20 7a 54 61 67 2c 20 7a BaseURL, zTag, z
86f0: 54 61 67 29 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 Tag);. }else{.
8700: 20 20 20 7a 20 3d 20 6d 70 72 69 6e 74 66 28 22 z = mprintf("
8710: 25 68 22 2c 20 7a 54 61 67 29 3b 0a 20 20 7d 0a %h", zTag);. }.
8720: 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 sqlite3_result
8730: 5f 74 65 78 74 28 70 43 78 74 2c 20 7a 2c 20 2d _text(pCxt, z, -
8740: 31 2c 20 66 72 65 65 29 3b 0a 7d 0a 0a 2f 2a 0a 1, free);.}../*.
8750: 2a 2a 20 53 51 4c 20 66 75 6e 63 74 69 6f 6e 20 ** SQL function
8760: 74 6f 20 65 73 63 61 70 65 20 61 6c 6c 20 63 68 to escape all ch
8770: 61 72 61 63 74 65 72 73 20 69 6e 20 61 20 73 74 aracters in a st
8780: 72 69 6e 67 20 74 68 61 74 20 68 61 76 65 20 73 ring that have s
8790: 70 65 63 69 61 6c 0a 2a 2a 20 6d 65 61 6e 69 6e pecial.** meanin
87a0: 67 20 74 6f 20 48 54 4d 4c 2e 0a 2a 2f 0a 73 74 g to HTML..*/.st
87b0: 61 74 69 63 20 76 6f 69 64 20 68 74 6d 6c 69 7a atic void htmliz
87c0: 65 46 75 6e 63 28 0a 20 20 73 71 6c 69 74 65 33 eFunc(. sqlite3
87d0: 5f 63 6f 6e 74 65 78 74 20 2a 70 43 78 74 2c 20 _context *pCxt,
87e0: 20 20 20 20 2f 2a 20 66 75 6e 63 74 69 6f 6e 20 /* function
87f0: 63 6f 6e 74 65 78 74 20 2a 2f 0a 20 20 69 6e 74 context */. int
8800: 20 61 72 67 63 2c 20 20 20 20 20 20 20 20 20 20 argc,
8810: 20 20 20 20 20 20 20 20 2f 2a 20 6e 75 6d 62 65 /* numbe
8820: 72 20 6f 66 20 61 72 67 75 6d 65 6e 74 73 20 74 r of arguments t
8830: 6f 20 74 68 65 20 66 75 6e 63 74 69 6f 6e 20 2a o the function *
8840: 2f 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 /. sqlite3_valu
8850: 65 20 2a 2a 61 72 67 76 20 20 20 20 20 20 20 2f e **argv /
8860: 2a 20 76 61 6c 75 65 73 20 6f 66 20 61 6c 6c 20 * values of all
8870: 66 75 6e 63 74 69 6f 6e 20 61 72 67 75 6d 65 6e function argumen
8880: 74 73 20 2a 2f 0a 29 7b 0a 20 20 63 6f 6e 73 74 ts */.){. const
8890: 20 63 68 61 72 20 2a 7a 54 65 78 74 3b 20 20 20 char *zText;
88a0: 20 20 20 20 20 20 2f 2a 20 54 65 78 74 20 74 6f /* Text to
88b0: 20 62 65 20 68 74 6d 6c 69 7a 65 64 20 2a 2f 0a be htmlized */.
88c0: 20 20 63 68 61 72 20 2a 7a 3b 20 20 20 20 20 20 char *z;
88d0: 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 /*
88e0: 72 65 6e 64 65 72 65 64 20 68 74 6d 6c 20 74 65 rendered html te
88f0: 78 74 20 2a 2f 0a 0a 20 20 7a 54 65 78 74 20 3d xt */.. zText =
8900: 20 28 63 6f 6e 73 74 20 63 68 61 72 2a 29 73 71 (const char*)sq
8910: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 lite3_value_text
8920: 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 7a 20 3d (argv[0]);. z =
8930: 20 68 74 6d 6c 69 7a 65 28 7a 54 65 78 74 2c 20 htmlize(zText,
8940: 2d 31 29 3b 0a 20 20 73 71 6c 69 74 65 33 5f 72 -1);. sqlite3_r
8950: 65 73 75 6c 74 5f 74 65 78 74 28 70 43 78 74 2c esult_text(pCxt,
8960: 20 7a 2c 20 2d 31 2c 20 66 72 65 65 29 3b 0a 7d z, -1, free);.}
8970: 0a 0a 2f 2a 0a 2a 2a 20 54 68 69 73 20 72 6f 75 ../*.** This rou
8980: 74 69 6e 65 20 69 73 20 61 20 68 65 6c 70 65 72 tine is a helper
8990: 20 74 6f 20 72 75 6e 20 61 6e 20 53 51 4c 20 71 to run an SQL q
89a0: 75 65 72 79 20 61 6e 64 20 74 61 62 6c 65 2d 69 uery and table-i
89b0: 7a 65 20 74 68 65 0a 2a 2a 20 72 65 73 75 6c 74 ze the.** result
89c0: 73 2e 0a 2a 2a 0a 2a 2a 20 54 68 65 20 7a 53 71 s..**.** The zSq
89d0: 6c 20 70 61 72 61 6d 65 74 65 72 20 73 68 6f 75 l parameter shou
89e0: 6c 64 20 62 65 20 61 20 73 69 6e 67 6c 65 2c 20 ld be a single,
89f0: 63 6f 6d 70 6c 65 74 65 20 53 51 4c 20 73 74 61 complete SQL sta
8a00: 74 65 6d 65 6e 74 2e 0a 2a 2a 20 54 61 62 6c 65 tement..** Table
8a10: 69 7a 65 64 20 6f 75 74 70 75 74 20 6f 66 20 74 ized output of t
8a20: 68 65 20 53 51 4c 20 73 74 61 74 65 6d 65 6e 74 he SQL statement
8a30: 20 69 73 20 72 65 6e 64 65 72 65 64 20 62 61 63 is rendered bac
8a40: 6b 20 74 6f 20 74 68 65 20 63 6c 69 65 6e 74 2e k to the client.
8a50: 0a 2a 2a 0a 2a 2a 20 54 68 65 20 69 73 53 61 66 .**.** The isSaf
8a60: 65 20 66 6c 61 67 20 69 73 20 74 72 75 65 20 69 e flag is true i
8a70: 66 20 61 6c 6c 20 71 75 65 72 79 20 72 65 73 75 f all query resu
8a80: 6c 74 73 20 68 61 76 65 20 62 65 65 6e 20 70 72 lts have been pr
8a90: 6f 63 65 73 73 65 64 20 0a 2a 2a 20 62 79 20 72 ocessed .** by r
8aa0: 6f 75 74 69 6e 65 73 20 73 75 63 68 20 61 73 0a outines such as.
8ab0: 2a 2a 0a 2a 2a 20 20 20 20 20 20 20 20 6c 69 6e **.** lin
8ac0: 6b 75 75 69 64 28 29 0a 2a 2a 20 20 20 20 20 20 kuuid().**
8ad0: 20 20 6c 69 6e 6b 74 61 67 69 64 28 29 0a 2a 2a linktagid().**
8ae0: 20 20 20 20 20 20 20 20 6c 69 6e 6b 74 61 67 6e linktagn
8af0: 61 6d 65 28 29 0a 2a 2a 20 20 20 20 20 20 20 20 ame().**
8b00: 68 74 6d 6c 69 7a 65 28 29 0a 2a 2a 0a 2a 2a 20 htmlize().**.**
8b10: 61 6e 64 20 61 72 65 20 74 68 65 72 65 66 6f 72 and are therefor
8b20: 65 20 73 61 66 65 20 66 6f 72 20 64 69 72 65 63 e safe for direc
8b30: 74 20 72 65 6e 64 65 72 69 6e 67 2e 20 20 49 66 t rendering. If
8b40: 20 69 73 53 61 66 65 20 69 73 20 66 61 6c 73 65 isSafe is false
8b50: 2c 0a 2a 2a 20 74 68 65 6e 20 61 6c 6c 20 63 68 ,.** then all ch
8b60: 61 72 61 63 74 65 72 73 20 69 6e 20 74 68 65 20 aracters in the
8b70: 71 75 65 72 79 20 72 65 73 75 6c 74 20 74 68 61 query result tha
8b80: 74 20 68 61 76 65 20 73 70 65 63 69 61 6c 20 6d t have special m
8b90: 65 61 6e 69 6e 67 0a 2a 2a 20 74 6f 20 48 54 4d eaning.** to HTM
8ba0: 4c 20 61 72 65 20 65 73 63 61 70 65 64 2e 0a 2a L are escaped..*
8bb0: 2a 0a 2a 2a 20 52 65 74 75 72 6e 73 20 53 51 4c *.** Returns SQL
8bc0: 49 54 45 5f 4f 4b 20 6f 6e 20 73 75 63 63 65 73 ITE_OK on succes
8bd0: 73 20 61 6e 64 20 61 6e 79 20 6f 74 68 65 72 20 s and any other
8be0: 76 61 6c 75 65 20 6f 6e 20 65 72 72 6f 72 2e 0a value on error..
8bf0: 2a 2f 0a 69 6e 74 20 64 62 5f 67 65 6e 65 72 69 */.int db_generi
8c00: 63 5f 71 75 65 72 79 5f 76 69 65 77 28 63 6f 6e c_query_view(con
8c10: 73 74 20 63 68 61 72 20 2a 7a 53 71 6c 2c 20 69 st char *zSql, i
8c20: 6e 74 20 69 73 53 61 66 65 29 7b 0a 20 20 73 71 nt isSafe){. sq
8c30: 6c 69 74 65 33 5f 73 74 6d 74 20 2a 70 53 74 6d lite3_stmt *pStm
8c40: 74 3b 0a 20 20 69 6e 74 20 72 63 3b 0a 20 20 69 t;. int rc;. i
8c50: 6e 74 20 6e 43 6f 6c 2c 20 69 3b 0a 20 20 69 6e nt nCol, i;. in
8c60: 74 20 6e 52 6f 77 3b 0a 20 20 63 6f 6e 73 74 20 t nRow;. const
8c70: 63 68 61 72 20 2a 7a 52 6f 77 3b 0a 20 20 73 74 char *zRow;. st
8c80: 61 74 69 63 20 69 6e 74 20 6f 6e 63 65 20 3d 20 atic int once =
8c90: 31 3b 0a 0a 20 20 2f 2a 20 49 6e 73 74 61 6c 6c 1;.. /* Install
8ca0: 20 74 68 65 20 73 70 65 63 69 61 6c 20 66 75 6e the special fun
8cb0: 63 74 69 6f 6e 73 20 6f 6e 20 74 68 65 20 66 69 ctions on the fi
8cc0: 72 73 74 20 63 61 6c 6c 20 74 6f 20 74 68 69 73 rst call to this
8cd0: 20 72 6f 75 74 69 6e 65 20 2a 2f 0a 20 20 69 66 routine */. if
8ce0: 28 20 6f 6e 63 65 20 29 7b 0a 20 20 20 20 6f 6e ( once ){. on
8cf0: 63 65 20 3d 20 30 3b 0a 20 20 20 20 73 71 6c 69 ce = 0;. sqli
8d00: 74 65 33 5f 63 72 65 61 74 65 5f 66 75 6e 63 74 te3_create_funct
8d10: 69 6f 6e 28 67 2e 64 62 2c 20 22 6c 69 6e 6b 75 ion(g.db, "linku
8d20: 75 69 64 22 2c 20 31 2c 20 53 51 4c 49 54 45 5f uid", 1, SQLITE_
8d30: 55 54 46 38 2c 20 30 2c 20 0a 20 20 20 20 20 20 UTF8, 0, .
8d40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
8d50: 20 20 20 20 20 20 68 79 70 65 72 6c 69 6e 6b 55 hyperlinkU
8d60: 75 69 64 46 75 6e 63 2c 20 30 2c 20 30 29 3b 0a uidFunc, 0, 0);.
8d70: 20 20 20 20 73 71 6c 69 74 65 33 5f 63 72 65 61 sqlite3_crea
8d80: 74 65 5f 66 75 6e 63 74 69 6f 6e 28 67 2e 64 62 te_function(g.db
8d90: 2c 20 22 6c 69 6e 6b 74 61 67 69 64 22 2c 20 31 , "linktagid", 1
8da0: 2c 20 53 51 4c 49 54 45 5f 55 54 46 38 2c 20 30 , SQLITE_UTF8, 0
8db0: 2c 20 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 , .
8dc0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 68 h
8dd0: 79 70 65 72 6c 69 6e 6b 54 61 67 69 64 46 75 6e yperlinkTagidFun
8de0: 63 2c 20 30 2c 20 30 29 3b 0a 20 20 20 20 73 71 c, 0, 0);. sq
8df0: 6c 69 74 65 33 5f 63 72 65 61 74 65 5f 66 75 6e lite3_create_fun
8e00: 63 74 69 6f 6e 28 67 2e 64 62 2c 20 22 6c 69 6e ction(g.db, "lin
8e10: 6b 74 61 67 6e 61 6d 65 22 2c 20 31 2c 20 53 51 ktagname", 1, SQ
8e20: 4c 49 54 45 5f 55 54 46 38 2c 20 30 2c 20 0a 20 LITE_UTF8, 0, .
8e30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
8e40: 20 20 20 20 20 20 20 20 20 20 20 68 79 70 65 72 hyper
8e50: 6c 69 6e 6b 54 61 67 6e 61 6d 65 46 75 6e 63 2c linkTagnameFunc,
8e60: 20 30 2c 20 30 29 3b 0a 20 20 20 20 73 71 6c 69 0, 0);. sqli
8e70: 74 65 33 5f 63 72 65 61 74 65 5f 66 75 6e 63 74 te3_create_funct
8e80: 69 6f 6e 28 67 2e 64 62 2c 20 22 68 74 6d 6c 69 ion(g.db, "htmli
8e90: 7a 65 22 2c 20 31 2c 20 53 51 4c 49 54 45 5f 55 ze", 1, SQLITE_U
8ea0: 54 46 38 2c 20 30 2c 20 0a 20 20 20 20 20 20 20 TF8, 0, .
8eb0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
8ec0: 20 20 20 20 20 68 74 6d 6c 69 7a 65 46 75 6e 63 htmlizeFunc
8ed0: 2c 20 30 2c 20 30 29 3b 0a 20 20 7d 0a 0a 20 20 , 0, 0);. }..
8ee0: 2f 2a 0a 20 20 2a 2a 20 55 73 65 20 73 71 6c 69 /*. ** Use sqli
8ef0: 74 65 33 5f 73 74 6d 74 20 64 69 72 65 63 74 6c te3_stmt directl
8f00: 79 20 72 61 74 68 65 72 20 74 68 61 6e 20 67 6f y rather than go
8f10: 69 6e 67 20 74 68 72 6f 75 67 68 20 64 62 5f 70 ing through db_p
8f20: 72 65 70 61 72 65 28 29 2c 0a 20 20 2a 2a 20 73 repare(),. ** s
8f30: 6f 20 74 68 61 74 20 77 65 20 63 61 6e 20 74 72 o that we can tr
8f40: 65 61 74 20 65 72 72 6f 72 73 20 61 20 6e 6f 6e eat errors a non
8f50: 2d 66 61 74 61 6c 2e 0a 20 20 2a 2f 0a 20 20 72 -fatal.. */. r
8f60: 63 20 3d 20 73 71 6c 69 74 65 33 5f 70 72 65 70 c = sqlite3_prep
8f70: 61 72 65 28 67 2e 64 62 2c 20 7a 53 71 6c 2c 20 are(g.db, zSql,
8f80: 2d 31 2c 20 26 70 53 74 6d 74 2c 20 30 29 3b 0a -1, &pStmt, 0);.
8f90: 20 20 69 66 28 20 53 51 4c 49 54 45 5f 4f 4b 20 if( SQLITE_OK
8fa0: 21 3d 20 72 63 20 29 7b 0a 20 20 20 20 40 20 3c != rc ){. @ <
8fb0: 73 70 61 6e 20 73 74 79 6c 65 3d 27 63 6f 6c 6f span style='colo
8fc0: 72 3a 72 65 64 27 3e 64 62 5f 67 65 6e 65 72 69 r:red'>db_generi
8fd0: 63 5f 71 75 65 72 79 5f 76 69 65 77 28 29 20 53 c_query_view() S
8fe0: 51 4c 20 65 72 72 6f 72 3a 0a 20 20 20 20 40 20 QL error:. @
8ff0: 25 68 28 73 71 6c 69 74 65 33 5f 65 72 72 6d 73 %h(sqlite3_errms
9000: 67 28 67 2e 64 62 29 29 3c 2f 73 70 61 6e 3e 0a g(g.db))</span>.
9010: 20 20 20 20 72 65 74 75 72 6e 20 72 63 3b 0a 20 return rc;.
9020: 20 7d 0a 20 20 6e 43 6f 6c 20 3d 20 73 71 6c 69 }. nCol = sqli
9030: 74 65 33 5f 63 6f 6c 75 6d 6e 5f 63 6f 75 6e 74 te3_column_count
9040: 28 70 53 74 6d 74 29 3b 0a 20 20 40 20 3c 74 61 (pStmt);. @ <ta
9050: 62 6c 65 20 63 6c 61 73 73 3d 27 66 6f 73 73 69 ble class='fossi
9060: 6c 5f 64 62 5f 67 65 6e 65 72 69 63 5f 71 75 65 l_db_generic_que
9070: 72 79 5f 76 69 65 77 27 3e 3c 74 62 6f 64 79 3e ry_view'><tbody>
9080: 0a 20 20 40 20 3c 74 72 20 63 6c 61 73 73 3d 27 . @ <tr class='
9090: 68 65 61 64 65 72 27 3e 0a 20 20 66 6f 72 28 69 header'>. for(i
90a0: 3d 30 3b 20 69 3c 6e 43 6f 6c 3b 20 2b 2b 69 29 =0; i<nCol; ++i)
90b0: 7b 0a 20 20 20 20 40 20 3c 74 64 3e 25 68 28 73 {. @ <td>%h(s
90c0: 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 6e 61 qlite3_column_na
90d0: 6d 65 28 70 53 74 6d 74 2c 69 29 29 3c 2f 74 64 me(pStmt,i))</td
90e0: 3e 0a 20 20 7d 0a 20 20 40 20 3c 2f 74 72 3e 0a >. }. @ </tr>.
90f0: 0a 20 20 6e 52 6f 77 20 3d 20 30 3b 0a 20 20 77 . nRow = 0;. w
9100: 68 69 6c 65 28 20 53 51 4c 49 54 45 5f 52 4f 57 hile( SQLITE_ROW
9110: 3d 3d 73 71 6c 69 74 65 33 5f 73 74 65 70 28 70 ==sqlite3_step(p
9120: 53 74 6d 74 29 20 29 7b 0a 20 20 20 20 63 6f 6e Stmt) ){. con
9130: 73 74 20 63 68 61 72 20 2a 61 7a 43 6c 61 73 73 st char *azClass
9140: 5b 5d 20 3d 20 7b 20 22 65 76 65 6e 22 2c 20 22 [] = { "even", "
9150: 6f 64 64 22 20 7d 3b 0a 20 20 20 20 40 20 3c 74 odd" };. @ <t
9160: 72 20 63 6c 61 73 73 3d 27 25 73 28 61 7a 43 6c r class='%s(azCl
9170: 61 73 73 5b 28 6e 52 6f 77 2b 2b 29 26 31 5d 29 ass[(nRow++)&1])
9180: 27 3e 0a 20 20 20 20 20 20 66 6f 72 28 69 3d 30 '>. for(i=0
9190: 3b 20 69 3c 6e 43 6f 6c 3b 20 69 2b 2b 29 7b 0a ; i<nCol; i++){.
91a0: 20 20 20 20 20 20 20 20 7a 52 6f 77 20 3d 20 28 zRow = (
91b0: 63 68 61 72 20 63 6f 6e 73 74 2a 29 73 71 6c 69 char const*)sqli
91c0: 74 65 33 5f 63 6f 6c 75 6d 6e 5f 74 65 78 74 28 te3_column_text(
91d0: 70 53 74 6d 74 2c 69 29 3b 0a 20 20 20 20 20 20 pStmt,i);.
91e0: 20 20 69 66 28 20 69 73 53 61 66 65 20 29 7b 0a if( isSafe ){.
91f0: 20 20 20 20 20 20 20 20 20 20 40 20 3c 74 64 3e @ <td>
9200: 25 73 28 7a 52 6f 77 29 3c 2f 74 64 3e 0a 20 20 %s(zRow)</td>.
9210: 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 }else{.
9220: 20 20 20 20 20 20 20 40 20 3c 74 64 3e 25 68 28 @ <td>%h(
9230: 7a 52 6f 77 29 3c 2f 74 64 3e 0a 20 20 20 20 20 zRow)</td>.
9240: 20 20 20 7d 0a 20 20 20 20 20 20 7d 0a 20 20 20 }. }.
9250: 20 40 20 3c 2f 74 72 3e 0a 20 20 7d 0a 20 20 40 @ </tr>. }. @
9260: 20 3c 2f 74 62 6f 64 79 3e 3c 2f 74 61 62 6c 65 </tbody></table
9270: 3e 0a 20 20 73 71 6c 69 74 65 33 5f 66 69 6e 61 >. sqlite3_fina
9280: 6c 69 7a 65 28 70 53 74 6d 74 29 3b 0a 20 20 72 lize(pStmt);. r
9290: 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b eturn SQLITE_OK;
92a0: 0a 7d 0a .}.