OLD | NEW |
| (Empty) |
1 /* | |
2 ** 2005 February 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 used to generate VDBE code | |
13 ** that implements the ALTER TABLE command. | |
14 */ | |
15 #include "sqliteInt.h" | |
16 | |
17 /* | |
18 ** The code in this file only exists if we are not omitting the | |
19 ** ALTER TABLE logic from the build. | |
20 */ | |
21 #ifndef SQLITE_OMIT_ALTERTABLE | |
22 | |
23 | |
24 /* | |
25 ** This function is used by SQL generated to implement the | |
26 ** ALTER TABLE command. The first argument is the text of a CREATE TABLE or | |
27 ** CREATE INDEX command. The second is a table name. The table name in | |
28 ** the CREATE TABLE or CREATE INDEX statement is replaced with the third | |
29 ** argument and the result returned. Examples: | |
30 ** | |
31 ** sqlite_rename_table('CREATE TABLE abc(a, b, c)', 'def') | |
32 ** -> 'CREATE TABLE def(a, b, c)' | |
33 ** | |
34 ** sqlite_rename_table('CREATE INDEX i ON abc(a)', 'def') | |
35 ** -> 'CREATE INDEX i ON def(a, b, c)' | |
36 */ | |
37 static void renameTableFunc( | |
38 sqlite3_context *context, | |
39 int NotUsed, | |
40 sqlite3_value **argv | |
41 ){ | |
42 unsigned char const *zSql = sqlite3_value_text(argv[0]); | |
43 unsigned char const *zTableName = sqlite3_value_text(argv[1]); | |
44 | |
45 int token; | |
46 Token tname; | |
47 unsigned char const *zCsr = zSql; | |
48 int len = 0; | |
49 char *zRet; | |
50 | |
51 sqlite3 *db = sqlite3_context_db_handle(context); | |
52 | |
53 UNUSED_PARAMETER(NotUsed); | |
54 | |
55 /* The principle used to locate the table name in the CREATE TABLE | |
56 ** statement is that the table name is the first non-space token that | |
57 ** is immediately followed by a TK_LP or TK_USING token. | |
58 */ | |
59 if( zSql ){ | |
60 do { | |
61 if( !*zCsr ){ | |
62 /* Ran out of input before finding an opening bracket. Return NULL. */ | |
63 return; | |
64 } | |
65 | |
66 /* Store the token that zCsr points to in tname. */ | |
67 tname.z = (char*)zCsr; | |
68 tname.n = len; | |
69 | |
70 /* Advance zCsr to the next token. Store that token type in 'token', | |
71 ** and its length in 'len' (to be used next iteration of this loop). | |
72 */ | |
73 do { | |
74 zCsr += len; | |
75 len = sqlite3GetToken(zCsr, &token); | |
76 } while( token==TK_SPACE ); | |
77 assert( len>0 ); | |
78 } while( token!=TK_LP && token!=TK_USING ); | |
79 | |
80 zRet = sqlite3MPrintf(db, "%.*s\"%w\"%s", (int)(((u8*)tname.z) - zSql), | |
81 zSql, zTableName, tname.z+tname.n); | |
82 sqlite3_result_text(context, zRet, -1, SQLITE_DYNAMIC); | |
83 } | |
84 } | |
85 | |
86 /* | |
87 ** This C function implements an SQL user function that is used by SQL code | |
88 ** generated by the ALTER TABLE ... RENAME command to modify the definition | |
89 ** of any foreign key constraints that use the table being renamed as the | |
90 ** parent table. It is passed three arguments: | |
91 ** | |
92 ** 1) The complete text of the CREATE TABLE statement being modified, | |
93 ** 2) The old name of the table being renamed, and | |
94 ** 3) The new name of the table being renamed. | |
95 ** | |
96 ** It returns the new CREATE TABLE statement. For example: | |
97 ** | |
98 ** sqlite_rename_parent('CREATE TABLE t1(a REFERENCES t2)', 't2', 't3') | |
99 ** -> 'CREATE TABLE t1(a REFERENCES t3)' | |
100 */ | |
101 #ifndef SQLITE_OMIT_FOREIGN_KEY | |
102 static void renameParentFunc( | |
103 sqlite3_context *context, | |
104 int NotUsed, | |
105 sqlite3_value **argv | |
106 ){ | |
107 sqlite3 *db = sqlite3_context_db_handle(context); | |
108 char *zOutput = 0; | |
109 char *zResult; | |
110 unsigned char const *zInput = sqlite3_value_text(argv[0]); | |
111 unsigned char const *zOld = sqlite3_value_text(argv[1]); | |
112 unsigned char const *zNew = sqlite3_value_text(argv[2]); | |
113 | |
114 unsigned const char *z; /* Pointer to token */ | |
115 int n; /* Length of token z */ | |
116 int token; /* Type of token */ | |
117 | |
118 UNUSED_PARAMETER(NotUsed); | |
119 if( zInput==0 || zOld==0 ) return; | |
120 for(z=zInput; *z; z=z+n){ | |
121 n = sqlite3GetToken(z, &token); | |
122 if( token==TK_REFERENCES ){ | |
123 char *zParent; | |
124 do { | |
125 z += n; | |
126 n = sqlite3GetToken(z, &token); | |
127 }while( token==TK_SPACE ); | |
128 | |
129 zParent = sqlite3DbStrNDup(db, (const char *)z, n); | |
130 if( zParent==0 ) break; | |
131 sqlite3Dequote(zParent); | |
132 if( 0==sqlite3StrICmp((const char *)zOld, zParent) ){ | |
133 char *zOut = sqlite3MPrintf(db, "%s%.*s\"%w\"", | |
134 (zOutput?zOutput:""), (int)(z-zInput), zInput, (const char *)zNew | |
135 ); | |
136 sqlite3DbFree(db, zOutput); | |
137 zOutput = zOut; | |
138 zInput = &z[n]; | |
139 } | |
140 sqlite3DbFree(db, zParent); | |
141 } | |
142 } | |
143 | |
144 zResult = sqlite3MPrintf(db, "%s%s", (zOutput?zOutput:""), zInput), | |
145 sqlite3_result_text(context, zResult, -1, SQLITE_DYNAMIC); | |
146 sqlite3DbFree(db, zOutput); | |
147 } | |
148 #endif | |
149 | |
150 #ifndef SQLITE_OMIT_TRIGGER | |
151 /* This function is used by SQL generated to implement the | |
152 ** ALTER TABLE command. The first argument is the text of a CREATE TRIGGER | |
153 ** statement. The second is a table name. The table name in the CREATE | |
154 ** TRIGGER statement is replaced with the third argument and the result | |
155 ** returned. This is analagous to renameTableFunc() above, except for CREATE | |
156 ** TRIGGER, not CREATE INDEX and CREATE TABLE. | |
157 */ | |
158 static void renameTriggerFunc( | |
159 sqlite3_context *context, | |
160 int NotUsed, | |
161 sqlite3_value **argv | |
162 ){ | |
163 unsigned char const *zSql = sqlite3_value_text(argv[0]); | |
164 unsigned char const *zTableName = sqlite3_value_text(argv[1]); | |
165 | |
166 int token; | |
167 Token tname; | |
168 int dist = 3; | |
169 unsigned char const *zCsr = zSql; | |
170 int len = 0; | |
171 char *zRet; | |
172 sqlite3 *db = sqlite3_context_db_handle(context); | |
173 | |
174 UNUSED_PARAMETER(NotUsed); | |
175 | |
176 /* The principle used to locate the table name in the CREATE TRIGGER | |
177 ** statement is that the table name is the first token that is immediately | |
178 ** preceded by either TK_ON or TK_DOT and immediately followed by one | |
179 ** of TK_WHEN, TK_BEGIN or TK_FOR. | |
180 */ | |
181 if( zSql ){ | |
182 do { | |
183 | |
184 if( !*zCsr ){ | |
185 /* Ran out of input before finding the table name. Return NULL. */ | |
186 return; | |
187 } | |
188 | |
189 /* Store the token that zCsr points to in tname. */ | |
190 tname.z = (char*)zCsr; | |
191 tname.n = len; | |
192 | |
193 /* Advance zCsr to the next token. Store that token type in 'token', | |
194 ** and its length in 'len' (to be used next iteration of this loop). | |
195 */ | |
196 do { | |
197 zCsr += len; | |
198 len = sqlite3GetToken(zCsr, &token); | |
199 }while( token==TK_SPACE ); | |
200 assert( len>0 ); | |
201 | |
202 /* Variable 'dist' stores the number of tokens read since the most | |
203 ** recent TK_DOT or TK_ON. This means that when a WHEN, FOR or BEGIN | |
204 ** token is read and 'dist' equals 2, the condition stated above | |
205 ** to be met. | |
206 ** | |
207 ** Note that ON cannot be a database, table or column name, so | |
208 ** there is no need to worry about syntax like | |
209 ** "CREATE TRIGGER ... ON ON.ON BEGIN ..." etc. | |
210 */ | |
211 dist++; | |
212 if( token==TK_DOT || token==TK_ON ){ | |
213 dist = 0; | |
214 } | |
215 } while( dist!=2 || (token!=TK_WHEN && token!=TK_FOR && token!=TK_BEGIN) ); | |
216 | |
217 /* Variable tname now contains the token that is the old table-name | |
218 ** in the CREATE TRIGGER statement. | |
219 */ | |
220 zRet = sqlite3MPrintf(db, "%.*s\"%w\"%s", (int)(((u8*)tname.z) - zSql), | |
221 zSql, zTableName, tname.z+tname.n); | |
222 sqlite3_result_text(context, zRet, -1, SQLITE_DYNAMIC); | |
223 } | |
224 } | |
225 #endif /* !SQLITE_OMIT_TRIGGER */ | |
226 | |
227 /* | |
228 ** Register built-in functions used to help implement ALTER TABLE | |
229 */ | |
230 void sqlite3AlterFunctions(void){ | |
231 static SQLITE_WSD FuncDef aAlterTableFuncs[] = { | |
232 FUNCTION(sqlite_rename_table, 2, 0, 0, renameTableFunc), | |
233 #ifndef SQLITE_OMIT_TRIGGER | |
234 FUNCTION(sqlite_rename_trigger, 2, 0, 0, renameTriggerFunc), | |
235 #endif | |
236 #ifndef SQLITE_OMIT_FOREIGN_KEY | |
237 FUNCTION(sqlite_rename_parent, 3, 0, 0, renameParentFunc), | |
238 #endif | |
239 }; | |
240 int i; | |
241 FuncDefHash *pHash = &GLOBAL(FuncDefHash, sqlite3GlobalFunctions); | |
242 FuncDef *aFunc = (FuncDef*)&GLOBAL(FuncDef, aAlterTableFuncs); | |
243 | |
244 for(i=0; i<ArraySize(aAlterTableFuncs); i++){ | |
245 sqlite3FuncDefInsert(pHash, &aFunc[i]); | |
246 } | |
247 } | |
248 | |
249 /* | |
250 ** This function is used to create the text of expressions of the form: | |
251 ** | |
252 ** name=<constant1> OR name=<constant2> OR ... | |
253 ** | |
254 ** If argument zWhere is NULL, then a pointer string containing the text | |
255 ** "name=<constant>" is returned, where <constant> is the quoted version | |
256 ** of the string passed as argument zConstant. The returned buffer is | |
257 ** allocated using sqlite3DbMalloc(). It is the responsibility of the | |
258 ** caller to ensure that it is eventually freed. | |
259 ** | |
260 ** If argument zWhere is not NULL, then the string returned is | |
261 ** "<where> OR name=<constant>", where <where> is the contents of zWhere. | |
262 ** In this case zWhere is passed to sqlite3DbFree() before returning. | |
263 ** | |
264 */ | |
265 static char *whereOrName(sqlite3 *db, char *zWhere, char *zConstant){ | |
266 char *zNew; | |
267 if( !zWhere ){ | |
268 zNew = sqlite3MPrintf(db, "name=%Q", zConstant); | |
269 }else{ | |
270 zNew = sqlite3MPrintf(db, "%s OR name=%Q", zWhere, zConstant); | |
271 sqlite3DbFree(db, zWhere); | |
272 } | |
273 return zNew; | |
274 } | |
275 | |
276 #if !defined(SQLITE_OMIT_FOREIGN_KEY) && !defined(SQLITE_OMIT_TRIGGER) | |
277 /* | |
278 ** Generate the text of a WHERE expression which can be used to select all | |
279 ** tables that have foreign key constraints that refer to table pTab (i.e. | |
280 ** constraints for which pTab is the parent table) from the sqlite_master | |
281 ** table. | |
282 */ | |
283 static char *whereForeignKeys(Parse *pParse, Table *pTab){ | |
284 FKey *p; | |
285 char *zWhere = 0; | |
286 for(p=sqlite3FkReferences(pTab); p; p=p->pNextTo){ | |
287 zWhere = whereOrName(pParse->db, zWhere, p->pFrom->zName); | |
288 } | |
289 return zWhere; | |
290 } | |
291 #endif | |
292 | |
293 /* | |
294 ** Generate the text of a WHERE expression which can be used to select all | |
295 ** temporary triggers on table pTab from the sqlite_temp_master table. If | |
296 ** table pTab has no temporary triggers, or is itself stored in the | |
297 ** temporary database, NULL is returned. | |
298 */ | |
299 static char *whereTempTriggers(Parse *pParse, Table *pTab){ | |
300 Trigger *pTrig; | |
301 char *zWhere = 0; | |
302 const Schema *pTempSchema = pParse->db->aDb[1].pSchema; /* Temp db schema */ | |
303 | |
304 /* If the table is not located in the temp-db (in which case NULL is | |
305 ** returned, loop through the tables list of triggers. For each trigger | |
306 ** that is not part of the temp-db schema, add a clause to the WHERE | |
307 ** expression being built up in zWhere. | |
308 */ | |
309 if( pTab->pSchema!=pTempSchema ){ | |
310 sqlite3 *db = pParse->db; | |
311 for(pTrig=sqlite3TriggerList(pParse, pTab); pTrig; pTrig=pTrig->pNext){ | |
312 if( pTrig->pSchema==pTempSchema ){ | |
313 zWhere = whereOrName(db, zWhere, pTrig->zName); | |
314 } | |
315 } | |
316 } | |
317 if( zWhere ){ | |
318 char *zNew = sqlite3MPrintf(pParse->db, "type='trigger' AND (%s)", zWhere); | |
319 sqlite3DbFree(pParse->db, zWhere); | |
320 zWhere = zNew; | |
321 } | |
322 return zWhere; | |
323 } | |
324 | |
325 /* | |
326 ** Generate code to drop and reload the internal representation of table | |
327 ** pTab from the database, including triggers and temporary triggers. | |
328 ** Argument zName is the name of the table in the database schema at | |
329 ** the time the generated code is executed. This can be different from | |
330 ** pTab->zName if this function is being called to code part of an | |
331 ** "ALTER TABLE RENAME TO" statement. | |
332 */ | |
333 static void reloadTableSchema(Parse *pParse, Table *pTab, const char *zName){ | |
334 Vdbe *v; | |
335 char *zWhere; | |
336 int iDb; /* Index of database containing pTab */ | |
337 #ifndef SQLITE_OMIT_TRIGGER | |
338 Trigger *pTrig; | |
339 #endif | |
340 | |
341 v = sqlite3GetVdbe(pParse); | |
342 if( NEVER(v==0) ) return; | |
343 assert( sqlite3BtreeHoldsAllMutexes(pParse->db) ); | |
344 iDb = sqlite3SchemaToIndex(pParse->db, pTab->pSchema); | |
345 assert( iDb>=0 ); | |
346 | |
347 #ifndef SQLITE_OMIT_TRIGGER | |
348 /* Drop any table triggers from the internal schema. */ | |
349 for(pTrig=sqlite3TriggerList(pParse, pTab); pTrig; pTrig=pTrig->pNext){ | |
350 int iTrigDb = sqlite3SchemaToIndex(pParse->db, pTrig->pSchema); | |
351 assert( iTrigDb==iDb || iTrigDb==1 ); | |
352 sqlite3VdbeAddOp4(v, OP_DropTrigger, iTrigDb, 0, 0, pTrig->zName, 0); | |
353 } | |
354 #endif | |
355 | |
356 /* Drop the table and index from the internal schema. */ | |
357 sqlite3VdbeAddOp4(v, OP_DropTable, iDb, 0, 0, pTab->zName, 0); | |
358 | |
359 /* Reload the table, index and permanent trigger schemas. */ | |
360 zWhere = sqlite3MPrintf(pParse->db, "tbl_name=%Q", zName); | |
361 if( !zWhere ) return; | |
362 sqlite3VdbeAddParseSchemaOp(v, iDb, zWhere); | |
363 | |
364 #ifndef SQLITE_OMIT_TRIGGER | |
365 /* Now, if the table is not stored in the temp database, reload any temp | |
366 ** triggers. Don't use IN(...) in case SQLITE_OMIT_SUBQUERY is defined. | |
367 */ | |
368 if( (zWhere=whereTempTriggers(pParse, pTab))!=0 ){ | |
369 sqlite3VdbeAddParseSchemaOp(v, 1, zWhere); | |
370 } | |
371 #endif | |
372 } | |
373 | |
374 /* | |
375 ** Parameter zName is the name of a table that is about to be altered | |
376 ** (either with ALTER TABLE ... RENAME TO or ALTER TABLE ... ADD COLUMN). | |
377 ** If the table is a system table, this function leaves an error message | |
378 ** in pParse->zErr (system tables may not be altered) and returns non-zero. | |
379 ** | |
380 ** Or, if zName is not a system table, zero is returned. | |
381 */ | |
382 static int isSystemTable(Parse *pParse, const char *zName){ | |
383 if( sqlite3Strlen30(zName)>6 && 0==sqlite3StrNICmp(zName, "sqlite_", 7) ){ | |
384 sqlite3ErrorMsg(pParse, "table %s may not be altered", zName); | |
385 return 1; | |
386 } | |
387 return 0; | |
388 } | |
389 | |
390 /* | |
391 ** Generate code to implement the "ALTER TABLE xxx RENAME TO yyy" | |
392 ** command. | |
393 */ | |
394 void sqlite3AlterRenameTable( | |
395 Parse *pParse, /* Parser context. */ | |
396 SrcList *pSrc, /* The table to rename. */ | |
397 Token *pName /* The new table name. */ | |
398 ){ | |
399 int iDb; /* Database that contains the table */ | |
400 char *zDb; /* Name of database iDb */ | |
401 Table *pTab; /* Table being renamed */ | |
402 char *zName = 0; /* NULL-terminated version of pName */ | |
403 sqlite3 *db = pParse->db; /* Database connection */ | |
404 int nTabName; /* Number of UTF-8 characters in zTabName */ | |
405 const char *zTabName; /* Original name of the table */ | |
406 Vdbe *v; | |
407 #ifndef SQLITE_OMIT_TRIGGER | |
408 char *zWhere = 0; /* Where clause to locate temp triggers */ | |
409 #endif | |
410 VTable *pVTab = 0; /* Non-zero if this is a v-tab with an xRename() */ | |
411 int savedDbFlags; /* Saved value of db->flags */ | |
412 | |
413 savedDbFlags = db->flags; | |
414 if( NEVER(db->mallocFailed) ) goto exit_rename_table; | |
415 assert( pSrc->nSrc==1 ); | |
416 assert( sqlite3BtreeHoldsAllMutexes(pParse->db) ); | |
417 | |
418 pTab = sqlite3LocateTableItem(pParse, 0, &pSrc->a[0]); | |
419 if( !pTab ) goto exit_rename_table; | |
420 iDb = sqlite3SchemaToIndex(pParse->db, pTab->pSchema); | |
421 zDb = db->aDb[iDb].zName; | |
422 db->flags |= SQLITE_PreferBuiltin; | |
423 | |
424 /* Get a NULL terminated version of the new table name. */ | |
425 zName = sqlite3NameFromToken(db, pName); | |
426 if( !zName ) goto exit_rename_table; | |
427 | |
428 /* Check that a table or index named 'zName' does not already exist | |
429 ** in database iDb. If so, this is an error. | |
430 */ | |
431 if( sqlite3FindTable(db, zName, zDb) || sqlite3FindIndex(db, zName, zDb) ){ | |
432 sqlite3ErrorMsg(pParse, | |
433 "there is already another table or index with this name: %s", zName); | |
434 goto exit_rename_table; | |
435 } | |
436 | |
437 /* Make sure it is not a system table being altered, or a reserved name | |
438 ** that the table is being renamed to. | |
439 */ | |
440 if( SQLITE_OK!=isSystemTable(pParse, pTab->zName) ){ | |
441 goto exit_rename_table; | |
442 } | |
443 if( SQLITE_OK!=sqlite3CheckObjectName(pParse, zName) ){ goto | |
444 exit_rename_table; | |
445 } | |
446 | |
447 #ifndef SQLITE_OMIT_VIEW | |
448 if( pTab->pSelect ){ | |
449 sqlite3ErrorMsg(pParse, "view %s may not be altered", pTab->zName); | |
450 goto exit_rename_table; | |
451 } | |
452 #endif | |
453 | |
454 #ifndef SQLITE_OMIT_AUTHORIZATION | |
455 /* Invoke the authorization callback. */ | |
456 if( sqlite3AuthCheck(pParse, SQLITE_ALTER_TABLE, zDb, pTab->zName, 0) ){ | |
457 goto exit_rename_table; | |
458 } | |
459 #endif | |
460 | |
461 #ifndef SQLITE_OMIT_VIRTUALTABLE | |
462 if( sqlite3ViewGetColumnNames(pParse, pTab) ){ | |
463 goto exit_rename_table; | |
464 } | |
465 if( IsVirtual(pTab) ){ | |
466 pVTab = sqlite3GetVTable(db, pTab); | |
467 if( pVTab->pVtab->pModule->xRename==0 ){ | |
468 pVTab = 0; | |
469 } | |
470 } | |
471 #endif | |
472 | |
473 /* Begin a transaction for database iDb. | |
474 ** Then modify the schema cookie (since the ALTER TABLE modifies the | |
475 ** schema). Open a statement transaction if the table is a virtual | |
476 ** table. | |
477 */ | |
478 v = sqlite3GetVdbe(pParse); | |
479 if( v==0 ){ | |
480 goto exit_rename_table; | |
481 } | |
482 sqlite3BeginWriteOperation(pParse, pVTab!=0, iDb); | |
483 sqlite3ChangeCookie(pParse, iDb); | |
484 | |
485 /* If this is a virtual table, invoke the xRename() function if | |
486 ** one is defined. The xRename() callback will modify the names | |
487 ** of any resources used by the v-table implementation (including other | |
488 ** SQLite tables) that are identified by the name of the virtual table. | |
489 */ | |
490 #ifndef SQLITE_OMIT_VIRTUALTABLE | |
491 if( pVTab ){ | |
492 int i = ++pParse->nMem; | |
493 sqlite3VdbeAddOp4(v, OP_String8, 0, i, 0, zName, 0); | |
494 sqlite3VdbeAddOp4(v, OP_VRename, i, 0, 0,(const char*)pVTab, P4_VTAB); | |
495 sqlite3MayAbort(pParse); | |
496 } | |
497 #endif | |
498 | |
499 /* figure out how many UTF-8 characters are in zName */ | |
500 zTabName = pTab->zName; | |
501 nTabName = sqlite3Utf8CharLen(zTabName, -1); | |
502 | |
503 #if !defined(SQLITE_OMIT_FOREIGN_KEY) && !defined(SQLITE_OMIT_TRIGGER) | |
504 if( db->flags&SQLITE_ForeignKeys ){ | |
505 /* If foreign-key support is enabled, rewrite the CREATE TABLE | |
506 ** statements corresponding to all child tables of foreign key constraints | |
507 ** for which the renamed table is the parent table. */ | |
508 if( (zWhere=whereForeignKeys(pParse, pTab))!=0 ){ | |
509 sqlite3NestedParse(pParse, | |
510 "UPDATE \"%w\".%s SET " | |
511 "sql = sqlite_rename_parent(sql, %Q, %Q) " | |
512 "WHERE %s;", zDb, SCHEMA_TABLE(iDb), zTabName, zName, zWhere); | |
513 sqlite3DbFree(db, zWhere); | |
514 } | |
515 } | |
516 #endif | |
517 | |
518 /* Modify the sqlite_master table to use the new table name. */ | |
519 sqlite3NestedParse(pParse, | |
520 "UPDATE %Q.%s SET " | |
521 #ifdef SQLITE_OMIT_TRIGGER | |
522 "sql = sqlite_rename_table(sql, %Q), " | |
523 #else | |
524 "sql = CASE " | |
525 "WHEN type = 'trigger' THEN sqlite_rename_trigger(sql, %Q)" | |
526 "ELSE sqlite_rename_table(sql, %Q) END, " | |
527 #endif | |
528 "tbl_name = %Q, " | |
529 "name = CASE " | |
530 "WHEN type='table' THEN %Q " | |
531 "WHEN name LIKE 'sqlite_autoindex%%' AND type='index' THEN " | |
532 "'sqlite_autoindex_' || %Q || substr(name,%d+18) " | |
533 "ELSE name END " | |
534 "WHERE tbl_name=%Q COLLATE nocase AND " | |
535 "(type='table' OR type='index' OR type='trigger');", | |
536 zDb, SCHEMA_TABLE(iDb), zName, zName, zName, | |
537 #ifndef SQLITE_OMIT_TRIGGER | |
538 zName, | |
539 #endif | |
540 zName, nTabName, zTabName | |
541 ); | |
542 | |
543 #ifndef SQLITE_OMIT_AUTOINCREMENT | |
544 /* If the sqlite_sequence table exists in this database, then update | |
545 ** it with the new table name. | |
546 */ | |
547 if( sqlite3FindTable(db, "sqlite_sequence", zDb) ){ | |
548 sqlite3NestedParse(pParse, | |
549 "UPDATE \"%w\".sqlite_sequence set name = %Q WHERE name = %Q", | |
550 zDb, zName, pTab->zName); | |
551 } | |
552 #endif | |
553 | |
554 #ifndef SQLITE_OMIT_TRIGGER | |
555 /* If there are TEMP triggers on this table, modify the sqlite_temp_master | |
556 ** table. Don't do this if the table being ALTERed is itself located in | |
557 ** the temp database. | |
558 */ | |
559 if( (zWhere=whereTempTriggers(pParse, pTab))!=0 ){ | |
560 sqlite3NestedParse(pParse, | |
561 "UPDATE sqlite_temp_master SET " | |
562 "sql = sqlite_rename_trigger(sql, %Q), " | |
563 "tbl_name = %Q " | |
564 "WHERE %s;", zName, zName, zWhere); | |
565 sqlite3DbFree(db, zWhere); | |
566 } | |
567 #endif | |
568 | |
569 #if !defined(SQLITE_OMIT_FOREIGN_KEY) && !defined(SQLITE_OMIT_TRIGGER) | |
570 if( db->flags&SQLITE_ForeignKeys ){ | |
571 FKey *p; | |
572 for(p=sqlite3FkReferences(pTab); p; p=p->pNextTo){ | |
573 Table *pFrom = p->pFrom; | |
574 if( pFrom!=pTab ){ | |
575 reloadTableSchema(pParse, p->pFrom, pFrom->zName); | |
576 } | |
577 } | |
578 } | |
579 #endif | |
580 | |
581 /* Drop and reload the internal table schema. */ | |
582 reloadTableSchema(pParse, pTab, zName); | |
583 | |
584 exit_rename_table: | |
585 sqlite3SrcListDelete(db, pSrc); | |
586 sqlite3DbFree(db, zName); | |
587 db->flags = savedDbFlags; | |
588 } | |
589 | |
590 | |
591 /* | |
592 ** Generate code to make sure the file format number is at least minFormat. | |
593 ** The generated code will increase the file format number if necessary. | |
594 */ | |
595 void sqlite3MinimumFileFormat(Parse *pParse, int iDb, int minFormat){ | |
596 Vdbe *v; | |
597 v = sqlite3GetVdbe(pParse); | |
598 /* The VDBE should have been allocated before this routine is called. | |
599 ** If that allocation failed, we would have quit before reaching this | |
600 ** point */ | |
601 if( ALWAYS(v) ){ | |
602 int r1 = sqlite3GetTempReg(pParse); | |
603 int r2 = sqlite3GetTempReg(pParse); | |
604 int j1; | |
605 sqlite3VdbeAddOp3(v, OP_ReadCookie, iDb, r1, BTREE_FILE_FORMAT); | |
606 sqlite3VdbeUsesBtree(v, iDb); | |
607 sqlite3VdbeAddOp2(v, OP_Integer, minFormat, r2); | |
608 j1 = sqlite3VdbeAddOp3(v, OP_Ge, r2, 0, r1); | |
609 sqlite3VdbeChangeP5(v, SQLITE_NOTNULL); VdbeCoverage(v); | |
610 sqlite3VdbeAddOp3(v, OP_SetCookie, iDb, BTREE_FILE_FORMAT, r2); | |
611 sqlite3VdbeJumpHere(v, j1); | |
612 sqlite3ReleaseTempReg(pParse, r1); | |
613 sqlite3ReleaseTempReg(pParse, r2); | |
614 } | |
615 } | |
616 | |
617 /* | |
618 ** This function is called after an "ALTER TABLE ... ADD" statement | |
619 ** has been parsed. Argument pColDef contains the text of the new | |
620 ** column definition. | |
621 ** | |
622 ** The Table structure pParse->pNewTable was extended to include | |
623 ** the new column during parsing. | |
624 */ | |
625 void sqlite3AlterFinishAddColumn(Parse *pParse, Token *pColDef){ | |
626 Table *pNew; /* Copy of pParse->pNewTable */ | |
627 Table *pTab; /* Table being altered */ | |
628 int iDb; /* Database number */ | |
629 const char *zDb; /* Database name */ | |
630 const char *zTab; /* Table name */ | |
631 char *zCol; /* Null-terminated column definition */ | |
632 Column *pCol; /* The new column */ | |
633 Expr *pDflt; /* Default value for the new column */ | |
634 sqlite3 *db; /* The database connection; */ | |
635 | |
636 db = pParse->db; | |
637 if( pParse->nErr || db->mallocFailed ) return; | |
638 pNew = pParse->pNewTable; | |
639 assert( pNew ); | |
640 | |
641 assert( sqlite3BtreeHoldsAllMutexes(db) ); | |
642 iDb = sqlite3SchemaToIndex(db, pNew->pSchema); | |
643 zDb = db->aDb[iDb].zName; | |
644 zTab = &pNew->zName[16]; /* Skip the "sqlite_altertab_" prefix on the name */ | |
645 pCol = &pNew->aCol[pNew->nCol-1]; | |
646 pDflt = pCol->pDflt; | |
647 pTab = sqlite3FindTable(db, zTab, zDb); | |
648 assert( pTab ); | |
649 | |
650 #ifndef SQLITE_OMIT_AUTHORIZATION | |
651 /* Invoke the authorization callback. */ | |
652 if( sqlite3AuthCheck(pParse, SQLITE_ALTER_TABLE, zDb, pTab->zName, 0) ){ | |
653 return; | |
654 } | |
655 #endif | |
656 | |
657 /* If the default value for the new column was specified with a | |
658 ** literal NULL, then set pDflt to 0. This simplifies checking | |
659 ** for an SQL NULL default below. | |
660 */ | |
661 if( pDflt && pDflt->op==TK_NULL ){ | |
662 pDflt = 0; | |
663 } | |
664 | |
665 /* Check that the new column is not specified as PRIMARY KEY or UNIQUE. | |
666 ** If there is a NOT NULL constraint, then the default value for the | |
667 ** column must not be NULL. | |
668 */ | |
669 if( pCol->colFlags & COLFLAG_PRIMKEY ){ | |
670 sqlite3ErrorMsg(pParse, "Cannot add a PRIMARY KEY column"); | |
671 return; | |
672 } | |
673 if( pNew->pIndex ){ | |
674 sqlite3ErrorMsg(pParse, "Cannot add a UNIQUE column"); | |
675 return; | |
676 } | |
677 if( (db->flags&SQLITE_ForeignKeys) && pNew->pFKey && pDflt ){ | |
678 sqlite3ErrorMsg(pParse, | |
679 "Cannot add a REFERENCES column with non-NULL default value"); | |
680 return; | |
681 } | |
682 if( pCol->notNull && !pDflt ){ | |
683 sqlite3ErrorMsg(pParse, | |
684 "Cannot add a NOT NULL column with default value NULL"); | |
685 return; | |
686 } | |
687 | |
688 /* Ensure the default expression is something that sqlite3ValueFromExpr() | |
689 ** can handle (i.e. not CURRENT_TIME etc.) | |
690 */ | |
691 if( pDflt ){ | |
692 sqlite3_value *pVal = 0; | |
693 if( sqlite3ValueFromExpr(db, pDflt, SQLITE_UTF8, SQLITE_AFF_NONE, &pVal) ){ | |
694 db->mallocFailed = 1; | |
695 return; | |
696 } | |
697 if( !pVal ){ | |
698 sqlite3ErrorMsg(pParse, "Cannot add a column with non-constant default"); | |
699 return; | |
700 } | |
701 sqlite3ValueFree(pVal); | |
702 } | |
703 | |
704 /* Modify the CREATE TABLE statement. */ | |
705 zCol = sqlite3DbStrNDup(db, (char*)pColDef->z, pColDef->n); | |
706 if( zCol ){ | |
707 char *zEnd = &zCol[pColDef->n-1]; | |
708 int savedDbFlags = db->flags; | |
709 while( zEnd>zCol && (*zEnd==';' || sqlite3Isspace(*zEnd)) ){ | |
710 *zEnd-- = '\0'; | |
711 } | |
712 db->flags |= SQLITE_PreferBuiltin; | |
713 sqlite3NestedParse(pParse, | |
714 "UPDATE \"%w\".%s SET " | |
715 "sql = substr(sql,1,%d) || ', ' || %Q || substr(sql,%d) " | |
716 "WHERE type = 'table' AND name = %Q", | |
717 zDb, SCHEMA_TABLE(iDb), pNew->addColOffset, zCol, pNew->addColOffset+1, | |
718 zTab | |
719 ); | |
720 sqlite3DbFree(db, zCol); | |
721 db->flags = savedDbFlags; | |
722 } | |
723 | |
724 /* If the default value of the new column is NULL, then set the file | |
725 ** format to 2. If the default value of the new column is not NULL, | |
726 ** the file format becomes 3. | |
727 */ | |
728 sqlite3MinimumFileFormat(pParse, iDb, pDflt ? 3 : 2); | |
729 | |
730 /* Reload the schema of the modified table. */ | |
731 reloadTableSchema(pParse, pTab, pTab->zName); | |
732 } | |
733 | |
734 /* | |
735 ** This function is called by the parser after the table-name in | |
736 ** an "ALTER TABLE <table-name> ADD" statement is parsed. Argument | |
737 ** pSrc is the full-name of the table being altered. | |
738 ** | |
739 ** This routine makes a (partial) copy of the Table structure | |
740 ** for the table being altered and sets Parse.pNewTable to point | |
741 ** to it. Routines called by the parser as the column definition | |
742 ** is parsed (i.e. sqlite3AddColumn()) add the new Column data to | |
743 ** the copy. The copy of the Table structure is deleted by tokenize.c | |
744 ** after parsing is finished. | |
745 ** | |
746 ** Routine sqlite3AlterFinishAddColumn() will be called to complete | |
747 ** coding the "ALTER TABLE ... ADD" statement. | |
748 */ | |
749 void sqlite3AlterBeginAddColumn(Parse *pParse, SrcList *pSrc){ | |
750 Table *pNew; | |
751 Table *pTab; | |
752 Vdbe *v; | |
753 int iDb; | |
754 int i; | |
755 int nAlloc; | |
756 sqlite3 *db = pParse->db; | |
757 | |
758 /* Look up the table being altered. */ | |
759 assert( pParse->pNewTable==0 ); | |
760 assert( sqlite3BtreeHoldsAllMutexes(db) ); | |
761 if( db->mallocFailed ) goto exit_begin_add_column; | |
762 pTab = sqlite3LocateTableItem(pParse, 0, &pSrc->a[0]); | |
763 if( !pTab ) goto exit_begin_add_column; | |
764 | |
765 #ifndef SQLITE_OMIT_VIRTUALTABLE | |
766 if( IsVirtual(pTab) ){ | |
767 sqlite3ErrorMsg(pParse, "virtual tables may not be altered"); | |
768 goto exit_begin_add_column; | |
769 } | |
770 #endif | |
771 | |
772 /* Make sure this is not an attempt to ALTER a view. */ | |
773 if( pTab->pSelect ){ | |
774 sqlite3ErrorMsg(pParse, "Cannot add a column to a view"); | |
775 goto exit_begin_add_column; | |
776 } | |
777 if( SQLITE_OK!=isSystemTable(pParse, pTab->zName) ){ | |
778 goto exit_begin_add_column; | |
779 } | |
780 | |
781 assert( pTab->addColOffset>0 ); | |
782 iDb = sqlite3SchemaToIndex(db, pTab->pSchema); | |
783 | |
784 /* Put a copy of the Table struct in Parse.pNewTable for the | |
785 ** sqlite3AddColumn() function and friends to modify. But modify | |
786 ** the name by adding an "sqlite_altertab_" prefix. By adding this | |
787 ** prefix, we insure that the name will not collide with an existing | |
788 ** table because user table are not allowed to have the "sqlite_" | |
789 ** prefix on their name. | |
790 */ | |
791 pNew = (Table*)sqlite3DbMallocZero(db, sizeof(Table)); | |
792 if( !pNew ) goto exit_begin_add_column; | |
793 pParse->pNewTable = pNew; | |
794 pNew->nRef = 1; | |
795 pNew->nCol = pTab->nCol; | |
796 assert( pNew->nCol>0 ); | |
797 nAlloc = (((pNew->nCol-1)/8)*8)+8; | |
798 assert( nAlloc>=pNew->nCol && nAlloc%8==0 && nAlloc-pNew->nCol<8 ); | |
799 pNew->aCol = (Column*)sqlite3DbMallocZero(db, sizeof(Column)*nAlloc); | |
800 pNew->zName = sqlite3MPrintf(db, "sqlite_altertab_%s", pTab->zName); | |
801 if( !pNew->aCol || !pNew->zName ){ | |
802 db->mallocFailed = 1; | |
803 goto exit_begin_add_column; | |
804 } | |
805 memcpy(pNew->aCol, pTab->aCol, sizeof(Column)*pNew->nCol); | |
806 for(i=0; i<pNew->nCol; i++){ | |
807 Column *pCol = &pNew->aCol[i]; | |
808 pCol->zName = sqlite3DbStrDup(db, pCol->zName); | |
809 pCol->zColl = 0; | |
810 pCol->zType = 0; | |
811 pCol->pDflt = 0; | |
812 pCol->zDflt = 0; | |
813 } | |
814 pNew->pSchema = db->aDb[iDb].pSchema; | |
815 pNew->addColOffset = pTab->addColOffset; | |
816 pNew->nRef = 1; | |
817 | |
818 /* Begin a transaction and increment the schema cookie. */ | |
819 sqlite3BeginWriteOperation(pParse, 0, iDb); | |
820 v = sqlite3GetVdbe(pParse); | |
821 if( !v ) goto exit_begin_add_column; | |
822 sqlite3ChangeCookie(pParse, iDb); | |
823 | |
824 exit_begin_add_column: | |
825 sqlite3SrcListDelete(db, pSrc); | |
826 return; | |
827 } | |
828 #endif /* SQLITE_ALTER_TABLE */ | |
OLD | NEW |