/ Hex Artifact Content
Login

Artifact 1145fa169021d7fb3962fab6e99f5f8fc2608f8a:


0000: 2f 2a 0a 2a 2a 20 32 30 30 33 20 53 65 70 74 65  /*.** 2003 Septe
0010: 6d 62 65 72 20 36 0a 2a 2a 0a 2a 2a 20 54 68 65  mber 6.**.** The
0020: 20 61 75 74 68 6f 72 20 64 69 73 63 6c 61 69 6d   author disclaim
0030: 73 20 63 6f 70 79 72 69 67 68 74 20 74 6f 20 74  s copyright to t
0040: 68 69 73 20 73 6f 75 72 63 65 20 63 6f 64 65 2e  his source code.
0050: 20 20 49 6e 20 70 6c 61 63 65 20 6f 66 0a 2a 2a    In place of.**
0060: 20 61 20 6c 65 67 61 6c 20 6e 6f 74 69 63 65 2c   a legal notice,
0070: 20 68 65 72 65 20 69 73 20 61 20 62 6c 65 73 73   here is a bless
0080: 69 6e 67 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 4d 61  ing:.**.**    Ma
0090: 79 20 79 6f 75 20 64 6f 20 67 6f 6f 64 20 61 6e  y you do good an
00a0: 64 20 6e 6f 74 20 65 76 69 6c 2e 0a 2a 2a 20 20  d not evil..**  
00b0: 20 20 4d 61 79 20 79 6f 75 20 66 69 6e 64 20 66    May you find f
00c0: 6f 72 67 69 76 65 6e 65 73 73 20 66 6f 72 20 79  orgiveness for y
00d0: 6f 75 72 73 65 6c 66 20 61 6e 64 20 66 6f 72 67  ourself and forg
00e0: 69 76 65 20 6f 74 68 65 72 73 2e 0a 2a 2a 20 20  ive others..**  
00f0: 20 20 4d 61 79 20 79 6f 75 20 73 68 61 72 65 20    May you share 
0100: 66 72 65 65 6c 79 2c 20 6e 65 76 65 72 20 74 61  freely, never ta
0110: 6b 69 6e 67 20 6d 6f 72 65 20 74 68 61 6e 20 79  king more than y
0120: 6f 75 20 67 69 76 65 2e 0a 2a 2a 0a 2a 2a 2a 2a  ou give..**.****
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 2a 2a 2a 2a 0a 2a 2a 20 54 68 69 73 20 66 69  *****.** This fi
0180: 6c 65 20 63 6f 6e 74 61 69 6e 73 20 63 6f 64 65  le contains code
0190: 20 75 73 65 64 20 66 6f 72 20 63 72 65 61 74 69   used for creati
01a0: 6e 67 2c 20 64 65 73 74 72 6f 79 69 6e 67 2c 20  ng, destroying, 
01b0: 61 6e 64 20 70 6f 70 75 6c 61 74 69 6e 67 0a 2a  and populating.*
01c0: 2a 20 61 20 56 44 42 45 20 28 6f 72 20 61 6e 20  * a VDBE (or an 
01d0: 22 73 71 6c 69 74 65 5f 76 6d 22 20 61 73 20 69  "sqlite_vm" as i
01e0: 74 20 69 73 20 6b 6e 6f 77 6e 20 74 6f 20 74 68  t is known to th
01f0: 65 20 6f 75 74 73 69 64 65 20 77 6f 72 6c 64 2e  e outside world.
0200: 29 20 20 50 72 69 6f 72 0a 2a 2a 20 74 6f 20 76  )  Prior.** to v
0210: 65 72 73 69 6f 6e 20 32 2e 38 2e 37 2c 20 61 6c  ersion 2.8.7, al
0220: 6c 20 74 68 69 73 20 63 6f 64 65 20 77 61 73 20  l this code was 
0230: 63 6f 6d 62 69 6e 65 64 20 69 6e 74 6f 20 74 68  combined into th
0240: 65 20 76 64 62 65 2e 63 20 73 6f 75 72 63 65 20  e vdbe.c source 
0250: 66 69 6c 65 2e 0a 2a 2a 20 42 75 74 20 74 68 61  file..** But tha
0260: 74 20 66 69 6c 65 20 77 61 73 20 67 65 74 74 69  t file was getti
0270: 6e 67 20 74 6f 6f 20 62 69 67 20 73 6f 20 74 68  ng too big so th
0280: 69 73 20 73 75 62 72 6f 75 74 69 6e 65 73 20 77  is subroutines w
0290: 65 72 65 20 73 70 6c 69 74 20 6f 75 74 2e 0a 2a  ere split out..*
02a0: 2f 0a 23 69 6e 63 6c 75 64 65 20 22 73 71 6c 69  /.#include "sqli
02b0: 74 65 49 6e 74 2e 68 22 0a 23 69 6e 63 6c 75 64  teInt.h".#includ
02c0: 65 20 22 6f 73 2e 68 22 0a 23 69 6e 63 6c 75 64  e "os.h".#includ
02d0: 65 20 3c 63 74 79 70 65 2e 68 3e 0a 23 69 6e 63  e <ctype.h>.#inc
02e0: 6c 75 64 65 20 22 76 64 62 65 49 6e 74 2e 68 22  lude "vdbeInt.h"
02f0: 0a 0a 0a 2f 2a 0a 2a 2a 20 57 68 65 6e 20 64 65  .../*.** When de
0300: 62 75 67 67 69 6e 67 20 74 68 65 20 63 6f 64 65  bugging the code
0310: 20 67 65 6e 65 72 61 74 6f 72 20 69 6e 20 61 20   generator in a 
0320: 73 79 6d 62 6f 6c 69 63 20 64 65 62 75 67 67 65  symbolic debugge
0330: 72 2c 20 6f 6e 65 20 63 61 6e 0a 2a 2a 20 73 65  r, one can.** se
0340: 74 20 74 68 65 20 73 71 6c 69 74 65 5f 76 64 62  t the sqlite_vdb
0350: 65 5f 61 64 64 6f 70 5f 74 72 61 63 65 20 74 6f  e_addop_trace to
0360: 20 31 20 61 6e 64 20 61 6c 6c 20 6f 70 63 6f 64   1 and all opcod
0370: 65 73 20 77 69 6c 6c 20 62 65 20 70 72 69 6e 74  es will be print
0380: 65 64 0a 2a 2a 20 61 73 20 74 68 65 79 20 61 72  ed.** as they ar
0390: 65 20 61 64 64 65 64 20 74 6f 20 74 68 65 20 69  e added to the i
03a0: 6e 73 74 72 75 63 74 69 6f 6e 20 73 74 72 65 61  nstruction strea
03b0: 6d 2e 0a 2a 2f 0a 23 69 66 6e 64 65 66 20 4e 44  m..*/.#ifndef ND
03c0: 45 42 55 47 0a 69 6e 74 20 73 71 6c 69 74 65 5f  EBUG.int sqlite_
03d0: 76 64 62 65 5f 61 64 64 6f 70 5f 74 72 61 63 65  vdbe_addop_trace
03e0: 20 3d 20 30 3b 0a 23 65 6e 64 69 66 0a 0a 0a 2f   = 0;.#endif.../
03f0: 2a 0a 2a 2a 20 43 72 65 61 74 65 20 61 20 6e 65  *.** Create a ne
0400: 77 20 76 69 72 74 75 61 6c 20 64 61 74 61 62 61  w virtual databa
0410: 73 65 20 65 6e 67 69 6e 65 2e 0a 2a 2f 0a 56 64  se engine..*/.Vd
0420: 62 65 20 2a 73 71 6c 69 74 65 56 64 62 65 43 72  be *sqliteVdbeCr
0430: 65 61 74 65 28 73 71 6c 69 74 65 20 2a 64 62 29  eate(sqlite *db)
0440: 7b 0a 20 20 56 64 62 65 20 2a 70 3b 0a 20 20 70  {.  Vdbe *p;.  p
0450: 20 3d 20 73 71 6c 69 74 65 4d 61 6c 6c 6f 63 28   = sqliteMalloc(
0460: 20 73 69 7a 65 6f 66 28 56 64 62 65 29 20 29 3b   sizeof(Vdbe) );
0470: 0a 20 20 69 66 28 20 70 3d 3d 30 20 29 20 72 65  .  if( p==0 ) re
0480: 74 75 72 6e 20 30 3b 0a 20 20 70 2d 3e 64 62 20  turn 0;.  p->db 
0490: 3d 20 64 62 3b 0a 20 20 69 66 28 20 64 62 2d 3e  = db;.  if( db->
04a0: 70 56 64 62 65 20 29 7b 0a 20 20 20 20 64 62 2d  pVdbe ){.    db-
04b0: 3e 70 56 64 62 65 2d 3e 70 50 72 65 76 20 3d 20  >pVdbe->pPrev = 
04c0: 70 3b 0a 20 20 7d 0a 20 20 70 2d 3e 70 4e 65 78  p;.  }.  p->pNex
04d0: 74 20 3d 20 64 62 2d 3e 70 56 64 62 65 3b 0a 20  t = db->pVdbe;. 
04e0: 20 70 2d 3e 70 50 72 65 76 20 3d 20 30 3b 0a 20   p->pPrev = 0;. 
04f0: 20 64 62 2d 3e 70 56 64 62 65 20 3d 20 70 3b 0a   db->pVdbe = p;.
0500: 20 20 70 2d 3e 6d 61 67 69 63 20 3d 20 56 44 42    p->magic = VDB
0510: 45 5f 4d 41 47 49 43 5f 49 4e 49 54 3b 0a 20 20  E_MAGIC_INIT;.  
0520: 72 65 74 75 72 6e 20 70 3b 0a 7d 0a 0a 2f 2a 0a  return p;.}../*.
0530: 2a 2a 20 54 75 72 6e 20 74 72 61 63 69 6e 67 20  ** Turn tracing 
0540: 6f 6e 20 6f 72 20 6f 66 66 0a 2a 2f 0a 76 6f 69  on or off.*/.voi
0550: 64 20 73 71 6c 69 74 65 56 64 62 65 54 72 61 63  d sqliteVdbeTrac
0560: 65 28 56 64 62 65 20 2a 70 2c 20 46 49 4c 45 20  e(Vdbe *p, FILE 
0570: 2a 74 72 61 63 65 29 7b 0a 20 20 70 2d 3e 74 72  *trace){.  p->tr
0580: 61 63 65 20 3d 20 74 72 61 63 65 3b 0a 7d 0a 0a  ace = trace;.}..
0590: 2f 2a 0a 2a 2a 20 41 64 64 20 61 20 6e 65 77 20  /*.** Add a new 
05a0: 69 6e 73 74 72 75 63 74 69 6f 6e 20 74 6f 20 74  instruction to t
05b0: 68 65 20 6c 69 73 74 20 6f 66 20 69 6e 73 74 72  he list of instr
05c0: 75 63 74 69 6f 6e 73 20 63 75 72 72 65 6e 74 20  uctions current 
05d0: 69 6e 20 74 68 65 0a 2a 2a 20 56 44 42 45 2e 20  in the.** VDBE. 
05e0: 20 52 65 74 75 72 6e 20 74 68 65 20 61 64 64 72   Return the addr
05f0: 65 73 73 20 6f 66 20 74 68 65 20 6e 65 77 20 69  ess of the new i
0600: 6e 73 74 72 75 63 74 69 6f 6e 2e 0a 2a 2a 0a 2a  nstruction..**.*
0610: 2a 20 50 61 72 61 6d 65 74 65 72 73 3a 0a 2a 2a  * Parameters:.**
0620: 0a 2a 2a 20 20 20 20 70 20 20 20 20 20 20 20 20  .**    p        
0630: 20 20 20 20 20 20 20 50 6f 69 6e 74 65 72 20 74         Pointer t
0640: 6f 20 74 68 65 20 56 44 42 45 0a 2a 2a 0a 2a 2a  o the VDBE.**.**
0650: 20 20 20 20 6f 70 20 20 20 20 20 20 20 20 20 20      op          
0660: 20 20 20 20 54 68 65 20 6f 70 63 6f 64 65 20 66      The opcode f
0670: 6f 72 20 74 68 69 73 20 69 6e 73 74 72 75 63 74  or this instruct
0680: 69 6f 6e 0a 2a 2a 0a 2a 2a 20 20 20 20 70 31 2c  ion.**.**    p1,
0690: 20 70 32 20 20 20 20 20 20 20 20 20 20 46 69 72   p2          Fir
06a0: 73 74 20 74 77 6f 20 6f 66 20 74 68 65 20 74 68  st two of the th
06b0: 72 65 65 20 70 6f 73 73 69 62 6c 65 20 6f 70 65  ree possible ope
06c0: 72 61 6e 64 73 2e 0a 2a 2a 0a 2a 2a 20 55 73 65  rands..**.** Use
06d0: 20 74 68 65 20 73 71 6c 69 74 65 56 64 62 65 52   the sqliteVdbeR
06e0: 65 73 6f 6c 76 65 4c 61 62 65 6c 28 29 20 66 75  esolveLabel() fu
06f0: 6e 63 74 69 6f 6e 20 74 6f 20 66 69 78 20 61 6e  nction to fix an
0700: 20 61 64 64 72 65 73 73 20 61 6e 64 0a 2a 2a 20   address and.** 
0710: 74 68 65 20 73 71 6c 69 74 65 56 64 62 65 43 68  the sqliteVdbeCh
0720: 61 6e 67 65 50 33 28 29 20 66 75 6e 63 74 69 6f  angeP3() functio
0730: 6e 20 74 6f 20 63 68 61 6e 67 65 20 74 68 65 20  n to change the 
0740: 76 61 6c 75 65 20 6f 66 20 74 68 65 20 50 33 0a  value of the P3.
0750: 2a 2a 20 6f 70 65 72 61 6e 64 2e 0a 2a 2f 0a 69  ** operand..*/.i
0760: 6e 74 20 73 71 6c 69 74 65 56 64 62 65 41 64 64  nt sqliteVdbeAdd
0770: 4f 70 28 56 64 62 65 20 2a 70 2c 20 69 6e 74 20  Op(Vdbe *p, int 
0780: 6f 70 2c 20 69 6e 74 20 70 31 2c 20 69 6e 74 20  op, int p1, int 
0790: 70 32 29 7b 0a 20 20 69 6e 74 20 69 3b 0a 0a 20  p2){.  int i;.. 
07a0: 20 69 20 3d 20 70 2d 3e 6e 4f 70 3b 0a 20 20 70   i = p->nOp;.  p
07b0: 2d 3e 6e 4f 70 2b 2b 3b 0a 20 20 61 73 73 65 72  ->nOp++;.  asser
07c0: 74 28 20 70 2d 3e 6d 61 67 69 63 3d 3d 56 44 42  t( p->magic==VDB
07d0: 45 5f 4d 41 47 49 43 5f 49 4e 49 54 20 29 3b 0a  E_MAGIC_INIT );.
07e0: 20 20 69 66 28 20 69 3e 3d 70 2d 3e 6e 4f 70 41    if( i>=p->nOpA
07f0: 6c 6c 6f 63 20 29 7b 0a 20 20 20 20 69 6e 74 20  lloc ){.    int 
0800: 6f 6c 64 53 69 7a 65 20 3d 20 70 2d 3e 6e 4f 70  oldSize = p->nOp
0810: 41 6c 6c 6f 63 3b 0a 20 20 20 20 4f 70 20 2a 61  Alloc;.    Op *a
0820: 4e 65 77 3b 0a 20 20 20 20 70 2d 3e 6e 4f 70 41  New;.    p->nOpA
0830: 6c 6c 6f 63 20 3d 20 70 2d 3e 6e 4f 70 41 6c 6c  lloc = p->nOpAll
0840: 6f 63 2a 32 20 2b 20 31 30 30 3b 0a 20 20 20 20  oc*2 + 100;.    
0850: 61 4e 65 77 20 3d 20 73 71 6c 69 74 65 52 65 61  aNew = sqliteRea
0860: 6c 6c 6f 63 28 70 2d 3e 61 4f 70 2c 20 70 2d 3e  lloc(p->aOp, p->
0870: 6e 4f 70 41 6c 6c 6f 63 2a 73 69 7a 65 6f 66 28  nOpAlloc*sizeof(
0880: 4f 70 29 29 3b 0a 20 20 20 20 69 66 28 20 61 4e  Op));.    if( aN
0890: 65 77 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 70  ew==0 ){.      p
08a0: 2d 3e 6e 4f 70 41 6c 6c 6f 63 20 3d 20 6f 6c 64  ->nOpAlloc = old
08b0: 53 69 7a 65 3b 0a 20 20 20 20 20 20 72 65 74 75  Size;.      retu
08c0: 72 6e 20 30 3b 0a 20 20 20 20 7d 0a 20 20 20 20  rn 0;.    }.    
08d0: 70 2d 3e 61 4f 70 20 3d 20 61 4e 65 77 3b 0a 20  p->aOp = aNew;. 
08e0: 20 20 20 6d 65 6d 73 65 74 28 26 70 2d 3e 61 4f     memset(&p->aO
08f0: 70 5b 6f 6c 64 53 69 7a 65 5d 2c 20 30 2c 20 28  p[oldSize], 0, (
0900: 70 2d 3e 6e 4f 70 41 6c 6c 6f 63 2d 6f 6c 64 53  p->nOpAlloc-oldS
0910: 69 7a 65 29 2a 73 69 7a 65 6f 66 28 4f 70 29 29  ize)*sizeof(Op))
0920: 3b 0a 20 20 7d 0a 20 20 70 2d 3e 61 4f 70 5b 69  ;.  }.  p->aOp[i
0930: 5d 2e 6f 70 63 6f 64 65 20 3d 20 6f 70 3b 0a 20  ].opcode = op;. 
0940: 20 70 2d 3e 61 4f 70 5b 69 5d 2e 70 31 20 3d 20   p->aOp[i].p1 = 
0950: 70 31 3b 0a 20 20 69 66 28 20 70 32 3c 30 20 26  p1;.  if( p2<0 &
0960: 26 20 28 2d 31 2d 70 32 29 3c 70 2d 3e 6e 4c 61  & (-1-p2)<p->nLa
0970: 62 65 6c 20 26 26 20 70 2d 3e 61 4c 61 62 65 6c  bel && p->aLabel
0980: 5b 2d 31 2d 70 32 5d 3e 3d 30 20 29 7b 0a 20 20  [-1-p2]>=0 ){.  
0990: 20 20 70 32 20 3d 20 70 2d 3e 61 4c 61 62 65 6c    p2 = p->aLabel
09a0: 5b 2d 31 2d 70 32 5d 3b 0a 20 20 7d 0a 20 20 70  [-1-p2];.  }.  p
09b0: 2d 3e 61 4f 70 5b 69 5d 2e 70 32 20 3d 20 70 32  ->aOp[i].p2 = p2
09c0: 3b 0a 20 20 70 2d 3e 61 4f 70 5b 69 5d 2e 70 33  ;.  p->aOp[i].p3
09d0: 20 3d 20 30 3b 0a 20 20 70 2d 3e 61 4f 70 5b 69   = 0;.  p->aOp[i
09e0: 5d 2e 70 33 74 79 70 65 20 3d 20 50 33 5f 4e 4f  ].p3type = P3_NO
09f0: 54 55 53 45 44 3b 0a 23 69 66 6e 64 65 66 20 4e  TUSED;.#ifndef N
0a00: 44 45 42 55 47 0a 20 20 69 66 28 20 73 71 6c 69  DEBUG.  if( sqli
0a10: 74 65 5f 76 64 62 65 5f 61 64 64 6f 70 5f 74 72  te_vdbe_addop_tr
0a20: 61 63 65 20 29 20 73 71 6c 69 74 65 56 64 62 65  ace ) sqliteVdbe
0a30: 50 72 69 6e 74 4f 70 28 30 2c 20 69 2c 20 26 70  PrintOp(0, i, &p
0a40: 2d 3e 61 4f 70 5b 69 5d 29 3b 0a 23 65 6e 64 69  ->aOp[i]);.#endi
0a50: 66 0a 20 20 72 65 74 75 72 6e 20 69 3b 0a 7d 0a  f.  return i;.}.
0a60: 0a 2f 2a 0a 2a 2a 20 43 72 65 61 74 65 20 61 20  ./*.** Create a 
0a70: 6e 65 77 20 73 79 6d 62 6f 6c 69 63 20 6c 61 62  new symbolic lab
0a80: 65 6c 20 66 6f 72 20 61 6e 20 69 6e 73 74 72 75  el for an instru
0a90: 63 74 69 6f 6e 20 74 68 61 74 20 68 61 73 20 79  ction that has y
0aa0: 65 74 20 74 6f 20 62 65 0a 2a 2a 20 63 6f 64 65  et to be.** code
0ab0: 64 2e 20 20 54 68 65 20 73 79 6d 62 6f 6c 69 63  d.  The symbolic
0ac0: 20 6c 61 62 65 6c 20 69 73 20 72 65 61 6c 6c 79   label is really
0ad0: 20 6a 75 73 74 20 61 20 6e 65 67 61 74 69 76 65   just a negative
0ae0: 20 6e 75 6d 62 65 72 2e 20 20 54 68 65 0a 2a 2a   number.  The.**
0af0: 20 6c 61 62 65 6c 20 63 61 6e 20 62 65 20 75 73   label can be us
0b00: 65 64 20 61 73 20 74 68 65 20 50 32 20 76 61 6c  ed as the P2 val
0b10: 75 65 20 6f 66 20 61 6e 20 6f 70 65 72 61 74 69  ue of an operati
0b20: 6f 6e 2e 20 20 4c 61 74 65 72 2c 20 77 68 65 6e  on.  Later, when
0b30: 0a 2a 2a 20 74 68 65 20 6c 61 62 65 6c 20 69 73  .** the label is
0b40: 20 72 65 73 6f 6c 76 65 64 20 74 6f 20 61 20 73   resolved to a s
0b50: 70 65 63 69 66 69 63 20 61 64 64 72 65 73 73 2c  pecific address,
0b60: 20 74 68 65 20 56 44 42 45 20 77 69 6c 6c 20 73   the VDBE will s
0b70: 63 61 6e 0a 2a 2a 20 74 68 72 6f 75 67 68 20 69  can.** through i
0b80: 74 73 20 6f 70 65 72 61 74 69 6f 6e 20 6c 69 73  ts operation lis
0b90: 74 20 61 6e 64 20 63 68 61 6e 67 65 20 61 6c 6c  t and change all
0ba0: 20 76 61 6c 75 65 73 20 6f 66 20 50 32 20 77 68   values of P2 wh
0bb0: 69 63 68 20 6d 61 74 63 68 0a 2a 2a 20 74 68 65  ich match.** the
0bc0: 20 6c 61 62 65 6c 20 69 6e 74 6f 20 74 68 65 20   label into the 
0bd0: 72 65 73 6f 6c 76 65 64 20 61 64 64 72 65 73 73  resolved address
0be0: 2e 0a 2a 2a 0a 2a 2a 20 54 68 65 20 56 44 42 45  ..**.** The VDBE
0bf0: 20 6b 6e 6f 77 73 20 74 68 61 74 20 61 20 50 32   knows that a P2
0c00: 20 76 61 6c 75 65 20 69 73 20 61 20 6c 61 62 65   value is a labe
0c10: 6c 20 62 65 63 61 75 73 65 20 6c 61 62 65 6c 73  l because labels
0c20: 20 61 72 65 0a 2a 2a 20 61 6c 77 61 79 73 20 6e   are.** always n
0c30: 65 67 61 74 69 76 65 20 61 6e 64 20 50 32 20 76  egative and P2 v
0c40: 61 6c 75 65 73 20 61 72 65 20 73 75 70 70 6f 73  alues are suppos
0c50: 65 20 74 6f 20 62 65 20 6e 6f 6e 2d 6e 65 67 61  e to be non-nega
0c60: 74 69 76 65 2e 0a 2a 2a 20 48 65 6e 63 65 2c 20  tive..** Hence, 
0c70: 61 20 6e 65 67 61 74 69 76 65 20 50 32 20 76 61  a negative P2 va
0c80: 6c 75 65 20 69 73 20 61 20 6c 61 62 65 6c 20 74  lue is a label t
0c90: 68 61 74 20 68 61 73 20 79 65 74 20 74 6f 20 62  hat has yet to b
0ca0: 65 20 72 65 73 6f 6c 76 65 64 2e 0a 2a 2f 0a 69  e resolved..*/.i
0cb0: 6e 74 20 73 71 6c 69 74 65 56 64 62 65 4d 61 6b  nt sqliteVdbeMak
0cc0: 65 4c 61 62 65 6c 28 56 64 62 65 20 2a 70 29 7b  eLabel(Vdbe *p){
0cd0: 0a 20 20 69 6e 74 20 69 3b 0a 20 20 69 20 3d 20  .  int i;.  i = 
0ce0: 70 2d 3e 6e 4c 61 62 65 6c 2b 2b 3b 0a 20 20 61  p->nLabel++;.  a
0cf0: 73 73 65 72 74 28 20 70 2d 3e 6d 61 67 69 63 3d  ssert( p->magic=
0d00: 3d 56 44 42 45 5f 4d 41 47 49 43 5f 49 4e 49 54  =VDBE_MAGIC_INIT
0d10: 20 29 3b 0a 20 20 69 66 28 20 69 3e 3d 70 2d 3e   );.  if( i>=p->
0d20: 6e 4c 61 62 65 6c 41 6c 6c 6f 63 20 29 7b 0a 20  nLabelAlloc ){. 
0d30: 20 20 20 69 6e 74 20 2a 61 4e 65 77 3b 0a 20 20     int *aNew;.  
0d40: 20 20 70 2d 3e 6e 4c 61 62 65 6c 41 6c 6c 6f 63    p->nLabelAlloc
0d50: 20 3d 20 70 2d 3e 6e 4c 61 62 65 6c 41 6c 6c 6f   = p->nLabelAllo
0d60: 63 2a 32 20 2b 20 31 30 3b 0a 20 20 20 20 61 4e  c*2 + 10;.    aN
0d70: 65 77 20 3d 20 73 71 6c 69 74 65 52 65 61 6c 6c  ew = sqliteReall
0d80: 6f 63 28 20 70 2d 3e 61 4c 61 62 65 6c 2c 20 70  oc( p->aLabel, p
0d90: 2d 3e 6e 4c 61 62 65 6c 41 6c 6c 6f 63 2a 73 69  ->nLabelAlloc*si
0da0: 7a 65 6f 66 28 70 2d 3e 61 4c 61 62 65 6c 5b 30  zeof(p->aLabel[0
0db0: 5d 29 29 3b 0a 20 20 20 20 69 66 28 20 61 4e 65  ]));.    if( aNe
0dc0: 77 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 73 71  w==0 ){.      sq
0dd0: 6c 69 74 65 46 72 65 65 28 70 2d 3e 61 4c 61 62  liteFree(p->aLab
0de0: 65 6c 29 3b 0a 20 20 20 20 7d 0a 20 20 20 20 70  el);.    }.    p
0df0: 2d 3e 61 4c 61 62 65 6c 20 3d 20 61 4e 65 77 3b  ->aLabel = aNew;
0e00: 0a 20 20 7d 0a 20 20 69 66 28 20 70 2d 3e 61 4c  .  }.  if( p->aL
0e10: 61 62 65 6c 3d 3d 30 20 29 7b 0a 20 20 20 20 70  abel==0 ){.    p
0e20: 2d 3e 6e 4c 61 62 65 6c 20 3d 20 30 3b 0a 20 20  ->nLabel = 0;.  
0e30: 20 20 70 2d 3e 6e 4c 61 62 65 6c 41 6c 6c 6f 63    p->nLabelAlloc
0e40: 20 3d 20 30 3b 0a 20 20 20 20 72 65 74 75 72 6e   = 0;.    return
0e50: 20 30 3b 0a 20 20 7d 0a 20 20 70 2d 3e 61 4c 61   0;.  }.  p->aLa
0e60: 62 65 6c 5b 69 5d 20 3d 20 2d 31 3b 0a 20 20 72  bel[i] = -1;.  r
0e70: 65 74 75 72 6e 20 2d 31 2d 69 3b 0a 7d 0a 0a 2f  eturn -1-i;.}../
0e80: 2a 0a 2a 2a 20 52 65 73 6f 6c 76 65 20 6c 61 62  *.** Resolve lab
0e90: 65 6c 20 22 78 22 20 74 6f 20 62 65 20 74 68 65  el "x" to be the
0ea0: 20 61 64 64 72 65 73 73 20 6f 66 20 74 68 65 20   address of the 
0eb0: 6e 65 78 74 20 69 6e 73 74 72 75 63 74 69 6f 6e  next instruction
0ec0: 20 74 6f 0a 2a 2a 20 62 65 20 69 6e 73 65 72 74   to.** be insert
0ed0: 65 64 2e 20 20 54 68 65 20 70 61 72 61 6d 65 74  ed.  The paramet
0ee0: 65 72 20 22 78 22 20 6d 75 73 74 20 68 61 76 65  er "x" must have
0ef0: 20 62 65 65 6e 20 6f 62 74 61 69 6e 65 64 20 66   been obtained f
0f00: 72 6f 6d 0a 2a 2a 20 61 20 70 72 69 6f 72 20 63  rom.** a prior c
0f10: 61 6c 6c 20 74 6f 20 73 71 6c 69 74 65 56 64 62  all to sqliteVdb
0f20: 65 4d 61 6b 65 4c 61 62 65 6c 28 29 2e 0a 2a 2f  eMakeLabel()..*/
0f30: 0a 76 6f 69 64 20 73 71 6c 69 74 65 56 64 62 65  .void sqliteVdbe
0f40: 52 65 73 6f 6c 76 65 4c 61 62 65 6c 28 56 64 62  ResolveLabel(Vdb
0f50: 65 20 2a 70 2c 20 69 6e 74 20 78 29 7b 0a 20 20  e *p, int x){.  
0f60: 69 6e 74 20 6a 3b 0a 20 20 61 73 73 65 72 74 28  int j;.  assert(
0f70: 20 70 2d 3e 6d 61 67 69 63 3d 3d 56 44 42 45 5f   p->magic==VDBE_
0f80: 4d 41 47 49 43 5f 49 4e 49 54 20 29 3b 0a 20 20  MAGIC_INIT );.  
0f90: 69 66 28 20 78 3c 30 20 26 26 20 28 2d 78 29 3c  if( x<0 && (-x)<
0fa0: 3d 70 2d 3e 6e 4c 61 62 65 6c 20 26 26 20 70 2d  =p->nLabel && p-
0fb0: 3e 61 4f 70 20 29 7b 0a 20 20 20 20 69 66 28 20  >aOp ){.    if( 
0fc0: 70 2d 3e 61 4c 61 62 65 6c 5b 2d 31 2d 78 5d 3d  p->aLabel[-1-x]=
0fd0: 3d 70 2d 3e 6e 4f 70 20 29 20 72 65 74 75 72 6e  =p->nOp ) return
0fe0: 3b 0a 20 20 20 20 61 73 73 65 72 74 28 20 70 2d  ;.    assert( p-
0ff0: 3e 61 4c 61 62 65 6c 5b 2d 31 2d 78 5d 3c 30 20  >aLabel[-1-x]<0 
1000: 29 3b 0a 20 20 20 20 70 2d 3e 61 4c 61 62 65 6c  );.    p->aLabel
1010: 5b 2d 31 2d 78 5d 20 3d 20 70 2d 3e 6e 4f 70 3b  [-1-x] = p->nOp;
1020: 0a 20 20 20 20 66 6f 72 28 6a 3d 30 3b 20 6a 3c  .    for(j=0; j<
1030: 70 2d 3e 6e 4f 70 3b 20 6a 2b 2b 29 7b 0a 20 20  p->nOp; j++){.  
1040: 20 20 20 20 69 66 28 20 70 2d 3e 61 4f 70 5b 6a      if( p->aOp[j
1050: 5d 2e 70 32 3d 3d 78 20 29 20 70 2d 3e 61 4f 70  ].p2==x ) p->aOp
1060: 5b 6a 5d 2e 70 32 20 3d 20 70 2d 3e 6e 4f 70 3b  [j].p2 = p->nOp;
1070: 0a 20 20 20 20 7d 0a 20 20 7d 0a 7d 0a 0a 2f 2a  .    }.  }.}../*
1080: 0a 2a 2a 20 52 65 74 75 72 6e 20 74 68 65 20 61  .** Return the a
1090: 64 64 72 65 73 73 20 6f 66 20 74 68 65 20 6e 65  ddress of the ne
10a0: 78 74 20 69 6e 73 74 72 75 63 74 69 6f 6e 20 74  xt instruction t
10b0: 6f 20 62 65 20 69 6e 73 65 72 74 65 64 2e 0a 2a  o be inserted..*
10c0: 2f 0a 69 6e 74 20 73 71 6c 69 74 65 56 64 62 65  /.int sqliteVdbe
10d0: 43 75 72 72 65 6e 74 41 64 64 72 28 56 64 62 65  CurrentAddr(Vdbe
10e0: 20 2a 70 29 7b 0a 20 20 61 73 73 65 72 74 28 20   *p){.  assert( 
10f0: 70 2d 3e 6d 61 67 69 63 3d 3d 56 44 42 45 5f 4d  p->magic==VDBE_M
1100: 41 47 49 43 5f 49 4e 49 54 20 29 3b 0a 20 20 72  AGIC_INIT );.  r
1110: 65 74 75 72 6e 20 70 2d 3e 6e 4f 70 3b 0a 7d 0a  eturn p->nOp;.}.
1120: 0a 2f 2a 0a 2a 2a 20 41 64 64 20 61 20 77 68 6f  ./*.** Add a who
1130: 6c 65 20 6c 69 73 74 20 6f 66 20 6f 70 65 72 61  le list of opera
1140: 74 69 6f 6e 73 20 74 6f 20 74 68 65 20 6f 70 65  tions to the ope
1150: 72 61 74 69 6f 6e 20 73 74 61 63 6b 2e 20 20 52  ration stack.  R
1160: 65 74 75 72 6e 20 74 68 65 0a 2a 2a 20 61 64 64  eturn the.** add
1170: 72 65 73 73 20 6f 66 20 74 68 65 20 66 69 72 73  ress of the firs
1180: 74 20 6f 70 65 72 61 74 69 6f 6e 20 61 64 64 65  t operation adde
1190: 64 2e 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65  d..*/.int sqlite
11a0: 56 64 62 65 41 64 64 4f 70 4c 69 73 74 28 56 64  VdbeAddOpList(Vd
11b0: 62 65 20 2a 70 2c 20 69 6e 74 20 6e 4f 70 2c 20  be *p, int nOp, 
11c0: 56 64 62 65 4f 70 20 63 6f 6e 73 74 20 2a 61 4f  VdbeOp const *aO
11d0: 70 29 7b 0a 20 20 69 6e 74 20 61 64 64 72 3b 0a  p){.  int addr;.
11e0: 20 20 61 73 73 65 72 74 28 20 70 2d 3e 6d 61 67    assert( p->mag
11f0: 69 63 3d 3d 56 44 42 45 5f 4d 41 47 49 43 5f 49  ic==VDBE_MAGIC_I
1200: 4e 49 54 20 29 3b 0a 20 20 69 66 28 20 70 2d 3e  NIT );.  if( p->
1210: 6e 4f 70 20 2b 20 6e 4f 70 20 3e 3d 20 70 2d 3e  nOp + nOp >= p->
1220: 6e 4f 70 41 6c 6c 6f 63 20 29 7b 0a 20 20 20 20  nOpAlloc ){.    
1230: 69 6e 74 20 6f 6c 64 53 69 7a 65 20 3d 20 70 2d  int oldSize = p-
1240: 3e 6e 4f 70 41 6c 6c 6f 63 3b 0a 20 20 20 20 4f  >nOpAlloc;.    O
1250: 70 20 2a 61 4e 65 77 3b 0a 20 20 20 20 70 2d 3e  p *aNew;.    p->
1260: 6e 4f 70 41 6c 6c 6f 63 20 3d 20 70 2d 3e 6e 4f  nOpAlloc = p->nO
1270: 70 41 6c 6c 6f 63 2a 32 20 2b 20 6e 4f 70 20 2b  pAlloc*2 + nOp +
1280: 20 31 30 3b 0a 20 20 20 20 61 4e 65 77 20 3d 20   10;.    aNew = 
1290: 73 71 6c 69 74 65 52 65 61 6c 6c 6f 63 28 70 2d  sqliteRealloc(p-
12a0: 3e 61 4f 70 2c 20 70 2d 3e 6e 4f 70 41 6c 6c 6f  >aOp, p->nOpAllo
12b0: 63 2a 73 69 7a 65 6f 66 28 4f 70 29 29 3b 0a 20  c*sizeof(Op));. 
12c0: 20 20 20 69 66 28 20 61 4e 65 77 3d 3d 30 20 29     if( aNew==0 )
12d0: 7b 0a 20 20 20 20 20 20 70 2d 3e 6e 4f 70 41 6c  {.      p->nOpAl
12e0: 6c 6f 63 20 3d 20 6f 6c 64 53 69 7a 65 3b 0a 20  loc = oldSize;. 
12f0: 20 20 20 20 20 72 65 74 75 72 6e 20 30 3b 0a 20       return 0;. 
1300: 20 20 20 7d 0a 20 20 20 20 70 2d 3e 61 4f 70 20     }.    p->aOp 
1310: 3d 20 61 4e 65 77 3b 0a 20 20 20 20 6d 65 6d 73  = aNew;.    mems
1320: 65 74 28 26 70 2d 3e 61 4f 70 5b 6f 6c 64 53 69  et(&p->aOp[oldSi
1330: 7a 65 5d 2c 20 30 2c 20 28 70 2d 3e 6e 4f 70 41  ze], 0, (p->nOpA
1340: 6c 6c 6f 63 2d 6f 6c 64 53 69 7a 65 29 2a 73 69  lloc-oldSize)*si
1350: 7a 65 6f 66 28 4f 70 29 29 3b 0a 20 20 7d 0a 20  zeof(Op));.  }. 
1360: 20 61 64 64 72 20 3d 20 70 2d 3e 6e 4f 70 3b 0a   addr = p->nOp;.
1370: 20 20 69 66 28 20 6e 4f 70 3e 30 20 29 7b 0a 20    if( nOp>0 ){. 
1380: 20 20 20 69 6e 74 20 69 3b 0a 20 20 20 20 66 6f     int i;.    fo
1390: 72 28 69 3d 30 3b 20 69 3c 6e 4f 70 3b 20 69 2b  r(i=0; i<nOp; i+
13a0: 2b 29 7b 0a 20 20 20 20 20 20 69 6e 74 20 70 32  +){.      int p2
13b0: 20 3d 20 61 4f 70 5b 69 5d 2e 70 32 3b 0a 20 20   = aOp[i].p2;.  
13c0: 20 20 20 20 70 2d 3e 61 4f 70 5b 69 2b 61 64 64      p->aOp[i+add
13d0: 72 5d 20 3d 20 61 4f 70 5b 69 5d 3b 0a 20 20 20  r] = aOp[i];.   
13e0: 20 20 20 69 66 28 20 70 32 3c 30 20 29 20 70 2d     if( p2<0 ) p-
13f0: 3e 61 4f 70 5b 69 2b 61 64 64 72 5d 2e 70 32 20  >aOp[i+addr].p2 
1400: 3d 20 61 64 64 72 20 2b 20 41 44 44 52 28 70 32  = addr + ADDR(p2
1410: 29 3b 0a 20 20 20 20 20 20 70 2d 3e 61 4f 70 5b  );.      p->aOp[
1420: 69 2b 61 64 64 72 5d 2e 70 33 74 79 70 65 20 3d  i+addr].p3type =
1430: 20 61 4f 70 5b 69 5d 2e 70 33 20 3f 20 50 33 5f   aOp[i].p3 ? P3_
1440: 53 54 41 54 49 43 20 3a 20 50 33 5f 4e 4f 54 55  STATIC : P3_NOTU
1450: 53 45 44 3b 0a 23 69 66 6e 64 65 66 20 4e 44 45  SED;.#ifndef NDE
1460: 42 55 47 0a 20 20 20 20 20 20 69 66 28 20 73 71  BUG.      if( sq
1470: 6c 69 74 65 5f 76 64 62 65 5f 61 64 64 6f 70 5f  lite_vdbe_addop_
1480: 74 72 61 63 65 20 29 7b 0a 20 20 20 20 20 20 20  trace ){.       
1490: 20 73 71 6c 69 74 65 56 64 62 65 50 72 69 6e 74   sqliteVdbePrint
14a0: 4f 70 28 30 2c 20 69 2b 61 64 64 72 2c 20 26 70  Op(0, i+addr, &p
14b0: 2d 3e 61 4f 70 5b 69 2b 61 64 64 72 5d 29 3b 0a  ->aOp[i+addr]);.
14c0: 20 20 20 20 20 20 7d 0a 23 65 6e 64 69 66 0a 20        }.#endif. 
14d0: 20 20 20 7d 0a 20 20 20 20 70 2d 3e 6e 4f 70 20     }.    p->nOp 
14e0: 2b 3d 20 6e 4f 70 3b 0a 20 20 7d 0a 20 20 72 65  += nOp;.  }.  re
14f0: 74 75 72 6e 20 61 64 64 72 3b 0a 7d 0a 0a 2f 2a  turn addr;.}../*
1500: 0a 2a 2a 20 43 68 61 6e 67 65 20 74 68 65 20 76  .** Change the v
1510: 61 6c 75 65 20 6f 66 20 74 68 65 20 50 31 20 6f  alue of the P1 o
1520: 70 65 72 61 6e 64 20 66 6f 72 20 61 20 73 70 65  perand for a spe
1530: 63 69 66 69 63 20 69 6e 73 74 72 75 63 74 69 6f  cific instructio
1540: 6e 2e 0a 2a 2a 20 54 68 69 73 20 72 6f 75 74 69  n..** This routi
1550: 6e 65 20 69 73 20 75 73 65 66 75 6c 20 77 68 65  ne is useful whe
1560: 6e 20 61 20 6c 61 72 67 65 20 70 72 6f 67 72 61  n a large progra
1570: 6d 20 69 73 20 6c 6f 61 64 65 64 20 66 72 6f 6d  m is loaded from
1580: 20 61 0a 2a 2a 20 73 74 61 74 69 63 20 61 72 72   a.** static arr
1590: 61 79 20 75 73 69 6e 67 20 73 71 6c 69 74 65 56  ay using sqliteV
15a0: 64 62 65 41 64 64 4f 70 4c 69 73 74 20 62 75 74  dbeAddOpList but
15b0: 20 77 65 20 77 61 6e 74 20 74 6f 20 6d 61 6b 65   we want to make
15c0: 20 61 0a 2a 2a 20 66 65 77 20 6d 69 6e 6f 72 20   a.** few minor 
15d0: 63 68 61 6e 67 65 73 20 74 6f 20 74 68 65 20 70  changes to the p
15e0: 72 6f 67 72 61 6d 2e 0a 2a 2f 0a 76 6f 69 64 20  rogram..*/.void 
15f0: 73 71 6c 69 74 65 56 64 62 65 43 68 61 6e 67 65  sqliteVdbeChange
1600: 50 31 28 56 64 62 65 20 2a 70 2c 20 69 6e 74 20  P1(Vdbe *p, int 
1610: 61 64 64 72 2c 20 69 6e 74 20 76 61 6c 29 7b 0a  addr, int val){.
1620: 20 20 61 73 73 65 72 74 28 20 70 2d 3e 6d 61 67    assert( p->mag
1630: 69 63 3d 3d 56 44 42 45 5f 4d 41 47 49 43 5f 49  ic==VDBE_MAGIC_I
1640: 4e 49 54 20 29 3b 0a 20 20 69 66 28 20 70 20 26  NIT );.  if( p &
1650: 26 20 61 64 64 72 3e 3d 30 20 26 26 20 70 2d 3e  & addr>=0 && p->
1660: 6e 4f 70 3e 61 64 64 72 20 26 26 20 70 2d 3e 61  nOp>addr && p->a
1670: 4f 70 20 29 7b 0a 20 20 20 20 70 2d 3e 61 4f 70  Op ){.    p->aOp
1680: 5b 61 64 64 72 5d 2e 70 31 20 3d 20 76 61 6c 3b  [addr].p1 = val;
1690: 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 43 68  .  }.}../*.** Ch
16a0: 61 6e 67 65 20 74 68 65 20 76 61 6c 75 65 20 6f  ange the value o
16b0: 66 20 74 68 65 20 50 32 20 6f 70 65 72 61 6e 64  f the P2 operand
16c0: 20 66 6f 72 20 61 20 73 70 65 63 69 66 69 63 20   for a specific 
16d0: 69 6e 73 74 72 75 63 74 69 6f 6e 2e 0a 2a 2a 20  instruction..** 
16e0: 54 68 69 73 20 72 6f 75 74 69 6e 65 20 69 73 20  This routine is 
16f0: 75 73 65 66 75 6c 20 66 6f 72 20 73 65 74 74 69  useful for setti
1700: 6e 67 20 61 20 6a 75 6d 70 20 64 65 73 74 69 6e  ng a jump destin
1710: 61 74 69 6f 6e 2e 0a 2a 2f 0a 76 6f 69 64 20 73  ation..*/.void s
1720: 71 6c 69 74 65 56 64 62 65 43 68 61 6e 67 65 50  qliteVdbeChangeP
1730: 32 28 56 64 62 65 20 2a 70 2c 20 69 6e 74 20 61  2(Vdbe *p, int a
1740: 64 64 72 2c 20 69 6e 74 20 76 61 6c 29 7b 0a 20  ddr, int val){. 
1750: 20 61 73 73 65 72 74 28 20 76 61 6c 3e 3d 30 20   assert( val>=0 
1760: 29 3b 0a 20 20 61 73 73 65 72 74 28 20 70 2d 3e  );.  assert( p->
1770: 6d 61 67 69 63 3d 3d 56 44 42 45 5f 4d 41 47 49  magic==VDBE_MAGI
1780: 43 5f 49 4e 49 54 20 29 3b 0a 20 20 69 66 28 20  C_INIT );.  if( 
1790: 70 20 26 26 20 61 64 64 72 3e 3d 30 20 26 26 20  p && addr>=0 && 
17a0: 70 2d 3e 6e 4f 70 3e 61 64 64 72 20 26 26 20 70  p->nOp>addr && p
17b0: 2d 3e 61 4f 70 20 29 7b 0a 20 20 20 20 70 2d 3e  ->aOp ){.    p->
17c0: 61 4f 70 5b 61 64 64 72 5d 2e 70 32 20 3d 20 76  aOp[addr].p2 = v
17d0: 61 6c 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a  al;.  }.}../*.**
17e0: 20 43 68 61 6e 67 65 20 74 68 65 20 76 61 6c 75   Change the valu
17f0: 65 20 6f 66 20 74 68 65 20 50 33 20 6f 70 65 72  e of the P3 oper
1800: 61 6e 64 20 66 6f 72 20 61 20 73 70 65 63 69 66  and for a specif
1810: 69 63 20 69 6e 73 74 72 75 63 74 69 6f 6e 2e 0a  ic instruction..
1820: 2a 2a 20 54 68 69 73 20 72 6f 75 74 69 6e 65 20  ** This routine 
1830: 69 73 20 75 73 65 66 75 6c 20 77 68 65 6e 20 61  is useful when a
1840: 20 6c 61 72 67 65 20 70 72 6f 67 72 61 6d 20 69   large program i
1850: 73 20 6c 6f 61 64 65 64 20 66 72 6f 6d 20 61 0a  s loaded from a.
1860: 2a 2a 20 73 74 61 74 69 63 20 61 72 72 61 79 20  ** static array 
1870: 75 73 69 6e 67 20 73 71 6c 69 74 65 56 64 62 65  using sqliteVdbe
1880: 41 64 64 4f 70 4c 69 73 74 20 62 75 74 20 77 65  AddOpList but we
1890: 20 77 61 6e 74 20 74 6f 20 6d 61 6b 65 20 61 0a   want to make a.
18a0: 2a 2a 20 66 65 77 20 6d 69 6e 6f 72 20 63 68 61  ** few minor cha
18b0: 6e 67 65 73 20 74 6f 20 74 68 65 20 70 72 6f 67  nges to the prog
18c0: 72 61 6d 2e 0a 2a 2a 0a 2a 2a 20 49 66 20 6e 3e  ram..**.** If n>
18d0: 3d 30 20 74 68 65 6e 20 74 68 65 20 50 33 20 6f  =0 then the P3 o
18e0: 70 65 72 61 6e 64 20 69 73 20 64 79 6e 61 6d 69  perand is dynami
18f0: 63 2c 20 6d 65 61 6e 69 6e 67 20 74 68 61 74 20  c, meaning that 
1900: 61 20 63 6f 70 79 20 6f 66 0a 2a 2a 20 74 68 65  a copy of.** the
1910: 20 73 74 72 69 6e 67 20 69 73 20 6d 61 64 65 20   string is made 
1920: 69 6e 74 6f 20 6d 65 6d 6f 72 79 20 6f 62 74 61  into memory obta
1930: 69 6e 65 64 20 66 72 6f 6d 20 73 71 6c 69 74 65  ined from sqlite
1940: 4d 61 6c 6c 6f 63 28 29 2e 0a 2a 2a 20 41 20 76  Malloc()..** A v
1950: 61 6c 75 65 20 6f 66 20 6e 3d 3d 30 20 6d 65 61  alue of n==0 mea
1960: 6e 73 20 63 6f 70 79 20 62 79 74 65 73 20 6f 66  ns copy bytes of
1970: 20 7a 50 33 20 75 70 20 74 6f 20 61 6e 64 20 69   zP3 up to and i
1980: 6e 63 6c 75 64 69 6e 67 20 74 68 65 0a 2a 2a 20  ncluding the.** 
1990: 66 69 72 73 74 20 6e 75 6c 6c 20 62 79 74 65 2e  first null byte.
19a0: 20 20 49 66 20 6e 3e 30 20 74 68 65 6e 20 63 6f    If n>0 then co
19b0: 70 79 20 6e 2b 31 20 62 79 74 65 73 20 6f 66 20  py n+1 bytes of 
19c0: 7a 50 33 2e 0a 2a 2a 0a 2a 2a 20 49 66 20 6e 3d  zP3..**.** If n=
19d0: 3d 50 33 5f 53 54 41 54 49 43 20 20 69 74 20 6d  =P3_STATIC  it m
19e0: 65 61 6e 73 20 74 68 61 74 20 7a 50 33 20 69 73  eans that zP3 is
19f0: 20 61 20 70 6f 69 6e 74 65 72 20 74 6f 20 61 20   a pointer to a 
1a00: 63 6f 6e 73 74 61 6e 74 20 73 74 61 74 69 63 0a  constant static.
1a10: 2a 2a 20 73 74 72 69 6e 67 20 61 6e 64 20 77 65  ** string and we
1a20: 20 63 61 6e 20 6a 75 73 74 20 63 6f 70 79 20 74   can just copy t
1a30: 68 65 20 70 6f 69 6e 74 65 72 2e 20 20 6e 3d 3d  he pointer.  n==
1a40: 50 33 5f 50 4f 49 4e 54 45 52 20 6d 65 61 6e 73  P3_POINTER means
1a50: 20 7a 50 33 20 69 73 0a 2a 2a 20 61 20 70 6f 69   zP3 is.** a poi
1a60: 6e 74 65 72 20 74 6f 20 73 6f 6d 65 20 6f 62 6a  nter to some obj
1a70: 65 63 74 20 6f 74 68 65 72 20 74 68 61 6e 20 61  ect other than a
1a80: 20 73 74 72 69 6e 67 2e 0a 2a 2a 0a 2a 2a 20 49   string..**.** I
1a90: 66 20 61 64 64 72 3c 30 20 74 68 65 6e 20 63 68  f addr<0 then ch
1aa0: 61 6e 67 65 20 50 33 20 6f 6e 20 74 68 65 20 6d  ange P3 on the m
1ab0: 6f 73 74 20 72 65 63 65 6e 74 6c 79 20 69 6e 73  ost recently ins
1ac0: 65 72 74 65 64 20 69 6e 73 74 72 75 63 74 69 6f  erted instructio
1ad0: 6e 2e 0a 2a 2f 0a 76 6f 69 64 20 73 71 6c 69 74  n..*/.void sqlit
1ae0: 65 56 64 62 65 43 68 61 6e 67 65 50 33 28 56 64  eVdbeChangeP3(Vd
1af0: 62 65 20 2a 70 2c 20 69 6e 74 20 61 64 64 72 2c  be *p, int addr,
1b00: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 50 33   const char *zP3
1b10: 2c 20 69 6e 74 20 6e 29 7b 0a 20 20 4f 70 20 2a  , int n){.  Op *
1b20: 70 4f 70 3b 0a 20 20 61 73 73 65 72 74 28 20 70  pOp;.  assert( p
1b30: 2d 3e 6d 61 67 69 63 3d 3d 56 44 42 45 5f 4d 41  ->magic==VDBE_MA
1b40: 47 49 43 5f 49 4e 49 54 20 29 3b 0a 20 20 69 66  GIC_INIT );.  if
1b50: 28 20 70 3d 3d 30 20 7c 7c 20 70 2d 3e 61 4f 70  ( p==0 || p->aOp
1b60: 3d 3d 30 20 29 20 72 65 74 75 72 6e 3b 0a 20 20  ==0 ) return;.  
1b70: 69 66 28 20 61 64 64 72 3c 30 20 7c 7c 20 61 64  if( addr<0 || ad
1b80: 64 72 3e 3d 70 2d 3e 6e 4f 70 20 29 7b 0a 20 20  dr>=p->nOp ){.  
1b90: 20 20 61 64 64 72 20 3d 20 70 2d 3e 6e 4f 70 20    addr = p->nOp 
1ba0: 2d 20 31 3b 0a 20 20 20 20 69 66 28 20 61 64 64  - 1;.    if( add
1bb0: 72 3c 30 20 29 20 72 65 74 75 72 6e 3b 0a 20 20  r<0 ) return;.  
1bc0: 7d 0a 20 20 70 4f 70 20 3d 20 26 70 2d 3e 61 4f  }.  pOp = &p->aO
1bd0: 70 5b 61 64 64 72 5d 3b 0a 20 20 69 66 28 20 70  p[addr];.  if( p
1be0: 4f 70 2d 3e 70 33 20 26 26 20 70 4f 70 2d 3e 70  Op->p3 && pOp->p
1bf0: 33 74 79 70 65 3d 3d 50 33 5f 44 59 4e 41 4d 49  3type==P3_DYNAMI
1c00: 43 20 29 7b 0a 20 20 20 20 73 71 6c 69 74 65 46  C ){.    sqliteF
1c10: 72 65 65 28 70 4f 70 2d 3e 70 33 29 3b 0a 20 20  ree(pOp->p3);.  
1c20: 20 20 70 4f 70 2d 3e 70 33 20 3d 20 30 3b 0a 20    pOp->p3 = 0;. 
1c30: 20 7d 0a 20 20 69 66 28 20 7a 50 33 3d 3d 30 20   }.  if( zP3==0 
1c40: 29 7b 0a 20 20 20 20 70 4f 70 2d 3e 70 33 20 3d  ){.    pOp->p3 =
1c50: 20 30 3b 0a 20 20 20 20 70 4f 70 2d 3e 70 33 74   0;.    pOp->p3t
1c60: 79 70 65 20 3d 20 50 33 5f 4e 4f 54 55 53 45 44  ype = P3_NOTUSED
1c70: 3b 0a 20 20 7d 65 6c 73 65 20 69 66 28 20 6e 3c  ;.  }else if( n<
1c80: 30 20 29 7b 0a 20 20 20 20 70 4f 70 2d 3e 70 33  0 ){.    pOp->p3
1c90: 20 3d 20 28 63 68 61 72 2a 29 7a 50 33 3b 0a 20   = (char*)zP3;. 
1ca0: 20 20 20 70 4f 70 2d 3e 70 33 74 79 70 65 20 3d     pOp->p3type =
1cb0: 20 6e 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20   n;.  }else{.   
1cc0: 20 73 71 6c 69 74 65 53 65 74 4e 53 74 72 69 6e   sqliteSetNStrin
1cd0: 67 28 26 70 4f 70 2d 3e 70 33 2c 20 7a 50 33 2c  g(&pOp->p3, zP3,
1ce0: 20 6e 2c 20 30 29 3b 0a 20 20 20 20 70 4f 70 2d   n, 0);.    pOp-
1cf0: 3e 70 33 74 79 70 65 20 3d 20 50 33 5f 44 59 4e  >p3type = P3_DYN
1d00: 41 4d 49 43 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a  AMIC;.  }.}../*.
1d10: 2a 2a 20 49 66 20 74 68 65 20 50 33 20 6f 70 65  ** If the P3 ope
1d20: 72 61 6e 64 20 74 6f 20 74 68 65 20 73 70 65 63  rand to the spec
1d30: 69 66 69 65 64 20 69 6e 73 74 72 75 63 74 69 6f  ified instructio
1d40: 6e 20 61 70 70 65 61 72 73 0a 2a 2a 20 74 6f 20  n appears.** to 
1d50: 62 65 20 61 20 71 75 6f 74 65 64 20 73 74 72 69  be a quoted stri
1d60: 6e 67 20 74 6f 6b 65 6e 2c 20 74 68 65 6e 20 74  ng token, then t
1d70: 68 69 73 20 70 72 6f 63 65 64 75 72 65 20 72 65  his procedure re
1d80: 6d 6f 76 65 73 20 0a 2a 2a 20 74 68 65 20 71 75  moves .** the qu
1d90: 6f 74 65 73 2e 0a 2a 2a 0a 2a 2a 20 54 68 65 20  otes..**.** The 
1da0: 71 75 6f 74 69 6e 67 20 6f 70 65 72 61 74 6f 72  quoting operator
1db0: 20 63 61 6e 20 62 65 20 65 69 74 68 65 72 20 61   can be either a
1dc0: 20 67 72 61 76 65 20 61 73 63 65 6e 74 20 28 41   grave ascent (A
1dd0: 53 43 49 49 20 30 78 32 37 29 0a 2a 2a 20 6f 72  SCII 0x27).** or
1de0: 20 61 20 64 6f 75 62 6c 65 20 71 75 6f 74 65 20   a double quote 
1df0: 63 68 61 72 61 63 74 65 72 20 28 41 53 43 49 49  character (ASCII
1e00: 20 30 78 32 32 29 2e 20 20 54 77 6f 20 71 75 6f   0x22).  Two quo
1e10: 74 65 73 20 69 6e 20 61 20 72 6f 77 0a 2a 2a 20  tes in a row.** 
1e20: 72 65 73 6f 6c 76 65 20 74 6f 20 62 65 20 61 20  resolve to be a 
1e30: 73 69 6e 67 6c 65 20 61 63 74 75 61 6c 20 71 75  single actual qu
1e40: 6f 74 65 20 63 68 61 72 61 63 74 65 72 20 77 69  ote character wi
1e50: 74 68 69 6e 20 74 68 65 20 73 74 72 69 6e 67 2e  thin the string.
1e60: 0a 2a 2f 0a 76 6f 69 64 20 73 71 6c 69 74 65 56  .*/.void sqliteV
1e70: 64 62 65 44 65 71 75 6f 74 65 50 33 28 56 64 62  dbeDequoteP3(Vdb
1e80: 65 20 2a 70 2c 20 69 6e 74 20 61 64 64 72 29 7b  e *p, int addr){
1e90: 0a 20 20 4f 70 20 2a 70 4f 70 3b 0a 20 20 61 73  .  Op *pOp;.  as
1ea0: 73 65 72 74 28 20 70 2d 3e 6d 61 67 69 63 3d 3d  sert( p->magic==
1eb0: 56 44 42 45 5f 4d 41 47 49 43 5f 49 4e 49 54 20  VDBE_MAGIC_INIT 
1ec0: 29 3b 0a 20 20 69 66 28 20 70 2d 3e 61 4f 70 3d  );.  if( p->aOp=
1ed0: 3d 30 20 7c 7c 20 61 64 64 72 3c 30 20 7c 7c 20  =0 || addr<0 || 
1ee0: 61 64 64 72 3e 3d 70 2d 3e 6e 4f 70 20 29 20 72  addr>=p->nOp ) r
1ef0: 65 74 75 72 6e 3b 0a 20 20 70 4f 70 20 3d 20 26  eturn;.  pOp = &
1f00: 70 2d 3e 61 4f 70 5b 61 64 64 72 5d 3b 0a 20 20  p->aOp[addr];.  
1f10: 69 66 28 20 70 4f 70 2d 3e 70 33 3d 3d 30 20 7c  if( pOp->p3==0 |
1f20: 7c 20 70 4f 70 2d 3e 70 33 5b 30 5d 3d 3d 30 20  | pOp->p3[0]==0 
1f30: 29 20 72 65 74 75 72 6e 3b 0a 20 20 69 66 28 20  ) return;.  if( 
1f40: 70 4f 70 2d 3e 70 33 74 79 70 65 3d 3d 50 33 5f  pOp->p3type==P3_
1f50: 50 4f 49 4e 54 45 52 20 29 20 72 65 74 75 72 6e  POINTER ) return
1f60: 3b 0a 20 20 69 66 28 20 70 4f 70 2d 3e 70 33 74  ;.  if( pOp->p3t
1f70: 79 70 65 21 3d 50 33 5f 44 59 4e 41 4d 49 43 20  ype!=P3_DYNAMIC 
1f80: 29 7b 0a 20 20 20 20 70 4f 70 2d 3e 70 33 20 3d  ){.    pOp->p3 =
1f90: 20 73 71 6c 69 74 65 53 74 72 44 75 70 28 70 4f   sqliteStrDup(pO
1fa0: 70 2d 3e 70 33 29 3b 0a 20 20 20 20 70 4f 70 2d  p->p3);.    pOp-
1fb0: 3e 70 33 74 79 70 65 20 3d 20 50 33 5f 44 59 4e  >p3type = P3_DYN
1fc0: 41 4d 49 43 3b 0a 20 20 7d 0a 20 20 73 71 6c 69  AMIC;.  }.  sqli
1fd0: 74 65 44 65 71 75 6f 74 65 28 70 4f 70 2d 3e 70  teDequote(pOp->p
1fe0: 33 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 4f 6e 20  3);.}../*.** On 
1ff0: 74 68 65 20 50 33 20 61 72 67 75 6d 65 6e 74 20  the P3 argument 
2000: 6f 66 20 74 68 65 20 67 69 76 65 6e 20 69 6e 73  of the given ins
2010: 74 72 75 63 74 69 6f 6e 2c 20 63 68 61 6e 67 65  truction, change
2020: 20 61 6c 6c 0a 2a 2a 20 73 74 72 69 6e 67 73 20   all.** strings 
2030: 6f 66 20 77 68 69 74 65 73 70 61 63 65 20 63 68  of whitespace ch
2040: 61 72 61 63 74 65 72 73 20 69 6e 74 6f 20 61 20  aracters into a 
2050: 73 69 6e 67 6c 65 20 73 70 61 63 65 20 61 6e 64  single space and
2060: 0a 2a 2a 20 64 65 6c 65 74 65 20 6c 65 61 64 69  .** delete leadi
2070: 6e 67 20 61 6e 64 20 74 72 61 69 6c 69 6e 67 20  ng and trailing 
2080: 77 68 69 74 65 73 70 61 63 65 2e 0a 2a 2f 0a 76  whitespace..*/.v
2090: 6f 69 64 20 73 71 6c 69 74 65 56 64 62 65 43 6f  oid sqliteVdbeCo
20a0: 6d 70 72 65 73 73 53 70 61 63 65 28 56 64 62 65  mpressSpace(Vdbe
20b0: 20 2a 70 2c 20 69 6e 74 20 61 64 64 72 29 7b 0a   *p, int addr){.
20c0: 20 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72 20    unsigned char 
20d0: 2a 7a 3b 0a 20 20 69 6e 74 20 69 2c 20 6a 3b 0a  *z;.  int i, j;.
20e0: 20 20 4f 70 20 2a 70 4f 70 3b 0a 20 20 61 73 73    Op *pOp;.  ass
20f0: 65 72 74 28 20 70 2d 3e 6d 61 67 69 63 3d 3d 56  ert( p->magic==V
2100: 44 42 45 5f 4d 41 47 49 43 5f 49 4e 49 54 20 29  DBE_MAGIC_INIT )
2110: 3b 0a 20 20 69 66 28 20 70 2d 3e 61 4f 70 3d 3d  ;.  if( p->aOp==
2120: 30 20 7c 7c 20 61 64 64 72 3c 30 20 7c 7c 20 61  0 || addr<0 || a
2130: 64 64 72 3e 3d 70 2d 3e 6e 4f 70 20 29 20 72 65  ddr>=p->nOp ) re
2140: 74 75 72 6e 3b 0a 20 20 70 4f 70 20 3d 20 26 70  turn;.  pOp = &p
2150: 2d 3e 61 4f 70 5b 61 64 64 72 5d 3b 0a 20 20 69  ->aOp[addr];.  i
2160: 66 28 20 70 4f 70 2d 3e 70 33 74 79 70 65 3d 3d  f( pOp->p3type==
2170: 50 33 5f 50 4f 49 4e 54 45 52 20 29 7b 0a 20 20  P3_POINTER ){.  
2180: 20 20 72 65 74 75 72 6e 3b 0a 20 20 7d 0a 20 20    return;.  }.  
2190: 69 66 28 20 70 4f 70 2d 3e 70 33 74 79 70 65 21  if( pOp->p3type!
21a0: 3d 50 33 5f 44 59 4e 41 4d 49 43 20 29 7b 0a 20  =P3_DYNAMIC ){. 
21b0: 20 20 20 70 4f 70 2d 3e 70 33 20 3d 20 73 71 6c     pOp->p3 = sql
21c0: 69 74 65 53 74 72 44 75 70 28 70 4f 70 2d 3e 70  iteStrDup(pOp->p
21d0: 33 29 3b 0a 20 20 20 20 70 4f 70 2d 3e 70 33 74  3);.    pOp->p3t
21e0: 79 70 65 20 3d 20 50 33 5f 44 59 4e 41 4d 49 43  ype = P3_DYNAMIC
21f0: 3b 0a 20 20 7d 0a 20 20 7a 20 3d 20 28 75 6e 73  ;.  }.  z = (uns
2200: 69 67 6e 65 64 20 63 68 61 72 2a 29 70 4f 70 2d  igned char*)pOp-
2210: 3e 70 33 3b 0a 20 20 69 66 28 20 7a 3d 3d 30 20  >p3;.  if( z==0 
2220: 29 20 72 65 74 75 72 6e 3b 0a 20 20 69 20 3d 20  ) return;.  i = 
2230: 6a 20 3d 20 30 3b 0a 20 20 77 68 69 6c 65 28 20  j = 0;.  while( 
2240: 69 73 73 70 61 63 65 28 7a 5b 69 5d 29 20 29 7b  isspace(z[i]) ){
2250: 20 69 2b 2b 3b 20 7d 0a 20 20 77 68 69 6c 65 28   i++; }.  while(
2260: 20 7a 5b 69 5d 20 29 7b 0a 20 20 20 20 69 66 28   z[i] ){.    if(
2270: 20 69 73 73 70 61 63 65 28 7a 5b 69 5d 29 20 29   isspace(z[i]) )
2280: 7b 0a 20 20 20 20 20 20 7a 5b 6a 2b 2b 5d 20 3d  {.      z[j++] =
2290: 20 27 20 27 3b 0a 20 20 20 20 20 20 77 68 69 6c   ' ';.      whil
22a0: 65 28 20 69 73 73 70 61 63 65 28 7a 5b 2b 2b 69  e( isspace(z[++i
22b0: 5d 29 20 29 7b 7d 0a 20 20 20 20 7d 65 6c 73 65  ]) ){}.    }else
22c0: 7b 0a 20 20 20 20 20 20 7a 5b 6a 2b 2b 5d 20 3d  {.      z[j++] =
22d0: 20 7a 5b 69 2b 2b 5d 3b 0a 20 20 20 20 7d 0a 20   z[i++];.    }. 
22e0: 20 7d 0a 20 20 77 68 69 6c 65 28 20 6a 3e 30 20   }.  while( j>0 
22f0: 26 26 20 69 73 73 70 61 63 65 28 7a 5b 6a 2d 31  && isspace(z[j-1
2300: 5d 29 20 29 7b 20 6a 2d 2d 3b 20 7d 0a 20 20 7a  ]) ){ j--; }.  z
2310: 5b 6a 5d 20 3d 20 30 3b 0a 7d 0a 0a 2f 2a 0a 2a  [j] = 0;.}../*.*
2320: 2a 20 53 65 61 72 63 68 20 66 6f 72 20 74 68 65  * Search for the
2330: 20 63 75 72 72 65 6e 74 20 70 72 6f 67 72 61 6d   current program
2340: 20 66 6f 72 20 74 68 65 20 67 69 76 65 6e 20 6f   for the given o
2350: 70 63 6f 64 65 20 61 6e 64 20 50 32 0a 2a 2a 20  pcode and P2.** 
2360: 76 61 6c 75 65 2e 20 20 52 65 74 75 72 6e 20 74  value.  Return t
2370: 68 65 20 61 64 64 72 65 73 73 20 70 6c 75 73 20  he address plus 
2380: 31 20 69 66 20 66 6f 75 6e 64 20 61 6e 64 20 30  1 if found and 0
2390: 20 69 66 20 6e 6f 74 20 66 6f 75 6e 64 2e 0a 2a   if not found..*
23a0: 2f 0a 69 6e 74 20 73 71 6c 69 74 65 56 64 62 65  /.int sqliteVdbe
23b0: 46 69 6e 64 4f 70 28 56 64 62 65 20 2a 70 2c 20  FindOp(Vdbe *p, 
23c0: 69 6e 74 20 6f 70 2c 20 69 6e 74 20 70 32 29 7b  int op, int p2){
23d0: 0a 20 20 69 6e 74 20 69 3b 0a 20 20 61 73 73 65  .  int i;.  asse
23e0: 72 74 28 20 70 2d 3e 6d 61 67 69 63 3d 3d 56 44  rt( p->magic==VD
23f0: 42 45 5f 4d 41 47 49 43 5f 49 4e 49 54 20 29 3b  BE_MAGIC_INIT );
2400: 0a 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c 70 2d  .  for(i=0; i<p-
2410: 3e 6e 4f 70 3b 20 69 2b 2b 29 7b 0a 20 20 20 20  >nOp; i++){.    
2420: 69 66 28 20 70 2d 3e 61 4f 70 5b 69 5d 2e 6f 70  if( p->aOp[i].op
2430: 63 6f 64 65 3d 3d 6f 70 20 26 26 20 70 2d 3e 61  code==op && p->a
2440: 4f 70 5b 69 5d 2e 70 32 3d 3d 70 32 20 29 20 72  Op[i].p2==p2 ) r
2450: 65 74 75 72 6e 20 69 2b 31 3b 0a 20 20 7d 0a 20  eturn i+1;.  }. 
2460: 20 72 65 74 75 72 6e 20 30 3b 0a 7d 0a 0a 2f 2a   return 0;.}../*
2470: 0a 2a 2a 20 52 65 74 75 72 6e 20 74 68 65 20 6f  .** Return the o
2480: 70 63 6f 64 65 20 66 6f 72 20 61 20 67 69 76 65  pcode for a give
2490: 6e 20 61 64 64 72 65 73 73 2e 0a 2a 2f 0a 56 64  n address..*/.Vd
24a0: 62 65 4f 70 20 2a 73 71 6c 69 74 65 56 64 62 65  beOp *sqliteVdbe
24b0: 47 65 74 4f 70 28 56 64 62 65 20 2a 70 2c 20 69  GetOp(Vdbe *p, i
24c0: 6e 74 20 61 64 64 72 29 7b 0a 20 20 61 73 73 65  nt addr){.  asse
24d0: 72 74 28 20 70 2d 3e 6d 61 67 69 63 3d 3d 56 44  rt( p->magic==VD
24e0: 42 45 5f 4d 41 47 49 43 5f 49 4e 49 54 20 29 3b  BE_MAGIC_INIT );
24f0: 0a 20 20 61 73 73 65 72 74 28 20 61 64 64 72 3e  .  assert( addr>
2500: 3d 30 20 26 26 20 61 64 64 72 3c 70 2d 3e 6e 4f  =0 && addr<p->nO
2510: 70 20 29 3b 0a 20 20 72 65 74 75 72 6e 20 26 70  p );.  return &p
2520: 2d 3e 61 4f 70 5b 61 64 64 72 5d 3b 0a 7d 0a 0a  ->aOp[addr];.}..
2530: 2f 2a 0a 2a 2a 20 54 68 65 20 66 6f 6c 6c 6f 77  /*.** The follow
2540: 69 6e 67 20 67 72 6f 75 70 20 6f 72 20 72 6f 75  ing group or rou
2550: 74 69 6e 65 73 20 61 72 65 20 65 6d 70 6c 6f 79  tines are employ
2560: 65 64 20 62 79 20 69 6e 73 74 61 6c 6c 61 62 6c  ed by installabl
2570: 65 20 66 75 6e 63 74 69 6f 6e 73 0a 2a 2a 20 74  e functions.** t
2580: 6f 20 72 65 74 75 72 6e 20 74 68 65 69 72 20 72  o return their r
2590: 65 73 75 6c 74 73 2e 0a 2a 2a 0a 2a 2a 20 54 68  esults..**.** Th
25a0: 65 20 73 71 6c 69 74 65 5f 73 65 74 5f 72 65 73  e sqlite_set_res
25b0: 75 6c 74 5f 73 74 72 69 6e 67 28 29 20 72 6f 75  ult_string() rou
25c0: 74 69 6e 65 20 63 61 6e 20 62 65 20 75 73 65 64  tine can be used
25d0: 20 74 6f 20 72 65 74 75 72 6e 20 61 20 73 74 72   to return a str
25e0: 69 6e 67 0a 2a 2a 20 76 61 6c 75 65 20 6f 72 20  ing.** value or 
25f0: 74 6f 20 72 65 74 75 72 6e 20 61 20 4e 55 4c 4c  to return a NULL
2600: 2e 20 20 54 6f 20 72 65 74 75 72 6e 20 61 20 4e  .  To return a N
2610: 55 4c 4c 2c 20 70 61 73 73 20 69 6e 20 4e 55 4c  ULL, pass in NUL
2620: 4c 20 66 6f 72 20 7a 52 65 73 75 6c 74 2e 0a 2a  L for zResult..*
2630: 2a 20 41 20 63 6f 70 79 20 69 73 20 6d 61 64 65  * A copy is made
2640: 20 6f 66 20 74 68 65 20 73 74 72 69 6e 67 20 62   of the string b
2650: 65 66 6f 72 65 20 74 68 69 73 20 72 6f 75 74 69  efore this routi
2660: 6e 65 20 72 65 74 75 72 6e 73 20 73 6f 20 69 74  ne returns so it
2670: 20 69 73 20 73 61 66 65 0a 2a 2a 20 74 6f 20 70   is safe.** to p
2680: 61 73 73 20 69 6e 20 61 6e 20 65 70 68 65 6d 65  ass in an epheme
2690: 72 61 6c 20 73 74 72 69 6e 67 2e 0a 2a 2a 0a 2a  ral string..**.*
26a0: 2a 20 73 71 6c 69 74 65 5f 73 65 74 5f 72 65 73  * sqlite_set_res
26b0: 75 6c 74 5f 65 72 72 6f 72 28 29 20 77 6f 72 6b  ult_error() work
26c0: 73 20 6c 69 6b 65 20 73 71 6c 69 74 65 5f 73 65  s like sqlite_se
26d0: 74 5f 72 65 73 75 6c 74 5f 73 74 72 69 6e 67 28  t_result_string(
26e0: 29 20 65 78 63 65 70 74 0a 2a 2a 20 74 68 61 74  ) except.** that
26f0: 20 69 74 20 73 69 67 6e 61 6c 73 20 61 20 66 61   it signals a fa
2700: 74 61 6c 20 65 72 72 6f 72 2e 20 20 54 68 65 20  tal error.  The 
2710: 73 74 72 69 6e 67 20 61 72 67 75 6d 65 6e 74 2c  string argument,
2720: 20 69 66 20 61 6e 79 2c 20 69 73 20 74 68 65 0a   if any, is the.
2730: 2a 2a 20 65 72 72 6f 72 20 6d 65 73 73 61 67 65  ** error message
2740: 2e 20 20 49 66 20 74 68 65 20 61 72 67 75 6d 65  .  If the argume
2750: 6e 74 20 69 73 20 4e 55 4c 4c 20 61 20 67 65 6e  nt is NULL a gen
2760: 65 72 69 63 20 73 75 62 73 74 69 74 75 74 65 20  eric substitute 
2770: 65 72 72 6f 72 20 6d 65 73 73 61 67 65 0a 2a 2a  error message.**
2780: 20 69 73 20 75 73 65 64 2e 0a 2a 2a 0a 2a 2a 20   is used..**.** 
2790: 54 68 65 20 73 71 6c 69 74 65 5f 73 65 74 5f 72  The sqlite_set_r
27a0: 65 73 75 6c 74 5f 69 6e 74 28 29 20 61 6e 64 20  esult_int() and 
27b0: 73 71 6c 69 74 65 5f 73 65 74 5f 72 65 73 75 6c  sqlite_set_resul
27c0: 74 5f 64 6f 75 62 6c 65 28 29 20 73 65 74 20 74  t_double() set t
27d0: 68 65 20 72 65 74 75 72 6e 0a 2a 2a 20 76 61 6c  he return.** val
27e0: 75 65 20 6f 66 20 74 68 65 20 75 73 65 72 20 66  ue of the user f
27f0: 75 6e 63 74 69 6f 6e 20 74 6f 20 61 6e 20 69 6e  unction to an in
2800: 74 65 67 65 72 20 6f 72 20 61 20 64 6f 75 62 6c  teger or a doubl
2810: 65 2e 0a 2a 2a 0a 2a 2a 20 54 68 65 73 65 20 72  e..**.** These r
2820: 6f 75 74 69 6e 65 73 20 61 72 65 20 64 65 66 69  outines are defi
2830: 6e 65 64 20 68 65 72 65 20 69 6e 20 76 64 62 65  ned here in vdbe
2840: 2e 63 20 62 65 63 61 75 73 65 20 74 68 65 79 20  .c because they 
2850: 64 65 70 65 6e 64 20 6f 6e 20 6b 6e 6f 77 69 6e  depend on knowin
2860: 67 0a 2a 2a 20 74 68 65 20 69 6e 74 65 72 6e 61  g.** the interna
2870: 6c 73 20 6f 66 20 74 68 65 20 73 71 6c 69 74 65  ls of the sqlite
2880: 5f 66 75 6e 63 20 73 74 72 75 63 74 75 72 65 20  _func structure 
2890: 77 68 69 63 68 20 69 73 20 6f 6e 6c 79 20 64 65  which is only de
28a0: 66 69 6e 65 64 20 69 6e 20 0a 2a 2a 20 74 68 69  fined in .** thi
28b0: 73 20 73 6f 75 72 63 65 20 66 69 6c 65 2e 0a 2a  s source file..*
28c0: 2f 0a 63 68 61 72 20 2a 73 71 6c 69 74 65 5f 73  /.char *sqlite_s
28d0: 65 74 5f 72 65 73 75 6c 74 5f 73 74 72 69 6e 67  et_result_string
28e0: 28 73 71 6c 69 74 65 5f 66 75 6e 63 20 2a 70 2c  (sqlite_func *p,
28f0: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 52 65   const char *zRe
2900: 73 75 6c 74 2c 20 69 6e 74 20 6e 29 7b 0a 20 20  sult, int n){.  
2910: 61 73 73 65 72 74 28 20 21 70 2d 3e 69 73 53 74  assert( !p->isSt
2920: 65 70 20 29 3b 0a 20 20 69 66 28 20 70 2d 3e 73  ep );.  if( p->s
2930: 2e 66 6c 61 67 73 20 26 20 53 54 4b 5f 44 79 6e  .flags & STK_Dyn
2940: 20 29 7b 0a 20 20 20 20 73 71 6c 69 74 65 46 72   ){.    sqliteFr
2950: 65 65 28 70 2d 3e 7a 29 3b 0a 20 20 7d 0a 20 20  ee(p->z);.  }.  
2960: 69 66 28 20 7a 52 65 73 75 6c 74 3d 3d 30 20 29  if( zResult==0 )
2970: 7b 0a 20 20 20 20 70 2d 3e 73 2e 66 6c 61 67 73  {.    p->s.flags
2980: 20 3d 20 53 54 4b 5f 4e 75 6c 6c 3b 0a 20 20 20   = STK_Null;.   
2990: 20 6e 20 3d 20 30 3b 0a 20 20 20 20 70 2d 3e 7a   n = 0;.    p->z
29a0: 20 3d 20 30 3b 0a 20 20 20 20 70 2d 3e 73 2e 6e   = 0;.    p->s.n
29b0: 20 3d 20 30 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20   = 0;.  }else{. 
29c0: 20 20 20 69 66 28 20 6e 3c 30 20 29 20 6e 20 3d     if( n<0 ) n =
29d0: 20 73 74 72 6c 65 6e 28 7a 52 65 73 75 6c 74 29   strlen(zResult)
29e0: 3b 0a 20 20 20 20 69 66 28 20 6e 3c 4e 42 46 53  ;.    if( n<NBFS
29f0: 2d 31 20 29 7b 0a 20 20 20 20 20 20 6d 65 6d 63  -1 ){.      memc
2a00: 70 79 28 70 2d 3e 73 2e 7a 2c 20 7a 52 65 73 75  py(p->s.z, zResu
2a10: 6c 74 2c 20 6e 29 3b 0a 20 20 20 20 20 20 70 2d  lt, n);.      p-
2a20: 3e 73 2e 7a 5b 6e 5d 20 3d 20 30 3b 0a 20 20 20  >s.z[n] = 0;.   
2a30: 20 20 20 70 2d 3e 73 2e 66 6c 61 67 73 20 3d 20     p->s.flags = 
2a40: 53 54 4b 5f 53 74 72 3b 0a 20 20 20 20 20 20 70  STK_Str;.      p
2a50: 2d 3e 7a 20 3d 20 70 2d 3e 73 2e 7a 3b 0a 20 20  ->z = p->s.z;.  
2a60: 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 70    }else{.      p
2a70: 2d 3e 7a 20 3d 20 73 71 6c 69 74 65 4d 61 6c 6c  ->z = sqliteMall
2a80: 6f 63 52 61 77 28 20 6e 2b 31 20 29 3b 0a 20 20  ocRaw( n+1 );.  
2a90: 20 20 20 20 69 66 28 20 70 2d 3e 7a 20 29 7b 0a      if( p->z ){.
2aa0: 20 20 20 20 20 20 20 20 6d 65 6d 63 70 79 28 70          memcpy(p
2ab0: 2d 3e 7a 2c 20 7a 52 65 73 75 6c 74 2c 20 6e 29  ->z, zResult, n)
2ac0: 3b 0a 20 20 20 20 20 20 20 20 70 2d 3e 7a 5b 6e  ;.        p->z[n
2ad0: 5d 20 3d 20 30 3b 0a 20 20 20 20 20 20 7d 0a 20  ] = 0;.      }. 
2ae0: 20 20 20 20 20 70 2d 3e 73 2e 66 6c 61 67 73 20       p->s.flags 
2af0: 3d 20 53 54 4b 5f 53 74 72 20 7c 20 53 54 4b 5f  = STK_Str | STK_
2b00: 44 79 6e 3b 0a 20 20 20 20 7d 0a 20 20 20 20 70  Dyn;.    }.    p
2b10: 2d 3e 73 2e 6e 20 3d 20 6e 2b 31 3b 0a 20 20 7d  ->s.n = n+1;.  }
2b20: 0a 20 20 72 65 74 75 72 6e 20 70 2d 3e 7a 3b 0a  .  return p->z;.
2b30: 7d 0a 76 6f 69 64 20 73 71 6c 69 74 65 5f 73 65  }.void sqlite_se
2b40: 74 5f 72 65 73 75 6c 74 5f 69 6e 74 28 73 71 6c  t_result_int(sql
2b50: 69 74 65 5f 66 75 6e 63 20 2a 70 2c 20 69 6e 74  ite_func *p, int
2b60: 20 69 52 65 73 75 6c 74 29 7b 0a 20 20 61 73 73   iResult){.  ass
2b70: 65 72 74 28 20 21 70 2d 3e 69 73 53 74 65 70 20  ert( !p->isStep 
2b80: 29 3b 0a 20 20 69 66 28 20 70 2d 3e 73 2e 66 6c  );.  if( p->s.fl
2b90: 61 67 73 20 26 20 53 54 4b 5f 44 79 6e 20 29 7b  ags & STK_Dyn ){
2ba0: 0a 20 20 20 20 73 71 6c 69 74 65 46 72 65 65 28  .    sqliteFree(
2bb0: 70 2d 3e 7a 29 3b 0a 20 20 7d 0a 20 20 70 2d 3e  p->z);.  }.  p->
2bc0: 73 2e 69 20 3d 20 69 52 65 73 75 6c 74 3b 0a 20  s.i = iResult;. 
2bd0: 20 70 2d 3e 73 2e 66 6c 61 67 73 20 3d 20 53 54   p->s.flags = ST
2be0: 4b 5f 49 6e 74 3b 0a 7d 0a 76 6f 69 64 20 73 71  K_Int;.}.void sq
2bf0: 6c 69 74 65 5f 73 65 74 5f 72 65 73 75 6c 74 5f  lite_set_result_
2c00: 64 6f 75 62 6c 65 28 73 71 6c 69 74 65 5f 66 75  double(sqlite_fu
2c10: 6e 63 20 2a 70 2c 20 64 6f 75 62 6c 65 20 72 52  nc *p, double rR
2c20: 65 73 75 6c 74 29 7b 0a 20 20 61 73 73 65 72 74  esult){.  assert
2c30: 28 20 21 70 2d 3e 69 73 53 74 65 70 20 29 3b 0a  ( !p->isStep );.
2c40: 20 20 69 66 28 20 70 2d 3e 73 2e 66 6c 61 67 73    if( p->s.flags
2c50: 20 26 20 53 54 4b 5f 44 79 6e 20 29 7b 0a 20 20   & STK_Dyn ){.  
2c60: 20 20 73 71 6c 69 74 65 46 72 65 65 28 70 2d 3e    sqliteFree(p->
2c70: 7a 29 3b 0a 20 20 7d 0a 20 20 70 2d 3e 73 2e 72  z);.  }.  p->s.r
2c80: 20 3d 20 72 52 65 73 75 6c 74 3b 0a 20 20 70 2d   = rResult;.  p-
2c90: 3e 73 2e 66 6c 61 67 73 20 3d 20 53 54 4b 5f 52  >s.flags = STK_R
2ca0: 65 61 6c 3b 0a 7d 0a 76 6f 69 64 20 73 71 6c 69  eal;.}.void sqli
2cb0: 74 65 5f 73 65 74 5f 72 65 73 75 6c 74 5f 65 72  te_set_result_er
2cc0: 72 6f 72 28 73 71 6c 69 74 65 5f 66 75 6e 63 20  ror(sqlite_func 
2cd0: 2a 70 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a  *p, const char *
2ce0: 7a 4d 73 67 2c 20 69 6e 74 20 6e 29 7b 0a 20 20  zMsg, int n){.  
2cf0: 61 73 73 65 72 74 28 20 21 70 2d 3e 69 73 53 74  assert( !p->isSt
2d00: 65 70 20 29 3b 0a 20 20 73 71 6c 69 74 65 5f 73  ep );.  sqlite_s
2d10: 65 74 5f 72 65 73 75 6c 74 5f 73 74 72 69 6e 67  et_result_string
2d20: 28 70 2c 20 7a 4d 73 67 2c 20 6e 29 3b 0a 20 20  (p, zMsg, n);.  
2d30: 70 2d 3e 69 73 45 72 72 6f 72 20 3d 20 31 3b 0a  p->isError = 1;.
2d40: 7d 0a 0a 2f 2a 0a 2a 2a 20 45 78 74 72 61 63 74  }../*.** Extract
2d50: 20 74 68 65 20 75 73 65 72 20 64 61 74 61 20 66   the user data f
2d60: 72 6f 6d 20 61 20 73 71 6c 69 74 65 5f 66 75 6e  rom a sqlite_fun
2d70: 63 20 73 74 72 75 63 74 75 72 65 20 61 6e 64 20  c structure and 
2d80: 72 65 74 75 72 6e 20 61 0a 2a 2a 20 70 6f 69 6e  return a.** poin
2d90: 74 65 72 20 74 6f 20 69 74 2e 0a 2a 2a 0a 2a 2a  ter to it..**.**
2da0: 20 54 68 69 73 20 72 6f 75 74 69 6e 65 20 69 73   This routine is
2db0: 20 64 65 66 69 6e 65 64 20 68 65 72 65 20 69 6e   defined here in
2dc0: 20 76 64 62 65 2e 63 20 62 65 63 61 75 73 65 20   vdbe.c because 
2dd0: 69 74 20 64 65 70 65 6e 64 73 20 6f 6e 20 6b 6e  it depends on kn
2de0: 6f 77 69 6e 67 0a 2a 2a 20 74 68 65 20 69 6e 74  owing.** the int
2df0: 65 72 6e 61 6c 73 20 6f 66 20 74 68 65 20 73 71  ernals of the sq
2e00: 6c 69 74 65 5f 66 75 6e 63 20 73 74 72 75 63 74  lite_func struct
2e10: 75 72 65 20 77 68 69 63 68 20 69 73 20 6f 6e 6c  ure which is onl
2e20: 79 20 64 65 66 69 6e 65 64 20 69 6e 20 0a 2a 2a  y defined in .**
2e30: 20 74 68 69 73 20 73 6f 75 72 63 65 20 66 69 6c   this source fil
2e40: 65 2e 0a 2a 2f 0a 76 6f 69 64 20 2a 73 71 6c 69  e..*/.void *sqli
2e50: 74 65 5f 75 73 65 72 5f 64 61 74 61 28 73 71 6c  te_user_data(sql
2e60: 69 74 65 5f 66 75 6e 63 20 2a 70 29 7b 0a 20 20  ite_func *p){.  
2e70: 61 73 73 65 72 74 28 20 70 20 26 26 20 70 2d 3e  assert( p && p->
2e80: 70 46 75 6e 63 20 29 3b 0a 20 20 72 65 74 75 72  pFunc );.  retur
2e90: 6e 20 70 2d 3e 70 46 75 6e 63 2d 3e 70 55 73 65  n p->pFunc->pUse
2ea0: 72 44 61 74 61 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20  rData;.}../*.** 
2eb0: 41 6c 6c 6f 63 61 74 65 20 6f 72 20 72 65 74 75  Allocate or retu
2ec0: 72 6e 20 74 68 65 20 61 67 67 72 65 67 61 74 65  rn the aggregate
2ed0: 20 63 6f 6e 74 65 78 74 20 66 6f 72 20 61 20 75   context for a u
2ee0: 73 65 72 20 66 75 6e 63 74 69 6f 6e 2e 20 20 41  ser function.  A
2ef0: 20 6e 65 77 0a 2a 2a 20 63 6f 6e 74 65 78 74 20   new.** context 
2f00: 69 73 20 61 6c 6c 6f 63 61 74 65 64 20 6f 6e 20  is allocated on 
2f10: 74 68 65 20 66 69 72 73 74 20 63 61 6c 6c 2e 20  the first call. 
2f20: 20 53 75 62 73 65 71 75 65 6e 74 20 63 61 6c 6c   Subsequent call
2f30: 73 20 72 65 74 75 72 6e 20 74 68 65 0a 2a 2a 20  s return the.** 
2f40: 73 61 6d 65 20 63 6f 6e 74 65 78 74 20 74 68 61  same context tha
2f50: 74 20 77 61 73 20 72 65 74 75 72 6e 65 64 20 6f  t was returned o
2f60: 6e 20 70 72 69 6f 72 20 63 61 6c 6c 73 2e 0a 2a  n prior calls..*
2f70: 2a 0a 2a 2a 20 54 68 69 73 20 72 6f 75 74 69 6e  *.** This routin
2f80: 65 20 69 73 20 64 65 66 69 6e 65 64 20 68 65 72  e is defined her
2f90: 65 20 69 6e 20 76 64 62 65 2e 63 20 62 65 63 61  e in vdbe.c beca
2fa0: 75 73 65 20 69 74 20 64 65 70 65 6e 64 73 20 6f  use it depends o
2fb0: 6e 20 6b 6e 6f 77 69 6e 67 0a 2a 2a 20 74 68 65  n knowing.** the
2fc0: 20 69 6e 74 65 72 6e 61 6c 73 20 6f 66 20 74 68   internals of th
2fd0: 65 20 73 71 6c 69 74 65 5f 66 75 6e 63 20 73 74  e sqlite_func st
2fe0: 72 75 63 74 75 72 65 20 77 68 69 63 68 20 69 73  ructure which is
2ff0: 20 6f 6e 6c 79 20 64 65 66 69 6e 65 64 20 69 6e   only defined in
3000: 0a 2a 2a 20 74 68 69 73 20 73 6f 75 72 63 65 20  .** this source 
3010: 66 69 6c 65 2e 0a 2a 2f 0a 76 6f 69 64 20 2a 73  file..*/.void *s
3020: 71 6c 69 74 65 5f 61 67 67 72 65 67 61 74 65 5f  qlite_aggregate_
3030: 63 6f 6e 74 65 78 74 28 73 71 6c 69 74 65 5f 66  context(sqlite_f
3040: 75 6e 63 20 2a 70 2c 20 69 6e 74 20 6e 42 79 74  unc *p, int nByt
3050: 65 29 7b 0a 20 20 61 73 73 65 72 74 28 20 70 20  e){.  assert( p 
3060: 26 26 20 70 2d 3e 70 46 75 6e 63 20 26 26 20 70  && p->pFunc && p
3070: 2d 3e 70 46 75 6e 63 2d 3e 78 53 74 65 70 20 29  ->pFunc->xStep )
3080: 3b 0a 20 20 69 66 28 20 70 2d 3e 70 41 67 67 3d  ;.  if( p->pAgg=
3090: 3d 30 20 29 7b 0a 20 20 20 20 69 66 28 20 6e 42  =0 ){.    if( nB
30a0: 79 74 65 3c 3d 4e 42 46 53 20 29 7b 0a 20 20 20  yte<=NBFS ){.   
30b0: 20 20 20 70 2d 3e 70 41 67 67 20 3d 20 28 76 6f     p->pAgg = (vo
30c0: 69 64 2a 29 70 2d 3e 7a 3b 0a 20 20 20 20 7d 65  id*)p->z;.    }e
30d0: 6c 73 65 7b 0a 20 20 20 20 20 20 70 2d 3e 70 41  lse{.      p->pA
30e0: 67 67 20 3d 20 73 71 6c 69 74 65 4d 61 6c 6c 6f  gg = sqliteMallo
30f0: 63 28 20 6e 42 79 74 65 20 29 3b 0a 20 20 20 20  c( nByte );.    
3100: 7d 0a 20 20 7d 0a 20 20 72 65 74 75 72 6e 20 70  }.  }.  return p
3110: 2d 3e 70 41 67 67 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a  ->pAgg;.}../*.**
3120: 20 52 65 74 75 72 6e 20 74 68 65 20 6e 75 6d 62   Return the numb
3130: 65 72 20 6f 66 20 74 69 6d 65 73 20 74 68 65 20  er of times the 
3140: 53 74 65 70 20 66 75 6e 63 74 69 6f 6e 20 6f 66  Step function of
3150: 20 61 20 61 67 67 72 65 67 61 74 65 20 68 61 73   a aggregate has
3160: 20 62 65 65 6e 20 0a 2a 2a 20 63 61 6c 6c 65 64   been .** called
3170: 2e 0a 2a 2a 0a 2a 2a 20 54 68 69 73 20 72 6f 75  ..**.** This rou
3180: 74 69 6e 65 20 69 73 20 64 65 66 69 6e 65 64 20  tine is defined 
3190: 68 65 72 65 20 69 6e 20 76 64 62 65 2e 63 20 62  here in vdbe.c b
31a0: 65 63 61 75 73 65 20 69 74 20 64 65 70 65 6e 64  ecause it depend
31b0: 73 20 6f 6e 20 6b 6e 6f 77 69 6e 67 0a 2a 2a 20  s on knowing.** 
31c0: 74 68 65 20 69 6e 74 65 72 6e 61 6c 73 20 6f 66  the internals of
31d0: 20 74 68 65 20 73 71 6c 69 74 65 5f 66 75 6e 63   the sqlite_func
31e0: 20 73 74 72 75 63 74 75 72 65 20 77 68 69 63 68   structure which
31f0: 20 69 73 20 6f 6e 6c 79 20 64 65 66 69 6e 65 64   is only defined
3200: 20 69 6e 0a 2a 2a 20 74 68 69 73 20 73 6f 75 72   in.** this sour
3210: 63 65 20 66 69 6c 65 2e 0a 2a 2f 0a 69 6e 74 20  ce file..*/.int 
3220: 73 71 6c 69 74 65 5f 61 67 67 72 65 67 61 74 65  sqlite_aggregate
3230: 5f 63 6f 75 6e 74 28 73 71 6c 69 74 65 5f 66 75  _count(sqlite_fu
3240: 6e 63 20 2a 70 29 7b 0a 20 20 61 73 73 65 72 74  nc *p){.  assert
3250: 28 20 70 20 26 26 20 70 2d 3e 70 46 75 6e 63 20  ( p && p->pFunc 
3260: 26 26 20 70 2d 3e 70 46 75 6e 63 2d 3e 78 53 74  && p->pFunc->xSt
3270: 65 70 20 29 3b 0a 20 20 72 65 74 75 72 6e 20 70  ep );.  return p
3280: 2d 3e 63 6e 74 3b 0a 7d 0a 0a 23 69 66 20 21 64  ->cnt;.}..#if !d
3290: 65 66 69 6e 65 64 28 4e 44 45 42 55 47 29 20 7c  efined(NDEBUG) |
32a0: 7c 20 64 65 66 69 6e 65 64 28 56 44 42 45 5f 50  | defined(VDBE_P
32b0: 52 4f 46 49 4c 45 29 0a 2f 2a 0a 2a 2a 20 50 72  ROFILE)./*.** Pr
32c0: 69 6e 74 20 61 20 73 69 6e 67 6c 65 20 6f 70 63  int a single opc
32d0: 6f 64 65 2e 20 20 54 68 69 73 20 72 6f 75 74 69  ode.  This routi
32e0: 6e 65 20 69 73 20 75 73 65 64 20 66 6f 72 20 64  ne is used for d
32f0: 65 62 75 67 67 69 6e 67 20 6f 6e 6c 79 2e 0a 2a  ebugging only..*
3300: 2f 0a 76 6f 69 64 20 73 71 6c 69 74 65 56 64 62  /.void sqliteVdb
3310: 65 50 72 69 6e 74 4f 70 28 46 49 4c 45 20 2a 70  ePrintOp(FILE *p
3320: 4f 75 74 2c 20 69 6e 74 20 70 63 2c 20 4f 70 20  Out, int pc, Op 
3330: 2a 70 4f 70 29 7b 0a 20 20 63 68 61 72 20 2a 7a  *pOp){.  char *z
3340: 50 33 3b 0a 20 20 63 68 61 72 20 7a 50 74 72 5b  P3;.  char zPtr[
3350: 34 30 5d 3b 0a 20 20 69 66 28 20 70 4f 70 2d 3e  40];.  if( pOp->
3360: 70 33 74 79 70 65 3d 3d 50 33 5f 50 4f 49 4e 54  p3type==P3_POINT
3370: 45 52 20 29 7b 0a 20 20 20 20 73 70 72 69 6e 74  ER ){.    sprint
3380: 66 28 7a 50 74 72 2c 20 22 70 74 72 28 25 23 78  f(zPtr, "ptr(%#x
3390: 29 22 2c 20 28 69 6e 74 29 70 4f 70 2d 3e 70 33  )", (int)pOp->p3
33a0: 29 3b 0a 20 20 20 20 7a 50 33 20 3d 20 7a 50 74  );.    zP3 = zPt
33b0: 72 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20  r;.  }else{.    
33c0: 7a 50 33 20 3d 20 70 4f 70 2d 3e 70 33 3b 0a 20  zP3 = pOp->p3;. 
33d0: 20 7d 0a 20 20 69 66 28 20 70 4f 75 74 3d 3d 30   }.  if( pOut==0
33e0: 20 29 20 70 4f 75 74 20 3d 20 73 74 64 6f 75 74   ) pOut = stdout
33f0: 3b 0a 20 20 66 70 72 69 6e 74 66 28 70 4f 75 74  ;.  fprintf(pOut
3400: 2c 22 25 34 64 20 25 2d 31 32 73 20 25 34 64 20  ,"%4d %-12s %4d 
3410: 25 34 64 20 25 73 5c 6e 22 2c 0a 20 20 20 20 20  %4d %s\n",.     
3420: 20 70 63 2c 20 73 71 6c 69 74 65 4f 70 63 6f 64   pc, sqliteOpcod
3430: 65 4e 61 6d 65 73 5b 70 4f 70 2d 3e 6f 70 63 6f  eNames[pOp->opco
3440: 64 65 5d 2c 20 70 4f 70 2d 3e 70 31 2c 20 70 4f  de], pOp->p1, pO
3450: 70 2d 3e 70 32 2c 20 7a 50 33 20 3f 20 7a 50 33  p->p2, zP3 ? zP3
3460: 20 3a 20 22 22 29 3b 0a 20 20 66 66 6c 75 73 68   : "");.  fflush
3470: 28 70 4f 75 74 29 3b 0a 7d 0a 23 65 6e 64 69 66  (pOut);.}.#endif
3480: 0a 0a 2f 2a 0a 2a 2a 20 47 69 76 65 20 61 20 6c  ../*.** Give a l
3490: 69 73 74 69 6e 67 20 6f 66 20 74 68 65 20 70 72  isting of the pr
34a0: 6f 67 72 61 6d 20 69 6e 20 74 68 65 20 76 69 72  ogram in the vir
34b0: 74 75 61 6c 20 6d 61 63 68 69 6e 65 2e 0a 2a 2a  tual machine..**
34c0: 0a 2a 2a 20 54 68 65 20 69 6e 74 65 72 66 61 63  .** The interfac
34d0: 65 20 69 73 20 74 68 65 20 73 61 6d 65 20 61 73  e is the same as
34e0: 20 73 71 6c 69 74 65 56 64 62 65 45 78 65 63 28   sqliteVdbeExec(
34f0: 29 2e 20 20 42 75 74 20 69 6e 73 74 65 61 64 20  ).  But instead 
3500: 6f 66 0a 2a 2a 20 72 75 6e 6e 69 6e 67 20 74 68  of.** running th
3510: 65 20 63 6f 64 65 2c 20 69 74 20 69 6e 76 6f 6b  e code, it invok
3520: 65 73 20 74 68 65 20 63 61 6c 6c 62 61 63 6b 20  es the callback 
3530: 6f 6e 63 65 20 66 6f 72 20 65 61 63 68 20 69 6e  once for each in
3540: 73 74 72 75 63 74 69 6f 6e 2e 0a 2a 2a 20 54 68  struction..** Th
3550: 69 73 20 66 65 61 74 75 72 65 20 69 73 20 75 73  is feature is us
3560: 65 64 20 74 6f 20 69 6d 70 6c 65 6d 65 6e 74 20  ed to implement 
3570: 22 45 58 50 4c 41 49 4e 22 2e 0a 2a 2f 0a 69 6e  "EXPLAIN"..*/.in
3580: 74 20 73 71 6c 69 74 65 56 64 62 65 4c 69 73 74  t sqliteVdbeList
3590: 28 0a 20 20 56 64 62 65 20 2a 70 20 20 20 20 20  (.  Vdbe *p     
35a0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a                /*
35b0: 20 54 68 65 20 56 44 42 45 20 2a 2f 0a 29 7b 0a   The VDBE */.){.
35c0: 20 20 73 71 6c 69 74 65 20 2a 64 62 20 3d 20 70    sqlite *db = p
35d0: 2d 3e 64 62 3b 0a 20 20 69 6e 74 20 69 3b 0a 20  ->db;.  int i;. 
35e0: 20 73 74 61 74 69 63 20 63 68 61 72 20 2a 61 7a   static char *az
35f0: 43 6f 6c 75 6d 6e 4e 61 6d 65 73 5b 5d 20 3d 20  ColumnNames[] = 
3600: 7b 0a 20 20 20 20 20 22 61 64 64 72 22 2c 20 22  {.     "addr", "
3610: 6f 70 63 6f 64 65 22 2c 20 22 70 31 22 2c 20 20  opcode", "p1",  
3620: 22 70 32 22 2c 20 20 22 70 33 22 2c 20 0a 20 20  "p2",  "p3", .  
3630: 20 20 20 22 69 6e 74 22 2c 20 20 22 74 65 78 74     "int",  "text
3640: 22 2c 20 20 20 22 69 6e 74 22 2c 20 22 69 6e 74  ",   "int", "int
3650: 22 2c 20 22 74 65 78 74 22 2c 0a 20 20 20 20 20  ", "text",.     
3660: 30 0a 20 20 7d 3b 0a 0a 20 20 61 73 73 65 72 74  0.  };..  assert
3670: 28 20 70 2d 3e 70 6f 70 53 74 61 63 6b 3d 3d 30  ( p->popStack==0
3680: 20 29 3b 0a 20 20 61 73 73 65 72 74 28 20 70 2d   );.  assert( p-
3690: 3e 65 78 70 6c 61 69 6e 20 29 3b 0a 20 20 70 2d  >explain );.  p-
36a0: 3e 61 7a 43 6f 6c 4e 61 6d 65 20 3d 20 61 7a 43  >azColName = azC
36b0: 6f 6c 75 6d 6e 4e 61 6d 65 73 3b 0a 20 20 70 2d  olumnNames;.  p-
36c0: 3e 61 7a 52 65 73 43 6f 6c 75 6d 6e 20 3d 20 70  >azResColumn = p
36d0: 2d 3e 7a 53 74 61 63 6b 3b 0a 20 20 66 6f 72 28  ->zStack;.  for(
36e0: 69 3d 30 3b 20 69 3c 35 3b 20 69 2b 2b 29 20 70  i=0; i<5; i++) p
36f0: 2d 3e 7a 53 74 61 63 6b 5b 69 5d 20 3d 20 70 2d  ->zStack[i] = p-
3700: 3e 61 53 74 61 63 6b 5b 69 5d 2e 7a 3b 0a 20 20  >aStack[i].z;.  
3710: 70 2d 3e 72 63 20 3d 20 53 51 4c 49 54 45 5f 4f  p->rc = SQLITE_O
3720: 4b 3b 0a 20 20 66 6f 72 28 69 3d 70 2d 3e 70 63  K;.  for(i=p->pc
3730: 3b 20 70 2d 3e 72 63 3d 3d 53 51 4c 49 54 45 5f  ; p->rc==SQLITE_
3740: 4f 4b 20 26 26 20 69 3c 70 2d 3e 6e 4f 70 3b 20  OK && i<p->nOp; 
3750: 69 2b 2b 29 7b 0a 20 20 20 20 69 66 28 20 64 62  i++){.    if( db
3760: 2d 3e 66 6c 61 67 73 20 26 20 53 51 4c 49 54 45  ->flags & SQLITE
3770: 5f 49 6e 74 65 72 72 75 70 74 20 29 7b 0a 20 20  _Interrupt ){.  
3780: 20 20 20 20 64 62 2d 3e 66 6c 61 67 73 20 26 3d      db->flags &=
3790: 20 7e 53 51 4c 49 54 45 5f 49 6e 74 65 72 72 75   ~SQLITE_Interru
37a0: 70 74 3b 0a 20 20 20 20 20 20 69 66 28 20 64 62  pt;.      if( db
37b0: 2d 3e 6d 61 67 69 63 21 3d 53 51 4c 49 54 45 5f  ->magic!=SQLITE_
37c0: 4d 41 47 49 43 5f 42 55 53 59 20 29 7b 0a 20 20  MAGIC_BUSY ){.  
37d0: 20 20 20 20 20 20 70 2d 3e 72 63 20 3d 20 53 51        p->rc = SQ
37e0: 4c 49 54 45 5f 4d 49 53 55 53 45 3b 0a 20 20 20  LITE_MISUSE;.   
37f0: 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20     }else{.      
3800: 20 20 70 2d 3e 72 63 20 3d 20 53 51 4c 49 54 45    p->rc = SQLITE
3810: 5f 49 4e 54 45 52 52 55 50 54 3b 0a 20 20 20 20  _INTERRUPT;.    
3820: 20 20 7d 0a 20 20 20 20 20 20 73 71 6c 69 74 65    }.      sqlite
3830: 53 65 74 53 74 72 69 6e 67 28 26 70 2d 3e 7a 45  SetString(&p->zE
3840: 72 72 4d 73 67 2c 20 73 71 6c 69 74 65 5f 65 72  rrMsg, sqlite_er
3850: 72 6f 72 5f 73 74 72 69 6e 67 28 70 2d 3e 72 63  ror_string(p->rc
3860: 29 2c 20 30 29 3b 0a 20 20 20 20 20 20 62 72 65  ), 0);.      bre
3870: 61 6b 3b 0a 20 20 20 20 7d 0a 20 20 20 20 73 70  ak;.    }.    sp
3880: 72 69 6e 74 66 28 70 2d 3e 7a 53 74 61 63 6b 5b  rintf(p->zStack[
3890: 30 5d 2c 22 25 64 22 2c 69 29 3b 0a 20 20 20 20  0],"%d",i);.    
38a0: 73 70 72 69 6e 74 66 28 70 2d 3e 7a 53 74 61 63  sprintf(p->zStac
38b0: 6b 5b 32 5d 2c 22 25 64 22 2c 20 70 2d 3e 61 4f  k[2],"%d", p->aO
38c0: 70 5b 69 5d 2e 70 31 29 3b 0a 20 20 20 20 73 70  p[i].p1);.    sp
38d0: 72 69 6e 74 66 28 70 2d 3e 7a 53 74 61 63 6b 5b  rintf(p->zStack[
38e0: 33 5d 2c 22 25 64 22 2c 20 70 2d 3e 61 4f 70 5b  3],"%d", p->aOp[
38f0: 69 5d 2e 70 32 29 3b 0a 20 20 20 20 69 66 28 20  i].p2);.    if( 
3900: 70 2d 3e 61 4f 70 5b 69 5d 2e 70 33 74 79 70 65  p->aOp[i].p3type
3910: 3d 3d 50 33 5f 50 4f 49 4e 54 45 52 20 29 7b 0a  ==P3_POINTER ){.
3920: 20 20 20 20 20 20 73 70 72 69 6e 74 66 28 70 2d        sprintf(p-
3930: 3e 61 53 74 61 63 6b 5b 34 5d 2e 7a 2c 20 22 70  >aStack[4].z, "p
3940: 74 72 28 25 23 78 29 22 2c 20 28 69 6e 74 29 70  tr(%#x)", (int)p
3950: 2d 3e 61 4f 70 5b 69 5d 2e 70 33 29 3b 0a 20 20  ->aOp[i].p3);.  
3960: 20 20 20 20 70 2d 3e 7a 53 74 61 63 6b 5b 34 5d      p->zStack[4]
3970: 20 3d 20 70 2d 3e 61 53 74 61 63 6b 5b 34 5d 2e   = p->aStack[4].
3980: 7a 3b 0a 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20  z;.    }else{.  
3990: 20 20 20 20 70 2d 3e 7a 53 74 61 63 6b 5b 34 5d      p->zStack[4]
39a0: 20 3d 20 70 2d 3e 61 4f 70 5b 69 5d 2e 70 33 3b   = p->aOp[i].p3;
39b0: 0a 20 20 20 20 7d 0a 20 20 20 20 70 2d 3e 7a 53  .    }.    p->zS
39c0: 74 61 63 6b 5b 31 5d 20 3d 20 73 71 6c 69 74 65  tack[1] = sqlite
39d0: 4f 70 63 6f 64 65 4e 61 6d 65 73 5b 70 2d 3e 61  OpcodeNames[p->a
39e0: 4f 70 5b 69 5d 2e 6f 70 63 6f 64 65 5d 3b 0a 20  Op[i].opcode];. 
39f0: 20 20 20 69 66 28 20 70 2d 3e 78 43 61 6c 6c 62     if( p->xCallb
3a00: 61 63 6b 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20  ack==0 ){.      
3a10: 70 2d 3e 70 63 20 3d 20 69 2b 31 3b 0a 20 20 20  p->pc = i+1;.   
3a20: 20 20 20 70 2d 3e 61 7a 52 65 73 43 6f 6c 75 6d     p->azResColum
3a30: 6e 20 3d 20 70 2d 3e 7a 53 74 61 63 6b 3b 0a 20  n = p->zStack;. 
3a40: 20 20 20 20 20 70 2d 3e 6e 52 65 73 43 6f 6c 75       p->nResColu
3a50: 6d 6e 20 3d 20 35 3b 0a 20 20 20 20 20 20 72 65  mn = 5;.      re
3a60: 74 75 72 6e 20 53 51 4c 49 54 45 5f 52 4f 57 3b  turn SQLITE_ROW;
3a70: 0a 20 20 20 20 7d 0a 20 20 20 20 69 66 28 20 73  .    }.    if( s
3a80: 71 6c 69 74 65 53 61 66 65 74 79 4f 66 66 28 64  qliteSafetyOff(d
3a90: 62 29 20 29 7b 0a 20 20 20 20 20 20 70 2d 3e 72  b) ){.      p->r
3aa0: 63 20 3d 20 53 51 4c 49 54 45 5f 4d 49 53 55 53  c = SQLITE_MISUS
3ab0: 45 3b 0a 20 20 20 20 20 20 62 72 65 61 6b 3b 0a  E;.      break;.
3ac0: 20 20 20 20 7d 0a 20 20 20 20 69 66 28 20 70 2d      }.    if( p-
3ad0: 3e 78 43 61 6c 6c 62 61 63 6b 28 70 2d 3e 70 43  >xCallback(p->pC
3ae0: 62 41 72 67 2c 20 35 2c 20 70 2d 3e 7a 53 74 61  bArg, 5, p->zSta
3af0: 63 6b 2c 20 70 2d 3e 61 7a 43 6f 6c 4e 61 6d 65  ck, p->azColName
3b00: 29 20 29 7b 0a 20 20 20 20 20 20 70 2d 3e 72 63  ) ){.      p->rc
3b10: 20 3d 20 53 51 4c 49 54 45 5f 41 42 4f 52 54 3b   = SQLITE_ABORT;
3b20: 0a 20 20 20 20 7d 0a 20 20 20 20 69 66 28 20 73  .    }.    if( s
3b30: 71 6c 69 74 65 53 61 66 65 74 79 4f 6e 28 64 62  qliteSafetyOn(db
3b40: 29 20 29 7b 0a 20 20 20 20 20 20 70 2d 3e 72 63  ) ){.      p->rc
3b50: 20 3d 20 53 51 4c 49 54 45 5f 4d 49 53 55 53 45   = SQLITE_MISUSE
3b60: 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20 72 65  ;.    }.  }.  re
3b70: 74 75 72 6e 20 70 2d 3e 72 63 3d 3d 53 51 4c 49  turn p->rc==SQLI
3b80: 54 45 5f 4f 4b 20 3f 20 53 51 4c 49 54 45 5f 44  TE_OK ? SQLITE_D
3b90: 4f 4e 45 20 3a 20 53 51 4c 49 54 45 5f 45 52 52  ONE : SQLITE_ERR
3ba0: 4f 52 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 50 72 65  OR;.}../*.** Pre
3bb0: 70 61 72 65 20 61 20 76 69 72 74 75 61 6c 20 6d  pare a virtual m
3bc0: 61 63 68 69 6e 65 20 66 6f 72 20 65 78 65 63 75  achine for execu
3bd0: 74 69 6f 6e 2e 20 20 54 68 69 73 20 69 6e 76 6f  tion.  This invo
3be0: 6c 76 65 73 20 74 68 69 6e 67 73 20 73 75 63 68  lves things such
3bf0: 0a 2a 2a 20 61 73 20 61 6c 6c 6f 63 61 74 69 6e  .** as allocatin
3c00: 67 20 73 74 61 63 6b 20 73 70 61 63 65 20 61 6e  g stack space an
3c10: 64 20 69 6e 69 74 69 61 6c 69 7a 69 6e 67 20 74  d initializing t
3c20: 68 65 20 70 72 6f 67 72 61 6d 20 63 6f 75 6e 74  he program count
3c30: 65 72 2e 0a 2a 2a 20 41 66 74 65 72 20 74 68 65  er..** After the
3c40: 20 56 44 42 45 20 68 61 73 20 62 65 20 70 72 65   VDBE has be pre
3c50: 70 70 65 64 2c 20 69 74 20 63 61 6e 20 62 65 20  pped, it can be 
3c60: 65 78 65 63 75 74 65 64 20 62 79 20 6f 6e 65 20  executed by one 
3c70: 6f 72 20 6d 6f 72 65 0a 2a 2a 20 63 61 6c 6c 73  or more.** calls
3c80: 20 74 6f 20 73 71 6c 69 74 65 56 64 62 65 45 78   to sqliteVdbeEx
3c90: 65 63 28 29 2e 20 20 0a 2a 2a 0a 2a 2a 20 54 68  ec().  .**.** Th
3ca0: 65 20 62 65 68 61 76 69 6f 72 20 6f 66 20 73 71  e behavior of sq
3cb0: 6c 69 74 65 56 64 62 65 45 78 65 63 28 29 20 69  liteVdbeExec() i
3cc0: 73 20 69 6e 66 6c 75 65 6e 63 65 64 20 62 79 20  s influenced by 
3cd0: 74 68 65 20 70 61 72 61 6d 65 74 65 72 73 20 74  the parameters t
3ce0: 6f 0a 2a 2a 20 74 68 69 73 20 72 6f 75 74 69 6e  o.** this routin
3cf0: 65 2e 20 20 49 66 20 78 43 61 6c 6c 62 61 63 6b  e.  If xCallback
3d00: 20 69 73 20 4e 55 4c 4c 2c 20 74 68 65 6e 20 73   is NULL, then s
3d10: 71 6c 69 74 65 56 64 62 65 45 78 65 63 28 29 20  qliteVdbeExec() 
3d20: 77 69 6c 6c 20 72 65 74 75 72 6e 0a 2a 2a 20 77  will return.** w
3d30: 69 74 68 20 53 51 4c 49 54 45 5f 52 4f 57 20 77  ith SQLITE_ROW w
3d40: 68 65 6e 65 76 65 72 20 74 68 65 72 65 20 69 73  henever there is
3d50: 20 61 20 72 6f 77 20 6f 66 20 74 68 65 20 72 65   a row of the re
3d60: 73 75 6c 74 20 73 65 74 20 72 65 61 64 79 0a 2a  sult set ready.*
3d70: 2a 20 74 6f 20 62 65 20 64 65 6c 69 76 65 72 65  * to be delivere
3d80: 64 2e 20 20 70 2d 3e 61 7a 52 65 73 43 6f 6c 75  d.  p->azResColu
3d90: 6d 6e 20 77 69 6c 6c 20 70 6f 69 6e 74 20 74 6f  mn will point to
3da0: 20 74 68 65 20 72 6f 77 20 61 6e 64 20 0a 2a 2a   the row and .**
3db0: 20 70 2d 3e 6e 52 65 73 43 6f 6c 75 6d 6e 20 67   p->nResColumn g
3dc0: 69 76 65 73 20 74 68 65 20 6e 75 6d 62 65 72 20  ives the number 
3dd0: 6f 66 20 63 6f 6c 75 6d 6e 73 20 69 6e 20 74 68  of columns in th
3de0: 65 20 72 6f 77 2e 20 20 49 66 20 78 43 61 6c 6c  e row.  If xCall
3df0: 62 61 63 6b 0a 2a 2a 20 69 73 20 6e 6f 74 20 4e  back.** is not N
3e00: 55 4c 4c 2c 20 74 68 65 6e 20 74 68 65 20 78 43  ULL, then the xC
3e10: 61 6c 6c 62 61 63 6b 28 29 20 72 6f 75 74 69 6e  allback() routin
3e20: 65 20 69 73 20 69 6e 76 6f 6b 65 64 20 74 6f 20  e is invoked to 
3e30: 70 72 6f 63 65 73 73 20 65 61 63 68 0a 2a 2a 20  process each.** 
3e40: 72 6f 77 20 69 6e 20 74 68 65 20 72 65 73 75 6c  row in the resul
3e50: 74 20 73 65 74 2e 0a 2a 2f 0a 76 6f 69 64 20 73  t set..*/.void s
3e60: 71 6c 69 74 65 56 64 62 65 4d 61 6b 65 52 65 61  qliteVdbeMakeRea
3e70: 64 79 28 0a 20 20 56 64 62 65 20 2a 70 2c 20 20  dy(.  Vdbe *p,  
3e80: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
3e90: 20 20 20 20 20 2f 2a 20 54 68 65 20 56 44 42 45       /* The VDBE
3ea0: 20 2a 2f 0a 20 20 69 6e 74 20 6e 56 61 72 2c 20   */.  int nVar, 
3eb0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
3ec0: 20 20 20 20 20 2f 2a 20 4e 75 6d 62 65 72 20 6f       /* Number o
3ed0: 66 20 27 3f 27 20 73 65 65 20 69 6e 20 74 68 65  f '?' see in the
3ee0: 20 53 51 4c 20 73 74 61 74 65 6d 65 6e 74 20 2a   SQL statement *
3ef0: 2f 0a 20 20 73 71 6c 69 74 65 5f 63 61 6c 6c 62  /.  sqlite_callb
3f00: 61 63 6b 20 78 43 61 6c 6c 62 61 63 6b 2c 20 20  ack xCallback,  
3f10: 20 20 20 2f 2a 20 52 65 73 75 6c 74 20 63 61 6c     /* Result cal
3f20: 6c 62 61 63 6b 20 2a 2f 0a 20 20 76 6f 69 64 20  lback */.  void 
3f30: 2a 70 43 61 6c 6c 62 61 63 6b 41 72 67 2c 20 20  *pCallbackArg,  
3f40: 20 20 20 20 20 20 20 20 20 20 2f 2a 20 31 73 74            /* 1st
3f50: 20 61 72 67 75 6d 65 6e 74 20 74 6f 20 78 43 61   argument to xCa
3f60: 6c 6c 62 61 63 6b 28 29 20 2a 2f 0a 20 20 69 6e  llback() */.  in
3f70: 74 20 69 73 45 78 70 6c 61 69 6e 20 20 20 20 20  t isExplain     
3f80: 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20               /* 
3f90: 54 72 75 65 20 69 66 20 74 68 65 20 45 58 50 4c  True if the EXPL
3fa0: 41 49 4e 20 6b 65 79 77 6f 72 64 73 20 69 73 20  AIN keywords is 
3fb0: 70 72 65 73 65 6e 74 20 2a 2f 0a 29 7b 0a 20 20  present */.){.  
3fc0: 69 6e 74 20 6e 3b 0a 0a 20 20 61 73 73 65 72 74  int n;..  assert
3fd0: 28 20 70 21 3d 30 20 29 3b 0a 20 20 61 73 73 65  ( p!=0 );.  asse
3fe0: 72 74 28 20 70 2d 3e 6d 61 67 69 63 3d 3d 56 44  rt( p->magic==VD
3ff0: 42 45 5f 4d 41 47 49 43 5f 49 4e 49 54 20 29 3b  BE_MAGIC_INIT );
4000: 0a 0a 20 20 2f 2a 20 41 64 64 20 61 20 48 41 4c  ..  /* Add a HAL
4010: 54 20 69 6e 73 74 72 75 63 74 69 6f 6e 20 74 6f  T instruction to
4020: 20 74 68 65 20 76 65 72 79 20 65 6e 64 20 6f 66   the very end of
4030: 20 74 68 65 20 70 72 6f 67 72 61 6d 2e 0a 20 20   the program..  
4040: 2a 2f 0a 20 20 69 66 28 20 70 2d 3e 6e 4f 70 3d  */.  if( p->nOp=
4050: 3d 30 20 7c 7c 20 28 70 2d 3e 61 4f 70 20 26 26  =0 || (p->aOp &&
4060: 20 70 2d 3e 61 4f 70 5b 70 2d 3e 6e 4f 70 2d 31   p->aOp[p->nOp-1
4070: 5d 2e 6f 70 63 6f 64 65 21 3d 4f 50 5f 48 61 6c  ].opcode!=OP_Hal
4080: 74 29 20 29 7b 0a 20 20 20 20 73 71 6c 69 74 65  t) ){.    sqlite
4090: 56 64 62 65 41 64 64 4f 70 28 70 2c 20 4f 50 5f  VdbeAddOp(p, OP_
40a0: 48 61 6c 74 2c 20 30 2c 20 30 29 3b 0a 20 20 7d  Halt, 0, 0);.  }
40b0: 0a 0a 20 20 2f 2a 20 4e 6f 20 69 6e 73 74 72 75  ..  /* No instru
40c0: 63 74 69 6f 6e 20 65 76 65 72 20 70 75 73 68 65  ction ever pushe
40d0: 73 20 6d 6f 72 65 20 74 68 61 6e 20 61 20 73 69  s more than a si
40e0: 6e 67 6c 65 20 65 6c 65 6d 65 6e 74 20 6f 6e 74  ngle element ont
40f0: 6f 20 74 68 65 0a 20 20 2a 2a 20 73 74 61 63 6b  o the.  ** stack
4100: 2e 20 20 41 6e 64 20 74 68 65 20 73 74 61 63 6b  .  And the stack
4110: 20 6e 65 76 65 72 20 67 72 6f 77 73 20 6f 6e 20   never grows on 
4120: 73 75 63 63 65 73 73 69 76 65 20 65 78 65 63 75  successive execu
4130: 74 69 6f 6e 73 20 6f 66 20 74 68 65 0a 20 20 2a  tions of the.  *
4140: 2a 20 73 61 6d 65 20 6c 6f 6f 70 2e 20 20 53 6f  * same loop.  So
4150: 20 74 68 65 20 74 6f 74 61 6c 20 6e 75 6d 62 65   the total numbe
4160: 72 20 6f 66 20 69 6e 73 74 72 75 63 74 69 6f 6e  r of instruction
4170: 73 20 69 73 20 61 6e 20 75 70 70 65 72 20 62 6f  s is an upper bo
4180: 75 6e 64 0a 20 20 2a 2a 20 6f 6e 20 74 68 65 20  und.  ** on the 
4190: 6d 61 78 69 6d 75 6d 20 73 74 61 63 6b 20 64 65  maximum stack de
41a0: 70 74 68 20 72 65 71 75 69 72 65 64 2e 0a 20 20  pth required..  
41b0: 2a 2a 0a 20 20 2a 2a 20 41 6c 6c 6f 63 61 74 69  **.  ** Allocati
41c0: 6f 6e 20 61 6c 6c 20 74 68 65 20 73 74 61 63 6b  on all the stack
41d0: 20 73 70 61 63 65 20 77 65 20 77 69 6c 6c 20 65   space we will e
41e0: 76 65 72 20 6e 65 65 64 2e 0a 20 20 2a 2f 0a 20  ver need..  */. 
41f0: 20 69 66 28 20 70 2d 3e 61 53 74 61 63 6b 3d 3d   if( p->aStack==
4200: 30 20 29 7b 0a 20 20 20 20 70 2d 3e 6e 56 61 72  0 ){.    p->nVar
4210: 20 3d 20 6e 56 61 72 3b 0a 20 20 20 20 61 73 73   = nVar;.    ass
4220: 65 72 74 28 20 6e 56 61 72 3e 3d 30 20 29 3b 0a  ert( nVar>=0 );.
4230: 20 20 20 20 6e 20 3d 20 69 73 45 78 70 6c 61 69      n = isExplai
4240: 6e 20 3f 20 31 30 20 3a 20 70 2d 3e 6e 4f 70 3b  n ? 10 : p->nOp;
4250: 0a 20 20 20 20 70 2d 3e 61 53 74 61 63 6b 20 3d  .    p->aStack =
4260: 20 73 71 6c 69 74 65 4d 61 6c 6c 6f 63 28 0a 20   sqliteMalloc(. 
4270: 20 20 20 6e 2a 28 73 69 7a 65 6f 66 28 70 2d 3e     n*(sizeof(p->
4280: 61 53 74 61 63 6b 5b 30 5d 29 20 2b 20 32 2a 73  aStack[0]) + 2*s
4290: 69 7a 65 6f 66 28 63 68 61 72 2a 29 29 20 20 20  izeof(char*))   
42a0: 2f 2a 20 61 53 74 61 63 6b 20 61 6e 64 20 7a 53  /* aStack and zS
42b0: 74 61 63 6b 20 2a 2f 0a 20 20 20 20 20 20 2b 20  tack */.      + 
42c0: 70 2d 3e 6e 56 61 72 2a 28 73 69 7a 65 6f 66 28  p->nVar*(sizeof(
42d0: 63 68 61 72 2a 29 2b 73 69 7a 65 6f 66 28 69 6e  char*)+sizeof(in
42e0: 74 29 2b 31 29 20 20 20 20 20 20 2f 2a 20 61 7a  t)+1)      /* az
42f0: 56 61 72 2c 20 61 6e 56 61 72 2c 20 61 62 56 61  Var, anVar, abVa
4300: 72 20 2a 2f 0a 20 20 20 20 29 3b 0a 20 20 20 20  r */.    );.    
4310: 70 2d 3e 7a 53 74 61 63 6b 20 3d 20 28 63 68 61  p->zStack = (cha
4320: 72 2a 2a 29 26 70 2d 3e 61 53 74 61 63 6b 5b 6e  r**)&p->aStack[n
4330: 5d 3b 0a 20 20 20 20 70 2d 3e 61 7a 43 6f 6c 4e  ];.    p->azColN
4340: 61 6d 65 20 3d 20 28 63 68 61 72 2a 2a 29 26 70  ame = (char**)&p
4350: 2d 3e 7a 53 74 61 63 6b 5b 6e 5d 3b 0a 20 20 20  ->zStack[n];.   
4360: 20 70 2d 3e 61 7a 56 61 72 20 3d 20 28 63 68 61   p->azVar = (cha
4370: 72 2a 2a 29 26 70 2d 3e 61 7a 43 6f 6c 4e 61 6d  r**)&p->azColNam
4380: 65 5b 6e 5d 3b 0a 20 20 20 20 70 2d 3e 61 6e 56  e[n];.    p->anV
4390: 61 72 20 3d 20 28 69 6e 74 2a 29 26 70 2d 3e 61  ar = (int*)&p->a
43a0: 7a 56 61 72 5b 70 2d 3e 6e 56 61 72 5d 3b 0a 20  zVar[p->nVar];. 
43b0: 20 20 20 70 2d 3e 61 62 56 61 72 20 3d 20 28 75     p->abVar = (u
43c0: 38 2a 29 26 70 2d 3e 61 6e 56 61 72 5b 70 2d 3e  8*)&p->anVar[p->
43d0: 6e 56 61 72 5d 3b 0a 20 20 7d 0a 0a 20 20 73 71  nVar];.  }..  sq
43e0: 6c 69 74 65 48 61 73 68 49 6e 69 74 28 26 70 2d  liteHashInit(&p-
43f0: 3e 61 67 67 2e 68 61 73 68 2c 20 53 51 4c 49 54  >agg.hash, SQLIT
4400: 45 5f 48 41 53 48 5f 42 49 4e 41 52 59 2c 20 30  E_HASH_BINARY, 0
4410: 29 3b 0a 20 20 70 2d 3e 61 67 67 2e 70 53 65 61  );.  p->agg.pSea
4420: 72 63 68 20 3d 20 30 3b 0a 23 69 66 64 65 66 20  rch = 0;.#ifdef 
4430: 4d 45 4d 4f 52 59 5f 44 45 42 55 47 0a 20 20 69  MEMORY_DEBUG.  i
4440: 66 28 20 73 71 6c 69 74 65 4f 73 46 69 6c 65 45  f( sqliteOsFileE
4450: 78 69 73 74 73 28 22 76 64 62 65 5f 74 72 61 63  xists("vdbe_trac
4460: 65 22 29 20 29 7b 0a 20 20 20 20 70 2d 3e 74 72  e") ){.    p->tr
4470: 61 63 65 20 3d 20 73 74 64 6f 75 74 3b 0a 20 20  ace = stdout;.  
4480: 7d 0a 23 65 6e 64 69 66 0a 20 20 70 2d 3e 74 6f  }.#endif.  p->to
4490: 73 20 3d 20 2d 31 3b 0a 20 20 70 2d 3e 70 63 20  s = -1;.  p->pc 
44a0: 3d 20 30 3b 0a 20 20 70 2d 3e 72 63 20 3d 20 53  = 0;.  p->rc = S
44b0: 51 4c 49 54 45 5f 4f 4b 3b 0a 20 20 70 2d 3e 75  QLITE_OK;.  p->u
44c0: 6e 69 71 75 65 43 6e 74 20 3d 20 30 3b 0a 20 20  niqueCnt = 0;.  
44d0: 70 2d 3e 72 65 74 75 72 6e 44 65 70 74 68 20 3d  p->returnDepth =
44e0: 20 30 3b 0a 20 20 70 2d 3e 65 72 72 6f 72 41 63   0;.  p->errorAc
44f0: 74 69 6f 6e 20 3d 20 4f 45 5f 41 62 6f 72 74 3b  tion = OE_Abort;
4500: 0a 20 20 70 2d 3e 75 6e 64 6f 54 72 61 6e 73 4f  .  p->undoTransO
4510: 6e 45 72 72 6f 72 20 3d 20 30 3b 0a 20 20 70 2d  nError = 0;.  p-
4520: 3e 78 43 61 6c 6c 62 61 63 6b 20 3d 20 78 43 61  >xCallback = xCa
4530: 6c 6c 62 61 63 6b 3b 0a 20 20 70 2d 3e 70 43 62  llback;.  p->pCb
4540: 41 72 67 20 3d 20 70 43 61 6c 6c 62 61 63 6b 41  Arg = pCallbackA
4550: 72 67 3b 0a 20 20 70 2d 3e 70 6f 70 53 74 61 63  rg;.  p->popStac
4560: 6b 20 3d 20 20 30 3b 0a 20 20 70 2d 3e 65 78 70  k =  0;.  p->exp
4570: 6c 61 69 6e 20 7c 3d 20 69 73 45 78 70 6c 61 69  lain |= isExplai
4580: 6e 3b 0a 20 20 70 2d 3e 6d 61 67 69 63 20 3d 20  n;.  p->magic = 
4590: 56 44 42 45 5f 4d 41 47 49 43 5f 52 55 4e 3b 0a  VDBE_MAGIC_RUN;.
45a0: 23 69 66 64 65 66 20 56 44 42 45 5f 50 52 4f 46  #ifdef VDBE_PROF
45b0: 49 4c 45 0a 20 20 66 6f 72 28 69 3d 30 3b 20 69  ILE.  for(i=0; i
45c0: 3c 70 2d 3e 6e 4f 70 3b 20 69 2b 2b 29 7b 0a 20  <p->nOp; i++){. 
45d0: 20 20 20 70 2d 3e 61 4f 70 5b 69 5d 2e 63 6e 74     p->aOp[i].cnt
45e0: 20 3d 20 30 3b 0a 20 20 20 20 70 2d 3e 61 4f 70   = 0;.    p->aOp
45f0: 5b 69 5d 2e 63 79 63 6c 65 73 20 3d 20 30 3b 0a  [i].cycles = 0;.
4600: 20 20 7d 0a 23 65 6e 64 69 66 0a 7d 0a 0a 0a 2f    }.#endif.}.../
4610: 2a 0a 2a 2a 20 52 65 6d 6f 76 65 20 61 6e 79 20  *.** Remove any 
4620: 65 6c 65 6d 65 6e 74 73 20 74 68 61 74 20 72 65  elements that re
4630: 6d 61 69 6e 20 6f 6e 20 74 68 65 20 73 6f 72 74  main on the sort
4640: 65 72 20 66 6f 72 20 74 68 65 20 56 44 42 45 20  er for the VDBE 
4650: 67 69 76 65 6e 2e 0a 2a 2f 0a 76 6f 69 64 20 73  given..*/.void s
4660: 71 6c 69 74 65 56 64 62 65 53 6f 72 74 65 72 52  qliteVdbeSorterR
4670: 65 73 65 74 28 56 64 62 65 20 2a 70 29 7b 0a 20  eset(Vdbe *p){. 
4680: 20 77 68 69 6c 65 28 20 70 2d 3e 70 53 6f 72 74   while( p->pSort
4690: 20 29 7b 0a 20 20 20 20 53 6f 72 74 65 72 20 2a   ){.    Sorter *
46a0: 70 53 6f 72 74 65 72 20 3d 20 70 2d 3e 70 53 6f  pSorter = p->pSo
46b0: 72 74 3b 0a 20 20 20 20 70 2d 3e 70 53 6f 72 74  rt;.    p->pSort
46c0: 20 3d 20 70 53 6f 72 74 65 72 2d 3e 70 4e 65 78   = pSorter->pNex
46d0: 74 3b 0a 20 20 20 20 73 71 6c 69 74 65 46 72 65  t;.    sqliteFre
46e0: 65 28 70 53 6f 72 74 65 72 2d 3e 7a 4b 65 79 29  e(pSorter->zKey)
46f0: 3b 0a 20 20 20 20 73 71 6c 69 74 65 46 72 65 65  ;.    sqliteFree
4700: 28 70 53 6f 72 74 65 72 2d 3e 70 44 61 74 61 29  (pSorter->pData)
4710: 3b 0a 20 20 20 20 73 71 6c 69 74 65 46 72 65 65  ;.    sqliteFree
4720: 28 70 53 6f 72 74 65 72 29 3b 0a 20 20 7d 0a 7d  (pSorter);.  }.}
4730: 0a 0a 2f 2a 0a 2a 2a 20 50 6f 70 20 74 68 65 20  ../*.** Pop the 
4740: 73 74 61 63 6b 20 4e 20 74 69 6d 65 73 2e 20 20  stack N times.  
4750: 46 72 65 65 20 61 6e 79 20 6d 65 6d 6f 72 79 20  Free any memory 
4760: 61 73 73 6f 63 69 61 74 65 64 20 77 69 74 68 20  associated with 
4770: 74 68 65 0a 2a 2a 20 70 6f 70 70 65 64 20 73 74  the.** popped st
4780: 61 63 6b 20 65 6c 65 6d 65 6e 74 73 2e 0a 2a 2f  ack elements..*/
4790: 0a 76 6f 69 64 20 73 71 6c 69 74 65 56 64 62 65  .void sqliteVdbe
47a0: 50 6f 70 53 74 61 63 6b 28 56 64 62 65 20 2a 70  PopStack(Vdbe *p
47b0: 2c 20 69 6e 74 20 4e 29 7b 0a 20 20 61 73 73 65  , int N){.  asse
47c0: 72 74 28 20 4e 3e 3d 30 20 29 3b 0a 20 20 69 66  rt( N>=0 );.  if
47d0: 28 20 70 2d 3e 7a 53 74 61 63 6b 3d 3d 30 20 29  ( p->zStack==0 )
47e0: 20 72 65 74 75 72 6e 3b 0a 20 20 61 73 73 65 72   return;.  asser
47f0: 74 28 20 70 2d 3e 61 53 74 61 63 6b 20 7c 7c 20  t( p->aStack || 
4800: 73 71 6c 69 74 65 5f 6d 61 6c 6c 6f 63 5f 66 61  sqlite_malloc_fa
4810: 69 6c 65 64 20 29 3b 0a 20 20 69 66 28 20 70 2d  iled );.  if( p-
4820: 3e 61 53 74 61 63 6b 3d 3d 30 20 29 20 72 65 74  >aStack==0 ) ret
4830: 75 72 6e 3b 0a 20 20 77 68 69 6c 65 28 20 4e 2d  urn;.  while( N-
4840: 2d 20 3e 20 30 20 29 7b 0a 20 20 20 20 69 66 28  - > 0 ){.    if(
4850: 20 70 2d 3e 61 53 74 61 63 6b 5b 70 2d 3e 74 6f   p->aStack[p->to
4860: 73 5d 2e 66 6c 61 67 73 20 26 20 53 54 4b 5f 44  s].flags & STK_D
4870: 79 6e 20 29 7b 0a 20 20 20 20 20 20 73 71 6c 69  yn ){.      sqli
4880: 74 65 46 72 65 65 28 70 2d 3e 7a 53 74 61 63 6b  teFree(p->zStack
4890: 5b 70 2d 3e 74 6f 73 5d 29 3b 0a 20 20 20 20 7d  [p->tos]);.    }
48a0: 0a 20 20 20 20 70 2d 3e 61 53 74 61 63 6b 5b 70  .    p->aStack[p
48b0: 2d 3e 74 6f 73 5d 2e 66 6c 61 67 73 20 3d 20 30  ->tos].flags = 0
48c0: 3b 0a 20 20 20 20 70 2d 3e 7a 53 74 61 63 6b 5b  ;.    p->zStack[
48d0: 70 2d 3e 74 6f 73 5d 20 3d 20 30 3b 0a 20 20 20  p->tos] = 0;.   
48e0: 20 70 2d 3e 74 6f 73 2d 2d 3b 0a 20 20 7d 0a 7d   p->tos--;.  }.}
48f0: 0a 0a 2f 2a 0a 2a 2a 20 52 65 73 65 74 20 61 6e  ../*.** Reset an
4900: 20 41 67 67 20 73 74 72 75 63 74 75 72 65 2e 20   Agg structure. 
4910: 20 44 65 6c 65 74 65 20 61 6c 6c 20 69 74 73 20   Delete all its 
4920: 63 6f 6e 74 65 6e 74 73 2e 20 0a 2a 2a 0a 2a 2a  contents. .**.**
4930: 20 46 6f 72 20 69 6e 73 74 61 6c 6c 61 62 6c 65   For installable
4940: 20 61 67 67 72 65 67 61 74 65 20 66 75 6e 63 74   aggregate funct
4950: 69 6f 6e 73 2c 20 69 66 20 74 68 65 20 73 74 65  ions, if the ste
4960: 70 20 66 75 6e 63 74 69 6f 6e 20 68 61 73 20 62  p function has b
4970: 65 65 6e 0a 2a 2a 20 63 61 6c 6c 65 64 2c 20 6d  een.** called, m
4980: 61 6b 65 20 73 75 72 65 20 74 68 65 20 66 69 6e  ake sure the fin
4990: 61 6c 69 7a 65 72 20 66 75 6e 63 74 69 6f 6e 20  alizer function 
49a0: 68 61 73 20 61 6c 73 6f 20 62 65 65 6e 20 63 61  has also been ca
49b0: 6c 6c 65 64 2e 20 20 54 68 65 0a 2a 2a 20 66 69  lled.  The.** fi
49c0: 6e 61 6c 69 7a 65 72 20 6d 69 67 68 74 20 6e 65  nalizer might ne
49d0: 65 64 20 74 6f 20 66 72 65 65 20 6d 65 6d 6f 72  ed to free memor
49e0: 79 20 74 68 61 74 20 77 61 73 20 61 6c 6c 6f 63  y that was alloc
49f0: 61 74 65 64 20 61 73 20 70 61 72 74 20 6f 66 20  ated as part of 
4a00: 69 74 73 0a 2a 2a 20 70 72 69 76 61 74 65 20 63  its.** private c
4a10: 6f 6e 74 65 78 74 2e 20 20 49 66 20 74 68 65 20  ontext.  If the 
4a20: 66 69 6e 61 6c 69 7a 65 72 20 68 61 73 20 6e 6f  finalizer has no
4a30: 74 20 62 65 65 6e 20 63 61 6c 6c 65 64 20 79 65  t been called ye
4a40: 74 2c 20 63 61 6c 6c 20 69 74 0a 2a 2a 20 6e 6f  t, call it.** no
4a50: 77 2e 0a 2a 2f 0a 76 6f 69 64 20 73 71 6c 69 74  w..*/.void sqlit
4a60: 65 56 64 62 65 41 67 67 52 65 73 65 74 28 41 67  eVdbeAggReset(Ag
4a70: 67 20 2a 70 41 67 67 29 7b 0a 20 20 69 6e 74 20  g *pAgg){.  int 
4a80: 69 3b 0a 20 20 48 61 73 68 45 6c 65 6d 20 2a 70  i;.  HashElem *p
4a90: 3b 0a 20 20 66 6f 72 28 70 20 3d 20 73 71 6c 69  ;.  for(p = sqli
4aa0: 74 65 48 61 73 68 46 69 72 73 74 28 26 70 41 67  teHashFirst(&pAg
4ab0: 67 2d 3e 68 61 73 68 29 3b 20 70 3b 20 70 20 3d  g->hash); p; p =
4ac0: 20 73 71 6c 69 74 65 48 61 73 68 4e 65 78 74 28   sqliteHashNext(
4ad0: 70 29 29 7b 0a 20 20 20 20 41 67 67 45 6c 65 6d  p)){.    AggElem
4ae0: 20 2a 70 45 6c 65 6d 20 3d 20 73 71 6c 69 74 65   *pElem = sqlite
4af0: 48 61 73 68 44 61 74 61 28 70 29 3b 0a 20 20 20  HashData(p);.   
4b00: 20 61 73 73 65 72 74 28 20 70 41 67 67 2d 3e 61   assert( pAgg->a
4b10: 70 46 75 6e 63 21 3d 30 20 29 3b 0a 20 20 20 20  pFunc!=0 );.    
4b20: 66 6f 72 28 69 3d 30 3b 20 69 3c 70 41 67 67 2d  for(i=0; i<pAgg-
4b30: 3e 6e 4d 65 6d 3b 20 69 2b 2b 29 7b 0a 20 20 20  >nMem; i++){.   
4b40: 20 20 20 4d 65 6d 20 2a 70 4d 65 6d 20 3d 20 26     Mem *pMem = &
4b50: 70 45 6c 65 6d 2d 3e 61 4d 65 6d 5b 69 5d 3b 0a  pElem->aMem[i];.
4b60: 20 20 20 20 20 20 69 66 28 20 70 41 67 67 2d 3e        if( pAgg->
4b70: 61 70 46 75 6e 63 5b 69 5d 20 26 26 20 28 70 4d  apFunc[i] && (pM
4b80: 65 6d 2d 3e 73 2e 66 6c 61 67 73 20 26 20 53 54  em->s.flags & ST
4b90: 4b 5f 41 67 67 43 74 78 29 21 3d 30 20 29 7b 0a  K_AggCtx)!=0 ){.
4ba0: 20 20 20 20 20 20 20 20 73 71 6c 69 74 65 5f 66          sqlite_f
4bb0: 75 6e 63 20 63 74 78 3b 0a 20 20 20 20 20 20 20  unc ctx;.       
4bc0: 20 63 74 78 2e 70 46 75 6e 63 20 3d 20 70 41 67   ctx.pFunc = pAg
4bd0: 67 2d 3e 61 70 46 75 6e 63 5b 69 5d 3b 0a 20 20  g->apFunc[i];.  
4be0: 20 20 20 20 20 20 63 74 78 2e 73 2e 66 6c 61 67        ctx.s.flag
4bf0: 73 20 3d 20 53 54 4b 5f 4e 75 6c 6c 3b 0a 20 20  s = STK_Null;.  
4c00: 20 20 20 20 20 20 63 74 78 2e 7a 20 3d 20 30 3b        ctx.z = 0;
4c10: 0a 20 20 20 20 20 20 20 20 63 74 78 2e 70 41 67  .        ctx.pAg
4c20: 67 20 3d 20 70 4d 65 6d 2d 3e 7a 3b 0a 20 20 20  g = pMem->z;.   
4c30: 20 20 20 20 20 63 74 78 2e 63 6e 74 20 3d 20 70       ctx.cnt = p
4c40: 4d 65 6d 2d 3e 73 2e 69 3b 0a 20 20 20 20 20 20  Mem->s.i;.      
4c50: 20 20 63 74 78 2e 69 73 53 74 65 70 20 3d 20 30    ctx.isStep = 0
4c60: 3b 0a 20 20 20 20 20 20 20 20 63 74 78 2e 69 73  ;.        ctx.is
4c70: 45 72 72 6f 72 20 3d 20 30 3b 0a 20 20 20 20 20  Error = 0;.     
4c80: 20 20 20 28 2a 70 41 67 67 2d 3e 61 70 46 75 6e     (*pAgg->apFun
4c90: 63 5b 69 5d 2d 3e 78 46 69 6e 61 6c 69 7a 65 29  c[i]->xFinalize)
4ca0: 28 26 63 74 78 29 3b 0a 20 20 20 20 20 20 20 20  (&ctx);.        
4cb0: 69 66 28 20 70 4d 65 6d 2d 3e 7a 21 3d 30 20 26  if( pMem->z!=0 &
4cc0: 26 20 70 4d 65 6d 2d 3e 7a 21 3d 70 4d 65 6d 2d  & pMem->z!=pMem-
4cd0: 3e 73 2e 7a 20 29 7b 0a 20 20 20 20 20 20 20 20  >s.z ){.        
4ce0: 20 20 73 71 6c 69 74 65 46 72 65 65 28 70 4d 65    sqliteFree(pMe
4cf0: 6d 2d 3e 7a 29 3b 0a 20 20 20 20 20 20 20 20 7d  m->z);.        }
4d00: 0a 20 20 20 20 20 20 7d 65 6c 73 65 20 69 66 28  .      }else if(
4d10: 20 70 4d 65 6d 2d 3e 73 2e 66 6c 61 67 73 20 26   pMem->s.flags &
4d20: 20 53 54 4b 5f 44 79 6e 20 29 7b 0a 20 20 20 20   STK_Dyn ){.    
4d30: 20 20 20 20 73 71 6c 69 74 65 46 72 65 65 28 70      sqliteFree(p
4d40: 4d 65 6d 2d 3e 7a 29 3b 0a 20 20 20 20 20 20 7d  Mem->z);.      }
4d50: 0a 20 20 20 20 7d 0a 20 20 20 20 73 71 6c 69 74  .    }.    sqlit
4d60: 65 46 72 65 65 28 70 45 6c 65 6d 29 3b 0a 20 20  eFree(pElem);.  
4d70: 7d 0a 20 20 73 71 6c 69 74 65 48 61 73 68 43 6c  }.  sqliteHashCl
4d80: 65 61 72 28 26 70 41 67 67 2d 3e 68 61 73 68 29  ear(&pAgg->hash)
4d90: 3b 0a 20 20 73 71 6c 69 74 65 46 72 65 65 28 70  ;.  sqliteFree(p
4da0: 41 67 67 2d 3e 61 70 46 75 6e 63 29 3b 0a 20 20  Agg->apFunc);.  
4db0: 70 41 67 67 2d 3e 61 70 46 75 6e 63 20 3d 20 30  pAgg->apFunc = 0
4dc0: 3b 0a 20 20 70 41 67 67 2d 3e 70 43 75 72 72 65  ;.  pAgg->pCurre
4dd0: 6e 74 20 3d 20 30 3b 0a 20 20 70 41 67 67 2d 3e  nt = 0;.  pAgg->
4de0: 70 53 65 61 72 63 68 20 3d 20 30 3b 0a 20 20 70  pSearch = 0;.  p
4df0: 41 67 67 2d 3e 6e 4d 65 6d 20 3d 20 30 3b 0a 7d  Agg->nMem = 0;.}
4e00: 0a 0a 2f 2a 0a 2a 2a 20 44 65 6c 65 74 65 20 61  ../*.** Delete a
4e10: 20 6b 65 79 6c 69 73 74 0a 2a 2f 0a 76 6f 69 64   keylist.*/.void
4e20: 20 73 71 6c 69 74 65 56 64 62 65 4b 65 79 6c 69   sqliteVdbeKeyli
4e30: 73 74 46 72 65 65 28 4b 65 79 6c 69 73 74 20 2a  stFree(Keylist *
4e40: 70 29 7b 0a 20 20 77 68 69 6c 65 28 20 70 20 29  p){.  while( p )
4e50: 7b 0a 20 20 20 20 4b 65 79 6c 69 73 74 20 2a 70  {.    Keylist *p
4e60: 4e 65 78 74 20 3d 20 70 2d 3e 70 4e 65 78 74 3b  Next = p->pNext;
4e70: 0a 20 20 20 20 73 71 6c 69 74 65 46 72 65 65 28  .    sqliteFree(
4e80: 70 29 3b 0a 20 20 20 20 70 20 3d 20 70 4e 65 78  p);.    p = pNex
4e90: 74 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20  t;.  }.}../*.** 
4ea0: 43 6c 6f 73 65 20 61 20 63 75 72 73 6f 72 20 61  Close a cursor a
4eb0: 6e 64 20 72 65 6c 65 61 73 65 20 61 6c 6c 20 74  nd release all t
4ec0: 68 65 20 72 65 73 6f 75 72 63 65 73 20 74 68 61  he resources tha
4ed0: 74 20 63 75 72 73 6f 72 20 68 61 70 70 65 6e 73  t cursor happens
4ee0: 0a 2a 2a 20 74 6f 20 68 6f 6c 64 2e 0a 2a 2f 0a  .** to hold..*/.
4ef0: 76 6f 69 64 20 73 71 6c 69 74 65 56 64 62 65 43  void sqliteVdbeC
4f00: 6c 65 61 6e 75 70 43 75 72 73 6f 72 28 43 75 72  leanupCursor(Cur
4f10: 73 6f 72 20 2a 70 43 78 29 7b 0a 20 20 69 66 28  sor *pCx){.  if(
4f20: 20 70 43 78 2d 3e 70 43 75 72 73 6f 72 20 29 7b   pCx->pCursor ){
4f30: 0a 20 20 20 20 73 71 6c 69 74 65 42 74 72 65 65  .    sqliteBtree
4f40: 43 6c 6f 73 65 43 75 72 73 6f 72 28 70 43 78 2d  CloseCursor(pCx-
4f50: 3e 70 43 75 72 73 6f 72 29 3b 0a 20 20 7d 0a 20  >pCursor);.  }. 
4f60: 20 69 66 28 20 70 43 78 2d 3e 70 42 74 20 29 7b   if( pCx->pBt ){
4f70: 0a 20 20 20 20 73 71 6c 69 74 65 42 74 72 65 65  .    sqliteBtree
4f80: 43 6c 6f 73 65 28 70 43 78 2d 3e 70 42 74 29 3b  Close(pCx->pBt);
4f90: 0a 20 20 7d 0a 20 20 73 71 6c 69 74 65 46 72 65  .  }.  sqliteFre
4fa0: 65 28 70 43 78 2d 3e 70 44 61 74 61 29 3b 0a 20  e(pCx->pData);. 
4fb0: 20 6d 65 6d 73 65 74 28 70 43 78 2c 20 30 2c 20   memset(pCx, 0, 
4fc0: 73 69 7a 65 6f 66 28 43 75 72 73 6f 72 29 29 3b  sizeof(Cursor));
4fd0: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 43 6c 6f 73 65 20  .}../*.** Close 
4fe0: 61 6c 6c 20 63 75 72 73 6f 72 73 0a 2a 2f 0a 73  all cursors.*/.s
4ff0: 74 61 74 69 63 20 76 6f 69 64 20 63 6c 6f 73 65  tatic void close
5000: 41 6c 6c 43 75 72 73 6f 72 73 28 56 64 62 65 20  AllCursors(Vdbe 
5010: 2a 70 29 7b 0a 20 20 69 6e 74 20 69 3b 0a 20 20  *p){.  int i;.  
5020: 66 6f 72 28 69 3d 30 3b 20 69 3c 70 2d 3e 6e 43  for(i=0; i<p->nC
5030: 75 72 73 6f 72 3b 20 69 2b 2b 29 7b 0a 20 20 20  ursor; i++){.   
5040: 20 73 71 6c 69 74 65 56 64 62 65 43 6c 65 61 6e   sqliteVdbeClean
5050: 75 70 43 75 72 73 6f 72 28 26 70 2d 3e 61 43 73  upCursor(&p->aCs
5060: 72 5b 69 5d 29 3b 0a 20 20 7d 0a 20 20 73 71 6c  r[i]);.  }.  sql
5070: 69 74 65 46 72 65 65 28 70 2d 3e 61 43 73 72 29  iteFree(p->aCsr)
5080: 3b 0a 20 20 70 2d 3e 61 43 73 72 20 3d 20 30 3b  ;.  p->aCsr = 0;
5090: 0a 20 20 70 2d 3e 6e 43 75 72 73 6f 72 20 3d 20  .  p->nCursor = 
50a0: 30 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 43 6c 65 61  0;.}../*.** Clea
50b0: 6e 20 75 70 20 74 68 65 20 56 4d 20 61 66 74 65  n up the VM afte
50c0: 72 20 65 78 65 63 75 74 69 6f 6e 2e 0a 2a 2a 0a  r execution..**.
50d0: 2a 2a 20 54 68 69 73 20 72 6f 75 74 69 6e 65 20  ** This routine 
50e0: 77 69 6c 6c 20 61 75 74 6f 6d 61 74 69 63 61 6c  will automatical
50f0: 6c 79 20 63 6c 6f 73 65 20 61 6e 79 20 63 75 72  ly close any cur
5100: 73 6f 72 73 2c 20 6c 69 73 74 73 2c 20 61 6e 64  sors, lists, and
5110: 2f 6f 72 0a 2a 2a 20 73 6f 72 74 65 72 73 20 74  /or.** sorters t
5120: 68 61 74 20 77 65 72 65 20 6c 65 66 74 20 6f 70  hat were left op
5130: 65 6e 2e 20 20 49 74 20 61 6c 73 6f 20 64 65 6c  en.  It also del
5140: 65 74 65 73 20 74 68 65 20 76 61 6c 75 65 73 20  etes the values 
5150: 6f 66 0a 2a 2a 20 76 61 72 69 61 62 6c 65 73 20  of.** variables 
5160: 69 6e 20 74 68 65 20 61 7a 56 61 72 69 61 62 6c  in the azVariabl
5170: 65 5b 5d 20 61 72 72 61 79 2e 0a 2a 2f 0a 73 74  e[] array..*/.st
5180: 61 74 69 63 20 76 6f 69 64 20 43 6c 65 61 6e 75  atic void Cleanu
5190: 70 28 56 64 62 65 20 2a 70 29 7b 0a 20 20 69 6e  p(Vdbe *p){.  in
51a0: 74 20 69 3b 0a 20 20 73 71 6c 69 74 65 56 64 62  t i;.  sqliteVdb
51b0: 65 50 6f 70 53 74 61 63 6b 28 70 2c 20 70 2d 3e  ePopStack(p, p->
51c0: 74 6f 73 2b 31 29 3b 0a 20 20 63 6c 6f 73 65 41  tos+1);.  closeA
51d0: 6c 6c 43 75 72 73 6f 72 73 28 70 29 3b 0a 20 20  llCursors(p);.  
51e0: 69 66 28 20 70 2d 3e 61 4d 65 6d 20 29 7b 0a 20  if( p->aMem ){. 
51f0: 20 20 20 66 6f 72 28 69 3d 30 3b 20 69 3c 70 2d     for(i=0; i<p-
5200: 3e 6e 4d 65 6d 3b 20 69 2b 2b 29 7b 0a 20 20 20  >nMem; i++){.   
5210: 20 20 20 69 66 28 20 70 2d 3e 61 4d 65 6d 5b 69     if( p->aMem[i
5220: 5d 2e 73 2e 66 6c 61 67 73 20 26 20 53 54 4b 5f  ].s.flags & STK_
5230: 44 79 6e 20 29 7b 0a 20 20 20 20 20 20 20 20 73  Dyn ){.        s
5240: 71 6c 69 74 65 46 72 65 65 28 70 2d 3e 61 4d 65  qliteFree(p->aMe
5250: 6d 5b 69 5d 2e 7a 29 3b 0a 20 20 20 20 20 20 7d  m[i].z);.      }
5260: 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20 73 71 6c  .    }.  }.  sql
5270: 69 74 65 46 72 65 65 28 70 2d 3e 61 4d 65 6d 29  iteFree(p->aMem)
5280: 3b 0a 20 20 70 2d 3e 61 4d 65 6d 20 3d 20 30 3b  ;.  p->aMem = 0;
5290: 0a 20 20 70 2d 3e 6e 4d 65 6d 20 3d 20 30 3b 0a  .  p->nMem = 0;.
52a0: 20 20 69 66 28 20 70 2d 3e 70 4c 69 73 74 20 29    if( p->pList )
52b0: 7b 0a 20 20 20 20 73 71 6c 69 74 65 56 64 62 65  {.    sqliteVdbe
52c0: 4b 65 79 6c 69 73 74 46 72 65 65 28 70 2d 3e 70  KeylistFree(p->p
52d0: 4c 69 73 74 29 3b 0a 20 20 20 20 70 2d 3e 70 4c  List);.    p->pL
52e0: 69 73 74 20 3d 20 30 3b 0a 20 20 7d 0a 20 20 73  ist = 0;.  }.  s
52f0: 71 6c 69 74 65 56 64 62 65 53 6f 72 74 65 72 52  qliteVdbeSorterR
5300: 65 73 65 74 28 70 29 3b 0a 20 20 69 66 28 20 70  eset(p);.  if( p
5310: 2d 3e 70 46 69 6c 65 20 29 7b 0a 20 20 20 20 69  ->pFile ){.    i
5320: 66 28 20 70 2d 3e 70 46 69 6c 65 21 3d 73 74 64  f( p->pFile!=std
5330: 69 6e 20 29 20 66 63 6c 6f 73 65 28 70 2d 3e 70  in ) fclose(p->p
5340: 46 69 6c 65 29 3b 0a 20 20 20 20 70 2d 3e 70 46  File);.    p->pF
5350: 69 6c 65 20 3d 20 30 3b 0a 20 20 7d 0a 20 20 69  ile = 0;.  }.  i
5360: 66 28 20 70 2d 3e 61 7a 46 69 65 6c 64 20 29 7b  f( p->azField ){
5370: 0a 20 20 20 20 73 71 6c 69 74 65 46 72 65 65 28  .    sqliteFree(
5380: 70 2d 3e 61 7a 46 69 65 6c 64 29 3b 0a 20 20 20  p->azField);.   
5390: 20 70 2d 3e 61 7a 46 69 65 6c 64 20 3d 20 30 3b   p->azField = 0;
53a0: 0a 20 20 7d 0a 20 20 70 2d 3e 6e 46 69 65 6c 64  .  }.  p->nField
53b0: 20 3d 20 30 3b 0a 20 20 69 66 28 20 70 2d 3e 7a   = 0;.  if( p->z
53c0: 4c 69 6e 65 20 29 7b 0a 20 20 20 20 73 71 6c 69  Line ){.    sqli
53d0: 74 65 46 72 65 65 28 70 2d 3e 7a 4c 69 6e 65 29  teFree(p->zLine)
53e0: 3b 0a 20 20 20 20 70 2d 3e 7a 4c 69 6e 65 20 3d  ;.    p->zLine =
53f0: 20 30 3b 0a 20 20 7d 0a 20 20 70 2d 3e 6e 4c 69   0;.  }.  p->nLi
5400: 6e 65 41 6c 6c 6f 63 20 3d 20 30 3b 0a 20 20 73  neAlloc = 0;.  s
5410: 71 6c 69 74 65 56 64 62 65 41 67 67 52 65 73 65  qliteVdbeAggRese
5420: 74 28 26 70 2d 3e 61 67 67 29 3b 0a 20 20 69 66  t(&p->agg);.  if
5430: 28 20 70 2d 3e 61 53 65 74 20 29 7b 0a 20 20 20  ( p->aSet ){.   
5440: 20 66 6f 72 28 69 3d 30 3b 20 69 3c 70 2d 3e 6e   for(i=0; i<p->n
5450: 53 65 74 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 20  Set; i++){.     
5460: 20 73 71 6c 69 74 65 48 61 73 68 43 6c 65 61 72   sqliteHashClear
5470: 28 26 70 2d 3e 61 53 65 74 5b 69 5d 2e 68 61 73  (&p->aSet[i].has
5480: 68 29 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 20 20  h);.    }.  }.  
5490: 73 71 6c 69 74 65 46 72 65 65 28 70 2d 3e 61 53  sqliteFree(p->aS
54a0: 65 74 29 3b 0a 20 20 70 2d 3e 61 53 65 74 20 3d  et);.  p->aSet =
54b0: 20 30 3b 0a 20 20 70 2d 3e 6e 53 65 74 20 3d 20   0;.  p->nSet = 
54c0: 30 3b 0a 20 20 69 66 28 20 70 2d 3e 6b 65 79 6c  0;.  if( p->keyl
54d0: 69 73 74 53 74 61 63 6b 20 29 7b 0a 20 20 20 20  istStack ){.    
54e0: 69 6e 74 20 69 69 3b 0a 20 20 20 20 66 6f 72 28  int ii;.    for(
54f0: 69 69 20 3d 20 30 3b 20 69 69 20 3c 20 70 2d 3e  ii = 0; ii < p->
5500: 6b 65 79 6c 69 73 74 53 74 61 63 6b 44 65 70 74  keylistStackDept
5510: 68 3b 20 69 69 2b 2b 29 7b 0a 20 20 20 20 20 20  h; ii++){.      
5520: 73 71 6c 69 74 65 56 64 62 65 4b 65 79 6c 69 73  sqliteVdbeKeylis
5530: 74 46 72 65 65 28 70 2d 3e 6b 65 79 6c 69 73 74  tFree(p->keylist
5540: 53 74 61 63 6b 5b 69 69 5d 29 3b 0a 20 20 20 20  Stack[ii]);.    
5550: 7d 0a 20 20 20 20 73 71 6c 69 74 65 46 72 65 65  }.    sqliteFree
5560: 28 70 2d 3e 6b 65 79 6c 69 73 74 53 74 61 63 6b  (p->keylistStack
5570: 29 3b 0a 20 20 20 20 70 2d 3e 6b 65 79 6c 69 73  );.    p->keylis
5580: 74 53 74 61 63 6b 44 65 70 74 68 20 3d 20 30 3b  tStackDepth = 0;
5590: 0a 20 20 20 20 70 2d 3e 6b 65 79 6c 69 73 74 53  .    p->keylistS
55a0: 74 61 63 6b 20 3d 20 30 3b 0a 20 20 7d 0a 20 20  tack = 0;.  }.  
55b0: 73 71 6c 69 74 65 46 72 65 65 28 70 2d 3e 7a 45  sqliteFree(p->zE
55c0: 72 72 4d 73 67 29 3b 0a 20 20 70 2d 3e 7a 45 72  rrMsg);.  p->zEr
55d0: 72 4d 73 67 20 3d 20 30 3b 0a 7d 0a 0a 2f 2a 0a  rMsg = 0;.}../*.
55e0: 2a 2a 20 43 6c 65 61 6e 20 75 70 20 61 20 56 44  ** Clean up a VD
55f0: 42 45 20 61 66 74 65 72 20 65 78 65 63 75 74 69  BE after executi
5600: 6f 6e 20 62 75 74 20 64 6f 20 6e 6f 74 20 64 65  on but do not de
5610: 6c 65 74 65 20 74 68 65 20 56 44 42 45 20 6a 75  lete the VDBE ju
5620: 73 74 20 79 65 74 2e 0a 2a 2a 20 57 72 69 74 65  st yet..** Write
5630: 20 61 6e 79 20 65 72 72 6f 72 20 6d 65 73 73 61   any error messa
5640: 67 65 73 20 69 6e 74 6f 20 2a 70 7a 45 72 72 4d  ges into *pzErrM
5650: 73 67 2e 20 20 52 65 74 75 72 6e 20 74 68 65 20  sg.  Return the 
5660: 72 65 73 75 6c 74 20 63 6f 64 65 2e 0a 2a 2a 0a  result code..**.
5670: 2a 2a 20 41 66 74 65 72 20 74 68 69 73 20 72 6f  ** After this ro
5680: 75 74 69 6e 65 20 69 73 20 72 75 6e 2c 20 74 68  utine is run, th
5690: 65 20 56 44 42 45 20 73 68 6f 75 6c 64 20 62 65  e VDBE should be
56a0: 20 72 65 61 64 79 20 74 6f 20 62 65 20 65 78 65   ready to be exe
56b0: 63 75 74 65 64 0a 2a 2a 20 61 67 61 69 6e 2e 0a  cuted.** again..
56c0: 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 56 64 62  */.int sqliteVdb
56d0: 65 52 65 73 65 74 28 56 64 62 65 20 2a 70 2c 20  eReset(Vdbe *p, 
56e0: 63 68 61 72 20 2a 2a 70 7a 45 72 72 4d 73 67 29  char **pzErrMsg)
56f0: 7b 0a 20 20 73 71 6c 69 74 65 20 2a 64 62 20 3d  {.  sqlite *db =
5700: 20 70 2d 3e 64 62 3b 0a 20 20 69 6e 74 20 69 3b   p->db;.  int i;
5710: 0a 0a 20 20 69 66 28 20 70 2d 3e 6d 61 67 69 63  ..  if( p->magic
5720: 21 3d 56 44 42 45 5f 4d 41 47 49 43 5f 52 55 4e  !=VDBE_MAGIC_RUN
5730: 20 26 26 20 70 2d 3e 6d 61 67 69 63 21 3d 56 44   && p->magic!=VD
5740: 42 45 5f 4d 41 47 49 43 5f 48 41 4c 54 20 29 7b  BE_MAGIC_HALT ){
5750: 0a 20 20 20 20 73 71 6c 69 74 65 53 65 74 53 74  .    sqliteSetSt
5760: 72 69 6e 67 28 70 7a 45 72 72 4d 73 67 2c 20 73  ring(pzErrMsg, s
5770: 71 6c 69 74 65 5f 65 72 72 6f 72 5f 73 74 72 69  qlite_error_stri
5780: 6e 67 28 53 51 4c 49 54 45 5f 4d 49 53 55 53 45  ng(SQLITE_MISUSE
5790: 29 2c 20 30 29 3b 0a 20 20 20 20 72 65 74 75 72  ), 0);.    retur
57a0: 6e 20 53 51 4c 49 54 45 5f 4d 49 53 55 53 45 3b  n SQLITE_MISUSE;
57b0: 0a 20 20 7d 0a 20 20 69 66 28 20 70 2d 3e 7a 45  .  }.  if( p->zE
57c0: 72 72 4d 73 67 20 29 7b 0a 20 20 20 20 69 66 28  rrMsg ){.    if(
57d0: 20 70 7a 45 72 72 4d 73 67 20 26 26 20 2a 70 7a   pzErrMsg && *pz
57e0: 45 72 72 4d 73 67 3d 3d 30 20 29 7b 0a 20 20 20  ErrMsg==0 ){.   
57f0: 20 20 20 2a 70 7a 45 72 72 4d 73 67 20 3d 20 70     *pzErrMsg = p
5800: 2d 3e 7a 45 72 72 4d 73 67 3b 0a 20 20 20 20 7d  ->zErrMsg;.    }
5810: 65 6c 73 65 7b 0a 20 20 20 20 20 20 73 71 6c 69  else{.      sqli
5820: 74 65 46 72 65 65 28 70 2d 3e 7a 45 72 72 4d 73  teFree(p->zErrMs
5830: 67 29 3b 0a 20 20 20 20 7d 0a 20 20 20 20 70 2d  g);.    }.    p-
5840: 3e 7a 45 72 72 4d 73 67 20 3d 20 30 3b 0a 20 20  >zErrMsg = 0;.  
5850: 7d 0a 20 20 43 6c 65 61 6e 75 70 28 70 29 3b 0a  }.  Cleanup(p);.
5860: 20 20 69 66 28 20 70 2d 3e 72 63 21 3d 53 51 4c    if( p->rc!=SQL
5870: 49 54 45 5f 4f 4b 20 29 7b 0a 20 20 20 20 73 77  ITE_OK ){.    sw
5880: 69 74 63 68 28 20 70 2d 3e 65 72 72 6f 72 41 63  itch( p->errorAc
5890: 74 69 6f 6e 20 29 7b 0a 20 20 20 20 20 20 63 61  tion ){.      ca
58a0: 73 65 20 4f 45 5f 41 62 6f 72 74 3a 20 7b 0a 20  se OE_Abort: {. 
58b0: 20 20 20 20 20 20 20 69 66 28 20 21 70 2d 3e 75         if( !p->u
58c0: 6e 64 6f 54 72 61 6e 73 4f 6e 45 72 72 6f 72 20  ndoTransOnError 
58d0: 29 7b 0a 20 20 20 20 20 20 20 20 20 20 66 6f 72  ){.          for
58e0: 28 69 3d 30 3b 20 69 3c 64 62 2d 3e 6e 44 62 3b  (i=0; i<db->nDb;
58f0: 20 69 2b 2b 29 7b 0a 20 20 20 20 20 20 20 20 20   i++){.         
5900: 20 20 20 69 66 28 20 64 62 2d 3e 61 44 62 5b 69     if( db->aDb[i
5910: 5d 2e 70 42 74 20 29 7b 0a 20 20 20 20 20 20 20  ].pBt ){.       
5920: 20 20 20 20 20 20 20 73 71 6c 69 74 65 42 74 72         sqliteBtr
5930: 65 65 52 6f 6c 6c 62 61 63 6b 43 6b 70 74 28 64  eeRollbackCkpt(d
5940: 62 2d 3e 61 44 62 5b 69 5d 2e 70 42 74 29 3b 0a  b->aDb[i].pBt);.
5950: 20 20 20 20 20 20 20 20 20 20 20 20 7d 0a 20 20              }.  
5960: 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20          }.      
5970: 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 20      break;.     
5980: 20 20 20 7d 0a 20 20 20 20 20 20 20 20 2f 2a 20     }.        /* 
5990: 46 61 6c 6c 20 74 68 72 6f 75 67 68 20 74 6f 20  Fall through to 
59a0: 52 4f 4c 4c 42 41 43 4b 20 2a 2f 0a 20 20 20 20  ROLLBACK */.    
59b0: 20 20 7d 0a 20 20 20 20 20 20 63 61 73 65 20 4f    }.      case O
59c0: 45 5f 52 6f 6c 6c 62 61 63 6b 3a 20 7b 0a 20 20  E_Rollback: {.  
59d0: 20 20 20 20 20 20 73 71 6c 69 74 65 52 6f 6c 6c        sqliteRoll
59e0: 62 61 63 6b 41 6c 6c 28 64 62 29 3b 0a 20 20 20  backAll(db);.   
59f0: 20 20 20 20 20 64 62 2d 3e 66 6c 61 67 73 20 26       db->flags &
5a00: 3d 20 7e 53 51 4c 49 54 45 5f 49 6e 54 72 61 6e  = ~SQLITE_InTran
5a10: 73 3b 0a 20 20 20 20 20 20 20 20 64 62 2d 3e 6f  s;.        db->o
5a20: 6e 45 72 72 6f 72 20 3d 20 4f 45 5f 44 65 66 61  nError = OE_Defa
5a30: 75 6c 74 3b 0a 20 20 20 20 20 20 20 20 62 72 65  ult;.        bre
5a40: 61 6b 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20  ak;.      }.    
5a50: 20 20 64 65 66 61 75 6c 74 3a 20 7b 0a 20 20 20    default: {.   
5a60: 20 20 20 20 20 69 66 28 20 70 2d 3e 75 6e 64 6f       if( p->undo
5a70: 54 72 61 6e 73 4f 6e 45 72 72 6f 72 20 29 7b 0a  TransOnError ){.
5a80: 20 20 20 20 20 20 20 20 20 20 73 71 6c 69 74 65            sqlite
5a90: 52 6f 6c 6c 62 61 63 6b 41 6c 6c 28 64 62 29 3b  RollbackAll(db);
5aa0: 0a 20 20 20 20 20 20 20 20 20 20 64 62 2d 3e 66  .          db->f
5ab0: 6c 61 67 73 20 26 3d 20 7e 53 51 4c 49 54 45 5f  lags &= ~SQLITE_
5ac0: 49 6e 54 72 61 6e 73 3b 0a 20 20 20 20 20 20 20  InTrans;.       
5ad0: 20 20 20 64 62 2d 3e 6f 6e 45 72 72 6f 72 20 3d     db->onError =
5ae0: 20 4f 45 5f 44 65 66 61 75 6c 74 3b 0a 20 20 20   OE_Default;.   
5af0: 20 20 20 20 20 7d 0a 20 20 20 20 20 20 20 20 62       }.        b
5b00: 72 65 61 6b 3b 0a 20 20 20 20 20 20 7d 0a 20 20  reak;.      }.  
5b10: 20 20 7d 0a 20 20 20 20 73 71 6c 69 74 65 52 6f    }.    sqliteRo
5b20: 6c 6c 62 61 63 6b 49 6e 74 65 72 6e 61 6c 43 68  llbackInternalCh
5b30: 61 6e 67 65 73 28 64 62 29 3b 0a 20 20 7d 0a 20  anges(db);.  }. 
5b40: 20 66 6f 72 28 69 3d 30 3b 20 69 3c 64 62 2d 3e   for(i=0; i<db->
5b50: 6e 44 62 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 69  nDb; i++){.    i
5b60: 66 28 20 64 62 2d 3e 61 44 62 5b 69 5d 2e 70 42  f( db->aDb[i].pB
5b70: 74 20 26 26 20 64 62 2d 3e 61 44 62 5b 69 5d 2e  t && db->aDb[i].
5b80: 69 6e 54 72 61 6e 73 3d 3d 32 20 29 7b 0a 20 20  inTrans==2 ){.  
5b90: 20 20 20 20 73 71 6c 69 74 65 42 74 72 65 65 43      sqliteBtreeC
5ba0: 6f 6d 6d 69 74 43 6b 70 74 28 64 62 2d 3e 61 44  ommitCkpt(db->aD
5bb0: 62 5b 69 5d 2e 70 42 74 29 3b 0a 20 20 20 20 20  b[i].pBt);.     
5bc0: 20 64 62 2d 3e 61 44 62 5b 69 5d 2e 69 6e 54 72   db->aDb[i].inTr
5bd0: 61 6e 73 20 3d 20 31 3b 0a 20 20 20 20 7d 0a 20  ans = 1;.    }. 
5be0: 20 7d 0a 20 20 61 73 73 65 72 74 28 20 70 2d 3e   }.  assert( p->
5bf0: 74 6f 73 3c 70 2d 3e 70 63 20 7c 7c 20 73 71 6c  tos<p->pc || sql
5c00: 69 74 65 5f 6d 61 6c 6c 6f 63 5f 66 61 69 6c 65  ite_malloc_faile
5c10: 64 3d 3d 31 20 29 3b 0a 23 69 66 64 65 66 20 56  d==1 );.#ifdef V
5c20: 44 42 45 5f 50 52 4f 46 49 4c 45 0a 20 20 7b 0a  DBE_PROFILE.  {.
5c30: 20 20 20 20 46 49 4c 45 20 2a 6f 75 74 20 3d 20      FILE *out = 
5c40: 66 6f 70 65 6e 28 22 76 64 62 65 5f 70 72 6f 66  fopen("vdbe_prof
5c50: 69 6c 65 2e 6f 75 74 22 2c 20 22 61 22 29 3b 0a  ile.out", "a");.
5c60: 20 20 20 20 69 66 28 20 6f 75 74 20 29 7b 0a 20      if( out ){. 
5c70: 20 20 20 20 20 69 6e 74 20 69 3b 0a 20 20 20 20       int i;.    
5c80: 20 20 66 70 72 69 6e 74 66 28 6f 75 74 2c 20 22    fprintf(out, "
5c90: 2d 2d 2d 2d 20 22 29 3b 0a 20 20 20 20 20 20 66  ---- ");.      f
5ca0: 6f 72 28 69 3d 30 3b 20 69 3c 70 2d 3e 6e 4f 70  or(i=0; i<p->nOp
5cb0: 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 20 20 20 20  ; i++){.        
5cc0: 66 70 72 69 6e 74 66 28 6f 75 74 2c 20 22 25 30  fprintf(out, "%0
5cd0: 32 78 22 2c 20 70 2d 3e 61 4f 70 5b 69 5d 2e 6f  2x", p->aOp[i].o
5ce0: 70 63 6f 64 65 29 3b 0a 20 20 20 20 20 20 7d 0a  pcode);.      }.
5cf0: 20 20 20 20 20 20 66 70 72 69 6e 74 66 28 6f 75        fprintf(ou
5d00: 74 2c 20 22 5c 6e 22 29 3b 0a 20 20 20 20 20 20  t, "\n");.      
5d10: 66 6f 72 28 69 3d 30 3b 20 69 3c 70 2d 3e 6e 4f  for(i=0; i<p->nO
5d20: 70 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 20 20 20  p; i++){.       
5d30: 20 66 70 72 69 6e 74 66 28 6f 75 74 2c 20 22 25   fprintf(out, "%
5d40: 36 64 20 25 31 30 6c 6c 64 20 25 38 6c 6c 64 20  6d %10lld %8lld 
5d50: 22 2c 0a 20 20 20 20 20 20 20 20 20 20 20 70 2d  ",.           p-
5d60: 3e 61 4f 70 5b 69 5d 2e 63 6e 74 2c 0a 20 20 20  >aOp[i].cnt,.   
5d70: 20 20 20 20 20 20 20 20 70 2d 3e 61 4f 70 5b 69          p->aOp[i
5d80: 5d 2e 63 79 63 6c 65 73 2c 0a 20 20 20 20 20 20  ].cycles,.      
5d90: 20 20 20 20 20 70 2d 3e 61 4f 70 5b 69 5d 2e 63       p->aOp[i].c
5da0: 6e 74 3e 30 20 3f 20 70 2d 3e 61 4f 70 5b 69 5d  nt>0 ? p->aOp[i]
5db0: 2e 63 79 63 6c 65 73 2f 70 2d 3e 61 4f 70 5b 69  .cycles/p->aOp[i
5dc0: 5d 2e 63 6e 74 20 3a 20 30 0a 20 20 20 20 20 20  ].cnt : 0.      
5dd0: 20 20 29 3b 0a 20 20 20 20 20 20 20 20 73 71 6c    );.        sql
5de0: 69 74 65 56 64 62 65 50 72 69 6e 74 4f 70 28 6f  iteVdbePrintOp(o
5df0: 75 74 2c 20 69 2c 20 26 70 2d 3e 61 4f 70 5b 69  ut, i, &p->aOp[i
5e00: 5d 29 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20  ]);.      }.    
5e10: 20 20 66 63 6c 6f 73 65 28 6f 75 74 29 3b 0a 20    fclose(out);. 
5e20: 20 20 20 7d 0a 20 20 7d 0a 23 65 6e 64 69 66 0a     }.  }.#endif.
5e30: 20 20 70 2d 3e 6d 61 67 69 63 20 3d 20 56 44 42    p->magic = VDB
5e40: 45 5f 4d 41 47 49 43 5f 49 4e 49 54 3b 0a 20 20  E_MAGIC_INIT;.  
5e50: 72 65 74 75 72 6e 20 70 2d 3e 72 63 3b 0a 7d 0a  return p->rc;.}.
5e60: 0a 2f 2a 0a 2a 2a 20 43 6c 65 61 6e 20 75 70 20  ./*.** Clean up 
5e70: 61 6e 64 20 64 65 6c 65 74 65 20 61 20 56 44 42  and delete a VDB
5e80: 45 20 61 66 74 65 72 20 65 78 65 63 75 74 69 6f  E after executio
5e90: 6e 2e 20 20 52 65 74 75 72 6e 20 61 6e 20 69 6e  n.  Return an in
5ea0: 74 65 67 65 72 20 77 68 69 63 68 20 69 73 0a 2a  teger which is.*
5eb0: 2a 20 74 68 65 20 72 65 73 75 6c 74 20 63 6f 64  * the result cod
5ec0: 65 2e 20 20 57 72 69 74 65 20 61 6e 79 20 65 72  e.  Write any er
5ed0: 72 6f 72 20 6d 65 73 73 61 67 65 20 74 65 78 74  ror message text
5ee0: 20 69 6e 74 6f 20 2a 70 7a 45 72 72 4d 73 67 2e   into *pzErrMsg.
5ef0: 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 56 64  .*/.int sqliteVd
5f00: 62 65 46 69 6e 61 6c 69 7a 65 28 56 64 62 65 20  beFinalize(Vdbe 
5f10: 2a 70 2c 20 63 68 61 72 20 2a 2a 70 7a 45 72 72  *p, char **pzErr
5f20: 4d 73 67 29 7b 0a 20 20 69 6e 74 20 72 63 3b 0a  Msg){.  int rc;.
5f30: 20 20 73 71 6c 69 74 65 20 2a 64 62 3b 0a 0a 20    sqlite *db;.. 
5f40: 20 69 66 28 20 70 2d 3e 6d 61 67 69 63 21 3d 56   if( p->magic!=V
5f50: 44 42 45 5f 4d 41 47 49 43 5f 52 55 4e 20 26 26  DBE_MAGIC_RUN &&
5f60: 20 70 2d 3e 6d 61 67 69 63 21 3d 56 44 42 45 5f   p->magic!=VDBE_
5f70: 4d 41 47 49 43 5f 48 41 4c 54 20 29 7b 0a 20 20  MAGIC_HALT ){.  
5f80: 20 20 73 71 6c 69 74 65 53 65 74 53 74 72 69 6e    sqliteSetStrin
5f90: 67 28 70 7a 45 72 72 4d 73 67 2c 20 73 71 6c 69  g(pzErrMsg, sqli
5fa0: 74 65 5f 65 72 72 6f 72 5f 73 74 72 69 6e 67 28  te_error_string(
5fb0: 53 51 4c 49 54 45 5f 4d 49 53 55 53 45 29 2c 20  SQLITE_MISUSE), 
5fc0: 30 29 3b 0a 20 20 20 20 72 65 74 75 72 6e 20 53  0);.    return S
5fd0: 51 4c 49 54 45 5f 4d 49 53 55 53 45 3b 0a 20 20  QLITE_MISUSE;.  
5fe0: 7d 0a 20 20 64 62 20 3d 20 70 2d 3e 64 62 3b 0a  }.  db = p->db;.
5ff0: 20 20 72 63 20 3d 20 73 71 6c 69 74 65 56 64 62    rc = sqliteVdb
6000: 65 52 65 73 65 74 28 70 2c 20 70 7a 45 72 72 4d  eReset(p, pzErrM
6010: 73 67 29 3b 0a 20 20 73 71 6c 69 74 65 56 64 62  sg);.  sqliteVdb
6020: 65 44 65 6c 65 74 65 28 70 29 3b 0a 20 20 69 66  eDelete(p);.  if
6030: 28 20 64 62 2d 3e 77 61 6e 74 5f 74 6f 5f 63 6c  ( db->want_to_cl
6040: 6f 73 65 20 26 26 20 64 62 2d 3e 70 56 64 62 65  ose && db->pVdbe
6050: 3d 3d 30 20 29 7b 0a 20 20 20 20 73 71 6c 69 74  ==0 ){.    sqlit
6060: 65 5f 63 6c 6f 73 65 28 64 62 29 3b 0a 20 20 7d  e_close(db);.  }
6070: 0a 20 20 72 65 74 75 72 6e 20 72 63 3b 0a 7d 0a  .  return rc;.}.
6080: 0a 2f 2a 0a 2a 2a 20 53 65 74 20 74 68 65 20 76  ./*.** Set the v
6090: 61 6c 75 65 73 20 6f 66 20 61 6c 6c 20 76 61 72  alues of all var
60a0: 69 61 62 6c 65 73 2e 20 20 56 61 72 69 61 62 6c  iables.  Variabl
60b0: 65 20 24 31 20 69 6e 20 74 68 65 20 6f 72 69 67  e $1 in the orig
60c0: 69 6e 61 6c 20 53 51 4c 20 77 69 6c 6c 0a 2a 2a  inal SQL will.**
60d0: 20 62 65 20 74 68 65 20 73 74 72 69 6e 67 20 61   be the string a
60e0: 7a 56 61 6c 75 65 5b 30 5d 2e 20 20 24 32 20 77  zValue[0].  $2 w
60f0: 69 6c 6c 20 68 61 76 65 20 74 68 65 20 76 61 6c  ill have the val
6100: 75 65 20 61 7a 56 61 6c 75 65 5b 31 5d 2e 20 20  ue azValue[1].  
6110: 41 6e 64 0a 2a 2a 20 73 6f 20 66 6f 72 74 68 2e  And.** so forth.
6120: 20 20 49 66 20 61 20 76 61 6c 75 65 20 69 73 20    If a value is 
6130: 6f 75 74 20 6f 66 20 72 61 6e 67 65 20 28 66 6f  out of range (fo
6140: 72 20 65 78 61 6d 70 6c 65 20 24 33 20 77 68 65  r example $3 whe
6150: 6e 20 6e 56 61 6c 75 65 3d 3d 32 29 0a 2a 2a 20  n nValue==2).** 
6160: 74 68 65 6e 20 69 74 73 20 76 61 6c 75 65 20 77  then its value w
6170: 69 6c 6c 20 62 65 20 4e 55 4c 4c 2e 0a 2a 2a 0a  ill be NULL..**.
6180: 2a 2a 20 54 68 69 73 20 72 6f 75 74 69 6e 65 20  ** This routine 
6190: 6f 76 65 72 72 69 64 65 73 20 61 6e 79 20 70 72  overrides any pr
61a0: 69 6f 72 20 63 61 6c 6c 2e 0a 2a 2f 0a 69 6e 74  ior call..*/.int
61b0: 20 73 71 6c 69 74 65 5f 62 69 6e 64 28 73 71 6c   sqlite_bind(sql
61c0: 69 74 65 5f 76 6d 20 2a 70 56 6d 2c 20 69 6e 74  ite_vm *pVm, int
61d0: 20 69 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a   i, const char *
61e0: 7a 56 61 6c 2c 20 69 6e 74 20 6c 65 6e 2c 20 69  zVal, int len, i
61f0: 6e 74 20 63 6f 70 79 29 7b 0a 20 20 56 64 62 65  nt copy){.  Vdbe
6200: 20 2a 70 20 3d 20 28 56 64 62 65 2a 29 70 56 6d   *p = (Vdbe*)pVm
6210: 3b 0a 20 20 69 66 28 20 70 2d 3e 6d 61 67 69 63  ;.  if( p->magic
6220: 21 3d 56 44 42 45 5f 4d 41 47 49 43 5f 52 55 4e  !=VDBE_MAGIC_RUN
6230: 20 7c 7c 20 70 2d 3e 70 63 21 3d 30 20 29 7b 0a   || p->pc!=0 ){.
6240: 20 20 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54      return SQLIT
6250: 45 5f 4d 49 53 55 53 45 3b 0a 20 20 7d 0a 20 20  E_MISUSE;.  }.  
6260: 69 66 28 20 69 3c 31 20 7c 7c 20 69 3e 70 2d 3e  if( i<1 || i>p->
6270: 6e 56 61 72 20 29 7b 0a 20 20 20 20 72 65 74 75  nVar ){.    retu
6280: 72 6e 20 53 51 4c 49 54 45 5f 52 41 4e 47 45 3b  rn SQLITE_RANGE;
6290: 0a 20 20 7d 0a 20 20 69 2d 2d 3b 0a 20 20 69 66  .  }.  i--;.  if
62a0: 28 20 70 2d 3e 61 62 56 61 72 5b 69 5d 20 29 7b  ( p->abVar[i] ){
62b0: 0a 20 20 20 20 73 71 6c 69 74 65 46 72 65 65 28  .    sqliteFree(
62c0: 70 2d 3e 61 7a 56 61 72 5b 69 5d 29 3b 0a 20 20  p->azVar[i]);.  
62d0: 7d 0a 20 20 69 66 28 20 7a 56 61 6c 3d 3d 30 20  }.  if( zVal==0 
62e0: 29 7b 0a 20 20 20 20 63 6f 70 79 20 3d 20 30 3b  ){.    copy = 0;
62f0: 0a 20 20 20 20 6c 65 6e 20 3d 20 30 3b 0a 20 20  .    len = 0;.  
6300: 7d 0a 20 20 69 66 28 20 6c 65 6e 3c 30 20 29 7b  }.  if( len<0 ){
6310: 0a 20 20 20 20 6c 65 6e 20 3d 20 73 74 72 6c 65  .    len = strle
6320: 6e 28 7a 56 61 6c 29 2b 31 3b 0a 20 20 7d 0a 20  n(zVal)+1;.  }. 
6330: 20 69 66 28 20 63 6f 70 79 20 29 7b 0a 20 20 20   if( copy ){.   
6340: 20 70 2d 3e 61 7a 56 61 72 5b 69 5d 20 3d 20 73   p->azVar[i] = s
6350: 71 6c 69 74 65 4d 61 6c 6c 6f 63 28 20 6c 65 6e  qliteMalloc( len
6360: 20 29 3b 0a 20 20 20 20 69 66 28 20 70 2d 3e 61   );.    if( p->a
6370: 7a 56 61 72 5b 69 5d 20 29 20 6d 65 6d 63 70 79  zVar[i] ) memcpy
6380: 28 70 2d 3e 61 7a 56 61 72 5b 69 5d 2c 20 7a 56  (p->azVar[i], zV
6390: 61 6c 2c 20 6c 65 6e 29 3b 0a 20 20 7d 65 6c 73  al, len);.  }els
63a0: 65 7b 0a 20 20 20 20 70 2d 3e 61 7a 56 61 72 5b  e{.    p->azVar[
63b0: 69 5d 20 3d 20 28 63 68 61 72 2a 29 7a 56 61 6c  i] = (char*)zVal
63c0: 3b 0a 20 20 7d 0a 20 20 70 2d 3e 61 62 56 61 72  ;.  }.  p->abVar
63d0: 5b 69 5d 20 3d 20 63 6f 70 79 3b 0a 20 20 70 2d  [i] = copy;.  p-
63e0: 3e 61 6e 56 61 72 5b 69 5d 20 3d 20 6c 65 6e 3b  >anVar[i] = len;
63f0: 0a 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45  .  return SQLITE
6400: 5f 4f 4b 3b 0a 7d 0a 0a 0a 2f 2a 0a 2a 2a 20 44  _OK;.}.../*.** D
6410: 65 6c 65 74 65 20 61 6e 20 65 6e 74 69 72 65 20  elete an entire 
6420: 56 44 42 45 2e 0a 2a 2f 0a 76 6f 69 64 20 73 71  VDBE..*/.void sq
6430: 6c 69 74 65 56 64 62 65 44 65 6c 65 74 65 28 56  liteVdbeDelete(V
6440: 64 62 65 20 2a 70 29 7b 0a 20 20 69 6e 74 20 69  dbe *p){.  int i
6450: 3b 0a 20 20 69 66 28 20 70 3d 3d 30 20 29 20 72  ;.  if( p==0 ) r
6460: 65 74 75 72 6e 3b 0a 20 20 43 6c 65 61 6e 75 70  eturn;.  Cleanup
6470: 28 70 29 3b 0a 20 20 69 66 28 20 70 2d 3e 70 50  (p);.  if( p->pP
6480: 72 65 76 20 29 7b 0a 20 20 20 20 70 2d 3e 70 50  rev ){.    p->pP
6490: 72 65 76 2d 3e 70 4e 65 78 74 20 3d 20 70 2d 3e  rev->pNext = p->
64a0: 70 4e 65 78 74 3b 0a 20 20 7d 65 6c 73 65 7b 0a  pNext;.  }else{.
64b0: 20 20 20 20 61 73 73 65 72 74 28 20 70 2d 3e 64      assert( p->d
64c0: 62 2d 3e 70 56 64 62 65 3d 3d 70 20 29 3b 0a 20  b->pVdbe==p );. 
64d0: 20 20 20 70 2d 3e 64 62 2d 3e 70 56 64 62 65 20     p->db->pVdbe 
64e0: 3d 20 70 2d 3e 70 4e 65 78 74 3b 0a 20 20 7d 0a  = p->pNext;.  }.
64f0: 20 20 69 66 28 20 70 2d 3e 70 4e 65 78 74 20 29    if( p->pNext )
6500: 7b 0a 20 20 20 20 70 2d 3e 70 4e 65 78 74 2d 3e  {.    p->pNext->
6510: 70 50 72 65 76 20 3d 20 70 2d 3e 70 50 72 65 76  pPrev = p->pPrev
6520: 3b 0a 20 20 7d 0a 20 20 70 2d 3e 70 50 72 65 76  ;.  }.  p->pPrev
6530: 20 3d 20 70 2d 3e 70 4e 65 78 74 20 3d 20 30 3b   = p->pNext = 0;
6540: 0a 20 20 69 66 28 20 70 2d 3e 6e 4f 70 41 6c 6c  .  if( p->nOpAll
6550: 6f 63 3d 3d 30 20 29 7b 0a 20 20 20 20 70 2d 3e  oc==0 ){.    p->
6560: 61 4f 70 20 3d 20 30 3b 0a 20 20 20 20 70 2d 3e  aOp = 0;.    p->
6570: 6e 4f 70 20 3d 20 30 3b 0a 20 20 7d 0a 20 20 66  nOp = 0;.  }.  f
6580: 6f 72 28 69 3d 30 3b 20 69 3c 70 2d 3e 6e 4f 70  or(i=0; i<p->nOp
6590: 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 69 66 28 20  ; i++){.    if( 
65a0: 70 2d 3e 61 4f 70 5b 69 5d 2e 70 33 74 79 70 65  p->aOp[i].p3type
65b0: 3d 3d 50 33 5f 44 59 4e 41 4d 49 43 20 29 7b 0a  ==P3_DYNAMIC ){.
65c0: 20 20 20 20 20 20 73 71 6c 69 74 65 46 72 65 65        sqliteFree
65d0: 28 70 2d 3e 61 4f 70 5b 69 5d 2e 70 33 29 3b 0a  (p->aOp[i].p3);.
65e0: 20 20 20 20 7d 0a 20 20 7d 0a 20 20 66 6f 72 28      }.  }.  for(
65f0: 69 3d 30 3b 20 69 3c 70 2d 3e 6e 56 61 72 3b 20  i=0; i<p->nVar; 
6600: 69 2b 2b 29 7b 0a 20 20 20 20 69 66 28 20 70 2d  i++){.    if( p-
6610: 3e 61 62 56 61 72 5b 69 5d 20 29 20 73 71 6c 69  >abVar[i] ) sqli
6620: 74 65 46 72 65 65 28 70 2d 3e 61 7a 56 61 72 5b  teFree(p->azVar[
6630: 69 5d 29 3b 0a 20 20 7d 0a 20 20 73 71 6c 69 74  i]);.  }.  sqlit
6640: 65 46 72 65 65 28 70 2d 3e 61 4f 70 29 3b 0a 20  eFree(p->aOp);. 
6650: 20 73 71 6c 69 74 65 46 72 65 65 28 70 2d 3e 61   sqliteFree(p->a
6660: 4c 61 62 65 6c 29 3b 0a 20 20 73 71 6c 69 74 65  Label);.  sqlite
6670: 46 72 65 65 28 70 2d 3e 61 53 74 61 63 6b 29 3b  Free(p->aStack);
6680: 0a 20 20 70 2d 3e 6d 61 67 69 63 20 3d 20 56 44  .  p->magic = VD
6690: 42 45 5f 4d 41 47 49 43 5f 44 45 41 44 3b 0a 20  BE_MAGIC_DEAD;. 
66a0: 20 73 71 6c 69 74 65 46 72 65 65 28 70 29 3b 0a   sqliteFree(p);.
66b0: 7d 0a                                            }.