/ Hex Artifact Content
Login

Artifact 085bbfa57ea58bb15d994ba4cd397bff6f0c38c4f618adbc62cf4d3780e5d88a:


0000: 2f 2a 0a 2a 2a 20 32 30 31 39 2d 30 33 2d 33 30  /*.** 2019-03-30
0010: 0a 2a 2a 0a 2a 2a 20 54 68 65 20 61 75 74 68 6f  .**.** The autho
0020: 72 20 64 69 73 63 6c 61 69 6d 73 20 63 6f 70 79  r disclaims copy
0030: 72 69 67 68 74 20 74 6f 20 74 68 69 73 20 73 6f  right to this so
0040: 75 72 63 65 20 63 6f 64 65 2e 20 20 49 6e 20 70  urce code.  In p
0050: 6c 61 63 65 20 6f 66 0a 2a 2a 20 61 20 6c 65 67  lace of.** a leg
0060: 61 6c 20 6e 6f 74 69 63 65 2c 20 68 65 72 65 20  al notice, here 
0070: 69 73 20 61 20 62 6c 65 73 73 69 6e 67 3a 0a 2a  is a blessing:.*
0080: 2a 0a 2a 2a 20 20 20 20 4d 61 79 20 79 6f 75 20  *.**    May you 
0090: 64 6f 20 67 6f 6f 64 20 61 6e 64 20 6e 6f 74 20  do good and not 
00a0: 65 76 69 6c 2e 0a 2a 2a 20 20 20 20 4d 61 79 20  evil..**    May 
00b0: 79 6f 75 20 66 69 6e 64 20 66 6f 72 67 69 76 65  you find forgive
00c0: 6e 65 73 73 20 66 6f 72 20 79 6f 75 72 73 65 6c  ness for yoursel
00d0: 66 20 61 6e 64 20 66 6f 72 67 69 76 65 20 6f 74  f and forgive ot
00e0: 68 65 72 73 2e 0a 2a 2a 20 20 20 20 4d 61 79 20  hers..**    May 
00f0: 79 6f 75 20 73 68 61 72 65 20 66 72 65 65 6c 79  you share freely
0100: 2c 20 6e 65 76 65 72 20 74 61 6b 69 6e 67 20 6d  , never taking m
0110: 6f 72 65 20 74 68 61 6e 20 79 6f 75 20 67 69 76  ore than you giv
0120: 65 2e 0a 2a 2a 0a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  e..**.**********
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 0a 2a 2a 0a 2a 2a 20 41 6e 20 53 51  ****.**.** An SQ
0180: 4c 20 66 75 6e 63 74 69 6f 6e 20 74 68 61 74 20  L function that 
0190: 75 73 65 73 20 74 68 65 20 69 6e 63 72 65 6d 65  uses the increme
01a0: 6e 74 61 6c 20 42 4c 4f 42 20 49 2f 4f 20 6d 65  ntal BLOB I/O me
01b0: 63 68 61 6e 69 73 6d 20 6f 66 20 53 51 4c 69 74  chanism of SQLit
01c0: 65 0a 2a 2a 20 74 6f 20 72 65 61 64 20 6f 72 20  e.** to read or 
01d0: 77 72 69 74 65 20 70 61 72 74 20 6f 66 20 61 20  write part of a 
01e0: 62 6c 6f 62 2e 20 20 54 68 69 73 20 69 73 20 69  blob.  This is i
01f0: 6e 74 65 6e 64 65 64 20 66 6f 72 20 64 65 62 75  ntended for debu
0200: 67 67 69 6e 67 20 75 73 65 0a 2a 2a 20 69 6e 20  gging use.** in 
0210: 74 68 65 20 43 4c 49 2e 0a 2a 2a 0a 2a 2a 20 20  the CLI..**.**  
0220: 20 20 20 20 72 65 61 64 62 6c 6f 62 28 53 43 48      readblob(SCH
0230: 45 4d 41 2c 54 41 42 4c 45 2c 43 4f 4c 55 4d 4e  EMA,TABLE,COLUMN
0240: 2c 52 4f 57 49 44 2c 4f 46 46 53 45 54 2c 4e 29  ,ROWID,OFFSET,N)
0250: 0a 2a 2a 0a 2a 2a 20 52 65 74 75 72 6e 73 20 4e  .**.** Returns N
0260: 20 62 79 74 65 73 20 6f 66 20 74 68 65 20 62 6c   bytes of the bl
0270: 6f 62 20 73 74 61 72 74 69 6e 67 20 61 74 20 4f  ob starting at O
0280: 46 46 53 45 54 2e 0a 2a 2a 0a 2a 2a 20 20 20 20  FFSET..**.**    
0290: 20 20 77 72 69 74 65 62 6c 6f 62 28 53 43 48 45    writeblob(SCHE
02a0: 4d 41 2c 54 41 42 4c 45 2c 43 4f 4c 55 4d 4e 2c  MA,TABLE,COLUMN,
02b0: 52 4f 57 49 44 2c 4f 46 46 53 45 54 2c 4e 45 57  ROWID,OFFSET,NEW
02c0: 44 41 54 41 29 0a 2a 2a 0a 2a 2a 20 4e 45 57 44  DATA).**.** NEWD
02d0: 41 54 41 20 6d 75 73 74 20 62 65 20 61 20 62 6c  ATA must be a bl
02e0: 6f 62 2e 20 20 54 68 65 20 63 6f 6e 74 65 6e 74  ob.  The content
02f0: 20 6f 66 20 4e 45 57 44 41 54 41 20 6f 76 65 72   of NEWDATA over
0300: 77 72 69 74 65 73 20 74 68 65 0a 2a 2a 20 65 78  writes the.** ex
0310: 69 73 74 69 6e 67 20 42 4c 4f 42 20 64 61 74 61  isting BLOB data
0320: 20 61 74 20 53 43 48 45 4d 41 2e 54 41 42 4c 45   at SCHEMA.TABLE
0330: 2e 43 4f 4c 55 4d 4e 20 66 6f 72 20 72 6f 77 20  .COLUMN for row 
0340: 52 4f 57 49 44 20 62 65 67 69 6e 6e 69 6e 67 0a  ROWID beginning.
0350: 2a 2a 20 61 74 20 4f 46 46 53 45 54 20 62 79 74  ** at OFFSET byt
0360: 65 73 20 69 6e 74 6f 20 74 68 65 20 62 6c 6f 62  es into the blob
0370: 2e 0a 2a 2f 0a 23 69 6e 63 6c 75 64 65 20 22 73  ..*/.#include "s
0380: 71 6c 69 74 65 33 65 78 74 2e 68 22 0a 53 51 4c  qlite3ext.h".SQL
0390: 49 54 45 5f 45 58 54 45 4e 53 49 4f 4e 5f 49 4e  ITE_EXTENSION_IN
03a0: 49 54 31 0a 23 69 6e 63 6c 75 64 65 20 3c 61 73  IT1.#include <as
03b0: 73 65 72 74 2e 68 3e 0a 23 69 6e 63 6c 75 64 65  sert.h>.#include
03c0: 20 3c 73 74 72 69 6e 67 2e 68 3e 0a 0a 73 74 61   <string.h>..sta
03d0: 74 69 63 20 76 6f 69 64 20 72 65 61 64 62 6c 6f  tic void readblo
03e0: 62 46 75 6e 63 28 0a 20 20 73 71 6c 69 74 65 33  bFunc(.  sqlite3
03f0: 5f 63 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78  _context *contex
0400: 74 2c 0a 20 20 69 6e 74 20 61 72 67 63 2c 0a 20  t,.  int argc,. 
0410: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a   sqlite3_value *
0420: 2a 61 72 67 76 0a 29 7b 0a 20 20 73 71 6c 69 74  *argv.){.  sqlit
0430: 65 33 5f 62 6c 6f 62 20 2a 70 42 6c 6f 62 20 3d  e3_blob *pBlob =
0440: 20 30 3b 0a 20 20 63 6f 6e 73 74 20 63 68 61 72   0;.  const char
0450: 20 2a 7a 53 63 68 65 6d 61 3b 0a 20 20 63 6f 6e   *zSchema;.  con
0460: 73 74 20 63 68 61 72 20 2a 7a 54 61 62 6c 65 3b  st char *zTable;
0470: 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a  .  const char *z
0480: 43 6f 6c 75 6d 6e 3b 0a 20 20 73 71 6c 69 74 65  Column;.  sqlite
0490: 33 5f 69 6e 74 36 34 20 69 52 6f 77 69 64 3b 0a  3_int64 iRowid;.
04a0: 20 20 69 6e 74 20 69 4f 66 73 74 3b 0a 20 20 75    int iOfst;.  u
04b0: 6e 73 69 67 6e 65 64 20 63 68 61 72 20 2a 61 44  nsigned char *aD
04c0: 61 74 61 3b 0a 20 20 69 6e 74 20 6e 44 61 74 61  ata;.  int nData
04d0: 3b 0a 20 20 73 71 6c 69 74 65 33 20 2a 64 62 3b  ;.  sqlite3 *db;
04e0: 0a 20 20 69 6e 74 20 72 63 3b 0a 0a 20 20 7a 53  .  int rc;..  zS
04f0: 63 68 65 6d 61 20 3d 20 28 63 6f 6e 73 74 20 63  chema = (const c
0500: 68 61 72 2a 29 73 71 6c 69 74 65 33 5f 76 61 6c  har*)sqlite3_val
0510: 75 65 5f 74 65 78 74 28 61 72 67 76 5b 30 5d 29  ue_text(argv[0])
0520: 3b 0a 20 20 7a 54 61 62 6c 65 20 3d 20 28 63 6f  ;.  zTable = (co
0530: 6e 73 74 20 63 68 61 72 2a 29 73 71 6c 69 74 65  nst char*)sqlite
0540: 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67  3_value_text(arg
0550: 76 5b 31 5d 29 3b 0a 20 20 69 66 28 20 7a 54 61  v[1]);.  if( zTa
0560: 62 6c 65 3d 3d 30 20 29 7b 0a 20 20 20 20 73 71  ble==0 ){.    sq
0570: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 65 72 72  lite3_result_err
0580: 6f 72 28 63 6f 6e 74 65 78 74 2c 20 22 62 61 64  or(context, "bad
0590: 20 74 61 62 6c 65 20 6e 61 6d 65 22 2c 20 2d 31   table name", -1
05a0: 29 3b 0a 20 20 20 20 72 65 74 75 72 6e 3b 0a 20  );.    return;. 
05b0: 20 7d 0a 20 20 7a 43 6f 6c 75 6d 6e 20 3d 20 28   }.  zColumn = (
05c0: 63 6f 6e 73 74 20 63 68 61 72 2a 29 73 71 6c 69  const char*)sqli
05d0: 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61  te3_value_text(a
05e0: 72 67 76 5b 32 5d 29 3b 0a 20 20 69 66 28 20 7a  rgv[2]);.  if( z
05f0: 54 61 62 6c 65 3d 3d 30 20 29 7b 0a 20 20 20 20  Table==0 ){.    
0600: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 65  sqlite3_result_e
0610: 72 72 6f 72 28 63 6f 6e 74 65 78 74 2c 20 22 62  rror(context, "b
0620: 61 64 20 63 6f 6c 75 6d 6e 20 6e 61 6d 65 22 2c  ad column name",
0630: 20 2d 31 29 3b 0a 20 20 20 20 72 65 74 75 72 6e   -1);.    return
0640: 3b 0a 20 20 7d 0a 20 20 69 52 6f 77 69 64 20 3d  ;.  }.  iRowid =
0650: 20 73 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 69   sqlite3_value_i
0660: 6e 74 36 34 28 61 72 67 76 5b 33 5d 29 3b 0a 20  nt64(argv[3]);. 
0670: 20 69 4f 66 73 74 20 3d 20 73 71 6c 69 74 65 33   iOfst = sqlite3
0680: 5f 76 61 6c 75 65 5f 69 6e 74 28 61 72 67 76 5b  _value_int(argv[
0690: 34 5d 29 3b 0a 20 20 6e 44 61 74 61 20 3d 20 73  4]);.  nData = s
06a0: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 69 6e 74  qlite3_value_int
06b0: 28 61 72 67 76 5b 35 5d 29 3b 0a 20 20 69 66 28  (argv[5]);.  if(
06c0: 20 6e 44 61 74 61 3c 3d 30 20 29 20 72 65 74 75   nData<=0 ) retu
06d0: 72 6e 3b 0a 20 20 61 44 61 74 61 20 3d 20 73 71  rn;.  aData = sq
06e0: 6c 69 74 65 33 5f 6d 61 6c 6c 6f 63 36 34 28 20  lite3_malloc64( 
06f0: 6e 44 61 74 61 2b 31 20 29 3b 0a 20 20 69 66 28  nData+1 );.  if(
0700: 20 61 44 61 74 61 3d 3d 30 20 29 7b 0a 20 20 20   aData==0 ){.   
0710: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
0720: 65 72 72 6f 72 5f 6e 6f 6d 65 6d 28 63 6f 6e 74  error_nomem(cont
0730: 65 78 74 29 3b 0a 20 20 20 20 72 65 74 75 72 6e  ext);.    return
0740: 3b 0a 20 20 7d 0a 20 20 64 62 20 3d 20 73 71 6c  ;.  }.  db = sql
0750: 69 74 65 33 5f 63 6f 6e 74 65 78 74 5f 64 62 5f  ite3_context_db_
0760: 68 61 6e 64 6c 65 28 63 6f 6e 74 65 78 74 29 3b  handle(context);
0770: 0a 20 20 72 63 20 3d 20 73 71 6c 69 74 65 33 5f  .  rc = sqlite3_
0780: 62 6c 6f 62 5f 6f 70 65 6e 28 64 62 2c 20 7a 53  blob_open(db, zS
0790: 63 68 65 6d 61 2c 20 7a 54 61 62 6c 65 2c 20 7a  chema, zTable, z
07a0: 43 6f 6c 75 6d 6e 2c 20 69 52 6f 77 69 64 2c 20  Column, iRowid, 
07b0: 30 2c 20 26 70 42 6c 6f 62 29 3b 0a 20 20 69 66  0, &pBlob);.  if
07c0: 28 20 72 63 20 29 7b 0a 20 20 20 20 73 71 6c 69  ( rc ){.    sqli
07d0: 74 65 33 5f 66 72 65 65 28 61 44 61 74 61 29 3b  te3_free(aData);
07e0: 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73  .    sqlite3_res
07f0: 75 6c 74 5f 65 72 72 6f 72 28 63 6f 6e 74 65 78  ult_error(contex
0800: 74 2c 20 22 63 61 6e 6e 6f 74 20 6f 70 65 6e 20  t, "cannot open 
0810: 42 4c 4f 42 20 70 6f 69 6e 74 65 72 22 2c 20 2d  BLOB pointer", -
0820: 31 29 3b 0a 20 20 20 20 72 65 74 75 72 6e 3b 0a  1);.    return;.
0830: 20 20 7d 0a 20 20 72 63 20 3d 20 73 71 6c 69 74    }.  rc = sqlit
0840: 65 33 5f 62 6c 6f 62 5f 72 65 61 64 28 70 42 6c  e3_blob_read(pBl
0850: 6f 62 2c 20 61 44 61 74 61 2c 20 6e 44 61 74 61  ob, aData, nData
0860: 2c 20 69 4f 66 73 74 29 3b 0a 20 20 73 71 6c 69  , iOfst);.  sqli
0870: 74 65 33 5f 62 6c 6f 62 5f 63 6c 6f 73 65 28 70  te3_blob_close(p
0880: 42 6c 6f 62 29 3b 0a 20 20 69 66 28 20 72 63 20  Blob);.  if( rc 
0890: 29 7b 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 66  ){.    sqlite3_f
08a0: 72 65 65 28 61 44 61 74 61 29 3b 0a 20 20 20 20  ree(aData);.    
08b0: 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 65  sqlite3_result_e
08c0: 72 72 6f 72 28 63 6f 6e 74 65 78 74 2c 20 22 42  rror(context, "B
08d0: 4c 4f 42 20 77 72 69 74 65 20 66 61 69 6c 65 64  LOB write failed
08e0: 22 2c 20 2d 31 29 3b 0a 20 20 7d 65 6c 73 65 7b  ", -1);.  }else{
08f0: 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73  .    sqlite3_res
0900: 75 6c 74 5f 62 6c 6f 62 28 63 6f 6e 74 65 78 74  ult_blob(context
0910: 2c 20 61 44 61 74 61 2c 20 6e 44 61 74 61 2c 20  , aData, nData, 
0920: 73 71 6c 69 74 65 33 5f 66 72 65 65 29 3b 0a 20  sqlite3_free);. 
0930: 20 7d 0a 7d 20 20 20 20 0a 0a 73 74 61 74 69 63   }.}    ..static
0940: 20 76 6f 69 64 20 77 72 69 74 65 62 6c 6f 62 46   void writeblobF
0950: 75 6e 63 28 0a 20 20 73 71 6c 69 74 65 33 5f 63  unc(.  sqlite3_c
0960: 6f 6e 74 65 78 74 20 2a 63 6f 6e 74 65 78 74 2c  ontext *context,
0970: 0a 20 20 69 6e 74 20 61 72 67 63 2c 0a 20 20 73  .  int argc,.  s
0980: 71 6c 69 74 65 33 5f 76 61 6c 75 65 20 2a 2a 61  qlite3_value **a
0990: 72 67 76 0a 29 7b 0a 20 20 73 71 6c 69 74 65 33  rgv.){.  sqlite3
09a0: 5f 62 6c 6f 62 20 2a 70 42 6c 6f 62 20 3d 20 30  _blob *pBlob = 0
09b0: 3b 0a 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a  ;.  const char *
09c0: 7a 53 63 68 65 6d 61 3b 0a 20 20 63 6f 6e 73 74  zSchema;.  const
09d0: 20 63 68 61 72 20 2a 7a 54 61 62 6c 65 3b 0a 20   char *zTable;. 
09e0: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 43 6f   const char *zCo
09f0: 6c 75 6d 6e 3b 0a 20 20 73 71 6c 69 74 65 33 5f  lumn;.  sqlite3_
0a00: 69 6e 74 36 34 20 69 52 6f 77 69 64 3b 0a 20 20  int64 iRowid;.  
0a10: 69 6e 74 20 69 4f 66 73 74 3b 0a 20 20 75 6e 73  int iOfst;.  uns
0a20: 69 67 6e 65 64 20 63 68 61 72 20 2a 61 44 61 74  igned char *aDat
0a30: 61 3b 0a 20 20 69 6e 74 20 6e 44 61 74 61 3b 0a  a;.  int nData;.
0a40: 20 20 73 71 6c 69 74 65 33 20 2a 64 62 3b 0a 20    sqlite3 *db;. 
0a50: 20 69 6e 74 20 72 63 3b 0a 0a 20 20 7a 53 63 68   int rc;..  zSch
0a60: 65 6d 61 20 3d 20 28 63 6f 6e 73 74 20 63 68 61  ema = (const cha
0a70: 72 2a 29 73 71 6c 69 74 65 33 5f 76 61 6c 75 65  r*)sqlite3_value
0a80: 5f 74 65 78 74 28 61 72 67 76 5b 30 5d 29 3b 0a  _text(argv[0]);.
0a90: 20 20 7a 54 61 62 6c 65 20 3d 20 28 63 6f 6e 73    zTable = (cons
0aa0: 74 20 63 68 61 72 2a 29 73 71 6c 69 74 65 33 5f  t char*)sqlite3_
0ab0: 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67 76 5b  value_text(argv[
0ac0: 31 5d 29 3b 0a 20 20 69 66 28 20 7a 54 61 62 6c  1]);.  if( zTabl
0ad0: 65 3d 3d 30 20 29 7b 0a 20 20 20 20 73 71 6c 69  e==0 ){.    sqli
0ae0: 74 65 33 5f 72 65 73 75 6c 74 5f 65 72 72 6f 72  te3_result_error
0af0: 28 63 6f 6e 74 65 78 74 2c 20 22 62 61 64 20 74  (context, "bad t
0b00: 61 62 6c 65 20 6e 61 6d 65 22 2c 20 2d 31 29 3b  able name", -1);
0b10: 0a 20 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 7d  .    return;.  }
0b20: 0a 20 20 7a 43 6f 6c 75 6d 6e 20 3d 20 28 63 6f  .  zColumn = (co
0b30: 6e 73 74 20 63 68 61 72 2a 29 73 71 6c 69 74 65  nst char*)sqlite
0b40: 33 5f 76 61 6c 75 65 5f 74 65 78 74 28 61 72 67  3_value_text(arg
0b50: 76 5b 32 5d 29 3b 0a 20 20 69 66 28 20 7a 54 61  v[2]);.  if( zTa
0b60: 62 6c 65 3d 3d 30 20 29 7b 0a 20 20 20 20 73 71  ble==0 ){.    sq
0b70: 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f 65 72 72  lite3_result_err
0b80: 6f 72 28 63 6f 6e 74 65 78 74 2c 20 22 62 61 64  or(context, "bad
0b90: 20 63 6f 6c 75 6d 6e 20 6e 61 6d 65 22 2c 20 2d   column name", -
0ba0: 31 29 3b 0a 20 20 20 20 72 65 74 75 72 6e 3b 0a  1);.    return;.
0bb0: 20 20 7d 0a 20 20 69 52 6f 77 69 64 20 3d 20 73    }.  iRowid = s
0bc0: 71 6c 69 74 65 33 5f 76 61 6c 75 65 5f 69 6e 74  qlite3_value_int
0bd0: 36 34 28 61 72 67 76 5b 33 5d 29 3b 0a 20 20 69  64(argv[3]);.  i
0be0: 4f 66 73 74 20 3d 20 73 71 6c 69 74 65 33 5f 76  Ofst = sqlite3_v
0bf0: 61 6c 75 65 5f 69 6e 74 28 61 72 67 76 5b 34 5d  alue_int(argv[4]
0c00: 29 3b 0a 20 20 69 66 28 20 73 71 6c 69 74 65 33  );.  if( sqlite3
0c10: 5f 76 61 6c 75 65 5f 74 79 70 65 28 61 72 67 76  _value_type(argv
0c20: 5b 35 5d 29 21 3d 53 51 4c 49 54 45 5f 42 4c 4f  [5])!=SQLITE_BLO
0c30: 42 20 29 7b 0a 20 20 20 20 73 71 6c 69 74 65 33  B ){.    sqlite3
0c40: 5f 72 65 73 75 6c 74 5f 65 72 72 6f 72 28 63 6f  _result_error(co
0c50: 6e 74 65 78 74 2c 20 22 36 74 68 20 61 72 67 75  ntext, "6th argu
0c60: 6d 65 6e 74 20 6d 75 73 74 20 62 65 20 61 20 42  ment must be a B
0c70: 4c 4f 42 22 2c 20 2d 31 29 3b 0a 20 20 20 20 72  LOB", -1);.    r
0c80: 65 74 75 72 6e 3b 0a 20 20 7d 0a 20 20 6e 44 61  eturn;.  }.  nDa
0c90: 74 61 20 3d 20 73 71 6c 69 74 65 33 5f 76 61 6c  ta = sqlite3_val
0ca0: 75 65 5f 62 79 74 65 73 28 61 72 67 76 5b 35 5d  ue_bytes(argv[5]
0cb0: 29 3b 0a 20 20 61 44 61 74 61 20 3d 20 28 75 6e  );.  aData = (un
0cc0: 73 69 67 6e 65 64 20 63 68 61 72 20 2a 29 73 71  signed char *)sq
0cd0: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 62 6c 6f 62  lite3_value_blob
0ce0: 28 61 72 67 76 5b 35 5d 29 3b 0a 20 20 64 62 20  (argv[5]);.  db 
0cf0: 3d 20 73 71 6c 69 74 65 33 5f 63 6f 6e 74 65 78  = sqlite3_contex
0d00: 74 5f 64 62 5f 68 61 6e 64 6c 65 28 63 6f 6e 74  t_db_handle(cont
0d10: 65 78 74 29 3b 0a 20 20 72 63 20 3d 20 73 71 6c  ext);.  rc = sql
0d20: 69 74 65 33 5f 62 6c 6f 62 5f 6f 70 65 6e 28 64  ite3_blob_open(d
0d30: 62 2c 20 7a 53 63 68 65 6d 61 2c 20 7a 54 61 62  b, zSchema, zTab
0d40: 6c 65 2c 20 7a 43 6f 6c 75 6d 6e 2c 20 69 52 6f  le, zColumn, iRo
0d50: 77 69 64 2c 20 31 2c 20 26 70 42 6c 6f 62 29 3b  wid, 1, &pBlob);
0d60: 0a 20 20 69 66 28 20 72 63 20 29 7b 0a 20 20 20  .  if( rc ){.   
0d70: 20 73 71 6c 69 74 65 33 5f 72 65 73 75 6c 74 5f   sqlite3_result_
0d80: 65 72 72 6f 72 28 63 6f 6e 74 65 78 74 2c 20 22  error(context, "
0d90: 63 61 6e 6e 6f 74 20 6f 70 65 6e 20 42 4c 4f 42  cannot open BLOB
0da0: 20 70 6f 69 6e 74 65 72 22 2c 20 2d 31 29 3b 0a   pointer", -1);.
0db0: 20 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 7d 0a      return;.  }.
0dc0: 20 20 72 63 20 3d 20 73 71 6c 69 74 65 33 5f 62    rc = sqlite3_b
0dd0: 6c 6f 62 5f 77 72 69 74 65 28 70 42 6c 6f 62 2c  lob_write(pBlob,
0de0: 20 61 44 61 74 61 2c 20 6e 44 61 74 61 2c 20 69   aData, nData, i
0df0: 4f 66 73 74 29 3b 0a 20 20 73 71 6c 69 74 65 33  Ofst);.  sqlite3
0e00: 5f 62 6c 6f 62 5f 63 6c 6f 73 65 28 70 42 6c 6f  _blob_close(pBlo
0e10: 62 29 3b 0a 20 20 69 66 28 20 72 63 20 29 7b 0a  b);.  if( rc ){.
0e20: 20 20 20 20 73 71 6c 69 74 65 33 5f 72 65 73 75      sqlite3_resu
0e30: 6c 74 5f 65 72 72 6f 72 28 63 6f 6e 74 65 78 74  lt_error(context
0e40: 2c 20 22 42 4c 4f 42 20 77 72 69 74 65 20 66 61  , "BLOB write fa
0e50: 69 6c 65 64 22 2c 20 2d 31 29 3b 0a 20 20 7d 0a  iled", -1);.  }.
0e60: 7d 20 20 20 20 0a 0a 0a 23 69 66 64 65 66 20 5f  }    ...#ifdef _
0e70: 57 49 4e 33 32 0a 5f 5f 64 65 63 6c 73 70 65 63  WIN32.__declspec
0e80: 28 64 6c 6c 65 78 70 6f 72 74 29 0a 23 65 6e 64  (dllexport).#end
0e90: 69 66 0a 69 6e 74 20 73 71 6c 69 74 65 33 5f 62  if.int sqlite3_b
0ea0: 6c 6f 62 69 6f 5f 69 6e 69 74 28 0a 20 20 73 71  lobio_init(.  sq
0eb0: 6c 69 74 65 33 20 2a 64 62 2c 20 0a 20 20 63 68  lite3 *db, .  ch
0ec0: 61 72 20 2a 2a 70 7a 45 72 72 4d 73 67 2c 20 0a  ar **pzErrMsg, .
0ed0: 20 20 63 6f 6e 73 74 20 73 71 6c 69 74 65 33 5f    const sqlite3_
0ee0: 61 70 69 5f 72 6f 75 74 69 6e 65 73 20 2a 70 41  api_routines *pA
0ef0: 70 69 0a 29 7b 0a 20 20 69 6e 74 20 72 63 20 3d  pi.){.  int rc =
0f00: 20 53 51 4c 49 54 45 5f 4f 4b 3b 0a 20 20 53 51   SQLITE_OK;.  SQ
0f10: 4c 49 54 45 5f 45 58 54 45 4e 53 49 4f 4e 5f 49  LITE_EXTENSION_I
0f20: 4e 49 54 32 28 70 41 70 69 29 3b 0a 20 20 28 76  NIT2(pApi);.  (v
0f30: 6f 69 64 29 70 7a 45 72 72 4d 73 67 3b 20 20 2f  oid)pzErrMsg;  /
0f40: 2a 20 55 6e 75 73 65 64 20 70 61 72 61 6d 65 74  * Unused paramet
0f50: 65 72 20 2a 2f 0a 20 20 72 63 20 3d 20 73 71 6c  er */.  rc = sql
0f60: 69 74 65 33 5f 63 72 65 61 74 65 5f 66 75 6e 63  ite3_create_func
0f70: 74 69 6f 6e 28 64 62 2c 20 22 72 65 61 64 62 6c  tion(db, "readbl
0f80: 6f 62 22 2c 20 36 2c 20 53 51 4c 49 54 45 5f 55  ob", 6, SQLITE_U
0f90: 54 46 38 2c 20 30 2c 0a 20 20 20 20 20 20 20 20  TF8, 0,.        
0fa0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
0fb0: 20 20 20 20 20 20 20 72 65 61 64 62 6c 6f 62 46         readblobF
0fc0: 75 6e 63 2c 20 30 2c 20 30 29 3b 0a 20 20 69 66  unc, 0, 0);.  if
0fd0: 28 20 72 63 3d 3d 53 51 4c 49 54 45 5f 4f 4b 20  ( rc==SQLITE_OK 
0fe0: 29 7b 0a 20 20 20 20 72 63 20 3d 20 73 71 6c 69  ){.    rc = sqli
0ff0: 74 65 33 5f 63 72 65 61 74 65 5f 66 75 6e 63 74  te3_create_funct
1000: 69 6f 6e 28 64 62 2c 20 22 77 72 69 74 65 62 6c  ion(db, "writebl
1010: 6f 62 22 2c 20 36 2c 20 53 51 4c 49 54 45 5f 55  ob", 6, SQLITE_U
1020: 54 46 38 2c 20 30 2c 0a 20 20 20 20 20 20 20 20  TF8, 0,.        
1030: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
1040: 20 20 20 20 20 20 20 77 72 69 74 65 62 6c 6f 62         writeblob
1050: 46 75 6e 63 2c 20 30 2c 20 30 29 3b 0a 20 20 7d  Func, 0, 0);.  }
1060: 0a 20 20 72 65 74 75 72 6e 20 72 63 3b 0a 7d 0a  .  return rc;.}.