sjero.net Git - wget/blob - src/main.c

   1 /* Command line parsing.
   2    Copyright (C) 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003,
   3    2004, 2005, 2006, 2007, 2008, 2009 Free Software Foundation, Inc.
   4
   5 This file is part of GNU Wget.
   6
   7 GNU Wget is free software; you can redistribute it and/or modify
   8 it under the terms of the GNU General Public License as published by
   9 the Free Software Foundation; either version 3 of the License, or
  10 (at your option) any later version.
  11
  12 GNU Wget is distributed in the hope that it will be useful,
  13 but WITHOUT ANY WARRANTY; without even the implied warranty of
  14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15 GNU General Public License for more details.
  16
  17 You should have received a copy of the GNU General Public License
  18 along with Wget.  If not, see <http://www.gnu.org/licenses/>.
  19
  20 Additional permission under GNU GPL version 3 section 7
  21
  22 If you modify this program, or any covered work, by linking or
  23 combining it with the OpenSSL project's OpenSSL library (or a
  24 modified version of that library), containing parts covered by the
  25 terms of the OpenSSL or SSLeay licenses, the Free Software Foundation
  26 grants you additional permission to convey the resulting work.
  27 Corresponding Source for a non-source form of such a combination
  28 shall include the source code for the parts of OpenSSL used as well
  29 as that of the covered work.  */
  30
  31 #include "wget.h"
  32
  33 #include <stdio.h>
  34 #include <stdlib.h>
  35 #ifdef HAVE_UNISTD_H
  36 # include <unistd.h>
  37 #endif /* HAVE_UNISTD_H */
  38 #include <string.h>
  39 #include <signal.h>
  40 #ifdef ENABLE_NLS
  41 # include <locale.h>
  42 #endif
  43 #include <assert.h>
  44 #include <errno.h>
  45 #include <time.h>
  46
  47 #include "utils.h"
  48 #include "init.h"
  49 #include "retr.h"
  50 #include "recur.h"
  51 #include "host.h"
  52 #include "url.h"
  53 #include "progress.h"           /* for progress_handle_sigwinch */
  54 #include "convert.h"
  55 #include "spider.h"
  56 #include "http.h"               /* for save_cookies */
  57
  58 #include <getopt.h>
  59 #include <getpass.h>
  60 #include <quote.h>
  61
  62 #ifdef __VMS
  63 #include "vms.h"
  64 #endif /* __VMS */
  65
  66 #ifndef PATH_SEPARATOR
  67 # define PATH_SEPARATOR '/'
  68 #endif
  69
  70 struct options opt;
  71
  72 /* defined in version.c */
  73 extern char *version_string;
  74 extern char *compilation_string;
  75 extern char *system_getrc;
  76 extern char *link_string;
  77 /* defined in build_info.c */
  78 extern char *compiled_features[];
  79 /* Used for --version output in print_version */
  80 #define MAX_CHARS_PER_LINE      72
  81 #define TABULATION              4
  82
  83 #if defined(SIGHUP) || defined(SIGUSR1)
  84 static void redirect_output_signal (int);
  85 #endif
  86
  87 const char *exec_name;
  88
  89 /* Number of successfully downloaded URLs */
  90 int numurls = 0;
  91 \f
  92 #ifndef TESTING
  93 /* Initialize I18N/L10N.  That amounts to invoking setlocale, and
  94    setting up gettext's message catalog using bindtextdomain and
  95    textdomain.  Does nothing if NLS is disabled or missing.  */
  96
  97 static void
  98 i18n_initialize (void)
  99 {
 100   /* ENABLE_NLS implies existence of functions invoked here.  */
 101 #ifdef ENABLE_NLS
 102   /* Set the current locale.  */
 103   setlocale (LC_ALL, "");
 104   /* Set the text message domain.  */
 105   bindtextdomain ("wget", LOCALEDIR);
 106   textdomain ("wget");
 107 #endif /* ENABLE_NLS */
 108 }
 109 \f
 110 /* Definition of command-line options. */
 111
 112 static void print_help (void);
 113 static void print_version (void);
 114
 115 #ifdef HAVE_SSL
 116 # define IF_SSL(x) x
 117 #else
 118 # define IF_SSL(x) NULL
 119 #endif
 120
 121 #ifdef ENABLE_DEBUG
 122 # define WHEN_DEBUG(x) x
 123 #else
 124 # define WHEN_DEBUG(x) NULL
 125 #endif
 126
 127 struct cmdline_option {
 128   const char *long_name;
 129   char short_name;
 130   enum {
 131     OPT_VALUE,
 132     OPT_BOOLEAN,
 133     OPT_FUNCALL,
 134     /* Non-standard options that have to be handled specially in
 135        main().  */
 136     OPT__APPEND_OUTPUT,
 137     OPT__CLOBBER,
 138     OPT__DONT_REMOVE_LISTING,
 139     OPT__EXECUTE,
 140     OPT__NO,
 141     OPT__PARENT
 142   } type;
 143   const void *data;             /* for standard options */
 144   int argtype;                  /* for non-standard options */
 145 };
 146
 147 static struct cmdline_option option_data[] =
 148   {
 149     { "accept", 'A', OPT_VALUE, "accept", -1 },
 150     { "append-output", 'a', OPT__APPEND_OUTPUT, NULL, required_argument },
 151     { "ask-password", 0, OPT_BOOLEAN, "askpassword", -1 },
 152     { "auth-no-challenge", 0, OPT_BOOLEAN, "authnochallenge", -1 },
 153     { "background", 'b', OPT_BOOLEAN, "background", -1 },
 154     { "backup-converted", 'K', OPT_BOOLEAN, "backupconverted", -1 },
 155     { "backups", 0, OPT_BOOLEAN, "backups", -1 },
 156     { "base", 'B', OPT_VALUE, "base", -1 },
 157     { "bind-address", 0, OPT_VALUE, "bindaddress", -1 },
 158     { IF_SSL ("ca-certificate"), 0, OPT_VALUE, "cacertificate", -1 },
 159     { IF_SSL ("ca-directory"), 0, OPT_VALUE, "cadirectory", -1 },
 160     { "cache", 0, OPT_BOOLEAN, "cache", -1 },
 161     { IF_SSL ("certificate"), 0, OPT_VALUE, "certificate", -1 },
 162     { IF_SSL ("certificate-type"), 0, OPT_VALUE, "certificatetype", -1 },
 163     { IF_SSL ("check-certificate"), 0, OPT_BOOLEAN, "checkcertificate", -1 },
 164     { "clobber", 0, OPT__CLOBBER, NULL, optional_argument },
 165     { "connect-timeout", 0, OPT_VALUE, "connecttimeout", -1 },
 166     { "continue", 'c', OPT_BOOLEAN, "continue", -1 },
 167     { "convert-links", 'k', OPT_BOOLEAN, "convertlinks", -1 },
 168     { "content-disposition", 0, OPT_BOOLEAN, "contentdisposition", -1 },
 169     { "cookies", 0, OPT_BOOLEAN, "cookies", -1 },
 170     { "cut-dirs", 0, OPT_VALUE, "cutdirs", -1 },
 171     { WHEN_DEBUG ("debug"), 'd', OPT_BOOLEAN, "debug", -1 },
 172     { "default-page", 0, OPT_VALUE, "defaultpage", -1 },
 173     { "delete-after", 0, OPT_BOOLEAN, "deleteafter", -1 },
 174     { "directories", 0, OPT_BOOLEAN, "dirstruct", -1 },
 175     { "directory-prefix", 'P', OPT_VALUE, "dirprefix", -1 },
 176     { "dns-cache", 0, OPT_BOOLEAN, "dnscache", -1 },
 177     { "dns-timeout", 0, OPT_VALUE, "dnstimeout", -1 },
 178     { "domains", 'D', OPT_VALUE, "domains", -1 },
 179     { "dont-remove-listing", 0, OPT__DONT_REMOVE_LISTING, NULL, no_argument },
 180     { "dot-style", 0, OPT_VALUE, "dotstyle", -1 },
 181     { "egd-file", 0, OPT_VALUE, "egdfile", -1 },
 182     { "exclude-directories", 'X', OPT_VALUE, "excludedirectories", -1 },
 183     { "exclude-domains", 0, OPT_VALUE, "excludedomains", -1 },
 184     { "execute", 'e', OPT__EXECUTE, NULL, required_argument },
 185     { "follow-ftp", 0, OPT_BOOLEAN, "followftp", -1 },
 186     { "follow-tags", 0, OPT_VALUE, "followtags", -1 },
 187     { "force-directories", 'x', OPT_BOOLEAN, "dirstruct", -1 },
 188     { "force-html", 'F', OPT_BOOLEAN, "forcehtml", -1 },
 189     { "ftp-password", 0, OPT_VALUE, "ftppassword", -1 },
 190 #ifdef __VMS
 191     { "ftp-stmlf", 0, OPT_BOOLEAN, "ftpstmlf", -1 },
 192 #endif /* def __VMS */
 193     { "ftp-user", 0, OPT_VALUE, "ftpuser", -1 },
 194     { "glob", 0, OPT_BOOLEAN, "glob", -1 },
 195     { "header", 0, OPT_VALUE, "header", -1 },
 196     { "help", 'h', OPT_FUNCALL, (void *)print_help, no_argument },
 197     { "host-directories", 0, OPT_BOOLEAN, "addhostdir", -1 },
 198     { "html-extension", 'E', OPT_BOOLEAN, "htmlextension", -1 },
 199     { "htmlify", 0, OPT_BOOLEAN, "htmlify", -1 },
 200     { "http-keep-alive", 0, OPT_BOOLEAN, "httpkeepalive", -1 },
 201     { "http-passwd", 0, OPT_VALUE, "httppassword", -1 }, /* deprecated */
 202     { "http-password", 0, OPT_VALUE, "httppassword", -1 },
 203     { "http-user", 0, OPT_VALUE, "httpuser", -1 },
 204     { "ignore-case", 0, OPT_BOOLEAN, "ignorecase", -1 },
 205     { "ignore-length", 0, OPT_BOOLEAN, "ignorelength", -1 },
 206     { "ignore-tags", 0, OPT_VALUE, "ignoretags", -1 },
 207     { "include-directories", 'I', OPT_VALUE, "includedirectories", -1 },
 208 #ifdef ENABLE_IPV6
 209     { "inet4-only", '4', OPT_BOOLEAN, "inet4only", -1 },
 210     { "inet6-only", '6', OPT_BOOLEAN, "inet6only", -1 },
 211 #endif
 212     { "input-file", 'i', OPT_VALUE, "input", -1 },
 213     { "iri", 0, OPT_BOOLEAN, "iri", -1 },
 214     { "keep-session-cookies", 0, OPT_BOOLEAN, "keepsessioncookies", -1 },
 215     { "level", 'l', OPT_VALUE, "reclevel", -1 },
 216     { "limit-rate", 0, OPT_VALUE, "limitrate", -1 },
 217     { "load-cookies", 0, OPT_VALUE, "loadcookies", -1 },
 218     { "locale", 0, OPT_VALUE, "locale", -1 },
 219     { "max-redirect", 0, OPT_VALUE, "maxredirect", -1 },
 220     { "mirror", 'm', OPT_BOOLEAN, "mirror", -1 },
 221     { "no", 'n', OPT__NO, NULL, required_argument },
 222     { "no-clobber", 0, OPT_BOOLEAN, "noclobber", -1 },
 223     { "no-parent", 0, OPT_BOOLEAN, "noparent", -1 },
 224     { "output-document", 'O', OPT_VALUE, "outputdocument", -1 },
 225     { "output-file", 'o', OPT_VALUE, "logfile", -1 },
 226     { "page-requisites", 'p', OPT_BOOLEAN, "pagerequisites", -1 },
 227     { "parent", 0, OPT__PARENT, NULL, optional_argument },
 228     { "passive-ftp", 0, OPT_BOOLEAN, "passiveftp", -1 },
 229     { "password", 0, OPT_VALUE, "password", -1 },
 230     { "post-data", 0, OPT_VALUE, "postdata", -1 },
 231     { "post-file", 0, OPT_VALUE, "postfile", -1 },
 232     { "prefer-family", 0, OPT_VALUE, "preferfamily", -1 },
 233     { "preserve-permissions", 0, OPT_BOOLEAN, "preservepermissions", -1 },
 234     { IF_SSL ("private-key"), 0, OPT_VALUE, "privatekey", -1 },
 235     { IF_SSL ("private-key-type"), 0, OPT_VALUE, "privatekeytype", -1 },
 236     { "progress", 0, OPT_VALUE, "progress", -1 },
 237     { "protocol-directories", 0, OPT_BOOLEAN, "protocoldirectories", -1 },
 238     { "proxy", 0, OPT_BOOLEAN, "useproxy", -1 },
 239     { "proxy__compat", 'Y', OPT_VALUE, "useproxy", -1 }, /* back-compatible */
 240     { "proxy-passwd", 0, OPT_VALUE, "proxypassword", -1 }, /* deprecated */
 241     { "proxy-password", 0, OPT_VALUE, "proxypassword", -1 },
 242     { "proxy-user", 0, OPT_VALUE, "proxyuser", -1 },
 243     { "quiet", 'q', OPT_BOOLEAN, "quiet", -1 },
 244     { "quota", 'Q', OPT_VALUE, "quota", -1 },
 245     { "random-file", 0, OPT_VALUE, "randomfile", -1 },
 246     { "random-wait", 0, OPT_BOOLEAN, "randomwait", -1 },
 247     { "read-timeout", 0, OPT_VALUE, "readtimeout", -1 },
 248     { "recursive", 'r', OPT_BOOLEAN, "recursive", -1 },
 249     { "referer", 0, OPT_VALUE, "referer", -1 },
 250     { "reject", 'R', OPT_VALUE, "reject", -1 },
 251     { "relative", 'L', OPT_BOOLEAN, "relativeonly", -1 },
 252     { "remote-encoding", 0, OPT_VALUE, "remoteencoding", -1},
 253     { "remove-listing", 0, OPT_BOOLEAN, "removelisting", -1 },
 254     { "restrict-file-names", 0, OPT_BOOLEAN, "restrictfilenames", -1 },
 255     { "retr-symlinks", 0, OPT_BOOLEAN, "retrsymlinks", -1 },
 256     { "retry-connrefused", 0, OPT_BOOLEAN, "retryconnrefused", -1 },
 257     { "save-cookies", 0, OPT_VALUE, "savecookies", -1 },
 258     { "save-headers", 0, OPT_BOOLEAN, "saveheaders", -1 },
 259     { IF_SSL ("secure-protocol"), 0, OPT_VALUE, "secureprotocol", -1 },
 260     { "server-response", 'S', OPT_BOOLEAN, "serverresponse", -1 },
 261     { "span-hosts", 'H', OPT_BOOLEAN, "spanhosts", -1 },
 262     { "spider", 0, OPT_BOOLEAN, "spider", -1 },
 263     { "strict-comments", 0, OPT_BOOLEAN, "strictcomments", -1 },
 264     { "timeout", 'T', OPT_VALUE, "timeout", -1 },
 265     { "timestamping", 'N', OPT_BOOLEAN, "timestamping", -1 },
 266     { "tries", 't', OPT_VALUE, "tries", -1 },
 267     { "user", 0, OPT_VALUE, "user", -1 },
 268     { "user-agent", 'U', OPT_VALUE, "useragent", -1 },
 269     { "verbose", 'v', OPT_BOOLEAN, "verbose", -1 },
 270     { "verbose", 0, OPT_BOOLEAN, "verbose", -1 },
 271     { "version", 'V', OPT_FUNCALL, (void *) print_version, no_argument },
 272     { "wait", 'w', OPT_VALUE, "wait", -1 },
 273     { "waitretry", 0, OPT_VALUE, "waitretry", -1 },
 274 #ifdef MSDOS
 275     { "wdebug", 0, OPT_BOOLEAN, "wdebug", -1 },
 276 #endif
 277   };
 278
 279 #undef WHEN_DEBUG
 280 #undef IF_SSL
 281
 282 /* Return a string that contains S with "no-" prepended.  The string
 283    is NUL-terminated and allocated off static storage at Wget
 284    startup.  */
 285
 286 static char *
 287 no_prefix (const char *s)
 288 {
 289   static char buffer[1024];
 290   static char *p = buffer;
 291
 292   char *cp = p;
 293   int size = 3 + strlen (s) + 1;  /* "no-STRING\0" */
 294   if (p + size >= buffer + sizeof (buffer))
 295     abort ();
 296
 297   cp[0] = 'n', cp[1] = 'o', cp[2] = '-';
 298   strcpy (cp + 3, s);
 299   p += size;
 300   return cp;
 301 }
 302
 303 /* The arguments that that main passes to getopt_long. */
 304 static struct option long_options[2 * countof (option_data) + 1];
 305 static char short_options[128];
 306
 307 /* Mapping between short option chars and option_data indices. */
 308 static unsigned char optmap[96];
 309
 310 /* Marker for `--no-FOO' values in long_options.  */
 311 #define BOOLEAN_NEG_MARKER 1024
 312
 313 /* Initialize the long_options array used by getopt_long from the data
 314    in option_data.  */
 315
 316 static void
 317 init_switches (void)
 318 {
 319   char *p = short_options;
 320   size_t i, o = 0;
 321   for (i = 0; i < countof (option_data); i++)
 322     {
 323       struct cmdline_option *opt = &option_data[i];
 324       struct option *longopt;
 325
 326       if (!opt->long_name)
 327         /* The option is disabled. */
 328         continue;
 329
 330       longopt = &long_options[o++];
 331       longopt->name = opt->long_name;
 332       longopt->val = i;
 333       if (opt->short_name)
 334         {
 335           *p++ = opt->short_name;
 336           optmap[opt->short_name - 32] = longopt - long_options;
 337         }
 338       switch (opt->type)
 339         {
 340         case OPT_VALUE:
 341           longopt->has_arg = required_argument;
 342           if (opt->short_name)
 343             *p++ = ':';
 344           break;
 345         case OPT_BOOLEAN:
 346           /* Specify an optional argument for long options, so that
 347              --option=off works the same as --no-option, for
 348              compatibility with pre-1.10 Wget.  However, don't specify
 349              optional arguments short-option booleans because they
 350              prevent combining of short options.  */
 351           longopt->has_arg = optional_argument;
 352           /* For Boolean options, add the "--no-FOO" variant, which is
 353              identical to "--foo", except it has opposite meaning and
 354              it doesn't allow an argument.  */
 355           longopt = &long_options[o++];
 356           longopt->name = no_prefix (opt->long_name);
 357           longopt->has_arg = no_argument;
 358           /* Mask the value so we'll be able to recognize that we're
 359              dealing with the false value.  */
 360           longopt->val = i | BOOLEAN_NEG_MARKER;
 361           break;
 362         default:
 363           assert (opt->argtype != -1);
 364           longopt->has_arg = opt->argtype;
 365           if (opt->short_name)
 366             {
 367               if (longopt->has_arg == required_argument)
 368                 *p++ = ':';
 369               /* Don't handle optional_argument */
 370             }
 371         }
 372     }
 373   /* Terminate short_options. */
 374   *p = '\0';
 375   /* No need for xzero(long_options[o]) because its storage is static
 376      and it will be zeroed by default.  */
 377   assert (o <= countof (long_options));
 378 }
 379
 380 /* Print the usage message.  */
 381 static void
 382 print_usage (void)
 383 {
 384   printf (_("Usage: %s [OPTION]... [URL]...\n"), exec_name);
 385 }
 386
 387 /* Print the help message, describing all the available options.  If
 388    you add an option, be sure to update this list.  */
 389 static void
 390 print_help (void)
 391 {
 392   /* We split the help text this way to ease translation of individual
 393      entries.  */
 394   static const char *help[] = {
 395     "\n",
 396     N_("\
 397 Mandatory arguments to long options are mandatory for short options too.\n\n"),
 398     N_("\
 399 Startup:\n"),
 400     N_("\
 401   -V,  --version           display the version of Wget and exit.\n"),
 402     N_("\
 403   -h,  --help              print this help.\n"),
 404     N_("\
 405   -b,  --background        go to background after startup.\n"),
 406     N_("\
 407   -e,  --execute=COMMAND   execute a `.wgetrc'-style command.\n"),
 408     "\n",
 409
 410     N_("\
 411 Logging and input file:\n"),
 412     N_("\
 413   -o,  --output-file=FILE    log messages to FILE.\n"),
 414     N_("\
 415   -a,  --append-output=FILE  append messages to FILE.\n"),
 416 #ifdef ENABLE_DEBUG
 417     N_("\
 418   -d,  --debug               print lots of debugging information.\n"),
 419 #endif
 420 #ifdef MSDOS
 421     N_("\
 422        --wdebug              print Watt-32 debug output.\n"),
 423 #endif
 424     N_("\
 425   -q,  --quiet               quiet (no output).\n"),
 426     N_("\
 427   -v,  --verbose             be verbose (this is the default).\n"),
 428     N_("\
 429   -nv, --no-verbose          turn off verboseness, without being quiet.\n"),
 430     N_("\
 431   -i,  --input-file=FILE     download URLs found in local or external FILE.\n"),
 432     N_("\
 433   -F,  --force-html          treat input file as HTML.\n"),
 434     N_("\
 435   -B,  --base=URL            prepends URL to relative links in -F -i file.\n"),
 436     "\n",
 437
 438     N_("\
 439 Download:\n"),
 440     N_("\
 441   -t,  --tries=NUMBER            set number of retries to NUMBER (0 unlimits).\n"),
 442     N_("\
 443        --retry-connrefused       retry even if connection is refused.\n"),
 444     N_("\
 445   -O,  --output-document=FILE    write documents to FILE.\n"),
 446     N_("\
 447   -nc, --no-clobber              skip downloads that would download to\n\
 448                                  existing files.\n"),
 449     N_("\
 450   -c,  --continue                resume getting a partially-downloaded file.\n"),
 451     N_("\
 452        --progress=TYPE           select progress gauge type.\n"),
 453     N_("\
 454   -N,  --timestamping            don't re-retrieve files unless newer than\n\
 455                                  local.\n"),
 456     N_("\
 457   -S,  --server-response         print server response.\n"),
 458     N_("\
 459        --spider                  don't download anything.\n"),
 460     N_("\
 461   -T,  --timeout=SECONDS         set all timeout values to SECONDS.\n"),
 462     N_("\
 463        --dns-timeout=SECS        set the DNS lookup timeout to SECS.\n"),
 464     N_("\
 465        --connect-timeout=SECS    set the connect timeout to SECS.\n"),
 466     N_("\
 467        --read-timeout=SECS       set the read timeout to SECS.\n"),
 468     N_("\
 469   -w,  --wait=SECONDS            wait SECONDS between retrievals.\n"),
 470     N_("\
 471        --waitretry=SECONDS       wait 1..SECONDS between retries of a retrieval.\n"),
 472     N_("\
 473        --random-wait             wait from 0...2*WAIT secs between retrievals.\n"),
 474     N_("\
 475        --no-proxy                explicitly turn off proxy.\n"),
 476     N_("\
 477   -Q,  --quota=NUMBER            set retrieval quota to NUMBER.\n"),
 478     N_("\
 479        --bind-address=ADDRESS    bind to ADDRESS (hostname or IP) on local host.\n"),
 480     N_("\
 481        --limit-rate=RATE         limit download rate to RATE.\n"),
 482     N_("\
 483        --no-dns-cache            disable caching DNS lookups.\n"),
 484     N_("\
 485        --restrict-file-names=OS  restrict chars in file names to ones OS allows.\n"),
 486     N_("\
 487        --ignore-case             ignore case when matching files/directories.\n"),
 488 #ifdef ENABLE_IPV6
 489     N_("\
 490   -4,  --inet4-only              connect only to IPv4 addresses.\n"),
 491     N_("\
 492   -6,  --inet6-only              connect only to IPv6 addresses.\n"),
 493     N_("\
 494        --prefer-family=FAMILY    connect first to addresses of specified family,\n\
 495                                  one of IPv6, IPv4, or none.\n"),
 496 #endif
 497     N_("\
 498        --user=USER               set both ftp and http user to USER.\n"),
 499     N_("\
 500        --password=PASS           set both ftp and http password to PASS.\n"),
 501     N_("\
 502        --ask-password            prompt for passwords.\n"),
 503     "\n",
 504
 505     N_("\
 506 Directories:\n"),
 507     N_("\
 508   -nd, --no-directories           don't create directories.\n"),
 509     N_("\
 510   -x,  --force-directories        force creation of directories.\n"),
 511     N_("\
 512   -nH, --no-host-directories      don't create host directories.\n"),
 513     N_("\
 514        --protocol-directories     use protocol name in directories.\n"),
 515     N_("\
 516   -P,  --directory-prefix=PREFIX  save files to PREFIX/...\n"),
 517     N_("\
 518        --cut-dirs=NUMBER          ignore NUMBER remote directory components.\n"),
 519     "\n",
 520
 521     N_("\
 522 HTTP options:\n"),
 523     N_("\
 524        --http-user=USER        set http user to USER.\n"),
 525     N_("\
 526        --http-password=PASS    set http password to PASS.\n"),
 527     N_("\
 528        --no-cache              disallow server-cached data.\n"),
 529     N_ ("\
 530        --default-page=NAME     Change the default page name (normally\n\
 531                                this is `index.html'.).\n"),
 532     N_("\
 533   -E,  --html-extension        save HTML documents with `.html' extension.\n"),
 534     N_("\
 535        --ignore-length         ignore `Content-Length' header field.\n"),
 536     N_("\
 537        --header=STRING         insert STRING among the headers.\n"),
 538     N_("\
 539        --max-redirect          maximum redirections allowed per page.\n"),
 540     N_("\
 541        --proxy-user=USER       set USER as proxy username.\n"),
 542     N_("\
 543        --proxy-password=PASS   set PASS as proxy password.\n"),
 544     N_("\
 545        --referer=URL           include `Referer: URL' header in HTTP request.\n"),
 546     N_("\
 547        --save-headers          save the HTTP headers to file.\n"),
 548     N_("\
 549   -U,  --user-agent=AGENT      identify as AGENT instead of Wget/VERSION.\n"),
 550     N_("\
 551        --no-http-keep-alive    disable HTTP keep-alive (persistent connections).\n"),
 552     N_("\
 553        --no-cookies            don't use cookies.\n"),
 554     N_("\
 555        --load-cookies=FILE     load cookies from FILE before session.\n"),
 556     N_("\
 557        --save-cookies=FILE     save cookies to FILE after session.\n"),
 558     N_("\
 559        --keep-session-cookies  load and save session (non-permanent) cookies.\n"),
 560     N_("\
 561        --post-data=STRING      use the POST method; send STRING as the data.\n"),
 562     N_("\
 563        --post-file=FILE        use the POST method; send contents of FILE.\n"),
 564     N_("\
 565        --content-disposition   honor the Content-Disposition header when\n\
 566                                choosing local file names (EXPERIMENTAL).\n"),
 567     N_("\
 568        --auth-no-challenge     Send Basic HTTP authentication information\n\
 569                                without first waiting for the server's\n\
 570                                challenge.\n"),
 571     "\n",
 572
 573 #ifdef HAVE_SSL
 574     N_("\
 575 HTTPS (SSL/TLS) options:\n"),
 576     N_("\
 577        --secure-protocol=PR     choose secure protocol, one of auto, SSLv2,\n\
 578                                 SSLv3, and TLSv1.\n"),
 579     N_("\
 580        --no-check-certificate   don't validate the server's certificate.\n"),
 581     N_("\
 582        --certificate=FILE       client certificate file.\n"),
 583     N_("\
 584        --certificate-type=TYPE  client certificate type, PEM or DER.\n"),
 585     N_("\
 586        --private-key=FILE       private key file.\n"),
 587     N_("\
 588        --private-key-type=TYPE  private key type, PEM or DER.\n"),
 589     N_("\
 590        --ca-certificate=FILE    file with the bundle of CA's.\n"),
 591     N_("\
 592        --ca-directory=DIR       directory where hash list of CA's is stored.\n"),
 593     N_("\
 594        --random-file=FILE       file with random data for seeding the SSL PRNG.\n"),
 595     N_("\
 596        --egd-file=FILE          file naming the EGD socket with random data.\n"),
 597     "\n",
 598 #endif /* HAVE_SSL */
 599
 600     N_("\
 601 FTP options:\n"),
 602 #ifdef __VMS
 603     N_("\
 604        --ftp-stmlf             Use Stream_LF format for all binary FTP files.\n"),
 605 #endif /* def __VMS */
 606     N_("\
 607        --ftp-user=USER         set ftp user to USER.\n"),
 608     N_("\
 609        --ftp-password=PASS     set ftp password to PASS.\n"),
 610     N_("\
 611        --no-remove-listing     don't remove `.listing' files.\n"),
 612     N_("\
 613        --no-glob               turn off FTP file name globbing.\n"),
 614     N_("\
 615        --no-passive-ftp        disable the \"passive\" transfer mode.\n"),
 616     N_("\
 617        --retr-symlinks         when recursing, get linked-to files (not dir).\n"),
 618     N_("\
 619        --preserve-permissions  preserve remote file permissions.\n"),
 620     "\n",
 621
 622     N_("\
 623 Recursive download:\n"),
 624     N_("\
 625   -r,  --recursive          specify recursive download.\n"),
 626     N_("\
 627   -l,  --level=NUMBER       maximum recursion depth (inf or 0 for infinite).\n"),
 628     N_("\
 629        --delete-after       delete files locally after downloading them.\n"),
 630     N_("\
 631   -k,  --convert-links      make links in downloaded HTML or CSS point to\n\
 632                             local files.\n"),
 633 #ifdef __VMS
 634     N_("\
 635   -K,  --backup-converted   before converting file X, back up as X_orig.\n"),
 636 #else /* def __VMS */
 637     N_("\
 638   -K,  --backup-converted   before converting file X, back up as X.orig.\n"),
 639 #endif /* def __VMS [else] */
 640     N_("\
 641   -m,  --mirror             shortcut for -N -r -l inf --no-remove-listing.\n"),
 642     N_("\
 643   -p,  --page-requisites    get all images, etc. needed to display HTML page.\n"),
 644     N_("\
 645        --strict-comments    turn on strict (SGML) handling of HTML comments.\n"),
 646     "\n",
 647
 648     N_("\
 649 Recursive accept/reject:\n"),
 650     N_("\
 651   -A,  --accept=LIST               comma-separated list of accepted extensions.\n"),
 652     N_("\
 653   -R,  --reject=LIST               comma-separated list of rejected extensions.\n"),
 654     N_("\
 655   -D,  --domains=LIST              comma-separated list of accepted domains.\n"),
 656     N_("\
 657        --exclude-domains=LIST      comma-separated list of rejected domains.\n"),
 658     N_("\
 659        --follow-ftp                follow FTP links from HTML documents.\n"),
 660     N_("\
 661        --follow-tags=LIST          comma-separated list of followed HTML tags.\n"),
 662     N_("\
 663        --ignore-tags=LIST          comma-separated list of ignored HTML tags.\n"),
 664     N_("\
 665   -H,  --span-hosts                go to foreign hosts when recursive.\n"),
 666     N_("\
 667   -L,  --relative                  follow relative links only.\n"),
 668     N_("\
 669   -I,  --include-directories=LIST  list of allowed directories.\n"),
 670     N_("\
 671   -X,  --exclude-directories=LIST  list of excluded directories.\n"),
 672     N_("\
 673   -np, --no-parent                 don't ascend to the parent directory.\n"),
 674     "\n",
 675
 676     N_("Mail bug reports and suggestions to <bug-wget@gnu.org>.\n")
 677   };
 678
 679   size_t i;
 680
 681   printf (_("GNU Wget %s, a non-interactive network retriever.\n"),
 682           version_string);
 683   print_usage ();
 684
 685   for (i = 0; i < countof (help); i++)
 686     fputs (_(help[i]), stdout);
 687
 688   exit (0);
 689 }
 690
 691 /* Return a human-readable printed representation of INTERVAL,
 692    measured in seconds.  */
 693
 694 static char *
 695 secs_to_human_time (double interval)
 696 {
 697   static char buf[32];
 698   int secs = (int) (interval + 0.5);
 699   int hours, mins, days;
 700
 701   days = secs / 86400, secs %= 86400;
 702   hours = secs / 3600, secs %= 3600;
 703   mins = secs / 60, secs %= 60;
 704
 705   if (days)
 706     sprintf (buf, "%dd %dh %dm %ds", days, hours, mins, secs);
 707   else if (hours)
 708     sprintf (buf, "%dh %dm %ds", hours, mins, secs);
 709   else if (mins)
 710     sprintf (buf, "%dm %ds", mins, secs);
 711   else
 712     sprintf (buf, "%ss", print_decimal (interval));
 713
 714   return buf;
 715 }
 716
 717 static char *
 718 prompt_for_password (void)
 719 {
 720   if (opt.user)
 721     printf (_("Password for user %s: "), quote (opt.user));
 722   else
 723     printf (_("Password: "));
 724   return getpass("");
 725 }
 726
 727 /* Function that prints the line argument while limiting it
 728    to at most line_length. prefix is printed on the first line
 729    and an appropriate number of spaces are added on subsequent
 730    lines.*/
 731 static void
 732 format_and_print_line (const char *prefix, const char *line,
 733                        int line_length)
 734 {
 735   int remaining_chars;
 736   char *line_dup, *token;
 737
 738   assert (prefix != NULL);
 739   assert (line != NULL);
 740
 741   line_dup = xstrdup (line);
 742
 743   if (line_length <= 0)
 744     line_length = MAX_CHARS_PER_LINE - TABULATION;
 745
 746   printf ("%s", prefix);
 747   remaining_chars = line_length;
 748   /* We break on spaces. */
 749   token = strtok (line_dup, " ");
 750   while (token != NULL)
 751     {
 752       /* If however a token is much larger than the maximum
 753          line length, all bets are off and we simply print the
 754          token on the next line. */
 755       if (remaining_chars <= strlen (token))
 756         {
 757           printf ("\n%*c", TABULATION, ' ');
 758           remaining_chars = line_length - TABULATION;
 759         }
 760       printf ("%s ", token);
 761       remaining_chars -= strlen (token) + 1;  /* account for " " */
 762       token = strtok (NULL, " ");
 763     }
 764
 765   printf ("\n");
 766
 767   xfree (line_dup);
 768 }
 769
 770 static void
 771 print_version (void)
 772 {
 773   const char *wgetrc_title  = _("Wgetrc: ");
 774   const char *locale_title  = _("Locale: ");
 775   const char *compile_title = _("Compile: ");
 776   const char *link_title    = _("Link: ");
 777   char *line;
 778   char *env_wgetrc, *user_wgetrc;
 779   int i;
 780
 781 #ifdef __VMS
 782   printf ("GNU Wget %s built on VMS %s %s.\n\n",
 783    version_string, vms_arch(), vms_vers());
 784 #else /* def __VMS */
 785   printf ("GNU Wget %s built on %s.\n\n", version_string, OS_TYPE);
 786 #endif /* def __VMS */
 787   /* compiled_features is a char*[]. We limit the characters per
 788      line to MAX_CHARS_PER_LINE and prefix each line with a constant
 789      number of spaces for proper alignment. */
 790   for (i = 0; compiled_features[i] != NULL; )
 791     {
 792       int line_length = MAX_CHARS_PER_LINE;
 793       while ((line_length > 0) && (compiled_features[i] != NULL))
 794         {
 795           printf ("%s ", compiled_features[i]);
 796           line_length -= strlen (compiled_features[i]) + 2;
 797           i++;
 798         }
 799       printf ("\n");
 800     }
 801   printf ("\n");
 802   /* Handle the case when $WGETRC is unset and $HOME/.wgetrc is
 803      absent. */
 804   printf ("%s\n", wgetrc_title);
 805   env_wgetrc = wgetrc_env_file_name ();
 806   if (env_wgetrc && *env_wgetrc)
 807     {
 808       printf ("    %s (env)\n", env_wgetrc);
 809       xfree (env_wgetrc);
 810     }
 811   user_wgetrc = wgetrc_user_file_name ();
 812   if (user_wgetrc)
 813     {
 814       printf ("    %s (user)\n", user_wgetrc);
 815       xfree (user_wgetrc);
 816     }
 817 #ifdef SYSTEM_WGETRC
 818   printf ("    %s (system)\n", SYSTEM_WGETRC);
 819 #endif
 820
 821   format_and_print_line (locale_title,
 822                          LOCALEDIR,
 823                          MAX_CHARS_PER_LINE);
 824
 825   format_and_print_line (compile_title,
 826                          compilation_string,
 827                          MAX_CHARS_PER_LINE);
 828
 829   format_and_print_line (link_title,
 830                          link_string,
 831                          MAX_CHARS_PER_LINE);
 832
 833   printf ("\n");
 834   /* TRANSLATORS: When available, an actual copyright character
 835      (cirle-c) should be used in preference to "(C)". */
 836   fputs (_("\
 837 Copyright (C) 2008 Free Software Foundation, Inc.\n"), stdout);
 838   fputs (_("\
 839 License GPLv3+: GNU GPL version 3 or later\n\
 840 <http://www.gnu.org/licenses/gpl.html>.\n\
 841 This is free software: you are free to change and redistribute it.\n\
 842 There is NO WARRANTY, to the extent permitted by law.\n"), stdout);
 843   /* TRANSLATORS: When available, please use the proper diacritics for
 844      names such as this one. See en_US.po for reference. */
 845   fputs (_("\nOriginally written by Hrvoje Niksic <hniksic@xemacs.org>.\n"),
 846          stdout);
 847   fputs (_("Currently maintained by Micah Cowan <micah@cowan.name>.\n"),
 848          stdout);
 849   fputs (_("Please send bug reports and questions to <bug-wget@gnu.org>.\n"),
 850          stdout);
 851   exit (0);
 852 }
 853
 854 char *program_name; /* Needed by lib/error.c. */
 855
 856 int
 857 main (int argc, char **argv)
 858 {
 859   char **url, **t;
 860   int i, ret, longindex;
 861   int nurl, status;
 862   bool append_to_log = false;
 863
 864   program_name = argv[0];
 865
 866   i18n_initialize ();
 867
 868   /* Construct the name of the executable, without the directory part.  */
 869   exec_name = strrchr (argv[0], PATH_SEPARATOR);
 870   if (!exec_name)
 871     exec_name = argv[0];
 872   else
 873     ++exec_name;
 874
 875 #ifdef WINDOWS
 876   /* Drop extension (typically .EXE) from executable filename. */
 877   windows_main ((char **) &exec_name);
 878 #endif
 879
 880   /* Set option defaults; read the system wgetrc and ~/.wgetrc.  */
 881   initialize ();
 882
 883   init_switches ();
 884   longindex = -1;
 885   while ((ret = getopt_long (argc, argv,
 886                              short_options, long_options, &longindex)) != -1)
 887     {
 888       int val;
 889       struct cmdline_option *opt;
 890
 891       /* If LONGINDEX is unchanged, it means RET is referring a short
 892          option.  */
 893       if (longindex == -1)
 894         {
 895           if (ret == '?')
 896             {
 897               print_usage ();
 898               printf ("\n");
 899               printf (_("Try `%s --help' for more options.\n"), exec_name);
 900               exit (2);
 901             }
 902           /* Find the short option character in the mapping.  */
 903           longindex = optmap[ret - 32];
 904         }
 905       val = long_options[longindex].val;
 906
 907       /* Use the retrieved value to locate the option in the
 908          option_data array, and to see if we're dealing with the
 909          negated "--no-FOO" variant of the boolean option "--foo".  */
 910       opt = &option_data[val & ~BOOLEAN_NEG_MARKER];
 911       switch (opt->type)
 912         {
 913         case OPT_VALUE:
 914           setoptval (opt->data, optarg, opt->long_name);
 915           break;
 916         case OPT_BOOLEAN:
 917           if (optarg)
 918             /* The user has specified a value -- use it. */
 919             setoptval (opt->data, optarg, opt->long_name);
 920           else
 921             {
 922               /* NEG is true for `--no-FOO' style boolean options. */
 923               bool neg = !!(val & BOOLEAN_NEG_MARKER);
 924               setoptval (opt->data, neg ? "0" : "1", opt->long_name);
 925             }
 926           break;
 927         case OPT_FUNCALL:
 928           {
 929             void (*func) (void) = (void (*) (void)) opt->data;
 930             func ();
 931           }
 932           break;
 933         case OPT__APPEND_OUTPUT:
 934           setoptval ("logfile", optarg, opt->long_name);
 935           append_to_log = true;
 936           break;
 937         case OPT__EXECUTE:
 938           run_command (optarg);
 939           break;
 940         case OPT__NO:
 941           {
 942             /* We support real --no-FOO flags now, but keep these
 943                short options for convenience and backward
 944                compatibility.  */
 945             char *p;
 946             for (p = optarg; *p; p++)
 947               switch (*p)
 948                 {
 949                 case 'v':
 950                   setoptval ("verbose", "0", opt->long_name);
 951                   break;
 952                 case 'H':
 953                   setoptval ("addhostdir", "0", opt->long_name);
 954                   break;
 955                 case 'd':
 956                   setoptval ("dirstruct", "0", opt->long_name);
 957                   break;
 958                 case 'c':
 959                   setoptval ("noclobber", "1", opt->long_name);
 960                   break;
 961                 case 'p':
 962                   setoptval ("noparent", "1", opt->long_name);
 963                   break;
 964                 default:
 965                   printf (_("%s: illegal option -- `-n%c'\n"), exec_name, *p);
 966                   print_usage ();
 967                   printf ("\n");
 968                   printf (_("Try `%s --help' for more options.\n"), exec_name);
 969                   exit (1);
 970                 }
 971             break;
 972           }
 973         case OPT__PARENT:
 974         case OPT__CLOBBER:
 975           {
 976             /* The wgetrc commands are named noparent and noclobber,
 977                so we must revert the meaning of the cmdline options
 978                before passing the value to setoptval.  */
 979             bool flag = true;
 980             if (optarg)
 981               flag = (*optarg == '1' || c_tolower (*optarg) == 'y'
 982                       || (c_tolower (optarg[0]) == 'o'
 983                           && c_tolower (optarg[1]) == 'n'));
 984             setoptval (opt->type == OPT__PARENT ? "noparent" : "noclobber",
 985                        flag ? "0" : "1", opt->long_name);
 986             break;
 987           }
 988         case OPT__DONT_REMOVE_LISTING:
 989           setoptval ("removelisting", "0", opt->long_name);
 990           break;
 991         }
 992
 993       longindex = -1;
 994     }
 995
 996   nurl = argc - optind;
 997
 998   /* All user options have now been processed, so it's now safe to do
 999      interoption dependency checks. */
1000
1001   if (opt.reclevel == 0)
1002       opt.reclevel = INFINITE_RECURSION; /* see recur.h for commentary */
1003
1004   if (opt.spider || opt.delete_after)
1005       opt.no_dirstruct = true;
1006
1007   if (opt.page_requisites && !opt.recursive)
1008     {
1009       /* Don't set opt.recursive here because it would confuse the FTP
1010          code.  Instead, call retrieve_tree below when either
1011          page_requisites or recursive is requested.  */
1012       opt.reclevel = 0;
1013       if (!opt.no_dirstruct)
1014         opt.dirstruct = 1;      /* normally handled by cmd_spec_recursive() */
1015     }
1016
1017   if (opt.verbose == -1)
1018     opt.verbose = !opt.quiet;
1019
1020   /* Sanity checks.  */
1021   if (opt.verbose && opt.quiet)
1022     {
1023       printf (_("Can't be verbose and quiet at the same time.\n"));
1024       print_usage ();
1025       exit (1);
1026     }
1027   if (opt.timestamping && opt.noclobber)
1028     {
1029       printf (_("\
1030 Can't timestamp and not clobber old files at the same time.\n"));
1031       print_usage ();
1032       exit (1);
1033     }
1034 #ifdef ENABLE_IPV6
1035   if (opt.ipv4_only && opt.ipv6_only)
1036     {
1037       printf (_("Cannot specify both --inet4-only and --inet6-only.\n"));
1038       print_usage ();
1039       exit (1);
1040     }
1041 #endif
1042   if (opt.output_document)
1043     {
1044       if (opt.convert_links
1045           && (nurl > 1 || opt.page_requisites || opt.recursive))
1046         {
1047           fputs (_("\
1048 Cannot specify both -k and -O if multiple URLs are given, or in combination\n\
1049 with -p or -r. See the manual for details.\n\n"), stdout);
1050           print_usage ();
1051           exit (1);
1052         }
1053       if (opt.page_requisites
1054           || opt.recursive)
1055         {
1056           logprintf (LOG_NOTQUIET, "%s", _("\
1057 WARNING: combining -O with -r or -p will mean that all downloaded content\n\
1058 will be placed in the single file you specified.\n\n"));
1059         }
1060       if (opt.timestamping)
1061         {
1062           logprintf (LOG_NOTQUIET, "%s", _("\
1063 WARNING: timestamping does nothing in combination with -O. See the manual\n\
1064 for details.\n\n"));
1065           opt.timestamping = false;
1066         }
1067       if (opt.noclobber && file_exists_p(opt.output_document))
1068            {
1069               /* Check if output file exists; if it does, exit. */
1070               logprintf (LOG_VERBOSE, _("File `%s' already there; not retrieving.\n"), opt.output_document);
1071               exit(1);
1072            }
1073     }
1074
1075   if (opt.ask_passwd && opt.passwd)
1076     {
1077       printf (_("Cannot specify both --ask-password and --password.\n"));
1078       print_usage ();
1079       exit (1);
1080     }
1081
1082   if (!nurl && !opt.input_filename)
1083     {
1084       /* No URL specified.  */
1085       printf (_("%s: missing URL\n"), exec_name);
1086       print_usage ();
1087       printf ("\n");
1088       /* #### Something nicer should be printed here -- similar to the
1089          pre-1.5 `--help' page.  */
1090       printf (_("Try `%s --help' for more options.\n"), exec_name);
1091       exit (1);
1092     }
1093
1094 #ifdef ENABLE_IRI
1095   if (opt.enable_iri)
1096     {
1097       if (opt.locale && !check_encoding_name (opt.locale))
1098         opt.locale = NULL;
1099
1100       if (!opt.locale)
1101         opt.locale = find_locale ();
1102
1103       if (opt.encoding_remote && !check_encoding_name (opt.encoding_remote))
1104         opt.encoding_remote = NULL;
1105     }
1106 #else
1107   if (opt.enable_iri || opt.locale || opt.encoding_remote)
1108     {
1109       /* sXXXav : be more specific... */
1110       printf(_("This version does not have support for IRIs\n"));
1111       exit(1);
1112     }
1113 #endif
1114
1115   if (opt.ask_passwd)
1116     {
1117       opt.passwd = prompt_for_password ();
1118
1119       if (opt.passwd == NULL || opt.passwd[0] == '\0')
1120         exit (1);
1121     }
1122
1123 #ifdef MSDOS
1124   if (opt.wdebug)
1125      dbug_init();
1126   sock_init();
1127 #else
1128   if (opt.background)
1129     fork_to_background ();
1130 #endif
1131
1132   /* Initialize progress.  Have to do this after the options are
1133      processed so we know where the log file is.  */
1134   if (opt.verbose)
1135     set_progress_implementation (opt.progress_type);
1136
1137   /* Fill in the arguments.  */
1138   url = alloca_array (char *, nurl + 1);
1139   for (i = 0; i < nurl; i++, optind++)
1140     {
1141       char *rewritten = rewrite_shorthand_url (argv[optind]);
1142       if (rewritten)
1143         url[i] = rewritten;
1144       else
1145         url[i] = xstrdup (argv[optind]);
1146     }
1147   url[i] = NULL;
1148
1149   /* Initialize logging.  */
1150   log_init (opt.lfilename, append_to_log);
1151
1152   DEBUGP (("DEBUG output created by Wget %s on %s.\n\n",
1153            version_string, OS_TYPE));
1154
1155   /* Open the output filename if necessary.  */
1156
1157 /* 2005-04-17 SMS.
1158    Note that having the output_stream ("-O") file opened here for an FTP
1159    URL rather than in getftp() (ftp.c) (and the http equivalent) rather
1160    limits the ability in VMS to open the file differently for ASCII
1161    versus binary FTP there.  (Of course, doing it here allows a open
1162    failure to be detected immediately, without first connecting to the
1163    server.)
1164 */
1165   if (opt.output_document)
1166     {
1167       if (HYPHENP (opt.output_document))
1168         {
1169 #ifdef WINDOWS
1170           FILE *result;
1171           result = freopen ("CONOUT$", "wb", stdout);
1172           if (result == NULL)
1173             {
1174               logputs (LOG_NOTQUIET, _("\
1175 WARNING: Can't reopen standard output in binary mode;\n\
1176          downloaded file may contain inappropriate line endings.\n"));
1177             }
1178 #endif
1179           output_stream = stdout;
1180         }
1181       else
1182         {
1183           struct_fstat st;
1184
1185 #ifdef __VMS
1186 /* Common fopen() optional arguments:
1187    sequential access only, access callback function.
1188 */
1189 # define FOPEN_OPT_ARGS , "fop=sqo", "acc", acc_cb, &open_id
1190           int open_id = 7;
1191 #else /* def __VMS */
1192 # define FOPEN_OPT_ARGS
1193 #endif /* def __VMS [else] */
1194
1195           output_stream = fopen (opt.output_document,
1196                                  opt.always_rest ? "ab" : "wb"
1197                                  FOPEN_OPT_ARGS);
1198           if (output_stream == NULL)
1199             {
1200               perror (opt.output_document);
1201               exit (1);
1202             }
1203           if (fstat (fileno (output_stream), &st) == 0 && S_ISREG (st.st_mode))
1204             output_stream_regular = true;
1205         }
1206     }
1207
1208 #ifdef __VMS
1209   /* Set global ODS5 flag according to the specified destination (if
1210      any), otherwise according to the current default device.
1211   */
1212   if (output_stream == NULL)
1213     {
1214       set_ods5_dest( "SYS$DISK");
1215     }
1216   else if (output_stream != stdout)
1217     {
1218       set_ods5_dest( opt.output_document);
1219     }
1220 #endif /* def __VMS */
1221
1222 #ifdef WINDOWS
1223   ws_startup ();
1224 #endif
1225
1226 #ifdef SIGHUP
1227   /* Setup the signal handler to redirect output when hangup is
1228      received.  */
1229   if (signal(SIGHUP, SIG_IGN) != SIG_IGN)
1230     signal(SIGHUP, redirect_output_signal);
1231 #endif
1232   /* ...and do the same for SIGUSR1.  */
1233 #ifdef SIGUSR1
1234   signal (SIGUSR1, redirect_output_signal);
1235 #endif
1236 #ifdef SIGPIPE
1237   /* Writing to a closed socket normally signals SIGPIPE, and the
1238      process exits.  What we want is to ignore SIGPIPE and just check
1239      for the return value of write().  */
1240   signal (SIGPIPE, SIG_IGN);
1241 #endif
1242 #ifdef SIGWINCH
1243   signal (SIGWINCH, progress_handle_sigwinch);
1244 #endif
1245
1246   status = RETROK;              /* initialize it, just-in-case */
1247   /* Retrieve the URLs from argument list.  */
1248   for (t = url; *t; t++)
1249     {
1250       char *filename = NULL, *redirected_URL = NULL;
1251       int dt, url_err;
1252       /* Need to do a new struct iri every time, because
1253        * retrieve_url may modify it in some circumstances,
1254        * currently. */
1255       struct iri *iri = iri_new ();
1256       struct url *url_parsed;
1257
1258       set_uri_encoding (iri, opt.locale, true);
1259       url_parsed = url_parse (*t, &url_err, iri, true);
1260
1261       if (!url_parsed)
1262         {
1263           char *error = url_error (*t, url_err);
1264           logprintf (LOG_NOTQUIET, "%s: %s.\n",*t, error);
1265           xfree (error);
1266           status = URLERROR;
1267         }
1268       else
1269         {
1270           if ((opt.recursive || opt.page_requisites)
1271               && (url_scheme (*t) != SCHEME_FTP || url_uses_proxy (url_parsed)))
1272             {
1273               int old_follow_ftp = opt.follow_ftp;
1274
1275               /* Turn opt.follow_ftp on in case of recursive FTP retrieval */
1276               if (url_scheme (*t) == SCHEME_FTP)
1277                 opt.follow_ftp = 1;
1278
1279               status = retrieve_tree (url_parsed, NULL);
1280
1281               opt.follow_ftp = old_follow_ftp;
1282             }
1283           else
1284           {
1285             status = retrieve_url (url_parsed, *t, &filename, &redirected_URL,
1286                                    NULL, &dt, opt.recursive, iri);
1287           }
1288
1289           if (opt.delete_after && file_exists_p(filename))
1290             {
1291               DEBUGP (("Removing file due to --delete-after in main():\n"));
1292               logprintf (LOG_VERBOSE, _("Removing %s.\n"), filename);
1293               if (unlink (filename))
1294                 logprintf (LOG_NOTQUIET, "unlink: %s\n", strerror (errno));
1295             }
1296           xfree_null (redirected_URL);
1297           xfree_null (filename);
1298           url_free (url_parsed);
1299         }
1300       iri_free (iri);
1301     }
1302
1303   /* And then from the input file, if any.  */
1304   if (opt.input_filename)
1305     {
1306       int count;
1307       status = retrieve_from_file (opt.input_filename, opt.force_html, &count);
1308       if (!count)
1309         logprintf (LOG_NOTQUIET, _("No URLs found in %s.\n"),
1310                    opt.input_filename);
1311     }
1312
1313   /* Print broken links. */
1314   if (opt.recursive && opt.spider)
1315     {
1316       print_broken_links();
1317     }
1318
1319   /* Print the downloaded sum.  */
1320   if ((opt.recursive || opt.page_requisites
1321        || nurl > 1
1322        || (opt.input_filename && total_downloaded_bytes != 0))
1323       &&
1324       total_downloaded_bytes != 0)
1325     {
1326       logprintf (LOG_NOTQUIET,
1327                  _("FINISHED --%s--\nDownloaded: %d files, %s in %s (%s)\n"),
1328                  datetime_str (time (NULL)),
1329                  numurls,
1330                  human_readable (total_downloaded_bytes),
1331                  secs_to_human_time (total_download_time),
1332                  retr_rate (total_downloaded_bytes, total_download_time));
1333       /* Print quota warning, if exceeded.  */
1334       if (opt.quota && total_downloaded_bytes > opt.quota)
1335         logprintf (LOG_NOTQUIET,
1336                    _("Download quota of %s EXCEEDED!\n"),
1337                    human_readable (opt.quota));
1338     }
1339
1340   if (opt.cookies_output)
1341     save_cookies ();
1342
1343   if (opt.convert_links && !opt.delete_after)
1344     convert_all_links ();
1345
1346   log_close ();
1347   for (i = 0; i < nurl; i++)
1348     xfree (url[i]);
1349   cleanup ();
1350
1351   if (status == RETROK)
1352     return 0;
1353   else
1354     return 1;
1355 }
1356 #endif /* TESTING */
1357 \f
1358 #if defined(SIGHUP) || defined(SIGUSR1)
1359
1360 /* So the signal_name check doesn't blow when only one is available. */
1361 #ifndef SIGHUP
1362 # define SIGHUP -1
1363 #endif
1364 #ifndef SIGUSR1
1365 # define SIGUSR1 -1
1366 #endif
1367
1368 /* Hangup signal handler.  When wget receives SIGHUP or SIGUSR1, it
1369    will proceed operation as usual, trying to write into a log file.
1370    If that is impossible, the output will be turned off.  */
1371
1372 static void
1373 redirect_output_signal (int sig)
1374 {
1375   const char *signal_name = (sig == SIGHUP ? "SIGHUP" :
1376                              (sig == SIGUSR1 ? "SIGUSR1" :
1377                               "WTF?!"));
1378   log_request_redirect_output (signal_name);
1379   progress_schedule_redirect ();
1380   signal (sig, redirect_output_signal);
1381 }
1382 #endif
1383
1384 /*
1385  * vim: et ts=2 sw=2
1386  */