Fossil

Hex Artifact Content
Login

Artifact 55293f904f6abf407b00cf636eca5800bf8048c5a09a668121aa95f5833dcbbb:


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 39 20 44 2e 20 52 69 63 68  (c) 2009 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 53 69 6d 70 6c 69 66 69 65 64 20 42 53 44 20   Simplified BSD 
00a0: 4c 69 63 65 6e 73 65 20 28 61 6c 73 6f 0a 2a 2a  License (also.**
00b0: 20 6b 6e 6f 77 6e 20 61 73 20 74 68 65 20 22 32   known as the "2
00c0: 2d 43 6c 61 75 73 65 20 4c 69 63 65 6e 73 65 22  -Clause License"
00d0: 20 6f 72 20 22 46 72 65 65 42 53 44 20 4c 69 63   or "FreeBSD Lic
00e0: 65 6e 73 65 22 2e 29 0a 0a 2a 2a 20 54 68 69 73  ense".)..** This
00f0: 20 70 72 6f 67 72 61 6d 20 69 73 20 64 69 73 74   program is dist
0100: 72 69 62 75 74 65 64 20 69 6e 20 74 68 65 20 68  ributed in the h
0110: 6f 70 65 20 74 68 61 74 20 69 74 20 77 69 6c 6c  ope that it will
0120: 20 62 65 20 75 73 65 66 75 6c 2c 0a 2a 2a 20 62   be useful,.** b
0130: 75 74 20 77 69 74 68 6f 75 74 20 61 6e 79 20 77  ut without any w
0140: 61 72 72 61 6e 74 79 3b 20 77 69 74 68 6f 75 74  arranty; without
0150: 20 65 76 65 6e 20 74 68 65 20 69 6d 70 6c 69 65   even the implie
0160: 64 20 77 61 72 72 61 6e 74 79 20 6f 66 0a 2a 2a  d warranty of.**
0170: 20 6d 65 72 63 68 61 6e 74 61 62 69 6c 69 74 79   merchantability
0180: 20 6f 72 20 66 69 74 6e 65 73 73 20 66 6f 72 20   or fitness for 
0190: 61 20 70 61 72 74 69 63 75 6c 61 72 20 70 75 72  a particular pur
01a0: 70 6f 73 65 2e 0a 2a 2a 0a 2a 2a 20 41 75 74 68  pose..**.** Auth
01b0: 6f 72 20 63 6f 6e 74 61 63 74 20 69 6e 66 6f 72  or contact infor
01c0: 6d 61 74 69 6f 6e 3a 0a 2a 2a 20 20 20 64 72 68  mation:.**   drh
01d0: 40 68 77 61 63 69 2e 63 6f 6d 0a 2a 2a 20 20 20  @hwaci.com.**   
01e0: 68 74 74 70 3a 2f 2f 77 77 77 2e 68 77 61 63 69  http://www.hwaci
01f0: 2e 63 6f 6d 2f 64 72 68 2f 0a 2a 2a 0a 2a 2a 2a  .com/drh/.**.***
0200: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0210: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0220: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0230: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a  ****************
0240: 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 0a 2a 2a 0a  ************.**.
0250: 2a 2a 20 54 68 69 73 20 66 69 6c 65 20 6d 61 6e  ** This file man
0260: 61 67 65 73 20 6c 6f 77 2d 6c 65 76 65 6c 20 63  ages low-level c
0270: 6c 69 65 6e 74 20 73 6f 63 6b 65 74 20 63 6f 6d  lient socket com
0280: 6d 75 6e 69 63 61 74 69 6f 6e 73 2e 20 20 54 68  munications.  Th
0290: 65 20 73 6f 63 6b 65 74 0a 2a 2a 20 6d 69 67 68  e socket.** migh
02a0: 74 20 62 65 20 66 6f 72 20 61 20 73 69 6d 70 6c  t be for a simpl
02b0: 65 20 48 54 54 50 20 72 65 71 75 65 73 74 20 6f  e HTTP request o
02c0: 72 20 66 6f 72 20 61 6e 20 65 6e 63 72 79 70 74  r for an encrypt
02d0: 65 64 20 48 54 54 50 53 20 72 65 71 75 65 73 74  ed HTTPS request
02e0: 2e 0a 2a 2a 0a 2a 2a 20 54 68 69 73 20 66 69 6c  ..**.** This fil
02f0: 65 20 69 6d 70 6c 65 6d 65 6e 74 73 20 61 20 73  e implements a s
0300: 69 6e 67 6c 65 74 6f 6e 2e 20 20 41 20 73 69 6e  ingleton.  A sin
0310: 67 6c 65 20 63 6c 69 65 6e 74 20 73 6f 63 6b 65  gle client socke
0320: 74 20 6d 61 79 20 62 65 20 61 63 74 69 76 65 0a  t may be active.
0330: 2a 2a 20 61 74 20 61 20 74 69 6d 65 2e 20 20 53  ** at a time.  S
0340: 74 61 74 65 20 69 6e 66 6f 72 6d 61 74 69 6f 6e  tate information
0350: 20 69 73 20 73 74 6f 72 65 64 20 69 6e 20 73 74   is stored in st
0360: 61 74 69 63 20 76 61 72 69 61 62 6c 65 73 2e 20  atic variables. 
0370: 20 54 68 65 20 69 64 65 6e 74 69 74 79 0a 2a 2a   The identity.**
0380: 20 6f 66 20 74 68 65 20 73 65 72 76 65 72 20 69   of the server i
0390: 73 20 68 65 6c 64 20 69 6e 20 67 6c 6f 62 61 6c  s held in global
03a0: 20 76 61 72 69 61 62 6c 65 73 20 74 68 61 74 20   variables that 
03b0: 61 72 65 20 73 65 74 20 62 79 20 75 72 6c 5f 70  are set by url_p
03c0: 61 72 73 65 28 29 2e 0a 2a 2a 0a 2a 2a 20 4c 6f  arse()..**.** Lo
03d0: 77 2d 6c 65 76 65 6c 20 73 6f 63 6b 65 74 73 20  w-level sockets 
03e0: 61 72 65 20 61 62 73 74 72 61 63 74 65 64 20 6f  are abstracted o
03f0: 75 74 20 69 6e 74 6f 20 74 68 69 73 20 6d 6f 64  ut into this mod
0400: 75 6c 65 20 62 65 63 61 75 73 65 20 74 68 65 79  ule because they
0410: 0a 2a 2a 20 61 72 65 20 68 61 6e 64 6c 65 64 20  .** are handled 
0420: 64 69 66 66 65 72 65 6e 74 20 6f 6e 20 55 6e 69  different on Uni
0430: 78 20 61 6e 64 20 77 69 6e 64 6f 77 73 2e 0a 2a  x and windows..*
0440: 2f 0a 23 69 66 20 64 65 66 69 6e 65 64 28 5f 57  /.#if defined(_W
0450: 49 4e 33 32 29 0a 23 20 69 66 20 64 65 66 69 6e  IN32).# if defin
0460: 65 64 28 5f 57 49 4e 33 32 5f 57 49 4e 4e 54 29  ed(_WIN32_WINNT)
0470: 0a 23 20 20 75 6e 64 65 66 20 5f 57 49 4e 33 32  .#  undef _WIN32
0480: 5f 57 49 4e 4e 54 0a 23 20 65 6e 64 69 66 0a 23  _WINNT.# endif.#
0490: 20 64 65 66 69 6e 65 20 5f 57 49 4e 33 32 5f 57   define _WIN32_W
04a0: 49 4e 4e 54 20 30 78 35 30 31 0a 23 65 6e 64 69  INNT 0x501.#endi
04b0: 66 0a 23 69 66 6e 64 65 66 20 5f 5f 45 58 54 45  f.#ifndef __EXTE
04c0: 4e 53 49 4f 4e 53 5f 5f 0a 23 20 64 65 66 69 6e  NSIONS__.# defin
04d0: 65 20 5f 5f 45 58 54 45 4e 53 49 4f 4e 53 5f 5f  e __EXTENSIONS__
04e0: 20 31 20 20 2f 2a 20 49 50 76 36 20 77 6f 6e 27   1  /* IPv6 won'
04f0: 74 20 63 6f 6d 70 69 6c 65 20 6f 6e 20 53 6f 6c  t compile on Sol
0500: 61 72 69 73 20 77 69 74 68 6f 75 74 20 74 68 69  aris without thi
0510: 73 20 2a 2f 0a 23 65 6e 64 69 66 0a 23 69 6e 63  s */.#endif.#inc
0520: 6c 75 64 65 20 22 63 6f 6e 66 69 67 2e 68 22 0a  lude "config.h".
0530: 23 69 6e 63 6c 75 64 65 20 22 68 74 74 70 5f 73  #include "http_s
0540: 6f 63 6b 65 74 2e 68 22 0a 23 69 66 20 64 65 66  ocket.h".#if def
0550: 69 6e 65 64 28 5f 57 49 4e 33 32 29 0a 23 20 20  ined(_WIN32).#  
0560: 69 6e 63 6c 75 64 65 20 3c 77 69 6e 73 6f 63 6b  include <winsock
0570: 32 2e 68 3e 0a 23 20 20 69 6e 63 6c 75 64 65 20  2.h>.#  include 
0580: 3c 77 73 32 74 63 70 69 70 2e 68 3e 0a 23 65 6c  <ws2tcpip.h>.#el
0590: 73 65 0a 23 20 20 69 6e 63 6c 75 64 65 20 3c 6e  se.#  include <n
05a0: 65 74 69 6e 65 74 2f 69 6e 2e 68 3e 0a 23 20 20  etinet/in.h>.#  
05b0: 69 6e 63 6c 75 64 65 20 3c 61 72 70 61 2f 69 6e  include <arpa/in
05c0: 65 74 2e 68 3e 0a 23 20 20 69 6e 63 6c 75 64 65  et.h>.#  include
05d0: 20 3c 73 79 73 2f 73 6f 63 6b 65 74 2e 68 3e 0a   <sys/socket.h>.
05e0: 23 20 20 69 6e 63 6c 75 64 65 20 3c 6e 65 74 64  #  include <netd
05f0: 62 2e 68 3e 0a 23 65 6e 64 69 66 0a 23 69 6e 63  b.h>.#endif.#inc
0600: 6c 75 64 65 20 3c 61 73 73 65 72 74 2e 68 3e 0a  lude <assert.h>.
0610: 23 69 6e 63 6c 75 64 65 20 3c 73 79 73 2f 74 79  #include <sys/ty
0620: 70 65 73 2e 68 3e 0a 23 69 6e 63 6c 75 64 65 20  pes.h>.#include 
0630: 3c 73 69 67 6e 61 6c 2e 68 3e 0a 0a 2f 2a 0a 2a  <signal.h>../*.*
0640: 2a 20 54 68 65 72 65 20 63 61 6e 20 6f 6e 6c 79  * There can only
0650: 20 62 65 20 61 20 73 69 6e 67 6c 65 20 73 6f 63   be a single soc
0660: 6b 65 74 20 63 6f 6e 6e 65 63 74 69 6f 6e 20 6f  ket connection o
0670: 70 65 6e 20 61 74 20 61 20 74 69 6d 65 2e 0a 2a  pen at a time..*
0680: 2a 20 53 74 61 74 65 20 69 6e 66 6f 72 6d 61 74  * State informat
0690: 69 6f 6e 20 61 62 6f 75 74 20 74 68 61 74 20 73  ion about that s
06a0: 6f 63 6b 65 74 20 69 73 20 73 74 6f 72 65 64 20  ocket is stored 
06b0: 69 6e 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e 67  in the following
06c0: 0a 2a 2a 20 6c 6f 63 61 6c 20 76 61 72 69 61 62  .** local variab
06d0: 6c 65 73 3a 0a 2a 2f 0a 73 74 61 74 69 63 20 69  les:.*/.static i
06e0: 6e 74 20 73 6f 63 6b 65 74 49 73 49 6e 69 74 20  nt socketIsInit 
06f0: 3d 20 30 3b 20 20 20 20 2f 2a 20 54 72 75 65 20  = 0;    /* True 
0700: 61 66 74 65 72 20 67 6c 6f 62 61 6c 20 69 6e 69  after global ini
0710: 74 69 61 6c 69 7a 61 74 69 6f 6e 20 2a 2f 0a 23  tialization */.#
0720: 69 66 20 64 65 66 69 6e 65 64 28 5f 57 49 4e 33  if defined(_WIN3
0730: 32 29 0a 73 74 61 74 69 63 20 57 53 41 44 41 54  2).static WSADAT
0740: 41 20 73 6f 63 6b 65 74 49 6e 66 6f 3b 20 20 20  A socketInfo;   
0750: 20 20 20 2f 2a 20 57 69 6e 64 6f 77 73 20 73 6f     /* Windows so
0760: 63 6b 65 74 20 69 6e 69 74 69 61 6c 69 7a 65 20  cket initialize 
0770: 64 61 74 61 20 2a 2f 0a 23 65 6e 64 69 66 0a 73  data */.#endif.s
0780: 74 61 74 69 63 20 69 6e 74 20 69 53 6f 63 6b 65  tatic int iSocke
0790: 74 20 3d 20 2d 31 3b 20 20 20 20 20 20 20 20 2f  t = -1;        /
07a0: 2a 20 54 68 65 20 73 6f 63 6b 65 74 20 6f 6e 20  * The socket on 
07b0: 77 68 69 63 68 20 77 65 20 74 61 6c 6b 20 74 6f  which we talk to
07c0: 20 74 68 65 20 73 65 72 76 65 72 20 2a 2f 0a 73   the server */.s
07d0: 74 61 74 69 63 20 63 68 61 72 20 2a 73 6f 63 6b  tatic char *sock
07e0: 65 74 45 72 72 4d 73 67 20 3d 20 30 3b 20 20 2f  etErrMsg = 0;  /
07f0: 2a 20 54 65 78 74 20 6f 66 20 6d 6f 73 74 20 72  * Text of most r
0800: 65 63 65 6e 74 20 73 6f 63 6b 65 74 20 65 72 72  ecent socket err
0810: 6f 72 20 2a 2f 0a 0a 0a 2f 2a 0a 2a 2a 20 43 6c  or */.../*.** Cl
0820: 65 61 72 20 74 68 65 20 73 6f 63 6b 65 74 20 65  ear the socket e
0830: 72 72 6f 72 20 6d 65 73 73 61 67 65 0a 2a 2f 0a  rror message.*/.
0840: 73 74 61 74 69 63 20 76 6f 69 64 20 73 6f 63 6b  static void sock
0850: 65 74 5f 63 6c 65 61 72 5f 65 72 72 6d 73 67 28  et_clear_errmsg(
0860: 76 6f 69 64 29 7b 0a 20 20 66 72 65 65 28 73 6f  void){.  free(so
0870: 63 6b 65 74 45 72 72 4d 73 67 29 3b 0a 20 20 73  cketErrMsg);.  s
0880: 6f 63 6b 65 74 45 72 72 4d 73 67 20 3d 20 30 3b  ocketErrMsg = 0;
0890: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 53 65 74 20 74 68  .}../*.** Set th
08a0: 65 20 73 6f 63 6b 65 74 20 65 72 72 6f 72 20 6d  e socket error m
08b0: 65 73 73 61 67 65 2e 0a 2a 2f 0a 76 6f 69 64 20  essage..*/.void 
08c0: 73 6f 63 6b 65 74 5f 73 65 74 5f 65 72 72 6d 73  socket_set_errms
08d0: 67 28 63 6f 6e 73 74 20 63 68 61 72 20 2a 7a 46  g(const char *zF
08e0: 6f 72 6d 61 74 2c 20 2e 2e 2e 29 7b 0a 20 20 76  ormat, ...){.  v
08f0: 61 5f 6c 69 73 74 20 61 70 3b 0a 20 20 73 6f 63  a_list ap;.  soc
0900: 6b 65 74 5f 63 6c 65 61 72 5f 65 72 72 6d 73 67  ket_clear_errmsg
0910: 28 29 3b 0a 20 20 76 61 5f 73 74 61 72 74 28 61  ();.  va_start(a
0920: 70 2c 20 7a 46 6f 72 6d 61 74 29 3b 0a 20 20 73  p, zFormat);.  s
0930: 6f 63 6b 65 74 45 72 72 4d 73 67 20 3d 20 76 6d  ocketErrMsg = vm
0940: 70 72 69 6e 74 66 28 7a 46 6f 72 6d 61 74 2c 20  printf(zFormat, 
0950: 61 70 29 3b 0a 20 20 76 61 5f 65 6e 64 28 61 70  ap);.  va_end(ap
0960: 29 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 52 65 74 75  );.}../*.** Retu
0970: 72 6e 20 74 68 65 20 63 75 72 72 65 6e 74 20 73  rn the current s
0980: 6f 63 6b 65 74 20 65 72 72 6f 72 20 6d 65 73 73  ocket error mess
0990: 61 67 65 0a 2a 2f 0a 63 68 61 72 20 2a 73 6f 63  age.*/.char *soc
09a0: 6b 65 74 5f 65 72 72 6d 73 67 28 76 6f 69 64 29  ket_errmsg(void)
09b0: 7b 0a 20 20 63 68 61 72 20 2a 7a 52 65 73 75 6c  {.  char *zResul
09c0: 74 20 3d 20 73 6f 63 6b 65 74 45 72 72 4d 73 67  t = socketErrMsg
09d0: 3b 0a 20 20 73 6f 63 6b 65 74 45 72 72 4d 73 67  ;.  socketErrMsg
09e0: 20 3d 20 30 3b 0a 20 20 72 65 74 75 72 6e 20 7a   = 0;.  return z
09f0: 52 65 73 75 6c 74 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a  Result;.}../*.**
0a00: 20 43 61 6c 6c 20 74 68 69 73 20 72 6f 75 74 69   Call this routi
0a10: 6e 65 20 6f 6e 63 65 20 62 65 66 6f 72 65 20 61  ne once before a
0a20: 6e 79 20 6f 74 68 65 72 20 75 73 65 20 6f 66 20  ny other use of 
0a30: 74 68 65 20 73 6f 63 6b 65 74 20 69 6e 74 65 72  the socket inter
0a40: 66 61 63 65 2e 0a 2a 2a 20 54 68 69 73 20 72 6f  face..** This ro
0a50: 75 74 69 6e 65 20 64 6f 65 73 20 69 6e 69 74 69  utine does initi
0a60: 61 6c 20 63 6f 6e 66 69 67 75 72 61 74 69 6f 6e  al configuration
0a70: 20 6f 66 20 74 68 65 20 73 6f 63 6b 65 74 20 6d   of the socket m
0a80: 6f 64 75 6c 65 2e 0a 2a 2f 0a 76 6f 69 64 20 73  odule..*/.void s
0a90: 6f 63 6b 65 74 5f 67 6c 6f 62 61 6c 5f 69 6e 69  ocket_global_ini
0aa0: 74 28 76 6f 69 64 29 7b 0a 20 20 69 66 28 20 73  t(void){.  if( s
0ab0: 6f 63 6b 65 74 49 73 49 6e 69 74 3d 3d 30 20 29  ocketIsInit==0 )
0ac0: 7b 0a 23 69 66 20 64 65 66 69 6e 65 64 28 5f 57  {.#if defined(_W
0ad0: 49 4e 33 32 29 0a 20 20 20 20 69 66 28 20 57 53  IN32).    if( WS
0ae0: 41 53 74 61 72 74 75 70 28 4d 41 4b 45 57 4f 52  AStartup(MAKEWOR
0af0: 44 28 32 2c 30 29 2c 20 26 73 6f 63 6b 65 74 49  D(2,0), &socketI
0b00: 6e 66 6f 29 21 3d 30 20 29 7b 0a 20 20 20 20 20  nfo)!=0 ){.     
0b10: 20 66 6f 73 73 69 6c 5f 70 61 6e 69 63 28 22 63   fossil_panic("c
0b20: 61 6e 27 74 20 69 6e 69 74 69 61 6c 69 7a 65 20  an't initialize 
0b30: 77 69 6e 73 6f 63 6b 22 29 3b 0a 20 20 20 20 7d  winsock");.    }
0b40: 0a 23 65 6e 64 69 66 0a 20 20 20 20 73 6f 63 6b  .#endif.    sock
0b50: 65 74 49 73 49 6e 69 74 20 3d 20 31 3b 0a 20 20  etIsInit = 1;.  
0b60: 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 43 61 6c 6c 20  }.}../*.** Call 
0b70: 74 68 69 73 20 72 6f 75 74 69 6e 65 20 74 6f 20  this routine to 
0b80: 73 68 75 74 64 6f 77 6e 20 74 68 65 20 73 6f 63  shutdown the soc
0b90: 6b 65 74 20 6d 6f 64 75 6c 65 20 70 72 69 6f 72  ket module prior
0ba0: 20 74 6f 20 70 72 6f 67 72 61 6d 0a 2a 2a 20 65   to program.** e
0bb0: 78 69 74 2e 0a 2a 2f 0a 76 6f 69 64 20 73 6f 63  xit..*/.void soc
0bc0: 6b 65 74 5f 67 6c 6f 62 61 6c 5f 73 68 75 74 64  ket_global_shutd
0bd0: 6f 77 6e 28 76 6f 69 64 29 7b 0a 20 20 69 66 28  own(void){.  if(
0be0: 20 73 6f 63 6b 65 74 49 73 49 6e 69 74 20 29 7b   socketIsInit ){
0bf0: 0a 23 69 66 20 64 65 66 69 6e 65 64 28 5f 57 49  .#if defined(_WI
0c00: 4e 33 32 29 0a 20 20 20 20 57 53 41 43 6c 65 61  N32).    WSAClea
0c10: 6e 75 70 28 29 3b 0a 23 65 6e 64 69 66 0a 20 20  nup();.#endif.  
0c20: 20 20 73 6f 63 6b 65 74 5f 63 6c 65 61 72 5f 65    socket_clear_e
0c30: 72 72 6d 73 67 28 29 3b 0a 20 20 20 20 73 6f 63  rrmsg();.    soc
0c40: 6b 65 74 49 73 49 6e 69 74 20 3d 20 30 3b 0a 20  ketIsInit = 0;. 
0c50: 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 43 6c 6f 73   }.}../*.** Clos
0c60: 65 20 74 68 65 20 63 75 72 72 65 6e 74 6c 79 20  e the currently 
0c70: 6f 70 65 6e 20 73 6f 63 6b 65 74 2e 20 20 49 66  open socket.  If
0c80: 20 6e 6f 20 73 6f 63 6b 65 74 20 69 73 20 6f 70   no socket is op
0c90: 65 6e 2c 20 74 68 69 73 20 72 6f 75 74 69 6e 65  en, this routine
0ca0: 0a 2a 2a 20 69 73 20 61 20 6e 6f 2d 6f 70 2e 0a  .** is a no-op..
0cb0: 2a 2f 0a 76 6f 69 64 20 73 6f 63 6b 65 74 5f 63  */.void socket_c
0cc0: 6c 6f 73 65 28 76 6f 69 64 29 7b 0a 20 20 69 66  lose(void){.  if
0cd0: 28 20 69 53 6f 63 6b 65 74 3e 3d 30 20 29 7b 0a  ( iSocket>=0 ){.
0ce0: 23 69 66 20 64 65 66 69 6e 65 64 28 5f 57 49 4e  #if defined(_WIN
0cf0: 33 32 29 0a 20 20 20 20 69 66 28 20 73 68 75 74  32).    if( shut
0d00: 64 6f 77 6e 28 69 53 6f 63 6b 65 74 2c 31 29 3d  down(iSocket,1)=
0d10: 3d 30 20 29 20 73 68 75 74 64 6f 77 6e 28 69 53  =0 ) shutdown(iS
0d20: 6f 63 6b 65 74 2c 30 29 3b 0a 20 20 20 20 63 6c  ocket,0);.    cl
0d30: 6f 73 65 73 6f 63 6b 65 74 28 69 53 6f 63 6b 65  osesocket(iSocke
0d40: 74 29 3b 0a 23 65 6c 73 65 0a 20 20 20 20 63 6c  t);.#else.    cl
0d50: 6f 73 65 28 69 53 6f 63 6b 65 74 29 3b 0a 23 65  ose(iSocket);.#e
0d60: 6e 64 69 66 0a 20 20 20 20 69 53 6f 63 6b 65 74  ndif.    iSocket
0d70: 20 3d 20 2d 31 3b 0a 20 20 7d 0a 7d 0a 0a 2f 2a   = -1;.  }.}../*
0d80: 0a 2a 2a 20 4f 70 65 6e 20 61 20 73 6f 63 6b 65  .** Open a socke
0d90: 74 20 63 6f 6e 6e 65 63 74 69 6f 6e 2e 20 20 54  t connection.  T
0da0: 68 65 20 69 64 65 6e 74 69 66 79 20 6f 66 20 74  he identify of t
0db0: 68 65 20 73 65 72 76 65 72 20 69 73 20 64 65 74  he server is det
0dc0: 65 72 6d 69 6e 65 64 0a 2a 2a 20 62 79 20 70 55  ermined.** by pU
0dd0: 72 6c 44 61 74 61 0a 2a 2a 0a 2a 2a 20 20 20 20  rlData.**.**    
0de0: 70 55 72 6c 44 61 74 61 2d 3e 6e 61 6d 65 20 20  pUrlData->name  
0df0: 20 20 20 20 20 4e 61 6d 65 20 6f 66 20 74 68 65       Name of the
0e00: 20 73 65 72 76 65 72 2e 20 20 45 78 3a 20 77 77   server.  Ex: ww
0e10: 77 2e 66 6f 73 73 69 6c 2d 73 63 6d 2e 6f 72 67  w.fossil-scm.org
0e20: 0a 2a 2a 20 20 20 20 70 55 72 6c 44 61 74 61 2d  .**    pUrlData-
0e30: 3e 70 6f 72 74 20 20 20 20 20 20 20 54 43 50 2f  >port       TCP/
0e40: 49 50 20 70 6f 72 74 20 74 6f 20 75 73 65 2e 20  IP port to use. 
0e50: 20 45 78 3a 20 38 30 0a 2a 2a 0a 2a 2a 20 52 65   Ex: 80.**.** Re
0e60: 74 75 72 6e 20 74 68 65 20 6e 75 6d 62 65 72 20  turn the number 
0e70: 6f 66 20 65 72 72 6f 72 73 2e 0a 2a 2f 0a 69 6e  of errors..*/.in
0e80: 74 20 73 6f 63 6b 65 74 5f 6f 70 65 6e 28 55 72  t socket_open(Ur
0e90: 6c 44 61 74 61 20 2a 70 55 72 6c 44 61 74 61 29  lData *pUrlData)
0ea0: 7b 0a 20 20 69 6e 74 20 72 63 20 3d 20 30 3b 0a  {.  int rc = 0;.
0eb0: 20 20 73 74 72 75 63 74 20 61 64 64 72 69 6e 66    struct addrinf
0ec0: 6f 20 2a 61 69 20 3d 20 30 3b 0a 20 20 73 74 72  o *ai = 0;.  str
0ed0: 75 63 74 20 61 64 64 72 69 6e 66 6f 20 2a 70 3b  uct addrinfo *p;
0ee0: 0a 20 20 73 74 72 75 63 74 20 61 64 64 72 69 6e  .  struct addrin
0ef0: 66 6f 20 68 69 6e 74 73 3b 0a 20 20 63 68 61 72  fo hints;.  char
0f00: 20 7a 50 6f 72 74 5b 33 30 5d 3b 0a 20 20 63 68   zPort[30];.  ch
0f10: 61 72 20 7a 52 65 6d 6f 74 65 5b 4e 49 5f 4d 41  ar zRemote[NI_MA
0f20: 58 48 4f 53 54 5d 3b 0a 0a 20 20 73 6f 63 6b 65  XHOST];..  socke
0f30: 74 5f 67 6c 6f 62 61 6c 5f 69 6e 69 74 28 29 3b  t_global_init();
0f40: 0a 20 20 73 6f 63 6b 65 74 5f 63 6c 6f 73 65 28  .  socket_close(
0f50: 29 3b 0a 20 20 6d 65 6d 73 65 74 28 26 68 69 6e  );.  memset(&hin
0f60: 74 73 2c 20 30 2c 20 73 69 7a 65 6f 66 28 73 74  ts, 0, sizeof(st
0f70: 72 75 63 74 20 61 64 64 72 69 6e 66 6f 29 29 3b  ruct addrinfo));
0f80: 0a 20 20 68 69 6e 74 73 2e 61 69 5f 66 61 6d 69  .  hints.ai_fami
0f90: 6c 79 20 3d 20 67 2e 66 49 50 76 34 20 3f 20 41  ly = g.fIPv4 ? A
0fa0: 46 5f 49 4e 45 54 20 3a 20 41 46 5f 55 4e 53 50  F_INET : AF_UNSP
0fb0: 45 43 3b 0a 20 20 68 69 6e 74 73 2e 61 69 5f 73  EC;.  hints.ai_s
0fc0: 6f 63 6b 74 79 70 65 20 3d 20 53 4f 43 4b 5f 53  ocktype = SOCK_S
0fd0: 54 52 45 41 4d 3b 0a 20 20 68 69 6e 74 73 2e 61  TREAM;.  hints.a
0fe0: 69 5f 70 72 6f 74 6f 63 6f 6c 20 3d 20 49 50 50  i_protocol = IPP
0ff0: 52 4f 54 4f 5f 54 43 50 3b 0a 20 20 73 71 6c 69  ROTO_TCP;.  sqli
1000: 74 65 33 5f 73 6e 70 72 69 6e 74 66 28 73 69 7a  te3_snprintf(siz
1010: 65 6f 66 28 7a 50 6f 72 74 29 2c 7a 50 6f 72 74  eof(zPort),zPort
1020: 2c 22 25 64 22 2c 20 70 55 72 6c 44 61 74 61 2d  ,"%d", pUrlData-
1030: 3e 70 6f 72 74 29 3b 0a 20 20 72 63 20 3d 20 67  >port);.  rc = g
1040: 65 74 61 64 64 72 69 6e 66 6f 28 70 55 72 6c 44  etaddrinfo(pUrlD
1050: 61 74 61 2d 3e 6e 61 6d 65 2c 20 7a 50 6f 72 74  ata->name, zPort
1060: 2c 20 26 68 69 6e 74 73 2c 20 26 61 69 29 3b 0a  , &hints, &ai);.
1070: 20 20 69 66 28 20 72 63 20 29 7b 0a 20 20 20 20    if( rc ){.    
1080: 73 6f 63 6b 65 74 5f 73 65 74 5f 65 72 72 6d 73  socket_set_errms
1090: 67 28 22 67 65 74 61 64 64 72 69 6e 66 6f 28 29  g("getaddrinfo()
10a0: 20 66 61 69 6c 73 3a 20 25 73 22 2c 20 67 61 69   fails: %s", gai
10b0: 5f 73 74 72 65 72 72 6f 72 28 72 63 29 29 3b 0a  _strerror(rc));.
10c0: 20 20 20 20 67 6f 74 6f 20 65 6e 64 5f 73 6f 63      goto end_soc
10d0: 6b 65 74 5f 6f 70 65 6e 3b 0a 20 20 7d 0a 20 20  ket_open;.  }.  
10e0: 66 6f 72 28 70 3d 61 69 3b 20 70 3b 20 70 3d 70  for(p=ai; p; p=p
10f0: 2d 3e 61 69 5f 6e 65 78 74 29 7b 0a 20 20 20 20  ->ai_next){.    
1100: 69 53 6f 63 6b 65 74 20 3d 20 73 6f 63 6b 65 74  iSocket = socket
1110: 28 70 2d 3e 61 69 5f 66 61 6d 69 6c 79 2c 20 70  (p->ai_family, p
1120: 2d 3e 61 69 5f 73 6f 63 6b 74 79 70 65 2c 20 70  ->ai_socktype, p
1130: 2d 3e 61 69 5f 70 72 6f 74 6f 63 6f 6c 29 3b 0a  ->ai_protocol);.
1140: 20 20 20 20 69 66 28 20 69 53 6f 63 6b 65 74 3c      if( iSocket<
1150: 30 20 29 20 63 6f 6e 74 69 6e 75 65 3b 0a 20 20  0 ) continue;.  
1160: 20 20 69 66 28 20 63 6f 6e 6e 65 63 74 28 69 53    if( connect(iS
1170: 6f 63 6b 65 74 2c 70 2d 3e 61 69 5f 61 64 64 72  ocket,p->ai_addr
1180: 2c 70 2d 3e 61 69 5f 61 64 64 72 6c 65 6e 29 3c  ,p->ai_addrlen)<
1190: 30 20 29 7b 0a 20 20 20 20 20 20 73 6f 63 6b 65  0 ){.      socke
11a0: 74 5f 63 6c 6f 73 65 28 29 3b 0a 20 20 20 20 20  t_close();.     
11b0: 20 63 6f 6e 74 69 6e 75 65 3b 0a 20 20 20 20 7d   continue;.    }
11c0: 0a 20 20 20 20 72 63 20 3d 20 67 65 74 6e 61 6d  .    rc = getnam
11d0: 65 69 6e 66 6f 28 70 2d 3e 61 69 5f 61 64 64 72  einfo(p->ai_addr
11e0: 2c 20 70 2d 3e 61 69 5f 61 64 64 72 6c 65 6e 2c  , p->ai_addrlen,
11f0: 20 7a 52 65 6d 6f 74 65 2c 20 73 69 7a 65 6f 66   zRemote, sizeof
1200: 28 7a 52 65 6d 6f 74 65 29 2c 0a 20 20 20 20 20  (zRemote),.     
1210: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
1220: 30 2c 20 30 2c 20 4e 49 5f 4e 55 4d 45 52 49 43  0, 0, NI_NUMERIC
1230: 48 4f 53 54 29 3b 0a 20 20 20 20 69 66 28 20 72  HOST);.    if( r
1240: 63 20 29 7b 0a 20 20 20 20 20 20 73 6f 63 6b 65  c ){.      socke
1250: 74 5f 73 65 74 5f 65 72 72 6d 73 67 28 22 67 65  t_set_errmsg("ge
1260: 74 6e 61 6d 65 69 6e 66 6f 28 29 20 66 61 69 6c  tnameinfo() fail
1270: 65 64 3a 20 25 73 22 2c 20 67 61 69 5f 73 74 72  ed: %s", gai_str
1280: 65 72 72 6f 72 28 72 63 29 29 3b 0a 20 20 20 20  error(rc));.    
1290: 20 20 67 6f 74 6f 20 65 6e 64 5f 73 6f 63 6b 65    goto end_socke
12a0: 74 5f 6f 70 65 6e 3b 0a 20 20 20 20 7d 0a 20 20  t_open;.    }.  
12b0: 20 20 67 2e 7a 49 70 41 64 64 72 20 3d 20 6d 70    g.zIpAddr = mp
12c0: 72 69 6e 74 66 28 22 25 73 22 2c 20 7a 52 65 6d  rintf("%s", zRem
12d0: 6f 74 65 29 3b 0a 20 20 20 20 62 72 65 61 6b 3b  ote);.    break;
12e0: 0a 20 20 7d 0a 20 20 69 66 28 20 70 3d 3d 30 20  .  }.  if( p==0 
12f0: 29 7b 0a 20 20 20 20 73 6f 63 6b 65 74 5f 73 65  ){.    socket_se
1300: 74 5f 65 72 72 6d 73 67 28 22 63 61 6e 6e 6f 74  t_errmsg("cannot
1310: 20 63 6f 6e 6e 65 63 74 20 74 6f 20 68 6f 73 74   connect to host
1320: 20 25 73 3a 25 64 22 2c 20 70 55 72 6c 44 61 74   %s:%d", pUrlDat
1330: 61 2d 3e 6e 61 6d 65 2c 0a 20 20 20 20 20 20 20  a->name,.       
1340: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 70                 p
1350: 55 72 6c 44 61 74 61 2d 3e 70 6f 72 74 29 3b 0a  UrlData->port);.
1360: 20 20 20 20 72 63 20 3d 20 31 3b 0a 20 20 7d 0a      rc = 1;.  }.
1370: 23 69 66 20 21 64 65 66 69 6e 65 64 28 5f 57 49  #if !defined(_WI
1380: 4e 33 32 29 0a 20 20 73 69 67 6e 61 6c 28 53 49  N32).  signal(SI
1390: 47 50 49 50 45 2c 20 53 49 47 5f 49 47 4e 29 3b  GPIPE, SIG_IGN);
13a0: 0a 23 65 6e 64 69 66 0a 65 6e 64 5f 73 6f 63 6b  .#endif.end_sock
13b0: 65 74 5f 6f 70 65 6e 3a 0a 20 20 69 66 28 20 72  et_open:.  if( r
13c0: 63 20 26 26 20 69 53 6f 63 6b 65 74 3e 3d 30 20  c && iSocket>=0 
13d0: 29 20 73 6f 63 6b 65 74 5f 63 6c 6f 73 65 28 29  ) socket_close()
13e0: 3b 0a 20 20 69 66 28 20 61 69 20 29 20 66 72 65  ;.  if( ai ) fre
13f0: 65 61 64 64 72 69 6e 66 6f 28 61 69 29 3b 0a 20  eaddrinfo(ai);. 
1400: 20 72 65 74 75 72 6e 20 72 63 3b 0a 7d 0a 0a 2f   return rc;.}../
1410: 2a 0a 2a 2a 20 53 65 6e 64 20 63 6f 6e 74 65 6e  *.** Send conten
1420: 74 20 6f 75 74 20 6f 76 65 72 20 74 68 65 20 6f  t out over the o
1430: 70 65 6e 20 73 6f 63 6b 65 74 20 63 6f 6e 6e 65  pen socket conne
1440: 63 74 69 6f 6e 2e 0a 2a 2f 0a 73 69 7a 65 5f 74  ction..*/.size_t
1450: 20 73 6f 63 6b 65 74 5f 73 65 6e 64 28 76 6f 69   socket_send(voi
1460: 64 20 2a 4e 6f 74 55 73 65 64 2c 20 63 6f 6e 73  d *NotUsed, cons
1470: 74 20 76 6f 69 64 20 2a 70 43 6f 6e 74 65 6e 74  t void *pContent
1480: 2c 20 73 69 7a 65 5f 74 20 4e 29 7b 0a 20 20 73  , size_t N){.  s
1490: 73 69 7a 65 5f 74 20 73 65 6e 74 3b 0a 20 20 73  size_t sent;.  s
14a0: 69 7a 65 5f 74 20 74 6f 74 61 6c 20 3d 20 30 3b  ize_t total = 0;
14b0: 0a 20 20 77 68 69 6c 65 28 20 4e 3e 30 20 29 7b  .  while( N>0 ){
14c0: 0a 20 20 20 20 73 65 6e 74 20 3d 20 73 65 6e 64  .    sent = send
14d0: 28 69 53 6f 63 6b 65 74 2c 20 70 43 6f 6e 74 65  (iSocket, pConte
14e0: 6e 74 2c 20 4e 2c 20 30 29 3b 0a 20 20 20 20 69  nt, N, 0);.    i
14f0: 66 28 20 73 65 6e 74 3c 3d 30 20 29 20 62 72 65  f( sent<=0 ) bre
1500: 61 6b 3b 0a 20 20 20 20 74 6f 74 61 6c 20 2b 3d  ak;.    total +=
1510: 20 28 73 69 7a 65 5f 74 29 73 65 6e 74 3b 0a 20   (size_t)sent;. 
1520: 20 20 20 4e 20 2d 3d 20 28 73 69 7a 65 5f 74 29     N -= (size_t)
1530: 73 65 6e 74 3b 0a 20 20 20 20 70 43 6f 6e 74 65  sent;.    pConte
1540: 6e 74 20 3d 20 28 76 6f 69 64 2a 29 26 28 28 63  nt = (void*)&((c
1550: 68 61 72 2a 29 70 43 6f 6e 74 65 6e 74 29 5b 73  har*)pContent)[s
1560: 65 6e 74 5d 3b 0a 20 20 7d 0a 20 20 72 65 74 75  ent];.  }.  retu
1570: 72 6e 20 74 6f 74 61 6c 3b 0a 7d 0a 0a 2f 2a 0a  rn total;.}../*.
1580: 2a 2a 20 52 65 63 65 69 76 65 20 63 6f 6e 74 65  ** Receive conte
1590: 6e 74 20 62 61 63 6b 20 66 72 6f 6d 20 74 68 65  nt back from the
15a0: 20 6f 70 65 6e 20 73 6f 63 6b 65 74 20 63 6f 6e   open socket con
15b0: 6e 65 63 74 69 6f 6e 2e 0a 2a 2a 20 52 65 74 75  nection..** Retu
15c0: 72 6e 20 74 68 65 20 6e 75 6d 62 65 72 20 6f 66  rn the number of
15d0: 20 62 79 74 65 73 20 72 65 61 64 2e 0a 2a 2a 0a   bytes read..**.
15e0: 2a 2a 20 57 68 65 6e 20 62 44 6f 6e 74 42 6c 6f  ** When bDontBlo
15f0: 63 6b 20 69 73 20 66 61 6c 73 65 2c 20 74 68 69  ck is false, thi
1600: 73 20 66 75 6e 63 74 69 6f 6e 20 62 6c 6f 63 6b  s function block
1610: 73 20 75 6e 74 69 6c 20 61 6c 6c 20 4e 20 62 79  s until all N by
1620: 74 65 73 0a 2a 2a 20 68 61 76 65 20 62 65 65 6e  tes.** have been
1630: 20 72 65 61 64 2e 0a 2a 2f 0a 73 69 7a 65 5f 74   read..*/.size_t
1640: 20 73 6f 63 6b 65 74 5f 72 65 63 65 69 76 65 28   socket_receive(
1650: 76 6f 69 64 20 2a 4e 6f 74 55 73 65 64 2c 20 76  void *NotUsed, v
1660: 6f 69 64 20 2a 70 43 6f 6e 74 65 6e 74 2c 20 73  oid *pContent, s
1670: 69 7a 65 5f 74 20 4e 2c 20 69 6e 74 20 62 44 6f  ize_t N, int bDo
1680: 6e 74 42 6c 6f 63 6b 29 7b 0a 20 20 73 73 69 7a  ntBlock){.  ssiz
1690: 65 5f 74 20 67 6f 74 3b 0a 20 20 73 69 7a 65 5f  e_t got;.  size_
16a0: 74 20 74 6f 74 61 6c 20 3d 20 30 3b 0a 20 20 69  t total = 0;.  i
16b0: 6e 74 20 66 6c 61 67 73 20 3d 20 30 3b 0a 23 69  nt flags = 0;.#i
16c0: 66 64 65 66 20 4d 53 47 5f 44 4f 4e 54 57 41 49  fdef MSG_DONTWAI
16d0: 54 0a 20 20 69 66 28 20 62 44 6f 6e 74 42 6c 6f  T.  if( bDontBlo
16e0: 63 6b 20 29 20 66 6c 61 67 73 20 7c 3d 20 4d 53  ck ) flags |= MS
16f0: 47 5f 44 4f 4e 54 57 41 49 54 3b 0a 23 65 6e 64  G_DONTWAIT;.#end
1700: 69 66 0a 20 20 77 68 69 6c 65 28 20 4e 3e 30 20  if.  while( N>0 
1710: 29 7b 0a 20 20 20 20 2f 2a 20 57 69 6e 58 50 20  ){.    /* WinXP 
1720: 66 61 69 6c 73 20 66 6f 72 20 6c 61 72 67 65 20  fails for large 
1730: 76 61 6c 75 65 73 20 6f 66 20 4e 2e 20 20 53 6f  values of N.  So
1740: 20 6c 69 6d 69 74 20 69 74 20 74 6f 20 36 34 4b   limit it to 64K
1750: 69 42 2e 20 2a 2f 0a 20 20 20 20 67 6f 74 20 3d  iB. */.    got =
1760: 20 72 65 63 76 28 69 53 6f 63 6b 65 74 2c 20 70   recv(iSocket, p
1770: 43 6f 6e 74 65 6e 74 2c 20 4e 3e 36 35 35 33 36  Content, N>65536
1780: 20 3f 20 36 35 35 33 36 20 3a 20 4e 2c 20 66 6c   ? 65536 : N, fl
1790: 61 67 73 29 3b 0a 20 20 20 20 69 66 28 20 67 6f  ags);.    if( go
17a0: 74 3c 3d 30 20 29 20 62 72 65 61 6b 3b 0a 20 20  t<=0 ) break;.  
17b0: 20 20 74 6f 74 61 6c 20 2b 3d 20 28 73 69 7a 65    total += (size
17c0: 5f 74 29 67 6f 74 3b 0a 20 20 20 20 4e 20 2d 3d  _t)got;.    N -=
17d0: 20 28 73 69 7a 65 5f 74 29 67 6f 74 3b 0a 20 20   (size_t)got;.  
17e0: 20 20 70 43 6f 6e 74 65 6e 74 20 3d 20 28 76 6f    pContent = (vo
17f0: 69 64 2a 29 26 28 28 63 68 61 72 2a 29 70 43 6f  id*)&((char*)pCo
1800: 6e 74 65 6e 74 29 5b 67 6f 74 5d 3b 0a 20 20 7d  ntent)[got];.  }
1810: 0a 20 20 72 65 74 75 72 6e 20 74 6f 74 61 6c 3b  .  return total;
1820: 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 41 74 74 65 6d 70  .}../*.** Attemp
1830: 74 20 74 6f 20 72 65 73 6f 6c 76 65 20 70 55 72  t to resolve pUr
1840: 6c 44 61 74 61 2d 3e 6e 61 6d 65 20 74 6f 20 61  lData->name to a
1850: 6e 20 49 50 20 61 64 64 72 65 73 73 20 61 6e 64  n IP address and
1860: 20 73 65 74 75 70 20 67 2e 7a 49 70 41 64 64 72   setup g.zIpAddr
1870: 0a 2a 2a 20 73 6f 20 72 63 76 66 72 6f 6d 20 67  .** so rcvfrom g
1880: 65 74 73 20 70 6f 70 75 6c 61 74 65 64 2e 20 46  ets populated. F
1890: 6f 72 20 68 6f 73 74 6e 61 6d 65 73 20 77 69 74  or hostnames wit
18a0: 68 20 6d 6f 72 65 20 74 68 61 6e 20 6f 6e 65 20  h more than one 
18b0: 49 50 20 28 6f 72 0a 2a 2a 20 69 66 20 6f 76 65  IP (or.** if ove
18c0: 72 72 69 64 64 65 6e 20 69 6e 20 7e 2f 2e 73 73  rridden in ~/.ss
18d0: 68 2f 63 6f 6e 66 69 67 29 20 74 68 65 20 72 63  h/config) the rc
18e0: 76 66 72 6f 6d 20 6d 61 79 20 6e 6f 74 20 6d 61  vfrom may not ma
18f0: 74 63 68 20 74 68 65 20 68 6f 73 74 0a 2a 2a 20  tch the host.** 
1900: 74 6f 20 77 68 69 63 68 20 77 65 20 63 6f 6e 6e  to which we conn
1910: 65 63 74 2e 0a 2a 2f 0a 76 6f 69 64 20 73 6f 63  ect..*/.void soc
1920: 6b 65 74 5f 73 73 68 5f 72 65 73 6f 6c 76 65 5f  ket_ssh_resolve_
1930: 61 64 64 72 28 55 72 6c 44 61 74 61 20 2a 70 55  addr(UrlData *pU
1940: 72 6c 44 61 74 61 29 7b 0a 20 20 73 74 72 75 63  rlData){.  struc
1950: 74 20 61 64 64 72 69 6e 66 6f 20 2a 61 69 20 3d  t addrinfo *ai =
1960: 20 30 3b 0a 20 20 73 74 72 75 63 74 20 61 64 64   0;.  struct add
1970: 72 69 6e 66 6f 20 68 69 6e 74 73 3b 0a 20 20 63  rinfo hints;.  c
1980: 68 61 72 20 7a 52 65 6d 6f 74 65 5b 4e 49 5f 4d  har zRemote[NI_M
1990: 41 58 48 4f 53 54 5d 3b 0a 20 20 68 69 6e 74 73  AXHOST];.  hints
19a0: 2e 61 69 5f 66 61 6d 69 6c 79 20 3d 20 41 46 5f  .ai_family = AF_
19b0: 55 4e 53 50 45 43 3b 0a 20 20 68 69 6e 74 73 2e  UNSPEC;.  hints.
19c0: 61 69 5f 73 6f 63 6b 74 79 70 65 20 3d 20 53 4f  ai_socktype = SO
19d0: 43 4b 5f 53 54 52 45 41 4d 3b 0a 20 20 68 69 6e  CK_STREAM;.  hin
19e0: 74 73 2e 61 69 5f 70 72 6f 74 6f 63 6f 6c 20 3d  ts.ai_protocol =
19f0: 20 49 50 50 52 4f 54 4f 5f 54 43 50 3b 0a 20 20   IPPROTO_TCP;.  
1a00: 69 66 28 20 67 65 74 61 64 64 72 69 6e 66 6f 28  if( getaddrinfo(
1a10: 70 55 72 6c 44 61 74 61 2d 3e 6e 61 6d 65 2c 20  pUrlData->name, 
1a20: 4e 55 4c 4c 2c 20 26 68 69 6e 74 73 2c 20 26 61  NULL, &hints, &a
1a30: 69 29 3d 3d 30 0a 20 20 20 26 26 20 61 69 21 3d  i)==0.   && ai!=
1a40: 30 0a 20 20 20 26 26 20 67 65 74 6e 61 6d 65 69  0.   && getnamei
1a50: 6e 66 6f 28 61 69 2d 3e 61 69 5f 61 64 64 72 2c  nfo(ai->ai_addr,
1a60: 20 61 69 2d 3e 61 69 5f 61 64 64 72 6c 65 6e 2c   ai->ai_addrlen,
1a70: 20 7a 52 65 6d 6f 74 65 2c 0a 20 20 20 20 20 20   zRemote,.      
1a80: 20 20 20 20 20 20 20 20 20 20 20 20 73 69 7a 65              size
1a90: 6f 66 28 7a 52 65 6d 6f 74 65 29 2c 20 30 2c 20  of(zRemote), 0, 
1aa0: 30 2c 20 4e 49 5f 4e 55 4d 45 52 49 43 48 4f 53  0, NI_NUMERICHOS
1ab0: 54 29 3d 3d 30 20 29 7b 0a 20 20 20 20 67 2e 7a  T)==0 ){.    g.z
1ac0: 49 70 41 64 64 72 20 3d 20 6d 70 72 69 6e 74 66  IpAddr = mprintf
1ad0: 28 22 25 73 20 28 25 73 29 22 2c 20 7a 52 65 6d  ("%s (%s)", zRem
1ae0: 6f 74 65 2c 20 70 55 72 6c 44 61 74 61 2d 3e 6e  ote, pUrlData->n
1af0: 61 6d 65 29 3b 0a 20 20 7d 0a 20 20 69 66 28 20  ame);.  }.  if( 
1b00: 61 69 20 29 20 66 72 65 65 61 64 64 72 69 6e 66  ai ) freeaddrinf
1b10: 6f 28 61 69 29 3b 0a 20 20 69 66 28 20 67 2e 7a  o(ai);.  if( g.z
1b20: 49 70 41 64 64 72 3d 3d 30 20 29 7b 0a 20 20 20  IpAddr==0 ){.   
1b30: 20 67 2e 7a 49 70 41 64 64 72 20 3d 20 6d 70 72   g.zIpAddr = mpr
1b40: 69 6e 74 66 28 22 25 73 22 2c 20 70 55 72 6c 44  intf("%s", pUrlD
1b50: 61 74 61 2d 3e 6e 61 6d 65 29 3b 0a 20 20 7d 0a  ata->name);.  }.
1b60: 7d 0a                                            }.