Hex Artifact Content

Artifact 4d722642c3b2e80d750176bda8d3443b624c5acf:


0000: 23 64 65 66 69 6e 65 20 46 55 53 45 5f 55 53 45  #define FUSE_USE
0010: 5f 56 45 52 53 49 4f 4e 20 32 36 0a 0a 23 69 6e  _VERSION 26..#in
0020: 63 6c 75 64 65 20 3c 73 71 6c 69 74 65 33 2e 68  clude <sqlite3.h
0030: 3e 0a 23 69 6e 63 6c 75 64 65 20 3c 73 74 72 69  >.#include <stri
0040: 6e 67 2e 68 3e 0a 23 69 6e 63 6c 75 64 65 20 3c  ng.h>.#include <
0050: 73 74 64 61 72 67 2e 68 3e 0a 23 69 6e 63 6c 75  stdarg.h>.#inclu
0060: 64 65 20 3c 65 72 72 6e 6f 2e 68 3e 0a 23 69 6e  de <errno.h>.#in
0070: 63 6c 75 64 65 20 3c 66 63 6e 74 6c 2e 68 3e 0a  clude <fcntl.h>.
0080: 23 69 6e 63 6c 75 64 65 20 3c 73 74 64 69 6f 2e  #include <stdio.
0090: 68 3e 0a 23 69 6e 63 6c 75 64 65 20 3c 66 75 73  h>.#include <fus
00a0: 65 2e 68 3e 0a 23 69 6e 63 6c 75 64 65 20 3c 74  e.h>.#include <t
00b0: 63 6c 2e 68 3e 0a 0a 23 64 65 66 69 6e 65 20 41  cl.h>..#define A
00c0: 50 50 46 53 5f 43 41 43 48 45 44 49 52 20 22 2f  PPFS_CACHEDIR "/
00d0: 74 6d 70 2f 61 70 70 66 73 2d 63 61 63 68 65 22  tmp/appfs-cache"
00e0: 0a 0a 23 64 65 66 69 6e 65 20 41 50 50 46 53 5f  ..#define APPFS_
00f0: 44 45 42 55 47 28 78 2e 2e 2e 29 20 7b 20 66 70  DEBUG(x...) { fp
0100: 72 69 6e 74 66 28 73 74 64 65 72 72 2c 20 22 25  rintf(stderr, "%
0110: 69 3a 25 73 3a 20 22 2c 20 5f 5f 4c 49 4e 45 5f  i:%s: ", __LINE_
0120: 5f 2c 20 5f 5f 66 75 6e 63 5f 5f 29 3b 20 66 70  _, __func__); fp
0130: 72 69 6e 74 66 28 73 74 64 65 72 72 2c 20 78 29  rintf(stderr, x)
0140: 3b 20 66 70 72 69 6e 74 66 28 73 74 64 65 72 72  ; fprintf(stderr
0150: 2c 20 22 5c 6e 22 29 3b 20 7d 0a 0a 73 74 72 75  , "\n"); }..stru
0160: 63 74 20 61 70 70 66 73 5f 74 68 72 65 61 64 5f  ct appfs_thread_
0170: 64 61 74 61 20 7b 0a 09 54 63 6c 5f 49 6e 74 65  data {..Tcl_Inte
0180: 72 70 20 2a 69 6e 74 65 72 70 3b 0a 09 73 71 6c  rp *interp;..sql
0190: 69 74 65 33 20 2a 64 62 3b 0a 7d 3b 0a 0a 73 74  ite3 *db;.};..st
01a0: 72 75 63 74 20 61 70 70 66 73 5f 74 68 72 65 61  ruct appfs_threa
01b0: 64 5f 64 61 74 61 20 67 6c 6f 62 61 6c 54 68 72  d_data globalThr
01c0: 65 61 64 3b 0a 0a 74 79 70 65 64 65 66 20 65 6e  ead;..typedef en
01d0: 75 6d 20 7b 0a 09 41 50 50 46 53 5f 4f 53 5f 55  um {..APPFS_OS_U
01e0: 4e 4b 4e 4f 57 4e 2c 0a 09 41 50 50 46 53 5f 4f  NKNOWN,..APPFS_O
01f0: 53 5f 41 4c 4c 2c 0a 09 41 50 50 46 53 5f 4f 53  S_ALL,..APPFS_OS
0200: 5f 4c 49 4e 55 58 2c 0a 09 41 50 50 46 53 5f 4f  _LINUX,..APPFS_O
0210: 53 5f 4d 41 43 4f 53 58 2c 0a 09 41 50 50 46 53  S_MACOSX,..APPFS
0220: 5f 4f 53 5f 46 52 45 45 42 53 44 2c 0a 09 41 50  _OS_FREEBSD,..AP
0230: 50 46 53 5f 4f 53 5f 4f 50 45 4e 42 53 44 2c 0a  PFS_OS_OPENBSD,.
0240: 09 41 50 50 46 53 5f 4f 53 5f 53 4f 4c 41 52 49  .APPFS_OS_SOLARI
0250: 53 0a 7d 20 61 70 70 66 73 5f 6f 73 5f 74 3b 0a  S.} appfs_os_t;.
0260: 0a 74 79 70 65 64 65 66 20 65 6e 75 6d 20 7b 0a  .typedef enum {.
0270: 09 41 50 50 46 53 5f 43 50 55 5f 55 4e 4b 4e 4f  .APPFS_CPU_UNKNO
0280: 57 4e 2c 0a 09 41 50 50 46 53 5f 43 50 55 5f 41  WN,..APPFS_CPU_A
0290: 4c 4c 2c 0a 09 41 50 50 46 53 5f 43 50 55 5f 41  LL,..APPFS_CPU_A
02a0: 4d 44 36 34 2c 0a 09 41 50 50 46 53 5f 43 50 55  MD64,..APPFS_CPU
02b0: 5f 49 33 38 36 2c 0a 09 41 50 50 46 53 5f 43 50  _I386,..APPFS_CP
02c0: 55 5f 41 52 4d 0a 7d 20 61 70 70 66 73 5f 63 70  U_ARM.} appfs_cp
02d0: 75 41 72 63 68 5f 74 3b 0a 0a 73 74 72 75 63 74  uArch_t;..struct
02e0: 20 61 70 70 66 73 5f 70 61 63 6b 61 67 65 20 7b   appfs_package {
02f0: 0a 09 73 74 72 75 63 74 20 61 70 70 66 73 5f 70  ..struct appfs_p
0300: 61 63 6b 61 67 65 20 2a 5f 6e 65 78 74 3b 0a 09  ackage *_next;..
0310: 69 6e 74 20 63 6f 75 6e 74 65 72 3b 0a 0a 09 63  int counter;...c
0320: 68 61 72 20 6e 61 6d 65 5b 31 32 38 5d 3b 0a 09  har name[128];..
0330: 63 68 61 72 20 76 65 72 73 69 6f 6e 5b 36 34 5d  char version[64]
0340: 3b 0a 09 63 68 61 72 20 73 68 61 31 5b 34 31 5d  ;..char sha1[41]
0350: 3b 0a 09 61 70 70 66 73 5f 6f 73 5f 74 20 6f 73  ;..appfs_os_t os
0360: 3b 0a 09 61 70 70 66 73 5f 63 70 75 41 72 63 68  ;..appfs_cpuArch
0370: 5f 74 20 63 70 75 41 72 63 68 3b 0a 09 69 6e 74  _t cpuArch;..int
0380: 20 69 73 4c 61 74 65 73 74 3b 0a 7d 3b 0a 0a 73   isLatest;.};..s
0390: 74 72 75 63 74 20 61 70 70 66 73 5f 73 69 74 65  truct appfs_site
03a0: 20 7b 0a 09 73 74 72 75 63 74 20 61 70 70 66 73   {..struct appfs
03b0: 5f 73 69 74 65 20 2a 5f 6e 65 78 74 3b 0a 09 69  _site *_next;..i
03c0: 6e 74 20 63 6f 75 6e 74 65 72 3b 0a 0a 09 63 68  nt counter;...ch
03d0: 61 72 20 6e 61 6d 65 5b 32 35 36 5d 3b 0a 7d 3b  ar name[256];.};
03e0: 0a 0a 73 74 61 74 69 63 20 61 70 70 66 73 5f 6f  ..static appfs_o
03f0: 73 5f 74 20 61 70 70 66 73 5f 63 6f 6e 76 65 72  s_t appfs_conver
0400: 74 5f 6f 73 5f 66 72 6f 6d 53 74 72 69 6e 67 28  t_os_fromString(
0410: 63 6f 6e 73 74 20 63 68 61 72 20 2a 6f 73 29 20  const char *os) 
0420: 7b 0a 09 69 66 20 28 73 74 72 63 61 73 65 63 6d  {..if (strcasecm
0430: 70 28 6f 73 2c 20 22 4c 69 6e 75 78 22 29 20 3d  p(os, "Linux") =
0440: 3d 20 30 29 20 7b 0a 09 09 72 65 74 75 72 6e 28  = 0) {...return(
0450: 41 50 50 46 53 5f 4f 53 5f 4c 49 4e 55 58 29 3b  APPFS_OS_LINUX);
0460: 0a 09 7d 0a 0a 09 69 66 20 28 73 74 72 63 61 73  ..}...if (strcas
0470: 65 63 6d 70 28 6f 73 2c 20 22 44 61 72 77 69 6e  ecmp(os, "Darwin
0480: 22 29 20 3d 3d 20 30 20 7c 7c 20 73 74 72 63 61  ") == 0 || strca
0490: 73 65 63 6d 70 28 6f 73 2c 20 22 4d 61 63 20 4f  secmp(os, "Mac O
04a0: 53 22 29 20 3d 3d 20 30 20 7c 7c 20 73 74 72 63  S") == 0 || strc
04b0: 61 73 65 63 6d 70 28 6f 73 2c 20 22 4d 61 63 20  asecmp(os, "Mac 
04c0: 4f 53 20 58 22 29 20 3d 3d 20 30 29 20 7b 0a 09  OS X") == 0) {..
04d0: 09 72 65 74 75 72 6e 28 41 50 50 46 53 5f 4f 53  .return(APPFS_OS
04e0: 5f 4d 41 43 4f 53 58 29 3b 0a 09 7d 0a 0a 09 69  _MACOSX);..}...i
04f0: 66 20 28 73 74 72 63 61 73 65 63 6d 70 28 6f 73  f (strcasecmp(os
0500: 2c 20 22 6e 6f 61 72 63 68 22 29 20 3d 3d 20 30  , "noarch") == 0
0510: 29 20 7b 0a 09 09 72 65 74 75 72 6e 28 41 50 50  ) {...return(APP
0520: 46 53 5f 4f 53 5f 41 4c 4c 29 3b 0a 09 7d 0a 0a  FS_OS_ALL);..}..
0530: 09 72 65 74 75 72 6e 28 41 50 50 46 53 5f 4f 53  .return(APPFS_OS
0540: 5f 55 4e 4b 4e 4f 57 4e 29 3b 0a 7d 0a 0a 73 74  _UNKNOWN);.}..st
0550: 61 74 69 63 20 63 6f 6e 73 74 20 63 68 61 72 20  atic const char 
0560: 2a 61 70 70 66 73 5f 63 6f 6e 76 65 72 74 5f 6f  *appfs_convert_o
0570: 73 5f 74 6f 53 74 72 69 6e 67 28 61 70 70 66 73  s_toString(appfs
0580: 5f 6f 73 5f 74 20 6f 73 29 20 7b 0a 09 73 77 69  _os_t os) {..swi
0590: 74 63 68 20 28 6f 73 29 20 7b 0a 09 09 63 61 73  tch (os) {...cas
05a0: 65 20 41 50 50 46 53 5f 4f 53 5f 41 4c 4c 3a 0a  e APPFS_OS_ALL:.
05b0: 09 09 09 72 65 74 75 72 6e 28 22 6e 6f 61 72 63  ...return("noarc
05c0: 68 22 29 3b 0a 09 09 63 61 73 65 20 41 50 50 46  h");...case APPF
05d0: 53 5f 4f 53 5f 4c 49 4e 55 58 3a 0a 09 09 09 72  S_OS_LINUX:....r
05e0: 65 74 75 72 6e 28 22 6c 69 6e 75 78 22 29 3b 0a  eturn("linux");.
05f0: 09 09 63 61 73 65 20 41 50 50 46 53 5f 4f 53 5f  ..case APPFS_OS_
0600: 4d 41 43 4f 53 58 3a 0a 09 09 09 72 65 74 75 72  MACOSX:....retur
0610: 6e 28 22 6d 61 63 6f 73 78 22 29 3b 0a 09 09 63  n("macosx");...c
0620: 61 73 65 20 41 50 50 46 53 5f 4f 53 5f 46 52 45  ase APPFS_OS_FRE
0630: 45 42 53 44 3a 0a 09 09 09 72 65 74 75 72 6e 28  EBSD:....return(
0640: 22 66 72 65 65 62 73 64 22 29 3b 0a 09 09 63 61  "freebsd");...ca
0650: 73 65 20 41 50 50 46 53 5f 4f 53 5f 4f 50 45 4e  se APPFS_OS_OPEN
0660: 42 53 44 3a 0a 09 09 09 72 65 74 75 72 6e 28 22  BSD:....return("
0670: 6f 70 65 6e 62 73 64 22 29 3b 0a 09 09 63 61 73  openbsd");...cas
0680: 65 20 41 50 50 46 53 5f 4f 53 5f 53 4f 4c 41 52  e APPFS_OS_SOLAR
0690: 49 53 3a 0a 09 09 09 72 65 74 75 72 6e 28 22 66  IS:....return("f
06a0: 72 65 65 62 73 64 22 29 3b 0a 09 09 63 61 73 65  reebsd");...case
06b0: 20 41 50 50 46 53 5f 43 50 55 5f 55 4e 4b 4e 4f   APPFS_CPU_UNKNO
06c0: 57 4e 3a 0a 09 09 09 72 65 74 75 72 6e 28 22 75  WN:....return("u
06d0: 6e 6b 6e 6f 77 6e 22 29 3b 0a 09 7d 0a 0a 09 72  nknown");..}...r
06e0: 65 74 75 72 6e 28 22 75 6e 6b 6e 6f 77 6e 22 29  eturn("unknown")
06f0: 3b 0a 7d 0a 0a 73 74 61 74 69 63 20 61 70 70 66  ;.}..static appf
0700: 73 5f 63 70 75 41 72 63 68 5f 74 20 61 70 70 66  s_cpuArch_t appf
0710: 73 5f 63 6f 6e 76 65 72 74 5f 63 70 75 41 72 63  s_convert_cpuArc
0720: 68 5f 66 72 6f 6d 53 74 72 69 6e 67 28 63 6f 6e  h_fromString(con
0730: 73 74 20 63 68 61 72 20 2a 63 70 75 29 20 7b 0a  st char *cpu) {.
0740: 09 69 66 20 28 73 74 72 63 61 73 65 63 6d 70 28  .if (strcasecmp(
0750: 63 70 75 2c 20 22 61 6d 64 36 34 22 29 20 3d 3d  cpu, "amd64") ==
0760: 20 30 20 7c 7c 20 73 74 72 63 61 73 65 63 6d 70   0 || strcasecmp
0770: 28 63 70 75 2c 20 22 78 38 36 5f 36 34 22 29 20  (cpu, "x86_64") 
0780: 3d 3d 20 30 29 20 7b 0a 09 09 72 65 74 75 72 6e  == 0) {...return
0790: 28 41 50 50 46 53 5f 43 50 55 5f 41 4d 44 36 34  (APPFS_CPU_AMD64
07a0: 29 3b 0a 09 7d 0a 0a 09 69 66 20 28 73 74 72 63  );..}...if (strc
07b0: 61 73 65 63 6d 70 28 63 70 75 2c 20 22 69 33 38  asecmp(cpu, "i38
07c0: 36 22 29 20 3d 3d 20 30 20 7c 7c 20 5c 0a 09 20  6") == 0 || \.. 
07d0: 20 20 20 73 74 72 63 61 73 65 63 6d 70 28 63 70     strcasecmp(cp
07e0: 75 2c 20 22 69 34 38 36 22 29 20 3d 3d 20 30 20  u, "i486") == 0 
07f0: 7c 7c 20 5c 0a 09 20 20 20 20 73 74 72 63 61 73  || \..    strcas
0800: 65 63 6d 70 28 63 70 75 2c 20 22 69 35 38 36 22  ecmp(cpu, "i586"
0810: 29 20 3d 3d 20 30 20 7c 7c 20 5c 0a 09 20 20 20  ) == 0 || \..   
0820: 20 73 74 72 63 61 73 65 63 6d 70 28 63 70 75 2c   strcasecmp(cpu,
0830: 20 22 69 36 38 36 22 29 20 3d 3d 20 30 20 7c 7c   "i686") == 0 ||
0840: 20 5c 0a 09 20 20 20 20 73 74 72 63 61 73 65 63   \..    strcasec
0850: 6d 70 28 63 70 75 2c 20 22 69 78 38 36 22 29 20  mp(cpu, "ix86") 
0860: 3d 3d 20 30 29 20 7b 0a 09 09 72 65 74 75 72 6e  == 0) {...return
0870: 28 41 50 50 46 53 5f 43 50 55 5f 49 33 38 36 29  (APPFS_CPU_I386)
0880: 3b 0a 09 7d 0a 0a 09 69 66 20 28 73 74 72 63 61  ;..}...if (strca
0890: 73 65 63 6d 70 28 63 70 75 2c 20 22 61 72 6d 22  secmp(cpu, "arm"
08a0: 29 20 3d 3d 20 30 29 20 7b 0a 09 09 72 65 74 75  ) == 0) {...retu
08b0: 72 6e 28 41 50 50 46 53 5f 43 50 55 5f 41 52 4d  rn(APPFS_CPU_ARM
08c0: 29 3b 0a 09 7d 0a 0a 09 69 66 20 28 73 74 72 63  );..}...if (strc
08d0: 61 73 65 63 6d 70 28 63 70 75 2c 20 22 6e 6f 61  asecmp(cpu, "noa
08e0: 72 63 68 22 29 20 3d 3d 20 30 29 20 7b 0a 09 09  rch") == 0) {...
08f0: 72 65 74 75 72 6e 28 41 50 50 46 53 5f 43 50 55  return(APPFS_CPU
0900: 5f 41 4c 4c 29 3b 0a 09 7d 0a 0a 09 72 65 74 75  _ALL);..}...retu
0910: 72 6e 28 41 50 50 46 53 5f 43 50 55 5f 55 4e 4b  rn(APPFS_CPU_UNK
0920: 4e 4f 57 4e 29 3b 0a 7d 0a 0a 73 74 61 74 69 63  NOWN);.}..static
0930: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 61 70 70   const char *app
0940: 66 73 5f 63 6f 6e 76 65 72 74 5f 63 70 75 41 72  fs_convert_cpuAr
0950: 63 68 5f 74 6f 53 74 72 69 6e 67 28 61 70 70 66  ch_toString(appf
0960: 73 5f 63 70 75 41 72 63 68 5f 74 20 63 70 75 29  s_cpuArch_t cpu)
0970: 20 7b 0a 09 73 77 69 74 63 68 20 28 63 70 75 29   {..switch (cpu)
0980: 20 7b 0a 09 09 63 61 73 65 20 41 50 50 46 53 5f   {...case APPFS_
0990: 43 50 55 5f 41 4c 4c 3a 0a 09 09 09 72 65 74 75  CPU_ALL:....retu
09a0: 72 6e 28 22 6e 6f 61 72 63 68 22 29 3b 0a 09 09  rn("noarch");...
09b0: 63 61 73 65 20 41 50 50 46 53 5f 43 50 55 5f 41  case APPFS_CPU_A
09c0: 4d 44 36 34 3a 0a 09 09 09 72 65 74 75 72 6e 28  MD64:....return(
09d0: 22 61 6d 64 36 34 22 29 3b 0a 09 09 63 61 73 65  "amd64");...case
09e0: 20 41 50 50 46 53 5f 43 50 55 5f 49 33 38 36 3a   APPFS_CPU_I386:
09f0: 0a 09 09 09 72 65 74 75 72 6e 28 22 69 78 38 36  ....return("ix86
0a00: 22 29 3b 0a 09 09 63 61 73 65 20 41 50 50 46 53  ");...case APPFS
0a10: 5f 43 50 55 5f 41 52 4d 3a 0a 09 09 09 72 65 74  _CPU_ARM:....ret
0a20: 75 72 6e 28 22 61 72 6d 22 29 3b 0a 09 09 63 61  urn("arm");...ca
0a30: 73 65 20 41 50 50 46 53 5f 43 50 55 5f 55 4e 4b  se APPFS_CPU_UNK
0a40: 4e 4f 57 4e 3a 0a 09 09 09 72 65 74 75 72 6e 28  NOWN:....return(
0a50: 22 75 6e 6b 6e 6f 77 6e 22 29 3b 0a 09 7d 0a 0a  "unknown");..}..
0a60: 09 72 65 74 75 72 6e 28 22 75 6e 6b 6e 6f 77 6e  .return("unknown
0a70: 22 29 3b 0a 7d 0a 0a 73 74 61 74 69 63 20 69 6e  ");.}..static in
0a80: 74 20 61 70 70 66 73 5f 54 63 6c 5f 45 76 61 6c  t appfs_Tcl_Eval
0a90: 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 69 6e 74  (Tcl_Interp *int
0aa0: 65 72 70 2c 20 69 6e 74 20 6f 62 6a 63 2c 20 63  erp, int objc, c
0ab0: 6f 6e 73 74 20 63 68 61 72 20 2a 63 6d 64 2c 20  onst char *cmd, 
0ac0: 2e 2e 2e 29 20 7b 0a 09 54 63 6c 5f 4f 62 6a 20  ...) {..Tcl_Obj 
0ad0: 2a 2a 6f 62 6a 76 3b 0a 09 63 6f 6e 73 74 20 63  **objv;..const c
0ae0: 68 61 72 20 2a 61 72 67 3b 0a 09 76 61 5f 6c 69  har *arg;..va_li
0af0: 73 74 20 61 72 67 70 3b 0a 09 69 6e 74 20 72 65  st argp;..int re
0b00: 74 76 61 6c 3b 0a 09 69 6e 74 20 69 3b 0a 0a 09  tval;..int i;...
0b10: 6f 62 6a 76 20 3d 20 28 76 6f 69 64 20 2a 29 20  objv = (void *) 
0b20: 63 6b 61 6c 6c 6f 63 28 73 69 7a 65 6f 66 28 2a  ckalloc(sizeof(*
0b30: 6f 62 6a 76 29 20 2a 20 6f 62 6a 63 29 3b 0a 09  objv) * objc);..
0b40: 6f 62 6a 76 5b 30 5d 20 3d 20 54 63 6c 5f 4e 65  objv[0] = Tcl_Ne
0b50: 77 53 74 72 69 6e 67 4f 62 6a 28 63 6d 64 2c 20  wStringObj(cmd, 
0b60: 2d 31 29 3b 0a 0a 09 76 61 5f 73 74 61 72 74 28  -1);...va_start(
0b70: 61 72 67 70 2c 20 63 6d 64 29 3b 0a 09 66 6f 72  argp, cmd);..for
0b80: 20 28 69 20 3d 20 31 3b 20 69 20 3c 20 6f 62 6a   (i = 1; i < obj
0b90: 63 3b 20 69 2b 2b 29 20 7b 0a 09 09 61 72 67 20  c; i++) {...arg 
0ba0: 3d 20 76 61 5f 61 72 67 28 61 72 67 70 2c 20 63  = va_arg(argp, c
0bb0: 6f 6e 73 74 20 63 68 61 72 20 2a 29 3b 0a 09 09  onst char *);...
0bc0: 6f 62 6a 76 5b 69 5d 20 3d 20 54 63 6c 5f 4e 65  objv[i] = Tcl_Ne
0bd0: 77 53 74 72 69 6e 67 4f 62 6a 28 61 72 67 2c 20  wStringObj(arg, 
0be0: 2d 31 29 3b 0a 09 7d 0a 09 76 61 5f 65 6e 64 28  -1);..}..va_end(
0bf0: 61 72 67 70 29 3b 0a 0a 09 72 65 74 76 61 6c 20  argp);...retval 
0c00: 3d 20 54 63 6c 5f 45 76 61 6c 4f 62 6a 76 28 69  = Tcl_EvalObjv(i
0c10: 6e 74 65 72 70 2c 20 6f 62 6a 63 2c 20 6f 62 6a  nterp, objc, obj
0c20: 76 2c 20 30 29 3b 0a 0a 09 63 6b 66 72 65 65 28  v, 0);...ckfree(
0c30: 28 76 6f 69 64 20 2a 29 20 6f 62 6a 76 29 3b 0a  (void *) objv);.
0c40: 0a 09 72 65 74 75 72 6e 28 72 65 74 76 61 6c 29  ..return(retval)
0c50: 3b 0a 7d 0a 0a 23 64 65 66 69 6e 65 20 61 70 70  ;.}..#define app
0c60: 66 73 5f 66 72 65 65 5f 6c 69 73 74 5f 74 79 70  fs_free_list_typ
0c70: 65 28 69 64 2c 20 74 79 70 65 29 20 73 74 61 74  e(id, type) stat
0c80: 69 63 20 76 6f 69 64 20 61 70 70 66 73 5f 66 72  ic void appfs_fr
0c90: 65 65 5f 6c 69 73 74 5f 20 23 23 20 69 64 28 74  ee_list_ ## id(t
0ca0: 79 70 65 20 2a 68 65 61 64 29 20 7b 20 5c 0a 09  ype *head) { \..
0cb0: 74 79 70 65 20 2a 6f 62 6a 2c 20 2a 6e 65 78 74  type *obj, *next
0cc0: 3b 20 5c 0a 09 66 6f 72 20 28 6f 62 6a 20 3d 20  ; \..for (obj = 
0cd0: 68 65 61 64 3b 20 6f 62 6a 3b 20 6f 62 6a 20 3d  head; obj; obj =
0ce0: 20 6e 65 78 74 29 20 7b 20 5c 0a 09 09 6e 65 78   next) { \...nex
0cf0: 74 20 3d 20 6f 62 6a 2d 3e 5f 6e 65 78 74 3b 20  t = obj->_next; 
0d00: 5c 0a 09 09 63 6b 66 72 65 65 28 28 76 6f 69 64  \...ckfree((void
0d10: 20 2a 29 20 6f 62 6a 29 3b 20 5c 0a 09 7d 20 5c   *) obj); \..} \
0d20: 0a 7d 0a 0a 61 70 70 66 73 5f 66 72 65 65 5f 6c  .}..appfs_free_l
0d30: 69 73 74 5f 74 79 70 65 28 73 69 74 65 2c 20 73  ist_type(site, s
0d40: 74 72 75 63 74 20 61 70 70 66 73 5f 73 69 74 65  truct appfs_site
0d50: 29 0a 61 70 70 66 73 5f 66 72 65 65 5f 6c 69 73  ).appfs_free_lis
0d60: 74 5f 74 79 70 65 28 70 61 63 6b 61 67 65 2c 20  t_type(package, 
0d70: 73 74 72 75 63 74 20 61 70 70 66 73 5f 70 61 63  struct appfs_pac
0d80: 6b 61 67 65 29 0a 0a 0a 73 74 61 74 69 63 20 69  kage)...static i
0d90: 6e 74 20 61 70 70 66 73 5f 67 65 74 73 69 74 65  nt appfs_getsite
0da0: 73 5f 63 62 28 76 6f 69 64 20 2a 5f 68 65 61 64  s_cb(void *_head
0db0: 2c 20 69 6e 74 20 63 6f 6c 75 6d 6e 73 2c 20 63  , int columns, c
0dc0: 68 61 72 20 2a 2a 76 61 6c 75 65 73 2c 20 63 68  har **values, ch
0dd0: 61 72 20 2a 2a 6e 61 6d 65 73 29 20 7b 0a 09 73  ar **names) {..s
0de0: 74 72 75 63 74 20 61 70 70 66 73 5f 73 69 74 65  truct appfs_site
0df0: 20 2a 2a 68 65 61 64 5f 70 2c 20 2a 6f 62 6a 3b   **head_p, *obj;
0e00: 0a 0a 09 68 65 61 64 5f 70 20 3d 20 5f 68 65 61  ...head_p = _hea
0e10: 64 3b 0a 0a 09 6f 62 6a 20 3d 20 28 76 6f 69 64  d;...obj = (void
0e20: 20 2a 29 20 63 6b 61 6c 6c 6f 63 28 73 69 7a 65   *) ckalloc(size
0e30: 6f 66 28 2a 6f 62 6a 29 29 3b 0a 09 73 6e 70 72  of(*obj));..snpr
0e40: 69 6e 74 66 28 6f 62 6a 2d 3e 6e 61 6d 65 2c 20  intf(obj->name, 
0e50: 73 69 7a 65 6f 66 28 6f 62 6a 2d 3e 6e 61 6d 65  sizeof(obj->name
0e60: 29 2c 20 22 25 73 22 2c 20 76 61 6c 75 65 73 5b  ), "%s", values[
0e70: 30 5d 29 3b 0a 0a 09 69 66 20 28 2a 68 65 61 64  0]);...if (*head
0e80: 5f 70 20 3d 3d 20 4e 55 4c 4c 29 20 7b 0a 09 09  _p == NULL) {...
0e90: 6f 62 6a 2d 3e 63 6f 75 6e 74 65 72 20 3d 20 30  obj->counter = 0
0ea0: 3b 0a 09 7d 20 65 6c 73 65 20 7b 0a 09 09 6f 62  ;..} else {...ob
0eb0: 6a 2d 3e 63 6f 75 6e 74 65 72 20 3d 20 28 2a 68  j->counter = (*h
0ec0: 65 61 64 5f 70 29 2d 3e 63 6f 75 6e 74 65 72 20  ead_p)->counter 
0ed0: 2b 20 31 3b 0a 09 7d 0a 0a 09 6f 62 6a 2d 3e 5f  + 1;..}...obj->_
0ee0: 6e 65 78 74 20 3d 20 2a 68 65 61 64 5f 70 3b 0a  next = *head_p;.
0ef0: 09 2a 68 65 61 64 5f 70 20 3d 20 6f 62 6a 3b 0a  .*head_p = obj;.
0f00: 0a 09 72 65 74 75 72 6e 28 30 29 3b 0a 7d 0a 0a  ..return(0);.}..
0f10: 73 74 61 74 69 63 20 73 74 72 75 63 74 20 61 70  static struct ap
0f20: 70 66 73 5f 73 69 74 65 20 2a 61 70 70 66 73 5f  pfs_site *appfs_
0f30: 67 65 74 73 69 74 65 73 28 69 6e 74 20 2a 73 69  getsites(int *si
0f40: 74 65 5f 63 6f 75 6e 74 5f 70 29 20 7b 0a 09 73  te_count_p) {..s
0f50: 74 72 75 63 74 20 61 70 70 66 73 5f 73 69 74 65  truct appfs_site
0f60: 20 2a 68 65 61 64 20 3d 20 4e 55 4c 4c 3b 0a 09   *head = NULL;..
0f70: 69 6e 74 20 73 71 6c 69 74 65 5f 72 65 74 3b 0a  int sqlite_ret;.
0f80: 0a 09 69 66 20 28 73 69 74 65 5f 63 6f 75 6e 74  ..if (site_count
0f90: 5f 70 20 3d 3d 20 4e 55 4c 4c 29 20 7b 0a 09 09  _p == NULL) {...
0fa0: 72 65 74 75 72 6e 28 4e 55 4c 4c 29 3b 0a 09 7d  return(NULL);..}
0fb0: 0a 0a 09 73 71 6c 69 74 65 5f 72 65 74 20 3d 20  ...sqlite_ret = 
0fc0: 73 71 6c 69 74 65 33 5f 65 78 65 63 28 67 6c 6f  sqlite3_exec(glo
0fd0: 62 61 6c 54 68 72 65 61 64 2e 64 62 2c 20 22 53  balThread.db, "S
0fe0: 45 4c 45 43 54 20 44 49 53 54 49 4e 43 54 20 68  ELECT DISTINCT h
0ff0: 6f 73 74 6e 61 6d 65 20 46 52 4f 4d 20 70 61 63  ostname FROM pac
1000: 6b 61 67 65 73 3b 22 2c 20 61 70 70 66 73 5f 67  kages;", appfs_g
1010: 65 74 73 69 74 65 73 5f 63 62 2c 20 26 68 65 61  etsites_cb, &hea
1020: 64 2c 20 4e 55 4c 4c 29 3b 0a 09 69 66 20 28 73  d, NULL);..if (s
1030: 71 6c 69 74 65 5f 72 65 74 20 21 3d 20 53 51 4c  qlite_ret != SQL
1040: 49 54 45 5f 4f 4b 29 20 7b 0a 09 09 41 50 50 46  ITE_OK) {...APPF
1050: 53 5f 44 45 42 55 47 28 22 43 61 6c 6c 20 74 6f  S_DEBUG("Call to
1060: 20 73 71 6c 69 74 65 33 5f 65 78 65 63 20 66 61   sqlite3_exec fa
1070: 69 6c 65 64 2e 22 29 3b 0a 0a 09 09 72 65 74 75  iled.");....retu
1080: 72 6e 28 4e 55 4c 4c 29 3b 0a 09 7d 0a 0a 09 69  rn(NULL);..}...i
1090: 66 20 28 68 65 61 64 20 21 3d 20 4e 55 4c 4c 29  f (head != NULL)
10a0: 20 7b 0a 09 09 2a 73 69 74 65 5f 63 6f 75 6e 74   {...*site_count
10b0: 5f 70 20 3d 20 68 65 61 64 2d 3e 63 6f 75 6e 74  _p = head->count
10c0: 65 72 20 2b 20 31 3b 0a 09 7d 0a 0a 09 72 65 74  er + 1;..}...ret
10d0: 75 72 6e 28 68 65 61 64 29 3b 0a 7d 0a 0a 73 74  urn(head);.}..st
10e0: 61 74 69 63 20 69 6e 74 20 61 70 70 66 73 5f 67  atic int appfs_g
10f0: 65 74 69 6e 64 65 78 5f 63 62 28 76 6f 69 64 20  etindex_cb(void 
1100: 2a 5f 68 65 61 64 2c 20 69 6e 74 20 63 6f 6c 75  *_head, int colu
1110: 6d 6e 73 2c 20 63 68 61 72 20 2a 2a 76 61 6c 75  mns, char **valu
1120: 65 73 2c 20 63 68 61 72 20 2a 2a 6e 61 6d 65 73  es, char **names
1130: 29 20 7b 0a 09 73 74 72 75 63 74 20 61 70 70 66  ) {..struct appf
1140: 73 5f 70 61 63 6b 61 67 65 20 2a 2a 68 65 61 64  s_package **head
1150: 5f 70 2c 20 2a 6f 62 6a 3b 0a 0a 09 68 65 61 64  _p, *obj;...head
1160: 5f 70 20 3d 20 5f 68 65 61 64 3b 0a 0a 09 6f 62  _p = _head;...ob
1170: 6a 20 3d 20 28 76 6f 69 64 20 2a 29 20 63 6b 61  j = (void *) cka
1180: 6c 6c 6f 63 28 73 69 7a 65 6f 66 28 2a 6f 62 6a  lloc(sizeof(*obj
1190: 29 29 3b 0a 0a 09 73 6e 70 72 69 6e 74 66 28 6f  ));...snprintf(o
11a0: 62 6a 2d 3e 6e 61 6d 65 2c 20 73 69 7a 65 6f 66  bj->name, sizeof
11b0: 28 6f 62 6a 2d 3e 6e 61 6d 65 29 2c 20 22 25 73  (obj->name), "%s
11c0: 22 2c 20 76 61 6c 75 65 73 5b 30 5d 29 3b 0a 09  ", values[0]);..
11d0: 73 6e 70 72 69 6e 74 66 28 6f 62 6a 2d 3e 76 65  snprintf(obj->ve
11e0: 72 73 69 6f 6e 2c 20 73 69 7a 65 6f 66 28 6f 62  rsion, sizeof(ob
11f0: 6a 2d 3e 76 65 72 73 69 6f 6e 29 2c 20 22 25 73  j->version), "%s
1200: 22 2c 20 76 61 6c 75 65 73 5b 31 5d 29 3b 0a 09  ", values[1]);..
1210: 73 6e 70 72 69 6e 74 66 28 6f 62 6a 2d 3e 73 68  snprintf(obj->sh
1220: 61 31 2c 20 73 69 7a 65 6f 66 28 6f 62 6a 2d 3e  a1, sizeof(obj->
1230: 73 68 61 31 29 2c 20 22 25 73 22 2c 20 76 61 6c  sha1), "%s", val
1240: 75 65 73 5b 32 5d 29 3b 0a 09 6f 62 6a 2d 3e 6f  ues[2]);..obj->o
1250: 73 20 3d 20 61 70 70 66 73 5f 63 6f 6e 76 65 72  s = appfs_conver
1260: 74 5f 6f 73 5f 66 72 6f 6d 53 74 72 69 6e 67 28  t_os_fromString(
1270: 76 61 6c 75 65 73 5b 33 5d 29 3b 0a 09 6f 62 6a  values[3]);..obj
1280: 2d 3e 63 70 75 41 72 63 68 20 3d 20 61 70 70 66  ->cpuArch = appf
1290: 73 5f 63 6f 6e 76 65 72 74 5f 63 70 75 41 72 63  s_convert_cpuArc
12a0: 68 5f 66 72 6f 6d 53 74 72 69 6e 67 28 76 61 6c  h_fromString(val
12b0: 75 65 73 5b 34 5d 29 3b 0a 09 69 66 20 28 76 61  ues[4]);..if (va
12c0: 6c 75 65 73 5b 35 5d 5b 30 5d 20 3d 3d 20 27 31  lues[5][0] == '1
12d0: 27 29 20 7b 0a 09 09 6f 62 6a 2d 3e 69 73 4c 61  ') {...obj->isLa
12e0: 74 65 73 74 20 3d 20 31 3b 0a 09 7d 20 65 6c 73  test = 1;..} els
12f0: 65 20 7b 0a 09 09 6f 62 6a 2d 3e 69 73 4c 61 74  e {...obj->isLat
1300: 65 73 74 20 3d 20 30 3b 0a 09 7d 0a 0a 09 69 66  est = 0;..}...if
1310: 20 28 2a 68 65 61 64 5f 70 20 3d 3d 20 4e 55 4c   (*head_p == NUL
1320: 4c 29 20 7b 0a 09 09 6f 62 6a 2d 3e 63 6f 75 6e  L) {...obj->coun
1330: 74 65 72 20 3d 20 30 3b 0a 09 7d 20 65 6c 73 65  ter = 0;..} else
1340: 20 7b 0a 09 09 6f 62 6a 2d 3e 63 6f 75 6e 74 65   {...obj->counte
1350: 72 20 3d 20 28 2a 68 65 61 64 5f 70 29 2d 3e 63  r = (*head_p)->c
1360: 6f 75 6e 74 65 72 20 2b 20 31 3b 0a 09 7d 0a 0a  ounter + 1;..}..
1370: 09 6f 62 6a 2d 3e 5f 6e 65 78 74 20 3d 20 2a 68  .obj->_next = *h
1380: 65 61 64 5f 70 3b 0a 09 2a 68 65 61 64 5f 70 20  ead_p;..*head_p 
1390: 3d 20 6f 62 6a 3b 0a 0a 09 72 65 74 75 72 6e 28  = obj;...return(
13a0: 30 29 3b 0a 7d 0a 0a 73 74 61 74 69 63 20 73 74  0);.}..static st
13b0: 72 75 63 74 20 61 70 70 66 73 5f 70 61 63 6b 61  ruct appfs_packa
13c0: 67 65 20 2a 61 70 70 66 73 5f 67 65 74 69 6e 64  ge *appfs_getind
13d0: 65 78 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 68  ex(const char *h
13e0: 6f 73 74 6e 61 6d 65 2c 20 69 6e 74 20 2a 70 61  ostname, int *pa
13f0: 63 6b 61 67 65 5f 63 6f 75 6e 74 5f 70 29 20 7b  ckage_count_p) {
1400: 0a 09 73 74 72 75 63 74 20 61 70 70 66 73 5f 70  ..struct appfs_p
1410: 61 63 6b 61 67 65 20 2a 68 65 61 64 20 3d 20 4e  ackage *head = N
1420: 55 4c 4c 3b 0a 09 63 68 61 72 20 2a 73 71 6c 3b  ULL;..char *sql;
1430: 0a 09 69 6e 74 20 74 63 6c 5f 72 65 74 2c 20 73  ..int tcl_ret, s
1440: 71 6c 69 74 65 5f 72 65 74 3b 0a 0a 09 69 66 20  qlite_ret;...if 
1450: 28 70 61 63 6b 61 67 65 5f 63 6f 75 6e 74 5f 70  (package_count_p
1460: 20 3d 3d 20 4e 55 4c 4c 29 20 7b 0a 09 09 72 65   == NULL) {...re
1470: 74 75 72 6e 28 4e 55 4c 4c 29 3b 0a 09 7d 0a 0a  turn(NULL);..}..
1480: 09 74 63 6c 5f 72 65 74 20 3d 20 61 70 70 66 73  .tcl_ret = appfs
1490: 5f 54 63 6c 5f 45 76 61 6c 28 67 6c 6f 62 61 6c  _Tcl_Eval(global
14a0: 54 68 72 65 61 64 2e 69 6e 74 65 72 70 2c 20 32  Thread.interp, 2
14b0: 2c 20 22 3a 3a 61 70 70 66 73 3a 3a 67 65 74 69  , "::appfs::geti
14c0: 6e 64 65 78 22 2c 20 68 6f 73 74 6e 61 6d 65 29  ndex", hostname)
14d0: 3b 0a 09 69 66 20 28 74 63 6c 5f 72 65 74 20 21  ;..if (tcl_ret !
14e0: 3d 20 54 43 4c 5f 4f 4b 29 20 7b 0a 09 09 41 50  = TCL_OK) {...AP
14f0: 50 46 53 5f 44 45 42 55 47 28 22 43 61 6c 6c 20  PFS_DEBUG("Call 
1500: 74 6f 20 3a 3a 61 70 70 66 73 3a 3a 67 65 74 69  to ::appfs::geti
1510: 6e 64 65 78 20 66 61 69 6c 65 64 3a 20 25 73 22  ndex failed: %s"
1520: 2c 20 54 63 6c 5f 47 65 74 53 74 72 69 6e 67 52  , Tcl_GetStringR
1530: 65 73 75 6c 74 28 67 6c 6f 62 61 6c 54 68 72 65  esult(globalThre
1540: 61 64 2e 69 6e 74 65 72 70 29 29 3b 0a 0a 09 09  ad.interp));....
1550: 72 65 74 75 72 6e 28 4e 55 4c 4c 29 3b 0a 09 7d  return(NULL);..}
1560: 0a 0a 09 73 71 6c 20 3d 20 73 71 6c 69 74 65 33  ...sql = sqlite3
1570: 5f 6d 70 72 69 6e 74 66 28 22 53 45 4c 45 43 54  _mprintf("SELECT
1580: 20 70 61 63 6b 61 67 65 2c 20 76 65 72 73 69 6f   package, versio
1590: 6e 2c 20 73 68 61 31 2c 20 6f 73 2c 20 63 70 75  n, sha1, os, cpu
15a0: 41 72 63 68 2c 20 69 73 4c 61 74 65 73 74 20 46  Arch, isLatest F
15b0: 52 4f 4d 20 70 61 63 6b 61 67 65 73 20 57 48 45  ROM packages WHE
15c0: 52 45 20 68 6f 73 74 6e 61 6d 65 20 3d 20 25 51  RE hostname = %Q
15d0: 3b 22 2c 20 68 6f 73 74 6e 61 6d 65 29 3b 0a 09  ;", hostname);..
15e0: 69 66 20 28 73 71 6c 20 3d 3d 20 4e 55 4c 4c 29  if (sql == NULL)
15f0: 20 7b 0a 09 09 41 50 50 46 53 5f 44 45 42 55 47   {...APPFS_DEBUG
1600: 28 22 43 61 6c 6c 20 74 6f 20 73 71 6c 69 74 65  ("Call to sqlite
1610: 33 5f 6d 70 72 69 6e 74 66 20 66 61 69 6c 65 64  3_mprintf failed
1620: 2e 22 29 3b 0a 0a 09 09 72 65 74 75 72 6e 28 4e  .");....return(N
1630: 55 4c 4c 29 3b 0a 09 7d 0a 0a 09 73 71 6c 69 74  ULL);..}...sqlit
1640: 65 5f 72 65 74 20 3d 20 73 71 6c 69 74 65 33 5f  e_ret = sqlite3_
1650: 65 78 65 63 28 67 6c 6f 62 61 6c 54 68 72 65 61  exec(globalThrea
1660: 64 2e 64 62 2c 20 73 71 6c 2c 20 61 70 70 66 73  d.db, sql, appfs
1670: 5f 67 65 74 69 6e 64 65 78 5f 63 62 2c 20 26 68  _getindex_cb, &h
1680: 65 61 64 2c 20 4e 55 4c 4c 29 3b 0a 09 73 71 6c  ead, NULL);..sql
1690: 69 74 65 33 5f 66 72 65 65 28 73 71 6c 29 3b 0a  ite3_free(sql);.
16a0: 0a 09 69 66 20 28 73 71 6c 69 74 65 5f 72 65 74  ..if (sqlite_ret
16b0: 20 21 3d 20 53 51 4c 49 54 45 5f 4f 4b 29 20 7b   != SQLITE_OK) {
16c0: 0a 09 09 41 50 50 46 53 5f 44 45 42 55 47 28 22  ...APPFS_DEBUG("
16d0: 43 61 6c 6c 20 74 6f 20 73 71 6c 69 74 65 33 5f  Call to sqlite3_
16e0: 65 78 65 63 20 66 61 69 6c 65 64 2e 22 29 3b 0a  exec failed.");.
16f0: 0a 09 09 72 65 74 75 72 6e 28 4e 55 4c 4c 29 3b  ...return(NULL);
1700: 0a 09 7d 0a 0a 09 69 66 20 28 68 65 61 64 20 21  ..}...if (head !
1710: 3d 20 4e 55 4c 4c 29 20 7b 0a 09 09 2a 70 61 63  = NULL) {...*pac
1720: 6b 61 67 65 5f 63 6f 75 6e 74 5f 70 20 3d 20 68  kage_count_p = h
1730: 65 61 64 2d 3e 63 6f 75 6e 74 65 72 20 2b 20 31  ead->counter + 1
1740: 3b 0a 09 7d 0a 0a 09 72 65 74 75 72 6e 28 68 65  ;..}...return(he
1750: 61 64 29 3b 0a 7d 0a 0a 73 74 61 74 69 63 20 69  ad);.}..static i
1760: 6e 74 20 61 70 70 66 73 5f 67 65 74 66 69 6c 65  nt appfs_getfile
1770: 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 68 6f 73  (const char *hos
1780: 74 6e 61 6d 65 2c 20 63 6f 6e 73 74 20 63 68 61  tname, const cha
1790: 72 20 2a 73 68 61 31 29 20 7b 0a 09 72 65 74 75  r *sha1) {..retu
17a0: 72 6e 28 30 29 3b 0a 7d 0a 0a 73 74 61 74 69 63  rn(0);.}..static
17b0: 20 69 6e 74 20 61 70 70 66 73 5f 67 65 74 6d 61   int appfs_getma
17c0: 6e 69 66 65 73 74 28 63 6f 6e 73 74 20 63 68 61  nifest(const cha
17d0: 72 20 2a 68 6f 73 74 6e 61 6d 65 2c 20 63 6f 6e  r *hostname, con
17e0: 73 74 20 63 68 61 72 20 2a 73 68 61 31 29 20 7b  st char *sha1) {
17f0: 0a 09 72 65 74 75 72 6e 28 30 29 3b 0a 7d 0a 0a  ..return(0);.}..
1800: 23 69 66 20 30 0a 73 74 61 74 69 63 20 69 6e 74  #if 0.static int
1810: 20 61 70 70 66 73 5f 70 61 72 73 65 5f 70 61 74   appfs_parse_pat
1820: 68 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 5f 70  h(const char *_p
1830: 61 74 68 2c 20 73 74 72 75 63 74 20 61 70 70 66  ath, struct appf
1840: 73 5f 70 61 74 68 20 2a 70 61 74 68 69 6e 66 6f  s_path *pathinfo
1850: 29 20 7b 0a 09 63 68 61 72 20 2a 70 61 74 68 3b  ) {..char *path;
1860: 0a 0a 09 69 66 20 28 5f 70 61 74 68 20 3d 3d 20  ...if (_path == 
1870: 4e 55 4c 4c 29 20 7b 0a 09 09 72 65 74 75 72 6e  NULL) {...return
1880: 28 2d 45 4e 4f 45 4e 54 29 3b 0a 09 7d 0a 0a 09  (-ENOENT);..}...
1890: 69 66 20 28 5f 70 61 74 68 5b 30 5d 20 21 3d 20  if (_path[0] != 
18a0: 27 2f 27 29 20 7b 0a 09 09 72 65 74 75 72 6e 28  '/') {...return(
18b0: 2d 45 4e 4f 45 4e 54 29 3b 0a 09 7d 0a 0a 09 69  -ENOENT);..}...i
18c0: 66 20 28 5f 70 61 74 68 5b 31 5d 20 3d 3d 20 27  f (_path[1] == '
18d0: 5c 30 27 29 20 7b 0a 09 09 2f 2a 20 52 65 71 75  \0') {.../* Requ
18e0: 65 73 74 20 66 6f 72 20 74 68 65 20 72 6f 6f 74  est for the root
18f0: 20 64 69 72 65 63 74 6f 72 79 20 2a 2f 0a 09 7d   directory */..}
1900: 0a 0a 09 70 61 74 68 20 3d 20 73 74 72 64 75 70  ...path = strdup
1910: 28 5f 70 61 74 68 29 3b 0a 0a 09 68 6f 73 74 6e  (_path);...hostn
1920: 61 6d 65 20 3d 20 70 61 74 68 20 2b 20 31 3b 0a  ame = path + 1;.
1930: 09 70 61 63 6b 61 67 65 20 3d 20 73 74 72 63 68  .package = strch
1940: 72 28 68 6f 73 74 6e 61 6d 65 2c 20 27 2f 27 29  r(hostname, '/')
1950: 3b 0a 0a 09 69 66 20 28 70 61 63 6b 61 67 65 20  ;...if (package 
1960: 3d 3d 20 4e 55 4c 4c 29 20 7b 0a 09 09 2f 2a 20  == NULL) {.../* 
1970: 52 65 71 75 65 73 74 20 66 6f 72 20 61 20 73 69  Request for a si
1980: 6e 67 6c 65 20 68 6f 73 74 6e 61 6d 65 20 2a 2f  ngle hostname */
1990: 0a 09 7d 0a 0a 0a 7d 0a 23 65 6c 73 65 0a 73 74  ..}...}.#else.st
19a0: 61 74 69 63 20 69 6e 74 20 61 70 70 66 73 5f 70  atic int appfs_p
19b0: 61 72 73 65 5f 70 61 74 68 28 63 6f 6e 73 74 20  arse_path(const 
19c0: 63 68 61 72 20 2a 5f 70 61 74 68 29 20 7b 0a 09  char *_path) {..
19d0: 72 65 74 75 72 6e 28 30 29 3b 0a 7d 0a 23 65 6e  return(0);.}.#en
19e0: 64 69 66 0a 0a 73 74 61 74 69 63 20 69 6e 74 20  dif..static int 
19f0: 61 70 70 66 73 5f 66 75 73 65 5f 67 65 74 61 74  appfs_fuse_getat
1a00: 74 72 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 70  tr(const char *p
1a10: 61 74 68 2c 20 73 74 72 75 63 74 20 73 74 61 74  ath, struct stat
1a20: 20 2a 73 74 62 75 66 29 20 7b 0a 09 69 6e 74 20   *stbuf) {..int 
1a30: 72 65 73 20 3d 20 30 3b 0a 0a 09 41 50 50 46 53  res = 0;...APPFS
1a40: 5f 44 45 42 55 47 28 22 45 6e 74 65 72 20 28 70  _DEBUG("Enter (p
1a50: 61 74 68 20 3d 20 25 73 2c 20 2e 2e 2e 29 22 2c  ath = %s, ...)",
1a60: 20 70 61 74 68 29 3b 0a 0a 09 72 65 73 20 3d 20   path);...res = 
1a70: 61 70 70 66 73 5f 70 61 72 73 65 5f 70 61 74 68  appfs_parse_path
1a80: 28 70 61 74 68 29 3b 0a 0a 09 6d 65 6d 73 65 74  (path);...memset
1a90: 28 73 74 62 75 66 2c 20 30 2c 20 73 69 7a 65 6f  (stbuf, 0, sizeo
1aa0: 66 28 73 74 72 75 63 74 20 73 74 61 74 29 29 3b  f(struct stat));
1ab0: 0a 0a 09 73 74 62 75 66 2d 3e 73 74 5f 6d 6f 64  ...stbuf->st_mod
1ac0: 65 20 3d 20 53 5f 49 46 44 49 52 20 7c 20 30 37  e = S_IFDIR | 07
1ad0: 35 35 3b 0a 09 73 74 62 75 66 2d 3e 73 74 5f 6e  55;..stbuf->st_n
1ae0: 6c 69 6e 6b 20 3d 20 32 3b 0a 0a 09 72 65 74 75  link = 2;...retu
1af0: 72 6e 20 72 65 73 3b 0a 7d 0a 0a 73 74 61 74 69  rn res;.}..stati
1b00: 63 20 69 6e 74 20 61 70 70 66 73 5f 66 75 73 65  c int appfs_fuse
1b10: 5f 72 65 61 64 64 69 72 28 63 6f 6e 73 74 20 63  _readdir(const c
1b20: 68 61 72 20 2a 70 61 74 68 2c 20 76 6f 69 64 20  har *path, void 
1b30: 2a 62 75 66 2c 20 66 75 73 65 5f 66 69 6c 6c 5f  *buf, fuse_fill_
1b40: 64 69 72 5f 74 20 66 69 6c 6c 65 72 2c 20 6f 66  dir_t filler, of
1b50: 66 5f 74 20 6f 66 66 73 65 74 2c 20 73 74 72 75  f_t offset, stru
1b60: 63 74 20 66 75 73 65 5f 66 69 6c 65 5f 69 6e 66  ct fuse_file_inf
1b70: 6f 20 2a 66 69 29 20 7b 0a 09 41 50 50 46 53 5f  o *fi) {..APPFS_
1b80: 44 45 42 55 47 28 22 45 6e 74 65 72 20 28 70 61  DEBUG("Enter (pa
1b90: 74 68 20 3d 20 25 73 2c 20 2e 2e 2e 29 22 2c 20  th = %s, ...)", 
1ba0: 70 61 74 68 29 3b 0a 0a 09 66 69 6c 6c 65 72 28  path);...filler(
1bb0: 62 75 66 2c 20 22 2e 22 2c 20 4e 55 4c 4c 2c 20  buf, ".", NULL, 
1bc0: 30 29 3b 0a 09 66 69 6c 6c 65 72 28 62 75 66 2c  0);..filler(buf,
1bd0: 20 22 2e 2e 22 2c 20 4e 55 4c 4c 2c 20 30 29 3b   "..", NULL, 0);
1be0: 0a 0a 09 72 65 74 75 72 6e 20 30 3b 0a 7d 0a 0a  ...return 0;.}..
1bf0: 73 74 61 74 69 63 20 69 6e 74 20 61 70 70 66 73  static int appfs
1c00: 5f 66 75 73 65 5f 6f 70 65 6e 28 63 6f 6e 73 74  _fuse_open(const
1c10: 20 63 68 61 72 20 2a 70 61 74 68 2c 20 73 74 72   char *path, str
1c20: 75 63 74 20 66 75 73 65 5f 66 69 6c 65 5f 69 6e  uct fuse_file_in
1c30: 66 6f 20 2a 66 69 29 20 7b 0a 09 72 65 74 75 72  fo *fi) {..retur
1c40: 6e 28 2d 45 4e 4f 45 4e 54 29 3b 0a 7d 0a 0a 73  n(-ENOENT);.}..s
1c50: 74 61 74 69 63 20 69 6e 74 20 61 70 70 66 73 5f  tatic int appfs_
1c60: 66 75 73 65 5f 72 65 61 64 28 63 6f 6e 73 74 20  fuse_read(const 
1c70: 63 68 61 72 20 2a 70 61 74 68 2c 20 63 68 61 72  char *path, char
1c80: 20 2a 62 75 66 2c 20 73 69 7a 65 5f 74 20 73 69   *buf, size_t si
1c90: 7a 65 2c 20 6f 66 66 5f 74 20 6f 66 66 73 65 74  ze, off_t offset
1ca0: 2c 20 73 74 72 75 63 74 20 66 75 73 65 5f 66 69  , struct fuse_fi
1cb0: 6c 65 5f 69 6e 66 6f 20 2a 66 69 29 20 7b 0a 09  le_info *fi) {..
1cc0: 72 65 74 75 72 6e 28 2d 45 4e 4f 45 4e 54 29 3b  return(-ENOENT);
1cd0: 0a 7d 0a 0a 23 69 66 64 65 66 20 41 50 50 46 53  .}..#ifdef APPFS
1ce0: 5f 54 45 53 54 5f 44 52 49 56 45 52 0a 73 74 61  _TEST_DRIVER.sta
1cf0: 74 69 63 20 69 6e 74 20 61 70 70 66 73 5f 74 65  tic int appfs_te
1d00: 73 74 5f 64 72 69 76 65 72 28 76 6f 69 64 29 20  st_driver(void) 
1d10: 7b 0a 09 73 74 72 75 63 74 20 61 70 70 66 73 5f  {..struct appfs_
1d20: 73 69 74 65 20 2a 73 69 74 65 73 2c 20 2a 73 69  site *sites, *si
1d30: 74 65 3b 0a 09 73 74 72 75 63 74 20 61 70 70 66  te;..struct appf
1d40: 73 5f 70 61 63 6b 61 67 65 20 2a 70 61 63 6b 61  s_package *packa
1d50: 67 65 73 2c 20 2a 70 61 63 6b 61 67 65 3b 0a 09  ges, *package;..
1d60: 69 6e 74 20 70 61 63 6b 61 67 65 73 5f 63 6f 75  int packages_cou
1d70: 6e 74 20 3d 20 30 2c 20 73 69 74 65 73 5f 63 6f  nt = 0, sites_co
1d80: 75 6e 74 20 3d 20 30 3b 0a 0a 09 73 69 74 65 73  unt = 0;...sites
1d90: 20 3d 20 61 70 70 66 73 5f 67 65 74 73 69 74 65   = appfs_getsite
1da0: 73 28 26 73 69 74 65 73 5f 63 6f 75 6e 74 29 3b  s(&sites_count);
1db0: 0a 09 70 72 69 6e 74 66 28 22 53 69 74 65 73 3a  ..printf("Sites:
1dc0: 5c 6e 22 29 3b 0a 09 66 6f 72 20 28 73 69 74 65  \n");..for (site
1dd0: 20 3d 20 73 69 74 65 73 3b 20 73 69 74 65 3b 20   = sites; site; 
1de0: 73 69 74 65 20 3d 20 73 69 74 65 2d 3e 5f 6e 65  site = site->_ne
1df0: 78 74 29 20 7b 0a 09 09 70 72 69 6e 74 66 28 22  xt) {...printf("
1e00: 5c 74 6e 61 6d 65 20 3d 20 25 73 5c 6e 22 2c 20  \tname = %s\n", 
1e10: 73 69 74 65 2d 3e 6e 61 6d 65 29 3b 0a 09 7d 0a  site->name);..}.
1e20: 0a 09 61 70 70 66 73 5f 66 72 65 65 5f 6c 69 73  ..appfs_free_lis
1e30: 74 5f 73 69 74 65 28 73 69 74 65 73 29 3b 0a 0a  t_site(sites);..
1e40: 09 70 61 63 6b 61 67 65 73 20 3d 20 61 70 70 66  .packages = appf
1e50: 73 5f 67 65 74 69 6e 64 65 78 28 22 72 6b 65 65  s_getindex("rkee
1e60: 6e 65 2e 6f 72 67 22 2c 20 26 70 61 63 6b 61 67  ne.org", &packag
1e70: 65 73 5f 63 6f 75 6e 74 29 3b 0a 09 69 66 20 28  es_count);..if (
1e80: 70 61 63 6b 61 67 65 73 20 3d 3d 20 4e 55 4c 4c  packages == NULL
1e90: 20 7c 7c 20 70 61 63 6b 61 67 65 73 5f 63 6f 75   || packages_cou
1ea0: 6e 74 20 3d 3d 20 30 29 20 7b 0a 09 09 66 70 72  nt == 0) {...fpr
1eb0: 69 6e 74 66 28 73 74 64 65 72 72 2c 20 22 55 6e  intf(stderr, "Un
1ec0: 61 62 6c 65 20 74 6f 20 66 65 74 63 68 20 70 61  able to fetch pa
1ed0: 63 6b 61 67 65 20 69 6e 64 65 78 20 66 72 6f 6d  ckage index from
1ee0: 20 72 6b 65 65 6e 65 2e 6f 72 67 2e 5c 6e 22 29   rkeene.org.\n")
1ef0: 3b 0a 0a 09 09 72 65 74 75 72 6e 28 31 29 3b 0a  ;....return(1);.
1f00: 09 7d 0a 0a 09 66 6f 72 20 28 70 61 63 6b 61 67  .}...for (packag
1f10: 65 20 3d 20 70 61 63 6b 61 67 65 73 3b 20 70 61  e = packages; pa
1f20: 63 6b 61 67 65 3b 20 70 61 63 6b 61 67 65 20 3d  ckage; package =
1f30: 20 70 61 63 6b 61 67 65 2d 3e 5f 6e 65 78 74 29   package->_next)
1f40: 20 7b 0a 09 09 70 72 69 6e 74 66 28 22 50 61 63   {...printf("Pac
1f50: 6b 61 67 65 3a 5c 6e 5c 74 6e 61 6d 65 20 3d 20  kage:\n\tname = 
1f60: 25 73 5c 6e 5c 74 76 65 72 73 69 6f 6e 20 3d 20  %s\n\tversion = 
1f70: 25 73 5c 6e 5c 74 73 68 61 31 20 3d 20 25 73 5c  %s\n\tsha1 = %s\
1f80: 6e 5c 74 6f 73 20 3d 20 25 73 5c 6e 5c 74 63 70  n\tos = %s\n\tcp
1f90: 75 41 72 63 68 20 3d 20 25 73 5c 6e 22 2c 0a 09  uArch = %s\n",..
1fa0: 09 09 70 61 63 6b 61 67 65 2d 3e 6e 61 6d 65 2c  ..package->name,
1fb0: 0a 09 09 09 70 61 63 6b 61 67 65 2d 3e 76 65 72  ....package->ver
1fc0: 73 69 6f 6e 2c 0a 09 09 09 70 61 63 6b 61 67 65  sion,....package
1fd0: 2d 3e 73 68 61 31 2c 0a 09 09 09 61 70 70 66 73  ->sha1,....appfs
1fe0: 5f 63 6f 6e 76 65 72 74 5f 6f 73 5f 74 6f 53 74  _convert_os_toSt
1ff0: 72 69 6e 67 28 70 61 63 6b 61 67 65 2d 3e 6f 73  ring(package->os
2000: 29 2c 0a 09 09 09 61 70 70 66 73 5f 63 6f 6e 76  ),....appfs_conv
2010: 65 72 74 5f 63 70 75 41 72 63 68 5f 74 6f 53 74  ert_cpuArch_toSt
2020: 72 69 6e 67 28 70 61 63 6b 61 67 65 2d 3e 63 70  ring(package->cp
2030: 75 41 72 63 68 29 0a 09 09 29 3b 0a 09 7d 0a 0a  uArch)...);..}..
2040: 09 61 70 70 66 73 5f 66 72 65 65 5f 6c 69 73 74  .appfs_free_list
2050: 5f 70 61 63 6b 61 67 65 28 70 61 63 6b 61 67 65  _package(package
2060: 73 29 3b 0a 0a 09 72 65 74 75 72 6e 28 30 29 3b  s);...return(0);
2070: 0a 7d 0a 23 65 6c 73 65 0a 73 74 61 74 69 63 20  .}.#else.static 
2080: 73 74 72 75 63 74 20 66 75 73 65 5f 6f 70 65 72  struct fuse_oper
2090: 61 74 69 6f 6e 73 20 61 70 70 66 73 5f 6f 70 65  ations appfs_ope
20a0: 72 20 3d 20 7b 0a 09 2e 67 65 74 61 74 74 72 09  r = {...getattr.
20b0: 3d 20 61 70 70 66 73 5f 66 75 73 65 5f 67 65 74  = appfs_fuse_get
20c0: 61 74 74 72 2c 0a 09 2e 72 65 61 64 64 69 72 09  attr,...readdir.
20d0: 3d 20 61 70 70 66 73 5f 66 75 73 65 5f 72 65 61  = appfs_fuse_rea
20e0: 64 64 69 72 2c 0a 09 2e 6f 70 65 6e 09 09 3d 20  ddir,...open..= 
20f0: 61 70 70 66 73 5f 66 75 73 65 5f 6f 70 65 6e 2c  appfs_fuse_open,
2100: 0a 09 2e 72 65 61 64 09 09 3d 20 61 70 70 66 73  ...read..= appfs
2110: 5f 66 75 73 65 5f 72 65 61 64 0a 7d 3b 0a 23 65  _fuse_read.};.#e
2120: 6e 64 69 66 0a 0a 69 6e 74 20 6d 61 69 6e 28 69  ndif..int main(i
2130: 6e 74 20 61 72 67 63 2c 20 63 68 61 72 20 2a 2a  nt argc, char **
2140: 61 72 67 76 29 20 7b 0a 09 63 6f 6e 73 74 20 63  argv) {..const c
2150: 68 61 72 20 2a 63 61 63 68 65 64 69 72 20 3d 20  har *cachedir = 
2160: 41 50 50 46 53 5f 43 41 43 48 45 44 49 52 3b 0a  APPFS_CACHEDIR;.
2170: 09 63 68 61 72 20 64 62 66 69 6c 65 6e 61 6d 65  .char dbfilename
2180: 5b 31 30 32 34 5d 3b 0a 09 69 6e 74 20 74 63 6c  [1024];..int tcl
2190: 5f 72 65 74 2c 20 73 6e 70 72 69 6e 74 66 5f 72  _ret, snprintf_r
21a0: 65 74 2c 20 73 71 6c 69 74 65 5f 72 65 74 3b 0a  et, sqlite_ret;.
21b0: 0a 09 67 6c 6f 62 61 6c 54 68 72 65 61 64 2e 69  ..globalThread.i
21c0: 6e 74 65 72 70 20 3d 20 54 63 6c 5f 43 72 65 61  nterp = Tcl_Crea
21d0: 74 65 49 6e 74 65 72 70 28 29 3b 0a 09 69 66 20  teInterp();..if 
21e0: 28 67 6c 6f 62 61 6c 54 68 72 65 61 64 2e 69 6e  (globalThread.in
21f0: 74 65 72 70 20 3d 3d 20 4e 55 4c 4c 29 20 7b 0a  terp == NULL) {.
2200: 09 09 66 70 72 69 6e 74 66 28 73 74 64 65 72 72  ..fprintf(stderr
2210: 2c 20 22 55 6e 61 62 6c 65 20 74 6f 20 63 72 65  , "Unable to cre
2220: 61 74 65 20 54 63 6c 20 49 6e 74 65 72 70 72 65  ate Tcl Interpre
2230: 74 65 72 2e 20 20 41 62 6f 72 74 69 6e 67 2e 5c  ter.  Aborting.\
2240: 6e 22 29 3b 0a 0a 09 09 72 65 74 75 72 6e 28 31  n");....return(1
2250: 29 3b 0a 09 7d 0a 0a 09 74 63 6c 5f 72 65 74 20  );..}...tcl_ret 
2260: 3d 20 54 63 6c 5f 49 6e 69 74 28 67 6c 6f 62 61  = Tcl_Init(globa
2270: 6c 54 68 72 65 61 64 2e 69 6e 74 65 72 70 29 3b  lThread.interp);
2280: 0a 09 69 66 20 28 74 63 6c 5f 72 65 74 20 21 3d  ..if (tcl_ret !=
2290: 20 54 43 4c 5f 4f 4b 29 20 7b 0a 09 09 66 70 72   TCL_OK) {...fpr
22a0: 69 6e 74 66 28 73 74 64 65 72 72 2c 20 22 55 6e  intf(stderr, "Un
22b0: 61 62 6c 65 20 74 6f 20 69 6e 69 74 69 61 6c 69  able to initiali
22c0: 7a 65 20 54 63 6c 2e 20 20 41 62 6f 72 74 69 6e  ze Tcl.  Abortin
22d0: 67 2e 5c 6e 22 29 3b 0a 0a 09 09 72 65 74 75 72  g.\n");....retur
22e0: 6e 28 31 29 3b 0a 09 7d 0a 0a 09 74 63 6c 5f 72  n(1);..}...tcl_r
22f0: 65 74 20 3d 20 54 63 6c 5f 45 76 61 6c 28 67 6c  et = Tcl_Eval(gl
2300: 6f 62 61 6c 54 68 72 65 61 64 2e 69 6e 74 65 72  obalThread.inter
2310: 70 2c 20 22 22 0a 23 69 6e 63 6c 75 64 65 20 22  p, "".#include "
2320: 61 70 70 66 73 2e 74 63 6c 2e 68 22 0a 09 22 22  appfs.tcl.h"..""
2330: 29 3b 0a 09 69 66 20 28 74 63 6c 5f 72 65 74 20  );..if (tcl_ret 
2340: 21 3d 20 54 43 4c 5f 4f 4b 29 20 7b 0a 09 09 66  != TCL_OK) {...f
2350: 70 72 69 6e 74 66 28 73 74 64 65 72 72 2c 20 22  printf(stderr, "
2360: 55 6e 61 62 6c 65 20 74 6f 20 69 6e 69 74 69 61  Unable to initia
2370: 6c 69 7a 65 20 54 63 6c 20 41 70 70 46 53 20 73  lize Tcl AppFS s
2380: 63 72 69 70 74 2e 20 20 41 62 6f 72 74 69 6e 67  cript.  Aborting
2390: 2e 5c 6e 22 29 3b 0a 09 09 66 70 72 69 6e 74 66  .\n");...fprintf
23a0: 28 73 74 64 65 72 72 2c 20 22 54 63 6c 20 45 72  (stderr, "Tcl Er
23b0: 72 6f 72 20 69 73 3a 20 25 73 5c 6e 22 2c 20 54  ror is: %s\n", T
23c0: 63 6c 5f 47 65 74 53 74 72 69 6e 67 52 65 73 75  cl_GetStringResu
23d0: 6c 74 28 67 6c 6f 62 61 6c 54 68 72 65 61 64 2e  lt(globalThread.
23e0: 69 6e 74 65 72 70 29 29 3b 0a 0a 09 09 72 65 74  interp));....ret
23f0: 75 72 6e 28 31 29 3b 0a 09 7d 0a 0a 09 69 66 20  urn(1);..}...if 
2400: 28 54 63 6c 5f 53 65 74 56 61 72 28 67 6c 6f 62  (Tcl_SetVar(glob
2410: 61 6c 54 68 72 65 61 64 2e 69 6e 74 65 72 70 2c  alThread.interp,
2420: 20 22 3a 3a 61 70 70 66 73 3a 3a 63 61 63 68 65   "::appfs::cache
2430: 64 69 72 22 2c 20 63 61 63 68 65 64 69 72 2c 20  dir", cachedir, 
2440: 54 43 4c 5f 47 4c 4f 42 41 4c 5f 4f 4e 4c 59 29  TCL_GLOBAL_ONLY)
2450: 20 3d 3d 20 4e 55 4c 4c 29 20 7b 0a 09 09 66 70   == NULL) {...fp
2460: 72 69 6e 74 66 28 73 74 64 65 72 72 2c 20 22 55  rintf(stderr, "U
2470: 6e 61 62 6c 65 20 74 6f 20 73 65 74 20 63 61 63  nable to set cac
2480: 68 65 20 64 69 72 65 63 74 6f 72 79 2e 20 20 54  he directory.  T
2490: 68 69 73 20 73 68 6f 75 6c 64 20 6e 65 76 65 72  his should never
24a0: 20 66 61 69 6c 2e 5c 6e 22 29 3b 0a 0a 09 09 72   fail.\n");....r
24b0: 65 74 75 72 6e 28 31 29 3b 0a 09 7d 0a 0a 09 74  eturn(1);..}...t
24c0: 63 6c 5f 72 65 74 20 3d 20 61 70 70 66 73 5f 54  cl_ret = appfs_T
24d0: 63 6c 5f 45 76 61 6c 28 67 6c 6f 62 61 6c 54 68  cl_Eval(globalTh
24e0: 72 65 61 64 2e 69 6e 74 65 72 70 2c 20 31 2c 20  read.interp, 1, 
24f0: 22 3a 3a 61 70 70 66 73 3a 3a 69 6e 69 74 22 29  "::appfs::init")
2500: 3b 0a 09 69 66 20 28 74 63 6c 5f 72 65 74 20 21  ;..if (tcl_ret !
2510: 3d 20 54 43 4c 5f 4f 4b 29 20 7b 0a 09 09 66 70  = TCL_OK) {...fp
2520: 72 69 6e 74 66 28 73 74 64 65 72 72 2c 20 22 55  rintf(stderr, "U
2530: 6e 61 62 6c 65 20 74 6f 20 69 6e 69 74 69 61 6c  nable to initial
2540: 69 7a 65 20 54 63 6c 20 41 70 70 46 53 20 73 63  ize Tcl AppFS sc
2550: 72 69 70 74 20 28 3a 3a 61 70 70 66 73 3a 3a 69  ript (::appfs::i
2560: 6e 69 74 29 2e 20 20 41 62 6f 72 74 69 6e 67 2e  nit).  Aborting.
2570: 5c 6e 22 29 3b 0a 09 09 66 70 72 69 6e 74 66 28  \n");...fprintf(
2580: 73 74 64 65 72 72 2c 20 22 54 63 6c 20 45 72 72  stderr, "Tcl Err
2590: 6f 72 20 69 73 3a 20 25 73 5c 6e 22 2c 20 54 63  or is: %s\n", Tc
25a0: 6c 5f 47 65 74 53 74 72 69 6e 67 52 65 73 75 6c  l_GetStringResul
25b0: 74 28 67 6c 6f 62 61 6c 54 68 72 65 61 64 2e 69  t(globalThread.i
25c0: 6e 74 65 72 70 29 29 3b 0a 0a 09 09 72 65 74 75  nterp));....retu
25d0: 72 6e 28 31 29 3b 0a 09 7d 0a 0a 09 73 6e 70 72  rn(1);..}...snpr
25e0: 69 6e 74 66 5f 72 65 74 20 3d 20 73 6e 70 72 69  intf_ret = snpri
25f0: 6e 74 66 28 64 62 66 69 6c 65 6e 61 6d 65 2c 20  ntf(dbfilename, 
2600: 73 69 7a 65 6f 66 28 64 62 66 69 6c 65 6e 61 6d  sizeof(dbfilenam
2610: 65 29 2c 20 22 25 73 2f 25 73 22 2c 20 63 61 63  e), "%s/%s", cac
2620: 68 65 64 69 72 2c 20 22 63 61 63 68 65 2e 64 62  hedir, "cache.db
2630: 22 29 3b 0a 09 69 66 20 28 73 6e 70 72 69 6e 74  ");..if (snprint
2640: 66 5f 72 65 74 20 3e 3d 20 73 69 7a 65 6f 66 28  f_ret >= sizeof(
2650: 64 62 66 69 6c 65 6e 61 6d 65 29 29 20 7b 0a 09  dbfilename)) {..
2660: 09 66 70 72 69 6e 74 66 28 73 74 64 65 72 72 2c  .fprintf(stderr,
2670: 20 22 55 6e 61 62 6c 65 20 74 6f 20 73 65 74 20   "Unable to set 
2680: 64 61 74 61 62 61 73 65 20 66 69 6c 65 6e 61 6d  database filenam
2690: 65 2e 20 20 41 62 6f 72 74 69 6e 67 2e 5c 6e 22  e.  Aborting.\n"
26a0: 29 3b 0a 0a 09 09 72 65 74 75 72 6e 28 31 29 3b  );....return(1);
26b0: 0a 09 7d 0a 0a 09 73 71 6c 69 74 65 5f 72 65 74  ..}...sqlite_ret
26c0: 20 3d 20 73 71 6c 69 74 65 33 5f 6f 70 65 6e 28   = sqlite3_open(
26d0: 64 62 66 69 6c 65 6e 61 6d 65 2c 20 26 67 6c 6f  dbfilename, &glo
26e0: 62 61 6c 54 68 72 65 61 64 2e 64 62 29 3b 0a 09  balThread.db);..
26f0: 69 66 20 28 73 71 6c 69 74 65 5f 72 65 74 20 21  if (sqlite_ret !
2700: 3d 20 53 51 4c 49 54 45 5f 4f 4b 29 20 7b 0a 09  = SQLITE_OK) {..
2710: 09 66 70 72 69 6e 74 66 28 73 74 64 65 72 72 2c  .fprintf(stderr,
2720: 20 22 55 6e 61 62 6c 65 20 74 6f 20 6f 70 65 6e   "Unable to open
2730: 20 64 61 74 61 62 61 73 65 3a 20 25 73 5c 6e 22   database: %s\n"
2740: 2c 20 64 62 66 69 6c 65 6e 61 6d 65 29 3b 0a 0a  , dbfilename);..
2750: 09 09 72 65 74 75 72 6e 28 31 29 3b 0a 09 7d 0a  ..return(1);..}.
2760: 0a 23 69 66 64 65 66 20 41 50 50 46 53 5f 54 45  .#ifdef APPFS_TE
2770: 53 54 5f 44 52 49 56 45 52 0a 09 72 65 74 75 72  ST_DRIVER..retur
2780: 6e 28 61 70 70 66 73 5f 74 65 73 74 5f 64 72 69  n(appfs_test_dri
2790: 76 65 72 28 29 29 3b 0a 23 65 6c 73 65 0a 09 72  ver());.#else..r
27a0: 65 74 75 72 6e 28 66 75 73 65 5f 6d 61 69 6e 28  eturn(fuse_main(
27b0: 61 72 67 63 2c 20 61 72 67 76 2c 20 26 61 70 70  argc, argv, &app
27c0: 66 73 5f 6f 70 65 72 2c 20 4e 55 4c 4c 29 29 3b  fs_oper, NULL));
27d0: 0a 23 65 6e 64 69 66 0a 7d 0a 20 0a              .#endif.}. .