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