1 /* A tar (tape archiver) program.
3 Copyright (C) 1988, 1992, 1993, 1994, 1995, 1996, 1997, 1999, 2000,
4 2001, 2003 Free Software Foundation, Inc.
6 Written by John Gilmore, starting 1985-08-25.
8 This program is free software; you can redistribute it and/or modify it
9 under the terms of the GNU General Public License as published by the
10 Free Software Foundation; either version 2, or (at your option) any later
13 This program is distributed in the hope that it will be useful, but
14 WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General
16 Public License for more details.
18 You should have received a copy of the GNU General Public License along
19 with this program; if not, write to the Free Software Foundation, Inc.,
20 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
28 #if ! defined SIGCHLD && defined SIGCLD
29 # define SIGCHLD SIGCLD
32 /* The following causes "common.h" to produce definitions of all the global
33 variables, rather than just "extern" declarations of them. GNU tar does
34 depend on the system loader to preset all GLOBAL variables to neutral (or
35 zero) values; explicit initialization is usually not done. */
40 #include <localedir.h>
45 /* Local declarations. */
47 #ifndef DEFAULT_ARCHIVE
48 # define DEFAULT_ARCHIVE "tar.out"
51 #ifndef DEFAULT_BLOCKING
52 # define DEFAULT_BLOCKING 20
55 static void usage (int) __attribute__ ((noreturn
));
59 /* Name of option using stdin. */
60 static const char *stdin_used_by
;
62 /* Doesn't return if stdin already requested. */
64 request_stdin (const char *option
)
67 USAGE_ERROR ((0, 0, _("Options `-%s' and `-%s' both want standard input"),
68 stdin_used_by
, option
));
70 stdin_used_by
= option
;
73 /* Returns true if and only if the user typed 'y' or 'Y'. */
75 confirm (const char *message_action
, const char *message_name
)
77 static FILE *confirm_file
;
78 static int confirm_file_EOF
;
82 if (archive
== 0 || stdin_used_by
)
84 confirm_file
= fopen (TTY_NAME
, "r");
86 open_fatal (TTY_NAME
);
95 fprintf (stdlis
, "%s %s?", message_action
, quote (message_name
));
99 int reply
= confirm_file_EOF
? EOF
: getc (confirm_file
);
102 for (character
= reply
;
104 character
= getc (confirm_file
))
105 if (character
== EOF
)
107 confirm_file_EOF
= 1;
108 fputc ('\n', stdlis
);
112 return reply
== 'y' || reply
== 'Y';
118 /* For long options that unconditionally set a single flag, we have getopt
119 do it. For the others, we share the code for the equivalent short
120 named option, the name of which is stored in the otherwise-unused `val'
121 field of the `struct option'; for long options that have no equivalent
122 short option, we use non-characters as pseudo short options,
123 starting at CHAR_MAX + 1 and going upwards. */
127 ANCHORED_OPTION
= CHAR_MAX
+ 1,
128 ATIME_PRESERVE_OPTION
,
136 IGNORE_FAILED_READ_OPTION
,
141 NO_IGNORE_CASE_OPTION
,
142 NO_OVERWRITE_DIR_OPTION
,
144 NO_WILDCARDS_MATCH_SLASH_OPTION
,
146 NUMERIC_OWNER_OPTION
,
152 RECURSIVE_UNLINK_OPTION
,
155 SHOW_OMITTED_DIRS_OPTION
,
158 USE_COMPRESS_PROGRAM_OPTION
,
161 WILDCARDS_MATCH_SLASH_OPTION
,
164 /* If nonzero, display usage information and exit. */
165 static int show_help
;
167 /* If nonzero, print the version on standard output and exit. */
168 static int show_version
;
170 static struct option long_options
[] =
172 {"absolute-names", no_argument
, 0, 'P'},
173 {"after-date", required_argument
, 0, 'N'},
174 {"anchored", no_argument
, 0, ANCHORED_OPTION
},
175 {"append", no_argument
, 0, 'r'},
176 {"atime-preserve", no_argument
, 0, ATIME_PRESERVE_OPTION
},
177 {"backup", optional_argument
, 0, BACKUP_OPTION
},
178 {"block-number", no_argument
, 0, 'R'},
179 {"blocking-factor", required_argument
, 0, 'b'},
180 {"bzip2", no_argument
, 0, 'j'},
181 {"catenate", no_argument
, 0, 'A'},
182 {"checkpoint", no_argument
, 0, CHECKPOINT_OPTION
},
183 {"check-links", no_argument
, &check_links_option
, 1},
184 {"compare", no_argument
, 0, 'd'},
185 {"compress", no_argument
, 0, 'Z'},
186 {"concatenate", no_argument
, 0, 'A'},
187 {"confirmation", no_argument
, 0, 'w'},
188 /* FIXME: --selective as a synonym for --confirmation? */
189 {"create", no_argument
, 0, 'c'},
190 {"delete", no_argument
, 0, DELETE_OPTION
},
191 {"dereference", no_argument
, 0, 'h'},
192 {"diff", no_argument
, 0, 'd'},
193 {"directory", required_argument
, 0, 'C'},
194 {"exclude", required_argument
, 0, EXCLUDE_OPTION
},
195 {"exclude-from", required_argument
, 0, 'X'},
196 {"extract", no_argument
, 0, 'x'},
197 {"file", required_argument
, 0, 'f'},
198 {"files-from", required_argument
, 0, 'T'},
199 {"force-local", no_argument
, 0, FORCE_LOCAL_OPTION
},
200 {"get", no_argument
, 0, 'x'},
201 {"group", required_argument
, 0, GROUP_OPTION
},
202 {"gunzip", no_argument
, 0, 'z'},
203 {"gzip", no_argument
, 0, 'z'},
204 {"help", no_argument
, &show_help
, 1},
205 {"ignore-case", no_argument
, 0, IGNORE_CASE_OPTION
},
206 {"ignore-failed-read", no_argument
, 0, IGNORE_FAILED_READ_OPTION
},
207 {"ignore-zeros", no_argument
, 0, 'i'},
208 /* FIXME: --ignore-end as a new name for --ignore-zeros? */
209 {"incremental", no_argument
, 0, 'G'},
210 {"index-file", required_argument
, 0, INDEX_FILE_OPTION
},
211 {"info-script", required_argument
, 0, 'F'},
212 {"interactive", no_argument
, 0, 'w'},
213 {"keep-old-files", no_argument
, 0, 'k'},
214 {"label", required_argument
, 0, 'V'},
215 {"list", no_argument
, 0, 't'},
216 {"listed-incremental", required_argument
, 0, 'g'},
217 {"mode", required_argument
, 0, MODE_OPTION
},
218 {"multi-volume", no_argument
, 0, 'M'},
219 {"new-volume-script", required_argument
, 0, 'F'},
220 {"newer", required_argument
, 0, 'N'},
221 {"newer-mtime", required_argument
, 0, NEWER_MTIME_OPTION
},
222 {"null", no_argument
, 0, NULL_OPTION
},
223 {"no-anchored", no_argument
, 0, NO_ANCHORED_OPTION
},
224 {"no-ignore-case", no_argument
, 0, NO_IGNORE_CASE_OPTION
},
225 {"no-overwrite-dir", no_argument
, 0, NO_OVERWRITE_DIR_OPTION
},
226 {"no-wildcards", no_argument
, 0, NO_WILDCARDS_OPTION
},
227 {"no-wildcards-match-slash", no_argument
, 0, NO_WILDCARDS_MATCH_SLASH_OPTION
},
228 {"no-recursion", no_argument
, &recursion_option
, 0},
229 {"no-same-owner", no_argument
, &same_owner_option
, -1},
230 {"no-same-permissions", no_argument
, &same_permissions_option
, -1},
231 {"numeric-owner", no_argument
, 0, NUMERIC_OWNER_OPTION
},
232 {"old-archive", no_argument
, 0, 'o'},
233 {"one-file-system", no_argument
, 0, 'l'},
234 {"overwrite", no_argument
, 0, OVERWRITE_OPTION
},
235 {"owner", required_argument
, 0, OWNER_OPTION
},
236 {"portability", no_argument
, 0, 'o'},
237 {"posix", no_argument
, 0, POSIX_OPTION
},
238 {"preserve", no_argument
, 0, PRESERVE_OPTION
},
239 {"preserve-order", no_argument
, 0, 's'},
240 {"preserve-permissions", no_argument
, 0, 'p'},
241 {"recursion", no_argument
, &recursion_option
, FNM_LEADING_DIR
},
242 {"recursive-unlink", no_argument
, 0, RECURSIVE_UNLINK_OPTION
},
243 {"read-full-records", no_argument
, 0, 'B'},
244 /* FIXME: --partial-blocks might be a synonym for --read-full-records? */
245 {"record-size", required_argument
, 0, RECORD_SIZE_OPTION
},
246 {"remove-files", no_argument
, 0, REMOVE_FILES_OPTION
},
247 {"rsh-command", required_argument
, 0, RSH_COMMAND_OPTION
},
248 {"same-order", no_argument
, 0, 's'},
249 {"same-owner", no_argument
, &same_owner_option
, 1},
250 {"same-permissions", no_argument
, 0, 'p'},
251 {"show-omitted-dirs", no_argument
, 0, SHOW_OMITTED_DIRS_OPTION
},
252 {"sparse", no_argument
, 0, 'S'},
253 {"starting-file", required_argument
, 0, 'K'},
254 {"suffix", required_argument
, 0, SUFFIX_OPTION
},
255 {"tape-length", required_argument
, 0, 'L'},
256 {"to-stdout", no_argument
, 0, 'O'},
257 {"totals", no_argument
, 0, TOTALS_OPTION
},
258 {"touch", no_argument
, 0, 'm'},
259 {"uncompress", no_argument
, 0, 'Z'},
260 {"ungzip", no_argument
, 0, 'z'},
261 {"unlink-first", no_argument
, 0, 'U'},
262 {"update", no_argument
, 0, 'u'},
263 {"use-compress-program", required_argument
, 0, USE_COMPRESS_PROGRAM_OPTION
},
264 {"verbose", no_argument
, 0, 'v'},
265 {"verify", no_argument
, 0, 'W'},
266 {"version", no_argument
, &show_version
, 1},
267 {"volno-file", required_argument
, 0, VOLNO_FILE_OPTION
},
268 {"wildcards", no_argument
, 0, WILDCARDS_OPTION
},
269 {"wildcards-match-slash", no_argument
, 0, WILDCARDS_MATCH_SLASH_OPTION
},
274 /* Print a usage message and exit with STATUS. */
278 if (status
!= TAREXIT_SUCCESS
)
279 fprintf (stderr
, _("Try `%s --help' for more information.\n"),
284 GNU `tar' saves many files together into a single tape or disk archive, and\n\
285 can restore individual files from the archive.\n"),
287 printf (_("\nUsage: %s [OPTION]... [FILE]...\n\
290 %s -cf archive.tar foo bar # Create archive.tar from files foo and bar.\n\
291 %s -tvf archive.tar # List all files in archive.tar verbosely.\n\
292 %s -xf archive.tar # Extract all files from archive.tar.\n"),
293 program_name
, program_name
, program_name
, program_name
);
296 If a long option shows an argument as mandatory, then it is mandatory\n\
297 for the equivalent short option also. Similarly for optional arguments.\n"),
301 Main operation mode:\n\
302 -t, --list list the contents of an archive\n\
303 -x, --extract, --get extract files from an archive\n\
304 -c, --create create a new archive\n\
305 -d, --diff, --compare find differences between archive and file system\n\
306 -r, --append append files to the end of an archive\n\
307 -u, --update only append files newer than copy in archive\n\
308 -A, --catenate append tar files to an archive\n\
309 --concatenate same as -A\n\
310 --delete delete from the archive (not on mag tapes!)\n"),
314 Operation modifiers:\n\
315 -W, --verify attempt to verify the archive after writing it\n\
316 --remove-files remove files after adding them to the archive\n\
317 -k, --keep-old-files don't replace existing files when extracting\n\
318 --overwrite overwrite existing files when extracting\n\
319 --no-overwrite-dir preserve metadata of existing directories\n\
320 -U, --unlink-first remove each file prior to extracting over it\n\
321 --recursive-unlink empty hierarchies prior to extracting directory\n\
322 -S, --sparse handle sparse files efficiently\n\
323 -O, --to-stdout extract files to standard output\n\
324 -G, --incremental handle old GNU-format incremental backup\n\
325 -g, --listed-incremental=FILE\n\
326 handle new GNU-format incremental backup\n\
327 --ignore-failed-read do not exit with nonzero on unreadable files\n"),
331 Handling of file attributes:\n\
332 --owner=NAME force NAME as owner for added files\n\
333 --group=NAME force NAME as group for added files\n\
334 --mode=CHANGES force (symbolic) mode CHANGES for added files\n\
335 --atime-preserve don't change access times on dumped files\n\
336 -m, --modification-time don't extract file modified time\n\
337 --same-owner try extracting files with the same ownership\n\
338 --no-same-owner extract files as yourself\n\
339 --numeric-owner always use numbers for user/group names\n\
340 -p, --same-permissions extract permissions information\n\
341 --no-same-permissions do not extract permissions information\n\
342 --preserve-permissions same as -p\n\
343 -s, --same-order sort names to extract to match archive\n\
344 --preserve-order same as -s\n\
345 --preserve same as both -p and -s\n"),
349 Device selection and switching:\n\
350 -f, --file=ARCHIVE use archive file or device ARCHIVE\n\
351 --force-local archive file is local even if has a colon\n\
352 --rsh-command=COMMAND use remote COMMAND instead of rsh\n\
353 -[0-7][lmh] specify drive and density\n\
354 -M, --multi-volume create/list/extract multi-volume archive\n\
355 -L, --tape-length=NUM change tape after writing NUM x 1024 bytes\n\
356 -F, --info-script=FILE run script at end of each tape (implies -M)\n\
357 --new-volume-script=FILE same as -F FILE\n\
358 --volno-file=FILE use/update the volume number in FILE\n"),
363 -b, --blocking-factor=BLOCKS BLOCKS x 512 bytes per record\n\
364 --record-size=SIZE SIZE bytes per record, multiple of 512\n\
365 -i, --ignore-zeros ignore zeroed blocks in archive (means EOF)\n\
366 -B, --read-full-records reblock as we read (for 4.2BSD pipes)\n"),
370 Archive format selection:\n\
371 -V, --label=NAME create archive with volume name NAME\n\
372 PATTERN at list/extract time, a globbing PATTERN\n\
373 --old-archive, --portability write a V7 format archive\n\
374 --posix write a POSIX format archive\n\
375 -j, --bzip2 filter the archive through bzip2\n\
376 -z, --gzip, --ungzip filter the archive through gzip\n\
377 -Z, --compress, --uncompress filter the archive through compress\n\
378 --use-compress-program=PROG filter through PROG (must accept -d)\n"),
382 Local file selection:\n\
383 -C, --directory=DIR change to directory DIR\n\
384 -T, --files-from=NAME get names to extract or create from file NAME\n\
385 --null -T reads null-terminated names, disable -C\n\
386 --exclude=PATTERN exclude files, given as a PATTERN\n\
387 -X, --exclude-from=FILE exclude patterns listed in FILE\n\
388 --anchored exclude patterns match file name start (default)\n\
389 --no-anchored exclude patterns match after any /\n\
390 --ignore-case exclusion ignores case\n\
391 --no-ignore-case exclusion is case sensitive (default)\n\
392 --wildcards exclude patterns use wildcards (default)\n\
393 --no-wildcards exclude patterns are plain strings\n\
394 --wildcards-match-slash exclude pattern wildcards match '/' (default)\n\
395 --no-wildcards-match-slash exclude pattern wildcards do not match '/'\n\
396 -P, --absolute-names don't strip leading `/'s from file names\n\
397 -h, --dereference dump instead the files symlinks point to\n\
398 --no-recursion avoid descending automatically in directories\n\
399 -l, --one-file-system stay in local file system when creating archive\n\
400 -K, --starting-file=NAME begin at file NAME in the archive\n"),
404 -N, --newer=DATE only store files newer than DATE\n\
405 --newer-mtime=DATE compare date and time when data changed only\n\
406 --after-date=DATE same as -N\n"),
410 --backup[=CONTROL] backup before removal, choose version control\n\
411 --suffix=SUFFIX backup before removal, override usual suffix\n"),
415 Informative output:\n\
416 --help print this help, then exit\n\
417 --version print tar program version number, then exit\n\
418 -v, --verbose verbosely list files processed\n\
419 --checkpoint print directory names while reading the archive\n\
420 --check-links print a message if not all links are dumped\n\
421 --totals print total bytes written while creating archive\n\
422 --index-file=FILE send verbose output to FILE\n\
423 -R, --block-number show block number within archive with each message\n\
424 -w, --interactive ask for confirmation for every action\n\
425 --confirmation same as -w\n"),
429 Compatibility options:\n\
430 -o when creating, same as --old-archive\n\
431 when extracting, same as --no-same-owner\n"),
436 The backup suffix is `~', unless set with --suffix or SIMPLE_BACKUP_SUFFIX.\n\
437 The version control may be set with --backup or VERSION_CONTROL, values are:\n\
439 t, numbered make numbered backups\n\
440 nil, existing numbered if numbered backups exist, simple otherwise\n\
441 never, simple always make simple backups\n"),
445 GNU tar cannot read nor produce `--posix' archives. If POSIXLY_CORRECT\n\
446 is set in the environment, GNU extensions are disallowed with `--posix'.\n\
447 Support for POSIX is only partially implemented, don't count on it yet.\n\
448 ARCHIVE may be FILE, HOST:FILE or USER@HOST:FILE; DATE may be a textual date\n\
449 or a file name starting with `/' or `.', in which case the file's date is used.\n\
450 *This* `tar' defaults to `-f%s -b%d'.\n"),
451 DEFAULT_ARCHIVE
, DEFAULT_BLOCKING
);
452 printf (_("\nReport bugs to <%s>.\n"), PACKAGE_BUGREPORT
);
457 /* Parse the options for tar. */
459 /* Available option letters are DEHIJQY and aenqy. Some are reserved:
461 e exit immediately with a nonzero exit status if unexpected errors occur
462 E use extended headers (draft POSIX headers, that is)
463 I same as T (for compatibility with Solaris tar)
464 n the archive is quickly seekable, so don't worry about random seeks
465 q stop after extracting the first occurrence of the named file
466 y per-file gzip compression
467 Y per-block gzip compression */
469 #define OPTION_STRING \
470 "-01234567ABC:F:GIK:L:MN:OPRST:UV:WX:Zb:cdf:g:hijklmoprstuvwxyz"
473 set_subcommand_option (enum subcommand subcommand
)
475 if (subcommand_option
!= UNKNOWN_SUBCOMMAND
476 && subcommand_option
!= subcommand
)
478 _("You may not specify more than one `-Acdtrux' option")));
480 subcommand_option
= subcommand
;
484 set_use_compress_program_option (const char *string
)
486 if (use_compress_program_option
&& strcmp (use_compress_program_option
, string
) != 0)
487 USAGE_ERROR ((0, 0, _("Conflicting compression options")));
489 use_compress_program_option
= string
;
493 decode_options (int argc
, char **argv
)
495 int optchar
; /* option letter */
496 int input_files
; /* number of input files */
497 char const *textual_date_option
= 0;
498 char const *backup_suffix_string
;
499 char const *version_control_string
= 0;
500 int exclude_options
= EXCLUDE_WILDCARDS
;
503 /* Set some default option values. */
505 subcommand_option
= UNKNOWN_SUBCOMMAND
;
506 archive_format
= DEFAULT_FORMAT
;
507 blocking_factor
= DEFAULT_BLOCKING
;
508 record_size
= DEFAULT_BLOCKING
* BLOCKSIZE
;
509 excluded
= new_exclude ();
510 newer_mtime_option
= TYPE_MINIMUM (time_t);
511 recursion_option
= FNM_LEADING_DIR
;
516 backup_suffix_string
= getenv ("SIMPLE_BACKUP_SUFFIX");
518 /* Convert old-style tar call by exploding option element and rearranging
519 options accordingly. */
521 if (argc
> 1 && argv
[1][0] != '-')
523 int new_argc
; /* argc value for rearranged arguments */
524 char **new_argv
; /* argv value for rearranged arguments */
525 char *const *in
; /* cursor into original argv */
526 char **out
; /* cursor into rearranged argv */
527 const char *letter
; /* cursor into old option letters */
528 char buffer
[3]; /* constructed option buffer */
529 const char *cursor
; /* cursor in OPTION_STRING */
531 /* Initialize a constructed option. */
536 /* Allocate a new argument array, and copy program name in it. */
538 new_argc
= argc
- 1 + strlen (argv
[1]);
539 new_argv
= xmalloc ((new_argc
+ 1) * sizeof (char *));
544 /* Copy each old letter option as a separate option, and have the
545 corresponding argument moved next to it. */
547 for (letter
= *in
++; *letter
; letter
++)
550 *out
++ = xstrdup (buffer
);
551 cursor
= strchr (OPTION_STRING
, *letter
);
552 if (cursor
&& cursor
[1] == ':')
554 if (in
< argv
+ argc
)
557 USAGE_ERROR ((0, 0, _("Old option `%c' requires an argument."),
562 /* Copy all remaining options. */
564 while (in
< argv
+ argc
)
568 /* Replace the old option list by the new one. */
574 /* Parse all options and non-options as they appear. */
578 prepend_default_options (getenv ("TAR_OPTIONS"), &argc
, &argv
);
580 while (optchar
= getopt_long (argc
, argv
, OPTION_STRING
, long_options
, 0),
585 usage (TAREXIT_FAILURE
);
591 /* File name or non-parsed option, because of RETURN_IN_ORDER
592 ordering triggered by the leading dash in OPTION_STRING. */
599 set_subcommand_option (CAT_SUBCOMMAND
);
605 if (! (xstrtoumax (optarg
, 0, 10, &u
, "") == LONGINT_OK
606 && u
== (blocking_factor
= u
)
607 && 0 < blocking_factor
608 && u
== (record_size
= u
* BLOCKSIZE
) / BLOCKSIZE
))
609 USAGE_ERROR ((0, 0, "%s: %s", quotearg_colon (optarg
),
610 _("Invalid blocking factor")));
615 /* Try to reblock input records. For reading 4.2BSD pipes. */
617 /* It would surely make sense to exchange -B and -R, but it seems
618 that -B has been used for a long while in Sun tar ans most
619 BSD-derived systems. This is a consequence of the block/record
620 terminology confusion. */
622 read_full_records_option
= 1;
626 set_subcommand_option (CREATE_SUBCOMMAND
);
635 set_subcommand_option (DIFF_SUBCOMMAND
);
639 if (archive_names
== allocated_archive_names
)
641 allocated_archive_names
*= 2;
643 xrealloc (archive_name_array
,
644 sizeof (const char *) * allocated_archive_names
);
646 archive_name_array
[archive_names
++] = optarg
;
650 /* Since -F is only useful with -M, make it implied. Run this
651 script at the end of each tape. */
653 info_script_option
= optarg
;
654 multi_volume_option
= 1;
658 listed_incremental_option
= optarg
;
659 after_date_option
= 1;
663 /* We are making an incremental dump (FIXME: are we?); save
664 directories at the beginning of the archive, and include in each
665 directory its contents. */
667 incremental_option
= 1;
671 /* Follow symbolic links. */
673 dereference_option
= 1;
677 /* Ignore zero blocks (eofs). This can't be the default,
678 because Unix tar writes two blocks of zeros, then pads out
679 the record with garbage. */
681 ignore_zeros_option
= 1;
686 _("Warning: the -I option is not supported;"
687 " perhaps you meant -j or -T?")));
691 set_use_compress_program_option ("bzip2");
695 /* Don't replace existing files. */
696 old_files_option
= KEEP_OLD_FILES
;
700 starting_file_option
= 1;
705 /* When dumping directories, don't dump files/subdirectories
706 that are on other filesystems. */
708 one_file_system_option
= 1;
714 if (xstrtoumax (optarg
, 0, 10, &u
, "") != LONGINT_OK
)
715 USAGE_ERROR ((0, 0, "%s: %s", quotearg_colon (optarg
),
716 _("Invalid tape length")));
717 tape_length_option
= 1024 * (tarlong
) u
;
718 multi_volume_option
= 1;
727 /* Make multivolume archive: when we can't write any more into
728 the archive, re-open it, and continue writing. */
730 multi_volume_option
= 1;
735 after_date_option
= 1;
738 case NEWER_MTIME_OPTION
:
739 if (newer_mtime_option
!= TYPE_MINIMUM (time_t))
740 USAGE_ERROR ((0, 0, _("More than one threshold date")));
742 if (FILESYSTEM_PREFIX_LEN (optarg
) != 0
747 if (deref_stat (dereference_option
, optarg
, &st
) != 0)
750 USAGE_ERROR ((0, 0, _("Date file not found")));
752 newer_mtime_option
= st
.st_mtime
;
756 newer_mtime_option
= get_date (optarg
, 0);
757 if (newer_mtime_option
== (time_t) -1)
758 WARN ((0, 0, _("Substituting %s for unknown date format %s"),
759 tartime (newer_mtime_option
), quote (optarg
)));
761 textual_date_option
= optarg
;
765 #endif /* not MSDOS */
772 to_stdout_option
= 1;
776 same_permissions_option
= 1;
780 absolute_names_option
= 1;
784 set_subcommand_option (APPEND_SUBCOMMAND
);
788 /* Print block numbers for debugging bad tar archives. */
790 /* It would surely make sense to exchange -B and -R, but it seems
791 that -B has been used for a long while in Sun tar ans most
792 BSD-derived systems. This is a consequence of the block/record
793 terminology confusion. */
795 block_number_option
= 1;
799 /* Names to extr are sorted. */
801 same_order_option
= 1;
809 set_subcommand_option (LIST_SUBCOMMAND
);
814 files_from_option
= optarg
;
818 set_subcommand_option (UPDATE_SUBCOMMAND
);
822 old_files_option
= UNLINK_FIRST_OLD_FILES
;
830 volume_label_option
= optarg
;
834 interactive_option
= 1;
842 set_subcommand_option (EXTRACT_SUBCOMMAND
);
846 if (add_exclude_file (add_exclude
, excluded
, optarg
,
847 exclude_options
| recursion_option
, '\n')
851 FATAL_ERROR ((0, e
, "%s", quotearg_colon (optarg
)));
857 _("Warning: the -y option is not supported;"
858 " perhaps you meant -j?")));
862 set_use_compress_program_option ("gzip");
866 set_use_compress_program_option ("compress");
869 case ANCHORED_OPTION
:
870 exclude_options
|= EXCLUDE_ANCHORED
;
873 case ATIME_PRESERVE_OPTION
:
874 atime_preserve_option
= 1;
877 case CHECKPOINT_OPTION
:
878 checkpoint_option
= 1;
884 version_control_string
= optarg
;
888 set_subcommand_option (DELETE_SUBCOMMAND
);
892 add_exclude (excluded
, optarg
, exclude_options
| recursion_option
);
895 case FORCE_LOCAL_OPTION
:
896 force_local_option
= 1;
899 case INDEX_FILE_OPTION
:
900 index_file_name
= optarg
;
903 case IGNORE_CASE_OPTION
:
904 exclude_options
|= FNM_CASEFOLD
;
907 case IGNORE_FAILED_READ_OPTION
:
908 ignore_failed_read_option
= 1;
912 if (! (strlen (optarg
) < GNAME_FIELD_SIZE
913 && gname_to_gid (optarg
, &group_option
)))
916 if (xstrtoumax (optarg
, 0, 10, &g
, "") == LONGINT_OK
920 FATAL_ERROR ((0, 0, "%s: %s", quotearg_colon (optarg
),
921 _("%s: Invalid group")));
927 = mode_compile (optarg
,
928 MODE_MASK_EQUALS
| MODE_MASK_PLUS
| MODE_MASK_MINUS
);
929 if (mode_option
== MODE_INVALID
)
930 FATAL_ERROR ((0, 0, _("Invalid mode given on option")));
931 if (mode_option
== MODE_MEMORY_EXHAUSTED
)
935 case NO_ANCHORED_OPTION
:
936 exclude_options
&= ~ EXCLUDE_ANCHORED
;
939 case NO_IGNORE_CASE_OPTION
:
940 exclude_options
&= ~ FNM_CASEFOLD
;
943 case NO_OVERWRITE_DIR_OPTION
:
944 old_files_option
= NO_OVERWRITE_DIR_OLD_FILES
;
947 case NO_WILDCARDS_OPTION
:
948 exclude_options
&= ~ EXCLUDE_WILDCARDS
;
951 case NO_WILDCARDS_MATCH_SLASH_OPTION
:
952 exclude_options
|= FNM_FILE_NAME
;
956 filename_terminator
= '\0';
959 case NUMERIC_OWNER_OPTION
:
960 numeric_owner_option
= 1;
963 case OVERWRITE_OPTION
:
964 old_files_option
= OVERWRITE_OLD_FILES
;
968 if (! (strlen (optarg
) < UNAME_FIELD_SIZE
969 && uname_to_uid (optarg
, &owner_option
)))
972 if (xstrtoumax (optarg
, 0, 10, &u
, "") == LONGINT_OK
976 FATAL_ERROR ((0, 0, "%s: %s", quotearg_colon (optarg
),
977 _("Invalid owner")));
982 #if OLDGNU_COMPATIBILITY
983 if (archive_format
== DEFAULT_FORMAT
)
984 archive_format
= GNU_FORMAT
;
985 else if (archive_format
!= GNU_FORMAT
)
986 USAGE_ERROR ((0, 0, _("Conflicting archive format options")));
988 if (archive_format
== DEFAULT_FORMAT
)
989 archive_format
= POSIX_FORMAT
;
990 else if (archive_format
!= POSIX_FORMAT
)
991 USAGE_ERROR ((0, 0, _("Conflicting archive format options")));
995 case PRESERVE_OPTION
:
996 same_permissions_option
= 1;
997 same_order_option
= 1;
1000 case RECORD_SIZE_OPTION
:
1003 if (! (xstrtoumax (optarg
, 0, 10, &u
, "") == LONGINT_OK
1004 && u
== (size_t) u
))
1005 USAGE_ERROR ((0, 0, "%s: %s", quotearg_colon (optarg
),
1006 _("Invalid record size")));
1008 if (record_size
% BLOCKSIZE
!= 0)
1009 USAGE_ERROR ((0, 0, _("Record size must be a multiple of %d."),
1011 blocking_factor
= record_size
/ BLOCKSIZE
;
1015 case RECURSIVE_UNLINK_OPTION
:
1016 recursive_unlink_option
= 1;
1019 case REMOVE_FILES_OPTION
:
1020 remove_files_option
= 1;
1023 case RSH_COMMAND_OPTION
:
1024 rsh_command_option
= optarg
;
1029 backup_suffix_string
= optarg
;
1032 case USE_COMPRESS_PROGRAM_OPTION
:
1033 set_use_compress_program_option (optarg
);
1036 case VOLNO_FILE_OPTION
:
1037 volno_file_option
= optarg
;
1040 case WILDCARDS_OPTION
:
1041 exclude_options
|= EXCLUDE_WILDCARDS
;
1044 case WILDCARDS_MATCH_SLASH_OPTION
:
1045 exclude_options
&= ~ FNM_FILE_NAME
;
1057 #ifdef DEVICE_PREFIX
1059 int device
= optchar
- '0';
1061 static char buf
[sizeof DEVICE_PREFIX
+ 10];
1064 density
= getopt_long (argc
, argv
, "lmh", 0, 0);
1065 strcpy (buf
, DEVICE_PREFIX
);
1066 cursor
= buf
+ strlen (buf
);
1068 #ifdef DENSITY_LETTER
1070 sprintf (cursor
, "%d%c", device
, density
);
1072 #else /* not DENSITY_LETTER */
1099 usage (TAREXIT_FAILURE
);
1101 sprintf (cursor
, "%d", device
);
1103 #endif /* not DENSITY_LETTER */
1105 if (archive_names
== allocated_archive_names
)
1107 allocated_archive_names
*= 2;
1108 archive_name_array
=
1109 xrealloc (archive_name_array
,
1110 sizeof (const char *) * allocated_archive_names
);
1112 archive_name_array
[archive_names
++] = buf
;
1114 /* FIXME: How comes this works for many archives when buf is
1119 #else /* not DEVICE_PREFIX */
1122 _("Options `-[0-7][lmh]' not supported by *this* tar")));
1124 #endif /* not DEVICE_PREFIX */
1127 /* Special handling for 'o' option:
1129 GNU tar used to say "output old format".
1130 UNIX98 tar says don't chown files after extracting (we use
1131 "--no-same-owner" for this).
1133 The old GNU tar semantics is retained when used with --create
1134 option, otherwise UNIX98 semantics is assumed */
1138 if (subcommand_option
== CREATE_SUBCOMMAND
)
1140 /* GNU Tar <= 1.13 compatibility */
1141 if (archive_format
== DEFAULT_FORMAT
)
1142 archive_format
= V7_FORMAT
;
1143 else if (archive_format
!= V7_FORMAT
)
1144 USAGE_ERROR ((0, 0, _("Conflicting archive format options")));
1148 /* UNIX98 compatibility */
1149 same_owner_option
= 1;
1153 /* Handle operands after any "--" argument. */
1154 for (; optind
< argc
; optind
++)
1156 name_add (argv
[optind
]);
1160 /* Process trivial options. */
1164 printf ("tar (%s) %s\n", PACKAGE_NAME
, PACKAGE_VERSION
);
1165 printf (_("Copyright (C) %d Free Software Foundation, Inc.\n"), 2003);
1167 This program comes with NO WARRANTY, to the extent permitted by law.\n\
1168 You may redistribute it under the terms of the GNU General Public License;\n\
1169 see the file named COPYING for details."));
1171 puts (_("Written by John Gilmore and Jay Fenlason."));
1173 exit (TAREXIT_SUCCESS
);
1177 usage (TAREXIT_SUCCESS
);
1179 /* Derive option values and check option consistency. */
1181 if (archive_format
== DEFAULT_FORMAT
)
1183 #if OLDGNU_COMPATIBILITY
1184 archive_format
= OLDGNU_FORMAT
;
1186 archive_format
= GNU_FORMAT
;
1190 if (archive_format
== GNU_FORMAT
&& getenv ("POSIXLY_CORRECT"))
1191 archive_format
= POSIX_FORMAT
;
1193 if ((volume_label_option
1194 || incremental_option
|| multi_volume_option
|| sparse_option
)
1195 && archive_format
!= OLDGNU_FORMAT
&& archive_format
!= GNU_FORMAT
)
1197 _("GNU features wanted on incompatible archive format")));
1199 if (archive_names
== 0)
1201 /* If no archive file name given, try TAPE from the environment, or
1202 else, DEFAULT_ARCHIVE from the configuration process. */
1205 archive_name_array
[0] = getenv ("TAPE");
1206 if (! archive_name_array
[0])
1207 archive_name_array
[0] = DEFAULT_ARCHIVE
;
1210 /* Allow multiple archives only with `-M'. */
1212 if (archive_names
> 1 && !multi_volume_option
)
1214 _("Multiple archive files requires `-M' option")));
1216 if (listed_incremental_option
1217 && newer_mtime_option
!= TYPE_MINIMUM (time_t))
1219 _("Cannot combine --listed-incremental with --newer")));
1221 if (volume_label_option
)
1223 size_t volume_label_max_len
=
1224 (sizeof current_header
->header
.name
1225 - 1 /* for trailing '\0' */
1226 - (multi_volume_option
1227 ? (sizeof " Volume "
1228 - 1 /* for null at end of " Volume " */
1229 + INT_STRLEN_BOUND (int) /* for volume number */
1230 - 1 /* for sign, as 0 <= volno */)
1232 if (volume_label_max_len
< strlen (volume_label_option
))
1234 _("%s: Volume label is too long (limit is %lu bytes)"),
1235 quotearg_colon (volume_label_option
),
1236 (unsigned long) volume_label_max_len
));
1239 /* If ready to unlink hierarchies, so we are for simpler files. */
1240 if (recursive_unlink_option
)
1241 old_files_option
= UNLINK_FIRST_OLD_FILES
;
1243 /* Forbid using -c with no input files whatsoever. Check that `-f -',
1244 explicit or implied, is used correctly. */
1246 switch (subcommand_option
)
1248 case CREATE_SUBCOMMAND
:
1249 if (input_files
== 0 && !files_from_option
)
1251 _("Cowardly refusing to create an empty archive")));
1254 case EXTRACT_SUBCOMMAND
:
1255 case LIST_SUBCOMMAND
:
1256 case DIFF_SUBCOMMAND
:
1257 for (archive_name_cursor
= archive_name_array
;
1258 archive_name_cursor
< archive_name_array
+ archive_names
;
1259 archive_name_cursor
++)
1260 if (!strcmp (*archive_name_cursor
, "-"))
1261 request_stdin ("-f");
1264 case CAT_SUBCOMMAND
:
1265 case UPDATE_SUBCOMMAND
:
1266 case APPEND_SUBCOMMAND
:
1267 for (archive_name_cursor
= archive_name_array
;
1268 archive_name_cursor
< archive_name_array
+ archive_names
;
1269 archive_name_cursor
++)
1270 if (!strcmp (*archive_name_cursor
, "-"))
1272 _("Options `-Aru' are incompatible with `-f -'")));
1278 archive_name_cursor
= archive_name_array
;
1280 /* Prepare for generating backup names. */
1282 if (backup_suffix_string
)
1283 simple_backup_suffix
= xstrdup (backup_suffix_string
);
1286 backup_type
= xget_version ("--backup", version_control_string
);
1288 if (verbose_option
&& textual_date_option
)
1290 char const *treated_as
= tartime (newer_mtime_option
);
1291 if (strcmp (textual_date_option
, treated_as
) != 0)
1292 WARN ((0, 0, _("Treating date `%s' as %s"),
1293 textual_date_option
, treated_as
));
1299 /* Main routine for tar. */
1301 main (int argc
, char **argv
)
1303 #if HAVE_CLOCK_GETTIME
1304 if (clock_gettime (CLOCK_REALTIME
, &start_timespec
) != 0)
1306 start_time
= time (0);
1307 program_name
= argv
[0];
1308 setlocale (LC_ALL
, "");
1309 bindtextdomain (PACKAGE
, LOCALEDIR
);
1310 textdomain (PACKAGE
);
1312 exit_status
= TAREXIT_SUCCESS
;
1313 filename_terminator
= '\n';
1314 set_quoting_style (0, escape_quoting_style
);
1316 /* Pre-allocate a few structures. */
1318 allocated_archive_names
= 10;
1319 archive_name_array
=
1320 xmalloc (sizeof (const char *) * allocated_archive_names
);
1324 /* System V fork+wait does not work if SIGCHLD is ignored. */
1325 signal (SIGCHLD
, SIG_DFL
);
1330 /* Decode options. */
1332 decode_options (argc
, argv
);
1333 name_init (argc
, argv
);
1335 /* Main command execution. */
1337 if (volno_file_option
)
1338 init_volume_number ();
1340 switch (subcommand_option
)
1342 case UNKNOWN_SUBCOMMAND
:
1344 _("You must specify one of the `-Acdtrux' options")));
1346 case CAT_SUBCOMMAND
:
1347 case UPDATE_SUBCOMMAND
:
1348 case APPEND_SUBCOMMAND
:
1352 case DELETE_SUBCOMMAND
:
1353 delete_archive_members ();
1356 case CREATE_SUBCOMMAND
:
1361 print_total_written ();
1364 case EXTRACT_SUBCOMMAND
:
1366 read_and (extract_archive
);
1368 /* FIXME: should extract_finish () even if an ordinary signal is
1374 case LIST_SUBCOMMAND
:
1375 read_and (list_archive
);
1378 case DIFF_SUBCOMMAND
:
1380 read_and (diff_archive
);
1384 if (check_links_option
)
1387 if (volno_file_option
)
1388 closeout_volume_number ();
1390 /* Dispose of allocated memory, and return. */
1392 free (archive_name_array
);
1395 if (stdlis
!= stderr
&& (ferror (stdlis
) || fclose (stdlis
) != 0))
1396 FATAL_ERROR ((0, 0, _("Error in writing to standard output")));
1397 if (exit_status
== TAREXIT_FAILURE
)
1398 error (0, 0, _("Error exit delayed from previous errors"));
1399 if (ferror (stderr
) || fclose (stderr
) != 0)
1400 exit_status
= TAREXIT_FAILURE
;