1 /* Command line parsing.
2 Copyright (C) 1995, 1996, 1997, 1998, 2000 Free Software Foundation, Inc.
4 This file is part of Wget.
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.
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.
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. */
27 #endif /* HAVE_UNISTD_H */
28 #include <sys/types.h>
33 #endif /* HAVE_STRING_H */
40 #endif /* HAVE_LOCALE_H */
44 #define OPTIONS_DEFINED_HERE /* for options.h */
54 #ifndef PATH_SEPARATOR
55 # define PATH_SEPARATOR '/'
58 extern char *version_string;
67 void log_init PARAMS ((const char *, int));
68 void log_close PARAMS ((void));
69 void redirect_output PARAMS ((const char *));
71 static RETSIGTYPE redirect_output_signal PARAMS ((int));
73 const char *exec_name;
75 /* Initialize I18N. The initialization amounts to invoking
76 setlocale(), bindtextdomain() and textdomain().
77 Does nothing if NLS is disabled or missing. */
79 i18n_initialize (void)
81 /* If HAVE_NLS is defined, assume the existence of the three
82 functions invoked here. */
84 /* Set the current locale. */
85 /* Here we use LC_MESSAGES instead of LC_ALL, for two reasons.
86 First, message catalogs are all of I18N Wget uses anyway.
87 Second, setting LC_ALL has a dangerous potential of messing
88 things up. For example, when in a foreign locale, Solaris
89 strptime() fails to handle international dates correctly, which
90 makes http_atotm() malfunction. */
92 setlocale (LC_MESSAGES, "");
94 setlocale (LC_ALL, "");
96 /* Set the text message domain. */
97 bindtextdomain ("wget", LOCALEDIR);
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));
107 /* This just calls the various initialization functions from the
108 modules that need one-time initialization. */
110 private_initialize (void)
116 /* Print the usage message. */
120 printf (_("Usage: %s [OPTION]... [URL]...\n"), exec_name);
123 /* Print the help message, describing all the available options. If
124 you add an option, be sure to update this list. */
128 printf (_("GNU Wget %s, a non-interactive network retriever.\n"),
131 /* Had to split this in parts, so the #@@#%# Ultrix compiler and cpp
132 don't bitch. Also, it makes translation much easier. */
133 printf ("%s%s%s%s%s%s%s%s%s%s", _("\
135 Mandatory arguments to long options are mandatory for short options too.\n\
138 -V, --version display the version of Wget and exit.\n\
139 -h, --help print this help.\n\
140 -b, --background go to background after startup.\n\
141 -e, --execute=COMMAND execute a `.wgetrc\'-style command.\n\
143 Logging and input file:\n\
144 -o, --output-file=FILE log messages to FILE.\n\
145 -a, --append-output=FILE append messages to FILE.\n\
146 -d, --debug print debug output.\n\
147 -q, --quiet quiet (no output).\n\
148 -v, --verbose be verbose (this is the default).\n\
149 -nv, --non-verbose turn off verboseness, without being quiet.\n\
150 -i, --input-file=FILE download URLs found in FILE.\n\
151 -F, --force-html treat input file as HTML.\n\
152 -B, --base=URL prepends URL to relative links in -F -i file.\n\
153 --sslcertfile=FILE optional client certificate.\n\
154 --sslcertkey=KEYFILE optional keyfile for this certificate.\n\
157 --bind-address=ADDRESS bind to ADDRESS (hostname or IP) on local host.\n\
158 -t, --tries=NUMBER set number of retries to NUMBER (0 unlimits).\n\
159 -O --output-document=FILE write documents to FILE.\n\
160 -nc, --no-clobber don\'t clobber existing files or use .# suffixes.\n\
161 -c, --continue resume getting a partially-downloaded file.\n\
162 --dot-style=STYLE set retrieval display style.\n\
163 -N, --timestamping don\'t retrieve files if older than local.\n\
164 -S, --server-response print server response.\n\
165 --spider don\'t download anything.\n\
166 -T, --timeout=SECONDS set the read timeout to SECONDS.\n\
167 -w, --wait=SECONDS wait SECONDS between retrievals.\n\
168 --waitretry=SECONDS wait 1...SECONDS between retries of a retrieval.\n\
169 -Y, --proxy=on/off turn proxy on or off.\n\
170 -Q, --quota=NUMBER set retrieval quota to NUMBER.\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\
180 --http-user=USER set http user to USER.\n\
181 --http-passwd=PASS set http password to PASS.\n\
182 -C, --cache=on/off (dis)allow server-cached data (normally allowed).\n\
183 -E, --html-extension save all text/html documents with .html extension.\n\
184 --ignore-length ignore `Content-Length\' header field.\n\
185 --header=STRING insert STRING among the headers.\n\
186 --proxy-user=USER set USER as proxy username.\n\
187 --proxy-passwd=PASS set PASS as proxy password.\n\
188 --referer=URL include `Referer: URL\' header in HTTP request.\n\
189 -s, --save-headers save the HTTP headers to file.\n\
190 -U, --user-agent=AGENT identify as AGENT instead of Wget/VERSION.\n\
193 --retr-symlinks when recursing, retrieve linked-to files (not dirs).\n\
194 -g, --glob=on/off turn file name globbing on or off.\n\
195 --passive-ftp use the \"passive\" transfer mode.\n\
197 Recursive retrieval:\n\
198 -r, --recursive recursive web-suck -- use with care!.\n\
199 -l, --level=NUMBER maximum recursion depth (inf or 0 for infinite).\n\
200 --delete-after delete files locally after downloading them.\n\
201 -k, --convert-links convert non-relative links to relative.\n\
202 -K, --backup-converted before converting file X, back up as X.orig.\n\
203 -m, --mirror shortcut option equivalent to -r -N -l inf -nr.\n\
204 -nr, --dont-remove-listing don\'t remove `.listing\' files.\n\
205 -p, --page-requisites get all images, etc. needed to display HTML page.\n\
207 Recursive accept/reject:\n\
208 -A, --accept=LIST comma-separated list of accepted extensions.\n\
209 -R, --reject=LIST comma-separated list of rejected extensions.\n\
210 -D, --domains=LIST comma-separated list of accepted domains.\n\
211 --exclude-domains=LIST comma-separated list of rejected domains.\n\
212 --follow-ftp follow FTP links from HTML documents.\n\
213 --follow-tags=LIST comma-separated list of followed HTML tags.\n\
214 -G, --ignore-tags=LIST comma-separated list of ignored HTML tags.\n\
215 -H, --span-hosts go to foreign hosts when recursive.\n\
216 -L, --relative follow relative links only.\n\
217 -I, --include-directories=LIST list of allowed directories.\n\
218 -X, --exclude-directories=LIST list of excluded directories.\n\
219 -nh, --no-host-lookup don\'t DNS-lookup hosts.\n\
220 -np, --no-parent don\'t ascend to the parent directory.\n\
221 \n"), _("Mail bug reports and suggestions to <bug-wget@gnu.org>.\n"));
225 main (int argc, char *const *argv)
228 int i, c, nurl, status, append_to_log;
231 static struct option long_options[] =
233 /* Options without arguments: */
234 { "background", no_argument, NULL, 'b' },
235 { "continue", no_argument, NULL, 'c' },
236 { "convert-links", no_argument, NULL, 'k' },
237 { "backup-converted", no_argument, NULL, 'K' },
238 { "debug", no_argument, NULL, 'd' },
239 { "dont-remove-listing", no_argument, NULL, 21 },
240 { "email-address", no_argument, NULL, 26 }, /* undocumented (debug) */
241 { "follow-ftp", no_argument, NULL, 14 },
242 { "force-directories", no_argument, NULL, 'x' },
243 { "force-hier", no_argument, NULL, 'x' }, /* obsolete */
244 { "force-html", no_argument, NULL, 'F'},
245 { "help", no_argument, NULL, 'h' },
246 { "html-extension", no_argument, NULL, 'E' },
247 { "ignore-length", no_argument, NULL, 10 },
248 { "mirror", no_argument, NULL, 'm' },
249 { "no-clobber", no_argument, NULL, 13 },
250 { "no-directories", no_argument, NULL, 19 },
251 { "no-host-directories", no_argument, NULL, 20 },
252 { "no-host-lookup", no_argument, NULL, 22 },
253 { "no-http-keep-alive", no_argument, NULL, 28 },
254 { "no-parent", no_argument, NULL, 5 },
255 { "non-verbose", no_argument, NULL, 18 },
256 { "passive-ftp", no_argument, NULL, 11 },
257 { "page-requisites", no_argument, NULL, 'p' },
258 { "quiet", no_argument, NULL, 'q' },
259 { "recursive", no_argument, NULL, 'r' },
260 { "relative", no_argument, NULL, 'L' },
261 { "retr-symlinks", no_argument, NULL, 9 },
262 { "save-headers", no_argument, NULL, 's' },
263 { "server-response", no_argument, NULL, 'S' },
264 { "span-hosts", no_argument, NULL, 'H' },
265 { "spider", no_argument, NULL, 4 },
266 { "timestamping", no_argument, NULL, 'N' },
267 { "verbose", no_argument, NULL, 'v' },
268 { "version", no_argument, NULL, 'V' },
270 /* Options accepting an argument: */
271 { "accept", required_argument, NULL, 'A' },
272 { "append-output", required_argument, NULL, 'a' },
273 { "backups", required_argument, NULL, 23 }, /* undocumented */
274 { "base", required_argument, NULL, 'B' },
275 { "bind-address", required_argument, NULL, 27 },
276 { "cache", required_argument, NULL, 'C' },
277 { "cut-dirs", required_argument, NULL, 17 },
278 { "delete-after", no_argument, NULL, 8 },
279 { "directory-prefix", required_argument, NULL, 'P' },
280 { "domains", required_argument, NULL, 'D' },
281 { "dot-style", required_argument, NULL, 6 },
282 { "execute", required_argument, NULL, 'e' },
283 { "exclude-directories", required_argument, NULL, 'X' },
284 { "exclude-domains", required_argument, NULL, 12 },
285 { "follow-tags", required_argument, NULL, 25 },
286 { "glob", required_argument, NULL, 'g' },
287 { "header", required_argument, NULL, 3 },
288 { "htmlify", required_argument, NULL, 7 },
289 { "http-passwd", required_argument, NULL, 2 },
290 { "http-user", required_argument, NULL, 1 },
291 { "ignore-tags", required_argument, NULL, 'G' },
292 { "include-directories", required_argument, NULL, 'I' },
293 { "input-file", required_argument, NULL, 'i' },
294 { "level", required_argument, NULL, 'l' },
295 { "no", required_argument, NULL, 'n' },
296 { "output-document", required_argument, NULL, 'O' },
297 { "output-file", required_argument, NULL, 'o' },
298 { "proxy", required_argument, NULL, 'Y' },
299 { "proxy-passwd", required_argument, NULL, 16 },
300 { "proxy-user", required_argument, NULL, 15 },
301 { "quota", required_argument, NULL, 'Q' },
302 { "reject", required_argument, NULL, 'R' },
303 { "timeout", required_argument, NULL, 'T' },
304 { "tries", required_argument, NULL, 't' },
305 { "user-agent", required_argument, NULL, 'U' },
306 { "referer", required_argument, NULL, 129 },
307 { "use-proxy", required_argument, NULL, 'Y' },
309 { "sslcertfile", required_argument, NULL, 132},
310 { "sslcertkey", required_argument, NULL, 133},
311 #endif /* HAVE_SSL */
312 { "wait", required_argument, NULL, 'w' },
313 { "waitretry", required_argument, NULL, 24 },
318 private_initialize ();
322 /* Construct the name of the executable, without the directory part. */
323 exec_name = strrchr (argv[0], PATH_SEPARATOR);
330 windows_main_junk (&argc, (char **) argv, (char **) &exec_name);
333 initialize (); /* sets option defaults; reads the system wgetrc and .wgetrc */
335 /* [Is the order of the option letters significant? If not, they should be
336 alphabetized, like the long_options. The only thing I know for sure is
337 that the options with required arguments must be followed by a ':'.
338 -- Dan Harkless <wget@harkless.org>] */
339 while ((c = getopt_long (argc, argv, "\
340 hpVqvdkKsxmNWrHSLcFbEY:G:g:T:U:O:l:n:i:o:a:t:D:A:R:P:B:e:Q:X:I:w:",
341 long_options, (int *)0)) != EOF)
345 /* Options without arguments: */
347 setval ("spider", "on");
350 setval ("noparent", "on");
353 setval ("deleteafter", "on");
356 setval ("retrsymlinks", "on");
359 setval ("ignorelength", "on");
362 setval ("passiveftp", "on");
365 setval ("noclobber", "on");
368 setval ("followftp", "on");
371 setval ("cutdirs", optarg);
374 setval ("verbose", "off");
377 setval ("dirstruct", "off");
380 setval ("addhostdir", "off");
383 setval ("removelisting", "off");
386 setval ("simplehostcheck", "on");
389 /* For debugging purposes. */
390 printf ("%s\n", ftp_getaddress ());
394 setval ("bindaddress", optarg);
397 setval ("httpkeepalive", "off");
400 setval ("background", "on");
403 setval ("continue", "on");
407 setval ("debug", "on");
408 #else /* not DEBUG */
409 fprintf (stderr, _("%s: debug support not compiled in.\n"),
411 #endif /* not DEBUG */
414 setval ("htmlextension", "on");
417 setval ("forcehtml", "on");
420 setval ("spanhosts", "on");
430 setval ("backupconverted", "on");
433 setval ("convertlinks", "on");
436 setval ("relativeonly", "on");
439 setval ("mirror", "on");
442 setval ("timestamping", "on");
445 setval ("pagerequisites", "on");
448 setval ("serverresponse", "on");
451 setval ("saveheaders", "on");
454 setval ("quiet", "on");
457 setval ("recursive", "on");
460 printf ("GNU Wget %s\n\n", version_string);
462 Copyright (C) 1995, 1996, 1997, 1998, 2000 Free Software Foundation, Inc.\n\
463 This program is distributed in the hope that it will be useful,\n\
464 but WITHOUT ANY WARRANTY; without even the implied warranty of\n\
465 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the\n\
466 GNU General Public License for more details.\n"));
467 printf (_("\nOriginally written by Hrvoje Niksic <hniksic@arsdigita.com>.\n"));
471 setval ("verbose", "on");
474 setval ("dirstruct", "on");
477 /* Options accepting an argument: */
479 setval ("httpuser", optarg);
482 setval ("httppasswd", optarg);
485 setval ("header", optarg);
488 setval ("dotstyle", optarg);
491 setval ("htmlify", optarg);
494 setval ("excludedomains", optarg);
497 setval ("proxyuser", optarg);
500 setval ("proxypasswd", optarg);
503 setval ("backups", optarg);
506 setval ("waitretry", optarg);
510 setval ("followtags", optarg);
513 setval ("referer", optarg);
517 setval ("sslcertfile", optarg);
520 setval ("sslcertkey", optarg);
522 #endif /* HAVE_SSL */
524 setval ("accept", optarg);
527 setval ("logfile", optarg);
531 setval ("base", optarg);
534 setval ("cache", optarg);
537 setval ("domains", optarg);
542 if (parse_line (optarg, &com, &val))
544 if (!setval (com, val))
549 fprintf (stderr, _("%s: %s: invalid command\n"), exec_name,
558 setval ("ignoretags", optarg);
561 setval ("glob", optarg);
564 setval ("includedirectories", optarg);
567 setval ("input", optarg);
570 setval ("reclevel", optarg);
574 /* #### The n? options are utter crock! */
577 for (p = optarg; *p; p++)
581 setval ("verbose", "off");
584 setval ("simplehostcheck", "on");
587 setval ("addhostdir", "off");
590 setval ("dirstruct", "off");
593 setval ("noclobber", "on");
596 setval ("removelisting", "off");
599 setval ("noparent", "on");
602 setval ("httpkeepalive", "off");
605 printf (_("%s: illegal option -- `-n%c'\n"), exec_name, *p);
608 printf (_("Try `%s --help\' for more options.\n"), exec_name);
614 setval ("outputdocument", optarg);
617 setval ("logfile", optarg);
620 setval ("dirprefix", optarg);
623 setval ("quota", optarg);
626 setval ("reject", optarg);
629 setval ("timeout", optarg);
632 setval ("tries", optarg);
635 setval ("useragent", optarg);
638 setval ("wait", optarg);
641 setval ("excludedirectories", optarg);
644 setval ("useproxy", optarg);
650 printf (_("Try `%s --help' for more options.\n"), exec_name);
656 /* All user options have now been processed, so it's now safe to do
657 interoption dependency checks. */
659 if (opt.reclevel == 0)
660 opt.reclevel = INFINITE_RECURSION; /* see wget.h for commentary on this */
662 if (opt.page_requisites && !opt.recursive)
664 opt.recursive = TRUE;
666 if (!opt.no_dirstruct)
667 opt.dirstruct = TRUE; /* usually handled by cmd_spec_recursive() */
670 if (opt.verbose == -1)
671 opt.verbose = !opt.quiet;
673 /* Retain compatibility with previous scripts.
674 if wait has been set, but waitretry has not, give it the wait value.
675 A simple check on the values is not enough, I could have set
676 wait to n>0 and waitretry to 0 - HEH */
679 char opt_wait_str[256]; /* bigger than needed buf to prevent overflow */
681 sprintf(opt_wait_str, "%ld", opt.wait);
682 setval ("waitretry", opt_wait_str);
686 if (opt.verbose && opt.quiet)
688 printf (_("Can't be verbose and quiet at the same time.\n"));
692 if (opt.timestamping && opt.noclobber)
695 Can't timestamp and not clobber old files at the same time.\n"));
699 nurl = argc - optind;
700 if (!nurl && !opt.input_filename)
702 /* No URL specified. */
703 printf (_("%s: missing URL\n"), exec_name);
706 /* #### Something nicer should be printed here -- similar to the
707 pre-1.5 `--help' page. */
708 printf (_("Try `%s --help' for more options.\n"), exec_name);
713 fork_to_background ();
715 /* Allocate basic pointer. */
716 url = ALLOCA_ARRAY (char *, nurl + 1);
717 /* Fill in the arguments. */
718 for (i = 0; i < nurl; i++, optind++)
720 char *irix4_cc_needs_this;
721 STRDUP_ALLOCA (irix4_cc_needs_this, argv[optind]);
722 url[i] = irix4_cc_needs_this;
726 /* Change the title of console window on Windows. #### I think this
727 statement should belong to retrieve_url(). --hniksic. */
729 ws_changetitle (*url, nurl);
732 /* Initialize logging. */
733 log_init (opt.lfilename, append_to_log);
735 DEBUGP (("DEBUG output created by Wget %s on %s.\n\n", version_string,
737 /* Open the output filename if necessary. */
738 if (opt.output_document)
740 if (HYPHENP (opt.output_document))
745 opt.dfp = fopen (opt.output_document, "wb");
748 perror (opt.output_document);
751 if (fstat (fileno (opt.dfp), &st) == 0 && S_ISREG (st.st_mode))
752 opt.od_known_regular = 1;
760 /* Setup the signal handler to redirect output when hangup is
763 if (signal(SIGHUP, SIG_IGN) != SIG_IGN)
764 signal(SIGHUP, redirect_output_signal);
765 /* ...and do the same for SIGUSR1. */
766 signal (SIGUSR1, redirect_output_signal);
767 /* Writing to a closed socket normally signals SIGPIPE, and the
768 process exits. What we want is to ignore SIGPIPE and just check
769 for the return value of write(). */
770 signal (SIGPIPE, SIG_IGN);
771 #endif /* HAVE_SIGNAL */
773 status = RETROK; /* initialize it, just-in-case */
775 /* Retrieve the URLs from argument list. */
776 for (t = url; *t; t++)
778 char *filename, *redirected_URL;
781 status = retrieve_url (*t, &filename, &redirected_URL, NULL, &dt);
782 if (opt.recursive && status == RETROK && (dt & TEXTHTML))
783 status = recursive_retrieve (filename,
784 redirected_URL ? redirected_URL : *t);
786 if (opt.delete_after && file_exists_p(filename))
788 DEBUGP (("Removing file due to --delete-after in main():\n"));
789 logprintf (LOG_VERBOSE, _("Removing %s.\n"), filename);
790 if (unlink (filename))
791 logprintf (LOG_NOTQUIET, "unlink: %s\n", strerror (errno));
794 FREE_MAYBE (redirected_URL);
795 FREE_MAYBE (filename);
798 /* And then from the input file, if any. */
799 if (opt.input_filename)
802 status = retrieve_from_file (opt.input_filename, opt.force_html, &count);
804 logprintf (LOG_NOTQUIET, _("No URLs found in %s.\n"),
807 /* Print the downloaded sum. */
810 || (opt.input_filename && opt.downloaded != 0))
812 logprintf (LOG_NOTQUIET,
813 _("\nFINISHED --%s--\nDownloaded: %s bytes in %d files\n"),
815 (opt.downloaded_overflow ?
816 "<overflow>" : legible_very_long (opt.downloaded)),
818 /* Print quota warning, if exceeded. */
819 if (downloaded_exceeds_quota ())
820 logprintf (LOG_NOTQUIET,
821 _("Download quota (%s bytes) EXCEEDED!\n"),
822 legible (opt.quota));
824 if (opt.convert_links && !opt.delete_after)
826 convert_all_links ();
831 print_malloc_debug_stats ();
833 if (status == RETROK)
839 /* Hangup signal handler. When wget receives SIGHUP or SIGUSR1, it
840 will proceed operation as usual, trying to write into a log file.
841 If that is impossible, the output will be turned off. */
845 redirect_output_signal (int sig)
848 signal (sig, redirect_output_signal);
849 /* Please note that the double `%' in `%%s' is intentional, because
850 redirect_output passes tmp through printf. */
851 sprintf (tmp, _("%s received, redirecting output to `%%s'.\n"),
852 (sig == SIGHUP ? "SIGHUP" :
853 (sig == SIGUSR1 ? "SIGUSR1" :
855 redirect_output (tmp);
857 #endif /* HAVE_SIGNAL */