OLD | NEW |
| (Empty) |
1 /* | |
2 ** 2001 September 15 | |
3 ** | |
4 ** The author disclaims copyright to this source code. In place of | |
5 ** a legal notice, here is a blessing: | |
6 ** | |
7 ** May you do good and not evil. | |
8 ** May you find forgiveness for yourself and forgive others. | |
9 ** May you share freely, never taking more than you give. | |
10 ** | |
11 ************************************************************************* | |
12 ** This file contains C code routines that are called by the parser | |
13 ** in order to generate code for DELETE FROM statements. | |
14 */ | |
15 #include "sqliteInt.h" | |
16 | |
17 /* | |
18 ** While a SrcList can in general represent multiple tables and subqueries | |
19 ** (as in the FROM clause of a SELECT statement) in this case it contains | |
20 ** the name of a single table, as one might find in an INSERT, DELETE, | |
21 ** or UPDATE statement. Look up that table in the symbol table and | |
22 ** return a pointer. Set an error message and return NULL if the table | |
23 ** name is not found or if any other error occurs. | |
24 ** | |
25 ** The following fields are initialized appropriate in pSrc: | |
26 ** | |
27 ** pSrc->a[0].pTab Pointer to the Table object | |
28 ** pSrc->a[0].pIndex Pointer to the INDEXED BY index, if there is one | |
29 ** | |
30 */ | |
31 Table *sqlite3SrcListLookup(Parse *pParse, SrcList *pSrc){ | |
32 struct SrcList_item *pItem = pSrc->a; | |
33 Table *pTab; | |
34 assert( pItem && pSrc->nSrc==1 ); | |
35 pTab = sqlite3LocateTableItem(pParse, 0, pItem); | |
36 sqlite3DeleteTable(pParse->db, pItem->pTab); | |
37 pItem->pTab = pTab; | |
38 if( pTab ){ | |
39 pTab->nRef++; | |
40 } | |
41 if( sqlite3IndexedByLookup(pParse, pItem) ){ | |
42 pTab = 0; | |
43 } | |
44 return pTab; | |
45 } | |
46 | |
47 /* | |
48 ** Check to make sure the given table is writable. If it is not | |
49 ** writable, generate an error message and return 1. If it is | |
50 ** writable return 0; | |
51 */ | |
52 int sqlite3IsReadOnly(Parse *pParse, Table *pTab, int viewOk){ | |
53 /* A table is not writable under the following circumstances: | |
54 ** | |
55 ** 1) It is a virtual table and no implementation of the xUpdate method | |
56 ** has been provided, or | |
57 ** 2) It is a system table (i.e. sqlite_master), this call is not | |
58 ** part of a nested parse and writable_schema pragma has not | |
59 ** been specified. | |
60 ** | |
61 ** In either case leave an error message in pParse and return non-zero. | |
62 */ | |
63 if( ( IsVirtual(pTab) | |
64 && sqlite3GetVTable(pParse->db, pTab)->pMod->pModule->xUpdate==0 ) | |
65 || ( (pTab->tabFlags & TF_Readonly)!=0 | |
66 && (pParse->db->flags & SQLITE_WriteSchema)==0 | |
67 && pParse->nested==0 ) | |
68 ){ | |
69 sqlite3ErrorMsg(pParse, "table %s may not be modified", pTab->zName); | |
70 return 1; | |
71 } | |
72 | |
73 #ifndef SQLITE_OMIT_VIEW | |
74 if( !viewOk && pTab->pSelect ){ | |
75 sqlite3ErrorMsg(pParse,"cannot modify %s because it is a view",pTab->zName); | |
76 return 1; | |
77 } | |
78 #endif | |
79 return 0; | |
80 } | |
81 | |
82 | |
83 #if !defined(SQLITE_OMIT_VIEW) && !defined(SQLITE_OMIT_TRIGGER) | |
84 /* | |
85 ** Evaluate a view and store its result in an ephemeral table. The | |
86 ** pWhere argument is an optional WHERE clause that restricts the | |
87 ** set of rows in the view that are to be added to the ephemeral table. | |
88 */ | |
89 void sqlite3MaterializeView( | |
90 Parse *pParse, /* Parsing context */ | |
91 Table *pView, /* View definition */ | |
92 Expr *pWhere, /* Optional WHERE clause to be added */ | |
93 int iCur /* Cursor number for ephemeral table */ | |
94 ){ | |
95 SelectDest dest; | |
96 Select *pSel; | |
97 SrcList *pFrom; | |
98 sqlite3 *db = pParse->db; | |
99 int iDb = sqlite3SchemaToIndex(db, pView->pSchema); | |
100 pWhere = sqlite3ExprDup(db, pWhere, 0); | |
101 pFrom = sqlite3SrcListAppend(db, 0, 0, 0); | |
102 if( pFrom ){ | |
103 assert( pFrom->nSrc==1 ); | |
104 pFrom->a[0].zName = sqlite3DbStrDup(db, pView->zName); | |
105 pFrom->a[0].zDatabase = sqlite3DbStrDup(db, db->aDb[iDb].zName); | |
106 assert( pFrom->a[0].pOn==0 ); | |
107 assert( pFrom->a[0].pUsing==0 ); | |
108 } | |
109 pSel = sqlite3SelectNew(pParse, 0, pFrom, pWhere, 0, 0, 0, 0, 0, 0); | |
110 sqlite3SelectDestInit(&dest, SRT_EphemTab, iCur); | |
111 sqlite3Select(pParse, pSel, &dest); | |
112 sqlite3SelectDelete(db, pSel); | |
113 } | |
114 #endif /* !defined(SQLITE_OMIT_VIEW) && !defined(SQLITE_OMIT_TRIGGER) */ | |
115 | |
116 #if defined(SQLITE_ENABLE_UPDATE_DELETE_LIMIT) && !defined(SQLITE_OMIT_SUBQUERY) | |
117 /* | |
118 ** Generate an expression tree to implement the WHERE, ORDER BY, | |
119 ** and LIMIT/OFFSET portion of DELETE and UPDATE statements. | |
120 ** | |
121 ** DELETE FROM table_wxyz WHERE a<5 ORDER BY a LIMIT 1; | |
122 ** \__________________________/ | |
123 ** pLimitWhere (pInClause) | |
124 */ | |
125 Expr *sqlite3LimitWhere( | |
126 Parse *pParse, /* The parser context */ | |
127 SrcList *pSrc, /* the FROM clause -- which tables to scan */ | |
128 Expr *pWhere, /* The WHERE clause. May be null */ | |
129 ExprList *pOrderBy, /* The ORDER BY clause. May be null */ | |
130 Expr *pLimit, /* The LIMIT clause. May be null */ | |
131 Expr *pOffset, /* The OFFSET clause. May be null */ | |
132 char *zStmtType /* Either DELETE or UPDATE. For err msgs. */ | |
133 ){ | |
134 Expr *pWhereRowid = NULL; /* WHERE rowid .. */ | |
135 Expr *pInClause = NULL; /* WHERE rowid IN ( select ) */ | |
136 Expr *pSelectRowid = NULL; /* SELECT rowid ... */ | |
137 ExprList *pEList = NULL; /* Expression list contaning only pSelectRowid */ | |
138 SrcList *pSelectSrc = NULL; /* SELECT rowid FROM x ... (dup of pSrc) */ | |
139 Select *pSelect = NULL; /* Complete SELECT tree */ | |
140 | |
141 /* Check that there isn't an ORDER BY without a LIMIT clause. | |
142 */ | |
143 if( pOrderBy && (pLimit == 0) ) { | |
144 sqlite3ErrorMsg(pParse, "ORDER BY without LIMIT on %s", zStmtType); | |
145 goto limit_where_cleanup_2; | |
146 } | |
147 | |
148 /* We only need to generate a select expression if there | |
149 ** is a limit/offset term to enforce. | |
150 */ | |
151 if( pLimit == 0 ) { | |
152 /* if pLimit is null, pOffset will always be null as well. */ | |
153 assert( pOffset == 0 ); | |
154 return pWhere; | |
155 } | |
156 | |
157 /* Generate a select expression tree to enforce the limit/offset | |
158 ** term for the DELETE or UPDATE statement. For example: | |
159 ** DELETE FROM table_a WHERE col1=1 ORDER BY col2 LIMIT 1 OFFSET 1 | |
160 ** becomes: | |
161 ** DELETE FROM table_a WHERE rowid IN ( | |
162 ** SELECT rowid FROM table_a WHERE col1=1 ORDER BY col2 LIMIT 1 OFFSET 1 | |
163 ** ); | |
164 */ | |
165 | |
166 pSelectRowid = sqlite3PExpr(pParse, TK_ROW, 0, 0, 0); | |
167 if( pSelectRowid == 0 ) goto limit_where_cleanup_2; | |
168 pEList = sqlite3ExprListAppend(pParse, 0, pSelectRowid); | |
169 if( pEList == 0 ) goto limit_where_cleanup_2; | |
170 | |
171 /* duplicate the FROM clause as it is needed by both the DELETE/UPDATE tree | |
172 ** and the SELECT subtree. */ | |
173 pSelectSrc = sqlite3SrcListDup(pParse->db, pSrc, 0); | |
174 if( pSelectSrc == 0 ) { | |
175 sqlite3ExprListDelete(pParse->db, pEList); | |
176 goto limit_where_cleanup_2; | |
177 } | |
178 | |
179 /* generate the SELECT expression tree. */ | |
180 pSelect = sqlite3SelectNew(pParse,pEList,pSelectSrc,pWhere,0,0, | |
181 pOrderBy,0,pLimit,pOffset); | |
182 if( pSelect == 0 ) return 0; | |
183 | |
184 /* now generate the new WHERE rowid IN clause for the DELETE/UDPATE */ | |
185 pWhereRowid = sqlite3PExpr(pParse, TK_ROW, 0, 0, 0); | |
186 if( pWhereRowid == 0 ) goto limit_where_cleanup_1; | |
187 pInClause = sqlite3PExpr(pParse, TK_IN, pWhereRowid, 0, 0); | |
188 if( pInClause == 0 ) goto limit_where_cleanup_1; | |
189 | |
190 pInClause->x.pSelect = pSelect; | |
191 pInClause->flags |= EP_xIsSelect; | |
192 sqlite3ExprSetHeight(pParse, pInClause); | |
193 return pInClause; | |
194 | |
195 /* something went wrong. clean up anything allocated. */ | |
196 limit_where_cleanup_1: | |
197 sqlite3SelectDelete(pParse->db, pSelect); | |
198 return 0; | |
199 | |
200 limit_where_cleanup_2: | |
201 sqlite3ExprDelete(pParse->db, pWhere); | |
202 sqlite3ExprListDelete(pParse->db, pOrderBy); | |
203 sqlite3ExprDelete(pParse->db, pLimit); | |
204 sqlite3ExprDelete(pParse->db, pOffset); | |
205 return 0; | |
206 } | |
207 #endif /* defined(SQLITE_ENABLE_UPDATE_DELETE_LIMIT) */ | |
208 /* && !defined(SQLITE_OMIT_SUBQUERY) */ | |
209 | |
210 /* | |
211 ** Generate code for a DELETE FROM statement. | |
212 ** | |
213 ** DELETE FROM table_wxyz WHERE a<5 AND b NOT NULL; | |
214 ** \________/ \________________/ | |
215 ** pTabList pWhere | |
216 */ | |
217 void sqlite3DeleteFrom( | |
218 Parse *pParse, /* The parser context */ | |
219 SrcList *pTabList, /* The table from which we should delete things */ | |
220 Expr *pWhere /* The WHERE clause. May be null */ | |
221 ){ | |
222 Vdbe *v; /* The virtual database engine */ | |
223 Table *pTab; /* The table from which records will be deleted */ | |
224 const char *zDb; /* Name of database holding pTab */ | |
225 int i; /* Loop counter */ | |
226 WhereInfo *pWInfo; /* Information about the WHERE clause */ | |
227 Index *pIdx; /* For looping over indices of the table */ | |
228 int iTabCur; /* Cursor number for the table */ | |
229 int iDataCur; /* VDBE cursor for the canonical data source */ | |
230 int iIdxCur; /* Cursor number of the first index */ | |
231 int nIdx; /* Number of indices */ | |
232 sqlite3 *db; /* Main database structure */ | |
233 AuthContext sContext; /* Authorization context */ | |
234 NameContext sNC; /* Name context to resolve expressions in */ | |
235 int iDb; /* Database number */ | |
236 int memCnt = -1; /* Memory cell used for change counting */ | |
237 int rcauth; /* Value returned by authorization callback */ | |
238 int okOnePass; /* True for one-pass algorithm without the FIFO */ | |
239 int aiCurOnePass[2]; /* The write cursors opened by WHERE_ONEPASS */ | |
240 u8 *aToOpen = 0; /* Open cursor iTabCur+j if aToOpen[j] is true */ | |
241 Index *pPk; /* The PRIMARY KEY index on the table */ | |
242 int iPk = 0; /* First of nPk registers holding PRIMARY KEY value */ | |
243 i16 nPk = 1; /* Number of columns in the PRIMARY KEY */ | |
244 int iKey; /* Memory cell holding key of row to be deleted */ | |
245 i16 nKey; /* Number of memory cells in the row key */ | |
246 int iEphCur = 0; /* Ephemeral table holding all primary key values */ | |
247 int iRowSet = 0; /* Register for rowset of rows to delete */ | |
248 int addrBypass = 0; /* Address of jump over the delete logic */ | |
249 int addrLoop = 0; /* Top of the delete loop */ | |
250 int addrDelete = 0; /* Jump directly to the delete logic */ | |
251 int addrEphOpen = 0; /* Instruction to open the Ephemeral table */ | |
252 | |
253 #ifndef SQLITE_OMIT_TRIGGER | |
254 int isView; /* True if attempting to delete from a view */ | |
255 Trigger *pTrigger; /* List of table triggers, if required */ | |
256 #endif | |
257 | |
258 memset(&sContext, 0, sizeof(sContext)); | |
259 db = pParse->db; | |
260 if( pParse->nErr || db->mallocFailed ){ | |
261 goto delete_from_cleanup; | |
262 } | |
263 assert( pTabList->nSrc==1 ); | |
264 | |
265 /* Locate the table which we want to delete. This table has to be | |
266 ** put in an SrcList structure because some of the subroutines we | |
267 ** will be calling are designed to work with multiple tables and expect | |
268 ** an SrcList* parameter instead of just a Table* parameter. | |
269 */ | |
270 pTab = sqlite3SrcListLookup(pParse, pTabList); | |
271 if( pTab==0 ) goto delete_from_cleanup; | |
272 | |
273 /* Figure out if we have any triggers and if the table being | |
274 ** deleted from is a view | |
275 */ | |
276 #ifndef SQLITE_OMIT_TRIGGER | |
277 pTrigger = sqlite3TriggersExist(pParse, pTab, TK_DELETE, 0, 0); | |
278 isView = pTab->pSelect!=0; | |
279 #else | |
280 # define pTrigger 0 | |
281 # define isView 0 | |
282 #endif | |
283 #ifdef SQLITE_OMIT_VIEW | |
284 # undef isView | |
285 # define isView 0 | |
286 #endif | |
287 | |
288 /* If pTab is really a view, make sure it has been initialized. | |
289 */ | |
290 if( sqlite3ViewGetColumnNames(pParse, pTab) ){ | |
291 goto delete_from_cleanup; | |
292 } | |
293 | |
294 if( sqlite3IsReadOnly(pParse, pTab, (pTrigger?1:0)) ){ | |
295 goto delete_from_cleanup; | |
296 } | |
297 iDb = sqlite3SchemaToIndex(db, pTab->pSchema); | |
298 assert( iDb<db->nDb ); | |
299 zDb = db->aDb[iDb].zName; | |
300 rcauth = sqlite3AuthCheck(pParse, SQLITE_DELETE, pTab->zName, 0, zDb); | |
301 assert( rcauth==SQLITE_OK || rcauth==SQLITE_DENY || rcauth==SQLITE_IGNORE ); | |
302 if( rcauth==SQLITE_DENY ){ | |
303 goto delete_from_cleanup; | |
304 } | |
305 assert(!isView || pTrigger); | |
306 | |
307 /* Assign cursor numbers to the table and all its indices. | |
308 */ | |
309 assert( pTabList->nSrc==1 ); | |
310 iTabCur = pTabList->a[0].iCursor = pParse->nTab++; | |
311 for(nIdx=0, pIdx=pTab->pIndex; pIdx; pIdx=pIdx->pNext, nIdx++){ | |
312 pParse->nTab++; | |
313 } | |
314 | |
315 /* Start the view context | |
316 */ | |
317 if( isView ){ | |
318 sqlite3AuthContextPush(pParse, &sContext, pTab->zName); | |
319 } | |
320 | |
321 /* Begin generating code. | |
322 */ | |
323 v = sqlite3GetVdbe(pParse); | |
324 if( v==0 ){ | |
325 goto delete_from_cleanup; | |
326 } | |
327 if( pParse->nested==0 ) sqlite3VdbeCountChanges(v); | |
328 sqlite3BeginWriteOperation(pParse, 1, iDb); | |
329 | |
330 /* If we are trying to delete from a view, realize that view into | |
331 ** an ephemeral table. | |
332 */ | |
333 #if !defined(SQLITE_OMIT_VIEW) && !defined(SQLITE_OMIT_TRIGGER) | |
334 if( isView ){ | |
335 sqlite3MaterializeView(pParse, pTab, pWhere, iTabCur); | |
336 iDataCur = iIdxCur = iTabCur; | |
337 } | |
338 #endif | |
339 | |
340 /* Resolve the column names in the WHERE clause. | |
341 */ | |
342 memset(&sNC, 0, sizeof(sNC)); | |
343 sNC.pParse = pParse; | |
344 sNC.pSrcList = pTabList; | |
345 if( sqlite3ResolveExprNames(&sNC, pWhere) ){ | |
346 goto delete_from_cleanup; | |
347 } | |
348 | |
349 /* Initialize the counter of the number of rows deleted, if | |
350 ** we are counting rows. | |
351 */ | |
352 if( db->flags & SQLITE_CountRows ){ | |
353 memCnt = ++pParse->nMem; | |
354 sqlite3VdbeAddOp2(v, OP_Integer, 0, memCnt); | |
355 } | |
356 | |
357 #ifndef SQLITE_OMIT_TRUNCATE_OPTIMIZATION | |
358 /* Special case: A DELETE without a WHERE clause deletes everything. | |
359 ** It is easier just to erase the whole table. Prior to version 3.6.5, | |
360 ** this optimization caused the row change count (the value returned by | |
361 ** API function sqlite3_count_changes) to be set incorrectly. */ | |
362 if( rcauth==SQLITE_OK && pWhere==0 && !pTrigger && !IsVirtual(pTab) | |
363 && 0==sqlite3FkRequired(pParse, pTab, 0, 0) | |
364 ){ | |
365 assert( !isView ); | |
366 sqlite3TableLock(pParse, iDb, pTab->tnum, 1, pTab->zName); | |
367 if( HasRowid(pTab) ){ | |
368 sqlite3VdbeAddOp4(v, OP_Clear, pTab->tnum, iDb, memCnt, | |
369 pTab->zName, P4_STATIC); | |
370 } | |
371 for(pIdx=pTab->pIndex; pIdx; pIdx=pIdx->pNext){ | |
372 assert( pIdx->pSchema==pTab->pSchema ); | |
373 sqlite3VdbeAddOp2(v, OP_Clear, pIdx->tnum, iDb); | |
374 } | |
375 }else | |
376 #endif /* SQLITE_OMIT_TRUNCATE_OPTIMIZATION */ | |
377 { | |
378 if( HasRowid(pTab) ){ | |
379 /* For a rowid table, initialize the RowSet to an empty set */ | |
380 pPk = 0; | |
381 nPk = 1; | |
382 iRowSet = ++pParse->nMem; | |
383 sqlite3VdbeAddOp2(v, OP_Null, 0, iRowSet); | |
384 }else{ | |
385 /* For a WITHOUT ROWID table, create an ephemeral table used to | |
386 ** hold all primary keys for rows to be deleted. */ | |
387 pPk = sqlite3PrimaryKeyIndex(pTab); | |
388 assert( pPk!=0 ); | |
389 nPk = pPk->nKeyCol; | |
390 iPk = pParse->nMem+1; | |
391 pParse->nMem += nPk; | |
392 iEphCur = pParse->nTab++; | |
393 addrEphOpen = sqlite3VdbeAddOp2(v, OP_OpenEphemeral, iEphCur, nPk); | |
394 sqlite3VdbeSetP4KeyInfo(pParse, pPk); | |
395 } | |
396 | |
397 /* Construct a query to find the rowid or primary key for every row | |
398 ** to be deleted, based on the WHERE clause. | |
399 */ | |
400 pWInfo = sqlite3WhereBegin(pParse, pTabList, pWhere, 0, 0, | |
401 WHERE_ONEPASS_DESIRED|WHERE_DUPLICATES_OK, | |
402 iTabCur+1); | |
403 if( pWInfo==0 ) goto delete_from_cleanup; | |
404 okOnePass = sqlite3WhereOkOnePass(pWInfo, aiCurOnePass); | |
405 | |
406 /* Keep track of the number of rows to be deleted */ | |
407 if( db->flags & SQLITE_CountRows ){ | |
408 sqlite3VdbeAddOp2(v, OP_AddImm, memCnt, 1); | |
409 } | |
410 | |
411 /* Extract the rowid or primary key for the current row */ | |
412 if( pPk ){ | |
413 for(i=0; i<nPk; i++){ | |
414 sqlite3ExprCodeGetColumnOfTable(v, pTab, iTabCur, | |
415 pPk->aiColumn[i], iPk+i); | |
416 } | |
417 iKey = iPk; | |
418 }else{ | |
419 iKey = pParse->nMem + 1; | |
420 iKey = sqlite3ExprCodeGetColumn(pParse, pTab, -1, iTabCur, iKey, 0); | |
421 if( iKey>pParse->nMem ) pParse->nMem = iKey; | |
422 } | |
423 | |
424 if( okOnePass ){ | |
425 /* For ONEPASS, no need to store the rowid/primary-key. There is only | |
426 ** one, so just keep it in its register(s) and fall through to the | |
427 ** delete code. | |
428 */ | |
429 nKey = nPk; /* OP_Found will use an unpacked key */ | |
430 aToOpen = sqlite3DbMallocRaw(db, nIdx+2); | |
431 if( aToOpen==0 ){ | |
432 sqlite3WhereEnd(pWInfo); | |
433 goto delete_from_cleanup; | |
434 } | |
435 memset(aToOpen, 1, nIdx+1); | |
436 aToOpen[nIdx+1] = 0; | |
437 if( aiCurOnePass[0]>=0 ) aToOpen[aiCurOnePass[0]-iTabCur] = 0; | |
438 if( aiCurOnePass[1]>=0 ) aToOpen[aiCurOnePass[1]-iTabCur] = 0; | |
439 if( addrEphOpen ) sqlite3VdbeChangeToNoop(v, addrEphOpen); | |
440 addrDelete = sqlite3VdbeAddOp0(v, OP_Goto); /* Jump to DELETE logic */ | |
441 }else if( pPk ){ | |
442 /* Construct a composite key for the row to be deleted and remember it */ | |
443 iKey = ++pParse->nMem; | |
444 nKey = 0; /* Zero tells OP_Found to use a composite key */ | |
445 sqlite3VdbeAddOp4(v, OP_MakeRecord, iPk, nPk, iKey, | |
446 sqlite3IndexAffinityStr(v, pPk), nPk); | |
447 sqlite3VdbeAddOp2(v, OP_IdxInsert, iEphCur, iKey); | |
448 }else{ | |
449 /* Get the rowid of the row to be deleted and remember it in the RowSet */ | |
450 nKey = 1; /* OP_Seek always uses a single rowid */ | |
451 sqlite3VdbeAddOp2(v, OP_RowSetAdd, iRowSet, iKey); | |
452 } | |
453 | |
454 /* End of the WHERE loop */ | |
455 sqlite3WhereEnd(pWInfo); | |
456 if( okOnePass ){ | |
457 /* Bypass the delete logic below if the WHERE loop found zero rows */ | |
458 addrBypass = sqlite3VdbeMakeLabel(v); | |
459 sqlite3VdbeAddOp2(v, OP_Goto, 0, addrBypass); | |
460 sqlite3VdbeJumpHere(v, addrDelete); | |
461 } | |
462 | |
463 /* Unless this is a view, open cursors for the table we are | |
464 ** deleting from and all its indices. If this is a view, then the | |
465 ** only effect this statement has is to fire the INSTEAD OF | |
466 ** triggers. | |
467 */ | |
468 if( !isView ){ | |
469 testcase( IsVirtual(pTab) ); | |
470 sqlite3OpenTableAndIndices(pParse, pTab, OP_OpenWrite, iTabCur, aToOpen, | |
471 &iDataCur, &iIdxCur); | |
472 assert( pPk || IsVirtual(pTab) || iDataCur==iTabCur ); | |
473 assert( pPk || IsVirtual(pTab) || iIdxCur==iDataCur+1 ); | |
474 } | |
475 | |
476 /* Set up a loop over the rowids/primary-keys that were found in the | |
477 ** where-clause loop above. | |
478 */ | |
479 if( okOnePass ){ | |
480 /* Just one row. Hence the top-of-loop is a no-op */ | |
481 assert( nKey==nPk ); /* OP_Found will use an unpacked key */ | |
482 assert( !IsVirtual(pTab) ); | |
483 if( aToOpen[iDataCur-iTabCur] ){ | |
484 assert( pPk!=0 || pTab->pSelect!=0 ); | |
485 sqlite3VdbeAddOp4Int(v, OP_NotFound, iDataCur, addrBypass, iKey, nKey); | |
486 VdbeCoverage(v); | |
487 } | |
488 }else if( pPk ){ | |
489 addrLoop = sqlite3VdbeAddOp1(v, OP_Rewind, iEphCur); VdbeCoverage(v); | |
490 sqlite3VdbeAddOp2(v, OP_RowKey, iEphCur, iKey); | |
491 assert( nKey==0 ); /* OP_Found will use a composite key */ | |
492 }else{ | |
493 addrLoop = sqlite3VdbeAddOp3(v, OP_RowSetRead, iRowSet, 0, iKey); | |
494 VdbeCoverage(v); | |
495 assert( nKey==1 ); | |
496 } | |
497 | |
498 /* Delete the row */ | |
499 #ifndef SQLITE_OMIT_VIRTUALTABLE | |
500 if( IsVirtual(pTab) ){ | |
501 const char *pVTab = (const char *)sqlite3GetVTable(db, pTab); | |
502 sqlite3VtabMakeWritable(pParse, pTab); | |
503 sqlite3VdbeAddOp4(v, OP_VUpdate, 0, 1, iKey, pVTab, P4_VTAB); | |
504 sqlite3VdbeChangeP5(v, OE_Abort); | |
505 sqlite3MayAbort(pParse); | |
506 }else | |
507 #endif | |
508 { | |
509 int count = (pParse->nested==0); /* True to count changes */ | |
510 sqlite3GenerateRowDelete(pParse, pTab, pTrigger, iDataCur, iIdxCur, | |
511 iKey, nKey, count, OE_Default, okOnePass); | |
512 } | |
513 | |
514 /* End of the loop over all rowids/primary-keys. */ | |
515 if( okOnePass ){ | |
516 sqlite3VdbeResolveLabel(v, addrBypass); | |
517 }else if( pPk ){ | |
518 sqlite3VdbeAddOp2(v, OP_Next, iEphCur, addrLoop+1); VdbeCoverage(v); | |
519 sqlite3VdbeJumpHere(v, addrLoop); | |
520 }else{ | |
521 sqlite3VdbeAddOp2(v, OP_Goto, 0, addrLoop); | |
522 sqlite3VdbeJumpHere(v, addrLoop); | |
523 } | |
524 | |
525 /* Close the cursors open on the table and its indexes. */ | |
526 if( !isView && !IsVirtual(pTab) ){ | |
527 if( !pPk ) sqlite3VdbeAddOp1(v, OP_Close, iDataCur); | |
528 for(i=0, pIdx=pTab->pIndex; pIdx; i++, pIdx=pIdx->pNext){ | |
529 sqlite3VdbeAddOp1(v, OP_Close, iIdxCur + i); | |
530 } | |
531 } | |
532 } /* End non-truncate path */ | |
533 | |
534 /* Update the sqlite_sequence table by storing the content of the | |
535 ** maximum rowid counter values recorded while inserting into | |
536 ** autoincrement tables. | |
537 */ | |
538 if( pParse->nested==0 && pParse->pTriggerTab==0 ){ | |
539 sqlite3AutoincrementEnd(pParse); | |
540 } | |
541 | |
542 /* Return the number of rows that were deleted. If this routine is | |
543 ** generating code because of a call to sqlite3NestedParse(), do not | |
544 ** invoke the callback function. | |
545 */ | |
546 if( (db->flags&SQLITE_CountRows) && !pParse->nested && !pParse->pTriggerTab ){ | |
547 sqlite3VdbeAddOp2(v, OP_ResultRow, memCnt, 1); | |
548 sqlite3VdbeSetNumCols(v, 1); | |
549 sqlite3VdbeSetColName(v, 0, COLNAME_NAME, "rows deleted", SQLITE_STATIC); | |
550 } | |
551 | |
552 delete_from_cleanup: | |
553 sqlite3AuthContextPop(&sContext); | |
554 sqlite3SrcListDelete(db, pTabList); | |
555 sqlite3ExprDelete(db, pWhere); | |
556 sqlite3DbFree(db, aToOpen); | |
557 return; | |
558 } | |
559 /* Make sure "isView" and other macros defined above are undefined. Otherwise | |
560 ** they may interfere with compilation of other functions in this file | |
561 ** (or in another file, if this file becomes part of the amalgamation). */ | |
562 #ifdef isView | |
563 #undef isView | |
564 #endif | |
565 #ifdef pTrigger | |
566 #undef pTrigger | |
567 #endif | |
568 | |
569 /* | |
570 ** This routine generates VDBE code that causes a single row of a | |
571 ** single table to be deleted. Both the original table entry and | |
572 ** all indices are removed. | |
573 ** | |
574 ** Preconditions: | |
575 ** | |
576 ** 1. iDataCur is an open cursor on the btree that is the canonical data | |
577 ** store for the table. (This will be either the table itself, | |
578 ** in the case of a rowid table, or the PRIMARY KEY index in the case | |
579 ** of a WITHOUT ROWID table.) | |
580 ** | |
581 ** 2. Read/write cursors for all indices of pTab must be open as | |
582 ** cursor number iIdxCur+i for the i-th index. | |
583 ** | |
584 ** 3. The primary key for the row to be deleted must be stored in a | |
585 ** sequence of nPk memory cells starting at iPk. If nPk==0 that means | |
586 ** that a search record formed from OP_MakeRecord is contained in the | |
587 ** single memory location iPk. | |
588 */ | |
589 void sqlite3GenerateRowDelete( | |
590 Parse *pParse, /* Parsing context */ | |
591 Table *pTab, /* Table containing the row to be deleted */ | |
592 Trigger *pTrigger, /* List of triggers to (potentially) fire */ | |
593 int iDataCur, /* Cursor from which column data is extracted */ | |
594 int iIdxCur, /* First index cursor */ | |
595 int iPk, /* First memory cell containing the PRIMARY KEY */ | |
596 i16 nPk, /* Number of PRIMARY KEY memory cells */ | |
597 u8 count, /* If non-zero, increment the row change counter */ | |
598 u8 onconf, /* Default ON CONFLICT policy for triggers */ | |
599 u8 bNoSeek /* iDataCur is already pointing to the row to delete */ | |
600 ){ | |
601 Vdbe *v = pParse->pVdbe; /* Vdbe */ | |
602 int iOld = 0; /* First register in OLD.* array */ | |
603 int iLabel; /* Label resolved to end of generated code */ | |
604 u8 opSeek; /* Seek opcode */ | |
605 | |
606 /* Vdbe is guaranteed to have been allocated by this stage. */ | |
607 assert( v ); | |
608 VdbeModuleComment((v, "BEGIN: GenRowDel(%d,%d,%d,%d)", | |
609 iDataCur, iIdxCur, iPk, (int)nPk)); | |
610 | |
611 /* Seek cursor iCur to the row to delete. If this row no longer exists | |
612 ** (this can happen if a trigger program has already deleted it), do | |
613 ** not attempt to delete it or fire any DELETE triggers. */ | |
614 iLabel = sqlite3VdbeMakeLabel(v); | |
615 opSeek = HasRowid(pTab) ? OP_NotExists : OP_NotFound; | |
616 if( !bNoSeek ){ | |
617 sqlite3VdbeAddOp4Int(v, opSeek, iDataCur, iLabel, iPk, nPk); | |
618 VdbeCoverageIf(v, opSeek==OP_NotExists); | |
619 VdbeCoverageIf(v, opSeek==OP_NotFound); | |
620 } | |
621 | |
622 /* If there are any triggers to fire, allocate a range of registers to | |
623 ** use for the old.* references in the triggers. */ | |
624 if( sqlite3FkRequired(pParse, pTab, 0, 0) || pTrigger ){ | |
625 u32 mask; /* Mask of OLD.* columns in use */ | |
626 int iCol; /* Iterator used while populating OLD.* */ | |
627 int addrStart; /* Start of BEFORE trigger programs */ | |
628 | |
629 /* TODO: Could use temporary registers here. Also could attempt to | |
630 ** avoid copying the contents of the rowid register. */ | |
631 mask = sqlite3TriggerColmask( | |
632 pParse, pTrigger, 0, 0, TRIGGER_BEFORE|TRIGGER_AFTER, pTab, onconf | |
633 ); | |
634 mask |= sqlite3FkOldmask(pParse, pTab); | |
635 iOld = pParse->nMem+1; | |
636 pParse->nMem += (1 + pTab->nCol); | |
637 | |
638 /* Populate the OLD.* pseudo-table register array. These values will be | |
639 ** used by any BEFORE and AFTER triggers that exist. */ | |
640 sqlite3VdbeAddOp2(v, OP_Copy, iPk, iOld); | |
641 for(iCol=0; iCol<pTab->nCol; iCol++){ | |
642 testcase( mask!=0xffffffff && iCol==31 ); | |
643 testcase( mask!=0xffffffff && iCol==32 ); | |
644 if( mask==0xffffffff || (iCol<=31 && (mask & MASKBIT32(iCol))!=0) ){ | |
645 sqlite3ExprCodeGetColumnOfTable(v, pTab, iDataCur, iCol, iOld+iCol+1); | |
646 } | |
647 } | |
648 | |
649 /* Invoke BEFORE DELETE trigger programs. */ | |
650 addrStart = sqlite3VdbeCurrentAddr(v); | |
651 sqlite3CodeRowTrigger(pParse, pTrigger, | |
652 TK_DELETE, 0, TRIGGER_BEFORE, pTab, iOld, onconf, iLabel | |
653 ); | |
654 | |
655 /* If any BEFORE triggers were coded, then seek the cursor to the | |
656 ** row to be deleted again. It may be that the BEFORE triggers moved | |
657 ** the cursor or of already deleted the row that the cursor was | |
658 ** pointing to. | |
659 */ | |
660 if( addrStart<sqlite3VdbeCurrentAddr(v) ){ | |
661 sqlite3VdbeAddOp4Int(v, opSeek, iDataCur, iLabel, iPk, nPk); | |
662 VdbeCoverageIf(v, opSeek==OP_NotExists); | |
663 VdbeCoverageIf(v, opSeek==OP_NotFound); | |
664 } | |
665 | |
666 /* Do FK processing. This call checks that any FK constraints that | |
667 ** refer to this table (i.e. constraints attached to other tables) | |
668 ** are not violated by deleting this row. */ | |
669 sqlite3FkCheck(pParse, pTab, iOld, 0, 0, 0); | |
670 } | |
671 | |
672 /* Delete the index and table entries. Skip this step if pTab is really | |
673 ** a view (in which case the only effect of the DELETE statement is to | |
674 ** fire the INSTEAD OF triggers). */ | |
675 if( pTab->pSelect==0 ){ | |
676 sqlite3GenerateRowIndexDelete(pParse, pTab, iDataCur, iIdxCur, 0); | |
677 sqlite3VdbeAddOp2(v, OP_Delete, iDataCur, (count?OPFLAG_NCHANGE:0)); | |
678 if( count ){ | |
679 sqlite3VdbeChangeP4(v, -1, pTab->zName, P4_TRANSIENT); | |
680 } | |
681 } | |
682 | |
683 /* Do any ON CASCADE, SET NULL or SET DEFAULT operations required to | |
684 ** handle rows (possibly in other tables) that refer via a foreign key | |
685 ** to the row just deleted. */ | |
686 sqlite3FkActions(pParse, pTab, 0, iOld, 0, 0); | |
687 | |
688 /* Invoke AFTER DELETE trigger programs. */ | |
689 sqlite3CodeRowTrigger(pParse, pTrigger, | |
690 TK_DELETE, 0, TRIGGER_AFTER, pTab, iOld, onconf, iLabel | |
691 ); | |
692 | |
693 /* Jump here if the row had already been deleted before any BEFORE | |
694 ** trigger programs were invoked. Or if a trigger program throws a | |
695 ** RAISE(IGNORE) exception. */ | |
696 sqlite3VdbeResolveLabel(v, iLabel); | |
697 VdbeModuleComment((v, "END: GenRowDel()")); | |
698 } | |
699 | |
700 /* | |
701 ** This routine generates VDBE code that causes the deletion of all | |
702 ** index entries associated with a single row of a single table, pTab | |
703 ** | |
704 ** Preconditions: | |
705 ** | |
706 ** 1. A read/write cursor "iDataCur" must be open on the canonical storage | |
707 ** btree for the table pTab. (This will be either the table itself | |
708 ** for rowid tables or to the primary key index for WITHOUT ROWID | |
709 ** tables.) | |
710 ** | |
711 ** 2. Read/write cursors for all indices of pTab must be open as | |
712 ** cursor number iIdxCur+i for the i-th index. (The pTab->pIndex | |
713 ** index is the 0-th index.) | |
714 ** | |
715 ** 3. The "iDataCur" cursor must be already be positioned on the row | |
716 ** that is to be deleted. | |
717 */ | |
718 void sqlite3GenerateRowIndexDelete( | |
719 Parse *pParse, /* Parsing and code generating context */ | |
720 Table *pTab, /* Table containing the row to be deleted */ | |
721 int iDataCur, /* Cursor of table holding data. */ | |
722 int iIdxCur, /* First index cursor */ | |
723 int *aRegIdx /* Only delete if aRegIdx!=0 && aRegIdx[i]>0 */ | |
724 ){ | |
725 int i; /* Index loop counter */ | |
726 int r1 = -1; /* Register holding an index key */ | |
727 int iPartIdxLabel; /* Jump destination for skipping partial index entries */ | |
728 Index *pIdx; /* Current index */ | |
729 Index *pPrior = 0; /* Prior index */ | |
730 Vdbe *v; /* The prepared statement under construction */ | |
731 Index *pPk; /* PRIMARY KEY index, or NULL for rowid tables */ | |
732 | |
733 v = pParse->pVdbe; | |
734 pPk = HasRowid(pTab) ? 0 : sqlite3PrimaryKeyIndex(pTab); | |
735 for(i=0, pIdx=pTab->pIndex; pIdx; i++, pIdx=pIdx->pNext){ | |
736 assert( iIdxCur+i!=iDataCur || pPk==pIdx ); | |
737 if( aRegIdx!=0 && aRegIdx[i]==0 ) continue; | |
738 if( pIdx==pPk ) continue; | |
739 VdbeModuleComment((v, "GenRowIdxDel for %s", pIdx->zName)); | |
740 r1 = sqlite3GenerateIndexKey(pParse, pIdx, iDataCur, 0, 1, | |
741 &iPartIdxLabel, pPrior, r1); | |
742 sqlite3VdbeAddOp3(v, OP_IdxDelete, iIdxCur+i, r1, | |
743 pIdx->uniqNotNull ? pIdx->nKeyCol : pIdx->nColumn); | |
744 sqlite3ResolvePartIdxLabel(pParse, iPartIdxLabel); | |
745 pPrior = pIdx; | |
746 } | |
747 } | |
748 | |
749 /* | |
750 ** Generate code that will assemble an index key and stores it in register | |
751 ** regOut. The key with be for index pIdx which is an index on pTab. | |
752 ** iCur is the index of a cursor open on the pTab table and pointing to | |
753 ** the entry that needs indexing. If pTab is a WITHOUT ROWID table, then | |
754 ** iCur must be the cursor of the PRIMARY KEY index. | |
755 ** | |
756 ** Return a register number which is the first in a block of | |
757 ** registers that holds the elements of the index key. The | |
758 ** block of registers has already been deallocated by the time | |
759 ** this routine returns. | |
760 ** | |
761 ** If *piPartIdxLabel is not NULL, fill it in with a label and jump | |
762 ** to that label if pIdx is a partial index that should be skipped. | |
763 ** The label should be resolved using sqlite3ResolvePartIdxLabel(). | |
764 ** A partial index should be skipped if its WHERE clause evaluates | |
765 ** to false or null. If pIdx is not a partial index, *piPartIdxLabel | |
766 ** will be set to zero which is an empty label that is ignored by | |
767 ** sqlite3ResolvePartIdxLabel(). | |
768 ** | |
769 ** The pPrior and regPrior parameters are used to implement a cache to | |
770 ** avoid unnecessary register loads. If pPrior is not NULL, then it is | |
771 ** a pointer to a different index for which an index key has just been | |
772 ** computed into register regPrior. If the current pIdx index is generating | |
773 ** its key into the same sequence of registers and if pPrior and pIdx share | |
774 ** a column in common, then the register corresponding to that column already | |
775 ** holds the correct value and the loading of that register is skipped. | |
776 ** This optimization is helpful when doing a DELETE or an INTEGRITY_CHECK | |
777 ** on a table with multiple indices, and especially with the ROWID or | |
778 ** PRIMARY KEY columns of the index. | |
779 */ | |
780 int sqlite3GenerateIndexKey( | |
781 Parse *pParse, /* Parsing context */ | |
782 Index *pIdx, /* The index for which to generate a key */ | |
783 int iDataCur, /* Cursor number from which to take column data */ | |
784 int regOut, /* Put the new key into this register if not 0 */ | |
785 int prefixOnly, /* Compute only a unique prefix of the key */ | |
786 int *piPartIdxLabel, /* OUT: Jump to this label to skip partial index */ | |
787 Index *pPrior, /* Previously generated index key */ | |
788 int regPrior /* Register holding previous generated key */ | |
789 ){ | |
790 Vdbe *v = pParse->pVdbe; | |
791 int j; | |
792 Table *pTab = pIdx->pTable; | |
793 int regBase; | |
794 int nCol; | |
795 | |
796 if( piPartIdxLabel ){ | |
797 if( pIdx->pPartIdxWhere ){ | |
798 *piPartIdxLabel = sqlite3VdbeMakeLabel(v); | |
799 pParse->iPartIdxTab = iDataCur; | |
800 sqlite3ExprCachePush(pParse); | |
801 sqlite3ExprIfFalse(pParse, pIdx->pPartIdxWhere, *piPartIdxLabel, | |
802 SQLITE_JUMPIFNULL); | |
803 }else{ | |
804 *piPartIdxLabel = 0; | |
805 } | |
806 } | |
807 nCol = (prefixOnly && pIdx->uniqNotNull) ? pIdx->nKeyCol : pIdx->nColumn; | |
808 regBase = sqlite3GetTempRange(pParse, nCol); | |
809 if( pPrior && (regBase!=regPrior || pPrior->pPartIdxWhere) ) pPrior = 0; | |
810 for(j=0; j<nCol; j++){ | |
811 if( pPrior && pPrior->aiColumn[j]==pIdx->aiColumn[j] ) continue; | |
812 sqlite3ExprCodeGetColumnOfTable(v, pTab, iDataCur, pIdx->aiColumn[j], | |
813 regBase+j); | |
814 /* If the column affinity is REAL but the number is an integer, then it | |
815 ** might be stored in the table as an integer (using a compact | |
816 ** representation) then converted to REAL by an OP_RealAffinity opcode. | |
817 ** But we are getting ready to store this value back into an index, where | |
818 ** it should be converted by to INTEGER again. So omit the OP_RealAffinity | |
819 ** opcode if it is present */ | |
820 sqlite3VdbeDeletePriorOpcode(v, OP_RealAffinity); | |
821 } | |
822 if( regOut ){ | |
823 sqlite3VdbeAddOp3(v, OP_MakeRecord, regBase, nCol, regOut); | |
824 } | |
825 sqlite3ReleaseTempRange(pParse, regBase, nCol); | |
826 return regBase; | |
827 } | |
828 | |
829 /* | |
830 ** If a prior call to sqlite3GenerateIndexKey() generated a jump-over label | |
831 ** because it was a partial index, then this routine should be called to | |
832 ** resolve that label. | |
833 */ | |
834 void sqlite3ResolvePartIdxLabel(Parse *pParse, int iLabel){ | |
835 if( iLabel ){ | |
836 sqlite3VdbeResolveLabel(pParse->pVdbe, iLabel); | |
837 sqlite3ExprCachePop(pParse); | |
838 } | |
839 } | |
OLD | NEW |