blob: ee5b31f92d9b2b4be0c6a47991ded12516711225 [file] [log] [blame]
drhcce7d172000-05-31 15:34:51 +00001/*
drhb19a2bc2001-09-16 00:13:26 +00002** 2001 September 15
drhcce7d172000-05-31 15:34:51 +00003**
drhb19a2bc2001-09-16 00:13:26 +00004** The author disclaims copyright to this source code. In place of
5** a legal notice, here is a blessing:
drhcce7d172000-05-31 15:34:51 +00006**
drhb19a2bc2001-09-16 00:13:26 +00007** 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.
drhcce7d172000-05-31 15:34:51 +000010**
11*************************************************************************
12** This file contains C code routines that are called by the parser
drhb19a2bc2001-09-16 00:13:26 +000013** to handle INSERT statements in SQLite.
drhcce7d172000-05-31 15:34:51 +000014**
drh27a32782002-06-19 20:32:43 +000015** $Id: insert.c,v 1.62 2002/06/19 20:32:44 drh Exp $
drhcce7d172000-05-31 15:34:51 +000016*/
17#include "sqliteInt.h"
18
19/*
drh1ccde152000-06-17 13:12:39 +000020** This routine is call to handle SQL of the following forms:
drhcce7d172000-05-31 15:34:51 +000021**
22** insert into TABLE (IDLIST) values(EXPRLIST)
drh1ccde152000-06-17 13:12:39 +000023** insert into TABLE (IDLIST) select
drhcce7d172000-05-31 15:34:51 +000024**
drh1ccde152000-06-17 13:12:39 +000025** The IDLIST following the table name is always optional. If omitted,
26** then a list of all columns for the table is substituted. The IDLIST
drh967e8b72000-06-21 13:59:10 +000027** appears in the pColumn parameter. pColumn is NULL if IDLIST is omitted.
drh1ccde152000-06-17 13:12:39 +000028**
29** The pList parameter holds EXPRLIST in the first form of the INSERT
30** statement above, and pSelect is NULL. For the second form, pList is
31** NULL and pSelect is a pointer to the select statement used to generate
32** data for the insert.
drhcce7d172000-05-31 15:34:51 +000033*/
34void sqliteInsert(
35 Parse *pParse, /* Parser context */
36 Token *pTableName, /* Name of table into which we are inserting */
37 ExprList *pList, /* List of values to be inserted */
drh5974a302000-06-07 14:42:26 +000038 Select *pSelect, /* A SELECT statement to use as the data source */
drh9cfcf5d2002-01-29 18:41:24 +000039 IdList *pColumn, /* Column names corresponding to IDLIST. */
40 int onError /* How to handle constraint errors */
drhcce7d172000-05-31 15:34:51 +000041){
drh5974a302000-06-07 14:42:26 +000042 Table *pTab; /* The table to insert into */
danielk1977c3f9bad2002-05-15 08:30:12 +000043 char *zTab = 0; /* Name of the table into which we are inserting */
drh5974a302000-06-07 14:42:26 +000044 int i, j, idx; /* Loop counters */
45 Vdbe *v; /* Generate code into this virtual machine */
46 Index *pIdx; /* For looping over indices of the table */
47 int srcTab; /* Date comes from this temporary cursor if >=0 */
drh967e8b72000-06-21 13:59:10 +000048 int nColumn; /* Number of columns in the data */
drh5974a302000-06-07 14:42:26 +000049 int base; /* First available cursor */
50 int iCont, iBreak; /* Beginning and end of the loop over srcTab */
drhecdc7532001-09-23 02:35:53 +000051 sqlite *db; /* The main database structure */
drhf57b3392001-10-08 13:22:32 +000052 int openOp; /* Opcode used to open cursors */
drh4a324312001-12-21 14:30:42 +000053 int keyColumn = -1; /* Column that is the INTEGER PRIMARY KEY */
drh0ca3e242002-01-29 23:07:02 +000054 int endOfLoop; /* Label for the end of the insertion loop */
drhcce7d172000-05-31 15:34:51 +000055
danielk1977c3f9bad2002-05-15 08:30:12 +000056 int row_triggers_exist = 0; /* True if there are FOR EACH ROW triggers */
57 int newIdx = -1;
58
drhdaffd0e2001-04-11 14:28:42 +000059 if( pParse->nErr || sqlite_malloc_failed ) goto insert_cleanup;
drhecdc7532001-09-23 02:35:53 +000060 db = pParse->db;
drhdaffd0e2001-04-11 14:28:42 +000061
drh1ccde152000-06-17 13:12:39 +000062 /* Locate the table into which we will be inserting new information.
63 */
drhcce7d172000-05-31 15:34:51 +000064 zTab = sqliteTableNameFromToken(pTableName);
drhdaffd0e2001-04-11 14:28:42 +000065 if( zTab==0 ) goto insert_cleanup;
danielk1977c3f9bad2002-05-15 08:30:12 +000066 pTab = sqliteFindTable(pParse->db, zTab);
67 if( pTab==0 ){
68 sqliteSetString(&pParse->zErrMsg, "no such table: ", zTab, 0);
69 pParse->nErr++;
70 goto insert_cleanup;
71 }
72
73 /* Ensure that:
74 * (a) the table is not read-only,
75 * (b) that if it is a view then ON INSERT triggers exist
76 */
77 row_triggers_exist =
78 sqliteTriggersExist(pParse, pTab->pTrigger, TK_INSERT,
drh9adf9ac2002-05-15 11:44:13 +000079 TK_BEFORE, TK_ROW, 0) ||
danielk1977c3f9bad2002-05-15 08:30:12 +000080 sqliteTriggersExist(pParse, pTab->pTrigger, TK_INSERT, TK_AFTER, TK_ROW, 0);
81 if( pTab->readOnly || (pTab->pSelect && !row_triggers_exist) ){
82 sqliteSetString(&pParse->zErrMsg,
83 pTab->pSelect ? "view " : "table ",
84 zTab,
85 " may not be modified", 0);
86 pParse->nErr++;
87 goto insert_cleanup;
88 }
drhcce7d172000-05-31 15:34:51 +000089 sqliteFree(zTab);
danielk1977c3f9bad2002-05-15 08:30:12 +000090 zTab = 0;
91
drha76b5df2002-02-23 02:32:10 +000092 if( pTab==0 ) goto insert_cleanup;
drh1ccde152000-06-17 13:12:39 +000093
94 /* Allocate a VDBE
95 */
drhd8bc7082000-06-07 23:51:50 +000096 v = sqliteGetVdbe(pParse);
drh5974a302000-06-07 14:42:26 +000097 if( v==0 ) goto insert_cleanup;
drhc977f7f2002-05-21 11:38:11 +000098 sqliteBeginWriteOperation(pParse, pSelect || row_triggers_exist);
drh1ccde152000-06-17 13:12:39 +000099
danielk1977c3f9bad2002-05-15 08:30:12 +0000100 /* if there are row triggers, allocate a temp table for new.* references. */
danielk1977f29ce552002-05-19 23:43:12 +0000101 if( row_triggers_exist ){
danielk1977c3f9bad2002-05-15 08:30:12 +0000102 newIdx = pParse->nTab++;
danielk1977f29ce552002-05-19 23:43:12 +0000103 }
danielk1977c3f9bad2002-05-15 08:30:12 +0000104
drh1ccde152000-06-17 13:12:39 +0000105 /* Figure out how many columns of data are supplied. If the data
drhc6b52df2002-01-04 03:09:29 +0000106 ** is coming from a SELECT statement, then this step has to generate
drh1ccde152000-06-17 13:12:39 +0000107 ** all the code to implement the SELECT statement and leave the data
108 ** in a temporary table. If data is coming from an expression list,
109 ** then we just have to count the number of expressions.
110 */
drh5974a302000-06-07 14:42:26 +0000111 if( pSelect ){
112 int rc;
113 srcTab = pParse->nTab++;
drh99fcd712001-10-13 01:06:47 +0000114 sqliteVdbeAddOp(v, OP_OpenTemp, srcTab, 0);
drh832508b2002-03-02 17:04:07 +0000115 rc = sqliteSelect(pParse, pSelect, SRT_Table, srcTab, 0,0,0);
drhdaffd0e2001-04-11 14:28:42 +0000116 if( rc || pParse->nErr || sqlite_malloc_failed ) goto insert_cleanup;
drh5974a302000-06-07 14:42:26 +0000117 assert( pSelect->pEList );
drh967e8b72000-06-21 13:59:10 +0000118 nColumn = pSelect->pEList->nExpr;
drh5974a302000-06-07 14:42:26 +0000119 }else{
drhad3cab52002-05-24 02:04:32 +0000120 SrcList dummy;
drhdaffd0e2001-04-11 14:28:42 +0000121 assert( pList!=0 );
drh5974a302000-06-07 14:42:26 +0000122 srcTab = -1;
123 assert( pList );
drh967e8b72000-06-21 13:59:10 +0000124 nColumn = pList->nExpr;
drhad3cab52002-05-24 02:04:32 +0000125 dummy.nSrc = 0;
drhe64e7b22002-02-18 13:56:36 +0000126 for(i=0; i<nColumn; i++){
drh832508b2002-03-02 17:04:07 +0000127 if( sqliteExprResolveIds(pParse, 0, &dummy, 0, pList->a[i].pExpr) ){
drhe64e7b22002-02-18 13:56:36 +0000128 goto insert_cleanup;
129 }
drhb04a5d82002-04-12 03:55:15 +0000130 if( sqliteExprCheck(pParse, pList->a[i].pExpr, 0, 0) ){
131 goto insert_cleanup;
132 }
drhe64e7b22002-02-18 13:56:36 +0000133 }
drh5974a302000-06-07 14:42:26 +0000134 }
drh1ccde152000-06-17 13:12:39 +0000135
136 /* Make sure the number of columns in the source data matches the number
137 ** of columns to be inserted into the table.
138 */
drh967e8b72000-06-21 13:59:10 +0000139 if( pColumn==0 && nColumn!=pTab->nCol ){
drhcce7d172000-05-31 15:34:51 +0000140 char zNum1[30];
141 char zNum2[30];
drh967e8b72000-06-21 13:59:10 +0000142 sprintf(zNum1,"%d", nColumn);
drhcce7d172000-05-31 15:34:51 +0000143 sprintf(zNum2,"%d", pTab->nCol);
144 sqliteSetString(&pParse->zErrMsg, "table ", pTab->zName,
145 " has ", zNum2, " columns but ",
146 zNum1, " values were supplied", 0);
147 pParse->nErr++;
148 goto insert_cleanup;
149 }
drh967e8b72000-06-21 13:59:10 +0000150 if( pColumn!=0 && nColumn!=pColumn->nId ){
drhcce7d172000-05-31 15:34:51 +0000151 char zNum1[30];
152 char zNum2[30];
drh967e8b72000-06-21 13:59:10 +0000153 sprintf(zNum1,"%d", nColumn);
154 sprintf(zNum2,"%d", pColumn->nId);
drhcce7d172000-05-31 15:34:51 +0000155 sqliteSetString(&pParse->zErrMsg, zNum1, " values for ",
156 zNum2, " columns", 0);
157 pParse->nErr++;
158 goto insert_cleanup;
159 }
drh1ccde152000-06-17 13:12:39 +0000160
161 /* If the INSERT statement included an IDLIST term, then make sure
162 ** all elements of the IDLIST really are columns of the table and
163 ** remember the column indices.
drhc8392582001-12-31 02:48:51 +0000164 **
165 ** If the table has an INTEGER PRIMARY KEY column and that column
166 ** is named in the IDLIST, then record in the keyColumn variable
167 ** the index into IDLIST of the primary key column. keyColumn is
168 ** the index of the primary key as it appears in IDLIST, not as
169 ** is appears in the original table. (The index of the primary
170 ** key in the original table is pTab->iPKey.)
drh1ccde152000-06-17 13:12:39 +0000171 */
drh967e8b72000-06-21 13:59:10 +0000172 if( pColumn ){
173 for(i=0; i<pColumn->nId; i++){
174 pColumn->a[i].idx = -1;
drhcce7d172000-05-31 15:34:51 +0000175 }
drh967e8b72000-06-21 13:59:10 +0000176 for(i=0; i<pColumn->nId; i++){
drhcce7d172000-05-31 15:34:51 +0000177 for(j=0; j<pTab->nCol; j++){
drh967e8b72000-06-21 13:59:10 +0000178 if( sqliteStrICmp(pColumn->a[i].zName, pTab->aCol[j].zName)==0 ){
179 pColumn->a[i].idx = j;
drh4a324312001-12-21 14:30:42 +0000180 if( j==pTab->iPKey ){
drh9aa028d2001-12-22 21:48:29 +0000181 keyColumn = i;
drh4a324312001-12-21 14:30:42 +0000182 }
drhcce7d172000-05-31 15:34:51 +0000183 break;
184 }
185 }
186 if( j>=pTab->nCol ){
187 sqliteSetString(&pParse->zErrMsg, "table ", pTab->zName,
drh967e8b72000-06-21 13:59:10 +0000188 " has no column named ", pColumn->a[i].zName, 0);
drhcce7d172000-05-31 15:34:51 +0000189 pParse->nErr++;
190 goto insert_cleanup;
191 }
192 }
193 }
drh1ccde152000-06-17 13:12:39 +0000194
drhaacc5432002-01-06 17:07:40 +0000195 /* If there is no IDLIST term but the table has an integer primary
drhc8392582001-12-31 02:48:51 +0000196 ** key, the set the keyColumn variable to the primary key column index
197 ** in the original table definition.
drh4a324312001-12-21 14:30:42 +0000198 */
199 if( pColumn==0 ){
200 keyColumn = pTab->iPKey;
201 }
202
danielk1977c3f9bad2002-05-15 08:30:12 +0000203 /* Open the temp table for FOR EACH ROW triggers */
danielk1977f29ce552002-05-19 23:43:12 +0000204 if( row_triggers_exist ){
danielk1977c3f9bad2002-05-15 08:30:12 +0000205 sqliteVdbeAddOp(v, OP_OpenTemp, newIdx, 0);
danielk1977f29ce552002-05-19 23:43:12 +0000206 }
danielk1977c3f9bad2002-05-15 08:30:12 +0000207
drhfeeb1392002-04-09 03:28:01 +0000208 /* Initialize the count of rows to be inserted
209 */
danielk1977f29ce552002-05-19 23:43:12 +0000210 if( db->flags & SQLITE_CountRows && !pParse->trigStack ){
drhfeeb1392002-04-09 03:28:01 +0000211 sqliteVdbeAddOp(v, OP_Integer, 0, 0); /* Initialize the row count */
212 }
213
danielk1977c3f9bad2002-05-15 08:30:12 +0000214 /* Open tables and indices if there are no row triggers */
danielk1977f29ce552002-05-19 23:43:12 +0000215 if( !row_triggers_exist ){
danielk1977c3f9bad2002-05-15 08:30:12 +0000216 base = pParse->nTab;
217 openOp = pTab->isTemp ? OP_OpenWrAux : OP_OpenWrite;
218 sqliteVdbeAddOp(v, openOp, base, pTab->tnum);
219 sqliteVdbeChangeP3(v, -1, pTab->zName, P3_STATIC);
220 for(idx=1, pIdx=pTab->pIndex; pIdx; pIdx=pIdx->pNext, idx++){
221 sqliteVdbeAddOp(v, openOp, idx+base, pIdx->tnum);
222 sqliteVdbeChangeP3(v, -1, pIdx->zName, P3_STATIC);
223 }
224 pParse->nTab += idx;
225 }
226
drh1ccde152000-06-17 13:12:39 +0000227 /* If the data source is a SELECT statement, then we have to create
228 ** a loop because there might be multiple rows of data. If the data
229 ** source is an expression list, then exactly one row will be inserted
230 ** and the loop is not used.
231 */
drh5974a302000-06-07 14:42:26 +0000232 if( srcTab>=0 ){
drh5974a302000-06-07 14:42:26 +0000233 iBreak = sqliteVdbeMakeLabel(v);
drh6b563442001-11-07 16:48:26 +0000234 sqliteVdbeAddOp(v, OP_Rewind, srcTab, iBreak);
235 iCont = sqliteVdbeCurrentAddr(v);
drh5974a302000-06-07 14:42:26 +0000236 }
drh1ccde152000-06-17 13:12:39 +0000237
danielk19776f349032002-06-11 02:25:40 +0000238 endOfLoop = sqliteVdbeMakeLabel(v);
danielk1977f29ce552002-05-19 23:43:12 +0000239 if( row_triggers_exist ){
danielk1977c3f9bad2002-05-15 08:30:12 +0000240
241 /* build the new.* reference row */
242 sqliteVdbeAddOp(v, OP_Integer, 13, 0);
243 for(i=0; i<pTab->nCol; i++){
244 if( pColumn==0 ){
drh9adf9ac2002-05-15 11:44:13 +0000245 j = i;
danielk1977c3f9bad2002-05-15 08:30:12 +0000246 }else{
drh9adf9ac2002-05-15 11:44:13 +0000247 for(j=0; j<pColumn->nId; j++){
248 if( pColumn->a[j].idx==i ) break;
249 }
danielk1977c3f9bad2002-05-15 08:30:12 +0000250 }
251 if( pColumn && j>=pColumn->nId ){
drh9adf9ac2002-05-15 11:44:13 +0000252 sqliteVdbeAddOp(v, OP_String, 0, 0);
253 sqliteVdbeChangeP3(v, -1, pTab->aCol[i].zDflt, P3_STATIC);
danielk1977c3f9bad2002-05-15 08:30:12 +0000254 }else if( srcTab>=0 ){
drh9adf9ac2002-05-15 11:44:13 +0000255 sqliteVdbeAddOp(v, OP_Column, srcTab, j);
danielk1977c3f9bad2002-05-15 08:30:12 +0000256 }else{
drh9adf9ac2002-05-15 11:44:13 +0000257 sqliteExprCode(pParse, pList->a[j].pExpr);
danielk1977c3f9bad2002-05-15 08:30:12 +0000258 }
259 }
260 sqliteVdbeAddOp(v, OP_MakeRecord, pTab->nCol, 0);
261 sqliteVdbeAddOp(v, OP_PutIntKey, newIdx, 0);
262 sqliteVdbeAddOp(v, OP_Rewind, newIdx, 0);
263
264 /* Fire BEFORE triggers */
danielk1977f29ce552002-05-19 23:43:12 +0000265 if( sqliteCodeRowTrigger(pParse, TK_INSERT, 0, TK_BEFORE, pTab, newIdx, -1,
danielk19776f349032002-06-11 02:25:40 +0000266 onError, endOfLoop) ){
danielk1977f29ce552002-05-19 23:43:12 +0000267 goto insert_cleanup;
268 }
danielk1977c3f9bad2002-05-15 08:30:12 +0000269
270 /* Open the tables and indices for the INSERT */
danielk1977f29ce552002-05-19 23:43:12 +0000271 if( !pTab->pSelect ){
danielk1977c3f9bad2002-05-15 08:30:12 +0000272 base = pParse->nTab;
273 openOp = pTab->isTemp ? OP_OpenWrAux : OP_OpenWrite;
274 sqliteVdbeAddOp(v, openOp, base, pTab->tnum);
275 sqliteVdbeChangeP3(v, -1, pTab->zName, P3_STATIC);
276 for(idx=1, pIdx=pTab->pIndex; pIdx; pIdx=pIdx->pNext, idx++){
drh9adf9ac2002-05-15 11:44:13 +0000277 sqliteVdbeAddOp(v, openOp, idx+base, pIdx->tnum);
278 sqliteVdbeChangeP3(v, -1, pIdx->zName, P3_STATIC);
danielk1977c3f9bad2002-05-15 08:30:12 +0000279 }
280 pParse->nTab += idx;
281 }
282 }
283
drh4a324312001-12-21 14:30:42 +0000284 /* Push the record number for the new entry onto the stack. The
285 ** record number is a randomly generate integer created by NewRecno
286 ** except when the table has an INTEGER PRIMARY KEY column, in which
drhb419a922002-01-30 16:17:23 +0000287 ** case the record number is the same as that column.
drh1ccde152000-06-17 13:12:39 +0000288 */
danielk1977f29ce552002-05-19 23:43:12 +0000289 if( !pTab->pSelect ){
danielk1977c3f9bad2002-05-15 08:30:12 +0000290 if( keyColumn>=0 ){
291 if( srcTab>=0 ){
drh9adf9ac2002-05-15 11:44:13 +0000292 sqliteVdbeAddOp(v, OP_Column, srcTab, keyColumn);
danielk1977c3f9bad2002-05-15 08:30:12 +0000293 }else{
drh9adf9ac2002-05-15 11:44:13 +0000294 sqliteExprCode(pParse, pList->a[keyColumn].pExpr);
danielk1977c3f9bad2002-05-15 08:30:12 +0000295 }
drh27a32782002-06-19 20:32:43 +0000296 /* If the PRIMARY KEY expression is NULL, then use OP_NewRecno
297 ** to generate a unique primary key value.
298 */
299 sqliteVdbeAddOp(v, OP_NotNull, -1, sqliteVdbeCurrentAddr(v)+3);
300 sqliteVdbeAddOp(v, OP_Pop, 1, 0);
301 sqliteVdbeAddOp(v, OP_NewRecno, base, 0);
danielk1977c3f9bad2002-05-15 08:30:12 +0000302 sqliteVdbeAddOp(v, OP_MustBeInt, 0, 0);
303 }else{
drhe1e68f42002-03-31 18:29:03 +0000304 sqliteVdbeAddOp(v, OP_NewRecno, base, 0);
drh4a324312001-12-21 14:30:42 +0000305 }
drh4a324312001-12-21 14:30:42 +0000306
danielk1977c3f9bad2002-05-15 08:30:12 +0000307 /* Push onto the stack, data for all columns of the new entry, beginning
danielk1977f29ce552002-05-19 23:43:12 +0000308 ** with the first column.
309 */
danielk1977c3f9bad2002-05-15 08:30:12 +0000310 for(i=0; i<pTab->nCol; i++){
311 if( i==pTab->iPKey ){
drh9adf9ac2002-05-15 11:44:13 +0000312 /* The value of the INTEGER PRIMARY KEY column is always a NULL.
danielk1977f29ce552002-05-19 23:43:12 +0000313 ** Whenever this column is read, the record number will be substituted
314 ** in its place. So will fill this column with a NULL to avoid
315 ** taking up data space with information that will never be used. */
drh9adf9ac2002-05-15 11:44:13 +0000316 sqliteVdbeAddOp(v, OP_String, 0, 0);
317 continue;
danielk1977c3f9bad2002-05-15 08:30:12 +0000318 }
319 if( pColumn==0 ){
drh9adf9ac2002-05-15 11:44:13 +0000320 j = i;
danielk1977c3f9bad2002-05-15 08:30:12 +0000321 }else{
drh9adf9ac2002-05-15 11:44:13 +0000322 for(j=0; j<pColumn->nId; j++){
323 if( pColumn->a[j].idx==i ) break;
324 }
danielk1977c3f9bad2002-05-15 08:30:12 +0000325 }
326 if( pColumn && j>=pColumn->nId ){
drh9adf9ac2002-05-15 11:44:13 +0000327 sqliteVdbeAddOp(v, OP_String, 0, 0);
328 sqliteVdbeChangeP3(v, -1, pTab->aCol[i].zDflt, P3_STATIC);
danielk1977c3f9bad2002-05-15 08:30:12 +0000329 }else if( srcTab>=0 ){
drh9adf9ac2002-05-15 11:44:13 +0000330 sqliteVdbeAddOp(v, OP_Column, srcTab, j);
danielk1977c3f9bad2002-05-15 08:30:12 +0000331 }else{
drh9adf9ac2002-05-15 11:44:13 +0000332 sqliteExprCode(pParse, pList->a[j].pExpr);
drh5974a302000-06-07 14:42:26 +0000333 }
drhbed86902000-06-02 13:27:59 +0000334 }
danielk1977c3f9bad2002-05-15 08:30:12 +0000335
336 /* Generate code to check constraints and generate index keys and
danielk1977f29ce552002-05-19 23:43:12 +0000337 ** do the insertion.
338 */
danielk1977c3f9bad2002-05-15 08:30:12 +0000339 sqliteGenerateConstraintChecks(pParse, pTab, base, 0,0,0,onError,endOfLoop);
340 sqliteCompleteInsertion(pParse, pTab, base, 0,0,0);
341
342 /* Update the count of rows that are inserted
danielk1977f29ce552002-05-19 23:43:12 +0000343 */
danielk1977c3f9bad2002-05-15 08:30:12 +0000344 if( (db->flags & SQLITE_CountRows)!=0 && !pParse->trigStack){
345 sqliteVdbeAddOp(v, OP_AddImm, 1, 0);
drh5974a302000-06-07 14:42:26 +0000346 }
347 }
drh1ccde152000-06-17 13:12:39 +0000348
danielk1977f29ce552002-05-19 23:43:12 +0000349 if( row_triggers_exist ){
danielk1977c3f9bad2002-05-15 08:30:12 +0000350 /* Close all tables opened */
danielk1977f29ce552002-05-19 23:43:12 +0000351 if( !pTab->pSelect ){
danielk1977c3f9bad2002-05-15 08:30:12 +0000352 sqliteVdbeAddOp(v, OP_Close, base, 0);
353 for(idx=1, pIdx=pTab->pIndex; pIdx; pIdx=pIdx->pNext, idx++){
drh9adf9ac2002-05-15 11:44:13 +0000354 sqliteVdbeAddOp(v, OP_Close, idx+base, 0);
danielk1977c3f9bad2002-05-15 08:30:12 +0000355 }
356 }
drh1bee3d72001-10-15 00:44:35 +0000357
danielk1977c3f9bad2002-05-15 08:30:12 +0000358 /* Code AFTER triggers */
danielk1977f29ce552002-05-19 23:43:12 +0000359 if( sqliteCodeRowTrigger(pParse, TK_INSERT, 0, TK_AFTER, pTab, newIdx, -1,
danielk19776f349032002-06-11 02:25:40 +0000360 onError, endOfLoop) ){
danielk1977f29ce552002-05-19 23:43:12 +0000361 goto insert_cleanup;
362 }
drh1bee3d72001-10-15 00:44:35 +0000363 }
364
drh1ccde152000-06-17 13:12:39 +0000365 /* The bottom of the loop, if the data source is a SELECT statement
danielk1977f29ce552002-05-19 23:43:12 +0000366 */
drh0ca3e242002-01-29 23:07:02 +0000367 sqliteVdbeResolveLabel(v, endOfLoop);
drh5974a302000-06-07 14:42:26 +0000368 if( srcTab>=0 ){
drh6b563442001-11-07 16:48:26 +0000369 sqliteVdbeAddOp(v, OP_Next, srcTab, iCont);
drh99fcd712001-10-13 01:06:47 +0000370 sqliteVdbeResolveLabel(v, iBreak);
drh6b563442001-11-07 16:48:26 +0000371 sqliteVdbeAddOp(v, OP_Close, srcTab, 0);
372 }
danielk1977c3f9bad2002-05-15 08:30:12 +0000373
danielk1977f29ce552002-05-19 23:43:12 +0000374 if( !row_triggers_exist ){
danielk1977c3f9bad2002-05-15 08:30:12 +0000375 /* Close all tables opened */
376 sqliteVdbeAddOp(v, OP_Close, base, 0);
377 for(idx=1, pIdx=pTab->pIndex; pIdx; pIdx=pIdx->pNext, idx++){
378 sqliteVdbeAddOp(v, OP_Close, idx+base, 0);
379 }
drhcce7d172000-05-31 15:34:51 +0000380 }
danielk1977c3f9bad2002-05-15 08:30:12 +0000381
drh1c928532002-01-31 15:54:21 +0000382 sqliteEndWriteOperation(pParse);
drh5e00f6c2001-09-13 13:46:56 +0000383
drh1bee3d72001-10-15 00:44:35 +0000384 /*
danielk1977f29ce552002-05-19 23:43:12 +0000385 ** Return the number of rows inserted.
drh1bee3d72001-10-15 00:44:35 +0000386 */
danielk1977c3f9bad2002-05-15 08:30:12 +0000387 if( db->flags & SQLITE_CountRows && !pParse->trigStack ){
drh1bee3d72001-10-15 00:44:35 +0000388 sqliteVdbeAddOp(v, OP_ColumnCount, 1, 0);
389 sqliteVdbeAddOp(v, OP_ColumnName, 0, 0);
390 sqliteVdbeChangeP3(v, -1, "rows inserted", P3_STATIC);
drh1bee3d72001-10-15 00:44:35 +0000391 sqliteVdbeAddOp(v, OP_Callback, 1, 0);
392 }
drhcce7d172000-05-31 15:34:51 +0000393
394insert_cleanup:
drh5974a302000-06-07 14:42:26 +0000395 if( pList ) sqliteExprListDelete(pList);
396 if( pSelect ) sqliteSelectDelete(pSelect);
danielk1977c3f9bad2002-05-15 08:30:12 +0000397 if ( zTab ) sqliteFree(zTab);
drh967e8b72000-06-21 13:59:10 +0000398 sqliteIdListDelete(pColumn);
drhcce7d172000-05-31 15:34:51 +0000399}
drh9cfcf5d2002-01-29 18:41:24 +0000400
drh9cfcf5d2002-01-29 18:41:24 +0000401/*
402** Generate code to do a constraint check prior to an INSERT or an UPDATE.
403**
404** When this routine is called, the stack contains (from bottom to top)
drh0ca3e242002-01-29 23:07:02 +0000405** the following values:
406**
drhb419a922002-01-30 16:17:23 +0000407** 1. The recno of the row to be updated before it is updated. This
408** value is omitted unless we are doing an UPDATE that involves a
409** change to the record number.
drh0ca3e242002-01-29 23:07:02 +0000410**
drhb419a922002-01-30 16:17:23 +0000411** 2. The recno of the row after the update.
drh0ca3e242002-01-29 23:07:02 +0000412**
413** 3. The data in the first column of the entry after the update.
414**
415** i. Data from middle columns...
416**
417** N. The data in the last column of the entry after the update.
418**
drhb419a922002-01-30 16:17:23 +0000419** The old recno shown as entry (1) above is omitted unless both isUpdate
drh1c928532002-01-31 15:54:21 +0000420** and recnoChng are 1. isUpdate is true for UPDATEs and false for
421** INSERTs and recnoChng is true if the record number is being changed.
drh0ca3e242002-01-29 23:07:02 +0000422**
423** The code generated by this routine pushes additional entries onto
424** the stack which are the keys for new index entries for the new record.
425** The order of index keys is the same as the order of the indices on
426** the pTable->pIndex list. A key is only created for index i if
427** aIdxUsed!=0 and aIdxUsed[i]!=0.
drh9cfcf5d2002-01-29 18:41:24 +0000428**
429** This routine also generates code to check constraints. NOT NULL,
430** CHECK, and UNIQUE constraints are all checked. If a constraint fails,
drh1c928532002-01-31 15:54:21 +0000431** then the appropriate action is performed. There are five possible
432** actions: ROLLBACK, ABORT, FAIL, REPLACE, and IGNORE.
drh9cfcf5d2002-01-29 18:41:24 +0000433**
434** Constraint type Action What Happens
435** --------------- ---------- ----------------------------------------
drh1c928532002-01-31 15:54:21 +0000436** any ROLLBACK The current transaction is rolled back and
drh9cfcf5d2002-01-29 18:41:24 +0000437** sqlite_exec() returns immediately with a
438** return code of SQLITE_CONSTRAINT.
439**
drh1c928532002-01-31 15:54:21 +0000440** any ABORT Back out changes from the current command
441** only (do not do a complete rollback) then
442** cause sqlite_exec() to return immediately
443** with SQLITE_CONSTRAINT.
444**
445** any FAIL Sqlite_exec() returns immediately with a
446** return code of SQLITE_CONSTRAINT. The
447** transaction is not rolled back and any
448** prior changes are retained.
449**
drh9cfcf5d2002-01-29 18:41:24 +0000450** any IGNORE The record number and data is popped from
451** the stack and there is an immediate jump
452** to label ignoreDest.
453**
454** NOT NULL REPLACE The NULL value is replace by the default
455** value for that column. If the default value
456** is NULL, the action is the same as ABORT.
457**
458** UNIQUE REPLACE The other row that conflicts with the row
459** being inserted is removed.
460**
461** CHECK REPLACE Illegal. The results in an exception.
462**
drh1c928532002-01-31 15:54:21 +0000463** Which action to take is determined by the overrideError parameter.
464** Or if overrideError==OE_Default, then the pParse->onError parameter
465** is used. Or if pParse->onError==OE_Default then the onError value
466** for the constraint is used.
drh9cfcf5d2002-01-29 18:41:24 +0000467**
drhaaab5722002-02-19 13:39:21 +0000468** The calling routine must open a read/write cursor for pTab with
drh9cfcf5d2002-01-29 18:41:24 +0000469** cursor number "base". All indices of pTab must also have open
470** read/write cursors with cursor number base+i for the i-th cursor.
471** Except, if there is no possibility of a REPLACE action then
472** cursors do not need to be open for indices where aIdxUsed[i]==0.
473**
474** If the isUpdate flag is true, it means that the "base" cursor is
475** initially pointing to an entry that is being updated. The isUpdate
476** flag causes extra code to be generated so that the "base" cursor
477** is still pointing at the same entry after the routine returns.
478** Without the isUpdate flag, the "base" cursor might be moved.
479*/
480void sqliteGenerateConstraintChecks(
481 Parse *pParse, /* The parser context */
482 Table *pTab, /* the table into which we are inserting */
483 int base, /* Index of a read/write cursor pointing at pTab */
484 char *aIdxUsed, /* Which indices are used. NULL means all are used */
drh0ca3e242002-01-29 23:07:02 +0000485 int recnoChng, /* True if the record number will change */
drhb419a922002-01-30 16:17:23 +0000486 int isUpdate, /* True for UPDATE, False for INSERT */
drh9cfcf5d2002-01-29 18:41:24 +0000487 int overrideError, /* Override onError to this if not OE_Default */
drhb419a922002-01-30 16:17:23 +0000488 int ignoreDest /* Jump to this label on an OE_Ignore resolution */
drh9cfcf5d2002-01-29 18:41:24 +0000489){
490 int i;
491 Vdbe *v;
492 int nCol;
493 int onError;
494 int addr;
495 int extra;
drh0ca3e242002-01-29 23:07:02 +0000496 int iCur;
497 Index *pIdx;
498 int seenReplace = 0;
drhf5905aa2002-05-26 20:54:33 +0000499 int jumpInst1, jumpInst2;
drh0ca3e242002-01-29 23:07:02 +0000500 int contAddr;
drhb419a922002-01-30 16:17:23 +0000501 int hasTwoRecnos = (isUpdate && recnoChng);
drh9cfcf5d2002-01-29 18:41:24 +0000502
503 v = sqliteGetVdbe(pParse);
504 assert( v!=0 );
drh417be792002-03-03 18:59:40 +0000505 assert( pTab->pSelect==0 ); /* This table is not a VIEW */
drh9cfcf5d2002-01-29 18:41:24 +0000506 nCol = pTab->nCol;
507
508 /* Test all NOT NULL constraints.
509 */
510 for(i=0; i<nCol; i++){
drh0ca3e242002-01-29 23:07:02 +0000511 if( i==pTab->iPKey ){
512 /* Fix me: Make sure the INTEGER PRIMARY KEY is not NULL. */
513 continue;
514 }
drh9cfcf5d2002-01-29 18:41:24 +0000515 onError = pTab->aCol[i].notNull;
drh0ca3e242002-01-29 23:07:02 +0000516 if( onError==OE_None ) continue;
drh9cfcf5d2002-01-29 18:41:24 +0000517 if( overrideError!=OE_Default ){
518 onError = overrideError;
drh1c928532002-01-31 15:54:21 +0000519 }else if( onError==OE_Default ){
drh0d65dc02002-02-03 00:56:09 +0000520 onError = pParse->db->onError;
521 if( onError==OE_Default ) onError = OE_Abort;
drh9cfcf5d2002-01-29 18:41:24 +0000522 }
523 if( onError==OE_Replace && pTab->aCol[i].zDflt==0 ){
524 onError = OE_Abort;
525 }
drhef6764a2002-01-30 04:32:00 +0000526 sqliteVdbeAddOp(v, OP_Dup, nCol-1-i, 1);
drhf5905aa2002-05-26 20:54:33 +0000527 addr = sqliteVdbeAddOp(v, OP_NotNull, 1, 0);
drh9cfcf5d2002-01-29 18:41:24 +0000528 switch( onError ){
drh1c928532002-01-31 15:54:21 +0000529 case OE_Rollback:
530 case OE_Abort:
531 case OE_Fail: {
532 sqliteVdbeAddOp(v, OP_Halt, SQLITE_CONSTRAINT, onError);
drh9cfcf5d2002-01-29 18:41:24 +0000533 break;
534 }
535 case OE_Ignore: {
drhb419a922002-01-30 16:17:23 +0000536 sqliteVdbeAddOp(v, OP_Pop, nCol+1+hasTwoRecnos, 0);
drh0ca3e242002-01-29 23:07:02 +0000537 sqliteVdbeAddOp(v, OP_Goto, 0, ignoreDest);
drh9cfcf5d2002-01-29 18:41:24 +0000538 break;
539 }
540 case OE_Replace: {
541 sqliteVdbeAddOp(v, OP_String, 0, 0);
542 sqliteVdbeChangeP3(v, -1, pTab->aCol[i].zDflt, P3_STATIC);
543 sqliteVdbeAddOp(v, OP_Push, nCol-i, 0);
544 break;
545 }
drh0ca3e242002-01-29 23:07:02 +0000546 default: assert(0);
drh9cfcf5d2002-01-29 18:41:24 +0000547 }
drhef6764a2002-01-30 04:32:00 +0000548 sqliteVdbeChangeP2(v, addr, sqliteVdbeCurrentAddr(v));
drh9cfcf5d2002-01-29 18:41:24 +0000549 }
550
551 /* Test all CHECK constraints
552 */
drh0bd1f4e2002-06-06 18:54:39 +0000553 /**** TBD ****/
drh9cfcf5d2002-01-29 18:41:24 +0000554
drh0bd1f4e2002-06-06 18:54:39 +0000555 /* If we have an INTEGER PRIMARY KEY, make sure the primary key
556 ** of the new record does not previously exist. Except, if this
557 ** is an UPDATE and the primary key is not changing, that is OK.
558 ** Also, if the conflict resolution policy is REPLACE, then we
559 ** can skip this test.
drh9cfcf5d2002-01-29 18:41:24 +0000560 */
drh0d65dc02002-02-03 00:56:09 +0000561 if( (recnoChng || !isUpdate) && pTab->iPKey>=0 ){
drh0ca3e242002-01-29 23:07:02 +0000562 onError = pTab->keyConf;
563 if( overrideError!=OE_Default ){
564 onError = overrideError;
drh1c928532002-01-31 15:54:21 +0000565 }else if( onError==OE_Default ){
drh0d65dc02002-02-03 00:56:09 +0000566 onError = pParse->db->onError;
567 if( onError==OE_Default ) onError = OE_Abort;
drh0ca3e242002-01-29 23:07:02 +0000568 }
drh0d65dc02002-02-03 00:56:09 +0000569 if( onError!=OE_Replace ){
drh79b0c952002-05-21 12:56:43 +0000570 if( isUpdate ){
571 sqliteVdbeAddOp(v, OP_Dup, nCol+1, 1);
572 sqliteVdbeAddOp(v, OP_Dup, nCol+1, 1);
drhf5905aa2002-05-26 20:54:33 +0000573 jumpInst1 = sqliteVdbeAddOp(v, OP_Eq, 0, 0);
drh79b0c952002-05-21 12:56:43 +0000574 }
drh0d65dc02002-02-03 00:56:09 +0000575 sqliteVdbeAddOp(v, OP_Dup, nCol, 1);
drhf5905aa2002-05-26 20:54:33 +0000576 jumpInst2 = sqliteVdbeAddOp(v, OP_NotExists, base, 0);
drh0d65dc02002-02-03 00:56:09 +0000577 switch( onError ){
578 case OE_Rollback:
579 case OE_Abort:
580 case OE_Fail: {
581 sqliteVdbeAddOp(v, OP_Halt, SQLITE_CONSTRAINT, onError);
582 break;
583 }
584 case OE_Ignore: {
585 sqliteVdbeAddOp(v, OP_Pop, nCol+1+hasTwoRecnos, 0);
586 sqliteVdbeAddOp(v, OP_Goto, 0, ignoreDest);
587 break;
588 }
589 default: assert(0);
drh0ca3e242002-01-29 23:07:02 +0000590 }
drh0d65dc02002-02-03 00:56:09 +0000591 contAddr = sqliteVdbeCurrentAddr(v);
drhf5905aa2002-05-26 20:54:33 +0000592 sqliteVdbeChangeP2(v, jumpInst2, contAddr);
drh0d65dc02002-02-03 00:56:09 +0000593 if( isUpdate ){
drhf5905aa2002-05-26 20:54:33 +0000594 sqliteVdbeChangeP2(v, jumpInst1, contAddr);
drh0d65dc02002-02-03 00:56:09 +0000595 sqliteVdbeAddOp(v, OP_Dup, nCol+1, 1);
596 sqliteVdbeAddOp(v, OP_MoveTo, base, 0);
drh0ca3e242002-01-29 23:07:02 +0000597 }
drh0ca3e242002-01-29 23:07:02 +0000598 }
599 }
drh0bd1f4e2002-06-06 18:54:39 +0000600
601 /* Test all UNIQUE constraints by creating entries for each UNIQUE
602 ** index and making sure that duplicate entries do not already exist.
603 ** Add the new records to the indices as we go.
604 */
drh9cfcf5d2002-01-29 18:41:24 +0000605 extra = 0;
606 for(extra=(-1), iCur=0, pIdx=pTab->pIndex; pIdx; pIdx=pIdx->pNext, iCur++){
drh9cfcf5d2002-01-29 18:41:24 +0000607 if( aIdxUsed && aIdxUsed[iCur]==0 ) continue;
608 extra++;
609 sqliteVdbeAddOp(v, OP_Dup, nCol+extra, 1);
610 for(i=0; i<pIdx->nColumn; i++){
611 int idx = pIdx->aiColumn[i];
612 if( idx==pTab->iPKey ){
drh0ca3e242002-01-29 23:07:02 +0000613 sqliteVdbeAddOp(v, OP_Dup, i+extra+nCol+1, 1);
drh9cfcf5d2002-01-29 18:41:24 +0000614 }else{
drh0ca3e242002-01-29 23:07:02 +0000615 sqliteVdbeAddOp(v, OP_Dup, i+extra+nCol-idx, 1);
drh9cfcf5d2002-01-29 18:41:24 +0000616 }
617 }
drhf5905aa2002-05-26 20:54:33 +0000618 jumpInst1 = sqliteVdbeAddOp(v, OP_MakeIdxKey, pIdx->nColumn, 0);
drh9cfcf5d2002-01-29 18:41:24 +0000619 onError = pIdx->onError;
620 if( onError==OE_None ) continue;
621 if( overrideError!=OE_Default ){
622 onError = overrideError;
drh1c928532002-01-31 15:54:21 +0000623 }else if( onError==OE_Default ){
drh0d65dc02002-02-03 00:56:09 +0000624 onError = pParse->db->onError;
625 if( onError==OE_Default ) onError = OE_Abort;
drh9cfcf5d2002-01-29 18:41:24 +0000626 }
drhb419a922002-01-30 16:17:23 +0000627 sqliteVdbeAddOp(v, OP_Dup, extra+nCol+1+hasTwoRecnos, 1);
drhf5905aa2002-05-26 20:54:33 +0000628 jumpInst2 = sqliteVdbeAddOp(v, OP_IsUnique, base+iCur+1, 0);
drh9cfcf5d2002-01-29 18:41:24 +0000629 switch( onError ){
drh1c928532002-01-31 15:54:21 +0000630 case OE_Rollback:
631 case OE_Abort:
632 case OE_Fail: {
633 sqliteVdbeAddOp(v, OP_Halt, SQLITE_CONSTRAINT, onError);
drh9cfcf5d2002-01-29 18:41:24 +0000634 break;
635 }
636 case OE_Ignore: {
drh0ca3e242002-01-29 23:07:02 +0000637 assert( seenReplace==0 );
drhfe1a1772002-04-09 03:15:06 +0000638 sqliteVdbeAddOp(v, OP_Pop, nCol+extra+3+hasTwoRecnos, 0);
drh9cfcf5d2002-01-29 18:41:24 +0000639 sqliteVdbeAddOp(v, OP_Goto, 0, ignoreDest);
drh9cfcf5d2002-01-29 18:41:24 +0000640 break;
641 }
642 case OE_Replace: {
drhc8d30ac2002-04-12 10:08:59 +0000643 sqliteGenerateRowDelete(v, pTab, base, 0);
drh9cfcf5d2002-01-29 18:41:24 +0000644 if( isUpdate ){
drhb419a922002-01-30 16:17:23 +0000645 sqliteVdbeAddOp(v, OP_Dup, nCol+extra+1+hasTwoRecnos, 1);
drh0ca3e242002-01-29 23:07:02 +0000646 sqliteVdbeAddOp(v, OP_MoveTo, base, 0);
drh9cfcf5d2002-01-29 18:41:24 +0000647 }
drh0ca3e242002-01-29 23:07:02 +0000648 seenReplace = 1;
drh9cfcf5d2002-01-29 18:41:24 +0000649 break;
650 }
drh0ca3e242002-01-29 23:07:02 +0000651 default: assert(0);
drh9cfcf5d2002-01-29 18:41:24 +0000652 }
653 contAddr = sqliteVdbeCurrentAddr(v);
drh0bd1f4e2002-06-06 18:54:39 +0000654#if NULL_DISTINCT_FOR_UNIQUE
drhf5905aa2002-05-26 20:54:33 +0000655 sqliteVdbeChangeP2(v, jumpInst1, contAddr);
drh0bd1f4e2002-06-06 18:54:39 +0000656#endif
drhf5905aa2002-05-26 20:54:33 +0000657 sqliteVdbeChangeP2(v, jumpInst2, contAddr);
drh9cfcf5d2002-01-29 18:41:24 +0000658 }
659}
drh0ca3e242002-01-29 23:07:02 +0000660
661/*
662** This routine generates code to finish the INSERT or UPDATE operation
663** that was started by a prior call to sqliteGenerateConstraintChecks.
664** The stack must contain keys for all active indices followed by data
665** and the recno for the new entry. This routine creates the new
666** entries in all indices and in the main table.
667**
drhb419a922002-01-30 16:17:23 +0000668** The arguments to this routine should be the same as the first six
drh0ca3e242002-01-29 23:07:02 +0000669** arguments to sqliteGenerateConstraintChecks.
670*/
671void sqliteCompleteInsertion(
672 Parse *pParse, /* The parser context */
673 Table *pTab, /* the table into which we are inserting */
674 int base, /* Index of a read/write cursor pointing at pTab */
675 char *aIdxUsed, /* Which indices are used. NULL means all are used */
drhb419a922002-01-30 16:17:23 +0000676 int recnoChng, /* True if the record number will change */
677 int isUpdate /* True for UPDATE, False for INSERT */
drh0ca3e242002-01-29 23:07:02 +0000678){
679 int i;
680 Vdbe *v;
681 int nIdx;
682 Index *pIdx;
683
684 v = sqliteGetVdbe(pParse);
685 assert( v!=0 );
drh417be792002-03-03 18:59:40 +0000686 assert( pTab->pSelect==0 ); /* This table is not a VIEW */
drh0ca3e242002-01-29 23:07:02 +0000687 for(nIdx=0, pIdx=pTab->pIndex; pIdx; pIdx=pIdx->pNext, nIdx++){}
688 for(i=nIdx-1; i>=0; i--){
689 if( aIdxUsed && aIdxUsed[i]==0 ) continue;
690 sqliteVdbeAddOp(v, OP_IdxPut, base+i+1, 0);
691 }
692 sqliteVdbeAddOp(v, OP_MakeRecord, pTab->nCol, 0);
danielk1977c3f9bad2002-05-15 08:30:12 +0000693 sqliteVdbeAddOp(v, OP_PutIntKey, base, pParse->trigStack?0:1);
drhb419a922002-01-30 16:17:23 +0000694 if( isUpdate && recnoChng ){
drh0ca3e242002-01-29 23:07:02 +0000695 sqliteVdbeAddOp(v, OP_Pop, 1, 0);
696 }
697}