0000: 2f 2a 0a 2a 2a 20 32 30 30 33 20 41 70 72 69 6c /*.** 2003 April
0010: 20 36 0a 2a 2a 0a 2a 2a 20 54 68 65 20 61 75 74 6.**.** The aut
0020: 68 6f 72 20 64 69 73 63 6c 61 69 6d 73 20 63 6f hor disclaims co
0030: 70 79 72 69 67 68 74 20 74 6f 20 74 68 69 73 20 pyright to this
0040: 73 6f 75 72 63 65 20 63 6f 64 65 2e 20 20 49 6e source code. In
0050: 20 70 6c 61 63 65 20 6f 66 0a 2a 2a 20 61 20 6c place of.** a l
0060: 65 67 61 6c 20 6e 6f 74 69 63 65 2c 20 68 65 72 egal notice, her
0070: 65 20 69 73 20 61 20 62 6c 65 73 73 69 6e 67 3a e is a blessing:
0080: 0a 2a 2a 0a 2a 2a 20 20 20 20 4d 61 79 20 79 6f .**.** May yo
0090: 75 20 64 6f 20 67 6f 6f 64 20 61 6e 64 20 6e 6f u do good and no
00a0: 74 20 65 76 69 6c 2e 0a 2a 2a 20 20 20 20 4d 61 t evil..** Ma
00b0: 79 20 79 6f 75 20 66 69 6e 64 20 66 6f 72 67 69 y you find forgi
00c0: 76 65 6e 65 73 73 20 66 6f 72 20 79 6f 75 72 73 veness for yours
00d0: 65 6c 66 20 61 6e 64 20 66 6f 72 67 69 76 65 20 elf and forgive
00e0: 6f 74 68 65 72 73 2e 0a 2a 2a 20 20 20 20 4d 61 others..** Ma
00f0: 79 20 79 6f 75 20 73 68 61 72 65 20 66 72 65 65 y you share free
0100: 6c 79 2c 20 6e 65 76 65 72 20 74 61 6b 69 6e 67 ly, never taking
0110: 20 6d 6f 72 65 20 74 68 61 6e 20 79 6f 75 20 67 more than you g
0120: 69 76 65 2e 0a 2a 2a 0a 2a 2a 2a 2a 2a 2a 2a 2a ive..**.********
0130: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0140: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0150: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0160: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ****************
0170: 2a 0a 2a 2a 20 54 68 69 73 20 66 69 6c 65 20 63 *.** This file c
0180: 6f 6e 74 61 69 6e 73 20 63 6f 64 65 20 75 73 65 ontains code use
0190: 64 20 74 6f 20 69 6d 70 6c 65 6d 65 6e 74 20 74 d to implement t
01a0: 68 65 20 56 41 43 55 55 4d 20 63 6f 6d 6d 61 6e he VACUUM comman
01b0: 64 2e 0a 2a 2a 0a 2a 2a 20 4d 6f 73 74 20 6f 66 d..**.** Most of
01c0: 20 74 68 65 20 63 6f 64 65 20 69 6e 20 74 68 69 the code in thi
01d0: 73 20 66 69 6c 65 20 6d 61 79 20 62 65 20 6f 6d s file may be om
01e0: 69 74 74 65 64 20 62 79 20 64 65 66 69 6e 69 6e itted by definin
01f0: 67 20 74 68 65 0a 2a 2a 20 53 51 4c 49 54 45 5f g the.** SQLITE_
0200: 4f 4d 49 54 5f 56 41 43 55 55 4d 20 6d 61 63 72 OMIT_VACUUM macr
0210: 6f 2e 0a 2a 2a 0a 2a 2a 20 24 49 64 3a 20 76 61 o..**.** $Id: va
0220: 63 75 75 6d 2e 63 2c 76 20 31 2e 31 32 20 32 30 cuum.c,v 1.12 20
0230: 30 34 2f 30 32 2f 32 35 20 30 32 3a 33 33 3a 33 04/02/25 02:33:3
0240: 35 20 64 72 68 20 45 78 70 20 24 0a 2a 2f 0a 23 5 drh Exp $.*/.#
0250: 69 6e 63 6c 75 64 65 20 22 73 71 6c 69 74 65 49 include "sqliteI
0260: 6e 74 2e 68 22 0a 23 69 6e 63 6c 75 64 65 20 22 nt.h".#include "
0270: 6f 73 2e 68 22 0a 0a 2f 2a 0a 2a 2a 20 41 20 73 os.h"../*.** A s
0280: 74 72 75 63 74 75 72 65 20 66 6f 72 20 68 6f 6c tructure for hol
0290: 64 69 6e 67 20 61 20 64 79 6e 61 6d 69 63 20 73 ding a dynamic s
02a0: 74 72 69 6e 67 20 2d 20 61 20 73 74 72 69 6e 67 tring - a string
02b0: 20 74 68 61 74 20 63 61 6e 20 67 72 6f 77 0a 2a that can grow.*
02c0: 2a 20 77 69 74 68 6f 75 74 20 62 6f 75 6e 64 2e * without bound.
02d0: 20 0a 2a 2f 0a 74 79 70 65 64 65 66 20 73 74 72 .*/.typedef str
02e0: 75 63 74 20 64 79 6e 53 74 72 20 64 79 6e 53 74 uct dynStr dynSt
02f0: 72 3b 0a 73 74 72 75 63 74 20 64 79 6e 53 74 72 r;.struct dynStr
0300: 20 7b 0a 20 20 63 68 61 72 20 2a 7a 3b 20 20 20 {. char *z;
0310: 20 20 20 20 20 2f 2a 20 54 65 78 74 20 6f 66 20 /* Text of
0320: 74 68 65 20 73 74 72 69 6e 67 20 69 6e 20 73 70 the string in sp
0330: 61 63 65 20 6f 62 74 61 69 6e 65 64 20 66 72 6f ace obtained fro
0340: 6d 20 73 71 6c 69 74 65 4d 61 6c 6c 6f 63 28 29 m sqliteMalloc()
0350: 20 2a 2f 0a 20 20 69 6e 74 20 6e 41 6c 6c 6f 63 */. int nAlloc
0360: 3b 20 20 20 20 20 2f 2a 20 41 6d 6f 75 6e 74 20 ; /* Amount
0370: 6f 66 20 73 70 61 63 65 20 61 6c 6c 6f 63 61 74 of space allocat
0380: 65 64 20 74 6f 20 7a 5b 5d 20 2a 2f 0a 20 20 69 ed to z[] */. i
0390: 6e 74 20 6e 55 73 65 64 3b 20 20 20 20 20 20 2f nt nUsed; /
03a0: 2a 20 4e 65 78 74 20 75 6e 75 73 65 64 20 73 6c * Next unused sl
03b0: 6f 74 20 69 6e 20 7a 5b 5d 20 2a 2f 0a 7d 3b 0a ot in z[] */.};.
03c0: 0a 2f 2a 0a 2a 2a 20 41 20 73 74 72 75 63 74 75 ./*.** A structu
03d0: 72 65 20 74 68 61 74 20 68 6f 6c 64 73 20 74 68 re that holds th
03e0: 65 20 76 61 63 75 75 6d 20 63 6f 6e 74 65 78 74 e vacuum context
03f0: 0a 2a 2f 0a 74 79 70 65 64 65 66 20 73 74 72 75 .*/.typedef stru
0400: 63 74 20 76 61 63 75 75 6d 53 74 72 75 63 74 20 ct vacuumStruct
0410: 76 61 63 75 75 6d 53 74 72 75 63 74 3b 0a 73 74 vacuumStruct;.st
0420: 72 75 63 74 20 76 61 63 75 75 6d 53 74 72 75 63 ruct vacuumStruc
0430: 74 20 7b 0a 20 20 73 71 6c 69 74 65 20 2a 64 62 t {. sqlite *db
0440: 4f 6c 64 3b 20 20 20 20 20 20 20 2f 2a 20 4f 72 Old; /* Or
0450: 69 67 69 6e 61 6c 20 64 61 74 61 62 61 73 65 20 iginal database
0460: 2a 2f 0a 20 20 73 71 6c 69 74 65 20 2a 64 62 4e */. sqlite *dbN
0470: 65 77 3b 20 20 20 20 20 20 20 2f 2a 20 4e 65 77 ew; /* New
0480: 20 64 61 74 61 62 61 73 65 20 2a 2f 0a 20 20 63 database */. c
0490: 68 61 72 20 2a 2a 70 7a 45 72 72 4d 73 67 3b 20 har **pzErrMsg;
04a0: 20 20 20 20 2f 2a 20 57 72 69 74 65 20 65 72 72 /* Write err
04b0: 6f 72 73 20 68 65 72 65 20 2a 2f 0a 20 20 69 6e ors here */. in
04c0: 74 20 72 63 3b 20 20 20 20 20 20 20 20 20 20 20 t rc;
04d0: 20 20 20 2f 2a 20 53 65 74 20 74 6f 20 6e 6f 6e /* Set to non
04e0: 2d 7a 65 72 6f 20 6f 6e 20 61 6e 20 65 72 72 6f -zero on an erro
04f0: 72 20 2a 2f 0a 20 20 63 6f 6e 73 74 20 63 68 61 r */. const cha
0500: 72 20 2a 7a 54 61 62 6c 65 3b 20 20 2f 2a 20 4e r *zTable; /* N
0510: 61 6d 65 20 6f 66 20 61 20 74 61 62 6c 65 20 62 ame of a table b
0520: 65 69 6e 67 20 63 6f 70 69 65 64 20 2a 2f 0a 20 eing copied */.
0530: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 50 72 const char *zPr
0540: 61 67 6d 61 3b 20 2f 2a 20 50 72 61 67 6d 61 20 agma; /* Pragma
0550: 74 6f 20 65 78 65 63 75 74 65 20 77 69 74 68 20 to execute with
0560: 72 65 73 75 6c 74 73 20 2a 2f 0a 20 20 64 79 6e results */. dyn
0570: 53 74 72 20 73 31 2c 20 73 32 3b 20 20 20 20 20 Str s1, s2;
0580: 20 20 2f 2a 20 54 77 6f 20 64 79 6e 61 6d 69 63 /* Two dynamic
0590: 20 73 74 72 69 6e 67 73 20 2a 2f 0a 7d 3b 0a 0a strings */.};..
05a0: 23 69 66 20 21 64 65 66 69 6e 65 64 28 53 51 4c #if !defined(SQL
05b0: 49 54 45 5f 4f 4d 49 54 5f 56 41 43 55 55 4d 29 ITE_OMIT_VACUUM)
05c0: 20 7c 7c 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f || SQLITE_OMIT_
05d0: 56 41 43 55 55 4d 0a 2f 2a 0a 2a 2a 20 41 70 70 VACUUM./*.** App
05e0: 65 6e 64 20 74 65 78 74 20 74 6f 20 61 20 64 79 end text to a dy
05f0: 6e 61 6d 69 63 20 73 74 72 69 6e 67 0a 2a 2f 0a namic string.*/.
0600: 73 74 61 74 69 63 20 76 6f 69 64 20 61 70 70 65 static void appe
0610: 6e 64 54 65 78 74 28 64 79 6e 53 74 72 20 2a 70 ndText(dynStr *p
0620: 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 54 , const char *zT
0630: 65 78 74 2c 20 69 6e 74 20 6e 54 65 78 74 29 7b ext, int nText){
0640: 0a 20 20 69 66 28 20 6e 54 65 78 74 3c 30 20 29 . if( nText<0 )
0650: 20 6e 54 65 78 74 20 3d 20 73 74 72 6c 65 6e 28 nText = strlen(
0660: 7a 54 65 78 74 29 3b 0a 20 20 69 66 28 20 70 2d zText);. if( p-
0670: 3e 7a 3d 3d 30 20 7c 7c 20 70 2d 3e 6e 55 73 65 >z==0 || p->nUse
0680: 64 20 2b 20 6e 54 65 78 74 20 2b 20 31 20 3e 3d d + nText + 1 >=
0690: 20 70 2d 3e 6e 41 6c 6c 6f 63 20 29 7b 0a 20 20 p->nAlloc ){.
06a0: 20 20 63 68 61 72 20 2a 7a 4e 65 77 3b 0a 20 20 char *zNew;.
06b0: 20 20 70 2d 3e 6e 41 6c 6c 6f 63 20 3d 20 70 2d p->nAlloc = p-
06c0: 3e 6e 55 73 65 64 20 2b 20 6e 54 65 78 74 20 2b >nUsed + nText +
06d0: 20 31 30 30 30 3b 0a 20 20 20 20 7a 4e 65 77 20 1000;. zNew
06e0: 3d 20 73 71 6c 69 74 65 52 65 61 6c 6c 6f 63 28 = sqliteRealloc(
06f0: 70 2d 3e 7a 2c 20 70 2d 3e 6e 41 6c 6c 6f 63 29 p->z, p->nAlloc)
0700: 3b 0a 20 20 20 20 69 66 28 20 7a 4e 65 77 3d 3d ;. if( zNew==
0710: 30 20 29 7b 0a 20 20 20 20 20 20 73 71 6c 69 74 0 ){. sqlit
0720: 65 46 72 65 65 28 70 2d 3e 7a 29 3b 0a 20 20 20 eFree(p->z);.
0730: 20 20 20 6d 65 6d 73 65 74 28 70 2c 20 30 2c 20 memset(p, 0,
0740: 73 69 7a 65 6f 66 28 2a 70 29 29 3b 0a 20 20 20 sizeof(*p));.
0750: 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 20 20 7d return;. }
0760: 0a 20 20 20 20 70 2d 3e 7a 20 3d 20 7a 4e 65 77 . p->z = zNew
0770: 3b 0a 20 20 7d 0a 20 20 6d 65 6d 63 70 79 28 26 ;. }. memcpy(&
0780: 70 2d 3e 7a 5b 70 2d 3e 6e 55 73 65 64 5d 2c 20 p->z[p->nUsed],
0790: 7a 54 65 78 74 2c 20 6e 54 65 78 74 2b 31 29 3b zText, nText+1);
07a0: 0a 20 20 70 2d 3e 6e 55 73 65 64 20 2b 3d 20 6e . p->nUsed += n
07b0: 54 65 78 74 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 41 Text;.}../*.** A
07c0: 70 70 65 6e 64 20 74 65 78 74 20 74 6f 20 61 20 ppend text to a
07d0: 64 79 6e 61 6d 69 63 20 73 74 72 69 6e 67 2c 20 dynamic string,
07e0: 68 61 76 69 6e 67 20 66 69 72 73 74 20 70 75 74 having first put
07f0: 20 74 68 65 20 74 65 78 74 20 69 6e 20 71 75 6f the text in quo
0800: 74 65 73 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 tes..*/.static v
0810: 6f 69 64 20 61 70 70 65 6e 64 51 75 6f 74 65 64 oid appendQuoted
0820: 28 64 79 6e 53 74 72 20 2a 70 2c 20 63 6f 6e 73 (dynStr *p, cons
0830: 74 20 63 68 61 72 20 2a 7a 54 65 78 74 29 7b 0a t char *zText){.
0840: 20 20 69 6e 74 20 69 2c 20 6a 3b 0a 20 20 61 70 int i, j;. ap
0850: 70 65 6e 64 54 65 78 74 28 70 2c 20 22 27 22 2c pendText(p, "'",
0860: 20 31 29 3b 0a 20 20 66 6f 72 28 69 3d 6a 3d 30 1);. for(i=j=0
0870: 3b 20 7a 54 65 78 74 5b 69 5d 3b 20 69 2b 2b 29 ; zText[i]; i++)
0880: 7b 0a 20 20 20 20 69 66 28 20 7a 54 65 78 74 5b {. if( zText[
0890: 69 5d 3d 3d 27 5c 27 27 20 29 7b 0a 20 20 20 20 i]=='\'' ){.
08a0: 20 20 61 70 70 65 6e 64 54 65 78 74 28 70 2c 20 appendText(p,
08b0: 26 7a 54 65 78 74 5b 6a 5d 2c 20 69 2d 6a 2b 31 &zText[j], i-j+1
08c0: 29 3b 0a 20 20 20 20 20 20 6a 20 3d 20 69 20 2b );. j = i +
08d0: 20 31 3b 0a 20 20 20 20 20 20 61 70 70 65 6e 64 1;. append
08e0: 54 65 78 74 28 70 2c 20 22 27 22 2c 20 31 29 3b Text(p, "'", 1);
08f0: 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20 69 66 28 . }. }. if(
0900: 20 6a 3c 69 20 29 7b 0a 20 20 20 20 61 70 70 65 j<i ){. appe
0910: 6e 64 54 65 78 74 28 70 2c 20 26 7a 54 65 78 74 ndText(p, &zText
0920: 5b 6a 5d 2c 20 69 2d 6a 29 3b 0a 20 20 7d 0a 20 [j], i-j);. }.
0930: 20 61 70 70 65 6e 64 54 65 78 74 28 70 2c 20 22 appendText(p, "
0940: 27 22 2c 20 31 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a '", 1);.}../*.**
0950: 20 45 78 65 63 75 74 65 20 73 74 61 74 65 6d 65 Execute stateme
0960: 6e 74 73 20 6f 66 20 53 51 4c 2e 20 20 49 66 20 nts of SQL. If
0970: 61 6e 20 65 72 72 6f 72 20 6f 63 63 75 72 73 2c an error occurs,
0980: 20 77 72 69 74 65 20 74 68 65 20 65 72 72 6f 72 write the error
0990: 0a 2a 2a 20 6d 65 73 73 61 67 65 20 69 6e 74 6f .** message into
09a0: 20 2a 70 7a 45 72 72 4d 73 67 20 61 6e 64 20 72 *pzErrMsg and r
09b0: 65 74 75 72 6e 20 6e 6f 6e 2d 7a 65 72 6f 2e 0a eturn non-zero..
09c0: 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74 20 65 78 */.static int ex
09d0: 65 63 73 71 6c 28 63 68 61 72 20 2a 2a 70 7a 45 ecsql(char **pzE
09e0: 72 72 4d 73 67 2c 20 73 71 6c 69 74 65 20 2a 64 rrMsg, sqlite *d
09f0: 62 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a b, const char *z
0a00: 53 71 6c 29 7b 20 0a 20 20 63 68 61 72 20 2a 7a Sql){ . char *z
0a10: 45 72 72 4d 73 67 20 3d 20 30 3b 0a 20 20 69 6e ErrMsg = 0;. in
0a20: 74 20 72 63 3b 0a 0a 20 20 2f 2a 20 70 72 69 6e t rc;.. /* prin
0a30: 74 66 28 22 2a 2a 2a 2a 2a 20 65 78 65 63 75 74 tf("***** execut
0a40: 69 6e 67 20 2a 2a 2a 2a 2a 5c 6e 25 73 5c 6e 22 ing *****\n%s\n"
0a50: 2c 20 7a 53 71 6c 29 3b 20 2a 2f 0a 20 20 72 63 , zSql); */. rc
0a60: 20 3d 20 73 71 6c 69 74 65 5f 65 78 65 63 28 64 = sqlite_exec(d
0a70: 62 2c 20 7a 53 71 6c 2c 20 30 2c 20 30 2c 20 26 b, zSql, 0, 0, &
0a80: 7a 45 72 72 4d 73 67 29 3b 0a 20 20 69 66 28 20 zErrMsg);. if(
0a90: 7a 45 72 72 4d 73 67 20 29 7b 0a 20 20 20 20 73 zErrMsg ){. s
0aa0: 71 6c 69 74 65 53 65 74 53 74 72 69 6e 67 28 70 qliteSetString(p
0ab0: 7a 45 72 72 4d 73 67 2c 20 7a 45 72 72 4d 73 67 zErrMsg, zErrMsg
0ac0: 2c 20 28 63 68 61 72 2a 29 30 29 3b 0a 20 20 20 , (char*)0);.
0ad0: 20 73 71 6c 69 74 65 5f 66 72 65 65 6d 65 6d 28 sqlite_freemem(
0ae0: 7a 45 72 72 4d 73 67 29 3b 0a 20 20 7d 0a 20 20 zErrMsg);. }.
0af0: 72 65 74 75 72 6e 20 72 63 3b 0a 7d 0a 0a 2f 2a return rc;.}../*
0b00: 0a 2a 2a 20 54 68 69 73 20 69 73 20 74 68 65 20 .** This is the
0b10: 73 65 63 6f 6e 64 20 73 74 61 67 65 20 63 61 6c second stage cal
0b20: 6c 62 61 63 6b 2e 20 20 45 61 63 68 20 69 6e 76 lback. Each inv
0b30: 6f 63 61 74 69 6f 6e 20 63 6f 6e 74 61 69 6e 73 ocation contains
0b40: 20 61 6c 6c 20 74 68 65 0a 2a 2a 20 64 61 74 61 all the.** data
0b50: 20 66 6f 72 20 61 20 73 69 6e 67 6c 65 20 72 6f for a single ro
0b60: 77 20 6f 66 20 61 20 73 69 6e 67 6c 65 20 74 61 w of a single ta
0b70: 62 6c 65 20 69 6e 20 74 68 65 20 6f 72 69 67 69 ble in the origi
0b80: 6e 61 6c 20 64 61 74 61 62 61 73 65 2e 20 20 54 nal database. T
0b90: 68 69 73 0a 2a 2a 20 72 6f 75 74 69 6e 65 20 6d his.** routine m
0ba0: 75 73 74 20 77 72 69 74 65 20 74 68 61 74 20 69 ust write that i
0bb0: 6e 66 6f 72 6d 61 74 69 6f 6e 20 69 6e 74 6f 20 nformation into
0bc0: 74 68 65 20 6e 65 77 20 64 61 74 61 62 61 73 65 the new database
0bd0: 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74 20 ..*/.static int
0be0: 76 61 63 75 75 6d 43 61 6c 6c 62 61 63 6b 32 28 vacuumCallback2(
0bf0: 76 6f 69 64 20 2a 70 41 72 67 2c 20 69 6e 74 20 void *pArg, int
0c00: 61 72 67 63 2c 20 63 68 61 72 20 2a 2a 61 72 67 argc, char **arg
0c10: 76 2c 20 63 68 61 72 20 2a 2a 4e 6f 74 55 73 65 v, char **NotUse
0c20: 64 29 7b 0a 20 20 76 61 63 75 75 6d 53 74 72 75 d){. vacuumStru
0c30: 63 74 20 2a 70 20 3d 20 28 76 61 63 75 75 6d 53 ct *p = (vacuumS
0c40: 74 72 75 63 74 2a 29 70 41 72 67 3b 0a 20 20 63 truct*)pArg;. c
0c50: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 53 65 70 20 onst char *zSep
0c60: 3d 20 22 28 22 3b 0a 20 20 69 6e 74 20 69 3b 0a = "(";. int i;.
0c70: 0a 20 20 69 66 28 20 61 72 67 76 3d 3d 30 20 29 . if( argv==0 )
0c80: 20 72 65 74 75 72 6e 20 30 3b 0a 20 20 70 2d 3e return 0;. p->
0c90: 73 32 2e 6e 55 73 65 64 20 3d 20 30 3b 0a 20 20 s2.nUsed = 0;.
0ca0: 61 70 70 65 6e 64 54 65 78 74 28 26 70 2d 3e 73 appendText(&p->s
0cb0: 32 2c 20 22 49 4e 53 45 52 54 20 49 4e 54 4f 20 2, "INSERT INTO
0cc0: 22 2c 20 2d 31 29 3b 0a 20 20 61 70 70 65 6e 64 ", -1);. append
0cd0: 51 75 6f 74 65 64 28 26 70 2d 3e 73 32 2c 20 70 Quoted(&p->s2, p
0ce0: 2d 3e 7a 54 61 62 6c 65 29 3b 0a 20 20 61 70 70 ->zTable);. app
0cf0: 65 6e 64 54 65 78 74 28 26 70 2d 3e 73 32 2c 20 endText(&p->s2,
0d00: 22 20 56 41 4c 55 45 53 22 2c 20 2d 31 29 3b 0a " VALUES", -1);.
0d10: 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c 61 72 67 for(i=0; i<arg
0d20: 63 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 61 70 70 c; i++){. app
0d30: 65 6e 64 54 65 78 74 28 26 70 2d 3e 73 32 2c 20 endText(&p->s2,
0d40: 7a 53 65 70 2c 20 31 29 3b 0a 20 20 20 20 7a 53 zSep, 1);. zS
0d50: 65 70 20 3d 20 22 2c 22 3b 0a 20 20 20 20 69 66 ep = ",";. if
0d60: 28 20 61 72 67 76 5b 69 5d 3d 3d 30 20 29 7b 0a ( argv[i]==0 ){.
0d70: 20 20 20 20 20 20 61 70 70 65 6e 64 54 65 78 74 appendText
0d80: 28 26 70 2d 3e 73 32 2c 20 22 4e 55 4c 4c 22 2c (&p->s2, "NULL",
0d90: 20 34 29 3b 0a 20 20 20 20 7d 65 6c 73 65 7b 0a 4);. }else{.
0da0: 20 20 20 20 20 20 61 70 70 65 6e 64 51 75 6f 74 appendQuot
0db0: 65 64 28 26 70 2d 3e 73 32 2c 20 61 72 67 76 5b ed(&p->s2, argv[
0dc0: 69 5d 29 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 i]);. }. }.
0dd0: 20 61 70 70 65 6e 64 54 65 78 74 28 26 70 2d 3e appendText(&p->
0de0: 73 32 2c 22 29 22 2c 20 31 29 3b 0a 20 20 70 2d s2,")", 1);. p-
0df0: 3e 72 63 20 3d 20 65 78 65 63 73 71 6c 28 70 2d >rc = execsql(p-
0e00: 3e 70 7a 45 72 72 4d 73 67 2c 20 70 2d 3e 64 62 >pzErrMsg, p->db
0e10: 4e 65 77 2c 20 70 2d 3e 73 32 2e 7a 29 3b 0a 20 New, p->s2.z);.
0e20: 20 72 65 74 75 72 6e 20 70 2d 3e 72 63 3b 0a 7d return p->rc;.}
0e30: 0a 0a 2f 2a 0a 2a 2a 20 54 68 69 73 20 69 73 20 ../*.** This is
0e40: 74 68 65 20 66 69 72 73 74 20 73 74 61 67 65 20 the first stage
0e50: 63 61 6c 6c 62 61 63 6b 2e 20 20 45 61 63 68 20 callback. Each
0e60: 69 6e 76 6f 63 61 74 69 6f 6e 20 63 6f 6e 74 61 invocation conta
0e70: 69 6e 73 20 74 68 72 65 65 0a 2a 2a 20 61 72 67 ins three.** arg
0e80: 75 6d 65 6e 74 73 20 77 68 65 72 65 20 61 72 65 uments where are
0e90: 20 74 61 6b 65 6e 20 66 72 6f 6d 20 74 68 65 20 taken from the
0ea0: 53 51 4c 49 54 45 5f 4d 41 53 54 45 52 20 74 61 SQLITE_MASTER ta
0eb0: 62 6c 65 20 6f 66 20 74 68 65 20 6f 72 69 67 69 ble of the origi
0ec0: 6e 61 6c 0a 2a 2a 20 64 61 74 61 62 61 73 65 3a nal.** database:
0ed0: 20 20 28 31 29 20 74 68 65 20 65 6e 74 72 79 20 (1) the entry
0ee0: 74 79 70 65 2c 20 28 32 29 20 74 68 65 20 65 6e type, (2) the en
0ef0: 74 72 79 20 6e 61 6d 65 2c 20 61 6e 64 20 28 33 try name, and (3
0f00: 29 20 74 68 65 20 53 51 4c 20 66 6f 72 0a 2a 2a ) the SQL for.**
0f10: 20 74 68 65 20 65 6e 74 72 79 2e 20 20 49 6e 20 the entry. In
0f20: 61 6c 6c 20 63 61 73 65 73 2c 20 65 78 65 63 75 all cases, execu
0f30: 74 65 20 74 68 65 20 53 51 4c 20 6f 66 20 74 68 te the SQL of th
0f40: 65 20 74 68 69 72 64 20 61 72 67 75 6d 65 6e 74 e third argument
0f50: 2e 0a 2a 2a 20 46 6f 72 20 74 61 62 6c 65 73 2c ..** For tables,
0f60: 20 72 75 6e 20 61 20 71 75 65 72 79 20 74 6f 20 run a query to
0f70: 73 65 6c 65 63 74 20 61 6c 6c 20 65 6e 74 72 69 select all entri
0f80: 65 73 20 69 6e 20 74 68 61 74 20 74 61 62 6c 65 es in that table
0f90: 20 61 6e 64 20 0a 2a 2a 20 74 72 61 6e 73 66 65 and .** transfe
0fa0: 72 20 74 68 65 6d 20 74 6f 20 74 68 65 20 73 65 r them to the se
0fb0: 63 6f 6e 64 2d 73 74 61 67 65 20 63 61 6c 6c 62 cond-stage callb
0fc0: 61 63 6b 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 69 ack..*/.static i
0fd0: 6e 74 20 76 61 63 75 75 6d 43 61 6c 6c 62 61 63 nt vacuumCallbac
0fe0: 6b 31 28 76 6f 69 64 20 2a 70 41 72 67 2c 20 69 k1(void *pArg, i
0ff0: 6e 74 20 61 72 67 63 2c 20 63 68 61 72 20 2a 2a nt argc, char **
1000: 61 72 67 76 2c 20 63 68 61 72 20 2a 2a 4e 6f 74 argv, char **Not
1010: 55 73 65 64 29 7b 0a 20 20 76 61 63 75 75 6d 53 Used){. vacuumS
1020: 74 72 75 63 74 20 2a 70 20 3d 20 28 76 61 63 75 truct *p = (vacu
1030: 75 6d 53 74 72 75 63 74 2a 29 70 41 72 67 3b 0a umStruct*)pArg;.
1040: 20 20 69 6e 74 20 72 63 20 3d 20 30 3b 0a 20 20 int rc = 0;.
1050: 61 73 73 65 72 74 28 20 61 72 67 63 3d 3d 33 20 assert( argc==3
1060: 29 3b 0a 20 20 69 66 28 20 61 72 67 76 3d 3d 30 );. if( argv==0
1070: 20 29 20 72 65 74 75 72 6e 20 30 3b 0a 20 20 61 ) return 0;. a
1080: 73 73 65 72 74 28 20 61 72 67 76 5b 30 5d 21 3d ssert( argv[0]!=
1090: 30 20 29 3b 0a 20 20 61 73 73 65 72 74 28 20 61 0 );. assert( a
10a0: 72 67 76 5b 31 5d 21 3d 30 20 29 3b 0a 20 20 61 rgv[1]!=0 );. a
10b0: 73 73 65 72 74 28 20 61 72 67 76 5b 32 5d 21 3d ssert( argv[2]!=
10c0: 30 20 29 3b 0a 20 20 72 63 20 3d 20 65 78 65 63 0 );. rc = exec
10d0: 73 71 6c 28 70 2d 3e 70 7a 45 72 72 4d 73 67 2c sql(p->pzErrMsg,
10e0: 20 70 2d 3e 64 62 4e 65 77 2c 20 61 72 67 76 5b p->dbNew, argv[
10f0: 32 5d 29 3b 0a 20 20 69 66 28 20 72 63 3d 3d 53 2]);. if( rc==S
1100: 51 4c 49 54 45 5f 4f 4b 20 26 26 20 73 74 72 63 QLITE_OK && strc
1110: 6d 70 28 61 72 67 76 5b 30 5d 2c 22 74 61 62 6c mp(argv[0],"tabl
1120: 65 22 29 3d 3d 30 20 29 7b 0a 20 20 20 20 63 68 e")==0 ){. ch
1130: 61 72 20 2a 7a 45 72 72 4d 73 67 20 3d 20 30 3b ar *zErrMsg = 0;
1140: 0a 20 20 20 20 70 2d 3e 73 31 2e 6e 55 73 65 64 . p->s1.nUsed
1150: 20 3d 20 30 3b 0a 20 20 20 20 61 70 70 65 6e 64 = 0;. append
1160: 54 65 78 74 28 26 70 2d 3e 73 31 2c 20 22 53 45 Text(&p->s1, "SE
1170: 4c 45 43 54 20 2a 20 46 52 4f 4d 20 22 2c 20 2d LECT * FROM ", -
1180: 31 29 3b 0a 20 20 20 20 61 70 70 65 6e 64 51 75 1);. appendQu
1190: 6f 74 65 64 28 26 70 2d 3e 73 31 2c 20 61 72 67 oted(&p->s1, arg
11a0: 76 5b 31 5d 29 3b 0a 20 20 20 20 70 2d 3e 7a 54 v[1]);. p->zT
11b0: 61 62 6c 65 20 3d 20 61 72 67 76 5b 31 5d 3b 0a able = argv[1];.
11c0: 20 20 20 20 72 63 20 3d 20 73 71 6c 69 74 65 5f rc = sqlite_
11d0: 65 78 65 63 28 70 2d 3e 64 62 4f 6c 64 2c 20 70 exec(p->dbOld, p
11e0: 2d 3e 73 31 2e 7a 2c 20 76 61 63 75 75 6d 43 61 ->s1.z, vacuumCa
11f0: 6c 6c 62 61 63 6b 32 2c 20 70 2c 20 26 7a 45 72 llback2, p, &zEr
1200: 72 4d 73 67 29 3b 0a 20 20 20 20 69 66 28 20 7a rMsg);. if( z
1210: 45 72 72 4d 73 67 20 29 7b 0a 20 20 20 20 20 20 ErrMsg ){.
1220: 73 71 6c 69 74 65 53 65 74 53 74 72 69 6e 67 28 sqliteSetString(
1230: 70 2d 3e 70 7a 45 72 72 4d 73 67 2c 20 7a 45 72 p->pzErrMsg, zEr
1240: 72 4d 73 67 2c 20 28 63 68 61 72 2a 29 30 29 3b rMsg, (char*)0);
1250: 0a 20 20 20 20 20 20 73 71 6c 69 74 65 5f 66 72 . sqlite_fr
1260: 65 65 6d 65 6d 28 7a 45 72 72 4d 73 67 29 3b 0a eemem(zErrMsg);.
1270: 20 20 20 20 7d 0a 20 20 7d 0a 20 20 69 66 28 20 }. }. if(
1280: 72 63 21 3d 53 51 4c 49 54 45 5f 41 42 4f 52 54 rc!=SQLITE_ABORT
1290: 20 29 20 70 2d 3e 72 63 20 3d 20 72 63 3b 0a 20 ) p->rc = rc;.
12a0: 20 72 65 74 75 72 6e 20 72 63 3b 0a 7d 0a 0a 2f return rc;.}../
12b0: 2a 0a 2a 2a 20 54 68 69 73 20 63 61 6c 6c 62 61 *.** This callba
12c0: 63 6b 20 69 73 20 75 73 65 64 20 74 6f 20 74 72 ck is used to tr
12d0: 61 6e 73 66 65 72 20 50 52 41 47 4d 41 20 73 65 ansfer PRAGMA se
12e0: 74 74 69 6e 67 73 20 66 72 6f 6d 20 6f 6e 65 20 ttings from one
12f0: 64 61 74 61 62 61 73 65 0a 2a 2a 20 74 6f 20 74 database.** to t
1300: 68 65 20 6f 74 68 65 72 2e 20 20 54 68 65 20 76 he other. The v
1310: 61 6c 75 65 20 69 6e 20 61 72 67 76 5b 30 5d 20 alue in argv[0]
1320: 73 68 6f 75 6c 64 20 62 65 20 70 61 73 73 65 64 should be passed
1330: 20 74 6f 20 61 20 70 72 61 67 6d 61 0a 2a 2a 20 to a pragma.**
1340: 69 64 65 6e 74 69 66 69 65 64 20 62 79 20 28 28 identified by ((
1350: 76 61 63 75 75 6d 53 74 72 75 63 74 2a 29 70 41 vacuumStruct*)pA
1360: 72 67 29 2d 3e 7a 50 72 61 67 6d 61 2e 0a 2a 2f rg)->zPragma..*/
1370: 0a 73 74 61 74 69 63 20 69 6e 74 20 76 61 63 75 .static int vacu
1380: 75 6d 43 61 6c 6c 62 61 63 6b 33 28 76 6f 69 64 umCallback3(void
1390: 20 2a 70 41 72 67 2c 20 69 6e 74 20 61 72 67 63 *pArg, int argc
13a0: 2c 20 63 68 61 72 20 2a 2a 61 72 67 76 2c 20 63 , char **argv, c
13b0: 68 61 72 20 2a 2a 4e 6f 74 55 73 65 64 29 7b 0a har **NotUsed){.
13c0: 20 20 76 61 63 75 75 6d 53 74 72 75 63 74 20 2a vacuumStruct *
13d0: 70 20 3d 20 28 76 61 63 75 75 6d 53 74 72 75 63 p = (vacuumStruc
13e0: 74 2a 29 70 41 72 67 3b 0a 20 20 63 68 61 72 20 t*)pArg;. char
13f0: 7a 42 75 66 5b 32 30 30 5d 3b 0a 20 20 61 73 73 zBuf[200];. ass
1400: 65 72 74 28 20 61 72 67 63 3d 3d 31 20 29 3b 0a ert( argc==1 );.
1410: 20 20 69 66 28 20 61 72 67 76 3d 3d 30 20 29 20 if( argv==0 )
1420: 72 65 74 75 72 6e 20 30 3b 0a 20 20 61 73 73 65 return 0;. asse
1430: 72 74 28 20 61 72 67 76 5b 30 5d 21 3d 30 20 29 rt( argv[0]!=0 )
1440: 3b 0a 20 20 61 73 73 65 72 74 28 20 73 74 72 6c ;. assert( strl
1450: 65 6e 28 70 2d 3e 7a 50 72 61 67 6d 61 29 3c 31 en(p->zPragma)<1
1460: 30 30 20 29 3b 0a 20 20 61 73 73 65 72 74 28 20 00 );. assert(
1470: 73 74 72 6c 65 6e 28 61 72 67 76 5b 30 5d 29 3c strlen(argv[0])<
1480: 33 30 20 29 3b 0a 20 20 73 70 72 69 6e 74 66 28 30 );. sprintf(
1490: 7a 42 75 66 2c 22 50 52 41 47 4d 41 20 25 73 3d zBuf,"PRAGMA %s=
14a0: 25 73 3b 22 2c 20 70 2d 3e 7a 50 72 61 67 6d 61 %s;", p->zPragma
14b0: 2c 20 61 72 67 76 5b 30 5d 29 3b 0a 20 20 70 2d , argv[0]);. p-
14c0: 3e 72 63 20 3d 20 65 78 65 63 73 71 6c 28 70 2d >rc = execsql(p-
14d0: 3e 70 7a 45 72 72 4d 73 67 2c 20 70 2d 3e 64 62 >pzErrMsg, p->db
14e0: 4e 65 77 2c 20 7a 42 75 66 29 3b 0a 20 20 72 65 New, zBuf);. re
14f0: 74 75 72 6e 20 70 2d 3e 72 63 3b 0a 7d 0a 0a 2f turn p->rc;.}../
1500: 2a 0a 2a 2a 20 47 65 6e 65 72 61 74 65 20 61 20 *.** Generate a
1510: 72 61 6e 64 6f 6d 20 6e 61 6d 65 20 6f 66 20 32 random name of 2
1520: 30 20 63 68 61 72 61 63 74 65 72 20 69 6e 20 6c 0 character in l
1530: 65 6e 67 74 68 2e 0a 2a 2f 0a 73 74 61 74 69 63 ength..*/.static
1540: 20 76 6f 69 64 20 72 61 6e 64 6f 6d 4e 61 6d 65 void randomName
1550: 28 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a (unsigned char *
1560: 7a 42 75 66 29 7b 0a 20 20 73 74 61 74 69 63 20 zBuf){. static
1570: 63 6f 6e 73 74 20 75 6e 73 69 67 6e 65 64 20 63 const unsigned c
1580: 68 61 72 20 7a 43 68 61 72 73 5b 5d 20 3d 0a 20 har zChars[] =.
1590: 20 20 20 22 61 62 63 64 65 66 67 68 69 6a 6b 6c "abcdefghijkl
15a0: 6d 6e 6f 70 71 72 73 74 75 76 77 78 79 7a 22 0a mnopqrstuvwxyz".
15b0: 20 20 20 20 22 30 31 32 33 34 35 36 37 38 39 22 "0123456789"
15c0: 3b 0a 20 20 69 6e 74 20 69 3b 0a 20 20 73 71 6c ;. int i;. sql
15d0: 69 74 65 52 61 6e 64 6f 6d 6e 65 73 73 28 32 30 iteRandomness(20
15e0: 2c 20 7a 42 75 66 29 3b 0a 20 20 66 6f 72 28 69 , zBuf);. for(i
15f0: 3d 30 3b 20 69 3c 32 30 3b 20 69 2b 2b 29 7b 0a =0; i<20; i++){.
1600: 20 20 20 20 7a 42 75 66 5b 69 5d 20 3d 20 7a 43 zBuf[i] = zC
1610: 68 61 72 73 5b 20 7a 42 75 66 5b 69 5d 25 28 73 hars[ zBuf[i]%(s
1620: 69 7a 65 6f 66 28 7a 43 68 61 72 73 29 2d 31 29 izeof(zChars)-1)
1630: 20 5d 3b 0a 20 20 7d 0a 7d 0a 23 65 6e 64 69 66 ];. }.}.#endif
1640: 0a 0a 2f 2a 0a 2a 2a 20 54 68 65 20 6e 6f 6e 2d ../*.** The non-
1650: 73 74 61 6e 64 61 72 64 20 56 41 43 55 55 4d 20 standard VACUUM
1660: 63 6f 6d 6d 61 6e 64 20 69 73 20 75 73 65 64 20 command is used
1670: 74 6f 20 63 6c 65 61 6e 20 75 70 20 74 68 65 20 to clean up the
1680: 64 61 74 61 62 61 73 65 2c 0a 2a 2a 20 63 6f 6c database,.** col
1690: 6c 61 70 73 65 20 66 72 65 65 20 73 70 61 63 65 lapse free space
16a0: 2c 20 65 74 63 2e 20 20 49 74 20 69 73 20 6d 6f , etc. It is mo
16b0: 64 65 6c 6c 65 64 20 61 66 74 65 72 20 74 68 65 delled after the
16c0: 20 56 41 43 55 55 4d 20 63 6f 6d 6d 61 6e 64 0a VACUUM command.
16d0: 2a 2a 20 69 6e 20 50 6f 73 74 67 72 65 53 51 4c ** in PostgreSQL
16e0: 2e 0a 2a 2a 0a 2a 2a 20 49 6e 20 76 65 72 73 69 ..**.** In versi
16f0: 6f 6e 20 31 2e 30 2e 78 20 6f 66 20 53 51 4c 69 on 1.0.x of SQLi
1700: 74 65 2c 20 74 68 65 20 56 41 43 55 55 4d 20 63 te, the VACUUM c
1710: 6f 6d 6d 61 6e 64 20 77 6f 75 6c 64 20 63 61 6c ommand would cal
1720: 6c 0a 2a 2a 20 67 64 62 6d 5f 72 65 6f 72 67 61 l.** gdbm_reorga
1730: 6e 69 7a 65 28 29 20 6f 6e 20 61 6c 6c 20 74 68 nize() on all th
1740: 65 20 64 61 74 61 62 61 73 65 20 74 61 62 6c 65 e database table
1750: 73 2e 20 20 42 75 74 20 62 65 67 69 6e 6e 69 6e s. But beginnin
1760: 67 0a 2a 2a 20 77 69 74 68 20 32 2e 30 2e 30 2c g.** with 2.0.0,
1770: 20 53 51 4c 69 74 65 20 6e 6f 20 6c 6f 6e 67 65 SQLite no longe
1780: 72 20 75 73 65 73 20 47 44 42 4d 20 73 6f 20 74 r uses GDBM so t
1790: 68 69 73 20 63 6f 6d 6d 61 6e 64 20 68 61 73 0a his command has.
17a0: 2a 2a 20 62 65 63 6f 6d 65 20 61 20 6e 6f 2d 6f ** become a no-o
17b0: 70 2e 0a 2a 2f 0a 76 6f 69 64 20 73 71 6c 69 74 p..*/.void sqlit
17c0: 65 56 61 63 75 75 6d 28 50 61 72 73 65 20 2a 70 eVacuum(Parse *p
17d0: 50 61 72 73 65 2c 20 54 6f 6b 65 6e 20 2a 70 54 Parse, Token *pT
17e0: 61 62 6c 65 4e 61 6d 65 29 7b 0a 20 20 56 64 62 ableName){. Vdb
17f0: 65 20 2a 76 20 3d 20 73 71 6c 69 74 65 47 65 74 e *v = sqliteGet
1800: 56 64 62 65 28 70 50 61 72 73 65 29 3b 0a 20 20 Vdbe(pParse);.
1810: 73 71 6c 69 74 65 56 64 62 65 41 64 64 4f 70 28 sqliteVdbeAddOp(
1820: 76 2c 20 4f 50 5f 56 61 63 75 75 6d 2c 20 30 2c v, OP_Vacuum, 0,
1830: 20 30 29 3b 0a 20 20 72 65 74 75 72 6e 3b 0a 7d 0);. return;.}
1840: 0a 0a 2f 2a 0a 2a 2a 20 54 68 69 73 20 72 6f 75 ../*.** This rou
1850: 74 69 6e 65 20 69 6d 70 6c 65 6d 65 6e 74 73 20 tine implements
1860: 74 68 65 20 4f 50 5f 56 61 63 75 75 6d 20 6f 70 the OP_Vacuum op
1870: 63 6f 64 65 20 6f 66 20 74 68 65 20 56 44 42 45 code of the VDBE
1880: 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 52 ..*/.int sqliteR
1890: 75 6e 56 61 63 75 75 6d 28 63 68 61 72 20 2a 2a unVacuum(char **
18a0: 70 7a 45 72 72 4d 73 67 2c 20 73 71 6c 69 74 65 pzErrMsg, sqlite
18b0: 20 2a 64 62 29 7b 0a 23 69 66 20 21 64 65 66 69 *db){.#if !defi
18c0: 6e 65 64 28 53 51 4c 49 54 45 5f 4f 4d 49 54 5f ned(SQLITE_OMIT_
18d0: 56 41 43 55 55 4d 29 20 7c 7c 20 53 51 4c 49 54 VACUUM) || SQLIT
18e0: 45 5f 4f 4d 49 54 5f 56 41 43 55 55 4d 0a 20 20 E_OMIT_VACUUM.
18f0: 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 46 69 6c const char *zFil
1900: 65 6e 61 6d 65 3b 20 20 2f 2a 20 66 75 6c 6c 20 ename; /* full
1910: 70 61 74 68 6e 61 6d 65 20 6f 66 20 74 68 65 20 pathname of the
1920: 64 61 74 61 62 61 73 65 20 66 69 6c 65 20 2a 2f database file */
1930: 0a 20 20 69 6e 74 20 6e 46 69 6c 65 6e 61 6d 65 . int nFilename
1940: 3b 20 20 20 20 20 20 20 20 20 20 2f 2a 20 6e 75 ; /* nu
1950: 6d 62 65 72 20 6f 66 20 63 68 61 72 61 63 74 65 mber of characte
1960: 72 73 20 20 69 6e 20 7a 46 69 6c 65 6e 61 6d 65 rs in zFilename
1970: 5b 5d 20 2a 2f 0a 20 20 63 68 61 72 20 2a 7a 54 [] */. char *zT
1980: 65 6d 70 20 3d 20 30 3b 20 20 20 20 20 20 20 20 emp = 0;
1990: 2f 2a 20 61 20 74 65 6d 70 6f 72 61 72 79 20 66 /* a temporary f
19a0: 69 6c 65 20 69 6e 20 73 61 6d 65 20 64 69 72 65 ile in same dire
19b0: 63 74 6f 72 79 20 61 73 20 7a 46 69 6c 65 6e 61 ctory as zFilena
19c0: 6d 65 20 2a 2f 0a 20 20 73 71 6c 69 74 65 20 2a me */. sqlite *
19d0: 64 62 4e 65 77 20 3d 20 30 3b 20 20 20 20 20 20 dbNew = 0;
19e0: 2f 2a 20 54 68 65 20 6e 65 77 20 76 61 63 75 75 /* The new vacuu
19f0: 6d 65 64 20 64 61 74 61 62 61 73 65 20 2a 2f 0a med database */.
1a00: 20 20 69 6e 74 20 72 63 20 3d 20 53 51 4c 49 54 int rc = SQLIT
1a10: 45 5f 4f 4b 3b 20 20 20 20 20 2f 2a 20 52 65 74 E_OK; /* Ret
1a20: 75 72 6e 20 63 6f 64 65 20 66 72 6f 6d 20 73 65 urn code from se
1a30: 72 76 69 63 65 20 72 6f 75 74 69 6e 65 73 20 2a rvice routines *
1a40: 2f 0a 20 20 69 6e 74 20 69 3b 20 20 20 20 20 20 /. int i;
1a50: 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 4c /* L
1a60: 6f 6f 70 20 63 6f 75 6e 74 65 72 20 2a 2f 0a 20 oop counter */.
1a70: 20 63 68 61 72 20 2a 7a 45 72 72 4d 73 67 3b 20 char *zErrMsg;
1a80: 20 20 20 20 20 20 20 20 20 2f 2a 20 45 72 72 6f /* Erro
1a90: 72 20 6d 65 73 73 61 67 65 20 2a 2f 0a 20 20 76 r message */. v
1aa0: 61 63 75 75 6d 53 74 72 75 63 74 20 73 56 61 63 acuumStruct sVac
1ab0: 3b 20 20 20 20 20 20 2f 2a 20 49 6e 66 6f 72 6d ; /* Inform
1ac0: 61 74 69 6f 6e 20 70 61 73 73 65 64 20 74 6f 20 ation passed to
1ad0: 63 61 6c 6c 62 61 63 6b 73 20 2a 2f 0a 0a 20 20 callbacks */..
1ae0: 2f 2a 20 54 68 65 73 65 20 61 72 65 20 61 6c 6c /* These are all
1af0: 20 6f 66 20 74 68 65 20 70 72 61 67 6d 61 73 20 of the pragmas
1b00: 74 68 61 74 20 6e 65 65 64 20 74 6f 20 62 65 20 that need to be
1b10: 74 72 61 6e 73 66 65 72 72 65 64 20 6f 76 65 72 transferred over
1b20: 0a 20 20 2a 2a 20 74 6f 20 74 68 65 20 6e 65 77 . ** to the new
1b30: 20 64 61 74 61 62 61 73 65 20 2a 2f 0a 20 20 73 database */. s
1b40: 74 61 74 69 63 20 63 6f 6e 73 74 20 63 68 61 72 tatic const char
1b50: 20 2a 7a 50 72 61 67 6d 61 5b 5d 20 3d 20 7b 0a *zPragma[] = {.
1b60: 20 20 20 20 20 22 64 65 66 61 75 6c 74 5f 73 79 "default_sy
1b70: 6e 63 68 72 6f 6e 6f 75 73 22 2c 0a 20 20 20 20 nchronous",.
1b80: 20 22 64 65 66 61 75 6c 74 5f 63 61 63 68 65 5f "default_cache_
1b90: 73 69 7a 65 22 2c 0a 20 20 20 20 20 2f 2a 20 22 size",. /* "
1ba0: 64 65 66 61 75 6c 74 5f 74 65 6d 70 5f 73 74 6f default_temp_sto
1bb0: 72 65 22 2c 20 2a 2f 0a 20 20 7d 3b 0a 0a 20 20 re", */. };..
1bc0: 69 66 28 20 64 62 2d 3e 66 6c 61 67 73 20 26 20 if( db->flags &
1bd0: 53 51 4c 49 54 45 5f 49 6e 54 72 61 6e 73 20 29 SQLITE_InTrans )
1be0: 7b 0a 20 20 20 20 73 71 6c 69 74 65 53 65 74 53 {. sqliteSetS
1bf0: 74 72 69 6e 67 28 70 7a 45 72 72 4d 73 67 2c 20 tring(pzErrMsg,
1c00: 22 63 61 6e 6e 6f 74 20 56 41 43 55 55 4d 20 66 "cannot VACUUM f
1c10: 72 6f 6d 20 77 69 74 68 69 6e 20 61 20 74 72 61 rom within a tra
1c20: 6e 73 61 63 74 69 6f 6e 22 2c 20 0a 20 20 20 20 nsaction", .
1c30: 20 20 20 28 63 68 61 72 2a 29 30 29 3b 0a 20 20 (char*)0);.
1c40: 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f return SQLITE_
1c50: 45 52 52 4f 52 3b 0a 20 20 7d 0a 20 20 6d 65 6d ERROR;. }. mem
1c60: 73 65 74 28 26 73 56 61 63 2c 20 30 2c 20 73 69 set(&sVac, 0, si
1c70: 7a 65 6f 66 28 73 56 61 63 29 29 3b 0a 0a 20 20 zeof(sVac));..
1c80: 2f 2a 20 47 65 74 20 74 68 65 20 66 75 6c 6c 20 /* Get the full
1c90: 70 61 74 68 6e 61 6d 65 20 6f 66 20 74 68 65 20 pathname of the
1ca0: 64 61 74 61 62 61 73 65 20 66 69 6c 65 20 61 6e database file an
1cb0: 64 20 63 72 65 61 74 65 20 74 77 6f 0a 20 20 2a d create two. *
1cc0: 2a 20 74 65 6d 70 6f 72 61 72 79 20 66 69 6c 65 * temporary file
1cd0: 6e 61 6d 65 73 20 69 6e 20 74 68 65 20 73 61 6d names in the sam
1ce0: 65 20 64 69 72 65 63 74 6f 72 79 20 61 73 20 74 e directory as t
1cf0: 68 65 20 6f 72 69 67 69 6e 61 6c 20 66 69 6c 65 he original file
1d00: 2e 0a 20 20 2a 2f 0a 20 20 7a 46 69 6c 65 6e 61 .. */. zFilena
1d10: 6d 65 20 3d 20 73 71 6c 69 74 65 42 74 72 65 65 me = sqliteBtree
1d20: 47 65 74 46 69 6c 65 6e 61 6d 65 28 64 62 2d 3e GetFilename(db->
1d30: 61 44 62 5b 30 5d 2e 70 42 74 29 3b 0a 20 20 69 aDb[0].pBt);. i
1d40: 66 28 20 7a 46 69 6c 65 6e 61 6d 65 3d 3d 30 20 f( zFilename==0
1d50: 29 7b 0a 20 20 20 20 2f 2a 20 54 68 69 73 20 6f ){. /* This o
1d60: 6e 6c 79 20 68 61 70 70 65 6e 73 20 77 69 74 68 nly happens with
1d70: 20 74 68 65 20 69 6e 2d 6d 65 6d 6f 72 79 20 64 the in-memory d
1d80: 61 74 61 62 61 73 65 2e 20 20 56 41 43 55 55 4d atabase. VACUUM
1d90: 20 69 73 20 61 20 6e 6f 2d 6f 70 0a 20 20 20 20 is a no-op.
1da0: 2a 2a 20 74 68 65 72 65 2c 20 73 6f 20 6a 75 73 ** there, so jus
1db0: 74 20 72 65 74 75 72 6e 20 2a 2f 0a 20 20 20 20 t return */.
1dc0: 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b return SQLITE_OK
1dd0: 3b 0a 20 20 7d 0a 20 20 6e 46 69 6c 65 6e 61 6d ;. }. nFilenam
1de0: 65 20 3d 20 73 74 72 6c 65 6e 28 7a 46 69 6c 65 e = strlen(zFile
1df0: 6e 61 6d 65 29 3b 0a 20 20 7a 54 65 6d 70 20 3d name);. zTemp =
1e00: 20 73 71 6c 69 74 65 4d 61 6c 6c 6f 63 28 20 6e sqliteMalloc( n
1e10: 46 69 6c 65 6e 61 6d 65 2b 31 30 30 20 29 3b 0a Filename+100 );.
1e20: 20 20 69 66 28 20 7a 54 65 6d 70 3d 3d 30 20 29 if( zTemp==0 )
1e30: 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 4e return SQLITE_N
1e40: 4f 4d 45 4d 3b 0a 20 20 73 74 72 63 70 79 28 7a OMEM;. strcpy(z
1e50: 54 65 6d 70 2c 20 7a 46 69 6c 65 6e 61 6d 65 29 Temp, zFilename)
1e60: 3b 0a 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c 31 ;. for(i=0; i<1
1e70: 30 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 7a 54 65 0; i++){. zTe
1e80: 6d 70 5b 6e 46 69 6c 65 6e 61 6d 65 5d 20 3d 20 mp[nFilename] =
1e90: 27 2d 27 3b 0a 20 20 20 20 72 61 6e 64 6f 6d 4e '-';. randomN
1ea0: 61 6d 65 28 26 7a 54 65 6d 70 5b 6e 46 69 6c 65 ame(&zTemp[nFile
1eb0: 6e 61 6d 65 2b 31 5d 29 3b 0a 20 20 20 20 69 66 name+1]);. if
1ec0: 28 20 21 73 71 6c 69 74 65 4f 73 46 69 6c 65 45 ( !sqliteOsFileE
1ed0: 78 69 73 74 73 28 7a 54 65 6d 70 29 20 29 20 62 xists(zTemp) ) b
1ee0: 72 65 61 6b 3b 0a 20 20 7d 0a 20 20 69 66 28 20 reak;. }. if(
1ef0: 69 3e 3d 31 30 20 29 7b 0a 20 20 20 20 73 71 6c i>=10 ){. sql
1f00: 69 74 65 53 65 74 53 74 72 69 6e 67 28 70 7a 45 iteSetString(pzE
1f10: 72 72 4d 73 67 2c 20 22 75 6e 61 62 6c 65 20 74 rrMsg, "unable t
1f20: 6f 20 63 72 65 61 74 65 20 61 20 74 65 6d 70 6f o create a tempo
1f30: 72 61 72 79 20 64 61 74 61 62 61 73 65 20 66 69 rary database fi
1f40: 6c 65 20 22 0a 20 20 20 20 20 20 20 22 69 6e 20 le ". "in
1f50: 74 68 65 20 73 61 6d 65 20 64 69 72 65 63 74 6f the same directo
1f60: 72 79 20 61 73 20 74 68 65 20 6f 72 69 67 69 6e ry as the origin
1f70: 61 6c 20 64 61 74 61 62 61 73 65 22 2c 20 28 63 al database", (c
1f80: 68 61 72 2a 29 30 29 3b 0a 20 20 20 20 67 6f 74 har*)0);. got
1f90: 6f 20 65 6e 64 5f 6f 66 5f 76 61 63 75 75 6d 3b o end_of_vacuum;
1fa0: 0a 20 20 7d 0a 0a 20 20 0a 20 20 64 62 4e 65 77 . }.. . dbNew
1fb0: 20 3d 20 73 71 6c 69 74 65 5f 6f 70 65 6e 28 7a = sqlite_open(z
1fc0: 54 65 6d 70 2c 20 30 2c 20 26 7a 45 72 72 4d 73 Temp, 0, &zErrMs
1fd0: 67 29 3b 0a 20 20 69 66 28 20 64 62 4e 65 77 3d g);. if( dbNew=
1fe0: 3d 30 20 29 7b 0a 20 20 20 20 73 71 6c 69 74 65 =0 ){. sqlite
1ff0: 53 65 74 53 74 72 69 6e 67 28 70 7a 45 72 72 4d SetString(pzErrM
2000: 73 67 2c 20 22 75 6e 61 62 6c 65 20 74 6f 20 6f sg, "unable to o
2010: 70 65 6e 20 61 20 74 65 6d 70 6f 72 61 72 79 20 pen a temporary
2020: 64 61 74 61 62 61 73 65 20 61 74 20 22 2c 0a 20 database at ",.
2030: 20 20 20 20 20 20 7a 54 65 6d 70 2c 20 22 20 2d zTemp, " -
2040: 20 22 2c 20 7a 45 72 72 4d 73 67 2c 20 28 63 68 ", zErrMsg, (ch
2050: 61 72 2a 29 30 29 3b 0a 20 20 20 20 67 6f 74 6f ar*)0);. goto
2060: 20 65 6e 64 5f 6f 66 5f 76 61 63 75 75 6d 3b 0a end_of_vacuum;.
2070: 20 20 7d 0a 20 20 69 66 28 20 28 72 63 20 3d 20 }. if( (rc =
2080: 65 78 65 63 73 71 6c 28 70 7a 45 72 72 4d 73 67 execsql(pzErrMsg
2090: 2c 20 64 62 2c 20 22 42 45 47 49 4e 22 29 29 21 , db, "BEGIN"))!
20a0: 3d 30 20 29 20 67 6f 74 6f 20 65 6e 64 5f 6f 66 =0 ) goto end_of
20b0: 5f 76 61 63 75 75 6d 3b 0a 20 20 69 66 28 20 28 _vacuum;. if( (
20c0: 72 63 20 3d 20 65 78 65 63 73 71 6c 28 70 7a 45 rc = execsql(pzE
20d0: 72 72 4d 73 67 2c 20 64 62 4e 65 77 2c 20 22 50 rrMsg, dbNew, "P
20e0: 52 41 47 4d 41 20 73 79 6e 63 68 72 6f 6e 6f 75 RAGMA synchronou
20f0: 73 3d 6f 66 66 3b 20 42 45 47 49 4e 22 29 29 21 s=off; BEGIN"))!
2100: 3d 30 20 29 7b 0a 20 20 20 20 67 6f 74 6f 20 65 =0 ){. goto e
2110: 6e 64 5f 6f 66 5f 76 61 63 75 75 6d 3b 0a 20 20 nd_of_vacuum;.
2120: 7d 0a 20 20 0a 20 20 73 56 61 63 2e 64 62 4f 6c }. . sVac.dbOl
2130: 64 20 3d 20 64 62 3b 0a 20 20 73 56 61 63 2e 64 d = db;. sVac.d
2140: 62 4e 65 77 20 3d 20 64 62 4e 65 77 3b 0a 20 20 bNew = dbNew;.
2150: 73 56 61 63 2e 70 7a 45 72 72 4d 73 67 20 3d 20 sVac.pzErrMsg =
2160: 70 7a 45 72 72 4d 73 67 3b 0a 20 20 66 6f 72 28 pzErrMsg;. for(
2170: 69 3d 30 3b 20 72 63 3d 3d 53 51 4c 49 54 45 5f i=0; rc==SQLITE_
2180: 4f 4b 20 26 26 20 69 3c 73 69 7a 65 6f 66 28 7a OK && i<sizeof(z
2190: 50 72 61 67 6d 61 29 2f 73 69 7a 65 6f 66 28 7a Pragma)/sizeof(z
21a0: 50 72 61 67 6d 61 5b 30 5d 29 3b 20 69 2b 2b 29 Pragma[0]); i++)
21b0: 7b 0a 20 20 20 20 63 68 61 72 20 7a 42 75 66 5b {. char zBuf[
21c0: 32 30 30 5d 3b 0a 20 20 20 20 61 73 73 65 72 74 200];. assert
21d0: 28 20 73 74 72 6c 65 6e 28 7a 50 72 61 67 6d 61 ( strlen(zPragma
21e0: 5b 69 5d 29 3c 31 30 30 20 29 3b 0a 20 20 20 20 [i])<100 );.
21f0: 73 70 72 69 6e 74 66 28 7a 42 75 66 2c 20 22 50 sprintf(zBuf, "P
2200: 52 41 47 4d 41 20 25 73 3b 22 2c 20 7a 50 72 61 RAGMA %s;", zPra
2210: 67 6d 61 5b 69 5d 29 3b 0a 20 20 20 20 73 56 61 gma[i]);. sVa
2220: 63 2e 7a 50 72 61 67 6d 61 20 3d 20 7a 50 72 61 c.zPragma = zPra
2230: 67 6d 61 5b 69 5d 3b 0a 20 20 20 20 72 63 20 3d gma[i];. rc =
2240: 20 73 71 6c 69 74 65 5f 65 78 65 63 28 64 62 2c sqlite_exec(db,
2250: 20 7a 42 75 66 2c 20 76 61 63 75 75 6d 43 61 6c zBuf, vacuumCal
2260: 6c 62 61 63 6b 33 2c 20 26 73 56 61 63 2c 20 26 lback3, &sVac, &
2270: 7a 45 72 72 4d 73 67 29 3b 0a 20 20 7d 0a 20 20 zErrMsg);. }.
2280: 69 66 28 20 72 63 3d 3d 53 51 4c 49 54 45 5f 4f if( rc==SQLITE_O
2290: 4b 20 29 7b 0a 20 20 20 20 72 63 20 3d 20 73 71 K ){. rc = sq
22a0: 6c 69 74 65 5f 65 78 65 63 28 64 62 2c 20 0a 20 lite_exec(db, .
22b0: 20 20 20 20 20 22 53 45 4c 45 43 54 20 74 79 70 "SELECT typ
22c0: 65 2c 20 6e 61 6d 65 2c 20 73 71 6c 20 46 52 4f e, name, sql FRO
22d0: 4d 20 73 71 6c 69 74 65 5f 6d 61 73 74 65 72 20 M sqlite_master
22e0: 22 0a 20 20 20 20 20 20 22 57 48 45 52 45 20 73 ". "WHERE s
22f0: 71 6c 20 4e 4f 54 20 4e 55 4c 4c 20 41 4e 44 20 ql NOT NULL AND
2300: 74 79 70 65 21 3d 27 76 69 65 77 27 20 22 0a 20 type!='view' ".
2310: 20 20 20 20 20 22 55 4e 49 4f 4e 20 41 4c 4c 20 "UNION ALL
2320: 22 0a 20 20 20 20 20 20 22 53 45 4c 45 43 54 20 ". "SELECT
2330: 74 79 70 65 2c 20 6e 61 6d 65 2c 20 73 71 6c 20 type, name, sql
2340: 46 52 4f 4d 20 73 71 6c 69 74 65 5f 6d 61 73 74 FROM sqlite_mast
2350: 65 72 20 22 0a 20 20 20 20 20 20 22 57 48 45 52 er ". "WHER
2360: 45 20 73 71 6c 20 4e 4f 54 20 4e 55 4c 4c 20 41 E sql NOT NULL A
2370: 4e 44 20 74 79 70 65 3d 3d 27 76 69 65 77 27 22 ND type=='view'"
2380: 2c 0a 20 20 20 20 20 20 76 61 63 75 75 6d 43 61 ,. vacuumCa
2390: 6c 6c 62 61 63 6b 31 2c 20 26 73 56 61 63 2c 20 llback1, &sVac,
23a0: 26 7a 45 72 72 4d 73 67 29 3b 0a 20 20 7d 0a 20 &zErrMsg);. }.
23b0: 20 69 66 28 20 72 63 3d 3d 53 51 4c 49 54 45 5f if( rc==SQLITE_
23c0: 4f 4b 20 29 7b 0a 20 20 20 20 72 63 20 3d 20 73 OK ){. rc = s
23d0: 71 6c 69 74 65 42 74 72 65 65 43 6f 70 79 46 69 qliteBtreeCopyFi
23e0: 6c 65 28 64 62 2d 3e 61 44 62 5b 30 5d 2e 70 42 le(db->aDb[0].pB
23f0: 74 2c 20 64 62 4e 65 77 2d 3e 61 44 62 5b 30 5d t, dbNew->aDb[0]
2400: 2e 70 42 74 29 3b 0a 20 20 20 20 73 71 6c 69 74 .pBt);. sqlit
2410: 65 5f 65 78 65 63 28 64 62 2c 20 22 43 4f 4d 4d e_exec(db, "COMM
2420: 49 54 22 2c 20 30 2c 20 30 2c 20 30 29 3b 0a 20 IT", 0, 0, 0);.
2430: 20 20 20 73 71 6c 69 74 65 52 65 73 65 74 49 6e sqliteResetIn
2440: 74 65 72 6e 61 6c 53 63 68 65 6d 61 28 64 62 2c ternalSchema(db,
2450: 20 30 29 3b 0a 20 20 7d 0a 0a 65 6e 64 5f 6f 66 0);. }..end_of
2460: 5f 76 61 63 75 75 6d 3a 0a 20 20 69 66 28 20 72 _vacuum:. if( r
2470: 63 20 26 26 20 7a 45 72 72 4d 73 67 21 3d 30 20 c && zErrMsg!=0
2480: 29 7b 0a 20 20 20 20 73 71 6c 69 74 65 53 65 74 ){. sqliteSet
2490: 53 74 72 69 6e 67 28 70 7a 45 72 72 4d 73 67 2c String(pzErrMsg,
24a0: 20 22 75 6e 61 62 6c 65 20 74 6f 20 76 61 63 75 "unable to vacu
24b0: 75 6d 20 64 61 74 61 62 61 73 65 20 2d 20 22 2c um database - ",
24c0: 20 0a 20 20 20 20 20 20 20 7a 45 72 72 4d 73 67 . zErrMsg
24d0: 2c 20 28 63 68 61 72 2a 29 30 29 3b 0a 20 20 7d , (char*)0);. }
24e0: 0a 20 20 73 71 6c 69 74 65 5f 65 78 65 63 28 64 . sqlite_exec(d
24f0: 62 2c 20 22 52 4f 4c 4c 42 41 43 4b 22 2c 20 30 b, "ROLLBACK", 0
2500: 2c 20 30 2c 20 30 29 3b 0a 20 20 69 66 28 20 64 , 0, 0);. if( d
2510: 62 4e 65 77 20 29 20 73 71 6c 69 74 65 5f 63 6c bNew ) sqlite_cl
2520: 6f 73 65 28 64 62 4e 65 77 29 3b 0a 20 20 73 71 ose(dbNew);. sq
2530: 6c 69 74 65 4f 73 44 65 6c 65 74 65 28 7a 54 65 liteOsDelete(zTe
2540: 6d 70 29 3b 0a 20 20 73 71 6c 69 74 65 46 72 65 mp);. sqliteFre
2550: 65 28 7a 54 65 6d 70 29 3b 0a 20 20 73 71 6c 69 e(zTemp);. sqli
2560: 74 65 46 72 65 65 28 73 56 61 63 2e 73 31 2e 7a teFree(sVac.s1.z
2570: 29 3b 0a 20 20 73 71 6c 69 74 65 46 72 65 65 28 );. sqliteFree(
2580: 73 56 61 63 2e 73 32 2e 7a 29 3b 0a 20 20 69 66 sVac.s2.z);. if
2590: 28 20 7a 45 72 72 4d 73 67 20 29 20 73 71 6c 69 ( zErrMsg ) sqli
25a0: 74 65 5f 66 72 65 65 6d 65 6d 28 7a 45 72 72 4d te_freemem(zErrM
25b0: 73 67 29 3b 0a 20 20 69 66 28 20 72 63 3d 3d 53 sg);. if( rc==S
25c0: 51 4c 49 54 45 5f 41 42 4f 52 54 20 29 20 73 56 QLITE_ABORT ) sV
25d0: 61 63 2e 72 63 20 3d 20 53 51 4c 49 54 45 5f 45 ac.rc = SQLITE_E
25e0: 52 52 4f 52 3b 0a 20 20 72 65 74 75 72 6e 20 73 RROR;. return s
25f0: 56 61 63 2e 72 63 3b 0a 23 65 6e 64 69 66 0a 7d Vac.rc;.#endif.}
2600: 0a .