-C Lemon\scorrectly\srecognizes\san\sempty\sgrammar\sand\serrors\sout.\nFix\sfor\sa\sbug\sreported\son\sthe\ssqlite-users\smailing\slist.\s(CVS\s3226)
-D 2006-06-13T13:27:47
+C Add\ssimple\stests\sfor\sthe\sxFilter\sand\sxBestIndex\smethods.\s(CVS\s3227)
+D 2006-06-13T14:16:59
F Makefile.in 56fd6261e83f60724e6dcd764e06ab68cbd53909
F Makefile.linux-gcc 74ba0eadf88748a9ce3fd03d2a3ede2e6715baec
F README 9c4e2d6706bdcc3efdd773ce752a8cdab4f90028
F src/select.c 38eda11d950ed5e631ea9054f84a4a8b9e9b39d8
F src/server.c 087b92a39d883e3fa113cae259d64e4c7438bc96
F src/shell.c 55bf6335dae7146f7a300039f5d6bb35010f1996
-F src/sqlite.h.in 6fb7062da7e9c446623fa26b042bcf4b4050d702
+F src/sqlite.h.in 8a515d52a95aafff6eaaf13e6db38d3325b76af8
F src/sqlite3ext.h 127bd394c8eea481f2ac9b754bf399dbfc818b75
F src/sqliteInt.h 91cc3603fe2e1be18d52490a2fa65ed9640fb338
F src/table.c f64ec4fbfe333f8df925bc6ba494f55e05b0e75e
F src/test5.c 7162f8526affb771c4ed256826eee7bb9eca265f
F src/test6.c 60a02961ceb7b3edc25f5dc5c1ac2556622a76de
F src/test7.c 03fa8d787f6aebc6d1f72504d52f33013ad2c8e3
-F src/test8.c d29427a0254f7609b0dd2561e62cf78e21c9d689
+F src/test8.c 61d89b51c3cd3407f860134bff9011b081afc69c
F src/test_async.c e3deaedd4d86a56391b81808fde9e44fbd92f1d3
F src/test_md5.c 6c42bc0a3c0b54be34623ff77a0eec32b2fa96e3
F src/test_server.c a6460daed0b92ecbc2531b6dc73717470e7a648c
F src/utf.c ab81ac59084ff1c07d421eb1a0a84ec809603b44
F src/util.c ca6ee72772c0f5dc04d2e0ab1973fd3b6a9bf79d
F src/vacuum.c 5b37d0f436f8e1ffacd17934e44720b38d2247f9
-F src/vdbe.c 1f68000f8690e13535106f1b1bbaedc2da045457
+F src/vdbe.c e2d6072b36a3b32310916dd8443d811eb1b65747
F src/vdbe.h f72e5c00af759b7ed6fd606d508036d732098cc3
F src/vdbeInt.h 6ccb7eaae76ebd761470f6a035501ff33aa92c20
F src/vdbeapi.c 7dc662e7c905ce666bb506dced932e0307115cbf
F src/vdbefifo.c 9efb94c8c3f4c979ebd0028219483f88e57584f5
F src/vdbemem.c 5f0afe3b92bb2c037f8d5d697f7c151fa50783a3
F src/vtab.c 0e39af5822bb17b0007b0df7fad527aa0e3ebd38
-F src/where.c c0f3cd3831cd9defb7c7788038d439a5922e7bd6
+F src/where.c f2e17c6f50e137c14f05f501f0ba15235a711986
F tclinstaller.tcl 046e3624671962dc50f0481d7c25b38ef803eb42
F test/aggerror.test a867e273ef9e3d7919f03ef4f0e8c0d2767944f2
F test/all.test 5df90d015ca63fcef2a4b62c24f7316b66c4bfd4
F test/vacuum2.test 5aea8c88a65cb29f7d175296e7c819c6158d838c
F test/varint.test ab7b110089a08b9926ed7390e7e97bdefeb74102
F test/view.test 16e2774fe35e47a07ac4471b7f0bcc948b1aa6d5
-F test/vtab1.test 67fed6f9b91b75d3e1988b47a972b30dd5ed2d97
+F test/vtab1.test 56b29fcdafec53841730933f99a927e23cd593a6
F test/where.test ee7c9a6659b07e1ee61177f6e7ff71565ee2c9df
F test/where2.test a16476a5913e75cf65b38f2daa6157a6b7791394
F test/where3.test 3b5ad2c58069e12be2bd86bc5e211a82810521aa
F www/vdbe.tcl 87a31ace769f20d3627a64fa1fade7fed47b90d0
F www/version3.tcl 890248cf7b70e60c383b0e84d77d5132b3ead42b
F www/whentouse.tcl 97e2b5cd296f7d8057e11f44427dea8a4c2db513
-P 1273261ba7a21062217e7fbc3447b5dadf53010f
-R 146414985fadd865b1b6e26a67559392
-U drh
-Z f01f64f9187ce173db934fba71a8e2fd
+P 55392922686691db3d41525a7f4cb7f976e73467
+R f0c782b5451cd45871a352c2a0318f22
+U danielk1977
+Z c4c527997467541782ddbca206039900
** is not included in the SQLite library. It is used for automated
** testing of the SQLite library.
**
-** $Id: test8.c,v 1.8 2006/06/13 10:24:43 danielk1977 Exp $
+** $Id: test8.c,v 1.9 2006/06/13 14:16:59 danielk1977 Exp $
*/
#include "sqliteInt.h"
#include "tcl.h"
typedef struct echo_vtab echo_vtab;
typedef struct echo_cursor echo_cursor;
-/* An echo vtab object */
+/*
+** An echo virtual-table object
+**
+** If it is not NULL, the aHasIndex array is allocated so that it has
+** the same number of entries as there are columns in the underlying
+** real table.
+*/
struct echo_vtab {
sqlite3_vtab base;
Tcl_Interp *interp;
sqlite3 *db;
- char *zStmt;
+ char *zStmt; /* "SELECT rowid, * FROM <real-table-name> " */
+
+ int *aIndex;
+ int nCol;
+ char **aCol;
};
/* An echo cursor object */
int errcode; /* Error code */
};
+static int getColumnNames(
+ sqlite3 *db,
+ const char *zTab,
+ char ***paCol,
+ int *pnCol
+){
+ char **aCol = 0;
+ char zBuf[1024];
+ sqlite3_stmt *pStmt = 0;
+ int rc = SQLITE_OK;
+ int nCol;
+
+ sprintf(zBuf, "SELECT * FROM %s", zTab);
+ rc = sqlite3_prepare(db, zBuf, -1, &pStmt, 0);
+ if( rc==SQLITE_OK ){
+ int ii;
+ nCol = sqlite3_column_count(pStmt);
+ aCol = sqliteMalloc(sizeof(char *) * nCol);
+ if( !aCol ){
+ rc = SQLITE_NOMEM;
+ goto fail;
+ }
+ for(ii=0; ii<nCol; ii++){
+ aCol[ii] = sqlite3StrDup(sqlite3_column_name(pStmt, ii));
+ if( !aCol[ii] ){
+ rc = SQLITE_NOMEM;
+ goto fail;
+ }
+ }
+ }
+
+ *paCol = aCol;
+ *pnCol = nCol;
+
+fail:
+ sqlite3_finalize(pStmt);
+ if( rc!=SQLITE_OK && aCol ){
+ int ii;
+ for(ii=0; ii<nCol; ii++){
+ sqliteFree(aCol[ii]);
+ }
+ sqliteFree(aCol);
+ }
+ return rc;
+}
+
+static int getIndexArray(sqlite3 *db, const char *zTab, int **paIndex){
+ char zBuf[1024];
+ sqlite3_stmt *pStmt = 0;
+ int nCol;
+ int *aIndex = 0;
+ int rc;
+
+ sprintf(zBuf, "SELECT * FROM %s", zTab);
+ rc = sqlite3_prepare(db, zBuf, -1, &pStmt, 0);
+ nCol = sqlite3_column_count(pStmt);
+
+ sqlite3_finalize(pStmt);
+ pStmt = 0;
+ if( rc!=SQLITE_OK ){
+ goto get_index_array_out;
+ }
+
+ aIndex = (int *)sqliteMalloc(sizeof(int) * nCol);
+ if( !aIndex ){
+ rc = SQLITE_NOMEM;
+ goto get_index_array_out;
+ }
+
+ sprintf(zBuf, "PRAGMA index_list(%s)", zTab);
+ rc = sqlite3_prepare(db, zBuf, -1, &pStmt, 0);
+
+ while( pStmt && sqlite3_step(pStmt)==SQLITE_ROW ){
+ sqlite3_stmt *pStmt2 = 0;
+ sprintf(zBuf, "PRAGMA index_info(%s)", sqlite3_column_text(pStmt, 1));
+ rc = sqlite3_prepare(db, zBuf, -1, &pStmt2, 0);
+ if( pStmt2 && sqlite3_step(pStmt2)==SQLITE_ROW ){
+ int cid = sqlite3_column_int(pStmt2, 1);
+ assert( cid>=0 && cid<nCol );
+ aIndex[cid] = 1;
+ }
+ rc = sqlite3_finalize(pStmt2);
+ if( rc!=SQLITE_OK ){
+ sqlite3_finalize(pStmt);
+ goto get_index_array_out;
+ }
+ }
+
+ rc = sqlite3_finalize(pStmt);
+
+get_index_array_out:
+ if( rc!=SQLITE_OK ){
+ sqliteFree(aIndex);
+ aIndex = 0;
+ }
+ *paIndex = aIndex;
+ return rc;
+}
+
/*
** Global Tcl variable $echo_module is a list. This routine appends
** the string element zArg to that list in interpreter interp.
*/
static void appendToEchoModule(Tcl_Interp *interp, const char *zArg){
int flags = (TCL_APPEND_VALUE | TCL_LIST_ELEMENT | TCL_GLOBAL_ONLY);
- Tcl_SetVar(interp, "echo_module", zArg, flags);
+ Tcl_SetVar(interp, "echo_module", (zArg?zArg:""), flags);
}
/*
}
sqlite3_finalize(pStmt);
pVtab->zStmt = sqlite3MPrintf("SELECT rowid, * FROM %s ", argv[1]);
+ if( rc==SQLITE_OK ){
+ rc = getIndexArray(db, argv[1], &pVtab->aIndex);
+ }
+ if( rc==SQLITE_OK ){
+ rc = getColumnNames(db, argv[1], &pVtab->aCol, &pVtab->nCol);
+ }
}
return rc;
return echoConstructor(db, pModule, argc, argv, ppVtab);
}
-static int echoDisconnect(sqlite3_vtab *pVtab){
+static int echoDestructor(sqlite3_vtab *pVtab){
+ int ii;
echo_vtab *p = (echo_vtab*)pVtab;
- appendToEchoModule(p->interp, "xDisconnect");
sqliteFree(p->zStmt);
+ sqliteFree(p->aIndex);
+ for(ii=0; ii<p->nCol; ii++){
+ sqliteFree(p->aCol[ii]);
+ }
+ sqliteFree(p->aCol);
sqliteFree(p);
return 0;
}
+
+static int echoDisconnect(sqlite3_vtab *pVtab){
+ appendToEchoModule(((echo_vtab *)pVtab)->interp, "xDisconnect");
+ return echoDestructor(pVtab);
+}
static int echoDestroy(sqlite3_vtab *pVtab){
- echo_vtab *p = (echo_vtab*)pVtab;
- appendToEchoModule(p->interp, "xDestroy");
- sqliteFree(p->zStmt);
- sqliteFree(p);
- return 0;
+ appendToEchoModule(((echo_vtab *)pVtab)->interp, "xDestroy");
+ return echoDestructor(pVtab);
}
-static int echoOpen(sqlite3_vtab *pVTab, sqlite3_vtab_cursor **ppCursor)
-{
+static int echoOpen(sqlite3_vtab *pVTab, sqlite3_vtab_cursor **ppCursor){
echo_cursor *pCur;
pCur = sqliteMalloc(sizeof(echo_cursor));
*ppCursor = (sqlite3_vtab_cursor *)pCur;
return SQLITE_OK;
}
-static int echoClose(sqlite3_vtab_cursor *cur)
-{
+static int echoClose(sqlite3_vtab_cursor *cur){
echo_cursor *pCur = (echo_cursor *)cur;
sqlite3_finalize(pCur->pStmt);
sqliteFree(pCur);
return SQLITE_OK;
}
-static int echoNext(sqlite3_vtab_cursor *cur)
-{
+static int echoNext(sqlite3_vtab_cursor *cur){
int rc;
echo_cursor *pCur = (echo_cursor *)cur;
return rc;
}
-static int echoFilter(
- sqlite3_vtab_cursor *pVtabCursor,
- int idx,
- int argc,
- sqlite3_value **argv
-){
- int rc;
-
- echo_cursor *pCur = (echo_cursor *)pVtabCursor;
- echo_vtab *pVtab = (echo_vtab *)pVtabCursor->pVtab;
- sqlite3 *db = pVtab->db;
-
- sqlite3_finalize(pCur->pStmt);
- pCur->pStmt = 0;
- rc = sqlite3_prepare(db, pVtab->zStmt, -1, &pCur->pStmt, 0);
-
- if( rc==SQLITE_OK ){
- rc = echoNext(pVtabCursor);
- }
-
- return rc;
-}
-
-static int echoColumn(sqlite3_vtab_cursor *cur, sqlite3_context *ctx, int i)
-{
+static int echoColumn(sqlite3_vtab_cursor *cur, sqlite3_context *ctx, int i){
int iCol = i + 1;
sqlite3_stmt *pStmt = ((echo_cursor *)cur)->pStmt;
return SQLITE_OK;
}
-static int echoRowid(sqlite3_vtab_cursor *cur, sqlite_int64 *pRowid)
-{
+static int echoRowid(sqlite3_vtab_cursor *cur, sqlite_int64 *pRowid){
sqlite3_stmt *pStmt = ((echo_cursor *)cur)->pStmt;
*pRowid = sqlite3_column_int64(pStmt, 0);
return SQLITE_OK;
}
+static int echoFilter(
+ sqlite3_vtab_cursor *pVtabCursor,
+ int idx,
+ int argc,
+ sqlite3_value **argv
+){
+ int rc;
+ char zBuf[32];
+ int ii;
+
+ echo_cursor *pCur = (echo_cursor *)pVtabCursor;
+ echo_vtab *pVtab = (echo_vtab *)pVtabCursor->pVtab;
+ sqlite3 *db = pVtab->db;
+
+ sprintf(zBuf, "%d", idx);
+ appendToEchoModule(pVtab->interp, "xFilter");
+ appendToEchoModule(pVtab->interp, zBuf);
+ for(ii=0; ii<argc; ii++){
+ appendToEchoModule(pVtab->interp, sqlite3_value_text(argv[ii]));
+ }
+
+ sqlite3_finalize(pCur->pStmt);
+ pCur->pStmt = 0;
+ rc = sqlite3_prepare(db, pVtab->zStmt, -1, &pCur->pStmt, 0);
+
+ if( rc==SQLITE_OK ){
+ rc = echoNext(pVtabCursor);
+ }
+
+ return rc;
+}
/*
-** The xBestIndex method for the echo module always returns
-** an index of 123.
+** The echo module implements the subset of query constraints and sort
+** orders that may take advantage of SQLite indices on the underlying
+** real table. For example, if the real table is declared as:
+**
+** CREATE TABLE real(a, b, c);
+** CREATE INDEX real_index ON real(b);
+**
+** then the echo module handles WHERE or ORDER BY clauses that refer
+** to the column "b", but not "a" or "c". If a multi-column index is
+** present, only it's left most column is considered.
*/
-static int echoBestIndex(sqlite3_vtab *pVtab, sqlite3_index_info *pIdxInfo){
+static int echoBestIndex(sqlite3_vtab *tab, sqlite3_index_info *pIdxInfo){
+ int ii;
+ char *zWhere = 0;
+ char *zOrder = 0;
+ int nArg = 0;
+ echo_vtab *pVtab = (echo_vtab *)tab;
+
+ for(ii=0; ii<pIdxInfo->nConstraint; ii++){
+ const struct sqlite3_index_constraint *pConstraint;
+ struct sqlite3_index_constraint_usage *pUsage;
+
+ pConstraint = &pIdxInfo->aConstraint[ii];
+ pUsage = &pIdxInfo->aConstraintUsage[ii];
+
+ int iCol = pConstraint->iColumn;
+ if( pVtab->aIndex[iCol] ){
+ char *zCol = pVtab->aCol[iCol];
+ char *zOp = 0;
+ switch( pConstraint->op ){
+ case SQLITE_INDEX_CONSTRAINT_EQ:
+ zOp = "="; break;
+ case SQLITE_INDEX_CONSTRAINT_LT:
+ zOp = "<"; break;
+ case SQLITE_INDEX_CONSTRAINT_GT:
+ zOp = ">"; break;
+ case SQLITE_INDEX_CONSTRAINT_LE:
+ zOp = "<="; break;
+ case SQLITE_INDEX_CONSTRAINT_GE:
+ zOp = ">="; break;
+ case SQLITE_INDEX_CONSTRAINT_MATCH:
+ zOp = "MATCH"; break;
+ }
+ if( zWhere ){
+ char *zTmp = zWhere;
+ zWhere = sqlite3MPrintf("%s AND %s %s ?", zWhere, zCol, zOp);
+ sqliteFree(zTmp);
+ } else {
+ zWhere = sqlite3MPrintf("WHERE %s %s ?", zCol, zOp);
+ }
+
+ pUsage->argvIndex = ++nArg;
+ pUsage->omit = 1;
+ }
+ }
+
+ appendToEchoModule(pVtab->interp, "xBestIndex");;
+ appendToEchoModule(pVtab->interp, zWhere);
+ appendToEchoModule(pVtab->interp, zOrder);
+
+ sqliteFree(zWhere);
+ sqliteFree(zOrder);
+
pIdxInfo->idxNum = 123;
return SQLITE_OK;
}