15821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 25821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 2003 September 6 35821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 45821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** The author disclaims copyright to this source code. In place of 55821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** a legal notice, here is a blessing: 65821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 75821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** May you do good and not evil. 85821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** May you find forgiveness for yourself and forgive others. 95821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** May you share freely, never taking more than you give. 105821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 115821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)************************************************************************* 125821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** This file contains code used for creating, destroying, and populating 135821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** a VDBE (or an "sqlite3_stmt" as it is known to the outside world.) Prior 145821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** to version 2.8.7, all this code was combined into the vdbe.c source file. 155821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** But that file was getting too big so this subroutines were split out. 165821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 175821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#include "sqliteInt.h" 185821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#include "vdbeInt.h" 195821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 205821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 215821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 225821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 235821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** When debugging the code generator in a symbolic debugger, one can 245821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** set the sqlite3VdbeAddopTrace to 1 and all opcodes will be printed 255821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** as they are added to the instruction stream. 265821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 275821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#ifdef SQLITE_DEBUG 285821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)int sqlite3VdbeAddopTrace = 0; 295821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#endif 305821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 315821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 325821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 335821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Create a new virtual database engine. 345821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 355821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)Vdbe *sqlite3VdbeCreate(sqlite3 *db){ 365821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Vdbe *p; 375821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p = sqlite3DbMallocZero(db, sizeof(Vdbe) ); 385821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p==0 ) return 0; 395821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->db = db; 405821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( db->pVdbe ){ 415821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) db->pVdbe->pPrev = p; 425821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 435821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->pNext = db->pVdbe; 445821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->pPrev = 0; 455821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) db->pVdbe = p; 465821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->magic = VDBE_MAGIC_INIT; 475821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return p; 485821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 495821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 505821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 515821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Remember the SQL string for a prepared statement. 525821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 535821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)void sqlite3VdbeSetSql(Vdbe *p, const char *z, int n, int isPrepareV2){ 545821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( isPrepareV2==1 || isPrepareV2==0 ); 555821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p==0 ) return; 565821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#ifdef SQLITE_OMIT_TRACE 575821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( !isPrepareV2 ) return; 585821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#endif 595821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( p->zSql==0 ); 605821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->zSql = sqlite3DbStrNDup(p->db, z, n); 615821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->isPrepareV2 = (u8)isPrepareV2; 625821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 635821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 645821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 655821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Return the SQL associated with a prepared statement 665821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 675821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)const char *sqlite3_sql(sqlite3_stmt *pStmt){ 685821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Vdbe *p = (Vdbe *)pStmt; 695821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return (p && p->isPrepareV2) ? p->zSql : 0; 705821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 715821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 725821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 735821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Swap all content between two VDBE structures. 745821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 755821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)void sqlite3VdbeSwap(Vdbe *pA, Vdbe *pB){ 765821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Vdbe tmp, *pTmp; 775821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) char *zTmp; 785821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) tmp = *pA; 795821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) *pA = *pB; 805821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) *pB = tmp; 815821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pTmp = pA->pNext; 825821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pA->pNext = pB->pNext; 835821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pB->pNext = pTmp; 845821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pTmp = pA->pPrev; 855821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pA->pPrev = pB->pPrev; 865821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pB->pPrev = pTmp; 875821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) zTmp = pA->zSql; 885821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pA->zSql = pB->zSql; 895821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pB->zSql = zTmp; 905821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pB->isPrepareV2 = pA->isPrepareV2; 915821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 925821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 935821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#ifdef SQLITE_DEBUG 945821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 955821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Turn tracing on or off 965821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 975821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)void sqlite3VdbeTrace(Vdbe *p, FILE *trace){ 985821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->trace = trace; 995821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 1005821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#endif 1015821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 1025821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 1035821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Resize the Vdbe.aOp array so that it is at least one op larger than 1045821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** it was. 1055821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 1065821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** If an out-of-memory error occurs while resizing the array, return 1075821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** SQLITE_NOMEM. In this case Vdbe.aOp and Vdbe.nOpAlloc remain 1085821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** unchanged (this is so that any opcodes already allocated can be 1095821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** correctly deallocated along with the rest of the Vdbe). 1105821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 1115821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)static int growOpArray(Vdbe *p){ 1125821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) VdbeOp *pNew; 1135821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int nNew = (p->nOpAlloc ? p->nOpAlloc*2 : (int)(1024/sizeof(Op))); 1145821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pNew = sqlite3DbRealloc(p->db, p->aOp, nNew*sizeof(Op)); 1155821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( pNew ){ 1165821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->nOpAlloc = sqlite3DbMallocSize(p->db, pNew)/sizeof(Op); 1175821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->aOp = pNew; 1185821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 1195821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return (pNew ? SQLITE_OK : SQLITE_NOMEM); 1205821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 1215821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 1225821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 1235821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Add a new instruction to the list of instructions current in the 1245821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** VDBE. Return the address of the new instruction. 1255821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 1265821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Parameters: 1275821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 1285821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** p Pointer to the VDBE 1295821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 1305821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** op The opcode for this instruction 1315821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 1325821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** p1, p2, p3 Operands 1335821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 1345821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Use the sqlite3VdbeResolveLabel() function to fix an address and 1355821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** the sqlite3VdbeChangeP4() function to change the value of the P4 1365821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** operand. 1375821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 1385821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)int sqlite3VdbeAddOp3(Vdbe *p, int op, int p1, int p2, int p3){ 1395821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int i; 1405821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) VdbeOp *pOp; 1415821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 1425821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) i = p->nOp; 1435821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( p->magic==VDBE_MAGIC_INIT ); 1445821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( op>0 && op<0xff ); 1455821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p->nOpAlloc<=i ){ 1465821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( growOpArray(p) ){ 1475821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return 1; 1485821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 1495821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 1505821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->nOp++; 1515821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pOp = &p->aOp[i]; 1525821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pOp->opcode = (u8)op; 1535821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pOp->p5 = 0; 1545821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pOp->p1 = p1; 1555821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pOp->p2 = p2; 1565821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pOp->p3 = p3; 1575821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pOp->p4.p = 0; 1585821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pOp->p4type = P4_NOTUSED; 1595821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->expired = 0; 1605821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( op==OP_ParseSchema ){ 1615821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* Any program that uses the OP_ParseSchema opcode needs to lock 1625821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** all btrees. */ 1635821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int j; 1645821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) for(j=0; j<p->db->nDb; j++) sqlite3VdbeUsesBtree(p, j); 1655821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 1665821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#ifdef SQLITE_DEBUG 1675821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pOp->zComment = 0; 1685821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( sqlite3VdbeAddopTrace ) sqlite3VdbePrintOp(0, i, &p->aOp[i]); 1695821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#endif 1705821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#ifdef VDBE_PROFILE 1715821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pOp->cycles = 0; 1725821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pOp->cnt = 0; 1735821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#endif 1745821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return i; 1755821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 1765821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)int sqlite3VdbeAddOp0(Vdbe *p, int op){ 1775821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return sqlite3VdbeAddOp3(p, op, 0, 0, 0); 1785821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 1795821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)int sqlite3VdbeAddOp1(Vdbe *p, int op, int p1){ 1805821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return sqlite3VdbeAddOp3(p, op, p1, 0, 0); 1815821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 1825821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)int sqlite3VdbeAddOp2(Vdbe *p, int op, int p1, int p2){ 1835821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return sqlite3VdbeAddOp3(p, op, p1, p2, 0); 1845821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 1855821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 1865821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 1875821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 1885821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Add an opcode that includes the p4 value as a pointer. 1895821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 1905821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)int sqlite3VdbeAddOp4( 1915821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Vdbe *p, /* Add the opcode to this VM */ 1925821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int op, /* The new opcode */ 1935821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int p1, /* The P1 operand */ 1945821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int p2, /* The P2 operand */ 1955821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int p3, /* The P3 operand */ 1965821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) const char *zP4, /* The P4 operand */ 1975821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int p4type /* P4 operand type */ 1985821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)){ 1995821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int addr = sqlite3VdbeAddOp3(p, op, p1, p2, p3); 2005821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3VdbeChangeP4(p, addr, zP4, p4type); 2015821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return addr; 2025821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 2035821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 2045821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 2055821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Add an opcode that includes the p4 value as an integer. 2065821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 2075821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)int sqlite3VdbeAddOp4Int( 2085821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Vdbe *p, /* Add the opcode to this VM */ 2095821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int op, /* The new opcode */ 2105821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int p1, /* The P1 operand */ 2115821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int p2, /* The P2 operand */ 2125821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int p3, /* The P3 operand */ 2135821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int p4 /* The P4 operand as an integer */ 2145821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)){ 2155821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int addr = sqlite3VdbeAddOp3(p, op, p1, p2, p3); 2165821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3VdbeChangeP4(p, addr, SQLITE_INT_TO_PTR(p4), P4_INT32); 2175821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return addr; 2185821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 2195821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 2205821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 2215821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Create a new symbolic label for an instruction that has yet to be 2225821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** coded. The symbolic label is really just a negative number. The 2235821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** label can be used as the P2 value of an operation. Later, when 2245821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** the label is resolved to a specific address, the VDBE will scan 2255821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** through its operation list and change all values of P2 which match 2265821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** the label into the resolved address. 2275821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 2285821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** The VDBE knows that a P2 value is a label because labels are 2295821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** always negative and P2 values are suppose to be non-negative. 2305821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Hence, a negative P2 value is a label that has yet to be resolved. 2315821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 2325821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Zero is returned if a malloc() fails. 2335821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 2345821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)int sqlite3VdbeMakeLabel(Vdbe *p){ 2355821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int i; 2365821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) i = p->nLabel++; 2375821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( p->magic==VDBE_MAGIC_INIT ); 2385821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( i>=p->nLabelAlloc ){ 2395821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int n = p->nLabelAlloc*2 + 5; 2405821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->aLabel = sqlite3DbReallocOrFree(p->db, p->aLabel, 2415821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) n*sizeof(p->aLabel[0])); 2425821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->nLabelAlloc = sqlite3DbMallocSize(p->db, p->aLabel)/sizeof(p->aLabel[0]); 2435821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 2445821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p->aLabel ){ 2455821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->aLabel[i] = -1; 2465821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 2475821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return -1-i; 2485821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 2495821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 2505821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 2515821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Resolve label "x" to be the address of the next instruction to 2525821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** be inserted. The parameter "x" must have been obtained from 2535821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** a prior call to sqlite3VdbeMakeLabel(). 2545821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 2555821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)void sqlite3VdbeResolveLabel(Vdbe *p, int x){ 2565821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int j = -1-x; 2575821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( p->magic==VDBE_MAGIC_INIT ); 2585821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( j>=0 && j<p->nLabel ); 2595821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p->aLabel ){ 2605821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->aLabel[j] = p->nOp; 2615821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 2625821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 2635821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 2645821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 2655821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Mark the VDBE as one that can only be run one time. 2665821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 2675821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)void sqlite3VdbeRunOnlyOnce(Vdbe *p){ 2685821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->runOnlyOnce = 1; 2695821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 2705821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 2715821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#ifdef SQLITE_DEBUG /* sqlite3AssertMayAbort() logic */ 2725821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 2735821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 2745821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** The following type and function are used to iterate through all opcodes 2755821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** in a Vdbe main program and each of the sub-programs (triggers) it may 2765821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** invoke directly or indirectly. It should be used as follows: 2775821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 2785821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Op *pOp; 2795821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** VdbeOpIter sIter; 2805821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 2815821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** memset(&sIter, 0, sizeof(sIter)); 2825821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** sIter.v = v; // v is of type Vdbe* 2835821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** while( (pOp = opIterNext(&sIter)) ){ 2845821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** // Do something with pOp 2855821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** } 2865821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** sqlite3DbFree(v->db, sIter.apSub); 2875821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 2885821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 2895821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)typedef struct VdbeOpIter VdbeOpIter; 2905821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)struct VdbeOpIter { 2915821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Vdbe *v; /* Vdbe to iterate through the opcodes of */ 2925821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) SubProgram **apSub; /* Array of subprograms */ 2935821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int nSub; /* Number of entries in apSub */ 2945821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int iAddr; /* Address of next instruction to return */ 2955821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int iSub; /* 0 = main program, 1 = first sub-program etc. */ 2965821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)}; 2975821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)static Op *opIterNext(VdbeOpIter *p){ 2985821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Vdbe *v = p->v; 2995821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Op *pRet = 0; 3005821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Op *aOp; 3015821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int nOp; 3025821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 3035821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p->iSub<=p->nSub ){ 3045821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 3055821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p->iSub==0 ){ 3065821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) aOp = v->aOp; 3075821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) nOp = v->nOp; 3085821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) }else{ 3095821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) aOp = p->apSub[p->iSub-1]->aOp; 3105821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) nOp = p->apSub[p->iSub-1]->nOp; 3115821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 3125821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( p->iAddr<nOp ); 3135821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 3145821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pRet = &aOp[p->iAddr]; 3155821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->iAddr++; 3165821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p->iAddr==nOp ){ 3175821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->iSub++; 3185821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->iAddr = 0; 3195821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 3205821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 3215821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( pRet->p4type==P4_SUBPROGRAM ){ 3225821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int nByte = (p->nSub+1)*sizeof(SubProgram*); 3235821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int j; 3245821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) for(j=0; j<p->nSub; j++){ 3255821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p->apSub[j]==pRet->p4.pProgram ) break; 3265821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 3275821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( j==p->nSub ){ 3285821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->apSub = sqlite3DbReallocOrFree(v->db, p->apSub, nByte); 3295821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( !p->apSub ){ 3305821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pRet = 0; 3315821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) }else{ 3325821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->apSub[p->nSub++] = pRet->p4.pProgram; 3335821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 3345821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 3355821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 3365821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 3375821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 3385821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return pRet; 3395821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 3405821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 3415821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 3425821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Check if the program stored in the VM associated with pParse may 3435821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** throw an ABORT exception (causing the statement, but not entire transaction 3445821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** to be rolled back). This condition is true if the main program or any 3455821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** sub-programs contains any of the following: 3465821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 3475821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** * OP_Halt with P1=SQLITE_CONSTRAINT and P2=OE_Abort. 3485821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** * OP_HaltIfNull with P1=SQLITE_CONSTRAINT and P2=OE_Abort. 3495821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** * OP_Destroy 3505821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** * OP_VUpdate 3515821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** * OP_VRename 3525821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** * OP_FkCounter with P2==0 (immediate foreign key constraint) 3535821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 3545821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Then check that the value of Parse.mayAbort is true if an 3555821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** ABORT may be thrown, or false otherwise. Return true if it does 3565821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** match, or false otherwise. This function is intended to be used as 3575821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** part of an assert statement in the compiler. Similar to: 3585821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 3595821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** assert( sqlite3VdbeAssertMayAbort(pParse->pVdbe, pParse->mayAbort) ); 3605821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 3615821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)int sqlite3VdbeAssertMayAbort(Vdbe *v, int mayAbort){ 3625821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int hasAbort = 0; 3635821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Op *pOp; 3645821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) VdbeOpIter sIter; 3655821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) memset(&sIter, 0, sizeof(sIter)); 3665821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sIter.v = v; 3675821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 3685821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) while( (pOp = opIterNext(&sIter))!=0 ){ 3695821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int opcode = pOp->opcode; 3705821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( opcode==OP_Destroy || opcode==OP_VUpdate || opcode==OP_VRename 3715821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#ifndef SQLITE_OMIT_FOREIGN_KEY 3725821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) || (opcode==OP_FkCounter && pOp->p1==0 && pOp->p2==1) 3735821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#endif 3745821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) || ((opcode==OP_Halt || opcode==OP_HaltIfNull) 3755821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) && (pOp->p1==SQLITE_CONSTRAINT && pOp->p2==OE_Abort)) 3765821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ){ 3775821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) hasAbort = 1; 3785821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) break; 3795821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 3805821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 3815821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3DbFree(v->db, sIter.apSub); 3825821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 3835821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* Return true if hasAbort==mayAbort. Or if a malloc failure occured. 3845821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** If malloc failed, then the while() loop above may not have iterated 3855821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** through all opcodes and hasAbort may be set incorrectly. Return 3865821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** true for this case to prevent the assert() in the callers frame 3875821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** from failing. */ 3885821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return ( v->db->mallocFailed || hasAbort==mayAbort ); 3895821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 3905821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#endif /* SQLITE_DEBUG - the sqlite3AssertMayAbort() function */ 3915821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 3925821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 3935821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Loop through the program looking for P2 values that are negative 3945821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** on jump instructions. Each such value is a label. Resolve the 3955821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** label by setting the P2 value to its correct non-zero value. 3965821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 3975821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** This routine is called once after all opcodes have been inserted. 3985821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 3995821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Variable *pMaxFuncArgs is set to the maximum value of any P2 argument 4005821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** to an OP_Function, OP_AggStep or OP_VFilter opcode. This is used by 4015821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** sqlite3VdbeMakeReady() to size the Vdbe.apArg[] array. 4025821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 4035821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** The Op.opflags field is set on all opcodes. 4045821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 4055821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)static void resolveP2Values(Vdbe *p, int *pMaxFuncArgs){ 4065821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int i; 4075821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int nMaxArgs = *pMaxFuncArgs; 4085821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Op *pOp; 4095821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int *aLabel = p->aLabel; 4105821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->readOnly = 1; 4115821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) for(pOp=p->aOp, i=p->nOp-1; i>=0; i--, pOp++){ 4125821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) u8 opcode = pOp->opcode; 4135821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 4145821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pOp->opflags = sqlite3OpcodeProperty[opcode]; 4155821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( opcode==OP_Function || opcode==OP_AggStep ){ 4165821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( pOp->p5>nMaxArgs ) nMaxArgs = pOp->p5; 4175821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) }else if( (opcode==OP_Transaction && pOp->p2!=0) || opcode==OP_Vacuum ){ 4185821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->readOnly = 0; 4195821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#ifndef SQLITE_OMIT_VIRTUALTABLE 4205821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) }else if( opcode==OP_VUpdate ){ 4215821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( pOp->p2>nMaxArgs ) nMaxArgs = pOp->p2; 4225821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) }else if( opcode==OP_VFilter ){ 4235821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int n; 4245821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( p->nOp - i >= 3 ); 4255821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( pOp[-1].opcode==OP_Integer ); 4265821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) n = pOp[-1].p1; 4275821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( n>nMaxArgs ) nMaxArgs = n; 4285821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#endif 4295821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 4305821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 4315821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( (pOp->opflags & OPFLG_JUMP)!=0 && pOp->p2<0 ){ 4325821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( -1-pOp->p2<p->nLabel ); 4335821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pOp->p2 = aLabel[-1-pOp->p2]; 4345821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 4355821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 4365821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3DbFree(p->db, p->aLabel); 4375821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->aLabel = 0; 4385821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 4395821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) *pMaxFuncArgs = nMaxArgs; 4405821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 4415821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 4425821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 4435821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Return the address of the next instruction to be inserted. 4445821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 4455821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)int sqlite3VdbeCurrentAddr(Vdbe *p){ 4465821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( p->magic==VDBE_MAGIC_INIT ); 4475821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return p->nOp; 4485821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 4495821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 4505821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 4515821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** This function returns a pointer to the array of opcodes associated with 4525821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** the Vdbe passed as the first argument. It is the callers responsibility 4535821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** to arrange for the returned array to be eventually freed using the 4545821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** vdbeFreeOpArray() function. 4555821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 4565821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Before returning, *pnOp is set to the number of entries in the returned 4575821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** array. Also, *pnMaxArg is set to the larger of its current value and 4585821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** the number of entries in the Vdbe.apArg[] array required to execute the 4595821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** returned program. 4605821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 4615821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)VdbeOp *sqlite3VdbeTakeOpArray(Vdbe *p, int *pnOp, int *pnMaxArg){ 4625821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) VdbeOp *aOp = p->aOp; 4635821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( aOp && !p->db->mallocFailed ); 4645821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 4655821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* Check that sqlite3VdbeUsesBtree() was not called on this VM */ 4665821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( p->btreeMask==0 ); 4675821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 4685821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) resolveP2Values(p, pnMaxArg); 4695821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) *pnOp = p->nOp; 4705821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->aOp = 0; 4715821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return aOp; 4725821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 4735821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 4745821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 4755821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Add a whole list of operations to the operation stack. Return the 4765821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** address of the first operation added. 4775821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 4785821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)int sqlite3VdbeAddOpList(Vdbe *p, int nOp, VdbeOpList const *aOp){ 4795821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int addr; 4805821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( p->magic==VDBE_MAGIC_INIT ); 4815821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p->nOp + nOp > p->nOpAlloc && growOpArray(p) ){ 4825821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return 0; 4835821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 4845821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) addr = p->nOp; 4855821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( ALWAYS(nOp>0) ){ 4865821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int i; 4875821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) VdbeOpList const *pIn = aOp; 4885821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) for(i=0; i<nOp; i++, pIn++){ 4895821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int p2 = pIn->p2; 4905821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) VdbeOp *pOut = &p->aOp[i+addr]; 4915821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pOut->opcode = pIn->opcode; 4925821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pOut->p1 = pIn->p1; 4935821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p2<0 && (sqlite3OpcodeProperty[pOut->opcode] & OPFLG_JUMP)!=0 ){ 4945821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pOut->p2 = addr + ADDR(p2); 4955821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) }else{ 4965821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pOut->p2 = p2; 4975821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 4985821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pOut->p3 = pIn->p3; 4995821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pOut->p4type = P4_NOTUSED; 5005821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pOut->p4.p = 0; 5015821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pOut->p5 = 0; 5025821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#ifdef SQLITE_DEBUG 5035821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pOut->zComment = 0; 5045821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( sqlite3VdbeAddopTrace ){ 5055821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3VdbePrintOp(0, i+addr, &p->aOp[i+addr]); 5065821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 5075821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#endif 5085821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 5095821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->nOp += nOp; 5105821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 5115821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return addr; 5125821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 5135821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 5145821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 5155821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Change the value of the P1 operand for a specific instruction. 5165821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** This routine is useful when a large program is loaded from a 5175821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** static array using sqlite3VdbeAddOpList but we want to make a 5185821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** few minor changes to the program. 5195821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 5205821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)void sqlite3VdbeChangeP1(Vdbe *p, int addr, int val){ 5215821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( p!=0 ); 5225821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( addr>=0 ); 5235821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p->nOp>addr ){ 5245821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->aOp[addr].p1 = val; 5255821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 5265821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 5275821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 5285821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 5295821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Change the value of the P2 operand for a specific instruction. 5305821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** This routine is useful for setting a jump destination. 5315821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 5325821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)void sqlite3VdbeChangeP2(Vdbe *p, int addr, int val){ 5335821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( p!=0 ); 5345821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( addr>=0 ); 5355821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p->nOp>addr ){ 5365821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->aOp[addr].p2 = val; 5375821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 5385821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 5395821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 5405821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 5415821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Change the value of the P3 operand for a specific instruction. 5425821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 5435821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)void sqlite3VdbeChangeP3(Vdbe *p, int addr, int val){ 5445821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( p!=0 ); 5455821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( addr>=0 ); 5465821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p->nOp>addr ){ 5475821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->aOp[addr].p3 = val; 5485821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 5495821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 5505821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 5515821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 5525821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Change the value of the P5 operand for the most recently 5535821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** added operation. 5545821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 5555821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)void sqlite3VdbeChangeP5(Vdbe *p, u8 val){ 5565821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( p!=0 ); 5575821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p->aOp ){ 5585821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( p->nOp>0 ); 5595821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->aOp[p->nOp-1].p5 = val; 5605821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 5615821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 5625821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 5635821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 5645821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Change the P2 operand of instruction addr so that it points to 5655821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** the address of the next instruction to be coded. 5665821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 5675821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)void sqlite3VdbeJumpHere(Vdbe *p, int addr){ 5685821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( addr>=0 ); 5695821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3VdbeChangeP2(p, addr, p->nOp); 5705821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 5715821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 5725821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 5735821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 5745821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** If the input FuncDef structure is ephemeral, then free it. If 5755821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** the FuncDef is not ephermal, then do nothing. 5765821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 5775821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)static void freeEphemeralFunction(sqlite3 *db, FuncDef *pDef){ 5785821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( ALWAYS(pDef) && (pDef->flags & SQLITE_FUNC_EPHEM)!=0 ){ 5795821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3DbFree(db, pDef); 5805821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 5815821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 5825821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 5835821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)static void vdbeFreeOpArray(sqlite3 *, Op *, int); 5845821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 5855821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 5865821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Delete a P4 value if necessary. 5875821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 5885821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)static void freeP4(sqlite3 *db, int p4type, void *p4){ 5895821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p4 ){ 5905821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( db ); 5915821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) switch( p4type ){ 5925821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) case P4_REAL: 5935821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) case P4_INT64: 5945821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) case P4_DYNAMIC: 5955821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) case P4_KEYINFO: 5965821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) case P4_INTARRAY: 5975821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) case P4_KEYINFO_HANDOFF: { 5985821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3DbFree(db, p4); 5995821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) break; 6005821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 6015821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) case P4_MPRINTF: { 6025821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( db->pnBytesFreed==0 ) sqlite3_free(p4); 6035821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) break; 6045821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 6055821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) case P4_VDBEFUNC: { 6065821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) VdbeFunc *pVdbeFunc = (VdbeFunc *)p4; 6075821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) freeEphemeralFunction(db, pVdbeFunc->pFunc); 6085821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( db->pnBytesFreed==0 ) sqlite3VdbeDeleteAuxData(pVdbeFunc, 0); 6095821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3DbFree(db, pVdbeFunc); 6105821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) break; 6115821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 6125821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) case P4_FUNCDEF: { 6135821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) freeEphemeralFunction(db, (FuncDef*)p4); 6145821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) break; 6155821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 6165821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) case P4_MEM: { 6175821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( db->pnBytesFreed==0 ){ 6185821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3ValueFree((sqlite3_value*)p4); 6195821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) }else{ 6205821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Mem *p = (Mem*)p4; 6215821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3DbFree(db, p->zMalloc); 6225821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3DbFree(db, p); 6235821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 6245821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) break; 6255821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 6265821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) case P4_VTAB : { 6275821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( db->pnBytesFreed==0 ) sqlite3VtabUnlock((VTable *)p4); 6285821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) break; 6295821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 6305821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 6315821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 6325821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 6335821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 6345821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 6355821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Free the space allocated for aOp and any p4 values allocated for the 6365821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** opcodes contained within. If aOp is not NULL it is assumed to contain 6375821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** nOp entries. 6385821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 6395821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)static void vdbeFreeOpArray(sqlite3 *db, Op *aOp, int nOp){ 6405821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( aOp ){ 6415821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Op *pOp; 6425821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) for(pOp=aOp; pOp<&aOp[nOp]; pOp++){ 6435821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) freeP4(db, pOp->p4type, pOp->p4.p); 6445821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#ifdef SQLITE_DEBUG 6455821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3DbFree(db, pOp->zComment); 6465821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#endif 6475821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 6485821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 6495821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3DbFree(db, aOp); 6505821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 6515821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 6525821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 6535821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Link the SubProgram object passed as the second argument into the linked 6545821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** list at Vdbe.pSubProgram. This list is used to delete all sub-program 6555821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** objects when the VM is no longer required. 6565821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 6575821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)void sqlite3VdbeLinkSubProgram(Vdbe *pVdbe, SubProgram *p){ 6585821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->pNext = pVdbe->pProgram; 6595821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pVdbe->pProgram = p; 6605821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 6615821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 6625821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 6635821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Change N opcodes starting at addr to No-ops. 6645821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 6655821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)void sqlite3VdbeChangeToNoop(Vdbe *p, int addr, int N){ 6665821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p->aOp ){ 6675821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) VdbeOp *pOp = &p->aOp[addr]; 6685821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3 *db = p->db; 6695821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) while( N-- ){ 6705821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) freeP4(db, pOp->p4type, pOp->p4.p); 6715821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) memset(pOp, 0, sizeof(pOp[0])); 6725821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pOp->opcode = OP_Noop; 6735821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pOp++; 6745821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 6755821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 6765821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 6775821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 6785821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 6795821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Change the value of the P4 operand for a specific instruction. 6805821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** This routine is useful when a large program is loaded from a 6815821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** static array using sqlite3VdbeAddOpList but we want to make a 6825821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** few minor changes to the program. 6835821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 6845821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** If n>=0 then the P4 operand is dynamic, meaning that a copy of 6855821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** the string is made into memory obtained from sqlite3_malloc(). 6865821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** A value of n==0 means copy bytes of zP4 up to and including the 6875821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** first null byte. If n>0 then copy n+1 bytes of zP4. 6885821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 6895821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** If n==P4_KEYINFO it means that zP4 is a pointer to a KeyInfo structure. 6905821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** A copy is made of the KeyInfo structure into memory obtained from 6915821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** sqlite3_malloc, to be freed when the Vdbe is finalized. 6925821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** n==P4_KEYINFO_HANDOFF indicates that zP4 points to a KeyInfo structure 6935821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** stored in memory that the caller has obtained from sqlite3_malloc. The 6945821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** caller should not free the allocation, it will be freed when the Vdbe is 6955821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** finalized. 6965821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 6975821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Other values of n (P4_STATIC, P4_COLLSEQ etc.) indicate that zP4 points 6985821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** to a string or structure that is guaranteed to exist for the lifetime of 6995821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** the Vdbe. In these cases we can just copy the pointer. 7005821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 7015821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** If addr<0 then change P4 on the most recently inserted instruction. 7025821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 7035821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)void sqlite3VdbeChangeP4(Vdbe *p, int addr, const char *zP4, int n){ 7045821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Op *pOp; 7055821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3 *db; 7065821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( p!=0 ); 7075821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) db = p->db; 7085821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( p->magic==VDBE_MAGIC_INIT ); 7095821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p->aOp==0 || db->mallocFailed ){ 7105821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if ( n!=P4_KEYINFO && n!=P4_VTAB ) { 7115821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) freeP4(db, n, (void*)*(char**)&zP4); 7125821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 7135821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return; 7145821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 7155821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( p->nOp>0 ); 7165821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( addr<p->nOp ); 7175821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( addr<0 ){ 7185821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) addr = p->nOp - 1; 7195821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 7205821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pOp = &p->aOp[addr]; 7215821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) freeP4(db, pOp->p4type, pOp->p4.p); 7225821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pOp->p4.p = 0; 7235821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( n==P4_INT32 ){ 7245821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* Note: this cast is safe, because the origin data point was an int 7255821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** that was cast to a (const char *). */ 7265821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pOp->p4.i = SQLITE_PTR_TO_INT(zP4); 7275821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pOp->p4type = P4_INT32; 7285821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) }else if( zP4==0 ){ 7295821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pOp->p4.p = 0; 7305821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pOp->p4type = P4_NOTUSED; 7315821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) }else if( n==P4_KEYINFO ){ 7325821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) KeyInfo *pKeyInfo; 7335821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int nField, nByte; 7345821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 7355821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) nField = ((KeyInfo*)zP4)->nField; 7365821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) nByte = sizeof(*pKeyInfo) + (nField-1)*sizeof(pKeyInfo->aColl[0]) + nField; 7375821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pKeyInfo = sqlite3DbMallocRaw(0, nByte); 7385821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pOp->p4.pKeyInfo = pKeyInfo; 7395821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( pKeyInfo ){ 7405821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) u8 *aSortOrder; 7415821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) memcpy((char*)pKeyInfo, zP4, nByte - nField); 7425821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) aSortOrder = pKeyInfo->aSortOrder; 7435821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( aSortOrder ){ 7445821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pKeyInfo->aSortOrder = (unsigned char*)&pKeyInfo->aColl[nField]; 7455821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) memcpy(pKeyInfo->aSortOrder, aSortOrder, nField); 7465821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 7475821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pOp->p4type = P4_KEYINFO; 7485821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) }else{ 7495821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->db->mallocFailed = 1; 7505821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pOp->p4type = P4_NOTUSED; 7515821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 7525821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) }else if( n==P4_KEYINFO_HANDOFF ){ 7535821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pOp->p4.p = (void*)zP4; 7545821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pOp->p4type = P4_KEYINFO; 7555821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) }else if( n==P4_VTAB ){ 7565821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pOp->p4.p = (void*)zP4; 7575821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pOp->p4type = P4_VTAB; 7585821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3VtabLock((VTable *)zP4); 7595821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( ((VTable *)zP4)->db==p->db ); 7605821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) }else if( n<0 ){ 7615821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pOp->p4.p = (void*)zP4; 7625821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pOp->p4type = (signed char)n; 7635821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) }else{ 7645821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( n==0 ) n = sqlite3Strlen30(zP4); 7655821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pOp->p4.z = sqlite3DbStrNDup(p->db, zP4, n); 7665821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pOp->p4type = P4_DYNAMIC; 7675821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 7685821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 7695821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 7705821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#ifndef NDEBUG 7715821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 7725821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Change the comment on the the most recently coded instruction. Or 7735821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** insert a No-op and add the comment to that new instruction. This 7745821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** makes the code easier to read during debugging. None of this happens 7755821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** in a production build. 7765821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 7775821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)void sqlite3VdbeComment(Vdbe *p, const char *zFormat, ...){ 7785821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) va_list ap; 7795821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( !p ) return; 7805821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( p->nOp>0 || p->aOp==0 ); 7815821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( p->aOp==0 || p->aOp[p->nOp-1].zComment==0 || p->db->mallocFailed ); 7825821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p->nOp ){ 7835821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) char **pz = &p->aOp[p->nOp-1].zComment; 7845821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) va_start(ap, zFormat); 7855821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3DbFree(p->db, *pz); 7865821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) *pz = sqlite3VMPrintf(p->db, zFormat, ap); 7875821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) va_end(ap); 7885821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 7895821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 7905821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)void sqlite3VdbeNoopComment(Vdbe *p, const char *zFormat, ...){ 7915821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) va_list ap; 7925821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( !p ) return; 7935821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3VdbeAddOp0(p, OP_Noop); 7945821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( p->nOp>0 || p->aOp==0 ); 7955821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( p->aOp==0 || p->aOp[p->nOp-1].zComment==0 || p->db->mallocFailed ); 7965821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p->nOp ){ 7975821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) char **pz = &p->aOp[p->nOp-1].zComment; 7985821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) va_start(ap, zFormat); 7995821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3DbFree(p->db, *pz); 8005821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) *pz = sqlite3VMPrintf(p->db, zFormat, ap); 8015821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) va_end(ap); 8025821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 8035821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 8045821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#endif /* NDEBUG */ 8055821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 8065821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 8075821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Return the opcode for a given address. If the address is -1, then 8085821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** return the most recently inserted opcode. 8095821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 8105821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** If a memory allocation error has occurred prior to the calling of this 8115821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** routine, then a pointer to a dummy VdbeOp will be returned. That opcode 8125821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** is readable but not writable, though it is cast to a writable value. 8135821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** The return of a dummy opcode allows the call to continue functioning 8145821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** after a OOM fault without having to check to see if the return from 8155821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** this routine is a valid pointer. But because the dummy.opcode is 0, 8165821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** dummy will never be written to. This is verified by code inspection and 8175821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** by running with Valgrind. 8185821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 8195821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** About the #ifdef SQLITE_OMIT_TRACE: Normally, this routine is never called 8205821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** unless p->nOp>0. This is because in the absense of SQLITE_OMIT_TRACE, 8215821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** an OP_Trace instruction is always inserted by sqlite3VdbeGet() as soon as 8225821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** a new VDBE is created. So we are free to set addr to p->nOp-1 without 8235821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** having to double-check to make sure that the result is non-negative. But 8245821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** if SQLITE_OMIT_TRACE is defined, the OP_Trace is omitted and we do need to 8255821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** check the value of p->nOp-1 before continuing. 8265821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 8275821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)VdbeOp *sqlite3VdbeGetOp(Vdbe *p, int addr){ 8285821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* C89 specifies that the constant "dummy" will be initialized to all 8295821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** zeros, which is correct. MSVC generates a warning, nevertheless. */ 8305821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) static const VdbeOp dummy; /* Ignore the MSVC warning about no initializer */ 8315821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( p->magic==VDBE_MAGIC_INIT ); 8325821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( addr<0 ){ 8335821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#ifdef SQLITE_OMIT_TRACE 8345821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p->nOp==0 ) return (VdbeOp*)&dummy; 8355821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#endif 8365821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) addr = p->nOp - 1; 8375821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 8385821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( (addr>=0 && addr<p->nOp) || p->db->mallocFailed ); 8395821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p->db->mallocFailed ){ 8405821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return (VdbeOp*)&dummy; 8415821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) }else{ 8425821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return &p->aOp[addr]; 8435821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 8445821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 8455821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 8465821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#if !defined(SQLITE_OMIT_EXPLAIN) || !defined(NDEBUG) \ 8475821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) || defined(VDBE_PROFILE) || defined(SQLITE_DEBUG) 8485821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 8495821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Compute a string that describes the P4 parameter for an opcode. 8505821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Use zTemp for any required temporary buffer space. 8515821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 8525821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)static char *displayP4(Op *pOp, char *zTemp, int nTemp){ 8535821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) char *zP4 = zTemp; 8545821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( nTemp>=20 ); 8555821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) switch( pOp->p4type ){ 8565821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) case P4_KEYINFO_STATIC: 8575821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) case P4_KEYINFO: { 8585821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int i, j; 8595821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) KeyInfo *pKeyInfo = pOp->p4.pKeyInfo; 8605821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3_snprintf(nTemp, zTemp, "keyinfo(%d", pKeyInfo->nField); 8615821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) i = sqlite3Strlen30(zTemp); 8625821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) for(j=0; j<pKeyInfo->nField; j++){ 8635821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) CollSeq *pColl = pKeyInfo->aColl[j]; 8645821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( pColl ){ 8655821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int n = sqlite3Strlen30(pColl->zName); 8665821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( i+n>nTemp-6 ){ 8675821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) memcpy(&zTemp[i],",...",4); 8685821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) break; 8695821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 8705821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) zTemp[i++] = ','; 8715821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( pKeyInfo->aSortOrder && pKeyInfo->aSortOrder[j] ){ 8725821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) zTemp[i++] = '-'; 8735821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 8745821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) memcpy(&zTemp[i], pColl->zName,n+1); 8755821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) i += n; 8765821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) }else if( i+4<nTemp-6 ){ 8775821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) memcpy(&zTemp[i],",nil",4); 8785821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) i += 4; 8795821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 8805821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 8815821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) zTemp[i++] = ')'; 8825821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) zTemp[i] = 0; 8835821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( i<nTemp ); 8845821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) break; 8855821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 8865821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) case P4_COLLSEQ: { 8875821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) CollSeq *pColl = pOp->p4.pColl; 8885821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3_snprintf(nTemp, zTemp, "collseq(%.20s)", pColl->zName); 8895821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) break; 8905821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 8915821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) case P4_FUNCDEF: { 8925821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) FuncDef *pDef = pOp->p4.pFunc; 8935821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3_snprintf(nTemp, zTemp, "%s(%d)", pDef->zName, pDef->nArg); 8945821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) break; 8955821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 8965821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) case P4_INT64: { 8975821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3_snprintf(nTemp, zTemp, "%lld", *pOp->p4.pI64); 8985821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) break; 8995821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 9005821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) case P4_INT32: { 9015821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3_snprintf(nTemp, zTemp, "%d", pOp->p4.i); 9025821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) break; 9035821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 9045821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) case P4_REAL: { 9055821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3_snprintf(nTemp, zTemp, "%.16g", *pOp->p4.pReal); 9065821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) break; 9075821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 9085821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) case P4_MEM: { 9095821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Mem *pMem = pOp->p4.pMem; 9105821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( (pMem->flags & MEM_Null)==0 ); 9115821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( pMem->flags & MEM_Str ){ 9125821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) zP4 = pMem->z; 9135821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) }else if( pMem->flags & MEM_Int ){ 9145821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3_snprintf(nTemp, zTemp, "%lld", pMem->u.i); 9155821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) }else if( pMem->flags & MEM_Real ){ 9165821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3_snprintf(nTemp, zTemp, "%.16g", pMem->r); 9175821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) }else{ 9185821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( pMem->flags & MEM_Blob ); 9195821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) zP4 = "(blob)"; 9205821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 9215821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) break; 9225821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 9235821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#ifndef SQLITE_OMIT_VIRTUALTABLE 9245821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) case P4_VTAB: { 9255821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3_vtab *pVtab = pOp->p4.pVtab->pVtab; 9265821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3_snprintf(nTemp, zTemp, "vtab:%p:%p", pVtab, pVtab->pModule); 9275821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) break; 9285821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 9295821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#endif 9305821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) case P4_INTARRAY: { 9315821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3_snprintf(nTemp, zTemp, "intarray"); 9325821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) break; 9335821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 9345821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) case P4_SUBPROGRAM: { 9355821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3_snprintf(nTemp, zTemp, "program"); 9365821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) break; 9375821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 9385821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) default: { 9395821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) zP4 = pOp->p4.z; 9405821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( zP4==0 ){ 9415821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) zP4 = zTemp; 9425821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) zTemp[0] = 0; 9435821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 9445821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 9455821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 9465821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( zP4!=0 ); 9475821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return zP4; 9485821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 9495821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#endif 9505821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 9515821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 9525821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Declare to the Vdbe that the BTree object at db->aDb[i] is used. 9535821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 9545821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** The prepared statements need to know in advance the complete set of 9555821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** attached databases that they will be using. A mask of these databases 9565821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** is maintained in p->btreeMask and is used for locking and other purposes. 9575821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 9585821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)void sqlite3VdbeUsesBtree(Vdbe *p, int i){ 9595821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( i>=0 && i<p->db->nDb && i<(int)sizeof(yDbMask)*8 ); 9605821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( i<(int)sizeof(p->btreeMask)*8 ); 9615821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->btreeMask |= ((yDbMask)1)<<i; 9625821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( i!=1 && sqlite3BtreeSharable(p->db->aDb[i].pBt) ){ 9635821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->lockMask |= ((yDbMask)1)<<i; 9645821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 9655821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 9665821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 9675821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#if !defined(SQLITE_OMIT_SHARED_CACHE) && SQLITE_THREADSAFE>0 9685821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 9695821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** If SQLite is compiled to support shared-cache mode and to be threadsafe, 9705821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** this routine obtains the mutex associated with each BtShared structure 9715821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** that may be accessed by the VM passed as an argument. In doing so it also 9725821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** sets the BtShared.db member of each of the BtShared structures, ensuring 9735821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** that the correct busy-handler callback is invoked if required. 9745821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 9755821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** If SQLite is not threadsafe but does support shared-cache mode, then 9765821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** sqlite3BtreeEnter() is invoked to set the BtShared.db variables 9775821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** of all of BtShared structures accessible via the database handle 9785821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** associated with the VM. 9795821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 9805821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** If SQLite is not threadsafe and does not support shared-cache mode, this 9815821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** function is a no-op. 9825821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 9835821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** The p->btreeMask field is a bitmask of all btrees that the prepared 9845821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** statement p will ever use. Let N be the number of bits in p->btreeMask 9855821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** corresponding to btrees that use shared cache. Then the runtime of 9865821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** this routine is N*N. But as N is rarely more than 1, this should not 9875821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** be a problem. 9885821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 9895821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)void sqlite3VdbeEnter(Vdbe *p){ 9905821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int i; 9915821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) yDbMask mask; 9925821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3 *db; 9935821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Db *aDb; 9945821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int nDb; 9955821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p->lockMask==0 ) return; /* The common case */ 9965821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) db = p->db; 9975821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) aDb = db->aDb; 9985821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) nDb = db->nDb; 9995821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) for(i=0, mask=1; i<nDb; i++, mask += mask){ 10005821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( i!=1 && (mask & p->lockMask)!=0 && ALWAYS(aDb[i].pBt!=0) ){ 10015821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3BtreeEnter(aDb[i].pBt); 10025821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 10035821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 10045821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 10055821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#endif 10065821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 10075821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#if !defined(SQLITE_OMIT_SHARED_CACHE) && SQLITE_THREADSAFE>0 10085821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 10095821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Unlock all of the btrees previously locked by a call to sqlite3VdbeEnter(). 10105821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 10115821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)void sqlite3VdbeLeave(Vdbe *p){ 10125821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int i; 10135821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) yDbMask mask; 10145821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3 *db; 10155821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Db *aDb; 10165821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int nDb; 10175821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p->lockMask==0 ) return; /* The common case */ 10185821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) db = p->db; 10195821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) aDb = db->aDb; 10205821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) nDb = db->nDb; 10215821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) for(i=0, mask=1; i<nDb; i++, mask += mask){ 10225821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( i!=1 && (mask & p->lockMask)!=0 && ALWAYS(aDb[i].pBt!=0) ){ 10235821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3BtreeLeave(aDb[i].pBt); 10245821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 10255821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 10265821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 10275821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#endif 10285821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 10295821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#if defined(VDBE_PROFILE) || defined(SQLITE_DEBUG) 10305821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 10315821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Print a single opcode. This routine is used for debugging only. 10325821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 10335821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)void sqlite3VdbePrintOp(FILE *pOut, int pc, Op *pOp){ 10345821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) char *zP4; 10355821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) char zPtr[50]; 10365821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) static const char *zFormat1 = "%4d %-13s %4d %4d %4d %-4s %.2X %s\n"; 10375821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( pOut==0 ) pOut = stdout; 10385821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) zP4 = displayP4(pOp, zPtr, sizeof(zPtr)); 10395821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) fprintf(pOut, zFormat1, pc, 10405821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3OpcodeName(pOp->opcode), pOp->p1, pOp->p2, pOp->p3, zP4, pOp->p5, 10415821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#ifdef SQLITE_DEBUG 10425821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pOp->zComment ? pOp->zComment : "" 10435821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#else 10445821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) "" 10455821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#endif 10465821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ); 10475821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) fflush(pOut); 10485821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 10495821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#endif 10505821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 10515821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 10525821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Release an array of N Mem elements 10535821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 10545821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)static void releaseMemArray(Mem *p, int N){ 10555821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p && N ){ 10565821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Mem *pEnd; 10575821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3 *db = p->db; 10585821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) u8 malloc_failed = db->mallocFailed; 10595821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( db->pnBytesFreed ){ 10605821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) for(pEnd=&p[N]; p<pEnd; p++){ 10615821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3DbFree(db, p->zMalloc); 10625821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 10635821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return; 10645821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 10655821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) for(pEnd=&p[N]; p<pEnd; p++){ 10665821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( (&p[1])==pEnd || p[0].db==p[1].db ); 10675821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 10685821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* This block is really an inlined version of sqlite3VdbeMemRelease() 10695821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** that takes advantage of the fact that the memory cell value is 10705821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** being set to NULL after releasing any dynamic resources. 10715821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** 10725821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** The justification for duplicating code is that according to 10735821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** callgrind, this causes a certain test case to hit the CPU 4.7 10745821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** percent less (x86 linux, gcc version 4.1.2, -O6) than if 10755821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** sqlite3MemRelease() were called from here. With -O2, this jumps 10765821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** to 6.6 percent. The test case is inserting 1000 rows into a table 10775821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** with no indexes using a single prepared INSERT statement, bind() 10785821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** and reset(). Inserts are grouped into a transaction. 10795821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */ 10805821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p->flags&(MEM_Agg|MEM_Dyn|MEM_Frame|MEM_RowSet) ){ 10815821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3VdbeMemRelease(p); 10825821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) }else if( p->zMalloc ){ 10835821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3DbFree(db, p->zMalloc); 10845821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->zMalloc = 0; 10855821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 10865821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 10875821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->flags = MEM_Null; 10885821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 10895821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) db->mallocFailed = malloc_failed; 10905821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 10915821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 10925821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 10935821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 10945821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Delete a VdbeFrame object and its contents. VdbeFrame objects are 10955821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** allocated by the OP_Program opcode in sqlite3VdbeExec(). 10965821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 10975821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)void sqlite3VdbeFrameDelete(VdbeFrame *p){ 10985821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int i; 10995821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Mem *aMem = VdbeFrameMem(p); 11005821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) VdbeCursor **apCsr = (VdbeCursor **)&aMem[p->nChildMem]; 11015821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) for(i=0; i<p->nChildCsr; i++){ 11025821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3VdbeFreeCursor(p->v, apCsr[i]); 11035821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 11045821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) releaseMemArray(aMem, p->nChildMem); 11055821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3DbFree(p->v->db, p); 11065821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 11075821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 11085821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#ifndef SQLITE_OMIT_EXPLAIN 11095821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 11105821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Give a listing of the program in the virtual machine. 11115821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 11125821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** The interface is the same as sqlite3VdbeExec(). But instead of 11135821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** running the code, it invokes the callback once for each instruction. 11145821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** This feature is used to implement "EXPLAIN". 11155821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 11165821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** When p->explain==1, each instruction is listed. When 11175821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** p->explain==2, only OP_Explain instructions are listed and these 11185821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** are shown in a different format. p->explain==2 is used to implement 11195821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** EXPLAIN QUERY PLAN. 11205821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 11215821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** When p->explain==1, first the main program is listed, then each of 11225821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** the trigger subprograms are listed one by one. 11235821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 11245821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)int sqlite3VdbeList( 11255821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Vdbe *p /* The VDBE */ 11265821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)){ 11275821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int nRow; /* Stop when row count reaches this */ 11285821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int nSub = 0; /* Number of sub-vdbes seen so far */ 11295821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) SubProgram **apSub = 0; /* Array of sub-vdbes */ 11305821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Mem *pSub = 0; /* Memory cell hold array of subprogs */ 11315821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3 *db = p->db; /* The database connection */ 11325821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int i; /* Loop counter */ 11335821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int rc = SQLITE_OK; /* Return code */ 11345821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Mem *pMem = p->pResultSet = &p->aMem[1]; /* First Mem of result set */ 11355821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 11365821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( p->explain ); 11375821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( p->magic==VDBE_MAGIC_RUN ); 11385821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( p->rc==SQLITE_OK || p->rc==SQLITE_BUSY || p->rc==SQLITE_NOMEM ); 11395821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 11405821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* Even though this opcode does not use dynamic strings for 11415821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** the result, result columns may become dynamic if the user calls 11425821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** sqlite3_column_text16(), causing a translation to UTF-16 encoding. 11435821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */ 11445821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) releaseMemArray(pMem, 8); 11455821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 11465821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p->rc==SQLITE_NOMEM ){ 11475821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* This happens if a malloc() inside a call to sqlite3_column_text() or 11485821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** sqlite3_column_text16() failed. */ 11495821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) db->mallocFailed = 1; 11505821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return SQLITE_ERROR; 11515821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 11525821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 11535821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* When the number of output rows reaches nRow, that means the 11545821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** listing has finished and sqlite3_step() should return SQLITE_DONE. 11555821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** nRow is the sum of the number of rows in the main program, plus 11565821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** the sum of the number of rows in all trigger subprograms encountered 11575821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** so far. The nRow value will increase as new trigger subprograms are 11585821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** encountered, but p->pc will eventually catch up to nRow. 11595821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */ 11605821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) nRow = p->nOp; 11615821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p->explain==1 ){ 11625821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* The first 8 memory cells are used for the result set. So we will 11635821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** commandeer the 9th cell to use as storage for an array of pointers 11645821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** to trigger subprograms. The VDBE is guaranteed to have at least 9 11655821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** cells. */ 11665821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( p->nMem>9 ); 11675821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pSub = &p->aMem[9]; 11685821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( pSub->flags&MEM_Blob ){ 11695821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* On the first call to sqlite3_step(), pSub will hold a NULL. It is 11705821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** initialized to a BLOB by the P4_SUBPROGRAM processing logic below */ 11715821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) nSub = pSub->n/sizeof(Vdbe*); 11725821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) apSub = (SubProgram **)pSub->z; 11735821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 11745821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) for(i=0; i<nSub; i++){ 11755821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) nRow += apSub[i]->nOp; 11765821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 11775821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 11785821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 11795821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) do{ 11805821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) i = p->pc++; 11815821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) }while( i<nRow && p->explain==2 && p->aOp[i].opcode!=OP_Explain ); 11825821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( i>=nRow ){ 11835821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->rc = SQLITE_OK; 11845821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) rc = SQLITE_DONE; 11855821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) }else if( db->u1.isInterrupted ){ 11865821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->rc = SQLITE_INTERRUPT; 11875821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) rc = SQLITE_ERROR; 11885821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3SetString(&p->zErrMsg, db, "%s", sqlite3ErrStr(p->rc)); 11895821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) }else{ 11905821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) char *z; 11915821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Op *pOp; 11925821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( i<p->nOp ){ 11935821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* The output line number is small enough that we are still in the 11945821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** main program. */ 11955821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pOp = &p->aOp[i]; 11965821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) }else{ 11975821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* We are currently listing subprograms. Figure out which one and 11985821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** pick up the appropriate opcode. */ 11995821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int j; 12005821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) i -= p->nOp; 12015821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) for(j=0; i>=apSub[j]->nOp; j++){ 12025821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) i -= apSub[j]->nOp; 12035821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 12045821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pOp = &apSub[j]->aOp[i]; 12055821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 12065821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p->explain==1 ){ 12075821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->flags = MEM_Int; 12085821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->type = SQLITE_INTEGER; 12095821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->u.i = i; /* Program counter */ 12105821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem++; 12115821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 12125821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->flags = MEM_Static|MEM_Str|MEM_Term; 12135821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->z = (char*)sqlite3OpcodeName(pOp->opcode); /* Opcode */ 12145821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( pMem->z!=0 ); 12155821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->n = sqlite3Strlen30(pMem->z); 12165821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->type = SQLITE_TEXT; 12175821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->enc = SQLITE_UTF8; 12185821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem++; 12195821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 12205821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* When an OP_Program opcode is encounter (the only opcode that has 12215821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** a P4_SUBPROGRAM argument), expand the size of the array of subprograms 12225821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** kept in p->aMem[9].z to hold the new program - assuming this subprogram 12235821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** has not already been seen. 12245821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */ 12255821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( pOp->p4type==P4_SUBPROGRAM ){ 12265821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int nByte = (nSub+1)*sizeof(SubProgram*); 12275821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int j; 12285821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) for(j=0; j<nSub; j++){ 12295821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( apSub[j]==pOp->p4.pProgram ) break; 12305821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 12315821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( j==nSub && SQLITE_OK==sqlite3VdbeMemGrow(pSub, nByte, 1) ){ 12325821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) apSub = (SubProgram **)pSub->z; 12335821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) apSub[nSub++] = pOp->p4.pProgram; 12345821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pSub->flags |= MEM_Blob; 12355821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pSub->n = nSub*sizeof(SubProgram*); 12365821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 12375821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 12385821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 12395821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 12405821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->flags = MEM_Int; 12415821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->u.i = pOp->p1; /* P1 */ 12425821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->type = SQLITE_INTEGER; 12435821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem++; 12445821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 12455821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->flags = MEM_Int; 12465821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->u.i = pOp->p2; /* P2 */ 12475821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->type = SQLITE_INTEGER; 12485821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem++; 12495821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 12505821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->flags = MEM_Int; 12515821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->u.i = pOp->p3; /* P3 */ 12525821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->type = SQLITE_INTEGER; 12535821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem++; 12545821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 12555821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( sqlite3VdbeMemGrow(pMem, 32, 0) ){ /* P4 */ 12565821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( p->db->mallocFailed ); 12575821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return SQLITE_ERROR; 12585821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 12595821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->flags = MEM_Dyn|MEM_Str|MEM_Term; 12605821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) z = displayP4(pOp, pMem->z, 32); 12615821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( z!=pMem->z ){ 12625821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3VdbeMemSetStr(pMem, z, -1, SQLITE_UTF8, 0); 12635821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) }else{ 12645821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( pMem->z!=0 ); 12655821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->n = sqlite3Strlen30(pMem->z); 12665821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->enc = SQLITE_UTF8; 12675821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 12685821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->type = SQLITE_TEXT; 12695821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem++; 12705821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 12715821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p->explain==1 ){ 12725821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( sqlite3VdbeMemGrow(pMem, 4, 0) ){ 12735821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( p->db->mallocFailed ); 12745821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return SQLITE_ERROR; 12755821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 12765821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->flags = MEM_Dyn|MEM_Str|MEM_Term; 12775821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->n = 2; 12785821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3_snprintf(3, pMem->z, "%.2x", pOp->p5); /* P5 */ 12795821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->type = SQLITE_TEXT; 12805821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->enc = SQLITE_UTF8; 12815821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem++; 12825821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 12835821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#ifdef SQLITE_DEBUG 12845821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( pOp->zComment ){ 12855821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->flags = MEM_Str|MEM_Term; 12865821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->z = pOp->zComment; 12875821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->n = sqlite3Strlen30(pMem->z); 12885821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->enc = SQLITE_UTF8; 12895821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->type = SQLITE_TEXT; 12905821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) }else 12915821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#endif 12925821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) { 12935821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->flags = MEM_Null; /* Comment */ 12945821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->type = SQLITE_NULL; 12955821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 12965821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 12975821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 12985821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->nResColumn = 8 - 4*(p->explain-1); 12995821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->rc = SQLITE_OK; 13005821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) rc = SQLITE_ROW; 13015821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 13025821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return rc; 13035821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 13045821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#endif /* SQLITE_OMIT_EXPLAIN */ 13055821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 13065821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#ifdef SQLITE_DEBUG 13075821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 13085821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Print the SQL that was used to generate a VDBE program. 13095821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 13105821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)void sqlite3VdbePrintSql(Vdbe *p){ 13115821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int nOp = p->nOp; 13125821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) VdbeOp *pOp; 13135821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( nOp<1 ) return; 13145821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pOp = &p->aOp[0]; 13155821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( pOp->opcode==OP_Trace && pOp->p4.z!=0 ){ 13165821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) const char *z = pOp->p4.z; 13175821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) while( sqlite3Isspace(*z) ) z++; 13185821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) printf("SQL: [%s]\n", z); 13195821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 13205821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 13215821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#endif 13225821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 13235821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#if !defined(SQLITE_OMIT_TRACE) && defined(SQLITE_ENABLE_IOTRACE) 13245821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 13255821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Print an IOTRACE message showing SQL content. 13265821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 13275821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)void sqlite3VdbeIOTraceSql(Vdbe *p){ 13285821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int nOp = p->nOp; 13295821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) VdbeOp *pOp; 13305821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( sqlite3IoTrace==0 ) return; 13315821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( nOp<1 ) return; 13325821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pOp = &p->aOp[0]; 13335821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( pOp->opcode==OP_Trace && pOp->p4.z!=0 ){ 13345821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int i, j; 13355821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) char z[1000]; 13365821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3_snprintf(sizeof(z), z, "%s", pOp->p4.z); 13375821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) for(i=0; sqlite3Isspace(z[i]); i++){} 13385821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) for(j=0; z[i]; i++){ 13395821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( sqlite3Isspace(z[i]) ){ 13405821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( z[i-1]!=' ' ){ 13415821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) z[j++] = ' '; 13425821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 13435821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) }else{ 13445821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) z[j++] = z[i]; 13455821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 13465821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 13475821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) z[j] = 0; 13485821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3IoTrace("SQL %s\n", z); 13495821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 13505821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 13515821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#endif /* !SQLITE_OMIT_TRACE && SQLITE_ENABLE_IOTRACE */ 13525821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 13535821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 13545821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Allocate space from a fixed size buffer and return a pointer to 13555821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** that space. If insufficient space is available, return NULL. 13565821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 13575821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** The pBuf parameter is the initial value of a pointer which will 13585821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** receive the new memory. pBuf is normally NULL. If pBuf is not 13595821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** NULL, it means that memory space has already been allocated and that 13605821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** this routine should not allocate any new memory. When pBuf is not 13615821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** NULL simply return pBuf. Only allocate new memory space when pBuf 13625821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** is NULL. 13635821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 13645821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** nByte is the number of bytes of space needed. 13655821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 13665821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** *ppFrom points to available space and pEnd points to the end of the 13675821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** available space. When space is allocated, *ppFrom is advanced past 13685821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** the end of the allocated space. 13695821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 13705821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** *pnByte is a counter of the number of bytes of space that have failed 13715821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** to allocate. If there is insufficient space in *ppFrom to satisfy the 13725821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** request, then increment *pnByte by the amount of the request. 13735821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 13745821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)static void *allocSpace( 13755821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) void *pBuf, /* Where return pointer will be stored */ 13765821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int nByte, /* Number of bytes to allocate */ 13775821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) u8 **ppFrom, /* IN/OUT: Allocate from *ppFrom */ 13785821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) u8 *pEnd, /* Pointer to 1 byte past the end of *ppFrom buffer */ 13795821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int *pnByte /* If allocation cannot be made, increment *pnByte */ 13805821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)){ 13815821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( EIGHT_BYTE_ALIGNMENT(*ppFrom) ); 13825821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( pBuf ) return pBuf; 13835821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) nByte = ROUND8(nByte); 13845821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( &(*ppFrom)[nByte] <= pEnd ){ 13855821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pBuf = (void*)*ppFrom; 13865821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) *ppFrom += nByte; 13875821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) }else{ 13885821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) *pnByte += nByte; 13895821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 13905821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return pBuf; 13915821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 13925821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 13935821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 13945821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Prepare a virtual machine for execution. This involves things such 13955821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** as allocating stack space and initializing the program counter. 13965821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** After the VDBE has be prepped, it can be executed by one or more 13975821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** calls to sqlite3VdbeExec(). 13985821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 13995821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** This is the only way to move a VDBE from VDBE_MAGIC_INIT to 14005821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** VDBE_MAGIC_RUN. 14015821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 14025821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** This function may be called more than once on a single virtual machine. 14035821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** The first call is made while compiling the SQL statement. Subsequent 14045821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** calls are made as part of the process of resetting a statement to be 14055821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** re-executed (from a call to sqlite3_reset()). The nVar, nMem, nCursor 14065821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** and isExplain parameters are only passed correct values the first time 14075821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** the function is called. On subsequent calls, from sqlite3_reset(), nVar 14085821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** is passed -1 and nMem, nCursor and isExplain are all passed zero. 14095821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 14105821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)void sqlite3VdbeMakeReady( 14115821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Vdbe *p, /* The VDBE */ 14125821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int nVar, /* Number of '?' see in the SQL statement */ 14135821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int nMem, /* Number of memory cells to allocate */ 14145821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int nCursor, /* Number of cursors to allocate */ 14155821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int nArg, /* Maximum number of args in SubPrograms */ 14165821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int isExplain, /* True if the EXPLAIN keywords is present */ 14175821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int usesStmtJournal /* True to set Vdbe.usesStmtJournal */ 14185821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)){ 14195821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int n; 14205821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3 *db = p->db; 14215821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 14225821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( p!=0 ); 14235821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( p->magic==VDBE_MAGIC_INIT ); 14245821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 14255821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* There should be at least one opcode. 14265821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */ 14275821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( p->nOp>0 ); 14285821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 14295821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* Set the magic to VDBE_MAGIC_RUN sooner rather than later. */ 14305821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->magic = VDBE_MAGIC_RUN; 14315821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 14325821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* For each cursor required, also allocate a memory cell. Memory 14335821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** cells (nMem+1-nCursor)..nMem, inclusive, will never be used by 14345821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** the vdbe program. Instead they are used to allocate space for 14355821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** VdbeCursor/BtCursor structures. The blob of memory associated with 14365821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** cursor 0 is stored in memory cell nMem. Memory cell (nMem-1) 14375821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** stores the blob of memory associated with cursor 1, etc. 14385821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** 14395821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** See also: allocateCursor(). 14405821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */ 14415821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) nMem += nCursor; 14425821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 14435821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* Allocate space for memory registers, SQL variables, VDBE cursors and 14445821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** an array to marshal SQL function arguments in. This is only done the 14455821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** first time this function is called for a given VDBE, not when it is 14465821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** being called from sqlite3_reset() to reset the virtual machine. 14475821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */ 14485821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( nVar>=0 && ALWAYS(db->mallocFailed==0) ){ 14495821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) u8 *zCsr = (u8 *)&p->aOp[p->nOp]; /* Memory avaliable for alloation */ 14505821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) u8 *zEnd = (u8 *)&p->aOp[p->nOpAlloc]; /* First byte past available mem */ 14515821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int nByte; /* How much extra memory needed */ 14525821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 14535821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) resolveP2Values(p, &nArg); 14545821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->usesStmtJournal = (u8)usesStmtJournal; 14555821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( isExplain && nMem<10 ){ 14565821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) nMem = 10; 14575821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 14585821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) memset(zCsr, 0, zEnd-zCsr); 14595821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) zCsr += (zCsr - (u8*)0)&7; 14605821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( EIGHT_BYTE_ALIGNMENT(zCsr) ); 14615821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 14625821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* Memory for registers, parameters, cursor, etc, is allocated in two 14635821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** passes. On the first pass, we try to reuse unused space at the 14645821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** end of the opcode array. If we are unable to satisfy all memory 14655821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** requirements by reusing the opcode array tail, then the second 14665821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** pass will fill in the rest using a fresh allocation. 14675821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** 14685821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** This two-pass approach that reuses as much memory as possible from 14695821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** the leftover space at the end of the opcode array can significantly 14705821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** reduce the amount of memory held by a prepared statement. 14715821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */ 14725821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) do { 14735821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) nByte = 0; 14745821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->aMem = allocSpace(p->aMem, nMem*sizeof(Mem), &zCsr, zEnd, &nByte); 14755821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->aVar = allocSpace(p->aVar, nVar*sizeof(Mem), &zCsr, zEnd, &nByte); 14765821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->apArg = allocSpace(p->apArg, nArg*sizeof(Mem*), &zCsr, zEnd, &nByte); 14775821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->azVar = allocSpace(p->azVar, nVar*sizeof(char*), &zCsr, zEnd, &nByte); 14785821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->apCsr = allocSpace(p->apCsr, nCursor*sizeof(VdbeCursor*), 14795821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) &zCsr, zEnd, &nByte); 14805821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( nByte ){ 14815821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->pFree = sqlite3DbMallocZero(db, nByte); 14825821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 14835821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) zCsr = p->pFree; 14845821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) zEnd = &zCsr[nByte]; 14855821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) }while( nByte && !db->mallocFailed ); 14865821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 14875821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->nCursor = (u16)nCursor; 14885821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p->aVar ){ 14895821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->nVar = (ynVar)nVar; 14905821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) for(n=0; n<nVar; n++){ 14915821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->aVar[n].flags = MEM_Null; 14925821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->aVar[n].db = db; 14935821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 14945821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 14955821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p->aMem ){ 14965821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->aMem--; /* aMem[] goes from 1..nMem */ 14975821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->nMem = nMem; /* not from 0..nMem-1 */ 14985821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) for(n=1; n<=nMem; n++){ 14995821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->aMem[n].flags = MEM_Null; 15005821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->aMem[n].db = db; 15015821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 15025821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 15035821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 15045821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#ifdef SQLITE_DEBUG 15055821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) for(n=1; n<p->nMem; n++){ 15065821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( p->aMem[n].db==db ); 15075821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 15085821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#endif 15095821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 15105821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->pc = -1; 15115821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->rc = SQLITE_OK; 15125821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->errorAction = OE_Abort; 15135821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->explain |= isExplain; 15145821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->magic = VDBE_MAGIC_RUN; 15155821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->nChange = 0; 15165821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->cacheCtr = 1; 15175821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->minWriteFileFormat = 255; 15185821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->iStatement = 0; 15195821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->nFkConstraint = 0; 15205821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#ifdef VDBE_PROFILE 15215821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) { 15225821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int i; 15235821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) for(i=0; i<p->nOp; i++){ 15245821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->aOp[i].cnt = 0; 15255821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->aOp[i].cycles = 0; 15265821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 15275821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 15285821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#endif 15295821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 15305821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 15315821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 15325821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Close a VDBE cursor and release all the resources that cursor 15335821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** happens to hold. 15345821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 15355821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)void sqlite3VdbeFreeCursor(Vdbe *p, VdbeCursor *pCx){ 15365821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( pCx==0 ){ 15375821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return; 15385821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 15395821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( pCx->pBt ){ 15405821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3BtreeClose(pCx->pBt); 15415821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* The pCx->pCursor will be close automatically, if it exists, by 15425821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** the call above. */ 15435821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) }else if( pCx->pCursor ){ 15445821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3BtreeCloseCursor(pCx->pCursor); 15455821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 15465821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#ifndef SQLITE_OMIT_VIRTUALTABLE 15475821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( pCx->pVtabCursor ){ 15485821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3_vtab_cursor *pVtabCursor = pCx->pVtabCursor; 15495821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) const sqlite3_module *pModule = pCx->pModule; 15505821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->inVtabMethod = 1; 15515821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pModule->xClose(pVtabCursor); 15525821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->inVtabMethod = 0; 15535821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 15545821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#endif 15555821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 15565821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 15575821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 15585821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Copy the values stored in the VdbeFrame structure to its Vdbe. This 15595821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** is used, for example, when a trigger sub-program is halted to restore 15605821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** control to the main program. 15615821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 15625821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)int sqlite3VdbeFrameRestore(VdbeFrame *pFrame){ 15635821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Vdbe *v = pFrame->v; 15645821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) v->aOp = pFrame->aOp; 15655821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) v->nOp = pFrame->nOp; 15665821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) v->aMem = pFrame->aMem; 15675821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) v->nMem = pFrame->nMem; 15685821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) v->apCsr = pFrame->apCsr; 15695821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) v->nCursor = pFrame->nCursor; 15705821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) v->db->lastRowid = pFrame->lastRowid; 15715821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) v->nChange = pFrame->nChange; 15725821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return pFrame->pc; 15735821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 15745821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 15755821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 15765821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Close all cursors. 15775821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 15785821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Also release any dynamic memory held by the VM in the Vdbe.aMem memory 15795821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** cell array. This is necessary as the memory cell array may contain 15805821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** pointers to VdbeFrame objects, which may in turn contain pointers to 15815821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** open cursors. 15825821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 15835821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)static void closeAllCursors(Vdbe *p){ 15845821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p->pFrame ){ 15855821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) VdbeFrame *pFrame; 15865821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) for(pFrame=p->pFrame; pFrame->pParent; pFrame=pFrame->pParent); 15875821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3VdbeFrameRestore(pFrame); 15885821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 15895821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->pFrame = 0; 15905821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->nFrame = 0; 15915821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 15925821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p->apCsr ){ 15935821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int i; 15945821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) for(i=0; i<p->nCursor; i++){ 15955821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) VdbeCursor *pC = p->apCsr[i]; 15965821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( pC ){ 15975821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3VdbeFreeCursor(p, pC); 15985821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->apCsr[i] = 0; 15995821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 16005821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 16015821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 16025821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p->aMem ){ 16035821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) releaseMemArray(&p->aMem[1], p->nMem); 16045821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 16055821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) while( p->pDelFrame ){ 16065821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) VdbeFrame *pDel = p->pDelFrame; 16075821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->pDelFrame = pDel->pParent; 16085821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3VdbeFrameDelete(pDel); 16095821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 16105821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 16115821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 16125821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 16135821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Clean up the VM after execution. 16145821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 16155821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** This routine will automatically close any cursors, lists, and/or 16165821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** sorters that were left open. It also deletes the values of 16175821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** variables in the aVar[] array. 16185821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 16195821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)static void Cleanup(Vdbe *p){ 16205821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3 *db = p->db; 16215821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 16225821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#ifdef SQLITE_DEBUG 16235821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* Execute assert() statements to ensure that the Vdbe.apCsr[] and 16245821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** Vdbe.aMem[] arrays have already been cleaned up. */ 16255821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int i; 16265821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) for(i=0; i<p->nCursor; i++) assert( p->apCsr==0 || p->apCsr[i]==0 ); 16275821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) for(i=1; i<=p->nMem; i++) assert( p->aMem==0 || p->aMem[i].flags==MEM_Null ); 16285821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#endif 16295821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 16305821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3DbFree(db, p->zErrMsg); 16315821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->zErrMsg = 0; 16325821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->pResultSet = 0; 16335821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 16345821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 16355821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 16365821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Set the number of result columns that will be returned by this SQL 16375821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** statement. This is now set at compile time, rather than during 16385821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** execution of the vdbe program so that sqlite3_column_count() can 16395821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** be called on an SQL statement before sqlite3_step(). 16405821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 16415821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)void sqlite3VdbeSetNumCols(Vdbe *p, int nResColumn){ 16425821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Mem *pColName; 16435821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int n; 16445821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3 *db = p->db; 16455821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 16465821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) releaseMemArray(p->aColName, p->nResColumn*COLNAME_N); 16475821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3DbFree(db, p->aColName); 16485821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) n = nResColumn*COLNAME_N; 16495821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->nResColumn = (u16)nResColumn; 16505821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->aColName = pColName = (Mem*)sqlite3DbMallocZero(db, sizeof(Mem)*n ); 16515821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p->aColName==0 ) return; 16525821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) while( n-- > 0 ){ 16535821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pColName->flags = MEM_Null; 16545821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pColName->db = p->db; 16555821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pColName++; 16565821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 16575821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 16585821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 16595821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 16605821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Set the name of the idx'th column to be returned by the SQL statement. 16615821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** zName must be a pointer to a nul terminated string. 16625821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 16635821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** This call must be made after a call to sqlite3VdbeSetNumCols(). 16645821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 16655821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** The final parameter, xDel, must be one of SQLITE_DYNAMIC, SQLITE_STATIC 16665821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** or SQLITE_TRANSIENT. If it is SQLITE_DYNAMIC, then the buffer pointed 16675821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** to by zName will be freed by sqlite3DbFree() when the vdbe is destroyed. 16685821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 16695821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)int sqlite3VdbeSetColName( 16705821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Vdbe *p, /* Vdbe being configured */ 16715821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int idx, /* Index of column zName applies to */ 16725821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int var, /* One of the COLNAME_* constants */ 16735821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) const char *zName, /* Pointer to buffer containing name */ 16745821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) void (*xDel)(void*) /* Memory management strategy for zName */ 16755821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)){ 16765821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int rc; 16775821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Mem *pColName; 16785821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( idx<p->nResColumn ); 16795821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( var<COLNAME_N ); 16805821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p->db->mallocFailed ){ 16815821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( !zName || xDel!=SQLITE_DYNAMIC ); 16825821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return SQLITE_NOMEM; 16835821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 16845821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( p->aColName!=0 ); 16855821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pColName = &(p->aColName[idx+var*p->nResColumn]); 16865821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) rc = sqlite3VdbeMemSetStr(pColName, zName, -1, SQLITE_UTF8, xDel); 16875821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( rc!=0 || !zName || (pColName->flags&MEM_Term)!=0 ); 16885821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return rc; 16895821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 16905821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 16915821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 16925821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** A read or write transaction may or may not be active on database handle 16935821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** db. If a transaction is active, commit it. If there is a 16945821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** write-transaction spanning more than one database file, this routine 16955821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** takes care of the master journal trickery. 16965821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 16975821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)static int vdbeCommit(sqlite3 *db, Vdbe *p){ 16985821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int i; 16995821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int nTrans = 0; /* Number of databases with an active write-transaction */ 17005821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int rc = SQLITE_OK; 17015821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int needXcommit = 0; 17025821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 17035821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#ifdef SQLITE_OMIT_VIRTUALTABLE 17045821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* With this option, sqlite3VtabSync() is defined to be simply 17055821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** SQLITE_OK so p is not used. 17065821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */ 17075821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) UNUSED_PARAMETER(p); 17085821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#endif 17095821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 17105821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* Before doing anything else, call the xSync() callback for any 17115821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** virtual module tables written in this transaction. This has to 17125821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** be done before determining whether a master journal file is 17135821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** required, as an xSync() callback may add an attached database 17145821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** to the transaction. 17155821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */ 17165821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) rc = sqlite3VtabSync(db, &p->zErrMsg); 17175821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 17185821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* This loop determines (a) if the commit hook should be invoked and 17195821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** (b) how many database files have open write transactions, not 17205821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** including the temp database. (b) is important because if more than 17215821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** one database file has an open write transaction, a master journal 17225821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** file is required for an atomic commit. 17235821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */ 17245821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) for(i=0; rc==SQLITE_OK && i<db->nDb; i++){ 17255821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Btree *pBt = db->aDb[i].pBt; 17265821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( sqlite3BtreeIsInTrans(pBt) ){ 17275821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) needXcommit = 1; 17285821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( i!=1 ) nTrans++; 17295821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) rc = sqlite3PagerExclusiveLock(sqlite3BtreePager(pBt)); 17305821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 17315821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 17325821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( rc!=SQLITE_OK ){ 17335821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return rc; 17345821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 17355821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 17365821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* If there are any write-transactions at all, invoke the commit hook */ 17375821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( needXcommit && db->xCommitCallback ){ 17385821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) rc = db->xCommitCallback(db->pCommitArg); 17395821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( rc ){ 17405821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return SQLITE_CONSTRAINT; 17415821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 17425821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 17435821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 17445821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* The simple case - no more than one database file (not counting the 17455821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** TEMP database) has a transaction active. There is no need for the 17465821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** master-journal. 17475821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** 17485821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** If the return value of sqlite3BtreeGetFilename() is a zero length 17495821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** string, it means the main database is :memory: or a temp file. In 17505821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** that case we do not support atomic multi-file commits, so use the 17515821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** simple case then too. 17525821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */ 17535821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( 0==sqlite3Strlen30(sqlite3BtreeGetFilename(db->aDb[0].pBt)) 17545821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) || nTrans<=1 17555821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ){ 17565821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) for(i=0; rc==SQLITE_OK && i<db->nDb; i++){ 17575821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Btree *pBt = db->aDb[i].pBt; 17585821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( pBt ){ 17595821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) rc = sqlite3BtreeCommitPhaseOne(pBt, 0); 17605821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 17615821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 17625821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 17635821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* Do the commit only if all databases successfully complete phase 1. 17645821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** If one of the BtreeCommitPhaseOne() calls fails, this indicates an 17655821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** IO error while deleting or truncating a journal file. It is unlikely, 17665821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** but could happen. In this case abandon processing and return the error. 17675821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */ 17685821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) for(i=0; rc==SQLITE_OK && i<db->nDb; i++){ 17695821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Btree *pBt = db->aDb[i].pBt; 17705821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( pBt ){ 17715821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) rc = sqlite3BtreeCommitPhaseTwo(pBt, 0); 17725821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 17735821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 17745821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( rc==SQLITE_OK ){ 17755821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3VtabCommit(db); 17765821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 17775821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 17785821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 17795821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* The complex case - There is a multi-file write-transaction active. 17805821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** This requires a master journal file to ensure the transaction is 17815821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** committed atomicly. 17825821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */ 17835821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#ifndef SQLITE_OMIT_DISKIO 17845821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) else{ 17855821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3_vfs *pVfs = db->pVfs; 17865821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int needSync = 0; 17875821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) char *zMaster = 0; /* File-name for the master journal */ 17885821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) char const *zMainFile = sqlite3BtreeGetFilename(db->aDb[0].pBt); 17895821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3_file *pMaster = 0; 17905821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) i64 offset = 0; 17915821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int res; 17925821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 17935821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* Select a master journal file name */ 17945821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) do { 17955821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) u32 iRandom; 17965821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3DbFree(db, zMaster); 17975821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3_randomness(sizeof(iRandom), &iRandom); 17985821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) zMaster = sqlite3MPrintf(db, "%s-mj%08X", zMainFile, iRandom&0x7fffffff); 17995821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( !zMaster ){ 18005821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return SQLITE_NOMEM; 18015821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 18025821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) rc = sqlite3OsAccess(pVfs, zMaster, SQLITE_ACCESS_EXISTS, &res); 18035821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) }while( rc==SQLITE_OK && res ); 18045821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( rc==SQLITE_OK ){ 18055821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* Open the master journal. */ 18065821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) rc = sqlite3OsOpenMalloc(pVfs, zMaster, &pMaster, 18075821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) SQLITE_OPEN_READWRITE|SQLITE_OPEN_CREATE| 18085821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) SQLITE_OPEN_EXCLUSIVE|SQLITE_OPEN_MASTER_JOURNAL, 0 18095821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ); 18105821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 18115821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( rc!=SQLITE_OK ){ 18125821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3DbFree(db, zMaster); 18135821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return rc; 18145821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 18155821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 18165821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* Write the name of each database file in the transaction into the new 18175821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** master journal file. If an error occurs at this point close 18185821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** and delete the master journal file. All the individual journal files 18195821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** still have 'null' as the master journal pointer, so they will roll 18205821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** back independently if a failure occurs. 18215821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */ 18225821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) for(i=0; i<db->nDb; i++){ 18235821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Btree *pBt = db->aDb[i].pBt; 18245821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( sqlite3BtreeIsInTrans(pBt) ){ 18255821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) char const *zFile = sqlite3BtreeGetJournalname(pBt); 18265821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( zFile==0 ){ 18275821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) continue; /* Ignore TEMP and :memory: databases */ 18285821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 18295821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( zFile[0]!=0 ); 18305821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( !needSync && !sqlite3BtreeSyncDisabled(pBt) ){ 18315821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) needSync = 1; 18325821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 18335821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) rc = sqlite3OsWrite(pMaster, zFile, sqlite3Strlen30(zFile)+1, offset); 18345821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) offset += sqlite3Strlen30(zFile)+1; 18355821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( rc!=SQLITE_OK ){ 18365821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3OsCloseFree(pMaster); 18375821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3OsDelete(pVfs, zMaster, 0); 18385821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3DbFree(db, zMaster); 18395821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return rc; 18405821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 18415821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 18425821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 18435821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 18445821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* Sync the master journal file. If the IOCAP_SEQUENTIAL device 18455821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** flag is set this is not required. 18465821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */ 18475821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( needSync 18485821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) && 0==(sqlite3OsDeviceCharacteristics(pMaster)&SQLITE_IOCAP_SEQUENTIAL) 18495821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) && SQLITE_OK!=(rc = sqlite3OsSync(pMaster, SQLITE_SYNC_NORMAL)) 18505821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ){ 18515821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3OsCloseFree(pMaster); 18525821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3OsDelete(pVfs, zMaster, 0); 18535821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3DbFree(db, zMaster); 18545821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return rc; 18555821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 18565821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 18575821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* Sync all the db files involved in the transaction. The same call 18585821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** sets the master journal pointer in each individual journal. If 18595821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** an error occurs here, do not delete the master journal file. 18605821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** 18615821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** If the error occurs during the first call to 18625821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** sqlite3BtreeCommitPhaseOne(), then there is a chance that the 18635821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** master journal file will be orphaned. But we cannot delete it, 18645821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** in case the master journal file name was written into the journal 18655821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** file before the failure occurred. 18665821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */ 18675821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) for(i=0; rc==SQLITE_OK && i<db->nDb; i++){ 18685821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Btree *pBt = db->aDb[i].pBt; 18695821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( pBt ){ 18705821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) rc = sqlite3BtreeCommitPhaseOne(pBt, zMaster); 18715821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 18725821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 18735821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3OsCloseFree(pMaster); 18745821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( rc!=SQLITE_BUSY ); 18755821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( rc!=SQLITE_OK ){ 18765821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3DbFree(db, zMaster); 18775821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return rc; 18785821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 18795821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 18805821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* Delete the master journal file. This commits the transaction. After 18815821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** doing this the directory is synced again before any individual 18825821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** transaction files are deleted. 18835821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */ 18845821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) rc = sqlite3OsDelete(pVfs, zMaster, 1); 18855821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3DbFree(db, zMaster); 18865821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) zMaster = 0; 18875821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( rc ){ 18885821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return rc; 18895821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 18905821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 18915821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* All files and directories have already been synced, so the following 18925821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** calls to sqlite3BtreeCommitPhaseTwo() are only closing files and 18935821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** deleting or truncating journals. If something goes wrong while 18945821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** this is happening we don't really care. The integrity of the 18955821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** transaction is already guaranteed, but some stray 'cold' journals 18965821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** may be lying around. Returning an error code won't help matters. 18975821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */ 18985821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) disable_simulated_io_errors(); 18995821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3BeginBenignMalloc(); 19005821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) for(i=0; i<db->nDb; i++){ 19015821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Btree *pBt = db->aDb[i].pBt; 19025821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( pBt ){ 19035821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3BtreeCommitPhaseTwo(pBt, 1); 19045821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 19055821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 19065821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3EndBenignMalloc(); 19075821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) enable_simulated_io_errors(); 19085821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 19095821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3VtabCommit(db); 19105821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 19115821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#endif 19125821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 19135821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return rc; 19145821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 19155821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 19165821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 19175821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** This routine checks that the sqlite3.activeVdbeCnt count variable 19185821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** matches the number of vdbe's in the list sqlite3.pVdbe that are 19195821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** currently active. An assertion fails if the two counts do not match. 19205821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** This is an internal self-check only - it is not an essential processing 19215821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** step. 19225821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 19235821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** This is a no-op if NDEBUG is defined. 19245821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 19255821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#ifndef NDEBUG 19265821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)static void checkActiveVdbeCnt(sqlite3 *db){ 19275821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Vdbe *p; 19285821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int cnt = 0; 19295821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int nWrite = 0; 19305821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p = db->pVdbe; 19315821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) while( p ){ 19325821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p->magic==VDBE_MAGIC_RUN && p->pc>=0 ){ 19335821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) cnt++; 19345821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p->readOnly==0 ) nWrite++; 19355821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 19365821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p = p->pNext; 19375821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 19385821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( cnt==db->activeVdbeCnt ); 19395821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( nWrite==db->writeVdbeCnt ); 19405821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 19415821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#else 19425821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#define checkActiveVdbeCnt(x) 19435821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#endif 19445821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 19455821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 19465821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** For every Btree that in database connection db which 19475821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** has been modified, "trip" or invalidate each cursor in 19485821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** that Btree might have been modified so that the cursor 19495821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** can never be used again. This happens when a rollback 19505821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*** occurs. We have to trip all the other cursors, even 19515821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** cursor from other VMs in different database connections, 19525821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** so that none of them try to use the data at which they 19535821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** were pointing and which now may have been changed due 19545821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** to the rollback. 19555821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 19565821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Remember that a rollback can delete tables complete and 19575821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** reorder rootpages. So it is not sufficient just to save 19585821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** the state of the cursor. We have to invalidate the cursor 19595821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** so that it is never used again. 19605821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 19615821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)static void invalidateCursorsOnModifiedBtrees(sqlite3 *db){ 19625821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int i; 19635821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) for(i=0; i<db->nDb; i++){ 19645821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Btree *p = db->aDb[i].pBt; 19655821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p && sqlite3BtreeIsInTrans(p) ){ 19665821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3BtreeTripAllCursors(p, SQLITE_ABORT); 19675821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 19685821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 19695821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 19705821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 19715821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 19725821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** If the Vdbe passed as the first argument opened a statement-transaction, 19735821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** close it now. Argument eOp must be either SAVEPOINT_ROLLBACK or 19745821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** SAVEPOINT_RELEASE. If it is SAVEPOINT_ROLLBACK, then the statement 19755821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** transaction is rolled back. If eOp is SAVEPOINT_RELEASE, then the 19765821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** statement transaction is commtted. 19775821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 19785821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** If an IO error occurs, an SQLITE_IOERR_XXX error code is returned. 19795821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Otherwise SQLITE_OK. 19805821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 19815821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)int sqlite3VdbeCloseStatement(Vdbe *p, int eOp){ 19825821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3 *const db = p->db; 19835821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int rc = SQLITE_OK; 19845821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 19855821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* If p->iStatement is greater than zero, then this Vdbe opened a 19865821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** statement transaction that should be closed here. The only exception 19875821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** is that an IO error may have occured, causing an emergency rollback. 19885821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** In this case (db->nStatement==0), and there is nothing to do. 19895821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */ 19905821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( db->nStatement && p->iStatement ){ 19915821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int i; 19925821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) const int iSavepoint = p->iStatement-1; 19935821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 19945821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( eOp==SAVEPOINT_ROLLBACK || eOp==SAVEPOINT_RELEASE); 19955821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( db->nStatement>0 ); 19965821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( p->iStatement==(db->nStatement+db->nSavepoint) ); 19975821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 19985821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) for(i=0; i<db->nDb; i++){ 19995821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int rc2 = SQLITE_OK; 20005821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Btree *pBt = db->aDb[i].pBt; 20015821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( pBt ){ 20025821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( eOp==SAVEPOINT_ROLLBACK ){ 20035821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) rc2 = sqlite3BtreeSavepoint(pBt, SAVEPOINT_ROLLBACK, iSavepoint); 20045821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 20055821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( rc2==SQLITE_OK ){ 20065821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) rc2 = sqlite3BtreeSavepoint(pBt, SAVEPOINT_RELEASE, iSavepoint); 20075821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 20085821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( rc==SQLITE_OK ){ 20095821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) rc = rc2; 20105821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 20115821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 20125821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 20135821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) db->nStatement--; 20145821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->iStatement = 0; 20155821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 20165821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* If the statement transaction is being rolled back, also restore the 20175821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** database handles deferred constraint counter to the value it had when 20185821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** the statement transaction was opened. */ 20195821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( eOp==SAVEPOINT_ROLLBACK ){ 20205821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) db->nDeferredCons = p->nStmtDefCons; 20215821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 20225821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 20235821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return rc; 20245821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 20255821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 20265821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 20275821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** This function is called when a transaction opened by the database 20285821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** handle associated with the VM passed as an argument is about to be 20295821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** committed. If there are outstanding deferred foreign key constraint 20305821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** violations, return SQLITE_ERROR. Otherwise, SQLITE_OK. 20315821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 20325821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** If there are outstanding FK violations and this function returns 20335821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** SQLITE_ERROR, set the result of the VM to SQLITE_CONSTRAINT and write 20345821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** an error message to it. Then return SQLITE_ERROR. 20355821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 20365821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#ifndef SQLITE_OMIT_FOREIGN_KEY 20375821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)int sqlite3VdbeCheckFk(Vdbe *p, int deferred){ 20385821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3 *db = p->db; 20395821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( (deferred && db->nDeferredCons>0) || (!deferred && p->nFkConstraint>0) ){ 20405821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->rc = SQLITE_CONSTRAINT; 20415821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->errorAction = OE_Abort; 20425821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3SetString(&p->zErrMsg, db, "foreign key constraint failed"); 20435821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return SQLITE_ERROR; 20445821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 20455821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return SQLITE_OK; 20465821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 20475821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#endif 20485821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 20495821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 20505821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** This routine is called the when a VDBE tries to halt. If the VDBE 20515821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** has made changes and is in autocommit mode, then commit those 20525821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** changes. If a rollback is needed, then do the rollback. 20535821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 20545821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** This routine is the only way to move the state of a VM from 20555821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** SQLITE_MAGIC_RUN to SQLITE_MAGIC_HALT. It is harmless to 20565821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** call this on a VM that is in the SQLITE_MAGIC_HALT state. 20575821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 20585821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Return an error code. If the commit could not complete because of 20595821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** lock contention, return SQLITE_BUSY. If SQLITE_BUSY is returned, it 20605821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** means the close did not happen and needs to be repeated. 20615821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 20625821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)int sqlite3VdbeHalt(Vdbe *p){ 20635821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int rc; /* Used to store transient return codes */ 20645821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3 *db = p->db; 20655821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 20665821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* This function contains the logic that determines if a statement or 20675821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** transaction will be committed or rolled back as a result of the 20685821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** execution of this virtual machine. 20695821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** 20705821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** If any of the following errors occur: 20715821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** 20725821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** SQLITE_NOMEM 20735821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** SQLITE_IOERR 20745821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** SQLITE_FULL 20755821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** SQLITE_INTERRUPT 20765821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** 20775821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** Then the internal cache might have been left in an inconsistent 20785821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** state. We need to rollback the statement transaction, if there is 20795821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** one, or the complete transaction if there is no statement transaction. 20805821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */ 20815821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 20825821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p->db->mallocFailed ){ 20835821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->rc = SQLITE_NOMEM; 20845821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 20855821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) closeAllCursors(p); 20865821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p->magic!=VDBE_MAGIC_RUN ){ 20875821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return SQLITE_OK; 20885821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 20895821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) checkActiveVdbeCnt(db); 20905821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 20915821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* No commit or rollback needed if the program never started */ 20925821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p->pc>=0 ){ 20935821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int mrc; /* Primary error code from p->rc */ 20945821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int eStatementOp = 0; 20955821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int isSpecialError; /* Set to true if a 'special' error */ 20965821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 20975821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* Lock all btrees used by the statement */ 20985821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3VdbeEnter(p); 20995821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 21005821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* Check for one of the special errors */ 21015821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) mrc = p->rc & 0xff; 21025821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( p->rc!=SQLITE_IOERR_BLOCKED ); /* This error no longer exists */ 21035821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) isSpecialError = mrc==SQLITE_NOMEM || mrc==SQLITE_IOERR 21045821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) || mrc==SQLITE_INTERRUPT || mrc==SQLITE_FULL; 21055821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( isSpecialError ){ 21065821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* If the query was read-only and the error code is SQLITE_INTERRUPT, 21075821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** no rollback is necessary. Otherwise, at least a savepoint 21085821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** transaction must be rolled back to restore the database to a 21095821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** consistent state. 21105821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** 21115821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** Even if the statement is read-only, it is important to perform 21125821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** a statement or transaction rollback operation. If the error 21135821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** occured while writing to the journal, sub-journal or database 21145821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** file as part of an effort to free up cache space (see function 21155821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** pagerStress() in pager.c), the rollback is required to restore 21165821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** the pager to a consistent state. 21175821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */ 21185821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( !p->readOnly || mrc!=SQLITE_INTERRUPT ){ 21195821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( (mrc==SQLITE_NOMEM || mrc==SQLITE_FULL) && p->usesStmtJournal ){ 21205821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) eStatementOp = SAVEPOINT_ROLLBACK; 21215821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) }else{ 21225821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* We are forced to roll back the active transaction. Before doing 21235821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** so, abort any other statements this handle currently has active. 21245821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */ 21255821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) invalidateCursorsOnModifiedBtrees(db); 21265821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3RollbackAll(db); 21275821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3CloseSavepoints(db); 21285821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) db->autoCommit = 1; 21295821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 21305821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 21315821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 21325821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 21335821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* Check for immediate foreign key violations. */ 21345821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p->rc==SQLITE_OK ){ 21355821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3VdbeCheckFk(p, 0); 21365821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 21375821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 21385821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* If the auto-commit flag is set and this is the only active writer 21395821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** VM, then we do either a commit or rollback of the current transaction. 21405821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** 21415821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** Note: This block also runs if one of the special errors handled 21425821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** above has occurred. 21435821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */ 21445821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( !sqlite3VtabInSync(db) 21455821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) && db->autoCommit 21465821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) && db->writeVdbeCnt==(p->readOnly==0) 21475821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ){ 21485821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p->rc==SQLITE_OK || (p->errorAction==OE_Fail && !isSpecialError) ){ 21495821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) rc = sqlite3VdbeCheckFk(p, 1); 21505821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( rc!=SQLITE_OK ){ 21515821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( NEVER(p->readOnly) ){ 21525821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3VdbeLeave(p); 21535821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return SQLITE_ERROR; 21545821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 21555821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) rc = SQLITE_CONSTRAINT; 21565821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) }else{ 21575821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* The auto-commit flag is true, the vdbe program was successful 21585821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** or hit an 'OR FAIL' constraint and there are no deferred foreign 21595821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** key constraints to hold up the transaction. This means a commit 21605821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** is required. */ 21615821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) rc = vdbeCommit(db, p); 21625821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 21635821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( rc==SQLITE_BUSY && p->readOnly ){ 21645821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3VdbeLeave(p); 21655821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return SQLITE_BUSY; 21665821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) }else if( rc!=SQLITE_OK ){ 21675821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->rc = rc; 21685821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3RollbackAll(db); 21695821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) }else{ 21705821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) db->nDeferredCons = 0; 21715821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3CommitInternalChanges(db); 21725821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 21735821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) }else{ 21745821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3RollbackAll(db); 21755821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 21765821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) db->nStatement = 0; 21775821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) }else if( eStatementOp==0 ){ 21785821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p->rc==SQLITE_OK || p->errorAction==OE_Fail ){ 21795821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) eStatementOp = SAVEPOINT_RELEASE; 21805821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) }else if( p->errorAction==OE_Abort ){ 21815821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) eStatementOp = SAVEPOINT_ROLLBACK; 21825821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) }else{ 21835821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) invalidateCursorsOnModifiedBtrees(db); 21845821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3RollbackAll(db); 21855821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3CloseSavepoints(db); 21865821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) db->autoCommit = 1; 21875821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 21885821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 21895821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 21905821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* If eStatementOp is non-zero, then a statement transaction needs to 21915821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** be committed or rolled back. Call sqlite3VdbeCloseStatement() to 21925821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** do so. If this operation returns an error, and the current statement 21935821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** error code is SQLITE_OK or SQLITE_CONSTRAINT, then promote the 21945821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** current statement error code. 21955821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** 21965821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** Note that sqlite3VdbeCloseStatement() can only fail if eStatementOp 21975821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** is SAVEPOINT_ROLLBACK. But if p->rc==SQLITE_OK then eStatementOp 21985821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** must be SAVEPOINT_RELEASE. Hence the NEVER(p->rc==SQLITE_OK) in 21995821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** the following code. 22005821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */ 22015821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( eStatementOp ){ 22025821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) rc = sqlite3VdbeCloseStatement(p, eStatementOp); 22035821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( rc ){ 22045821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( eStatementOp==SAVEPOINT_ROLLBACK ); 22055821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( NEVER(p->rc==SQLITE_OK) || p->rc==SQLITE_CONSTRAINT ){ 22065821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->rc = rc; 22075821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3DbFree(db, p->zErrMsg); 22085821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->zErrMsg = 0; 22095821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 22105821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) invalidateCursorsOnModifiedBtrees(db); 22115821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3RollbackAll(db); 22125821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3CloseSavepoints(db); 22135821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) db->autoCommit = 1; 22145821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 22155821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 22165821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 22175821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* If this was an INSERT, UPDATE or DELETE and no statement transaction 22185821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** has been rolled back, update the database connection change-counter. 22195821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */ 22205821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p->changeCntOn ){ 22215821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( eStatementOp!=SAVEPOINT_ROLLBACK ){ 22225821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3VdbeSetChanges(db, p->nChange); 22235821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) }else{ 22245821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3VdbeSetChanges(db, 0); 22255821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 22265821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->nChange = 0; 22275821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 22285821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 22295821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* Rollback or commit any schema changes that occurred. */ 22305821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p->rc!=SQLITE_OK && db->flags&SQLITE_InternChanges ){ 22315821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3ResetInternalSchema(db, -1); 22325821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) db->flags = (db->flags | SQLITE_InternChanges); 22335821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 22345821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 22355821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* Release the locks */ 22365821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3VdbeLeave(p); 22375821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 22385821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 22395821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* We have successfully halted and closed the VM. Record this fact. */ 22405821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p->pc>=0 ){ 22415821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) db->activeVdbeCnt--; 22425821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( !p->readOnly ){ 22435821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) db->writeVdbeCnt--; 22445821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 22455821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( db->activeVdbeCnt>=db->writeVdbeCnt ); 22465821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 22475821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->magic = VDBE_MAGIC_HALT; 22485821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) checkActiveVdbeCnt(db); 22495821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p->db->mallocFailed ){ 22505821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->rc = SQLITE_NOMEM; 22515821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 22525821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 22535821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* If the auto-commit flag is set to true, then any locks that were held 22545821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** by connection db have now been released. Call sqlite3ConnectionUnlocked() 22555821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** to invoke any required unlock-notify callbacks. 22565821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */ 22575821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( db->autoCommit ){ 22585821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3ConnectionUnlocked(db); 22595821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 22605821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 22615821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( db->activeVdbeCnt>0 || db->autoCommit==0 || db->nStatement==0 ); 22625821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return (p->rc==SQLITE_BUSY ? SQLITE_BUSY : SQLITE_OK); 22635821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 22645821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 22655821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 22665821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 22675821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Each VDBE holds the result of the most recent sqlite3_step() call 22685821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** in p->rc. This routine sets that result back to SQLITE_OK. 22695821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 22705821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)void sqlite3VdbeResetStepResult(Vdbe *p){ 22715821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->rc = SQLITE_OK; 22725821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 22735821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 22745821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 22755821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Clean up a VDBE after execution but do not delete the VDBE just yet. 22765821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Write any error messages into *pzErrMsg. Return the result code. 22775821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 22785821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** After this routine is run, the VDBE should be ready to be executed 22795821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** again. 22805821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 22815821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** To look at it another way, this routine resets the state of the 22825821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** virtual machine from VDBE_MAGIC_RUN or VDBE_MAGIC_HALT back to 22835821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** VDBE_MAGIC_INIT. 22845821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 22855821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)int sqlite3VdbeReset(Vdbe *p){ 22865821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3 *db; 22875821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) db = p->db; 22885821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 22895821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* If the VM did not run to completion or if it encountered an 22905821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** error, then it might not have been halted properly. So halt 22915821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** it now. 22925821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */ 22935821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3VdbeHalt(p); 22945821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 22955821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* If the VDBE has be run even partially, then transfer the error code 22965821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** and error message from the VDBE into the main database structure. But 22975821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** if the VDBE has just been set to run but has not actually executed any 22985821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** instructions yet, leave the main database error information unchanged. 22995821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */ 23005821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p->pc>=0 ){ 23015821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p->zErrMsg ){ 23025821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3BeginBenignMalloc(); 23035821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3ValueSetStr(db->pErr,-1,p->zErrMsg,SQLITE_UTF8,SQLITE_TRANSIENT); 23045821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3EndBenignMalloc(); 23055821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) db->errCode = p->rc; 23065821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3DbFree(db, p->zErrMsg); 23075821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->zErrMsg = 0; 23085821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) }else if( p->rc ){ 23095821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3Error(db, p->rc, 0); 23105821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) }else{ 23115821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3Error(db, SQLITE_OK, 0); 23125821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 23135821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p->runOnlyOnce ) p->expired = 1; 23145821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) }else if( p->rc && p->expired ){ 23155821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* The expired flag was set on the VDBE before the first call 23165821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** to sqlite3_step(). For consistency (since sqlite3_step() was 23175821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** called), set the database error in this case as well. 23185821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */ 23195821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3Error(db, p->rc, 0); 23205821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3ValueSetStr(db->pErr, -1, p->zErrMsg, SQLITE_UTF8, SQLITE_TRANSIENT); 23215821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3DbFree(db, p->zErrMsg); 23225821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->zErrMsg = 0; 23235821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 23245821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 23255821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* Reclaim all memory used by the VDBE 23265821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */ 23275821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Cleanup(p); 23285821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 23295821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* Save profiling information from this VDBE run. 23305821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */ 23315821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#ifdef VDBE_PROFILE 23325821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) { 23335821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) FILE *out = fopen("vdbe_profile.out", "a"); 23345821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( out ){ 23355821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int i; 23365821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) fprintf(out, "---- "); 23375821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) for(i=0; i<p->nOp; i++){ 23385821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) fprintf(out, "%02x", p->aOp[i].opcode); 23395821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 23405821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) fprintf(out, "\n"); 23415821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) for(i=0; i<p->nOp; i++){ 23425821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) fprintf(out, "%6d %10lld %8lld ", 23435821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->aOp[i].cnt, 23445821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->aOp[i].cycles, 23455821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->aOp[i].cnt>0 ? p->aOp[i].cycles/p->aOp[i].cnt : 0 23465821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ); 23475821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3VdbePrintOp(out, i, &p->aOp[i]); 23485821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 23495821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) fclose(out); 23505821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 23515821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 23525821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#endif 23535821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->magic = VDBE_MAGIC_INIT; 23545821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return p->rc & db->errMask; 23555821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 23565821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 23575821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 23585821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Clean up and delete a VDBE after execution. Return an integer which is 23595821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** the result code. Write any error message text into *pzErrMsg. 23605821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 23615821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)int sqlite3VdbeFinalize(Vdbe *p){ 23625821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int rc = SQLITE_OK; 23635821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p->magic==VDBE_MAGIC_RUN || p->magic==VDBE_MAGIC_HALT ){ 23645821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) rc = sqlite3VdbeReset(p); 23655821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( (rc & p->db->errMask)==rc ); 23665821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 23675821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3VdbeDelete(p); 23685821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return rc; 23695821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 23705821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 23715821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 23725821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Call the destructor for each auxdata entry in pVdbeFunc for which 23735821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** the corresponding bit in mask is clear. Auxdata entries beyond 31 23745821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** are always destroyed. To destroy all auxdata entries, call this 23755821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** routine with mask==0. 23765821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 23775821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)void sqlite3VdbeDeleteAuxData(VdbeFunc *pVdbeFunc, int mask){ 23785821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int i; 23795821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) for(i=0; i<pVdbeFunc->nAux; i++){ 23805821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) struct AuxData *pAux = &pVdbeFunc->apAux[i]; 23815821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( (i>31 || !(mask&(((u32)1)<<i))) && pAux->pAux ){ 23825821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( pAux->xDelete ){ 23835821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pAux->xDelete(pAux->pAux); 23845821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 23855821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pAux->pAux = 0; 23865821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 23875821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 23885821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 23895821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 23905821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 23915821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Free all memory associated with the Vdbe passed as the second argument. 23925821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** The difference between this function and sqlite3VdbeDelete() is that 23935821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** VdbeDelete() also unlinks the Vdbe from the list of VMs associated with 23945821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** the database connection. 23955821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 23965821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)void sqlite3VdbeDeleteObject(sqlite3 *db, Vdbe *p){ 23975821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) SubProgram *pSub, *pNext; 23985821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( p->db==0 || p->db==db ); 23995821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) releaseMemArray(p->aVar, p->nVar); 24005821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) releaseMemArray(p->aColName, p->nResColumn*COLNAME_N); 24015821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) for(pSub=p->pProgram; pSub; pSub=pNext){ 24025821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pNext = pSub->pNext; 24035821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) vdbeFreeOpArray(db, pSub->aOp, pSub->nOp); 24045821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3DbFree(db, pSub); 24055821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 24065821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) vdbeFreeOpArray(db, p->aOp, p->nOp); 24075821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3DbFree(db, p->aLabel); 24085821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3DbFree(db, p->aColName); 24095821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3DbFree(db, p->zSql); 24105821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3DbFree(db, p->pFree); 24115821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3DbFree(db, p); 24125821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 24135821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 24145821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 24155821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Delete an entire VDBE. 24165821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 24175821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)void sqlite3VdbeDelete(Vdbe *p){ 24185821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3 *db; 24195821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 24205821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( NEVER(p==0) ) return; 24215821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) db = p->db; 24225821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p->pPrev ){ 24235821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->pPrev->pNext = p->pNext; 24245821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) }else{ 24255821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( db->pVdbe==p ); 24265821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) db->pVdbe = p->pNext; 24275821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 24285821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p->pNext ){ 24295821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->pNext->pPrev = p->pPrev; 24305821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 24315821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->magic = VDBE_MAGIC_DEAD; 24325821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->db = 0; 24335821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3VdbeDeleteObject(db, p); 24345821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 24355821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 24365821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 24375821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Make sure the cursor p is ready to read or write the row to which it 24385821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** was last positioned. Return an error code if an OOM fault or I/O error 24395821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** prevents us from positioning the cursor to its correct position. 24405821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 24415821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** If a MoveTo operation is pending on the given cursor, then do that 24425821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** MoveTo now. If no move is pending, check to see if the row has been 24435821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** deleted out from under the cursor and if it has, mark the row as 24445821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** a NULL row. 24455821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 24465821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** If the cursor is already pointing to the correct row and that row has 24475821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** not been deleted out from under the cursor, then this routine is a no-op. 24485821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 24495821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)int sqlite3VdbeCursorMoveto(VdbeCursor *p){ 24505821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p->deferredMoveto ){ 24515821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int res, rc; 24525821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#ifdef SQLITE_TEST 24535821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) extern int sqlite3_search_count; 24545821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#endif 24555821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( p->isTable ); 24565821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) rc = sqlite3BtreeMovetoUnpacked(p->pCursor, 0, p->movetoTarget, 0, &res); 24575821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( rc ) return rc; 24585821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->lastRowid = p->movetoTarget; 24595821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( res!=0 ) return SQLITE_CORRUPT_BKPT; 24605821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->rowidIsValid = 1; 24615821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#ifdef SQLITE_TEST 24625821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3_search_count++; 24635821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#endif 24645821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->deferredMoveto = 0; 24655821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->cacheStatus = CACHE_STALE; 24665821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) }else if( ALWAYS(p->pCursor) ){ 24675821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int hasMoved; 24685821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int rc = sqlite3BtreeCursorHasMoved(p->pCursor, &hasMoved); 24695821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( rc ) return rc; 24705821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( hasMoved ){ 24715821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->cacheStatus = CACHE_STALE; 24725821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->nullRow = 1; 24735821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 24745821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 24755821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return SQLITE_OK; 24765821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 24775821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 24785821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 24795821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** The following functions: 24805821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 24815821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** sqlite3VdbeSerialType() 24825821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** sqlite3VdbeSerialTypeLen() 24835821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** sqlite3VdbeSerialLen() 24845821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** sqlite3VdbeSerialPut() 24855821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** sqlite3VdbeSerialGet() 24865821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 24875821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** encapsulate the code that serializes values for storage in SQLite 24885821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** data and index records. Each serialized value consists of a 24895821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 'serial-type' and a blob of data. The serial type is an 8-byte unsigned 24905821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** integer, stored as a varint. 24915821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 24925821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** In an SQLite index record, the serial type is stored directly before 24935821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** the blob of data that it corresponds to. In a table record, all serial 24945821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** types are stored at the start of the record, and the blobs of data at 24955821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** the end. Hence these functions allow the caller to handle the 24965821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** serial-type and data blob seperately. 24975821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 24985821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** The following table describes the various storage classes for data: 24995821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 25005821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** serial type bytes of data type 25015821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** -------------- --------------- --------------- 25025821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 0 0 NULL 25035821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 1 1 signed integer 25045821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 2 2 signed integer 25055821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 3 3 signed integer 25065821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 4 4 signed integer 25075821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 5 6 signed integer 25085821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 6 8 signed integer 25095821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 7 8 IEEE float 25105821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 8 0 Integer constant 0 25115821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 9 0 Integer constant 1 25125821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 10,11 reserved for expansion 25135821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** N>=12 and even (N-12)/2 BLOB 25145821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** N>=13 and odd (N-13)/2 text 25155821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 25165821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** The 8 and 9 types were added in 3.3.0, file format 4. Prior versions 25175821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** of SQLite will not understand those serial types. 25185821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 25195821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 25205821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 25215821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Return the serial-type for the value stored in pMem. 25225821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 25235821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)u32 sqlite3VdbeSerialType(Mem *pMem, int file_format){ 25245821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int flags = pMem->flags; 25255821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int n; 25265821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 25275821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( flags&MEM_Null ){ 25285821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return 0; 25295821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 25305821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( flags&MEM_Int ){ 25315821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* Figure out whether to use 1, 2, 4, 6 or 8 bytes. */ 25325821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)# define MAX_6BYTE ((((i64)0x00008000)<<32)-1) 25335821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) i64 i = pMem->u.i; 25345821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) u64 u; 25355821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( file_format>=4 && (i&1)==i ){ 25365821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return 8+(u32)i; 25375821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 25385821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( i<0 ){ 25395821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( i<(-MAX_6BYTE) ) return 6; 25405821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* Previous test prevents: u = -(-9223372036854775808) */ 25415821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) u = -i; 25425821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) }else{ 25435821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) u = i; 25445821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 25455821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( u<=127 ) return 1; 25465821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( u<=32767 ) return 2; 25475821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( u<=8388607 ) return 3; 25485821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( u<=2147483647 ) return 4; 25495821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( u<=MAX_6BYTE ) return 5; 25505821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return 6; 25515821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 25525821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( flags&MEM_Real ){ 25535821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return 7; 25545821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 25555821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( pMem->db->mallocFailed || flags&(MEM_Str|MEM_Blob) ); 25565821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) n = pMem->n; 25575821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( flags & MEM_Zero ){ 25585821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) n += pMem->u.nZero; 25595821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 25605821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( n>=0 ); 25615821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return ((n*2) + 12 + ((flags&MEM_Str)!=0)); 25625821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 25635821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 25645821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 25655821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Return the length of the data corresponding to the supplied serial-type. 25665821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 25675821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)u32 sqlite3VdbeSerialTypeLen(u32 serial_type){ 25685821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( serial_type>=12 ){ 25695821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return (serial_type-12)/2; 25705821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) }else{ 25715821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) static const u8 aSize[] = { 0, 1, 2, 3, 4, 6, 8, 8, 0, 0, 0, 0 }; 25725821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return aSize[serial_type]; 25735821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 25745821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 25755821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 25765821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 25775821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** If we are on an architecture with mixed-endian floating 25785821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** points (ex: ARM7) then swap the lower 4 bytes with the 25795821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** upper 4 bytes. Return the result. 25805821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 25815821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** For most architectures, this is a no-op. 25825821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 25835821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** (later): It is reported to me that the mixed-endian problem 25845821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** on ARM7 is an issue with GCC, not with the ARM7 chip. It seems 25855821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** that early versions of GCC stored the two words of a 64-bit 25865821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** float in the wrong order. And that error has been propagated 25875821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** ever since. The blame is not necessarily with GCC, though. 25885821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** GCC might have just copying the problem from a prior compiler. 25895821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** I am also told that newer versions of GCC that follow a different 25905821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** ABI get the byte order right. 25915821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 25925821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Developers using SQLite on an ARM7 should compile and run their 25935821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** application using -DSQLITE_DEBUG=1 at least once. With DEBUG 25945821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** enabled, some asserts below will ensure that the byte order of 25955821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** floating point values is correct. 25965821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 25975821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** (2007-08-30) Frank van Vugt has studied this problem closely 25985821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** and has send his findings to the SQLite developers. Frank 25995821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** writes that some Linux kernels offer floating point hardware 26005821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** emulation that uses only 32-bit mantissas instead of a full 26015821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 48-bits as required by the IEEE standard. (This is the 26025821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** CONFIG_FPE_FASTFPE option.) On such systems, floating point 26035821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** byte swapping becomes very complicated. To avoid problems, 26045821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** the necessary byte swapping is carried out using a 64-bit integer 26055821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** rather than a 64-bit float. Frank assures us that the code here 26065821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** works for him. We, the developers, have no way to independently 26075821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** verify this, but Frank seems to know what he is talking about 26085821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** so we trust him. 26095821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 26105821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#ifdef SQLITE_MIXED_ENDIAN_64BIT_FLOAT 26115821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)static u64 floatSwap(u64 in){ 26125821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) union { 26135821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) u64 r; 26145821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) u32 i[2]; 26155821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } u; 26165821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) u32 t; 26175821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 26185821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) u.r = in; 26195821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) t = u.i[0]; 26205821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) u.i[0] = u.i[1]; 26215821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) u.i[1] = t; 26225821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return u.r; 26235821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 26245821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)# define swapMixedEndianFloat(X) X = floatSwap(X) 26255821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#else 26265821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)# define swapMixedEndianFloat(X) 26275821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#endif 26285821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 26295821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 26305821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Write the serialized data blob for the value stored in pMem into 26315821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** buf. It is assumed that the caller has allocated sufficient space. 26325821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Return the number of bytes written. 26335821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 26345821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** nBuf is the amount of space left in buf[]. nBuf must always be 26355821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** large enough to hold the entire field. Except, if the field is 26365821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** a blob with a zero-filled tail, then buf[] might be just the right 26375821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** size to hold everything except for the zero-filled tail. If buf[] 26385821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** is only big enough to hold the non-zero prefix, then only write that 26395821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** prefix into buf[]. But if buf[] is large enough to hold both the 26405821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** prefix and the tail then write the prefix and set the tail to all 26415821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** zeros. 26425821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 26435821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Return the number of bytes actually written into buf[]. The number 26445821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** of bytes in the zero-filled tail is included in the return value only 26455821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** if those bytes were zeroed in buf[]. 26465821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 26475821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)u32 sqlite3VdbeSerialPut(u8 *buf, int nBuf, Mem *pMem, int file_format){ 26485821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) u32 serial_type = sqlite3VdbeSerialType(pMem, file_format); 26495821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) u32 len; 26505821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 26515821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* Integer and Real */ 26525821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( serial_type<=7 && serial_type>0 ){ 26535821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) u64 v; 26545821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) u32 i; 26555821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( serial_type==7 ){ 26565821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( sizeof(v)==sizeof(pMem->r) ); 26575821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) memcpy(&v, &pMem->r, sizeof(v)); 26585821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) swapMixedEndianFloat(v); 26595821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) }else{ 26605821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) v = pMem->u.i; 26615821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 26625821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) len = i = sqlite3VdbeSerialTypeLen(serial_type); 26635821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( len<=(u32)nBuf ); 26645821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) while( i-- ){ 26655821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) buf[i] = (u8)(v&0xFF); 26665821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) v >>= 8; 26675821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 26685821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return len; 26695821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 26705821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 26715821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* String or blob */ 26725821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( serial_type>=12 ){ 26735821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( pMem->n + ((pMem->flags & MEM_Zero)?pMem->u.nZero:0) 26745821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) == (int)sqlite3VdbeSerialTypeLen(serial_type) ); 26755821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( pMem->n<=nBuf ); 26765821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) len = pMem->n; 26775821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) memcpy(buf, pMem->z, len); 26785821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( pMem->flags & MEM_Zero ){ 26795821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) len += pMem->u.nZero; 26805821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( nBuf>=0 ); 26815821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( len > (u32)nBuf ){ 26825821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) len = (u32)nBuf; 26835821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 26845821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) memset(&buf[pMem->n], 0, len-pMem->n); 26855821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 26865821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return len; 26875821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 26885821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 26895821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* NULL or constants 0 or 1 */ 26905821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return 0; 26915821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 26925821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 26935821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 26945821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Deserialize the data blob pointed to by buf as serial type serial_type 26955821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** and store the result in pMem. Return the number of bytes read. 26965821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 26975821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)u32 sqlite3VdbeSerialGet( 26985821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) const unsigned char *buf, /* Buffer to deserialize from */ 26995821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) u32 serial_type, /* Serial type to deserialize */ 27005821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Mem *pMem /* Memory cell to write value into */ 27015821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)){ 27025821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) switch( serial_type ){ 27035821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) case 10: /* Reserved for future use */ 27045821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) case 11: /* Reserved for future use */ 27055821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) case 0: { /* NULL */ 27065821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->flags = MEM_Null; 27075821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) break; 27085821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 27095821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) case 1: { /* 1-byte signed integer */ 27105821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->u.i = (signed char)buf[0]; 27115821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->flags = MEM_Int; 27125821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return 1; 27135821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 27145821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) case 2: { /* 2-byte signed integer */ 27155821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->u.i = (((signed char)buf[0])<<8) | buf[1]; 27165821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->flags = MEM_Int; 27175821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return 2; 27185821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 27195821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) case 3: { /* 3-byte signed integer */ 27205821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->u.i = (((signed char)buf[0])<<16) | (buf[1]<<8) | buf[2]; 27215821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->flags = MEM_Int; 27225821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return 3; 27235821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 27245821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) case 4: { /* 4-byte signed integer */ 27255821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->u.i = (buf[0]<<24) | (buf[1]<<16) | (buf[2]<<8) | buf[3]; 27265821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->flags = MEM_Int; 27275821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return 4; 27285821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 27295821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) case 5: { /* 6-byte signed integer */ 27305821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) u64 x = (((signed char)buf[0])<<8) | buf[1]; 27315821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) u32 y = (buf[2]<<24) | (buf[3]<<16) | (buf[4]<<8) | buf[5]; 27325821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) x = (x<<32) | y; 27335821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->u.i = *(i64*)&x; 27345821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->flags = MEM_Int; 27355821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return 6; 27365821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 27375821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) case 6: /* 8-byte signed integer */ 27385821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) case 7: { /* IEEE floating point */ 27395821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) u64 x; 27405821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) u32 y; 27415821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#if !defined(NDEBUG) && !defined(SQLITE_OMIT_FLOATING_POINT) 27425821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* Verify that integers and floating point values use the same 27435821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** byte order. Or, that if SQLITE_MIXED_ENDIAN_64BIT_FLOAT is 27445821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** defined that 64-bit floating point values really are mixed 27455821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** endian. 27465821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */ 27475821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) static const u64 t1 = ((u64)0x3ff00000)<<32; 27485821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) static const double r1 = 1.0; 27495821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) u64 t2 = t1; 27505821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) swapMixedEndianFloat(t2); 27515821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( sizeof(r1)==sizeof(t2) && memcmp(&r1, &t2, sizeof(r1))==0 ); 27525821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)#endif 27535821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 27545821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) x = (buf[0]<<24) | (buf[1]<<16) | (buf[2]<<8) | buf[3]; 27555821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) y = (buf[4]<<24) | (buf[5]<<16) | (buf[6]<<8) | buf[7]; 27565821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) x = (x<<32) | y; 27575821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( serial_type==6 ){ 27585821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->u.i = *(i64*)&x; 27595821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->flags = MEM_Int; 27605821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) }else{ 27615821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( sizeof(x)==8 && sizeof(pMem->r)==8 ); 27625821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) swapMixedEndianFloat(x); 27635821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) memcpy(&pMem->r, &x, sizeof(x)); 27645821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->flags = sqlite3IsNaN(pMem->r) ? MEM_Null : MEM_Real; 27655821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 27665821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return 8; 27675821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 27685821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) case 8: /* Integer 0 */ 27695821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) case 9: { /* Integer 1 */ 27705821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->u.i = serial_type-8; 27715821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->flags = MEM_Int; 27725821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return 0; 27735821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 27745821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) default: { 27755821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) u32 len = (serial_type-12)/2; 27765821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->z = (char *)buf; 27775821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->n = len; 27785821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->xDel = 0; 27795821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( serial_type&0x01 ){ 27805821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->flags = MEM_Str | MEM_Ephem; 27815821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) }else{ 27825821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->flags = MEM_Blob | MEM_Ephem; 27835821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 27845821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return len; 27855821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 27865821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 27875821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return 0; 27885821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 27895821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 27905821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 27915821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 27925821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Given the nKey-byte encoding of a record in pKey[], parse the 27935821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** record into a UnpackedRecord structure. Return a pointer to 27945821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** that structure. 27955821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 27965821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** The calling function might provide szSpace bytes of memory 27975821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** space at pSpace. This space can be used to hold the returned 27985821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** VDbeParsedRecord structure if it is large enough. If it is 27995821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** not big enough, space is obtained from sqlite3_malloc(). 28005821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 28015821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** The returned structure should be closed by a call to 28025821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** sqlite3VdbeDeleteUnpackedRecord(). 28035821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 28045821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)UnpackedRecord *sqlite3VdbeRecordUnpack( 28055821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) KeyInfo *pKeyInfo, /* Information about the record format */ 28065821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int nKey, /* Size of the binary record */ 28075821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) const void *pKey, /* The binary record */ 28085821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) char *pSpace, /* Unaligned space available to hold the object */ 28095821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int szSpace /* Size of pSpace[] in bytes */ 28105821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)){ 28115821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) const unsigned char *aKey = (const unsigned char *)pKey; 28125821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) UnpackedRecord *p; /* The unpacked record that we will return */ 28135821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int nByte; /* Memory space needed to hold p, in bytes */ 28145821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int d; 28155821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) u32 idx; 28165821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) u16 u; /* Unsigned loop counter */ 28175821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) u32 szHdr; 28185821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Mem *pMem; 28195821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int nOff; /* Increase pSpace by this much to 8-byte align it */ 28205821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 28215821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* 28225821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** We want to shift the pointer pSpace up such that it is 8-byte aligned. 28235821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** Thus, we need to calculate a value, nOff, between 0 and 7, to shift 28245821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** it by. If pSpace is already 8-byte aligned, nOff should be zero. 28255821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */ 28265821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) nOff = (8 - (SQLITE_PTR_TO_INT(pSpace) & 7)) & 7; 28275821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pSpace += nOff; 28285821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) szSpace -= nOff; 28295821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) nByte = ROUND8(sizeof(UnpackedRecord)) + sizeof(Mem)*(pKeyInfo->nField+1); 28305821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( nByte>szSpace ){ 28315821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p = sqlite3DbMallocRaw(pKeyInfo->db, nByte); 28325821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p==0 ) return 0; 28335821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->flags = UNPACKED_NEED_FREE | UNPACKED_NEED_DESTROY; 28345821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) }else{ 28355821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p = (UnpackedRecord*)pSpace; 28365821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->flags = UNPACKED_NEED_DESTROY; 28375821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 28385821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->pKeyInfo = pKeyInfo; 28395821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->nField = pKeyInfo->nField + 1; 28405821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->aMem = pMem = (Mem*)&((char*)p)[ROUND8(sizeof(UnpackedRecord))]; 28415821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( EIGHT_BYTE_ALIGNMENT(pMem) ); 28425821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) idx = getVarint32(aKey, szHdr); 28435821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) d = szHdr; 28445821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) u = 0; 28455821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) while( idx<szHdr && u<p->nField && d<=nKey ){ 28465821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) u32 serial_type; 28475821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 28485821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) idx += getVarint32(&aKey[idx], serial_type); 28495821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->enc = pKeyInfo->enc; 28505821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->db = pKeyInfo->db; 28515821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->flags = 0; 28525821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem->zMalloc = 0; 28535821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) d += sqlite3VdbeSerialGet(&aKey[d], serial_type, pMem); 28545821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pMem++; 28555821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) u++; 28565821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 28575821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( u<=pKeyInfo->nField + 1 ); 28585821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->nField = u; 28595821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return (void*)p; 28605821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 28615821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 28625821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 28635821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** This routine destroys a UnpackedRecord object. 28645821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 28655821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)void sqlite3VdbeDeleteUnpackedRecord(UnpackedRecord *p){ 28665821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int i; 28675821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Mem *pMem; 28685821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 28695821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( p!=0 ); 28705821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( p->flags & UNPACKED_NEED_DESTROY ); 28715821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) for(i=0, pMem=p->aMem; i<p->nField; i++, pMem++){ 28725821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* The unpacked record is always constructed by the 28735821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** sqlite3VdbeUnpackRecord() function above, which makes all 28745821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** strings and blobs static. And none of the elements are 28755821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** ever transformed, so there is never anything to delete. 28765821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */ 28775821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( NEVER(pMem->zMalloc) ) sqlite3VdbeMemRelease(pMem); 28785821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 28795821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( p->flags & UNPACKED_NEED_FREE ){ 28805821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3DbFree(p->pKeyInfo->db, p); 28815821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 28825821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 28835821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 28845821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 28855821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** This function compares the two table rows or index records 28865821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** specified by {nKey1, pKey1} and pPKey2. It returns a negative, zero 28875821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** or positive integer if key1 is less than, equal to or 28885821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** greater than key2. The {nKey1, pKey1} key must be a blob 28895821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** created by th OP_MakeRecord opcode of the VDBE. The pPKey2 28905821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** key must be a parsed key such as obtained from 28915821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** sqlite3VdbeParseRecord. 28925821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 28935821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Key1 and Key2 do not have to contain the same number of fields. 28945821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** The key with fewer fields is usually compares less than the 28955821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** longer key. However if the UNPACKED_INCRKEY flags in pPKey2 is set 28965821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** and the common prefixes are equal, then key1 is less than key2. 28975821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Or if the UNPACKED_MATCH_PREFIX flag is set and the prefixes are 28985821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** equal, then the keys are considered to be equal and 28995821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** the parts beyond the common prefix are ignored. 29005821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 29015821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** If the UNPACKED_IGNORE_ROWID flag is set, then the last byte of 29025821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** the header of pKey1 is ignored. It is assumed that pKey1 is 29035821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** an index key, and thus ends with a rowid value. The last byte 29045821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** of the header will therefore be the serial type of the rowid: 29055821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** one of 1, 2, 3, 4, 5, 6, 8, or 9 - the integer serial types. 29065821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** The serial type of the final rowid will always be a single byte. 29075821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** By ignoring this last byte of the header, we force the comparison 29085821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** to ignore the rowid at the end of key1. 29095821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 29105821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)int sqlite3VdbeRecordCompare( 29115821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int nKey1, const void *pKey1, /* Left key */ 29125821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) UnpackedRecord *pPKey2 /* Right key */ 29135821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)){ 29145821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int d1; /* Offset into aKey[] of next data element */ 29155821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) u32 idx1; /* Offset into aKey[] of next header element */ 29165821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) u32 szHdr1; /* Number of bytes in header */ 29175821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int i = 0; 29185821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int nField; 29195821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int rc = 0; 29205821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) const unsigned char *aKey1 = (const unsigned char *)pKey1; 29215821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) KeyInfo *pKeyInfo; 29225821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Mem mem1; 29235821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 29245821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pKeyInfo = pPKey2->pKeyInfo; 29255821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) mem1.enc = pKeyInfo->enc; 29265821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) mem1.db = pKeyInfo->db; 29275821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* mem1.flags = 0; // Will be initialized by sqlite3VdbeSerialGet() */ 29285821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) VVA_ONLY( mem1.zMalloc = 0; ) /* Only needed by assert() statements */ 29295821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 29305821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* Compilers may complain that mem1.u.i is potentially uninitialized. 29315821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** We could initialize it, as shown here, to silence those complaints. 29325821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** But in fact, mem1.u.i will never actually be used initialized, and doing 29335821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** the unnecessary initialization has a measurable negative performance 29345821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** impact, since this routine is a very high runner. And so, we choose 29355821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** to ignore the compiler warnings and leave this variable uninitialized. 29365821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */ 29375821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* mem1.u.i = 0; // not needed, here to silence compiler warning */ 29385821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 29395821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) idx1 = getVarint32(aKey1, szHdr1); 29405821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) d1 = szHdr1; 29415821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( pPKey2->flags & UNPACKED_IGNORE_ROWID ){ 29425821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) szHdr1--; 29435821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 29445821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) nField = pKeyInfo->nField; 29455821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) while( idx1<szHdr1 && i<pPKey2->nField ){ 29465821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) u32 serial_type1; 29475821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 29485821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* Read the serial types for the next element in each key. */ 29495821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) idx1 += getVarint32( aKey1+idx1, serial_type1 ); 29505821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( d1>=nKey1 && sqlite3VdbeSerialTypeLen(serial_type1)>0 ) break; 29515821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 29525821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* Extract the values to be compared. 29535821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */ 29545821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) d1 += sqlite3VdbeSerialGet(&aKey1[d1], serial_type1, &mem1); 29555821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 29565821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* Do the comparison 29575821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */ 29585821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) rc = sqlite3MemCompare(&mem1, &pPKey2->aMem[i], 29595821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) i<nField ? pKeyInfo->aColl[i] : 0); 29605821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( rc!=0 ){ 29615821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( mem1.zMalloc==0 ); /* See comment below */ 29625821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 29635821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* Invert the result if we are using DESC sort order. */ 29645821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( pKeyInfo->aSortOrder && i<nField && pKeyInfo->aSortOrder[i] ){ 29655821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) rc = -rc; 29665821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 29675821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 29685821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* If the PREFIX_SEARCH flag is set and all fields except the final 29695821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** rowid field were equal, then clear the PREFIX_SEARCH flag and set 29705821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** pPKey2->rowid to the value of the rowid field in (pKey1, nKey1). 29715821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** This is used by the OP_IsUnique opcode. 29725821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */ 29735821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( (pPKey2->flags & UNPACKED_PREFIX_SEARCH) && i==(pPKey2->nField-1) ){ 29745821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( idx1==szHdr1 && rc ); 29755821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( mem1.flags & MEM_Int ); 29765821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pPKey2->flags &= ~UNPACKED_PREFIX_SEARCH; 29775821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) pPKey2->rowid = mem1.u.i; 29785821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 29795821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 29805821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return rc; 29815821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 29825821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) i++; 29835821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 29845821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 29855821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* No memory allocation is ever used on mem1. Prove this using 29865821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** the following assert(). If the assert() fails, it indicates a 29875821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** memory leak and a need to call sqlite3VdbeMemRelease(&mem1). 29885821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */ 29895821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( mem1.zMalloc==0 ); 29905821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 29915821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* rc==0 here means that one of the keys ran out of fields and 29925821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** all the fields up to that point were equal. If the UNPACKED_INCRKEY 29935821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** flag is set, then break the tie by treating key2 as larger. 29945821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** If the UPACKED_PREFIX_MATCH flag is set, then keys with common prefixes 29955821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** are considered to be equal. Otherwise, the longer key is the 29965821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** larger. As it happens, the pPKey2 will always be the longer 29975821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** if there is a difference. 29985821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */ 29995821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( rc==0 ); 30005821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( pPKey2->flags & UNPACKED_INCRKEY ){ 30015821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) rc = -1; 30025821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) }else if( pPKey2->flags & UNPACKED_PREFIX_MATCH ){ 30035821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* Leave rc==0 */ 30045821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) }else if( idx1<szHdr1 ){ 30055821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) rc = 1; 30065821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 30075821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return rc; 30085821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 30095821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 30105821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 30115821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 30125821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** pCur points at an index entry created using the OP_MakeRecord opcode. 30135821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Read the rowid (the last field in the record) and store it in *rowid. 30145821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Return SQLITE_OK if everything works, or an error code otherwise. 30155821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 30165821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** pCur might be pointing to text obtained from a corrupt database file. 30175821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** So the content cannot be trusted. Do appropriate checks on the content. 30185821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 30195821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)int sqlite3VdbeIdxRowid(sqlite3 *db, BtCursor *pCur, i64 *rowid){ 30205821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) i64 nCellKey = 0; 30215821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int rc; 30225821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) u32 szHdr; /* Size of the header */ 30235821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) u32 typeRowid; /* Serial type of the rowid */ 30245821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) u32 lenRowid; /* Size of the rowid */ 30255821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Mem m, v; 30265821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 30275821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) UNUSED_PARAMETER(db); 30285821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 30295821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* Get the size of the index entry. Only indices entries of less 30305821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** than 2GiB are support - anything large must be database corruption. 30315821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** Any corruption is detected in sqlite3BtreeParseCellPtr(), though, so 30325821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** this code can safely assume that nCellKey is 32-bits 30335821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) */ 30345821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( sqlite3BtreeCursorIsValid(pCur) ); 30355821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) rc = sqlite3BtreeKeySize(pCur, &nCellKey); 30365821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( rc==SQLITE_OK ); /* pCur is always valid so KeySize cannot fail */ 30375821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( (nCellKey & SQLITE_MAX_U32)==(u64)nCellKey ); 30385821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 30395821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* Read in the complete content of the index entry */ 30405821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) memset(&m, 0, sizeof(m)); 30415821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) rc = sqlite3VdbeMemFromBtree(pCur, 0, (int)nCellKey, 1, &m); 30425821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( rc ){ 30435821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return rc; 30445821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 30455821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 30465821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* The index entry must begin with a header size */ 30475821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) (void)getVarint32((u8*)m.z, szHdr); 30485821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) testcase( szHdr==3 ); 30495821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) testcase( szHdr==m.n ); 30505821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( unlikely(szHdr<3 || (int)szHdr>m.n) ){ 30515821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) goto idx_rowid_corruption; 30525821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 30535821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 30545821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* The last field of the index should be an integer - the ROWID. 30555821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** Verify that the last entry really is an integer. */ 30565821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) (void)getVarint32((u8*)&m.z[szHdr-1], typeRowid); 30575821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) testcase( typeRowid==1 ); 30585821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) testcase( typeRowid==2 ); 30595821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) testcase( typeRowid==3 ); 30605821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) testcase( typeRowid==4 ); 30615821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) testcase( typeRowid==5 ); 30625821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) testcase( typeRowid==6 ); 30635821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) testcase( typeRowid==8 ); 30645821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) testcase( typeRowid==9 ); 30655821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( unlikely(typeRowid<1 || typeRowid>9 || typeRowid==7) ){ 30665821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) goto idx_rowid_corruption; 30675821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 30685821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) lenRowid = sqlite3VdbeSerialTypeLen(typeRowid); 30695821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) testcase( (u32)m.n==szHdr+lenRowid ); 30705821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( unlikely((u32)m.n<szHdr+lenRowid) ){ 30715821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) goto idx_rowid_corruption; 30725821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 30735821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 30745821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* Fetch the integer off the end of the index record */ 30755821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3VdbeSerialGet((u8*)&m.z[m.n-lenRowid], typeRowid, &v); 30765821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) *rowid = v.u.i; 30775821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3VdbeMemRelease(&m); 30785821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return SQLITE_OK; 30795821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 30805821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* Jump here if database corruption is detected after m has been 30815821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** allocated. Free the m object and return SQLITE_CORRUPT. */ 30825821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)idx_rowid_corruption: 30835821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) testcase( m.zMalloc!=0 ); 30845821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3VdbeMemRelease(&m); 30855821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return SQLITE_CORRUPT_BKPT; 30865821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 30875821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 30885821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 30895821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Compare the key of the index entry that cursor pC is pointing to against 30905821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** the key string in pUnpacked. Write into *pRes a number 30915821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** that is negative, zero, or positive if pC is less than, equal to, 30925821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** or greater than pUnpacked. Return SQLITE_OK on success. 30935821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 30945821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** pUnpacked is either created without a rowid or is truncated so that it 30955821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** omits the rowid at the end. The rowid at the end of the index entry 30965821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** is ignored as well. Hence, this routine only compares the prefixes 30975821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** of the keys prior to the final rowid, not the entire key. 30985821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 30995821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)int sqlite3VdbeIdxKeyCompare( 31005821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) VdbeCursor *pC, /* The cursor to compare against */ 31015821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) UnpackedRecord *pUnpacked, /* Unpacked version of key to compare against */ 31025821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int *res /* Write the comparison result here */ 31035821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)){ 31045821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) i64 nCellKey = 0; 31055821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) int rc; 31065821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) BtCursor *pCur = pC->pCursor; 31075821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Mem m; 31085821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 31095821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( sqlite3BtreeCursorIsValid(pCur) ); 31105821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) rc = sqlite3BtreeKeySize(pCur, &nCellKey); 31115821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( rc==SQLITE_OK ); /* pCur is always valid so KeySize cannot fail */ 31125821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) /* nCellKey will always be between 0 and 0xffffffff because of the say 31135821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) ** that btreeParseCellPtr() and sqlite3GetVarint32() are implemented */ 31145821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( nCellKey<=0 || nCellKey>0x7fffffff ){ 31155821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) *res = 0; 31165821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return SQLITE_CORRUPT_BKPT; 31175821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 31185821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) memset(&m, 0, sizeof(m)); 31195821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) rc = sqlite3VdbeMemFromBtree(pC->pCursor, 0, (int)nCellKey, 1, &m); 31205821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( rc ){ 31215821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return rc; 31225821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 31235821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( pUnpacked->flags & UNPACKED_IGNORE_ROWID ); 31245821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) *res = sqlite3VdbeRecordCompare(m.n, m.z, pUnpacked); 31255821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3VdbeMemRelease(&m); 31265821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return SQLITE_OK; 31275821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 31285821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 31295821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 31305821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** This routine sets the value to be returned by subsequent calls to 31315821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** sqlite3_changes() on the database handle 'db'. 31325821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 31335821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)void sqlite3VdbeSetChanges(sqlite3 *db, int nChange){ 31345821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( sqlite3_mutex_held(db->mutex) ); 31355821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) db->nChange = nChange; 31365821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) db->nTotalChange += nChange; 31375821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 31385821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 31395821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 31405821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Set a flag in the vdbe to update the change counter when it is finalised 31415821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** or reset. 31425821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 31435821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)void sqlite3VdbeCountChanges(Vdbe *v){ 31445821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) v->changeCntOn = 1; 31455821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 31465821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 31475821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 31485821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Mark every prepared statement associated with a database connection 31495821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** as expired. 31505821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 31515821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** An expired statement means that recompilation of the statement is 31525821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** recommend. Statements expire when things happen that make their 31535821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** programs obsolete. Removing user-defined functions or collating 31545821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** sequences, or changing an authorization function are the types of 31555821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** things that make prepared statements obsolete. 31565821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 31575821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)void sqlite3ExpirePreparedStatements(sqlite3 *db){ 31585821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Vdbe *p; 31595821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) for(p = db->pVdbe; p; p=p->pNext){ 31605821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) p->expired = 1; 31615821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 31625821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 31635821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 31645821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 31655821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Return the database associated with the Vdbe. 31665821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 31675821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)sqlite3 *sqlite3VdbeDb(Vdbe *v){ 31685821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return v->db; 31695821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 31705821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 31715821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 31725821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Return a pointer to an sqlite3_value structure containing the value bound 31735821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** parameter iVar of VM v. Except, if the value is an SQL NULL, return 31745821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 0 instead. Unless it is NULL, apply affinity aff (one of the SQLITE_AFF_* 31755821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** constants) to the value before returning it. 31765821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** 31775821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** The returned value must be freed by the caller using sqlite3ValueFree(). 31785821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 31795821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)sqlite3_value *sqlite3VdbeGetValue(Vdbe *v, int iVar, u8 aff){ 31805821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( iVar>0 ); 31815821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( v ){ 31825821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) Mem *pMem = &v->aVar[iVar-1]; 31835821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( 0==(pMem->flags & MEM_Null) ){ 31845821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3_value *pRet = sqlite3ValueNew(v->db); 31855821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( pRet ){ 31865821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3VdbeMemCopy((Mem *)pRet, pMem); 31875821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3ValueApplyAffinity(pRet, aff, SQLITE_UTF8); 31885821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) sqlite3VdbeMemStoreType((Mem *)pRet); 31895821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 31905821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return pRet; 31915821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 31925821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 31935821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) return 0; 31945821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 31955821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) 31965821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)/* 31975821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** Configure SQL variable iVar so that binding a new value to it signals 31985821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** to sqlite3_reoptimize() that re-preparing the statement may result 31995821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)** in a better query plan. 32005821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)*/ 32015821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)void sqlite3VdbeSetVarmask(Vdbe *v, int iVar){ 32025821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) assert( iVar>0 ); 32035821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) if( iVar>32 ){ 32045821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) v->expmask = 0xffffffff; 32055821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) }else{ 32065821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) v->expmask |= ((u32)1 << (iVar-1)); 32075821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles) } 32085821806d5e7f356e8fa4b058a389a808ea183019Torne (Richard Coles)} 3209