/ Hex Artifact Content
Login

Artifact 12de02a8dec2b3f8d30ea496b66a0f989322a2c4:


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 33 2e 32 2e  cuum.c,v 1.13.2.
0230: 35 20 32 30 30 35 2f 30 32 2f 31 34 20 30 30 3a  5 2005/02/14 00:
0240: 32 35 3a 34 38 20 64 72 68 20 45 78 70 20 24 0a  25:48 drh Exp $.
0250: 2a 2f 0a 23 69 6e 63 6c 75 64 65 20 22 73 71 6c  */.#include "sql
0260: 69 74 65 49 6e 74 2e 68 22 0a 23 69 6e 63 6c 75  iteInt.h".#inclu
0270: 64 65 20 22 6f 73 2e 68 22 0a 0a 2f 2a 0a 2a 2a  de "os.h"../*.**
0280: 20 41 20 73 74 72 75 63 74 75 72 65 20 66 6f 72   A structure for
0290: 20 68 6f 6c 64 69 6e 67 20 61 20 64 79 6e 61 6d   holding a dynam
02a0: 69 63 20 73 74 72 69 6e 67 20 2d 20 61 20 73 74  ic string - a st
02b0: 72 69 6e 67 20 74 68 61 74 20 63 61 6e 20 67 72  ring that can gr
02c0: 6f 77 0a 2a 2a 20 77 69 74 68 6f 75 74 20 62 6f  ow.** without bo
02d0: 75 6e 64 2e 20 0a 2a 2f 0a 74 79 70 65 64 65 66  und. .*/.typedef
02e0: 20 73 74 72 75 63 74 20 64 79 6e 53 74 72 20 64   struct dynStr d
02f0: 79 6e 53 74 72 3b 0a 73 74 72 75 63 74 20 64 79  ynStr;.struct dy
0300: 6e 53 74 72 20 7b 0a 20 20 63 68 61 72 20 2a 7a  nStr {.  char *z
0310: 3b 20 20 20 20 20 20 20 20 2f 2a 20 54 65 78 74  ;        /* Text
0320: 20 6f 66 20 74 68 65 20 73 74 72 69 6e 67 20 69   of the string i
0330: 6e 20 73 70 61 63 65 20 6f 62 74 61 69 6e 65 64  n space obtained
0340: 20 66 72 6f 6d 20 73 71 6c 69 74 65 4d 61 6c 6c   from sqliteMall
0350: 6f 63 28 29 20 2a 2f 0a 20 20 69 6e 74 20 6e 41  oc() */.  int nA
0360: 6c 6c 6f 63 3b 20 20 20 20 20 2f 2a 20 41 6d 6f  lloc;     /* Amo
0370: 75 6e 74 20 6f 66 20 73 70 61 63 65 20 61 6c 6c  unt of space all
0380: 6f 63 61 74 65 64 20 74 6f 20 7a 5b 5d 20 2a 2f  ocated to z[] */
0390: 0a 20 20 69 6e 74 20 6e 55 73 65 64 3b 20 20 20  .  int nUsed;   
03a0: 20 20 20 2f 2a 20 4e 65 78 74 20 75 6e 75 73 65     /* Next unuse
03b0: 64 20 73 6c 6f 74 20 69 6e 20 7a 5b 5d 20 2a 2f  d slot in z[] */
03c0: 0a 7d 3b 0a 0a 2f 2a 0a 2a 2a 20 41 20 73 74 72  .};../*.** A str
03d0: 75 63 74 75 72 65 20 74 68 61 74 20 68 6f 6c 64  ucture that hold
03e0: 73 20 74 68 65 20 76 61 63 75 75 6d 20 63 6f 6e  s the vacuum con
03f0: 74 65 78 74 0a 2a 2f 0a 74 79 70 65 64 65 66 20  text.*/.typedef 
0400: 73 74 72 75 63 74 20 76 61 63 75 75 6d 53 74 72  struct vacuumStr
0410: 75 63 74 20 76 61 63 75 75 6d 53 74 72 75 63 74  uct vacuumStruct
0420: 3b 0a 73 74 72 75 63 74 20 76 61 63 75 75 6d 53  ;.struct vacuumS
0430: 74 72 75 63 74 20 7b 0a 20 20 73 71 6c 69 74 65  truct {.  sqlite
0440: 20 2a 64 62 4f 6c 64 3b 20 20 20 20 20 20 20 2f   *dbOld;       /
0450: 2a 20 4f 72 69 67 69 6e 61 6c 20 64 61 74 61 62  * Original datab
0460: 61 73 65 20 2a 2f 0a 20 20 73 71 6c 69 74 65 20  ase */.  sqlite 
0470: 2a 64 62 4e 65 77 3b 20 20 20 20 20 20 20 2f 2a  *dbNew;       /*
0480: 20 4e 65 77 20 64 61 74 61 62 61 73 65 20 2a 2f   New database */
0490: 0a 20 20 63 68 61 72 20 2a 2a 70 7a 45 72 72 4d  .  char **pzErrM
04a0: 73 67 3b 20 20 20 20 20 2f 2a 20 57 72 69 74 65  sg;     /* Write
04b0: 20 65 72 72 6f 72 73 20 68 65 72 65 20 2a 2f 0a   errors here */.
04c0: 20 20 69 6e 74 20 72 63 3b 20 20 20 20 20 20 20    int rc;       
04d0: 20 20 20 20 20 20 20 2f 2a 20 53 65 74 20 74 6f         /* Set to
04e0: 20 6e 6f 6e 2d 7a 65 72 6f 20 6f 6e 20 61 6e 20   non-zero on an 
04f0: 65 72 72 6f 72 20 2a 2f 0a 20 20 63 6f 6e 73 74  error */.  const
0500: 20 63 68 61 72 20 2a 7a 54 61 62 6c 65 3b 20 20   char *zTable;  
0510: 2f 2a 20 4e 61 6d 65 20 6f 66 20 61 20 74 61 62  /* Name of a tab
0520: 6c 65 20 62 65 69 6e 67 20 63 6f 70 69 65 64 20  le being copied 
0530: 2a 2f 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20  */.  const char 
0540: 2a 7a 50 72 61 67 6d 61 3b 20 2f 2a 20 50 72 61  *zPragma; /* Pra
0550: 67 6d 61 20 74 6f 20 65 78 65 63 75 74 65 20 77  gma to execute w
0560: 69 74 68 20 72 65 73 75 6c 74 73 20 2a 2f 0a 20  ith results */. 
0570: 20 64 79 6e 53 74 72 20 73 31 2c 20 73 32 3b 20   dynStr s1, s2; 
0580: 20 20 20 20 20 20 2f 2a 20 54 77 6f 20 64 79 6e        /* Two dyn
0590: 61 6d 69 63 20 73 74 72 69 6e 67 73 20 2a 2f 0a  amic strings */.
05a0: 7d 3b 0a 0a 23 69 66 20 21 64 65 66 69 6e 65 64  };..#if !defined
05b0: 28 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 56 41 43  (SQLITE_OMIT_VAC
05c0: 55 55 4d 29 20 7c 7c 20 53 51 4c 49 54 45 5f 4f  UUM) || SQLITE_O
05d0: 4d 49 54 5f 56 41 43 55 55 4d 0a 2f 2a 0a 2a 2a  MIT_VACUUM./*.**
05e0: 20 41 70 70 65 6e 64 20 74 65 78 74 20 74 6f 20   Append text to 
05f0: 61 20 64 79 6e 61 6d 69 63 20 73 74 72 69 6e 67  a dynamic string
0600: 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20  .*/.static void 
0610: 61 70 70 65 6e 64 54 65 78 74 28 64 79 6e 53 74  appendText(dynSt
0620: 72 20 2a 70 2c 20 63 6f 6e 73 74 20 63 68 61 72  r *p, const char
0630: 20 2a 7a 54 65 78 74 2c 20 69 6e 74 20 6e 54 65   *zText, int nTe
0640: 78 74 29 7b 0a 20 20 69 66 28 20 6e 54 65 78 74  xt){.  if( nText
0650: 3c 30 20 29 20 6e 54 65 78 74 20 3d 20 73 74 72  <0 ) nText = str
0660: 6c 65 6e 28 7a 54 65 78 74 29 3b 0a 20 20 69 66  len(zText);.  if
0670: 28 20 70 2d 3e 7a 3d 3d 30 20 7c 7c 20 70 2d 3e  ( p->z==0 || p->
0680: 6e 55 73 65 64 20 2b 20 6e 54 65 78 74 20 2b 20  nUsed + nText + 
0690: 31 20 3e 3d 20 70 2d 3e 6e 41 6c 6c 6f 63 20 29  1 >= p->nAlloc )
06a0: 7b 0a 20 20 20 20 63 68 61 72 20 2a 7a 4e 65 77  {.    char *zNew
06b0: 3b 0a 20 20 20 20 70 2d 3e 6e 41 6c 6c 6f 63 20  ;.    p->nAlloc 
06c0: 3d 20 70 2d 3e 6e 55 73 65 64 20 2b 20 6e 54 65  = p->nUsed + nTe
06d0: 78 74 20 2b 20 31 30 30 30 3b 0a 20 20 20 20 7a  xt + 1000;.    z
06e0: 4e 65 77 20 3d 20 73 71 6c 69 74 65 52 65 61 6c  New = sqliteReal
06f0: 6c 6f 63 28 70 2d 3e 7a 2c 20 70 2d 3e 6e 41 6c  loc(p->z, p->nAl
0700: 6c 6f 63 29 3b 0a 20 20 20 20 69 66 28 20 7a 4e  loc);.    if( zN
0710: 65 77 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 73  ew==0 ){.      s
0720: 71 6c 69 74 65 46 72 65 65 28 70 2d 3e 7a 29 3b  qliteFree(p->z);
0730: 0a 20 20 20 20 20 20 6d 65 6d 73 65 74 28 70 2c  .      memset(p,
0740: 20 30 2c 20 73 69 7a 65 6f 66 28 2a 70 29 29 3b   0, sizeof(*p));
0750: 0a 20 20 20 20 20 20 72 65 74 75 72 6e 3b 0a 20  .      return;. 
0760: 20 20 20 7d 0a 20 20 20 20 70 2d 3e 7a 20 3d 20     }.    p->z = 
0770: 7a 4e 65 77 3b 0a 20 20 7d 0a 20 20 6d 65 6d 63  zNew;.  }.  memc
0780: 70 79 28 26 70 2d 3e 7a 5b 70 2d 3e 6e 55 73 65  py(&p->z[p->nUse
0790: 64 5d 2c 20 7a 54 65 78 74 2c 20 6e 54 65 78 74  d], zText, nText
07a0: 2b 31 29 3b 0a 20 20 70 2d 3e 6e 55 73 65 64 20  +1);.  p->nUsed 
07b0: 2b 3d 20 6e 54 65 78 74 3b 0a 7d 0a 0a 2f 2a 0a  += nText;.}../*.
07c0: 2a 2a 20 41 70 70 65 6e 64 20 74 65 78 74 20 74  ** Append text t
07d0: 6f 20 61 20 64 79 6e 61 6d 69 63 20 73 74 72 69  o a dynamic stri
07e0: 6e 67 2c 20 68 61 76 69 6e 67 20 66 69 72 73 74  ng, having first
07f0: 20 70 75 74 20 74 68 65 20 74 65 78 74 20 69 6e   put the text in
0800: 20 71 75 6f 74 65 73 2e 0a 2a 2f 0a 73 74 61 74   quotes..*/.stat
0810: 69 63 20 76 6f 69 64 20 61 70 70 65 6e 64 51 75  ic void appendQu
0820: 6f 74 65 64 28 64 79 6e 53 74 72 20 2a 70 2c 20  oted(dynStr *p, 
0830: 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 54 65 78  const char *zTex
0840: 74 29 7b 0a 20 20 69 6e 74 20 69 2c 20 6a 3b 0a  t){.  int i, j;.
0850: 20 20 61 70 70 65 6e 64 54 65 78 74 28 70 2c 20    appendText(p, 
0860: 22 27 22 2c 20 31 29 3b 0a 20 20 66 6f 72 28 69  "'", 1);.  for(i
0870: 3d 6a 3d 30 3b 20 7a 54 65 78 74 5b 69 5d 3b 20  =j=0; zText[i]; 
0880: 69 2b 2b 29 7b 0a 20 20 20 20 69 66 28 20 7a 54  i++){.    if( zT
0890: 65 78 74 5b 69 5d 3d 3d 27 5c 27 27 20 29 7b 0a  ext[i]=='\'' ){.
08a0: 20 20 20 20 20 20 61 70 70 65 6e 64 54 65 78 74        appendText
08b0: 28 70 2c 20 26 7a 54 65 78 74 5b 6a 5d 2c 20 69  (p, &zText[j], i
08c0: 2d 6a 2b 31 29 3b 0a 20 20 20 20 20 20 6a 20 3d  -j+1);.      j =
08d0: 20 69 20 2b 20 31 3b 0a 20 20 20 20 20 20 61 70   i + 1;.      ap
08e0: 70 65 6e 64 54 65 78 74 28 70 2c 20 22 27 22 2c  pendText(p, "'",
08f0: 20 31 29 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 20   1);.    }.  }. 
0900: 20 69 66 28 20 6a 3c 69 20 29 7b 0a 20 20 20 20   if( j<i ){.    
0910: 61 70 70 65 6e 64 54 65 78 74 28 70 2c 20 26 7a  appendText(p, &z
0920: 54 65 78 74 5b 6a 5d 2c 20 69 2d 6a 29 3b 0a 20  Text[j], i-j);. 
0930: 20 7d 0a 20 20 61 70 70 65 6e 64 54 65 78 74 28   }.  appendText(
0940: 70 2c 20 22 27 22 2c 20 31 29 3b 0a 7d 0a 0a 2f  p, "'", 1);.}../
0950: 2a 0a 2a 2a 20 45 78 65 63 75 74 65 20 73 74 61  *.** Execute sta
0960: 74 65 6d 65 6e 74 73 20 6f 66 20 53 51 4c 2e 20  tements of SQL. 
0970: 20 49 66 20 61 6e 20 65 72 72 6f 72 20 6f 63 63   If an error occ
0980: 75 72 73 2c 20 77 72 69 74 65 20 74 68 65 20 65  urs, write the e
0990: 72 72 6f 72 0a 2a 2a 20 6d 65 73 73 61 67 65 20  rror.** message 
09a0: 69 6e 74 6f 20 2a 70 7a 45 72 72 4d 73 67 20 61  into *pzErrMsg a
09b0: 6e 64 20 72 65 74 75 72 6e 20 6e 6f 6e 2d 7a 65  nd return non-ze
09c0: 72 6f 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 69 6e  ro..*/.static in
09d0: 74 20 65 78 65 63 73 71 6c 28 63 68 61 72 20 2a  t execsql(char *
09e0: 2a 70 7a 45 72 72 4d 73 67 2c 20 73 71 6c 69 74  *pzErrMsg, sqlit
09f0: 65 20 2a 64 62 2c 20 63 6f 6e 73 74 20 63 68 61  e *db, const cha
0a00: 72 20 2a 7a 53 71 6c 29 7b 20 0a 20 20 63 68 61  r *zSql){ .  cha
0a10: 72 20 2a 7a 45 72 72 4d 73 67 20 3d 20 30 3b 0a  r *zErrMsg = 0;.
0a20: 20 20 69 6e 74 20 72 63 3b 0a 0a 20 20 2f 2a 20    int rc;..  /* 
0a30: 70 72 69 6e 74 66 28 22 2a 2a 2a 2a 2a 20 65 78  printf("***** ex
0a40: 65 63 75 74 69 6e 67 20 2a 2a 2a 2a 2a 5c 6e 25  ecuting *****\n%
0a50: 73 5c 6e 22 2c 20 7a 53 71 6c 29 3b 20 2a 2f 0a  s\n", zSql); */.
0a60: 20 20 72 63 20 3d 20 73 71 6c 69 74 65 5f 65 78    rc = sqlite_ex
0a70: 65 63 28 64 62 2c 20 7a 53 71 6c 2c 20 30 2c 20  ec(db, zSql, 0, 
0a80: 30 2c 20 26 7a 45 72 72 4d 73 67 29 3b 0a 20 20  0, &zErrMsg);.  
0a90: 69 66 28 20 7a 45 72 72 4d 73 67 20 29 7b 0a 20  if( zErrMsg ){. 
0aa0: 20 20 20 73 71 6c 69 74 65 53 65 74 53 74 72 69     sqliteSetStri
0ab0: 6e 67 28 70 7a 45 72 72 4d 73 67 2c 20 7a 45 72  ng(pzErrMsg, zEr
0ac0: 72 4d 73 67 2c 20 28 63 68 61 72 2a 29 30 29 3b  rMsg, (char*)0);
0ad0: 0a 20 20 20 20 73 71 6c 69 74 65 5f 66 72 65 65  .    sqlite_free
0ae0: 6d 65 6d 28 7a 45 72 72 4d 73 67 29 3b 0a 20 20  mem(zErrMsg);.  
0af0: 7d 0a 20 20 72 65 74 75 72 6e 20 72 63 3b 0a 7d  }.  return rc;.}
0b00: 0a 0a 2f 2a 0a 2a 2a 20 54 68 69 73 20 69 73 20  ../*.** This is 
0b10: 74 68 65 20 73 65 63 6f 6e 64 20 73 74 61 67 65  the second stage
0b20: 20 63 61 6c 6c 62 61 63 6b 2e 20 20 45 61 63 68   callback.  Each
0b30: 20 69 6e 76 6f 63 61 74 69 6f 6e 20 63 6f 6e 74   invocation cont
0b40: 61 69 6e 73 20 61 6c 6c 20 74 68 65 0a 2a 2a 20  ains all the.** 
0b50: 64 61 74 61 20 66 6f 72 20 61 20 73 69 6e 67 6c  data for a singl
0b60: 65 20 72 6f 77 20 6f 66 20 61 20 73 69 6e 67 6c  e row of a singl
0b70: 65 20 74 61 62 6c 65 20 69 6e 20 74 68 65 20 6f  e table in the o
0b80: 72 69 67 69 6e 61 6c 20 64 61 74 61 62 61 73 65  riginal database
0b90: 2e 20 20 54 68 69 73 0a 2a 2a 20 72 6f 75 74 69  .  This.** routi
0ba0: 6e 65 20 6d 75 73 74 20 77 72 69 74 65 20 74 68  ne must write th
0bb0: 61 74 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 69  at information i
0bc0: 6e 74 6f 20 74 68 65 20 6e 65 77 20 64 61 74 61  nto the new data
0bd0: 62 61 73 65 2e 0a 2a 2f 0a 73 74 61 74 69 63 20  base..*/.static 
0be0: 69 6e 74 20 76 61 63 75 75 6d 43 61 6c 6c 62 61  int vacuumCallba
0bf0: 63 6b 32 28 76 6f 69 64 20 2a 70 41 72 67 2c 20  ck2(void *pArg, 
0c00: 69 6e 74 20 61 72 67 63 2c 20 63 68 61 72 20 2a  int argc, char *
0c10: 2a 61 72 67 76 2c 20 63 68 61 72 20 2a 2a 4e 6f  *argv, char **No
0c20: 74 55 73 65 64 29 7b 0a 20 20 76 61 63 75 75 6d  tUsed){.  vacuum
0c30: 53 74 72 75 63 74 20 2a 70 20 3d 20 28 76 61 63  Struct *p = (vac
0c40: 75 75 6d 53 74 72 75 63 74 2a 29 70 41 72 67 3b  uumStruct*)pArg;
0c50: 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a  .  const char *z
0c60: 53 65 70 20 3d 20 22 28 22 3b 0a 20 20 69 6e 74  Sep = "(";.  int
0c70: 20 69 3b 0a 0a 20 20 69 66 28 20 61 72 67 76 3d   i;..  if( argv=
0c80: 3d 30 20 29 20 72 65 74 75 72 6e 20 30 3b 0a 20  =0 ) return 0;. 
0c90: 20 70 2d 3e 73 32 2e 6e 55 73 65 64 20 3d 20 30   p->s2.nUsed = 0
0ca0: 3b 0a 20 20 61 70 70 65 6e 64 54 65 78 74 28 26  ;.  appendText(&
0cb0: 70 2d 3e 73 32 2c 20 22 49 4e 53 45 52 54 20 49  p->s2, "INSERT I
0cc0: 4e 54 4f 20 22 2c 20 2d 31 29 3b 0a 20 20 61 70  NTO ", -1);.  ap
0cd0: 70 65 6e 64 51 75 6f 74 65 64 28 26 70 2d 3e 73  pendQuoted(&p->s
0ce0: 32 2c 20 70 2d 3e 7a 54 61 62 6c 65 29 3b 0a 20  2, p->zTable);. 
0cf0: 20 61 70 70 65 6e 64 54 65 78 74 28 26 70 2d 3e   appendText(&p->
0d00: 73 32 2c 20 22 20 56 41 4c 55 45 53 22 2c 20 2d  s2, " VALUES", -
0d10: 31 29 3b 0a 20 20 66 6f 72 28 69 3d 30 3b 20 69  1);.  for(i=0; i
0d20: 3c 61 72 67 63 3b 20 69 2b 2b 29 7b 0a 20 20 20  <argc; i++){.   
0d30: 20 61 70 70 65 6e 64 54 65 78 74 28 26 70 2d 3e   appendText(&p->
0d40: 73 32 2c 20 7a 53 65 70 2c 20 31 29 3b 0a 20 20  s2, zSep, 1);.  
0d50: 20 20 7a 53 65 70 20 3d 20 22 2c 22 3b 0a 20 20    zSep = ",";.  
0d60: 20 20 69 66 28 20 61 72 67 76 5b 69 5d 3d 3d 30    if( argv[i]==0
0d70: 20 29 7b 0a 20 20 20 20 20 20 61 70 70 65 6e 64   ){.      append
0d80: 54 65 78 74 28 26 70 2d 3e 73 32 2c 20 22 4e 55  Text(&p->s2, "NU
0d90: 4c 4c 22 2c 20 34 29 3b 0a 20 20 20 20 7d 65 6c  LL", 4);.    }el
0da0: 73 65 7b 0a 20 20 20 20 20 20 61 70 70 65 6e 64  se{.      append
0db0: 51 75 6f 74 65 64 28 26 70 2d 3e 73 32 2c 20 61  Quoted(&p->s2, a
0dc0: 72 67 76 5b 69 5d 29 3b 0a 20 20 20 20 7d 0a 20  rgv[i]);.    }. 
0dd0: 20 7d 0a 20 20 61 70 70 65 6e 64 54 65 78 74 28   }.  appendText(
0de0: 26 70 2d 3e 73 32 2c 22 29 22 2c 20 31 29 3b 0a  &p->s2,")", 1);.
0df0: 20 20 70 2d 3e 72 63 20 3d 20 65 78 65 63 73 71    p->rc = execsq
0e00: 6c 28 70 2d 3e 70 7a 45 72 72 4d 73 67 2c 20 70  l(p->pzErrMsg, p
0e10: 2d 3e 64 62 4e 65 77 2c 20 70 2d 3e 73 32 2e 7a  ->dbNew, p->s2.z
0e20: 29 3b 0a 20 20 72 65 74 75 72 6e 20 70 2d 3e 72  );.  return p->r
0e30: 63 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 69 73  c;.}../*.** This
0e40: 20 69 73 20 74 68 65 20 66 69 72 73 74 20 73 74   is the first st
0e50: 61 67 65 20 63 61 6c 6c 62 61 63 6b 2e 20 20 45  age callback.  E
0e60: 61 63 68 20 69 6e 76 6f 63 61 74 69 6f 6e 20 63  ach invocation c
0e70: 6f 6e 74 61 69 6e 73 20 74 68 72 65 65 0a 2a 2a  ontains three.**
0e80: 20 61 72 67 75 6d 65 6e 74 73 20 77 68 65 72 65   arguments where
0e90: 20 61 72 65 20 74 61 6b 65 6e 20 66 72 6f 6d 20   are taken from 
0ea0: 74 68 65 20 53 51 4c 49 54 45 5f 4d 41 53 54 45  the SQLITE_MASTE
0eb0: 52 20 74 61 62 6c 65 20 6f 66 20 74 68 65 20 6f  R table of the o
0ec0: 72 69 67 69 6e 61 6c 0a 2a 2a 20 64 61 74 61 62  riginal.** datab
0ed0: 61 73 65 3a 20 20 28 31 29 20 74 68 65 20 65 6e  ase:  (1) the en
0ee0: 74 72 79 20 74 79 70 65 2c 20 28 32 29 20 74 68  try type, (2) th
0ef0: 65 20 65 6e 74 72 79 20 6e 61 6d 65 2c 20 61 6e  e entry name, an
0f00: 64 20 28 33 29 20 74 68 65 20 53 51 4c 20 66 6f  d (3) the SQL fo
0f10: 72 0a 2a 2a 20 74 68 65 20 65 6e 74 72 79 2e 20  r.** the entry. 
0f20: 20 49 6e 20 61 6c 6c 20 63 61 73 65 73 2c 20 65   In all cases, e
0f30: 78 65 63 75 74 65 20 74 68 65 20 53 51 4c 20 6f  xecute the SQL o
0f40: 66 20 74 68 65 20 74 68 69 72 64 20 61 72 67 75  f the third argu
0f50: 6d 65 6e 74 2e 0a 2a 2a 20 46 6f 72 20 74 61 62  ment..** For tab
0f60: 6c 65 73 2c 20 72 75 6e 20 61 20 71 75 65 72 79  les, run a query
0f70: 20 74 6f 20 73 65 6c 65 63 74 20 61 6c 6c 20 65   to select all e
0f80: 6e 74 72 69 65 73 20 69 6e 20 74 68 61 74 20 74  ntries in that t
0f90: 61 62 6c 65 20 61 6e 64 20 0a 2a 2a 20 74 72 61  able and .** tra
0fa0: 6e 73 66 65 72 20 74 68 65 6d 20 74 6f 20 74 68  nsfer them to th
0fb0: 65 20 73 65 63 6f 6e 64 2d 73 74 61 67 65 20 63  e second-stage c
0fc0: 61 6c 6c 62 61 63 6b 2e 0a 2a 2f 0a 73 74 61 74  allback..*/.stat
0fd0: 69 63 20 69 6e 74 20 76 61 63 75 75 6d 43 61 6c  ic int vacuumCal
0fe0: 6c 62 61 63 6b 31 28 76 6f 69 64 20 2a 70 41 72  lback1(void *pAr
0ff0: 67 2c 20 69 6e 74 20 61 72 67 63 2c 20 63 68 61  g, int argc, cha
1000: 72 20 2a 2a 61 72 67 76 2c 20 63 68 61 72 20 2a  r **argv, char *
1010: 2a 4e 6f 74 55 73 65 64 29 7b 0a 20 20 76 61 63  *NotUsed){.  vac
1020: 75 75 6d 53 74 72 75 63 74 20 2a 70 20 3d 20 28  uumStruct *p = (
1030: 76 61 63 75 75 6d 53 74 72 75 63 74 2a 29 70 41  vacuumStruct*)pA
1040: 72 67 3b 0a 20 20 69 6e 74 20 72 63 20 3d 20 30  rg;.  int rc = 0
1050: 3b 0a 20 20 61 73 73 65 72 74 28 20 61 72 67 63  ;.  assert( argc
1060: 3d 3d 33 20 29 3b 0a 20 20 69 66 28 20 61 72 67  ==3 );.  if( arg
1070: 76 3d 3d 30 20 29 20 72 65 74 75 72 6e 20 30 3b  v==0 ) return 0;
1080: 0a 20 20 61 73 73 65 72 74 28 20 61 72 67 76 5b  .  assert( argv[
1090: 30 5d 21 3d 30 20 29 3b 0a 20 20 61 73 73 65 72  0]!=0 );.  asser
10a0: 74 28 20 61 72 67 76 5b 31 5d 21 3d 30 20 29 3b  t( argv[1]!=0 );
10b0: 0a 20 20 61 73 73 65 72 74 28 20 61 72 67 76 5b  .  assert( argv[
10c0: 32 5d 21 3d 30 20 29 3b 0a 20 20 72 63 20 3d 20  2]!=0 );.  rc = 
10d0: 65 78 65 63 73 71 6c 28 70 2d 3e 70 7a 45 72 72  execsql(p->pzErr
10e0: 4d 73 67 2c 20 70 2d 3e 64 62 4e 65 77 2c 20 61  Msg, p->dbNew, a
10f0: 72 67 76 5b 32 5d 29 3b 0a 20 20 69 66 28 20 72  rgv[2]);.  if( r
1100: 63 3d 3d 53 51 4c 49 54 45 5f 4f 4b 20 26 26 20  c==SQLITE_OK && 
1110: 73 74 72 63 6d 70 28 61 72 67 76 5b 30 5d 2c 22  strcmp(argv[0],"
1120: 74 61 62 6c 65 22 29 3d 3d 30 20 29 7b 0a 20 20  table")==0 ){.  
1130: 20 20 63 68 61 72 20 2a 7a 45 72 72 4d 73 67 20    char *zErrMsg 
1140: 3d 20 30 3b 0a 20 20 20 20 70 2d 3e 73 31 2e 6e  = 0;.    p->s1.n
1150: 55 73 65 64 20 3d 20 30 3b 0a 20 20 20 20 61 70  Used = 0;.    ap
1160: 70 65 6e 64 54 65 78 74 28 26 70 2d 3e 73 31 2c  pendText(&p->s1,
1170: 20 22 53 45 4c 45 43 54 20 2a 20 46 52 4f 4d 20   "SELECT * FROM 
1180: 22 2c 20 2d 31 29 3b 0a 20 20 20 20 61 70 70 65  ", -1);.    appe
1190: 6e 64 51 75 6f 74 65 64 28 26 70 2d 3e 73 31 2c  ndQuoted(&p->s1,
11a0: 20 61 72 67 76 5b 31 5d 29 3b 0a 20 20 20 20 70   argv[1]);.    p
11b0: 2d 3e 7a 54 61 62 6c 65 20 3d 20 61 72 67 76 5b  ->zTable = argv[
11c0: 31 5d 3b 0a 20 20 20 20 72 63 20 3d 20 73 71 6c  1];.    rc = sql
11d0: 69 74 65 5f 65 78 65 63 28 70 2d 3e 64 62 4f 6c  ite_exec(p->dbOl
11e0: 64 2c 20 70 2d 3e 73 31 2e 7a 2c 20 76 61 63 75  d, p->s1.z, vacu
11f0: 75 6d 43 61 6c 6c 62 61 63 6b 32 2c 20 70 2c 20  umCallback2, p, 
1200: 26 7a 45 72 72 4d 73 67 29 3b 0a 20 20 20 20 69  &zErrMsg);.    i
1210: 66 28 20 7a 45 72 72 4d 73 67 20 29 7b 0a 20 20  f( zErrMsg ){.  
1220: 20 20 20 20 73 71 6c 69 74 65 53 65 74 53 74 72      sqliteSetStr
1230: 69 6e 67 28 70 2d 3e 70 7a 45 72 72 4d 73 67 2c  ing(p->pzErrMsg,
1240: 20 7a 45 72 72 4d 73 67 2c 20 28 63 68 61 72 2a   zErrMsg, (char*
1250: 29 30 29 3b 0a 20 20 20 20 20 20 73 71 6c 69 74  )0);.      sqlit
1260: 65 5f 66 72 65 65 6d 65 6d 28 7a 45 72 72 4d 73  e_freemem(zErrMs
1270: 67 29 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20  g);.    }.  }.  
1280: 69 66 28 20 72 63 21 3d 53 51 4c 49 54 45 5f 41  if( rc!=SQLITE_A
1290: 42 4f 52 54 20 29 20 70 2d 3e 72 63 20 3d 20 72  BORT ) p->rc = r
12a0: 63 3b 0a 20 20 72 65 74 75 72 6e 20 72 63 3b 0a  c;.  return rc;.
12b0: 7d 0a 0a 2f 2a 0a 2a 2a 20 47 65 6e 65 72 61 74  }../*.** Generat
12c0: 65 20 61 20 72 61 6e 64 6f 6d 20 6e 61 6d 65 20  e a random name 
12d0: 6f 66 20 32 30 20 63 68 61 72 61 63 74 65 72 20  of 20 character 
12e0: 69 6e 20 6c 65 6e 67 74 68 2e 0a 2a 2f 0a 73 74  in length..*/.st
12f0: 61 74 69 63 20 76 6f 69 64 20 72 61 6e 64 6f 6d  atic void random
1300: 4e 61 6d 65 28 75 6e 73 69 67 6e 65 64 20 63 68  Name(unsigned ch
1310: 61 72 20 2a 7a 42 75 66 29 7b 0a 20 20 73 74 61  ar *zBuf){.  sta
1320: 74 69 63 20 63 6f 6e 73 74 20 75 6e 73 69 67 6e  tic const unsign
1330: 65 64 20 63 68 61 72 20 7a 43 68 61 72 73 5b 5d  ed char zChars[]
1340: 20 3d 0a 20 20 20 20 22 61 62 63 64 65 66 67 68   =.    "abcdefgh
1350: 69 6a 6b 6c 6d 6e 6f 70 71 72 73 74 75 76 77 78  ijklmnopqrstuvwx
1360: 79 7a 22 0a 20 20 20 20 22 30 31 32 33 34 35 36  yz".    "0123456
1370: 37 38 39 22 3b 0a 20 20 69 6e 74 20 69 3b 0a 20  789";.  int i;. 
1380: 20 73 71 6c 69 74 65 52 61 6e 64 6f 6d 6e 65 73   sqliteRandomnes
1390: 73 28 32 30 2c 20 7a 42 75 66 29 3b 0a 20 20 66  s(20, zBuf);.  f
13a0: 6f 72 28 69 3d 30 3b 20 69 3c 32 30 3b 20 69 2b  or(i=0; i<20; i+
13b0: 2b 29 7b 0a 20 20 20 20 7a 42 75 66 5b 69 5d 20  +){.    zBuf[i] 
13c0: 3d 20 7a 43 68 61 72 73 5b 20 7a 42 75 66 5b 69  = zChars[ zBuf[i
13d0: 5d 25 28 73 69 7a 65 6f 66 28 7a 43 68 61 72 73  ]%(sizeof(zChars
13e0: 29 2d 31 29 20 5d 3b 0a 20 20 7d 0a 7d 0a 23 65  )-1) ];.  }.}.#e
13f0: 6e 64 69 66 0a 0a 2f 2a 0a 2a 2a 20 54 68 65 20  ndif../*.** The 
1400: 6e 6f 6e 2d 73 74 61 6e 64 61 72 64 20 56 41 43  non-standard VAC
1410: 55 55 4d 20 63 6f 6d 6d 61 6e 64 20 69 73 20 75  UUM command is u
1420: 73 65 64 20 74 6f 20 63 6c 65 61 6e 20 75 70 20  sed to clean up 
1430: 74 68 65 20 64 61 74 61 62 61 73 65 2c 0a 2a 2a  the database,.**
1440: 20 63 6f 6c 6c 61 70 73 65 20 66 72 65 65 20 73   collapse free s
1450: 70 61 63 65 2c 20 65 74 63 2e 20 20 49 74 20 69  pace, etc.  It i
1460: 73 20 6d 6f 64 65 6c 6c 65 64 20 61 66 74 65 72  s modelled after
1470: 20 74 68 65 20 56 41 43 55 55 4d 20 63 6f 6d 6d   the VACUUM comm
1480: 61 6e 64 0a 2a 2a 20 69 6e 20 50 6f 73 74 67 72  and.** in Postgr
1490: 65 53 51 4c 2e 0a 2a 2a 0a 2a 2a 20 49 6e 20 76  eSQL..**.** In v
14a0: 65 72 73 69 6f 6e 20 31 2e 30 2e 78 20 6f 66 20  ersion 1.0.x of 
14b0: 53 51 4c 69 74 65 2c 20 74 68 65 20 56 41 43 55  SQLite, the VACU
14c0: 55 4d 20 63 6f 6d 6d 61 6e 64 20 77 6f 75 6c 64  UM command would
14d0: 20 63 61 6c 6c 0a 2a 2a 20 67 64 62 6d 5f 72 65   call.** gdbm_re
14e0: 6f 72 67 61 6e 69 7a 65 28 29 20 6f 6e 20 61 6c  organize() on al
14f0: 6c 20 74 68 65 20 64 61 74 61 62 61 73 65 20 74  l the database t
1500: 61 62 6c 65 73 2e 20 20 42 75 74 20 62 65 67 69  ables.  But begi
1510: 6e 6e 69 6e 67 0a 2a 2a 20 77 69 74 68 20 32 2e  nning.** with 2.
1520: 30 2e 30 2c 20 53 51 4c 69 74 65 20 6e 6f 20 6c  0.0, SQLite no l
1530: 6f 6e 67 65 72 20 75 73 65 73 20 47 44 42 4d 20  onger uses GDBM 
1540: 73 6f 20 74 68 69 73 20 63 6f 6d 6d 61 6e 64 20  so this command 
1550: 68 61 73 0a 2a 2a 20 62 65 63 6f 6d 65 20 61 20  has.** become a 
1560: 6e 6f 2d 6f 70 2e 0a 2a 2f 0a 76 6f 69 64 20 73  no-op..*/.void s
1570: 71 6c 69 74 65 56 61 63 75 75 6d 28 50 61 72 73  qliteVacuum(Pars
1580: 65 20 2a 70 50 61 72 73 65 2c 20 54 6f 6b 65 6e  e *pParse, Token
1590: 20 2a 70 54 61 62 6c 65 4e 61 6d 65 29 7b 0a 20   *pTableName){. 
15a0: 20 56 64 62 65 20 2a 76 20 3d 20 73 71 6c 69 74   Vdbe *v = sqlit
15b0: 65 47 65 74 56 64 62 65 28 70 50 61 72 73 65 29  eGetVdbe(pParse)
15c0: 3b 0a 20 20 73 71 6c 69 74 65 56 64 62 65 41 64  ;.  sqliteVdbeAd
15d0: 64 4f 70 28 76 2c 20 4f 50 5f 56 61 63 75 75 6d  dOp(v, OP_Vacuum
15e0: 2c 20 30 2c 20 30 29 3b 0a 20 20 72 65 74 75 72  , 0, 0);.  retur
15f0: 6e 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 69 73  n;.}../*.** This
1600: 20 72 6f 75 74 69 6e 65 20 69 6d 70 6c 65 6d 65   routine impleme
1610: 6e 74 73 20 74 68 65 20 4f 50 5f 56 61 63 75 75  nts the OP_Vacuu
1620: 6d 20 6f 70 63 6f 64 65 20 6f 66 20 74 68 65 20  m opcode of the 
1630: 56 44 42 45 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c  VDBE..*/.int sql
1640: 69 74 65 52 75 6e 56 61 63 75 75 6d 28 63 68 61  iteRunVacuum(cha
1650: 72 20 2a 2a 70 7a 45 72 72 4d 73 67 2c 20 73 71  r **pzErrMsg, sq
1660: 6c 69 74 65 20 2a 64 62 29 7b 0a 23 69 66 20 21  lite *db){.#if !
1670: 64 65 66 69 6e 65 64 28 53 51 4c 49 54 45 5f 4f  defined(SQLITE_O
1680: 4d 49 54 5f 56 41 43 55 55 4d 29 20 7c 7c 20 53  MIT_VACUUM) || S
1690: 51 4c 49 54 45 5f 4f 4d 49 54 5f 56 41 43 55 55  QLITE_OMIT_VACUU
16a0: 4d 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a  M.  const char *
16b0: 7a 46 69 6c 65 6e 61 6d 65 3b 20 20 2f 2a 20 66  zFilename;  /* f
16c0: 75 6c 6c 20 70 61 74 68 6e 61 6d 65 20 6f 66 20  ull pathname of 
16d0: 74 68 65 20 64 61 74 61 62 61 73 65 20 66 69 6c  the database fil
16e0: 65 20 2a 2f 0a 20 20 69 6e 74 20 6e 46 69 6c 65  e */.  int nFile
16f0: 6e 61 6d 65 3b 20 20 20 20 20 20 20 20 20 20 2f  name;          /
1700: 2a 20 6e 75 6d 62 65 72 20 6f 66 20 63 68 61 72  * number of char
1710: 61 63 74 65 72 73 20 20 69 6e 20 7a 46 69 6c 65  acters  in zFile
1720: 6e 61 6d 65 5b 5d 20 2a 2f 0a 20 20 63 68 61 72  name[] */.  char
1730: 20 2a 7a 54 65 6d 70 20 3d 20 30 3b 20 20 20 20   *zTemp = 0;    
1740: 20 20 20 20 2f 2a 20 61 20 74 65 6d 70 6f 72 61      /* a tempora
1750: 72 79 20 66 69 6c 65 20 69 6e 20 73 61 6d 65 20  ry file in same 
1760: 64 69 72 65 63 74 6f 72 79 20 61 73 20 7a 46 69  directory as zFi
1770: 6c 65 6e 61 6d 65 20 2a 2f 0a 20 20 73 71 6c 69  lename */.  sqli
1780: 74 65 20 2a 64 62 4e 65 77 20 3d 20 30 3b 20 20  te *dbNew = 0;  
1790: 20 20 20 20 2f 2a 20 54 68 65 20 6e 65 77 20 76      /* The new v
17a0: 61 63 75 75 6d 65 64 20 64 61 74 61 62 61 73 65  acuumed database
17b0: 20 2a 2f 0a 20 20 69 6e 74 20 72 63 20 3d 20 53   */.  int rc = S
17c0: 51 4c 49 54 45 5f 4f 4b 3b 20 20 20 20 20 2f 2a  QLITE_OK;     /*
17d0: 20 52 65 74 75 72 6e 20 63 6f 64 65 20 66 72 6f   Return code fro
17e0: 6d 20 73 65 72 76 69 63 65 20 72 6f 75 74 69 6e  m service routin
17f0: 65 73 20 2a 2f 0a 20 20 69 6e 74 20 69 3b 20 20  es */.  int i;  
1800: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
1810: 2f 2a 20 4c 6f 6f 70 20 63 6f 75 6e 74 65 72 20  /* Loop counter 
1820: 2a 2f 0a 20 20 63 68 61 72 20 2a 7a 45 72 72 4d  */.  char *zErrM
1830: 73 67 3b 20 20 20 20 20 20 20 20 20 20 2f 2a 20  sg;          /* 
1840: 45 72 72 6f 72 20 6d 65 73 73 61 67 65 20 2a 2f  Error message */
1850: 0a 20 20 76 61 63 75 75 6d 53 74 72 75 63 74 20  .  vacuumStruct 
1860: 73 56 61 63 3b 20 20 20 20 20 20 2f 2a 20 49 6e  sVac;      /* In
1870: 66 6f 72 6d 61 74 69 6f 6e 20 70 61 73 73 65 64  formation passed
1880: 20 74 6f 20 63 61 6c 6c 62 61 63 6b 73 20 2a 2f   to callbacks */
1890: 0a 0a 20 20 69 66 28 20 64 62 2d 3e 66 6c 61 67  ..  if( db->flag
18a0: 73 20 26 20 53 51 4c 49 54 45 5f 49 6e 54 72 61  s & SQLITE_InTra
18b0: 6e 73 20 29 7b 0a 20 20 20 20 73 71 6c 69 74 65  ns ){.    sqlite
18c0: 53 65 74 53 74 72 69 6e 67 28 70 7a 45 72 72 4d  SetString(pzErrM
18d0: 73 67 2c 20 22 63 61 6e 6e 6f 74 20 56 41 43 55  sg, "cannot VACU
18e0: 55 4d 20 66 72 6f 6d 20 77 69 74 68 69 6e 20 61  UM from within a
18f0: 20 74 72 61 6e 73 61 63 74 69 6f 6e 22 2c 20 0a   transaction", .
1900: 20 20 20 20 20 20 20 28 63 68 61 72 2a 29 30 29         (char*)0)
1910: 3b 0a 20 20 20 20 72 65 74 75 72 6e 20 53 51 4c  ;.    return SQL
1920: 49 54 45 5f 45 52 52 4f 52 3b 0a 20 20 7d 0a 20  ITE_ERROR;.  }. 
1930: 20 69 66 28 20 64 62 2d 3e 66 6c 61 67 73 20 26   if( db->flags &
1940: 20 53 51 4c 49 54 45 5f 49 6e 74 65 72 72 75 70   SQLITE_Interrup
1950: 74 20 29 7b 0a 20 20 20 20 72 65 74 75 72 6e 20  t ){.    return 
1960: 53 51 4c 49 54 45 5f 49 4e 54 45 52 52 55 50 54  SQLITE_INTERRUPT
1970: 3b 0a 20 20 7d 0a 20 20 6d 65 6d 73 65 74 28 26  ;.  }.  memset(&
1980: 73 56 61 63 2c 20 30 2c 20 73 69 7a 65 6f 66 28  sVac, 0, sizeof(
1990: 73 56 61 63 29 29 3b 0a 0a 20 20 2f 2a 20 47 65  sVac));..  /* Ge
19a0: 74 20 74 68 65 20 66 75 6c 6c 20 70 61 74 68 6e  t the full pathn
19b0: 61 6d 65 20 6f 66 20 74 68 65 20 64 61 74 61 62  ame of the datab
19c0: 61 73 65 20 66 69 6c 65 20 61 6e 64 20 63 72 65  ase file and cre
19d0: 61 74 65 20 74 77 6f 0a 20 20 2a 2a 20 74 65 6d  ate two.  ** tem
19e0: 70 6f 72 61 72 79 20 66 69 6c 65 6e 61 6d 65 73  porary filenames
19f0: 20 69 6e 20 74 68 65 20 73 61 6d 65 20 64 69 72   in the same dir
1a00: 65 63 74 6f 72 79 20 61 73 20 74 68 65 20 6f 72  ectory as the or
1a10: 69 67 69 6e 61 6c 20 66 69 6c 65 2e 0a 20 20 2a  iginal file..  *
1a20: 2f 0a 20 20 7a 46 69 6c 65 6e 61 6d 65 20 3d 20  /.  zFilename = 
1a30: 73 71 6c 69 74 65 42 74 72 65 65 47 65 74 46 69  sqliteBtreeGetFi
1a40: 6c 65 6e 61 6d 65 28 64 62 2d 3e 61 44 62 5b 30  lename(db->aDb[0
1a50: 5d 2e 70 42 74 29 3b 0a 20 20 69 66 28 20 7a 46  ].pBt);.  if( zF
1a60: 69 6c 65 6e 61 6d 65 3d 3d 30 20 29 7b 0a 20 20  ilename==0 ){.  
1a70: 20 20 2f 2a 20 54 68 69 73 20 6f 6e 6c 79 20 68    /* This only h
1a80: 61 70 70 65 6e 73 20 77 69 74 68 20 74 68 65 20  appens with the 
1a90: 69 6e 2d 6d 65 6d 6f 72 79 20 64 61 74 61 62 61  in-memory databa
1aa0: 73 65 2e 20 20 56 41 43 55 55 4d 20 69 73 20 61  se.  VACUUM is a
1ab0: 20 6e 6f 2d 6f 70 0a 20 20 20 20 2a 2a 20 74 68   no-op.    ** th
1ac0: 65 72 65 2c 20 73 6f 20 6a 75 73 74 20 72 65 74  ere, so just ret
1ad0: 75 72 6e 20 2a 2f 0a 20 20 20 20 72 65 74 75 72  urn */.    retur
1ae0: 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 20 20 7d  n SQLITE_OK;.  }
1af0: 0a 20 20 6e 46 69 6c 65 6e 61 6d 65 20 3d 20 73  .  nFilename = s
1b00: 74 72 6c 65 6e 28 7a 46 69 6c 65 6e 61 6d 65 29  trlen(zFilename)
1b10: 3b 0a 20 20 7a 54 65 6d 70 20 3d 20 73 71 6c 69  ;.  zTemp = sqli
1b20: 74 65 4d 61 6c 6c 6f 63 28 20 6e 46 69 6c 65 6e  teMalloc( nFilen
1b30: 61 6d 65 2b 31 30 30 20 29 3b 0a 20 20 69 66 28  ame+100 );.  if(
1b40: 20 7a 54 65 6d 70 3d 3d 30 20 29 20 72 65 74 75   zTemp==0 ) retu
1b50: 72 6e 20 53 51 4c 49 54 45 5f 4e 4f 4d 45 4d 3b  rn SQLITE_NOMEM;
1b60: 0a 20 20 73 74 72 63 70 79 28 7a 54 65 6d 70 2c  .  strcpy(zTemp,
1b70: 20 7a 46 69 6c 65 6e 61 6d 65 29 3b 0a 20 20 66   zFilename);.  f
1b80: 6f 72 28 69 3d 30 3b 20 69 3c 31 30 3b 20 69 2b  or(i=0; i<10; i+
1b90: 2b 29 7b 0a 20 20 20 20 7a 54 65 6d 70 5b 6e 46  +){.    zTemp[nF
1ba0: 69 6c 65 6e 61 6d 65 5d 20 3d 20 27 2d 27 3b 0a  ilename] = '-';.
1bb0: 20 20 20 20 72 61 6e 64 6f 6d 4e 61 6d 65 28 28      randomName((
1bc0: 75 6e 73 69 67 6e 65 64 20 63 68 61 72 2a 29 26  unsigned char*)&
1bd0: 7a 54 65 6d 70 5b 6e 46 69 6c 65 6e 61 6d 65 2b  zTemp[nFilename+
1be0: 31 5d 29 3b 0a 20 20 20 20 69 66 28 20 21 73 71  1]);.    if( !sq
1bf0: 6c 69 74 65 4f 73 46 69 6c 65 45 78 69 73 74 73  liteOsFileExists
1c00: 28 7a 54 65 6d 70 29 20 29 20 62 72 65 61 6b 3b  (zTemp) ) break;
1c10: 0a 20 20 7d 0a 20 20 69 66 28 20 69 3e 3d 31 30  .  }.  if( i>=10
1c20: 20 29 7b 0a 20 20 20 20 73 71 6c 69 74 65 53 65   ){.    sqliteSe
1c30: 74 53 74 72 69 6e 67 28 70 7a 45 72 72 4d 73 67  tString(pzErrMsg
1c40: 2c 20 22 75 6e 61 62 6c 65 20 74 6f 20 63 72 65  , "unable to cre
1c50: 61 74 65 20 61 20 74 65 6d 70 6f 72 61 72 79 20  ate a temporary 
1c60: 64 61 74 61 62 61 73 65 20 66 69 6c 65 20 22 0a  database file ".
1c70: 20 20 20 20 20 20 20 22 69 6e 20 74 68 65 20 73         "in the s
1c80: 61 6d 65 20 64 69 72 65 63 74 6f 72 79 20 61 73  ame directory as
1c90: 20 74 68 65 20 6f 72 69 67 69 6e 61 6c 20 64 61   the original da
1ca0: 74 61 62 61 73 65 22 2c 20 28 63 68 61 72 2a 29  tabase", (char*)
1cb0: 30 29 3b 0a 20 20 20 20 67 6f 74 6f 20 65 6e 64  0);.    goto end
1cc0: 5f 6f 66 5f 76 61 63 75 75 6d 3b 0a 20 20 7d 0a  _of_vacuum;.  }.
1cd0: 0a 20 20 0a 20 20 64 62 4e 65 77 20 3d 20 73 71  .  .  dbNew = sq
1ce0: 6c 69 74 65 5f 6f 70 65 6e 28 7a 54 65 6d 70 2c  lite_open(zTemp,
1cf0: 20 30 2c 20 26 7a 45 72 72 4d 73 67 29 3b 0a 20   0, &zErrMsg);. 
1d00: 20 69 66 28 20 64 62 4e 65 77 3d 3d 30 20 29 7b   if( dbNew==0 ){
1d10: 0a 20 20 20 20 73 71 6c 69 74 65 53 65 74 53 74  .    sqliteSetSt
1d20: 72 69 6e 67 28 70 7a 45 72 72 4d 73 67 2c 20 22  ring(pzErrMsg, "
1d30: 75 6e 61 62 6c 65 20 74 6f 20 6f 70 65 6e 20 61  unable to open a
1d40: 20 74 65 6d 70 6f 72 61 72 79 20 64 61 74 61 62   temporary datab
1d50: 61 73 65 20 61 74 20 22 2c 0a 20 20 20 20 20 20  ase at ",.      
1d60: 20 7a 54 65 6d 70 2c 20 22 20 2d 20 22 2c 20 7a   zTemp, " - ", z
1d70: 45 72 72 4d 73 67 2c 20 28 63 68 61 72 2a 29 30  ErrMsg, (char*)0
1d80: 29 3b 0a 20 20 20 20 67 6f 74 6f 20 65 6e 64 5f  );.    goto end_
1d90: 6f 66 5f 76 61 63 75 75 6d 3b 0a 20 20 7d 0a 20  of_vacuum;.  }. 
1da0: 20 69 66 28 20 28 72 63 20 3d 20 65 78 65 63 73   if( (rc = execs
1db0: 71 6c 28 70 7a 45 72 72 4d 73 67 2c 20 64 62 2c  ql(pzErrMsg, db,
1dc0: 20 22 42 45 47 49 4e 22 29 29 21 3d 30 20 29 20   "BEGIN"))!=0 ) 
1dd0: 67 6f 74 6f 20 65 6e 64 5f 6f 66 5f 76 61 63 75  goto end_of_vacu
1de0: 75 6d 3b 0a 20 20 69 66 28 20 28 72 63 20 3d 20  um;.  if( (rc = 
1df0: 65 78 65 63 73 71 6c 28 70 7a 45 72 72 4d 73 67  execsql(pzErrMsg
1e00: 2c 20 64 62 4e 65 77 2c 20 22 50 52 41 47 4d 41  , dbNew, "PRAGMA
1e10: 20 73 79 6e 63 68 72 6f 6e 6f 75 73 3d 6f 66 66   synchronous=off
1e20: 3b 20 42 45 47 49 4e 22 29 29 21 3d 30 20 29 7b  ; BEGIN"))!=0 ){
1e30: 0a 20 20 20 20 67 6f 74 6f 20 65 6e 64 5f 6f 66  .    goto end_of
1e40: 5f 76 61 63 75 75 6d 3b 0a 20 20 7d 0a 20 20 0a  _vacuum;.  }.  .
1e50: 20 20 73 56 61 63 2e 64 62 4f 6c 64 20 3d 20 64    sVac.dbOld = d
1e60: 62 3b 0a 20 20 73 56 61 63 2e 64 62 4e 65 77 20  b;.  sVac.dbNew 
1e70: 3d 20 64 62 4e 65 77 3b 0a 20 20 73 56 61 63 2e  = dbNew;.  sVac.
1e80: 70 7a 45 72 72 4d 73 67 20 3d 20 70 7a 45 72 72  pzErrMsg = pzErr
1e90: 4d 73 67 3b 0a 20 20 69 66 28 20 72 63 3d 3d 53  Msg;.  if( rc==S
1ea0: 51 4c 49 54 45 5f 4f 4b 20 29 7b 0a 20 20 20 20  QLITE_OK ){.    
1eb0: 72 63 20 3d 20 73 71 6c 69 74 65 5f 65 78 65 63  rc = sqlite_exec
1ec0: 28 64 62 2c 20 0a 20 20 20 20 20 20 22 53 45 4c  (db, .      "SEL
1ed0: 45 43 54 20 74 79 70 65 2c 20 6e 61 6d 65 2c 20  ECT type, name, 
1ee0: 73 71 6c 20 46 52 4f 4d 20 73 71 6c 69 74 65 5f  sql FROM sqlite_
1ef0: 6d 61 73 74 65 72 20 22 0a 20 20 20 20 20 20 22  master ".      "
1f00: 57 48 45 52 45 20 73 71 6c 20 4e 4f 54 20 4e 55  WHERE sql NOT NU
1f10: 4c 4c 20 41 4e 44 20 74 79 70 65 21 3d 27 76 69  LL AND type!='vi
1f20: 65 77 27 20 22 0a 20 20 20 20 20 20 22 55 4e 49  ew' ".      "UNI
1f30: 4f 4e 20 41 4c 4c 20 22 0a 20 20 20 20 20 20 22  ON ALL ".      "
1f40: 53 45 4c 45 43 54 20 74 79 70 65 2c 20 6e 61 6d  SELECT type, nam
1f50: 65 2c 20 73 71 6c 20 46 52 4f 4d 20 73 71 6c 69  e, sql FROM sqli
1f60: 74 65 5f 6d 61 73 74 65 72 20 22 0a 20 20 20 20  te_master ".    
1f70: 20 20 22 57 48 45 52 45 20 73 71 6c 20 4e 4f 54    "WHERE sql NOT
1f80: 20 4e 55 4c 4c 20 41 4e 44 20 74 79 70 65 3d 3d   NULL AND type==
1f90: 27 76 69 65 77 27 22 2c 0a 20 20 20 20 20 20 76  'view'",.      v
1fa0: 61 63 75 75 6d 43 61 6c 6c 62 61 63 6b 31 2c 20  acuumCallback1, 
1fb0: 26 73 56 61 63 2c 20 26 7a 45 72 72 4d 73 67 29  &sVac, &zErrMsg)
1fc0: 3b 0a 20 20 7d 0a 20 20 69 66 28 20 72 63 3d 3d  ;.  }.  if( rc==
1fd0: 53 51 4c 49 54 45 5f 4f 4b 20 29 7b 0a 20 20 20  SQLITE_OK ){.   
1fe0: 20 69 6e 74 20 6d 65 74 61 31 5b 53 51 4c 49 54   int meta1[SQLIT
1ff0: 45 5f 4e 5f 42 54 52 45 45 5f 4d 45 54 41 5d 3b  E_N_BTREE_META];
2000: 0a 20 20 20 20 69 6e 74 20 6d 65 74 61 32 5b 53  .    int meta2[S
2010: 51 4c 49 54 45 5f 4e 5f 42 54 52 45 45 5f 4d 45  QLITE_N_BTREE_ME
2020: 54 41 5d 3b 0a 20 20 20 20 73 71 6c 69 74 65 42  TA];.    sqliteB
2030: 74 72 65 65 47 65 74 4d 65 74 61 28 64 62 2d 3e  treeGetMeta(db->
2040: 61 44 62 5b 30 5d 2e 70 42 74 2c 20 6d 65 74 61  aDb[0].pBt, meta
2050: 31 29 3b 0a 20 20 20 20 73 71 6c 69 74 65 42 74  1);.    sqliteBt
2060: 72 65 65 47 65 74 4d 65 74 61 28 64 62 4e 65 77  reeGetMeta(dbNew
2070: 2d 3e 61 44 62 5b 30 5d 2e 70 42 74 2c 20 6d 65  ->aDb[0].pBt, me
2080: 74 61 32 29 3b 0a 20 20 20 20 6d 65 74 61 32 5b  ta2);.    meta2[
2090: 31 5d 20 3d 20 6d 65 74 61 31 5b 31 5d 2b 31 3b  1] = meta1[1]+1;
20a0: 0a 20 20 20 20 6d 65 74 61 32 5b 33 5d 20 3d 20  .    meta2[3] = 
20b0: 6d 65 74 61 31 5b 33 5d 3b 0a 20 20 20 20 6d 65  meta1[3];.    me
20c0: 74 61 32 5b 34 5d 20 3d 20 6d 65 74 61 31 5b 34  ta2[4] = meta1[4
20d0: 5d 3b 0a 20 20 20 20 6d 65 74 61 32 5b 36 5d 20  ];.    meta2[6] 
20e0: 3d 20 6d 65 74 61 31 5b 36 5d 3b 0a 20 20 20 20  = meta1[6];.    
20f0: 72 63 20 3d 20 73 71 6c 69 74 65 42 74 72 65 65  rc = sqliteBtree
2100: 55 70 64 61 74 65 4d 65 74 61 28 64 62 4e 65 77  UpdateMeta(dbNew
2110: 2d 3e 61 44 62 5b 30 5d 2e 70 42 74 2c 20 6d 65  ->aDb[0].pBt, me
2120: 74 61 32 29 3b 0a 20 20 7d 0a 20 20 69 66 28 20  ta2);.  }.  if( 
2130: 72 63 3d 3d 53 51 4c 49 54 45 5f 4f 4b 20 29 7b  rc==SQLITE_OK ){
2140: 0a 20 20 20 20 72 63 20 3d 20 73 71 6c 69 74 65  .    rc = sqlite
2150: 42 74 72 65 65 43 6f 70 79 46 69 6c 65 28 64 62  BtreeCopyFile(db
2160: 2d 3e 61 44 62 5b 30 5d 2e 70 42 74 2c 20 64 62  ->aDb[0].pBt, db
2170: 4e 65 77 2d 3e 61 44 62 5b 30 5d 2e 70 42 74 29  New->aDb[0].pBt)
2180: 3b 0a 20 20 20 20 73 71 6c 69 74 65 5f 65 78 65  ;.    sqlite_exe
2190: 63 28 64 62 2c 20 22 43 4f 4d 4d 49 54 22 2c 20  c(db, "COMMIT", 
21a0: 30 2c 20 30 2c 20 30 29 3b 0a 20 20 20 20 73 71  0, 0, 0);.    sq
21b0: 6c 69 74 65 52 65 73 65 74 49 6e 74 65 72 6e 61  liteResetInterna
21c0: 6c 53 63 68 65 6d 61 28 64 62 2c 20 30 29 3b 0a  lSchema(db, 0);.
21d0: 20 20 7d 0a 0a 65 6e 64 5f 6f 66 5f 76 61 63 75    }..end_of_vacu
21e0: 75 6d 3a 0a 20 20 69 66 28 20 72 63 20 26 26 20  um:.  if( rc && 
21f0: 7a 45 72 72 4d 73 67 21 3d 30 20 29 7b 0a 20 20  zErrMsg!=0 ){.  
2200: 20 20 73 71 6c 69 74 65 53 65 74 53 74 72 69 6e    sqliteSetStrin
2210: 67 28 70 7a 45 72 72 4d 73 67 2c 20 22 75 6e 61  g(pzErrMsg, "una
2220: 62 6c 65 20 74 6f 20 76 61 63 75 75 6d 20 64 61  ble to vacuum da
2230: 74 61 62 61 73 65 20 2d 20 22 2c 20 0a 20 20 20  tabase - ", .   
2240: 20 20 20 20 7a 45 72 72 4d 73 67 2c 20 28 63 68      zErrMsg, (ch
2250: 61 72 2a 29 30 29 3b 0a 20 20 7d 0a 20 20 73 71  ar*)0);.  }.  sq
2260: 6c 69 74 65 5f 65 78 65 63 28 64 62 2c 20 22 52  lite_exec(db, "R
2270: 4f 4c 4c 42 41 43 4b 22 2c 20 30 2c 20 30 2c 20  OLLBACK", 0, 0, 
2280: 30 29 3b 0a 20 20 69 66 28 20 28 64 62 4e 65 77  0);.  if( (dbNew
2290: 20 26 26 20 28 64 62 4e 65 77 2d 3e 66 6c 61 67   && (dbNew->flag
22a0: 73 20 26 20 53 51 4c 49 54 45 5f 49 6e 74 65 72  s & SQLITE_Inter
22b0: 72 75 70 74 29 29 20 0a 20 20 20 20 20 20 20 20  rupt)) .        
22c0: 20 7c 7c 20 28 64 62 2d 3e 66 6c 61 67 73 20 26   || (db->flags &
22d0: 20 53 51 4c 49 54 45 5f 49 6e 74 65 72 72 75 70   SQLITE_Interrup
22e0: 74 29 20 29 7b 0a 20 20 20 20 72 63 20 3d 20 53  t) ){.    rc = S
22f0: 51 4c 49 54 45 5f 49 4e 54 45 52 52 55 50 54 3b  QLITE_INTERRUPT;
2300: 0a 20 20 7d 0a 20 20 69 66 28 20 64 62 4e 65 77  .  }.  if( dbNew
2310: 20 29 20 73 71 6c 69 74 65 5f 63 6c 6f 73 65 28   ) sqlite_close(
2320: 64 62 4e 65 77 29 3b 0a 20 20 73 71 6c 69 74 65  dbNew);.  sqlite
2330: 4f 73 44 65 6c 65 74 65 28 7a 54 65 6d 70 29 3b  OsDelete(zTemp);
2340: 0a 20 20 73 71 6c 69 74 65 46 72 65 65 28 7a 54  .  sqliteFree(zT
2350: 65 6d 70 29 3b 0a 20 20 73 71 6c 69 74 65 46 72  emp);.  sqliteFr
2360: 65 65 28 73 56 61 63 2e 73 31 2e 7a 29 3b 0a 20  ee(sVac.s1.z);. 
2370: 20 73 71 6c 69 74 65 46 72 65 65 28 73 56 61 63   sqliteFree(sVac
2380: 2e 73 32 2e 7a 29 3b 0a 20 20 69 66 28 20 7a 45  .s2.z);.  if( zE
2390: 72 72 4d 73 67 20 29 20 73 71 6c 69 74 65 5f 66  rrMsg ) sqlite_f
23a0: 72 65 65 6d 65 6d 28 7a 45 72 72 4d 73 67 29 3b  reemem(zErrMsg);
23b0: 0a 20 20 69 66 28 20 72 63 3d 3d 53 51 4c 49 54  .  if( rc==SQLIT
23c0: 45 5f 41 42 4f 52 54 20 26 26 20 73 56 61 63 2e  E_ABORT && sVac.
23d0: 72 63 21 3d 53 51 4c 49 54 45 5f 49 4e 54 45 52  rc!=SQLITE_INTER
23e0: 52 55 50 54 20 29 20 73 56 61 63 2e 72 63 20 3d  RUPT ) sVac.rc =
23f0: 20 53 51 4c 49 54 45 5f 45 52 52 4f 52 3b 0a 20   SQLITE_ERROR;. 
2400: 20 72 65 74 75 72 6e 20 73 56 61 63 2e 72 63 3b   return sVac.rc;
2410: 0a 23 65 6e 64 69 66 0a 7d 0a                    .#endif.}.