Hex Artifact Content
Not logged in

Artifact 7c8f0faf01c2ed5adc1a543365f185cc3ea1978b:

File src/url.c part of check-in [676fdd088a] - Enable proxy support using the "fossil setting proxy" command. This check-in is made using a proxy. by drh on 2008-05-01 22:49:57.

0000: 2f 2a 0a 2a 2a 20 43 6f 70 79 72 69 67 68 74 20  /*.** Copyright 
0010: 28 63 29 20 32 30 30 37 20 44 2e 20 52 69 63 68  (c) 2007 D. Rich
0020: 61 72 64 20 48 69 70 70 0a 2a 2a 0a 2a 2a 20 54  ard Hipp.**.** T
0030: 68 69 73 20 70 72 6f 67 72 61 6d 20 69 73 20 66  his program is f
0040: 72 65 65 20 73 6f 66 74 77 61 72 65 3b 20 79 6f  ree software; yo
0050: 75 20 63 61 6e 20 72 65 64 69 73 74 72 69 62 75  u can redistribu
0060: 74 65 20 69 74 20 61 6e 64 2f 6f 72 0a 2a 2a 20  te it and/or.** 
0070: 6d 6f 64 69 66 79 20 69 74 20 75 6e 64 65 72 20  modify it under 
0080: 74 68 65 20 74 65 72 6d 73 20 6f 66 20 74 68 65  the terms of the
0090: 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62   GNU General Pub
00a0: 6c 69 63 0a 2a 2a 20 4c 69 63 65 6e 73 65 20 76  lic.** License v
00b0: 65 72 73 69 6f 6e 20 32 20 61 73 20 70 75 62 6c  ersion 2 as publ
00c0: 69 73 68 65 64 20 62 79 20 74 68 65 20 46 72 65  ished by the Fre
00d0: 65 20 53 6f 66 74 77 61 72 65 20 46 6f 75 6e 64  e Software Found
00e0: 61 74 69 6f 6e 2e 0a 2a 2a 0a 2a 2a 20 54 68 69  ation..**.** Thi
00f0: 73 20 70 72 6f 67 72 61 6d 20 69 73 20 64 69 73  s program is dis
0100: 74 72 69 62 75 74 65 64 20 69 6e 20 74 68 65 20  tributed in the 
0110: 68 6f 70 65 20 74 68 61 74 20 69 74 20 77 69 6c  hope that it wil
0120: 6c 20 62 65 20 75 73 65 66 75 6c 2c 0a 2a 2a 20  l be useful,.** 
0130: 62 75 74 20 57 49 54 48 4f 55 54 20 41 4e 59 20  but WITHOUT ANY 
0140: 57 41 52 52 41 4e 54 59 3b 20 77 69 74 68 6f 75  WARRANTY; withou
0150: 74 20 65 76 65 6e 20 74 68 65 20 69 6d 70 6c 69  t even the impli
0160: 65 64 20 77 61 72 72 61 6e 74 79 20 6f 66 0a 2a  ed warranty of.*
0170: 2a 20 4d 45 52 43 48 41 4e 54 41 42 49 4c 49 54  * MERCHANTABILIT
0180: 59 20 6f 72 20 46 49 54 4e 45 53 53 20 46 4f 52  Y or FITNESS FOR
0190: 20 41 20 50 41 52 54 49 43 55 4c 41 52 20 50 55   A PARTICULAR PU
01a0: 52 50 4f 53 45 2e 20 20 53 65 65 20 74 68 65 20  RPOSE.  See the 
01b0: 47 4e 55 0a 2a 2a 20 47 65 6e 65 72 61 6c 20 50  GNU.** General P
01c0: 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 20 66 6f  ublic License fo
01d0: 72 20 6d 6f 72 65 20 64 65 74 61 69 6c 73 2e 0a  r more details..
01e0: 2a 2a 20 0a 2a 2a 20 59 6f 75 20 73 68 6f 75 6c  ** .** You shoul
01f0: 64 20 68 61 76 65 20 72 65 63 65 69 76 65 64 20  d have received 
0200: 61 20 63 6f 70 79 20 6f 66 20 74 68 65 20 47 4e  a copy of the GN
0210: 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63  U General Public
0220: 0a 2a 2a 20 4c 69 63 65 6e 73 65 20 61 6c 6f 6e  .** License alon
0230: 67 20 77 69 74 68 20 74 68 69 73 20 6c 69 62 72  g with this libr
0240: 61 72 79 3b 20 69 66 20 6e 6f 74 2c 20 77 72 69  ary; if not, wri
0250: 74 65 20 74 6f 20 74 68 65 0a 2a 2a 20 46 72 65  te to the.** Fre
0260: 65 20 53 6f 66 74 77 61 72 65 20 46 6f 75 6e 64  e Software Found
0270: 61 74 69 6f 6e 2c 20 49 6e 63 2e 2c 20 35 39 20  ation, Inc., 59 
0280: 54 65 6d 70 6c 65 20 50 6c 61 63 65 20 2d 20 53  Temple Place - S
0290: 75 69 74 65 20 33 33 30 2c 0a 2a 2a 20 42 6f 73  uite 330,.** Bos
02a0: 74 6f 6e 2c 20 4d 41 20 20 30 32 31 31 31 2d 31  ton, MA  02111-1
02b0: 33 30 37 2c 20 55 53 41 2e 0a 2a 2a 0a 2a 2a 20  307, USA..**.** 
02c0: 41 75 74 68 6f 72 20 63 6f 6e 74 61 63 74 20 69  Author contact i
02d0: 6e 66 6f 72 6d 61 74 69 6f 6e 3a 0a 2a 2a 20 20  nformation:.**  
02e0: 20 64 72 68 40 68 77 61 63 69 2e 63 6f 6d 0a 2a   drh@hwaci.com.*
02f0: 2a 20 20 20 68 74 74 70 3a 2f 2f 77 77 77 2e 68  *   http://www.h
0300: 77 61 63 69 2e 63 6f 6d 2f 64 72 68 2f 0a 2a 2a  waci.com/drh/.**
0310: 0a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  .***************
0320: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0330: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0340: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0350: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0360: 0a 2a 2a 0a 2a 2a 20 54 68 69 73 20 66 69 6c 65  .**.** This file
0370: 20 63 6f 6e 74 61 69 6e 73 20 63 6f 64 65 20 66   contains code f
0380: 6f 72 20 70 61 72 73 69 6e 67 20 55 52 4c 73 20  or parsing URLs 
0390: 74 68 61 74 20 61 70 70 65 61 72 20 6f 6e 20 74  that appear on t
03a0: 68 65 20 63 6f 6d 6d 61 6e 64 2d 6c 69 6e 65 0a  he command-line.
03b0: 2a 2f 0a 23 69 6e 63 6c 75 64 65 20 22 63 6f 6e  */.#include "con
03c0: 66 69 67 2e 68 22 0a 23 69 6e 63 6c 75 64 65 20  fig.h".#include 
03d0: 22 75 72 6c 2e 68 22 0a 0a 2f 2a 0a 2a 2a 20 50  "url.h"../*.** P
03e0: 61 72 73 65 20 74 68 65 20 67 69 76 65 6e 20 55  arse the given U
03f0: 52 4c 2e 20 20 50 6f 70 75 6c 61 74 65 20 76 61  RL.  Populate va
0400: 72 69 61 62 6c 65 73 20 69 6e 20 74 68 65 20 67  riables in the g
0410: 6c 6f 62 61 6c 20 22 67 22 20 73 74 72 75 63 74  lobal "g" struct
0420: 75 72 65 2e 0a 2a 2a 0a 2a 2a 20 20 20 20 20 20  ure..**.**      
0430: 67 2e 75 72 6c 49 73 46 69 6c 65 20 20 20 20 20  g.urlIsFile     
0440: 20 54 72 75 65 20 69 66 20 74 68 69 73 20 69 73   True if this is
0450: 20 61 20 66 69 6c 65 20 55 52 4c 0a 2a 2a 20 20   a file URL.**  
0460: 20 20 20 20 67 2e 75 72 6c 4e 61 6d 65 20 20 20      g.urlName   
0470: 20 20 20 20 20 48 6f 73 74 6e 61 6d 65 20 66 6f       Hostname fo
0480: 72 20 48 54 54 50 3a 2e 20 20 46 69 6c 65 6e 61  r HTTP:.  Filena
0490: 6d 65 20 66 6f 72 20 46 49 4c 45 3a 0a 2a 2a 20  me for FILE:.** 
04a0: 20 20 20 20 20 67 2e 75 72 6c 50 6f 72 74 20 20       g.urlPort  
04b0: 20 20 20 20 20 20 50 6f 72 74 20 6e 61 6d 65 20        Port name 
04c0: 66 6f 72 20 48 54 54 50 2e 0a 2a 2a 20 20 20 20  for HTTP..**    
04d0: 20 20 67 2e 75 72 6c 50 61 74 68 20 20 20 20 20    g.urlPath     
04e0: 20 20 20 50 61 74 68 20 6e 61 6d 65 20 66 6f 72     Path name for
04f0: 20 48 54 54 50 2e 0a 2a 2a 20 20 20 20 20 20 67   HTTP..**      g
0500: 2e 75 72 6c 55 73 65 72 20 20 20 20 20 20 20 20  .urlUser        
0510: 55 73 65 72 69 64 2e 0a 2a 2a 20 20 20 20 20 20  Userid..**      
0520: 67 2e 75 72 6c 50 61 73 73 77 64 20 20 20 20 20  g.urlPasswd     
0530: 20 50 61 73 73 77 6f 72 64 2e 0a 2a 2a 20 20 20   Password..**   
0540: 20 20 20 67 2e 75 72 6c 43 61 6e 6f 6e 69 63 61     g.urlCanonica
0550: 6c 20 20 20 54 68 65 20 55 52 4c 20 69 6e 20 63  l   The URL in c
0560: 61 6e 6f 6e 69 63 61 6c 20 66 6f 72 6d 0a 2a 2a  anonical form.**
0570: 0a 2a 2a 20 48 54 54 50 20 75 72 6c 20 66 6f 72  .** HTTP url for
0580: 6d 61 74 20 69 73 3a 0a 2a 2a 0a 2a 2a 20 20 20  mat is:.**.**   
0590: 20 20 68 74 74 70 3a 2f 2f 75 73 65 72 69 64 3a    http://userid:
05a0: 70 61 73 73 77 6f 72 64 40 68 6f 73 74 3a 70 6f  password@host:po
05b0: 72 74 2f 70 61 74 68 3f 71 75 65 72 79 23 66 72  rt/path?query#fr
05c0: 61 67 6d 65 6e 74 0a 2a 2a 0a 2a 2f 0a 76 6f 69  agment.**.*/.voi
05d0: 64 20 75 72 6c 5f 70 61 72 73 65 28 63 6f 6e 73  d url_parse(cons
05e0: 74 20 63 68 61 72 20 2a 7a 55 72 6c 29 7b 0a 20  t char *zUrl){. 
05f0: 20 69 6e 74 20 69 2c 20 6a 2c 20 63 3b 0a 20 20   int i, j, c;.  
0600: 63 68 61 72 20 2a 7a 46 69 6c 65 20 3d 20 30 3b  char *zFile = 0;
0610: 0a 20 20 69 66 28 20 73 74 72 6e 63 6d 70 28 7a  .  if( strncmp(z
0620: 55 72 6c 2c 20 22 68 74 74 70 3a 22 2c 20 35 29  Url, "http:", 5)
0630: 3d 3d 30 20 29 7b 0a 20 20 20 20 67 2e 75 72 6c  ==0 ){.    g.url
0640: 49 73 46 69 6c 65 20 3d 20 30 3b 0a 20 20 20 20  IsFile = 0;.    
0650: 66 6f 72 28 69 3d 37 3b 20 28 63 3d 7a 55 72 6c  for(i=7; (c=zUrl
0660: 5b 69 5d 29 21 3d 30 20 26 26 20 63 21 3d 27 2f  [i])!=0 && c!='/
0670: 27 20 26 26 20 63 21 3d 27 40 27 3b 20 69 2b 2b  ' && c!='@'; i++
0680: 29 7b 7d 0a 20 20 20 20 69 66 28 20 63 3d 3d 27  ){}.    if( c=='
0690: 40 27 20 29 7b 0a 20 20 20 20 20 20 66 6f 72 28  @' ){.      for(
06a0: 6a 3d 37 3b 20 6a 3c 69 20 26 26 20 7a 55 72 6c  j=7; j<i && zUrl
06b0: 5b 6a 5d 21 3d 27 3a 27 3b 20 6a 2b 2b 29 7b 7d  [j]!=':'; j++){}
06c0: 0a 20 20 20 20 20 20 67 2e 75 72 6c 55 73 65 72  .      g.urlUser
06d0: 20 3d 20 6d 70 72 69 6e 74 66 28 22 25 2e 2a 73   = mprintf("%.*s
06e0: 22 2c 20 6a 2d 37 2c 20 26 7a 55 72 6c 5b 37 5d  ", j-7, &zUrl[7]
06f0: 29 3b 0a 20 20 20 20 20 20 69 66 28 20 6a 3c 69  );.      if( j<i
0700: 20 29 7b 0a 20 20 20 20 20 20 20 20 67 2e 75 72   ){.        g.ur
0710: 6c 50 61 73 73 77 64 20 3d 20 6d 70 72 69 6e 74  lPasswd = mprint
0720: 66 28 22 25 2e 2a 73 22 2c 20 69 2d 6a 2d 31 2c  f("%.*s", i-j-1,
0730: 20 26 7a 55 72 6c 5b 6a 2b 31 5d 29 3b 0a 20 20   &zUrl[j+1]);.  
0740: 20 20 20 20 7d 0a 20 20 20 20 20 20 66 6f 72 28      }.      for(
0750: 6a 3d 69 2b 31 3b 20 28 63 3d 7a 55 72 6c 5b 6a  j=i+1; (c=zUrl[j
0760: 5d 29 21 3d 30 20 26 26 20 63 21 3d 27 2f 27 20  ])!=0 && c!='/' 
0770: 26 26 20 63 21 3d 27 3a 27 3b 20 6a 2b 2b 29 7b  && c!=':'; j++){
0780: 7d 0a 20 20 20 20 20 20 67 2e 75 72 6c 4e 61 6d  }.      g.urlNam
0790: 65 20 3d 20 6d 70 72 69 6e 74 66 28 22 25 2e 2a  e = mprintf("%.*
07a0: 73 22 2c 20 6a 2d 69 2d 31 2c 20 26 7a 55 72 6c  s", j-i-1, &zUrl
07b0: 5b 69 2b 31 5d 29 3b 0a 20 20 20 20 20 20 69 20  [i+1]);.      i 
07c0: 3d 20 6a 3b 0a 20 20 20 20 7d 65 6c 73 65 7b 0a  = j;.    }else{.
07d0: 20 20 20 20 20 20 66 6f 72 28 69 3d 37 3b 20 28        for(i=7; (
07e0: 63 3d 7a 55 72 6c 5b 69 5d 29 21 3d 30 20 26 26  c=zUrl[i])!=0 &&
07f0: 20 63 21 3d 27 2f 27 20 26 26 20 63 21 3d 27 3a   c!='/' && c!=':
0800: 27 3b 20 69 2b 2b 29 7b 7d 0a 20 20 20 20 20 20  '; i++){}.      
0810: 67 2e 75 72 6c 4e 61 6d 65 20 3d 20 6d 70 72 69  g.urlName = mpri
0820: 6e 74 66 28 22 25 2e 2a 73 22 2c 20 69 2d 37 2c  ntf("%.*s", i-7,
0830: 20 26 7a 55 72 6c 5b 37 5d 29 3b 0a 20 20 20 20   &zUrl[7]);.    
0840: 7d 0a 20 20 20 20 66 6f 72 28 6a 3d 30 3b 20 67  }.    for(j=0; g
0850: 2e 75 72 6c 4e 61 6d 65 5b 6a 5d 3b 20 6a 2b 2b  .urlName[j]; j++
0860: 29 7b 20 67 2e 75 72 6c 4e 61 6d 65 5b 6a 5d 20  ){ g.urlName[j] 
0870: 3d 20 74 6f 6c 6f 77 65 72 28 67 2e 75 72 6c 4e  = tolower(g.urlN
0880: 61 6d 65 5b 6a 5d 29 3b 20 7d 0a 20 20 20 20 69  ame[j]); }.    i
0890: 66 28 20 63 3d 3d 27 3a 27 20 29 7b 0a 20 20 20  f( c==':' ){.   
08a0: 20 20 20 67 2e 75 72 6c 50 6f 72 74 20 3d 20 30     g.urlPort = 0
08b0: 3b 0a 20 20 20 20 20 20 69 2b 2b 3b 0a 20 20 20  ;.      i++;.   
08c0: 20 20 20 77 68 69 6c 65 28 20 28 63 20 3d 20 7a     while( (c = z
08d0: 55 72 6c 5b 69 5d 29 21 3d 30 20 26 26 20 69 73  Url[i])!=0 && is
08e0: 64 69 67 69 74 28 63 29 20 29 7b 0a 20 20 20 20  digit(c) ){.    
08f0: 20 20 20 20 67 2e 75 72 6c 50 6f 72 74 20 3d 20      g.urlPort = 
0900: 67 2e 75 72 6c 50 6f 72 74 2a 31 30 20 2b 20 63  g.urlPort*10 + c
0910: 20 2d 20 27 30 27 3b 0a 20 20 20 20 20 20 20 20   - '0';.        
0920: 69 2b 2b 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20  i++;.      }.   
0930: 20 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 67 2e   }else{.      g.
0940: 75 72 6c 50 6f 72 74 20 3d 20 38 30 3b 0a 20 20  urlPort = 80;.  
0950: 20 20 7d 0a 20 20 20 20 67 2e 75 72 6c 50 61 74    }.    g.urlPat
0960: 68 20 3d 20 6d 70 72 69 6e 74 66 28 26 7a 55 72  h = mprintf(&zUr
0970: 6c 5b 69 5d 29 3b 0a 20 20 20 20 64 65 68 74 74  l[i]);.    dehtt
0980: 70 69 7a 65 28 67 2e 75 72 6c 4e 61 6d 65 29 3b  pize(g.urlName);
0990: 0a 20 20 20 20 64 65 68 74 74 70 69 7a 65 28 67  .    dehttpize(g
09a0: 2e 75 72 6c 50 61 74 68 29 3b 0a 20 20 20 20 67  .urlPath);.    g
09b0: 2e 75 72 6c 43 61 6e 6f 6e 69 63 61 6c 20 3d 20  .urlCanonical = 
09c0: 6d 70 72 69 6e 74 66 28 22 68 74 74 70 3a 2f 2f  mprintf("http://
09d0: 25 54 3a 25 64 25 54 22 2c 20 67 2e 75 72 6c 4e  %T:%d%T", g.urlN
09e0: 61 6d 65 2c 20 67 2e 75 72 6c 50 6f 72 74 2c 20  ame, g.urlPort, 
09f0: 67 2e 75 72 6c 50 61 74 68 29 3b 0a 20 20 7d 65  g.urlPath);.  }e
0a00: 6c 73 65 20 69 66 28 20 73 74 72 6e 63 6d 70 28  lse if( strncmp(
0a10: 7a 55 72 6c 2c 20 22 66 69 6c 65 3a 22 2c 20 35  zUrl, "file:", 5
0a20: 29 3d 3d 30 20 29 7b 0a 20 20 20 20 67 2e 75 72  )==0 ){.    g.ur
0a30: 6c 49 73 46 69 6c 65 20 3d 20 31 3b 0a 20 20 20  lIsFile = 1;.   
0a40: 20 69 66 28 20 7a 55 72 6c 5b 35 5d 3d 3d 27 2f   if( zUrl[5]=='/
0a50: 27 20 26 26 20 7a 55 72 6c 5b 36 5d 3d 3d 27 2f  ' && zUrl[6]=='/
0a60: 27 20 29 7b 0a 20 20 20 20 20 20 69 20 3d 20 37  ' ){.      i = 7
0a70: 3b 0a 20 20 20 20 7d 65 6c 73 65 7b 0a 20 20 20  ;.    }else{.   
0a80: 20 20 20 69 20 3d 20 35 3b 0a 20 20 20 20 7d 0a     i = 5;.    }.
0a90: 20 20 20 20 7a 46 69 6c 65 20 3d 20 6d 70 72 69      zFile = mpri
0aa0: 6e 74 66 28 22 25 73 22 2c 20 26 7a 55 72 6c 5b  ntf("%s", &zUrl[
0ab0: 69 5d 29 3b 0a 20 20 7d 65 6c 73 65 20 69 66 28  i]);.  }else if(
0ac0: 20 66 69 6c 65 5f 69 73 66 69 6c 65 28 7a 55 72   file_isfile(zUr
0ad0: 6c 29 20 29 7b 0a 20 20 20 20 67 2e 75 72 6c 49  l) ){.    g.urlI
0ae0: 73 46 69 6c 65 20 3d 20 31 3b 0a 20 20 20 20 7a  sFile = 1;.    z
0af0: 46 69 6c 65 20 3d 20 6d 70 72 69 6e 74 66 28 22  File = mprintf("
0b00: 25 73 22 2c 20 7a 55 72 6c 29 3b 0a 20 20 7d 65  %s", zUrl);.  }e
0b10: 6c 73 65 20 69 66 28 20 66 69 6c 65 5f 69 73 64  lse if( file_isd
0b20: 69 72 28 7a 55 72 6c 29 3d 3d 31 20 29 7b 0a 20  ir(zUrl)==1 ){. 
0b30: 20 20 20 7a 46 69 6c 65 20 3d 20 6d 70 72 69 6e     zFile = mprin
0b40: 74 66 28 22 25 73 2f 46 4f 53 53 49 4c 22 2c 20  tf("%s/FOSSIL", 
0b50: 7a 55 72 6c 29 3b 0a 20 20 20 20 69 66 28 20 66  zUrl);.    if( f
0b60: 69 6c 65 5f 69 73 66 69 6c 65 28 7a 46 69 6c 65  ile_isfile(zFile
0b70: 29 20 29 7b 0a 20 20 20 20 20 20 67 2e 75 72 6c  ) ){.      g.url
0b80: 49 73 46 69 6c 65 20 3d 20 31 3b 0a 20 20 20 20  IsFile = 1;.    
0b90: 7d 65 6c 73 65 7b 0a 20 20 20 20 20 20 66 72 65  }else{.      fre
0ba0: 65 28 7a 46 69 6c 65 29 3b 0a 20 20 20 20 20 20  e(zFile);.      
0bb0: 66 6f 73 73 69 6c 5f 70 61 6e 69 63 28 22 75 6e  fossil_panic("un
0bc0: 6b 6e 6f 77 6e 20 72 65 70 6f 73 69 74 6f 72 79  known repository
0bd0: 3a 20 25 73 22 2c 20 7a 55 72 6c 29 3b 0a 20 20  : %s", zUrl);.  
0be0: 20 20 7d 0a 20 20 7d 65 6c 73 65 7b 0a 20 20 20    }.  }else{.   
0bf0: 20 66 6f 73 73 69 6c 5f 70 61 6e 69 63 28 22 75   fossil_panic("u
0c00: 6e 6b 6e 6f 77 6e 20 72 65 70 6f 73 69 74 6f 72  nknown repositor
0c10: 79 3a 20 25 73 22 2c 20 7a 55 72 6c 29 3b 0a 20  y: %s", zUrl);. 
0c20: 20 7d 0a 20 20 69 66 28 20 67 2e 75 72 6c 49 73   }.  if( g.urlIs
0c30: 46 69 6c 65 20 29 7b 0a 20 20 20 20 42 6c 6f 62  File ){.    Blob
0c40: 20 63 66 69 6c 65 3b 0a 20 20 20 20 64 65 68 74   cfile;.    deht
0c50: 74 70 69 7a 65 28 7a 46 69 6c 65 29 3b 20 20 0a  tpize(zFile);  .
0c60: 20 20 20 20 66 69 6c 65 5f 63 61 6e 6f 6e 69 63      file_canonic
0c70: 61 6c 5f 6e 61 6d 65 28 7a 46 69 6c 65 2c 20 26  al_name(zFile, &
0c80: 63 66 69 6c 65 29 3b 0a 20 20 20 20 66 72 65 65  cfile);.    free
0c90: 28 7a 46 69 6c 65 29 3b 0a 20 20 20 20 67 2e 75  (zFile);.    g.u
0ca0: 72 6c 4e 61 6d 65 20 3d 20 6d 70 72 69 6e 74 66  rlName = mprintf
0cb0: 28 22 25 62 22 2c 20 26 63 66 69 6c 65 29 3b 0a  ("%b", &cfile);.
0cc0: 20 20 20 20 67 2e 75 72 6c 43 61 6e 6f 6e 69 63      g.urlCanonic
0cd0: 61 6c 20 3d 20 6d 70 72 69 6e 74 66 28 22 66 69  al = mprintf("fi
0ce0: 6c 65 3a 2f 2f 25 54 22 2c 20 67 2e 75 72 6c 4e  le://%T", g.urlN
0cf0: 61 6d 65 29 3b 0a 20 20 20 20 62 6c 6f 62 5f 72  ame);.    blob_r
0d00: 65 73 65 74 28 26 63 66 69 6c 65 29 3b 0a 20 20  eset(&cfile);.  
0d10: 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 43 4f 4d 4d 41  }.}../*.** COMMA
0d20: 4e 44 3a 20 74 65 73 74 2d 75 72 6c 70 61 72 73  ND: test-urlpars
0d30: 65 72 0a 2a 2f 0a 76 6f 69 64 20 63 6d 64 5f 74  er.*/.void cmd_t
0d40: 65 73 74 5f 75 72 6c 70 61 72 73 65 72 28 76 6f  est_urlparser(vo
0d50: 69 64 29 7b 0a 20 20 69 66 28 20 67 2e 61 72 67  id){.  if( g.arg
0d60: 63 21 3d 33 20 26 26 20 67 2e 61 72 67 63 21 3d  c!=3 && g.argc!=
0d70: 34 20 29 7b 0a 20 20 20 20 75 73 61 67 65 28 22  4 ){.    usage("
0d80: 55 52 4c 22 29 3b 0a 20 20 7d 0a 20 20 75 72 6c  URL");.  }.  url
0d90: 5f 70 61 72 73 65 28 67 2e 61 72 67 76 5b 32 5d  _parse(g.argv[2]
0da0: 29 3b 0a 20 20 70 72 69 6e 74 66 28 22 67 2e 75  );.  printf("g.u
0db0: 72 6c 49 73 46 69 6c 65 20 20 20 20 3d 20 25 64  rlIsFile    = %d
0dc0: 5c 6e 22 2c 20 67 2e 75 72 6c 49 73 46 69 6c 65  \n", g.urlIsFile
0dd0: 29 3b 0a 20 20 70 72 69 6e 74 66 28 22 67 2e 75  );.  printf("g.u
0de0: 72 6c 4e 61 6d 65 20 20 20 20 20 20 3d 20 25 73  rlName      = %s
0df0: 5c 6e 22 2c 20 67 2e 75 72 6c 4e 61 6d 65 29 3b  \n", g.urlName);
0e00: 0a 20 20 70 72 69 6e 74 66 28 22 67 2e 75 72 6c  .  printf("g.url
0e10: 50 6f 72 74 20 20 20 20 20 20 3d 20 25 64 5c 6e  Port      = %d\n
0e20: 22 2c 20 67 2e 75 72 6c 50 6f 72 74 29 3b 0a 20  ", g.urlPort);. 
0e30: 20 70 72 69 6e 74 66 28 22 67 2e 75 72 6c 50 61   printf("g.urlPa
0e40: 74 68 20 20 20 20 20 20 3d 20 25 73 5c 6e 22 2c  th      = %s\n",
0e50: 20 67 2e 75 72 6c 50 61 74 68 29 3b 0a 20 20 70   g.urlPath);.  p
0e60: 72 69 6e 74 66 28 22 67 2e 75 72 6c 55 73 65 72  rintf("g.urlUser
0e70: 20 20 20 20 20 20 3d 20 25 73 5c 6e 22 2c 20 67        = %s\n", g
0e80: 2e 75 72 6c 55 73 65 72 29 3b 0a 20 20 70 72 69  .urlUser);.  pri
0e90: 6e 74 66 28 22 67 2e 75 72 6c 50 61 73 73 77 64  ntf("g.urlPasswd
0ea0: 20 20 20 20 3d 20 25 73 5c 6e 22 2c 20 67 2e 75      = %s\n", g.u
0eb0: 72 6c 50 61 73 73 77 64 29 3b 0a 20 20 70 72 69  rlPasswd);.  pri
0ec0: 6e 74 66 28 22 67 2e 75 72 6c 43 61 6e 6f 6e 69  ntf("g.urlCanoni
0ed0: 63 61 6c 20 3d 20 25 73 5c 6e 22 2c 20 67 2e 75  cal = %s\n", g.u
0ee0: 72 6c 43 61 6e 6f 6e 69 63 61 6c 29 3b 0a 7d 0a  rlCanonical);.}.
0ef0: 0a 2f 2a 0a 2a 2a 20 49 66 20 74 68 65 20 22 70  ./*.** If the "p
0f00: 72 6f 78 79 22 20 73 65 74 74 69 6e 67 20 69 73  roxy" setting is
0f10: 20 64 65 66 69 6e 65 64 2c 20 74 68 65 6e 20 63   defined, then c
0f20: 68 61 6e 67 65 20 74 68 65 20 55 52 4c 20 74 6f  hange the URL to
0f30: 20 72 65 66 65 72 0a 2a 2a 20 74 6f 20 74 68 65   refer.** to the
0f40: 20 70 72 6f 78 79 20 73 65 72 76 65 72 2e 0a 2a   proxy server..*
0f50: 2f 0a 76 6f 69 64 20 75 72 6c 5f 65 6e 61 62 6c  /.void url_enabl
0f60: 65 5f 70 72 6f 78 79 28 63 6f 6e 73 74 20 63 68  e_proxy(const ch
0f70: 61 72 20 2a 7a 4d 73 67 29 7b 0a 20 20 63 6f 6e  ar *zMsg){.  con
0f80: 73 74 20 63 68 61 72 20 2a 7a 50 72 6f 78 79 20  st char *zProxy 
0f90: 3d 20 64 62 5f 67 65 74 28 22 70 72 6f 78 79 22  = db_get("proxy"
0fa0: 2c 20 30 29 3b 0a 20 20 69 66 28 20 7a 50 72 6f  , 0);.  if( zPro
0fb0: 78 79 20 26 26 20 7a 50 72 6f 78 79 5b 30 5d 20  xy && zProxy[0] 
0fc0: 26 26 20 21 69 73 5f 66 61 6c 73 65 28 7a 50 72  && !is_false(zPr
0fd0: 6f 78 79 29 20 29 7b 0a 20 20 20 20 63 68 61 72  oxy) ){.    char
0fe0: 20 2a 7a 4f 72 69 67 69 6e 61 6c 55 72 6c 20 3d   *zOriginalUrl =
0ff0: 20 67 2e 75 72 6c 43 61 6e 6f 6e 69 63 61 6c 3b   g.urlCanonical;
1000: 0a 20 20 20 20 69 66 28 20 7a 4d 73 67 20 29 20  .    if( zMsg ) 
1010: 70 72 69 6e 74 66 28 22 25 73 25 73 5c 6e 22 2c  printf("%s%s\n",
1020: 20 7a 4d 73 67 2c 20 7a 50 72 6f 78 79 29 3b 0a   zMsg, zProxy);.
1030: 20 20 20 20 75 72 6c 5f 70 61 72 73 65 28 7a 50      url_parse(zP
1040: 72 6f 78 79 29 3b 0a 20 20 20 20 67 2e 75 72 6c  roxy);.    g.url
1050: 50 61 74 68 20 3d 20 7a 4f 72 69 67 69 6e 61 6c  Path = zOriginal
1060: 55 72 6c 3b 0a 20 20 7d 0a 7d 0a                 Url;.  }.}.