Hex Artifact Content

Artifact 4cd4495e1ddb62f365eed4ac9feede75aaee706e:

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 79 73 2f 74 79 70 65 73  clude <sys/types
0030: 2e 68 3e 0a 23 69 6e 63 6c 75 64 65 20 3c 73 71  .h>.#include <sq
0040: 6c 69 74 65 33 2e 68 3e 0a 23 69 6e 63 6c 75 64  lite3.h>.#includ
0050: 65 20 3c 70 74 68 72 65 61 64 2e 68 3e 0a 23 69  e <pthread.h>.#i
0060: 6e 63 6c 75 64 65 20 3c 73 74 72 69 6e 67 2e 68  nclude <string.h
0070: 3e 0a 23 69 6e 63 6c 75 64 65 20 3c 73 74 64 61  >.#include <stda
0080: 72 67 2e 68 3e 0a 23 69 6e 63 6c 75 64 65 20 3c  rg.h>.#include <
0090: 73 74 64 6c 69 62 2e 68 3e 0a 23 69 6e 63 6c 75  stdlib.h>.#inclu
00a0: 64 65 20 3c 75 6e 69 73 74 64 2e 68 3e 0a 23 69  de <unistd.h>.#i
00b0: 6e 63 6c 75 64 65 20 3c 65 72 72 6e 6f 2e 68 3e  nclude <errno.h>
00c0: 0a 23 69 6e 63 6c 75 64 65 20 3c 66 63 6e 74 6c  .#include <fcntl
00d0: 2e 68 3e 0a 23 69 6e 63 6c 75 64 65 20 3c 73 74  .h>.#include <st
00e0: 64 69 6f 2e 68 3e 0a 23 69 6e 63 6c 75 64 65 20  dio.h>.#include
00f0: 3c 66 75 73 65 2e 68 3e 0a 23 69 6e 63 6c 75 64  <fuse.h>.#includ
0100: 65 20 3c 74 63 6c 2e 68 3e 0a 0a 23 64 65 66 69  e <tcl.h>..#defi
0110: 6e 65 20 41 50 50 46 53 5f 43 41 43 48 45 44 49  ne APPFS_CACHEDI
0120: 52 20 22 2f 74 6d 70 2f 61 70 70 66 73 2d 63 61  R "/tmp/appfs-ca
0130: 63 68 65 22 0a 0a 23 64 65 66 69 6e 65 20 41 50  che"..#define AP
0140: 50 46 53 5f 44 45 42 55 47 28 78 2e 2e 2e 29 20  PFS_DEBUG(x...)
0150: 7b 20 66 70 72 69 6e 74 66 28 73 74 64 65 72 72  { fprintf(stderr
0160: 2c 20 22 5b 64 65 62 75 67 5d 20 25 73 3a 25 69  , "[debug] %s:%i
0170: 3a 25 73 3a 20 22 2c 20 5f 5f 46 49 4c 45 5f 5f  :%s: ", __FILE__
0180: 2c 20 5f 5f 4c 49 4e 45 5f 5f 2c 20 5f 5f 66 75  , __LINE__, __fu
0190: 6e 63 5f 5f 29 3b 20 66 70 72 69 6e 74 66 28 73  nc__); fprintf(s
01a0: 74 64 65 72 72 2c 20 78 29 3b 20 66 70 72 69 6e  tderr, x); fprin
01b0: 74 66 28 73 74 64 65 72 72 2c 20 22 5c 6e 22 29  tf(stderr, "\n")
01c0: 3b 20 7d 0a 0a 73 74 61 74 69 63 20 70 74 68 72  ; }..static pthr
01d0: 65 61 64 5f 6b 65 79 5f 74 20 69 6e 74 65 72 70  ead_key_t interp
01e0: 4b 65 79 3b 0a 0a 73 74 72 75 63 74 20 61 70 70  Key;..struct app
01f0: 66 73 5f 74 68 72 65 61 64 5f 64 61 74 61 20 7b  fs_thread_data {
0200: 0a 09 73 71 6c 69 74 65 33 20 2a 64 62 3b 0a 09  ..sqlite3 *db;..
0210: 63 6f 6e 73 74 20 63 68 61 72 20 2a 63 61 63 68  const char *cach
0220: 65 64 69 72 3b 0a 7d 3b 0a 0a 73 74 72 75 63 74  edir;.};..struct
0230: 20 61 70 70 66 73 5f 74 68 72 65 61 64 5f 64 61   appfs_thread_da
0240: 74 61 20 67 6c 6f 62 61 6c 54 68 72 65 61 64 3b  ta globalThread;
0250: 0a 0a 74 79 70 65 64 65 66 20 65 6e 75 6d 20 7b  ..typedef enum {
0260: 0a 09 41 50 50 46 53 5f 4f 53 5f 55 4e 4b 4e 4f  ..APPFS_OS_UNKNO
0270: 57 4e 2c 0a 09 41 50 50 46 53 5f 4f 53 5f 41 4c  WN,..APPFS_OS_AL
0280: 4c 2c 0a 09 41 50 50 46 53 5f 4f 53 5f 4c 49 4e  L,..APPFS_OS_LIN
0290: 55 58 2c 0a 09 41 50 50 46 53 5f 4f 53 5f 4d 41  UX,..APPFS_OS_MA
02a0: 43 4f 53 58 2c 0a 09 41 50 50 46 53 5f 4f 53 5f  COSX,..APPFS_OS_
02b0: 46 52 45 45 42 53 44 2c 0a 09 41 50 50 46 53 5f  FREEBSD,..APPFS_
02c0: 4f 53 5f 4f 50 45 4e 42 53 44 2c 0a 09 41 50 50  OS_OPENBSD,..APP
02d0: 46 53 5f 4f 53 5f 53 4f 4c 41 52 49 53 0a 7d 20  FS_OS_SOLARIS.}
02e0: 61 70 70 66 73 5f 6f 73 5f 74 3b 0a 0a 74 79 70  appfs_os_t;..typ
02f0: 65 64 65 66 20 65 6e 75 6d 20 7b 0a 09 41 50 50  edef enum {..APP
0300: 46 53 5f 43 50 55 5f 55 4e 4b 4e 4f 57 4e 2c 0a  FS_CPU_UNKNOWN,.
0310: 09 41 50 50 46 53 5f 43 50 55 5f 41 4c 4c 2c 0a  .APPFS_CPU_ALL,.
0320: 09 41 50 50 46 53 5f 43 50 55 5f 41 4d 44 36 34  .APPFS_CPU_AMD64
0330: 2c 0a 09 41 50 50 46 53 5f 43 50 55 5f 49 33 38  ,..APPFS_CPU_I38
0340: 36 2c 0a 09 41 50 50 46 53 5f 43 50 55 5f 41 52  6,..APPFS_CPU_AR
0350: 4d 0a 7d 20 61 70 70 66 73 5f 63 70 75 41 72 63  M.} appfs_cpuArc
0360: 68 5f 74 3b 0a 0a 74 79 70 65 64 65 66 20 65 6e  h_t;..typedef en
0370: 75 6d 20 7b 0a 09 41 50 50 46 53 5f 50 41 54 48  um {..APPFS_PATH
0380: 54 59 50 45 5f 49 4e 56 41 4c 49 44 2c 0a 09 41  TYPE_INVALID,..A
0390: 50 50 46 53 5f 50 41 54 48 54 59 50 45 5f 46 49  PPFS_PATHTYPE_FI
03a0: 4c 45 2c 0a 09 41 50 50 46 53 5f 50 41 54 48 54  LE,..APPFS_PATHT
03b0: 59 50 45 5f 44 49 52 45 43 54 4f 52 59 2c 0a 09  YPE_DIRECTORY,..
03c0: 41 50 50 46 53 5f 50 41 54 48 54 59 50 45 5f 53  APPFS_PATHTYPE_S
03d0: 59 4d 4c 49 4e 4b 0a 7d 20 61 70 70 66 73 5f 70  YMLINK.} appfs_p
03e0: 61 74 68 74 79 70 65 5f 74 3b 0a 0a 73 74 72 75  athtype_t;..stru
03f0: 63 74 20 61 70 70 66 73 5f 70 61 63 6b 61 67 65  ct appfs_package
0400: 20 7b 0a 09 73 74 72 75 63 74 20 61 70 70 66 73   {..struct appfs
0410: 5f 70 61 63 6b 61 67 65 20 2a 5f 6e 65 78 74 3b  _package *_next;
0420: 0a 09 69 6e 74 20 63 6f 75 6e 74 65 72 3b 0a 0a  ..int counter;..
0430: 09 63 68 61 72 20 6e 61 6d 65 5b 32 35 36 5d 3b  .char name[256];
0440: 0a 09 63 68 61 72 20 76 65 72 73 69 6f 6e 5b 36  ..char version[6
0450: 34 5d 3b 0a 09 63 68 61 72 20 73 68 61 31 5b 34  4];..char sha1[4
0460: 31 5d 3b 0a 09 63 68 61 72 20 6f 73 5f 73 74 72  1];..char os_str
0470: 5b 36 34 5d 3b 0a 09 63 68 61 72 20 63 70 75 41  [64];..char cpuA
0480: 72 63 68 5f 73 74 72 5b 36 34 5d 3b 0a 09 61 70  rch_str[64];..ap
0490: 70 66 73 5f 6f 73 5f 74 20 6f 73 3b 0a 09 61 70  pfs_os_t os;..ap
04a0: 70 66 73 5f 63 70 75 41 72 63 68 5f 74 20 63 70  pfs_cpuArch_t cp
04b0: 75 41 72 63 68 3b 0a 09 69 6e 74 20 69 73 4c 61  uArch;..int isLa
04c0: 74 65 73 74 3b 0a 7d 3b 0a 0a 73 74 72 75 63 74  test;.};..struct
04d0: 20 61 70 70 66 73 5f 73 69 74 65 20 7b 0a 09 73   appfs_site {..s
04e0: 74 72 75 63 74 20 61 70 70 66 73 5f 73 69 74 65  truct appfs_site
04f0: 20 2a 5f 6e 65 78 74 3b 0a 09 69 6e 74 20 63 6f   *_next;..int co
0500: 75 6e 74 65 72 3b 0a 0a 09 63 68 61 72 20 6e 61  unter;...char na
0510: 6d 65 5b 32 35 36 5d 3b 0a 7d 3b 0a 0a 73 74 72  me[256];.};..str
0520: 75 63 74 20 61 70 70 66 73 5f 63 68 69 6c 64 72  uct appfs_childr
0530: 65 6e 20 7b 0a 09 73 74 72 75 63 74 20 61 70 70  en {..struct app
0540: 66 73 5f 63 68 69 6c 64 72 65 6e 20 2a 5f 6e 65  fs_children *_ne
0550: 78 74 3b 0a 09 69 6e 74 20 63 6f 75 6e 74 65 72  xt;..int counter
0560: 3b 0a 0a 09 63 68 61 72 20 6e 61 6d 65 5b 32 35  ;...char name[25
0570: 36 5d 3b 0a 7d 3b 0a 0a 73 74 72 75 63 74 20 61  6];.};..struct a
0580: 70 70 66 73 5f 70 61 74 68 69 6e 66 6f 20 7b 0a  ppfs_pathinfo {.
0590: 09 61 70 70 66 73 5f 70 61 74 68 74 79 70 65 5f  .appfs_pathtype_
05a0: 74 20 74 79 70 65 3b 0a 09 74 69 6d 65 5f 74 20  t type;..time_t
05b0: 74 69 6d 65 3b 0a 09 63 68 61 72 20 68 6f 73 74  time;..char host
05c0: 6e 61 6d 65 5b 32 35 36 5d 3b 0a 09 75 6e 69 6f  name[256];..unio
05d0: 6e 20 7b 0a 09 09 73 74 72 75 63 74 20 7b 0a 09  n {...struct {..
05e0: 09 09 69 6e 74 20 63 68 69 6c 64 63 6f 75 6e 74  ..int childcount
05f0: 3b 0a 09 09 7d 20 64 69 72 3b 0a 09 09 73 74 72  ;...} dir;...str
0600: 75 63 74 20 7b 0a 09 09 09 69 6e 74 20 65 78 65  uct {....int exe
0610: 63 75 74 61 62 6c 65 3b 0a 09 09 09 6f 66 66 5f  cutable;....off_
0620: 74 20 73 69 7a 65 3b 0a 09 09 09 63 68 61 72 20  t size;....char
0630: 73 68 61 31 5b 34 31 5d 3b 0a 09 09 7d 20 66 69  sha1[41];...} fi
0640: 6c 65 3b 0a 09 7d 20 74 79 70 65 69 6e 66 6f 3b  le;..} typeinfo;
0650: 0a 7d 3b 0a 0a 73 74 61 74 69 63 20 61 70 70 66  .};..static appf
0660: 73 5f 6f 73 5f 74 20 61 70 70 66 73 5f 63 6f 6e  s_os_t appfs_con
0670: 76 65 72 74 5f 6f 73 5f 66 72 6f 6d 53 74 72 69  vert_os_fromStri
0680: 6e 67 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 6f  ng(const char *o
0690: 73 29 20 7b 0a 09 69 66 20 28 73 74 72 63 61 73  s) {..if (strcas
06a0: 65 63 6d 70 28 6f 73 2c 20 22 4c 69 6e 75 78 22  ecmp(os, "Linux"
06b0: 29 20 3d 3d 20 30 29 20 7b 0a 09 09 72 65 74 75  ) == 0) {...retu
06c0: 72 6e 28 41 50 50 46 53 5f 4f 53 5f 4c 49 4e 55  rn(APPFS_OS_LINU
06d0: 58 29 3b 0a 09 7d 0a 0a 09 69 66 20 28 73 74 72  X);..}...if (str
06e0: 63 61 73 65 63 6d 70 28 6f 73 2c 20 22 44 61 72  casecmp(os, "Dar
06f0: 77 69 6e 22 29 20 3d 3d 20 30 20 7c 7c 20 73 74  win") == 0 || st
0700: 72 63 61 73 65 63 6d 70 28 6f 73 2c 20 22 4d 61  rcasecmp(os, "Ma
0710: 63 20 4f 53 22 29 20 3d 3d 20 30 20 7c 7c 20 73  c OS") == 0 || s
0720: 74 72 63 61 73 65 63 6d 70 28 6f 73 2c 20 22 4d  trcasecmp(os, "M
0730: 61 63 20 4f 53 20 58 22 29 20 3d 3d 20 30 29 20  ac OS X") == 0)
0740: 7b 0a 09 09 72 65 74 75 72 6e 28 41 50 50 46 53  {...return(APPFS
0750: 5f 4f 53 5f 4d 41 43 4f 53 58 29 3b 0a 09 7d 0a  _OS_MACOSX);..}.
0760: 0a 09 69 66 20 28 73 74 72 63 61 73 65 63 6d 70  ..if (strcasecmp
0770: 28 6f 73 2c 20 22 6e 6f 61 72 63 68 22 29 20 3d  (os, "noarch") =
0780: 3d 20 30 29 20 7b 0a 09 09 72 65 74 75 72 6e 28  = 0) {...return(
0790: 41 50 50 46 53 5f 4f 53 5f 41 4c 4c 29 3b 0a 09  APPFS_OS_ALL);..
07a0: 7d 0a 0a 09 72 65 74 75 72 6e 28 41 50 50 46 53  }...return(APPFS
07b0: 5f 4f 53 5f 55 4e 4b 4e 4f 57 4e 29 3b 0a 7d 0a  _OS_UNKNOWN);.}.
07c0: 0a 73 74 61 74 69 63 20 63 6f 6e 73 74 20 63 68  .static const ch
07d0: 61 72 20 2a 61 70 70 66 73 5f 63 6f 6e 76 65 72  ar *appfs_conver
07e0: 74 5f 6f 73 5f 74 6f 53 74 72 69 6e 67 28 61 70  t_os_toString(ap
07f0: 70 66 73 5f 6f 73 5f 74 20 6f 73 29 20 7b 0a 09  pfs_os_t os) {..
0800: 73 77 69 74 63 68 20 28 6f 73 29 20 7b 0a 09 09  switch (os) {...
0810: 63 61 73 65 20 41 50 50 46 53 5f 4f 53 5f 41 4c  case APPFS_OS_AL
0820: 4c 3a 0a 09 09 09 72 65 74 75 72 6e 28 22 6e 6f  L:....return("no
0830: 61 72 63 68 22 29 3b 0a 09 09 63 61 73 65 20 41  arch");...case A
0840: 50 50 46 53 5f 4f 53 5f 4c 49 4e 55 58 3a 0a 09  PPFS_OS_LINUX:..
0850: 09 09 72 65 74 75 72 6e 28 22 6c 69 6e 75 78 22  ..return("linux"
0860: 29 3b 0a 09 09 63 61 73 65 20 41 50 50 46 53 5f  );...case APPFS_
0870: 4f 53 5f 4d 41 43 4f 53 58 3a 0a 09 09 09 72 65  OS_MACOSX:....re
0880: 74 75 72 6e 28 22 6d 61 63 6f 73 78 22 29 3b 0a  turn("macosx");.
0890: 09 09 63 61 73 65 20 41 50 50 46 53 5f 4f 53 5f  ..case APPFS_OS_
08a0: 46 52 45 45 42 53 44 3a 0a 09 09 09 72 65 74 75  FREEBSD:....retu
08b0: 72 6e 28 22 66 72 65 65 62 73 64 22 29 3b 0a 09  rn("freebsd");..
08c0: 09 63 61 73 65 20 41 50 50 46 53 5f 4f 53 5f 4f  .case APPFS_OS_O
08d0: 50 45 4e 42 53 44 3a 0a 09 09 09 72 65 74 75 72  PENBSD:....retur
08e0: 6e 28 22 6f 70 65 6e 62 73 64 22 29 3b 0a 09 09  n("openbsd");...
08f0: 63 61 73 65 20 41 50 50 46 53 5f 4f 53 5f 53 4f  case APPFS_OS_SO
0900: 4c 41 52 49 53 3a 0a 09 09 09 72 65 74 75 72 6e  LARIS:....return
0910: 28 22 66 72 65 65 62 73 64 22 29 3b 0a 09 09 63  ("freebsd");...c
0920: 61 73 65 20 41 50 50 46 53 5f 43 50 55 5f 55 4e  ase APPFS_CPU_UN
0930: 4b 4e 4f 57 4e 3a 0a 09 09 09 72 65 74 75 72 6e  KNOWN:....return
0940: 28 22 75 6e 6b 6e 6f 77 6e 22 29 3b 0a 09 7d 0a  ("unknown");..}.
0950: 0a 09 72 65 74 75 72 6e 28 22 75 6e 6b 6e 6f 77  ..return("unknow
0960: 6e 22 29 3b 0a 7d 0a 0a 73 74 61 74 69 63 20 61  n");.}..static a
0970: 70 70 66 73 5f 63 70 75 41 72 63 68 5f 74 20 61  ppfs_cpuArch_t a
0980: 70 70 66 73 5f 63 6f 6e 76 65 72 74 5f 63 70 75  ppfs_convert_cpu
0990: 41 72 63 68 5f 66 72 6f 6d 53 74 72 69 6e 67 28  Arch_fromString(
09a0: 63 6f 6e 73 74 20 63 68 61 72 20 2a 63 70 75 29  const char *cpu)
09b0: 20 7b 0a 09 69 66 20 28 73 74 72 63 61 73 65 63   {..if (strcasec
09c0: 6d 70 28 63 70 75 2c 20 22 61 6d 64 36 34 22 29  mp(cpu, "amd64")
09d0: 20 3d 3d 20 30 20 7c 7c 20 73 74 72 63 61 73 65   == 0 || strcase
09e0: 63 6d 70 28 63 70 75 2c 20 22 78 38 36 5f 36 34  cmp(cpu, "x86_64
09f0: 22 29 20 3d 3d 20 30 29 20 7b 0a 09 09 72 65 74  ") == 0) {...ret
0a00: 75 72 6e 28 41 50 50 46 53 5f 43 50 55 5f 41 4d  urn(APPFS_CPU_AM
0a10: 44 36 34 29 3b 0a 09 7d 0a 0a 09 69 66 20 28 73  D64);..}...if (s
0a20: 74 72 63 61 73 65 63 6d 70 28 63 70 75 2c 20 22  trcasecmp(cpu, "
0a30: 69 33 38 36 22 29 20 3d 3d 20 30 20 7c 7c 20 5c  i386") == 0 || \
0a40: 0a 09 20 20 20 20 73 74 72 63 61 73 65 63 6d 70  ..    strcasecmp
0a50: 28 63 70 75 2c 20 22 69 34 38 36 22 29 20 3d 3d  (cpu, "i486") ==
0a60: 20 30 20 7c 7c 20 5c 0a 09 20 20 20 20 73 74 72   0 || \..    str
0a70: 63 61 73 65 63 6d 70 28 63 70 75 2c 20 22 69 35  casecmp(cpu, "i5
0a80: 38 36 22 29 20 3d 3d 20 30 20 7c 7c 20 5c 0a 09  86") == 0 || \..
0a90: 20 20 20 20 73 74 72 63 61 73 65 63 6d 70 28 63      strcasecmp(c
0aa0: 70 75 2c 20 22 69 36 38 36 22 29 20 3d 3d 20 30  pu, "i686") == 0
0ab0: 20 7c 7c 20 5c 0a 09 20 20 20 20 73 74 72 63 61   || \..    strca
0ac0: 73 65 63 6d 70 28 63 70 75 2c 20 22 69 78 38 36  secmp(cpu, "ix86
0ad0: 22 29 20 3d 3d 20 30 29 20 7b 0a 09 09 72 65 74  ") == 0) {...ret
0ae0: 75 72 6e 28 41 50 50 46 53 5f 43 50 55 5f 49 33  urn(APPFS_CPU_I3
0af0: 38 36 29 3b 0a 09 7d 0a 0a 09 69 66 20 28 73 74  86);..}...if (st
0b00: 72 63 61 73 65 63 6d 70 28 63 70 75 2c 20 22 61  rcasecmp(cpu, "a
0b10: 72 6d 22 29 20 3d 3d 20 30 29 20 7b 0a 09 09 72  rm") == 0) {...r
0b20: 65 74 75 72 6e 28 41 50 50 46 53 5f 43 50 55 5f  eturn(APPFS_CPU_
0b30: 41 52 4d 29 3b 0a 09 7d 0a 0a 09 69 66 20 28 73  ARM);..}...if (s
0b40: 74 72 63 61 73 65 63 6d 70 28 63 70 75 2c 20 22  trcasecmp(cpu, "
0b50: 6e 6f 61 72 63 68 22 29 20 3d 3d 20 30 29 20 7b  noarch") == 0) {
0b60: 0a 09 09 72 65 74 75 72 6e 28 41 50 50 46 53 5f  ...return(APPFS_
0b70: 43 50 55 5f 41 4c 4c 29 3b 0a 09 7d 0a 0a 09 72  CPU_ALL);..}...r
0b80: 65 74 75 72 6e 28 41 50 50 46 53 5f 43 50 55 5f  eturn(APPFS_CPU_
0b90: 55 4e 4b 4e 4f 57 4e 29 3b 0a 7d 0a 0a 73 74 61  UNKNOWN);.}..sta
0ba0: 74 69 63 20 63 6f 6e 73 74 20 63 68 61 72 20 2a  tic const char *
0bb0: 61 70 70 66 73 5f 63 6f 6e 76 65 72 74 5f 63 70  appfs_convert_cp
0bc0: 75 41 72 63 68 5f 74 6f 53 74 72 69 6e 67 28 61  uArch_toString(a
0bd0: 70 70 66 73 5f 63 70 75 41 72 63 68 5f 74 20 63  ppfs_cpuArch_t c
0be0: 70 75 29 20 7b 0a 09 73 77 69 74 63 68 20 28 63  pu) {..switch (c
0bf0: 70 75 29 20 7b 0a 09 09 63 61 73 65 20 41 50 50  pu) {...case APP
0c00: 46 53 5f 43 50 55 5f 41 4c 4c 3a 0a 09 09 09 72  FS_CPU_ALL:....r
0c10: 65 74 75 72 6e 28 22 6e 6f 61 72 63 68 22 29 3b  eturn("noarch");
0c20: 0a 09 09 63 61 73 65 20 41 50 50 46 53 5f 43 50  ...case APPFS_CP
0c30: 55 5f 41 4d 44 36 34 3a 0a 09 09 09 72 65 74 75  U_AMD64:....retu
0c40: 72 6e 28 22 61 6d 64 36 34 22 29 3b 0a 09 09 63  rn("amd64");...c
0c50: 61 73 65 20 41 50 50 46 53 5f 43 50 55 5f 49 33  ase APPFS_CPU_I3
0c60: 38 36 3a 0a 09 09 09 72 65 74 75 72 6e 28 22 69  86:....return("i
0c70: 78 38 36 22 29 3b 0a 09 09 63 61 73 65 20 41 50  x86");...case AP
0c80: 50 46 53 5f 43 50 55 5f 41 52 4d 3a 0a 09 09 09  PFS_CPU_ARM:....
0c90: 72 65 74 75 72 6e 28 22 61 72 6d 22 29 3b 0a 09  return("arm");..
0ca0: 09 63 61 73 65 20 41 50 50 46 53 5f 43 50 55 5f  .case APPFS_CPU_
0cb0: 55 4e 4b 4e 4f 57 4e 3a 0a 09 09 09 72 65 74 75  UNKNOWN:....retu
0cc0: 72 6e 28 22 75 6e 6b 6e 6f 77 6e 22 29 3b 0a 09  rn("unknown");..
0cd0: 7d 0a 0a 09 72 65 74 75 72 6e 28 22 75 6e 6b 6e  }...return("unkn
0ce0: 6f 77 6e 22 29 3b 0a 7d 0a 0a 73 74 61 74 69 63  own");.}..static
0cf0: 20 54 63 6c 5f 49 6e 74 65 72 70 20 2a 61 70 70   Tcl_Interp *app
0d00: 66 73 5f 63 72 65 61 74 65 5f 54 63 6c 49 6e 74  fs_create_TclInt
0d10: 65 72 70 28 63 6f 6e 73 74 20 63 68 61 72 20 2a  erp(const char *
0d20: 63 61 63 68 65 64 69 72 29 20 7b 0a 09 54 63 6c  cachedir) {..Tcl
0d30: 5f 49 6e 74 65 72 70 20 2a 69 6e 74 65 72 70 3b  _Interp *interp;
0d40: 0a 09 69 6e 74 20 74 63 6c 5f 72 65 74 3b 0a 0a  ..int tcl_ret;..
0d50: 09 69 6e 74 65 72 70 20 3d 20 54 63 6c 5f 43 72  .interp = Tcl_Cr
0d60: 65 61 74 65 49 6e 74 65 72 70 28 29 3b 0a 09 69  eateInterp();..i
0d70: 66 20 28 69 6e 74 65 72 70 20 3d 3d 20 4e 55 4c  f (interp == NUL
0d80: 4c 29 20 7b 0a 09 09 66 70 72 69 6e 74 66 28 73  L) {...fprintf(s
0d90: 74 64 65 72 72 2c 20 22 55 6e 61 62 6c 65 20 74  tderr, "Unable t
0da0: 6f 20 63 72 65 61 74 65 20 54 63 6c 20 49 6e 74  o create Tcl Int
0db0: 65 72 70 72 65 74 65 72 2e 20 20 41 62 6f 72 74  erpreter.  Abort
0dc0: 69 6e 67 2e 5c 6e 22 29 3b 0a 0a 09 09 72 65 74  ing.\n");....ret
0dd0: 75 72 6e 28 4e 55 4c 4c 29 3b 0a 09 7d 0a 0a 09  urn(NULL);..}...
0de0: 74 63 6c 5f 72 65 74 20 3d 20 54 63 6c 5f 49 6e  tcl_ret = Tcl_In
0df0: 69 74 28 69 6e 74 65 72 70 29 3b 0a 09 69 66 20  it(interp);..if
0e00: 28 74 63 6c 5f 72 65 74 20 21 3d 20 54 43 4c 5f  (tcl_ret != TCL_
0e10: 4f 4b 29 20 7b 0a 09 09 66 70 72 69 6e 74 66 28  OK) {...fprintf(
0e20: 73 74 64 65 72 72 2c 20 22 55 6e 61 62 6c 65 20  stderr, "Unable
0e30: 74 6f 20 69 6e 69 74 69 61 6c 69 7a 65 20 54 63  to initialize Tc
0e40: 6c 2e 20 20 41 62 6f 72 74 69 6e 67 2e 5c 6e 22  l.  Aborting.\n"
0e50: 29 3b 0a 0a 09 09 72 65 74 75 72 6e 28 4e 55 4c  );....return(NUL
0e60: 4c 29 3b 0a 09 7d 0a 0a 09 74 63 6c 5f 72 65 74  L);..}...tcl_ret
0e70: 20 3d 20 54 63 6c 5f 45 76 61 6c 28 69 6e 74 65   = Tcl_Eval(inte
0e80: 72 70 2c 20 22 22 0a 23 69 6e 63 6c 75 64 65 20  rp, "".#include
0e90: 22 61 70 70 66 73 2e 74 63 6c 2e 68 22 0a 09 22  "appfs.tcl.h".."
0ea0: 22 29 3b 0a 09 69 66 20 28 74 63 6c 5f 72 65 74  ");..if (tcl_ret
0eb0: 20 21 3d 20 54 43 4c 5f 4f 4b 29 20 7b 0a 09 09   != TCL_OK) {...
0ec0: 66 70 72 69 6e 74 66 28 73 74 64 65 72 72 2c 20  fprintf(stderr,
0ed0: 22 55 6e 61 62 6c 65 20 74 6f 20 69 6e 69 74 69  "Unable to initi
0ee0: 61 6c 69 7a 65 20 54 63 6c 20 41 70 70 46 53 20  alize Tcl AppFS
0ef0: 73 63 72 69 70 74 2e 20 20 41 62 6f 72 74 69 6e  script.  Abortin
0f00: 67 2e 5c 6e 22 29 3b 0a 09 09 66 70 72 69 6e 74  g.\n");...fprint
0f10: 66 28 73 74 64 65 72 72 2c 20 22 54 63 6c 20 45  f(stderr, "Tcl E
0f20: 72 72 6f 72 20 69 73 3a 20 25 73 5c 6e 22 2c 20  rror is: %s\n",
0f30: 54 63 6c 5f 47 65 74 53 74 72 69 6e 67 52 65 73  Tcl_GetStringRes
0f40: 75 6c 74 28 69 6e 74 65 72 70 29 29 3b 0a 0a 09  ult(interp));...
0f50: 09 72 65 74 75 72 6e 28 4e 55 4c 4c 29 3b 0a 09  .return(NULL);..
0f60: 7d 0a 0a 09 69 66 20 28 54 63 6c 5f 53 65 74 56  }...if (Tcl_SetV
0f70: 61 72 28 69 6e 74 65 72 70 2c 20 22 3a 3a 61 70  ar(interp, "::ap
0f80: 70 66 73 3a 3a 63 61 63 68 65 64 69 72 22 2c 20  pfs::cachedir",
0f90: 63 61 63 68 65 64 69 72 2c 20 54 43 4c 5f 47 4c  cachedir, TCL_GL
0fa0: 4f 42 41 4c 5f 4f 4e 4c 59 29 20 3d 3d 20 4e 55  OBAL_ONLY) == NU
0fb0: 4c 4c 29 20 7b 0a 09 09 66 70 72 69 6e 74 66 28  LL) {...fprintf(
0fc0: 73 74 64 65 72 72 2c 20 22 55 6e 61 62 6c 65 20  stderr, "Unable
0fd0: 74 6f 20 73 65 74 20 63 61 63 68 65 20 64 69 72  to set cache dir
0fe0: 65 63 74 6f 72 79 2e 20 20 54 68 69 73 20 73 68  ectory.  This sh
0ff0: 6f 75 6c 64 20 6e 65 76 65 72 20 66 61 69 6c 2e  ould never fail.
1000: 5c 6e 22 29 3b 0a 0a 09 09 72 65 74 75 72 6e 28  \n");....return(
1010: 4e 55 4c 4c 29 3b 0a 09 7d 0a 0a 09 74 63 6c 5f  NULL);..}...tcl_
1020: 72 65 74 20 3d 20 54 63 6c 5f 45 76 61 6c 28 69  ret = Tcl_Eval(i
1030: 6e 74 65 72 70 2c 20 22 3a 3a 61 70 70 66 73 3a  nterp, "::appfs:
1040: 3a 69 6e 69 74 22 29 3b 0a 09 69 66 20 28 74 63  :init");..if (tc
1050: 6c 5f 72 65 74 20 21 3d 20 54 43 4c 5f 4f 4b 29  l_ret != TCL_OK)
1060: 20 7b 0a 09 09 66 70 72 69 6e 74 66 28 73 74 64   {...fprintf(std
1070: 65 72 72 2c 20 22 55 6e 61 62 6c 65 20 74 6f 20  err, "Unable to
1080: 69 6e 69 74 69 61 6c 69 7a 65 20 54 63 6c 20 41  initialize Tcl A
1090: 70 70 46 53 20 73 63 72 69 70 74 20 28 3a 3a 61  ppFS script (::a
10a0: 70 70 66 73 3a 3a 69 6e 69 74 29 2e 20 20 41 62  ppfs::init).  Ab
10b0: 6f 72 74 69 6e 67 2e 5c 6e 22 29 3b 0a 09 09 66  orting.\n");...f
10c0: 70 72 69 6e 74 66 28 73 74 64 65 72 72 2c 20 22  printf(stderr, "
10d0: 54 63 6c 20 45 72 72 6f 72 20 69 73 3a 20 25 73  Tcl Error is: %s
10e0: 5c 6e 22 2c 20 54 63 6c 5f 47 65 74 53 74 72 69  \n", Tcl_GetStri
10f0: 6e 67 52 65 73 75 6c 74 28 69 6e 74 65 72 70 29  ngResult(interp)
1100: 29 3b 0a 0a 09 09 72 65 74 75 72 6e 28 4e 55 4c  );....return(NUL
1110: 4c 29 3b 0a 09 7d 0a 0a 09 72 65 74 75 72 6e 28  L);..}...return(
1120: 69 6e 74 65 72 70 29 3b 0a 7d 0a 0a 73 74 61 74  interp);.}..stat
1130: 69 63 20 69 6e 74 20 61 70 70 66 73 5f 54 63 6c  ic int appfs_Tcl
1140: 5f 45 76 61 6c 28 54 63 6c 5f 49 6e 74 65 72 70  _Eval(Tcl_Interp
1150: 20 2a 69 6e 74 65 72 70 2c 20 69 6e 74 20 6f 62   *interp, int ob
1160: 6a 63 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a  jc, const char *
1170: 63 6d 64 2c 20 2e 2e 2e 29 20 7b 0a 09 54 63 6c  cmd, ...) {..Tcl
1180: 5f 4f 62 6a 20 2a 2a 6f 62 6a 76 3b 0a 09 63 6f  _Obj **objv;..co
1190: 6e 73 74 20 63 68 61 72 20 2a 61 72 67 3b 0a 09  nst char *arg;..
11a0: 76 61 5f 6c 69 73 74 20 61 72 67 70 3b 0a 09 69  va_list argp;..i
11b0: 6e 74 20 72 65 74 76 61 6c 3b 0a 09 69 6e 74 20  nt retval;..int
11c0: 69 3b 0a 0a 09 6f 62 6a 76 20 3d 20 28 76 6f 69  i;...objv = (voi
11d0: 64 20 2a 29 20 63 6b 61 6c 6c 6f 63 28 73 69 7a  d *) ckalloc(siz
11e0: 65 6f 66 28 2a 6f 62 6a 76 29 20 2a 20 6f 62 6a  eof(*objv) * obj
11f0: 63 29 3b 0a 09 6f 62 6a 76 5b 30 5d 20 3d 20 54  c);..objv[0] = T
1200: 63 6c 5f 4e 65 77 53 74 72 69 6e 67 4f 62 6a 28  cl_NewStringObj(
1210: 63 6d 64 2c 20 2d 31 29 3b 0a 09 54 63 6c 5f 49  cmd, -1);..Tcl_I
1220: 6e 63 72 52 65 66 43 6f 75 6e 74 28 6f 62 6a 76  ncrRefCount(objv
1230: 5b 30 5d 29 3b 0a 0a 09 76 61 5f 73 74 61 72 74  [0]);...va_start
1240: 28 61 72 67 70 2c 20 63 6d 64 29 3b 0a 09 66 6f  (argp, cmd);..fo
1250: 72 20 28 69 20 3d 20 31 3b 20 69 20 3c 20 6f 62  r (i = 1; i < ob
1260: 6a 63 3b 20 69 2b 2b 29 20 7b 0a 09 09 61 72 67  jc; i++) {...arg
1270: 20 3d 20 76 61 5f 61 72 67 28 61 72 67 70 2c 20   = va_arg(argp,
1280: 63 6f 6e 73 74 20 63 68 61 72 20 2a 29 3b 0a 09  const char *);..
1290: 09 6f 62 6a 76 5b 69 5d 20 3d 20 54 63 6c 5f 4e  .objv[i] = Tcl_N
12a0: 65 77 53 74 72 69 6e 67 4f 62 6a 28 61 72 67 2c  ewStringObj(arg,
12b0: 20 2d 31 29 3b 0a 09 09 54 63 6c 5f 49 6e 63 72   -1);...Tcl_Incr
12c0: 52 65 66 43 6f 75 6e 74 28 6f 62 6a 76 5b 69 5d  RefCount(objv[i]
12d0: 29 3b 0a 09 7d 0a 09 76 61 5f 65 6e 64 28 61 72  );..}..va_end(ar
12e0: 67 70 29 3b 0a 0a 09 72 65 74 76 61 6c 20 3d 20  gp);...retval =
12f0: 54 63 6c 5f 45 76 61 6c 4f 62 6a 76 28 69 6e 74  Tcl_EvalObjv(int
1300: 65 72 70 2c 20 6f 62 6a 63 2c 20 6f 62 6a 76 2c  erp, objc, objv,
1310: 20 30 29 3b 0a 0a 09 66 6f 72 20 28 69 20 3d 20   0);...for (i =
1320: 30 3b 20 69 20 3c 20 6f 62 6a 63 3b 20 69 2b 2b  0; i < objc; i++
1330: 29 20 7b 0a 09 09 54 63 6c 5f 44 65 63 72 52 65  ) {...Tcl_DecrRe
1340: 66 43 6f 75 6e 74 28 6f 62 6a 76 5b 69 5d 29 3b  fCount(objv[i]);
1350: 0a 09 7d 0a 0a 09 63 6b 66 72 65 65 28 28 76 6f  ..}...ckfree((vo
1360: 69 64 20 2a 29 20 6f 62 6a 76 29 3b 0a 0a 09 69  id *) objv);...i
1370: 66 20 28 72 65 74 76 61 6c 20 21 3d 20 54 43 4c  f (retval != TCL
1380: 5f 4f 4b 29 20 7b 0a 09 09 41 50 50 46 53 5f 44  _OK) {...APPFS_D
1390: 45 42 55 47 28 22 54 63 6c 20 63 6f 6d 6d 61 6e  EBUG("Tcl comman
13a0: 64 20 66 61 69 6c 65 64 2c 20 3a 3a 65 72 72 6f  d failed, ::erro
13b0: 72 49 6e 66 6f 20 63 6f 6e 74 61 69 6e 73 3a 20  rInfo contains:
13c0: 25 73 5c 6e 22 2c 20 54 63 6c 5f 47 65 74 56 61  %s\n", Tcl_GetVa
13d0: 72 28 69 6e 74 65 72 70 2c 20 22 3a 3a 65 72 72  r(interp, "::err
13e0: 6f 72 49 6e 66 6f 22 2c 20 30 29 29 3b 0a 09 7d  orInfo", 0));..}
13f0: 0a 0a 09 72 65 74 75 72 6e 28 72 65 74 76 61 6c  ...return(retval
1400: 29 3b 0a 7d 0a 0a 73 74 61 74 69 63 20 76 6f 69  );.}..static voi
1410: 64 20 61 70 70 66 73 5f 75 70 64 61 74 65 5f 69  d appfs_update_i
1420: 6e 64 65 78 28 63 6f 6e 73 74 20 63 68 61 72 20  ndex(const char
1430: 2a 68 6f 73 74 6e 61 6d 65 29 20 7b 0a 09 54 63  *hostname) {..Tc
1440: 6c 5f 49 6e 74 65 72 70 20 2a 69 6e 74 65 72 70  l_Interp *interp
1450: 3b 0a 09 69 6e 74 20 74 63 6c 5f 72 65 74 3b 0a  ;..int tcl_ret;.
1460: 0a 09 41 50 50 46 53 5f 44 45 42 55 47 28 22 45  ..APPFS_DEBUG("E
1470: 6e 74 65 72 3a 20 68 6f 73 74 6e 61 6d 65 20 3d  nter: hostname =
1480: 20 25 73 22 2c 20 68 6f 73 74 6e 61 6d 65 29 3b   %s", hostname);
1490: 0a 0a 09 69 6e 74 65 72 70 20 3d 20 70 74 68 72  ...interp = pthr
14a0: 65 61 64 5f 67 65 74 73 70 65 63 69 66 69 63 28  ead_getspecific(
14b0: 69 6e 74 65 72 70 4b 65 79 29 3b 0a 09 69 66 20  interpKey);..if
14c0: 28 69 6e 74 65 72 70 20 3d 3d 20 4e 55 4c 4c 29  (interp == NULL)
14d0: 20 7b 0a 09 09 69 6e 74 65 72 70 20 3d 20 61 70   {...interp = ap
14e0: 70 66 73 5f 63 72 65 61 74 65 5f 54 63 6c 49 6e  pfs_create_TclIn
14f0: 74 65 72 70 28 67 6c 6f 62 61 6c 54 68 72 65 61  terp(globalThrea
1500: 64 2e 63 61 63 68 65 64 69 72 29 3b 0a 0a 09 09  d.cachedir);....
1510: 70 74 68 72 65 61 64 5f 73 65 74 73 70 65 63 69  pthread_setspeci
1520: 66 69 63 28 69 6e 74 65 72 70 4b 65 79 2c 20 69  fic(interpKey, i
1530: 6e 74 65 72 70 29 3b 0a 09 7d 0a 0a 09 74 63 6c  nterp);..}...tcl
1540: 5f 72 65 74 20 3d 20 61 70 70 66 73 5f 54 63 6c  _ret = appfs_Tcl
1550: 5f 45 76 61 6c 28 69 6e 74 65 72 70 2c 20 32 2c  _Eval(interp, 2,
1560: 20 22 3a 3a 61 70 70 66 73 3a 3a 67 65 74 69 6e   "::appfs::getin
1570: 64 65 78 22 2c 20 68 6f 73 74 6e 61 6d 65 29 3b  dex", hostname);
1580: 0a 09 69 66 20 28 74 63 6c 5f 72 65 74 20 21 3d  ..if (tcl_ret !=
1590: 20 54 43 4c 5f 4f 4b 29 20 7b 0a 09 09 41 50 50   TCL_OK) {...APP
15a0: 46 53 5f 44 45 42 55 47 28 22 43 61 6c 6c 20 74  FS_DEBUG("Call t
15b0: 6f 20 3a 3a 61 70 70 66 73 3a 3a 67 65 74 69 6e  o ::appfs::getin
15c0: 64 65 78 20 66 61 69 6c 65 64 3a 20 25 73 22 2c  dex failed: %s",
15d0: 20 54 63 6c 5f 47 65 74 53 74 72 69 6e 67 52 65   Tcl_GetStringRe
15e0: 73 75 6c 74 28 69 6e 74 65 72 70 29 29 3b 0a 0a  sult(interp));..
15f0: 09 09 72 65 74 75 72 6e 3b 0a 09 7d 0a 0a 09 72  ..return;..}...r
1600: 65 74 75 72 6e 3b 0a 7d 0a 0a 73 74 61 74 69 63  eturn;.}..static
1610: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 61 70 70   const char *app
1620: 66 73 5f 67 65 74 66 69 6c 65 28 63 6f 6e 73 74  fs_getfile(const
1630: 20 63 68 61 72 20 2a 68 6f 73 74 6e 61 6d 65 2c   char *hostname,
1640: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 73 68 61   const char *sha
1650: 31 29 20 7b 0a 09 54 63 6c 5f 49 6e 74 65 72 70  1) {..Tcl_Interp
1660: 20 2a 69 6e 74 65 72 70 3b 0a 09 63 68 61 72 20   *interp;..char
1670: 2a 72 65 74 76 61 6c 3b 0a 09 69 6e 74 20 74 63  *retval;..int tc
1680: 6c 5f 72 65 74 3b 0a 0a 09 69 6e 74 65 72 70 20  l_ret;...interp
1690: 3d 20 70 74 68 72 65 61 64 5f 67 65 74 73 70 65  = pthread_getspe
16a0: 63 69 66 69 63 28 69 6e 74 65 72 70 4b 65 79 29  cific(interpKey)
16b0: 3b 0a 09 69 66 20 28 69 6e 74 65 72 70 20 3d 3d  ;..if (interp ==
16c0: 20 4e 55 4c 4c 29 20 7b 0a 09 09 69 6e 74 65 72   NULL) {...inter
16d0: 70 20 3d 20 61 70 70 66 73 5f 63 72 65 61 74 65  p = appfs_create
16e0: 5f 54 63 6c 49 6e 74 65 72 70 28 67 6c 6f 62 61  _TclInterp(globa
16f0: 6c 54 68 72 65 61 64 2e 63 61 63 68 65 64 69 72  lThread.cachedir
1700: 29 3b 0a 0a 09 09 70 74 68 72 65 61 64 5f 73 65  );....pthread_se
1710: 74 73 70 65 63 69 66 69 63 28 69 6e 74 65 72 70  tspecific(interp
1720: 4b 65 79 2c 20 69 6e 74 65 72 70 29 3b 0a 09 7d  Key, interp);..}
1730: 0a 0a 09 74 63 6c 5f 72 65 74 20 3d 20 61 70 70  ...tcl_ret = app
1740: 66 73 5f 54 63 6c 5f 45 76 61 6c 28 69 6e 74 65  fs_Tcl_Eval(inte
1750: 72 70 2c 20 33 2c 20 22 3a 3a 61 70 70 66 73 3a  rp, 3, "::appfs:
1760: 3a 64 6f 77 6e 6c 6f 61 64 22 2c 20 68 6f 73 74  :download", host
1770: 6e 61 6d 65 2c 20 73 68 61 31 29 3b 0a 09 69 66  name, sha1);..if
1780: 20 28 74 63 6c 5f 72 65 74 20 21 3d 20 54 43 4c   (tcl_ret != TCL
1790: 5f 4f 4b 29 20 7b 0a 09 09 41 50 50 46 53 5f 44  _OK) {...APPFS_D
17a0: 45 42 55 47 28 22 43 61 6c 6c 20 74 6f 20 3a 3a  EBUG("Call to ::
17b0: 61 70 70 66 73 3a 3a 64 6f 77 6e 6c 6f 61 64 20  appfs::download
17c0: 66 61 69 6c 65 64 3a 20 25 73 22 2c 20 54 63 6c  failed: %s", Tcl
17d0: 5f 47 65 74 53 74 72 69 6e 67 52 65 73 75 6c 74  _GetStringResult
17e0: 28 69 6e 74 65 72 70 29 29 3b 0a 0a 09 09 72 65  (interp));....re
17f0: 74 75 72 6e 28 4e 55 4c 4c 29 3b 0a 09 7d 0a 0a  turn(NULL);..}..
1800: 09 72 65 74 76 61 6c 20 3d 20 73 74 72 64 75 70  .retval = strdup
1810: 28 54 63 6c 5f 47 65 74 53 74 72 69 6e 67 52 65  (Tcl_GetStringRe
1820: 73 75 6c 74 28 69 6e 74 65 72 70 29 29 3b 0a 0a  sult(interp));..
1830: 09 72 65 74 75 72 6e 28 72 65 74 76 61 6c 29 3b  .return(retval);
1840: 0a 7d 0a 0a 73 74 61 74 69 63 20 76 6f 69 64 20  .}..static void
1850: 61 70 70 66 73 5f 75 70 64 61 74 65 5f 6d 61 6e  appfs_update_man
1860: 69 66 65 73 74 28 63 6f 6e 73 74 20 63 68 61 72  ifest(const char
1870: 20 2a 68 6f 73 74 6e 61 6d 65 2c 20 63 6f 6e 73   *hostname, cons
1880: 74 20 63 68 61 72 20 2a 73 68 61 31 29 20 7b 0a  t char *sha1) {.
1890: 09 54 63 6c 5f 49 6e 74 65 72 70 20 2a 69 6e 74  .Tcl_Interp *int
18a0: 65 72 70 3b 0a 09 69 6e 74 20 74 63 6c 5f 72 65  erp;..int tcl_re
18b0: 74 3b 0a 0a 09 69 6e 74 65 72 70 20 3d 20 70 74  t;...interp = pt
18c0: 68 72 65 61 64 5f 67 65 74 73 70 65 63 69 66 69  hread_getspecifi
18d0: 63 28 69 6e 74 65 72 70 4b 65 79 29 3b 0a 09 69  c(interpKey);..i
18e0: 66 20 28 69 6e 74 65 72 70 20 3d 3d 20 4e 55 4c  f (interp == NUL
18f0: 4c 29 20 7b 0a 09 09 69 6e 74 65 72 70 20 3d 20  L) {...interp =
1900: 61 70 70 66 73 5f 63 72 65 61 74 65 5f 54 63 6c  appfs_create_Tcl
1910: 49 6e 74 65 72 70 28 67 6c 6f 62 61 6c 54 68 72  Interp(globalThr
1920: 65 61 64 2e 63 61 63 68 65 64 69 72 29 3b 0a 0a  ead.cachedir);..
1930: 09 09 70 74 68 72 65 61 64 5f 73 65 74 73 70 65  ..pthread_setspe
1940: 63 69 66 69 63 28 69 6e 74 65 72 70 4b 65 79 2c  cific(interpKey,
1950: 20 69 6e 74 65 72 70 29 3b 0a 09 7d 0a 0a 09 74   interp);..}...t
1960: 63 6c 5f 72 65 74 20 3d 20 61 70 70 66 73 5f 54  cl_ret = appfs_T
1970: 63 6c 5f 45 76 61 6c 28 69 6e 74 65 72 70 2c 20  cl_Eval(interp,
1980: 33 2c 20 22 3a 3a 61 70 70 66 73 3a 3a 67 65 74  3, "::appfs::get
1990: 70 6b 67 6d 61 6e 69 66 65 73 74 22 2c 20 68 6f  pkgmanifest", ho
19a0: 73 74 6e 61 6d 65 2c 20 73 68 61 31 29 3b 0a 09  stname, sha1);..
19b0: 69 66 20 28 74 63 6c 5f 72 65 74 20 21 3d 20 54  if (tcl_ret != T
19c0: 43 4c 5f 4f 4b 29 20 7b 0a 09 09 41 50 50 46 53  CL_OK) {...APPFS
19d0: 5f 44 45 42 55 47 28 22 43 61 6c 6c 20 74 6f 20  _DEBUG("Call to
19e0: 3a 3a 61 70 70 66 73 3a 3a 67 65 74 70 6b 67 6d  ::appfs::getpkgm
19f0: 61 6e 69 66 65 73 74 20 66 61 69 6c 65 64 3a 20  anifest failed:
1a00: 25 73 22 2c 20 54 63 6c 5f 47 65 74 53 74 72 69  %s", Tcl_GetStri
1a10: 6e 67 52 65 73 75 6c 74 28 69 6e 74 65 72 70 29  ngResult(interp)
1a20: 29 3b 0a 0a 09 09 72 65 74 75 72 6e 3b 0a 09 7d  );....return;..}
1a30: 0a 0a 09 72 65 74 75 72 6e 3b 0a 7d 0a 0a 0a 23  ...return;.}...#
1a40: 64 65 66 69 6e 65 20 61 70 70 66 73 5f 66 72 65  define appfs_fre
1a50: 65 5f 6c 69 73 74 5f 74 79 70 65 28 69 64 2c 20  e_list_type(id,
1a60: 74 79 70 65 29 20 73 74 61 74 69 63 20 76 6f 69  type) static voi
1a70: 64 20 61 70 70 66 73 5f 66 72 65 65 5f 6c 69 73  d appfs_free_lis
1a80: 74 5f 20 23 23 20 69 64 28 74 79 70 65 20 2a 68  t_ ## id(type *h
1a90: 65 61 64 29 20 7b 20 5c 0a 09 74 79 70 65 20 2a  ead) { \..type *
1aa0: 6f 62 6a 2c 20 2a 6e 65 78 74 3b 20 5c 0a 09 66  obj, *next; \..f
1ab0: 6f 72 20 28 6f 62 6a 20 3d 20 68 65 61 64 3b 20  or (obj = head;
1ac0: 6f 62 6a 3b 20 6f 62 6a 20 3d 20 6e 65 78 74 29  obj; obj = next)
1ad0: 20 7b 20 5c 0a 09 09 6e 65 78 74 20 3d 20 6f 62   { \...next = ob
1ae0: 6a 2d 3e 5f 6e 65 78 74 3b 20 5c 0a 09 09 63 6b  j->_next; \...ck
1af0: 66 72 65 65 28 28 76 6f 69 64 20 2a 29 20 6f 62  free((void *) ob
1b00: 6a 29 3b 20 5c 0a 09 7d 20 5c 0a 7d 0a 0a 61 70  j); \..} \.}..ap
1b10: 70 66 73 5f 66 72 65 65 5f 6c 69 73 74 5f 74 79  pfs_free_list_ty
1b20: 70 65 28 73 69 74 65 2c 20 73 74 72 75 63 74 20  pe(site, struct
1b30: 61 70 70 66 73 5f 73 69 74 65 29 0a 61 70 70 66  appfs_site).appf
1b40: 73 5f 66 72 65 65 5f 6c 69 73 74 5f 74 79 70 65  s_free_list_type
1b50: 28 70 61 63 6b 61 67 65 2c 20 73 74 72 75 63 74  (package, struct
1b60: 20 61 70 70 66 73 5f 70 61 63 6b 61 67 65 29 0a   appfs_package).
1b70: 61 70 70 66 73 5f 66 72 65 65 5f 6c 69 73 74 5f  appfs_free_list_
1b80: 74 79 70 65 28 63 68 69 6c 64 72 65 6e 2c 20 73  type(children, s
1b90: 74 72 75 63 74 20 61 70 70 66 73 5f 63 68 69 6c  truct appfs_chil
1ba0: 64 72 65 6e 29 0a 0a 73 74 61 74 69 63 20 69 6e  dren)..static in
1bb0: 74 20 61 70 70 66 73 5f 67 65 74 73 69 74 65 73  t appfs_getsites
1bc0: 5f 63 62 28 76 6f 69 64 20 2a 5f 68 65 61 64 2c  _cb(void *_head,
1bd0: 20 69 6e 74 20 63 6f 6c 75 6d 6e 73 2c 20 63 68   int columns, ch
1be0: 61 72 20 2a 2a 76 61 6c 75 65 73 2c 20 63 68 61  ar **values, cha
1bf0: 72 20 2a 2a 6e 61 6d 65 73 29 20 7b 0a 09 73 74  r **names) {..st
1c00: 72 75 63 74 20 61 70 70 66 73 5f 73 69 74 65 20  ruct appfs_site
1c10: 2a 2a 68 65 61 64 5f 70 2c 20 2a 6f 62 6a 3b 0a  **head_p, *obj;.
1c20: 0a 09 68 65 61 64 5f 70 20 3d 20 5f 68 65 61 64  ..head_p = _head
1c30: 3b 0a 0a 09 6f 62 6a 20 3d 20 28 76 6f 69 64 20  ;...obj = (void
1c40: 2a 29 20 63 6b 61 6c 6c 6f 63 28 73 69 7a 65 6f  *) ckalloc(sizeo
1c50: 66 28 2a 6f 62 6a 29 29 3b 0a 09 73 6e 70 72 69  f(*obj));..snpri
1c60: 6e 74 66 28 6f 62 6a 2d 3e 6e 61 6d 65 2c 20 73  ntf(obj->name, s
1c70: 69 7a 65 6f 66 28 6f 62 6a 2d 3e 6e 61 6d 65 29  izeof(obj->name)
1c80: 2c 20 22 25 73 22 2c 20 76 61 6c 75 65 73 5b 30  , "%s", values[0
1c90: 5d 29 3b 0a 0a 09 69 66 20 28 2a 68 65 61 64 5f  ]);...if (*head_
1ca0: 70 20 3d 3d 20 4e 55 4c 4c 29 20 7b 0a 09 09 6f  p == NULL) {...o
1cb0: 62 6a 2d 3e 63 6f 75 6e 74 65 72 20 3d 20 30 3b  bj->counter = 0;
1cc0: 0a 09 7d 20 65 6c 73 65 20 7b 0a 09 09 6f 62 6a  ..} else {...obj
1cd0: 2d 3e 63 6f 75 6e 74 65 72 20 3d 20 28 2a 68 65  ->counter = (*he
1ce0: 61 64 5f 70 29 2d 3e 63 6f 75 6e 74 65 72 20 2b  ad_p)->counter +
1cf0: 20 31 3b 0a 09 7d 0a 0a 09 6f 62 6a 2d 3e 5f 6e   1;..}...obj->_n
1d00: 65 78 74 20 3d 20 2a 68 65 61 64 5f 70 3b 0a 09  ext = *head_p;..
1d10: 2a 68 65 61 64 5f 70 20 3d 20 6f 62 6a 3b 0a 0a  *head_p = obj;..
1d20: 09 72 65 74 75 72 6e 28 30 29 3b 0a 7d 0a 0a 73  .return(0);.}..s
1d30: 74 61 74 69 63 20 73 74 72 75 63 74 20 61 70 70  tatic struct app
1d40: 66 73 5f 73 69 74 65 20 2a 61 70 70 66 73 5f 67  fs_site *appfs_g
1d50: 65 74 73 69 74 65 73 28 69 6e 74 20 2a 73 69 74  etsites(int *sit
1d60: 65 5f 63 6f 75 6e 74 5f 70 29 20 7b 0a 09 73 74  e_count_p) {..st
1d70: 72 75 63 74 20 61 70 70 66 73 5f 73 69 74 65 20  ruct appfs_site
1d80: 2a 68 65 61 64 20 3d 20 4e 55 4c 4c 3b 0a 09 69  *head = NULL;..i
1d90: 6e 74 20 73 71 6c 69 74 65 5f 72 65 74 3b 0a 0a  nt sqlite_ret;..
1da0: 09 69 66 20 28 73 69 74 65 5f 63 6f 75 6e 74 5f  .if (site_count_
1db0: 70 20 3d 3d 20 4e 55 4c 4c 29 20 7b 0a 09 09 72  p == NULL) {...r
1dc0: 65 74 75 72 6e 28 4e 55 4c 4c 29 3b 0a 09 7d 0a  eturn(NULL);..}.
1dd0: 0a 09 73 71 6c 69 74 65 5f 72 65 74 20 3d 20 73  ..sqlite_ret = s
1de0: 71 6c 69 74 65 33 5f 65 78 65 63 28 67 6c 6f 62  qlite3_exec(glob
1df0: 61 6c 54 68 72 65 61 64 2e 64 62 2c 20 22 53 45  alThread.db, "SE
1e00: 4c 45 43 54 20 44 49 53 54 49 4e 43 54 20 68 6f  LECT DISTINCT ho
1e10: 73 74 6e 61 6d 65 20 46 52 4f 4d 20 70 61 63 6b  stname FROM pack
1e20: 61 67 65 73 3b 22 2c 20 61 70 70 66 73 5f 67 65  ages;", appfs_ge
1e30: 74 73 69 74 65 73 5f 63 62 2c 20 26 68 65 61 64  tsites_cb, &head
1e40: 2c 20 4e 55 4c 4c 29 3b 0a 09 69 66 20 28 73 71  , NULL);..if (sq
1e50: 6c 69 74 65 5f 72 65 74 20 21 3d 20 53 51 4c 49  lite_ret != SQLI
1e60: 54 45 5f 4f 4b 29 20 7b 0a 09 09 41 50 50 46 53  TE_OK) {...APPFS
1e70: 5f 44 45 42 55 47 28 22 43 61 6c 6c 20 74 6f 20  _DEBUG("Call to
1e80: 73 71 6c 69 74 65 33 5f 65 78 65 63 20 66 61 69  sqlite3_exec fai
1e90: 6c 65 64 2e 22 29 3b 0a 0a 09 09 72 65 74 75 72  led.");....retur
1ea0: 6e 28 4e 55 4c 4c 29 3b 0a 09 7d 0a 0a 09 69 66  n(NULL);..}...if
1eb0: 20 28 68 65 61 64 20 21 3d 20 4e 55 4c 4c 29 20   (head != NULL)
1ec0: 7b 0a 09 09 2a 73 69 74 65 5f 63 6f 75 6e 74 5f  {...*site_count_
1ed0: 70 20 3d 20 68 65 61 64 2d 3e 63 6f 75 6e 74 65  p = head->counte
1ee0: 72 20 2b 20 31 3b 0a 09 7d 0a 0a 09 72 65 74 75  r + 1;..}...retu
1ef0: 72 6e 28 68 65 61 64 29 3b 0a 7d 0a 0a 73 74 61  rn(head);.}..sta
1f00: 74 69 63 20 69 6e 74 20 61 70 70 66 73 5f 67 65  tic int appfs_ge
1f10: 74 69 6e 64 65 78 5f 63 62 28 76 6f 69 64 20 2a  tindex_cb(void *
1f20: 5f 68 65 61 64 2c 20 69 6e 74 20 63 6f 6c 75 6d  _head, int colum
1f30: 6e 73 2c 20 63 68 61 72 20 2a 2a 76 61 6c 75 65  ns, char **value
1f40: 73 2c 20 63 68 61 72 20 2a 2a 6e 61 6d 65 73 29  s, char **names)
1f50: 20 7b 0a 09 73 74 72 75 63 74 20 61 70 70 66 73   {..struct appfs
1f60: 5f 70 61 63 6b 61 67 65 20 2a 2a 68 65 61 64 5f  _package **head_
1f70: 70 2c 20 2a 6f 62 6a 3b 0a 0a 09 68 65 61 64 5f  p, *obj;...head_
1f80: 70 20 3d 20 5f 68 65 61 64 3b 0a 0a 09 6f 62 6a  p = _head;...obj
1f90: 20 3d 20 28 76 6f 69 64 20 2a 29 20 63 6b 61 6c   = (void *) ckal
1fa0: 6c 6f 63 28 73 69 7a 65 6f 66 28 2a 6f 62 6a 29  loc(sizeof(*obj)
1fb0: 29 3b 0a 0a 09 73 6e 70 72 69 6e 74 66 28 6f 62  );...snprintf(ob
1fc0: 6a 2d 3e 6e 61 6d 65 2c 20 73 69 7a 65 6f 66 28  j->name, sizeof(
1fd0: 6f 62 6a 2d 3e 6e 61 6d 65 29 2c 20 22 25 73 22  obj->name), "%s"
1fe0: 2c 20 76 61 6c 75 65 73 5b 30 5d 29 3b 0a 09 73  , values[0]);..s
1ff0: 6e 70 72 69 6e 74 66 28 6f 62 6a 2d 3e 76 65 72  nprintf(obj->ver
2000: 73 69 6f 6e 2c 20 73 69 7a 65 6f 66 28 6f 62 6a  sion, sizeof(obj
2010: 2d 3e 76 65 72 73 69 6f 6e 29 2c 20 22 25 73 22  ->version), "%s"
2020: 2c 20 76 61 6c 75 65 73 5b 31 5d 29 3b 0a 09 73  , values[1]);..s
2030: 6e 70 72 69 6e 74 66 28 6f 62 6a 2d 3e 73 68 61  nprintf(obj->sha
2040: 31 2c 20 73 69 7a 65 6f 66 28 6f 62 6a 2d 3e 73  1, sizeof(obj->s
2050: 68 61 31 29 2c 20 22 25 73 22 2c 20 76 61 6c 75  ha1), "%s", valu
2060: 65 73 5b 32 5d 29 3b 0a 09 6f 62 6a 2d 3e 6f 73  es[2]);..obj->os
2070: 20 3d 20 61 70 70 66 73 5f 63 6f 6e 76 65 72 74   = appfs_convert
2080: 5f 6f 73 5f 66 72 6f 6d 53 74 72 69 6e 67 28 76  _os_fromString(v
2090: 61 6c 75 65 73 5b 33 5d 29 3b 0a 09 6f 62 6a 2d  alues[3]);..obj-
20a0: 3e 63 70 75 41 72 63 68 20 3d 20 61 70 70 66 73  >cpuArch = appfs
20b0: 5f 63 6f 6e 76 65 72 74 5f 63 70 75 41 72 63 68  _convert_cpuArch
20c0: 5f 66 72 6f 6d 53 74 72 69 6e 67 28 76 61 6c 75  _fromString(valu
20d0: 65 73 5b 34 5d 29 3b 0a 09 73 6e 70 72 69 6e 74  es[4]);..snprint
20e0: 66 28 6f 62 6a 2d 3e 6f 73 5f 73 74 72 2c 20 73  f(obj->os_str, s
20f0: 69 7a 65 6f 66 28 6f 62 6a 2d 3e 6f 73 5f 73 74  izeof(obj->os_st
2100: 72 29 2c 20 22 25 73 22 2c 20 76 61 6c 75 65 73  r), "%s", values
2110: 5b 33 5d 29 3b 0a 09 73 6e 70 72 69 6e 74 66 28  [3]);..snprintf(
2120: 6f 62 6a 2d 3e 63 70 75 41 72 63 68 5f 73 74 72  obj->cpuArch_str
2130: 2c 20 73 69 7a 65 6f 66 28 6f 62 6a 2d 3e 63 70  , sizeof(obj->cp
2140: 75 41 72 63 68 5f 73 74 72 29 2c 20 22 25 73 22  uArch_str), "%s"
2150: 2c 20 76 61 6c 75 65 73 5b 34 5d 29 3b 0a 09 69  , values[4]);..i
2160: 66 20 28 76 61 6c 75 65 73 5b 35 5d 5b 30 5d 20  f (values[5][0]
2170: 3d 3d 20 27 31 27 29 20 7b 0a 09 09 6f 62 6a 2d  == '1') {...obj-
2180: 3e 69 73 4c 61 74 65 73 74 20 3d 20 31 3b 0a 09  >isLatest = 1;..
2190: 7d 20 65 6c 73 65 20 7b 0a 09 09 6f 62 6a 2d 3e  } else {...obj->
21a0: 69 73 4c 61 74 65 73 74 20 3d 20 30 3b 0a 09 7d  isLatest = 0;..}
21b0: 0a 0a 09 69 66 20 28 2a 68 65 61 64 5f 70 20 3d  ...if (*head_p =
21c0: 3d 20 4e 55 4c 4c 29 20 7b 0a 09 09 6f 62 6a 2d  = NULL) {...obj-
21d0: 3e 63 6f 75 6e 74 65 72 20 3d 20 30 3b 0a 09 7d  >counter = 0;..}
21e0: 20 65 6c 73 65 20 7b 0a 09 09 6f 62 6a 2d 3e 63   else {...obj->c
21f0: 6f 75 6e 74 65 72 20 3d 20 28 2a 68 65 61 64 5f  ounter = (*head_
2200: 70 29 2d 3e 63 6f 75 6e 74 65 72 20 2b 20 31 3b  p)->counter + 1;
2210: 0a 09 7d 0a 0a 09 6f 62 6a 2d 3e 5f 6e 65 78 74  ..}...obj->_next
2220: 20 3d 20 2a 68 65 61 64 5f 70 3b 0a 09 2a 68 65   = *head_p;..*he
2230: 61 64 5f 70 20 3d 20 6f 62 6a 3b 0a 0a 09 72 65  ad_p = obj;...re
2240: 74 75 72 6e 28 30 29 3b 0a 7d 0a 0a 73 74 61 74  turn(0);.}..stat
2250: 69 63 20 73 74 72 75 63 74 20 61 70 70 66 73 5f  ic struct appfs_
2260: 70 61 63 6b 61 67 65 20 2a 61 70 70 66 73 5f 67  package *appfs_g
2270: 65 74 69 6e 64 65 78 28 63 6f 6e 73 74 20 63 68  etindex(const ch
2280: 61 72 20 2a 68 6f 73 74 6e 61 6d 65 2c 20 69 6e  ar *hostname, in
2290: 74 20 2a 70 61 63 6b 61 67 65 5f 63 6f 75 6e 74  t *package_count
22a0: 5f 70 29 20 7b 0a 09 73 74 72 75 63 74 20 61 70  _p) {..struct ap
22b0: 70 66 73 5f 70 61 63 6b 61 67 65 20 2a 68 65 61  pfs_package *hea
22c0: 64 20 3d 20 4e 55 4c 4c 3b 0a 09 63 68 61 72 20  d = NULL;..char
22d0: 2a 73 71 6c 3b 0a 09 69 6e 74 20 73 71 6c 69 74  *sql;..int sqlit
22e0: 65 5f 72 65 74 3b 0a 0a 09 69 66 20 28 70 61 63  e_ret;...if (pac
22f0: 6b 61 67 65 5f 63 6f 75 6e 74 5f 70 20 3d 3d 20  kage_count_p ==
2300: 4e 55 4c 4c 29 20 7b 0a 09 09 72 65 74 75 72 6e  NULL) {...return
2310: 28 4e 55 4c 4c 29 3b 0a 09 7d 0a 0a 09 61 70 70  (NULL);..}...app
2320: 66 73 5f 75 70 64 61 74 65 5f 69 6e 64 65 78 28  fs_update_index(
2330: 68 6f 73 74 6e 61 6d 65 29 3b 0a 0a 09 73 71 6c  hostname);...sql
2340: 20 3d 20 73 71 6c 69 74 65 33 5f 6d 70 72 69 6e   = sqlite3_mprin
2350: 74 66 28 22 53 45 4c 45 43 54 20 70 61 63 6b 61  tf("SELECT packa
2360: 67 65 2c 20 76 65 72 73 69 6f 6e 2c 20 73 68 61  ge, version, sha
2370: 31 2c 20 6f 73 2c 20 63 70 75 41 72 63 68 2c 20  1, os, cpuArch,
2380: 69 73 4c 61 74 65 73 74 20 46 52 4f 4d 20 70 61  isLatest FROM pa
2390: 63 6b 61 67 65 73 20 57 48 45 52 45 20 68 6f 73  ckages WHERE hos
23a0: 74 6e 61 6d 65 20 3d 20 25 51 3b 22 2c 20 68 6f  tname = %Q;", ho
23b0: 73 74 6e 61 6d 65 29 3b 0a 09 69 66 20 28 73 71  stname);..if (sq
23c0: 6c 20 3d 3d 20 4e 55 4c 4c 29 20 7b 0a 09 09 41  l == NULL) {...A
23d0: 50 50 46 53 5f 44 45 42 55 47 28 22 43 61 6c 6c  PPFS_DEBUG("Call
23e0: 20 74 6f 20 73 71 6c 69 74 65 33 5f 6d 70 72 69   to sqlite3_mpri
23f0: 6e 74 66 20 66 61 69 6c 65 64 2e 22 29 3b 0a 0a  ntf failed.");..
2400: 09 09 72 65 74 75 72 6e 28 4e 55 4c 4c 29 3b 0a  ..return(NULL);.
2410: 09 7d 0a 0a 09 73 71 6c 69 74 65 5f 72 65 74 20  .}...sqlite_ret
2420: 3d 20 73 71 6c 69 74 65 33 5f 65 78 65 63 28 67  = sqlite3_exec(g
2430: 6c 6f 62 61 6c 54 68 72 65 61 64 2e 64 62 2c 20  lobalThread.db,
2440: 73 71 6c 2c 20 61 70 70 66 73 5f 67 65 74 69 6e  sql, appfs_getin
2450: 64 65 78 5f 63 62 2c 20 26 68 65 61 64 2c 20 4e  dex_cb, &head, N
2460: 55 4c 4c 29 3b 0a 09 73 71 6c 69 74 65 33 5f 66  ULL);..sqlite3_f
2470: 72 65 65 28 73 71 6c 29 3b 0a 0a 09 69 66 20 28  ree(sql);...if (
2480: 73 71 6c 69 74 65 5f 72 65 74 20 21 3d 20 53 51  sqlite_ret != SQ
2490: 4c 49 54 45 5f 4f 4b 29 20 7b 0a 09 09 41 50 50  LITE_OK) {...APP
24a0: 46 53 5f 44 45 42 55 47 28 22 43 61 6c 6c 20 74  FS_DEBUG("Call t
24b0: 6f 20 73 71 6c 69 74 65 33 5f 65 78 65 63 20 66  o sqlite3_exec f
24c0: 61 69 6c 65 64 2e 22 29 3b 0a 0a 09 09 72 65 74  ailed.");....ret
24d0: 75 72 6e 28 4e 55 4c 4c 29 3b 0a 09 7d 0a 0a 09  urn(NULL);..}...
24e0: 69 66 20 28 68 65 61 64 20 21 3d 20 4e 55 4c 4c  if (head != NULL
24f0: 29 20 7b 0a 09 09 2a 70 61 63 6b 61 67 65 5f 63  ) {...*package_c
2500: 6f 75 6e 74 5f 70 20 3d 20 68 65 61 64 2d 3e 63  ount_p = head->c
2510: 6f 75 6e 74 65 72 20 2b 20 31 3b 0a 09 7d 0a 0a  ounter + 1;..}..
2520: 09 72 65 74 75 72 6e 28 68 65 61 64 29 3b 0a 7d  .return(head);.}
2530: 0a 0a 73 74 61 74 69 63 20 69 6e 74 20 61 70 70  ..static int app
2540: 66 73 5f 67 65 74 63 68 69 6c 64 72 65 6e 5f 63  fs_getchildren_c
2550: 62 28 76 6f 69 64 20 2a 5f 68 65 61 64 2c 20 69  b(void *_head, i
2560: 6e 74 20 63 6f 6c 75 6d 6e 73 2c 20 63 68 61 72  nt columns, char
2570: 20 2a 2a 76 61 6c 75 65 73 2c 20 63 68 61 72 20   **values, char
2580: 2a 2a 6e 61 6d 65 73 29 20 7b 0a 09 73 74 72 75  **names) {..stru
2590: 63 74 20 61 70 70 66 73 5f 63 68 69 6c 64 72 65  ct appfs_childre
25a0: 6e 20 2a 2a 68 65 61 64 5f 70 2c 20 2a 6f 62 6a  n **head_p, *obj
25b0: 3b 0a 0a 09 68 65 61 64 5f 70 20 3d 20 5f 68 65  ;...head_p = _he
25c0: 61 64 3b 0a 0a 09 6f 62 6a 20 3d 20 28 76 6f 69  ad;...obj = (voi
25d0: 64 20 2a 29 20 63 6b 61 6c 6c 6f 63 28 73 69 7a  d *) ckalloc(siz
25e0: 65 6f 66 28 2a 6f 62 6a 29 29 3b 0a 0a 09 73 6e  eof(*obj));...sn
25f0: 70 72 69 6e 74 66 28 6f 62 6a 2d 3e 6e 61 6d 65  printf(obj->name
2600: 2c 20 73 69 7a 65 6f 66 28 6f 62 6a 2d 3e 6e 61  , sizeof(obj->na
2610: 6d 65 29 2c 20 22 25 73 22 2c 20 76 61 6c 75 65  me), "%s", value
2620: 73 5b 30 5d 29 3b 0a 0a 09 69 66 20 28 2a 68 65  s[0]);...if (*he
2630: 61 64 5f 70 20 3d 3d 20 4e 55 4c 4c 29 20 7b 0a  ad_p == NULL) {.
2640: 09 09 6f 62 6a 2d 3e 63 6f 75 6e 74 65 72 20 3d  ..obj->counter =
2650: 20 30 3b 0a 09 7d 20 65 6c 73 65 20 7b 0a 09 09   0;..} else {...
2660: 6f 62 6a 2d 3e 63 6f 75 6e 74 65 72 20 3d 20 28  obj->counter = (
2670: 2a 68 65 61 64 5f 70 29 2d 3e 63 6f 75 6e 74 65  *head_p)->counte
2680: 72 20 2b 20 31 3b 0a 09 7d 0a 0a 09 6f 62 6a 2d  r + 1;..}...obj-
2690: 3e 5f 6e 65 78 74 20 3d 20 2a 68 65 61 64 5f 70  >_next = *head_p
26a0: 3b 0a 09 2a 68 65 61 64 5f 70 20 3d 20 6f 62 6a  ;..*head_p = obj
26b0: 3b 0a 0a 09 72 65 74 75 72 6e 28 30 29 3b 0a 09  ;...return(0);..
26c0: 0a 7d 0a 0a 73 74 61 74 69 63 20 73 74 72 75 63  .}..static struc
26d0: 74 20 61 70 70 66 73 5f 63 68 69 6c 64 72 65 6e  t appfs_children
26e0: 20 2a 61 70 70 66 73 5f 67 65 74 63 68 69 6c 64   *appfs_getchild
26f0: 72 65 6e 28 63 6f 6e 73 74 20 63 68 61 72 20 2a  ren(const char *
2700: 68 6f 73 74 6e 61 6d 65 2c 20 63 6f 6e 73 74 20  hostname, const
2710: 63 68 61 72 20 2a 70 61 63 6b 61 67 65 5f 68 61  char *package_ha
2720: 73 68 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a  sh, const char *
2730: 70 61 74 68 2c 20 69 6e 74 20 2a 63 68 69 6c 64  path, int *child
2740: 72 65 6e 5f 63 6f 75 6e 74 5f 70 29 20 7b 0a 09  ren_count_p) {..
2750: 73 74 72 75 63 74 20 61 70 70 66 73 5f 63 68 69  struct appfs_chi
2760: 6c 64 72 65 6e 20 2a 68 65 61 64 20 3d 20 4e 55  ldren *head = NU
2770: 4c 4c 3b 0a 09 63 68 61 72 20 2a 73 71 6c 3b 0a  LL;..char *sql;.
2780: 09 69 6e 74 20 73 71 6c 69 74 65 5f 72 65 74 3b  .int sqlite_ret;
2790: 0a 0a 09 69 66 20 28 63 68 69 6c 64 72 65 6e 5f  ...if (children_
27a0: 63 6f 75 6e 74 5f 70 20 3d 3d 20 4e 55 4c 4c 29  count_p == NULL)
27b0: 20 7b 0a 09 09 72 65 74 75 72 6e 28 4e 55 4c 4c   {...return(NULL
27c0: 29 3b 0a 09 7d 0a 0a 09 61 70 70 66 73 5f 75 70  );..}...appfs_up
27d0: 64 61 74 65 5f 69 6e 64 65 78 28 68 6f 73 74 6e  date_index(hostn
27e0: 61 6d 65 29 3b 0a 09 61 70 70 66 73 5f 75 70 64  ame);..appfs_upd
27f0: 61 74 65 5f 6d 61 6e 69 66 65 73 74 28 68 6f 73  ate_manifest(hos
2800: 74 6e 61 6d 65 2c 20 70 61 63 6b 61 67 65 5f 68  tname, package_h
2810: 61 73 68 29 3b 0a 0a 09 73 71 6c 20 3d 20 73 71  ash);...sql = sq
2820: 6c 69 74 65 33 5f 6d 70 72 69 6e 74 66 28 22 53  lite3_mprintf("S
2830: 45 4c 45 43 54 20 66 69 6c 65 5f 6e 61 6d 65 20  ELECT file_name
2840: 46 52 4f 4d 20 66 69 6c 65 73 20 57 48 45 52 45  FROM files WHERE
2850: 20 70 61 63 6b 61 67 65 5f 73 68 61 31 20 3d 20   package_sha1 =
2860: 25 51 20 41 4e 44 20 66 69 6c 65 5f 64 69 72 65  %Q AND file_dire
2870: 63 74 6f 72 79 20 3d 20 25 51 3b 22 2c 20 70 61  ctory = %Q;", pa
2880: 63 6b 61 67 65 5f 68 61 73 68 2c 20 70 61 74 68  ckage_hash, path
2890: 29 3b 0a 09 69 66 20 28 73 71 6c 20 3d 3d 20 4e  );..if (sql == N
28a0: 55 4c 4c 29 20 7b 0a 09 09 41 50 50 46 53 5f 44  ULL) {...APPFS_D
28b0: 45 42 55 47 28 22 43 61 6c 6c 20 74 6f 20 73 71  EBUG("Call to sq
28c0: 6c 69 74 65 33 5f 6d 70 72 69 6e 74 66 20 66 61  lite3_mprintf fa
28d0: 69 6c 65 64 2e 22 29 3b 0a 0a 09 09 72 65 74 75  iled.");....retu
28e0: 72 6e 28 4e 55 4c 4c 29 3b 0a 09 7d 0a 0a 09 41  rn(NULL);..}...A
28f0: 50 50 46 53 5f 44 45 42 55 47 28 22 53 51 4c 3a  PPFS_DEBUG("SQL:
2900: 20 25 73 22 2c 20 73 71 6c 29 3b 0a 09 73 71 6c   %s", sql);..sql
2910: 69 74 65 5f 72 65 74 20 3d 20 73 71 6c 69 74 65  ite_ret = sqlite
2920: 33 5f 65 78 65 63 28 67 6c 6f 62 61 6c 54 68 72  3_exec(globalThr
2930: 65 61 64 2e 64 62 2c 20 73 71 6c 2c 20 61 70 70  ead.db, sql, app
2940: 66 73 5f 67 65 74 63 68 69 6c 64 72 65 6e 5f 63  fs_getchildren_c
2950: 62 2c 20 26 68 65 61 64 2c 20 4e 55 4c 4c 29 3b  b, &head, NULL);
2960: 0a 09 73 71 6c 69 74 65 33 5f 66 72 65 65 28 73  ..sqlite3_free(s
2970: 71 6c 29 3b 0a 0a 09 69 66 20 28 73 71 6c 69 74  ql);...if (sqlit
2980: 65 5f 72 65 74 20 21 3d 20 53 51 4c 49 54 45 5f  e_ret != SQLITE_
2990: 4f 4b 29 20 7b 0a 09 09 41 50 50 46 53 5f 44 45  OK) {...APPFS_DE
29a0: 42 55 47 28 22 43 61 6c 6c 20 74 6f 20 73 71 6c  BUG("Call to sql
29b0: 69 74 65 33 5f 65 78 65 63 20 66 61 69 6c 65 64  ite3_exec failed
29c0: 2e 22 29 3b 0a 0a 09 09 72 65 74 75 72 6e 28 4e  .");....return(N
29d0: 55 4c 4c 29 3b 0a 09 7d 0a 0a 09 69 66 20 28 68  ULL);..}...if (h
29e0: 65 61 64 20 21 3d 20 4e 55 4c 4c 29 20 7b 0a 09  ead != NULL) {..
29f0: 09 2a 63 68 69 6c 64 72 65 6e 5f 63 6f 75 6e 74  .*children_count
2a00: 5f 70 20 3d 20 68 65 61 64 2d 3e 63 6f 75 6e 74  _p = head->count
2a10: 65 72 20 2b 20 31 3b 0a 09 7d 0a 0a 09 72 65 74  er + 1;..}...ret
2a20: 75 72 6e 28 68 65 61 64 29 3b 0a 7d 0a 0a 73 74  urn(head);.}..st
2a30: 61 74 69 63 20 69 6e 74 20 61 70 70 66 73 5f 6c  atic int appfs_l
2a40: 6f 6f 6b 75 70 5f 70 61 63 6b 61 67 65 5f 68 61  ookup_package_ha
2a50: 73 68 5f 63 62 28 76 6f 69 64 20 2a 5f 72 65 74  sh_cb(void *_ret
2a60: 76 61 6c 2c 20 69 6e 74 20 63 6f 6c 75 6d 6e 73  val, int columns
2a70: 2c 20 63 68 61 72 20 2a 2a 76 61 6c 75 65 73 2c  , char **values,
2a80: 20 63 68 61 72 20 2a 2a 6e 61 6d 65 73 29 20 7b   char **names) {
2a90: 0a 09 63 68 61 72 20 2a 2a 72 65 74 76 61 6c 20  ..char **retval
2aa0: 3d 20 5f 72 65 74 76 61 6c 3b 0a 0a 09 2a 72 65  = _retval;...*re
2ab0: 74 76 61 6c 20 3d 20 73 74 72 64 75 70 28 76 61  tval = strdup(va
2ac0: 6c 75 65 73 5b 30 5d 29 3b 0a 0a 09 72 65 74 75  lues[0]);...retu
2ad0: 72 6e 28 30 29 3b 0a 7d 0a 0a 73 74 61 74 69 63  rn(0);.}..static
2ae0: 20 63 68 61 72 20 2a 61 70 70 66 73 5f 6c 6f 6f   char *appfs_loo
2af0: 6b 75 70 5f 70 61 63 6b 61 67 65 5f 68 61 73 68  kup_package_hash
2b00: 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 68 6f 73  (const char *hos
2b10: 74 6e 61 6d 65 2c 20 63 6f 6e 73 74 20 63 68 61  tname, const cha
2b20: 72 20 2a 70 61 63 6b 61 67 65 2c 20 63 6f 6e 73  r *package, cons
2b30: 74 20 63 68 61 72 20 2a 6f 73 2c 20 63 6f 6e 73  t char *os, cons
2b40: 74 20 63 68 61 72 20 2a 63 70 75 41 72 63 68 2c  t char *cpuArch,
2b50: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 76 65 72   const char *ver
2b60: 73 69 6f 6e 29 20 7b 0a 09 63 68 61 72 20 2a 73  sion) {..char *s
2b70: 71 6c 3b 0a 09 63 68 61 72 20 2a 72 65 74 76 61  ql;..char *retva
2b80: 6c 20 3d 20 4e 55 4c 4c 3b 0a 09 69 6e 74 20 73  l = NULL;..int s
2b90: 71 6c 69 74 65 5f 72 65 74 3b 0a 0a 09 61 70 70  qlite_ret;...app
2ba0: 66 73 5f 75 70 64 61 74 65 5f 69 6e 64 65 78 28  fs_update_index(
2bb0: 68 6f 73 74 6e 61 6d 65 29 3b 0a 0a 09 73 71 6c  hostname);...sql
2bc0: 20 3d 20 73 71 6c 69 74 65 33 5f 6d 70 72 69 6e   = sqlite3_mprin
2bd0: 74 66 28 22 53 45 4c 45 43 54 20 73 68 61 31 20  tf("SELECT sha1
2be0: 46 52 4f 4d 20 70 61 63 6b 61 67 65 73 20 57 48  FROM packages WH
2bf0: 45 52 45 20 68 6f 73 74 6e 61 6d 65 20 3d 20 25  ERE hostname = %
2c00: 51 20 41 4e 44 20 70 61 63 6b 61 67 65 20 3d 20  Q AND package =
2c10: 25 51 20 41 4e 44 20 6f 73 20 3d 20 25 51 20 41  %Q AND os = %Q A
2c20: 4e 44 20 63 70 75 41 72 63 68 20 3d 20 25 51 20  ND cpuArch = %Q
2c30: 41 4e 44 20 76 65 72 73 69 6f 6e 20 3d 20 25 51  AND version = %Q
2c40: 3b 22 2c 0a 09 09 68 6f 73 74 6e 61 6d 65 2c 0a  ;",...hostname,.
2c50: 09 09 70 61 63 6b 61 67 65 2c 0a 09 09 6f 73 2c  ..package,...os,
2c60: 0a 09 09 63 70 75 41 72 63 68 2c 0a 09 09 76 65  ...cpuArch,...ve
2c70: 72 73 69 6f 6e 0a 09 29 3b 0a 09 69 66 20 28 73  rsion..);..if (s
2c80: 71 6c 20 3d 3d 20 4e 55 4c 4c 29 20 7b 0a 09 09  ql == NULL) {...
2c90: 41 50 50 46 53 5f 44 45 42 55 47 28 22 43 61 6c  APPFS_DEBUG("Cal
2ca0: 6c 20 74 6f 20 73 71 6c 69 74 65 33 5f 6d 70 72  l to sqlite3_mpr
2cb0: 69 6e 74 66 20 66 61 69 6c 65 64 2e 22 29 3b 0a  intf failed.");.
2cc0: 0a 09 09 72 65 74 75 72 6e 28 4e 55 4c 4c 29 3b  ...return(NULL);
2cd0: 0a 09 7d 0a 0a 09 41 50 50 46 53 5f 44 45 42 55  ..}...APPFS_DEBU
2ce0: 47 28 22 53 51 4c 3a 20 25 73 22 2c 20 73 71 6c  G("SQL: %s", sql
2cf0: 29 3b 0a 09 73 71 6c 69 74 65 5f 72 65 74 20 3d  );..sqlite_ret =
2d00: 20 73 71 6c 69 74 65 33 5f 65 78 65 63 28 67 6c   sqlite3_exec(gl
2d10: 6f 62 61 6c 54 68 72 65 61 64 2e 64 62 2c 20 73  obalThread.db, s
2d20: 71 6c 2c 20 61 70 70 66 73 5f 6c 6f 6f 6b 75 70  ql, appfs_lookup
2d30: 5f 70 61 63 6b 61 67 65 5f 68 61 73 68 5f 63 62  _package_hash_cb
2d40: 2c 20 26 72 65 74 76 61 6c 2c 20 4e 55 4c 4c 29  , &retval, NULL)
2d50: 3b 0a 09 73 71 6c 69 74 65 33 5f 66 72 65 65 28  ;..sqlite3_free(
2d60: 73 71 6c 29 3b 0a 0a 09 69 66 20 28 73 71 6c 69  sql);...if (sqli
2d70: 74 65 5f 72 65 74 20 21 3d 20 53 51 4c 49 54 45  te_ret != SQLITE
2d80: 5f 4f 4b 29 20 7b 0a 09 09 41 50 50 46 53 5f 44  _OK) {...APPFS_D
2d90: 45 42 55 47 28 22 43 61 6c 6c 20 74 6f 20 73 71  EBUG("Call to sq
2da0: 6c 69 74 65 33 5f 65 78 65 63 20 66 61 69 6c 65  lite3_exec faile
2db0: 64 2e 22 29 3b 0a 0a 09 09 72 65 74 75 72 6e 28  d.");....return(
2dc0: 4e 55 4c 4c 29 3b 0a 09 7d 0a 0a 09 72 65 74 75  NULL);..}...retu
2dd0: 72 6e 28 72 65 74 76 61 6c 29 3b 0a 7d 0a 0a 73  rn(retval);.}..s
2de0: 74 61 74 69 63 20 69 6e 74 20 61 70 70 66 73 5f  tatic int appfs_
2df0: 67 65 74 66 69 6c 65 69 6e 66 6f 5f 63 62 28 76  getfileinfo_cb(v
2e00: 6f 69 64 20 2a 5f 70 61 74 68 69 6e 66 6f 2c 20  oid *_pathinfo,
2e10: 69 6e 74 20 63 6f 6c 75 6d 6e 73 2c 20 63 68 61  int columns, cha
2e20: 72 20 2a 2a 76 61 6c 75 65 73 2c 20 63 68 61 72  r **values, char
2e30: 20 2a 2a 6e 61 6d 65 73 29 20 7b 0a 09 73 74 72   **names) {..str
2e40: 75 63 74 20 61 70 70 66 73 5f 70 61 74 68 69 6e  uct appfs_pathin
2e50: 66 6f 20 2a 70 61 74 68 69 6e 66 6f 20 3d 20 5f  fo *pathinfo = _
2e60: 70 61 74 68 69 6e 66 6f 3b 0a 09 63 6f 6e 73 74  pathinfo;..const
2e70: 20 63 68 61 72 20 2a 74 79 70 65 2c 20 2a 74 69   char *type, *ti
2e80: 6d 65 2c 20 2a 73 6f 75 72 63 65 2c 20 2a 73 69  me, *source, *si
2e90: 7a 65 2c 20 2a 70 65 72 6d 73 2c 20 2a 73 68 61  ze, *perms, *sha
2ea0: 31 3b 0a 0a 09 74 79 70 65 20 3d 20 76 61 6c 75  1;...type = valu
2eb0: 65 73 5b 30 5d 3b 0a 09 74 69 6d 65 20 3d 20 76  es[0];..time = v
2ec0: 61 6c 75 65 73 5b 31 5d 3b 0a 09 73 6f 75 72 63  alues[1];..sourc
2ed0: 65 20 3d 20 76 61 6c 75 65 73 5b 32 5d 3b 0a 09  e = values[2];..
2ee0: 73 69 7a 65 20 3d 20 76 61 6c 75 65 73 5b 33 5d  size = values[3]
2ef0: 3b 0a 09 70 65 72 6d 73 20 3d 20 76 61 6c 75 65  ;..perms = value
2f00: 73 5b 34 5d 3b 0a 09 73 68 61 31 20 3d 20 76 61  s[4];..sha1 = va
2f10: 6c 75 65 73 5b 35 5d 3b 0a 0a 09 70 61 74 68 69  lues[5];...pathi
2f20: 6e 66 6f 2d 3e 74 69 6d 65 20 3d 20 73 74 72 74  nfo->time = strt
2f30: 6f 75 6c 6c 28 74 69 6d 65 2c 20 4e 55 4c 4c 2c  oull(time, NULL,
2f40: 20 31 30 29 3b 0a 0a 09 69 66 20 28 73 74 72 63   10);...if (strc
2f50: 6d 70 28 74 79 70 65 2c 20 22 66 69 6c 65 22 29  mp(type, "file")
2f60: 20 3d 3d 20 30 29 20 7b 0a 09 09 70 61 74 68 69   == 0) {...pathi
2f70: 6e 66 6f 2d 3e 74 79 70 65 20 3d 20 41 50 50 46  nfo->type = APPF
2f80: 53 5f 50 41 54 48 54 59 50 45 5f 46 49 4c 45 3b  S_PATHTYPE_FILE;
2f90: 0a 0a 09 09 69 66 20 28 21 73 69 7a 65 29 20 7b  ....if (!size) {
2fa0: 0a 09 09 09 73 69 7a 65 20 3d 20 22 30 22 3b 0a  ....size = "0";.
2fb0: 09 09 7d 0a 0a 09 09 69 66 20 28 21 70 65 72 6d  ..}....if (!perm
2fc0: 73 29 20 7b 0a 09 09 09 70 65 72 6d 73 20 3d 20  s) {....perms =
2fd0: 22 22 3b 0a 09 09 7d 0a 0a 09 09 69 66 20 28 21  "";...}....if (!
2fe0: 73 68 61 31 29 20 7b 0a 09 09 09 73 68 61 31 20  sha1) {....sha1
2ff0: 3d 20 22 22 3b 0a 09 09 7d 0a 0a 09 09 70 61 74  = "";...}....pat
3000: 68 69 6e 66 6f 2d 3e 74 79 70 65 69 6e 66 6f 2e  hinfo->typeinfo.
3010: 66 69 6c 65 2e 73 69 7a 65 20 3d 20 73 74 72 74  file.size = strt
3020: 6f 75 6c 6c 28 73 69 7a 65 2c 20 4e 55 4c 4c 2c  oull(size, NULL,
3030: 20 31 30 29 3b 0a 09 09 73 6e 70 72 69 6e 74 66   10);...snprintf
3040: 28 70 61 74 68 69 6e 66 6f 2d 3e 74 79 70 65 69  (pathinfo->typei
3050: 6e 66 6f 2e 66 69 6c 65 2e 73 68 61 31 2c 20 73  nfo.file.sha1, s
3060: 69 7a 65 6f 66 28 70 61 74 68 69 6e 66 6f 2d 3e  izeof(pathinfo->
3070: 74 79 70 65 69 6e 66 6f 2e 66 69 6c 65 2e 73 68  typeinfo.file.sh
3080: 61 31 29 2c 20 22 25 73 22 2c 20 73 68 61 31 29  a1), "%s", sha1)
3090: 3b 0a 0a 09 09 69 66 20 28 73 74 72 63 6d 70 28  ;....if (strcmp(
30a0: 70 65 72 6d 73 2c 20 22 78 22 29 20 3d 3d 20 30  perms, "x") == 0
30b0: 29 20 7b 0a 09 09 09 70 61 74 68 69 6e 66 6f 2d  ) {....pathinfo-
30c0: 3e 74 79 70 65 69 6e 66 6f 2e 66 69 6c 65 2e 65  >typeinfo.file.e
30d0: 78 65 63 75 74 61 62 6c 65 20 3d 20 31 3b 0a 09  xecutable = 1;..
30e0: 09 7d 20 65 6c 73 65 20 7b 0a 09 09 09 70 61 74  .} else {....pat
30f0: 68 69 6e 66 6f 2d 3e 74 79 70 65 69 6e 66 6f 2e  hinfo->typeinfo.
3100: 66 69 6c 65 2e 65 78 65 63 75 74 61 62 6c 65 20  file.executable
3110: 3d 20 30 3b 0a 09 09 7d 0a 0a 09 09 72 65 74 75  = 0;...}....retu
3120: 72 6e 28 30 29 3b 0a 09 7d 0a 0a 09 69 66 20 28  rn(0);..}...if (
3130: 73 74 72 63 6d 70 28 74 79 70 65 2c 20 22 64 69  strcmp(type, "di
3140: 72 65 63 74 6f 72 79 22 29 20 3d 3d 20 30 29 20  rectory") == 0)
3150: 7b 0a 09 09 70 61 74 68 69 6e 66 6f 2d 3e 74 79  {...pathinfo->ty
3160: 70 65 20 3d 20 41 50 50 46 53 5f 50 41 54 48 54  pe = APPFS_PATHT
3170: 59 50 45 5f 44 49 52 45 43 54 4f 52 59 3b 0a 09  YPE_DIRECTORY;..
3180: 09 70 61 74 68 69 6e 66 6f 2d 3e 74 79 70 65 69  .pathinfo->typei
3190: 6e 66 6f 2e 64 69 72 2e 63 68 69 6c 64 63 6f 75  nfo.dir.childcou
31a0: 6e 74 20 3d 20 30 3b 0a 0a 09 09 72 65 74 75 72  nt = 0;....retur
31b0: 6e 28 30 29 3b 0a 09 7d 0a 0a 09 72 65 74 75 72  n(0);..}...retur
31c0: 6e 28 30 29 3b 0a 0a 09 2f 2a 20 55 6e 74 69 6c  n(0);.../* Until
31d0: 20 74 68 69 73 20 69 73 20 75 73 65 64 2c 20 70   this is used, p
31e0: 72 65 76 65 6e 74 20 74 68 65 20 63 6f 6d 70 69  revent the compi
31f0: 6c 65 72 20 66 72 6f 6d 20 63 6f 6d 70 6c 61 69  ler from complai
3200: 6e 69 6e 67 20 2a 2f 0a 09 73 6f 75 72 63 65 20  ning */..source
3210: 3d 20 73 6f 75 72 63 65 3b 0a 7d 0a 0a 73 74 61  = source;.}..sta
3220: 74 69 63 20 69 6e 74 20 61 70 70 66 73 5f 67 65  tic int appfs_ge
3230: 74 66 69 6c 65 69 6e 66 6f 28 63 6f 6e 73 74 20  tfileinfo(const
3240: 63 68 61 72 20 2a 68 6f 73 74 6e 61 6d 65 2c 20  char *hostname,
3250: 63 6f 6e 73 74 20 63 68 61 72 20 2a 70 61 63 6b  const char *pack
3260: 61 67 65 5f 68 61 73 68 2c 20 63 6f 6e 73 74 20  age_hash, const
3270: 63 68 61 72 20 2a 5f 70 61 74 68 2c 20 73 74 72  char *_path, str
3280: 75 63 74 20 61 70 70 66 73 5f 70 61 74 68 69 6e  uct appfs_pathin
3290: 66 6f 20 2a 70 61 74 68 69 6e 66 6f 29 20 7b 0a  fo *pathinfo) {.
32a0: 09 63 68 61 72 20 2a 64 69 72 65 63 74 6f 72 79  .char *directory
32b0: 2c 20 2a 66 69 6c 65 2c 20 2a 70 61 74 68 3b 0a  , *file, *path;.
32c0: 09 63 68 61 72 20 2a 73 71 6c 3b 0a 09 69 6e 74  .char *sql;..int
32d0: 20 73 71 6c 69 74 65 5f 72 65 74 3b 0a 0a 09 69   sqlite_ret;...i
32e0: 66 20 28 70 61 74 68 69 6e 66 6f 20 3d 3d 20 4e  f (pathinfo == N
32f0: 55 4c 4c 29 20 7b 0a 09 09 72 65 74 75 72 6e 28  ULL) {...return(
3300: 2d 45 49 4f 29 3b 0a 09 7d 0a 0a 09 61 70 70 66  -EIO);..}...appf
3310: 73 5f 75 70 64 61 74 65 5f 69 6e 64 65 78 28 68  s_update_index(h
3320: 6f 73 74 6e 61 6d 65 29 3b 0a 09 61 70 70 66 73  ostname);..appfs
3330: 5f 75 70 64 61 74 65 5f 6d 61 6e 69 66 65 73 74  _update_manifest
3340: 28 68 6f 73 74 6e 61 6d 65 2c 20 70 61 63 6b 61  (hostname, packa
3350: 67 65 5f 68 61 73 68 29 3b 0a 0a 09 70 61 74 68  ge_hash);...path
3360: 20 3d 20 73 74 72 64 75 70 28 5f 70 61 74 68 29   = strdup(_path)
3370: 3b 0a 09 64 69 72 65 63 74 6f 72 79 20 3d 20 70  ;..directory = p
3380: 61 74 68 3b 0a 09 66 69 6c 65 20 3d 20 73 74 72  ath;..file = str
3390: 72 63 68 72 28 70 61 74 68 2c 20 27 2f 27 29 3b  rchr(path, '/');
33a0: 0a 09 69 66 20 28 66 69 6c 65 20 3d 3d 20 4e 55  ..if (file == NU
33b0: 4c 4c 29 20 7b 0a 09 09 66 69 6c 65 20 3d 20 70  LL) {...file = p
33c0: 61 74 68 3b 0a 09 09 64 69 72 65 63 74 6f 72 79  ath;...directory
33d0: 20 3d 20 22 22 3b 0a 09 7d 20 65 6c 73 65 20 7b   = "";..} else {
33e0: 0a 09 09 2a 66 69 6c 65 20 3d 20 27 5c 30 27 3b  ...*file = '\0';
33f0: 0a 09 09 66 69 6c 65 2b 2b 3b 0a 09 7d 0a 0a 09  ...file++;..}...
3400: 73 71 6c 20 3d 20 73 71 6c 69 74 65 33 5f 6d 70  sql = sqlite3_mp
3410: 72 69 6e 74 66 28 22 53 45 4c 45 43 54 20 74 79  rintf("SELECT ty
3420: 70 65 2c 20 74 69 6d 65 2c 20 73 6f 75 72 63 65  pe, time, source
3430: 2c 20 73 69 7a 65 2c 20 70 65 72 6d 73 2c 20 66  , size, perms, f
3440: 69 6c 65 5f 73 68 61 31 20 46 52 4f 4d 20 66 69  ile_sha1 FROM fi
3450: 6c 65 73 20 57 48 45 52 45 20 70 61 63 6b 61 67  les WHERE packag
3460: 65 5f 73 68 61 31 20 3d 20 25 51 20 41 4e 44 20  e_sha1 = %Q AND
3470: 66 69 6c 65 5f 64 69 72 65 63 74 6f 72 79 20 3d  file_directory =
3480: 20 25 51 20 41 4e 44 20 66 69 6c 65 5f 6e 61 6d   %Q AND file_nam
3490: 65 20 3d 20 25 51 3b 22 2c 20 70 61 63 6b 61 67  e = %Q;", packag
34a0: 65 5f 68 61 73 68 2c 20 64 69 72 65 63 74 6f 72  e_hash, director
34b0: 79 2c 20 66 69 6c 65 29 3b 0a 09 69 66 20 28 73  y, file);..if (s
34c0: 71 6c 20 3d 3d 20 4e 55 4c 4c 29 20 7b 0a 09 09  ql == NULL) {...
34d0: 41 50 50 46 53 5f 44 45 42 55 47 28 22 43 61 6c  APPFS_DEBUG("Cal
34e0: 6c 20 74 6f 20 73 71 6c 69 74 65 33 5f 6d 70 72  l to sqlite3_mpr
34f0: 69 6e 74 66 20 66 61 69 6c 65 64 2e 22 29 3b 0a  intf failed.");.
3500: 0a 09 09 66 72 65 65 28 70 61 74 68 29 3b 0a 0a  ...free(path);..
3510: 09 09 72 65 74 75 72 6e 28 2d 45 49 4f 29 3b 0a  ..return(-EIO);.
3520: 09 7d 0a 0a 09 66 72 65 65 28 70 61 74 68 29 3b  .}...free(path);
3530: 0a 0a 09 70 61 74 68 69 6e 66 6f 2d 3e 74 79 70  ...pathinfo->typ
3540: 65 20 3d 20 41 50 50 46 53 5f 50 41 54 48 54 59  e = APPFS_PATHTY
3550: 50 45 5f 49 4e 56 41 4c 49 44 3b 0a 0a 09 41 50  PE_INVALID;...AP
3560: 50 46 53 5f 44 45 42 55 47 28 22 53 51 4c 3a 20  PFS_DEBUG("SQL:
3570: 25 73 22 2c 20 73 71 6c 29 3b 0a 09 73 71 6c 69  %s", sql);..sqli
3580: 74 65 5f 72 65 74 20 3d 20 73 71 6c 69 74 65 33  te_ret = sqlite3
3590: 5f 65 78 65 63 28 67 6c 6f 62 61 6c 54 68 72 65  _exec(globalThre
35a0: 61 64 2e 64 62 2c 20 73 71 6c 2c 20 61 70 70 66  ad.db, sql, appf
35b0: 73 5f 67 65 74 66 69 6c 65 69 6e 66 6f 5f 63 62  s_getfileinfo_cb
35c0: 2c 20 70 61 74 68 69 6e 66 6f 2c 20 4e 55 4c 4c  , pathinfo, NULL
35d0: 29 3b 0a 09 73 71 6c 69 74 65 33 5f 66 72 65 65  );..sqlite3_free
35e0: 28 73 71 6c 29 3b 0a 0a 09 69 66 20 28 73 71 6c  (sql);...if (sql
35f0: 69 74 65 5f 72 65 74 20 21 3d 20 53 51 4c 49 54  ite_ret != SQLIT
3600: 45 5f 4f 4b 29 20 7b 0a 09 09 41 50 50 46 53 5f  E_OK) {...APPFS_
3610: 44 45 42 55 47 28 22 43 61 6c 6c 20 74 6f 20 73  DEBUG("Call to s
3620: 71 6c 69 74 65 33 5f 65 78 65 63 20 66 61 69 6c  qlite3_exec fail
3630: 65 64 2e 22 29 3b 0a 0a 09 09 72 65 74 75 72 6e  ed.");....return
3640: 28 2d 45 49 4f 29 3b 0a 09 7d 0a 0a 09 69 66 20  (-EIO);..}...if
3650: 28 70 61 74 68 69 6e 66 6f 2d 3e 74 79 70 65 20  (pathinfo->type
3660: 3d 3d 20 41 50 50 46 53 5f 50 41 54 48 54 59 50  == APPFS_PATHTYP
3670: 45 5f 49 4e 56 41 4c 49 44 29 20 7b 0a 09 09 72  E_INVALID) {...r
3680: 65 74 75 72 6e 28 2d 45 4e 4f 45 4e 54 29 3b 0a  eturn(-ENOENT);.
3690: 09 7d 0a 0a 09 72 65 74 75 72 6e 28 30 29 3b 0a  .}...return(0);.
36a0: 7d 0a 0a 2f 2a 20 47 65 74 20 69 6e 66 6f 72 6d  }../* Get inform
36b0: 61 74 69 6f 6e 20 61 62 6f 75 74 20 61 20 70 61  ation about a pa
36c0: 74 68 2c 20 61 6e 64 20 6f 70 74 69 6f 6e 61 6c  th, and optional
36d0: 6c 79 20 6c 69 73 74 20 63 68 69 6c 64 72 65 6e  ly list children
36e0: 20 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74 20 61   */.static int a
36f0: 70 70 66 73 5f 67 65 74 5f 70 61 74 68 5f 69 6e  ppfs_get_path_in
3700: 66 6f 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 5f  fo(const char *_
3710: 70 61 74 68 2c 20 73 74 72 75 63 74 20 61 70 70  path, struct app
3720: 66 73 5f 70 61 74 68 69 6e 66 6f 20 2a 70 61 74  fs_pathinfo *pat
3730: 68 69 6e 66 6f 2c 20 73 74 72 75 63 74 20 61 70  hinfo, struct ap
3740: 70 66 73 5f 63 68 69 6c 64 72 65 6e 20 2a 2a 63  pfs_children **c
3750: 68 69 6c 64 72 65 6e 29 20 7b 0a 09 73 74 72 75  hildren) {..stru
3760: 63 74 20 61 70 70 66 73 5f 73 69 74 65 20 2a 73  ct appfs_site *s
3770: 69 74 65 73 2c 20 2a 73 69 74 65 3b 0a 09 73 74  ites, *site;..st
3780: 72 75 63 74 20 61 70 70 66 73 5f 63 68 69 6c 64  ruct appfs_child
3790: 72 65 6e 20 2a 6e 6f 64 65 2c 20 2a 64 69 72 5f  ren *node, *dir_
37a0: 63 68 69 6c 64 72 65 6e 3b 0a 09 73 74 72 75 63  children;..struc
37b0: 74 20 61 70 70 66 73 5f 70 61 63 6b 61 67 65 20  t appfs_package
37c0: 2a 70 61 63 6b 61 67 65 73 2c 20 2a 70 61 63 6b  *packages, *pack
37d0: 61 67 65 3b 0a 09 61 70 70 66 73 5f 6f 73 5f 74  age;..appfs_os_t
37e0: 20 6f 73 5f 76 61 6c 3b 0a 09 61 70 70 66 73 5f   os_val;..appfs_
37f0: 63 70 75 41 72 63 68 5f 74 20 63 70 75 41 72 63  cpuArch_t cpuArc
3800: 68 5f 76 61 6c 3b 0a 09 63 68 61 72 20 2a 68 6f  h_val;..char *ho
3810: 73 74 6e 61 6d 65 2c 20 2a 70 61 63 6b 61 67 65  stname, *package
3820: 6e 61 6d 65 2c 20 2a 6f 73 5f 63 70 75 41 72 63  name, *os_cpuArc
3830: 68 2c 20 2a 6f 73 2c 20 2a 63 70 75 41 72 63 68  h, *os, *cpuArch
3840: 2c 20 2a 76 65 72 73 69 6f 6e 3b 0a 09 63 68 61  , *version;..cha
3850: 72 20 2a 70 61 74 68 2c 20 2a 70 61 74 68 5f 73  r *path, *path_s
3860: 3b 0a 09 63 68 61 72 20 2a 70 61 63 6b 61 67 65  ;..char *package
3870: 5f 68 61 73 68 3b 0a 09 69 6e 74 20 73 69 74 65  _hash;..int site
3880: 73 5f 63 6f 75 6e 74 2c 20 70 61 63 6b 61 67 65  s_count, package
3890: 73 5f 63 6f 75 6e 74 2c 20 6f 73 5f 63 70 75 41  s_count, os_cpuA
38a0: 72 63 68 5f 63 6f 75 6e 74 2c 20 76 65 72 73 69  rch_count, versi
38b0: 6f 6e 5f 63 6f 75 6e 74 2c 20 66 69 6c 65 73 5f  on_count, files_
38c0: 63 6f 75 6e 74 3b 0a 09 69 6e 74 20 66 69 6c 65  count;..int file
38d0: 69 6e 66 6f 5f 72 65 74 3b 0a 0a 09 69 66 20 28  info_ret;...if (
38e0: 63 68 69 6c 64 72 65 6e 29 20 7b 0a 09 09 2a 63  children) {...*c
38f0: 68 69 6c 64 72 65 6e 20 3d 20 4e 55 4c 4c 3b 0a  hildren = NULL;.
3900: 09 7d 0a 0a 09 69 66 20 28 5f 70 61 74 68 20 3d  .}...if (_path =
3910: 3d 20 4e 55 4c 4c 29 20 7b 0a 09 09 72 65 74 75  = NULL) {...retu
3920: 72 6e 28 2d 45 4e 4f 45 4e 54 29 3b 0a 09 7d 0a  rn(-ENOENT);..}.
3930: 0a 09 69 66 20 28 5f 70 61 74 68 5b 30 5d 20 21  ..if (_path[0] !
3940: 3d 20 27 2f 27 29 20 7b 0a 09 09 72 65 74 75 72  = '/') {...retur
3950: 6e 28 2d 45 4e 4f 45 4e 54 29 3b 0a 09 7d 0a 0a  n(-ENOENT);..}..
3960: 09 69 66 20 28 5f 70 61 74 68 5b 31 5d 20 3d 3d  .if (_path[1] ==
3970: 20 27 5c 30 27 29 20 7b 0a 09 09 2f 2a 20 52 65   '\0') {.../* Re
3980: 71 75 65 73 74 20 66 6f 72 20 74 68 65 20 72 6f  quest for the ro
3990: 6f 74 20 64 69 72 65 63 74 6f 72 79 20 2a 2f 0a  ot directory */.
39a0: 09 09 73 69 74 65 73 20 3d 20 61 70 70 66 73 5f  ..sites = appfs_
39b0: 67 65 74 73 69 74 65 73 28 26 73 69 74 65 73 5f  getsites(&sites_
39c0: 63 6f 75 6e 74 29 3b 0a 0a 09 09 70 61 74 68 69  count);....pathi
39d0: 6e 66 6f 2d 3e 74 79 70 65 20 3d 20 41 50 50 46  nfo->type = APPF
39e0: 53 5f 50 41 54 48 54 59 50 45 5f 44 49 52 45 43  S_PATHTYPE_DIREC
39f0: 54 4f 52 59 3b 0a 09 09 70 61 74 68 69 6e 66 6f  TORY;...pathinfo
3a00: 2d 3e 74 79 70 65 69 6e 66 6f 2e 64 69 72 2e 63  ->typeinfo.dir.c
3a10: 68 69 6c 64 63 6f 75 6e 74 20 3d 20 73 69 74 65  hildcount = site
3a20: 73 5f 63 6f 75 6e 74 3b 0a 09 09 70 61 74 68 69  s_count;...pathi
3a30: 6e 66 6f 2d 3e 68 6f 73 74 6e 61 6d 65 5b 30 5d  nfo->hostname[0]
3a40: 20 3d 20 27 5c 30 27 3b 0a 0a 09 09 69 66 20 28   = '\0';....if (
3a50: 63 68 69 6c 64 72 65 6e 29 20 7b 0a 09 09 09 66  children) {....f
3a60: 6f 72 20 28 73 69 74 65 20 3d 20 73 69 74 65 73  or (site = sites
3a70: 3b 20 73 69 74 65 3b 20 73 69 74 65 20 3d 20 73  ; site; site = s
3a80: 69 74 65 2d 3e 5f 6e 65 78 74 29 20 7b 0a 09 09  ite->_next) {...
3a90: 09 09 6e 6f 64 65 20 3d 20 28 76 6f 69 64 20 2a  ..node = (void *
3aa0: 29 20 63 6b 61 6c 6c 6f 63 28 73 69 7a 65 6f 66  ) ckalloc(sizeof
3ab0: 28 2a 6e 6f 64 65 29 29 3b 0a 09 09 09 09 6e 6f  (*node));.....no
3ac0: 64 65 2d 3e 5f 6e 65 78 74 20 3d 20 2a 63 68 69  de->_next = *chi
3ad0: 6c 64 72 65 6e 3b 0a 09 09 09 09 73 74 72 63 70  ldren;.....strcp
3ae0: 79 28 6e 6f 64 65 2d 3e 6e 61 6d 65 2c 20 73 69  y(node->name, si
3af0: 74 65 2d 3e 6e 61 6d 65 29 3b 0a 09 09 09 09 2a  te->name);.....*
3b00: 63 68 69 6c 64 72 65 6e 20 3d 20 6e 6f 64 65 3b  children = node;
3b10: 0a 09 09 09 7d 0a 09 09 7d 0a 0a 09 09 61 70 70  ....}...}....app
3b20: 66 73 5f 66 72 65 65 5f 6c 69 73 74 5f 73 69 74  fs_free_list_sit
3b30: 65 28 73 69 74 65 73 29 3b 0a 0a 09 09 72 65 74  e(sites);....ret
3b40: 75 72 6e 28 30 29 3b 0a 09 7d 0a 0a 09 70 61 74  urn(0);..}...pat
3b50: 68 20 3d 20 73 74 72 64 75 70 28 5f 70 61 74 68  h = strdup(_path
3b60: 29 3b 0a 09 70 61 74 68 5f 73 20 3d 20 70 61 74  );..path_s = pat
3b70: 68 3b 0a 0a 09 68 6f 73 74 6e 61 6d 65 20 3d 20  h;...hostname =
3b80: 70 61 74 68 20 2b 20 31 3b 0a 09 70 61 63 6b 61  path + 1;..packa
3b90: 67 65 6e 61 6d 65 20 3d 20 73 74 72 63 68 72 28  gename = strchr(
3ba0: 68 6f 73 74 6e 61 6d 65 2c 20 27 2f 27 29 3b 0a  hostname, '/');.
3bb0: 0a 09 69 66 20 28 70 61 63 6b 61 67 65 6e 61 6d  ..if (packagenam
3bc0: 65 20 21 3d 20 4e 55 4c 4c 29 20 7b 0a 09 09 2a  e != NULL) {...*
3bd0: 70 61 63 6b 61 67 65 6e 61 6d 65 20 3d 20 27 5c  packagename = '\
3be0: 30 27 3b 0a 09 09 70 61 63 6b 61 67 65 6e 61 6d  0';...packagenam
3bf0: 65 2b 2b 3b 0a 09 7d 0a 0a 09 73 6e 70 72 69 6e  e++;..}...snprin
3c00: 74 66 28 70 61 74 68 69 6e 66 6f 2d 3e 68 6f 73  tf(pathinfo->hos
3c10: 74 6e 61 6d 65 2c 20 73 69 7a 65 6f 66 28 70 61  tname, sizeof(pa
3c20: 74 68 69 6e 66 6f 2d 3e 68 6f 73 74 6e 61 6d 65  thinfo->hostname
3c30: 29 2c 20 22 25 73 22 2c 20 68 6f 73 74 6e 61 6d  ), "%s", hostnam
3c40: 65 29 3b 0a 0a 09 70 61 63 6b 61 67 65 73 20 3d  e);...packages =
3c50: 20 61 70 70 66 73 5f 67 65 74 69 6e 64 65 78 28   appfs_getindex(
3c60: 68 6f 73 74 6e 61 6d 65 2c 20 26 70 61 63 6b 61  hostname, &packa
3c70: 67 65 73 5f 63 6f 75 6e 74 29 3b 0a 0a 09 69 66  ges_count);...if
3c80: 20 28 70 61 63 6b 61 67 65 73 20 3d 3d 20 4e 55   (packages == NU
3c90: 4c 4c 20 7c 7c 20 70 61 63 6b 61 67 65 73 5f 63  LL || packages_c
3ca0: 6f 75 6e 74 20 3d 3d 20 30 29 20 7b 0a 09 09 41  ount == 0) {...A
3cb0: 50 50 46 53 5f 44 45 42 55 47 28 22 55 6e 61 62  PPFS_DEBUG("Unab
3cc0: 6c 65 20 74 6f 20 66 65 74 63 68 20 70 61 63 6b  le to fetch pack
3cd0: 61 67 65 20 69 6e 64 65 78 20 66 72 6f 6d 20 25  age index from %
3ce0: 73 22 2c 20 68 6f 73 74 6e 61 6d 65 29 3b 0a 0a  s", hostname);..
3cf0: 09 09 66 72 65 65 28 70 61 74 68 5f 73 29 3b 0a  ..free(path_s);.
3d00: 0a 09 09 72 65 74 75 72 6e 28 2d 45 4e 4f 45 4e  ...return(-ENOEN
3d10: 54 29 3b 0a 09 7d 0a 0a 09 69 66 20 28 70 61 63  T);..}...if (pac
3d20: 6b 61 67 65 6e 61 6d 65 20 3d 3d 20 4e 55 4c 4c  kagename == NULL
3d30: 29 20 7b 0a 09 09 2f 2a 20 52 65 71 75 65 73 74  ) {.../* Request
3d40: 20 66 6f 72 20 61 20 73 69 6e 67 6c 65 20 68 6f   for a single ho
3d50: 73 74 6e 61 6d 65 20 2a 2f 0a 09 09 70 61 74 68  stname */...path
3d60: 69 6e 66 6f 2d 3e 74 79 70 65 20 3d 20 41 50 50  info->type = APP
3d70: 46 53 5f 50 41 54 48 54 59 50 45 5f 44 49 52 45  FS_PATHTYPE_DIRE
3d80: 43 54 4f 52 59 3b 0a 09 09 70 61 74 68 69 6e 66  CTORY;...pathinf
3d90: 6f 2d 3e 74 79 70 65 69 6e 66 6f 2e 64 69 72 2e  o->typeinfo.dir.
3da0: 63 68 69 6c 64 63 6f 75 6e 74 20 3d 20 70 61 63  childcount = pac
3db0: 6b 61 67 65 73 5f 63 6f 75 6e 74 3b 0a 0a 09 09  kages_count;....
3dc0: 69 66 20 28 63 68 69 6c 64 72 65 6e 29 20 7b 0a  if (children) {.
3dd0: 09 09 09 66 6f 72 20 28 70 61 63 6b 61 67 65 20  ...for (package
3de0: 3d 20 70 61 63 6b 61 67 65 73 3b 20 70 61 63 6b  = packages; pack
3df0: 61 67 65 3b 20 70 61 63 6b 61 67 65 20 3d 20 70  age; package = p
3e00: 61 63 6b 61 67 65 2d 3e 5f 6e 65 78 74 29 20 7b  ackage->_next) {
3e10: 0a 09 09 09 09 6e 6f 64 65 20 3d 20 28 76 6f 69  .....node = (voi
3e20: 64 20 2a 29 20 63 6b 61 6c 6c 6f 63 28 73 69 7a  d *) ckalloc(siz
3e30: 65 6f 66 28 2a 6e 6f 64 65 29 29 3b 0a 09 09 09  eof(*node));....
3e40: 09 6e 6f 64 65 2d 3e 5f 6e 65 78 74 20 3d 20 2a  .node->_next = *
3e50: 63 68 69 6c 64 72 65 6e 3b 0a 09 09 09 09 73 74  children;.....st
3e60: 72 63 70 79 28 6e 6f 64 65 2d 3e 6e 61 6d 65 2c  rcpy(node->name,
3e70: 20 70 61 63 6b 61 67 65 2d 3e 6e 61 6d 65 29 3b   package->name);
3e80: 0a 09 09 09 09 2a 63 68 69 6c 64 72 65 6e 20 3d  .....*children =
3e90: 20 6e 6f 64 65 3b 0a 09 09 09 7d 0a 09 09 7d 0a   node;....}...}.
3ea0: 0a 09 09 61 70 70 66 73 5f 66 72 65 65 5f 6c 69  ...appfs_free_li
3eb0: 73 74 5f 70 61 63 6b 61 67 65 28 70 61 63 6b 61  st_package(packa
3ec0: 67 65 73 29 3b 0a 0a 09 09 66 72 65 65 28 70 61  ges);....free(pa
3ed0: 74 68 5f 73 29 3b 0a 0a 09 09 72 65 74 75 72 6e  th_s);....return
3ee0: 28 30 29 3b 0a 09 7d 0a 0a 09 6f 73 5f 63 70 75  (0);..}...os_cpu
3ef0: 41 72 63 68 20 3d 20 73 74 72 63 68 72 28 70 61  Arch = strchr(pa
3f00: 63 6b 61 67 65 6e 61 6d 65 2c 20 27 2f 27 29 3b  ckagename, '/');
3f10: 0a 09 69 66 20 28 6f 73 5f 63 70 75 41 72 63 68  ..if (os_cpuArch
3f20: 20 3d 3d 20 4e 55 4c 4c 29 20 7b 0a 09 09 2f 2a   == NULL) {.../*
3f30: 20 52 65 71 75 65 73 74 20 66 6f 72 20 4f 53 20   Request for OS
3f40: 61 6e 64 20 43 50 55 20 41 72 63 68 20 66 6f 72  and CPU Arch for
3f50: 20 61 20 73 70 65 63 69 66 69 63 20 70 61 63 6b   a specific pack
3f60: 61 67 65 20 2a 2f 0a 09 09 70 61 74 68 69 6e 66  age */...pathinf
3f70: 6f 2d 3e 74 79 70 65 20 3d 20 41 50 50 46 53 5f  o->type = APPFS_
3f80: 50 41 54 48 54 59 50 45 5f 44 49 52 45 43 54 4f  PATHTYPE_DIRECTO
3f90: 52 59 3b 0a 0a 09 09 6f 73 5f 63 70 75 41 72 63  RY;....os_cpuArc
3fa0: 68 5f 63 6f 75 6e 74 20 3d 20 30 3b 0a 09 09 66  h_count = 0;...f
3fb0: 6f 72 20 28 70 61 63 6b 61 67 65 20 3d 20 70 61  or (package = pa
3fc0: 63 6b 61 67 65 73 3b 20 70 61 63 6b 61 67 65 3b  ckages; package;
3fd0: 20 70 61 63 6b 61 67 65 20 3d 20 70 61 63 6b 61   package = packa
3fe0: 67 65 2d 3e 5f 6e 65 78 74 29 20 7b 0a 09 09 09  ge->_next) {....
3ff0: 69 66 20 28 73 74 72 63 6d 70 28 70 61 63 6b 61  if (strcmp(packa
4000: 67 65 2d 3e 6e 61 6d 65 2c 20 70 61 63 6b 61 67  ge->name, packag
4010: 65 6e 61 6d 65 29 20 21 3d 20 30 29 20 7b 0a 09  ename) != 0) {..
4020: 09 09 09 41 50 50 46 53 5f 44 45 42 55 47 28 22  ...APPFS_DEBUG("
4030: 53 6b 69 70 70 69 6e 67 20 70 61 63 6b 61 67 65  Skipping package
4040: 20 6e 61 6d 65 64 20 5c 22 25 73 5c 22 2c 20 64   named \"%s\", d
4050: 6f 65 73 20 6e 6f 74 20 6d 61 74 63 68 20 72 65  oes not match re
4060: 71 75 65 73 74 65 64 20 70 61 63 6b 61 67 65 3a  quested package:
4070: 20 5c 22 25 73 5c 22 22 2c 20 70 61 63 6b 61 67   \"%s\"", packag
4080: 65 2d 3e 6e 61 6d 65 2c 20 70 61 63 6b 61 67 65  e->name, package
4090: 6e 61 6d 65 29 3b 0a 0a 09 09 09 09 63 6f 6e 74  name);......cont
40a0: 69 6e 75 65 3b 0a 09 09 09 7d 0a 0a 09 09 09 6f  inue;....}.....o
40b0: 73 5f 63 70 75 41 72 63 68 5f 63 6f 75 6e 74 2b  s_cpuArch_count+
40c0: 2b 3b 0a 0a 09 09 09 69 66 20 28 63 68 69 6c 64  +;.....if (child
40d0: 72 65 6e 29 20 7b 0a 09 09 09 09 6e 6f 64 65 20  ren) {.....node
40e0: 3d 20 28 76 6f 69 64 20 2a 29 20 63 6b 61 6c 6c  = (void *) ckall
40f0: 6f 63 28 73 69 7a 65 6f 66 28 2a 6e 6f 64 65 29  oc(sizeof(*node)
4100: 29 3b 0a 09 09 09 09 6e 6f 64 65 2d 3e 5f 6e 65  );.....node->_ne
4110: 78 74 20 3d 20 2a 63 68 69 6c 64 72 65 6e 3b 0a  xt = *children;.
4120: 09 09 09 09 73 6e 70 72 69 6e 74 66 28 6e 6f 64  ....snprintf(nod
4130: 65 2d 3e 6e 61 6d 65 2c 20 73 69 7a 65 6f 66 28  e->name, sizeof(
4140: 6e 6f 64 65 2d 3e 6e 61 6d 65 29 2c 20 22 25 73  node->name), "%s
4150: 2d 25 73 22 2c 20 70 61 63 6b 61 67 65 2d 3e 6f  -%s", package->o
4160: 73 5f 73 74 72 2c 20 70 61 63 6b 61 67 65 2d 3e  s_str, package->
4170: 63 70 75 41 72 63 68 5f 73 74 72 29 3b 0a 09 09  cpuArch_str);...
4180: 09 09 2a 63 68 69 6c 64 72 65 6e 20 3d 20 6e 6f  ..*children = no
4190: 64 65 3b 0a 09 09 09 7d 0a 09 09 7d 0a 0a 09 09  de;....}...}....
41a0: 61 70 70 66 73 5f 66 72 65 65 5f 6c 69 73 74 5f  appfs_free_list_
41b0: 70 61 63 6b 61 67 65 28 70 61 63 6b 61 67 65 73  package(packages
41c0: 29 3b 0a 0a 09 09 66 72 65 65 28 70 61 74 68 5f  );....free(path_
41d0: 73 29 3b 0a 0a 09 09 70 61 74 68 69 6e 66 6f 2d  s);....pathinfo-
41e0: 3e 74 79 70 65 69 6e 66 6f 2e 64 69 72 2e 63 68  >typeinfo.dir.ch
41f0: 69 6c 64 63 6f 75 6e 74 20 3d 20 6f 73 5f 63 70  ildcount = os_cp
4200: 75 41 72 63 68 5f 63 6f 75 6e 74 3b 0a 0a 09 09  uArch_count;....
4210: 72 65 74 75 72 6e 28 30 29 3b 0a 09 7d 0a 0a 09  return(0);..}...
4220: 2a 6f 73 5f 63 70 75 41 72 63 68 20 3d 20 27 5c  *os_cpuArch = '\
4230: 30 27 3b 0a 09 6f 73 5f 63 70 75 41 72 63 68 2b  0';..os_cpuArch+
4240: 2b 3b 0a 0a 09 76 65 72 73 69 6f 6e 20 3d 20 73  +;...version = s
4250: 74 72 63 68 72 28 6f 73 5f 63 70 75 41 72 63 68  trchr(os_cpuArch
4260: 2c 20 27 2f 27 29 3b 0a 0a 09 69 66 20 28 76 65  , '/');...if (ve
4270: 72 73 69 6f 6e 20 21 3d 20 4e 55 4c 4c 29 20 7b  rsion != NULL) {
4280: 0a 09 09 2a 76 65 72 73 69 6f 6e 20 3d 20 27 5c  ...*version = '\
4290: 30 27 3b 0a 09 09 76 65 72 73 69 6f 6e 2b 2b 3b  0';...version++;
42a0: 0a 09 7d 0a 0a 09 6f 73 20 3d 20 6f 73 5f 63 70  ..}...os = os_cp
42b0: 75 41 72 63 68 3b 0a 09 63 70 75 41 72 63 68 20  uArch;..cpuArch
42c0: 3d 20 73 74 72 63 68 72 28 6f 73 5f 63 70 75 41  = strchr(os_cpuA
42d0: 72 63 68 2c 20 27 2d 27 29 3b 0a 09 69 66 20 28  rch, '-');..if (
42e0: 63 70 75 41 72 63 68 29 20 7b 0a 09 09 2a 63 70  cpuArch) {...*cp
42f0: 75 41 72 63 68 20 3d 20 27 5c 30 27 3b 0a 09 09  uArch = '\0';...
4300: 63 70 75 41 72 63 68 2b 2b 3b 0a 0a 09 09 63 70  cpuArch++;....cp
4310: 75 41 72 63 68 5f 76 61 6c 20 3d 20 61 70 70 66  uArch_val = appf
4320: 73 5f 63 6f 6e 76 65 72 74 5f 63 70 75 41 72 63  s_convert_cpuArc
4330: 68 5f 66 72 6f 6d 53 74 72 69 6e 67 28 63 70 75  h_fromString(cpu
4340: 41 72 63 68 29 3b 0a 09 7d 20 65 6c 73 65 20 7b  Arch);..} else {
4350: 0a 09 09 63 70 75 41 72 63 68 5f 76 61 6c 20 3d  ...cpuArch_val =
4360: 20 41 50 50 46 53 5f 43 50 55 5f 55 4e 4b 4e 4f   APPFS_CPU_UNKNO
4370: 57 4e 3b 0a 09 7d 0a 0a 09 6f 73 5f 76 61 6c 20  WN;..}...os_val
4380: 3d 20 61 70 70 66 73 5f 63 6f 6e 76 65 72 74 5f  = appfs_convert_
4390: 6f 73 5f 66 72 6f 6d 53 74 72 69 6e 67 28 6f 73  os_fromString(os
43a0: 29 3b 0a 0a 09 69 66 20 28 76 65 72 73 69 6f 6e  );...if (version
43b0: 20 3d 3d 20 4e 55 4c 4c 29 20 7b 0a 09 09 2f 2a   == NULL) {.../*
43c0: 20 52 65 71 75 65 73 74 20 66 6f 72 20 76 65 72   Request for ver
43d0: 73 69 6f 6e 20 6c 69 73 74 20 66 6f 72 20 61 20  sion list for a
43e0: 70 61 63 6b 61 67 65 20 6f 6e 20 61 6e 20 4f 53  package on an OS
43f0: 2f 43 50 55 20 2a 2f 0a 09 09 70 61 74 68 69 6e  /CPU */...pathin
4400: 66 6f 2d 3e 74 79 70 65 20 3d 20 41 50 50 46 53  fo->type = APPFS
4410: 5f 50 41 54 48 54 59 50 45 5f 44 49 52 45 43 54  _PATHTYPE_DIRECT
4420: 4f 52 59 3b 0a 0a 09 09 76 65 72 73 69 6f 6e 5f  ORY;....version_
4430: 63 6f 75 6e 74 20 3d 20 30 3b 0a 09 09 66 6f 72  count = 0;...for
4440: 20 28 70 61 63 6b 61 67 65 20 3d 20 70 61 63 6b   (package = pack
4450: 61 67 65 73 3b 20 70 61 63 6b 61 67 65 3b 20 70  ages; package; p
4460: 61 63 6b 61 67 65 20 3d 20 70 61 63 6b 61 67 65  ackage = package
4470: 2d 3e 5f 6e 65 78 74 29 20 7b 0a 09 09 09 69 66  ->_next) {....if
4480: 20 28 73 74 72 63 6d 70 28 70 61 63 6b 61 67 65   (strcmp(package
4490: 2d 3e 6e 61 6d 65 2c 20 70 61 63 6b 61 67 65 6e  ->name, packagen
44a0: 61 6d 65 29 20 21 3d 20 30 29 20 7b 0a 09 09 09  ame) != 0) {....
44b0: 09 41 50 50 46 53 5f 44 45 42 55 47 28 22 53 6b  .APPFS_DEBUG("Sk
44c0: 69 70 70 69 6e 67 20 70 61 63 6b 61 67 65 20 6e  ipping package n
44d0: 61 6d 65 64 20 5c 22 25 73 5c 22 2c 20 64 6f 65  amed \"%s\", doe
44e0: 73 20 6e 6f 74 20 6d 61 74 63 68 20 72 65 71 75  s not match requ
44f0: 65 73 74 65 64 20 70 61 63 6b 61 67 65 3a 20 5c  ested package: \
4500: 22 25 73 5c 22 22 2c 20 70 61 63 6b 61 67 65 2d  "%s\"", package-
4510: 3e 6e 61 6d 65 2c 20 70 61 63 6b 61 67 65 6e 61  >name, packagena
4520: 6d 65 29 3b 0a 0a 09 09 09 09 63 6f 6e 74 69 6e  me);......contin
4530: 75 65 3b 0a 09 09 09 7d 0a 0a 09 09 09 69 66 20  ue;....}.....if
4540: 28 70 61 63 6b 61 67 65 2d 3e 6f 73 20 21 3d 20  (package->os !=
4550: 6f 73 5f 76 61 6c 29 20 7b 0a 09 09 09 09 63 6f  os_val) {.....co
4560: 6e 74 69 6e 75 65 3b 0a 09 09 09 7d 0a 0a 09 09  ntinue;....}....
4570: 09 69 66 20 28 70 61 63 6b 61 67 65 2d 3e 63 70  .if (package->cp
4580: 75 41 72 63 68 20 21 3d 20 63 70 75 41 72 63 68  uArch != cpuArch
4590: 5f 76 61 6c 29 20 7b 0a 09 09 09 09 63 6f 6e 74  _val) {.....cont
45a0: 69 6e 75 65 3b 0a 09 09 09 7d 0a 0a 09 09 09 76  inue;....}.....v
45b0: 65 72 73 69 6f 6e 5f 63 6f 75 6e 74 2b 2b 3b 0a  ersion_count++;.
45c0: 0a 09 09 09 69 66 20 28 63 68 69 6c 64 72 65 6e  ....if (children
45d0: 29 20 7b 0a 09 09 09 09 6e 6f 64 65 20 3d 20 28  ) {.....node = (
45e0: 76 6f 69 64 20 2a 29 20 63 6b 61 6c 6c 6f 63 28  void *) ckalloc(
45f0: 73 69 7a 65 6f 66 28 2a 6e 6f 64 65 29 29 3b 0a  sizeof(*node));.
4600: 09 09 09 09 6e 6f 64 65 2d 3e 5f 6e 65 78 74 20  ....node->_next
4610: 3d 20 2a 63 68 69 6c 64 72 65 6e 3b 0a 09 09 09  = *children;....
4620: 09 73 74 72 63 70 79 28 6e 6f 64 65 2d 3e 6e 61  .strcpy(node->na
4630: 6d 65 2c 20 70 61 63 6b 61 67 65 2d 3e 76 65 72  me, package->ver
4640: 73 69 6f 6e 29 3b 0a 09 09 09 09 2a 63 68 69 6c  sion);.....*chil
4650: 64 72 65 6e 20 3d 20 6e 6f 64 65 3b 0a 09 09 09  dren = node;....
4660: 7d 0a 09 09 7d 0a 0a 09 09 61 70 70 66 73 5f 66  }...}....appfs_f
4670: 72 65 65 5f 6c 69 73 74 5f 70 61 63 6b 61 67 65  ree_list_package
4680: 28 70 61 63 6b 61 67 65 73 29 3b 0a 0a 09 09 66  (packages);....f
4690: 72 65 65 28 70 61 74 68 5f 73 29 3b 0a 0a 09 09  ree(path_s);....
46a0: 70 61 74 68 69 6e 66 6f 2d 3e 74 79 70 65 69 6e  pathinfo->typein
46b0: 66 6f 2e 64 69 72 2e 63 68 69 6c 64 63 6f 75 6e  fo.dir.childcoun
46c0: 74 20 3d 20 76 65 72 73 69 6f 6e 5f 63 6f 75 6e  t = version_coun
46d0: 74 3b 0a 0a 09 09 72 65 74 75 72 6e 28 30 29 3b  t;....return(0);
46e0: 0a 09 7d 0a 0a 09 61 70 70 66 73 5f 66 72 65 65  ..}...appfs_free
46f0: 5f 6c 69 73 74 5f 70 61 63 6b 61 67 65 28 70 61  _list_package(pa
4700: 63 6b 61 67 65 73 29 3b 0a 0a 09 70 61 74 68 20  ckages);...path
4710: 3d 20 73 74 72 63 68 72 28 76 65 72 73 69 6f 6e  = strchr(version
4720: 2c 20 27 2f 27 29 3b 0a 09 69 66 20 28 70 61 74  , '/');..if (pat
4730: 68 20 3d 3d 20 4e 55 4c 4c 29 20 7b 0a 09 09 70  h == NULL) {...p
4740: 61 74 68 20 3d 20 22 22 3b 0a 09 7d 20 65 6c 73  ath = "";..} els
4750: 65 20 7b 0a 09 09 2a 70 61 74 68 20 3d 20 27 5c  e {...*path = '\
4760: 30 27 3b 0a 09 09 70 61 74 68 2b 2b 3b 0a 09 7d  0';...path++;..}
4770: 0a 0a 09 2f 2a 20 52 65 71 75 65 73 74 20 66 6f  .../* Request fo
4780: 72 20 61 20 66 69 6c 65 20 69 6e 20 61 20 73 70  r a file in a sp
4790: 65 63 69 66 69 63 20 70 61 63 6b 61 67 65 20 2a  ecific package *
47a0: 2f 0a 09 41 50 50 46 53 5f 44 45 42 55 47 28 22  /..APPFS_DEBUG("
47b0: 52 65 71 75 65 73 74 69 6e 67 20 69 6e 66 6f 72  Requesting infor
47c0: 6d 61 74 69 6f 6e 20 66 6f 72 20 68 6f 73 74 6e  mation for hostn
47d0: 61 6d 65 20 3d 20 25 73 2c 20 70 61 63 6b 61 67  ame = %s, packag
47e0: 65 20 3d 20 25 73 2c 20 6f 73 20 3d 20 25 73 2c  e = %s, os = %s,
47f0: 20 63 70 75 41 72 63 68 20 3d 20 25 73 2c 20 76   cpuArch = %s, v
4800: 65 72 73 69 6f 6e 20 3d 20 25 73 2c 20 70 61 74  ersion = %s, pat
4810: 68 20 3d 20 25 73 22 2c 20 0a 09 09 68 6f 73 74  h = %s", ...host
4820: 6e 61 6d 65 2c 20 70 61 63 6b 61 67 65 6e 61 6d  name, packagenam
4830: 65 2c 20 6f 73 2c 20 63 70 75 41 72 63 68 2c 20  e, os, cpuArch,
4840: 76 65 72 73 69 6f 6e 2c 20 70 61 74 68 0a 09 29  version, path..)
4850: 3b 0a 0a 09 70 61 63 6b 61 67 65 5f 68 61 73 68  ;...package_hash
4860: 20 3d 20 61 70 70 66 73 5f 6c 6f 6f 6b 75 70 5f   = appfs_lookup_
4870: 70 61 63 6b 61 67 65 5f 68 61 73 68 28 68 6f 73  package_hash(hos
4880: 74 6e 61 6d 65 2c 20 70 61 63 6b 61 67 65 6e 61  tname, packagena
4890: 6d 65 2c 20 6f 73 2c 20 63 70 75 41 72 63 68 2c  me, os, cpuArch,
48a0: 20 76 65 72 73 69 6f 6e 29 3b 0a 09 69 66 20 28   version);..if (
48b0: 70 61 63 6b 61 67 65 5f 68 61 73 68 20 3d 3d 20  package_hash ==
48c0: 4e 55 4c 4c 29 20 7b 0a 09 09 66 72 65 65 28 70  NULL) {...free(p
48d0: 61 74 68 5f 73 29 3b 0a 0a 09 09 72 65 74 75 72  ath_s);....retur
48e0: 6e 28 2d 45 4e 4f 45 4e 54 29 3b 0a 09 7d 0a 0a  n(-ENOENT);..}..
48f0: 09 41 50 50 46 53 5f 44 45 42 55 47 28 22 20 20  .APPFS_DEBUG("
4900: 2e 2e 2e 20 77 68 69 63 68 20 68 61 73 68 20 61  ... which hash a
4910: 20 68 61 73 68 20 6f 66 20 25 73 22 2c 20 70 61   hash of %s", pa
4920: 63 6b 61 67 65 5f 68 61 73 68 29 3b 0a 0a 09 69  ckage_hash);...i
4930: 66 20 28 73 74 72 63 6d 70 28 70 61 74 68 2c 20  f (strcmp(path,
4940: 22 22 29 20 3d 3d 20 30 29 20 7b 0a 09 09 70 61  "") == 0) {...pa
4950: 74 68 69 6e 66 6f 2d 3e 74 79 70 65 20 3d 20 41  thinfo->type = A
4960: 50 50 46 53 5f 50 41 54 48 54 59 50 45 5f 44 49  PPFS_PATHTYPE_DI
4970: 52 45 43 54 4f 52 59 3b 0a 09 7d 20 65 6c 73 65  RECTORY;..} else
4980: 20 7b 0a 09 09 66 69 6c 65 69 6e 66 6f 5f 72 65   {...fileinfo_re
4990: 74 20 3d 20 61 70 70 66 73 5f 67 65 74 66 69 6c  t = appfs_getfil
49a0: 65 69 6e 66 6f 28 68 6f 73 74 6e 61 6d 65 2c 20  einfo(hostname,
49b0: 70 61 63 6b 61 67 65 5f 68 61 73 68 2c 20 70 61  package_hash, pa
49c0: 74 68 2c 20 70 61 74 68 69 6e 66 6f 29 3b 0a 09  th, pathinfo);..
49d0: 09 69 66 20 28 66 69 6c 65 69 6e 66 6f 5f 72 65  .if (fileinfo_re
49e0: 74 20 21 3d 20 30 29 20 7b 0a 09 09 09 66 72 65  t != 0) {....fre
49f0: 65 28 70 61 74 68 5f 73 29 3b 0a 0a 09 09 09 72  e(path_s);.....r
4a00: 65 74 75 72 6e 28 66 69 6c 65 69 6e 66 6f 5f 72  eturn(fileinfo_r
4a10: 65 74 29 3b 0a 09 09 7d 0a 09 7d 0a 0a 09 69 66  et);...}..}...if
4a20: 20 28 70 61 74 68 69 6e 66 6f 2d 3e 74 79 70 65   (pathinfo->type
4a30: 20 3d 3d 20 41 50 50 46 53 5f 50 41 54 48 54 59   == APPFS_PATHTY
4a40: 50 45 5f 44 49 52 45 43 54 4f 52 59 29 20 7b 0a  PE_DIRECTORY) {.
4a50: 09 09 64 69 72 5f 63 68 69 6c 64 72 65 6e 20 3d  ..dir_children =
4a60: 20 61 70 70 66 73 5f 67 65 74 63 68 69 6c 64 72   appfs_getchildr
4a70: 65 6e 28 68 6f 73 74 6e 61 6d 65 2c 20 70 61 63  en(hostname, pac
4a80: 6b 61 67 65 5f 68 61 73 68 2c 20 70 61 74 68 2c  kage_hash, path,
4a90: 20 26 66 69 6c 65 73 5f 63 6f 75 6e 74 29 3b 0a   &files_count);.
4aa0: 0a 09 09 69 66 20 28 64 69 72 5f 63 68 69 6c 64  ...if (dir_child
4ab0: 72 65 6e 20 21 3d 20 4e 55 4c 4c 29 20 7b 0a 09  ren != NULL) {..
4ac0: 09 09 70 61 74 68 69 6e 66 6f 2d 3e 74 79 70 65  ..pathinfo->type
4ad0: 69 6e 66 6f 2e 64 69 72 2e 63 68 69 6c 64 63 6f  info.dir.childco
4ae0: 75 6e 74 20 3d 20 66 69 6c 65 73 5f 63 6f 75 6e  unt = files_coun
4af0: 74 3b 0a 09 09 7d 0a 0a 09 09 69 66 20 28 63 68  t;...}....if (ch
4b00: 69 6c 64 72 65 6e 29 20 7b 0a 09 09 09 2a 63 68  ildren) {....*ch
4b10: 69 6c 64 72 65 6e 20 3d 20 64 69 72 5f 63 68 69  ildren = dir_chi
4b20: 6c 64 72 65 6e 3b 0a 09 09 7d 0a 09 7d 0a 0a 09  ldren;...}..}...
4b30: 66 72 65 65 28 70 61 74 68 5f 73 29 3b 0a 0a 09  free(path_s);...
4b40: 72 65 74 75 72 6e 28 30 29 3b 0a 7d 0a 0a 73 74  return(0);.}..st
4b50: 61 74 69 63 20 69 6e 74 20 61 70 70 66 73 5f 66  atic int appfs_f
4b60: 75 73 65 5f 67 65 74 61 74 74 72 28 63 6f 6e 73  use_getattr(cons
4b70: 74 20 63 68 61 72 20 2a 70 61 74 68 2c 20 73 74  t char *path, st
4b80: 72 75 63 74 20 73 74 61 74 20 2a 73 74 62 75 66  ruct stat *stbuf
4b90: 29 20 7b 0a 09 73 74 72 75 63 74 20 61 70 70 66  ) {..struct appf
4ba0: 73 5f 70 61 74 68 69 6e 66 6f 20 70 61 74 68 69  s_pathinfo pathi
4bb0: 6e 66 6f 3b 0a 09 69 6e 74 20 72 65 73 20 3d 20  nfo;..int res =
4bc0: 30 3b 0a 0a 09 41 50 50 46 53 5f 44 45 42 55 47  0;...APPFS_DEBUG
4bd0: 28 22 45 6e 74 65 72 20 28 70 61 74 68 20 3d 20  ("Enter (path =
4be0: 25 73 2c 20 2e 2e 2e 29 22 2c 20 70 61 74 68 29  %s, ...)", path)
4bf0: 3b 0a 0a 09 72 65 73 20 3d 20 61 70 70 66 73 5f  ;...res = appfs_
4c00: 67 65 74 5f 70 61 74 68 5f 69 6e 66 6f 28 70 61  get_path_info(pa
4c10: 74 68 2c 20 26 70 61 74 68 69 6e 66 6f 2c 20 4e  th, &pathinfo, N
4c20: 55 4c 4c 29 3b 0a 09 69 66 20 28 72 65 73 20 21  ULL);..if (res !
4c30: 3d 20 30 29 20 7b 0a 09 09 72 65 74 75 72 6e 28  = 0) {...return(
4c40: 72 65 73 29 3b 0a 09 7d 0a 0a 09 6d 65 6d 73 65  res);..}...memse
4c50: 74 28 73 74 62 75 66 2c 20 30 2c 20 73 69 7a 65  t(stbuf, 0, size
4c60: 6f 66 28 73 74 72 75 63 74 20 73 74 61 74 29 29  of(struct stat))
4c70: 3b 0a 0a 09 73 74 62 75 66 2d 3e 73 74 5f 6d 74  ;...stbuf->st_mt
4c80: 69 6d 65 20 3d 20 70 61 74 68 69 6e 66 6f 2e 74  ime = pathinfo.t
4c90: 69 6d 65 3b 0a 09 73 74 62 75 66 2d 3e 73 74 5f  ime;..stbuf->st_
4ca0: 63 74 69 6d 65 20 3d 20 70 61 74 68 69 6e 66 6f  ctime = pathinfo
4cb0: 2e 74 69 6d 65 3b 0a 09 73 74 62 75 66 2d 3e 73  .time;..stbuf->s
4cc0: 74 5f 61 74 69 6d 65 20 3d 20 70 61 74 68 69 6e  t_atime = pathin
4cd0: 66 6f 2e 74 69 6d 65 3b 0a 0a 09 69 66 20 28 70  fo.time;...if (p
4ce0: 61 74 68 69 6e 66 6f 2e 74 79 70 65 20 3d 3d 20  athinfo.type ==
4cf0: 41 50 50 46 53 5f 50 41 54 48 54 59 50 45 5f 44  APPFS_PATHTYPE_D
4d00: 49 52 45 43 54 4f 52 59 29 20 7b 0a 09 09 73 74  IRECTORY) {...st
4d10: 62 75 66 2d 3e 73 74 5f 6d 6f 64 65 20 3d 20 53  buf->st_mode = S
4d20: 5f 49 46 44 49 52 20 7c 20 30 35 35 35 3b 0a 09  _IFDIR | 0555;..
4d30: 09 73 74 62 75 66 2d 3e 73 74 5f 6e 6c 69 6e 6b  .stbuf->st_nlink
4d40: 20 3d 20 32 20 2b 20 70 61 74 68 69 6e 66 6f 2e   = 2 + pathinfo.
4d50: 74 79 70 65 69 6e 66 6f 2e 64 69 72 2e 63 68 69  typeinfo.dir.chi
4d60: 6c 64 63 6f 75 6e 74 3b 0a 09 7d 20 65 6c 73 65  ldcount;..} else
4d70: 20 7b 0a 09 09 69 66 20 28 70 61 74 68 69 6e 66   {...if (pathinf
4d80: 6f 2e 74 79 70 65 69 6e 66 6f 2e 66 69 6c 65 2e  o.typeinfo.file.
4d90: 65 78 65 63 75 74 61 62 6c 65 29 20 7b 0a 09 09  executable) {...
4da0: 09 73 74 62 75 66 2d 3e 73 74 5f 6d 6f 64 65 20  .stbuf->st_mode
4db0: 3d 20 53 5f 49 46 52 45 47 20 7c 20 30 35 35 35  = S_IFREG | 0555
4dc0: 3b 0a 09 09 7d 20 65 6c 73 65 20 7b 0a 09 09 09  ;...} else {....
4dd0: 73 74 62 75 66 2d 3e 73 74 5f 6d 6f 64 65 20 3d  stbuf->st_mode =
4de0: 20 53 5f 49 46 52 45 47 20 7c 20 30 34 34 34 3b   S_IFREG | 0444;
4df0: 0a 09 09 7d 0a 0a 09 09 73 74 62 75 66 2d 3e 73  ...}....stbuf->s
4e00: 74 5f 6e 6c 69 6e 6b 20 3d 20 31 3b 0a 09 09 73  t_nlink = 1;...s
4e10: 74 62 75 66 2d 3e 73 74 5f 73 69 7a 65 20 3d 20  tbuf->st_size =
4e20: 70 61 74 68 69 6e 66 6f 2e 74 79 70 65 69 6e 66  pathinfo.typeinf
4e30: 6f 2e 66 69 6c 65 2e 73 69 7a 65 3b 0a 09 7d 0a  o.file.size;..}.
4e40: 0a 09 72 65 74 75 72 6e 20 72 65 73 3b 0a 7d 0a  ..return res;.}.
4e50: 0a 73 74 61 74 69 63 20 69 6e 74 20 61 70 70 66  .static int appf
4e60: 73 5f 66 75 73 65 5f 72 65 61 64 64 69 72 28 63  s_fuse_readdir(c
4e70: 6f 6e 73 74 20 63 68 61 72 20 2a 70 61 74 68 2c  onst char *path,
4e80: 20 76 6f 69 64 20 2a 62 75 66 2c 20 66 75 73 65   void *buf, fuse
4e90: 5f 66 69 6c 6c 5f 64 69 72 5f 74 20 66 69 6c 6c  _fill_dir_t fill
4ea0: 65 72 2c 20 6f 66 66 5f 74 20 6f 66 66 73 65 74  er, off_t offset
4eb0: 2c 20 73 74 72 75 63 74 20 66 75 73 65 5f 66 69  , struct fuse_fi
4ec0: 6c 65 5f 69 6e 66 6f 20 2a 66 69 29 20 7b 0a 09  le_info *fi) {..
4ed0: 73 74 72 75 63 74 20 61 70 70 66 73 5f 70 61 74  struct appfs_pat
4ee0: 68 69 6e 66 6f 20 70 61 74 68 69 6e 66 6f 3b 0a  hinfo pathinfo;.
4ef0: 09 73 74 72 75 63 74 20 61 70 70 66 73 5f 63 68  .struct appfs_ch
4f00: 69 6c 64 72 65 6e 20 2a 63 68 69 6c 64 72 65 6e  ildren *children
4f10: 2c 20 2a 63 68 69 6c 64 3b 0a 09 69 6e 74 20 72  , *child;..int r
4f20: 65 74 76 61 6c 3b 0a 0a 09 41 50 50 46 53 5f 44  etval;...APPFS_D
4f30: 45 42 55 47 28 22 45 6e 74 65 72 20 28 70 61 74  EBUG("Enter (pat
4f40: 68 20 3d 20 25 73 2c 20 2e 2e 2e 29 22 2c 20 70  h = %s, ...)", p
4f50: 61 74 68 29 3b 0a 0a 09 72 65 74 76 61 6c 20 3d  ath);...retval =
4f60: 20 61 70 70 66 73 5f 67 65 74 5f 70 61 74 68 5f   appfs_get_path_
4f70: 69 6e 66 6f 28 70 61 74 68 2c 20 26 70 61 74 68  info(path, &path
4f80: 69 6e 66 6f 2c 20 26 63 68 69 6c 64 72 65 6e 29  info, &children)
4f90: 3b 0a 09 69 66 20 28 72 65 74 76 61 6c 20 21 3d  ;..if (retval !=
4fa0: 20 30 29 20 7b 0a 09 09 72 65 74 75 72 6e 28 72   0) {...return(r
4fb0: 65 74 76 61 6c 29 3b 0a 09 7d 0a 0a 09 66 69 6c  etval);..}...fil
4fc0: 6c 65 72 28 62 75 66 2c 20 22 2e 22 2c 20 4e 55  ler(buf, ".", NU
4fd0: 4c 4c 2c 20 30 29 3b 0a 09 66 69 6c 6c 65 72 28  LL, 0);..filler(
4fe0: 62 75 66 2c 20 22 2e 2e 22 2c 20 4e 55 4c 4c 2c  buf, "..", NULL,
4ff0: 20 30 29 3b 0a 0a 09 66 6f 72 20 28 63 68 69 6c   0);...for (chil
5000: 64 20 3d 20 63 68 69 6c 64 72 65 6e 3b 20 63 68  d = children; ch
5010: 69 6c 64 3b 20 63 68 69 6c 64 20 3d 20 63 68 69  ild; child = chi
5020: 6c 64 2d 3e 5f 6e 65 78 74 29 20 7b 0a 09 09 66  ld->_next) {...f
5030: 69 6c 6c 65 72 28 62 75 66 2c 20 63 68 69 6c 64  iller(buf, child
5040: 2d 3e 6e 61 6d 65 2c 20 4e 55 4c 4c 2c 20 30 29  ->name, NULL, 0)
5050: 3b 0a 09 7d 0a 0a 09 61 70 70 66 73 5f 66 72 65  ;..}...appfs_fre
5060: 65 5f 6c 69 73 74 5f 63 68 69 6c 64 72 65 6e 28  e_list_children(
5070: 63 68 69 6c 64 72 65 6e 29 3b 0a 0a 09 72 65 74  children);...ret
5080: 75 72 6e 28 30 29 3b 0a 7d 0a 0a 73 74 61 74 69  urn(0);.}..stati
5090: 63 20 69 6e 74 20 61 70 70 66 73 5f 66 75 73 65  c int appfs_fuse
50a0: 5f 6f 70 65 6e 28 63 6f 6e 73 74 20 63 68 61 72  _open(const char
50b0: 20 2a 70 61 74 68 2c 20 73 74 72 75 63 74 20 66   *path, struct f
50c0: 75 73 65 5f 66 69 6c 65 5f 69 6e 66 6f 20 2a 66  use_file_info *f
50d0: 69 29 20 7b 0a 09 73 74 72 75 63 74 20 61 70 70  i) {..struct app
50e0: 66 73 5f 70 61 74 68 69 6e 66 6f 20 70 61 74 68  fs_pathinfo path
50f0: 69 6e 66 6f 3b 0a 09 63 6f 6e 73 74 20 63 68 61  info;..const cha
5100: 72 20 2a 72 65 61 6c 5f 70 61 74 68 3b 0a 09 69  r *real_path;..i
5110: 6e 74 20 66 68 3b 0a 09 69 6e 74 20 67 70 69 5f  nt fh;..int gpi_
5120: 72 65 74 3b 0a 0a 09 41 50 50 46 53 5f 44 45 42  ret;...APPFS_DEB
5130: 55 47 28 22 45 6e 74 65 72 20 28 70 61 74 68 20  UG("Enter (path
5140: 3d 20 25 73 2c 20 2e 2e 2e 29 22 2c 20 70 61 74  = %s, ...)", pat
5150: 68 29 3b 0a 0a 09 69 66 20 28 28 66 69 2d 3e 66  h);...if ((fi->f
5160: 6c 61 67 73 20 26 20 33 29 20 21 3d 20 4f 5f 52  lags & 3) != O_R
5170: 44 4f 4e 4c 59 29 20 7b 0a 20 20 20 20 20 20 20  DONLY) {.
5180: 20 20 20 20 20 20 20 20 20 72 65 74 75 72 6e 28           return(
5190: 2d 45 41 43 43 45 53 29 3b 0a 09 7d 0a 0a 09 67  -EACCES);..}...g
51a0: 70 69 5f 72 65 74 20 3d 20 61 70 70 66 73 5f 67  pi_ret = appfs_g
51b0: 65 74 5f 70 61 74 68 5f 69 6e 66 6f 28 70 61 74  et_path_info(pat
51c0: 68 2c 20 26 70 61 74 68 69 6e 66 6f 2c 20 4e 55  h, &pathinfo, NU
51d0: 4c 4c 29 3b 0a 09 69 66 20 28 67 70 69 5f 72 65  LL);..if (gpi_re
51e0: 74 20 21 3d 20 30 29 20 7b 0a 09 09 72 65 74 75  t != 0) {...retu
51f0: 72 6e 28 67 70 69 5f 72 65 74 29 3b 0a 09 7d 0a  rn(gpi_ret);..}.
5200: 0a 09 69 66 20 28 70 61 74 68 69 6e 66 6f 2e 74  ..if (pathinfo.t
5210: 79 70 65 20 3d 3d 20 41 50 50 46 53 5f 50 41 54  ype == APPFS_PAT
5220: 48 54 59 50 45 5f 44 49 52 45 43 54 4f 52 59 29  HTYPE_DIRECTORY)
5230: 20 7b 0a 09 09 72 65 74 75 72 6e 28 2d 45 49 53   {...return(-EIS
5240: 44 49 52 29 3b 0a 09 7d 0a 0a 09 72 65 61 6c 5f  DIR);..}...real_
5250: 70 61 74 68 20 3d 20 61 70 70 66 73 5f 67 65 74  path = appfs_get
5260: 66 69 6c 65 28 70 61 74 68 69 6e 66 6f 2e 68 6f  file(pathinfo.ho
5270: 73 74 6e 61 6d 65 2c 20 70 61 74 68 69 6e 66 6f  stname, pathinfo
5280: 2e 74 79 70 65 69 6e 66 6f 2e 66 69 6c 65 2e 73  .typeinfo.file.s
5290: 68 61 31 29 3b 0a 09 69 66 20 28 72 65 61 6c 5f  ha1);..if (real_
52a0: 70 61 74 68 20 3d 3d 20 4e 55 4c 4c 29 20 7b 0a  path == NULL) {.
52b0: 09 09 72 65 74 75 72 6e 28 2d 45 49 4f 29 3b 0a  ..return(-EIO);.
52c0: 09 7d 0a 0a 09 66 68 20 3d 20 6f 70 65 6e 28 72  .}...fh = open(r
52d0: 65 61 6c 5f 70 61 74 68 2c 20 4f 5f 52 44 4f 4e  eal_path, O_RDON
52e0: 4c 59 29 3b 0a 09 66 72 65 65 28 28 76 6f 69 64  LY);..free((void
52f0: 20 2a 29 20 72 65 61 6c 5f 70 61 74 68 29 3b 0a   *) real_path);.
5300: 09 69 66 20 28 66 68 20 3c 20 30 29 20 7b 0a 09  .if (fh < 0) {..
5310: 09 72 65 74 75 72 6e 28 2d 45 49 4f 29 3b 0a 09  .return(-EIO);..
5320: 7d 0a 0a 09 66 69 2d 3e 66 68 20 3d 20 66 68 3b  }...fi->fh = fh;
5330: 0a 0a 09 72 65 74 75 72 6e 28 30 29 3b 0a 7d 0a  ...return(0);.}.
5340: 0a 73 74 61 74 69 63 20 69 6e 74 20 61 70 70 66  .static int appf
5350: 73 5f 66 75 73 65 5f 72 65 61 64 28 63 6f 6e 73  s_fuse_read(cons
5360: 74 20 63 68 61 72 20 2a 70 61 74 68 2c 20 63 68  t char *path, ch
5370: 61 72 20 2a 62 75 66 2c 20 73 69 7a 65 5f 74 20  ar *buf, size_t
5380: 73 69 7a 65 2c 20 6f 66 66 5f 74 20 6f 66 66 73  size, off_t offs
5390: 65 74 2c 20 73 74 72 75 63 74 20 66 75 73 65 5f  et, struct fuse_
53a0: 66 69 6c 65 5f 69 6e 66 6f 20 2a 66 69 29 20 7b  file_info *fi) {
53b0: 0a 09 6f 66 66 5f 74 20 6c 73 65 65 6b 5f 72 65  ..off_t lseek_re
53c0: 74 3b 0a 09 73 73 69 7a 65 5f 74 20 72 65 61 64  t;..ssize_t read
53d0: 5f 72 65 74 3b 0a 0a 09 41 50 50 46 53 5f 44 45  _ret;...APPFS_DE
53e0: 42 55 47 28 22 45 6e 74 65 72 20 28 70 61 74 68  BUG("Enter (path
53f0: 20 3d 20 25 73 2c 20 2e 2e 2e 29 22 2c 20 70 61   = %s, ...)", pa
5400: 74 68 29 3b 0a 0a 09 6c 73 65 65 6b 5f 72 65 74  th);...lseek_ret
5410: 20 3d 20 6c 73 65 65 6b 28 66 69 2d 3e 66 68 2c   = lseek(fi->fh,
5420: 20 6f 66 66 73 65 74 2c 20 53 45 45 4b 5f 53 45   offset, SEEK_SE
5430: 54 29 3b 0a 09 69 66 20 28 6c 73 65 65 6b 5f 72  T);..if (lseek_r
5440: 65 74 20 21 3d 20 6f 66 66 73 65 74 29 20 7b 0a  et != offset) {.
5450: 09 09 72 65 74 75 72 6e 28 2d 45 49 4f 29 3b 0a  ..return(-EIO);.
5460: 09 7d 0a 0a 09 72 65 61 64 5f 72 65 74 20 3d 20  .}...read_ret =
5470: 72 65 61 64 28 66 69 2d 3e 66 68 2c 20 62 75 66  read(fi->fh, buf
5480: 2c 20 73 69 7a 65 29 3b 0a 0a 09 72 65 74 75 72  , size);...retur
5490: 6e 28 72 65 61 64 5f 72 65 74 29 3b 0a 7d 0a 0a  n(read_ret);.}..
54a0: 23 69 66 64 65 66 20 41 50 50 46 53 5f 54 45 53  #ifdef APPFS_TES
54b0: 54 5f 44 52 49 56 45 52 0a 73 74 61 74 69 63 20  T_DRIVER.static
54c0: 69 6e 74 20 61 70 70 66 73 5f 74 65 73 74 5f 64  int appfs_test_d
54d0: 72 69 76 65 72 28 76 6f 69 64 29 20 7b 0a 09 73  river(void) {..s
54e0: 74 72 75 63 74 20 61 70 70 66 73 5f 73 69 74 65  truct appfs_site
54f0: 20 2a 73 69 74 65 73 2c 20 2a 73 69 74 65 3b 0a   *sites, *site;.
5500: 09 73 74 72 75 63 74 20 61 70 70 66 73 5f 70 61  .struct appfs_pa
5510: 63 6b 61 67 65 20 2a 70 61 63 6b 61 67 65 73 2c  ckage *packages,
5520: 20 2a 70 61 63 6b 61 67 65 3b 0a 09 73 74 72 75   *package;..stru
5530: 63 74 20 61 70 70 66 73 5f 63 68 69 6c 64 72 65  ct appfs_childre
5540: 6e 20 2a 66 69 6c 65 73 2c 20 2a 66 69 6c 65 3b  n *files, *file;
5550: 0a 09 63 68 61 72 20 2a 73 68 61 31 20 3d 20 4e  ..char *sha1 = N
5560: 55 4c 4c 3b 0a 09 69 6e 74 20 70 61 63 6b 61 67  ULL;..int packag
5570: 65 73 5f 63 6f 75 6e 74 20 3d 20 30 2c 20 73 69  es_count = 0, si
5580: 74 65 73 5f 63 6f 75 6e 74 20 3d 20 30 2c 20 66  tes_count = 0, f
5590: 69 6c 65 73 5f 63 6f 75 6e 74 3b 0a 0a 09 73 69  iles_count;...si
55a0: 74 65 73 20 3d 20 61 70 70 66 73 5f 67 65 74 73  tes = appfs_gets
55b0: 69 74 65 73 28 26 73 69 74 65 73 5f 63 6f 75 6e  ites(&sites_coun
55c0: 74 29 3b 0a 09 70 72 69 6e 74 66 28 22 53 69 74  t);..printf("Sit
55d0: 65 73 3a 5c 6e 22 29 3b 0a 09 66 6f 72 20 28 73  es:\n");..for (s
55e0: 69 74 65 20 3d 20 73 69 74 65 73 3b 20 73 69 74  ite = sites; sit
55f0: 65 3b 20 73 69 74 65 20 3d 20 73 69 74 65 2d 3e  e; site = site->
5600: 5f 6e 65 78 74 29 20 7b 0a 09 09 70 72 69 6e 74  _next) {...print
5610: 66 28 22 5c 74 6e 61 6d 65 20 3d 20 25 73 5c 6e  f("\tname = %s\n
5620: 22 2c 20 73 69 74 65 2d 3e 6e 61 6d 65 29 3b 0a  ", site->name);.
5630: 09 7d 0a 0a 09 61 70 70 66 73 5f 66 72 65 65 5f  .}...appfs_free_
5640: 6c 69 73 74 5f 73 69 74 65 28 73 69 74 65 73 29  list_site(sites)
5650: 3b 0a 0a 09 70 61 63 6b 61 67 65 73 20 3d 20 61  ;...packages = a
5660: 70 70 66 73 5f 67 65 74 69 6e 64 65 78 28 22 72  ppfs_getindex("r
5670: 6b 65 65 6e 65 2e 6f 72 67 22 2c 20 26 70 61 63  keene.org", &pac
5680: 6b 61 67 65 73 5f 63 6f 75 6e 74 29 3b 0a 09 69  kages_count);..i
5690: 66 20 28 70 61 63 6b 61 67 65 73 20 3d 3d 20 4e  f (packages == N
56a0: 55 4c 4c 20 7c 7c 20 70 61 63 6b 61 67 65 73 5f  ULL || packages_
56b0: 63 6f 75 6e 74 20 3d 3d 20 30 29 20 7b 0a 09 09  count == 0) {...
56c0: 66 70 72 69 6e 74 66 28 73 74 64 65 72 72 2c 20  fprintf(stderr,
56d0: 22 55 6e 61 62 6c 65 20 74 6f 20 66 65 74 63 68  "Unable to fetch
56e0: 20 70 61 63 6b 61 67 65 20 69 6e 64 65 78 20 66   package index f
56f0: 72 6f 6d 20 72 6b 65 65 6e 65 2e 6f 72 67 2e 5c  rom rkeene.org.\
5700: 6e 22 29 3b 0a 0a 09 09 72 65 74 75 72 6e 28 31  n");....return(1
5710: 29 3b 0a 09 7d 0a 0a 09 66 6f 72 20 28 70 61 63  );..}...for (pac
5720: 6b 61 67 65 20 3d 20 70 61 63 6b 61 67 65 73 3b  kage = packages;
5730: 20 70 61 63 6b 61 67 65 3b 20 70 61 63 6b 61 67   package; packag
5740: 65 20 3d 20 70 61 63 6b 61 67 65 2d 3e 5f 6e 65  e = package->_ne
5750: 78 74 29 20 7b 0a 09 09 73 68 61 31 20 3d 20 70  xt) {...sha1 = p
5760: 61 63 6b 61 67 65 2d 3e 73 68 61 31 3b 0a 0a 09  ackage->sha1;...
5770: 09 70 72 69 6e 74 66 28 22 50 61 63 6b 61 67 65  .printf("Package
5780: 3a 5c 6e 5c 74 6e 61 6d 65 20 3d 20 25 73 5c 6e  :\n\tname = %s\n
5790: 5c 74 76 65 72 73 69 6f 6e 20 3d 20 25 73 5c 6e  \tversion = %s\n
57a0: 5c 74 73 68 61 31 20 3d 20 25 73 5c 6e 5c 74 6f  \tsha1 = %s\n\to
57b0: 73 20 3d 20 25 73 5c 6e 5c 74 63 70 75 41 72 63  s = %s\n\tcpuArc
57c0: 68 20 3d 20 25 73 5c 6e 22 2c 0a 09 09 09 70 61  h = %s\n",....pa
57d0: 63 6b 61 67 65 2d 3e 6e 61 6d 65 2c 0a 09 09 09  ckage->name,....
57e0: 70 61 63 6b 61 67 65 2d 3e 76 65 72 73 69 6f 6e  package->version
57f0: 2c 0a 09 09 09 70 61 63 6b 61 67 65 2d 3e 73 68  ,....package->sh
5800: 61 31 2c 0a 09 09 09 61 70 70 66 73 5f 63 6f 6e  a1,....appfs_con
5810: 76 65 72 74 5f 6f 73 5f 74 6f 53 74 72 69 6e 67  vert_os_toString
5820: 28 70 61 63 6b 61 67 65 2d 3e 6f 73 29 2c 0a 09  (package->os),..
5830: 09 09 61 70 70 66 73 5f 63 6f 6e 76 65 72 74 5f  ..appfs_convert_
5840: 63 70 75 41 72 63 68 5f 74 6f 53 74 72 69 6e 67  cpuArch_toString
5850: 28 70 61 63 6b 61 67 65 2d 3e 63 70 75 41 72 63  (package->cpuArc
5860: 68 29 0a 09 09 29 3b 0a 09 7d 0a 0a 09 66 69 6c  h)...);..}...fil
5870: 65 73 20 3d 20 61 70 70 66 73 5f 67 65 74 63 68  es = appfs_getch
5880: 69 6c 64 72 65 6e 28 22 72 6b 65 65 6e 65 2e 6f  ildren("rkeene.o
5890: 72 67 22 2c 20 73 68 61 31 2c 20 22 22 2c 20 26  rg", sha1, "", &
58a0: 66 69 6c 65 73 5f 63 6f 75 6e 74 29 3b 0a 09 69  files_count);..i
58b0: 66 20 28 66 69 6c 65 73 20 3d 3d 20 4e 55 4c 4c  f (files == NULL
58c0: 29 20 7b 0a 09 09 66 70 72 69 6e 74 66 28 73 74  ) {...fprintf(st
58d0: 64 65 72 72 2c 20 22 55 6e 61 62 6c 65 20 74 6f  derr, "Unable to
58e0: 20 6c 69 73 74 20 66 69 6c 65 73 20 69 6e 20 74   list files in t
58f0: 68 65 20 6c 61 73 74 20 70 61 63 6b 61 67 65 2e  he last package.
5900: 5c 6e 22 29 3b 0a 0a 09 09 72 65 74 75 72 6e 28  \n");....return(
5910: 31 29 3b 0a 09 7d 0a 0a 09 70 72 69 6e 74 66 28  1);..}...printf(
5920: 22 46 69 6c 65 73 3a 5c 6e 22 29 3b 0a 09 66 6f  "Files:\n");..fo
5930: 72 20 28 66 69 6c 65 20 3d 20 66 69 6c 65 73 3b  r (file = files;
5940: 20 66 69 6c 65 3b 20 66 69 6c 65 20 3d 20 66 69   file; file = fi
5950: 6c 65 2d 3e 5f 6e 65 78 74 29 20 7b 0a 09 09 70  le->_next) {...p
5960: 72 69 6e 74 66 28 22 5c 74 25 73 5c 6e 22 2c 20  rintf("\t%s\n",
5970: 66 69 6c 65 2d 3e 6e 61 6d 65 29 3b 0a 09 7d 0a  file->name);..}.
5980: 0a 09 61 70 70 66 73 5f 66 72 65 65 5f 6c 69 73  ..appfs_free_lis
5990: 74 5f 63 68 69 6c 64 72 65 6e 28 66 69 6c 65 73  t_children(files
59a0: 29 3b 0a 0a 09 66 69 6c 65 73 20 3d 20 61 70 70  );...files = app
59b0: 66 73 5f 67 65 74 63 68 69 6c 64 72 65 6e 28 22  fs_getchildren("
59c0: 72 6b 65 65 6e 65 2e 6f 72 67 22 2c 20 73 68 61  rkeene.org", sha
59d0: 31 2c 20 22 74 63 6c 22 2c 20 26 66 69 6c 65 73  1, "tcl", &files
59e0: 5f 63 6f 75 6e 74 29 3b 0a 09 69 66 20 28 66 69  _count);..if (fi
59f0: 6c 65 73 20 3d 3d 20 4e 55 4c 4c 29 20 7b 0a 09  les == NULL) {..
5a00: 09 66 70 72 69 6e 74 66 28 73 74 64 65 72 72 2c  .fprintf(stderr,
5a10: 20 22 55 6e 61 62 6c 65 20 74 6f 20 6c 69 73 74   "Unable to list
5a20: 20 66 69 6c 65 73 20 69 6e 20 74 68 65 20 6c 61   files in the la
5a30: 73 74 20 70 61 63 6b 61 67 65 2e 5c 6e 22 29 3b  st package.\n");
5a40: 0a 0a 09 09 72 65 74 75 72 6e 28 31 29 3b 0a 09  ....return(1);..
5a50: 7d 0a 0a 09 70 72 69 6e 74 66 28 22 46 69 6c 65  }...printf("File
5a60: 73 3a 5c 6e 22 29 3b 0a 09 66 6f 72 20 28 66 69  s:\n");..for (fi
5a70: 6c 65 20 3d 20 66 69 6c 65 73 3b 20 66 69 6c 65  le = files; file
5a80: 3b 20 66 69 6c 65 20 3d 20 66 69 6c 65 2d 3e 5f  ; file = file->_
5a90: 6e 65 78 74 29 20 7b 0a 09 09 70 72 69 6e 74 66  next) {...printf
5aa0: 28 22 5c 74 74 63 6c 2f 25 73 5c 6e 22 2c 20 66  ("\ttcl/%s\n", f
5ab0: 69 6c 65 2d 3e 6e 61 6d 65 29 3b 0a 09 7d 0a 0a  ile->name);..}..
5ac0: 09 61 70 70 66 73 5f 66 72 65 65 5f 6c 69 73 74  .appfs_free_list
5ad0: 5f 63 68 69 6c 64 72 65 6e 28 66 69 6c 65 73 29  _children(files)
5ae0: 3b 0a 09 61 70 70 66 73 5f 66 72 65 65 5f 6c 69  ;..appfs_free_li
5af0: 73 74 5f 70 61 63 6b 61 67 65 28 70 61 63 6b 61  st_package(packa
5b00: 67 65 73 29 3b 0a 0a 09 72 65 74 75 72 6e 28 30  ges);...return(0
5b10: 29 3b 0a 7d 0a 23 65 6c 73 65 0a 73 74 61 74 69  );.}.#else.stati
5b20: 63 20 73 74 72 75 63 74 20 66 75 73 65 5f 6f 70  c struct fuse_op
5b30: 65 72 61 74 69 6f 6e 73 20 61 70 70 66 73 5f 6f  erations appfs_o
5b40: 70 65 72 20 3d 20 7b 0a 09 2e 67 65 74 61 74 74  per = {...getatt
5b50: 72 09 3d 20 61 70 70 66 73 5f 66 75 73 65 5f 67  r.= appfs_fuse_g
5b60: 65 74 61 74 74 72 2c 0a 09 2e 72 65 61 64 64 69  etattr,...readdi
5b70: 72 09 3d 20 61 70 70 66 73 5f 66 75 73 65 5f 72  r.= appfs_fuse_r
5b80: 65 61 64 64 69 72 2c 0a 09 2e 6f 70 65 6e 09 09  eaddir,...open..
5b90: 3d 20 61 70 70 66 73 5f 66 75 73 65 5f 6f 70 65  = appfs_fuse_ope
5ba0: 6e 2c 0a 09 2e 72 65 61 64 09 09 3d 20 61 70 70  n,...read..= app
5bb0: 66 73 5f 66 75 73 65 5f 72 65 61 64 0a 7d 3b 0a  fs_fuse_read.};.
5bc0: 23 65 6e 64 69 66 0a 0a 69 6e 74 20 6d 61 69 6e  #endif..int main
5bd0: 28 69 6e 74 20 61 72 67 63 2c 20 63 68 61 72 20  (int argc, char
5be0: 2a 2a 61 72 67 76 29 20 7b 0a 09 63 6f 6e 73 74  **argv) {..const
5bf0: 20 63 68 61 72 20 2a 63 61 63 68 65 64 69 72 20   char *cachedir
5c00: 3d 20 41 50 50 46 53 5f 43 41 43 48 45 44 49 52  = APPFS_CACHEDIR
5c10: 3b 0a 09 63 68 61 72 20 64 62 66 69 6c 65 6e 61  ;..char dbfilena
5c20: 6d 65 5b 31 30 32 34 5d 3b 0a 09 69 6e 74 20 70  me[1024];..int p
5c30: 74 68 72 65 61 64 5f 72 65 74 2c 20 73 6e 70 72  thread_ret, snpr
5c40: 69 6e 74 66 5f 72 65 74 2c 20 73 71 6c 69 74 65  intf_ret, sqlite
5c50: 5f 72 65 74 3b 0a 0a 09 67 6c 6f 62 61 6c 54 68  _ret;...globalTh
5c60: 72 65 61 64 2e 63 61 63 68 65 64 69 72 20 3d 20  read.cachedir =
5c70: 63 61 63 68 65 64 69 72 3b 0a 0a 09 70 74 68 72  cachedir;...pthr
5c80: 65 61 64 5f 72 65 74 20 3d 20 70 74 68 72 65 61  ead_ret = pthrea
5c90: 64 5f 6b 65 79 5f 63 72 65 61 74 65 28 26 69 6e  d_key_create(&in
5ca0: 74 65 72 70 4b 65 79 2c 20 4e 55 4c 4c 29 3b 0a  terpKey, NULL);.
5cb0: 09 69 66 20 28 70 74 68 72 65 61 64 5f 72 65 74  .if (pthread_ret
5cc0: 20 21 3d 20 30 29 20 7b 0a 09 09 66 70 72 69 6e   != 0) {...fprin
5cd0: 74 66 28 73 74 64 65 72 72 2c 20 22 55 6e 61 62  tf(stderr, "Unab
5ce0: 6c 65 20 74 6f 20 63 72 65 61 74 65 20 54 53 44  le to create TSD
5cf0: 20 6b 65 79 20 66 6f 72 20 54 63 6c 2e 20 20 41   key for Tcl.  A
5d00: 62 6f 72 74 69 6e 67 2e 5c 6e 22 29 3b 0a 0a 09  borting.\n");...
5d10: 09 72 65 74 75 72 6e 28 31 29 3b 0a 09 7d 0a 0a  .return(1);..}..
5d20: 09 73 6e 70 72 69 6e 74 66 5f 72 65 74 20 3d 20  .snprintf_ret =
5d30: 73 6e 70 72 69 6e 74 66 28 64 62 66 69 6c 65 6e  snprintf(dbfilen
5d40: 61 6d 65 2c 20 73 69 7a 65 6f 66 28 64 62 66 69  ame, sizeof(dbfi
5d50: 6c 65 6e 61 6d 65 29 2c 20 22 25 73 2f 25 73 22  lename), "%s/%s"
5d60: 2c 20 63 61 63 68 65 64 69 72 2c 20 22 63 61 63  , cachedir, "cac
5d70: 68 65 2e 64 62 22 29 3b 0a 09 69 66 20 28 73 6e  he.db");..if (sn
5d80: 70 72 69 6e 74 66 5f 72 65 74 20 3e 3d 20 73 69  printf_ret >= si
5d90: 7a 65 6f 66 28 64 62 66 69 6c 65 6e 61 6d 65 29  zeof(dbfilename)
5da0: 29 20 7b 0a 09 09 66 70 72 69 6e 74 66 28 73 74  ) {...fprintf(st
5db0: 64 65 72 72 2c 20 22 55 6e 61 62 6c 65 20 74 6f  derr, "Unable to
5dc0: 20 73 65 74 20 64 61 74 61 62 61 73 65 20 66 69   set database fi
5dd0: 6c 65 6e 61 6d 65 2e 20 20 41 62 6f 72 74 69 6e  lename.  Abortin
5de0: 67 2e 5c 6e 22 29 3b 0a 0a 09 09 72 65 74 75 72  g.\n");....retur
5df0: 6e 28 31 29 3b 0a 09 7d 0a 0a 09 73 71 6c 69 74  n(1);..}...sqlit
5e00: 65 5f 72 65 74 20 3d 20 73 71 6c 69 74 65 33 5f  e_ret = sqlite3_
5e10: 6f 70 65 6e 28 64 62 66 69 6c 65 6e 61 6d 65 2c  open(dbfilename,
5e20: 20 26 67 6c 6f 62 61 6c 54 68 72 65 61 64 2e 64   &globalThread.d
5e30: 62 29 3b 0a 09 69 66 20 28 73 71 6c 69 74 65 5f  b);..if (sqlite_
5e40: 72 65 74 20 21 3d 20 53 51 4c 49 54 45 5f 4f 4b  ret != SQLITE_OK
5e50: 29 20 7b 0a 09 09 66 70 72 69 6e 74 66 28 73 74  ) {...fprintf(st
5e60: 64 65 72 72 2c 20 22 55 6e 61 62 6c 65 20 74 6f  derr, "Unable to
5e70: 20 6f 70 65 6e 20 64 61 74 61 62 61 73 65 3a 20   open database:
5e80: 25 73 5c 6e 22 2c 20 64 62 66 69 6c 65 6e 61 6d  %s\n", dbfilenam
5e90: 65 29 3b 0a 0a 09 09 72 65 74 75 72 6e 28 31 29  e);....return(1)
5ea0: 3b 0a 09 7d 0a 0a 23 69 66 64 65 66 20 41 50 50  ;..}..#ifdef APP
5eb0: 46 53 5f 54 45 53 54 5f 44 52 49 56 45 52 0a 09  FS_TEST_DRIVER..
5ec0: 72 65 74 75 72 6e 28 61 70 70 66 73 5f 74 65 73  return(appfs_tes
5ed0: 74 5f 64 72 69 76 65 72 28 29 29 3b 0a 23 65 6c  t_driver());.#el
5ee0: 73 65 0a 09 72 65 74 75 72 6e 28 66 75 73 65 5f  se..return(fuse_
5ef0: 6d 61 69 6e 28 61 72 67 63 2c 20 61 72 67 76 2c  main(argc, argv,
5f00: 20 26 61 70 70 66 73 5f 6f 70 65 72 2c 20 4e 55   &appfs_oper, NU
5f10: 4c 4c 29 29 3b 0a 23 65 6e 64 69 66 0a 7d 0a 20  LL));.#endif.}.
5f20: 0a                                               .