Annotation of embedaddon/sqlite3/src/alter.c, revision 1.1.1.1

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

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>