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 35 20 32 30 30 32 2f e.c,v 1.25 2002/
0200: 30 31 2f 32 39 20 32 33 3a 30 37 3a 30 32 20 64 01/29 23:07:02 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 30 rse, pTabList, 0
0a70: 2c 20 70 57 68 65 72 65 29 20 29 7b 0a 20 20 20 , pWhere) ){.
0a80: 20 20 20 67 6f 74 6f 20 64 65 6c 65 74 65 5f 66 goto delete_f
0a90: 72 6f 6d 5f 63 6c 65 61 6e 75 70 3b 0a 20 20 20 rom_cleanup;.
0aa0: 20 7d 0a 20 20 20 20 69 66 28 20 73 71 6c 69 74 }. if( sqlit
0ab0: 65 45 78 70 72 43 68 65 63 6b 28 70 50 61 72 73 eExprCheck(pPars
0ac0: 65 2c 20 70 57 68 65 72 65 2c 20 30 2c 20 30 29 e, pWhere, 0, 0)
0ad0: 20 29 7b 0a 20 20 20 20 20 20 67 6f 74 6f 20 64 ){. goto d
0ae0: 65 6c 65 74 65 5f 66 72 6f 6d 5f 63 6c 65 61 6e elete_from_clean
0af0: 75 70 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 0a 20 up;. }. }..
0b00: 20 2f 2a 20 42 65 67 69 6e 20 67 65 6e 65 72 61 /* Begin genera
0b10: 74 69 6e 67 20 63 6f 64 65 2e 0a 20 20 2a 2f 0a ting code.. */.
0b20: 20 20 76 20 3d 20 73 71 6c 69 74 65 47 65 74 56 v = sqliteGetV
0b30: 64 62 65 28 70 50 61 72 73 65 29 3b 0a 20 20 69 dbe(pParse);. i
0b40: 66 28 20 76 3d 3d 30 20 29 20 67 6f 74 6f 20 64 f( v==0 ) goto d
0b50: 65 6c 65 74 65 5f 66 72 6f 6d 5f 63 6c 65 61 6e elete_from_clean
0b60: 75 70 3b 0a 20 20 69 66 28 20 28 64 62 2d 3e 66 up;. if( (db->f
0b70: 6c 61 67 73 20 26 20 53 51 4c 49 54 45 5f 49 6e lags & SQLITE_In
0b80: 54 72 61 6e 73 29 3d 3d 30 20 29 7b 0a 20 20 20 Trans)==0 ){.
0b90: 20 73 71 6c 69 74 65 56 64 62 65 41 64 64 4f 70 sqliteVdbeAddOp
0ba0: 28 76 2c 20 4f 50 5f 54 72 61 6e 73 61 63 74 69 (v, OP_Transacti
0bb0: 6f 6e 2c 20 30 2c 20 30 29 3b 0a 20 20 20 20 73 on, 0, 0);. s
0bc0: 71 6c 69 74 65 56 64 62 65 41 64 64 4f 70 28 76 qliteVdbeAddOp(v
0bd0: 2c 20 4f 50 5f 56 65 72 69 66 79 43 6f 6f 6b 69 , OP_VerifyCooki
0be0: 65 2c 20 64 62 2d 3e 73 63 68 65 6d 61 5f 63 6f e, db->schema_co
0bf0: 6f 6b 69 65 2c 20 30 29 3b 0a 20 20 20 20 70 50 okie, 0);. pP
0c00: 61 72 73 65 2d 3e 73 63 68 65 6d 61 56 65 72 69 arse->schemaVeri
0c10: 66 69 65 64 20 3d 20 31 3b 0a 20 20 7d 0a 0a 20 fied = 1;. }..
0c20: 20 2f 2a 20 49 6e 69 74 69 61 6c 69 7a 65 20 74 /* Initialize t
0c30: 68 65 20 63 6f 75 6e 74 65 72 20 6f 66 20 74 68 he counter of th
0c40: 65 20 6e 75 6d 62 65 72 20 6f 66 20 72 6f 77 73 e number of rows
0c50: 20 64 65 6c 65 74 65 64 2c 20 69 66 0a 20 20 2a deleted, if. *
0c60: 2a 20 77 65 20 61 72 65 20 63 6f 75 6e 74 69 6e * we are countin
0c70: 67 20 72 6f 77 73 2e 0a 20 20 2a 2f 0a 20 20 69 g rows.. */. i
0c80: 66 28 20 64 62 2d 3e 66 6c 61 67 73 20 26 20 53 f( db->flags & S
0c90: 51 4c 49 54 45 5f 43 6f 75 6e 74 52 6f 77 73 20 QLITE_CountRows
0ca0: 29 7b 0a 20 20 20 20 73 71 6c 69 74 65 56 64 62 ){. sqliteVdb
0cb0: 65 41 64 64 4f 70 28 76 2c 20 4f 50 5f 49 6e 74 eAddOp(v, OP_Int
0cc0: 65 67 65 72 2c 20 30 2c 20 30 29 3b 0a 20 20 7d eger, 0, 0);. }
0cd0: 0a 0a 20 20 2f 2a 20 53 70 65 63 69 61 6c 20 63 .. /* Special c
0ce0: 61 73 65 3a 20 41 20 44 45 4c 45 54 45 20 77 69 ase: A DELETE wi
0cf0: 74 68 6f 75 74 20 61 20 57 48 45 52 45 20 63 6c thout a WHERE cl
0d00: 61 75 73 65 20 64 65 6c 65 74 65 73 20 65 76 65 ause deletes eve
0d10: 72 79 74 68 69 6e 67 2e 0a 20 20 2a 2a 20 49 74 rything.. ** It
0d20: 20 69 73 20 65 61 73 69 65 72 20 6a 75 73 74 20 is easier just
0d30: 74 6f 20 65 72 61 73 65 20 74 68 65 20 77 68 6f to erase the who
0d40: 6c 65 20 74 61 62 6c 65 2e 0a 20 20 2a 2f 0a 20 le table.. */.
0d50: 20 69 66 28 20 70 57 68 65 72 65 3d 3d 30 20 29 if( pWhere==0 )
0d60: 7b 0a 20 20 20 20 69 66 28 20 64 62 2d 3e 66 6c {. if( db->fl
0d70: 61 67 73 20 26 20 53 51 4c 49 54 45 5f 43 6f 75 ags & SQLITE_Cou
0d80: 6e 74 52 6f 77 73 20 29 7b 0a 20 20 20 20 20 20 ntRows ){.
0d90: 2f 2a 20 49 66 20 63 6f 75 6e 74 69 6e 67 20 72 /* If counting r
0da0: 6f 77 73 20 64 65 6c 65 74 65 64 2c 20 6a 75 73 ows deleted, jus
0db0: 74 20 63 6f 75 6e 74 20 74 68 65 20 74 6f 74 61 t count the tota
0dc0: 6c 20 6e 75 6d 62 65 72 20 6f 66 0a 20 20 20 20 l number of.
0dd0: 20 20 2a 2a 20 65 6e 74 72 69 65 73 20 69 6e 20 ** entries in
0de0: 74 68 65 20 74 61 62 6c 65 2e 20 2a 2f 0a 20 20 the table. */.
0df0: 20 20 20 20 69 6e 74 20 65 6e 64 4f 66 4c 6f 6f int endOfLoo
0e00: 70 20 3d 20 73 71 6c 69 74 65 56 64 62 65 4d 61 p = sqliteVdbeMa
0e10: 6b 65 4c 61 62 65 6c 28 76 29 3b 0a 20 20 20 20 keLabel(v);.
0e20: 20 20 69 6e 74 20 61 64 64 72 3b 0a 20 20 20 20 int addr;.
0e30: 20 20 6f 70 65 6e 4f 70 20 3d 20 70 54 61 62 2d openOp = pTab-
0e40: 3e 69 73 54 65 6d 70 20 3f 20 4f 50 5f 4f 70 65 >isTemp ? OP_Ope
0e50: 6e 41 75 78 20 3a 20 4f 50 5f 4f 70 65 6e 3b 0a nAux : OP_Open;.
0e60: 20 20 20 20 20 20 73 71 6c 69 74 65 56 64 62 65 sqliteVdbe
0e70: 41 64 64 4f 70 28 76 2c 20 6f 70 65 6e 4f 70 2c AddOp(v, openOp,
0e80: 20 30 2c 20 70 54 61 62 2d 3e 74 6e 75 6d 29 3b 0, pTab->tnum);
0e90: 0a 20 20 20 20 20 20 73 71 6c 69 74 65 56 64 62 . sqliteVdb
0ea0: 65 41 64 64 4f 70 28 76 2c 20 4f 50 5f 52 65 77 eAddOp(v, OP_Rew
0eb0: 69 6e 64 2c 20 30 2c 20 73 71 6c 69 74 65 56 64 ind, 0, sqliteVd
0ec0: 62 65 43 75 72 72 65 6e 74 41 64 64 72 28 76 29 beCurrentAddr(v)
0ed0: 2b 32 29 3b 0a 20 20 20 20 20 20 61 64 64 72 20 +2);. addr
0ee0: 3d 20 73 71 6c 69 74 65 56 64 62 65 41 64 64 4f = sqliteVdbeAddO
0ef0: 70 28 76 2c 20 4f 50 5f 41 64 64 49 6d 6d 2c 20 p(v, OP_AddImm,
0f00: 31 2c 20 30 29 3b 0a 20 20 20 20 20 20 73 71 6c 1, 0);. sql
0f10: 69 74 65 56 64 62 65 41 64 64 4f 70 28 76 2c 20 iteVdbeAddOp(v,
0f20: 4f 50 5f 4e 65 78 74 2c 20 30 2c 20 61 64 64 72 OP_Next, 0, addr
0f30: 29 3b 0a 20 20 20 20 20 20 73 71 6c 69 74 65 56 );. sqliteV
0f40: 64 62 65 52 65 73 6f 6c 76 65 4c 61 62 65 6c 28 dbeResolveLabel(
0f50: 76 2c 20 65 6e 64 4f 66 4c 6f 6f 70 29 3b 0a 20 v, endOfLoop);.
0f60: 20 20 20 20 20 73 71 6c 69 74 65 56 64 62 65 41 sqliteVdbeA
0f70: 64 64 4f 70 28 76 2c 20 4f 50 5f 43 6c 6f 73 65 ddOp(v, OP_Close
0f80: 2c 20 30 2c 20 30 29 3b 0a 20 20 20 20 7d 0a 20 , 0, 0);. }.
0f90: 20 20 20 73 71 6c 69 74 65 56 64 62 65 41 64 64 sqliteVdbeAdd
0fa0: 4f 70 28 76 2c 20 4f 50 5f 43 6c 65 61 72 2c 20 Op(v, OP_Clear,
0fb0: 70 54 61 62 2d 3e 74 6e 75 6d 2c 20 70 54 61 62 pTab->tnum, pTab
0fc0: 2d 3e 69 73 54 65 6d 70 29 3b 0a 20 20 20 20 66 ->isTemp);. f
0fd0: 6f 72 28 70 49 64 78 3d 70 54 61 62 2d 3e 70 49 or(pIdx=pTab->pI
0fe0: 6e 64 65 78 3b 20 70 49 64 78 3b 20 70 49 64 78 ndex; pIdx; pIdx
0ff0: 3d 70 49 64 78 2d 3e 70 4e 65 78 74 29 7b 0a 20 =pIdx->pNext){.
1000: 20 20 20 20 20 73 71 6c 69 74 65 56 64 62 65 41 sqliteVdbeA
1010: 64 64 4f 70 28 76 2c 20 4f 50 5f 43 6c 65 61 72 ddOp(v, OP_Clear
1020: 2c 20 70 49 64 78 2d 3e 74 6e 75 6d 2c 20 70 54 , pIdx->tnum, pT
1030: 61 62 2d 3e 69 73 54 65 6d 70 29 3b 0a 20 20 20 ab->isTemp);.
1040: 20 7d 0a 20 20 7d 0a 0a 20 20 2f 2a 20 54 68 65 }. }.. /* The
1050: 20 75 73 75 61 6c 20 63 61 73 65 3a 20 54 68 65 usual case: The
1060: 72 65 20 69 73 20 61 20 57 48 45 52 45 20 63 6c re is a WHERE cl
1070: 61 75 73 65 20 73 6f 20 77 65 20 68 61 76 65 20 ause so we have
1080: 74 6f 20 73 63 61 6e 20 74 68 72 6f 75 67 68 0a to scan through.
1090: 20 20 2a 2a 20 74 68 65 20 74 61 62 6c 65 20 61 ** the table a
10a0: 6e 20 70 69 63 6b 20 77 68 69 63 68 20 72 65 63 n pick which rec
10b0: 6f 72 64 73 20 74 6f 20 64 65 6c 65 74 65 2e 0a ords to delete..
10c0: 20 20 2a 2f 0a 20 20 65 6c 73 65 7b 0a 20 20 20 */. else{.
10d0: 20 2f 2a 20 42 65 67 69 6e 20 74 68 65 20 64 61 /* Begin the da
10e0: 74 61 62 61 73 65 20 73 63 61 6e 0a 20 20 20 20 tabase scan.
10f0: 2a 2f 0a 20 20 20 20 70 57 49 6e 66 6f 20 3d 20 */. pWInfo =
1100: 73 71 6c 69 74 65 57 68 65 72 65 42 65 67 69 6e sqliteWhereBegin
1110: 28 70 50 61 72 73 65 2c 20 70 54 61 62 4c 69 73 (pParse, pTabLis
1120: 74 2c 20 70 57 68 65 72 65 2c 20 31 29 3b 0a 20 t, pWhere, 1);.
1130: 20 20 20 69 66 28 20 70 57 49 6e 66 6f 3d 3d 30 if( pWInfo==0
1140: 20 29 20 67 6f 74 6f 20 64 65 6c 65 74 65 5f 66 ) goto delete_f
1150: 72 6f 6d 5f 63 6c 65 61 6e 75 70 3b 0a 0a 20 20 rom_cleanup;..
1160: 20 20 2f 2a 20 52 65 6d 65 6d 62 65 72 20 74 68 /* Remember th
1170: 65 20 6b 65 79 20 6f 66 20 65 76 65 72 79 20 69 e key of every i
1180: 74 65 6d 20 74 6f 20 62 65 20 64 65 6c 65 74 65 tem to be delete
1190: 64 2e 0a 20 20 20 20 2a 2f 0a 20 20 20 20 73 71 d.. */. sq
11a0: 6c 69 74 65 56 64 62 65 41 64 64 4f 70 28 76 2c liteVdbeAddOp(v,
11b0: 20 4f 50 5f 4c 69 73 74 57 72 69 74 65 2c 20 30 OP_ListWrite, 0
11c0: 2c 20 30 29 3b 0a 20 20 20 20 69 66 28 20 64 62 , 0);. if( db
11d0: 2d 3e 66 6c 61 67 73 20 26 20 53 51 4c 49 54 45 ->flags & SQLITE
11e0: 5f 43 6f 75 6e 74 52 6f 77 73 20 29 7b 0a 20 20 _CountRows ){.
11f0: 20 20 20 20 73 71 6c 69 74 65 56 64 62 65 41 64 sqliteVdbeAd
1200: 64 4f 70 28 76 2c 20 4f 50 5f 41 64 64 49 6d 6d dOp(v, OP_AddImm
1210: 2c 20 31 2c 20 30 29 3b 0a 20 20 20 20 7d 0a 0a , 1, 0);. }..
1220: 20 20 20 20 2f 2a 20 45 6e 64 20 74 68 65 20 64 /* End the d
1230: 61 74 61 62 61 73 65 20 73 63 61 6e 20 6c 6f 6f atabase scan loo
1240: 70 2e 0a 20 20 20 20 2a 2f 0a 20 20 20 20 73 71 p.. */. sq
1250: 6c 69 74 65 57 68 65 72 65 45 6e 64 28 70 57 49 liteWhereEnd(pWI
1260: 6e 66 6f 29 3b 0a 0a 20 20 20 20 2f 2a 20 44 65 nfo);.. /* De
1270: 6c 65 74 65 20 65 76 65 72 79 20 69 74 65 6d 20 lete every item
1280: 77 68 6f 73 65 20 6b 65 79 20 77 61 73 20 77 72 whose key was wr
1290: 69 74 74 65 6e 20 74 6f 20 74 68 65 20 6c 69 73 itten to the lis
12a0: 74 20 64 75 72 69 6e 67 20 74 68 65 0a 20 20 20 t during the.
12b0: 20 2a 2a 20 64 61 74 61 62 61 73 65 20 73 63 61 ** database sca
12c0: 6e 2e 20 20 57 65 20 68 61 76 65 20 74 6f 20 64 n. We have to d
12d0: 65 6c 65 74 65 20 69 74 65 6d 73 20 61 66 74 65 elete items afte
12e0: 72 20 74 68 65 20 73 63 61 6e 20 69 73 20 63 6f r the scan is co
12f0: 6d 70 6c 65 74 65 0a 20 20 20 20 2a 2a 20 62 65 mplete. ** be
1300: 63 61 75 73 65 20 64 65 6c 65 74 69 6e 67 20 61 cause deleting a
1310: 6e 20 69 74 65 6d 20 63 61 6e 20 63 68 61 6e 67 n item can chang
1320: 65 20 74 68 65 20 73 63 61 6e 20 6f 72 64 65 72 e the scan order
1330: 2e 0a 20 20 20 20 2a 2f 0a 20 20 20 20 62 61 73 .. */. bas
1340: 65 20 3d 20 70 50 61 72 73 65 2d 3e 6e 54 61 62 e = pParse->nTab
1350: 3b 0a 20 20 20 20 73 71 6c 69 74 65 56 64 62 65 ;. sqliteVdbe
1360: 41 64 64 4f 70 28 76 2c 20 4f 50 5f 4c 69 73 74 AddOp(v, OP_List
1370: 52 65 77 69 6e 64 2c 20 30 2c 20 30 29 3b 0a 20 Rewind, 0, 0);.
1380: 20 20 20 6f 70 65 6e 4f 70 20 3d 20 70 54 61 62 openOp = pTab
1390: 2d 3e 69 73 54 65 6d 70 20 3f 20 4f 50 5f 4f 70 ->isTemp ? OP_Op
13a0: 65 6e 57 72 41 75 78 20 3a 20 4f 50 5f 4f 70 65 enWrAux : OP_Ope
13b0: 6e 57 72 69 74 65 3b 0a 20 20 20 20 73 71 6c 69 nWrite;. sqli
13c0: 74 65 56 64 62 65 41 64 64 4f 70 28 76 2c 20 6f teVdbeAddOp(v, o
13d0: 70 65 6e 4f 70 2c 20 62 61 73 65 2c 20 70 54 61 penOp, base, pTa
13e0: 62 2d 3e 74 6e 75 6d 29 3b 0a 20 20 20 20 66 6f b->tnum);. fo
13f0: 72 28 69 3d 31 2c 20 70 49 64 78 3d 70 54 61 62 r(i=1, pIdx=pTab
1400: 2d 3e 70 49 6e 64 65 78 3b 20 70 49 64 78 3b 20 ->pIndex; pIdx;
1410: 69 2b 2b 2c 20 70 49 64 78 3d 70 49 64 78 2d 3e i++, pIdx=pIdx->
1420: 70 4e 65 78 74 29 7b 0a 20 20 20 20 20 20 73 71 pNext){. sq
1430: 6c 69 74 65 56 64 62 65 41 64 64 4f 70 28 76 2c liteVdbeAddOp(v,
1440: 20 6f 70 65 6e 4f 70 2c 20 62 61 73 65 2b 69 2c openOp, base+i,
1450: 20 70 49 64 78 2d 3e 74 6e 75 6d 29 3b 0a 20 20 pIdx->tnum);.
1460: 20 20 7d 0a 20 20 20 20 65 6e 64 20 3d 20 73 71 }. end = sq
1470: 6c 69 74 65 56 64 62 65 4d 61 6b 65 4c 61 62 65 liteVdbeMakeLabe
1480: 6c 28 76 29 3b 0a 20 20 20 20 61 64 64 72 20 3d l(v);. addr =
1490: 20 73 71 6c 69 74 65 56 64 62 65 41 64 64 4f 70 sqliteVdbeAddOp
14a0: 28 76 2c 20 4f 50 5f 4c 69 73 74 52 65 61 64 2c (v, OP_ListRead,
14b0: 20 30 2c 20 65 6e 64 29 3b 0a 20 20 20 20 73 71 0, end);. sq
14c0: 6c 69 74 65 47 65 6e 65 72 61 74 65 52 6f 77 44 liteGenerateRowD
14d0: 65 6c 65 74 65 28 76 2c 20 70 54 61 62 2c 20 62 elete(v, pTab, b
14e0: 61 73 65 29 3b 0a 20 20 20 20 73 71 6c 69 74 65 ase);. sqlite
14f0: 56 64 62 65 41 64 64 4f 70 28 76 2c 20 4f 50 5f VdbeAddOp(v, OP_
1500: 47 6f 74 6f 2c 20 30 2c 20 61 64 64 72 29 3b 0a Goto, 0, addr);.
1510: 20 20 20 20 73 71 6c 69 74 65 56 64 62 65 52 65 sqliteVdbeRe
1520: 73 6f 6c 76 65 4c 61 62 65 6c 28 76 2c 20 65 6e solveLabel(v, en
1530: 64 29 3b 0a 20 20 20 20 73 71 6c 69 74 65 56 64 d);. sqliteVd
1540: 62 65 41 64 64 4f 70 28 76 2c 20 4f 50 5f 4c 69 beAddOp(v, OP_Li
1550: 73 74 52 65 73 65 74 2c 20 30 2c 20 30 29 3b 0a stReset, 0, 0);.
1560: 20 20 7d 0a 20 20 69 66 28 20 28 64 62 2d 3e 66 }. if( (db->f
1570: 6c 61 67 73 20 26 20 53 51 4c 49 54 45 5f 49 6e lags & SQLITE_In
1580: 54 72 61 6e 73 29 3d 3d 30 20 29 7b 0a 20 20 20 Trans)==0 ){.
1590: 20 73 71 6c 69 74 65 56 64 62 65 41 64 64 4f 70 sqliteVdbeAddOp
15a0: 28 76 2c 20 4f 50 5f 43 6f 6d 6d 69 74 2c 20 30 (v, OP_Commit, 0
15b0: 2c 20 30 29 3b 0a 20 20 7d 0a 0a 20 20 2f 2a 0a , 0);. }.. /*.
15c0: 20 20 2a 2a 20 52 65 74 75 72 6e 20 74 68 65 20 ** Return the
15d0: 6e 75 6d 62 65 72 20 6f 66 20 72 6f 77 73 20 74 number of rows t
15e0: 68 61 74 20 77 65 72 65 20 64 65 6c 65 74 65 64 hat were deleted
15f0: 2e 0a 20 20 2a 2f 0a 20 20 69 66 28 20 64 62 2d .. */. if( db-
1600: 3e 66 6c 61 67 73 20 26 20 53 51 4c 49 54 45 5f >flags & SQLITE_
1610: 43 6f 75 6e 74 52 6f 77 73 20 29 7b 0a 20 20 20 CountRows ){.
1620: 20 73 71 6c 69 74 65 56 64 62 65 41 64 64 4f 70 sqliteVdbeAddOp
1630: 28 76 2c 20 4f 50 5f 43 6f 6c 75 6d 6e 43 6f 75 (v, OP_ColumnCou
1640: 6e 74 2c 20 31 2c 20 30 29 3b 0a 20 20 20 20 73 nt, 1, 0);. s
1650: 71 6c 69 74 65 56 64 62 65 41 64 64 4f 70 28 76 qliteVdbeAddOp(v
1660: 2c 20 4f 50 5f 43 6f 6c 75 6d 6e 4e 61 6d 65 2c , OP_ColumnName,
1670: 20 30 2c 20 30 29 3b 0a 20 20 20 20 73 71 6c 69 0, 0);. sqli
1680: 74 65 56 64 62 65 43 68 61 6e 67 65 50 33 28 76 teVdbeChangeP3(v
1690: 2c 20 2d 31 2c 20 22 72 6f 77 73 20 64 65 6c 65 , -1, "rows dele
16a0: 74 65 64 22 2c 20 50 33 5f 53 54 41 54 49 43 29 ted", P3_STATIC)
16b0: 3b 0a 20 20 20 20 73 71 6c 69 74 65 56 64 62 65 ;. sqliteVdbe
16c0: 41 64 64 4f 70 28 76 2c 20 4f 50 5f 43 61 6c 6c AddOp(v, OP_Call
16d0: 62 61 63 6b 2c 20 31 2c 20 30 29 3b 0a 20 20 7d back, 1, 0);. }
16e0: 0a 0a 64 65 6c 65 74 65 5f 66 72 6f 6d 5f 63 6c ..delete_from_cl
16f0: 65 61 6e 75 70 3a 0a 20 20 73 71 6c 69 74 65 49 eanup:. sqliteI
1700: 64 4c 69 73 74 44 65 6c 65 74 65 28 70 54 61 62 dListDelete(pTab
1710: 4c 69 73 74 29 3b 0a 20 20 73 71 6c 69 74 65 45 List);. sqliteE
1720: 78 70 72 44 65 6c 65 74 65 28 70 57 68 65 72 65 xprDelete(pWhere
1730: 29 3b 0a 20 20 72 65 74 75 72 6e 3b 0a 7d 0a 0a );. return;.}..
1740: 2f 2a 0a 2a 2a 20 54 68 69 73 20 72 6f 75 74 69 /*.** This routi
1750: 6e 65 20 67 65 6e 65 72 61 74 65 73 20 56 44 42 ne generates VDB
1760: 45 20 63 6f 64 65 20 74 68 61 74 20 63 61 75 73 E code that caus
1770: 65 73 20 61 20 73 69 6e 67 6c 65 20 72 6f 77 20 es a single row
1780: 6f 66 20 61 0a 2a 2a 20 73 69 6e 67 6c 65 20 74 of a.** single t
1790: 61 62 6c 65 20 74 6f 20 62 65 20 64 65 6c 65 74 able to be delet
17a0: 65 64 2e 0a 2a 2a 0a 2a 2a 20 54 68 65 20 56 44 ed..**.** The VD
17b0: 42 45 20 6d 75 73 74 20 62 65 20 69 6e 20 61 20 BE must be in a
17c0: 70 61 72 74 69 63 75 6c 61 72 20 73 74 61 74 65 particular state
17d0: 20 77 68 65 6e 20 74 68 69 73 20 72 6f 75 74 69 when this routi
17e0: 6e 65 20 69 73 20 63 61 6c 6c 65 64 2e 0a 2a 2a ne is called..**
17f0: 20 54 68 65 73 65 20 61 72 65 20 74 68 65 20 72 These are the r
1800: 65 71 75 69 72 65 6d 65 6e 74 73 3a 0a 2a 2a 0a equirements:.**.
1810: 2a 2a 20 20 20 31 2e 20 20 41 20 72 65 61 64 2f ** 1. A read/
1820: 77 72 69 74 65 20 63 75 72 73 6f 72 20 70 6f 69 write cursor poi
1830: 6e 74 69 6e 67 20 74 6f 20 70 54 61 62 2c 20 74 nting to pTab, t
1840: 68 65 20 74 61 62 6c 65 20 63 6f 6e 74 61 69 6e he table contain
1850: 69 6e 67 20 74 68 65 20 72 6f 77 0a 2a 2a 20 20 ing the row.**
1860: 20 20 20 20 20 74 6f 20 62 65 20 64 65 6c 65 74 to be delet
1870: 65 64 2c 20 6d 75 73 74 20 62 65 20 6f 70 65 6e ed, must be open
1880: 65 64 20 61 73 20 63 75 72 73 6f 72 20 6e 75 6d ed as cursor num
1890: 62 65 72 20 22 62 61 73 65 22 2e 0a 2a 2a 0a 2a ber "base"..**.*
18a0: 2a 20 20 20 32 2e 20 20 52 65 61 64 2f 77 72 69 * 2. Read/wri
18b0: 74 65 20 63 75 72 73 6f 72 73 20 66 6f 72 20 61 te cursors for a
18c0: 6c 6c 20 69 6e 64 69 63 65 73 20 6f 66 20 70 54 ll indices of pT
18d0: 61 62 20 6d 75 73 74 20 62 65 20 6f 70 65 6e 20 ab must be open
18e0: 61 73 0a 2a 2a 20 20 20 20 20 20 20 63 75 72 73 as.** curs
18f0: 6f 72 20 6e 75 6d 62 65 72 20 62 61 73 65 2b 69 or number base+i
1900: 20 66 6f 72 20 74 68 65 20 69 2d 74 68 20 69 6e for the i-th in
1910: 64 65 78 2e 0a 2a 2a 0a 2a 2a 20 20 20 33 2e 20 dex..**.** 3.
1920: 20 54 68 65 20 72 65 63 6f 72 64 20 6e 75 6d 62 The record numb
1930: 65 72 20 6f 66 20 74 68 65 20 72 6f 77 20 74 6f er of the row to
1940: 20 62 65 20 64 65 6c 65 74 65 64 20 6d 75 73 74 be deleted must
1950: 20 62 65 20 6f 6e 20 74 68 65 20 74 6f 70 0a 2a be on the top.*
1960: 2a 20 20 20 20 20 20 20 6f 66 20 74 68 65 20 73 * of the s
1970: 74 61 63 6b 2e 0a 2a 2a 0a 2a 2a 20 54 68 69 73 tack..**.** This
1980: 20 72 6f 75 74 69 6e 65 20 70 6f 70 73 20 74 68 routine pops th
1990: 65 20 74 6f 70 20 6f 66 20 74 68 65 20 73 74 61 e top of the sta
19a0: 63 6b 20 74 6f 20 72 65 6d 6f 76 65 20 74 68 65 ck to remove the
19b0: 20 72 65 63 6f 72 64 20 6e 75 6d 62 65 72 0a 2a record number.*
19c0: 2a 20 61 6e 64 20 74 68 65 6e 20 67 65 6e 65 72 * and then gener
19d0: 61 74 65 73 20 63 6f 64 65 20 74 6f 20 72 65 6d ates code to rem
19e0: 6f 76 65 20 62 6f 74 68 20 74 68 65 20 74 61 62 ove both the tab
19f0: 6c 65 20 72 65 63 6f 72 64 20 61 6e 64 20 61 6c le record and al
1a00: 6c 20 69 6e 64 65 78 0a 2a 2a 20 65 6e 74 72 69 l index.** entri
1a10: 65 73 20 74 68 61 74 20 70 6f 69 6e 74 20 74 6f es that point to
1a20: 20 74 68 61 74 20 72 65 63 6f 72 64 2e 0a 2a 2f that record..*/
1a30: 0a 76 6f 69 64 20 73 71 6c 69 74 65 47 65 6e 65 .void sqliteGene
1a40: 72 61 74 65 52 6f 77 44 65 6c 65 74 65 28 0a 20 rateRowDelete(.
1a50: 20 56 64 62 65 20 2a 76 2c 20 20 20 20 20 20 20 Vdbe *v,
1a60: 20 20 20 20 2f 2a 20 47 65 6e 65 72 61 74 65 20 /* Generate
1a70: 63 6f 64 65 20 69 6e 74 6f 20 74 68 69 73 20 56 code into this V
1a80: 44 42 45 20 2a 2f 0a 20 20 54 61 62 6c 65 20 2a DBE */. Table *
1a90: 70 54 61 62 2c 20 20 20 20 20 20 20 2f 2a 20 54 pTab, /* T
1aa0: 61 62 6c 65 20 63 6f 6e 74 61 69 6e 69 6e 67 20 able containing
1ab0: 74 68 65 20 72 6f 77 20 74 6f 20 62 65 20 64 65 the row to be de
1ac0: 6c 65 74 65 64 20 2a 2f 0a 20 20 69 6e 74 20 62 leted */. int b
1ad0: 61 73 65 20 20 20 20 20 20 20 20 20 20 20 2f 2a ase /*
1ae0: 20 43 75 72 73 6f 72 20 6e 75 6d 62 65 72 20 66 Cursor number f
1af0: 6f 72 20 74 68 65 20 74 61 62 6c 65 20 2a 2f 0a or the table */.
1b00: 29 7b 0a 20 20 73 71 6c 69 74 65 56 64 62 65 41 ){. sqliteVdbeA
1b10: 64 64 4f 70 28 76 2c 20 4f 50 5f 4d 6f 76 65 54 ddOp(v, OP_MoveT
1b20: 6f 2c 20 62 61 73 65 2c 20 30 29 3b 0a 20 20 73 o, base, 0);. s
1b30: 71 6c 69 74 65 47 65 6e 65 72 61 74 65 52 6f 77 qliteGenerateRow
1b40: 49 6e 64 65 78 44 65 6c 65 74 65 28 76 2c 20 70 IndexDelete(v, p
1b50: 54 61 62 2c 20 62 61 73 65 2c 20 30 29 3b 0a 20 Tab, base, 0);.
1b60: 20 73 71 6c 69 74 65 56 64 62 65 41 64 64 4f 70 sqliteVdbeAddOp
1b70: 28 76 2c 20 4f 50 5f 44 65 6c 65 74 65 2c 20 62 (v, OP_Delete, b
1b80: 61 73 65 2c 20 30 29 3b 0a 7d 0a 0a 2f 2a 0a 2a ase, 0);.}../*.*
1b90: 2a 20 54 68 69 73 20 72 6f 75 74 69 6e 65 20 67 * This routine g
1ba0: 65 6e 65 72 61 74 65 73 20 56 44 42 45 20 63 6f enerates VDBE co
1bb0: 64 65 20 74 68 61 74 20 63 61 75 73 65 73 20 74 de that causes t
1bc0: 68 65 20 64 65 6c 65 74 69 6f 6e 20 6f 66 20 61 he deletion of a
1bd0: 6c 6c 0a 2a 2a 20 69 6e 64 65 78 20 65 6e 74 72 ll.** index entr
1be0: 69 65 73 20 61 73 73 6f 63 69 61 74 65 64 20 77 ies associated w
1bf0: 69 74 68 20 61 20 73 69 6e 67 6c 65 20 72 6f 77 ith a single row
1c00: 20 6f 66 20 61 20 73 69 6e 67 6c 65 20 74 61 62 of a single tab
1c10: 6c 65 2e 0a 2a 2a 0a 2a 2a 20 54 68 65 20 56 44 le..**.** The VD
1c20: 42 45 20 6d 75 73 74 20 62 65 20 69 6e 20 61 20 BE must be in a
1c30: 70 61 72 74 69 63 75 6c 61 72 20 73 74 61 74 65 particular state
1c40: 20 77 68 65 6e 20 74 68 69 73 20 72 6f 75 74 69 when this routi
1c50: 6e 65 20 69 73 20 63 61 6c 6c 65 64 2e 0a 2a 2a ne is called..**
1c60: 20 54 68 65 73 65 20 61 72 65 20 74 68 65 20 72 These are the r
1c70: 65 71 75 69 72 65 6d 65 6e 74 73 3a 0a 2a 2a 0a equirements:.**.
1c80: 2a 2a 20 20 20 31 2e 20 20 41 20 72 65 61 64 2f ** 1. A read/
1c90: 77 72 69 74 65 20 63 75 72 73 6f 72 20 70 6f 69 write cursor poi
1ca0: 6e 74 69 6e 67 20 74 6f 20 70 54 61 62 2c 20 74 nting to pTab, t
1cb0: 68 65 20 74 61 62 6c 65 20 63 6f 6e 74 61 69 6e he table contain
1cc0: 69 6e 67 20 74 68 65 20 72 6f 77 0a 2a 2a 20 20 ing the row.**
1cd0: 20 20 20 20 20 74 6f 20 62 65 20 64 65 6c 65 74 to be delet
1ce0: 65 64 2c 20 6d 75 73 74 20 62 65 20 6f 70 65 6e ed, must be open
1cf0: 65 64 20 61 73 20 63 75 72 73 6f 72 20 6e 75 6d ed as cursor num
1d00: 62 65 72 20 22 62 61 73 65 22 2e 0a 2a 2a 0a 2a ber "base"..**.*
1d10: 2a 20 20 20 32 2e 20 20 52 65 61 64 2f 77 72 69 * 2. Read/wri
1d20: 74 65 20 63 75 72 73 6f 72 73 20 66 6f 72 20 61 te cursors for a
1d30: 6c 6c 20 69 6e 64 69 63 65 73 20 6f 66 20 70 54 ll indices of pT
1d40: 61 62 20 6d 75 73 74 20 62 65 20 6f 70 65 6e 20 ab must be open
1d50: 61 73 0a 2a 2a 20 20 20 20 20 20 20 63 75 72 73 as.** curs
1d60: 6f 72 20 6e 75 6d 62 65 72 20 62 61 73 65 2b 69 or number base+i
1d70: 20 66 6f 72 20 74 68 65 20 69 2d 74 68 20 69 6e for the i-th in
1d80: 64 65 78 2e 0a 2a 2a 0a 2a 2a 20 20 20 33 2e 20 dex..**.** 3.
1d90: 20 54 68 65 20 22 62 61 73 65 22 20 63 75 72 73 The "base" curs
1da0: 6f 72 20 6d 75 73 74 20 62 65 20 70 6f 69 6e 74 or must be point
1db0: 69 6e 67 20 74 6f 20 74 68 65 20 72 6f 77 20 74 ing to the row t
1dc0: 68 61 74 20 69 73 20 74 6f 20 62 65 0a 2a 2a 20 hat is to be.**
1dd0: 20 20 20 20 20 20 64 65 6c 65 74 65 64 2e 0a 2a deleted..*
1de0: 2f 0a 76 6f 69 64 20 73 71 6c 69 74 65 47 65 6e /.void sqliteGen
1df0: 65 72 61 74 65 52 6f 77 49 6e 64 65 78 44 65 6c erateRowIndexDel
1e00: 65 74 65 28 0a 20 20 56 64 62 65 20 2a 76 2c 20 ete(. Vdbe *v,
1e10: 20 20 20 20 20 20 20 20 20 20 2f 2a 20 47 65 6e /* Gen
1e20: 65 72 61 74 65 20 63 6f 64 65 20 69 6e 74 6f 20 erate code into
1e30: 74 68 69 73 20 56 44 42 45 20 2a 2f 0a 20 20 54 this VDBE */. T
1e40: 61 62 6c 65 20 2a 70 54 61 62 2c 20 20 20 20 20 able *pTab,
1e50: 20 20 2f 2a 20 54 61 62 6c 65 20 63 6f 6e 74 61 /* Table conta
1e60: 69 6e 69 6e 67 20 74 68 65 20 72 6f 77 20 74 6f ining the row to
1e70: 20 62 65 20 64 65 6c 65 74 65 64 20 2a 2f 0a 20 be deleted */.
1e80: 20 69 6e 74 20 62 61 73 65 2c 20 20 20 20 20 20 int base,
1e90: 20 20 20 20 2f 2a 20 43 75 72 73 6f 72 20 6e 75 /* Cursor nu
1ea0: 6d 62 65 72 20 66 6f 72 20 74 68 65 20 74 61 62 mber for the tab
1eb0: 6c 65 20 2a 2f 0a 20 20 63 68 61 72 20 2a 61 49 le */. char *aI
1ec0: 64 78 55 73 65 64 20 20 20 20 20 2f 2a 20 4f 6e dxUsed /* On
1ed0: 6c 79 20 64 65 6c 65 74 65 20 69 66 20 61 49 64 ly delete if aId
1ee0: 78 55 73 65 64 21 3d 30 20 26 26 20 61 49 64 78 xUsed!=0 && aIdx
1ef0: 55 73 65 64 5b 69 5d 21 3d 30 20 2a 2f 0a 29 7b Used[i]!=0 */.){
1f00: 0a 20 20 69 6e 74 20 69 3b 0a 20 20 49 6e 64 65 . int i;. Inde
1f10: 78 20 2a 70 49 64 78 3b 0a 0a 20 20 66 6f 72 28 x *pIdx;.. for(
1f20: 69 3d 31 2c 20 70 49 64 78 3d 70 54 61 62 2d 3e i=1, pIdx=pTab->
1f30: 70 49 6e 64 65 78 3b 20 70 49 64 78 3b 20 69 2b pIndex; pIdx; i+
1f40: 2b 2c 20 70 49 64 78 3d 70 49 64 78 2d 3e 70 4e +, pIdx=pIdx->pN
1f50: 65 78 74 29 7b 0a 20 20 20 20 69 6e 74 20 6a 3b ext){. int j;
1f60: 0a 20 20 20 20 69 66 28 20 61 49 64 78 55 73 65 . if( aIdxUse
1f70: 64 21 3d 30 20 26 26 20 61 49 64 78 55 73 65 64 d!=0 && aIdxUsed
1f80: 5b 69 2d 31 5d 3d 3d 30 20 29 20 63 6f 6e 74 69 [i-1]==0 ) conti
1f90: 6e 75 65 3b 0a 20 20 20 20 73 71 6c 69 74 65 56 nue;. sqliteV
1fa0: 64 62 65 41 64 64 4f 70 28 76 2c 20 4f 50 5f 52 dbeAddOp(v, OP_R
1fb0: 65 63 6e 6f 2c 20 62 61 73 65 2c 20 30 29 3b 0a ecno, base, 0);.
1fc0: 20 20 20 20 66 6f 72 28 6a 3d 30 3b 20 6a 3c 70 for(j=0; j<p
1fd0: 49 64 78 2d 3e 6e 43 6f 6c 75 6d 6e 3b 20 6a 2b Idx->nColumn; j+
1fe0: 2b 29 7b 0a 20 20 20 20 20 20 69 6e 74 20 69 64 +){. int id
1ff0: 78 20 3d 20 70 49 64 78 2d 3e 61 69 43 6f 6c 75 x = pIdx->aiColu
2000: 6d 6e 5b 6a 5d 3b 0a 20 20 20 20 20 20 69 66 28 mn[j];. if(
2010: 20 69 64 78 3d 3d 70 54 61 62 2d 3e 69 50 4b 65 idx==pTab->iPKe
2020: 79 20 29 7b 0a 20 20 20 20 20 20 20 20 73 71 6c y ){. sql
2030: 69 74 65 56 64 62 65 41 64 64 4f 70 28 76 2c 20 iteVdbeAddOp(v,
2040: 4f 50 5f 44 75 70 2c 20 6a 2c 20 30 29 3b 0a 20 OP_Dup, j, 0);.
2050: 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 }else{.
2060: 20 20 20 20 73 71 6c 69 74 65 56 64 62 65 41 64 sqliteVdbeAd
2070: 64 4f 70 28 76 2c 20 4f 50 5f 43 6f 6c 75 6d 6e dOp(v, OP_Column
2080: 2c 20 62 61 73 65 2c 20 69 64 78 29 3b 0a 20 20 , base, idx);.
2090: 20 20 20 20 7d 0a 20 20 20 20 7d 0a 20 20 20 20 }. }.
20a0: 73 71 6c 69 74 65 56 64 62 65 41 64 64 4f 70 28 sqliteVdbeAddOp(
20b0: 76 2c 20 4f 50 5f 4d 61 6b 65 49 64 78 4b 65 79 v, OP_MakeIdxKey
20c0: 2c 20 70 49 64 78 2d 3e 6e 43 6f 6c 75 6d 6e 2c , pIdx->nColumn,
20d0: 20 30 29 3b 0a 20 20 20 20 73 71 6c 69 74 65 56 0);. sqliteV
20e0: 64 62 65 41 64 64 4f 70 28 76 2c 20 4f 50 5f 49 dbeAddOp(v, OP_I
20f0: 64 78 44 65 6c 65 74 65 2c 20 62 61 73 65 2b 69 dxDelete, base+i
2100: 2c 20 30 29 3b 0a 20 20 7d 0a 7d 0a , 0);. }.}.