/ Hex Artifact Content
Login
SQLite training in Houston TX on 2019-11-05 (details)
Part of the 2019 Tcl Conference

Artifact 7102da21a8e4b2f8a4df79378d6dc0b01aa76a33:


0000: 2f 2a 0a 2a 2a 20 32 30 30 31 20 53 65 70 74 65  /*.** 2001 Septe
0010: 6d 62 65 72 20 31 35 0a 2a 2a 0a 2a 2a 20 54 68  mber 15.**.** Th
0020: 65 20 61 75 74 68 6f 72 20 64 69 73 63 6c 61 69  e author disclai
0030: 6d 73 20 63 6f 70 79 72 69 67 68 74 20 74 6f 20  ms copyright to 
0040: 74 68 69 73 20 73 6f 75 72 63 65 20 63 6f 64 65  this source code
0050: 2e 20 20 49 6e 20 70 6c 61 63 65 20 6f 66 0a 2a  .  In place of.*
0060: 2a 20 61 20 6c 65 67 61 6c 20 6e 6f 74 69 63 65  * a legal notice
0070: 2c 20 68 65 72 65 20 69 73 20 61 20 62 6c 65 73  , here is a bles
0080: 73 69 6e 67 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 4d  sing:.**.**    M
0090: 61 79 20 79 6f 75 20 64 6f 20 67 6f 6f 64 20 61  ay you do good a
00a0: 6e 64 20 6e 6f 74 20 65 76 69 6c 2e 0a 2a 2a 20  nd not evil..** 
00b0: 20 20 20 4d 61 79 20 79 6f 75 20 66 69 6e 64 20     May you find 
00c0: 66 6f 72 67 69 76 65 6e 65 73 73 20 66 6f 72 20  forgiveness for 
00d0: 79 6f 75 72 73 65 6c 66 20 61 6e 64 20 66 6f 72  yourself and for
00e0: 67 69 76 65 20 6f 74 68 65 72 73 2e 0a 2a 2a 20  give others..** 
00f0: 20 20 20 4d 61 79 20 79 6f 75 20 73 68 61 72 65     May you share
0100: 20 66 72 65 65 6c 79 2c 20 6e 65 76 65 72 20 74   freely, never t
0110: 61 6b 69 6e 67 20 6d 6f 72 65 20 74 68 61 6e 20  aking more than 
0120: 79 6f 75 20 67 69 76 65 2e 0a 2a 2a 0a 2a 2a 2a  you give..**.***
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 2a 2a 2a 2a 2a 0a 2a 2a 20 54 68 69 73 20 66  ******.** This f
0180: 69 6c 65 20 63 6f 6e 74 61 69 6e 73 20 74 68 65  ile contains the
0190: 20 73 71 6c 69 74 65 5f 67 65 74 5f 74 61 62 6c   sqlite_get_tabl
01a0: 65 28 29 20 61 6e 64 20 73 71 6c 69 74 65 5f 66  e() and sqlite_f
01b0: 72 65 65 5f 74 61 62 6c 65 28 29 0a 2a 2a 20 69  ree_table().** i
01c0: 6e 74 65 72 66 61 63 65 20 72 6f 75 74 69 6e 65  nterface routine
01d0: 73 2e 20 20 54 68 65 73 65 20 61 72 65 20 6a 75  s.  These are ju
01e0: 73 74 20 77 72 61 70 70 65 72 73 20 61 72 6f 75  st wrappers arou
01f0: 6e 64 20 74 68 65 20 6d 61 69 6e 0a 2a 2a 20 69  nd the main.** i
0200: 6e 74 65 72 66 61 63 65 20 72 6f 75 74 69 6e 65  nterface routine
0210: 20 6f 66 20 73 71 6c 69 74 65 5f 65 78 65 63 28   of sqlite_exec(
0220: 29 2e 0a 2a 2a 0a 2a 2a 20 54 68 65 73 65 20 72  )..**.** These r
0230: 6f 75 74 69 6e 65 73 20 61 72 65 20 69 6e 20 61  outines are in a
0240: 20 73 65 70 61 72 61 74 65 20 66 69 6c 65 73 20   separate files 
0250: 73 6f 20 74 68 61 74 20 74 68 65 79 20 77 69 6c  so that they wil
0260: 6c 20 6e 6f 74 20 62 65 20 6c 69 6e 6b 65 64 0a  l not be linked.
0270: 2a 2a 20 69 66 20 74 68 65 79 20 61 72 65 20 6e  ** if they are n
0280: 6f 74 20 75 73 65 64 2e 0a 2a 2f 0a 23 69 6e 63  ot used..*/.#inc
0290: 6c 75 64 65 20 3c 73 74 64 6c 69 62 2e 68 3e 0a  lude <stdlib.h>.
02a0: 23 69 6e 63 6c 75 64 65 20 22 73 71 6c 69 74 65  #include "sqlite
02b0: 2e 68 22 0a 0a 2f 2a 0a 2a 2a 20 54 68 69 73 20  .h"../*.** This 
02c0: 73 74 72 75 63 74 75 72 65 20 69 73 20 75 73 65  structure is use
02d0: 64 20 74 6f 20 70 61 73 73 20 64 61 74 61 20 66  d to pass data f
02e0: 72 6f 6d 20 73 71 6c 69 74 65 5f 67 65 74 5f 74  rom sqlite_get_t
02f0: 61 62 6c 65 28 29 20 74 68 72 6f 75 67 68 0a 2a  able() through.*
0300: 2a 20 74 6f 20 74 68 65 20 63 61 6c 6c 62 61 63  * to the callbac
0310: 6b 20 66 75 6e 63 74 69 6f 6e 20 69 73 20 75 73  k function is us
0320: 65 73 20 74 6f 20 62 75 69 6c 64 20 74 68 65 20  es to build the 
0330: 72 65 73 75 6c 74 2e 0a 2a 2f 0a 74 79 70 65 64  result..*/.typed
0340: 65 66 20 73 74 72 75 63 74 20 54 61 62 52 65 73  ef struct TabRes
0350: 75 6c 74 20 7b 0a 20 20 63 68 61 72 20 2a 2a 61  ult {.  char **a
0360: 7a 52 65 73 75 6c 74 3b 0a 20 20 69 6e 74 20 6e  zResult;.  int n
0370: 52 65 73 75 6c 74 3b 0a 20 20 69 6e 74 20 6e 41  Result;.  int nA
0380: 6c 6c 6f 63 3b 0a 20 20 69 6e 74 20 6e 52 6f 77  lloc;.  int nRow
0390: 3b 0a 20 20 69 6e 74 20 6e 43 6f 6c 75 6d 6e 3b  ;.  int nColumn;
03a0: 0a 20 20 69 6e 74 20 6e 44 61 74 61 3b 0a 20 20  .  int nData;.  
03b0: 69 6e 74 20 72 63 3b 0a 7d 20 54 61 62 52 65 73  int rc;.} TabRes
03c0: 75 6c 74 3b 0a 0a 2f 2a 0a 2a 2a 20 54 68 69 73  ult;../*.** This
03d0: 20 72 6f 75 74 69 6e 65 20 69 73 20 63 61 6c 6c   routine is call
03e0: 65 64 20 6f 6e 63 65 20 66 6f 72 20 65 61 63 68  ed once for each
03f0: 20 72 6f 77 20 69 6e 20 74 68 65 20 72 65 73 75   row in the resu
0400: 6c 74 20 74 61 62 6c 65 2e 20 20 49 74 73 20 6a  lt table.  Its j
0410: 6f 62 0a 2a 2a 20 69 73 20 74 6f 20 66 69 6c 6c  ob.** is to fill
0420: 20 69 6e 20 74 68 65 20 54 61 62 52 65 73 75 6c   in the TabResul
0430: 74 20 73 74 72 75 63 74 75 72 65 20 61 70 70 72  t structure appr
0440: 6f 70 72 69 61 74 65 6c 79 2c 20 61 6c 6c 6f 63  opriately, alloc
0450: 61 74 69 6e 67 20 6e 65 77 0a 2a 2a 20 6d 65 6d  ating new.** mem
0460: 6f 72 79 20 61 73 20 6e 65 63 65 73 73 61 72 79  ory as necessary
0470: 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74 20  ..*/.static int 
0480: 73 71 6c 69 74 65 5f 67 65 74 5f 74 61 62 6c 65  sqlite_get_table
0490: 5f 63 62 28 76 6f 69 64 20 2a 70 41 72 67 2c 20  _cb(void *pArg, 
04a0: 69 6e 74 20 6e 43 6f 6c 2c 20 63 68 61 72 20 2a  int nCol, char *
04b0: 2a 61 72 67 76 2c 20 63 68 61 72 20 2a 2a 63 6f  *argv, char **co
04c0: 6c 76 29 7b 0a 20 20 54 61 62 52 65 73 75 6c 74  lv){.  TabResult
04d0: 20 2a 70 20 3d 20 28 54 61 62 52 65 73 75 6c 74   *p = (TabResult
04e0: 2a 29 70 41 72 67 3b 0a 20 20 69 6e 74 20 6e 65  *)pArg;.  int ne
04f0: 65 64 3b 0a 20 20 69 6e 74 20 69 3b 0a 20 20 63  ed;.  int i;.  c
0500: 68 61 72 20 2a 7a 3b 0a 0a 20 20 2f 2a 20 4d 61  har *z;..  /* Ma
0510: 6b 65 20 73 75 72 65 20 74 68 65 72 65 20 69 73  ke sure there is
0520: 20 65 6e 6f 75 67 68 20 73 70 61 63 65 20 69 6e   enough space in
0530: 20 70 2d 3e 61 7a 52 65 73 75 6c 74 20 74 6f 20   p->azResult to 
0540: 68 6f 6c 64 20 65 76 65 72 79 74 68 69 6e 67 0a  hold everything.
0550: 20 20 2a 2a 20 77 65 20 6e 65 65 64 20 74 6f 20    ** we need to 
0560: 72 65 6d 65 6d 62 65 72 20 66 72 6f 6d 20 74 68  remember from th
0570: 69 73 20 69 6e 76 6f 63 61 74 69 6f 6e 20 6f 66  is invocation of
0580: 20 74 68 65 20 63 61 6c 6c 62 61 63 6b 2e 0a 20   the callback.. 
0590: 20 2a 2f 0a 20 20 69 66 28 20 70 2d 3e 6e 52 6f   */.  if( p->nRo
05a0: 77 3d 3d 30 20 26 26 20 61 72 67 76 21 3d 30 20  w==0 && argv!=0 
05b0: 29 7b 0a 20 20 20 20 6e 65 65 64 20 3d 20 6e 43  ){.    need = nC
05c0: 6f 6c 2a 32 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20  ol*2;.  }else{. 
05d0: 20 20 20 6e 65 65 64 20 3d 20 6e 43 6f 6c 3b 0a     need = nCol;.
05e0: 20 20 7d 0a 20 20 69 66 28 20 70 2d 3e 6e 44 61    }.  if( p->nDa
05f0: 74 61 20 2b 20 6e 65 65 64 20 3e 3d 20 70 2d 3e  ta + need >= p->
0600: 6e 41 6c 6c 6f 63 20 29 7b 0a 20 20 20 20 70 2d  nAlloc ){.    p-
0610: 3e 6e 41 6c 6c 6f 63 20 3d 20 70 2d 3e 6e 41 6c  >nAlloc = p->nAl
0620: 6c 6f 63 2a 32 20 2b 20 6e 65 65 64 20 2b 20 31  loc*2 + need + 1
0630: 3b 0a 20 20 20 20 70 2d 3e 61 7a 52 65 73 75 6c  ;.    p->azResul
0640: 74 20 3d 20 72 65 61 6c 6c 6f 63 28 20 70 2d 3e  t = realloc( p->
0650: 61 7a 52 65 73 75 6c 74 2c 20 73 69 7a 65 6f 66  azResult, sizeof
0660: 28 63 68 61 72 2a 29 2a 70 2d 3e 6e 41 6c 6c 6f  (char*)*p->nAllo
0670: 63 20 29 3b 0a 20 20 20 20 69 66 28 20 70 2d 3e  c );.    if( p->
0680: 61 7a 52 65 73 75 6c 74 3d 3d 30 20 29 7b 0a 20  azResult==0 ){. 
0690: 20 20 20 20 20 70 2d 3e 72 63 20 3d 20 53 51 4c       p->rc = SQL
06a0: 49 54 45 5f 4e 4f 4d 45 4d 3b 0a 20 20 20 20 20  ITE_NOMEM;.     
06b0: 20 72 65 74 75 72 6e 20 31 3b 0a 20 20 20 20 7d   return 1;.    }
06c0: 0a 20 20 7d 0a 0a 20 20 2f 2a 20 49 66 20 74 68  .  }..  /* If th
06d0: 69 73 20 69 73 20 74 68 65 20 66 69 72 73 74 20  is is the first 
06e0: 72 6f 77 2c 20 74 68 65 6e 20 67 65 6e 65 72 61  row, then genera
06f0: 74 65 20 61 6e 20 65 78 74 72 61 20 72 6f 77 20  te an extra row 
0700: 63 6f 6e 74 61 69 6e 69 6e 67 0a 20 20 2a 2a 20  containing.  ** 
0710: 74 68 65 20 6e 61 6d 65 73 20 6f 66 20 61 6c 6c  the names of all
0720: 20 63 6f 6c 75 6d 6e 73 2e 0a 20 20 2a 2f 0a 20   columns..  */. 
0730: 20 69 66 28 20 70 2d 3e 6e 52 6f 77 3d 3d 30 20   if( p->nRow==0 
0740: 29 7b 0a 20 20 20 20 70 2d 3e 6e 43 6f 6c 75 6d  ){.    p->nColum
0750: 6e 20 3d 20 6e 43 6f 6c 3b 0a 20 20 20 20 66 6f  n = nCol;.    fo
0760: 72 28 69 3d 30 3b 20 69 3c 6e 43 6f 6c 3b 20 69  r(i=0; i<nCol; i
0770: 2b 2b 29 7b 0a 20 20 20 20 20 20 69 66 28 20 63  ++){.      if( c
0780: 6f 6c 76 5b 69 5d 3d 3d 30 20 29 7b 0a 20 20 20  olv[i]==0 ){.   
0790: 20 20 20 20 20 7a 20 3d 20 30 3b 0a 20 20 20 20       z = 0;.    
07a0: 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 20    }else{.       
07b0: 20 7a 20 3d 20 6d 61 6c 6c 6f 63 28 20 73 74 72   z = malloc( str
07c0: 6c 65 6e 28 63 6f 6c 76 5b 69 5d 29 2b 31 20 29  len(colv[i])+1 )
07d0: 3b 0a 20 20 20 20 20 20 20 20 69 66 28 20 7a 3d  ;.        if( z=
07e0: 3d 30 20 29 7b 0a 20 20 20 20 20 20 20 20 20 20  =0 ){.          
07f0: 70 2d 3e 72 63 20 3d 20 53 51 4c 49 54 45 5f 4e  p->rc = SQLITE_N
0800: 4f 4d 45 4d 3b 0a 20 20 20 20 20 20 20 20 20 20  OMEM;.          
0810: 72 65 74 75 72 6e 20 31 3b 0a 20 20 20 20 20 20  return 1;.      
0820: 20 20 7d 0a 20 20 20 20 20 20 20 20 73 74 72 63    }.        strc
0830: 70 79 28 7a 2c 20 63 6f 6c 76 5b 69 5d 29 3b 0a  py(z, colv[i]);.
0840: 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 70 2d        }.      p-
0850: 3e 61 7a 52 65 73 75 6c 74 5b 70 2d 3e 6e 44 61  >azResult[p->nDa
0860: 74 61 2b 2b 5d 20 3d 20 7a 3b 0a 20 20 20 20 7d  ta++] = z;.    }
0870: 0a 20 20 7d 0a 0a 20 20 2f 2a 20 43 6f 70 79 20  .  }..  /* Copy 
0880: 6f 76 65 72 20 74 68 65 20 72 6f 77 20 64 61 74  over the row dat
0890: 61 0a 20 20 2a 2f 0a 20 20 69 66 28 20 61 72 67  a.  */.  if( arg
08a0: 76 21 3d 30 20 29 7b 0a 20 20 20 20 66 6f 72 28  v!=0 ){.    for(
08b0: 69 3d 30 3b 20 69 3c 6e 43 6f 6c 3b 20 69 2b 2b  i=0; i<nCol; i++
08c0: 29 7b 0a 20 20 20 20 20 20 69 66 28 20 61 72 67  ){.      if( arg
08d0: 76 5b 69 5d 3d 3d 30 20 29 7b 0a 20 20 20 20 20  v[i]==0 ){.     
08e0: 20 20 20 7a 20 3d 20 30 3b 0a 20 20 20 20 20 20     z = 0;.      
08f0: 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 20 20 7a  }else{.        z
0900: 20 3d 20 6d 61 6c 6c 6f 63 28 20 73 74 72 6c 65   = malloc( strle
0910: 6e 28 61 72 67 76 5b 69 5d 29 2b 31 20 29 3b 0a  n(argv[i])+1 );.
0920: 20 20 20 20 20 20 20 20 69 66 28 20 7a 3d 3d 30          if( z==0
0930: 20 29 7b 0a 20 20 20 20 20 20 20 20 20 20 70 2d   ){.          p-
0940: 3e 72 63 20 3d 20 53 51 4c 49 54 45 5f 4e 4f 4d  >rc = SQLITE_NOM
0950: 45 4d 3b 0a 20 20 20 20 20 20 20 20 20 20 72 65  EM;.          re
0960: 74 75 72 6e 20 31 3b 0a 20 20 20 20 20 20 20 20  turn 1;.        
0970: 7d 0a 20 20 20 20 20 20 20 20 73 74 72 63 70 79  }.        strcpy
0980: 28 7a 2c 20 61 72 67 76 5b 69 5d 29 3b 0a 20 20  (z, argv[i]);.  
0990: 20 20 20 20 7d 0a 20 20 20 20 20 20 70 2d 3e 61      }.      p->a
09a0: 7a 52 65 73 75 6c 74 5b 70 2d 3e 6e 44 61 74 61  zResult[p->nData
09b0: 2b 2b 5d 20 3d 20 7a 3b 0a 20 20 20 20 7d 0a 20  ++] = z;.    }. 
09c0: 20 20 20 70 2d 3e 6e 52 6f 77 2b 2b 3b 0a 20 20     p->nRow++;.  
09d0: 7d 0a 20 20 72 65 74 75 72 6e 20 30 3b 0a 7d 0a  }.  return 0;.}.
09e0: 0a 2f 2a 0a 2a 2a 20 51 75 65 72 79 20 74 68 65  ./*.** Query the
09f0: 20 64 61 74 61 62 61 73 65 2e 20 20 42 75 74 20   database.  But 
0a00: 69 6e 73 74 65 61 64 20 6f 66 20 69 6e 76 6f 6b  instead of invok
0a10: 69 6e 67 20 61 20 63 61 6c 6c 62 61 63 6b 20 66  ing a callback f
0a20: 6f 72 20 65 61 63 68 20 72 6f 77 2c 0a 2a 2a 20  or each row,.** 
0a30: 6d 61 6c 6c 6f 63 28 29 20 66 6f 72 20 73 70 61  malloc() for spa
0a40: 63 65 20 74 6f 20 68 6f 6c 64 20 74 68 65 20 72  ce to hold the r
0a50: 65 73 75 6c 74 20 61 6e 64 20 72 65 74 75 72 6e  esult and return
0a60: 20 74 68 65 20 65 6e 74 69 72 65 20 72 65 73 75   the entire resu
0a70: 6c 74 73 0a 2a 2a 20 61 74 20 74 68 65 20 63 6f  lts.** at the co
0a80: 6e 63 6c 75 73 69 6f 6e 20 6f 66 20 74 68 65 20  nclusion of the 
0a90: 63 61 6c 6c 2e 0a 2a 2a 0a 2a 2a 20 54 68 65 20  call..**.** The 
0aa0: 72 65 73 75 6c 74 20 74 68 61 74 20 69 73 20 77  result that is w
0ab0: 72 69 74 74 65 6e 20 74 6f 20 2a 2a 2a 70 61 7a  ritten to ***paz
0ac0: 52 65 73 75 6c 74 20 69 73 20 68 65 6c 64 20 69  Result is held i
0ad0: 6e 20 6d 65 6d 6f 72 79 20 6f 62 74 61 69 6e 65  n memory obtaine
0ae0: 64 0a 2a 2a 20 66 72 6f 6d 20 6d 61 6c 6c 6f 63  d.** from malloc
0af0: 28 29 2e 20 20 42 75 74 20 74 68 65 20 63 61 6c  ().  But the cal
0b00: 6c 65 72 20 63 61 6e 6e 6f 74 20 66 72 65 65 20  ler cannot free 
0b10: 74 68 69 73 20 6d 65 6d 6f 72 79 20 64 69 72 65  this memory dire
0b20: 63 74 6c 79 2e 20 20 0a 2a 2a 20 49 6e 73 74 65  ctly.  .** Inste
0b30: 61 64 2c 20 74 68 65 20 65 6e 74 69 72 65 20 74  ad, the entire t
0b40: 61 62 6c 65 20 73 68 6f 75 6c 64 20 62 65 20 70  able should be p
0b50: 61 73 73 65 64 20 74 6f 20 73 71 6c 69 74 65 5f  assed to sqlite_
0b60: 66 72 65 65 5f 74 61 62 6c 65 28 29 20 77 68 65  free_table() whe
0b70: 6e 0a 2a 2a 20 74 68 65 20 63 61 6c 6c 69 6e 67  n.** the calling
0b80: 20 70 72 6f 63 65 64 75 72 65 20 69 73 20 66 69   procedure is fi
0b90: 6e 69 73 68 65 64 20 75 73 69 6e 67 20 69 74 2e  nished using it.
0ba0: 0a 2a 2f 0a 69 6e 74 20 73 71 6c 69 74 65 5f 67  .*/.int sqlite_g
0bb0: 65 74 5f 74 61 62 6c 65 28 0a 20 20 73 71 6c 69  et_table(.  sqli
0bc0: 74 65 20 2a 64 62 2c 20 20 20 20 20 20 20 20 20  te *db,         
0bd0: 20 20 20 20 20 20 20 20 2f 2a 20 54 68 65 20 64          /* The d
0be0: 61 74 61 62 61 73 65 20 6f 6e 20 77 68 69 63 68  atabase on which
0bf0: 20 74 68 65 20 53 51 4c 20 65 78 65 63 75 74 65   the SQL execute
0c00: 73 20 2a 2f 0a 20 20 63 68 61 72 20 2a 7a 53 71  s */.  char *zSq
0c10: 6c 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20  l,              
0c20: 20 20 20 2f 2a 20 54 68 65 20 53 51 4c 20 74 6f     /* The SQL to
0c30: 20 62 65 20 65 78 65 63 75 74 65 64 20 2a 2f 0a   be executed */.
0c40: 20 20 63 68 61 72 20 2a 2a 2a 70 61 7a 52 65 73    char ***pazRes
0c50: 75 6c 74 2c 20 20 20 20 20 20 20 20 20 20 2f 2a  ult,          /*
0c60: 20 57 72 69 74 65 20 74 68 65 20 72 65 73 75 6c   Write the resul
0c70: 74 20 74 61 62 6c 65 20 68 65 72 65 20 2a 2f 0a  t table here */.
0c80: 20 20 69 6e 74 20 2a 70 6e 52 6f 77 2c 20 20 20    int *pnRow,   
0c90: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a                /*
0ca0: 20 57 72 69 74 65 20 74 68 65 20 6e 75 6d 62 65   Write the numbe
0cb0: 72 20 6f 66 20 72 6f 77 73 20 69 6e 20 74 68 65  r of rows in the
0cc0: 20 72 65 73 75 6c 74 20 68 65 72 65 20 2a 2f 0a   result here */.
0cd0: 20 20 69 6e 74 20 2a 70 6e 43 6f 6c 75 6d 6e 2c    int *pnColumn,
0ce0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a                /*
0cf0: 20 57 72 69 74 65 20 74 68 65 20 6e 75 6d 62 65   Write the numbe
0d00: 72 20 6f 66 20 63 6f 6c 75 6d 6e 73 20 6f 66 20  r of columns of 
0d10: 72 65 73 75 6c 74 20 68 65 72 65 20 2a 2f 0a 20  result here */. 
0d20: 20 63 68 61 72 20 2a 2a 70 7a 45 72 72 4d 73 67   char **pzErrMsg
0d30: 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20               /* 
0d40: 57 72 69 74 65 20 65 72 72 6f 72 20 6d 65 73 73  Write error mess
0d50: 61 67 65 73 20 68 65 72 65 20 2a 2f 0a 29 7b 0a  ages here */.){.
0d60: 20 20 69 6e 74 20 72 63 3b 0a 20 20 54 61 62 52    int rc;.  TabR
0d70: 65 73 75 6c 74 20 72 65 73 3b 0a 20 20 69 66 28  esult res;.  if(
0d80: 20 70 61 7a 52 65 73 75 6c 74 3d 3d 30 20 29 7b   pazResult==0 ){
0d90: 20 72 65 74 75 72 6e 20 53 51 4c 49 54 45 5f 45   return SQLITE_E
0da0: 52 52 4f 52 3b 20 7d 0a 20 20 2a 70 61 7a 52 65  RROR; }.  *pazRe
0db0: 73 75 6c 74 20 3d 20 30 3b 0a 20 20 69 66 28 20  sult = 0;.  if( 
0dc0: 70 6e 43 6f 6c 75 6d 6e 20 29 20 2a 70 6e 43 6f  pnColumn ) *pnCo
0dd0: 6c 75 6d 6e 20 3d 20 30 3b 0a 20 20 69 66 28 20  lumn = 0;.  if( 
0de0: 70 6e 52 6f 77 20 29 20 2a 70 6e 52 6f 77 20 3d  pnRow ) *pnRow =
0df0: 20 30 3b 0a 20 20 72 65 73 2e 6e 52 65 73 75 6c   0;.  res.nResul
0e00: 74 20 3d 20 30 3b 0a 20 20 72 65 73 2e 6e 52 6f  t = 0;.  res.nRo
0e10: 77 20 3d 20 30 3b 0a 20 20 72 65 73 2e 6e 43 6f  w = 0;.  res.nCo
0e20: 6c 75 6d 6e 20 3d 20 30 3b 0a 20 20 72 65 73 2e  lumn = 0;.  res.
0e30: 6e 44 61 74 61 20 3d 20 31 3b 0a 20 20 72 65 73  nData = 1;.  res
0e40: 2e 6e 41 6c 6c 6f 63 20 3d 20 32 30 3b 0a 20 20  .nAlloc = 20;.  
0e50: 72 65 73 2e 72 63 20 3d 20 53 51 4c 49 54 45 5f  res.rc = SQLITE_
0e60: 4f 4b 3b 0a 20 20 72 65 73 2e 61 7a 52 65 73 75  OK;.  res.azResu
0e70: 6c 74 20 3d 20 6d 61 6c 6c 6f 63 28 20 73 69 7a  lt = malloc( siz
0e80: 65 6f 66 28 63 68 61 72 2a 29 2a 72 65 73 2e 6e  eof(char*)*res.n
0e90: 41 6c 6c 6f 63 20 29 3b 0a 20 20 69 66 28 20 72  Alloc );.  if( r
0ea0: 65 73 2e 61 7a 52 65 73 75 6c 74 3d 3d 30 20 29  es.azResult==0 )
0eb0: 7b 0a 20 20 20 20 72 65 74 75 72 6e 20 53 51 4c  {.    return SQL
0ec0: 49 54 45 5f 4e 4f 4d 45 4d 3b 0a 20 20 7d 0a 20  ITE_NOMEM;.  }. 
0ed0: 20 72 65 73 2e 61 7a 52 65 73 75 6c 74 5b 30 5d   res.azResult[0]
0ee0: 20 3d 20 30 3b 0a 20 20 72 63 20 3d 20 73 71 6c   = 0;.  rc = sql
0ef0: 69 74 65 5f 65 78 65 63 28 64 62 2c 20 7a 53 71  ite_exec(db, zSq
0f00: 6c 2c 20 73 71 6c 69 74 65 5f 67 65 74 5f 74 61  l, sqlite_get_ta
0f10: 62 6c 65 5f 63 62 2c 20 26 72 65 73 2c 20 70 7a  ble_cb, &res, pz
0f20: 45 72 72 4d 73 67 29 3b 0a 20 20 69 66 28 20 72  ErrMsg);.  if( r
0f30: 65 73 2e 61 7a 52 65 73 75 6c 74 20 29 7b 0a 20  es.azResult ){. 
0f40: 20 20 20 72 65 73 2e 61 7a 52 65 73 75 6c 74 5b     res.azResult[
0f50: 30 5d 20 3d 20 28 63 68 61 72 2a 29 72 65 73 2e  0] = (char*)res.
0f60: 6e 44 61 74 61 3b 0a 20 20 7d 0a 20 20 69 66 28  nData;.  }.  if(
0f70: 20 72 63 3d 3d 53 51 4c 49 54 45 5f 41 42 4f 52   rc==SQLITE_ABOR
0f80: 54 20 29 7b 0a 20 20 20 20 73 71 6c 69 74 65 5f  T ){.    sqlite_
0f90: 66 72 65 65 5f 74 61 62 6c 65 28 26 72 65 73 2e  free_table(&res.
0fa0: 61 7a 52 65 73 75 6c 74 5b 31 5d 29 3b 0a 20 20  azResult[1]);.  
0fb0: 20 20 72 65 74 75 72 6e 20 72 65 73 2e 72 63 3b    return res.rc;
0fc0: 0a 20 20 7d 0a 20 20 69 66 28 20 72 63 21 3d 53  .  }.  if( rc!=S
0fd0: 51 4c 49 54 45 5f 4f 4b 20 29 7b 0a 20 20 20 20  QLITE_OK ){.    
0fe0: 73 71 6c 69 74 65 5f 66 72 65 65 5f 74 61 62 6c  sqlite_free_tabl
0ff0: 65 28 26 72 65 73 2e 61 7a 52 65 73 75 6c 74 5b  e(&res.azResult[
1000: 31 5d 29 3b 0a 20 20 20 20 72 65 74 75 72 6e 20  1]);.    return 
1010: 72 63 3b 0a 20 20 7d 0a 20 20 69 66 28 20 72 65  rc;.  }.  if( re
1020: 73 2e 6e 41 6c 6c 6f 63 3e 72 65 73 2e 6e 44 61  s.nAlloc>res.nDa
1030: 74 61 20 29 7b 0a 20 20 20 20 72 65 73 2e 61 7a  ta ){.    res.az
1040: 52 65 73 75 6c 74 20 3d 20 72 65 61 6c 6c 6f 63  Result = realloc
1050: 28 20 72 65 73 2e 61 7a 52 65 73 75 6c 74 2c 20  ( res.azResult, 
1060: 73 69 7a 65 6f 66 28 63 68 61 72 2a 29 2a 28 72  sizeof(char*)*(r
1070: 65 73 2e 6e 44 61 74 61 2b 31 29 20 29 3b 0a 20  es.nData+1) );. 
1080: 20 20 20 69 66 28 20 72 65 73 2e 61 7a 52 65 73     if( res.azRes
1090: 75 6c 74 3d 3d 30 20 29 20 72 65 74 75 72 6e 20  ult==0 ) return 
10a0: 53 51 4c 49 54 45 5f 4e 4f 4d 45 4d 3b 0a 20 20  SQLITE_NOMEM;.  
10b0: 7d 0a 20 20 2a 70 61 7a 52 65 73 75 6c 74 20 3d  }.  *pazResult =
10c0: 20 26 72 65 73 2e 61 7a 52 65 73 75 6c 74 5b 31   &res.azResult[1
10d0: 5d 3b 0a 20 20 69 66 28 20 70 6e 43 6f 6c 75 6d  ];.  if( pnColum
10e0: 6e 20 29 20 2a 70 6e 43 6f 6c 75 6d 6e 20 3d 20  n ) *pnColumn = 
10f0: 72 65 73 2e 6e 43 6f 6c 75 6d 6e 3b 0a 20 20 69  res.nColumn;.  i
1100: 66 28 20 70 6e 52 6f 77 20 29 20 2a 70 6e 52 6f  f( pnRow ) *pnRo
1110: 77 20 3d 20 72 65 73 2e 6e 52 6f 77 3b 0a 20 20  w = res.nRow;.  
1120: 72 65 74 75 72 6e 20 72 63 3b 0a 7d 0a 0a 2f 2a  return rc;.}../*
1130: 0a 2a 2a 20 54 68 69 73 20 72 6f 75 74 69 6e 65  .** This routine
1140: 20 66 72 65 65 73 20 74 68 65 20 73 70 61 63 65   frees the space
1150: 20 74 68 65 20 73 71 6c 69 74 65 5f 67 65 74 5f   the sqlite_get_
1160: 74 61 62 6c 65 28 29 20 6d 61 6c 6c 6f 63 65 64  table() malloced
1170: 2e 0a 2a 2f 0a 76 6f 69 64 20 73 71 6c 69 74 65  ..*/.void sqlite
1180: 5f 66 72 65 65 5f 74 61 62 6c 65 28 0a 20 20 63  _free_table(.  c
1190: 68 61 72 20 2a 2a 61 7a 52 65 73 75 6c 74 20 20  har **azResult  
11a0: 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 52 65             /* Re
11b0: 73 75 6c 74 20 72 65 74 75 72 6e 65 64 20 66 72  sult returned fr
11c0: 6f 6d 20 66 72 6f 6d 20 73 71 6c 69 74 65 5f 67  om from sqlite_g
11d0: 65 74 5f 74 61 62 6c 65 28 29 20 2a 2f 0a 29 7b  et_table() */.){
11e0: 0a 20 20 69 66 28 20 61 7a 52 65 73 75 6c 74 20  .  if( azResult 
11f0: 29 7b 0a 20 20 20 20 69 6e 74 20 69 2c 20 6e 3b  ){.    int i, n;
1200: 0a 20 20 20 20 61 7a 52 65 73 75 6c 74 2d 2d 3b  .    azResult--;
1210: 0a 20 20 20 20 6e 20 3d 20 28 69 6e 74 29 61 7a  .    n = (int)az
1220: 52 65 73 75 6c 74 5b 30 5d 3b 0a 20 20 20 20 66  Result[0];.    f
1230: 6f 72 28 69 3d 31 3b 20 69 3c 6e 3b 20 69 2b 2b  or(i=1; i<n; i++
1240: 29 7b 20 69 66 28 20 61 7a 52 65 73 75 6c 74 5b  ){ if( azResult[
1250: 69 5d 20 29 20 66 72 65 65 28 61 7a 52 65 73 75  i] ) free(azResu
1260: 6c 74 5b 69 5d 29 3b 20 7d 0a 20 20 20 20 66 72  lt[i]); }.    fr
1270: 65 65 28 61 7a 52 65 73 75 6c 74 29 3b 0a 20 20  ee(azResult);.  
1280: 7d 0a 7d 0a                                      }.}.