Documentation Source Text
Hex Artifact Content
Not logged in

Artifact c028190e17ce721e234ec7747af71ac8d7766b43:


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 74 69 6d 65 5f 74 20 62  .static time_t b
16e0: 65 67 69 6e 54 69 6d 65 3b 20 20 20 20 20 20 20  eginTime;       
16f0: 20 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 69 70 76 36 4f 6e 6c 79  tic int ipv6Only
18c0: 20 3d 20 30 3b 20 20 20 20 20 20 20 20 20 2f 2a   = 0;         /*
18d0: 20 55 73 65 20 49 50 76 36 20 6f 6e 6c 79 20 2a   Use IPv6 only *
18e0: 2f 0a 73 74 61 74 69 63 20 69 6e 74 20 69 70 76  /.static int ipv
18f0: 34 4f 6e 6c 79 20 3d 20 30 3b 20 20 20 20 20 20  4Only = 0;      
1900: 20 20 20 2f 2a 20 55 73 65 20 49 50 76 34 20 6f     /* Use IPv4 o
1910: 6e 6c 79 20 2a 2f 0a 0a 2f 2a 0a 2a 2a 20 43 68  nly */../*.** Ch
1920: 61 6e 67 65 20 65 76 65 72 79 20 73 70 61 63 65  ange every space
1930: 20 6f 72 20 75 6e 70 72 69 6e 74 61 62 6c 65 20   or unprintable 
1940: 63 68 61 72 61 63 74 65 72 20 69 6e 20 74 68 65  character in the
1950: 20 7a 41 67 65 6e 74 5b 5d 20 73 74 72 69 6e 67   zAgent[] string
1960: 0a 2a 2a 20 69 6e 74 6f 20 61 6e 20 5f 2e 0a 2a  .** into an _..*
1970: 2a 0a 2a 2a 20 49 66 20 74 68 65 20 75 73 65 72  *.** If the user
1980: 20 61 67 65 6e 74 20 73 74 72 69 6e 67 20 63 6f   agent string co
1990: 6e 74 61 69 6e 73 20 63 65 72 74 61 69 6e 20 70  ntains certain p
19a0: 72 6f 68 69 62 69 74 65 64 20 73 74 72 69 6e 67  rohibited string
19b0: 2c 20 74 68 65 6e 0a 2a 2a 20 65 78 69 74 20 69  , then.** exit i
19c0: 6d 6d 65 64 69 61 74 65 6c 79 2e 0a 2a 2f 0a 73  mmediately..*/.s
19d0: 74 61 74 69 63 20 76 6f 69 64 20 46 69 78 75 70  tatic void Fixup
19e0: 55 73 65 72 41 67 65 6e 74 28 76 6f 69 64 29 7b  UserAgent(void){
19f0: 0a 20 20 69 6e 74 20 69 3b 0a 20 20 69 66 28 20  .  int i;.  if( 
1a00: 7a 41 67 65 6e 74 3d 3d 30 20 7c 7c 20 7a 41 67  zAgent==0 || zAg
1a10: 65 6e 74 5b 30 5d 3d 3d 30 20 29 20 7a 41 67 65  ent[0]==0 ) zAge
1a20: 6e 74 20 3d 20 22 2a 22 3b 0a 20 20 66 6f 72 28  nt = "*";.  for(
1a30: 69 3d 30 3b 20 7a 41 67 65 6e 74 5b 69 5d 3b 20  i=0; zAgent[i]; 
1a40: 69 2b 2b 29 7b 0a 20 20 20 20 69 6e 74 20 63 20  i++){.    int c 
1a50: 3d 20 7a 41 67 65 6e 74 5b 69 5d 3b 0a 20 20 20  = zAgent[i];.   
1a60: 20 69 66 28 20 63 3c 27 21 27 20 7c 7c 20 63 3e   if( c<'!' || c>
1a70: 27 7e 27 20 20 29 7b 20 7a 41 67 65 6e 74 5b 69  '~'  ){ zAgent[i
1a80: 5d 20 3d 20 27 5f 27 3b 20 7d 0a 20 20 7d 0a 7d  ] = '_'; }.  }.}
1a90: 0a 0a 2f 2a 0a 2a 2a 20 4d 61 6b 65 20 61 6e 20  ../*.** Make an 
1aa0: 65 6e 74 72 79 20 69 6e 20 74 68 65 20 6c 6f 67  entry in the log
1ab0: 20 66 69 6c 65 2e 20 20 49 66 20 74 68 65 20 48   file.  If the H
1ac0: 54 54 50 20 63 6f 6e 6e 65 63 74 69 6f 6e 20 73  TTP connection s
1ad0: 68 6f 75 6c 64 20 62 65 0a 2a 2a 20 63 6c 6f 73  hould be.** clos
1ae0: 65 64 2c 20 74 68 65 6e 20 74 65 72 6d 69 6e 61  ed, then termina
1af0: 74 65 20 74 68 69 73 20 70 72 6f 63 65 73 73 2e  te this process.
1b00: 20 20 4f 74 68 65 72 77 69 73 65 20 72 65 74 75    Otherwise retu
1b10: 72 6e 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f  rn..*/.static vo
1b20: 69 64 20 4d 61 6b 65 4c 6f 67 45 6e 74 72 79 28  id MakeLogEntry(
1b30: 69 6e 74 20 61 29 7b 0a 20 20 46 49 4c 45 20 2a  int a){.  FILE *
1b40: 6c 6f 67 3b 0a 20 20 69 66 28 20 7a 54 6d 70 4e  log;.  if( zTmpN
1b50: 61 6d 20 29 7b 0a 20 20 20 20 75 6e 6c 69 6e 6b  am ){.    unlink
1b60: 28 7a 54 6d 70 4e 61 6d 29 3b 0a 20 20 7d 0a 20  (zTmpNam);.  }. 
1b70: 20 69 66 28 20 7a 4c 6f 67 46 69 6c 65 20 26 26   if( zLogFile &&
1b80: 20 21 6f 6d 69 74 4c 6f 67 20 29 7b 0a 20 20 20   !omitLog ){.   
1b90: 20 74 69 6d 65 5f 74 20 6e 6f 77 3b 0a 20 20 20   time_t now;.   
1ba0: 20 73 74 72 75 63 74 20 74 6d 20 2a 70 54 6d 3b   struct tm *pTm;
1bb0: 0a 20 20 20 20 73 74 72 75 63 74 20 72 75 73 61  .    struct rusa
1bc0: 67 65 20 73 65 6c 66 2c 20 63 68 69 6c 64 72 65  ge self, childre
1bd0: 6e 3b 0a 20 20 20 20 69 6e 74 20 69 3b 0a 20 20  n;.    int i;.  
1be0: 20 20 69 6e 74 20 77 61 69 74 53 74 61 74 75 73    int waitStatus
1bf0: 3b 0a 20 20 20 20 63 68 61 72 20 7a 44 61 74 65  ;.    char zDate
1c00: 5b 32 30 30 5d 3b 0a 20 20 20 20 63 68 61 72 20  [200];.    char 
1c10: 2a 7a 52 4d 20 3d 20 7a 52 65 6d 6f 74 65 55 73  *zRM = zRemoteUs
1c20: 65 72 20 3f 20 7a 52 65 6d 6f 74 65 55 73 65 72  er ? zRemoteUser
1c30: 20 3a 20 22 2a 22 3b 0a 0a 20 20 20 20 69 66 28   : "*";..    if(
1c40: 20 7a 53 63 72 69 70 74 3d 3d 30 20 7c 7c 20 7a   zScript==0 || z
1c50: 53 63 72 69 70 74 5b 30 5d 3d 3d 30 20 29 20 7a  Script[0]==0 ) z
1c60: 53 63 72 69 70 74 20 3d 20 22 2a 22 3b 0a 20 20  Script = "*";.  
1c70: 20 20 69 66 28 20 7a 52 65 6d 6f 74 65 41 64 64    if( zRemoteAdd
1c80: 72 3d 3d 30 20 7c 7c 20 7a 52 65 6d 6f 74 65 41  r==0 || zRemoteA
1c90: 64 64 72 5b 30 5d 3d 3d 30 20 29 20 7a 52 65 6d  ddr[0]==0 ) zRem
1ca0: 6f 74 65 41 64 64 72 20 3d 20 22 2a 22 3b 0a 20  oteAddr = "*";. 
1cb0: 20 20 20 69 66 28 20 7a 48 74 74 70 48 6f 73 74     if( zHttpHost
1cc0: 3d 3d 30 20 7c 7c 20 7a 48 74 74 70 48 6f 73 74  ==0 || zHttpHost
1cd0: 5b 30 5d 3d 3d 30 20 29 20 7a 48 74 74 70 48 6f  [0]==0 ) zHttpHo
1ce0: 73 74 20 3d 20 22 2a 22 3b 0a 20 20 20 20 69 66  st = "*";.    if
1cf0: 28 20 7a 52 65 66 65 72 65 72 3d 3d 30 20 7c 7c  ( zReferer==0 ||
1d00: 20 7a 52 65 66 65 72 65 72 5b 30 5d 3d 3d 30 20   zReferer[0]==0 
1d10: 29 20 7a 52 65 66 65 72 65 72 20 3d 20 22 2a 22  ) zReferer = "*"
1d20: 3b 0a 20 20 20 20 66 6f 72 28 69 3d 30 3b 20 7a  ;.    for(i=0; z
1d30: 52 65 66 65 72 65 72 5b 69 5d 3b 20 69 2b 2b 29  Referer[i]; i++)
1d40: 7b 20 0a 20 20 20 20 20 20 69 66 28 20 69 73 73  { .      if( iss
1d50: 70 61 63 65 28 7a 52 65 66 65 72 65 72 5b 69 5d  pace(zReferer[i]
1d60: 29 20 29 7b 20 7a 52 65 66 65 72 65 72 20 3d 20  ) ){ zReferer = 
1d70: 22 2a 22 3b 20 62 72 65 61 6b 3b 20 7d 0a 20 20  "*"; break; }.  
1d80: 20 20 7d 0a 20 20 20 20 69 66 28 20 7a 41 67 65    }.    if( zAge
1d90: 6e 74 3d 3d 30 20 7c 7c 20 7a 41 67 65 6e 74 5b  nt==0 || zAgent[
1da0: 30 5d 3d 3d 30 20 29 20 7a 41 67 65 6e 74 20 3d  0]==0 ) zAgent =
1db0: 20 22 2a 22 3b 0a 20 20 20 20 74 69 6d 65 28 26   "*";.    time(&
1dc0: 6e 6f 77 29 3b 0a 20 20 20 20 70 54 6d 20 3d 20  now);.    pTm = 
1dd0: 6c 6f 63 61 6c 74 69 6d 65 28 26 6e 6f 77 29 3b  localtime(&now);
1de0: 0a 20 20 20 20 73 74 72 66 74 69 6d 65 28 7a 44  .    strftime(zD
1df0: 61 74 65 2c 20 73 69 7a 65 6f 66 28 7a 44 61 74  ate, sizeof(zDat
1e00: 65 29 2c 20 22 25 59 2d 25 6d 2d 25 64 20 25 48  e), "%Y-%m-%d %H
1e10: 3a 25 4d 3a 25 53 22 2c 20 70 54 6d 29 3b 0a 20  :%M:%S", pTm);. 
1e20: 20 20 20 77 61 69 74 70 69 64 28 2d 31 2c 20 26     waitpid(-1, &
1e30: 77 61 69 74 53 74 61 74 75 73 2c 20 57 4e 4f 48  waitStatus, WNOH
1e40: 41 4e 47 29 3b 0a 20 20 20 20 67 65 74 72 75 73  ANG);.    getrus
1e50: 61 67 65 28 52 55 53 41 47 45 5f 53 45 4c 46 2c  age(RUSAGE_SELF,
1e60: 20 26 73 65 6c 66 29 3b 0a 20 20 20 20 67 65 74   &self);.    get
1e70: 72 75 73 61 67 65 28 52 55 53 41 47 45 5f 43 48  rusage(RUSAGE_CH
1e80: 49 4c 44 52 45 4e 2c 20 26 63 68 69 6c 64 72 65  ILDREN, &childre
1e90: 6e 29 3b 0a 20 20 20 20 69 66 28 20 28 6c 6f 67  n);.    if( (log
1ea0: 20 3d 20 66 6f 70 65 6e 28 7a 4c 6f 67 46 69 6c   = fopen(zLogFil
1eb0: 65 2c 22 61 22 29 29 21 3d 30 20 29 7b 0a 23 69  e,"a"))!=0 ){.#i
1ec0: 66 64 65 66 20 43 4f 4d 42 49 4e 45 44 5f 4c 4f  fdef COMBINED_LO
1ed0: 47 5f 46 4f 52 4d 41 54 0a 20 20 20 20 20 20 73  G_FORMAT.      s
1ee0: 74 72 66 74 69 6d 65 28 7a 44 61 74 65 2c 20 73  trftime(zDate, s
1ef0: 69 7a 65 6f 66 28 7a 44 61 74 65 29 2c 20 22 25  izeof(zDate), "%
1f00: 64 2f 25 62 2f 25 59 3a 25 48 3a 25 4d 3a 25 53  d/%b/%Y:%H:%M:%S
1f10: 20 25 7a 22 2c 20 70 54 6d 29 3b 0a 20 20 20 20   %z", pTm);.    
1f20: 20 20 66 70 72 69 6e 74 66 28 6c 6f 67 2c 20 22    fprintf(log, "
1f30: 25 73 20 2d 20 2d 20 5b 25 73 5d 20 5c 22 25 73  %s - - [%s] \"%s
1f40: 20 25 73 20 25 73 5c 22 20 25 73 20 25 64 20 5c   %s %s\" %s %d \
1f50: 22 25 73 5c 22 20 5c 22 25 73 5c 22 5c 6e 22 2c  "%s\" \"%s\"\n",
1f60: 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7a  .              z
1f70: 52 65 6d 6f 74 65 41 64 64 72 2c 20 7a 44 61 74  RemoteAddr, zDat
1f80: 65 2c 20 7a 4d 65 74 68 6f 64 2c 20 7a 53 63 72  e, zMethod, zScr
1f90: 69 70 74 2c 20 7a 50 72 6f 74 6f 63 6f 6c 2c 0a  ipt, zProtocol,.
1fa0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7a 52                zR
1fb0: 65 70 6c 79 53 74 61 74 75 73 2c 20 6e 4f 75 74  eplyStatus, nOut
1fc0: 2c 20 7a 52 65 66 65 72 65 72 2c 20 7a 41 67 65  , zReferer, zAge
1fd0: 6e 74 29 3b 0a 23 65 6c 73 65 0a 20 20 20 20 20  nt);.#else.     
1fe0: 20 73 74 72 66 74 69 6d 65 28 7a 44 61 74 65 2c   strftime(zDate,
1ff0: 20 73 69 7a 65 6f 66 28 7a 44 61 74 65 29 2c 20   sizeof(zDate), 
2000: 22 25 59 2d 25 6d 2d 25 64 20 25 48 3a 25 4d 3a  "%Y-%m-%d %H:%M:
2010: 25 53 22 2c 20 70 54 6d 29 3b 0a 20 20 20 20 20  %S", pTm);.     
2020: 20 66 70 72 69 6e 74 66 28 6c 6f 67 2c 20 22 25   fprintf(log, "%
2030: 73 20 25 73 20 25 73 3a 2f 2f 25 73 25 73 20 25  s %s %s://%s%s %
2040: 73 20 25 73 20 25 64 20 25 64 20 25 64 20 25 64  s %s %d %d %d %d
2050: 20 25 64 20 25 64 20 25 64 20 25 64 20 25 73 20   %d %d %d %d %s 
2060: 25 73 5c 6e 22 2c 20 0a 20 20 20 20 20 20 20 20  %s\n", .        
2070: 20 20 7a 44 61 74 65 2c 20 7a 52 65 6d 6f 74 65    zDate, zRemote
2080: 41 64 64 72 2c 20 7a 48 74 74 70 2c 20 7a 48 74  Addr, zHttp, zHt
2090: 74 70 48 6f 73 74 2c 20 7a 53 63 72 69 70 74 2c  tpHost, zScript,
20a0: 20 7a 52 65 66 65 72 65 72 2c 0a 20 20 20 20 20   zReferer,.     
20b0: 20 20 20 20 20 7a 52 65 70 6c 79 53 74 61 74 75       zReplyStatu
20c0: 73 2c 20 6e 49 6e 2c 20 6e 4f 75 74 2c 0a 20 20  s, nIn, nOut,.  
20d0: 20 20 20 20 20 20 20 20 28 69 6e 74 29 28 73 65          (int)(se
20e0: 6c 66 2e 72 75 5f 75 74 69 6d 65 2e 74 76 5f 73  lf.ru_utime.tv_s
20f0: 65 63 2a 31 30 30 30 30 30 30 20 2b 20 73 65 6c  ec*1000000 + sel
2100: 66 2e 72 75 5f 75 74 69 6d 65 2e 74 76 5f 75 73  f.ru_utime.tv_us
2110: 65 63 29 2c 0a 20 20 20 20 20 20 20 20 20 20 28  ec),.          (
2120: 69 6e 74 29 28 73 65 6c 66 2e 72 75 5f 73 74 69  int)(self.ru_sti
2130: 6d 65 2e 74 76 5f 73 65 63 2a 31 30 30 30 30 30  me.tv_sec*100000
2140: 30 20 2b 20 73 65 6c 66 2e 72 75 5f 73 74 69 6d  0 + self.ru_stim
2150: 65 2e 74 76 5f 75 73 65 63 29 2c 0a 20 20 20 20  e.tv_usec),.    
2160: 20 20 20 20 20 20 28 69 6e 74 29 28 63 68 69 6c        (int)(chil
2170: 64 72 65 6e 2e 72 75 5f 75 74 69 6d 65 2e 74 76  dren.ru_utime.tv
2180: 5f 73 65 63 2a 31 30 30 30 30 30 30 20 2b 20 63  _sec*1000000 + c
2190: 68 69 6c 64 72 65 6e 2e 72 75 5f 75 74 69 6d 65  hildren.ru_utime
21a0: 2e 74 76 5f 75 73 65 63 29 2c 0a 20 20 20 20 20  .tv_usec),.     
21b0: 20 20 20 20 20 28 69 6e 74 29 28 63 68 69 6c 64       (int)(child
21c0: 72 65 6e 2e 72 75 5f 73 74 69 6d 65 2e 74 76 5f  ren.ru_stime.tv_
21d0: 73 65 63 2a 31 30 30 30 30 30 30 20 2b 20 63 68  sec*1000000 + ch
21e0: 69 6c 64 72 65 6e 2e 72 75 5f 73 74 69 6d 65 2e  ildren.ru_stime.
21f0: 74 76 5f 75 73 65 63 29 2c 0a 20 20 20 20 20 20  tv_usec),.      
2200: 20 20 20 20 28 69 6e 74 29 28 6e 6f 77 20 2d 20      (int)(now - 
2210: 62 65 67 69 6e 54 69 6d 65 29 2c 0a 20 20 20 20  beginTime),.    
2220: 20 20 20 20 20 20 6e 52 65 71 75 65 73 74 2c 20        nRequest, 
2230: 7a 41 67 65 6e 74 2c 20 7a 52 4d 0a 20 20 20 20  zAgent, zRM.    
2240: 20 20 29 3b 0a 23 65 6e 64 69 66 0a 20 20 20 20    );.#endif.    
2250: 20 20 66 63 6c 6f 73 65 28 6c 6f 67 29 3b 0a 20    fclose(log);. 
2260: 20 20 20 20 20 6e 49 6e 20 3d 20 6e 4f 75 74 20       nIn = nOut 
2270: 3d 20 30 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 20  = 0;.    }.  }. 
2280: 20 69 66 28 20 63 6c 6f 73 65 43 6f 6e 6e 65 63   if( closeConnec
2290: 74 69 6f 6e 20 29 7b 0a 20 20 20 20 65 78 69 74  tion ){.    exit
22a0: 28 61 29 3b 0a 20 20 7d 0a 20 20 73 74 61 74 75  (a);.  }.  statu
22b0: 73 53 65 6e 74 20 3d 20 30 3b 0a 7d 0a 0a 2f 2a  sSent = 0;.}../*
22c0: 0a 2a 2a 20 41 6c 6c 6f 63 61 74 65 20 6d 65 6d  .** Allocate mem
22d0: 6f 72 79 20 73 61 66 65 6c 79 0a 2a 2f 0a 73 74  ory safely.*/.st
22e0: 61 74 69 63 20 63 68 61 72 20 2a 53 61 66 65 4d  atic char *SafeM
22f0: 61 6c 6c 6f 63 28 20 69 6e 74 20 73 69 7a 65 20  alloc( int size 
2300: 29 7b 0a 20 20 63 68 61 72 20 2a 70 3b 0a 0a 20  ){.  char *p;.. 
2310: 20 70 20 3d 20 28 63 68 61 72 2a 29 6d 61 6c 6c   p = (char*)mall
2320: 6f 63 28 73 69 7a 65 29 3b 0a 20 20 69 66 28 20  oc(size);.  if( 
2330: 70 3d 3d 30 20 29 7b 0a 20 20 20 20 73 74 72 63  p==0 ){.    strc
2340: 70 79 28 7a 52 65 70 6c 79 53 74 61 74 75 73 2c  py(zReplyStatus,
2350: 20 22 39 39 38 22 29 3b 0a 20 20 20 20 4d 61 6b   "998");.    Mak
2360: 65 4c 6f 67 45 6e 74 72 79 28 31 29 3b 0a 20 20  eLogEntry(1);.  
2370: 20 20 65 78 69 74 28 31 29 3b 0a 20 20 7d 0a 20    exit(1);.  }. 
2380: 20 72 65 74 75 72 6e 20 70 3b 0a 7d 0a 0a 2f 2a   return p;.}../*
2390: 0a 2a 2a 20 53 65 74 20 74 68 65 20 76 61 6c 75  .** Set the valu
23a0: 65 20 6f 66 20 65 6e 76 69 72 6f 6e 6d 65 6e 74  e of environment
23b0: 20 76 61 72 69 61 62 6c 65 20 7a 56 61 72 20 74   variable zVar t
23c0: 6f 20 7a 56 61 6c 75 65 2e 0a 2a 2f 0a 73 74 61  o zValue..*/.sta
23d0: 74 69 63 20 76 6f 69 64 20 53 65 74 45 6e 76 28  tic void SetEnv(
23e0: 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 56 61 72  const char *zVar
23f0: 2c 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 56  , const char *zV
2400: 61 6c 75 65 29 7b 0a 20 20 63 68 61 72 20 2a 7a  alue){.  char *z
2410: 3b 0a 20 20 69 6e 74 20 6c 65 6e 3b 0a 20 20 69  ;.  int len;.  i
2420: 66 28 20 7a 56 61 6c 75 65 3d 3d 30 20 29 20 7a  f( zValue==0 ) z
2430: 56 61 6c 75 65 3d 22 22 3b 0a 20 20 6c 65 6e 20  Value="";.  len 
2440: 3d 20 73 74 72 6c 65 6e 28 7a 56 61 72 29 20 2b  = strlen(zVar) +
2450: 20 73 74 72 6c 65 6e 28 7a 56 61 6c 75 65 29 20   strlen(zValue) 
2460: 2b 20 32 3b 0a 20 20 7a 20 3d 20 53 61 66 65 4d  + 2;.  z = SafeM
2470: 61 6c 6c 6f 63 28 6c 65 6e 29 3b 0a 20 20 73 70  alloc(len);.  sp
2480: 72 69 6e 74 66 28 7a 2c 22 25 73 3d 25 73 22 2c  rintf(z,"%s=%s",
2490: 7a 56 61 72 2c 7a 56 61 6c 75 65 29 3b 0a 20 20  zVar,zValue);.  
24a0: 70 75 74 65 6e 76 28 7a 29 3b 0a 7d 0a 0a 2f 2a  putenv(z);.}../*
24b0: 0a 2a 2a 20 52 65 6d 6f 76 65 20 74 68 65 20 66  .** Remove the f
24c0: 69 72 73 74 20 73 70 61 63 65 2d 64 65 6c 69 6d  irst space-delim
24d0: 69 74 65 64 20 74 6f 6b 65 6e 20 66 72 6f 6d 20  ited token from 
24e0: 61 20 73 74 72 69 6e 67 20 61 6e 64 20 72 65 74  a string and ret
24f0: 75 72 6e 0a 2a 2a 20 61 20 70 6f 69 6e 74 65 72  urn.** a pointer
2500: 20 74 6f 20 69 74 2e 20 20 41 64 64 20 61 20 4e   to it.  Add a N
2510: 55 4c 4c 20 74 6f 20 74 68 65 20 73 74 72 69 6e  ULL to the strin
2520: 67 20 74 6f 20 74 65 72 6d 69 6e 61 74 65 20 74  g to terminate t
2530: 68 65 20 74 6f 6b 65 6e 2e 0a 2a 2a 20 4d 61 6b  he token..** Mak
2540: 65 20 2a 7a 4c 65 66 74 4f 76 65 72 20 70 6f 69  e *zLeftOver poi
2550: 6e 74 20 74 6f 20 74 68 65 20 73 74 61 72 74 20  nt to the start 
2560: 6f 66 20 74 68 65 20 6e 65 78 74 20 74 6f 6b 65  of the next toke
2570: 6e 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 63 68 61  n..*/.static cha
2580: 72 20 2a 47 65 74 46 69 72 73 74 45 6c 65 6d 65  r *GetFirstEleme
2590: 6e 74 28 63 68 61 72 20 2a 7a 49 6e 70 75 74 2c  nt(char *zInput,
25a0: 20 63 68 61 72 20 2a 2a 7a 4c 65 66 74 4f 76 65   char **zLeftOve
25b0: 72 29 7b 0a 20 20 63 68 61 72 20 2a 7a 52 65 73  r){.  char *zRes
25c0: 75 6c 74 20 3d 20 30 3b 0a 20 20 69 66 28 20 7a  ult = 0;.  if( z
25d0: 49 6e 70 75 74 3d 3d 30 20 29 7b 0a 20 20 20 20  Input==0 ){.    
25e0: 69 66 28 20 7a 4c 65 66 74 4f 76 65 72 20 29 20  if( zLeftOver ) 
25f0: 2a 7a 4c 65 66 74 4f 76 65 72 20 3d 20 30 3b 0a  *zLeftOver = 0;.
2600: 20 20 20 20 72 65 74 75 72 6e 20 30 3b 0a 20 20      return 0;.  
2610: 7d 0a 20 20 77 68 69 6c 65 28 20 69 73 73 70 61  }.  while( isspa
2620: 63 65 28 2a 7a 49 6e 70 75 74 29 20 29 7b 20 7a  ce(*zInput) ){ z
2630: 49 6e 70 75 74 2b 2b 3b 20 7d 0a 20 20 7a 52 65  Input++; }.  zRe
2640: 73 75 6c 74 20 3d 20 7a 49 6e 70 75 74 3b 0a 20  sult = zInput;. 
2650: 20 77 68 69 6c 65 28 20 2a 7a 49 6e 70 75 74 20   while( *zInput 
2660: 26 26 20 21 69 73 73 70 61 63 65 28 2a 7a 49 6e  && !isspace(*zIn
2670: 70 75 74 29 20 29 7b 20 7a 49 6e 70 75 74 2b 2b  put) ){ zInput++
2680: 3b 20 7d 0a 20 20 69 66 28 20 2a 7a 49 6e 70 75  ; }.  if( *zInpu
2690: 74 20 29 7b 0a 20 20 20 20 2a 7a 49 6e 70 75 74  t ){.    *zInput
26a0: 20 3d 20 30 3b 0a 20 20 20 20 7a 49 6e 70 75 74   = 0;.    zInput
26b0: 2b 2b 3b 0a 20 20 20 20 77 68 69 6c 65 28 20 69  ++;.    while( i
26c0: 73 73 70 61 63 65 28 2a 7a 49 6e 70 75 74 29 20  sspace(*zInput) 
26d0: 29 7b 20 7a 49 6e 70 75 74 2b 2b 3b 20 7d 0a 20  ){ zInput++; }. 
26e0: 20 7d 0a 20 20 69 66 28 20 7a 4c 65 66 74 4f 76   }.  if( zLeftOv
26f0: 65 72 20 29 7b 20 2a 7a 4c 65 66 74 4f 76 65 72  er ){ *zLeftOver
2700: 20 3d 20 7a 49 6e 70 75 74 3b 20 7d 0a 20 20 72   = zInput; }.  r
2710: 65 74 75 72 6e 20 7a 52 65 73 75 6c 74 3b 0a 7d  eturn zResult;.}
2720: 0a 0a 2f 2a 0a 2a 2a 20 4d 61 6b 65 20 61 20 63  ../*.** Make a c
2730: 6f 70 79 20 6f 66 20 61 20 73 74 72 69 6e 67 20  opy of a string 
2740: 69 6e 74 6f 20 6d 65 6d 6f 72 79 20 6f 62 74 61  into memory obta
2750: 69 6e 65 64 20 66 72 6f 6d 20 6d 61 6c 6c 6f 63  ined from malloc
2760: 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 63 68 61 72  ..*/.static char
2770: 20 2a 53 74 72 44 75 70 28 63 6f 6e 73 74 20 63   *StrDup(const c
2780: 68 61 72 20 2a 7a 53 72 63 29 7b 0a 20 20 63 68  har *zSrc){.  ch
2790: 61 72 20 2a 7a 44 65 73 74 3b 0a 20 20 69 6e 74  ar *zDest;.  int
27a0: 20 73 69 7a 65 3b 0a 0a 20 20 69 66 28 20 7a 53   size;..  if( zS
27b0: 72 63 3d 3d 30 20 29 20 72 65 74 75 72 6e 20 30  rc==0 ) return 0
27c0: 3b 0a 20 20 73 69 7a 65 20 3d 20 73 74 72 6c 65  ;.  size = strle
27d0: 6e 28 7a 53 72 63 29 20 2b 20 31 3b 0a 20 20 7a  n(zSrc) + 1;.  z
27e0: 44 65 73 74 20 3d 20 28 63 68 61 72 2a 29 53 61  Dest = (char*)Sa
27f0: 66 65 4d 61 6c 6c 6f 63 28 20 73 69 7a 65 20 29  feMalloc( size )
2800: 3b 0a 20 20 73 74 72 63 70 79 28 7a 44 65 73 74  ;.  strcpy(zDest
2810: 2c 7a 53 72 63 29 3b 0a 20 20 72 65 74 75 72 6e  ,zSrc);.  return
2820: 20 7a 44 65 73 74 3b 0a 7d 0a 73 74 61 74 69 63   zDest;.}.static
2830: 20 63 68 61 72 20 2a 53 74 72 41 70 70 65 6e 64   char *StrAppend
2840: 28 63 68 61 72 20 2a 7a 50 72 69 6f 72 2c 20 63  (char *zPrior, c
2850: 6f 6e 73 74 20 63 68 61 72 20 2a 7a 53 65 70 2c  onst char *zSep,
2860: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 53 72   const char *zSr
2870: 63 29 7b 0a 20 20 63 68 61 72 20 2a 7a 44 65 73  c){.  char *zDes
2880: 74 3b 0a 20 20 69 6e 74 20 73 69 7a 65 3b 0a 20  t;.  int size;. 
2890: 20 69 6e 74 20 6e 31 2c 20 6e 32 3b 0a 0a 20 20   int n1, n2;..  
28a0: 69 66 28 20 7a 53 72 63 3d 3d 30 20 29 20 72 65  if( zSrc==0 ) re
28b0: 74 75 72 6e 20 30 3b 0a 20 20 69 66 28 20 7a 50  turn 0;.  if( zP
28c0: 72 69 6f 72 3d 3d 30 20 29 20 72 65 74 75 72 6e  rior==0 ) return
28d0: 20 53 74 72 44 75 70 28 7a 53 72 63 29 3b 0a 20   StrDup(zSrc);. 
28e0: 20 73 69 7a 65 20 3d 20 28 6e 31 3d 73 74 72 6c   size = (n1=strl
28f0: 65 6e 28 7a 53 72 63 29 29 20 2b 20 28 6e 32 3d  en(zSrc)) + (n2=
2900: 73 74 72 6c 65 6e 28 7a 53 65 70 29 29 20 2b 20  strlen(zSep)) + 
2910: 73 74 72 6c 65 6e 28 7a 50 72 69 6f 72 29 20 2b  strlen(zPrior) +
2920: 20 31 3b 0a 20 20 7a 44 65 73 74 20 3d 20 28 63   1;.  zDest = (c
2930: 68 61 72 2a 29 53 61 66 65 4d 61 6c 6c 6f 63 28  har*)SafeMalloc(
2940: 20 73 69 7a 65 20 29 3b 0a 20 20 73 74 72 63 70   size );.  strcp
2950: 79 28 7a 44 65 73 74 2c 7a 50 72 69 6f 72 29 3b  y(zDest,zPrior);
2960: 0a 20 20 66 72 65 65 28 7a 50 72 69 6f 72 29 3b  .  free(zPrior);
2970: 0a 20 20 73 74 72 63 70 79 28 26 7a 44 65 73 74  .  strcpy(&zDest
2980: 5b 6e 31 5d 2c 7a 53 65 70 29 3b 0a 20 20 73 74  [n1],zSep);.  st
2990: 72 63 70 79 28 26 7a 44 65 73 74 5b 6e 31 2b 6e  rcpy(&zDest[n1+n
29a0: 32 5d 2c 7a 53 72 63 29 3b 0a 20 20 72 65 74 75  2],zSrc);.  retu
29b0: 72 6e 20 7a 44 65 73 74 3b 0a 7d 0a 0a 2f 2a 0a  rn zDest;.}../*.
29c0: 2a 2a 20 42 72 65 61 6b 20 61 20 6c 69 6e 65 20  ** Break a line 
29d0: 61 74 20 74 68 65 20 66 69 72 73 74 20 5c 6e 20  at the first \n 
29e0: 6f 72 20 5c 72 20 63 68 61 72 61 63 74 65 72 20  or \r character 
29f0: 73 65 65 6e 2e 0a 2a 2f 0a 73 74 61 74 69 63 20  seen..*/.static 
2a00: 76 6f 69 64 20 52 65 6d 6f 76 65 4e 65 77 6c 69  void RemoveNewli
2a10: 6e 65 28 63 68 61 72 20 2a 7a 29 7b 0a 20 20 69  ne(char *z){.  i
2a20: 66 28 20 7a 3d 3d 30 20 29 20 72 65 74 75 72 6e  f( z==0 ) return
2a30: 3b 0a 20 20 77 68 69 6c 65 28 20 2a 7a 20 26 26  ;.  while( *z &&
2a40: 20 2a 7a 21 3d 27 5c 6e 27 20 26 26 20 2a 7a 21   *z!='\n' && *z!
2a50: 3d 27 5c 72 27 20 29 7b 20 7a 2b 2b 3b 20 7d 0a  ='\r' ){ z++; }.
2a60: 20 20 2a 7a 20 3d 20 30 3b 0a 7d 0a 0a 2f 2a 0a    *z = 0;.}../*.
2a70: 2a 2a 20 50 72 69 6e 74 20 61 20 64 61 74 65 20  ** Print a date 
2a80: 74 61 67 20 69 6e 20 74 68 65 20 68 65 61 64 65  tag in the heade
2a90: 72 2e 20 20 54 68 65 20 6e 61 6d 65 20 6f 66 20  r.  The name of 
2aa0: 74 68 65 20 74 61 67 20 69 73 20 7a 54 61 67 2e  the tag is zTag.
2ab0: 0a 2a 2a 20 54 68 65 20 64 61 74 65 20 69 73 20  .** The date is 
2ac0: 64 65 74 65 72 6d 69 6e 65 64 20 66 72 6f 6d 20  determined from 
2ad0: 74 68 65 20 75 6e 69 78 20 74 69 6d 65 73 74 61  the unix timesta
2ae0: 6d 70 20 67 69 76 65 6e 2e 0a 2a 2f 0a 73 74 61  mp given..*/.sta
2af0: 74 69 63 20 69 6e 74 20 44 61 74 65 54 61 67 28  tic int DateTag(
2b00: 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 54 61 67  const char *zTag
2b10: 2c 20 74 69 6d 65 5f 74 20 74 29 7b 0a 20 20 73  , time_t t){.  s
2b20: 74 72 75 63 74 20 74 6d 20 2a 74 6d 3b 0a 20 20  truct tm *tm;.  
2b30: 63 68 61 72 20 7a 44 61 74 65 5b 31 30 30 5d 3b  char zDate[100];
2b40: 0a 20 20 74 6d 20 3d 20 67 6d 74 69 6d 65 28 26  .  tm = gmtime(&
2b50: 74 29 3b 0a 20 20 73 74 72 66 74 69 6d 65 28 7a  t);.  strftime(z
2b60: 44 61 74 65 2c 20 73 69 7a 65 6f 66 28 7a 44 61  Date, sizeof(zDa
2b70: 74 65 29 2c 20 22 25 61 2c 20 25 64 20 20 25 62  te), "%a, %d  %b
2b80: 20 25 59 20 25 48 3a 25 4d 3a 25 53 20 25 7a 22   %Y %H:%M:%S %z"
2b90: 2c 20 74 6d 29 3b 0a 20 20 72 65 74 75 72 6e 20  , tm);.  return 
2ba0: 70 72 69 6e 74 66 28 22 25 73 3a 20 25 73 5c 72  printf("%s: %s\r
2bb0: 5c 6e 22 2c 20 7a 54 61 67 2c 20 7a 44 61 74 65  \n", zTag, zDate
2bc0: 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 50 72 69 6e  );.}../*.** Prin
2bd0: 74 20 74 68 65 20 66 69 72 73 74 20 6c 69 6e 65  t the first line
2be0: 20 6f 66 20 61 20 72 65 73 70 6f 6e 73 65 20 66   of a response f
2bf0: 6f 6c 6c 6f 77 65 64 20 62 79 20 74 68 65 20 73  ollowed by the s
2c00: 65 72 76 65 72 20 74 79 70 65 2e 0a 2a 2f 0a 73  erver type..*/.s
2c10: 74 61 74 69 63 20 76 6f 69 64 20 53 74 61 72 74  tatic void Start
2c20: 52 65 73 70 6f 6e 73 65 28 63 6f 6e 73 74 20 63  Response(const c
2c30: 68 61 72 20 2a 7a 52 65 73 75 6c 74 43 6f 64 65  har *zResultCode
2c40: 29 7b 0a 20 20 74 69 6d 65 5f 74 20 6e 6f 77 3b  ){.  time_t now;
2c50: 0a 20 20 74 69 6d 65 28 26 6e 6f 77 29 3b 0a 20  .  time(&now);. 
2c60: 20 69 66 28 20 73 74 61 74 75 73 53 65 6e 74 20   if( statusSent 
2c70: 29 20 72 65 74 75 72 6e 3b 0a 20 20 6e 4f 75 74  ) return;.  nOut
2c80: 20 2b 3d 20 70 72 69 6e 74 66 28 22 25 73 20 25   += printf("%s %
2c90: 73 5c 72 5c 6e 22 2c 20 7a 50 72 6f 74 6f 63 6f  s\r\n", zProtoco
2ca0: 6c 2c 20 7a 52 65 73 75 6c 74 43 6f 64 65 29 3b  l, zResultCode);
2cb0: 0a 20 20 73 74 72 6e 63 70 79 28 7a 52 65 70 6c  .  strncpy(zRepl
2cc0: 79 53 74 61 74 75 73 2c 20 7a 52 65 73 75 6c 74  yStatus, zResult
2cd0: 43 6f 64 65 2c 20 33 29 3b 0a 20 20 7a 52 65 70  Code, 3);.  zRep
2ce0: 6c 79 53 74 61 74 75 73 5b 33 5d 20 3d 20 30 3b  lyStatus[3] = 0;
2cf0: 0a 20 20 69 66 28 20 7a 52 65 70 6c 79 53 74 61  .  if( zReplySta
2d00: 74 75 73 5b 30 5d 3e 3d 27 34 27 20 29 7b 0a 20  tus[0]>='4' ){. 
2d10: 20 20 20 63 6c 6f 73 65 43 6f 6e 6e 65 63 74 69     closeConnecti
2d20: 6f 6e 20 3d 20 31 3b 0a 20 20 7d 0a 20 20 69 66  on = 1;.  }.  if
2d30: 28 20 63 6c 6f 73 65 43 6f 6e 6e 65 63 74 69 6f  ( closeConnectio
2d40: 6e 20 29 7b 0a 20 20 20 20 6e 4f 75 74 20 2b 3d  n ){.    nOut +=
2d50: 20 70 72 69 6e 74 66 28 22 43 6f 6e 6e 65 63 74   printf("Connect
2d60: 69 6f 6e 3a 20 63 6c 6f 73 65 5c 72 5c 6e 22 29  ion: close\r\n")
2d70: 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 6e  ;.  }else{.    n
2d80: 4f 75 74 20 2b 3d 20 70 72 69 6e 74 66 28 22 43  Out += printf("C
2d90: 6f 6e 6e 65 63 74 69 6f 6e 3a 20 6b 65 65 70 2d  onnection: keep-
2da0: 61 6c 69 76 65 5c 72 5c 6e 22 29 3b 0a 20 20 7d  alive\r\n");.  }
2db0: 0a 20 20 6e 4f 75 74 20 2b 3d 20 44 61 74 65 54  .  nOut += DateT
2dc0: 61 67 28 22 44 61 74 65 22 2c 20 6e 6f 77 29 3b  ag("Date", now);
2dd0: 0a 20 20 73 74 61 74 75 73 53 65 6e 74 20 3d 20  .  statusSent = 
2de0: 31 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 65 6c 6c  1;.}../*.** Tell
2df0: 20 74 68 65 20 63 6c 69 65 6e 74 20 74 68 61 74   the client that
2e00: 20 74 68 65 72 65 20 69 73 20 6e 6f 20 73 75 63   there is no suc
2e10: 68 20 64 6f 63 75 6d 65 6e 74 0a 2a 2f 0a 73 74  h document.*/.st
2e20: 61 74 69 63 20 76 6f 69 64 20 4e 6f 74 46 6f 75  atic void NotFou
2e30: 6e 64 28 69 6e 74 20 6c 69 6e 65 6e 6f 29 7b 0a  nd(int lineno){.
2e40: 20 20 53 74 61 72 74 52 65 73 70 6f 6e 73 65 28    StartResponse(
2e50: 22 34 30 34 20 4e 6f 74 20 46 6f 75 6e 64 22 29  "404 Not Found")
2e60: 3b 0a 20 20 6e 4f 75 74 20 2b 3d 20 70 72 69 6e  ;.  nOut += prin
2e70: 74 66 28 0a 20 20 20 20 22 43 6f 6e 74 65 6e 74  tf(.    "Content
2e80: 2d 74 79 70 65 3a 20 74 65 78 74 2f 68 74 6d 6c  -type: text/html
2e90: 5c 72 5c 6e 22 0a 20 20 20 20 22 5c 72 5c 6e 22  \r\n".    "\r\n"
2ea0: 0a 20 20 20 20 22 3c 68 65 61 64 3e 3c 74 69 74  .    "<head><tit
2eb0: 6c 65 20 6c 69 6e 65 6e 6f 3d 5c 22 25 64 5c 22  le lineno=\"%d\"
2ec0: 3e 4e 6f 74 20 46 6f 75 6e 64 3c 2f 74 69 74 6c  >Not Found</titl
2ed0: 65 3e 3c 2f 68 65 61 64 3e 5c 6e 22 0a 20 20 20  e></head>\n".   
2ee0: 20 22 3c 62 6f 64 79 3e 3c 68 31 3e 44 6f 63 75   "<body><h1>Docu
2ef0: 6d 65 6e 74 20 4e 6f 74 20 46 6f 75 6e 64 3c 2f  ment Not Found</
2f00: 68 31 3e 5c 6e 22 0a 20 20 20 20 22 54 68 65 20  h1>\n".    "The 
2f10: 64 6f 63 75 6d 65 6e 74 20 25 73 20 69 73 20 6e  document %s is n
2f20: 6f 74 20 61 76 61 69 6c 61 62 6c 65 20 6f 6e 20  ot available on 
2f30: 74 68 69 73 20 73 65 72 76 65 72 5c 6e 22 0a 20  this server\n". 
2f40: 20 20 20 22 3c 2f 62 6f 64 79 3e 5c 6e 22 2c 20     "</body>\n", 
2f50: 6c 69 6e 65 6e 6f 2c 20 7a 53 63 72 69 70 74 29  lineno, zScript)
2f60: 3b 0a 20 20 4d 61 6b 65 4c 6f 67 45 6e 74 72 79  ;.  MakeLogEntry
2f70: 28 30 29 3b 0a 20 20 65 78 69 74 28 30 29 3b 0a  (0);.  exit(0);.
2f80: 7d 0a 0a 2f 2a 0a 2a 2a 20 54 65 6c 6c 20 74 68  }../*.** Tell th
2f90: 65 20 63 6c 69 65 6e 74 20 74 68 61 74 20 74 68  e client that th
2fa0: 65 79 20 61 72 65 20 6e 6f 74 20 77 65 6c 63 6f  ey are not welco
2fb0: 6d 65 64 20 68 65 72 65 2e 0a 2a 2f 0a 73 74 61  med here..*/.sta
2fc0: 74 69 63 20 76 6f 69 64 20 46 6f 72 62 69 64 64  tic void Forbidd
2fd0: 65 6e 28 76 6f 69 64 29 7b 0a 20 20 53 74 61 72  en(void){.  Star
2fe0: 74 52 65 73 70 6f 6e 73 65 28 22 34 30 33 20 46  tResponse("403 F
2ff0: 6f 72 62 69 64 64 65 6e 22 29 3b 0a 20 20 6e 4f  orbidden");.  nO
3000: 75 74 20 2b 3d 20 70 72 69 6e 74 66 28 0a 20 20  ut += printf(.  
3010: 20 20 22 43 6f 6e 74 65 6e 74 2d 74 79 70 65 3a    "Content-type:
3020: 20 74 65 78 74 2f 70 6c 61 69 6e 5c 72 5c 6e 22   text/plain\r\n"
3030: 0a 20 20 20 20 22 5c 72 5c 6e 22 0a 20 20 20 20  .    "\r\n".    
3040: 22 41 63 63 65 73 73 20 64 65 6e 69 65 64 5c 6e  "Access denied\n
3050: 22 0a 20 20 29 3b 0a 20 20 63 6c 6f 73 65 43 6f  ".  );.  closeCo
3060: 6e 6e 65 63 74 69 6f 6e 20 3d 20 31 3b 0a 20 20  nnection = 1;.  
3070: 4d 61 6b 65 4c 6f 67 45 6e 74 72 79 28 30 29 3b  MakeLogEntry(0);
3080: 0a 20 20 65 78 69 74 28 30 29 3b 0a 7d 0a 0a 2f  .  exit(0);.}../
3090: 2a 0a 2a 2a 20 54 65 6c 6c 20 74 68 65 20 63 6c  *.** Tell the cl
30a0: 69 65 6e 74 20 74 68 61 74 20 61 75 74 68 6f 72  ient that author
30b0: 69 7a 61 74 69 6f 6e 20 69 73 20 72 65 71 75 69  ization is requi
30c0: 72 65 64 20 74 6f 20 61 63 63 65 73 73 20 74 68  red to access th
30d0: 65 0a 2a 2a 20 64 6f 63 75 6d 65 6e 74 2e 0a 2a  e.** document..*
30e0: 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 4e 6f  /.static void No
30f0: 74 41 75 74 68 6f 72 69 7a 65 64 28 63 6f 6e 73  tAuthorized(cons
3100: 74 20 63 68 61 72 20 2a 7a 52 65 61 6c 6d 29 7b  t char *zRealm){
3110: 0a 20 20 53 74 61 72 74 52 65 73 70 6f 6e 73 65  .  StartResponse
3120: 28 22 34 30 31 20 41 75 74 68 6f 72 69 7a 61 74  ("401 Authorizat
3130: 69 6f 6e 20 52 65 71 75 69 72 65 64 22 29 3b 0a  ion Required");.
3140: 20 20 6e 4f 75 74 20 2b 3d 20 70 72 69 6e 74 66    nOut += printf
3150: 28 0a 20 20 20 20 22 57 57 57 2d 41 75 74 68 65  (.    "WWW-Authe
3160: 6e 74 69 63 61 74 65 3a 20 42 61 73 69 63 20 72  nticate: Basic r
3170: 65 61 6c 6d 3d 5c 22 25 73 5c 22 5c 72 5c 6e 22  ealm=\"%s\"\r\n"
3180: 0a 20 20 20 20 22 43 6f 6e 74 65 6e 74 2d 74 79  .    "Content-ty
3190: 70 65 3a 20 74 65 78 74 2f 68 74 6d 6c 5c 72 5c  pe: text/html\r\
31a0: 6e 22 0a 20 20 20 20 22 5c 72 5c 6e 22 0a 20 20  n".    "\r\n".  
31b0: 20 20 22 3c 68 65 61 64 3e 3c 74 69 74 6c 65 3e    "<head><title>
31c0: 4e 6f 74 20 41 75 74 68 6f 72 69 7a 65 64 3c 2f  Not Authorized</
31d0: 74 69 74 6c 65 3e 3c 2f 68 65 61 64 3e 5c 6e 22  title></head>\n"
31e0: 0a 20 20 20 20 22 3c 62 6f 64 79 3e 3c 68 31 3e  .    "<body><h1>
31f0: 34 30 31 20 4e 6f 74 20 41 75 74 68 6f 72 69 7a  401 Not Authoriz
3200: 65 64 3c 2f 68 31 3e 5c 6e 22 0a 20 20 20 20 22  ed</h1>\n".    "
3210: 41 20 6c 6f 67 69 6e 20 61 6e 64 20 70 61 73 73  A login and pass
3220: 77 6f 72 64 20 61 72 65 20 72 65 71 75 69 72 65  word are require
3230: 64 20 66 6f 72 20 74 68 69 73 20 64 6f 63 75 6d  d for this docum
3240: 65 6e 74 5c 6e 22 0a 20 20 20 20 22 3c 2f 62 6f  ent\n".    "</bo
3250: 64 79 3e 5c 6e 22 2c 20 7a 52 65 61 6c 6d 29 3b  dy>\n", zRealm);
3260: 0a 20 20 4d 61 6b 65 4c 6f 67 45 6e 74 72 79 28  .  MakeLogEntry(
3270: 30 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 65 6c  0);.}../*.** Tel
3280: 6c 20 74 68 65 20 63 6c 69 65 6e 74 20 74 68 61  l the client tha
3290: 74 20 74 68 65 72 65 20 69 73 20 61 6e 20 65 72  t there is an er
32a0: 72 6f 72 20 69 6e 20 74 68 65 20 73 63 72 69 70  ror in the scrip
32b0: 74 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69  t..*/.static voi
32c0: 64 20 43 67 69 45 72 72 6f 72 28 76 6f 69 64 29  d CgiError(void)
32d0: 7b 0a 20 20 53 74 61 72 74 52 65 73 70 6f 6e 73  {.  StartRespons
32e0: 65 28 22 35 30 30 20 45 72 72 6f 72 22 29 3b 0a  e("500 Error");.
32f0: 20 20 6e 4f 75 74 20 2b 3d 20 70 72 69 6e 74 66    nOut += printf
3300: 28 0a 20 20 20 20 22 43 6f 6e 74 65 6e 74 2d 74  (.    "Content-t
3310: 79 70 65 3a 20 74 65 78 74 2f 68 74 6d 6c 5c 72  ype: text/html\r
3320: 5c 6e 22 0a 20 20 20 20 22 5c 72 5c 6e 22 0a 20  \n".    "\r\n". 
3330: 20 20 20 22 3c 68 65 61 64 3e 3c 74 69 74 6c 65     "<head><title
3340: 3e 43 47 49 20 50 72 6f 67 72 61 6d 20 45 72 72  >CGI Program Err
3350: 6f 72 3c 2f 74 69 74 6c 65 3e 3c 2f 68 65 61 64  or</title></head
3360: 3e 5c 6e 22 0a 20 20 20 20 22 3c 62 6f 64 79 3e  >\n".    "<body>
3370: 3c 68 31 3e 43 47 49 20 50 72 6f 67 72 61 6d 20  <h1>CGI Program 
3380: 45 72 72 6f 72 3c 2f 68 31 3e 5c 6e 22 0a 20 20  Error</h1>\n".  
3390: 20 20 22 54 68 65 20 43 47 49 20 70 72 6f 67 72    "The CGI progr
33a0: 61 6d 20 25 73 20 67 65 6e 65 72 61 74 65 64 20  am %s generated 
33b0: 61 6e 20 65 72 72 6f 72 5c 6e 22 0a 20 20 20 20  an error\n".    
33c0: 22 3c 2f 62 6f 64 79 3e 5c 6e 22 2c 20 7a 53 63  "</body>\n", zSc
33d0: 72 69 70 74 29 3b 0a 20 20 4d 61 6b 65 4c 6f 67  ript);.  MakeLog
33e0: 45 6e 74 72 79 28 30 29 3b 0a 20 20 65 78 69 74  Entry(0);.  exit
33f0: 28 30 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68  (0);.}../*.** Th
3400: 69 73 20 69 73 20 63 61 6c 6c 65 64 20 69 66 20  is is called if 
3410: 77 65 20 74 69 6d 65 6f 75 74 2e 0a 2a 2f 0a 73  we timeout..*/.s
3420: 74 61 74 69 63 20 76 6f 69 64 20 54 69 6d 65 6f  tatic void Timeo
3430: 75 74 28 69 6e 74 20 4e 6f 74 55 73 65 64 29 7b  ut(int NotUsed){
3440: 0a 20 20 28 76 6f 69 64 29 4e 6f 74 55 73 65 64  .  (void)NotUsed
3450: 3b 0a 20 20 69 66 28 20 21 64 65 62 75 67 46 6c  ;.  if( !debugFl
3460: 61 67 20 29 7b 0a 20 20 20 20 69 66 28 20 7a 53  ag ){.    if( zS
3470: 63 72 69 70 74 20 26 26 20 7a 53 63 72 69 70 74  cript && zScript
3480: 5b 30 5d 20 29 7b 0a 20 20 20 20 20 20 73 74 72  [0] ){.      str
3490: 63 70 79 28 7a 52 65 70 6c 79 53 74 61 74 75 73  cpy(zReplyStatus
34a0: 2c 20 22 39 39 39 22 29 3b 0a 20 20 20 20 20 20  , "999");.      
34b0: 4d 61 6b 65 4c 6f 67 45 6e 74 72 79 28 30 29 3b  MakeLogEntry(0);
34c0: 0a 20 20 20 20 7d 0a 20 20 20 20 65 78 69 74 28  .    }.    exit(
34d0: 30 29 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a  0);.  }.}../*.**
34e0: 20 54 65 6c 6c 20 74 68 65 20 63 6c 69 65 6e 74   Tell the client
34f0: 20 74 68 61 74 20 74 68 65 72 65 20 69 73 20 61   that there is a
3500: 6e 20 65 72 72 6f 72 20 69 6e 20 74 68 65 20 73  n error in the s
3510: 63 72 69 70 74 2e 0a 2a 2f 0a 73 74 61 74 69 63  cript..*/.static
3520: 20 76 6f 69 64 20 43 67 69 53 63 72 69 70 74 57   void CgiScriptW
3530: 72 69 74 61 62 6c 65 28 76 6f 69 64 29 7b 0a 20  ritable(void){. 
3540: 20 53 74 61 72 74 52 65 73 70 6f 6e 73 65 28 22   StartResponse("
3550: 35 30 30 20 43 47 49 20 43 6f 6e 66 69 67 75 72  500 CGI Configur
3560: 61 74 69 6f 6e 20 45 72 72 6f 72 22 29 3b 0a 20  ation Error");. 
3570: 20 6e 4f 75 74 20 2b 3d 20 70 72 69 6e 74 66 28   nOut += printf(
3580: 0a 20 20 20 20 22 43 6f 6e 74 65 6e 74 2d 74 79  .    "Content-ty
3590: 70 65 3a 20 74 65 78 74 2f 70 6c 61 69 6e 5c 72  pe: text/plain\r
35a0: 5c 6e 22 0a 20 20 20 20 22 5c 72 5c 6e 22 0a 20  \n".    "\r\n". 
35b0: 20 20 20 22 54 68 65 20 43 47 49 20 70 72 6f 67     "The CGI prog
35c0: 72 61 6d 20 25 73 20 69 73 20 77 72 69 74 61 62  ram %s is writab
35d0: 6c 65 20 62 79 20 75 73 65 72 73 20 6f 74 68 65  le by users othe
35e0: 72 20 74 68 61 6e 20 69 74 73 20 6f 77 6e 65 72  r than its owner
35f0: 2e 5c 6e 22 2c 0a 20 20 20 20 7a 52 65 61 6c 53  .\n",.    zRealS
3600: 63 72 69 70 74 29 3b 0a 20 20 4d 61 6b 65 4c 6f  cript);.  MakeLo
3610: 67 45 6e 74 72 79 28 30 29 3b 0a 20 20 65 78 69  gEntry(0);.  exi
3620: 74 28 30 29 3b 20 20 20 20 20 20 20 0a 7d 0a 0a  t(0);       .}..
3630: 2f 2a 0a 2a 2a 20 54 65 6c 6c 20 74 68 65 20 63  /*.** Tell the c
3640: 6c 69 65 6e 74 20 74 68 61 74 20 74 68 65 20 73  lient that the s
3650: 65 72 76 65 72 20 6d 61 6c 66 75 6e 63 74 69 6f  erver malfunctio
3660: 6e 65 64 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76  ned..*/.static v
3670: 6f 69 64 20 4d 61 6c 66 75 6e 63 74 69 6f 6e 28  oid Malfunction(
3680: 69 6e 74 20 6c 69 6e 65 6e 75 6d 2c 20 63 6f 6e  int linenum, con
3690: 73 74 20 63 68 61 72 20 2a 7a 46 6f 72 6d 61 74  st char *zFormat
36a0: 2c 20 2e 2e 2e 29 7b 0a 20 20 76 61 5f 6c 69 73  , ...){.  va_lis
36b0: 74 20 61 70 3b 0a 20 20 76 61 5f 73 74 61 72 74  t ap;.  va_start
36c0: 28 61 70 2c 20 7a 46 6f 72 6d 61 74 29 3b 0a 20  (ap, zFormat);. 
36d0: 20 53 74 61 72 74 52 65 73 70 6f 6e 73 65 28 22   StartResponse("
36e0: 35 30 30 20 53 65 72 76 65 72 20 4d 61 6c 66 75  500 Server Malfu
36f0: 6e 63 74 69 6f 6e 22 29 3b 0a 20 20 6e 4f 75 74  nction");.  nOut
3700: 20 2b 3d 20 70 72 69 6e 74 66 28 0a 20 20 20 20   += printf(.    
3710: 22 43 6f 6e 74 65 6e 74 2d 74 79 70 65 3a 20 74  "Content-type: t
3720: 65 78 74 2f 70 6c 61 69 6e 5c 72 5c 6e 22 0a 20  ext/plain\r\n". 
3730: 20 20 20 22 5c 72 5c 6e 22 0a 20 20 20 20 22 57     "\r\n".    "W
3740: 65 62 20 73 65 72 76 65 72 20 6d 61 6c 66 75 6e  eb server malfun
3750: 63 74 69 6f 6e 65 64 3b 20 65 72 72 6f 72 20 6e  ctioned; error n
3760: 75 6d 62 65 72 20 25 64 5c 6e 5c 6e 22 2c 20 6c  umber %d\n\n", l
3770: 69 6e 65 6e 75 6d 29 3b 0a 20 20 69 66 28 20 7a  inenum);.  if( z
3780: 46 6f 72 6d 61 74 20 29 7b 0a 20 20 20 20 6e 4f  Format ){.    nO
3790: 75 74 20 2b 3d 20 76 70 72 69 6e 74 66 28 7a 46  ut += vprintf(zF
37a0: 6f 72 6d 61 74 2c 20 61 70 29 3b 0a 20 20 7d 0a  ormat, ap);.  }.
37b0: 20 20 4d 61 6b 65 4c 6f 67 45 6e 74 72 79 28 30    MakeLogEntry(0
37c0: 29 3b 0a 20 20 65 78 69 74 28 30 29 3b 20 20 20  );.  exit(0);   
37d0: 20 20 20 20 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 44 6f      .}../*.** Do
37e0: 20 61 20 73 65 72 76 65 72 20 72 65 64 69 72 65   a server redire
37f0: 63 74 20 74 6f 20 74 68 65 20 64 6f 63 75 6d 65  ct to the docume
3800: 6e 74 20 73 70 65 63 69 66 69 65 64 2e 20 20 54  nt specified.  T
3810: 68 65 20 64 6f 63 75 6d 65 6e 74 0a 2a 2a 20 6e  he document.** n
3820: 61 6d 65 20 6e 6f 74 20 63 6f 6e 74 61 69 6e 20  ame not contain 
3830: 73 63 68 65 6d 65 20 6f 72 20 6e 65 74 77 6f 72  scheme or networ
3840: 6b 20 6c 6f 63 61 74 69 6f 6e 20 6f 72 20 74 68  k location or th
3850: 65 20 71 75 65 72 79 20 73 74 72 69 6e 67 2e 0a  e query string..
3860: 2a 2a 20 49 74 20 77 69 6c 6c 20 62 65 20 6a 75  ** It will be ju
3870: 73 74 20 74 68 65 20 70 61 74 68 2e 0a 2a 2f 0a  st the path..*/.
3880: 73 74 61 74 69 63 20 76 6f 69 64 20 52 65 64 69  static void Redi
3890: 72 65 63 74 28 63 6f 6e 73 74 20 63 68 61 72 20  rect(const char 
38a0: 2a 7a 50 61 74 68 2c 20 69 6e 74 20 66 69 6e 69  *zPath, int fini
38b0: 73 68 29 7b 0a 20 20 53 74 61 72 74 52 65 73 70  sh){.  StartResp
38c0: 6f 6e 73 65 28 22 33 30 32 20 54 65 6d 70 6f 72  onse("302 Tempor
38d0: 61 72 79 20 52 65 64 69 72 65 63 74 22 29 3b 0a  ary Redirect");.
38e0: 20 20 69 66 28 20 7a 53 65 72 76 65 72 50 6f 72    if( zServerPor
38f0: 74 3d 3d 30 20 7c 7c 20 7a 53 65 72 76 65 72 50  t==0 || zServerP
3900: 6f 72 74 5b 30 5d 3d 3d 30 20 7c 7c 20 73 74 72  ort[0]==0 || str
3910: 63 6d 70 28 7a 53 65 72 76 65 72 50 6f 72 74 2c  cmp(zServerPort,
3920: 22 38 30 22 29 3d 3d 30 20 29 7b 0a 20 20 20 20  "80")==0 ){.    
3930: 6e 4f 75 74 20 2b 3d 20 70 72 69 6e 74 66 28 22  nOut += printf("
3940: 4c 6f 63 61 74 69 6f 6e 3a 20 25 73 3a 2f 2f 25  Location: %s://%
3950: 73 25 73 25 73 5c 72 5c 6e 22 2c 0a 20 20 20 20  s%s%s\r\n",.    
3960: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7a                 z
3970: 48 74 74 70 2c 20 7a 53 65 72 76 65 72 4e 61 6d  Http, zServerNam
3980: 65 2c 20 7a 50 61 74 68 2c 20 7a 51 75 65 72 79  e, zPath, zQuery
3990: 53 75 66 66 69 78 29 3b 0a 20 20 7d 65 6c 73 65  Suffix);.  }else
39a0: 7b 0a 20 20 20 20 6e 4f 75 74 20 2b 3d 20 70 72  {.    nOut += pr
39b0: 69 6e 74 66 28 22 4c 6f 63 61 74 69 6f 6e 3a 20  intf("Location: 
39c0: 25 73 3a 2f 2f 25 73 3a 25 73 25 73 25 73 5c 72  %s://%s:%s%s%s\r
39d0: 5c 6e 22 2c 0a 20 20 20 20 20 20 20 20 20 20 20  \n",.           
39e0: 20 20 20 20 20 20 20 20 7a 48 74 74 70 2c 20 7a          zHttp, z
39f0: 53 65 72 76 65 72 4e 61 6d 65 2c 20 7a 53 65 72  ServerName, zSer
3a00: 76 65 72 50 6f 72 74 2c 20 7a 50 61 74 68 2c 20  verPort, zPath, 
3a10: 7a 51 75 65 72 79 53 75 66 66 69 78 29 3b 0a 20  zQuerySuffix);. 
3a20: 20 7d 0a 20 20 69 66 28 20 66 69 6e 69 73 68 20   }.  if( finish 
3a30: 29 7b 0a 20 20 20 20 70 72 69 6e 74 66 28 22 43  ){.    printf("C
3a40: 6f 6e 74 65 6e 74 2d 6c 65 6e 67 74 68 3a 20 30  ontent-length: 0
3a50: 5c 72 5c 6e 22 29 3b 0a 20 20 20 20 6e 4f 75 74  \r\n");.    nOut
3a60: 20 2b 3d 20 70 72 69 6e 74 66 28 22 5c 72 5c 6e   += printf("\r\n
3a70: 22 29 3b 0a 20 20 20 20 4d 61 6b 65 4c 6f 67 45  ");.    MakeLogE
3a80: 6e 74 72 79 28 30 29 3b 0a 20 20 7d 0a 20 20 66  ntry(0);.  }.  f
3a90: 66 6c 75 73 68 28 73 74 64 6f 75 74 29 3b 0a 7d  flush(stdout);.}
3aa0: 0a 0a 2f 2a 0a 2a 2a 20 54 68 69 73 20 66 75 6e  ../*.** This fun
3ab0: 63 74 69 6f 6e 20 74 72 65 61 74 73 20 69 74 73  ction treats its
3ac0: 20 69 6e 70 75 74 20 61 73 20 61 20 62 61 73 65   input as a base
3ad0: 2d 36 34 20 73 74 72 69 6e 67 20 61 6e 64 20 72  -64 string and r
3ae0: 65 74 75 72 6e 73 20 74 68 65 0a 2a 2a 20 64 65  eturns the.** de
3af0: 63 6f 64 65 64 20 76 61 6c 75 65 20 6f 66 20 74  coded value of t
3b00: 68 61 74 20 73 74 72 69 6e 67 2e 20 20 43 68 61  hat string.  Cha
3b10: 72 61 63 74 65 72 73 20 6f 66 20 69 6e 70 75 74  racters of input
3b20: 20 74 68 61 74 20 61 72 65 20 6e 6f 74 0a 2a 2a   that are not.**
3b30: 20 76 61 6c 69 64 20 62 61 73 65 2d 36 34 20 63   valid base-64 c
3b40: 68 61 72 61 63 74 65 72 73 20 28 73 75 63 68 20  haracters (such 
3b50: 61 73 20 73 70 61 63 65 73 20 61 6e 64 20 6e 65  as spaces and ne
3b60: 77 6c 69 6e 65 73 29 20 61 72 65 20 69 67 6e 6f  wlines) are igno
3b70: 72 65 64 2e 0a 2a 2f 0a 76 6f 69 64 20 44 65 63  red..*/.void Dec
3b80: 6f 64 65 36 34 28 63 68 61 72 20 2a 7a 36 34 29  ode64(char *z64)
3b90: 7b 0a 20 20 63 68 61 72 20 2a 7a 44 61 74 61 3b  {.  char *zData;
3ba0: 0a 20 20 69 6e 74 20 6e 36 34 3b 0a 20 20 69 6e  .  int n64;.  in
3bb0: 74 20 69 2c 20 6a 3b 0a 20 20 69 6e 74 20 61 2c  t i, j;.  int a,
3bc0: 20 62 2c 20 63 2c 20 64 3b 0a 20 20 73 74 61 74   b, c, d;.  stat
3bd0: 69 63 20 69 6e 74 20 69 73 49 6e 69 74 20 3d 20  ic int isInit = 
3be0: 30 3b 0a 20 20 73 74 61 74 69 63 20 69 6e 74 20  0;.  static int 
3bf0: 74 72 61 6e 73 5b 31 32 38 5d 3b 0a 20 20 73 74  trans[128];.  st
3c00: 61 74 69 63 20 75 6e 73 69 67 6e 65 64 20 63 68  atic unsigned ch
3c10: 61 72 20 7a 42 61 73 65 5b 5d 20 3d 20 0a 20 20  ar zBase[] = .  
3c20: 20 20 22 41 42 43 44 45 46 47 48 49 4a 4b 4c 4d    "ABCDEFGHIJKLM
3c30: 4e 4f 50 51 52 53 54 55 56 57 58 59 5a 61 62 63  NOPQRSTUVWXYZabc
3c40: 64 65 66 67 68 69 6a 6b 6c 6d 6e 6f 70 71 72 73  defghijklmnopqrs
3c50: 74 75 76 77 78 79 7a 30 31 32 33 34 35 36 37 38  tuvwxyz012345678
3c60: 39 2b 2f 22 3b 0a 0a 20 20 69 66 28 20 21 69 73  9+/";..  if( !is
3c70: 49 6e 69 74 20 29 7b 0a 20 20 20 20 66 6f 72 28  Init ){.    for(
3c80: 69 3d 30 3b 20 69 3c 31 32 38 3b 20 69 2b 2b 29  i=0; i<128; i++)
3c90: 7b 20 74 72 61 6e 73 5b 69 5d 20 3d 20 30 3b 20  { trans[i] = 0; 
3ca0: 7d 0a 20 20 20 20 66 6f 72 28 69 3d 30 3b 20 7a  }.    for(i=0; z
3cb0: 42 61 73 65 5b 69 5d 3b 20 69 2b 2b 29 7b 20 74  Base[i]; i++){ t
3cc0: 72 61 6e 73 5b 7a 42 61 73 65 5b 69 5d 20 26 20  rans[zBase[i] & 
3cd0: 30 78 37 66 5d 20 3d 20 69 3b 20 7d 0a 20 20 20  0x7f] = i; }.   
3ce0: 20 69 73 49 6e 69 74 20 3d 20 31 3b 0a 20 20 7d   isInit = 1;.  }
3cf0: 0a 20 20 6e 36 34 20 3d 20 73 74 72 6c 65 6e 28  .  n64 = strlen(
3d00: 7a 36 34 29 3b 0a 20 20 77 68 69 6c 65 28 20 6e  z64);.  while( n
3d10: 36 34 3e 30 20 26 26 20 7a 36 34 5b 6e 36 34 2d  64>0 && z64[n64-
3d20: 31 5d 3d 3d 27 3d 27 20 29 20 6e 36 34 2d 2d 3b  1]=='=' ) n64--;
3d30: 0a 20 20 7a 44 61 74 61 20 3d 20 7a 36 34 3b 0a  .  zData = z64;.
3d40: 20 20 66 6f 72 28 69 3d 6a 3d 30 3b 20 69 2b 33    for(i=j=0; i+3
3d50: 3c 6e 36 34 3b 20 69 2b 3d 34 29 7b 0a 20 20 20  <n64; i+=4){.   
3d60: 20 61 20 3d 20 74 72 61 6e 73 5b 7a 36 34 5b 69   a = trans[z64[i
3d70: 5d 20 26 20 30 78 37 66 5d 3b 0a 20 20 20 20 62  ] & 0x7f];.    b
3d80: 20 3d 20 74 72 61 6e 73 5b 7a 36 34 5b 69 2b 31   = trans[z64[i+1
3d90: 5d 20 26 20 30 78 37 66 5d 3b 0a 20 20 20 20 63  ] & 0x7f];.    c
3da0: 20 3d 20 74 72 61 6e 73 5b 7a 36 34 5b 69 2b 32   = trans[z64[i+2
3db0: 5d 20 26 20 30 78 37 66 5d 3b 0a 20 20 20 20 64  ] & 0x7f];.    d
3dc0: 20 3d 20 74 72 61 6e 73 5b 7a 36 34 5b 69 2b 33   = trans[z64[i+3
3dd0: 5d 20 26 20 30 78 37 66 5d 3b 0a 20 20 20 20 7a  ] & 0x7f];.    z
3de0: 44 61 74 61 5b 6a 2b 2b 5d 20 3d 20 28 28 61 3c  Data[j++] = ((a<
3df0: 3c 32 29 20 26 20 30 78 66 63 29 20 7c 20 28 28  <2) & 0xfc) | ((
3e00: 62 3e 3e 34 29 20 26 20 30 78 30 33 29 3b 0a 20  b>>4) & 0x03);. 
3e10: 20 20 20 7a 44 61 74 61 5b 6a 2b 2b 5d 20 3d 20     zData[j++] = 
3e20: 28 28 62 3c 3c 34 29 20 26 20 30 78 66 30 29 20  ((b<<4) & 0xf0) 
3e30: 7c 20 28 28 63 3e 3e 32 29 20 26 20 30 78 30 66  | ((c>>2) & 0x0f
3e40: 29 3b 0a 20 20 20 20 7a 44 61 74 61 5b 6a 2b 2b  );.    zData[j++
3e50: 5d 20 3d 20 28 28 63 3c 3c 36 29 20 26 20 30 78  ] = ((c<<6) & 0x
3e60: 63 30 29 20 7c 20 28 64 20 26 20 30 78 33 66 29  c0) | (d & 0x3f)
3e70: 3b 0a 20 20 7d 0a 20 20 69 66 28 20 69 2b 32 3c  ;.  }.  if( i+2<
3e80: 6e 36 34 20 29 7b 0a 20 20 20 20 61 20 3d 20 74  n64 ){.    a = t
3e90: 72 61 6e 73 5b 7a 36 34 5b 69 5d 20 26 20 30 78  rans[z64[i] & 0x
3ea0: 37 66 5d 3b 0a 20 20 20 20 62 20 3d 20 74 72 61  7f];.    b = tra
3eb0: 6e 73 5b 7a 36 34 5b 69 2b 31 5d 20 26 20 30 78  ns[z64[i+1] & 0x
3ec0: 37 66 5d 3b 0a 20 20 20 20 63 20 3d 20 74 72 61  7f];.    c = tra
3ed0: 6e 73 5b 7a 36 34 5b 69 2b 32 5d 20 26 20 30 78  ns[z64[i+2] & 0x
3ee0: 37 66 5d 3b 0a 20 20 20 20 7a 44 61 74 61 5b 6a  7f];.    zData[j
3ef0: 2b 2b 5d 20 3d 20 28 28 61 3c 3c 32 29 20 26 20  ++] = ((a<<2) & 
3f00: 30 78 66 63 29 20 7c 20 28 28 62 3e 3e 34 29 20  0xfc) | ((b>>4) 
3f10: 26 20 30 78 30 33 29 3b 0a 20 20 20 20 7a 44 61  & 0x03);.    zDa
3f20: 74 61 5b 6a 2b 2b 5d 20 3d 20 28 28 62 3c 3c 34  ta[j++] = ((b<<4
3f30: 29 20 26 20 30 78 66 30 29 20 7c 20 28 28 63 3e  ) & 0xf0) | ((c>
3f40: 3e 32 29 20 26 20 30 78 30 66 29 3b 0a 20 20 7d  >2) & 0x0f);.  }
3f50: 65 6c 73 65 20 69 66 28 20 69 2b 31 3c 6e 36 34  else if( i+1<n64
3f60: 20 29 7b 0a 20 20 20 20 61 20 3d 20 74 72 61 6e   ){.    a = tran
3f70: 73 5b 7a 36 34 5b 69 5d 20 26 20 30 78 37 66 5d  s[z64[i] & 0x7f]
3f80: 3b 0a 20 20 20 20 62 20 3d 20 74 72 61 6e 73 5b  ;.    b = trans[
3f90: 7a 36 34 5b 69 2b 31 5d 20 26 20 30 78 37 66 5d  z64[i+1] & 0x7f]
3fa0: 3b 0a 20 20 20 20 7a 44 61 74 61 5b 6a 2b 2b 5d  ;.    zData[j++]
3fb0: 20 3d 20 28 28 61 3c 3c 32 29 20 26 20 30 78 66   = ((a<<2) & 0xf
3fc0: 63 29 20 7c 20 28 28 62 3e 3e 34 29 20 26 20 30  c) | ((b>>4) & 0
3fd0: 78 30 33 29 3b 0a 20 20 7d 0a 20 20 7a 44 61 74  x03);.  }.  zDat
3fe0: 61 5b 6a 5d 20 3d 20 30 3b 0a 7d 0a 0a 2f 2a 0a  a[j] = 0;.}../*.
3ff0: 2a 2a 20 43 68 65 63 6b 20 74 6f 20 73 65 65 20  ** Check to see 
4000: 69 66 20 62 61 73 69 63 20 61 75 74 68 6f 72 69  if basic authori
4010: 7a 61 74 69 6f 6e 20 63 72 65 64 65 6e 74 69 61  zation credentia
4020: 6c 73 20 61 72 65 20 70 72 6f 76 69 64 65 64 20  ls are provided 
4030: 66 6f 72 0a 2a 2a 20 74 68 65 20 75 73 65 72 20  for.** the user 
4040: 61 63 63 6f 72 64 69 6e 67 20 74 6f 20 74 68 65  according to the
4050: 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 20 69 6e 20   information in 
4060: 7a 41 75 74 68 46 69 6c 65 2e 20 20 52 65 74 75  zAuthFile.  Retu
4070: 72 6e 20 74 72 75 65 0a 2a 2a 20 69 66 20 61 75  rn true.** if au
4080: 74 68 6f 72 69 7a 65 64 2e 20 20 52 65 74 75 72  thorized.  Retur
4090: 6e 20 66 61 6c 73 65 20 69 66 20 6e 6f 74 20 61  n false if not a
40a0: 75 74 68 6f 72 69 7a 65 64 2e 0a 2a 2a 0a 2a 2a  uthorized..**.**
40b0: 20 46 69 6c 65 20 66 6f 72 6d 61 74 3a 0a 2a 2a   File format:.**
40c0: 0a 2a 2a 20 20 20 20 2a 20 20 42 6c 61 6e 6b 20  .**    *  Blank 
40d0: 6c 69 6e 65 73 20 61 6e 64 20 6c 69 6e 65 73 20  lines and lines 
40e0: 74 68 61 74 20 62 65 67 69 6e 20 77 69 74 68 20  that begin with 
40f0: 27 23 27 20 61 72 65 20 69 67 6e 6f 72 65 64 0a  '#' are ignored.
4100: 2a 2a 20 20 20 20 2a 20 20 22 68 74 74 70 2d 72  **    *  "http-r
4110: 65 64 69 72 65 63 74 22 20 66 6f 72 63 65 73 20  edirect" forces 
4120: 61 20 72 65 64 69 72 65 63 74 20 74 6f 20 48 54  a redirect to HT
4130: 54 50 53 20 69 66 20 6e 6f 74 20 74 68 65 72 65  TPS if not there
4140: 20 61 6c 72 65 61 64 79 0a 2a 2a 20 20 20 20 2a   already.**    *
4150: 20 20 22 68 74 74 70 73 2d 6f 6e 6c 79 22 20 64    "https-only" d
4160: 69 73 61 6c 6c 6f 77 73 20 6f 70 65 72 61 74 69  isallows operati
4170: 6f 6e 20 69 6e 20 48 54 54 50 0a 2a 2a 20 20 20  on in HTTP.**   
4180: 20 2a 20 20 22 75 73 65 72 20 4e 41 4d 45 20 4c   *  "user NAME L
4190: 4f 47 49 4e 3a 50 41 53 53 57 4f 52 44 22 20 63  OGIN:PASSWORD" c
41a0: 68 65 63 6b 73 20 74 6f 20 73 65 65 20 69 66 20  hecks to see if 
41b0: 4c 4f 47 49 4e 3a 50 41 53 53 57 4f 52 44 20 0a  LOGIN:PASSWORD .
41c0: 2a 2a 20 20 20 20 20 20 20 61 75 74 68 6f 72 69  **       authori
41d0: 7a 61 74 69 6f 6e 20 63 72 65 64 65 6e 74 69 61  zation credentia
41e0: 6c 73 20 61 72 65 20 70 72 6f 76 69 64 65 64 2c  ls are provided,
41f0: 20 61 6e 64 20 69 66 20 73 6f 20 73 65 74 73 20   and if so sets 
4200: 74 68 65 0a 2a 2a 20 20 20 20 20 20 20 52 45 4d  the.**       REM
4210: 4f 54 45 5f 55 53 45 52 20 74 6f 20 4e 41 4d 45  OTE_USER to NAME
4220: 2e 0a 2a 2a 20 20 20 20 2a 20 20 22 72 65 61 6c  ..**    *  "real
4230: 6d 20 54 45 58 54 22 20 73 65 74 73 20 74 68 65  m TEXT" sets the
4240: 20 72 65 61 6c 6d 20 74 6f 20 54 45 58 54 2e 0a   realm to TEXT..
4250: 2a 2f 0a 73 74 61 74 69 63 20 69 6e 74 20 43 68  */.static int Ch
4260: 65 63 6b 42 61 73 69 63 41 75 74 68 6f 72 69 7a  eckBasicAuthoriz
4270: 61 74 69 6f 6e 28 63 6f 6e 73 74 20 63 68 61 72  ation(const char
4280: 20 2a 7a 41 75 74 68 46 69 6c 65 29 7b 0a 20 20   *zAuthFile){.  
4290: 46 49 4c 45 20 2a 69 6e 3b 0a 20 20 63 68 61 72  FILE *in;.  char
42a0: 20 2a 7a 52 65 61 6c 6d 20 3d 20 22 75 6e 6b 6e   *zRealm = "unkn
42b0: 6f 77 6e 20 72 65 61 6c 6d 22 3b 0a 20 20 63 68  own realm";.  ch
42c0: 61 72 20 2a 7a 4c 6f 67 69 6e 50 73 77 64 3b 0a  ar *zLoginPswd;.
42d0: 20 20 63 68 61 72 20 2a 7a 4e 61 6d 65 3b 0a 20    char *zName;. 
42e0: 20 63 68 61 72 20 7a 4c 69 6e 65 5b 32 30 30 30   char zLine[2000
42f0: 5d 3b 0a 0a 20 20 69 6e 20 3d 20 66 6f 70 65 6e  ];..  in = fopen
4300: 28 7a 41 75 74 68 46 69 6c 65 2c 20 22 72 22 29  (zAuthFile, "r")
4310: 3b 0a 20 20 69 66 28 20 69 6e 3d 3d 30 20 29 7b  ;.  if( in==0 ){
4320: 0a 20 20 20 20 4e 6f 74 46 6f 75 6e 64 28 5f 5f  .    NotFound(__
4330: 4c 49 4e 45 5f 5f 29 3b 0a 20 20 20 20 72 65 74  LINE__);.    ret
4340: 75 72 6e 20 30 3b 0a 20 20 7d 0a 20 20 69 66 28  urn 0;.  }.  if(
4350: 20 7a 41 75 74 68 41 72 67 20 29 20 44 65 63 6f   zAuthArg ) Deco
4360: 64 65 36 34 28 7a 41 75 74 68 41 72 67 29 3b 0a  de64(zAuthArg);.
4370: 20 20 77 68 69 6c 65 28 20 66 67 65 74 73 28 7a    while( fgets(z
4380: 4c 69 6e 65 2c 20 73 69 7a 65 6f 66 28 7a 4c 69  Line, sizeof(zLi
4390: 6e 65 29 2c 20 69 6e 29 20 29 7b 0a 20 20 20 20  ne), in) ){.    
43a0: 63 68 61 72 20 2a 7a 46 69 65 6c 64 4e 61 6d 65  char *zFieldName
43b0: 3b 0a 20 20 20 20 63 68 61 72 20 2a 7a 56 61 6c  ;.    char *zVal
43c0: 3b 0a 0a 20 20 20 20 7a 46 69 65 6c 64 4e 61 6d  ;..    zFieldNam
43d0: 65 20 3d 20 47 65 74 46 69 72 73 74 45 6c 65 6d  e = GetFirstElem
43e0: 65 6e 74 28 7a 4c 69 6e 65 2c 26 7a 56 61 6c 29  ent(zLine,&zVal)
43f0: 3b 0a 20 20 20 20 69 66 28 20 7a 46 69 65 6c 64  ;.    if( zField
4400: 4e 61 6d 65 3d 3d 30 20 7c 7c 20 2a 7a 46 69 65  Name==0 || *zFie
4410: 6c 64 4e 61 6d 65 3d 3d 30 20 29 20 63 6f 6e 74  ldName==0 ) cont
4420: 69 6e 75 65 3b 0a 20 20 20 20 69 66 28 20 7a 46  inue;.    if( zF
4430: 69 65 6c 64 4e 61 6d 65 5b 30 5d 3d 3d 27 23 27  ieldName[0]=='#'
4440: 20 29 20 63 6f 6e 74 69 6e 75 65 3b 0a 20 20 20   ) continue;.   
4450: 20 52 65 6d 6f 76 65 4e 65 77 6c 69 6e 65 28 7a   RemoveNewline(z
4460: 56 61 6c 29 3b 0a 20 20 20 20 69 66 28 20 73 74  Val);.    if( st
4470: 72 63 6d 70 28 7a 46 69 65 6c 64 4e 61 6d 65 2c  rcmp(zFieldName,
4480: 20 22 72 65 61 6c 6d 22 29 3d 3d 30 20 29 7b 0a   "realm")==0 ){.
4490: 20 20 20 20 20 20 7a 52 65 61 6c 6d 20 3d 20 53        zRealm = S
44a0: 74 72 44 75 70 28 7a 56 61 6c 29 3b 0a 20 20 20  trDup(zVal);.   
44b0: 20 7d 65 6c 73 65 20 69 66 28 20 73 74 72 63 6d   }else if( strcm
44c0: 70 28 7a 46 69 65 6c 64 4e 61 6d 65 2c 22 75 73  p(zFieldName,"us
44d0: 65 72 22 29 3d 3d 30 20 29 7b 0a 20 20 20 20 20  er")==0 ){.     
44e0: 20 69 66 28 20 7a 41 75 74 68 41 72 67 3d 3d 30   if( zAuthArg==0
44f0: 20 29 20 63 6f 6e 74 69 6e 75 65 3b 0a 20 20 20   ) continue;.   
4500: 20 20 20 7a 4e 61 6d 65 20 3d 20 47 65 74 46 69     zName = GetFi
4510: 72 73 74 45 6c 65 6d 65 6e 74 28 7a 56 61 6c 2c  rstElement(zVal,
4520: 20 26 7a 56 61 6c 29 3b 0a 20 20 20 20 20 20 7a   &zVal);.      z
4530: 4c 6f 67 69 6e 50 73 77 64 20 3d 20 47 65 74 46  LoginPswd = GetF
4540: 69 72 73 74 45 6c 65 6d 65 6e 74 28 7a 56 61 6c  irstElement(zVal
4550: 2c 20 26 7a 56 61 6c 29 3b 0a 20 20 20 20 20 20  , &zVal);.      
4560: 69 66 28 20 7a 4c 6f 67 69 6e 50 73 77 64 3d 3d  if( zLoginPswd==
4570: 30 20 29 20 63 6f 6e 74 69 6e 75 65 3b 0a 20 20  0 ) continue;.  
4580: 20 20 20 20 69 66 28 20 7a 41 75 74 68 41 72 67      if( zAuthArg
4590: 20 26 26 20 73 74 72 63 6d 70 28 7a 41 75 74 68   && strcmp(zAuth
45a0: 41 72 67 2c 7a 4c 6f 67 69 6e 50 73 77 64 29 3d  Arg,zLoginPswd)=
45b0: 3d 30 20 29 7b 0a 20 20 20 20 20 20 20 20 7a 52  =0 ){.        zR
45c0: 65 6d 6f 74 65 55 73 65 72 20 3d 20 53 74 72 44  emoteUser = StrD
45d0: 75 70 28 7a 4e 61 6d 65 29 3b 0a 20 20 20 20 20  up(zName);.     
45e0: 20 20 20 66 63 6c 6f 73 65 28 69 6e 29 3b 0a 20     fclose(in);. 
45f0: 20 20 20 20 20 20 20 72 65 74 75 72 6e 20 31 3b         return 1;
4600: 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 7d 65 6c  .      }.    }el
4610: 73 65 20 69 66 28 20 73 74 72 63 6d 70 28 7a 46  se if( strcmp(zF
4620: 69 65 6c 64 4e 61 6d 65 2c 22 68 74 74 70 73 2d  ieldName,"https-
4630: 6f 6e 6c 79 22 29 3d 3d 30 20 29 7b 0a 20 20 20  only")==0 ){.   
4640: 20 20 20 69 66 28 20 21 75 73 65 48 74 74 70 73     if( !useHttps
4650: 20 29 7b 0a 20 20 20 20 20 20 20 20 4e 6f 74 46   ){.        NotF
4660: 6f 75 6e 64 28 5f 5f 4c 49 4e 45 5f 5f 29 3b 0a  ound(__LINE__);.
4670: 20 20 20 20 20 20 20 20 66 63 6c 6f 73 65 28 69          fclose(i
4680: 6e 29 3b 0a 20 20 20 20 20 20 20 20 72 65 74 75  n);.        retu
4690: 72 6e 20 30 3b 0a 20 20 20 20 20 20 7d 0a 20 20  rn 0;.      }.  
46a0: 20 20 7d 65 6c 73 65 20 69 66 28 20 73 74 72 63    }else if( strc
46b0: 6d 70 28 7a 46 69 65 6c 64 4e 61 6d 65 2c 22 68  mp(zFieldName,"h
46c0: 74 74 70 2d 72 65 64 69 72 65 63 74 22 29 3d 3d  ttp-redirect")==
46d0: 30 20 29 7b 0a 20 20 20 20 20 20 69 66 28 20 21  0 ){.      if( !
46e0: 75 73 65 48 74 74 70 73 20 29 7b 0a 20 20 20 20  useHttps ){.    
46f0: 20 20 20 20 7a 48 74 74 70 20 3d 20 22 68 74 74      zHttp = "htt
4700: 70 73 22 3b 0a 20 20 20 20 20 20 20 20 73 70 72  ps";.        spr
4710: 69 6e 74 66 28 7a 4c 69 6e 65 2c 20 22 25 73 25  intf(zLine, "%s%
4720: 73 22 2c 20 7a 53 63 72 69 70 74 2c 20 7a 50 61  s", zScript, zPa
4730: 74 68 49 6e 66 6f 29 3b 0a 20 20 20 20 20 20 20  thInfo);.       
4740: 20 52 65 64 69 72 65 63 74 28 7a 4c 69 6e 65 2c   Redirect(zLine,
4750: 20 31 29 3b 0a 20 20 20 20 20 20 20 20 66 63 6c   1);.        fcl
4760: 6f 73 65 28 69 6e 29 3b 0a 20 20 20 20 20 20 20  ose(in);.       
4770: 20 72 65 74 75 72 6e 20 30 3b 0a 20 20 20 20 20   return 0;.     
4780: 20 7d 0a 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20   }.    }else{.  
4790: 20 20 20 20 4e 6f 74 46 6f 75 6e 64 28 5f 5f 4c      NotFound(__L
47a0: 49 4e 45 5f 5f 29 3b 0a 20 20 20 20 20 20 66 63  INE__);.      fc
47b0: 6c 6f 73 65 28 69 6e 29 3b 0a 20 20 20 20 20 20  lose(in);.      
47c0: 72 65 74 75 72 6e 20 30 3b 0a 20 20 20 20 7d 0a  return 0;.    }.
47d0: 20 20 7d 0a 20 20 66 63 6c 6f 73 65 28 69 6e 29    }.  fclose(in)
47e0: 3b 0a 20 20 4e 6f 74 41 75 74 68 6f 72 69 7a 65  ;.  NotAuthorize
47f0: 64 28 7a 52 65 61 6c 6d 29 3b 0a 20 20 72 65 74  d(zRealm);.  ret
4800: 75 72 6e 20 30 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20  urn 0;.}../*.** 
4810: 47 75 65 73 73 20 74 68 65 20 6d 69 6d 65 2d 74  Guess the mime-t
4820: 79 70 65 20 6f 66 20 61 20 64 6f 63 75 6d 65 6e  ype of a documen
4830: 74 20 62 61 73 65 64 20 6f 6e 20 69 74 73 20 6e  t based on its n
4840: 61 6d 65 2e 0a 2a 2f 0a 63 6f 6e 73 74 20 63 68  ame..*/.const ch
4850: 61 72 20 2a 47 65 74 4d 69 6d 65 54 79 70 65 28  ar *GetMimeType(
4860: 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 4e 61 6d  const char *zNam
4870: 65 2c 20 69 6e 74 20 6e 4e 61 6d 65 29 7b 0a 20  e, int nName){. 
4880: 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 3b 0a   const char *z;.
4890: 20 20 69 6e 74 20 69 3b 0a 20 20 69 6e 74 20 66    int i;.  int f
48a0: 69 72 73 74 2c 20 6c 61 73 74 3b 0a 20 20 69 6e  irst, last;.  in
48b0: 74 20 6c 65 6e 3b 0a 20 20 63 68 61 72 20 7a 53  t len;.  char zS
48c0: 75 66 66 69 78 5b 32 30 5d 3b 0a 0a 20 20 2f 2a  uffix[20];..  /*
48d0: 20 41 20 74 61 62 6c 65 20 6f 66 20 6d 69 6d 65   A table of mime
48e0: 74 79 70 65 73 20 62 61 73 65 64 20 6f 6e 20 66  types based on f
48f0: 69 6c 65 20 73 75 66 66 69 78 65 73 2e 20 0a 20  ile suffixes. . 
4900: 20 2a 2a 20 53 75 66 66 69 78 65 73 20 6d 75 73   ** Suffixes mus
4910: 74 20 62 65 20 69 6e 20 73 6f 72 74 65 64 20 6f  t be in sorted o
4920: 72 64 65 72 20 73 6f 20 74 68 61 74 20 77 65 20  rder so that we 
4930: 63 61 6e 20 64 6f 20 61 20 62 69 6e 61 72 79 0a  can do a binary.
4940: 20 20 2a 2a 20 73 65 61 72 63 68 20 74 6f 20 66    ** search to f
4950: 69 6e 64 20 74 68 65 20 6d 69 6d 65 2d 74 79 70  ind the mime-typ
4960: 65 0a 20 20 2a 2f 0a 20 20 73 74 61 74 69 63 20  e.  */.  static 
4970: 63 6f 6e 73 74 20 73 74 72 75 63 74 20 7b 0a 20  const struct {. 
4980: 20 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a     const char *z
4990: 53 75 66 66 69 78 3b 20 20 20 20 20 20 20 2f 2a  Suffix;       /*
49a0: 20 54 68 65 20 66 69 6c 65 20 73 75 66 66 69 78   The file suffix
49b0: 20 2a 2f 0a 20 20 20 20 69 6e 74 20 73 69 7a 65   */.    int size
49c0: 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  ;               
49d0: 20 20 20 2f 2a 20 4c 65 6e 67 74 68 20 6f 66 20     /* Length of 
49e0: 74 68 65 20 73 75 66 66 69 78 20 2a 2f 0a 20 20  the suffix */.  
49f0: 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 4d    const char *zM
4a00: 69 6d 65 74 79 70 65 3b 20 20 20 20 20 2f 2a 20  imetype;     /* 
4a10: 54 68 65 20 63 6f 72 72 65 73 70 6f 6e 64 69 6e  The correspondin
4a20: 67 20 6d 69 6d 65 74 79 70 65 20 2a 2f 0a 20 20  g mimetype */.  
4a30: 7d 20 61 4d 69 6d 65 5b 5d 20 3d 20 7b 0a 20 20  } aMime[] = {.  
4a40: 20 20 7b 20 22 61 69 22 2c 20 20 20 20 20 20 20    { "ai",       
4a50: 20 20 32 2c 20 22 61 70 70 6c 69 63 61 74 69 6f    2, "applicatio
4a60: 6e 2f 70 6f 73 74 73 63 72 69 70 74 22 20 20 20  n/postscript"   
4a70: 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20           },.    
4a80: 7b 20 22 61 69 66 22 2c 20 20 20 20 20 20 20 20  { "aif",        
4a90: 33 2c 20 22 61 75 64 69 6f 2f 78 2d 61 69 66 66  3, "audio/x-aiff
4aa0: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  "               
4ab0: 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20         },.    { 
4ac0: 22 61 69 66 63 22 2c 20 20 20 20 20 20 20 34 2c  "aifc",       4,
4ad0: 20 22 61 75 64 69 6f 2f 78 2d 61 69 66 66 22 20   "audio/x-aiff" 
4ae0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
4af0: 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 61       },.    { "a
4b00: 69 66 66 22 2c 20 20 20 20 20 20 20 34 2c 20 22  iff",       4, "
4b10: 61 75 64 69 6f 2f 78 2d 61 69 66 66 22 20 20 20  audio/x-aiff"   
4b20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
4b30: 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 61 72 6a     },.    { "arj
4b40: 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22 61 70  ",        3, "ap
4b50: 70 6c 69 63 61 74 69 6f 6e 2f 78 2d 61 72 6a 2d  plication/x-arj-
4b60: 63 6f 6d 70 72 65 73 73 65 64 22 20 20 20 20 20  compressed"     
4b70: 20 7d 2c 0a 20 20 20 20 7b 20 22 61 73 63 22 2c   },.    { "asc",
4b80: 20 20 20 20 20 20 20 20 33 2c 20 22 74 65 78 74          3, "text
4b90: 2f 70 6c 61 69 6e 22 20 20 20 20 20 20 20 20 20  /plain"         
4ba0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7d                 }
4bb0: 2c 0a 20 20 20 20 7b 20 22 61 73 66 22 2c 20 20  ,.    { "asf",  
4bc0: 20 20 20 20 20 20 33 2c 20 22 76 69 64 65 6f 2f        3, "video/
4bd0: 78 2d 6d 73 2d 61 73 66 22 20 20 20 20 20 20 20  x-ms-asf"       
4be0: 20 20 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a               },.
4bf0: 20 20 20 20 7b 20 22 61 73 78 22 2c 20 20 20 20      { "asx",    
4c00: 20 20 20 20 33 2c 20 22 76 69 64 65 6f 2f 78 2d      3, "video/x-
4c10: 6d 73 2d 61 73 78 22 20 20 20 20 20 20 20 20 20  ms-asx"         
4c20: 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20             },.  
4c30: 20 20 7b 20 22 61 75 22 2c 20 20 20 20 20 20 20    { "au",       
4c40: 20 20 32 2c 20 22 61 75 64 69 6f 2f 75 6c 61 77    2, "audio/ulaw
4c50: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  "               
4c60: 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20           },.    
4c70: 7b 20 22 61 76 69 22 2c 20 20 20 20 20 20 20 20  { "avi",        
4c80: 33 2c 20 22 76 69 64 65 6f 2f 78 2d 6d 73 76 69  3, "video/x-msvi
4c90: 64 65 6f 22 20 20 20 20 20 20 20 20 20 20 20 20  deo"            
4ca0: 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20         },.    { 
4cb0: 22 62 61 74 22 2c 20 20 20 20 20 20 20 20 33 2c  "bat",        3,
4cc0: 20 22 61 70 70 6c 69 63 61 74 69 6f 6e 2f 78 2d   "application/x-
4cd0: 6d 73 64 6f 73 2d 70 72 6f 67 72 61 6d 22 20 20  msdos-program"  
4ce0: 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 62       },.    { "b
4cf0: 63 70 69 6f 22 2c 20 20 20 20 20 20 35 2c 20 22  cpio",      5, "
4d00: 61 70 70 6c 69 63 61 74 69 6f 6e 2f 78 2d 62 63  application/x-bc
4d10: 70 69 6f 22 20 20 20 20 20 20 20 20 20 20 20 20  pio"            
4d20: 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 62 69 6e     },.    { "bin
4d30: 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22 61 70  ",        3, "ap
4d40: 70 6c 69 63 61 74 69 6f 6e 2f 6f 63 74 65 74 2d  plication/octet-
4d50: 73 74 72 65 61 6d 22 20 20 20 20 20 20 20 20 20  stream"         
4d60: 20 7d 2c 0a 20 20 20 20 7b 20 22 63 22 2c 20 20   },.    { "c",  
4d70: 20 20 20 20 20 20 20 20 31 2c 20 22 74 65 78 74          1, "text
4d80: 2f 70 6c 61 69 6e 22 20 20 20 20 20 20 20 20 20  /plain"         
4d90: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7d                 }
4da0: 2c 0a 20 20 20 20 7b 20 22 63 63 22 2c 20 20 20  ,.    { "cc",   
4db0: 20 20 20 20 20 20 32 2c 20 22 74 65 78 74 2f 70        2, "text/p
4dc0: 6c 61 69 6e 22 20 20 20 20 20 20 20 20 20 20 20  lain"           
4dd0: 20 20 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a               },.
4de0: 20 20 20 20 7b 20 22 63 63 61 64 22 2c 20 20 20      { "ccad",   
4df0: 20 20 20 20 34 2c 20 22 61 70 70 6c 69 63 61 74      4, "applicat
4e00: 69 6f 6e 2f 63 6c 61 72 69 73 63 61 64 22 20 20  ion/clariscad"  
4e10: 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20             },.  
4e20: 20 20 7b 20 22 63 64 66 22 2c 20 20 20 20 20 20    { "cdf",      
4e30: 20 20 33 2c 20 22 61 70 70 6c 69 63 61 74 69 6f    3, "applicatio
4e40: 6e 2f 78 2d 6e 65 74 63 64 66 22 20 20 20 20 20  n/x-netcdf"     
4e50: 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20           },.    
4e60: 7b 20 22 63 6c 61 73 73 22 2c 20 20 20 20 20 20  { "class",      
4e70: 35 2c 20 22 61 70 70 6c 69 63 61 74 69 6f 6e 2f  5, "application/
4e80: 6f 63 74 65 74 2d 73 74 72 65 61 6d 22 20 20 20  octet-stream"   
4e90: 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20         },.    { 
4ea0: 22 63 6f 64 22 2c 20 20 20 20 20 20 20 20 33 2c  "cod",        3,
4eb0: 20 22 61 70 70 6c 69 63 61 74 69 6f 6e 2f 76 6e   "application/vn
4ec0: 64 2e 72 69 6d 2e 63 6f 64 22 20 20 20 20 20 20  d.rim.cod"      
4ed0: 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 63       },.    { "c
4ee0: 6f 6d 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22  om",        3, "
4ef0: 61 70 70 6c 69 63 61 74 69 6f 6e 2f 78 2d 6d 73  application/x-ms
4f00: 64 6f 73 2d 70 72 6f 67 72 61 6d 22 20 20 20 20  dos-program"    
4f10: 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 63 70 69     },.    { "cpi
4f20: 6f 22 2c 20 20 20 20 20 20 20 34 2c 20 22 61 70  o",       4, "ap
4f30: 70 6c 69 63 61 74 69 6f 6e 2f 78 2d 63 70 69 6f  plication/x-cpio
4f40: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  "               
4f50: 20 7d 2c 0a 20 20 20 20 7b 20 22 63 70 74 22 2c   },.    { "cpt",
4f60: 20 20 20 20 20 20 20 20 33 2c 20 22 61 70 70 6c          3, "appl
4f70: 69 63 61 74 69 6f 6e 2f 6d 61 63 2d 63 6f 6d 70  ication/mac-comp
4f80: 61 63 74 70 72 6f 22 20 20 20 20 20 20 20 20 7d  actpro"        }
4f90: 2c 0a 20 20 20 20 7b 20 22 63 73 68 22 2c 20 20  ,.    { "csh",  
4fa0: 20 20 20 20 20 20 33 2c 20 22 61 70 70 6c 69 63        3, "applic
4fb0: 61 74 69 6f 6e 2f 78 2d 63 73 68 22 20 20 20 20  ation/x-csh"    
4fc0: 20 20 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a               },.
4fd0: 20 20 20 20 7b 20 22 63 73 73 22 2c 20 20 20 20      { "css",    
4fe0: 20 20 20 20 33 2c 20 22 74 65 78 74 2f 63 73 73      3, "text/css
4ff0: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  "               
5000: 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20             },.  
5010: 20 20 7b 20 22 64 63 72 22 2c 20 20 20 20 20 20    { "dcr",      
5020: 20 20 33 2c 20 22 61 70 70 6c 69 63 61 74 69 6f    3, "applicatio
5030: 6e 2f 78 2d 64 69 72 65 63 74 6f 72 22 20 20 20  n/x-director"   
5040: 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20           },.    
5050: 7b 20 22 64 65 62 22 2c 20 20 20 20 20 20 20 20  { "deb",        
5060: 33 2c 20 22 61 70 70 6c 69 63 61 74 69 6f 6e 2f  3, "application/
5070: 78 2d 64 65 62 69 61 6e 2d 70 61 63 6b 61 67 65  x-debian-package
5080: 22 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20  "      },.    { 
5090: 22 64 69 72 22 2c 20 20 20 20 20 20 20 20 33 2c  "dir",        3,
50a0: 20 22 61 70 70 6c 69 63 61 74 69 6f 6e 2f 78 2d   "application/x-
50b0: 64 69 72 65 63 74 6f 72 22 20 20 20 20 20 20 20  director"       
50c0: 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 64       },.    { "d
50d0: 6c 22 2c 20 20 20 20 20 20 20 20 20 32 2c 20 22  l",         2, "
50e0: 76 69 64 65 6f 2f 64 6c 22 20 20 20 20 20 20 20  video/dl"       
50f0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
5100: 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 64 6d 73     },.    { "dms
5110: 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22 61 70  ",        3, "ap
5120: 70 6c 69 63 61 74 69 6f 6e 2f 6f 63 74 65 74 2d  plication/octet-
5130: 73 74 72 65 61 6d 22 20 20 20 20 20 20 20 20 20  stream"         
5140: 20 7d 2c 0a 20 20 20 20 7b 20 22 64 6f 63 22 2c   },.    { "doc",
5150: 20 20 20 20 20 20 20 20 33 2c 20 22 61 70 70 6c          3, "appl
5160: 69 63 61 74 69 6f 6e 2f 6d 73 77 6f 72 64 22 20  ication/msword" 
5170: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7d                 }
5180: 2c 0a 20 20 20 20 7b 20 22 64 72 77 22 2c 20 20  ,.    { "drw",  
5190: 20 20 20 20 20 20 33 2c 20 22 61 70 70 6c 69 63        3, "applic
51a0: 61 74 69 6f 6e 2f 64 72 61 66 74 69 6e 67 22 20  ation/drafting" 
51b0: 20 20 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a               },.
51c0: 20 20 20 20 7b 20 22 64 76 69 22 2c 20 20 20 20      { "dvi",    
51d0: 20 20 20 20 33 2c 20 22 61 70 70 6c 69 63 61 74      3, "applicat
51e0: 69 6f 6e 2f 78 2d 64 76 69 22 20 20 20 20 20 20  ion/x-dvi"      
51f0: 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20             },.  
5200: 20 20 7b 20 22 64 77 67 22 2c 20 20 20 20 20 20    { "dwg",      
5210: 20 20 33 2c 20 22 61 70 70 6c 69 63 61 74 69 6f    3, "applicatio
5220: 6e 2f 61 63 61 64 22 20 20 20 20 20 20 20 20 20  n/acad"         
5230: 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20           },.    
5240: 7b 20 22 64 78 66 22 2c 20 20 20 20 20 20 20 20  { "dxf",        
5250: 33 2c 20 22 61 70 70 6c 69 63 61 74 69 6f 6e 2f  3, "application/
5260: 64 78 66 22 20 20 20 20 20 20 20 20 20 20 20 20  dxf"            
5270: 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20         },.    { 
5280: 22 64 78 72 22 2c 20 20 20 20 20 20 20 20 33 2c  "dxr",        3,
5290: 20 22 61 70 70 6c 69 63 61 74 69 6f 6e 2f 78 2d   "application/x-
52a0: 64 69 72 65 63 74 6f 72 22 20 20 20 20 20 20 20  director"       
52b0: 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 65       },.    { "e
52c0: 70 73 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22  ps",        3, "
52d0: 61 70 70 6c 69 63 61 74 69 6f 6e 2f 70 6f 73 74  application/post
52e0: 73 63 72 69 70 74 22 20 20 20 20 20 20 20 20 20  script"         
52f0: 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 65 74 78     },.    { "etx
5300: 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22 74 65  ",        3, "te
5310: 78 74 2f 78 2d 73 65 74 65 78 74 22 20 20 20 20  xt/x-setext"    
5320: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
5330: 20 7d 2c 0a 20 20 20 20 7b 20 22 65 78 65 22 2c   },.    { "exe",
5340: 20 20 20 20 20 20 20 20 33 2c 20 22 61 70 70 6c          3, "appl
5350: 69 63 61 74 69 6f 6e 2f 6f 63 74 65 74 2d 73 74  ication/octet-st
5360: 72 65 61 6d 22 20 20 20 20 20 20 20 20 20 20 7d  ream"          }
5370: 2c 0a 20 20 20 20 7b 20 22 65 7a 22 2c 20 20 20  ,.    { "ez",   
5380: 20 20 20 20 20 20 32 2c 20 22 61 70 70 6c 69 63        2, "applic
5390: 61 74 69 6f 6e 2f 61 6e 64 72 65 77 2d 69 6e 73  ation/andrew-ins
53a0: 65 74 22 20 20 20 20 20 20 20 20 20 20 7d 2c 0a  et"          },.
53b0: 20 20 20 20 7b 20 22 66 22 2c 20 20 20 20 20 20      { "f",      
53c0: 20 20 20 20 31 2c 20 22 74 65 78 74 2f 70 6c 61      1, "text/pla
53d0: 69 6e 22 20 20 20 20 20 20 20 20 20 20 20 20 20  in"             
53e0: 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20             },.  
53f0: 20 20 7b 20 22 66 39 30 22 2c 20 20 20 20 20 20    { "f90",      
5400: 20 20 33 2c 20 22 74 65 78 74 2f 70 6c 61 69 6e    3, "text/plain
5410: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  "               
5420: 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20           },.    
5430: 7b 20 22 66 6c 69 22 2c 20 20 20 20 20 20 20 20  { "fli",        
5440: 33 2c 20 22 76 69 64 65 6f 2f 66 6c 69 22 20 20  3, "video/fli"  
5450: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
5460: 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20         },.    { 
5470: 22 66 6c 76 22 2c 20 20 20 20 20 20 20 20 33 2c  "flv",        3,
5480: 20 22 76 69 64 65 6f 2f 66 6c 76 22 20 20 20 20   "video/flv"    
5490: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
54a0: 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 67       },.    { "g
54b0: 69 66 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22  if",        3, "
54c0: 69 6d 61 67 65 2f 67 69 66 22 20 20 20 20 20 20  image/gif"      
54d0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
54e0: 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 67 6c 22     },.    { "gl"
54f0: 2c 20 20 20 20 20 20 20 20 20 32 2c 20 22 76 69  ,         2, "vi
5500: 64 65 6f 2f 67 6c 22 20 20 20 20 20 20 20 20 20  deo/gl"         
5510: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
5520: 20 7d 2c 0a 20 20 20 20 7b 20 22 67 74 61 72 22   },.    { "gtar"
5530: 2c 20 20 20 20 20 20 20 34 2c 20 22 61 70 70 6c  ,       4, "appl
5540: 69 63 61 74 69 6f 6e 2f 78 2d 67 74 61 72 22 20  ication/x-gtar" 
5550: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7d                 }
5560: 2c 0a 20 20 20 20 7b 20 22 67 7a 22 2c 20 20 20  ,.    { "gz",   
5570: 20 20 20 20 20 20 32 2c 20 22 61 70 70 6c 69 63        2, "applic
5580: 61 74 69 6f 6e 2f 78 2d 67 7a 69 70 22 20 20 20  ation/x-gzip"   
5590: 20 20 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a               },.
55a0: 20 20 20 20 7b 20 22 68 64 66 22 2c 20 20 20 20      { "hdf",    
55b0: 20 20 20 20 33 2c 20 22 61 70 70 6c 69 63 61 74      3, "applicat
55c0: 69 6f 6e 2f 78 2d 68 64 66 22 20 20 20 20 20 20  ion/x-hdf"      
55d0: 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20             },.  
55e0: 20 20 7b 20 22 68 68 22 2c 20 20 20 20 20 20 20    { "hh",       
55f0: 20 20 32 2c 20 22 74 65 78 74 2f 70 6c 61 69 6e    2, "text/plain
5600: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  "               
5610: 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20           },.    
5620: 7b 20 22 68 71 78 22 2c 20 20 20 20 20 20 20 20  { "hqx",        
5630: 33 2c 20 22 61 70 70 6c 69 63 61 74 69 6f 6e 2f  3, "application/
5640: 6d 61 63 2d 62 69 6e 68 65 78 34 30 22 20 20 20  mac-binhex40"   
5650: 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20         },.    { 
5660: 22 68 22 2c 20 20 20 20 20 20 20 20 20 20 31 2c  "h",          1,
5670: 20 22 74 65 78 74 2f 70 6c 61 69 6e 22 20 20 20   "text/plain"   
5680: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
5690: 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 68       },.    { "h
56a0: 74 6d 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22  tm",        3, "
56b0: 74 65 78 74 2f 68 74 6d 6c 3b 20 63 68 61 72 73  text/html; chars
56c0: 65 74 3d 75 74 66 2d 38 22 20 20 20 20 20 20 20  et=utf-8"       
56d0: 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 68 74 6d     },.    { "htm
56e0: 6c 22 2c 20 20 20 20 20 20 20 34 2c 20 22 74 65  l",       4, "te
56f0: 78 74 2f 68 74 6d 6c 3b 20 63 68 61 72 73 65 74  xt/html; charset
5700: 3d 75 74 66 2d 38 22 20 20 20 20 20 20 20 20 20  =utf-8"         
5710: 20 7d 2c 0a 20 20 20 20 7b 20 22 69 63 65 22 2c   },.    { "ice",
5720: 20 20 20 20 20 20 20 20 33 2c 20 22 78 2d 63 6f          3, "x-co
5730: 6e 66 65 72 65 6e 63 65 2f 78 2d 63 6f 6f 6c 74  nference/x-coolt
5740: 61 6c 6b 22 20 20 20 20 20 20 20 20 20 20 20 7d  alk"           }
5750: 2c 0a 20 20 20 20 7b 20 22 69 65 66 22 2c 20 20  ,.    { "ief",  
5760: 20 20 20 20 20 20 33 2c 20 22 69 6d 61 67 65 2f        3, "image/
5770: 69 65 66 22 20 20 20 20 20 20 20 20 20 20 20 20  ief"            
5780: 20 20 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a               },.
5790: 20 20 20 20 7b 20 22 69 67 65 73 22 2c 20 20 20      { "iges",   
57a0: 20 20 20 20 34 2c 20 22 6d 6f 64 65 6c 2f 69 67      4, "model/ig
57b0: 65 73 22 20 20 20 20 20 20 20 20 20 20 20 20 20  es"             
57c0: 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20             },.  
57d0: 20 20 7b 20 22 69 67 73 22 2c 20 20 20 20 20 20    { "igs",      
57e0: 20 20 33 2c 20 22 6d 6f 64 65 6c 2f 69 67 65 73    3, "model/iges
57f0: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  "               
5800: 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20           },.    
5810: 7b 20 22 69 70 73 22 2c 20 20 20 20 20 20 20 20  { "ips",        
5820: 33 2c 20 22 61 70 70 6c 69 63 61 74 69 6f 6e 2f  3, "application/
5830: 78 2d 69 70 73 63 72 69 70 74 22 20 20 20 20 20  x-ipscript"     
5840: 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20         },.    { 
5850: 22 69 70 78 22 2c 20 20 20 20 20 20 20 20 33 2c  "ipx",        3,
5860: 20 22 61 70 70 6c 69 63 61 74 69 6f 6e 2f 78 2d   "application/x-
5870: 69 70 69 78 22 20 20 20 20 20 20 20 20 20 20 20  ipix"           
5880: 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 6a       },.    { "j
5890: 61 64 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22  ad",        3, "
58a0: 74 65 78 74 2f 76 6e 64 2e 73 75 6e 2e 6a 32 6d  text/vnd.sun.j2m
58b0: 65 2e 61 70 70 2d 64 65 73 63 72 69 70 74 6f 72  e.app-descriptor
58c0: 22 20 20 7d 2c 0a 20 20 20 20 7b 20 22 6a 61 72  "  },.    { "jar
58d0: 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22 61 70  ",        3, "ap
58e0: 70 6c 69 63 61 74 69 6f 6e 2f 6a 61 76 61 2d 61  plication/java-a
58f0: 72 63 68 69 76 65 22 20 20 20 20 20 20 20 20 20  rchive"         
5900: 20 7d 2c 0a 20 20 20 20 7b 20 22 6a 70 65 67 22   },.    { "jpeg"
5910: 2c 20 20 20 20 20 20 20 34 2c 20 22 69 6d 61 67  ,       4, "imag
5920: 65 2f 6a 70 65 67 22 20 20 20 20 20 20 20 20 20  e/jpeg"         
5930: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7d                 }
5940: 2c 0a 20 20 20 20 7b 20 22 6a 70 65 22 2c 20 20  ,.    { "jpe",  
5950: 20 20 20 20 20 20 33 2c 20 22 69 6d 61 67 65 2f        3, "image/
5960: 6a 70 65 67 22 20 20 20 20 20 20 20 20 20 20 20  jpeg"           
5970: 20 20 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a               },.
5980: 20 20 20 20 7b 20 22 6a 70 67 22 2c 20 20 20 20      { "jpg",    
5990: 20 20 20 20 33 2c 20 22 69 6d 61 67 65 2f 6a 70      3, "image/jp
59a0: 65 67 22 20 20 20 20 20 20 20 20 20 20 20 20 20  eg"             
59b0: 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20             },.  
59c0: 20 20 7b 20 22 6a 73 22 2c 20 20 20 20 20 20 20    { "js",       
59d0: 20 20 32 2c 20 22 61 70 70 6c 69 63 61 74 69 6f    2, "applicatio
59e0: 6e 2f 78 2d 6a 61 76 61 73 63 72 69 70 74 22 20  n/x-javascript" 
59f0: 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20           },.    
5a00: 7b 20 22 6b 61 72 22 2c 20 20 20 20 20 20 20 20  { "kar",        
5a10: 33 2c 20 22 61 75 64 69 6f 2f 6d 69 64 69 22 20  3, "audio/midi" 
5a20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
5a30: 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20         },.    { 
5a40: 22 6c 61 74 65 78 22 2c 20 20 20 20 20 20 35 2c  "latex",      5,
5a50: 20 22 61 70 70 6c 69 63 61 74 69 6f 6e 2f 78 2d   "application/x-
5a60: 6c 61 74 65 78 22 20 20 20 20 20 20 20 20 20 20  latex"          
5a70: 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 6c       },.    { "l
5a80: 68 61 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22  ha",        3, "
5a90: 61 70 70 6c 69 63 61 74 69 6f 6e 2f 6f 63 74 65  application/octe
5aa0: 74 2d 73 74 72 65 61 6d 22 20 20 20 20 20 20 20  t-stream"       
5ab0: 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 6c 73 70     },.    { "lsp
5ac0: 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22 61 70  ",        3, "ap
5ad0: 70 6c 69 63 61 74 69 6f 6e 2f 78 2d 6c 69 73 70  plication/x-lisp
5ae0: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  "               
5af0: 20 7d 2c 0a 20 20 20 20 7b 20 22 6c 7a 68 22 2c   },.    { "lzh",
5b00: 20 20 20 20 20 20 20 20 33 2c 20 22 61 70 70 6c          3, "appl
5b10: 69 63 61 74 69 6f 6e 2f 6f 63 74 65 74 2d 73 74  ication/octet-st
5b20: 72 65 61 6d 22 20 20 20 20 20 20 20 20 20 20 7d  ream"          }
5b30: 2c 0a 20 20 20 20 7b 20 22 6d 22 2c 20 20 20 20  ,.    { "m",    
5b40: 20 20 20 20 20 20 31 2c 20 22 74 65 78 74 2f 70        1, "text/p
5b50: 6c 61 69 6e 22 20 20 20 20 20 20 20 20 20 20 20  lain"           
5b60: 20 20 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a               },.
5b70: 20 20 20 20 7b 20 22 6d 33 75 22 2c 20 20 20 20      { "m3u",    
5b80: 20 20 20 20 33 2c 20 22 61 75 64 69 6f 2f 78 2d      3, "audio/x-
5b90: 6d 70 65 67 75 72 6c 22 20 20 20 20 20 20 20 20  mpegurl"        
5ba0: 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20             },.  
5bb0: 20 20 7b 20 22 6d 61 6e 22 2c 20 20 20 20 20 20    { "man",      
5bc0: 20 20 33 2c 20 22 61 70 70 6c 69 63 61 74 69 6f    3, "applicatio
5bd0: 6e 2f 78 2d 74 72 6f 66 66 2d 6d 61 6e 22 20 20  n/x-troff-man"  
5be0: 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20           },.    
5bf0: 7b 20 22 6d 65 22 2c 20 20 20 20 20 20 20 20 20  { "me",         
5c00: 32 2c 20 22 61 70 70 6c 69 63 61 74 69 6f 6e 2f  2, "application/
5c10: 78 2d 74 72 6f 66 66 2d 6d 65 22 20 20 20 20 20  x-troff-me"     
5c20: 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20         },.    { 
5c30: 22 6d 65 73 68 22 2c 20 20 20 20 20 20 20 34 2c  "mesh",       4,
5c40: 20 22 6d 6f 64 65 6c 2f 6d 65 73 68 22 20 20 20   "model/mesh"   
5c50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
5c60: 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 6d       },.    { "m
5c70: 69 64 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22  id",        3, "
5c80: 61 75 64 69 6f 2f 6d 69 64 69 22 20 20 20 20 20  audio/midi"     
5c90: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
5ca0: 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 6d 69 64     },.    { "mid
5cb0: 69 22 2c 20 20 20 20 20 20 20 34 2c 20 22 61 75  i",       4, "au
5cc0: 64 69 6f 2f 6d 69 64 69 22 20 20 20 20 20 20 20  dio/midi"       
5cd0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
5ce0: 20 7d 2c 0a 20 20 20 20 7b 20 22 6d 69 66 22 2c   },.    { "mif",
5cf0: 20 20 20 20 20 20 20 20 33 2c 20 22 61 70 70 6c          3, "appl
5d00: 69 63 61 74 69 6f 6e 2f 78 2d 6d 69 66 22 20 20  ication/x-mif"  
5d10: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7d                 }
5d20: 2c 0a 20 20 20 20 7b 20 22 6d 69 6d 65 22 2c 20  ,.    { "mime", 
5d30: 20 20 20 20 20 20 34 2c 20 22 77 77 77 2f 6d 69        4, "www/mi
5d40: 6d 65 22 20 20 20 20 20 20 20 20 20 20 20 20 20  me"             
5d50: 20 20 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a               },.
5d60: 20 20 20 20 7b 20 22 6d 6f 76 69 65 22 2c 20 20      { "movie",  
5d70: 20 20 20 20 35 2c 20 22 76 69 64 65 6f 2f 78 2d      5, "video/x-
5d80: 73 67 69 2d 6d 6f 76 69 65 22 20 20 20 20 20 20  sgi-movie"      
5d90: 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20             },.  
5da0: 20 20 7b 20 22 6d 6f 76 22 2c 20 20 20 20 20 20    { "mov",      
5db0: 20 20 33 2c 20 22 76 69 64 65 6f 2f 71 75 69 63    3, "video/quic
5dc0: 6b 74 69 6d 65 22 20 20 20 20 20 20 20 20 20 20  ktime"          
5dd0: 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20           },.    
5de0: 7b 20 22 6d 70 32 22 2c 20 20 20 20 20 20 20 20  { "mp2",        
5df0: 33 2c 20 22 61 75 64 69 6f 2f 6d 70 65 67 22 20  3, "audio/mpeg" 
5e00: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
5e10: 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20         },.    { 
5e20: 22 6d 70 32 22 2c 20 20 20 20 20 20 20 20 33 2c  "mp2",        3,
5e30: 20 22 76 69 64 65 6f 2f 6d 70 65 67 22 20 20 20   "video/mpeg"   
5e40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
5e50: 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 6d       },.    { "m
5e60: 70 33 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22  p3",        3, "
5e70: 61 75 64 69 6f 2f 6d 70 65 67 22 20 20 20 20 20  audio/mpeg"     
5e80: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
5e90: 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 6d 70 65     },.    { "mpe
5ea0: 67 22 2c 20 20 20 20 20 20 20 34 2c 20 22 76 69  g",       4, "vi
5eb0: 64 65 6f 2f 6d 70 65 67 22 20 20 20 20 20 20 20  deo/mpeg"       
5ec0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
5ed0: 20 7d 2c 0a 20 20 20 20 7b 20 22 6d 70 65 22 2c   },.    { "mpe",
5ee0: 20 20 20 20 20 20 20 20 33 2c 20 22 76 69 64 65          3, "vide
5ef0: 6f 2f 6d 70 65 67 22 20 20 20 20 20 20 20 20 20  o/mpeg"         
5f00: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7d                 }
5f10: 2c 0a 20 20 20 20 7b 20 22 6d 70 67 61 22 2c 20  ,.    { "mpga", 
5f20: 20 20 20 20 20 20 34 2c 20 22 61 75 64 69 6f 2f        4, "audio/
5f30: 6d 70 65 67 22 20 20 20 20 20 20 20 20 20 20 20  mpeg"           
5f40: 20 20 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a               },.
5f50: 20 20 20 20 7b 20 22 6d 70 67 22 2c 20 20 20 20      { "mpg",    
5f60: 20 20 20 20 33 2c 20 22 76 69 64 65 6f 2f 6d 70      3, "video/mp
5f70: 65 67 22 20 20 20 20 20 20 20 20 20 20 20 20 20  eg"             
5f80: 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20             },.  
5f90: 20 20 7b 20 22 6d 73 22 2c 20 20 20 20 20 20 20    { "ms",       
5fa0: 20 20 32 2c 20 22 61 70 70 6c 69 63 61 74 69 6f    2, "applicatio
5fb0: 6e 2f 78 2d 74 72 6f 66 66 2d 6d 73 22 20 20 20  n/x-troff-ms"   
5fc0: 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20           },.    
5fd0: 7b 20 22 6d 73 68 22 2c 20 20 20 20 20 20 20 20  { "msh",        
5fe0: 33 2c 20 22 6d 6f 64 65 6c 2f 6d 65 73 68 22 20  3, "model/mesh" 
5ff0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
6000: 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20         },.    { 
6010: 22 6e 63 22 2c 20 20 20 20 20 20 20 20 20 32 2c  "nc",         2,
6020: 20 22 61 70 70 6c 69 63 61 74 69 6f 6e 2f 78 2d   "application/x-
6030: 6e 65 74 63 64 66 22 20 20 20 20 20 20 20 20 20  netcdf"         
6040: 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 6f       },.    { "o
6050: 64 61 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22  da",        3, "
6060: 61 70 70 6c 69 63 61 74 69 6f 6e 2f 6f 64 61 22  application/oda"
6070: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
6080: 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 6f 67 67     },.    { "ogg
6090: 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22 61 70  ",        3, "ap
60a0: 70 6c 69 63 61 74 69 6f 6e 2f 6f 67 67 22 20 20  plication/ogg"  
60b0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
60c0: 20 7d 2c 0a 20 20 20 20 7b 20 22 6f 67 6d 22 2c   },.    { "ogm",
60d0: 20 20 20 20 20 20 20 20 33 2c 20 22 61 70 70 6c          3, "appl
60e0: 69 63 61 74 69 6f 6e 2f 6f 67 67 22 20 20 20 20  ication/ogg"    
60f0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7d                 }
6100: 2c 0a 20 20 20 20 7b 20 22 70 62 6d 22 2c 20 20  ,.    { "pbm",  
6110: 20 20 20 20 20 20 33 2c 20 22 69 6d 61 67 65 2f        3, "image/
6120: 78 2d 70 6f 72 74 61 62 6c 65 2d 62 69 74 6d 61  x-portable-bitma
6130: 70 22 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a  p"           },.
6140: 20 20 20 20 7b 20 22 70 64 62 22 2c 20 20 20 20      { "pdb",    
6150: 20 20 20 20 33 2c 20 22 63 68 65 6d 69 63 61 6c      3, "chemical
6160: 2f 78 2d 70 64 62 22 20 20 20 20 20 20 20 20 20  /x-pdb"         
6170: 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20             },.  
6180: 20 20 7b 20 22 70 64 66 22 2c 20 20 20 20 20 20    { "pdf",      
6190: 20 20 33 2c 20 22 61 70 70 6c 69 63 61 74 69 6f    3, "applicatio
61a0: 6e 2f 70 64 66 22 20 20 20 20 20 20 20 20 20 20  n/pdf"          
61b0: 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20           },.    
61c0: 7b 20 22 70 67 6d 22 2c 20 20 20 20 20 20 20 20  { "pgm",        
61d0: 33 2c 20 22 69 6d 61 67 65 2f 78 2d 70 6f 72 74  3, "image/x-port
61e0: 61 62 6c 65 2d 67 72 61 79 6d 61 70 22 20 20 20  able-graymap"   
61f0: 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20         },.    { 
6200: 22 70 67 6e 22 2c 20 20 20 20 20 20 20 20 33 2c  "pgn",        3,
6210: 20 22 61 70 70 6c 69 63 61 74 69 6f 6e 2f 78 2d   "application/x-
6220: 63 68 65 73 73 2d 70 67 6e 22 20 20 20 20 20 20  chess-pgn"      
6230: 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 70       },.    { "p
6240: 67 70 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22  gp",        3, "
6250: 61 70 70 6c 69 63 61 74 69 6f 6e 2f 70 67 70 22  application/pgp"
6260: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
6270: 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 70 6c 22     },.    { "pl"
6280: 2c 20 20 20 20 20 20 20 20 20 32 2c 20 22 61 70  ,         2, "ap
6290: 70 6c 69 63 61 74 69 6f 6e 2f 78 2d 70 65 72 6c  plication/x-perl
62a0: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  "               
62b0: 20 7d 2c 0a 20 20 20 20 7b 20 22 70 6d 22 2c 20   },.    { "pm", 
62c0: 20 20 20 20 20 20 20 20 32 2c 20 22 61 70 70 6c          2, "appl
62d0: 69 63 61 74 69 6f 6e 2f 78 2d 70 65 72 6c 22 20  ication/x-perl" 
62e0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7d                 }
62f0: 2c 0a 20 20 20 20 7b 20 22 70 6e 67 22 2c 20 20  ,.    { "png",  
6300: 20 20 20 20 20 20 33 2c 20 22 69 6d 61 67 65 2f        3, "image/
6310: 70 6e 67 22 20 20 20 20 20 20 20 20 20 20 20 20  png"            
6320: 20 20 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a               },.
6330: 20 20 20 20 7b 20 22 70 6e 6d 22 2c 20 20 20 20      { "pnm",    
6340: 20 20 20 20 33 2c 20 22 69 6d 61 67 65 2f 78 2d      3, "image/x-
6350: 70 6f 72 74 61 62 6c 65 2d 61 6e 79 6d 61 70 22  portable-anymap"
6360: 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20             },.  
6370: 20 20 7b 20 22 70 6f 74 22 2c 20 20 20 20 20 20    { "pot",      
6380: 20 20 33 2c 20 22 61 70 70 6c 69 63 61 74 69 6f    3, "applicatio
6390: 6e 2f 6d 73 70 6f 77 65 72 70 6f 69 6e 74 22 20  n/mspowerpoint" 
63a0: 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20           },.    
63b0: 7b 20 22 70 70 6d 22 2c 20 20 20 20 20 20 20 20  { "ppm",        
63c0: 33 2c 20 22 69 6d 61 67 65 2f 78 2d 70 6f 72 74  3, "image/x-port
63d0: 61 62 6c 65 2d 70 69 78 6d 61 70 22 20 20 20 20  able-pixmap"    
63e0: 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20         },.    { 
63f0: 22 70 70 73 22 2c 20 20 20 20 20 20 20 20 33 2c  "pps",        3,
6400: 20 22 61 70 70 6c 69 63 61 74 69 6f 6e 2f 6d 73   "application/ms
6410: 70 6f 77 65 72 70 6f 69 6e 74 22 20 20 20 20 20  powerpoint"     
6420: 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 70       },.    { "p
6430: 70 74 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22  pt",        3, "
6440: 61 70 70 6c 69 63 61 74 69 6f 6e 2f 6d 73 70 6f  application/mspo
6450: 77 65 72 70 6f 69 6e 74 22 20 20 20 20 20 20 20  werpoint"       
6460: 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 70 70 7a     },.    { "ppz
6470: 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22 61 70  ",        3, "ap
6480: 70 6c 69 63 61 74 69 6f 6e 2f 6d 73 70 6f 77 65  plication/mspowe
6490: 72 70 6f 69 6e 74 22 20 20 20 20 20 20 20 20 20  rpoint"         
64a0: 20 7d 2c 0a 20 20 20 20 7b 20 22 70 72 65 22 2c   },.    { "pre",
64b0: 20 20 20 20 20 20 20 20 33 2c 20 22 61 70 70 6c          3, "appl
64c0: 69 63 61 74 69 6f 6e 2f 78 2d 66 72 65 65 6c 61  ication/x-freela
64d0: 6e 63 65 22 20 20 20 20 20 20 20 20 20 20 20 7d  nce"           }
64e0: 2c 0a 20 20 20 20 7b 20 22 70 72 74 22 2c 20 20  ,.    { "prt",  
64f0: 20 20 20 20 20 20 33 2c 20 22 61 70 70 6c 69 63        3, "applic
6500: 61 74 69 6f 6e 2f 70 72 6f 5f 65 6e 67 22 20 20  ation/pro_eng"  
6510: 20 20 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a               },.
6520: 20 20 20 20 7b 20 22 70 73 22 2c 20 20 20 20 20      { "ps",     
6530: 20 20 20 20 32 2c 20 22 61 70 70 6c 69 63 61 74      2, "applicat
6540: 69 6f 6e 2f 70 6f 73 74 73 63 72 69 70 74 22 20  ion/postscript" 
6550: 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20             },.  
6560: 20 20 7b 20 22 71 74 22 2c 20 20 20 20 20 20 20    { "qt",       
6570: 20 20 32 2c 20 22 76 69 64 65 6f 2f 71 75 69 63    2, "video/quic
6580: 6b 74 69 6d 65 22 20 20 20 20 20 20 20 20 20 20  ktime"          
6590: 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20           },.    
65a0: 7b 20 22 72 61 22 2c 20 20 20 20 20 20 20 20 20  { "ra",         
65b0: 32 2c 20 22 61 75 64 69 6f 2f 78 2d 72 65 61 6c  2, "audio/x-real
65c0: 61 75 64 69 6f 22 20 20 20 20 20 20 20 20 20 20  audio"          
65d0: 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20         },.    { 
65e0: 22 72 61 6d 22 2c 20 20 20 20 20 20 20 20 33 2c  "ram",        3,
65f0: 20 22 61 75 64 69 6f 2f 78 2d 70 6e 2d 72 65 61   "audio/x-pn-rea
6600: 6c 61 75 64 69 6f 22 20 20 20 20 20 20 20 20 20  laudio"         
6610: 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 72       },.    { "r
6620: 61 72 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22  ar",        3, "
6630: 61 70 70 6c 69 63 61 74 69 6f 6e 2f 78 2d 72 61  application/x-ra
6640: 72 2d 63 6f 6d 70 72 65 73 73 65 64 22 20 20 20  r-compressed"   
6650: 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 72 61 73     },.    { "ras
6660: 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22 69 6d  ",        3, "im
6670: 61 67 65 2f 63 6d 75 2d 72 61 73 74 65 72 22 20  age/cmu-raster" 
6680: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
6690: 20 7d 2c 0a 20 20 20 20 7b 20 22 72 61 73 22 2c   },.    { "ras",
66a0: 20 20 20 20 20 20 20 20 33 2c 20 22 69 6d 61 67          3, "imag
66b0: 65 2f 78 2d 63 6d 75 2d 72 61 73 74 65 72 22 20  e/x-cmu-raster" 
66c0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7d                 }
66d0: 2c 0a 20 20 20 20 7b 20 22 72 67 62 22 2c 20 20  ,.    { "rgb",  
66e0: 20 20 20 20 20 20 33 2c 20 22 69 6d 61 67 65 2f        3, "image/
66f0: 78 2d 72 67 62 22 20 20 20 20 20 20 20 20 20 20  x-rgb"          
6700: 20 20 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a               },.
6710: 20 20 20 20 7b 20 22 72 6d 22 2c 20 20 20 20 20      { "rm",     
6720: 20 20 20 20 32 2c 20 22 61 75 64 69 6f 2f 78 2d      2, "audio/x-
6730: 70 6e 2d 72 65 61 6c 61 75 64 69 6f 22 20 20 20  pn-realaudio"   
6740: 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20             },.  
6750: 20 20 7b 20 22 72 6f 66 66 22 2c 20 20 20 20 20    { "roff",     
6760: 20 20 34 2c 20 22 61 70 70 6c 69 63 61 74 69 6f    4, "applicatio
6770: 6e 2f 78 2d 74 72 6f 66 66 22 20 20 20 20 20 20  n/x-troff"      
6780: 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20           },.    
6790: 7b 20 22 72 70 6d 22 2c 20 20 20 20 20 20 20 20  { "rpm",        
67a0: 33 2c 20 22 61 75 64 69 6f 2f 78 2d 70 6e 2d 72  3, "audio/x-pn-r
67b0: 65 61 6c 61 75 64 69 6f 2d 70 6c 75 67 69 6e 22  ealaudio-plugin"
67c0: 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20         },.    { 
67d0: 22 72 74 66 22 2c 20 20 20 20 20 20 20 20 33 2c  "rtf",        3,
67e0: 20 22 61 70 70 6c 69 63 61 74 69 6f 6e 2f 72 74   "application/rt
67f0: 66 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20  f"              
6800: 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 72       },.    { "r
6810: 74 66 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22  tf",        3, "
6820: 74 65 78 74 2f 72 74 66 22 20 20 20 20 20 20 20  text/rtf"       
6830: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
6840: 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 72 74 78     },.    { "rtx
6850: 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22 74 65  ",        3, "te
6860: 78 74 2f 72 69 63 68 74 65 78 74 22 20 20 20 20  xt/richtext"    
6870: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
6880: 20 7d 2c 0a 20 20 20 20 7b 20 22 73 63 6d 22 2c   },.    { "scm",
6890: 20 20 20 20 20 20 20 20 33 2c 20 22 61 70 70 6c          3, "appl
68a0: 69 63 61 74 69 6f 6e 2f 78 2d 6c 6f 74 75 73 73  ication/x-lotuss
68b0: 63 72 65 65 6e 63 61 6d 22 20 20 20 20 20 20 7d  creencam"      }
68c0: 2c 0a 20 20 20 20 7b 20 22 73 65 74 22 2c 20 20  ,.    { "set",  
68d0: 20 20 20 20 20 20 33 2c 20 22 61 70 70 6c 69 63        3, "applic
68e0: 61 74 69 6f 6e 2f 73 65 74 22 20 20 20 20 20 20  ation/set"      
68f0: 20 20 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a               },.
6900: 20 20 20 20 7b 20 22 73 67 6d 6c 22 2c 20 20 20      { "sgml",   
6910: 20 20 20 20 34 2c 20 22 74 65 78 74 2f 73 67 6d      4, "text/sgm
6920: 6c 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20  l"              
6930: 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20             },.  
6940: 20 20 7b 20 22 73 67 6d 22 2c 20 20 20 20 20 20    { "sgm",      
6950: 20 20 33 2c 20 22 74 65 78 74 2f 73 67 6d 6c 22    3, "text/sgml"
6960: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
6970: 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20           },.    
6980: 7b 20 22 73 68 22 2c 20 20 20 20 20 20 20 20 20  { "sh",         
6990: 32 2c 20 22 61 70 70 6c 69 63 61 74 69 6f 6e 2f  2, "application/
69a0: 78 2d 73 68 22 20 20 20 20 20 20 20 20 20 20 20  x-sh"           
69b0: 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20         },.    { 
69c0: 22 73 68 61 72 22 2c 20 20 20 20 20 20 20 34 2c  "shar",       4,
69d0: 20 22 61 70 70 6c 69 63 61 74 69 6f 6e 2f 78 2d   "application/x-
69e0: 73 68 61 72 22 20 20 20 20 20 20 20 20 20 20 20  shar"           
69f0: 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 73       },.    { "s
6a00: 69 6c 6f 22 2c 20 20 20 20 20 20 20 34 2c 20 22  ilo",       4, "
6a10: 6d 6f 64 65 6c 2f 6d 65 73 68 22 20 20 20 20 20  model/mesh"     
6a20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
6a30: 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 73 69 74     },.    { "sit
6a40: 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22 61 70  ",        3, "ap
6a50: 70 6c 69 63 61 74 69 6f 6e 2f 78 2d 73 74 75 66  plication/x-stuf
6a60: 66 69 74 22 20 20 20 20 20 20 20 20 20 20 20 20  fit"            
6a70: 20 7d 2c 0a 20 20 20 20 7b 20 22 73 6b 64 22 2c   },.    { "skd",
6a80: 20 20 20 20 20 20 20 20 33 2c 20 22 61 70 70 6c          3, "appl
6a90: 69 63 61 74 69 6f 6e 2f 78 2d 6b 6f 61 6e 22 20  ication/x-koan" 
6aa0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7d                 }
6ab0: 2c 0a 20 20 20 20 7b 20 22 73 6b 6d 22 2c 20 20  ,.    { "skm",  
6ac0: 20 20 20 20 20 20 33 2c 20 22 61 70 70 6c 69 63        3, "applic
6ad0: 61 74 69 6f 6e 2f 78 2d 6b 6f 61 6e 22 20 20 20  ation/x-koan"   
6ae0: 20 20 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a               },.
6af0: 20 20 20 20 7b 20 22 73 6b 70 22 2c 20 20 20 20      { "skp",    
6b00: 20 20 20 20 33 2c 20 22 61 70 70 6c 69 63 61 74      3, "applicat
6b10: 69 6f 6e 2f 78 2d 6b 6f 61 6e 22 20 20 20 20 20  ion/x-koan"     
6b20: 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20             },.  
6b30: 20 20 7b 20 22 73 6b 74 22 2c 20 20 20 20 20 20    { "skt",      
6b40: 20 20 33 2c 20 22 61 70 70 6c 69 63 61 74 69 6f    3, "applicatio
6b50: 6e 2f 78 2d 6b 6f 61 6e 22 20 20 20 20 20 20 20  n/x-koan"       
6b60: 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20           },.    
6b70: 7b 20 22 73 6d 69 22 2c 20 20 20 20 20 20 20 20  { "smi",        
6b80: 33 2c 20 22 61 70 70 6c 69 63 61 74 69 6f 6e 2f  3, "application/
6b90: 73 6d 69 6c 22 20 20 20 20 20 20 20 20 20 20 20  smil"           
6ba0: 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20         },.    { 
6bb0: 22 73 6d 69 6c 22 2c 20 20 20 20 20 20 20 34 2c  "smil",       4,
6bc0: 20 22 61 70 70 6c 69 63 61 74 69 6f 6e 2f 73 6d   "application/sm
6bd0: 69 6c 22 20 20 20 20 20 20 20 20 20 20 20 20 20  il"             
6be0: 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 73       },.    { "s
6bf0: 6e 64 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22  nd",        3, "
6c00: 61 75 64 69 6f 2f 62 61 73 69 63 22 20 20 20 20  audio/basic"    
6c10: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
6c20: 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 73 6f 6c     },.    { "sol
6c30: 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22 61 70  ",        3, "ap
6c40: 70 6c 69 63 61 74 69 6f 6e 2f 73 6f 6c 69 64 73  plication/solids
6c50: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  "               
6c60: 20 7d 2c 0a 20 20 20 20 7b 20 22 73 70 6c 22 2c   },.    { "spl",
6c70: 20 20 20 20 20 20 20 20 33 2c 20 22 61 70 70 6c          3, "appl
6c80: 69 63 61 74 69 6f 6e 2f 78 2d 66 75 74 75 72 65  ication/x-future
6c90: 73 70 6c 61 73 68 22 20 20 20 20 20 20 20 20 7d  splash"        }
6ca0: 2c 0a 20 20 20 20 7b 20 22 73 72 63 22 2c 20 20  ,.    { "src",  
6cb0: 20 20 20 20 20 20 33 2c 20 22 61 70 70 6c 69 63        3, "applic
6cc0: 61 74 69 6f 6e 2f 78 2d 77 61 69 73 2d 73 6f 75  ation/x-wais-sou
6cd0: 72 63 65 22 20 20 20 20 20 20 20 20 20 7d 2c 0a  rce"         },.
6ce0: 20 20 20 20 7b 20 22 73 74 65 70 22 2c 20 20 20      { "step",   
6cf0: 20 20 20 20 34 2c 20 22 61 70 70 6c 69 63 61 74      4, "applicat
6d00: 69 6f 6e 2f 53 54 45 50 22 20 20 20 20 20 20 20  ion/STEP"       
6d10: 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20             },.  
6d20: 20 20 7b 20 22 73 74 6c 22 2c 20 20 20 20 20 20    { "stl",      
6d30: 20 20 33 2c 20 22 61 70 70 6c 69 63 61 74 69 6f    3, "applicatio
6d40: 6e 2f 53 4c 41 22 20 20 20 20 20 20 20 20 20 20  n/SLA"          
6d50: 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20           },.    
6d60: 7b 20 22 73 74 70 22 2c 20 20 20 20 20 20 20 20  { "stp",        
6d70: 33 2c 20 22 61 70 70 6c 69 63 61 74 69 6f 6e 2f  3, "application/
6d80: 53 54 45 50 22 20 20 20 20 20 20 20 20 20 20 20  STEP"           
6d90: 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20         },.    { 
6da0: 22 73 76 34 63 70 69 6f 22 2c 20 20 20 20 37 2c  "sv4cpio",    7,
6db0: 20 22 61 70 70 6c 69 63 61 74 69 6f 6e 2f 78 2d   "application/x-
6dc0: 73 76 34 63 70 69 6f 22 20 20 20 20 20 20 20 20  sv4cpio"        
6dd0: 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 73       },.    { "s
6de0: 76 34 63 72 63 22 2c 20 20 20 20 20 36 2c 20 22  v4crc",     6, "
6df0: 61 70 70 6c 69 63 61 74 69 6f 6e 2f 78 2d 73 76  application/x-sv
6e00: 34 63 72 63 22 20 20 20 20 20 20 20 20 20 20 20  4crc"           
6e10: 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 73 77 66     },.    { "swf
6e20: 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22 61 70  ",        3, "ap
6e30: 70 6c 69 63 61 74 69 6f 6e 2f 78 2d 73 68 6f 63  plication/x-shoc
6e40: 6b 77 61 76 65 2d 66 6c 61 73 68 22 20 20 20 20  kwave-flash"    
6e50: 20 7d 2c 0a 20 20 20 20 7b 20 22 74 22 2c 20 20   },.    { "t",  
6e60: 20 20 20 20 20 20 20 20 31 2c 20 22 61 70 70 6c          1, "appl
6e70: 69 63 61 74 69 6f 6e 2f 78 2d 74 72 6f 66 66 22  ication/x-troff"
6e80: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7d                 }
6e90: 2c 0a 20 20 20 20 7b 20 22 74 61 72 22 2c 20 20  ,.    { "tar",  
6ea0: 20 20 20 20 20 20 33 2c 20 22 61 70 70 6c 69 63        3, "applic
6eb0: 61 74 69 6f 6e 2f 78 2d 74 61 72 22 20 20 20 20  ation/x-tar"    
6ec0: 20 20 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a               },.
6ed0: 20 20 20 20 7b 20 22 74 63 6c 22 2c 20 20 20 20      { "tcl",    
6ee0: 20 20 20 20 33 2c 20 22 61 70 70 6c 69 63 61 74      3, "applicat
6ef0: 69 6f 6e 2f 78 2d 74 63 6c 22 20 20 20 20 20 20  ion/x-tcl"      
6f00: 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20             },.  
6f10: 20 20 7b 20 22 74 65 78 22 2c 20 20 20 20 20 20    { "tex",      
6f20: 20 20 33 2c 20 22 61 70 70 6c 69 63 61 74 69 6f    3, "applicatio
6f30: 6e 2f 78 2d 74 65 78 22 20 20 20 20 20 20 20 20  n/x-tex"        
6f40: 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20           },.    
6f50: 7b 20 22 74 65 78 69 22 2c 20 20 20 20 20 20 20  { "texi",       
6f60: 34 2c 20 22 61 70 70 6c 69 63 61 74 69 6f 6e 2f  4, "application/
6f70: 78 2d 74 65 78 69 6e 66 6f 22 20 20 20 20 20 20  x-texinfo"      
6f80: 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20         },.    { 
6f90: 22 74 65 78 69 6e 66 6f 22 2c 20 20 20 20 37 2c  "texinfo",    7,
6fa0: 20 22 61 70 70 6c 69 63 61 74 69 6f 6e 2f 78 2d   "application/x-
6fb0: 74 65 78 69 6e 66 6f 22 20 20 20 20 20 20 20 20  texinfo"        
6fc0: 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 74       },.    { "t
6fd0: 67 7a 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22  gz",        3, "
6fe0: 61 70 70 6c 69 63 61 74 69 6f 6e 2f 78 2d 74 61  application/x-ta
6ff0: 72 2d 67 7a 22 20 20 20 20 20 20 20 20 20 20 20  r-gz"           
7000: 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 74 69 66     },.    { "tif
7010: 66 22 2c 20 20 20 20 20 20 20 34 2c 20 22 69 6d  f",       4, "im
7020: 61 67 65 2f 74 69 66 66 22 20 20 20 20 20 20 20  age/tiff"       
7030: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
7040: 20 7d 2c 0a 20 20 20 20 7b 20 22 74 69 66 22 2c   },.    { "tif",
7050: 20 20 20 20 20 20 20 20 33 2c 20 22 69 6d 61 67          3, "imag
7060: 65 2f 74 69 66 66 22 20 20 20 20 20 20 20 20 20  e/tiff"         
7070: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7d                 }
7080: 2c 0a 20 20 20 20 7b 20 22 74 72 22 2c 20 20 20  ,.    { "tr",   
7090: 20 20 20 20 20 20 32 2c 20 22 61 70 70 6c 69 63        2, "applic
70a0: 61 74 69 6f 6e 2f 78 2d 74 72 6f 66 66 22 20 20  ation/x-troff"  
70b0: 20 20 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a               },.
70c0: 20 20 20 20 7b 20 22 74 73 69 22 2c 20 20 20 20      { "tsi",    
70d0: 20 20 20 20 33 2c 20 22 61 75 64 69 6f 2f 54 53      3, "audio/TS
70e0: 50 2d 61 75 64 69 6f 22 20 20 20 20 20 20 20 20  P-audio"        
70f0: 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20             },.  
7100: 20 20 7b 20 22 74 73 70 22 2c 20 20 20 20 20 20    { "tsp",      
7110: 20 20 33 2c 20 22 61 70 70 6c 69 63 61 74 69 6f    3, "applicatio
7120: 6e 2f 64 73 70 74 79 70 65 22 20 20 20 20 20 20  n/dsptype"      
7130: 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20           },.    
7140: 7b 20 22 74 73 76 22 2c 20 20 20 20 20 20 20 20  { "tsv",        
7150: 33 2c 20 22 74 65 78 74 2f 74 61 62 2d 73 65 70  3, "text/tab-sep
7160: 61 72 61 74 65 64 2d 76 61 6c 75 65 73 22 20 20  arated-values"  
7170: 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20         },.    { 
7180: 22 74 78 74 22 2c 20 20 20 20 20 20 20 20 33 2c  "txt",        3,
7190: 20 22 74 65 78 74 2f 70 6c 61 69 6e 22 20 20 20   "text/plain"   
71a0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
71b0: 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 75       },.    { "u
71c0: 6e 76 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22  nv",        3, "
71d0: 61 70 70 6c 69 63 61 74 69 6f 6e 2f 69 2d 64 65  application/i-de
71e0: 61 73 22 20 20 20 20 20 20 20 20 20 20 20 20 20  as"             
71f0: 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 75 73 74     },.    { "ust
7200: 61 72 22 2c 20 20 20 20 20 20 35 2c 20 22 61 70  ar",      5, "ap
7210: 70 6c 69 63 61 74 69 6f 6e 2f 78 2d 75 73 74 61  plication/x-usta
7220: 72 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20  r"              
7230: 20 7d 2c 0a 20 20 20 20 7b 20 22 76 63 64 22 2c   },.    { "vcd",
7240: 20 20 20 20 20 20 20 20 33 2c 20 22 61 70 70 6c          3, "appl
7250: 69 63 61 74 69 6f 6e 2f 78 2d 63 64 6c 69 6e 6b  ication/x-cdlink
7260: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7d  "              }
7270: 2c 0a 20 20 20 20 7b 20 22 76 64 61 22 2c 20 20  ,.    { "vda",  
7280: 20 20 20 20 20 20 33 2c 20 22 61 70 70 6c 69 63        3, "applic
7290: 61 74 69 6f 6e 2f 76 64 61 22 20 20 20 20 20 20  ation/vda"      
72a0: 20 20 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a               },.
72b0: 20 20 20 20 7b 20 22 76 69 76 22 2c 20 20 20 20      { "viv",    
72c0: 20 20 20 20 33 2c 20 22 76 69 64 65 6f 2f 76 6e      3, "video/vn
72d0: 64 2e 76 69 76 6f 22 20 20 20 20 20 20 20 20 20  d.vivo"         
72e0: 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20             },.  
72f0: 20 20 7b 20 22 76 69 76 6f 22 2c 20 20 20 20 20    { "vivo",     
7300: 20 20 34 2c 20 22 76 69 64 65 6f 2f 76 6e 64 2e    4, "video/vnd.
7310: 76 69 76 6f 22 20 20 20 20 20 20 20 20 20 20 20  vivo"           
7320: 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20           },.    
7330: 7b 20 22 76 72 6d 6c 22 2c 20 20 20 20 20 20 20  { "vrml",       
7340: 34 2c 20 22 6d 6f 64 65 6c 2f 76 72 6d 6c 22 20  4, "model/vrml" 
7350: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
7360: 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20         },.    { 
7370: 22 77 61 76 22 2c 20 20 20 20 20 20 20 20 33 2c  "wav",        3,
7380: 20 22 61 75 64 69 6f 2f 78 2d 77 61 76 22 20 20   "audio/x-wav"  
7390: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
73a0: 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 77       },.    { "w
73b0: 61 78 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22  ax",        3, "
73c0: 61 75 64 69 6f 2f 78 2d 6d 73 2d 77 61 78 22 20  audio/x-ms-wax" 
73d0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
73e0: 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 77 69 6b     },.    { "wik
73f0: 69 22 2c 20 20 20 20 20 20 20 34 2c 20 22 61 70  i",       4, "ap
7400: 70 6c 69 63 61 74 69 6f 6e 2f 78 2d 66 6f 73 73  plication/x-foss
7410: 69 6c 2d 77 69 6b 69 22 20 20 20 20 20 20 20 20  il-wiki"        
7420: 20 7d 2c 0a 20 20 20 20 7b 20 22 77 6d 61 22 2c   },.    { "wma",
7430: 20 20 20 20 20 20 20 20 33 2c 20 22 61 75 64 69          3, "audi
7440: 6f 2f 78 2d 6d 73 2d 77 6d 61 22 20 20 20 20 20  o/x-ms-wma"     
7450: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 7d                 }
7460: 2c 0a 20 20 20 20 7b 20 22 77 6d 76 22 2c 20 20  ,.    { "wmv",  
7470: 20 20 20 20 20 20 33 2c 20 22 76 69 64 65 6f 2f        3, "video/
7480: 78 2d 6d 73 2d 77 6d 76 22 20 20 20 20 20 20 20  x-ms-wmv"       
7490: 20 20 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a               },.
74a0: 20 20 20 20 7b 20 22 77 6d 78 22 2c 20 20 20 20      { "wmx",    
74b0: 20 20 20 20 33 2c 20 22 76 69 64 65 6f 2f 78 2d      3, "video/x-
74c0: 6d 73 2d 77 6d 78 22 20 20 20 20 20 20 20 20 20  ms-wmx"         
74d0: 20 20 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20             },.  
74e0: 20 20 7b 20 22 77 72 6c 22 2c 20 20 20 20 20 20    { "wrl",      
74f0: 20 20 33 2c 20 22 6d 6f 64 65 6c 2f 76 72 6d 6c    3, "model/vrml
7500: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  "               
7510: 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20           },.    
7520: 7b 20 22 77 76 78 22 2c 20 20 20 20 20 20 20 20  { "wvx",        
7530: 33 2c 20 22 76 69 64 65 6f 2f 78 2d 6d 73 2d 77  3, "video/x-ms-w
7540: 76 78 22 20 20 20 20 20 20 20 20 20 20 20 20 20  vx"             
7550: 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20         },.    { 
7560: 22 78 62 6d 22 2c 20 20 20 20 20 20 20 20 33 2c  "xbm",        3,
7570: 20 22 69 6d 61 67 65 2f 78 2d 78 62 69 74 6d 61   "image/x-xbitma
7580: 70 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20  p"              
7590: 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 78       },.    { "x
75a0: 6c 63 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22  lc",        3, "
75b0: 61 70 70 6c 69 63 61 74 69 6f 6e 2f 76 6e 64 2e  application/vnd.
75c0: 6d 73 2d 65 78 63 65 6c 22 20 20 20 20 20 20 20  ms-excel"       
75d0: 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 78 6c 6c     },.    { "xll
75e0: 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22 61 70  ",        3, "ap
75f0: 70 6c 69 63 61 74 69 6f 6e 2f 76 6e 64 2e 6d 73  plication/vnd.ms
7600: 2d 65 78 63 65 6c 22 20 20 20 20 20 20 20 20 20  -excel"         
7610: 20 7d 2c 0a 20 20 20 20 7b 20 22 78 6c 6d 22 2c   },.    { "xlm",
7620: 20 20 20 20 20 20 20 20 33 2c 20 22 61 70 70 6c          3, "appl
7630: 69 63 61 74 69 6f 6e 2f 76 6e 64 2e 6d 73 2d 65  ication/vnd.ms-e
7640: 78 63 65 6c 22 20 20 20 20 20 20 20 20 20 20 7d  xcel"          }
7650: 2c 0a 20 20 20 20 7b 20 22 78 6c 73 22 2c 20 20  ,.    { "xls",  
7660: 20 20 20 20 20 20 33 2c 20 22 61 70 70 6c 69 63        3, "applic
7670: 61 74 69 6f 6e 2f 76 6e 64 2e 6d 73 2d 65 78 63  ation/vnd.ms-exc
7680: 65 6c 22 20 20 20 20 20 20 20 20 20 20 7d 2c 0a  el"          },.
7690: 20 20 20 20 7b 20 22 78 6c 77 22 2c 20 20 20 20      { "xlw",    
76a0: 20 20 20 20 33 2c 20 22 61 70 70 6c 69 63 61 74      3, "applicat
76b0: 69 6f 6e 2f 76 6e 64 2e 6d 73 2d 65 78 63 65 6c  ion/vnd.ms-excel
76c0: 22 20 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20  "          },.  
76d0: 20 20 7b 20 22 78 6d 6c 22 2c 20 20 20 20 20 20    { "xml",      
76e0: 20 20 33 2c 20 22 74 65 78 74 2f 78 6d 6c 22 20    3, "text/xml" 
76f0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
7700: 20 20 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20           },.    
7710: 7b 20 22 78 70 6d 22 2c 20 20 20 20 20 20 20 20  { "xpm",        
7720: 33 2c 20 22 69 6d 61 67 65 2f 78 2d 78 70 69 78  3, "image/x-xpix
7730: 6d 61 70 22 20 20 20 20 20 20 20 20 20 20 20 20  map"            
7740: 20 20 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20         },.    { 
7750: 22 78 77 64 22 2c 20 20 20 20 20 20 20 20 33 2c  "xwd",        3,
7760: 20 22 69 6d 61 67 65 2f 78 2d 78 77 69 6e 64 6f   "image/x-xwindo
7770: 77 64 75 6d 70 22 20 20 20 20 20 20 20 20 20 20  wdump"          
7780: 20 20 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 78       },.    { "x
7790: 79 7a 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22  yz",        3, "
77a0: 63 68 65 6d 69 63 61 6c 2f 78 2d 70 64 62 22 20  chemical/x-pdb" 
77b0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
77c0: 20 20 20 7d 2c 0a 20 20 20 20 7b 20 22 7a 69 70     },.    { "zip
77d0: 22 2c 20 20 20 20 20 20 20 20 33 2c 20 22 61 70  ",        3, "ap
77e0: 70 6c 69 63 61 74 69 6f 6e 2f 7a 69 70 22 20 20  plication/zip"  
77f0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
7800: 20 7d 2c 0a 20 20 7d 3b 0a 0a 20 20 66 6f 72 28   },.  };..  for(
7810: 69 3d 6e 4e 61 6d 65 2d 31 3b 20 69 3e 30 20 26  i=nName-1; i>0 &
7820: 26 20 7a 4e 61 6d 65 5b 69 5d 21 3d 27 2e 27 3b  & zName[i]!='.';
7830: 20 69 2d 2d 29 7b 7d 0a 20 20 7a 20 3d 20 26 7a   i--){}.  z = &z
7840: 4e 61 6d 65 5b 69 2b 31 5d 3b 0a 20 20 6c 65 6e  Name[i+1];.  len
7850: 20 3d 20 6e 4e 61 6d 65 20 2d 20 69 3b 0a 20 20   = nName - i;.  
7860: 69 66 28 20 6c 65 6e 3c 28 69 6e 74 29 73 69 7a  if( len<(int)siz
7870: 65 6f 66 28 7a 53 75 66 66 69 78 29 2d 31 20 29  eof(zSuffix)-1 )
7880: 7b 0a 20 20 20 20 73 74 72 63 70 79 28 7a 53 75  {.    strcpy(zSu
7890: 66 66 69 78 2c 20 7a 29 3b 0a 20 20 20 20 66 6f  ffix, z);.    fo
78a0: 72 28 69 3d 30 3b 20 7a 53 75 66 66 69 78 5b 69  r(i=0; zSuffix[i
78b0: 5d 3b 20 69 2b 2b 29 20 7a 53 75 66 66 69 78 5b  ]; i++) zSuffix[
78c0: 69 5d 20 3d 20 74 6f 6c 6f 77 65 72 28 7a 53 75  i] = tolower(zSu
78d0: 66 66 69 78 5b 69 5d 29 3b 0a 20 20 20 20 66 69  ffix[i]);.    fi
78e0: 72 73 74 20 3d 20 30 3b 0a 20 20 20 20 6c 61 73  rst = 0;.    las
78f0: 74 20 3d 20 73 69 7a 65 6f 66 28 61 4d 69 6d 65  t = sizeof(aMime
7900: 29 2f 73 69 7a 65 6f 66 28 61 4d 69 6d 65 5b 30  )/sizeof(aMime[0
7910: 5d 29 3b 0a 20 20 20 20 77 68 69 6c 65 28 20 66  ]);.    while( f
7920: 69 72 73 74 3c 3d 6c 61 73 74 20 29 7b 0a 20 20  irst<=last ){.  
7930: 20 20 20 20 69 6e 74 20 63 3b 0a 20 20 20 20 20      int c;.     
7940: 20 69 20 3d 20 28 66 69 72 73 74 2b 6c 61 73 74   i = (first+last
7950: 29 2f 32 3b 0a 20 20 20 20 20 20 63 20 3d 20 73  )/2;.      c = s
7960: 74 72 63 6d 70 28 7a 53 75 66 66 69 78 2c 20 61  trcmp(zSuffix, a
7970: 4d 69 6d 65 5b 69 5d 2e 7a 53 75 66 66 69 78 29  Mime[i].zSuffix)
7980: 3b 0a 20 20 20 20 20 20 69 66 28 20 63 3d 3d 30  ;.      if( c==0
7990: 20 29 20 72 65 74 75 72 6e 20 61 4d 69 6d 65 5b   ) return aMime[
79a0: 69 5d 2e 7a 4d 69 6d 65 74 79 70 65 3b 0a 20 20  i].zMimetype;.  
79b0: 20 20 20 20 69 66 28 20 63 3c 30 20 29 7b 0a 20      if( c<0 ){. 
79c0: 20 20 20 20 20 20 20 6c 61 73 74 20 3d 20 69 2d         last = i-
79d0: 31 3b 0a 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a  1;.      }else{.
79e0: 20 20 20 20 20 20 20 20 66 69 72 73 74 20 3d 20          first = 
79f0: 69 2b 31 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20  i+1;.      }.   
7a00: 20 7d 0a 20 20 7d 0a 20 20 72 65 74 75 72 6e 20   }.  }.  return 
7a10: 22 61 70 70 6c 69 63 61 74 69 6f 6e 2f 6f 63 74  "application/oct
7a20: 65 74 2d 73 74 72 65 61 6d 22 3b 0a 7d 0a 0a 2f  et-stream";.}../
7a30: 2a 0a 2a 2a 20 54 68 65 20 66 6f 6c 6c 6f 77 69  *.** The followi
7a40: 6e 67 20 74 61 62 6c 65 20 63 6f 6e 74 61 69 6e  ng table contain
7a50: 73 20 31 20 66 6f 72 20 61 6c 6c 20 63 68 61 72  s 1 for all char
7a60: 61 63 74 65 72 73 20 74 68 61 74 20 61 72 65 20  acters that are 
7a70: 70 65 72 6d 69 74 74 65 64 20 69 6e 0a 2a 2a 20  permitted in.** 
7a80: 74 68 65 20 70 61 72 74 20 6f 66 20 74 68 65 20  the part of the 
7a90: 55 52 4c 20 62 65 66 6f 72 65 20 74 68 65 20 71  URL before the q
7aa0: 75 65 72 79 20 70 61 72 61 6d 65 74 65 72 73 20  uery parameters 
7ab0: 61 6e 64 20 66 72 61 67 6d 65 6e 74 2e 0a 2a 2a  and fragment..**
7ac0: 0a 2a 2a 20 41 6c 6c 6f 77 65 64 20 63 68 61 72  .** Allowed char
7ad0: 61 63 74 65 72 73 3a 20 20 30 2d 39 20 61 2d 7a  acters:  0-9 a-z
7ae0: 20 41 2d 5a 20 2c 2d 2e 2f 3a 5f 7e 0a 2a 2a 0a   A-Z ,-./:_~.**.
7af0: 2a 2a 20 44 69 73 61 6c 6c 6f 77 65 64 20 63 68  ** Disallowed ch
7b00: 61 72 61 63 74 65 72 73 20 69 6e 63 6c 75 64 65  aracters include
7b10: 3a 20 20 21 22 23 24 25 26 27 28 29 2a 2b 3b 3c  :  !"#$%&'()*+;<
7b20: 3d 3e 3f 5b 5c 5d 5e 7b 7c 7d 0a 2a 2f 0a 73 74  =>?[\]^{|}.*/.st
7b30: 61 74 69 63 20 63 6f 6e 73 74 20 63 68 61 72 20  atic const char 
7b40: 61 6c 6c 6f 77 65 64 49 6e 4e 61 6d 65 5b 5d 20  allowedInName[] 
7b50: 3d 20 7b 0a 20 20 20 20 20 20 2f 2a 20 20 78 30  = {.      /*  x0
7b60: 20 20 78 31 20 20 78 32 20 20 78 33 20 20 78 34    x1  x2  x3  x4
7b70: 20 20 78 35 20 20 78 36 20 20 78 37 20 20 78 38    x5  x6  x7  x8
7b80: 20 20 78 39 20 20 78 61 20 20 78 62 20 20 78 63    x9  xa  xb  xc
7b90: 20 20 78 64 20 20 78 65 20 20 78 66 20 2a 2f 0a    xd  xe  xf */.
7ba0: 2f 2a 20 30 78 20 2a 2f 20 20 20 30 2c 20 20 30  /* 0x */   0,  0
7bb0: 2c 20 20 30 2c 20 20 30 2c 20 20 30 2c 20 20 30  ,  0,  0,  0,  0
7bc0: 2c 20 20 30 2c 20 20 30 2c 20 20 30 2c 20 20 30  ,  0,  0,  0,  0
7bd0: 2c 20 20 30 2c 20 20 30 2c 20 20 30 2c 20 20 30  ,  0,  0,  0,  0
7be0: 2c 20 20 30 2c 20 20 30 2c 0a 2f 2a 20 31 78 20  ,  0,  0,./* 1x 
7bf0: 2a 2f 20 20 20 30 2c 20 20 30 2c 20 20 30 2c 20  */   0,  0,  0, 
7c00: 20 30 2c 20 20 30 2c 20 20 30 2c 20 20 30 2c 20   0,  0,  0,  0, 
7c10: 20 30 2c 20 20 30 2c 20 20 30 2c 20 20 30 2c 20   0,  0,  0,  0, 
7c20: 20 30 2c 20 20 30 2c 20 20 30 2c 20 20 30 2c 20   0,  0,  0,  0, 
7c30: 20 30 2c 0a 2f 2a 20 32 78 20 2a 2f 20 20 20 30   0,./* 2x */   0
7c40: 2c 20 20 30 2c 20 20 30 2c 20 20 30 2c 20 20 30  ,  0,  0,  0,  0
7c50: 2c 20 20 30 2c 20 20 30 2c 20 20 30 2c 20 20 30  ,  0,  0,  0,  0
7c60: 2c 20 20 30 2c 20 20 30 2c 20 20 30 2c 20 20 31  ,  0,  0,  0,  1
7c70: 2c 20 20 31 2c 20 20 31 2c 20 20 31 2c 0a 2f 2a  ,  1,  1,  1,./*
7c80: 20 33 78 20 2a 2f 20 20 20 31 2c 20 20 31 2c 20   3x */   1,  1, 
7c90: 20 31 2c 20 20 31 2c 20 20 31 2c 20 20 31 2c 20   1,  1,  1,  1, 
7ca0: 20 31 2c 20 20 31 2c 20 20 31 2c 20 20 31 2c 20   1,  1,  1,  1, 
7cb0: 20 31 2c 20 20 30 2c 20 20 30 2c 20 20 30 2c 20   1,  0,  0,  0, 
7cc0: 20 30 2c 20 20 30 2c 0a 2f 2a 20 34 78 20 2a 2f   0,  0,./* 4x */
7cd0: 20 20 20 30 2c 20 20 31 2c 20 20 31 2c 20 20 31     0,  1,  1,  1
7ce0: 2c 20 20 31 2c 20 20 31 2c 20 20 31 2c 20 20 31  ,  1,  1,  1,  1
7cf0: 2c 20 20 31 2c 20 20 31 2c 20 20 31 2c 20 20 31  ,  1,  1,  1,  1
7d00: 2c 20 20 31 2c 20 20 31 2c 20 20 31 2c 20 20 31  ,  1,  1,  1,  1
7d10: 2c 0a 2f 2a 20 35 78 20 2a 2f 20 20 20 31 2c 20  ,./* 5x */   1, 
7d20: 20 31 2c 20 20 31 2c 20 20 31 2c 20 20 31 2c 20   1,  1,  1,  1, 
7d30: 20 31 2c 20 20 31 2c 20 20 31 2c 20 20 31 2c 20   1,  1,  1,  1, 
7d40: 20 31 2c 20 20 31 2c 20 20 30 2c 20 20 30 2c 20   1,  1,  0,  0, 
7d50: 20 30 2c 20 20 30 2c 20 20 31 2c 0a 2f 2a 20 36   0,  0,  1,./* 6
7d60: 78 20 2a 2f 20 20 20 30 2c 20 20 31 2c 20 20 31  x */   0,  1,  1
7d70: 2c 20 20 31 2c 20 20 31 2c 20 20 31 2c 20 20 31  ,  1,  1,  1,  1
7d80: 2c 20 20 31 2c 20 20 31 2c 20 20 31 2c 20 20 31  ,  1,  1,  1,  1
7d90: 2c 20 20 31 2c 20 20 31 2c 20 20 31 2c 20 20 31  ,  1,  1,  1,  1
7da0: 2c 20 20 31 2c 0a 2f 2a 20 37 78 20 2a 2f 20 20  ,  1,./* 7x */  
7db0: 20 31 2c 20 20 31 2c 20 20 31 2c 20 20 31 2c 20   1,  1,  1,  1, 
7dc0: 20 31 2c 20 20 31 2c 20 20 31 2c 20 20 31 2c 20   1,  1,  1,  1, 
7dd0: 20 31 2c 20 20 31 2c 20 20 31 2c 20 20 30 2c 20   1,  1,  1,  0, 
7de0: 20 30 2c 20 20 30 2c 20 20 31 2c 20 20 30 2c 0a   0,  0,  1,  0,.
7df0: 7d 3b 0a 0a 2f 2a 0a 2a 2a 20 54 68 69 73 20 72  };../*.** This r
7e00: 6f 75 74 69 6e 65 20 70 72 6f 63 65 73 73 65 73  outine processes
7e10: 20 61 20 73 69 6e 67 6c 65 20 48 54 54 50 20 72   a single HTTP r
7e20: 65 71 75 65 73 74 20 6f 6e 20 73 74 61 6e 64 61  equest on standa
7e30: 72 64 20 69 6e 70 75 74 20 61 6e 64 0a 2a 2a 20  rd input and.** 
7e40: 73 65 6e 64 73 20 74 68 65 20 72 65 70 6c 79 20  sends the reply 
7e50: 74 6f 20 73 74 61 6e 64 61 72 64 20 6f 75 74 70  to standard outp
7e60: 75 74 2e 20 20 49 66 20 74 68 65 20 61 72 67 75  ut.  If the argu
7e70: 6d 65 6e 74 20 69 73 20 31 20 69 74 20 6d 65 61  ment is 1 it mea
7e80: 6e 73 0a 2a 2a 20 74 68 61 74 20 77 65 20 61 72  ns.** that we ar
7e90: 65 20 73 68 6f 75 6c 64 20 63 6c 6f 73 65 20 74  e should close t
7ea0: 68 65 20 73 6f 63 6b 65 74 20 77 69 74 68 6f 75  he socket withou
7eb0: 74 20 70 72 6f 63 65 73 73 69 6e 67 20 61 64 64  t processing add
7ec0: 69 74 69 6f 6e 61 6c 0a 2a 2a 20 48 54 54 50 20  itional.** HTTP 
7ed0: 72 65 71 75 65 73 74 73 20 61 66 74 65 72 20 74  requests after t
7ee0: 68 65 20 63 75 72 72 65 6e 74 20 72 65 71 75 65  he current reque
7ef0: 73 74 20 66 69 6e 69 73 68 65 73 2e 20 20 30 20  st finishes.  0 
7f00: 6d 65 61 6e 73 20 77 65 20 61 72 65 0a 2a 2a 20  means we are.** 
7f10: 61 6c 6c 6f 77 65 64 20 74 6f 20 6b 65 65 70 20  allowed to keep 
7f20: 74 68 65 20 63 6f 6e 6e 65 63 74 69 6f 6e 20 6f  the connection o
7f30: 70 65 6e 20 61 6e 64 20 74 6f 20 70 72 6f 63 65  pen and to proce
7f40: 73 73 20 61 64 64 69 74 69 6f 6e 61 6c 20 72 65  ss additional re
7f50: 71 75 65 73 74 73 2e 0a 2a 2a 20 54 68 69 73 20  quests..** This 
7f60: 72 6f 75 74 69 6e 65 20 6d 61 79 20 63 68 6f 6f  routine may choo
7f70: 73 65 20 74 6f 20 63 6c 6f 73 65 20 74 68 65 20  se to close the 
7f80: 63 6f 6e 6e 65 63 74 69 6f 6e 20 65 76 65 6e 20  connection even 
7f90: 69 66 20 74 68 65 20 61 72 67 75 6d 65 6e 74 0a  if the argument.
7fa0: 2a 2a 20 69 73 20 30 2e 0a 2a 2a 20 0a 2a 2a 20  ** is 0..** .** 
7fb0: 49 66 20 74 68 65 20 63 6f 6e 6e 65 63 74 69 6f  If the connectio
7fc0: 6e 20 73 68 6f 75 6c 64 20 62 65 20 63 6c 6f 73  n should be clos
7fd0: 65 64 2c 20 74 68 69 73 20 72 6f 75 74 69 6e 65  ed, this routine
7fe0: 20 63 61 6c 6c 73 20 65 78 69 74 28 29 20 61 6e   calls exit() an
7ff0: 64 0a 2a 2a 20 74 68 75 73 20 6e 65 76 65 72 20  d.** thus never 
8000: 72 65 74 75 72 6e 73 2e 20 20 49 66 20 74 68 69  returns.  If thi
8010: 73 20 72 6f 75 74 69 6e 65 20 64 6f 65 73 20 72  s routine does r
8020: 65 74 75 72 6e 20 69 74 20 6d 65 61 6e 73 20 74  eturn it means t
8030: 68 61 74 20 61 6e 6f 74 68 65 72 0a 2a 2a 20 48  hat another.** H
8040: 54 54 50 20 72 65 71 75 65 73 74 20 6d 61 79 20  TTP request may 
8050: 61 70 70 65 61 72 20 6f 6e 20 74 68 65 20 77 69  appear on the wi
8060: 72 65 2e 0a 2a 2f 0a 76 6f 69 64 20 50 72 6f 63  re..*/.void Proc
8070: 65 73 73 4f 6e 65 52 65 71 75 65 73 74 28 69 6e  essOneRequest(in
8080: 74 20 66 6f 72 63 65 43 6c 6f 73 65 29 7b 0a 20  t forceClose){. 
8090: 20 69 6e 74 20 69 2c 20 63 3b 0a 20 20 63 68 61   int i, c;.  cha
80a0: 72 20 2a 7a 3b 20 20 20 20 20 20 20 20 20 20 20  r *z;           
80b0: 20 20 20 20 20 20 20 2f 2a 20 55 73 65 64 20 74         /* Used t
80c0: 6f 20 70 61 72 73 65 20 75 70 20 61 20 73 74 72  o parse up a str
80d0: 69 6e 67 20 2a 2f 0a 20 20 73 74 72 75 63 74 20  ing */.  struct 
80e0: 73 74 61 74 20 73 74 61 74 62 75 66 3b 20 20 20  stat statbuf;   
80f0: 20 20 20 2f 2a 20 49 6e 66 6f 72 6d 61 74 69 6f     /* Informatio
8100: 6e 20 61 62 6f 75 74 20 74 68 65 20 66 69 6c 65  n about the file
8110: 20 74 6f 20 62 65 20 72 65 74 72 69 65 76 65 64   to be retrieved
8120: 20 2a 2f 0a 20 20 46 49 4c 45 20 2a 69 6e 3b 20   */.  FILE *in; 
8130: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
8140: 2f 2a 20 46 6f 72 20 72 65 61 64 69 6e 67 20 66  /* For reading f
8150: 72 6f 6d 20 43 47 49 20 73 63 72 69 70 74 73 20  rom CGI scripts 
8160: 2a 2f 0a 20 20 63 68 61 72 20 7a 4c 69 6e 65 5b  */.  char zLine[
8170: 31 30 30 30 5d 3b 20 20 20 20 20 20 20 20 20 2f  1000];         /
8180: 2a 20 41 20 62 75 66 66 65 72 20 66 6f 72 20 69  * A buffer for i
8190: 6e 70 75 74 20 6c 69 6e 65 73 20 6f 72 20 66 6f  nput lines or fo
81a0: 72 6d 69 6e 67 20 6e 61 6d 65 73 20 2a 2f 0a 0a  rming names */..
81b0: 20 20 2f 2a 20 43 68 61 6e 67 65 20 64 69 72 65    /* Change dire
81c0: 63 74 6f 72 69 65 73 20 74 6f 20 74 68 65 20 72  ctories to the r
81d0: 6f 6f 74 20 6f 66 20 74 68 65 20 48 54 54 50 20  oot of the HTTP 
81e0: 66 69 6c 65 73 79 73 74 65 6d 0a 20 20 2a 2f 0a  filesystem.  */.
81f0: 20 20 69 66 28 20 63 68 64 69 72 28 7a 52 6f 6f    if( chdir(zRoo
8200: 74 5b 30 5d 20 3f 20 7a 52 6f 6f 74 20 3a 20 22  t[0] ? zRoot : "
8210: 2f 22 29 21 3d 30 20 29 7b 0a 20 20 20 20 63 68  /")!=0 ){.    ch
8220: 61 72 20 7a 42 75 66 5b 31 30 30 30 5d 3b 0a 20  ar zBuf[1000];. 
8230: 20 20 20 4d 61 6c 66 75 6e 63 74 69 6f 6e 28 5f     Malfunction(_
8240: 5f 4c 49 4e 45 5f 5f 2c 20 22 63 61 6e 6e 6f 74  _LINE__, "cannot
8250: 20 63 68 64 69 72 20 74 6f 20 5b 25 73 5d 20 66   chdir to [%s] f
8260: 72 6f 6d 20 5b 25 73 5d 22 2c 0a 20 20 20 20 20  rom [%s]",.     
8270: 20 20 20 20 7a 52 6f 6f 74 2c 20 67 65 74 63 77      zRoot, getcw
8280: 64 28 7a 42 75 66 2c 39 39 39 29 29 3b 0a 20 20  d(zBuf,999));.  
8290: 7d 0a 20 20 6e 52 65 71 75 65 73 74 2b 2b 3b 0a  }.  nRequest++;.
82a0: 0a 20 20 2f 2a 0a 20 20 2a 2a 20 57 65 20 6d 75  .  /*.  ** We mu
82b0: 73 74 20 72 65 63 65 69 76 65 20 61 20 63 6f 6d  st receive a com
82c0: 70 6c 65 74 65 20 68 65 61 64 65 72 20 77 69 74  plete header wit
82d0: 68 69 6e 20 31 35 20 73 65 63 6f 6e 64 73 0a 20  hin 15 seconds. 
82e0: 20 2a 2f 0a 20 20 73 69 67 6e 61 6c 28 53 49 47   */.  signal(SIG
82f0: 41 4c 52 4d 2c 20 54 69 6d 65 6f 75 74 29 3b 0a  ALRM, Timeout);.
8300: 20 20 69 66 28 20 75 73 65 54 69 6d 65 6f 75 74    if( useTimeout
8310: 20 29 20 61 6c 61 72 6d 28 31 35 29 3b 0a 0a 20   ) alarm(15);.. 
8320: 20 2f 2a 20 47 65 74 20 74 68 65 20 66 69 72 73   /* Get the firs
8330: 74 20 6c 69 6e 65 20 6f 66 20 74 68 65 20 72 65  t line of the re
8340: 71 75 65 73 74 20 61 6e 64 20 70 61 72 73 65 20  quest and parse 
8350: 6f 75 74 20 74 68 65 0a 20 20 2a 2a 20 6d 65 74  out the.  ** met
8360: 68 6f 64 2c 20 74 68 65 20 73 63 72 69 70 74 20  hod, the script 
8370: 61 6e 64 20 74 68 65 20 70 72 6f 74 6f 63 6f 6c  and the protocol
8380: 2e 0a 20 20 2a 2f 0a 20 20 69 66 28 20 66 67 65  ..  */.  if( fge
8390: 74 73 28 7a 4c 69 6e 65 2c 73 69 7a 65 6f 66 28  ts(zLine,sizeof(
83a0: 7a 4c 69 6e 65 29 2c 73 74 64 69 6e 29 3d 3d 30  zLine),stdin)==0
83b0: 20 29 7b 0a 20 20 20 20 65 78 69 74 28 30 29 3b   ){.    exit(0);
83c0: 0a 20 20 7d 0a 20 20 6f 6d 69 74 4c 6f 67 20 3d  .  }.  omitLog =
83d0: 20 30 3b 0a 20 20 6e 49 6e 20 2b 3d 20 73 74 72   0;.  nIn += str
83e0: 6c 65 6e 28 7a 4c 69 6e 65 29 3b 0a 20 20 7a 4d  len(zLine);.  zM
83f0: 65 74 68 6f 64 20 3d 20 53 74 72 44 75 70 28 47  ethod = StrDup(G
8400: 65 74 46 69 72 73 74 45 6c 65 6d 65 6e 74 28 7a  etFirstElement(z
8410: 4c 69 6e 65 2c 26 7a 29 29 3b 0a 20 20 7a 52 65  Line,&z));.  zRe
8420: 61 6c 53 63 72 69 70 74 20 3d 20 7a 53 63 72 69  alScript = zScri
8430: 70 74 20 3d 20 53 74 72 44 75 70 28 47 65 74 46  pt = StrDup(GetF
8440: 69 72 73 74 45 6c 65 6d 65 6e 74 28 7a 2c 26 7a  irstElement(z,&z
8450: 29 29 3b 0a 20 20 7a 50 72 6f 74 6f 63 6f 6c 20  ));.  zProtocol 
8460: 3d 20 53 74 72 44 75 70 28 47 65 74 46 69 72 73  = StrDup(GetFirs
8470: 74 45 6c 65 6d 65 6e 74 28 7a 2c 26 7a 29 29 3b  tElement(z,&z));
8480: 0a 20 20 69 66 28 20 7a 50 72 6f 74 6f 63 6f 6c  .  if( zProtocol
8490: 3d 3d 30 20 7c 7c 20 73 74 72 6e 63 6d 70 28 7a  ==0 || strncmp(z
84a0: 50 72 6f 74 6f 63 6f 6c 2c 22 48 54 54 50 2f 22  Protocol,"HTTP/"
84b0: 2c 35 29 21 3d 30 20 7c 7c 20 73 74 72 6c 65 6e  ,5)!=0 || strlen
84c0: 28 7a 50 72 6f 74 6f 63 6f 6c 29 21 3d 38 20 29  (zProtocol)!=8 )
84d0: 7b 0a 20 20 20 20 53 74 61 72 74 52 65 73 70 6f  {.    StartRespo
84e0: 6e 73 65 28 22 34 30 30 20 42 61 64 20 52 65 71  nse("400 Bad Req
84f0: 75 65 73 74 22 29 3b 0a 20 20 20 20 6e 4f 75 74  uest");.    nOut
8500: 20 2b 3d 20 70 72 69 6e 74 66 28 0a 20 20 20 20   += printf(.    
8510: 20 20 22 43 6f 6e 74 65 6e 74 2d 74 79 70 65 3a    "Content-type:
8520: 20 74 65 78 74 2f 70 6c 61 69 6e 5c 72 5c 6e 22   text/plain\r\n"
8530: 0a 20 20 20 20 20 20 22 5c 72 5c 6e 22 0a 20 20  .      "\r\n".  
8540: 20 20 20 20 22 54 68 69 73 20 73 65 72 76 65 72      "This server
8550: 20 64 6f 65 73 20 6e 6f 74 20 75 6e 64 65 72 73   does not unders
8560: 74 61 6e 64 20 74 68 65 20 72 65 71 75 65 73 74  tand the request
8570: 65 64 20 70 72 6f 74 6f 63 6f 6c 5c 6e 22 0a 20  ed protocol\n". 
8580: 20 20 20 29 3b 0a 20 20 20 20 4d 61 6b 65 4c 6f     );.    MakeLo
8590: 67 45 6e 74 72 79 28 30 29 3b 0a 20 20 20 20 65  gEntry(0);.    e
85a0: 78 69 74 28 30 29 3b 0a 20 20 7d 0a 20 20 69 66  xit(0);.  }.  if
85b0: 28 20 7a 53 63 72 69 70 74 5b 30 5d 3d 3d 30 20  ( zScript[0]==0 
85c0: 29 20 4e 6f 74 46 6f 75 6e 64 28 5f 5f 4c 49 4e  ) NotFound(__LIN
85d0: 45 5f 5f 29 3b 0a 20 20 69 66 28 20 66 6f 72 63  E__);.  if( forc
85e0: 65 43 6c 6f 73 65 20 29 7b 0a 20 20 20 20 63 6c  eClose ){.    cl
85f0: 6f 73 65 43 6f 6e 6e 65 63 74 69 6f 6e 20 3d 20  oseConnection = 
8600: 31 3b 0a 20 20 7d 65 6c 73 65 20 69 66 28 20 7a  1;.  }else if( z
8610: 50 72 6f 74 6f 63 6f 6c 5b 35 5d 3c 27 31 27 20  Protocol[5]<'1' 
8620: 7c 7c 20 7a 50 72 6f 74 6f 63 6f 6c 5b 37 5d 3c  || zProtocol[7]<
8630: 27 31 27 20 29 7b 0a 20 20 20 20 63 6c 6f 73 65  '1' ){.    close
8640: 43 6f 6e 6e 65 63 74 69 6f 6e 20 3d 20 31 3b 0a  Connection = 1;.
8650: 20 20 7d 0a 0a 20 20 2f 2a 20 54 68 69 73 20 76    }..  /* This v
8660: 65 72 79 20 73 69 6d 70 6c 65 20 73 65 72 76 65  ery simple serve
8670: 72 20 6f 6e 6c 79 20 75 6e 64 65 72 73 74 61 6e  r only understan
8680: 64 73 20 74 68 65 20 47 45 54 2c 20 50 4f 53 54  ds the GET, POST
8690: 0a 20 20 2a 2a 20 61 6e 64 20 48 45 41 44 20 6d  .  ** and HEAD m
86a0: 65 74 68 6f 64 73 0a 20 20 2a 2f 0a 20 20 69 66  ethods.  */.  if
86b0: 28 20 73 74 72 63 6d 70 28 7a 4d 65 74 68 6f 64  ( strcmp(zMethod
86c0: 2c 22 47 45 54 22 29 21 3d 30 20 26 26 20 73 74  ,"GET")!=0 && st
86d0: 72 63 6d 70 28 7a 4d 65 74 68 6f 64 2c 22 50 4f  rcmp(zMethod,"PO
86e0: 53 54 22 29 21 3d 30 0a 20 20 20 20 20 20 20 26  ST")!=0.       &
86f0: 26 20 73 74 72 63 6d 70 28 7a 4d 65 74 68 6f 64  & strcmp(zMethod
8700: 2c 22 48 45 41 44 22 29 21 3d 30 20 29 7b 0a 20  ,"HEAD")!=0 ){. 
8710: 20 20 20 53 74 61 72 74 52 65 73 70 6f 6e 73 65     StartResponse
8720: 28 22 35 30 31 20 4e 6f 74 20 49 6d 70 6c 65 6d  ("501 Not Implem
8730: 65 6e 74 65 64 22 29 3b 0a 20 20 20 20 6e 4f 75  ented");.    nOu
8740: 74 20 2b 3d 20 70 72 69 6e 74 66 28 0a 20 20 20  t += printf(.   
8750: 20 20 20 22 43 6f 6e 74 65 6e 74 2d 74 79 70 65     "Content-type
8760: 3a 20 74 65 78 74 2f 70 6c 61 69 6e 5c 72 5c 6e  : text/plain\r\n
8770: 22 0a 20 20 20 20 20 20 22 5c 72 5c 6e 22 0a 20  ".      "\r\n". 
8780: 20 20 20 20 20 22 54 68 65 20 25 73 20 6d 65 74       "The %s met
8790: 68 6f 64 20 69 73 20 6e 6f 74 20 69 6d 70 6c 65  hod is not imple
87a0: 6d 65 6e 74 65 64 20 6f 6e 20 74 68 69 73 20 73  mented on this s
87b0: 65 72 76 65 72 2e 5c 6e 22 2c 0a 20 20 20 20 20  erver.\n",.     
87c0: 20 7a 4d 65 74 68 6f 64 29 3b 0a 20 20 20 20 4d   zMethod);.    M
87d0: 61 6b 65 4c 6f 67 45 6e 74 72 79 28 30 29 3b 0a  akeLogEntry(0);.
87e0: 20 20 20 20 65 78 69 74 28 30 29 3b 0a 20 20 7d      exit(0);.  }
87f0: 0a 0a 20 20 2f 2a 20 47 65 74 20 61 6c 6c 20 74  ..  /* Get all t
8800: 68 65 20 6f 70 74 69 6f 6e 61 6c 20 66 69 65 6c  he optional fiel
8810: 64 73 20 74 68 61 74 20 66 6f 6c 6c 6f 77 20 74  ds that follow t
8820: 68 65 20 66 69 72 73 74 20 6c 69 6e 65 2e 0a 20  he first line.. 
8830: 20 2a 2f 0a 20 20 7a 43 6f 6f 6b 69 65 20 3d 20   */.  zCookie = 
8840: 30 3b 0a 20 20 7a 41 75 74 68 54 79 70 65 20 3d  0;.  zAuthType =
8850: 20 30 3b 0a 20 20 7a 52 65 6d 6f 74 65 55 73 65   0;.  zRemoteUse
8860: 72 20 3d 20 30 3b 0a 20 20 7a 52 65 66 65 72 65  r = 0;.  zRefere
8870: 72 20 3d 20 30 3b 0a 20 20 77 68 69 6c 65 28 20  r = 0;.  while( 
8880: 66 67 65 74 73 28 7a 4c 69 6e 65 2c 73 69 7a 65  fgets(zLine,size
8890: 6f 66 28 7a 4c 69 6e 65 29 2c 73 74 64 69 6e 29  of(zLine),stdin)
88a0: 20 29 7b 0a 20 20 20 20 63 68 61 72 20 2a 7a 46   ){.    char *zF
88b0: 69 65 6c 64 4e 61 6d 65 3b 0a 20 20 20 20 63 68  ieldName;.    ch
88c0: 61 72 20 2a 7a 56 61 6c 3b 0a 0a 20 20 20 20 6e  ar *zVal;..    n
88d0: 49 6e 20 2b 3d 20 73 74 72 6c 65 6e 28 7a 4c 69  In += strlen(zLi
88e0: 6e 65 29 3b 0a 20 20 20 20 7a 46 69 65 6c 64 4e  ne);.    zFieldN
88f0: 61 6d 65 20 3d 20 47 65 74 46 69 72 73 74 45 6c  ame = GetFirstEl
8900: 65 6d 65 6e 74 28 7a 4c 69 6e 65 2c 26 7a 56 61  ement(zLine,&zVa
8910: 6c 29 3b 0a 20 20 20 20 69 66 28 20 7a 46 69 65  l);.    if( zFie
8920: 6c 64 4e 61 6d 65 3d 3d 30 20 7c 7c 20 2a 7a 46  ldName==0 || *zF
8930: 69 65 6c 64 4e 61 6d 65 3d 3d 30 20 29 20 62 72  ieldName==0 ) br
8940: 65 61 6b 3b 0a 20 20 20 20 52 65 6d 6f 76 65 4e  eak;.    RemoveN
8950: 65 77 6c 69 6e 65 28 7a 56 61 6c 29 3b 0a 20 20  ewline(zVal);.  
8960: 20 20 69 66 28 20 73 74 72 63 61 73 65 63 6d 70    if( strcasecmp
8970: 28 7a 46 69 65 6c 64 4e 61 6d 65 2c 22 55 73 65  (zFieldName,"Use
8980: 72 2d 41 67 65 6e 74 3a 22 29 3d 3d 30 20 29 7b  r-Agent:")==0 ){
8990: 0a 20 20 20 20 20 20 7a 41 67 65 6e 74 20 3d 20  .      zAgent = 
89a0: 53 74 72 44 75 70 28 7a 56 61 6c 29 3b 0a 20 20  StrDup(zVal);.  
89b0: 20 20 20 20 46 69 78 75 70 55 73 65 72 41 67 65      FixupUserAge
89c0: 6e 74 28 29 3b 0a 20 20 20 20 7d 65 6c 73 65 20  nt();.    }else 
89d0: 69 66 28 20 73 74 72 63 61 73 65 63 6d 70 28 7a  if( strcasecmp(z
89e0: 46 69 65 6c 64 4e 61 6d 65 2c 22 41 63 63 65 70  FieldName,"Accep
89f0: 74 3a 22 29 3d 3d 30 20 29 7b 0a 20 20 20 20 20  t:")==0 ){.     
8a00: 20 7a 41 63 63 65 70 74 20 3d 20 53 74 72 44 75   zAccept = StrDu
8a10: 70 28 7a 56 61 6c 29 3b 0a 20 20 20 20 7d 65 6c  p(zVal);.    }el
8a20: 73 65 20 69 66 28 20 73 74 72 63 61 73 65 63 6d  se if( strcasecm
8a30: 70 28 7a 46 69 65 6c 64 4e 61 6d 65 2c 22 43 6f  p(zFieldName,"Co
8a40: 6e 74 65 6e 74 2d 6c 65 6e 67 74 68 3a 22 29 3d  ntent-length:")=
8a50: 3d 30 20 29 7b 0a 20 20 20 20 20 20 7a 43 6f 6e  =0 ){.      zCon
8a60: 74 65 6e 74 4c 65 6e 67 74 68 20 3d 20 53 74 72  tentLength = Str
8a70: 44 75 70 28 7a 56 61 6c 29 3b 0a 20 20 20 20 7d  Dup(zVal);.    }
8a80: 65 6c 73 65 20 69 66 28 20 73 74 72 63 61 73 65  else if( strcase
8a90: 63 6d 70 28 7a 46 69 65 6c 64 4e 61 6d 65 2c 22  cmp(zFieldName,"
8aa0: 43 6f 6e 74 65 6e 74 2d 74 79 70 65 3a 22 29 3d  Content-type:")=
8ab0: 3d 30 20 29 7b 0a 20 20 20 20 20 20 7a 43 6f 6e  =0 ){.      zCon
8ac0: 74 65 6e 74 54 79 70 65 20 3d 20 53 74 72 44 75  tentType = StrDu
8ad0: 70 28 7a 56 61 6c 29 3b 0a 20 20 20 20 7d 65 6c  p(zVal);.    }el
8ae0: 73 65 20 69 66 28 20 73 74 72 63 61 73 65 63 6d  se if( strcasecm
8af0: 70 28 7a 46 69 65 6c 64 4e 61 6d 65 2c 22 52 65  p(zFieldName,"Re
8b00: 66 65 72 65 72 3a 22 29 3d 3d 30 20 29 7b 0a 20  ferer:")==0 ){. 
8b10: 20 20 20 20 20 7a 52 65 66 65 72 65 72 20 3d 20       zReferer = 
8b20: 53 74 72 44 75 70 28 7a 56 61 6c 29 3b 0a 20 20  StrDup(zVal);.  
8b30: 20 20 7d 65 6c 73 65 20 69 66 28 20 73 74 72 63    }else if( strc
8b40: 61 73 65 63 6d 70 28 7a 46 69 65 6c 64 4e 61 6d  asecmp(zFieldNam
8b50: 65 2c 22 43 6f 6f 6b 69 65 3a 22 29 3d 3d 30 20  e,"Cookie:")==0 
8b60: 29 7b 0a 20 20 20 20 20 20 7a 43 6f 6f 6b 69 65  ){.      zCookie
8b70: 20 3d 20 53 74 72 41 70 70 65 6e 64 28 7a 43 6f   = StrAppend(zCo
8b80: 6f 6b 69 65 2c 22 3b 20 22 2c 7a 56 61 6c 29 3b  okie,"; ",zVal);
8b90: 0a 20 20 20 20 7d 65 6c 73 65 20 69 66 28 20 73  .    }else if( s
8ba0: 74 72 63 61 73 65 63 6d 70 28 7a 46 69 65 6c 64  trcasecmp(zField
8bb0: 4e 61 6d 65 2c 22 43 6f 6e 6e 65 63 74 69 6f 6e  Name,"Connection
8bc0: 3a 22 29 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20  :")==0 ){.      
8bd0: 69 66 28 20 73 74 72 63 61 73 65 63 6d 70 28 7a  if( strcasecmp(z
8be0: 56 61 6c 2c 22 63 6c 6f 73 65 22 29 3d 3d 30 20  Val,"close")==0 
8bf0: 29 7b 0a 20 20 20 20 20 20 20 20 63 6c 6f 73 65  ){.        close
8c00: 43 6f 6e 6e 65 63 74 69 6f 6e 20 3d 20 31 3b 0a  Connection = 1;.
8c10: 20 20 20 20 20 20 7d 65 6c 73 65 20 69 66 28 20        }else if( 
8c20: 21 66 6f 72 63 65 43 6c 6f 73 65 20 26 26 20 73  !forceClose && s
8c30: 74 72 63 61 73 65 63 6d 70 28 7a 56 61 6c 2c 20  trcasecmp(zVal, 
8c40: 22 6b 65 65 70 2d 61 6c 69 76 65 22 29 3d 3d 30  "keep-alive")==0
8c50: 20 29 7b 0a 20 20 20 20 20 20 20 20 63 6c 6f 73   ){.        clos
8c60: 65 43 6f 6e 6e 65 63 74 69 6f 6e 20 3d 20 30 3b  eConnection = 0;
8c70: 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 7d 65 6c  .      }.    }el
8c80: 73 65 20 69 66 28 20 73 74 72 63 61 73 65 63 6d  se if( strcasecm
8c90: 70 28 7a 46 69 65 6c 64 4e 61 6d 65 2c 22 48 6f  p(zFieldName,"Ho
8ca0: 73 74 3a 22 29 3d 3d 30 20 29 7b 0a 20 20 20 20  st:")==0 ){.    
8cb0: 20 20 69 6e 74 20 69 6e 53 71 75 61 72 65 20 3d    int inSquare =
8cc0: 20 30 3b 0a 20 20 20 20 20 20 63 68 61 72 20 63   0;.      char c
8cd0: 3b 0a 20 20 20 20 20 20 7a 48 74 74 70 48 6f 73  ;.      zHttpHos
8ce0: 74 20 3d 20 53 74 72 44 75 70 28 7a 56 61 6c 29  t = StrDup(zVal)
8cf0: 3b 0a 20 20 20 20 20 20 7a 53 65 72 76 65 72 50  ;.      zServerP
8d00: 6f 72 74 20 3d 20 7a 53 65 72 76 65 72 4e 61 6d  ort = zServerNam
8d10: 65 20 3d 20 53 74 72 44 75 70 28 7a 48 74 74 70  e = StrDup(zHttp
8d20: 48 6f 73 74 29 3b 0a 20 20 20 20 20 20 77 68 69  Host);.      whi
8d30: 6c 65 28 20 7a 53 65 72 76 65 72 50 6f 72 74 20  le( zServerPort 
8d40: 26 26 20 28 63 20 3d 20 2a 7a 53 65 72 76 65 72  && (c = *zServer
8d50: 50 6f 72 74 29 21 3d 30 0a 20 20 20 20 20 20 20  Port)!=0.       
8d60: 20 20 20 20 20 20 20 26 26 20 28 63 21 3d 27 3a         && (c!=':
8d70: 27 20 7c 7c 20 69 6e 53 71 75 61 72 65 29 20 29  ' || inSquare) )
8d80: 7b 0a 20 20 20 20 20 20 20 20 69 66 28 20 63 3d  {.        if( c=
8d90: 3d 27 5b 27 20 29 20 69 6e 53 71 75 61 72 65 20  ='[' ) inSquare 
8da0: 3d 20 31 3b 0a 20 20 20 20 20 20 20 20 69 66 28  = 1;.        if(
8db0: 20 63 3d 3d 27 5d 27 20 29 20 69 6e 53 71 75 61   c==']' ) inSqua
8dc0: 72 65 20 3d 20 30 3b 0a 20 20 20 20 20 20 20 20  re = 0;.        
8dd0: 7a 53 65 72 76 65 72 50 6f 72 74 2b 2b 3b 0a 20  zServerPort++;. 
8de0: 20 20 20 20 20 7d 0a 20 20 20 20 20 20 69 66 28       }.      if(
8df0: 20 7a 53 65 72 76 65 72 50 6f 72 74 20 26 26 20   zServerPort && 
8e00: 2a 7a 53 65 72 76 65 72 50 6f 72 74 20 29 7b 0a  *zServerPort ){.
8e10: 20 20 20 20 20 20 20 20 2a 7a 53 65 72 76 65 72          *zServer
8e20: 50 6f 72 74 20 3d 20 30 3b 0a 20 20 20 20 20 20  Port = 0;.      
8e30: 20 20 7a 53 65 72 76 65 72 50 6f 72 74 2b 2b 3b    zServerPort++;
8e40: 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 69  .      }.      i
8e50: 66 28 20 7a 52 65 61 6c 50 6f 72 74 20 29 7b 0a  f( zRealPort ){.
8e60: 20 20 20 20 20 20 20 20 7a 53 65 72 76 65 72 50          zServerP
8e70: 6f 72 74 20 3d 20 53 74 72 44 75 70 28 7a 52 65  ort = StrDup(zRe
8e80: 61 6c 50 6f 72 74 29 3b 0a 20 20 20 20 20 20 7d  alPort);.      }
8e90: 0a 20 20 20 20 7d 65 6c 73 65 20 69 66 28 20 73  .    }else if( s
8ea0: 74 72 63 61 73 65 63 6d 70 28 7a 46 69 65 6c 64  trcasecmp(zField
8eb0: 4e 61 6d 65 2c 22 41 75 74 68 6f 72 69 7a 61 74  Name,"Authorizat
8ec0: 69 6f 6e 3a 22 29 3d 3d 30 20 29 7b 0a 20 20 20  ion:")==0 ){.   
8ed0: 20 20 20 7a 41 75 74 68 54 79 70 65 20 3d 20 47     zAuthType = G
8ee0: 65 74 46 69 72 73 74 45 6c 65 6d 65 6e 74 28 53  etFirstElement(S
8ef0: 74 72 44 75 70 28 7a 56 61 6c 29 2c 20 26 7a 41  trDup(zVal), &zA
8f00: 75 74 68 41 72 67 29 3b 0a 20 20 20 20 7d 0a 20  uthArg);.    }. 
8f10: 20 7d 0a 0a 20 20 2f 2a 20 44 69 73 61 6c 6c 6f   }..  /* Disallo
8f20: 77 20 72 65 66 65 72 72 69 6e 67 20 66 72 6f 6d  w referring from
8f30: 20 63 65 72 74 61 69 6e 20 63 6c 69 65 6e 74 73   certain clients
8f40: 20 2a 2f 0a 20 20 69 66 28 20 7a 41 67 65 6e 74   */.  if( zAgent
8f50: 20 29 7b 0a 20 20 20 20 69 66 28 20 73 74 72 73   ){.    if( strs
8f60: 74 72 28 7a 41 67 65 6e 74 2c 20 22 57 69 6e 64  tr(zAgent, "Wind
8f70: 6f 77 73 5f 39 22 29 21 3d 30 0a 20 20 20 20 20  ows_9")!=0.     
8f80: 7c 7c 20 73 74 72 73 74 72 28 7a 41 67 65 6e 74  || strstr(zAgent
8f90: 2c 20 22 44 6f 77 6e 6c 6f 61 64 5f 4d 61 73 74  , "Download_Mast
8fa0: 65 72 22 29 21 3d 30 0a 20 20 20 20 20 7c 7c 20  er")!=0.     || 
8fb0: 73 74 72 73 74 72 28 7a 41 67 65 6e 74 2c 20 22  strstr(zAgent, "
8fc0: 5f 45 7a 6f 6f 6d 73 2f 22 29 21 3d 30 0a 20 20  _Ezooms/")!=0.  
8fd0: 20 20 29 7b 0a 20 20 20 20 20 20 46 6f 72 62 69    ){.      Forbi
8fe0: 64 64 65 6e 28 29 3b 0a 20 20 20 20 7d 0a 20 20  dden();.    }.  
8ff0: 7d 0a 23 69 66 20 30 0a 20 20 69 66 28 20 7a 52  }.#if 0.  if( zR
9000: 65 66 65 72 65 72 20 29 7b 0a 20 20 20 20 73 74  eferer ){.    st
9010: 61 74 69 63 20 63 6f 6e 73 74 20 63 68 61 72 20  atic const char 
9020: 2a 61 7a 44 69 73 61 6c 6c 6f 77 5b 5d 20 3d 20  *azDisallow[] = 
9030: 7b 0a 20 20 20 20 20 20 22 73 6b 69 64 72 6f 77  {.      "skidrow
9040: 63 72 61 63 6b 2e 63 6f 6d 22 2c 0a 20 20 20 20  crack.com",.    
9050: 20 20 22 68 6f 73 68 69 79 75 75 67 69 2e 74 69    "hoshiyuugi.ti
9060: 73 74 6f 72 79 2e 63 6f 6d 22 2c 0a 20 20 20 20  story.com",.    
9070: 20 20 22 73 6b 69 64 72 6f 77 67 61 6d 65 73 2e    "skidrowgames.
9080: 6e 65 74 22 2c 0a 20 20 20 20 7d 3b 0a 20 20 20  net",.    };.   
9090: 20 69 6e 74 20 69 3b 0a 20 20 20 20 66 6f 72 28   int i;.    for(
90a0: 69 3d 30 3b 20 69 3c 73 69 7a 65 6f 66 28 61 7a  i=0; i<sizeof(az
90b0: 44 69 73 61 6c 6c 6f 77 29 2f 73 69 7a 65 6f 66  Disallow)/sizeof
90c0: 28 61 7a 44 69 73 61 6c 6c 6f 77 5b 30 5d 29 3b  (azDisallow[0]);
90d0: 20 69 2b 2b 29 7b 0a 20 20 20 20 20 20 69 66 28   i++){.      if(
90e0: 20 73 74 72 73 74 72 28 7a 52 65 66 65 72 65 72   strstr(zReferer
90f0: 2c 20 61 7a 44 69 73 61 6c 6c 6f 77 5b 69 5d 29  , azDisallow[i])
9100: 21 3d 30 20 29 20 4e 6f 74 46 6f 75 6e 64 28 5f  !=0 ) NotFound(_
9110: 5f 4c 49 4e 45 5f 5f 29 3b 0a 20 20 20 20 7d 0a  _LINE__);.    }.
9120: 20 20 7d 0a 23 65 6e 64 69 66 0a 0a 20 20 2f 2a    }.#endif..  /*
9130: 20 4d 61 6b 65 20 61 6e 20 65 78 74 72 61 20 65   Make an extra e
9140: 66 66 6f 72 74 20 74 6f 20 67 65 74 20 61 20 76  ffort to get a v
9150: 61 6c 69 64 20 73 65 72 76 65 72 20 6e 61 6d 65  alid server name
9160: 20 61 6e 64 20 70 6f 72 74 20 6e 75 6d 62 65 72   and port number
9170: 2e 0a 20 20 2a 2a 20 4f 6e 6c 79 20 4e 65 74 73  ..  ** Only Nets
9180: 63 61 70 65 20 70 72 6f 76 69 64 65 73 20 74 68  cape provides th
9190: 69 73 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 2e 20  is information. 
91a0: 20 49 66 20 74 68 65 20 62 72 6f 77 73 65 72 20   If the browser 
91b0: 69 73 0a 20 20 2a 2a 20 49 6e 74 65 72 6e 65 74  is.  ** Internet
91c0: 20 45 78 70 6c 6f 72 65 72 2c 20 74 68 65 6e 20   Explorer, then 
91d0: 77 65 20 68 61 76 65 20 74 6f 20 66 69 6e 64 20  we have to find 
91e0: 6f 75 74 20 74 68 65 20 69 6e 66 6f 72 6d 61 74  out the informat
91f0: 69 6f 6e 20 66 6f 72 0a 20 20 2a 2a 20 6f 75 72  ion for.  ** our
9200: 73 65 6c 76 65 73 2e 0a 20 20 2a 2f 0a 20 20 69  selves..  */.  i
9210: 66 28 20 7a 53 65 72 76 65 72 4e 61 6d 65 3d 3d  f( zServerName==
9220: 30 20 29 7b 0a 20 20 20 20 7a 53 65 72 76 65 72  0 ){.    zServer
9230: 4e 61 6d 65 20 3d 20 53 61 66 65 4d 61 6c 6c 6f  Name = SafeMallo
9240: 63 28 20 31 30 30 20 29 3b 0a 20 20 20 20 67 65  c( 100 );.    ge
9250: 74 68 6f 73 74 6e 61 6d 65 28 7a 53 65 72 76 65  thostname(zServe
9260: 72 4e 61 6d 65 2c 31 30 30 29 3b 0a 20 20 7d 0a  rName,100);.  }.
9270: 20 20 69 66 28 20 7a 53 65 72 76 65 72 50 6f 72    if( zServerPor
9280: 74 3d 3d 30 20 7c 7c 20 2a 7a 53 65 72 76 65 72  t==0 || *zServer
9290: 50 6f 72 74 3d 3d 30 20 29 7b 0a 20 20 20 20 7a  Port==0 ){.    z
92a0: 53 65 72 76 65 72 50 6f 72 74 20 3d 20 44 45 46  ServerPort = DEF
92b0: 41 55 4c 54 5f 50 4f 52 54 3b 0a 20 20 7d 0a 0a  AULT_PORT;.  }..
92c0: 20 20 2f 2a 20 52 65 6d 6f 76 65 20 74 68 65 20    /* Remove the 
92d0: 71 75 65 72 79 20 73 74 72 69 6e 67 20 66 72 6f  query string fro
92e0: 6d 20 74 68 65 20 65 6e 64 20 6f 66 20 74 68 65  m the end of the
92f0: 20 72 65 71 75 65 73 74 65 64 20 66 69 6c 65 2e   requested file.
9300: 0a 20 20 2a 2f 0a 20 20 66 6f 72 28 7a 3d 7a 53  .  */.  for(z=zS
9310: 63 72 69 70 74 3b 20 2a 7a 20 26 26 20 2a 7a 21  cript; *z && *z!
9320: 3d 27 3f 27 3b 20 7a 2b 2b 29 7b 7d 0a 20 20 69  ='?'; z++){}.  i
9330: 66 28 20 2a 7a 3d 3d 27 3f 27 20 29 7b 0a 20 20  f( *z=='?' ){.  
9340: 20 20 7a 51 75 65 72 79 53 75 66 66 69 78 20 3d    zQuerySuffix =
9350: 20 53 74 72 44 75 70 28 7a 29 3b 0a 20 20 20 20   StrDup(z);.    
9360: 2a 7a 20 3d 20 30 3b 0a 20 20 7d 65 6c 73 65 7b  *z = 0;.  }else{
9370: 0a 20 20 20 20 7a 51 75 65 72 79 53 75 66 66 69  .    zQuerySuffi
9380: 78 20 3d 20 22 22 3b 0a 20 20 7d 0a 20 20 7a 51  x = "";.  }.  zQ
9390: 75 65 72 79 53 74 72 69 6e 67 20 3d 20 2a 7a 51  ueryString = *zQ
93a0: 75 65 72 79 53 75 66 66 69 78 20 3f 20 26 7a 51  uerySuffix ? &zQ
93b0: 75 65 72 79 53 75 66 66 69 78 5b 31 5d 20 3a 20  uerySuffix[1] : 
93c0: 7a 51 75 65 72 79 53 75 66 66 69 78 3b 0a 0a 20  zQuerySuffix;.. 
93d0: 20 2f 2a 20 43 72 65 61 74 65 20 61 20 66 69 6c   /* Create a fil
93e0: 65 20 74 6f 20 68 6f 6c 64 20 74 68 65 20 50 4f  e to hold the PO
93f0: 53 54 20 71 75 65 72 79 20 64 61 74 61 2c 20 69  ST query data, i
9400: 66 20 61 6e 79 2e 20 20 57 65 20 68 61 76 65 20  f any.  We have 
9410: 74 6f 0a 20 20 2a 2a 20 64 6f 20 69 74 20 74 68  to.  ** do it th
9420: 69 73 20 77 61 79 2e 20 20 57 65 20 63 61 6e 27  is way.  We can'
9430: 74 20 6a 75 73 74 20 70 61 73 73 20 74 68 65 20  t just pass the 
9440: 66 69 6c 65 20 64 65 73 63 72 69 70 74 6f 72 20  file descriptor 
9450: 64 6f 77 6e 20 74 6f 0a 20 20 2a 2a 20 74 68 65  down to.  ** the
9460: 20 63 68 69 6c 64 20 70 72 6f 63 65 73 73 20 62   child process b
9470: 65 63 61 75 73 65 20 74 68 65 20 66 67 65 74 73  ecause the fgets
9480: 28 29 20 66 75 6e 63 74 69 6f 6e 20 6d 61 79 20  () function may 
9490: 68 61 76 65 20 61 6c 72 65 61 64 79 0a 20 20 2a  have already.  *
94a0: 2a 20 72 65 61 64 20 70 61 72 74 20 6f 66 20 74  * read part of t
94b0: 68 65 20 50 4f 53 54 20 64 61 74 61 20 69 6e 74  he POST data int
94c0: 6f 20 69 74 73 20 69 6e 74 65 72 6e 61 6c 20 62  o its internal b
94d0: 75 66 66 65 72 2e 0a 20 20 2a 2f 0a 20 20 69 66  uffer..  */.  if
94e0: 28 20 7a 4d 65 74 68 6f 64 5b 30 5d 3d 3d 27 50  ( zMethod[0]=='P
94f0: 27 20 26 26 20 7a 43 6f 6e 74 65 6e 74 4c 65 6e  ' && zContentLen
9500: 67 74 68 21 3d 30 20 29 7b 0a 20 20 20 20 69 6e  gth!=0 ){.    in
9510: 74 20 6c 65 6e 20 3d 20 61 74 6f 69 28 7a 43 6f  t len = atoi(zCo
9520: 6e 74 65 6e 74 4c 65 6e 67 74 68 29 3b 0a 20 20  ntentLength);.  
9530: 20 20 46 49 4c 45 20 2a 6f 75 74 3b 0a 20 20 20    FILE *out;.   
9540: 20 63 68 61 72 20 2a 7a 42 75 66 3b 0a 20 20 20   char *zBuf;.   
9550: 20 69 6e 74 20 6e 3b 0a 0a 20 20 20 20 69 66 28   int n;..    if(
9560: 20 6c 65 6e 3e 4d 41 58 5f 43 4f 4e 54 45 4e 54   len>MAX_CONTENT
9570: 5f 4c 45 4e 47 54 48 20 29 7b 0a 20 20 20 20 20  _LENGTH ){.     
9580: 20 53 74 61 72 74 52 65 73 70 6f 6e 73 65 28 22   StartResponse("
9590: 35 30 30 20 52 65 71 75 65 73 74 20 74 6f 6f 20  500 Request too 
95a0: 6c 61 72 67 65 22 29 3b 0a 20 20 20 20 20 20 6e  large");.      n
95b0: 4f 75 74 20 2b 3d 20 70 72 69 6e 74 66 28 0a 20  Out += printf(. 
95c0: 20 20 20 20 20 20 20 22 43 6f 6e 74 65 6e 74 2d         "Content-
95d0: 74 79 70 65 3a 20 74 65 78 74 2f 70 6c 61 69 6e  type: text/plain
95e0: 5c 72 5c 6e 22 0a 20 20 20 20 20 20 20 20 22 5c  \r\n".        "\
95f0: 72 5c 6e 22 0a 20 20 20 20 20 20 20 20 22 54 6f  r\n".        "To
9600: 6f 20 6d 75 63 68 20 50 4f 53 54 20 64 61 74 61  o much POST data
9610: 5c 6e 22 0a 20 20 20 20 20 20 29 3b 0a 20 20 20  \n".      );.   
9620: 20 20 20 4d 61 6b 65 4c 6f 67 45 6e 74 72 79 28     MakeLogEntry(
9630: 30 29 3b 0a 20 20 20 20 20 20 65 78 69 74 28 30  0);.      exit(0
9640: 29 3b 0a 20 20 20 20 7d 0a 20 20 20 20 73 70 72  );.    }.    spr
9650: 69 6e 74 66 28 7a 54 6d 70 4e 61 6d 42 75 66 2c  intf(zTmpNamBuf,
9660: 20 22 2f 74 6d 70 2f 2d 70 6f 73 74 2d 64 61 74   "/tmp/-post-dat
9670: 61 2d 58 58 58 58 58 58 22 29 3b 0a 20 20 20 20  a-XXXXXX");.    
9680: 7a 54 6d 70 4e 61 6d 20 3d 20 7a 54 6d 70 4e 61  zTmpNam = zTmpNa
9690: 6d 42 75 66 3b 0a 20 20 20 20 6d 6b 73 74 65 6d  mBuf;.    mkstem
96a0: 70 28 7a 54 6d 70 4e 61 6d 29 3b 0a 20 20 20 20  p(zTmpNam);.    
96b0: 6f 75 74 20 3d 20 66 6f 70 65 6e 28 7a 54 6d 70  out = fopen(zTmp
96c0: 4e 61 6d 2c 22 77 22 29 3b 0a 20 20 20 20 69 66  Nam,"w");.    if
96d0: 28 20 6f 75 74 3d 3d 30 20 29 7b 0a 20 20 20 20  ( out==0 ){.    
96e0: 20 20 53 74 61 72 74 52 65 73 70 6f 6e 73 65 28    StartResponse(
96f0: 22 35 30 30 20 43 61 6e 6e 6f 74 20 63 72 65 61  "500 Cannot crea
9700: 74 65 20 2f 74 6d 70 20 66 69 6c 65 22 29 3b 0a  te /tmp file");.
9710: 20 20 20 20 20 20 6e 4f 75 74 20 2b 3d 20 70 72        nOut += pr
9720: 69 6e 74 66 28 0a 20 20 20 20 20 20 20 20 22 43  intf(.        "C
9730: 6f 6e 74 65 6e 74 2d 74 79 70 65 3a 20 74 65 78  ontent-type: tex
9740: 74 2f 70 6c 61 69 6e 5c 72 5c 6e 22 0a 20 20 20  t/plain\r\n".   
9750: 20 20 20 20 20 22 5c 72 5c 6e 22 0a 20 20 20 20       "\r\n".    
9760: 20 20 20 20 22 43 6f 75 6c 64 20 6e 6f 74 20 6f      "Could not o
9770: 70 65 6e 20 5c 22 25 73 5c 22 20 66 6f 72 20 77  pen \"%s\" for w
9780: 72 69 74 69 6e 67 5c 6e 22 2c 20 7a 54 6d 70 4e  riting\n", zTmpN
9790: 61 6d 0a 20 20 20 20 20 20 29 3b 0a 20 20 20 20  am.      );.    
97a0: 20 20 4d 61 6b 65 4c 6f 67 45 6e 74 72 79 28 30    MakeLogEntry(0
97b0: 29 3b 0a 20 20 20 20 20 20 65 78 69 74 28 30 29  );.      exit(0)
97c0: 3b 0a 20 20 20 20 7d 0a 20 20 20 20 7a 42 75 66  ;.    }.    zBuf
97d0: 20 3d 20 53 61 66 65 4d 61 6c 6c 6f 63 28 20 6c   = SafeMalloc( l
97e0: 65 6e 20 29 3b 0a 20 20 20 20 69 66 28 20 75 73  en );.    if( us
97f0: 65 54 69 6d 65 6f 75 74 20 29 20 61 6c 61 72 6d  eTimeout ) alarm
9800: 28 31 35 20 2b 20 6c 65 6e 2f 32 30 30 30 29 3b  (15 + len/2000);
9810: 0a 20 20 20 20 6e 20 3d 20 66 72 65 61 64 28 7a  .    n = fread(z
9820: 42 75 66 2c 31 2c 6c 65 6e 2c 73 74 64 69 6e 29  Buf,1,len,stdin)
9830: 3b 0a 20 20 20 20 6e 49 6e 20 2b 3d 20 6e 3b 0a  ;.    nIn += n;.
9840: 20 20 20 20 66 77 72 69 74 65 28 7a 42 75 66 2c      fwrite(zBuf,
9850: 31 2c 6e 2c 6f 75 74 29 3b 0a 20 20 20 20 66 72  1,n,out);.    fr
9860: 65 65 28 7a 42 75 66 29 3b 0a 20 20 20 20 66 63  ee(zBuf);.    fc
9870: 6c 6f 73 65 28 6f 75 74 29 3b 0a 20 20 7d 0a 0a  lose(out);.  }..
9880: 20 20 2f 2a 20 4d 61 6b 65 20 73 75 72 65 20 74    /* Make sure t
9890: 68 65 20 72 75 6e 6e 69 6e 67 20 74 69 6d 65 20  he running time 
98a0: 69 73 20 6e 6f 74 20 74 6f 6f 20 67 72 65 61 74  is not too great
98b0: 20 2a 2f 0a 20 20 69 66 28 20 75 73 65 54 69 6d   */.  if( useTim
98c0: 65 6f 75 74 20 29 20 61 6c 61 72 6d 28 31 30 29  eout ) alarm(10)
98d0: 3b 0a 0a 20 20 2f 2a 20 43 6f 6e 76 65 72 74 20  ;..  /* Convert 
98e0: 61 6c 6c 20 75 6e 75 73 75 61 6c 20 63 68 61 72  all unusual char
98f0: 61 63 74 65 72 73 20 69 6e 20 74 68 65 20 73 63  acters in the sc
9900: 72 69 70 74 20 6e 61 6d 65 20 69 6e 74 6f 20 22  ript name into "
9910: 5f 22 2e 0a 20 20 2a 2a 0a 20 20 2a 2a 20 54 68  _"..  **.  ** Th
9920: 69 73 20 69 73 20 61 20 64 65 66 65 6e 73 65 20  is is a defense 
9930: 61 67 61 69 6e 73 74 20 76 61 72 69 6f 75 73 20  against various 
9940: 61 74 74 61 63 6b 73 2c 20 58 53 53 20 61 74 74  attacks, XSS att
9950: 61 63 6b 73 20 69 6e 20 70 61 72 74 69 63 75 6c  acks in particul
9960: 61 72 2e 0a 20 20 2a 2f 0a 20 20 66 6f 72 28 7a  ar..  */.  for(z
9970: 3d 7a 53 63 72 69 70 74 3b 20 2a 7a 3b 20 7a 2b  =zScript; *z; z+
9980: 2b 29 7b 0a 20 20 20 20 75 6e 73 69 67 6e 65 64  +){.    unsigned
9990: 20 63 68 61 72 20 63 20 3d 20 2a 28 75 6e 73 69   char c = *(unsi
99a0: 67 6e 65 64 20 63 68 61 72 2a 29 7a 3b 0a 20 20  gned char*)z;.  
99b0: 20 20 69 66 28 20 28 63 26 30 78 38 30 29 21 3d    if( (c&0x80)!=
99c0: 30 20 7c 7c 20 21 61 6c 6c 6f 77 65 64 49 6e 4e  0 || !allowedInN
99d0: 61 6d 65 5b 63 5d 20 29 7b 0a 20 20 20 20 20 20  ame[c] ){.      
99e0: 2a 7a 20 3d 20 27 5f 27 3b 0a 20 20 20 20 20 20  *z = '_';.      
99f0: 69 66 28 20 63 3d 3d 27 25 27 20 26 26 20 7a 5b  if( c=='%' && z[
9a00: 31 5d 21 3d 30 20 26 26 20 7a 5b 32 5d 21 3d 30  1]!=0 && z[2]!=0
9a10: 20 29 7b 0a 20 20 20 20 20 20 20 20 66 6f 72 28   ){.        for(
9a20: 69 3d 33 3b 20 28 7a 5b 69 2d 32 5d 20 3d 20 7a  i=3; (z[i-2] = z
9a30: 5b 69 5d 29 21 3d 30 3b 20 69 2b 2b 29 7b 7d 0a  [i])!=0; i++){}.
9a40: 20 20 20 20 20 20 7d 0a 20 20 20 20 7d 0a 20 20        }.    }.  
9a50: 7d 0a 0a 20 20 2f 2a 20 44 6f 6e 27 74 20 61 6c  }..  /* Don't al
9a60: 6c 6f 77 20 22 2f 2e 22 20 6f 72 20 22 2f 2d 22  low "/." or "/-"
9a70: 20 74 6f 20 74 6f 20 6f 63 63 75 72 20 61 6e 79   to to occur any
9a80: 77 68 65 72 65 20 69 6e 20 74 68 65 20 65 6e 74  where in the ent
9a90: 69 74 79 20 6e 61 6d 65 2e 0a 20 20 2a 2a 20 54  ity name..  ** T
9aa0: 68 69 73 20 70 72 65 76 65 6e 74 73 20 61 74 74  his prevents att
9ab0: 61 63 6b 73 20 69 6e 76 6f 6c 76 69 6e 67 20 22  acks involving "
9ac0: 2e 2e 22 20 61 6e 64 20 61 6c 73 6f 20 61 6c 6c  .." and also all
9ad0: 6f 77 73 20 75 73 20 74 6f 20 63 72 65 61 74 65  ows us to create
9ae0: 0a 20 20 2a 2a 20 66 69 6c 65 73 20 61 6e 64 20  .  ** files and 
9af0: 64 69 72 65 63 74 6f 72 69 65 73 20 77 68 6f 73  directories whos
9b00: 65 20 6e 61 6d 65 73 20 62 65 67 69 6e 20 77 69  e names begin wi
9b10: 74 68 20 22 2d 22 20 77 68 69 63 68 20 61 72 65  th "-" which are
9b20: 20 69 6e 76 69 73 69 62 6c 65 0a 20 20 2a 2a 20   invisible.  ** 
9b30: 74 6f 20 74 68 65 20 77 65 62 73 65 72 76 65 72  to the webserver
9b40: 2e 0a 20 20 2a 2f 0a 20 20 66 6f 72 28 7a 3d 7a  ..  */.  for(z=z
9b50: 53 63 72 69 70 74 3b 20 2a 7a 3b 20 7a 2b 2b 29  Script; *z; z++)
9b60: 7b 0a 20 20 20 20 69 66 28 20 2a 7a 3d 3d 27 2f  {.    if( *z=='/
9b70: 27 20 26 26 20 28 7a 5b 31 5d 3d 3d 27 2e 27 20  ' && (z[1]=='.' 
9b80: 7c 7c 20 7a 5b 31 5d 3d 3d 27 2d 27 29 20 29 7b  || z[1]=='-') ){
9b90: 0a 20 20 20 20 20 20 20 4e 6f 74 46 6f 75 6e 64  .       NotFound
9ba0: 28 5f 5f 4c 49 4e 45 5f 5f 29 3b 0a 20 20 20 20  (__LINE__);.    
9bb0: 7d 0a 20 20 7d 0a 0a 20 20 2f 2a 20 46 69 67 75  }.  }..  /* Figu
9bc0: 72 65 20 6f 75 74 20 77 68 61 74 20 74 68 65 20  re out what the 
9bd0: 72 6f 6f 74 20 6f 66 20 74 68 65 20 66 69 6c 65  root of the file
9be0: 73 79 73 74 65 6d 20 73 68 6f 75 6c 64 20 62 65  system should be
9bf0: 2e 20 20 49 66 20 74 68 65 0a 20 20 2a 2a 20 48  .  If the.  ** H
9c00: 54 54 50 5f 48 4f 53 54 20 70 61 72 61 6d 65 74  TTP_HOST paramet
9c10: 65 72 20 65 78 69 73 74 73 20 28 73 74 6f 72 65  er exists (store
9c20: 64 20 69 6e 20 7a 48 74 74 70 48 6f 73 74 29 20  d in zHttpHost) 
9c30: 74 68 65 6e 20 72 65 6d 6f 76 65 20 74 68 65 0a  then remove the.
9c40: 20 20 2a 2a 20 70 6f 72 74 20 6e 75 6d 62 65 72    ** port number
9c50: 20 66 72 6f 6d 20 74 68 65 20 65 6e 64 20 28 69   from the end (i
9c60: 66 20 61 6e 79 29 2c 20 63 6f 6e 76 65 72 74 20  f any), convert 
9c70: 61 6c 6c 20 63 68 61 72 61 63 74 65 72 73 20 74  all characters t
9c80: 6f 20 6c 6f 77 65 72 0a 20 20 2a 2a 20 63 61 73  o lower.  ** cas
9c90: 65 2c 20 61 6e 64 20 63 6f 6e 76 65 72 74 20 61  e, and convert a
9ca0: 6c 6c 20 22 2e 22 20 74 6f 20 22 5f 22 2e 20 20  ll "." to "_".  
9cb0: 54 68 65 6e 20 74 72 79 20 74 6f 20 66 69 6e 64  Then try to find
9cc0: 20 61 20 64 69 72 65 63 74 6f 72 79 0a 20 20 2a   a directory.  *
9cd0: 2a 20 77 69 74 68 20 74 68 61 74 20 6e 61 6d 65  * with that name
9ce0: 20 61 6e 64 20 74 68 65 20 65 78 74 65 6e 73 69   and the extensi
9cf0: 6f 6e 20 2e 77 65 62 73 69 74 65 2e 20 20 49 66  on .website.  If
9d00: 20 6e 6f 74 20 66 6f 75 6e 64 2c 20 6c 6f 6f 6b   not found, look
9d10: 0a 20 20 2a 2a 20 66 6f 72 20 22 64 65 66 61 75  .  ** for "defau
9d20: 6c 74 2e 77 65 62 73 69 74 65 22 2e 0a 20 20 2a  lt.website"..  *
9d30: 2f 0a 20 20 69 66 28 20 7a 53 63 72 69 70 74 5b  /.  if( zScript[
9d40: 30 5d 21 3d 27 2f 27 20 29 20 4e 6f 74 46 6f 75  0]!='/' ) NotFou
9d50: 6e 64 28 5f 5f 4c 49 4e 45 5f 5f 29 3b 0a 20 20  nd(__LINE__);.  
9d60: 69 66 28 20 73 74 72 6c 65 6e 28 7a 52 6f 6f 74  if( strlen(zRoot
9d70: 29 2b 34 30 20 3e 3d 20 73 69 7a 65 6f 66 28 7a  )+40 >= sizeof(z
9d80: 4c 69 6e 65 29 20 29 20 4e 6f 74 46 6f 75 6e 64  Line) ) NotFound
9d90: 28 5f 5f 4c 49 4e 45 5f 5f 29 3b 0a 20 20 69 66  (__LINE__);.  if
9da0: 28 20 7a 48 74 74 70 48 6f 73 74 3d 3d 30 20 7c  ( zHttpHost==0 |
9db0: 7c 20 7a 48 74 74 70 48 6f 73 74 5b 30 5d 3d 3d  | zHttpHost[0]==
9dc0: 30 20 29 7b 0a 20 20 20 20 4e 6f 74 46 6f 75 6e  0 ){.    NotFoun
9dd0: 64 28 5f 5f 4c 49 4e 45 5f 5f 29 3b 0a 20 20 7d  d(__LINE__);.  }
9de0: 65 6c 73 65 20 69 66 28 20 73 74 72 6c 65 6e 28  else if( strlen(
9df0: 7a 48 74 74 70 48 6f 73 74 29 2b 73 74 72 6c 65  zHttpHost)+strle
9e00: 6e 28 7a 52 6f 6f 74 29 2b 31 30 20 3e 3d 20 73  n(zRoot)+10 >= s
9e10: 69 7a 65 6f 66 28 7a 4c 69 6e 65 29 20 29 7b 0a  izeof(zLine) ){.
9e20: 20 20 20 20 4e 6f 74 46 6f 75 6e 64 28 5f 5f 4c      NotFound(__L
9e30: 49 4e 45 5f 5f 29 3b 0a 20 20 7d 65 6c 73 65 7b  INE__);.  }else{
9e40: 0a 20 20 20 20 73 70 72 69 6e 74 66 28 7a 4c 69  .    sprintf(zLi
9e50: 6e 65 2c 20 22 25 73 2f 25 73 22 2c 20 7a 52 6f  ne, "%s/%s", zRo
9e60: 6f 74 2c 20 7a 48 74 74 70 48 6f 73 74 29 3b 0a  ot, zHttpHost);.
9e70: 20 20 20 20 66 6f 72 28 69 3d 73 74 72 6c 65 6e      for(i=strlen
9e80: 28 7a 52 6f 6f 74 29 2b 31 3b 20 7a 4c 69 6e 65  (zRoot)+1; zLine
9e90: 5b 69 5d 20 26 26 20 7a 4c 69 6e 65 5b 69 5d 21  [i] && zLine[i]!
9ea0: 3d 27 3a 27 3b 20 69 2b 2b 29 7b 0a 20 20 20 20  =':'; i++){.    
9eb0: 20 20 69 6e 74 20 63 20 3d 20 7a 4c 69 6e 65 5b    int c = zLine[
9ec0: 69 5d 3b 0a 20 20 20 20 20 20 69 66 28 20 21 69  i];.      if( !i
9ed0: 73 61 6c 6e 75 6d 28 63 29 20 29 7b 0a 20 20 20  salnum(c) ){.   
9ee0: 20 20 20 20 20 7a 4c 69 6e 65 5b 69 5d 20 3d 20       zLine[i] = 
9ef0: 27 5f 27 3b 0a 20 20 20 20 20 20 7d 65 6c 73 65  '_';.      }else
9f00: 20 69 66 28 20 69 73 75 70 70 65 72 28 63 29 20   if( isupper(c) 
9f10: 29 7b 0a 20 20 20 20 20 20 20 20 7a 4c 69 6e 65  ){.        zLine
9f20: 5b 69 5d 20 3d 20 74 6f 6c 6f 77 65 72 28 63 29  [i] = tolower(c)
9f30: 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 7d 0a  ;.      }.    }.
9f40: 20 20 20 20 73 74 72 63 70 79 28 26 7a 4c 69 6e      strcpy(&zLin
9f50: 65 5b 69 5d 2c 20 22 2e 77 65 62 73 69 74 65 22  e[i], ".website"
9f60: 29 3b 0a 20 20 7d 0a 20 20 69 66 28 20 73 74 61  );.  }.  if( sta
9f70: 74 28 7a 4c 69 6e 65 2c 26 73 74 61 74 62 75 66  t(zLine,&statbuf
9f80: 29 20 7c 7c 20 21 53 5f 49 53 44 49 52 28 73 74  ) || !S_ISDIR(st
9f90: 61 74 62 75 66 2e 73 74 5f 6d 6f 64 65 29 20 29  atbuf.st_mode) )
9fa0: 7b 0a 20 20 20 20 73 70 72 69 6e 74 66 28 7a 4c  {.    sprintf(zL
9fb0: 69 6e 65 2c 20 22 25 73 2f 64 65 66 61 75 6c 74  ine, "%s/default
9fc0: 2e 77 65 62 73 69 74 65 22 2c 20 7a 52 6f 6f 74  .website", zRoot
9fd0: 29 3b 0a 20 20 20 20 69 66 28 20 73 74 61 74 28  );.    if( stat(
9fe0: 7a 4c 69 6e 65 2c 26 73 74 61 74 62 75 66 29 20  zLine,&statbuf) 
9ff0: 7c 7c 20 21 53 5f 49 53 44 49 52 28 73 74 61 74  || !S_ISDIR(stat
a000: 62 75 66 2e 73 74 5f 6d 6f 64 65 29 20 29 7b 0a  buf.st_mode) ){.
a010: 20 20 20 20 20 20 4e 6f 74 46 6f 75 6e 64 28 5f        NotFound(_
a020: 5f 4c 49 4e 45 5f 5f 29 3b 0a 20 20 20 20 7d 0a  _LINE__);.    }.
a030: 20 20 7d 0a 20 20 0a 20 20 7a 48 6f 6d 65 20 3d    }.  .  zHome =
a040: 20 53 74 72 44 75 70 28 7a 4c 69 6e 65 29 3b 0a   StrDup(zLine);.
a050: 0a 20 20 2f 2a 20 43 68 61 6e 67 65 20 64 69 72  .  /* Change dir
a060: 65 63 74 6f 72 69 65 73 20 74 6f 20 74 68 65 20  ectories to the 
a070: 72 6f 6f 74 20 6f 66 20 74 68 65 20 48 54 54 50  root of the HTTP
a080: 20 66 69 6c 65 73 79 73 74 65 6d 0a 20 20 2a 2f   filesystem.  */
a090: 0a 20 20 69 66 28 20 63 68 64 69 72 28 7a 48 6f  .  if( chdir(zHo
a0a0: 6d 65 29 21 3d 30 20 29 7b 0a 20 20 20 20 63 68  me)!=0 ){.    ch
a0b0: 61 72 20 7a 42 75 66 5b 31 30 30 30 5d 3b 0a 20  ar zBuf[1000];. 
a0c0: 20 20 20 4d 61 6c 66 75 6e 63 74 69 6f 6e 28 5f     Malfunction(_
a0d0: 5f 4c 49 4e 45 5f 5f 2c 20 22 63 61 6e 6e 6f 74  _LINE__, "cannot
a0e0: 20 63 68 64 69 72 20 74 6f 20 5b 25 73 5d 20 66   chdir to [%s] f
a0f0: 72 6f 6d 20 5b 25 73 5d 22 2c 0a 20 20 20 20 20  rom [%s]",.     
a100: 20 20 20 20 7a 48 6f 6d 65 2c 20 67 65 74 63 77      zHome, getcw
a110: 64 28 7a 42 75 66 2c 39 39 39 29 29 3b 0a 20 20  d(zBuf,999));.  
a120: 7d 0a 0a 20 20 2f 2a 20 4c 6f 63 61 74 65 20 74  }..  /* Locate t
a130: 68 65 20 66 69 6c 65 20 69 6e 20 74 68 65 20 66  he file in the f
a140: 69 6c 65 73 79 73 74 65 6d 2e 20 20 57 65 20 6d  ilesystem.  We m
a150: 69 67 68 74 20 68 61 76 65 20 74 6f 20 61 70 70  ight have to app
a160: 65 6e 64 0a 20 20 2a 2a 20 74 68 65 20 6e 61 6d  end.  ** the nam
a170: 65 20 22 69 6e 64 65 78 2e 68 74 6d 6c 22 20 69  e "index.html" i
a180: 6e 20 6f 72 64 65 72 20 74 6f 20 66 69 6e 64 20  n order to find 
a190: 69 74 2e 20 20 41 6e 79 20 65 78 63 65 73 73 20  it.  Any excess 
a1a0: 70 61 74 68 0a 20 20 2a 2a 20 69 6e 66 6f 72 6d  path.  ** inform
a1b0: 61 74 69 6f 6e 20 69 73 20 70 75 74 20 69 6e 74  ation is put int
a1c0: 6f 20 74 68 65 20 7a 50 61 74 68 49 6e 66 6f 20  o the zPathInfo 
a1d0: 76 61 72 69 61 62 6c 65 2e 0a 20 20 2a 2f 0a 20  variable..  */. 
a1e0: 20 7a 4c 69 6e 65 5b 30 5d 20 3d 20 27 2e 27 3b   zLine[0] = '.';
a1f0: 0a 20 20 69 20 3d 20 30 3b 0a 20 20 77 68 69 6c  .  i = 0;.  whil
a200: 65 28 20 7a 53 63 72 69 70 74 5b 69 5d 20 29 7b  e( zScript[i] ){
a210: 0a 20 20 20 20 77 68 69 6c 65 28 20 7a 53 63 72  .    while( zScr
a220: 69 70 74 5b 69 5d 20 26 26 20 7a 53 63 72 69 70  ipt[i] && zScrip
a230: 74 5b 69 5d 21 3d 27 2f 27 20 29 7b 0a 20 20 20  t[i]!='/' ){.   
a240: 20 20 20 7a 4c 69 6e 65 5b 69 2b 31 5d 20 3d 20     zLine[i+1] = 
a250: 7a 53 63 72 69 70 74 5b 69 5d 3b 0a 20 20 20 20  zScript[i];.    
a260: 20 20 69 2b 2b 3b 0a 20 20 20 20 7d 0a 20 20 20    i++;.    }.   
a270: 20 7a 4c 69 6e 65 5b 69 2b 31 5d 20 3d 20 30 3b   zLine[i+1] = 0;
a280: 0a 20 20 20 20 69 66 28 20 73 74 61 74 28 7a 4c  .    if( stat(zL
a290: 69 6e 65 2c 26 73 74 61 74 62 75 66 29 21 3d 30  ine,&statbuf)!=0
a2a0: 20 29 7b 0a 20 20 20 20 20 20 69 6e 74 20 73 74   ){.      int st
a2b0: 69 6c 6c 53 65 61 72 63 68 69 6e 67 20 3d 20 31  illSearching = 1
a2c0: 3b 0a 20 20 20 20 20 20 77 68 69 6c 65 28 20 73  ;.      while( s
a2d0: 74 69 6c 6c 53 65 61 72 63 68 69 6e 67 20 26 26  tillSearching &&
a2e0: 20 69 3e 30 20 29 7b 0a 20 20 20 20 20 20 20 20   i>0 ){.        
a2f0: 77 68 69 6c 65 28 20 69 3e 30 20 26 26 20 7a 4c  while( i>0 && zL
a300: 69 6e 65 5b 69 5d 21 3d 27 2f 27 20 29 7b 20 69  ine[i]!='/' ){ i
a310: 2d 2d 3b 20 7d 0a 20 20 20 20 20 20 20 20 73 74  --; }.        st
a320: 72 63 70 79 28 26 7a 4c 69 6e 65 5b 69 5d 2c 20  rcpy(&zLine[i], 
a330: 22 2f 6e 6f 74 2d 66 6f 75 6e 64 2e 68 74 6d 6c  "/not-found.html
a340: 22 29 3b 0a 20 20 20 20 20 20 20 20 69 66 28 20  ");.        if( 
a350: 73 74 61 74 28 7a 4c 69 6e 65 2c 26 73 74 61 74  stat(zLine,&stat
a360: 62 75 66 29 3d 3d 30 20 26 26 20 53 5f 49 53 52  buf)==0 && S_ISR
a370: 45 47 28 73 74 61 74 62 75 66 2e 73 74 5f 6d 6f  EG(statbuf.st_mo
a380: 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20  de).            
a390: 26 26 20 61 63 63 65 73 73 28 7a 4c 69 6e 65 2c  && access(zLine,
a3a0: 52 5f 4f 4b 29 3d 3d 30 20 29 7b 0a 20 20 20 20  R_OK)==0 ){.    
a3b0: 20 20 20 20 20 20 7a 52 65 61 6c 53 63 72 69 70        zRealScrip
a3c0: 74 20 3d 20 53 74 72 44 75 70 28 26 7a 4c 69 6e  t = StrDup(&zLin
a3d0: 65 5b 31 5d 29 3b 0a 20 20 20 20 20 20 20 20 20  e[1]);.         
a3e0: 20 52 65 64 69 72 65 63 74 28 7a 52 65 61 6c 53   Redirect(zRealS
a3f0: 63 72 69 70 74 2c 20 31 29 3b 0a 20 20 20 20 20  cript, 1);.     
a400: 20 20 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 20       return;.   
a410: 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20       }else{.    
a420: 20 20 20 20 20 20 69 2d 2d 3b 0a 20 20 20 20 20        i--;.     
a430: 20 20 20 7d 0a 20 20 20 20 20 20 7d 0a 20 20 20     }.      }.   
a440: 20 20 20 69 66 28 20 73 74 69 6c 6c 53 65 61 72     if( stillSear
a450: 63 68 69 6e 67 20 29 20 4e 6f 74 46 6f 75 6e 64  ching ) NotFound
a460: 28 5f 5f 4c 49 4e 45 5f 5f 29 3b 0a 20 20 20 20  (__LINE__);.    
a470: 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 7d 0a 20    break;.    }. 
a480: 20 20 20 69 66 28 20 53 5f 49 53 52 45 47 28 73     if( S_ISREG(s
a490: 74 61 74 62 75 66 2e 73 74 5f 6d 6f 64 65 29 20  tatbuf.st_mode) 
a4a0: 29 7b 0a 20 20 20 20 20 20 69 66 28 20 61 63 63  ){.      if( acc
a4b0: 65 73 73 28 7a 4c 69 6e 65 2c 52 5f 4f 4b 29 20  ess(zLine,R_OK) 
a4c0: 29 7b 0a 20 20 20 20 20 20 20 20 4e 6f 74 46 6f  ){.        NotFo
a4d0: 75 6e 64 28 5f 5f 4c 49 4e 45 5f 5f 29 3b 0a 20  und(__LINE__);. 
a4e0: 20 20 20 20 20 7d 0a 20 20 20 20 20 20 7a 52 65       }.      zRe
a4f0: 61 6c 53 63 72 69 70 74 20 3d 20 53 74 72 44 75  alScript = StrDu
a500: 70 28 26 7a 4c 69 6e 65 5b 31 5d 29 3b 0a 20 20  p(&zLine[1]);.  
a510: 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 7d      break;.    }
a520: 0a 20 20 20 20 69 66 28 20 7a 53 63 72 69 70 74  .    if( zScript
a530: 5b 69 5d 3d 3d 30 20 7c 7c 20 7a 53 63 72 69 70  [i]==0 || zScrip
a540: 74 5b 69 2b 31 5d 3d 3d 30 20 29 7b 0a 20 20 20  t[i+1]==0 ){.   
a550: 20 20 20 73 74 72 63 70 79 28 26 7a 4c 69 6e 65     strcpy(&zLine
a560: 5b 69 2b 31 5d 2c 22 2f 69 6e 64 65 78 2e 68 74  [i+1],"/index.ht
a570: 6d 6c 22 29 3b 0a 20 20 20 20 20 20 69 66 28 20  ml");.      if( 
a580: 73 74 61 74 28 7a 4c 69 6e 65 2c 26 73 74 61 74  stat(zLine,&stat
a590: 62 75 66 29 21 3d 30 20 7c 7c 20 21 53 5f 49 53  buf)!=0 || !S_IS
a5a0: 52 45 47 28 73 74 61 74 62 75 66 2e 73 74 5f 6d  REG(statbuf.st_m
a5b0: 6f 64 65 29 20 0a 20 20 20 20 20 20 7c 7c 20 61  ode) .      || a
a5c0: 63 63 65 73 73 28 7a 4c 69 6e 65 2c 52 5f 4f 4b  ccess(zLine,R_OK
a5d0: 29 20 29 7b 0a 20 20 20 20 20 20 20 20 73 74 72  ) ){.        str
a5e0: 63 70 79 28 26 7a 4c 69 6e 65 5b 69 2b 31 5d 2c  cpy(&zLine[i+1],
a5f0: 22 2f 69 6e 64 65 78 2e 63 67 69 22 29 3b 0a 20  "/index.cgi");. 
a600: 20 20 20 20 20 20 20 69 66 28 20 73 74 61 74 28         if( stat(
a610: 7a 4c 69 6e 65 2c 26 73 74 61 74 62 75 66 29 21  zLine,&statbuf)!
a620: 3d 30 20 7c 7c 20 21 53 5f 49 53 52 45 47 28 73  =0 || !S_ISREG(s
a630: 74 61 74 62 75 66 2e 73 74 5f 6d 6f 64 65 29 20  tatbuf.st_mode) 
a640: 0a 20 20 20 20 20 20 20 20 7c 7c 20 61 63 63 65  .        || acce
a650: 73 73 28 7a 4c 69 6e 65 2c 52 5f 4f 4b 29 20 29  ss(zLine,R_OK) )
a660: 7b 0a 20 20 20 20 20 20 20 20 20 20 4e 6f 74 46  {.          NotF
a670: 6f 75 6e 64 28 5f 5f 4c 49 4e 45 5f 5f 29 3b 0a  ound(__LINE__);.
a680: 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20          }.      
a690: 7d 0a 20 20 20 20 20 20 7a 52 65 61 6c 53 63 72  }.      zRealScr
a6a0: 69 70 74 20 3d 20 53 74 72 44 75 70 28 26 7a 4c  ipt = StrDup(&zL
a6b0: 69 6e 65 5b 31 5d 29 3b 0a 20 20 20 20 20 20 69  ine[1]);.      i
a6c0: 66 28 20 7a 53 63 72 69 70 74 5b 69 5d 3d 3d 30  f( zScript[i]==0
a6d0: 20 29 7b 0a 20 20 20 20 20 20 20 20 2f 2a 20 49   ){.        /* I
a6e0: 66 20 74 68 65 20 72 65 71 75 65 73 74 65 64 20  f the requested 
a6f0: 55 52 4c 20 64 6f 65 73 20 6e 6f 74 20 65 6e 64  URL does not end
a700: 20 77 69 74 68 20 22 2f 22 20 62 75 74 20 77 65   with "/" but we
a710: 20 68 61 64 20 74 6f 0a 20 20 20 20 20 20 20 20   had to.        
a720: 2a 2a 20 61 70 70 65 6e 64 20 22 69 6e 64 65 78  ** append "index
a730: 2e 68 74 6d 6c 22 2c 20 74 68 65 6e 20 61 20 72  .html", then a r
a740: 65 64 69 72 65 63 74 20 69 73 20 6e 65 63 65 73  edirect is neces
a750: 73 61 72 79 2e 20 20 4f 74 68 65 72 77 69 73 65  sary.  Otherwise
a760: 0a 20 20 20 20 20 20 20 20 2a 2a 20 6e 6f 6e 65  .        ** none
a770: 20 6f 66 20 74 68 65 20 72 65 6c 61 74 69 76 65   of the relative
a780: 20 55 52 4c 73 20 69 6e 20 74 68 65 20 64 65 6c   URLs in the del
a790: 69 76 65 72 65 64 20 64 6f 63 75 6d 65 6e 74 20  ivered document 
a7a0: 77 69 6c 6c 20 62 65 0a 20 20 20 20 20 20 20 20  will be.        
a7b0: 2a 2a 20 63 6f 72 72 65 63 74 2e 20 2a 2f 0a 20  ** correct. */. 
a7c0: 20 20 20 20 20 20 20 52 65 64 69 72 65 63 74 28         Redirect(
a7d0: 7a 52 65 61 6c 53 63 72 69 70 74 2c 20 31 29 3b  zRealScript, 1);
a7e0: 0a 20 20 20 20 20 20 20 20 72 65 74 75 72 6e 3b  .        return;
a7f0: 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 62  .      }.      b
a800: 72 65 61 6b 3b 0a 20 20 20 20 7d 0a 20 20 20 20  reak;.    }.    
a810: 7a 4c 69 6e 65 5b 69 2b 31 5d 20 3d 20 7a 53 63  zLine[i+1] = zSc
a820: 72 69 70 74 5b 69 5d 3b 0a 20 20 20 20 69 2b 2b  ript[i];.    i++
a830: 3b 0a 20 20 7d 0a 20 20 7a 46 69 6c 65 20 3d 20  ;.  }.  zFile = 
a840: 53 74 72 44 75 70 28 7a 4c 69 6e 65 29 3b 0a 20  StrDup(zLine);. 
a850: 20 7a 50 61 74 68 49 6e 66 6f 20 3d 20 53 74 72   zPathInfo = Str
a860: 44 75 70 28 26 7a 53 63 72 69 70 74 5b 69 5d 29  Dup(&zScript[i])
a870: 3b 0a 20 20 6c 65 6e 46 69 6c 65 20 3d 20 73 74  ;.  lenFile = st
a880: 72 6c 65 6e 28 7a 46 69 6c 65 29 3b 0a 20 20 7a  rlen(zFile);.  z
a890: 44 69 72 20 3d 20 53 74 72 44 75 70 28 7a 46 69  Dir = StrDup(zFi
a8a0: 6c 65 29 3b 0a 20 20 66 6f 72 28 69 3d 73 74 72  le);.  for(i=str
a8b0: 6c 65 6e 28 7a 44 69 72 29 2d 31 3b 20 69 3e 30  len(zDir)-1; i>0
a8c0: 20 26 26 20 7a 44 69 72 5b 69 5d 21 3d 27 2f 27   && zDir[i]!='/'
a8d0: 3b 20 69 2d 2d 29 7b 7d 3b 0a 20 20 69 66 28 20  ; i--){};.  if( 
a8e0: 69 3d 3d 30 20 29 7b 0a 20 20 20 20 20 73 74 72  i==0 ){.     str
a8f0: 63 70 79 28 7a 44 69 72 2c 22 2f 22 29 3b 0a 20  cpy(zDir,"/");. 
a900: 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 7a 44 69   }else{.     zDi
a910: 72 5b 69 5d 20 3d 20 30 3b 0a 20 20 7d 0a 0a 20  r[i] = 0;.  }.. 
a920: 20 2f 2a 20 43 68 65 63 6b 20 74 6f 20 73 65 65   /* Check to see
a930: 20 69 66 20 74 68 65 72 65 20 69 73 20 61 6e 20   if there is an 
a940: 61 75 74 68 6f 72 69 7a 61 74 69 6f 6e 20 66 69  authorization fi
a950: 6c 65 2e 20 20 49 66 20 74 68 65 72 65 20 69 73  le.  If there is
a960: 2c 0a 20 20 2a 2a 20 70 72 6f 63 65 73 73 20 69  ,.  ** process i
a970: 74 2e 0a 20 20 2a 2f 0a 20 20 73 70 72 69 6e 74  t..  */.  sprint
a980: 66 28 7a 4c 69 6e 65 2c 20 22 25 73 2f 2d 61 75  f(zLine, "%s/-au
a990: 74 68 22 2c 20 7a 44 69 72 29 3b 0a 20 20 69 66  th", zDir);.  if
a9a0: 28 20 61 63 63 65 73 73 28 7a 4c 69 6e 65 2c 52  ( access(zLine,R
a9b0: 5f 4f 4b 29 3d 3d 30 20 26 26 20 21 43 68 65 63  _OK)==0 && !Chec
a9c0: 6b 42 61 73 69 63 41 75 74 68 6f 72 69 7a 61 74  kBasicAuthorizat
a9d0: 69 6f 6e 28 7a 4c 69 6e 65 29 20 29 20 72 65 74  ion(zLine) ) ret
a9e0: 75 72 6e 3b 0a 0a 20 20 2f 2a 20 54 61 6b 65 20  urn;..  /* Take 
a9f0: 61 70 70 72 6f 70 72 69 61 74 65 20 61 63 74 69  appropriate acti
aa00: 6f 6e 0a 20 20 2a 2f 0a 20 20 69 66 28 20 28 73  on.  */.  if( (s
aa10: 74 61 74 62 75 66 2e 73 74 5f 6d 6f 64 65 20 26  tatbuf.st_mode &
aa20: 20 30 31 30 30 29 3d 3d 30 31 30 30 20 26 26 20   0100)==0100 && 
aa30: 61 63 63 65 73 73 28 7a 46 69 6c 65 2c 58 5f 4f  access(zFile,X_O
aa40: 4b 29 3d 3d 30 20 29 7b 0a 20 20 20 20 2f 2a 0a  K)==0 ){.    /*.
aa50: 20 20 20 20 2a 2a 20 54 68 65 20 66 6f 6c 6c 6f      ** The follo
aa60: 77 69 6e 67 73 20 73 74 61 74 69 63 20 76 61 72  wings static var
aa70: 69 61 62 6c 65 73 20 61 72 65 20 75 73 65 64 20  iables are used 
aa80: 74 6f 20 73 65 74 75 70 20 74 68 65 20 65 6e 76  to setup the env
aa90: 69 72 6f 6e 6d 65 6e 74 0a 20 20 20 20 2a 2a 20  ironment.    ** 
aaa0: 66 6f 72 20 74 68 65 20 43 47 49 20 73 63 72 69  for the CGI scri
aab0: 70 74 0a 20 20 20 20 2a 2f 0a 20 20 20 20 73 74  pt.    */.    st
aac0: 61 74 69 63 20 63 68 61 72 20 2a 64 65 66 61 75  atic char *defau
aad0: 6c 74 5f 70 61 74 68 20 3d 20 22 2f 62 69 6e 3a  lt_path = "/bin:
aae0: 2f 75 73 72 2f 62 69 6e 22 3b 0a 20 20 20 20 73  /usr/bin";.    s
aaf0: 74 61 74 69 63 20 63 68 61 72 20 2a 67 61 74 65  tatic char *gate
ab00: 77 61 79 5f 69 6e 74 65 72 66 61 63 65 20 3d 20  way_interface = 
ab10: 22 43 47 49 2f 31 2e 30 22 3b 0a 20 20 20 20 73  "CGI/1.0";.    s
ab20: 74 61 74 69 63 20 73 74 72 75 63 74 20 7b 0a 20  tatic struct {. 
ab30: 20 20 20 20 20 63 68 61 72 20 2a 7a 45 6e 76 4e       char *zEnvN
ab40: 61 6d 65 3b 0a 20 20 20 20 20 20 63 68 61 72 20  ame;.      char 
ab50: 2a 2a 70 7a 45 6e 76 56 61 6c 75 65 3b 0a 20 20  **pzEnvValue;.  
ab60: 20 20 7d 20 63 67 69 65 6e 76 5b 5d 20 3d 20 7b    } cgienv[] = {
ab70: 0a 20 20 20 20 20 20 7b 20 22 41 55 54 48 5f 54  .      { "AUTH_T
ab80: 59 50 45 22 2c 20 20 20 20 20 20 20 20 20 20 20  YPE",           
ab90: 20 20 20 20 20 20 20 20 26 7a 41 75 74 68 54 79          &zAuthTy
aba0: 70 65 20 7d 2c 0a 20 20 20 20 20 20 7b 20 22 41  pe },.      { "A
abb0: 55 54 48 5f 43 4f 4e 54 45 4e 54 22 2c 20 20 20  UTH_CONTENT",   
abc0: 20 20 20 20 20 20 20 20 20 20 20 20 20 26 7a 41               &zA
abd0: 75 74 68 41 72 67 20 7d 2c 0a 20 20 20 20 20 20  uthArg },.      
abe0: 7b 20 22 43 4f 4e 54 45 4e 54 5f 4c 45 4e 47 54  { "CONTENT_LENGT
abf0: 48 22 2c 20 20 20 20 20 20 20 20 20 20 20 20 20  H",             
ac00: 20 26 7a 43 6f 6e 74 65 6e 74 4c 65 6e 67 74 68   &zContentLength
ac10: 20 7d 2c 0a 20 20 20 20 20 20 7b 20 22 43 4f 4e   },.      { "CON
ac20: 54 45 4e 54 5f 54 59 50 45 22 2c 20 20 20 20 20  TENT_TYPE",     
ac30: 20 20 20 20 20 20 20 20 20 20 20 26 7a 43 6f 6e             &zCon
ac40: 74 65 6e 74 54 79 70 65 20 7d 2c 0a 20 20 20 20  tentType },.    
ac50: 20 20 7b 20 22 44 4f 43 55 4d 45 4e 54 5f 52 4f    { "DOCUMENT_RO
ac60: 4f 54 22 2c 20 20 20 20 20 20 20 20 20 20 20 20  OT",            
ac70: 20 20 20 26 7a 48 6f 6d 65 20 7d 2c 0a 20 20 20     &zHome },.   
ac80: 20 20 20 7b 20 22 47 41 54 45 57 41 59 5f 49 4e     { "GATEWAY_IN
ac90: 54 45 52 46 41 43 45 22 2c 20 20 20 20 20 20 20  TERFACE",       
aca0: 20 20 20 20 26 67 61 74 65 77 61 79 5f 69 6e 74      &gateway_int
acb0: 65 72 66 61 63 65 20 7d 2c 0a 20 20 20 20 20 20  erface },.      
acc0: 7b 20 22 48 54 54 50 5f 41 43 43 45 50 54 22 2c  { "HTTP_ACCEPT",
acd0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
ace0: 20 26 7a 41 63 63 65 70 74 20 7d 2c 0a 20 20 20   &zAccept },.   
acf0: 20 20 20 7b 20 22 48 54 54 50 5f 43 4f 4f 4b 49     { "HTTP_COOKI
ad00: 45 22 2c 20 20 20 20 20 20 20 20 20 20 20 20 20  E",             
ad10: 20 20 20 20 26 7a 43 6f 6f 6b 69 65 20 7d 2c 0a      &zCookie },.
ad20: 20 20 20 20 20 20 7b 20 22 48 54 54 50 5f 48 4f        { "HTTP_HO
ad30: 53 54 22 2c 20 20 20 20 20 20 20 20 20 20 20 20  ST",            
ad40: 20 20 20 20 20 20 20 26 7a 48 74 74 70 48 6f 73         &zHttpHos
ad50: 74 20 7d 2c 0a 20 20 20 20 20 20 7b 20 22 48 54  t },.      { "HT
ad60: 54 50 5f 52 45 46 45 52 45 52 22 2c 20 20 20 20  TP_REFERER",    
ad70: 20 20 20 20 20 20 20 20 20 20 20 20 26 7a 52 65              &zRe
ad80: 66 65 72 65 72 20 7d 2c 0a 20 20 20 20 20 20 7b  ferer },.      {
ad90: 20 22 48 54 54 50 5f 55 53 45 52 5f 41 47 45 4e   "HTTP_USER_AGEN
ada0: 54 22 2c 20 20 20 20 20 20 20 20 20 20 20 20 20  T",             
adb0: 26 7a 41 67 65 6e 74 20 7d 2c 0a 20 20 20 20 20  &zAgent },.     
adc0: 20 7b 20 22 50 41 54 48 22 2c 20 20 20 20 20 20   { "PATH",      
add0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
ade0: 20 20 26 64 65 66 61 75 6c 74 5f 70 61 74 68 20    &default_path 
adf0: 7d 2c 0a 20 20 20 20 20 20 7b 20 22 50 41 54 48  },.      { "PATH
ae00: 5f 49 4e 46 4f 22 2c 20 20 20 20 20 20 20 20 20  _INFO",         
ae10: 20 20 20 20 20 20 20 20 20 20 26 7a 50 61 74 68            &zPath
ae20: 49 6e 66 6f 20 7d 2c 0a 20 20 20 20 20 20 7b 20  Info },.      { 
ae30: 22 51 55 45 52 59 5f 53 54 52 49 4e 47 22 2c 20  "QUERY_STRING", 
ae40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 26                 &
ae50: 7a 51 75 65 72 79 53 74 72 69 6e 67 20 7d 2c 0a  zQueryString },.
ae60: 20 20 20 20 20 20 7b 20 22 52 45 4d 4f 54 45 5f        { "REMOTE_
ae70: 41 44 44 52 22 2c 20 20 20 20 20 20 20 20 20 20  ADDR",          
ae80: 20 20 20 20 20 20 20 26 7a 52 65 6d 6f 74 65 41         &zRemoteA
ae90: 64 64 72 20 7d 2c 0a 20 20 20 20 20 20 7b 20 22  ddr },.      { "
aea0: 52 45 51 55 45 53 54 5f 4d 45 54 48 4f 44 22 2c  REQUEST_METHOD",
aeb0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 26 7a                &z
aec0: 4d 65 74 68 6f 64 20 7d 2c 0a 20 20 20 20 20 20  Method },.      
aed0: 7b 20 22 52 45 51 55 45 53 54 5f 55 52 49 22 2c  { "REQUEST_URI",
aee0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
aef0: 20 26 7a 53 63 72 69 70 74 20 7d 2c 0a 20 20 20   &zScript },.   
af00: 20 20 20 7b 20 22 52 45 4d 4f 54 45 5f 55 53 45     { "REMOTE_USE
af10: 52 22 2c 20 20 20 20 20 20 20 20 20 20 20 20 20  R",             
af20: 20 20 20 20 26 7a 52 65 6d 6f 74 65 55 73 65 72      &zRemoteUser
af30: 20 7d 2c 0a 20 20 20 20 20 20 7b 20 22 53 43 52   },.      { "SCR
af40: 49 50 54 5f 44 49 52 45 43 54 4f 52 59 22 2c 20  IPT_DIRECTORY", 
af50: 20 20 20 20 20 20 20 20 20 20 20 26 7a 44 69 72             &zDir
af60: 20 7d 2c 0a 20 20 20 20 20 20 7b 20 22 53 43 52   },.      { "SCR
af70: 49 50 54 5f 46 49 4c 45 4e 41 4d 45 22 2c 20 20  IPT_FILENAME",  
af80: 20 20 20 20 20 20 20 20 20 20 20 26 7a 46 69 6c             &zFil
af90: 65 20 7d 2c 0a 20 20 20 20 20 20 7b 20 22 53 43  e },.      { "SC
afa0: 52 49 50 54 5f 4e 41 4d 45 22 2c 20 20 20 20 20  RIPT_NAME",     
afb0: 20 20 20 20 20 20 20 20 20 20 20 20 26 7a 52 65              &zRe
afc0: 61 6c 53 63 72 69 70 74 20 7d 2c 0a 20 20 20 20  alScript },.    
afd0: 20 20 7b 20 22 53 45 52 56 45 52 5f 4e 41 4d 45    { "SERVER_NAME
afe0: 22 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20  ",              
aff0: 20 20 20 26 7a 53 65 72 76 65 72 4e 61 6d 65 20     &zServerName 
b000: 7d 2c 0a 20 20 20 20 20 20 7b 20 22 53 45 52 56  },.      { "SERV
b010: 45 52 5f 50 4f 52 54 22 2c 20 20 20 20 20 20 20  ER_PORT",       
b020: 20 20 20 20 20 20 20 20 20 20 26 7a 53 65 72 76            &zServ
b030: 65 72 50 6f 72 74 20 7d 2c 0a 20 20 20 20 20 20  erPort },.      
b040: 7b 20 22 53 45 52 56 45 52 5f 50 52 4f 54 4f 43  { "SERVER_PROTOC
b050: 4f 4c 22 2c 20 20 20 20 20 20 20 20 20 20 20 20  OL",            
b060: 20 26 7a 50 72 6f 74 6f 63 6f 6c 20 7d 2c 0a 20   &zProtocol },. 
b070: 20 20 20 7d 3b 0a 20 20 20 20 63 68 61 72 20 2a     };.    char *
b080: 7a 42 61 73 65 46 69 6c 65 6e 61 6d 65 3b 20 20  zBaseFilename;  
b090: 20 2f 2a 20 46 69 6c 65 6e 61 6d 65 20 77 69 74   /* Filename wit
b0a0: 68 6f 75 74 20 64 69 72 65 63 74 6f 72 79 20 70  hout directory p
b0b0: 72 65 66 69 78 20 2a 2f 0a 0a 20 20 20 20 2f 2a  refix */..    /*
b0c0: 20 49 66 20 69 74 73 20 65 78 65 63 75 74 61 62   If its executab
b0d0: 6c 65 2c 20 69 74 20 6d 75 73 74 20 62 65 20 61  le, it must be a
b0e0: 20 43 47 49 20 70 72 6f 67 72 61 6d 2e 20 20 53   CGI program.  S
b0f0: 74 61 72 74 20 62 79 0a 20 20 20 20 2a 2a 20 63  tart by.    ** c
b100: 68 61 6e 67 69 6e 67 20 64 69 72 65 63 74 6f 72  hanging director
b110: 69 65 73 20 74 6f 20 74 68 65 20 64 69 72 65 63  ies to the direc
b120: 74 6f 72 79 20 68 6f 6c 64 69 6e 67 20 74 68 65  tory holding the
b130: 20 70 72 6f 67 72 61 6d 2e 0a 20 20 20 20 2a 2f   program..    */
b140: 0a 20 20 20 20 69 66 28 20 63 68 64 69 72 28 7a  .    if( chdir(z
b150: 44 69 72 29 20 29 7b 0a 20 20 20 20 20 20 63 68  Dir) ){.      ch
b160: 61 72 20 7a 42 75 66 5b 31 30 30 30 5d 3b 0a 20  ar zBuf[1000];. 
b170: 20 20 20 20 20 4d 61 6c 66 75 6e 63 74 69 6f 6e       Malfunction
b180: 28 5f 5f 4c 49 4e 45 5f 5f 2c 20 22 63 61 6e 6e  (__LINE__, "cann
b190: 6f 74 20 63 68 64 69 72 20 74 6f 20 5b 25 73 5d  ot chdir to [%s]
b1a0: 20 66 72 6f 6d 20 5b 25 73 5d 22 2c 20 0a 20 20   from [%s]", .  
b1b0: 20 20 20 20 20 20 20 20 20 7a 44 69 72 2c 20 67           zDir, g
b1c0: 65 74 63 77 64 28 7a 42 75 66 2c 39 39 39 29 29  etcwd(zBuf,999))
b1d0: 3b 0a 20 20 20 20 7d 0a 0a 20 20 20 20 2f 2a 20  ;.    }..    /* 
b1e0: 53 65 74 75 70 20 74 68 65 20 65 6e 76 69 72 6f  Setup the enviro
b1f0: 6e 6d 65 6e 74 20 61 70 70 72 6f 70 72 69 61 74  nment appropriat
b200: 65 6c 79 2e 0a 20 20 20 20 2a 2f 0a 20 20 20 20  ely..    */.    
b210: 66 6f 72 28 69 3d 30 3b 20 69 3c 28 69 6e 74 29  for(i=0; i<(int)
b220: 28 73 69 7a 65 6f 66 28 63 67 69 65 6e 76 29 2f  (sizeof(cgienv)/
b230: 73 69 7a 65 6f 66 28 63 67 69 65 6e 76 5b 30 5d  sizeof(cgienv[0]
b240: 29 29 3b 20 69 2b 2b 29 7b 0a 20 20 20 20 20 20  )); i++){.      
b250: 69 66 28 20 2a 63 67 69 65 6e 76 5b 69 5d 2e 70  if( *cgienv[i].p
b260: 7a 45 6e 76 56 61 6c 75 65 20 29 7b 0a 20 20 20  zEnvValue ){.   
b270: 20 20 20 20 20 53 65 74 45 6e 76 28 63 67 69 65       SetEnv(cgie
b280: 6e 76 5b 69 5d 2e 7a 45 6e 76 4e 61 6d 65 2c 2a  nv[i].zEnvName,*
b290: 63 67 69 65 6e 76 5b 69 5d 2e 70 7a 45 6e 76 56  cgienv[i].pzEnvV
b2a0: 61 6c 75 65 29 3b 0a 20 20 20 20 20 20 7d 0a 20  alue);.      }. 
b2b0: 20 20 20 7d 0a 20 20 20 20 69 66 28 20 75 73 65     }.    if( use
b2c0: 48 74 74 70 73 20 29 7b 0a 20 20 20 20 20 20 70  Https ){.      p
b2d0: 75 74 65 6e 76 28 22 48 54 54 50 53 3d 6f 6e 22  utenv("HTTPS=on"
b2e0: 29 3b 0a 20 20 20 20 7d 0a 0a 20 20 20 20 2f 2a  );.    }..    /*
b2f0: 0a 20 20 20 20 2a 2a 20 41 62 6f 72 74 20 77 69  .    ** Abort wi
b300: 74 68 20 61 6e 20 65 72 72 6f 72 20 69 66 20 74  th an error if t
b310: 68 65 20 43 47 49 20 73 63 72 69 70 74 20 69 73  he CGI script is
b320: 20 77 72 69 74 61 62 6c 65 20 62 79 20 61 6e 79   writable by any
b330: 6f 6e 65 20 6f 74 68 65 72 0a 20 20 20 20 2a 2a  one other.    **
b340: 20 74 68 61 6e 20 69 74 73 20 6f 77 6e 65 72 2e   than its owner.
b350: 0a 20 20 20 20 2a 2f 0a 20 20 20 20 69 66 28 20  .    */.    if( 
b360: 73 74 61 74 62 75 66 2e 73 74 5f 6d 6f 64 65 20  statbuf.st_mode 
b370: 26 20 30 30 32 32 20 29 7b 0a 20 20 20 20 20 20  & 0022 ){.      
b380: 43 67 69 53 63 72 69 70 74 57 72 69 74 61 62 6c  CgiScriptWritabl
b390: 65 28 29 3b 0a 20 20 20 20 7d 0a 0a 20 20 20 20  e();.    }..    
b3a0: 2f 2a 20 46 6f 72 20 74 68 65 20 50 4f 53 54 20  /* For the POST 
b3b0: 6d 65 74 68 6f 64 20 61 6c 6c 20 69 6e 70 75 74  method all input
b3c0: 20 68 61 73 20 62 65 65 6e 20 77 72 69 74 74 65   has been writte
b3d0: 6e 20 74 6f 20 61 20 74 65 6d 70 6f 72 61 72 79  n to a temporary
b3e0: 20 66 69 6c 65 2c 0a 20 20 20 20 2a 2a 20 73 6f   file,.    ** so
b3f0: 20 77 65 20 68 61 76 65 20 74 6f 20 72 65 64 69   we have to redi
b400: 72 65 63 74 20 69 6e 70 75 74 20 74 6f 20 74 68  rect input to th
b410: 65 20 43 47 49 20 73 63 72 69 70 74 20 66 72 6f  e CGI script fro
b420: 6d 20 74 68 61 74 20 66 69 6c 65 2e 0a 20 20 20  m that file..   
b430: 20 2a 2f 0a 20 20 20 20 69 66 28 20 7a 4d 65 74   */.    if( zMet
b440: 68 6f 64 5b 30 5d 3d 3d 27 50 27 20 29 7b 0a 20  hod[0]=='P' ){. 
b450: 20 20 20 20 20 64 75 70 28 30 29 3b 0a 20 20 20       dup(0);.   
b460: 20 20 20 63 6c 6f 73 65 28 30 29 3b 0a 20 20 20     close(0);.   
b470: 20 20 20 6f 70 65 6e 28 7a 54 6d 70 4e 61 6d 2c     open(zTmpNam,
b480: 20 4f 5f 52 44 4f 4e 4c 59 29 3b 0a 20 20 20 20   O_RDONLY);.    
b490: 7d 0a 0a 20 20 20 20 66 6f 72 28 69 3d 73 74 72  }..    for(i=str
b4a0: 6c 65 6e 28 7a 46 69 6c 65 29 2d 31 3b 20 69 3e  len(zFile)-1; i>
b4b0: 3d 30 20 26 26 20 7a 46 69 6c 65 5b 69 5d 21 3d  =0 && zFile[i]!=
b4c0: 27 2f 27 3b 20 69 2d 2d 29 7b 7d 0a 20 20 20 20  '/'; i--){}.    
b4d0: 7a 42 61 73 65 46 69 6c 65 6e 61 6d 65 20 3d 20  zBaseFilename = 
b4e0: 26 7a 46 69 6c 65 5b 69 2b 31 5d 3b 0a 20 20 20  &zFile[i+1];.   
b4f0: 20 69 66 28 20 69 3e 3d 30 20 26 26 20 73 74 72   if( i>=0 && str
b500: 6e 63 6d 70 28 7a 42 61 73 65 46 69 6c 65 6e 61  ncmp(zBaseFilena
b510: 6d 65 2c 22 6e 70 68 2d 22 2c 34 29 3d 3d 30 20  me,"nph-",4)==0 
b520: 29 7b 0a 20 20 20 20 20 20 2f 2a 20 49 66 20 74  ){.      /* If t
b530: 68 65 20 6e 61 6d 65 20 6f 66 20 74 68 65 20 43  he name of the C
b540: 47 49 20 73 63 72 69 70 74 20 62 65 67 69 6e 73  GI script begins
b550: 20 77 69 74 68 20 22 6e 70 68 2d 22 20 74 68 65   with "nph-" the
b560: 6e 20 77 65 20 61 72 65 0a 20 20 20 20 20 20 2a  n we are.      *
b570: 2a 20 64 65 61 6c 69 6e 67 20 77 69 74 68 20 61  * dealing with a
b580: 20 22 6e 6f 6e 2d 70 61 72 73 65 64 20 68 65 61   "non-parsed hea
b590: 64 65 72 73 22 20 43 47 49 20 73 63 72 69 70 74  ders" CGI script
b5a0: 2e 20 20 4a 75 73 74 20 65 78 65 63 28 29 0a 20  .  Just exec(). 
b5b0: 20 20 20 20 20 2a 2a 20 69 74 20 64 69 72 65 63       ** it direc
b5c0: 74 6c 79 20 61 6e 64 20 6c 65 74 20 69 74 20 68  tly and let it h
b5d0: 61 6e 64 6c 65 20 61 6c 6c 20 69 74 73 20 6f 77  andle all its ow
b5e0: 6e 20 68 65 61 64 65 72 20 67 65 6e 65 72 61 74  n header generat
b5f0: 69 6f 6e 2e 0a 20 20 20 20 20 20 2a 2f 0a 20 20  ion..      */.  
b600: 20 20 20 20 65 78 65 63 6c 28 7a 42 61 73 65 46      execl(zBaseF
b610: 69 6c 65 6e 61 6d 65 2c 7a 42 61 73 65 46 69 6c  ilename,zBaseFil
b620: 65 6e 61 6d 65 2c 28 63 68 61 72 2a 29 30 29 3b  ename,(char*)0);
b630: 0a 20 20 20 20 20 20 2f 2a 20 4e 4f 54 45 3a 20  .      /* NOTE: 
b640: 4e 6f 20 6c 6f 67 20 65 6e 74 72 79 20 77 72 69  No log entry wri
b650: 74 74 65 6e 20 66 6f 72 20 6e 70 68 2d 20 73 63  tten for nph- sc
b660: 72 69 70 74 73 20 2a 2f 0a 20 20 20 20 20 20 65  ripts */.      e
b670: 78 69 74 28 30 29 3b 0a 20 20 20 20 7d 0a 0a 20  xit(0);.    }.. 
b680: 20 20 20 2f 2a 20 46 61 6c 6c 20 74 68 72 75 20     /* Fall thru 
b690: 74 6f 20 68 65 72 65 20 6f 6e 6c 79 20 69 66 20  to here only if 
b6a0: 74 68 69 73 20 70 72 6f 63 65 73 73 20 28 74 68  this process (th
b6b0: 65 20 73 65 72 76 65 72 29 20 69 73 20 67 6f 69  e server) is goi
b6c0: 6e 67 0a 20 20 20 20 2a 2a 20 74 6f 20 72 65 61  ng.    ** to rea
b6d0: 64 20 61 6e 64 20 61 75 67 6d 65 6e 74 20 74 68  d and augment th
b6e0: 65 20 68 65 61 64 65 72 20 73 65 6e 74 20 62 61  e header sent ba
b6f0: 63 6b 20 62 79 20 74 68 65 20 43 47 49 20 70 72  ck by the CGI pr
b700: 6f 63 65 73 73 2e 0a 20 20 20 20 2a 2a 20 4f 70  ocess..    ** Op
b710: 65 6e 20 61 20 70 69 70 65 20 74 6f 20 72 65 63  en a pipe to rec
b720: 65 69 76 65 20 74 68 65 20 6f 75 74 70 75 74 20  eive the output 
b730: 66 72 6f 6d 20 74 68 65 20 43 47 49 20 70 72 6f  from the CGI pro
b740: 63 65 73 73 2e 20 20 54 68 65 6e 0a 20 20 20 20  cess.  Then.    
b750: 2a 2a 20 66 6f 72 6b 20 74 68 65 20 43 47 49 20  ** fork the CGI 
b760: 70 72 6f 63 65 73 73 2e 20 20 4f 6e 63 65 20 65  process.  Once e
b770: 76 65 72 79 74 68 69 6e 67 20 69 73 20 64 6f 6e  verything is don
b780: 65 2c 20 77 65 20 73 68 6f 75 6c 64 20 62 65 0a  e, we should be.
b790: 20 20 20 20 2a 2a 20 61 62 6c 65 20 74 6f 20 72      ** able to r
b7a0: 65 61 64 20 74 68 65 20 6f 75 74 70 75 74 20 6f  ead the output o
b7b0: 66 20 43 47 49 20 6f 6e 20 74 68 65 20 22 69 6e  f CGI on the "in
b7c0: 22 20 73 74 72 65 61 6d 2e 0a 20 20 20 20 2a 2f  " stream..    */
b7d0: 0a 20 20 20 20 7b 0a 20 20 20 20 20 20 69 6e 74  .    {.      int
b7e0: 20 70 78 5b 32 5d 3b 0a 20 20 20 20 20 20 70 69   px[2];.      pi
b7f0: 70 65 28 70 78 29 3b 0a 20 20 20 20 20 20 69 66  pe(px);.      if
b800: 28 20 66 6f 72 6b 28 29 3d 3d 30 20 29 7b 0a 20  ( fork()==0 ){. 
b810: 20 20 20 20 20 20 20 63 6c 6f 73 65 28 70 78 5b         close(px[
b820: 30 5d 29 3b 0a 20 20 20 20 20 20 20 20 63 6c 6f  0]);.        clo
b830: 73 65 28 31 29 3b 0a 20 20 20 20 20 20 20 20 64  se(1);.        d
b840: 75 70 28 70 78 5b 31 5d 29 3b 0a 20 20 20 20 20  up(px[1]);.     
b850: 20 20 20 63 6c 6f 73 65 28 70 78 5b 31 5d 29 3b     close(px[1]);
b860: 0a 20 20 20 20 20 20 20 20 65 78 65 63 6c 28 7a  .        execl(z
b870: 42 61 73 65 46 69 6c 65 6e 61 6d 65 2c 20 7a 42  BaseFilename, zB
b880: 61 73 65 46 69 6c 65 6e 61 6d 65 2c 20 28 63 68  aseFilename, (ch
b890: 61 72 2a 29 30 29 3b 0a 20 20 20 20 20 20 20 20  ar*)0);.        
b8a0: 65 78 69 74 28 30 29 3b 0a 20 20 20 20 20 20 7d  exit(0);.      }
b8b0: 0a 20 20 20 20 20 20 63 6c 6f 73 65 28 70 78 5b  .      close(px[
b8c0: 31 5d 29 3b 0a 20 20 20 20 20 20 69 6e 20 3d 20  1]);.      in = 
b8d0: 66 64 6f 70 65 6e 28 70 78 5b 30 5d 2c 20 22 72  fdopen(px[0], "r
b8e0: 22 29 3b 0a 20 20 20 20 7d 0a 20 20 20 20 69 66  ");.    }.    if
b8f0: 28 20 69 6e 3d 3d 30 20 29 7b 0a 20 20 20 20 20  ( in==0 ){.     
b900: 20 43 67 69 45 72 72 6f 72 28 29 3b 0a 20 20 20   CgiError();.   
b910: 20 7d 0a 0a 20 20 20 20 2f 2a 20 52 65 61 64 20   }..    /* Read 
b920: 61 6e 64 20 70 72 6f 63 65 73 73 20 74 68 65 20  and process the 
b930: 66 69 72 73 74 20 6c 69 6e 65 20 6f 66 20 74 68  first line of th
b940: 65 20 68 65 61 64 65 72 20 72 65 74 75 72 6e 65  e header returne
b950: 64 20 62 79 20 74 68 65 0a 20 20 20 20 2a 2a 20  d by the.    ** 
b960: 43 47 49 20 73 63 72 69 70 74 2e 0a 20 20 20 20  CGI script..    
b970: 2a 2f 0a 20 20 20 20 69 66 28 20 75 73 65 54 69  */.    if( useTi
b980: 6d 65 6f 75 74 20 29 20 61 6c 61 72 6d 28 31 35  meout ) alarm(15
b990: 29 3b 0a 20 20 20 20 77 68 69 6c 65 28 20 66 67  );.    while( fg
b9a0: 65 74 73 28 7a 4c 69 6e 65 2c 73 69 7a 65 6f 66  ets(zLine,sizeof
b9b0: 28 7a 4c 69 6e 65 29 2c 69 6e 29 20 29 7b 0a 20  (zLine),in) ){. 
b9c0: 20 20 20 20 20 69 66 28 20 73 74 72 6e 63 6d 70       if( strncmp
b9d0: 28 7a 4c 69 6e 65 2c 22 4c 6f 63 61 74 69 6f 6e  (zLine,"Location
b9e0: 3a 22 2c 39 29 3d 3d 30 20 29 7b 0a 20 20 20 20  :",9)==0 ){.    
b9f0: 20 20 20 20 69 6e 74 20 69 3b 0a 20 20 20 20 20      int i;.     
ba00: 20 20 20 52 65 6d 6f 76 65 4e 65 77 6c 69 6e 65     RemoveNewline
ba10: 28 7a 4c 69 6e 65 29 3b 0a 20 20 20 20 20 20 20  (zLine);.       
ba20: 20 7a 20 3d 20 26 7a 4c 69 6e 65 5b 31 30 5d 3b   z = &zLine[10];
ba30: 0a 20 20 20 20 20 20 20 20 77 68 69 6c 65 28 20  .        while( 
ba40: 69 73 73 70 61 63 65 28 2a 7a 29 20 29 7b 20 7a  isspace(*z) ){ z
ba50: 2b 2b 3b 20 7d 0a 20 20 20 20 20 20 20 20 66 6f  ++; }.        fo
ba60: 72 28 69 3d 30 3b 20 7a 5b 69 5d 3b 20 69 2b 2b  r(i=0; z[i]; i++
ba70: 29 7b 0a 20 20 20 20 20 20 20 20 20 20 69 66 28  ){.          if(
ba80: 20 7a 5b 69 5d 3d 3d 27 3f 27 20 29 7b 0a 20 20   z[i]=='?' ){.  
ba90: 20 20 20 20 20 20 20 20 20 20 7a 51 75 65 72 79            zQuery
baa0: 53 75 66 66 69 78 20 3d 20 53 74 72 44 75 70 28  Suffix = StrDup(
bab0: 22 22 29 3b 0a 20 20 20 20 20 20 20 20 20 20 7d  "");.          }
bac0: 0a 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20  .        }.     
bad0: 20 20 20 0a 20 20 20 20 20 20 20 20 69 66 28 20     .        if( 
bae0: 7a 5b 30 5d 3d 3d 27 2f 27 20 26 26 20 7a 5b 31  z[0]=='/' && z[1
baf0: 5d 3d 3d 27 2f 27 20 29 7b 0a 20 20 20 20 20 20  ]=='/' ){.      
bb00: 20 20 20 20 2f 2a 20 54 68 65 20 73 63 68 65 6d      /* The schem
bb10: 65 20 69 73 20 6d 69 73 73 69 6e 67 2e 20 20 41  e is missing.  A
bb20: 64 64 20 69 74 20 69 6e 20 62 65 66 6f 72 65 20  dd it in before 
bb30: 72 65 64 69 72 65 63 74 69 6e 67 20 2a 2f 0a 20  redirecting */. 
bb40: 20 20 20 20 20 20 20 20 20 53 74 61 72 74 52 65           StartRe
bb50: 73 70 6f 6e 73 65 28 22 33 30 32 20 52 65 64 69  sponse("302 Redi
bb60: 72 65 63 74 22 29 3b 0a 20 20 20 20 20 20 20 20  rect");.        
bb70: 20 20 6e 4f 75 74 20 2b 3d 20 70 72 69 6e 74 66    nOut += printf
bb80: 28 22 4c 6f 63 61 74 69 6f 6e 3a 20 25 73 3a 25  ("Location: %s:%
bb90: 73 25 73 5c 72 5c 6e 22 2c 7a 48 74 74 70 2c 7a  s%s\r\n",zHttp,z
bba0: 2c 7a 51 75 65 72 79 53 75 66 66 69 78 29 3b 0a  ,zQuerySuffix);.
bbb0: 20 20 20 20 20 20 20 20 20 20 62 72 65 61 6b 3b            break;
bbc0: 20 2f 2a 20 44 4b 20 2a 2f 0a 20 20 20 20 20 20   /* DK */.      
bbd0: 20 20 20 20 4d 61 6b 65 4c 6f 67 45 6e 74 72 79      MakeLogEntry
bbe0: 28 30 29 3b 0a 20 20 20 20 20 20 20 20 20 20 72  (0);.          r
bbf0: 65 74 75 72 6e 3b 0a 20 20 20 20 20 20 20 20 7d  eturn;.        }
bc00: 65 6c 73 65 20 69 66 28 20 7a 5b 30 5d 3d 3d 27  else if( z[0]=='
bc10: 2f 27 20 29 7b 0a 20 20 20 20 20 20 20 20 20 20  /' ){.          
bc20: 2f 2a 20 54 68 65 20 73 63 68 65 6d 65 20 61 6e  /* The scheme an
bc30: 64 20 6e 65 74 77 6f 72 6b 20 6c 6f 63 61 74 69  d network locati
bc40: 6f 6e 20 61 72 65 20 6d 69 73 73 69 6e 67 20 62  on are missing b
bc50: 75 74 20 77 65 20 68 61 76 65 0a 20 20 20 20 20  ut we have.     
bc60: 20 20 20 20 20 2a 2a 20 61 6e 20 61 62 73 6f 6c       ** an absol
bc70: 75 74 65 20 70 61 74 68 2e 20 2a 2f 0a 20 20 20  ute path. */.   
bc80: 20 20 20 20 20 20 20 52 65 64 69 72 65 63 74 28         Redirect(
bc90: 7a 2c 20 30 29 3b 20 2f 2a 20 44 4b 20 2a 2f 0a  z, 0); /* DK */.
bca0: 20 20 20 20 20 20 20 20 20 20 62 72 65 61 6b 3b            break;
bcb0: 0a 20 20 20 20 20 20 20 20 7d 0a 20 20 20 20 20  .        }.     
bcc0: 20 20 20 2f 2a 20 43 68 65 63 6b 20 74 6f 20 73     /* Check to s
bcd0: 65 65 20 69 66 20 74 68 65 72 65 20 69 73 20 61  ee if there is a
bce0: 20 73 63 68 65 6d 65 20 70 72 65 66 69 78 20 2a   scheme prefix *
bcf0: 2f 0a 20 20 20 20 20 20 20 20 66 6f 72 28 69 3d  /.        for(i=
bd00: 30 3b 20 7a 5b 69 5d 20 26 26 20 7a 5b 69 5d 21  0; z[i] && z[i]!
bd10: 3d 27 3a 27 20 26 26 20 7a 5b 69 5d 21 3d 27 2f  =':' && z[i]!='/
bd20: 27 3b 20 69 2b 2b 29 7b 7d 0a 20 20 20 20 20 20  '; i++){}.      
bd30: 20 20 69 66 28 20 7a 5b 69 5d 3d 3d 27 3a 27 20    if( z[i]==':' 
bd40: 29 7b 0a 20 20 20 20 20 20 20 20 20 20 2f 2a 20  ){.          /* 
bd50: 57 65 20 68 61 76 65 20 61 20 73 63 68 65 6d 65  We have a scheme
bd60: 2e 20 20 41 73 73 75 6d 65 20 74 68 65 72 65 20  .  Assume there 
bd70: 69 73 20 61 6e 20 61 62 73 6f 6c 75 74 65 20 55  is an absolute U
bd80: 52 4c 20 2a 2f 0a 20 20 20 20 20 20 20 20 20 20  RL */.          
bd90: 53 74 61 72 74 52 65 73 70 6f 6e 73 65 28 22 33  StartResponse("3
bda0: 30 32 20 52 65 64 69 72 65 63 74 22 29 3b 0a 20  02 Redirect");. 
bdb0: 20 20 20 20 20 20 20 20 20 6e 4f 75 74 20 2b 3d           nOut +=
bdc0: 20 70 72 69 6e 74 66 28 22 4c 6f 63 61 74 69 6f   printf("Locatio
bdd0: 6e 3a 20 25 73 25 73 5c 72 5c 6e 22 2c 7a 2c 7a  n: %s%s\r\n",z,z
bde0: 51 75 65 72 79 53 75 66 66 69 78 29 3b 0a 20 20  QuerySuffix);.  
bdf0: 20 20 20 20 20 20 20 20 62 72 65 61 6b 3b 20 2f          break; /
be00: 2a 20 44 4b 20 2a 2f 0a 20 20 20 20 20 20 20 20  * DK */.        
be10: 20 20 4d 61 6b 65 4c 6f 67 45 6e 74 72 79 28 30    MakeLogEntry(0
be20: 29 3b 0a 20 20 20 20 20 20 20 20 20 20 72 65 74  );.          ret
be30: 75 72 6e 3b 0a 20 20 20 20 20 20 20 20 7d 0a 20  urn;.        }. 
be40: 20 20 20 20 20 20 20 2f 2a 20 4d 75 73 74 20 62         /* Must b
be50: 65 20 61 20 72 65 6c 61 74 69 76 65 20 70 61 74  e a relative pat
be60: 68 6e 61 6d 65 2e 20 20 43 6f 6e 73 74 72 75 63  hname.  Construc
be70: 74 20 74 68 65 20 61 62 73 6f 6c 75 74 65 20 70  t the absolute p
be80: 61 74 68 6e 61 6d 65 0a 20 20 20 20 20 20 20 20  athname.        
be90: 2a 2a 20 61 6e 64 20 72 65 64 69 72 65 63 74 20  ** and redirect 
bea0: 74 6f 20 69 74 2e 20 2a 2f 0a 20 20 20 20 20 20  to it. */.      
beb0: 20 20 69 20 3d 20 73 74 72 6c 65 6e 28 7a 52 65    i = strlen(zRe
bec0: 61 6c 53 63 72 69 70 74 29 3b 0a 20 20 20 20 20  alScript);.     
bed0: 20 20 20 77 68 69 6c 65 28 20 69 3e 30 20 26 26     while( i>0 &&
bee0: 20 7a 52 65 61 6c 53 63 72 69 70 74 5b 69 2d 31   zRealScript[i-1
bef0: 5d 21 3d 27 2f 27 20 29 7b 20 69 2d 2d 3b 20 7d  ]!='/' ){ i--; }
bf00: 0a 20 20 20 20 20 20 20 20 77 68 69 6c 65 28 20  .        while( 
bf10: 69 3e 30 20 26 26 20 7a 52 65 61 6c 53 63 72 69  i>0 && zRealScri
bf20: 70 74 5b 69 2d 31 5d 3d 3d 27 2f 27 20 29 7b 20  pt[i-1]=='/' ){ 
bf30: 69 2d 2d 3b 20 7d 0a 20 20 20 20 20 20 20 20 77  i--; }.        w
bf40: 68 69 6c 65 28 20 2a 7a 3d 3d 27 2e 27 20 29 7b  hile( *z=='.' ){
bf50: 0a 20 20 20 20 20 20 20 20 20 20 69 66 28 20 7a  .          if( z
bf60: 5b 31 5d 3d 3d 27 2f 27 20 29 7b 0a 20 20 20 20  [1]=='/' ){.    
bf70: 20 20 20 20 20 20 20 20 7a 20 2b 3d 20 32 3b 0a          z += 2;.
bf80: 20 20 20 20 20 20 20 20 20 20 7d 65 6c 73 65 20            }else 
bf90: 69 66 28 20 7a 5b 31 5d 3d 3d 27 2e 27 20 26 26  if( z[1]=='.' &&
bfa0: 20 7a 5b 32 5d 3d 3d 27 2f 27 20 29 7b 0a 20 20   z[2]=='/' ){.  
bfb0: 20 20 20 20 20 20 20 20 20 20 77 68 69 6c 65 28            while(
bfc0: 20 69 3e 30 20 26 26 20 7a 52 65 61 6c 53 63 72   i>0 && zRealScr
bfd0: 69 70 74 5b 69 2d 31 5d 21 3d 27 2f 27 20 29 7b  ipt[i-1]!='/' ){
bfe0: 20 69 2d 2d 3b 20 7d 0a 20 20 20 20 20 20 20 20   i--; }.        
bff0: 20 20 20 20 77 68 69 6c 65 28 20 69 3e 30 20 26      while( i>0 &
c000: 26 20 7a 52 65 61 6c 53 63 72 69 70 74 5b 69 2d  & zRealScript[i-
c010: 31 5d 3d 3d 27 2f 27 20 29 7b 20 69 2d 2d 3b 20  1]=='/' ){ i--; 
c020: 7d 0a 20 20 20 20 20 20 20 20 20 20 20 20 7a 20  }.            z 
c030: 2b 3d 20 33 3b 0a 20 20 20 20 20 20 20 20 20 20  += 3;.          
c040: 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 20 20 20  }else{.         
c050: 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 20 20     break;.      
c060: 20 20 20 20 7d 0a 20 20 20 20 20 20 20 20 7d 0a      }.        }.
c070: 20 20 20 20 20 20 20 20 53 74 61 72 74 52 65 73          StartRes
c080: 70 6f 6e 73 65 28 22 33 30 32 20 52 65 64 69 72  ponse("302 Redir
c090: 65 63 74 22 29 3b 0a 20 20 20 20 20 20 20 20 6e  ect");.        n
c0a0: 4f 75 74 20 2b 3d 20 70 72 69 6e 74 66 28 22 4c  Out += printf("L
c0b0: 6f 63 61 74 69 6f 6e 3a 20 25 73 3a 2f 2f 25 73  ocation: %s://%s
c0c0: 22 2c 7a 48 74 74 70 2c 7a 53 65 72 76 65 72 4e  ",zHttp,zServerN
c0d0: 61 6d 65 29 3b 0a 20 20 20 20 20 20 20 20 69 66  ame);.        if
c0e0: 28 20 73 74 72 63 6d 70 28 7a 53 65 72 76 65 72  ( strcmp(zServer
c0f0: 50 6f 72 74 2c 22 38 30 22 29 20 29 7b 0a 20 20  Port,"80") ){.  
c100: 20 20 20 20 20 20 20 20 6e 4f 75 74 20 2b 3d 20          nOut += 
c110: 70 72 69 6e 74 66 28 22 3a 25 73 22 2c 7a 53 65  printf(":%s",zSe
c120: 72 76 65 72 50 6f 72 74 29 3b 0a 20 20 20 20 20  rverPort);.     
c130: 20 20 20 7d 0a 20 20 20 20 20 20 20 20 6e 4f 75     }.        nOu
c140: 74 20 2b 3d 20 70 72 69 6e 74 66 28 22 25 2e 2a  t += printf("%.*
c150: 73 2f 25 73 25 73 5c 72 5c 6e 5c 72 5c 6e 22 2c  s/%s%s\r\n\r\n",
c160: 69 2c 7a 52 65 61 6c 53 63 72 69 70 74 2c 7a 2c  i,zRealScript,z,
c170: 7a 51 75 65 72 79 53 75 66 66 69 78 29 3b 0a 20  zQuerySuffix);. 
c180: 20 20 20 20 20 20 20 4d 61 6b 65 4c 6f 67 45 6e         MakeLogEn
c190: 74 72 79 28 30 29 3b 0a 20 20 20 20 20 20 20 20  try(0);.        
c1a0: 72 65 74 75 72 6e 3b 0a 20 20 20 20 20 20 7d 65  return;.      }e
c1b0: 6c 73 65 20 69 66 28 20 73 74 72 6e 63 6d 70 28  lse if( strncmp(
c1c0: 7a 4c 69 6e 65 2c 22 53 74 61 74 75 73 3a 22 2c  zLine,"Status:",
c1d0: 37 29 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 20  7)==0 ){.       
c1e0: 20 69 6e 74 20 69 3b 0a 20 20 20 20 20 20 20 20   int i;.        
c1f0: 66 6f 72 28 69 3d 37 3b 20 69 73 73 70 61 63 65  for(i=7; isspace
c200: 28 7a 4c 69 6e 65 5b 69 5d 29 3b 20 69 2b 2b 29  (zLine[i]); i++)
c210: 7b 7d 0a 20 20 20 20 20 20 20 20 6e 4f 75 74 20  {}.        nOut 
c220: 2b 3d 20 70 72 69 6e 74 66 28 22 25 73 20 25 73  += printf("%s %s
c230: 22 2c 20 7a 50 72 6f 74 6f 63 6f 6c 2c 20 26 7a  ", zProtocol, &z
c240: 4c 69 6e 65 5b 69 5d 29 3b 0a 20 20 20 20 20 20  Line[i]);.      
c250: 20 20 73 74 72 6e 63 70 79 28 7a 52 65 70 6c 79    strncpy(zReply
c260: 53 74 61 74 75 73 2c 20 26 7a 4c 69 6e 65 5b 69  Status, &zLine[i
c270: 5d 2c 20 33 29 3b 0a 20 20 20 20 20 20 20 20 7a  ], 3);.        z
c280: 52 65 70 6c 79 53 74 61 74 75 73 5b 33 5d 20 3d  ReplyStatus[3] =
c290: 20 30 3b 0a 20 20 20 20 20 20 20 20 73 74 61 74   0;.        stat
c2a0: 75 73 53 65 6e 74 20 3d 20 31 3b 0a 20 20 20 20  usSent = 1;.    
c2b0: 20 20 20 20 62 72 65 61 6b 3b 0a 20 20 20 20 20      break;.     
c2c0: 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 20 20   }else{.        
c2d0: 69 6e 74 20 69 3b 0a 20 20 20 20 20 20 20 20 53  int i;.        S
c2e0: 74 61 72 74 52 65 73 70 6f 6e 73 65 28 22 32 30  tartResponse("20
c2f0: 30 20 4f 4b 22 29 3b 0a 20 20 20 20 20 20 20 20  0 OK");.        
c300: 6e 4f 75 74 20 2b 3d 20 70 72 69 6e 74 66 28 22  nOut += printf("
c310: 25 73 22 2c 7a 4c 69 6e 65 29 3b 0a 20 20 20 20  %s",zLine);.    
c320: 20 20 20 20 66 6f 72 28 69 3d 30 3b 20 7a 4c 69      for(i=0; zLi
c330: 6e 65 5b 69 5d 20 26 26 20 21 69 73 73 70 61 63  ne[i] && !isspac
c340: 65 28 7a 4c 69 6e 65 5b 69 5d 29 20 26 26 20 7a  e(zLine[i]) && z
c350: 4c 69 6e 65 5b 69 5d 21 3d 27 3a 27 3b 20 69 2b  Line[i]!=':'; i+
c360: 2b 29 7b 7d 0a 20 20 20 20 20 20 20 20 69 66 28  +){}.        if(
c370: 20 69 3c 32 20 7c 7c 20 7a 4c 69 6e 65 5b 69 5d   i<2 || zLine[i]
c380: 21 3d 27 3a 27 20 29 20 62 72 65 61 6b 3b 0a 20  !=':' ) break;. 
c390: 20 20 20 20 20 7d 0a 20 20 20 20 7d 0a 0a 20 20       }.    }..  
c3a0: 20 20 2f 2a 20 43 6f 70 79 20 65 76 65 72 79 74    /* Copy everyt
c3b0: 68 69 6e 67 20 65 6c 73 65 20 74 68 72 75 20 77  hing else thru w
c3c0: 69 74 68 6f 75 74 20 63 68 61 6e 67 65 20 6f 72  ithout change or
c3d0: 20 61 6e 61 6c 79 73 69 73 2e 0a 20 20 20 20 2a   analysis..    *
c3e0: 2f 0a 20 20 20 20 69 66 28 20 75 73 65 54 69 6d  /.    if( useTim
c3f0: 65 6f 75 74 20 29 20 61 6c 61 72 6d 28 36 30 2a  eout ) alarm(60*
c400: 35 29 3b 0a 20 20 20 20 77 68 69 6c 65 28 20 28  5);.    while( (
c410: 63 20 3d 20 67 65 74 63 28 69 6e 29 29 21 3d 45  c = getc(in))!=E
c420: 4f 46 20 29 7b 0a 20 20 20 20 20 20 70 75 74 63  OF ){.      putc
c430: 28 63 2c 73 74 64 6f 75 74 29 3b 0a 20 20 20 20  (c,stdout);.    
c440: 20 20 6e 4f 75 74 2b 2b 3b 0a 20 20 20 20 7d 0a    nOut++;.    }.
c450: 20 20 20 20 66 63 6c 6f 73 65 28 69 6e 29 3b 0a      fclose(in);.
c460: 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 2f 2a 20    }else{.    /* 
c470: 49 66 20 69 74 20 69 73 6e 27 74 20 65 78 65 63  If it isn't exec
c480: 75 74 61 62 6c 65 20 74 68 65 6e 20 69 74 0a 20  utable then it. 
c490: 20 20 20 2a 2a 20 6d 75 73 74 20 61 20 73 69 6d     ** must a sim
c4a0: 70 6c 65 20 66 69 6c 65 20 74 68 61 74 20 6e 65  ple file that ne
c4b0: 65 64 73 20 74 6f 20 62 65 20 63 6f 70 69 65 64  eds to be copied
c4c0: 20 74 6f 20 6f 75 74 70 75 74 2e 0a 20 20 20 20   to output..    
c4d0: 2a 2f 0a 20 20 20 20 63 6f 6e 73 74 20 63 68 61  */.    const cha
c4e0: 72 20 2a 7a 43 6f 6e 74 65 6e 74 54 79 70 65 20  r *zContentType 
c4f0: 3d 20 47 65 74 4d 69 6d 65 54 79 70 65 28 7a 46  = GetMimeType(zF
c500: 69 6c 65 2c 20 6c 65 6e 46 69 6c 65 29 3b 0a 0a  ile, lenFile);..
c510: 20 20 20 20 69 66 28 20 7a 54 6d 70 4e 61 6d 20      if( zTmpNam 
c520: 29 20 75 6e 6c 69 6e 6b 28 7a 54 6d 70 4e 61 6d  ) unlink(zTmpNam
c530: 29 3b 0a 20 20 20 20 69 6e 20 3d 20 66 6f 70 65  );.    in = fope
c540: 6e 28 7a 46 69 6c 65 2c 22 72 22 29 3b 0a 20 20  n(zFile,"r");.  
c550: 20 20 69 66 28 20 69 6e 3d 3d 30 20 29 20 4e 6f    if( in==0 ) No
c560: 74 46 6f 75 6e 64 28 5f 5f 4c 49 4e 45 5f 5f 29  tFound(__LINE__)
c570: 3b 0a 20 20 20 20 53 74 61 72 74 52 65 73 70 6f  ;.    StartRespo
c580: 6e 73 65 28 22 32 30 30 20 4f 4b 22 29 3b 0a 20  nse("200 OK");. 
c590: 20 20 20 6e 4f 75 74 20 2b 3d 20 44 61 74 65 54     nOut += DateT
c5a0: 61 67 28 22 4c 61 73 74 2d 4d 6f 64 69 66 69 65  ag("Last-Modifie
c5b0: 64 22 2c 20 73 74 61 74 62 75 66 2e 73 74 5f 6d  d", statbuf.st_m
c5c0: 74 69 6d 65 29 3b 0a 20 20 20 20 6e 4f 75 74 20  time);.    nOut 
c5d0: 2b 3d 20 70 72 69 6e 74 66 28 22 43 6f 6e 74 65  += printf("Conte
c5e0: 6e 74 2d 74 79 70 65 3a 20 25 73 5c 72 5c 6e 22  nt-type: %s\r\n"
c5f0: 2c 7a 43 6f 6e 74 65 6e 74 54 79 70 65 29 3b 0a  ,zContentType);.
c600: 20 20 20 20 6e 4f 75 74 20 2b 3d 20 70 72 69 6e      nOut += prin
c610: 74 66 28 22 43 6f 6e 74 65 6e 74 2d 6c 65 6e 67  tf("Content-leng
c620: 74 68 3a 20 25 64 5c 72 5c 6e 5c 72 5c 6e 22 2c  th: %d\r\n\r\n",
c630: 28 69 6e 74 29 73 74 61 74 62 75 66 2e 73 74 5f  (int)statbuf.st_
c640: 73 69 7a 65 29 3b 0a 20 20 20 20 66 66 6c 75 73  size);.    fflus
c650: 68 28 73 74 64 6f 75 74 29 3b 0a 20 20 20 20 69  h(stdout);.    i
c660: 66 28 20 73 74 72 63 6d 70 28 7a 4d 65 74 68 6f  f( strcmp(zMetho
c670: 64 2c 22 48 45 41 44 22 29 3d 3d 30 20 29 7b 0a  d,"HEAD")==0 ){.
c680: 20 20 20 20 20 20 4d 61 6b 65 4c 6f 67 45 6e 74        MakeLogEnt
c690: 72 79 28 30 29 3b 0a 20 20 20 20 20 20 66 63 6c  ry(0);.      fcl
c6a0: 6f 73 65 28 69 6e 29 3b 0a 20 20 20 20 20 20 72  ose(in);.      r
c6b0: 65 74 75 72 6e 3b 0a 20 20 20 20 7d 0a 20 20 20  eturn;.    }.   
c6c0: 20 69 66 28 20 75 73 65 54 69 6d 65 6f 75 74 20   if( useTimeout 
c6d0: 29 20 61 6c 61 72 6d 28 33 30 20 2b 20 73 74 61  ) alarm(30 + sta
c6e0: 74 62 75 66 2e 73 74 5f 73 69 7a 65 2f 31 30 30  tbuf.st_size/100
c6f0: 30 29 3b 0a 23 69 66 64 65 66 20 6c 69 6e 75 78  0);.#ifdef linux
c700: 0a 20 20 20 20 7b 0a 20 20 20 20 20 20 6f 66 66  .    {.      off
c710: 5f 74 20 6f 66 66 73 65 74 20 3d 20 30 3b 0a 20  _t offset = 0;. 
c720: 20 20 20 20 20 6e 4f 75 74 20 2b 3d 20 73 65 6e       nOut += sen
c730: 64 66 69 6c 65 28 66 69 6c 65 6e 6f 28 73 74 64  dfile(fileno(std
c740: 6f 75 74 29 2c 20 66 69 6c 65 6e 6f 28 69 6e 29  out), fileno(in)
c750: 2c 20 26 6f 66 66 73 65 74 2c 20 73 74 61 74 62  , &offset, statb
c760: 75 66 2e 73 74 5f 73 69 7a 65 29 3b 0a 20 20 20  uf.st_size);.   
c770: 20 7d 0a 23 65 6c 73 65 0a 20 20 20 20 77 68 69   }.#else.    whi
c780: 6c 65 28 20 28 63 20 3d 20 67 65 74 63 28 69 6e  le( (c = getc(in
c790: 29 29 21 3d 45 4f 46 20 29 7b 0a 20 20 20 20 20  ))!=EOF ){.     
c7a0: 20 70 75 74 63 28 63 2c 73 74 64 6f 75 74 29 3b   putc(c,stdout);
c7b0: 0a 20 20 20 20 20 20 6e 4f 75 74 2b 2b 3b 0a 20  .      nOut++;. 
c7c0: 20 20 20 7d 0a 23 65 6e 64 69 66 0a 20 20 20 20     }.#endif.    
c7d0: 66 63 6c 6f 73 65 28 69 6e 29 3b 0a 20 20 7d 0a  fclose(in);.  }.
c7e0: 20 20 66 66 6c 75 73 68 28 73 74 64 6f 75 74 29    fflush(stdout)
c7f0: 3b 0a 20 20 4d 61 6b 65 4c 6f 67 45 6e 74 72 79  ;.  MakeLogEntry
c800: 28 30 29 3b 0a 0a 20 20 2f 2a 20 54 68 65 20 6e  (0);..  /* The n
c810: 65 78 74 20 72 65 71 75 65 73 74 20 6d 75 73 74  ext request must
c820: 20 61 72 72 69 76 65 20 77 69 74 68 69 6e 20 33   arrive within 3
c830: 30 20 73 65 63 6f 6e 64 73 20 6f 72 20 77 65 20  0 seconds or we 
c840: 63 6c 6f 73 65 20 74 68 65 20 63 6f 6e 6e 65 63  close the connec
c850: 74 69 6f 6e 0a 20 20 2a 2f 0a 20 20 6f 6d 69 74  tion.  */.  omit
c860: 4c 6f 67 20 3d 20 31 3b 0a 20 20 69 66 28 20 75  Log = 1;.  if( u
c870: 73 65 54 69 6d 65 6f 75 74 20 29 20 61 6c 61 72  seTimeout ) alar
c880: 6d 28 33 30 29 3b 0a 7d 0a 0a 23 64 65 66 69 6e  m(30);.}..#defin
c890: 65 20 4d 41 58 5f 50 41 52 41 4c 4c 45 4c 20 35  e MAX_PARALLEL 5
c8a0: 30 20 20 2f 2a 20 4e 75 6d 62 65 72 20 6f 66 20  0  /* Number of 
c8b0: 73 69 6d 75 6c 74 61 6e 65 6f 75 73 20 63 68 69  simultaneous chi
c8c0: 6c 64 72 65 6e 20 2a 2f 0a 0a 2f 2a 0a 2a 2a 20  ldren */../*.** 
c8d0: 41 6c 6c 20 70 6f 73 73 69 62 6c 65 20 66 6f 72  All possible for
c8e0: 6d 73 20 6f 66 20 61 6e 20 49 50 20 61 64 64 72  ms of an IP addr
c8f0: 65 73 73 2e 20 20 4e 65 65 64 65 64 20 74 6f 20  ess.  Needed to 
c900: 77 6f 72 6b 20 61 72 6f 75 6e 64 20 47 43 43 20  work around GCC 
c910: 73 74 72 69 63 74 0a 2a 2a 20 61 6c 69 61 73 69  strict.** aliasi
c920: 6e 67 20 72 75 6c 65 73 2e 0a 2a 2f 0a 74 79 70  ng rules..*/.typ
c930: 65 64 65 66 20 75 6e 69 6f 6e 20 7b 0a 20 20 73  edef union {.  s
c940: 74 72 75 63 74 20 73 6f 63 6b 61 64 64 72 20 73  truct sockaddr s
c950: 61 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20  a;              
c960: 2f 2a 20 41 62 73 74 72 61 63 74 20 73 75 70 65  /* Abstract supe
c970: 72 63 6c 61 73 73 20 2a 2f 0a 20 20 73 74 72 75  rclass */.  stru
c980: 63 74 20 73 6f 63 6b 61 64 64 72 5f 69 6e 20 73  ct sockaddr_in s
c990: 61 34 3b 20 20 20 20 20 20 20 20 20 20 2f 2a 20  a4;          /* 
c9a0: 49 50 76 34 20 2a 2f 0a 20 20 73 74 72 75 63 74  IPv4 */.  struct
c9b0: 20 73 6f 63 6b 61 64 64 72 5f 69 6e 36 20 73 61   sockaddr_in6 sa
c9c0: 36 3b 20 20 20 20 20 20 20 20 20 2f 2a 20 49 50  6;         /* IP
c9d0: 76 36 20 2a 2f 0a 20 20 73 74 72 75 63 74 20 73  v6 */.  struct s
c9e0: 6f 63 6b 61 64 64 72 5f 73 74 6f 72 61 67 65 20  ockaddr_storage 
c9f0: 73 61 73 3b 20 20 20 20 20 2f 2a 20 53 68 6f 75  sas;     /* Shou
ca00: 6c 64 20 62 65 20 74 68 65 20 6d 61 78 69 6d 75  ld be the maximu
ca10: 6d 20 6f 66 20 74 68 65 20 61 62 6f 76 65 20 33  m of the above 3
ca20: 20 2a 2f 0a 7d 20 61 64 64 72 65 73 73 3b 0a 0a   */.} address;..
ca30: 2f 2a 0a 2a 2a 20 49 6d 70 6c 65 6d 65 6e 74 20  /*.** Implement 
ca40: 61 6e 20 48 54 54 50 20 73 65 72 76 65 72 20 64  an HTTP server d
ca50: 61 65 6d 6f 6e 20 6c 69 73 74 65 6e 69 6e 67 20  aemon listening 
ca60: 6f 6e 20 70 6f 72 74 20 69 50 6f 72 74 2e 0a 2a  on port iPort..*
ca70: 2a 0a 2a 2a 20 41 73 20 6e 65 77 20 63 6f 6e 6e  *.** As new conn
ca80: 65 63 74 69 6f 6e 73 20 61 72 72 69 76 65 2c 20  ections arrive, 
ca90: 66 6f 72 6b 20 61 20 63 68 69 6c 64 20 61 6e 64  fork a child and
caa0: 20 6c 65 74 20 63 68 69 6c 64 20 72 65 74 75 72   let child retur
cab0: 6e 0a 2a 2a 20 6f 75 74 20 6f 66 20 74 68 69 73  n.** out of this
cac0: 20 70 72 6f 63 65 64 75 72 65 20 63 61 6c 6c 2e   procedure call.
cad0: 20 20 54 68 65 20 63 68 69 6c 64 20 77 69 6c 6c    The child will
cae0: 20 68 61 6e 64 6c 65 20 74 68 65 20 72 65 71 75   handle the requ
caf0: 65 73 74 2e 0a 2a 2a 20 54 68 65 20 70 61 72 65  est..** The pare
cb00: 6e 74 20 6e 65 76 65 72 20 72 65 74 75 72 6e 73  nt never returns
cb10: 20 66 72 6f 6d 20 74 68 69 73 20 70 72 6f 63 65   from this proce
cb20: 64 75 72 65 2e 0a 2a 2a 0a 2a 2a 20 52 65 74 75  dure..**.** Retu
cb30: 72 6e 20 30 20 74 6f 20 65 61 63 68 20 63 68 69  rn 0 to each chi
cb40: 6c 64 20 61 73 20 69 74 20 72 75 6e 73 2e 20 20  ld as it runs.  
cb50: 49 66 20 75 6e 61 62 6c 65 20 74 6f 20 65 73 74  If unable to est
cb60: 61 62 6c 69 73 68 20 61 0a 2a 2a 20 6c 69 73 74  ablish a.** list
cb70: 65 6e 69 6e 67 20 73 6f 63 6b 65 74 2c 20 72 65  ening socket, re
cb80: 74 75 72 6e 20 6e 6f 6e 2d 7a 65 72 6f 2e 0a 2a  turn non-zero..*
cb90: 2f 0a 69 6e 74 20 68 74 74 70 5f 73 65 72 76 65  /.int http_serve
cba0: 72 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 50  r(const char *zP
cbb0: 6f 72 74 2c 20 69 6e 74 20 6c 6f 63 61 6c 4f 6e  ort, int localOn
cbc0: 6c 79 29 7b 0a 20 20 69 6e 74 20 6c 69 73 74 65  ly){.  int liste
cbd0: 6e 65 72 5b 32 30 5d 3b 20 20 20 20 20 20 20 20  ner[20];        
cbe0: 20 20 20 20 2f 2a 20 54 68 65 20 73 65 72 76 65      /* The serve
cbf0: 72 20 73 6f 63 6b 65 74 73 20 2a 2f 0a 20 20 69  r sockets */.  i
cc00: 6e 74 20 63 6f 6e 6e 65 63 74 69 6f 6e 3b 20 20  nt connection;  
cc10: 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 41              /* A
cc20: 20 73 6f 63 6b 65 74 20 66 6f 72 20 65 61 63 68   socket for each
cc30: 20 69 6e 64 69 76 69 64 75 61 6c 20 63 6f 6e 6e   individual conn
cc40: 65 63 74 69 6f 6e 20 2a 2f 0a 20 20 66 64 5f 73  ection */.  fd_s
cc50: 65 74 20 72 65 61 64 66 64 73 3b 20 20 20 20 20  et readfds;     
cc60: 20 20 20 20 20 20 20 20 20 2f 2a 20 53 65 74 20           /* Set 
cc70: 6f 66 20 66 69 6c 65 20 64 65 73 63 72 69 70 74  of file descript
cc80: 6f 72 73 20 66 6f 72 20 73 65 6c 65 63 74 28 29  ors for select()
cc90: 20 2a 2f 0a 20 20 61 64 64 72 65 73 73 20 69 6e   */.  address in
cca0: 61 64 64 72 3b 20 20 20 20 20 20 20 20 20 20 20  addr;           
ccb0: 20 20 20 2f 2a 20 52 65 6d 6f 74 65 20 61 64 64     /* Remote add
ccc0: 72 65 73 73 20 2a 2f 0a 20 20 73 6f 63 6b 6c 65  ress */.  sockle
ccd0: 6e 5f 74 20 6c 65 6e 61 64 64 72 3b 20 20 20 20  n_t lenaddr;    
cce0: 20 20 20 20 20 20 20 2f 2a 20 4c 65 6e 67 74 68         /* Length
ccf0: 20 6f 66 20 74 68 65 20 69 6e 61 64 64 72 20 73   of the inaddr s
cd00: 74 72 75 63 74 75 72 65 20 2a 2f 0a 20 20 69 6e  tructure */.  in
cd10: 74 20 63 68 69 6c 64 3b 20 20 20 20 20 20 20 20  t child;        
cd20: 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 50 49             /* PI
cd30: 44 20 6f 66 20 74 68 65 20 63 68 69 6c 64 20 70  D of the child p
cd40: 72 6f 63 65 73 73 20 2a 2f 0a 20 20 69 6e 74 20  rocess */.  int 
cd50: 6e 63 68 69 6c 64 72 65 6e 20 3d 20 30 3b 20 20  nchildren = 0;  
cd60: 20 20 20 20 20 20 20 20 20 2f 2a 20 4e 75 6d 62           /* Numb
cd70: 65 72 20 6f 66 20 63 68 69 6c 64 20 70 72 6f 63  er of child proc
cd80: 65 73 73 65 73 20 2a 2f 0a 20 20 73 74 72 75 63  esses */.  struc
cd90: 74 20 74 69 6d 65 76 61 6c 20 64 65 6c 61 79 3b  t timeval delay;
cda0: 20 20 20 20 20 20 20 20 2f 2a 20 48 6f 77 20 6c          /* How l
cdb0: 6f 6e 67 20 74 6f 20 77 61 69 74 20 69 6e 73 69  ong to wait insi
cdc0: 64 65 20 73 65 6c 65 63 74 28 29 20 2a 2f 0a 20  de select() */. 
cdd0: 20 69 6e 74 20 6f 70 74 20 3d 20 31 3b 20 20 20   int opt = 1;   
cde0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a                /*
cdf0: 20 73 65 74 73 6f 63 6b 6f 70 74 20 66 6c 61 67   setsockopt flag
ce00: 20 2a 2f 0a 20 20 73 74 72 75 63 74 20 61 64 64   */.  struct add
ce10: 72 69 6e 66 6f 20 73 48 69 6e 74 73 3b 20 20 20  rinfo sHints;   
ce20: 20 20 20 2f 2a 20 41 64 64 72 65 73 73 20 68 69     /* Address hi
ce30: 6e 74 73 20 2a 2f 0a 20 20 73 74 72 75 63 74 20  nts */.  struct 
ce40: 61 64 64 72 69 6e 66 6f 20 2a 70 41 64 64 72 73  addrinfo *pAddrs
ce50: 2c 20 2a 70 3b 20 2f 2a 20 2a 2f 0a 20 20 69 6e  , *p; /* */.  in
ce60: 74 20 72 63 3b 20 20 20 20 20 20 20 20 20 20 20  t rc;           
ce70: 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 52 65             /* Re
ce80: 73 75 6c 74 20 63 6f 64 65 20 2a 2f 0a 20 20 69  sult code */.  i
ce90: 6e 74 20 69 2c 20 6e 3b 0a 20 20 69 6e 74 20 6d  nt i, n;.  int m
cea0: 61 78 46 64 20 3d 20 2d 31 3b 0a 20 20 0a 20 20  axFd = -1;.  .  
ceb0: 6d 65 6d 73 65 74 28 26 73 48 69 6e 74 73 2c 20  memset(&sHints, 
cec0: 30 2c 20 73 69 7a 65 6f 66 28 73 48 69 6e 74 73  0, sizeof(sHints
ced0: 29 29 3b 0a 20 20 69 66 28 20 69 70 76 34 4f 6e  ));.  if( ipv4On
cee0: 6c 79 20 29 7b 0a 20 20 20 20 73 48 69 6e 74 73  ly ){.    sHints
cef0: 2e 61 69 5f 66 61 6d 69 6c 79 20 3d 20 50 46 5f  .ai_family = PF_
cf00: 49 4e 45 54 3b 0a 20 20 20 20 2f 2a 70 72 69 6e  INET;.    /*prin
cf10: 74 66 28 22 69 70 76 34 20 6f 6e 6c 79 5c 6e 22  tf("ipv4 only\n"
cf20: 29 3b 2a 2f 0a 20 20 7d 65 6c 73 65 20 69 66 28  );*/.  }else if(
cf30: 20 69 70 76 36 4f 6e 6c 79 20 29 7b 0a 20 20 20   ipv6Only ){.   
cf40: 20 73 48 69 6e 74 73 2e 61 69 5f 66 61 6d 69 6c   sHints.ai_famil
cf50: 79 20 3d 20 50 46 5f 49 4e 45 54 36 3b 0a 20 20  y = PF_INET6;.  
cf60: 20 20 2f 2a 70 72 69 6e 74 66 28 22 69 70 76 36    /*printf("ipv6
cf70: 20 6f 6e 6c 79 5c 6e 22 29 3b 2a 2f 0a 20 20 7d   only\n");*/.  }
cf80: 65 6c 73 65 7b 0a 20 20 20 20 73 48 69 6e 74 73  else{.    sHints
cf90: 2e 61 69 5f 66 61 6d 69 6c 79 20 3d 20 50 46 5f  .ai_family = PF_
cfa0: 55 4e 53 50 45 43 3b 0a 20 20 7d 0a 20 20 73 48  UNSPEC;.  }.  sH
cfb0: 69 6e 74 73 2e 61 69 5f 73 6f 63 6b 74 79 70 65  ints.ai_socktype
cfc0: 20 3d 20 53 4f 43 4b 5f 53 54 52 45 41 4d 3b 0a   = SOCK_STREAM;.
cfd0: 20 20 73 48 69 6e 74 73 2e 61 69 5f 66 6c 61 67    sHints.ai_flag
cfe0: 73 20 3d 20 41 49 5f 50 41 53 53 49 56 45 3b 0a  s = AI_PASSIVE;.
cff0: 20 20 73 48 69 6e 74 73 2e 61 69 5f 70 72 6f 74    sHints.ai_prot
d000: 6f 63 6f 6c 20 3d 20 30 3b 0a 20 20 72 63 20 3d  ocol = 0;.  rc =
d010: 20 67 65 74 61 64 64 72 69 6e 66 6f 28 6c 6f 63   getaddrinfo(loc
d020: 61 6c 4f 6e 6c 79 20 3f 20 22 6c 6f 63 61 6c 68  alOnly ? "localh
d030: 6f 73 74 22 3a 20 30 2c 20 7a 50 6f 72 74 2c 20  ost": 0, zPort, 
d040: 26 73 48 69 6e 74 73 2c 20 26 70 41 64 64 72 73  &sHints, &pAddrs
d050: 29 3b 0a 20 20 69 66 28 20 72 63 20 29 7b 0a 20  );.  if( rc ){. 
d060: 20 20 20 66 70 72 69 6e 74 66 28 73 74 64 65 72     fprintf(stder
d070: 72 2c 20 22 63 6f 75 6c 64 20 6e 6f 74 20 67 65  r, "could not ge
d080: 74 20 61 64 64 72 20 69 6e 66 6f 3a 20 25 73 22  t addr info: %s"
d090: 2c 20 0a 20 20 20 20 20 20 20 20 20 20 20 20 72  , .            r
d0a0: 63 21 3d 45 41 49 5f 53 59 53 54 45 4d 20 3f 20  c!=EAI_SYSTEM ? 
d0b0: 67 61 69 5f 73 74 72 65 72 72 6f 72 28 72 63 29  gai_strerror(rc)
d0c0: 20 3a 20 73 74 72 65 72 72 6f 72 28 65 72 72 6e   : strerror(errn
d0d0: 6f 29 29 3b 0a 20 20 20 20 72 65 74 75 72 6e 20  o));.    return 
d0e0: 31 3b 0a 20 20 7d 0a 20 20 66 6f 72 28 6e 3d 30  1;.  }.  for(n=0
d0f0: 2c 20 70 3d 70 41 64 64 72 73 3b 20 6e 3c 28 69  , p=pAddrs; n<(i
d100: 6e 74 29 28 73 69 7a 65 6f 66 28 6c 69 73 74 65  nt)(sizeof(liste
d110: 6e 65 72 29 2f 73 69 7a 65 6f 66 28 6c 69 73 74  ner)/sizeof(list
d120: 65 6e 65 72 5b 30 5d 29 29 20 26 26 20 70 21 3d  ener[0])) && p!=
d130: 30 3b 0a 20 20 20 20 20 20 20 20 70 3d 70 2d 3e  0;.        p=p->
d140: 61 69 5f 6e 65 78 74 29 7b 0a 20 20 20 20 6c 69  ai_next){.    li
d150: 73 74 65 6e 65 72 5b 6e 5d 20 3d 20 73 6f 63 6b  stener[n] = sock
d160: 65 74 28 70 2d 3e 61 69 5f 66 61 6d 69 6c 79 2c  et(p->ai_family,
d170: 20 70 2d 3e 61 69 5f 73 6f 63 6b 74 79 70 65 2c   p->ai_socktype,
d180: 20 70 2d 3e 61 69 5f 70 72 6f 74 6f 63 6f 6c 29   p->ai_protocol)
d190: 3b 0a 20 20 20 20 69 66 28 20 6c 69 73 74 65 6e  ;.    if( listen
d1a0: 65 72 5b 6e 5d 3e 3d 30 20 29 7b 0a 20 20 20 20  er[n]>=0 ){.    
d1b0: 20 20 2f 2a 20 69 66 20 77 65 20 63 61 6e 27 74    /* if we can't
d1c0: 20 74 65 72 6d 69 6e 61 74 65 20 6e 69 63 65 6c   terminate nicel
d1d0: 79 2c 20 61 74 20 6c 65 61 73 74 20 61 6c 6c 6f  y, at least allo
d1e0: 77 20 74 68 65 20 73 6f 63 6b 65 74 20 74 6f 20  w the socket to 
d1f0: 62 65 20 72 65 75 73 65 64 20 2a 2f 0a 20 20 20  be reused */.   
d200: 20 20 20 73 65 74 73 6f 63 6b 6f 70 74 28 6c 69     setsockopt(li
d210: 73 74 65 6e 65 72 5b 6e 5d 2c 20 53 4f 4c 5f 53  stener[n], SOL_S
d220: 4f 43 4b 45 54 2c 20 53 4f 5f 52 45 55 53 45 41  OCKET, SO_REUSEA
d230: 44 44 52 2c 26 6f 70 74 2c 20 73 69 7a 65 6f 66  DDR,&opt, sizeof
d240: 28 6f 70 74 29 29 3b 0a 20 20 20 20 20 20 0a 23  (opt));.      .#
d250: 69 66 20 64 65 66 69 6e 65 64 28 49 50 56 36 5f  if defined(IPV6_
d260: 56 36 4f 4e 4c 59 29 0a 20 20 20 20 20 20 69 66  V6ONLY).      if
d270: 28 20 70 2d 3e 61 69 5f 66 61 6d 69 6c 79 3d 3d  ( p->ai_family==
d280: 41 46 5f 49 4e 45 54 36 20 29 7b 0a 20 20 20 20  AF_INET6 ){.    
d290: 20 20 20 20 69 6e 74 20 76 36 6f 6e 6c 79 20 3d      int v6only =
d2a0: 20 31 3b 0a 20 20 20 20 20 20 20 20 73 65 74 73   1;.        sets
d2b0: 6f 63 6b 6f 70 74 28 6c 69 73 74 65 6e 65 72 5b  ockopt(listener[
d2c0: 6e 5d 2c 20 49 50 50 52 4f 54 4f 5f 49 50 56 36  n], IPPROTO_IPV6
d2d0: 2c 20 49 50 56 36 5f 56 36 4f 4e 4c 59 2c 0a 20  , IPV6_V6ONLY,. 
d2e0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
d2f0: 20 20 20 26 76 36 6f 6e 6c 79 2c 20 73 69 7a 65     &v6only, size
d300: 6f 66 28 76 36 6f 6e 6c 79 29 29 3b 0a 20 20 20  of(v6only));.   
d310: 20 20 20 7d 0a 23 65 6e 64 69 66 0a 20 20 20 20     }.#endif.    
d320: 20 20 0a 20 20 20 20 20 20 69 66 28 20 62 69 6e    .      if( bin
d330: 64 28 6c 69 73 74 65 6e 65 72 5b 6e 5d 2c 20 70  d(listener[n], p
d340: 2d 3e 61 69 5f 61 64 64 72 2c 20 70 2d 3e 61 69  ->ai_addr, p->ai
d350: 5f 61 64 64 72 6c 65 6e 29 3c 30 20 29 7b 0a 20  _addrlen)<0 ){. 
d360: 20 20 20 20 20 20 20 70 72 69 6e 74 66 28 22 62         printf("b
d370: 69 6e 64 20 66 61 69 6c 65 64 3a 20 25 73 5c 6e  ind failed: %s\n
d380: 22 2c 20 73 74 72 65 72 72 6f 72 28 65 72 72 6e  ", strerror(errn
d390: 6f 29 29 3b 0a 20 20 20 20 20 20 20 20 63 6c 6f  o));.        clo
d3a0: 73 65 28 6c 69 73 74 65 6e 65 72 5b 6e 5d 29 3b  se(listener[n]);
d3b0: 0a 20 20 20 20 20 20 20 20 63 6f 6e 74 69 6e 75  .        continu
d3c0: 65 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20  e;.      }.     
d3d0: 20 69 66 28 20 6c 69 73 74 65 6e 28 6c 69 73 74   if( listen(list
d3e0: 65 6e 65 72 5b 6e 5d 2c 20 32 30 29 3c 30 20 29  ener[n], 20)<0 )
d3f0: 7b 0a 20 20 20 20 20 20 20 20 70 72 69 6e 74 66  {.        printf
d400: 28 22 6c 69 73 74 65 6e 28 29 20 66 61 69 6c 65  ("listen() faile
d410: 64 3a 20 25 73 5c 6e 22 2c 20 73 74 72 65 72 72  d: %s\n", strerr
d420: 6f 72 28 65 72 72 6e 6f 29 29 3b 0a 20 20 20 20  or(errno));.    
d430: 20 20 20 20 63 6c 6f 73 65 28 6c 69 73 74 65 6e      close(listen
d440: 65 72 5b 6e 5d 29 3b 0a 20 20 20 20 20 20 20 20  er[n]);.        
d450: 63 6f 6e 74 69 6e 75 65 3b 0a 20 20 20 20 20 20  continue;.      
d460: 7d 0a 20 20 20 20 20 20 6e 2b 2b 3b 0a 20 20 20  }.      n++;.   
d470: 20 7d 0a 20 20 7d 0a 20 20 69 66 28 20 6e 3d 3d   }.  }.  if( n==
d480: 30 20 29 7b 0a 20 20 20 20 66 70 72 69 6e 74 66  0 ){.    fprintf
d490: 28 73 74 64 65 72 72 2c 20 22 63 61 6e 6e 6f 74  (stderr, "cannot
d4a0: 20 6f 70 65 6e 20 61 6e 79 20 73 6f 63 6b 65 74   open any socket
d4b0: 73 5c 6e 22 29 3b 0a 20 20 20 20 72 65 74 75 72  s\n");.    retur
d4c0: 6e 20 31 3b 0a 20 20 7d 0a 0a 20 20 77 68 69 6c  n 1;.  }..  whil
d4d0: 65 28 20 31 20 29 7b 0a 20 20 20 20 69 66 28 20  e( 1 ){.    if( 
d4e0: 6e 63 68 69 6c 64 72 65 6e 3e 4d 41 58 5f 50 41  nchildren>MAX_PA
d4f0: 52 41 4c 4c 45 4c 20 29 7b 0a 20 20 20 20 20 20  RALLEL ){.      
d500: 2f 2a 20 53 6c 6f 77 20 64 6f 77 6e 20 69 66 20  /* Slow down if 
d510: 63 6f 6e 6e 65 63 74 69 6f 6e 73 20 61 72 65 20  connections are 
d520: 61 72 72 69 76 69 6e 67 20 74 6f 6f 20 66 61 73  arriving too fas
d530: 74 20 2a 2f 0a 20 20 20 20 20 20 73 6c 65 65 70  t */.      sleep
d540: 28 20 6e 63 68 69 6c 64 72 65 6e 2d 4d 41 58 5f  ( nchildren-MAX_
d550: 50 41 52 41 4c 4c 45 4c 20 29 3b 0a 20 20 20 20  PARALLEL );.    
d560: 7d 0a 20 20 20 20 64 65 6c 61 79 2e 74 76 5f 73  }.    delay.tv_s
d570: 65 63 20 3d 20 36 30 3b 0a 20 20 20 20 64 65 6c  ec = 60;.    del
d580: 61 79 2e 74 76 5f 75 73 65 63 20 3d 20 30 3b 0a  ay.tv_usec = 0;.
d590: 20 20 20 20 46 44 5f 5a 45 52 4f 28 26 72 65 61      FD_ZERO(&rea
d5a0: 64 66 64 73 29 3b 0a 20 20 20 20 66 6f 72 28 69  dfds);.    for(i
d5b0: 3d 30 3b 20 69 3c 6e 3b 20 69 2b 2b 29 7b 0a 20  =0; i<n; i++){. 
d5c0: 20 20 20 20 20 61 73 73 65 72 74 28 20 6c 69 73       assert( lis
d5d0: 74 65 6e 65 72 5b 69 5d 3e 3d 30 20 29 3b 0a 20  tener[i]>=0 );. 
d5e0: 20 20 20 20 20 46 44 5f 53 45 54 28 20 6c 69 73       FD_SET( lis
d5f0: 74 65 6e 65 72 5b 69 5d 2c 20 26 72 65 61 64 66  tener[i], &readf
d600: 64 73 29 3b 0a 20 20 20 20 20 20 69 66 28 20 6c  ds);.      if( l
d610: 69 73 74 65 6e 65 72 5b 69 5d 3e 6d 61 78 46 64  istener[i]>maxFd
d620: 20 29 20 6d 61 78 46 64 20 3d 20 6c 69 73 74 65   ) maxFd = liste
d630: 6e 65 72 5b 69 5d 3b 0a 20 20 20 20 7d 0a 20 20  ner[i];.    }.  
d640: 20 20 73 65 6c 65 63 74 28 20 6d 61 78 46 64 2b    select( maxFd+
d650: 31 2c 20 26 72 65 61 64 66 64 73 2c 20 30 2c 20  1, &readfds, 0, 
d660: 30 2c 20 26 64 65 6c 61 79 29 3b 0a 20 20 20 20  0, &delay);.    
d670: 66 6f 72 28 69 3d 30 3b 20 69 3c 6e 3b 20 69 2b  for(i=0; i<n; i+
d680: 2b 29 7b 0a 20 20 20 20 20 20 69 66 28 20 46 44  +){.      if( FD
d690: 5f 49 53 53 45 54 28 6c 69 73 74 65 6e 65 72 5b  _ISSET(listener[
d6a0: 69 5d 2c 20 26 72 65 61 64 66 64 73 29 20 29 7b  i], &readfds) ){
d6b0: 0a 20 20 20 20 20 20 20 20 6c 65 6e 61 64 64 72  .        lenaddr
d6c0: 20 3d 20 73 69 7a 65 6f 66 28 69 6e 61 64 64 72   = sizeof(inaddr
d6d0: 29 3b 0a 20 20 20 20 20 20 20 20 63 6f 6e 6e 65  );.        conne
d6e0: 63 74 69 6f 6e 20 3d 20 61 63 63 65 70 74 28 6c  ction = accept(l
d6f0: 69 73 74 65 6e 65 72 5b 69 5d 2c 20 26 69 6e 61  istener[i], &ina
d700: 64 64 72 2e 73 61 2c 20 26 6c 65 6e 61 64 64 72  ddr.sa, &lenaddr
d710: 29 3b 0a 20 20 20 20 20 20 20 20 69 66 28 20 63  );.        if( c
d720: 6f 6e 6e 65 63 74 69 6f 6e 3e 3d 30 20 29 7b 0a  onnection>=0 ){.
d730: 20 20 20 20 20 20 20 20 20 20 63 68 69 6c 64 20            child 
d740: 3d 20 66 6f 72 6b 28 29 3b 0a 20 20 20 20 20 20  = fork();.      
d750: 20 20 20 20 69 66 28 20 63 68 69 6c 64 21 3d 30      if( child!=0
d760: 20 29 7b 0a 20 20 20 20 20 20 20 20 20 20 20 20   ){.            
d770: 69 66 28 20 63 68 69 6c 64 3e 30 20 29 20 6e 63  if( child>0 ) nc
d780: 68 69 6c 64 72 65 6e 2b 2b 3b 0a 20 20 20 20 20  hildren++;.     
d790: 20 20 20 20 20 20 20 63 6c 6f 73 65 28 63 6f 6e         close(con
d7a0: 6e 65 63 74 69 6f 6e 29 3b 0a 20 20 20 20 20 20  nection);.      
d7b0: 20 20 20 20 20 20 2f 2a 20 70 72 69 6e 74 66 28        /* printf(
d7c0: 22 73 75 62 70 72 6f 63 65 73 73 20 25 64 20 73  "subprocess %d s
d7d0: 74 61 72 74 65 64 2e 2e 2e 5c 6e 22 2c 20 63 68  tarted...\n", ch
d7e0: 69 6c 64 29 3b 20 66 66 6c 75 73 68 28 73 74 64  ild); fflush(std
d7f0: 6f 75 74 29 3b 20 2a 2f 0a 20 20 20 20 20 20 20  out); */.       
d800: 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20     }else{.      
d810: 20 20 20 20 20 20 69 6e 74 20 6e 45 72 72 20 3d        int nErr =
d820: 20 30 2c 20 66 64 3b 0a 20 20 20 20 20 20 20 20   0, fd;.        
d830: 20 20 20 20 63 6c 6f 73 65 28 30 29 3b 0a 20 20      close(0);.  
d840: 20 20 20 20 20 20 20 20 20 20 66 64 20 3d 20 64            fd = d
d850: 75 70 28 63 6f 6e 6e 65 63 74 69 6f 6e 29 3b 0a  up(connection);.
d860: 20 20 20 20 20 20 20 20 20 20 20 20 69 66 28 20              if( 
d870: 66 64 21 3d 30 20 29 20 6e 45 72 72 2b 2b 3b 0a  fd!=0 ) nErr++;.
d880: 20 20 20 20 20 20 20 20 20 20 20 20 63 6c 6f 73              clos
d890: 65 28 31 29 3b 0a 20 20 20 20 20 20 20 20 20 20  e(1);.          
d8a0: 20 20 66 64 20 3d 20 64 75 70 28 63 6f 6e 6e 65    fd = dup(conne
d8b0: 63 74 69 6f 6e 29 3b 0a 20 20 20 20 20 20 20 20  ction);.        
d8c0: 20 20 20 20 69 66 28 20 66 64 21 3d 31 20 29 20      if( fd!=1 ) 
d8d0: 6e 45 72 72 2b 2b 3b 0a 20 20 20 20 20 20 20 20  nErr++;.        
d8e0: 20 20 20 20 63 6c 6f 73 65 28 32 29 3b 0a 20 20      close(2);.  
d8f0: 20 20 20 20 20 20 20 20 20 20 66 64 20 3d 20 64            fd = d
d900: 75 70 28 63 6f 6e 6e 65 63 74 69 6f 6e 29 3b 0a  up(connection);.
d910: 20 20 20 20 20 20 20 20 20 20 20 20 69 66 28 20              if( 
d920: 66 64 21 3d 32 20 29 20 6e 45 72 72 2b 2b 3b 0a  fd!=2 ) nErr++;.
d930: 20 20 20 20 20 20 20 20 20 20 20 20 63 6c 6f 73              clos
d940: 65 28 63 6f 6e 6e 65 63 74 69 6f 6e 29 3b 0a 20  e(connection);. 
d950: 20 20 20 20 20 20 20 20 20 20 20 72 65 74 75 72             retur
d960: 6e 20 6e 45 72 72 3b 0a 20 20 20 20 20 20 20 20  n nErr;.        
d970: 20 20 7d 0a 20 20 20 20 20 20 20 20 7d 0a 20 20    }.        }.  
d980: 20 20 20 20 7d 0a 20 20 20 20 20 20 2f 2a 20 42      }.      /* B
d990: 75 72 79 20 64 65 61 64 20 63 68 69 6c 64 72 65  ury dead childre
d9a0: 6e 20 2a 2f 0a 20 20 20 20 20 20 77 68 69 6c 65  n */.      while
d9b0: 28 20 28 63 68 69 6c 64 20 3d 20 77 61 69 74 70  ( (child = waitp
d9c0: 69 64 28 30 2c 20 30 2c 20 57 4e 4f 48 41 4e 47  id(0, 0, WNOHANG
d9d0: 29 29 3e 30 20 29 7b 0a 20 20 20 20 20 20 20 20  ))>0 ){.        
d9e0: 2f 2a 20 70 72 69 6e 74 66 28 22 70 72 6f 63 65  /* printf("proce
d9f0: 73 73 20 25 64 20 65 6e 64 73 5c 6e 22 2c 20 63  ss %d ends\n", c
da00: 68 69 6c 64 29 3b 20 66 66 6c 75 73 68 28 73 74  hild); fflush(st
da10: 64 6f 75 74 29 3b 20 2a 2f 0a 20 20 20 20 20 20  dout); */.      
da20: 20 20 6e 63 68 69 6c 64 72 65 6e 2d 2d 3b 0a 20    nchildren--;. 
da30: 20 20 20 20 20 7d 0a 20 20 20 20 7d 0a 20 20 7d       }.    }.  }
da40: 0a 20 20 2f 2a 20 4e 4f 54 20 52 45 41 43 48 45  .  /* NOT REACHE
da50: 44 20 2a 2f 20 20 0a 20 20 65 78 69 74 28 31 29  D */  .  exit(1)
da60: 3b 0a 7d 0a 0a 0a 69 6e 74 20 6d 61 69 6e 28 69  ;.}...int main(i
da70: 6e 74 20 61 72 67 63 2c 20 63 68 61 72 20 2a 2a  nt argc, char **
da80: 61 72 67 76 29 7b 0a 20 20 69 6e 74 20 69 3b 20  argv){.  int i; 
da90: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
daa0: 20 20 20 2f 2a 20 4c 6f 6f 70 20 63 6f 75 6e 74     /* Loop count
dab0: 65 72 20 2a 2f 0a 20 20 63 68 61 72 20 2a 7a 50  er */.  char *zP
dac0: 65 72 6d 55 73 65 72 20 3d 20 30 3b 20 20 20 20  ermUser = 0;    
dad0: 20 20 2f 2a 20 52 75 6e 20 64 61 65 6d 6f 6e 20    /* Run daemon 
dae0: 77 69 74 68 20 74 68 69 73 20 75 73 65 72 27 73  with this user's
daf0: 20 70 65 72 6d 69 73 73 69 6f 6e 73 20 2a 2f 0a   permissions */.
db00: 20 20 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 50    const char *zP
db10: 6f 72 74 20 3d 20 30 3b 20 20 20 20 2f 2a 20 49  ort = 0;    /* I
db20: 6d 70 6c 65 6d 65 6e 74 20 61 6e 20 48 54 54 50  mplement an HTTP
db30: 20 73 65 72 76 65 72 20 70 72 6f 63 65 73 73 20   server process 
db40: 2a 2f 0a 20 20 69 6e 74 20 75 73 65 43 68 72 6f  */.  int useChro
db50: 6f 74 4a 61 69 6c 20 3d 20 31 3b 20 20 20 20 2f  otJail = 1;    /
db60: 2a 20 54 72 75 65 20 74 6f 20 75 73 65 20 61 20  * True to use a 
db70: 63 68 61 6e 67 65 2d 72 6f 6f 74 20 6a 61 69 6c  change-root jail
db80: 20 2a 2f 0a 20 20 73 74 72 75 63 74 20 70 61 73   */.  struct pas
db90: 73 77 64 20 2a 70 77 64 20 3d 20 30 3b 20 20 20  swd *pwd = 0;   
dba0: 2f 2a 20 49 6e 66 6f 72 6d 61 74 69 6f 6e 20 61  /* Information a
dbb0: 62 6f 75 74 20 74 68 65 20 75 73 65 72 20 2a 2f  bout the user */
dbc0: 0a 0a 20 20 2f 2a 20 52 65 63 6f 72 64 20 74 68  ..  /* Record th
dbd0: 65 20 74 69 6d 65 20 77 68 65 6e 20 70 72 6f 63  e time when proc
dbe0: 65 73 73 69 6e 67 20 62 65 67 69 6e 73 2e 0a 20  essing begins.. 
dbf0: 20 2a 2f 0a 20 20 74 69 6d 65 28 26 62 65 67 69   */.  time(&begi
dc00: 6e 54 69 6d 65 29 3b 0a 0a 20 20 2f 2a 20 50 61  nTime);..  /* Pa
dc10: 72 73 65 20 63 6f 6d 6d 61 6e 64 2d 6c 69 6e 65  rse command-line
dc20: 20 61 72 67 75 6d 65 6e 74 73 0a 20 20 2a 2f 0a   arguments.  */.
dc30: 20 20 77 68 69 6c 65 28 20 61 72 67 63 3e 31 20    while( argc>1 
dc40: 26 26 20 61 72 67 76 5b 31 5d 5b 30 5d 3d 3d 27  && argv[1][0]=='
dc50: 2d 27 20 29 7b 0a 20 20 20 20 63 68 61 72 20 2a  -' ){.    char *
dc60: 7a 20 3d 20 61 72 67 76 5b 31 5d 3b 0a 20 20 20  z = argv[1];.   
dc70: 20 63 68 61 72 20 2a 7a 41 72 67 20 3d 20 61 72   char *zArg = ar
dc80: 67 63 3e 3d 33 20 3f 20 61 72 67 76 5b 32 5d 20  gc>=3 ? argv[2] 
dc90: 3a 20 22 30 22 3b 0a 20 20 20 20 69 66 28 20 7a  : "0";.    if( z
dca0: 5b 30 5d 3d 3d 27 2d 27 20 26 26 20 7a 5b 31 5d  [0]=='-' && z[1]
dcb0: 3d 3d 27 2d 27 20 29 20 7a 2b 2b 3b 0a 20 20 20  =='-' ) z++;.   
dcc0: 20 69 66 28 20 73 74 72 63 6d 70 28 7a 2c 22 2d   if( strcmp(z,"-
dcd0: 75 73 65 72 22 29 3d 3d 30 20 29 7b 0a 20 20 20  user")==0 ){.   
dce0: 20 20 20 7a 50 65 72 6d 55 73 65 72 20 3d 20 7a     zPermUser = z
dcf0: 41 72 67 3b 0a 20 20 20 20 7d 65 6c 73 65 20 69  Arg;.    }else i
dd00: 66 28 20 73 74 72 63 6d 70 28 7a 2c 22 2d 72 6f  f( strcmp(z,"-ro
dd10: 6f 74 22 29 3d 3d 30 20 29 7b 0a 20 20 20 20 20  ot")==0 ){.     
dd20: 20 7a 52 6f 6f 74 20 3d 20 7a 41 72 67 3b 0a 20   zRoot = zArg;. 
dd30: 20 20 20 7d 65 6c 73 65 20 69 66 28 20 73 74 72     }else if( str
dd40: 63 6d 70 28 7a 2c 22 2d 6c 6f 67 66 69 6c 65 22  cmp(z,"-logfile"
dd50: 29 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 7a 4c  )==0 ){.      zL
dd60: 6f 67 46 69 6c 65 20 3d 20 7a 41 72 67 3b 0a 20  ogFile = zArg;. 
dd70: 20 20 20 7d 65 6c 73 65 20 69 66 28 20 73 74 72     }else if( str
dd80: 63 6d 70 28 7a 2c 22 2d 68 74 74 70 73 22 29 3d  cmp(z,"-https")=
dd90: 3d 30 20 29 7b 0a 20 20 20 20 20 20 75 73 65 48  =0 ){.      useH
dda0: 74 74 70 73 20 3d 20 61 74 6f 69 28 7a 41 72 67  ttps = atoi(zArg
ddb0: 29 3b 0a 20 20 20 20 20 20 7a 48 74 74 70 20 3d  );.      zHttp =
ddc0: 20 75 73 65 48 74 74 70 73 20 3f 20 22 68 74 74   useHttps ? "htt
ddd0: 70 22 20 3a 20 22 68 74 74 70 73 22 3b 0a 20 20  p" : "https";.  
dde0: 20 20 7d 65 6c 73 65 20 69 66 28 20 73 74 72 63    }else if( strc
ddf0: 6d 70 28 7a 2c 20 22 2d 70 6f 72 74 22 29 3d 3d  mp(z, "-port")==
de00: 30 20 29 7b 0a 20 20 20 20 20 20 7a 50 6f 72 74  0 ){.      zPort
de10: 20 3d 20 7a 41 72 67 3b 0a 20 20 20 20 7d 65 6c   = zArg;.    }el
de20: 73 65 20 69 66 28 20 73 74 72 63 6d 70 28 7a 2c  se if( strcmp(z,
de30: 20 22 2d 66 61 6d 69 6c 79 22 29 3d 3d 30 20 29   "-family")==0 )
de40: 7b 0a 20 20 20 20 20 20 69 66 28 20 73 74 72 63  {.      if( strc
de50: 6d 70 28 7a 41 72 67 2c 20 22 69 70 76 34 22 29  mp(zArg, "ipv4")
de60: 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 20 20 69  ==0 ){.        i
de70: 70 76 34 4f 6e 6c 79 20 3d 20 31 3b 0a 20 20 20  pv4Only = 1;.   
de80: 20 20 20 7d 65 6c 73 65 20 69 66 28 20 73 74 72     }else if( str
de90: 63 6d 70 28 7a 41 72 67 2c 20 22 69 70 76 36 22  cmp(zArg, "ipv6"
dea0: 29 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 20 20  )==0 ){.        
deb0: 69 70 76 36 4f 6e 6c 79 20 3d 20 31 3b 0a 20 20  ipv6Only = 1;.  
dec0: 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20      }else{.     
ded0: 20 20 20 4d 61 6c 66 75 6e 63 74 69 6f 6e 28 5f     Malfunction(_
dee0: 5f 4c 49 4e 45 5f 5f 2c 20 22 75 6e 6b 6e 6f 77  _LINE__, "unknow
def0: 6e 20 49 50 20 70 72 6f 74 6f 63 6f 6c 3a 20 5b  n IP protocol: [
df00: 25 73 5d 22 2c 20 7a 41 72 67 29 3b 0a 20 20 20  %s]", zArg);.   
df10: 20 20 20 7d 0a 20 20 20 20 7d 65 6c 73 65 20 69     }.    }else i
df20: 66 28 20 73 74 72 63 6d 70 28 7a 2c 20 22 2d 6a  f( strcmp(z, "-j
df30: 61 69 6c 22 29 3d 3d 30 20 29 7b 0a 20 20 20 20  ail")==0 ){.    
df40: 20 20 69 66 28 20 61 74 6f 69 28 7a 41 72 67 29    if( atoi(zArg)
df50: 3d 3d 30 20 29 7b 0a 20 20 20 20 20 20 20 20 75  ==0 ){.        u
df60: 73 65 43 68 72 6f 6f 74 4a 61 69 6c 20 3d 20 30  seChrootJail = 0
df70: 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 7d 65  ;.      }.    }e
df80: 6c 73 65 20 69 66 28 20 73 74 72 63 6d 70 28 7a  lse if( strcmp(z
df90: 2c 20 22 2d 64 65 62 75 67 22 29 3d 3d 30 20 29  , "-debug")==0 )
dfa0: 7b 0a 20 20 20 20 20 20 69 66 28 20 61 74 6f 69  {.      if( atoi
dfb0: 28 7a 41 72 67 29 20 29 7b 0a 20 20 20 20 20 20  (zArg) ){.      
dfc0: 20 20 75 73 65 54 69 6d 65 6f 75 74 20 3d 20 30    useTimeout = 0
dfd0: 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 7d 65  ;.      }.    }e
dfe0: 6c 73 65 7b 0a 20 20 20 20 20 20 4d 61 6c 66 75  lse{.      Malfu
dff0: 6e 63 74 69 6f 6e 28 5f 5f 4c 49 4e 45 5f 5f 2c  nction(__LINE__,
e000: 20 22 75 6e 6b 6e 6f 77 6e 20 61 72 67 75 6d 65   "unknown argume
e010: 6e 74 3a 20 5b 25 73 5d 22 2c 20 7a 29 3b 0a 20  nt: [%s]", z);. 
e020: 20 20 20 7d 0a 20 20 20 20 61 72 67 76 20 2b 3d     }.    argv +=
e030: 20 32 3b 0a 20 20 20 20 61 72 67 63 20 2d 3d 20   2;.    argc -= 
e040: 32 3b 0a 20 20 7d 0a 20 20 69 66 28 20 7a 52 6f  2;.  }.  if( zRo
e050: 6f 74 3d 3d 30 20 29 7b 0a 20 20 20 20 4d 61 6c  ot==0 ){.    Mal
e060: 66 75 6e 63 74 69 6f 6e 28 5f 5f 4c 49 4e 45 5f  function(__LINE_
e070: 5f 2c 20 22 6e 6f 20 2d 2d 72 6f 6f 74 20 73 70  _, "no --root sp
e080: 65 63 69 66 69 65 64 22 29 3b 0a 20 20 7d 0a 20  ecified");.  }. 
e090: 20 0a 20 20 2f 2a 20 43 68 61 6e 67 65 20 64 69   .  /* Change di
e0a0: 72 65 63 74 6f 72 69 65 73 20 74 6f 20 74 68 65  rectories to the
e0b0: 20 72 6f 6f 74 20 6f 66 20 74 68 65 20 48 54 54   root of the HTT
e0c0: 50 20 66 69 6c 65 73 79 73 74 65 6d 2e 20 20 54  P filesystem.  T
e0d0: 68 65 6e 0a 20 20 2a 2a 20 63 72 65 61 74 65 20  hen.  ** create 
e0e0: 61 20 63 68 72 6f 6f 74 20 6a 61 69 6c 20 74 68  a chroot jail th
e0f0: 65 72 65 2e 0a 20 20 2a 2f 0a 20 20 69 66 28 20  ere..  */.  if( 
e100: 63 68 64 69 72 28 7a 52 6f 6f 74 29 21 3d 30 20  chdir(zRoot)!=0 
e110: 29 7b 0a 20 20 20 20 4d 61 6c 66 75 6e 63 74 69  ){.    Malfuncti
e120: 6f 6e 28 5f 5f 4c 49 4e 45 5f 5f 2c 20 22 63 61  on(__LINE__, "ca
e130: 6e 6e 6f 74 20 63 68 61 6e 67 65 20 74 6f 20 64  nnot change to d
e140: 69 72 65 63 74 6f 72 79 20 5b 25 73 5d 22 2c 20  irectory [%s]", 
e150: 7a 52 6f 6f 74 29 3b 0a 20 20 7d 0a 0a 20 20 2f  zRoot);.  }..  /
e160: 2a 20 47 65 74 20 69 6e 66 6f 72 6d 61 74 69 6f  * Get informatio
e170: 6e 20 61 62 6f 75 74 20 74 68 65 20 75 73 65 72  n about the user
e180: 20 69 66 20 61 76 61 69 6c 61 62 6c 65 20 2a 2f   if available */
e190: 0a 20 20 69 66 28 20 7a 50 65 72 6d 55 73 65 72  .  if( zPermUser
e1a0: 20 29 20 70 77 64 20 3d 20 67 65 74 70 77 6e 61   ) pwd = getpwna
e1b0: 6d 28 7a 50 65 72 6d 55 73 65 72 29 3b 0a 0a 20  m(zPermUser);.. 
e1c0: 20 2f 2a 20 45 6e 74 65 72 20 74 68 65 20 63 68   /* Enter the ch
e1d0: 72 6f 6f 74 20 6a 61 69 6c 20 69 66 20 72 65 71  root jail if req
e1e0: 75 65 73 74 65 64 20 2a 2f 20 20 0a 20 20 69 66  uested */  .  if
e1f0: 28 20 7a 50 65 72 6d 55 73 65 72 20 26 26 20 75  ( zPermUser && u
e200: 73 65 43 68 72 6f 6f 74 4a 61 69 6c 20 26 26 20  seChrootJail && 
e210: 67 65 74 75 69 64 28 29 3d 3d 30 20 29 7b 0a 20  getuid()==0 ){. 
e220: 20 20 20 69 66 28 20 63 68 72 6f 6f 74 28 22 2e     if( chroot(".
e230: 22 29 3c 30 20 29 7b 0a 20 20 20 20 20 20 4d 61  ")<0 ){.      Ma
e240: 6c 66 75 6e 63 74 69 6f 6e 28 5f 5f 4c 49 4e 45  lfunction(__LINE
e250: 5f 5f 2c 20 22 75 6e 61 62 6c 65 20 74 6f 20 63  __, "unable to c
e260: 72 65 61 74 65 20 63 68 72 6f 6f 74 20 6a 61 69  reate chroot jai
e270: 6c 22 29 3b 0a 20 20 20 20 7d 65 6c 73 65 7b 0a  l");.    }else{.
e280: 20 20 20 20 20 20 7a 52 6f 6f 74 20 3d 20 22 22        zRoot = ""
e290: 3b 0a 20 20 20 20 7d 0a 20 20 7d 0a 0a 20 20 2f  ;.    }.  }..  /
e2a0: 2a 20 41 63 74 69 76 61 74 65 20 74 68 65 20 73  * Activate the s
e2b0: 65 72 76 65 72 2c 20 69 66 20 72 65 71 75 65 73  erver, if reques
e2c0: 74 65 64 20 2a 2f 0a 20 20 69 66 28 20 7a 50 6f  ted */.  if( zPo
e2d0: 72 74 20 26 26 20 68 74 74 70 5f 73 65 72 76 65  rt && http_serve
e2e0: 72 28 7a 50 6f 72 74 2c 20 30 29 20 29 7b 0a 20  r(zPort, 0) ){. 
e2f0: 20 20 20 4d 61 6c 66 75 6e 63 74 69 6f 6e 28 5f     Malfunction(_
e300: 5f 4c 49 4e 45 5f 5f 2c 20 22 66 61 69 6c 65 64  _LINE__, "failed
e310: 20 74 6f 20 73 74 61 72 74 20 73 65 72 76 65 72   to start server
e320: 22 29 3b 0a 20 20 7d 0a 0a 20 20 2f 2a 20 44 72  ");.  }..  /* Dr
e330: 6f 70 20 72 6f 6f 74 20 70 72 69 76 69 6c 65 67  op root privileg
e340: 65 73 2e 0a 20 20 2a 2f 0a 20 20 69 66 28 20 7a  es..  */.  if( z
e350: 50 65 72 6d 55 73 65 72 20 29 7b 0a 20 20 20 20  PermUser ){.    
e360: 69 66 28 20 70 77 64 20 29 7b 0a 20 20 20 20 20  if( pwd ){.     
e370: 20 73 65 74 67 69 64 28 70 77 64 2d 3e 70 77 5f   setgid(pwd->pw_
e380: 67 69 64 29 3b 0a 20 20 20 20 20 20 73 65 74 75  gid);.      setu
e390: 69 64 28 70 77 64 2d 3e 70 77 5f 75 69 64 29 3b  id(pwd->pw_uid);
e3a0: 0a 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20 20  .    }else{.    
e3b0: 20 20 4d 61 6c 66 75 6e 63 74 69 6f 6e 28 5f 5f    Malfunction(__
e3c0: 4c 49 4e 45 5f 5f 2c 20 22 6e 6f 20 73 75 63 68  LINE__, "no such
e3d0: 20 75 73 65 72 20 5b 25 73 5d 22 2c 20 7a 50 65   user [%s]", zPe
e3e0: 72 6d 55 73 65 72 29 3b 0a 20 20 20 20 7d 0a 20  rmUser);.    }. 
e3f0: 20 7d 0a 20 20 69 66 28 20 67 65 74 75 69 64 28   }.  if( getuid(
e400: 29 3d 3d 30 20 29 7b 0a 20 20 20 20 4d 61 6c 66  )==0 ){.    Malf
e410: 75 6e 63 74 69 6f 6e 28 5f 5f 4c 49 4e 45 5f 5f  unction(__LINE__
e420: 2c 20 22 63 61 6e 6e 6f 74 20 72 75 6e 20 61 73  , "cannot run as
e430: 20 72 6f 6f 74 22 29 3b 0a 20 20 7d 0a 0a 20 20   root");.  }..  
e440: 2f 2a 20 47 65 74 20 74 68 65 20 49 50 20 61 64  /* Get the IP ad
e450: 64 72 65 73 73 20 66 72 6f 6d 20 77 68 65 6e 20  dress from when 
e460: 74 68 65 20 72 65 71 75 65 73 74 20 6f 72 69 67  the request orig
e470: 69 6e 61 74 65 73 0a 20 20 2a 2f 0a 20 20 7b 0a  inates.  */.  {.
e480: 20 20 20 20 61 64 64 72 65 73 73 20 72 65 6d 6f      address remo
e490: 74 65 41 64 64 72 3b 0a 20 20 20 20 75 6e 73 69  teAddr;.    unsi
e4a0: 67 6e 65 64 20 69 6e 74 20 73 69 7a 65 20 3d 20  gned int size = 
e4b0: 73 69 7a 65 6f 66 28 72 65 6d 6f 74 65 41 64 64  sizeof(remoteAdd
e4c0: 72 29 3b 0a 20 20 20 20 63 68 61 72 20 7a 48 6f  r);.    char zHo
e4d0: 73 74 5b 4e 49 5f 4d 41 58 48 4f 53 54 5d 3b 0a  st[NI_MAXHOST];.
e4e0: 20 20 20 20 69 66 28 20 67 65 74 70 65 65 72 6e      if( getpeern
e4f0: 61 6d 65 28 30 2c 20 26 72 65 6d 6f 74 65 41 64  ame(0, &remoteAd
e500: 64 72 2e 73 61 2c 20 26 73 69 7a 65 29 3e 3d 30  dr.sa, &size)>=0
e510: 20 29 7b 0a 20 20 20 20 20 20 67 65 74 6e 61 6d   ){.      getnam
e520: 65 69 6e 66 6f 28 26 72 65 6d 6f 74 65 41 64 64  einfo(&remoteAdd
e530: 72 2e 73 61 2c 20 73 69 7a 65 2c 20 7a 48 6f 73  r.sa, size, zHos
e540: 74 2c 20 73 69 7a 65 6f 66 28 7a 48 6f 73 74 29  t, sizeof(zHost)
e550: 2c 20 30 2c 20 30 2c 0a 20 20 20 20 20 20 20 20  , 0, 0,.        
e560: 20 20 20 20 20 20 20 20 20 20 4e 49 5f 4e 55 4d            NI_NUM
e570: 45 52 49 43 48 4f 53 54 29 3b 0a 20 20 20 20 20  ERICHOST);.     
e580: 20 7a 52 65 6d 6f 74 65 41 64 64 72 20 3d 20 53   zRemoteAddr = S
e590: 74 72 44 75 70 28 7a 48 6f 73 74 29 3b 0a 20 20  trDup(zHost);.  
e5a0: 20 20 7d 0a 20 20 7d 0a 0a 20 20 2f 2a 20 50 72    }.  }..  /* Pr
e5b0: 6f 63 65 73 73 20 74 68 65 20 69 6e 70 75 74 20  ocess the input 
e5c0: 73 74 72 65 61 6d 20 2a 2f 0a 20 20 66 6f 72 28  stream */.  for(
e5d0: 69 3d 30 3b 20 69 3c 31 30 30 3b 20 69 2b 2b 29  i=0; i<100; i++)
e5e0: 7b 0a 20 20 20 20 50 72 6f 63 65 73 73 4f 6e 65  {.    ProcessOne
e5f0: 52 65 71 75 65 73 74 28 30 29 3b 0a 20 20 7d 0a  Request(0);.  }.
e600: 20 20 50 72 6f 63 65 73 73 4f 6e 65 52 65 71 75    ProcessOneRequ
e610: 65 73 74 28 31 29 3b 0a 20 20 65 78 69 74 28 30  est(1);.  exit(0
e620: 29 3b 0a 7d 0a                                   );.}.