Documentation Source Text

Hex Artifact Content
Login

Artifact 9d2c34859e72a46e3bad178a1f278216e5a1a52d:


0000: 2f 2a 0a 2a 2a 20 41 20 73 6d 61 6c 6c 2c 20 73  /*.** A small, s
0010: 69 6d 70 6c 65 20 48 54 54 50 20 73 65 72 76 65  imple HTTP serve
0020: 72 2e 0a 2a 2a 0a 2a 2a 20 46 65 61 74 75 72 65  r..**.** Feature
0030: 73 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 20 2a 20 4c  s:.**.**     * L
0040: 61 75 6e 63 68 65 64 20 66 72 6f 6d 20 69 6e 65  aunched from ine
0050: 74 64 0a 2a 2a 20 20 20 20 20 2a 20 4f 6e 65 20  td.**     * One 
0060: 70 72 6f 63 65 73 73 20 70 65 72 20 72 65 71 75  process per requ
0070: 65 73 74 0a 2a 2a 20 20 20 20 20 2a 20 44 65 6c  est.**     * Del
0080: 69 76 65 72 20 73 74 61 74 69 63 20 63 6f 6e 74  iver static cont
0090: 65 6e 74 20 6f 72 20 72 75 6e 20 43 47 49 0a 2a  ent or run CGI.*
00a0: 2a 20 20 20 20 20 2a 20 56 69 72 74 75 61 6c 20  *     * Virtual 
00b0: 73 69 74 65 73 20 62 61 73 65 64 20 6f 6e 20 74  sites based on t
00c0: 68 65 20 22 48 6f 73 74 3a 22 20 70 72 6f 70 65  he "Host:" prope
00d0: 72 74 79 20 6f 66 20 74 68 65 20 48 54 54 50 20  rty of the HTTP 
00e0: 68 65 61 64 65 72 0a 2a 2a 20 20 20 20 20 2a 20  header.**     * 
00f0: 56 65 72 79 20 73 6d 61 6c 6c 20 63 6f 64 65 20  Very small code 
0100: 62 61 73 65 20 28 31 20 66 69 6c 65 29 20 74 6f  base (1 file) to
0110: 20 66 61 63 69 6c 69 74 61 74 65 20 73 65 63 75   facilitate secu
0120: 72 69 74 79 20 61 75 64 69 74 69 6e 67 0a 2a 2a  rity auditing.**
0130: 20 20 20 20 20 2a 20 53 69 6d 70 6c 65 20 73 65       * Simple se
0140: 74 75 70 20 2d 20 6e 6f 20 63 6f 6e 66 69 67 75  tup - no configu
0150: 72 61 74 69 6f 6e 20 66 69 6c 65 73 20 74 6f 20  ration files to 
0160: 6d 65 73 73 20 77 69 74 68 2e 0a 2a 2a 20 0a 2a  mess with..** .*
0170: 2a 20 54 68 69 73 20 66 69 6c 65 20 69 6d 70 6c  * This file impl
0180: 65 6d 65 6e 74 73 20 61 20 73 6d 61 6c 6c 20 61  ements a small a
0190: 6e 64 20 73 69 6d 70 6c 65 20 62 75 74 20 73 65  nd simple but se
01a0: 63 75 72 65 20 61 6e 64 20 65 66 66 65 63 74 69  cure and effecti
01b0: 76 65 20 77 65 62 0a 2a 2a 20 73 65 72 76 65 72  ve web.** server
01c0: 2e 20 20 54 68 65 72 65 20 61 72 65 20 6e 6f 20  .  There are no 
01d0: 66 72 69 6c 6c 73 2e 20 20 41 6e 79 74 68 69 6e  frills.  Anythin
01e0: 67 20 74 68 61 74 20 63 6f 75 6c 64 20 62 65 20  g that could be 
01f0: 72 65 61 73 6f 6e 61 62 6c 79 0a 2a 2a 20 6f 6d  reasonably.** om
0200: 69 74 74 65 64 20 68 61 73 20 62 65 65 6e 2e 0a  itted has been..
0210: 2a 2a 0a 2a 2a 20 53 65 74 75 70 20 72 75 6c 65  **.** Setup rule
0220: 73 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 28 31 29 20  s:.**.**    (1) 
0230: 4c 61 75 6e 63 68 20 61 73 20 72 6f 6f 74 20 66  Launch as root f
0240: 72 6f 6d 20 69 6e 65 74 64 20 6c 69 6b 65 20 74  rom inetd like t
0250: 68 69 73 3a 0a 2a 2a 0a 2a 2a 20 20 20 20 20 20  his:.**.**      
0260: 20 20 20 20 20 20 68 74 74 70 64 20 2d 6c 6f 67        httpd -log
0270: 66 69 6c 65 20 6c 6f 67 66 69 6c 65 20 2d 72 6f  file logfile -ro
0280: 6f 74 20 2f 68 6f 6d 65 2f 77 77 77 20 2d 75 73  ot /home/www -us
0290: 65 72 20 6e 6f 62 6f 64 79 0a 2a 2a 0a 2a 2a 20  er nobody.**.** 
02a0: 20 20 20 20 20 20 20 49 74 20 77 69 6c 6c 20 61         It will a
02b0: 75 74 6f 6d 61 74 69 63 61 6c 6c 79 20 63 68 72  utomatically chr
02c0: 6f 6f 74 20 74 6f 20 2f 68 6f 6d 65 2f 77 77 77  oot to /home/www
02d0: 20 61 6e 64 20 62 65 63 6f 6d 65 20 75 73 65 72   and become user
02e0: 20 6e 6f 62 6f 64 79 2e 0a 2a 2a 20 20 20 20 20   nobody..**     
02f0: 20 20 20 54 68 65 20 6c 6f 67 66 69 6c 65 20 6e     The logfile n
0300: 61 6d 65 20 73 68 6f 75 6c 64 20 62 65 20 72 65  ame should be re
0310: 6c 61 74 69 76 65 20 74 6f 20 74 68 65 20 63 68  lative to the ch
0320: 72 6f 6f 74 20 6a 61 69 6c 2e 0a 2a 2a 0a 2a 2a  root jail..**.**
0330: 20 20 20 20 28 32 29 20 44 69 72 65 63 74 6f 72      (2) Director
0340: 69 65 73 20 6f 66 20 74 68 65 20 66 6f 72 6d 20  ies of the form 
0350: 22 2a 2e 77 65 62 73 69 74 65 22 20 28 65 78 3a  "*.website" (ex:
0360: 20 77 77 77 5f 68 77 61 63 69 5f 63 6f 6d 2e 77   www_hwaci_com.w
0370: 65 62 73 69 74 65 29 0a 2a 2a 20 20 20 20 20 20  ebsite).**      
0380: 20 20 63 6f 6e 74 61 69 6e 20 63 6f 6e 74 65 6e    contain conten
0390: 74 2e 20 20 54 68 65 20 64 69 72 65 63 74 6f 72  t.  The director
03a0: 79 20 69 73 20 63 68 6f 73 65 6e 20 62 61 73 65  y is chosen base
03b0: 64 20 6f 6e 20 48 4f 53 54 2e 20 20 49 66 20 6e  d on HOST.  If n
03c0: 6f 0a 2a 2a 20 20 20 20 20 20 20 20 48 4f 53 54  o.**        HOST
03d0: 20 6f 72 20 74 68 65 20 68 6f 73 74 20 64 69 72   or the host dir
03e0: 65 63 74 6f 72 79 20 69 73 20 6e 6f 74 20 66 6f  ectory is not fo
03f0: 75 6e 64 2c 20 22 64 65 66 61 75 6c 74 2e 77 65  und, "default.we
0400: 62 73 69 74 65 22 20 69 73 20 75 73 65 64 2e 0a  bsite" is used..
0410: 2a 2a 0a 2a 2a 20 20 20 20 28 33 29 20 41 6e 79  **.**    (3) Any
0420: 20 66 69 6c 65 20 6f 72 20 64 69 72 65 63 74 6f   file or directo
0430: 72 79 20 77 68 6f 73 65 20 6e 61 6d 65 20 62 65  ry whose name be
0440: 67 69 6e 73 20 77 69 74 68 20 22 2e 22 20 6f 72  gins with "." or
0450: 20 22 2d 22 20 69 73 20 69 67 6e 6f 72 65 64 2e   "-" is ignored.
0460: 0a 2a 2a 0a 2a 2a 20 20 20 20 28 34 29 20 43 68  .**.**    (4) Ch
0470: 61 72 61 63 74 65 72 73 20 6f 74 68 65 72 20 74  aracters other t
0480: 68 61 6e 20 61 2d 7a 41 2d 5a 30 2d 39 5f 2e 2c  han a-zA-Z0-9_.,
0490: 2a 7e 2f 20 69 6e 20 74 68 65 20 66 69 6c 65 6e  *~/ in the filen
04a0: 61 6d 65 20 61 72 65 20 74 72 61 6e 73 6c 61 74  ame are translat
04b0: 65 64 0a 2a 2a 20 20 20 20 20 20 20 20 69 6e 74  ed.**        int
04c0: 6f 20 5f 2e 20 20 54 68 69 73 20 69 73 20 61 20  o _.  This is a 
04d0: 64 65 66 65 6e 73 65 20 61 67 61 69 6e 73 74 20  defense against 
04e0: 63 72 6f 73 73 2d 73 69 74 65 20 73 63 72 69 70  cross-site scrip
04f0: 74 69 6e 67 20 61 74 74 61 63 6b 73 20 61 6e 64  ting attacks and
0500: 0a 2a 2a 20 20 20 20 20 20 20 20 6f 74 68 65 72  .**        other
0510: 20 6d 69 73 63 68 69 65 66 2e 0a 2a 2a 0a 2a 2a   mischief..**.**
0520: 20 20 20 20 28 35 29 20 45 78 65 63 75 74 61 62      (5) Executab
0530: 6c 65 20 66 69 6c 65 73 20 61 72 65 20 72 75 6e  le files are run
0540: 20 61 73 20 43 47 49 2e 20 20 41 6c 6c 20 6f 74   as CGI.  All ot
0550: 68 65 72 20 66 69 6c 65 73 20 61 72 65 20 64 65  her files are de
0560: 6c 69 76 65 72 65 64 0a 2a 2a 20 20 20 20 20 20  livered.**      
0570: 20 20 61 73 20 69 73 2e 0a 2a 2a 0a 2a 2a 20 20    as is..**.**  
0580: 20 20 28 36 29 20 46 6f 72 20 53 53 4c 20 73 75    (6) For SSL su
0590: 70 70 6f 72 74 20 75 73 65 20 73 74 75 6e 6e 65  pport use stunne
05a0: 6c 20 61 6e 64 20 61 64 64 20 74 68 65 20 2d 68  l and add the -h
05b0: 74 74 70 73 20 31 20 6f 70 74 69 6f 6e 20 6f 6e  ttps 1 option on
05c0: 20 74 68 65 0a 2a 2a 20 20 20 20 20 20 20 20 68   the.**        h
05d0: 74 74 70 64 20 63 6f 6d 6d 61 6e 64 2d 6c 69 6e  ttpd command-lin
05e0: 65 2e 0a 2a 2a 0a 2a 2a 20 20 20 20 28 37 29 20  e..**.**    (7) 
05f0: 49 66 20 61 20 66 69 6c 65 20 6e 61 6d 65 64 20  If a file named 
0600: 22 2d 61 75 74 68 22 20 65 78 69 73 74 73 20 69  "-auth" exists i
0610: 6e 20 74 68 65 20 73 61 6d 65 20 64 69 72 65 63  n the same direc
0620: 74 6f 72 79 20 61 73 20 66 69 6c 65 20 74 6f 0a  tory as file to.
0630: 2a 2a 20 20 20 20 20 20 20 20 62 65 20 72 75 6e  **        be run
0640: 20 61 73 20 43 47 49 20 6f 72 20 74 6f 20 62 65   as CGI or to be
0650: 20 64 65 6c 69 76 65 72 65 64 2c 20 74 68 65 6e   delivered, then
0660: 20 69 74 20 63 6f 6e 74 61 69 6e 73 20 69 6e 66   it contains inf
0670: 6f 72 6d 61 74 69 6f 6e 0a 2a 2a 20 20 20 20 20  ormation.**     
0680: 20 20 20 66 6f 72 20 48 54 54 50 20 42 61 73 69     for HTTP Basi
0690: 63 20 61 75 74 68 6f 72 69 7a 61 74 69 6f 6e 2e  c authorization.
06a0: 20 20 53 65 65 20 66 69 6c 65 20 66 6f 72 6d 61    See file forma
06b0: 74 20 64 65 74 61 69 6c 73 20 62 65 6c 6f 77 2e  t details below.
06c0: 0a 2a 2a 0a 2a 2a 0a 2a 2a 20 42 61 73 69 63 20  .**.**.** Basic 
06d0: 41 75 74 68 6f 72 69 7a 61 74 69 6f 6e 3a 0a 2a  Authorization:.*
06e0: 2a 0a 2a 2a 20 49 66 20 74 68 65 20 66 69 6c 65  *.** If the file
06f0: 20 22 2d 61 75 74 68 22 20 65 78 69 73 74 73 20   "-auth" exists 
0700: 69 6e 20 74 68 65 20 73 61 6d 65 20 64 69 72 65  in the same dire
0710: 63 74 6f 72 79 20 61 73 20 74 68 65 20 63 6f 6e  ctory as the con
0720: 74 65 6e 74 20 66 69 6c 65 0a 2a 2a 20 28 66 6f  tent file.** (fo
0730: 72 20 62 6f 74 68 20 73 74 61 74 69 63 20 63 6f  r both static co
0740: 6e 74 65 6e 74 20 61 6e 64 20 43 47 49 29 20 74  ntent and CGI) t
0750: 68 65 6e 20 69 74 20 63 6f 6e 74 61 69 6e 73 20  hen it contains 
0760: 74 68 65 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20  the information 
0770: 75 73 65 64 0a 2a 2a 20 66 6f 72 20 62 61 73 69  used.** for basi
0780: 63 20 61 75 74 68 6f 72 69 7a 61 74 69 6f 6e 2e  c authorization.
0790: 20 20 54 68 65 20 66 69 6c 65 20 66 6f 72 6d 61    The file forma
07a0: 74 20 69 73 20 61 73 20 66 6f 6c 6c 6f 77 73 3a  t is as follows:
07b0: 0a 2a 2a 0a 2a 2a 20 20 20 20 2a 20 20 42 6c 61  .**.**    *  Bla
07c0: 6e 6b 20 6c 69 6e 65 73 20 61 6e 64 20 6c 69 6e  nk lines and lin
07d0: 65 73 20 74 68 61 74 20 62 65 67 69 6e 20 77 69  es that begin wi
07e0: 74 68 20 27 23 27 20 61 72 65 20 69 67 6e 6f 72  th '#' are ignor
07f0: 65 64 0a 2a 2a 20 20 20 20 2a 20 20 22 68 74 74  ed.**    *  "htt
0800: 70 2d 72 65 64 69 72 65 63 74 22 20 66 6f 72 63  p-redirect" forc
0810: 65 73 20 61 20 72 65 64 69 72 65 63 74 20 74 6f  es a redirect to
0820: 20 48 54 54 50 53 20 69 66 20 6e 6f 74 20 74 68   HTTPS if not th
0830: 65 72 65 20 61 6c 72 65 61 64 79 0a 2a 2a 20 20  ere already.**  
0840: 20 20 2a 20 20 22 68 74 74 70 73 2d 6f 6e 6c 79    *  "https-only
0850: 22 20 64 69 73 61 6c 6c 6f 77 73 20 6f 70 65 72  " disallows oper
0860: 61 74 69 6f 6e 20 69 6e 20 48 54 54 50 0a 2a 2a  ation in HTTP.**
0870: 20 20 20 20 2a 20 20 22 75 73 65 72 20 4e 41 4d      *  "user NAM
0880: 45 20 4c 4f 47 49 4e 3a 50 41 53 53 57 4f 52 44  E LOGIN:PASSWORD
0890: 22 20 63 68 65 63 6b 73 20 74 6f 20 73 65 65 20  " checks to see 
08a0: 69 66 20 4c 4f 47 49 4e 3a 50 41 53 53 57 4f 52  if LOGIN:PASSWOR
08b0: 44 20 0a 2a 2a 20 20 20 20 20 20 20 61 75 74 68  D .**       auth
08c0: 6f 72 69 7a 61 74 69 6f 6e 20 63 72 65 64 65 6e  orization creden
08d0: 74 69 61 6c 73 20 61 72 65 20 70 72 6f 76 69 64  tials are provid
08e0: 65 64 2c 20 61 6e 64 20 69 66 20 73 6f 20 73 65  ed, and if so se
08f0: 74 73 20 74 68 65 0a 2a 2a 20 20 20 20 20 20 20  ts the.**       
0900: 52 45 4d 4f 54 45 5f 55 53 45 52 20 74 6f 20 4e  REMOTE_USER to N
0910: 41 4d 45 2e 0a 2a 2a 20 20 20 20 2a 20 20 22 72  AME..**    *  "r
0920: 65 61 6c 6d 20 54 45 58 54 22 20 73 65 74 73 20  ealm TEXT" sets 
0930: 74 68 65 20 72 65 61 6c 6d 20 74 6f 20 54 45 58  the realm to TEX
0940: 54 2e 0a 2a 2a 0a 2a 2a 20 54 68 65 72 65 20 63  T..**.** There c
0950: 61 6e 20 62 65 20 6d 75 6c 74 69 70 6c 65 20 22  an be multiple "
0960: 75 73 65 72 22 20 6c 69 6e 65 73 2e 20 20 49 66  user" lines.  If
0970: 20 6e 6f 20 22 75 73 65 72 22 20 6c 69 6e 65 20   no "user" line 
0980: 6d 61 74 63 68 65 73 2c 20 74 68 65 0a 2a 2a 20  matches, the.** 
0990: 72 65 71 75 65 73 74 20 66 61 69 6c 73 20 77 69  request fails wi
09a0: 74 68 20 61 20 34 30 31 20 65 72 72 6f 72 2e 0a  th a 401 error..
09b0: 2a 2f 0a 23 69 6e 63 6c 75 64 65 20 3c 73 74 64  */.#include <std
09c0: 69 6f 2e 68 3e 0a 23 69 6e 63 6c 75 64 65 20 3c  io.h>.#include <
09d0: 63 74 79 70 65 2e 68 3e 0a 23 69 6e 63 6c 75 64  ctype.h>.#includ
09e0: 65 20 3c 73 79 73 6c 6f 67 2e 68 3e 0a 23 69 6e  e <syslog.h>.#in
09f0: 63 6c 75 64 65 20 3c 73 74 64 6c 69 62 2e 68 3e  clude <stdlib.h>
0a00: 0a 23 69 6e 63 6c 75 64 65 20 3c 73 79 73 2f 73  .#include <sys/s
0a10: 74 61 74 2e 68 3e 0a 23 69 6e 63 6c 75 64 65 20  tat.h>.#include 
0a20: 3c 75 6e 69 73 74 64 2e 68 3e 0a 23 69 6e 63 6c  <unistd.h>.#incl
0a30: 75 64 65 20 3c 66 63 6e 74 6c 2e 68 3e 0a 23 69  ude <fcntl.h>.#i
0a40: 6e 63 6c 75 64 65 20 3c 73 74 72 69 6e 67 2e 68  nclude <string.h
0a50: 3e 0a 23 69 6e 63 6c 75 64 65 20 3c 70 77 64 2e  >.#include <pwd.
0a60: 68 3e 0a 23 69 6e 63 6c 75 64 65 20 3c 73 79 73  h>.#include <sys
0a70: 2f 74 69 6d 65 2e 68 3e 0a 23 69 6e 63 6c 75 64  /time.h>.#includ
0a80: 65 20 3c 73 79 73 2f 74 79 70 65 73 2e 68 3e 0a  e <sys/types.h>.
0a90: 23 69 6e 63 6c 75 64 65 20 3c 73 79 73 2f 73 6f  #include <sys/so
0aa0: 63 6b 65 74 2e 68 3e 0a 23 69 6e 63 6c 75 64 65  cket.h>.#include
0ab0: 20 3c 73 79 73 2f 77 61 69 74 2e 68 3e 0a 23 69   <sys/wait.h>.#i
0ac0: 6e 63 6c 75 64 65 20 3c 6e 65 74 69 6e 65 74 2f  nclude <netinet/
0ad0: 69 6e 2e 68 3e 0a 23 69 6e 63 6c 75 64 65 20 3c  in.h>.#include <
0ae0: 61 72 70 61 2f 69 6e 65 74 2e 68 3e 0a 23 69 6e  arpa/inet.h>.#in
0af0: 63 6c 75 64 65 20 3c 73 74 64 61 72 67 2e 68 3e  clude <stdarg.h>
0b00: 0a 23 69 6e 63 6c 75 64 65 20 3c 74 69 6d 65 2e  .#include <time.
0b10: 68 3e 0a 23 69 6e 63 6c 75 64 65 20 3c 73 79 73  h>.#include <sys
0b20: 2f 74 69 6d 65 73 2e 68 3e 0a 23 69 6e 63 6c 75  /times.h>.#inclu
0b30: 64 65 20 3c 6e 65 74 64 62 2e 68 3e 0a 23 69 6e  de <netdb.h>.#in
0b40: 63 6c 75 64 65 20 3c 65 72 72 6e 6f 2e 68 3e 0a  clude <errno.h>.
0b50: 23 69 6e 63 6c 75 64 65 20 3c 73 79 73 2f 72 65  #include <sys/re
0b60: 73 6f 75 72 63 65 2e 68 3e 0a 23 69 66 64 65 66  source.h>.#ifdef
0b70: 20 6c 69 6e 75 78 0a 23 69 6e 63 6c 75 64 65 20   linux.#include 
0b80: 3c 73 79 73 2f 73 65 6e 64 66 69 6c 65 2e 68 3e  <sys/sendfile.h>
0b90: 0a 23 65 6e 64 69 66 0a 23 69 6e 63 6c 75 64 65  .#endif.#include
0ba0: 20 3c 61 73 73 65 72 74 2e 68 3e 0a 0a 2f 2a 0a   <assert.h>../*.
0bb0: 2a 2a 20 43 6f 6e 66 69 67 75 72 65 20 74 68 65  ** Configure the
0bc0: 20 73 65 72 76 65 72 20 62 79 20 73 65 74 74 69   server by setti
0bd0: 6e 67 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e 67  ng the following
0be0: 20 6d 61 63 72 6f 73 20 61 6e 64 20 72 65 63 6f   macros and reco
0bf0: 6d 70 69 6c 69 6e 67 2e 0a 2a 2f 0a 23 69 66 6e  mpiling..*/.#ifn
0c00: 64 65 66 20 44 45 46 41 55 4c 54 5f 50 4f 52 54  def DEFAULT_PORT
0c10: 0a 23 64 65 66 69 6e 65 20 44 45 46 41 55 4c 54  .#define DEFAULT
0c20: 5f 50 4f 52 54 20 22 38 30 22 0a 23 65 6e 64 69  _PORT "80".#endi
0c30: 66 0a 23 69 66 6e 64 65 66 20 4d 41 58 5f 43 4f  f.#ifndef MAX_CO
0c40: 4e 54 45 4e 54 5f 4c 45 4e 47 54 48 0a 23 64 65  NTENT_LENGTH.#de
0c50: 66 69 6e 65 20 4d 41 58 5f 43 4f 4e 54 45 4e 54  fine MAX_CONTENT
0c60: 5f 4c 45 4e 47 54 48 20 39 30 30 30 30 30 30 0a  _LENGTH 9000000.
0c70: 23 65 6e 64 69 66 0a 0a 2f 2a 0a 2a 2a 20 57 65  #endif../*.** We
0c80: 20 72 65 63 6f 72 64 20 6d 6f 73 74 20 6f 66 20   record most of 
0c90: 74 68 65 20 73 74 61 74 65 20 69 6e 66 6f 72 6d  the state inform
0ca0: 61 74 69 6f 6e 20 61 73 20 67 6c 6f 62 61 6c 20  ation as global 
0cb0: 76 61 72 69 61 62 6c 65 73 2e 20 20 54 68 69 73  variables.  This
0cc0: 0a 2a 2a 20 73 61 76 65 73 20 68 61 76 69 6e 67  .** saves having
0cd0: 20 74 6f 20 70 61 73 73 20 69 6e 66 6f 72 6d 61   to pass informa
0ce0: 74 69 6f 6e 20 74 6f 20 73 75 62 72 6f 75 74 69  tion to subrouti
0cf0: 6e 65 73 20 61 73 20 70 61 72 61 6d 65 74 65 72  nes as parameter
0d00: 73 2c 20 61 6e 64 0a 2a 2a 20 6d 61 6b 65 73 20  s, and.** makes 
0d10: 74 68 65 20 65 78 65 63 75 74 61 62 6c 65 20 73  the executable s
0d20: 6d 61 6c 6c 65 72 2e 2e 2e 0a 2a 2f 0a 73 74 61  maller....*/.sta
0d30: 74 69 63 20 63 68 61 72 20 2a 7a 52 6f 6f 74 20  tic char *zRoot 
0d40: 3d 20 30 3b 20 20 20 20 20 20 20 20 20 20 2f 2a  = 0;          /*
0d50: 20 52 6f 6f 74 20 64 69 72 65 63 74 6f 72 79 20   Root directory 
0d60: 6f 66 20 74 68 65 20 77 65 62 73 69 74 65 20 2a  of the website *
0d70: 2f 0a 73 74 61 74 69 63 20 63 68 61 72 20 2a 7a  /.static char *z
0d80: 54 6d 70 4e 61 6d 20 3d 20 30 3b 20 20 20 20 20  TmpNam = 0;     
0d90: 20 20 20 2f 2a 20 4e 61 6d 65 20 6f 66 20 61 20     /* Name of a 
0da0: 74 65 6d 70 6f 72 61 72 79 20 66 69 6c 65 20 2a  temporary file *
0db0: 2f 0a 73 74 61 74 69 63 20 63 68 61 72 20 7a 54  /.static char zT
0dc0: 6d 70 4e 61 6d 42 75 66 5b 35 30 30 5d 3b 20 20  mpNamBuf[500];  
0dd0: 20 20 20 2f 2a 20 53 70 61 63 65 20 74 6f 20 68     /* Space to h
0de0: 6f 6c 64 20 74 68 65 20 74 65 6d 70 6f 72 61 72  old the temporar
0df0: 79 20 66 69 6c 65 6e 61 6d 65 20 2a 2f 0a 73 74  y filename */.st
0e00: 61 74 69 63 20 63 68 61 72 20 2a 7a 50 72 6f 74  atic char *zProt
0e10: 6f 63 6f 6c 20 3d 20 30 3b 20 20 20 20 20 20 2f  ocol = 0;      /
0e20: 2a 20 54 68 65 20 70 72 6f 74 6f 63 6f 6c 20 62  * The protocol b
0e30: 65 69 6e 67 20 75 73 69 6e 67 20 62 79 20 74 68  eing using by th
0e40: 65 20 62 72 6f 77 73 65 72 20 2a 2f 0a 73 74 61  e browser */.sta
0e50: 74 69 63 20 63 68 61 72 20 2a 7a 4d 65 74 68 6f  tic char *zMetho
0e60: 64 20 3d 20 30 3b 20 20 20 20 20 20 20 20 2f 2a  d = 0;        /*
0e70: 20 54 68 65 20 6d 65 74 68 6f 64 2e 20 20 4d 75   The method.  Mu
0e80: 73 74 20 62 65 20 47 45 54 20 2a 2f 0a 73 74 61  st be GET */.sta
0e90: 74 69 63 20 63 68 61 72 20 2a 7a 53 63 72 69 70  tic char *zScrip
0ea0: 74 20 3d 20 30 3b 20 20 20 20 20 20 20 20 2f 2a  t = 0;        /*
0eb0: 20 54 68 65 20 6f 62 6a 65 63 74 20 74 6f 20 72   The object to r
0ec0: 65 74 72 69 65 76 65 20 2a 2f 0a 73 74 61 74 69  etrieve */.stati
0ed0: 63 20 63 68 61 72 20 2a 7a 52 65 61 6c 53 63 72  c char *zRealScr
0ee0: 69 70 74 20 3d 20 30 3b 20 20 20 20 2f 2a 20 54  ipt = 0;    /* T
0ef0: 68 65 20 6f 62 6a 65 63 74 20 74 6f 20 72 65 74  he object to ret
0f00: 72 69 65 76 65 2e 20 20 53 61 6d 65 20 61 73 20  rieve.  Same as 
0f10: 7a 53 63 72 69 70 74 0a 20 20 20 20 20 20 20 20  zScript.        
0f20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
0f30: 20 20 20 20 20 20 20 20 20 2a 2a 20 65 78 63 65           ** exce
0f40: 70 74 20 6d 69 67 68 74 20 68 61 76 65 20 22 2f  pt might have "/
0f50: 69 6e 64 65 78 2e 68 74 6d 6c 22 20 61 70 70 65  index.html" appe
0f60: 6e 64 65 64 20 2a 2f 0a 73 74 61 74 69 63 20 63  nded */.static c
0f70: 68 61 72 20 2a 7a 48 6f 6d 65 20 3d 20 30 3b 20  har *zHome = 0; 
0f80: 20 20 20 20 20 20 20 20 20 2f 2a 20 54 68 65 20           /* The 
0f90: 64 69 72 65 63 74 6f 72 79 20 63 6f 6e 74 61 69  directory contai
0fa0: 6e 69 6e 67 20 63 6f 6e 74 65 6e 74 20 2a 2f 0a  ning content */.
0fb0: 73 74 61 74 69 63 20 63 68 61 72 20 2a 7a 51 75  static char *zQu
0fc0: 65 72 79 53 74 72 69 6e 67 20 3d 20 30 3b 20 20  eryString = 0;  
0fd0: 20 2f 2a 20 54 68 65 20 71 75 65 72 79 20 73 74   /* The query st
0fe0: 72 69 6e 67 20 6f 6e 20 74 68 65 20 65 6e 64 20  ring on the end 
0ff0: 6f 66 20 74 68 65 20 6e 61 6d 65 20 2a 2f 0a 73  of the name */.s
1000: 74 61 74 69 63 20 63 68 61 72 20 2a 7a 46 69 6c  tatic char *zFil
1010: 65 20 3d 20 30 3b 20 20 20 20 20 20 20 20 20 20  e = 0;          
1020: 2f 2a 20 54 68 65 20 66 69 6c 65 6e 61 6d 65 20  /* The filename 
1030: 6f 66 20 74 68 65 20 6f 62 6a 65 63 74 20 74 6f  of the object to
1040: 20 72 65 74 72 69 65 76 65 20 2a 2f 0a 73 74 61   retrieve */.sta
1050: 74 69 63 20 69 6e 74 20 6c 65 6e 46 69 6c 65 20  tic int lenFile 
1060: 3d 20 30 3b 20 20 20 20 20 20 20 20 20 20 2f 2a  = 0;          /*
1070: 20 4c 65 6e 67 74 68 20 6f 66 20 74 68 65 20 7a   Length of the z
1080: 46 69 6c 65 20 6e 61 6d 65 20 2a 2f 0a 73 74 61  File name */.sta
1090: 74 69 63 20 63 68 61 72 20 2a 7a 44 69 72 20 3d  tic char *zDir =
10a0: 20 30 3b 20 20 20 20 20 20 20 20 20 20 20 2f 2a   0;           /*
10b0: 20 4e 61 6d 65 20 6f 66 20 74 68 65 20 64 69 72   Name of the dir
10c0: 65 63 74 6f 72 79 20 68 6f 6c 64 69 6e 67 20 7a  ectory holding z
10d0: 46 69 6c 65 20 2a 2f 0a 73 74 61 74 69 63 20 63  File */.static c
10e0: 68 61 72 20 2a 7a 50 61 74 68 49 6e 66 6f 20 3d  har *zPathInfo =
10f0: 20 30 3b 20 20 20 20 20 20 2f 2a 20 50 61 72 74   0;      /* Part
1100: 20 6f 66 20 74 68 65 20 70 61 74 68 6e 61 6d 65   of the pathname
1110: 20 70 61 73 74 20 74 68 65 20 66 69 6c 65 20 2a   past the file *
1120: 2f 0a 73 74 61 74 69 63 20 63 68 61 72 20 2a 7a  /.static char *z
1130: 41 67 65 6e 74 20 3d 20 30 3b 20 20 20 20 20 20  Agent = 0;      
1140: 20 20 20 2f 2a 20 57 68 61 74 20 74 79 70 65 20     /* What type 
1150: 69 66 20 62 72 6f 77 73 65 72 20 69 73 20 6d 61  if browser is ma
1160: 6b 69 6e 67 20 74 68 69 73 20 71 75 65 72 79 20  king this query 
1170: 2a 2f 0a 73 74 61 74 69 63 20 63 68 61 72 20 2a  */.static char *
1180: 7a 53 65 72 76 65 72 4e 61 6d 65 20 3d 20 30 3b  zServerName = 0;
1190: 20 20 20 20 2f 2a 20 54 68 65 20 6e 61 6d 65 20      /* The name 
11a0: 61 66 74 65 72 20 74 68 65 20 68 74 74 70 3a 2f  after the http:/
11b0: 2f 20 2a 2f 0a 73 74 61 74 69 63 20 63 68 61 72  / */.static char
11c0: 20 2a 7a 53 65 72 76 65 72 50 6f 72 74 20 3d 20   *zServerPort = 
11d0: 30 3b 20 20 20 20 2f 2a 20 54 68 65 20 70 6f 72  0;    /* The por
11e0: 74 20 6e 75 6d 62 65 72 20 2a 2f 0a 73 74 61 74  t number */.stat
11f0: 69 63 20 63 68 61 72 20 2a 7a 43 6f 6f 6b 69 65  ic char *zCookie
1200: 20 3d 20 30 3b 20 20 20 20 20 20 20 20 2f 2a 20   = 0;        /* 
1210: 43 6f 6f 6b 69 65 73 20 72 65 70 6f 72 74 65 64  Cookies reported
1220: 20 77 69 74 68 20 74 68 65 20 72 65 71 75 65 73   with the reques
1230: 74 20 2a 2f 0a 73 74 61 74 69 63 20 63 68 61 72  t */.static char
1240: 20 2a 7a 48 74 74 70 48 6f 73 74 20 3d 20 30 3b   *zHttpHost = 0;
1250: 20 20 20 20 20 20 2f 2a 20 4e 61 6d 65 20 61 63        /* Name ac
1260: 63 6f 72 64 69 6e 67 20 74 6f 20 74 68 65 20 77  cording to the w
1270: 65 62 20 62 72 6f 77 73 65 72 20 2a 2f 0a 73 74  eb browser */.st
1280: 61 74 69 63 20 63 68 61 72 20 2a 7a 52 65 61 6c  atic char *zReal
1290: 50 6f 72 74 20 3d 20 30 3b 20 20 20 20 20 20 2f  Port = 0;      /
12a0: 2a 20 54 68 65 20 72 65 61 6c 20 54 43 50 20 70  * The real TCP p
12b0: 6f 72 74 20 77 68 65 6e 20 72 75 6e 6e 69 6e 67  ort when running
12c0: 20 61 73 20 64 61 65 6d 6f 6e 20 2a 2f 0a 73 74   as daemon */.st
12d0: 61 74 69 63 20 63 68 61 72 20 2a 7a 52 65 6d 6f  atic char *zRemo
12e0: 74 65 41 64 64 72 20 3d 20 30 3b 20 20 20 20 2f  teAddr = 0;    /
12f0: 2a 20 49 50 20 61 64 64 72 65 73 73 20 6f 66 20  * IP address of 
1300: 74 68 65 20 72 65 71 75 65 73 74 20 2a 2f 0a 73  the request */.s
1310: 74 61 74 69 63 20 63 68 61 72 20 2a 7a 52 65 66  tatic char *zRef
1320: 65 72 65 72 20 3d 20 30 3b 20 20 20 20 20 20 20  erer = 0;       
1330: 2f 2a 20 4e 61 6d 65 20 6f 66 20 74 68 65 20 70  /* Name of the p
1340: 61 67 65 20 74 68 61 74 20 72 65 66 65 72 65 64  age that refered
1350: 20 74 6f 20 75 73 20 2a 2f 0a 73 74 61 74 69 63   to us */.static
1360: 20 63 68 61 72 20 2a 7a 41 63 63 65 70 74 20 3d   char *zAccept =
1370: 20 30 3b 20 20 20 20 20 20 20 20 2f 2a 20 57 68   0;        /* Wh
1380: 61 74 20 66 6f 72 6d 61 74 73 20 77 69 6c 6c 20  at formats will 
1390: 62 65 20 61 63 63 65 70 74 65 64 20 2a 2f 0a 73  be accepted */.s
13a0: 74 61 74 69 63 20 63 68 61 72 20 2a 7a 43 6f 6e  tatic char *zCon
13b0: 74 65 6e 74 4c 65 6e 67 74 68 20 3d 20 30 3b 20  tentLength = 0; 
13c0: 2f 2a 20 43 6f 6e 74 65 6e 74 20 6c 65 6e 67 74  /* Content lengt
13d0: 68 20 72 65 70 6f 72 74 65 64 20 69 6e 20 74 68  h reported in th
13e0: 65 20 68 65 61 64 65 72 20 2a 2f 0a 73 74 61 74  e header */.stat
13f0: 69 63 20 63 68 61 72 20 2a 7a 43 6f 6e 74 65 6e  ic char *zConten
1400: 74 54 79 70 65 20 3d 20 30 3b 20 20 20 2f 2a 20  tType = 0;   /* 
1410: 43 6f 6e 74 65 6e 74 20 74 79 70 65 20 72 65 70  Content type rep
1420: 6f 72 74 65 64 20 69 6e 20 74 68 65 20 68 65 61  orted in the hea
1430: 64 65 72 20 2a 2f 0a 73 74 61 74 69 63 20 63 68  der */.static ch
1440: 61 72 20 2a 7a 51 75 65 72 79 53 75 66 66 69 78  ar *zQuerySuffix
1450: 20 3d 20 30 3b 20 20 20 2f 2a 20 54 68 65 20 70   = 0;   /* The p
1460: 61 72 74 20 6f 66 20 74 68 65 20 55 52 4c 20 61  art of the URL a
1470: 66 74 65 72 20 74 68 65 20 66 69 72 73 74 20 3f  fter the first ?
1480: 20 2a 2f 0a 73 74 61 74 69 63 20 63 68 61 72 20   */.static char 
1490: 2a 7a 41 75 74 68 54 79 70 65 20 3d 20 30 3b 20  *zAuthType = 0; 
14a0: 20 20 20 20 20 2f 2a 20 41 75 74 68 6f 72 69 7a       /* Authoriz
14b0: 61 74 69 6f 6e 20 74 79 70 65 20 28 62 61 73 69  ation type (basi
14c0: 63 20 6f 72 20 64 69 67 65 73 74 29 20 2a 2f 0a  c or digest) */.
14d0: 73 74 61 74 69 63 20 63 68 61 72 20 2a 7a 41 75  static char *zAu
14e0: 74 68 41 72 67 20 3d 20 30 3b 20 20 20 20 20 20  thArg = 0;      
14f0: 20 2f 2a 20 41 75 74 68 6f 72 69 7a 61 74 69 6f   /* Authorizatio
1500: 6e 20 76 61 6c 75 65 73 20 2a 2f 0a 73 74 61 74  n values */.stat
1510: 69 63 20 63 68 61 72 20 2a 7a 52 65 6d 6f 74 65  ic char *zRemote
1520: 55 73 65 72 20 3d 20 30 3b 20 20 20 20 2f 2a 20  User = 0;    /* 
1530: 52 45 4d 4f 54 45 5f 55 53 45 52 20 73 65 74 20  REMOTE_USER set 
1540: 62 79 20 61 75 74 68 6f 72 69 7a 61 74 69 6f 6e  by authorization
1550: 20 6d 6f 64 75 6c 65 20 2a 2f 0a 73 74 61 74 69   module */.stati
1560: 63 20 69 6e 74 20 6e 49 6e 20 3d 20 30 3b 20 20  c int nIn = 0;  
1570: 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 4e              /* N
1580: 75 6d 62 65 72 20 6f 66 20 62 79 74 65 73 20 6f  umber of bytes o
1590: 66 20 69 6e 70 75 74 20 2a 2f 0a 73 74 61 74 69  f input */.stati
15a0: 63 20 69 6e 74 20 6e 4f 75 74 20 3d 20 30 3b 20  c int nOut = 0; 
15b0: 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 4e              /* N
15c0: 75 6d 62 65 72 20 6f 66 20 62 79 74 65 73 20 6f  umber of bytes o
15d0: 66 20 6f 75 74 70 75 74 20 2a 2f 0a 73 74 61 74  f output */.stat
15e0: 69 63 20 63 68 61 72 20 7a 52 65 70 6c 79 53 74  ic char zReplySt
15f0: 61 74 75 73 5b 34 5d 3b 20 20 20 20 20 2f 2a 20  atus[4];     /* 
1600: 52 65 70 6c 79 20 73 74 61 74 75 73 20 63 6f 64  Reply status cod
1610: 65 20 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74 20  e */.static int 
1620: 73 74 61 74 75 73 53 65 6e 74 20 3d 20 30 3b 20  statusSent = 0; 
1630: 20 20 20 20 20 20 2f 2a 20 54 72 75 65 20 61 66        /* True af
1640: 74 65 72 20 73 74 61 74 75 73 20 6c 69 6e 65 20  ter status line 
1650: 69 73 20 73 65 6e 74 20 2a 2f 0a 73 74 61 74 69  is sent */.stati
1660: 63 20 63 68 61 72 20 2a 7a 4c 6f 67 46 69 6c 65  c char *zLogFile
1670: 20 3d 20 30 3b 20 20 20 20 20 20 20 2f 2a 20 4c   = 0;       /* L
1680: 6f 67 20 74 6f 20 74 68 69 73 20 66 69 6c 65 20  og to this file 
1690: 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74 20 64 65  */.static int de
16a0: 62 75 67 46 6c 61 67 20 3d 20 30 3b 20 20 20 20  bugFlag = 0;    
16b0: 20 20 20 20 2f 2a 20 54 72 75 65 20 69 66 20 62      /* True if b
16c0: 65 69 6e 67 20 64 65 62 75 67 67 65 64 20 2a 2f  eing debugged */
16d0: 0a 73 74 61 74 69 63 20 73 74 72 75 63 74 20 74  .static struct t
16e0: 69 6d 65 76 61 6c 20 62 65 67 69 6e 54 69 6d 65  imeval beginTime
16f0: 3b 20 2f 2a 20 54 69 6d 65 20 77 68 65 6e 20 74  ; /* Time when t
1700: 68 69 73 20 70 72 6f 63 65 73 73 20 73 74 61 72  his process star
1710: 74 73 20 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74  ts */.static int
1720: 20 63 6c 6f 73 65 43 6f 6e 6e 65 63 74 69 6f 6e   closeConnection
1730: 20 3d 20 30 3b 20 20 2f 2a 20 54 72 75 65 20 74   = 0;  /* True t
1740: 6f 20 73 65 6e 64 20 43 6f 6e 6e 65 63 74 69 6f  o send Connectio
1750: 6e 3a 20 63 6c 6f 73 65 20 69 6e 20 72 65 70 6c  n: close in repl
1760: 79 20 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74 20  y */.static int 
1770: 6e 52 65 71 75 65 73 74 20 3d 20 30 3b 20 20 20  nRequest = 0;   
1780: 20 20 20 20 20 20 2f 2a 20 4e 75 6d 62 65 72 20        /* Number 
1790: 6f 66 20 72 65 71 75 65 73 74 73 20 70 72 6f 63  of requests proc
17a0: 65 73 73 65 64 20 2a 2f 0a 73 74 61 74 69 63 20  essed */.static 
17b0: 69 6e 74 20 6f 6d 69 74 4c 6f 67 20 3d 20 30 3b  int omitLog = 0;
17c0: 20 20 20 20 20 20 20 20 20 20 2f 2a 20 44 6f 20            /* Do 
17d0: 6e 6f 74 20 6d 61 6b 65 20 6c 6f 67 66 69 6c 65  not make logfile
17e0: 20 65 6e 74 72 69 65 73 20 69 66 20 74 72 75 65   entries if true
17f0: 20 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74 20 75   */.static int u
1800: 73 65 48 74 74 70 73 20 3d 20 30 3b 20 20 20 20  seHttps = 0;    
1810: 20 20 20 20 20 2f 2a 20 54 72 75 65 20 74 6f 20       /* True to 
1820: 75 73 65 20 48 54 54 50 53 3a 20 69 6e 73 74 65  use HTTPS: inste
1830: 61 64 20 6f 66 20 48 54 54 50 3a 20 2a 2f 0a 73  ad of HTTP: */.s
1840: 74 61 74 69 63 20 63 68 61 72 20 2a 7a 48 74 74  tatic char *zHtt
1850: 70 20 3d 20 22 68 74 74 70 22 3b 20 20 20 20 20  p = "http";     
1860: 2f 2a 20 68 74 74 70 20 6f 72 20 68 74 74 70 73  /* http or https
1870: 20 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74 20 75   */.static int u
1880: 73 65 54 69 6d 65 6f 75 74 20 3d 20 31 3b 20 20  seTimeout = 1;  
1890: 20 20 20 20 20 2f 2a 20 54 72 75 65 20 74 6f 20       /* True to 
18a0: 75 73 65 20 74 69 6d 65 73 20 2a 2f 0a 73 74 61  use times */.sta
18b0: 74 69 63 20 69 6e 74 20 73 74 61 6e 64 61 6c 6f  tic int standalo
18c0: 6e 65 20 3d 20 30 3b 20 20 20 20 20 20 20 2f 2a  ne = 0;       /*
18d0: 20 52 75 6e 20 61 73 20 61 20 73 74 61 6e 64 61   Run as a standa
18e0: 6c 6f 6e 65 20 73 65 72 76 65 72 20 28 6e 6f 20  lone server (no 
18f0: 69 6e 65 74 64 29 20 2a 2f 0a 73 74 61 74 69 63  inetd) */.static
1900: 20 69 6e 74 20 69 70 76 36 4f 6e 6c 79 20 3d 20   int ipv6Only = 
1910: 30 3b 20 20 20 20 20 20 20 20 20 2f 2a 20 55 73  0;         /* Us
1920: 65 20 49 50 76 36 20 6f 6e 6c 79 20 2a 2f 0a 73  e IPv6 only */.s
1930: 74 61 74 69 63 20 69 6e 74 20 69 70 76 34 4f 6e  tatic int ipv4On
1940: 6c 79 20 3d 20 30 3b 20 20 20 20 20 20 20 20 20  ly = 0;         
1950: 2f 2a 20 55 73 65 20 49 50 76 34 20 6f 6e 6c 79  /* Use IPv4 only
1960: 20 2a 2f 0a 73 74 61 74 69 63 20 73 74 72 75 63   */.static struc
1970: 74 20 72 75 73 61 67 65 20 70 72 69 6f 72 53 65  t rusage priorSe
1980: 6c 66 3b 20 20 2f 2a 20 50 72 65 76 69 6f 75 73  lf;  /* Previous
1990: 6c 79 20 72 65 70 6f 72 74 20 53 45 4c 46 20 74  ly report SELF t
19a0: 69 6d 65 20 2a 2f 0a 73 74 61 74 69 63 20 73 74  ime */.static st
19b0: 72 75 63 74 20 72 75 73 61 67 65 20 70 72 69 6f  ruct rusage prio
19c0: 72 43 68 69 6c 64 3b 20 2f 2a 20 50 72 65 76 69  rChild; /* Previ
19d0: 6f 75 73 6c 79 20 72 65 70 6f 72 74 20 43 48 49  ously report CHI
19e0: 4c 44 20 74 69 6d 65 20 2a 2f 0a 0a 2f 2a 0a 2a  LD time */../*.*
19f0: 2a 20 44 6f 75 62 6c 65 20 61 6e 79 20 64 6f 75  * Double any dou
1a00: 62 6c 65 2d 71 75 6f 74 65 20 63 68 61 72 61 63  ble-quote charac
1a10: 74 65 72 73 20 69 6e 20 61 20 73 74 72 69 6e 67  ters in a string
1a20: 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 63 68 61 72  ..*/.static char
1a30: 20 2a 45 73 63 61 70 65 28 63 68 61 72 20 2a 7a   *Escape(char *z
1a40: 29 7b 0a 20 20 69 6e 74 20 69 2c 20 6a 3b 0a 20  ){.  int i, j;. 
1a50: 20 69 6e 74 20 6e 3b 0a 20 20 63 68 61 72 20 63   int n;.  char c
1a60: 3b 0a 20 20 63 68 61 72 20 2a 7a 4f 75 74 3b 0a  ;.  char *zOut;.
1a70: 20 20 66 6f 72 28 69 3d 30 3b 20 28 63 3d 7a 5b    for(i=0; (c=z[
1a80: 69 5d 29 21 3d 30 20 26 26 20 63 21 3d 27 22 27  i])!=0 && c!='"'
1a90: 3b 20 69 2b 2b 29 7b 7d 0a 20 20 69 66 28 20 63  ; i++){}.  if( c
1aa0: 3d 3d 30 20 29 20 72 65 74 75 72 6e 20 7a 3b 0a  ==0 ) return z;.
1ab0: 20 20 6e 20 3d 20 31 3b 0a 20 20 66 6f 72 28 69    n = 1;.  for(i
1ac0: 2b 2b 3b 20 28 63 3d 7a 5b 69 5d 29 21 3d 30 3b  ++; (c=z[i])!=0;
1ad0: 20 69 2b 2b 29 7b 20 69 66 28 20 63 3d 3d 27 22   i++){ if( c=='"
1ae0: 27 20 29 20 6e 2b 2b 3b 20 7d 0a 20 20 7a 4f 75  ' ) n++; }.  zOu
1af0: 74 20 3d 20 6d 61 6c 6c 6f 63 28 20 69 2b 6e 2b  t = malloc( i+n+
1b00: 31 20 29 3b 0a 20 20 69 66 28 20 7a 4f 75 74 3d  1 );.  if( zOut=
1b10: 3d 30 20 29 20 72 65 74 75 72 6e 20 22 22 3b 0a  =0 ) return "";.
1b20: 20 20 66 6f 72 28 69 3d 6a 3d 30 3b 20 28 63 3d    for(i=j=0; (c=
1b30: 7a 5b 69 5d 29 21 3d 30 3b 20 69 2b 2b 29 7b 0a  z[i])!=0; i++){.
1b40: 20 20 20 20 7a 4f 75 74 5b 6a 2b 2b 5d 20 3d 20      zOut[j++] = 
1b50: 63 3b 0a 20 20 20 20 69 66 28 20 63 3d 3d 27 22  c;.    if( c=='"
1b60: 27 20 29 20 7a 4f 75 74 5b 6a 2b 2b 5d 20 3d 20  ' ) zOut[j++] = 
1b70: 63 3b 0a 20 20 7d 0a 20 20 7a 4f 75 74 5b 6a 5d  c;.  }.  zOut[j]
1b80: 20 3d 20 30 3b 0a 20 20 72 65 74 75 72 6e 20 7a   = 0;.  return z
1b90: 4f 75 74 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 43 6f  Out;.}../*.** Co
1ba0: 6e 76 65 72 74 20 61 20 73 74 72 75 63 74 20 74  nvert a struct t
1bb0: 69 6d 65 76 61 6c 20 69 6e 74 6f 20 61 6e 20 69  imeval into an i
1bc0: 6e 74 65 67 65 72 20 6e 75 6d 62 65 72 20 6f 66  nteger number of
1bd0: 20 6d 69 6c 6c 69 73 65 63 6f 6e 64 73 0a 2a 2f   milliseconds.*/
1be0: 0a 73 74 61 74 69 63 20 69 6e 74 20 74 76 6d 73  .static int tvms
1bf0: 28 73 74 72 75 63 74 20 74 69 6d 65 76 61 6c 20  (struct timeval 
1c00: 2a 70 29 7b 0a 20 20 72 65 74 75 72 6e 20 28 69  *p){.  return (i
1c10: 6e 74 29 28 70 2d 3e 74 76 5f 73 65 63 2a 31 30  nt)(p->tv_sec*10
1c20: 30 30 30 30 30 20 2b 20 70 2d 3e 74 76 5f 75 73  00000 + p->tv_us
1c30: 65 63 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 4d 61  ec);.}../*.** Ma
1c40: 6b 65 20 61 6e 20 65 6e 74 72 79 20 69 6e 20 74  ke an entry in t
1c50: 68 65 20 6c 6f 67 20 66 69 6c 65 2e 20 20 49 66  he log file.  If
1c60: 20 74 68 65 20 48 54 54 50 20 63 6f 6e 6e 65 63   the HTTP connec
1c70: 74 69 6f 6e 20 73 68 6f 75 6c 64 20 62 65 0a 2a  tion should be.*
1c80: 2a 20 63 6c 6f 73 65 64 2c 20 74 68 65 6e 20 74  * closed, then t
1c90: 65 72 6d 69 6e 61 74 65 20 74 68 69 73 20 70 72  erminate this pr
1ca0: 6f 63 65 73 73 2e 20 20 4f 74 68 65 72 77 69 73  ocess.  Otherwis
1cb0: 65 20 72 65 74 75 72 6e 2e 0a 2a 2f 0a 73 74 61  e return..*/.sta
1cc0: 74 69 63 20 76 6f 69 64 20 4d 61 6b 65 4c 6f 67  tic void MakeLog
1cd0: 45 6e 74 72 79 28 69 6e 74 20 61 29 7b 0a 20 20  Entry(int a){.  
1ce0: 46 49 4c 45 20 2a 6c 6f 67 3b 0a 20 20 69 66 28  FILE *log;.  if(
1cf0: 20 7a 54 6d 70 4e 61 6d 20 29 7b 0a 20 20 20 20   zTmpNam ){.    
1d00: 75 6e 6c 69 6e 6b 28 7a 54 6d 70 4e 61 6d 29 3b  unlink(zTmpNam);
1d10: 0a 20 20 7d 0a 20 20 69 66 28 20 7a 4c 6f 67 46  .  }.  if( zLogF
1d20: 69 6c 65 20 26 26 20 21 6f 6d 69 74 4c 6f 67 20  ile && !omitLog 
1d30: 29 7b 0a 20 20 20 20 73 74 72 75 63 74 20 74 69  ){.    struct ti
1d40: 6d 65 76 61 6c 20 6e 6f 77 3b 0a 20 20 20 20 73  meval now;.    s
1d50: 74 72 75 63 74 20 74 6d 20 2a 70 54 6d 3b 0a 20  truct tm *pTm;. 
1d60: 20 20 20 73 74 72 75 63 74 20 72 75 73 61 67 65     struct rusage
1d70: 20 73 65 6c 66 2c 20 63 68 69 6c 64 72 65 6e 3b   self, children;
1d80: 0a 20 20 20 20 69 6e 74 20 77 61 69 74 53 74 61  .    int waitSta
1d90: 74 75 73 3b 0a 20 20 20 20 63 68 61 72 20 7a 44  tus;.    char zD
1da0: 61 74 65 5b 32 30 30 5d 3b 0a 20 20 20 20 63 68  ate[200];.    ch
1db0: 61 72 20 2a 7a 52 4d 20 3d 20 7a 52 65 6d 6f 74  ar *zRM = zRemot
1dc0: 65 55 73 65 72 20 3f 20 7a 52 65 6d 6f 74 65 55  eUser ? zRemoteU
1dd0: 73 65 72 20 3a 20 22 22 3b 0a 0a 20 20 20 20 69  ser : "";..    i
1de0: 66 28 20 7a 53 63 72 69 70 74 3d 3d 30 20 29 20  f( zScript==0 ) 
1df0: 7a 53 63 72 69 70 74 20 3d 20 22 22 3b 0a 20 20  zScript = "";.  
1e00: 20 20 69 66 28 20 7a 52 65 61 6c 53 63 72 69 70    if( zRealScrip
1e10: 74 3d 3d 30 20 29 20 7a 52 65 61 6c 53 63 72 69  t==0 ) zRealScri
1e20: 70 74 20 3d 20 22 22 3b 0a 20 20 20 20 69 66 28  pt = "";.    if(
1e30: 20 7a 52 65 6d 6f 74 65 41 64 64 72 3d 3d 30 20   zRemoteAddr==0 
1e40: 29 20 7a 52 65 6d 6f 74 65 41 64 64 72 20 3d 20  ) zRemoteAddr = 
1e50: 22 22 3b 0a 20 20 20 20 69 66 28 20 7a 48 74 74  "";.    if( zHtt
1e60: 70 48 6f 73 74 3d 3d 30 20 29 20 7a 48 74 74 70  pHost==0 ) zHttp
1e70: 48 6f 73 74 20 3d 20 22 22 3b 0a 20 20 20 20 69  Host = "";.    i
1e80: 66 28 20 7a 52 65 66 65 72 65 72 3d 3d 30 20 29  f( zReferer==0 )
1e90: 20 7a 52 65 66 65 72 65 72 20 3d 20 22 22 3b 0a   zReferer = "";.
1ea0: 20 20 20 20 69 66 28 20 7a 41 67 65 6e 74 3d 3d      if( zAgent==
1eb0: 30 20 29 20 7a 41 67 65 6e 74 20 3d 20 22 22 3b  0 ) zAgent = "";
1ec0: 0a 20 20 20 20 67 65 74 74 69 6d 65 6f 66 64 61  .    gettimeofda
1ed0: 79 28 26 6e 6f 77 2c 20 30 29 3b 0a 20 20 20 20  y(&now, 0);.    
1ee0: 70 54 6d 20 3d 20 6c 6f 63 61 6c 74 69 6d 65 28  pTm = localtime(
1ef0: 26 6e 6f 77 2e 74 76 5f 73 65 63 29 3b 0a 20 20  &now.tv_sec);.  
1f00: 20 20 73 74 72 66 74 69 6d 65 28 7a 44 61 74 65    strftime(zDate
1f10: 2c 20 73 69 7a 65 6f 66 28 7a 44 61 74 65 29 2c  , sizeof(zDate),
1f20: 20 22 25 59 2d 25 6d 2d 25 64 20 25 48 3a 25 4d   "%Y-%m-%d %H:%M
1f30: 3a 25 53 22 2c 20 70 54 6d 29 3b 0a 20 20 20 20  :%S", pTm);.    
1f40: 77 61 69 74 70 69 64 28 2d 31 2c 20 26 77 61 69  waitpid(-1, &wai
1f50: 74 53 74 61 74 75 73 2c 20 57 4e 4f 48 41 4e 47  tStatus, WNOHANG
1f60: 29 3b 0a 20 20 20 20 67 65 74 72 75 73 61 67 65  );.    getrusage
1f70: 28 52 55 53 41 47 45 5f 53 45 4c 46 2c 20 26 73  (RUSAGE_SELF, &s
1f80: 65 6c 66 29 3b 0a 20 20 20 20 67 65 74 72 75 73  elf);.    getrus
1f90: 61 67 65 28 52 55 53 41 47 45 5f 43 48 49 4c 44  age(RUSAGE_CHILD
1fa0: 52 45 4e 2c 20 26 63 68 69 6c 64 72 65 6e 29 3b  REN, &children);
1fb0: 0a 20 20 20 20 69 66 28 20 28 6c 6f 67 20 3d 20  .    if( (log = 
1fc0: 66 6f 70 65 6e 28 7a 4c 6f 67 46 69 6c 65 2c 22  fopen(zLogFile,"
1fd0: 61 22 29 29 21 3d 30 20 29 7b 0a 23 69 66 64 65  a"))!=0 ){.#ifde
1fe0: 66 20 43 4f 4d 42 49 4e 45 44 5f 4c 4f 47 5f 46  f COMBINED_LOG_F
1ff0: 4f 52 4d 41 54 0a 20 20 20 20 20 20 73 74 72 66  ORMAT.      strf
2000: 74 69 6d 65 28 7a 44 61 74 65 2c 20 73 69 7a 65  time(zDate, size
2010: 6f 66 28 7a 44 61 74 65 29 2c 20 22 25 64 2f 25  of(zDate), "%d/%
2020: 62 2f 25 59 3a 25 48 3a 25 4d 3a 25 53 20 25 7a  b/%Y:%H:%M:%S %z
2030: 22 2c 20 70 54 6d 29 3b 0a 20 20 20 20 20 20 66  ", pTm);.      f
2040: 70 72 69 6e 74 66 28 6c 6f 67 2c 20 22 25 73 20  printf(log, "%s 
2050: 2d 20 2d 20 5b 25 73 5d 20 5c 22 25 73 20 25 73  - - [%s] \"%s %s
2060: 20 25 73 5c 22 20 25 73 20 25 64 20 5c 22 25 73   %s\" %s %d \"%s
2070: 5c 22 20 5c 22 25 73 5c 22 5c 6e 22 2c 0a 20 20  \" \"%s\"\n",.  
2080: 20 20 20 20 20 20 20 20 20 20 20 20 7a 52 65 6d              zRem
2090: 6f 74 65 41 64 64 72 2c 20 7a 44 61 74 65 2c 20  oteAddr, zDate, 
20a0: 7a 4d 65 74 68 6f 64 2c 20 7a 53 63 72 69 70 74  zMethod, zScript
20b0: 2c 20 7a 50 72 6f 74 6f 63 6f 6c 2c 0a 20 20 20  , zProtocol,.   
20c0: 20 20 20 20 20 20 20 20 20 20 20 7a 52 65 70 6c             zRepl
20d0: 79 53 74 61 74 75 73 2c 20 6e 4f 75 74 2c 20 7a  yStatus, nOut, z
20e0: 52 65 66 65 72 65 72 2c 20 7a 41 67 65 6e 74 29  Referer, zAgent)
20f0: 3b 0a 23 65 6c 73 65 0a 20 20 20 20 20 20 73 74  ;.#else.      st
2100: 72 66 74 69 6d 65 28 7a 44 61 74 65 2c 20 73 69  rftime(zDate, si
2110: 7a 65 6f 66 28 7a 44 61 74 65 29 2c 20 22 25 59  zeof(zDate), "%Y
2120: 2d 25 6d 2d 25 64 20 25 48 3a 25 4d 3a 25 53 22  -%m-%d %H:%M:%S"
2130: 2c 20 70 54 6d 29 3b 0a 20 20 20 20 20 20 2f 2a  , pTm);.      /*
2140: 20 4c 6f 67 20 72 65 63 6f 72 64 20 66 69 6c 65   Log record file
2150: 73 3a 0a 20 20 20 20 20 20 2a 2a 20 20 28 31 29  s:.      **  (1)
2160: 20 44 61 74 65 20 61 6e 64 20 74 69 6d 65 0a 20   Date and time. 
2170: 20 20 20 20 20 2a 2a 20 20 28 32 29 20 49 50 20       **  (2) IP 
2180: 61 64 64 72 65 73 73 0a 20 20 20 20 20 20 2a 2a  address.      **
2190: 20 20 28 33 29 20 55 52 4c 20 62 65 69 6e 67 20    (3) URL being 
21a0: 61 63 63 65 73 73 65 64 0a 20 20 20 20 20 20 2a  accessed.      *
21b0: 2a 20 20 28 34 29 20 52 65 66 65 72 65 72 0a 20  *  (4) Referer. 
21c0: 20 20 20 20 20 2a 2a 20 20 28 35 29 20 52 65 70       **  (5) Rep
21d0: 6c 79 20 73 74 61 74 75 73 0a 20 20 20 20 20 20  ly status.      
21e0: 2a 2a 20 20 28 36 29 20 42 79 74 65 73 20 72 65  **  (6) Bytes re
21f0: 63 65 69 76 65 64 0a 20 20 20 20 20 20 2a 2a 20  ceived.      ** 
2200: 20 28 37 29 20 42 79 74 65 73 20 73 65 6e 74 0a   (7) Bytes sent.
2210: 20 20 20 20 20 20 2a 2a 20 20 28 38 29 20 53 65        **  (8) Se
2220: 6c 66 20 75 73 65 72 20 74 69 6d 65 0a 20 20 20  lf user time.   
2230: 20 20 20 2a 2a 20 20 28 39 29 20 53 65 6c 66 20     **  (9) Self 
2240: 73 79 73 74 65 6d 20 74 69 6d 65 0a 20 20 20 20  system time.    
2250: 20 20 2a 2a 20 28 31 30 29 20 43 68 69 6c 64 72    ** (10) Childr
2260: 65 6e 20 75 73 65 72 20 74 69 6d 65 0a 20 20 20  en user time.   
2270: 20 20 20 2a 2a 20 28 31 31 29 20 43 68 69 6c 64     ** (11) Child
2280: 72 65 6e 20 73 79 73 74 65 6d 20 74 69 6d 65 0a  ren system time.
2290: 20 20 20 20 20 20 2a 2a 20 28 31 32 29 20 54 6f        ** (12) To
22a0: 74 61 6c 20 77 61 6c 6c 2d 63 6c 6f 63 6b 20 74  tal wall-clock t
22b0: 69 6d 65 0a 20 20 20 20 20 20 2a 2a 20 28 31 33  ime.      ** (13
22c0: 29 20 52 65 71 75 65 73 74 20 6e 75 6d 62 65 72  ) Request number
22d0: 20 66 6f 72 20 73 61 6d 65 20 54 43 50 2f 49 50   for same TCP/IP
22e0: 20 63 6f 6e 6e 65 63 74 69 6f 6e 0a 20 20 20 20   connection.    
22f0: 20 20 2a 2a 20 28 31 34 29 20 55 73 65 72 20 61    ** (14) User a
2300: 67 65 6e 74 0a 20 20 20 20 20 20 2a 2a 20 28 31  gent.      ** (1
2310: 35 29 20 52 65 6d 6f 74 65 20 75 73 65 72 0a 20  5) Remote user. 
2320: 20 20 20 20 20 2a 2a 20 28 31 36 29 20 42 79 74       ** (16) Byt
2330: 65 73 20 6f 66 20 55 52 4c 20 74 68 61 74 20 63  es of URL that c
2340: 6f 72 72 65 73 70 6f 6e 64 20 74 6f 20 74 68 65  orrespond to the
2350: 20 53 43 52 49 50 54 5f 4e 41 4d 45 0a 20 20 20   SCRIPT_NAME.   
2360: 20 20 20 2a 2f 0a 20 20 20 20 20 20 66 70 72 69     */.      fpri
2370: 6e 74 66 28 6c 6f 67 2c 0a 20 20 20 20 20 20 20  ntf(log,.       
2380: 20 22 25 73 2c 25 73 2c 5c 22 25 73 3a 2f 2f 25   "%s,%s,\"%s://%
2390: 73 25 73 5c 22 2c 5c 22 25 73 5c 22 2c 22 0a 20  s%s\",\"%s\",". 
23a0: 20 20 20 20 20 20 20 20 20 20 22 25 73 2c 25 64            "%s,%d
23b0: 2c 25 64 2c 25 64 2c 25 64 2c 25 64 2c 25 64 2c  ,%d,%d,%d,%d,%d,
23c0: 25 64 2c 25 64 2c 5c 22 25 73 5c 22 2c 5c 22 25  %d,%d,\"%s\",\"%
23d0: 73 5c 22 2c 25 64 5c 6e 22 2c 0a 20 20 20 20 20  s\",%d\n",.     
23e0: 20 20 20 7a 44 61 74 65 2c 20 7a 52 65 6d 6f 74     zDate, zRemot
23f0: 65 41 64 64 72 2c 20 7a 48 74 74 70 2c 20 45 73  eAddr, zHttp, Es
2400: 63 61 70 65 28 7a 48 74 74 70 48 6f 73 74 29 2c  cape(zHttpHost),
2410: 20 45 73 63 61 70 65 28 7a 53 63 72 69 70 74 29   Escape(zScript)
2420: 2c 0a 20 20 20 20 20 20 20 20 45 73 63 61 70 65  ,.        Escape
2430: 28 7a 52 65 66 65 72 65 72 29 2c 20 7a 52 65 70  (zReferer), zRep
2440: 6c 79 53 74 61 74 75 73 2c 20 6e 49 6e 2c 20 6e  lyStatus, nIn, n
2450: 4f 75 74 2c 0a 20 20 20 20 20 20 20 20 74 76 6d  Out,.        tvm
2460: 73 28 26 73 65 6c 66 2e 72 75 5f 75 74 69 6d 65  s(&self.ru_utime
2470: 29 20 2d 20 74 76 6d 73 28 26 70 72 69 6f 72 53  ) - tvms(&priorS
2480: 65 6c 66 2e 72 75 5f 75 74 69 6d 65 29 2c 0a 20  elf.ru_utime),. 
2490: 20 20 20 20 20 20 20 74 76 6d 73 28 26 73 65 6c         tvms(&sel
24a0: 66 2e 72 75 5f 73 74 69 6d 65 29 20 2d 20 74 76  f.ru_stime) - tv
24b0: 6d 73 28 26 70 72 69 6f 72 53 65 6c 66 2e 72 75  ms(&priorSelf.ru
24c0: 5f 73 74 69 6d 65 29 2c 0a 20 20 20 20 20 20 20  _stime),.       
24d0: 20 74 76 6d 73 28 26 63 68 69 6c 64 72 65 6e 2e   tvms(&children.
24e0: 72 75 5f 75 74 69 6d 65 29 20 2d 20 74 76 6d 73  ru_utime) - tvms
24f0: 28 26 70 72 69 6f 72 43 68 69 6c 64 2e 72 75 5f  (&priorChild.ru_
2500: 75 74 69 6d 65 29 2c 0a 20 20 20 20 20 20 20 20  utime),.        
2510: 74 76 6d 73 28 26 63 68 69 6c 64 72 65 6e 2e 72  tvms(&children.r
2520: 75 5f 73 74 69 6d 65 29 20 2d 20 74 76 6d 73 28  u_stime) - tvms(
2530: 26 70 72 69 6f 72 43 68 69 6c 64 2e 72 75 5f 73  &priorChild.ru_s
2540: 74 69 6d 65 29 2c 0a 20 20 20 20 20 20 20 20 74  time),.        t
2550: 76 6d 73 28 26 6e 6f 77 29 20 2d 20 74 76 6d 73  vms(&now) - tvms
2560: 28 26 62 65 67 69 6e 54 69 6d 65 29 2c 0a 20 20  (&beginTime),.  
2570: 20 20 20 20 20 20 6e 52 65 71 75 65 73 74 2c 20        nRequest, 
2580: 45 73 63 61 70 65 28 7a 41 67 65 6e 74 29 2c 20  Escape(zAgent), 
2590: 45 73 63 61 70 65 28 7a 52 4d 29 2c 0a 20 20 20  Escape(zRM),.   
25a0: 20 20 20 20 20 28 69 6e 74 29 28 73 74 72 6c 65       (int)(strle
25b0: 6e 28 7a 48 74 74 70 29 2b 73 74 72 6c 65 6e 28  n(zHttp)+strlen(
25c0: 7a 48 74 74 70 48 6f 73 74 29 2b 73 74 72 6c 65  zHttpHost)+strle
25d0: 6e 28 7a 52 65 61 6c 53 63 72 69 70 74 29 2b 33  n(zRealScript)+3
25e0: 29 0a 20 20 20 20 20 20 29 3b 0a 20 20 20 20 20  ).      );.     
25f0: 20 70 72 69 6f 72 53 65 6c 66 20 3d 20 73 65 6c   priorSelf = sel
2600: 66 3b 0a 20 20 20 20 20 20 70 72 69 6f 72 43 68  f;.      priorCh
2610: 69 6c 64 20 3d 20 63 68 69 6c 64 72 65 6e 3b 0a  ild = children;.
2620: 20 20 20 20 20 20 62 65 67 69 6e 54 69 6d 65 20        beginTime 
2630: 3d 20 6e 6f 77 3b 0a 23 65 6e 64 69 66 0a 20 20  = now;.#endif.  
2640: 20 20 20 20 66 63 6c 6f 73 65 28 6c 6f 67 29 3b      fclose(log);
2650: 0a 20 20 20 20 20 20 6e 49 6e 20 3d 20 6e 4f 75  .      nIn = nOu
2660: 74 20 3d 20 30 3b 0a 20 20 20 20 7d 0a 20 20 7d  t = 0;.    }.  }
2670: 0a 20 20 69 66 28 20 63 6c 6f 73 65 43 6f 6e 6e  .  if( closeConn
2680: 65 63 74 69 6f 6e 20 29 7b 0a 20 20 20 20 65 78  ection ){.    ex
2690: 69 74 28 61 29 3b 0a 20 20 7d 0a 20 20 73 74 61  it(a);.  }.  sta
26a0: 74 75 73 53 65 6e 74 20 3d 20 30 3b 0a 7d 0a 0a  tusSent = 0;.}..
26b0: 2f 2a 0a 2a 2a 20 41 6c 6c 6f 63 61 74 65 20 6d  /*.** Allocate m
26c0: 65 6d 6f 72 79 20 73 61 66 65 6c 79 0a 2a 2f 0a  emory safely.*/.
26d0: 73 74 61 74 69 63 20 63 68 61 72 20 2a 53 61 66  static char *Saf
26e0: 65 4d 61 6c 6c 6f 63 28 20 69 6e 74 20 73 69 7a  eMalloc( int siz
26f0: 65 20 29 7b 0a 20 20 63 68 61 72 20 2a 70 3b 0a  e ){.  char *p;.
2700: 0a 20 20 70 20 3d 20 28 63 68 61 72 2a 29 6d 61  .  p = (char*)ma
2710: 6c 6c 6f 63 28 73 69 7a 65 29 3b 0a 20 20 69 66  lloc(size);.  if
2720: 28 20 70 3d 3d 30 20 29 7b 0a 20 20 20 20 73 74  ( p==0 ){.    st
2730: 72 63 70 79 28 7a 52 65 70 6c 79 53 74 61 74 75  rcpy(zReplyStatu
2740: 73 2c 20 22 39 39 38 22 29 3b 0a 20 20 20 20 4d  s, "998");.    M
2750: 61 6b 65 4c 6f 67 45 6e 74 72 79 28 31 29 3b 0a  akeLogEntry(1);.
2760: 20 20 20 20 65 78 69 74 28 31 29 3b 0a 20 20 7d      exit(1);.  }
2770: 0a 20 20 72 65 74 75 72 6e 20 70 3b 0a 7d 0a 0a  .  return p;.}..
2780: 2f 2a 0a 2a 2a 20 53 65 74 20 74 68 65 20 76 61  /*.** Set the va
2790: 6c 75 65 20 6f 66 20 65 6e 76 69 72 6f 6e 6d 65  lue of environme
27a0: 6e 74 20 76 61 72 69 61 62 6c 65 20 7a 56 61 72  nt variable zVar
27b0: 20 74 6f 20 7a 56 61 6c 75 65 2e 0a 2a 2f 0a 73   to zValue..*/.s
27c0: 74 61 74 69 63 20 76 6f 69 64 20 53 65 74 45 6e  tatic void SetEn
27d0: 76 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 56  v(const char *zV
27e0: 61 72 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a  ar, const char *
27f0: 7a 56 61 6c 75 65 29 7b 0a 20 20 63 68 61 72 20  zValue){.  char 
2800: 2a 7a 3b 0a 20 20 69 6e 74 20 6c 65 6e 3b 0a 20  *z;.  int len;. 
2810: 20 69 66 28 20 7a 56 61 6c 75 65 3d 3d 30 20 29   if( zValue==0 )
2820: 20 7a 56 61 6c 75 65 3d 22 22 3b 0a 20 20 6c 65   zValue="";.  le
2830: 6e 20 3d 20 73 74 72 6c 65 6e 28 7a 56 61 72 29  n = strlen(zVar)
2840: 20 2b 20 73 74 72 6c 65 6e 28 7a 56 61 6c 75 65   + strlen(zValue
2850: 29 20 2b 20 32 3b 0a 20 20 7a 20 3d 20 53 61 66  ) + 2;.  z = Saf
2860: 65 4d 61 6c 6c 6f 63 28 6c 65 6e 29 3b 0a 20 20  eMalloc(len);.  
2870: 73 70 72 69 6e 74 66 28 7a 2c 22 25 73 3d 25 73  sprintf(z,"%s=%s
2880: 22 2c 7a 56 61 72 2c 7a 56 61 6c 75 65 29 3b 0a  ",zVar,zValue);.
2890: 20 20 70 75 74 65 6e 76 28 7a 29 3b 0a 7d 0a 0a    putenv(z);.}..
28a0: 2f 2a 0a 2a 2a 20 52 65 6d 6f 76 65 20 74 68 65  /*.** Remove the
28b0: 20 66 69 72 73 74 20 73 70 61 63 65 2d 64 65 6c   first space-del
28c0: 69 6d 69 74 65 64 20 74 6f 6b 65 6e 20 66 72 6f  imited token fro
28d0: 6d 20 61 20 73 74 72 69 6e 67 20 61 6e 64 20 72  m a string and r
28e0: 65 74 75 72 6e 0a 2a 2a 20 61 20 70 6f 69 6e 74  eturn.** a point
28f0: 65 72 20 74 6f 20 69 74 2e 20 20 41 64 64 20 61  er to it.  Add a
2900: 20 4e 55 4c 4c 20 74 6f 20 74 68 65 20 73 74 72   NULL to the str
2910: 69 6e 67 20 74 6f 20 74 65 72 6d 69 6e 61 74 65  ing to terminate
2920: 20 74 68 65 20 74 6f 6b 65 6e 2e 0a 2a 2a 20 4d   the token..** M
2930: 61 6b 65 20 2a 7a 4c 65 66 74 4f 76 65 72 20 70  ake *zLeftOver p
2940: 6f 69 6e 74 20 74 6f 20 74 68 65 20 73 74 61 72  oint to the star
2950: 74 20 6f 66 20 74 68 65 20 6e 65 78 74 20 74 6f  t of the next to
2960: 6b 65 6e 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 63  ken..*/.static c
2970: 68 61 72 20 2a 47 65 74 46 69 72 73 74 45 6c 65  har *GetFirstEle
2980: 6d 65 6e 74 28 63 68 61 72 20 2a 7a 49 6e 70 75  ment(char *zInpu
2990: 74 2c 20 63 68 61 72 20 2a 2a 7a 4c 65 66 74 4f  t, char **zLeftO
29a0: 76 65 72 29 7b 0a 20 20 63 68 61 72 20 2a 7a 52  ver){.  char *zR
29b0: 65 73 75 6c 74 20 3d 20 30 3b 0a 20 20 69 66 28  esult = 0;.  if(
29c0: 20 7a 49 6e 70 75 74 3d 3d 30 20 29 7b 0a 20 20   zInput==0 ){.  
29d0: 20 20 69 66 28 20 7a 4c 65 66 74 4f 76 65 72 20    if( zLeftOver 
29e0: 29 20 2a 7a 4c 65 66 74 4f 76 65 72 20 3d 20 30  ) *zLeftOver = 0
29f0: 3b 0a 20 20 20 20 72 65 74 75 72 6e 20 30 3b 0a  ;.    return 0;.
2a00: 20 20 7d 0a 20 20 77 68 69 6c 65 28 20 69 73 73    }.  while( iss
2a10: 70 61 63 65 28 2a 7a 49 6e 70 75 74 29 20 29 7b  pace(*zInput) ){
2a20: 20 7a 49 6e 70 75 74 2b 2b 3b 20 7d 0a 20 20 7a   zInput++; }.  z
2a30: 52 65 73 75 6c 74 20 3d 20 7a 49 6e 70 75 74 3b  Result = zInput;
2a40: 0a 20 20 77 68 69 6c 65 28 20 2a 7a 49 6e 70 75  .  while( *zInpu
2a50: 74 20 26 26 20 21 69 73 73 70 61 63 65 28 2a 7a  t && !isspace(*z
2a60: 49 6e 70 75 74 29 20 29 7b 20 7a 49 6e 70 75 74  Input) ){ zInput
2a70: 2b 2b 3b 20 7d 0a 20 20 69 66 28 20 2a 7a 49 6e  ++; }.  if( *zIn
2a80: 70 75 74 20 29 7b 0a 20 20 20 20 2a 7a 49 6e 70  put ){.    *zInp
2a90: 75 74 20 3d 20 30 3b 0a 20 20 20 20 7a 49 6e 70  ut = 0;.    zInp
2aa0: 75 74 2b 2b 3b 0a 20 20 20 20 77 68 69 6c 65 28  ut++;.    while(
2ab0: 20 69 73 73 70 61 63 65 28 2a 7a 49 6e 70 75 74   isspace(*zInput
2ac0: 29 20 29 7b 20 7a 49 6e 70 75 74 2b 2b 3b 20 7d  ) ){ zInput++; }
2ad0: 0a 20 20 7d 0a 20 20 69 66 28 20 7a 4c 65 66 74  .  }.  if( zLeft
2ae0: 4f 76 65 72 20 29 7b 20 2a 7a 4c 65 66 74 4f 76  Over ){ *zLeftOv
2af0: 65 72 20 3d 20 7a 49 6e 70 75 74 3b 20 7d 0a 20  er = zInput; }. 
2b00: 20 72 65 74 75 72 6e 20 7a 52 65 73 75 6c 74 3b   return zResult;
2b10: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 4d 61 6b 65 20 61  .}../*.** Make a
2b20: 20 63 6f 70 79 20 6f 66 20 61 20 73 74 72 69 6e   copy of a strin
2b30: 67 20 69 6e 74 6f 20 6d 65 6d 6f 72 79 20 6f 62  g into memory ob
2b40: 74 61 69 6e 65 64 20 66 72 6f 6d 20 6d 61 6c 6c  tained from mall
2b50: 6f 63 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 63 68  oc..*/.static ch
2b60: 61 72 20 2a 53 74 72 44 75 70 28 63 6f 6e 73 74  ar *StrDup(const
2b70: 20 63 68 61 72 20 2a 7a 53 72 63 29 7b 0a 20 20   char *zSrc){.  
2b80: 63 68 61 72 20 2a 7a 44 65 73 74 3b 0a 20 20 69  char *zDest;.  i
2b90: 6e 74 20 73 69 7a 65 3b 0a 0a 20 20 69 66 28 20  nt size;..  if( 
2ba0: 7a 53 72 63 3d 3d 30 20 29 20 72 65 74 75 72 6e  zSrc==0 ) return
2bb0: 20 30 3b 0a 20 20 73 69 7a 65 20 3d 20 73 74 72   0;.  size = str
2bc0: 6c 65 6e 28 7a 53 72 63 29 20 2b 20 31 3b 0a 20  len(zSrc) + 1;. 
2bd0: 20 7a 44 65 73 74 20 3d 20 28 63 68 61 72 2a 29   zDest = (char*)
2be0: 53 61 66 65 4d 61 6c 6c 6f 63 28 20 73 69 7a 65  SafeMalloc( size
2bf0: 20 29 3b 0a 20 20 73 74 72 63 70 79 28 7a 44 65   );.  strcpy(zDe
2c00: 73 74 2c 7a 53 72 63 29 3b 0a 20 20 72 65 74 75  st,zSrc);.  retu
2c10: 72 6e 20 7a 44 65 73 74 3b 0a 7d 0a 73 74 61 74  rn zDest;.}.stat
2c20: 69 63 20 63 68 61 72 20 2a 53 74 72 41 70 70 65  ic char *StrAppe
2c30: 6e 64 28 63 68 61 72 20 2a 7a 50 72 69 6f 72 2c  nd(char *zPrior,
2c40: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 53 65   const char *zSe
2c50: 70 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a  p, const char *z
2c60: 53 72 63 29 7b 0a 20 20 63 68 61 72 20 2a 7a 44  Src){.  char *zD
2c70: 65 73 74 3b 0a 20 20 69 6e 74 20 73 69 7a 65 3b  est;.  int size;
2c80: 0a 20 20 69 6e 74 20 6e 31 2c 20 6e 32 3b 0a 0a  .  int n1, n2;..
2c90: 20 20 69 66 28 20 7a 53 72 63 3d 3d 30 20 29 20    if( zSrc==0 ) 
2ca0: 72 65 74 75 72 6e 20 30 3b 0a 20 20 69 66 28 20  return 0;.  if( 
2cb0: 7a 50 72 69 6f 72 3d 3d 30 20 29 20 72 65 74 75  zPrior==0 ) retu
2cc0: 72 6e 20 53 74 72 44 75 70 28 7a 53 72 63 29 3b  rn StrDup(zSrc);
2cd0: 0a 20 20 73 69 7a 65 20 3d 20 28 6e 31 3d 73 74  .  size = (n1=st
2ce0: 72 6c 65 6e 28 7a 53 72 63 29 29 20 2b 20 28 6e  rlen(zSrc)) + (n
2cf0: 32 3d 73 74 72 6c 65 6e 28 7a 53 65 70 29 29 20  2=strlen(zSep)) 
2d00: 2b 20 73 74 72 6c 65 6e 28 7a 50 72 69 6f 72 29  + strlen(zPrior)
2d10: 20 2b 20 31 3b 0a 20 20 7a 44 65 73 74 20 3d 20   + 1;.  zDest = 
2d20: 28 63 68 61 72 2a 29 53 61 66 65 4d 61 6c 6c 6f  (char*)SafeMallo
2d30: 63 28 20 73 69 7a 65 20 29 3b 0a 20 20 73 74 72  c( size );.  str
2d40: 63 70 79 28 7a 44 65 73 74 2c 7a 50 72 69 6f 72  cpy(zDest,zPrior
2d50: 29 3b 0a 20 20 66 72 65 65 28 7a 50 72 69 6f 72  );.  free(zPrior
2d60: 29 3b 0a 20 20 73 74 72 63 70 79 28 26 7a 44 65  );.  strcpy(&zDe
2d70: 73 74 5b 6e 31 5d 2c 7a 53 65 70 29 3b 0a 20 20  st[n1],zSep);.  
2d80: 73 74 72 63 70 79 28 26 7a 44 65 73 74 5b 6e 31  strcpy(&zDest[n1
2d90: 2b 6e 32 5d 2c 7a 53 72 63 29 3b 0a 20 20 72 65  +n2],zSrc);.  re
2da0: 74 75 72 6e 20 7a 44 65 73 74 3b 0a 7d 0a 0a 2f  turn zDest;.}../
2db0: 2a 0a 2a 2a 20 42 72 65 61 6b 20 61 20 6c 69 6e  *.** Break a lin
2dc0: 65 20 61 74 20 74 68 65 20 66 69 72 73 74 20 5c  e at the first \
2dd0: 6e 20 6f 72 20 5c 72 20 63 68 61 72 61 63 74 65  n or \r characte
2de0: 72 20 73 65 65 6e 2e 0a 2a 2f 0a 73 74 61 74 69  r seen..*/.stati
2df0: 63 20 76 6f 69 64 20 52 65 6d 6f 76 65 4e 65 77  c void RemoveNew
2e00: 6c 69 6e 65 28 63 68 61 72 20 2a 7a 29 7b 0a 20  line(char *z){. 
2e10: 20 69 66 28 20 7a 3d 3d 30 20 29 20 72 65 74 75   if( z==0 ) retu
2e20: 72 6e 3b 0a 20 20 77 68 69 6c 65 28 20 2a 7a 20  rn;.  while( *z 
2e30: 26 26 20 2a 7a 21 3d 27 5c 6e 27 20 26 26 20 2a  && *z!='\n' && *
2e40: 7a 21 3d 27 5c 72 27 20 29 7b 20 7a 2b 2b 3b 20  z!='\r' ){ z++; 
2e50: 7d 0a 20 20 2a 7a 20 3d 20 30 3b 0a 7d 0a 0a 2f  }.  *z = 0;.}../
2e60: 2a 0a 2a 2a 20 50 72 69 6e 74 20 61 20 64 61 74  *.** Print a dat
2e70: 65 20 74 61 67 20 69 6e 20 74 68 65 20 68 65 61  e tag in the hea
2e80: 64 65 72 2e 20 20 54 68 65 20 6e 61 6d 65 20 6f  der.  The name o
2e90: 66 20 74 68 65 20 74 61 67 20 69 73 20 7a 54 61  f the tag is zTa
2ea0: 67 2e 0a 2a 2a 20 54 68 65 20 64 61 74 65 20 69  g..** The date i
2eb0: 73 20 64 65 74 65 72 6d 69 6e 65 64 20 66 72 6f  s determined fro
2ec0: 6d 20 74 68 65 20 75 6e 69 78 20 74 69 6d 65 73  m the unix times
2ed0: 74 61 6d 70 20 67 69 76 65 6e 2e 0a 2a 2f 0a 73  tamp given..*/.s
2ee0: 74 61 74 69 63 20 69 6e 74 20 44 61 74 65 54 61  tatic int DateTa
2ef0: 67 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 54  g(const char *zT
2f00: 61 67 2c 20 74 69 6d 65 5f 74 20 74 29 7b 0a 20  ag, time_t t){. 
2f10: 20 73 74 72 75 63 74 20 74 6d 20 2a 74 6d 3b 0a   struct tm *tm;.
2f20: 20 20 63 68 61 72 20 7a 44 61 74 65 5b 31 30 30    char zDate[100
2f30: 5d 3b 0a 20 20 74 6d 20 3d 20 67 6d 74 69 6d 65  ];.  tm = gmtime
2f40: 28 26 74 29 3b 0a 20 20 73 74 72 66 74 69 6d 65  (&t);.  strftime
2f50: 28 7a 44 61 74 65 2c 20 73 69 7a 65 6f 66 28 7a  (zDate, sizeof(z
2f60: 44 61 74 65 29 2c 20 22 25 61 2c 20 25 64 20 20  Date), "%a, %d  
2f70: 25 62 20 25 59 20 25 48 3a 25 4d 3a 25 53 20 25  %b %Y %H:%M:%S %
2f80: 7a 22 2c 20 74 6d 29 3b 0a 20 20 72 65 74 75 72  z", tm);.  retur
2f90: 6e 20 70 72 69 6e 74 66 28 22 25 73 3a 20 25 73  n printf("%s: %s
2fa0: 5c 72 5c 6e 22 2c 20 7a 54 61 67 2c 20 7a 44 61  \r\n", zTag, zDa
2fb0: 74 65 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 50 72  te);.}../*.** Pr
2fc0: 69 6e 74 20 74 68 65 20 66 69 72 73 74 20 6c 69  int the first li
2fd0: 6e 65 20 6f 66 20 61 20 72 65 73 70 6f 6e 73 65  ne of a response
2fe0: 20 66 6f 6c 6c 6f 77 65 64 20 62 79 20 74 68 65   followed by the
2ff0: 20 73 65 72 76 65 72 20 74 79 70 65 2e 0a 2a 2f   server type..*/
3000: 0a 73 74 61 74 69 63 20 76 6f 69 64 20 53 74 61  .static void Sta
3010: 72 74 52 65 73 70 6f 6e 73 65 28 63 6f 6e 73 74  rtResponse(const
3020: 20 63 68 61 72 20 2a 7a 52 65 73 75 6c 74 43 6f   char *zResultCo
3030: 64 65 29 7b 0a 20 20 74 69 6d 65 5f 74 20 6e 6f  de){.  time_t no
3040: 77 3b 0a 20 20 74 69 6d 65 28 26 6e 6f 77 29 3b  w;.  time(&now);
3050: 0a 20 20 69 66 28 20 73 74 61 74 75 73 53 65 6e  .  if( statusSen
3060: 74 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 6e 4f  t ) return;.  nO
3070: 75 74 20 2b 3d 20 70 72 69 6e 74 66 28 22 25 73  ut += printf("%s
3080: 20 25 73 5c 72 5c 6e 22 2c 20 7a 50 72 6f 74 6f   %s\r\n", zProto
3090: 63 6f 6c 2c 20 7a 52 65 73 75 6c 74 43 6f 64 65  col, zResultCode
30a0: 29 3b 0a 20 20 73 74 72 6e 63 70 79 28 7a 52 65  );.  strncpy(zRe
30b0: 70 6c 79 53 74 61 74 75 73 2c 20 7a 52 65 73 75  plyStatus, zResu
30c0: 6c 74 43 6f 64 65 2c 20 33 29 3b 0a 20 20 7a 52  ltCode, 3);.  zR
30d0: 65 70 6c 79 53 74 61 74 75 73 5b 33 5d 20 3d 20  eplyStatus[3] = 
30e0: 30 3b 0a 20 20 69 66 28 20 7a 52 65 70 6c 79 53  0;.  if( zReplyS
30f0: 74 61 74 75 73 5b 30 5d 3e 3d 27 34 27 20 29 7b  tatus[0]>='4' ){
3100: 0a 20 20 20 20 63 6c 6f 73 65 43 6f 6e 6e 65 63  .    closeConnec
3110: 74 69 6f 6e 20 3d 20 31 3b 0a 20 20 7d 0a 20 20  tion = 1;.  }.  
3120: 69 66 28 20 63 6c 6f 73 65 43 6f 6e 6e 65 63 74  if( closeConnect
3130: 69 6f 6e 20 29 7b 0a 20 20 20 20 6e 4f 75 74 20  ion ){.    nOut 
3140: 2b 3d 20 70 72 69 6e 74 66 28 22 43 6f 6e 6e 65  += printf("Conne
3150: 63 74 69 6f 6e 3a 20 63 6c 6f 73 65 5c 72 5c 6e  ction: close\r\n
3160: 22 29 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20  ");.  }else{.   
3170: 20 6e 4f 75 74 20 2b 3d 20 70 72 69 6e 74 66 28   nOut += printf(
3180: 22 43 6f 6e 6e 65 63 74 69 6f 6e 3a 20 6b 65 65  "Connection: kee
3190: 70 2d 61 6c 69 76 65 5c 72 5c 6e 22 29 3b 0a 20  p-alive\r\n");. 
31a0: 20 7d 0a 20 20 6e 4f 75 74 20 2b 3d 20 44 61 74   }.  nOut += Dat
31b0: 65 54 61 67 28 22 44 61 74 65 22 2c 20 6e 6f 77  eTag("Date", now
31c0: 29 3b 0a 20 20 73 74 61 74 75 73 53 65 6e 74 20  );.  statusSent 
31d0: 3d 20 31 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 65  = 1;.}../*.** Te
31e0: 6c 6c 20 74 68 65 20 63 6c 69 65 6e 74 20 74 68  ll the client th
31f0: 61 74 20 74 68 65 72 65 20 69 73 20 6e 6f 20 73  at there is no s
3200: 75 63 68 20 64 6f 63 75 6d 65 6e 74 0a 2a 2f 0a  uch document.*/.
3210: 73 74 61 74 69 63 20 76 6f 69 64 20 4e 6f 74 46  static void NotF
3220: 6f 75 6e 64 28 69 6e 74 20 6c 69 6e 65 6e 6f 29  ound(int lineno)
3230: 7b 0a 20 20 53 74 61 72 74 52 65 73 70 6f 6e 73  {.  StartRespons
3240: 65 28 22 34 30 34 20 4e 6f 74 20 46 6f 75 6e 64  e("404 Not Found
3250: 22 29 3b 0a 20 20 6e 4f 75 74 20 2b 3d 20 70 72  ");.  nOut += pr
3260: 69 6e 74 66 28 0a 20 20 20 20 22 43 6f 6e 74 65  intf(.    "Conte
3270: 6e 74 2d 74 79 70 65 3a 20 74 65 78 74 2f 68 74  nt-type: text/ht
3280: 6d 6c 5c 72 5c 6e 22 0a 20 20 20 20 22 5c 72 5c  ml\r\n".    "\r\
3290: 6e 22 0a 20 20 20 20 22 3c 68 65 61 64 3e 3c 74  n".    "<head><t
32a0: 69 74 6c 65 20 6c 69 6e 65 6e 6f 3d 5c 22 25 64  itle lineno=\"%d
32b0: 5c 22 3e 4e 6f 74 20 46 6f 75 6e 64 3c 2f 74 69  \">Not Found</ti
32c0: 74 6c 65 3e 3c 2f 68 65 61 64 3e 5c 6e 22 0a 20  tle></head>\n". 
32d0: 20 20 20 22 3c 62 6f 64 79 3e 3c 68 31 3e 44 6f     "<body><h1>Do
32e0: 63 75 6d 65 6e 74 20 4e 6f 74 20 46 6f 75 6e 64  cument Not Found
32f0: 3c 2f 68 31 3e 5c 6e 22 0a 20 20 20 20 22 54 68  </h1>\n".    "Th
3300: 65 20 64 6f 63 75 6d 65 6e 74 20 25 73 20 69 73  e document %s is
3310: 20 6e 6f 74 20 61 76 61 69 6c 61 62 6c 65 20 6f   not available o
3320: 6e 20 74 68 69 73 20 73 65 72 76 65 72 5c 6e 22  n this server\n"
3330: 0a 20 20 20 20 22 3c 2f 62 6f 64 79 3e 5c 6e 22  .    "</body>\n"
3340: 2c 20 6c 69 6e 65 6e 6f 2c 20 7a 53 63 72 69 70  , lineno, zScrip
3350: 74 29 3b 0a 20 20 4d 61 6b 65 4c 6f 67 45 6e 74  t);.  MakeLogEnt
3360: 72 79 28 30 29 3b 0a 20 20 65 78 69 74 28 30 29  ry(0);.  exit(0)
3370: 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 65 6c 6c 20  ;.}../*.** Tell 
3380: 74 68 65 20 63 6c 69 65 6e 74 20 74 68 61 74 20  the client that 
3390: 74 68 65 79 20 61 72 65 20 6e 6f 74 20 77 65 6c  they are not wel
33a0: 63 6f 6d 65 64 20 68 65 72 65 2e 0a 2a 2f 0a 73  comed here..*/.s
33b0: 74 61 74 69 63 20 76 6f 69 64 20 46 6f 72 62 69  tatic void Forbi
33c0: 64 64 65 6e 28 76 6f 69 64 29 7b 0a 20 20 53 74  dden(void){.  St
33d0: 61 72 74 52 65 73 70 6f 6e 73 65 28 22 34 30 33  artResponse("403
33e0: 20 46 6f 72 62 69 64 64 65 6e 22 29 3b 0a 20 20   Forbidden");.  
33f0: 6e 4f 75 74 20 2b 3d 20 70 72 69 6e 74 66 28 0a  nOut += printf(.
3400: 20 20 20 20 22 43 6f 6e 74 65 6e 74 2d 74 79 70      "Content-typ
3410: 65 3a 20 74 65 78 74 2f 70 6c 61 69 6e 5c 72 5c  e: text/plain\r\
3420: 6e 22 0a 20 20 20 20 22 5c 72 5c 6e 22 0a 20 20  n".    "\r\n".  
3430: 20 20 22 41 63 63 65 73 73 20 64 65 6e 69 65 64    "Access denied
3440: 5c 6e 22 0a 20 20 29 3b 0a 20 20 63 6c 6f 73 65  \n".  );.  close
3450: 43 6f 6e 6e 65 63 74 69 6f 6e 20 3d 20 31 3b 0a  Connection = 1;.
3460: 20 20 4d 61 6b 65 4c 6f 67 45 6e 74 72 79 28 30    MakeLogEntry(0
3470: 29 3b 0a 20 20 65 78 69 74 28 30 29 3b 0a 7d 0a  );.  exit(0);.}.
3480: 0a 2f 2a 0a 2a 2a 20 54 65 6c 6c 20 74 68 65 20  ./*.** Tell the 
3490: 63 6c 69 65 6e 74 20 74 68 61 74 20 61 75 74 68  client that auth
34a0: 6f 72 69 7a 61 74 69 6f 6e 20 69 73 20 72 65 71  orization is req
34b0: 75 69 72 65 64 20 74 6f 20 61 63 63 65 73 73 20  uired to access 
34c0: 74 68 65 0a 2a 2a 20 64 6f 63 75 6d 65 6e 74 2e  the.** document.
34d0: 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20  .*/.static void 
34e0: 4e 6f 74 41 75 74 68 6f 72 69 7a 65 64 28 63 6f  NotAuthorized(co
34f0: 6e 73 74 20 63 68 61 72 20 2a 7a 52 65 61 6c 6d  nst char *zRealm
3500: 29 7b 0a 20 20 53 74 61 72 74 52 65 73 70 6f 6e  ){.  StartRespon
3510: 73 65 28 22 34 30 31 20 41 75 74 68 6f 72 69 7a  se("401 Authoriz
3520: 61 74 69 6f 6e 20 52 65 71 75 69 72 65 64 22 29  ation Required")
3530: 3b 0a 20 20 6e 4f 75 74 20 2b 3d 20 70 72 69 6e  ;.  nOut += prin
3540: 74 66 28 0a 20 20 20 20 22 57 57 57 2d 41 75 74  tf(.    "WWW-Aut
3550: 68 65 6e 74 69 63 61 74 65 3a 20 42 61 73 69 63  henticate: Basic
3560: 20 72 65 61 6c 6d 3d 5c 22 25 73 5c 22 5c 72 5c   realm=\"%s\"\r\
3570: 6e 22 0a 20 20 20 20 22 43 6f 6e 74 65 6e 74 2d  n".    "Content-
3580: 74 79 70 65 3a 20 74 65 78 74 2f 68 74 6d 6c 5c  type: text/html\
3590: 72 5c 6e 22 0a 20 20 20 20 22 5c 72 5c 6e 22 0a  r\n".    "\r\n".
35a0: 20 20 20 20 22 3c 68 65 61 64 3e 3c 74 69 74 6c      "<head><titl
35b0: 65 3e 4e 6f 74 20 41 75 74 68 6f 72 69 7a 65 64  e>Not Authorized
35c0: 3c 2f 74 69 74 6c 65 3e 3c 2f 68 65 61 64 3e 5c  </title></head>\
35d0: 6e 22 0a 20 20 20 20 22 3c 62 6f 64 79 3e 3c 68  n".    "<body><h
35e0: 31 3e 34 30 31 20 4e 6f 74 20 41 75 74 68 6f 72  1>401 Not Author
35f0: 69 7a 65 64 3c 2f 68 31 3e 5c 6e 22 0a 20 20 20  ized</h1>\n".   
3600: 20 22 41 20 6c 6f 67 69 6e 20 61 6e 64 20 70 61   "A login and pa
3610: 73 73 77 6f 72 64 20 61 72 65 20 72 65 71 75 69  ssword are requi
3620: 72 65 64 20 66 6f 72 20 74 68 69 73 20 64 6f 63  red for this doc
3630: 75 6d 65 6e 74 5c 6e 22 0a 20 20 20 20 22 3c 2f  ument\n".    "</
3640: 62 6f 64 79 3e 5c 6e 22 2c 20 7a 52 65 61 6c 6d  body>\n", zRealm
3650: 29 3b 0a 20 20 4d 61 6b 65 4c 6f 67 45 6e 74 72  );.  MakeLogEntr
3660: 79 28 30 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54  y(0);.}../*.** T
3670: 65 6c 6c 20 74 68 65 20 63 6c 69 65 6e 74 20 74  ell the client t
3680: 68 61 74 20 74 68 65 72 65 20 69 73 20 61 6e 20  hat there is an 
3690: 65 72 72 6f 72 20 69 6e 20 74 68 65 20 73 63 72  error in the scr
36a0: 69 70 74 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76  ipt..*/.static v
36b0: 6f 69 64 20 43 67 69 45 72 72 6f 72 28 76 6f 69  oid CgiError(voi
36c0: 64 29 7b 0a 20 20 53 74 61 72 74 52 65 73 70 6f  d){.  StartRespo
36d0: 6e 73 65 28 22 35 30 30 20 45 72 72 6f 72 22 29  nse("500 Error")
36e0: 3b 0a 20 20 6e 4f 75 74 20 2b 3d 20 70 72 69 6e  ;.  nOut += prin
36f0: 74 66 28 0a 20 20 20 20 22 43 6f 6e 74 65 6e 74  tf(.    "Content
3700: 2d 74 79 70 65 3a 20 74 65 78 74 2f 68 74 6d 6c  -type: text/html
3710: 5c 72 5c 6e 22 0a 20 20 20 20 22 5c 72 5c 6e 22  \r\n".    "\r\n"
3720: 0a 20 20 20 20 22 3c 68 65 61 64 3e 3c 74 69 74  .    "<head><tit
3730: 6c 65 3e 43 47 49 20 50 72 6f 67 72 61 6d 20 45  le>CGI Program E
3740: 72 72 6f 72 3c 2f 74 69 74 6c 65 3e 3c 2f 68 65  rror</title></he
3750: 61 64 3e 5c 6e 22 0a 20 20 20 20 22 3c 62 6f 64  ad>\n".    "<bod
3760: 79 3e 3c 68 31 3e 43 47 49 20 50 72 6f 67 72 61  y><h1>CGI Progra
3770: 6d 20 45 72 72 6f 72 3c 2f 68 31 3e 5c 6e 22 0a  m Error</h1>\n".
3780: 20 20 20 20 22 54 68 65 20 43 47 49 20 70 72 6f      "The CGI pro
3790: 67 72 61 6d 20 25 73 20 67 65 6e 65 72 61 74 65  gram %s generate
37a0: 64 20 61 6e 20 65 72 72 6f 72 5c 6e 22 0a 20 20  d an error\n".  
37b0: 20 20 22 3c 2f 62 6f 64 79 3e 5c 6e 22 2c 20 7a    "</body>\n", z
37c0: 53 63 72 69 70 74 29 3b 0a 20 20 4d 61 6b 65 4c  Script);.  MakeL
37d0: 6f 67 45 6e 74 72 79 28 30 29 3b 0a 20 20 65 78  ogEntry(0);.  ex
37e0: 69 74 28 30 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20  it(0);.}../*.** 
37f0: 54 68 69 73 20 69 73 20 63 61 6c 6c 65 64 20 69  This is called i
3800: 66 20 77 65 20 74 69 6d 65 6f 75 74 20 6f 72 20  f we timeout or 
3810: 63 61 74 63 68 20 73 6f 6d 65 20 6f 74 68 65 72  catch some other
3820: 20 6b 69 6e 64 20 6f 66 20 73 69 67 6e 61 6c 2e   kind of signal.
3830: 0a 2a 2a 20 4c 6f 67 20 61 6e 20 65 72 72 6f 72  .** Log an error
3840: 20 63 6f 64 65 20 77 68 69 63 68 20 69 73 20 39   code which is 9
3850: 30 30 2b 69 53 69 67 20 61 6e 64 20 74 68 65 6e  00+iSig and then
3860: 20 71 75 69 74 2e 0a 2a 2f 0a 73 74 61 74 69 63   quit..*/.static
3870: 20 76 6f 69 64 20 54 69 6d 65 6f 75 74 28 69 6e   void Timeout(in
3880: 74 20 69 53 69 67 29 7b 0a 20 20 69 66 28 20 21  t iSig){.  if( !
3890: 64 65 62 75 67 46 6c 61 67 20 29 7b 0a 20 20 20  debugFlag ){.   
38a0: 20 69 66 28 20 7a 53 63 72 69 70 74 20 26 26 20   if( zScript && 
38b0: 7a 53 63 72 69 70 74 5b 30 5d 20 29 7b 0a 20 20  zScript[0] ){.  
38c0: 20 20 20 20 63 68 61 72 20 7a 42 75 66 5b 31 30      char zBuf[10
38d0: 5d 3b 0a 20 20 20 20 20 20 7a 42 75 66 5b 30 5d  ];.      zBuf[0]
38e0: 20 3d 20 27 39 27 3b 0a 20 20 20 20 20 20 7a 42   = '9';.      zB
38f0: 75 66 5b 31 5d 20 3d 20 27 30 27 20 2b 20 28 69  uf[1] = '0' + (i
3900: 53 69 67 2f 31 30 29 25 31 30 3b 0a 20 20 20 20  Sig/10)%10;.    
3910: 20 20 7a 42 75 66 5b 32 5d 20 3d 20 27 30 27 20    zBuf[2] = '0' 
3920: 2b 20 69 53 69 67 25 31 30 3b 0a 20 20 20 20 20  + iSig%10;.     
3930: 20 7a 42 75 66 5b 33 5d 20 3d 20 30 3b 0a 20 20   zBuf[3] = 0;.  
3940: 20 20 20 20 73 74 72 63 70 79 28 7a 52 65 70 6c      strcpy(zRepl
3950: 79 53 74 61 74 75 73 2c 20 7a 42 75 66 29 3b 0a  yStatus, zBuf);.
3960: 20 20 20 20 20 20 4d 61 6b 65 4c 6f 67 45 6e 74        MakeLogEnt
3970: 72 79 28 30 29 3b 0a 20 20 20 20 7d 0a 20 20 20  ry(0);.    }.   
3980: 20 65 78 69 74 28 30 29 3b 0a 20 20 7d 0a 7d 0a   exit(0);.  }.}.
3990: 0a 2f 2a 0a 2a 2a 20 54 65 6c 6c 20 74 68 65 20  ./*.** Tell the 
39a0: 63 6c 69 65 6e 74 20 74 68 61 74 20 74 68 65 72  client that ther
39b0: 65 20 69 73 20 61 6e 20 65 72 72 6f 72 20 69 6e  e is an error in
39c0: 20 74 68 65 20 73 63 72 69 70 74 2e 0a 2a 2f 0a   the script..*/.
39d0: 73 74 61 74 69 63 20 76 6f 69 64 20 43 67 69 53  static void CgiS
39e0: 63 72 69 70 74 57 72 69 74 61 62 6c 65 28 76 6f  criptWritable(vo
39f0: 69 64 29 7b 0a 20 20 53 74 61 72 74 52 65 73 70  id){.  StartResp
3a00: 6f 6e 73 65 28 22 35 30 30 20 43 47 49 20 43 6f  onse("500 CGI Co
3a10: 6e 66 69 67 75 72 61 74 69 6f 6e 20 45 72 72 6f  nfiguration Erro
3a20: 72 22 29 3b 0a 20 20 6e 4f 75 74 20 2b 3d 20 70  r");.  nOut += p
3a30: 72 69 6e 74 66 28 0a 20 20 20 20 22 43 6f 6e 74  rintf(.    "Cont
3a40: 65 6e 74 2d 74 79 70 65 3a 20 74 65 78 74 2f 70  ent-type: text/p
3a50: 6c 61 69 6e 5c 72 5c 6e 22 0a 20 20 20 20 22 5c  lain\r\n".    "\
3a60: 72 5c 6e 22 0a 20 20 20 20 22 54 68 65 20 43 47  r\n".    "The CG
3a70: 49 20 70 72 6f 67 72 61 6d 20 25 73 20 69 73 20  I program %s is 
3a80: 77 72 69 74 61 62 6c 65 20 62 79 20 75 73 65 72  writable by user
3a90: 73 20 6f 74 68 65 72 20 74 68 61 6e 20 69 74 73  s other than its
3aa0: 20 6f 77 6e 65 72 2e 5c 6e 22 2c 0a 20 20 20 20   owner.\n",.    
3ab0: 7a 52 65 61 6c 53 63 72 69 70 74 29 3b 0a 20 20  zRealScript);.  
3ac0: 4d 61 6b 65 4c 6f 67 45 6e 74 72 79 28 30 29 3b  MakeLogEntry(0);
3ad0: 0a 20 20 65 78 69 74 28 30 29 3b 20 20 20 20 20  .  exit(0);     
3ae0: 20 20 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 65 6c 6c    .}../*.** Tell
3af0: 20 74 68 65 20 63 6c 69 65 6e 74 20 74 68 61 74   the client that
3b00: 20 74 68 65 20 73 65 72 76 65 72 20 6d 61 6c 66   the server malf
3b10: 75 6e 63 74 69 6f 6e 65 64 2e 0a 2a 2f 0a 73 74  unctioned..*/.st
3b20: 61 74 69 63 20 76 6f 69 64 20 4d 61 6c 66 75 6e  atic void Malfun
3b30: 63 74 69 6f 6e 28 69 6e 74 20 6c 69 6e 65 6e 75  ction(int linenu
3b40: 6d 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a  m, const char *z
3b50: 46 6f 72 6d 61 74 2c 20 2e 2e 2e 29 7b 0a 20 20  Format, ...){.  
3b60: 76 61 5f 6c 69 73 74 20 61 70 3b 0a 20 20 76 61  va_list ap;.  va
3b70: 5f 73 74 61 72 74 28 61 70 2c 20 7a 46 6f 72 6d  _start(ap, zForm
3b80: 61 74 29 3b 0a 20 20 53 74 61 72 74 52 65 73 70  at);.  StartResp
3b90: 6f 6e 73 65 28 22 35 30 30 20 53 65 72 76 65 72  onse("500 Server
3ba0: 20 4d 61 6c 66 75 6e 63 74 69 6f 6e 22 29 3b 0a   Malfunction");.
3bb0: 20 20 6e 4f 75 74 20 2b 3d 20 70 72 69 6e 74 66    nOut += printf
3bc0: 28 0a 20 20 20 20 22 43 6f 6e 74 65 6e 74 2d 74  (.    "Content-t
3bd0: 79 70 65 3a 20 74 65 78 74 2f 70 6c 61 69 6e 5c  ype: text/plain\
3be0: 72 5c 6e 22 0a 20 20 20 20 22 5c 72 5c 6e 22 0a  r\n".    "\r\n".
3bf0: 20 20 20 20 22 57 65 62 20 73 65 72 76 65 72 20      "Web server 
3c00: 6d 61 6c 66 75 6e 63 74 69 6f 6e 65 64 3b 20 65  malfunctioned; e
3c10: 72 72 6f 72 20 6e 75 6d 62 65 72 20 25 64 5c 6e  rror number %d\n
3c20: 5c 6e 22 2c 20 6c 69 6e 65 6e 75 6d 29 3b 0a 20  \n", linenum);. 
3c30: 20 69 66 28 20 7a 46 6f 72 6d 61 74 20 29 7b 0a   if( zFormat ){.
3c40: 20 20 20 20 6e 4f 75 74 20 2b 3d 20 76 70 72 69      nOut += vpri
3c50: 6e 74 66 28 7a 46 6f 72 6d 61 74 2c 20 61 70 29  ntf(zFormat, ap)
3c60: 3b 0a 20 20 7d 0a 20 20 4d 61 6b 65 4c 6f 67 45  ;.  }.  MakeLogE
3c70: 6e 74 72 79 28 30 29 3b 0a 20 20 65 78 69 74 28  ntry(0);.  exit(
3c80: 30 29 3b 20 20 20 20 20 20 20 0a 7d 0a 0a 2f 2a  0);       .}../*
3c90: 0a 2a 2a 20 44 6f 20 61 20 73 65 72 76 65 72 20  .** Do a server 
3ca0: 72 65 64 69 72 65 63 74 20 74 6f 20 74 68 65 20  redirect to the 
3cb0: 64 6f 63 75 6d 65 6e 74 20 73 70 65 63 69 66 69  document specifi
3cc0: 65 64 2e 20 20 54 68 65 20 64 6f 63 75 6d 65 6e  ed.  The documen
3cd0: 74 0a 2a 2a 20 6e 61 6d 65 20 6e 6f 74 20 63 6f  t.** name not co
3ce0: 6e 74 61 69 6e 20 73 63 68 65 6d 65 20 6f 72 20  ntain scheme or 
3cf0: 6e 65 74 77 6f 72 6b 20 6c 6f 63 61 74 69 6f 6e  network location
3d00: 20 6f 72 20 74 68 65 20 71 75 65 72 79 20 73 74   or the query st
3d10: 72 69 6e 67 2e 0a 2a 2a 20 49 74 20 77 69 6c 6c  ring..** It will
3d20: 20 62 65 20 6a 75 73 74 20 74 68 65 20 70 61 74   be just the pat
3d30: 68 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69  h..*/.static voi
3d40: 64 20 52 65 64 69 72 65 63 74 28 63 6f 6e 73 74  d Redirect(const
3d50: 20 63 68 61 72 20 2a 7a 50 61 74 68 2c 20 69 6e   char *zPath, in
3d60: 74 20 66 69 6e 69 73 68 29 7b 0a 20 20 53 74 61  t finish){.  Sta
3d70: 72 74 52 65 73 70 6f 6e 73 65 28 22 33 30 32 20  rtResponse("302 
3d80: 54 65 6d 70 6f 72 61 72 79 20 52 65 64 69 72 65  Temporary Redire
3d90: 63 74 22 29 3b 0a 20 20 69 66 28 20 7a 53 65 72  ct");.  if( zSer
3da0: 76 65 72 50 6f 72 74 3d 3d 30 20 7c 7c 20 7a 53  verPort==0 || zS
3db0: 65 72 76 65 72 50 6f 72 74 5b 30 5d 3d 3d 30 20  erverPort[0]==0 
3dc0: 7c 7c 20 73 74 72 63 6d 70 28 7a 53 65 72 76 65  || strcmp(zServe
3dd0: 72 50 6f 72 74 2c 22 38 30 22 29 3d 3d 30 20 29  rPort,"80")==0 )
3de0: 7b 0a 20 20 20 20 6e 4f 75 74 20 2b 3d 20 70 72  {.    nOut += pr
3df0: 69 6e 74 66 28 22 4c 6f 63 61 74 69 6f 6e 3a 20  intf("Location: 
3e00: 25 73 3a 2f 2f 25 73 25 73 25 73 5c 72 5c 6e 22  %s://%s%s%s\r\n"
3e10: 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20  ,.              
3e20: 20 20 20 20 20 7a 48 74 74 70 2c 20 7a 53 65 72       zHttp, zSer
3e30: 76 65 72 4e 61 6d 65 2c 20 7a 50 61 74 68 2c 20  verName, zPath, 
3e40: 7a 51 75 65 72 79 53 75 66 66 69 78 29 3b 0a 20  zQuerySuffix);. 
3e50: 20 7d 65 6c 73 65 7b 0a 20 20 20 20 6e 4f 75 74   }else{.    nOut
3e60: 20 2b 3d 20 70 72 69 6e 74 66 28 22 4c 6f 63 61   += printf("Loca
3e70: 74 69 6f 6e 3a 20 25 73 3a 2f 2f 25 73 3a 25 73  tion: %s://%s:%s
3e80: 25 73 25 73 5c 72 5c 6e 22 2c 0a 20 20 20 20 20  %s%s\r\n",.     
3e90: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7a 48                zH
3ea0: 74 74 70 2c 20 7a 53 65 72 76 65 72 4e 61 6d 65  ttp, zServerName
3eb0: 2c 20 7a 53 65 72 76 65 72 50 6f 72 74 2c 20 7a  , zServerPort, z
3ec0: 50 61 74 68 2c 20 7a 51 75 65 72 79 53 75 66 66  Path, zQuerySuff
3ed0: 69 78 29 3b 0a 20 20 7d 0a 20 20 69 66 28 20 66  ix);.  }.  if( f
3ee0: 69 6e 69 73 68 20 29 7b 0a 20 20 20 20 6e 4f 75  inish ){.    nOu
3ef0: 74 20 2b 3d 20 70 72 69 6e 74 66 28 22 43 6f 6e  t += printf("Con
3f00: 74 65 6e 74 2d 6c 65 6e 67 74 68 3a 20 30 5c 72  tent-length: 0\r
3f10: 5c 6e 22 29 3b 0a 20 20 20 20 6e 4f 75 74 20 2b  \n");.    nOut +
3f20: 3d 20 70 72 69 6e 74 66 28 22 5c 72 5c 6e 22 29  = printf("\r\n")
3f30: 3b 0a 20 20 20 20 4d 61 6b 65 4c 6f 67 45 6e 74  ;.    MakeLogEnt
3f40: 72 79 28 30 29 3b 0a 20 20 7d 0a 20 20 66 66 6c  ry(0);.  }.  ffl
3f50: 75 73 68 28 73 74 64 6f 75 74 29 3b 0a 7d 0a 0a  ush(stdout);.}..
3f60: 2f 2a 0a 2a 2a 20 54 68 69 73 20 66 75 6e 63 74  /*.** This funct
3f70: 69 6f 6e 20 74 72 65 61 74 73 20 69 74 73 20 69  ion treats its i
3f80: 6e 70 75 74 20 61 73 20 61 20 62 61 73 65 2d 36  nput as a base-6
3f90: 34 20 73 74 72 69 6e 67 20 61 6e 64 20 72 65 74  4 string and ret
3fa0: 75 72 6e 73 20 74 68 65 0a 2a 2a 20 64 65 63 6f  urns the.** deco
3fb0: 64 65 64 20 76 61 6c 75 65 20 6f 66 20 74 68 61  ded value of tha
3fc0: 74 20 73 74 72 69 6e 67 2e 20 20 43 68 61 72 61  t string.  Chara
3fd0: 63 74 65 72 73 20 6f 66 20 69 6e 70 75 74 20 74  cters of input t
3fe0: 68 61 74 20 61 72 65 20 6e 6f 74 0a 2a 2a 20 76  hat are not.** v
3ff0: 61 6c 69 64 20 62 61 73 65 2d 36 34 20 63 68 61  alid base-64 cha
4000: 72 61 63 74 65 72 73 20 28 73 75 63 68 20 61 73  racters (such as
4010: 20 73 70 61 63 65 73 20 61 6e 64 20 6e 65 77 6c   spaces and newl
4020: 69 6e 65 73 29 20 61 72 65 20 69 67 6e 6f 72 65  ines) are ignore
4030: 64 2e 0a 2a 2f 0a 76 6f 69 64 20 44 65 63 6f 64  d..*/.void Decod
4040: 65 36 34 28 63 68 61 72 20 2a 7a 36 34 29 7b 0a  e64(char *z64){.
4050: 20 20 63 68 61 72 20 2a 7a 44 61 74 61 3b 0a 20    char *zData;. 
4060: 20 69 6e 74 20 6e 36 34 3b 0a 20 20 69 6e 74 20   int n64;.  int 
4070: 69 2c 20 6a 3b 0a 20 20 69 6e 74 20 61 2c 20 62  i, j;.  int a, b
4080: 2c 20 63 2c 20 64 3b 0a 20 20 73 74 61 74 69 63  , c, d;.  static
4090: 20 69 6e 74 20 69 73 49 6e 69 74 20 3d 20 30 3b   int isInit = 0;
40a0: 0a 20 20 73 74 61 74 69 63 20 69 6e 74 20 74 72  .  static int tr
40b0: 61 6e 73 5b 31 32 38 5d 3b 0a 20 20 73 74 61 74  ans[128];.  stat
40c0: 69 63 20 75 6e 73 69 67 6e 65 64 20 63 68 61 72  ic unsigned char
40d0: 20 7a 42 61 73 65 5b 5d 20 3d 20 0a 20 20 20 20   zBase[] = .    
40e0: 22 41 42 43 44 45 46 47 48 49 4a 4b 4c 4d 4e 4f  "ABCDEFGHIJKLMNO
40f0: 50 51 52 53 54 55 56 57 58 59 5a 61 62 63 64 65  PQRSTUVWXYZabcde
4100: 66 67 68 69 6a 6b 6c 6d 6e 6f 70 71 72 73 74 75  fghijklmnopqrstu
4110: 76 77 78 79 7a 30 31 32 33 34 35 36 37 38 39 2b  vwxyz0123456789+
4120: 2f 22 3b 0a 0a 20 20 69 66 28 20 21 69 73 49 6e  /";..  if( !isIn
4130: 69 74 20 29 7b 0a 20 20 20 20 66 6f 72 28 69 3d  it ){.    for(i=
4140: 30 3b 20 69 3c 31 32 38 3b 20 69 2b 2b 29 7b 20  0; i<128; i++){ 
4150: 74 72 61 6e 73 5b 69 5d 20 3d 20 30 3b 20 7d 0a  trans[i] = 0; }.
4160: 20 20 20 20 66 6f 72 28 69 3d 30 3b 20 7a 42 61      for(i=0; zBa
4170: 73 65 5b 69 5d 3b 20 69 2b 2b 29 7b 20 74 72 61  se[i]; i++){ tra
4180: 6e 73 5b 7a 42 61 73 65 5b 69 5d 20 26 20 30 78  ns[zBase[i] & 0x
4190: 37 66 5d 20 3d 20 69 3b 20 7d 0a 20 20 20 20 69  7f] = i; }.    i
41a0: 73 49 6e 69 74 20 3d 20 31 3b 0a 20 20 7d 0a 20  sInit = 1;.  }. 
41b0: 20 6e 36 34 20 3d 20 73 74 72 6c 65 6e 28 7a 36   n64 = strlen(z6
41c0: 34 29 3b 0a 20 20 77 68 69 6c 65 28 20 6e 36 34  4);.  while( n64
41d0: 3e 30 20 26 26 20 7a 36 34 5b 6e 36 34 2d 31 5d  >0 && z64[n64-1]
41e0: 3d 3d 27 3d 27 20 29 20 6e 36 34 2d 2d 3b 0a 20  =='=' ) n64--;. 
41f0: 20 7a 44 61 74 61 20 3d 20 7a 36 34 3b 0a 20 20   zData = z64;.  
4200: 66 6f 72 28 69 3d 6a 3d 30 3b 20 69 2b 33 3c 6e  for(i=j=0; i+3<n
4210: 36 34 3b 20 69 2b 3d 34 29 7b 0a 20 20 20 20 61  64; i+=4){.    a
4220: 20 3d 20 74 72 61 6e 73 5b 7a 36 34 5b 69 5d 20   = trans[z64[i] 
4230: 26 20 30 78 37 66 5d 3b 0a 20 20 20 20 62 20 3d  & 0x7f];.    b =
4240: 20 74 72 61 6e 73 5b 7a 36 34 5b 69 2b 31 5d 20   trans[z64[i+1] 
4250: 26 20 30 78 37 66 5d 3b 0a 20 20 20 20 63 20 3d  & 0x7f];.    c =
4260: 20 74 72 61 6e 73 5b 7a 36 34 5b 69 2b 32 5d 20   trans[z64[i+2] 
4270: 26 20 30 78 37 66 5d 3b 0a 20 20 20 20 64 20 3d  & 0x7f];.    d =
4280: 20 74 72 61 6e 73 5b 7a 36 34 5b 69 2b 33 5d 20   trans[z64[i+3] 
4290: 26 20 30 78 37 66 5d 3b 0a 20 20 20 20 7a 44 61  & 0x7f];.    zDa
42a0: 74 61 5b 6a 2b 2b 5d 20 3d 20 28 28 61 3c 3c 32  ta[j++] = ((a<<2
42b0: 29 20 26 20 30 78 66 63 29 20 7c 20 28 28 62 3e  ) & 0xfc) | ((b>
42c0: 3e 34 29 20 26 20 30 78 30 33 29 3b 0a 20 20 20  >4) & 0x03);.   
42d0: 20 7a 44 61 74 61 5b 6a 2b 2b 5d 20 3d 20 28 28   zData[j++] = ((
42e0: 62 3c 3c 34 29 20 26 20 30 78 66 30 29 20 7c 20  b<<4) & 0xf0) | 
42f0: 28 28 63 3e 3e 32 29 20 26 20 30 78 30 66 29 3b  ((c>>2) & 0x0f);
4300: 0a 20 20 20 20 7a 44 61 74 61 5b 6a 2b 2b 5d 20  .    zData[j++] 
4310: 3d 20 28 28 63 3c 3c 36 29 20 26 20 30 78 63 30  = ((c<<6) & 0xc0
4320: 29 20 7c 20 28 64 20 26 20 30 78 33 66 29 3b 0a  ) | (d & 0x3f);.
4330: 20 20 7d 0a 20 20 69 66 28 20 69 2b 32 3c 6e 36    }.  if( i+2<n6
4340: 34 20 29 7b 0a 20 20 20 20 61 20 3d 20 74 72 61  4 ){.    a = tra
4350: 6e 73 5b 7a 36 34 5b 69 5d 20 26 20 30 78 37 66  ns[z64[i] & 0x7f
4360: 5d 3b 0a 20 20 20 20 62 20 3d 20 74 72 61 6e 73  ];.    b = trans
4370: 5b 7a 36 34 5b 69 2b 31 5d 20 26 20 30 78 37 66  [z64[i+1] & 0x7f
4380: 5d 3b 0a 20 20 20 20 63 20 3d 20 74 72 61 6e 73  ];.    c = trans
4390: 5b 7a 36 34 5b 69 2b 32 5d 20 26 20 30 78 37 66  [z64[i+2] & 0x7f
43a0: 5d 3b 0a 20 20 20 20 7a 44 61 74 61 5b 6a 2b 2b  ];.    zData[j++
43b0: 5d 20 3d 20 28 28 61 3c 3c 32 29 20 26 20 30 78  ] = ((a<<2) & 0x
43c0: 66 63 29 20 7c 20 28 28 62 3e 3e 34 29 20 26 20  fc) | ((b>>4) & 
43d0: 30 78 30 33 29 3b 0a 20 20 20 20 7a 44 61 74 61  0x03);.    zData
43e0: 5b 6a 2b 2b 5d 20 3d 20 28 28 62 3c 3c 34 29 20  [j++] = ((b<<4) 
43f0: 26 20 30 78 66 30 29 20 7c 20 28 28 63 3e 3e 32  & 0xf0) | ((c>>2
4400: 29 20 26 20 30 78 30 66 29 3b 0a 20 20 7d 65 6c  ) & 0x0f);.  }el
4410: 73 65 20 69 66 28 20 69 2b 31 3c 6e 36 34 20 29  se if( i+1<n64 )
4420: 7b 0a 20 20 20 20 61 20 3d 20 74 72 61 6e 73 5b  {.    a = trans[
4430: 7a 36 34 5b 69 5d 20 26 20 30 78 37 66 5d 3b 0a  z64[i] & 0x7f];.
4440: 20 20 20 20 62 20 3d 20 74 72 61 6e 73 5b 7a 36      b = trans[z6
4450: 34 5b 69 2b 31 5d 20 26 20 30 78 37 66 5d 3b 0a  4[i+1] & 0x7f];.
4460: 20 20 20 20 7a 44 61 74 61 5b 6a 2b 2b 5d 20 3d      zData[j++] =
4470: 20 28 28 61 3c 3c 32 29 20 26 20 30 78 66 63 29   ((a<<2) & 0xfc)
4480: 20 7c 20 28 28 62 3e 3e 34 29 20 26 20 30 78 30   | ((b>>4) & 0x0
4490: 33 29 3b 0a 20 20 7d 0a 20 20 7a 44 61 74 61 5b  3);.  }.  zData[
44a0: 6a 5d 20 3d 20 30 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a  j] = 0;.}../*.**
44b0: 20 43 68 65 63 6b 20 74 6f 20 73 65 65 20 69 66   Check to see if
44c0: 20 62 61 73 69 63 20 61 75 74 68 6f 72 69 7a 61   basic authoriza
44d0: 74 69 6f 6e 20 63 72 65 64 65 6e 74 69 61 6c 73  tion credentials
44e0: 20 61 72 65 20 70 72 6f 76 69 64 65 64 20 66 6f   are provided fo
44f0: 72 0a 2a 2a 20 74 68 65 20 75 73 65 72 20 61 63  r.** the user ac
4500: 63 6f 72 64 69 6e 67 20 74 6f 20 74 68 65 20 69  cording to the i
4510: 6e 66 6f 72 6d 61 74 69 6f 6e 20 69 6e 20 7a 41  nformation in zA
4520: 75 74 68 46 69 6c 65 2e 20 20 52 65 74 75 72 6e  uthFile.  Return
4530: 20 74 72 75 65 0a 2a 2a 20 69 66 20 61 75 74 68   true.** if auth
4540: 6f 72 69 7a 65 64 2e 20 20 52 65 74 75 72 6e 20  orized.  Return 
4550: 66 61 6c 73 65 20 69 66 20 6e 6f 74 20 61 75 74  false if not aut
4560: 68 6f 72 69 7a 65 64 2e 0a 2a 2a 0a 2a 2a 20 46  horized..**.** F
4570: 69 6c 65 20 66 6f 72 6d 61 74 3a 0a 2a 2a 0a 2a  ile format:.**.*
4580: 2a 20 20 20 20 2a 20 20 42 6c 61 6e 6b 20 6c 69  *    *  Blank li
4590: 6e 65 73 20 61 6e 64 20 6c 69 6e 65 73 20 74 68  nes and lines th
45a0: 61 74 20 62 65 67 69 6e 20 77 69 74 68 20 27 23  at begin with '#
45b0: 27 20 61 72 65 20 69 67 6e 6f 72 65 64 0a 2a 2a  ' are ignored.**
45c0: 20 20 20 20 2a 20 20 22 68 74 74 70 2d 72 65 64      *  "http-red
45d0: 69 72 65 63 74 22 20 66 6f 72 63 65 73 20 61 20  irect" forces a 
45e0: 72 65 64 69 72 65 63 74 20 74 6f 20 48 54 54 50  redirect to HTTP
45f0: 53 20 69 66 20 6e 6f 74 20 74 68 65 72 65 20 61  S if not there a
4600: 6c 72 65 61 64 79 0a 2a 2a 20 20 20 20 2a 20 20  lready.**    *  
4610: 22 68 74 74 70 73 2d 6f 6e 6c 79 22 20 64 69 73  "https-only" dis
4620: 61 6c 6c 6f 77 73 20 6f 70 65 72 61 74 69 6f 6e  allows operation
4630: 20 69 6e 20 48 54 54 50 0a 2a 2a 20 20 20 20 2a   in HTTP.**    *
4640: 20 20 22 75 73 65 72 20 4e 41 4d 45 20 4c 4f 47    "user NAME LOG
4650: 49 4e 3a 50 41 53 53 57 4f 52 44 22 20 63 68 65  IN:PASSWORD" che
4660: 63 6b 73 20 74 6f 20 73 65 65 20 69 66 20 4c 4f  cks to see if LO
4670: 47 49 4e 3a 50 41 53 53 57 4f 52 44 20 0a 2a 2a  GIN:PASSWORD .**
4680: 20 20 20 20 20 20 20 61 75 74 68 6f 72 69 7a 61         authoriza
4690: 74 69 6f 6e 20 63 72 65 64 65 6e 74 69 61 6c 73  tion credentials
46a0: 20 61 72 65 20 70 72 6f 76 69 64 65 64 2c 20 61   are provided, a
46b0: 6e 64 20 69 66 20 73 6f 20 73 65 74 73 20 74 68  nd if so sets th
46c0: 65 0a 2a 2a 20 20 20 20 20 20 20 52 45 4d 4f 54  e.**       REMOT
46d0: 45 5f 55 53 45 52 20 74 6f 20 4e 41 4d 45 2e 0a  E_USER to NAME..
46e0: 2a 2a 20 20 20 20 2a 20 20 22 72 65 61 6c 6d 20  **    *  "realm 
46f0: 54 45 58 54 22 20 73 65 74 73 20 74 68 65 20 72  TEXT" sets the r
4700: 65 61 6c 6d 20 74 6f 20 54 45 58 54 2e 0a 2a 2f  ealm to TEXT..*/
4710: 0a 73 74 61 74 69 63 20 69 6e 74 20 43 68 65 63  .static int Chec
4720: 6b 42 61 73 69 63 41 75 74 68 6f 72 69 7a 61 74  kBasicAuthorizat
4730: 69 6f 6e 28 63 6f 6e 73 74 20 63 68 61 72 20 2a  ion(const char *
4740: 7a 41 75 74 68 46 69 6c 65 29 7b 0a 20 20 46 49  zAuthFile){.  FI
4750: 4c 45 20 2a 69 6e 3b 0a 20 20 63 68 61 72 20 2a  LE *in;.  char *
4760: 7a 52 65 61 6c 6d 20 3d 20 22 75 6e 6b 6e 6f 77  zRealm = "unknow
4770: 6e 20 72 65 61 6c 6d 22 3b 0a 20 20 63 68 61 72  n realm";.  char
4780: 20 2a 7a 4c 6f 67 69 6e 50 73 77 64 3b 0a 20 20   *zLoginPswd;.  
4790: 63 68 61 72 20 2a 7a 4e 61 6d 65 3b 0a 20 20 63  char *zName;.  c
47a0: 68 61 72 20 7a 4c 69 6e 65 5b 32 30 30 30 5d 3b  har zLine[2000];
47b0: 0a 0a 20 20 69 6e 20 3d 20 66 6f 70 65 6e 28 7a  ..  in = fopen(z
47c0: 41 75 74 68 46 69 6c 65 2c 20 22 72 22 29 3b 0a  AuthFile, "r");.
47d0: 20 20 69 66 28 20 69 6e 3d 3d 30 20 29 7b 0a 20    if( in==0 ){. 
47e0: 20 20 20 4e 6f 74 46 6f 75 6e 64 28 5f 5f 4c 49     NotFound(__LI
47f0: 4e 45 5f 5f 29 3b 0a 20 20 20 20 72 65 74 75 72  NE__);.    retur
4800: 6e 20 30 3b 0a 20 20 7d 0a 20 20 69 66 28 20 7a  n 0;.  }.  if( z
4810: 41 75 74 68 41 72 67 20 29 20 44 65 63 6f 64 65  AuthArg ) Decode
4820: 36 34 28 7a 41 75 74 68 41 72 67 29 3b 0a 20 20  64(zAuthArg);.  
4830: 77 68 69 6c 65 28 20 66 67 65 74 73 28 7a 4c 69  while( fgets(zLi
4840: 6e 65 2c 20 73 69 7a 65 6f 66 28 7a 4c 69 6e 65  ne, sizeof(zLine
4850: 29 2c 20 69 6e 29 20 29 7b 0a 20 20 20 20 63 68  ), in) ){.    ch
4860: 61 72 20 2a 7a 46 69 65 6c 64 4e 61 6d 65 3b 0a  ar *zFieldName;.
4870: 20 20 20 20 63 68 61 72 20 2a 7a 56 61 6c 3b 0a      char *zVal;.
4880: 0a 20 20 20 20 7a 46 69 65 6c 64 4e 61 6d 65 20  .    zFieldName 
4890: 3d 20 47 65 74 46 69 72 73 74 45 6c 65 6d 65 6e  = GetFirstElemen
48a0: 74 28 7a 4c 69 6e 65 2c 26 7a 56 61 6c 29 3b 0a  t(zLine,&zVal);.
48b0: 20 20 20 20 69 66 28 20 7a 46 69 65 6c 64 4e 61      if( zFieldNa
48c0: 6d 65 3d 3d 30 20 7c 7c 20 2a 7a 46 69 65 6c 64  me==0 || *zField
48d0: 4e 61 6d 65 3d 3d 30 20 29 20 63 6f 6e 74 69 6e  Name==0 ) contin
48e0: 75 65 3b 0a 20 20 20 20 69 66 28 20 7a 46 69 65  ue;.    if( zFie
48f0: 6c 64 4e 61 6d 65 5b 30 5d 3d 3d 27 23 27 20 29  ldName[0]=='#' )
4900: 20 63 6f 6e 74 69 6e 75 65 3b 0a 20 20 20 20 52   continue;.    R
4910: 65 6d 6f 76 65 4e 65 77 6c 69 6e 65 28 7a 56 61  emoveNewline(zVa
4920: 6c 29 3b 0a 20 20 20 20 69 66 28 20 73 74 72 63  l);.    if( strc
4930: 6d 70 28 7a 46 69 65 6c 64 4e 61 6d 65 2c 20 22  mp(zFieldName, "
4940: 72 65 61 6c 6d 22 29 3d 3d 30 20 29 7b 0a 20 20  realm")==0 ){.  
4950: 20 20 20 20 7a 52 65 61 6c 6d 20 3d 20 53 74 72      zRealm = Str
4960: 44 75 70 28 7a 56 61 6c 29 3b 0a 20 20 20 20 7d  Dup(zVal);.    }
4970: 65 6c 73 65 20 69 66 28 20 73 74 72 63 6d 70 28  else if( strcmp(
4980: 7a 46 69 65 6c 64 4e 61 6d 65 2c 22 75 73 65 72  zFieldName,"user
4990: 22 29 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 69  ")==0 ){.      i
49a0: 66 28 20 7a 41 75 74 68 41 72 67 3d 3d 30 20 29  f( zAuthArg==0 )
49b0: 20 63 6f 6e 74 69 6e 75 65 3b 0a 20 20 20 20 20   continue;.     
49c0: 20 7a 4e 61 6d 65 20 3d 20 47 65 74 46 69 72 73   zName = GetFirs
49d0: 74 45 6c 65 6d 65 6e 74 28 7a 56 61 6c 2c 20 26  tElement(zVal, &
49e0: 7a 56 61 6c 29 3b 0a 20 20 20 20 20 20 7a 4c 6f  zVal);.      zLo
49f0: 67 69 6e 50 73 77 64 20 3d 20 47 65 74 46 69 72  ginPswd = GetFir
4a00: 73 74 45 6c 65 6d 65 6e 74 28 7a 56 61 6c 2c 20  stElement(zVal, 
4a10: 26 7a 56 61 6c 29 3b 0a 20 20 20 20 20 20 69 66  &zVal);.      if
4a20: 28 20 7a 4c 6f 67 69 6e 50 73 77 64 3d 3d 30 20  ( zLoginPswd==0 
4a30: 29 20 63 6f 6e 74 69 6e 75 65 3b 0a 20 20 20 20  ) continue;.    
4a40: 20 20 69 66 28 20 7a 41 75 74 68 41 72 67 20 26    if( zAuthArg &
4a50: 26 20 73 74 72 63 6d 70 28 7a 41 75 74 68 41 72  & strcmp(zAuthAr
4a60: 67 2c 7a 4c 6f 67 69 6e 50 73 77 64 29 3d 3d 30  g,zLoginPswd)==0
4a70: 20 29 7b 0a 20 20 20 20 20 20 20 20 7a 52 65 6d   ){.        zRem
4a80: 6f 74 65 55 73 65 72 20 3d 20 53 74 72 44 75 70  oteUser = StrDup
4a90: 28 7a 4e 61 6d 65 29 3b 0a 20 20 20 20 20 20 20  (zName);.       
4aa0: 20 66 63 6c 6f 73 65 28 69 6e 29 3b 0a 20 20 20   fclose(in);.   
4ab0: 20 20 20 20 20 72 65 74 75 72 6e 20 31 3b 0a 20       return 1;. 
4ac0: 20 20 20 20 20 7d 0a 20 20 20 20 7d 65 6c 73 65       }.    }else
4ad0: 20 69 66 28 20 73 74 72 63 6d 70 28 7a 46 69 65   if( strcmp(zFie
4ae0: 6c 64 4e 61 6d 65 2c 22 68 74 74 70 73 2d 6f 6e  ldName,"https-on
4af0: 6c 79 22 29 3d 3d 30 20 29 7b 0a 20 20 20 20 20  ly")==0 ){.     
4b00: 20 69 66 28 20 21 75 73 65 48 74 74 70 73 20 29   if( !useHttps )
4b10: 7b 0a 20 20 20 20 20 20 20 20 4e 6f 74 46 6f 75  {.        NotFou
4b20: 6e 64 28 5f 5f 4c 49 4e 45 5f 5f 29 3b 0a 20 20  nd(__LINE__);.  
4b30: 20 20 20 20 20 20 66 63 6c 6f 73 65 28 69 6e 29        fclose(in)
4b40: 3b 0a 20 20 20 20 20 20 20 20 72 65 74 75 72 6e  ;.        return
4b50: 20 30 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20   0;.      }.    
4b60: 7d 65 6c 73 65 20 69 66 28 20 73 74 72 63 6d 70  }else if( strcmp
4b70: 28 7a 46 69 65 6c 64 4e 61 6d 65 2c 22 68 74 74  (zFieldName,"htt
4b80: 70 2d 72 65 64 69 72 65 63 74 22 29 3d 3d 30 20  p-redirect")==0 
4b90: 29 7b 0a 20 20 20 20 20 20 69 66 28 20 21 75 73  ){.      if( !us
4ba0: 65 48 74 74 70 73 20 29 7b 0a 20 20 20 20 20 20  eHttps ){.      
4bb0: 20 20 7a 48 74 74 70 20 3d 20 22 68 74 74 70 73    zHttp = "https
4bc0: 22 3b 0a 20 20 20 20 20 20 20 20 73 70 72 69 6e  ";.        sprin
4bd0: 74 66 28 7a 4c 69 6e 65 2c 20 22 25 73 25 73 22  tf(zLine, "%s%s"
4be0: 2c 20 7a 53 63 72 69 70 74 2c 20 7a 50 61 74 68  , zScript, zPath
4bf0: 49 6e 66 6f 29 3b 0a 20 20 20 20 20 20 20 20 52  Info);.        R
4c00: 65 64 69 72 65 63 74 28 7a 4c 69 6e 65 2c 20 31  edirect(zLine, 1
4c10: 29 3b 0a 20 20 20 20 20 20 20 20 66 63 6c 6f 73  );.        fclos
4c20: 65 28 69 6e 29 3b 0a 20 20 20 20 20 20 20 20 72  e(in);.        r
4c30: 65 74 75 72 6e 20 30 3b 0a 20 20 20 20 20 20 7d  eturn 0;.      }
4c40: 0a 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20  .    }else{.    
4c50: 20 20 4e 6f 74 46 6f 75 6e 64 28 5f 5f 4c 49 4e    NotFound(__LIN
4c60: 45 5f 5f 29 3b 0a 20 20 20 20 20 20 66 63 6c 6f  E__);.      fclo
4c70: 73 65 28 69 6e 29 3b 0a 20 20 20 20 20 20 72 65  se(in);.      re
4c80: 74 75 72 6e 20 30 3b 0a 20 20 20 20 7d 0a 20 20  turn 0;.    }.  
4c90: 7d 0a 20 20 66 63 6c 6f 73 65 28 69 6e 29 3b 0a  }.  fclose(in);.
4ca0: 20 20 4e 6f 74 41 75 74 68 6f 72 69 7a 65 64 28    NotAuthorized(
4cb0: 7a 52 65 61 6c 6d 29 3b 0a 20 20 72 65 74 75 72  zRealm);.  retur
4cc0: 6e 20 30 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 47 75  n 0;.}../*.** Gu
4cd0: 65 73 73 20 74 68 65 20 6d 69 6d 65 2d 74 79 70  ess the mime-typ
4ce0: 65 20 6f 66 20 61 20 64 6f 63 75 6d 65 6e 74 20  e of a document 
4cf0: 62 61 73 65 64 20 6f 6e 20 69 74 73 20 6e 61 6d  based on its nam
4d00: 65 2e 0a 2a 2f 0a 63 6f 6e 73 74 20 63 68 61 72  e..*/.const char
4d10: 20 2a 47 65 74 4d 69 6d 65 54 79 70 65 28 63 6f   *GetMimeType(co
4d20: 6e 73 74 20 63 68 61 72 20 2a 7a 4e 61 6d 65 2c  nst char *zName,
4d30: 20 69 6e 74 20 6e 4e 61 6d 65 29 7b 0a 20 20 63   int nName){.  c
4d40: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 3b 0a 20 20  onst char *z;.  
4d50: 69 6e 74 20 69 3b 0a 20 20 69 6e 74 20 66 69 72  int i;.  int fir
4d60: 73 74 2c 20 6c 61 73 74 3b 0a 20 20 69 6e 74 20  st, last;.  int 
4d70: 6c 65 6e 3b 0a 20 20 63 68 61 72 20 7a 53 75 66  len;.  char zSuf
4d80: 66 69 78 5b 32 30 5d 3b 0a 0a 20 20 2f 2a 20 41  fix[20];..  /* A
4d90: 20 74 61 62 6c 65 20 6f 66 20 6d 69 6d 65 74 79   table of mimety
4da0: 70 65 73 20 62 61 73 65 64 20 6f 6e 20 66 69 6c  pes based on fil
4db0: 65 20 73 75 66 66 69 78 65 73 2e 20 0a 20 20 2a  e suffixes. .  *
4dc0: 2a 20 53 75 66 66 69 78 65 73 20 6d 75 73 74 20  * Suffixes must 
4dd0: 62 65 20 69 6e 20 73 6f 72 74 65 64 20 6f 72 64  be in sorted ord
4de0: 65 72 20 73 6f 20 74 68 61 74 20 77 65 20 63 61  er so that we ca
4df0: 6e 20 64 6f 20 61 20 62 69 6e 61 72 79 0a 20 20  n do a binary.  
4e00: 2a 2a 20 73 65 61 72 63 68 20 74 6f 20 66 69 6e  ** search to fin
4e10: 64 20 74 68 65 20 6d 69 6d 65 2d 74 79 70 65 0a  d the mime-type.
4e20: 20 20 2a 2f 0a 20 20 73 74 61 74 69 63 20 63 6f    */.  static co
4e30: 6e 73 74 20 73 74 72 75 63 74 20 7b 0a 20 20 20  nst struct {.   
4e40: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 53 75   const char *zSu
4e50: 66 66 69 78 3b 20 20 20 20 20 20 20 2f 2a 20 54  ffix;       /* T
4e60: 68 65 20 66 69 6c 65 20 73 75 66 66 69 78 20 2a  he file suffix *
4e70: 2f 0a 20 20 20 20 69 6e 74 20 73 69 7a 65 3b 20  /.    int size; 
4e80: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
4e90: 20 2f 2a 20 4c 65 6e 67 74 68 20 6f 66 20 74 68   /* Length of th
4ea0: 65 20 73 75 66 66 69 78 20 2a 2f 0a 20 20 20 20  e suffix */.    
4eb0: 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 4d 69 6d  const char *zMim
4ec0: 65 74 79 70 65 3b 20 20 20 20 20 2f 2a 20 54 68  etype;     /* Th
4ed0: 65 20 63 6f 72 72 65 73 70 6f 6e 64 69 6e 67 20  e corresponding 
4ee0: 6d 69 6d 65 74 79 70 65 20 2a 2f 0a 20 20 7d 20  mimetype */.  } 
4ef0: 61 4d 69 6d 65 5b 5d 20 3d 20 7b 0a 20 20 20 20  aMime[] = {.    
4f00: 7b 20 22 61 69 22 2c 20 20 20 20 20 20 20 20 20  { "ai",         
4f10: 32 2c 20 22 61 70 70 6c 69 63 61 74 69 6f 6e 2f  2, "application/
4f20: 70 6f 73 74 73 63 72 69 70 74 22 20 20 20 20 20  postscript"     
4f30: 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20         },.    { 
4f40: 22 61 69 66 22 2c 20 20 20 20 20 20 20 20 33 2c  "aif",        3,
4f50: 20 22 61 75 64 69 6f 2f 78 2d 61 69 66 66 22 20   "audio/x-aiff" 
4f60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
4f70: 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 61       },.    { "a
4f80: 69 66 63 22 2c 20 20 20 20 20 20 20 34 2c 20 22  ifc",       4, "
4f90: 61 75 64 69 6f 2f 78 2d 61 69 66 66 22 20 20 20  audio/x-aiff"   
4fa0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
4fb0: 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 61 69 66     },.    { "aif
4fc0: 66 22 2c 20 20 20 20 20 20 20 34 2c 20 22 61 75  f",       4, "au
4fd0: 64 69 6f 2f 78 2d 61 69 66 66 22 20 20 20 20 20  dio/x-aiff"     
4fe0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
4ff0: 20 7d 2c 0a 20 20 20 20 7b 20 22 61 72 6a 22 2c   },.    { "arj",
5000: 20 20 20 20 20 20 20 20 33 2c 20 22 61 70 70 6c          3, "appl
5010: 69 63 61 74 69 6f 6e 2f 78 2d 61 72 6a 2d 63 6f  ication/x-arj-co
5020: 6d 70 72 65 73 73 65 64 22 20 20 20 20 20 20 7d  mpressed"      }
5030: 2c 0a 20 20 20 20 7b 20 22 61 73 63 22 2c 20 20  ,.    { "asc",  
5040: 20 20 20 20 20 20 33 2c 20 22 74 65 78 74 2f 70        3, "text/p
5050: 6c 61 69 6e 22 20 20 20 20 20 20 20 20 20 20 20  lain"           
5060: 20 20 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a               },.
5070: 20 20 20 20 7b 20 22 61 73 66 22 2c 20 20 20 20      { "asf",    
5080: 20 20 20 20 33 2c 20 22 76 69 64 65 6f 2f 78 2d      3, "video/x-
5090: 6d 73 2d 61 73 66 22 20 20 20 20 20 20 20 20 20  ms-asf"         
50a0: 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20             },.  
50b0: 20 20 7b 20 22 61 73 78 22 2c 20 20 20 20 20 20    { "asx",      
50c0: 20 20 33 2c 20 22 76 69 64 65 6f 2f 78 2d 6d 73    3, "video/x-ms
50d0: 2d 61 73 78 22 20 20 20 20 20 20 20 20 20 20 20  -asx"           
50e0: 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20           },.    
50f0: 7b 20 22 61 75 22 2c 20 20 20 20 20 20 20 20 20  { "au",         
5100: 32 2c 20 22 61 75 64 69 6f 2f 75 6c 61 77 22 20  2, "audio/ulaw" 
5110: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
5120: 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20         },.    { 
5130: 22 61 76 69 22 2c 20 20 20 20 20 20 20 20 33 2c  "avi",        3,
5140: 20 22 76 69 64 65 6f 2f 78 2d 6d 73 76 69 64 65   "video/x-msvide
5150: 6f 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20  o"              
5160: 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 62       },.    { "b
5170: 61 74 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22  at",        3, "
5180: 61 70 70 6c 69 63 61 74 69 6f 6e 2f 78 2d 6d 73  application/x-ms
5190: 64 6f 73 2d 70 72 6f 67 72 61 6d 22 20 20 20 20  dos-program"    
51a0: 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 62 63 70     },.    { "bcp
51b0: 69 6f 22 2c 20 20 20 20 20 20 35 2c 20 22 61 70  io",      5, "ap
51c0: 70 6c 69 63 61 74 69 6f 6e 2f 78 2d 62 63 70 69  plication/x-bcpi
51d0: 6f 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20  o"              
51e0: 20 7d 2c 0a 20 20 20 20 7b 20 22 62 69 6e 22 2c   },.    { "bin",
51f0: 20 20 20 20 20 20 20 20 33 2c 20 22 61 70 70 6c          3, "appl
5200: 69 63 61 74 69 6f 6e 2f 6f 63 74 65 74 2d 73 74  ication/octet-st
5210: 72 65 61 6d 22 20 20 20 20 20 20 20 20 20 20 7d  ream"          }
5220: 2c 0a 20 20 20 20 7b 20 22 63 22 2c 20 20 20 20  ,.    { "c",    
5230: 20 20 20 20 20 20 31 2c 20 22 74 65 78 74 2f 70        1, "text/p
5240: 6c 61 69 6e 22 20 20 20 20 20 20 20 20 20 20 20  lain"           
5250: 20 20 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a               },.
5260: 20 20 20 20 7b 20 22 63 63 22 2c 20 20 20 20 20      { "cc",     
5270: 20 20 20 20 32 2c 20 22 74 65 78 74 2f 70 6c 61      2, "text/pla
5280: 69 6e 22 20 20 20 20 20 20 20 20 20 20 20 20 20  in"             
5290: 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20             },.  
52a0: 20 20 7b 20 22 63 63 61 64 22 2c 20 20 20 20 20    { "ccad",     
52b0: 20 20 34 2c 20 22 61 70 70 6c 69 63 61 74 69 6f    4, "applicatio
52c0: 6e 2f 63 6c 61 72 69 73 63 61 64 22 20 20 20 20  n/clariscad"    
52d0: 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20           },.    
52e0: 7b 20 22 63 64 66 22 2c 20 20 20 20 20 20 20 20  { "cdf",        
52f0: 33 2c 20 22 61 70 70 6c 69 63 61 74 69 6f 6e 2f  3, "application/
5300: 78 2d 6e 65 74 63 64 66 22 20 20 20 20 20 20 20  x-netcdf"       
5310: 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20         },.    { 
5320: 22 63 6c 61 73 73 22 2c 20 20 20 20 20 20 35 2c  "class",      5,
5330: 20 22 61 70 70 6c 69 63 61 74 69 6f 6e 2f 6f 63   "application/oc
5340: 74 65 74 2d 73 74 72 65 61 6d 22 20 20 20 20 20  tet-stream"     
5350: 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 63       },.    { "c
5360: 6f 64 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22  od",        3, "
5370: 61 70 70 6c 69 63 61 74 69 6f 6e 2f 76 6e 64 2e  application/vnd.
5380: 72 69 6d 2e 63 6f 64 22 20 20 20 20 20 20 20 20  rim.cod"        
5390: 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 63 6f 6d     },.    { "com
53a0: 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22 61 70  ",        3, "ap
53b0: 70 6c 69 63 61 74 69 6f 6e 2f 78 2d 6d 73 64 6f  plication/x-msdo
53c0: 73 2d 70 72 6f 67 72 61 6d 22 20 20 20 20 20 20  s-program"      
53d0: 20 7d 2c 0a 20 20 20 20 7b 20 22 63 70 69 6f 22   },.    { "cpio"
53e0: 2c 20 20 20 20 20 20 20 34 2c 20 22 61 70 70 6c  ,       4, "appl
53f0: 69 63 61 74 69 6f 6e 2f 78 2d 63 70 69 6f 22 20  ication/x-cpio" 
5400: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7d                 }
5410: 2c 0a 20 20 20 20 7b 20 22 63 70 74 22 2c 20 20  ,.    { "cpt",  
5420: 20 20 20 20 20 20 33 2c 20 22 61 70 70 6c 69 63        3, "applic
5430: 61 74 69 6f 6e 2f 6d 61 63 2d 63 6f 6d 70 61 63  ation/mac-compac
5440: 74 70 72 6f 22 20 20 20 20 20 20 20 20 7d 2c 0a  tpro"        },.
5450: 20 20 20 20 7b 20 22 63 73 68 22 2c 20 20 20 20      { "csh",    
5460: 20 20 20 20 33 2c 20 22 61 70 70 6c 69 63 61 74      3, "applicat
5470: 69 6f 6e 2f 78 2d 63 73 68 22 20 20 20 20 20 20  ion/x-csh"      
5480: 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20             },.  
5490: 20 20 7b 20 22 63 73 73 22 2c 20 20 20 20 20 20    { "css",      
54a0: 20 20 33 2c 20 22 74 65 78 74 2f 63 73 73 22 20    3, "text/css" 
54b0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
54c0: 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20           },.    
54d0: 7b 20 22 64 63 72 22 2c 20 20 20 20 20 20 20 20  { "dcr",        
54e0: 33 2c 20 22 61 70 70 6c 69 63 61 74 69 6f 6e 2f  3, "application/
54f0: 78 2d 64 69 72 65 63 74 6f 72 22 20 20 20 20 20  x-director"     
5500: 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20         },.    { 
5510: 22 64 65 62 22 2c 20 20 20 20 20 20 20 20 33 2c  "deb",        3,
5520: 20 22 61 70 70 6c 69 63 61 74 69 6f 6e 2f 78 2d   "application/x-
5530: 64 65 62 69 61 6e 2d 70 61 63 6b 61 67 65 22 20  debian-package" 
5540: 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 64       },.    { "d
5550: 69 72 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22  ir",        3, "
5560: 61 70 70 6c 69 63 61 74 69 6f 6e 2f 78 2d 64 69  application/x-di
5570: 72 65 63 74 6f 72 22 20 20 20 20 20 20 20 20 20  rector"         
5580: 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 64 6c 22     },.    { "dl"
5590: 2c 20 20 20 20 20 20 20 20 20 32 2c 20 22 76 69  ,         2, "vi
55a0: 64 65 6f 2f 64 6c 22 20 20 20 20 20 20 20 20 20  deo/dl"         
55b0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
55c0: 20 7d 2c 0a 20 20 20 20 7b 20 22 64 6d 73 22 2c   },.    { "dms",
55d0: 20 20 20 20 20 20 20 20 33 2c 20 22 61 70 70 6c          3, "appl
55e0: 69 63 61 74 69 6f 6e 2f 6f 63 74 65 74 2d 73 74  ication/octet-st
55f0: 72 65 61 6d 22 20 20 20 20 20 20 20 20 20 20 7d  ream"          }
5600: 2c 0a 20 20 20 20 7b 20 22 64 6f 63 22 2c 20 20  ,.    { "doc",  
5610: 20 20 20 20 20 20 33 2c 20 22 61 70 70 6c 69 63        3, "applic
5620: 61 74 69 6f 6e 2f 6d 73 77 6f 72 64 22 20 20 20  ation/msword"   
5630: 20 20 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a               },.
5640: 20 20 20 20 7b 20 22 64 72 77 22 2c 20 20 20 20      { "drw",    
5650: 20 20 20 20 33 2c 20 22 61 70 70 6c 69 63 61 74      3, "applicat
5660: 69 6f 6e 2f 64 72 61 66 74 69 6e 67 22 20 20 20  ion/drafting"   
5670: 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20             },.  
5680: 20 20 7b 20 22 64 76 69 22 2c 20 20 20 20 20 20    { "dvi",      
5690: 20 20 33 2c 20 22 61 70 70 6c 69 63 61 74 69 6f    3, "applicatio
56a0: 6e 2f 78 2d 64 76 69 22 20 20 20 20 20 20 20 20  n/x-dvi"        
56b0: 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20           },.    
56c0: 7b 20 22 64 77 67 22 2c 20 20 20 20 20 20 20 20  { "dwg",        
56d0: 33 2c 20 22 61 70 70 6c 69 63 61 74 69 6f 6e 2f  3, "application/
56e0: 61 63 61 64 22 20 20 20 20 20 20 20 20 20 20 20  acad"           
56f0: 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20         },.    { 
5700: 22 64 78 66 22 2c 20 20 20 20 20 20 20 20 33 2c  "dxf",        3,
5710: 20 22 61 70 70 6c 69 63 61 74 69 6f 6e 2f 64 78   "application/dx
5720: 66 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20  f"              
5730: 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 64       },.    { "d
5740: 78 72 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22  xr",        3, "
5750: 61 70 70 6c 69 63 61 74 69 6f 6e 2f 78 2d 64 69  application/x-di
5760: 72 65 63 74 6f 72 22 20 20 20 20 20 20 20 20 20  rector"         
5770: 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 65 70 73     },.    { "eps
5780: 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22 61 70  ",        3, "ap
5790: 70 6c 69 63 61 74 69 6f 6e 2f 70 6f 73 74 73 63  plication/postsc
57a0: 72 69 70 74 22 20 20 20 20 20 20 20 20 20 20 20  ript"           
57b0: 20 7d 2c 0a 20 20 20 20 7b 20 22 65 74 78 22 2c   },.    { "etx",
57c0: 20 20 20 20 20 20 20 20 33 2c 20 22 74 65 78 74          3, "text
57d0: 2f 78 2d 73 65 74 65 78 74 22 20 20 20 20 20 20  /x-setext"      
57e0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7d                 }
57f0: 2c 0a 20 20 20 20 7b 20 22 65 78 65 22 2c 20 20  ,.    { "exe",  
5800: 20 20 20 20 20 20 33 2c 20 22 61 70 70 6c 69 63        3, "applic
5810: 61 74 69 6f 6e 2f 6f 63 74 65 74 2d 73 74 72 65  ation/octet-stre
5820: 61 6d 22 20 20 20 20 20 20 20 20 20 20 7d 2c 0a  am"          },.
5830: 20 20 20 20 7b 20 22 65 7a 22 2c 20 20 20 20 20      { "ez",     
5840: 20 20 20 20 32 2c 20 22 61 70 70 6c 69 63 61 74      2, "applicat
5850: 69 6f 6e 2f 61 6e 64 72 65 77 2d 69 6e 73 65 74  ion/andrew-inset
5860: 22 20 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20  "          },.  
5870: 20 20 7b 20 22 66 22 2c 20 20 20 20 20 20 20 20    { "f",        
5880: 20 20 31 2c 20 22 74 65 78 74 2f 70 6c 61 69 6e    1, "text/plain
5890: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  "               
58a0: 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20           },.    
58b0: 7b 20 22 66 39 30 22 2c 20 20 20 20 20 20 20 20  { "f90",        
58c0: 33 2c 20 22 74 65 78 74 2f 70 6c 61 69 6e 22 20  3, "text/plain" 
58d0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
58e0: 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20         },.    { 
58f0: 22 66 6c 69 22 2c 20 20 20 20 20 20 20 20 33 2c  "fli",        3,
5900: 20 22 76 69 64 65 6f 2f 66 6c 69 22 20 20 20 20   "video/fli"    
5910: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
5920: 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 66       },.    { "f
5930: 6c 76 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22  lv",        3, "
5940: 76 69 64 65 6f 2f 66 6c 76 22 20 20 20 20 20 20  video/flv"      
5950: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
5960: 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 67 69 66     },.    { "gif
5970: 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22 69 6d  ",        3, "im
5980: 61 67 65 2f 67 69 66 22 20 20 20 20 20 20 20 20  age/gif"        
5990: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
59a0: 20 7d 2c 0a 20 20 20 20 7b 20 22 67 6c 22 2c 20   },.    { "gl", 
59b0: 20 20 20 20 20 20 20 20 32 2c 20 22 76 69 64 65          2, "vide
59c0: 6f 2f 67 6c 22 20 20 20 20 20 20 20 20 20 20 20  o/gl"           
59d0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7d                 }
59e0: 2c 0a 20 20 20 20 7b 20 22 67 74 61 72 22 2c 20  ,.    { "gtar", 
59f0: 20 20 20 20 20 20 34 2c 20 22 61 70 70 6c 69 63        4, "applic
5a00: 61 74 69 6f 6e 2f 78 2d 67 74 61 72 22 20 20 20  ation/x-gtar"   
5a10: 20 20 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a               },.
5a20: 20 20 20 20 7b 20 22 67 7a 22 2c 20 20 20 20 20      { "gz",     
5a30: 20 20 20 20 32 2c 20 22 61 70 70 6c 69 63 61 74      2, "applicat
5a40: 69 6f 6e 2f 78 2d 67 7a 69 70 22 20 20 20 20 20  ion/x-gzip"     
5a50: 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20             },.  
5a60: 20 20 7b 20 22 68 64 66 22 2c 20 20 20 20 20 20    { "hdf",      
5a70: 20 20 33 2c 20 22 61 70 70 6c 69 63 61 74 69 6f    3, "applicatio
5a80: 6e 2f 78 2d 68 64 66 22 20 20 20 20 20 20 20 20  n/x-hdf"        
5a90: 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20           },.    
5aa0: 7b 20 22 68 68 22 2c 20 20 20 20 20 20 20 20 20  { "hh",         
5ab0: 32 2c 20 22 74 65 78 74 2f 70 6c 61 69 6e 22 20  2, "text/plain" 
5ac0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
5ad0: 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20         },.    { 
5ae0: 22 68 71 78 22 2c 20 20 20 20 20 20 20 20 33 2c  "hqx",        3,
5af0: 20 22 61 70 70 6c 69 63 61 74 69 6f 6e 2f 6d 61   "application/ma
5b00: 63 2d 62 69 6e 68 65 78 34 30 22 20 20 20 20 20  c-binhex40"     
5b10: 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 68       },.    { "h
5b20: 22 2c 20 20 20 20 20 20 20 20 20 20 31 2c 20 22  ",          1, "
5b30: 74 65 78 74 2f 70 6c 61 69 6e 22 20 20 20 20 20  text/plain"     
5b40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
5b50: 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 68 74 6d     },.    { "htm
5b60: 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22 74 65  ",        3, "te
5b70: 78 74 2f 68 74 6d 6c 3b 20 63 68 61 72 73 65 74  xt/html; charset
5b80: 3d 75 74 66 2d 38 22 20 20 20 20 20 20 20 20 20  =utf-8"         
5b90: 20 7d 2c 0a 20 20 20 20 7b 20 22 68 74 6d 6c 22   },.    { "html"
5ba0: 2c 20 20 20 20 20 20 20 34 2c 20 22 74 65 78 74  ,       4, "text
5bb0: 2f 68 74 6d 6c 3b 20 63 68 61 72 73 65 74 3d 75  /html; charset=u
5bc0: 74 66 2d 38 22 20 20 20 20 20 20 20 20 20 20 7d  tf-8"          }
5bd0: 2c 0a 20 20 20 20 7b 20 22 69 63 65 22 2c 20 20  ,.    { "ice",  
5be0: 20 20 20 20 20 20 33 2c 20 22 78 2d 63 6f 6e 66        3, "x-conf
5bf0: 65 72 65 6e 63 65 2f 78 2d 63 6f 6f 6c 74 61 6c  erence/x-cooltal
5c00: 6b 22 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a  k"           },.
5c10: 20 20 20 20 7b 20 22 69 65 66 22 2c 20 20 20 20      { "ief",    
5c20: 20 20 20 20 33 2c 20 22 69 6d 61 67 65 2f 69 65      3, "image/ie
5c30: 66 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20  f"              
5c40: 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20             },.  
5c50: 20 20 7b 20 22 69 67 65 73 22 2c 20 20 20 20 20    { "iges",     
5c60: 20 20 34 2c 20 22 6d 6f 64 65 6c 2f 69 67 65 73    4, "model/iges
5c70: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  "               
5c80: 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20           },.    
5c90: 7b 20 22 69 67 73 22 2c 20 20 20 20 20 20 20 20  { "igs",        
5ca0: 33 2c 20 22 6d 6f 64 65 6c 2f 69 67 65 73 22 20  3, "model/iges" 
5cb0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
5cc0: 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20         },.    { 
5cd0: 22 69 70 73 22 2c 20 20 20 20 20 20 20 20 33 2c  "ips",        3,
5ce0: 20 22 61 70 70 6c 69 63 61 74 69 6f 6e 2f 78 2d   "application/x-
5cf0: 69 70 73 63 72 69 70 74 22 20 20 20 20 20 20 20  ipscript"       
5d00: 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 69       },.    { "i
5d10: 70 78 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22  px",        3, "
5d20: 61 70 70 6c 69 63 61 74 69 6f 6e 2f 78 2d 69 70  application/x-ip
5d30: 69 78 22 20 20 20 20 20 20 20 20 20 20 20 20 20  ix"             
5d40: 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 6a 61 64     },.    { "jad
5d50: 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22 74 65  ",        3, "te
5d60: 78 74 2f 76 6e 64 2e 73 75 6e 2e 6a 32 6d 65 2e  xt/vnd.sun.j2me.
5d70: 61 70 70 2d 64 65 73 63 72 69 70 74 6f 72 22 20  app-descriptor" 
5d80: 20 7d 2c 0a 20 20 20 20 7b 20 22 6a 61 72 22 2c   },.    { "jar",
5d90: 20 20 20 20 20 20 20 20 33 2c 20 22 61 70 70 6c          3, "appl
5da0: 69 63 61 74 69 6f 6e 2f 6a 61 76 61 2d 61 72 63  ication/java-arc
5db0: 68 69 76 65 22 20 20 20 20 20 20 20 20 20 20 7d  hive"          }
5dc0: 2c 0a 20 20 20 20 7b 20 22 6a 70 65 67 22 2c 20  ,.    { "jpeg", 
5dd0: 20 20 20 20 20 20 34 2c 20 22 69 6d 61 67 65 2f        4, "image/
5de0: 6a 70 65 67 22 20 20 20 20 20 20 20 20 20 20 20  jpeg"           
5df0: 20 20 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a               },.
5e00: 20 20 20 20 7b 20 22 6a 70 65 22 2c 20 20 20 20      { "jpe",    
5e10: 20 20 20 20 33 2c 20 22 69 6d 61 67 65 2f 6a 70      3, "image/jp
5e20: 65 67 22 20 20 20 20 20 20 20 20 20 20 20 20 20  eg"             
5e30: 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20             },.  
5e40: 20 20 7b 20 22 6a 70 67 22 2c 20 20 20 20 20 20    { "jpg",      
5e50: 20 20 33 2c 20 22 69 6d 61 67 65 2f 6a 70 65 67    3, "image/jpeg
5e60: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  "               
5e70: 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20           },.    
5e80: 7b 20 22 6a 73 22 2c 20 20 20 20 20 20 20 20 20  { "js",         
5e90: 32 2c 20 22 61 70 70 6c 69 63 61 74 69 6f 6e 2f  2, "application/
5ea0: 78 2d 6a 61 76 61 73 63 72 69 70 74 22 20 20 20  x-javascript"   
5eb0: 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20         },.    { 
5ec0: 22 6b 61 72 22 2c 20 20 20 20 20 20 20 20 33 2c  "kar",        3,
5ed0: 20 22 61 75 64 69 6f 2f 6d 69 64 69 22 20 20 20   "audio/midi"   
5ee0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
5ef0: 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 6c       },.    { "l
5f00: 61 74 65 78 22 2c 20 20 20 20 20 20 35 2c 20 22  atex",      5, "
5f10: 61 70 70 6c 69 63 61 74 69 6f 6e 2f 78 2d 6c 61  application/x-la
5f20: 74 65 78 22 20 20 20 20 20 20 20 20 20 20 20 20  tex"            
5f30: 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 6c 68 61     },.    { "lha
5f40: 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22 61 70  ",        3, "ap
5f50: 70 6c 69 63 61 74 69 6f 6e 2f 6f 63 74 65 74 2d  plication/octet-
5f60: 73 74 72 65 61 6d 22 20 20 20 20 20 20 20 20 20  stream"         
5f70: 20 7d 2c 0a 20 20 20 20 7b 20 22 6c 73 70 22 2c   },.    { "lsp",
5f80: 20 20 20 20 20 20 20 20 33 2c 20 22 61 70 70 6c          3, "appl
5f90: 69 63 61 74 69 6f 6e 2f 78 2d 6c 69 73 70 22 20  ication/x-lisp" 
5fa0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7d                 }
5fb0: 2c 0a 20 20 20 20 7b 20 22 6c 7a 68 22 2c 20 20  ,.    { "lzh",  
5fc0: 20 20 20 20 20 20 33 2c 20 22 61 70 70 6c 69 63        3, "applic
5fd0: 61 74 69 6f 6e 2f 6f 63 74 65 74 2d 73 74 72 65  ation/octet-stre
5fe0: 61 6d 22 20 20 20 20 20 20 20 20 20 20 7d 2c 0a  am"          },.
5ff0: 20 20 20 20 7b 20 22 6d 22 2c 20 20 20 20 20 20      { "m",      
6000: 20 20 20 20 31 2c 20 22 74 65 78 74 2f 70 6c 61      1, "text/pla
6010: 69 6e 22 20 20 20 20 20 20 20 20 20 20 20 20 20  in"             
6020: 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20             },.  
6030: 20 20 7b 20 22 6d 33 75 22 2c 20 20 20 20 20 20    { "m3u",      
6040: 20 20 33 2c 20 22 61 75 64 69 6f 2f 78 2d 6d 70    3, "audio/x-mp
6050: 65 67 75 72 6c 22 20 20 20 20 20 20 20 20 20 20  egurl"          
6060: 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20           },.    
6070: 7b 20 22 6d 61 6e 22 2c 20 20 20 20 20 20 20 20  { "man",        
6080: 33 2c 20 22 61 70 70 6c 69 63 61 74 69 6f 6e 2f  3, "application/
6090: 78 2d 74 72 6f 66 66 2d 6d 61 6e 22 20 20 20 20  x-troff-man"    
60a0: 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20         },.    { 
60b0: 22 6d 65 22 2c 20 20 20 20 20 20 20 20 20 32 2c  "me",         2,
60c0: 20 22 61 70 70 6c 69 63 61 74 69 6f 6e 2f 78 2d   "application/x-
60d0: 74 72 6f 66 66 2d 6d 65 22 20 20 20 20 20 20 20  troff-me"       
60e0: 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 6d       },.    { "m
60f0: 65 73 68 22 2c 20 20 20 20 20 20 20 34 2c 20 22  esh",       4, "
6100: 6d 6f 64 65 6c 2f 6d 65 73 68 22 20 20 20 20 20  model/mesh"     
6110: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
6120: 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 6d 69 64     },.    { "mid
6130: 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22 61 75  ",        3, "au
6140: 64 69 6f 2f 6d 69 64 69 22 20 20 20 20 20 20 20  dio/midi"       
6150: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
6160: 20 7d 2c 0a 20 20 20 20 7b 20 22 6d 69 64 69 22   },.    { "midi"
6170: 2c 20 20 20 20 20 20 20 34 2c 20 22 61 75 64 69  ,       4, "audi
6180: 6f 2f 6d 69 64 69 22 20 20 20 20 20 20 20 20 20  o/midi"         
6190: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7d                 }
61a0: 2c 0a 20 20 20 20 7b 20 22 6d 69 66 22 2c 20 20  ,.    { "mif",  
61b0: 20 20 20 20 20 20 33 2c 20 22 61 70 70 6c 69 63        3, "applic
61c0: 61 74 69 6f 6e 2f 78 2d 6d 69 66 22 20 20 20 20  ation/x-mif"    
61d0: 20 20 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a               },.
61e0: 20 20 20 20 7b 20 22 6d 69 6d 65 22 2c 20 20 20      { "mime",   
61f0: 20 20 20 20 34 2c 20 22 77 77 77 2f 6d 69 6d 65      4, "www/mime
6200: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  "               
6210: 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20             },.  
6220: 20 20 7b 20 22 6d 6f 76 69 65 22 2c 20 20 20 20    { "movie",    
6230: 20 20 35 2c 20 22 76 69 64 65 6f 2f 78 2d 73 67    5, "video/x-sg
6240: 69 2d 6d 6f 76 69 65 22 20 20 20 20 20 20 20 20  i-movie"        
6250: 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20           },.    
6260: 7b 20 22 6d 6f 76 22 2c 20 20 20 20 20 20 20 20  { "mov",        
6270: 33 2c 20 22 76 69 64 65 6f 2f 71 75 69 63 6b 74  3, "video/quickt
6280: 69 6d 65 22 20 20 20 20 20 20 20 20 20 20 20 20  ime"            
6290: 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20         },.    { 
62a0: 22 6d 70 32 22 2c 20 20 20 20 20 20 20 20 33 2c  "mp2",        3,
62b0: 20 22 61 75 64 69 6f 2f 6d 70 65 67 22 20 20 20   "audio/mpeg"   
62c0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
62d0: 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 6d       },.    { "m
62e0: 70 32 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22  p2",        3, "
62f0: 76 69 64 65 6f 2f 6d 70 65 67 22 20 20 20 20 20  video/mpeg"     
6300: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
6310: 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 6d 70 33     },.    { "mp3
6320: 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22 61 75  ",        3, "au
6330: 64 69 6f 2f 6d 70 65 67 22 20 20 20 20 20 20 20  dio/mpeg"       
6340: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
6350: 20 7d 2c 0a 20 20 20 20 7b 20 22 6d 70 65 67 22   },.    { "mpeg"
6360: 2c 20 20 20 20 20 20 20 34 2c 20 22 76 69 64 65  ,       4, "vide
6370: 6f 2f 6d 70 65 67 22 20 20 20 20 20 20 20 20 20  o/mpeg"         
6380: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7d                 }
6390: 2c 0a 20 20 20 20 7b 20 22 6d 70 65 22 2c 20 20  ,.    { "mpe",  
63a0: 20 20 20 20 20 20 33 2c 20 22 76 69 64 65 6f 2f        3, "video/
63b0: 6d 70 65 67 22 20 20 20 20 20 20 20 20 20 20 20  mpeg"           
63c0: 20 20 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a               },.
63d0: 20 20 20 20 7b 20 22 6d 70 67 61 22 2c 20 20 20      { "mpga",   
63e0: 20 20 20 20 34 2c 20 22 61 75 64 69 6f 2f 6d 70      4, "audio/mp
63f0: 65 67 22 20 20 20 20 20 20 20 20 20 20 20 20 20  eg"             
6400: 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20             },.  
6410: 20 20 7b 20 22 6d 70 67 22 2c 20 20 20 20 20 20    { "mpg",      
6420: 20 20 33 2c 20 22 76 69 64 65 6f 2f 6d 70 65 67    3, "video/mpeg
6430: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  "               
6440: 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20           },.    
6450: 7b 20 22 6d 73 22 2c 20 20 20 20 20 20 20 20 20  { "ms",         
6460: 32 2c 20 22 61 70 70 6c 69 63 61 74 69 6f 6e 2f  2, "application/
6470: 78 2d 74 72 6f 66 66 2d 6d 73 22 20 20 20 20 20  x-troff-ms"     
6480: 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20         },.    { 
6490: 22 6d 73 68 22 2c 20 20 20 20 20 20 20 20 33 2c  "msh",        3,
64a0: 20 22 6d 6f 64 65 6c 2f 6d 65 73 68 22 20 20 20   "model/mesh"   
64b0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
64c0: 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 6e       },.    { "n
64d0: 63 22 2c 20 20 20 20 20 20 20 20 20 32 2c 20 22  c",         2, "
64e0: 61 70 70 6c 69 63 61 74 69 6f 6e 2f 78 2d 6e 65  application/x-ne
64f0: 74 63 64 66 22 20 20 20 20 20 20 20 20 20 20 20  tcdf"           
6500: 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 6f 64 61     },.    { "oda
6510: 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22 61 70  ",        3, "ap
6520: 70 6c 69 63 61 74 69 6f 6e 2f 6f 64 61 22 20 20  plication/oda"  
6530: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
6540: 20 7d 2c 0a 20 20 20 20 7b 20 22 6f 67 67 22 2c   },.    { "ogg",
6550: 20 20 20 20 20 20 20 20 33 2c 20 22 61 70 70 6c          3, "appl
6560: 69 63 61 74 69 6f 6e 2f 6f 67 67 22 20 20 20 20  ication/ogg"    
6570: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7d                 }
6580: 2c 0a 20 20 20 20 7b 20 22 6f 67 6d 22 2c 20 20  ,.    { "ogm",  
6590: 20 20 20 20 20 20 33 2c 20 22 61 70 70 6c 69 63        3, "applic
65a0: 61 74 69 6f 6e 2f 6f 67 67 22 20 20 20 20 20 20  ation/ogg"      
65b0: 20 20 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a               },.
65c0: 20 20 20 20 7b 20 22 70 62 6d 22 2c 20 20 20 20      { "pbm",    
65d0: 20 20 20 20 33 2c 20 22 69 6d 61 67 65 2f 78 2d      3, "image/x-
65e0: 70 6f 72 74 61 62 6c 65 2d 62 69 74 6d 61 70 22  portable-bitmap"
65f0: 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20             },.  
6600: 20 20 7b 20 22 70 64 62 22 2c 20 20 20 20 20 20    { "pdb",      
6610: 20 20 33 2c 20 22 63 68 65 6d 69 63 61 6c 2f 78    3, "chemical/x
6620: 2d 70 64 62 22 20 20 20 20 20 20 20 20 20 20 20  -pdb"           
6630: 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20           },.    
6640: 7b 20 22 70 64 66 22 2c 20 20 20 20 20 20 20 20  { "pdf",        
6650: 33 2c 20 22 61 70 70 6c 69 63 61 74 69 6f 6e 2f  3, "application/
6660: 70 64 66 22 20 20 20 20 20 20 20 20 20 20 20 20  pdf"            
6670: 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20         },.    { 
6680: 22 70 67 6d 22 2c 20 20 20 20 20 20 20 20 33 2c  "pgm",        3,
6690: 20 22 69 6d 61 67 65 2f 78 2d 70 6f 72 74 61 62   "image/x-portab
66a0: 6c 65 2d 67 72 61 79 6d 61 70 22 20 20 20 20 20  le-graymap"     
66b0: 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 70       },.    { "p
66c0: 67 6e 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22  gn",        3, "
66d0: 61 70 70 6c 69 63 61 74 69 6f 6e 2f 78 2d 63 68  application/x-ch
66e0: 65 73 73 2d 70 67 6e 22 20 20 20 20 20 20 20 20  ess-pgn"        
66f0: 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 70 67 70     },.    { "pgp
6700: 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22 61 70  ",        3, "ap
6710: 70 6c 69 63 61 74 69 6f 6e 2f 70 67 70 22 20 20  plication/pgp"  
6720: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
6730: 20 7d 2c 0a 20 20 20 20 7b 20 22 70 6c 22 2c 20   },.    { "pl", 
6740: 20 20 20 20 20 20 20 20 32 2c 20 22 61 70 70 6c          2, "appl
6750: 69 63 61 74 69 6f 6e 2f 78 2d 70 65 72 6c 22 20  ication/x-perl" 
6760: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7d                 }
6770: 2c 0a 20 20 20 20 7b 20 22 70 6d 22 2c 20 20 20  ,.    { "pm",   
6780: 20 20 20 20 20 20 32 2c 20 22 61 70 70 6c 69 63        2, "applic
6790: 61 74 69 6f 6e 2f 78 2d 70 65 72 6c 22 20 20 20  ation/x-perl"   
67a0: 20 20 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a               },.
67b0: 20 20 20 20 7b 20 22 70 6e 67 22 2c 20 20 20 20      { "png",    
67c0: 20 20 20 20 33 2c 20 22 69 6d 61 67 65 2f 70 6e      3, "image/pn
67d0: 67 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20  g"              
67e0: 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20             },.  
67f0: 20 20 7b 20 22 70 6e 6d 22 2c 20 20 20 20 20 20    { "pnm",      
6800: 20 20 33 2c 20 22 69 6d 61 67 65 2f 78 2d 70 6f    3, "image/x-po
6810: 72 74 61 62 6c 65 2d 61 6e 79 6d 61 70 22 20 20  rtable-anymap"  
6820: 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20           },.    
6830: 7b 20 22 70 6f 74 22 2c 20 20 20 20 20 20 20 20  { "pot",        
6840: 33 2c 20 22 61 70 70 6c 69 63 61 74 69 6f 6e 2f  3, "application/
6850: 6d 73 70 6f 77 65 72 70 6f 69 6e 74 22 20 20 20  mspowerpoint"   
6860: 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20         },.    { 
6870: 22 70 70 6d 22 2c 20 20 20 20 20 20 20 20 33 2c  "ppm",        3,
6880: 20 22 69 6d 61 67 65 2f 78 2d 70 6f 72 74 61 62   "image/x-portab
6890: 6c 65 2d 70 69 78 6d 61 70 22 20 20 20 20 20 20  le-pixmap"      
68a0: 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 70       },.    { "p
68b0: 70 73 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22  ps",        3, "
68c0: 61 70 70 6c 69 63 61 74 69 6f 6e 2f 6d 73 70 6f  application/mspo
68d0: 77 65 72 70 6f 69 6e 74 22 20 20 20 20 20 20 20  werpoint"       
68e0: 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 70 70 74     },.    { "ppt
68f0: 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22 61 70  ",        3, "ap
6900: 70 6c 69 63 61 74 69 6f 6e 2f 6d 73 70 6f 77 65  plication/mspowe
6910: 72 70 6f 69 6e 74 22 20 20 20 20 20 20 20 20 20  rpoint"         
6920: 20 7d 2c 0a 20 20 20 20 7b 20 22 70 70 7a 22 2c   },.    { "ppz",
6930: 20 20 20 20 20 20 20 20 33 2c 20 22 61 70 70 6c          3, "appl
6940: 69 63 61 74 69 6f 6e 2f 6d 73 70 6f 77 65 72 70  ication/mspowerp
6950: 6f 69 6e 74 22 20 20 20 20 20 20 20 20 20 20 7d  oint"          }
6960: 2c 0a 20 20 20 20 7b 20 22 70 72 65 22 2c 20 20  ,.    { "pre",  
6970: 20 20 20 20 20 20 33 2c 20 22 61 70 70 6c 69 63        3, "applic
6980: 61 74 69 6f 6e 2f 78 2d 66 72 65 65 6c 61 6e 63  ation/x-freelanc
6990: 65 22 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a  e"           },.
69a0: 20 20 20 20 7b 20 22 70 72 74 22 2c 20 20 20 20      { "prt",    
69b0: 20 20 20 20 33 2c 20 22 61 70 70 6c 69 63 61 74      3, "applicat
69c0: 69 6f 6e 2f 70 72 6f 5f 65 6e 67 22 20 20 20 20  ion/pro_eng"    
69d0: 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20             },.  
69e0: 20 20 7b 20 22 70 73 22 2c 20 20 20 20 20 20 20    { "ps",       
69f0: 20 20 32 2c 20 22 61 70 70 6c 69 63 61 74 69 6f    2, "applicatio
6a00: 6e 2f 70 6f 73 74 73 63 72 69 70 74 22 20 20 20  n/postscript"   
6a10: 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20           },.    
6a20: 7b 20 22 71 74 22 2c 20 20 20 20 20 20 20 20 20  { "qt",         
6a30: 32 2c 20 22 76 69 64 65 6f 2f 71 75 69 63 6b 74  2, "video/quickt
6a40: 69 6d 65 22 20 20 20 20 20 20 20 20 20 20 20 20  ime"            
6a50: 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20         },.    { 
6a60: 22 72 61 22 2c 20 20 20 20 20 20 20 20 20 32 2c  "ra",         2,
6a70: 20 22 61 75 64 69 6f 2f 78 2d 72 65 61 6c 61 75   "audio/x-realau
6a80: 64 69 6f 22 20 20 20 20 20 20 20 20 20 20 20 20  dio"            
6a90: 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 72       },.    { "r
6aa0: 61 6d 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22  am",        3, "
6ab0: 61 75 64 69 6f 2f 78 2d 70 6e 2d 72 65 61 6c 61  audio/x-pn-reala
6ac0: 75 64 69 6f 22 20 20 20 20 20 20 20 20 20 20 20  udio"           
6ad0: 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 72 61 72     },.    { "rar
6ae0: 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22 61 70  ",        3, "ap
6af0: 70 6c 69 63 61 74 69 6f 6e 2f 78 2d 72 61 72 2d  plication/x-rar-
6b00: 63 6f 6d 70 72 65 73 73 65 64 22 20 20 20 20 20  compressed"     
6b10: 20 7d 2c 0a 20 20 20 20 7b 20 22 72 61 73 22 2c   },.    { "ras",
6b20: 20 20 20 20 20 20 20 20 33 2c 20 22 69 6d 61 67          3, "imag
6b30: 65 2f 63 6d 75 2d 72 61 73 74 65 72 22 20 20 20  e/cmu-raster"   
6b40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7d                 }
6b50: 2c 0a 20 20 20 20 7b 20 22 72 61 73 22 2c 20 20  ,.    { "ras",  
6b60: 20 20 20 20 20 20 33 2c 20 22 69 6d 61 67 65 2f        3, "image/
6b70: 78 2d 63 6d 75 2d 72 61 73 74 65 72 22 20 20 20  x-cmu-raster"   
6b80: 20 20 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a               },.
6b90: 20 20 20 20 7b 20 22 72 67 62 22 2c 20 20 20 20      { "rgb",    
6ba0: 20 20 20 20 33 2c 20 22 69 6d 61 67 65 2f 78 2d      3, "image/x-
6bb0: 72 67 62 22 20 20 20 20 20 20 20 20 20 20 20 20  rgb"            
6bc0: 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20             },.  
6bd0: 20 20 7b 20 22 72 6d 22 2c 20 20 20 20 20 20 20    { "rm",       
6be0: 20 20 32 2c 20 22 61 75 64 69 6f 2f 78 2d 70 6e    2, "audio/x-pn
6bf0: 2d 72 65 61 6c 61 75 64 69 6f 22 20 20 20 20 20  -realaudio"     
6c00: 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20           },.    
6c10: 7b 20 22 72 6f 66 66 22 2c 20 20 20 20 20 20 20  { "roff",       
6c20: 34 2c 20 22 61 70 70 6c 69 63 61 74 69 6f 6e 2f  4, "application/
6c30: 78 2d 74 72 6f 66 66 22 20 20 20 20 20 20 20 20  x-troff"        
6c40: 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20         },.    { 
6c50: 22 72 70 6d 22 2c 20 20 20 20 20 20 20 20 33 2c  "rpm",        3,
6c60: 20 22 61 75 64 69 6f 2f 78 2d 70 6e 2d 72 65 61   "audio/x-pn-rea
6c70: 6c 61 75 64 69 6f 2d 70 6c 75 67 69 6e 22 20 20  laudio-plugin"  
6c80: 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 72       },.    { "r
6c90: 74 66 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22  tf",        3, "
6ca0: 61 70 70 6c 69 63 61 74 69 6f 6e 2f 72 74 66 22  application/rtf"
6cb0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
6cc0: 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 72 74 66     },.    { "rtf
6cd0: 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22 74 65  ",        3, "te
6ce0: 78 74 2f 72 74 66 22 20 20 20 20 20 20 20 20 20  xt/rtf"         
6cf0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
6d00: 20 7d 2c 0a 20 20 20 20 7b 20 22 72 74 78 22 2c   },.    { "rtx",
6d10: 20 20 20 20 20 20 20 20 33 2c 20 22 74 65 78 74          3, "text
6d20: 2f 72 69 63 68 74 65 78 74 22 20 20 20 20 20 20  /richtext"      
6d30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7d                 }
6d40: 2c 0a 20 20 20 20 7b 20 22 73 63 6d 22 2c 20 20  ,.    { "scm",  
6d50: 20 20 20 20 20 20 33 2c 20 22 61 70 70 6c 69 63        3, "applic
6d60: 61 74 69 6f 6e 2f 78 2d 6c 6f 74 75 73 73 63 72  ation/x-lotusscr
6d70: 65 65 6e 63 61 6d 22 20 20 20 20 20 20 7d 2c 0a  eencam"      },.
6d80: 20 20 20 20 7b 20 22 73 65 74 22 2c 20 20 20 20      { "set",    
6d90: 20 20 20 20 33 2c 20 22 61 70 70 6c 69 63 61 74      3, "applicat
6da0: 69 6f 6e 2f 73 65 74 22 20 20 20 20 20 20 20 20  ion/set"        
6db0: 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20             },.  
6dc0: 20 20 7b 20 22 73 67 6d 6c 22 2c 20 20 20 20 20    { "sgml",     
6dd0: 20 20 34 2c 20 22 74 65 78 74 2f 73 67 6d 6c 22    4, "text/sgml"
6de0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
6df0: 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20           },.    
6e00: 7b 20 22 73 67 6d 22 2c 20 20 20 20 20 20 20 20  { "sgm",        
6e10: 33 2c 20 22 74 65 78 74 2f 73 67 6d 6c 22 20 20  3, "text/sgml"  
6e20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
6e30: 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20         },.    { 
6e40: 22 73 68 22 2c 20 20 20 20 20 20 20 20 20 32 2c  "sh",         2,
6e50: 20 22 61 70 70 6c 69 63 61 74 69 6f 6e 2f 78 2d   "application/x-
6e60: 73 68 22 20 20 20 20 20 20 20 20 20 20 20 20 20  sh"             
6e70: 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 73       },.    { "s
6e80: 68 61 72 22 2c 20 20 20 20 20 20 20 34 2c 20 22  har",       4, "
6e90: 61 70 70 6c 69 63 61 74 69 6f 6e 2f 78 2d 73 68  application/x-sh
6ea0: 61 72 22 20 20 20 20 20 20 20 20 20 20 20 20 20  ar"             
6eb0: 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 73 69 6c     },.    { "sil
6ec0: 6f 22 2c 20 20 20 20 20 20 20 34 2c 20 22 6d 6f  o",       4, "mo
6ed0: 64 65 6c 2f 6d 65 73 68 22 20 20 20 20 20 20 20  del/mesh"       
6ee0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
6ef0: 20 7d 2c 0a 20 20 20 20 7b 20 22 73 69 74 22 2c   },.    { "sit",
6f00: 20 20 20 20 20 20 20 20 33 2c 20 22 61 70 70 6c          3, "appl
6f10: 69 63 61 74 69 6f 6e 2f 78 2d 73 74 75 66 66 69  ication/x-stuffi
6f20: 74 22 20 20 20 20 20 20 20 20 20 20 20 20 20 7d  t"             }
6f30: 2c 0a 20 20 20 20 7b 20 22 73 6b 64 22 2c 20 20  ,.    { "skd",  
6f40: 20 20 20 20 20 20 33 2c 20 22 61 70 70 6c 69 63        3, "applic
6f50: 61 74 69 6f 6e 2f 78 2d 6b 6f 61 6e 22 20 20 20  ation/x-koan"   
6f60: 20 20 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a               },.
6f70: 20 20 20 20 7b 20 22 73 6b 6d 22 2c 20 20 20 20      { "skm",    
6f80: 20 20 20 20 33 2c 20 22 61 70 70 6c 69 63 61 74      3, "applicat
6f90: 69 6f 6e 2f 78 2d 6b 6f 61 6e 22 20 20 20 20 20  ion/x-koan"     
6fa0: 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20             },.  
6fb0: 20 20 7b 20 22 73 6b 70 22 2c 20 20 20 20 20 20    { "skp",      
6fc0: 20 20 33 2c 20 22 61 70 70 6c 69 63 61 74 69 6f    3, "applicatio
6fd0: 6e 2f 78 2d 6b 6f 61 6e 22 20 20 20 20 20 20 20  n/x-koan"       
6fe0: 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20           },.    
6ff0: 7b 20 22 73 6b 74 22 2c 20 20 20 20 20 20 20 20  { "skt",        
7000: 33 2c 20 22 61 70 70 6c 69 63 61 74 69 6f 6e 2f  3, "application/
7010: 78 2d 6b 6f 61 6e 22 20 20 20 20 20 20 20 20 20  x-koan"         
7020: 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20         },.    { 
7030: 22 73 6d 69 22 2c 20 20 20 20 20 20 20 20 33 2c  "smi",        3,
7040: 20 22 61 70 70 6c 69 63 61 74 69 6f 6e 2f 73 6d   "application/sm
7050: 69 6c 22 20 20 20 20 20 20 20 20 20 20 20 20 20  il"             
7060: 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 73       },.    { "s
7070: 6d 69 6c 22 2c 20 20 20 20 20 20 20 34 2c 20 22  mil",       4, "
7080: 61 70 70 6c 69 63 61 74 69 6f 6e 2f 73 6d 69 6c  application/smil
7090: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  "               
70a0: 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 73 6e 64     },.    { "snd
70b0: 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22 61 75  ",        3, "au
70c0: 64 69 6f 2f 62 61 73 69 63 22 20 20 20 20 20 20  dio/basic"      
70d0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
70e0: 20 7d 2c 0a 20 20 20 20 7b 20 22 73 6f 6c 22 2c   },.    { "sol",
70f0: 20 20 20 20 20 20 20 20 33 2c 20 22 61 70 70 6c          3, "appl
7100: 69 63 61 74 69 6f 6e 2f 73 6f 6c 69 64 73 22 20  ication/solids" 
7110: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7d                 }
7120: 2c 0a 20 20 20 20 7b 20 22 73 70 6c 22 2c 20 20  ,.    { "spl",  
7130: 20 20 20 20 20 20 33 2c 20 22 61 70 70 6c 69 63        3, "applic
7140: 61 74 69 6f 6e 2f 78 2d 66 75 74 75 72 65 73 70  ation/x-futuresp
7150: 6c 61 73 68 22 20 20 20 20 20 20 20 20 7d 2c 0a  lash"        },.
7160: 20 20 20 20 7b 20 22 73 72 63 22 2c 20 20 20 20      { "src",    
7170: 20 20 20 20 33 2c 20 22 61 70 70 6c 69 63 61 74      3, "applicat
7180: 69 6f 6e 2f 78 2d 77 61 69 73 2d 73 6f 75 72 63  ion/x-wais-sourc
7190: 65 22 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20  e"         },.  
71a0: 20 20 7b 20 22 73 74 65 70 22 2c 20 20 20 20 20    { "step",     
71b0: 20 20 34 2c 20 22 61 70 70 6c 69 63 61 74 69 6f    4, "applicatio
71c0: 6e 2f 53 54 45 50 22 20 20 20 20 20 20 20 20 20  n/STEP"         
71d0: 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20           },.    
71e0: 7b 20 22 73 74 6c 22 2c 20 20 20 20 20 20 20 20  { "stl",        
71f0: 33 2c 20 22 61 70 70 6c 69 63 61 74 69 6f 6e 2f  3, "application/
7200: 53 4c 41 22 20 20 20 20 20 20 20 20 20 20 20 20  SLA"            
7210: 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20         },.    { 
7220: 22 73 74 70 22 2c 20 20 20 20 20 20 20 20 33 2c  "stp",        3,
7230: 20 22 61 70 70 6c 69 63 61 74 69 6f 6e 2f 53 54   "application/ST
7240: 45 50 22 20 20 20 20 20 20 20 20 20 20 20 20 20  EP"             
7250: 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 73       },.    { "s
7260: 76 34 63 70 69 6f 22 2c 20 20 20 20 37 2c 20 22  v4cpio",    7, "
7270: 61 70 70 6c 69 63 61 74 69 6f 6e 2f 78 2d 73 76  application/x-sv
7280: 34 63 70 69 6f 22 20 20 20 20 20 20 20 20 20 20  4cpio"          
7290: 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 73 76 34     },.    { "sv4
72a0: 63 72 63 22 2c 20 20 20 20 20 36 2c 20 22 61 70  crc",     6, "ap
72b0: 70 6c 69 63 61 74 69 6f 6e 2f 78 2d 73 76 34 63  plication/x-sv4c
72c0: 72 63 22 20 20 20 20 20 20 20 20 20 20 20 20 20  rc"             
72d0: 20 7d 2c 0a 20 20 20 20 7b 20 22 73 77 66 22 2c   },.    { "swf",
72e0: 20 20 20 20 20 20 20 20 33 2c 20 22 61 70 70 6c          3, "appl
72f0: 69 63 61 74 69 6f 6e 2f 78 2d 73 68 6f 63 6b 77  ication/x-shockw
7300: 61 76 65 2d 66 6c 61 73 68 22 20 20 20 20 20 7d  ave-flash"     }
7310: 2c 0a 20 20 20 20 7b 20 22 74 22 2c 20 20 20 20  ,.    { "t",    
7320: 20 20 20 20 20 20 31 2c 20 22 61 70 70 6c 69 63        1, "applic
7330: 61 74 69 6f 6e 2f 78 2d 74 72 6f 66 66 22 20 20  ation/x-troff"  
7340: 20 20 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a               },.
7350: 20 20 20 20 7b 20 22 74 61 72 22 2c 20 20 20 20      { "tar",    
7360: 20 20 20 20 33 2c 20 22 61 70 70 6c 69 63 61 74      3, "applicat
7370: 69 6f 6e 2f 78 2d 74 61 72 22 20 20 20 20 20 20  ion/x-tar"      
7380: 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20             },.  
7390: 20 20 7b 20 22 74 63 6c 22 2c 20 20 20 20 20 20    { "tcl",      
73a0: 20 20 33 2c 20 22 61 70 70 6c 69 63 61 74 69 6f    3, "applicatio
73b0: 6e 2f 78 2d 74 63 6c 22 20 20 20 20 20 20 20 20  n/x-tcl"        
73c0: 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20           },.    
73d0: 7b 20 22 74 65 78 22 2c 20 20 20 20 20 20 20 20  { "tex",        
73e0: 33 2c 20 22 61 70 70 6c 69 63 61 74 69 6f 6e 2f  3, "application/
73f0: 78 2d 74 65 78 22 20 20 20 20 20 20 20 20 20 20  x-tex"          
7400: 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20         },.    { 
7410: 22 74 65 78 69 22 2c 20 20 20 20 20 20 20 34 2c  "texi",       4,
7420: 20 22 61 70 70 6c 69 63 61 74 69 6f 6e 2f 78 2d   "application/x-
7430: 74 65 78 69 6e 66 6f 22 20 20 20 20 20 20 20 20  texinfo"        
7440: 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 74       },.    { "t
7450: 65 78 69 6e 66 6f 22 2c 20 20 20 20 37 2c 20 22  exinfo",    7, "
7460: 61 70 70 6c 69 63 61 74 69 6f 6e 2f 78 2d 74 65  application/x-te
7470: 78 69 6e 66 6f 22 20 20 20 20 20 20 20 20 20 20  xinfo"          
7480: 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 74 67 7a     },.    { "tgz
7490: 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22 61 70  ",        3, "ap
74a0: 70 6c 69 63 61 74 69 6f 6e 2f 78 2d 74 61 72 2d  plication/x-tar-
74b0: 67 7a 22 20 20 20 20 20 20 20 20 20 20 20 20 20  gz"             
74c0: 20 7d 2c 0a 20 20 20 20 7b 20 22 74 69 66 66 22   },.    { "tiff"
74d0: 2c 20 20 20 20 20 20 20 34 2c 20 22 69 6d 61 67  ,       4, "imag
74e0: 65 2f 74 69 66 66 22 20 20 20 20 20 20 20 20 20  e/tiff"         
74f0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7d                 }
7500: 2c 0a 20 20 20 20 7b 20 22 74 69 66 22 2c 20 20  ,.    { "tif",  
7510: 20 20 20 20 20 20 33 2c 20 22 69 6d 61 67 65 2f        3, "image/
7520: 74 69 66 66 22 20 20 20 20 20 20 20 20 20 20 20  tiff"           
7530: 20 20 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a               },.
7540: 20 20 20 20 7b 20 22 74 72 22 2c 20 20 20 20 20      { "tr",     
7550: 20 20 20 20 32 2c 20 22 61 70 70 6c 69 63 61 74      2, "applicat
7560: 69 6f 6e 2f 78 2d 74 72 6f 66 66 22 20 20 20 20  ion/x-troff"    
7570: 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20             },.  
7580: 20 20 7b 20 22 74 73 69 22 2c 20 20 20 20 20 20    { "tsi",      
7590: 20 20 33 2c 20 22 61 75 64 69 6f 2f 54 53 50 2d    3, "audio/TSP-
75a0: 61 75 64 69 6f 22 20 20 20 20 20 20 20 20 20 20  audio"          
75b0: 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20           },.    
75c0: 7b 20 22 74 73 70 22 2c 20 20 20 20 20 20 20 20  { "tsp",        
75d0: 33 2c 20 22 61 70 70 6c 69 63 61 74 69 6f 6e 2f  3, "application/
75e0: 64 73 70 74 79 70 65 22 20 20 20 20 20 20 20 20  dsptype"        
75f0: 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20         },.    { 
7600: 22 74 73 76 22 2c 20 20 20 20 20 20 20 20 33 2c  "tsv",        3,
7610: 20 22 74 65 78 74 2f 74 61 62 2d 73 65 70 61 72   "text/tab-separ
7620: 61 74 65 64 2d 76 61 6c 75 65 73 22 20 20 20 20  ated-values"    
7630: 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 74       },.    { "t
7640: 78 74 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22  xt",        3, "
7650: 74 65 78 74 2f 70 6c 61 69 6e 22 20 20 20 20 20  text/plain"     
7660: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
7670: 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 75 6e 76     },.    { "unv
7680: 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22 61 70  ",        3, "ap
7690: 70 6c 69 63 61 74 69 6f 6e 2f 69 2d 64 65 61 73  plication/i-deas
76a0: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  "               
76b0: 20 7d 2c 0a 20 20 20 20 7b 20 22 75 73 74 61 72   },.    { "ustar
76c0: 22 2c 20 20 20 20 20 20 35 2c 20 22 61 70 70 6c  ",      5, "appl
76d0: 69 63 61 74 69 6f 6e 2f 78 2d 75 73 74 61 72 22  ication/x-ustar"
76e0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7d                 }
76f0: 2c 0a 20 20 20 20 7b 20 22 76 63 64 22 2c 20 20  ,.    { "vcd",  
7700: 20 20 20 20 20 20 33 2c 20 22 61 70 70 6c 69 63        3, "applic
7710: 61 74 69 6f 6e 2f 78 2d 63 64 6c 69 6e 6b 22 20  ation/x-cdlink" 
7720: 20 20 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a               },.
7730: 20 20 20 20 7b 20 22 76 64 61 22 2c 20 20 20 20      { "vda",    
7740: 20 20 20 20 33 2c 20 22 61 70 70 6c 69 63 61 74      3, "applicat
7750: 69 6f 6e 2f 76 64 61 22 20 20 20 20 20 20 20 20  ion/vda"        
7760: 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20             },.  
7770: 20 20 7b 20 22 76 69 76 22 2c 20 20 20 20 20 20    { "viv",      
7780: 20 20 33 2c 20 22 76 69 64 65 6f 2f 76 6e 64 2e    3, "video/vnd.
7790: 76 69 76 6f 22 20 20 20 20 20 20 20 20 20 20 20  vivo"           
77a0: 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20           },.    
77b0: 7b 20 22 76 69 76 6f 22 2c 20 20 20 20 20 20 20  { "vivo",       
77c0: 34 2c 20 22 76 69 64 65 6f 2f 76 6e 64 2e 76 69  4, "video/vnd.vi
77d0: 76 6f 22 20 20 20 20 20 20 20 20 20 20 20 20 20  vo"             
77e0: 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20         },.    { 
77f0: 22 76 72 6d 6c 22 2c 20 20 20 20 20 20 20 34 2c  "vrml",       4,
7800: 20 22 6d 6f 64 65 6c 2f 76 72 6d 6c 22 20 20 20   "model/vrml"   
7810: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
7820: 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 77       },.    { "w
7830: 61 76 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22  av",        3, "
7840: 61 75 64 69 6f 2f 78 2d 77 61 76 22 20 20 20 20  audio/x-wav"    
7850: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
7860: 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 77 61 78     },.    { "wax
7870: 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22 61 75  ",        3, "au
7880: 64 69 6f 2f 78 2d 6d 73 2d 77 61 78 22 20 20 20  dio/x-ms-wax"   
7890: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
78a0: 20 7d 2c 0a 20 20 20 20 7b 20 22 77 69 6b 69 22   },.    { "wiki"
78b0: 2c 20 20 20 20 20 20 20 34 2c 20 22 61 70 70 6c  ,       4, "appl
78c0: 69 63 61 74 69 6f 6e 2f 78 2d 66 6f 73 73 69 6c  ication/x-fossil
78d0: 2d 77 69 6b 69 22 20 20 20 20 20 20 20 20 20 7d  -wiki"         }
78e0: 2c 0a 20 20 20 20 7b 20 22 77 6d 61 22 2c 20 20  ,.    { "wma",  
78f0: 20 20 20 20 20 20 33 2c 20 22 61 75 64 69 6f 2f        3, "audio/
7900: 78 2d 6d 73 2d 77 6d 61 22 20 20 20 20 20 20 20  x-ms-wma"       
7910: 20 20 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a               },.
7920: 20 20 20 20 7b 20 22 77 6d 76 22 2c 20 20 20 20      { "wmv",    
7930: 20 20 20 20 33 2c 20 22 76 69 64 65 6f 2f 78 2d      3, "video/x-
7940: 6d 73 2d 77 6d 76 22 20 20 20 20 20 20 20 20 20  ms-wmv"         
7950: 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20             },.  
7960: 20 20 7b 20 22 77 6d 78 22 2c 20 20 20 20 20 20    { "wmx",      
7970: 20 20 33 2c 20 22 76 69 64 65 6f 2f 78 2d 6d 73    3, "video/x-ms
7980: 2d 77 6d 78 22 20 20 20 20 20 20 20 20 20 20 20  -wmx"           
7990: 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20           },.    
79a0: 7b 20 22 77 72 6c 22 2c 20 20 20 20 20 20 20 20  { "wrl",        
79b0: 33 2c 20 22 6d 6f 64 65 6c 2f 76 72 6d 6c 22 20  3, "model/vrml" 
79c0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
79d0: 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20         },.    { 
79e0: 22 77 76 78 22 2c 20 20 20 20 20 20 20 20 33 2c  "wvx",        3,
79f0: 20 22 76 69 64 65 6f 2f 78 2d 6d 73 2d 77 76 78   "video/x-ms-wvx
7a00: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  "               
7a10: 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 78       },.    { "x
7a20: 62 6d 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22  bm",        3, "
7a30: 69 6d 61 67 65 2f 78 2d 78 62 69 74 6d 61 70 22  image/x-xbitmap"
7a40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
7a50: 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 78 6c 63     },.    { "xlc
7a60: 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22 61 70  ",        3, "ap
7a70: 70 6c 69 63 61 74 69 6f 6e 2f 76 6e 64 2e 6d 73  plication/vnd.ms
7a80: 2d 65 78 63 65 6c 22 20 20 20 20 20 20 20 20 20  -excel"         
7a90: 20 7d 2c 0a 20 20 20 20 7b 20 22 78 6c 6c 22 2c   },.    { "xll",
7aa0: 20 20 20 20 20 20 20 20 33 2c 20 22 61 70 70 6c          3, "appl
7ab0: 69 63 61 74 69 6f 6e 2f 76 6e 64 2e 6d 73 2d 65  ication/vnd.ms-e
7ac0: 78 63 65 6c 22 20 20 20 20 20 20 20 20 20 20 7d  xcel"          }
7ad0: 2c 0a 20 20 20 20 7b 20 22 78 6c 6d 22 2c 20 20  ,.    { "xlm",  
7ae0: 20 20 20 20 20 20 33 2c 20 22 61 70 70 6c 69 63        3, "applic
7af0: 61 74 69 6f 6e 2f 76 6e 64 2e 6d 73 2d 65 78 63  ation/vnd.ms-exc
7b00: 65 6c 22 20 20 20 20 20 20 20 20 20 20 7d 2c 0a  el"          },.
7b10: 20 20 20 20 7b 20 22 78 6c 73 22 2c 20 20 20 20      { "xls",    
7b20: 20 20 20 20 33 2c 20 22 61 70 70 6c 69 63 61 74      3, "applicat
7b30: 69 6f 6e 2f 76 6e 64 2e 6d 73 2d 65 78 63 65 6c  ion/vnd.ms-excel
7b40: 22 20 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20  "          },.  
7b50: 20 20 7b 20 22 78 6c 77 22 2c 20 20 20 20 20 20    { "xlw",      
7b60: 20 20 33 2c 20 22 61 70 70 6c 69 63 61 74 69 6f    3, "applicatio
7b70: 6e 2f 76 6e 64 2e 6d 73 2d 65 78 63 65 6c 22 20  n/vnd.ms-excel" 
7b80: 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20           },.    
7b90: 7b 20 22 78 6d 6c 22 2c 20 20 20 20 20 20 20 20  { "xml",        
7ba0: 33 2c 20 22 74 65 78 74 2f 78 6d 6c 22 20 20 20  3, "text/xml"   
7bb0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
7bc0: 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20         },.    { 
7bd0: 22 78 70 6d 22 2c 20 20 20 20 20 20 20 20 33 2c  "xpm",        3,
7be0: 20 22 69 6d 61 67 65 2f 78 2d 78 70 69 78 6d 61   "image/x-xpixma
7bf0: 70 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20  p"              
7c00: 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 78       },.    { "x
7c10: 77 64 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22  wd",        3, "
7c20: 69 6d 61 67 65 2f 78 2d 78 77 69 6e 64 6f 77 64  image/x-xwindowd
7c30: 75 6d 70 22 20 20 20 20 20 20 20 20 20 20 20 20  ump"            
7c40: 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 78 79 7a     },.    { "xyz
7c50: 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22 63 68  ",        3, "ch
7c60: 65 6d 69 63 61 6c 2f 78 2d 70 64 62 22 20 20 20  emical/x-pdb"   
7c70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
7c80: 20 7d 2c 0a 20 20 20 20 7b 20 22 7a 69 70 22 2c   },.    { "zip",
7c90: 20 20 20 20 20 20 20 20 33 2c 20 22 61 70 70 6c          3, "appl
7ca0: 69 63 61 74 69 6f 6e 2f 7a 69 70 22 20 20 20 20  ication/zip"    
7cb0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7d                 }
7cc0: 2c 0a 20 20 7d 3b 0a 0a 20 20 66 6f 72 28 69 3d  ,.  };..  for(i=
7cd0: 6e 4e 61 6d 65 2d 31 3b 20 69 3e 30 20 26 26 20  nName-1; i>0 && 
7ce0: 7a 4e 61 6d 65 5b 69 5d 21 3d 27 2e 27 3b 20 69  zName[i]!='.'; i
7cf0: 2d 2d 29 7b 7d 0a 20 20 7a 20 3d 20 26 7a 4e 61  --){}.  z = &zNa
7d00: 6d 65 5b 69 2b 31 5d 3b 0a 20 20 6c 65 6e 20 3d  me[i+1];.  len =
7d10: 20 6e 4e 61 6d 65 20 2d 20 69 3b 0a 20 20 69 66   nName - i;.  if
7d20: 28 20 6c 65 6e 3c 28 69 6e 74 29 73 69 7a 65 6f  ( len<(int)sizeo
7d30: 66 28 7a 53 75 66 66 69 78 29 2d 31 20 29 7b 0a  f(zSuffix)-1 ){.
7d40: 20 20 20 20 73 74 72 63 70 79 28 7a 53 75 66 66      strcpy(zSuff
7d50: 69 78 2c 20 7a 29 3b 0a 20 20 20 20 66 6f 72 28  ix, z);.    for(
7d60: 69 3d 30 3b 20 7a 53 75 66 66 69 78 5b 69 5d 3b  i=0; zSuffix[i];
7d70: 20 69 2b 2b 29 20 7a 53 75 66 66 69 78 5b 69 5d   i++) zSuffix[i]
7d80: 20 3d 20 74 6f 6c 6f 77 65 72 28 7a 53 75 66 66   = tolower(zSuff
7d90: 69 78 5b 69 5d 29 3b 0a 20 20 20 20 66 69 72 73  ix[i]);.    firs
7da0: 74 20 3d 20 30 3b 0a 20 20 20 20 6c 61 73 74 20  t = 0;.    last 
7db0: 3d 20 73 69 7a 65 6f 66 28 61 4d 69 6d 65 29 2f  = sizeof(aMime)/
7dc0: 73 69 7a 65 6f 66 28 61 4d 69 6d 65 5b 30 5d 29  sizeof(aMime[0])
7dd0: 3b 0a 20 20 20 20 77 68 69 6c 65 28 20 66 69 72  ;.    while( fir
7de0: 73 74 3c 3d 6c 61 73 74 20 29 7b 0a 20 20 20 20  st<=last ){.    
7df0: 20 20 69 6e 74 20 63 3b 0a 20 20 20 20 20 20 69    int c;.      i
7e00: 20 3d 20 28 66 69 72 73 74 2b 6c 61 73 74 29 2f   = (first+last)/
7e10: 32 3b 0a 20 20 20 20 20 20 63 20 3d 20 73 74 72  2;.      c = str
7e20: 63 6d 70 28 7a 53 75 66 66 69 78 2c 20 61 4d 69  cmp(zSuffix, aMi
7e30: 6d 65 5b 69 5d 2e 7a 53 75 66 66 69 78 29 3b 0a  me[i].zSuffix);.
7e40: 20 20 20 20 20 20 69 66 28 20 63 3d 3d 30 20 29        if( c==0 )
7e50: 20 72 65 74 75 72 6e 20 61 4d 69 6d 65 5b 69 5d   return aMime[i]
7e60: 2e 7a 4d 69 6d 65 74 79 70 65 3b 0a 20 20 20 20  .zMimetype;.    
7e70: 20 20 69 66 28 20 63 3c 30 20 29 7b 0a 20 20 20    if( c<0 ){.   
7e80: 20 20 20 20 20 6c 61 73 74 20 3d 20 69 2d 31 3b       last = i-1;
7e90: 0a 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20  .      }else{.  
7ea0: 20 20 20 20 20 20 66 69 72 73 74 20 3d 20 69 2b        first = i+
7eb0: 31 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 7d  1;.      }.    }
7ec0: 0a 20 20 7d 0a 20 20 72 65 74 75 72 6e 20 22 61  .  }.  return "a
7ed0: 70 70 6c 69 63 61 74 69 6f 6e 2f 6f 63 74 65 74  pplication/octet
7ee0: 2d 73 74 72 65 61 6d 22 3b 0a 7d 0a 0a 2f 2a 0a  -stream";.}../*.
7ef0: 2a 2a 20 54 68 65 20 66 6f 6c 6c 6f 77 69 6e 67  ** The following
7f00: 20 74 61 62 6c 65 20 63 6f 6e 74 61 69 6e 73 20   table contains 
7f10: 31 20 66 6f 72 20 61 6c 6c 20 63 68 61 72 61 63  1 for all charac
7f20: 74 65 72 73 20 74 68 61 74 20 61 72 65 20 70 65  ters that are pe
7f30: 72 6d 69 74 74 65 64 20 69 6e 0a 2a 2a 20 74 68  rmitted in.** th
7f40: 65 20 70 61 72 74 20 6f 66 20 74 68 65 20 55 52  e part of the UR
7f50: 4c 20 62 65 66 6f 72 65 20 74 68 65 20 71 75 65  L before the que
7f60: 72 79 20 70 61 72 61 6d 65 74 65 72 73 20 61 6e  ry parameters an
7f70: 64 20 66 72 61 67 6d 65 6e 74 2e 0a 2a 2a 0a 2a  d fragment..**.*
7f80: 2a 20 41 6c 6c 6f 77 65 64 20 63 68 61 72 61 63  * Allowed charac
7f90: 74 65 72 73 3a 20 20 30 2d 39 20 61 2d 7a 20 41  ters:  0-9 a-z A
7fa0: 2d 5a 20 2c 2d 2e 2f 3a 5f 7e 0a 2a 2a 0a 2a 2a  -Z ,-./:_~.**.**
7fb0: 20 44 69 73 61 6c 6c 6f 77 65 64 20 63 68 61 72   Disallowed char
7fc0: 61 63 74 65 72 73 20 69 6e 63 6c 75 64 65 3a 20  acters include: 
7fd0: 20 21 22 23 24 25 26 27 28 29 2a 2b 3b 3c 3d 3e   !"#$%&'()*+;<=>
7fe0: 3f 5b 5c 5d 5e 7b 7c 7d 0a 2a 2f 0a 73 74 61 74  ?[\]^{|}.*/.stat
7ff0: 69 63 20 63 6f 6e 73 74 20 63 68 61 72 20 61 6c  ic const char al
8000: 6c 6f 77 65 64 49 6e 4e 61 6d 65 5b 5d 20 3d 20  lowedInName[] = 
8010: 7b 0a 20 20 20 20 20 20 2f 2a 20 20 78 30 20 20  {.      /*  x0  
8020: 78 31 20 20 78 32 20 20 78 33 20 20 78 34 20 20  x1  x2  x3  x4  
8030: 78 35 20 20 78 36 20 20 78 37 20 20 78 38 20 20  x5  x6  x7  x8  
8040: 78 39 20 20 78 61 20 20 78 62 20 20 78 63 20 20  x9  xa  xb  xc  
8050: 78 64 20 20 78 65 20 20 78 66 20 2a 2f 0a 2f 2a  xd  xe  xf */./*
8060: 20 30 78 20 2a 2f 20 20 20 30 2c 20 20 30 2c 20   0x */   0,  0, 
8070: 20 30 2c 20 20 30 2c 20 20 30 2c 20 20 30 2c 20   0,  0,  0,  0, 
8080: 20 30 2c 20 20 30 2c 20 20 30 2c 20 20 30 2c 20   0,  0,  0,  0, 
8090: 20 30 2c 20 20 30 2c 20 20 30 2c 20 20 30 2c 20   0,  0,  0,  0, 
80a0: 20 30 2c 20 20 30 2c 0a 2f 2a 20 31 78 20 2a 2f   0,  0,./* 1x */
80b0: 20 20 20 30 2c 20 20 30 2c 20 20 30 2c 20 20 30     0,  0,  0,  0
80c0: 2c 20 20 30 2c 20 20 30 2c 20 20 30 2c 20 20 30  ,  0,  0,  0,  0
80d0: 2c 20 20 30 2c 20 20 30 2c 20 20 30 2c 20 20 30  ,  0,  0,  0,  0
80e0: 2c 20 20 30 2c 20 20 30 2c 20 20 30 2c 20 20 30  ,  0,  0,  0,  0
80f0: 2c 0a 2f 2a 20 32 78 20 2a 2f 20 20 20 30 2c 20  ,./* 2x */   0, 
8100: 20 30 2c 20 20 30 2c 20 20 30 2c 20 20 30 2c 20   0,  0,  0,  0, 
8110: 20 30 2c 20 20 30 2c 20 20 30 2c 20 20 30 2c 20   0,  0,  0,  0, 
8120: 20 30 2c 20 20 30 2c 20 20 30 2c 20 20 31 2c 20   0,  0,  0,  1, 
8130: 20 31 2c 20 20 31 2c 20 20 31 2c 0a 2f 2a 20 33   1,  1,  1,./* 3
8140: 78 20 2a 2f 20 20 20 31 2c 20 20 31 2c 20 20 31  x */   1,  1,  1
8150: 2c 20 20 31 2c 20 20 31 2c 20 20 31 2c 20 20 31  ,  1,  1,  1,  1
8160: 2c 20 20 31 2c 20 20 31 2c 20 20 31 2c 20 20 31  ,  1,  1,  1,  1
8170: 2c 20 20 30 2c 20 20 30 2c 20 20 30 2c 20 20 30  ,  0,  0,  0,  0
8180: 2c 20 20 30 2c 0a 2f 2a 20 34 78 20 2a 2f 20 20  ,  0,./* 4x */  
8190: 20 30 2c 20 20 31 2c 20 20 31 2c 20 20 31 2c 20   0,  1,  1,  1, 
81a0: 20 31 2c 20 20 31 2c 20 20 31 2c 20 20 31 2c 20   1,  1,  1,  1, 
81b0: 20 31 2c 20 20 31 2c 20 20 31 2c 20 20 31 2c 20   1,  1,  1,  1, 
81c0: 20 31 2c 20 20 31 2c 20 20 31 2c 20 20 31 2c 0a   1,  1,  1,  1,.
81d0: 2f 2a 20 35 78 20 2a 2f 20 20 20 31 2c 20 20 31  /* 5x */   1,  1
81e0: 2c 20 20 31 2c 20 20 31 2c 20 20 31 2c 20 20 31  ,  1,  1,  1,  1
81f0: 2c 20 20 31 2c 20 20 31 2c 20 20 31 2c 20 20 31  ,  1,  1,  1,  1
8200: 2c 20 20 31 2c 20 20 30 2c 20 20 30 2c 20 20 30  ,  1,  0,  0,  0
8210: 2c 20 20 30 2c 20 20 31 2c 0a 2f 2a 20 36 78 20  ,  0,  1,./* 6x 
8220: 2a 2f 20 20 20 30 2c 20 20 31 2c 20 20 31 2c 20  */   0,  1,  1, 
8230: 20 31 2c 20 20 31 2c 20 20 31 2c 20 20 31 2c 20   1,  1,  1,  1, 
8240: 20 31 2c 20 20 31 2c 20 20 31 2c 20 20 31 2c 20   1,  1,  1,  1, 
8250: 20 31 2c 20 20 31 2c 20 20 31 2c 20 20 31 2c 20   1,  1,  1,  1, 
8260: 20 31 2c 0a 2f 2a 20 37 78 20 2a 2f 20 20 20 31   1,./* 7x */   1
8270: 2c 20 20 31 2c 20 20 31 2c 20 20 31 2c 20 20 31  ,  1,  1,  1,  1
8280: 2c 20 20 31 2c 20 20 31 2c 20 20 31 2c 20 20 31  ,  1,  1,  1,  1
8290: 2c 20 20 31 2c 20 20 31 2c 20 20 30 2c 20 20 30  ,  1,  1,  0,  0
82a0: 2c 20 20 30 2c 20 20 31 2c 20 20 30 2c 0a 7d 3b  ,  0,  1,  0,.};
82b0: 0a 0a 2f 2a 0a 2a 2a 20 43 6f 75 6e 74 20 74 68  ../*.** Count th
82c0: 65 20 6e 75 6d 62 65 72 20 6f 66 20 22 2f 22 20  e number of "/" 
82d0: 63 68 61 72 61 63 74 65 72 73 20 69 6e 20 61 20  characters in a 
82e0: 73 74 72 69 6e 67 2e 0a 2a 2f 0a 73 74 61 74 69  string..*/.stati
82f0: 63 20 69 6e 74 20 63 6f 75 6e 74 53 6c 61 73 68  c int countSlash
8300: 65 73 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a  es(const char *z
8310: 29 7b 0a 20 20 69 6e 74 20 6e 20 3d 20 30 3b 0a  ){.  int n = 0;.
8320: 20 20 77 68 69 6c 65 28 20 2a 7a 20 29 20 69 66    while( *z ) if
8330: 28 20 2a 28 7a 2b 2b 29 3d 3d 27 2f 27 20 29 20  ( *(z++)=='/' ) 
8340: 6e 2b 2b 3b 0a 20 20 72 65 74 75 72 6e 20 6e 3b  n++;.  return n;
8350: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 69 73 20 72  .}../*.** This r
8360: 6f 75 74 69 6e 65 20 70 72 6f 63 65 73 73 65 73  outine processes
8370: 20 61 20 73 69 6e 67 6c 65 20 48 54 54 50 20 72   a single HTTP r
8380: 65 71 75 65 73 74 20 6f 6e 20 73 74 61 6e 64 61  equest on standa
8390: 72 64 20 69 6e 70 75 74 20 61 6e 64 0a 2a 2a 20  rd input and.** 
83a0: 73 65 6e 64 73 20 74 68 65 20 72 65 70 6c 79 20  sends the reply 
83b0: 74 6f 20 73 74 61 6e 64 61 72 64 20 6f 75 74 70  to standard outp
83c0: 75 74 2e 20 20 49 66 20 74 68 65 20 61 72 67 75  ut.  If the argu
83d0: 6d 65 6e 74 20 69 73 20 31 20 69 74 20 6d 65 61  ment is 1 it mea
83e0: 6e 73 0a 2a 2a 20 74 68 61 74 20 77 65 20 61 72  ns.** that we ar
83f0: 65 20 73 68 6f 75 6c 64 20 63 6c 6f 73 65 20 74  e should close t
8400: 68 65 20 73 6f 63 6b 65 74 20 77 69 74 68 6f 75  he socket withou
8410: 74 20 70 72 6f 63 65 73 73 69 6e 67 20 61 64 64  t processing add
8420: 69 74 69 6f 6e 61 6c 0a 2a 2a 20 48 54 54 50 20  itional.** HTTP 
8430: 72 65 71 75 65 73 74 73 20 61 66 74 65 72 20 74  requests after t
8440: 68 65 20 63 75 72 72 65 6e 74 20 72 65 71 75 65  he current reque
8450: 73 74 20 66 69 6e 69 73 68 65 73 2e 20 20 30 20  st finishes.  0 
8460: 6d 65 61 6e 73 20 77 65 20 61 72 65 0a 2a 2a 20  means we are.** 
8470: 61 6c 6c 6f 77 65 64 20 74 6f 20 6b 65 65 70 20  allowed to keep 
8480: 74 68 65 20 63 6f 6e 6e 65 63 74 69 6f 6e 20 6f  the connection o
8490: 70 65 6e 20 61 6e 64 20 74 6f 20 70 72 6f 63 65  pen and to proce
84a0: 73 73 20 61 64 64 69 74 69 6f 6e 61 6c 20 72 65  ss additional re
84b0: 71 75 65 73 74 73 2e 0a 2a 2a 20 54 68 69 73 20  quests..** This 
84c0: 72 6f 75 74 69 6e 65 20 6d 61 79 20 63 68 6f 6f  routine may choo
84d0: 73 65 20 74 6f 20 63 6c 6f 73 65 20 74 68 65 20  se to close the 
84e0: 63 6f 6e 6e 65 63 74 69 6f 6e 20 65 76 65 6e 20  connection even 
84f0: 69 66 20 74 68 65 20 61 72 67 75 6d 65 6e 74 0a  if the argument.
8500: 2a 2a 20 69 73 20 30 2e 0a 2a 2a 20 0a 2a 2a 20  ** is 0..** .** 
8510: 49 66 20 74 68 65 20 63 6f 6e 6e 65 63 74 69 6f  If the connectio
8520: 6e 20 73 68 6f 75 6c 64 20 62 65 20 63 6c 6f 73  n should be clos
8530: 65 64 2c 20 74 68 69 73 20 72 6f 75 74 69 6e 65  ed, this routine
8540: 20 63 61 6c 6c 73 20 65 78 69 74 28 29 20 61 6e   calls exit() an
8550: 64 0a 2a 2a 20 74 68 75 73 20 6e 65 76 65 72 20  d.** thus never 
8560: 72 65 74 75 72 6e 73 2e 20 20 49 66 20 74 68 69  returns.  If thi
8570: 73 20 72 6f 75 74 69 6e 65 20 64 6f 65 73 20 72  s routine does r
8580: 65 74 75 72 6e 20 69 74 20 6d 65 61 6e 73 20 74  eturn it means t
8590: 68 61 74 20 61 6e 6f 74 68 65 72 0a 2a 2a 20 48  hat another.** H
85a0: 54 54 50 20 72 65 71 75 65 73 74 20 6d 61 79 20  TTP request may 
85b0: 61 70 70 65 61 72 20 6f 6e 20 74 68 65 20 77 69  appear on the wi
85c0: 72 65 2e 0a 2a 2f 0a 76 6f 69 64 20 50 72 6f 63  re..*/.void Proc
85d0: 65 73 73 4f 6e 65 52 65 71 75 65 73 74 28 69 6e  essOneRequest(in
85e0: 74 20 66 6f 72 63 65 43 6c 6f 73 65 29 7b 0a 20  t forceClose){. 
85f0: 20 69 6e 74 20 69 2c 20 63 3b 0a 20 20 63 68 61   int i, c;.  cha
8600: 72 20 2a 7a 3b 20 20 20 20 20 20 20 20 20 20 20  r *z;           
8610: 20 20 20 20 20 20 20 2f 2a 20 55 73 65 64 20 74         /* Used t
8620: 6f 20 70 61 72 73 65 20 75 70 20 61 20 73 74 72  o parse up a str
8630: 69 6e 67 20 2a 2f 0a 20 20 73 74 72 75 63 74 20  ing */.  struct 
8640: 73 74 61 74 20 73 74 61 74 62 75 66 3b 20 20 20  stat statbuf;   
8650: 20 20 20 2f 2a 20 49 6e 66 6f 72 6d 61 74 69 6f     /* Informatio
8660: 6e 20 61 62 6f 75 74 20 74 68 65 20 66 69 6c 65  n about the file
8670: 20 74 6f 20 62 65 20 72 65 74 72 69 65 76 65 64   to be retrieved
8680: 20 2a 2f 0a 20 20 46 49 4c 45 20 2a 69 6e 3b 20   */.  FILE *in; 
8690: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
86a0: 2f 2a 20 46 6f 72 20 72 65 61 64 69 6e 67 20 66  /* For reading f
86b0: 72 6f 6d 20 43 47 49 20 73 63 72 69 70 74 73 20  rom CGI scripts 
86c0: 2a 2f 0a 20 20 63 68 61 72 20 7a 4c 69 6e 65 5b  */.  char zLine[
86d0: 31 30 30 30 5d 3b 20 20 20 20 20 20 20 20 20 2f  1000];         /
86e0: 2a 20 41 20 62 75 66 66 65 72 20 66 6f 72 20 69  * A buffer for i
86f0: 6e 70 75 74 20 6c 69 6e 65 73 20 6f 72 20 66 6f  nput lines or fo
8700: 72 6d 69 6e 67 20 6e 61 6d 65 73 20 2a 2f 0a 0a  rming names */..
8710: 20 20 2f 2a 20 43 68 61 6e 67 65 20 64 69 72 65    /* Change dire
8720: 63 74 6f 72 69 65 73 20 74 6f 20 74 68 65 20 72  ctories to the r
8730: 6f 6f 74 20 6f 66 20 74 68 65 20 48 54 54 50 20  oot of the HTTP 
8740: 66 69 6c 65 73 79 73 74 65 6d 0a 20 20 2a 2f 0a  filesystem.  */.
8750: 20 20 69 66 28 20 63 68 64 69 72 28 7a 52 6f 6f    if( chdir(zRoo
8760: 74 5b 30 5d 20 3f 20 7a 52 6f 6f 74 20 3a 20 22  t[0] ? zRoot : "
8770: 2f 22 29 21 3d 30 20 29 7b 0a 20 20 20 20 63 68  /")!=0 ){.    ch
8780: 61 72 20 7a 42 75 66 5b 31 30 30 30 5d 3b 0a 20  ar zBuf[1000];. 
8790: 20 20 20 4d 61 6c 66 75 6e 63 74 69 6f 6e 28 5f     Malfunction(_
87a0: 5f 4c 49 4e 45 5f 5f 2c 20 22 63 61 6e 6e 6f 74  _LINE__, "cannot
87b0: 20 63 68 64 69 72 20 74 6f 20 5b 25 73 5d 20 66   chdir to [%s] f
87c0: 72 6f 6d 20 5b 25 73 5d 22 2c 0a 20 20 20 20 20  rom [%s]",.     
87d0: 20 20 20 20 7a 52 6f 6f 74 2c 20 67 65 74 63 77      zRoot, getcw
87e0: 64 28 7a 42 75 66 2c 39 39 39 29 29 3b 0a 20 20  d(zBuf,999));.  
87f0: 7d 0a 20 20 6e 52 65 71 75 65 73 74 2b 2b 3b 0a  }.  nRequest++;.
8800: 0a 20 20 2f 2a 0a 20 20 2a 2a 20 57 65 20 6d 75  .  /*.  ** We mu
8810: 73 74 20 72 65 63 65 69 76 65 20 61 20 63 6f 6d  st receive a com
8820: 70 6c 65 74 65 20 68 65 61 64 65 72 20 77 69 74  plete header wit
8830: 68 69 6e 20 31 35 20 73 65 63 6f 6e 64 73 0a 20  hin 15 seconds. 
8840: 20 2a 2f 0a 20 20 73 69 67 6e 61 6c 28 53 49 47   */.  signal(SIG
8850: 41 4c 52 4d 2c 20 54 69 6d 65 6f 75 74 29 3b 0a  ALRM, Timeout);.
8860: 20 20 73 69 67 6e 61 6c 28 53 49 47 53 45 47 56    signal(SIGSEGV
8870: 2c 20 54 69 6d 65 6f 75 74 29 3b 0a 20 20 73 69  , Timeout);.  si
8880: 67 6e 61 6c 28 53 49 47 50 49 50 45 2c 20 54 69  gnal(SIGPIPE, Ti
8890: 6d 65 6f 75 74 29 3b 0a 20 20 69 66 28 20 75 73  meout);.  if( us
88a0: 65 54 69 6d 65 6f 75 74 20 29 20 61 6c 61 72 6d  eTimeout ) alarm
88b0: 28 31 35 29 3b 0a 0a 20 20 2f 2a 20 47 65 74 20  (15);..  /* Get 
88c0: 74 68 65 20 66 69 72 73 74 20 6c 69 6e 65 20 6f  the first line o
88d0: 66 20 74 68 65 20 72 65 71 75 65 73 74 20 61 6e  f the request an
88e0: 64 20 70 61 72 73 65 20 6f 75 74 20 74 68 65 0a  d parse out the.
88f0: 20 20 2a 2a 20 6d 65 74 68 6f 64 2c 20 74 68 65    ** method, the
8900: 20 73 63 72 69 70 74 20 61 6e 64 20 74 68 65 20   script and the 
8910: 70 72 6f 74 6f 63 6f 6c 2e 0a 20 20 2a 2f 0a 20  protocol..  */. 
8920: 20 69 66 28 20 66 67 65 74 73 28 7a 4c 69 6e 65   if( fgets(zLine
8930: 2c 73 69 7a 65 6f 66 28 7a 4c 69 6e 65 29 2c 73  ,sizeof(zLine),s
8940: 74 64 69 6e 29 3d 3d 30 20 29 7b 0a 20 20 20 20  tdin)==0 ){.    
8950: 65 78 69 74 28 30 29 3b 0a 20 20 7d 0a 20 20 6f  exit(0);.  }.  o
8960: 6d 69 74 4c 6f 67 20 3d 20 30 3b 0a 20 20 6e 49  mitLog = 0;.  nI
8970: 6e 20 2b 3d 20 73 74 72 6c 65 6e 28 7a 4c 69 6e  n += strlen(zLin
8980: 65 29 3b 0a 20 20 7a 4d 65 74 68 6f 64 20 3d 20  e);.  zMethod = 
8990: 53 74 72 44 75 70 28 47 65 74 46 69 72 73 74 45  StrDup(GetFirstE
89a0: 6c 65 6d 65 6e 74 28 7a 4c 69 6e 65 2c 26 7a 29  lement(zLine,&z)
89b0: 29 3b 0a 20 20 7a 52 65 61 6c 53 63 72 69 70 74  );.  zRealScript
89c0: 20 3d 20 7a 53 63 72 69 70 74 20 3d 20 53 74 72   = zScript = Str
89d0: 44 75 70 28 47 65 74 46 69 72 73 74 45 6c 65 6d  Dup(GetFirstElem
89e0: 65 6e 74 28 7a 2c 26 7a 29 29 3b 0a 20 20 7a 50  ent(z,&z));.  zP
89f0: 72 6f 74 6f 63 6f 6c 20 3d 20 53 74 72 44 75 70  rotocol = StrDup
8a00: 28 47 65 74 46 69 72 73 74 45 6c 65 6d 65 6e 74  (GetFirstElement
8a10: 28 7a 2c 26 7a 29 29 3b 0a 20 20 69 66 28 20 7a  (z,&z));.  if( z
8a20: 50 72 6f 74 6f 63 6f 6c 3d 3d 30 20 7c 7c 20 73  Protocol==0 || s
8a30: 74 72 6e 63 6d 70 28 7a 50 72 6f 74 6f 63 6f 6c  trncmp(zProtocol
8a40: 2c 22 48 54 54 50 2f 22 2c 35 29 21 3d 30 20 7c  ,"HTTP/",5)!=0 |
8a50: 7c 20 73 74 72 6c 65 6e 28 7a 50 72 6f 74 6f 63  | strlen(zProtoc
8a60: 6f 6c 29 21 3d 38 20 29 7b 0a 20 20 20 20 53 74  ol)!=8 ){.    St
8a70: 61 72 74 52 65 73 70 6f 6e 73 65 28 22 34 30 30  artResponse("400
8a80: 20 42 61 64 20 52 65 71 75 65 73 74 22 29 3b 0a   Bad Request");.
8a90: 20 20 20 20 6e 4f 75 74 20 2b 3d 20 70 72 69 6e      nOut += prin
8aa0: 74 66 28 0a 20 20 20 20 20 20 22 43 6f 6e 74 65  tf(.      "Conte
8ab0: 6e 74 2d 74 79 70 65 3a 20 74 65 78 74 2f 70 6c  nt-type: text/pl
8ac0: 61 69 6e 5c 72 5c 6e 22 0a 20 20 20 20 20 20 22  ain\r\n".      "
8ad0: 5c 72 5c 6e 22 0a 20 20 20 20 20 20 22 54 68 69  \r\n".      "Thi
8ae0: 73 20 73 65 72 76 65 72 20 64 6f 65 73 20 6e 6f  s server does no
8af0: 74 20 75 6e 64 65 72 73 74 61 6e 64 20 74 68 65  t understand the
8b00: 20 72 65 71 75 65 73 74 65 64 20 70 72 6f 74 6f   requested proto
8b10: 63 6f 6c 5c 6e 22 0a 20 20 20 20 29 3b 0a 20 20  col\n".    );.  
8b20: 20 20 4d 61 6b 65 4c 6f 67 45 6e 74 72 79 28 30    MakeLogEntry(0
8b30: 29 3b 0a 20 20 20 20 65 78 69 74 28 30 29 3b 0a  );.    exit(0);.
8b40: 20 20 7d 0a 20 20 69 66 28 20 7a 53 63 72 69 70    }.  if( zScrip
8b50: 74 5b 30 5d 3d 3d 30 20 29 20 4e 6f 74 46 6f 75  t[0]==0 ) NotFou
8b60: 6e 64 28 5f 5f 4c 49 4e 45 5f 5f 29 3b 0a 20 20  nd(__LINE__);.  
8b70: 69 66 28 20 66 6f 72 63 65 43 6c 6f 73 65 20 29  if( forceClose )
8b80: 7b 0a 20 20 20 20 63 6c 6f 73 65 43 6f 6e 6e 65  {.    closeConne
8b90: 63 74 69 6f 6e 20 3d 20 31 3b 0a 20 20 7d 65 6c  ction = 1;.  }el
8ba0: 73 65 20 69 66 28 20 7a 50 72 6f 74 6f 63 6f 6c  se if( zProtocol
8bb0: 5b 35 5d 3c 27 31 27 20 7c 7c 20 7a 50 72 6f 74  [5]<'1' || zProt
8bc0: 6f 63 6f 6c 5b 37 5d 3c 27 31 27 20 29 7b 0a 20  ocol[7]<'1' ){. 
8bd0: 20 20 20 63 6c 6f 73 65 43 6f 6e 6e 65 63 74 69     closeConnecti
8be0: 6f 6e 20 3d 20 31 3b 0a 20 20 7d 0a 0a 20 20 2f  on = 1;.  }..  /
8bf0: 2a 20 54 68 69 73 20 76 65 72 79 20 73 69 6d 70  * This very simp
8c00: 6c 65 20 73 65 72 76 65 72 20 6f 6e 6c 79 20 75  le server only u
8c10: 6e 64 65 72 73 74 61 6e 64 73 20 74 68 65 20 47  nderstands the G
8c20: 45 54 2c 20 50 4f 53 54 0a 20 20 2a 2a 20 61 6e  ET, POST.  ** an
8c30: 64 20 48 45 41 44 20 6d 65 74 68 6f 64 73 0a 20  d HEAD methods. 
8c40: 20 2a 2f 0a 20 20 69 66 28 20 73 74 72 63 6d 70   */.  if( strcmp
8c50: 28 7a 4d 65 74 68 6f 64 2c 22 47 45 54 22 29 21  (zMethod,"GET")!
8c60: 3d 30 20 26 26 20 73 74 72 63 6d 70 28 7a 4d 65  =0 && strcmp(zMe
8c70: 74 68 6f 64 2c 22 50 4f 53 54 22 29 21 3d 30 0a  thod,"POST")!=0.
8c80: 20 20 20 20 20 20 20 26 26 20 73 74 72 63 6d 70         && strcmp
8c90: 28 7a 4d 65 74 68 6f 64 2c 22 48 45 41 44 22 29  (zMethod,"HEAD")
8ca0: 21 3d 30 20 29 7b 0a 20 20 20 20 53 74 61 72 74  !=0 ){.    Start
8cb0: 52 65 73 70 6f 6e 73 65 28 22 35 30 31 20 4e 6f  Response("501 No
8cc0: 74 20 49 6d 70 6c 65 6d 65 6e 74 65 64 22 29 3b  t Implemented");
8cd0: 0a 20 20 20 20 6e 4f 75 74 20 2b 3d 20 70 72 69  .    nOut += pri
8ce0: 6e 74 66 28 0a 20 20 20 20 20 20 22 43 6f 6e 74  ntf(.      "Cont
8cf0: 65 6e 74 2d 74 79 70 65 3a 20 74 65 78 74 2f 70  ent-type: text/p
8d00: 6c 61 69 6e 5c 72 5c 6e 22 0a 20 20 20 20 20 20  lain\r\n".      
8d10: 22 5c 72 5c 6e 22 0a 20 20 20 20 20 20 22 54 68  "\r\n".      "Th
8d20: 65 20 25 73 20 6d 65 74 68 6f 64 20 69 73 20 6e  e %s method is n
8d30: 6f 74 20 69 6d 70 6c 65 6d 65 6e 74 65 64 20 6f  ot implemented o
8d40: 6e 20 74 68 69 73 20 73 65 72 76 65 72 2e 5c 6e  n this server.\n
8d50: 22 2c 0a 20 20 20 20 20 20 7a 4d 65 74 68 6f 64  ",.      zMethod
8d60: 29 3b 0a 20 20 20 20 4d 61 6b 65 4c 6f 67 45 6e  );.    MakeLogEn
8d70: 74 72 79 28 30 29 3b 0a 20 20 20 20 65 78 69 74  try(0);.    exit
8d80: 28 30 29 3b 0a 20 20 7d 0a 0a 20 20 2f 2a 20 47  (0);.  }..  /* G
8d90: 65 74 20 61 6c 6c 20 74 68 65 20 6f 70 74 69 6f  et all the optio
8da0: 6e 61 6c 20 66 69 65 6c 64 73 20 74 68 61 74 20  nal fields that 
8db0: 66 6f 6c 6c 6f 77 20 74 68 65 20 66 69 72 73 74  follow the first
8dc0: 20 6c 69 6e 65 2e 0a 20 20 2a 2f 0a 20 20 7a 43   line..  */.  zC
8dd0: 6f 6f 6b 69 65 20 3d 20 30 3b 0a 20 20 7a 41 75  ookie = 0;.  zAu
8de0: 74 68 54 79 70 65 20 3d 20 30 3b 0a 20 20 7a 52  thType = 0;.  zR
8df0: 65 6d 6f 74 65 55 73 65 72 20 3d 20 30 3b 0a 20  emoteUser = 0;. 
8e00: 20 7a 52 65 66 65 72 65 72 20 3d 20 30 3b 0a 20   zReferer = 0;. 
8e10: 20 77 68 69 6c 65 28 20 66 67 65 74 73 28 7a 4c   while( fgets(zL
8e20: 69 6e 65 2c 73 69 7a 65 6f 66 28 7a 4c 69 6e 65  ine,sizeof(zLine
8e30: 29 2c 73 74 64 69 6e 29 20 29 7b 0a 20 20 20 20  ),stdin) ){.    
8e40: 63 68 61 72 20 2a 7a 46 69 65 6c 64 4e 61 6d 65  char *zFieldName
8e50: 3b 0a 20 20 20 20 63 68 61 72 20 2a 7a 56 61 6c  ;.    char *zVal
8e60: 3b 0a 0a 20 20 20 20 6e 49 6e 20 2b 3d 20 73 74  ;..    nIn += st
8e70: 72 6c 65 6e 28 7a 4c 69 6e 65 29 3b 0a 20 20 20  rlen(zLine);.   
8e80: 20 7a 46 69 65 6c 64 4e 61 6d 65 20 3d 20 47 65   zFieldName = Ge
8e90: 74 46 69 72 73 74 45 6c 65 6d 65 6e 74 28 7a 4c  tFirstElement(zL
8ea0: 69 6e 65 2c 26 7a 56 61 6c 29 3b 0a 20 20 20 20  ine,&zVal);.    
8eb0: 69 66 28 20 7a 46 69 65 6c 64 4e 61 6d 65 3d 3d  if( zFieldName==
8ec0: 30 20 7c 7c 20 2a 7a 46 69 65 6c 64 4e 61 6d 65  0 || *zFieldName
8ed0: 3d 3d 30 20 29 20 62 72 65 61 6b 3b 0a 20 20 20  ==0 ) break;.   
8ee0: 20 52 65 6d 6f 76 65 4e 65 77 6c 69 6e 65 28 7a   RemoveNewline(z
8ef0: 56 61 6c 29 3b 0a 20 20 20 20 69 66 28 20 73 74  Val);.    if( st
8f00: 72 63 61 73 65 63 6d 70 28 7a 46 69 65 6c 64 4e  rcasecmp(zFieldN
8f10: 61 6d 65 2c 22 55 73 65 72 2d 41 67 65 6e 74 3a  ame,"User-Agent:
8f20: 22 29 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 7a  ")==0 ){.      z
8f30: 41 67 65 6e 74 20 3d 20 53 74 72 44 75 70 28 7a  Agent = StrDup(z
8f40: 56 61 6c 29 3b 0a 20 20 20 20 7d 65 6c 73 65 20  Val);.    }else 
8f50: 69 66 28 20 73 74 72 63 61 73 65 63 6d 70 28 7a  if( strcasecmp(z
8f60: 46 69 65 6c 64 4e 61 6d 65 2c 22 41 63 63 65 70  FieldName,"Accep
8f70: 74 3a 22 29 3d 3d 30 20 29 7b 0a 20 20 20 20 20  t:")==0 ){.     
8f80: 20 7a 41 63 63 65 70 74 20 3d 20 53 74 72 44 75   zAccept = StrDu
8f90: 70 28 7a 56 61 6c 29 3b 0a 20 20 20 20 7d 65 6c  p(zVal);.    }el
8fa0: 73 65 20 69 66 28 20 73 74 72 63 61 73 65 63 6d  se if( strcasecm
8fb0: 70 28 7a 46 69 65 6c 64 4e 61 6d 65 2c 22 43 6f  p(zFieldName,"Co
8fc0: 6e 74 65 6e 74 2d 6c 65 6e 67 74 68 3a 22 29 3d  ntent-length:")=
8fd0: 3d 30 20 29 7b 0a 20 20 20 20 20 20 7a 43 6f 6e  =0 ){.      zCon
8fe0: 74 65 6e 74 4c 65 6e 67 74 68 20 3d 20 53 74 72  tentLength = Str
8ff0: 44 75 70 28 7a 56 61 6c 29 3b 0a 20 20 20 20 7d  Dup(zVal);.    }
9000: 65 6c 73 65 20 69 66 28 20 73 74 72 63 61 73 65  else if( strcase
9010: 63 6d 70 28 7a 46 69 65 6c 64 4e 61 6d 65 2c 22  cmp(zFieldName,"
9020: 43 6f 6e 74 65 6e 74 2d 74 79 70 65 3a 22 29 3d  Content-type:")=
9030: 3d 30 20 29 7b 0a 20 20 20 20 20 20 7a 43 6f 6e  =0 ){.      zCon
9040: 74 65 6e 74 54 79 70 65 20 3d 20 53 74 72 44 75  tentType = StrDu
9050: 70 28 7a 56 61 6c 29 3b 0a 20 20 20 20 7d 65 6c  p(zVal);.    }el
9060: 73 65 20 69 66 28 20 73 74 72 63 61 73 65 63 6d  se if( strcasecm
9070: 70 28 7a 46 69 65 6c 64 4e 61 6d 65 2c 22 52 65  p(zFieldName,"Re
9080: 66 65 72 65 72 3a 22 29 3d 3d 30 20 29 7b 0a 20  ferer:")==0 ){. 
9090: 20 20 20 20 20 7a 52 65 66 65 72 65 72 20 3d 20       zReferer = 
90a0: 53 74 72 44 75 70 28 7a 56 61 6c 29 3b 0a 20 20  StrDup(zVal);.  
90b0: 20 20 7d 65 6c 73 65 20 69 66 28 20 73 74 72 63    }else if( strc
90c0: 61 73 65 63 6d 70 28 7a 46 69 65 6c 64 4e 61 6d  asecmp(zFieldNam
90d0: 65 2c 22 43 6f 6f 6b 69 65 3a 22 29 3d 3d 30 20  e,"Cookie:")==0 
90e0: 29 7b 0a 20 20 20 20 20 20 7a 43 6f 6f 6b 69 65  ){.      zCookie
90f0: 20 3d 20 53 74 72 41 70 70 65 6e 64 28 7a 43 6f   = StrAppend(zCo
9100: 6f 6b 69 65 2c 22 3b 20 22 2c 7a 56 61 6c 29 3b  okie,"; ",zVal);
9110: 0a 20 20 20 20 7d 65 6c 73 65 20 69 66 28 20 73  .    }else if( s
9120: 74 72 63 61 73 65 63 6d 70 28 7a 46 69 65 6c 64  trcasecmp(zField
9130: 4e 61 6d 65 2c 22 43 6f 6e 6e 65 63 74 69 6f 6e  Name,"Connection
9140: 3a 22 29 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20  :")==0 ){.      
9150: 69 66 28 20 73 74 72 63 61 73 65 63 6d 70 28 7a  if( strcasecmp(z
9160: 56 61 6c 2c 22 63 6c 6f 73 65 22 29 3d 3d 30 20  Val,"close")==0 
9170: 29 7b 0a 20 20 20 20 20 20 20 20 63 6c 6f 73 65  ){.        close
9180: 43 6f 6e 6e 65 63 74 69 6f 6e 20 3d 20 31 3b 0a  Connection = 1;.
9190: 20 20 20 20 20 20 7d 65 6c 73 65 20 69 66 28 20        }else if( 
91a0: 21 66 6f 72 63 65 43 6c 6f 73 65 20 26 26 20 73  !forceClose && s
91b0: 74 72 63 61 73 65 63 6d 70 28 7a 56 61 6c 2c 20  trcasecmp(zVal, 
91c0: 22 6b 65 65 70 2d 61 6c 69 76 65 22 29 3d 3d 30  "keep-alive")==0
91d0: 20 29 7b 0a 20 20 20 20 20 20 20 20 63 6c 6f 73   ){.        clos
91e0: 65 43 6f 6e 6e 65 63 74 69 6f 6e 20 3d 20 30 3b  eConnection = 0;
91f0: 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 7d 65 6c  .      }.    }el
9200: 73 65 20 69 66 28 20 73 74 72 63 61 73 65 63 6d  se if( strcasecm
9210: 70 28 7a 46 69 65 6c 64 4e 61 6d 65 2c 22 48 6f  p(zFieldName,"Ho
9220: 73 74 3a 22 29 3d 3d 30 20 29 7b 0a 20 20 20 20  st:")==0 ){.    
9230: 20 20 69 6e 74 20 69 6e 53 71 75 61 72 65 20 3d    int inSquare =
9240: 20 30 3b 0a 20 20 20 20 20 20 63 68 61 72 20 63   0;.      char c
9250: 3b 0a 20 20 20 20 20 20 7a 48 74 74 70 48 6f 73  ;.      zHttpHos
9260: 74 20 3d 20 53 74 72 44 75 70 28 7a 56 61 6c 29  t = StrDup(zVal)
9270: 3b 0a 20 20 20 20 20 20 7a 53 65 72 76 65 72 50  ;.      zServerP
9280: 6f 72 74 20 3d 20 7a 53 65 72 76 65 72 4e 61 6d  ort = zServerNam
9290: 65 20 3d 20 53 74 72 44 75 70 28 7a 48 74 74 70  e = StrDup(zHttp
92a0: 48 6f 73 74 29 3b 0a 20 20 20 20 20 20 77 68 69  Host);.      whi
92b0: 6c 65 28 20 7a 53 65 72 76 65 72 50 6f 72 74 20  le( zServerPort 
92c0: 26 26 20 28 63 20 3d 20 2a 7a 53 65 72 76 65 72  && (c = *zServer
92d0: 50 6f 72 74 29 21 3d 30 0a 20 20 20 20 20 20 20  Port)!=0.       
92e0: 20 20 20 20 20 20 20 26 26 20 28 63 21 3d 27 3a         && (c!=':
92f0: 27 20 7c 7c 20 69 6e 53 71 75 61 72 65 29 20 29  ' || inSquare) )
9300: 7b 0a 20 20 20 20 20 20 20 20 69 66 28 20 63 3d  {.        if( c=
9310: 3d 27 5b 27 20 29 20 69 6e 53 71 75 61 72 65 20  ='[' ) inSquare 
9320: 3d 20 31 3b 0a 20 20 20 20 20 20 20 20 69 66 28  = 1;.        if(
9330: 20 63 3d 3d 27 5d 27 20 29 20 69 6e 53 71 75 61   c==']' ) inSqua
9340: 72 65 20 3d 20 30 3b 0a 20 20 20 20 20 20 20 20  re = 0;.        
9350: 7a 53 65 72 76 65 72 50 6f 72 74 2b 2b 3b 0a 20  zServerPort++;. 
9360: 20 20 20 20 20 7d 0a 20 20 20 20 20 20 69 66 28       }.      if(
9370: 20 7a 53 65 72 76 65 72 50 6f 72 74 20 26 26 20   zServerPort && 
9380: 2a 7a 53 65 72 76 65 72 50 6f 72 74 20 29 7b 0a  *zServerPort ){.
9390: 20 20 20 20 20 20 20 20 2a 7a 53 65 72 76 65 72          *zServer
93a0: 50 6f 72 74 20 3d 20 30 3b 0a 20 20 20 20 20 20  Port = 0;.      
93b0: 20 20 7a 53 65 72 76 65 72 50 6f 72 74 2b 2b 3b    zServerPort++;
93c0: 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 69  .      }.      i
93d0: 66 28 20 7a 52 65 61 6c 50 6f 72 74 20 29 7b 0a  f( zRealPort ){.
93e0: 20 20 20 20 20 20 20 20 7a 53 65 72 76 65 72 50          zServerP
93f0: 6f 72 74 20 3d 20 53 74 72 44 75 70 28 7a 52 65  ort = StrDup(zRe
9400: 61 6c 50 6f 72 74 29 3b 0a 20 20 20 20 20 20 7d  alPort);.      }
9410: 0a 20 20 20 20 7d 65 6c 73 65 20 69 66 28 20 73  .    }else if( s
9420: 74 72 63 61 73 65 63 6d 70 28 7a 46 69 65 6c 64  trcasecmp(zField
9430: 4e 61 6d 65 2c 22 41 75 74 68 6f 72 69 7a 61 74  Name,"Authorizat
9440: 69 6f 6e 3a 22 29 3d 3d 30 20 29 7b 0a 20 20 20  ion:")==0 ){.   
9450: 20 20 20 7a 41 75 74 68 54 79 70 65 20 3d 20 47     zAuthType = G
9460: 65 74 46 69 72 73 74 45 6c 65 6d 65 6e 74 28 53  etFirstElement(S
9470: 74 72 44 75 70 28 7a 56 61 6c 29 2c 20 26 7a 41  trDup(zVal), &zA
9480: 75 74 68 41 72 67 29 3b 0a 20 20 20 20 7d 0a 20  uthArg);.    }. 
9490: 20 7d 0a 0a 20 20 2f 2a 20 44 69 73 61 6c 6c 6f   }..  /* Disallo
94a0: 77 20 72 65 66 65 72 72 69 6e 67 20 66 72 6f 6d  w referring from
94b0: 20 63 65 72 74 61 69 6e 20 63 6c 69 65 6e 74 73   certain clients
94c0: 20 2a 2f 0a 20 20 69 66 28 20 7a 41 67 65 6e 74   */.  if( zAgent
94d0: 20 29 7b 0a 20 20 20 20 69 66 28 20 73 74 72 73   ){.    if( strs
94e0: 74 72 28 7a 41 67 65 6e 74 2c 20 22 57 69 6e 64  tr(zAgent, "Wind
94f0: 6f 77 73 5f 39 22 29 21 3d 30 0a 20 20 20 20 20  ows_9")!=0.     
9500: 7c 7c 20 73 74 72 73 74 72 28 7a 41 67 65 6e 74  || strstr(zAgent
9510: 2c 20 22 44 6f 77 6e 6c 6f 61 64 5f 4d 61 73 74  , "Download_Mast
9520: 65 72 22 29 21 3d 30 0a 20 20 20 20 20 7c 7c 20  er")!=0.     || 
9530: 73 74 72 73 74 72 28 7a 41 67 65 6e 74 2c 20 22  strstr(zAgent, "
9540: 45 7a 6f 6f 6d 73 2f 22 29 21 3d 30 0a 20 20 20  Ezooms/")!=0.   
9550: 2f 2a 7c 7c 20 73 74 72 73 74 72 28 7a 41 67 65  /*|| strstr(zAge
9560: 6e 74 2c 20 22 62 69 6e 67 62 6f 74 22 29 21 3d  nt, "bingbot")!=
9570: 30 2a 2f 0a 20 20 20 20 20 7c 7c 20 73 74 72 73  0*/.     || strs
9580: 74 72 28 7a 41 67 65 6e 74 2c 20 22 41 68 72 65  tr(zAgent, "Ahre
9590: 66 73 42 6f 74 22 29 21 3d 30 0a 20 20 20 20 29  fsBot")!=0.    )
95a0: 7b 0a 20 20 20 20 20 20 46 6f 72 62 69 64 64 65  {.      Forbidde
95b0: 6e 28 29 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 23  n();.    }.  }.#
95c0: 69 66 20 30 0a 20 20 69 66 28 20 7a 52 65 66 65  if 0.  if( zRefe
95d0: 72 65 72 20 29 7b 0a 20 20 20 20 73 74 61 74 69  rer ){.    stati
95e0: 63 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 61 7a  c const char *az
95f0: 44 69 73 61 6c 6c 6f 77 5b 5d 20 3d 20 7b 0a 20  Disallow[] = {. 
9600: 20 20 20 20 20 22 73 6b 69 64 72 6f 77 63 72 61       "skidrowcra
9610: 63 6b 2e 63 6f 6d 22 2c 0a 20 20 20 20 20 20 22  ck.com",.      "
9620: 68 6f 73 68 69 79 75 75 67 69 2e 74 69 73 74 6f  hoshiyuugi.tisto
9630: 72 79 2e 63 6f 6d 22 2c 0a 20 20 20 20 20 20 22  ry.com",.      "
9640: 73 6b 69 64 72 6f 77 67 61 6d 65 73 2e 6e 65 74  skidrowgames.net
9650: 22 2c 0a 20 20 20 20 7d 3b 0a 20 20 20 20 69 6e  ",.    };.    in
9660: 74 20 69 3b 0a 20 20 20 20 66 6f 72 28 69 3d 30  t i;.    for(i=0
9670: 3b 20 69 3c 73 69 7a 65 6f 66 28 61 7a 44 69 73  ; i<sizeof(azDis
9680: 61 6c 6c 6f 77 29 2f 73 69 7a 65 6f 66 28 61 7a  allow)/sizeof(az
9690: 44 69 73 61 6c 6c 6f 77 5b 30 5d 29 3b 20 69 2b  Disallow[0]); i+
96a0: 2b 29 7b 0a 20 20 20 20 20 20 69 66 28 20 73 74  +){.      if( st
96b0: 72 73 74 72 28 7a 52 65 66 65 72 65 72 2c 20 61  rstr(zReferer, a
96c0: 7a 44 69 73 61 6c 6c 6f 77 5b 69 5d 29 21 3d 30  zDisallow[i])!=0
96d0: 20 29 20 4e 6f 74 46 6f 75 6e 64 28 5f 5f 4c 49   ) NotFound(__LI
96e0: 4e 45 5f 5f 29 3b 0a 20 20 20 20 7d 0a 20 20 7d  NE__);.    }.  }
96f0: 0a 23 65 6e 64 69 66 0a 0a 20 20 2f 2a 20 4d 61  .#endif..  /* Ma
9700: 6b 65 20 61 6e 20 65 78 74 72 61 20 65 66 66 6f  ke an extra effo
9710: 72 74 20 74 6f 20 67 65 74 20 61 20 76 61 6c 69  rt to get a vali
9720: 64 20 73 65 72 76 65 72 20 6e 61 6d 65 20 61 6e  d server name an
9730: 64 20 70 6f 72 74 20 6e 75 6d 62 65 72 2e 0a 20  d port number.. 
9740: 20 2a 2a 20 4f 6e 6c 79 20 4e 65 74 73 63 61 70   ** Only Netscap
9750: 65 20 70 72 6f 76 69 64 65 73 20 74 68 69 73 20  e provides this 
9760: 69 6e 66 6f 72 6d 61 74 69 6f 6e 2e 20 20 49 66  information.  If
9770: 20 74 68 65 20 62 72 6f 77 73 65 72 20 69 73 0a   the browser is.
9780: 20 20 2a 2a 20 49 6e 74 65 72 6e 65 74 20 45 78    ** Internet Ex
9790: 70 6c 6f 72 65 72 2c 20 74 68 65 6e 20 77 65 20  plorer, then we 
97a0: 68 61 76 65 20 74 6f 20 66 69 6e 64 20 6f 75 74  have to find out
97b0: 20 74 68 65 20 69 6e 66 6f 72 6d 61 74 69 6f 6e   the information
97c0: 20 66 6f 72 0a 20 20 2a 2a 20 6f 75 72 73 65 6c   for.  ** oursel
97d0: 76 65 73 2e 0a 20 20 2a 2f 0a 20 20 69 66 28 20  ves..  */.  if( 
97e0: 7a 53 65 72 76 65 72 4e 61 6d 65 3d 3d 30 20 29  zServerName==0 )
97f0: 7b 0a 20 20 20 20 7a 53 65 72 76 65 72 4e 61 6d  {.    zServerNam
9800: 65 20 3d 20 53 61 66 65 4d 61 6c 6c 6f 63 28 20  e = SafeMalloc( 
9810: 31 30 30 20 29 3b 0a 20 20 20 20 67 65 74 68 6f  100 );.    getho
9820: 73 74 6e 61 6d 65 28 7a 53 65 72 76 65 72 4e 61  stname(zServerNa
9830: 6d 65 2c 31 30 30 29 3b 0a 20 20 7d 0a 20 20 69  me,100);.  }.  i
9840: 66 28 20 7a 53 65 72 76 65 72 50 6f 72 74 3d 3d  f( zServerPort==
9850: 30 20 7c 7c 20 2a 7a 53 65 72 76 65 72 50 6f 72  0 || *zServerPor
9860: 74 3d 3d 30 20 29 7b 0a 20 20 20 20 7a 53 65 72  t==0 ){.    zSer
9870: 76 65 72 50 6f 72 74 20 3d 20 44 45 46 41 55 4c  verPort = DEFAUL
9880: 54 5f 50 4f 52 54 3b 0a 20 20 7d 0a 0a 20 20 2f  T_PORT;.  }..  /
9890: 2a 20 52 65 6d 6f 76 65 20 74 68 65 20 71 75 65  * Remove the que
98a0: 72 79 20 73 74 72 69 6e 67 20 66 72 6f 6d 20 74  ry string from t
98b0: 68 65 20 65 6e 64 20 6f 66 20 74 68 65 20 72 65  he end of the re
98c0: 71 75 65 73 74 65 64 20 66 69 6c 65 2e 0a 20 20  quested file..  
98d0: 2a 2f 0a 20 20 66 6f 72 28 7a 3d 7a 53 63 72 69  */.  for(z=zScri
98e0: 70 74 3b 20 2a 7a 20 26 26 20 2a 7a 21 3d 27 3f  pt; *z && *z!='?
98f0: 27 3b 20 7a 2b 2b 29 7b 7d 0a 20 20 69 66 28 20  '; z++){}.  if( 
9900: 2a 7a 3d 3d 27 3f 27 20 29 7b 0a 20 20 20 20 7a  *z=='?' ){.    z
9910: 51 75 65 72 79 53 75 66 66 69 78 20 3d 20 53 74  QuerySuffix = St
9920: 72 44 75 70 28 7a 29 3b 0a 20 20 20 20 2a 7a 20  rDup(z);.    *z 
9930: 3d 20 30 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20  = 0;.  }else{.  
9940: 20 20 7a 51 75 65 72 79 53 75 66 66 69 78 20 3d    zQuerySuffix =
9950: 20 22 22 3b 0a 20 20 7d 0a 20 20 7a 51 75 65 72   "";.  }.  zQuer
9960: 79 53 74 72 69 6e 67 20 3d 20 2a 7a 51 75 65 72  yString = *zQuer
9970: 79 53 75 66 66 69 78 20 3f 20 26 7a 51 75 65 72  ySuffix ? &zQuer
9980: 79 53 75 66 66 69 78 5b 31 5d 20 3a 20 7a 51 75  ySuffix[1] : zQu
9990: 65 72 79 53 75 66 66 69 78 3b 0a 0a 20 20 2f 2a  erySuffix;..  /*
99a0: 20 43 72 65 61 74 65 20 61 20 66 69 6c 65 20 74   Create a file t
99b0: 6f 20 68 6f 6c 64 20 74 68 65 20 50 4f 53 54 20  o hold the POST 
99c0: 71 75 65 72 79 20 64 61 74 61 2c 20 69 66 20 61  query data, if a
99d0: 6e 79 2e 20 20 57 65 20 68 61 76 65 20 74 6f 0a  ny.  We have to.
99e0: 20 20 2a 2a 20 64 6f 20 69 74 20 74 68 69 73 20    ** do it this 
99f0: 77 61 79 2e 20 20 57 65 20 63 61 6e 27 74 20 6a  way.  We can't j
9a00: 75 73 74 20 70 61 73 73 20 74 68 65 20 66 69 6c  ust pass the fil
9a10: 65 20 64 65 73 63 72 69 70 74 6f 72 20 64 6f 77  e descriptor dow
9a20: 6e 20 74 6f 0a 20 20 2a 2a 20 74 68 65 20 63 68  n to.  ** the ch
9a30: 69 6c 64 20 70 72 6f 63 65 73 73 20 62 65 63 61  ild process beca
9a40: 75 73 65 20 74 68 65 20 66 67 65 74 73 28 29 20  use the fgets() 
9a50: 66 75 6e 63 74 69 6f 6e 20 6d 61 79 20 68 61 76  function may hav
9a60: 65 20 61 6c 72 65 61 64 79 0a 20 20 2a 2a 20 72  e already.  ** r
9a70: 65 61 64 20 70 61 72 74 20 6f 66 20 74 68 65 20  ead part of the 
9a80: 50 4f 53 54 20 64 61 74 61 20 69 6e 74 6f 20 69  POST data into i
9a90: 74 73 20 69 6e 74 65 72 6e 61 6c 20 62 75 66 66  ts internal buff
9aa0: 65 72 2e 0a 20 20 2a 2f 0a 20 20 69 66 28 20 7a  er..  */.  if( z
9ab0: 4d 65 74 68 6f 64 5b 30 5d 3d 3d 27 50 27 20 26  Method[0]=='P' &
9ac0: 26 20 7a 43 6f 6e 74 65 6e 74 4c 65 6e 67 74 68  & zContentLength
9ad0: 21 3d 30 20 29 7b 0a 20 20 20 20 69 6e 74 20 6c  !=0 ){.    int l
9ae0: 65 6e 20 3d 20 61 74 6f 69 28 7a 43 6f 6e 74 65  en = atoi(zConte
9af0: 6e 74 4c 65 6e 67 74 68 29 3b 0a 20 20 20 20 46  ntLength);.    F
9b00: 49 4c 45 20 2a 6f 75 74 3b 0a 20 20 20 20 63 68  ILE *out;.    ch
9b10: 61 72 20 2a 7a 42 75 66 3b 0a 20 20 20 20 69 6e  ar *zBuf;.    in
9b20: 74 20 6e 3b 0a 0a 20 20 20 20 69 66 28 20 6c 65  t n;..    if( le
9b30: 6e 3e 4d 41 58 5f 43 4f 4e 54 45 4e 54 5f 4c 45  n>MAX_CONTENT_LE
9b40: 4e 47 54 48 20 29 7b 0a 20 20 20 20 20 20 53 74  NGTH ){.      St
9b50: 61 72 74 52 65 73 70 6f 6e 73 65 28 22 35 30 30  artResponse("500
9b60: 20 52 65 71 75 65 73 74 20 74 6f 6f 20 6c 61 72   Request too lar
9b70: 67 65 22 29 3b 0a 20 20 20 20 20 20 6e 4f 75 74  ge");.      nOut
9b80: 20 2b 3d 20 70 72 69 6e 74 66 28 0a 20 20 20 20   += printf(.    
9b90: 20 20 20 20 22 43 6f 6e 74 65 6e 74 2d 74 79 70      "Content-typ
9ba0: 65 3a 20 74 65 78 74 2f 70 6c 61 69 6e 5c 72 5c  e: text/plain\r\
9bb0: 6e 22 0a 20 20 20 20 20 20 20 20 22 5c 72 5c 6e  n".        "\r\n
9bc0: 22 0a 20 20 20 20 20 20 20 20 22 54 6f 6f 20 6d  ".        "Too m
9bd0: 75 63 68 20 50 4f 53 54 20 64 61 74 61 5c 6e 22  uch POST data\n"
9be0: 0a 20 20 20 20 20 20 29 3b 0a 20 20 20 20 20 20  .      );.      
9bf0: 4d 61 6b 65 4c 6f 67 45 6e 74 72 79 28 30 29 3b  MakeLogEntry(0);
9c00: 0a 20 20 20 20 20 20 65 78 69 74 28 30 29 3b 0a  .      exit(0);.
9c10: 20 20 20 20 7d 0a 20 20 20 20 73 70 72 69 6e 74      }.    sprint
9c20: 66 28 7a 54 6d 70 4e 61 6d 42 75 66 2c 20 22 2f  f(zTmpNamBuf, "/
9c30: 74 6d 70 2f 2d 70 6f 73 74 2d 64 61 74 61 2d 58  tmp/-post-data-X
9c40: 58 58 58 58 58 22 29 3b 0a 20 20 20 20 7a 54 6d  XXXXX");.    zTm
9c50: 70 4e 61 6d 20 3d 20 7a 54 6d 70 4e 61 6d 42 75  pNam = zTmpNamBu
9c60: 66 3b 0a 20 20 20 20 6d 6b 73 74 65 6d 70 28 7a  f;.    mkstemp(z
9c70: 54 6d 70 4e 61 6d 29 3b 0a 20 20 20 20 6f 75 74  TmpNam);.    out
9c80: 20 3d 20 66 6f 70 65 6e 28 7a 54 6d 70 4e 61 6d   = fopen(zTmpNam
9c90: 2c 22 77 22 29 3b 0a 20 20 20 20 69 66 28 20 6f  ,"w");.    if( o
9ca0: 75 74 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 53  ut==0 ){.      S
9cb0: 74 61 72 74 52 65 73 70 6f 6e 73 65 28 22 35 30  tartResponse("50
9cc0: 30 20 43 61 6e 6e 6f 74 20 63 72 65 61 74 65 20  0 Cannot create 
9cd0: 2f 74 6d 70 20 66 69 6c 65 22 29 3b 0a 20 20 20  /tmp file");.   
9ce0: 20 20 20 6e 4f 75 74 20 2b 3d 20 70 72 69 6e 74     nOut += print
9cf0: 66 28 0a 20 20 20 20 20 20 20 20 22 43 6f 6e 74  f(.        "Cont
9d00: 65 6e 74 2d 74 79 70 65 3a 20 74 65 78 74 2f 70  ent-type: text/p
9d10: 6c 61 69 6e 5c 72 5c 6e 22 0a 20 20 20 20 20 20  lain\r\n".      
9d20: 20 20 22 5c 72 5c 6e 22 0a 20 20 20 20 20 20 20    "\r\n".       
9d30: 20 22 43 6f 75 6c 64 20 6e 6f 74 20 6f 70 65 6e   "Could not open
9d40: 20 5c 22 25 73 5c 22 20 66 6f 72 20 77 72 69 74   \"%s\" for writ
9d50: 69 6e 67 5c 6e 22 2c 20 7a 54 6d 70 4e 61 6d 0a  ing\n", zTmpNam.
9d60: 20 20 20 20 20 20 29 3b 0a 20 20 20 20 20 20 4d        );.      M
9d70: 61 6b 65 4c 6f 67 45 6e 74 72 79 28 30 29 3b 0a  akeLogEntry(0);.
9d80: 20 20 20 20 20 20 65 78 69 74 28 30 29 3b 0a 20        exit(0);. 
9d90: 20 20 20 7d 0a 20 20 20 20 7a 42 75 66 20 3d 20     }.    zBuf = 
9da0: 53 61 66 65 4d 61 6c 6c 6f 63 28 20 6c 65 6e 20  SafeMalloc( len 
9db0: 29 3b 0a 20 20 20 20 69 66 28 20 75 73 65 54 69  );.    if( useTi
9dc0: 6d 65 6f 75 74 20 29 20 61 6c 61 72 6d 28 31 35  meout ) alarm(15
9dd0: 20 2b 20 6c 65 6e 2f 32 30 30 30 29 3b 0a 20 20   + len/2000);.  
9de0: 20 20 6e 20 3d 20 66 72 65 61 64 28 7a 42 75 66    n = fread(zBuf
9df0: 2c 31 2c 6c 65 6e 2c 73 74 64 69 6e 29 3b 0a 20  ,1,len,stdin);. 
9e00: 20 20 20 6e 49 6e 20 2b 3d 20 6e 3b 0a 20 20 20     nIn += n;.   
9e10: 20 66 77 72 69 74 65 28 7a 42 75 66 2c 31 2c 6e   fwrite(zBuf,1,n
9e20: 2c 6f 75 74 29 3b 0a 20 20 20 20 66 72 65 65 28  ,out);.    free(
9e30: 7a 42 75 66 29 3b 0a 20 20 20 20 66 63 6c 6f 73  zBuf);.    fclos
9e40: 65 28 6f 75 74 29 3b 0a 20 20 7d 0a 0a 20 20 2f  e(out);.  }..  /
9e50: 2a 20 4d 61 6b 65 20 73 75 72 65 20 74 68 65 20  * Make sure the 
9e60: 72 75 6e 6e 69 6e 67 20 74 69 6d 65 20 69 73 20  running time is 
9e70: 6e 6f 74 20 74 6f 6f 20 67 72 65 61 74 20 2a 2f  not too great */
9e80: 0a 20 20 69 66 28 20 75 73 65 54 69 6d 65 6f 75  .  if( useTimeou
9e90: 74 20 29 20 61 6c 61 72 6d 28 31 30 29 3b 0a 0a  t ) alarm(10);..
9ea0: 20 20 2f 2a 20 43 6f 6e 76 65 72 74 20 61 6c 6c    /* Convert all
9eb0: 20 75 6e 75 73 75 61 6c 20 63 68 61 72 61 63 74   unusual charact
9ec0: 65 72 73 20 69 6e 20 74 68 65 20 73 63 72 69 70  ers in the scrip
9ed0: 74 20 6e 61 6d 65 20 69 6e 74 6f 20 22 5f 22 2e  t name into "_".
9ee0: 0a 20 20 2a 2a 0a 20 20 2a 2a 20 54 68 69 73 20  .  **.  ** This 
9ef0: 69 73 20 61 20 64 65 66 65 6e 73 65 20 61 67 61  is a defense aga
9f00: 69 6e 73 74 20 76 61 72 69 6f 75 73 20 61 74 74  inst various att
9f10: 61 63 6b 73 2c 20 58 53 53 20 61 74 74 61 63 6b  acks, XSS attack
9f20: 73 20 69 6e 20 70 61 72 74 69 63 75 6c 61 72 2e  s in particular.
9f30: 0a 20 20 2a 2f 0a 20 20 66 6f 72 28 7a 3d 7a 53  .  */.  for(z=zS
9f40: 63 72 69 70 74 3b 20 2a 7a 3b 20 7a 2b 2b 29 7b  cript; *z; z++){
9f50: 0a 20 20 20 20 75 6e 73 69 67 6e 65 64 20 63 68  .    unsigned ch
9f60: 61 72 20 63 20 3d 20 2a 28 75 6e 73 69 67 6e 65  ar c = *(unsigne
9f70: 64 20 63 68 61 72 2a 29 7a 3b 0a 20 20 20 20 69  d char*)z;.    i
9f80: 66 28 20 28 63 26 30 78 38 30 29 21 3d 30 20 7c  f( (c&0x80)!=0 |
9f90: 7c 20 21 61 6c 6c 6f 77 65 64 49 6e 4e 61 6d 65  | !allowedInName
9fa0: 5b 63 5d 20 29 7b 0a 20 20 20 20 20 20 2a 7a 20  [c] ){.      *z 
9fb0: 3d 20 27 5f 27 3b 0a 20 20 20 20 20 20 69 66 28  = '_';.      if(
9fc0: 20 63 3d 3d 27 25 27 20 26 26 20 7a 5b 31 5d 21   c=='%' && z[1]!
9fd0: 3d 30 20 26 26 20 7a 5b 32 5d 21 3d 30 20 29 7b  =0 && z[2]!=0 ){
9fe0: 0a 20 20 20 20 20 20 20 20 66 6f 72 28 69 3d 33  .        for(i=3
9ff0: 3b 20 28 7a 5b 69 2d 32 5d 20 3d 20 7a 5b 69 5d  ; (z[i-2] = z[i]
a000: 29 21 3d 30 3b 20 69 2b 2b 29 7b 7d 0a 20 20 20  )!=0; i++){}.   
a010: 20 20 20 7d 0a 20 20 20 20 7d 0a 20 20 7d 0a 0a     }.    }.  }..
a020: 20 20 2f 2a 20 44 6f 6e 27 74 20 61 6c 6c 6f 77    /* Don't allow
a030: 20 22 2f 2e 22 20 6f 72 20 22 2f 2d 22 20 74 6f   "/." or "/-" to
a040: 20 74 6f 20 6f 63 63 75 72 20 61 6e 79 77 68 65   to occur anywhe
a050: 72 65 20 69 6e 20 74 68 65 20 65 6e 74 69 74 79  re in the entity
a060: 20 6e 61 6d 65 2e 0a 20 20 2a 2a 20 54 68 69 73   name..  ** This
a070: 20 70 72 65 76 65 6e 74 73 20 61 74 74 61 63 6b   prevents attack
a080: 73 20 69 6e 76 6f 6c 76 69 6e 67 20 22 2e 2e 22  s involving ".."
a090: 20 61 6e 64 20 61 6c 73 6f 20 61 6c 6c 6f 77 73   and also allows
a0a0: 20 75 73 20 74 6f 20 63 72 65 61 74 65 0a 20 20   us to create.  
a0b0: 2a 2a 20 66 69 6c 65 73 20 61 6e 64 20 64 69 72  ** files and dir
a0c0: 65 63 74 6f 72 69 65 73 20 77 68 6f 73 65 20 6e  ectories whose n
a0d0: 61 6d 65 73 20 62 65 67 69 6e 20 77 69 74 68 20  ames begin with 
a0e0: 22 2d 22 20 77 68 69 63 68 20 61 72 65 20 69 6e  "-" which are in
a0f0: 76 69 73 69 62 6c 65 0a 20 20 2a 2a 20 74 6f 20  visible.  ** to 
a100: 74 68 65 20 77 65 62 73 65 72 76 65 72 2e 0a 20  the webserver.. 
a110: 20 2a 2f 0a 20 20 66 6f 72 28 7a 3d 7a 53 63 72   */.  for(z=zScr
a120: 69 70 74 3b 20 2a 7a 3b 20 7a 2b 2b 29 7b 0a 20  ipt; *z; z++){. 
a130: 20 20 20 69 66 28 20 2a 7a 3d 3d 27 2f 27 20 26     if( *z=='/' &
a140: 26 20 28 7a 5b 31 5d 3d 3d 27 2e 27 20 7c 7c 20  & (z[1]=='.' || 
a150: 7a 5b 31 5d 3d 3d 27 2d 27 29 20 29 7b 0a 20 20  z[1]=='-') ){.  
a160: 20 20 20 20 20 4e 6f 74 46 6f 75 6e 64 28 5f 5f       NotFound(__
a170: 4c 49 4e 45 5f 5f 29 3b 0a 20 20 20 20 7d 0a 20  LINE__);.    }. 
a180: 20 7d 0a 0a 20 20 2f 2a 20 46 69 67 75 72 65 20   }..  /* Figure 
a190: 6f 75 74 20 77 68 61 74 20 74 68 65 20 72 6f 6f  out what the roo
a1a0: 74 20 6f 66 20 74 68 65 20 66 69 6c 65 73 79 73  t of the filesys
a1b0: 74 65 6d 20 73 68 6f 75 6c 64 20 62 65 2e 20 20  tem should be.  
a1c0: 49 66 20 74 68 65 0a 20 20 2a 2a 20 48 54 54 50  If the.  ** HTTP
a1d0: 5f 48 4f 53 54 20 70 61 72 61 6d 65 74 65 72 20  _HOST parameter 
a1e0: 65 78 69 73 74 73 20 28 73 74 6f 72 65 64 20 69  exists (stored i
a1f0: 6e 20 7a 48 74 74 70 48 6f 73 74 29 20 74 68 65  n zHttpHost) the
a200: 6e 20 72 65 6d 6f 76 65 20 74 68 65 0a 20 20 2a  n remove the.  *
a210: 2a 20 70 6f 72 74 20 6e 75 6d 62 65 72 20 66 72  * port number fr
a220: 6f 6d 20 74 68 65 20 65 6e 64 20 28 69 66 20 61  om the end (if a
a230: 6e 79 29 2c 20 63 6f 6e 76 65 72 74 20 61 6c 6c  ny), convert all
a240: 20 63 68 61 72 61 63 74 65 72 73 20 74 6f 20 6c   characters to l
a250: 6f 77 65 72 0a 20 20 2a 2a 20 63 61 73 65 2c 20  ower.  ** case, 
a260: 61 6e 64 20 63 6f 6e 76 65 72 74 20 61 6c 6c 20  and convert all 
a270: 22 2e 22 20 74 6f 20 22 5f 22 2e 20 20 54 68 65  "." to "_".  The
a280: 6e 20 74 72 79 20 74 6f 20 66 69 6e 64 20 61 20  n try to find a 
a290: 64 69 72 65 63 74 6f 72 79 0a 20 20 2a 2a 20 77  directory.  ** w
a2a0: 69 74 68 20 74 68 61 74 20 6e 61 6d 65 20 61 6e  ith that name an
a2b0: 64 20 74 68 65 20 65 78 74 65 6e 73 69 6f 6e 20  d the extension 
a2c0: 2e 77 65 62 73 69 74 65 2e 20 20 49 66 20 6e 6f  .website.  If no
a2d0: 74 20 66 6f 75 6e 64 2c 20 6c 6f 6f 6b 0a 20 20  t found, look.  
a2e0: 2a 2a 20 66 6f 72 20 22 64 65 66 61 75 6c 74 2e  ** for "default.
a2f0: 77 65 62 73 69 74 65 22 2e 0a 20 20 2a 2f 0a 20  website"..  */. 
a300: 20 69 66 28 20 7a 53 63 72 69 70 74 5b 30 5d 21   if( zScript[0]!
a310: 3d 27 2f 27 20 29 20 4e 6f 74 46 6f 75 6e 64 28  ='/' ) NotFound(
a320: 5f 5f 4c 49 4e 45 5f 5f 29 3b 0a 20 20 69 66 28  __LINE__);.  if(
a330: 20 73 74 72 6c 65 6e 28 7a 52 6f 6f 74 29 2b 34   strlen(zRoot)+4
a340: 30 20 3e 3d 20 73 69 7a 65 6f 66 28 7a 4c 69 6e  0 >= sizeof(zLin
a350: 65 29 20 29 20 4e 6f 74 46 6f 75 6e 64 28 5f 5f  e) ) NotFound(__
a360: 4c 49 4e 45 5f 5f 29 3b 0a 20 20 69 66 28 20 7a  LINE__);.  if( z
a370: 48 74 74 70 48 6f 73 74 3d 3d 30 20 7c 7c 20 7a  HttpHost==0 || z
a380: 48 74 74 70 48 6f 73 74 5b 30 5d 3d 3d 30 20 29  HttpHost[0]==0 )
a390: 7b 0a 20 20 20 20 4e 6f 74 46 6f 75 6e 64 28 5f  {.    NotFound(_
a3a0: 5f 4c 49 4e 45 5f 5f 29 3b 0a 20 20 7d 65 6c 73  _LINE__);.  }els
a3b0: 65 20 69 66 28 20 73 74 72 6c 65 6e 28 7a 48 74  e if( strlen(zHt
a3c0: 74 70 48 6f 73 74 29 2b 73 74 72 6c 65 6e 28 7a  tpHost)+strlen(z
a3d0: 52 6f 6f 74 29 2b 31 30 20 3e 3d 20 73 69 7a 65  Root)+10 >= size
a3e0: 6f 66 28 7a 4c 69 6e 65 29 20 29 7b 0a 20 20 20  of(zLine) ){.   
a3f0: 20 4e 6f 74 46 6f 75 6e 64 28 5f 5f 4c 49 4e 45   NotFound(__LINE
a400: 5f 5f 29 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20  __);.  }else{.  
a410: 20 20 73 70 72 69 6e 74 66 28 7a 4c 69 6e 65 2c    sprintf(zLine,
a420: 20 22 25 73 2f 25 73 22 2c 20 7a 52 6f 6f 74 2c   "%s/%s", zRoot,
a430: 20 7a 48 74 74 70 48 6f 73 74 29 3b 0a 20 20 20   zHttpHost);.   
a440: 20 66 6f 72 28 69 3d 73 74 72 6c 65 6e 28 7a 52   for(i=strlen(zR
a450: 6f 6f 74 29 2b 31 3b 20 7a 4c 69 6e 65 5b 69 5d  oot)+1; zLine[i]
a460: 20 26 26 20 7a 4c 69 6e 65 5b 69 5d 21 3d 27 3a   && zLine[i]!=':
a470: 27 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 20 20 69  '; i++){.      i
a480: 6e 74 20 63 20 3d 20 7a 4c 69 6e 65 5b 69 5d 3b  nt c = zLine[i];
a490: 0a 20 20 20 20 20 20 69 66 28 20 21 69 73 61 6c  .      if( !isal
a4a0: 6e 75 6d 28 63 29 20 29 7b 0a 20 20 20 20 20 20  num(c) ){.      
a4b0: 20 20 7a 4c 69 6e 65 5b 69 5d 20 3d 20 27 5f 27    zLine[i] = '_'
a4c0: 3b 0a 20 20 20 20 20 20 7d 65 6c 73 65 20 69 66  ;.      }else if
a4d0: 28 20 69 73 75 70 70 65 72 28 63 29 20 29 7b 0a  ( isupper(c) ){.
a4e0: 20 20 20 20 20 20 20 20 7a 4c 69 6e 65 5b 69 5d          zLine[i]
a4f0: 20 3d 20 74 6f 6c 6f 77 65 72 28 63 29 3b 0a 20   = tolower(c);. 
a500: 20 20 20 20 20 7d 0a 20 20 20 20 7d 0a 20 20 20       }.    }.   
a510: 20 73 74 72 63 70 79 28 26 7a 4c 69 6e 65 5b 69   strcpy(&zLine[i
a520: 5d 2c 20 22 2e 77 65 62 73 69 74 65 22 29 3b 0a  ], ".website");.
a530: 20 20 7d 0a 20 20 69 66 28 20 73 74 61 74 28 7a    }.  if( stat(z
a540: 4c 69 6e 65 2c 26 73 74 61 74 62 75 66 29 20 7c  Line,&statbuf) |
a550: 7c 20 21 53 5f 49 53 44 49 52 28 73 74 61 74 62  | !S_ISDIR(statb
a560: 75 66 2e 73 74 5f 6d 6f 64 65 29 20 29 7b 0a 20  uf.st_mode) ){. 
a570: 20 20 20 73 70 72 69 6e 74 66 28 7a 4c 69 6e 65     sprintf(zLine
a580: 2c 20 22 25 73 2f 64 65 66 61 75 6c 74 2e 77 65  , "%s/default.we
a590: 62 73 69 74 65 22 2c 20 7a 52 6f 6f 74 29 3b 0a  bsite", zRoot);.
a5a0: 20 20 20 20 69 66 28 20 73 74 61 74 28 7a 4c 69      if( stat(zLi
a5b0: 6e 65 2c 26 73 74 61 74 62 75 66 29 20 7c 7c 20  ne,&statbuf) || 
a5c0: 21 53 5f 49 53 44 49 52 28 73 74 61 74 62 75 66  !S_ISDIR(statbuf
a5d0: 2e 73 74 5f 6d 6f 64 65 29 20 29 7b 0a 20 20 20  .st_mode) ){.   
a5e0: 20 20 20 69 66 28 20 73 74 61 6e 64 61 6c 6f 6e     if( standalon
a5f0: 65 20 29 7b 0a 20 20 20 20 20 20 20 20 73 70 72  e ){.        spr
a600: 69 6e 74 66 28 7a 4c 69 6e 65 2c 20 22 25 73 22  intf(zLine, "%s"
a610: 2c 20 7a 52 6f 6f 74 29 3b 0a 20 20 20 20 20 20  , zRoot);.      
a620: 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 20 20 4e  }else{.        N
a630: 6f 74 46 6f 75 6e 64 28 5f 5f 4c 49 4e 45 5f 5f  otFound(__LINE__
a640: 29 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 7d  );.      }.    }
a650: 0a 20 20 7d 0a 20 20 7a 48 6f 6d 65 20 3d 20 53  .  }.  zHome = S
a660: 74 72 44 75 70 28 7a 4c 69 6e 65 29 3b 0a 0a 20  trDup(zLine);.. 
a670: 20 2f 2a 20 43 68 61 6e 67 65 20 64 69 72 65 63   /* Change direc
a680: 74 6f 72 69 65 73 20 74 6f 20 74 68 65 20 72 6f  tories to the ro
a690: 6f 74 20 6f 66 20 74 68 65 20 48 54 54 50 20 66  ot of the HTTP f
a6a0: 69 6c 65 73 79 73 74 65 6d 0a 20 20 2a 2f 0a 20  ilesystem.  */. 
a6b0: 20 69 66 28 20 63 68 64 69 72 28 7a 48 6f 6d 65   if( chdir(zHome
a6c0: 29 21 3d 30 20 29 7b 0a 20 20 20 20 63 68 61 72  )!=0 ){.    char
a6d0: 20 7a 42 75 66 5b 31 30 30 30 5d 3b 0a 20 20 20   zBuf[1000];.   
a6e0: 20 4d 61 6c 66 75 6e 63 74 69 6f 6e 28 5f 5f 4c   Malfunction(__L
a6f0: 49 4e 45 5f 5f 2c 20 22 63 61 6e 6e 6f 74 20 63  INE__, "cannot c
a700: 68 64 69 72 20 74 6f 20 5b 25 73 5d 20 66 72 6f  hdir to [%s] fro
a710: 6d 20 5b 25 73 5d 22 2c 0a 20 20 20 20 20 20 20  m [%s]",.       
a720: 20 20 7a 48 6f 6d 65 2c 20 67 65 74 63 77 64 28    zHome, getcwd(
a730: 7a 42 75 66 2c 39 39 39 29 29 3b 0a 20 20 7d 0a  zBuf,999));.  }.
a740: 0a 20 20 2f 2a 20 4c 6f 63 61 74 65 20 74 68 65  .  /* Locate the
a750: 20 66 69 6c 65 20 69 6e 20 74 68 65 20 66 69 6c   file in the fil
a760: 65 73 79 73 74 65 6d 2e 20 20 57 65 20 6d 69 67  esystem.  We mig
a770: 68 74 20 68 61 76 65 20 74 6f 20 61 70 70 65 6e  ht have to appen
a780: 64 0a 20 20 2a 2a 20 74 68 65 20 6e 61 6d 65 20  d.  ** the name 
a790: 22 69 6e 64 65 78 2e 68 74 6d 6c 22 20 69 6e 20  "index.html" in 
a7a0: 6f 72 64 65 72 20 74 6f 20 66 69 6e 64 20 69 74  order to find it
a7b0: 2e 20 20 41 6e 79 20 65 78 63 65 73 73 20 70 61  .  Any excess pa
a7c0: 74 68 0a 20 20 2a 2a 20 69 6e 66 6f 72 6d 61 74  th.  ** informat
a7d0: 69 6f 6e 20 69 73 20 70 75 74 20 69 6e 74 6f 20  ion is put into 
a7e0: 74 68 65 20 7a 50 61 74 68 49 6e 66 6f 20 76 61  the zPathInfo va
a7f0: 72 69 61 62 6c 65 2e 0a 20 20 2a 2f 0a 20 20 7a  riable..  */.  z
a800: 4c 69 6e 65 5b 30 5d 20 3d 20 27 2e 27 3b 0a 20  Line[0] = '.';. 
a810: 20 69 20 3d 20 30 3b 0a 20 20 77 68 69 6c 65 28   i = 0;.  while(
a820: 20 7a 53 63 72 69 70 74 5b 69 5d 20 29 7b 0a 20   zScript[i] ){. 
a830: 20 20 20 77 68 69 6c 65 28 20 7a 53 63 72 69 70     while( zScrip
a840: 74 5b 69 5d 20 26 26 20 7a 53 63 72 69 70 74 5b  t[i] && zScript[
a850: 69 5d 21 3d 27 2f 27 20 29 7b 0a 20 20 20 20 20  i]!='/' ){.     
a860: 20 7a 4c 69 6e 65 5b 69 2b 31 5d 20 3d 20 7a 53   zLine[i+1] = zS
a870: 63 72 69 70 74 5b 69 5d 3b 0a 20 20 20 20 20 20  cript[i];.      
a880: 69 2b 2b 3b 0a 20 20 20 20 7d 0a 20 20 20 20 7a  i++;.    }.    z
a890: 4c 69 6e 65 5b 69 2b 31 5d 20 3d 20 30 3b 0a 20  Line[i+1] = 0;. 
a8a0: 20 20 20 69 66 28 20 73 74 61 74 28 7a 4c 69 6e     if( stat(zLin
a8b0: 65 2c 26 73 74 61 74 62 75 66 29 21 3d 30 20 29  e,&statbuf)!=0 )
a8c0: 7b 0a 20 20 20 20 20 20 69 6e 74 20 73 74 69 6c  {.      int stil
a8d0: 6c 53 65 61 72 63 68 69 6e 67 20 3d 20 31 3b 0a  lSearching = 1;.
a8e0: 20 20 20 20 20 20 77 68 69 6c 65 28 20 73 74 69        while( sti
a8f0: 6c 6c 53 65 61 72 63 68 69 6e 67 20 26 26 20 69  llSearching && i
a900: 3e 30 20 29 7b 0a 20 20 20 20 20 20 20 20 77 68  >0 ){.        wh
a910: 69 6c 65 28 20 69 3e 30 20 26 26 20 7a 4c 69 6e  ile( i>0 && zLin
a920: 65 5b 69 5d 21 3d 27 2f 27 20 29 7b 20 69 2d 2d  e[i]!='/' ){ i--
a930: 3b 20 7d 0a 20 20 20 20 20 20 20 20 73 74 72 63  ; }.        strc
a940: 70 79 28 26 7a 4c 69 6e 65 5b 69 5d 2c 20 22 2f  py(&zLine[i], "/
a950: 6e 6f 74 2d 66 6f 75 6e 64 2e 68 74 6d 6c 22 29  not-found.html")
a960: 3b 0a 20 20 20 20 20 20 20 20 69 66 28 20 73 74  ;.        if( st
a970: 61 74 28 7a 4c 69 6e 65 2c 26 73 74 61 74 62 75  at(zLine,&statbu
a980: 66 29 3d 3d 30 20 26 26 20 53 5f 49 53 52 45 47  f)==0 && S_ISREG
a990: 28 73 74 61 74 62 75 66 2e 73 74 5f 6d 6f 64 65  (statbuf.st_mode
a9a0: 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 26 26  ).            &&
a9b0: 20 61 63 63 65 73 73 28 7a 4c 69 6e 65 2c 52 5f   access(zLine,R_
a9c0: 4f 4b 29 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20  OK)==0 ){.      
a9d0: 20 20 20 20 7a 52 65 61 6c 53 63 72 69 70 74 20      zRealScript 
a9e0: 3d 20 53 74 72 44 75 70 28 26 7a 4c 69 6e 65 5b  = StrDup(&zLine[
a9f0: 31 5d 29 3b 0a 20 20 20 20 20 20 20 20 20 20 52  1]);.          R
aa00: 65 64 69 72 65 63 74 28 7a 52 65 61 6c 53 63 72  edirect(zRealScr
aa10: 69 70 74 2c 20 31 29 3b 0a 20 20 20 20 20 20 20  ipt, 1);.       
aa20: 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 20 20 20     return;.     
aa30: 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20     }else{.      
aa40: 20 20 20 20 69 2d 2d 3b 0a 20 20 20 20 20 20 20      i--;.       
aa50: 20 7d 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20   }.      }.     
aa60: 20 69 66 28 20 73 74 69 6c 6c 53 65 61 72 63 68   if( stillSearch
aa70: 69 6e 67 20 29 20 4e 6f 74 46 6f 75 6e 64 28 5f  ing ) NotFound(_
aa80: 5f 4c 49 4e 45 5f 5f 29 3b 0a 20 20 20 20 20 20  _LINE__);.      
aa90: 62 72 65 61 6b 3b 0a 20 20 20 20 7d 0a 20 20 20  break;.    }.   
aaa0: 20 69 66 28 20 53 5f 49 53 52 45 47 28 73 74 61   if( S_ISREG(sta
aab0: 74 62 75 66 2e 73 74 5f 6d 6f 64 65 29 20 29 7b  tbuf.st_mode) ){
aac0: 0a 20 20 20 20 20 20 69 66 28 20 61 63 63 65 73  .      if( acces
aad0: 73 28 7a 4c 69 6e 65 2c 52 5f 4f 4b 29 20 29 7b  s(zLine,R_OK) ){
aae0: 0a 20 20 20 20 20 20 20 20 4e 6f 74 46 6f 75 6e  .        NotFoun
aaf0: 64 28 5f 5f 4c 49 4e 45 5f 5f 29 3b 0a 20 20 20  d(__LINE__);.   
ab00: 20 20 20 7d 0a 20 20 20 20 20 20 7a 52 65 61 6c     }.      zReal
ab10: 53 63 72 69 70 74 20 3d 20 53 74 72 44 75 70 28  Script = StrDup(
ab20: 26 7a 4c 69 6e 65 5b 31 5d 29 3b 0a 20 20 20 20  &zLine[1]);.    
ab30: 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 7d 0a 20    break;.    }. 
ab40: 20 20 20 69 66 28 20 7a 53 63 72 69 70 74 5b 69     if( zScript[i
ab50: 5d 3d 3d 30 20 7c 7c 20 7a 53 63 72 69 70 74 5b  ]==0 || zScript[
ab60: 69 2b 31 5d 3d 3d 30 20 29 7b 0a 20 20 20 20 20  i+1]==0 ){.     
ab70: 20 73 74 72 63 70 79 28 26 7a 4c 69 6e 65 5b 69   strcpy(&zLine[i
ab80: 2b 31 5d 2c 22 2f 69 6e 64 65 78 2e 68 74 6d 6c  +1],"/index.html
ab90: 22 29 3b 0a 20 20 20 20 20 20 69 66 28 20 73 74  ");.      if( st
aba0: 61 74 28 7a 4c 69 6e 65 2c 26 73 74 61 74 62 75  at(zLine,&statbu
abb0: 66 29 21 3d 30 20 7c 7c 20 21 53 5f 49 53 52 45  f)!=0 || !S_ISRE
abc0: 47 28 73 74 61 74 62 75 66 2e 73 74 5f 6d 6f 64  G(statbuf.st_mod
abd0: 65 29 20 0a 20 20 20 20 20 20 7c 7c 20 61 63 63  e) .      || acc
abe0: 65 73 73 28 7a 4c 69 6e 65 2c 52 5f 4f 4b 29 20  ess(zLine,R_OK) 
abf0: 29 7b 0a 20 20 20 20 20 20 20 20 73 74 72 63 70  ){.        strcp
ac00: 79 28 26 7a 4c 69 6e 65 5b 69 2b 31 5d 2c 22 2f  y(&zLine[i+1],"/
ac10: 69 6e 64 65 78 2e 63 67 69 22 29 3b 0a 20 20 20  index.cgi");.   
ac20: 20 20 20 20 20 69 66 28 20 73 74 61 74 28 7a 4c       if( stat(zL
ac30: 69 6e 65 2c 26 73 74 61 74 62 75 66 29 21 3d 30  ine,&statbuf)!=0
ac40: 20 7c 7c 20 21 53 5f 49 53 52 45 47 28 73 74 61   || !S_ISREG(sta
ac50: 74 62 75 66 2e 73 74 5f 6d 6f 64 65 29 20 0a 20  tbuf.st_mode) . 
ac60: 20 20 20 20 20 20 20 7c 7c 20 61 63 63 65 73 73         || access
ac70: 28 7a 4c 69 6e 65 2c 52 5f 4f 4b 29 20 29 7b 0a  (zLine,R_OK) ){.
ac80: 20 20 20 20 20 20 20 20 20 20 4e 6f 74 46 6f 75            NotFou
ac90: 6e 64 28 5f 5f 4c 49 4e 45 5f 5f 29 3b 0a 20 20  nd(__LINE__);.  
aca0: 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 7d 0a        }.      }.
acb0: 20 20 20 20 20 20 7a 52 65 61 6c 53 63 72 69 70        zRealScrip
acc0: 74 20 3d 20 53 74 72 44 75 70 28 26 7a 4c 69 6e  t = StrDup(&zLin
acd0: 65 5b 31 5d 29 3b 0a 20 20 20 20 20 20 69 66 28  e[1]);.      if(
ace0: 20 7a 53 63 72 69 70 74 5b 69 5d 3d 3d 30 20 29   zScript[i]==0 )
acf0: 7b 0a 20 20 20 20 20 20 20 20 2f 2a 20 49 66 20  {.        /* If 
ad00: 74 68 65 20 72 65 71 75 65 73 74 65 64 20 55 52  the requested UR
ad10: 4c 20 64 6f 65 73 20 6e 6f 74 20 65 6e 64 20 77  L does not end w
ad20: 69 74 68 20 22 2f 22 20 62 75 74 20 77 65 20 68  ith "/" but we h
ad30: 61 64 20 74 6f 0a 20 20 20 20 20 20 20 20 2a 2a  ad to.        **
ad40: 20 61 70 70 65 6e 64 20 22 69 6e 64 65 78 2e 68   append "index.h
ad50: 74 6d 6c 22 2c 20 74 68 65 6e 20 61 20 72 65 64  tml", then a red
ad60: 69 72 65 63 74 20 69 73 20 6e 65 63 65 73 73 61  irect is necessa
ad70: 72 79 2e 20 20 4f 74 68 65 72 77 69 73 65 0a 20  ry.  Otherwise. 
ad80: 20 20 20 20 20 20 20 2a 2a 20 6e 6f 6e 65 20 6f         ** none o
ad90: 66 20 74 68 65 20 72 65 6c 61 74 69 76 65 20 55  f the relative U
ada0: 52 4c 73 20 69 6e 20 74 68 65 20 64 65 6c 69 76  RLs in the deliv
adb0: 65 72 65 64 20 64 6f 63 75 6d 65 6e 74 20 77 69  ered document wi
adc0: 6c 6c 20 62 65 0a 20 20 20 20 20 20 20 20 2a 2a  ll be.        **
add0: 20 63 6f 72 72 65 63 74 2e 20 2a 2f 0a 20 20 20   correct. */.   
ade0: 20 20 20 20 20 52 65 64 69 72 65 63 74 28 7a 52       Redirect(zR
adf0: 65 61 6c 53 63 72 69 70 74 2c 20 31 29 3b 0a 20  ealScript, 1);. 
ae00: 20 20 20 20 20 20 20 72 65 74 75 72 6e 3b 0a 20         return;. 
ae10: 20 20 20 20 20 7d 0a 20 20 20 20 20 20 62 72 65       }.      bre
ae20: 61 6b 3b 0a 20 20 20 20 7d 0a 20 20 20 20 7a 4c  ak;.    }.    zL
ae30: 69 6e 65 5b 69 2b 31 5d 20 3d 20 7a 53 63 72 69  ine[i+1] = zScri
ae40: 70 74 5b 69 5d 3b 0a 20 20 20 20 69 2b 2b 3b 0a  pt[i];.    i++;.
ae50: 20 20 7d 0a 20 20 7a 46 69 6c 65 20 3d 20 53 74    }.  zFile = St
ae60: 72 44 75 70 28 7a 4c 69 6e 65 29 3b 0a 20 20 7a  rDup(zLine);.  z
ae70: 50 61 74 68 49 6e 66 6f 20 3d 20 53 74 72 44 75  PathInfo = StrDu
ae80: 70 28 26 7a 53 63 72 69 70 74 5b 69 5d 29 3b 0a  p(&zScript[i]);.
ae90: 20 20 6c 65 6e 46 69 6c 65 20 3d 20 73 74 72 6c    lenFile = strl
aea0: 65 6e 28 7a 46 69 6c 65 29 3b 0a 20 20 7a 44 69  en(zFile);.  zDi
aeb0: 72 20 3d 20 53 74 72 44 75 70 28 7a 46 69 6c 65  r = StrDup(zFile
aec0: 29 3b 0a 20 20 66 6f 72 28 69 3d 73 74 72 6c 65  );.  for(i=strle
aed0: 6e 28 7a 44 69 72 29 2d 31 3b 20 69 3e 30 20 26  n(zDir)-1; i>0 &
aee0: 26 20 7a 44 69 72 5b 69 5d 21 3d 27 2f 27 3b 20  & zDir[i]!='/'; 
aef0: 69 2d 2d 29 7b 7d 3b 0a 20 20 69 66 28 20 69 3d  i--){};.  if( i=
af00: 3d 30 20 29 7b 0a 20 20 20 20 20 73 74 72 63 70  =0 ){.     strcp
af10: 79 28 7a 44 69 72 2c 22 2f 22 29 3b 0a 20 20 7d  y(zDir,"/");.  }
af20: 65 6c 73 65 7b 0a 20 20 20 20 20 7a 44 69 72 5b  else{.     zDir[
af30: 69 5d 20 3d 20 30 3b 0a 20 20 7d 0a 0a 20 20 2f  i] = 0;.  }..  /
af40: 2a 20 43 68 65 63 6b 20 74 6f 20 73 65 65 20 69  * Check to see i
af50: 66 20 74 68 65 72 65 20 69 73 20 61 6e 20 61 75  f there is an au
af60: 74 68 6f 72 69 7a 61 74 69 6f 6e 20 66 69 6c 65  thorization file
af70: 2e 20 20 49 66 20 74 68 65 72 65 20 69 73 2c 0a  .  If there is,.
af80: 20 20 2a 2a 20 70 72 6f 63 65 73 73 20 69 74 2e    ** process it.
af90: 0a 20 20 2a 2f 0a 20 20 73 70 72 69 6e 74 66 28  .  */.  sprintf(
afa0: 7a 4c 69 6e 65 2c 20 22 25 73 2f 2d 61 75 74 68  zLine, "%s/-auth
afb0: 22 2c 20 7a 44 69 72 29 3b 0a 20 20 69 66 28 20  ", zDir);.  if( 
afc0: 61 63 63 65 73 73 28 7a 4c 69 6e 65 2c 52 5f 4f  access(zLine,R_O
afd0: 4b 29 3d 3d 30 20 26 26 20 21 43 68 65 63 6b 42  K)==0 && !CheckB
afe0: 61 73 69 63 41 75 74 68 6f 72 69 7a 61 74 69 6f  asicAuthorizatio
aff0: 6e 28 7a 4c 69 6e 65 29 20 29 20 72 65 74 75 72  n(zLine) ) retur
b000: 6e 3b 0a 0a 20 20 2f 2a 20 54 61 6b 65 20 61 70  n;..  /* Take ap
b010: 70 72 6f 70 72 69 61 74 65 20 61 63 74 69 6f 6e  propriate action
b020: 0a 20 20 2a 2f 0a 20 20 69 66 28 20 28 73 74 61  .  */.  if( (sta
b030: 74 62 75 66 2e 73 74 5f 6d 6f 64 65 20 26 20 30  tbuf.st_mode & 0
b040: 31 30 30 29 3d 3d 30 31 30 30 20 26 26 20 61 63  100)==0100 && ac
b050: 63 65 73 73 28 7a 46 69 6c 65 2c 58 5f 4f 4b 29  cess(zFile,X_OK)
b060: 3d 3d 30 20 29 7b 0a 20 20 20 20 2f 2a 0a 20 20  ==0 ){.    /*.  
b070: 20 20 2a 2a 20 54 68 65 20 66 6f 6c 6c 6f 77 69    ** The followi
b080: 6e 67 73 20 73 74 61 74 69 63 20 76 61 72 69 61  ngs static varia
b090: 62 6c 65 73 20 61 72 65 20 75 73 65 64 20 74 6f  bles are used to
b0a0: 20 73 65 74 75 70 20 74 68 65 20 65 6e 76 69 72   setup the envir
b0b0: 6f 6e 6d 65 6e 74 0a 20 20 20 20 2a 2a 20 66 6f  onment.    ** fo
b0c0: 72 20 74 68 65 20 43 47 49 20 73 63 72 69 70 74  r the CGI script
b0d0: 0a 20 20 20 20 2a 2f 0a 20 20 20 20 73 74 61 74  .    */.    stat
b0e0: 69 63 20 63 68 61 72 20 2a 64 65 66 61 75 6c 74  ic char *default
b0f0: 5f 70 61 74 68 20 3d 20 22 2f 62 69 6e 3a 2f 75  _path = "/bin:/u
b100: 73 72 2f 62 69 6e 22 3b 0a 20 20 20 20 73 74 61  sr/bin";.    sta
b110: 74 69 63 20 63 68 61 72 20 2a 67 61 74 65 77 61  tic char *gatewa
b120: 79 5f 69 6e 74 65 72 66 61 63 65 20 3d 20 22 43  y_interface = "C
b130: 47 49 2f 31 2e 30 22 3b 0a 20 20 20 20 73 74 61  GI/1.0";.    sta
b140: 74 69 63 20 73 74 72 75 63 74 20 7b 0a 20 20 20  tic struct {.   
b150: 20 20 20 63 68 61 72 20 2a 7a 45 6e 76 4e 61 6d     char *zEnvNam
b160: 65 3b 0a 20 20 20 20 20 20 63 68 61 72 20 2a 2a  e;.      char **
b170: 70 7a 45 6e 76 56 61 6c 75 65 3b 0a 20 20 20 20  pzEnvValue;.    
b180: 7d 20 63 67 69 65 6e 76 5b 5d 20 3d 20 7b 0a 20  } cgienv[] = {. 
b190: 20 20 20 20 20 7b 20 22 41 55 54 48 5f 54 59 50       { "AUTH_TYP
b1a0: 45 22 2c 20 20 20 20 20 20 20 20 20 20 20 20 20  E",             
b1b0: 20 20 20 20 20 20 26 7a 41 75 74 68 54 79 70 65        &zAuthType
b1c0: 20 7d 2c 0a 20 20 20 20 20 20 7b 20 22 41 55 54   },.      { "AUT
b1d0: 48 5f 43 4f 4e 54 45 4e 54 22 2c 20 20 20 20 20  H_CONTENT",     
b1e0: 20 20 20 20 20 20 20 20 20 20 20 26 7a 41 75 74             &zAut
b1f0: 68 41 72 67 20 7d 2c 0a 20 20 20 20 20 20 7b 20  hArg },.      { 
b200: 22 43 4f 4e 54 45 4e 54 5f 4c 45 4e 47 54 48 22  "CONTENT_LENGTH"
b210: 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 26  ,              &
b220: 7a 43 6f 6e 74 65 6e 74 4c 65 6e 67 74 68 20 7d  zContentLength }
b230: 2c 0a 20 20 20 20 20 20 7b 20 22 43 4f 4e 54 45  ,.      { "CONTE
b240: 4e 54 5f 54 59 50 45 22 2c 20 20 20 20 20 20 20  NT_TYPE",       
b250: 20 20 20 20 20 20 20 20 20 26 7a 43 6f 6e 74 65           &zConte
b260: 6e 74 54 79 70 65 20 7d 2c 0a 20 20 20 20 20 20  ntType },.      
b270: 7b 20 22 44 4f 43 55 4d 45 4e 54 5f 52 4f 4f 54  { "DOCUMENT_ROOT
b280: 22 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20  ",              
b290: 20 26 7a 48 6f 6d 65 20 7d 2c 0a 20 20 20 20 20   &zHome },.     
b2a0: 20 7b 20 22 47 41 54 45 57 41 59 5f 49 4e 54 45   { "GATEWAY_INTE
b2b0: 52 46 41 43 45 22 2c 20 20 20 20 20 20 20 20 20  RFACE",         
b2c0: 20 20 26 67 61 74 65 77 61 79 5f 69 6e 74 65 72    &gateway_inter
b2d0: 66 61 63 65 20 7d 2c 0a 20 20 20 20 20 20 7b 20  face },.      { 
b2e0: 22 48 54 54 50 5f 41 43 43 45 50 54 22 2c 20 20  "HTTP_ACCEPT",  
b2f0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 26                 &
b300: 7a 41 63 63 65 70 74 20 7d 2c 0a 20 20 20 20 20  zAccept },.     
b310: 20 7b 20 22 48 54 54 50 5f 43 4f 4f 4b 49 45 22   { "HTTP_COOKIE"
b320: 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  ,               
b330: 20 20 26 7a 43 6f 6f 6b 69 65 20 7d 2c 0a 20 20    &zCookie },.  
b340: 20 20 20 20 7b 20 22 48 54 54 50 5f 48 4f 53 54      { "HTTP_HOST
b350: 22 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20  ",              
b360: 20 20 20 20 20 26 7a 48 74 74 70 48 6f 73 74 20       &zHttpHost 
b370: 7d 2c 0a 20 20 20 20 20 20 7b 20 22 48 54 54 50  },.      { "HTTP
b380: 5f 52 45 46 45 52 45 52 22 2c 20 20 20 20 20 20  _REFERER",      
b390: 20 20 20 20 20 20 20 20 20 20 26 7a 52 65 66 65            &zRefe
b3a0: 72 65 72 20 7d 2c 0a 20 20 20 20 20 20 7b 20 22  rer },.      { "
b3b0: 48 54 54 50 5f 55 53 45 52 5f 41 47 45 4e 54 22  HTTP_USER_AGENT"
b3c0: 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 26 7a  ,             &z
b3d0: 41 67 65 6e 74 20 7d 2c 0a 20 20 20 20 20 20 7b  Agent },.      {
b3e0: 20 22 50 41 54 48 22 2c 20 20 20 20 20 20 20 20   "PATH",        
b3f0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
b400: 26 64 65 66 61 75 6c 74 5f 70 61 74 68 20 7d 2c  &default_path },
b410: 0a 20 20 20 20 20 20 7b 20 22 50 41 54 48 5f 49  .      { "PATH_I
b420: 4e 46 4f 22 2c 20 20 20 20 20 20 20 20 20 20 20  NFO",           
b430: 20 20 20 20 20 20 20 20 26 7a 50 61 74 68 49 6e          &zPathIn
b440: 66 6f 20 7d 2c 0a 20 20 20 20 20 20 7b 20 22 51  fo },.      { "Q
b450: 55 45 52 59 5f 53 54 52 49 4e 47 22 2c 20 20 20  UERY_STRING",   
b460: 20 20 20 20 20 20 20 20 20 20 20 20 20 26 7a 51               &zQ
b470: 75 65 72 79 53 74 72 69 6e 67 20 7d 2c 0a 20 20  ueryString },.  
b480: 20 20 20 20 7b 20 22 52 45 4d 4f 54 45 5f 41 44      { "REMOTE_AD
b490: 44 52 22 2c 20 20 20 20 20 20 20 20 20 20 20 20  DR",            
b4a0: 20 20 20 20 20 26 7a 52 65 6d 6f 74 65 41 64 64       &zRemoteAdd
b4b0: 72 20 7d 2c 0a 20 20 20 20 20 20 7b 20 22 52 45  r },.      { "RE
b4c0: 51 55 45 53 54 5f 4d 45 54 48 4f 44 22 2c 20 20  QUEST_METHOD",  
b4d0: 20 20 20 20 20 20 20 20 20 20 20 20 26 7a 4d 65              &zMe
b4e0: 74 68 6f 64 20 7d 2c 0a 20 20 20 20 20 20 7b 20  thod },.      { 
b4f0: 22 52 45 51 55 45 53 54 5f 55 52 49 22 2c 20 20  "REQUEST_URI",  
b500: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 26                 &
b510: 7a 53 63 72 69 70 74 20 7d 2c 0a 20 20 20 20 20  zScript },.     
b520: 20 7b 20 22 52 45 4d 4f 54 45 5f 55 53 45 52 22   { "REMOTE_USER"
b530: 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  ,               
b540: 20 20 26 7a 52 65 6d 6f 74 65 55 73 65 72 20 7d    &zRemoteUser }
b550: 2c 0a 20 20 20 20 20 20 7b 20 22 53 43 52 49 50  ,.      { "SCRIP
b560: 54 5f 44 49 52 45 43 54 4f 52 59 22 2c 20 20 20  T_DIRECTORY",   
b570: 20 20 20 20 20 20 20 20 20 26 7a 44 69 72 20 7d           &zDir }
b580: 2c 0a 20 20 20 20 20 20 7b 20 22 53 43 52 49 50  ,.      { "SCRIP
b590: 54 5f 46 49 4c 45 4e 41 4d 45 22 2c 20 20 20 20  T_FILENAME",    
b5a0: 20 20 20 20 20 20 20 20 20 26 7a 46 69 6c 65 20           &zFile 
b5b0: 7d 2c 0a 20 20 20 20 20 20 7b 20 22 53 43 52 49  },.      { "SCRI
b5c0: 50 54 5f 4e 41 4d 45 22 2c 20 20 20 20 20 20 20  PT_NAME",       
b5d0: 20 20 20 20 20 20 20 20 20 20 26 7a 52 65 61 6c            &zReal
b5e0: 53 63 72 69 70 74 20 7d 2c 0a 20 20 20 20 20 20  Script },.      
b5f0: 7b 20 22 53 45 52 56 45 52 5f 4e 41 4d 45 22 2c  { "SERVER_NAME",
b600: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
b610: 20 26 7a 53 65 72 76 65 72 4e 61 6d 65 20 7d 2c   &zServerName },
b620: 0a 20 20 20 20 20 20 7b 20 22 53 45 52 56 45 52  .      { "SERVER
b630: 5f 50 4f 52 54 22 2c 20 20 20 20 20 20 20 20 20  _PORT",         
b640: 20 20 20 20 20 20 20 20 26 7a 53 65 72 76 65 72          &zServer
b650: 50 6f 72 74 20 7d 2c 0a 20 20 20 20 20 20 7b 20  Port },.      { 
b660: 22 53 45 52 56 45 52 5f 50 52 4f 54 4f 43 4f 4c  "SERVER_PROTOCOL
b670: 22 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 26  ",             &
b680: 7a 50 72 6f 74 6f 63 6f 6c 20 7d 2c 0a 20 20 20  zProtocol },.   
b690: 20 7d 3b 0a 20 20 20 20 63 68 61 72 20 2a 7a 42   };.    char *zB
b6a0: 61 73 65 46 69 6c 65 6e 61 6d 65 3b 20 20 20 2f  aseFilename;   /
b6b0: 2a 20 46 69 6c 65 6e 61 6d 65 20 77 69 74 68 6f  * Filename witho
b6c0: 75 74 20 64 69 72 65 63 74 6f 72 79 20 70 72 65  ut directory pre
b6d0: 66 69 78 20 2a 2f 0a 0a 20 20 20 20 2f 2a 20 49  fix */..    /* I
b6e0: 66 20 69 74 73 20 65 78 65 63 75 74 61 62 6c 65  f its executable
b6f0: 2c 20 69 74 20 6d 75 73 74 20 62 65 20 61 20 43  , it must be a C
b700: 47 49 20 70 72 6f 67 72 61 6d 2e 20 20 53 74 61  GI program.  Sta
b710: 72 74 20 62 79 0a 20 20 20 20 2a 2a 20 63 68 61  rt by.    ** cha
b720: 6e 67 69 6e 67 20 64 69 72 65 63 74 6f 72 69 65  nging directorie
b730: 73 20 74 6f 20 74 68 65 20 64 69 72 65 63 74 6f  s to the directo
b740: 72 79 20 68 6f 6c 64 69 6e 67 20 74 68 65 20 70  ry holding the p
b750: 72 6f 67 72 61 6d 2e 0a 20 20 20 20 2a 2f 0a 20  rogram..    */. 
b760: 20 20 20 69 66 28 20 63 68 64 69 72 28 7a 44 69     if( chdir(zDi
b770: 72 29 20 29 7b 0a 20 20 20 20 20 20 63 68 61 72  r) ){.      char
b780: 20 7a 42 75 66 5b 31 30 30 30 5d 3b 0a 20 20 20   zBuf[1000];.   
b790: 20 20 20 4d 61 6c 66 75 6e 63 74 69 6f 6e 28 5f     Malfunction(_
b7a0: 5f 4c 49 4e 45 5f 5f 2c 20 22 63 61 6e 6e 6f 74  _LINE__, "cannot
b7b0: 20 63 68 64 69 72 20 74 6f 20 5b 25 73 5d 20 66   chdir to [%s] f
b7c0: 72 6f 6d 20 5b 25 73 5d 22 2c 20 0a 20 20 20 20  rom [%s]", .    
b7d0: 20 20 20 20 20 20 20 7a 44 69 72 2c 20 67 65 74         zDir, get
b7e0: 63 77 64 28 7a 42 75 66 2c 39 39 39 29 29 3b 0a  cwd(zBuf,999));.
b7f0: 20 20 20 20 7d 0a 0a 20 20 20 20 2f 2a 20 53 65      }..    /* Se
b800: 74 75 70 20 74 68 65 20 65 6e 76 69 72 6f 6e 6d  tup the environm
b810: 65 6e 74 20 61 70 70 72 6f 70 72 69 61 74 65 6c  ent appropriatel
b820: 79 2e 0a 20 20 20 20 2a 2f 0a 20 20 20 20 66 6f  y..    */.    fo
b830: 72 28 69 3d 30 3b 20 69 3c 28 69 6e 74 29 28 73  r(i=0; i<(int)(s
b840: 69 7a 65 6f 66 28 63 67 69 65 6e 76 29 2f 73 69  izeof(cgienv)/si
b850: 7a 65 6f 66 28 63 67 69 65 6e 76 5b 30 5d 29 29  zeof(cgienv[0]))
b860: 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 20 20 69 66  ; i++){.      if
b870: 28 20 2a 63 67 69 65 6e 76 5b 69 5d 2e 70 7a 45  ( *cgienv[i].pzE
b880: 6e 76 56 61 6c 75 65 20 29 7b 0a 20 20 20 20 20  nvValue ){.     
b890: 20 20 20 53 65 74 45 6e 76 28 63 67 69 65 6e 76     SetEnv(cgienv
b8a0: 5b 69 5d 2e 7a 45 6e 76 4e 61 6d 65 2c 2a 63 67  [i].zEnvName,*cg
b8b0: 69 65 6e 76 5b 69 5d 2e 70 7a 45 6e 76 56 61 6c  ienv[i].pzEnvVal
b8c0: 75 65 29 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20  ue);.      }.   
b8d0: 20 7d 0a 20 20 20 20 69 66 28 20 75 73 65 48 74   }.    if( useHt
b8e0: 74 70 73 20 29 7b 0a 20 20 20 20 20 20 70 75 74  tps ){.      put
b8f0: 65 6e 76 28 22 48 54 54 50 53 3d 6f 6e 22 29 3b  env("HTTPS=on");
b900: 0a 20 20 20 20 7d 0a 0a 20 20 20 20 2f 2a 0a 20  .    }..    /*. 
b910: 20 20 20 2a 2a 20 41 62 6f 72 74 20 77 69 74 68     ** Abort with
b920: 20 61 6e 20 65 72 72 6f 72 20 69 66 20 74 68 65   an error if the
b930: 20 43 47 49 20 73 63 72 69 70 74 20 69 73 20 77   CGI script is w
b940: 72 69 74 61 62 6c 65 20 62 79 20 61 6e 79 6f 6e  ritable by anyon
b950: 65 20 6f 74 68 65 72 0a 20 20 20 20 2a 2a 20 74  e other.    ** t
b960: 68 61 6e 20 69 74 73 20 6f 77 6e 65 72 2e 0a 20  han its owner.. 
b970: 20 20 20 2a 2f 0a 20 20 20 20 69 66 28 20 73 74     */.    if( st
b980: 61 74 62 75 66 2e 73 74 5f 6d 6f 64 65 20 26 20  atbuf.st_mode & 
b990: 30 30 32 32 20 29 7b 0a 20 20 20 20 20 20 43 67  0022 ){.      Cg
b9a0: 69 53 63 72 69 70 74 57 72 69 74 61 62 6c 65 28  iScriptWritable(
b9b0: 29 3b 0a 20 20 20 20 7d 0a 0a 20 20 20 20 2f 2a  );.    }..    /*
b9c0: 20 46 6f 72 20 74 68 65 20 50 4f 53 54 20 6d 65   For the POST me
b9d0: 74 68 6f 64 20 61 6c 6c 20 69 6e 70 75 74 20 68  thod all input h
b9e0: 61 73 20 62 65 65 6e 20 77 72 69 74 74 65 6e 20  as been written 
b9f0: 74 6f 20 61 20 74 65 6d 70 6f 72 61 72 79 20 66  to a temporary f
ba00: 69 6c 65 2c 0a 20 20 20 20 2a 2a 20 73 6f 20 77  ile,.    ** so w
ba10: 65 20 68 61 76 65 20 74 6f 20 72 65 64 69 72 65  e have to redire
ba20: 63 74 20 69 6e 70 75 74 20 74 6f 20 74 68 65 20  ct input to the 
ba30: 43 47 49 20 73 63 72 69 70 74 20 66 72 6f 6d 20  CGI script from 
ba40: 74 68 61 74 20 66 69 6c 65 2e 0a 20 20 20 20 2a  that file..    *
ba50: 2f 0a 20 20 20 20 69 66 28 20 7a 4d 65 74 68 6f  /.    if( zMetho
ba60: 64 5b 30 5d 3d 3d 27 50 27 20 29 7b 0a 20 20 20  d[0]=='P' ){.   
ba70: 20 20 20 64 75 70 28 30 29 3b 0a 20 20 20 20 20     dup(0);.     
ba80: 20 63 6c 6f 73 65 28 30 29 3b 0a 20 20 20 20 20   close(0);.     
ba90: 20 6f 70 65 6e 28 7a 54 6d 70 4e 61 6d 2c 20 4f   open(zTmpNam, O
baa0: 5f 52 44 4f 4e 4c 59 29 3b 0a 20 20 20 20 7d 0a  _RDONLY);.    }.
bab0: 0a 20 20 20 20 66 6f 72 28 69 3d 73 74 72 6c 65  .    for(i=strle
bac0: 6e 28 7a 46 69 6c 65 29 2d 31 3b 20 69 3e 3d 30  n(zFile)-1; i>=0
bad0: 20 26 26 20 7a 46 69 6c 65 5b 69 5d 21 3d 27 2f   && zFile[i]!='/
bae0: 27 3b 20 69 2d 2d 29 7b 7d 0a 20 20 20 20 7a 42  '; i--){}.    zB
baf0: 61 73 65 46 69 6c 65 6e 61 6d 65 20 3d 20 26 7a  aseFilename = &z
bb00: 46 69 6c 65 5b 69 2b 31 5d 3b 0a 20 20 20 20 69  File[i+1];.    i
bb10: 66 28 20 69 3e 3d 30 20 26 26 20 73 74 72 6e 63  f( i>=0 && strnc
bb20: 6d 70 28 7a 42 61 73 65 46 69 6c 65 6e 61 6d 65  mp(zBaseFilename
bb30: 2c 22 6e 70 68 2d 22 2c 34 29 3d 3d 30 20 29 7b  ,"nph-",4)==0 ){
bb40: 0a 20 20 20 20 20 20 2f 2a 20 49 66 20 74 68 65  .      /* If the
bb50: 20 6e 61 6d 65 20 6f 66 20 74 68 65 20 43 47 49   name of the CGI
bb60: 20 73 63 72 69 70 74 20 62 65 67 69 6e 73 20 77   script begins w
bb70: 69 74 68 20 22 6e 70 68 2d 22 20 74 68 65 6e 20  ith "nph-" then 
bb80: 77 65 20 61 72 65 0a 20 20 20 20 20 20 2a 2a 20  we are.      ** 
bb90: 64 65 61 6c 69 6e 67 20 77 69 74 68 20 61 20 22  dealing with a "
bba0: 6e 6f 6e 2d 70 61 72 73 65 64 20 68 65 61 64 65  non-parsed heade
bbb0: 72 73 22 20 43 47 49 20 73 63 72 69 70 74 2e 20  rs" CGI script. 
bbc0: 20 4a 75 73 74 20 65 78 65 63 28 29 0a 20 20 20   Just exec().   
bbd0: 20 20 20 2a 2a 20 69 74 20 64 69 72 65 63 74 6c     ** it directl
bbe0: 79 20 61 6e 64 20 6c 65 74 20 69 74 20 68 61 6e  y and let it han
bbf0: 64 6c 65 20 61 6c 6c 20 69 74 73 20 6f 77 6e 20  dle all its own 
bc00: 68 65 61 64 65 72 20 67 65 6e 65 72 61 74 69 6f  header generatio
bc10: 6e 2e 0a 20 20 20 20 20 20 2a 2f 0a 20 20 20 20  n..      */.    
bc20: 20 20 65 78 65 63 6c 28 7a 42 61 73 65 46 69 6c    execl(zBaseFil
bc30: 65 6e 61 6d 65 2c 7a 42 61 73 65 46 69 6c 65 6e  ename,zBaseFilen
bc40: 61 6d 65 2c 28 63 68 61 72 2a 29 30 29 3b 0a 20  ame,(char*)0);. 
bc50: 20 20 20 20 20 2f 2a 20 4e 4f 54 45 3a 20 4e 6f       /* NOTE: No
bc60: 20 6c 6f 67 20 65 6e 74 72 79 20 77 72 69 74 74   log entry writt
bc70: 65 6e 20 66 6f 72 20 6e 70 68 2d 20 73 63 72 69  en for nph- scri
bc80: 70 74 73 20 2a 2f 0a 20 20 20 20 20 20 65 78 69  pts */.      exi
bc90: 74 28 30 29 3b 0a 20 20 20 20 7d 0a 0a 20 20 20  t(0);.    }..   
bca0: 20 2f 2a 20 46 61 6c 6c 20 74 68 72 75 20 74 6f   /* Fall thru to
bcb0: 20 68 65 72 65 20 6f 6e 6c 79 20 69 66 20 74 68   here only if th
bcc0: 69 73 20 70 72 6f 63 65 73 73 20 28 74 68 65 20  is process (the 
bcd0: 73 65 72 76 65 72 29 20 69 73 20 67 6f 69 6e 67  server) is going
bce0: 0a 20 20 20 20 2a 2a 20 74 6f 20 72 65 61 64 20  .    ** to read 
bcf0: 61 6e 64 20 61 75 67 6d 65 6e 74 20 74 68 65 20  and augment the 
bd00: 68 65 61 64 65 72 20 73 65 6e 74 20 62 61 63 6b  header sent back
bd10: 20 62 79 20 74 68 65 20 43 47 49 20 70 72 6f 63   by the CGI proc
bd20: 65 73 73 2e 0a 20 20 20 20 2a 2a 20 4f 70 65 6e  ess..    ** Open
bd30: 20 61 20 70 69 70 65 20 74 6f 20 72 65 63 65 69   a pipe to recei
bd40: 76 65 20 74 68 65 20 6f 75 74 70 75 74 20 66 72  ve the output fr
bd50: 6f 6d 20 74 68 65 20 43 47 49 20 70 72 6f 63 65  om the CGI proce
bd60: 73 73 2e 20 20 54 68 65 6e 0a 20 20 20 20 2a 2a  ss.  Then.    **
bd70: 20 66 6f 72 6b 20 74 68 65 20 43 47 49 20 70 72   fork the CGI pr
bd80: 6f 63 65 73 73 2e 20 20 4f 6e 63 65 20 65 76 65  ocess.  Once eve
bd90: 72 79 74 68 69 6e 67 20 69 73 20 64 6f 6e 65 2c  rything is done,
bda0: 20 77 65 20 73 68 6f 75 6c 64 20 62 65 0a 20 20   we should be.  
bdb0: 20 20 2a 2a 20 61 62 6c 65 20 74 6f 20 72 65 61    ** able to rea
bdc0: 64 20 74 68 65 20 6f 75 74 70 75 74 20 6f 66 20  d the output of 
bdd0: 43 47 49 20 6f 6e 20 74 68 65 20 22 69 6e 22 20  CGI on the "in" 
bde0: 73 74 72 65 61 6d 2e 0a 20 20 20 20 2a 2f 0a 20  stream..    */. 
bdf0: 20 20 20 7b 0a 20 20 20 20 20 20 69 6e 74 20 70     {.      int p
be00: 78 5b 32 5d 3b 0a 20 20 20 20 20 20 70 69 70 65  x[2];.      pipe
be10: 28 70 78 29 3b 0a 20 20 20 20 20 20 69 66 28 20  (px);.      if( 
be20: 66 6f 72 6b 28 29 3d 3d 30 20 29 7b 0a 20 20 20  fork()==0 ){.   
be30: 20 20 20 20 20 63 6c 6f 73 65 28 70 78 5b 30 5d       close(px[0]
be40: 29 3b 0a 20 20 20 20 20 20 20 20 63 6c 6f 73 65  );.        close
be50: 28 31 29 3b 0a 20 20 20 20 20 20 20 20 64 75 70  (1);.        dup
be60: 28 70 78 5b 31 5d 29 3b 0a 20 20 20 20 20 20 20  (px[1]);.       
be70: 20 63 6c 6f 73 65 28 70 78 5b 31 5d 29 3b 0a 20   close(px[1]);. 
be80: 20 20 20 20 20 20 20 65 78 65 63 6c 28 7a 42 61         execl(zBa
be90: 73 65 46 69 6c 65 6e 61 6d 65 2c 20 7a 42 61 73  seFilename, zBas
bea0: 65 46 69 6c 65 6e 61 6d 65 2c 20 28 63 68 61 72  eFilename, (char
beb0: 2a 29 30 29 3b 0a 20 20 20 20 20 20 20 20 65 78  *)0);.        ex
bec0: 69 74 28 30 29 3b 0a 20 20 20 20 20 20 7d 0a 20  it(0);.      }. 
bed0: 20 20 20 20 20 63 6c 6f 73 65 28 70 78 5b 31 5d       close(px[1]
bee0: 29 3b 0a 20 20 20 20 20 20 69 6e 20 3d 20 66 64  );.      in = fd
bef0: 6f 70 65 6e 28 70 78 5b 30 5d 2c 20 22 72 22 29  open(px[0], "r")
bf00: 3b 0a 20 20 20 20 7d 0a 20 20 20 20 69 66 28 20  ;.    }.    if( 
bf10: 69 6e 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 43  in==0 ){.      C
bf20: 67 69 45 72 72 6f 72 28 29 3b 0a 20 20 20 20 7d  giError();.    }
bf30: 0a 0a 20 20 20 20 2f 2a 20 52 65 61 64 20 61 6e  ..    /* Read an
bf40: 64 20 70 72 6f 63 65 73 73 20 74 68 65 20 66 69  d process the fi
bf50: 72 73 74 20 6c 69 6e 65 20 6f 66 20 74 68 65 20  rst line of the 
bf60: 68 65 61 64 65 72 20 72 65 74 75 72 6e 65 64 20  header returned 
bf70: 62 79 20 74 68 65 0a 20 20 20 20 2a 2a 20 43 47  by the.    ** CG
bf80: 49 20 73 63 72 69 70 74 2e 0a 20 20 20 20 2a 2f  I script..    */
bf90: 0a 20 20 20 20 69 66 28 20 75 73 65 54 69 6d 65  .    if( useTime
bfa0: 6f 75 74 20 29 20 61 6c 61 72 6d 28 31 35 29 3b  out ) alarm(15);
bfb0: 0a 20 20 20 20 77 68 69 6c 65 28 20 66 67 65 74  .    while( fget
bfc0: 73 28 7a 4c 69 6e 65 2c 73 69 7a 65 6f 66 28 7a  s(zLine,sizeof(z
bfd0: 4c 69 6e 65 29 2c 69 6e 29 20 29 7b 0a 20 20 20  Line),in) ){.   
bfe0: 20 20 20 69 66 28 20 73 74 72 6e 63 6d 70 28 7a     if( strncmp(z
bff0: 4c 69 6e 65 2c 22 4c 6f 63 61 74 69 6f 6e 3a 22  Line,"Location:"
c000: 2c 39 29 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20  ,9)==0 ){.      
c010: 20 20 69 6e 74 20 69 3b 0a 20 20 20 20 20 20 20    int i;.       
c020: 20 52 65 6d 6f 76 65 4e 65 77 6c 69 6e 65 28 7a   RemoveNewline(z
c030: 4c 69 6e 65 29 3b 0a 20 20 20 20 20 20 20 20 7a  Line);.        z
c040: 20 3d 20 26 7a 4c 69 6e 65 5b 31 30 5d 3b 0a 20   = &zLine[10];. 
c050: 20 20 20 20 20 20 20 77 68 69 6c 65 28 20 69 73         while( is
c060: 73 70 61 63 65 28 2a 7a 29 20 29 7b 20 7a 2b 2b  space(*z) ){ z++
c070: 3b 20 7d 0a 20 20 20 20 20 20 20 20 66 6f 72 28  ; }.        for(
c080: 69 3d 30 3b 20 7a 5b 69 5d 3b 20 69 2b 2b 29 7b  i=0; z[i]; i++){
c090: 0a 20 20 20 20 20 20 20 20 20 20 69 66 28 20 7a  .          if( z
c0a0: 5b 69 5d 3d 3d 27 3f 27 20 29 7b 0a 20 20 20 20  [i]=='?' ){.    
c0b0: 20 20 20 20 20 20 20 20 7a 51 75 65 72 79 53 75          zQuerySu
c0c0: 66 66 69 78 20 3d 20 53 74 72 44 75 70 28 22 22  ffix = StrDup(""
c0d0: 29 3b 0a 20 20 20 20 20 20 20 20 20 20 7d 0a 20  );.          }. 
c0e0: 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 20         }.       
c0f0: 20 0a 20 20 20 20 20 20 20 20 69 66 28 20 7a 5b   .        if( z[
c100: 30 5d 3d 3d 27 2f 27 20 26 26 20 7a 5b 31 5d 3d  0]=='/' && z[1]=
c110: 3d 27 2f 27 20 29 7b 0a 20 20 20 20 20 20 20 20  ='/' ){.        
c120: 20 20 2f 2a 20 54 68 65 20 73 63 68 65 6d 65 20    /* The scheme 
c130: 69 73 20 6d 69 73 73 69 6e 67 2e 20 20 41 64 64  is missing.  Add
c140: 20 69 74 20 69 6e 20 62 65 66 6f 72 65 20 72 65   it in before re
c150: 64 69 72 65 63 74 69 6e 67 20 2a 2f 0a 20 20 20  directing */.   
c160: 20 20 20 20 20 20 20 53 74 61 72 74 52 65 73 70         StartResp
c170: 6f 6e 73 65 28 22 33 30 32 20 52 65 64 69 72 65  onse("302 Redire
c180: 63 74 22 29 3b 0a 20 20 20 20 20 20 20 20 20 20  ct");.          
c190: 6e 4f 75 74 20 2b 3d 20 70 72 69 6e 74 66 28 22  nOut += printf("
c1a0: 4c 6f 63 61 74 69 6f 6e 3a 20 25 73 3a 25 73 25  Location: %s:%s%
c1b0: 73 5c 72 5c 6e 22 2c 7a 48 74 74 70 2c 7a 2c 7a  s\r\n",zHttp,z,z
c1c0: 51 75 65 72 79 53 75 66 66 69 78 29 3b 0a 20 20  QuerySuffix);.  
c1d0: 20 20 20 20 20 20 20 20 62 72 65 61 6b 3b 20 2f          break; /
c1e0: 2a 20 44 4b 20 2a 2f 0a 20 20 20 20 20 20 20 20  * DK */.        
c1f0: 20 20 4d 61 6b 65 4c 6f 67 45 6e 74 72 79 28 30    MakeLogEntry(0
c200: 29 3b 0a 20 20 20 20 20 20 20 20 20 20 72 65 74  );.          ret
c210: 75 72 6e 3b 0a 20 20 20 20 20 20 20 20 7d 65 6c  urn;.        }el
c220: 73 65 20 69 66 28 20 7a 5b 30 5d 3d 3d 27 2f 27  se if( z[0]=='/'
c230: 20 29 7b 0a 20 20 20 20 20 20 20 20 20 20 2f 2a   ){.          /*
c240: 20 54 68 65 20 73 63 68 65 6d 65 20 61 6e 64 20   The scheme and 
c250: 6e 65 74 77 6f 72 6b 20 6c 6f 63 61 74 69 6f 6e  network location
c260: 20 61 72 65 20 6d 69 73 73 69 6e 67 20 62 75 74   are missing but
c270: 20 77 65 20 68 61 76 65 0a 20 20 20 20 20 20 20   we have.       
c280: 20 20 20 2a 2a 20 61 6e 20 61 62 73 6f 6c 75 74     ** an absolut
c290: 65 20 70 61 74 68 2e 20 2a 2f 0a 20 20 20 20 20  e path. */.     
c2a0: 20 20 20 20 20 52 65 64 69 72 65 63 74 28 7a 2c       Redirect(z,
c2b0: 20 30 29 3b 20 2f 2a 20 44 4b 20 2a 2f 0a 20 20   0); /* DK */.  
c2c0: 20 20 20 20 20 20 20 20 62 72 65 61 6b 3b 0a 20          break;. 
c2d0: 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 20         }.       
c2e0: 20 2f 2a 20 43 68 65 63 6b 20 74 6f 20 73 65 65   /* Check to see
c2f0: 20 69 66 20 74 68 65 72 65 20 69 73 20 61 20 73   if there is a s
c300: 63 68 65 6d 65 20 70 72 65 66 69 78 20 2a 2f 0a  cheme prefix */.
c310: 20 20 20 20 20 20 20 20 66 6f 72 28 69 3d 30 3b          for(i=0;
c320: 20 7a 5b 69 5d 20 26 26 20 7a 5b 69 5d 21 3d 27   z[i] && z[i]!='
c330: 3a 27 20 26 26 20 7a 5b 69 5d 21 3d 27 2f 27 3b  :' && z[i]!='/';
c340: 20 69 2b 2b 29 7b 7d 0a 20 20 20 20 20 20 20 20   i++){}.        
c350: 69 66 28 20 7a 5b 69 5d 3d 3d 27 3a 27 20 29 7b  if( z[i]==':' ){
c360: 0a 20 20 20 20 20 20 20 20 20 20 2f 2a 20 57 65  .          /* We
c370: 20 68 61 76 65 20 61 20 73 63 68 65 6d 65 2e 20   have a scheme. 
c380: 20 41 73 73 75 6d 65 20 74 68 65 72 65 20 69 73   Assume there is
c390: 20 61 6e 20 61 62 73 6f 6c 75 74 65 20 55 52 4c   an absolute URL
c3a0: 20 2a 2f 0a 20 20 20 20 20 20 20 20 20 20 53 74   */.          St
c3b0: 61 72 74 52 65 73 70 6f 6e 73 65 28 22 33 30 32  artResponse("302
c3c0: 20 52 65 64 69 72 65 63 74 22 29 3b 0a 20 20 20   Redirect");.   
c3d0: 20 20 20 20 20 20 20 6e 4f 75 74 20 2b 3d 20 70         nOut += p
c3e0: 72 69 6e 74 66 28 22 4c 6f 63 61 74 69 6f 6e 3a  rintf("Location:
c3f0: 20 25 73 25 73 5c 72 5c 6e 22 2c 7a 2c 7a 51 75   %s%s\r\n",z,zQu
c400: 65 72 79 53 75 66 66 69 78 29 3b 0a 20 20 20 20  erySuffix);.    
c410: 20 20 20 20 20 20 62 72 65 61 6b 3b 20 2f 2a 20        break; /* 
c420: 44 4b 20 2a 2f 0a 20 20 20 20 20 20 20 20 20 20  DK */.          
c430: 4d 61 6b 65 4c 6f 67 45 6e 74 72 79 28 30 29 3b  MakeLogEntry(0);
c440: 0a 20 20 20 20 20 20 20 20 20 20 72 65 74 75 72  .          retur
c450: 6e 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20 20 20  n;.        }.   
c460: 20 20 20 20 20 2f 2a 20 4d 75 73 74 20 62 65 20       /* Must be 
c470: 61 20 72 65 6c 61 74 69 76 65 20 70 61 74 68 6e  a relative pathn
c480: 61 6d 65 2e 20 20 43 6f 6e 73 74 72 75 63 74 20  ame.  Construct 
c490: 74 68 65 20 61 62 73 6f 6c 75 74 65 20 70 61 74  the absolute pat
c4a0: 68 6e 61 6d 65 0a 20 20 20 20 20 20 20 20 2a 2a  hname.        **
c4b0: 20 61 6e 64 20 72 65 64 69 72 65 63 74 20 74 6f   and redirect to
c4c0: 20 69 74 2e 20 2a 2f 0a 20 20 20 20 20 20 20 20   it. */.        
c4d0: 69 20 3d 20 73 74 72 6c 65 6e 28 7a 52 65 61 6c  i = strlen(zReal
c4e0: 53 63 72 69 70 74 29 3b 0a 20 20 20 20 20 20 20  Script);.       
c4f0: 20 77 68 69 6c 65 28 20 69 3e 30 20 26 26 20 7a   while( i>0 && z
c500: 52 65 61 6c 53 63 72 69 70 74 5b 69 2d 31 5d 21  RealScript[i-1]!
c510: 3d 27 2f 27 20 29 7b 20 69 2d 2d 3b 20 7d 0a 20  ='/' ){ i--; }. 
c520: 20 20 20 20 20 20 20 77 68 69 6c 65 28 20 69 3e         while( i>
c530: 30 20 26 26 20 7a 52 65 61 6c 53 63 72 69 70 74  0 && zRealScript
c540: 5b 69 2d 31 5d 3d 3d 27 2f 27 20 29 7b 20 69 2d  [i-1]=='/' ){ i-
c550: 2d 3b 20 7d 0a 20 20 20 20 20 20 20 20 77 68 69  -; }.        whi
c560: 6c 65 28 20 2a 7a 3d 3d 27 2e 27 20 29 7b 0a 20  le( *z=='.' ){. 
c570: 20 20 20 20 20 20 20 20 20 69 66 28 20 7a 5b 31           if( z[1
c580: 5d 3d 3d 27 2f 27 20 29 7b 0a 20 20 20 20 20 20  ]=='/' ){.      
c590: 20 20 20 20 20 20 7a 20 2b 3d 20 32 3b 0a 20 20        z += 2;.  
c5a0: 20 20 20 20 20 20 20 20 7d 65 6c 73 65 20 69 66          }else if
c5b0: 28 20 7a 5b 31 5d 3d 3d 27 2e 27 20 26 26 20 7a  ( z[1]=='.' && z
c5c0: 5b 32 5d 3d 3d 27 2f 27 20 29 7b 0a 20 20 20 20  [2]=='/' ){.    
c5d0: 20 20 20 20 20 20 20 20 77 68 69 6c 65 28 20 69          while( i
c5e0: 3e 30 20 26 26 20 7a 52 65 61 6c 53 63 72 69 70  >0 && zRealScrip
c5f0: 74 5b 69 2d 31 5d 21 3d 27 2f 27 20 29 7b 20 69  t[i-1]!='/' ){ i
c600: 2d 2d 3b 20 7d 0a 20 20 20 20 20 20 20 20 20 20  --; }.          
c610: 20 20 77 68 69 6c 65 28 20 69 3e 30 20 26 26 20    while( i>0 && 
c620: 7a 52 65 61 6c 53 63 72 69 70 74 5b 69 2d 31 5d  zRealScript[i-1]
c630: 3d 3d 27 2f 27 20 29 7b 20 69 2d 2d 3b 20 7d 0a  =='/' ){ i--; }.
c640: 20 20 20 20 20 20 20 20 20 20 20 20 7a 20 2b 3d              z +=
c650: 20 33 3b 0a 20 20 20 20 20 20 20 20 20 20 7d 65   3;.          }e
c660: 6c 73 65 7b 0a 20 20 20 20 20 20 20 20 20 20 20  lse{.           
c670: 20 62 72 65 61 6b 3b 0a 20 20 20 20 20 20 20 20   break;.        
c680: 20 20 7d 0a 20 20 20 20 20 20 20 20 7d 0a 20 20    }.        }.  
c690: 20 20 20 20 20 20 53 74 61 72 74 52 65 73 70 6f        StartRespo
c6a0: 6e 73 65 28 22 33 30 32 20 52 65 64 69 72 65 63  nse("302 Redirec
c6b0: 74 22 29 3b 0a 20 20 20 20 20 20 20 20 6e 4f 75  t");.        nOu
c6c0: 74 20 2b 3d 20 70 72 69 6e 74 66 28 22 4c 6f 63  t += printf("Loc
c6d0: 61 74 69 6f 6e 3a 20 25 73 3a 2f 2f 25 73 22 2c  ation: %s://%s",
c6e0: 7a 48 74 74 70 2c 7a 53 65 72 76 65 72 4e 61 6d  zHttp,zServerNam
c6f0: 65 29 3b 0a 20 20 20 20 20 20 20 20 69 66 28 20  e);.        if( 
c700: 73 74 72 63 6d 70 28 7a 53 65 72 76 65 72 50 6f  strcmp(zServerPo
c710: 72 74 2c 22 38 30 22 29 20 29 7b 0a 20 20 20 20  rt,"80") ){.    
c720: 20 20 20 20 20 20 6e 4f 75 74 20 2b 3d 20 70 72        nOut += pr
c730: 69 6e 74 66 28 22 3a 25 73 22 2c 7a 53 65 72 76  intf(":%s",zServ
c740: 65 72 50 6f 72 74 29 3b 0a 20 20 20 20 20 20 20  erPort);.       
c750: 20 7d 0a 20 20 20 20 20 20 20 20 6e 4f 75 74 20   }.        nOut 
c760: 2b 3d 20 70 72 69 6e 74 66 28 22 25 2e 2a 73 2f  += printf("%.*s/
c770: 25 73 25 73 5c 72 5c 6e 5c 72 5c 6e 22 2c 69 2c  %s%s\r\n\r\n",i,
c780: 7a 52 65 61 6c 53 63 72 69 70 74 2c 7a 2c 7a 51  zRealScript,z,zQ
c790: 75 65 72 79 53 75 66 66 69 78 29 3b 0a 20 20 20  uerySuffix);.   
c7a0: 20 20 20 20 20 4d 61 6b 65 4c 6f 67 45 6e 74 72       MakeLogEntr
c7b0: 79 28 30 29 3b 0a 20 20 20 20 20 20 20 20 72 65  y(0);.        re
c7c0: 74 75 72 6e 3b 0a 20 20 20 20 20 20 7d 65 6c 73  turn;.      }els
c7d0: 65 20 69 66 28 20 73 74 72 6e 63 6d 70 28 7a 4c  e if( strncmp(zL
c7e0: 69 6e 65 2c 22 53 74 61 74 75 73 3a 22 2c 37 29  ine,"Status:",7)
c7f0: 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 20 20 69  ==0 ){.        i
c800: 6e 74 20 69 3b 0a 20 20 20 20 20 20 20 20 66 6f  nt i;.        fo
c810: 72 28 69 3d 37 3b 20 69 73 73 70 61 63 65 28 7a  r(i=7; isspace(z
c820: 4c 69 6e 65 5b 69 5d 29 3b 20 69 2b 2b 29 7b 7d  Line[i]); i++){}
c830: 0a 20 20 20 20 20 20 20 20 6e 4f 75 74 20 2b 3d  .        nOut +=
c840: 20 70 72 69 6e 74 66 28 22 25 73 20 25 73 22 2c   printf("%s %s",
c850: 20 7a 50 72 6f 74 6f 63 6f 6c 2c 20 26 7a 4c 69   zProtocol, &zLi
c860: 6e 65 5b 69 5d 29 3b 0a 20 20 20 20 20 20 20 20  ne[i]);.        
c870: 73 74 72 6e 63 70 79 28 7a 52 65 70 6c 79 53 74  strncpy(zReplySt
c880: 61 74 75 73 2c 20 26 7a 4c 69 6e 65 5b 69 5d 2c  atus, &zLine[i],
c890: 20 33 29 3b 0a 20 20 20 20 20 20 20 20 7a 52 65   3);.        zRe
c8a0: 70 6c 79 53 74 61 74 75 73 5b 33 5d 20 3d 20 30  plyStatus[3] = 0
c8b0: 3b 0a 20 20 20 20 20 20 20 20 73 74 61 74 75 73  ;.        status
c8c0: 53 65 6e 74 20 3d 20 31 3b 0a 20 20 20 20 20 20  Sent = 1;.      
c8d0: 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 20 20 7d    break;.      }
c8e0: 65 6c 73 65 7b 0a 20 20 20 20 20 20 20 20 69 6e  else{.        in
c8f0: 74 20 69 3b 0a 20 20 20 20 20 20 20 20 53 74 61  t i;.        Sta
c900: 72 74 52 65 73 70 6f 6e 73 65 28 22 32 30 30 20  rtResponse("200 
c910: 4f 4b 22 29 3b 0a 20 20 20 20 20 20 20 20 6e 4f  OK");.        nO
c920: 75 74 20 2b 3d 20 70 72 69 6e 74 66 28 22 25 73  ut += printf("%s
c930: 22 2c 7a 4c 69 6e 65 29 3b 0a 20 20 20 20 20 20  ",zLine);.      
c940: 20 20 66 6f 72 28 69 3d 30 3b 20 7a 4c 69 6e 65    for(i=0; zLine
c950: 5b 69 5d 20 26 26 20 21 69 73 73 70 61 63 65 28  [i] && !isspace(
c960: 7a 4c 69 6e 65 5b 69 5d 29 20 26 26 20 7a 4c 69  zLine[i]) && zLi
c970: 6e 65 5b 69 5d 21 3d 27 3a 27 3b 20 69 2b 2b 29  ne[i]!=':'; i++)
c980: 7b 7d 0a 20 20 20 20 20 20 20 20 69 66 28 20 69  {}.        if( i
c990: 3c 32 20 7c 7c 20 7a 4c 69 6e 65 5b 69 5d 21 3d  <2 || zLine[i]!=
c9a0: 27 3a 27 20 29 20 62 72 65 61 6b 3b 0a 20 20 20  ':' ) break;.   
c9b0: 20 20 20 7d 0a 20 20 20 20 7d 0a 0a 20 20 20 20     }.    }..    
c9c0: 2f 2a 20 43 6f 70 79 20 65 76 65 72 79 74 68 69  /* Copy everythi
c9d0: 6e 67 20 65 6c 73 65 20 74 68 72 75 20 77 69 74  ng else thru wit
c9e0: 68 6f 75 74 20 63 68 61 6e 67 65 20 6f 72 20 61  hout change or a
c9f0: 6e 61 6c 79 73 69 73 2e 0a 20 20 20 20 2a 2f 0a  nalysis..    */.
ca00: 20 20 20 20 69 66 28 20 75 73 65 54 69 6d 65 6f      if( useTimeo
ca10: 75 74 20 29 20 61 6c 61 72 6d 28 36 30 2a 35 29  ut ) alarm(60*5)
ca20: 3b 0a 20 20 20 20 77 68 69 6c 65 28 20 28 63 20  ;.    while( (c 
ca30: 3d 20 67 65 74 63 28 69 6e 29 29 21 3d 45 4f 46  = getc(in))!=EOF
ca40: 20 29 7b 0a 20 20 20 20 20 20 70 75 74 63 28 63   ){.      putc(c
ca50: 2c 73 74 64 6f 75 74 29 3b 0a 20 20 20 20 20 20  ,stdout);.      
ca60: 6e 4f 75 74 2b 2b 3b 0a 20 20 20 20 7d 0a 20 20  nOut++;.    }.  
ca70: 20 20 66 63 6c 6f 73 65 28 69 6e 29 3b 0a 20 20    fclose(in);.  
ca80: 7d 65 6c 73 65 20 69 66 28 20 63 6f 75 6e 74 53  }else if( countS
ca90: 6c 61 73 68 65 73 28 7a 52 65 61 6c 53 63 72 69  lashes(zRealScri
caa0: 70 74 29 21 3d 63 6f 75 6e 74 53 6c 61 73 68 65  pt)!=countSlashe
cab0: 73 28 7a 53 63 72 69 70 74 29 20 29 7b 0a 20 20  s(zScript) ){.  
cac0: 20 20 2f 2a 20 49 66 20 74 68 65 20 72 65 71 75    /* If the requ
cad0: 65 73 74 20 55 52 49 20 66 6f 72 20 73 74 61 74  est URI for stat
cae0: 69 63 20 63 6f 6e 74 65 6e 74 20 63 6f 6e 74 61  ic content conta
caf0: 69 6e 73 20 6d 61 74 65 72 69 61 6c 20 70 61 73  ins material pas
cb00: 74 20 74 68 65 0a 20 20 20 20 2a 2a 20 61 63 74  t the.    ** act
cb10: 75 61 6c 20 63 6f 6e 74 65 6e 74 20 66 69 6c 65  ual content file
cb20: 20 6e 61 6d 65 2c 20 72 65 70 6f 72 74 20 74 68   name, report th
cb30: 61 74 20 61 73 20 61 20 34 30 34 20 65 72 72 6f  at as a 404 erro
cb40: 72 2e 20 2a 2f 0a 20 20 20 20 4e 6f 74 46 6f 75  r. */.    NotFou
cb50: 6e 64 28 5f 5f 4c 49 4e 45 5f 5f 29 3b 0a 20 20  nd(__LINE__);.  
cb60: 7d 65 6c 73 65 7b 0a 20 20 20 20 2f 2a 20 49 66  }else{.    /* If
cb70: 20 69 74 20 69 73 6e 27 74 20 65 78 65 63 75 74   it isn't execut
cb80: 61 62 6c 65 20 74 68 65 6e 20 69 74 0a 20 20 20  able then it.   
cb90: 20 2a 2a 20 6d 75 73 74 20 61 20 73 69 6d 70 6c   ** must a simpl
cba0: 65 20 66 69 6c 65 20 74 68 61 74 20 6e 65 65 64  e file that need
cbb0: 73 20 74 6f 20 62 65 20 63 6f 70 69 65 64 20 74  s to be copied t
cbc0: 6f 20 6f 75 74 70 75 74 2e 0a 20 20 20 20 2a 2f  o output..    */
cbd0: 0a 20 20 20 20 63 6f 6e 73 74 20 63 68 61 72 20  .    const char 
cbe0: 2a 7a 43 6f 6e 74 65 6e 74 54 79 70 65 20 3d 20  *zContentType = 
cbf0: 47 65 74 4d 69 6d 65 54 79 70 65 28 7a 46 69 6c  GetMimeType(zFil
cc00: 65 2c 20 6c 65 6e 46 69 6c 65 29 3b 0a 0a 20 20  e, lenFile);..  
cc10: 20 20 69 66 28 20 7a 54 6d 70 4e 61 6d 20 29 20    if( zTmpNam ) 
cc20: 75 6e 6c 69 6e 6b 28 7a 54 6d 70 4e 61 6d 29 3b  unlink(zTmpNam);
cc30: 0a 20 20 20 20 69 6e 20 3d 20 66 6f 70 65 6e 28  .    in = fopen(
cc40: 7a 46 69 6c 65 2c 22 72 22 29 3b 0a 20 20 20 20  zFile,"r");.    
cc50: 69 66 28 20 69 6e 3d 3d 30 20 29 20 4e 6f 74 46  if( in==0 ) NotF
cc60: 6f 75 6e 64 28 5f 5f 4c 49 4e 45 5f 5f 29 3b 0a  ound(__LINE__);.
cc70: 20 20 20 20 53 74 61 72 74 52 65 73 70 6f 6e 73      StartRespons
cc80: 65 28 22 32 30 30 20 4f 4b 22 29 3b 0a 20 20 20  e("200 OK");.   
cc90: 20 6e 4f 75 74 20 2b 3d 20 44 61 74 65 54 61 67   nOut += DateTag
cca0: 28 22 4c 61 73 74 2d 4d 6f 64 69 66 69 65 64 22  ("Last-Modified"
ccb0: 2c 20 73 74 61 74 62 75 66 2e 73 74 5f 6d 74 69  , statbuf.st_mti
ccc0: 6d 65 29 3b 0a 20 20 20 20 6e 4f 75 74 20 2b 3d  me);.    nOut +=
ccd0: 20 70 72 69 6e 74 66 28 22 43 6f 6e 74 65 6e 74   printf("Content
cce0: 2d 74 79 70 65 3a 20 25 73 5c 72 5c 6e 22 2c 7a  -type: %s\r\n",z
ccf0: 43 6f 6e 74 65 6e 74 54 79 70 65 29 3b 0a 20 20  ContentType);.  
cd00: 20 20 6e 4f 75 74 20 2b 3d 20 70 72 69 6e 74 66    nOut += printf
cd10: 28 22 43 6f 6e 74 65 6e 74 2d 6c 65 6e 67 74 68  ("Content-length
cd20: 3a 20 25 64 5c 72 5c 6e 5c 72 5c 6e 22 2c 28 69  : %d\r\n\r\n",(i
cd30: 6e 74 29 73 74 61 74 62 75 66 2e 73 74 5f 73 69  nt)statbuf.st_si
cd40: 7a 65 29 3b 0a 20 20 20 20 66 66 6c 75 73 68 28  ze);.    fflush(
cd50: 73 74 64 6f 75 74 29 3b 0a 20 20 20 20 69 66 28  stdout);.    if(
cd60: 20 73 74 72 63 6d 70 28 7a 4d 65 74 68 6f 64 2c   strcmp(zMethod,
cd70: 22 48 45 41 44 22 29 3d 3d 30 20 29 7b 0a 20 20  "HEAD")==0 ){.  
cd80: 20 20 20 20 4d 61 6b 65 4c 6f 67 45 6e 74 72 79      MakeLogEntry
cd90: 28 30 29 3b 0a 20 20 20 20 20 20 66 63 6c 6f 73  (0);.      fclos
cda0: 65 28 69 6e 29 3b 0a 20 20 20 20 20 20 72 65 74  e(in);.      ret
cdb0: 75 72 6e 3b 0a 20 20 20 20 7d 0a 20 20 20 20 69  urn;.    }.    i
cdc0: 66 28 20 75 73 65 54 69 6d 65 6f 75 74 20 29 20  f( useTimeout ) 
cdd0: 61 6c 61 72 6d 28 33 30 20 2b 20 73 74 61 74 62  alarm(30 + statb
cde0: 75 66 2e 73 74 5f 73 69 7a 65 2f 31 30 30 30 29  uf.st_size/1000)
cdf0: 3b 0a 23 69 66 64 65 66 20 6c 69 6e 75 78 0a 20  ;.#ifdef linux. 
ce00: 20 20 20 7b 0a 20 20 20 20 20 20 6f 66 66 5f 74     {.      off_t
ce10: 20 6f 66 66 73 65 74 20 3d 20 30 3b 0a 20 20 20   offset = 0;.   
ce20: 20 20 20 6e 4f 75 74 20 2b 3d 20 73 65 6e 64 66     nOut += sendf
ce30: 69 6c 65 28 66 69 6c 65 6e 6f 28 73 74 64 6f 75  ile(fileno(stdou
ce40: 74 29 2c 20 66 69 6c 65 6e 6f 28 69 6e 29 2c 20  t), fileno(in), 
ce50: 26 6f 66 66 73 65 74 2c 20 73 74 61 74 62 75 66  &offset, statbuf
ce60: 2e 73 74 5f 73 69 7a 65 29 3b 0a 20 20 20 20 7d  .st_size);.    }
ce70: 0a 23 65 6c 73 65 0a 20 20 20 20 77 68 69 6c 65  .#else.    while
ce80: 28 20 28 63 20 3d 20 67 65 74 63 28 69 6e 29 29  ( (c = getc(in))
ce90: 21 3d 45 4f 46 20 29 7b 0a 20 20 20 20 20 20 70  !=EOF ){.      p
cea0: 75 74 63 28 63 2c 73 74 64 6f 75 74 29 3b 0a 20  utc(c,stdout);. 
ceb0: 20 20 20 20 20 6e 4f 75 74 2b 2b 3b 0a 20 20 20       nOut++;.   
cec0: 20 7d 0a 23 65 6e 64 69 66 0a 20 20 20 20 66 63   }.#endif.    fc
ced0: 6c 6f 73 65 28 69 6e 29 3b 0a 20 20 7d 0a 20 20  lose(in);.  }.  
cee0: 66 66 6c 75 73 68 28 73 74 64 6f 75 74 29 3b 0a  fflush(stdout);.
cef0: 20 20 4d 61 6b 65 4c 6f 67 45 6e 74 72 79 28 30    MakeLogEntry(0
cf00: 29 3b 0a 0a 20 20 2f 2a 20 54 68 65 20 6e 65 78  );..  /* The nex
cf10: 74 20 72 65 71 75 65 73 74 20 6d 75 73 74 20 61  t request must a
cf20: 72 72 69 76 65 20 77 69 74 68 69 6e 20 33 30 20  rrive within 30 
cf30: 73 65 63 6f 6e 64 73 20 6f 72 20 77 65 20 63 6c  seconds or we cl
cf40: 6f 73 65 20 74 68 65 20 63 6f 6e 6e 65 63 74 69  ose the connecti
cf50: 6f 6e 0a 20 20 2a 2f 0a 20 20 6f 6d 69 74 4c 6f  on.  */.  omitLo
cf60: 67 20 3d 20 31 3b 0a 20 20 69 66 28 20 75 73 65  g = 1;.  if( use
cf70: 54 69 6d 65 6f 75 74 20 29 20 61 6c 61 72 6d 28  Timeout ) alarm(
cf80: 33 30 29 3b 0a 7d 0a 0a 23 64 65 66 69 6e 65 20  30);.}..#define 
cf90: 4d 41 58 5f 50 41 52 41 4c 4c 45 4c 20 35 30 20  MAX_PARALLEL 50 
cfa0: 20 2f 2a 20 4e 75 6d 62 65 72 20 6f 66 20 73 69   /* Number of si
cfb0: 6d 75 6c 74 61 6e 65 6f 75 73 20 63 68 69 6c 64  multaneous child
cfc0: 72 65 6e 20 2a 2f 0a 0a 2f 2a 0a 2a 2a 20 41 6c  ren */../*.** Al
cfd0: 6c 20 70 6f 73 73 69 62 6c 65 20 66 6f 72 6d 73  l possible forms
cfe0: 20 6f 66 20 61 6e 20 49 50 20 61 64 64 72 65 73   of an IP addres
cff0: 73 2e 20 20 4e 65 65 64 65 64 20 74 6f 20 77 6f  s.  Needed to wo
d000: 72 6b 20 61 72 6f 75 6e 64 20 47 43 43 20 73 74  rk around GCC st
d010: 72 69 63 74 0a 2a 2a 20 61 6c 69 61 73 69 6e 67  rict.** aliasing
d020: 20 72 75 6c 65 73 2e 0a 2a 2f 0a 74 79 70 65 64   rules..*/.typed
d030: 65 66 20 75 6e 69 6f 6e 20 7b 0a 20 20 73 74 72  ef union {.  str
d040: 75 63 74 20 73 6f 63 6b 61 64 64 72 20 73 61 3b  uct sockaddr sa;
d050: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a                /*
d060: 20 41 62 73 74 72 61 63 74 20 73 75 70 65 72 63   Abstract superc
d070: 6c 61 73 73 20 2a 2f 0a 20 20 73 74 72 75 63 74  lass */.  struct
d080: 20 73 6f 63 6b 61 64 64 72 5f 69 6e 20 73 61 34   sockaddr_in sa4
d090: 3b 20 20 20 20 20 20 20 20 20 20 2f 2a 20 49 50  ;          /* IP
d0a0: 76 34 20 2a 2f 0a 20 20 73 74 72 75 63 74 20 73  v4 */.  struct s
d0b0: 6f 63 6b 61 64 64 72 5f 69 6e 36 20 73 61 36 3b  ockaddr_in6 sa6;
d0c0: 20 20 20 20 20 20 20 20 20 2f 2a 20 49 50 76 36           /* IPv6
d0d0: 20 2a 2f 0a 20 20 73 74 72 75 63 74 20 73 6f 63   */.  struct soc
d0e0: 6b 61 64 64 72 5f 73 74 6f 72 61 67 65 20 73 61  kaddr_storage sa
d0f0: 73 3b 20 20 20 20 20 2f 2a 20 53 68 6f 75 6c 64  s;     /* Should
d100: 20 62 65 20 74 68 65 20 6d 61 78 69 6d 75 6d 20   be the maximum 
d110: 6f 66 20 74 68 65 20 61 62 6f 76 65 20 33 20 2a  of the above 3 *
d120: 2f 0a 7d 20 61 64 64 72 65 73 73 3b 0a 0a 2f 2a  /.} address;../*
d130: 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 20 61 6e  .** Implement an
d140: 20 48 54 54 50 20 73 65 72 76 65 72 20 64 61 65   HTTP server dae
d150: 6d 6f 6e 20 6c 69 73 74 65 6e 69 6e 67 20 6f 6e  mon listening on
d160: 20 70 6f 72 74 20 69 50 6f 72 74 2e 0a 2a 2a 0a   port iPort..**.
d170: 2a 2a 20 41 73 20 6e 65 77 20 63 6f 6e 6e 65 63  ** As new connec
d180: 74 69 6f 6e 73 20 61 72 72 69 76 65 2c 20 66 6f  tions arrive, fo
d190: 72 6b 20 61 20 63 68 69 6c 64 20 61 6e 64 20 6c  rk a child and l
d1a0: 65 74 20 63 68 69 6c 64 20 72 65 74 75 72 6e 0a  et child return.
d1b0: 2a 2a 20 6f 75 74 20 6f 66 20 74 68 69 73 20 70  ** out of this p
d1c0: 72 6f 63 65 64 75 72 65 20 63 61 6c 6c 2e 20 20  rocedure call.  
d1d0: 54 68 65 20 63 68 69 6c 64 20 77 69 6c 6c 20 68  The child will h
d1e0: 61 6e 64 6c 65 20 74 68 65 20 72 65 71 75 65 73  andle the reques
d1f0: 74 2e 0a 2a 2a 20 54 68 65 20 70 61 72 65 6e 74  t..** The parent
d200: 20 6e 65 76 65 72 20 72 65 74 75 72 6e 73 20 66   never returns f
d210: 72 6f 6d 20 74 68 69 73 20 70 72 6f 63 65 64 75  rom this procedu
d220: 72 65 2e 0a 2a 2a 0a 2a 2a 20 52 65 74 75 72 6e  re..**.** Return
d230: 20 30 20 74 6f 20 65 61 63 68 20 63 68 69 6c 64   0 to each child
d240: 20 61 73 20 69 74 20 72 75 6e 73 2e 20 20 49 66   as it runs.  If
d250: 20 75 6e 61 62 6c 65 20 74 6f 20 65 73 74 61 62   unable to estab
d260: 6c 69 73 68 20 61 0a 2a 2a 20 6c 69 73 74 65 6e  lish a.** listen
d270: 69 6e 67 20 73 6f 63 6b 65 74 2c 20 72 65 74 75  ing socket, retu
d280: 72 6e 20 6e 6f 6e 2d 7a 65 72 6f 2e 0a 2a 2f 0a  rn non-zero..*/.
d290: 69 6e 74 20 68 74 74 70 5f 73 65 72 76 65 72 28  int http_server(
d2a0: 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 50 6f 72  const char *zPor
d2b0: 74 2c 20 69 6e 74 20 6c 6f 63 61 6c 4f 6e 6c 79  t, int localOnly
d2c0: 29 7b 0a 20 20 69 6e 74 20 6c 69 73 74 65 6e 65  ){.  int listene
d2d0: 72 5b 32 30 5d 3b 20 20 20 20 20 20 20 20 20 20  r[20];          
d2e0: 20 20 2f 2a 20 54 68 65 20 73 65 72 76 65 72 20    /* The server 
d2f0: 73 6f 63 6b 65 74 73 20 2a 2f 0a 20 20 69 6e 74  sockets */.  int
d300: 20 63 6f 6e 6e 65 63 74 69 6f 6e 3b 20 20 20 20   connection;    
d310: 20 20 20 20 20 20 20 20 20 20 2f 2a 20 41 20 73            /* A s
d320: 6f 63 6b 65 74 20 66 6f 72 20 65 61 63 68 20 69  ocket for each i
d330: 6e 64 69 76 69 64 75 61 6c 20 63 6f 6e 6e 65 63  ndividual connec
d340: 74 69 6f 6e 20 2a 2f 0a 20 20 66 64 5f 73 65 74  tion */.  fd_set
d350: 20 72 65 61 64 66 64 73 3b 20 20 20 20 20 20 20   readfds;       
d360: 20 20 20 20 20 20 20 2f 2a 20 53 65 74 20 6f 66         /* Set of
d370: 20 66 69 6c 65 20 64 65 73 63 72 69 70 74 6f 72   file descriptor
d380: 73 20 66 6f 72 20 73 65 6c 65 63 74 28 29 20 2a  s for select() *
d390: 2f 0a 20 20 61 64 64 72 65 73 73 20 69 6e 61 64  /.  address inad
d3a0: 64 72 3b 20 20 20 20 20 20 20 20 20 20 20 20 20  dr;             
d3b0: 20 2f 2a 20 52 65 6d 6f 74 65 20 61 64 64 72 65   /* Remote addre
d3c0: 73 73 20 2a 2f 0a 20 20 73 6f 63 6b 6c 65 6e 5f  ss */.  socklen_
d3d0: 74 20 6c 65 6e 61 64 64 72 3b 20 20 20 20 20 20  t lenaddr;      
d3e0: 20 20 20 20 20 2f 2a 20 4c 65 6e 67 74 68 20 6f       /* Length o
d3f0: 66 20 74 68 65 20 69 6e 61 64 64 72 20 73 74 72  f the inaddr str
d400: 75 63 74 75 72 65 20 2a 2f 0a 20 20 69 6e 74 20  ucture */.  int 
d410: 63 68 69 6c 64 3b 20 20 20 20 20 20 20 20 20 20  child;          
d420: 20 20 20 20 20 20 20 20 20 2f 2a 20 50 49 44 20           /* PID 
d430: 6f 66 20 74 68 65 20 63 68 69 6c 64 20 70 72 6f  of the child pro
d440: 63 65 73 73 20 2a 2f 0a 20 20 69 6e 74 20 6e 63  cess */.  int nc
d450: 68 69 6c 64 72 65 6e 20 3d 20 30 3b 20 20 20 20  hildren = 0;    
d460: 20 20 20 20 20 20 20 2f 2a 20 4e 75 6d 62 65 72         /* Number
d470: 20 6f 66 20 63 68 69 6c 64 20 70 72 6f 63 65 73   of child proces
d480: 73 65 73 20 2a 2f 0a 20 20 73 74 72 75 63 74 20  ses */.  struct 
d490: 74 69 6d 65 76 61 6c 20 64 65 6c 61 79 3b 20 20  timeval delay;  
d4a0: 20 20 20 20 20 20 2f 2a 20 48 6f 77 20 6c 6f 6e        /* How lon
d4b0: 67 20 74 6f 20 77 61 69 74 20 69 6e 73 69 64 65  g to wait inside
d4c0: 20 73 65 6c 65 63 74 28 29 20 2a 2f 0a 20 20 69   select() */.  i
d4d0: 6e 74 20 6f 70 74 20 3d 20 31 3b 20 20 20 20 20  nt opt = 1;     
d4e0: 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 73              /* s
d4f0: 65 74 73 6f 63 6b 6f 70 74 20 66 6c 61 67 20 2a  etsockopt flag *
d500: 2f 0a 20 20 73 74 72 75 63 74 20 61 64 64 72 69  /.  struct addri
d510: 6e 66 6f 20 73 48 69 6e 74 73 3b 20 20 20 20 20  nfo sHints;     
d520: 20 2f 2a 20 41 64 64 72 65 73 73 20 68 69 6e 74   /* Address hint
d530: 73 20 2a 2f 0a 20 20 73 74 72 75 63 74 20 61 64  s */.  struct ad
d540: 64 72 69 6e 66 6f 20 2a 70 41 64 64 72 73 2c 20  drinfo *pAddrs, 
d550: 2a 70 3b 20 2f 2a 20 2a 2f 0a 20 20 69 6e 74 20  *p; /* */.  int 
d560: 72 63 3b 20 20 20 20 20 20 20 20 20 20 20 20 20  rc;             
d570: 20 20 20 20 20 20 20 20 20 2f 2a 20 52 65 73 75           /* Resu
d580: 6c 74 20 63 6f 64 65 20 2a 2f 0a 20 20 69 6e 74  lt code */.  int
d590: 20 69 2c 20 6e 3b 0a 20 20 69 6e 74 20 6d 61 78   i, n;.  int max
d5a0: 46 64 20 3d 20 2d 31 3b 0a 20 20 0a 20 20 6d 65  Fd = -1;.  .  me
d5b0: 6d 73 65 74 28 26 73 48 69 6e 74 73 2c 20 30 2c  mset(&sHints, 0,
d5c0: 20 73 69 7a 65 6f 66 28 73 48 69 6e 74 73 29 29   sizeof(sHints))
d5d0: 3b 0a 20 20 69 66 28 20 69 70 76 34 4f 6e 6c 79  ;.  if( ipv4Only
d5e0: 20 29 7b 0a 20 20 20 20 73 48 69 6e 74 73 2e 61   ){.    sHints.a
d5f0: 69 5f 66 61 6d 69 6c 79 20 3d 20 50 46 5f 49 4e  i_family = PF_IN
d600: 45 54 3b 0a 20 20 20 20 2f 2a 70 72 69 6e 74 66  ET;.    /*printf
d610: 28 22 69 70 76 34 20 6f 6e 6c 79 5c 6e 22 29 3b  ("ipv4 only\n");
d620: 2a 2f 0a 20 20 7d 65 6c 73 65 20 69 66 28 20 69  */.  }else if( i
d630: 70 76 36 4f 6e 6c 79 20 29 7b 0a 20 20 20 20 73  pv6Only ){.    s
d640: 48 69 6e 74 73 2e 61 69 5f 66 61 6d 69 6c 79 20  Hints.ai_family 
d650: 3d 20 50 46 5f 49 4e 45 54 36 3b 0a 20 20 20 20  = PF_INET6;.    
d660: 2f 2a 70 72 69 6e 74 66 28 22 69 70 76 36 20 6f  /*printf("ipv6 o
d670: 6e 6c 79 5c 6e 22 29 3b 2a 2f 0a 20 20 7d 65 6c  nly\n");*/.  }el
d680: 73 65 7b 0a 20 20 20 20 73 48 69 6e 74 73 2e 61  se{.    sHints.a
d690: 69 5f 66 61 6d 69 6c 79 20 3d 20 50 46 5f 55 4e  i_family = PF_UN
d6a0: 53 50 45 43 3b 0a 20 20 7d 0a 20 20 73 48 69 6e  SPEC;.  }.  sHin
d6b0: 74 73 2e 61 69 5f 73 6f 63 6b 74 79 70 65 20 3d  ts.ai_socktype =
d6c0: 20 53 4f 43 4b 5f 53 54 52 45 41 4d 3b 0a 20 20   SOCK_STREAM;.  
d6d0: 73 48 69 6e 74 73 2e 61 69 5f 66 6c 61 67 73 20  sHints.ai_flags 
d6e0: 3d 20 41 49 5f 50 41 53 53 49 56 45 3b 0a 20 20  = AI_PASSIVE;.  
d6f0: 73 48 69 6e 74 73 2e 61 69 5f 70 72 6f 74 6f 63  sHints.ai_protoc
d700: 6f 6c 20 3d 20 30 3b 0a 20 20 72 63 20 3d 20 67  ol = 0;.  rc = g
d710: 65 74 61 64 64 72 69 6e 66 6f 28 6c 6f 63 61 6c  etaddrinfo(local
d720: 4f 6e 6c 79 20 3f 20 22 6c 6f 63 61 6c 68 6f 73  Only ? "localhos
d730: 74 22 3a 20 30 2c 20 7a 50 6f 72 74 2c 20 26 73  t": 0, zPort, &s
d740: 48 69 6e 74 73 2c 20 26 70 41 64 64 72 73 29 3b  Hints, &pAddrs);
d750: 0a 20 20 69 66 28 20 72 63 20 29 7b 0a 20 20 20  .  if( rc ){.   
d760: 20 66 70 72 69 6e 74 66 28 73 74 64 65 72 72 2c   fprintf(stderr,
d770: 20 22 63 6f 75 6c 64 20 6e 6f 74 20 67 65 74 20   "could not get 
d780: 61 64 64 72 20 69 6e 66 6f 3a 20 25 73 22 2c 20  addr info: %s", 
d790: 0a 20 20 20 20 20 20 20 20 20 20 20 20 72 63 21  .            rc!
d7a0: 3d 45 41 49 5f 53 59 53 54 45 4d 20 3f 20 67 61  =EAI_SYSTEM ? ga
d7b0: 69 5f 73 74 72 65 72 72 6f 72 28 72 63 29 20 3a  i_strerror(rc) :
d7c0: 20 73 74 72 65 72 72 6f 72 28 65 72 72 6e 6f 29   strerror(errno)
d7d0: 29 3b 0a 20 20 20 20 72 65 74 75 72 6e 20 31 3b  );.    return 1;
d7e0: 0a 20 20 7d 0a 20 20 66 6f 72 28 6e 3d 30 2c 20  .  }.  for(n=0, 
d7f0: 70 3d 70 41 64 64 72 73 3b 20 6e 3c 28 69 6e 74  p=pAddrs; n<(int
d800: 29 28 73 69 7a 65 6f 66 28 6c 69 73 74 65 6e 65  )(sizeof(listene
d810: 72 29 2f 73 69 7a 65 6f 66 28 6c 69 73 74 65 6e  r)/sizeof(listen
d820: 65 72 5b 30 5d 29 29 20 26 26 20 70 21 3d 30 3b  er[0])) && p!=0;
d830: 0a 20 20 20 20 20 20 20 20 70 3d 70 2d 3e 61 69  .        p=p->ai
d840: 5f 6e 65 78 74 29 7b 0a 20 20 20 20 6c 69 73 74  _next){.    list
d850: 65 6e 65 72 5b 6e 5d 20 3d 20 73 6f 63 6b 65 74  ener[n] = socket
d860: 28 70 2d 3e 61 69 5f 66 61 6d 69 6c 79 2c 20 70  (p->ai_family, p
d870: 2d 3e 61 69 5f 73 6f 63 6b 74 79 70 65 2c 20 70  ->ai_socktype, p
d880: 2d 3e 61 69 5f 70 72 6f 74 6f 63 6f 6c 29 3b 0a  ->ai_protocol);.
d890: 20 20 20 20 69 66 28 20 6c 69 73 74 65 6e 65 72      if( listener
d8a0: 5b 6e 5d 3e 3d 30 20 29 7b 0a 20 20 20 20 20 20  [n]>=0 ){.      
d8b0: 2f 2a 20 69 66 20 77 65 20 63 61 6e 27 74 20 74  /* if we can't t
d8c0: 65 72 6d 69 6e 61 74 65 20 6e 69 63 65 6c 79 2c  erminate nicely,
d8d0: 20 61 74 20 6c 65 61 73 74 20 61 6c 6c 6f 77 20   at least allow 
d8e0: 74 68 65 20 73 6f 63 6b 65 74 20 74 6f 20 62 65  the socket to be
d8f0: 20 72 65 75 73 65 64 20 2a 2f 0a 20 20 20 20 20   reused */.     
d900: 20 73 65 74 73 6f 63 6b 6f 70 74 28 6c 69 73 74   setsockopt(list
d910: 65 6e 65 72 5b 6e 5d 2c 20 53 4f 4c 5f 53 4f 43  ener[n], SOL_SOC
d920: 4b 45 54 2c 20 53 4f 5f 52 45 55 53 45 41 44 44  KET, SO_REUSEADD
d930: 52 2c 26 6f 70 74 2c 20 73 69 7a 65 6f 66 28 6f  R,&opt, sizeof(o
d940: 70 74 29 29 3b 0a 20 20 20 20 20 20 0a 23 69 66  pt));.      .#if
d950: 20 64 65 66 69 6e 65 64 28 49 50 56 36 5f 56 36   defined(IPV6_V6
d960: 4f 4e 4c 59 29 0a 20 20 20 20 20 20 69 66 28 20  ONLY).      if( 
d970: 70 2d 3e 61 69 5f 66 61 6d 69 6c 79 3d 3d 41 46  p->ai_family==AF
d980: 5f 49 4e 45 54 36 20 29 7b 0a 20 20 20 20 20 20  _INET6 ){.      
d990: 20 20 69 6e 74 20 76 36 6f 6e 6c 79 20 3d 20 31    int v6only = 1
d9a0: 3b 0a 20 20 20 20 20 20 20 20 73 65 74 73 6f 63  ;.        setsoc
d9b0: 6b 6f 70 74 28 6c 69 73 74 65 6e 65 72 5b 6e 5d  kopt(listener[n]
d9c0: 2c 20 49 50 50 52 4f 54 4f 5f 49 50 56 36 2c 20  , IPPROTO_IPV6, 
d9d0: 49 50 56 36 5f 56 36 4f 4e 4c 59 2c 0a 20 20 20  IPV6_V6ONLY,.   
d9e0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
d9f0: 20 26 76 36 6f 6e 6c 79 2c 20 73 69 7a 65 6f 66   &v6only, sizeof
da00: 28 76 36 6f 6e 6c 79 29 29 3b 0a 20 20 20 20 20  (v6only));.     
da10: 20 7d 0a 23 65 6e 64 69 66 0a 20 20 20 20 20 20   }.#endif.      
da20: 0a 20 20 20 20 20 20 69 66 28 20 62 69 6e 64 28  .      if( bind(
da30: 6c 69 73 74 65 6e 65 72 5b 6e 5d 2c 20 70 2d 3e  listener[n], p->
da40: 61 69 5f 61 64 64 72 2c 20 70 2d 3e 61 69 5f 61  ai_addr, p->ai_a
da50: 64 64 72 6c 65 6e 29 3c 30 20 29 7b 0a 20 20 20  ddrlen)<0 ){.   
da60: 20 20 20 20 20 70 72 69 6e 74 66 28 22 62 69 6e       printf("bin
da70: 64 20 66 61 69 6c 65 64 3a 20 25 73 5c 6e 22 2c  d failed: %s\n",
da80: 20 73 74 72 65 72 72 6f 72 28 65 72 72 6e 6f 29   strerror(errno)
da90: 29 3b 0a 20 20 20 20 20 20 20 20 63 6c 6f 73 65  );.        close
daa0: 28 6c 69 73 74 65 6e 65 72 5b 6e 5d 29 3b 0a 20  (listener[n]);. 
dab0: 20 20 20 20 20 20 20 63 6f 6e 74 69 6e 75 65 3b         continue;
dac0: 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 69  .      }.      i
dad0: 66 28 20 6c 69 73 74 65 6e 28 6c 69 73 74 65 6e  f( listen(listen
dae0: 65 72 5b 6e 5d 2c 20 32 30 29 3c 30 20 29 7b 0a  er[n], 20)<0 ){.
daf0: 20 20 20 20 20 20 20 20 70 72 69 6e 74 66 28 22          printf("
db00: 6c 69 73 74 65 6e 28 29 20 66 61 69 6c 65 64 3a  listen() failed:
db10: 20 25 73 5c 6e 22 2c 20 73 74 72 65 72 72 6f 72   %s\n", strerror
db20: 28 65 72 72 6e 6f 29 29 3b 0a 20 20 20 20 20 20  (errno));.      
db30: 20 20 63 6c 6f 73 65 28 6c 69 73 74 65 6e 65 72    close(listener
db40: 5b 6e 5d 29 3b 0a 20 20 20 20 20 20 20 20 63 6f  [n]);.        co
db50: 6e 74 69 6e 75 65 3b 0a 20 20 20 20 20 20 7d 0a  ntinue;.      }.
db60: 20 20 20 20 20 20 6e 2b 2b 3b 0a 20 20 20 20 7d        n++;.    }
db70: 0a 20 20 7d 0a 20 20 69 66 28 20 6e 3d 3d 30 20  .  }.  if( n==0 
db80: 29 7b 0a 20 20 20 20 66 70 72 69 6e 74 66 28 73  ){.    fprintf(s
db90: 74 64 65 72 72 2c 20 22 63 61 6e 6e 6f 74 20 6f  tderr, "cannot o
dba0: 70 65 6e 20 61 6e 79 20 73 6f 63 6b 65 74 73 5c  pen any sockets\
dbb0: 6e 22 29 3b 0a 20 20 20 20 72 65 74 75 72 6e 20  n");.    return 
dbc0: 31 3b 0a 20 20 7d 0a 0a 20 20 77 68 69 6c 65 28  1;.  }..  while(
dbd0: 20 31 20 29 7b 0a 20 20 20 20 69 66 28 20 6e 63   1 ){.    if( nc
dbe0: 68 69 6c 64 72 65 6e 3e 4d 41 58 5f 50 41 52 41  hildren>MAX_PARA
dbf0: 4c 4c 45 4c 20 29 7b 0a 20 20 20 20 20 20 2f 2a  LLEL ){.      /*
dc00: 20 53 6c 6f 77 20 64 6f 77 6e 20 69 66 20 63 6f   Slow down if co
dc10: 6e 6e 65 63 74 69 6f 6e 73 20 61 72 65 20 61 72  nnections are ar
dc20: 72 69 76 69 6e 67 20 74 6f 6f 20 66 61 73 74 20  riving too fast 
dc30: 2a 2f 0a 20 20 20 20 20 20 73 6c 65 65 70 28 20  */.      sleep( 
dc40: 6e 63 68 69 6c 64 72 65 6e 2d 4d 41 58 5f 50 41  nchildren-MAX_PA
dc50: 52 41 4c 4c 45 4c 20 29 3b 0a 20 20 20 20 7d 0a  RALLEL );.    }.
dc60: 20 20 20 20 64 65 6c 61 79 2e 74 76 5f 73 65 63      delay.tv_sec
dc70: 20 3d 20 36 30 3b 0a 20 20 20 20 64 65 6c 61 79   = 60;.    delay
dc80: 2e 74 76 5f 75 73 65 63 20 3d 20 30 3b 0a 20 20  .tv_usec = 0;.  
dc90: 20 20 46 44 5f 5a 45 52 4f 28 26 72 65 61 64 66    FD_ZERO(&readf
dca0: 64 73 29 3b 0a 20 20 20 20 66 6f 72 28 69 3d 30  ds);.    for(i=0
dcb0: 3b 20 69 3c 6e 3b 20 69 2b 2b 29 7b 0a 20 20 20  ; i<n; i++){.   
dcc0: 20 20 20 61 73 73 65 72 74 28 20 6c 69 73 74 65     assert( liste
dcd0: 6e 65 72 5b 69 5d 3e 3d 30 20 29 3b 0a 20 20 20  ner[i]>=0 );.   
dce0: 20 20 20 46 44 5f 53 45 54 28 20 6c 69 73 74 65     FD_SET( liste
dcf0: 6e 65 72 5b 69 5d 2c 20 26 72 65 61 64 66 64 73  ner[i], &readfds
dd00: 29 3b 0a 20 20 20 20 20 20 69 66 28 20 6c 69 73  );.      if( lis
dd10: 74 65 6e 65 72 5b 69 5d 3e 6d 61 78 46 64 20 29  tener[i]>maxFd )
dd20: 20 6d 61 78 46 64 20 3d 20 6c 69 73 74 65 6e 65   maxFd = listene
dd30: 72 5b 69 5d 3b 0a 20 20 20 20 7d 0a 20 20 20 20  r[i];.    }.    
dd40: 73 65 6c 65 63 74 28 20 6d 61 78 46 64 2b 31 2c  select( maxFd+1,
dd50: 20 26 72 65 61 64 66 64 73 2c 20 30 2c 20 30 2c   &readfds, 0, 0,
dd60: 20 26 64 65 6c 61 79 29 3b 0a 20 20 20 20 66 6f   &delay);.    fo
dd70: 72 28 69 3d 30 3b 20 69 3c 6e 3b 20 69 2b 2b 29  r(i=0; i<n; i++)
dd80: 7b 0a 20 20 20 20 20 20 69 66 28 20 46 44 5f 49  {.      if( FD_I
dd90: 53 53 45 54 28 6c 69 73 74 65 6e 65 72 5b 69 5d  SSET(listener[i]
dda0: 2c 20 26 72 65 61 64 66 64 73 29 20 29 7b 0a 20  , &readfds) ){. 
ddb0: 20 20 20 20 20 20 20 6c 65 6e 61 64 64 72 20 3d         lenaddr =
ddc0: 20 73 69 7a 65 6f 66 28 69 6e 61 64 64 72 29 3b   sizeof(inaddr);
ddd0: 0a 20 20 20 20 20 20 20 20 63 6f 6e 6e 65 63 74  .        connect
dde0: 69 6f 6e 20 3d 20 61 63 63 65 70 74 28 6c 69 73  ion = accept(lis
ddf0: 74 65 6e 65 72 5b 69 5d 2c 20 26 69 6e 61 64 64  tener[i], &inadd
de00: 72 2e 73 61 2c 20 26 6c 65 6e 61 64 64 72 29 3b  r.sa, &lenaddr);
de10: 0a 20 20 20 20 20 20 20 20 69 66 28 20 63 6f 6e  .        if( con
de20: 6e 65 63 74 69 6f 6e 3e 3d 30 20 29 7b 0a 20 20  nection>=0 ){.  
de30: 20 20 20 20 20 20 20 20 63 68 69 6c 64 20 3d 20          child = 
de40: 66 6f 72 6b 28 29 3b 0a 20 20 20 20 20 20 20 20  fork();.        
de50: 20 20 69 66 28 20 63 68 69 6c 64 21 3d 30 20 29    if( child!=0 )
de60: 7b 0a 20 20 20 20 20 20 20 20 20 20 20 20 69 66  {.            if
de70: 28 20 63 68 69 6c 64 3e 30 20 29 20 6e 63 68 69  ( child>0 ) nchi
de80: 6c 64 72 65 6e 2b 2b 3b 0a 20 20 20 20 20 20 20  ldren++;.       
de90: 20 20 20 20 20 63 6c 6f 73 65 28 63 6f 6e 6e 65       close(conne
dea0: 63 74 69 6f 6e 29 3b 0a 20 20 20 20 20 20 20 20  ction);.        
deb0: 20 20 20 20 2f 2a 20 70 72 69 6e 74 66 28 22 73      /* printf("s
dec0: 75 62 70 72 6f 63 65 73 73 20 25 64 20 73 74 61  ubprocess %d sta
ded0: 72 74 65 64 2e 2e 2e 5c 6e 22 2c 20 63 68 69 6c  rted...\n", chil
dee0: 64 29 3b 20 66 66 6c 75 73 68 28 73 74 64 6f 75  d); fflush(stdou
def0: 74 29 3b 20 2a 2f 0a 20 20 20 20 20 20 20 20 20  t); */.         
df00: 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 20 20   }else{.        
df10: 20 20 20 20 69 6e 74 20 6e 45 72 72 20 3d 20 30      int nErr = 0
df20: 2c 20 66 64 3b 0a 20 20 20 20 20 20 20 20 20 20  , fd;.          
df30: 20 20 63 6c 6f 73 65 28 30 29 3b 0a 20 20 20 20    close(0);.    
df40: 20 20 20 20 20 20 20 20 66 64 20 3d 20 64 75 70          fd = dup
df50: 28 63 6f 6e 6e 65 63 74 69 6f 6e 29 3b 0a 20 20  (connection);.  
df60: 20 20 20 20 20 20 20 20 20 20 69 66 28 20 66 64            if( fd
df70: 21 3d 30 20 29 20 6e 45 72 72 2b 2b 3b 0a 20 20  !=0 ) nErr++;.  
df80: 20 20 20 20 20 20 20 20 20 20 63 6c 6f 73 65 28            close(
df90: 31 29 3b 0a 20 20 20 20 20 20 20 20 20 20 20 20  1);.            
dfa0: 66 64 20 3d 20 64 75 70 28 63 6f 6e 6e 65 63 74  fd = dup(connect
dfb0: 69 6f 6e 29 3b 0a 20 20 20 20 20 20 20 20 20 20  ion);.          
dfc0: 20 20 69 66 28 20 66 64 21 3d 31 20 29 20 6e 45    if( fd!=1 ) nE
dfd0: 72 72 2b 2b 3b 0a 20 20 20 20 20 20 20 20 20 20  rr++;.          
dfe0: 20 20 63 6c 6f 73 65 28 63 6f 6e 6e 65 63 74 69    close(connecti
dff0: 6f 6e 29 3b 0a 20 20 20 20 20 20 20 20 20 20 20  on);.           
e000: 20 72 65 74 75 72 6e 20 6e 45 72 72 3b 0a 20 20   return nErr;.  
e010: 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20          }.      
e020: 20 20 7d 0a 20 20 20 20 20 20 7d 0a 20 20 20 20    }.      }.    
e030: 20 20 2f 2a 20 42 75 72 79 20 64 65 61 64 20 63    /* Bury dead c
e040: 68 69 6c 64 72 65 6e 20 2a 2f 0a 20 20 20 20 20  hildren */.     
e050: 20 77 68 69 6c 65 28 20 28 63 68 69 6c 64 20 3d   while( (child =
e060: 20 77 61 69 74 70 69 64 28 30 2c 20 30 2c 20 57   waitpid(0, 0, W
e070: 4e 4f 48 41 4e 47 29 29 3e 30 20 29 7b 0a 20 20  NOHANG))>0 ){.  
e080: 20 20 20 20 20 20 2f 2a 20 70 72 69 6e 74 66 28        /* printf(
e090: 22 70 72 6f 63 65 73 73 20 25 64 20 65 6e 64 73  "process %d ends
e0a0: 5c 6e 22 2c 20 63 68 69 6c 64 29 3b 20 66 66 6c  \n", child); ffl
e0b0: 75 73 68 28 73 74 64 6f 75 74 29 3b 20 2a 2f 0a  ush(stdout); */.
e0c0: 20 20 20 20 20 20 20 20 6e 63 68 69 6c 64 72 65          nchildre
e0d0: 6e 2d 2d 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20  n--;.      }.   
e0e0: 20 7d 0a 20 20 7d 0a 20 20 2f 2a 20 4e 4f 54 20   }.  }.  /* NOT 
e0f0: 52 45 41 43 48 45 44 20 2a 2f 20 20 0a 20 20 65  REACHED */  .  e
e100: 78 69 74 28 31 29 3b 0a 7d 0a 0a 0a 69 6e 74 20  xit(1);.}...int 
e110: 6d 61 69 6e 28 69 6e 74 20 61 72 67 63 2c 20 63  main(int argc, c
e120: 68 61 72 20 2a 2a 61 72 67 76 29 7b 0a 20 20 69  har **argv){.  i
e130: 6e 74 20 69 3b 20 20 20 20 20 20 20 20 20 20 20  nt i;           
e140: 20 20 20 20 20 20 20 20 20 2f 2a 20 4c 6f 6f 70           /* Loop
e150: 20 63 6f 75 6e 74 65 72 20 2a 2f 0a 20 20 63 68   counter */.  ch
e160: 61 72 20 2a 7a 50 65 72 6d 55 73 65 72 20 3d 20  ar *zPermUser = 
e170: 30 3b 20 20 20 20 20 20 2f 2a 20 52 75 6e 20 64  0;      /* Run d
e180: 61 65 6d 6f 6e 20 77 69 74 68 20 74 68 69 73 20  aemon with this 
e190: 75 73 65 72 27 73 20 70 65 72 6d 69 73 73 69 6f  user's permissio
e1a0: 6e 73 20 2a 2f 0a 20 20 63 6f 6e 73 74 20 63 68  ns */.  const ch
e1b0: 61 72 20 2a 7a 50 6f 72 74 20 3d 20 30 3b 20 20  ar *zPort = 0;  
e1c0: 20 20 2f 2a 20 49 6d 70 6c 65 6d 65 6e 74 20 61    /* Implement a
e1d0: 6e 20 48 54 54 50 20 73 65 72 76 65 72 20 70 72  n HTTP server pr
e1e0: 6f 63 65 73 73 20 2a 2f 0a 20 20 69 6e 74 20 75  ocess */.  int u
e1f0: 73 65 43 68 72 6f 6f 74 4a 61 69 6c 20 3d 20 31  seChrootJail = 1
e200: 3b 20 20 20 20 2f 2a 20 54 72 75 65 20 74 6f 20  ;    /* True to 
e210: 75 73 65 20 61 20 63 68 61 6e 67 65 2d 72 6f 6f  use a change-roo
e220: 74 20 6a 61 69 6c 20 2a 2f 0a 20 20 73 74 72 75  t jail */.  stru
e230: 63 74 20 70 61 73 73 77 64 20 2a 70 77 64 20 3d  ct passwd *pwd =
e240: 20 30 3b 20 20 20 2f 2a 20 49 6e 66 6f 72 6d 61   0;   /* Informa
e250: 74 69 6f 6e 20 61 62 6f 75 74 20 74 68 65 20 75  tion about the u
e260: 73 65 72 20 2a 2f 0a 0a 20 20 2f 2a 20 52 65 63  ser */..  /* Rec
e270: 6f 72 64 20 74 68 65 20 74 69 6d 65 20 77 68 65  ord the time whe
e280: 6e 20 70 72 6f 63 65 73 73 69 6e 67 20 62 65 67  n processing beg
e290: 69 6e 73 2e 0a 20 20 2a 2f 0a 20 20 67 65 74 74  ins..  */.  gett
e2a0: 69 6d 65 6f 66 64 61 79 28 26 62 65 67 69 6e 54  imeofday(&beginT
e2b0: 69 6d 65 2c 20 30 29 3b 0a 0a 20 20 2f 2a 20 50  ime, 0);..  /* P
e2c0: 61 72 73 65 20 63 6f 6d 6d 61 6e 64 2d 6c 69 6e  arse command-lin
e2d0: 65 20 61 72 67 75 6d 65 6e 74 73 0a 20 20 2a 2f  e arguments.  */
e2e0: 0a 20 20 77 68 69 6c 65 28 20 61 72 67 63 3e 31  .  while( argc>1
e2f0: 20 26 26 20 61 72 67 76 5b 31 5d 5b 30 5d 3d 3d   && argv[1][0]==
e300: 27 2d 27 20 29 7b 0a 20 20 20 20 63 68 61 72 20  '-' ){.    char 
e310: 2a 7a 20 3d 20 61 72 67 76 5b 31 5d 3b 0a 20 20  *z = argv[1];.  
e320: 20 20 63 68 61 72 20 2a 7a 41 72 67 20 3d 20 61    char *zArg = a
e330: 72 67 63 3e 3d 33 20 3f 20 61 72 67 76 5b 32 5d  rgc>=3 ? argv[2]
e340: 20 3a 20 22 30 22 3b 0a 20 20 20 20 69 66 28 20   : "0";.    if( 
e350: 7a 5b 30 5d 3d 3d 27 2d 27 20 26 26 20 7a 5b 31  z[0]=='-' && z[1
e360: 5d 3d 3d 27 2d 27 20 29 20 7a 2b 2b 3b 0a 20 20  ]=='-' ) z++;.  
e370: 20 20 69 66 28 20 73 74 72 63 6d 70 28 7a 2c 22    if( strcmp(z,"
e380: 2d 75 73 65 72 22 29 3d 3d 30 20 29 7b 0a 20 20  -user")==0 ){.  
e390: 20 20 20 20 7a 50 65 72 6d 55 73 65 72 20 3d 20      zPermUser = 
e3a0: 7a 41 72 67 3b 0a 20 20 20 20 7d 65 6c 73 65 20  zArg;.    }else 
e3b0: 69 66 28 20 73 74 72 63 6d 70 28 7a 2c 22 2d 72  if( strcmp(z,"-r
e3c0: 6f 6f 74 22 29 3d 3d 30 20 29 7b 0a 20 20 20 20  oot")==0 ){.    
e3d0: 20 20 7a 52 6f 6f 74 20 3d 20 7a 41 72 67 3b 0a    zRoot = zArg;.
e3e0: 20 20 20 20 7d 65 6c 73 65 20 69 66 28 20 73 74      }else if( st
e3f0: 72 63 6d 70 28 7a 2c 22 2d 6c 6f 67 66 69 6c 65  rcmp(z,"-logfile
e400: 22 29 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 7a  ")==0 ){.      z
e410: 4c 6f 67 46 69 6c 65 20 3d 20 7a 41 72 67 3b 0a  LogFile = zArg;.
e420: 20 20 20 20 7d 65 6c 73 65 20 69 66 28 20 73 74      }else if( st
e430: 72 63 6d 70 28 7a 2c 22 2d 68 74 74 70 73 22 29  rcmp(z,"-https")
e440: 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 75 73 65  ==0 ){.      use
e450: 48 74 74 70 73 20 3d 20 61 74 6f 69 28 7a 41 72  Https = atoi(zAr
e460: 67 29 3b 0a 20 20 20 20 20 20 7a 48 74 74 70 20  g);.      zHttp 
e470: 3d 20 75 73 65 48 74 74 70 73 20 3f 20 22 68 74  = useHttps ? "ht
e480: 74 70 22 20 3a 20 22 68 74 74 70 73 22 3b 0a 20  tp" : "https";. 
e490: 20 20 20 7d 65 6c 73 65 20 69 66 28 20 73 74 72     }else if( str
e4a0: 63 6d 70 28 7a 2c 20 22 2d 70 6f 72 74 22 29 3d  cmp(z, "-port")=
e4b0: 3d 30 20 29 7b 0a 20 20 20 20 20 20 7a 50 6f 72  =0 ){.      zPor
e4c0: 74 20 3d 20 7a 41 72 67 3b 0a 20 20 20 20 20 20  t = zArg;.      
e4d0: 73 74 61 6e 64 61 6c 6f 6e 65 20 3d 20 31 3b 0a  standalone = 1;.
e4e0: 20 20 20 20 7d 65 6c 73 65 20 69 66 28 20 73 74      }else if( st
e4f0: 72 63 6d 70 28 7a 2c 20 22 2d 66 61 6d 69 6c 79  rcmp(z, "-family
e500: 22 29 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 69  ")==0 ){.      i
e510: 66 28 20 73 74 72 63 6d 70 28 7a 41 72 67 2c 20  f( strcmp(zArg, 
e520: 22 69 70 76 34 22 29 3d 3d 30 20 29 7b 0a 20 20  "ipv4")==0 ){.  
e530: 20 20 20 20 20 20 69 70 76 34 4f 6e 6c 79 20 3d        ipv4Only =
e540: 20 31 3b 0a 20 20 20 20 20 20 7d 65 6c 73 65 20   1;.      }else 
e550: 69 66 28 20 73 74 72 63 6d 70 28 7a 41 72 67 2c  if( strcmp(zArg,
e560: 20 22 69 70 76 36 22 29 3d 3d 30 20 29 7b 0a 20   "ipv6")==0 ){. 
e570: 20 20 20 20 20 20 20 69 70 76 36 4f 6e 6c 79 20         ipv6Only 
e580: 3d 20 31 3b 0a 20 20 20 20 20 20 7d 65 6c 73 65  = 1;.      }else
e590: 7b 0a 20 20 20 20 20 20 20 20 4d 61 6c 66 75 6e  {.        Malfun
e5a0: 63 74 69 6f 6e 28 5f 5f 4c 49 4e 45 5f 5f 2c 20  ction(__LINE__, 
e5b0: 22 75 6e 6b 6e 6f 77 6e 20 49 50 20 70 72 6f 74  "unknown IP prot
e5c0: 6f 63 6f 6c 3a 20 5b 25 73 5d 22 2c 20 7a 41 72  ocol: [%s]", zAr
e5d0: 67 29 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20  g);.      }.    
e5e0: 7d 65 6c 73 65 20 69 66 28 20 73 74 72 63 6d 70  }else if( strcmp
e5f0: 28 7a 2c 20 22 2d 6a 61 69 6c 22 29 3d 3d 30 20  (z, "-jail")==0 
e600: 29 7b 0a 20 20 20 20 20 20 69 66 28 20 61 74 6f  ){.      if( ato
e610: 69 28 7a 41 72 67 29 3d 3d 30 20 29 7b 0a 20 20  i(zArg)==0 ){.  
e620: 20 20 20 20 20 20 75 73 65 43 68 72 6f 6f 74 4a        useChrootJ
e630: 61 69 6c 20 3d 20 30 3b 0a 20 20 20 20 20 20 7d  ail = 0;.      }
e640: 0a 20 20 20 20 7d 65 6c 73 65 20 69 66 28 20 73  .    }else if( s
e650: 74 72 63 6d 70 28 7a 2c 20 22 2d 64 65 62 75 67  trcmp(z, "-debug
e660: 22 29 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 69  ")==0 ){.      i
e670: 66 28 20 61 74 6f 69 28 7a 41 72 67 29 20 29 7b  f( atoi(zArg) ){
e680: 0a 20 20 20 20 20 20 20 20 75 73 65 54 69 6d 65  .        useTime
e690: 6f 75 74 20 3d 20 30 3b 0a 20 20 20 20 20 20 7d  out = 0;.      }
e6a0: 0a 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20  .    }else{.    
e6b0: 20 20 4d 61 6c 66 75 6e 63 74 69 6f 6e 28 5f 5f    Malfunction(__
e6c0: 4c 49 4e 45 5f 5f 2c 20 22 75 6e 6b 6e 6f 77 6e  LINE__, "unknown
e6d0: 20 61 72 67 75 6d 65 6e 74 3a 20 5b 25 73 5d 22   argument: [%s]"
e6e0: 2c 20 7a 29 3b 0a 20 20 20 20 7d 0a 20 20 20 20  , z);.    }.    
e6f0: 61 72 67 76 20 2b 3d 20 32 3b 0a 20 20 20 20 61  argv += 2;.    a
e700: 72 67 63 20 2d 3d 20 32 3b 0a 20 20 7d 0a 20 20  rgc -= 2;.  }.  
e710: 69 66 28 20 7a 52 6f 6f 74 3d 3d 30 20 29 7b 0a  if( zRoot==0 ){.
e720: 20 20 20 20 69 66 28 20 73 74 61 6e 64 61 6c 6f      if( standalo
e730: 6e 65 20 29 7b 0a 20 20 20 20 20 20 7a 52 6f 6f  ne ){.      zRoo
e740: 74 20 3d 20 22 2e 22 3b 0a 20 20 20 20 7d 65 6c  t = ".";.    }el
e750: 73 65 7b 0a 20 20 20 20 20 20 4d 61 6c 66 75 6e  se{.      Malfun
e760: 63 74 69 6f 6e 28 5f 5f 4c 49 4e 45 5f 5f 2c 20  ction(__LINE__, 
e770: 22 6e 6f 20 2d 2d 72 6f 6f 74 20 73 70 65 63 69  "no --root speci
e780: 66 69 65 64 22 29 3b 0a 20 20 20 20 7d 0a 20 20  fied");.    }.  
e790: 7d 0a 20 20 0a 20 20 2f 2a 20 43 68 61 6e 67 65  }.  .  /* Change
e7a0: 20 64 69 72 65 63 74 6f 72 69 65 73 20 74 6f 20   directories to 
e7b0: 74 68 65 20 72 6f 6f 74 20 6f 66 20 74 68 65 20  the root of the 
e7c0: 48 54 54 50 20 66 69 6c 65 73 79 73 74 65 6d 2e  HTTP filesystem.
e7d0: 20 20 54 68 65 6e 0a 20 20 2a 2a 20 63 72 65 61    Then.  ** crea
e7e0: 74 65 20 61 20 63 68 72 6f 6f 74 20 6a 61 69 6c  te a chroot jail
e7f0: 20 74 68 65 72 65 2e 0a 20 20 2a 2f 0a 20 20 69   there..  */.  i
e800: 66 28 20 63 68 64 69 72 28 7a 52 6f 6f 74 29 21  f( chdir(zRoot)!
e810: 3d 30 20 29 7b 0a 20 20 20 20 4d 61 6c 66 75 6e  =0 ){.    Malfun
e820: 63 74 69 6f 6e 28 5f 5f 4c 49 4e 45 5f 5f 2c 20  ction(__LINE__, 
e830: 22 63 61 6e 6e 6f 74 20 63 68 61 6e 67 65 20 74  "cannot change t
e840: 6f 20 64 69 72 65 63 74 6f 72 79 20 5b 25 73 5d  o directory [%s]
e850: 22 2c 20 7a 52 6f 6f 74 29 3b 0a 20 20 7d 0a 0a  ", zRoot);.  }..
e860: 20 20 2f 2a 20 47 65 74 20 69 6e 66 6f 72 6d 61    /* Get informa
e870: 74 69 6f 6e 20 61 62 6f 75 74 20 74 68 65 20 75  tion about the u
e880: 73 65 72 20 69 66 20 61 76 61 69 6c 61 62 6c 65  ser if available
e890: 20 2a 2f 0a 20 20 69 66 28 20 7a 50 65 72 6d 55   */.  if( zPermU
e8a0: 73 65 72 20 29 20 70 77 64 20 3d 20 67 65 74 70  ser ) pwd = getp
e8b0: 77 6e 61 6d 28 7a 50 65 72 6d 55 73 65 72 29 3b  wnam(zPermUser);
e8c0: 0a 0a 20 20 2f 2a 20 45 6e 74 65 72 20 74 68 65  ..  /* Enter the
e8d0: 20 63 68 72 6f 6f 74 20 6a 61 69 6c 20 69 66 20   chroot jail if 
e8e0: 72 65 71 75 65 73 74 65 64 20 2a 2f 20 20 0a 20  requested */  . 
e8f0: 20 69 66 28 20 7a 50 65 72 6d 55 73 65 72 20 26   if( zPermUser &
e900: 26 20 75 73 65 43 68 72 6f 6f 74 4a 61 69 6c 20  & useChrootJail 
e910: 26 26 20 67 65 74 75 69 64 28 29 3d 3d 30 20 29  && getuid()==0 )
e920: 7b 0a 20 20 20 20 69 66 28 20 63 68 72 6f 6f 74  {.    if( chroot
e930: 28 22 2e 22 29 3c 30 20 29 7b 0a 20 20 20 20 20  (".")<0 ){.     
e940: 20 4d 61 6c 66 75 6e 63 74 69 6f 6e 28 5f 5f 4c   Malfunction(__L
e950: 49 4e 45 5f 5f 2c 20 22 75 6e 61 62 6c 65 20 74  INE__, "unable t
e960: 6f 20 63 72 65 61 74 65 20 63 68 72 6f 6f 74 20  o create chroot 
e970: 6a 61 69 6c 22 29 3b 0a 20 20 20 20 7d 65 6c 73  jail");.    }els
e980: 65 7b 0a 20 20 20 20 20 20 7a 52 6f 6f 74 20 3d  e{.      zRoot =
e990: 20 22 22 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 0a   "";.    }.  }..
e9a0: 20 20 2f 2a 20 41 63 74 69 76 61 74 65 20 74 68    /* Activate th
e9b0: 65 20 73 65 72 76 65 72 2c 20 69 66 20 72 65 71  e server, if req
e9c0: 75 65 73 74 65 64 20 2a 2f 0a 20 20 69 66 28 20  uested */.  if( 
e9d0: 7a 50 6f 72 74 20 26 26 20 68 74 74 70 5f 73 65  zPort && http_se
e9e0: 72 76 65 72 28 7a 50 6f 72 74 2c 20 30 29 20 29  rver(zPort, 0) )
e9f0: 7b 0a 20 20 20 20 4d 61 6c 66 75 6e 63 74 69 6f  {.    Malfunctio
ea00: 6e 28 5f 5f 4c 49 4e 45 5f 5f 2c 20 22 66 61 69  n(__LINE__, "fai
ea10: 6c 65 64 20 74 6f 20 73 74 61 72 74 20 73 65 72  led to start ser
ea20: 76 65 72 22 29 3b 0a 20 20 7d 0a 0a 20 20 2f 2a  ver");.  }..  /*
ea30: 20 44 72 6f 70 20 72 6f 6f 74 20 70 72 69 76 69   Drop root privi
ea40: 6c 65 67 65 73 2e 0a 20 20 2a 2f 0a 20 20 69 66  leges..  */.  if
ea50: 28 20 7a 50 65 72 6d 55 73 65 72 20 29 7b 0a 20  ( zPermUser ){. 
ea60: 20 20 20 69 66 28 20 70 77 64 20 29 7b 0a 20 20     if( pwd ){.  
ea70: 20 20 20 20 73 65 74 67 69 64 28 70 77 64 2d 3e      setgid(pwd->
ea80: 70 77 5f 67 69 64 29 3b 0a 20 20 20 20 20 20 73  pw_gid);.      s
ea90: 65 74 75 69 64 28 70 77 64 2d 3e 70 77 5f 75 69  etuid(pwd->pw_ui
eaa0: 64 29 3b 0a 20 20 20 20 7d 65 6c 73 65 7b 0a 20  d);.    }else{. 
eab0: 20 20 20 20 20 4d 61 6c 66 75 6e 63 74 69 6f 6e       Malfunction
eac0: 28 5f 5f 4c 49 4e 45 5f 5f 2c 20 22 6e 6f 20 73  (__LINE__, "no s
ead0: 75 63 68 20 75 73 65 72 20 5b 25 73 5d 22 2c 20  uch user [%s]", 
eae0: 7a 50 65 72 6d 55 73 65 72 29 3b 0a 20 20 20 20  zPermUser);.    
eaf0: 7d 0a 20 20 7d 0a 20 20 69 66 28 20 67 65 74 75  }.  }.  if( getu
eb00: 69 64 28 29 3d 3d 30 20 29 7b 0a 20 20 20 20 4d  id()==0 ){.    M
eb10: 61 6c 66 75 6e 63 74 69 6f 6e 28 5f 5f 4c 49 4e  alfunction(__LIN
eb20: 45 5f 5f 2c 20 22 63 61 6e 6e 6f 74 20 72 75 6e  E__, "cannot run
eb30: 20 61 73 20 72 6f 6f 74 22 29 3b 0a 20 20 7d 0a   as root");.  }.
eb40: 0a 20 20 2f 2a 20 47 65 74 20 74 68 65 20 49 50  .  /* Get the IP
eb50: 20 61 64 64 72 65 73 73 20 66 72 6f 6d 20 77 68   address from wh
eb60: 65 6e 20 74 68 65 20 72 65 71 75 65 73 74 20 6f  en the request o
eb70: 72 69 67 69 6e 61 74 65 73 0a 20 20 2a 2f 0a 20  riginates.  */. 
eb80: 20 7b 0a 20 20 20 20 61 64 64 72 65 73 73 20 72   {.    address r
eb90: 65 6d 6f 74 65 41 64 64 72 3b 0a 20 20 20 20 75  emoteAddr;.    u
eba0: 6e 73 69 67 6e 65 64 20 69 6e 74 20 73 69 7a 65  nsigned int size
ebb0: 20 3d 20 73 69 7a 65 6f 66 28 72 65 6d 6f 74 65   = sizeof(remote
ebc0: 41 64 64 72 29 3b 0a 20 20 20 20 63 68 61 72 20  Addr);.    char 
ebd0: 7a 48 6f 73 74 5b 4e 49 5f 4d 41 58 48 4f 53 54  zHost[NI_MAXHOST
ebe0: 5d 3b 0a 20 20 20 20 69 66 28 20 67 65 74 70 65  ];.    if( getpe
ebf0: 65 72 6e 61 6d 65 28 30 2c 20 26 72 65 6d 6f 74  ername(0, &remot
ec00: 65 41 64 64 72 2e 73 61 2c 20 26 73 69 7a 65 29  eAddr.sa, &size)
ec10: 3e 3d 30 20 29 7b 0a 20 20 20 20 20 20 67 65 74  >=0 ){.      get
ec20: 6e 61 6d 65 69 6e 66 6f 28 26 72 65 6d 6f 74 65  nameinfo(&remote
ec30: 41 64 64 72 2e 73 61 2c 20 73 69 7a 65 2c 20 7a  Addr.sa, size, z
ec40: 48 6f 73 74 2c 20 73 69 7a 65 6f 66 28 7a 48 6f  Host, sizeof(zHo
ec50: 73 74 29 2c 20 30 2c 20 30 2c 0a 20 20 20 20 20  st), 0, 0,.     
ec60: 20 20 20 20 20 20 20 20 20 20 20 20 20 4e 49 5f               NI_
ec70: 4e 55 4d 45 52 49 43 48 4f 53 54 29 3b 0a 20 20  NUMERICHOST);.  
ec80: 20 20 20 20 7a 52 65 6d 6f 74 65 41 64 64 72 20      zRemoteAddr 
ec90: 3d 20 53 74 72 44 75 70 28 7a 48 6f 73 74 29 3b  = StrDup(zHost);
eca0: 0a 20 20 20 20 7d 0a 20 20 7d 0a 0a 20 20 2f 2a  .    }.  }..  /*
ecb0: 20 50 72 6f 63 65 73 73 20 74 68 65 20 69 6e 70   Process the inp
ecc0: 75 74 20 73 74 72 65 61 6d 20 2a 2f 0a 20 20 66  ut stream */.  f
ecd0: 6f 72 28 69 3d 30 3b 20 69 3c 31 30 30 3b 20 69  or(i=0; i<100; i
ece0: 2b 2b 29 7b 0a 20 20 20 20 50 72 6f 63 65 73 73  ++){.    Process
ecf0: 4f 6e 65 52 65 71 75 65 73 74 28 30 29 3b 0a 20  OneRequest(0);. 
ed00: 20 7d 0a 20 20 50 72 6f 63 65 73 73 4f 6e 65 52   }.  ProcessOneR
ed10: 65 71 75 65 73 74 28 31 29 3b 0a 20 20 65 78 69  equest(1);.  exi
ed20: 74 28 30 29 3b 0a 7d 0a                          t(0);.}.