/ Hex Artifact Content
Login

Artifact 57359fa93de47c341b6b8ee504a88ff276397686:


0000: 2f 2a 0a 2a 2a 20 32 30 30 35 20 4d 61 79 20 32  /*.** 2005 May 2
0010: 33 20 0a 2a 2a 0a 2a 2a 20 54 68 65 20 61 75 74  3 .**.** The aut
0020: 68 6f 72 20 64 69 73 63 6c 61 69 6d 73 20 63 6f  hor disclaims co
0030: 70 79 72 69 67 68 74 20 74 6f 20 74 68 69 73 20  pyright to this 
0040: 73 6f 75 72 63 65 20 63 6f 64 65 2e 20 20 49 6e  source code.  In
0050: 20 70 6c 61 63 65 20 6f 66 0a 2a 2a 20 61 20 6c   place of.** a l
0060: 65 67 61 6c 20 6e 6f 74 69 63 65 2c 20 68 65 72  egal notice, her
0070: 65 20 69 73 20 61 20 62 6c 65 73 73 69 6e 67 3a  e is a blessing:
0080: 0a 2a 2a 0a 2a 2a 20 20 20 20 4d 61 79 20 79 6f  .**.**    May yo
0090: 75 20 64 6f 20 67 6f 6f 64 20 61 6e 64 20 6e 6f  u do good and no
00a0: 74 20 65 76 69 6c 2e 0a 2a 2a 20 20 20 20 4d 61  t evil..**    Ma
00b0: 79 20 79 6f 75 20 66 69 6e 64 20 66 6f 72 67 69  y you find forgi
00c0: 76 65 6e 65 73 73 20 66 6f 72 20 79 6f 75 72 73  veness for yours
00d0: 65 6c 66 20 61 6e 64 20 66 6f 72 67 69 76 65 20  elf and forgive 
00e0: 6f 74 68 65 72 73 2e 0a 2a 2a 20 20 20 20 4d 61  others..**    Ma
00f0: 79 20 79 6f 75 20 73 68 61 72 65 20 66 72 65 65  y you share free
0100: 6c 79 2c 20 6e 65 76 65 72 20 74 61 6b 69 6e 67  ly, never taking
0110: 20 6d 6f 72 65 20 74 68 61 6e 20 79 6f 75 20 67   more than you g
0120: 69 76 65 2e 0a 2a 2a 0a 2a 2a 2a 2a 2a 2a 2a 2a  ive..**.********
0130: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0140: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0150: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0160: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0170: 2a 0a 2a 2a 0a 2a 2a 20 54 68 69 73 20 66 69 6c  *.**.** This fil
0180: 65 20 63 6f 6e 74 61 69 6e 73 20 66 75 6e 63 74  e contains funct
0190: 69 6f 6e 73 20 75 73 65 64 20 74 6f 20 61 63 63  ions used to acc
01a0: 65 73 73 20 74 68 65 20 69 6e 74 65 72 6e 61 6c  ess the internal
01b0: 20 68 61 73 68 20 74 61 62 6c 65 73 0a 2a 2a 20   hash tables.** 
01c0: 6f 66 20 75 73 65 72 20 64 65 66 69 6e 65 64 20  of user defined 
01d0: 66 75 6e 63 74 69 6f 6e 73 20 61 6e 64 20 63 6f  functions and co
01e0: 6c 6c 61 74 69 6f 6e 20 73 65 71 75 65 6e 63 65  llation sequence
01f0: 73 2e 0a 2a 2a 0a 2a 2a 20 24 49 64 3a 20 63 61  s..**.** $Id: ca
0200: 6c 6c 62 61 63 6b 2e 63 2c 76 20 31 2e 34 31 20  llback.c,v 1.41 
0210: 32 30 30 39 2f 30 35 2f 32 30 20 30 32 3a 34 30  2009/05/20 02:40
0220: 3a 34 36 20 64 72 68 20 45 78 70 20 24 0a 2a 2f  :46 drh Exp $.*/
0230: 0a 0a 23 69 6e 63 6c 75 64 65 20 22 73 71 6c 69  ..#include "sqli
0240: 74 65 49 6e 74 2e 68 22 0a 0a 2f 2a 0a 2a 2a 20  teInt.h"../*.** 
0250: 49 6e 76 6f 6b 65 20 74 68 65 20 27 63 6f 6c 6c  Invoke the 'coll
0260: 61 74 69 6f 6e 20 6e 65 65 64 65 64 27 20 63 61  ation needed' ca
0270: 6c 6c 62 61 63 6b 20 74 6f 20 72 65 71 75 65 73  llback to reques
0280: 74 20 61 20 63 6f 6c 6c 61 74 69 6f 6e 20 73 65  t a collation se
0290: 71 75 65 6e 63 65 0a 2a 2a 20 69 6e 20 74 68 65  quence.** in the
02a0: 20 64 61 74 61 62 61 73 65 20 74 65 78 74 20 65   database text e
02b0: 6e 63 6f 64 69 6e 67 20 6f 66 20 6e 61 6d 65 20  ncoding of name 
02c0: 7a 4e 61 6d 65 2c 20 6c 65 6e 67 74 68 20 6e 4e  zName, length nN
02d0: 61 6d 65 2e 0a 2a 2a 20 49 66 20 74 68 65 20 63  ame..** If the c
02e0: 6f 6c 6c 61 74 69 6f 6e 20 73 65 71 75 65 6e 63  ollation sequenc
02f0: 65 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64  e.*/.static void
0300: 20 63 61 6c 6c 43 6f 6c 6c 4e 65 65 64 65 64 28   callCollNeeded(
0310: 73 71 6c 69 74 65 33 20 2a 64 62 2c 20 63 6f 6e  sqlite3 *db, con
0320: 73 74 20 63 68 61 72 20 2a 7a 4e 61 6d 65 29 7b  st char *zName){
0330: 0a 20 20 61 73 73 65 72 74 28 20 21 64 62 2d 3e  .  assert( !db->
0340: 78 43 6f 6c 6c 4e 65 65 64 65 64 20 7c 7c 20 21  xCollNeeded || !
0350: 64 62 2d 3e 78 43 6f 6c 6c 4e 65 65 64 65 64 31  db->xCollNeeded1
0360: 36 20 29 3b 0a 20 20 69 66 28 20 64 62 2d 3e 78  6 );.  if( db->x
0370: 43 6f 6c 6c 4e 65 65 64 65 64 20 29 7b 0a 20 20  CollNeeded ){.  
0380: 20 20 63 68 61 72 20 2a 7a 45 78 74 65 72 6e 61    char *zExterna
0390: 6c 20 3d 20 73 71 6c 69 74 65 33 44 62 53 74 72  l = sqlite3DbStr
03a0: 44 75 70 28 64 62 2c 20 7a 4e 61 6d 65 29 3b 0a  Dup(db, zName);.
03b0: 20 20 20 20 69 66 28 20 21 7a 45 78 74 65 72 6e      if( !zExtern
03c0: 61 6c 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 20  al ) return;.   
03d0: 20 64 62 2d 3e 78 43 6f 6c 6c 4e 65 65 64 65 64   db->xCollNeeded
03e0: 28 64 62 2d 3e 70 43 6f 6c 6c 4e 65 65 64 65 64  (db->pCollNeeded
03f0: 41 72 67 2c 20 64 62 2c 20 28 69 6e 74 29 45 4e  Arg, db, (int)EN
0400: 43 28 64 62 29 2c 20 7a 45 78 74 65 72 6e 61 6c  C(db), zExternal
0410: 29 3b 0a 20 20 20 20 73 71 6c 69 74 65 33 44 62  );.    sqlite3Db
0420: 46 72 65 65 28 64 62 2c 20 7a 45 78 74 65 72 6e  Free(db, zExtern
0430: 61 6c 29 3b 0a 20 20 7d 0a 23 69 66 6e 64 65 66  al);.  }.#ifndef
0440: 20 53 51 4c 49 54 45 5f 4f 4d 49 54 5f 55 54 46   SQLITE_OMIT_UTF
0450: 31 36 0a 20 20 69 66 28 20 64 62 2d 3e 78 43 6f  16.  if( db->xCo
0460: 6c 6c 4e 65 65 64 65 64 31 36 20 29 7b 0a 20 20  llNeeded16 ){.  
0470: 20 20 63 68 61 72 20 63 6f 6e 73 74 20 2a 7a 45    char const *zE
0480: 78 74 65 72 6e 61 6c 3b 0a 20 20 20 20 73 71 6c  xternal;.    sql
0490: 69 74 65 33 5f 76 61 6c 75 65 20 2a 70 54 6d 70  ite3_value *pTmp
04a0: 20 3d 20 73 71 6c 69 74 65 33 56 61 6c 75 65 4e   = sqlite3ValueN
04b0: 65 77 28 64 62 29 3b 0a 20 20 20 20 73 71 6c 69  ew(db);.    sqli
04c0: 74 65 33 56 61 6c 75 65 53 65 74 53 74 72 28 70  te3ValueSetStr(p
04d0: 54 6d 70 2c 20 2d 31 2c 20 7a 4e 61 6d 65 2c 20  Tmp, -1, zName, 
04e0: 53 51 4c 49 54 45 5f 55 54 46 38 2c 20 53 51 4c  SQLITE_UTF8, SQL
04f0: 49 54 45 5f 53 54 41 54 49 43 29 3b 0a 20 20 20  ITE_STATIC);.   
0500: 20 7a 45 78 74 65 72 6e 61 6c 20 3d 20 73 71 6c   zExternal = sql
0510: 69 74 65 33 56 61 6c 75 65 54 65 78 74 28 70 54  ite3ValueText(pT
0520: 6d 70 2c 20 53 51 4c 49 54 45 5f 55 54 46 31 36  mp, SQLITE_UTF16
0530: 4e 41 54 49 56 45 29 3b 0a 20 20 20 20 69 66 28  NATIVE);.    if(
0540: 20 7a 45 78 74 65 72 6e 61 6c 20 29 7b 0a 20 20   zExternal ){.  
0550: 20 20 20 20 64 62 2d 3e 78 43 6f 6c 6c 4e 65 65      db->xCollNee
0560: 64 65 64 31 36 28 64 62 2d 3e 70 43 6f 6c 6c 4e  ded16(db->pCollN
0570: 65 65 64 65 64 41 72 67 2c 20 64 62 2c 20 28 69  eededArg, db, (i
0580: 6e 74 29 45 4e 43 28 64 62 29 2c 20 7a 45 78 74  nt)ENC(db), zExt
0590: 65 72 6e 61 6c 29 3b 0a 20 20 20 20 7d 0a 20 20  ernal);.    }.  
05a0: 20 20 73 71 6c 69 74 65 33 56 61 6c 75 65 46 72    sqlite3ValueFr
05b0: 65 65 28 70 54 6d 70 29 3b 0a 20 20 7d 0a 23 65  ee(pTmp);.  }.#e
05c0: 6e 64 69 66 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68  ndif.}../*.** Th
05d0: 69 73 20 72 6f 75 74 69 6e 65 20 69 73 20 63 61  is routine is ca
05e0: 6c 6c 65 64 20 69 66 20 74 68 65 20 63 6f 6c 6c  lled if the coll
05f0: 61 74 69 6f 6e 20 66 61 63 74 6f 72 79 20 66 61  ation factory fa
0600: 69 6c 73 20 74 6f 20 64 65 6c 69 76 65 72 20 61  ils to deliver a
0610: 0a 2a 2a 20 63 6f 6c 6c 61 74 69 6f 6e 20 66 75  .** collation fu
0620: 6e 63 74 69 6f 6e 20 69 6e 20 74 68 65 20 62 65  nction in the be
0630: 73 74 20 65 6e 63 6f 64 69 6e 67 20 62 75 74 20  st encoding but 
0640: 74 68 65 72 65 20 6d 61 79 20 62 65 20 6f 74 68  there may be oth
0650: 65 72 20 76 65 72 73 69 6f 6e 73 0a 2a 2a 20 6f  er versions.** o
0660: 66 20 74 68 69 73 20 63 6f 6c 6c 61 74 69 6f 6e  f this collation
0670: 20 66 75 6e 63 74 69 6f 6e 20 28 66 6f 72 20 6f   function (for o
0680: 74 68 65 72 20 74 65 78 74 20 65 6e 63 6f 64 69  ther text encodi
0690: 6e 67 73 29 20 61 76 61 69 6c 61 62 6c 65 2e 20  ngs) available. 
06a0: 55 73 65 20 6f 6e 65 0a 2a 2a 20 6f 66 20 74 68  Use one.** of th
06b0: 65 73 65 20 69 6e 73 74 65 61 64 20 69 66 20 74  ese instead if t
06c0: 68 65 79 20 65 78 69 73 74 2e 20 41 76 6f 69 64  hey exist. Avoid
06d0: 20 61 20 55 54 46 2d 38 20 3c 2d 3e 20 55 54 46   a UTF-8 <-> UTF
06e0: 2d 31 36 20 63 6f 6e 76 65 72 73 69 6f 6e 20 69  -16 conversion i
06f0: 66 0a 2a 2a 20 70 6f 73 73 69 62 6c 65 2e 0a 2a  f.** possible..*
0700: 2f 0a 73 74 61 74 69 63 20 69 6e 74 20 73 79 6e  /.static int syn
0710: 74 68 43 6f 6c 6c 53 65 71 28 73 71 6c 69 74 65  thCollSeq(sqlite
0720: 33 20 2a 64 62 2c 20 43 6f 6c 6c 53 65 71 20 2a  3 *db, CollSeq *
0730: 70 43 6f 6c 6c 29 7b 0a 20 20 43 6f 6c 6c 53 65  pColl){.  CollSe
0740: 71 20 2a 70 43 6f 6c 6c 32 3b 0a 20 20 63 68 61  q *pColl2;.  cha
0750: 72 20 2a 7a 20 3d 20 70 43 6f 6c 6c 2d 3e 7a 4e  r *z = pColl->zN
0760: 61 6d 65 3b 0a 20 20 69 6e 74 20 69 3b 0a 20 20  ame;.  int i;.  
0770: 73 74 61 74 69 63 20 63 6f 6e 73 74 20 75 38 20  static const u8 
0780: 61 45 6e 63 5b 5d 20 3d 20 7b 20 53 51 4c 49 54  aEnc[] = { SQLIT
0790: 45 5f 55 54 46 31 36 42 45 2c 20 53 51 4c 49 54  E_UTF16BE, SQLIT
07a0: 45 5f 55 54 46 31 36 4c 45 2c 20 53 51 4c 49 54  E_UTF16LE, SQLIT
07b0: 45 5f 55 54 46 38 20 7d 3b 0a 20 20 66 6f 72 28  E_UTF8 };.  for(
07c0: 69 3d 30 3b 20 69 3c 33 3b 20 69 2b 2b 29 7b 0a  i=0; i<3; i++){.
07d0: 20 20 20 20 70 43 6f 6c 6c 32 20 3d 20 73 71 6c      pColl2 = sql
07e0: 69 74 65 33 46 69 6e 64 43 6f 6c 6c 53 65 71 28  ite3FindCollSeq(
07f0: 64 62 2c 20 61 45 6e 63 5b 69 5d 2c 20 7a 2c 20  db, aEnc[i], z, 
0800: 30 29 3b 0a 20 20 20 20 69 66 28 20 70 43 6f 6c  0);.    if( pCol
0810: 6c 32 2d 3e 78 43 6d 70 21 3d 30 20 29 7b 0a 20  l2->xCmp!=0 ){. 
0820: 20 20 20 20 20 6d 65 6d 63 70 79 28 70 43 6f 6c       memcpy(pCol
0830: 6c 2c 20 70 43 6f 6c 6c 32 2c 20 73 69 7a 65 6f  l, pColl2, sizeo
0840: 66 28 43 6f 6c 6c 53 65 71 29 29 3b 0a 20 20 20  f(CollSeq));.   
0850: 20 20 20 70 43 6f 6c 6c 2d 3e 78 44 65 6c 20 3d     pColl->xDel =
0860: 20 30 3b 20 20 20 20 20 20 20 20 20 2f 2a 20 44   0;         /* D
0870: 6f 20 6e 6f 74 20 63 6f 70 79 20 74 68 65 20 64  o not copy the d
0880: 65 73 74 72 75 63 74 6f 72 20 2a 2f 0a 20 20 20  estructor */.   
0890: 20 20 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45     return SQLITE
08a0: 5f 4f 4b 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 20  _OK;.    }.  }. 
08b0: 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 45   return SQLITE_E
08c0: 52 52 4f 52 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54  RROR;.}../*.** T
08d0: 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 69 73 20  his function is 
08e0: 72 65 73 70 6f 6e 73 69 62 6c 65 20 66 6f 72 20  responsible for 
08f0: 69 6e 76 6f 6b 69 6e 67 20 74 68 65 20 63 6f 6c  invoking the col
0900: 6c 61 74 69 6f 6e 20 66 61 63 74 6f 72 79 20 63  lation factory c
0910: 61 6c 6c 62 61 63 6b 0a 2a 2a 20 6f 72 20 73 75  allback.** or su
0920: 62 73 74 69 74 75 74 69 6e 67 20 61 20 63 6f 6c  bstituting a col
0930: 6c 61 74 69 6f 6e 20 73 65 71 75 65 6e 63 65 20  lation sequence 
0940: 6f 66 20 61 20 64 69 66 66 65 72 65 6e 74 20 65  of a different e
0950: 6e 63 6f 64 69 6e 67 20 77 68 65 6e 20 74 68 65  ncoding when the
0960: 0a 2a 2a 20 72 65 71 75 65 73 74 65 64 20 63 6f  .** requested co
0970: 6c 6c 61 74 69 6f 6e 20 73 65 71 75 65 6e 63 65  llation sequence
0980: 20 69 73 20 6e 6f 74 20 61 76 61 69 6c 61 62 6c   is not availabl
0990: 65 20 69 6e 20 74 68 65 20 64 61 74 61 62 61 73  e in the databas
09a0: 65 20 6e 61 74 69 76 65 0a 2a 2a 20 65 6e 63 6f  e native.** enco
09b0: 64 69 6e 67 2e 0a 2a 2a 20 0a 2a 2a 20 49 66 20  ding..** .** If 
09c0: 69 74 20 69 73 20 6e 6f 74 20 4e 55 4c 4c 2c 20  it is not NULL, 
09d0: 74 68 65 6e 20 70 43 6f 6c 6c 20 6d 75 73 74 20  then pColl must 
09e0: 70 6f 69 6e 74 20 74 6f 20 74 68 65 20 64 61 74  point to the dat
09f0: 61 62 61 73 65 20 6e 61 74 69 76 65 20 65 6e 63  abase native enc
0a00: 6f 64 69 6e 67 20 0a 2a 2a 20 63 6f 6c 6c 61 74  oding .** collat
0a10: 69 6f 6e 20 73 65 71 75 65 6e 63 65 20 77 69 74  ion sequence wit
0a20: 68 20 6e 61 6d 65 20 7a 4e 61 6d 65 2c 20 6c 65  h name zName, le
0a30: 6e 67 74 68 20 6e 4e 61 6d 65 2e 0a 2a 2a 0a 2a  ngth nName..**.*
0a40: 2a 20 54 68 65 20 72 65 74 75 72 6e 20 76 61 6c  * The return val
0a50: 75 65 20 69 73 20 65 69 74 68 65 72 20 74 68 65  ue is either the
0a60: 20 63 6f 6c 6c 61 74 69 6f 6e 20 73 65 71 75 65   collation seque
0a70: 6e 63 65 20 74 6f 20 62 65 20 75 73 65 64 20 69  nce to be used i
0a80: 6e 20 64 61 74 61 62 61 73 65 0a 2a 2a 20 64 62  n database.** db
0a90: 20 66 6f 72 20 63 6f 6c 6c 61 74 69 6f 6e 20 74   for collation t
0aa0: 79 70 65 20 6e 61 6d 65 20 7a 4e 61 6d 65 2c 20  ype name zName, 
0ab0: 6c 65 6e 67 74 68 20 6e 4e 61 6d 65 2c 20 6f 72  length nName, or
0ac0: 20 4e 55 4c 4c 2c 20 69 66 20 6e 6f 20 63 6f 6c   NULL, if no col
0ad0: 6c 61 74 69 6f 6e 0a 2a 2a 20 73 65 71 75 65 6e  lation.** sequen
0ae0: 63 65 20 63 61 6e 20 62 65 20 66 6f 75 6e 64 2e  ce can be found.
0af0: 0a 2a 2a 0a 2a 2a 20 53 65 65 20 61 6c 73 6f 3a  .**.** See also:
0b00: 20 73 71 6c 69 74 65 33 4c 6f 63 61 74 65 43 6f   sqlite3LocateCo
0b10: 6c 6c 53 65 71 28 29 2c 20 73 71 6c 69 74 65 33  llSeq(), sqlite3
0b20: 46 69 6e 64 43 6f 6c 6c 53 65 71 28 29 0a 2a 2f  FindCollSeq().*/
0b30: 0a 43 6f 6c 6c 53 65 71 20 2a 73 71 6c 69 74 65  .CollSeq *sqlite
0b40: 33 47 65 74 43 6f 6c 6c 53 65 71 28 0a 20 20 73  3GetCollSeq(.  s
0b50: 71 6c 69 74 65 33 2a 20 64 62 2c 20 20 20 20 20  qlite3* db,     
0b60: 20 20 20 20 20 2f 2a 20 54 68 65 20 64 61 74 61       /* The data
0b70: 62 61 73 65 20 63 6f 6e 6e 65 63 74 69 6f 6e 20  base connection 
0b80: 2a 2f 0a 20 20 43 6f 6c 6c 53 65 71 20 2a 70 43  */.  CollSeq *pC
0b90: 6f 6c 6c 2c 20 20 20 20 20 20 20 2f 2a 20 43 6f  oll,       /* Co
0ba0: 6c 6c 61 74 69 6e 67 20 73 65 71 75 65 6e 63 65  llating sequence
0bb0: 20 77 69 74 68 20 6e 61 74 69 76 65 20 65 6e 63   with native enc
0bc0: 6f 64 69 6e 67 2c 20 6f 72 20 4e 55 4c 4c 20 2a  oding, or NULL *
0bd0: 2f 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a  /.  const char *
0be0: 7a 4e 61 6d 65 20 20 20 20 20 2f 2a 20 43 6f 6c  zName     /* Col
0bf0: 6c 61 74 69 6e 67 20 73 65 71 75 65 6e 63 65 20  lating sequence 
0c00: 6e 61 6d 65 20 2a 2f 0a 29 7b 0a 20 20 43 6f 6c  name */.){.  Col
0c10: 6c 53 65 71 20 2a 70 3b 0a 0a 20 20 70 20 3d 20  lSeq *p;..  p = 
0c20: 70 43 6f 6c 6c 3b 0a 20 20 69 66 28 20 21 70 20  pColl;.  if( !p 
0c30: 29 7b 0a 20 20 20 20 70 20 3d 20 73 71 6c 69 74  ){.    p = sqlit
0c40: 65 33 46 69 6e 64 43 6f 6c 6c 53 65 71 28 64 62  e3FindCollSeq(db
0c50: 2c 20 45 4e 43 28 64 62 29 2c 20 7a 4e 61 6d 65  , ENC(db), zName
0c60: 2c 20 30 29 3b 0a 20 20 7d 0a 20 20 69 66 28 20  , 0);.  }.  if( 
0c70: 21 70 20 7c 7c 20 21 70 2d 3e 78 43 6d 70 20 29  !p || !p->xCmp )
0c80: 7b 0a 20 20 20 20 2f 2a 20 4e 6f 20 63 6f 6c 6c  {.    /* No coll
0c90: 61 74 69 6f 6e 20 73 65 71 75 65 6e 63 65 20 6f  ation sequence o
0ca0: 66 20 74 68 69 73 20 74 79 70 65 20 66 6f 72 20  f this type for 
0cb0: 74 68 69 73 20 65 6e 63 6f 64 69 6e 67 20 69 73  this encoding is
0cc0: 20 72 65 67 69 73 74 65 72 65 64 2e 0a 20 20 20   registered..   
0cd0: 20 2a 2a 20 43 61 6c 6c 20 74 68 65 20 63 6f 6c   ** Call the col
0ce0: 6c 61 74 69 6f 6e 20 66 61 63 74 6f 72 79 20 74  lation factory t
0cf0: 6f 20 73 65 65 20 69 66 20 69 74 20 63 61 6e 20  o see if it can 
0d00: 73 75 70 70 6c 79 20 75 73 20 77 69 74 68 20 6f  supply us with o
0d10: 6e 65 2e 0a 20 20 20 20 2a 2f 0a 20 20 20 20 63  ne..    */.    c
0d20: 61 6c 6c 43 6f 6c 6c 4e 65 65 64 65 64 28 64 62  allCollNeeded(db
0d30: 2c 20 7a 4e 61 6d 65 29 3b 0a 20 20 20 20 70 20  , zName);.    p 
0d40: 3d 20 73 71 6c 69 74 65 33 46 69 6e 64 43 6f 6c  = sqlite3FindCol
0d50: 6c 53 65 71 28 64 62 2c 20 45 4e 43 28 64 62 29  lSeq(db, ENC(db)
0d60: 2c 20 7a 4e 61 6d 65 2c 20 30 29 3b 0a 20 20 7d  , zName, 0);.  }
0d70: 0a 20 20 69 66 28 20 70 20 26 26 20 21 70 2d 3e  .  if( p && !p->
0d80: 78 43 6d 70 20 26 26 20 73 79 6e 74 68 43 6f 6c  xCmp && synthCol
0d90: 6c 53 65 71 28 64 62 2c 20 70 29 20 29 7b 0a 20  lSeq(db, p) ){. 
0da0: 20 20 20 70 20 3d 20 30 3b 0a 20 20 7d 0a 20 20     p = 0;.  }.  
0db0: 61 73 73 65 72 74 28 20 21 70 20 7c 7c 20 70 2d  assert( !p || p-
0dc0: 3e 78 43 6d 70 20 29 3b 0a 20 20 72 65 74 75 72  >xCmp );.  retur
0dd0: 6e 20 70 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68  n p;.}../*.** Th
0de0: 69 73 20 72 6f 75 74 69 6e 65 20 69 73 20 63 61  is routine is ca
0df0: 6c 6c 65 64 20 6f 6e 20 61 20 63 6f 6c 6c 61 74  lled on a collat
0e00: 69 6f 6e 20 73 65 71 75 65 6e 63 65 20 62 65 66  ion sequence bef
0e10: 6f 72 65 20 69 74 20 69 73 20 75 73 65 64 20 74  ore it is used t
0e20: 6f 0a 2a 2a 20 63 68 65 63 6b 20 74 68 61 74 20  o.** check that 
0e30: 69 74 20 69 73 20 64 65 66 69 6e 65 64 2e 20 41  it is defined. A
0e40: 6e 20 75 6e 64 65 66 69 6e 65 64 20 63 6f 6c 6c  n undefined coll
0e50: 61 74 69 6f 6e 20 73 65 71 75 65 6e 63 65 20 65  ation sequence e
0e60: 78 69 73 74 73 20 77 68 65 6e 0a 2a 2a 20 61 20  xists when.** a 
0e70: 64 61 74 61 62 61 73 65 20 69 73 20 6c 6f 61 64  database is load
0e80: 65 64 20 74 68 61 74 20 63 6f 6e 74 61 69 6e 73  ed that contains
0e90: 20 72 65 66 65 72 65 6e 63 65 73 20 74 6f 20 63   references to c
0ea0: 6f 6c 6c 61 74 69 6f 6e 20 73 65 71 75 65 6e 63  ollation sequenc
0eb0: 65 73 0a 2a 2a 20 74 68 61 74 20 68 61 76 65 20  es.** that have 
0ec0: 6e 6f 74 20 62 65 65 6e 20 64 65 66 69 6e 65 64  not been defined
0ed0: 20 62 79 20 73 71 6c 69 74 65 33 5f 63 72 65 61   by sqlite3_crea
0ee0: 74 65 5f 63 6f 6c 6c 61 74 69 6f 6e 28 29 20 65  te_collation() e
0ef0: 74 63 2e 0a 2a 2a 0a 2a 2a 20 49 66 20 72 65 71  tc..**.** If req
0f00: 75 69 72 65 64 2c 20 74 68 69 73 20 72 6f 75 74  uired, this rout
0f10: 69 6e 65 20 63 61 6c 6c 73 20 74 68 65 20 27 63  ine calls the 'c
0f20: 6f 6c 6c 61 74 69 6f 6e 20 6e 65 65 64 65 64 27  ollation needed'
0f30: 20 63 61 6c 6c 62 61 63 6b 20 74 6f 0a 2a 2a 20   callback to.** 
0f40: 72 65 71 75 65 73 74 20 61 20 64 65 66 69 6e 69  request a defini
0f50: 74 69 6f 6e 20 6f 66 20 74 68 65 20 63 6f 6c 6c  tion of the coll
0f60: 61 74 69 6e 67 20 73 65 71 75 65 6e 63 65 2e 20  ating sequence. 
0f70: 49 66 20 74 68 69 73 20 64 6f 65 73 6e 27 74 20  If this doesn't 
0f80: 77 6f 72 6b 2c 20 0a 2a 2a 20 61 6e 20 65 71 75  work, .** an equ
0f90: 69 76 61 6c 65 6e 74 20 63 6f 6c 6c 61 74 69 6e  ivalent collatin
0fa0: 67 20 73 65 71 75 65 6e 63 65 20 74 68 61 74 20  g sequence that 
0fb0: 75 73 65 73 20 61 20 74 65 78 74 20 65 6e 63 6f  uses a text enco
0fc0: 64 69 6e 67 20 64 69 66 66 65 72 65 6e 74 0a 2a  ding different.*
0fd0: 2a 20 66 72 6f 6d 20 74 68 65 20 6d 61 69 6e 20  * from the main 
0fe0: 64 61 74 61 62 61 73 65 20 69 73 20 73 75 62 73  database is subs
0ff0: 74 69 74 75 74 65 64 2c 20 69 66 20 6f 6e 65 20  tituted, if one 
1000: 69 73 20 61 76 61 69 6c 61 62 6c 65 2e 0a 2a 2f  is available..*/
1010: 0a 69 6e 74 20 73 71 6c 69 74 65 33 43 68 65 63  .int sqlite3Chec
1020: 6b 43 6f 6c 6c 53 65 71 28 50 61 72 73 65 20 2a  kCollSeq(Parse *
1030: 70 50 61 72 73 65 2c 20 43 6f 6c 6c 53 65 71 20  pParse, CollSeq 
1040: 2a 70 43 6f 6c 6c 29 7b 0a 20 20 69 66 28 20 70  *pColl){.  if( p
1050: 43 6f 6c 6c 20 29 7b 0a 20 20 20 20 63 6f 6e 73  Coll ){.    cons
1060: 74 20 63 68 61 72 20 2a 7a 4e 61 6d 65 20 3d 20  t char *zName = 
1070: 70 43 6f 6c 6c 2d 3e 7a 4e 61 6d 65 3b 0a 20 20  pColl->zName;.  
1080: 20 20 43 6f 6c 6c 53 65 71 20 2a 70 20 3d 20 73    CollSeq *p = s
1090: 71 6c 69 74 65 33 47 65 74 43 6f 6c 6c 53 65 71  qlite3GetCollSeq
10a0: 28 70 50 61 72 73 65 2d 3e 64 62 2c 20 70 43 6f  (pParse->db, pCo
10b0: 6c 6c 2c 20 7a 4e 61 6d 65 29 3b 0a 20 20 20 20  ll, zName);.    
10c0: 69 66 28 20 21 70 20 29 7b 0a 20 20 20 20 20 20  if( !p ){.      
10d0: 69 66 28 20 70 50 61 72 73 65 2d 3e 6e 45 72 72  if( pParse->nErr
10e0: 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 20 20 73  ==0 ){.        s
10f0: 71 6c 69 74 65 33 45 72 72 6f 72 4d 73 67 28 70  qlite3ErrorMsg(p
1100: 50 61 72 73 65 2c 20 22 6e 6f 20 73 75 63 68 20  Parse, "no such 
1110: 63 6f 6c 6c 61 74 69 6f 6e 20 73 65 71 75 65 6e  collation sequen
1120: 63 65 3a 20 25 73 22 2c 20 7a 4e 61 6d 65 29 3b  ce: %s", zName);
1130: 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 70  .      }.      p
1140: 50 61 72 73 65 2d 3e 6e 45 72 72 2b 2b 3b 0a 20  Parse->nErr++;. 
1150: 20 20 20 20 20 72 65 74 75 72 6e 20 53 51 4c 49       return SQLI
1160: 54 45 5f 45 52 52 4f 52 3b 0a 20 20 20 20 7d 0a  TE_ERROR;.    }.
1170: 20 20 20 20 61 73 73 65 72 74 28 20 70 3d 3d 70      assert( p==p
1180: 43 6f 6c 6c 20 29 3b 0a 20 20 7d 0a 20 20 72 65  Coll );.  }.  re
1190: 74 75 72 6e 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a  turn SQLITE_OK;.
11a0: 7d 0a 0a 0a 0a 2f 2a 0a 2a 2a 20 4c 6f 63 61 74  }..../*.** Locat
11b0: 65 20 61 6e 64 20 72 65 74 75 72 6e 20 61 6e 20  e and return an 
11c0: 65 6e 74 72 79 20 66 72 6f 6d 20 74 68 65 20 64  entry from the d
11d0: 62 2e 61 43 6f 6c 6c 53 65 71 20 68 61 73 68 20  b.aCollSeq hash 
11e0: 74 61 62 6c 65 2e 20 49 66 20 74 68 65 20 65 6e  table. If the en
11f0: 74 72 79 0a 2a 2a 20 73 70 65 63 69 66 69 65 64  try.** specified
1200: 20 62 79 20 7a 4e 61 6d 65 20 61 6e 64 20 6e 4e   by zName and nN
1210: 61 6d 65 20 69 73 20 6e 6f 74 20 66 6f 75 6e 64  ame is not found
1220: 20 61 6e 64 20 70 61 72 61 6d 65 74 65 72 20 27   and parameter '
1230: 63 72 65 61 74 65 27 20 69 73 0a 2a 2a 20 74 72  create' is.** tr
1240: 75 65 2c 20 74 68 65 6e 20 63 72 65 61 74 65 20  ue, then create 
1250: 61 20 6e 65 77 20 65 6e 74 72 79 2e 20 4f 74 68  a new entry. Oth
1260: 65 72 77 69 73 65 20 72 65 74 75 72 6e 20 4e 55  erwise return NU
1270: 4c 4c 2e 0a 2a 2a 0a 2a 2a 20 45 61 63 68 20 70  LL..**.** Each p
1280: 6f 69 6e 74 65 72 20 73 74 6f 72 65 64 20 69 6e  ointer stored in
1290: 20 74 68 65 20 73 71 6c 69 74 65 33 2e 61 43 6f   the sqlite3.aCo
12a0: 6c 6c 53 65 71 20 68 61 73 68 20 74 61 62 6c 65  llSeq hash table
12b0: 20 63 6f 6e 74 61 69 6e 73 20 61 6e 0a 2a 2a 20   contains an.** 
12c0: 61 72 72 61 79 20 6f 66 20 74 68 72 65 65 20 43  array of three C
12d0: 6f 6c 6c 53 65 71 20 73 74 72 75 63 74 75 72 65  ollSeq structure
12e0: 73 2e 20 54 68 65 20 66 69 72 73 74 20 69 73 20  s. The first is 
12f0: 74 68 65 20 63 6f 6c 6c 61 74 69 6f 6e 20 73 65  the collation se
1300: 71 75 65 6e 63 65 0a 2a 2a 20 70 72 65 66 66 65  quence.** preffe
1310: 72 72 65 64 20 66 6f 72 20 55 54 46 2d 38 2c 20  rred for UTF-8, 
1320: 74 68 65 20 73 65 63 6f 6e 64 20 55 54 46 2d 31  the second UTF-1
1330: 36 6c 65 2c 20 61 6e 64 20 74 68 65 20 74 68 69  6le, and the thi
1340: 72 64 20 55 54 46 2d 31 36 62 65 2e 0a 2a 2a 0a  rd UTF-16be..**.
1350: 2a 2a 20 53 74 6f 72 65 64 20 69 6d 6d 65 64 69  ** Stored immedi
1360: 61 74 65 6c 79 20 61 66 74 65 72 20 74 68 65 20  ately after the 
1370: 74 68 72 65 65 20 63 6f 6c 6c 61 74 69 6f 6e 20  three collation 
1380: 73 65 71 75 65 6e 63 65 73 20 69 73 20 61 20 63  sequences is a c
1390: 6f 70 79 20 6f 66 0a 2a 2a 20 74 68 65 20 63 6f  opy of.** the co
13a0: 6c 6c 61 74 69 6f 6e 20 73 65 71 75 65 6e 63 65  llation sequence
13b0: 20 6e 61 6d 65 2e 20 41 20 70 6f 69 6e 74 65 72   name. A pointer
13c0: 20 74 6f 20 74 68 69 73 20 73 74 72 69 6e 67 20   to this string 
13d0: 69 73 20 73 74 6f 72 65 64 20 69 6e 0a 2a 2a 20  is stored in.** 
13e0: 65 61 63 68 20 63 6f 6c 6c 61 74 69 6f 6e 20 73  each collation s
13f0: 65 71 75 65 6e 63 65 20 73 74 72 75 63 74 75 72  equence structur
1400: 65 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 43 6f 6c  e..*/.static Col
1410: 6c 53 65 71 20 2a 66 69 6e 64 43 6f 6c 6c 53 65  lSeq *findCollSe
1420: 71 45 6e 74 72 79 28 0a 20 20 73 71 6c 69 74 65  qEntry(.  sqlite
1430: 33 20 2a 64 62 2c 20 20 20 20 20 20 20 20 20 20  3 *db,          
1440: 2f 2a 20 44 61 74 61 62 61 73 65 20 63 6f 6e 6e  /* Database conn
1450: 65 63 74 69 6f 6e 20 2a 2f 0a 20 20 63 6f 6e 73  ection */.  cons
1460: 74 20 63 68 61 72 20 2a 7a 4e 61 6d 65 2c 20 20  t char *zName,  
1470: 20 20 2f 2a 20 4e 61 6d 65 20 6f 66 20 74 68 65    /* Name of the
1480: 20 63 6f 6c 6c 61 74 69 6e 67 20 73 65 71 75 65   collating seque
1490: 6e 63 65 20 2a 2f 0a 20 20 69 6e 74 20 63 72 65  nce */.  int cre
14a0: 61 74 65 20 20 20 20 20 20 20 20 20 20 20 20 2f  ate            /
14b0: 2a 20 43 72 65 61 74 65 20 61 20 6e 65 77 20 65  * Create a new e
14c0: 6e 74 72 79 20 69 66 20 74 72 75 65 20 2a 2f 0a  ntry if true */.
14d0: 29 7b 0a 20 20 43 6f 6c 6c 53 65 71 20 2a 70 43  ){.  CollSeq *pC
14e0: 6f 6c 6c 3b 0a 20 20 69 6e 74 20 6e 4e 61 6d 65  oll;.  int nName
14f0: 20 3d 20 73 71 6c 69 74 65 33 53 74 72 6c 65 6e   = sqlite3Strlen
1500: 33 30 28 7a 4e 61 6d 65 29 3b 0a 20 20 70 43 6f  30(zName);.  pCo
1510: 6c 6c 20 3d 20 73 71 6c 69 74 65 33 48 61 73 68  ll = sqlite3Hash
1520: 46 69 6e 64 28 26 64 62 2d 3e 61 43 6f 6c 6c 53  Find(&db->aCollS
1530: 65 71 2c 20 7a 4e 61 6d 65 2c 20 6e 4e 61 6d 65  eq, zName, nName
1540: 29 3b 0a 0a 20 20 69 66 28 20 30 3d 3d 70 43 6f  );..  if( 0==pCo
1550: 6c 6c 20 26 26 20 63 72 65 61 74 65 20 29 7b 0a  ll && create ){.
1560: 20 20 20 20 70 43 6f 6c 6c 20 3d 20 73 71 6c 69      pColl = sqli
1570: 74 65 33 44 62 4d 61 6c 6c 6f 63 5a 65 72 6f 28  te3DbMallocZero(
1580: 64 62 2c 20 33 2a 73 69 7a 65 6f 66 28 2a 70 43  db, 3*sizeof(*pC
1590: 6f 6c 6c 29 20 2b 20 6e 4e 61 6d 65 20 2b 20 31  oll) + nName + 1
15a0: 20 29 3b 0a 20 20 20 20 69 66 28 20 70 43 6f 6c   );.    if( pCol
15b0: 6c 20 29 7b 0a 20 20 20 20 20 20 43 6f 6c 6c 53  l ){.      CollS
15c0: 65 71 20 2a 70 44 65 6c 20 3d 20 30 3b 0a 20 20  eq *pDel = 0;.  
15d0: 20 20 20 20 70 43 6f 6c 6c 5b 30 5d 2e 7a 4e 61      pColl[0].zNa
15e0: 6d 65 20 3d 20 28 63 68 61 72 2a 29 26 70 43 6f  me = (char*)&pCo
15f0: 6c 6c 5b 33 5d 3b 0a 20 20 20 20 20 20 70 43 6f  ll[3];.      pCo
1600: 6c 6c 5b 30 5d 2e 65 6e 63 20 3d 20 53 51 4c 49  ll[0].enc = SQLI
1610: 54 45 5f 55 54 46 38 3b 0a 20 20 20 20 20 20 70  TE_UTF8;.      p
1620: 43 6f 6c 6c 5b 31 5d 2e 7a 4e 61 6d 65 20 3d 20  Coll[1].zName = 
1630: 28 63 68 61 72 2a 29 26 70 43 6f 6c 6c 5b 33 5d  (char*)&pColl[3]
1640: 3b 0a 20 20 20 20 20 20 70 43 6f 6c 6c 5b 31 5d  ;.      pColl[1]
1650: 2e 65 6e 63 20 3d 20 53 51 4c 49 54 45 5f 55 54  .enc = SQLITE_UT
1660: 46 31 36 4c 45 3b 0a 20 20 20 20 20 20 70 43 6f  F16LE;.      pCo
1670: 6c 6c 5b 32 5d 2e 7a 4e 61 6d 65 20 3d 20 28 63  ll[2].zName = (c
1680: 68 61 72 2a 29 26 70 43 6f 6c 6c 5b 33 5d 3b 0a  har*)&pColl[3];.
1690: 20 20 20 20 20 20 70 43 6f 6c 6c 5b 32 5d 2e 65        pColl[2].e
16a0: 6e 63 20 3d 20 53 51 4c 49 54 45 5f 55 54 46 31  nc = SQLITE_UTF1
16b0: 36 42 45 3b 0a 20 20 20 20 20 20 6d 65 6d 63 70  6BE;.      memcp
16c0: 79 28 70 43 6f 6c 6c 5b 30 5d 2e 7a 4e 61 6d 65  y(pColl[0].zName
16d0: 2c 20 7a 4e 61 6d 65 2c 20 6e 4e 61 6d 65 29 3b  , zName, nName);
16e0: 0a 20 20 20 20 20 20 70 43 6f 6c 6c 5b 30 5d 2e  .      pColl[0].
16f0: 7a 4e 61 6d 65 5b 6e 4e 61 6d 65 5d 20 3d 20 30  zName[nName] = 0
1700: 3b 0a 20 20 20 20 20 20 70 44 65 6c 20 3d 20 73  ;.      pDel = s
1710: 71 6c 69 74 65 33 48 61 73 68 49 6e 73 65 72 74  qlite3HashInsert
1720: 28 26 64 62 2d 3e 61 43 6f 6c 6c 53 65 71 2c 20  (&db->aCollSeq, 
1730: 70 43 6f 6c 6c 5b 30 5d 2e 7a 4e 61 6d 65 2c 20  pColl[0].zName, 
1740: 6e 4e 61 6d 65 2c 20 70 43 6f 6c 6c 29 3b 0a 0a  nName, pColl);..
1750: 20 20 20 20 20 20 2f 2a 20 49 66 20 61 20 6d 61        /* If a ma
1760: 6c 6c 6f 63 28 29 20 66 61 69 6c 75 72 65 20 6f  lloc() failure o
1770: 63 63 75 72 72 65 64 20 69 6e 20 73 71 6c 69 74  ccurred in sqlit
1780: 65 33 48 61 73 68 49 6e 73 65 72 74 28 29 2c 20  e3HashInsert(), 
1790: 69 74 20 77 69 6c 6c 20 0a 20 20 20 20 20 20 2a  it will .      *
17a0: 2a 20 72 65 74 75 72 6e 20 74 68 65 20 70 43 6f  * return the pCo
17b0: 6c 6c 20 70 6f 69 6e 74 65 72 20 74 6f 20 62 65  ll pointer to be
17c0: 20 64 65 6c 65 74 65 64 20 28 62 65 63 61 75 73   deleted (becaus
17d0: 65 20 69 74 20 77 61 73 6e 27 74 20 61 64 64 65  e it wasn't adde
17e0: 64 0a 20 20 20 20 20 20 2a 2a 20 74 6f 20 74 68  d.      ** to th
17f0: 65 20 68 61 73 68 20 74 61 62 6c 65 29 2e 0a 20  e hash table).. 
1800: 20 20 20 20 20 2a 2f 0a 20 20 20 20 20 20 61 73       */.      as
1810: 73 65 72 74 28 20 70 44 65 6c 3d 3d 30 20 7c 7c  sert( pDel==0 ||
1820: 20 70 44 65 6c 3d 3d 70 43 6f 6c 6c 20 29 3b 0a   pDel==pColl );.
1830: 20 20 20 20 20 20 69 66 28 20 70 44 65 6c 21 3d        if( pDel!=
1840: 30 20 29 7b 0a 20 20 20 20 20 20 20 20 64 62 2d  0 ){.        db-
1850: 3e 6d 61 6c 6c 6f 63 46 61 69 6c 65 64 20 3d 20  >mallocFailed = 
1860: 31 3b 0a 20 20 20 20 20 20 20 20 73 71 6c 69 74  1;.        sqlit
1870: 65 33 44 62 46 72 65 65 28 64 62 2c 20 70 44 65  e3DbFree(db, pDe
1880: 6c 29 3b 0a 20 20 20 20 20 20 20 20 70 43 6f 6c  l);.        pCol
1890: 6c 20 3d 20 30 3b 0a 20 20 20 20 20 20 7d 0a 20  l = 0;.      }. 
18a0: 20 20 20 7d 0a 20 20 7d 0a 20 20 72 65 74 75 72     }.  }.  retur
18b0: 6e 20 70 43 6f 6c 6c 3b 0a 7d 0a 0a 2f 2a 0a 2a  n pColl;.}../*.*
18c0: 2a 20 50 61 72 61 6d 65 74 65 72 20 7a 4e 61 6d  * Parameter zNam
18d0: 65 20 70 6f 69 6e 74 73 20 74 6f 20 61 20 55 54  e points to a UT
18e0: 46 2d 38 20 65 6e 63 6f 64 65 64 20 73 74 72 69  F-8 encoded stri
18f0: 6e 67 20 6e 4e 61 6d 65 20 62 79 74 65 73 20 6c  ng nName bytes l
1900: 6f 6e 67 2e 0a 2a 2a 20 52 65 74 75 72 6e 20 74  ong..** Return t
1910: 68 65 20 43 6f 6c 6c 53 65 71 2a 20 70 6f 69 6e  he CollSeq* poin
1920: 74 65 72 20 66 6f 72 20 74 68 65 20 63 6f 6c 6c  ter for the coll
1930: 61 74 69 6f 6e 20 73 65 71 75 65 6e 63 65 20 6e  ation sequence n
1940: 61 6d 65 64 20 7a 4e 61 6d 65 0a 2a 2a 20 66 6f  amed zName.** fo
1950: 72 20 74 68 65 20 65 6e 63 6f 64 69 6e 67 20 27  r the encoding '
1960: 65 6e 63 27 20 66 72 6f 6d 20 74 68 65 20 64 61  enc' from the da
1970: 74 61 62 61 73 65 20 27 64 62 27 2e 0a 2a 2a 0a  tabase 'db'..**.
1980: 2a 2a 20 49 66 20 74 68 65 20 65 6e 74 72 79 20  ** If the entry 
1990: 73 70 65 63 69 66 69 65 64 20 69 73 20 6e 6f 74  specified is not
19a0: 20 66 6f 75 6e 64 20 61 6e 64 20 27 63 72 65 61   found and 'crea
19b0: 74 65 27 20 69 73 20 74 72 75 65 2c 20 74 68 65  te' is true, the
19c0: 6e 20 63 72 65 61 74 65 20 61 0a 2a 2a 20 6e 65  n create a.** ne
19d0: 77 20 65 6e 74 72 79 2e 20 20 4f 74 68 65 72 77  w entry.  Otherw
19e0: 69 73 65 20 72 65 74 75 72 6e 20 4e 55 4c 4c 2e  ise return NULL.
19f0: 0a 2a 2a 0a 2a 2a 20 41 20 73 65 70 61 72 61 74  .**.** A separat
1a00: 65 20 66 75 6e 63 74 69 6f 6e 20 73 71 6c 69 74  e function sqlit
1a10: 65 33 4c 6f 63 61 74 65 43 6f 6c 6c 53 65 71 28  e3LocateCollSeq(
1a20: 29 20 69 73 20 61 20 77 72 61 70 70 65 72 20 61  ) is a wrapper a
1a30: 72 6f 75 6e 64 0a 2a 2a 20 74 68 69 73 20 72 6f  round.** this ro
1a40: 75 74 69 6e 65 2e 20 20 73 71 6c 69 74 65 33 4c  utine.  sqlite3L
1a50: 6f 63 61 74 65 43 6f 6c 6c 53 65 71 28 29 20 69  ocateCollSeq() i
1a60: 6e 76 6f 6b 65 73 20 74 68 65 20 63 6f 6c 6c 61  nvokes the colla
1a70: 74 69 6f 6e 20 66 61 63 74 6f 72 79 0a 2a 2a 20  tion factory.** 
1a80: 69 66 20 6e 65 63 65 73 73 61 72 79 20 61 6e 64  if necessary and
1a90: 20 67 65 6e 65 72 61 74 65 73 20 61 6e 20 65 72   generates an er
1aa0: 72 6f 72 20 6d 65 73 73 61 67 65 20 69 66 20 74  ror message if t
1ab0: 68 65 20 63 6f 6c 6c 61 74 69 6e 67 20 73 65 71  he collating seq
1ac0: 75 65 6e 63 65 0a 2a 2a 20 63 61 6e 6e 6f 74 20  uence.** cannot 
1ad0: 62 65 20 66 6f 75 6e 64 2e 0a 2a 2a 0a 2a 2a 20  be found..**.** 
1ae0: 53 65 65 20 61 6c 73 6f 3a 20 73 71 6c 69 74 65  See also: sqlite
1af0: 33 4c 6f 63 61 74 65 43 6f 6c 6c 53 65 71 28 29  3LocateCollSeq()
1b00: 2c 20 73 71 6c 69 74 65 33 47 65 74 43 6f 6c 6c  , sqlite3GetColl
1b10: 53 65 71 28 29 0a 2a 2f 0a 43 6f 6c 6c 53 65 71  Seq().*/.CollSeq
1b20: 20 2a 73 71 6c 69 74 65 33 46 69 6e 64 43 6f 6c   *sqlite3FindCol
1b30: 6c 53 65 71 28 0a 20 20 73 71 6c 69 74 65 33 20  lSeq(.  sqlite3 
1b40: 2a 64 62 2c 0a 20 20 75 38 20 65 6e 63 2c 0a 20  *db,.  u8 enc,. 
1b50: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 4e 61   const char *zNa
1b60: 6d 65 2c 0a 20 20 69 6e 74 20 63 72 65 61 74 65  me,.  int create
1b70: 0a 29 7b 0a 20 20 43 6f 6c 6c 53 65 71 20 2a 70  .){.  CollSeq *p
1b80: 43 6f 6c 6c 3b 0a 20 20 69 66 28 20 7a 4e 61 6d  Coll;.  if( zNam
1b90: 65 20 29 7b 0a 20 20 20 20 70 43 6f 6c 6c 20 3d  e ){.    pColl =
1ba0: 20 66 69 6e 64 43 6f 6c 6c 53 65 71 45 6e 74 72   findCollSeqEntr
1bb0: 79 28 64 62 2c 20 7a 4e 61 6d 65 2c 20 63 72 65  y(db, zName, cre
1bc0: 61 74 65 29 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20  ate);.  }else{. 
1bd0: 20 20 20 70 43 6f 6c 6c 20 3d 20 64 62 2d 3e 70     pColl = db->p
1be0: 44 66 6c 74 43 6f 6c 6c 3b 0a 20 20 7d 0a 20 20  DfltColl;.  }.  
1bf0: 61 73 73 65 72 74 28 20 53 51 4c 49 54 45 5f 55  assert( SQLITE_U
1c00: 54 46 38 3d 3d 31 20 26 26 20 53 51 4c 49 54 45  TF8==1 && SQLITE
1c10: 5f 55 54 46 31 36 4c 45 3d 3d 32 20 26 26 20 53  _UTF16LE==2 && S
1c20: 51 4c 49 54 45 5f 55 54 46 31 36 42 45 3d 3d 33  QLITE_UTF16BE==3
1c30: 20 29 3b 0a 20 20 61 73 73 65 72 74 28 20 65 6e   );.  assert( en
1c40: 63 3e 3d 53 51 4c 49 54 45 5f 55 54 46 38 20 26  c>=SQLITE_UTF8 &
1c50: 26 20 65 6e 63 3c 3d 53 51 4c 49 54 45 5f 55 54  & enc<=SQLITE_UT
1c60: 46 31 36 42 45 20 29 3b 0a 20 20 69 66 28 20 70  F16BE );.  if( p
1c70: 43 6f 6c 6c 20 29 20 70 43 6f 6c 6c 20 2b 3d 20  Coll ) pColl += 
1c80: 65 6e 63 2d 31 3b 0a 20 20 72 65 74 75 72 6e 20  enc-1;.  return 
1c90: 70 43 6f 6c 6c 3b 0a 7d 0a 0a 2f 2a 20 44 75 72  pColl;.}../* Dur
1ca0: 69 6e 67 20 74 68 65 20 73 65 61 72 63 68 20 66  ing the search f
1cb0: 6f 72 20 74 68 65 20 62 65 73 74 20 66 75 6e 63  or the best func
1cc0: 74 69 6f 6e 20 64 65 66 69 6e 69 74 69 6f 6e 2c  tion definition,
1cd0: 20 74 68 69 73 20 70 72 6f 63 65 64 75 72 65 0a   this procedure.
1ce0: 2a 2a 20 69 73 20 63 61 6c 6c 65 64 20 74 6f 20  ** is called to 
1cf0: 74 65 73 74 20 68 6f 77 20 77 65 6c 6c 20 74 68  test how well th
1d00: 65 20 66 75 6e 63 74 69 6f 6e 20 70 61 73 73 65  e function passe
1d10: 64 20 61 73 20 74 68 65 20 66 69 72 73 74 20 61  d as the first a
1d20: 72 67 75 6d 65 6e 74 0a 2a 2a 20 6d 61 74 63 68  rgument.** match
1d30: 65 73 20 74 68 65 20 72 65 71 75 65 73 74 20 66  es the request f
1d40: 6f 72 20 61 20 66 75 6e 63 74 69 6f 6e 20 77 69  or a function wi
1d50: 74 68 20 6e 41 72 67 20 61 72 67 75 6d 65 6e 74  th nArg argument
1d60: 73 20 69 6e 20 61 20 73 79 73 74 65 6d 0a 2a 2a  s in a system.**
1d70: 20 74 68 61 74 20 75 73 65 73 20 65 6e 63 6f 64   that uses encod
1d80: 69 6e 67 20 65 6e 63 2e 20 54 68 65 20 76 61 6c  ing enc. The val
1d90: 75 65 20 72 65 74 75 72 6e 65 64 20 69 6e 64 69  ue returned indi
1da0: 63 61 74 65 73 20 68 6f 77 20 77 65 6c 6c 20 74  cates how well t
1db0: 68 65 0a 2a 2a 20 72 65 71 75 65 73 74 20 69 73  he.** request is
1dc0: 20 6d 61 74 63 68 65 64 2e 20 41 20 68 69 67 68   matched. A high
1dd0: 65 72 20 76 61 6c 75 65 20 69 6e 64 69 63 61 74  er value indicat
1de0: 65 73 20 61 20 62 65 74 74 65 72 20 6d 61 74 63  es a better matc
1df0: 68 2e 0a 2a 2a 0a 2a 2a 20 54 68 65 20 72 65 74  h..**.** The ret
1e00: 75 72 6e 65 64 20 76 61 6c 75 65 20 69 73 20 61  urned value is a
1e10: 6c 77 61 79 73 20 62 65 74 77 65 65 6e 20 30 20  lways between 0 
1e20: 61 6e 64 20 36 2c 20 61 73 20 66 6f 6c 6c 6f 77  and 6, as follow
1e30: 73 3a 0a 2a 2a 0a 2a 2a 20 30 3a 20 4e 6f 74 20  s:.**.** 0: Not 
1e40: 61 20 6d 61 74 63 68 2c 20 6f 72 20 69 66 20 6e  a match, or if n
1e50: 41 72 67 3c 30 20 61 6e 64 20 74 68 65 20 66 75  Arg<0 and the fu
1e60: 6e 63 74 69 6f 6e 20 69 73 20 68 61 73 20 6e 6f  nction is has no
1e70: 20 69 6d 70 6c 65 6d 65 6e 74 61 74 69 6f 6e 2e   implementation.
1e80: 0a 2a 2a 20 31 3a 20 41 20 76 61 72 69 61 62 6c  .** 1: A variabl
1e90: 65 20 61 72 67 75 6d 65 6e 74 73 20 66 75 6e 63  e arguments func
1ea0: 74 69 6f 6e 20 74 68 61 74 20 70 72 65 66 65 72  tion that prefer
1eb0: 73 20 55 54 46 2d 38 20 77 68 65 6e 20 61 20 55  s UTF-8 when a U
1ec0: 54 46 2d 31 36 0a 2a 2a 20 20 20 20 65 6e 63 6f  TF-16.**    enco
1ed0: 64 69 6e 67 20 69 73 20 72 65 71 75 65 73 74 65  ding is requeste
1ee0: 64 2c 20 6f 72 20 76 69 63 65 20 76 65 72 73 61  d, or vice versa
1ef0: 2e 0a 2a 2a 20 32 3a 20 41 20 76 61 72 69 61 62  ..** 2: A variab
1f00: 6c 65 20 61 72 67 75 6d 65 6e 74 73 20 66 75 6e  le arguments fun
1f10: 63 74 69 6f 6e 20 74 68 61 74 20 75 73 65 73 20  ction that uses 
1f20: 55 54 46 2d 31 36 42 45 20 77 68 65 6e 20 55 54  UTF-16BE when UT
1f30: 46 2d 31 36 4c 45 20 69 73 0a 2a 2a 20 20 20 20  F-16LE is.**    
1f40: 72 65 71 75 65 73 74 65 64 2c 20 6f 72 20 76 69  requested, or vi
1f50: 63 65 20 76 65 72 73 61 2e 0a 2a 2a 20 33 3a 20  ce versa..** 3: 
1f60: 41 20 76 61 72 69 61 62 6c 65 20 61 72 67 75 6d  A variable argum
1f70: 65 6e 74 73 20 66 75 6e 63 74 69 6f 6e 20 75 73  ents function us
1f80: 69 6e 67 20 74 68 65 20 73 61 6d 65 20 74 65 78  ing the same tex
1f90: 74 20 65 6e 63 6f 64 69 6e 67 2e 0a 2a 2a 20 34  t encoding..** 4
1fa0: 3a 20 41 20 66 75 6e 63 74 69 6f 6e 20 77 69 74  : A function wit
1fb0: 68 20 74 68 65 20 65 78 61 63 74 20 6e 75 6d 62  h the exact numb
1fc0: 65 72 20 6f 66 20 61 72 67 75 6d 65 6e 74 73 20  er of arguments 
1fd0: 72 65 71 75 65 73 74 65 64 20 74 68 61 74 0a 2a  requested that.*
1fe0: 2a 20 20 20 20 70 72 65 66 65 72 73 20 55 54 46  *    prefers UTF
1ff0: 2d 38 20 77 68 65 6e 20 61 20 55 54 46 2d 31 36  -8 when a UTF-16
2000: 20 65 6e 63 6f 64 69 6e 67 20 69 73 20 72 65 71   encoding is req
2010: 75 65 73 74 65 64 2c 20 6f 72 20 76 69 63 65 20  uested, or vice 
2020: 76 65 72 73 61 2e 0a 2a 2a 20 35 3a 20 41 20 66  versa..** 5: A f
2030: 75 6e 63 74 69 6f 6e 20 77 69 74 68 20 74 68 65  unction with the
2040: 20 65 78 61 63 74 20 6e 75 6d 62 65 72 20 6f 66   exact number of
2050: 20 61 72 67 75 6d 65 6e 74 73 20 72 65 71 75 65   arguments reque
2060: 73 74 65 64 20 74 68 61 74 0a 2a 2a 20 20 20 20  sted that.**    
2070: 70 72 65 66 65 72 73 20 55 54 46 2d 31 36 4c 45  prefers UTF-16LE
2080: 20 77 68 65 6e 20 55 54 46 2d 31 36 42 45 20 69   when UTF-16BE i
2090: 73 20 72 65 71 75 65 73 74 65 64 2c 20 6f 72 20  s requested, or 
20a0: 76 69 63 65 20 76 65 72 73 61 2e 0a 2a 2a 20 36  vice versa..** 6
20b0: 3a 20 41 6e 20 65 78 61 63 74 20 6d 61 74 63 68  : An exact match
20c0: 2e 0a 2a 2a 0a 2a 2f 0a 73 74 61 74 69 63 20 69  ..**.*/.static i
20d0: 6e 74 20 6d 61 74 63 68 51 75 61 6c 69 74 79 28  nt matchQuality(
20e0: 46 75 6e 63 44 65 66 20 2a 70 2c 20 69 6e 74 20  FuncDef *p, int 
20f0: 6e 41 72 67 2c 20 75 38 20 65 6e 63 29 7b 0a 20  nArg, u8 enc){. 
2100: 20 69 6e 74 20 6d 61 74 63 68 20 3d 20 30 3b 0a   int match = 0;.
2110: 20 20 69 66 28 20 70 2d 3e 6e 41 72 67 3d 3d 2d    if( p->nArg==-
2120: 31 20 7c 7c 20 70 2d 3e 6e 41 72 67 3d 3d 6e 41  1 || p->nArg==nA
2130: 72 67 20 0a 20 20 20 7c 7c 20 28 6e 41 72 67 3d  rg .   || (nArg=
2140: 3d 2d 31 20 26 26 20 28 70 2d 3e 78 46 75 6e 63  =-1 && (p->xFunc
2150: 21 3d 30 20 7c 7c 20 70 2d 3e 78 53 74 65 70 21  !=0 || p->xStep!
2160: 3d 30 29 29 0a 20 20 29 7b 0a 20 20 20 20 6d 61  =0)).  ){.    ma
2170: 74 63 68 20 3d 20 31 3b 0a 20 20 20 20 69 66 28  tch = 1;.    if(
2180: 20 70 2d 3e 6e 41 72 67 3d 3d 6e 41 72 67 20 7c   p->nArg==nArg |
2190: 7c 20 6e 41 72 67 3d 3d 2d 31 20 29 7b 0a 20 20  | nArg==-1 ){.  
21a0: 20 20 20 20 6d 61 74 63 68 20 3d 20 34 3b 0a 20      match = 4;. 
21b0: 20 20 20 7d 0a 20 20 20 20 69 66 28 20 65 6e 63     }.    if( enc
21c0: 3d 3d 70 2d 3e 69 50 72 65 66 45 6e 63 20 29 7b  ==p->iPrefEnc ){
21d0: 0a 20 20 20 20 20 20 6d 61 74 63 68 20 2b 3d 20  .      match += 
21e0: 32 3b 0a 20 20 20 20 7d 0a 20 20 20 20 65 6c 73  2;.    }.    els
21f0: 65 20 69 66 28 20 28 65 6e 63 3d 3d 53 51 4c 49  e if( (enc==SQLI
2200: 54 45 5f 55 54 46 31 36 4c 45 20 26 26 20 70 2d  TE_UTF16LE && p-
2210: 3e 69 50 72 65 66 45 6e 63 3d 3d 53 51 4c 49 54  >iPrefEnc==SQLIT
2220: 45 5f 55 54 46 31 36 42 45 29 20 7c 7c 0a 20 20  E_UTF16BE) ||.  
2230: 20 20 20 20 20 20 20 20 20 20 20 28 65 6e 63 3d             (enc=
2240: 3d 53 51 4c 49 54 45 5f 55 54 46 31 36 42 45 20  =SQLITE_UTF16BE 
2250: 26 26 20 70 2d 3e 69 50 72 65 66 45 6e 63 3d 3d  && p->iPrefEnc==
2260: 53 51 4c 49 54 45 5f 55 54 46 31 36 4c 45 29 20  SQLITE_UTF16LE) 
2270: 29 7b 0a 20 20 20 20 20 20 6d 61 74 63 68 20 2b  ){.      match +
2280: 3d 20 31 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 20  = 1;.    }.  }. 
2290: 20 72 65 74 75 72 6e 20 6d 61 74 63 68 3b 0a 7d   return match;.}
22a0: 0a 0a 2f 2a 0a 2a 2a 20 53 65 61 72 63 68 20 61  ../*.** Search a
22b0: 20 46 75 6e 63 44 65 66 48 61 73 68 20 66 6f 72   FuncDefHash for
22c0: 20 61 20 66 75 6e 63 74 69 6f 6e 20 77 69 74 68   a function with
22d0: 20 74 68 65 20 67 69 76 65 6e 20 6e 61 6d 65 2e   the given name.
22e0: 20 20 52 65 74 75 72 6e 0a 2a 2a 20 61 20 70 6f    Return.** a po
22f0: 69 6e 74 65 72 20 74 6f 20 74 68 65 20 6d 61 74  inter to the mat
2300: 63 68 69 6e 67 20 46 75 6e 63 44 65 66 20 69 66  ching FuncDef if
2310: 20 66 6f 75 6e 64 2c 20 6f 72 20 30 20 69 66 20   found, or 0 if 
2320: 74 68 65 72 65 20 69 73 20 6e 6f 20 6d 61 74 63  there is no matc
2330: 68 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 46 75 6e  h..*/.static Fun
2340: 63 44 65 66 20 2a 66 75 6e 63 74 69 6f 6e 53 65  cDef *functionSe
2350: 61 72 63 68 28 0a 20 20 46 75 6e 63 44 65 66 48  arch(.  FuncDefH
2360: 61 73 68 20 2a 70 48 61 73 68 2c 20 20 2f 2a 20  ash *pHash,  /* 
2370: 48 61 73 68 20 74 61 62 6c 65 20 74 6f 20 73 65  Hash table to se
2380: 61 72 63 68 20 2a 2f 0a 20 20 69 6e 74 20 68 2c  arch */.  int h,
2390: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f                 /
23a0: 2a 20 48 61 73 68 20 6f 66 20 74 68 65 20 6e 61  * Hash of the na
23b0: 6d 65 20 2a 2f 0a 20 20 63 6f 6e 73 74 20 63 68  me */.  const ch
23c0: 61 72 20 2a 7a 46 75 6e 63 2c 20 20 20 2f 2a 20  ar *zFunc,   /* 
23d0: 4e 61 6d 65 20 6f 66 20 66 75 6e 63 74 69 6f 6e  Name of function
23e0: 20 2a 2f 0a 20 20 69 6e 74 20 6e 46 75 6e 63 20   */.  int nFunc 
23f0: 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 4e 75             /* Nu
2400: 6d 62 65 72 20 6f 66 20 62 79 74 65 73 20 69 6e  mber of bytes in
2410: 20 7a 46 75 6e 63 20 2a 2f 0a 29 7b 0a 20 20 46   zFunc */.){.  F
2420: 75 6e 63 44 65 66 20 2a 70 3b 0a 20 20 66 6f 72  uncDef *p;.  for
2430: 28 70 3d 70 48 61 73 68 2d 3e 61 5b 68 5d 3b 20  (p=pHash->a[h]; 
2440: 70 3b 20 70 3d 70 2d 3e 70 48 61 73 68 29 7b 0a  p; p=p->pHash){.
2450: 20 20 20 20 69 66 28 20 73 71 6c 69 74 65 33 53      if( sqlite3S
2460: 74 72 4e 49 43 6d 70 28 70 2d 3e 7a 4e 61 6d 65  trNICmp(p->zName
2470: 2c 20 7a 46 75 6e 63 2c 20 6e 46 75 6e 63 29 3d  , zFunc, nFunc)=
2480: 3d 30 20 26 26 20 70 2d 3e 7a 4e 61 6d 65 5b 6e  =0 && p->zName[n
2490: 46 75 6e 63 5d 3d 3d 30 20 29 7b 0a 20 20 20 20  Func]==0 ){.    
24a0: 20 20 72 65 74 75 72 6e 20 70 3b 0a 20 20 20 20    return p;.    
24b0: 7d 0a 20 20 7d 0a 20 20 72 65 74 75 72 6e 20 30  }.  }.  return 0
24c0: 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 49 6e 73 65 72  ;.}../*.** Inser
24d0: 74 20 61 20 6e 65 77 20 46 75 6e 63 44 65 66 20  t a new FuncDef 
24e0: 69 6e 74 6f 20 61 20 46 75 6e 63 44 65 66 48 61  into a FuncDefHa
24f0: 73 68 20 68 61 73 68 20 74 61 62 6c 65 2e 0a 2a  sh hash table..*
2500: 2f 0a 76 6f 69 64 20 73 71 6c 69 74 65 33 46 75  /.void sqlite3Fu
2510: 6e 63 44 65 66 49 6e 73 65 72 74 28 0a 20 20 46  ncDefInsert(.  F
2520: 75 6e 63 44 65 66 48 61 73 68 20 2a 70 48 61 73  uncDefHash *pHas
2530: 68 2c 20 20 2f 2a 20 54 68 65 20 68 61 73 68 20  h,  /* The hash 
2540: 74 61 62 6c 65 20 69 6e 74 6f 20 77 68 69 63 68  table into which
2550: 20 74 6f 20 69 6e 73 65 72 74 20 2a 2f 0a 20 20   to insert */.  
2560: 46 75 6e 63 44 65 66 20 2a 70 44 65 66 20 20 20  FuncDef *pDef   
2570: 20 20 20 20 20 2f 2a 20 54 68 65 20 66 75 6e 63       /* The func
2580: 74 69 6f 6e 20 64 65 66 69 6e 69 74 69 6f 6e 20  tion definition 
2590: 74 6f 20 69 6e 73 65 72 74 20 2a 2f 0a 29 7b 0a  to insert */.){.
25a0: 20 20 46 75 6e 63 44 65 66 20 2a 70 4f 74 68 65    FuncDef *pOthe
25b0: 72 3b 0a 20 20 69 6e 74 20 6e 4e 61 6d 65 20 3d  r;.  int nName =
25c0: 20 73 71 6c 69 74 65 33 53 74 72 6c 65 6e 33 30   sqlite3Strlen30
25d0: 28 70 44 65 66 2d 3e 7a 4e 61 6d 65 29 3b 0a 20  (pDef->zName);. 
25e0: 20 75 38 20 63 31 20 3d 20 28 75 38 29 70 44 65   u8 c1 = (u8)pDe
25f0: 66 2d 3e 7a 4e 61 6d 65 5b 30 5d 3b 0a 20 20 69  f->zName[0];.  i
2600: 6e 74 20 68 20 3d 20 28 73 71 6c 69 74 65 33 55  nt h = (sqlite3U
2610: 70 70 65 72 54 6f 4c 6f 77 65 72 5b 63 31 5d 20  pperToLower[c1] 
2620: 2b 20 6e 4e 61 6d 65 29 20 25 20 41 72 72 61 79  + nName) % Array
2630: 53 69 7a 65 28 70 48 61 73 68 2d 3e 61 29 3b 0a  Size(pHash->a);.
2640: 20 20 70 4f 74 68 65 72 20 3d 20 66 75 6e 63 74    pOther = funct
2650: 69 6f 6e 53 65 61 72 63 68 28 70 48 61 73 68 2c  ionSearch(pHash,
2660: 20 68 2c 20 70 44 65 66 2d 3e 7a 4e 61 6d 65 2c   h, pDef->zName,
2670: 20 6e 4e 61 6d 65 29 3b 0a 20 20 69 66 28 20 70   nName);.  if( p
2680: 4f 74 68 65 72 20 29 7b 0a 20 20 20 20 61 73 73  Other ){.    ass
2690: 65 72 74 28 20 70 4f 74 68 65 72 21 3d 70 44 65  ert( pOther!=pDe
26a0: 66 20 26 26 20 70 4f 74 68 65 72 2d 3e 70 4e 65  f && pOther->pNe
26b0: 78 74 21 3d 70 44 65 66 20 29 3b 0a 20 20 20 20  xt!=pDef );.    
26c0: 70 44 65 66 2d 3e 70 4e 65 78 74 20 3d 20 70 4f  pDef->pNext = pO
26d0: 74 68 65 72 2d 3e 70 4e 65 78 74 3b 0a 20 20 20  ther->pNext;.   
26e0: 20 70 4f 74 68 65 72 2d 3e 70 4e 65 78 74 20 3d   pOther->pNext =
26f0: 20 70 44 65 66 3b 0a 20 20 7d 65 6c 73 65 7b 0a   pDef;.  }else{.
2700: 20 20 20 20 70 44 65 66 2d 3e 70 4e 65 78 74 20      pDef->pNext 
2710: 3d 20 30 3b 0a 20 20 20 20 70 44 65 66 2d 3e 70  = 0;.    pDef->p
2720: 48 61 73 68 20 3d 20 70 48 61 73 68 2d 3e 61 5b  Hash = pHash->a[
2730: 68 5d 3b 0a 20 20 20 20 70 48 61 73 68 2d 3e 61  h];.    pHash->a
2740: 5b 68 5d 20 3d 20 70 44 65 66 3b 0a 20 20 7d 0a  [h] = pDef;.  }.
2750: 7d 0a 20 20 0a 20 20 0a 0a 2f 2a 0a 2a 2a 20 4c  }.  .  ../*.** L
2760: 6f 63 61 74 65 20 61 20 75 73 65 72 20 66 75 6e  ocate a user fun
2770: 63 74 69 6f 6e 20 67 69 76 65 6e 20 61 20 6e 61  ction given a na
2780: 6d 65 2c 20 61 20 6e 75 6d 62 65 72 20 6f 66 20  me, a number of 
2790: 61 72 67 75 6d 65 6e 74 73 20 61 6e 64 20 61 20  arguments and a 
27a0: 66 6c 61 67 0a 2a 2a 20 69 6e 64 69 63 61 74 69  flag.** indicati
27b0: 6e 67 20 77 68 65 74 68 65 72 20 74 68 65 20 66  ng whether the f
27c0: 75 6e 63 74 69 6f 6e 20 70 72 65 66 65 72 73 20  unction prefers 
27d0: 55 54 46 2d 31 36 20 6f 76 65 72 20 55 54 46 2d  UTF-16 over UTF-
27e0: 38 2e 20 20 52 65 74 75 72 6e 20 61 0a 2a 2a 20  8.  Return a.** 
27f0: 70 6f 69 6e 74 65 72 20 74 6f 20 74 68 65 20 46  pointer to the F
2800: 75 6e 63 44 65 66 20 73 74 72 75 63 74 75 72 65  uncDef structure
2810: 20 74 68 61 74 20 64 65 66 69 6e 65 73 20 74 68   that defines th
2820: 61 74 20 66 75 6e 63 74 69 6f 6e 2c 20 6f 72 20  at function, or 
2830: 72 65 74 75 72 6e 0a 2a 2a 20 4e 55 4c 4c 20 69  return.** NULL i
2840: 66 20 74 68 65 20 66 75 6e 63 74 69 6f 6e 20 64  f the function d
2850: 6f 65 73 20 6e 6f 74 20 65 78 69 73 74 2e 0a 2a  oes not exist..*
2860: 2a 0a 2a 2a 20 49 66 20 74 68 65 20 63 72 65 61  *.** If the crea
2870: 74 65 46 6c 61 67 20 61 72 67 75 6d 65 6e 74 20  teFlag argument 
2880: 69 73 20 74 72 75 65 2c 20 74 68 65 6e 20 61 20  is true, then a 
2890: 6e 65 77 20 28 62 6c 61 6e 6b 29 20 46 75 6e 63  new (blank) Func
28a0: 44 65 66 0a 2a 2a 20 73 74 72 75 63 74 75 72 65  Def.** structure
28b0: 20 69 73 20 63 72 65 61 74 65 64 20 61 6e 64 20   is created and 
28c0: 6c 69 6b 65 64 20 69 6e 74 6f 20 74 68 65 20 22  liked into the "
28d0: 64 62 22 20 73 74 72 75 63 74 75 72 65 20 69 66  db" structure if
28e0: 20 61 0a 2a 2a 20 6e 6f 20 6d 61 74 63 68 69 6e   a.** no matchin
28f0: 67 20 66 75 6e 63 74 69 6f 6e 20 70 72 65 76 69  g function previ
2900: 6f 75 73 6c 79 20 65 78 69 73 74 65 64 2e 20 20  ously existed.  
2910: 57 68 65 6e 20 63 72 65 61 74 65 46 6c 61 67 20  When createFlag 
2920: 69 73 20 74 72 75 65 0a 2a 2a 20 61 6e 64 20 74  is true.** and t
2930: 68 65 20 6e 41 72 67 20 70 61 72 61 6d 65 74 65  he nArg paramete
2940: 72 20 69 73 20 2d 31 2c 20 74 68 65 6e 20 6f 6e  r is -1, then on
2950: 6c 79 20 61 20 66 75 6e 63 74 69 6f 6e 20 74 68  ly a function th
2960: 61 74 20 61 63 63 65 70 74 73 0a 2a 2a 20 61 6e  at accepts.** an
2970: 79 20 6e 75 6d 62 65 72 20 6f 66 20 61 72 67 75  y number of argu
2980: 6d 65 6e 74 73 20 77 69 6c 6c 20 62 65 20 72 65  ments will be re
2990: 74 75 72 6e 65 64 2e 0a 2a 2a 0a 2a 2a 20 49 66  turned..**.** If
29a0: 20 63 72 65 61 74 65 46 6c 61 67 20 69 73 20 66   createFlag is f
29b0: 61 6c 73 65 20 61 6e 64 20 6e 41 72 67 20 69 73  alse and nArg is
29c0: 20 2d 31 2c 20 74 68 65 6e 20 74 68 65 20 66 69   -1, then the fi
29d0: 72 73 74 20 76 61 6c 69 64 0a 2a 2a 20 66 75 6e  rst valid.** fun
29e0: 63 74 69 6f 6e 20 66 6f 75 6e 64 20 69 73 20 72  ction found is r
29f0: 65 74 75 72 6e 65 64 2e 20 20 41 20 66 75 6e 63  eturned.  A func
2a00: 74 69 6f 6e 20 69 73 20 76 61 6c 69 64 20 69 66  tion is valid if
2a10: 20 65 69 74 68 65 72 20 78 46 75 6e 63 0a 2a 2a   either xFunc.**
2a20: 20 6f 72 20 78 53 74 65 70 20 69 73 20 6e 6f 6e   or xStep is non
2a30: 2d 7a 65 72 6f 2e 0a 2a 2a 0a 2a 2a 20 49 66 20  -zero..**.** If 
2a40: 63 72 65 61 74 65 46 6c 61 67 20 69 73 20 66 61  createFlag is fa
2a50: 6c 73 65 2c 20 74 68 65 6e 20 61 20 66 75 6e 63  lse, then a func
2a60: 74 69 6f 6e 20 77 69 74 68 20 74 68 65 20 72 65  tion with the re
2a70: 71 75 69 72 65 64 20 6e 61 6d 65 20 61 6e 64 0a  quired name and.
2a80: 2a 2a 20 6e 75 6d 62 65 72 20 6f 66 20 61 72 67  ** number of arg
2a90: 75 6d 65 6e 74 73 20 6d 61 79 20 62 65 20 72 65  uments may be re
2aa0: 74 75 72 6e 65 64 20 65 76 65 6e 20 69 66 20 74  turned even if t
2ab0: 68 65 20 65 54 65 78 74 52 65 70 20 66 6c 61 67  he eTextRep flag
2ac0: 20 64 6f 65 73 20 6e 6f 74 0a 2a 2a 20 6d 61 74   does not.** mat
2ad0: 63 68 20 74 68 61 74 20 72 65 71 75 65 73 74 65  ch that requeste
2ae0: 64 2e 0a 2a 2f 0a 46 75 6e 63 44 65 66 20 2a 73  d..*/.FuncDef *s
2af0: 71 6c 69 74 65 33 46 69 6e 64 46 75 6e 63 74 69  qlite3FindFuncti
2b00: 6f 6e 28 0a 20 20 73 71 6c 69 74 65 33 20 2a 64  on(.  sqlite3 *d
2b10: 62 2c 20 20 20 20 20 20 20 2f 2a 20 41 6e 20 6f  b,       /* An o
2b20: 70 65 6e 20 64 61 74 61 62 61 73 65 20 2a 2f 0a  pen database */.
2b30: 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 4e    const char *zN
2b40: 61 6d 65 2c 20 2f 2a 20 4e 61 6d 65 20 6f 66 20  ame, /* Name of 
2b50: 74 68 65 20 66 75 6e 63 74 69 6f 6e 2e 20 20 4e  the function.  N
2b60: 6f 74 20 6e 75 6c 6c 2d 74 65 72 6d 69 6e 61 74  ot null-terminat
2b70: 65 64 20 2a 2f 0a 20 20 69 6e 74 20 6e 4e 61 6d  ed */.  int nNam
2b80: 65 2c 20 20 20 20 20 20 20 20 20 2f 2a 20 4e 75  e,         /* Nu
2b90: 6d 62 65 72 20 6f 66 20 63 68 61 72 61 63 74 65  mber of characte
2ba0: 72 73 20 69 6e 20 74 68 65 20 6e 61 6d 65 20 2a  rs in the name *
2bb0: 2f 0a 20 20 69 6e 74 20 6e 41 72 67 2c 20 20 20  /.  int nArg,   
2bc0: 20 20 20 20 20 20 20 2f 2a 20 4e 75 6d 62 65 72         /* Number
2bd0: 20 6f 66 20 61 72 67 75 6d 65 6e 74 73 2e 20 20   of arguments.  
2be0: 2d 31 20 6d 65 61 6e 73 20 61 6e 79 20 6e 75 6d  -1 means any num
2bf0: 62 65 72 20 2a 2f 0a 20 20 75 38 20 65 6e 63 2c  ber */.  u8 enc,
2c00: 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 50              /* P
2c10: 72 65 66 65 72 72 65 64 20 74 65 78 74 20 65 6e  referred text en
2c20: 63 6f 64 69 6e 67 20 2a 2f 0a 20 20 69 6e 74 20  coding */.  int 
2c30: 63 72 65 61 74 65 46 6c 61 67 20 20 20 20 20 2f  createFlag     /
2c40: 2a 20 43 72 65 61 74 65 20 6e 65 77 20 65 6e 74  * Create new ent
2c50: 72 79 20 69 66 20 74 72 75 65 20 61 6e 64 20 64  ry if true and d
2c60: 6f 65 73 20 6e 6f 74 20 6f 74 68 65 72 77 69 73  oes not otherwis
2c70: 65 20 65 78 69 73 74 20 2a 2f 0a 29 7b 0a 20 20  e exist */.){.  
2c80: 46 75 6e 63 44 65 66 20 2a 70 3b 20 20 20 20 20  FuncDef *p;     
2c90: 20 20 20 20 2f 2a 20 49 74 65 72 61 74 6f 72 20      /* Iterator 
2ca0: 76 61 72 69 61 62 6c 65 20 2a 2f 0a 20 20 46 75  variable */.  Fu
2cb0: 6e 63 44 65 66 20 2a 70 42 65 73 74 20 3d 20 30  ncDef *pBest = 0
2cc0: 3b 20 2f 2a 20 42 65 73 74 20 6d 61 74 63 68 20  ; /* Best match 
2cd0: 66 6f 75 6e 64 20 73 6f 20 66 61 72 20 2a 2f 0a  found so far */.
2ce0: 20 20 69 6e 74 20 62 65 73 74 53 63 6f 72 65 20    int bestScore 
2cf0: 3d 20 30 3b 20 20 2f 2a 20 53 63 6f 72 65 20 6f  = 0;  /* Score o
2d00: 66 20 62 65 73 74 20 6d 61 74 63 68 20 2a 2f 0a  f best match */.
2d10: 20 20 69 6e 74 20 68 3b 20 20 20 20 20 20 20 20    int h;        
2d20: 20 20 20 20 20 20 2f 2a 20 48 61 73 68 20 76 61        /* Hash va
2d30: 6c 75 65 20 2a 2f 0a 0a 0a 20 20 61 73 73 65 72  lue */...  asser
2d40: 74 28 20 65 6e 63 3d 3d 53 51 4c 49 54 45 5f 55  t( enc==SQLITE_U
2d50: 54 46 38 20 7c 7c 20 65 6e 63 3d 3d 53 51 4c 49  TF8 || enc==SQLI
2d60: 54 45 5f 55 54 46 31 36 4c 45 20 7c 7c 20 65 6e  TE_UTF16LE || en
2d70: 63 3d 3d 53 51 4c 49 54 45 5f 55 54 46 31 36 42  c==SQLITE_UTF16B
2d80: 45 20 29 3b 0a 20 20 69 66 28 20 6e 41 72 67 3c  E );.  if( nArg<
2d90: 2d 31 20 29 20 6e 41 72 67 20 3d 20 2d 31 3b 0a  -1 ) nArg = -1;.
2da0: 20 20 68 20 3d 20 28 73 71 6c 69 74 65 33 55 70    h = (sqlite3Up
2db0: 70 65 72 54 6f 4c 6f 77 65 72 5b 28 75 38 29 7a  perToLower[(u8)z
2dc0: 4e 61 6d 65 5b 30 5d 5d 20 2b 20 6e 4e 61 6d 65  Name[0]] + nName
2dd0: 29 20 25 20 41 72 72 61 79 53 69 7a 65 28 64 62  ) % ArraySize(db
2de0: 2d 3e 61 46 75 6e 63 2e 61 29 3b 0a 0a 20 20 2f  ->aFunc.a);..  /
2df0: 2a 20 46 69 72 73 74 20 73 65 61 72 63 68 20 66  * First search f
2e00: 6f 72 20 61 20 6d 61 74 63 68 20 61 6d 6f 6e 67  or a match among
2e10: 73 74 20 74 68 65 20 61 70 70 6c 69 63 61 74 69  st the applicati
2e20: 6f 6e 2d 64 65 66 69 6e 65 64 20 66 75 6e 63 74  on-defined funct
2e30: 69 6f 6e 73 2e 0a 20 20 2a 2f 0a 20 20 70 20 3d  ions..  */.  p =
2e40: 20 66 75 6e 63 74 69 6f 6e 53 65 61 72 63 68 28   functionSearch(
2e50: 26 64 62 2d 3e 61 46 75 6e 63 2c 20 68 2c 20 7a  &db->aFunc, h, z
2e60: 4e 61 6d 65 2c 20 6e 4e 61 6d 65 29 3b 0a 20 20  Name, nName);.  
2e70: 77 68 69 6c 65 28 20 70 20 29 7b 0a 20 20 20 20  while( p ){.    
2e80: 69 6e 74 20 73 63 6f 72 65 20 3d 20 6d 61 74 63  int score = matc
2e90: 68 51 75 61 6c 69 74 79 28 70 2c 20 6e 41 72 67  hQuality(p, nArg
2ea0: 2c 20 65 6e 63 29 3b 0a 20 20 20 20 69 66 28 20  , enc);.    if( 
2eb0: 73 63 6f 72 65 3e 62 65 73 74 53 63 6f 72 65 20  score>bestScore 
2ec0: 29 7b 0a 20 20 20 20 20 20 70 42 65 73 74 20 3d  ){.      pBest =
2ed0: 20 70 3b 0a 20 20 20 20 20 20 62 65 73 74 53 63   p;.      bestSc
2ee0: 6f 72 65 20 3d 20 73 63 6f 72 65 3b 0a 20 20 20  ore = score;.   
2ef0: 20 7d 0a 20 20 20 20 70 20 3d 20 70 2d 3e 70 4e   }.    p = p->pN
2f00: 65 78 74 3b 0a 20 20 7d 0a 0a 20 20 2f 2a 20 49  ext;.  }..  /* I
2f10: 66 20 6e 6f 20 6d 61 74 63 68 20 69 73 20 66 6f  f no match is fo
2f20: 75 6e 64 2c 20 73 65 61 72 63 68 20 74 68 65 20  und, search the 
2f30: 62 75 69 6c 74 2d 69 6e 20 66 75 6e 63 74 69 6f  built-in functio
2f40: 6e 73 2e 0a 20 20 2a 2a 0a 20 20 2a 2a 20 45 78  ns..  **.  ** Ex
2f50: 63 65 70 74 2c 20 69 66 20 63 72 65 61 74 65 46  cept, if createF
2f60: 6c 61 67 20 69 73 20 74 72 75 65 2c 20 74 68 61  lag is true, tha
2f70: 74 20 6d 65 61 6e 73 20 74 68 61 74 20 77 65 20  t means that we 
2f80: 61 72 65 20 74 72 79 69 6e 67 20 74 6f 0a 20 20  are trying to.  
2f90: 2a 2a 20 69 6e 73 74 61 6c 6c 20 61 20 6e 65 77  ** install a new
2fa0: 20 66 75 6e 63 74 69 6f 6e 2e 20 20 57 68 61 74   function.  What
2fb0: 65 76 65 72 20 46 75 6e 63 44 65 66 20 73 74 72  ever FuncDef str
2fc0: 75 63 74 75 72 65 20 69 73 20 72 65 74 75 72 6e  ucture is return
2fd0: 65 64 20 77 69 6c 6c 0a 20 20 2a 2a 20 68 61 76  ed will.  ** hav
2fe0: 65 20 66 69 65 6c 64 73 20 6f 76 65 72 77 72 69  e fields overwri
2ff0: 74 74 65 6e 20 77 69 74 68 20 6e 65 77 20 69 6e  tten with new in
3000: 66 6f 72 6d 61 74 69 6f 6e 20 61 70 70 72 6f 70  formation approp
3010: 72 69 61 74 65 20 66 6f 72 20 74 68 65 0a 20 20  riate for the.  
3020: 2a 2a 20 6e 65 77 20 66 75 6e 63 74 69 6f 6e 2e  ** new function.
3030: 20 20 42 75 74 20 74 68 65 20 46 75 6e 63 44 65    But the FuncDe
3040: 66 73 20 66 6f 72 20 62 75 69 6c 74 2d 69 6e 20  fs for built-in 
3050: 66 75 6e 63 74 69 6f 6e 73 20 61 72 65 20 72 65  functions are re
3060: 61 64 2d 6f 6e 6c 79 2e 0a 20 20 2a 2a 20 53 6f  ad-only..  ** So
3070: 20 77 65 20 6d 75 73 74 20 6e 6f 74 20 73 65 61   we must not sea
3080: 72 63 68 20 66 6f 72 20 62 75 69 6c 74 2d 69 6e  rch for built-in
3090: 73 20 77 68 65 6e 20 63 72 65 61 74 69 6e 67 20  s when creating 
30a0: 61 20 6e 65 77 20 66 75 6e 63 74 69 6f 6e 2e 0a  a new function..
30b0: 20 20 2a 2f 20 0a 20 20 69 66 28 20 21 63 72 65    */ .  if( !cre
30c0: 61 74 65 46 6c 61 67 20 26 26 20 21 70 42 65 73  ateFlag && !pBes
30d0: 74 20 29 7b 0a 20 20 20 20 46 75 6e 63 44 65 66  t ){.    FuncDef
30e0: 48 61 73 68 20 2a 70 48 61 73 68 20 3d 20 26 47  Hash *pHash = &G
30f0: 4c 4f 42 41 4c 28 46 75 6e 63 44 65 66 48 61 73  LOBAL(FuncDefHas
3100: 68 2c 20 73 71 6c 69 74 65 33 47 6c 6f 62 61 6c  h, sqlite3Global
3110: 46 75 6e 63 74 69 6f 6e 73 29 3b 0a 20 20 20 20  Functions);.    
3120: 70 20 3d 20 66 75 6e 63 74 69 6f 6e 53 65 61 72  p = functionSear
3130: 63 68 28 70 48 61 73 68 2c 20 68 2c 20 7a 4e 61  ch(pHash, h, zNa
3140: 6d 65 2c 20 6e 4e 61 6d 65 29 3b 0a 20 20 20 20  me, nName);.    
3150: 77 68 69 6c 65 28 20 70 20 29 7b 0a 20 20 20 20  while( p ){.    
3160: 20 20 69 6e 74 20 73 63 6f 72 65 20 3d 20 6d 61    int score = ma
3170: 74 63 68 51 75 61 6c 69 74 79 28 70 2c 20 6e 41  tchQuality(p, nA
3180: 72 67 2c 20 65 6e 63 29 3b 0a 20 20 20 20 20 20  rg, enc);.      
3190: 69 66 28 20 73 63 6f 72 65 3e 62 65 73 74 53 63  if( score>bestSc
31a0: 6f 72 65 20 29 7b 0a 20 20 20 20 20 20 20 20 70  ore ){.        p
31b0: 42 65 73 74 20 3d 20 70 3b 0a 20 20 20 20 20 20  Best = p;.      
31c0: 20 20 62 65 73 74 53 63 6f 72 65 20 3d 20 73 63    bestScore = sc
31d0: 6f 72 65 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20  ore;.      }.   
31e0: 20 20 20 70 20 3d 20 70 2d 3e 70 4e 65 78 74 3b     p = p->pNext;
31f0: 0a 20 20 20 20 7d 0a 20 20 7d 0a 0a 20 20 2f 2a  .    }.  }..  /*
3200: 20 49 66 20 74 68 65 20 63 72 65 61 74 65 46 6c   If the createFl
3210: 61 67 20 70 61 72 61 6d 65 74 65 72 20 69 73 20  ag parameter is 
3220: 74 72 75 65 20 61 6e 64 20 74 68 65 20 73 65 61  true and the sea
3230: 72 63 68 20 64 69 64 20 6e 6f 74 20 72 65 76 65  rch did not reve
3240: 61 6c 20 61 6e 0a 20 20 2a 2a 20 65 78 61 63 74  al an.  ** exact
3250: 20 6d 61 74 63 68 20 66 6f 72 20 74 68 65 20 6e   match for the n
3260: 61 6d 65 2c 20 6e 75 6d 62 65 72 20 6f 66 20 61  ame, number of a
3270: 72 67 75 6d 65 6e 74 73 20 61 6e 64 20 65 6e 63  rguments and enc
3280: 6f 64 69 6e 67 2c 20 74 68 65 6e 20 61 64 64 20  oding, then add 
3290: 61 0a 20 20 2a 2a 20 6e 65 77 20 65 6e 74 72 79  a.  ** new entry
32a0: 20 74 6f 20 74 68 65 20 68 61 73 68 20 74 61 62   to the hash tab
32b0: 6c 65 20 61 6e 64 20 72 65 74 75 72 6e 20 69 74  le and return it
32c0: 2e 0a 20 20 2a 2f 0a 20 20 69 66 28 20 63 72 65  ..  */.  if( cre
32d0: 61 74 65 46 6c 61 67 20 26 26 20 28 62 65 73 74  ateFlag && (best
32e0: 53 63 6f 72 65 3c 36 20 7c 7c 20 70 42 65 73 74  Score<6 || pBest
32f0: 2d 3e 6e 41 72 67 21 3d 6e 41 72 67 29 20 26 26  ->nArg!=nArg) &&
3300: 20 0a 20 20 20 20 20 20 28 70 42 65 73 74 20 3d   .      (pBest =
3310: 20 73 71 6c 69 74 65 33 44 62 4d 61 6c 6c 6f 63   sqlite3DbMalloc
3320: 5a 65 72 6f 28 64 62 2c 20 73 69 7a 65 6f 66 28  Zero(db, sizeof(
3330: 2a 70 42 65 73 74 29 2b 6e 4e 61 6d 65 2b 31 29  *pBest)+nName+1)
3340: 29 21 3d 30 20 29 7b 0a 20 20 20 20 70 42 65 73  )!=0 ){.    pBes
3350: 74 2d 3e 7a 4e 61 6d 65 20 3d 20 28 63 68 61 72  t->zName = (char
3360: 20 2a 29 26 70 42 65 73 74 5b 31 5d 3b 0a 20 20   *)&pBest[1];.  
3370: 20 20 70 42 65 73 74 2d 3e 6e 41 72 67 20 3d 20    pBest->nArg = 
3380: 28 75 31 36 29 6e 41 72 67 3b 0a 20 20 20 20 70  (u16)nArg;.    p
3390: 42 65 73 74 2d 3e 69 50 72 65 66 45 6e 63 20 3d  Best->iPrefEnc =
33a0: 20 65 6e 63 3b 0a 20 20 20 20 6d 65 6d 63 70 79   enc;.    memcpy
33b0: 28 70 42 65 73 74 2d 3e 7a 4e 61 6d 65 2c 20 7a  (pBest->zName, z
33c0: 4e 61 6d 65 2c 20 6e 4e 61 6d 65 29 3b 0a 20 20  Name, nName);.  
33d0: 20 20 70 42 65 73 74 2d 3e 7a 4e 61 6d 65 5b 6e    pBest->zName[n
33e0: 4e 61 6d 65 5d 20 3d 20 30 3b 0a 20 20 20 20 73  Name] = 0;.    s
33f0: 71 6c 69 74 65 33 46 75 6e 63 44 65 66 49 6e 73  qlite3FuncDefIns
3400: 65 72 74 28 26 64 62 2d 3e 61 46 75 6e 63 2c 20  ert(&db->aFunc, 
3410: 70 42 65 73 74 29 3b 0a 20 20 7d 0a 0a 20 20 69  pBest);.  }..  i
3420: 66 28 20 70 42 65 73 74 20 26 26 20 28 70 42 65  f( pBest && (pBe
3430: 73 74 2d 3e 78 53 74 65 70 20 7c 7c 20 70 42 65  st->xStep || pBe
3440: 73 74 2d 3e 78 46 75 6e 63 20 7c 7c 20 63 72 65  st->xFunc || cre
3450: 61 74 65 46 6c 61 67 29 20 29 7b 0a 20 20 20 20  ateFlag) ){.    
3460: 72 65 74 75 72 6e 20 70 42 65 73 74 3b 0a 20 20  return pBest;.  
3470: 7d 0a 20 20 72 65 74 75 72 6e 20 30 3b 0a 7d 0a  }.  return 0;.}.
3480: 0a 2f 2a 0a 2a 2a 20 46 72 65 65 20 61 6c 6c 20  ./*.** Free all 
3490: 72 65 73 6f 75 72 63 65 73 20 68 65 6c 64 20 62  resources held b
34a0: 79 20 74 68 65 20 73 63 68 65 6d 61 20 73 74 72  y the schema str
34b0: 75 63 74 75 72 65 2e 20 54 68 65 20 76 6f 69 64  ucture. The void
34c0: 2a 20 61 72 67 75 6d 65 6e 74 20 70 6f 69 6e 74  * argument point
34d0: 73 0a 2a 2a 20 61 74 20 61 20 53 63 68 65 6d 61  s.** at a Schema
34e0: 20 73 74 72 75 63 74 2e 20 54 68 69 73 20 66 75   struct. This fu
34f0: 6e 63 74 69 6f 6e 20 64 6f 65 73 20 6e 6f 74 20  nction does not 
3500: 63 61 6c 6c 20 73 71 6c 69 74 65 33 44 62 46 72  call sqlite3DbFr
3510: 65 65 28 64 62 2c 20 29 20 6f 6e 20 74 68 65 20  ee(db, ) on the 
3520: 0a 2a 2a 20 70 6f 69 6e 74 65 72 20 69 74 73 65  .** pointer itse
3530: 6c 66 2c 20 69 74 20 6a 75 73 74 20 63 6c 65 61  lf, it just clea
3540: 6e 73 20 75 70 20 73 75 62 73 69 64 75 61 72 79  ns up subsiduary
3550: 20 72 65 73 6f 75 72 63 65 73 20 28 69 2e 65 2e   resources (i.e.
3560: 20 74 68 65 20 63 6f 6e 74 65 6e 74 73 0a 2a 2a   the contents.**
3570: 20 6f 66 20 74 68 65 20 73 63 68 65 6d 61 20 68   of the schema h
3580: 61 73 68 20 74 61 62 6c 65 73 29 2e 0a 2a 2a 0a  ash tables)..**.
3590: 2a 2a 20 54 68 65 20 53 63 68 65 6d 61 2e 63 61  ** The Schema.ca
35a0: 63 68 65 5f 73 69 7a 65 20 76 61 72 69 61 62 6c  che_size variabl
35b0: 65 20 69 73 20 6e 6f 74 20 63 6c 65 61 72 65 64  e is not cleared
35c0: 2e 0a 2a 2f 0a 76 6f 69 64 20 73 71 6c 69 74 65  ..*/.void sqlite
35d0: 33 53 63 68 65 6d 61 46 72 65 65 28 76 6f 69 64  3SchemaFree(void
35e0: 20 2a 70 29 7b 0a 20 20 48 61 73 68 20 74 65 6d   *p){.  Hash tem
35f0: 70 31 3b 0a 20 20 48 61 73 68 20 74 65 6d 70 32  p1;.  Hash temp2
3600: 3b 0a 20 20 48 61 73 68 45 6c 65 6d 20 2a 70 45  ;.  HashElem *pE
3610: 6c 65 6d 3b 0a 20 20 53 63 68 65 6d 61 20 2a 70  lem;.  Schema *p
3620: 53 63 68 65 6d 61 20 3d 20 28 53 63 68 65 6d 61  Schema = (Schema
3630: 20 2a 29 70 3b 0a 0a 20 20 74 65 6d 70 31 20 3d   *)p;..  temp1 =
3640: 20 70 53 63 68 65 6d 61 2d 3e 74 62 6c 48 61 73   pSchema->tblHas
3650: 68 3b 0a 20 20 74 65 6d 70 32 20 3d 20 70 53 63  h;.  temp2 = pSc
3660: 68 65 6d 61 2d 3e 74 72 69 67 48 61 73 68 3b 0a  hema->trigHash;.
3670: 20 20 73 71 6c 69 74 65 33 48 61 73 68 49 6e 69    sqlite3HashIni
3680: 74 28 26 70 53 63 68 65 6d 61 2d 3e 74 72 69 67  t(&pSchema->trig
3690: 48 61 73 68 29 3b 0a 20 20 73 71 6c 69 74 65 33  Hash);.  sqlite3
36a0: 48 61 73 68 43 6c 65 61 72 28 26 70 53 63 68 65  HashClear(&pSche
36b0: 6d 61 2d 3e 69 64 78 48 61 73 68 29 3b 0a 20 20  ma->idxHash);.  
36c0: 66 6f 72 28 70 45 6c 65 6d 3d 73 71 6c 69 74 65  for(pElem=sqlite
36d0: 48 61 73 68 46 69 72 73 74 28 26 74 65 6d 70 32  HashFirst(&temp2
36e0: 29 3b 20 70 45 6c 65 6d 3b 20 70 45 6c 65 6d 3d  ); pElem; pElem=
36f0: 73 71 6c 69 74 65 48 61 73 68 4e 65 78 74 28 70  sqliteHashNext(p
3700: 45 6c 65 6d 29 29 7b 0a 20 20 20 20 73 71 6c 69  Elem)){.    sqli
3710: 74 65 33 44 65 6c 65 74 65 54 72 69 67 67 65 72  te3DeleteTrigger
3720: 28 30 2c 20 28 54 72 69 67 67 65 72 2a 29 73 71  (0, (Trigger*)sq
3730: 6c 69 74 65 48 61 73 68 44 61 74 61 28 70 45 6c  liteHashData(pEl
3740: 65 6d 29 29 3b 0a 20 20 7d 0a 20 20 73 71 6c 69  em));.  }.  sqli
3750: 74 65 33 48 61 73 68 43 6c 65 61 72 28 26 74 65  te3HashClear(&te
3760: 6d 70 32 29 3b 0a 20 20 73 71 6c 69 74 65 33 48  mp2);.  sqlite3H
3770: 61 73 68 49 6e 69 74 28 26 70 53 63 68 65 6d 61  ashInit(&pSchema
3780: 2d 3e 74 62 6c 48 61 73 68 29 3b 0a 20 20 66 6f  ->tblHash);.  fo
3790: 72 28 70 45 6c 65 6d 3d 73 71 6c 69 74 65 48 61  r(pElem=sqliteHa
37a0: 73 68 46 69 72 73 74 28 26 74 65 6d 70 31 29 3b  shFirst(&temp1);
37b0: 20 70 45 6c 65 6d 3b 20 70 45 6c 65 6d 3d 73 71   pElem; pElem=sq
37c0: 6c 69 74 65 48 61 73 68 4e 65 78 74 28 70 45 6c  liteHashNext(pEl
37d0: 65 6d 29 29 7b 0a 20 20 20 20 54 61 62 6c 65 20  em)){.    Table 
37e0: 2a 70 54 61 62 20 3d 20 73 71 6c 69 74 65 48 61  *pTab = sqliteHa
37f0: 73 68 44 61 74 61 28 70 45 6c 65 6d 29 3b 0a 20  shData(pElem);. 
3800: 20 20 20 61 73 73 65 72 74 28 20 70 54 61 62 2d     assert( pTab-
3810: 3e 64 62 4d 65 6d 3d 3d 30 20 29 3b 0a 20 20 20  >dbMem==0 );.   
3820: 20 73 71 6c 69 74 65 33 44 65 6c 65 74 65 54 61   sqlite3DeleteTa
3830: 62 6c 65 28 70 54 61 62 29 3b 0a 20 20 7d 0a 20  ble(pTab);.  }. 
3840: 20 73 71 6c 69 74 65 33 48 61 73 68 43 6c 65 61   sqlite3HashClea
3850: 72 28 26 74 65 6d 70 31 29 3b 0a 20 20 70 53 63  r(&temp1);.  pSc
3860: 68 65 6d 61 2d 3e 70 53 65 71 54 61 62 20 3d 20  hema->pSeqTab = 
3870: 30 3b 0a 20 20 70 53 63 68 65 6d 61 2d 3e 66 6c  0;.  pSchema->fl
3880: 61 67 73 20 26 3d 20 7e 44 42 5f 53 63 68 65 6d  ags &= ~DB_Schem
3890: 61 4c 6f 61 64 65 64 3b 0a 7d 0a 0a 2f 2a 0a 2a  aLoaded;.}../*.*
38a0: 2a 20 46 69 6e 64 20 61 6e 64 20 72 65 74 75 72  * Find and retur
38b0: 6e 20 74 68 65 20 73 63 68 65 6d 61 20 61 73 73  n the schema ass
38c0: 6f 63 69 61 74 65 64 20 77 69 74 68 20 61 20 42  ociated with a B
38d0: 54 72 65 65 2e 20 20 43 72 65 61 74 65 0a 2a 2a  Tree.  Create.**
38e0: 20 61 20 6e 65 77 20 6f 6e 65 20 69 66 20 6e 65   a new one if ne
38f0: 63 65 73 73 61 72 79 2e 0a 2a 2f 0a 53 63 68 65  cessary..*/.Sche
3900: 6d 61 20 2a 73 71 6c 69 74 65 33 53 63 68 65 6d  ma *sqlite3Schem
3910: 61 47 65 74 28 73 71 6c 69 74 65 33 20 2a 64 62  aGet(sqlite3 *db
3920: 2c 20 42 74 72 65 65 20 2a 70 42 74 29 7b 0a 20  , Btree *pBt){. 
3930: 20 53 63 68 65 6d 61 20 2a 20 70 3b 0a 20 20 69   Schema * p;.  i
3940: 66 28 20 70 42 74 20 29 7b 0a 20 20 20 20 70 20  f( pBt ){.    p 
3950: 3d 20 28 53 63 68 65 6d 61 20 2a 29 73 71 6c 69  = (Schema *)sqli
3960: 74 65 33 42 74 72 65 65 53 63 68 65 6d 61 28 70  te3BtreeSchema(p
3970: 42 74 2c 20 73 69 7a 65 6f 66 28 53 63 68 65 6d  Bt, sizeof(Schem
3980: 61 29 2c 20 73 71 6c 69 74 65 33 53 63 68 65 6d  a), sqlite3Schem
3990: 61 46 72 65 65 29 3b 0a 20 20 7d 65 6c 73 65 7b  aFree);.  }else{
39a0: 0a 20 20 20 20 70 20 3d 20 28 53 63 68 65 6d 61  .    p = (Schema
39b0: 20 2a 29 73 71 6c 69 74 65 33 4d 61 6c 6c 6f 63   *)sqlite3Malloc
39c0: 5a 65 72 6f 28 73 69 7a 65 6f 66 28 53 63 68 65  Zero(sizeof(Sche
39d0: 6d 61 29 29 3b 0a 20 20 7d 0a 20 20 69 66 28 20  ma));.  }.  if( 
39e0: 21 70 20 29 7b 0a 20 20 20 20 64 62 2d 3e 6d 61  !p ){.    db->ma
39f0: 6c 6c 6f 63 46 61 69 6c 65 64 20 3d 20 31 3b 0a  llocFailed = 1;.
3a00: 20 20 7d 65 6c 73 65 20 69 66 20 28 20 30 3d 3d    }else if ( 0==
3a10: 70 2d 3e 66 69 6c 65 5f 66 6f 72 6d 61 74 20 29  p->file_format )
3a20: 7b 0a 20 20 20 20 73 71 6c 69 74 65 33 48 61 73  {.    sqlite3Has
3a30: 68 49 6e 69 74 28 26 70 2d 3e 74 62 6c 48 61 73  hInit(&p->tblHas
3a40: 68 29 3b 0a 20 20 20 20 73 71 6c 69 74 65 33 48  h);.    sqlite3H
3a50: 61 73 68 49 6e 69 74 28 26 70 2d 3e 69 64 78 48  ashInit(&p->idxH
3a60: 61 73 68 29 3b 0a 20 20 20 20 73 71 6c 69 74 65  ash);.    sqlite
3a70: 33 48 61 73 68 49 6e 69 74 28 26 70 2d 3e 74 72  3HashInit(&p->tr
3a80: 69 67 48 61 73 68 29 3b 0a 20 20 20 20 70 2d 3e  igHash);.    p->
3a90: 65 6e 63 20 3d 20 53 51 4c 49 54 45 5f 55 54 46  enc = SQLITE_UTF
3aa0: 38 3b 0a 20 20 7d 0a 20 20 72 65 74 75 72 6e 20  8;.  }.  return 
3ab0: 70 3b 0a 7d 0a                                   p;.}.