SQLite Archiver

Hex Artifact Content
Login

Artifact 301efd9722bd9152e0b2bedf1484ab8f0f4babc2:


0000: 2f 2a 0a 2a 2a 20 43 6f 70 79 72 69 67 68 74 20  /*.** Copyright 
0010: 28 63 29 20 32 30 31 34 20 44 2e 20 52 69 63 68  (c) 2014 D. Rich
0020: 61 72 64 20 48 69 70 70 0a 2a 2a 0a 2a 2a 20 54  ard Hipp.**.** T
0030: 68 69 73 20 70 72 6f 67 72 61 6d 20 69 73 20 66  his program is f
0040: 72 65 65 20 73 6f 66 74 77 61 72 65 3b 20 79 6f  ree software; yo
0050: 75 20 63 61 6e 20 72 65 64 69 73 74 72 69 62 75  u can redistribu
0060: 74 65 20 69 74 20 61 6e 64 2f 6f 72 0a 2a 2a 20  te it and/or.** 
0070: 6d 6f 64 69 66 79 20 69 74 20 75 6e 64 65 72 20  modify it under 
0080: 74 68 65 20 74 65 72 6d 73 20 6f 66 20 74 68 65  the terms of the
0090: 20 53 69 6d 70 6c 69 66 69 65 64 20 42 53 44 20   Simplified BSD 
00a0: 4c 69 63 65 6e 73 65 20 28 61 6c 73 6f 0a 2a 2a  License (also.**
00b0: 20 6b 6e 6f 77 6e 20 61 73 20 74 68 65 20 22 32   known as the "2
00c0: 2d 43 6c 61 75 73 65 20 4c 69 63 65 6e 73 65 22  -Clause License"
00d0: 20 6f 72 20 22 46 72 65 65 42 53 44 20 4c 69 63   or "FreeBSD Lic
00e0: 65 6e 73 65 22 2e 29 0a 0a 2a 2a 20 54 68 69 73  ense".)..** This
00f0: 20 70 72 6f 67 72 61 6d 20 69 73 20 64 69 73 74   program is dist
0100: 72 69 62 75 74 65 64 20 69 6e 20 74 68 65 20 68  ributed in the h
0110: 6f 70 65 20 74 68 61 74 20 69 74 20 77 69 6c 6c  ope that it will
0120: 20 62 65 20 75 73 65 66 75 6c 2c 0a 2a 2a 20 62   be useful,.** b
0130: 75 74 20 77 69 74 68 6f 75 74 20 61 6e 79 20 77  ut without any w
0140: 61 72 72 61 6e 74 79 3b 20 77 69 74 68 6f 75 74  arranty; without
0150: 20 65 76 65 6e 20 74 68 65 20 69 6d 70 6c 69 65   even the implie
0160: 64 20 77 61 72 72 61 6e 74 79 20 6f 66 0a 2a 2a  d warranty of.**
0170: 20 6d 65 72 63 68 61 6e 74 61 62 69 6c 69 74 79   merchantability
0180: 20 6f 72 20 66 69 74 6e 65 73 73 20 66 6f 72 20   or fitness for 
0190: 61 20 70 61 72 74 69 63 75 6c 61 72 20 70 75 72  a particular pur
01a0: 70 6f 73 65 2e 0a 2a 2a 0a 2a 2a 20 41 75 74 68  pose..**.** Auth
01b0: 6f 72 20 63 6f 6e 74 61 63 74 20 69 6e 66 6f 72  or contact infor
01c0: 6d 61 74 69 6f 6e 3a 0a 2a 2a 20 20 20 64 72 68  mation:.**   drh
01d0: 40 73 71 6c 69 74 65 2e 6f 72 67 0a 2a 2f 0a 23  @sqlite.org.*/.#
01e0: 69 6e 63 6c 75 64 65 20 22 73 71 6c 69 74 65 33  include "sqlite3
01f0: 2e 68 22 0a 23 69 6e 63 6c 75 64 65 20 3c 73 74  .h".#include <st
0200: 64 69 6f 2e 68 3e 0a 23 69 6e 63 6c 75 64 65 20  dio.h>.#include 
0210: 3c 73 74 64 61 72 67 2e 68 3e 0a 23 69 6e 63 6c  <stdarg.h>.#incl
0220: 75 64 65 20 3c 73 74 64 6c 69 62 2e 68 3e 0a 23  ude <stdlib.h>.#
0230: 69 6e 63 6c 75 64 65 20 3c 7a 6c 69 62 2e 68 3e  include <zlib.h>
0240: 0a 23 69 6e 63 6c 75 64 65 20 3c 73 79 73 2f 74  .#include <sys/t
0250: 79 70 65 73 2e 68 3e 0a 23 69 6e 63 6c 75 64 65  ypes.h>.#include
0260: 20 3c 73 79 73 2f 73 74 61 74 2e 68 3e 0a 23 69   <sys/stat.h>.#i
0270: 6e 63 6c 75 64 65 20 3c 75 6e 69 73 74 64 2e 68  nclude <unistd.h
0280: 3e 0a 23 69 6e 63 6c 75 64 65 20 3c 64 69 72 65  >.#include <dire
0290: 6e 74 2e 68 3e 0a 0a 2f 2a 0a 2a 2a 20 53 68 6f  nt.h>../*.** Sho
02a0: 77 20 61 20 68 65 6c 70 20 6d 65 73 73 61 67 65  w a help message
02b0: 20 61 6e 64 20 71 75 69 74 2e 0a 2a 2f 0a 73 74   and quit..*/.st
02c0: 61 74 69 63 20 76 6f 69 64 20 73 68 6f 77 48 65  atic void showHe
02d0: 6c 70 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 61  lp(const char *a
02e0: 72 67 76 30 29 7b 0a 20 20 66 70 72 69 6e 74 66  rgv0){.  fprintf
02f0: 28 73 74 64 65 72 72 2c 20 22 55 73 61 67 65 3a  (stderr, "Usage:
0300: 20 25 73 20 5b 6f 70 74 69 6f 6e 73 5d 20 61 72   %s [options] ar
0310: 63 68 69 76 65 20 5b 66 69 6c 65 73 2e 2e 2e 5d  chive [files...]
0320: 5c 6e 22 2c 20 61 72 67 76 30 29 3b 0a 20 20 66  \n", argv0);.  f
0330: 70 72 69 6e 74 66 28 73 74 64 65 72 72 2c 20 22  printf(stderr, "
0340: 4f 70 74 69 6f 6e 73 3a 5c 6e 22 0a 20 20 20 20  Options:\n".    
0350: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 20                " 
0360: 20 20 2d 6c 20 20 20 20 20 20 4c 69 73 74 20 66    -l      List f
0370: 69 6c 65 73 20 69 6e 20 61 72 63 68 69 76 65 5c  iles in archive\
0380: 6e 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20  n".             
0390: 20 20 20 20 20 22 20 20 20 2d 6e 20 20 20 20 20       "   -n     
03a0: 20 44 6f 20 6e 6f 74 20 63 6f 6d 70 72 65 73 73   Do not compress
03b0: 20 66 69 6c 65 73 5c 6e 22 0a 20 20 20 20 20 20   files\n".      
03c0: 20 20 20 20 20 20 20 20 20 20 20 20 22 20 20 20              "   
03d0: 2d 78 20 20 20 20 20 20 45 78 74 72 61 63 74 20  -x      Extract 
03e0: 66 69 6c 65 73 20 66 72 6f 6d 20 61 72 63 68 69  files from archi
03f0: 76 65 5c 6e 22 0a 20 20 20 20 20 20 20 20 20 20  ve\n".          
0400: 20 20 20 20 20 20 20 20 22 20 20 20 2d 76 20 20          "   -v  
0410: 20 20 20 20 56 65 72 62 6f 73 65 20 6f 75 74 70      Verbose outp
0420: 75 74 5c 6e 22 0a 20 20 29 3b 0a 20 20 65 78 69  ut\n".  );.  exi
0430: 74 28 31 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54  t(1);.}../*.** T
0440: 68 65 20 64 61 74 61 62 61 73 65 20 73 63 68 65  he database sche
0450: 6d 61 3a 0a 2a 2f 0a 73 74 61 74 69 63 20 63 6f  ma:.*/.static co
0460: 6e 73 74 20 63 68 61 72 20 7a 53 63 68 65 6d 61  nst char zSchema
0470: 5b 5d 20 3d 20 0a 20 20 22 43 52 45 41 54 45 20  [] = .  "CREATE 
0480: 54 41 42 4c 45 20 49 46 20 4e 4f 54 20 45 58 49  TABLE IF NOT EXI
0490: 53 54 53 20 73 61 72 28 5c 6e 22 0a 20 20 22 20  STS sar(\n".  " 
04a0: 20 6e 61 6d 65 20 54 45 58 54 20 50 52 49 4d 41   name TEXT PRIMA
04b0: 52 59 20 4b 45 59 2c 5c 6e 22 0a 20 20 22 20 20  RY KEY,\n".  "  
04c0: 6d 6f 64 65 20 49 4e 54 2c 5c 6e 22 0a 20 20 22  mode INT,\n".  "
04d0: 20 20 6d 74 69 6d 65 20 49 4e 54 2c 5c 6e 22 0a    mtime INT,\n".
04e0: 20 20 22 20 20 73 7a 20 49 4e 54 2c 5c 6e 22 0a    "  sz INT,\n".
04f0: 20 20 22 20 20 64 61 74 61 20 42 4c 4f 42 5c 6e    "  data BLOB\n
0500: 22 0a 20 20 22 29 3b 22 0a 3b 0a 0a 2f 2a 0a 2a  ".  ");".;../*.*
0510: 2a 20 50 72 65 70 61 72 65 64 20 73 74 61 74 65  * Prepared state
0520: 6d 65 6e 74 20 74 68 61 74 20 6e 65 65 64 73 20  ment that needs 
0530: 66 69 6e 61 6c 69 7a 69 6e 67 20 62 65 66 6f 72  finalizing befor
0540: 65 20 73 71 6c 69 74 65 33 5f 63 6c 6f 73 65 28  e sqlite3_close(
0550: 29 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 73 71 6c  )..*/.static sql
0560: 69 74 65 33 5f 73 74 6d 74 20 2a 70 53 74 6d 74  ite3_stmt *pStmt
0570: 20 3d 20 30 3b 0a 0a 2f 2a 0a 2a 2a 20 4f 70 65   = 0;../*.** Ope
0580: 6e 20 64 61 74 61 62 61 73 65 20 63 6f 6e 6e 65  n database conne
0590: 63 74 69 6f 6e 0a 2a 2f 0a 73 74 61 74 69 63 20  ction.*/.static 
05a0: 73 71 6c 69 74 65 33 20 2a 64 62 20 3d 20 30 3b  sqlite3 *db = 0;
05b0: 0a 0a 2f 2a 0a 2a 2a 20 43 6c 6f 73 65 20 74 68  ../*.** Close th
05c0: 65 20 64 61 74 61 62 61 73 65 0a 2a 2f 0a 73 74  e database.*/.st
05d0: 61 74 69 63 20 76 6f 69 64 20 64 62 5f 63 6c 6f  atic void db_clo
05e0: 73 65 28 69 6e 74 20 63 6f 6d 6d 69 74 46 6c 61  se(int commitFla
05f0: 67 29 7b 0a 20 20 69 66 28 20 70 53 74 6d 74 20  g){.  if( pStmt 
0600: 29 7b 0a 20 20 20 20 73 71 6c 69 74 65 33 5f 66  ){.    sqlite3_f
0610: 69 6e 61 6c 69 7a 65 28 70 53 74 6d 74 29 3b 0a  inalize(pStmt);.
0620: 20 20 20 20 70 53 74 6d 74 20 3d 20 30 3b 0a 20      pStmt = 0;. 
0630: 20 7d 0a 20 20 69 66 28 20 64 62 20 29 7b 0a 20   }.  if( db ){. 
0640: 20 20 20 69 66 28 20 63 6f 6d 6d 69 74 46 6c 61     if( commitFla
0650: 67 20 29 7b 0a 20 20 20 20 20 20 73 71 6c 69 74  g ){.      sqlit
0660: 65 33 5f 65 78 65 63 28 64 62 2c 20 22 43 4f 4d  e3_exec(db, "COM
0670: 4d 49 54 22 2c 20 30 2c 20 30 2c 20 30 29 3b 0a  MIT", 0, 0, 0);.
0680: 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20      }else{.     
0690: 20 73 71 6c 69 74 65 33 5f 65 78 65 63 28 64 62   sqlite3_exec(db
06a0: 2c 20 22 52 4f 4c 4c 42 41 43 4b 22 2c 20 30 2c  , "ROLLBACK", 0,
06b0: 20 30 2c 20 30 29 3b 0a 20 20 20 20 7d 0a 20 20   0, 0);.    }.  
06c0: 20 20 73 71 6c 69 74 65 33 5f 63 6c 6f 73 65 28    sqlite3_close(
06d0: 64 62 29 3b 0a 20 20 20 20 64 62 20 3d 20 30 3b  db);.    db = 0;
06e0: 0a 20 20 7d 0a 7d 0a 0a 0a 2f 2a 0a 2a 2a 20 50  .  }.}.../*.** P
06f0: 61 6e 69 63 20 6d 65 73 73 61 67 65 0a 2a 2f 0a  anic message.*/.
0700: 73 74 61 74 69 63 20 76 6f 69 64 20 65 72 72 6f  static void erro
0710: 72 4d 73 67 28 63 6f 6e 73 74 20 63 68 61 72 20  rMsg(const char 
0720: 2a 7a 46 6f 72 6d 61 74 2c 20 2e 2e 2e 29 7b 0a  *zFormat, ...){.
0730: 20 20 76 61 5f 6c 69 73 74 20 61 70 3b 0a 20 20    va_list ap;.  
0740: 76 61 5f 73 74 61 72 74 28 61 70 2c 20 7a 46 6f  va_start(ap, zFo
0750: 72 6d 61 74 29 3b 0a 20 20 76 66 70 72 69 6e 74  rmat);.  vfprint
0760: 66 28 73 74 64 65 72 72 2c 20 7a 46 6f 72 6d 61  f(stderr, zForma
0770: 74 2c 20 61 70 29 3b 0a 20 20 76 61 5f 65 6e 64  t, ap);.  va_end
0780: 28 61 70 29 3b 0a 20 20 64 62 5f 63 6c 6f 73 65  (ap);.  db_close
0790: 28 30 29 3b 0a 20 20 65 78 69 74 28 31 29 3b 0a  (0);.  exit(1);.
07a0: 7d 0a 0a 2f 2a 0a 2a 2a 20 4f 70 65 6e 20 74 68  }../*.** Open th
07b0: 65 20 64 61 74 61 62 61 73 65 2e 0a 2a 2f 0a 73  e database..*/.s
07c0: 74 61 74 69 63 20 76 6f 69 64 20 64 62 5f 6f 70  tatic void db_op
07d0: 65 6e 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a  en(const char *z
07e0: 41 72 63 68 69 76 65 2c 20 69 6e 74 20 77 72 69  Archive, int wri
07f0: 74 65 46 6c 61 67 29 7b 0a 20 20 69 6e 74 20 72  teFlag){.  int r
0800: 63 3b 0a 20 20 69 6e 74 20 66 67 3b 0a 20 20 69  c;.  int fg;.  i
0810: 66 28 20 77 72 69 74 65 46 6c 61 67 20 29 7b 0a  f( writeFlag ){.
0820: 20 20 20 20 66 67 20 3d 20 53 51 4c 49 54 45 5f      fg = SQLITE_
0830: 4f 50 45 4e 5f 52 45 41 44 57 52 49 54 45 20 7c  OPEN_READWRITE |
0840: 20 53 51 4c 49 54 45 5f 4f 50 45 4e 5f 43 52 45   SQLITE_OPEN_CRE
0850: 41 54 45 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20  ATE;.  }else{.  
0860: 20 20 66 67 20 3d 20 53 51 4c 49 54 45 5f 4f 50    fg = SQLITE_OP
0870: 45 4e 5f 52 45 41 44 4f 4e 4c 59 3b 0a 20 20 7d  EN_READONLY;.  }
0880: 0a 20 20 72 63 20 3d 20 73 71 6c 69 74 65 33 5f  .  rc = sqlite3_
0890: 6f 70 65 6e 5f 76 32 28 7a 41 72 63 68 69 76 65  open_v2(zArchive
08a0: 2c 20 26 64 62 2c 20 66 67 2c 20 30 29 3b 0a 20  , &db, fg, 0);. 
08b0: 20 69 66 28 20 72 63 20 29 20 65 72 72 6f 72 4d   if( rc ) errorM
08c0: 73 67 28 22 43 61 6e 6e 6f 74 20 6f 70 65 6e 20  sg("Cannot open 
08d0: 61 72 63 68 69 76 65 20 5b 25 73 5d 3a 20 25 73  archive [%s]: %s
08e0: 5c 6e 22 2c 20 7a 41 72 63 68 69 76 65 2c 0a 20  \n", zArchive,. 
08f0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
0900: 20 20 20 73 71 6c 69 74 65 33 5f 65 72 72 6d 73     sqlite3_errms
0910: 67 28 64 62 29 29 3b 0a 20 20 73 71 6c 69 74 65  g(db));.  sqlite
0920: 33 5f 65 78 65 63 28 64 62 2c 20 22 42 45 47 49  3_exec(db, "BEGI
0930: 4e 22 2c 20 30 2c 20 30 2c 20 30 29 3b 0a 20 20  N", 0, 0, 0);.  
0940: 73 71 6c 69 74 65 33 5f 65 78 65 63 28 64 62 2c  sqlite3_exec(db,
0950: 20 7a 53 63 68 65 6d 61 2c 20 30 2c 20 30 2c 20   zSchema, 0, 0, 
0960: 30 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 50 72 65  0);.}../*.** Pre
0970: 70 61 72 65 20 74 68 65 20 70 53 74 6d 74 20 73  pare the pStmt s
0980: 74 61 74 65 6d 65 6e 74 2e 0a 2a 2f 0a 73 74 61  tatement..*/.sta
0990: 74 69 63 20 76 6f 69 64 20 64 62 5f 70 72 65 70  tic void db_prep
09a0: 61 72 65 28 63 6f 6e 73 74 20 63 68 61 72 20 2a  are(const char *
09b0: 7a 53 71 6c 29 7b 0a 20 20 69 6e 74 20 72 63 3b  zSql){.  int rc;
09c0: 0a 20 20 73 71 6c 69 74 65 33 5f 66 69 6e 61 6c  .  sqlite3_final
09d0: 69 7a 65 28 70 53 74 6d 74 29 3b 0a 20 20 72 63  ize(pStmt);.  rc
09e0: 20 3d 20 73 71 6c 69 74 65 33 5f 70 72 65 70 61   = sqlite3_prepa
09f0: 72 65 5f 76 32 28 64 62 2c 20 7a 53 71 6c 2c 20  re_v2(db, zSql, 
0a00: 2d 31 2c 20 26 70 53 74 6d 74 2c 20 30 29 3b 0a  -1, &pStmt, 0);.
0a10: 20 20 69 66 28 20 72 63 20 29 7b 0a 20 20 20 20    if( rc ){.    
0a20: 65 72 72 6f 72 4d 73 67 28 22 45 72 72 6f 72 3a  errorMsg("Error:
0a30: 20 25 73 5c 6e 77 68 69 6c 65 20 70 72 65 70 61   %s\nwhile prepa
0a40: 72 69 6e 67 3a 20 25 73 5c 6e 22 2c 0a 20 20 20  ring: %s\n",.   
0a50: 20 20 20 20 20 20 20 20 20 20 73 71 6c 69 74 65            sqlite
0a60: 33 5f 65 72 72 6d 73 67 28 64 62 29 2c 20 7a 53  3_errmsg(db), zS
0a70: 71 6c 29 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a  ql);.  }.}../*.*
0a80: 2a 20 52 65 61 64 20 61 20 66 69 6c 65 20 66 72  * Read a file fr
0a90: 6f 6d 20 64 69 73 6b 20 69 6e 74 6f 20 6d 65 6d  om disk into mem
0aa0: 6f 72 79 20 6f 62 74 61 69 6e 65 64 20 66 72 6f  ory obtained fro
0ab0: 6d 20 73 71 6c 69 74 65 33 5f 6d 61 6c 6c 6f 63  m sqlite3_malloc
0ac0: 28 29 2e 0a 2a 2a 20 43 6f 6d 70 72 65 73 73 20  ()..** Compress 
0ad0: 74 68 65 20 66 69 6c 65 20 61 73 20 69 74 20 69  the file as it i
0ae0: 73 20 72 65 61 64 20 69 6e 20 69 66 20 64 6f 69  s read in if doi
0af0: 6e 67 20 73 6f 20 72 65 64 75 63 65 73 20 74 68  ng so reduces th
0b00: 65 20 66 69 6c 65 0a 2a 2a 20 73 69 7a 65 20 61  e file.** size a
0b10: 6e 64 20 69 66 20 74 68 65 20 6e 6f 43 6f 6d 70  nd if the noComp
0b20: 72 65 73 73 20 66 6c 61 67 20 69 73 20 66 61 6c  ress flag is fal
0b30: 73 65 2e 0a 2a 2a 0a 2a 2a 20 52 65 74 75 72 6e  se..**.** Return
0b40: 20 74 68 65 20 6f 72 69 67 69 6e 61 6c 20 73 69   the original si
0b50: 7a 65 20 61 6e 64 20 74 68 65 20 63 6f 6d 70 72  ze and the compr
0b60: 65 73 73 65 64 20 73 69 7a 65 20 6f 66 20 74 68  essed size of th
0b70: 65 20 66 69 6c 65 20 69 6e 0a 2a 2a 20 2a 70 53  e file in.** *pS
0b80: 69 7a 65 4f 72 69 67 20 61 6e 64 20 2a 70 53 69  izeOrig and *pSi
0b90: 7a 65 43 6f 6d 70 72 2c 20 72 65 73 70 65 63 74  zeCompr, respect
0ba0: 69 76 65 6c 79 2e 20 20 49 66 20 74 68 65 73 65  ively.  If these
0bb0: 20 74 77 6f 20 76 61 6c 75 65 73 20 61 72 65 0a   two values are.
0bc0: 2a 2a 20 65 71 75 61 6c 2c 20 74 68 61 74 20 6d  ** equal, that m
0bd0: 65 61 6e 73 20 74 68 65 20 66 69 6c 65 20 77 61  eans the file wa
0be0: 73 20 6e 6f 74 20 63 6f 6d 70 72 65 73 73 65 64  s not compressed
0bf0: 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 63 68 61 72  ..*/.static char
0c00: 20 2a 72 65 61 64 5f 66 69 6c 65 28 0a 20 20 63   *read_file(.  c
0c10: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 46 69 6c 65  onst char *zFile
0c20: 6e 61 6d 65 2c 20 20 20 20 2f 2a 20 4e 61 6d 65  name,    /* Name
0c30: 20 6f 66 20 66 69 6c 65 20 74 6f 20 72 65 61 64   of file to read
0c40: 20 2a 2f 0a 20 20 69 6e 74 20 2a 70 53 69 7a 65   */.  int *pSize
0c50: 4f 72 69 67 2c 20 20 20 20 20 20 20 20 20 20 20  Orig,           
0c60: 2f 2a 20 57 72 69 74 65 20 6f 72 69 67 69 6e 61  /* Write origina
0c70: 6c 20 66 69 6c 65 20 73 69 7a 65 20 68 65 72 65  l file size here
0c80: 20 2a 2f 0a 20 20 69 6e 74 20 2a 70 53 69 7a 65   */.  int *pSize
0c90: 43 6f 6d 70 72 2c 20 20 20 20 20 20 20 20 20 20  Compr,          
0ca0: 2f 2a 20 57 72 69 74 65 20 63 6f 6d 70 72 65 73  /* Write compres
0cb0: 73 65 64 20 66 69 6c 65 20 73 69 7a 65 20 68 65  sed file size he
0cc0: 72 65 20 2a 2f 0a 20 20 69 6e 74 20 6e 6f 43 6f  re */.  int noCo
0cd0: 6d 70 72 65 73 73 20 20 20 20 20 20 20 20 20 20  mpress          
0ce0: 20 20 2f 2a 20 44 6f 20 6e 6f 74 20 63 6f 6d 70    /* Do not comp
0cf0: 72 65 73 73 20 69 66 20 74 72 75 65 20 2a 2f 0a  ress if true */.
0d00: 29 7b 0a 20 20 46 49 4c 45 20 2a 69 6e 3b 0a 20  ){.  FILE *in;. 
0d10: 20 63 68 61 72 20 2a 7a 49 6e 3b 0a 20 20 6c 6f   char *zIn;.  lo
0d20: 6e 67 20 69 6e 74 20 6e 49 6e 3b 0a 20 20 63 68  ng int nIn;.  ch
0d30: 61 72 20 2a 7a 43 6f 6d 70 72 3b 0a 20 20 75 6e  ar *zCompr;.  un
0d40: 73 69 67 6e 65 64 20 6c 6f 6e 67 20 69 6e 74 20  signed long int 
0d50: 6e 43 6f 6d 70 72 3b 0a 20 20 69 6e 74 20 72 63  nCompr;.  int rc
0d60: 3b 0a 0a 20 20 69 6e 20 3d 20 66 6f 70 65 6e 28  ;..  in = fopen(
0d70: 7a 46 69 6c 65 6e 61 6d 65 2c 20 22 72 62 22 29  zFilename, "rb")
0d80: 3b 0a 20 20 69 66 28 20 69 6e 3d 3d 30 20 29 20  ;.  if( in==0 ) 
0d90: 65 72 72 6f 72 4d 73 67 28 22 63 61 6e 6e 6f 74  errorMsg("cannot
0da0: 20 6f 70 65 6e 20 5c 22 25 73 5c 22 20 66 6f 72   open \"%s\" for
0db0: 20 72 65 61 64 69 6e 67 5c 6e 22 2c 20 7a 46 69   reading\n", zFi
0dc0: 6c 65 6e 61 6d 65 29 3b 0a 20 20 66 73 65 65 6b  lename);.  fseek
0dd0: 28 69 6e 2c 20 30 2c 20 53 45 45 4b 5f 45 4e 44  (in, 0, SEEK_END
0de0: 29 3b 0a 20 20 6e 49 6e 20 3d 20 66 74 65 6c 6c  );.  nIn = ftell
0df0: 28 69 6e 29 3b 0a 20 20 72 65 77 69 6e 64 28 69  (in);.  rewind(i
0e00: 6e 29 3b 0a 20 20 7a 49 6e 20 3d 20 73 71 6c 69  n);.  zIn = sqli
0e10: 74 65 33 5f 6d 61 6c 6c 6f 63 28 20 6e 49 6e 2b  te3_malloc( nIn+
0e20: 31 20 29 3b 0a 20 20 69 66 28 20 7a 49 6e 3d 3d  1 );.  if( zIn==
0e30: 30 20 29 20 65 72 72 6f 72 4d 73 67 28 22 63 61  0 ) errorMsg("ca
0e40: 6e 6e 6f 74 20 6d 61 6c 6c 6f 63 20 66 6f 72 20  nnot malloc for 
0e50: 25 64 20 62 79 74 65 73 5c 6e 22 2c 20 6e 49 6e  %d bytes\n", nIn
0e60: 2b 31 29 3b 0a 20 20 69 66 28 20 6e 49 6e 3e 30  +1);.  if( nIn>0
0e70: 20 26 26 20 66 72 65 61 64 28 7a 49 6e 2c 20 6e   && fread(zIn, n
0e80: 49 6e 2c 20 31 2c 20 69 6e 29 21 3d 31 20 29 7b  In, 1, in)!=1 ){
0e90: 0a 20 20 20 20 65 72 72 6f 72 4d 73 67 28 22 75  .    errorMsg("u
0ea0: 6e 61 62 6c 65 20 74 6f 20 72 65 61 64 20 25 64  nable to read %d
0eb0: 20 62 79 74 65 73 20 6f 66 20 66 69 6c 65 20 25   bytes of file %
0ec0: 73 5c 6e 22 2c 20 6e 49 6e 2c 20 7a 46 69 6c 65  s\n", nIn, zFile
0ed0: 6e 61 6d 65 29 3b 0a 20 20 7d 0a 20 20 66 63 6c  name);.  }.  fcl
0ee0: 6f 73 65 28 69 6e 29 3b 0a 20 20 69 66 28 20 6e  ose(in);.  if( n
0ef0: 6f 43 6f 6d 70 72 65 73 73 20 29 7b 0a 20 20 20  oCompress ){.   
0f00: 20 2a 70 53 69 7a 65 4f 72 69 67 20 3d 20 2a 70   *pSizeOrig = *p
0f10: 53 69 7a 65 43 6f 6d 70 72 20 3d 20 6e 49 6e 3b  SizeCompr = nIn;
0f20: 0a 20 20 20 20 72 65 74 75 72 6e 20 7a 49 6e 3b  .    return zIn;
0f30: 0a 20 20 7d 0a 20 20 6e 43 6f 6d 70 72 20 3d 20  .  }.  nCompr = 
0f40: 31 33 20 2b 20 6e 49 6e 20 2b 20 28 6e 49 6e 2b  13 + nIn + (nIn+
0f50: 39 39 39 29 2f 31 30 30 30 3b 0a 20 20 7a 43 6f  999)/1000;.  zCo
0f60: 6d 70 72 20 3d 20 73 71 6c 69 74 65 33 5f 6d 61  mpr = sqlite3_ma
0f70: 6c 6c 6f 63 28 20 6e 43 6f 6d 70 72 2b 31 20 29  lloc( nCompr+1 )
0f80: 3b 0a 20 20 69 66 28 20 7a 43 6f 6d 70 72 3d 3d  ;.  if( zCompr==
0f90: 30 20 29 20 65 72 72 6f 72 4d 73 67 28 22 63 61  0 ) errorMsg("ca
0fa0: 6e 6e 6f 74 20 6d 61 6c 6c 6f 63 20 66 6f 72 20  nnot malloc for 
0fb0: 25 64 20 62 79 74 65 73 5c 6e 22 2c 20 6e 43 6f  %d bytes\n", nCo
0fc0: 6d 70 72 2b 31 29 3b 0a 20 20 72 63 20 3d 20 63  mpr+1);.  rc = c
0fd0: 6f 6d 70 72 65 73 73 28 7a 43 6f 6d 70 72 2c 20  ompress(zCompr, 
0fe0: 26 6e 43 6f 6d 70 72 2c 20 7a 49 6e 2c 20 6e 49  &nCompr, zIn, nI
0ff0: 6e 29 3b 0a 20 20 69 66 28 20 72 63 21 3d 5a 5f  n);.  if( rc!=Z_
1000: 4f 4b 20 29 20 65 72 72 6f 72 4d 73 67 28 22 43  OK ) errorMsg("C
1010: 61 6e 6e 6f 74 20 63 6f 6d 70 72 65 73 73 20 25  annot compress %
1020: 73 5c 6e 22 2c 20 7a 46 69 6c 65 6e 61 6d 65 29  s\n", zFilename)
1030: 3b 0a 20 20 69 66 28 20 6e 49 6e 3e 6e 43 6f 6d  ;.  if( nIn>nCom
1040: 70 72 20 29 7b 0a 20 20 20 20 73 71 6c 69 74 65  pr ){.    sqlite
1050: 33 5f 66 72 65 65 28 7a 49 6e 29 3b 0a 20 20 20  3_free(zIn);.   
1060: 20 2a 70 53 69 7a 65 4f 72 69 67 20 3d 20 6e 49   *pSizeOrig = nI
1070: 6e 3b 0a 20 20 20 20 2a 70 53 69 7a 65 43 6f 6d  n;.    *pSizeCom
1080: 70 72 20 3d 20 28 69 6e 74 29 6e 43 6f 6d 70 72  pr = (int)nCompr
1090: 3b 0a 20 20 20 20 72 65 74 75 72 6e 20 7a 43 6f  ;.    return zCo
10a0: 6d 70 72 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20  mpr;.  }else{.  
10b0: 20 20 73 71 6c 69 74 65 33 5f 66 72 65 65 28 7a    sqlite3_free(z
10c0: 43 6f 6d 70 72 29 3b 0a 20 20 20 20 2a 70 53 69  Compr);.    *pSi
10d0: 7a 65 4f 72 69 67 20 3d 20 2a 70 53 69 7a 65 43  zeOrig = *pSizeC
10e0: 6f 6d 70 72 20 3d 20 6e 49 6e 3b 0a 20 20 20 20  ompr = nIn;.    
10f0: 72 65 74 75 72 6e 20 7a 49 6e 3b 0a 20 20 7d 0a  return zIn;.  }.
1100: 7d 0a 0a 2f 2a 0a 2a 2a 20 4d 61 6b 65 20 73 75  }../*.** Make su
1110: 72 65 20 74 68 65 20 70 61 72 65 6e 74 20 64 69  re the parent di
1120: 72 65 63 74 6f 72 79 20 66 6f 72 20 7a 4e 61 6d  rectory for zNam
1130: 65 20 65 78 69 73 74 73 2e 20 20 43 72 65 61 74  e exists.  Creat
1140: 65 20 69 74 20 69 66 20 69 74 20 64 6f 65 73 0a  e it if it does.
1150: 2a 2a 20 6e 6f 74 20 65 78 69 73 74 2e 0a 2a 2f  ** not exist..*/
1160: 0a 73 74 61 74 69 63 20 76 6f 69 64 20 6d 61 6b  .static void mak
1170: 65 5f 70 61 72 65 6e 74 5f 64 69 72 65 63 74 6f  e_parent_directo
1180: 72 79 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a  ry(const char *z
1190: 4e 61 6d 65 29 7b 0a 20 20 63 68 61 72 20 2a 7a  Name){.  char *z
11a0: 50 61 72 65 6e 74 3b 0a 20 20 69 6e 74 20 69 2c  Parent;.  int i,
11b0: 20 6a 2c 20 72 63 3b 0a 20 20 66 6f 72 28 69 3d   j, rc;.  for(i=
11c0: 6a 3d 30 3b 20 7a 4e 61 6d 65 5b 69 5d 3b 20 69  j=0; zName[i]; i
11d0: 2b 2b 29 20 69 66 28 20 7a 4e 61 6d 65 5b 69 5d  ++) if( zName[i]
11e0: 3d 3d 27 2f 27 20 29 20 6a 20 3d 20 69 3b 0a 20  =='/' ) j = i;. 
11f0: 20 69 66 28 20 6a 3e 30 20 29 7b 0a 20 20 20 20   if( j>0 ){.    
1200: 7a 50 61 72 65 6e 74 20 3d 20 73 71 6c 69 74 65  zParent = sqlite
1210: 33 5f 6d 70 72 69 6e 74 66 28 22 25 2e 2a 73 22  3_mprintf("%.*s"
1220: 2c 20 6a 2c 20 7a 4e 61 6d 65 29 3b 0a 20 20 20  , j, zName);.   
1230: 20 69 66 28 20 7a 50 61 72 65 6e 74 3d 3d 30 20   if( zParent==0 
1240: 29 20 65 72 72 6f 72 4d 73 67 28 22 6d 70 72 69  ) errorMsg("mpri
1250: 6e 74 66 20 66 61 69 6c 65 64 5c 6e 22 29 3b 0a  ntf failed\n");.
1260: 20 20 20 20 77 68 69 6c 65 28 20 6a 3e 30 20 26      while( j>0 &
1270: 26 20 7a 50 61 72 65 6e 74 5b 6a 5d 3d 3d 27 2f  & zParent[j]=='/
1280: 27 20 29 20 6a 2d 2d 3b 0a 20 20 20 20 7a 50 61  ' ) j--;.    zPa
1290: 72 65 6e 74 5b 6a 5d 20 3d 20 30 3b 0a 20 20 20  rent[j] = 0;.   
12a0: 20 69 66 28 20 6a 3e 30 20 26 26 20 61 63 63 65   if( j>0 && acce
12b0: 73 73 28 7a 50 61 72 65 6e 74 2c 46 5f 4f 4b 29  ss(zParent,F_OK)
12c0: 21 3d 30 20 29 7b 0a 20 20 20 20 20 20 6d 61 6b  !=0 ){.      mak
12d0: 65 5f 70 61 72 65 6e 74 5f 64 69 72 65 63 74 6f  e_parent_directo
12e0: 72 79 28 7a 50 61 72 65 6e 74 29 3b 0a 20 20 20  ry(zParent);.   
12f0: 20 20 20 72 63 20 3d 20 6d 6b 64 69 72 28 7a 50     rc = mkdir(zP
1300: 61 72 65 6e 74 2c 20 30 37 37 37 29 3b 0a 20 20  arent, 0777);.  
1310: 20 20 20 20 69 66 28 20 72 63 20 29 20 65 72 72      if( rc ) err
1320: 6f 72 4d 73 67 28 22 63 61 6e 6e 6f 74 20 63 72  orMsg("cannot cr
1330: 65 61 74 65 20 64 69 72 65 63 74 6f 72 79 3a 20  eate directory: 
1340: 25 73 5c 6e 22 2c 20 7a 50 61 72 65 6e 74 29 3b  %s\n", zParent);
1350: 0a 20 20 20 20 7d 0a 20 20 20 20 73 71 6c 69 74  .    }.    sqlit
1360: 65 33 5f 66 72 65 65 28 7a 50 61 72 65 6e 74 29  e3_free(zParent)
1370: 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 57  ;.  }.}../*.** W
1380: 72 69 74 65 20 61 20 66 69 6c 65 20 6f 72 20 61  rite a file or a
1390: 20 64 69 72 65 63 74 6f 72 79 2e 0a 2a 2a 0a 2a   directory..**.*
13a0: 2a 20 43 72 65 61 74 65 20 61 6e 79 20 6d 69 73  * Create any mis
13b0: 73 69 6e 67 20 64 69 72 65 63 74 6f 72 69 65 73  sing directories
13c0: 20 6c 65 61 64 69 6e 67 20 75 70 20 74 6f 20 74   leading up to t
13d0: 68 65 20 67 69 76 65 6e 20 66 69 6c 65 20 6f 72  he given file or
13e0: 20 64 69 72 65 63 74 6f 72 79 2e 0a 2a 2a 20 41   directory..** A
13f0: 6c 73 6f 20 73 65 74 20 74 68 65 20 61 63 63 65  lso set the acce
1400: 73 73 20 6d 6f 64 65 20 61 6e 64 20 74 68 65 20  ss mode and the 
1410: 6d 6f 64 69 66 69 63 61 74 69 6f 6e 20 74 69 6d  modification tim
1420: 65 2e 0a 2a 2a 0a 2a 2a 20 49 66 20 73 7a 3e 6e  e..**.** If sz>n
1430: 43 6f 6d 70 72 20 74 68 61 74 20 6d 65 61 6e 73  Compr that means
1440: 20 74 68 61 74 20 74 68 65 20 63 6f 6e 74 65 6e   that the conten
1450: 74 20 69 73 20 63 6f 6d 70 72 65 73 73 65 64 20  t is compressed 
1460: 61 6e 64 20 6e 65 65 64 73 20 74 6f 20 62 65 0a  and needs to be.
1470: 2a 2a 20 64 65 63 6f 6d 70 72 65 73 73 65 64 20  ** decompressed 
1480: 62 65 66 6f 72 65 20 77 72 69 74 69 6e 67 2e 0a  before writing..
1490: 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 77  */.static void w
14a0: 72 69 74 65 5f 66 69 6c 65 28 0a 20 20 63 6f 6e  rite_file(.  con
14b0: 73 74 20 63 68 61 72 20 2a 7a 46 69 6c 65 6e 61  st char *zFilena
14c0: 6d 65 2c 20 20 20 2f 2a 20 53 74 6f 72 65 20 63  me,   /* Store c
14d0: 6f 6e 74 65 6e 74 20 69 6e 20 74 68 69 73 20 66  ontent in this f
14e0: 69 6c 65 20 2a 2f 0a 20 20 69 6e 74 20 69 4d 6f  ile */.  int iMo
14f0: 64 65 2c 20 20 20 20 20 20 20 20 20 20 20 20 20  de,             
1500: 20 20 2f 2a 20 54 68 65 20 75 6e 69 78 2d 73 74    /* The unix-st
1510: 79 6c 65 20 61 63 63 65 73 73 20 6d 6f 64 65 20  yle access mode 
1520: 2a 2f 0a 20 20 73 71 6c 69 74 65 33 5f 69 6e 74  */.  sqlite3_int
1530: 36 34 20 6d 74 69 6d 65 2c 20 20 20 20 20 2f 2a  64 mtime,     /*
1540: 20 4d 6f 64 69 66 69 63 61 74 69 6f 6e 20 74 69   Modification ti
1550: 6d 65 20 2a 2f 0a 20 20 69 6e 74 20 73 7a 2c 20  me */.  int sz, 
1560: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
1570: 20 2f 2a 20 53 69 7a 65 20 6f 66 20 66 69 6c 65   /* Size of file
1580: 20 61 73 20 73 74 6f 72 65 64 20 6f 6e 20 64 69   as stored on di
1590: 73 6b 20 2a 2f 0a 20 20 63 6f 6e 73 74 20 63 68  sk */.  const ch
15a0: 61 72 20 2a 70 43 6f 6d 70 72 2c 20 20 20 20 20  ar *pCompr,     
15b0: 20 2f 2a 20 43 6f 6e 74 65 6e 74 20 28 75 73 75   /* Content (usu
15c0: 61 6c 6c 79 20 63 6f 6d 70 72 65 73 73 65 64 29  ally compressed)
15d0: 20 2a 2f 0a 20 20 69 6e 74 20 6e 43 6f 6d 70 72   */.  int nCompr
15e0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f                 /
15f0: 2a 20 53 69 7a 65 20 6f 66 20 63 6f 6e 74 65 6e  * Size of conten
1600: 74 20 28 70 72 69 6f 72 20 74 6f 20 64 65 63 6f  t (prior to deco
1610: 6d 70 72 65 73 73 69 6f 6e 29 20 2a 2f 0a 29 7b  mpression) */.){
1620: 0a 20 20 63 68 61 72 20 2a 70 4f 75 74 3b 0a 20  .  char *pOut;. 
1630: 20 75 6e 73 69 67 6e 65 64 20 6c 6f 6e 67 20 69   unsigned long i
1640: 6e 74 20 6e 4f 75 74 3b 0a 20 20 69 6e 74 20 72  nt nOut;.  int r
1650: 63 3b 0a 20 20 46 49 4c 45 20 2a 6f 75 74 3b 0a  c;.  FILE *out;.
1660: 20 20 6d 61 6b 65 5f 70 61 72 65 6e 74 5f 64 69    make_parent_di
1670: 72 65 63 74 6f 72 79 28 7a 46 69 6c 65 6e 61 6d  rectory(zFilenam
1680: 65 29 3b 0a 20 20 69 66 28 20 70 43 6f 6d 70 72  e);.  if( pCompr
1690: 3d 3d 30 20 29 7b 0a 20 20 20 20 72 63 20 3d 20  ==0 ){.    rc = 
16a0: 6d 6b 64 69 72 28 7a 46 69 6c 65 6e 61 6d 65 2c  mkdir(zFilename,
16b0: 20 69 4d 6f 64 65 29 3b 0a 20 20 20 20 69 66 28   iMode);.    if(
16c0: 20 72 63 20 29 20 65 72 72 6f 72 4d 73 67 28 22   rc ) errorMsg("
16d0: 63 61 6e 6e 6f 74 20 6d 61 6b 65 20 64 69 72 65  cannot make dire
16e0: 63 74 6f 72 79 3a 20 25 73 5c 6e 22 2c 20 7a 46  ctory: %s\n", zF
16f0: 69 6c 65 6e 61 6d 65 29 3b 0a 20 20 20 20 72 65  ilename);.    re
1700: 74 75 72 6e 3b 0a 20 20 7d 0a 20 20 6f 75 74 20  turn;.  }.  out 
1710: 3d 20 66 6f 70 65 6e 28 7a 46 69 6c 65 6e 61 6d  = fopen(zFilenam
1720: 65 2c 20 22 77 62 22 29 3b 0a 20 20 69 66 28 20  e, "wb");.  if( 
1730: 6f 75 74 3d 3d 30 20 29 20 65 72 72 6f 72 4d 73  out==0 ) errorMs
1740: 67 28 22 63 61 6e 6e 6f 74 20 6f 70 65 6e 20 66  g("cannot open f
1750: 6f 72 20 77 72 69 74 69 6e 67 3a 20 25 73 5c 6e  or writing: %s\n
1760: 22 2c 20 7a 46 69 6c 65 6e 61 6d 65 29 3b 0a 20  ", zFilename);. 
1770: 20 69 66 28 20 73 7a 3d 3d 6e 43 6f 6d 70 72 20   if( sz==nCompr 
1780: 29 7b 0a 20 20 20 20 69 66 28 20 73 7a 3e 30 20  ){.    if( sz>0 
1790: 26 26 20 66 77 72 69 74 65 28 70 43 6f 6d 70 72  && fwrite(pCompr
17a0: 2c 20 73 7a 2c 20 31 2c 20 6f 75 74 29 21 3d 31  , sz, 1, out)!=1
17b0: 20 29 7b 0a 20 20 20 20 20 20 65 72 72 6f 72 4d   ){.      errorM
17c0: 73 67 28 22 66 61 69 6c 65 64 20 74 6f 20 77 72  sg("failed to wr
17d0: 69 74 65 3a 20 25 73 5c 6e 22 2c 20 7a 46 69 6c  ite: %s\n", zFil
17e0: 65 6e 61 6d 65 29 3b 0a 20 20 20 20 7d 0a 20 20  ename);.    }.  
17f0: 7d 65 6c 73 65 7b 0a 20 20 20 20 70 4f 75 74 20  }else{.    pOut 
1800: 3d 20 73 71 6c 69 74 65 33 5f 6d 61 6c 6c 6f 63  = sqlite3_malloc
1810: 28 20 73 7a 2b 31 20 29 3b 0a 20 20 20 20 69 66  ( sz+1 );.    if
1820: 28 20 70 4f 75 74 3d 3d 30 20 29 20 65 72 72 6f  ( pOut==0 ) erro
1830: 72 4d 73 67 28 22 63 61 6e 6e 6f 74 20 61 6c 6c  rMsg("cannot all
1840: 6f 63 61 74 65 20 25 64 20 62 79 74 65 73 5c 6e  ocate %d bytes\n
1850: 22 2c 20 73 7a 2b 31 29 3b 0a 20 20 20 20 6e 4f  ", sz+1);.    nO
1860: 75 74 20 3d 20 73 7a 3b 0a 20 20 20 20 72 63 20  ut = sz;.    rc 
1870: 3d 20 75 6e 63 6f 6d 70 72 65 73 73 28 70 4f 75  = uncompress(pOu
1880: 74 2c 20 26 6e 4f 75 74 2c 20 70 43 6f 6d 70 72  t, &nOut, pCompr
1890: 2c 20 6e 43 6f 6d 70 72 29 3b 0a 20 20 20 20 69  , nCompr);.    i
18a0: 66 28 20 72 63 21 3d 5a 5f 4f 4b 20 29 20 65 72  f( rc!=Z_OK ) er
18b0: 72 6f 72 4d 73 67 28 22 75 6e 63 6f 6d 70 72 65  rorMsg("uncompre
18c0: 73 73 20 66 61 69 6c 65 64 20 66 6f 72 20 25 73  ss failed for %s
18d0: 5c 6e 22 2c 20 7a 46 69 6c 65 6e 61 6d 65 29 3b  \n", zFilename);
18e0: 0a 20 20 20 20 69 66 28 20 6e 4f 75 74 3e 30 20  .    if( nOut>0 
18f0: 26 26 20 66 77 72 69 74 65 28 70 4f 75 74 2c 20  && fwrite(pOut, 
1900: 6e 4f 75 74 2c 20 31 2c 20 6f 75 74 29 21 3d 31  nOut, 1, out)!=1
1910: 20 29 7b 0a 20 20 20 20 20 20 65 72 72 6f 72 4d   ){.      errorM
1920: 73 67 28 22 66 61 69 6c 65 64 20 74 6f 20 77 72  sg("failed to wr
1930: 69 74 65 3a 20 25 73 5c 6e 22 2c 20 7a 46 69 6c  ite: %s\n", zFil
1940: 65 6e 61 6d 65 29 3b 0a 20 20 20 20 7d 0a 20 20  ename);.    }.  
1950: 20 20 73 71 6c 69 74 65 33 5f 66 72 65 65 28 70    sqlite3_free(p
1960: 4f 75 74 29 3b 0a 20 20 7d 0a 20 20 66 63 6c 6f  Out);.  }.  fclo
1970: 73 65 28 6f 75 74 29 3b 0a 20 20 72 63 20 3d 20  se(out);.  rc = 
1980: 63 68 6d 6f 64 28 7a 46 69 6c 65 6e 61 6d 65 2c  chmod(zFilename,
1990: 20 69 4d 6f 64 65 26 30 37 37 37 29 3b 0a 20 20   iMode&0777);.  
19a0: 69 66 28 20 72 63 20 29 20 65 72 72 6f 72 4d 73  if( rc ) errorMs
19b0: 67 28 22 63 61 6e 6e 6f 74 20 63 68 61 6e 67 65  g("cannot change
19c0: 20 6d 6f 64 65 20 74 6f 20 25 30 33 6f 3a 20 25   mode to %03o: %
19d0: 73 5c 6e 22 2c 20 69 4d 6f 64 65 2c 20 7a 46 69  s\n", iMode, zFi
19e0: 6c 65 6e 61 6d 65 29 3b 0a 7d 0a 0a 2f 2a 0a 2a  lename);.}../*.*
19f0: 2a 20 45 72 72 6f 72 20 6f 75 74 20 69 66 20 74  * Error out if t
1a00: 68 65 72 65 20 61 72 65 20 61 6e 79 20 69 73 73  here are any iss
1a10: 75 65 73 20 77 69 74 68 20 74 68 65 20 67 69 76  ues with the giv
1a20: 65 6e 20 66 69 6c 65 6e 61 6d 65 0a 2a 2f 0a 73  en filename.*/.s
1a30: 74 61 74 69 63 20 76 6f 69 64 20 63 68 65 63 6b  tatic void check
1a40: 5f 66 69 6c 65 6e 61 6d 65 28 63 6f 6e 73 74 20  _filename(const 
1a50: 63 68 61 72 20 2a 7a 29 7b 0a 20 20 69 66 28 20  char *z){.  if( 
1a60: 73 74 72 6e 63 6d 70 28 7a 2c 20 22 2e 2e 2f 22  strncmp(z, "../"
1a70: 2c 20 33 29 3d 3d 30 20 7c 7c 20 73 71 6c 69 74  , 3)==0 || sqlit
1a80: 65 33 5f 73 74 72 67 6c 6f 62 28 22 2a 2f 2e 2e  e3_strglob("*/..
1a90: 2f 2a 22 2c 20 7a 29 3d 3d 30 20 29 7b 0a 20 20  /*", z)==0 ){.  
1aa0: 20 20 65 72 72 6f 72 4d 73 67 28 22 46 69 6c 65    errorMsg("File
1ab0: 6e 61 6d 65 20 77 69 74 68 20 27 2e 2e 27 20 69  name with '..' i
1ac0: 6e 20 69 74 73 20 70 61 74 68 3a 20 25 73 5c 6e  n its path: %s\n
1ad0: 22 2c 20 7a 29 3b 0a 20 20 7d 0a 20 20 69 66 28  ", z);.  }.  if(
1ae0: 20 73 71 6c 69 74 65 33 5f 73 74 72 67 6c 6f 62   sqlite3_strglob
1af0: 28 22 2a 5c 5c 2a 22 2c 20 7a 29 3d 3d 30 20 29  ("*\\*", z)==0 )
1b00: 7b 0a 20 20 20 20 65 72 72 6f 72 4d 73 67 28 22  {.    errorMsg("
1b10: 46 69 6c 65 6e 61 6d 65 20 77 69 74 68 20 27 5c  Filename with '\
1b20: 5c 27 20 69 6e 20 69 74 73 20 6e 61 6d 65 3a 20  \' in its name: 
1b30: 25 73 5c 6e 22 2c 20 7a 29 3b 0a 20 20 7d 0a 7d  %s\n", z);.  }.}
1b40: 0a 0a 2f 2a 0a 2a 2a 20 41 64 64 20 61 20 66 69  ../*.** Add a fi
1b50: 6c 65 20 74 6f 20 74 68 65 20 64 61 74 61 62 61  le to the databa
1b60: 73 65 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f  se..*/.static vo
1b70: 69 64 20 61 64 64 5f 66 69 6c 65 28 0a 20 20 63  id add_file(.  c
1b80: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 46 69 6c 65  onst char *zFile
1b90: 6e 61 6d 65 2c 20 20 20 20 20 2f 2a 20 4e 61 6d  name,     /* Nam
1ba0: 65 20 6f 66 20 66 69 6c 65 20 74 6f 20 61 64 64  e of file to add
1bb0: 20 2a 2f 0a 20 20 69 6e 74 20 76 65 72 62 6f 73   */.  int verbos
1bc0: 65 46 6c 61 67 2c 20 20 20 20 20 20 20 20 20 20  eFlag,          
1bd0: 20 2f 2a 20 49 66 20 74 72 75 65 2c 20 73 68 6f   /* If true, sho
1be0: 77 20 65 61 63 68 20 66 69 6c 65 20 61 64 64 65  w each file adde
1bf0: 64 20 2a 2f 0a 20 20 69 6e 74 20 6e 6f 43 6f 6d  d */.  int noCom
1c00: 70 72 65 73 73 20 20 20 20 20 20 20 20 20 20 20  press           
1c10: 20 20 2f 2a 20 49 66 20 74 72 75 65 2c 20 61 6c    /* If true, al
1c20: 77 61 79 73 20 6f 6d 69 74 20 63 6f 6d 70 72 65  ways omit compre
1c30: 73 73 69 6f 6e 20 2a 2f 0a 29 7b 0a 20 20 69 6e  ssion */.){.  in
1c40: 74 20 72 63 3b 0a 20 20 73 74 72 75 63 74 20 73  t rc;.  struct s
1c50: 74 61 74 20 78 3b 0a 20 20 63 68 61 72 20 2a 7a  tat x;.  char *z
1c60: 43 6f 6e 74 65 6e 74 3b 0a 20 20 69 6e 74 20 73  Content;.  int s
1c70: 7a 4f 72 69 67 3b 0a 20 20 69 6e 74 20 73 7a 43  zOrig;.  int szC
1c80: 6f 6d 70 72 3b 0a 20 20 63 6f 6e 73 74 20 63 68  ompr;.  const ch
1c90: 61 72 20 2a 7a 4e 61 6d 65 3b 0a 0a 20 20 63 68  ar *zName;..  ch
1ca0: 65 63 6b 5f 66 69 6c 65 6e 61 6d 65 28 7a 46 69  eck_filename(zFi
1cb0: 6c 65 6e 61 6d 65 29 3b 0a 20 20 72 63 20 3d 20  lename);.  rc = 
1cc0: 73 74 61 74 28 7a 46 69 6c 65 6e 61 6d 65 2c 20  stat(zFilename, 
1cd0: 26 78 29 3b 0a 20 20 69 66 28 20 72 63 20 29 20  &x);.  if( rc ) 
1ce0: 65 72 72 6f 72 4d 73 67 28 22 6e 6f 20 73 75 63  errorMsg("no suc
1cf0: 68 20 66 69 6c 65 20 6f 72 20 64 69 72 65 63 74  h file or direct
1d00: 6f 72 79 3a 20 25 73 5c 6e 22 2c 20 7a 46 69 6c  ory: %s\n", zFil
1d10: 65 6e 61 6d 65 29 3b 0a 20 20 69 66 28 20 78 2e  ename);.  if( x.
1d20: 73 74 5f 73 69 7a 65 3e 31 30 30 30 30 30 30 30  st_size>10000000
1d30: 30 30 20 29 7b 0a 20 20 20 20 65 72 72 6f 72 4d  00 ){.    errorM
1d40: 73 67 28 22 66 69 6c 65 20 74 6f 6f 20 62 69 67  sg("file too big
1d50: 3a 20 25 73 5c 6e 22 2c 20 7a 46 69 6c 65 6e 61  : %s\n", zFilena
1d60: 6d 65 29 3b 0a 20 20 7d 0a 20 20 69 66 28 20 70  me);.  }.  if( p
1d70: 53 74 6d 74 3d 3d 30 20 29 7b 0a 20 20 20 20 64  Stmt==0 ){.    d
1d80: 62 5f 70 72 65 70 61 72 65 28 22 52 45 50 4c 41  b_prepare("REPLA
1d90: 43 45 20 49 4e 54 4f 20 73 61 72 28 6e 61 6d 65  CE INTO sar(name
1da0: 2c 6d 6f 64 65 2c 6d 74 69 6d 65 2c 73 7a 2c 64  ,mode,mtime,sz,d
1db0: 61 74 61 29 22 0a 20 20 20 20 20 20 20 20 20 20  ata)".          
1dc0: 20 20 20 20 20 22 20 56 41 4c 55 45 53 28 3f 31       " VALUES(?1
1dd0: 2c 3f 32 2c 3f 33 2c 3f 34 2c 3f 35 29 22 29 3b  ,?2,?3,?4,?5)");
1de0: 0a 20 20 7d 0a 20 20 7a 4e 61 6d 65 20 3d 20 7a  .  }.  zName = z
1df0: 46 69 6c 65 6e 61 6d 65 3b 0a 20 20 77 68 69 6c  Filename;.  whil
1e00: 65 28 20 7a 4e 61 6d 65 5b 30 5d 3d 3d 27 2f 27  e( zName[0]=='/'
1e10: 20 29 20 7a 4e 61 6d 65 2b 2b 3b 0a 20 20 73 71   ) zName++;.  sq
1e20: 6c 69 74 65 33 5f 62 69 6e 64 5f 74 65 78 74 28  lite3_bind_text(
1e30: 70 53 74 6d 74 2c 20 31 2c 20 7a 4e 61 6d 65 2c  pStmt, 1, zName,
1e40: 20 2d 31 2c 20 53 51 4c 49 54 45 5f 53 54 41 54   -1, SQLITE_STAT
1e50: 49 43 29 3b 0a 20 20 73 71 6c 69 74 65 33 5f 62  IC);.  sqlite3_b
1e60: 69 6e 64 5f 69 6e 74 28 70 53 74 6d 74 2c 20 32  ind_int(pStmt, 2
1e70: 2c 20 78 2e 73 74 5f 6d 6f 64 65 29 3b 0a 20 20  , x.st_mode);.  
1e80: 73 71 6c 69 74 65 33 5f 62 69 6e 64 5f 69 6e 74  sqlite3_bind_int
1e90: 36 34 28 70 53 74 6d 74 2c 20 33 2c 20 78 2e 73  64(pStmt, 3, x.s
1ea0: 74 5f 6d 74 69 6d 65 29 3b 0a 20 20 69 66 28 20  t_mtime);.  if( 
1eb0: 53 5f 49 53 52 45 47 28 78 2e 73 74 5f 6d 6f 64  S_ISREG(x.st_mod
1ec0: 65 29 20 29 7b 0a 20 20 20 20 63 68 61 72 20 2a  e) ){.    char *
1ed0: 7a 43 6f 6e 74 65 6e 74 20 3d 20 72 65 61 64 5f  zContent = read_
1ee0: 66 69 6c 65 28 7a 46 69 6c 65 6e 61 6d 65 2c 20  file(zFilename, 
1ef0: 26 73 7a 4f 72 69 67 2c 20 26 73 7a 43 6f 6d 70  &szOrig, &szComp
1f00: 72 2c 20 6e 6f 43 6f 6d 70 72 65 73 73 29 3b 0a  r, noCompress);.
1f10: 20 20 20 20 73 71 6c 69 74 65 33 5f 62 69 6e 64      sqlite3_bind
1f20: 5f 69 6e 74 28 70 53 74 6d 74 2c 20 34 2c 20 73  _int(pStmt, 4, s
1f30: 7a 4f 72 69 67 29 3b 0a 20 20 20 20 73 71 6c 69  zOrig);.    sqli
1f40: 74 65 33 5f 62 69 6e 64 5f 62 6c 6f 62 28 70 53  te3_bind_blob(pS
1f50: 74 6d 74 2c 20 35 2c 20 7a 43 6f 6e 74 65 6e 74  tmt, 5, zContent
1f60: 2c 20 73 7a 43 6f 6d 70 72 2c 20 73 71 6c 69 74  , szCompr, sqlit
1f70: 65 33 5f 66 72 65 65 29 3b 0a 20 20 20 20 69 66  e3_free);.    if
1f80: 28 20 76 65 72 62 6f 73 65 46 6c 61 67 20 29 7b  ( verboseFlag ){
1f90: 0a 20 20 20 20 20 20 69 66 28 20 73 7a 43 6f 6d  .      if( szCom
1fa0: 70 72 3c 73 7a 4f 72 69 67 20 29 7b 0a 20 20 20  pr<szOrig ){.   
1fb0: 20 20 20 20 20 69 6e 74 20 70 63 74 20 3d 20 73       int pct = s
1fc0: 7a 4f 72 69 67 20 3f 20 28 31 30 30 2a 28 73 71  zOrig ? (100*(sq
1fd0: 6c 69 74 65 33 5f 69 6e 74 36 34 29 73 7a 43 6f  lite3_int64)szCo
1fe0: 6d 70 72 29 2f 73 7a 4f 72 69 67 20 3a 20 30 3b  mpr)/szOrig : 0;
1ff0: 0a 20 20 20 20 20 20 20 20 70 72 69 6e 74 66 28  .        printf(
2000: 22 20 20 61 64 64 65 64 3a 20 25 73 20 28 64 65  "  added: %s (de
2010: 66 6c 61 74 65 20 25 64 25 25 29 5c 6e 22 2c 20  flate %d%%)\n", 
2020: 7a 46 69 6c 65 6e 61 6d 65 2c 20 31 30 30 2d 70  zFilename, 100-p
2030: 63 74 29 3b 0a 20 20 20 20 20 20 7d 65 6c 73 65  ct);.      }else
2040: 7b 0a 20 20 20 20 20 20 20 20 70 72 69 6e 74 66  {.        printf
2050: 28 22 20 20 61 64 64 65 64 3a 20 25 73 5c 6e 22  ("  added: %s\n"
2060: 2c 20 7a 46 69 6c 65 6e 61 6d 65 29 3b 0a 20 20  , zFilename);.  
2070: 20 20 20 20 7d 0a 20 20 20 20 7d 20 0a 20 20 7d      }.    } .  }
2080: 65 6c 73 65 7b 0a 20 20 20 20 73 71 6c 69 74 65  else{.    sqlite
2090: 33 5f 62 69 6e 64 5f 69 6e 74 28 70 53 74 6d 74  3_bind_int(pStmt
20a0: 2c 20 34 2c 20 30 29 3b 0a 20 20 20 20 73 71 6c  , 4, 0);.    sql
20b0: 69 74 65 33 5f 62 69 6e 64 5f 6e 75 6c 6c 28 70  ite3_bind_null(p
20c0: 53 74 6d 74 2c 20 35 29 3b 0a 20 20 20 20 69 66  Stmt, 5);.    if
20d0: 28 20 76 65 72 62 6f 73 65 46 6c 61 67 20 29 20  ( verboseFlag ) 
20e0: 70 72 69 6e 74 66 28 22 20 20 61 64 64 65 64 3a  printf("  added:
20f0: 20 25 73 5c 6e 22 2c 20 7a 46 69 6c 65 6e 61 6d   %s\n", zFilenam
2100: 65 29 3b 0a 20 20 7d 0a 20 20 72 63 20 3d 20 73  e);.  }.  rc = s
2110: 71 6c 69 74 65 33 5f 73 74 65 70 28 70 53 74 6d  qlite3_step(pStm
2120: 74 29 3b 0a 20 20 69 66 28 20 72 63 21 3d 53 51  t);.  if( rc!=SQ
2130: 4c 49 54 45 5f 44 4f 4e 45 20 29 7b 0a 20 20 20  LITE_DONE ){.   
2140: 20 65 72 72 6f 72 4d 73 67 28 22 49 6e 73 65 72   errorMsg("Inser
2150: 74 20 66 61 69 6c 65 64 20 66 6f 72 20 25 73 3a  t failed for %s:
2160: 20 25 73 5c 6e 22 2c 20 7a 46 69 6c 65 6e 61 6d   %s\n", zFilenam
2170: 65 2c 20 73 71 6c 69 74 65 33 5f 65 72 72 6d 73  e, sqlite3_errms
2180: 67 28 64 62 29 29 3b 0a 20 20 7d 0a 20 20 73 71  g(db));.  }.  sq
2190: 6c 69 74 65 33 5f 72 65 73 65 74 28 70 53 74 6d  lite3_reset(pStm
21a0: 74 29 3b 0a 20 20 69 66 28 20 53 5f 49 53 44 49  t);.  if( S_ISDI
21b0: 52 28 78 2e 73 74 5f 6d 6f 64 65 29 20 29 7b 0a  R(x.st_mode) ){.
21c0: 20 20 20 20 44 49 52 20 2a 64 3b 0a 20 20 20 20      DIR *d;.    
21d0: 73 74 72 75 63 74 20 64 69 72 65 6e 74 20 2a 70  struct dirent *p
21e0: 45 6e 74 72 79 3b 0a 20 20 20 20 63 68 61 72 20  Entry;.    char 
21f0: 2a 7a 53 75 62 70 61 74 68 3b 0a 20 20 20 20 64  *zSubpath;.    d
2200: 20 3d 20 6f 70 65 6e 64 69 72 28 7a 46 69 6c 65   = opendir(zFile
2210: 6e 61 6d 65 29 3b 0a 20 20 20 20 69 66 28 20 64  name);.    if( d
2220: 20 29 7b 0a 20 20 20 20 20 20 77 68 69 6c 65 28   ){.      while(
2230: 20 28 70 45 6e 74 72 79 20 3d 20 72 65 61 64 64   (pEntry = readd
2240: 69 72 28 64 29 29 21 3d 30 20 29 7b 0a 20 20 20  ir(d))!=0 ){.   
2250: 20 20 20 20 20 69 66 28 20 73 74 72 63 6d 70 28       if( strcmp(
2260: 70 45 6e 74 72 79 2d 3e 64 5f 6e 61 6d 65 2c 22  pEntry->d_name,"
2270: 2e 22 29 3d 3d 30 20 7c 7c 20 73 74 72 63 6d 70  .")==0 || strcmp
2280: 28 70 45 6e 74 72 79 2d 3e 64 5f 6e 61 6d 65 2c  (pEntry->d_name,
2290: 22 2e 2e 22 29 3d 3d 30 20 29 7b 0a 20 20 20 20  "..")==0 ){.    
22a0: 20 20 20 20 20 20 63 6f 6e 74 69 6e 75 65 3b 0a        continue;.
22b0: 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20          }.      
22c0: 20 20 63 68 61 72 20 2a 7a 53 75 62 70 61 74 68    char *zSubpath
22d0: 20 3d 20 73 71 6c 69 74 65 33 5f 6d 70 72 69 6e   = sqlite3_mprin
22e0: 74 66 28 22 25 73 2f 25 73 22 2c 20 7a 46 69 6c  tf("%s/%s", zFil
22f0: 65 6e 61 6d 65 2c 20 70 45 6e 74 72 79 2d 3e 64  ename, pEntry->d
2300: 5f 6e 61 6d 65 29 3b 0a 20 20 20 20 20 20 20 20  _name);.        
2310: 61 64 64 5f 66 69 6c 65 28 7a 53 75 62 70 61 74  add_file(zSubpat
2320: 68 2c 20 76 65 72 62 6f 73 65 46 6c 61 67 2c 20  h, verboseFlag, 
2330: 6e 6f 43 6f 6d 70 72 65 73 73 29 3b 0a 20 20 20  noCompress);.   
2340: 20 20 20 20 20 73 71 6c 69 74 65 33 5f 66 72 65       sqlite3_fre
2350: 65 28 7a 53 75 62 70 61 74 68 29 3b 0a 20 20 20  e(zSubpath);.   
2360: 20 20 20 7d 0a 20 20 20 20 7d 0a 20 20 7d 0a 7d     }.    }.  }.}
2370: 0a 0a 2f 2a 0a 2a 2a 20 4c 69 73 74 20 6f 66 20  ../*.** List of 
2380: 63 6f 6d 6d 61 6e 64 2d 6c 69 6e 65 20 61 72 67  command-line arg
2390: 75 6d 65 6e 74 73 0a 2a 2f 0a 74 79 70 65 64 65  uments.*/.typede
23a0: 66 20 73 74 72 75 63 74 20 4e 61 6d 65 4c 69 73  f struct NameLis
23b0: 74 20 4e 61 6d 65 4c 69 73 74 3b 0a 73 74 72 75  t NameList;.stru
23c0: 63 74 20 4e 61 6d 65 4c 69 73 74 20 7b 0a 20 20  ct NameList {.  
23d0: 63 68 61 72 20 2a 2a 61 7a 4e 61 6d 65 3b 20 20  char **azName;  
23e0: 20 2f 2a 20 4c 69 73 74 20 6f 66 20 6e 61 6d 65   /* List of name
23f0: 73 20 2a 2f 0a 20 20 69 6e 74 20 6e 4e 61 6d 65  s */.  int nName
2400: 3b 20 20 20 20 20 20 20 2f 2a 20 4e 75 6d 62 65  ;       /* Numbe
2410: 72 20 6f 66 20 6e 61 6d 65 73 20 6f 6e 20 74 68  r of names on th
2420: 65 20 6c 69 73 74 20 2a 2f 0a 7d 3b 0a 0a 2f 2a  e list */.};../*
2430: 0a 2a 2a 20 49 6e 70 6c 65 6d 65 6e 74 61 74 69  .** Inplementati
2440: 6f 6e 20 6f 66 20 53 51 4c 20 66 75 6e 63 74 69  on of SQL functi
2450: 6f 6e 20 22 6e 61 6d 65 5f 6f 6e 5f 6c 69 73 74  on "name_on_list
2460: 28 58 29 22 2e 20 20 52 65 74 75 72 6e 0a 2a 2a  (X)".  Return.**
2470: 20 74 72 75 65 20 69 66 20 58 20 69 73 20 6f 6e   true if X is on
2480: 20 74 68 65 20 6c 69 73 74 20 6f 66 20 6e 61 6d   the list of nam
2490: 65 73 20 67 69 76 65 6e 20 6f 6e 20 74 68 65 20  es given on the 
24a0: 63 6f 6d 6d 61 6e 64 2d 6c 69 6e 65 2e 0a 2a 2f  command-line..*/
24b0: 0a 73 74 61 74 69 63 20 76 6f 69 64 20 6e 61 6d  .static void nam
24c0: 65 5f 6f 6e 5f 6c 69 73 74 28 0a 20 20 73 71 6c  e_on_list(.  sql
24d0: 69 74 65 33 5f 63 6f 6e 74 65 78 74 20 2a 63 6f  ite3_context *co
24e0: 6e 74 65 78 74 2c 0a 20 20 69 6e 74 20 61 72 67  ntext,.  int arg
24f0: 63 2c 0a 20 20 73 71 6c 69 74 65 33 5f 76 61 6c  c,.  sqlite3_val
2500: 75 65 20 2a 2a 61 72 67 76 0a 29 7b 0a 20 20 4e  ue **argv.){.  N
2510: 61 6d 65 4c 69 73 74 20 2a 70 4c 69 73 74 20 3d  ameList *pList =
2520: 20 28 4e 61 6d 65 4c 69 73 74 2a 29 73 71 6c 69   (NameList*)sqli
2530: 74 65 33 5f 75 73 65 72 5f 64 61 74 61 28 63 6f  te3_user_data(co
2540: 6e 74 65 78 74 29 3b 0a 20 20 69 6e 74 20 69 3b  ntext);.  int i;
2550: 0a 20 20 69 6e 74 20 72 63 20 3d 20 30 3b 0a 20  .  int rc = 0;. 
2560: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 20 3d   const char *z =
2570: 20 28 63 6f 6e 73 74 20 63 68 61 72 2a 29 73 71   (const char*)sq
2580: 6c 69 74 65 33 5f 76 61 6c 75 65 5f 74 65 78 74  lite3_value_text
2590: 28 61 72 67 76 5b 30 5d 29 3b 0a 20 20 69 66 28  (argv[0]);.  if(
25a0: 20 7a 21 3d 30 20 29 7b 0a 20 20 20 20 66 6f 72   z!=0 ){.    for
25b0: 28 69 3d 30 3b 20 69 3c 70 4c 69 73 74 2d 3e 6e  (i=0; i<pList->n
25c0: 4e 61 6d 65 3b 20 69 2b 2b 29 7b 0a 20 20 20 20  Name; i++){.    
25d0: 20 20 69 66 28 20 73 74 72 63 6d 70 28 70 4c 69    if( strcmp(pLi
25e0: 73 74 2d 3e 61 7a 4e 61 6d 65 5b 69 5d 2c 20 7a  st->azName[i], z
25f0: 29 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 20 20  )==0 ){.        
2600: 72 63 20 3d 20 31 3b 0a 20 20 20 20 20 20 20 20  rc = 1;.        
2610: 62 72 65 61 6b 3b 0a 20 20 20 20 20 20 7d 0a 20  break;.      }. 
2620: 20 20 20 7d 0a 20 20 7d 0a 20 20 73 71 6c 69 74     }.  }.  sqlit
2630: 65 33 5f 72 65 73 75 6c 74 5f 69 6e 74 28 63 6f  e3_result_int(co
2640: 6e 74 65 78 74 2c 20 72 63 29 3b 0a 7d 0a 0a 69  ntext, rc);.}..i
2650: 6e 74 20 6d 61 69 6e 28 69 6e 74 20 61 72 67 63  nt main(int argc
2660: 2c 20 63 68 61 72 20 2a 2a 61 72 67 76 29 7b 0a  , char **argv){.
2670: 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 41    const char *zA
2680: 72 63 68 69 76 65 20 3d 20 30 3b 0a 20 20 63 68  rchive = 0;.  ch
2690: 61 72 20 2a 2a 61 7a 46 69 6c 65 73 20 3d 20 30  ar **azFiles = 0
26a0: 3b 0a 20 20 69 6e 74 20 6e 46 69 6c 65 73 20 3d  ;.  int nFiles =
26b0: 20 30 3b 0a 20 20 69 6e 74 20 6c 69 73 74 46 6c   0;.  int listFl
26c0: 61 67 20 3d 20 30 3b 0a 20 20 69 6e 74 20 65 78  ag = 0;.  int ex
26d0: 74 72 61 63 74 46 6c 61 67 20 3d 20 30 3b 0a 20  tractFlag = 0;. 
26e0: 20 69 6e 74 20 76 65 72 62 6f 73 65 46 6c 61 67   int verboseFlag
26f0: 20 3d 20 30 3b 0a 20 20 69 6e 74 20 6e 6f 43 6f   = 0;.  int noCo
2700: 6d 70 72 65 73 73 20 3d 20 30 3b 0a 20 20 69 6e  mpress = 0;.  in
2710: 74 20 69 2c 20 6a 3b 0a 0a 20 20 69 66 28 20 73  t i, j;..  if( s
2720: 71 6c 69 74 65 33 5f 73 74 72 67 6c 6f 62 28 22  qlite3_strglob("
2730: 2a 2f 75 6e 73 61 72 22 2c 20 61 72 67 76 5b 30  */unsar", argv[0
2740: 5d 29 3d 3d 30 20 29 7b 0a 20 20 20 20 65 78 74  ])==0 ){.    ext
2750: 72 61 63 74 46 6c 61 67 20 3d 20 31 3b 0a 20 20  ractFlag = 1;.  
2760: 7d 0a 20 20 66 6f 72 28 69 3d 31 3b 20 69 3c 61  }.  for(i=1; i<a
2770: 72 67 63 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 69  rgc; i++){.    i
2780: 66 28 20 61 72 67 76 5b 69 5d 5b 30 5d 3d 3d 27  f( argv[i][0]=='
2790: 2d 27 20 29 7b 0a 20 20 20 20 20 20 66 6f 72 28  -' ){.      for(
27a0: 6a 3d 31 3b 20 61 72 67 76 5b 69 5d 5b 6a 5d 3b  j=1; argv[i][j];
27b0: 20 6a 2b 2b 29 7b 0a 20 20 20 20 20 20 20 20 73   j++){.        s
27c0: 77 69 74 63 68 28 20 61 72 67 76 5b 69 5d 5b 6a  witch( argv[i][j
27d0: 5d 20 29 7b 0a 20 20 20 20 20 20 20 20 20 20 63  ] ){.          c
27e0: 61 73 65 20 27 6c 27 3a 20 20 20 6c 69 73 74 46  ase 'l':   listF
27f0: 6c 61 67 20 3d 20 31 3b 20 20 20 20 62 72 65 61  lag = 1;    brea
2800: 6b 3b 0a 20 20 20 20 20 20 20 20 20 20 63 61 73  k;.          cas
2810: 65 20 27 6e 27 3a 20 20 20 6e 6f 43 6f 6d 70 72  e 'n':   noCompr
2820: 65 73 73 20 3d 20 31 3b 20 20 62 72 65 61 6b 3b  ess = 1;  break;
2830: 0a 20 20 20 20 20 20 20 20 20 20 63 61 73 65 20  .          case 
2840: 27 76 27 3a 20 20 20 76 65 72 62 6f 73 65 46 6c  'v':   verboseFl
2850: 61 67 20 3d 20 31 3b 20 62 72 65 61 6b 3b 0a 20  ag = 1; break;. 
2860: 20 20 20 20 20 20 20 20 20 63 61 73 65 20 27 78           case 'x
2870: 27 3a 20 20 20 65 78 74 72 61 63 74 46 6c 61 67  ':   extractFlag
2880: 20 3d 20 31 3b 20 62 72 65 61 6b 3b 0a 20 20 20   = 1; break;.   
2890: 20 20 20 20 20 20 20 63 61 73 65 20 27 2d 27 3a         case '-':
28a0: 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 20 20     break;.      
28b0: 20 20 20 20 64 65 66 61 75 6c 74 3a 20 20 20 20      default:    
28c0: 73 68 6f 77 48 65 6c 70 28 61 72 67 76 5b 30 5d  showHelp(argv[0]
28d0: 29 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20 20 20  );.        }.   
28e0: 20 20 20 7d 0a 20 20 20 20 7d 65 6c 73 65 20 69     }.    }else i
28f0: 66 28 20 7a 41 72 63 68 69 76 65 3d 3d 30 20 29  f( zArchive==0 )
2900: 7b 0a 20 20 20 20 20 20 7a 41 72 63 68 69 76 65  {.      zArchive
2910: 20 3d 20 61 72 67 76 5b 69 5d 3b 0a 20 20 20 20   = argv[i];.    
2920: 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 61 7a 46  }else{.      azF
2930: 69 6c 65 73 20 3d 20 26 61 72 67 76 5b 69 5d 3b  iles = &argv[i];
2940: 0a 20 20 20 20 20 20 6e 46 69 6c 65 73 20 3d 20  .      nFiles = 
2950: 61 72 67 63 20 2d 20 69 3b 0a 20 20 20 20 20 20  argc - i;.      
2960: 62 72 65 61 6b 3b 0a 20 20 20 20 7d 0a 20 20 7d  break;.    }.  }
2970: 0a 20 20 69 66 28 20 7a 41 72 63 68 69 76 65 3d  .  if( zArchive=
2980: 3d 30 20 29 20 73 68 6f 77 48 65 6c 70 28 61 72  =0 ) showHelp(ar
2990: 67 76 5b 30 5d 29 3b 0a 20 20 69 66 28 20 6c 69  gv[0]);.  if( li
29a0: 73 74 46 6c 61 67 20 29 7b 0a 20 20 20 20 69 6e  stFlag ){.    in
29b0: 74 20 72 63 3b 0a 20 20 20 20 64 62 5f 6f 70 65  t rc;.    db_ope
29c0: 6e 28 7a 41 72 63 68 69 76 65 2c 20 30 29 3b 0a  n(zArchive, 0);.
29d0: 20 20 20 20 69 66 28 20 76 65 72 62 6f 73 65 46      if( verboseF
29e0: 6c 61 67 20 29 7b 0a 20 20 20 20 20 20 64 62 5f  lag ){.      db_
29f0: 70 72 65 70 61 72 65 28 0a 20 20 20 20 20 20 20  prepare(.       
2a00: 20 20 20 22 53 45 4c 45 43 54 20 6e 61 6d 65 2c     "SELECT name,
2a10: 20 73 7a 2c 20 6c 65 6e 67 74 68 28 64 61 74 61   sz, length(data
2a20: 29 2c 20 6d 6f 64 65 2c 20 64 61 74 65 74 69 6d  ), mode, datetim
2a30: 65 28 6d 74 69 6d 65 2c 27 75 6e 69 78 65 70 6f  e(mtime,'unixepo
2a40: 63 68 27 29 22 0a 20 20 20 20 20 20 20 20 20 20  ch')".          
2a50: 22 20 46 52 4f 4d 20 73 61 72 20 4f 52 44 45 52  " FROM sar ORDER
2a60: 20 42 59 20 6e 61 6d 65 22 0a 20 20 20 20 20 20   BY name".      
2a70: 29 3b 0a 20 20 20 20 20 20 77 68 69 6c 65 28 20  );.      while( 
2a80: 73 71 6c 69 74 65 33 5f 73 74 65 70 28 70 53 74  sqlite3_step(pSt
2a90: 6d 74 29 3d 3d 53 51 4c 49 54 45 5f 52 4f 57 20  mt)==SQLITE_ROW 
2aa0: 29 7b 0a 20 20 20 20 20 20 20 20 70 72 69 6e 74  ){.        print
2ab0: 66 28 22 25 31 30 64 20 25 31 30 64 20 25 30 33  f("%10d %10d %03
2ac0: 6f 20 25 73 20 25 73 5c 6e 22 2c 20 0a 20 20 20  o %s %s\n", .   
2ad0: 20 20 20 20 20 20 20 20 20 20 20 20 73 71 6c 69              sqli
2ae0: 74 65 33 5f 63 6f 6c 75 6d 6e 5f 69 6e 74 28 70  te3_column_int(p
2af0: 53 74 6d 74 2c 20 31 29 2c 0a 20 20 20 20 20 20  Stmt, 1),.      
2b00: 20 20 20 20 20 20 20 20 20 73 71 6c 69 74 65 33           sqlite3
2b10: 5f 63 6f 6c 75 6d 6e 5f 69 6e 74 28 70 53 74 6d  _column_int(pStm
2b20: 74 2c 20 32 29 2c 0a 20 20 20 20 20 20 20 20 20  t, 2),.         
2b30: 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 63 6f        sqlite3_co
2b40: 6c 75 6d 6e 5f 69 6e 74 28 70 53 74 6d 74 2c 20  lumn_int(pStmt, 
2b50: 33 29 26 30 37 37 37 2c 0a 20 20 20 20 20 20 20  3)&0777,.       
2b60: 20 20 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f          sqlite3_
2b70: 63 6f 6c 75 6d 6e 5f 74 65 78 74 28 70 53 74 6d  column_text(pStm
2b80: 74 2c 20 34 29 2c 0a 20 20 20 20 20 20 20 20 20  t, 4),.         
2b90: 20 20 20 20 20 20 73 71 6c 69 74 65 33 5f 63 6f        sqlite3_co
2ba0: 6c 75 6d 6e 5f 74 65 78 74 28 70 53 74 6d 74 2c  lumn_text(pStmt,
2bb0: 20 30 29 29 3b 0a 20 20 20 20 20 20 7d 0a 20 20   0));.      }.  
2bc0: 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 64    }else{.      d
2bd0: 62 5f 70 72 65 70 61 72 65 28 0a 20 20 20 20 20  b_prepare(.     
2be0: 20 20 20 20 20 22 53 45 4c 45 43 54 20 6e 61 6d       "SELECT nam
2bf0: 65 20 46 52 4f 4d 20 73 61 72 20 4f 52 44 45 52  e FROM sar ORDER
2c00: 20 42 59 20 6e 61 6d 65 22 0a 20 20 20 20 20 20   BY name".      
2c10: 29 3b 0a 20 20 20 20 20 20 77 68 69 6c 65 28 20  );.      while( 
2c20: 73 71 6c 69 74 65 33 5f 73 74 65 70 28 70 53 74  sqlite3_step(pSt
2c30: 6d 74 29 3d 3d 53 51 4c 49 54 45 5f 52 4f 57 20  mt)==SQLITE_ROW 
2c40: 29 7b 0a 20 20 20 20 20 20 20 20 70 72 69 6e 74  ){.        print
2c50: 66 28 22 25 73 5c 6e 22 2c 20 73 71 6c 69 74 65  f("%s\n", sqlite
2c60: 33 5f 63 6f 6c 75 6d 6e 5f 74 65 78 74 28 70 53  3_column_text(pS
2c70: 74 6d 74 2c 30 29 29 3b 0a 20 20 20 20 20 20 7d  tmt,0));.      }
2c80: 0a 20 20 20 20 7d 0a 20 20 20 20 64 62 5f 63 6c  .    }.    db_cl
2c90: 6f 73 65 28 31 29 3b 0a 20 20 7d 65 6c 73 65 20  ose(1);.  }else 
2ca0: 69 66 28 20 65 78 74 72 61 63 74 46 6c 61 67 20  if( extractFlag 
2cb0: 29 7b 0a 20 20 20 20 63 6f 6e 73 74 20 63 68 61  ){.    const cha
2cc0: 72 20 2a 7a 53 71 6c 3b 0a 20 20 20 20 69 6e 74  r *zSql;.    int
2cd0: 20 72 63 3b 0a 20 20 20 20 64 62 5f 6f 70 65 6e   rc;.    db_open
2ce0: 28 7a 41 72 63 68 69 76 65 2c 20 30 29 3b 0a 20  (zArchive, 0);. 
2cf0: 20 20 20 69 66 28 20 6e 46 69 6c 65 73 20 29 7b     if( nFiles ){
2d00: 0a 20 20 20 20 20 20 4e 61 6d 65 4c 69 73 74 20  .      NameList 
2d10: 78 3b 0a 20 20 20 20 20 20 78 2e 61 7a 4e 61 6d  x;.      x.azNam
2d20: 65 20 3d 20 61 7a 46 69 6c 65 73 3b 0a 20 20 20  e = azFiles;.   
2d30: 20 20 20 78 2e 6e 4e 61 6d 65 20 3d 20 6e 46 69     x.nName = nFi
2d40: 6c 65 73 3b 0a 20 20 20 20 20 20 73 71 6c 69 74  les;.      sqlit
2d50: 65 33 5f 63 72 65 61 74 65 5f 66 75 6e 63 74 69  e3_create_functi
2d60: 6f 6e 28 64 62 2c 20 22 6e 61 6d 65 5f 6f 6e 5f  on(db, "name_on_
2d70: 6c 69 73 74 22 2c 20 31 2c 20 53 51 4c 49 54 45  list", 1, SQLITE
2d80: 5f 55 54 46 38 2c 0a 20 20 20 20 20 20 20 20 20  _UTF8,.         
2d90: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
2da0: 20 20 20 20 20 28 63 68 61 72 2a 29 26 78 2c 20       (char*)&x, 
2db0: 6e 61 6d 65 5f 6f 6e 5f 6c 69 73 74 2c 20 30 2c  name_on_list, 0,
2dc0: 20 30 29 3b 0a 20 20 20 20 20 20 7a 53 71 6c 20   0);.      zSql 
2dd0: 3d 20 22 53 45 4c 45 43 54 20 6e 61 6d 65 2c 20  = "SELECT name, 
2de0: 6d 6f 64 65 2c 20 6d 74 69 6d 65 2c 20 73 7a 2c  mode, mtime, sz,
2df0: 20 64 61 74 61 20 46 52 4f 4d 20 73 61 72 22 0a   data FROM sar".
2e00: 20 20 20 20 20 20 20 20 20 20 20 20 20 22 20 57               " W
2e10: 48 45 52 45 20 6e 61 6d 65 5f 6f 6e 5f 6c 69 73  HERE name_on_lis
2e20: 74 28 66 69 6c 65 6e 61 6d 65 29 22 3b 0a 20 20  t(filename)";.  
2e30: 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 7a    }else{.      z
2e40: 53 71 6c 20 3d 20 22 53 45 4c 45 43 54 20 6e 61  Sql = "SELECT na
2e50: 6d 65 2c 20 6d 6f 64 65 2c 20 6d 74 69 6d 65 2c  me, mode, mtime,
2e60: 20 73 7a 2c 20 64 61 74 61 20 46 52 4f 4d 20 73   sz, data FROM s
2e70: 61 72 22 3b 0a 20 20 20 20 7d 0a 20 20 20 20 64  ar";.    }.    d
2e80: 62 5f 70 72 65 70 61 72 65 28 7a 53 71 6c 29 3b  b_prepare(zSql);
2e90: 0a 20 20 20 20 77 68 69 6c 65 28 20 73 71 6c 69  .    while( sqli
2ea0: 74 65 33 5f 73 74 65 70 28 70 53 74 6d 74 29 3d  te3_step(pStmt)=
2eb0: 3d 53 51 4c 49 54 45 5f 52 4f 57 20 29 7b 0a 20  =SQLITE_ROW ){. 
2ec0: 20 20 20 20 20 63 6f 6e 73 74 20 63 68 61 72 20       const char 
2ed0: 2a 7a 46 4e 20 3d 20 28 63 6f 6e 73 74 20 63 68  *zFN = (const ch
2ee0: 61 72 2a 29 73 71 6c 69 74 65 33 5f 63 6f 6c 75  ar*)sqlite3_colu
2ef0: 6d 6e 5f 74 65 78 74 28 70 53 74 6d 74 2c 20 30  mn_text(pStmt, 0
2f00: 29 3b 0a 20 20 20 20 20 20 63 68 65 63 6b 5f 66  );.      check_f
2f10: 69 6c 65 6e 61 6d 65 28 7a 46 4e 29 3b 0a 20 20  ilename(zFN);.  
2f20: 20 20 20 20 69 66 28 20 7a 46 4e 5b 30 5d 3d 3d      if( zFN[0]==
2f30: 27 2f 27 20 29 7b 0a 20 20 20 20 20 20 20 20 65  '/' ){.        e
2f40: 72 72 6f 72 4d 73 67 28 22 61 62 73 6f 6c 75 74  rrorMsg("absolut
2f50: 65 20 70 61 74 68 6e 61 6d 65 3a 20 25 73 5c 6e  e pathname: %s\n
2f60: 22 2c 20 7a 46 4e 29 3b 0a 20 20 20 20 20 20 7d  ", zFN);.      }
2f70: 0a 20 20 20 20 20 20 69 66 28 20 73 71 6c 69 74  .      if( sqlit
2f80: 65 33 5f 63 6f 6c 75 6d 6e 5f 74 79 70 65 28 70  e3_column_type(p
2f90: 53 74 6d 74 2c 34 29 3d 3d 53 51 4c 49 54 45 5f  Stmt,4)==SQLITE_
2fa0: 42 4c 4f 42 20 26 26 20 61 63 63 65 73 73 28 7a  BLOB && access(z
2fb0: 46 4e 2c 20 46 5f 4f 4b 29 3d 3d 30 20 29 7b 0a  FN, F_OK)==0 ){.
2fc0: 20 20 20 20 20 20 20 20 65 72 72 6f 72 4d 73 67          errorMsg
2fd0: 28 22 66 69 6c 65 20 61 6c 72 65 61 64 79 20 65  ("file already e
2fe0: 78 69 73 74 73 3a 20 25 73 5c 6e 22 2c 20 7a 46  xists: %s\n", zF
2ff0: 4e 29 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20  N);.      }.    
3000: 20 20 69 66 28 20 76 65 72 62 6f 73 65 46 6c 61    if( verboseFla
3010: 67 20 29 20 70 72 69 6e 74 66 28 22 25 73 5c 6e  g ) printf("%s\n
3020: 22 2c 20 7a 46 4e 29 3b 0a 20 20 20 20 20 20 77  ", zFN);.      w
3030: 72 69 74 65 5f 66 69 6c 65 28 7a 46 4e 2c 20 73  rite_file(zFN, s
3040: 71 6c 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 69 6e  qlite3_column_in
3050: 74 28 70 53 74 6d 74 2c 31 29 2c 0a 20 20 20 20  t(pStmt,1),.    
3060: 20 20 20 20 20 20 20 20 20 20 20 20 20 73 71 6c               sql
3070: 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 69 6e 74 36  ite3_column_int6
3080: 34 28 70 53 74 6d 74 2c 32 29 2c 0a 20 20 20 20  4(pStmt,2),.    
3090: 20 20 20 20 20 20 20 20 20 20 20 20 20 73 71 6c               sql
30a0: 69 74 65 33 5f 63 6f 6c 75 6d 6e 5f 69 6e 74 28  ite3_column_int(
30b0: 70 53 74 6d 74 2c 33 29 2c 0a 20 20 20 20 20 20  pStmt,3),.      
30c0: 20 20 20 20 20 20 20 20 20 20 20 73 71 6c 69 74             sqlit
30d0: 65 33 5f 63 6f 6c 75 6d 6e 5f 62 6c 6f 62 28 70  e3_column_blob(p
30e0: 53 74 6d 74 2c 34 29 2c 0a 20 20 20 20 20 20 20  Stmt,4),.       
30f0: 20 20 20 20 20 20 20 20 20 20 73 71 6c 69 74 65            sqlite
3100: 33 5f 63 6f 6c 75 6d 6e 5f 62 79 74 65 73 28 70  3_column_bytes(p
3110: 53 74 6d 74 2c 34 29 29 3b 0a 20 20 20 20 7d 0a  Stmt,4));.    }.
3120: 20 20 20 20 64 62 5f 63 6c 6f 73 65 28 31 29 3b      db_close(1);
3130: 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 69 66  .  }else{.    if
3140: 28 20 61 7a 46 69 6c 65 73 3d 3d 30 20 29 20 73  ( azFiles==0 ) s
3150: 68 6f 77 48 65 6c 70 28 61 72 67 76 5b 30 5d 29  howHelp(argv[0])
3160: 3b 0a 20 20 20 20 64 62 5f 6f 70 65 6e 28 7a 41  ;.    db_open(zA
3170: 72 63 68 69 76 65 2c 20 31 29 3b 0a 20 20 20 20  rchive, 1);.    
3180: 66 6f 72 28 69 3d 30 3b 20 69 3c 6e 46 69 6c 65  for(i=0; i<nFile
3190: 73 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 20 20 61  s; i++){.      a
31a0: 64 64 5f 66 69 6c 65 28 61 7a 46 69 6c 65 73 5b  dd_file(azFiles[
31b0: 69 5d 2c 20 76 65 72 62 6f 73 65 46 6c 61 67 2c  i], verboseFlag,
31c0: 20 6e 6f 43 6f 6d 70 72 65 73 73 29 3b 0a 20 20   noCompress);.  
31d0: 20 20 7d 0a 20 20 20 20 64 62 5f 63 6c 6f 73 65    }.    db_close
31e0: 28 31 29 3b 0a 20 20 7d 0a 20 20 72 65 74 75 72  (1);.  }.  retur
31f0: 6e 20 30 3b 0a 7d 0a                             n 0;.}.