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