util.c.svn-base
上传用户:sunhongbo
上传日期:2022-01-25
资源大小:3010k
文件大小:21k
源码类别:

数据库系统

开发平台:

C/C++

  1. /*
  2. ** 2001 September 15
  3. **
  4. ** The author disclaims copyright to this source code.  In place of
  5. ** a legal notice, here is a blessing:
  6. **
  7. **    May you do good and not evil.
  8. **    May you find forgiveness for yourself and forgive others.
  9. **    May you share freely, never taking more than you give.
  10. **
  11. *************************************************************************
  12. ** Utility functions used throughout sqlite.
  13. **
  14. ** This file contains functions for allocating memory, comparing
  15. ** strings, and stuff like that.
  16. **
  17. ** $Id: util.c,v 1.222 2008/04/16 00:49:12 drh Exp $
  18. */
  19. #include "sqliteInt.h"
  20. #include <stdarg.h>
  21. #include <ctype.h>
  22. /*
  23. ** Set the most recent error code and error string for the sqlite
  24. ** handle "db". The error code is set to "err_code".
  25. **
  26. ** If it is not NULL, string zFormat specifies the format of the
  27. ** error string in the style of the printf functions: The following
  28. ** format characters are allowed:
  29. **
  30. **      %s      Insert a string
  31. **      %z      A string that should be freed after use
  32. **      %d      Insert an integer
  33. **      %T      Insert a token
  34. **      %S      Insert the first element of a SrcList
  35. **
  36. ** zFormat and any string tokens that follow it are assumed to be
  37. ** encoded in UTF-8.
  38. **
  39. ** To clear the most recent error for sqlite handle "db", sqlite3Error
  40. ** should be called with err_code set to SQLITE_OK and zFormat set
  41. ** to NULL.
  42. */
  43. void sqlite3Error(sqlite3 *db, int err_code, const char *zFormat, ...){
  44.   if( db && (db->pErr || (db->pErr = sqlite3ValueNew(db))!=0) ){
  45.     db->errCode = err_code;
  46.     if( zFormat ){
  47.       char *z;
  48.       va_list ap;
  49.       va_start(ap, zFormat);
  50.       z = sqlite3VMPrintf(db, zFormat, ap);
  51.       va_end(ap);
  52.       sqlite3ValueSetStr(db->pErr, -1, z, SQLITE_UTF8, sqlite3_free);
  53.     }else{
  54.       sqlite3ValueSetStr(db->pErr, 0, 0, SQLITE_UTF8, SQLITE_STATIC);
  55.     }
  56.   }
  57. }
  58. /*
  59. ** Add an error message to pParse->zErrMsg and increment pParse->nErr.
  60. ** The following formatting characters are allowed:
  61. **
  62. **      %s      Insert a string
  63. **      %z      A string that should be freed after use
  64. **      %d      Insert an integer
  65. **      %T      Insert a token
  66. **      %S      Insert the first element of a SrcList
  67. **
  68. ** This function should be used to report any error that occurs whilst
  69. ** compiling an SQL statement (i.e. within sqlite3_prepare()). The
  70. ** last thing the sqlite3_prepare() function does is copy the error
  71. ** stored by this function into the database handle using sqlite3Error().
  72. ** Function sqlite3Error() should be used during statement execution
  73. ** (sqlite3_step() etc.).
  74. */
  75. void sqlite3ErrorMsg(Parse *pParse, const char *zFormat, ...){
  76.   va_list ap;
  77.   pParse->nErr++;
  78.   sqlite3_free(pParse->zErrMsg);
  79.   va_start(ap, zFormat);
  80.   pParse->zErrMsg = sqlite3VMPrintf(pParse->db, zFormat, ap);
  81.   va_end(ap);
  82.   if( pParse->rc==SQLITE_OK ){
  83.     pParse->rc = SQLITE_ERROR;
  84.   }
  85. }
  86. /*
  87. ** Clear the error message in pParse, if any
  88. */
  89. void sqlite3ErrorClear(Parse *pParse){
  90.   sqlite3_free(pParse->zErrMsg);
  91.   pParse->zErrMsg = 0;
  92.   pParse->nErr = 0;
  93. }
  94. /*
  95. ** Convert an SQL-style quoted string into a normal string by removing
  96. ** the quote characters.  The conversion is done in-place.  If the
  97. ** input does not begin with a quote character, then this routine
  98. ** is a no-op.
  99. **
  100. ** 2002-Feb-14: This routine is extended to remove MS-Access style
  101. ** brackets from around identifers.  For example:  "[a-b-c]" becomes
  102. ** "a-b-c".
  103. */
  104. void sqlite3Dequote(char *z){
  105.   int quote;
  106.   int i, j;
  107.   if( z==0 ) return;
  108.   quote = z[0];
  109.   switch( quote ){
  110.     case ''':  break;
  111.     case '"':   break;
  112.     case '`':   break;                /* For MySQL compatibility */
  113.     case '[':   quote = ']';  break;  /* For MS SqlServer compatibility */
  114.     default:    return;
  115.   }
  116.   for(i=1, j=0; z[i]; i++){
  117.     if( z[i]==quote ){
  118.       if( z[i+1]==quote ){
  119.         z[j++] = quote;
  120.         i++;
  121.       }else{
  122.         z[j++] = 0;
  123.         break;
  124.       }
  125.     }else{
  126.       z[j++] = z[i];
  127.     }
  128.   }
  129. }
  130. /* An array to map all upper-case characters into their corresponding
  131. ** lower-case character. 
  132. */
  133. const unsigned char sqlite3UpperToLower[] = {
  134. #ifdef SQLITE_ASCII
  135.       0,  1,  2,  3,  4,  5,  6,  7,  8,  9, 10, 11, 12, 13, 14, 15, 16, 17,
  136.      18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35,
  137.      36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53,
  138.      54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 97, 98, 99,100,101,102,103,
  139.     104,105,106,107,108,109,110,111,112,113,114,115,116,117,118,119,120,121,
  140.     122, 91, 92, 93, 94, 95, 96, 97, 98, 99,100,101,102,103,104,105,106,107,
  141.     108,109,110,111,112,113,114,115,116,117,118,119,120,121,122,123,124,125,
  142.     126,127,128,129,130,131,132,133,134,135,136,137,138,139,140,141,142,143,
  143.     144,145,146,147,148,149,150,151,152,153,154,155,156,157,158,159,160,161,
  144.     162,163,164,165,166,167,168,169,170,171,172,173,174,175,176,177,178,179,
  145.     180,181,182,183,184,185,186,187,188,189,190,191,192,193,194,195,196,197,
  146.     198,199,200,201,202,203,204,205,206,207,208,209,210,211,212,213,214,215,
  147.     216,217,218,219,220,221,222,223,224,225,226,227,228,229,230,231,232,233,
  148.     234,235,236,237,238,239,240,241,242,243,244,245,246,247,248,249,250,251,
  149.     252,253,254,255
  150. #endif
  151. #ifdef SQLITE_EBCDIC
  152.       0,  1,  2,  3,  4,  5,  6,  7,  8,  9, 10, 11, 12, 13, 14, 15, /* 0x */
  153.      16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, /* 1x */
  154.      32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, /* 2x */
  155.      48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, /* 3x */
  156.      64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, /* 4x */
  157.      80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, /* 5x */
  158.      96, 97, 66, 67, 68, 69, 70, 71, 72, 73,106,107,108,109,110,111, /* 6x */
  159.     112, 81, 82, 83, 84, 85, 86, 87, 88, 89,122,123,124,125,126,127, /* 7x */
  160.     128,129,130,131,132,133,134,135,136,137,138,139,140,141,142,143, /* 8x */
  161.     144,145,146,147,148,149,150,151,152,153,154,155,156,157,156,159, /* 9x */
  162.     160,161,162,163,164,165,166,167,168,169,170,171,140,141,142,175, /* Ax */
  163.     176,177,178,179,180,181,182,183,184,185,186,187,188,189,190,191, /* Bx */
  164.     192,129,130,131,132,133,134,135,136,137,202,203,204,205,206,207, /* Cx */
  165.     208,145,146,147,148,149,150,151,152,153,218,219,220,221,222,223, /* Dx */
  166.     224,225,162,163,164,165,166,167,168,169,232,203,204,205,206,207, /* Ex */
  167.     239,240,241,242,243,244,245,246,247,248,249,219,220,221,222,255, /* Fx */
  168. #endif
  169. };
  170. #define UpperToLower sqlite3UpperToLower
  171. /*
  172. ** Some systems have stricmp().  Others have strcasecmp().  Because
  173. ** there is no consistency, we will define our own.
  174. */
  175. int sqlite3StrICmp(const char *zLeft, const char *zRight){
  176.   register unsigned char *a, *b;
  177.   a = (unsigned char *)zLeft;
  178.   b = (unsigned char *)zRight;
  179.   while( *a!=0 && UpperToLower[*a]==UpperToLower[*b]){ a++; b++; }
  180.   return UpperToLower[*a] - UpperToLower[*b];
  181. }
  182. int sqlite3StrNICmp(const char *zLeft, const char *zRight, int N){
  183.   register unsigned char *a, *b;
  184.   a = (unsigned char *)zLeft;
  185.   b = (unsigned char *)zRight;
  186.   while( N-- > 0 && *a!=0 && UpperToLower[*a]==UpperToLower[*b]){ a++; b++; }
  187.   return N<0 ? 0 : UpperToLower[*a] - UpperToLower[*b];
  188. }
  189. /*
  190. ** Return TRUE if z is a pure numeric string.  Return FALSE if the
  191. ** string contains any character which is not part of a number. If
  192. ** the string is numeric and contains the '.' character, set *realnum
  193. ** to TRUE (otherwise FALSE).
  194. **
  195. ** An empty string is considered non-numeric.
  196. */
  197. int sqlite3IsNumber(const char *z, int *realnum, u8 enc){
  198.   int incr = (enc==SQLITE_UTF8?1:2);
  199.   if( enc==SQLITE_UTF16BE ) z++;
  200.   if( *z=='-' || *z=='+' ) z += incr;
  201.   if( !isdigit(*(u8*)z) ){
  202.     return 0;
  203.   }
  204.   z += incr;
  205.   if( realnum ) *realnum = 0;
  206.   while( isdigit(*(u8*)z) ){ z += incr; }
  207.   if( *z=='.' ){
  208.     z += incr;
  209.     if( !isdigit(*(u8*)z) ) return 0;
  210.     while( isdigit(*(u8*)z) ){ z += incr; }
  211.     if( realnum ) *realnum = 1;
  212.   }
  213.   if( *z=='e' || *z=='E' ){
  214.     z += incr;
  215.     if( *z=='+' || *z=='-' ) z += incr;
  216.     if( !isdigit(*(u8*)z) ) return 0;
  217.     while( isdigit(*(u8*)z) ){ z += incr; }
  218.     if( realnum ) *realnum = 1;
  219.   }
  220.   return *z==0;
  221. }
  222. /*
  223. ** The string z[] is an ascii representation of a real number.
  224. ** Convert this string to a double.
  225. **
  226. ** This routine assumes that z[] really is a valid number.  If it
  227. ** is not, the result is undefined.
  228. **
  229. ** This routine is used instead of the library atof() function because
  230. ** the library atof() might want to use "," as the decimal point instead
  231. ** of "." depending on how locale is set.  But that would cause problems
  232. ** for SQL.  So this routine always uses "." regardless of locale.
  233. */
  234. int sqlite3AtoF(const char *z, double *pResult){
  235. #ifndef SQLITE_OMIT_FLOATING_POINT
  236.   int sign = 1;
  237.   const char *zBegin = z;
  238.   LONGDOUBLE_TYPE v1 = 0.0;
  239.   while( isspace(*(u8*)z) ) z++;
  240.   if( *z=='-' ){
  241.     sign = -1;
  242.     z++;
  243.   }else if( *z=='+' ){
  244.     z++;
  245.   }
  246.   while( isdigit(*(u8*)z) ){
  247.     v1 = v1*10.0 + (*z - '0');
  248.     z++;
  249.   }
  250.   if( *z=='.' ){
  251.     LONGDOUBLE_TYPE divisor = 1.0;
  252.     z++;
  253.     while( isdigit(*(u8*)z) ){
  254.       v1 = v1*10.0 + (*z - '0');
  255.       divisor *= 10.0;
  256.       z++;
  257.     }
  258.     v1 /= divisor;
  259.   }
  260.   if( *z=='e' || *z=='E' ){
  261.     int esign = 1;
  262.     int eval = 0;
  263.     LONGDOUBLE_TYPE scale = 1.0;
  264.     z++;
  265.     if( *z=='-' ){
  266.       esign = -1;
  267.       z++;
  268.     }else if( *z=='+' ){
  269.       z++;
  270.     }
  271.     while( isdigit(*(u8*)z) ){
  272.       eval = eval*10 + *z - '0';
  273.       z++;
  274.     }
  275.     while( eval>=64 ){ scale *= 1.0e+64; eval -= 64; }
  276.     while( eval>=16 ){ scale *= 1.0e+16; eval -= 16; }
  277.     while( eval>=4 ){ scale *= 1.0e+4; eval -= 4; }
  278.     while( eval>=1 ){ scale *= 1.0e+1; eval -= 1; }
  279.     if( esign<0 ){
  280.       v1 /= scale;
  281.     }else{
  282.       v1 *= scale;
  283.     }
  284.   }
  285.   *pResult = sign<0 ? -v1 : v1;
  286.   return z - zBegin;
  287. #else
  288.   return sqlite3Atoi64(z, pResult);
  289. #endif /* SQLITE_OMIT_FLOATING_POINT */
  290. }
  291. /*
  292. ** Compare the 19-character string zNum against the text representation
  293. ** value 2^63:  9223372036854775808.  Return negative, zero, or positive
  294. ** if zNum is less than, equal to, or greater than the string.
  295. **
  296. ** Unlike memcmp() this routine is guaranteed to return the difference
  297. ** in the values of the last digit if the only difference is in the
  298. ** last digit.  So, for example,
  299. **
  300. **      compare2pow63("9223372036854775800")
  301. **
  302. ** will return -8.
  303. */
  304. static int compare2pow63(const char *zNum){
  305.   int c;
  306.   c = memcmp(zNum,"922337203685477580",18);
  307.   if( c==0 ){
  308.     c = zNum[18] - '8';
  309.   }
  310.   return c;
  311. }
  312. /*
  313. ** Return TRUE if zNum is a 64-bit signed integer and write
  314. ** the value of the integer into *pNum.  If zNum is not an integer
  315. ** or is an integer that is too large to be expressed with 64 bits,
  316. ** then return false.
  317. **
  318. ** When this routine was originally written it dealt with only
  319. ** 32-bit numbers.  At that time, it was much faster than the
  320. ** atoi() library routine in RedHat 7.2.
  321. */
  322. int sqlite3Atoi64(const char *zNum, i64 *pNum){
  323.   i64 v = 0;
  324.   int neg;
  325.   int i, c;
  326.   while( isspace(*(u8*)zNum) ) zNum++;
  327.   if( *zNum=='-' ){
  328.     neg = 1;
  329.     zNum++;
  330.   }else if( *zNum=='+' ){
  331.     neg = 0;
  332.     zNum++;
  333.   }else{
  334.     neg = 0;
  335.   }
  336.   while( zNum[0]=='0' ){ zNum++; } /* Skip over leading zeros. Ticket #2454 */
  337.   for(i=0; (c=zNum[i])>='0' && c<='9'; i++){
  338.     v = v*10 + c - '0';
  339.   }
  340.   *pNum = neg ? -v : v;
  341.   if( c!=0 || i==0 || i>19 ){
  342.     /* zNum is empty or contains non-numeric text or is longer
  343.     ** than 19 digits (thus guaranting that it is too large) */
  344.     return 0;
  345.   }else if( i<19 ){
  346.     /* Less than 19 digits, so we know that it fits in 64 bits */
  347.     return 1;
  348.   }else{
  349.     /* 19-digit numbers must be no larger than 9223372036854775807 if positive
  350.     ** or 9223372036854775808 if negative.  Note that 9223372036854665808
  351.     ** is 2^63. */
  352.     return compare2pow63(zNum)<neg;
  353.   }
  354. }
  355. /*
  356. ** The string zNum represents an integer.  There might be some other
  357. ** information following the integer too, but that part is ignored.
  358. ** If the integer that the prefix of zNum represents will fit in a
  359. ** 64-bit signed integer, return TRUE.  Otherwise return FALSE.
  360. **
  361. ** This routine returns FALSE for the string -9223372036854775808 even that
  362. ** that number will, in theory fit in a 64-bit integer.  Positive
  363. ** 9223373036854775808 will not fit in 64 bits.  So it seems safer to return
  364. ** false.
  365. */
  366. int sqlite3FitsIn64Bits(const char *zNum, int negFlag){
  367.   int i, c;
  368.   int neg = 0;
  369.   if( *zNum=='-' ){
  370.     neg = 1;
  371.     zNum++;
  372.   }else if( *zNum=='+' ){
  373.     zNum++;
  374.   }
  375.   if( negFlag ) neg = 1-neg;
  376.   while( *zNum=='0' ){
  377.     zNum++;   /* Skip leading zeros.  Ticket #2454 */
  378.   }
  379.   for(i=0; (c=zNum[i])>='0' && c<='9'; i++){}
  380.   if( i<19 ){
  381.     /* Guaranteed to fit if less than 19 digits */
  382.     return 1;
  383.   }else if( i>19 ){
  384.     /* Guaranteed to be too big if greater than 19 digits */
  385.     return 0;
  386.   }else{
  387.     /* Compare against 2^63. */
  388.     return compare2pow63(zNum)<neg;
  389.   }
  390. }
  391. /*
  392. ** If zNum represents an integer that will fit in 32-bits, then set
  393. ** *pValue to that integer and return true.  Otherwise return false.
  394. **
  395. ** Any non-numeric characters that following zNum are ignored.
  396. ** This is different from sqlite3Atoi64() which requires the
  397. ** input number to be zero-terminated.
  398. */
  399. int sqlite3GetInt32(const char *zNum, int *pValue){
  400.   sqlite_int64 v = 0;
  401.   int i, c;
  402.   int neg = 0;
  403.   if( zNum[0]=='-' ){
  404.     neg = 1;
  405.     zNum++;
  406.   }else if( zNum[0]=='+' ){
  407.     zNum++;
  408.   }
  409.   while( zNum[0]=='0' ) zNum++;
  410.   for(i=0; i<11 && (c = zNum[i] - '0')>=0 && c<=9; i++){
  411.     v = v*10 + c;
  412.   }
  413.   /* The longest decimal representation of a 32 bit integer is 10 digits:
  414.   **
  415.   **             1234567890
  416.   **     2^31 -> 2147483648
  417.   */
  418.   if( i>10 ){
  419.     return 0;
  420.   }
  421.   if( v-neg>2147483647 ){
  422.     return 0;
  423.   }
  424.   if( neg ){
  425.     v = -v;
  426.   }
  427.   *pValue = (int)v;
  428.   return 1;
  429. }
  430. /*
  431. ** The variable-length integer encoding is as follows:
  432. **
  433. ** KEY:
  434. **         A = 0xxxxxxx    7 bits of data and one flag bit
  435. **         B = 1xxxxxxx    7 bits of data and one flag bit
  436. **         C = xxxxxxxx    8 bits of data
  437. **
  438. **  7 bits - A
  439. ** 14 bits - BA
  440. ** 21 bits - BBA
  441. ** 28 bits - BBBA
  442. ** 35 bits - BBBBA
  443. ** 42 bits - BBBBBA
  444. ** 49 bits - BBBBBBA
  445. ** 56 bits - BBBBBBBA
  446. ** 64 bits - BBBBBBBBC
  447. */
  448. /*
  449. ** Write a 64-bit variable-length integer to memory starting at p[0].
  450. ** The length of data write will be between 1 and 9 bytes.  The number
  451. ** of bytes written is returned.
  452. **
  453. ** A variable-length integer consists of the lower 7 bits of each byte
  454. ** for all bytes that have the 8th bit set and one byte with the 8th
  455. ** bit clear.  Except, if we get to the 9th byte, it stores the full
  456. ** 8 bits and is the last byte.
  457. */
  458. int sqlite3PutVarint(unsigned char *p, u64 v){
  459.   int i, j, n;
  460.   u8 buf[10];
  461.   if( v & (((u64)0xff000000)<<32) ){
  462.     p[8] = v;
  463.     v >>= 8;
  464.     for(i=7; i>=0; i--){
  465.       p[i] = (v & 0x7f) | 0x80;
  466.       v >>= 7;
  467.     }
  468.     return 9;
  469.   }    
  470.   n = 0;
  471.   do{
  472.     buf[n++] = (v & 0x7f) | 0x80;
  473.     v >>= 7;
  474.   }while( v!=0 );
  475.   buf[0] &= 0x7f;
  476.   assert( n<=9 );
  477.   for(i=0, j=n-1; j>=0; j--, i++){
  478.     p[i] = buf[j];
  479.   }
  480.   return n;
  481. }
  482. /*
  483. ** This routine is a faster version of sqlite3PutVarint() that only
  484. ** works for 32-bit positive integers and which is optimized for
  485. ** the common case of small integers.
  486. */
  487. int sqlite3PutVarint32(unsigned char *p, u32 v){
  488.   if( (v & ~0x7f)==0 ){
  489.     p[0] = v;
  490.     return 1;
  491.   }else if( (v & ~0x3fff)==0 ){
  492.     p[0] = (v>>7) | 0x80;
  493.     p[1] = v & 0x7f;
  494.     return 2;
  495.   }else{
  496.     return sqlite3PutVarint(p, v);
  497.   }
  498. }
  499. /*
  500. ** Read a 64-bit variable-length integer from memory starting at p[0].
  501. ** Return the number of bytes read.  The value is stored in *v.
  502. */
  503. int sqlite3GetVarint(const unsigned char *p, u64 *v){
  504.   u32 x;
  505.   u64 x64;
  506.   int n;
  507.   unsigned char c;
  508.   if( ((c = p[0]) & 0x80)==0 ){
  509.     *v = c;
  510.     return 1;
  511.   }
  512.   x = c & 0x7f;
  513.   if( ((c = p[1]) & 0x80)==0 ){
  514.     *v = (x<<7) | c;
  515.     return 2;
  516.   }
  517.   x = (x<<7) | (c&0x7f);
  518.   if( ((c = p[2]) & 0x80)==0 ){
  519.     *v = (x<<7) | c;
  520.     return 3;
  521.   }
  522.   x = (x<<7) | (c&0x7f);
  523.   if( ((c = p[3]) & 0x80)==0 ){
  524.     *v = (x<<7) | c;
  525.     return 4;
  526.   }
  527.   x64 = (x<<7) | (c&0x7f);
  528.   n = 4;
  529.   do{
  530.     c = p[n++];
  531.     if( n==9 ){
  532.       x64 = (x64<<8) | c;
  533.       break;
  534.     }
  535.     x64 = (x64<<7) | (c&0x7f);
  536.   }while( (c & 0x80)!=0 );
  537.   *v = x64;
  538.   return n;
  539. }
  540. /*
  541. ** Read a 32-bit variable-length integer from memory starting at p[0].
  542. ** Return the number of bytes read.  The value is stored in *v.
  543. */
  544. int sqlite3GetVarint32(const unsigned char *p, u32 *v){
  545.   u32 x;
  546.   int n;
  547.   unsigned char c;
  548.   if( ((signed char*)p)[0]>=0 ){
  549.     *v = p[0];
  550.     return 1;
  551.   }
  552.   x = p[0] & 0x7f;
  553.   if( ((signed char*)p)[1]>=0 ){
  554.     *v = (x<<7) | p[1];
  555.     return 2;
  556.   }
  557.   x = (x<<7) | (p[1] & 0x7f);
  558.   n = 2;
  559.   do{
  560.     x = (x<<7) | ((c = p[n++])&0x7f);
  561.   }while( (c & 0x80)!=0 && n<9 );
  562.   *v = x;
  563.   return n;
  564. }
  565. /*
  566. ** Return the number of bytes that will be needed to store the given
  567. ** 64-bit integer.
  568. */
  569. int sqlite3VarintLen(u64 v){
  570.   int i = 0;
  571.   do{
  572.     i++;
  573.     v >>= 7;
  574.   }while( v!=0 && i<9 );
  575.   return i;
  576. }
  577. /*
  578. ** Read or write a four-byte big-endian integer value.
  579. */
  580. u32 sqlite3Get4byte(const u8 *p){
  581.   return (p[0]<<24) | (p[1]<<16) | (p[2]<<8) | p[3];
  582. }
  583. void sqlite3Put4byte(unsigned char *p, u32 v){
  584.   p[0] = v>>24;
  585.   p[1] = v>>16;
  586.   p[2] = v>>8;
  587.   p[3] = v;
  588. }
  589. #if !defined(SQLITE_OMIT_BLOB_LITERAL) || defined(SQLITE_HAS_CODEC)
  590. /*
  591. ** Translate a single byte of Hex into an integer.
  592. ** This routinen only works if h really is a valid hexadecimal
  593. ** character:  0..9a..fA..F
  594. */
  595. static int hexToInt(int h){
  596.   assert( (h>='0' && h<='9') ||  (h>='a' && h<='f') ||  (h>='A' && h<='F') );
  597. #ifdef SQLITE_ASCII
  598.   h += 9*(1&(h>>6));
  599. #endif
  600. #ifdef SQLITE_EBCDIC
  601.   h += 9*(1&~(h>>4));
  602. #endif
  603.   return h & 0xf;
  604. }
  605. #endif /* !SQLITE_OMIT_BLOB_LITERAL || SQLITE_HAS_CODEC */
  606. #if !defined(SQLITE_OMIT_BLOB_LITERAL) || defined(SQLITE_HAS_CODEC)
  607. /*
  608. ** Convert a BLOB literal of the form "x'hhhhhh'" into its binary
  609. ** value.  Return a pointer to its binary value.  Space to hold the
  610. ** binary value has been obtained from malloc and must be freed by
  611. ** the calling routine.
  612. */
  613. void *sqlite3HexToBlob(sqlite3 *db, const char *z, int n){
  614.   char *zBlob;
  615.   int i;
  616.   zBlob = (char *)sqlite3DbMallocRaw(db, n/2 + 1);
  617.   n--;
  618.   if( zBlob ){
  619.     for(i=0; i<n; i+=2){
  620.       zBlob[i/2] = (hexToInt(z[i])<<4) | hexToInt(z[i+1]);
  621.     }
  622.     zBlob[i/2] = 0;
  623.   }
  624.   return zBlob;
  625. }
  626. #endif /* !SQLITE_OMIT_BLOB_LITERAL || SQLITE_HAS_CODEC */
  627. /*
  628. ** Change the sqlite.magic from SQLITE_MAGIC_OPEN to SQLITE_MAGIC_BUSY.
  629. ** Return an error (non-zero) if the magic was not SQLITE_MAGIC_OPEN
  630. ** when this routine is called.
  631. **
  632. ** This routine is called when entering an SQLite API.  The SQLITE_MAGIC_OPEN
  633. ** value indicates that the database connection passed into the API is
  634. ** open and is not being used by another thread.  By changing the value
  635. ** to SQLITE_MAGIC_BUSY we indicate that the connection is in use.
  636. ** sqlite3SafetyOff() below will change the value back to SQLITE_MAGIC_OPEN
  637. ** when the API exits. 
  638. **
  639. ** This routine is a attempt to detect if two threads use the
  640. ** same sqlite* pointer at the same time.  There is a race 
  641. ** condition so it is possible that the error is not detected.
  642. ** But usually the problem will be seen.  The result will be an
  643. ** error which can be used to debug the application that is
  644. ** using SQLite incorrectly.
  645. **
  646. ** Ticket #202:  If db->magic is not a valid open value, take care not
  647. ** to modify the db structure at all.  It could be that db is a stale
  648. ** pointer.  In other words, it could be that there has been a prior
  649. ** call to sqlite3_close(db) and db has been deallocated.  And we do
  650. ** not want to write into deallocated memory.
  651. */
  652. #ifdef SQLITE_DEBUG
  653. int sqlite3SafetyOn(sqlite3 *db){
  654.   if( db->magic==SQLITE_MAGIC_OPEN ){
  655.     db->magic = SQLITE_MAGIC_BUSY;
  656.     assert( sqlite3_mutex_held(db->mutex) );
  657.     return 0;
  658.   }else if( db->magic==SQLITE_MAGIC_BUSY ){
  659.     db->magic = SQLITE_MAGIC_ERROR;
  660.     db->u1.isInterrupted = 1;
  661.   }
  662.   return 1;
  663. }
  664. #endif
  665. /*
  666. ** Change the magic from SQLITE_MAGIC_BUSY to SQLITE_MAGIC_OPEN.
  667. ** Return an error (non-zero) if the magic was not SQLITE_MAGIC_BUSY
  668. ** when this routine is called.
  669. */
  670. #ifdef SQLITE_DEBUG
  671. int sqlite3SafetyOff(sqlite3 *db){
  672.   if( db->magic==SQLITE_MAGIC_BUSY ){
  673.     db->magic = SQLITE_MAGIC_OPEN;
  674.     assert( sqlite3_mutex_held(db->mutex) );
  675.     return 0;
  676.   }else{
  677.     db->magic = SQLITE_MAGIC_ERROR;
  678.     db->u1.isInterrupted = 1;
  679.     return 1;
  680.   }
  681. }
  682. #endif
  683. /*
  684. ** Check to make sure we have a valid db pointer.  This test is not
  685. ** foolproof but it does provide some measure of protection against
  686. ** misuse of the interface such as passing in db pointers that are
  687. ** NULL or which have been previously closed.  If this routine returns
  688. ** 1 it means that the db pointer is valid and 0 if it should not be
  689. ** dereferenced for any reason.  The calling function should invoke
  690. ** SQLITE_MISUSE immediately.
  691. **
  692. ** sqlite3SafetyCheckOk() requires that the db pointer be valid for
  693. ** use.  sqlite3SafetyCheckSickOrOk() allows a db pointer that failed to
  694. ** open properly and is not fit for general use but which can be
  695. ** used as an argument to sqlite3_errmsg() or sqlite3_close().
  696. */
  697. int sqlite3SafetyCheckOk(sqlite3 *db){
  698.   int magic;
  699.   if( db==0 ) return 0;
  700.   magic = db->magic;
  701.   if( magic!=SQLITE_MAGIC_OPEN &&
  702.       magic!=SQLITE_MAGIC_BUSY ) return 0;
  703.   return 1;
  704. }
  705. int sqlite3SafetyCheckSickOrOk(sqlite3 *db){
  706.   int magic;
  707.   if( db==0 ) return 0;
  708.   magic = db->magic;
  709.   if( magic!=SQLITE_MAGIC_SICK &&
  710.       magic!=SQLITE_MAGIC_OPEN &&
  711.       magic!=SQLITE_MAGIC_BUSY ) return 0;
  712.   return 1;
  713. }