Index: third_party/sqlite/sqlite-src-3080704/src/delete.c |
diff --git a/third_party/sqlite/sqlite-src-3080704/src/delete.c b/third_party/sqlite/sqlite-src-3080704/src/delete.c |
new file mode 100644 |
index 0000000000000000000000000000000000000000..d81dd3f6b48d8eab35a073dcceedbd8b1555550a |
--- /dev/null |
+++ b/third_party/sqlite/sqlite-src-3080704/src/delete.c |
@@ -0,0 +1,839 @@ |
+/* |
+** 2001 September 15 |
+** |
+** The author disclaims copyright to this source code. In place of |
+** a legal notice, here is a blessing: |
+** |
+** May you do good and not evil. |
+** May you find forgiveness for yourself and forgive others. |
+** May you share freely, never taking more than you give. |
+** |
+************************************************************************* |
+** This file contains C code routines that are called by the parser |
+** in order to generate code for DELETE FROM statements. |
+*/ |
+#include "sqliteInt.h" |
+ |
+/* |
+** While a SrcList can in general represent multiple tables and subqueries |
+** (as in the FROM clause of a SELECT statement) in this case it contains |
+** the name of a single table, as one might find in an INSERT, DELETE, |
+** or UPDATE statement. Look up that table in the symbol table and |
+** return a pointer. Set an error message and return NULL if the table |
+** name is not found or if any other error occurs. |
+** |
+** The following fields are initialized appropriate in pSrc: |
+** |
+** pSrc->a[0].pTab Pointer to the Table object |
+** pSrc->a[0].pIndex Pointer to the INDEXED BY index, if there is one |
+** |
+*/ |
+Table *sqlite3SrcListLookup(Parse *pParse, SrcList *pSrc){ |
+ struct SrcList_item *pItem = pSrc->a; |
+ Table *pTab; |
+ assert( pItem && pSrc->nSrc==1 ); |
+ pTab = sqlite3LocateTableItem(pParse, 0, pItem); |
+ sqlite3DeleteTable(pParse->db, pItem->pTab); |
+ pItem->pTab = pTab; |
+ if( pTab ){ |
+ pTab->nRef++; |
+ } |
+ if( sqlite3IndexedByLookup(pParse, pItem) ){ |
+ pTab = 0; |
+ } |
+ return pTab; |
+} |
+ |
+/* |
+** Check to make sure the given table is writable. If it is not |
+** writable, generate an error message and return 1. If it is |
+** writable return 0; |
+*/ |
+int sqlite3IsReadOnly(Parse *pParse, Table *pTab, int viewOk){ |
+ /* A table is not writable under the following circumstances: |
+ ** |
+ ** 1) It is a virtual table and no implementation of the xUpdate method |
+ ** has been provided, or |
+ ** 2) It is a system table (i.e. sqlite_master), this call is not |
+ ** part of a nested parse and writable_schema pragma has not |
+ ** been specified. |
+ ** |
+ ** In either case leave an error message in pParse and return non-zero. |
+ */ |
+ if( ( IsVirtual(pTab) |
+ && sqlite3GetVTable(pParse->db, pTab)->pMod->pModule->xUpdate==0 ) |
+ || ( (pTab->tabFlags & TF_Readonly)!=0 |
+ && (pParse->db->flags & SQLITE_WriteSchema)==0 |
+ && pParse->nested==0 ) |
+ ){ |
+ sqlite3ErrorMsg(pParse, "table %s may not be modified", pTab->zName); |
+ return 1; |
+ } |
+ |
+#ifndef SQLITE_OMIT_VIEW |
+ if( !viewOk && pTab->pSelect ){ |
+ sqlite3ErrorMsg(pParse,"cannot modify %s because it is a view",pTab->zName); |
+ return 1; |
+ } |
+#endif |
+ return 0; |
+} |
+ |
+ |
+#if !defined(SQLITE_OMIT_VIEW) && !defined(SQLITE_OMIT_TRIGGER) |
+/* |
+** Evaluate a view and store its result in an ephemeral table. The |
+** pWhere argument is an optional WHERE clause that restricts the |
+** set of rows in the view that are to be added to the ephemeral table. |
+*/ |
+void sqlite3MaterializeView( |
+ Parse *pParse, /* Parsing context */ |
+ Table *pView, /* View definition */ |
+ Expr *pWhere, /* Optional WHERE clause to be added */ |
+ int iCur /* Cursor number for ephemeral table */ |
+){ |
+ SelectDest dest; |
+ Select *pSel; |
+ SrcList *pFrom; |
+ sqlite3 *db = pParse->db; |
+ int iDb = sqlite3SchemaToIndex(db, pView->pSchema); |
+ pWhere = sqlite3ExprDup(db, pWhere, 0); |
+ pFrom = sqlite3SrcListAppend(db, 0, 0, 0); |
+ if( pFrom ){ |
+ assert( pFrom->nSrc==1 ); |
+ pFrom->a[0].zName = sqlite3DbStrDup(db, pView->zName); |
+ pFrom->a[0].zDatabase = sqlite3DbStrDup(db, db->aDb[iDb].zName); |
+ assert( pFrom->a[0].pOn==0 ); |
+ assert( pFrom->a[0].pUsing==0 ); |
+ } |
+ pSel = sqlite3SelectNew(pParse, 0, pFrom, pWhere, 0, 0, 0, 0, 0, 0); |
+ sqlite3SelectDestInit(&dest, SRT_EphemTab, iCur); |
+ sqlite3Select(pParse, pSel, &dest); |
+ sqlite3SelectDelete(db, pSel); |
+} |
+#endif /* !defined(SQLITE_OMIT_VIEW) && !defined(SQLITE_OMIT_TRIGGER) */ |
+ |
+#if defined(SQLITE_ENABLE_UPDATE_DELETE_LIMIT) && !defined(SQLITE_OMIT_SUBQUERY) |
+/* |
+** Generate an expression tree to implement the WHERE, ORDER BY, |
+** and LIMIT/OFFSET portion of DELETE and UPDATE statements. |
+** |
+** DELETE FROM table_wxyz WHERE a<5 ORDER BY a LIMIT 1; |
+** \__________________________/ |
+** pLimitWhere (pInClause) |
+*/ |
+Expr *sqlite3LimitWhere( |
+ Parse *pParse, /* The parser context */ |
+ SrcList *pSrc, /* the FROM clause -- which tables to scan */ |
+ Expr *pWhere, /* The WHERE clause. May be null */ |
+ ExprList *pOrderBy, /* The ORDER BY clause. May be null */ |
+ Expr *pLimit, /* The LIMIT clause. May be null */ |
+ Expr *pOffset, /* The OFFSET clause. May be null */ |
+ char *zStmtType /* Either DELETE or UPDATE. For err msgs. */ |
+){ |
+ Expr *pWhereRowid = NULL; /* WHERE rowid .. */ |
+ Expr *pInClause = NULL; /* WHERE rowid IN ( select ) */ |
+ Expr *pSelectRowid = NULL; /* SELECT rowid ... */ |
+ ExprList *pEList = NULL; /* Expression list contaning only pSelectRowid */ |
+ SrcList *pSelectSrc = NULL; /* SELECT rowid FROM x ... (dup of pSrc) */ |
+ Select *pSelect = NULL; /* Complete SELECT tree */ |
+ |
+ /* Check that there isn't an ORDER BY without a LIMIT clause. |
+ */ |
+ if( pOrderBy && (pLimit == 0) ) { |
+ sqlite3ErrorMsg(pParse, "ORDER BY without LIMIT on %s", zStmtType); |
+ goto limit_where_cleanup_2; |
+ } |
+ |
+ /* We only need to generate a select expression if there |
+ ** is a limit/offset term to enforce. |
+ */ |
+ if( pLimit == 0 ) { |
+ /* if pLimit is null, pOffset will always be null as well. */ |
+ assert( pOffset == 0 ); |
+ return pWhere; |
+ } |
+ |
+ /* Generate a select expression tree to enforce the limit/offset |
+ ** term for the DELETE or UPDATE statement. For example: |
+ ** DELETE FROM table_a WHERE col1=1 ORDER BY col2 LIMIT 1 OFFSET 1 |
+ ** becomes: |
+ ** DELETE FROM table_a WHERE rowid IN ( |
+ ** SELECT rowid FROM table_a WHERE col1=1 ORDER BY col2 LIMIT 1 OFFSET 1 |
+ ** ); |
+ */ |
+ |
+ pSelectRowid = sqlite3PExpr(pParse, TK_ROW, 0, 0, 0); |
+ if( pSelectRowid == 0 ) goto limit_where_cleanup_2; |
+ pEList = sqlite3ExprListAppend(pParse, 0, pSelectRowid); |
+ if( pEList == 0 ) goto limit_where_cleanup_2; |
+ |
+ /* duplicate the FROM clause as it is needed by both the DELETE/UPDATE tree |
+ ** and the SELECT subtree. */ |
+ pSelectSrc = sqlite3SrcListDup(pParse->db, pSrc, 0); |
+ if( pSelectSrc == 0 ) { |
+ sqlite3ExprListDelete(pParse->db, pEList); |
+ goto limit_where_cleanup_2; |
+ } |
+ |
+ /* generate the SELECT expression tree. */ |
+ pSelect = sqlite3SelectNew(pParse,pEList,pSelectSrc,pWhere,0,0, |
+ pOrderBy,0,pLimit,pOffset); |
+ if( pSelect == 0 ) return 0; |
+ |
+ /* now generate the new WHERE rowid IN clause for the DELETE/UDPATE */ |
+ pWhereRowid = sqlite3PExpr(pParse, TK_ROW, 0, 0, 0); |
+ if( pWhereRowid == 0 ) goto limit_where_cleanup_1; |
+ pInClause = sqlite3PExpr(pParse, TK_IN, pWhereRowid, 0, 0); |
+ if( pInClause == 0 ) goto limit_where_cleanup_1; |
+ |
+ pInClause->x.pSelect = pSelect; |
+ pInClause->flags |= EP_xIsSelect; |
+ sqlite3ExprSetHeight(pParse, pInClause); |
+ return pInClause; |
+ |
+ /* something went wrong. clean up anything allocated. */ |
+limit_where_cleanup_1: |
+ sqlite3SelectDelete(pParse->db, pSelect); |
+ return 0; |
+ |
+limit_where_cleanup_2: |
+ sqlite3ExprDelete(pParse->db, pWhere); |
+ sqlite3ExprListDelete(pParse->db, pOrderBy); |
+ sqlite3ExprDelete(pParse->db, pLimit); |
+ sqlite3ExprDelete(pParse->db, pOffset); |
+ return 0; |
+} |
+#endif /* defined(SQLITE_ENABLE_UPDATE_DELETE_LIMIT) */ |
+ /* && !defined(SQLITE_OMIT_SUBQUERY) */ |
+ |
+/* |
+** Generate code for a DELETE FROM statement. |
+** |
+** DELETE FROM table_wxyz WHERE a<5 AND b NOT NULL; |
+** \________/ \________________/ |
+** pTabList pWhere |
+*/ |
+void sqlite3DeleteFrom( |
+ Parse *pParse, /* The parser context */ |
+ SrcList *pTabList, /* The table from which we should delete things */ |
+ Expr *pWhere /* The WHERE clause. May be null */ |
+){ |
+ Vdbe *v; /* The virtual database engine */ |
+ Table *pTab; /* The table from which records will be deleted */ |
+ const char *zDb; /* Name of database holding pTab */ |
+ int i; /* Loop counter */ |
+ WhereInfo *pWInfo; /* Information about the WHERE clause */ |
+ Index *pIdx; /* For looping over indices of the table */ |
+ int iTabCur; /* Cursor number for the table */ |
+ int iDataCur; /* VDBE cursor for the canonical data source */ |
+ int iIdxCur; /* Cursor number of the first index */ |
+ int nIdx; /* Number of indices */ |
+ sqlite3 *db; /* Main database structure */ |
+ AuthContext sContext; /* Authorization context */ |
+ NameContext sNC; /* Name context to resolve expressions in */ |
+ int iDb; /* Database number */ |
+ int memCnt = -1; /* Memory cell used for change counting */ |
+ int rcauth; /* Value returned by authorization callback */ |
+ int okOnePass; /* True for one-pass algorithm without the FIFO */ |
+ int aiCurOnePass[2]; /* The write cursors opened by WHERE_ONEPASS */ |
+ u8 *aToOpen = 0; /* Open cursor iTabCur+j if aToOpen[j] is true */ |
+ Index *pPk; /* The PRIMARY KEY index on the table */ |
+ int iPk = 0; /* First of nPk registers holding PRIMARY KEY value */ |
+ i16 nPk = 1; /* Number of columns in the PRIMARY KEY */ |
+ int iKey; /* Memory cell holding key of row to be deleted */ |
+ i16 nKey; /* Number of memory cells in the row key */ |
+ int iEphCur = 0; /* Ephemeral table holding all primary key values */ |
+ int iRowSet = 0; /* Register for rowset of rows to delete */ |
+ int addrBypass = 0; /* Address of jump over the delete logic */ |
+ int addrLoop = 0; /* Top of the delete loop */ |
+ int addrDelete = 0; /* Jump directly to the delete logic */ |
+ int addrEphOpen = 0; /* Instruction to open the Ephemeral table */ |
+ |
+#ifndef SQLITE_OMIT_TRIGGER |
+ int isView; /* True if attempting to delete from a view */ |
+ Trigger *pTrigger; /* List of table triggers, if required */ |
+#endif |
+ |
+ memset(&sContext, 0, sizeof(sContext)); |
+ db = pParse->db; |
+ if( pParse->nErr || db->mallocFailed ){ |
+ goto delete_from_cleanup; |
+ } |
+ assert( pTabList->nSrc==1 ); |
+ |
+ /* Locate the table which we want to delete. This table has to be |
+ ** put in an SrcList structure because some of the subroutines we |
+ ** will be calling are designed to work with multiple tables and expect |
+ ** an SrcList* parameter instead of just a Table* parameter. |
+ */ |
+ pTab = sqlite3SrcListLookup(pParse, pTabList); |
+ if( pTab==0 ) goto delete_from_cleanup; |
+ |
+ /* Figure out if we have any triggers and if the table being |
+ ** deleted from is a view |
+ */ |
+#ifndef SQLITE_OMIT_TRIGGER |
+ pTrigger = sqlite3TriggersExist(pParse, pTab, TK_DELETE, 0, 0); |
+ isView = pTab->pSelect!=0; |
+#else |
+# define pTrigger 0 |
+# define isView 0 |
+#endif |
+#ifdef SQLITE_OMIT_VIEW |
+# undef isView |
+# define isView 0 |
+#endif |
+ |
+ /* If pTab is really a view, make sure it has been initialized. |
+ */ |
+ if( sqlite3ViewGetColumnNames(pParse, pTab) ){ |
+ goto delete_from_cleanup; |
+ } |
+ |
+ if( sqlite3IsReadOnly(pParse, pTab, (pTrigger?1:0)) ){ |
+ goto delete_from_cleanup; |
+ } |
+ iDb = sqlite3SchemaToIndex(db, pTab->pSchema); |
+ assert( iDb<db->nDb ); |
+ zDb = db->aDb[iDb].zName; |
+ rcauth = sqlite3AuthCheck(pParse, SQLITE_DELETE, pTab->zName, 0, zDb); |
+ assert( rcauth==SQLITE_OK || rcauth==SQLITE_DENY || rcauth==SQLITE_IGNORE ); |
+ if( rcauth==SQLITE_DENY ){ |
+ goto delete_from_cleanup; |
+ } |
+ assert(!isView || pTrigger); |
+ |
+ /* Assign cursor numbers to the table and all its indices. |
+ */ |
+ assert( pTabList->nSrc==1 ); |
+ iTabCur = pTabList->a[0].iCursor = pParse->nTab++; |
+ for(nIdx=0, pIdx=pTab->pIndex; pIdx; pIdx=pIdx->pNext, nIdx++){ |
+ pParse->nTab++; |
+ } |
+ |
+ /* Start the view context |
+ */ |
+ if( isView ){ |
+ sqlite3AuthContextPush(pParse, &sContext, pTab->zName); |
+ } |
+ |
+ /* Begin generating code. |
+ */ |
+ v = sqlite3GetVdbe(pParse); |
+ if( v==0 ){ |
+ goto delete_from_cleanup; |
+ } |
+ if( pParse->nested==0 ) sqlite3VdbeCountChanges(v); |
+ sqlite3BeginWriteOperation(pParse, 1, iDb); |
+ |
+ /* If we are trying to delete from a view, realize that view into |
+ ** an ephemeral table. |
+ */ |
+#if !defined(SQLITE_OMIT_VIEW) && !defined(SQLITE_OMIT_TRIGGER) |
+ if( isView ){ |
+ sqlite3MaterializeView(pParse, pTab, pWhere, iTabCur); |
+ iDataCur = iIdxCur = iTabCur; |
+ } |
+#endif |
+ |
+ /* Resolve the column names in the WHERE clause. |
+ */ |
+ memset(&sNC, 0, sizeof(sNC)); |
+ sNC.pParse = pParse; |
+ sNC.pSrcList = pTabList; |
+ if( sqlite3ResolveExprNames(&sNC, pWhere) ){ |
+ goto delete_from_cleanup; |
+ } |
+ |
+ /* Initialize the counter of the number of rows deleted, if |
+ ** we are counting rows. |
+ */ |
+ if( db->flags & SQLITE_CountRows ){ |
+ memCnt = ++pParse->nMem; |
+ sqlite3VdbeAddOp2(v, OP_Integer, 0, memCnt); |
+ } |
+ |
+#ifndef SQLITE_OMIT_TRUNCATE_OPTIMIZATION |
+ /* Special case: A DELETE without a WHERE clause deletes everything. |
+ ** It is easier just to erase the whole table. Prior to version 3.6.5, |
+ ** this optimization caused the row change count (the value returned by |
+ ** API function sqlite3_count_changes) to be set incorrectly. */ |
+ if( rcauth==SQLITE_OK && pWhere==0 && !pTrigger && !IsVirtual(pTab) |
+ && 0==sqlite3FkRequired(pParse, pTab, 0, 0) |
+ ){ |
+ assert( !isView ); |
+ sqlite3TableLock(pParse, iDb, pTab->tnum, 1, pTab->zName); |
+ if( HasRowid(pTab) ){ |
+ sqlite3VdbeAddOp4(v, OP_Clear, pTab->tnum, iDb, memCnt, |
+ pTab->zName, P4_STATIC); |
+ } |
+ for(pIdx=pTab->pIndex; pIdx; pIdx=pIdx->pNext){ |
+ assert( pIdx->pSchema==pTab->pSchema ); |
+ sqlite3VdbeAddOp2(v, OP_Clear, pIdx->tnum, iDb); |
+ } |
+ }else |
+#endif /* SQLITE_OMIT_TRUNCATE_OPTIMIZATION */ |
+ { |
+ if( HasRowid(pTab) ){ |
+ /* For a rowid table, initialize the RowSet to an empty set */ |
+ pPk = 0; |
+ nPk = 1; |
+ iRowSet = ++pParse->nMem; |
+ sqlite3VdbeAddOp2(v, OP_Null, 0, iRowSet); |
+ }else{ |
+ /* For a WITHOUT ROWID table, create an ephemeral table used to |
+ ** hold all primary keys for rows to be deleted. */ |
+ pPk = sqlite3PrimaryKeyIndex(pTab); |
+ assert( pPk!=0 ); |
+ nPk = pPk->nKeyCol; |
+ iPk = pParse->nMem+1; |
+ pParse->nMem += nPk; |
+ iEphCur = pParse->nTab++; |
+ addrEphOpen = sqlite3VdbeAddOp2(v, OP_OpenEphemeral, iEphCur, nPk); |
+ sqlite3VdbeSetP4KeyInfo(pParse, pPk); |
+ } |
+ |
+ /* Construct a query to find the rowid or primary key for every row |
+ ** to be deleted, based on the WHERE clause. |
+ */ |
+ pWInfo = sqlite3WhereBegin(pParse, pTabList, pWhere, 0, 0, |
+ WHERE_ONEPASS_DESIRED|WHERE_DUPLICATES_OK, |
+ iTabCur+1); |
+ if( pWInfo==0 ) goto delete_from_cleanup; |
+ okOnePass = sqlite3WhereOkOnePass(pWInfo, aiCurOnePass); |
+ |
+ /* Keep track of the number of rows to be deleted */ |
+ if( db->flags & SQLITE_CountRows ){ |
+ sqlite3VdbeAddOp2(v, OP_AddImm, memCnt, 1); |
+ } |
+ |
+ /* Extract the rowid or primary key for the current row */ |
+ if( pPk ){ |
+ for(i=0; i<nPk; i++){ |
+ sqlite3ExprCodeGetColumnOfTable(v, pTab, iTabCur, |
+ pPk->aiColumn[i], iPk+i); |
+ } |
+ iKey = iPk; |
+ }else{ |
+ iKey = pParse->nMem + 1; |
+ iKey = sqlite3ExprCodeGetColumn(pParse, pTab, -1, iTabCur, iKey, 0); |
+ if( iKey>pParse->nMem ) pParse->nMem = iKey; |
+ } |
+ |
+ if( okOnePass ){ |
+ /* For ONEPASS, no need to store the rowid/primary-key. There is only |
+ ** one, so just keep it in its register(s) and fall through to the |
+ ** delete code. |
+ */ |
+ nKey = nPk; /* OP_Found will use an unpacked key */ |
+ aToOpen = sqlite3DbMallocRaw(db, nIdx+2); |
+ if( aToOpen==0 ){ |
+ sqlite3WhereEnd(pWInfo); |
+ goto delete_from_cleanup; |
+ } |
+ memset(aToOpen, 1, nIdx+1); |
+ aToOpen[nIdx+1] = 0; |
+ if( aiCurOnePass[0]>=0 ) aToOpen[aiCurOnePass[0]-iTabCur] = 0; |
+ if( aiCurOnePass[1]>=0 ) aToOpen[aiCurOnePass[1]-iTabCur] = 0; |
+ if( addrEphOpen ) sqlite3VdbeChangeToNoop(v, addrEphOpen); |
+ addrDelete = sqlite3VdbeAddOp0(v, OP_Goto); /* Jump to DELETE logic */ |
+ }else if( pPk ){ |
+ /* Construct a composite key for the row to be deleted and remember it */ |
+ iKey = ++pParse->nMem; |
+ nKey = 0; /* Zero tells OP_Found to use a composite key */ |
+ sqlite3VdbeAddOp4(v, OP_MakeRecord, iPk, nPk, iKey, |
+ sqlite3IndexAffinityStr(v, pPk), nPk); |
+ sqlite3VdbeAddOp2(v, OP_IdxInsert, iEphCur, iKey); |
+ }else{ |
+ /* Get the rowid of the row to be deleted and remember it in the RowSet */ |
+ nKey = 1; /* OP_Seek always uses a single rowid */ |
+ sqlite3VdbeAddOp2(v, OP_RowSetAdd, iRowSet, iKey); |
+ } |
+ |
+ /* End of the WHERE loop */ |
+ sqlite3WhereEnd(pWInfo); |
+ if( okOnePass ){ |
+ /* Bypass the delete logic below if the WHERE loop found zero rows */ |
+ addrBypass = sqlite3VdbeMakeLabel(v); |
+ sqlite3VdbeAddOp2(v, OP_Goto, 0, addrBypass); |
+ sqlite3VdbeJumpHere(v, addrDelete); |
+ } |
+ |
+ /* Unless this is a view, open cursors for the table we are |
+ ** deleting from and all its indices. If this is a view, then the |
+ ** only effect this statement has is to fire the INSTEAD OF |
+ ** triggers. |
+ */ |
+ if( !isView ){ |
+ testcase( IsVirtual(pTab) ); |
+ sqlite3OpenTableAndIndices(pParse, pTab, OP_OpenWrite, iTabCur, aToOpen, |
+ &iDataCur, &iIdxCur); |
+ assert( pPk || IsVirtual(pTab) || iDataCur==iTabCur ); |
+ assert( pPk || IsVirtual(pTab) || iIdxCur==iDataCur+1 ); |
+ } |
+ |
+ /* Set up a loop over the rowids/primary-keys that were found in the |
+ ** where-clause loop above. |
+ */ |
+ if( okOnePass ){ |
+ /* Just one row. Hence the top-of-loop is a no-op */ |
+ assert( nKey==nPk ); /* OP_Found will use an unpacked key */ |
+ assert( !IsVirtual(pTab) ); |
+ if( aToOpen[iDataCur-iTabCur] ){ |
+ assert( pPk!=0 || pTab->pSelect!=0 ); |
+ sqlite3VdbeAddOp4Int(v, OP_NotFound, iDataCur, addrBypass, iKey, nKey); |
+ VdbeCoverage(v); |
+ } |
+ }else if( pPk ){ |
+ addrLoop = sqlite3VdbeAddOp1(v, OP_Rewind, iEphCur); VdbeCoverage(v); |
+ sqlite3VdbeAddOp2(v, OP_RowKey, iEphCur, iKey); |
+ assert( nKey==0 ); /* OP_Found will use a composite key */ |
+ }else{ |
+ addrLoop = sqlite3VdbeAddOp3(v, OP_RowSetRead, iRowSet, 0, iKey); |
+ VdbeCoverage(v); |
+ assert( nKey==1 ); |
+ } |
+ |
+ /* Delete the row */ |
+#ifndef SQLITE_OMIT_VIRTUALTABLE |
+ if( IsVirtual(pTab) ){ |
+ const char *pVTab = (const char *)sqlite3GetVTable(db, pTab); |
+ sqlite3VtabMakeWritable(pParse, pTab); |
+ sqlite3VdbeAddOp4(v, OP_VUpdate, 0, 1, iKey, pVTab, P4_VTAB); |
+ sqlite3VdbeChangeP5(v, OE_Abort); |
+ sqlite3MayAbort(pParse); |
+ }else |
+#endif |
+ { |
+ int count = (pParse->nested==0); /* True to count changes */ |
+ sqlite3GenerateRowDelete(pParse, pTab, pTrigger, iDataCur, iIdxCur, |
+ iKey, nKey, count, OE_Default, okOnePass); |
+ } |
+ |
+ /* End of the loop over all rowids/primary-keys. */ |
+ if( okOnePass ){ |
+ sqlite3VdbeResolveLabel(v, addrBypass); |
+ }else if( pPk ){ |
+ sqlite3VdbeAddOp2(v, OP_Next, iEphCur, addrLoop+1); VdbeCoverage(v); |
+ sqlite3VdbeJumpHere(v, addrLoop); |
+ }else{ |
+ sqlite3VdbeAddOp2(v, OP_Goto, 0, addrLoop); |
+ sqlite3VdbeJumpHere(v, addrLoop); |
+ } |
+ |
+ /* Close the cursors open on the table and its indexes. */ |
+ if( !isView && !IsVirtual(pTab) ){ |
+ if( !pPk ) sqlite3VdbeAddOp1(v, OP_Close, iDataCur); |
+ for(i=0, pIdx=pTab->pIndex; pIdx; i++, pIdx=pIdx->pNext){ |
+ sqlite3VdbeAddOp1(v, OP_Close, iIdxCur + i); |
+ } |
+ } |
+ } /* End non-truncate path */ |
+ |
+ /* Update the sqlite_sequence table by storing the content of the |
+ ** maximum rowid counter values recorded while inserting into |
+ ** autoincrement tables. |
+ */ |
+ if( pParse->nested==0 && pParse->pTriggerTab==0 ){ |
+ sqlite3AutoincrementEnd(pParse); |
+ } |
+ |
+ /* Return the number of rows that were deleted. If this routine is |
+ ** generating code because of a call to sqlite3NestedParse(), do not |
+ ** invoke the callback function. |
+ */ |
+ if( (db->flags&SQLITE_CountRows) && !pParse->nested && !pParse->pTriggerTab ){ |
+ sqlite3VdbeAddOp2(v, OP_ResultRow, memCnt, 1); |
+ sqlite3VdbeSetNumCols(v, 1); |
+ sqlite3VdbeSetColName(v, 0, COLNAME_NAME, "rows deleted", SQLITE_STATIC); |
+ } |
+ |
+delete_from_cleanup: |
+ sqlite3AuthContextPop(&sContext); |
+ sqlite3SrcListDelete(db, pTabList); |
+ sqlite3ExprDelete(db, pWhere); |
+ sqlite3DbFree(db, aToOpen); |
+ return; |
+} |
+/* Make sure "isView" and other macros defined above are undefined. Otherwise |
+** they may interfere with compilation of other functions in this file |
+** (or in another file, if this file becomes part of the amalgamation). */ |
+#ifdef isView |
+ #undef isView |
+#endif |
+#ifdef pTrigger |
+ #undef pTrigger |
+#endif |
+ |
+/* |
+** This routine generates VDBE code that causes a single row of a |
+** single table to be deleted. Both the original table entry and |
+** all indices are removed. |
+** |
+** Preconditions: |
+** |
+** 1. iDataCur is an open cursor on the btree that is the canonical data |
+** store for the table. (This will be either the table itself, |
+** in the case of a rowid table, or the PRIMARY KEY index in the case |
+** of a WITHOUT ROWID table.) |
+** |
+** 2. Read/write cursors for all indices of pTab must be open as |
+** cursor number iIdxCur+i for the i-th index. |
+** |
+** 3. The primary key for the row to be deleted must be stored in a |
+** sequence of nPk memory cells starting at iPk. If nPk==0 that means |
+** that a search record formed from OP_MakeRecord is contained in the |
+** single memory location iPk. |
+*/ |
+void sqlite3GenerateRowDelete( |
+ Parse *pParse, /* Parsing context */ |
+ Table *pTab, /* Table containing the row to be deleted */ |
+ Trigger *pTrigger, /* List of triggers to (potentially) fire */ |
+ int iDataCur, /* Cursor from which column data is extracted */ |
+ int iIdxCur, /* First index cursor */ |
+ int iPk, /* First memory cell containing the PRIMARY KEY */ |
+ i16 nPk, /* Number of PRIMARY KEY memory cells */ |
+ u8 count, /* If non-zero, increment the row change counter */ |
+ u8 onconf, /* Default ON CONFLICT policy for triggers */ |
+ u8 bNoSeek /* iDataCur is already pointing to the row to delete */ |
+){ |
+ Vdbe *v = pParse->pVdbe; /* Vdbe */ |
+ int iOld = 0; /* First register in OLD.* array */ |
+ int iLabel; /* Label resolved to end of generated code */ |
+ u8 opSeek; /* Seek opcode */ |
+ |
+ /* Vdbe is guaranteed to have been allocated by this stage. */ |
+ assert( v ); |
+ VdbeModuleComment((v, "BEGIN: GenRowDel(%d,%d,%d,%d)", |
+ iDataCur, iIdxCur, iPk, (int)nPk)); |
+ |
+ /* Seek cursor iCur to the row to delete. If this row no longer exists |
+ ** (this can happen if a trigger program has already deleted it), do |
+ ** not attempt to delete it or fire any DELETE triggers. */ |
+ iLabel = sqlite3VdbeMakeLabel(v); |
+ opSeek = HasRowid(pTab) ? OP_NotExists : OP_NotFound; |
+ if( !bNoSeek ){ |
+ sqlite3VdbeAddOp4Int(v, opSeek, iDataCur, iLabel, iPk, nPk); |
+ VdbeCoverageIf(v, opSeek==OP_NotExists); |
+ VdbeCoverageIf(v, opSeek==OP_NotFound); |
+ } |
+ |
+ /* If there are any triggers to fire, allocate a range of registers to |
+ ** use for the old.* references in the triggers. */ |
+ if( sqlite3FkRequired(pParse, pTab, 0, 0) || pTrigger ){ |
+ u32 mask; /* Mask of OLD.* columns in use */ |
+ int iCol; /* Iterator used while populating OLD.* */ |
+ int addrStart; /* Start of BEFORE trigger programs */ |
+ |
+ /* TODO: Could use temporary registers here. Also could attempt to |
+ ** avoid copying the contents of the rowid register. */ |
+ mask = sqlite3TriggerColmask( |
+ pParse, pTrigger, 0, 0, TRIGGER_BEFORE|TRIGGER_AFTER, pTab, onconf |
+ ); |
+ mask |= sqlite3FkOldmask(pParse, pTab); |
+ iOld = pParse->nMem+1; |
+ pParse->nMem += (1 + pTab->nCol); |
+ |
+ /* Populate the OLD.* pseudo-table register array. These values will be |
+ ** used by any BEFORE and AFTER triggers that exist. */ |
+ sqlite3VdbeAddOp2(v, OP_Copy, iPk, iOld); |
+ for(iCol=0; iCol<pTab->nCol; iCol++){ |
+ testcase( mask!=0xffffffff && iCol==31 ); |
+ testcase( mask!=0xffffffff && iCol==32 ); |
+ if( mask==0xffffffff || (iCol<=31 && (mask & MASKBIT32(iCol))!=0) ){ |
+ sqlite3ExprCodeGetColumnOfTable(v, pTab, iDataCur, iCol, iOld+iCol+1); |
+ } |
+ } |
+ |
+ /* Invoke BEFORE DELETE trigger programs. */ |
+ addrStart = sqlite3VdbeCurrentAddr(v); |
+ sqlite3CodeRowTrigger(pParse, pTrigger, |
+ TK_DELETE, 0, TRIGGER_BEFORE, pTab, iOld, onconf, iLabel |
+ ); |
+ |
+ /* If any BEFORE triggers were coded, then seek the cursor to the |
+ ** row to be deleted again. It may be that the BEFORE triggers moved |
+ ** the cursor or of already deleted the row that the cursor was |
+ ** pointing to. |
+ */ |
+ if( addrStart<sqlite3VdbeCurrentAddr(v) ){ |
+ sqlite3VdbeAddOp4Int(v, opSeek, iDataCur, iLabel, iPk, nPk); |
+ VdbeCoverageIf(v, opSeek==OP_NotExists); |
+ VdbeCoverageIf(v, opSeek==OP_NotFound); |
+ } |
+ |
+ /* Do FK processing. This call checks that any FK constraints that |
+ ** refer to this table (i.e. constraints attached to other tables) |
+ ** are not violated by deleting this row. */ |
+ sqlite3FkCheck(pParse, pTab, iOld, 0, 0, 0); |
+ } |
+ |
+ /* Delete the index and table entries. Skip this step if pTab is really |
+ ** a view (in which case the only effect of the DELETE statement is to |
+ ** fire the INSTEAD OF triggers). */ |
+ if( pTab->pSelect==0 ){ |
+ sqlite3GenerateRowIndexDelete(pParse, pTab, iDataCur, iIdxCur, 0); |
+ sqlite3VdbeAddOp2(v, OP_Delete, iDataCur, (count?OPFLAG_NCHANGE:0)); |
+ if( count ){ |
+ sqlite3VdbeChangeP4(v, -1, pTab->zName, P4_TRANSIENT); |
+ } |
+ } |
+ |
+ /* Do any ON CASCADE, SET NULL or SET DEFAULT operations required to |
+ ** handle rows (possibly in other tables) that refer via a foreign key |
+ ** to the row just deleted. */ |
+ sqlite3FkActions(pParse, pTab, 0, iOld, 0, 0); |
+ |
+ /* Invoke AFTER DELETE trigger programs. */ |
+ sqlite3CodeRowTrigger(pParse, pTrigger, |
+ TK_DELETE, 0, TRIGGER_AFTER, pTab, iOld, onconf, iLabel |
+ ); |
+ |
+ /* Jump here if the row had already been deleted before any BEFORE |
+ ** trigger programs were invoked. Or if a trigger program throws a |
+ ** RAISE(IGNORE) exception. */ |
+ sqlite3VdbeResolveLabel(v, iLabel); |
+ VdbeModuleComment((v, "END: GenRowDel()")); |
+} |
+ |
+/* |
+** This routine generates VDBE code that causes the deletion of all |
+** index entries associated with a single row of a single table, pTab |
+** |
+** Preconditions: |
+** |
+** 1. A read/write cursor "iDataCur" must be open on the canonical storage |
+** btree for the table pTab. (This will be either the table itself |
+** for rowid tables or to the primary key index for WITHOUT ROWID |
+** tables.) |
+** |
+** 2. Read/write cursors for all indices of pTab must be open as |
+** cursor number iIdxCur+i for the i-th index. (The pTab->pIndex |
+** index is the 0-th index.) |
+** |
+** 3. The "iDataCur" cursor must be already be positioned on the row |
+** that is to be deleted. |
+*/ |
+void sqlite3GenerateRowIndexDelete( |
+ Parse *pParse, /* Parsing and code generating context */ |
+ Table *pTab, /* Table containing the row to be deleted */ |
+ int iDataCur, /* Cursor of table holding data. */ |
+ int iIdxCur, /* First index cursor */ |
+ int *aRegIdx /* Only delete if aRegIdx!=0 && aRegIdx[i]>0 */ |
+){ |
+ int i; /* Index loop counter */ |
+ int r1 = -1; /* Register holding an index key */ |
+ int iPartIdxLabel; /* Jump destination for skipping partial index entries */ |
+ Index *pIdx; /* Current index */ |
+ Index *pPrior = 0; /* Prior index */ |
+ Vdbe *v; /* The prepared statement under construction */ |
+ Index *pPk; /* PRIMARY KEY index, or NULL for rowid tables */ |
+ |
+ v = pParse->pVdbe; |
+ pPk = HasRowid(pTab) ? 0 : sqlite3PrimaryKeyIndex(pTab); |
+ for(i=0, pIdx=pTab->pIndex; pIdx; i++, pIdx=pIdx->pNext){ |
+ assert( iIdxCur+i!=iDataCur || pPk==pIdx ); |
+ if( aRegIdx!=0 && aRegIdx[i]==0 ) continue; |
+ if( pIdx==pPk ) continue; |
+ VdbeModuleComment((v, "GenRowIdxDel for %s", pIdx->zName)); |
+ r1 = sqlite3GenerateIndexKey(pParse, pIdx, iDataCur, 0, 1, |
+ &iPartIdxLabel, pPrior, r1); |
+ sqlite3VdbeAddOp3(v, OP_IdxDelete, iIdxCur+i, r1, |
+ pIdx->uniqNotNull ? pIdx->nKeyCol : pIdx->nColumn); |
+ sqlite3ResolvePartIdxLabel(pParse, iPartIdxLabel); |
+ pPrior = pIdx; |
+ } |
+} |
+ |
+/* |
+** Generate code that will assemble an index key and stores it in register |
+** regOut. The key with be for index pIdx which is an index on pTab. |
+** iCur is the index of a cursor open on the pTab table and pointing to |
+** the entry that needs indexing. If pTab is a WITHOUT ROWID table, then |
+** iCur must be the cursor of the PRIMARY KEY index. |
+** |
+** Return a register number which is the first in a block of |
+** registers that holds the elements of the index key. The |
+** block of registers has already been deallocated by the time |
+** this routine returns. |
+** |
+** If *piPartIdxLabel is not NULL, fill it in with a label and jump |
+** to that label if pIdx is a partial index that should be skipped. |
+** The label should be resolved using sqlite3ResolvePartIdxLabel(). |
+** A partial index should be skipped if its WHERE clause evaluates |
+** to false or null. If pIdx is not a partial index, *piPartIdxLabel |
+** will be set to zero which is an empty label that is ignored by |
+** sqlite3ResolvePartIdxLabel(). |
+** |
+** The pPrior and regPrior parameters are used to implement a cache to |
+** avoid unnecessary register loads. If pPrior is not NULL, then it is |
+** a pointer to a different index for which an index key has just been |
+** computed into register regPrior. If the current pIdx index is generating |
+** its key into the same sequence of registers and if pPrior and pIdx share |
+** a column in common, then the register corresponding to that column already |
+** holds the correct value and the loading of that register is skipped. |
+** This optimization is helpful when doing a DELETE or an INTEGRITY_CHECK |
+** on a table with multiple indices, and especially with the ROWID or |
+** PRIMARY KEY columns of the index. |
+*/ |
+int sqlite3GenerateIndexKey( |
+ Parse *pParse, /* Parsing context */ |
+ Index *pIdx, /* The index for which to generate a key */ |
+ int iDataCur, /* Cursor number from which to take column data */ |
+ int regOut, /* Put the new key into this register if not 0 */ |
+ int prefixOnly, /* Compute only a unique prefix of the key */ |
+ int *piPartIdxLabel, /* OUT: Jump to this label to skip partial index */ |
+ Index *pPrior, /* Previously generated index key */ |
+ int regPrior /* Register holding previous generated key */ |
+){ |
+ Vdbe *v = pParse->pVdbe; |
+ int j; |
+ Table *pTab = pIdx->pTable; |
+ int regBase; |
+ int nCol; |
+ |
+ if( piPartIdxLabel ){ |
+ if( pIdx->pPartIdxWhere ){ |
+ *piPartIdxLabel = sqlite3VdbeMakeLabel(v); |
+ pParse->iPartIdxTab = iDataCur; |
+ sqlite3ExprCachePush(pParse); |
+ sqlite3ExprIfFalse(pParse, pIdx->pPartIdxWhere, *piPartIdxLabel, |
+ SQLITE_JUMPIFNULL); |
+ }else{ |
+ *piPartIdxLabel = 0; |
+ } |
+ } |
+ nCol = (prefixOnly && pIdx->uniqNotNull) ? pIdx->nKeyCol : pIdx->nColumn; |
+ regBase = sqlite3GetTempRange(pParse, nCol); |
+ if( pPrior && (regBase!=regPrior || pPrior->pPartIdxWhere) ) pPrior = 0; |
+ for(j=0; j<nCol; j++){ |
+ if( pPrior && pPrior->aiColumn[j]==pIdx->aiColumn[j] ) continue; |
+ sqlite3ExprCodeGetColumnOfTable(v, pTab, iDataCur, pIdx->aiColumn[j], |
+ regBase+j); |
+ /* If the column affinity is REAL but the number is an integer, then it |
+ ** might be stored in the table as an integer (using a compact |
+ ** representation) then converted to REAL by an OP_RealAffinity opcode. |
+ ** But we are getting ready to store this value back into an index, where |
+ ** it should be converted by to INTEGER again. So omit the OP_RealAffinity |
+ ** opcode if it is present */ |
+ sqlite3VdbeDeletePriorOpcode(v, OP_RealAffinity); |
+ } |
+ if( regOut ){ |
+ sqlite3VdbeAddOp3(v, OP_MakeRecord, regBase, nCol, regOut); |
+ } |
+ sqlite3ReleaseTempRange(pParse, regBase, nCol); |
+ return regBase; |
+} |
+ |
+/* |
+** If a prior call to sqlite3GenerateIndexKey() generated a jump-over label |
+** because it was a partial index, then this routine should be called to |
+** resolve that label. |
+*/ |
+void sqlite3ResolvePartIdxLabel(Parse *pParse, int iLabel){ |
+ if( iLabel ){ |
+ sqlite3VdbeResolveLabel(pParse->pVdbe, iLabel); |
+ sqlite3ExprCachePop(pParse); |
+ } |
+} |