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

   1 /* Command line parsing.
   2    Copyright (C) 1995, 1996, 1997, 1998, 2000 Free Software Foundation, Inc.
   3
   4 This file is part of Wget.
   5
   6 This program is free software; you can redistribute it and/or modify
   7 it under the terms of the GNU General Public License as published by
   8 the Free Software Foundation; either version 2 of the License, or
   9 (at your option) any later version.
  10
  11 This program is distributed in the hope that it will be useful,
  12 but WITHOUT ANY WARRANTY; without even the implied warranty of
  13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14 GNU General Public License for more details.
  15
  16 You should have received a copy of the GNU General Public License
  17 along with this program; if not, write to the Free Software
  18 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.  */
  19
  20 #include <config.h>
  21
  22 #include <stdio.h>
  23 #include <stdlib.h>
  24 #ifdef HAVE_UNISTD_H
  25 # include <unistd.h>
  26 #endif /* HAVE_UNISTD_H */
  27 #include <sys/types.h>
  28 #ifdef HAVE_STRING_H
  29 # include <string.h>
  30 #else
  31 # include <strings.h>
  32 #endif /* HAVE_STRING_H */
  33 #ifdef HAVE_SIGNAL_H
  34 # include <signal.h>
  35 #endif
  36 #ifdef HAVE_NLS
  37 #ifdef HAVE_LOCALE_H
  38 # include <locale.h>
  39 #endif /* HAVE_LOCALE_H */
  40 #endif /* HAVE_NLS */
  41 #include <errno.h>
  42
  43 #define OPTIONS_DEFINED_HERE    /* for options.h */
  44
  45 #include "wget.h"
  46 #include "utils.h"
  47 #include "getopt.h"
  48 #include "init.h"
  49 #include "retr.h"
  50 #include "recur.h"
  51 #include "host.h"
  52
  53 #ifndef PATH_SEPARATOR
  54 # define PATH_SEPARATOR '/'
  55 #endif
  56
  57 extern char *version_string;
  58
  59 #ifndef errno
  60 extern int errno;
  61 #endif
  62
  63 struct options opt;
  64
  65 /* From log.c.  */
  66 void log_init PARAMS ((const char *, int));
  67 void log_close PARAMS ((void));
  68 void redirect_output PARAMS ((const char *));
  69
  70 static RETSIGTYPE redirect_output_signal PARAMS ((int));
  71
  72 const char *exec_name;
  73 \f
  74 /* Initialize I18N.  The initialization amounts to invoking
  75    setlocale(), bindtextdomain() and textdomain().
  76    Does nothing if NLS is disabled or missing.  */
  77 static void
  78 i18n_initialize (void)
  79 {
  80   /* If HAVE_NLS is defined, assume the existence of the three
  81      functions invoked here.  */
  82 #ifdef HAVE_NLS
  83   /* Set the current locale.  */
  84   /* Here we use LC_MESSAGES instead of LC_ALL, for two reasons.
  85      First, message catalogs are all of I18N Wget uses anyway.
  86      Second, setting LC_ALL has a dangerous potential of messing
  87      things up.  For example, when in a foreign locale, Solaris
  88      strptime() fails to handle international dates correctly, which
  89      makes http_atotm() malfunction.  */
  90 #ifdef LC_MESSAGES
  91   setlocale (LC_MESSAGES, "");
  92   setlocale (LC_CTYPE, "");
  93 #else
  94   setlocale (LC_ALL, "");
  95 #endif
  96   /* Set the text message domain.  */
  97   bindtextdomain ("wget", LOCALEDIR);
  98   textdomain ("wget");
  99 #endif /* HAVE_NLS */
 100 }
 101
 102 /* It's kosher to declare these here because their interface _has_ to
 103    be void foo(void).  */
 104 void url_init PARAMS ((void));
 105 void host_init PARAMS ((void));
 106
 107 /* This just calls the various initialization functions from the
 108    modules that need one-time initialization. */
 109 static void
 110 private_initialize (void)
 111 {
 112   url_init ();
 113   host_init ();
 114 }
 115 \f
 116 /* Print the usage message.  */
 117 static void
 118 print_usage (void)
 119 {
 120   printf (_("Usage: %s [OPTION]... [URL]...\n"), exec_name);
 121 }
 122
 123 /* Print the help message, describing all the available options.  If
 124    you add an option, be sure to update this list.  */
 125 static void
 126 print_help (void)
 127 {
 128   printf (_("GNU Wget %s, a non-interactive network retriever.\n"),
 129           version_string);
 130   print_usage ();
 131   /* Had to split this in parts, so the #@@#%# Ultrix compiler and cpp
 132      don't bitch.  Also, it makes translation much easier.  */
 133   fputs (_("\
 134 \n\
 135 Mandatory arguments to long options are mandatory for short options too.\n\
 136 \n"), stdout);
 137   fputs (_("\
 138 Startup:\n\
 139   -V,  --version           display the version of Wget and exit.\n\
 140   -h,  --help              print this help.\n\
 141   -b,  --background        go to background after startup.\n\
 142   -e,  --execute=COMMAND   execute a `.wgetrc\'-style command.\n\
 143 \n"), stdout);
 144   fputs (_("\
 145 Logging and input file:\n\
 146   -o,  --output-file=FILE     log messages to FILE.\n\
 147   -a,  --append-output=FILE   append messages to FILE.\n\
 148   -d,  --debug                print debug output.\n\
 149   -q,  --quiet                quiet (no output).\n\
 150   -v,  --verbose              be verbose (this is the default).\n\
 151   -nv, --non-verbose          turn off verboseness, without being quiet.\n\
 152   -i,  --input-file=FILE      download URLs found in FILE.\n\
 153   -F,  --force-html           treat input file as HTML.\n\
 154   -B,  --base=URL             prepends URL to relative links in -F -i file.\n\
 155        --sslcertfile=FILE     optional client certificate.\n\
 156        --sslcertkey=KEYFILE   optional keyfile for this certificate.\n\
 157 \n"), stdout);
 158   fputs (_("\
 159 Download:\n\
 160        --bind-address=ADDRESS   bind to ADDRESS (hostname or IP) on local host.\n\
 161   -t,  --tries=NUMBER           set number of retries to NUMBER (0 unlimits).\n\
 162   -O   --output-document=FILE   write documents to FILE.\n\
 163   -nc, --no-clobber             don\'t clobber existing files or use .# suffixes.\n\
 164   -c,  --continue               resume getting a partially-downloaded file.\n\
 165        --dot-style=STYLE        set retrieval display style.\n\
 166   -N,  --timestamping           don\'t re-retrieve files unless newer than local.\n\
 167   -S,  --server-response        print server response.\n\
 168        --spider                 don\'t download anything.\n\
 169   -T,  --timeout=SECONDS        set the read timeout to SECONDS.\n\
 170   -w,  --wait=SECONDS           wait SECONDS between retrievals.\n\
 171        --waitretry=SECONDS      wait 1...SECONDS between retries of a retrieval.\n\
 172   -Y,  --proxy=on/off           turn proxy on or off.\n\
 173   -Q,  --quota=NUMBER           set retrieval quota to NUMBER.\n\
 174 \n"), stdout);
 175   fputs (_("\
 176 Directories:\n\
 177   -nd  --no-directories            don\'t create directories.\n\
 178   -x,  --force-directories         force creation of directories.\n\
 179   -nH, --no-host-directories       don\'t create host directories.\n\
 180   -P,  --directory-prefix=PREFIX   save files to PREFIX/...\n\
 181        --cut-dirs=NUMBER           ignore NUMBER remote directory components.\n\
 182 \n"), stdout);
 183   fputs (_("\
 184 HTTP options:\n\
 185        --http-user=USER      set http user to USER.\n\
 186        --http-passwd=PASS    set http password to PASS.\n\
 187   -C,  --cache=on/off        (dis)allow server-cached data (normally allowed).\n\
 188   -E,  --html-extension      save all text/html documents with .html extension.\n\
 189        --ignore-length       ignore `Content-Length\' header field.\n\
 190        --header=STRING       insert STRING among the headers.\n\
 191        --proxy-user=USER     set USER as proxy username.\n\
 192        --proxy-passwd=PASS   set PASS as proxy password.\n\
 193        --referer=URL         include `Referer: URL\' header in HTTP request.\n\
 194   -s,  --save-headers        save the HTTP headers to file.\n\
 195   -U,  --user-agent=AGENT    identify as AGENT instead of Wget/VERSION.\n\
 196 \n"), stdout);
 197   fputs (_("\
 198 FTP options:\n\
 199   -nr, --dont-remove-listing   don\'t remove `.listing\' files.\n\
 200   -g,  --glob=on/off           turn file name globbing on or off.\n\
 201        --passive-ftp           use the \"passive\" transfer mode.\n\
 202        --retr-symlinks         when recursing, get linked-to files (not dirs).\n\
 203 \n"), stdout);
 204   fputs (_("\
 205 Recursive retrieval:\n\
 206   -r,  --recursive          recursive web-suck -- use with care!\n\
 207   -l,  --level=NUMBER       maximum recursion depth (inf or 0 for infinite).\n\
 208        --delete-after       delete files locally after downloading them.\n\
 209   -k,  --convert-links      convert non-relative links to relative.\n\
 210   -K,  --backup-converted   before converting file X, back up as X.orig.\n\
 211   -m,  --mirror             shortcut option equivalent to -r -N -l inf -nr.\n\
 212   -p,  --page-requisites    get all images, etc. needed to display HTML page.\n\
 213 \n"), stdout);
 214   fputs (_("\
 215 Recursive accept/reject:\n\
 216   -A,  --accept=LIST                comma-separated list of accepted extensions.\n\
 217   -R,  --reject=LIST                comma-separated list of rejected extensions.\n\
 218   -D,  --domains=LIST               comma-separated list of accepted domains.\n\
 219        --exclude-domains=LIST       comma-separated list of rejected domains.\n\
 220        --follow-ftp                 follow FTP links from HTML documents.\n\
 221        --follow-tags=LIST           comma-separated list of followed HTML tags.\n\
 222   -G,  --ignore-tags=LIST           comma-separated list of ignored HTML tags.\n\
 223   -H,  --span-hosts                 go to foreign hosts when recursive.\n\
 224   -L,  --relative                   follow relative links only.\n\
 225   -I,  --include-directories=LIST   list of allowed directories.\n\
 226   -X,  --exclude-directories=LIST   list of excluded directories.\n\
 227   -nh, --no-host-lookup             don\'t DNS-lookup hosts.\n\
 228   -np, --no-parent                  don\'t ascend to the parent directory.\n\
 229 \n"), stdout);
 230   fputs (_("Mail bug reports and suggestions to <bug-wget@gnu.org>.\n"),
 231          stdout);
 232 }
 233 \f
 234 int
 235 main (int argc, char *const *argv)
 236 {
 237   char **url, **t;
 238   int i, c, nurl, status, append_to_log;
 239   int wr = 0;
 240
 241   static struct option long_options[] =
 242   {
 243     /* Options without arguments: */
 244     { "background", no_argument, NULL, 'b' },
 245     { "continue", no_argument, NULL, 'c' },
 246     { "convert-links", no_argument, NULL, 'k' },
 247     { "backup-converted", no_argument, NULL, 'K' },
 248     { "debug", no_argument, NULL, 'd' },
 249     { "delete-after", no_argument, NULL, 136 },
 250     { "dont-remove-listing", no_argument, NULL, 149 },
 251     { "email-address", no_argument, NULL, 154 }, /* undocumented (debug) */
 252     { "follow-ftp", no_argument, NULL, 142 },
 253     { "force-directories", no_argument, NULL, 'x' },
 254     { "force-hier", no_argument, NULL, 'x' }, /* obsolete */
 255     { "force-html", no_argument, NULL, 'F'},
 256     { "help", no_argument, NULL, 'h' },
 257     { "html-extension", no_argument, NULL, 'E' },
 258     { "ignore-length", no_argument, NULL, 138 },
 259     { "mirror", no_argument, NULL, 'm' },
 260     { "no-clobber", no_argument, NULL, 141 },
 261     { "no-directories", no_argument, NULL, 147 },
 262     { "no-host-directories", no_argument, NULL, 148 },
 263     { "no-host-lookup", no_argument, NULL, 150 },
 264     { "no-http-keep-alive", no_argument, NULL, 156 },
 265     { "no-parent", no_argument, NULL, 133 },
 266     { "non-verbose", no_argument, NULL, 146 },
 267     { "passive-ftp", no_argument, NULL, 139 },
 268     { "page-requisites", no_argument, NULL, 'p' },
 269     { "quiet", no_argument, NULL, 'q' },
 270     { "recursive", no_argument, NULL, 'r' },
 271     { "relative", no_argument, NULL, 'L' },
 272     { "retr-symlinks", no_argument, NULL, 137 },
 273     { "save-headers", no_argument, NULL, 's' },
 274     { "server-response", no_argument, NULL, 'S' },
 275     { "span-hosts", no_argument, NULL, 'H' },
 276     { "spider", no_argument, NULL, 132 },
 277     { "timestamping", no_argument, NULL, 'N' },
 278     { "verbose", no_argument, NULL, 'v' },
 279     { "version", no_argument, NULL, 'V' },
 280
 281     /* Options accepting an argument: */
 282     { "accept", required_argument, NULL, 'A' },
 283     { "append-output", required_argument, NULL, 'a' },
 284     { "backups", required_argument, NULL, 151 }, /* undocumented */
 285     { "base", required_argument, NULL, 'B' },
 286     { "bind-address", required_argument, NULL, 155 },
 287     { "cache", required_argument, NULL, 'C' },
 288     { "cut-dirs", required_argument, NULL, 145 },
 289     { "directory-prefix", required_argument, NULL, 'P' },
 290     { "domains", required_argument, NULL, 'D' },
 291     { "dot-style", required_argument, NULL, 134 },
 292     { "execute", required_argument, NULL, 'e' },
 293     { "exclude-directories", required_argument, NULL, 'X' },
 294     { "exclude-domains", required_argument, NULL, 140 },
 295     { "follow-tags", required_argument, NULL, 153 },
 296     { "glob", required_argument, NULL, 'g' },
 297     { "header", required_argument, NULL, 131 },
 298     { "htmlify", required_argument, NULL, 135 },
 299     { "http-passwd", required_argument, NULL, 130 },
 300     { "http-user", required_argument, NULL, 129 },
 301     { "ignore-tags", required_argument, NULL, 'G' },
 302     { "include-directories", required_argument, NULL, 'I' },
 303     { "input-file", required_argument, NULL, 'i' },
 304     { "level", required_argument, NULL, 'l' },
 305     { "no", required_argument, NULL, 'n' },
 306     { "output-document", required_argument, NULL, 'O' },
 307     { "output-file", required_argument, NULL, 'o' },
 308     { "proxy", required_argument, NULL, 'Y' },
 309     { "proxy-passwd", required_argument, NULL, 144 },
 310     { "proxy-user", required_argument, NULL, 143 },
 311     { "quota", required_argument, NULL, 'Q' },
 312     { "reject", required_argument, NULL, 'R' },
 313     { "timeout", required_argument, NULL, 'T' },
 314     { "tries", required_argument, NULL, 't' },
 315     { "user-agent", required_argument, NULL, 'U' },
 316     { "referer", required_argument, NULL, 157 },
 317     { "use-proxy", required_argument, NULL, 'Y' },
 318 #ifdef HAVE_SSL
 319     { "sslcertfile", required_argument, NULL, 158 },
 320     { "sslcertkey", required_argument, NULL, 159 },
 321 #endif /* HAVE_SSL */
 322     { "wait", required_argument, NULL, 'w' },
 323     { "waitretry", required_argument, NULL, 152 },
 324     { 0, 0, 0, 0 }
 325   };
 326
 327   i18n_initialize ();
 328   private_initialize ();
 329
 330   append_to_log = 0;
 331
 332   /* Construct the name of the executable, without the directory part.  */
 333   exec_name = strrchr (argv[0], PATH_SEPARATOR);
 334   if (!exec_name)
 335     exec_name = argv[0];
 336   else
 337     ++exec_name;
 338
 339 #ifdef WINDOWS
 340   windows_main_junk (&argc, (char **) argv, (char **) &exec_name);
 341 #endif
 342
 343   initialize (); /* sets option defaults; reads the system wgetrc and .wgetrc */
 344
 345   /* [Is the order of the option letters significant?  If not, they should be
 346       alphabetized, like the long_options.  The only thing I know for sure is
 347       that the options with required arguments must be followed by a ':'.
 348       -- Dan Harkless <wget@harkless.org>] */
 349   while ((c = getopt_long (argc, argv, "\
 350 hpVqvdkKsxmNWrHSLcFbEY:G:g:T:U:O:l:n:i:o:a:t:D:A:R:P:B:e:Q:X:I:w:C:",
 351                            long_options, (int *)0)) != EOF)
 352     {
 353       switch (c)
 354         {
 355           /* Options without arguments: */
 356         case 132:
 357           setval ("spider", "on");
 358           break;
 359         case 133:
 360           setval ("noparent", "on");
 361           break;
 362         case 136:
 363           setval ("deleteafter", "on");
 364           break;
 365         case 137:
 366           setval ("retrsymlinks", "on");
 367           break;
 368         case 138:
 369           setval ("ignorelength", "on");
 370           break;
 371         case 139:
 372           setval ("passiveftp", "on");
 373           break;
 374         case 141:
 375           setval ("noclobber", "on");
 376           break;
 377         case 142:
 378           setval ("followftp", "on");
 379           break;
 380         case 145:
 381           setval ("cutdirs", optarg);
 382           break;
 383         case 146:
 384           setval ("verbose", "off");
 385           break;
 386         case 147:
 387           setval ("dirstruct", "off");
 388           break;
 389         case 148:
 390           setval ("addhostdir", "off");
 391           break;
 392         case 149:
 393           setval ("removelisting", "off");
 394           break;
 395         case 150:
 396           setval ("simplehostcheck", "on");
 397           break;
 398         case 154:
 399           /* For debugging purposes.  */
 400           printf ("%s\n", ftp_getaddress ());
 401           exit (0);
 402           break;
 403         case 155:
 404           setval ("bindaddress", optarg);
 405           break;
 406         case 156:
 407           setval ("httpkeepalive", "off");
 408           break;
 409         case 'b':
 410           setval ("background", "on");
 411           break;
 412         case 'c':
 413           setval ("continue", "on");
 414           break;
 415         case 'd':
 416 #ifdef DEBUG
 417           setval ("debug", "on");
 418 #else  /* not DEBUG */
 419           fprintf (stderr, _("%s: debug support not compiled in.\n"),
 420                    exec_name);
 421 #endif /* not DEBUG */
 422           break;
 423         case 'E':
 424           setval ("htmlextension", "on");
 425           break;
 426         case 'F':
 427           setval ("forcehtml", "on");
 428           break;
 429         case 'H':
 430           setval ("spanhosts", "on");
 431           break;
 432         case 'h':
 433           print_help ();
 434 #ifdef WINDOWS
 435           ws_help (exec_name);
 436 #endif
 437           exit (0);
 438           break;
 439         case 'K':
 440           setval ("backupconverted", "on");
 441           break;
 442         case 'k':
 443           setval ("convertlinks", "on");
 444           break;
 445         case 'L':
 446           setval ("relativeonly", "on");
 447           break;
 448         case 'm':
 449           setval ("mirror", "on");
 450           break;
 451         case 'N':
 452           setval ("timestamping", "on");
 453           break;
 454         case 'p':
 455           setval ("pagerequisites", "on");
 456           break;
 457         case 'S':
 458           setval ("serverresponse", "on");
 459           break;
 460         case 's':
 461           setval ("saveheaders", "on");
 462           break;
 463         case 'q':
 464           setval ("quiet", "on");
 465           break;
 466         case 'r':
 467           setval ("recursive", "on");
 468           break;
 469         case 'V':
 470           printf ("GNU Wget %s\n\n", version_string);
 471           printf ("%s", _("\
 472 Copyright (C) 1995, 1996, 1997, 1998, 2000 Free Software Foundation, Inc.\n\
 473 This program is distributed in the hope that it will be useful,\n\
 474 but WITHOUT ANY WARRANTY; without even the implied warranty of\n\
 475 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the\n\
 476 GNU General Public License for more details.\n"));
 477           printf (_("\nOriginally written by Hrvoje Niksic <hniksic@arsdigita.com>.\n"));
 478           exit (0);
 479           break;
 480         case 'v':
 481           setval ("verbose", "on");
 482           break;
 483         case 'x':
 484           setval ("dirstruct", "on");
 485           break;
 486
 487           /* Options accepting an argument: */
 488         case 129:
 489           setval ("httpuser", optarg);
 490           break;
 491         case 130:
 492           setval ("httppasswd", optarg);
 493           break;
 494         case 131:
 495           setval ("header", optarg);
 496           break;
 497         case 134:
 498           setval ("dotstyle", optarg);
 499           break;
 500         case 135:
 501           setval ("htmlify", optarg);
 502           break;
 503         case 140:
 504           setval ("excludedomains", optarg);
 505           break;
 506         case 143:
 507           setval ("proxyuser", optarg);
 508           break;
 509         case 144:
 510           setval ("proxypasswd", optarg);
 511           break;
 512         case 151:
 513           setval ("backups", optarg);
 514           break;
 515         case 152:
 516           setval ("waitretry", optarg);
 517           wr = 1;
 518           break;
 519         case 153:
 520           setval ("followtags", optarg);
 521           break;
 522         case 157:
 523           setval ("referer", optarg);
 524           break;
 525 #ifdef HAVE_SSL
 526         case 158:
 527           setval ("sslcertfile", optarg);
 528           break;
 529         case 159:
 530           setval ("sslcertkey", optarg);
 531           break;
 532 #endif /* HAVE_SSL */
 533         case 'A':
 534           setval ("accept", optarg);
 535           break;
 536         case 'a':
 537           setval ("logfile", optarg);
 538           append_to_log = 1;
 539           break;
 540         case 'B':
 541           setval ("base", optarg);
 542           break;
 543         case 'C':
 544           setval ("cache", optarg);
 545           break;
 546         case 'D':
 547           setval ("domains", optarg);
 548           break;
 549         case 'e':
 550           {
 551             char *com, *val;
 552             if (parse_line (optarg, &com, &val))
 553               {
 554                 if (!setval (com, val))
 555                   exit (1);
 556               }
 557             else
 558               {
 559                 fprintf (stderr, _("%s: %s: invalid command\n"), exec_name,
 560                          optarg);
 561                 exit (1);
 562               }
 563             xfree (com);
 564             xfree (val);
 565           }
 566           break;
 567         case 'G':
 568           setval ("ignoretags", optarg);
 569           break;
 570         case 'g':
 571           setval ("glob", optarg);
 572           break;
 573         case 'I':
 574           setval ("includedirectories", optarg);
 575           break;
 576         case 'i':
 577           setval ("input", optarg);
 578           break;
 579         case 'l':
 580           setval ("reclevel", optarg);
 581           break;
 582         case 'n':
 583           {
 584             /* #### The n? options are utter crock!  */
 585             char *p;
 586
 587             for (p = optarg; *p; p++)
 588               switch (*p)
 589                 {
 590                 case 'v':
 591                   setval ("verbose", "off");
 592                   break;
 593                 case 'h':
 594                   setval ("simplehostcheck", "on");
 595                   break;
 596                 case 'H':
 597                   setval ("addhostdir", "off");
 598                   break;
 599                 case 'd':
 600                   setval ("dirstruct", "off");
 601                   break;
 602                 case 'c':
 603                   setval ("noclobber", "on");
 604                   break;
 605                 case 'r':
 606                   setval ("removelisting", "off");
 607                   break;
 608                 case 'p':
 609                   setval ("noparent", "on");
 610                   break;
 611                 case 'k':
 612                   setval ("httpkeepalive", "off");
 613                   break;
 614                 default:
 615                   printf (_("%s: illegal option -- `-n%c'\n"), exec_name, *p);
 616                   print_usage ();
 617                   printf ("\n");
 618                   printf (_("Try `%s --help\' for more options.\n"), exec_name);
 619                   exit (1);
 620                 }
 621             break;
 622           }
 623         case 'O':
 624           setval ("outputdocument", optarg);
 625           break;
 626         case 'o':
 627           setval ("logfile", optarg);
 628           break;
 629         case 'P':
 630           setval ("dirprefix", optarg);
 631           break;
 632         case 'Q':
 633           setval ("quota", optarg);
 634           break;
 635         case 'R':
 636           setval ("reject", optarg);
 637           break;
 638         case 'T':
 639           setval ("timeout", optarg);
 640           break;
 641         case 't':
 642           setval ("tries", optarg);
 643           break;
 644         case 'U':
 645           setval ("useragent", optarg);
 646           break;
 647         case 'w':
 648           setval ("wait", optarg);
 649           break;
 650         case 'X':
 651           setval ("excludedirectories", optarg);
 652           break;
 653         case 'Y':
 654           setval ("useproxy", optarg);
 655           break;
 656
 657         case '?':
 658           print_usage ();
 659           printf ("\n");
 660           printf (_("Try `%s --help' for more options.\n"), exec_name);
 661           exit (0);
 662           break;
 663         }
 664     }
 665
 666   /* All user options have now been processed, so it's now safe to do
 667      interoption dependency checks. */
 668
 669   if (opt.reclevel == 0)
 670     opt.reclevel = INFINITE_RECURSION;  /* see wget.h for commentary on this */
 671
 672   if (opt.page_requisites && !opt.recursive)
 673     {
 674       opt.recursive = TRUE;
 675       opt.reclevel = 0;
 676       if (!opt.no_dirstruct)
 677         opt.dirstruct = TRUE;  /* usually handled by cmd_spec_recursive() */
 678     }
 679
 680   if (opt.verbose == -1)
 681     opt.verbose = !opt.quiet;
 682
 683   /* Retain compatibility with previous scripts.
 684      if wait has been set, but waitretry has not, give it the wait value.
 685      A simple check on the values is not enough, I could have set
 686      wait to n>0 and waitretry to 0 - HEH */
 687   if (opt.wait && !wr)
 688     {
 689       char  opt_wait_str[256];  /* bigger than needed buf to prevent overflow */
 690
 691       sprintf(opt_wait_str, "%ld", opt.wait);
 692       setval ("waitretry", opt_wait_str);
 693     }
 694
 695   /* Sanity checks.  */
 696   if (opt.verbose && opt.quiet)
 697     {
 698       printf (_("Can't be verbose and quiet at the same time.\n"));
 699       print_usage ();
 700       exit (1);
 701     }
 702   if (opt.timestamping && opt.noclobber)
 703     {
 704       printf (_("\
 705 Can't timestamp and not clobber old files at the same time.\n"));
 706       print_usage ();
 707       exit (1);
 708     }
 709   nurl = argc - optind;
 710   if (!nurl && !opt.input_filename)
 711     {
 712       /* No URL specified.  */
 713       printf (_("%s: missing URL\n"), exec_name);
 714       print_usage ();
 715       printf ("\n");
 716       /* #### Something nicer should be printed here -- similar to the
 717          pre-1.5 `--help' page.  */
 718       printf (_("Try `%s --help' for more options.\n"), exec_name);
 719       exit (1);
 720     }
 721
 722   if (opt.background)
 723     fork_to_background ();
 724
 725   /* Allocate basic pointer.  */
 726   url = ALLOCA_ARRAY (char *, nurl + 1);
 727   /* Fill in the arguments.  */
 728   for (i = 0; i < nurl; i++, optind++)
 729     {
 730       char *irix4_cc_needs_this;
 731       STRDUP_ALLOCA (irix4_cc_needs_this, argv[optind]);
 732       url[i] = irix4_cc_needs_this;
 733     }
 734   url[i] = NULL;
 735
 736   /* Change the title of console window on Windows.  #### I think this
 737      statement should belong to retrieve_url().  --hniksic.  */
 738 #ifdef WINDOWS
 739   ws_changetitle (*url, nurl);
 740 #endif
 741
 742   /* Initialize logging.  */
 743   log_init (opt.lfilename, append_to_log);
 744
 745   DEBUGP (("DEBUG output created by Wget %s on %s.\n\n", version_string,
 746            OS_TYPE));
 747   /* Open the output filename if necessary.  */
 748   if (opt.output_document)
 749     {
 750       if (HYPHENP (opt.output_document))
 751         opt.dfp = stdout;
 752       else
 753         {
 754           struct stat st;
 755           opt.dfp = fopen (opt.output_document, opt.always_rest ? "ab" : "wb");
 756           if (opt.dfp == NULL)
 757             {
 758               perror (opt.output_document);
 759               exit (1);
 760             }
 761           if (fstat (fileno (opt.dfp), &st) == 0 && S_ISREG (st.st_mode))
 762             opt.od_known_regular = 1;
 763         }
 764     }
 765
 766 #ifdef WINDOWS
 767   ws_startup ();
 768 #endif
 769
 770   /* Setup the signal handler to redirect output when hangup is
 771      received.  */
 772 #ifdef HAVE_SIGNAL
 773   if (signal(SIGHUP, SIG_IGN) != SIG_IGN)
 774     signal(SIGHUP, redirect_output_signal);
 775   /* ...and do the same for SIGUSR1.  */
 776   signal (SIGUSR1, redirect_output_signal);
 777   /* Writing to a closed socket normally signals SIGPIPE, and the
 778      process exits.  What we want is to ignore SIGPIPE and just check
 779      for the return value of write().  */
 780   signal (SIGPIPE, SIG_IGN);
 781 #endif /* HAVE_SIGNAL */
 782
 783   status = RETROK;              /* initialize it, just-in-case */
 784   recursive_reset ();
 785   /* Retrieve the URLs from argument list.  */
 786   for (t = url; *t; t++)
 787     {
 788       char *filename, *redirected_URL;
 789       int dt;
 790
 791       status = retrieve_url (*t, &filename, &redirected_URL, NULL, &dt);
 792       if (opt.recursive && status == RETROK && (dt & TEXTHTML))
 793         status = recursive_retrieve (filename,
 794                                      redirected_URL ? redirected_URL : *t);
 795
 796       if (opt.delete_after && file_exists_p(filename))
 797         {
 798           DEBUGP (("Removing file due to --delete-after in main():\n"));
 799           logprintf (LOG_VERBOSE, _("Removing %s.\n"), filename);
 800           if (unlink (filename))
 801             logprintf (LOG_NOTQUIET, "unlink: %s\n", strerror (errno));
 802         }
 803
 804       FREE_MAYBE (redirected_URL);
 805       FREE_MAYBE (filename);
 806     }
 807
 808   /* And then from the input file, if any.  */
 809   if (opt.input_filename)
 810     {
 811       int count;
 812       status = retrieve_from_file (opt.input_filename, opt.force_html, &count);
 813       if (!count)
 814         logprintf (LOG_NOTQUIET, _("No URLs found in %s.\n"),
 815                    opt.input_filename);
 816     }
 817   /* Print the downloaded sum.  */
 818   if (opt.recursive
 819       || nurl > 1
 820       || (opt.input_filename && opt.downloaded != 0))
 821     {
 822       logprintf (LOG_NOTQUIET,
 823                  _("\nFINISHED --%s--\nDownloaded: %s bytes in %d files\n"),
 824                  time_str (NULL),
 825                  (opt.downloaded_overflow ?
 826                   "<overflow>" : legible_very_long (opt.downloaded)),
 827                  opt.numurls);
 828       /* Print quota warning, if exceeded.  */
 829       if (downloaded_exceeds_quota ())
 830         logprintf (LOG_NOTQUIET,
 831                    _("Download quota (%s bytes) EXCEEDED!\n"),
 832                    legible (opt.quota));
 833     }
 834   if (opt.convert_links && !opt.delete_after)
 835     {
 836       convert_all_links ();
 837     }
 838   log_close ();
 839   cleanup ();
 840 #ifdef DEBUG_MALLOC
 841   print_malloc_debug_stats ();
 842 #endif
 843   if (status == RETROK)
 844     return 0;
 845   else
 846     return 1;
 847 }
 848 \f
 849 /* Hangup signal handler.  When wget receives SIGHUP or SIGUSR1, it
 850    will proceed operation as usual, trying to write into a log file.
 851    If that is impossible, the output will be turned off.  */
 852
 853 #ifdef HAVE_SIGNAL
 854 static RETSIGTYPE
 855 redirect_output_signal (int sig)
 856 {
 857   char tmp[100];
 858   signal (sig, redirect_output_signal);
 859   /* Please note that the double `%' in `%%s' is intentional, because
 860      redirect_output passes tmp through printf.  */
 861   sprintf (tmp, _("%s received, redirecting output to `%%s'.\n"),
 862            (sig == SIGHUP ? "SIGHUP" :
 863             (sig == SIGUSR1 ? "SIGUSR1" :
 864              "WTF?!")));
 865   redirect_output (tmp);
 866 }
 867 #endif /* HAVE_SIGNAL */