1 /* 2 ** 2004 April 6 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 implements an external (disk-based) database using BTrees. 13 ** See the header comment on "btreeInt.h" for additional information. 14 ** Including a description of file format and an overview of operation. 15 */ 16 #include "btreeInt.h" 17 18 /* 19 ** The header string that appears at the beginning of every 20 ** SQLite database. 21 */ 22 static const char zMagicHeader[] = SQLITE_FILE_HEADER; 23 24 /* 25 ** Set this global variable to 1 to enable tracing using the TRACE 26 ** macro. 27 */ 28 #if 0 29 int sqlite3BtreeTrace=1; /* True to enable tracing */ 30 # define TRACE(X) if(sqlite3BtreeTrace){printf X;fflush(stdout);} 31 #else 32 # define TRACE(X) 33 #endif 34 35 /* 36 ** Extract a 2-byte big-endian integer from an array of unsigned bytes. 37 ** But if the value is zero, make it 65536. 38 ** 39 ** This routine is used to extract the "offset to cell content area" value 40 ** from the header of a btree page. If the page size is 65536 and the page 41 ** is empty, the offset should be 65536, but the 2-byte value stores zero. 42 ** This routine makes the necessary adjustment to 65536. 43 */ 44 #define get2byteNotZero(X) (((((int)get2byte(X))-1)&0xffff)+1) 45 46 /* 47 ** Values passed as the 5th argument to allocateBtreePage() 48 */ 49 #define BTALLOC_ANY 0 /* Allocate any page */ 50 #define BTALLOC_EXACT 1 /* Allocate exact page if possible */ 51 #define BTALLOC_LE 2 /* Allocate any page <= the parameter */ 52 53 /* 54 ** Macro IfNotOmitAV(x) returns (x) if SQLITE_OMIT_AUTOVACUUM is not 55 ** defined, or 0 if it is. For example: 56 ** 57 ** bIncrVacuum = IfNotOmitAV(pBtShared->incrVacuum); 58 */ 59 #ifndef SQLITE_OMIT_AUTOVACUUM 60 #define IfNotOmitAV(expr) (expr) 61 #else 62 #define IfNotOmitAV(expr) 0 63 #endif 64 65 #ifndef SQLITE_OMIT_SHARED_CACHE 66 /* 67 ** A list of BtShared objects that are eligible for participation 68 ** in shared cache. This variable has file scope during normal builds, 69 ** but the test harness needs to access it so we make it global for 70 ** test builds. 71 ** 72 ** Access to this variable is protected by SQLITE_MUTEX_STATIC_MASTER. 73 */ 74 #ifdef SQLITE_TEST 75 BtShared *SQLITE_WSD sqlite3SharedCacheList = 0; 76 #else 77 static BtShared *SQLITE_WSD sqlite3SharedCacheList = 0; 78 #endif 79 #endif /* SQLITE_OMIT_SHARED_CACHE */ 80 81 #ifndef SQLITE_OMIT_SHARED_CACHE 82 /* 83 ** Enable or disable the shared pager and schema features. 84 ** 85 ** This routine has no effect on existing database connections. 86 ** The shared cache setting effects only future calls to 87 ** sqlite3_open(), sqlite3_open16(), or sqlite3_open_v2(). 88 */ 89 int sqlite3_enable_shared_cache(int enable){ 90 sqlite3GlobalConfig.sharedCacheEnabled = enable; 91 return SQLITE_OK; 92 } 93 #endif 94 95 96 97 #ifdef SQLITE_OMIT_SHARED_CACHE 98 /* 99 ** The functions querySharedCacheTableLock(), setSharedCacheTableLock(), 100 ** and clearAllSharedCacheTableLocks() 101 ** manipulate entries in the BtShared.pLock linked list used to store 102 ** shared-cache table level locks. If the library is compiled with the 103 ** shared-cache feature disabled, then there is only ever one user 104 ** of each BtShared structure and so this locking is not necessary. 105 ** So define the lock related functions as no-ops. 106 */ 107 #define querySharedCacheTableLock(a,b,c) SQLITE_OK 108 #define setSharedCacheTableLock(a,b,c) SQLITE_OK 109 #define clearAllSharedCacheTableLocks(a) 110 #define downgradeAllSharedCacheTableLocks(a) 111 #define hasSharedCacheTableLock(a,b,c,d) 1 112 #define hasReadConflicts(a, b) 0 113 #endif 114 115 #ifndef SQLITE_OMIT_SHARED_CACHE 116 117 #ifdef SQLITE_DEBUG 118 /* 119 **** This function is only used as part of an assert() statement. *** 120 ** 121 ** Check to see if pBtree holds the required locks to read or write to the 122 ** table with root page iRoot. Return 1 if it does and 0 if not. 123 ** 124 ** For example, when writing to a table with root-page iRoot via 125 ** Btree connection pBtree: 126 ** 127 ** assert( hasSharedCacheTableLock(pBtree, iRoot, 0, WRITE_LOCK) ); 128 ** 129 ** When writing to an index that resides in a sharable database, the 130 ** caller should have first obtained a lock specifying the root page of 131 ** the corresponding table. This makes things a bit more complicated, 132 ** as this module treats each table as a separate structure. To determine 133 ** the table corresponding to the index being written, this 134 ** function has to search through the database schema. 135 ** 136 ** Instead of a lock on the table/index rooted at page iRoot, the caller may 137 ** hold a write-lock on the schema table (root page 1). This is also 138 ** acceptable. 139 */ 140 static int hasSharedCacheTableLock( 141 Btree *pBtree, /* Handle that must hold lock */ 142 Pgno iRoot, /* Root page of b-tree */ 143 int isIndex, /* True if iRoot is the root of an index b-tree */ 144 int eLockType /* Required lock type (READ_LOCK or WRITE_LOCK) */ 145 ){ 146 Schema *pSchema = (Schema *)pBtree->pBt->pSchema; 147 Pgno iTab = 0; 148 BtLock *pLock; 149 150 /* If this database is not shareable, or if the client is reading 151 ** and has the read-uncommitted flag set, then no lock is required. 152 ** Return true immediately. 153 */ 154 if( (pBtree->sharable==0) 155 || (eLockType==READ_LOCK && (pBtree->db->flags & SQLITE_ReadUncommitted)) 156 ){ 157 return 1; 158 } 159 160 /* If the client is reading or writing an index and the schema is 161 ** not loaded, then it is too difficult to actually check to see if 162 ** the correct locks are held. So do not bother - just return true. 163 ** This case does not come up very often anyhow. 164 */ 165 if( isIndex && (!pSchema || (pSchema->schemaFlags&DB_SchemaLoaded)==0) ){ 166 return 1; 167 } 168 169 /* Figure out the root-page that the lock should be held on. For table 170 ** b-trees, this is just the root page of the b-tree being read or 171 ** written. For index b-trees, it is the root page of the associated 172 ** table. */ 173 if( isIndex ){ 174 HashElem *p; 175 for(p=sqliteHashFirst(&pSchema->idxHash); p; p=sqliteHashNext(p)){ 176 Index *pIdx = (Index *)sqliteHashData(p); 177 if( pIdx->tnum==(int)iRoot ){ 178 if( iTab ){ 179 /* Two or more indexes share the same root page. There must 180 ** be imposter tables. So just return true. The assert is not 181 ** useful in that case. */ 182 return 1; 183 } 184 iTab = pIdx->pTable->tnum; 185 } 186 } 187 }else{ 188 iTab = iRoot; 189 } 190 191 /* Search for the required lock. Either a write-lock on root-page iTab, a 192 ** write-lock on the schema table, or (if the client is reading) a 193 ** read-lock on iTab will suffice. Return 1 if any of these are found. */ 194 for(pLock=pBtree->pBt->pLock; pLock; pLock=pLock->pNext){ 195 if( pLock->pBtree==pBtree 196 && (pLock->iTable==iTab || (pLock->eLock==WRITE_LOCK && pLock->iTable==1)) 197 && pLock->eLock>=eLockType 198 ){ 199 return 1; 200 } 201 } 202 203 /* Failed to find the required lock. */ 204 return 0; 205 } 206 #endif /* SQLITE_DEBUG */ 207 208 #ifdef SQLITE_DEBUG 209 /* 210 **** This function may be used as part of assert() statements only. **** 211 ** 212 ** Return true if it would be illegal for pBtree to write into the 213 ** table or index rooted at iRoot because other shared connections are 214 ** simultaneously reading that same table or index. 215 ** 216 ** It is illegal for pBtree to write if some other Btree object that 217 ** shares the same BtShared object is currently reading or writing 218 ** the iRoot table. Except, if the other Btree object has the 219 ** read-uncommitted flag set, then it is OK for the other object to 220 ** have a read cursor. 221 ** 222 ** For example, before writing to any part of the table or index 223 ** rooted at page iRoot, one should call: 224 ** 225 ** assert( !hasReadConflicts(pBtree, iRoot) ); 226 */ 227 static int hasReadConflicts(Btree *pBtree, Pgno iRoot){ 228 BtCursor *p; 229 for(p=pBtree->pBt->pCursor; p; p=p->pNext){ 230 if( p->pgnoRoot==iRoot 231 && p->pBtree!=pBtree 232 && 0==(p->pBtree->db->flags & SQLITE_ReadUncommitted) 233 ){ 234 return 1; 235 } 236 } 237 return 0; 238 } 239 #endif /* #ifdef SQLITE_DEBUG */ 240 241 /* 242 ** Query to see if Btree handle p may obtain a lock of type eLock 243 ** (READ_LOCK or WRITE_LOCK) on the table with root-page iTab. Return 244 ** SQLITE_OK if the lock may be obtained (by calling 245 ** setSharedCacheTableLock()), or SQLITE_LOCKED if not. 246 */ 247 static int querySharedCacheTableLock(Btree *p, Pgno iTab, u8 eLock){ 248 BtShared *pBt = p->pBt; 249 BtLock *pIter; 250 251 assert( sqlite3BtreeHoldsMutex(p) ); 252 assert( eLock==READ_LOCK || eLock==WRITE_LOCK ); 253 assert( p->db!=0 ); 254 assert( !(p->db->flags&SQLITE_ReadUncommitted)||eLock==WRITE_LOCK||iTab==1 ); 255 256 /* If requesting a write-lock, then the Btree must have an open write 257 ** transaction on this file. And, obviously, for this to be so there 258 ** must be an open write transaction on the file itself. 259 */ 260 assert( eLock==READ_LOCK || (p==pBt->pWriter && p->inTrans==TRANS_WRITE) ); 261 assert( eLock==READ_LOCK || pBt->inTransaction==TRANS_WRITE ); 262 263 /* This routine is a no-op if the shared-cache is not enabled */ 264 if( !p->sharable ){ 265 return SQLITE_OK; 266 } 267 268 /* If some other connection is holding an exclusive lock, the 269 ** requested lock may not be obtained. 270 */ 271 if( pBt->pWriter!=p && (pBt->btsFlags & BTS_EXCLUSIVE)!=0 ){ 272 sqlite3ConnectionBlocked(p->db, pBt->pWriter->db); 273 return SQLITE_LOCKED_SHAREDCACHE; 274 } 275 276 for(pIter=pBt->pLock; pIter; pIter=pIter->pNext){ 277 /* The condition (pIter->eLock!=eLock) in the following if(...) 278 ** statement is a simplification of: 279 ** 280 ** (eLock==WRITE_LOCK || pIter->eLock==WRITE_LOCK) 281 ** 282 ** since we know that if eLock==WRITE_LOCK, then no other connection 283 ** may hold a WRITE_LOCK on any table in this file (since there can 284 ** only be a single writer). 285 */ 286 assert( pIter->eLock==READ_LOCK || pIter->eLock==WRITE_LOCK ); 287 assert( eLock==READ_LOCK || pIter->pBtree==p || pIter->eLock==READ_LOCK); 288 if( pIter->pBtree!=p && pIter->iTable==iTab && pIter->eLock!=eLock ){ 289 sqlite3ConnectionBlocked(p->db, pIter->pBtree->db); 290 if( eLock==WRITE_LOCK ){ 291 assert( p==pBt->pWriter ); 292 pBt->btsFlags |= BTS_PENDING; 293 } 294 return SQLITE_LOCKED_SHAREDCACHE; 295 } 296 } 297 return SQLITE_OK; 298 } 299 #endif /* !SQLITE_OMIT_SHARED_CACHE */ 300 301 #ifndef SQLITE_OMIT_SHARED_CACHE 302 /* 303 ** Add a lock on the table with root-page iTable to the shared-btree used 304 ** by Btree handle p. Parameter eLock must be either READ_LOCK or 305 ** WRITE_LOCK. 306 ** 307 ** This function assumes the following: 308 ** 309 ** (a) The specified Btree object p is connected to a sharable 310 ** database (one with the BtShared.sharable flag set), and 311 ** 312 ** (b) No other Btree objects hold a lock that conflicts 313 ** with the requested lock (i.e. querySharedCacheTableLock() has 314 ** already been called and returned SQLITE_OK). 315 ** 316 ** SQLITE_OK is returned if the lock is added successfully. SQLITE_NOMEM 317 ** is returned if a malloc attempt fails. 318 */ 319 static int setSharedCacheTableLock(Btree *p, Pgno iTable, u8 eLock){ 320 BtShared *pBt = p->pBt; 321 BtLock *pLock = 0; 322 BtLock *pIter; 323 324 assert( sqlite3BtreeHoldsMutex(p) ); 325 assert( eLock==READ_LOCK || eLock==WRITE_LOCK ); 326 assert( p->db!=0 ); 327 328 /* A connection with the read-uncommitted flag set will never try to 329 ** obtain a read-lock using this function. The only read-lock obtained 330 ** by a connection in read-uncommitted mode is on the sqlite_master 331 ** table, and that lock is obtained in BtreeBeginTrans(). */ 332 assert( 0==(p->db->flags&SQLITE_ReadUncommitted) || eLock==WRITE_LOCK ); 333 334 /* This function should only be called on a sharable b-tree after it 335 ** has been determined that no other b-tree holds a conflicting lock. */ 336 assert( p->sharable ); 337 assert( SQLITE_OK==querySharedCacheTableLock(p, iTable, eLock) ); 338 339 /* First search the list for an existing lock on this table. */ 340 for(pIter=pBt->pLock; pIter; pIter=pIter->pNext){ 341 if( pIter->iTable==iTable && pIter->pBtree==p ){ 342 pLock = pIter; 343 break; 344 } 345 } 346 347 /* If the above search did not find a BtLock struct associating Btree p 348 ** with table iTable, allocate one and link it into the list. 349 */ 350 if( !pLock ){ 351 pLock = (BtLock *)sqlite3MallocZero(sizeof(BtLock)); 352 if( !pLock ){ 353 return SQLITE_NOMEM; 354 } 355 pLock->iTable = iTable; 356 pLock->pBtree = p; 357 pLock->pNext = pBt->pLock; 358 pBt->pLock = pLock; 359 } 360 361 /* Set the BtLock.eLock variable to the maximum of the current lock 362 ** and the requested lock. This means if a write-lock was already held 363 ** and a read-lock requested, we don't incorrectly downgrade the lock. 364 */ 365 assert( WRITE_LOCK>READ_LOCK ); 366 if( eLock>pLock->eLock ){ 367 pLock->eLock = eLock; 368 } 369 370 return SQLITE_OK; 371 } 372 #endif /* !SQLITE_OMIT_SHARED_CACHE */ 373 374 #ifndef SQLITE_OMIT_SHARED_CACHE 375 /* 376 ** Release all the table locks (locks obtained via calls to 377 ** the setSharedCacheTableLock() procedure) held by Btree object p. 378 ** 379 ** This function assumes that Btree p has an open read or write 380 ** transaction. If it does not, then the BTS_PENDING flag 381 ** may be incorrectly cleared. 382 */ 383 static void clearAllSharedCacheTableLocks(Btree *p){ 384 BtShared *pBt = p->pBt; 385 BtLock **ppIter = &pBt->pLock; 386 387 assert( sqlite3BtreeHoldsMutex(p) ); 388 assert( p->sharable || 0==*ppIter ); 389 assert( p->inTrans>0 ); 390 391 while( *ppIter ){ 392 BtLock *pLock = *ppIter; 393 assert( (pBt->btsFlags & BTS_EXCLUSIVE)==0 || pBt->pWriter==pLock->pBtree ); 394 assert( pLock->pBtree->inTrans>=pLock->eLock ); 395 if( pLock->pBtree==p ){ 396 *ppIter = pLock->pNext; 397 assert( pLock->iTable!=1 || pLock==&p->lock ); 398 if( pLock->iTable!=1 ){ 399 sqlite3_free(pLock); 400 } 401 }else{ 402 ppIter = &pLock->pNext; 403 } 404 } 405 406 assert( (pBt->btsFlags & BTS_PENDING)==0 || pBt->pWriter ); 407 if( pBt->pWriter==p ){ 408 pBt->pWriter = 0; 409 pBt->btsFlags &= ~(BTS_EXCLUSIVE|BTS_PENDING); 410 }else if( pBt->nTransaction==2 ){ 411 /* This function is called when Btree p is concluding its 412 ** transaction. If there currently exists a writer, and p is not 413 ** that writer, then the number of locks held by connections other 414 ** than the writer must be about to drop to zero. In this case 415 ** set the BTS_PENDING flag to 0. 416 ** 417 ** If there is not currently a writer, then BTS_PENDING must 418 ** be zero already. So this next line is harmless in that case. 419 */ 420 pBt->btsFlags &= ~BTS_PENDING; 421 } 422 } 423 424 /* 425 ** This function changes all write-locks held by Btree p into read-locks. 426 */ 427 static void downgradeAllSharedCacheTableLocks(Btree *p){ 428 BtShared *pBt = p->pBt; 429 if( pBt->pWriter==p ){ 430 BtLock *pLock; 431 pBt->pWriter = 0; 432 pBt->btsFlags &= ~(BTS_EXCLUSIVE|BTS_PENDING); 433 for(pLock=pBt->pLock; pLock; pLock=pLock->pNext){ 434 assert( pLock->eLock==READ_LOCK || pLock->pBtree==p ); 435 pLock->eLock = READ_LOCK; 436 } 437 } 438 } 439 440 #endif /* SQLITE_OMIT_SHARED_CACHE */ 441 442 static void releasePage(MemPage *pPage); /* Forward reference */ 443 444 /* 445 ***** This routine is used inside of assert() only **** 446 ** 447 ** Verify that the cursor holds the mutex on its BtShared 448 */ 449 #ifdef SQLITE_DEBUG 450 static int cursorHoldsMutex(BtCursor *p){ 451 return sqlite3_mutex_held(p->pBt->mutex); 452 } 453 #endif 454 455 /* 456 ** Invalidate the overflow cache of the cursor passed as the first argument. 457 ** on the shared btree structure pBt. 458 */ 459 #define invalidateOverflowCache(pCur) (pCur->curFlags &= ~BTCF_ValidOvfl) 460 461 /* 462 ** Invalidate the overflow page-list cache for all cursors opened 463 ** on the shared btree structure pBt. 464 */ 465 static void invalidateAllOverflowCache(BtShared *pBt){ 466 BtCursor *p; 467 assert( sqlite3_mutex_held(pBt->mutex) ); 468 for(p=pBt->pCursor; p; p=p->pNext){ 469 invalidateOverflowCache(p); 470 } 471 } 472 473 #ifndef SQLITE_OMIT_INCRBLOB 474 /* 475 ** This function is called before modifying the contents of a table 476 ** to invalidate any incrblob cursors that are open on the 477 ** row or one of the rows being modified. 478 ** 479 ** If argument isClearTable is true, then the entire contents of the 480 ** table is about to be deleted. In this case invalidate all incrblob 481 ** cursors open on any row within the table with root-page pgnoRoot. 482 ** 483 ** Otherwise, if argument isClearTable is false, then the row with 484 ** rowid iRow is being replaced or deleted. In this case invalidate 485 ** only those incrblob cursors open on that specific row. 486 */ 487 static void invalidateIncrblobCursors( 488 Btree *pBtree, /* The database file to check */ 489 i64 iRow, /* The rowid that might be changing */ 490 int isClearTable /* True if all rows are being deleted */ 491 ){ 492 BtCursor *p; 493 if( pBtree->hasIncrblobCur==0 ) return; 494 assert( sqlite3BtreeHoldsMutex(pBtree) ); 495 pBtree->hasIncrblobCur = 0; 496 for(p=pBtree->pBt->pCursor; p; p=p->pNext){ 497 if( (p->curFlags & BTCF_Incrblob)!=0 ){ 498 pBtree->hasIncrblobCur = 1; 499 if( isClearTable || p->info.nKey==iRow ){ 500 p->eState = CURSOR_INVALID; 501 } 502 } 503 } 504 } 505 506 #else 507 /* Stub function when INCRBLOB is omitted */ 508 #define invalidateIncrblobCursors(x,y,z) 509 #endif /* SQLITE_OMIT_INCRBLOB */ 510 511 /* 512 ** Set bit pgno of the BtShared.pHasContent bitvec. This is called 513 ** when a page that previously contained data becomes a free-list leaf 514 ** page. 515 ** 516 ** The BtShared.pHasContent bitvec exists to work around an obscure 517 ** bug caused by the interaction of two useful IO optimizations surrounding 518 ** free-list leaf pages: 519 ** 520 ** 1) When all data is deleted from a page and the page becomes 521 ** a free-list leaf page, the page is not written to the database 522 ** (as free-list leaf pages contain no meaningful data). Sometimes 523 ** such a page is not even journalled (as it will not be modified, 524 ** why bother journalling it?). 525 ** 526 ** 2) When a free-list leaf page is reused, its content is not read 527 ** from the database or written to the journal file (why should it 528 ** be, if it is not at all meaningful?). 529 ** 530 ** By themselves, these optimizations work fine and provide a handy 531 ** performance boost to bulk delete or insert operations. However, if 532 ** a page is moved to the free-list and then reused within the same 533 ** transaction, a problem comes up. If the page is not journalled when 534 ** it is moved to the free-list and it is also not journalled when it 535 ** is extracted from the free-list and reused, then the original data 536 ** may be lost. In the event of a rollback, it may not be possible 537 ** to restore the database to its original configuration. 538 ** 539 ** The solution is the BtShared.pHasContent bitvec. Whenever a page is 540 ** moved to become a free-list leaf page, the corresponding bit is 541 ** set in the bitvec. Whenever a leaf page is extracted from the free-list, 542 ** optimization 2 above is omitted if the corresponding bit is already 543 ** set in BtShared.pHasContent. The contents of the bitvec are cleared 544 ** at the end of every transaction. 545 */ 546 static int btreeSetHasContent(BtShared *pBt, Pgno pgno){ 547 int rc = SQLITE_OK; 548 if( !pBt->pHasContent ){ 549 assert( pgno<=pBt->nPage ); 550 pBt->pHasContent = sqlite3BitvecCreate(pBt->nPage); 551 if( !pBt->pHasContent ){ 552 rc = SQLITE_NOMEM; 553 } 554 } 555 if( rc==SQLITE_OK && pgno<=sqlite3BitvecSize(pBt->pHasContent) ){ 556 rc = sqlite3BitvecSet(pBt->pHasContent, pgno); 557 } 558 return rc; 559 } 560 561 /* 562 ** Query the BtShared.pHasContent vector. 563 ** 564 ** This function is called when a free-list leaf page is removed from the 565 ** free-list for reuse. It returns false if it is safe to retrieve the 566 ** page from the pager layer with the 'no-content' flag set. True otherwise. 567 */ 568 static int btreeGetHasContent(BtShared *pBt, Pgno pgno){ 569 Bitvec *p = pBt->pHasContent; 570 return (p && (pgno>sqlite3BitvecSize(p) || sqlite3BitvecTest(p, pgno))); 571 } 572 573 /* 574 ** Clear (destroy) the BtShared.pHasContent bitvec. This should be 575 ** invoked at the conclusion of each write-transaction. 576 */ 577 static void btreeClearHasContent(BtShared *pBt){ 578 sqlite3BitvecDestroy(pBt->pHasContent); 579 pBt->pHasContent = 0; 580 } 581 582 /* 583 ** Release all of the apPage[] pages for a cursor. 584 */ 585 static void btreeReleaseAllCursorPages(BtCursor *pCur){ 586 int i; 587 for(i=0; i<=pCur->iPage; i++){ 588 releasePage(pCur->apPage[i]); 589 pCur->apPage[i] = 0; 590 } 591 pCur->iPage = -1; 592 } 593 594 /* 595 ** The cursor passed as the only argument must point to a valid entry 596 ** when this function is called (i.e. have eState==CURSOR_VALID). This 597 ** function saves the current cursor key in variables pCur->nKey and 598 ** pCur->pKey. SQLITE_OK is returned if successful or an SQLite error 599 ** code otherwise. 600 ** 601 ** If the cursor is open on an intkey table, then the integer key 602 ** (the rowid) is stored in pCur->nKey and pCur->pKey is left set to 603 ** NULL. If the cursor is open on a non-intkey table, then pCur->pKey is 604 ** set to point to a malloced buffer pCur->nKey bytes in size containing 605 ** the key. 606 */ 607 static int saveCursorKey(BtCursor *pCur){ 608 int rc; 609 assert( CURSOR_VALID==pCur->eState ); 610 assert( 0==pCur->pKey ); 611 assert( cursorHoldsMutex(pCur) ); 612 613 rc = sqlite3BtreeKeySize(pCur, &pCur->nKey); 614 assert( rc==SQLITE_OK ); /* KeySize() cannot fail */ 615 616 /* If this is an intKey table, then the above call to BtreeKeySize() 617 ** stores the integer key in pCur->nKey. In this case this value is 618 ** all that is required. Otherwise, if pCur is not open on an intKey 619 ** table, then malloc space for and store the pCur->nKey bytes of key 620 ** data. */ 621 if( 0==pCur->curIntKey ){ 622 void *pKey = sqlite3Malloc( pCur->nKey ); 623 if( pKey ){ 624 rc = sqlite3BtreeKey(pCur, 0, (int)pCur->nKey, pKey); 625 if( rc==SQLITE_OK ){ 626 pCur->pKey = pKey; 627 }else{ 628 sqlite3_free(pKey); 629 } 630 }else{ 631 rc = SQLITE_NOMEM; 632 } 633 } 634 assert( !pCur->curIntKey || !pCur->pKey ); 635 return rc; 636 } 637 638 /* 639 ** Save the current cursor position in the variables BtCursor.nKey 640 ** and BtCursor.pKey. The cursor's state is set to CURSOR_REQUIRESEEK. 641 ** 642 ** The caller must ensure that the cursor is valid (has eState==CURSOR_VALID) 643 ** prior to calling this routine. 644 */ 645 static int saveCursorPosition(BtCursor *pCur){ 646 int rc; 647 648 assert( CURSOR_VALID==pCur->eState || CURSOR_SKIPNEXT==pCur->eState ); 649 assert( 0==pCur->pKey ); 650 assert( cursorHoldsMutex(pCur) ); 651 652 if( pCur->eState==CURSOR_SKIPNEXT ){ 653 pCur->eState = CURSOR_VALID; 654 }else{ 655 pCur->skipNext = 0; 656 } 657 658 rc = saveCursorKey(pCur); 659 if( rc==SQLITE_OK ){ 660 btreeReleaseAllCursorPages(pCur); 661 pCur->eState = CURSOR_REQUIRESEEK; 662 } 663 664 pCur->curFlags &= ~(BTCF_ValidNKey|BTCF_ValidOvfl|BTCF_AtLast); 665 return rc; 666 } 667 668 /* Forward reference */ 669 static int SQLITE_NOINLINE saveCursorsOnList(BtCursor*,Pgno,BtCursor*); 670 671 /* 672 ** Save the positions of all cursors (except pExcept) that are open on 673 ** the table with root-page iRoot. "Saving the cursor position" means that 674 ** the location in the btree is remembered in such a way that it can be 675 ** moved back to the same spot after the btree has been modified. This 676 ** routine is called just before cursor pExcept is used to modify the 677 ** table, for example in BtreeDelete() or BtreeInsert(). 678 ** 679 ** If there are two or more cursors on the same btree, then all such 680 ** cursors should have their BTCF_Multiple flag set. The btreeCursor() 681 ** routine enforces that rule. This routine only needs to be called in 682 ** the uncommon case when pExpect has the BTCF_Multiple flag set. 683 ** 684 ** If pExpect!=NULL and if no other cursors are found on the same root-page, 685 ** then the BTCF_Multiple flag on pExpect is cleared, to avoid another 686 ** pointless call to this routine. 687 ** 688 ** Implementation note: This routine merely checks to see if any cursors 689 ** need to be saved. It calls out to saveCursorsOnList() in the (unusual) 690 ** event that cursors are in need to being saved. 691 */ 692 static int saveAllCursors(BtShared *pBt, Pgno iRoot, BtCursor *pExcept){ 693 BtCursor *p; 694 assert( sqlite3_mutex_held(pBt->mutex) ); 695 assert( pExcept==0 || pExcept->pBt==pBt ); 696 for(p=pBt->pCursor; p; p=p->pNext){ 697 if( p!=pExcept && (0==iRoot || p->pgnoRoot==iRoot) ) break; 698 } 699 if( p ) return saveCursorsOnList(p, iRoot, pExcept); 700 if( pExcept ) pExcept->curFlags &= ~BTCF_Multiple; 701 return SQLITE_OK; 702 } 703 704 /* This helper routine to saveAllCursors does the actual work of saving 705 ** the cursors if and when a cursor is found that actually requires saving. 706 ** The common case is that no cursors need to be saved, so this routine is 707 ** broken out from its caller to avoid unnecessary stack pointer movement. 708 */ 709 static int SQLITE_NOINLINE saveCursorsOnList( 710 BtCursor *p, /* The first cursor that needs saving */ 711 Pgno iRoot, /* Only save cursor with this iRoot. Save all if zero */ 712 BtCursor *pExcept /* Do not save this cursor */ 713 ){ 714 do{ 715 if( p!=pExcept && (0==iRoot || p->pgnoRoot==iRoot) ){ 716 if( p->eState==CURSOR_VALID || p->eState==CURSOR_SKIPNEXT ){ 717 int rc = saveCursorPosition(p); 718 if( SQLITE_OK!=rc ){ 719 return rc; 720 } 721 }else{ 722 testcase( p->iPage>0 ); 723 btreeReleaseAllCursorPages(p); 724 } 725 } 726 p = p->pNext; 727 }while( p ); 728 return SQLITE_OK; 729 } 730 731 /* 732 ** Clear the current cursor position. 733 */ 734 void sqlite3BtreeClearCursor(BtCursor *pCur){ 735 assert( cursorHoldsMutex(pCur) ); 736 sqlite3_free(pCur->pKey); 737 pCur->pKey = 0; 738 pCur->eState = CURSOR_INVALID; 739 } 740 741 /* 742 ** In this version of BtreeMoveto, pKey is a packed index record 743 ** such as is generated by the OP_MakeRecord opcode. Unpack the 744 ** record and then call BtreeMovetoUnpacked() to do the work. 745 */ 746 static int btreeMoveto( 747 BtCursor *pCur, /* Cursor open on the btree to be searched */ 748 const void *pKey, /* Packed key if the btree is an index */ 749 i64 nKey, /* Integer key for tables. Size of pKey for indices */ 750 int bias, /* Bias search to the high end */ 751 int *pRes /* Write search results here */ 752 ){ 753 int rc; /* Status code */ 754 UnpackedRecord *pIdxKey; /* Unpacked index key */ 755 char aSpace[200]; /* Temp space for pIdxKey - to avoid a malloc */ 756 char *pFree = 0; 757 758 if( pKey ){ 759 assert( nKey==(i64)(int)nKey ); 760 pIdxKey = sqlite3VdbeAllocUnpackedRecord( 761 pCur->pKeyInfo, aSpace, sizeof(aSpace), &pFree 762 ); 763 if( pIdxKey==0 ) return SQLITE_NOMEM; 764 sqlite3VdbeRecordUnpack(pCur->pKeyInfo, (int)nKey, pKey, pIdxKey); 765 if( pIdxKey->nField==0 ){ 766 sqlite3DbFree(pCur->pKeyInfo->db, pFree); 767 return SQLITE_CORRUPT_BKPT; 768 } 769 }else{ 770 pIdxKey = 0; 771 } 772 rc = sqlite3BtreeMovetoUnpacked(pCur, pIdxKey, nKey, bias, pRes); 773 if( pFree ){ 774 sqlite3DbFree(pCur->pKeyInfo->db, pFree); 775 } 776 return rc; 777 } 778 779 /* 780 ** Restore the cursor to the position it was in (or as close to as possible) 781 ** when saveCursorPosition() was called. Note that this call deletes the 782 ** saved position info stored by saveCursorPosition(), so there can be 783 ** at most one effective restoreCursorPosition() call after each 784 ** saveCursorPosition(). 785 */ 786 static int btreeRestoreCursorPosition(BtCursor *pCur){ 787 int rc; 788 int skipNext; 789 assert( cursorHoldsMutex(pCur) ); 790 assert( pCur->eState>=CURSOR_REQUIRESEEK ); 791 if( pCur->eState==CURSOR_FAULT ){ 792 return pCur->skipNext; 793 } 794 pCur->eState = CURSOR_INVALID; 795 rc = btreeMoveto(pCur, pCur->pKey, pCur->nKey, 0, &skipNext); 796 if( rc==SQLITE_OK ){ 797 sqlite3_free(pCur->pKey); 798 pCur->pKey = 0; 799 assert( pCur->eState==CURSOR_VALID || pCur->eState==CURSOR_INVALID ); 800 pCur->skipNext |= skipNext; 801 if( pCur->skipNext && pCur->eState==CURSOR_VALID ){ 802 pCur->eState = CURSOR_SKIPNEXT; 803 } 804 } 805 return rc; 806 } 807 808 #define restoreCursorPosition(p) \ 809 (p->eState>=CURSOR_REQUIRESEEK ? \ 810 btreeRestoreCursorPosition(p) : \ 811 SQLITE_OK) 812 813 /* 814 ** Determine whether or not a cursor has moved from the position where 815 ** it was last placed, or has been invalidated for any other reason. 816 ** Cursors can move when the row they are pointing at is deleted out 817 ** from under them, for example. Cursor might also move if a btree 818 ** is rebalanced. 819 ** 820 ** Calling this routine with a NULL cursor pointer returns false. 821 ** 822 ** Use the separate sqlite3BtreeCursorRestore() routine to restore a cursor 823 ** back to where it ought to be if this routine returns true. 824 */ 825 int sqlite3BtreeCursorHasMoved(BtCursor *pCur){ 826 return pCur->eState!=CURSOR_VALID; 827 } 828 829 /* 830 ** This routine restores a cursor back to its original position after it 831 ** has been moved by some outside activity (such as a btree rebalance or 832 ** a row having been deleted out from under the cursor). 833 ** 834 ** On success, the *pDifferentRow parameter is false if the cursor is left 835 ** pointing at exactly the same row. *pDifferntRow is the row the cursor 836 ** was pointing to has been deleted, forcing the cursor to point to some 837 ** nearby row. 838 ** 839 ** This routine should only be called for a cursor that just returned 840 ** TRUE from sqlite3BtreeCursorHasMoved(). 841 */ 842 int sqlite3BtreeCursorRestore(BtCursor *pCur, int *pDifferentRow){ 843 int rc; 844 845 assert( pCur!=0 ); 846 assert( pCur->eState!=CURSOR_VALID ); 847 rc = restoreCursorPosition(pCur); 848 if( rc ){ 849 *pDifferentRow = 1; 850 return rc; 851 } 852 if( pCur->eState!=CURSOR_VALID ){ 853 *pDifferentRow = 1; 854 }else{ 855 assert( pCur->skipNext==0 ); 856 *pDifferentRow = 0; 857 } 858 return SQLITE_OK; 859 } 860 861 #ifdef SQLITE_ENABLE_CURSOR_HINTS 862 /* 863 ** Provide hints to the cursor. The particular hint given (and the type 864 ** and number of the varargs parameters) is determined by the eHintType 865 ** parameter. See the definitions of the BTREE_HINT_* macros for details. 866 */ 867 void sqlite3BtreeCursorHint(BtCursor *pCur, int eHintType, ...){ 868 /* Used only by system that substitute their own storage engine */ 869 } 870 #endif 871 872 /* 873 ** Provide flag hints to the cursor. 874 */ 875 void sqlite3BtreeCursorHintFlags(BtCursor *pCur, unsigned x){ 876 assert( x==BTREE_SEEK_EQ || x==BTREE_BULKLOAD || x==0 ); 877 pCur->hints = x; 878 } 879 880 881 #ifndef SQLITE_OMIT_AUTOVACUUM 882 /* 883 ** Given a page number of a regular database page, return the page 884 ** number for the pointer-map page that contains the entry for the 885 ** input page number. 886 ** 887 ** Return 0 (not a valid page) for pgno==1 since there is 888 ** no pointer map associated with page 1. The integrity_check logic 889 ** requires that ptrmapPageno(*,1)!=1. 890 */ 891 static Pgno ptrmapPageno(BtShared *pBt, Pgno pgno){ 892 int nPagesPerMapPage; 893 Pgno iPtrMap, ret; 894 assert( sqlite3_mutex_held(pBt->mutex) ); 895 if( pgno<2 ) return 0; 896 nPagesPerMapPage = (pBt->usableSize/5)+1; 897 iPtrMap = (pgno-2)/nPagesPerMapPage; 898 ret = (iPtrMap*nPagesPerMapPage) + 2; 899 if( ret==PENDING_BYTE_PAGE(pBt) ){ 900 ret++; 901 } 902 return ret; 903 } 904 905 /* 906 ** Write an entry into the pointer map. 907 ** 908 ** This routine updates the pointer map entry for page number 'key' 909 ** so that it maps to type 'eType' and parent page number 'pgno'. 910 ** 911 ** If *pRC is initially non-zero (non-SQLITE_OK) then this routine is 912 ** a no-op. If an error occurs, the appropriate error code is written 913 ** into *pRC. 914 */ 915 static void ptrmapPut(BtShared *pBt, Pgno key, u8 eType, Pgno parent, int *pRC){ 916 DbPage *pDbPage; /* The pointer map page */ 917 u8 *pPtrmap; /* The pointer map data */ 918 Pgno iPtrmap; /* The pointer map page number */ 919 int offset; /* Offset in pointer map page */ 920 int rc; /* Return code from subfunctions */ 921 922 if( *pRC ) return; 923 924 assert( sqlite3_mutex_held(pBt->mutex) ); 925 /* The master-journal page number must never be used as a pointer map page */ 926 assert( 0==PTRMAP_ISPAGE(pBt, PENDING_BYTE_PAGE(pBt)) ); 927 928 assert( pBt->autoVacuum ); 929 if( key==0 ){ 930 *pRC = SQLITE_CORRUPT_BKPT; 931 return; 932 } 933 iPtrmap = PTRMAP_PAGENO(pBt, key); 934 rc = sqlite3PagerGet(pBt->pPager, iPtrmap, &pDbPage, 0); 935 if( rc!=SQLITE_OK ){ 936 *pRC = rc; 937 return; 938 } 939 offset = PTRMAP_PTROFFSET(iPtrmap, key); 940 if( offset<0 ){ 941 *pRC = SQLITE_CORRUPT_BKPT; 942 goto ptrmap_exit; 943 } 944 assert( offset <= (int)pBt->usableSize-5 ); 945 pPtrmap = (u8 *)sqlite3PagerGetData(pDbPage); 946 947 if( eType!=pPtrmap[offset] || get4byte(&pPtrmap[offset+1])!=parent ){ 948 TRACE(("PTRMAP_UPDATE: %d->(%d,%d)\n", key, eType, parent)); 949 *pRC= rc = sqlite3PagerWrite(pDbPage); 950 if( rc==SQLITE_OK ){ 951 pPtrmap[offset] = eType; 952 put4byte(&pPtrmap[offset+1], parent); 953 } 954 } 955 956 ptrmap_exit: 957 sqlite3PagerUnref(pDbPage); 958 } 959 960 /* 961 ** Read an entry from the pointer map. 962 ** 963 ** This routine retrieves the pointer map entry for page 'key', writing 964 ** the type and parent page number to *pEType and *pPgno respectively. 965 ** An error code is returned if something goes wrong, otherwise SQLITE_OK. 966 */ 967 static int ptrmapGet(BtShared *pBt, Pgno key, u8 *pEType, Pgno *pPgno){ 968 DbPage *pDbPage; /* The pointer map page */ 969 int iPtrmap; /* Pointer map page index */ 970 u8 *pPtrmap; /* Pointer map page data */ 971 int offset; /* Offset of entry in pointer map */ 972 int rc; 973 974 assert( sqlite3_mutex_held(pBt->mutex) ); 975 976 iPtrmap = PTRMAP_PAGENO(pBt, key); 977 rc = sqlite3PagerGet(pBt->pPager, iPtrmap, &pDbPage, 0); 978 if( rc!=0 ){ 979 return rc; 980 } 981 pPtrmap = (u8 *)sqlite3PagerGetData(pDbPage); 982 983 offset = PTRMAP_PTROFFSET(iPtrmap, key); 984 if( offset<0 ){ 985 sqlite3PagerUnref(pDbPage); 986 return SQLITE_CORRUPT_BKPT; 987 } 988 assert( offset <= (int)pBt->usableSize-5 ); 989 assert( pEType!=0 ); 990 *pEType = pPtrmap[offset]; 991 if( pPgno ) *pPgno = get4byte(&pPtrmap[offset+1]); 992 993 sqlite3PagerUnref(pDbPage); 994 if( *pEType<1 || *pEType>5 ) return SQLITE_CORRUPT_BKPT; 995 return SQLITE_OK; 996 } 997 998 #else /* if defined SQLITE_OMIT_AUTOVACUUM */ 999 #define ptrmapPut(w,x,y,z,rc) 1000 #define ptrmapGet(w,x,y,z) SQLITE_OK 1001 #define ptrmapPutOvflPtr(x, y, rc) 1002 #endif 1003 1004 /* 1005 ** Given a btree page and a cell index (0 means the first cell on 1006 ** the page, 1 means the second cell, and so forth) return a pointer 1007 ** to the cell content. 1008 ** 1009 ** findCellPastPtr() does the same except it skips past the initial 1010 ** 4-byte child pointer found on interior pages, if there is one. 1011 ** 1012 ** This routine works only for pages that do not contain overflow cells. 1013 */ 1014 #define findCell(P,I) \ 1015 ((P)->aData + ((P)->maskPage & get2byteAligned(&(P)->aCellIdx[2*(I)]))) 1016 #define findCellPastPtr(P,I) \ 1017 ((P)->aDataOfst + ((P)->maskPage & get2byteAligned(&(P)->aCellIdx[2*(I)]))) 1018 1019 1020 /* 1021 ** This is common tail processing for btreeParseCellPtr() and 1022 ** btreeParseCellPtrIndex() for the case when the cell does not fit entirely 1023 ** on a single B-tree page. Make necessary adjustments to the CellInfo 1024 ** structure. 1025 */ 1026 static SQLITE_NOINLINE void btreeParseCellAdjustSizeForOverflow( 1027 MemPage *pPage, /* Page containing the cell */ 1028 u8 *pCell, /* Pointer to the cell text. */ 1029 CellInfo *pInfo /* Fill in this structure */ 1030 ){ 1031 /* If the payload will not fit completely on the local page, we have 1032 ** to decide how much to store locally and how much to spill onto 1033 ** overflow pages. The strategy is to minimize the amount of unused 1034 ** space on overflow pages while keeping the amount of local storage 1035 ** in between minLocal and maxLocal. 1036 ** 1037 ** Warning: changing the way overflow payload is distributed in any 1038 ** way will result in an incompatible file format. 1039 */ 1040 int minLocal; /* Minimum amount of payload held locally */ 1041 int maxLocal; /* Maximum amount of payload held locally */ 1042 int surplus; /* Overflow payload available for local storage */ 1043 1044 minLocal = pPage->minLocal; 1045 maxLocal = pPage->maxLocal; 1046 surplus = minLocal + (pInfo->nPayload - minLocal)%(pPage->pBt->usableSize-4); 1047 testcase( surplus==maxLocal ); 1048 testcase( surplus==maxLocal+1 ); 1049 if( surplus <= maxLocal ){ 1050 pInfo->nLocal = (u16)surplus; 1051 }else{ 1052 pInfo->nLocal = (u16)minLocal; 1053 } 1054 pInfo->iOverflow = (u16)(&pInfo->pPayload[pInfo->nLocal] - pCell); 1055 pInfo->nSize = pInfo->iOverflow + 4; 1056 } 1057 1058 /* 1059 ** The following routines are implementations of the MemPage.xParseCell() 1060 ** method. 1061 ** 1062 ** Parse a cell content block and fill in the CellInfo structure. 1063 ** 1064 ** btreeParseCellPtr() => table btree leaf nodes 1065 ** btreeParseCellNoPayload() => table btree internal nodes 1066 ** btreeParseCellPtrIndex() => index btree nodes 1067 ** 1068 ** There is also a wrapper function btreeParseCell() that works for 1069 ** all MemPage types and that references the cell by index rather than 1070 ** by pointer. 1071 */ 1072 static void btreeParseCellPtrNoPayload( 1073 MemPage *pPage, /* Page containing the cell */ 1074 u8 *pCell, /* Pointer to the cell text. */ 1075 CellInfo *pInfo /* Fill in this structure */ 1076 ){ 1077 assert( sqlite3_mutex_held(pPage->pBt->mutex) ); 1078 assert( pPage->leaf==0 ); 1079 assert( pPage->noPayload ); 1080 assert( pPage->childPtrSize==4 ); 1081 #ifndef SQLITE_DEBUG 1082 UNUSED_PARAMETER(pPage); 1083 #endif 1084 pInfo->nSize = 4 + getVarint(&pCell[4], (u64*)&pInfo->nKey); 1085 pInfo->nPayload = 0; 1086 pInfo->nLocal = 0; 1087 pInfo->iOverflow = 0; 1088 pInfo->pPayload = 0; 1089 return; 1090 } 1091 static void btreeParseCellPtr( 1092 MemPage *pPage, /* Page containing the cell */ 1093 u8 *pCell, /* Pointer to the cell text. */ 1094 CellInfo *pInfo /* Fill in this structure */ 1095 ){ 1096 u8 *pIter; /* For scanning through pCell */ 1097 u32 nPayload; /* Number of bytes of cell payload */ 1098 u64 iKey; /* Extracted Key value */ 1099 1100 assert( sqlite3_mutex_held(pPage->pBt->mutex) ); 1101 assert( pPage->leaf==0 || pPage->leaf==1 ); 1102 assert( pPage->intKeyLeaf || pPage->noPayload ); 1103 assert( pPage->noPayload==0 ); 1104 assert( pPage->intKeyLeaf ); 1105 assert( pPage->childPtrSize==0 ); 1106 pIter = pCell; 1107 1108 /* The next block of code is equivalent to: 1109 ** 1110 ** pIter += getVarint32(pIter, nPayload); 1111 ** 1112 ** The code is inlined to avoid a function call. 1113 */ 1114 nPayload = *pIter; 1115 if( nPayload>=0x80 ){ 1116 u8 *pEnd = &pIter[8]; 1117 nPayload &= 0x7f; 1118 do{ 1119 nPayload = (nPayload<<7) | (*++pIter & 0x7f); 1120 }while( (*pIter)>=0x80 && pIter<pEnd ); 1121 } 1122 pIter++; 1123 1124 /* The next block of code is equivalent to: 1125 ** 1126 ** pIter += getVarint(pIter, (u64*)&pInfo->nKey); 1127 ** 1128 ** The code is inlined to avoid a function call. 1129 */ 1130 iKey = *pIter; 1131 if( iKey>=0x80 ){ 1132 u8 *pEnd = &pIter[7]; 1133 iKey &= 0x7f; 1134 while(1){ 1135 iKey = (iKey<<7) | (*++pIter & 0x7f); 1136 if( (*pIter)<0x80 ) break; 1137 if( pIter>=pEnd ){ 1138 iKey = (iKey<<8) | *++pIter; 1139 break; 1140 } 1141 } 1142 } 1143 pIter++; 1144 1145 pInfo->nKey = *(i64*)&iKey; 1146 pInfo->nPayload = nPayload; 1147 pInfo->pPayload = pIter; 1148 testcase( nPayload==pPage->maxLocal ); 1149 testcase( nPayload==pPage->maxLocal+1 ); 1150 if( nPayload<=pPage->maxLocal ){ 1151 /* This is the (easy) common case where the entire payload fits 1152 ** on the local page. No overflow is required. 1153 */ 1154 pInfo->nSize = nPayload + (u16)(pIter - pCell); 1155 if( pInfo->nSize<4 ) pInfo->nSize = 4; 1156 pInfo->nLocal = (u16)nPayload; 1157 pInfo->iOverflow = 0; 1158 }else{ 1159 btreeParseCellAdjustSizeForOverflow(pPage, pCell, pInfo); 1160 } 1161 } 1162 static void btreeParseCellPtrIndex( 1163 MemPage *pPage, /* Page containing the cell */ 1164 u8 *pCell, /* Pointer to the cell text. */ 1165 CellInfo *pInfo /* Fill in this structure */ 1166 ){ 1167 u8 *pIter; /* For scanning through pCell */ 1168 u32 nPayload; /* Number of bytes of cell payload */ 1169 1170 assert( sqlite3_mutex_held(pPage->pBt->mutex) ); 1171 assert( pPage->leaf==0 || pPage->leaf==1 ); 1172 assert( pPage->intKeyLeaf==0 ); 1173 assert( pPage->noPayload==0 ); 1174 pIter = pCell + pPage->childPtrSize; 1175 nPayload = *pIter; 1176 if( nPayload>=0x80 ){ 1177 u8 *pEnd = &pIter[8]; 1178 nPayload &= 0x7f; 1179 do{ 1180 nPayload = (nPayload<<7) | (*++pIter & 0x7f); 1181 }while( *(pIter)>=0x80 && pIter<pEnd ); 1182 } 1183 pIter++; 1184 pInfo->nKey = nPayload; 1185 pInfo->nPayload = nPayload; 1186 pInfo->pPayload = pIter; 1187 testcase( nPayload==pPage->maxLocal ); 1188 testcase( nPayload==pPage->maxLocal+1 ); 1189 if( nPayload<=pPage->maxLocal ){ 1190 /* This is the (easy) common case where the entire payload fits 1191 ** on the local page. No overflow is required. 1192 */ 1193 pInfo->nSize = nPayload + (u16)(pIter - pCell); 1194 if( pInfo->nSize<4 ) pInfo->nSize = 4; 1195 pInfo->nLocal = (u16)nPayload; 1196 pInfo->iOverflow = 0; 1197 }else{ 1198 btreeParseCellAdjustSizeForOverflow(pPage, pCell, pInfo); 1199 } 1200 } 1201 static void btreeParseCell( 1202 MemPage *pPage, /* Page containing the cell */ 1203 int iCell, /* The cell index. First cell is 0 */ 1204 CellInfo *pInfo /* Fill in this structure */ 1205 ){ 1206 pPage->xParseCell(pPage, findCell(pPage, iCell), pInfo); 1207 } 1208 1209 /* 1210 ** The following routines are implementations of the MemPage.xCellSize 1211 ** method. 1212 ** 1213 ** Compute the total number of bytes that a Cell needs in the cell 1214 ** data area of the btree-page. The return number includes the cell 1215 ** data header and the local payload, but not any overflow page or 1216 ** the space used by the cell pointer. 1217 ** 1218 ** cellSizePtrNoPayload() => table internal nodes 1219 ** cellSizePtr() => all index nodes & table leaf nodes 1220 */ 1221 static u16 cellSizePtr(MemPage *pPage, u8 *pCell){ 1222 u8 *pIter = pCell + pPage->childPtrSize; /* For looping over bytes of pCell */ 1223 u8 *pEnd; /* End mark for a varint */ 1224 u32 nSize; /* Size value to return */ 1225 1226 #ifdef SQLITE_DEBUG 1227 /* The value returned by this function should always be the same as 1228 ** the (CellInfo.nSize) value found by doing a full parse of the 1229 ** cell. If SQLITE_DEBUG is defined, an assert() at the bottom of 1230 ** this function verifies that this invariant is not violated. */ 1231 CellInfo debuginfo; 1232 pPage->xParseCell(pPage, pCell, &debuginfo); 1233 #endif 1234 1235 assert( pPage->noPayload==0 ); 1236 nSize = *pIter; 1237 if( nSize>=0x80 ){ 1238 pEnd = &pIter[8]; 1239 nSize &= 0x7f; 1240 do{ 1241 nSize = (nSize<<7) | (*++pIter & 0x7f); 1242 }while( *(pIter)>=0x80 && pIter<pEnd ); 1243 } 1244 pIter++; 1245 if( pPage->intKey ){ 1246 /* pIter now points at the 64-bit integer key value, a variable length 1247 ** integer. The following block moves pIter to point at the first byte 1248 ** past the end of the key value. */ 1249 pEnd = &pIter[9]; 1250 while( (*pIter++)&0x80 && pIter<pEnd ); 1251 } 1252 testcase( nSize==pPage->maxLocal ); 1253 testcase( nSize==pPage->maxLocal+1 ); 1254 if( nSize<=pPage->maxLocal ){ 1255 nSize += (u32)(pIter - pCell); 1256 if( nSize<4 ) nSize = 4; 1257 }else{ 1258 int minLocal = pPage->minLocal; 1259 nSize = minLocal + (nSize - minLocal) % (pPage->pBt->usableSize - 4); 1260 testcase( nSize==pPage->maxLocal ); 1261 testcase( nSize==pPage->maxLocal+1 ); 1262 if( nSize>pPage->maxLocal ){ 1263 nSize = minLocal; 1264 } 1265 nSize += 4 + (u16)(pIter - pCell); 1266 } 1267 assert( nSize==debuginfo.nSize || CORRUPT_DB ); 1268 return (u16)nSize; 1269 } 1270 static u16 cellSizePtrNoPayload(MemPage *pPage, u8 *pCell){ 1271 u8 *pIter = pCell + 4; /* For looping over bytes of pCell */ 1272 u8 *pEnd; /* End mark for a varint */ 1273 1274 #ifdef SQLITE_DEBUG 1275 /* The value returned by this function should always be the same as 1276 ** the (CellInfo.nSize) value found by doing a full parse of the 1277 ** cell. If SQLITE_DEBUG is defined, an assert() at the bottom of 1278 ** this function verifies that this invariant is not violated. */ 1279 CellInfo debuginfo; 1280 pPage->xParseCell(pPage, pCell, &debuginfo); 1281 #else 1282 UNUSED_PARAMETER(pPage); 1283 #endif 1284 1285 assert( pPage->childPtrSize==4 ); 1286 pEnd = pIter + 9; 1287 while( (*pIter++)&0x80 && pIter<pEnd ); 1288 assert( debuginfo.nSize==(u16)(pIter - pCell) || CORRUPT_DB ); 1289 return (u16)(pIter - pCell); 1290 } 1291 1292 1293 #ifdef SQLITE_DEBUG 1294 /* This variation on cellSizePtr() is used inside of assert() statements 1295 ** only. */ 1296 static u16 cellSize(MemPage *pPage, int iCell){ 1297 return pPage->xCellSize(pPage, findCell(pPage, iCell)); 1298 } 1299 #endif 1300 1301 #ifndef SQLITE_OMIT_AUTOVACUUM 1302 /* 1303 ** If the cell pCell, part of page pPage contains a pointer 1304 ** to an overflow page, insert an entry into the pointer-map 1305 ** for the overflow page. 1306 */ 1307 static void ptrmapPutOvflPtr(MemPage *pPage, u8 *pCell, int *pRC){ 1308 CellInfo info; 1309 if( *pRC ) return; 1310 assert( pCell!=0 ); 1311 pPage->xParseCell(pPage, pCell, &info); 1312 if( info.iOverflow ){ 1313 Pgno ovfl = get4byte(&pCell[info.iOverflow]); 1314 ptrmapPut(pPage->pBt, ovfl, PTRMAP_OVERFLOW1, pPage->pgno, pRC); 1315 } 1316 } 1317 #endif 1318 1319 1320 /* 1321 ** Defragment the page given. All Cells are moved to the 1322 ** end of the page and all free space is collected into one 1323 ** big FreeBlk that occurs in between the header and cell 1324 ** pointer array and the cell content area. 1325 ** 1326 ** EVIDENCE-OF: R-44582-60138 SQLite may from time to time reorganize a 1327 ** b-tree page so that there are no freeblocks or fragment bytes, all 1328 ** unused bytes are contained in the unallocated space region, and all 1329 ** cells are packed tightly at the end of the page. 1330 */ 1331 static int defragmentPage(MemPage *pPage){ 1332 int i; /* Loop counter */ 1333 int pc; /* Address of the i-th cell */ 1334 int hdr; /* Offset to the page header */ 1335 int size; /* Size of a cell */ 1336 int usableSize; /* Number of usable bytes on a page */ 1337 int cellOffset; /* Offset to the cell pointer array */ 1338 int cbrk; /* Offset to the cell content area */ 1339 int nCell; /* Number of cells on the page */ 1340 unsigned char *data; /* The page data */ 1341 unsigned char *temp; /* Temp area for cell content */ 1342 unsigned char *src; /* Source of content */ 1343 int iCellFirst; /* First allowable cell index */ 1344 int iCellLast; /* Last possible cell index */ 1345 1346 1347 assert( sqlite3PagerIswriteable(pPage->pDbPage) ); 1348 assert( pPage->pBt!=0 ); 1349 assert( pPage->pBt->usableSize <= SQLITE_MAX_PAGE_SIZE ); 1350 assert( pPage->nOverflow==0 ); 1351 assert( sqlite3_mutex_held(pPage->pBt->mutex) ); 1352 temp = 0; 1353 src = data = pPage->aData; 1354 hdr = pPage->hdrOffset; 1355 cellOffset = pPage->cellOffset; 1356 nCell = pPage->nCell; 1357 assert( nCell==get2byte(&data[hdr+3]) ); 1358 usableSize = pPage->pBt->usableSize; 1359 cbrk = usableSize; 1360 iCellFirst = cellOffset + 2*nCell; 1361 iCellLast = usableSize - 4; 1362 for(i=0; i<nCell; i++){ 1363 u8 *pAddr; /* The i-th cell pointer */ 1364 pAddr = &data[cellOffset + i*2]; 1365 pc = get2byte(pAddr); 1366 testcase( pc==iCellFirst ); 1367 testcase( pc==iCellLast ); 1368 /* These conditions have already been verified in btreeInitPage() 1369 ** if PRAGMA cell_size_check=ON. 1370 */ 1371 if( pc<iCellFirst || pc>iCellLast ){ 1372 return SQLITE_CORRUPT_BKPT; 1373 } 1374 assert( pc>=iCellFirst && pc<=iCellLast ); 1375 size = pPage->xCellSize(pPage, &src[pc]); 1376 cbrk -= size; 1377 if( cbrk<iCellFirst || pc+size>usableSize ){ 1378 return SQLITE_CORRUPT_BKPT; 1379 } 1380 assert( cbrk+size<=usableSize && cbrk>=iCellFirst ); 1381 testcase( cbrk+size==usableSize ); 1382 testcase( pc+size==usableSize ); 1383 put2byte(pAddr, cbrk); 1384 if( temp==0 ){ 1385 int x; 1386 if( cbrk==pc ) continue; 1387 temp = sqlite3PagerTempSpace(pPage->pBt->pPager); 1388 x = get2byte(&data[hdr+5]); 1389 memcpy(&temp[x], &data[x], (cbrk+size) - x); 1390 src = temp; 1391 } 1392 memcpy(&data[cbrk], &src[pc], size); 1393 } 1394 assert( cbrk>=iCellFirst ); 1395 put2byte(&data[hdr+5], cbrk); 1396 data[hdr+1] = 0; 1397 data[hdr+2] = 0; 1398 data[hdr+7] = 0; 1399 memset(&data[iCellFirst], 0, cbrk-iCellFirst); 1400 assert( sqlite3PagerIswriteable(pPage->pDbPage) ); 1401 if( cbrk-iCellFirst!=pPage->nFree ){ 1402 return SQLITE_CORRUPT_BKPT; 1403 } 1404 return SQLITE_OK; 1405 } 1406 1407 /* 1408 ** Search the free-list on page pPg for space to store a cell nByte bytes in 1409 ** size. If one can be found, return a pointer to the space and remove it 1410 ** from the free-list. 1411 ** 1412 ** If no suitable space can be found on the free-list, return NULL. 1413 ** 1414 ** This function may detect corruption within pPg. If corruption is 1415 ** detected then *pRc is set to SQLITE_CORRUPT and NULL is returned. 1416 ** 1417 ** Slots on the free list that are between 1 and 3 bytes larger than nByte 1418 ** will be ignored if adding the extra space to the fragmentation count 1419 ** causes the fragmentation count to exceed 60. 1420 */ 1421 static u8 *pageFindSlot(MemPage *pPg, int nByte, int *pRc){ 1422 const int hdr = pPg->hdrOffset; 1423 u8 * const aData = pPg->aData; 1424 int iAddr = hdr + 1; 1425 int pc = get2byte(&aData[iAddr]); 1426 int x; 1427 int usableSize = pPg->pBt->usableSize; 1428 1429 assert( pc>0 ); 1430 do{ 1431 int size; /* Size of the free slot */ 1432 /* EVIDENCE-OF: R-06866-39125 Freeblocks are always connected in order of 1433 ** increasing offset. */ 1434 if( pc>usableSize-4 || pc<iAddr+4 ){ 1435 *pRc = SQLITE_CORRUPT_BKPT; 1436 return 0; 1437 } 1438 /* EVIDENCE-OF: R-22710-53328 The third and fourth bytes of each 1439 ** freeblock form a big-endian integer which is the size of the freeblock 1440 ** in bytes, including the 4-byte header. */ 1441 size = get2byte(&aData[pc+2]); 1442 if( (x = size - nByte)>=0 ){ 1443 testcase( x==4 ); 1444 testcase( x==3 ); 1445 if( pc < pPg->cellOffset+2*pPg->nCell || size+pc > usableSize ){ 1446 *pRc = SQLITE_CORRUPT_BKPT; 1447 return 0; 1448 }else if( x<4 ){ 1449 /* EVIDENCE-OF: R-11498-58022 In a well-formed b-tree page, the total 1450 ** number of bytes in fragments may not exceed 60. */ 1451 if( aData[hdr+7]>57 ) return 0; 1452 1453 /* Remove the slot from the free-list. Update the number of 1454 ** fragmented bytes within the page. */ 1455 memcpy(&aData[iAddr], &aData[pc], 2); 1456 aData[hdr+7] += (u8)x; 1457 }else{ 1458 /* The slot remains on the free-list. Reduce its size to account 1459 ** for the portion used by the new allocation. */ 1460 put2byte(&aData[pc+2], x); 1461 } 1462 return &aData[pc + x]; 1463 } 1464 iAddr = pc; 1465 pc = get2byte(&aData[pc]); 1466 }while( pc ); 1467 1468 return 0; 1469 } 1470 1471 /* 1472 ** Allocate nByte bytes of space from within the B-Tree page passed 1473 ** as the first argument. Write into *pIdx the index into pPage->aData[] 1474 ** of the first byte of allocated space. Return either SQLITE_OK or 1475 ** an error code (usually SQLITE_CORRUPT). 1476 ** 1477 ** The caller guarantees that there is sufficient space to make the 1478 ** allocation. This routine might need to defragment in order to bring 1479 ** all the space together, however. This routine will avoid using 1480 ** the first two bytes past the cell pointer area since presumably this 1481 ** allocation is being made in order to insert a new cell, so we will 1482 ** also end up needing a new cell pointer. 1483 */ 1484 static int allocateSpace(MemPage *pPage, int nByte, int *pIdx){ 1485 const int hdr = pPage->hdrOffset; /* Local cache of pPage->hdrOffset */ 1486 u8 * const data = pPage->aData; /* Local cache of pPage->aData */ 1487 int top; /* First byte of cell content area */ 1488 int rc = SQLITE_OK; /* Integer return code */ 1489 int gap; /* First byte of gap between cell pointers and cell content */ 1490 1491 assert( sqlite3PagerIswriteable(pPage->pDbPage) ); 1492 assert( pPage->pBt ); 1493 assert( sqlite3_mutex_held(pPage->pBt->mutex) ); 1494 assert( nByte>=0 ); /* Minimum cell size is 4 */ 1495 assert( pPage->nFree>=nByte ); 1496 assert( pPage->nOverflow==0 ); 1497 assert( nByte < (int)(pPage->pBt->usableSize-8) ); 1498 1499 assert( pPage->cellOffset == hdr + 12 - 4*pPage->leaf ); 1500 gap = pPage->cellOffset + 2*pPage->nCell; 1501 assert( gap<=65536 ); 1502 /* EVIDENCE-OF: R-29356-02391 If the database uses a 65536-byte page size 1503 ** and the reserved space is zero (the usual value for reserved space) 1504 ** then the cell content offset of an empty page wants to be 65536. 1505 ** However, that integer is too large to be stored in a 2-byte unsigned 1506 ** integer, so a value of 0 is used in its place. */ 1507 top = get2byte(&data[hdr+5]); 1508 assert( top<=(int)pPage->pBt->usableSize ); /* Prevent by getAndInitPage() */ 1509 if( gap>top ){ 1510 if( top==0 && pPage->pBt->usableSize==65536 ){ 1511 top = 65536; 1512 }else{ 1513 return SQLITE_CORRUPT_BKPT; 1514 } 1515 } 1516 1517 /* If there is enough space between gap and top for one more cell pointer 1518 ** array entry offset, and if the freelist is not empty, then search the 1519 ** freelist looking for a free slot big enough to satisfy the request. 1520 */ 1521 testcase( gap+2==top ); 1522 testcase( gap+1==top ); 1523 testcase( gap==top ); 1524 if( (data[hdr+2] || data[hdr+1]) && gap+2<=top ){ 1525 u8 *pSpace = pageFindSlot(pPage, nByte, &rc); 1526 if( pSpace ){ 1527 assert( pSpace>=data && (pSpace - data)<65536 ); 1528 *pIdx = (int)(pSpace - data); 1529 return SQLITE_OK; 1530 }else if( rc ){ 1531 return rc; 1532 } 1533 } 1534 1535 /* The request could not be fulfilled using a freelist slot. Check 1536 ** to see if defragmentation is necessary. 1537 */ 1538 testcase( gap+2+nByte==top ); 1539 if( gap+2+nByte>top ){ 1540 assert( pPage->nCell>0 || CORRUPT_DB ); 1541 rc = defragmentPage(pPage); 1542 if( rc ) return rc; 1543 top = get2byteNotZero(&data[hdr+5]); 1544 assert( gap+nByte<=top ); 1545 } 1546 1547 1548 /* Allocate memory from the gap in between the cell pointer array 1549 ** and the cell content area. The btreeInitPage() call has already 1550 ** validated the freelist. Given that the freelist is valid, there 1551 ** is no way that the allocation can extend off the end of the page. 1552 ** The assert() below verifies the previous sentence. 1553 */ 1554 top -= nByte; 1555 put2byte(&data[hdr+5], top); 1556 assert( top+nByte <= (int)pPage->pBt->usableSize ); 1557 *pIdx = top; 1558 return SQLITE_OK; 1559 } 1560 1561 /* 1562 ** Return a section of the pPage->aData to the freelist. 1563 ** The first byte of the new free block is pPage->aData[iStart] 1564 ** and the size of the block is iSize bytes. 1565 ** 1566 ** Adjacent freeblocks are coalesced. 1567 ** 1568 ** Note that even though the freeblock list was checked by btreeInitPage(), 1569 ** that routine will not detect overlap between cells or freeblocks. Nor 1570 ** does it detect cells or freeblocks that encrouch into the reserved bytes 1571 ** at the end of the page. So do additional corruption checks inside this 1572 ** routine and return SQLITE_CORRUPT if any problems are found. 1573 */ 1574 static int freeSpace(MemPage *pPage, u16 iStart, u16 iSize){ 1575 u16 iPtr; /* Address of ptr to next freeblock */ 1576 u16 iFreeBlk; /* Address of the next freeblock */ 1577 u8 hdr; /* Page header size. 0 or 100 */ 1578 u8 nFrag = 0; /* Reduction in fragmentation */ 1579 u16 iOrigSize = iSize; /* Original value of iSize */ 1580 u32 iLast = pPage->pBt->usableSize-4; /* Largest possible freeblock offset */ 1581 u32 iEnd = iStart + iSize; /* First byte past the iStart buffer */ 1582 unsigned char *data = pPage->aData; /* Page content */ 1583 1584 assert( pPage->pBt!=0 ); 1585 assert( sqlite3PagerIswriteable(pPage->pDbPage) ); 1586 assert( CORRUPT_DB || iStart>=pPage->hdrOffset+6+pPage->childPtrSize ); 1587 assert( CORRUPT_DB || iEnd <= pPage->pBt->usableSize ); 1588 assert( sqlite3_mutex_held(pPage->pBt->mutex) ); 1589 assert( iSize>=4 ); /* Minimum cell size is 4 */ 1590 assert( iStart<=iLast ); 1591 1592 /* Overwrite deleted information with zeros when the secure_delete 1593 ** option is enabled */ 1594 if( pPage->pBt->btsFlags & BTS_SECURE_DELETE ){ 1595 memset(&data[iStart], 0, iSize); 1596 } 1597 1598 /* The list of freeblocks must be in ascending order. Find the 1599 ** spot on the list where iStart should be inserted. 1600 */ 1601 hdr = pPage->hdrOffset; 1602 iPtr = hdr + 1; 1603 if( data[iPtr+1]==0 && data[iPtr]==0 ){ 1604 iFreeBlk = 0; /* Shortcut for the case when the freelist is empty */ 1605 }else{ 1606 while( (iFreeBlk = get2byte(&data[iPtr]))>0 && iFreeBlk<iStart ){ 1607 if( iFreeBlk<iPtr+4 ) return SQLITE_CORRUPT_BKPT; 1608 iPtr = iFreeBlk; 1609 } 1610 if( iFreeBlk>iLast ) return SQLITE_CORRUPT_BKPT; 1611 assert( iFreeBlk>iPtr || iFreeBlk==0 ); 1612 1613 /* At this point: 1614 ** iFreeBlk: First freeblock after iStart, or zero if none 1615 ** iPtr: The address of a pointer to iFreeBlk 1616 ** 1617 ** Check to see if iFreeBlk should be coalesced onto the end of iStart. 1618 */ 1619 if( iFreeBlk && iEnd+3>=iFreeBlk ){ 1620 nFrag = iFreeBlk - iEnd; 1621 if( iEnd>iFreeBlk ) return SQLITE_CORRUPT_BKPT; 1622 iEnd = iFreeBlk + get2byte(&data[iFreeBlk+2]); 1623 if( iEnd > pPage->pBt->usableSize ) return SQLITE_CORRUPT_BKPT; 1624 iSize = iEnd - iStart; 1625 iFreeBlk = get2byte(&data[iFreeBlk]); 1626 } 1627 1628 /* If iPtr is another freeblock (that is, if iPtr is not the freelist 1629 ** pointer in the page header) then check to see if iStart should be 1630 ** coalesced onto the end of iPtr. 1631 */ 1632 if( iPtr>hdr+1 ){ 1633 int iPtrEnd = iPtr + get2byte(&data[iPtr+2]); 1634 if( iPtrEnd+3>=iStart ){ 1635 if( iPtrEnd>iStart ) return SQLITE_CORRUPT_BKPT; 1636 nFrag += iStart - iPtrEnd; 1637 iSize = iEnd - iPtr; 1638 iStart = iPtr; 1639 } 1640 } 1641 if( nFrag>data[hdr+7] ) return SQLITE_CORRUPT_BKPT; 1642 data[hdr+7] -= nFrag; 1643 } 1644 if( iStart==get2byte(&data[hdr+5]) ){ 1645 /* The new freeblock is at the beginning of the cell content area, 1646 ** so just extend the cell content area rather than create another 1647 ** freelist entry */ 1648 if( iPtr!=hdr+1 ) return SQLITE_CORRUPT_BKPT; 1649 put2byte(&data[hdr+1], iFreeBlk); 1650 put2byte(&data[hdr+5], iEnd); 1651 }else{ 1652 /* Insert the new freeblock into the freelist */ 1653 put2byte(&data[iPtr], iStart); 1654 put2byte(&data[iStart], iFreeBlk); 1655 put2byte(&data[iStart+2], iSize); 1656 } 1657 pPage->nFree += iOrigSize; 1658 return SQLITE_OK; 1659 } 1660 1661 /* 1662 ** Decode the flags byte (the first byte of the header) for a page 1663 ** and initialize fields of the MemPage structure accordingly. 1664 ** 1665 ** Only the following combinations are supported. Anything different 1666 ** indicates a corrupt database files: 1667 ** 1668 ** PTF_ZERODATA 1669 ** PTF_ZERODATA | PTF_LEAF 1670 ** PTF_LEAFDATA | PTF_INTKEY 1671 ** PTF_LEAFDATA | PTF_INTKEY | PTF_LEAF 1672 */ 1673 static int decodeFlags(MemPage *pPage, int flagByte){ 1674 BtShared *pBt; /* A copy of pPage->pBt */ 1675 1676 assert( pPage->hdrOffset==(pPage->pgno==1 ? 100 : 0) ); 1677 assert( sqlite3_mutex_held(pPage->pBt->mutex) ); 1678 pPage->leaf = (u8)(flagByte>>3); assert( PTF_LEAF == 1<<3 ); 1679 flagByte &= ~PTF_LEAF; 1680 pPage->childPtrSize = 4-4*pPage->leaf; 1681 pPage->xCellSize = cellSizePtr; 1682 pBt = pPage->pBt; 1683 if( flagByte==(PTF_LEAFDATA | PTF_INTKEY) ){ 1684 /* EVIDENCE-OF: R-03640-13415 A value of 5 means the page is an interior 1685 ** table b-tree page. */ 1686 assert( (PTF_LEAFDATA|PTF_INTKEY)==5 ); 1687 /* EVIDENCE-OF: R-20501-61796 A value of 13 means the page is a leaf 1688 ** table b-tree page. */ 1689 assert( (PTF_LEAFDATA|PTF_INTKEY|PTF_LEAF)==13 ); 1690 pPage->intKey = 1; 1691 if( pPage->leaf ){ 1692 pPage->intKeyLeaf = 1; 1693 pPage->noPayload = 0; 1694 pPage->xParseCell = btreeParseCellPtr; 1695 }else{ 1696 pPage->intKeyLeaf = 0; 1697 pPage->noPayload = 1; 1698 pPage->xCellSize = cellSizePtrNoPayload; 1699 pPage->xParseCell = btreeParseCellPtrNoPayload; 1700 } 1701 pPage->maxLocal = pBt->maxLeaf; 1702 pPage->minLocal = pBt->minLeaf; 1703 }else if( flagByte==PTF_ZERODATA ){ 1704 /* EVIDENCE-OF: R-27225-53936 A value of 2 means the page is an interior 1705 ** index b-tree page. */ 1706 assert( (PTF_ZERODATA)==2 ); 1707 /* EVIDENCE-OF: R-16571-11615 A value of 10 means the page is a leaf 1708 ** index b-tree page. */ 1709 assert( (PTF_ZERODATA|PTF_LEAF)==10 ); 1710 pPage->intKey = 0; 1711 pPage->intKeyLeaf = 0; 1712 pPage->noPayload = 0; 1713 pPage->xParseCell = btreeParseCellPtrIndex; 1714 pPage->maxLocal = pBt->maxLocal; 1715 pPage->minLocal = pBt->minLocal; 1716 }else{ 1717 /* EVIDENCE-OF: R-47608-56469 Any other value for the b-tree page type is 1718 ** an error. */ 1719 return SQLITE_CORRUPT_BKPT; 1720 } 1721 pPage->max1bytePayload = pBt->max1bytePayload; 1722 return SQLITE_OK; 1723 } 1724 1725 /* 1726 ** Initialize the auxiliary information for a disk block. 1727 ** 1728 ** Return SQLITE_OK on success. If we see that the page does 1729 ** not contain a well-formed database page, then return 1730 ** SQLITE_CORRUPT. Note that a return of SQLITE_OK does not 1731 ** guarantee that the page is well-formed. It only shows that 1732 ** we failed to detect any corruption. 1733 */ 1734 static int btreeInitPage(MemPage *pPage){ 1735 1736 assert( pPage->pBt!=0 ); 1737 assert( pPage->pBt->db!=0 ); 1738 assert( sqlite3_mutex_held(pPage->pBt->mutex) ); 1739 assert( pPage->pgno==sqlite3PagerPagenumber(pPage->pDbPage) ); 1740 assert( pPage == sqlite3PagerGetExtra(pPage->pDbPage) ); 1741 assert( pPage->aData == sqlite3PagerGetData(pPage->pDbPage) ); 1742 1743 if( !pPage->isInit ){ 1744 u16 pc; /* Address of a freeblock within pPage->aData[] */ 1745 u8 hdr; /* Offset to beginning of page header */ 1746 u8 *data; /* Equal to pPage->aData */ 1747 BtShared *pBt; /* The main btree structure */ 1748 int usableSize; /* Amount of usable space on each page */ 1749 u16 cellOffset; /* Offset from start of page to first cell pointer */ 1750 int nFree; /* Number of unused bytes on the page */ 1751 int top; /* First byte of the cell content area */ 1752 int iCellFirst; /* First allowable cell or freeblock offset */ 1753 int iCellLast; /* Last possible cell or freeblock offset */ 1754 1755 pBt = pPage->pBt; 1756 1757 hdr = pPage->hdrOffset; 1758 data = pPage->aData; 1759 /* EVIDENCE-OF: R-28594-02890 The one-byte flag at offset 0 indicating 1760 ** the b-tree page type. */ 1761 if( decodeFlags(pPage, data[hdr]) ) return SQLITE_CORRUPT_BKPT; 1762 assert( pBt->pageSize>=512 && pBt->pageSize<=65536 ); 1763 pPage->maskPage = (u16)(pBt->pageSize - 1); 1764 pPage->nOverflow = 0; 1765 usableSize = pBt->usableSize; 1766 pPage->cellOffset = cellOffset = hdr + 8 + pPage->childPtrSize; 1767 pPage->aDataEnd = &data[usableSize]; 1768 pPage->aCellIdx = &data[cellOffset]; 1769 pPage->aDataOfst = &data[pPage->childPtrSize]; 1770 /* EVIDENCE-OF: R-58015-48175 The two-byte integer at offset 5 designates 1771 ** the start of the cell content area. A zero value for this integer is 1772 ** interpreted as 65536. */ 1773 top = get2byteNotZero(&data[hdr+5]); 1774 /* EVIDENCE-OF: R-37002-32774 The two-byte integer at offset 3 gives the 1775 ** number of cells on the page. */ 1776 pPage->nCell = get2byte(&data[hdr+3]); 1777 if( pPage->nCell>MX_CELL(pBt) ){ 1778 /* To many cells for a single page. The page must be corrupt */ 1779 return SQLITE_CORRUPT_BKPT; 1780 } 1781 testcase( pPage->nCell==MX_CELL(pBt) ); 1782 /* EVIDENCE-OF: R-24089-57979 If a page contains no cells (which is only 1783 ** possible for a root page of a table that contains no rows) then the 1784 ** offset to the cell content area will equal the page size minus the 1785 ** bytes of reserved space. */ 1786 assert( pPage->nCell>0 || top==usableSize || CORRUPT_DB ); 1787 1788 /* A malformed database page might cause us to read past the end 1789 ** of page when parsing a cell. 1790 ** 1791 ** The following block of code checks early to see if a cell extends 1792 ** past the end of a page boundary and causes SQLITE_CORRUPT to be 1793 ** returned if it does. 1794 */ 1795 iCellFirst = cellOffset + 2*pPage->nCell; 1796 iCellLast = usableSize - 4; 1797 if( pBt->db->flags & SQLITE_CellSizeCk ){ 1798 int i; /* Index into the cell pointer array */ 1799 int sz; /* Size of a cell */ 1800 1801 if( !pPage->leaf ) iCellLast--; 1802 for(i=0; i<pPage->nCell; i++){ 1803 pc = get2byteAligned(&data[cellOffset+i*2]); 1804 testcase( pc==iCellFirst ); 1805 testcase( pc==iCellLast ); 1806 if( pc<iCellFirst || pc>iCellLast ){ 1807 return SQLITE_CORRUPT_BKPT; 1808 } 1809 sz = pPage->xCellSize(pPage, &data[pc]); 1810 testcase( pc+sz==usableSize ); 1811 if( pc+sz>usableSize ){ 1812 return SQLITE_CORRUPT_BKPT; 1813 } 1814 } 1815 if( !pPage->leaf ) iCellLast++; 1816 } 1817 1818 /* Compute the total free space on the page 1819 ** EVIDENCE-OF: R-23588-34450 The two-byte integer at offset 1 gives the 1820 ** start of the first freeblock on the page, or is zero if there are no 1821 ** freeblocks. */ 1822 pc = get2byte(&data[hdr+1]); 1823 nFree = data[hdr+7] + top; /* Init nFree to non-freeblock free space */ 1824 while( pc>0 ){ 1825 u16 next, size; 1826 if( pc<iCellFirst || pc>iCellLast ){ 1827 /* EVIDENCE-OF: R-55530-52930 In a well-formed b-tree page, there will 1828 ** always be at least one cell before the first freeblock. 1829 ** 1830 ** Or, the freeblock is off the end of the page 1831 */ 1832 return SQLITE_CORRUPT_BKPT; 1833 } 1834 next = get2byte(&data[pc]); 1835 size = get2byte(&data[pc+2]); 1836 if( (next>0 && next<=pc+size+3) || pc+size>usableSize ){ 1837 /* Free blocks must be in ascending order. And the last byte of 1838 ** the free-block must lie on the database page. */ 1839 return SQLITE_CORRUPT_BKPT; 1840 } 1841 nFree = nFree + size; 1842 pc = next; 1843 } 1844 1845 /* At this point, nFree contains the sum of the offset to the start 1846 ** of the cell-content area plus the number of free bytes within 1847 ** the cell-content area. If this is greater than the usable-size 1848 ** of the page, then the page must be corrupted. This check also 1849 ** serves to verify that the offset to the start of the cell-content 1850 ** area, according to the page header, lies within the page. 1851 */ 1852 if( nFree>usableSize ){ 1853 return SQLITE_CORRUPT_BKPT; 1854 } 1855 pPage->nFree = (u16)(nFree - iCellFirst); 1856 pPage->isInit = 1; 1857 } 1858 return SQLITE_OK; 1859 } 1860 1861 /* 1862 ** Set up a raw page so that it looks like a database page holding 1863 ** no entries. 1864 */ 1865 static void zeroPage(MemPage *pPage, int flags){ 1866 unsigned char *data = pPage->aData; 1867 BtShared *pBt = pPage->pBt; 1868 u8 hdr = pPage->hdrOffset; 1869 u16 first; 1870 1871 assert( sqlite3PagerPagenumber(pPage->pDbPage)==pPage->pgno ); 1872 assert( sqlite3PagerGetExtra(pPage->pDbPage) == (void*)pPage ); 1873 assert( sqlite3PagerGetData(pPage->pDbPage) == data ); 1874 assert( sqlite3PagerIswriteable(pPage->pDbPage) ); 1875 assert( sqlite3_mutex_held(pBt->mutex) ); 1876 if( pBt->btsFlags & BTS_SECURE_DELETE ){ 1877 memset(&data[hdr], 0, pBt->usableSize - hdr); 1878 } 1879 data[hdr] = (char)flags; 1880 first = hdr + ((flags&PTF_LEAF)==0 ? 12 : 8); 1881 memset(&data[hdr+1], 0, 4); 1882 data[hdr+7] = 0; 1883 put2byte(&data[hdr+5], pBt->usableSize); 1884 pPage->nFree = (u16)(pBt->usableSize - first); 1885 decodeFlags(pPage, flags); 1886 pPage->cellOffset = first; 1887 pPage->aDataEnd = &data[pBt->usableSize]; 1888 pPage->aCellIdx = &data[first]; 1889 pPage->aDataOfst = &data[pPage->childPtrSize]; 1890 pPage->nOverflow = 0; 1891 assert( pBt->pageSize>=512 && pBt->pageSize<=65536 ); 1892 pPage->maskPage = (u16)(pBt->pageSize - 1); 1893 pPage->nCell = 0; 1894 pPage->isInit = 1; 1895 } 1896 1897 1898 /* 1899 ** Convert a DbPage obtained from the pager into a MemPage used by 1900 ** the btree layer. 1901 */ 1902 static MemPage *btreePageFromDbPage(DbPage *pDbPage, Pgno pgno, BtShared *pBt){ 1903 MemPage *pPage = (MemPage*)sqlite3PagerGetExtra(pDbPage); 1904 if( pgno!=pPage->pgno ){ 1905 pPage->aData = sqlite3PagerGetData(pDbPage); 1906 pPage->pDbPage = pDbPage; 1907 pPage->pBt = pBt; 1908 pPage->pgno = pgno; 1909 pPage->hdrOffset = pgno==1 ? 100 : 0; 1910 } 1911 assert( pPage->aData==sqlite3PagerGetData(pDbPage) ); 1912 return pPage; 1913 } 1914 1915 /* 1916 ** Get a page from the pager. Initialize the MemPage.pBt and 1917 ** MemPage.aData elements if needed. See also: btreeGetUnusedPage(). 1918 ** 1919 ** If the PAGER_GET_NOCONTENT flag is set, it means that we do not care 1920 ** about the content of the page at this time. So do not go to the disk 1921 ** to fetch the content. Just fill in the content with zeros for now. 1922 ** If in the future we call sqlite3PagerWrite() on this page, that 1923 ** means we have started to be concerned about content and the disk 1924 ** read should occur at that point. 1925 */ 1926 static int btreeGetPage( 1927 BtShared *pBt, /* The btree */ 1928 Pgno pgno, /* Number of the page to fetch */ 1929 MemPage **ppPage, /* Return the page in this parameter */ 1930 int flags /* PAGER_GET_NOCONTENT or PAGER_GET_READONLY */ 1931 ){ 1932 int rc; 1933 DbPage *pDbPage; 1934 1935 assert( flags==0 || flags==PAGER_GET_NOCONTENT || flags==PAGER_GET_READONLY ); 1936 assert( sqlite3_mutex_held(pBt->mutex) ); 1937 rc = sqlite3PagerGet(pBt->pPager, pgno, (DbPage**)&pDbPage, flags); 1938 if( rc ) return rc; 1939 *ppPage = btreePageFromDbPage(pDbPage, pgno, pBt); 1940 return SQLITE_OK; 1941 } 1942 1943 /* 1944 ** Retrieve a page from the pager cache. If the requested page is not 1945 ** already in the pager cache return NULL. Initialize the MemPage.pBt and 1946 ** MemPage.aData elements if needed. 1947 */ 1948 static MemPage *btreePageLookup(BtShared *pBt, Pgno pgno){ 1949 DbPage *pDbPage; 1950 assert( sqlite3_mutex_held(pBt->mutex) ); 1951 pDbPage = sqlite3PagerLookup(pBt->pPager, pgno); 1952 if( pDbPage ){ 1953 return btreePageFromDbPage(pDbPage, pgno, pBt); 1954 } 1955 return 0; 1956 } 1957 1958 /* 1959 ** Return the size of the database file in pages. If there is any kind of 1960 ** error, return ((unsigned int)-1). 1961 */ 1962 static Pgno btreePagecount(BtShared *pBt){ 1963 return pBt->nPage; 1964 } 1965 u32 sqlite3BtreeLastPage(Btree *p){ 1966 assert( sqlite3BtreeHoldsMutex(p) ); 1967 assert( ((p->pBt->nPage)&0x8000000)==0 ); 1968 return btreePagecount(p->pBt); 1969 } 1970 1971 /* 1972 ** Get a page from the pager and initialize it. 1973 ** 1974 ** If pCur!=0 then the page is being fetched as part of a moveToChild() 1975 ** call. Do additional sanity checking on the page in this case. 1976 ** And if the fetch fails, this routine must decrement pCur->iPage. 1977 ** 1978 ** The page is fetched as read-write unless pCur is not NULL and is 1979 ** a read-only cursor. 1980 ** 1981 ** If an error occurs, then *ppPage is undefined. It 1982 ** may remain unchanged, or it may be set to an invalid value. 1983 */ 1984 static int getAndInitPage( 1985 BtShared *pBt, /* The database file */ 1986 Pgno pgno, /* Number of the page to get */ 1987 MemPage **ppPage, /* Write the page pointer here */ 1988 BtCursor *pCur, /* Cursor to receive the page, or NULL */ 1989 int bReadOnly /* True for a read-only page */ 1990 ){ 1991 int rc; 1992 DbPage *pDbPage; 1993 assert( sqlite3_mutex_held(pBt->mutex) ); 1994 assert( pCur==0 || ppPage==&pCur->apPage[pCur->iPage] ); 1995 assert( pCur==0 || bReadOnly==pCur->curPagerFlags ); 1996 assert( pCur==0 || pCur->iPage>0 ); 1997 1998 if( pgno>btreePagecount(pBt) ){ 1999 rc = SQLITE_CORRUPT_BKPT; 2000 goto getAndInitPage_error; 2001 } 2002 rc = sqlite3PagerGet(pBt->pPager, pgno, (DbPage**)&pDbPage, bReadOnly); 2003 if( rc ){ 2004 goto getAndInitPage_error; 2005 } 2006 *ppPage = (MemPage*)sqlite3PagerGetExtra(pDbPage); 2007 if( (*ppPage)->isInit==0 ){ 2008 btreePageFromDbPage(pDbPage, pgno, pBt); 2009 rc = btreeInitPage(*ppPage); 2010 if( rc!=SQLITE_OK ){ 2011 releasePage(*ppPage); 2012 goto getAndInitPage_error; 2013 } 2014 } 2015 assert( (*ppPage)->pgno==pgno ); 2016 assert( (*ppPage)->aData==sqlite3PagerGetData(pDbPage) ); 2017 2018 /* If obtaining a child page for a cursor, we must verify that the page is 2019 ** compatible with the root page. */ 2020 if( pCur && ((*ppPage)->nCell<1 || (*ppPage)->intKey!=pCur->curIntKey) ){ 2021 rc = SQLITE_CORRUPT_BKPT; 2022 releasePage(*ppPage); 2023 goto getAndInitPage_error; 2024 } 2025 return SQLITE_OK; 2026 2027 getAndInitPage_error: 2028 if( pCur ) pCur->iPage--; 2029 testcase( pgno==0 ); 2030 assert( pgno!=0 || rc==SQLITE_CORRUPT ); 2031 return rc; 2032 } 2033 2034 /* 2035 ** Release a MemPage. This should be called once for each prior 2036 ** call to btreeGetPage. 2037 */ 2038 static void releasePageNotNull(MemPage *pPage){ 2039 assert( pPage->aData ); 2040 assert( pPage->pBt ); 2041 assert( pPage->pDbPage!=0 ); 2042 assert( sqlite3PagerGetExtra(pPage->pDbPage) == (void*)pPage ); 2043 assert( sqlite3PagerGetData(pPage->pDbPage)==pPage->aData ); 2044 assert( sqlite3_mutex_held(pPage->pBt->mutex) ); 2045 sqlite3PagerUnrefNotNull(pPage->pDbPage); 2046 } 2047 static void releasePage(MemPage *pPage){ 2048 if( pPage ) releasePageNotNull(pPage); 2049 } 2050 2051 /* 2052 ** Get an unused page. 2053 ** 2054 ** This works just like btreeGetPage() with the addition: 2055 ** 2056 ** * If the page is already in use for some other purpose, immediately 2057 ** release it and return an SQLITE_CURRUPT error. 2058 ** * Make sure the isInit flag is clear 2059 */ 2060 static int btreeGetUnusedPage( 2061 BtShared *pBt, /* The btree */ 2062 Pgno pgno, /* Number of the page to fetch */ 2063 MemPage **ppPage, /* Return the page in this parameter */ 2064 int flags /* PAGER_GET_NOCONTENT or PAGER_GET_READONLY */ 2065 ){ 2066 int rc = btreeGetPage(pBt, pgno, ppPage, flags); 2067 if( rc==SQLITE_OK ){ 2068 if( sqlite3PagerPageRefcount((*ppPage)->pDbPage)>1 ){ 2069 releasePage(*ppPage); 2070 *ppPage = 0; 2071 return SQLITE_CORRUPT_BKPT; 2072 } 2073 (*ppPage)->isInit = 0; 2074 }else{ 2075 *ppPage = 0; 2076 } 2077 return rc; 2078 } 2079 2080 2081 /* 2082 ** During a rollback, when the pager reloads information into the cache 2083 ** so that the cache is restored to its original state at the start of 2084 ** the transaction, for each page restored this routine is called. 2085 ** 2086 ** This routine needs to reset the extra data section at the end of the 2087 ** page to agree with the restored data. 2088 */ 2089 static void pageReinit(DbPage *pData){ 2090 MemPage *pPage; 2091 pPage = (MemPage *)sqlite3PagerGetExtra(pData); 2092 assert( sqlite3PagerPageRefcount(pData)>0 ); 2093 if( pPage->isInit ){ 2094 assert( sqlite3_mutex_held(pPage->pBt->mutex) ); 2095 pPage->isInit = 0; 2096 if( sqlite3PagerPageRefcount(pData)>1 ){ 2097 /* pPage might not be a btree page; it might be an overflow page 2098 ** or ptrmap page or a free page. In those cases, the following 2099 ** call to btreeInitPage() will likely return SQLITE_CORRUPT. 2100 ** But no harm is done by this. And it is very important that 2101 ** btreeInitPage() be called on every btree page so we make 2102 ** the call for every page that comes in for re-initing. */ 2103 btreeInitPage(pPage); 2104 } 2105 } 2106 } 2107 2108 /* 2109 ** Invoke the busy handler for a btree. 2110 */ 2111 static int btreeInvokeBusyHandler(void *pArg){ 2112 BtShared *pBt = (BtShared*)pArg; 2113 assert( pBt->db ); 2114 assert( sqlite3_mutex_held(pBt->db->mutex) ); 2115 return sqlite3InvokeBusyHandler(&pBt->db->busyHandler); 2116 } 2117 2118 /* 2119 ** Open a database file. 2120 ** 2121 ** zFilename is the name of the database file. If zFilename is NULL 2122 ** then an ephemeral database is created. The ephemeral database might 2123 ** be exclusively in memory, or it might use a disk-based memory cache. 2124 ** Either way, the ephemeral database will be automatically deleted 2125 ** when sqlite3BtreeClose() is called. 2126 ** 2127 ** If zFilename is ":memory:" then an in-memory database is created 2128 ** that is automatically destroyed when it is closed. 2129 ** 2130 ** The "flags" parameter is a bitmask that might contain bits like 2131 ** BTREE_OMIT_JOURNAL and/or BTREE_MEMORY. 2132 ** 2133 ** If the database is already opened in the same database connection 2134 ** and we are in shared cache mode, then the open will fail with an 2135 ** SQLITE_CONSTRAINT error. We cannot allow two or more BtShared 2136 ** objects in the same database connection since doing so will lead 2137 ** to problems with locking. 2138 */ 2139 int sqlite3BtreeOpen( 2140 sqlite3_vfs *pVfs, /* VFS to use for this b-tree */ 2141 const char *zFilename, /* Name of the file containing the BTree database */ 2142 sqlite3 *db, /* Associated database handle */ 2143 Btree **ppBtree, /* Pointer to new Btree object written here */ 2144 int flags, /* Options */ 2145 int vfsFlags /* Flags passed through to sqlite3_vfs.xOpen() */ 2146 ){ 2147 BtShared *pBt = 0; /* Shared part of btree structure */ 2148 Btree *p; /* Handle to return */ 2149 sqlite3_mutex *mutexOpen = 0; /* Prevents a race condition. Ticket #3537 */ 2150 int rc = SQLITE_OK; /* Result code from this function */ 2151 u8 nReserve; /* Byte of unused space on each page */ 2152 unsigned char zDbHeader[100]; /* Database header content */ 2153 2154 /* True if opening an ephemeral, temporary database */ 2155 const int isTempDb = zFilename==0 || zFilename[0]==0; 2156 2157 /* Set the variable isMemdb to true for an in-memory database, or 2158 ** false for a file-based database. 2159 */ 2160 #ifdef SQLITE_OMIT_MEMORYDB 2161 const int isMemdb = 0; 2162 #else 2163 const int isMemdb = (zFilename && strcmp(zFilename, ":memory:")==0) 2164 || (isTempDb && sqlite3TempInMemory(db)) 2165 || (vfsFlags & SQLITE_OPEN_MEMORY)!=0; 2166 #endif 2167 2168 assert( db!=0 ); 2169 assert( pVfs!=0 ); 2170 assert( sqlite3_mutex_held(db->mutex) ); 2171 assert( (flags&0xff)==flags ); /* flags fit in 8 bits */ 2172 2173 /* Only a BTREE_SINGLE database can be BTREE_UNORDERED */ 2174 assert( (flags & BTREE_UNORDERED)==0 || (flags & BTREE_SINGLE)!=0 ); 2175 2176 /* A BTREE_SINGLE database is always a temporary and/or ephemeral */ 2177 assert( (flags & BTREE_SINGLE)==0 || isTempDb ); 2178 2179 if( isMemdb ){ 2180 flags |= BTREE_MEMORY; 2181 } 2182 if( (vfsFlags & SQLITE_OPEN_MAIN_DB)!=0 && (isMemdb || isTempDb) ){ 2183 vfsFlags = (vfsFlags & ~SQLITE_OPEN_MAIN_DB) | SQLITE_OPEN_TEMP_DB; 2184 } 2185 p = sqlite3MallocZero(sizeof(Btree)); 2186 if( !p ){ 2187 return SQLITE_NOMEM; 2188 } 2189 p->inTrans = TRANS_NONE; 2190 p->db = db; 2191 #ifndef SQLITE_OMIT_SHARED_CACHE 2192 p->lock.pBtree = p; 2193 p->lock.iTable = 1; 2194 #endif 2195 2196 #if !defined(SQLITE_OMIT_SHARED_CACHE) && !defined(SQLITE_OMIT_DISKIO) 2197 /* 2198 ** If this Btree is a candidate for shared cache, try to find an 2199 ** existing BtShared object that we can share with 2200 */ 2201 if( isTempDb==0 && (isMemdb==0 || (vfsFlags&SQLITE_OPEN_URI)!=0) ){ 2202 if( vfsFlags & SQLITE_OPEN_SHAREDCACHE ){ 2203 int nFilename = sqlite3Strlen30(zFilename)+1; 2204 int nFullPathname = pVfs->mxPathname+1; 2205 char *zFullPathname = sqlite3Malloc(MAX(nFullPathname,nFilename)); 2206 MUTEX_LOGIC( sqlite3_mutex *mutexShared; ) 2207 2208 p->sharable = 1; 2209 if( !zFullPathname ){ 2210 sqlite3_free(p); 2211 return SQLITE_NOMEM; 2212 } 2213 if( isMemdb ){ 2214 memcpy(zFullPathname, zFilename, nFilename); 2215 }else{ 2216 rc = sqlite3OsFullPathname(pVfs, zFilename, 2217 nFullPathname, zFullPathname); 2218 if( rc ){ 2219 sqlite3_free(zFullPathname); 2220 sqlite3_free(p); 2221 return rc; 2222 } 2223 } 2224 #if SQLITE_THREADSAFE 2225 mutexOpen = sqlite3MutexAlloc(SQLITE_MUTEX_STATIC_OPEN); 2226 sqlite3_mutex_enter(mutexOpen); 2227 mutexShared = sqlite3MutexAlloc(SQLITE_MUTEX_STATIC_MASTER); 2228 sqlite3_mutex_enter(mutexShared); 2229 #endif 2230 for(pBt=GLOBAL(BtShared*,sqlite3SharedCacheList); pBt; pBt=pBt->pNext){ 2231 assert( pBt->nRef>0 ); 2232 if( 0==strcmp(zFullPathname, sqlite3PagerFilename(pBt->pPager, 0)) 2233 && sqlite3PagerVfs(pBt->pPager)==pVfs ){ 2234 int iDb; 2235 for(iDb=db->nDb-1; iDb>=0; iDb--){ 2236 Btree *pExisting = db->aDb[iDb].pBt; 2237 if( pExisting && pExisting->pBt==pBt ){ 2238 sqlite3_mutex_leave(mutexShared); 2239 sqlite3_mutex_leave(mutexOpen); 2240 sqlite3_free(zFullPathname); 2241 sqlite3_free(p); 2242 return SQLITE_CONSTRAINT; 2243 } 2244 } 2245 p->pBt = pBt; 2246 pBt->nRef++; 2247 break; 2248 } 2249 } 2250 sqlite3_mutex_leave(mutexShared); 2251 sqlite3_free(zFullPathname); 2252 } 2253 #ifdef SQLITE_DEBUG 2254 else{ 2255 /* In debug mode, we mark all persistent databases as sharable 2256 ** even when they are not. This exercises the locking code and 2257 ** gives more opportunity for asserts(sqlite3_mutex_held()) 2258 ** statements to find locking problems. 2259 */ 2260 p->sharable = 1; 2261 } 2262 #endif 2263 } 2264 #endif 2265 if( pBt==0 ){ 2266 /* 2267 ** The following asserts make sure that structures used by the btree are 2268 ** the right size. This is to guard against size changes that result 2269 ** when compiling on a different architecture. 2270 */ 2271 assert( sizeof(i64)==8 ); 2272 assert( sizeof(u64)==8 ); 2273 assert( sizeof(u32)==4 ); 2274 assert( sizeof(u16)==2 ); 2275 assert( sizeof(Pgno)==4 ); 2276 2277 pBt = sqlite3MallocZero( sizeof(*pBt) ); 2278 if( pBt==0 ){ 2279 rc = SQLITE_NOMEM; 2280 goto btree_open_out; 2281 } 2282 rc = sqlite3PagerOpen(pVfs, &pBt->pPager, zFilename, 2283 EXTRA_SIZE, flags, vfsFlags, pageReinit); 2284 if( rc==SQLITE_OK ){ 2285 sqlite3PagerSetMmapLimit(pBt->pPager, db->szMmap); 2286 rc = sqlite3PagerReadFileheader(pBt->pPager,sizeof(zDbHeader),zDbHeader); 2287 } 2288 if( rc!=SQLITE_OK ){ 2289 goto btree_open_out; 2290 } 2291 pBt->openFlags = (u8)flags; 2292 pBt->db = db; 2293 sqlite3PagerSetBusyhandler(pBt->pPager, btreeInvokeBusyHandler, pBt); 2294 p->pBt = pBt; 2295 2296 pBt->pCursor = 0; 2297 pBt->pPage1 = 0; 2298 if( sqlite3PagerIsreadonly(pBt->pPager) ) pBt->btsFlags |= BTS_READ_ONLY; 2299 #ifdef SQLITE_SECURE_DELETE 2300 pBt->btsFlags |= BTS_SECURE_DELETE; 2301 #endif 2302 /* EVIDENCE-OF: R-51873-39618 The page size for a database file is 2303 ** determined by the 2-byte integer located at an offset of 16 bytes from 2304 ** the beginning of the database file. */ 2305 pBt->pageSize = (zDbHeader[16]<<8) | (zDbHeader[17]<<16); 2306 if( pBt->pageSize<512 || pBt->pageSize>SQLITE_MAX_PAGE_SIZE 2307 || ((pBt->pageSize-1)&pBt->pageSize)!=0 ){ 2308 pBt->pageSize = 0; 2309 #ifndef SQLITE_OMIT_AUTOVACUUM 2310 /* If the magic name ":memory:" will create an in-memory database, then 2311 ** leave the autoVacuum mode at 0 (do not auto-vacuum), even if 2312 ** SQLITE_DEFAULT_AUTOVACUUM is true. On the other hand, if 2313 ** SQLITE_OMIT_MEMORYDB has been defined, then ":memory:" is just a 2314 ** regular file-name. In this case the auto-vacuum applies as per normal. 2315 */ 2316 if( zFilename && !isMemdb ){ 2317 pBt->autoVacuum = (SQLITE_DEFAULT_AUTOVACUUM ? 1 : 0); 2318 pBt->incrVacuum = (SQLITE_DEFAULT_AUTOVACUUM==2 ? 1 : 0); 2319 } 2320 #endif 2321 nReserve = 0; 2322 }else{ 2323 /* EVIDENCE-OF: R-37497-42412 The size of the reserved region is 2324 ** determined by the one-byte unsigned integer found at an offset of 20 2325 ** into the database file header. */ 2326 nReserve = zDbHeader[20]; 2327 pBt->btsFlags |= BTS_PAGESIZE_FIXED; 2328 #ifndef SQLITE_OMIT_AUTOVACUUM 2329 pBt->autoVacuum = (get4byte(&zDbHeader[36 + 4*4])?1:0); 2330 pBt->incrVacuum = (get4byte(&zDbHeader[36 + 7*4])?1:0); 2331 #endif 2332 } 2333 rc = sqlite3PagerSetPagesize(pBt->pPager, &pBt->pageSize, nReserve); 2334 if( rc ) goto btree_open_out; 2335 pBt->usableSize = pBt->pageSize - nReserve; 2336 assert( (pBt->pageSize & 7)==0 ); /* 8-byte alignment of pageSize */ 2337 2338 #if !defined(SQLITE_OMIT_SHARED_CACHE) && !defined(SQLITE_OMIT_DISKIO) 2339 /* Add the new BtShared object to the linked list sharable BtShareds. 2340 */ 2341 if( p->sharable ){ 2342 MUTEX_LOGIC( sqlite3_mutex *mutexShared; ) 2343 pBt->nRef = 1; 2344 MUTEX_LOGIC( mutexShared = sqlite3MutexAlloc(SQLITE_MUTEX_STATIC_MASTER);) 2345 if( SQLITE_THREADSAFE && sqlite3GlobalConfig.bCoreMutex ){ 2346 pBt->mutex = sqlite3MutexAlloc(SQLITE_MUTEX_FAST); 2347 if( pBt->mutex==0 ){ 2348 rc = SQLITE_NOMEM; 2349 db->mallocFailed = 0; 2350 goto btree_open_out; 2351 } 2352 } 2353 sqlite3_mutex_enter(mutexShared); 2354 pBt->pNext = GLOBAL(BtShared*,sqlite3SharedCacheList); 2355 GLOBAL(BtShared*,sqlite3SharedCacheList) = pBt; 2356 sqlite3_mutex_leave(mutexShared); 2357 } 2358 #endif 2359 } 2360 2361 #if !defined(SQLITE_OMIT_SHARED_CACHE) && !defined(SQLITE_OMIT_DISKIO) 2362 /* If the new Btree uses a sharable pBtShared, then link the new 2363 ** Btree into the list of all sharable Btrees for the same connection. 2364 ** The list is kept in ascending order by pBt address. 2365 */ 2366 if( p->sharable ){ 2367 int i; 2368 Btree *pSib; 2369 for(i=0; i<db->nDb; i++){ 2370 if( (pSib = db->aDb[i].pBt)!=0 && pSib->sharable ){ 2371 while( pSib->pPrev ){ pSib = pSib->pPrev; } 2372 if( p->pBt<pSib->pBt ){ 2373 p->pNext = pSib; 2374 p->pPrev = 0; 2375 pSib->pPrev = p; 2376 }else{ 2377 while( pSib->pNext && pSib->pNext->pBt<p->pBt ){ 2378 pSib = pSib->pNext; 2379 } 2380 p->pNext = pSib->pNext; 2381 p->pPrev = pSib; 2382 if( p->pNext ){ 2383 p->pNext->pPrev = p; 2384 } 2385 pSib->pNext = p; 2386 } 2387 break; 2388 } 2389 } 2390 } 2391 #endif 2392 *ppBtree = p; 2393 2394 btree_open_out: 2395 if( rc!=SQLITE_OK ){ 2396 if( pBt && pBt->pPager ){ 2397 sqlite3PagerClose(pBt->pPager); 2398 } 2399 sqlite3_free(pBt); 2400 sqlite3_free(p); 2401 *ppBtree = 0; 2402 }else{ 2403 /* If the B-Tree was successfully opened, set the pager-cache size to the 2404 ** default value. Except, when opening on an existing shared pager-cache, 2405 ** do not change the pager-cache size. 2406 */ 2407 if( sqlite3BtreeSchema(p, 0, 0)==0 ){ 2408 sqlite3PagerSetCachesize(p->pBt->pPager, SQLITE_DEFAULT_CACHE_SIZE); 2409 } 2410 } 2411 if( mutexOpen ){ 2412 assert( sqlite3_mutex_held(mutexOpen) ); 2413 sqlite3_mutex_leave(mutexOpen); 2414 } 2415 return rc; 2416 } 2417 2418 /* 2419 ** Decrement the BtShared.nRef counter. When it reaches zero, 2420 ** remove the BtShared structure from the sharing list. Return 2421 ** true if the BtShared.nRef counter reaches zero and return 2422 ** false if it is still positive. 2423 */ 2424 static int removeFromSharingList(BtShared *pBt){ 2425 #ifndef SQLITE_OMIT_SHARED_CACHE 2426 MUTEX_LOGIC( sqlite3_mutex *pMaster; ) 2427 BtShared *pList; 2428 int removed = 0; 2429 2430 assert( sqlite3_mutex_notheld(pBt->mutex) ); 2431 MUTEX_LOGIC( pMaster = sqlite3MutexAlloc(SQLITE_MUTEX_STATIC_MASTER); ) 2432 sqlite3_mutex_enter(pMaster); 2433 pBt->nRef--; 2434 if( pBt->nRef<=0 ){ 2435 if( GLOBAL(BtShared*,sqlite3SharedCacheList)==pBt ){ 2436 GLOBAL(BtShared*,sqlite3SharedCacheList) = pBt->pNext; 2437 }else{ 2438 pList = GLOBAL(BtShared*,sqlite3SharedCacheList); 2439 while( ALWAYS(pList) && pList->pNext!=pBt ){ 2440 pList=pList->pNext; 2441 } 2442 if( ALWAYS(pList) ){ 2443 pList->pNext = pBt->pNext; 2444 } 2445 } 2446 if( SQLITE_THREADSAFE ){ 2447 sqlite3_mutex_free(pBt->mutex); 2448 } 2449 removed = 1; 2450 } 2451 sqlite3_mutex_leave(pMaster); 2452 return removed; 2453 #else 2454 return 1; 2455 #endif 2456 } 2457 2458 /* 2459 ** Make sure pBt->pTmpSpace points to an allocation of 2460 ** MX_CELL_SIZE(pBt) bytes with a 4-byte prefix for a left-child 2461 ** pointer. 2462 */ 2463 static void allocateTempSpace(BtShared *pBt){ 2464 if( !pBt->pTmpSpace ){ 2465 pBt->pTmpSpace = sqlite3PageMalloc( pBt->pageSize ); 2466 2467 /* One of the uses of pBt->pTmpSpace is to format cells before 2468 ** inserting them into a leaf page (function fillInCell()). If 2469 ** a cell is less than 4 bytes in size, it is rounded up to 4 bytes 2470 ** by the various routines that manipulate binary cells. Which 2471 ** can mean that fillInCell() only initializes the first 2 or 3 2472 ** bytes of pTmpSpace, but that the first 4 bytes are copied from 2473 ** it into a database page. This is not actually a problem, but it 2474 ** does cause a valgrind error when the 1 or 2 bytes of unitialized 2475 ** data is passed to system call write(). So to avoid this error, 2476 ** zero the first 4 bytes of temp space here. 2477 ** 2478 ** Also: Provide four bytes of initialized space before the 2479 ** beginning of pTmpSpace as an area available to prepend the 2480 ** left-child pointer to the beginning of a cell. 2481 */ 2482 if( pBt->pTmpSpace ){ 2483 memset(pBt->pTmpSpace, 0, 8); 2484 pBt->pTmpSpace += 4; 2485 } 2486 } 2487 } 2488 2489 /* 2490 ** Free the pBt->pTmpSpace allocation 2491 */ 2492 static void freeTempSpace(BtShared *pBt){ 2493 if( pBt->pTmpSpace ){ 2494 pBt->pTmpSpace -= 4; 2495 sqlite3PageFree(pBt->pTmpSpace); 2496 pBt->pTmpSpace = 0; 2497 } 2498 } 2499 2500 /* 2501 ** Close an open database and invalidate all cursors. 2502 */ 2503 int sqlite3BtreeClose(Btree *p){ 2504 BtShared *pBt = p->pBt; 2505 BtCursor *pCur; 2506 2507 /* Close all cursors opened via this handle. */ 2508 assert( sqlite3_mutex_held(p->db->mutex) ); 2509 sqlite3BtreeEnter(p); 2510 pCur = pBt->pCursor; 2511 while( pCur ){ 2512 BtCursor *pTmp = pCur; 2513 pCur = pCur->pNext; 2514 if( pTmp->pBtree==p ){ 2515 sqlite3BtreeCloseCursor(pTmp); 2516 } 2517 } 2518 2519 /* Rollback any active transaction and free the handle structure. 2520 ** The call to sqlite3BtreeRollback() drops any table-locks held by 2521 ** this handle. 2522 */ 2523 sqlite3BtreeRollback(p, SQLITE_OK, 0); 2524 sqlite3BtreeLeave(p); 2525 2526 /* If there are still other outstanding references to the shared-btree 2527 ** structure, return now. The remainder of this procedure cleans 2528 ** up the shared-btree. 2529 */ 2530 assert( p->wantToLock==0 && p->locked==0 ); 2531 if( !p->sharable || removeFromSharingList(pBt) ){ 2532 /* The pBt is no longer on the sharing list, so we can access 2533 ** it without having to hold the mutex. 2534 ** 2535 ** Clean out and delete the BtShared object. 2536 */ 2537 assert( !pBt->pCursor ); 2538 sqlite3PagerClose(pBt->pPager); 2539 if( pBt->xFreeSchema && pBt->pSchema ){ 2540 pBt->xFreeSchema(pBt->pSchema); 2541 } 2542 sqlite3DbFree(0, pBt->pSchema); 2543 freeTempSpace(pBt); 2544 sqlite3_free(pBt); 2545 } 2546 2547 #ifndef SQLITE_OMIT_SHARED_CACHE 2548 assert( p->wantToLock==0 ); 2549 assert( p->locked==0 ); 2550 if( p->pPrev ) p->pPrev->pNext = p->pNext; 2551 if( p->pNext ) p->pNext->pPrev = p->pPrev; 2552 #endif 2553 2554 sqlite3_free(p); 2555 return SQLITE_OK; 2556 } 2557 2558 /* 2559 ** Change the limit on the number of pages allowed in the cache. 2560 ** 2561 ** The maximum number of cache pages is set to the absolute 2562 ** value of mxPage. If mxPage is negative, the pager will 2563 ** operate asynchronously - it will not stop to do fsync()s 2564 ** to insure data is written to the disk surface before 2565 ** continuing. Transactions still work if synchronous is off, 2566 ** and the database cannot be corrupted if this program 2567 ** crashes. But if the operating system crashes or there is 2568 ** an abrupt power failure when synchronous is off, the database 2569 ** could be left in an inconsistent and unrecoverable state. 2570 ** Synchronous is on by default so database corruption is not 2571 ** normally a worry. 2572 */ 2573 int sqlite3BtreeSetCacheSize(Btree *p, int mxPage){ 2574 BtShared *pBt = p->pBt; 2575 assert( sqlite3_mutex_held(p->db->mutex) ); 2576 sqlite3BtreeEnter(p); 2577 sqlite3PagerSetCachesize(pBt->pPager, mxPage); 2578 sqlite3BtreeLeave(p); 2579 return SQLITE_OK; 2580 } 2581 2582 #if SQLITE_MAX_MMAP_SIZE>0 2583 /* 2584 ** Change the limit on the amount of the database file that may be 2585 ** memory mapped. 2586 */ 2587 int sqlite3BtreeSetMmapLimit(Btree *p, sqlite3_int64 szMmap){ 2588 BtShared *pBt = p->pBt; 2589 assert( sqlite3_mutex_held(p->db->mutex) ); 2590 sqlite3BtreeEnter(p); 2591 sqlite3PagerSetMmapLimit(pBt->pPager, szMmap); 2592 sqlite3BtreeLeave(p); 2593 return SQLITE_OK; 2594 } 2595 #endif /* SQLITE_MAX_MMAP_SIZE>0 */ 2596 2597 /* 2598 ** Change the way data is synced to disk in order to increase or decrease 2599 ** how well the database resists damage due to OS crashes and power 2600 ** failures. Level 1 is the same as asynchronous (no syncs() occur and 2601 ** there is a high probability of damage) Level 2 is the default. There 2602 ** is a very low but non-zero probability of damage. Level 3 reduces the 2603 ** probability of damage to near zero but with a write performance reduction. 2604 */ 2605 #ifndef SQLITE_OMIT_PAGER_PRAGMAS 2606 int sqlite3BtreeSetPagerFlags( 2607 Btree *p, /* The btree to set the safety level on */ 2608 unsigned pgFlags /* Various PAGER_* flags */ 2609 ){ 2610 BtShared *pBt = p->pBt; 2611 assert( sqlite3_mutex_held(p->db->mutex) ); 2612 sqlite3BtreeEnter(p); 2613 sqlite3PagerSetFlags(pBt->pPager, pgFlags); 2614 sqlite3BtreeLeave(p); 2615 return SQLITE_OK; 2616 } 2617 #endif 2618 2619 /* 2620 ** Return TRUE if the given btree is set to safety level 1. In other 2621 ** words, return TRUE if no sync() occurs on the disk files. 2622 */ 2623 int sqlite3BtreeSyncDisabled(Btree *p){ 2624 BtShared *pBt = p->pBt; 2625 int rc; 2626 assert( sqlite3_mutex_held(p->db->mutex) ); 2627 sqlite3BtreeEnter(p); 2628 assert( pBt && pBt->pPager ); 2629 rc = sqlite3PagerNosync(pBt->pPager); 2630 sqlite3BtreeLeave(p); 2631 return rc; 2632 } 2633 2634 /* 2635 ** Change the default pages size and the number of reserved bytes per page. 2636 ** Or, if the page size has already been fixed, return SQLITE_READONLY 2637 ** without changing anything. 2638 ** 2639 ** The page size must be a power of 2 between 512 and 65536. If the page 2640 ** size supplied does not meet this constraint then the page size is not 2641 ** changed. 2642 ** 2643 ** Page sizes are constrained to be a power of two so that the region 2644 ** of the database file used for locking (beginning at PENDING_BYTE, 2645 ** the first byte past the 1GB boundary, 0x40000000) needs to occur 2646 ** at the beginning of a page. 2647 ** 2648 ** If parameter nReserve is less than zero, then the number of reserved 2649 ** bytes per page is left unchanged. 2650 ** 2651 ** If the iFix!=0 then the BTS_PAGESIZE_FIXED flag is set so that the page size 2652 ** and autovacuum mode can no longer be changed. 2653 */ 2654 int sqlite3BtreeSetPageSize(Btree *p, int pageSize, int nReserve, int iFix){ 2655 int rc = SQLITE_OK; 2656 BtShared *pBt = p->pBt; 2657 assert( nReserve>=-1 && nReserve<=255 ); 2658 sqlite3BtreeEnter(p); 2659 #if SQLITE_HAS_CODEC 2660 if( nReserve>pBt->optimalReserve ) pBt->optimalReserve = (u8)nReserve; 2661 #endif 2662 if( pBt->btsFlags & BTS_PAGESIZE_FIXED ){ 2663 sqlite3BtreeLeave(p); 2664 return SQLITE_READONLY; 2665 } 2666 if( nReserve<0 ){ 2667 nReserve = pBt->pageSize - pBt->usableSize; 2668 } 2669 assert( nReserve>=0 && nReserve<=255 ); 2670 if( pageSize>=512 && pageSize<=SQLITE_MAX_PAGE_SIZE && 2671 ((pageSize-1)&pageSize)==0 ){ 2672 assert( (pageSize & 7)==0 ); 2673 assert( !pBt->pCursor ); 2674 pBt->pageSize = (u32)pageSize; 2675 freeTempSpace(pBt); 2676 } 2677 rc = sqlite3PagerSetPagesize(pBt->pPager, &pBt->pageSize, nReserve); 2678 pBt->usableSize = pBt->pageSize - (u16)nReserve; 2679 if( iFix ) pBt->btsFlags |= BTS_PAGESIZE_FIXED; 2680 sqlite3BtreeLeave(p); 2681 return rc; 2682 } 2683 2684 /* 2685 ** Return the currently defined page size 2686 */ 2687 int sqlite3BtreeGetPageSize(Btree *p){ 2688 return p->pBt->pageSize; 2689 } 2690 2691 /* 2692 ** This function is similar to sqlite3BtreeGetReserve(), except that it 2693 ** may only be called if it is guaranteed that the b-tree mutex is already 2694 ** held. 2695 ** 2696 ** This is useful in one special case in the backup API code where it is 2697 ** known that the shared b-tree mutex is held, but the mutex on the 2698 ** database handle that owns *p is not. In this case if sqlite3BtreeEnter() 2699 ** were to be called, it might collide with some other operation on the 2700 ** database handle that owns *p, causing undefined behavior. 2701 */ 2702 int sqlite3BtreeGetReserveNoMutex(Btree *p){ 2703 int n; 2704 assert( sqlite3_mutex_held(p->pBt->mutex) ); 2705 n = p->pBt->pageSize - p->pBt->usableSize; 2706 return n; 2707 } 2708 2709 /* 2710 ** Return the number of bytes of space at the end of every page that 2711 ** are intentually left unused. This is the "reserved" space that is 2712 ** sometimes used by extensions. 2713 ** 2714 ** If SQLITE_HAS_MUTEX is defined then the number returned is the 2715 ** greater of the current reserved space and the maximum requested 2716 ** reserve space. 2717 */ 2718 int sqlite3BtreeGetOptimalReserve(Btree *p){ 2719 int n; 2720 sqlite3BtreeEnter(p); 2721 n = sqlite3BtreeGetReserveNoMutex(p); 2722 #ifdef SQLITE_HAS_CODEC 2723 if( n<p->pBt->optimalReserve ) n = p->pBt->optimalReserve; 2724 #endif 2725 sqlite3BtreeLeave(p); 2726 return n; 2727 } 2728 2729 2730 /* 2731 ** Set the maximum page count for a database if mxPage is positive. 2732 ** No changes are made if mxPage is 0 or negative. 2733 ** Regardless of the value of mxPage, return the maximum page count. 2734 */ 2735 int sqlite3BtreeMaxPageCount(Btree *p, int mxPage){ 2736 int n; 2737 sqlite3BtreeEnter(p); 2738 n = sqlite3PagerMaxPageCount(p->pBt->pPager, mxPage); 2739 sqlite3BtreeLeave(p); 2740 return n; 2741 } 2742 2743 /* 2744 ** Set the BTS_SECURE_DELETE flag if newFlag is 0 or 1. If newFlag is -1, 2745 ** then make no changes. Always return the value of the BTS_SECURE_DELETE 2746 ** setting after the change. 2747 */ 2748 int sqlite3BtreeSecureDelete(Btree *p, int newFlag){ 2749 int b; 2750 if( p==0 ) return 0; 2751 sqlite3BtreeEnter(p); 2752 if( newFlag>=0 ){ 2753 p->pBt->btsFlags &= ~BTS_SECURE_DELETE; 2754 if( newFlag ) p->pBt->btsFlags |= BTS_SECURE_DELETE; 2755 } 2756 b = (p->pBt->btsFlags & BTS_SECURE_DELETE)!=0; 2757 sqlite3BtreeLeave(p); 2758 return b; 2759 } 2760 2761 /* 2762 ** Change the 'auto-vacuum' property of the database. If the 'autoVacuum' 2763 ** parameter is non-zero, then auto-vacuum mode is enabled. If zero, it 2764 ** is disabled. The default value for the auto-vacuum property is 2765 ** determined by the SQLITE_DEFAULT_AUTOVACUUM macro. 2766 */ 2767 int sqlite3BtreeSetAutoVacuum(Btree *p, int autoVacuum){ 2768 #ifdef SQLITE_OMIT_AUTOVACUUM 2769 return SQLITE_READONLY; 2770 #else 2771 BtShared *pBt = p->pBt; 2772 int rc = SQLITE_OK; 2773 u8 av = (u8)autoVacuum; 2774 2775 sqlite3BtreeEnter(p); 2776 if( (pBt->btsFlags & BTS_PAGESIZE_FIXED)!=0 && (av ?1:0)!=pBt->autoVacuum ){ 2777 rc = SQLITE_READONLY; 2778 }else{ 2779 pBt->autoVacuum = av ?1:0; 2780 pBt->incrVacuum = av==2 ?1:0; 2781 } 2782 sqlite3BtreeLeave(p); 2783 return rc; 2784 #endif 2785 } 2786 2787 /* 2788 ** Return the value of the 'auto-vacuum' property. If auto-vacuum is 2789 ** enabled 1 is returned. Otherwise 0. 2790 */ 2791 int sqlite3BtreeGetAutoVacuum(Btree *p){ 2792 #ifdef SQLITE_OMIT_AUTOVACUUM 2793 return BTREE_AUTOVACUUM_NONE; 2794 #else 2795 int rc; 2796 sqlite3BtreeEnter(p); 2797 rc = ( 2798 (!p->pBt->autoVacuum)?BTREE_AUTOVACUUM_NONE: 2799 (!p->pBt->incrVacuum)?BTREE_AUTOVACUUM_FULL: 2800 BTREE_AUTOVACUUM_INCR 2801 ); 2802 sqlite3BtreeLeave(p); 2803 return rc; 2804 #endif 2805 } 2806 2807 2808 /* 2809 ** Get a reference to pPage1 of the database file. This will 2810 ** also acquire a readlock on that file. 2811 ** 2812 ** SQLITE_OK is returned on success. If the file is not a 2813 ** well-formed database file, then SQLITE_CORRUPT is returned. 2814 ** SQLITE_BUSY is returned if the database is locked. SQLITE_NOMEM 2815 ** is returned if we run out of memory. 2816 */ 2817 static int lockBtree(BtShared *pBt){ 2818 int rc; /* Result code from subfunctions */ 2819 MemPage *pPage1; /* Page 1 of the database file */ 2820 int nPage; /* Number of pages in the database */ 2821 int nPageFile = 0; /* Number of pages in the database file */ 2822 int nPageHeader; /* Number of pages in the database according to hdr */ 2823 2824 assert( sqlite3_mutex_held(pBt->mutex) ); 2825 assert( pBt->pPage1==0 ); 2826 rc = sqlite3PagerSharedLock(pBt->pPager); 2827 if( rc!=SQLITE_OK ) return rc; 2828 rc = btreeGetPage(pBt, 1, &pPage1, 0); 2829 if( rc!=SQLITE_OK ) return rc; 2830 2831 /* Do some checking to help insure the file we opened really is 2832 ** a valid database file. 2833 */ 2834 nPage = nPageHeader = get4byte(28+(u8*)pPage1->aData); 2835 sqlite3PagerPagecount(pBt->pPager, &nPageFile); 2836 if( nPage==0 || memcmp(24+(u8*)pPage1->aData, 92+(u8*)pPage1->aData,4)!=0 ){ 2837 nPage = nPageFile; 2838 } 2839 if( nPage>0 ){ 2840 u32 pageSize; 2841 u32 usableSize; 2842 u8 *page1 = pPage1->aData; 2843 rc = SQLITE_NOTADB; 2844 /* EVIDENCE-OF: R-43737-39999 Every valid SQLite database file begins 2845 ** with the following 16 bytes (in hex): 53 51 4c 69 74 65 20 66 6f 72 6d 2846 ** 61 74 20 33 00. */ 2847 if( memcmp(page1, zMagicHeader, 16)!=0 ){ 2848 goto page1_init_failed; 2849 } 2850 2851 #ifdef SQLITE_OMIT_WAL 2852 if( page1[18]>1 ){ 2853 pBt->btsFlags |= BTS_READ_ONLY; 2854 } 2855 if( page1[19]>1 ){ 2856 goto page1_init_failed; 2857 } 2858 #else 2859 if( page1[18]>2 ){ 2860 pBt->btsFlags |= BTS_READ_ONLY; 2861 } 2862 if( page1[19]>2 ){ 2863 goto page1_init_failed; 2864 } 2865 2866 /* If the write version is set to 2, this database should be accessed 2867 ** in WAL mode. If the log is not already open, open it now. Then 2868 ** return SQLITE_OK and return without populating BtShared.pPage1. 2869 ** The caller detects this and calls this function again. This is 2870 ** required as the version of page 1 currently in the page1 buffer 2871 ** may not be the latest version - there may be a newer one in the log 2872 ** file. 2873 */ 2874 if( page1[19]==2 && (pBt->btsFlags & BTS_NO_WAL)==0 ){ 2875 int isOpen = 0; 2876 rc = sqlite3PagerOpenWal(pBt->pPager, &isOpen); 2877 if( rc!=SQLITE_OK ){ 2878 goto page1_init_failed; 2879 }else if( isOpen==0 ){ 2880 releasePage(pPage1); 2881 return SQLITE_OK; 2882 } 2883 rc = SQLITE_NOTADB; 2884 } 2885 #endif 2886 2887 /* EVIDENCE-OF: R-15465-20813 The maximum and minimum embedded payload 2888 ** fractions and the leaf payload fraction values must be 64, 32, and 32. 2889 ** 2890 ** The original design allowed these amounts to vary, but as of 2891 ** version 3.6.0, we require them to be fixed. 2892 */ 2893 if( memcmp(&page1[21], "\100\040\040",3)!=0 ){ 2894 goto page1_init_failed; 2895 } 2896 /* EVIDENCE-OF: R-51873-39618 The page size for a database file is 2897 ** determined by the 2-byte integer located at an offset of 16 bytes from 2898 ** the beginning of the database file. */ 2899 pageSize = (page1[16]<<8) | (page1[17]<<16); 2900 /* EVIDENCE-OF: R-25008-21688 The size of a page is a power of two 2901 ** between 512 and 65536 inclusive. */ 2902 if( ((pageSize-1)&pageSize)!=0 2903 || pageSize>SQLITE_MAX_PAGE_SIZE 2904 || pageSize<=256 2905 ){ 2906 goto page1_init_failed; 2907 } 2908 assert( (pageSize & 7)==0 ); 2909 /* EVIDENCE-OF: R-59310-51205 The "reserved space" size in the 1-byte 2910 ** integer at offset 20 is the number of bytes of space at the end of 2911 ** each page to reserve for extensions. 2912 ** 2913 ** EVIDENCE-OF: R-37497-42412 The size of the reserved region is 2914 ** determined by the one-byte unsigned integer found at an offset of 20 2915 ** into the database file header. */ 2916 usableSize = pageSize - page1[20]; 2917 if( (u32)pageSize!=pBt->pageSize ){ 2918 /* After reading the first page of the database assuming a page size 2919 ** of BtShared.pageSize, we have discovered that the page-size is 2920 ** actually pageSize. Unlock the database, leave pBt->pPage1 at 2921 ** zero and return SQLITE_OK. The caller will call this function 2922 ** again with the correct page-size. 2923 */ 2924 releasePage(pPage1); 2925 pBt->usableSize = usableSize; 2926 pBt->pageSize = pageSize; 2927 freeTempSpace(pBt); 2928 rc = sqlite3PagerSetPagesize(pBt->pPager, &pBt->pageSize, 2929 pageSize-usableSize); 2930 return rc; 2931 } 2932 if( (pBt->db->flags & SQLITE_RecoveryMode)==0 && nPage>nPageFile ){ 2933 rc = SQLITE_CORRUPT_BKPT; 2934 goto page1_init_failed; 2935 } 2936 /* EVIDENCE-OF: R-28312-64704 However, the usable size is not allowed to 2937 ** be less than 480. In other words, if the page size is 512, then the 2938 ** reserved space size cannot exceed 32. */ 2939 if( usableSize<480 ){ 2940 goto page1_init_failed; 2941 } 2942 pBt->pageSize = pageSize; 2943 pBt->usableSize = usableSize; 2944 #ifndef SQLITE_OMIT_AUTOVACUUM 2945 pBt->autoVacuum = (get4byte(&page1[36 + 4*4])?1:0); 2946 pBt->incrVacuum = (get4byte(&page1[36 + 7*4])?1:0); 2947 #endif 2948 } 2949 2950 /* maxLocal is the maximum amount of payload to store locally for 2951 ** a cell. Make sure it is small enough so that at least minFanout 2952 ** cells can will fit on one page. We assume a 10-byte page header. 2953 ** Besides the payload, the cell must store: 2954 ** 2-byte pointer to the cell 2955 ** 4-byte child pointer 2956 ** 9-byte nKey value 2957 ** 4-byte nData value 2958 ** 4-byte overflow page pointer 2959 ** So a cell consists of a 2-byte pointer, a header which is as much as 2960 ** 17 bytes long, 0 to N bytes of payload, and an optional 4 byte overflow 2961 ** page pointer. 2962 */ 2963 pBt->maxLocal = (u16)((pBt->usableSize-12)*64/255 - 23); 2964 pBt->minLocal = (u16)((pBt->usableSize-12)*32/255 - 23); 2965 pBt->maxLeaf = (u16)(pBt->usableSize - 35); 2966 pBt->minLeaf = (u16)((pBt->usableSize-12)*32/255 - 23); 2967 if( pBt->maxLocal>127 ){ 2968 pBt->max1bytePayload = 127; 2969 }else{ 2970 pBt->max1bytePayload = (u8)pBt->maxLocal; 2971 } 2972 assert( pBt->maxLeaf + 23 <= MX_CELL_SIZE(pBt) ); 2973 pBt->pPage1 = pPage1; 2974 pBt->nPage = nPage; 2975 return SQLITE_OK; 2976 2977 page1_init_failed: 2978 releasePage(pPage1); 2979 pBt->pPage1 = 0; 2980 return rc; 2981 } 2982 2983 #ifndef NDEBUG 2984 /* 2985 ** Return the number of cursors open on pBt. This is for use 2986 ** in assert() expressions, so it is only compiled if NDEBUG is not 2987 ** defined. 2988 ** 2989 ** Only write cursors are counted if wrOnly is true. If wrOnly is 2990 ** false then all cursors are counted. 2991 ** 2992 ** For the purposes of this routine, a cursor is any cursor that 2993 ** is capable of reading or writing to the database. Cursors that 2994 ** have been tripped into the CURSOR_FAULT state are not counted. 2995 */ 2996 static int countValidCursors(BtShared *pBt, int wrOnly){ 2997 BtCursor *pCur; 2998 int r = 0; 2999 for(pCur=pBt->pCursor; pCur; pCur=pCur->pNext){ 3000 if( (wrOnly==0 || (pCur->curFlags & BTCF_WriteFlag)!=0) 3001 && pCur->eState!=CURSOR_FAULT ) r++; 3002 } 3003 return r; 3004 } 3005 #endif 3006 3007 /* 3008 ** If there are no outstanding cursors and we are not in the middle 3009 ** of a transaction but there is a read lock on the database, then 3010 ** this routine unrefs the first page of the database file which 3011 ** has the effect of releasing the read lock. 3012 ** 3013 ** If there is a transaction in progress, this routine is a no-op. 3014 */ 3015 static void unlockBtreeIfUnused(BtShared *pBt){ 3016 assert( sqlite3_mutex_held(pBt->mutex) ); 3017 assert( countValidCursors(pBt,0)==0 || pBt->inTransaction>TRANS_NONE ); 3018 if( pBt->inTransaction==TRANS_NONE && pBt->pPage1!=0 ){ 3019 MemPage *pPage1 = pBt->pPage1; 3020 assert( pPage1->aData ); 3021 assert( sqlite3PagerRefcount(pBt->pPager)==1 ); 3022 pBt->pPage1 = 0; 3023 releasePageNotNull(pPage1); 3024 } 3025 } 3026 3027 /* 3028 ** If pBt points to an empty file then convert that empty file 3029 ** into a new empty database by initializing the first page of 3030 ** the database. 3031 */ 3032 static int newDatabase(BtShared *pBt){ 3033 MemPage *pP1; 3034 unsigned char *data; 3035 int rc; 3036 3037 assert( sqlite3_mutex_held(pBt->mutex) ); 3038 if( pBt->nPage>0 ){ 3039 return SQLITE_OK; 3040 } 3041 pP1 = pBt->pPage1; 3042 assert( pP1!=0 ); 3043 data = pP1->aData; 3044 rc = sqlite3PagerWrite(pP1->pDbPage); 3045 if( rc ) return rc; 3046 memcpy(data, zMagicHeader, sizeof(zMagicHeader)); 3047 assert( sizeof(zMagicHeader)==16 ); 3048 data[16] = (u8)((pBt->pageSize>>8)&0xff); 3049 data[17] = (u8)((pBt->pageSize>>16)&0xff); 3050 data[18] = 1; 3051 data[19] = 1; 3052 assert( pBt->usableSize<=pBt->pageSize && pBt->usableSize+255>=pBt->pageSize); 3053 data[20] = (u8)(pBt->pageSize - pBt->usableSize); 3054 data[21] = 64; 3055 data[22] = 32; 3056 data[23] = 32; 3057 memset(&data[24], 0, 100-24); 3058 zeroPage(pP1, PTF_INTKEY|PTF_LEAF|PTF_LEAFDATA ); 3059 pBt->btsFlags |= BTS_PAGESIZE_FIXED; 3060 #ifndef SQLITE_OMIT_AUTOVACUUM 3061 assert( pBt->autoVacuum==1 || pBt->autoVacuum==0 ); 3062 assert( pBt->incrVacuum==1 || pBt->incrVacuum==0 ); 3063 put4byte(&data[36 + 4*4], pBt->autoVacuum); 3064 put4byte(&data[36 + 7*4], pBt->incrVacuum); 3065 #endif 3066 pBt->nPage = 1; 3067 data[31] = 1; 3068 return SQLITE_OK; 3069 } 3070 3071 /* 3072 ** Initialize the first page of the database file (creating a database 3073 ** consisting of a single page and no schema objects). Return SQLITE_OK 3074 ** if successful, or an SQLite error code otherwise. 3075 */ 3076 int sqlite3BtreeNewDb(Btree *p){ 3077 int rc; 3078 sqlite3BtreeEnter(p); 3079 p->pBt->nPage = 0; 3080 rc = newDatabase(p->pBt); 3081 sqlite3BtreeLeave(p); 3082 return rc; 3083 } 3084 3085 /* 3086 ** Attempt to start a new transaction. A write-transaction 3087 ** is started if the second argument is nonzero, otherwise a read- 3088 ** transaction. If the second argument is 2 or more and exclusive 3089 ** transaction is started, meaning that no other process is allowed 3090 ** to access the database. A preexisting transaction may not be 3091 ** upgraded to exclusive by calling this routine a second time - the 3092 ** exclusivity flag only works for a new transaction. 3093 ** 3094 ** A write-transaction must be started before attempting any 3095 ** changes to the database. None of the following routines 3096 ** will work unless a transaction is started first: 3097 ** 3098 ** sqlite3BtreeCreateTable() 3099 ** sqlite3BtreeCreateIndex() 3100 ** sqlite3BtreeClearTable() 3101 ** sqlite3BtreeDropTable() 3102 ** sqlite3BtreeInsert() 3103 ** sqlite3BtreeDelete() 3104 ** sqlite3BtreeUpdateMeta() 3105 ** 3106 ** If an initial attempt to acquire the lock fails because of lock contention 3107 ** and the database was previously unlocked, then invoke the busy handler 3108 ** if there is one. But if there was previously a read-lock, do not 3109 ** invoke the busy handler - just return SQLITE_BUSY. SQLITE_BUSY is 3110 ** returned when there is already a read-lock in order to avoid a deadlock. 3111 ** 3112 ** Suppose there are two processes A and B. A has a read lock and B has 3113 ** a reserved lock. B tries to promote to exclusive but is blocked because 3114 ** of A's read lock. A tries to promote to reserved but is blocked by B. 3115 ** One or the other of the two processes must give way or there can be 3116 ** no progress. By returning SQLITE_BUSY and not invoking the busy callback 3117 ** when A already has a read lock, we encourage A to give up and let B 3118 ** proceed. 3119 */ 3120 int sqlite3BtreeBeginTrans(Btree *p, int wrflag){ 3121 sqlite3 *pBlock = 0; 3122 BtShared *pBt = p->pBt; 3123 int rc = SQLITE_OK; 3124 3125 sqlite3BtreeEnter(p); 3126 btreeIntegrity(p); 3127 3128 /* If the btree is already in a write-transaction, or it 3129 ** is already in a read-transaction and a read-transaction 3130 ** is requested, this is a no-op. 3131 */ 3132 if( p->inTrans==TRANS_WRITE || (p->inTrans==TRANS_READ && !wrflag) ){ 3133 goto trans_begun; 3134 } 3135 assert( pBt->inTransaction==TRANS_WRITE || IfNotOmitAV(pBt->bDoTruncate)==0 ); 3136 3137 /* Write transactions are not possible on a read-only database */ 3138 if( (pBt->btsFlags & BTS_READ_ONLY)!=0 && wrflag ){ 3139 rc = SQLITE_READONLY; 3140 goto trans_begun; 3141 } 3142 3143 #ifndef SQLITE_OMIT_SHARED_CACHE 3144 /* If another database handle has already opened a write transaction 3145 ** on this shared-btree structure and a second write transaction is 3146 ** requested, return SQLITE_LOCKED. 3147 */ 3148 if( (wrflag && pBt->inTransaction==TRANS_WRITE) 3149 || (pBt->btsFlags & BTS_PENDING)!=0 3150 ){ 3151 pBlock = pBt->pWriter->db; 3152 }else if( wrflag>1 ){ 3153 BtLock *pIter; 3154 for(pIter=pBt->pLock; pIter; pIter=pIter->pNext){ 3155 if( pIter->pBtree!=p ){ 3156 pBlock = pIter->pBtree->db; 3157 break; 3158 } 3159 } 3160 } 3161 if( pBlock ){ 3162 sqlite3ConnectionBlocked(p->db, pBlock); 3163 rc = SQLITE_LOCKED_SHAREDCACHE; 3164 goto trans_begun; 3165 } 3166 #endif 3167 3168 /* Any read-only or read-write transaction implies a read-lock on 3169 ** page 1. So if some other shared-cache client already has a write-lock 3170 ** on page 1, the transaction cannot be opened. */ 3171 rc = querySharedCacheTableLock(p, MASTER_ROOT, READ_LOCK); 3172 if( SQLITE_OK!=rc ) goto trans_begun; 3173 3174 pBt->btsFlags &= ~BTS_INITIALLY_EMPTY; 3175 if( pBt->nPage==0 ) pBt->btsFlags |= BTS_INITIALLY_EMPTY; 3176 do { 3177 /* Call lockBtree() until either pBt->pPage1 is populated or 3178 ** lockBtree() returns something other than SQLITE_OK. lockBtree() 3179 ** may return SQLITE_OK but leave pBt->pPage1 set to 0 if after 3180 ** reading page 1 it discovers that the page-size of the database 3181 ** file is not pBt->pageSize. In this case lockBtree() will update 3182 ** pBt->pageSize to the page-size of the file on disk. 3183 */ 3184 while( pBt->pPage1==0 && SQLITE_OK==(rc = lockBtree(pBt)) ); 3185 3186 if( rc==SQLITE_OK && wrflag ){ 3187 if( (pBt->btsFlags & BTS_READ_ONLY)!=0 ){ 3188 rc = SQLITE_READONLY; 3189 }else{ 3190 rc = sqlite3PagerBegin(pBt->pPager,wrflag>1,sqlite3TempInMemory(p->db)); 3191 if( rc==SQLITE_OK ){ 3192 rc = newDatabase(pBt); 3193 } 3194 } 3195 } 3196 3197 if( rc!=SQLITE_OK ){ 3198 unlockBtreeIfUnused(pBt); 3199 } 3200 }while( (rc&0xFF)==SQLITE_BUSY && pBt->inTransaction==TRANS_NONE && 3201 btreeInvokeBusyHandler(pBt) ); 3202 3203 if( rc==SQLITE_OK ){ 3204 if( p->inTrans==TRANS_NONE ){ 3205 pBt->nTransaction++; 3206 #ifndef SQLITE_OMIT_SHARED_CACHE 3207 if( p->sharable ){ 3208 assert( p->lock.pBtree==p && p->lock.iTable==1 ); 3209 p->lock.eLock = READ_LOCK; 3210 p->lock.pNext = pBt->pLock; 3211 pBt->pLock = &p->lock; 3212 } 3213 #endif 3214 } 3215 p->inTrans = (wrflag?TRANS_WRITE:TRANS_READ); 3216 if( p->inTrans>pBt->inTransaction ){ 3217 pBt->inTransaction = p->inTrans; 3218 } 3219 if( wrflag ){ 3220 MemPage *pPage1 = pBt->pPage1; 3221 #ifndef SQLITE_OMIT_SHARED_CACHE 3222 assert( !pBt->pWriter ); 3223 pBt->pWriter = p; 3224 pBt->btsFlags &= ~BTS_EXCLUSIVE; 3225 if( wrflag>1 ) pBt->btsFlags |= BTS_EXCLUSIVE; 3226 #endif 3227 3228 /* If the db-size header field is incorrect (as it may be if an old 3229 ** client has been writing the database file), update it now. Doing 3230 ** this sooner rather than later means the database size can safely 3231 ** re-read the database size from page 1 if a savepoint or transaction 3232 ** rollback occurs within the transaction. 3233 */ 3234 if( pBt->nPage!=get4byte(&pPage1->aData[28]) ){ 3235 rc = sqlite3PagerWrite(pPage1->pDbPage); 3236 if( rc==SQLITE_OK ){ 3237 put4byte(&pPage1->aData[28], pBt->nPage); 3238 } 3239 } 3240 } 3241 } 3242 3243 3244 trans_begun: 3245 if( rc==SQLITE_OK && wrflag ){ 3246 /* This call makes sure that the pager has the correct number of 3247 ** open savepoints. If the second parameter is greater than 0 and 3248 ** the sub-journal is not already open, then it will be opened here. 3249 */ 3250 rc = sqlite3PagerOpenSavepoint(pBt->pPager, p->db->nSavepoint); 3251 } 3252 3253 btreeIntegrity(p); 3254 sqlite3BtreeLeave(p); 3255 return rc; 3256 } 3257 3258 #ifndef SQLITE_OMIT_AUTOVACUUM 3259 3260 /* 3261 ** Set the pointer-map entries for all children of page pPage. Also, if 3262 ** pPage contains cells that point to overflow pages, set the pointer 3263 ** map entries for the overflow pages as well. 3264 */ 3265 static int setChildPtrmaps(MemPage *pPage){ 3266 int i; /* Counter variable */ 3267 int nCell; /* Number of cells in page pPage */ 3268 int rc; /* Return code */ 3269 BtShared *pBt = pPage->pBt; 3270 u8 isInitOrig = pPage->isInit; 3271 Pgno pgno = pPage->pgno; 3272 3273 assert( sqlite3_mutex_held(pPage->pBt->mutex) ); 3274 rc = btreeInitPage(pPage); 3275 if( rc!=SQLITE_OK ){ 3276 goto set_child_ptrmaps_out; 3277 } 3278 nCell = pPage->nCell; 3279 3280 for(i=0; i<nCell; i++){ 3281 u8 *pCell = findCell(pPage, i); 3282 3283 ptrmapPutOvflPtr(pPage, pCell, &rc); 3284 3285 if( !pPage->leaf ){ 3286 Pgno childPgno = get4byte(pCell); 3287 ptrmapPut(pBt, childPgno, PTRMAP_BTREE, pgno, &rc); 3288 } 3289 } 3290 3291 if( !pPage->leaf ){ 3292 Pgno childPgno = get4byte(&pPage->aData[pPage->hdrOffset+8]); 3293 ptrmapPut(pBt, childPgno, PTRMAP_BTREE, pgno, &rc); 3294 } 3295 3296 set_child_ptrmaps_out: 3297 pPage->isInit = isInitOrig; 3298 return rc; 3299 } 3300 3301 /* 3302 ** Somewhere on pPage is a pointer to page iFrom. Modify this pointer so 3303 ** that it points to iTo. Parameter eType describes the type of pointer to 3304 ** be modified, as follows: 3305 ** 3306 ** PTRMAP_BTREE: pPage is a btree-page. The pointer points at a child 3307 ** page of pPage. 3308 ** 3309 ** PTRMAP_OVERFLOW1: pPage is a btree-page. The pointer points at an overflow 3310 ** page pointed to by one of the cells on pPage. 3311 ** 3312 ** PTRMAP_OVERFLOW2: pPage is an overflow-page. The pointer points at the next 3313 ** overflow page in the list. 3314 */ 3315 static int modifyPagePointer(MemPage *pPage, Pgno iFrom, Pgno iTo, u8 eType){ 3316 assert( sqlite3_mutex_held(pPage->pBt->mutex) ); 3317 assert( sqlite3PagerIswriteable(pPage->pDbPage) ); 3318 if( eType==PTRMAP_OVERFLOW2 ){ 3319 /* The pointer is always the first 4 bytes of the page in this case. */ 3320 if( get4byte(pPage->aData)!=iFrom ){ 3321 return SQLITE_CORRUPT_BKPT; 3322 } 3323 put4byte(pPage->aData, iTo); 3324 }else{ 3325 u8 isInitOrig = pPage->isInit; 3326 int i; 3327 int nCell; 3328 int rc; 3329 3330 rc = btreeInitPage(pPage); 3331 if( rc ) return rc; 3332 nCell = pPage->nCell; 3333 3334 for(i=0; i<nCell; i++){ 3335 u8 *pCell = findCell(pPage, i); 3336 if( eType==PTRMAP_OVERFLOW1 ){ 3337 CellInfo info; 3338 pPage->xParseCell(pPage, pCell, &info); 3339 if( info.iOverflow 3340 && pCell+info.iOverflow+3<=pPage->aData+pPage->maskPage 3341 && iFrom==get4byte(&pCell[info.iOverflow]) 3342 ){ 3343 put4byte(&pCell[info.iOverflow], iTo); 3344 break; 3345 } 3346 }else{ 3347 if( get4byte(pCell)==iFrom ){ 3348 put4byte(pCell, iTo); 3349 break; 3350 } 3351 } 3352 } 3353 3354 if( i==nCell ){ 3355 if( eType!=PTRMAP_BTREE || 3356 get4byte(&pPage->aData[pPage->hdrOffset+8])!=iFrom ){ 3357 return SQLITE_CORRUPT_BKPT; 3358 } 3359 put4byte(&pPage->aData[pPage->hdrOffset+8], iTo); 3360 } 3361 3362 pPage->isInit = isInitOrig; 3363 } 3364 return SQLITE_OK; 3365 } 3366 3367 3368 /* 3369 ** Move the open database page pDbPage to location iFreePage in the 3370 ** database. The pDbPage reference remains valid. 3371 ** 3372 ** The isCommit flag indicates that there is no need to remember that 3373 ** the journal needs to be sync()ed before database page pDbPage->pgno 3374 ** can be written to. The caller has already promised not to write to that 3375 ** page. 3376 */ 3377 static int relocatePage( 3378 BtShared *pBt, /* Btree */ 3379 MemPage *pDbPage, /* Open page to move */ 3380 u8 eType, /* Pointer map 'type' entry for pDbPage */ 3381 Pgno iPtrPage, /* Pointer map 'page-no' entry for pDbPage */ 3382 Pgno iFreePage, /* The location to move pDbPage to */ 3383 int isCommit /* isCommit flag passed to sqlite3PagerMovepage */ 3384 ){ 3385 MemPage *pPtrPage; /* The page that contains a pointer to pDbPage */ 3386 Pgno iDbPage = pDbPage->pgno; 3387 Pager *pPager = pBt->pPager; 3388 int rc; 3389 3390 assert( eType==PTRMAP_OVERFLOW2 || eType==PTRMAP_OVERFLOW1 || 3391 eType==PTRMAP_BTREE || eType==PTRMAP_ROOTPAGE ); 3392 assert( sqlite3_mutex_held(pBt->mutex) ); 3393 assert( pDbPage->pBt==pBt ); 3394 3395 /* Move page iDbPage from its current location to page number iFreePage */ 3396 TRACE(("AUTOVACUUM: Moving %d to free page %d (ptr page %d type %d)\n", 3397 iDbPage, iFreePage, iPtrPage, eType)); 3398 rc = sqlite3PagerMovepage(pPager, pDbPage->pDbPage, iFreePage, isCommit); 3399 if( rc!=SQLITE_OK ){ 3400 return rc; 3401 } 3402 pDbPage->pgno = iFreePage; 3403 3404 /* If pDbPage was a btree-page, then it may have child pages and/or cells 3405 ** that point to overflow pages. The pointer map entries for all these 3406 ** pages need to be changed. 3407 ** 3408 ** If pDbPage is an overflow page, then the first 4 bytes may store a 3409 ** pointer to a subsequent overflow page. If this is the case, then 3410 ** the pointer map needs to be updated for the subsequent overflow page. 3411 */ 3412 if( eType==PTRMAP_BTREE || eType==PTRMAP_ROOTPAGE ){ 3413 rc = setChildPtrmaps(pDbPage); 3414 if( rc!=SQLITE_OK ){ 3415 return rc; 3416 } 3417 }else{ 3418 Pgno nextOvfl = get4byte(pDbPage->aData); 3419 if( nextOvfl!=0 ){ 3420 ptrmapPut(pBt, nextOvfl, PTRMAP_OVERFLOW2, iFreePage, &rc); 3421 if( rc!=SQLITE_OK ){ 3422 return rc; 3423 } 3424 } 3425 } 3426 3427 /* Fix the database pointer on page iPtrPage that pointed at iDbPage so 3428 ** that it points at iFreePage. Also fix the pointer map entry for 3429 ** iPtrPage. 3430 */ 3431 if( eType!=PTRMAP_ROOTPAGE ){ 3432 rc = btreeGetPage(pBt, iPtrPage, &pPtrPage, 0); 3433 if( rc!=SQLITE_OK ){ 3434 return rc; 3435 } 3436 rc = sqlite3PagerWrite(pPtrPage->pDbPage); 3437 if( rc!=SQLITE_OK ){ 3438 releasePage(pPtrPage); 3439 return rc; 3440 } 3441 rc = modifyPagePointer(pPtrPage, iDbPage, iFreePage, eType); 3442 releasePage(pPtrPage); 3443 if( rc==SQLITE_OK ){ 3444 ptrmapPut(pBt, iFreePage, eType, iPtrPage, &rc); 3445 } 3446 } 3447 return rc; 3448 } 3449 3450 /* Forward declaration required by incrVacuumStep(). */ 3451 static int allocateBtreePage(BtShared *, MemPage **, Pgno *, Pgno, u8); 3452 3453 /* 3454 ** Perform a single step of an incremental-vacuum. If successful, return 3455 ** SQLITE_OK. If there is no work to do (and therefore no point in 3456 ** calling this function again), return SQLITE_DONE. Or, if an error 3457 ** occurs, return some other error code. 3458 ** 3459 ** More specifically, this function attempts to re-organize the database so 3460 ** that the last page of the file currently in use is no longer in use. 3461 ** 3462 ** Parameter nFin is the number of pages that this database would contain 3463 ** were this function called until it returns SQLITE_DONE. 3464 ** 3465 ** If the bCommit parameter is non-zero, this function assumes that the 3466 ** caller will keep calling incrVacuumStep() until it returns SQLITE_DONE 3467 ** or an error. bCommit is passed true for an auto-vacuum-on-commit 3468 ** operation, or false for an incremental vacuum. 3469 */ 3470 static int incrVacuumStep(BtShared *pBt, Pgno nFin, Pgno iLastPg, int bCommit){ 3471 Pgno nFreeList; /* Number of pages still on the free-list */ 3472 int rc; 3473 3474 assert( sqlite3_mutex_held(pBt->mutex) ); 3475 assert( iLastPg>nFin ); 3476 3477 if( !PTRMAP_ISPAGE(pBt, iLastPg) && iLastPg!=PENDING_BYTE_PAGE(pBt) ){ 3478 u8 eType; 3479 Pgno iPtrPage; 3480 3481 nFreeList = get4byte(&pBt->pPage1->aData[36]); 3482 if( nFreeList==0 ){ 3483 return SQLITE_DONE; 3484 } 3485 3486 rc = ptrmapGet(pBt, iLastPg, &eType, &iPtrPage); 3487 if( rc!=SQLITE_OK ){ 3488 return rc; 3489 } 3490 if( eType==PTRMAP_ROOTPAGE ){ 3491 return SQLITE_CORRUPT_BKPT; 3492 } 3493 3494 if( eType==PTRMAP_FREEPAGE ){ 3495 if( bCommit==0 ){ 3496 /* Remove the page from the files free-list. This is not required 3497 ** if bCommit is non-zero. In that case, the free-list will be 3498 ** truncated to zero after this function returns, so it doesn't 3499 ** matter if it still contains some garbage entries. 3500 */ 3501 Pgno iFreePg; 3502 MemPage *pFreePg; 3503 rc = allocateBtreePage(pBt, &pFreePg, &iFreePg, iLastPg, BTALLOC_EXACT); 3504 if( rc!=SQLITE_OK ){ 3505 return rc; 3506 } 3507 assert( iFreePg==iLastPg ); 3508 releasePage(pFreePg); 3509 } 3510 } else { 3511 Pgno iFreePg; /* Index of free page to move pLastPg to */ 3512 MemPage *pLastPg; 3513 u8 eMode = BTALLOC_ANY; /* Mode parameter for allocateBtreePage() */ 3514 Pgno iNear = 0; /* nearby parameter for allocateBtreePage() */ 3515 3516 rc = btreeGetPage(pBt, iLastPg, &pLastPg, 0); 3517 if( rc!=SQLITE_OK ){ 3518 return rc; 3519 } 3520 3521 /* If bCommit is zero, this loop runs exactly once and page pLastPg 3522 ** is swapped with the first free page pulled off the free list. 3523 ** 3524 ** On the other hand, if bCommit is greater than zero, then keep 3525 ** looping until a free-page located within the first nFin pages 3526 ** of the file is found. 3527 */ 3528 if( bCommit==0 ){ 3529 eMode = BTALLOC_LE; 3530 iNear = nFin; 3531 } 3532 do { 3533 MemPage *pFreePg; 3534 rc = allocateBtreePage(pBt, &pFreePg, &iFreePg, iNear, eMode); 3535 if( rc!=SQLITE_OK ){ 3536 releasePage(pLastPg); 3537 return rc; 3538 } 3539 releasePage(pFreePg); 3540 }while( bCommit && iFreePg>nFin ); 3541 assert( iFreePg<iLastPg ); 3542 3543 rc = relocatePage(pBt, pLastPg, eType, iPtrPage, iFreePg, bCommit); 3544 releasePage(pLastPg); 3545 if( rc!=SQLITE_OK ){ 3546 return rc; 3547 } 3548 } 3549 } 3550 3551 if( bCommit==0 ){ 3552 do { 3553 iLastPg--; 3554 }while( iLastPg==PENDING_BYTE_PAGE(pBt) || PTRMAP_ISPAGE(pBt, iLastPg) ); 3555 pBt->bDoTruncate = 1; 3556 pBt->nPage = iLastPg; 3557 } 3558 return SQLITE_OK; 3559 } 3560 3561 /* 3562 ** The database opened by the first argument is an auto-vacuum database 3563 ** nOrig pages in size containing nFree free pages. Return the expected 3564 ** size of the database in pages following an auto-vacuum operation. 3565 */ 3566 static Pgno finalDbSize(BtShared *pBt, Pgno nOrig, Pgno nFree){ 3567 int nEntry; /* Number of entries on one ptrmap page */ 3568 Pgno nPtrmap; /* Number of PtrMap pages to be freed */ 3569 Pgno nFin; /* Return value */ 3570 3571 nEntry = pBt->usableSize/5; 3572 nPtrmap = (nFree-nOrig+PTRMAP_PAGENO(pBt, nOrig)+nEntry)/nEntry; 3573 nFin = nOrig - nFree - nPtrmap; 3574 if( nOrig>PENDING_BYTE_PAGE(pBt) && nFin<PENDING_BYTE_PAGE(pBt) ){ 3575 nFin--; 3576 } 3577 while( PTRMAP_ISPAGE(pBt, nFin) || nFin==PENDING_BYTE_PAGE(pBt) ){ 3578 nFin--; 3579 } 3580 3581 return nFin; 3582 } 3583 3584 /* 3585 ** A write-transaction must be opened before calling this function. 3586 ** It performs a single unit of work towards an incremental vacuum. 3587 ** 3588 ** If the incremental vacuum is finished after this function has run, 3589 ** SQLITE_DONE is returned. If it is not finished, but no error occurred, 3590 ** SQLITE_OK is returned. Otherwise an SQLite error code. 3591 */ 3592 int sqlite3BtreeIncrVacuum(Btree *p){ 3593 int rc; 3594 BtShared *pBt = p->pBt; 3595 3596 sqlite3BtreeEnter(p); 3597 assert( pBt->inTransaction==TRANS_WRITE && p->inTrans==TRANS_WRITE ); 3598 if( !pBt->autoVacuum ){ 3599 rc = SQLITE_DONE; 3600 }else{ 3601 Pgno nOrig = btreePagecount(pBt); 3602 Pgno nFree = get4byte(&pBt->pPage1->aData[36]); 3603 Pgno nFin = finalDbSize(pBt, nOrig, nFree); 3604 3605 if( nOrig<nFin ){ 3606 rc = SQLITE_CORRUPT_BKPT; 3607 }else if( nFree>0 ){ 3608 rc = saveAllCursors(pBt, 0, 0); 3609 if( rc==SQLITE_OK ){ 3610 invalidateAllOverflowCache(pBt); 3611 rc = incrVacuumStep(pBt, nFin, nOrig, 0); 3612 } 3613 if( rc==SQLITE_OK ){ 3614 rc = sqlite3PagerWrite(pBt->pPage1->pDbPage); 3615 put4byte(&pBt->pPage1->aData[28], pBt->nPage); 3616 } 3617 }else{ 3618 rc = SQLITE_DONE; 3619 } 3620 } 3621 sqlite3BtreeLeave(p); 3622 return rc; 3623 } 3624 3625 /* 3626 ** This routine is called prior to sqlite3PagerCommit when a transaction 3627 ** is committed for an auto-vacuum database. 3628 ** 3629 ** If SQLITE_OK is returned, then *pnTrunc is set to the number of pages 3630 ** the database file should be truncated to during the commit process. 3631 ** i.e. the database has been reorganized so that only the first *pnTrunc 3632 ** pages are in use. 3633 */ 3634 static int autoVacuumCommit(BtShared *pBt){ 3635 int rc = SQLITE_OK; 3636 Pager *pPager = pBt->pPager; 3637 VVA_ONLY( int nRef = sqlite3PagerRefcount(pPager); ) 3638 3639 assert( sqlite3_mutex_held(pBt->mutex) ); 3640 invalidateAllOverflowCache(pBt); 3641 assert(pBt->autoVacuum); 3642 if( !pBt->incrVacuum ){ 3643 Pgno nFin; /* Number of pages in database after autovacuuming */ 3644 Pgno nFree; /* Number of pages on the freelist initially */ 3645 Pgno iFree; /* The next page to be freed */ 3646 Pgno nOrig; /* Database size before freeing */ 3647 3648 nOrig = btreePagecount(pBt); 3649 if( PTRMAP_ISPAGE(pBt, nOrig) || nOrig==PENDING_BYTE_PAGE(pBt) ){ 3650 /* It is not possible to create a database for which the final page 3651 ** is either a pointer-map page or the pending-byte page. If one 3652 ** is encountered, this indicates corruption. 3653 */ 3654 return SQLITE_CORRUPT_BKPT; 3655 } 3656 3657 nFree = get4byte(&pBt->pPage1->aData[36]); 3658 nFin = finalDbSize(pBt, nOrig, nFree); 3659 if( nFin>nOrig ) return SQLITE_CORRUPT_BKPT; 3660 if( nFin<nOrig ){ 3661 rc = saveAllCursors(pBt, 0, 0); 3662 } 3663 for(iFree=nOrig; iFree>nFin && rc==SQLITE_OK; iFree--){ 3664 rc = incrVacuumStep(pBt, nFin, iFree, 1); 3665 } 3666 if( (rc==SQLITE_DONE || rc==SQLITE_OK) && nFree>0 ){ 3667 rc = sqlite3PagerWrite(pBt->pPage1->pDbPage); 3668 put4byte(&pBt->pPage1->aData[32], 0); 3669 put4byte(&pBt->pPage1->aData[36], 0); 3670 put4byte(&pBt->pPage1->aData[28], nFin); 3671 pBt->bDoTruncate = 1; 3672 pBt->nPage = nFin; 3673 } 3674 if( rc!=SQLITE_OK ){ 3675 sqlite3PagerRollback(pPager); 3676 } 3677 } 3678 3679 assert( nRef>=sqlite3PagerRefcount(pPager) ); 3680 return rc; 3681 } 3682 3683 #else /* ifndef SQLITE_OMIT_AUTOVACUUM */ 3684 # define setChildPtrmaps(x) SQLITE_OK 3685 #endif 3686 3687 /* 3688 ** This routine does the first phase of a two-phase commit. This routine 3689 ** causes a rollback journal to be created (if it does not already exist) 3690 ** and populated with enough information so that if a power loss occurs 3691 ** the database can be restored to its original state by playing back 3692 ** the journal. Then the contents of the journal are flushed out to 3693 ** the disk. After the journal is safely on oxide, the changes to the 3694 ** database are written into the database file and flushed to oxide. 3695 ** At the end of this call, the rollback journal still exists on the 3696 ** disk and we are still holding all locks, so the transaction has not 3697 ** committed. See sqlite3BtreeCommitPhaseTwo() for the second phase of the 3698 ** commit process. 3699 ** 3700 ** This call is a no-op if no write-transaction is currently active on pBt. 3701 ** 3702 ** Otherwise, sync the database file for the btree pBt. zMaster points to 3703 ** the name of a master journal file that should be written into the 3704 ** individual journal file, or is NULL, indicating no master journal file 3705 ** (single database transaction). 3706 ** 3707 ** When this is called, the master journal should already have been 3708 ** created, populated with this journal pointer and synced to disk. 3709 ** 3710 ** Once this is routine has returned, the only thing required to commit 3711 ** the write-transaction for this database file is to delete the journal. 3712 */ 3713 int sqlite3BtreeCommitPhaseOne(Btree *p, const char *zMaster){ 3714 int rc = SQLITE_OK; 3715 if( p->inTrans==TRANS_WRITE ){ 3716 BtShared *pBt = p->pBt; 3717 sqlite3BtreeEnter(p); 3718 #ifndef SQLITE_OMIT_AUTOVACUUM 3719 if( pBt->autoVacuum ){ 3720 rc = autoVacuumCommit(pBt); 3721 if( rc!=SQLITE_OK ){ 3722 sqlite3BtreeLeave(p); 3723 return rc; 3724 } 3725 } 3726 if( pBt->bDoTruncate ){ 3727 sqlite3PagerTruncateImage(pBt->pPager, pBt->nPage); 3728 } 3729 #endif 3730 rc = sqlite3PagerCommitPhaseOne(pBt->pPager, zMaster, 0); 3731 sqlite3BtreeLeave(p); 3732 } 3733 return rc; 3734 } 3735 3736 /* 3737 ** This function is called from both BtreeCommitPhaseTwo() and BtreeRollback() 3738 ** at the conclusion of a transaction. 3739 */ 3740 static void btreeEndTransaction(Btree *p){ 3741 BtShared *pBt = p->pBt; 3742 sqlite3 *db = p->db; 3743 assert( sqlite3BtreeHoldsMutex(p) ); 3744 3745 #ifndef SQLITE_OMIT_AUTOVACUUM 3746 pBt->bDoTruncate = 0; 3747 #endif 3748 if( p->inTrans>TRANS_NONE && db->nVdbeRead>1 ){ 3749 /* If there are other active statements that belong to this database 3750 ** handle, downgrade to a read-only transaction. The other statements 3751 ** may still be reading from the database. */ 3752 downgradeAllSharedCacheTableLocks(p); 3753 p->inTrans = TRANS_READ; 3754 }else{ 3755 /* If the handle had any kind of transaction open, decrement the 3756 ** transaction count of the shared btree. If the transaction count 3757 ** reaches 0, set the shared state to TRANS_NONE. The unlockBtreeIfUnused() 3758 ** call below will unlock the pager. */ 3759 if( p->inTrans!=TRANS_NONE ){ 3760 clearAllSharedCacheTableLocks(p); 3761 pBt->nTransaction--; 3762 if( 0==pBt->nTransaction ){ 3763 pBt->inTransaction = TRANS_NONE; 3764 } 3765 } 3766 3767 /* Set the current transaction state to TRANS_NONE and unlock the 3768 ** pager if this call closed the only read or write transaction. */ 3769 p->inTrans = TRANS_NONE; 3770 unlockBtreeIfUnused(pBt); 3771 } 3772 3773 btreeIntegrity(p); 3774 } 3775 3776 /* 3777 ** Commit the transaction currently in progress. 3778 ** 3779 ** This routine implements the second phase of a 2-phase commit. The 3780 ** sqlite3BtreeCommitPhaseOne() routine does the first phase and should 3781 ** be invoked prior to calling this routine. The sqlite3BtreeCommitPhaseOne() 3782 ** routine did all the work of writing information out to disk and flushing the 3783 ** contents so that they are written onto the disk platter. All this 3784 ** routine has to do is delete or truncate or zero the header in the 3785 ** the rollback journal (which causes the transaction to commit) and 3786 ** drop locks. 3787 ** 3788 ** Normally, if an error occurs while the pager layer is attempting to 3789 ** finalize the underlying journal file, this function returns an error and 3790 ** the upper layer will attempt a rollback. However, if the second argument 3791 ** is non-zero then this b-tree transaction is part of a multi-file 3792 ** transaction. In this case, the transaction has already been committed 3793 ** (by deleting a master journal file) and the caller will ignore this 3794 ** functions return code. So, even if an error occurs in the pager layer, 3795 ** reset the b-tree objects internal state to indicate that the write 3796 ** transaction has been closed. This is quite safe, as the pager will have 3797 ** transitioned to the error state. 3798 ** 3799 ** This will release the write lock on the database file. If there 3800 ** are no active cursors, it also releases the read lock. 3801 */ 3802 int sqlite3BtreeCommitPhaseTwo(Btree *p, int bCleanup){ 3803 3804 if( p->inTrans==TRANS_NONE ) return SQLITE_OK; 3805 sqlite3BtreeEnter(p); 3806 btreeIntegrity(p); 3807 3808 /* If the handle has a write-transaction open, commit the shared-btrees 3809 ** transaction and set the shared state to TRANS_READ. 3810 */ 3811 if( p->inTrans==TRANS_WRITE ){ 3812 int rc; 3813 BtShared *pBt = p->pBt; 3814 assert( pBt->inTransaction==TRANS_WRITE ); 3815 assert( pBt->nTransaction>0 ); 3816 rc = sqlite3PagerCommitPhaseTwo(pBt->pPager); 3817 if( rc!=SQLITE_OK && bCleanup==0 ){ 3818 sqlite3BtreeLeave(p); 3819 return rc; 3820 } 3821 p->iDataVersion--; /* Compensate for pPager->iDataVersion++; */ 3822 pBt->inTransaction = TRANS_READ; 3823 btreeClearHasContent(pBt); 3824 } 3825 3826 btreeEndTransaction(p); 3827 sqlite3BtreeLeave(p); 3828 return SQLITE_OK; 3829 } 3830 3831 /* 3832 ** Do both phases of a commit. 3833 */ 3834 int sqlite3BtreeCommit(Btree *p){ 3835 int rc; 3836 sqlite3BtreeEnter(p); 3837 rc = sqlite3BtreeCommitPhaseOne(p, 0); 3838 if( rc==SQLITE_OK ){ 3839 rc = sqlite3BtreeCommitPhaseTwo(p, 0); 3840 } 3841 sqlite3BtreeLeave(p); 3842 return rc; 3843 } 3844 3845 /* 3846 ** This routine sets the state to CURSOR_FAULT and the error 3847 ** code to errCode for every cursor on any BtShared that pBtree 3848 ** references. Or if the writeOnly flag is set to 1, then only 3849 ** trip write cursors and leave read cursors unchanged. 3850 ** 3851 ** Every cursor is a candidate to be tripped, including cursors 3852 ** that belong to other database connections that happen to be 3853 ** sharing the cache with pBtree. 3854 ** 3855 ** This routine gets called when a rollback occurs. If the writeOnly 3856 ** flag is true, then only write-cursors need be tripped - read-only 3857 ** cursors save their current positions so that they may continue 3858 ** following the rollback. Or, if writeOnly is false, all cursors are 3859 ** tripped. In general, writeOnly is false if the transaction being 3860 ** rolled back modified the database schema. In this case b-tree root 3861 ** pages may be moved or deleted from the database altogether, making 3862 ** it unsafe for read cursors to continue. 3863 ** 3864 ** If the writeOnly flag is true and an error is encountered while 3865 ** saving the current position of a read-only cursor, all cursors, 3866 ** including all read-cursors are tripped. 3867 ** 3868 ** SQLITE_OK is returned if successful, or if an error occurs while 3869 ** saving a cursor position, an SQLite error code. 3870 */ 3871 int sqlite3BtreeTripAllCursors(Btree *pBtree, int errCode, int writeOnly){ 3872 BtCursor *p; 3873 int rc = SQLITE_OK; 3874 3875 assert( (writeOnly==0 || writeOnly==1) && BTCF_WriteFlag==1 ); 3876 if( pBtree ){ 3877 sqlite3BtreeEnter(pBtree); 3878 for(p=pBtree->pBt->pCursor; p; p=p->pNext){ 3879 int i; 3880 if( writeOnly && (p->curFlags & BTCF_WriteFlag)==0 ){ 3881 if( p->eState==CURSOR_VALID || p->eState==CURSOR_SKIPNEXT ){ 3882 rc = saveCursorPosition(p); 3883 if( rc!=SQLITE_OK ){ 3884 (void)sqlite3BtreeTripAllCursors(pBtree, rc, 0); 3885 break; 3886 } 3887 } 3888 }else{ 3889 sqlite3BtreeClearCursor(p); 3890 p->eState = CURSOR_FAULT; 3891 p->skipNext = errCode; 3892 } 3893 for(i=0; i<=p->iPage; i++){ 3894 releasePage(p->apPage[i]); 3895 p->apPage[i] = 0; 3896 } 3897 } 3898 sqlite3BtreeLeave(pBtree); 3899 } 3900 return rc; 3901 } 3902 3903 /* 3904 ** Rollback the transaction in progress. 3905 ** 3906 ** If tripCode is not SQLITE_OK then cursors will be invalidated (tripped). 3907 ** Only write cursors are tripped if writeOnly is true but all cursors are 3908 ** tripped if writeOnly is false. Any attempt to use 3909 ** a tripped cursor will result in an error. 3910 ** 3911 ** This will release the write lock on the database file. If there 3912 ** are no active cursors, it also releases the read lock. 3913 */ 3914 int sqlite3BtreeRollback(Btree *p, int tripCode, int writeOnly){ 3915 int rc; 3916 BtShared *pBt = p->pBt; 3917 MemPage *pPage1; 3918 3919 assert( writeOnly==1 || writeOnly==0 ); 3920 assert( tripCode==SQLITE_ABORT_ROLLBACK || tripCode==SQLITE_OK ); 3921 sqlite3BtreeEnter(p); 3922 if( tripCode==SQLITE_OK ){ 3923 rc = tripCode = saveAllCursors(pBt, 0, 0); 3924 if( rc ) writeOnly = 0; 3925 }else{ 3926 rc = SQLITE_OK; 3927 } 3928 if( tripCode ){ 3929 int rc2 = sqlite3BtreeTripAllCursors(p, tripCode, writeOnly); 3930 assert( rc==SQLITE_OK || (writeOnly==0 && rc2==SQLITE_OK) ); 3931 if( rc2!=SQLITE_OK ) rc = rc2; 3932 } 3933 btreeIntegrity(p); 3934 3935 if( p->inTrans==TRANS_WRITE ){ 3936 int rc2; 3937 3938 assert( TRANS_WRITE==pBt->inTransaction ); 3939 rc2 = sqlite3PagerRollback(pBt->pPager); 3940 if( rc2!=SQLITE_OK ){ 3941 rc = rc2; 3942 } 3943 3944 /* The rollback may have destroyed the pPage1->aData value. So 3945 ** call btreeGetPage() on page 1 again to make 3946 ** sure pPage1->aData is set correctly. */ 3947 if( btreeGetPage(pBt, 1, &pPage1, 0)==SQLITE_OK ){ 3948 int nPage = get4byte(28+(u8*)pPage1->aData); 3949 testcase( nPage==0 ); 3950 if( nPage==0 ) sqlite3PagerPagecount(pBt->pPager, &nPage); 3951 testcase( pBt->nPage!=nPage ); 3952 pBt->nPage = nPage; 3953 releasePage(pPage1); 3954 } 3955 assert( countValidCursors(pBt, 1)==0 ); 3956 pBt->inTransaction = TRANS_READ; 3957 btreeClearHasContent(pBt); 3958 } 3959 3960 btreeEndTransaction(p); 3961 sqlite3BtreeLeave(p); 3962 return rc; 3963 } 3964 3965 /* 3966 ** Start a statement subtransaction. The subtransaction can be rolled 3967 ** back independently of the main transaction. You must start a transaction 3968 ** before starting a subtransaction. The subtransaction is ended automatically 3969 ** if the main transaction commits or rolls back. 3970 ** 3971 ** Statement subtransactions are used around individual SQL statements 3972 ** that are contained within a BEGIN...COMMIT block. If a constraint 3973 ** error occurs within the statement, the effect of that one statement 3974 ** can be rolled back without having to rollback the entire transaction. 3975 ** 3976 ** A statement sub-transaction is implemented as an anonymous savepoint. The 3977 ** value passed as the second parameter is the total number of savepoints, 3978 ** including the new anonymous savepoint, open on the B-Tree. i.e. if there 3979 ** are no active savepoints and no other statement-transactions open, 3980 ** iStatement is 1. This anonymous savepoint can be released or rolled back 3981 ** using the sqlite3BtreeSavepoint() function. 3982 */ 3983 int sqlite3BtreeBeginStmt(Btree *p, int iStatement){ 3984 int rc; 3985 BtShared *pBt = p->pBt; 3986 sqlite3BtreeEnter(p); 3987 assert( p->inTrans==TRANS_WRITE ); 3988 assert( (pBt->btsFlags & BTS_READ_ONLY)==0 ); 3989 assert( iStatement>0 ); 3990 assert( iStatement>p->db->nSavepoint ); 3991 assert( pBt->inTransaction==TRANS_WRITE ); 3992 /* At the pager level, a statement transaction is a savepoint with 3993 ** an index greater than all savepoints created explicitly using 3994 ** SQL statements. It is illegal to open, release or rollback any 3995 ** such savepoints while the statement transaction savepoint is active. 3996 */ 3997 rc = sqlite3PagerOpenSavepoint(pBt->pPager, iStatement); 3998 sqlite3BtreeLeave(p); 3999 return rc; 4000 } 4001 4002 /* 4003 ** The second argument to this function, op, is always SAVEPOINT_ROLLBACK 4004 ** or SAVEPOINT_RELEASE. This function either releases or rolls back the 4005 ** savepoint identified by parameter iSavepoint, depending on the value 4006 ** of op. 4007 ** 4008 ** Normally, iSavepoint is greater than or equal to zero. However, if op is 4009 ** SAVEPOINT_ROLLBACK, then iSavepoint may also be -1. In this case the 4010 ** contents of the entire transaction are rolled back. This is different 4011 ** from a normal transaction rollback, as no locks are released and the 4012 ** transaction remains open. 4013 */ 4014 int sqlite3BtreeSavepoint(Btree *p, int op, int iSavepoint){ 4015 int rc = SQLITE_OK; 4016 if( p && p->inTrans==TRANS_WRITE ){ 4017 BtShared *pBt = p->pBt; 4018 assert( op==SAVEPOINT_RELEASE || op==SAVEPOINT_ROLLBACK ); 4019 assert( iSavepoint>=0 || (iSavepoint==-1 && op==SAVEPOINT_ROLLBACK) ); 4020 sqlite3BtreeEnter(p); 4021 rc = sqlite3PagerSavepoint(pBt->pPager, op, iSavepoint); 4022 if( rc==SQLITE_OK ){ 4023 if( iSavepoint<0 && (pBt->btsFlags & BTS_INITIALLY_EMPTY)!=0 ){ 4024 pBt->nPage = 0; 4025 } 4026 rc = newDatabase(pBt); 4027 pBt->nPage = get4byte(28 + pBt->pPage1->aData); 4028 4029 /* The database size was written into the offset 28 of the header 4030 ** when the transaction started, so we know that the value at offset 4031 ** 28 is nonzero. */ 4032 assert( pBt->nPage>0 ); 4033 } 4034 sqlite3BtreeLeave(p); 4035 } 4036 return rc; 4037 } 4038 4039 /* 4040 ** Create a new cursor for the BTree whose root is on the page 4041 ** iTable. If a read-only cursor is requested, it is assumed that 4042 ** the caller already has at least a read-only transaction open 4043 ** on the database already. If a write-cursor is requested, then 4044 ** the caller is assumed to have an open write transaction. 4045 ** 4046 ** If wrFlag==0, then the cursor can only be used for reading. 4047 ** If wrFlag==1, then the cursor can be used for reading or for 4048 ** writing if other conditions for writing are also met. These 4049 ** are the conditions that must be met in order for writing to 4050 ** be allowed: 4051 ** 4052 ** 1: The cursor must have been opened with wrFlag==1 4053 ** 4054 ** 2: Other database connections that share the same pager cache 4055 ** but which are not in the READ_UNCOMMITTED state may not have 4056 ** cursors open with wrFlag==0 on the same table. Otherwise 4057 ** the changes made by this write cursor would be visible to 4058 ** the read cursors in the other database connection. 4059 ** 4060 ** 3: The database must be writable (not on read-only media) 4061 ** 4062 ** 4: There must be an active transaction. 4063 ** 4064 ** No checking is done to make sure that page iTable really is the 4065 ** root page of a b-tree. If it is not, then the cursor acquired 4066 ** will not work correctly. 4067 ** 4068 ** It is assumed that the sqlite3BtreeCursorZero() has been called 4069 ** on pCur to initialize the memory space prior to invoking this routine. 4070 */ 4071 static int btreeCursor( 4072 Btree *p, /* The btree */ 4073 int iTable, /* Root page of table to open */ 4074 int wrFlag, /* 1 to write. 0 read-only */ 4075 struct KeyInfo *pKeyInfo, /* First arg to comparison function */ 4076 BtCursor *pCur /* Space for new cursor */ 4077 ){ 4078 BtShared *pBt = p->pBt; /* Shared b-tree handle */ 4079 BtCursor *pX; /* Looping over other all cursors */ 4080 4081 assert( sqlite3BtreeHoldsMutex(p) ); 4082 assert( wrFlag==0 4083 || wrFlag==BTREE_WRCSR 4084 || wrFlag==(BTREE_WRCSR|BTREE_FORDELETE) 4085 ); 4086 4087 /* The following assert statements verify that if this is a sharable 4088 ** b-tree database, the connection is holding the required table locks, 4089 ** and that no other connection has any open cursor that conflicts with 4090 ** this lock. */ 4091 assert( hasSharedCacheTableLock(p, iTable, pKeyInfo!=0, (wrFlag?2:1)) ); 4092 assert( wrFlag==0 || !hasReadConflicts(p, iTable) ); 4093 4094 /* Assert that the caller has opened the required transaction. */ 4095 assert( p->inTrans>TRANS_NONE ); 4096 assert( wrFlag==0 || p->inTrans==TRANS_WRITE ); 4097 assert( pBt->pPage1 && pBt->pPage1->aData ); 4098 assert( wrFlag==0 || (pBt->btsFlags & BTS_READ_ONLY)==0 ); 4099 4100 if( wrFlag ){ 4101 allocateTempSpace(pBt); 4102 if( pBt->pTmpSpace==0 ) return SQLITE_NOMEM; 4103 } 4104 if( iTable==1 && btreePagecount(pBt)==0 ){ 4105 assert( wrFlag==0 ); 4106 iTable = 0; 4107 } 4108 4109 /* Now that no other errors can occur, finish filling in the BtCursor 4110 ** variables and link the cursor into the BtShared list. */ 4111 pCur->pgnoRoot = (Pgno)iTable; 4112 pCur->iPage = -1; 4113 pCur->pKeyInfo = pKeyInfo; 4114 pCur->pBtree = p; 4115 pCur->pBt = pBt; 4116 pCur->curFlags = wrFlag ? BTCF_WriteFlag : 0; 4117 pCur->curPagerFlags = wrFlag ? 0 : PAGER_GET_READONLY; 4118 /* If there are two or more cursors on the same btree, then all such 4119 ** cursors *must* have the BTCF_Multiple flag set. */ 4120 for(pX=pBt->pCursor; pX; pX=pX->pNext){ 4121 if( pX->pgnoRoot==(Pgno)iTable ){ 4122 pX->curFlags |= BTCF_Multiple; 4123 pCur->curFlags |= BTCF_Multiple; 4124 } 4125 } 4126 pCur->pNext = pBt->pCursor; 4127 pBt->pCursor = pCur; 4128 pCur->eState = CURSOR_INVALID; 4129 return SQLITE_OK; 4130 } 4131 int sqlite3BtreeCursor( 4132 Btree *p, /* The btree */ 4133 int iTable, /* Root page of table to open */ 4134 int wrFlag, /* 1 to write. 0 read-only */ 4135 struct KeyInfo *pKeyInfo, /* First arg to xCompare() */ 4136 BtCursor *pCur /* Write new cursor here */ 4137 ){ 4138 int rc; 4139 if( iTable<1 ){ 4140 rc = SQLITE_CORRUPT_BKPT; 4141 }else{ 4142 sqlite3BtreeEnter(p); 4143 rc = btreeCursor(p, iTable, wrFlag, pKeyInfo, pCur); 4144 sqlite3BtreeLeave(p); 4145 } 4146 return rc; 4147 } 4148 4149 /* 4150 ** Return the size of a BtCursor object in bytes. 4151 ** 4152 ** This interfaces is needed so that users of cursors can preallocate 4153 ** sufficient storage to hold a cursor. The BtCursor object is opaque 4154 ** to users so they cannot do the sizeof() themselves - they must call 4155 ** this routine. 4156 */ 4157 int sqlite3BtreeCursorSize(void){ 4158 return ROUND8(sizeof(BtCursor)); 4159 } 4160 4161 /* 4162 ** Initialize memory that will be converted into a BtCursor object. 4163 ** 4164 ** The simple approach here would be to memset() the entire object 4165 ** to zero. But it turns out that the apPage[] and aiIdx[] arrays 4166 ** do not need to be zeroed and they are large, so we can save a lot 4167 ** of run-time by skipping the initialization of those elements. 4168 */ 4169 void sqlite3BtreeCursorZero(BtCursor *p){ 4170 memset(p, 0, offsetof(BtCursor, iPage)); 4171 } 4172 4173 /* 4174 ** Close a cursor. The read lock on the database file is released 4175 ** when the last cursor is closed. 4176 */ 4177 int sqlite3BtreeCloseCursor(BtCursor *pCur){ 4178 Btree *pBtree = pCur->pBtree; 4179 if( pBtree ){ 4180 int i; 4181 BtShared *pBt = pCur->pBt; 4182 sqlite3BtreeEnter(pBtree); 4183 sqlite3BtreeClearCursor(pCur); 4184 assert( pBt->pCursor!=0 ); 4185 if( pBt->pCursor==pCur ){ 4186 pBt->pCursor = pCur->pNext; 4187 }else{ 4188 BtCursor *pPrev = pBt->pCursor; 4189 do{ 4190 if( pPrev->pNext==pCur ){ 4191 pPrev->pNext = pCur->pNext; 4192 break; 4193 } 4194 pPrev = pPrev->pNext; 4195 }while( ALWAYS(pPrev) ); 4196 } 4197 for(i=0; i<=pCur->iPage; i++){ 4198 releasePage(pCur->apPage[i]); 4199 } 4200 unlockBtreeIfUnused(pBt); 4201 sqlite3_free(pCur->aOverflow); 4202 /* sqlite3_free(pCur); */ 4203 sqlite3BtreeLeave(pBtree); 4204 } 4205 return SQLITE_OK; 4206 } 4207 4208 /* 4209 ** Make sure the BtCursor* given in the argument has a valid 4210 ** BtCursor.info structure. If it is not already valid, call 4211 ** btreeParseCell() to fill it in. 4212 ** 4213 ** BtCursor.info is a cache of the information in the current cell. 4214 ** Using this cache reduces the number of calls to btreeParseCell(). 4215 */ 4216 #ifndef NDEBUG 4217 static void assertCellInfo(BtCursor *pCur){ 4218 CellInfo info; 4219 int iPage = pCur->iPage; 4220 memset(&info, 0, sizeof(info)); 4221 btreeParseCell(pCur->apPage[iPage], pCur->aiIdx[iPage], &info); 4222 assert( CORRUPT_DB || memcmp(&info, &pCur->info, sizeof(info))==0 ); 4223 } 4224 #else 4225 #define assertCellInfo(x) 4226 #endif 4227 static SQLITE_NOINLINE void getCellInfo(BtCursor *pCur){ 4228 if( pCur->info.nSize==0 ){ 4229 int iPage = pCur->iPage; 4230 pCur->curFlags |= BTCF_ValidNKey; 4231 btreeParseCell(pCur->apPage[iPage],pCur->aiIdx[iPage],&pCur->info); 4232 }else{ 4233 assertCellInfo(pCur); 4234 } 4235 } 4236 4237 #ifndef NDEBUG /* The next routine used only within assert() statements */ 4238 /* 4239 ** Return true if the given BtCursor is valid. A valid cursor is one 4240 ** that is currently pointing to a row in a (non-empty) table. 4241 ** This is a verification routine is used only within assert() statements. 4242 */ 4243 int sqlite3BtreeCursorIsValid(BtCursor *pCur){ 4244 return pCur && pCur->eState==CURSOR_VALID; 4245 } 4246 #endif /* NDEBUG */ 4247 4248 /* 4249 ** Set *pSize to the size of the buffer needed to hold the value of 4250 ** the key for the current entry. If the cursor is not pointing 4251 ** to a valid entry, *pSize is set to 0. 4252 ** 4253 ** For a table with the INTKEY flag set, this routine returns the key 4254 ** itself, not the number of bytes in the key. 4255 ** 4256 ** The caller must position the cursor prior to invoking this routine. 4257 ** 4258 ** This routine cannot fail. It always returns SQLITE_OK. 4259 */ 4260 int sqlite3BtreeKeySize(BtCursor *pCur, i64 *pSize){ 4261 assert( cursorHoldsMutex(pCur) ); 4262 assert( pCur->eState==CURSOR_VALID ); 4263 getCellInfo(pCur); 4264 *pSize = pCur->info.nKey; 4265 return SQLITE_OK; 4266 } 4267 4268 /* 4269 ** Set *pSize to the number of bytes of data in the entry the 4270 ** cursor currently points to. 4271 ** 4272 ** The caller must guarantee that the cursor is pointing to a non-NULL 4273 ** valid entry. In other words, the calling procedure must guarantee 4274 ** that the cursor has Cursor.eState==CURSOR_VALID. 4275 ** 4276 ** Failure is not possible. This function always returns SQLITE_OK. 4277 ** It might just as well be a procedure (returning void) but we continue 4278 ** to return an integer result code for historical reasons. 4279 */ 4280 int sqlite3BtreeDataSize(BtCursor *pCur, u32 *pSize){ 4281 assert( cursorHoldsMutex(pCur) ); 4282 assert( pCur->eState==CURSOR_VALID ); 4283 assert( pCur->iPage>=0 ); 4284 assert( pCur->iPage<BTCURSOR_MAX_DEPTH ); 4285 assert( pCur->apPage[pCur->iPage]->intKeyLeaf==1 ); 4286 getCellInfo(pCur); 4287 *pSize = pCur->info.nPayload; 4288 return SQLITE_OK; 4289 } 4290 4291 /* 4292 ** Given the page number of an overflow page in the database (parameter 4293 ** ovfl), this function finds the page number of the next page in the 4294 ** linked list of overflow pages. If possible, it uses the auto-vacuum 4295 ** pointer-map data instead of reading the content of page ovfl to do so. 4296 ** 4297 ** If an error occurs an SQLite error code is returned. Otherwise: 4298 ** 4299 ** The page number of the next overflow page in the linked list is 4300 ** written to *pPgnoNext. If page ovfl is the last page in its linked 4301 ** list, *pPgnoNext is set to zero. 4302 ** 4303 ** If ppPage is not NULL, and a reference to the MemPage object corresponding 4304 ** to page number pOvfl was obtained, then *ppPage is set to point to that 4305 ** reference. It is the responsibility of the caller to call releasePage() 4306 ** on *ppPage to free the reference. In no reference was obtained (because 4307 ** the pointer-map was used to obtain the value for *pPgnoNext), then 4308 ** *ppPage is set to zero. 4309 */ 4310 static int getOverflowPage( 4311 BtShared *pBt, /* The database file */ 4312 Pgno ovfl, /* Current overflow page number */ 4313 MemPage **ppPage, /* OUT: MemPage handle (may be NULL) */ 4314 Pgno *pPgnoNext /* OUT: Next overflow page number */ 4315 ){ 4316 Pgno next = 0; 4317 MemPage *pPage = 0; 4318 int rc = SQLITE_OK; 4319 4320 assert( sqlite3_mutex_held(pBt->mutex) ); 4321 assert(pPgnoNext); 4322 4323 #ifndef SQLITE_OMIT_AUTOVACUUM 4324 /* Try to find the next page in the overflow list using the 4325 ** autovacuum pointer-map pages. Guess that the next page in 4326 ** the overflow list is page number (ovfl+1). If that guess turns 4327 ** out to be wrong, fall back to loading the data of page 4328 ** number ovfl to determine the next page number. 4329 */ 4330 if( pBt->autoVacuum ){ 4331 Pgno pgno; 4332 Pgno iGuess = ovfl+1; 4333 u8 eType; 4334 4335 while( PTRMAP_ISPAGE(pBt, iGuess) || iGuess==PENDING_BYTE_PAGE(pBt) ){ 4336 iGuess++; 4337 } 4338 4339 if( iGuess<=btreePagecount(pBt) ){ 4340 rc = ptrmapGet(pBt, iGuess, &eType, &pgno); 4341 if( rc==SQLITE_OK && eType==PTRMAP_OVERFLOW2 && pgno==ovfl ){ 4342 next = iGuess; 4343 rc = SQLITE_DONE; 4344 } 4345 } 4346 } 4347 #endif 4348 4349 assert( next==0 || rc==SQLITE_DONE ); 4350 if( rc==SQLITE_OK ){ 4351 rc = btreeGetPage(pBt, ovfl, &pPage, (ppPage==0) ? PAGER_GET_READONLY : 0); 4352 assert( rc==SQLITE_OK || pPage==0 ); 4353 if( rc==SQLITE_OK ){ 4354 next = get4byte(pPage->aData); 4355 } 4356 } 4357 4358 *pPgnoNext = next; 4359 if( ppPage ){ 4360 *ppPage = pPage; 4361 }else{ 4362 releasePage(pPage); 4363 } 4364 return (rc==SQLITE_DONE ? SQLITE_OK : rc); 4365 } 4366 4367 /* 4368 ** Copy data from a buffer to a page, or from a page to a buffer. 4369 ** 4370 ** pPayload is a pointer to data stored on database page pDbPage. 4371 ** If argument eOp is false, then nByte bytes of data are copied 4372 ** from pPayload to the buffer pointed at by pBuf. If eOp is true, 4373 ** then sqlite3PagerWrite() is called on pDbPage and nByte bytes 4374 ** of data are copied from the buffer pBuf to pPayload. 4375 ** 4376 ** SQLITE_OK is returned on success, otherwise an error code. 4377 */ 4378 static int copyPayload( 4379 void *pPayload, /* Pointer to page data */ 4380 void *pBuf, /* Pointer to buffer */ 4381 int nByte, /* Number of bytes to copy */ 4382 int eOp, /* 0 -> copy from page, 1 -> copy to page */ 4383 DbPage *pDbPage /* Page containing pPayload */ 4384 ){ 4385 if( eOp ){ 4386 /* Copy data from buffer to page (a write operation) */ 4387 int rc = sqlite3PagerWrite(pDbPage); 4388 if( rc!=SQLITE_OK ){ 4389 return rc; 4390 } 4391 memcpy(pPayload, pBuf, nByte); 4392 }else{ 4393 /* Copy data from page to buffer (a read operation) */ 4394 memcpy(pBuf, pPayload, nByte); 4395 } 4396 return SQLITE_OK; 4397 } 4398 4399 /* 4400 ** This function is used to read or overwrite payload information 4401 ** for the entry that the pCur cursor is pointing to. The eOp 4402 ** argument is interpreted as follows: 4403 ** 4404 ** 0: The operation is a read. Populate the overflow cache. 4405 ** 1: The operation is a write. Populate the overflow cache. 4406 ** 2: The operation is a read. Do not populate the overflow cache. 4407 ** 4408 ** A total of "amt" bytes are read or written beginning at "offset". 4409 ** Data is read to or from the buffer pBuf. 4410 ** 4411 ** The content being read or written might appear on the main page 4412 ** or be scattered out on multiple overflow pages. 4413 ** 4414 ** If the current cursor entry uses one or more overflow pages and the 4415 ** eOp argument is not 2, this function may allocate space for and lazily 4416 ** populates the overflow page-list cache array (BtCursor.aOverflow). 4417 ** Subsequent calls use this cache to make seeking to the supplied offset 4418 ** more efficient. 4419 ** 4420 ** Once an overflow page-list cache has been allocated, it may be 4421 ** invalidated if some other cursor writes to the same table, or if 4422 ** the cursor is moved to a different row. Additionally, in auto-vacuum 4423 ** mode, the following events may invalidate an overflow page-list cache. 4424 ** 4425 ** * An incremental vacuum, 4426 ** * A commit in auto_vacuum="full" mode, 4427 ** * Creating a table (may require moving an overflow page). 4428 */ 4429 static int accessPayload( 4430 BtCursor *pCur, /* Cursor pointing to entry to read from */ 4431 u32 offset, /* Begin reading this far into payload */ 4432 u32 amt, /* Read this many bytes */ 4433 unsigned char *pBuf, /* Write the bytes into this buffer */ 4434 int eOp /* zero to read. non-zero to write. */ 4435 ){ 4436 unsigned char *aPayload; 4437 int rc = SQLITE_OK; 4438 int iIdx = 0; 4439 MemPage *pPage = pCur->apPage[pCur->iPage]; /* Btree page of current entry */ 4440 BtShared *pBt = pCur->pBt; /* Btree this cursor belongs to */ 4441 #ifdef SQLITE_DIRECT_OVERFLOW_READ 4442 unsigned char * const pBufStart = pBuf; 4443 int bEnd; /* True if reading to end of data */ 4444 #endif 4445 4446 assert( pPage ); 4447 assert( pCur->eState==CURSOR_VALID ); 4448 assert( pCur->aiIdx[pCur->iPage]<pPage->nCell ); 4449 assert( cursorHoldsMutex(pCur) ); 4450 assert( eOp!=2 || offset==0 ); /* Always start from beginning for eOp==2 */ 4451 4452 getCellInfo(pCur); 4453 aPayload = pCur->info.pPayload; 4454 #ifdef SQLITE_DIRECT_OVERFLOW_READ 4455 bEnd = offset+amt==pCur->info.nPayload; 4456 #endif 4457 assert( offset+amt <= pCur->info.nPayload ); 4458 4459 if( &aPayload[pCur->info.nLocal] > &pPage->aData[pBt->usableSize] ){ 4460 /* Trying to read or write past the end of the data is an error */ 4461 return SQLITE_CORRUPT_BKPT; 4462 } 4463 4464 /* Check if data must be read/written to/from the btree page itself. */ 4465 if( offset<pCur->info.nLocal ){ 4466 int a = amt; 4467 if( a+offset>pCur->info.nLocal ){ 4468 a = pCur->info.nLocal - offset; 4469 } 4470 rc = copyPayload(&aPayload[offset], pBuf, a, (eOp & 0x01), pPage->pDbPage); 4471 offset = 0; 4472 pBuf += a; 4473 amt -= a; 4474 }else{ 4475 offset -= pCur->info.nLocal; 4476 } 4477 4478 4479 if( rc==SQLITE_OK && amt>0 ){ 4480 const u32 ovflSize = pBt->usableSize - 4; /* Bytes content per ovfl page */ 4481 Pgno nextPage; 4482 4483 nextPage = get4byte(&aPayload[pCur->info.nLocal]); 4484 4485 /* If the BtCursor.aOverflow[] has not been allocated, allocate it now. 4486 ** Except, do not allocate aOverflow[] for eOp==2. 4487 ** 4488 ** The aOverflow[] array is sized at one entry for each overflow page 4489 ** in the overflow chain. The page number of the first overflow page is 4490 ** stored in aOverflow[0], etc. A value of 0 in the aOverflow[] array 4491 ** means "not yet known" (the cache is lazily populated). 4492 */ 4493 if( eOp!=2 && (pCur->curFlags & BTCF_ValidOvfl)==0 ){ 4494 int nOvfl = (pCur->info.nPayload-pCur->info.nLocal+ovflSize-1)/ovflSize; 4495 if( nOvfl>pCur->nOvflAlloc ){ 4496 Pgno *aNew = (Pgno*)sqlite3Realloc( 4497 pCur->aOverflow, nOvfl*2*sizeof(Pgno) 4498 ); 4499 if( aNew==0 ){ 4500 rc = SQLITE_NOMEM; 4501 }else{ 4502 pCur->nOvflAlloc = nOvfl*2; 4503 pCur->aOverflow = aNew; 4504 } 4505 } 4506 if( rc==SQLITE_OK ){ 4507 memset(pCur->aOverflow, 0, nOvfl*sizeof(Pgno)); 4508 pCur->curFlags |= BTCF_ValidOvfl; 4509 } 4510 } 4511 4512 /* If the overflow page-list cache has been allocated and the 4513 ** entry for the first required overflow page is valid, skip 4514 ** directly to it. 4515 */ 4516 if( (pCur->curFlags & BTCF_ValidOvfl)!=0 4517 && pCur->aOverflow[offset/ovflSize] 4518 ){ 4519 iIdx = (offset/ovflSize); 4520 nextPage = pCur->aOverflow[iIdx]; 4521 offset = (offset%ovflSize); 4522 } 4523 4524 for( ; rc==SQLITE_OK && amt>0 && nextPage; iIdx++){ 4525 4526 /* If required, populate the overflow page-list cache. */ 4527 if( (pCur->curFlags & BTCF_ValidOvfl)!=0 ){ 4528 assert( pCur->aOverflow[iIdx]==0 4529 || pCur->aOverflow[iIdx]==nextPage 4530 || CORRUPT_DB ); 4531 pCur->aOverflow[iIdx] = nextPage; 4532 } 4533 4534 if( offset>=ovflSize ){ 4535 /* The only reason to read this page is to obtain the page 4536 ** number for the next page in the overflow chain. The page 4537 ** data is not required. So first try to lookup the overflow 4538 ** page-list cache, if any, then fall back to the getOverflowPage() 4539 ** function. 4540 ** 4541 ** Note that the aOverflow[] array must be allocated because eOp!=2 4542 ** here. If eOp==2, then offset==0 and this branch is never taken. 4543 */ 4544 assert( eOp!=2 ); 4545 assert( pCur->curFlags & BTCF_ValidOvfl ); 4546 assert( pCur->pBtree->db==pBt->db ); 4547 if( pCur->aOverflow[iIdx+1] ){ 4548 nextPage = pCur->aOverflow[iIdx+1]; 4549 }else{ 4550 rc = getOverflowPage(pBt, nextPage, 0, &nextPage); 4551 } 4552 offset -= ovflSize; 4553 }else{ 4554 /* Need to read this page properly. It contains some of the 4555 ** range of data that is being read (eOp==0) or written (eOp!=0). 4556 */ 4557 #ifdef SQLITE_DIRECT_OVERFLOW_READ 4558 sqlite3_file *fd; 4559 #endif 4560 int a = amt; 4561 if( a + offset > ovflSize ){ 4562 a = ovflSize - offset; 4563 } 4564 4565 #ifdef SQLITE_DIRECT_OVERFLOW_READ 4566 /* If all the following are true: 4567 ** 4568 ** 1) this is a read operation, and 4569 ** 2) data is required from the start of this overflow page, and 4570 ** 3) the database is file-backed, and 4571 ** 4) there is no open write-transaction, and 4572 ** 5) the database is not a WAL database, 4573 ** 6) all data from the page is being read. 4574 ** 7) at least 4 bytes have already been read into the output buffer 4575 ** 4576 ** then data can be read directly from the database file into the 4577 ** output buffer, bypassing the page-cache altogether. This speeds 4578 ** up loading large records that span many overflow pages. 4579 */ 4580 if( (eOp&0x01)==0 /* (1) */ 4581 && offset==0 /* (2) */ 4582 && (bEnd || a==ovflSize) /* (6) */ 4583 && pBt->inTransaction==TRANS_READ /* (4) */ 4584 && (fd = sqlite3PagerFile(pBt->pPager))->pMethods /* (3) */ 4585 && pBt->pPage1->aData[19]==0x01 /* (5) */ 4586 && &pBuf[-4]>=pBufStart /* (7) */ 4587 ){ 4588 u8 aSave[4]; 4589 u8 *aWrite = &pBuf[-4]; 4590 assert( aWrite>=pBufStart ); /* hence (7) */ 4591 memcpy(aSave, aWrite, 4); 4592 rc = sqlite3OsRead(fd, aWrite, a+4, (i64)pBt->pageSize*(nextPage-1)); 4593 nextPage = get4byte(aWrite); 4594 memcpy(aWrite, aSave, 4); 4595 }else 4596 #endif 4597 4598 { 4599 DbPage *pDbPage; 4600 rc = sqlite3PagerGet(pBt->pPager, nextPage, &pDbPage, 4601 ((eOp&0x01)==0 ? PAGER_GET_READONLY : 0) 4602 ); 4603 if( rc==SQLITE_OK ){ 4604 aPayload = sqlite3PagerGetData(pDbPage); 4605 nextPage = get4byte(aPayload); 4606 rc = copyPayload(&aPayload[offset+4], pBuf, a, (eOp&0x01), pDbPage); 4607 sqlite3PagerUnref(pDbPage); 4608 offset = 0; 4609 } 4610 } 4611 amt -= a; 4612 pBuf += a; 4613 } 4614 } 4615 } 4616 4617 if( rc==SQLITE_OK && amt>0 ){ 4618 return SQLITE_CORRUPT_BKPT; 4619 } 4620 return rc; 4621 } 4622 4623 /* 4624 ** Read part of the key associated with cursor pCur. Exactly 4625 ** "amt" bytes will be transferred into pBuf[]. The transfer 4626 ** begins at "offset". 4627 ** 4628 ** The caller must ensure that pCur is pointing to a valid row 4629 ** in the table. 4630 ** 4631 ** Return SQLITE_OK on success or an error code if anything goes 4632 ** wrong. An error is returned if "offset+amt" is larger than 4633 ** the available payload. 4634 */ 4635 int sqlite3BtreeKey(BtCursor *pCur, u32 offset, u32 amt, void *pBuf){ 4636 assert( cursorHoldsMutex(pCur) ); 4637 assert( pCur->eState==CURSOR_VALID ); 4638 assert( pCur->iPage>=0 && pCur->apPage[pCur->iPage] ); 4639 assert( pCur->aiIdx[pCur->iPage]<pCur->apPage[pCur->iPage]->nCell ); 4640 return accessPayload(pCur, offset, amt, (unsigned char*)pBuf, 0); 4641 } 4642 4643 /* 4644 ** Read part of the data associated with cursor pCur. Exactly 4645 ** "amt" bytes will be transfered into pBuf[]. The transfer 4646 ** begins at "offset". 4647 ** 4648 ** Return SQLITE_OK on success or an error code if anything goes 4649 ** wrong. An error is returned if "offset+amt" is larger than 4650 ** the available payload. 4651 */ 4652 int sqlite3BtreeData(BtCursor *pCur, u32 offset, u32 amt, void *pBuf){ 4653 int rc; 4654 4655 #ifndef SQLITE_OMIT_INCRBLOB 4656 if ( pCur->eState==CURSOR_INVALID ){ 4657 return SQLITE_ABORT; 4658 } 4659 #endif 4660 4661 assert( cursorHoldsMutex(pCur) ); 4662 rc = restoreCursorPosition(pCur); 4663 if( rc==SQLITE_OK ){ 4664 assert( pCur->eState==CURSOR_VALID ); 4665 assert( pCur->iPage>=0 && pCur->apPage[pCur->iPage] ); 4666 assert( pCur->aiIdx[pCur->iPage]<pCur->apPage[pCur->iPage]->nCell ); 4667 rc = accessPayload(pCur, offset, amt, pBuf, 0); 4668 } 4669 return rc; 4670 } 4671 4672 /* 4673 ** Return a pointer to payload information from the entry that the 4674 ** pCur cursor is pointing to. The pointer is to the beginning of 4675 ** the key if index btrees (pPage->intKey==0) and is the data for 4676 ** table btrees (pPage->intKey==1). The number of bytes of available 4677 ** key/data is written into *pAmt. If *pAmt==0, then the value 4678 ** returned will not be a valid pointer. 4679 ** 4680 ** This routine is an optimization. It is common for the entire key 4681 ** and data to fit on the local page and for there to be no overflow 4682 ** pages. When that is so, this routine can be used to access the 4683 ** key and data without making a copy. If the key and/or data spills 4684 ** onto overflow pages, then accessPayload() must be used to reassemble 4685 ** the key/data and copy it into a preallocated buffer. 4686 ** 4687 ** The pointer returned by this routine looks directly into the cached 4688 ** page of the database. The data might change or move the next time 4689 ** any btree routine is called. 4690 */ 4691 static const void *fetchPayload( 4692 BtCursor *pCur, /* Cursor pointing to entry to read from */ 4693 u32 *pAmt /* Write the number of available bytes here */ 4694 ){ 4695 u32 amt; 4696 assert( pCur!=0 && pCur->iPage>=0 && pCur->apPage[pCur->iPage]); 4697 assert( pCur->eState==CURSOR_VALID ); 4698 assert( sqlite3_mutex_held(pCur->pBtree->db->mutex) ); 4699 assert( cursorHoldsMutex(pCur) ); 4700 assert( pCur->aiIdx[pCur->iPage]<pCur->apPage[pCur->iPage]->nCell ); 4701 assert( pCur->info.nSize>0 ); 4702 assert( pCur->info.pPayload>pCur->apPage[pCur->iPage]->aData || CORRUPT_DB ); 4703 assert( pCur->info.pPayload<pCur->apPage[pCur->iPage]->aDataEnd ||CORRUPT_DB); 4704 amt = (int)(pCur->apPage[pCur->iPage]->aDataEnd - pCur->info.pPayload); 4705 if( pCur->info.nLocal<amt ) amt = pCur->info.nLocal; 4706 *pAmt = amt; 4707 return (void*)pCur->info.pPayload; 4708 } 4709 4710 4711 /* 4712 ** For the entry that cursor pCur is point to, return as 4713 ** many bytes of the key or data as are available on the local 4714 ** b-tree page. Write the number of available bytes into *pAmt. 4715 ** 4716 ** The pointer returned is ephemeral. The key/data may move 4717 ** or be destroyed on the next call to any Btree routine, 4718 ** including calls from other threads against the same cache. 4719 ** Hence, a mutex on the BtShared should be held prior to calling 4720 ** this routine. 4721 ** 4722 ** These routines is used to get quick access to key and data 4723 ** in the common case where no overflow pages are used. 4724 */ 4725 const void *sqlite3BtreeKeyFetch(BtCursor *pCur, u32 *pAmt){ 4726 return fetchPayload(pCur, pAmt); 4727 } 4728 const void *sqlite3BtreeDataFetch(BtCursor *pCur, u32 *pAmt){ 4729 return fetchPayload(pCur, pAmt); 4730 } 4731 4732 4733 /* 4734 ** Move the cursor down to a new child page. The newPgno argument is the 4735 ** page number of the child page to move to. 4736 ** 4737 ** This function returns SQLITE_CORRUPT if the page-header flags field of 4738 ** the new child page does not match the flags field of the parent (i.e. 4739 ** if an intkey page appears to be the parent of a non-intkey page, or 4740 ** vice-versa). 4741 */ 4742 static int moveToChild(BtCursor *pCur, u32 newPgno){ 4743 BtShared *pBt = pCur->pBt; 4744 4745 assert( cursorHoldsMutex(pCur) ); 4746 assert( pCur->eState==CURSOR_VALID ); 4747 assert( pCur->iPage<BTCURSOR_MAX_DEPTH ); 4748 assert( pCur->iPage>=0 ); 4749 if( pCur->iPage>=(BTCURSOR_MAX_DEPTH-1) ){ 4750 return SQLITE_CORRUPT_BKPT; 4751 } 4752 pCur->info.nSize = 0; 4753 pCur->curFlags &= ~(BTCF_ValidNKey|BTCF_ValidOvfl); 4754 pCur->iPage++; 4755 pCur->aiIdx[pCur->iPage] = 0; 4756 return getAndInitPage(pBt, newPgno, &pCur->apPage[pCur->iPage], 4757 pCur, pCur->curPagerFlags); 4758 } 4759 4760 #if SQLITE_DEBUG 4761 /* 4762 ** Page pParent is an internal (non-leaf) tree page. This function 4763 ** asserts that page number iChild is the left-child if the iIdx'th 4764 ** cell in page pParent. Or, if iIdx is equal to the total number of 4765 ** cells in pParent, that page number iChild is the right-child of 4766 ** the page. 4767 */ 4768 static void assertParentIndex(MemPage *pParent, int iIdx, Pgno iChild){ 4769 if( CORRUPT_DB ) return; /* The conditions tested below might not be true 4770 ** in a corrupt database */ 4771 assert( iIdx<=pParent->nCell ); 4772 if( iIdx==pParent->nCell ){ 4773 assert( get4byte(&pParent->aData[pParent->hdrOffset+8])==iChild ); 4774 }else{ 4775 assert( get4byte(findCell(pParent, iIdx))==iChild ); 4776 } 4777 } 4778 #else 4779 # define assertParentIndex(x,y,z) 4780 #endif 4781 4782 /* 4783 ** Move the cursor up to the parent page. 4784 ** 4785 ** pCur->idx is set to the cell index that contains the pointer 4786 ** to the page we are coming from. If we are coming from the 4787 ** right-most child page then pCur->idx is set to one more than 4788 ** the largest cell index. 4789 */ 4790 static void moveToParent(BtCursor *pCur){ 4791 assert( cursorHoldsMutex(pCur) ); 4792 assert( pCur->eState==CURSOR_VALID ); 4793 assert( pCur->iPage>0 ); 4794 assert( pCur->apPage[pCur->iPage] ); 4795 assertParentIndex( 4796 pCur->apPage[pCur->iPage-1], 4797 pCur->aiIdx[pCur->iPage-1], 4798 pCur->apPage[pCur->iPage]->pgno 4799 ); 4800 testcase( pCur->aiIdx[pCur->iPage-1] > pCur->apPage[pCur->iPage-1]->nCell ); 4801 pCur->info.nSize = 0; 4802 pCur->curFlags &= ~(BTCF_ValidNKey|BTCF_ValidOvfl); 4803 releasePageNotNull(pCur->apPage[pCur->iPage--]); 4804 } 4805 4806 /* 4807 ** Move the cursor to point to the root page of its b-tree structure. 4808 ** 4809 ** If the table has a virtual root page, then the cursor is moved to point 4810 ** to the virtual root page instead of the actual root page. A table has a 4811 ** virtual root page when the actual root page contains no cells and a 4812 ** single child page. This can only happen with the table rooted at page 1. 4813 ** 4814 ** If the b-tree structure is empty, the cursor state is set to 4815 ** CURSOR_INVALID. Otherwise, the cursor is set to point to the first 4816 ** cell located on the root (or virtual root) page and the cursor state 4817 ** is set to CURSOR_VALID. 4818 ** 4819 ** If this function returns successfully, it may be assumed that the 4820 ** page-header flags indicate that the [virtual] root-page is the expected 4821 ** kind of b-tree page (i.e. if when opening the cursor the caller did not 4822 ** specify a KeyInfo structure the flags byte is set to 0x05 or 0x0D, 4823 ** indicating a table b-tree, or if the caller did specify a KeyInfo 4824 ** structure the flags byte is set to 0x02 or 0x0A, indicating an index 4825 ** b-tree). 4826 */ 4827 static int moveToRoot(BtCursor *pCur){ 4828 MemPage *pRoot; 4829 int rc = SQLITE_OK; 4830 4831 assert( cursorHoldsMutex(pCur) ); 4832 assert( CURSOR_INVALID < CURSOR_REQUIRESEEK ); 4833 assert( CURSOR_VALID < CURSOR_REQUIRESEEK ); 4834 assert( CURSOR_FAULT > CURSOR_REQUIRESEEK ); 4835 if( pCur->eState>=CURSOR_REQUIRESEEK ){ 4836 if( pCur->eState==CURSOR_FAULT ){ 4837 assert( pCur->skipNext!=SQLITE_OK ); 4838 return pCur->skipNext; 4839 } 4840 sqlite3BtreeClearCursor(pCur); 4841 } 4842 4843 if( pCur->iPage>=0 ){ 4844 while( pCur->iPage ){ 4845 assert( pCur->apPage[pCur->iPage]!=0 ); 4846 releasePageNotNull(pCur->apPage[pCur->iPage--]); 4847 } 4848 }else if( pCur->pgnoRoot==0 ){ 4849 pCur->eState = CURSOR_INVALID; 4850 return SQLITE_OK; 4851 }else{ 4852 assert( pCur->iPage==(-1) ); 4853 rc = getAndInitPage(pCur->pBtree->pBt, pCur->pgnoRoot, &pCur->apPage[0], 4854 0, pCur->curPagerFlags); 4855 if( rc!=SQLITE_OK ){ 4856 pCur->eState = CURSOR_INVALID; 4857 return rc; 4858 } 4859 pCur->iPage = 0; 4860 pCur->curIntKey = pCur->apPage[0]->intKey; 4861 } 4862 pRoot = pCur->apPage[0]; 4863 assert( pRoot->pgno==pCur->pgnoRoot ); 4864 4865 /* If pCur->pKeyInfo is not NULL, then the caller that opened this cursor 4866 ** expected to open it on an index b-tree. Otherwise, if pKeyInfo is 4867 ** NULL, the caller expects a table b-tree. If this is not the case, 4868 ** return an SQLITE_CORRUPT error. 4869 ** 4870 ** Earlier versions of SQLite assumed that this test could not fail 4871 ** if the root page was already loaded when this function was called (i.e. 4872 ** if pCur->iPage>=0). But this is not so if the database is corrupted 4873 ** in such a way that page pRoot is linked into a second b-tree table 4874 ** (or the freelist). */ 4875 assert( pRoot->intKey==1 || pRoot->intKey==0 ); 4876 if( pRoot->isInit==0 || (pCur->pKeyInfo==0)!=pRoot->intKey ){ 4877 return SQLITE_CORRUPT_BKPT; 4878 } 4879 4880 pCur->aiIdx[0] = 0; 4881 pCur->info.nSize = 0; 4882 pCur->curFlags &= ~(BTCF_AtLast|BTCF_ValidNKey|BTCF_ValidOvfl); 4883 4884 if( pRoot->nCell>0 ){ 4885 pCur->eState = CURSOR_VALID; 4886 }else if( !pRoot->leaf ){ 4887 Pgno subpage; 4888 if( pRoot->pgno!=1 ) return SQLITE_CORRUPT_BKPT; 4889 subpage = get4byte(&pRoot->aData[pRoot->hdrOffset+8]); 4890 pCur->eState = CURSOR_VALID; 4891 rc = moveToChild(pCur, subpage); 4892 }else{ 4893 pCur->eState = CURSOR_INVALID; 4894 } 4895 return rc; 4896 } 4897 4898 /* 4899 ** Move the cursor down to the left-most leaf entry beneath the 4900 ** entry to which it is currently pointing. 4901 ** 4902 ** The left-most leaf is the one with the smallest key - the first 4903 ** in ascending order. 4904 */ 4905 static int moveToLeftmost(BtCursor *pCur){ 4906 Pgno pgno; 4907 int rc = SQLITE_OK; 4908 MemPage *pPage; 4909 4910 assert( cursorHoldsMutex(pCur) ); 4911 assert( pCur->eState==CURSOR_VALID ); 4912 while( rc==SQLITE_OK && !(pPage = pCur->apPage[pCur->iPage])->leaf ){ 4913 assert( pCur->aiIdx[pCur->iPage]<pPage->nCell ); 4914 pgno = get4byte(findCell(pPage, pCur->aiIdx[pCur->iPage])); 4915 rc = moveToChild(pCur, pgno); 4916 } 4917 return rc; 4918 } 4919 4920 /* 4921 ** Move the cursor down to the right-most leaf entry beneath the 4922 ** page to which it is currently pointing. Notice the difference 4923 ** between moveToLeftmost() and moveToRightmost(). moveToLeftmost() 4924 ** finds the left-most entry beneath the *entry* whereas moveToRightmost() 4925 ** finds the right-most entry beneath the *page*. 4926 ** 4927 ** The right-most entry is the one with the largest key - the last 4928 ** key in ascending order. 4929 */ 4930 static int moveToRightmost(BtCursor *pCur){ 4931 Pgno pgno; 4932 int rc = SQLITE_OK; 4933 MemPage *pPage = 0; 4934 4935 assert( cursorHoldsMutex(pCur) ); 4936 assert( pCur->eState==CURSOR_VALID ); 4937 while( !(pPage = pCur->apPage[pCur->iPage])->leaf ){ 4938 pgno = get4byte(&pPage->aData[pPage->hdrOffset+8]); 4939 pCur->aiIdx[pCur->iPage] = pPage->nCell; 4940 rc = moveToChild(pCur, pgno); 4941 if( rc ) return rc; 4942 } 4943 pCur->aiIdx[pCur->iPage] = pPage->nCell-1; 4944 assert( pCur->info.nSize==0 ); 4945 assert( (pCur->curFlags & BTCF_ValidNKey)==0 ); 4946 return SQLITE_OK; 4947 } 4948 4949 /* Move the cursor to the first entry in the table. Return SQLITE_OK 4950 ** on success. Set *pRes to 0 if the cursor actually points to something 4951 ** or set *pRes to 1 if the table is empty. 4952 */ 4953 int sqlite3BtreeFirst(BtCursor *pCur, int *pRes){ 4954 int rc; 4955 4956 assert( cursorHoldsMutex(pCur) ); 4957 assert( sqlite3_mutex_held(pCur->pBtree->db->mutex) ); 4958 rc = moveToRoot(pCur); 4959 if( rc==SQLITE_OK ){ 4960 if( pCur->eState==CURSOR_INVALID ){ 4961 assert( pCur->pgnoRoot==0 || pCur->apPage[pCur->iPage]->nCell==0 ); 4962 *pRes = 1; 4963 }else{ 4964 assert( pCur->apPage[pCur->iPage]->nCell>0 ); 4965 *pRes = 0; 4966 rc = moveToLeftmost(pCur); 4967 } 4968 } 4969 return rc; 4970 } 4971 4972 /* Move the cursor to the last entry in the table. Return SQLITE_OK 4973 ** on success. Set *pRes to 0 if the cursor actually points to something 4974 ** or set *pRes to 1 if the table is empty. 4975 */ 4976 int sqlite3BtreeLast(BtCursor *pCur, int *pRes){ 4977 int rc; 4978 4979 assert( cursorHoldsMutex(pCur) ); 4980 assert( sqlite3_mutex_held(pCur->pBtree->db->mutex) ); 4981 4982 /* If the cursor already points to the last entry, this is a no-op. */ 4983 if( CURSOR_VALID==pCur->eState && (pCur->curFlags & BTCF_AtLast)!=0 ){ 4984 #ifdef SQLITE_DEBUG 4985 /* This block serves to assert() that the cursor really does point 4986 ** to the last entry in the b-tree. */ 4987 int ii; 4988 for(ii=0; ii<pCur->iPage; ii++){ 4989 assert( pCur->aiIdx[ii]==pCur->apPage[ii]->nCell ); 4990 } 4991 assert( pCur->aiIdx[pCur->iPage]==pCur->apPage[pCur->iPage]->nCell-1 ); 4992 assert( pCur->apPage[pCur->iPage]->leaf ); 4993 #endif 4994 return SQLITE_OK; 4995 } 4996 4997 rc = moveToRoot(pCur); 4998 if( rc==SQLITE_OK ){ 4999 if( CURSOR_INVALID==pCur->eState ){ 5000 assert( pCur->pgnoRoot==0 || pCur->apPage[pCur->iPage]->nCell==0 ); 5001 *pRes = 1; 5002 }else{ 5003 assert( pCur->eState==CURSOR_VALID ); 5004 *pRes = 0; 5005 rc = moveToRightmost(pCur); 5006 if( rc==SQLITE_OK ){ 5007 pCur->curFlags |= BTCF_AtLast; 5008 }else{ 5009 pCur->curFlags &= ~BTCF_AtLast; 5010 } 5011 5012 } 5013 } 5014 return rc; 5015 } 5016 5017 /* Move the cursor so that it points to an entry near the key 5018 ** specified by pIdxKey or intKey. Return a success code. 5019 ** 5020 ** For INTKEY tables, the intKey parameter is used. pIdxKey 5021 ** must be NULL. For index tables, pIdxKey is used and intKey 5022 ** is ignored. 5023 ** 5024 ** If an exact match is not found, then the cursor is always 5025 ** left pointing at a leaf page which would hold the entry if it 5026 ** were present. The cursor might point to an entry that comes 5027 ** before or after the key. 5028 ** 5029 ** An integer is written into *pRes which is the result of 5030 ** comparing the key with the entry to which the cursor is 5031 ** pointing. The meaning of the integer written into 5032 ** *pRes is as follows: 5033 ** 5034 ** *pRes<0 The cursor is left pointing at an entry that 5035 ** is smaller than intKey/pIdxKey or if the table is empty 5036 ** and the cursor is therefore left point to nothing. 5037 ** 5038 ** *pRes==0 The cursor is left pointing at an entry that 5039 ** exactly matches intKey/pIdxKey. 5040 ** 5041 ** *pRes>0 The cursor is left pointing at an entry that 5042 ** is larger than intKey/pIdxKey. 5043 ** 5044 */ 5045 int sqlite3BtreeMovetoUnpacked( 5046 BtCursor *pCur, /* The cursor to be moved */ 5047 UnpackedRecord *pIdxKey, /* Unpacked index key */ 5048 i64 intKey, /* The table key */ 5049 int biasRight, /* If true, bias the search to the high end */ 5050 int *pRes /* Write search results here */ 5051 ){ 5052 int rc; 5053 RecordCompare xRecordCompare; 5054 5055 assert( cursorHoldsMutex(pCur) ); 5056 assert( sqlite3_mutex_held(pCur->pBtree->db->mutex) ); 5057 assert( pRes ); 5058 assert( (pIdxKey==0)==(pCur->pKeyInfo==0) ); 5059 5060 /* If the cursor is already positioned at the point we are trying 5061 ** to move to, then just return without doing any work */ 5062 if( pCur->eState==CURSOR_VALID && (pCur->curFlags & BTCF_ValidNKey)!=0 5063 && pCur->curIntKey 5064 ){ 5065 if( pCur->info.nKey==intKey ){ 5066 *pRes = 0; 5067 return SQLITE_OK; 5068 } 5069 if( (pCur->curFlags & BTCF_AtLast)!=0 && pCur->info.nKey<intKey ){ 5070 *pRes = -1; 5071 return SQLITE_OK; 5072 } 5073 } 5074 5075 if( pIdxKey ){ 5076 xRecordCompare = sqlite3VdbeFindCompare(pIdxKey); 5077 pIdxKey->errCode = 0; 5078 assert( pIdxKey->default_rc==1 5079 || pIdxKey->default_rc==0 5080 || pIdxKey->default_rc==-1 5081 ); 5082 }else{ 5083 xRecordCompare = 0; /* All keys are integers */ 5084 } 5085 5086 rc = moveToRoot(pCur); 5087 if( rc ){ 5088 return rc; 5089 } 5090 assert( pCur->pgnoRoot==0 || pCur->apPage[pCur->iPage] ); 5091 assert( pCur->pgnoRoot==0 || pCur->apPage[pCur->iPage]->isInit ); 5092 assert( pCur->eState==CURSOR_INVALID || pCur->apPage[pCur->iPage]->nCell>0 ); 5093 if( pCur->eState==CURSOR_INVALID ){ 5094 *pRes = -1; 5095 assert( pCur->pgnoRoot==0 || pCur->apPage[pCur->iPage]->nCell==0 ); 5096 return SQLITE_OK; 5097 } 5098 assert( pCur->apPage[0]->intKey==pCur->curIntKey ); 5099 assert( pCur->curIntKey || pIdxKey ); 5100 for(;;){ 5101 int lwr, upr, idx, c; 5102 Pgno chldPg; 5103 MemPage *pPage = pCur->apPage[pCur->iPage]; 5104 u8 *pCell; /* Pointer to current cell in pPage */ 5105 5106 /* pPage->nCell must be greater than zero. If this is the root-page 5107 ** the cursor would have been INVALID above and this for(;;) loop 5108 ** not run. If this is not the root-page, then the moveToChild() routine 5109 ** would have already detected db corruption. Similarly, pPage must 5110 ** be the right kind (index or table) of b-tree page. Otherwise 5111 ** a moveToChild() or moveToRoot() call would have detected corruption. */ 5112 assert( pPage->nCell>0 ); 5113 assert( pPage->intKey==(pIdxKey==0) ); 5114 lwr = 0; 5115 upr = pPage->nCell-1; 5116 assert( biasRight==0 || biasRight==1 ); 5117 idx = upr>>(1-biasRight); /* idx = biasRight ? upr : (lwr+upr)/2; */ 5118 pCur->aiIdx[pCur->iPage] = (u16)idx; 5119 if( xRecordCompare==0 ){ 5120 for(;;){ 5121 i64 nCellKey; 5122 pCell = findCellPastPtr(pPage, idx); 5123 if( pPage->intKeyLeaf ){ 5124 while( 0x80 <= *(pCell++) ){ 5125 if( pCell>=pPage->aDataEnd ) return SQLITE_CORRUPT_BKPT; 5126 } 5127 } 5128 getVarint(pCell, (u64*)&nCellKey); 5129 if( nCellKey<intKey ){ 5130 lwr = idx+1; 5131 if( lwr>upr ){ c = -1; break; } 5132 }else if( nCellKey>intKey ){ 5133 upr = idx-1; 5134 if( lwr>upr ){ c = +1; break; } 5135 }else{ 5136 assert( nCellKey==intKey ); 5137 pCur->curFlags |= BTCF_ValidNKey; 5138 pCur->info.nKey = nCellKey; 5139 pCur->aiIdx[pCur->iPage] = (u16)idx; 5140 if( !pPage->leaf ){ 5141 lwr = idx; 5142 goto moveto_next_layer; 5143 }else{ 5144 *pRes = 0; 5145 rc = SQLITE_OK; 5146 goto moveto_finish; 5147 } 5148 } 5149 assert( lwr+upr>=0 ); 5150 idx = (lwr+upr)>>1; /* idx = (lwr+upr)/2; */ 5151 } 5152 }else{ 5153 for(;;){ 5154 int nCell; /* Size of the pCell cell in bytes */ 5155 pCell = findCellPastPtr(pPage, idx); 5156 5157 /* The maximum supported page-size is 65536 bytes. This means that 5158 ** the maximum number of record bytes stored on an index B-Tree 5159 ** page is less than 16384 bytes and may be stored as a 2-byte 5160 ** varint. This information is used to attempt to avoid parsing 5161 ** the entire cell by checking for the cases where the record is 5162 ** stored entirely within the b-tree page by inspecting the first 5163 ** 2 bytes of the cell. 5164 */ 5165 nCell = pCell[0]; 5166 if( nCell<=pPage->max1bytePayload ){ 5167 /* This branch runs if the record-size field of the cell is a 5168 ** single byte varint and the record fits entirely on the main 5169 ** b-tree page. */ 5170 testcase( pCell+nCell+1==pPage->aDataEnd ); 5171 c = xRecordCompare(nCell, (void*)&pCell[1], pIdxKey); 5172 }else if( !(pCell[1] & 0x80) 5173 && (nCell = ((nCell&0x7f)<<7) + pCell[1])<=pPage->maxLocal 5174 ){ 5175 /* The record-size field is a 2 byte varint and the record 5176 ** fits entirely on the main b-tree page. */ 5177 testcase( pCell+nCell+2==pPage->aDataEnd ); 5178 c = xRecordCompare(nCell, (void*)&pCell[2], pIdxKey); 5179 }else{ 5180 /* The record flows over onto one or more overflow pages. In 5181 ** this case the whole cell needs to be parsed, a buffer allocated 5182 ** and accessPayload() used to retrieve the record into the 5183 ** buffer before VdbeRecordCompare() can be called. 5184 ** 5185 ** If the record is corrupt, the xRecordCompare routine may read 5186 ** up to two varints past the end of the buffer. An extra 18 5187 ** bytes of padding is allocated at the end of the buffer in 5188 ** case this happens. */ 5189 void *pCellKey; 5190 u8 * const pCellBody = pCell - pPage->childPtrSize; 5191 pPage->xParseCell(pPage, pCellBody, &pCur->info); 5192 nCell = (int)pCur->info.nKey; 5193 testcase( nCell<0 ); /* True if key size is 2^32 or more */ 5194 testcase( nCell==0 ); /* Invalid key size: 0x80 0x80 0x00 */ 5195 testcase( nCell==1 ); /* Invalid key size: 0x80 0x80 0x01 */ 5196 testcase( nCell==2 ); /* Minimum legal index key size */ 5197 if( nCell<2 ){ 5198 rc = SQLITE_CORRUPT_BKPT; 5199 goto moveto_finish; 5200 } 5201 pCellKey = sqlite3Malloc( nCell+18 ); 5202 if( pCellKey==0 ){ 5203 rc = SQLITE_NOMEM; 5204 goto moveto_finish; 5205 } 5206 pCur->aiIdx[pCur->iPage] = (u16)idx; 5207 rc = accessPayload(pCur, 0, nCell, (unsigned char*)pCellKey, 2); 5208 if( rc ){ 5209 sqlite3_free(pCellKey); 5210 goto moveto_finish; 5211 } 5212 c = xRecordCompare(nCell, pCellKey, pIdxKey); 5213 sqlite3_free(pCellKey); 5214 } 5215 assert( 5216 (pIdxKey->errCode!=SQLITE_CORRUPT || c==0) 5217 && (pIdxKey->errCode!=SQLITE_NOMEM || pCur->pBtree->db->mallocFailed) 5218 ); 5219 if( c<0 ){ 5220 lwr = idx+1; 5221 }else if( c>0 ){ 5222 upr = idx-1; 5223 }else{ 5224 assert( c==0 ); 5225 *pRes = 0; 5226 rc = SQLITE_OK; 5227 pCur->aiIdx[pCur->iPage] = (u16)idx; 5228 if( pIdxKey->errCode ) rc = SQLITE_CORRUPT; 5229 goto moveto_finish; 5230 } 5231 if( lwr>upr ) break; 5232 assert( lwr+upr>=0 ); 5233 idx = (lwr+upr)>>1; /* idx = (lwr+upr)/2 */ 5234 } 5235 } 5236 assert( lwr==upr+1 || (pPage->intKey && !pPage->leaf) ); 5237 assert( pPage->isInit ); 5238 if( pPage->leaf ){ 5239 assert( pCur->aiIdx[pCur->iPage]<pCur->apPage[pCur->iPage]->nCell ); 5240 pCur->aiIdx[pCur->iPage] = (u16)idx; 5241 *pRes = c; 5242 rc = SQLITE_OK; 5243 goto moveto_finish; 5244 } 5245 moveto_next_layer: 5246 if( lwr>=pPage->nCell ){ 5247 chldPg = get4byte(&pPage->aData[pPage->hdrOffset+8]); 5248 }else{ 5249 chldPg = get4byte(findCell(pPage, lwr)); 5250 } 5251 pCur->aiIdx[pCur->iPage] = (u16)lwr; 5252 rc = moveToChild(pCur, chldPg); 5253 if( rc ) break; 5254 } 5255 moveto_finish: 5256 pCur->info.nSize = 0; 5257 pCur->curFlags &= ~(BTCF_ValidNKey|BTCF_ValidOvfl); 5258 return rc; 5259 } 5260 5261 5262 /* 5263 ** Return TRUE if the cursor is not pointing at an entry of the table. 5264 ** 5265 ** TRUE will be returned after a call to sqlite3BtreeNext() moves 5266 ** past the last entry in the table or sqlite3BtreePrev() moves past 5267 ** the first entry. TRUE is also returned if the table is empty. 5268 */ 5269 int sqlite3BtreeEof(BtCursor *pCur){ 5270 /* TODO: What if the cursor is in CURSOR_REQUIRESEEK but all table entries 5271 ** have been deleted? This API will need to change to return an error code 5272 ** as well as the boolean result value. 5273 */ 5274 return (CURSOR_VALID!=pCur->eState); 5275 } 5276 5277 /* 5278 ** Advance the cursor to the next entry in the database. If 5279 ** successful then set *pRes=0. If the cursor 5280 ** was already pointing to the last entry in the database before 5281 ** this routine was called, then set *pRes=1. 5282 ** 5283 ** The main entry point is sqlite3BtreeNext(). That routine is optimized 5284 ** for the common case of merely incrementing the cell counter BtCursor.aiIdx 5285 ** to the next cell on the current page. The (slower) btreeNext() helper 5286 ** routine is called when it is necessary to move to a different page or 5287 ** to restore the cursor. 5288 ** 5289 ** The calling function will set *pRes to 0 or 1. The initial *pRes value 5290 ** will be 1 if the cursor being stepped corresponds to an SQL index and 5291 ** if this routine could have been skipped if that SQL index had been 5292 ** a unique index. Otherwise the caller will have set *pRes to zero. 5293 ** Zero is the common case. The btree implementation is free to use the 5294 ** initial *pRes value as a hint to improve performance, but the current 5295 ** SQLite btree implementation does not. (Note that the comdb2 btree 5296 ** implementation does use this hint, however.) 5297 */ 5298 static SQLITE_NOINLINE int btreeNext(BtCursor *pCur, int *pRes){ 5299 int rc; 5300 int idx; 5301 MemPage *pPage; 5302 5303 assert( cursorHoldsMutex(pCur) ); 5304 assert( pCur->skipNext==0 || pCur->eState!=CURSOR_VALID ); 5305 assert( *pRes==0 ); 5306 if( pCur->eState!=CURSOR_VALID ){ 5307 assert( (pCur->curFlags & BTCF_ValidOvfl)==0 ); 5308 rc = restoreCursorPosition(pCur); 5309 if( rc!=SQLITE_OK ){ 5310 return rc; 5311 } 5312 if( CURSOR_INVALID==pCur->eState ){ 5313 *pRes = 1; 5314 return SQLITE_OK; 5315 } 5316 if( pCur->skipNext ){ 5317 assert( pCur->eState==CURSOR_VALID || pCur->eState==CURSOR_SKIPNEXT ); 5318 pCur->eState = CURSOR_VALID; 5319 if( pCur->skipNext>0 ){ 5320 pCur->skipNext = 0; 5321 return SQLITE_OK; 5322 } 5323 pCur->skipNext = 0; 5324 } 5325 } 5326 5327 pPage = pCur->apPage[pCur->iPage]; 5328 idx = ++pCur->aiIdx[pCur->iPage]; 5329 assert( pPage->isInit ); 5330 5331 /* If the database file is corrupt, it is possible for the value of idx 5332 ** to be invalid here. This can only occur if a second cursor modifies 5333 ** the page while cursor pCur is holding a reference to it. Which can 5334 ** only happen if the database is corrupt in such a way as to link the 5335 ** page into more than one b-tree structure. */ 5336 testcase( idx>pPage->nCell ); 5337 5338 if( idx>=pPage->nCell ){ 5339 if( !pPage->leaf ){ 5340 rc = moveToChild(pCur, get4byte(&pPage->aData[pPage->hdrOffset+8])); 5341 if( rc ) return rc; 5342 return moveToLeftmost(pCur); 5343 } 5344 do{ 5345 if( pCur->iPage==0 ){ 5346 *pRes = 1; 5347 pCur->eState = CURSOR_INVALID; 5348 return SQLITE_OK; 5349 } 5350 moveToParent(pCur); 5351 pPage = pCur->apPage[pCur->iPage]; 5352 }while( pCur->aiIdx[pCur->iPage]>=pPage->nCell ); 5353 if( pPage->intKey ){ 5354 return sqlite3BtreeNext(pCur, pRes); 5355 }else{ 5356 return SQLITE_OK; 5357 } 5358 } 5359 if( pPage->leaf ){ 5360 return SQLITE_OK; 5361 }else{ 5362 return moveToLeftmost(pCur); 5363 } 5364 } 5365 int sqlite3BtreeNext(BtCursor *pCur, int *pRes){ 5366 MemPage *pPage; 5367 assert( cursorHoldsMutex(pCur) ); 5368 assert( pRes!=0 ); 5369 assert( *pRes==0 || *pRes==1 ); 5370 assert( pCur->skipNext==0 || pCur->eState!=CURSOR_VALID ); 5371 pCur->info.nSize = 0; 5372 pCur->curFlags &= ~(BTCF_ValidNKey|BTCF_ValidOvfl); 5373 *pRes = 0; 5374 if( pCur->eState!=CURSOR_VALID ) return btreeNext(pCur, pRes); 5375 pPage = pCur->apPage[pCur->iPage]; 5376 if( (++pCur->aiIdx[pCur->iPage])>=pPage->nCell ){ 5377 pCur->aiIdx[pCur->iPage]--; 5378 return btreeNext(pCur, pRes); 5379 } 5380 if( pPage->leaf ){ 5381 return SQLITE_OK; 5382 }else{ 5383 return moveToLeftmost(pCur); 5384 } 5385 } 5386 5387 /* 5388 ** Step the cursor to the back to the previous entry in the database. If 5389 ** successful then set *pRes=0. If the cursor 5390 ** was already pointing to the first entry in the database before 5391 ** this routine was called, then set *pRes=1. 5392 ** 5393 ** The main entry point is sqlite3BtreePrevious(). That routine is optimized 5394 ** for the common case of merely decrementing the cell counter BtCursor.aiIdx 5395 ** to the previous cell on the current page. The (slower) btreePrevious() 5396 ** helper routine is called when it is necessary to move to a different page 5397 ** or to restore the cursor. 5398 ** 5399 ** The calling function will set *pRes to 0 or 1. The initial *pRes value 5400 ** will be 1 if the cursor being stepped corresponds to an SQL index and 5401 ** if this routine could have been skipped if that SQL index had been 5402 ** a unique index. Otherwise the caller will have set *pRes to zero. 5403 ** Zero is the common case. The btree implementation is free to use the 5404 ** initial *pRes value as a hint to improve performance, but the current 5405 ** SQLite btree implementation does not. (Note that the comdb2 btree 5406 ** implementation does use this hint, however.) 5407 */ 5408 static SQLITE_NOINLINE int btreePrevious(BtCursor *pCur, int *pRes){ 5409 int rc; 5410 MemPage *pPage; 5411 5412 assert( cursorHoldsMutex(pCur) ); 5413 assert( pRes!=0 ); 5414 assert( *pRes==0 ); 5415 assert( pCur->skipNext==0 || pCur->eState!=CURSOR_VALID ); 5416 assert( (pCur->curFlags & (BTCF_AtLast|BTCF_ValidOvfl|BTCF_ValidNKey))==0 ); 5417 assert( pCur->info.nSize==0 ); 5418 if( pCur->eState!=CURSOR_VALID ){ 5419 rc = restoreCursorPosition(pCur); 5420 if( rc!=SQLITE_OK ){ 5421 return rc; 5422 } 5423 if( CURSOR_INVALID==pCur->eState ){ 5424 *pRes = 1; 5425 return SQLITE_OK; 5426 } 5427 if( pCur->skipNext ){ 5428 assert( pCur->eState==CURSOR_VALID || pCur->eState==CURSOR_SKIPNEXT ); 5429 pCur->eState = CURSOR_VALID; 5430 if( pCur->skipNext<0 ){ 5431 pCur->skipNext = 0; 5432 return SQLITE_OK; 5433 } 5434 pCur->skipNext = 0; 5435 } 5436 } 5437 5438 pPage = pCur->apPage[pCur->iPage]; 5439 assert( pPage->isInit ); 5440 if( !pPage->leaf ){ 5441 int idx = pCur->aiIdx[pCur->iPage]; 5442 rc = moveToChild(pCur, get4byte(findCell(pPage, idx))); 5443 if( rc ) return rc; 5444 rc = moveToRightmost(pCur); 5445 }else{ 5446 while( pCur->aiIdx[pCur->iPage]==0 ){ 5447 if( pCur->iPage==0 ){ 5448 pCur->eState = CURSOR_INVALID; 5449 *pRes = 1; 5450 return SQLITE_OK; 5451 } 5452 moveToParent(pCur); 5453 } 5454 assert( pCur->info.nSize==0 ); 5455 assert( (pCur->curFlags & (BTCF_ValidNKey|BTCF_ValidOvfl))==0 ); 5456 5457 pCur->aiIdx[pCur->iPage]--; 5458 pPage = pCur->apPage[pCur->iPage]; 5459 if( pPage->intKey && !pPage->leaf ){ 5460 rc = sqlite3BtreePrevious(pCur, pRes); 5461 }else{ 5462 rc = SQLITE_OK; 5463 } 5464 } 5465 return rc; 5466 } 5467 int sqlite3BtreePrevious(BtCursor *pCur, int *pRes){ 5468 assert( cursorHoldsMutex(pCur) ); 5469 assert( pRes!=0 ); 5470 assert( *pRes==0 || *pRes==1 ); 5471 assert( pCur->skipNext==0 || pCur->eState!=CURSOR_VALID ); 5472 *pRes = 0; 5473 pCur->curFlags &= ~(BTCF_AtLast|BTCF_ValidOvfl|BTCF_ValidNKey); 5474 pCur->info.nSize = 0; 5475 if( pCur->eState!=CURSOR_VALID 5476 || pCur->aiIdx[pCur->iPage]==0 5477 || pCur->apPage[pCur->iPage]->leaf==0 5478 ){ 5479 return btreePrevious(pCur, pRes); 5480 } 5481 pCur->aiIdx[pCur->iPage]--; 5482 return SQLITE_OK; 5483 } 5484 5485 /* 5486 ** Allocate a new page from the database file. 5487 ** 5488 ** The new page is marked as dirty. (In other words, sqlite3PagerWrite() 5489 ** has already been called on the new page.) The new page has also 5490 ** been referenced and the calling routine is responsible for calling 5491 ** sqlite3PagerUnref() on the new page when it is done. 5492 ** 5493 ** SQLITE_OK is returned on success. Any other return value indicates 5494 ** an error. *ppPage is set to NULL in the event of an error. 5495 ** 5496 ** If the "nearby" parameter is not 0, then an effort is made to 5497 ** locate a page close to the page number "nearby". This can be used in an 5498 ** attempt to keep related pages close to each other in the database file, 5499 ** which in turn can make database access faster. 5500 ** 5501 ** If the eMode parameter is BTALLOC_EXACT and the nearby page exists 5502 ** anywhere on the free-list, then it is guaranteed to be returned. If 5503 ** eMode is BTALLOC_LT then the page returned will be less than or equal 5504 ** to nearby if any such page exists. If eMode is BTALLOC_ANY then there 5505 ** are no restrictions on which page is returned. 5506 */ 5507 static int allocateBtreePage( 5508 BtShared *pBt, /* The btree */ 5509 MemPage **ppPage, /* Store pointer to the allocated page here */ 5510 Pgno *pPgno, /* Store the page number here */ 5511 Pgno nearby, /* Search for a page near this one */ 5512 u8 eMode /* BTALLOC_EXACT, BTALLOC_LT, or BTALLOC_ANY */ 5513 ){ 5514 MemPage *pPage1; 5515 int rc; 5516 u32 n; /* Number of pages on the freelist */ 5517 u32 k; /* Number of leaves on the trunk of the freelist */ 5518 MemPage *pTrunk = 0; 5519 MemPage *pPrevTrunk = 0; 5520 Pgno mxPage; /* Total size of the database file */ 5521 5522 assert( sqlite3_mutex_held(pBt->mutex) ); 5523 assert( eMode==BTALLOC_ANY || (nearby>0 && IfNotOmitAV(pBt->autoVacuum)) ); 5524 pPage1 = pBt->pPage1; 5525 mxPage = btreePagecount(pBt); 5526 /* EVIDENCE-OF: R-05119-02637 The 4-byte big-endian integer at offset 36 5527 ** stores stores the total number of pages on the freelist. */ 5528 n = get4byte(&pPage1->aData[36]); 5529 testcase( n==mxPage-1 ); 5530 if( n>=mxPage ){ 5531 return SQLITE_CORRUPT_BKPT; 5532 } 5533 if( n>0 ){ 5534 /* There are pages on the freelist. Reuse one of those pages. */ 5535 Pgno iTrunk; 5536 u8 searchList = 0; /* If the free-list must be searched for 'nearby' */ 5537 u32 nSearch = 0; /* Count of the number of search attempts */ 5538 5539 /* If eMode==BTALLOC_EXACT and a query of the pointer-map 5540 ** shows that the page 'nearby' is somewhere on the free-list, then 5541 ** the entire-list will be searched for that page. 5542 */ 5543 #ifndef SQLITE_OMIT_AUTOVACUUM 5544 if( eMode==BTALLOC_EXACT ){ 5545 if( nearby<=mxPage ){ 5546 u8 eType; 5547 assert( nearby>0 ); 5548 assert( pBt->autoVacuum ); 5549 rc = ptrmapGet(pBt, nearby, &eType, 0); 5550 if( rc ) return rc; 5551 if( eType==PTRMAP_FREEPAGE ){ 5552 searchList = 1; 5553 } 5554 } 5555 }else if( eMode==BTALLOC_LE ){ 5556 searchList = 1; 5557 } 5558 #endif 5559 5560 /* Decrement the free-list count by 1. Set iTrunk to the index of the 5561 ** first free-list trunk page. iPrevTrunk is initially 1. 5562 */ 5563 rc = sqlite3PagerWrite(pPage1->pDbPage); 5564 if( rc ) return rc; 5565 put4byte(&pPage1->aData[36], n-1); 5566 5567 /* The code within this loop is run only once if the 'searchList' variable 5568 ** is not true. Otherwise, it runs once for each trunk-page on the 5569 ** free-list until the page 'nearby' is located (eMode==BTALLOC_EXACT) 5570 ** or until a page less than 'nearby' is located (eMode==BTALLOC_LT) 5571 */ 5572 do { 5573 pPrevTrunk = pTrunk; 5574 if( pPrevTrunk ){ 5575 /* EVIDENCE-OF: R-01506-11053 The first integer on a freelist trunk page 5576 ** is the page number of the next freelist trunk page in the list or 5577 ** zero if this is the last freelist trunk page. */ 5578 iTrunk = get4byte(&pPrevTrunk->aData[0]); 5579 }else{ 5580 /* EVIDENCE-OF: R-59841-13798 The 4-byte big-endian integer at offset 32 5581 ** stores the page number of the first page of the freelist, or zero if 5582 ** the freelist is empty. */ 5583 iTrunk = get4byte(&pPage1->aData[32]); 5584 } 5585 testcase( iTrunk==mxPage ); 5586 if( iTrunk>mxPage || nSearch++ > n ){ 5587 rc = SQLITE_CORRUPT_BKPT; 5588 }else{ 5589 rc = btreeGetUnusedPage(pBt, iTrunk, &pTrunk, 0); 5590 } 5591 if( rc ){ 5592 pTrunk = 0; 5593 goto end_allocate_page; 5594 } 5595 assert( pTrunk!=0 ); 5596 assert( pTrunk->aData!=0 ); 5597 /* EVIDENCE-OF: R-13523-04394 The second integer on a freelist trunk page 5598 ** is the number of leaf page pointers to follow. */ 5599 k = get4byte(&pTrunk->aData[4]); 5600 if( k==0 && !searchList ){ 5601 /* The trunk has no leaves and the list is not being searched. 5602 ** So extract the trunk page itself and use it as the newly 5603 ** allocated page */ 5604 assert( pPrevTrunk==0 ); 5605 rc = sqlite3PagerWrite(pTrunk->pDbPage); 5606 if( rc ){ 5607 goto end_allocate_page; 5608 } 5609 *pPgno = iTrunk; 5610 memcpy(&pPage1->aData[32], &pTrunk->aData[0], 4); 5611 *ppPage = pTrunk; 5612 pTrunk = 0; 5613 TRACE(("ALLOCATE: %d trunk - %d free pages left\n", *pPgno, n-1)); 5614 }else if( k>(u32)(pBt->usableSize/4 - 2) ){ 5615 /* Value of k is out of range. Database corruption */ 5616 rc = SQLITE_CORRUPT_BKPT; 5617 goto end_allocate_page; 5618 #ifndef SQLITE_OMIT_AUTOVACUUM 5619 }else if( searchList 5620 && (nearby==iTrunk || (iTrunk<nearby && eMode==BTALLOC_LE)) 5621 ){ 5622 /* The list is being searched and this trunk page is the page 5623 ** to allocate, regardless of whether it has leaves. 5624 */ 5625 *pPgno = iTrunk; 5626 *ppPage = pTrunk; 5627 searchList = 0; 5628 rc = sqlite3PagerWrite(pTrunk->pDbPage); 5629 if( rc ){ 5630 goto end_allocate_page; 5631 } 5632 if( k==0 ){ 5633 if( !pPrevTrunk ){ 5634 memcpy(&pPage1->aData[32], &pTrunk->aData[0], 4); 5635 }else{ 5636 rc = sqlite3PagerWrite(pPrevTrunk->pDbPage); 5637 if( rc!=SQLITE_OK ){ 5638 goto end_allocate_page; 5639 } 5640 memcpy(&pPrevTrunk->aData[0], &pTrunk->aData[0], 4); 5641 } 5642 }else{ 5643 /* The trunk page is required by the caller but it contains 5644 ** pointers to free-list leaves. The first leaf becomes a trunk 5645 ** page in this case. 5646 */ 5647 MemPage *pNewTrunk; 5648 Pgno iNewTrunk = get4byte(&pTrunk->aData[8]); 5649 if( iNewTrunk>mxPage ){ 5650 rc = SQLITE_CORRUPT_BKPT; 5651 goto end_allocate_page; 5652 } 5653 testcase( iNewTrunk==mxPage ); 5654 rc = btreeGetUnusedPage(pBt, iNewTrunk, &pNewTrunk, 0); 5655 if( rc!=SQLITE_OK ){ 5656 goto end_allocate_page; 5657 } 5658 rc = sqlite3PagerWrite(pNewTrunk->pDbPage); 5659 if( rc!=SQLITE_OK ){ 5660 releasePage(pNewTrunk); 5661 goto end_allocate_page; 5662 } 5663 memcpy(&pNewTrunk->aData[0], &pTrunk->aData[0], 4); 5664 put4byte(&pNewTrunk->aData[4], k-1); 5665 memcpy(&pNewTrunk->aData[8], &pTrunk->aData[12], (k-1)*4); 5666 releasePage(pNewTrunk); 5667 if( !pPrevTrunk ){ 5668 assert( sqlite3PagerIswriteable(pPage1->pDbPage) ); 5669 put4byte(&pPage1->aData[32], iNewTrunk); 5670 }else{ 5671 rc = sqlite3PagerWrite(pPrevTrunk->pDbPage); 5672 if( rc ){ 5673 goto end_allocate_page; 5674 } 5675 put4byte(&pPrevTrunk->aData[0], iNewTrunk); 5676 } 5677 } 5678 pTrunk = 0; 5679 TRACE(("ALLOCATE: %d trunk - %d free pages left\n", *pPgno, n-1)); 5680 #endif 5681 }else if( k>0 ){ 5682 /* Extract a leaf from the trunk */ 5683 u32 closest; 5684 Pgno iPage; 5685 unsigned char *aData = pTrunk->aData; 5686 if( nearby>0 ){ 5687 u32 i; 5688 closest = 0; 5689 if( eMode==BTALLOC_LE ){ 5690 for(i=0; i<k; i++){ 5691 iPage = get4byte(&aData[8+i*4]); 5692 if( iPage<=nearby ){ 5693 closest = i; 5694 break; 5695 } 5696 } 5697 }else{ 5698 int dist; 5699 dist = sqlite3AbsInt32(get4byte(&aData[8]) - nearby); 5700 for(i=1; i<k; i++){ 5701 int d2 = sqlite3AbsInt32(get4byte(&aData[8+i*4]) - nearby); 5702 if( d2<dist ){ 5703 closest = i; 5704 dist = d2; 5705 } 5706 } 5707 } 5708 }else{ 5709 closest = 0; 5710 } 5711 5712 iPage = get4byte(&aData[8+closest*4]); 5713 testcase( iPage==mxPage ); 5714 if( iPage>mxPage ){ 5715 rc = SQLITE_CORRUPT_BKPT; 5716 goto end_allocate_page; 5717 } 5718 testcase( iPage==mxPage ); 5719 if( !searchList 5720 || (iPage==nearby || (iPage<nearby && eMode==BTALLOC_LE)) 5721 ){ 5722 int noContent; 5723 *pPgno = iPage; 5724 TRACE(("ALLOCATE: %d was leaf %d of %d on trunk %d" 5725 ": %d more free pages\n", 5726 *pPgno, closest+1, k, pTrunk->pgno, n-1)); 5727 rc = sqlite3PagerWrite(pTrunk->pDbPage); 5728 if( rc ) goto end_allocate_page; 5729 if( closest<k-1 ){ 5730 memcpy(&aData[8+closest*4], &aData[4+k*4], 4); 5731 } 5732 put4byte(&aData[4], k-1); 5733 noContent = !btreeGetHasContent(pBt, *pPgno)? PAGER_GET_NOCONTENT : 0; 5734 rc = btreeGetUnusedPage(pBt, *pPgno, ppPage, noContent); 5735 if( rc==SQLITE_OK ){ 5736 rc = sqlite3PagerWrite((*ppPage)->pDbPage); 5737 if( rc!=SQLITE_OK ){ 5738 releasePage(*ppPage); 5739 *ppPage = 0; 5740 } 5741 } 5742 searchList = 0; 5743 } 5744 } 5745 releasePage(pPrevTrunk); 5746 pPrevTrunk = 0; 5747 }while( searchList ); 5748 }else{ 5749 /* There are no pages on the freelist, so append a new page to the 5750 ** database image. 5751 ** 5752 ** Normally, new pages allocated by this block can be requested from the 5753 ** pager layer with the 'no-content' flag set. This prevents the pager 5754 ** from trying to read the pages content from disk. However, if the 5755 ** current transaction has already run one or more incremental-vacuum 5756 ** steps, then the page we are about to allocate may contain content 5757 ** that is required in the event of a rollback. In this case, do 5758 ** not set the no-content flag. This causes the pager to load and journal 5759 ** the current page content before overwriting it. 5760 ** 5761 ** Note that the pager will not actually attempt to load or journal 5762 ** content for any page that really does lie past the end of the database 5763 ** file on disk. So the effects of disabling the no-content optimization 5764 ** here are confined to those pages that lie between the end of the 5765 ** database image and the end of the database file. 5766 */ 5767 int bNoContent = (0==IfNotOmitAV(pBt->bDoTruncate))? PAGER_GET_NOCONTENT:0; 5768 5769 rc = sqlite3PagerWrite(pBt->pPage1->pDbPage); 5770 if( rc ) return rc; 5771 pBt->nPage++; 5772 if( pBt->nPage==PENDING_BYTE_PAGE(pBt) ) pBt->nPage++; 5773 5774 #ifndef SQLITE_OMIT_AUTOVACUUM 5775 if( pBt->autoVacuum && PTRMAP_ISPAGE(pBt, pBt->nPage) ){ 5776 /* If *pPgno refers to a pointer-map page, allocate two new pages 5777 ** at the end of the file instead of one. The first allocated page 5778 ** becomes a new pointer-map page, the second is used by the caller. 5779 */ 5780 MemPage *pPg = 0; 5781 TRACE(("ALLOCATE: %d from end of file (pointer-map page)\n", pBt->nPage)); 5782 assert( pBt->nPage!=PENDING_BYTE_PAGE(pBt) ); 5783 rc = btreeGetUnusedPage(pBt, pBt->nPage, &pPg, bNoContent); 5784 if( rc==SQLITE_OK ){ 5785 rc = sqlite3PagerWrite(pPg->pDbPage); 5786 releasePage(pPg); 5787 } 5788 if( rc ) return rc; 5789 pBt->nPage++; 5790 if( pBt->nPage==PENDING_BYTE_PAGE(pBt) ){ pBt->nPage++; } 5791 } 5792 #endif 5793 put4byte(28 + (u8*)pBt->pPage1->aData, pBt->nPage); 5794 *pPgno = pBt->nPage; 5795 5796 assert( *pPgno!=PENDING_BYTE_PAGE(pBt) ); 5797 rc = btreeGetUnusedPage(pBt, *pPgno, ppPage, bNoContent); 5798 if( rc ) return rc; 5799 rc = sqlite3PagerWrite((*ppPage)->pDbPage); 5800 if( rc!=SQLITE_OK ){ 5801 releasePage(*ppPage); 5802 *ppPage = 0; 5803 } 5804 TRACE(("ALLOCATE: %d from end of file\n", *pPgno)); 5805 } 5806 5807 assert( *pPgno!=PENDING_BYTE_PAGE(pBt) ); 5808 5809 end_allocate_page: 5810 releasePage(pTrunk); 5811 releasePage(pPrevTrunk); 5812 assert( rc!=SQLITE_OK || sqlite3PagerPageRefcount((*ppPage)->pDbPage)<=1 ); 5813 assert( rc!=SQLITE_OK || (*ppPage)->isInit==0 ); 5814 return rc; 5815 } 5816 5817 /* 5818 ** This function is used to add page iPage to the database file free-list. 5819 ** It is assumed that the page is not already a part of the free-list. 5820 ** 5821 ** The value passed as the second argument to this function is optional. 5822 ** If the caller happens to have a pointer to the MemPage object 5823 ** corresponding to page iPage handy, it may pass it as the second value. 5824 ** Otherwise, it may pass NULL. 5825 ** 5826 ** If a pointer to a MemPage object is passed as the second argument, 5827 ** its reference count is not altered by this function. 5828 */ 5829 static int freePage2(BtShared *pBt, MemPage *pMemPage, Pgno iPage){ 5830 MemPage *pTrunk = 0; /* Free-list trunk page */ 5831 Pgno iTrunk = 0; /* Page number of free-list trunk page */ 5832 MemPage *pPage1 = pBt->pPage1; /* Local reference to page 1 */ 5833 MemPage *pPage; /* Page being freed. May be NULL. */ 5834 int rc; /* Return Code */ 5835 int nFree; /* Initial number of pages on free-list */ 5836 5837 assert( sqlite3_mutex_held(pBt->mutex) ); 5838 assert( CORRUPT_DB || iPage>1 ); 5839 assert( !pMemPage || pMemPage->pgno==iPage ); 5840 5841 if( iPage<2 ) return SQLITE_CORRUPT_BKPT; 5842 if( pMemPage ){ 5843 pPage = pMemPage; 5844 sqlite3PagerRef(pPage->pDbPage); 5845 }else{ 5846 pPage = btreePageLookup(pBt, iPage); 5847 } 5848 5849 /* Increment the free page count on pPage1 */ 5850 rc = sqlite3PagerWrite(pPage1->pDbPage); 5851 if( rc ) goto freepage_out; 5852 nFree = get4byte(&pPage1->aData[36]); 5853 put4byte(&pPage1->aData[36], nFree+1); 5854 5855 if( pBt->btsFlags & BTS_SECURE_DELETE ){ 5856 /* If the secure_delete option is enabled, then 5857 ** always fully overwrite deleted information with zeros. 5858 */ 5859 if( (!pPage && ((rc = btreeGetPage(pBt, iPage, &pPage, 0))!=0) ) 5860 || ((rc = sqlite3PagerWrite(pPage->pDbPage))!=0) 5861 ){ 5862 goto freepage_out; 5863 } 5864 memset(pPage->aData, 0, pPage->pBt->pageSize); 5865 } 5866 5867 /* If the database supports auto-vacuum, write an entry in the pointer-map 5868 ** to indicate that the page is free. 5869 */ 5870 if( ISAUTOVACUUM ){ 5871 ptrmapPut(pBt, iPage, PTRMAP_FREEPAGE, 0, &rc); 5872 if( rc ) goto freepage_out; 5873 } 5874 5875 /* Now manipulate the actual database free-list structure. There are two 5876 ** possibilities. If the free-list is currently empty, or if the first 5877 ** trunk page in the free-list is full, then this page will become a 5878 ** new free-list trunk page. Otherwise, it will become a leaf of the 5879 ** first trunk page in the current free-list. This block tests if it 5880 ** is possible to add the page as a new free-list leaf. 5881 */ 5882 if( nFree!=0 ){ 5883 u32 nLeaf; /* Initial number of leaf cells on trunk page */ 5884 5885 iTrunk = get4byte(&pPage1->aData[32]); 5886 rc = btreeGetPage(pBt, iTrunk, &pTrunk, 0); 5887 if( rc!=SQLITE_OK ){ 5888 goto freepage_out; 5889 } 5890 5891 nLeaf = get4byte(&pTrunk->aData[4]); 5892 assert( pBt->usableSize>32 ); 5893 if( nLeaf > (u32)pBt->usableSize/4 - 2 ){ 5894 rc = SQLITE_CORRUPT_BKPT; 5895 goto freepage_out; 5896 } 5897 if( nLeaf < (u32)pBt->usableSize/4 - 8 ){ 5898 /* In this case there is room on the trunk page to insert the page 5899 ** being freed as a new leaf. 5900 ** 5901 ** Note that the trunk page is not really full until it contains 5902 ** usableSize/4 - 2 entries, not usableSize/4 - 8 entries as we have 5903 ** coded. But due to a coding error in versions of SQLite prior to 5904 ** 3.6.0, databases with freelist trunk pages holding more than 5905 ** usableSize/4 - 8 entries will be reported as corrupt. In order 5906 ** to maintain backwards compatibility with older versions of SQLite, 5907 ** we will continue to restrict the number of entries to usableSize/4 - 8 5908 ** for now. At some point in the future (once everyone has upgraded 5909 ** to 3.6.0 or later) we should consider fixing the conditional above 5910 ** to read "usableSize/4-2" instead of "usableSize/4-8". 5911 ** 5912 ** EVIDENCE-OF: R-19920-11576 However, newer versions of SQLite still 5913 ** avoid using the last six entries in the freelist trunk page array in 5914 ** order that database files created by newer versions of SQLite can be 5915 ** read by older versions of SQLite. 5916 */ 5917 rc = sqlite3PagerWrite(pTrunk->pDbPage); 5918 if( rc==SQLITE_OK ){ 5919 put4byte(&pTrunk->aData[4], nLeaf+1); 5920 put4byte(&pTrunk->aData[8+nLeaf*4], iPage); 5921 if( pPage && (pBt->btsFlags & BTS_SECURE_DELETE)==0 ){ 5922 sqlite3PagerDontWrite(pPage->pDbPage); 5923 } 5924 rc = btreeSetHasContent(pBt, iPage); 5925 } 5926 TRACE(("FREE-PAGE: %d leaf on trunk page %d\n",pPage->pgno,pTrunk->pgno)); 5927 goto freepage_out; 5928 } 5929 } 5930 5931 /* If control flows to this point, then it was not possible to add the 5932 ** the page being freed as a leaf page of the first trunk in the free-list. 5933 ** Possibly because the free-list is empty, or possibly because the 5934 ** first trunk in the free-list is full. Either way, the page being freed 5935 ** will become the new first trunk page in the free-list. 5936 */ 5937 if( pPage==0 && SQLITE_OK!=(rc = btreeGetPage(pBt, iPage, &pPage, 0)) ){ 5938 goto freepage_out; 5939 } 5940 rc = sqlite3PagerWrite(pPage->pDbPage); 5941 if( rc!=SQLITE_OK ){ 5942 goto freepage_out; 5943 } 5944 put4byte(pPage->aData, iTrunk); 5945 put4byte(&pPage->aData[4], 0); 5946 put4byte(&pPage1->aData[32], iPage); 5947 TRACE(("FREE-PAGE: %d new trunk page replacing %d\n", pPage->pgno, iTrunk)); 5948 5949 freepage_out: 5950 if( pPage ){ 5951 pPage->isInit = 0; 5952 } 5953 releasePage(pPage); 5954 releasePage(pTrunk); 5955 return rc; 5956 } 5957 static void freePage(MemPage *pPage, int *pRC){ 5958 if( (*pRC)==SQLITE_OK ){ 5959 *pRC = freePage2(pPage->pBt, pPage, pPage->pgno); 5960 } 5961 } 5962 5963 /* 5964 ** Free any overflow pages associated with the given Cell. Write the 5965 ** local Cell size (the number of bytes on the original page, omitting 5966 ** overflow) into *pnSize. 5967 */ 5968 static int clearCell( 5969 MemPage *pPage, /* The page that contains the Cell */ 5970 unsigned char *pCell, /* First byte of the Cell */ 5971 u16 *pnSize /* Write the size of the Cell here */ 5972 ){ 5973 BtShared *pBt = pPage->pBt; 5974 CellInfo info; 5975 Pgno ovflPgno; 5976 int rc; 5977 int nOvfl; 5978 u32 ovflPageSize; 5979 5980 assert( sqlite3_mutex_held(pPage->pBt->mutex) ); 5981 pPage->xParseCell(pPage, pCell, &info); 5982 *pnSize = info.nSize; 5983 if( info.iOverflow==0 ){ 5984 return SQLITE_OK; /* No overflow pages. Return without doing anything */ 5985 } 5986 if( pCell+info.iOverflow+3 > pPage->aData+pPage->maskPage ){ 5987 return SQLITE_CORRUPT_BKPT; /* Cell extends past end of page */ 5988 } 5989 ovflPgno = get4byte(&pCell[info.iOverflow]); 5990 assert( pBt->usableSize > 4 ); 5991 ovflPageSize = pBt->usableSize - 4; 5992 nOvfl = (info.nPayload - info.nLocal + ovflPageSize - 1)/ovflPageSize; 5993 assert( nOvfl>0 || 5994 (CORRUPT_DB && (info.nPayload + ovflPageSize)<ovflPageSize) 5995 ); 5996 while( nOvfl-- ){ 5997 Pgno iNext = 0; 5998 MemPage *pOvfl = 0; 5999 if( ovflPgno<2 || ovflPgno>btreePagecount(pBt) ){ 6000 /* 0 is not a legal page number and page 1 cannot be an 6001 ** overflow page. Therefore if ovflPgno<2 or past the end of the 6002 ** file the database must be corrupt. */ 6003 return SQLITE_CORRUPT_BKPT; 6004 } 6005 if( nOvfl ){ 6006 rc = getOverflowPage(pBt, ovflPgno, &pOvfl, &iNext); 6007 if( rc ) return rc; 6008 } 6009 6010 if( ( pOvfl || ((pOvfl = btreePageLookup(pBt, ovflPgno))!=0) ) 6011 && sqlite3PagerPageRefcount(pOvfl->pDbPage)!=1 6012 ){ 6013 /* There is no reason any cursor should have an outstanding reference 6014 ** to an overflow page belonging to a cell that is being deleted/updated. 6015 ** So if there exists more than one reference to this page, then it 6016 ** must not really be an overflow page and the database must be corrupt. 6017 ** It is helpful to detect this before calling freePage2(), as 6018 ** freePage2() may zero the page contents if secure-delete mode is 6019 ** enabled. If this 'overflow' page happens to be a page that the 6020 ** caller is iterating through or using in some other way, this 6021 ** can be problematic. 6022 */ 6023 rc = SQLITE_CORRUPT_BKPT; 6024 }else{ 6025 rc = freePage2(pBt, pOvfl, ovflPgno); 6026 } 6027 6028 if( pOvfl ){ 6029 sqlite3PagerUnref(pOvfl->pDbPage); 6030 } 6031 if( rc ) return rc; 6032 ovflPgno = iNext; 6033 } 6034 return SQLITE_OK; 6035 } 6036 6037 /* 6038 ** Create the byte sequence used to represent a cell on page pPage 6039 ** and write that byte sequence into pCell[]. Overflow pages are 6040 ** allocated and filled in as necessary. The calling procedure 6041 ** is responsible for making sure sufficient space has been allocated 6042 ** for pCell[]. 6043 ** 6044 ** Note that pCell does not necessary need to point to the pPage->aData 6045 ** area. pCell might point to some temporary storage. The cell will 6046 ** be constructed in this temporary area then copied into pPage->aData 6047 ** later. 6048 */ 6049 static int fillInCell( 6050 MemPage *pPage, /* The page that contains the cell */ 6051 unsigned char *pCell, /* Complete text of the cell */ 6052 const void *pKey, i64 nKey, /* The key */ 6053 const void *pData,int nData, /* The data */ 6054 int nZero, /* Extra zero bytes to append to pData */ 6055 int *pnSize /* Write cell size here */ 6056 ){ 6057 int nPayload; 6058 const u8 *pSrc; 6059 int nSrc, n, rc; 6060 int spaceLeft; 6061 MemPage *pOvfl = 0; 6062 MemPage *pToRelease = 0; 6063 unsigned char *pPrior; 6064 unsigned char *pPayload; 6065 BtShared *pBt = pPage->pBt; 6066 Pgno pgnoOvfl = 0; 6067 int nHeader; 6068 6069 assert( sqlite3_mutex_held(pPage->pBt->mutex) ); 6070 6071 /* pPage is not necessarily writeable since pCell might be auxiliary 6072 ** buffer space that is separate from the pPage buffer area */ 6073 assert( pCell<pPage->aData || pCell>=&pPage->aData[pBt->pageSize] 6074 || sqlite3PagerIswriteable(pPage->pDbPage) ); 6075 6076 /* Fill in the header. */ 6077 nHeader = pPage->childPtrSize; 6078 nPayload = nData + nZero; 6079 if( pPage->intKeyLeaf ){ 6080 nHeader += putVarint32(&pCell[nHeader], nPayload); 6081 }else{ 6082 assert( nData==0 ); 6083 assert( nZero==0 ); 6084 } 6085 nHeader += putVarint(&pCell[nHeader], *(u64*)&nKey); 6086 6087 /* Fill in the payload size */ 6088 if( pPage->intKey ){ 6089 pSrc = pData; 6090 nSrc = nData; 6091 nData = 0; 6092 }else{ 6093 assert( nKey<=0x7fffffff && pKey!=0 ); 6094 nPayload = (int)nKey; 6095 pSrc = pKey; 6096 nSrc = (int)nKey; 6097 } 6098 if( nPayload<=pPage->maxLocal ){ 6099 n = nHeader + nPayload; 6100 testcase( n==3 ); 6101 testcase( n==4 ); 6102 if( n<4 ) n = 4; 6103 *pnSize = n; 6104 spaceLeft = nPayload; 6105 pPrior = pCell; 6106 }else{ 6107 int mn = pPage->minLocal; 6108 n = mn + (nPayload - mn) % (pPage->pBt->usableSize - 4); 6109 testcase( n==pPage->maxLocal ); 6110 testcase( n==pPage->maxLocal+1 ); 6111 if( n > pPage->maxLocal ) n = mn; 6112 spaceLeft = n; 6113 *pnSize = n + nHeader + 4; 6114 pPrior = &pCell[nHeader+n]; 6115 } 6116 pPayload = &pCell[nHeader]; 6117 6118 /* At this point variables should be set as follows: 6119 ** 6120 ** nPayload Total payload size in bytes 6121 ** pPayload Begin writing payload here 6122 ** spaceLeft Space available at pPayload. If nPayload>spaceLeft, 6123 ** that means content must spill into overflow pages. 6124 ** *pnSize Size of the local cell (not counting overflow pages) 6125 ** pPrior Where to write the pgno of the first overflow page 6126 ** 6127 ** Use a call to btreeParseCellPtr() to verify that the values above 6128 ** were computed correctly. 6129 */ 6130 #if SQLITE_DEBUG 6131 { 6132 CellInfo info; 6133 pPage->xParseCell(pPage, pCell, &info); 6134 assert( nHeader=(int)(info.pPayload - pCell) ); 6135 assert( info.nKey==nKey ); 6136 assert( *pnSize == info.nSize ); 6137 assert( spaceLeft == info.nLocal ); 6138 assert( pPrior == &pCell[info.iOverflow] ); 6139 } 6140 #endif 6141 6142 /* Write the payload into the local Cell and any extra into overflow pages */ 6143 while( nPayload>0 ){ 6144 if( spaceLeft==0 ){ 6145 #ifndef SQLITE_OMIT_AUTOVACUUM 6146 Pgno pgnoPtrmap = pgnoOvfl; /* Overflow page pointer-map entry page */ 6147 if( pBt->autoVacuum ){ 6148 do{ 6149 pgnoOvfl++; 6150 } while( 6151 PTRMAP_ISPAGE(pBt, pgnoOvfl) || pgnoOvfl==PENDING_BYTE_PAGE(pBt) 6152 ); 6153 } 6154 #endif 6155 rc = allocateBtreePage(pBt, &pOvfl, &pgnoOvfl, pgnoOvfl, 0); 6156 #ifndef SQLITE_OMIT_AUTOVACUUM 6157 /* If the database supports auto-vacuum, and the second or subsequent 6158 ** overflow page is being allocated, add an entry to the pointer-map 6159 ** for that page now. 6160 ** 6161 ** If this is the first overflow page, then write a partial entry 6162 ** to the pointer-map. If we write nothing to this pointer-map slot, 6163 ** then the optimistic overflow chain processing in clearCell() 6164 ** may misinterpret the uninitialized values and delete the 6165 ** wrong pages from the database. 6166 */ 6167 if( pBt->autoVacuum && rc==SQLITE_OK ){ 6168 u8 eType = (pgnoPtrmap?PTRMAP_OVERFLOW2:PTRMAP_OVERFLOW1); 6169 ptrmapPut(pBt, pgnoOvfl, eType, pgnoPtrmap, &rc); 6170 if( rc ){ 6171 releasePage(pOvfl); 6172 } 6173 } 6174 #endif 6175 if( rc ){ 6176 releasePage(pToRelease); 6177 return rc; 6178 } 6179 6180 /* If pToRelease is not zero than pPrior points into the data area 6181 ** of pToRelease. Make sure pToRelease is still writeable. */ 6182 assert( pToRelease==0 || sqlite3PagerIswriteable(pToRelease->pDbPage) ); 6183 6184 /* If pPrior is part of the data area of pPage, then make sure pPage 6185 ** is still writeable */ 6186 assert( pPrior<pPage->aData || pPrior>=&pPage->aData[pBt->pageSize] 6187 || sqlite3PagerIswriteable(pPage->pDbPage) ); 6188 6189 put4byte(pPrior, pgnoOvfl); 6190 releasePage(pToRelease); 6191 pToRelease = pOvfl; 6192 pPrior = pOvfl->aData; 6193 put4byte(pPrior, 0); 6194 pPayload = &pOvfl->aData[4]; 6195 spaceLeft = pBt->usableSize - 4; 6196 } 6197 n = nPayload; 6198 if( n>spaceLeft ) n = spaceLeft; 6199 6200 /* If pToRelease is not zero than pPayload points into the data area 6201 ** of pToRelease. Make sure pToRelease is still writeable. */ 6202 assert( pToRelease==0 || sqlite3PagerIswriteable(pToRelease->pDbPage) ); 6203 6204 /* If pPayload is part of the data area of pPage, then make sure pPage 6205 ** is still writeable */ 6206 assert( pPayload<pPage->aData || pPayload>=&pPage->aData[pBt->pageSize] 6207 || sqlite3PagerIswriteable(pPage->pDbPage) ); 6208 6209 if( nSrc>0 ){ 6210 if( n>nSrc ) n = nSrc; 6211 assert( pSrc ); 6212 memcpy(pPayload, pSrc, n); 6213 }else{ 6214 memset(pPayload, 0, n); 6215 } 6216 nPayload -= n; 6217 pPayload += n; 6218 pSrc += n; 6219 nSrc -= n; 6220 spaceLeft -= n; 6221 if( nSrc==0 ){ 6222 nSrc = nData; 6223 pSrc = pData; 6224 } 6225 } 6226 releasePage(pToRelease); 6227 return SQLITE_OK; 6228 } 6229 6230 /* 6231 ** Remove the i-th cell from pPage. This routine effects pPage only. 6232 ** The cell content is not freed or deallocated. It is assumed that 6233 ** the cell content has been copied someplace else. This routine just 6234 ** removes the reference to the cell from pPage. 6235 ** 6236 ** "sz" must be the number of bytes in the cell. 6237 */ 6238 static void dropCell(MemPage *pPage, int idx, int sz, int *pRC){ 6239 u32 pc; /* Offset to cell content of cell being deleted */ 6240 u8 *data; /* pPage->aData */ 6241 u8 *ptr; /* Used to move bytes around within data[] */ 6242 int rc; /* The return code */ 6243 int hdr; /* Beginning of the header. 0 most pages. 100 page 1 */ 6244 6245 if( *pRC ) return; 6246 6247 assert( idx>=0 && idx<pPage->nCell ); 6248 assert( CORRUPT_DB || sz==cellSize(pPage, idx) ); 6249 assert( sqlite3PagerIswriteable(pPage->pDbPage) ); 6250 assert( sqlite3_mutex_held(pPage->pBt->mutex) ); 6251 data = pPage->aData; 6252 ptr = &pPage->aCellIdx[2*idx]; 6253 pc = get2byte(ptr); 6254 hdr = pPage->hdrOffset; 6255 testcase( pc==get2byte(&data[hdr+5]) ); 6256 testcase( pc+sz==pPage->pBt->usableSize ); 6257 if( pc < (u32)get2byte(&data[hdr+5]) || pc+sz > pPage->pBt->usableSize ){ 6258 *pRC = SQLITE_CORRUPT_BKPT; 6259 return; 6260 } 6261 rc = freeSpace(pPage, pc, sz); 6262 if( rc ){ 6263 *pRC = rc; 6264 return; 6265 } 6266 pPage->nCell--; 6267 if( pPage->nCell==0 ){ 6268 memset(&data[hdr+1], 0, 4); 6269 data[hdr+7] = 0; 6270 put2byte(&data[hdr+5], pPage->pBt->usableSize); 6271 pPage->nFree = pPage->pBt->usableSize - pPage->hdrOffset 6272 - pPage->childPtrSize - 8; 6273 }else{ 6274 memmove(ptr, ptr+2, 2*(pPage->nCell - idx)); 6275 put2byte(&data[hdr+3], pPage->nCell); 6276 pPage->nFree += 2; 6277 } 6278 } 6279 6280 /* 6281 ** Insert a new cell on pPage at cell index "i". pCell points to the 6282 ** content of the cell. 6283 ** 6284 ** If the cell content will fit on the page, then put it there. If it 6285 ** will not fit, then make a copy of the cell content into pTemp if 6286 ** pTemp is not null. Regardless of pTemp, allocate a new entry 6287 ** in pPage->apOvfl[] and make it point to the cell content (either 6288 ** in pTemp or the original pCell) and also record its index. 6289 ** Allocating a new entry in pPage->aCell[] implies that 6290 ** pPage->nOverflow is incremented. 6291 */ 6292 static void insertCell( 6293 MemPage *pPage, /* Page into which we are copying */ 6294 int i, /* New cell becomes the i-th cell of the page */ 6295 u8 *pCell, /* Content of the new cell */ 6296 int sz, /* Bytes of content in pCell */ 6297 u8 *pTemp, /* Temp storage space for pCell, if needed */ 6298 Pgno iChild, /* If non-zero, replace first 4 bytes with this value */ 6299 int *pRC /* Read and write return code from here */ 6300 ){ 6301 int idx = 0; /* Where to write new cell content in data[] */ 6302 int j; /* Loop counter */ 6303 u8 *data; /* The content of the whole page */ 6304 u8 *pIns; /* The point in pPage->aCellIdx[] where no cell inserted */ 6305 6306 if( *pRC ) return; 6307 6308 assert( i>=0 && i<=pPage->nCell+pPage->nOverflow ); 6309 assert( MX_CELL(pPage->pBt)<=10921 ); 6310 assert( pPage->nCell<=MX_CELL(pPage->pBt) || CORRUPT_DB ); 6311 assert( pPage->nOverflow<=ArraySize(pPage->apOvfl) ); 6312 assert( ArraySize(pPage->apOvfl)==ArraySize(pPage->aiOvfl) ); 6313 assert( sqlite3_mutex_held(pPage->pBt->mutex) ); 6314 /* The cell should normally be sized correctly. However, when moving a 6315 ** malformed cell from a leaf page to an interior page, if the cell size 6316 ** wanted to be less than 4 but got rounded up to 4 on the leaf, then size 6317 ** might be less than 8 (leaf-size + pointer) on the interior node. Hence 6318 ** the term after the || in the following assert(). */ 6319 assert( sz==pPage->xCellSize(pPage, pCell) || (sz==8 && iChild>0) ); 6320 if( pPage->nOverflow || sz+2>pPage->nFree ){ 6321 if( pTemp ){ 6322 memcpy(pTemp, pCell, sz); 6323 pCell = pTemp; 6324 } 6325 if( iChild ){ 6326 put4byte(pCell, iChild); 6327 } 6328 j = pPage->nOverflow++; 6329 assert( j<(int)(sizeof(pPage->apOvfl)/sizeof(pPage->apOvfl[0])) ); 6330 pPage->apOvfl[j] = pCell; 6331 pPage->aiOvfl[j] = (u16)i; 6332 6333 /* When multiple overflows occur, they are always sequential and in 6334 ** sorted order. This invariants arise because multiple overflows can 6335 ** only occur when inserting divider cells into the parent page during 6336 ** balancing, and the dividers are adjacent and sorted. 6337 */ 6338 assert( j==0 || pPage->aiOvfl[j-1]<(u16)i ); /* Overflows in sorted order */ 6339 assert( j==0 || i==pPage->aiOvfl[j-1]+1 ); /* Overflows are sequential */ 6340 }else{ 6341 int rc = sqlite3PagerWrite(pPage->pDbPage); 6342 if( rc!=SQLITE_OK ){ 6343 *pRC = rc; 6344 return; 6345 } 6346 assert( sqlite3PagerIswriteable(pPage->pDbPage) ); 6347 data = pPage->aData; 6348 assert( &data[pPage->cellOffset]==pPage->aCellIdx ); 6349 rc = allocateSpace(pPage, sz, &idx); 6350 if( rc ){ *pRC = rc; return; } 6351 /* The allocateSpace() routine guarantees the following properties 6352 ** if it returns successfully */ 6353 assert( idx >= 0 ); 6354 assert( idx >= pPage->cellOffset+2*pPage->nCell+2 || CORRUPT_DB ); 6355 assert( idx+sz <= (int)pPage->pBt->usableSize ); 6356 pPage->nFree -= (u16)(2 + sz); 6357 memcpy(&data[idx], pCell, sz); 6358 if( iChild ){ 6359 put4byte(&data[idx], iChild); 6360 } 6361 pIns = pPage->aCellIdx + i*2; 6362 memmove(pIns+2, pIns, 2*(pPage->nCell - i)); 6363 put2byte(pIns, idx); 6364 pPage->nCell++; 6365 /* increment the cell count */ 6366 if( (++data[pPage->hdrOffset+4])==0 ) data[pPage->hdrOffset+3]++; 6367 assert( get2byte(&data[pPage->hdrOffset+3])==pPage->nCell ); 6368 #ifndef SQLITE_OMIT_AUTOVACUUM 6369 if( pPage->pBt->autoVacuum ){ 6370 /* The cell may contain a pointer to an overflow page. If so, write 6371 ** the entry for the overflow page into the pointer map. 6372 */ 6373 ptrmapPutOvflPtr(pPage, pCell, pRC); 6374 } 6375 #endif 6376 } 6377 } 6378 6379 /* 6380 ** A CellArray object contains a cache of pointers and sizes for a 6381 ** consecutive sequence of cells that might be held multiple pages. 6382 */ 6383 typedef struct CellArray CellArray; 6384 struct CellArray { 6385 int nCell; /* Number of cells in apCell[] */ 6386 MemPage *pRef; /* Reference page */ 6387 u8 **apCell; /* All cells begin balanced */ 6388 u16 *szCell; /* Local size of all cells in apCell[] */ 6389 }; 6390 6391 /* 6392 ** Make sure the cell sizes at idx, idx+1, ..., idx+N-1 have been 6393 ** computed. 6394 */ 6395 static void populateCellCache(CellArray *p, int idx, int N){ 6396 assert( idx>=0 && idx+N<=p->nCell ); 6397 while( N>0 ){ 6398 assert( p->apCell[idx]!=0 ); 6399 if( p->szCell[idx]==0 ){ 6400 p->szCell[idx] = p->pRef->xCellSize(p->pRef, p->apCell[idx]); 6401 }else{ 6402 assert( CORRUPT_DB || 6403 p->szCell[idx]==p->pRef->xCellSize(p->pRef, p->apCell[idx]) ); 6404 } 6405 idx++; 6406 N--; 6407 } 6408 } 6409 6410 /* 6411 ** Return the size of the Nth element of the cell array 6412 */ 6413 static SQLITE_NOINLINE u16 computeCellSize(CellArray *p, int N){ 6414 assert( N>=0 && N<p->nCell ); 6415 assert( p->szCell[N]==0 ); 6416 p->szCell[N] = p->pRef->xCellSize(p->pRef, p->apCell[N]); 6417 return p->szCell[N]; 6418 } 6419 static u16 cachedCellSize(CellArray *p, int N){ 6420 assert( N>=0 && N<p->nCell ); 6421 if( p->szCell[N] ) return p->szCell[N]; 6422 return computeCellSize(p, N); 6423 } 6424 6425 /* 6426 ** Array apCell[] contains pointers to nCell b-tree page cells. The 6427 ** szCell[] array contains the size in bytes of each cell. This function 6428 ** replaces the current contents of page pPg with the contents of the cell 6429 ** array. 6430 ** 6431 ** Some of the cells in apCell[] may currently be stored in pPg. This 6432 ** function works around problems caused by this by making a copy of any 6433 ** such cells before overwriting the page data. 6434 ** 6435 ** The MemPage.nFree field is invalidated by this function. It is the 6436 ** responsibility of the caller to set it correctly. 6437 */ 6438 static int rebuildPage( 6439 MemPage *pPg, /* Edit this page */ 6440 int nCell, /* Final number of cells on page */ 6441 u8 **apCell, /* Array of cells */ 6442 u16 *szCell /* Array of cell sizes */ 6443 ){ 6444 const int hdr = pPg->hdrOffset; /* Offset of header on pPg */ 6445 u8 * const aData = pPg->aData; /* Pointer to data for pPg */ 6446 const int usableSize = pPg->pBt->usableSize; 6447 u8 * const pEnd = &aData[usableSize]; 6448 int i; 6449 u8 *pCellptr = pPg->aCellIdx; 6450 u8 *pTmp = sqlite3PagerTempSpace(pPg->pBt->pPager); 6451 u8 *pData; 6452 6453 i = get2byte(&aData[hdr+5]); 6454 memcpy(&pTmp[i], &aData[i], usableSize - i); 6455 6456 pData = pEnd; 6457 for(i=0; i<nCell; i++){ 6458 u8 *pCell = apCell[i]; 6459 if( pCell>aData && pCell<pEnd ){ 6460 pCell = &pTmp[pCell - aData]; 6461 } 6462 pData -= szCell[i]; 6463 put2byte(pCellptr, (pData - aData)); 6464 pCellptr += 2; 6465 if( pData < pCellptr ) return SQLITE_CORRUPT_BKPT; 6466 memcpy(pData, pCell, szCell[i]); 6467 assert( szCell[i]==pPg->xCellSize(pPg, pCell) || CORRUPT_DB ); 6468 testcase( szCell[i]!=pPg->xCellSize(pPg,pCell) ); 6469 } 6470 6471 /* The pPg->nFree field is now set incorrectly. The caller will fix it. */ 6472 pPg->nCell = nCell; 6473 pPg->nOverflow = 0; 6474 6475 put2byte(&aData[hdr+1], 0); 6476 put2byte(&aData[hdr+3], pPg->nCell); 6477 put2byte(&aData[hdr+5], pData - aData); 6478 aData[hdr+7] = 0x00; 6479 return SQLITE_OK; 6480 } 6481 6482 /* 6483 ** Array apCell[] contains nCell pointers to b-tree cells. Array szCell 6484 ** contains the size in bytes of each such cell. This function attempts to 6485 ** add the cells stored in the array to page pPg. If it cannot (because 6486 ** the page needs to be defragmented before the cells will fit), non-zero 6487 ** is returned. Otherwise, if the cells are added successfully, zero is 6488 ** returned. 6489 ** 6490 ** Argument pCellptr points to the first entry in the cell-pointer array 6491 ** (part of page pPg) to populate. After cell apCell[0] is written to the 6492 ** page body, a 16-bit offset is written to pCellptr. And so on, for each 6493 ** cell in the array. It is the responsibility of the caller to ensure 6494 ** that it is safe to overwrite this part of the cell-pointer array. 6495 ** 6496 ** When this function is called, *ppData points to the start of the 6497 ** content area on page pPg. If the size of the content area is extended, 6498 ** *ppData is updated to point to the new start of the content area 6499 ** before returning. 6500 ** 6501 ** Finally, argument pBegin points to the byte immediately following the 6502 ** end of the space required by this page for the cell-pointer area (for 6503 ** all cells - not just those inserted by the current call). If the content 6504 ** area must be extended to before this point in order to accomodate all 6505 ** cells in apCell[], then the cells do not fit and non-zero is returned. 6506 */ 6507 static int pageInsertArray( 6508 MemPage *pPg, /* Page to add cells to */ 6509 u8 *pBegin, /* End of cell-pointer array */ 6510 u8 **ppData, /* IN/OUT: Page content -area pointer */ 6511 u8 *pCellptr, /* Pointer to cell-pointer area */ 6512 int iFirst, /* Index of first cell to add */ 6513 int nCell, /* Number of cells to add to pPg */ 6514 CellArray *pCArray /* Array of cells */ 6515 ){ 6516 int i; 6517 u8 *aData = pPg->aData; 6518 u8 *pData = *ppData; 6519 int iEnd = iFirst + nCell; 6520 assert( CORRUPT_DB || pPg->hdrOffset==0 ); /* Never called on page 1 */ 6521 for(i=iFirst; i<iEnd; i++){ 6522 int sz, rc; 6523 u8 *pSlot; 6524 sz = cachedCellSize(pCArray, i); 6525 if( (aData[1]==0 && aData[2]==0) || (pSlot = pageFindSlot(pPg,sz,&rc))==0 ){ 6526 pData -= sz; 6527 if( pData<pBegin ) return 1; 6528 pSlot = pData; 6529 } 6530 /* pSlot and pCArray->apCell[i] will never overlap on a well-formed 6531 ** database. But they might for a corrupt database. Hence use memmove() 6532 ** since memcpy() sends SIGABORT with overlapping buffers on OpenBSD */ 6533 assert( (pSlot+sz)<=pCArray->apCell[i] 6534 || pSlot>=(pCArray->apCell[i]+sz) 6535 || CORRUPT_DB ); 6536 memmove(pSlot, pCArray->apCell[i], sz); 6537 put2byte(pCellptr, (pSlot - aData)); 6538 pCellptr += 2; 6539 } 6540 *ppData = pData; 6541 return 0; 6542 } 6543 6544 /* 6545 ** Array apCell[] contains nCell pointers to b-tree cells. Array szCell 6546 ** contains the size in bytes of each such cell. This function adds the 6547 ** space associated with each cell in the array that is currently stored 6548 ** within the body of pPg to the pPg free-list. The cell-pointers and other 6549 ** fields of the page are not updated. 6550 ** 6551 ** This function returns the total number of cells added to the free-list. 6552 */ 6553 static int pageFreeArray( 6554 MemPage *pPg, /* Page to edit */ 6555 int iFirst, /* First cell to delete */ 6556 int nCell, /* Cells to delete */ 6557 CellArray *pCArray /* Array of cells */ 6558 ){ 6559 u8 * const aData = pPg->aData; 6560 u8 * const pEnd = &aData[pPg->pBt->usableSize]; 6561 u8 * const pStart = &aData[pPg->hdrOffset + 8 + pPg->childPtrSize]; 6562 int nRet = 0; 6563 int i; 6564 int iEnd = iFirst + nCell; 6565 u8 *pFree = 0; 6566 int szFree = 0; 6567 6568 for(i=iFirst; i<iEnd; i++){ 6569 u8 *pCell = pCArray->apCell[i]; 6570 if( pCell>=pStart && pCell<pEnd ){ 6571 int sz; 6572 /* No need to use cachedCellSize() here. The sizes of all cells that 6573 ** are to be freed have already been computing while deciding which 6574 ** cells need freeing */ 6575 sz = pCArray->szCell[i]; assert( sz>0 ); 6576 if( pFree!=(pCell + sz) ){ 6577 if( pFree ){ 6578 assert( pFree>aData && (pFree - aData)<65536 ); 6579 freeSpace(pPg, (u16)(pFree - aData), szFree); 6580 } 6581 pFree = pCell; 6582 szFree = sz; 6583 if( pFree+sz>pEnd ) return 0; 6584 }else{ 6585 pFree = pCell; 6586 szFree += sz; 6587 } 6588 nRet++; 6589 } 6590 } 6591 if( pFree ){ 6592 assert( pFree>aData && (pFree - aData)<65536 ); 6593 freeSpace(pPg, (u16)(pFree - aData), szFree); 6594 } 6595 return nRet; 6596 } 6597 6598 /* 6599 ** apCell[] and szCell[] contains pointers to and sizes of all cells in the 6600 ** pages being balanced. The current page, pPg, has pPg->nCell cells starting 6601 ** with apCell[iOld]. After balancing, this page should hold nNew cells 6602 ** starting at apCell[iNew]. 6603 ** 6604 ** This routine makes the necessary adjustments to pPg so that it contains 6605 ** the correct cells after being balanced. 6606 ** 6607 ** The pPg->nFree field is invalid when this function returns. It is the 6608 ** responsibility of the caller to set it correctly. 6609 */ 6610 static int editPage( 6611 MemPage *pPg, /* Edit this page */ 6612 int iOld, /* Index of first cell currently on page */ 6613 int iNew, /* Index of new first cell on page */ 6614 int nNew, /* Final number of cells on page */ 6615 CellArray *pCArray /* Array of cells and sizes */ 6616 ){ 6617 u8 * const aData = pPg->aData; 6618 const int hdr = pPg->hdrOffset; 6619 u8 *pBegin = &pPg->aCellIdx[nNew * 2]; 6620 int nCell = pPg->nCell; /* Cells stored on pPg */ 6621 u8 *pData; 6622 u8 *pCellptr; 6623 int i; 6624 int iOldEnd = iOld + pPg->nCell + pPg->nOverflow; 6625 int iNewEnd = iNew + nNew; 6626 6627 #ifdef SQLITE_DEBUG 6628 u8 *pTmp = sqlite3PagerTempSpace(pPg->pBt->pPager); 6629 memcpy(pTmp, aData, pPg->pBt->usableSize); 6630 #endif 6631 6632 /* Remove cells from the start and end of the page */ 6633 if( iOld<iNew ){ 6634 int nShift = pageFreeArray(pPg, iOld, iNew-iOld, pCArray); 6635 memmove(pPg->aCellIdx, &pPg->aCellIdx[nShift*2], nCell*2); 6636 nCell -= nShift; 6637 } 6638 if( iNewEnd < iOldEnd ){ 6639 nCell -= pageFreeArray(pPg, iNewEnd, iOldEnd - iNewEnd, pCArray); 6640 } 6641 6642 pData = &aData[get2byteNotZero(&aData[hdr+5])]; 6643 if( pData<pBegin ) goto editpage_fail; 6644 6645 /* Add cells to the start of the page */ 6646 if( iNew<iOld ){ 6647 int nAdd = MIN(nNew,iOld-iNew); 6648 assert( (iOld-iNew)<nNew || nCell==0 || CORRUPT_DB ); 6649 pCellptr = pPg->aCellIdx; 6650 memmove(&pCellptr[nAdd*2], pCellptr, nCell*2); 6651 if( pageInsertArray( 6652 pPg, pBegin, &pData, pCellptr, 6653 iNew, nAdd, pCArray 6654 ) ) goto editpage_fail; 6655 nCell += nAdd; 6656 } 6657 6658 /* Add any overflow cells */ 6659 for(i=0; i<pPg->nOverflow; i++){ 6660 int iCell = (iOld + pPg->aiOvfl[i]) - iNew; 6661 if( iCell>=0 && iCell<nNew ){ 6662 pCellptr = &pPg->aCellIdx[iCell * 2]; 6663 memmove(&pCellptr[2], pCellptr, (nCell - iCell) * 2); 6664 nCell++; 6665 if( pageInsertArray( 6666 pPg, pBegin, &pData, pCellptr, 6667 iCell+iNew, 1, pCArray 6668 ) ) goto editpage_fail; 6669 } 6670 } 6671 6672 /* Append cells to the end of the page */ 6673 pCellptr = &pPg->aCellIdx[nCell*2]; 6674 if( pageInsertArray( 6675 pPg, pBegin, &pData, pCellptr, 6676 iNew+nCell, nNew-nCell, pCArray 6677 ) ) goto editpage_fail; 6678 6679 pPg->nCell = nNew; 6680 pPg->nOverflow = 0; 6681 6682 put2byte(&aData[hdr+3], pPg->nCell); 6683 put2byte(&aData[hdr+5], pData - aData); 6684 6685 #ifdef SQLITE_DEBUG 6686 for(i=0; i<nNew && !CORRUPT_DB; i++){ 6687 u8 *pCell = pCArray->apCell[i+iNew]; 6688 int iOff = get2byteAligned(&pPg->aCellIdx[i*2]); 6689 if( pCell>=aData && pCell<&aData[pPg->pBt->usableSize] ){ 6690 pCell = &pTmp[pCell - aData]; 6691 } 6692 assert( 0==memcmp(pCell, &aData[iOff], 6693 pCArray->pRef->xCellSize(pCArray->pRef, pCArray->apCell[i+iNew])) ); 6694 } 6695 #endif 6696 6697 return SQLITE_OK; 6698 editpage_fail: 6699 /* Unable to edit this page. Rebuild it from scratch instead. */ 6700 populateCellCache(pCArray, iNew, nNew); 6701 return rebuildPage(pPg, nNew, &pCArray->apCell[iNew], &pCArray->szCell[iNew]); 6702 } 6703 6704 /* 6705 ** The following parameters determine how many adjacent pages get involved 6706 ** in a balancing operation. NN is the number of neighbors on either side 6707 ** of the page that participate in the balancing operation. NB is the 6708 ** total number of pages that participate, including the target page and 6709 ** NN neighbors on either side. 6710 ** 6711 ** The minimum value of NN is 1 (of course). Increasing NN above 1 6712 ** (to 2 or 3) gives a modest improvement in SELECT and DELETE performance 6713 ** in exchange for a larger degradation in INSERT and UPDATE performance. 6714 ** The value of NN appears to give the best results overall. 6715 */ 6716 #define NN 1 /* Number of neighbors on either side of pPage */ 6717 #define NB (NN*2+1) /* Total pages involved in the balance */ 6718 6719 6720 #ifndef SQLITE_OMIT_QUICKBALANCE 6721 /* 6722 ** This version of balance() handles the common special case where 6723 ** a new entry is being inserted on the extreme right-end of the 6724 ** tree, in other words, when the new entry will become the largest 6725 ** entry in the tree. 6726 ** 6727 ** Instead of trying to balance the 3 right-most leaf pages, just add 6728 ** a new page to the right-hand side and put the one new entry in 6729 ** that page. This leaves the right side of the tree somewhat 6730 ** unbalanced. But odds are that we will be inserting new entries 6731 ** at the end soon afterwards so the nearly empty page will quickly 6732 ** fill up. On average. 6733 ** 6734 ** pPage is the leaf page which is the right-most page in the tree. 6735 ** pParent is its parent. pPage must have a single overflow entry 6736 ** which is also the right-most entry on the page. 6737 ** 6738 ** The pSpace buffer is used to store a temporary copy of the divider 6739 ** cell that will be inserted into pParent. Such a cell consists of a 4 6740 ** byte page number followed by a variable length integer. In other 6741 ** words, at most 13 bytes. Hence the pSpace buffer must be at 6742 ** least 13 bytes in size. 6743 */ 6744 static int balance_quick(MemPage *pParent, MemPage *pPage, u8 *pSpace){ 6745 BtShared *const pBt = pPage->pBt; /* B-Tree Database */ 6746 MemPage *pNew; /* Newly allocated page */ 6747 int rc; /* Return Code */ 6748 Pgno pgnoNew; /* Page number of pNew */ 6749 6750 assert( sqlite3_mutex_held(pPage->pBt->mutex) ); 6751 assert( sqlite3PagerIswriteable(pParent->pDbPage) ); 6752 assert( pPage->nOverflow==1 ); 6753 6754 /* This error condition is now caught prior to reaching this function */ 6755 if( NEVER(pPage->nCell==0) ) return SQLITE_CORRUPT_BKPT; 6756 6757 /* Allocate a new page. This page will become the right-sibling of 6758 ** pPage. Make the parent page writable, so that the new divider cell 6759 ** may be inserted. If both these operations are successful, proceed. 6760 */ 6761 rc = allocateBtreePage(pBt, &pNew, &pgnoNew, 0, 0); 6762 6763 if( rc==SQLITE_OK ){ 6764 6765 u8 *pOut = &pSpace[4]; 6766 u8 *pCell = pPage->apOvfl[0]; 6767 u16 szCell = pPage->xCellSize(pPage, pCell); 6768 u8 *pStop; 6769 6770 assert( sqlite3PagerIswriteable(pNew->pDbPage) ); 6771 assert( pPage->aData[0]==(PTF_INTKEY|PTF_LEAFDATA|PTF_LEAF) ); 6772 zeroPage(pNew, PTF_INTKEY|PTF_LEAFDATA|PTF_LEAF); 6773 rc = rebuildPage(pNew, 1, &pCell, &szCell); 6774 if( NEVER(rc) ) return rc; 6775 pNew->nFree = pBt->usableSize - pNew->cellOffset - 2 - szCell; 6776 6777 /* If this is an auto-vacuum database, update the pointer map 6778 ** with entries for the new page, and any pointer from the 6779 ** cell on the page to an overflow page. If either of these 6780 ** operations fails, the return code is set, but the contents 6781 ** of the parent page are still manipulated by thh code below. 6782 ** That is Ok, at this point the parent page is guaranteed to 6783 ** be marked as dirty. Returning an error code will cause a 6784 ** rollback, undoing any changes made to the parent page. 6785 */ 6786 if( ISAUTOVACUUM ){ 6787 ptrmapPut(pBt, pgnoNew, PTRMAP_BTREE, pParent->pgno, &rc); 6788 if( szCell>pNew->minLocal ){ 6789 ptrmapPutOvflPtr(pNew, pCell, &rc); 6790 } 6791 } 6792 6793 /* Create a divider cell to insert into pParent. The divider cell 6794 ** consists of a 4-byte page number (the page number of pPage) and 6795 ** a variable length key value (which must be the same value as the 6796 ** largest key on pPage). 6797 ** 6798 ** To find the largest key value on pPage, first find the right-most 6799 ** cell on pPage. The first two fields of this cell are the 6800 ** record-length (a variable length integer at most 32-bits in size) 6801 ** and the key value (a variable length integer, may have any value). 6802 ** The first of the while(...) loops below skips over the record-length 6803 ** field. The second while(...) loop copies the key value from the 6804 ** cell on pPage into the pSpace buffer. 6805 */ 6806 pCell = findCell(pPage, pPage->nCell-1); 6807 pStop = &pCell[9]; 6808 while( (*(pCell++)&0x80) && pCell<pStop ); 6809 pStop = &pCell[9]; 6810 while( ((*(pOut++) = *(pCell++))&0x80) && pCell<pStop ); 6811 6812 /* Insert the new divider cell into pParent. */ 6813 insertCell(pParent, pParent->nCell, pSpace, (int)(pOut-pSpace), 6814 0, pPage->pgno, &rc); 6815 6816 /* Set the right-child pointer of pParent to point to the new page. */ 6817 put4byte(&pParent->aData[pParent->hdrOffset+8], pgnoNew); 6818 6819 /* Release the reference to the new page. */ 6820 releasePage(pNew); 6821 } 6822 6823 return rc; 6824 } 6825 #endif /* SQLITE_OMIT_QUICKBALANCE */ 6826 6827 #if 0 6828 /* 6829 ** This function does not contribute anything to the operation of SQLite. 6830 ** it is sometimes activated temporarily while debugging code responsible 6831 ** for setting pointer-map entries. 6832 */ 6833 static int ptrmapCheckPages(MemPage **apPage, int nPage){ 6834 int i, j; 6835 for(i=0; i<nPage; i++){ 6836 Pgno n; 6837 u8 e; 6838 MemPage *pPage = apPage[i]; 6839 BtShared *pBt = pPage->pBt; 6840 assert( pPage->isInit ); 6841 6842 for(j=0; j<pPage->nCell; j++){ 6843 CellInfo info; 6844 u8 *z; 6845 6846 z = findCell(pPage, j); 6847 pPage->xParseCell(pPage, z, &info); 6848 if( info.iOverflow ){ 6849 Pgno ovfl = get4byte(&z[info.iOverflow]); 6850 ptrmapGet(pBt, ovfl, &e, &n); 6851 assert( n==pPage->pgno && e==PTRMAP_OVERFLOW1 ); 6852 } 6853 if( !pPage->leaf ){ 6854 Pgno child = get4byte(z); 6855 ptrmapGet(pBt, child, &e, &n); 6856 assert( n==pPage->pgno && e==PTRMAP_BTREE ); 6857 } 6858 } 6859 if( !pPage->leaf ){ 6860 Pgno child = get4byte(&pPage->aData[pPage->hdrOffset+8]); 6861 ptrmapGet(pBt, child, &e, &n); 6862 assert( n==pPage->pgno && e==PTRMAP_BTREE ); 6863 } 6864 } 6865 return 1; 6866 } 6867 #endif 6868 6869 /* 6870 ** This function is used to copy the contents of the b-tree node stored 6871 ** on page pFrom to page pTo. If page pFrom was not a leaf page, then 6872 ** the pointer-map entries for each child page are updated so that the 6873 ** parent page stored in the pointer map is page pTo. If pFrom contained 6874 ** any cells with overflow page pointers, then the corresponding pointer 6875 ** map entries are also updated so that the parent page is page pTo. 6876 ** 6877 ** If pFrom is currently carrying any overflow cells (entries in the 6878 ** MemPage.apOvfl[] array), they are not copied to pTo. 6879 ** 6880 ** Before returning, page pTo is reinitialized using btreeInitPage(). 6881 ** 6882 ** The performance of this function is not critical. It is only used by 6883 ** the balance_shallower() and balance_deeper() procedures, neither of 6884 ** which are called often under normal circumstances. 6885 */ 6886 static void copyNodeContent(MemPage *pFrom, MemPage *pTo, int *pRC){ 6887 if( (*pRC)==SQLITE_OK ){ 6888 BtShared * const pBt = pFrom->pBt; 6889 u8 * const aFrom = pFrom->aData; 6890 u8 * const aTo = pTo->aData; 6891 int const iFromHdr = pFrom->hdrOffset; 6892 int const iToHdr = ((pTo->pgno==1) ? 100 : 0); 6893 int rc; 6894 int iData; 6895 6896 6897 assert( pFrom->isInit ); 6898 assert( pFrom->nFree>=iToHdr ); 6899 assert( get2byte(&aFrom[iFromHdr+5]) <= (int)pBt->usableSize ); 6900 6901 /* Copy the b-tree node content from page pFrom to page pTo. */ 6902 iData = get2byte(&aFrom[iFromHdr+5]); 6903 memcpy(&aTo[iData], &aFrom[iData], pBt->usableSize-iData); 6904 memcpy(&aTo[iToHdr], &aFrom[iFromHdr], pFrom->cellOffset + 2*pFrom->nCell); 6905 6906 /* Reinitialize page pTo so that the contents of the MemPage structure 6907 ** match the new data. The initialization of pTo can actually fail under 6908 ** fairly obscure circumstances, even though it is a copy of initialized 6909 ** page pFrom. 6910 */ 6911 pTo->isInit = 0; 6912 rc = btreeInitPage(pTo); 6913 if( rc!=SQLITE_OK ){ 6914 *pRC = rc; 6915 return; 6916 } 6917 6918 /* If this is an auto-vacuum database, update the pointer-map entries 6919 ** for any b-tree or overflow pages that pTo now contains the pointers to. 6920 */ 6921 if( ISAUTOVACUUM ){ 6922 *pRC = setChildPtrmaps(pTo); 6923 } 6924 } 6925 } 6926 6927 /* 6928 ** This routine redistributes cells on the iParentIdx'th child of pParent 6929 ** (hereafter "the page") and up to 2 siblings so that all pages have about the 6930 ** same amount of free space. Usually a single sibling on either side of the 6931 ** page are used in the balancing, though both siblings might come from one 6932 ** side if the page is the first or last child of its parent. If the page 6933 ** has fewer than 2 siblings (something which can only happen if the page 6934 ** is a root page or a child of a root page) then all available siblings 6935 ** participate in the balancing. 6936 ** 6937 ** The number of siblings of the page might be increased or decreased by 6938 ** one or two in an effort to keep pages nearly full but not over full. 6939 ** 6940 ** Note that when this routine is called, some of the cells on the page 6941 ** might not actually be stored in MemPage.aData[]. This can happen 6942 ** if the page is overfull. This routine ensures that all cells allocated 6943 ** to the page and its siblings fit into MemPage.aData[] before returning. 6944 ** 6945 ** In the course of balancing the page and its siblings, cells may be 6946 ** inserted into or removed from the parent page (pParent). Doing so 6947 ** may cause the parent page to become overfull or underfull. If this 6948 ** happens, it is the responsibility of the caller to invoke the correct 6949 ** balancing routine to fix this problem (see the balance() routine). 6950 ** 6951 ** If this routine fails for any reason, it might leave the database 6952 ** in a corrupted state. So if this routine fails, the database should 6953 ** be rolled back. 6954 ** 6955 ** The third argument to this function, aOvflSpace, is a pointer to a 6956 ** buffer big enough to hold one page. If while inserting cells into the parent 6957 ** page (pParent) the parent page becomes overfull, this buffer is 6958 ** used to store the parent's overflow cells. Because this function inserts 6959 ** a maximum of four divider cells into the parent page, and the maximum 6960 ** size of a cell stored within an internal node is always less than 1/4 6961 ** of the page-size, the aOvflSpace[] buffer is guaranteed to be large 6962 ** enough for all overflow cells. 6963 ** 6964 ** If aOvflSpace is set to a null pointer, this function returns 6965 ** SQLITE_NOMEM. 6966 */ 6967 static int balance_nonroot( 6968 MemPage *pParent, /* Parent page of siblings being balanced */ 6969 int iParentIdx, /* Index of "the page" in pParent */ 6970 u8 *aOvflSpace, /* page-size bytes of space for parent ovfl */ 6971 int isRoot, /* True if pParent is a root-page */ 6972 int bBulk /* True if this call is part of a bulk load */ 6973 ){ 6974 BtShared *pBt; /* The whole database */ 6975 int nMaxCells = 0; /* Allocated size of apCell, szCell, aFrom. */ 6976 int nNew = 0; /* Number of pages in apNew[] */ 6977 int nOld; /* Number of pages in apOld[] */ 6978 int i, j, k; /* Loop counters */ 6979 int nxDiv; /* Next divider slot in pParent->aCell[] */ 6980 int rc = SQLITE_OK; /* The return code */ 6981 u16 leafCorrection; /* 4 if pPage is a leaf. 0 if not */ 6982 int leafData; /* True if pPage is a leaf of a LEAFDATA tree */ 6983 int usableSpace; /* Bytes in pPage beyond the header */ 6984 int pageFlags; /* Value of pPage->aData[0] */ 6985 int iSpace1 = 0; /* First unused byte of aSpace1[] */ 6986 int iOvflSpace = 0; /* First unused byte of aOvflSpace[] */ 6987 int szScratch; /* Size of scratch memory requested */ 6988 MemPage *apOld[NB]; /* pPage and up to two siblings */ 6989 MemPage *apNew[NB+2]; /* pPage and up to NB siblings after balancing */ 6990 u8 *pRight; /* Location in parent of right-sibling pointer */ 6991 u8 *apDiv[NB-1]; /* Divider cells in pParent */ 6992 int cntNew[NB+2]; /* Index in b.paCell[] of cell after i-th page */ 6993 int cntOld[NB+2]; /* Old index in b.apCell[] */ 6994 int szNew[NB+2]; /* Combined size of cells placed on i-th page */ 6995 u8 *aSpace1; /* Space for copies of dividers cells */ 6996 Pgno pgno; /* Temp var to store a page number in */ 6997 u8 abDone[NB+2]; /* True after i'th new page is populated */ 6998 Pgno aPgno[NB+2]; /* Page numbers of new pages before shuffling */ 6999 Pgno aPgOrder[NB+2]; /* Copy of aPgno[] used for sorting pages */ 7000 u16 aPgFlags[NB+2]; /* flags field of new pages before shuffling */ 7001 CellArray b; /* Parsed information on cells being balanced */ 7002 7003 memset(abDone, 0, sizeof(abDone)); 7004 b.nCell = 0; 7005 b.apCell = 0; 7006 pBt = pParent->pBt; 7007 assert( sqlite3_mutex_held(pBt->mutex) ); 7008 assert( sqlite3PagerIswriteable(pParent->pDbPage) ); 7009 7010 #if 0 7011 TRACE(("BALANCE: begin page %d child of %d\n", pPage->pgno, pParent->pgno)); 7012 #endif 7013 7014 /* At this point pParent may have at most one overflow cell. And if 7015 ** this overflow cell is present, it must be the cell with 7016 ** index iParentIdx. This scenario comes about when this function 7017 ** is called (indirectly) from sqlite3BtreeDelete(). 7018 */ 7019 assert( pParent->nOverflow==0 || pParent->nOverflow==1 ); 7020 assert( pParent->nOverflow==0 || pParent->aiOvfl[0]==iParentIdx ); 7021 7022 if( !aOvflSpace ){ 7023 return SQLITE_NOMEM; 7024 } 7025 7026 /* Find the sibling pages to balance. Also locate the cells in pParent 7027 ** that divide the siblings. An attempt is made to find NN siblings on 7028 ** either side of pPage. More siblings are taken from one side, however, 7029 ** if there are fewer than NN siblings on the other side. If pParent 7030 ** has NB or fewer children then all children of pParent are taken. 7031 ** 7032 ** This loop also drops the divider cells from the parent page. This 7033 ** way, the remainder of the function does not have to deal with any 7034 ** overflow cells in the parent page, since if any existed they will 7035 ** have already been removed. 7036 */ 7037 i = pParent->nOverflow + pParent->nCell; 7038 if( i<2 ){ 7039 nxDiv = 0; 7040 }else{ 7041 assert( bBulk==0 || bBulk==1 ); 7042 if( iParentIdx==0 ){ 7043 nxDiv = 0; 7044 }else if( iParentIdx==i ){ 7045 nxDiv = i-2+bBulk; 7046 }else{ 7047 nxDiv = iParentIdx-1; 7048 } 7049 i = 2-bBulk; 7050 } 7051 nOld = i+1; 7052 if( (i+nxDiv-pParent->nOverflow)==pParent->nCell ){ 7053 pRight = &pParent->aData[pParent->hdrOffset+8]; 7054 }else{ 7055 pRight = findCell(pParent, i+nxDiv-pParent->nOverflow); 7056 } 7057 pgno = get4byte(pRight); 7058 while( 1 ){ 7059 rc = getAndInitPage(pBt, pgno, &apOld[i], 0, 0); 7060 if( rc ){ 7061 memset(apOld, 0, (i+1)*sizeof(MemPage*)); 7062 goto balance_cleanup; 7063 } 7064 nMaxCells += 1+apOld[i]->nCell+apOld[i]->nOverflow; 7065 if( (i--)==0 ) break; 7066 7067 if( i+nxDiv==pParent->aiOvfl[0] && pParent->nOverflow ){ 7068 apDiv[i] = pParent->apOvfl[0]; 7069 pgno = get4byte(apDiv[i]); 7070 szNew[i] = pParent->xCellSize(pParent, apDiv[i]); 7071 pParent->nOverflow = 0; 7072 }else{ 7073 apDiv[i] = findCell(pParent, i+nxDiv-pParent->nOverflow); 7074 pgno = get4byte(apDiv[i]); 7075 szNew[i] = pParent->xCellSize(pParent, apDiv[i]); 7076 7077 /* Drop the cell from the parent page. apDiv[i] still points to 7078 ** the cell within the parent, even though it has been dropped. 7079 ** This is safe because dropping a cell only overwrites the first 7080 ** four bytes of it, and this function does not need the first 7081 ** four bytes of the divider cell. So the pointer is safe to use 7082 ** later on. 7083 ** 7084 ** But not if we are in secure-delete mode. In secure-delete mode, 7085 ** the dropCell() routine will overwrite the entire cell with zeroes. 7086 ** In this case, temporarily copy the cell into the aOvflSpace[] 7087 ** buffer. It will be copied out again as soon as the aSpace[] buffer 7088 ** is allocated. */ 7089 if( pBt->btsFlags & BTS_SECURE_DELETE ){ 7090 int iOff; 7091 7092 iOff = SQLITE_PTR_TO_INT(apDiv[i]) - SQLITE_PTR_TO_INT(pParent->aData); 7093 if( (iOff+szNew[i])>(int)pBt->usableSize ){ 7094 rc = SQLITE_CORRUPT_BKPT; 7095 memset(apOld, 0, (i+1)*sizeof(MemPage*)); 7096 goto balance_cleanup; 7097 }else{ 7098 memcpy(&aOvflSpace[iOff], apDiv[i], szNew[i]); 7099 apDiv[i] = &aOvflSpace[apDiv[i]-pParent->aData]; 7100 } 7101 } 7102 dropCell(pParent, i+nxDiv-pParent->nOverflow, szNew[i], &rc); 7103 } 7104 } 7105 7106 /* Make nMaxCells a multiple of 4 in order to preserve 8-byte 7107 ** alignment */ 7108 nMaxCells = (nMaxCells + 3)&~3; 7109 7110 /* 7111 ** Allocate space for memory structures 7112 */ 7113 szScratch = 7114 nMaxCells*sizeof(u8*) /* b.apCell */ 7115 + nMaxCells*sizeof(u16) /* b.szCell */ 7116 + pBt->pageSize; /* aSpace1 */ 7117 7118 /* EVIDENCE-OF: R-28375-38319 SQLite will never request a scratch buffer 7119 ** that is more than 6 times the database page size. */ 7120 assert( szScratch<=6*(int)pBt->pageSize ); 7121 b.apCell = sqlite3ScratchMalloc( szScratch ); 7122 if( b.apCell==0 ){ 7123 rc = SQLITE_NOMEM; 7124 goto balance_cleanup; 7125 } 7126 b.szCell = (u16*)&b.apCell[nMaxCells]; 7127 aSpace1 = (u8*)&b.szCell[nMaxCells]; 7128 assert( EIGHT_BYTE_ALIGNMENT(aSpace1) ); 7129 7130 /* 7131 ** Load pointers to all cells on sibling pages and the divider cells 7132 ** into the local b.apCell[] array. Make copies of the divider cells 7133 ** into space obtained from aSpace1[]. The divider cells have already 7134 ** been removed from pParent. 7135 ** 7136 ** If the siblings are on leaf pages, then the child pointers of the 7137 ** divider cells are stripped from the cells before they are copied 7138 ** into aSpace1[]. In this way, all cells in b.apCell[] are without 7139 ** child pointers. If siblings are not leaves, then all cell in 7140 ** b.apCell[] include child pointers. Either way, all cells in b.apCell[] 7141 ** are alike. 7142 ** 7143 ** leafCorrection: 4 if pPage is a leaf. 0 if pPage is not a leaf. 7144 ** leafData: 1 if pPage holds key+data and pParent holds only keys. 7145 */ 7146 b.pRef = apOld[0]; 7147 leafCorrection = b.pRef->leaf*4; 7148 leafData = b.pRef->intKeyLeaf; 7149 for(i=0; i<nOld; i++){ 7150 MemPage *pOld = apOld[i]; 7151 int limit = pOld->nCell; 7152 u8 *aData = pOld->aData; 7153 u16 maskPage = pOld->maskPage; 7154 u8 *piCell = aData + pOld->cellOffset; 7155 u8 *piEnd; 7156 7157 /* Verify that all sibling pages are of the same "type" (table-leaf, 7158 ** table-interior, index-leaf, or index-interior). 7159 */ 7160 if( pOld->aData[0]!=apOld[0]->aData[0] ){ 7161 rc = SQLITE_CORRUPT_BKPT; 7162 goto balance_cleanup; 7163 } 7164 7165 /* Load b.apCell[] with pointers to all cells in pOld. If pOld 7166 ** constains overflow cells, include them in the b.apCell[] array 7167 ** in the correct spot. 7168 ** 7169 ** Note that when there are multiple overflow cells, it is always the 7170 ** case that they are sequential and adjacent. This invariant arises 7171 ** because multiple overflows can only occurs when inserting divider 7172 ** cells into a parent on a prior balance, and divider cells are always 7173 ** adjacent and are inserted in order. There is an assert() tagged 7174 ** with "NOTE 1" in the overflow cell insertion loop to prove this 7175 ** invariant. 7176 ** 7177 ** This must be done in advance. Once the balance starts, the cell 7178 ** offset section of the btree page will be overwritten and we will no 7179 ** long be able to find the cells if a pointer to each cell is not saved 7180 ** first. 7181 */ 7182 memset(&b.szCell[b.nCell], 0, sizeof(b.szCell[0])*limit); 7183 if( pOld->nOverflow>0 ){ 7184 memset(&b.szCell[b.nCell+limit], 0, sizeof(b.szCell[0])*pOld->nOverflow); 7185 limit = pOld->aiOvfl[0]; 7186 for(j=0; j<limit; j++){ 7187 b.apCell[b.nCell] = aData + (maskPage & get2byteAligned(piCell)); 7188 piCell += 2; 7189 b.nCell++; 7190 } 7191 for(k=0; k<pOld->nOverflow; k++){ 7192 assert( k==0 || pOld->aiOvfl[k-1]+1==pOld->aiOvfl[k] );/* NOTE 1 */ 7193 b.apCell[b.nCell] = pOld->apOvfl[k]; 7194 b.nCell++; 7195 } 7196 } 7197 piEnd = aData + pOld->cellOffset + 2*pOld->nCell; 7198 while( piCell<piEnd ){ 7199 assert( b.nCell<nMaxCells ); 7200 b.apCell[b.nCell] = aData + (maskPage & get2byteAligned(piCell)); 7201 piCell += 2; 7202 b.nCell++; 7203 } 7204 7205 cntOld[i] = b.nCell; 7206 if( i<nOld-1 && !leafData){ 7207 u16 sz = (u16)szNew[i]; 7208 u8 *pTemp; 7209 assert( b.nCell<nMaxCells ); 7210 b.szCell[b.nCell] = sz; 7211 pTemp = &aSpace1[iSpace1]; 7212 iSpace1 += sz; 7213 assert( sz<=pBt->maxLocal+23 ); 7214 assert( iSpace1 <= (int)pBt->pageSize ); 7215 memcpy(pTemp, apDiv[i], sz); 7216 b.apCell[b.nCell] = pTemp+leafCorrection; 7217 assert( leafCorrection==0 || leafCorrection==4 ); 7218 b.szCell[b.nCell] = b.szCell[b.nCell] - leafCorrection; 7219 if( !pOld->leaf ){ 7220 assert( leafCorrection==0 ); 7221 assert( pOld->hdrOffset==0 ); 7222 /* The right pointer of the child page pOld becomes the left 7223 ** pointer of the divider cell */ 7224 memcpy(b.apCell[b.nCell], &pOld->aData[8], 4); 7225 }else{ 7226 assert( leafCorrection==4 ); 7227 while( b.szCell[b.nCell]<4 ){ 7228 /* Do not allow any cells smaller than 4 bytes. If a smaller cell 7229 ** does exist, pad it with 0x00 bytes. */ 7230 assert( b.szCell[b.nCell]==3 || CORRUPT_DB ); 7231 assert( b.apCell[b.nCell]==&aSpace1[iSpace1-3] || CORRUPT_DB ); 7232 aSpace1[iSpace1++] = 0x00; 7233 b.szCell[b.nCell]++; 7234 } 7235 } 7236 b.nCell++; 7237 } 7238 } 7239 7240 /* 7241 ** Figure out the number of pages needed to hold all b.nCell cells. 7242 ** Store this number in "k". Also compute szNew[] which is the total 7243 ** size of all cells on the i-th page and cntNew[] which is the index 7244 ** in b.apCell[] of the cell that divides page i from page i+1. 7245 ** cntNew[k] should equal b.nCell. 7246 ** 7247 ** Values computed by this block: 7248 ** 7249 ** k: The total number of sibling pages 7250 ** szNew[i]: Spaced used on the i-th sibling page. 7251 ** cntNew[i]: Index in b.apCell[] and b.szCell[] for the first cell to 7252 ** the right of the i-th sibling page. 7253 ** usableSpace: Number of bytes of space available on each sibling. 7254 ** 7255 */ 7256 usableSpace = pBt->usableSize - 12 + leafCorrection; 7257 for(i=0; i<nOld; i++){ 7258 MemPage *p = apOld[i]; 7259 szNew[i] = usableSpace - p->nFree; 7260 if( szNew[i]<0 ){ rc = SQLITE_CORRUPT_BKPT; goto balance_cleanup; } 7261 for(j=0; j<p->nOverflow; j++){ 7262 szNew[i] += 2 + p->xCellSize(p, p->apOvfl[j]); 7263 } 7264 cntNew[i] = cntOld[i]; 7265 } 7266 k = nOld; 7267 for(i=0; i<k; i++){ 7268 int sz; 7269 while( szNew[i]>usableSpace ){ 7270 if( i+1>=k ){ 7271 k = i+2; 7272 if( k>NB+2 ){ rc = SQLITE_CORRUPT_BKPT; goto balance_cleanup; } 7273 szNew[k-1] = 0; 7274 cntNew[k-1] = b.nCell; 7275 } 7276 sz = 2 + cachedCellSize(&b, cntNew[i]-1); 7277 szNew[i] -= sz; 7278 if( !leafData ){ 7279 if( cntNew[i]<b.nCell ){ 7280 sz = 2 + cachedCellSize(&b, cntNew[i]); 7281 }else{ 7282 sz = 0; 7283 } 7284 } 7285 szNew[i+1] += sz; 7286 cntNew[i]--; 7287 } 7288 while( cntNew[i]<b.nCell ){ 7289 sz = 2 + cachedCellSize(&b, cntNew[i]); 7290 if( szNew[i]+sz>usableSpace ) break; 7291 szNew[i] += sz; 7292 cntNew[i]++; 7293 if( !leafData ){ 7294 if( cntNew[i]<b.nCell ){ 7295 sz = 2 + cachedCellSize(&b, cntNew[i]); 7296 }else{ 7297 sz = 0; 7298 } 7299 } 7300 szNew[i+1] -= sz; 7301 } 7302 if( cntNew[i]>=b.nCell ){ 7303 k = i+1; 7304 }else if( cntNew[i] <= (i>0 ? cntNew[i-1] : 0) ){ 7305 rc = SQLITE_CORRUPT_BKPT; 7306 goto balance_cleanup; 7307 } 7308 } 7309 7310 /* 7311 ** The packing computed by the previous block is biased toward the siblings 7312 ** on the left side (siblings with smaller keys). The left siblings are 7313 ** always nearly full, while the right-most sibling might be nearly empty. 7314 ** The next block of code attempts to adjust the packing of siblings to 7315 ** get a better balance. 7316 ** 7317 ** This adjustment is more than an optimization. The packing above might 7318 ** be so out of balance as to be illegal. For example, the right-most 7319 ** sibling might be completely empty. This adjustment is not optional. 7320 */ 7321 for(i=k-1; i>0; i--){ 7322 int szRight = szNew[i]; /* Size of sibling on the right */ 7323 int szLeft = szNew[i-1]; /* Size of sibling on the left */ 7324 int r; /* Index of right-most cell in left sibling */ 7325 int d; /* Index of first cell to the left of right sibling */ 7326 7327 r = cntNew[i-1] - 1; 7328 d = r + 1 - leafData; 7329 (void)cachedCellSize(&b, d); 7330 do{ 7331 assert( d<nMaxCells ); 7332 assert( r<nMaxCells ); 7333 (void)cachedCellSize(&b, r); 7334 if( szRight!=0 7335 && (bBulk || szRight+b.szCell[d]+2 > szLeft-(b.szCell[r]+2)) ){ 7336 break; 7337 } 7338 szRight += b.szCell[d] + 2; 7339 szLeft -= b.szCell[r] + 2; 7340 cntNew[i-1] = r; 7341 r--; 7342 d--; 7343 }while( r>=0 ); 7344 szNew[i] = szRight; 7345 szNew[i-1] = szLeft; 7346 if( cntNew[i-1] <= (i>1 ? cntNew[i-2] : 0) ){ 7347 rc = SQLITE_CORRUPT_BKPT; 7348 goto balance_cleanup; 7349 } 7350 } 7351 7352 /* Sanity check: For a non-corrupt database file one of the follwing 7353 ** must be true: 7354 ** (1) We found one or more cells (cntNew[0])>0), or 7355 ** (2) pPage is a virtual root page. A virtual root page is when 7356 ** the real root page is page 1 and we are the only child of 7357 ** that page. 7358 */ 7359 assert( cntNew[0]>0 || (pParent->pgno==1 && pParent->nCell==0) || CORRUPT_DB); 7360 TRACE(("BALANCE: old: %d(nc=%d) %d(nc=%d) %d(nc=%d)\n", 7361 apOld[0]->pgno, apOld[0]->nCell, 7362 nOld>=2 ? apOld[1]->pgno : 0, nOld>=2 ? apOld[1]->nCell : 0, 7363 nOld>=3 ? apOld[2]->pgno : 0, nOld>=3 ? apOld[2]->nCell : 0 7364 )); 7365 7366 /* 7367 ** Allocate k new pages. Reuse old pages where possible. 7368 */ 7369 pageFlags = apOld[0]->aData[0]; 7370 for(i=0; i<k; i++){ 7371 MemPage *pNew; 7372 if( i<nOld ){ 7373 pNew = apNew[i] = apOld[i]; 7374 apOld[i] = 0; 7375 rc = sqlite3PagerWrite(pNew->pDbPage); 7376 nNew++; 7377 if( rc ) goto balance_cleanup; 7378 }else{ 7379 assert( i>0 ); 7380 rc = allocateBtreePage(pBt, &pNew, &pgno, (bBulk ? 1 : pgno), 0); 7381 if( rc ) goto balance_cleanup; 7382 zeroPage(pNew, pageFlags); 7383 apNew[i] = pNew; 7384 nNew++; 7385 cntOld[i] = b.nCell; 7386 7387 /* Set the pointer-map entry for the new sibling page. */ 7388 if( ISAUTOVACUUM ){ 7389 ptrmapPut(pBt, pNew->pgno, PTRMAP_BTREE, pParent->pgno, &rc); 7390 if( rc!=SQLITE_OK ){ 7391 goto balance_cleanup; 7392 } 7393 } 7394 } 7395 } 7396 7397 /* 7398 ** Reassign page numbers so that the new pages are in ascending order. 7399 ** This helps to keep entries in the disk file in order so that a scan 7400 ** of the table is closer to a linear scan through the file. That in turn 7401 ** helps the operating system to deliver pages from the disk more rapidly. 7402 ** 7403 ** An O(n^2) insertion sort algorithm is used, but since n is never more 7404 ** than (NB+2) (a small constant), that should not be a problem. 7405 ** 7406 ** When NB==3, this one optimization makes the database about 25% faster 7407 ** for large insertions and deletions. 7408 */ 7409 for(i=0; i<nNew; i++){ 7410 aPgOrder[i] = aPgno[i] = apNew[i]->pgno; 7411 aPgFlags[i] = apNew[i]->pDbPage->flags; 7412 for(j=0; j<i; j++){ 7413 if( aPgno[j]==aPgno[i] ){ 7414 /* This branch is taken if the set of sibling pages somehow contains 7415 ** duplicate entries. This can happen if the database is corrupt. 7416 ** It would be simpler to detect this as part of the loop below, but 7417 ** we do the detection here in order to avoid populating the pager 7418 ** cache with two separate objects associated with the same 7419 ** page number. */ 7420 assert( CORRUPT_DB ); 7421 rc = SQLITE_CORRUPT_BKPT; 7422 goto balance_cleanup; 7423 } 7424 } 7425 } 7426 for(i=0; i<nNew; i++){ 7427 int iBest = 0; /* aPgno[] index of page number to use */ 7428 for(j=1; j<nNew; j++){ 7429 if( aPgOrder[j]<aPgOrder[iBest] ) iBest = j; 7430 } 7431 pgno = aPgOrder[iBest]; 7432 aPgOrder[iBest] = 0xffffffff; 7433 if( iBest!=i ){ 7434 if( iBest>i ){ 7435 sqlite3PagerRekey(apNew[iBest]->pDbPage, pBt->nPage+iBest+1, 0); 7436 } 7437 sqlite3PagerRekey(apNew[i]->pDbPage, pgno, aPgFlags[iBest]); 7438 apNew[i]->pgno = pgno; 7439 } 7440 } 7441 7442 TRACE(("BALANCE: new: %d(%d nc=%d) %d(%d nc=%d) %d(%d nc=%d) " 7443 "%d(%d nc=%d) %d(%d nc=%d)\n", 7444 apNew[0]->pgno, szNew[0], cntNew[0], 7445 nNew>=2 ? apNew[1]->pgno : 0, nNew>=2 ? szNew[1] : 0, 7446 nNew>=2 ? cntNew[1] - cntNew[0] - !leafData : 0, 7447 nNew>=3 ? apNew[2]->pgno : 0, nNew>=3 ? szNew[2] : 0, 7448 nNew>=3 ? cntNew[2] - cntNew[1] - !leafData : 0, 7449 nNew>=4 ? apNew[3]->pgno : 0, nNew>=4 ? szNew[3] : 0, 7450 nNew>=4 ? cntNew[3] - cntNew[2] - !leafData : 0, 7451 nNew>=5 ? apNew[4]->pgno : 0, nNew>=5 ? szNew[4] : 0, 7452 nNew>=5 ? cntNew[4] - cntNew[3] - !leafData : 0 7453 )); 7454 7455 assert( sqlite3PagerIswriteable(pParent->pDbPage) ); 7456 put4byte(pRight, apNew[nNew-1]->pgno); 7457 7458 /* If the sibling pages are not leaves, ensure that the right-child pointer 7459 ** of the right-most new sibling page is set to the value that was 7460 ** originally in the same field of the right-most old sibling page. */ 7461 if( (pageFlags & PTF_LEAF)==0 && nOld!=nNew ){ 7462 MemPage *pOld = (nNew>nOld ? apNew : apOld)[nOld-1]; 7463 memcpy(&apNew[nNew-1]->aData[8], &pOld->aData[8], 4); 7464 } 7465 7466 /* Make any required updates to pointer map entries associated with 7467 ** cells stored on sibling pages following the balance operation. Pointer 7468 ** map entries associated with divider cells are set by the insertCell() 7469 ** routine. The associated pointer map entries are: 7470 ** 7471 ** a) if the cell contains a reference to an overflow chain, the 7472 ** entry associated with the first page in the overflow chain, and 7473 ** 7474 ** b) if the sibling pages are not leaves, the child page associated 7475 ** with the cell. 7476 ** 7477 ** If the sibling pages are not leaves, then the pointer map entry 7478 ** associated with the right-child of each sibling may also need to be 7479 ** updated. This happens below, after the sibling pages have been 7480 ** populated, not here. 7481 */ 7482 if( ISAUTOVACUUM ){ 7483 MemPage *pNew = apNew[0]; 7484 u8 *aOld = pNew->aData; 7485 int cntOldNext = pNew->nCell + pNew->nOverflow; 7486 int usableSize = pBt->usableSize; 7487 int iNew = 0; 7488 int iOld = 0; 7489 7490 for(i=0; i<b.nCell; i++){ 7491 u8 *pCell = b.apCell[i]; 7492 if( i==cntOldNext ){ 7493 MemPage *pOld = (++iOld)<nNew ? apNew[iOld] : apOld[iOld]; 7494 cntOldNext += pOld->nCell + pOld->nOverflow + !leafData; 7495 aOld = pOld->aData; 7496 } 7497 if( i==cntNew[iNew] ){ 7498 pNew = apNew[++iNew]; 7499 if( !leafData ) continue; 7500 } 7501 7502 /* Cell pCell is destined for new sibling page pNew. Originally, it 7503 ** was either part of sibling page iOld (possibly an overflow cell), 7504 ** or else the divider cell to the left of sibling page iOld. So, 7505 ** if sibling page iOld had the same page number as pNew, and if 7506 ** pCell really was a part of sibling page iOld (not a divider or 7507 ** overflow cell), we can skip updating the pointer map entries. */ 7508 if( iOld>=nNew 7509 || pNew->pgno!=aPgno[iOld] 7510 || pCell<aOld 7511 || pCell>=&aOld[usableSize] 7512 ){ 7513 if( !leafCorrection ){ 7514 ptrmapPut(pBt, get4byte(pCell), PTRMAP_BTREE, pNew->pgno, &rc); 7515 } 7516 if( cachedCellSize(&b,i)>pNew->minLocal ){ 7517 ptrmapPutOvflPtr(pNew, pCell, &rc); 7518 } 7519 if( rc ) goto balance_cleanup; 7520 } 7521 } 7522 } 7523 7524 /* Insert new divider cells into pParent. */ 7525 for(i=0; i<nNew-1; i++){ 7526 u8 *pCell; 7527 u8 *pTemp; 7528 int sz; 7529 MemPage *pNew = apNew[i]; 7530 j = cntNew[i]; 7531 7532 assert( j<nMaxCells ); 7533 assert( b.apCell[j]!=0 ); 7534 pCell = b.apCell[j]; 7535 sz = b.szCell[j] + leafCorrection; 7536 pTemp = &aOvflSpace[iOvflSpace]; 7537 if( !pNew->leaf ){ 7538 memcpy(&pNew->aData[8], pCell, 4); 7539 }else if( leafData ){ 7540 /* If the tree is a leaf-data tree, and the siblings are leaves, 7541 ** then there is no divider cell in b.apCell[]. Instead, the divider 7542 ** cell consists of the integer key for the right-most cell of 7543 ** the sibling-page assembled above only. 7544 */ 7545 CellInfo info; 7546 j--; 7547 pNew->xParseCell(pNew, b.apCell[j], &info); 7548 pCell = pTemp; 7549 sz = 4 + putVarint(&pCell[4], info.nKey); 7550 pTemp = 0; 7551 }else{ 7552 pCell -= 4; 7553 /* Obscure case for non-leaf-data trees: If the cell at pCell was 7554 ** previously stored on a leaf node, and its reported size was 4 7555 ** bytes, then it may actually be smaller than this 7556 ** (see btreeParseCellPtr(), 4 bytes is the minimum size of 7557 ** any cell). But it is important to pass the correct size to 7558 ** insertCell(), so reparse the cell now. 7559 ** 7560 ** Note that this can never happen in an SQLite data file, as all 7561 ** cells are at least 4 bytes. It only happens in b-trees used 7562 ** to evaluate "IN (SELECT ...)" and similar clauses. 7563 */ 7564 if( b.szCell[j]==4 ){ 7565 assert(leafCorrection==4); 7566 sz = pParent->xCellSize(pParent, pCell); 7567 } 7568 } 7569 iOvflSpace += sz; 7570 assert( sz<=pBt->maxLocal+23 ); 7571 assert( iOvflSpace <= (int)pBt->pageSize ); 7572 insertCell(pParent, nxDiv+i, pCell, sz, pTemp, pNew->pgno, &rc); 7573 if( rc!=SQLITE_OK ) goto balance_cleanup; 7574 assert( sqlite3PagerIswriteable(pParent->pDbPage) ); 7575 } 7576 7577 /* Now update the actual sibling pages. The order in which they are updated 7578 ** is important, as this code needs to avoid disrupting any page from which 7579 ** cells may still to be read. In practice, this means: 7580 ** 7581 ** (1) If cells are moving left (from apNew[iPg] to apNew[iPg-1]) 7582 ** then it is not safe to update page apNew[iPg] until after 7583 ** the left-hand sibling apNew[iPg-1] has been updated. 7584 ** 7585 ** (2) If cells are moving right (from apNew[iPg] to apNew[iPg+1]) 7586 ** then it is not safe to update page apNew[iPg] until after 7587 ** the right-hand sibling apNew[iPg+1] has been updated. 7588 ** 7589 ** If neither of the above apply, the page is safe to update. 7590 ** 7591 ** The iPg value in the following loop starts at nNew-1 goes down 7592 ** to 0, then back up to nNew-1 again, thus making two passes over 7593 ** the pages. On the initial downward pass, only condition (1) above 7594 ** needs to be tested because (2) will always be true from the previous 7595 ** step. On the upward pass, both conditions are always true, so the 7596 ** upwards pass simply processes pages that were missed on the downward 7597 ** pass. 7598 */ 7599 for(i=1-nNew; i<nNew; i++){ 7600 int iPg = i<0 ? -i : i; 7601 assert( iPg>=0 && iPg<nNew ); 7602 if( abDone[iPg] ) continue; /* Skip pages already processed */ 7603 if( i>=0 /* On the upwards pass, or... */ 7604 || cntOld[iPg-1]>=cntNew[iPg-1] /* Condition (1) is true */ 7605 ){ 7606 int iNew; 7607 int iOld; 7608 int nNewCell; 7609 7610 /* Verify condition (1): If cells are moving left, update iPg 7611 ** only after iPg-1 has already been updated. */ 7612 assert( iPg==0 || cntOld[iPg-1]>=cntNew[iPg-1] || abDone[iPg-1] ); 7613 7614 /* Verify condition (2): If cells are moving right, update iPg 7615 ** only after iPg+1 has already been updated. */ 7616 assert( cntNew[iPg]>=cntOld[iPg] || abDone[iPg+1] ); 7617 7618 if( iPg==0 ){ 7619 iNew = iOld = 0; 7620 nNewCell = cntNew[0]; 7621 }else{ 7622 iOld = iPg<nOld ? (cntOld[iPg-1] + !leafData) : b.nCell; 7623 iNew = cntNew[iPg-1] + !leafData; 7624 nNewCell = cntNew[iPg] - iNew; 7625 } 7626 7627 rc = editPage(apNew[iPg], iOld, iNew, nNewCell, &b); 7628 if( rc ) goto balance_cleanup; 7629 abDone[iPg]++; 7630 apNew[iPg]->nFree = usableSpace-szNew[iPg]; 7631 assert( apNew[iPg]->nOverflow==0 ); 7632 assert( apNew[iPg]->nCell==nNewCell ); 7633 } 7634 } 7635 7636 /* All pages have been processed exactly once */ 7637 assert( memcmp(abDone, "\01\01\01\01\01", nNew)==0 ); 7638 7639 assert( nOld>0 ); 7640 assert( nNew>0 ); 7641 7642 if( isRoot && pParent->nCell==0 && pParent->hdrOffset<=apNew[0]->nFree ){ 7643 /* The root page of the b-tree now contains no cells. The only sibling 7644 ** page is the right-child of the parent. Copy the contents of the 7645 ** child page into the parent, decreasing the overall height of the 7646 ** b-tree structure by one. This is described as the "balance-shallower" 7647 ** sub-algorithm in some documentation. 7648 ** 7649 ** If this is an auto-vacuum database, the call to copyNodeContent() 7650 ** sets all pointer-map entries corresponding to database image pages 7651 ** for which the pointer is stored within the content being copied. 7652 ** 7653 ** It is critical that the child page be defragmented before being 7654 ** copied into the parent, because if the parent is page 1 then it will 7655 ** by smaller than the child due to the database header, and so all the 7656 ** free space needs to be up front. 7657 */ 7658 assert( nNew==1 || CORRUPT_DB ); 7659 rc = defragmentPage(apNew[0]); 7660 testcase( rc!=SQLITE_OK ); 7661 assert( apNew[0]->nFree == 7662 (get2byte(&apNew[0]->aData[5])-apNew[0]->cellOffset-apNew[0]->nCell*2) 7663 || rc!=SQLITE_OK 7664 ); 7665 copyNodeContent(apNew[0], pParent, &rc); 7666 freePage(apNew[0], &rc); 7667 }else if( ISAUTOVACUUM && !leafCorrection ){ 7668 /* Fix the pointer map entries associated with the right-child of each 7669 ** sibling page. All other pointer map entries have already been taken 7670 ** care of. */ 7671 for(i=0; i<nNew; i++){ 7672 u32 key = get4byte(&apNew[i]->aData[8]); 7673 ptrmapPut(pBt, key, PTRMAP_BTREE, apNew[i]->pgno, &rc); 7674 } 7675 } 7676 7677 assert( pParent->isInit ); 7678 TRACE(("BALANCE: finished: old=%d new=%d cells=%d\n", 7679 nOld, nNew, b.nCell)); 7680 7681 /* Free any old pages that were not reused as new pages. 7682 */ 7683 for(i=nNew; i<nOld; i++){ 7684 freePage(apOld[i], &rc); 7685 } 7686 7687 #if 0 7688 if( ISAUTOVACUUM && rc==SQLITE_OK && apNew[0]->isInit ){ 7689 /* The ptrmapCheckPages() contains assert() statements that verify that 7690 ** all pointer map pages are set correctly. This is helpful while 7691 ** debugging. This is usually disabled because a corrupt database may 7692 ** cause an assert() statement to fail. */ 7693 ptrmapCheckPages(apNew, nNew); 7694 ptrmapCheckPages(&pParent, 1); 7695 } 7696 #endif 7697 7698 /* 7699 ** Cleanup before returning. 7700 */ 7701 balance_cleanup: 7702 sqlite3ScratchFree(b.apCell); 7703 for(i=0; i<nOld; i++){ 7704 releasePage(apOld[i]); 7705 } 7706 for(i=0; i<nNew; i++){ 7707 releasePage(apNew[i]); 7708 } 7709 7710 return rc; 7711 } 7712 7713 7714 /* 7715 ** This function is called when the root page of a b-tree structure is 7716 ** overfull (has one or more overflow pages). 7717 ** 7718 ** A new child page is allocated and the contents of the current root 7719 ** page, including overflow cells, are copied into the child. The root 7720 ** page is then overwritten to make it an empty page with the right-child 7721 ** pointer pointing to the new page. 7722 ** 7723 ** Before returning, all pointer-map entries corresponding to pages 7724 ** that the new child-page now contains pointers to are updated. The 7725 ** entry corresponding to the new right-child pointer of the root 7726 ** page is also updated. 7727 ** 7728 ** If successful, *ppChild is set to contain a reference to the child 7729 ** page and SQLITE_OK is returned. In this case the caller is required 7730 ** to call releasePage() on *ppChild exactly once. If an error occurs, 7731 ** an error code is returned and *ppChild is set to 0. 7732 */ 7733 static int balance_deeper(MemPage *pRoot, MemPage **ppChild){ 7734 int rc; /* Return value from subprocedures */ 7735 MemPage *pChild = 0; /* Pointer to a new child page */ 7736 Pgno pgnoChild = 0; /* Page number of the new child page */ 7737 BtShared *pBt = pRoot->pBt; /* The BTree */ 7738 7739 assert( pRoot->nOverflow>0 ); 7740 assert( sqlite3_mutex_held(pBt->mutex) ); 7741 7742 /* Make pRoot, the root page of the b-tree, writable. Allocate a new 7743 ** page that will become the new right-child of pPage. Copy the contents 7744 ** of the node stored on pRoot into the new child page. 7745 */ 7746 rc = sqlite3PagerWrite(pRoot->pDbPage); 7747 if( rc==SQLITE_OK ){ 7748 rc = allocateBtreePage(pBt,&pChild,&pgnoChild,pRoot->pgno,0); 7749 copyNodeContent(pRoot, pChild, &rc); 7750 if( ISAUTOVACUUM ){ 7751 ptrmapPut(pBt, pgnoChild, PTRMAP_BTREE, pRoot->pgno, &rc); 7752 } 7753 } 7754 if( rc ){ 7755 *ppChild = 0; 7756 releasePage(pChild); 7757 return rc; 7758 } 7759 assert( sqlite3PagerIswriteable(pChild->pDbPage) ); 7760 assert( sqlite3PagerIswriteable(pRoot->pDbPage) ); 7761 assert( pChild->nCell==pRoot->nCell ); 7762 7763 TRACE(("BALANCE: copy root %d into %d\n", pRoot->pgno, pChild->pgno)); 7764 7765 /* Copy the overflow cells from pRoot to pChild */ 7766 memcpy(pChild->aiOvfl, pRoot->aiOvfl, 7767 pRoot->nOverflow*sizeof(pRoot->aiOvfl[0])); 7768 memcpy(pChild->apOvfl, pRoot->apOvfl, 7769 pRoot->nOverflow*sizeof(pRoot->apOvfl[0])); 7770 pChild->nOverflow = pRoot->nOverflow; 7771 7772 /* Zero the contents of pRoot. Then install pChild as the right-child. */ 7773 zeroPage(pRoot, pChild->aData[0] & ~PTF_LEAF); 7774 put4byte(&pRoot->aData[pRoot->hdrOffset+8], pgnoChild); 7775 7776 *ppChild = pChild; 7777 return SQLITE_OK; 7778 } 7779 7780 /* 7781 ** The page that pCur currently points to has just been modified in 7782 ** some way. This function figures out if this modification means the 7783 ** tree needs to be balanced, and if so calls the appropriate balancing 7784 ** routine. Balancing routines are: 7785 ** 7786 ** balance_quick() 7787 ** balance_deeper() 7788 ** balance_nonroot() 7789 */ 7790 static int balance(BtCursor *pCur){ 7791 int rc = SQLITE_OK; 7792 const int nMin = pCur->pBt->usableSize * 2 / 3; 7793 u8 aBalanceQuickSpace[13]; 7794 u8 *pFree = 0; 7795 7796 TESTONLY( int balance_quick_called = 0 ); 7797 TESTONLY( int balance_deeper_called = 0 ); 7798 7799 do { 7800 int iPage = pCur->iPage; 7801 MemPage *pPage = pCur->apPage[iPage]; 7802 7803 if( iPage==0 ){ 7804 if( pPage->nOverflow ){ 7805 /* The root page of the b-tree is overfull. In this case call the 7806 ** balance_deeper() function to create a new child for the root-page 7807 ** and copy the current contents of the root-page to it. The 7808 ** next iteration of the do-loop will balance the child page. 7809 */ 7810 assert( (balance_deeper_called++)==0 ); 7811 rc = balance_deeper(pPage, &pCur->apPage[1]); 7812 if( rc==SQLITE_OK ){ 7813 pCur->iPage = 1; 7814 pCur->aiIdx[0] = 0; 7815 pCur->aiIdx[1] = 0; 7816 assert( pCur->apPage[1]->nOverflow ); 7817 } 7818 }else{ 7819 break; 7820 } 7821 }else if( pPage->nOverflow==0 && pPage->nFree<=nMin ){ 7822 break; 7823 }else{ 7824 MemPage * const pParent = pCur->apPage[iPage-1]; 7825 int const iIdx = pCur->aiIdx[iPage-1]; 7826 7827 rc = sqlite3PagerWrite(pParent->pDbPage); 7828 if( rc==SQLITE_OK ){ 7829 #ifndef SQLITE_OMIT_QUICKBALANCE 7830 if( pPage->intKeyLeaf 7831 && pPage->nOverflow==1 7832 && pPage->aiOvfl[0]==pPage->nCell 7833 && pParent->pgno!=1 7834 && pParent->nCell==iIdx 7835 ){ 7836 /* Call balance_quick() to create a new sibling of pPage on which 7837 ** to store the overflow cell. balance_quick() inserts a new cell 7838 ** into pParent, which may cause pParent overflow. If this 7839 ** happens, the next iteration of the do-loop will balance pParent 7840 ** use either balance_nonroot() or balance_deeper(). Until this 7841 ** happens, the overflow cell is stored in the aBalanceQuickSpace[] 7842 ** buffer. 7843 ** 7844 ** The purpose of the following assert() is to check that only a 7845 ** single call to balance_quick() is made for each call to this 7846 ** function. If this were not verified, a subtle bug involving reuse 7847 ** of the aBalanceQuickSpace[] might sneak in. 7848 */ 7849 assert( (balance_quick_called++)==0 ); 7850 rc = balance_quick(pParent, pPage, aBalanceQuickSpace); 7851 }else 7852 #endif 7853 { 7854 /* In this case, call balance_nonroot() to redistribute cells 7855 ** between pPage and up to 2 of its sibling pages. This involves 7856 ** modifying the contents of pParent, which may cause pParent to 7857 ** become overfull or underfull. The next iteration of the do-loop 7858 ** will balance the parent page to correct this. 7859 ** 7860 ** If the parent page becomes overfull, the overflow cell or cells 7861 ** are stored in the pSpace buffer allocated immediately below. 7862 ** A subsequent iteration of the do-loop will deal with this by 7863 ** calling balance_nonroot() (balance_deeper() may be called first, 7864 ** but it doesn't deal with overflow cells - just moves them to a 7865 ** different page). Once this subsequent call to balance_nonroot() 7866 ** has completed, it is safe to release the pSpace buffer used by 7867 ** the previous call, as the overflow cell data will have been 7868 ** copied either into the body of a database page or into the new 7869 ** pSpace buffer passed to the latter call to balance_nonroot(). 7870 */ 7871 u8 *pSpace = sqlite3PageMalloc(pCur->pBt->pageSize); 7872 rc = balance_nonroot(pParent, iIdx, pSpace, iPage==1, 7873 pCur->hints&BTREE_BULKLOAD); 7874 if( pFree ){ 7875 /* If pFree is not NULL, it points to the pSpace buffer used 7876 ** by a previous call to balance_nonroot(). Its contents are 7877 ** now stored either on real database pages or within the 7878 ** new pSpace buffer, so it may be safely freed here. */ 7879 sqlite3PageFree(pFree); 7880 } 7881 7882 /* The pSpace buffer will be freed after the next call to 7883 ** balance_nonroot(), or just before this function returns, whichever 7884 ** comes first. */ 7885 pFree = pSpace; 7886 } 7887 } 7888 7889 pPage->nOverflow = 0; 7890 7891 /* The next iteration of the do-loop balances the parent page. */ 7892 releasePage(pPage); 7893 pCur->iPage--; 7894 assert( pCur->iPage>=0 ); 7895 } 7896 }while( rc==SQLITE_OK ); 7897 7898 if( pFree ){ 7899 sqlite3PageFree(pFree); 7900 } 7901 return rc; 7902 } 7903 7904 7905 /* 7906 ** Insert a new record into the BTree. The key is given by (pKey,nKey) 7907 ** and the data is given by (pData,nData). The cursor is used only to 7908 ** define what table the record should be inserted into. The cursor 7909 ** is left pointing at a random location. 7910 ** 7911 ** For an INTKEY table, only the nKey value of the key is used. pKey is 7912 ** ignored. For a ZERODATA table, the pData and nData are both ignored. 7913 ** 7914 ** If the seekResult parameter is non-zero, then a successful call to 7915 ** MovetoUnpacked() to seek cursor pCur to (pKey, nKey) has already 7916 ** been performed. seekResult is the search result returned (a negative 7917 ** number if pCur points at an entry that is smaller than (pKey, nKey), or 7918 ** a positive value if pCur points at an entry that is larger than 7919 ** (pKey, nKey)). 7920 ** 7921 ** If the seekResult parameter is non-zero, then the caller guarantees that 7922 ** cursor pCur is pointing at the existing copy of a row that is to be 7923 ** overwritten. If the seekResult parameter is 0, then cursor pCur may 7924 ** point to any entry or to no entry at all and so this function has to seek 7925 ** the cursor before the new key can be inserted. 7926 */ 7927 int sqlite3BtreeInsert( 7928 BtCursor *pCur, /* Insert data into the table of this cursor */ 7929 const void *pKey, i64 nKey, /* The key of the new record */ 7930 const void *pData, int nData, /* The data of the new record */ 7931 int nZero, /* Number of extra 0 bytes to append to data */ 7932 int appendBias, /* True if this is likely an append */ 7933 int seekResult /* Result of prior MovetoUnpacked() call */ 7934 ){ 7935 int rc; 7936 int loc = seekResult; /* -1: before desired location +1: after */ 7937 int szNew = 0; 7938 int idx; 7939 MemPage *pPage; 7940 Btree *p = pCur->pBtree; 7941 BtShared *pBt = p->pBt; 7942 unsigned char *oldCell; 7943 unsigned char *newCell = 0; 7944 7945 if( pCur->eState==CURSOR_FAULT ){ 7946 assert( pCur->skipNext!=SQLITE_OK ); 7947 return pCur->skipNext; 7948 } 7949 7950 assert( cursorHoldsMutex(pCur) ); 7951 assert( (pCur->curFlags & BTCF_WriteFlag)!=0 7952 && pBt->inTransaction==TRANS_WRITE 7953 && (pBt->btsFlags & BTS_READ_ONLY)==0 ); 7954 assert( hasSharedCacheTableLock(p, pCur->pgnoRoot, pCur->pKeyInfo!=0, 2) ); 7955 7956 /* Assert that the caller has been consistent. If this cursor was opened 7957 ** expecting an index b-tree, then the caller should be inserting blob 7958 ** keys with no associated data. If the cursor was opened expecting an 7959 ** intkey table, the caller should be inserting integer keys with a 7960 ** blob of associated data. */ 7961 assert( (pKey==0)==(pCur->pKeyInfo==0) ); 7962 7963 /* Save the positions of any other cursors open on this table. 7964 ** 7965 ** In some cases, the call to btreeMoveto() below is a no-op. For 7966 ** example, when inserting data into a table with auto-generated integer 7967 ** keys, the VDBE layer invokes sqlite3BtreeLast() to figure out the 7968 ** integer key to use. It then calls this function to actually insert the 7969 ** data into the intkey B-Tree. In this case btreeMoveto() recognizes 7970 ** that the cursor is already where it needs to be and returns without 7971 ** doing any work. To avoid thwarting these optimizations, it is important 7972 ** not to clear the cursor here. 7973 */ 7974 if( pCur->curFlags & BTCF_Multiple ){ 7975 rc = saveAllCursors(pBt, pCur->pgnoRoot, pCur); 7976 if( rc ) return rc; 7977 } 7978 7979 if( pCur->pKeyInfo==0 ){ 7980 assert( pKey==0 ); 7981 /* If this is an insert into a table b-tree, invalidate any incrblob 7982 ** cursors open on the row being replaced */ 7983 invalidateIncrblobCursors(p, nKey, 0); 7984 7985 /* If the cursor is currently on the last row and we are appending a 7986 ** new row onto the end, set the "loc" to avoid an unnecessary 7987 ** btreeMoveto() call */ 7988 if( (pCur->curFlags&BTCF_ValidNKey)!=0 && nKey>0 7989 && pCur->info.nKey==nKey-1 ){ 7990 loc = -1; 7991 }else if( loc==0 ){ 7992 rc = sqlite3BtreeMovetoUnpacked(pCur, 0, nKey, appendBias, &loc); 7993 if( rc ) return rc; 7994 } 7995 }else if( loc==0 ){ 7996 rc = btreeMoveto(pCur, pKey, nKey, appendBias, &loc); 7997 if( rc ) return rc; 7998 } 7999 assert( pCur->eState==CURSOR_VALID || (pCur->eState==CURSOR_INVALID && loc) ); 8000 8001 pPage = pCur->apPage[pCur->iPage]; 8002 assert( pPage->intKey || nKey>=0 ); 8003 assert( pPage->leaf || !pPage->intKey ); 8004 8005 TRACE(("INSERT: table=%d nkey=%lld ndata=%d page=%d %s\n", 8006 pCur->pgnoRoot, nKey, nData, pPage->pgno, 8007 loc==0 ? "overwrite" : "new entry")); 8008 assert( pPage->isInit ); 8009 newCell = pBt->pTmpSpace; 8010 assert( newCell!=0 ); 8011 rc = fillInCell(pPage, newCell, pKey, nKey, pData, nData, nZero, &szNew); 8012 if( rc ) goto end_insert; 8013 assert( szNew==pPage->xCellSize(pPage, newCell) ); 8014 assert( szNew <= MX_CELL_SIZE(pBt) ); 8015 idx = pCur->aiIdx[pCur->iPage]; 8016 if( loc==0 ){ 8017 u16 szOld; 8018 assert( idx<pPage->nCell ); 8019 rc = sqlite3PagerWrite(pPage->pDbPage); 8020 if( rc ){ 8021 goto end_insert; 8022 } 8023 oldCell = findCell(pPage, idx); 8024 if( !pPage->leaf ){ 8025 memcpy(newCell, oldCell, 4); 8026 } 8027 rc = clearCell(pPage, oldCell, &szOld); 8028 dropCell(pPage, idx, szOld, &rc); 8029 if( rc ) goto end_insert; 8030 }else if( loc<0 && pPage->nCell>0 ){ 8031 assert( pPage->leaf ); 8032 idx = ++pCur->aiIdx[pCur->iPage]; 8033 }else{ 8034 assert( pPage->leaf ); 8035 } 8036 insertCell(pPage, idx, newCell, szNew, 0, 0, &rc); 8037 assert( rc!=SQLITE_OK || pPage->nCell>0 || pPage->nOverflow>0 ); 8038 8039 /* If no error has occurred and pPage has an overflow cell, call balance() 8040 ** to redistribute the cells within the tree. Since balance() may move 8041 ** the cursor, zero the BtCursor.info.nSize and BTCF_ValidNKey 8042 ** variables. 8043 ** 8044 ** Previous versions of SQLite called moveToRoot() to move the cursor 8045 ** back to the root page as balance() used to invalidate the contents 8046 ** of BtCursor.apPage[] and BtCursor.aiIdx[]. Instead of doing that, 8047 ** set the cursor state to "invalid". This makes common insert operations 8048 ** slightly faster. 8049 ** 8050 ** There is a subtle but important optimization here too. When inserting 8051 ** multiple records into an intkey b-tree using a single cursor (as can 8052 ** happen while processing an "INSERT INTO ... SELECT" statement), it 8053 ** is advantageous to leave the cursor pointing to the last entry in 8054 ** the b-tree if possible. If the cursor is left pointing to the last 8055 ** entry in the table, and the next row inserted has an integer key 8056 ** larger than the largest existing key, it is possible to insert the 8057 ** row without seeking the cursor. This can be a big performance boost. 8058 */ 8059 pCur->info.nSize = 0; 8060 if( rc==SQLITE_OK && pPage->nOverflow ){ 8061 pCur->curFlags &= ~(BTCF_ValidNKey); 8062 rc = balance(pCur); 8063 8064 /* Must make sure nOverflow is reset to zero even if the balance() 8065 ** fails. Internal data structure corruption will result otherwise. 8066 ** Also, set the cursor state to invalid. This stops saveCursorPosition() 8067 ** from trying to save the current position of the cursor. */ 8068 pCur->apPage[pCur->iPage]->nOverflow = 0; 8069 pCur->eState = CURSOR_INVALID; 8070 } 8071 assert( pCur->apPage[pCur->iPage]->nOverflow==0 ); 8072 8073 end_insert: 8074 return rc; 8075 } 8076 8077 /* 8078 ** Delete the entry that the cursor is pointing to. 8079 ** 8080 ** If the second parameter is zero, then the cursor is left pointing at an 8081 ** arbitrary location after the delete. If it is non-zero, then the cursor 8082 ** is left in a state such that the next call to BtreeNext() or BtreePrev() 8083 ** moves it to the same row as it would if the call to BtreeDelete() had 8084 ** been omitted. 8085 */ 8086 int sqlite3BtreeDelete(BtCursor *pCur, int bPreserve){ 8087 Btree *p = pCur->pBtree; 8088 BtShared *pBt = p->pBt; 8089 int rc; /* Return code */ 8090 MemPage *pPage; /* Page to delete cell from */ 8091 unsigned char *pCell; /* Pointer to cell to delete */ 8092 int iCellIdx; /* Index of cell to delete */ 8093 int iCellDepth; /* Depth of node containing pCell */ 8094 u16 szCell; /* Size of the cell being deleted */ 8095 int bSkipnext = 0; /* Leaf cursor in SKIPNEXT state */ 8096 8097 assert( cursorHoldsMutex(pCur) ); 8098 assert( pBt->inTransaction==TRANS_WRITE ); 8099 assert( (pBt->btsFlags & BTS_READ_ONLY)==0 ); 8100 assert( pCur->curFlags & BTCF_WriteFlag ); 8101 assert( hasSharedCacheTableLock(p, pCur->pgnoRoot, pCur->pKeyInfo!=0, 2) ); 8102 assert( !hasReadConflicts(p, pCur->pgnoRoot) ); 8103 assert( pCur->aiIdx[pCur->iPage]<pCur->apPage[pCur->iPage]->nCell ); 8104 assert( pCur->eState==CURSOR_VALID ); 8105 8106 iCellDepth = pCur->iPage; 8107 iCellIdx = pCur->aiIdx[iCellDepth]; 8108 pPage = pCur->apPage[iCellDepth]; 8109 pCell = findCell(pPage, iCellIdx); 8110 8111 /* If the page containing the entry to delete is not a leaf page, move 8112 ** the cursor to the largest entry in the tree that is smaller than 8113 ** the entry being deleted. This cell will replace the cell being deleted 8114 ** from the internal node. The 'previous' entry is used for this instead 8115 ** of the 'next' entry, as the previous entry is always a part of the 8116 ** sub-tree headed by the child page of the cell being deleted. This makes 8117 ** balancing the tree following the delete operation easier. */ 8118 if( !pPage->leaf ){ 8119 int notUsed = 0; 8120 rc = sqlite3BtreePrevious(pCur, ¬Used); 8121 if( rc ) return rc; 8122 } 8123 8124 /* Save the positions of any other cursors open on this table before 8125 ** making any modifications. */ 8126 if( pCur->curFlags & BTCF_Multiple ){ 8127 rc = saveAllCursors(pBt, pCur->pgnoRoot, pCur); 8128 if( rc ) return rc; 8129 } 8130 8131 /* If this is a delete operation to remove a row from a table b-tree, 8132 ** invalidate any incrblob cursors open on the row being deleted. */ 8133 if( pCur->pKeyInfo==0 ){ 8134 invalidateIncrblobCursors(p, pCur->info.nKey, 0); 8135 } 8136 8137 /* If the bPreserve flag is set to true, then the cursor position must 8138 ** be preserved following this delete operation. If the current delete 8139 ** will cause a b-tree rebalance, then this is done by saving the cursor 8140 ** key and leaving the cursor in CURSOR_REQUIRESEEK state before 8141 ** returning. 8142 ** 8143 ** Or, if the current delete will not cause a rebalance, then the cursor 8144 ** will be left in CURSOR_SKIPNEXT state pointing to the entry immediately 8145 ** before or after the deleted entry. In this case set bSkipnext to true. */ 8146 if( bPreserve ){ 8147 if( !pPage->leaf 8148 || (pPage->nFree+cellSizePtr(pPage,pCell)+2)>(int)(pBt->usableSize*2/3) 8149 ){ 8150 /* A b-tree rebalance will be required after deleting this entry. 8151 ** Save the cursor key. */ 8152 rc = saveCursorKey(pCur); 8153 if( rc ) return rc; 8154 }else{ 8155 bSkipnext = 1; 8156 } 8157 } 8158 8159 /* Make the page containing the entry to be deleted writable. Then free any 8160 ** overflow pages associated with the entry and finally remove the cell 8161 ** itself from within the page. */ 8162 rc = sqlite3PagerWrite(pPage->pDbPage); 8163 if( rc ) return rc; 8164 rc = clearCell(pPage, pCell, &szCell); 8165 dropCell(pPage, iCellIdx, szCell, &rc); 8166 if( rc ) return rc; 8167 8168 /* If the cell deleted was not located on a leaf page, then the cursor 8169 ** is currently pointing to the largest entry in the sub-tree headed 8170 ** by the child-page of the cell that was just deleted from an internal 8171 ** node. The cell from the leaf node needs to be moved to the internal 8172 ** node to replace the deleted cell. */ 8173 if( !pPage->leaf ){ 8174 MemPage *pLeaf = pCur->apPage[pCur->iPage]; 8175 int nCell; 8176 Pgno n = pCur->apPage[iCellDepth+1]->pgno; 8177 unsigned char *pTmp; 8178 8179 pCell = findCell(pLeaf, pLeaf->nCell-1); 8180 if( pCell<&pLeaf->aData[4] ) return SQLITE_CORRUPT_BKPT; 8181 nCell = pLeaf->xCellSize(pLeaf, pCell); 8182 assert( MX_CELL_SIZE(pBt) >= nCell ); 8183 pTmp = pBt->pTmpSpace; 8184 assert( pTmp!=0 ); 8185 rc = sqlite3PagerWrite(pLeaf->pDbPage); 8186 insertCell(pPage, iCellIdx, pCell-4, nCell+4, pTmp, n, &rc); 8187 dropCell(pLeaf, pLeaf->nCell-1, nCell, &rc); 8188 if( rc ) return rc; 8189 } 8190 8191 /* Balance the tree. If the entry deleted was located on a leaf page, 8192 ** then the cursor still points to that page. In this case the first 8193 ** call to balance() repairs the tree, and the if(...) condition is 8194 ** never true. 8195 ** 8196 ** Otherwise, if the entry deleted was on an internal node page, then 8197 ** pCur is pointing to the leaf page from which a cell was removed to 8198 ** replace the cell deleted from the internal node. This is slightly 8199 ** tricky as the leaf node may be underfull, and the internal node may 8200 ** be either under or overfull. In this case run the balancing algorithm 8201 ** on the leaf node first. If the balance proceeds far enough up the 8202 ** tree that we can be sure that any problem in the internal node has 8203 ** been corrected, so be it. Otherwise, after balancing the leaf node, 8204 ** walk the cursor up the tree to the internal node and balance it as 8205 ** well. */ 8206 rc = balance(pCur); 8207 if( rc==SQLITE_OK && pCur->iPage>iCellDepth ){ 8208 while( pCur->iPage>iCellDepth ){ 8209 releasePage(pCur->apPage[pCur->iPage--]); 8210 } 8211 rc = balance(pCur); 8212 } 8213 8214 if( rc==SQLITE_OK ){ 8215 if( bSkipnext ){ 8216 assert( bPreserve && pCur->iPage==iCellDepth ); 8217 assert( pPage==pCur->apPage[pCur->iPage] ); 8218 assert( (pPage->nCell>0 || CORRUPT_DB) && iCellIdx<=pPage->nCell ); 8219 pCur->eState = CURSOR_SKIPNEXT; 8220 if( iCellIdx>=pPage->nCell ){ 8221 pCur->skipNext = -1; 8222 pCur->aiIdx[iCellDepth] = pPage->nCell-1; 8223 }else{ 8224 pCur->skipNext = 1; 8225 } 8226 }else{ 8227 rc = moveToRoot(pCur); 8228 if( bPreserve ){ 8229 pCur->eState = CURSOR_REQUIRESEEK; 8230 } 8231 } 8232 } 8233 return rc; 8234 } 8235 8236 /* 8237 ** Create a new BTree table. Write into *piTable the page 8238 ** number for the root page of the new table. 8239 ** 8240 ** The type of type is determined by the flags parameter. Only the 8241 ** following values of flags are currently in use. Other values for 8242 ** flags might not work: 8243 ** 8244 ** BTREE_INTKEY|BTREE_LEAFDATA Used for SQL tables with rowid keys 8245 ** BTREE_ZERODATA Used for SQL indices 8246 */ 8247 static int btreeCreateTable(Btree *p, int *piTable, int createTabFlags){ 8248 BtShared *pBt = p->pBt; 8249 MemPage *pRoot; 8250 Pgno pgnoRoot; 8251 int rc; 8252 int ptfFlags; /* Page-type flage for the root page of new table */ 8253 8254 assert( sqlite3BtreeHoldsMutex(p) ); 8255 assert( pBt->inTransaction==TRANS_WRITE ); 8256 assert( (pBt->btsFlags & BTS_READ_ONLY)==0 ); 8257 8258 #ifdef SQLITE_OMIT_AUTOVACUUM 8259 rc = allocateBtreePage(pBt, &pRoot, &pgnoRoot, 1, 0); 8260 if( rc ){ 8261 return rc; 8262 } 8263 #else 8264 if( pBt->autoVacuum ){ 8265 Pgno pgnoMove; /* Move a page here to make room for the root-page */ 8266 MemPage *pPageMove; /* The page to move to. */ 8267 8268 /* Creating a new table may probably require moving an existing database 8269 ** to make room for the new tables root page. In case this page turns 8270 ** out to be an overflow page, delete all overflow page-map caches 8271 ** held by open cursors. 8272 */ 8273 invalidateAllOverflowCache(pBt); 8274 8275 /* Read the value of meta[3] from the database to determine where the 8276 ** root page of the new table should go. meta[3] is the largest root-page 8277 ** created so far, so the new root-page is (meta[3]+1). 8278 */ 8279 sqlite3BtreeGetMeta(p, BTREE_LARGEST_ROOT_PAGE, &pgnoRoot); 8280 pgnoRoot++; 8281 8282 /* The new root-page may not be allocated on a pointer-map page, or the 8283 ** PENDING_BYTE page. 8284 */ 8285 while( pgnoRoot==PTRMAP_PAGENO(pBt, pgnoRoot) || 8286 pgnoRoot==PENDING_BYTE_PAGE(pBt) ){ 8287 pgnoRoot++; 8288 } 8289 assert( pgnoRoot>=3 || CORRUPT_DB ); 8290 testcase( pgnoRoot<3 ); 8291 8292 /* Allocate a page. The page that currently resides at pgnoRoot will 8293 ** be moved to the allocated page (unless the allocated page happens 8294 ** to reside at pgnoRoot). 8295 */ 8296 rc = allocateBtreePage(pBt, &pPageMove, &pgnoMove, pgnoRoot, BTALLOC_EXACT); 8297 if( rc!=SQLITE_OK ){ 8298 return rc; 8299 } 8300 8301 if( pgnoMove!=pgnoRoot ){ 8302 /* pgnoRoot is the page that will be used for the root-page of 8303 ** the new table (assuming an error did not occur). But we were 8304 ** allocated pgnoMove. If required (i.e. if it was not allocated 8305 ** by extending the file), the current page at position pgnoMove 8306 ** is already journaled. 8307 */ 8308 u8 eType = 0; 8309 Pgno iPtrPage = 0; 8310 8311 /* Save the positions of any open cursors. This is required in 8312 ** case they are holding a reference to an xFetch reference 8313 ** corresponding to page pgnoRoot. */ 8314 rc = saveAllCursors(pBt, 0, 0); 8315 releasePage(pPageMove); 8316 if( rc!=SQLITE_OK ){ 8317 return rc; 8318 } 8319 8320 /* Move the page currently at pgnoRoot to pgnoMove. */ 8321 rc = btreeGetPage(pBt, pgnoRoot, &pRoot, 0); 8322 if( rc!=SQLITE_OK ){ 8323 return rc; 8324 } 8325 rc = ptrmapGet(pBt, pgnoRoot, &eType, &iPtrPage); 8326 if( eType==PTRMAP_ROOTPAGE || eType==PTRMAP_FREEPAGE ){ 8327 rc = SQLITE_CORRUPT_BKPT; 8328 } 8329 if( rc!=SQLITE_OK ){ 8330 releasePage(pRoot); 8331 return rc; 8332 } 8333 assert( eType!=PTRMAP_ROOTPAGE ); 8334 assert( eType!=PTRMAP_FREEPAGE ); 8335 rc = relocatePage(pBt, pRoot, eType, iPtrPage, pgnoMove, 0); 8336 releasePage(pRoot); 8337 8338 /* Obtain the page at pgnoRoot */ 8339 if( rc!=SQLITE_OK ){ 8340 return rc; 8341 } 8342 rc = btreeGetPage(pBt, pgnoRoot, &pRoot, 0); 8343 if( rc!=SQLITE_OK ){ 8344 return rc; 8345 } 8346 rc = sqlite3PagerWrite(pRoot->pDbPage); 8347 if( rc!=SQLITE_OK ){ 8348 releasePage(pRoot); 8349 return rc; 8350 } 8351 }else{ 8352 pRoot = pPageMove; 8353 } 8354 8355 /* Update the pointer-map and meta-data with the new root-page number. */ 8356 ptrmapPut(pBt, pgnoRoot, PTRMAP_ROOTPAGE, 0, &rc); 8357 if( rc ){ 8358 releasePage(pRoot); 8359 return rc; 8360 } 8361 8362 /* When the new root page was allocated, page 1 was made writable in 8363 ** order either to increase the database filesize, or to decrement the 8364 ** freelist count. Hence, the sqlite3BtreeUpdateMeta() call cannot fail. 8365 */ 8366 assert( sqlite3PagerIswriteable(pBt->pPage1->pDbPage) ); 8367 rc = sqlite3BtreeUpdateMeta(p, 4, pgnoRoot); 8368 if( NEVER(rc) ){ 8369 releasePage(pRoot); 8370 return rc; 8371 } 8372 8373 }else{ 8374 rc = allocateBtreePage(pBt, &pRoot, &pgnoRoot, 1, 0); 8375 if( rc ) return rc; 8376 } 8377 #endif 8378 assert( sqlite3PagerIswriteable(pRoot->pDbPage) ); 8379 if( createTabFlags & BTREE_INTKEY ){ 8380 ptfFlags = PTF_INTKEY | PTF_LEAFDATA | PTF_LEAF; 8381 }else{ 8382 ptfFlags = PTF_ZERODATA | PTF_LEAF; 8383 } 8384 zeroPage(pRoot, ptfFlags); 8385 sqlite3PagerUnref(pRoot->pDbPage); 8386 assert( (pBt->openFlags & BTREE_SINGLE)==0 || pgnoRoot==2 ); 8387 *piTable = (int)pgnoRoot; 8388 return SQLITE_OK; 8389 } 8390 int sqlite3BtreeCreateTable(Btree *p, int *piTable, int flags){ 8391 int rc; 8392 sqlite3BtreeEnter(p); 8393 rc = btreeCreateTable(p, piTable, flags); 8394 sqlite3BtreeLeave(p); 8395 return rc; 8396 } 8397 8398 /* 8399 ** Erase the given database page and all its children. Return 8400 ** the page to the freelist. 8401 */ 8402 static int clearDatabasePage( 8403 BtShared *pBt, /* The BTree that contains the table */ 8404 Pgno pgno, /* Page number to clear */ 8405 int freePageFlag, /* Deallocate page if true */ 8406 int *pnChange /* Add number of Cells freed to this counter */ 8407 ){ 8408 MemPage *pPage; 8409 int rc; 8410 unsigned char *pCell; 8411 int i; 8412 int hdr; 8413 u16 szCell; 8414 8415 assert( sqlite3_mutex_held(pBt->mutex) ); 8416 if( pgno>btreePagecount(pBt) ){ 8417 return SQLITE_CORRUPT_BKPT; 8418 } 8419 rc = getAndInitPage(pBt, pgno, &pPage, 0, 0); 8420 if( rc ) return rc; 8421 if( pPage->bBusy ){ 8422 rc = SQLITE_CORRUPT_BKPT; 8423 goto cleardatabasepage_out; 8424 } 8425 pPage->bBusy = 1; 8426 hdr = pPage->hdrOffset; 8427 for(i=0; i<pPage->nCell; i++){ 8428 pCell = findCell(pPage, i); 8429 if( !pPage->leaf ){ 8430 rc = clearDatabasePage(pBt, get4byte(pCell), 1, pnChange); 8431 if( rc ) goto cleardatabasepage_out; 8432 } 8433 rc = clearCell(pPage, pCell, &szCell); 8434 if( rc ) goto cleardatabasepage_out; 8435 } 8436 if( !pPage->leaf ){ 8437 rc = clearDatabasePage(pBt, get4byte(&pPage->aData[hdr+8]), 1, pnChange); 8438 if( rc ) goto cleardatabasepage_out; 8439 }else if( pnChange ){ 8440 assert( pPage->intKey || CORRUPT_DB ); 8441 testcase( !pPage->intKey ); 8442 *pnChange += pPage->nCell; 8443 } 8444 if( freePageFlag ){ 8445 freePage(pPage, &rc); 8446 }else if( (rc = sqlite3PagerWrite(pPage->pDbPage))==0 ){ 8447 zeroPage(pPage, pPage->aData[hdr] | PTF_LEAF); 8448 } 8449 8450 cleardatabasepage_out: 8451 pPage->bBusy = 0; 8452 releasePage(pPage); 8453 return rc; 8454 } 8455 8456 /* 8457 ** Delete all information from a single table in the database. iTable is 8458 ** the page number of the root of the table. After this routine returns, 8459 ** the root page is empty, but still exists. 8460 ** 8461 ** This routine will fail with SQLITE_LOCKED if there are any open 8462 ** read cursors on the table. Open write cursors are moved to the 8463 ** root of the table. 8464 ** 8465 ** If pnChange is not NULL, then table iTable must be an intkey table. The 8466 ** integer value pointed to by pnChange is incremented by the number of 8467 ** entries in the table. 8468 */ 8469 int sqlite3BtreeClearTable(Btree *p, int iTable, int *pnChange){ 8470 int rc; 8471 BtShared *pBt = p->pBt; 8472 sqlite3BtreeEnter(p); 8473 assert( p->inTrans==TRANS_WRITE ); 8474 8475 rc = saveAllCursors(pBt, (Pgno)iTable, 0); 8476 8477 if( SQLITE_OK==rc ){ 8478 /* Invalidate all incrblob cursors open on table iTable (assuming iTable 8479 ** is the root of a table b-tree - if it is not, the following call is 8480 ** a no-op). */ 8481 invalidateIncrblobCursors(p, 0, 1); 8482 rc = clearDatabasePage(pBt, (Pgno)iTable, 0, pnChange); 8483 } 8484 sqlite3BtreeLeave(p); 8485 return rc; 8486 } 8487 8488 /* 8489 ** Delete all information from the single table that pCur is open on. 8490 ** 8491 ** This routine only work for pCur on an ephemeral table. 8492 */ 8493 int sqlite3BtreeClearTableOfCursor(BtCursor *pCur){ 8494 return sqlite3BtreeClearTable(pCur->pBtree, pCur->pgnoRoot, 0); 8495 } 8496 8497 /* 8498 ** Erase all information in a table and add the root of the table to 8499 ** the freelist. Except, the root of the principle table (the one on 8500 ** page 1) is never added to the freelist. 8501 ** 8502 ** This routine will fail with SQLITE_LOCKED if there are any open 8503 ** cursors on the table. 8504 ** 8505 ** If AUTOVACUUM is enabled and the page at iTable is not the last 8506 ** root page in the database file, then the last root page 8507 ** in the database file is moved into the slot formerly occupied by 8508 ** iTable and that last slot formerly occupied by the last root page 8509 ** is added to the freelist instead of iTable. In this say, all 8510 ** root pages are kept at the beginning of the database file, which 8511 ** is necessary for AUTOVACUUM to work right. *piMoved is set to the 8512 ** page number that used to be the last root page in the file before 8513 ** the move. If no page gets moved, *piMoved is set to 0. 8514 ** The last root page is recorded in meta[3] and the value of 8515 ** meta[3] is updated by this procedure. 8516 */ 8517 static int btreeDropTable(Btree *p, Pgno iTable, int *piMoved){ 8518 int rc; 8519 MemPage *pPage = 0; 8520 BtShared *pBt = p->pBt; 8521 8522 assert( sqlite3BtreeHoldsMutex(p) ); 8523 assert( p->inTrans==TRANS_WRITE ); 8524 8525 /* It is illegal to drop a table if any cursors are open on the 8526 ** database. This is because in auto-vacuum mode the backend may 8527 ** need to move another root-page to fill a gap left by the deleted 8528 ** root page. If an open cursor was using this page a problem would 8529 ** occur. 8530 ** 8531 ** This error is caught long before control reaches this point. 8532 */ 8533 if( NEVER(pBt->pCursor) ){ 8534 sqlite3ConnectionBlocked(p->db, pBt->pCursor->pBtree->db); 8535 return SQLITE_LOCKED_SHAREDCACHE; 8536 } 8537 8538 rc = btreeGetPage(pBt, (Pgno)iTable, &pPage, 0); 8539 if( rc ) return rc; 8540 rc = sqlite3BtreeClearTable(p, iTable, 0); 8541 if( rc ){ 8542 releasePage(pPage); 8543 return rc; 8544 } 8545 8546 *piMoved = 0; 8547 8548 if( iTable>1 ){ 8549 #ifdef SQLITE_OMIT_AUTOVACUUM 8550 freePage(pPage, &rc); 8551 releasePage(pPage); 8552 #else 8553 if( pBt->autoVacuum ){ 8554 Pgno maxRootPgno; 8555 sqlite3BtreeGetMeta(p, BTREE_LARGEST_ROOT_PAGE, &maxRootPgno); 8556 8557 if( iTable==maxRootPgno ){ 8558 /* If the table being dropped is the table with the largest root-page 8559 ** number in the database, put the root page on the free list. 8560 */ 8561 freePage(pPage, &rc); 8562 releasePage(pPage); 8563 if( rc!=SQLITE_OK ){ 8564 return rc; 8565 } 8566 }else{ 8567 /* The table being dropped does not have the largest root-page 8568 ** number in the database. So move the page that does into the 8569 ** gap left by the deleted root-page. 8570 */ 8571 MemPage *pMove; 8572 releasePage(pPage); 8573 rc = btreeGetPage(pBt, maxRootPgno, &pMove, 0); 8574 if( rc!=SQLITE_OK ){ 8575 return rc; 8576 } 8577 rc = relocatePage(pBt, pMove, PTRMAP_ROOTPAGE, 0, iTable, 0); 8578 releasePage(pMove); 8579 if( rc!=SQLITE_OK ){ 8580 return rc; 8581 } 8582 pMove = 0; 8583 rc = btreeGetPage(pBt, maxRootPgno, &pMove, 0); 8584 freePage(pMove, &rc); 8585 releasePage(pMove); 8586 if( rc!=SQLITE_OK ){ 8587 return rc; 8588 } 8589 *piMoved = maxRootPgno; 8590 } 8591 8592 /* Set the new 'max-root-page' value in the database header. This 8593 ** is the old value less one, less one more if that happens to 8594 ** be a root-page number, less one again if that is the 8595 ** PENDING_BYTE_PAGE. 8596 */ 8597 maxRootPgno--; 8598 while( maxRootPgno==PENDING_BYTE_PAGE(pBt) 8599 || PTRMAP_ISPAGE(pBt, maxRootPgno) ){ 8600 maxRootPgno--; 8601 } 8602 assert( maxRootPgno!=PENDING_BYTE_PAGE(pBt) ); 8603 8604 rc = sqlite3BtreeUpdateMeta(p, 4, maxRootPgno); 8605 }else{ 8606 freePage(pPage, &rc); 8607 releasePage(pPage); 8608 } 8609 #endif 8610 }else{ 8611 /* If sqlite3BtreeDropTable was called on page 1. 8612 ** This really never should happen except in a corrupt 8613 ** database. 8614 */ 8615 zeroPage(pPage, PTF_INTKEY|PTF_LEAF ); 8616 releasePage(pPage); 8617 } 8618 return rc; 8619 } 8620 int sqlite3BtreeDropTable(Btree *p, int iTable, int *piMoved){ 8621 int rc; 8622 sqlite3BtreeEnter(p); 8623 rc = btreeDropTable(p, iTable, piMoved); 8624 sqlite3BtreeLeave(p); 8625 return rc; 8626 } 8627 8628 8629 /* 8630 ** This function may only be called if the b-tree connection already 8631 ** has a read or write transaction open on the database. 8632 ** 8633 ** Read the meta-information out of a database file. Meta[0] 8634 ** is the number of free pages currently in the database. Meta[1] 8635 ** through meta[15] are available for use by higher layers. Meta[0] 8636 ** is read-only, the others are read/write. 8637 ** 8638 ** The schema layer numbers meta values differently. At the schema 8639 ** layer (and the SetCookie and ReadCookie opcodes) the number of 8640 ** free pages is not visible. So Cookie[0] is the same as Meta[1]. 8641 ** 8642 ** This routine treats Meta[BTREE_DATA_VERSION] as a special case. Instead 8643 ** of reading the value out of the header, it instead loads the "DataVersion" 8644 ** from the pager. The BTREE_DATA_VERSION value is not actually stored in the 8645 ** database file. It is a number computed by the pager. But its access 8646 ** pattern is the same as header meta values, and so it is convenient to 8647 ** read it from this routine. 8648 */ 8649 void sqlite3BtreeGetMeta(Btree *p, int idx, u32 *pMeta){ 8650 BtShared *pBt = p->pBt; 8651 8652 sqlite3BtreeEnter(p); 8653 assert( p->inTrans>TRANS_NONE ); 8654 assert( SQLITE_OK==querySharedCacheTableLock(p, MASTER_ROOT, READ_LOCK) ); 8655 assert( pBt->pPage1 ); 8656 assert( idx>=0 && idx<=15 ); 8657 8658 if( idx==BTREE_DATA_VERSION ){ 8659 *pMeta = sqlite3PagerDataVersion(pBt->pPager) + p->iDataVersion; 8660 }else{ 8661 *pMeta = get4byte(&pBt->pPage1->aData[36 + idx*4]); 8662 } 8663 8664 /* If auto-vacuum is disabled in this build and this is an auto-vacuum 8665 ** database, mark the database as read-only. */ 8666 #ifdef SQLITE_OMIT_AUTOVACUUM 8667 if( idx==BTREE_LARGEST_ROOT_PAGE && *pMeta>0 ){ 8668 pBt->btsFlags |= BTS_READ_ONLY; 8669 } 8670 #endif 8671 8672 sqlite3BtreeLeave(p); 8673 } 8674 8675 /* 8676 ** Write meta-information back into the database. Meta[0] is 8677 ** read-only and may not be written. 8678 */ 8679 int sqlite3BtreeUpdateMeta(Btree *p, int idx, u32 iMeta){ 8680 BtShared *pBt = p->pBt; 8681 unsigned char *pP1; 8682 int rc; 8683 assert( idx>=1 && idx<=15 ); 8684 sqlite3BtreeEnter(p); 8685 assert( p->inTrans==TRANS_WRITE ); 8686 assert( pBt->pPage1!=0 ); 8687 pP1 = pBt->pPage1->aData; 8688 rc = sqlite3PagerWrite(pBt->pPage1->pDbPage); 8689 if( rc==SQLITE_OK ){ 8690 put4byte(&pP1[36 + idx*4], iMeta); 8691 #ifndef SQLITE_OMIT_AUTOVACUUM 8692 if( idx==BTREE_INCR_VACUUM ){ 8693 assert( pBt->autoVacuum || iMeta==0 ); 8694 assert( iMeta==0 || iMeta==1 ); 8695 pBt->incrVacuum = (u8)iMeta; 8696 } 8697 #endif 8698 } 8699 sqlite3BtreeLeave(p); 8700 return rc; 8701 } 8702 8703 #ifndef SQLITE_OMIT_BTREECOUNT 8704 /* 8705 ** The first argument, pCur, is a cursor opened on some b-tree. Count the 8706 ** number of entries in the b-tree and write the result to *pnEntry. 8707 ** 8708 ** SQLITE_OK is returned if the operation is successfully executed. 8709 ** Otherwise, if an error is encountered (i.e. an IO error or database 8710 ** corruption) an SQLite error code is returned. 8711 */ 8712 int sqlite3BtreeCount(BtCursor *pCur, i64 *pnEntry){ 8713 i64 nEntry = 0; /* Value to return in *pnEntry */ 8714 int rc; /* Return code */ 8715 8716 if( pCur->pgnoRoot==0 ){ 8717 *pnEntry = 0; 8718 return SQLITE_OK; 8719 } 8720 rc = moveToRoot(pCur); 8721 8722 /* Unless an error occurs, the following loop runs one iteration for each 8723 ** page in the B-Tree structure (not including overflow pages). 8724 */ 8725 while( rc==SQLITE_OK ){ 8726 int iIdx; /* Index of child node in parent */ 8727 MemPage *pPage; /* Current page of the b-tree */ 8728 8729 /* If this is a leaf page or the tree is not an int-key tree, then 8730 ** this page contains countable entries. Increment the entry counter 8731 ** accordingly. 8732 */ 8733 pPage = pCur->apPage[pCur->iPage]; 8734 if( pPage->leaf || !pPage->intKey ){ 8735 nEntry += pPage->nCell; 8736 } 8737 8738 /* pPage is a leaf node. This loop navigates the cursor so that it 8739 ** points to the first interior cell that it points to the parent of 8740 ** the next page in the tree that has not yet been visited. The 8741 ** pCur->aiIdx[pCur->iPage] value is set to the index of the parent cell 8742 ** of the page, or to the number of cells in the page if the next page 8743 ** to visit is the right-child of its parent. 8744 ** 8745 ** If all pages in the tree have been visited, return SQLITE_OK to the 8746 ** caller. 8747 */ 8748 if( pPage->leaf ){ 8749 do { 8750 if( pCur->iPage==0 ){ 8751 /* All pages of the b-tree have been visited. Return successfully. */ 8752 *pnEntry = nEntry; 8753 return moveToRoot(pCur); 8754 } 8755 moveToParent(pCur); 8756 }while ( pCur->aiIdx[pCur->iPage]>=pCur->apPage[pCur->iPage]->nCell ); 8757 8758 pCur->aiIdx[pCur->iPage]++; 8759 pPage = pCur->apPage[pCur->iPage]; 8760 } 8761 8762 /* Descend to the child node of the cell that the cursor currently 8763 ** points at. This is the right-child if (iIdx==pPage->nCell). 8764 */ 8765 iIdx = pCur->aiIdx[pCur->iPage]; 8766 if( iIdx==pPage->nCell ){ 8767 rc = moveToChild(pCur, get4byte(&pPage->aData[pPage->hdrOffset+8])); 8768 }else{ 8769 rc = moveToChild(pCur, get4byte(findCell(pPage, iIdx))); 8770 } 8771 } 8772 8773 /* An error has occurred. Return an error code. */ 8774 return rc; 8775 } 8776 #endif 8777 8778 /* 8779 ** Return the pager associated with a BTree. This routine is used for 8780 ** testing and debugging only. 8781 */ 8782 Pager *sqlite3BtreePager(Btree *p){ 8783 return p->pBt->pPager; 8784 } 8785 8786 #ifndef SQLITE_OMIT_INTEGRITY_CHECK 8787 /* 8788 ** Append a message to the error message string. 8789 */ 8790 static void checkAppendMsg( 8791 IntegrityCk *pCheck, 8792 const char *zFormat, 8793 ... 8794 ){ 8795 va_list ap; 8796 if( !pCheck->mxErr ) return; 8797 pCheck->mxErr--; 8798 pCheck->nErr++; 8799 va_start(ap, zFormat); 8800 if( pCheck->errMsg.nChar ){ 8801 sqlite3StrAccumAppend(&pCheck->errMsg, "\n", 1); 8802 } 8803 if( pCheck->zPfx ){ 8804 sqlite3XPrintf(&pCheck->errMsg, 0, pCheck->zPfx, pCheck->v1, pCheck->v2); 8805 } 8806 sqlite3VXPrintf(&pCheck->errMsg, 1, zFormat, ap); 8807 va_end(ap); 8808 if( pCheck->errMsg.accError==STRACCUM_NOMEM ){ 8809 pCheck->mallocFailed = 1; 8810 } 8811 } 8812 #endif /* SQLITE_OMIT_INTEGRITY_CHECK */ 8813 8814 #ifndef SQLITE_OMIT_INTEGRITY_CHECK 8815 8816 /* 8817 ** Return non-zero if the bit in the IntegrityCk.aPgRef[] array that 8818 ** corresponds to page iPg is already set. 8819 */ 8820 static int getPageReferenced(IntegrityCk *pCheck, Pgno iPg){ 8821 assert( iPg<=pCheck->nPage && sizeof(pCheck->aPgRef[0])==1 ); 8822 return (pCheck->aPgRef[iPg/8] & (1 << (iPg & 0x07))); 8823 } 8824 8825 /* 8826 ** Set the bit in the IntegrityCk.aPgRef[] array that corresponds to page iPg. 8827 */ 8828 static void setPageReferenced(IntegrityCk *pCheck, Pgno iPg){ 8829 assert( iPg<=pCheck->nPage && sizeof(pCheck->aPgRef[0])==1 ); 8830 pCheck->aPgRef[iPg/8] |= (1 << (iPg & 0x07)); 8831 } 8832 8833 8834 /* 8835 ** Add 1 to the reference count for page iPage. If this is the second 8836 ** reference to the page, add an error message to pCheck->zErrMsg. 8837 ** Return 1 if there are 2 or more references to the page and 0 if 8838 ** if this is the first reference to the page. 8839 ** 8840 ** Also check that the page number is in bounds. 8841 */ 8842 static int checkRef(IntegrityCk *pCheck, Pgno iPage){ 8843 if( iPage==0 ) return 1; 8844 if( iPage>pCheck->nPage ){ 8845 checkAppendMsg(pCheck, "invalid page number %d", iPage); 8846 return 1; 8847 } 8848 if( getPageReferenced(pCheck, iPage) ){ 8849 checkAppendMsg(pCheck, "2nd reference to page %d", iPage); 8850 return 1; 8851 } 8852 setPageReferenced(pCheck, iPage); 8853 return 0; 8854 } 8855 8856 #ifndef SQLITE_OMIT_AUTOVACUUM 8857 /* 8858 ** Check that the entry in the pointer-map for page iChild maps to 8859 ** page iParent, pointer type ptrType. If not, append an error message 8860 ** to pCheck. 8861 */ 8862 static void checkPtrmap( 8863 IntegrityCk *pCheck, /* Integrity check context */ 8864 Pgno iChild, /* Child page number */ 8865 u8 eType, /* Expected pointer map type */ 8866 Pgno iParent /* Expected pointer map parent page number */ 8867 ){ 8868 int rc; 8869 u8 ePtrmapType; 8870 Pgno iPtrmapParent; 8871 8872 rc = ptrmapGet(pCheck->pBt, iChild, &ePtrmapType, &iPtrmapParent); 8873 if( rc!=SQLITE_OK ){ 8874 if( rc==SQLITE_NOMEM || rc==SQLITE_IOERR_NOMEM ) pCheck->mallocFailed = 1; 8875 checkAppendMsg(pCheck, "Failed to read ptrmap key=%d", iChild); 8876 return; 8877 } 8878 8879 if( ePtrmapType!=eType || iPtrmapParent!=iParent ){ 8880 checkAppendMsg(pCheck, 8881 "Bad ptr map entry key=%d expected=(%d,%d) got=(%d,%d)", 8882 iChild, eType, iParent, ePtrmapType, iPtrmapParent); 8883 } 8884 } 8885 #endif 8886 8887 /* 8888 ** Check the integrity of the freelist or of an overflow page list. 8889 ** Verify that the number of pages on the list is N. 8890 */ 8891 static void checkList( 8892 IntegrityCk *pCheck, /* Integrity checking context */ 8893 int isFreeList, /* True for a freelist. False for overflow page list */ 8894 int iPage, /* Page number for first page in the list */ 8895 int N /* Expected number of pages in the list */ 8896 ){ 8897 int i; 8898 int expected = N; 8899 int iFirst = iPage; 8900 while( N-- > 0 && pCheck->mxErr ){ 8901 DbPage *pOvflPage; 8902 unsigned char *pOvflData; 8903 if( iPage<1 ){ 8904 checkAppendMsg(pCheck, 8905 "%d of %d pages missing from overflow list starting at %d", 8906 N+1, expected, iFirst); 8907 break; 8908 } 8909 if( checkRef(pCheck, iPage) ) break; 8910 if( sqlite3PagerGet(pCheck->pPager, (Pgno)iPage, &pOvflPage, 0) ){ 8911 checkAppendMsg(pCheck, "failed to get page %d", iPage); 8912 break; 8913 } 8914 pOvflData = (unsigned char *)sqlite3PagerGetData(pOvflPage); 8915 if( isFreeList ){ 8916 int n = get4byte(&pOvflData[4]); 8917 #ifndef SQLITE_OMIT_AUTOVACUUM 8918 if( pCheck->pBt->autoVacuum ){ 8919 checkPtrmap(pCheck, iPage, PTRMAP_FREEPAGE, 0); 8920 } 8921 #endif 8922 if( n>(int)pCheck->pBt->usableSize/4-2 ){ 8923 checkAppendMsg(pCheck, 8924 "freelist leaf count too big on page %d", iPage); 8925 N--; 8926 }else{ 8927 for(i=0; i<n; i++){ 8928 Pgno iFreePage = get4byte(&pOvflData[8+i*4]); 8929 #ifndef SQLITE_OMIT_AUTOVACUUM 8930 if( pCheck->pBt->autoVacuum ){ 8931 checkPtrmap(pCheck, iFreePage, PTRMAP_FREEPAGE, 0); 8932 } 8933 #endif 8934 checkRef(pCheck, iFreePage); 8935 } 8936 N -= n; 8937 } 8938 } 8939 #ifndef SQLITE_OMIT_AUTOVACUUM 8940 else{ 8941 /* If this database supports auto-vacuum and iPage is not the last 8942 ** page in this overflow list, check that the pointer-map entry for 8943 ** the following page matches iPage. 8944 */ 8945 if( pCheck->pBt->autoVacuum && N>0 ){ 8946 i = get4byte(pOvflData); 8947 checkPtrmap(pCheck, i, PTRMAP_OVERFLOW2, iPage); 8948 } 8949 } 8950 #endif 8951 iPage = get4byte(pOvflData); 8952 sqlite3PagerUnref(pOvflPage); 8953 8954 if( isFreeList && N<(iPage!=0) ){ 8955 checkAppendMsg(pCheck, "free-page count in header is too small"); 8956 } 8957 } 8958 } 8959 #endif /* SQLITE_OMIT_INTEGRITY_CHECK */ 8960 8961 /* 8962 ** An implementation of a min-heap. 8963 ** 8964 ** aHeap[0] is the number of elements on the heap. aHeap[1] is the 8965 ** root element. The daughter nodes of aHeap[N] are aHeap[N*2] 8966 ** and aHeap[N*2+1]. 8967 ** 8968 ** The heap property is this: Every node is less than or equal to both 8969 ** of its daughter nodes. A consequence of the heap property is that the 8970 ** root node aHeap[1] is always the minimum value currently in the heap. 8971 ** 8972 ** The btreeHeapInsert() routine inserts an unsigned 32-bit number onto 8973 ** the heap, preserving the heap property. The btreeHeapPull() routine 8974 ** removes the root element from the heap (the minimum value in the heap) 8975 ** and then moves other nodes around as necessary to preserve the heap 8976 ** property. 8977 ** 8978 ** This heap is used for cell overlap and coverage testing. Each u32 8979 ** entry represents the span of a cell or freeblock on a btree page. 8980 ** The upper 16 bits are the index of the first byte of a range and the 8981 ** lower 16 bits are the index of the last byte of that range. 8982 */ 8983 static void btreeHeapInsert(u32 *aHeap, u32 x){ 8984 u32 j, i = ++aHeap[0]; 8985 aHeap[i] = x; 8986 while( (j = i/2)>0 && aHeap[j]>aHeap[i] ){ 8987 x = aHeap[j]; 8988 aHeap[j] = aHeap[i]; 8989 aHeap[i] = x; 8990 i = j; 8991 } 8992 } 8993 static int btreeHeapPull(u32 *aHeap, u32 *pOut){ 8994 u32 j, i, x; 8995 if( (x = aHeap[0])==0 ) return 0; 8996 *pOut = aHeap[1]; 8997 aHeap[1] = aHeap[x]; 8998 aHeap[x] = 0xffffffff; 8999 aHeap[0]--; 9000 i = 1; 9001 while( (j = i*2)<=aHeap[0] ){ 9002 if( aHeap[j]>aHeap[j+1] ) j++; 9003 if( aHeap[i]<aHeap[j] ) break; 9004 x = aHeap[i]; 9005 aHeap[i] = aHeap[j]; 9006 aHeap[j] = x; 9007 i = j; 9008 } 9009 return 1; 9010 } 9011 9012 #ifndef SQLITE_OMIT_INTEGRITY_CHECK 9013 /* 9014 ** Do various sanity checks on a single page of a tree. Return 9015 ** the tree depth. Root pages return 0. Parents of root pages 9016 ** return 1, and so forth. 9017 ** 9018 ** These checks are done: 9019 ** 9020 ** 1. Make sure that cells and freeblocks do not overlap 9021 ** but combine to completely cover the page. 9022 ** 2. Make sure integer cell keys are in order. 9023 ** 3. Check the integrity of overflow pages. 9024 ** 4. Recursively call checkTreePage on all children. 9025 ** 5. Verify that the depth of all children is the same. 9026 */ 9027 static int checkTreePage( 9028 IntegrityCk *pCheck, /* Context for the sanity check */ 9029 int iPage, /* Page number of the page to check */ 9030 i64 *piMinKey, /* Write minimum integer primary key here */ 9031 i64 maxKey /* Error if integer primary key greater than this */ 9032 ){ 9033 MemPage *pPage = 0; /* The page being analyzed */ 9034 int i; /* Loop counter */ 9035 int rc; /* Result code from subroutine call */ 9036 int depth = -1, d2; /* Depth of a subtree */ 9037 int pgno; /* Page number */ 9038 int nFrag; /* Number of fragmented bytes on the page */ 9039 int hdr; /* Offset to the page header */ 9040 int cellStart; /* Offset to the start of the cell pointer array */ 9041 int nCell; /* Number of cells */ 9042 int doCoverageCheck = 1; /* True if cell coverage checking should be done */ 9043 int keyCanBeEqual = 1; /* True if IPK can be equal to maxKey 9044 ** False if IPK must be strictly less than maxKey */ 9045 u8 *data; /* Page content */ 9046 u8 *pCell; /* Cell content */ 9047 u8 *pCellIdx; /* Next element of the cell pointer array */ 9048 BtShared *pBt; /* The BtShared object that owns pPage */ 9049 u32 pc; /* Address of a cell */ 9050 u32 usableSize; /* Usable size of the page */ 9051 u32 contentOffset; /* Offset to the start of the cell content area */ 9052 u32 *heap = 0; /* Min-heap used for checking cell coverage */ 9053 u32 x, prev = 0; /* Next and previous entry on the min-heap */ 9054 const char *saved_zPfx = pCheck->zPfx; 9055 int saved_v1 = pCheck->v1; 9056 int saved_v2 = pCheck->v2; 9057 u8 savedIsInit = 0; 9058 9059 /* Check that the page exists 9060 */ 9061 pBt = pCheck->pBt; 9062 usableSize = pBt->usableSize; 9063 if( iPage==0 ) return 0; 9064 if( checkRef(pCheck, iPage) ) return 0; 9065 pCheck->zPfx = "Page %d: "; 9066 pCheck->v1 = iPage; 9067 if( (rc = btreeGetPage(pBt, (Pgno)iPage, &pPage, 0))!=0 ){ 9068 checkAppendMsg(pCheck, 9069 "unable to get the page. error code=%d", rc); 9070 goto end_of_check; 9071 } 9072 9073 /* Clear MemPage.isInit to make sure the corruption detection code in 9074 ** btreeInitPage() is executed. */ 9075 savedIsInit = pPage->isInit; 9076 pPage->isInit = 0; 9077 if( (rc = btreeInitPage(pPage))!=0 ){ 9078 assert( rc==SQLITE_CORRUPT ); /* The only possible error from InitPage */ 9079 checkAppendMsg(pCheck, 9080 "btreeInitPage() returns error code %d", rc); 9081 goto end_of_check; 9082 } 9083 data = pPage->aData; 9084 hdr = pPage->hdrOffset; 9085 9086 /* Set up for cell analysis */ 9087 pCheck->zPfx = "On tree page %d cell %d: "; 9088 contentOffset = get2byteNotZero(&data[hdr+5]); 9089 assert( contentOffset<=usableSize ); /* Enforced by btreeInitPage() */ 9090 9091 /* EVIDENCE-OF: R-37002-32774 The two-byte integer at offset 3 gives the 9092 ** number of cells on the page. */ 9093 nCell = get2byte(&data[hdr+3]); 9094 assert( pPage->nCell==nCell ); 9095 9096 /* EVIDENCE-OF: R-23882-45353 The cell pointer array of a b-tree page 9097 ** immediately follows the b-tree page header. */ 9098 cellStart = hdr + 12 - 4*pPage->leaf; 9099 assert( pPage->aCellIdx==&data[cellStart] ); 9100 pCellIdx = &data[cellStart + 2*(nCell-1)]; 9101 9102 if( !pPage->leaf ){ 9103 /* Analyze the right-child page of internal pages */ 9104 pgno = get4byte(&data[hdr+8]); 9105 #ifndef SQLITE_OMIT_AUTOVACUUM 9106 if( pBt->autoVacuum ){ 9107 pCheck->zPfx = "On page %d at right child: "; 9108 checkPtrmap(pCheck, pgno, PTRMAP_BTREE, iPage); 9109 } 9110 #endif 9111 depth = checkTreePage(pCheck, pgno, &maxKey, maxKey); 9112 keyCanBeEqual = 0; 9113 }else{ 9114 /* For leaf pages, the coverage check will occur in the same loop 9115 ** as the other cell checks, so initialize the heap. */ 9116 heap = pCheck->heap; 9117 heap[0] = 0; 9118 } 9119 9120 /* EVIDENCE-OF: R-02776-14802 The cell pointer array consists of K 2-byte 9121 ** integer offsets to the cell contents. */ 9122 for(i=nCell-1; i>=0 && pCheck->mxErr; i--){ 9123 CellInfo info; 9124 9125 /* Check cell size */ 9126 pCheck->v2 = i; 9127 assert( pCellIdx==&data[cellStart + i*2] ); 9128 pc = get2byteAligned(pCellIdx); 9129 pCellIdx -= 2; 9130 if( pc<contentOffset || pc>usableSize-4 ){ 9131 checkAppendMsg(pCheck, "Offset %d out of range %d..%d", 9132 pc, contentOffset, usableSize-4); 9133 doCoverageCheck = 0; 9134 continue; 9135 } 9136 pCell = &data[pc]; 9137 pPage->xParseCell(pPage, pCell, &info); 9138 if( pc+info.nSize>usableSize ){ 9139 checkAppendMsg(pCheck, "Extends off end of page"); 9140 doCoverageCheck = 0; 9141 continue; 9142 } 9143 9144 /* Check for integer primary key out of range */ 9145 if( pPage->intKey ){ 9146 if( keyCanBeEqual ? (info.nKey > maxKey) : (info.nKey >= maxKey) ){ 9147 checkAppendMsg(pCheck, "Rowid %lld out of order", info.nKey); 9148 } 9149 maxKey = info.nKey; 9150 } 9151 9152 /* Check the content overflow list */ 9153 if( info.nPayload>info.nLocal ){ 9154 int nPage; /* Number of pages on the overflow chain */ 9155 Pgno pgnoOvfl; /* First page of the overflow chain */ 9156 assert( pc + info.iOverflow <= usableSize ); 9157 nPage = (info.nPayload - info.nLocal + usableSize - 5)/(usableSize - 4); 9158 pgnoOvfl = get4byte(&pCell[info.iOverflow]); 9159 #ifndef SQLITE_OMIT_AUTOVACUUM 9160 if( pBt->autoVacuum ){ 9161 checkPtrmap(pCheck, pgnoOvfl, PTRMAP_OVERFLOW1, iPage); 9162 } 9163 #endif 9164 checkList(pCheck, 0, pgnoOvfl, nPage); 9165 } 9166 9167 if( !pPage->leaf ){ 9168 /* Check sanity of left child page for internal pages */ 9169 pgno = get4byte(pCell); 9170 #ifndef SQLITE_OMIT_AUTOVACUUM 9171 if( pBt->autoVacuum ){ 9172 checkPtrmap(pCheck, pgno, PTRMAP_BTREE, iPage); 9173 } 9174 #endif 9175 d2 = checkTreePage(pCheck, pgno, &maxKey, maxKey); 9176 keyCanBeEqual = 0; 9177 if( d2!=depth ){ 9178 checkAppendMsg(pCheck, "Child page depth differs"); 9179 depth = d2; 9180 } 9181 }else{ 9182 /* Populate the coverage-checking heap for leaf pages */ 9183 btreeHeapInsert(heap, (pc<<16)|(pc+info.nSize-1)); 9184 } 9185 } 9186 *piMinKey = maxKey; 9187 9188 /* Check for complete coverage of the page 9189 */ 9190 pCheck->zPfx = 0; 9191 if( doCoverageCheck && pCheck->mxErr>0 ){ 9192 /* For leaf pages, the min-heap has already been initialized and the 9193 ** cells have already been inserted. But for internal pages, that has 9194 ** not yet been done, so do it now */ 9195 if( !pPage->leaf ){ 9196 heap = pCheck->heap; 9197 heap[0] = 0; 9198 for(i=nCell-1; i>=0; i--){ 9199 u32 size; 9200 pc = get2byteAligned(&data[cellStart+i*2]); 9201 size = pPage->xCellSize(pPage, &data[pc]); 9202 btreeHeapInsert(heap, (pc<<16)|(pc+size-1)); 9203 } 9204 } 9205 /* Add the freeblocks to the min-heap 9206 ** 9207 ** EVIDENCE-OF: R-20690-50594 The second field of the b-tree page header 9208 ** is the offset of the first freeblock, or zero if there are no 9209 ** freeblocks on the page. 9210 */ 9211 i = get2byte(&data[hdr+1]); 9212 while( i>0 ){ 9213 int size, j; 9214 assert( (u32)i<=usableSize-4 ); /* Enforced by btreeInitPage() */ 9215 size = get2byte(&data[i+2]); 9216 assert( (u32)(i+size)<=usableSize ); /* Enforced by btreeInitPage() */ 9217 btreeHeapInsert(heap, (((u32)i)<<16)|(i+size-1)); 9218 /* EVIDENCE-OF: R-58208-19414 The first 2 bytes of a freeblock are a 9219 ** big-endian integer which is the offset in the b-tree page of the next 9220 ** freeblock in the chain, or zero if the freeblock is the last on the 9221 ** chain. */ 9222 j = get2byte(&data[i]); 9223 /* EVIDENCE-OF: R-06866-39125 Freeblocks are always connected in order of 9224 ** increasing offset. */ 9225 assert( j==0 || j>i+size ); /* Enforced by btreeInitPage() */ 9226 assert( (u32)j<=usableSize-4 ); /* Enforced by btreeInitPage() */ 9227 i = j; 9228 } 9229 /* Analyze the min-heap looking for overlap between cells and/or 9230 ** freeblocks, and counting the number of untracked bytes in nFrag. 9231 ** 9232 ** Each min-heap entry is of the form: (start_address<<16)|end_address. 9233 ** There is an implied first entry the covers the page header, the cell 9234 ** pointer index, and the gap between the cell pointer index and the start 9235 ** of cell content. 9236 ** 9237 ** The loop below pulls entries from the min-heap in order and compares 9238 ** the start_address against the previous end_address. If there is an 9239 ** overlap, that means bytes are used multiple times. If there is a gap, 9240 ** that gap is added to the fragmentation count. 9241 */ 9242 nFrag = 0; 9243 prev = contentOffset - 1; /* Implied first min-heap entry */ 9244 while( btreeHeapPull(heap,&x) ){ 9245 if( (prev&0xffff)>=(x>>16) ){ 9246 checkAppendMsg(pCheck, 9247 "Multiple uses for byte %u of page %d", x>>16, iPage); 9248 break; 9249 }else{ 9250 nFrag += (x>>16) - (prev&0xffff) - 1; 9251 prev = x; 9252 } 9253 } 9254 nFrag += usableSize - (prev&0xffff) - 1; 9255 /* EVIDENCE-OF: R-43263-13491 The total number of bytes in all fragments 9256 ** is stored in the fifth field of the b-tree page header. 9257 ** EVIDENCE-OF: R-07161-27322 The one-byte integer at offset 7 gives the 9258 ** number of fragmented free bytes within the cell content area. 9259 */ 9260 if( heap[0]==0 && nFrag!=data[hdr+7] ){ 9261 checkAppendMsg(pCheck, 9262 "Fragmentation of %d bytes reported as %d on page %d", 9263 nFrag, data[hdr+7], iPage); 9264 } 9265 } 9266 9267 end_of_check: 9268 if( !doCoverageCheck ) pPage->isInit = savedIsInit; 9269 releasePage(pPage); 9270 pCheck->zPfx = saved_zPfx; 9271 pCheck->v1 = saved_v1; 9272 pCheck->v2 = saved_v2; 9273 return depth+1; 9274 } 9275 #endif /* SQLITE_OMIT_INTEGRITY_CHECK */ 9276 9277 #ifndef SQLITE_OMIT_INTEGRITY_CHECK 9278 /* 9279 ** This routine does a complete check of the given BTree file. aRoot[] is 9280 ** an array of pages numbers were each page number is the root page of 9281 ** a table. nRoot is the number of entries in aRoot. 9282 ** 9283 ** A read-only or read-write transaction must be opened before calling 9284 ** this function. 9285 ** 9286 ** Write the number of error seen in *pnErr. Except for some memory 9287 ** allocation errors, an error message held in memory obtained from 9288 ** malloc is returned if *pnErr is non-zero. If *pnErr==0 then NULL is 9289 ** returned. If a memory allocation error occurs, NULL is returned. 9290 */ 9291 char *sqlite3BtreeIntegrityCheck( 9292 Btree *p, /* The btree to be checked */ 9293 int *aRoot, /* An array of root pages numbers for individual trees */ 9294 int nRoot, /* Number of entries in aRoot[] */ 9295 int mxErr, /* Stop reporting errors after this many */ 9296 int *pnErr /* Write number of errors seen to this variable */ 9297 ){ 9298 Pgno i; 9299 IntegrityCk sCheck; 9300 BtShared *pBt = p->pBt; 9301 int savedDbFlags = pBt->db->flags; 9302 char zErr[100]; 9303 VVA_ONLY( int nRef ); 9304 9305 sqlite3BtreeEnter(p); 9306 assert( p->inTrans>TRANS_NONE && pBt->inTransaction>TRANS_NONE ); 9307 assert( (nRef = sqlite3PagerRefcount(pBt->pPager))>=0 ); 9308 sCheck.pBt = pBt; 9309 sCheck.pPager = pBt->pPager; 9310 sCheck.nPage = btreePagecount(sCheck.pBt); 9311 sCheck.mxErr = mxErr; 9312 sCheck.nErr = 0; 9313 sCheck.mallocFailed = 0; 9314 sCheck.zPfx = 0; 9315 sCheck.v1 = 0; 9316 sCheck.v2 = 0; 9317 sCheck.aPgRef = 0; 9318 sCheck.heap = 0; 9319 sqlite3StrAccumInit(&sCheck.errMsg, 0, zErr, sizeof(zErr), SQLITE_MAX_LENGTH); 9320 if( sCheck.nPage==0 ){ 9321 goto integrity_ck_cleanup; 9322 } 9323 9324 sCheck.aPgRef = sqlite3MallocZero((sCheck.nPage / 8)+ 1); 9325 if( !sCheck.aPgRef ){ 9326 sCheck.mallocFailed = 1; 9327 goto integrity_ck_cleanup; 9328 } 9329 sCheck.heap = (u32*)sqlite3PageMalloc( pBt->pageSize ); 9330 if( sCheck.heap==0 ){ 9331 sCheck.mallocFailed = 1; 9332 goto integrity_ck_cleanup; 9333 } 9334 9335 i = PENDING_BYTE_PAGE(pBt); 9336 if( i<=sCheck.nPage ) setPageReferenced(&sCheck, i); 9337 9338 /* Check the integrity of the freelist 9339 */ 9340 sCheck.zPfx = "Main freelist: "; 9341 checkList(&sCheck, 1, get4byte(&pBt->pPage1->aData[32]), 9342 get4byte(&pBt->pPage1->aData[36])); 9343 sCheck.zPfx = 0; 9344 9345 /* Check all the tables. 9346 */ 9347 testcase( pBt->db->flags & SQLITE_CellSizeCk ); 9348 pBt->db->flags &= ~SQLITE_CellSizeCk; 9349 for(i=0; (int)i<nRoot && sCheck.mxErr; i++){ 9350 i64 notUsed; 9351 if( aRoot[i]==0 ) continue; 9352 #ifndef SQLITE_OMIT_AUTOVACUUM 9353 if( pBt->autoVacuum && aRoot[i]>1 ){ 9354 checkPtrmap(&sCheck, aRoot[i], PTRMAP_ROOTPAGE, 0); 9355 } 9356 #endif 9357 checkTreePage(&sCheck, aRoot[i], ¬Used, LARGEST_INT64); 9358 } 9359 pBt->db->flags = savedDbFlags; 9360 9361 /* Make sure every page in the file is referenced 9362 */ 9363 for(i=1; i<=sCheck.nPage && sCheck.mxErr; i++){ 9364 #ifdef SQLITE_OMIT_AUTOVACUUM 9365 if( getPageReferenced(&sCheck, i)==0 ){ 9366 checkAppendMsg(&sCheck, "Page %d is never used", i); 9367 } 9368 #else 9369 /* If the database supports auto-vacuum, make sure no tables contain 9370 ** references to pointer-map pages. 9371 */ 9372 if( getPageReferenced(&sCheck, i)==0 && 9373 (PTRMAP_PAGENO(pBt, i)!=i || !pBt->autoVacuum) ){ 9374 checkAppendMsg(&sCheck, "Page %d is never used", i); 9375 } 9376 if( getPageReferenced(&sCheck, i)!=0 && 9377 (PTRMAP_PAGENO(pBt, i)==i && pBt->autoVacuum) ){ 9378 checkAppendMsg(&sCheck, "Pointer map page %d is referenced", i); 9379 } 9380 #endif 9381 } 9382 9383 /* Clean up and report errors. 9384 */ 9385 integrity_ck_cleanup: 9386 sqlite3PageFree(sCheck.heap); 9387 sqlite3_free(sCheck.aPgRef); 9388 if( sCheck.mallocFailed ){ 9389 sqlite3StrAccumReset(&sCheck.errMsg); 9390 sCheck.nErr++; 9391 } 9392 *pnErr = sCheck.nErr; 9393 if( sCheck.nErr==0 ) sqlite3StrAccumReset(&sCheck.errMsg); 9394 /* Make sure this analysis did not leave any unref() pages. */ 9395 assert( nRef==sqlite3PagerRefcount(pBt->pPager) ); 9396 sqlite3BtreeLeave(p); 9397 return sqlite3StrAccumFinish(&sCheck.errMsg); 9398 } 9399 #endif /* SQLITE_OMIT_INTEGRITY_CHECK */ 9400 9401 /* 9402 ** Return the full pathname of the underlying database file. Return 9403 ** an empty string if the database is in-memory or a TEMP database. 9404 ** 9405 ** The pager filename is invariant as long as the pager is 9406 ** open so it is safe to access without the BtShared mutex. 9407 */ 9408 const char *sqlite3BtreeGetFilename(Btree *p){ 9409 assert( p->pBt->pPager!=0 ); 9410 return sqlite3PagerFilename(p->pBt->pPager, 1); 9411 } 9412 9413 /* 9414 ** Return the pathname of the journal file for this database. The return 9415 ** value of this routine is the same regardless of whether the journal file 9416 ** has been created or not. 9417 ** 9418 ** The pager journal filename is invariant as long as the pager is 9419 ** open so it is safe to access without the BtShared mutex. 9420 */ 9421 const char *sqlite3BtreeGetJournalname(Btree *p){ 9422 assert( p->pBt->pPager!=0 ); 9423 return sqlite3PagerJournalname(p->pBt->pPager); 9424 } 9425 9426 /* 9427 ** Return non-zero if a transaction is active. 9428 */ 9429 int sqlite3BtreeIsInTrans(Btree *p){ 9430 assert( p==0 || sqlite3_mutex_held(p->db->mutex) ); 9431 return (p && (p->inTrans==TRANS_WRITE)); 9432 } 9433 9434 #ifndef SQLITE_OMIT_WAL 9435 /* 9436 ** Run a checkpoint on the Btree passed as the first argument. 9437 ** 9438 ** Return SQLITE_LOCKED if this or any other connection has an open 9439 ** transaction on the shared-cache the argument Btree is connected to. 9440 ** 9441 ** Parameter eMode is one of SQLITE_CHECKPOINT_PASSIVE, FULL or RESTART. 9442 */ 9443 int sqlite3BtreeCheckpoint(Btree *p, int eMode, int *pnLog, int *pnCkpt){ 9444 int rc = SQLITE_OK; 9445 if( p ){ 9446 BtShared *pBt = p->pBt; 9447 sqlite3BtreeEnter(p); 9448 if( pBt->inTransaction!=TRANS_NONE ){ 9449 rc = SQLITE_LOCKED; 9450 }else{ 9451 rc = sqlite3PagerCheckpoint(pBt->pPager, eMode, pnLog, pnCkpt); 9452 } 9453 sqlite3BtreeLeave(p); 9454 } 9455 return rc; 9456 } 9457 #endif 9458 9459 /* 9460 ** Return non-zero if a read (or write) transaction is active. 9461 */ 9462 int sqlite3BtreeIsInReadTrans(Btree *p){ 9463 assert( p ); 9464 assert( sqlite3_mutex_held(p->db->mutex) ); 9465 return p->inTrans!=TRANS_NONE; 9466 } 9467 9468 int sqlite3BtreeIsInBackup(Btree *p){ 9469 assert( p ); 9470 assert( sqlite3_mutex_held(p->db->mutex) ); 9471 return p->nBackup!=0; 9472 } 9473 9474 /* 9475 ** This function returns a pointer to a blob of memory associated with 9476 ** a single shared-btree. The memory is used by client code for its own 9477 ** purposes (for example, to store a high-level schema associated with 9478 ** the shared-btree). The btree layer manages reference counting issues. 9479 ** 9480 ** The first time this is called on a shared-btree, nBytes bytes of memory 9481 ** are allocated, zeroed, and returned to the caller. For each subsequent 9482 ** call the nBytes parameter is ignored and a pointer to the same blob 9483 ** of memory returned. 9484 ** 9485 ** If the nBytes parameter is 0 and the blob of memory has not yet been 9486 ** allocated, a null pointer is returned. If the blob has already been 9487 ** allocated, it is returned as normal. 9488 ** 9489 ** Just before the shared-btree is closed, the function passed as the 9490 ** xFree argument when the memory allocation was made is invoked on the 9491 ** blob of allocated memory. The xFree function should not call sqlite3_free() 9492 ** on the memory, the btree layer does that. 9493 */ 9494 void *sqlite3BtreeSchema(Btree *p, int nBytes, void(*xFree)(void *)){ 9495 BtShared *pBt = p->pBt; 9496 sqlite3BtreeEnter(p); 9497 if( !pBt->pSchema && nBytes ){ 9498 pBt->pSchema = sqlite3DbMallocZero(0, nBytes); 9499 pBt->xFreeSchema = xFree; 9500 } 9501 sqlite3BtreeLeave(p); 9502 return pBt->pSchema; 9503 } 9504 9505 /* 9506 ** Return SQLITE_LOCKED_SHAREDCACHE if another user of the same shared 9507 ** btree as the argument handle holds an exclusive lock on the 9508 ** sqlite_master table. Otherwise SQLITE_OK. 9509 */ 9510 int sqlite3BtreeSchemaLocked(Btree *p){ 9511 int rc; 9512 assert( sqlite3_mutex_held(p->db->mutex) ); 9513 sqlite3BtreeEnter(p); 9514 rc = querySharedCacheTableLock(p, MASTER_ROOT, READ_LOCK); 9515 assert( rc==SQLITE_OK || rc==SQLITE_LOCKED_SHAREDCACHE ); 9516 sqlite3BtreeLeave(p); 9517 return rc; 9518 } 9519 9520 9521 #ifndef SQLITE_OMIT_SHARED_CACHE 9522 /* 9523 ** Obtain a lock on the table whose root page is iTab. The 9524 ** lock is a write lock if isWritelock is true or a read lock 9525 ** if it is false. 9526 */ 9527 int sqlite3BtreeLockTable(Btree *p, int iTab, u8 isWriteLock){ 9528 int rc = SQLITE_OK; 9529 assert( p->inTrans!=TRANS_NONE ); 9530 if( p->sharable ){ 9531 u8 lockType = READ_LOCK + isWriteLock; 9532 assert( READ_LOCK+1==WRITE_LOCK ); 9533 assert( isWriteLock==0 || isWriteLock==1 ); 9534 9535 sqlite3BtreeEnter(p); 9536 rc = querySharedCacheTableLock(p, iTab, lockType); 9537 if( rc==SQLITE_OK ){ 9538 rc = setSharedCacheTableLock(p, iTab, lockType); 9539 } 9540 sqlite3BtreeLeave(p); 9541 } 9542 return rc; 9543 } 9544 #endif 9545 9546 #ifndef SQLITE_OMIT_INCRBLOB 9547 /* 9548 ** Argument pCsr must be a cursor opened for writing on an 9549 ** INTKEY table currently pointing at a valid table entry. 9550 ** This function modifies the data stored as part of that entry. 9551 ** 9552 ** Only the data content may only be modified, it is not possible to 9553 ** change the length of the data stored. If this function is called with 9554 ** parameters that attempt to write past the end of the existing data, 9555 ** no modifications are made and SQLITE_CORRUPT is returned. 9556 */ 9557 int sqlite3BtreePutData(BtCursor *pCsr, u32 offset, u32 amt, void *z){ 9558 int rc; 9559 assert( cursorHoldsMutex(pCsr) ); 9560 assert( sqlite3_mutex_held(pCsr->pBtree->db->mutex) ); 9561 assert( pCsr->curFlags & BTCF_Incrblob ); 9562 9563 rc = restoreCursorPosition(pCsr); 9564 if( rc!=SQLITE_OK ){ 9565 return rc; 9566 } 9567 assert( pCsr->eState!=CURSOR_REQUIRESEEK ); 9568 if( pCsr->eState!=CURSOR_VALID ){ 9569 return SQLITE_ABORT; 9570 } 9571 9572 /* Save the positions of all other cursors open on this table. This is 9573 ** required in case any of them are holding references to an xFetch 9574 ** version of the b-tree page modified by the accessPayload call below. 9575 ** 9576 ** Note that pCsr must be open on a INTKEY table and saveCursorPosition() 9577 ** and hence saveAllCursors() cannot fail on a BTREE_INTKEY table, hence 9578 ** saveAllCursors can only return SQLITE_OK. 9579 */ 9580 VVA_ONLY(rc =) saveAllCursors(pCsr->pBt, pCsr->pgnoRoot, pCsr); 9581 assert( rc==SQLITE_OK ); 9582 9583 /* Check some assumptions: 9584 ** (a) the cursor is open for writing, 9585 ** (b) there is a read/write transaction open, 9586 ** (c) the connection holds a write-lock on the table (if required), 9587 ** (d) there are no conflicting read-locks, and 9588 ** (e) the cursor points at a valid row of an intKey table. 9589 */ 9590 if( (pCsr->curFlags & BTCF_WriteFlag)==0 ){ 9591 return SQLITE_READONLY; 9592 } 9593 assert( (pCsr->pBt->btsFlags & BTS_READ_ONLY)==0 9594 && pCsr->pBt->inTransaction==TRANS_WRITE ); 9595 assert( hasSharedCacheTableLock(pCsr->pBtree, pCsr->pgnoRoot, 0, 2) ); 9596 assert( !hasReadConflicts(pCsr->pBtree, pCsr->pgnoRoot) ); 9597 assert( pCsr->apPage[pCsr->iPage]->intKey ); 9598 9599 return accessPayload(pCsr, offset, amt, (unsigned char *)z, 1); 9600 } 9601 9602 /* 9603 ** Mark this cursor as an incremental blob cursor. 9604 */ 9605 void sqlite3BtreeIncrblobCursor(BtCursor *pCur){ 9606 pCur->curFlags |= BTCF_Incrblob; 9607 pCur->pBtree->hasIncrblobCur = 1; 9608 } 9609 #endif 9610 9611 /* 9612 ** Set both the "read version" (single byte at byte offset 18) and 9613 ** "write version" (single byte at byte offset 19) fields in the database 9614 ** header to iVersion. 9615 */ 9616 int sqlite3BtreeSetVersion(Btree *pBtree, int iVersion){ 9617 BtShared *pBt = pBtree->pBt; 9618 int rc; /* Return code */ 9619 9620 assert( iVersion==1 || iVersion==2 ); 9621 9622 /* If setting the version fields to 1, do not automatically open the 9623 ** WAL connection, even if the version fields are currently set to 2. 9624 */ 9625 pBt->btsFlags &= ~BTS_NO_WAL; 9626 if( iVersion==1 ) pBt->btsFlags |= BTS_NO_WAL; 9627 9628 rc = sqlite3BtreeBeginTrans(pBtree, 0); 9629 if( rc==SQLITE_OK ){ 9630 u8 *aData = pBt->pPage1->aData; 9631 if( aData[18]!=(u8)iVersion || aData[19]!=(u8)iVersion ){ 9632 rc = sqlite3BtreeBeginTrans(pBtree, 2); 9633 if( rc==SQLITE_OK ){ 9634 rc = sqlite3PagerWrite(pBt->pPage1->pDbPage); 9635 if( rc==SQLITE_OK ){ 9636 aData[18] = (u8)iVersion; 9637 aData[19] = (u8)iVersion; 9638 } 9639 } 9640 } 9641 } 9642 9643 pBt->btsFlags &= ~BTS_NO_WAL; 9644 return rc; 9645 } 9646 9647 #ifdef SQLITE_DEBUG 9648 /* 9649 ** Return true if the cursor has a hint specified. This routine is 9650 ** only used from within assert() statements 9651 */ 9652 int sqlite3BtreeCursorHasHint(BtCursor *pCsr, unsigned int mask){ 9653 return (pCsr->hints & mask)!=0; 9654 } 9655 #endif 9656 9657 /* 9658 ** Return true if the given Btree is read-only. 9659 */ 9660 int sqlite3BtreeIsReadonly(Btree *p){ 9661 return (p->pBt->btsFlags & BTS_READ_ONLY)!=0; 9662 } 9663 9664 /* 9665 ** Return the size of the header added to each page by this module. 9666 */ 9667 int sqlite3HeaderSizeBtree(void){ return ROUND8(sizeof(MemPage)); } 9668