0000: 2f 2a 0a 2a 2a 20 32 30 30 31 20 53 65 70 74 65 /*.** 2001 Septe
0010: 6d 62 65 72 20 31 35 0a 2a 2a 0a 2a 2a 20 54 68 mber 15.**.** Th
0020: 65 20 61 75 74 68 6f 72 20 64 69 73 63 6c 61 69 e author disclai
0030: 6d 73 20 63 6f 70 79 72 69 67 68 74 20 74 6f 20 ms copyright to
0040: 74 68 69 73 20 73 6f 75 72 63 65 20 63 6f 64 65 this source code
0050: 2e 20 20 49 6e 20 70 6c 61 63 65 20 6f 66 0a 2a . In place of.*
0060: 2a 20 61 20 6c 65 67 61 6c 20 6e 6f 74 69 63 65 * a legal notice
0070: 2c 20 68 65 72 65 20 69 73 20 61 20 62 6c 65 73 , here is a bles
0080: 73 69 6e 67 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 4d sing:.**.** M
0090: 61 79 20 79 6f 75 20 64 6f 20 67 6f 6f 64 20 61 ay you do good a
00a0: 6e 64 20 6e 6f 74 20 65 76 69 6c 2e 0a 2a 2a 20 nd not evil..**
00b0: 20 20 20 4d 61 79 20 79 6f 75 20 66 69 6e 64 20 May you find
00c0: 66 6f 72 67 69 76 65 6e 65 73 73 20 66 6f 72 20 forgiveness for
00d0: 79 6f 75 72 73 65 6c 66 20 61 6e 64 20 66 6f 72 yourself and for
00e0: 67 69 76 65 20 6f 74 68 65 72 73 2e 0a 2a 2a 20 give others..**
00f0: 20 20 20 4d 61 79 20 79 6f 75 20 73 68 61 72 65 May you share
0100: 20 66 72 65 65 6c 79 2c 20 6e 65 76 65 72 20 74 freely, never t
0110: 61 6b 69 6e 67 20 6d 6f 72 65 20 74 68 61 6e 20 aking more than
0120: 79 6f 75 20 67 69 76 65 2e 0a 2a 2a 0a 2a 2a 2a you 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 2a 0a 2a 2a 20 54 68 69 73 20 66 ******.** This f
0180: 69 6c 65 20 63 6f 6e 74 61 69 6e 73 20 43 20 63 ile contains C c
0190: 6f 64 65 20 72 6f 75 74 69 6e 65 73 20 74 68 61 ode routines tha
01a0: 74 20 61 72 65 20 63 61 6c 6c 65 64 20 62 79 20 t are called by
01b0: 74 68 65 20 70 61 72 73 65 72 0a 2a 2a 20 74 6f the parser.** to
01c0: 20 68 61 6e 64 6c 65 20 44 45 4c 45 54 45 20 46 handle DELETE F
01d0: 52 4f 4d 20 73 74 61 74 65 6d 65 6e 74 73 2e 0a ROM statements..
01e0: 2a 2a 0a 2a 2a 20 24 49 64 3a 20 64 65 6c 65 74 **.** $Id: delet
01f0: 65 2e 63 2c 76 20 31 2e 32 32 20 32 30 30 31 2f e.c,v 1.22 2001/
0200: 31 32 2f 32 31 20 31 34 3a 33 30 3a 34 33 20 64 12/21 14:30:43 d
0210: 72 68 20 45 78 70 20 24 0a 2a 2f 0a 23 69 6e 63 rh Exp $.*/.#inc
0220: 6c 75 64 65 20 22 73 71 6c 69 74 65 49 6e 74 2e lude "sqliteInt.
0230: 68 22 0a 0a 2f 2a 0a 2a 2a 20 50 72 6f 63 65 73 h"../*.** Proces
0240: 73 20 61 20 44 45 4c 45 54 45 20 46 52 4f 4d 20 s a DELETE FROM
0250: 73 74 61 74 65 6d 65 6e 74 2e 0a 2a 2f 0a 76 6f statement..*/.vo
0260: 69 64 20 73 71 6c 69 74 65 44 65 6c 65 74 65 46 id sqliteDeleteF
0270: 72 6f 6d 28 0a 20 20 50 61 72 73 65 20 2a 70 50 rom(. Parse *pP
0280: 61 72 73 65 2c 20 20 20 20 20 20 20 20 20 2f 2a arse, /*
0290: 20 54 68 65 20 70 61 72 73 65 72 20 63 6f 6e 74 The parser cont
02a0: 65 78 74 20 2a 2f 0a 20 20 54 6f 6b 65 6e 20 2a ext */. Token *
02b0: 70 54 61 62 6c 65 4e 61 6d 65 2c 20 20 20 20 20 pTableName,
02c0: 2f 2a 20 54 68 65 20 74 61 62 6c 65 20 66 72 6f /* The table fro
02d0: 6d 20 77 68 69 63 68 20 77 65 20 73 68 6f 75 6c m which we shoul
02e0: 64 20 64 65 6c 65 74 65 20 74 68 69 6e 67 73 20 d delete things
02f0: 2a 2f 0a 20 20 45 78 70 72 20 2a 70 57 68 65 72 */. Expr *pWher
0300: 65 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 54 e /* T
0310: 68 65 20 57 48 45 52 45 20 63 6c 61 75 73 65 2e he WHERE clause.
0320: 20 20 4d 61 79 20 62 65 20 6e 75 6c 6c 20 2a 2f May be null */
0330: 0a 29 7b 0a 20 20 56 64 62 65 20 2a 76 3b 20 20 .){. Vdbe *v;
0340: 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 /*
0350: 54 68 65 20 76 69 72 74 75 61 6c 20 64 61 74 61 The virtual data
0360: 62 61 73 65 20 65 6e 67 69 6e 65 20 2a 2f 0a 20 base engine */.
0370: 20 54 61 62 6c 65 20 2a 70 54 61 62 3b 20 20 20 Table *pTab;
0380: 20 20 20 20 20 20 20 20 2f 2a 20 54 68 65 20 74 /* The t
0390: 61 62 6c 65 20 66 72 6f 6d 20 77 68 69 63 68 20 able from which
03a0: 72 65 63 6f 72 64 73 20 77 69 6c 6c 20 62 65 20 records will be
03b0: 64 65 6c 65 74 65 64 20 2a 2f 0a 20 20 49 64 4c deleted */. IdL
03c0: 69 73 74 20 2a 70 54 61 62 4c 69 73 74 3b 20 20 ist *pTabList;
03d0: 20 20 20 20 2f 2a 20 41 6e 20 49 44 20 6c 69 73 /* An ID lis
03e0: 74 20 68 6f 6c 64 69 6e 67 20 70 54 61 62 20 61 t holding pTab a
03f0: 6e 64 20 6e 6f 74 68 69 6e 67 20 65 6c 73 65 20 nd nothing else
0400: 2a 2f 0a 20 20 69 6e 74 20 65 6e 64 2c 20 61 64 */. int end, ad
0410: 64 72 3b 20 20 20 20 20 20 20 20 20 2f 2a 20 41 dr; /* A
0420: 20 63 6f 75 70 6c 65 20 61 64 64 72 65 73 73 65 couple addresse
0430: 73 20 6f 66 20 67 65 6e 65 72 61 74 65 64 20 63 s of generated c
0440: 6f 64 65 20 2a 2f 0a 20 20 69 6e 74 20 69 3b 20 ode */. int i;
0450: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0460: 2f 2a 20 4c 6f 6f 70 20 63 6f 75 6e 74 65 72 20 /* Loop counter
0470: 2a 2f 0a 20 20 57 68 65 72 65 49 6e 66 6f 20 2a */. WhereInfo *
0480: 70 57 49 6e 66 6f 3b 20 20 20 20 20 2f 2a 20 49 pWInfo; /* I
0490: 6e 66 6f 72 6d 61 74 69 6f 6e 20 61 62 6f 75 74 nformation about
04a0: 20 74 68 65 20 57 48 45 52 45 20 63 6c 61 75 73 the WHERE claus
04b0: 65 20 2a 2f 0a 20 20 49 6e 64 65 78 20 2a 70 49 e */. Index *pI
04c0: 64 78 3b 20 20 20 20 20 20 20 20 20 20 20 2f 2a dx; /*
04d0: 20 46 6f 72 20 6c 6f 6f 70 69 6e 67 20 6f 76 65 For looping ove
04e0: 72 20 69 6e 64 69 63 65 73 20 6f 66 20 74 68 65 r indices of the
04f0: 20 74 61 62 6c 65 20 2a 2f 0a 20 20 69 6e 74 20 table */. int
0500: 62 61 73 65 3b 20 20 20 20 20 20 20 20 20 20 20 base;
0510: 20 20 20 2f 2a 20 49 6e 64 65 78 20 6f 66 20 74 /* Index of t
0520: 68 65 20 66 69 72 73 74 20 61 76 61 69 6c 61 62 he first availab
0530: 6c 65 20 74 61 62 6c 65 20 63 75 72 73 6f 72 20 le table cursor
0540: 2a 2f 0a 20 20 73 71 6c 69 74 65 20 2a 64 62 3b */. sqlite *db;
0550: 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 4d /* M
0560: 61 69 6e 20 64 61 74 61 62 61 73 65 20 73 74 72 ain database str
0570: 75 63 74 75 72 65 20 2a 2f 0a 20 20 69 6e 74 20 ucture */. int
0580: 6f 70 65 6e 4f 70 3b 20 20 20 20 20 20 20 20 20 openOp;
0590: 20 20 20 2f 2a 20 4f 70 63 6f 64 65 20 75 73 65 /* Opcode use
05a0: 64 20 74 6f 20 6f 70 65 6e 20 61 20 63 75 72 73 d to open a curs
05b0: 6f 72 20 74 6f 20 74 68 65 20 74 61 62 6c 65 20 or to the table
05c0: 2a 2f 0a 0a 0a 20 20 69 66 28 20 70 50 61 72 73 */... if( pPars
05d0: 65 2d 3e 6e 45 72 72 20 7c 7c 20 73 71 6c 69 74 e->nErr || sqlit
05e0: 65 5f 6d 61 6c 6c 6f 63 5f 66 61 69 6c 65 64 20 e_malloc_failed
05f0: 29 7b 0a 20 20 20 20 70 54 61 62 4c 69 73 74 20 ){. pTabList
0600: 3d 20 30 3b 0a 20 20 20 20 67 6f 74 6f 20 64 65 = 0;. goto de
0610: 6c 65 74 65 5f 66 72 6f 6d 5f 63 6c 65 61 6e 75 lete_from_cleanu
0620: 70 3b 0a 20 20 7d 0a 20 20 64 62 20 3d 20 70 50 p;. }. db = pP
0630: 61 72 73 65 2d 3e 64 62 3b 0a 0a 20 20 2f 2a 20 arse->db;.. /*
0640: 4c 6f 63 61 74 65 20 74 68 65 20 74 61 62 6c 65 Locate the table
0650: 20 77 68 69 63 68 20 77 65 20 77 61 6e 74 20 74 which we want t
0660: 6f 20 64 65 6c 65 74 65 2e 20 20 54 68 69 73 20 o delete. This
0670: 74 61 62 6c 65 20 68 61 73 20 74 6f 20 62 65 0a table has to be.
0680: 20 20 2a 2a 20 70 75 74 20 69 6e 20 61 6e 20 49 ** put in an I
0690: 64 4c 69 73 74 20 73 74 72 75 63 74 75 72 65 20 dList structure
06a0: 62 65 63 61 75 73 65 20 73 6f 6d 65 20 6f 66 20 because some of
06b0: 74 68 65 20 73 75 62 72 6f 75 74 69 6e 65 73 20 the subroutines
06c0: 77 65 0a 20 20 2a 2a 20 77 69 6c 6c 20 62 65 20 we. ** will be
06d0: 63 61 6c 6c 69 6e 67 20 61 72 65 20 64 65 73 69 calling are desi
06e0: 67 6e 65 64 20 74 6f 20 77 6f 72 6b 20 77 69 74 gned to work wit
06f0: 68 20 6d 75 6c 74 69 70 6c 65 20 74 61 62 6c 65 h multiple table
0700: 73 20 61 6e 64 20 65 78 70 65 63 74 0a 20 20 2a s and expect. *
0710: 2a 20 61 6e 20 49 64 4c 69 73 74 2a 20 70 61 72 * an IdList* par
0720: 61 6d 65 74 65 72 20 69 6e 73 74 65 61 64 20 6f ameter instead o
0730: 66 20 6a 75 73 74 20 61 20 54 61 62 6c 65 2a 20 f just a Table*
0740: 70 61 72 61 6d 65 67 65 72 2e 0a 20 20 2a 2f 0a parameger.. */.
0750: 20 20 70 54 61 62 4c 69 73 74 20 3d 20 73 71 6c pTabList = sql
0760: 69 74 65 49 64 4c 69 73 74 41 70 70 65 6e 64 28 iteIdListAppend(
0770: 30 2c 20 70 54 61 62 6c 65 4e 61 6d 65 29 3b 0a 0, pTableName);.
0780: 20 20 69 66 28 20 70 54 61 62 4c 69 73 74 3d 3d if( pTabList==
0790: 30 20 29 20 67 6f 74 6f 20 64 65 6c 65 74 65 5f 0 ) goto delete_
07a0: 66 72 6f 6d 5f 63 6c 65 61 6e 75 70 3b 0a 20 20 from_cleanup;.
07b0: 66 6f 72 28 69 3d 30 3b 20 69 3c 70 54 61 62 4c for(i=0; i<pTabL
07c0: 69 73 74 2d 3e 6e 49 64 3b 20 69 2b 2b 29 7b 0a ist->nId; i++){.
07d0: 20 20 20 20 70 54 61 62 4c 69 73 74 2d 3e 61 5b pTabList->a[
07e0: 69 5d 2e 70 54 61 62 20 3d 20 73 71 6c 69 74 65 i].pTab = sqlite
07f0: 46 69 6e 64 54 61 62 6c 65 28 64 62 2c 20 70 54 FindTable(db, pT
0800: 61 62 4c 69 73 74 2d 3e 61 5b 69 5d 2e 7a 4e 61 abList->a[i].zNa
0810: 6d 65 29 3b 0a 20 20 20 20 69 66 28 20 70 54 61 me);. if( pTa
0820: 62 4c 69 73 74 2d 3e 61 5b 69 5d 2e 70 54 61 62 bList->a[i].pTab
0830: 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 73 71 6c ==0 ){. sql
0840: 69 74 65 53 65 74 53 74 72 69 6e 67 28 26 70 50 iteSetString(&pP
0850: 61 72 73 65 2d 3e 7a 45 72 72 4d 73 67 2c 20 22 arse->zErrMsg, "
0860: 6e 6f 20 73 75 63 68 20 74 61 62 6c 65 3a 20 22 no such table: "
0870: 2c 20 0a 20 20 20 20 20 20 20 20 20 70 54 61 62 , . pTab
0880: 4c 69 73 74 2d 3e 61 5b 69 5d 2e 7a 4e 61 6d 65 List->a[i].zName
0890: 2c 20 30 29 3b 0a 20 20 20 20 20 20 70 50 61 72 , 0);. pPar
08a0: 73 65 2d 3e 6e 45 72 72 2b 2b 3b 0a 20 20 20 20 se->nErr++;.
08b0: 20 20 67 6f 74 6f 20 64 65 6c 65 74 65 5f 66 72 goto delete_fr
08c0: 6f 6d 5f 63 6c 65 61 6e 75 70 3b 0a 20 20 20 20 om_cleanup;.
08d0: 7d 0a 20 20 20 20 69 66 28 20 70 54 61 62 4c 69 }. if( pTabLi
08e0: 73 74 2d 3e 61 5b 69 5d 2e 70 54 61 62 2d 3e 72 st->a[i].pTab->r
08f0: 65 61 64 4f 6e 6c 79 20 29 7b 0a 20 20 20 20 20 eadOnly ){.
0900: 20 73 71 6c 69 74 65 53 65 74 53 74 72 69 6e 67 sqliteSetString
0910: 28 26 70 50 61 72 73 65 2d 3e 7a 45 72 72 4d 73 (&pParse->zErrMs
0920: 67 2c 20 22 74 61 62 6c 65 20 22 2c 20 70 54 61 g, "table ", pTa
0930: 62 4c 69 73 74 2d 3e 61 5b 69 5d 2e 7a 4e 61 6d bList->a[i].zNam
0940: 65 2c 0a 20 20 20 20 20 20 20 20 22 20 6d 61 79 e,. " may
0950: 20 6e 6f 74 20 62 65 20 6d 6f 64 69 66 69 65 64 not be modified
0960: 22 2c 20 30 29 3b 0a 20 20 20 20 20 20 70 50 61 ", 0);. pPa
0970: 72 73 65 2d 3e 6e 45 72 72 2b 2b 3b 0a 20 20 20 rse->nErr++;.
0980: 20 20 20 67 6f 74 6f 20 64 65 6c 65 74 65 5f 66 goto delete_f
0990: 72 6f 6d 5f 63 6c 65 61 6e 75 70 3b 0a 20 20 20 rom_cleanup;.
09a0: 20 7d 0a 20 20 7d 0a 20 20 70 54 61 62 20 3d 20 }. }. pTab =
09b0: 70 54 61 62 4c 69 73 74 2d 3e 61 5b 30 5d 2e 70 pTabList->a[0].p
09c0: 54 61 62 3b 0a 0a 20 20 2f 2a 20 52 65 73 6f 6c Tab;.. /* Resol
09d0: 76 65 20 74 68 65 20 63 6f 6c 75 6d 6e 20 6e 61 ve the column na
09e0: 6d 65 73 20 69 6e 20 61 6c 6c 20 74 68 65 20 65 mes in all the e
09f0: 78 70 72 65 73 73 69 6f 6e 73 2e 0a 20 20 2a 2f xpressions.. */
0a00: 0a 20 20 69 66 28 20 70 57 68 65 72 65 20 29 7b . if( pWhere ){
0a10: 0a 20 20 20 20 73 71 6c 69 74 65 45 78 70 72 52 . sqliteExprR
0a20: 65 73 6f 6c 76 65 49 6e 53 65 6c 65 63 74 28 70 esolveInSelect(p
0a30: 50 61 72 73 65 2c 20 70 57 68 65 72 65 29 3b 0a Parse, pWhere);.
0a40: 20 20 20 20 69 66 28 20 73 71 6c 69 74 65 45 78 if( sqliteEx
0a50: 70 72 52 65 73 6f 6c 76 65 49 64 73 28 70 50 61 prResolveIds(pPa
0a60: 72 73 65 2c 20 70 54 61 62 4c 69 73 74 2c 20 70 rse, pTabList, p
0a70: 57 68 65 72 65 29 20 29 7b 0a 20 20 20 20 20 20 Where) ){.
0a80: 67 6f 74 6f 20 64 65 6c 65 74 65 5f 66 72 6f 6d goto delete_from
0a90: 5f 63 6c 65 61 6e 75 70 3b 0a 20 20 20 20 7d 0a _cleanup;. }.
0aa0: 20 20 20 20 69 66 28 20 73 71 6c 69 74 65 45 78 if( sqliteEx
0ab0: 70 72 43 68 65 63 6b 28 70 50 61 72 73 65 2c 20 prCheck(pParse,
0ac0: 70 57 68 65 72 65 2c 20 30 2c 20 30 29 20 29 7b pWhere, 0, 0) ){
0ad0: 0a 20 20 20 20 20 20 67 6f 74 6f 20 64 65 6c 65 . goto dele
0ae0: 74 65 5f 66 72 6f 6d 5f 63 6c 65 61 6e 75 70 3b te_from_cleanup;
0af0: 0a 20 20 20 20 7d 0a 20 20 7d 0a 0a 20 20 2f 2a . }. }.. /*
0b00: 20 42 65 67 69 6e 20 67 65 6e 65 72 61 74 69 6e Begin generatin
0b10: 67 20 63 6f 64 65 2e 0a 20 20 2a 2f 0a 20 20 76 g code.. */. v
0b20: 20 3d 20 73 71 6c 69 74 65 47 65 74 56 64 62 65 = sqliteGetVdbe
0b30: 28 70 50 61 72 73 65 29 3b 0a 20 20 69 66 28 20 (pParse);. if(
0b40: 76 3d 3d 30 20 29 20 67 6f 74 6f 20 64 65 6c 65 v==0 ) goto dele
0b50: 74 65 5f 66 72 6f 6d 5f 63 6c 65 61 6e 75 70 3b te_from_cleanup;
0b60: 0a 20 20 69 66 28 20 28 64 62 2d 3e 66 6c 61 67 . if( (db->flag
0b70: 73 20 26 20 53 51 4c 49 54 45 5f 49 6e 54 72 61 s & SQLITE_InTra
0b80: 6e 73 29 3d 3d 30 20 29 7b 0a 20 20 20 20 73 71 ns)==0 ){. sq
0b90: 6c 69 74 65 56 64 62 65 41 64 64 4f 70 28 76 2c liteVdbeAddOp(v,
0ba0: 20 4f 50 5f 54 72 61 6e 73 61 63 74 69 6f 6e 2c OP_Transaction,
0bb0: 20 30 2c 20 30 29 3b 0a 20 20 20 20 73 71 6c 69 0, 0);. sqli
0bc0: 74 65 56 64 62 65 41 64 64 4f 70 28 76 2c 20 4f teVdbeAddOp(v, O
0bd0: 50 5f 56 65 72 69 66 79 43 6f 6f 6b 69 65 2c 20 P_VerifyCookie,
0be0: 64 62 2d 3e 73 63 68 65 6d 61 5f 63 6f 6f 6b 69 db->schema_cooki
0bf0: 65 2c 20 30 29 3b 0a 20 20 20 20 70 50 61 72 73 e, 0);. pPars
0c00: 65 2d 3e 73 63 68 65 6d 61 56 65 72 69 66 69 65 e->schemaVerifie
0c10: 64 20 3d 20 31 3b 0a 20 20 7d 0a 0a 20 20 2f 2a d = 1;. }.. /*
0c20: 20 49 6e 69 74 69 61 6c 69 7a 65 20 74 68 65 20 Initialize the
0c30: 63 6f 75 6e 74 65 72 20 6f 66 20 74 68 65 20 6e counter of the n
0c40: 75 6d 62 65 72 20 6f 66 20 72 6f 77 73 20 64 65 umber of rows de
0c50: 6c 65 74 65 64 2c 20 69 66 0a 20 20 2a 2a 20 77 leted, if. ** w
0c60: 65 20 61 72 65 20 63 6f 75 6e 74 69 6e 67 20 72 e are counting r
0c70: 6f 77 73 2e 0a 20 20 2a 2f 0a 20 20 69 66 28 20 ows.. */. if(
0c80: 64 62 2d 3e 66 6c 61 67 73 20 26 20 53 51 4c 49 db->flags & SQLI
0c90: 54 45 5f 43 6f 75 6e 74 52 6f 77 73 20 29 7b 0a TE_CountRows ){.
0ca0: 20 20 20 20 73 71 6c 69 74 65 56 64 62 65 41 64 sqliteVdbeAd
0cb0: 64 4f 70 28 76 2c 20 4f 50 5f 49 6e 74 65 67 65 dOp(v, OP_Intege
0cc0: 72 2c 20 30 2c 20 30 29 3b 0a 20 20 7d 0a 0a 20 r, 0, 0);. }..
0cd0: 20 2f 2a 20 53 70 65 63 69 61 6c 20 63 61 73 65 /* Special case
0ce0: 3a 20 41 20 44 45 4c 45 54 45 20 77 69 74 68 6f : A DELETE witho
0cf0: 75 74 20 61 20 57 48 45 52 45 20 63 6c 61 75 73 ut a WHERE claus
0d00: 65 20 64 65 6c 65 74 65 73 20 65 76 65 72 79 74 e deletes everyt
0d10: 68 69 6e 67 2e 0a 20 20 2a 2a 20 49 74 20 69 73 hing.. ** It is
0d20: 20 65 61 73 69 65 72 20 6a 75 73 74 20 74 6f 20 easier just to
0d30: 65 72 61 73 65 20 74 68 65 20 77 68 6f 6c 65 20 erase the whole
0d40: 74 61 62 6c 65 2e 0a 20 20 2a 2f 0a 20 20 69 66 table.. */. if
0d50: 28 20 70 57 68 65 72 65 3d 3d 30 20 29 7b 0a 20 ( pWhere==0 ){.
0d60: 20 20 20 69 66 28 20 64 62 2d 3e 66 6c 61 67 73 if( db->flags
0d70: 20 26 20 53 51 4c 49 54 45 5f 43 6f 75 6e 74 52 & SQLITE_CountR
0d80: 6f 77 73 20 29 7b 0a 20 20 20 20 20 20 2f 2a 20 ows ){. /*
0d90: 49 66 20 63 6f 75 6e 74 69 6e 67 20 72 6f 77 73 If counting rows
0da0: 20 64 65 6c 65 74 65 64 2c 20 6a 75 73 74 20 63 deleted, just c
0db0: 6f 75 6e 74 20 74 68 65 20 74 6f 74 61 6c 20 6e ount the total n
0dc0: 75 6d 62 65 72 20 6f 66 0a 20 20 20 20 20 20 2a umber of. *
0dd0: 2a 20 65 6e 74 72 69 65 73 20 69 6e 20 74 68 65 * entries in the
0de0: 20 74 61 62 6c 65 2e 20 2a 2f 0a 20 20 20 20 20 table. */.
0df0: 20 69 6e 74 20 65 6e 64 4f 66 4c 6f 6f 70 20 3d int endOfLoop =
0e00: 20 73 71 6c 69 74 65 56 64 62 65 4d 61 6b 65 4c sqliteVdbeMakeL
0e10: 61 62 65 6c 28 76 29 3b 0a 20 20 20 20 20 20 69 abel(v);. i
0e20: 6e 74 20 61 64 64 72 3b 0a 20 20 20 20 20 20 6f nt addr;. o
0e30: 70 65 6e 4f 70 20 3d 20 70 54 61 62 2d 3e 69 73 penOp = pTab->is
0e40: 54 65 6d 70 20 3f 20 4f 50 5f 4f 70 65 6e 41 75 Temp ? OP_OpenAu
0e50: 78 20 3a 20 4f 50 5f 4f 70 65 6e 3b 0a 20 20 20 x : OP_Open;.
0e60: 20 20 20 73 71 6c 69 74 65 56 64 62 65 41 64 64 sqliteVdbeAdd
0e70: 4f 70 28 76 2c 20 6f 70 65 6e 4f 70 2c 20 30 2c Op(v, openOp, 0,
0e80: 20 70 54 61 62 2d 3e 74 6e 75 6d 29 3b 0a 20 20 pTab->tnum);.
0e90: 20 20 20 20 73 71 6c 69 74 65 56 64 62 65 41 64 sqliteVdbeAd
0ea0: 64 4f 70 28 76 2c 20 4f 50 5f 52 65 77 69 6e 64 dOp(v, OP_Rewind
0eb0: 2c 20 30 2c 20 73 71 6c 69 74 65 56 64 62 65 43 , 0, sqliteVdbeC
0ec0: 75 72 72 65 6e 74 41 64 64 72 28 76 29 2b 32 29 urrentAddr(v)+2)
0ed0: 3b 0a 20 20 20 20 20 20 61 64 64 72 20 3d 20 73 ;. addr = s
0ee0: 71 6c 69 74 65 56 64 62 65 41 64 64 4f 70 28 76 qliteVdbeAddOp(v
0ef0: 2c 20 4f 50 5f 41 64 64 49 6d 6d 2c 20 31 2c 20 , OP_AddImm, 1,
0f00: 30 29 3b 0a 20 20 20 20 20 20 73 71 6c 69 74 65 0);. sqlite
0f10: 56 64 62 65 41 64 64 4f 70 28 76 2c 20 4f 50 5f VdbeAddOp(v, OP_
0f20: 4e 65 78 74 2c 20 30 2c 20 61 64 64 72 29 3b 0a Next, 0, addr);.
0f30: 20 20 20 20 20 20 73 71 6c 69 74 65 56 64 62 65 sqliteVdbe
0f40: 52 65 73 6f 6c 76 65 4c 61 62 65 6c 28 76 2c 20 ResolveLabel(v,
0f50: 65 6e 64 4f 66 4c 6f 6f 70 29 3b 0a 20 20 20 20 endOfLoop);.
0f60: 20 20 73 71 6c 69 74 65 56 64 62 65 41 64 64 4f sqliteVdbeAddO
0f70: 70 28 76 2c 20 4f 50 5f 43 6c 6f 73 65 2c 20 30 p(v, OP_Close, 0
0f80: 2c 20 30 29 3b 0a 20 20 20 20 7d 0a 20 20 20 20 , 0);. }.
0f90: 73 71 6c 69 74 65 56 64 62 65 41 64 64 4f 70 28 sqliteVdbeAddOp(
0fa0: 76 2c 20 4f 50 5f 43 6c 65 61 72 2c 20 70 54 61 v, OP_Clear, pTa
0fb0: 62 2d 3e 74 6e 75 6d 2c 20 70 54 61 62 2d 3e 69 b->tnum, pTab->i
0fc0: 73 54 65 6d 70 29 3b 0a 20 20 20 20 66 6f 72 28 sTemp);. for(
0fd0: 70 49 64 78 3d 70 54 61 62 2d 3e 70 49 6e 64 65 pIdx=pTab->pInde
0fe0: 78 3b 20 70 49 64 78 3b 20 70 49 64 78 3d 70 49 x; pIdx; pIdx=pI
0ff0: 64 78 2d 3e 70 4e 65 78 74 29 7b 0a 20 20 20 20 dx->pNext){.
1000: 20 20 73 71 6c 69 74 65 56 64 62 65 41 64 64 4f sqliteVdbeAddO
1010: 70 28 76 2c 20 4f 50 5f 43 6c 65 61 72 2c 20 70 p(v, OP_Clear, p
1020: 49 64 78 2d 3e 74 6e 75 6d 2c 20 70 54 61 62 2d Idx->tnum, pTab-
1030: 3e 69 73 54 65 6d 70 29 3b 0a 20 20 20 20 7d 0a >isTemp);. }.
1040: 20 20 7d 0a 0a 20 20 2f 2a 20 54 68 65 20 75 73 }.. /* The us
1050: 75 61 6c 20 63 61 73 65 3a 20 54 68 65 72 65 20 ual case: There
1060: 69 73 20 61 20 57 48 45 52 45 20 63 6c 61 75 73 is a WHERE claus
1070: 65 20 73 6f 20 77 65 20 68 61 76 65 20 74 6f 20 e so we have to
1080: 73 63 61 6e 20 74 68 72 6f 75 67 68 0a 20 20 2a scan through. *
1090: 2a 20 74 68 65 20 74 61 62 6c 65 20 61 6e 20 70 * the table an p
10a0: 69 63 6b 20 77 68 69 63 68 20 72 65 63 6f 72 64 ick which record
10b0: 73 20 74 6f 20 64 65 6c 65 74 65 2e 0a 20 20 2a s to delete.. *
10c0: 2f 0a 20 20 65 6c 73 65 7b 0a 20 20 20 20 2f 2a /. else{. /*
10d0: 20 42 65 67 69 6e 20 74 68 65 20 64 61 74 61 62 Begin the datab
10e0: 61 73 65 20 73 63 61 6e 0a 20 20 20 20 2a 2f 0a ase scan. */.
10f0: 20 20 20 20 70 57 49 6e 66 6f 20 3d 20 73 71 6c pWInfo = sql
1100: 69 74 65 57 68 65 72 65 42 65 67 69 6e 28 70 50 iteWhereBegin(pP
1110: 61 72 73 65 2c 20 70 54 61 62 4c 69 73 74 2c 20 arse, pTabList,
1120: 70 57 68 65 72 65 2c 20 31 29 3b 0a 20 20 20 20 pWhere, 1);.
1130: 69 66 28 20 70 57 49 6e 66 6f 3d 3d 30 20 29 20 if( pWInfo==0 )
1140: 67 6f 74 6f 20 64 65 6c 65 74 65 5f 66 72 6f 6d goto delete_from
1150: 5f 63 6c 65 61 6e 75 70 3b 0a 0a 20 20 20 20 2f _cleanup;.. /
1160: 2a 20 52 65 6d 65 6d 62 65 72 20 74 68 65 20 6b * Remember the k
1170: 65 79 20 6f 66 20 65 76 65 72 79 20 69 74 65 6d ey of every item
1180: 20 74 6f 20 62 65 20 64 65 6c 65 74 65 64 2e 0a to be deleted..
1190: 20 20 20 20 2a 2f 0a 20 20 20 20 73 71 6c 69 74 */. sqlit
11a0: 65 56 64 62 65 41 64 64 4f 70 28 76 2c 20 4f 50 eVdbeAddOp(v, OP
11b0: 5f 4c 69 73 74 57 72 69 74 65 2c 20 30 2c 20 30 _ListWrite, 0, 0
11c0: 29 3b 0a 20 20 20 20 69 66 28 20 64 62 2d 3e 66 );. if( db->f
11d0: 6c 61 67 73 20 26 20 53 51 4c 49 54 45 5f 43 6f lags & SQLITE_Co
11e0: 75 6e 74 52 6f 77 73 20 29 7b 0a 20 20 20 20 20 untRows ){.
11f0: 20 73 71 6c 69 74 65 56 64 62 65 41 64 64 4f 70 sqliteVdbeAddOp
1200: 28 76 2c 20 4f 50 5f 41 64 64 49 6d 6d 2c 20 31 (v, OP_AddImm, 1
1210: 2c 20 30 29 3b 0a 20 20 20 20 7d 0a 0a 20 20 20 , 0);. }..
1220: 20 2f 2a 20 45 6e 64 20 74 68 65 20 64 61 74 61 /* End the data
1230: 62 61 73 65 20 73 63 61 6e 20 6c 6f 6f 70 2e 0a base scan loop..
1240: 20 20 20 20 2a 2f 0a 20 20 20 20 73 71 6c 69 74 */. sqlit
1250: 65 57 68 65 72 65 45 6e 64 28 70 57 49 6e 66 6f eWhereEnd(pWInfo
1260: 29 3b 0a 0a 20 20 20 20 2f 2a 20 44 65 6c 65 74 );.. /* Delet
1270: 65 20 65 76 65 72 79 20 69 74 65 6d 20 77 68 6f e every item who
1280: 73 65 20 6b 65 79 20 77 61 73 20 77 72 69 74 74 se key was writt
1290: 65 6e 20 74 6f 20 74 68 65 20 6c 69 73 74 20 64 en to the list d
12a0: 75 72 69 6e 67 20 74 68 65 0a 20 20 20 20 2a 2a uring the. **
12b0: 20 64 61 74 61 62 61 73 65 20 73 63 61 6e 2e 20 database scan.
12c0: 20 57 65 20 68 61 76 65 20 74 6f 20 64 65 6c 65 We have to dele
12d0: 74 65 20 69 74 65 6d 73 20 61 66 74 65 72 20 74 te items after t
12e0: 68 65 20 73 63 61 6e 20 69 73 20 63 6f 6d 70 6c he scan is compl
12f0: 65 74 65 0a 20 20 20 20 2a 2a 20 62 65 63 61 75 ete. ** becau
1300: 73 65 20 64 65 6c 65 74 69 6e 67 20 61 6e 20 69 se deleting an i
1310: 74 65 6d 20 63 61 6e 20 63 68 61 6e 67 65 20 74 tem can change t
1320: 68 65 20 73 63 61 6e 20 6f 72 64 65 72 2e 0a 20 he scan order..
1330: 20 20 20 2a 2f 0a 20 20 20 20 62 61 73 65 20 3d */. base =
1340: 20 70 50 61 72 73 65 2d 3e 6e 54 61 62 3b 0a 20 pParse->nTab;.
1350: 20 20 20 73 71 6c 69 74 65 56 64 62 65 41 64 64 sqliteVdbeAdd
1360: 4f 70 28 76 2c 20 4f 50 5f 4c 69 73 74 52 65 77 Op(v, OP_ListRew
1370: 69 6e 64 2c 20 30 2c 20 30 29 3b 0a 20 20 20 20 ind, 0, 0);.
1380: 6f 70 65 6e 4f 70 20 3d 20 70 54 61 62 2d 3e 69 openOp = pTab->i
1390: 73 54 65 6d 70 20 3f 20 4f 50 5f 4f 70 65 6e 57 sTemp ? OP_OpenW
13a0: 72 41 75 78 20 3a 20 4f 50 5f 4f 70 65 6e 57 72 rAux : OP_OpenWr
13b0: 69 74 65 3b 0a 20 20 20 20 73 71 6c 69 74 65 56 ite;. sqliteV
13c0: 64 62 65 41 64 64 4f 70 28 76 2c 20 6f 70 65 6e dbeAddOp(v, open
13d0: 4f 70 2c 20 62 61 73 65 2c 20 70 54 61 62 2d 3e Op, base, pTab->
13e0: 74 6e 75 6d 29 3b 0a 20 20 20 20 66 6f 72 28 69 tnum);. for(i
13f0: 3d 31 2c 20 70 49 64 78 3d 70 54 61 62 2d 3e 70 =1, pIdx=pTab->p
1400: 49 6e 64 65 78 3b 20 70 49 64 78 3b 20 69 2b 2b Index; pIdx; i++
1410: 2c 20 70 49 64 78 3d 70 49 64 78 2d 3e 70 4e 65 , pIdx=pIdx->pNe
1420: 78 74 29 7b 0a 20 20 20 20 20 20 73 71 6c 69 74 xt){. sqlit
1430: 65 56 64 62 65 41 64 64 4f 70 28 76 2c 20 6f 70 eVdbeAddOp(v, op
1440: 65 6e 4f 70 2c 20 62 61 73 65 2b 69 2c 20 70 49 enOp, base+i, pI
1450: 64 78 2d 3e 74 6e 75 6d 29 3b 0a 20 20 20 20 7d dx->tnum);. }
1460: 0a 20 20 20 20 65 6e 64 20 3d 20 73 71 6c 69 74 . end = sqlit
1470: 65 56 64 62 65 4d 61 6b 65 4c 61 62 65 6c 28 76 eVdbeMakeLabel(v
1480: 29 3b 0a 20 20 20 20 61 64 64 72 20 3d 20 73 71 );. addr = sq
1490: 6c 69 74 65 56 64 62 65 41 64 64 4f 70 28 76 2c liteVdbeAddOp(v,
14a0: 20 4f 50 5f 4c 69 73 74 52 65 61 64 2c 20 30 2c OP_ListRead, 0,
14b0: 20 65 6e 64 29 3b 0a 20 20 20 20 73 71 6c 69 74 end);. sqlit
14c0: 65 56 64 62 65 41 64 64 4f 70 28 76 2c 20 4f 50 eVdbeAddOp(v, OP
14d0: 5f 4d 6f 76 65 54 6f 2c 20 62 61 73 65 2c 20 30 _MoveTo, base, 0
14e0: 29 3b 0a 20 20 20 20 69 66 28 20 70 54 61 62 2d );. if( pTab-
14f0: 3e 70 49 6e 64 65 78 20 29 7b 0a 20 20 20 20 20 >pIndex ){.
1500: 20 66 6f 72 28 69 3d 31 2c 20 70 49 64 78 3d 70 for(i=1, pIdx=p
1510: 54 61 62 2d 3e 70 49 6e 64 65 78 3b 20 70 49 64 Tab->pIndex; pId
1520: 78 3b 20 69 2b 2b 2c 20 70 49 64 78 3d 70 49 64 x; i++, pIdx=pId
1530: 78 2d 3e 70 4e 65 78 74 29 7b 0a 20 20 20 20 20 x->pNext){.
1540: 20 20 20 69 6e 74 20 6a 3b 0a 20 20 20 20 20 20 int j;.
1550: 20 20 73 71 6c 69 74 65 56 64 62 65 41 64 64 4f sqliteVdbeAddO
1560: 70 28 76 2c 20 4f 50 5f 52 65 63 6e 6f 2c 20 62 p(v, OP_Recno, b
1570: 61 73 65 2c 20 30 29 3b 0a 20 20 20 20 20 20 20 ase, 0);.
1580: 20 66 6f 72 28 6a 3d 30 3b 20 6a 3c 70 49 64 78 for(j=0; j<pIdx
1590: 2d 3e 6e 43 6f 6c 75 6d 6e 3b 20 6a 2b 2b 29 7b ->nColumn; j++){
15a0: 0a 20 20 20 20 20 20 20 20 20 20 69 6e 74 20 69 . int i
15b0: 64 78 20 3d 20 70 49 64 78 2d 3e 61 69 43 6f 6c dx = pIdx->aiCol
15c0: 75 6d 6e 5b 6a 5d 3b 0a 20 20 20 20 20 20 20 20 umn[j];.
15d0: 20 20 69 66 28 20 69 64 78 3d 3d 70 54 61 62 2d if( idx==pTab-
15e0: 3e 69 50 4b 65 79 20 29 7b 0a 20 20 20 20 20 20 >iPKey ){.
15f0: 20 20 20 20 20 20 73 71 6c 69 74 65 56 64 62 65 sqliteVdbe
1600: 41 64 64 4f 70 28 76 2c 20 4f 50 5f 44 75 70 2c AddOp(v, OP_Dup,
1610: 20 6a 2c 20 30 29 3b 0a 20 20 20 20 20 20 20 20 j, 0);.
1620: 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 20 }else{.
1630: 20 20 20 20 20 73 71 6c 69 74 65 56 64 62 65 41 sqliteVdbeA
1640: 64 64 4f 70 28 76 2c 20 4f 50 5f 43 6f 6c 75 6d ddOp(v, OP_Colum
1650: 6e 2c 20 62 61 73 65 2c 20 69 64 78 29 3b 0a 20 n, base, idx);.
1660: 20 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20 }.
1670: 20 20 20 7d 0a 20 20 20 20 20 20 20 20 73 71 6c }. sql
1680: 69 74 65 56 64 62 65 41 64 64 4f 70 28 76 2c 20 iteVdbeAddOp(v,
1690: 4f 50 5f 4d 61 6b 65 49 64 78 4b 65 79 2c 20 70 OP_MakeIdxKey, p
16a0: 49 64 78 2d 3e 6e 43 6f 6c 75 6d 6e 2c 20 30 29 Idx->nColumn, 0)
16b0: 3b 0a 20 20 20 20 20 20 20 20 73 71 6c 69 74 65 ;. sqlite
16c0: 56 64 62 65 41 64 64 4f 70 28 76 2c 20 4f 50 5f VdbeAddOp(v, OP_
16d0: 49 64 78 44 65 6c 65 74 65 2c 20 62 61 73 65 2b IdxDelete, base+
16e0: 69 2c 20 30 29 3b 0a 20 20 20 20 20 20 7d 0a 20 i, 0);. }.
16f0: 20 20 20 7d 0a 20 20 20 20 73 71 6c 69 74 65 56 }. sqliteV
1700: 64 62 65 41 64 64 4f 70 28 76 2c 20 4f 50 5f 44 dbeAddOp(v, OP_D
1710: 65 6c 65 74 65 2c 20 62 61 73 65 2c 20 30 29 3b elete, base, 0);
1720: 0a 20 20 20 20 73 71 6c 69 74 65 56 64 62 65 41 . sqliteVdbeA
1730: 64 64 4f 70 28 76 2c 20 4f 50 5f 47 6f 74 6f 2c ddOp(v, OP_Goto,
1740: 20 30 2c 20 61 64 64 72 29 3b 0a 20 20 20 20 73 0, addr);. s
1750: 71 6c 69 74 65 56 64 62 65 52 65 73 6f 6c 76 65 qliteVdbeResolve
1760: 4c 61 62 65 6c 28 76 2c 20 65 6e 64 29 3b 0a 20 Label(v, end);.
1770: 20 20 20 73 71 6c 69 74 65 56 64 62 65 41 64 64 sqliteVdbeAdd
1780: 4f 70 28 76 2c 20 4f 50 5f 4c 69 73 74 52 65 73 Op(v, OP_ListRes
1790: 65 74 2c 20 30 2c 20 30 29 3b 0a 20 20 7d 0a 20 et, 0, 0);. }.
17a0: 20 69 66 28 20 28 64 62 2d 3e 66 6c 61 67 73 20 if( (db->flags
17b0: 26 20 53 51 4c 49 54 45 5f 49 6e 54 72 61 6e 73 & SQLITE_InTrans
17c0: 29 3d 3d 30 20 29 7b 0a 20 20 20 20 73 71 6c 69 )==0 ){. sqli
17d0: 74 65 56 64 62 65 41 64 64 4f 70 28 76 2c 20 4f teVdbeAddOp(v, O
17e0: 50 5f 43 6f 6d 6d 69 74 2c 20 30 2c 20 30 29 3b P_Commit, 0, 0);
17f0: 0a 20 20 7d 0a 0a 20 20 2f 2a 0a 20 20 2a 2a 20 . }.. /*. **
1800: 52 65 74 75 72 6e 20 74 68 65 20 6e 75 6d 62 65 Return the numbe
1810: 72 20 6f 66 20 72 6f 77 73 20 74 68 61 74 20 77 r of rows that w
1820: 65 72 65 20 64 65 6c 65 74 65 64 2e 0a 20 20 2a ere deleted.. *
1830: 2f 0a 20 20 69 66 28 20 64 62 2d 3e 66 6c 61 67 /. if( db->flag
1840: 73 20 26 20 53 51 4c 49 54 45 5f 43 6f 75 6e 74 s & SQLITE_Count
1850: 52 6f 77 73 20 29 7b 0a 20 20 20 20 73 71 6c 69 Rows ){. sqli
1860: 74 65 56 64 62 65 41 64 64 4f 70 28 76 2c 20 4f teVdbeAddOp(v, O
1870: 50 5f 43 6f 6c 75 6d 6e 43 6f 75 6e 74 2c 20 31 P_ColumnCount, 1
1880: 2c 20 30 29 3b 0a 20 20 20 20 73 71 6c 69 74 65 , 0);. sqlite
1890: 56 64 62 65 41 64 64 4f 70 28 76 2c 20 4f 50 5f VdbeAddOp(v, OP_
18a0: 43 6f 6c 75 6d 6e 4e 61 6d 65 2c 20 30 2c 20 30 ColumnName, 0, 0
18b0: 29 3b 0a 20 20 20 20 73 71 6c 69 74 65 56 64 62 );. sqliteVdb
18c0: 65 43 68 61 6e 67 65 50 33 28 76 2c 20 2d 31 2c eChangeP3(v, -1,
18d0: 20 22 72 6f 77 73 20 64 65 6c 65 74 65 64 22 2c "rows deleted",
18e0: 20 50 33 5f 53 54 41 54 49 43 29 3b 0a 20 20 20 P3_STATIC);.
18f0: 20 73 71 6c 69 74 65 56 64 62 65 41 64 64 4f 70 sqliteVdbeAddOp
1900: 28 76 2c 20 4f 50 5f 43 61 6c 6c 62 61 63 6b 2c (v, OP_Callback,
1910: 20 31 2c 20 30 29 3b 0a 20 20 7d 0a 0a 64 65 6c 1, 0);. }..del
1920: 65 74 65 5f 66 72 6f 6d 5f 63 6c 65 61 6e 75 70 ete_from_cleanup
1930: 3a 0a 20 20 73 71 6c 69 74 65 49 64 4c 69 73 74 :. sqliteIdList
1940: 44 65 6c 65 74 65 28 70 54 61 62 4c 69 73 74 29 Delete(pTabList)
1950: 3b 0a 20 20 73 71 6c 69 74 65 45 78 70 72 44 65 ;. sqliteExprDe
1960: 6c 65 74 65 28 70 57 68 65 72 65 29 3b 0a 20 20 lete(pWhere);.
1970: 72 65 74 75 72 6e 3b 0a 7d 0a return;.}.