diff --git a/Makefile.in b/Makefile.in index d662686d4d..17a6a4f038 100644 --- a/Makefile.in +++ b/Makefile.in @@ -139,6 +139,7 @@ SRC = \ # TESTSRC = \ $(TOP)/src/btree.c \ + $(TOP)/src/date.c \ $(TOP)/src/func.c \ $(TOP)/src/os_mac.c \ $(TOP)/src/os_unix.c \ diff --git a/main.mk b/main.mk index b3776566fe..15790f7b4f 100644 --- a/main.mk +++ b/main.mk @@ -113,6 +113,7 @@ SRC = \ # TESTSRC = \ $(TOP)/src/btree.c \ + $(TOP)/src/date.c \ $(TOP)/src/func.c \ $(TOP)/src/os_mac.c \ $(TOP)/src/os_unix.c \ diff --git a/manifest b/manifest index 22389313d9..9917501743 100644 --- a/manifest +++ b/manifest @@ -1,6 +1,6 @@ -C Changes\stoward\sreducing\scode\ssize\swhen\sSQLITE_OMIT_UTF16\sis\senabled.\s(CVS\s2099) -D 2004-11-14T04:04:17 -F Makefile.in c4d2416860f472a1e3393714d0372074197565df +C The\sSQLITE_OMIT_UTF16\smacro\snow\sremoves\slots\sof\scode\sand\sall\stests\sstill\spass.\s(CVS\s2100) +D 2004-11-14T21:56:29 +F Makefile.in e747bb5ba34ccbdd81f79dcf1b2b33c02817c21d F Makefile.linux-gcc a9e5a0d309fa7c38e7c14d3ecf7690879d3a5457 F README a01693e454a00cc117967e3f9fdab2d4d52e9bc1 F VERSION 342b6d5fde93b6d45023e2fee0163dda6464b9d6 @@ -16,7 +16,7 @@ F doc/lemon.html f0f682f50210928c07e562621c3b7e8ab912a538 F doc/report1.txt a031aaf37b185e4fa540223cb516d3bccec7eeac F install-sh 9d4de14ab9fb0facae2f48780b874848cbf2f895 F ltmain.sh f6b283068efa69f06eb8aa1fe4bddfdbdeb35826 -F main.mk 32367381f4e75d7c13f24a739495e60a7b622256 +F main.mk 02cb9ff3e70a3b24ede38dd458af451c871cd00f F mkdll.sh 468d4f41d3ea98221371df4825cfbffbaac4d7e4 F mkopcodec.awk 14a794f7b206976afc416b30fe8e0fc97f3434e9 F mkopcodeh.awk 4090944e4de0a2ccb99aa0083290f73bce4db406 @@ -32,15 +32,15 @@ F src/auth.c 3b81f2a42f48a62c2c9c9b0eda31a157c681edea F src/btree.c b0b6238c54302e779aa9cb958c8c6da7cab4a090 F src/btree.h 861e40b759a195ba63819740e484390012cf81ab F src/build.c a95eb1181247368b0ffe2eed121a43735976a964 -F src/date.c 4fd4e90b3880dacd67305e96330940dc243ffc10 +F src/date.c 65536e7ea04fdde6e0551264fca15966966e171f F src/delete.c f0af21a1ede15524a5edd59fe10ef486283a1ee9 F src/expr.c 4ee3e47358c92a919062255b14057a7a8f641e01 -F src/func.c b68572e79ada56dd038b7e71755212215092b717 +F src/func.c 181ea4b8bbc621457838494a440d2e4e2307ab70 F src/hash.c a97721a55440b7bea31ffe471bb2f6b4123cddd5 F src/hash.h 1b0c445e1c89ff2aaad9b4605ba61375af001e84 F src/insert.c 9524a6c3e86cbdbae3313f6a083bb9a3e7a2462b F src/legacy.c d58ea507bce885298a2c8c3cbb0f4bff5d47830b -F src/main.c c7dc54c62c86cab8b2e2883aef607c179eefa611 +F src/main.c 22f12e9d453065dce5ef5feabc41a5fa2399b8c3 F src/md5.c 7ae1c39044b95de2f62e066f47bb1deb880a1070 F src/os.h 38258df2db895499b6e2957dbf17f25e0df71667 F src/os_common.h 0e7f428ba0a6c40a61bc56c4e96f493231301b73 @@ -64,23 +64,23 @@ F src/sqlite.h.in a44eac0716bf4751447160d5c8ed049ece66d45a F src/sqliteInt.h 8569ce94e891a854de71d7bd628da1d25ee6dfe4 F src/table.c 25b3ff2b39b7d87e8d4a5da0713d68dfc06cbee9 F src/tclsqlite.c 7f1a1a678140e6901c8954590ca2aabe50b48f71 -F src/test1.c af2cc6864464b18675c9bdbb02142d765f2f0c6d +F src/test1.c 8c330b53aa04d234ea7da6a90141ce9958a8901c F src/test2.c b11fa244fff02190707dd0879987c37c75e61fc8 F src/test3.c 6f1ec93e13632a004b527049535079eda84c459d F src/test4.c 7c6b9fc33dd1f3f93c7f1ee6e5e6d016afa6c1df -F src/test5.c b001fa7f1b9e2dc5c2331de62fc641b5ab2bd7a1 +F src/test5.c 64f08b2a50ef371a1bd68ff206829e7b1b9997f5 F src/tokenize.c 2ad3d1ae1a0a70746db0b31a0a74f58050a3c39a F src/trigger.c 0c91b56182560263733e4b035acdb939bd1cf0e2 F src/update.c 3cc67f6053495152e82a6a48c93ed331218e936e -F src/utf.c f4f83acd73389090e32d6589d307fc55d794c7ed +F src/utf.c e45ce11be6922408cd381561721f6cca7d3b992a F src/util.c 005fdf2d008f3429d081766ad6098fdd86d8d8e6 F src/vacuum.c ecb4a2c6f1ac5cc9b394dc64d3bb14ca650c4f60 -F src/vdbe.c 312df85707ed3d2a90ac2ccec4e614b6996842d9 +F src/vdbe.c ab76044e19a2f1ebcff1b86e72620d2a2d323337 F src/vdbe.h 067ca8d6750ba4f69a50284765e5883dee860181 F src/vdbeInt.h 6017100adff362b8dfa37a69e3f1431f084bfa5b -F src/vdbeapi.c 3965bf4678ae32c05f73550c1b5be3268f9f3006 +F src/vdbeapi.c 74be7f96c0a1ac275661f8b32276ac521d9ce37c F src/vdbeaux.c c6da55e0096e141211f918837eca98e0be6400b4 -F src/vdbemem.c ef9ac7d32acfe4bce5c5b408b1294c8d9e0cdb56 +F src/vdbemem.c 5876c8abf4374fef671f4fd8dc333ef3fc95a2f0 F src/where.c 6e637a6b3e61fe3104adc4e5caa4738bf6570daa F test/all.test 929bfa932b55e75c96fe2203f7650ba451c1862c F test/alter.test ea6b104fa83da6970b1ce61885827817bdaced3a @@ -93,7 +93,7 @@ F test/autovacuum.test d0517eb9fa7bb12c9e7f3b5d6fd4275d22e57c15 F test/autovacuum_crash.test 2dca85cbcc497098e45e8847c86407eb3554f3d4 F test/bigfile.test d3744a8821ce9abb8697f2826a3e3d22b719e89f F test/bigrow.test f0aeb7573dcb8caaafea76454be3ade29b7fc747 -F test/bind.test fa74f98417cd313f28272acff832a8a7d04a0916 +F test/bind.test 5ff767304c68ee0eb4e0efda1fbbea3fffdc5489 F test/blob.test fc41fe95bdc10da51f0dee73ce86e75ce1d6eb9d F test/btree.test 7ae2c9dde6c9fffd61b96efe28f9e28b396ddd78 F test/btree2.test aa4a6d05b1ea90b1acaf83ba89039dd302a88635 @@ -103,7 +103,7 @@ F test/btree6.test a5ede6bfbbb2ec8b27e62813612c0f28e8f3e027 F test/btree7.test a6d3b842db22af97dd14b989e90a2fd96066b72f F test/btree8.test eee59cfd3a0151adbc7d85e5373f31ae6d4c3061 F test/capi2.test 1ec97bf8896185aec2366c7d07b01edef6ae4b7e -F test/capi3.test 1e15509a61fa93ef637ec9c2a3fc93bc1d971a3b +F test/capi3.test c9b162838cda7f61c6cfefed304b69287f2fc688 F test/capi3b.test 5b6a66f9f295f79f443b5d3f33187fa5ef6cf336 F test/collate1.test f79736d2ebf5492167ee4d1f4ab4c09dda776b03 F test/collate2.test 12fd658d8f5106a8a5c8a77d66919d8c89394036 @@ -119,9 +119,9 @@ F test/date.test dda578ec1857837156bd8b32f8e09d81d7d7881c F test/delete.test fc29491f6a7ac899ce29f4549a104809e245d9a6 F test/delete2.test 1d3f99f52f50eb6ed10c803f80540a6857307a7d F test/diskfull.test e2f6cfd868713ead06dc82b84a4938e868128fc0 -F test/enc.test 2f5463af488d50aef60c6110bec6b21b5efba961 +F test/enc.test 7a03417a1051fe8bc6c7641cf4c8c3f7e0066d52 F test/enc2.test 6d1a2650e9da43eab499d18ca694a0cb6ec69dee -F test/enc3.test a96f4a7c44bac4d63bdc4ff422b8049912083998 +F test/enc3.test f6a5f0b7b7f3a88f030d3143729b87cd5c86d837 F test/expr.test 20ddaf66c7ab673c1d0c953889e3466139256f9a F test/fkey1.test 81bb13caaa78f58d7d191d7f535529f7c91d821a F test/func.test 830d352574c7f5cd15149a9be58a6dcc2b995c05 @@ -152,14 +152,14 @@ F test/misc1.test 744f60d1025fa978708b96cb222a07a1feb1524a F test/misc2.test 9d9403f7e6092699f3f92bb1e26ff55165528e7c F test/misc3.test 928a2f1e1189924ed14e1ae074e34f40688bdf94 F test/misc4.test d005a75f095bb04db09a5d096144405ae566b622 -F test/misuse.test fcd9e7cec6ecccc34822584aec6b4e31f13629e1 +F test/misuse.test 2d7c46160f7c214f761fc5d030684a37ae8832a6 F test/notnull.test 7a08117a71e74b0321aaa937dbeb41a09d6eb1d0 F test/null.test 642428b6a5408cc5b954b49e1b6e5025e4458b2b F test/pager.test 394455707a079804e8a4e431d12edce831a065f0 F test/pager2.test c7e731ac56a2984a605b032ffd19b9deee820377 F test/pager3.test 647f696a9cf7409df00a1e0047c2eb55585a1b85 F test/pagesize.test 6f94b70ed9645dbe6314b627ae765c5dec8036d9 -F test/pragma.test d14ed14407a00c10562ca35128120dc09019ed34 +F test/pragma.test ab309fb98bf4fe49481b9661354376cc56067f7e F test/printf.test 92ba4c510b4fc61120ffa4a01820446ed917ae57 F test/progress.test 5ddba78cb6011fba36093973cfb3ac473b8fb96a x F test/quick.test 91e5b8ae6663dc9e3e754b271f0384f0cae706e6 @@ -191,7 +191,7 @@ F test/trigger2.test cbf5da84a2413380644bde3fef94943ee103ea4e F test/trigger3.test f1c0cc1365f00b21a8cd41c189edca139c2d6cc6 F test/trigger4.test ce5c97aba6a8a11be5820e694659438c3e982ada F test/trigger5.test 619391a3e9fc194081d22cefd830d811e7badf83 -F test/types.test 9fa078d90ade052344a02e03a41b5df23bd429f1 +F test/types.test f0a98d10c5ecc9865d19dc94486f9873afc6bb6b F test/types2.test f23c147a2ab3e51d5dbcfa9987200db5acba7aa7 F test/unique.test 0e38d4cc7affeef2527720d1dafd1f6870f02f2b F test/update.test b29bd9061a1150426dab6959806fcc73a41b1217 @@ -258,7 +258,7 @@ F www/tclsqlite.tcl 560ecd6a916b320e59f2917317398f3d59b7cc25 F www/vdbe.tcl 095f106d93875c94b47367384ebc870517431618 F www/version3.tcl 092a01f5ef430d2c4acc0ae558d74c4bb89638a0 F www/whentouse.tcl fdacb0ba2d39831e8a6240d05a490026ad4c4e4c -P dcbc0c22cf269e2f67002aa3f1bc0c66aaeff5f1 -R b20243043da42c552406a47e684bc877 +P 59a0a8b7cebc011731654bd0545cf8d19612ca8e +R 0f932cfb065804fe829dcf5001ff03c1 U drh -Z 6d564933ddae0997ba41ac32b88f3e8b +Z 02b6691979f3c9a7b41515737ea686d0 diff --git a/manifest.uuid b/manifest.uuid index 05d69da911..77a8114d5a 100644 --- a/manifest.uuid +++ b/manifest.uuid @@ -1 +1 @@ -59a0a8b7cebc011731654bd0545cf8d19612ca8e \ No newline at end of file +98c7a55478f7c465b219edc1a33eee222586fd65 \ No newline at end of file diff --git a/src/date.c b/src/date.c index f2bdc8c153..dea047d5b1 100644 --- a/src/date.c +++ b/src/date.c @@ -16,7 +16,7 @@ ** sqlite3RegisterDateTimeFunctions() found at the bottom of the file. ** All other code has file scope. ** -** $Id: date.c,v 1.41 2004/11/11 01:50:30 danielk1977 Exp $ +** $Id: date.c,v 1.42 2004/11/14 21:56:30 drh Exp $ ** ** NOTES: ** @@ -938,14 +938,13 @@ static void currentTimeFunc( char *zFormat = (char *)sqlite3_user_data(context); char zBuf[20]; -#ifdef SQLITE_TEST - /* This test variable is located in os_XXX.c */ -extern int sqlite3_current_time; -#endif time(&t); #ifdef SQLITE_TEST - if( sqlite3_current_time ){ - t = sqlite3_current_time; + { + extern int sqlite3_current_time; /* See os_XXX.c */ + if( sqlite3_current_time ){ + t = sqlite3_current_time; + } } #endif @@ -1001,4 +1000,3 @@ void sqlite3RegisterDateTimeFunctions(sqlite3 *db){ } #endif } - diff --git a/src/func.c b/src/func.c index 2d760b7f8f..067fa8d982 100644 --- a/src/func.c +++ b/src/func.c @@ -16,7 +16,7 @@ ** sqliteRegisterBuildinFunctions() found at the bottom of the file. ** All other code has file scope. ** -** $Id: func.c,v 1.86 2004/11/12 13:42:31 danielk1977 Exp $ +** $Id: func.c,v 1.87 2004/11/14 21:56:30 drh Exp $ */ #include #include @@ -747,10 +747,12 @@ static void test_destructor( memcpy(zVal, sqlite3ValueText(argv[0], db->enc), len); if( db->enc==SQLITE_UTF8 ){ sqlite3_result_text(pCtx, zVal, -1, destructor); +#ifndef SQLITE_OMIT_UTF16 }else if( db->enc==SQLITE_UTF16LE ){ sqlite3_result_text16le(pCtx, zVal, -1, destructor); }else{ sqlite3_result_text16be(pCtx, zVal, -1, destructor); +#endif /* SQLITE_OMIT_UTF16 */ } } static void test_destructor_count( @@ -976,7 +978,9 @@ void sqlite3RegisterBuiltinFunctions(sqlite3 *db){ { "typeof", 1, 0, SQLITE_UTF8, 0, typeofFunc }, { "length", 1, 0, SQLITE_UTF8, 0, lengthFunc }, { "substr", 3, 0, SQLITE_UTF8, 0, substrFunc }, +#ifndef SQLITE_OMIT_UTF16 { "substr", 3, 0, SQLITE_UTF16LE, 0, sqlite3utf16Substr }, +#endif { "abs", 1, 0, SQLITE_UTF8, 0, absFunc }, { "round", 1, 0, SQLITE_UTF8, 0, roundFunc }, { "round", 2, 0, SQLITE_UTF8, 0, roundFunc }, diff --git a/src/main.c b/src/main.c index bc882dce1b..55b8d24444 100644 --- a/src/main.c +++ b/src/main.c @@ -14,7 +14,7 @@ ** other files are for internal use by SQLite and should not be ** accessed by users of the library. ** -** $Id: main.c,v 1.264 2004/11/11 05:10:44 danielk1977 Exp $ +** $Id: main.c,v 1.265 2004/11/14 21:56:30 drh Exp $ */ #include "sqliteInt.h" #include "os.h" @@ -880,6 +880,7 @@ const char *sqlite3_errmsg(sqlite3 *db){ return z; } +#ifndef SQLITE_OMIT_UTF16 /* ** Return UTF-16 encoded English language explanation of the most recent ** error. @@ -919,6 +920,7 @@ const void *sqlite3_errmsg16(sqlite3 *db){ } return z; } +#endif /* SQLITE_OMIT_UTF16 */ /* ** Return the most recent error code generated by an SQLite routine. @@ -1033,6 +1035,7 @@ prepare_out: return rc; } +#ifndef SQLITE_OMIT_UTF16 /* ** Compile the UTF-16 encoded SQL statement zSql into a statement handle. */ @@ -1076,6 +1079,7 @@ int sqlite3_prepare16( return rc; } +#endif /* SQLITE_OMIT_UTF16 */ /* ** This routine does the work of opening a database on behalf of @@ -1177,6 +1181,7 @@ int sqlite3_open( return openDatabase(zFilename, ppDb); } +#ifndef SQLITE_OMIT_UTF16 /* ** Open a new database handle. */ @@ -1205,6 +1210,7 @@ int sqlite3_open16( return rc; } +#endif /* SQLITE_OMIT_UTF16 */ /* ** The following routine destroys a virtual machine that is created by @@ -1288,6 +1294,7 @@ int sqlite3_create_collation( return rc; } +#ifndef SQLITE_OMIT_UTF16 /* ** Register a new collation sequence with the database handle db. */ @@ -1308,6 +1315,7 @@ int sqlite3_create_collation16( zName8 = sqlite3ValueText(pTmp, SQLITE_UTF8); return sqlite3_create_collation(db, zName8, enc, pCtx, xCompare); } +#endif /* SQLITE_OMIT_UTF16 */ /* ** Register a collation sequence factory callback with the database handle @@ -1327,6 +1335,7 @@ int sqlite3_collation_needed( return SQLITE_OK; } +#ifndef SQLITE_OMIT_UTF16 /* ** Register a collation sequence factory callback with the database handle ** db. Replace any previously installed collation sequence factory. @@ -1344,3 +1353,4 @@ int sqlite3_collation_needed16( db->pCollNeededArg = pCollNeededArg; return SQLITE_OK; } +#endif /* SQLITE_OMIT_UTF16 */ diff --git a/src/test1.c b/src/test1.c index 091dae2035..85c02087d9 100644 --- a/src/test1.c +++ b/src/test1.c @@ -13,7 +13,7 @@ ** is not included in the SQLite library. It is used for automated ** testing of the SQLite library. ** -** $Id: test1.c,v 1.113 2004/11/14 04:04:17 drh Exp $ +** $Id: test1.c,v 1.114 2004/11/14 21:56:30 drh Exp $ */ #include "sqliteInt.h" #include "tcl.h" @@ -2723,15 +2723,17 @@ int Sqlitetest1_Init(Tcl_Interp *interp){ { "sqlite3_column_blob", test_column_blob ,0 }, { "sqlite3_column_double", test_column_double ,0 }, { "sqlite3_column_int64", test_column_int64 ,0 }, - { "sqlite3_column_int", test_stmt_int, sqlite3_column_int }, - { "sqlite3_column_bytes", test_stmt_int, sqlite3_column_bytes }, - { "sqlite3_column_bytes16", test_stmt_int, sqlite3_column_bytes16 }, { "sqlite3_column_text", test_stmt_utf8, sqlite3_column_text }, { "sqlite3_column_decltype", test_stmt_utf8, sqlite3_column_decltype }, { "sqlite3_column_name", test_stmt_utf8, sqlite3_column_name }, + { "sqlite3_column_int", test_stmt_int, sqlite3_column_int }, + { "sqlite3_column_bytes", test_stmt_int, sqlite3_column_bytes }, +#ifndef SQLITE_OMIT_UTF16 + { "sqlite3_column_bytes16", test_stmt_int, sqlite3_column_bytes16 }, { "sqlite3_column_text16", test_stmt_utf16, sqlite3_column_text16 }, { "sqlite3_column_decltype16", test_stmt_utf16, sqlite3_column_decltype16}, { "sqlite3_column_name16", test_stmt_utf16, sqlite3_column_name16 }, +#endif /* Functions from os.h */ { "sqlite3OsOpenReadWrite",test_sqlite3OsOpenReadWrite, 0 }, diff --git a/src/test5.c b/src/test5.c index 2b325bd998..3091f6c2e8 100644 --- a/src/test5.c +++ b/src/test5.c @@ -15,7 +15,7 @@ ** is used for testing the SQLite routines for converting between ** the various supported unicode encodings. ** -** $Id: test5.c,v 1.13 2004/06/25 02:38:55 danielk1977 Exp $ +** $Id: test5.c,v 1.14 2004/11/14 21:56:30 drh Exp $ */ #include "sqliteInt.h" #include "vdbeInt.h" @@ -190,7 +190,9 @@ static int test_translate_selftest( int objc, Tcl_Obj *CONST objv[] ){ +#ifndef SQLITE_OMIT_UTF16 sqlite3utfSelfTest(); +#endif return SQLITE_OK; } @@ -214,4 +216,3 @@ int Sqlitetest5_Init(Tcl_Interp *interp){ } return SQLITE_OK; } - diff --git a/src/utf.c b/src/utf.c index 0d9a73395e..b223a03e59 100644 --- a/src/utf.c +++ b/src/utf.c @@ -12,7 +12,7 @@ ** This file contains routines used to translate between UTF-8, ** UTF-16, UTF-16BE, and UTF-16LE. ** -** $Id: utf.c,v 1.29 2004/09/24 23:20:52 drh Exp $ +** $Id: utf.c,v 1.30 2004/11/14 21:56:30 drh Exp $ ** ** Notes on UTF-8: ** @@ -232,6 +232,7 @@ int sqlite3ReadUtf8(const unsigned char *z){ */ /* #define TRANSLATE_TRACE 1 */ +#ifndef SQLITE_OMIT_UTF16 /* ** This routine transforms the internal text encoding used by pMem to ** desiredEnc. It is an error if the string is already of the desired @@ -423,6 +424,7 @@ int sqlite3VdbeMemHandleBom(Mem *pMem){ } return rc; } +#endif /* SQLITE_OMIT_UTF16 */ /* ** pZ is a UTF-8 encoded unicode string. If nByte is less than zero, @@ -447,6 +449,7 @@ int sqlite3utf8CharLen(const char *z, int nByte){ return r; } +#ifndef SQLITE_OMIT_UTF16 /* ** pZ is a UTF-16 encoded unicode string. If nChar is less than zero, ** return the number of bytes up to (but not including), the first pair @@ -563,4 +566,5 @@ void sqlite3utfSelfTest(){ assert( (z-zBuf)==n ); } } -#endif +#endif /* SQLITE_TEST */ +#endif /* SQLITE_OMIT_UTF16 */ diff --git a/src/vdbe.c b/src/vdbe.c index 1bf5af1629..fb3ac6cae1 100644 --- a/src/vdbe.c +++ b/src/vdbe.c @@ -43,7 +43,7 @@ ** in this file for details. If in doubt, do not deviate from existing ** commenting and indentation practices when changing or adding code. ** -** $Id: vdbe.c,v 1.427 2004/11/13 03:48:07 drh Exp $ +** $Id: vdbe.c,v 1.428 2004/11/14 21:56:30 drh Exp $ */ #include "sqliteInt.h" #include "os.h" @@ -710,11 +710,16 @@ case OP_String: { if( pOp->p3 ){ pTos->flags = MEM_Str|MEM_Static|MEM_Term; pTos->z = pOp->p3; +#ifndef SQLITE_OMIT_UTF16 if( db->enc==SQLITE_UTF8 ){ pTos->n = strlen(pTos->z); }else{ pTos->n = sqlite3utf16ByteLen(pTos->z, -1); } +#else + assert( db->enc==SQLITE_UTF8 ); + pTos->n = strlen(pTos->z); +#endif pTos->enc = db->enc; }else{ pTos->flags = MEM_Null; diff --git a/src/vdbeapi.c b/src/vdbeapi.c index bd39a539f4..bc6a322d59 100644 --- a/src/vdbeapi.c +++ b/src/vdbeapi.c @@ -46,6 +46,7 @@ sqlite_int64 sqlite3_value_int64(sqlite3_value *pVal){ const unsigned char *sqlite3_value_text(sqlite3_value *pVal){ return (const char *)sqlite3ValueText(pVal, SQLITE_UTF8); } +#ifndef SQLITE_OMIT_UTF16 const void *sqlite3_value_text16(sqlite3_value* pVal){ return sqlite3ValueText(pVal, SQLITE_UTF16NATIVE); } @@ -55,6 +56,7 @@ const void *sqlite3_value_text16be(sqlite3_value *pVal){ const void *sqlite3_value_text16le(sqlite3_value *pVal){ return sqlite3ValueText(pVal, SQLITE_UTF16LE); } +#endif /* SQLITE_OMIT_UTF16 */ int sqlite3_value_type(sqlite3_value* pVal){ return pVal->type; } @@ -100,6 +102,7 @@ void sqlite3_result_text( ){ sqlite3VdbeMemSetStr(&pCtx->s, z, n, SQLITE_UTF8, xDel); } +#ifndef SQLITE_OMIT_UTF16 void sqlite3_result_text16( sqlite3_context *pCtx, const void *z, @@ -124,6 +127,7 @@ void sqlite3_result_text16le( ){ sqlite3VdbeMemSetStr(&pCtx->s, z, n, SQLITE_UTF16LE, xDel); } +#endif /* SQLITE_OMIT_UTF16 */ void sqlite3_result_value(sqlite3_context *pCtx, sqlite3_value *pValue){ sqlite3VdbeMemCopy(&pCtx->s, pValue); } @@ -346,9 +350,11 @@ sqlite_int64 sqlite3_column_int64(sqlite3_stmt *pStmt, int i){ const unsigned char *sqlite3_column_text(sqlite3_stmt *pStmt, int i){ return sqlite3_value_text( columnMem(pStmt,i) ); } +#ifndef SQLITE_OMIT_UTF16 const void *sqlite3_column_text16(sqlite3_stmt *pStmt, int i){ return sqlite3_value_text16( columnMem(pStmt,i) ); } +#endif /* SQLITE_OMIT_UTF16 */ int sqlite3_column_type(sqlite3_stmt *pStmt, int i){ return sqlite3_value_type( columnMem(pStmt,i) ); } @@ -386,6 +392,15 @@ const char *sqlite3_column_name(sqlite3_stmt *pStmt, int N){ return columnName(pStmt, N, (const void*(*)(Mem*))sqlite3_value_text, 0); } +/* +** Return the column declaration type (if applicable) of the 'i'th column +** of the result set of SQL statement pStmt, encoded as UTF-8. +*/ +const char *sqlite3_column_decltype(sqlite3_stmt *pStmt, int N){ + return columnName(pStmt, N, (const void*(*)(Mem*))sqlite3_value_text, 1); +} + +#ifndef SQLITE_OMIT_UTF16 /* ** Return the name of the 'i'th column of the result set of SQL statement ** pStmt, encoded as UTF-16. @@ -394,14 +409,6 @@ const void *sqlite3_column_name16(sqlite3_stmt *pStmt, int N){ return columnName(pStmt, N, (const void*(*)(Mem*))sqlite3_value_text16, 0); } -/* -** Return the column declaration type (if applicable) of the 'i'th column -** of the result set of SQL statement pStmt, encoded as UTF-8. -*/ -const char *sqlite3_column_decltype(sqlite3_stmt *pStmt, int N){ - return columnName(pStmt, N, (const void*(*)(Mem*))sqlite3_value_text, 1); -} - /* ** Return the column declaration type (if applicable) of the 'i'th column ** of the result set of SQL statement pStmt, encoded as UTF-16. @@ -409,6 +416,7 @@ const char *sqlite3_column_decltype(sqlite3_stmt *pStmt, int N){ const void *sqlite3_column_decltype16(sqlite3_stmt *pStmt, int N){ return columnName(pStmt, N, (const void*(*)(Mem*))sqlite3_value_text16, 1); } +#endif /* SQLITE_OMIT_UTF16 */ /******************************* sqlite3_bind_ *************************** ** @@ -516,6 +524,7 @@ int sqlite3_bind_text( ){ return bindText(pStmt, i, zData, nData, xDel, SQLITE_UTF8); } +#ifndef SQLITE_OMIT_UTF16 int sqlite3_bind_text16( sqlite3_stmt *pStmt, int i, @@ -525,6 +534,7 @@ int sqlite3_bind_text16( ){ return bindText(pStmt, i, zData, nData, xDel, SQLITE_UTF16NATIVE); } +#endif /* SQLITE_OMIT_UTF16 */ /* ** Return the number of wildcards that can be potentially bound to. diff --git a/src/vdbemem.c b/src/vdbemem.c index c6cd94e634..1a522783ad 100644 --- a/src/vdbemem.c +++ b/src/vdbemem.c @@ -37,7 +37,11 @@ int sqlite3VdbeChangeEncoding(Mem *pMem, int desiredEnc){ if( !(pMem->flags&MEM_Str) || pMem->enc==desiredEnc ){ return SQLITE_OK; } +#ifdef SQLITE_OMIT_UTF16 + return SQLITE_ERROR; +#else return sqlite3VdbeMemTranslate(pMem, desiredEnc); +#endif } /* @@ -403,6 +407,7 @@ int sqlite3VdbeMemSetStr( } break; +#ifndef SQLITE_OMIT_UTF16 case SQLITE_UTF16LE: case SQLITE_UTF16BE: pMem->flags |= MEM_Str; @@ -414,6 +419,7 @@ int sqlite3VdbeMemSetStr( return SQLITE_NOMEM; } break; +#endif /* SQLITE_OMIT_UTF16 */ default: assert(0); diff --git a/test/bind.test b/test/bind.test index e2c58e7f0e..41115b973f 100644 --- a/test/bind.test +++ b/test/bind.test @@ -11,7 +11,7 @@ # This file implements regression tests for SQLite library. The # focus of this script testing the sqlite_bind API. # -# $Id: bind.test,v 1.21 2004/11/03 16:27:02 drh Exp $ +# $Id: bind.test,v 1.22 2004/11/14 21:56:31 drh Exp $ # set testdir [file dirname $argv0] @@ -247,17 +247,19 @@ do_test bind-6.3 { } {} # UTF-16 text -do_test bind-7.1 { - sqlite3_bind_text16 $VM 1 [encoding convertto unicode hellothere] 10 - sqlite3_bind_text16 $VM 2 [encoding convertto unicode ""] 0 - sqlite3_bind_text16 $VM 3 [encoding convertto unicode world] 10 - sqlite_step $VM N VALUES COLNAMES - sqlite3_reset $VM - execsql {SELECT rowid, * FROM t1} -} {1 hello {} world} -do_test bind-7.2 { - execsql {SELECT typeof(a), typeof(b), typeof(c) FROM t1} -} {text text text} +ifcapable {utf16} { + do_test bind-7.1 { + sqlite3_bind_text16 $VM 1 [encoding convertto unicode hellothere] 10 + sqlite3_bind_text16 $VM 2 [encoding convertto unicode ""] 0 + sqlite3_bind_text16 $VM 3 [encoding convertto unicode world] 10 + sqlite_step $VM N VALUES COLNAMES + sqlite3_reset $VM + execsql {SELECT rowid, * FROM t1} + } {1 hello {} world} + do_test bind-7.2 { + execsql {SELECT typeof(a), typeof(b), typeof(c) FROM t1} + } {text text text} +} do_test bind-7.3 { execsql { DELETE FROM t1; @@ -271,9 +273,11 @@ do_test bind-8.1 { do_test bind-8.2 { sqlite3_errmsg $DB } {bind index out of range} -do_test bind-8.3 { - encoding convertfrom unicode [sqlite3_errmsg16 $DB] -} {bind index out of range} +ifcapable {utf16} { + do_test bind-8.3 { + encoding convertfrom unicode [sqlite3_errmsg16 $DB] + } {bind index out of range} +} do_test bind-8.4 { sqlite3_bind_null $VM 1 sqlite3_errmsg $DB @@ -284,9 +288,11 @@ do_test bind-8.5 { do_test bind-8.6 { sqlite3_errmsg $DB } {bind index out of range} -do_test bind-8.7 { - encoding convertfrom unicode [sqlite3_errmsg16 $DB] -} {bind index out of range} +ifcapable {utf16} { + do_test bind-8.7 { + encoding convertfrom unicode [sqlite3_errmsg16 $DB] + } {bind index out of range} +} do_test bind-8.8 { catch { sqlite3_bind_blob $VM 0 "abc" 3 } @@ -297,9 +303,11 @@ do_test bind-8.9 { do_test bind-8.10 { catch { sqlite3_bind_text $VM 0 "abc" 3 } } {1} -do_test bind-8.11 { - catch { sqlite3_bind_text16 $VM 4 "abc" 2 } -} {1} +ifcapable {utf16} { + do_test bind-8.11 { + catch { sqlite3_bind_text16 $VM 4 "abc" 2 } + } {1} +} do_test bind-8.12 { catch { sqlite3_bind_int $VM 0 5 } } {1} diff --git a/test/capi3.test b/test/capi3.test index 6f30caa6bf..0e29d9a59a 100644 --- a/test/capi3.test +++ b/test/capi3.test @@ -11,7 +11,7 @@ # This file implements regression tests for SQLite library. The # focus of this script testing the callback-free C/C++ API. # -# $Id: capi3.test,v 1.22 2004/11/14 04:04:18 drh Exp $ +# $Id: capi3.test,v 1.23 2004/11/14 21:56:31 drh Exp $ # set testdir [file dirname $argv0] @@ -331,18 +331,20 @@ do_test $test.3 { } $lens # bytes16 -set lens [list] -foreach i $::idxlist { - lappend lens [expr 2 * [string length [lindex $strings $i]]] -} -do_test $test.4 { - set bytes [list] +ifcapable {utf16} { set lens [list] - foreach i $idxlist { - lappend bytes [sqlite3_column_bytes16 $STMT $i] + foreach i $::idxlist { + lappend lens [expr 2 * [string length [lindex $strings $i]]] } - set bytes -} $lens + do_test $test.4 { + set bytes [list] + set lens [list] + foreach i $idxlist { + lappend bytes [sqlite3_column_bytes16 $STMT $i] + } + set bytes + } $lens +} # Blob do_test $test.5 { diff --git a/test/enc.test b/test/enc.test index 7242257744..b1fdfa0966 100644 --- a/test/enc.test +++ b/test/enc.test @@ -13,11 +13,18 @@ # various suported unicode encodings (UTF-8, UTF-16, UTF-16le and # UTF-16be). # -# $Id: enc.test,v 1.4 2004/06/23 13:46:33 danielk1977 Exp $ +# $Id: enc.test,v 1.5 2004/11/14 21:56:31 drh Exp $ set testdir [file dirname $argv0] source $testdir/tester.tcl +# Skip this test if the build does not support multiple encodings. +# +ifcapable {!utf16} { + finish_test + return +} + proc do_bincmp_test {testname got expect} { binary scan $expect \c* expectvals binary scan $got \c* gotvals @@ -143,6 +150,3 @@ test_conversion enc-8 [string repeat "\u007E\u007F\u0080\u0081" 100] test_conversion enc-9 [string repeat "\u07FE\u07FF\u0800\u0801\uFFF0" 100] finish_test - - - diff --git a/test/enc3.test b/test/enc3.test index 1c8b76d836..3c2ca4bceb 100644 --- a/test/enc3.test +++ b/test/enc3.test @@ -13,17 +13,19 @@ # The focus of this file is testing of the proper handling of conversions # to the native text representation. # -# $Id: enc3.test,v 1.3 2004/11/03 13:59:06 drh Exp $ +# $Id: enc3.test,v 1.4 2004/11/14 21:56:31 drh Exp $ set testdir [file dirname $argv0] source $testdir/tester.tcl -do_test enc3-1.1 { - execsql { - PRAGMA encoding=utf16le; - PRAGMA encoding; - } -} {UTF-16le} +ifcapable {utf16} { + do_test enc3-1.1 { + execsql { + PRAGMA encoding=utf16le; + PRAGMA encoding; + } + } {UTF-16le} +} do_test enc3-1.2 { execsql { CREATE TABLE t1(x,y); diff --git a/test/misuse.test b/test/misuse.test index 32235f852f..effe8bff02 100644 --- a/test/misuse.test +++ b/test/misuse.test @@ -13,7 +13,7 @@ # This file implements tests for the SQLITE_MISUSE detection logic. # This test file leaks memory and file descriptors. # -# $Id: misuse.test,v 1.7 2004/09/30 13:43:14 drh Exp $ +# $Id: misuse.test,v 1.8 2004/11/14 21:56:31 drh Exp $ set testdir [file dirname $argv0] source $testdir/tester.tcl @@ -68,11 +68,13 @@ do_test misuse-1.3 { # but that has changed. The following tests used to cause errors but now # they do not. # -do_test misuse-1.4 { - catchsql2 { - SELECT x_sqlite_exec('SELECT * FROM t1') AS xyz; - } -} {0 {xyz {1 2}}} +ifcapable {utf16} { + do_test misuse-1.4 { + catchsql2 { + SELECT x_sqlite_exec('SELECT * FROM t1') AS xyz; + } + } {0 {xyz {1 2}}} +} do_test misuse-1.5 { catchsql2 {SELECT * FROM t1} } {0 {a b 1 2}} diff --git a/test/pragma.test b/test/pragma.test index dc2d167e4e..70c97bb975 100644 --- a/test/pragma.test +++ b/test/pragma.test @@ -12,7 +12,7 @@ # # This file implements tests for the PRAGMA command. # -# $Id: pragma.test,v 1.23 2004/11/12 16:12:00 danielk1977 Exp $ +# $Id: pragma.test,v 1.24 2004/11/14 21:56:31 drh Exp $ set testdir [file dirname $argv0] source $testdir/tester.tcl @@ -351,13 +351,15 @@ do_test pragma-7.1 { pragma index_list(t3); } } {0 t3i1 0 1 sqlite_autoindex_t3_1 1} -do_test pragma-7.2 { - db close - sqlite3 db test.db - catchsql { - pragma encoding=bogus; - } -} {1 {unsupported encoding: bogus}} +ifcapable {utf16} { + do_test pragma-7.2 { + db close + sqlite3 db test.db + catchsql { + pragma encoding=bogus; + } + } {1 {unsupported encoding: bogus}} +} do_test pragma-7.3 { db close sqlite3 db test.db @@ -572,5 +574,3 @@ do_test pragma-8.2.15 { } {-450} finish_test - - diff --git a/test/types.test b/test/types.test index cd428a39ef..eda9e71057 100644 --- a/test/types.test +++ b/test/types.test @@ -12,7 +12,7 @@ # it tests that the different storage classes (integer, real, text etc.) # all work correctly. # -# $Id: types.test,v 1.13 2004/11/03 16:27:02 drh Exp $ +# $Id: types.test,v 1.14 2004/11/14 21:56:31 drh Exp $ set testdir [file dirname $argv0] source $testdir/tester.tcl @@ -269,7 +269,7 @@ do_test types-2.4.2 { # Check that all the record sizes are as we expected. This is dependant on # the database encoding. -if { [execsql {pragma encoding}] == "UTF-8" } { +if { $sqlite_options(utf16)==0 || [execsql {pragma encoding}] == "UTF-8" } { do_test types-2.4.3 { set root [db eval {select rootpage from sqlite_master where name = 't4'}] record_sizes $root