1 /* A tar (tape archiver) program.
3 Copyright (C) 1988, 1992, 1993, 1994, 1995, 1996, 1997, 1999, 2000,
4 2001, 2003, 2004, 2005, 2006, 2007 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 3, 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 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. */
26 #include <argp-namefrob.h>
27 #include <argp-fmtstream.h>
30 #if ! defined SIGCHLD && defined SIGCLD
31 # define SIGCHLD SIGCLD
34 /* The following causes "common.h" to produce definitions of all the global
35 variables, rather than just "extern" declarations of them. GNU tar does
36 depend on the system loader to preset all GLOBAL variables to neutral (or
37 zero) values; explicit initialization is usually not done. */
43 #include <configmake.h>
47 #include <rmt-command.h>
50 #include <version-etc.h>
54 /* Local declarations. */
56 #ifndef DEFAULT_ARCHIVE_FORMAT
57 # define DEFAULT_ARCHIVE_FORMAT GNU_FORMAT
60 #ifndef DEFAULT_ARCHIVE
61 # define DEFAULT_ARCHIVE "tar.out"
64 #ifndef DEFAULT_BLOCKING
65 # define DEFAULT_BLOCKING 20
71 /* Name of option using stdin. */
72 static const char *stdin_used_by
;
74 /* Doesn't return if stdin already requested. */
76 request_stdin (const char *option
)
79 USAGE_ERROR ((0, 0, _("Options `-%s' and `-%s' both want standard input"),
80 stdin_used_by
, option
));
82 stdin_used_by
= option
;
85 extern int rpmatch (char const *response
);
87 /* Returns true if and only if the user typed an affirmative response. */
89 confirm (const char *message_action
, const char *message_name
)
91 static FILE *confirm_file
;
92 static int confirm_file_EOF
;
97 if (archive
== 0 || stdin_used_by
)
99 confirm_file
= fopen (TTY_NAME
, "r");
101 open_fatal (TTY_NAME
);
105 request_stdin ("-w");
106 confirm_file
= stdin
;
110 fprintf (stdlis
, "%s %s?", message_action
, quote (message_name
));
113 if (!confirm_file_EOF
)
115 char *response
= NULL
;
116 size_t response_size
= 0;
117 if (getline (&response
, &response_size
, confirm_file
) < 0)
118 confirm_file_EOF
= 1;
120 status
= rpmatch (response
) > 0;
124 if (confirm_file_EOF
)
126 fputc ('\n', stdlis
);
133 static struct fmttab
{
135 enum archive_format fmt
;
138 { "oldgnu", OLDGNU_FORMAT
},
139 { "ustar", USTAR_FORMAT
},
140 { "posix", POSIX_FORMAT
},
141 #if 0 /* not fully supported yet */
142 { "star", STAR_FORMAT
},
144 { "gnu", GNU_FORMAT
},
145 { "pax", POSIX_FORMAT
}, /* An alias for posix */
150 set_archive_format (char const *name
)
152 struct fmttab
const *p
;
154 for (p
= fmttab
; strcmp (p
->name
, name
) != 0; )
156 USAGE_ERROR ((0, 0, _("%s: Invalid archive format"),
157 quotearg_colon (name
)));
159 archive_format
= p
->fmt
;
163 archive_format_string (enum archive_format fmt
)
165 struct fmttab
const *p
;
167 for (p
= fmttab
; p
->name
; p
++)
173 #define FORMAT_MASK(n) (1<<(n))
176 assert_format(unsigned fmt_mask
)
178 if ((FORMAT_MASK (archive_format
) & fmt_mask
) == 0)
180 _("GNU features wanted on incompatible archive format")));
184 subcommand_string (enum subcommand c
)
188 case UNKNOWN_SUBCOMMAND
:
191 case APPEND_SUBCOMMAND
:
197 case CREATE_SUBCOMMAND
:
200 case DELETE_SUBCOMMAND
:
203 case DIFF_SUBCOMMAND
:
206 case EXTRACT_SUBCOMMAND
:
209 case LIST_SUBCOMMAND
:
212 case UPDATE_SUBCOMMAND
:
221 tar_list_quoting_styles (argp_fmtstream_t fs
, char *prefix
)
225 for (i
= 0; quoting_style_args
[i
]; i
++)
226 argp_fmtstream_printf (fs
, "%s%s\n", prefix
, quoting_style_args
[i
]);
230 tar_set_quoting_style (char *arg
)
234 for (i
= 0; quoting_style_args
[i
]; i
++)
235 if (strcmp (arg
, quoting_style_args
[i
]) == 0)
237 set_quoting_style (NULL
, i
);
241 _("Unknown quoting style `%s'. Try `%s --quoting-style=help' to get a list."), arg
, program_invocation_short_name
));
249 ANCHORED_OPTION
= CHAR_MAX
+ 1,
250 ATIME_PRESERVE_OPTION
,
254 CHECKPOINT_ACTION_OPTION
,
255 DELAY_DIRECTORY_RESTORE_OPTION
,
256 HARD_DEREFERENCE_OPTION
,
258 EXCLUDE_CACHES_OPTION
,
259 EXCLUDE_CACHES_UNDER_OPTION
,
260 EXCLUDE_CACHES_ALL_OPTION
,
263 EXCLUDE_TAG_UNDER_OPTION
,
264 EXCLUDE_TAG_ALL_OPTION
,
270 IGNORE_COMMAND_ERROR_OPTION
,
271 IGNORE_FAILED_READ_OPTION
,
273 KEEP_NEWER_FILES_OPTION
,
278 NO_AUTO_COMPRESS_OPTION
,
279 NO_CHECK_DEVICE_OPTION
,
280 NO_DELAY_DIRECTORY_RESTORE_OPTION
,
281 NO_IGNORE_CASE_OPTION
,
282 NO_IGNORE_COMMAND_ERROR_OPTION
,
283 NO_OVERWRITE_DIR_OPTION
,
284 NO_QUOTE_CHARS_OPTION
,
286 NO_SAME_OWNER_OPTION
,
287 NO_SAME_PERMISSIONS_OPTION
,
289 NO_WILDCARDS_MATCH_SLASH_OPTION
,
292 NUMERIC_OWNER_OPTION
,
295 ONE_FILE_SYSTEM_OPTION
,
296 OVERWRITE_DIR_OPTION
,
303 QUOTING_STYLE_OPTION
,
306 RECURSIVE_UNLINK_OPTION
,
312 SHOW_DEFAULTS_OPTION
,
313 SHOW_OMITTED_DIRS_OPTION
,
314 SHOW_TRANSFORMED_NAMES_OPTION
,
315 SPARSE_VERSION_OPTION
,
316 STRIP_COMPONENTS_OPTION
,
324 USE_COMPRESS_PROGRAM_OPTION
,
328 WILDCARDS_MATCH_SLASH_OPTION
,
332 const char *argp_program_version
= "tar (" PACKAGE_NAME
") " VERSION
;
333 const char *argp_program_bug_address
= "<" PACKAGE_BUGREPORT
">";
334 static char const doc
[] = N_("\
335 GNU `tar' saves many files together into a single tape or disk archive, \
336 and can restore individual files from the archive.\n\
339 tar -cf archive.tar foo bar # Create archive.tar from files foo and bar.\n\
340 tar -tvf archive.tar # List all files in archive.tar verbosely.\n\
341 tar -xf archive.tar # Extract all files from archive.tar.\n")
343 N_("The backup suffix is `~', unless set with --suffix or SIMPLE_BACKUP_SUFFIX.\n\
344 The version control may be set with --backup or VERSION_CONTROL, values are:\n\n\
345 none, off never make backups\n\
346 t, numbered make numbered backups\n\
347 nil, existing numbered if numbered backups exist, simple otherwise\n\
348 never, simple always make simple backups\n");
353 Available option letters are DEIQY and eqy. Consider the following
356 [For Solaris tar compatibility =/= Is it important at all?]
357 e exit immediately with a nonzero exit status if unexpected errors occur
358 E use extended headers (--format=posix)
360 [q alias for --occurrence=1 =/= this would better be used for quiet?]
361 [I same as T =/= will harm star compatibility]
363 y per-file gzip compression
364 Y per-block gzip compression */
366 static struct argp_option options
[] = {
369 N_("Main operation mode:"), GRID
},
372 N_("list the contents of an archive"), GRID
+1 },
373 {"extract", 'x', 0, 0,
374 N_("extract files from an archive"), GRID
+1 },
375 {"get", 0, 0, OPTION_ALIAS
, NULL
, GRID
+1 },
376 {"create", 'c', 0, 0,
377 N_("create a new archive"), GRID
+1 },
379 N_("find differences between archive and file system"), GRID
+1 },
380 {"compare", 0, 0, OPTION_ALIAS
, NULL
, GRID
+1 },
381 {"append", 'r', 0, 0,
382 N_("append files to the end of an archive"), GRID
+1 },
383 {"update", 'u', 0, 0,
384 N_("only append files newer than copy in archive"), GRID
+1 },
385 {"catenate", 'A', 0, 0,
386 N_("append tar files to an archive"), GRID
+1 },
387 {"concatenate", 0, 0, OPTION_ALIAS
, NULL
, GRID
+1 },
388 {"delete", DELETE_OPTION
, 0, 0,
389 N_("delete from the archive (not on mag tapes!)"), GRID
+1 },
390 {"test-label", TEST_LABEL_OPTION
, NULL
, 0,
391 N_("test the archive volume label and exit"), GRID
+1 },
396 N_("Operation modifiers:"), GRID
},
398 {"sparse", 'S', 0, 0,
399 N_("handle sparse files efficiently"), GRID
+1 },
400 {"sparse-version", SPARSE_VERSION_OPTION
, N_("MAJOR[.MINOR]"), 0,
401 N_("set version of the sparse format to use (implies --sparse)"), GRID
+1},
402 {"incremental", 'G', 0, 0,
403 N_("handle old GNU-format incremental backup"), GRID
+1 },
404 {"listed-incremental", 'g', N_("FILE"), 0,
405 N_("handle new GNU-format incremental backup"), GRID
+1 },
406 {"ignore-failed-read", IGNORE_FAILED_READ_OPTION
, 0, 0,
407 N_("do not exit with nonzero on unreadable files"), GRID
+1 },
408 {"occurrence", OCCURRENCE_OPTION
, N_("NUMBER"), OPTION_ARG_OPTIONAL
,
409 N_("process only the NUMBERth occurrence of each file in the archive;"
410 " this option is valid only in conjunction with one of the subcommands"
411 " --delete, --diff, --extract or --list and when a list of files"
412 " is given either on the command line or via the -T option;"
413 " NUMBER defaults to 1"), GRID
+1 },
414 {"seek", 'n', NULL
, 0,
415 N_("archive is seekable"), GRID
+1 },
416 {"no-check-device", NO_CHECK_DEVICE_OPTION
, NULL
, 0,
417 N_("do not check device numbers when creating incremental archives"),
419 {"check-device", CHECK_DEVICE_OPTION
, NULL
, 0,
420 N_("check device numbers when creating incremental archives (default)"),
426 N_("Overwrite control:"), GRID
},
428 {"verify", 'W', 0, 0,
429 N_("attempt to verify the archive after writing it"), GRID
+1 },
430 {"remove-files", REMOVE_FILES_OPTION
, 0, 0,
431 N_("remove files after adding them to the archive"), GRID
+1 },
432 {"keep-old-files", 'k', 0, 0,
433 N_("don't replace existing files when extracting"), GRID
+1 },
434 {"keep-newer-files", KEEP_NEWER_FILES_OPTION
, 0, 0,
435 N_("don't replace existing files that are newer than their archive copies"), GRID
+1 },
436 {"overwrite", OVERWRITE_OPTION
, 0, 0,
437 N_("overwrite existing files when extracting"), GRID
+1 },
438 {"unlink-first", 'U', 0, 0,
439 N_("remove each file prior to extracting over it"), GRID
+1 },
440 {"recursive-unlink", RECURSIVE_UNLINK_OPTION
, 0, 0,
441 N_("empty hierarchies prior to extracting directory"), GRID
+1 },
442 {"no-overwrite-dir", NO_OVERWRITE_DIR_OPTION
, 0, 0,
443 N_("preserve metadata of existing directories"), GRID
+1 },
444 {"overwrite-dir", OVERWRITE_DIR_OPTION
, 0, 0,
445 N_("overwrite metadata of existing directories when extracting (default)"),
451 N_("Select output stream:"), GRID
},
453 {"to-stdout", 'O', 0, 0,
454 N_("extract files to standard output"), GRID
+1 },
455 {"to-command", TO_COMMAND_OPTION
, N_("COMMAND"), 0,
456 N_("pipe extracted files to another program"), GRID
+1 },
457 {"ignore-command-error", IGNORE_COMMAND_ERROR_OPTION
, 0, 0,
458 N_("ignore exit codes of children"), GRID
+1 },
459 {"no-ignore-command-error", NO_IGNORE_COMMAND_ERROR_OPTION
, 0, 0,
460 N_("treat non-zero exit codes of children as error"), GRID
+1 },
465 N_("Handling of file attributes:"), GRID
},
467 {"owner", OWNER_OPTION
, N_("NAME"), 0,
468 N_("force NAME as owner for added files"), GRID
+1 },
469 {"group", GROUP_OPTION
, N_("NAME"), 0,
470 N_("force NAME as group for added files"), GRID
+1 },
471 {"mtime", MTIME_OPTION
, N_("DATE-OR-FILE"), 0,
472 N_("set mtime for added files from DATE-OR-FILE"), GRID
+1 },
473 {"mode", MODE_OPTION
, N_("CHANGES"), 0,
474 N_("force (symbolic) mode CHANGES for added files"), GRID
+1 },
475 {"atime-preserve", ATIME_PRESERVE_OPTION
,
476 N_("METHOD"), OPTION_ARG_OPTIONAL
,
477 N_("preserve access times on dumped files, either by restoring the times"
478 " after reading (METHOD='replace'; default) or by not setting the times"
479 " in the first place (METHOD='system')"), GRID
+1 },
481 N_("don't extract file modified time"), GRID
+1 },
482 {"same-owner", SAME_OWNER_OPTION
, 0, 0,
483 N_("try extracting files with the same ownership"), GRID
+1 },
484 {"no-same-owner", NO_SAME_OWNER_OPTION
, 0, 0,
485 N_("extract files as yourself"), GRID
+1 },
486 {"numeric-owner", NUMERIC_OWNER_OPTION
, 0, 0,
487 N_("always use numbers for user/group names"), GRID
+1 },
488 {"preserve-permissions", 'p', 0, 0,
489 N_("extract information about file permissions (default for superuser)"),
491 {"same-permissions", 0, 0, OPTION_ALIAS
, NULL
, GRID
+1 },
492 {"no-same-permissions", NO_SAME_PERMISSIONS_OPTION
, 0, 0,
493 N_("apply the user's umask when extracting permissions from the archive (default for ordinary users)"), GRID
+1 },
494 {"preserve-order", 's', 0, 0,
495 N_("sort names to extract to match archive"), GRID
+1 },
496 {"same-order", 0, 0, OPTION_ALIAS
, NULL
, GRID
+1 },
497 {"preserve", PRESERVE_OPTION
, 0, 0,
498 N_("same as both -p and -s"), GRID
+1 },
499 {"delay-directory-restore", DELAY_DIRECTORY_RESTORE_OPTION
, 0, 0,
500 N_("delay setting modification times and permissions of extracted"
501 " directories until the end of extraction"), GRID
+1 },
502 {"no-delay-directory-restore", NO_DELAY_DIRECTORY_RESTORE_OPTION
, 0, 0,
503 N_("cancel the effect of --delay-directory-restore option"), GRID
+1 },
508 N_("Device selection and switching:"), GRID
},
510 {"file", 'f', N_("ARCHIVE"), 0,
511 N_("use archive file or device ARCHIVE"), GRID
+1 },
512 {"force-local", FORCE_LOCAL_OPTION
, 0, 0,
513 N_("archive file is local even if it has a colon"), GRID
+1 },
514 {"rmt-command", RMT_COMMAND_OPTION
, N_("COMMAND"), 0,
515 N_("use given rmt COMMAND instead of rmt"), GRID
+1 },
516 {"rsh-command", RSH_COMMAND_OPTION
, N_("COMMAND"), 0,
517 N_("use remote COMMAND instead of rsh"), GRID
+1 },
519 {"-[0-7][lmh]", 0, NULL
, OPTION_DOC
, /* It is OK, since `name' will never be
521 N_("specify drive and density"), GRID
+1 },
523 {NULL
, '0', NULL
, OPTION_HIDDEN
, NULL
, GRID
+1 },
524 {NULL
, '1', NULL
, OPTION_HIDDEN
, NULL
, GRID
+1 },
525 {NULL
, '2', NULL
, OPTION_HIDDEN
, NULL
, GRID
+1 },
526 {NULL
, '3', NULL
, OPTION_HIDDEN
, NULL
, GRID
+1 },
527 {NULL
, '4', NULL
, OPTION_HIDDEN
, NULL
, GRID
+1 },
528 {NULL
, '5', NULL
, OPTION_HIDDEN
, NULL
, GRID
+1 },
529 {NULL
, '6', NULL
, OPTION_HIDDEN
, NULL
, GRID
+1 },
530 {NULL
, '7', NULL
, OPTION_HIDDEN
, NULL
, GRID
+1 },
531 {NULL
, '8', NULL
, OPTION_HIDDEN
, NULL
, GRID
+1 },
532 {NULL
, '9', NULL
, OPTION_HIDDEN
, NULL
, GRID
+1 },
534 {"multi-volume", 'M', 0, 0,
535 N_("create/list/extract multi-volume archive"), GRID
+1 },
536 {"tape-length", 'L', N_("NUMBER"), 0,
537 N_("change tape after writing NUMBER x 1024 bytes"), GRID
+1 },
538 {"info-script", 'F', N_("NAME"), 0,
539 N_("run script at end of each tape (implies -M)"), GRID
+1 },
540 {"new-volume-script", 0, 0, OPTION_ALIAS
, NULL
, GRID
+1 },
541 {"volno-file", VOLNO_FILE_OPTION
, N_("FILE"), 0,
542 N_("use/update the volume number in FILE"), GRID
+1 },
547 N_("Device blocking:"), GRID
},
549 {"blocking-factor", 'b', N_("BLOCKS"), 0,
550 N_("BLOCKS x 512 bytes per record"), GRID
+1 },
551 {"record-size", RECORD_SIZE_OPTION
, N_("NUMBER"), 0,
552 N_("NUMBER of bytes per record, multiple of 512"), GRID
+1 },
553 {"ignore-zeros", 'i', 0, 0,
554 N_("ignore zeroed blocks in archive (means EOF)"), GRID
+1 },
555 {"read-full-records", 'B', 0, 0,
556 N_("reblock as we read (for 4.2BSD pipes)"), GRID
+1 },
561 N_("Archive format selection:"), GRID
},
563 {"format", 'H', N_("FORMAT"), 0,
564 N_("create archive of the given format"), GRID
+1 },
566 {NULL
, 0, NULL
, 0, N_("FORMAT is one of the following:"), GRID
+2 },
567 {" v7", 0, NULL
, OPTION_DOC
|OPTION_NO_TRANS
, N_("old V7 tar format"),
569 {" oldgnu", 0, NULL
, OPTION_DOC
|OPTION_NO_TRANS
,
570 N_("GNU format as per tar <= 1.12"), GRID
+3 },
571 {" gnu", 0, NULL
, OPTION_DOC
|OPTION_NO_TRANS
,
572 N_("GNU tar 1.13.x format"), GRID
+3 },
573 {" ustar", 0, NULL
, OPTION_DOC
|OPTION_NO_TRANS
,
574 N_("POSIX 1003.1-1988 (ustar) format"), GRID
+3 },
575 {" pax", 0, NULL
, OPTION_DOC
|OPTION_NO_TRANS
,
576 N_("POSIX 1003.1-2001 (pax) format"), GRID
+3 },
577 {" posix", 0, NULL
, OPTION_DOC
|OPTION_NO_TRANS
, N_("same as pax"), GRID
+3 },
579 {"old-archive", OLD_ARCHIVE_OPTION
, 0, 0, /* FIXME */
580 N_("same as --format=v7"), GRID
+8 },
581 {"portability", 0, 0, OPTION_ALIAS
, NULL
, GRID
+8 },
582 {"posix", POSIX_OPTION
, 0, 0,
583 N_("same as --format=posix"), GRID
+8 },
584 {"pax-option", PAX_OPTION
, N_("keyword[[:]=value][,keyword[[:]=value]]..."), 0,
585 N_("control pax keywords"), GRID
+8 },
586 {"label", 'V', N_("TEXT"), 0,
587 N_("create archive with volume name TEXT; at list/extract time, use TEXT as a globbing pattern for volume name"), GRID
+8 },
592 N_("Compression options:"), GRID
},
593 {"auto-compress", 'a', 0, 0,
594 N_("use archive suffix to determine the compression program"), GRID
+1 },
595 {"no-auto-compress", NO_AUTO_COMPRESS_OPTION
, 0, 0,
596 N_("do not use use archive suffix to determine the compression program"),
599 N_("filter the archive through bzip2"), GRID
+1 },
601 N_("filter the archive through gzip"), GRID
+1 },
602 {"gunzip", 0, 0, OPTION_ALIAS
, NULL
, GRID
+1 },
603 {"ungzip", 0, 0, OPTION_ALIAS
, NULL
, GRID
+1 },
604 {"compress", 'Z', 0, 0,
605 N_("filter the archive through compress"), GRID
+1 },
606 {"uncompress", 0, 0, OPTION_ALIAS
, NULL
, GRID
+1 },
608 N_("filter the archive through lzma"), GRID
+1 },
609 {"use-compress-program", USE_COMPRESS_PROGRAM_OPTION
, N_("PROG"), 0,
610 N_("filter through PROG (must accept -d)"), GRID
+1 },
615 N_("Local file selection:"), GRID
},
617 {"add-file", ARGP_KEY_ARG
, N_("FILE"), 0,
618 N_("add given FILE to the archive (useful if its name starts with a dash)"), GRID
+1 },
619 {"directory", 'C', N_("DIR"), 0,
620 N_("change to directory DIR"), GRID
+1 },
621 {"files-from", 'T', N_("FILE"), 0,
622 N_("get names to extract or create from FILE"), GRID
+1 },
623 {"null", NULL_OPTION
, 0, 0,
624 N_("-T reads null-terminated names, disable -C"), GRID
+1 },
625 {"unquote", UNQUOTE_OPTION
, 0, 0,
626 N_("unquote filenames read with -T (default)"), GRID
+1 },
627 {"no-unquote", NO_UNQUOTE_OPTION
, 0, 0,
628 N_("do not unquote filenames read with -T"), GRID
+1 },
629 {"exclude", EXCLUDE_OPTION
, N_("PATTERN"), 0,
630 N_("exclude files, given as a PATTERN"), GRID
+1 },
631 {"exclude-from", 'X', N_("FILE"), 0,
632 N_("exclude patterns listed in FILE"), GRID
+1 },
633 {"exclude-caches", EXCLUDE_CACHES_OPTION
, 0, 0,
634 N_("exclude contents of directories containing CACHEDIR.TAG, "
635 "except for the tag file itself"), GRID
+1 },
636 {"exclude-caches-under", EXCLUDE_CACHES_UNDER_OPTION
, 0, 0,
637 N_("exclude everything under directories containing CACHEDIR.TAG"),
639 {"exclude-caches-all", EXCLUDE_CACHES_ALL_OPTION
, 0, 0,
640 N_("exclude directories containing CACHEDIR.TAG"), GRID
+1 },
641 {"exclude-tag", EXCLUDE_TAG_OPTION
, N_("FILE"), 0,
642 N_("exclude contents of directories containing FILE, except"
643 " for FILE itself"), GRID
+1 },
644 {"exclude-tag-under", EXCLUDE_TAG_UNDER_OPTION
, N_("FILE"), 0,
645 N_("exclude everything under directories containing FILE"), GRID
+1 },
646 {"exclude-tag-all", EXCLUDE_TAG_ALL_OPTION
, N_("FILE"), 0,
647 N_("exclude directories containing FILE"), GRID
+1 },
648 {"exclude-vcs", EXCLUDE_VCS_OPTION
, NULL
, 0,
649 N_("exclude version control system directories"), GRID
+1 },
650 {"no-recursion", NO_RECURSION_OPTION
, 0, 0,
651 N_("avoid descending automatically in directories"), GRID
+1 },
652 {"one-file-system", ONE_FILE_SYSTEM_OPTION
, 0, 0,
653 N_("stay in local file system when creating archive"), GRID
+1 },
654 {"recursion", RECURSION_OPTION
, 0, 0,
655 N_("recurse into directories (default)"), GRID
+1 },
656 {"absolute-names", 'P', 0, 0,
657 N_("don't strip leading `/'s from file names"), GRID
+1 },
658 {"dereference", 'h', 0, 0,
659 N_("follow symlinks; archive and dump the files they point to"), GRID
+1 },
660 {"hard-dereference", HARD_DEREFERENCE_OPTION
, 0, 0,
661 N_("follow hard links; archive and dump the files they refer to"), GRID
+1 },
662 {"starting-file", 'K', N_("MEMBER-NAME"), 0,
663 N_("begin at member MEMBER-NAME in the archive"), GRID
+1 },
664 {"newer", 'N', N_("DATE-OR-FILE"), 0,
665 N_("only store files newer than DATE-OR-FILE"), GRID
+1 },
666 {"after-date", 0, 0, OPTION_ALIAS
, NULL
, GRID
+1 },
667 {"newer-mtime", NEWER_MTIME_OPTION
, N_("DATE"), 0,
668 N_("compare date and time when data changed only"), GRID
+1 },
669 {"backup", BACKUP_OPTION
, N_("CONTROL"), OPTION_ARG_OPTIONAL
,
670 N_("backup before removal, choose version CONTROL"), GRID
+1 },
671 {"suffix", SUFFIX_OPTION
, N_("STRING"), 0,
672 N_("backup before removal, override usual suffix ('~' unless overridden by environment variable SIMPLE_BACKUP_SUFFIX)"), GRID
+1 },
677 N_("File name transformations:"), GRID
},
678 {"strip-components", STRIP_COMPONENTS_OPTION
, N_("NUMBER"), 0,
679 N_("strip NUMBER leading components from file names on extraction"),
681 {"transform", TRANSFORM_OPTION
, N_("EXPRESSION"), 0,
682 N_("use sed replace EXPRESSION to transform file names"), GRID
+1 },
687 N_("File name matching options (affect both exclude and include patterns):"),
689 {"ignore-case", IGNORE_CASE_OPTION
, 0, 0,
690 N_("ignore case"), GRID
+1 },
691 {"anchored", ANCHORED_OPTION
, 0, 0,
692 N_("patterns match file name start"), GRID
+1 },
693 {"no-anchored", NO_ANCHORED_OPTION
, 0, 0,
694 N_("patterns match after any `/' (default for exclusion)"), GRID
+1 },
695 {"no-ignore-case", NO_IGNORE_CASE_OPTION
, 0, 0,
696 N_("case sensitive matching (default)"), GRID
+1 },
697 {"wildcards", WILDCARDS_OPTION
, 0, 0,
698 N_("use wildcards (default for exclusion)"), GRID
+1 },
699 {"no-wildcards", NO_WILDCARDS_OPTION
, 0, 0,
700 N_("verbatim string matching"), GRID
+1 },
701 {"no-wildcards-match-slash", NO_WILDCARDS_MATCH_SLASH_OPTION
, 0, 0,
702 N_("wildcards do not match `/'"), GRID
+1 },
703 {"wildcards-match-slash", WILDCARDS_MATCH_SLASH_OPTION
, 0, 0,
704 N_("wildcards match `/' (default for exclusion)"), GRID
+1 },
709 N_("Informative output:"), GRID
},
711 {"verbose", 'v', 0, 0,
712 N_("verbosely list files processed"), GRID
+1 },
713 {"checkpoint", CHECKPOINT_OPTION
, N_("NUMBER"), OPTION_ARG_OPTIONAL
,
714 N_("display progress messages every NUMBERth record (default 10)"),
716 {"checkpoint-action", CHECKPOINT_ACTION_OPTION
, N_("ACTION"), 0,
717 N_("execute ACTION on each checkpoint"),
719 {"check-links", 'l', 0, 0,
720 N_("print a message if not all links are dumped"), GRID
+1 },
721 {"totals", TOTALS_OPTION
, N_("SIGNAL"), OPTION_ARG_OPTIONAL
,
722 N_("print total bytes after processing the archive; "
723 "with an argument - print total bytes when this SIGNAL is delivered; "
724 "Allowed signals are: SIGHUP, SIGQUIT, SIGINT, SIGUSR1 and SIGUSR2; "
725 "the names without SIG prefix are also accepted"), GRID
+1 },
726 {"utc", UTC_OPTION
, 0, 0,
727 N_("print file modification dates in UTC"), GRID
+1 },
728 {"index-file", INDEX_FILE_OPTION
, N_("FILE"), 0,
729 N_("send verbose output to FILE"), GRID
+1 },
730 {"block-number", 'R', 0, 0,
731 N_("show block number within archive with each message"), GRID
+1 },
732 {"interactive", 'w', 0, 0,
733 N_("ask for confirmation for every action"), GRID
+1 },
734 {"confirmation", 0, 0, OPTION_ALIAS
, NULL
, GRID
+1 },
735 {"show-defaults", SHOW_DEFAULTS_OPTION
, 0, 0,
736 N_("show tar defaults"), GRID
+1 },
737 {"show-omitted-dirs", SHOW_OMITTED_DIRS_OPTION
, 0, 0,
738 N_("when listing or extracting, list each directory that does not match search criteria"), GRID
+1 },
739 {"show-transformed-names", SHOW_TRANSFORMED_NAMES_OPTION
, 0, 0,
740 N_("show file or archive names after transformation"),
742 {"show-stored-names", 0, 0, OPTION_ALIAS
, NULL
, GRID
+1 },
743 {"quoting-style", QUOTING_STYLE_OPTION
, N_("STYLE"), 0,
744 N_("set name quoting style; see below for valid STYLE values"), GRID
+1 },
745 {"quote-chars", QUOTE_CHARS_OPTION
, N_("STRING"), 0,
746 N_("additionally quote characters from STRING"), GRID
+1 },
747 {"no-quote-chars", NO_QUOTE_CHARS_OPTION
, N_("STRING"), 0,
748 N_("disable quoting for characters from STRING"), GRID
+1 },
753 N_("Compatibility options:"), GRID
},
756 N_("when creating, same as --old-archive; when extracting, same as --no-same-owner"), GRID
+1 },
761 N_("Other options:"), GRID
},
763 {"restrict", RESTRICT_OPTION
, 0, 0,
764 N_("disable use of some potentially harmful options"), -1 },
766 {"help", '?', 0, 0, N_("give this help list"), -1},
767 {"usage", USAGE_OPTION
, 0, 0, N_("give a short usage message"), -1},
768 {"version", VERSION_OPTION
, 0, 0, N_("print program version"), -1},
769 /* FIXME -V (--label) conflicts with the default short option for
771 {"HANG", HANG_OPTION
, "SECS", OPTION_ARG_OPTIONAL
| OPTION_HIDDEN
,
772 N_("hang for SECS seconds (default 3600)"), 0},
778 static char const *const atime_preserve_args
[] =
780 "replace", "system", NULL
783 static enum atime_preserve
const atime_preserve_types
[] =
785 replace_atime_preserve
, system_atime_preserve
788 /* Make sure atime_preserve_types has as much entries as atime_preserve_args
789 (minus 1 for NULL guard) */
790 ARGMATCH_VERIFY (atime_preserve_args
, atime_preserve_types
);
792 /* Wildcard matching settings */
795 default_wildcards
, /* For exclusion == enable_wildcards,
796 for inclusion == disable_wildcards */
801 struct tar_args
/* Variables used during option parsing */
803 struct textual_date
*textual_date
; /* Keeps the arguments to --newer-mtime
804 and/or --date option if they are
806 enum wildcards wildcards
; /* Wildcard settings (--wildcards/
808 int matching_flags
; /* exclude_fnmatch options */
809 int include_anchored
; /* Pattern anchoring options used for
811 bool o_option
; /* True if -o option was given */
812 bool pax_option
; /* True if --pax-option was given */
813 char const *backup_suffix_string
; /* --suffix option argument */
814 char const *version_control_string
; /* --backup option argument */
815 bool input_files
; /* True if some input files where given */
816 int compress_autodetect
; /* True if compression autodetection should
817 be attempted when creating archives */
821 #define MAKE_EXCL_OPTIONS(args) \
822 ((((args)->wildcards != disable_wildcards) ? EXCLUDE_WILDCARDS : 0) \
823 | (args)->matching_flags \
826 #define MAKE_INCL_OPTIONS(args) \
827 ((((args)->wildcards == enable_wildcards) ? EXCLUDE_WILDCARDS : 0) \
828 | (args)->include_anchored \
829 | (args)->matching_flags \
836 static char *vcs_file
[] = {
868 for (i
= 0; vcs_file
[i
]; i
++)
869 add_exclude (excluded
, vcs_file
[i
], 0);
874 # define DECL_SHOW_DEFAULT_SETTINGS(stream, printer) \
877 "--format=%s -f%s -b%d --quoting-style=%s --rmt-command=%s", \
878 archive_format_string (DEFAULT_ARCHIVE_FORMAT), \
879 DEFAULT_ARCHIVE, DEFAULT_BLOCKING, \
880 quoting_style_args[DEFAULT_QUOTING_STYLE], \
881 DEFAULT_RMT_COMMAND); \
882 printer (stream, " --rsh-command=%s", REMOTE_SHELL); \
883 printer (stream, "\n"); \
886 # define DECL_SHOW_DEFAULT_SETTINGS(stream, printer) \
889 "--format=%s -f%s -b%d --quoting-style=%s --rmt-command=%s", \
890 archive_format_string (DEFAULT_ARCHIVE_FORMAT), \
891 DEFAULT_ARCHIVE, DEFAULT_BLOCKING, \
892 quoting_style_args[DEFAULT_QUOTING_STYLE], \
893 DEFAULT_RMT_COMMAND); \
894 printer (stream, "\n"); \
899 show_default_settings (FILE *fp
)
900 DECL_SHOW_DEFAULT_SETTINGS(fp
, fprintf
)
903 show_default_settings_fs (argp_fmtstream_t fs
)
904 DECL_SHOW_DEFAULT_SETTINGS(fs
, argp_fmtstream_printf
)
907 set_subcommand_option (enum subcommand subcommand
)
909 if (subcommand_option
!= UNKNOWN_SUBCOMMAND
910 && subcommand_option
!= subcommand
)
912 _("You may not specify more than one `-Acdtrux' option")));
914 subcommand_option
= subcommand
;
918 set_use_compress_program_option (const char *string
)
920 if (use_compress_program_option
921 && strcmp (use_compress_program_option
, string
) != 0)
922 USAGE_ERROR ((0, 0, _("Conflicting compression options")));
924 use_compress_program_option
= string
;
931 print_total_stats ();
932 #ifndef HAVE_SIGACTION
933 signal (signo
, sigstat
);
938 stat_on_signal (int signo
)
940 #ifdef HAVE_SIGACTION
941 struct sigaction act
;
942 act
.sa_handler
= sigstat
;
943 sigemptyset (&act
.sa_mask
);
945 sigaction (signo
, &act
, NULL
);
947 signal (signo
, sigstat
);
952 set_stat_signal (const char *name
)
959 { "SIGUSR1", SIGUSR1
},
961 { "SIGUSR2", SIGUSR2
},
963 { "SIGHUP", SIGHUP
},
965 { "SIGINT", SIGINT
},
967 { "SIGQUIT", SIGQUIT
},
972 for (p
= sigtab
; p
< sigtab
+ sizeof (sigtab
) / sizeof (sigtab
[0]); p
++)
973 if (strcmp (p
->name
, name
) == 0)
975 stat_on_signal (p
->signo
);
978 FATAL_ERROR ((0, 0, _("Unknown signal name: %s"), name
));
984 struct textual_date
*next
;
991 get_date_or_file (struct tar_args
*args
, const char *option
,
992 const char *str
, struct timespec
*ts
)
994 if (FILE_SYSTEM_PREFIX_LEN (str
) != 0
999 if (deref_stat (dereference_option
, str
, &st
) != 0)
1002 USAGE_ERROR ((0, 0, _("Date sample file not found")));
1004 *ts
= get_stat_mtime (&st
);
1008 if (! get_date (ts
, str
, NULL
))
1010 WARN ((0, 0, _("Substituting %s for unknown date format %s"),
1011 tartime (*ts
, false), quote (str
)));
1016 struct textual_date
*p
= xmalloc (sizeof (*p
));
1020 p
->next
= args
->textual_date
;
1021 args
->textual_date
= p
;
1027 report_textual_dates (struct tar_args
*args
)
1029 struct textual_date
*p
;
1030 for (p
= args
->textual_date
; p
; )
1032 struct textual_date
*next
= p
->next
;
1033 char const *treated_as
= tartime (*p
->ts
, true);
1034 if (strcmp (p
->date
, treated_as
) != 0)
1035 WARN ((0, 0, _("Option %s: Treating date `%s' as %s"),
1036 p
->option
, p
->date
, treated_as
));
1043 static volatile int _argp_hang
;
1045 /* Either NL or NUL, as decided by the --null option. */
1046 static char filename_terminator
;
1048 enum read_file_list_state
/* Result of reading file name from the list file */
1050 file_list_success
, /* OK, name read successfully */
1051 file_list_end
, /* End of list file */
1052 file_list_zero
, /* Zero separator encountered where it should not */
1053 file_list_skip
/* Empty (zero-length) entry encountered, skip it */
1056 /* Read from FP a sequence of characters up to FILENAME_TERMINATOR and put them
1059 static enum read_file_list_state
1060 read_name_from_file (FILE *fp
, struct obstack
*stk
)
1065 for (c
= getc (fp
); c
!= EOF
&& c
!= filename_terminator
; c
= getc (fp
))
1069 /* We have read a zero separator. The file possibly is
1071 return file_list_zero
;
1073 obstack_1grow (stk
, c
);
1077 if (counter
== 0 && c
!= EOF
)
1078 return file_list_skip
;
1080 obstack_1grow (stk
, 0);
1082 return (counter
== 0 && c
== EOF
) ? file_list_end
: file_list_success
;
1086 static bool files_from_option
; /* When set, tar will not refuse to create
1088 static struct obstack argv_stk
; /* Storage for additional command line options
1089 read using -T option */
1091 /* Prevent recursive inclusion of the same file */
1094 struct file_id_list
*next
;
1099 static struct file_id_list
*file_id_list
;
1102 add_file_id (const char *filename
)
1104 struct file_id_list
*p
;
1107 if (stat (filename
, &st
))
1108 stat_fatal (filename
);
1109 for (p
= file_id_list
; p
; p
= p
->next
)
1110 if (p
->ino
== st
.st_ino
&& p
->dev
== st
.st_dev
)
1112 FATAL_ERROR ((0, 0, _("%s: file list already read"),
1113 quotearg_colon (filename
)));
1115 p
= xmalloc (sizeof *p
);
1116 p
->next
= file_id_list
;
1122 /* Default density numbers for [0-9][lmh] device specifications */
1124 #ifndef LOW_DENSITY_NUM
1125 # define LOW_DENSITY_NUM 0
1128 #ifndef MID_DENSITY_NUM
1129 # define MID_DENSITY_NUM 8
1132 #ifndef HIGH_DENSITY_NUM
1133 # define HIGH_DENSITY_NUM 16
1137 update_argv (const char *filename
, struct argp_state
*state
)
1140 size_t count
= 0, i
;
1144 bool is_stdin
= false;
1145 enum read_file_list_state read_state
;
1147 if (!strcmp (filename
, "-"))
1150 request_stdin ("-T");
1155 add_file_id (filename
);
1156 if ((fp
= fopen (filename
, "r")) == NULL
)
1157 open_fatal (filename
);
1160 while ((read_state
= read_name_from_file (fp
, &argv_stk
)) != file_list_end
)
1164 case file_list_success
:
1168 case file_list_end
: /* won't happen, just to pacify gcc */
1171 case file_list_zero
:
1175 WARN ((0, 0, N_("%s: file name read contains nul character"),
1176 quotearg_colon (filename
)));
1178 /* Prepare new stack contents */
1179 size
= obstack_object_size (&argv_stk
);
1180 p
= obstack_finish (&argv_stk
);
1181 for (; size
> 0; size
--, p
++)
1183 obstack_1grow (&argv_stk
, *p
);
1185 obstack_1grow (&argv_stk
, '\n');
1186 obstack_1grow (&argv_stk
, 0);
1188 /* Read rest of files using new filename terminator */
1189 filename_terminator
= 0;
1193 case file_list_skip
:
1204 start
= obstack_finish (&argv_stk
);
1206 if (filename_terminator
== 0)
1207 for (p
= start
; *p
; p
+= strlen (p
) + 1)
1211 new_argc
= state
->argc
+ count
;
1212 new_argv
= xmalloc (sizeof (state
->argv
[0]) * (new_argc
+ 1));
1213 memcpy (new_argv
, state
->argv
, sizeof (state
->argv
[0]) * (state
->argc
+ 1));
1214 state
->argv
= new_argv
;
1215 memmove (&state
->argv
[state
->next
+ count
], &state
->argv
[state
->next
],
1216 (state
->argc
- state
->next
+ 1) * sizeof (state
->argv
[0]));
1218 state
->argc
= new_argc
;
1220 for (i
= state
->next
, p
= start
; *p
; p
+= strlen (p
) + 1, i
++)
1222 if (filename_terminator
== 0 && p
[0] == '-')
1223 state
->argv
[i
++] = "--add-file";
1230 tar_help (struct argp_state
*state
)
1232 argp_fmtstream_t fs
;
1233 state
->flags
|= ARGP_NO_EXIT
;
1234 argp_state_help (state
, state
->out_stream
,
1235 ARGP_HELP_STD_HELP
& ~ARGP_HELP_BUG_ADDR
);
1236 /* FIXME: use struct uparams.rmargin (from argp-help.c) instead of 79 */
1237 fs
= argp_make_fmtstream (state
->out_stream
, 0, 79, 0);
1239 argp_fmtstream_printf (fs
, "\n%s\n\n",
1240 _("Valid arguments for --quoting-style options are:"));
1241 tar_list_quoting_styles (fs
, " ");
1243 argp_fmtstream_puts (fs
, _("\n*This* tar defaults to:\n"));
1244 show_default_settings_fs (fs
);
1245 argp_fmtstream_putc (fs
, '\n');
1246 argp_fmtstream_printf (fs
, _("Report bugs to %s.\n"),
1247 argp_program_bug_address
);
1248 argp_fmtstream_free (fs
);
1252 parse_opt (int key
, char *arg
, struct argp_state
*state
)
1254 struct tar_args
*args
= state
->input
;
1259 /* File name or non-parsed option, because of ARGP_IN_ORDER */
1260 name_add_name (arg
, MAKE_INCL_OPTIONS (args
));
1261 args
->input_files
= true;
1265 set_subcommand_option (CAT_SUBCOMMAND
);
1269 args
->compress_autodetect
= true;
1272 case NO_AUTO_COMPRESS_OPTION
:
1273 args
->compress_autodetect
= false;
1279 if (! (xstrtoumax (arg
, 0, 10, &u
, "") == LONGINT_OK
1280 && u
== (blocking_factor
= u
)
1281 && 0 < blocking_factor
1282 && u
== (record_size
= u
* BLOCKSIZE
) / BLOCKSIZE
))
1283 USAGE_ERROR ((0, 0, "%s: %s", quotearg_colon (arg
),
1284 _("Invalid blocking factor")));
1289 /* Try to reblock input records. For reading 4.2BSD pipes. */
1291 /* It would surely make sense to exchange -B and -R, but it seems
1292 that -B has been used for a long while in Sun tar and most
1293 BSD-derived systems. This is a consequence of the block/record
1294 terminology confusion. */
1296 read_full_records_option
= true;
1300 set_subcommand_option (CREATE_SUBCOMMAND
);
1308 set_subcommand_option (DIFF_SUBCOMMAND
);
1312 if (archive_names
== allocated_archive_names
)
1313 archive_name_array
= x2nrealloc (archive_name_array
,
1314 &allocated_archive_names
,
1315 sizeof (archive_name_array
[0]));
1317 archive_name_array
[archive_names
++] = arg
;
1321 /* Since -F is only useful with -M, make it implied. Run this
1322 script at the end of each tape. */
1324 info_script_option
= arg
;
1325 multi_volume_option
= true;
1329 listed_incremental_option
= arg
;
1330 after_date_option
= true;
1334 /* We are making an incremental dump (FIXME: are we?); save
1335 directories at the beginning of the archive, and include in each
1336 directory its contents. */
1338 incremental_option
= true;
1342 /* Follow symbolic links. */
1343 dereference_option
= true;
1346 case HARD_DEREFERENCE_OPTION
:
1347 hard_dereference_option
= true;
1351 /* Ignore zero blocks (eofs). This can't be the default,
1352 because Unix tar writes two blocks of zeros, then pads out
1353 the record with garbage. */
1355 ignore_zeros_option
= true;
1360 _("Warning: the -I option is not supported;"
1361 " perhaps you meant -j or -T?")));
1365 set_use_compress_program_option ("bzip2");
1369 set_use_compress_program_option ("lzma");
1373 /* Don't replace existing files. */
1374 old_files_option
= KEEP_OLD_FILES
;
1378 starting_file_option
= true;
1382 case ONE_FILE_SYSTEM_OPTION
:
1383 /* When dumping directories, don't dump files/subdirectories
1384 that are on other filesystems. */
1385 one_file_system_option
= true;
1389 check_links_option
= 1;
1395 if (xstrtoumax (arg
, 0, 10, &u
, "") != LONGINT_OK
)
1396 USAGE_ERROR ((0, 0, "%s: %s", quotearg_colon (arg
),
1397 _("Invalid tape length")));
1398 tape_length_option
= 1024 * (tarlong
) u
;
1399 multi_volume_option
= true;
1404 touch_option
= true;
1408 /* Make multivolume archive: when we can't write any more into
1409 the archive, re-open it, and continue writing. */
1411 multi_volume_option
= true;
1415 get_date_or_file (args
, "--mtime", arg
, &mtime_option
);
1416 set_mtime_option
= true;
1420 seekable_archive
= true;
1424 after_date_option
= true;
1427 case NEWER_MTIME_OPTION
:
1428 if (NEWER_OPTION_INITIALIZED (newer_mtime_option
))
1429 USAGE_ERROR ((0, 0, _("More than one threshold date")));
1430 get_date_or_file (args
,
1431 key
== NEWER_MTIME_OPTION
? "--newer-mtime"
1432 : "--after-date", arg
, &newer_mtime_option
);
1436 args
->o_option
= true;
1440 to_stdout_option
= true;
1444 same_permissions_option
= true;
1448 absolute_names_option
= true;
1452 set_subcommand_option (APPEND_SUBCOMMAND
);
1456 /* Print block numbers for debugging bad tar archives. */
1458 /* It would surely make sense to exchange -B and -R, but it seems
1459 that -B has been used for a long while in Sun tar and most
1460 BSD-derived systems. This is a consequence of the block/record
1461 terminology confusion. */
1463 block_number_option
= true;
1467 /* Names to extract are sorted. */
1469 same_order_option
= true;
1473 sparse_option
= true;
1476 case SPARSE_VERSION_OPTION
:
1477 sparse_option
= true;
1480 tar_sparse_major
= strtoul (arg
, &p
, 10);
1484 USAGE_ERROR ((0, 0, _("Invalid sparse version value")));
1485 tar_sparse_minor
= strtoul (p
+ 1, &p
, 10);
1487 USAGE_ERROR ((0, 0, _("Invalid sparse version value")));
1493 set_subcommand_option (LIST_SUBCOMMAND
);
1497 case TEST_LABEL_OPTION
:
1498 set_subcommand_option (LIST_SUBCOMMAND
);
1499 test_label_option
= true;
1503 update_argv (arg
, state
);
1504 /* Indicate we've been given -T option. This is for backward
1505 compatibility only, so that `tar cfT archive /dev/null will
1507 files_from_option
= true;
1511 set_subcommand_option (UPDATE_SUBCOMMAND
);
1515 old_files_option
= UNLINK_FIRST_OLD_FILES
;
1527 volume_label_option
= arg
;
1531 interactive_option
= true;
1535 verify_option
= true;
1539 set_subcommand_option (EXTRACT_SUBCOMMAND
);
1543 if (add_exclude_file (add_exclude
, excluded
, arg
,
1544 MAKE_EXCL_OPTIONS (args
), '\n')
1548 FATAL_ERROR ((0, e
, "%s", quotearg_colon (arg
)));
1553 set_use_compress_program_option ("gzip");
1557 set_use_compress_program_option ("compress");
1560 case ANCHORED_OPTION
:
1561 args
->matching_flags
|= EXCLUDE_ANCHORED
;
1564 case ATIME_PRESERVE_OPTION
:
1565 atime_preserve_option
=
1567 ? XARGMATCH ("--atime-preserve", arg
,
1568 atime_preserve_args
, atime_preserve_types
)
1569 : replace_atime_preserve
);
1570 if (! O_NOATIME
&& atime_preserve_option
== system_atime_preserve
)
1572 _("--atime-preserve='system' is not supported"
1573 " on this platform")));
1576 case CHECK_DEVICE_OPTION
:
1577 check_device_option
= true;
1580 case NO_CHECK_DEVICE_OPTION
:
1581 check_device_option
= false;
1584 case CHECKPOINT_OPTION
:
1591 checkpoint_compile_action (".");
1594 checkpoint_option
= strtoul (arg
, &p
, 0);
1597 _("--checkpoint value is not an integer")));
1600 checkpoint_option
= DEFAULT_CHECKPOINT
;
1603 case CHECKPOINT_ACTION_OPTION
:
1604 checkpoint_compile_action (arg
);
1608 backup_option
= true;
1610 args
->version_control_string
= arg
;
1613 case DELAY_DIRECTORY_RESTORE_OPTION
:
1614 delay_directory_restore_option
= true;
1617 case NO_DELAY_DIRECTORY_RESTORE_OPTION
:
1618 delay_directory_restore_option
= false;
1622 set_subcommand_option (DELETE_SUBCOMMAND
);
1625 case EXCLUDE_OPTION
:
1626 add_exclude (excluded
, arg
, MAKE_EXCL_OPTIONS (args
));
1629 case EXCLUDE_CACHES_OPTION
:
1630 add_exclusion_tag ("CACHEDIR.TAG", exclusion_tag_contents
,
1634 case EXCLUDE_CACHES_UNDER_OPTION
:
1635 add_exclusion_tag ("CACHEDIR.TAG", exclusion_tag_under
,
1639 case EXCLUDE_CACHES_ALL_OPTION
:
1640 add_exclusion_tag ("CACHEDIR.TAG", exclusion_tag_all
,
1644 case EXCLUDE_TAG_OPTION
:
1645 add_exclusion_tag (arg
, exclusion_tag_contents
, NULL
);
1648 case EXCLUDE_TAG_UNDER_OPTION
:
1649 add_exclusion_tag (arg
, exclusion_tag_under
, NULL
);
1652 case EXCLUDE_TAG_ALL_OPTION
:
1653 add_exclusion_tag (arg
, exclusion_tag_all
, NULL
);
1656 case EXCLUDE_VCS_OPTION
:
1657 exclude_vcs_files ();
1660 case FORCE_LOCAL_OPTION
:
1661 force_local_option
= true;
1665 set_archive_format (arg
);
1668 case INDEX_FILE_OPTION
:
1669 index_file_name
= arg
;
1672 case IGNORE_CASE_OPTION
:
1673 args
->matching_flags
|= FNM_CASEFOLD
;
1676 case IGNORE_COMMAND_ERROR_OPTION
:
1677 ignore_command_error_option
= true;
1680 case IGNORE_FAILED_READ_OPTION
:
1681 ignore_failed_read_option
= true;
1684 case KEEP_NEWER_FILES_OPTION
:
1685 old_files_option
= KEEP_NEWER_FILES
;
1689 if (! (strlen (arg
) < GNAME_FIELD_SIZE
1690 && gname_to_gid (arg
, &group_option
)))
1693 if (xstrtoumax (arg
, 0, 10, &g
, "") == LONGINT_OK
1697 FATAL_ERROR ((0, 0, "%s: %s", quotearg_colon (arg
),
1698 _("%s: Invalid group")));
1703 mode_option
= mode_compile (arg
);
1705 FATAL_ERROR ((0, 0, _("Invalid mode given on option")));
1706 initial_umask
= umask (0);
1707 umask (initial_umask
);
1710 case NO_ANCHORED_OPTION
:
1711 args
->include_anchored
= 0; /* Clear the default for comman line args */
1712 args
->matching_flags
&= ~ EXCLUDE_ANCHORED
;
1715 case NO_IGNORE_CASE_OPTION
:
1716 args
->matching_flags
&= ~ FNM_CASEFOLD
;
1719 case NO_IGNORE_COMMAND_ERROR_OPTION
:
1720 ignore_command_error_option
= false;
1723 case NO_OVERWRITE_DIR_OPTION
:
1724 old_files_option
= NO_OVERWRITE_DIR_OLD_FILES
;
1727 case NO_QUOTE_CHARS_OPTION
:
1729 set_char_quoting (NULL
, *arg
, 0);
1732 case NO_WILDCARDS_OPTION
:
1733 args
->wildcards
= disable_wildcards
;
1736 case NO_WILDCARDS_MATCH_SLASH_OPTION
:
1737 args
->matching_flags
|= FNM_FILE_NAME
;
1741 filename_terminator
= '\0';
1744 case NUMERIC_OWNER_OPTION
:
1745 numeric_owner_option
= true;
1748 case OCCURRENCE_OPTION
:
1750 occurrence_option
= 1;
1754 if (xstrtoumax (arg
, 0, 10, &u
, "") == LONGINT_OK
)
1755 occurrence_option
= u
;
1757 FATAL_ERROR ((0, 0, "%s: %s", quotearg_colon (arg
),
1758 _("Invalid number")));
1762 case OVERWRITE_DIR_OPTION
:
1763 old_files_option
= DEFAULT_OLD_FILES
;
1766 case OVERWRITE_OPTION
:
1767 old_files_option
= OVERWRITE_OLD_FILES
;
1771 if (! (strlen (arg
) < UNAME_FIELD_SIZE
1772 && uname_to_uid (arg
, &owner_option
)))
1775 if (xstrtoumax (arg
, 0, 10, &u
, "") == LONGINT_OK
1779 FATAL_ERROR ((0, 0, "%s: %s", quotearg_colon (arg
),
1780 _("Invalid owner")));
1784 case QUOTE_CHARS_OPTION
:
1786 set_char_quoting (NULL
, *arg
, 1);
1789 case QUOTING_STYLE_OPTION
:
1790 tar_set_quoting_style (arg
);
1794 args
->pax_option
= true;
1795 xheader_set_option (arg
);
1799 set_archive_format ("posix");
1802 case PRESERVE_OPTION
:
1803 /* FIXME: What it is good for? */
1804 same_permissions_option
= true;
1805 same_order_option
= true;
1808 case RECORD_SIZE_OPTION
:
1811 if (! (xstrtoumax (arg
, 0, 10, &u
, "") == LONGINT_OK
1812 && u
== (size_t) u
))
1813 USAGE_ERROR ((0, 0, "%s: %s", quotearg_colon (arg
),
1814 _("Invalid record size")));
1816 if (record_size
% BLOCKSIZE
!= 0)
1817 USAGE_ERROR ((0, 0, _("Record size must be a multiple of %d."),
1819 blocking_factor
= record_size
/ BLOCKSIZE
;
1823 case RECURSIVE_UNLINK_OPTION
:
1824 recursive_unlink_option
= true;
1827 case REMOVE_FILES_OPTION
:
1828 remove_files_option
= true;
1831 case RESTRICT_OPTION
:
1832 restrict_option
= true;
1835 case RMT_COMMAND_OPTION
:
1839 case RSH_COMMAND_OPTION
:
1840 rsh_command_option
= arg
;
1843 case SHOW_DEFAULTS_OPTION
:
1844 show_default_settings (stdout
);
1848 case STRIP_COMPONENTS_OPTION
:
1851 if (! (xstrtoumax (arg
, 0, 10, &u
, "") == LONGINT_OK
1852 && u
== (size_t) u
))
1853 USAGE_ERROR ((0, 0, "%s: %s", quotearg_colon (arg
),
1854 _("Invalid number of elements")));
1855 strip_name_components
= u
;
1859 case SHOW_OMITTED_DIRS_OPTION
:
1860 show_omitted_dirs_option
= true;
1863 case SHOW_TRANSFORMED_NAMES_OPTION
:
1864 show_transformed_names_option
= true;
1868 backup_option
= true;
1869 args
->backup_suffix_string
= arg
;
1872 case TO_COMMAND_OPTION
:
1873 if (to_command_option
)
1874 USAGE_ERROR ((0, 0, _("Only one --to-command option allowed")));
1875 to_command_option
= arg
;
1880 set_stat_signal (arg
);
1882 totals_option
= true;
1885 case TRANSFORM_OPTION
:
1886 set_transform_expr (arg
);
1889 case USE_COMPRESS_PROGRAM_OPTION
:
1890 set_use_compress_program_option (arg
);
1893 case VOLNO_FILE_OPTION
:
1894 volno_file_option
= arg
;
1897 case WILDCARDS_OPTION
:
1898 args
->wildcards
= enable_wildcards
;
1901 case WILDCARDS_MATCH_SLASH_OPTION
:
1902 args
->matching_flags
&= ~ FNM_FILE_NAME
;
1905 case NO_RECURSION_OPTION
:
1906 recursion_option
= 0;
1909 case NO_SAME_OWNER_OPTION
:
1910 same_owner_option
= -1;
1913 case NO_SAME_PERMISSIONS_OPTION
:
1914 same_permissions_option
= -1;
1917 case RECURSION_OPTION
:
1918 recursion_option
= FNM_LEADING_DIR
;
1921 case SAME_OWNER_OPTION
:
1922 same_owner_option
= 1;
1925 case UNQUOTE_OPTION
:
1926 unquote_option
= true;
1929 case NO_UNQUOTE_OPTION
:
1930 unquote_option
= false;
1942 #ifdef DEVICE_PREFIX
1944 int device
= key
- '0';
1946 static char buf
[sizeof DEVICE_PREFIX
+ 10];
1950 argp_error (state
, _("Malformed density argument: %s"), quote (arg
));
1952 strcpy (buf
, DEVICE_PREFIX
);
1953 cursor
= buf
+ strlen (buf
);
1955 #ifdef DENSITY_LETTER
1957 sprintf (cursor
, "%d%c", device
, arg
[0]);
1959 #else /* not DENSITY_LETTER */
1964 device
+= LOW_DENSITY_NUM
;
1968 device
+= MID_DENSITY_NUM
;
1972 device
+= HIGH_DENSITY_NUM
;
1976 argp_error (state
, _("Unknown density: `%c'"), arg
[0]);
1978 sprintf (cursor
, "%d", device
);
1980 #endif /* not DENSITY_LETTER */
1982 if (archive_names
== allocated_archive_names
)
1983 archive_name_array
= x2nrealloc (archive_name_array
,
1984 &allocated_archive_names
,
1985 sizeof (archive_name_array
[0]));
1986 archive_name_array
[archive_names
++] = xstrdup (buf
);
1990 #else /* not DEVICE_PREFIX */
1993 _("Options `-[0-7][lmh]' not supported by *this* tar"));
1995 #endif /* not DEVICE_PREFIX */
2003 argp_state_help (state
, state
->out_stream
, ARGP_HELP_USAGE
);
2007 case VERSION_OPTION
:
2008 version_etc (state
->out_stream
, "tar", PACKAGE_NAME
, VERSION
,
2009 "John Gilmore", "Jay Fenlason", (char *) NULL
);
2014 _argp_hang
= atoi (arg
? arg
: "3600");
2015 while (_argp_hang
-- > 0)
2020 return ARGP_ERR_UNKNOWN
;
2025 static struct argp argp
= {
2038 argp_help (&argp
, stderr
, ARGP_HELP_SEE
, (char*) program_name
);
2043 /* Parse the options for tar. */
2045 static struct argp_option
*
2046 find_argp_option (struct argp_option
*o
, int letter
)
2053 && o
->doc
== NULL
); o
++)
2054 if (o
->key
== letter
)
2060 decode_options (int argc
, char **argv
)
2063 struct tar_args args
;
2065 /* Set some default option values. */
2066 args
.textual_date
= NULL
;
2067 args
.wildcards
= default_wildcards
;
2068 args
.matching_flags
= 0;
2069 args
.include_anchored
= EXCLUDE_ANCHORED
;
2070 args
.o_option
= false;
2071 args
.pax_option
= false;
2072 args
.backup_suffix_string
= getenv ("SIMPLE_BACKUP_SUFFIX");
2073 args
.version_control_string
= 0;
2074 args
.input_files
= false;
2075 args
.compress_autodetect
= false;
2077 subcommand_option
= UNKNOWN_SUBCOMMAND
;
2078 archive_format
= DEFAULT_FORMAT
;
2079 blocking_factor
= DEFAULT_BLOCKING
;
2080 record_size
= DEFAULT_BLOCKING
* BLOCKSIZE
;
2081 excluded
= new_exclude ();
2082 newer_mtime_option
.tv_sec
= TYPE_MINIMUM (time_t);
2083 newer_mtime_option
.tv_nsec
= -1;
2084 recursion_option
= FNM_LEADING_DIR
;
2085 unquote_option
= true;
2086 tar_sparse_major
= 1;
2087 tar_sparse_minor
= 0;
2092 check_device_option
= true;
2094 /* Convert old-style tar call by exploding option element and rearranging
2095 options accordingly. */
2097 if (argc
> 1 && argv
[1][0] != '-')
2099 int new_argc
; /* argc value for rearranged arguments */
2100 char **new_argv
; /* argv value for rearranged arguments */
2101 char *const *in
; /* cursor into original argv */
2102 char **out
; /* cursor into rearranged argv */
2103 const char *letter
; /* cursor into old option letters */
2104 char buffer
[3]; /* constructed option buffer */
2106 /* Initialize a constructed option. */
2111 /* Allocate a new argument array, and copy program name in it. */
2113 new_argc
= argc
- 1 + strlen (argv
[1]);
2114 new_argv
= xmalloc ((new_argc
+ 1) * sizeof (char *));
2119 /* Copy each old letter option as a separate option, and have the
2120 corresponding argument moved next to it. */
2122 for (letter
= *in
++; *letter
; letter
++)
2124 struct argp_option
*opt
;
2126 buffer
[1] = *letter
;
2127 *out
++ = xstrdup (buffer
);
2128 opt
= find_argp_option (options
, *letter
);
2129 if (opt
&& opt
->arg
)
2131 if (in
< argv
+ argc
)
2134 USAGE_ERROR ((0, 0, _("Old option `%c' requires an argument."),
2139 /* Copy all remaining options. */
2141 while (in
< argv
+ argc
)
2145 /* Replace the old option list by the new one. */
2151 /* Parse all options and non-options as they appear. */
2153 prepend_default_options (getenv ("TAR_OPTIONS"), &argc
, &argv
);
2155 if (argp_parse (&argp
, argc
, argv
, ARGP_IN_ORDER
|ARGP_NO_HELP
,
2157 exit (TAREXIT_FAILURE
);
2160 /* Special handling for 'o' option:
2162 GNU tar used to say "output old format".
2163 UNIX98 tar says don't chown files after extracting (we use
2164 "--no-same-owner" for this).
2166 The old GNU tar semantics is retained when used with --create
2167 option, otherwise UNIX98 semantics is assumed */
2171 if (subcommand_option
== CREATE_SUBCOMMAND
)
2173 /* GNU Tar <= 1.13 compatibility */
2174 set_archive_format ("v7");
2178 /* UNIX98 compatibility */
2179 same_owner_option
= -1;
2183 /* Handle operands after any "--" argument. */
2184 for (; idx
< argc
; idx
++)
2186 name_add_name (argv
[idx
], MAKE_INCL_OPTIONS (&args
));
2187 args
.input_files
= true;
2190 /* Warn about implicit use of the wildcards in command line arguments.
2192 warn_regex_usage
= args
.wildcards
== default_wildcards
;
2194 /* Derive option values and check option consistency. */
2196 if (archive_format
== DEFAULT_FORMAT
)
2198 if (args
.pax_option
)
2199 archive_format
= POSIX_FORMAT
;
2201 archive_format
= DEFAULT_ARCHIVE_FORMAT
;
2204 if ((volume_label_option
&& subcommand_option
== CREATE_SUBCOMMAND
)
2205 || incremental_option
2206 || multi_volume_option
2208 assert_format (FORMAT_MASK (OLDGNU_FORMAT
)
2209 | FORMAT_MASK (GNU_FORMAT
)
2210 | FORMAT_MASK (POSIX_FORMAT
));
2212 if (occurrence_option
)
2214 if (!args
.input_files
)
2216 _("--occurrence is meaningless without a file list")));
2217 if (subcommand_option
!= DELETE_SUBCOMMAND
2218 && subcommand_option
!= DIFF_SUBCOMMAND
2219 && subcommand_option
!= EXTRACT_SUBCOMMAND
2220 && subcommand_option
!= LIST_SUBCOMMAND
)
2222 _("--occurrence cannot be used in the requested operation mode")));
2225 if (seekable_archive
&& subcommand_option
== DELETE_SUBCOMMAND
)
2227 /* The current code in delete.c is based on the assumption that
2228 skip_member() reads all data from the archive. So, we should
2229 make sure it won't use seeks. On the other hand, the same code
2230 depends on the ability to backspace a record in the archive,
2231 so setting seekable_archive to false is technically incorrect.
2232 However, it is tested only in skip_member(), so it's not a
2234 seekable_archive
= false;
2237 if (archive_names
== 0)
2239 /* If no archive file name given, try TAPE from the environment, or
2240 else, DEFAULT_ARCHIVE from the configuration process. */
2243 archive_name_array
[0] = getenv ("TAPE");
2244 if (! archive_name_array
[0])
2245 archive_name_array
[0] = DEFAULT_ARCHIVE
;
2248 /* Allow multiple archives only with `-M'. */
2250 if (archive_names
> 1 && !multi_volume_option
)
2252 _("Multiple archive files require `-M' option")));
2254 if (listed_incremental_option
2255 && NEWER_OPTION_INITIALIZED (newer_mtime_option
))
2257 _("Cannot combine --listed-incremental with --newer")));
2259 if (volume_label_option
)
2261 if (archive_format
== GNU_FORMAT
|| archive_format
== OLDGNU_FORMAT
)
2263 size_t volume_label_max_len
=
2264 (sizeof current_header
->header
.name
2265 - 1 /* for trailing '\0' */
2266 - (multi_volume_option
2267 ? (sizeof " Volume "
2268 - 1 /* for null at end of " Volume " */
2269 + INT_STRLEN_BOUND (int) /* for volume number */
2270 - 1 /* for sign, as 0 <= volno */)
2272 if (volume_label_max_len
< strlen (volume_label_option
))
2274 ngettext ("%s: Volume label is too long (limit is %lu byte)",
2275 "%s: Volume label is too long (limit is %lu bytes)",
2276 volume_label_max_len
),
2277 quotearg_colon (volume_label_option
),
2278 (unsigned long) volume_label_max_len
));
2281 Label length in PAX format is limited by the volume size. */
2286 if (multi_volume_option
)
2287 USAGE_ERROR ((0, 0, _("Cannot verify multi-volume archives")));
2288 if (use_compress_program_option
)
2289 USAGE_ERROR ((0, 0, _("Cannot verify compressed archives")));
2292 if (use_compress_program_option
)
2294 if (multi_volume_option
)
2295 USAGE_ERROR ((0, 0, _("Cannot use multi-volume compressed archives")));
2296 if (subcommand_option
== UPDATE_SUBCOMMAND
2297 || subcommand_option
== APPEND_SUBCOMMAND
2298 || subcommand_option
== DELETE_SUBCOMMAND
)
2299 USAGE_ERROR ((0, 0, _("Cannot update compressed archives")));
2300 if (subcommand_option
== CAT_SUBCOMMAND
)
2301 USAGE_ERROR ((0, 0, _("Cannot concatenate compressed archives")));
2304 /* It is no harm to use --pax-option on non-pax archives in archive
2305 reading mode. It may even be useful, since it allows to override
2306 file attributes from tar headers. Therefore I allow such usage.
2309 && archive_format
!= POSIX_FORMAT
2310 && (subcommand_option
!= EXTRACT_SUBCOMMAND
2311 || subcommand_option
!= DIFF_SUBCOMMAND
2312 || subcommand_option
!= LIST_SUBCOMMAND
))
2313 USAGE_ERROR ((0, 0, _("--pax-option can be used only on POSIX archives")));
2315 /* If ready to unlink hierarchies, so we are for simpler files. */
2316 if (recursive_unlink_option
)
2317 old_files_option
= UNLINK_FIRST_OLD_FILES
;
2320 if (test_label_option
)
2322 /* --test-label is silent if the user has specified the label name to
2324 if (!args
.input_files
)
2327 else if (utc_option
)
2330 if (tape_length_option
&& tape_length_option
< record_size
)
2331 USAGE_ERROR ((0, 0, _("Volume length cannot be less than record size")));
2333 /* Forbid using -c with no input files whatsoever. Check that `-f -',
2334 explicit or implied, is used correctly. */
2336 switch (subcommand_option
)
2338 case CREATE_SUBCOMMAND
:
2339 if (!args
.input_files
&& !files_from_option
)
2341 _("Cowardly refusing to create an empty archive")));
2342 if (args
.compress_autodetect
&& archive_names
2343 && strcmp (archive_name_array
[0], "-"))
2344 set_comression_program_by_suffix (archive_name_array
[0],
2345 use_compress_program_option
);
2348 case EXTRACT_SUBCOMMAND
:
2349 case LIST_SUBCOMMAND
:
2350 case DIFF_SUBCOMMAND
:
2351 for (archive_name_cursor
= archive_name_array
;
2352 archive_name_cursor
< archive_name_array
+ archive_names
;
2353 archive_name_cursor
++)
2354 if (!strcmp (*archive_name_cursor
, "-"))
2355 request_stdin ("-f");
2358 case CAT_SUBCOMMAND
:
2359 case UPDATE_SUBCOMMAND
:
2360 case APPEND_SUBCOMMAND
:
2361 for (archive_name_cursor
= archive_name_array
;
2362 archive_name_cursor
< archive_name_array
+ archive_names
;
2363 archive_name_cursor
++)
2364 if (!strcmp (*archive_name_cursor
, "-"))
2366 _("Options `-Aru' are incompatible with `-f -'")));
2372 /* Initialize stdlis */
2373 if (index_file_name
)
2375 stdlis
= fopen (index_file_name
, "w");
2377 open_error (index_file_name
);
2380 stdlis
= to_stdout_option
? stderr
: stdout
;
2382 archive_name_cursor
= archive_name_array
;
2384 /* Prepare for generating backup names. */
2386 if (args
.backup_suffix_string
)
2387 simple_backup_suffix
= xstrdup (args
.backup_suffix_string
);
2391 backup_type
= xget_version ("--backup", args
.version_control_string
);
2392 /* No backup is needed either if explicitely disabled or if
2393 the extracted files are not being written to disk. */
2394 if (backup_type
== no_backups
|| EXTRACT_OVER_PIPE
)
2395 backup_option
= false;
2398 checkpoint_finish_compile ();
2401 report_textual_dates (&args
);
2407 /* Main routine for tar. */
2409 main (int argc
, char **argv
)
2412 program_name
= argv
[0];
2414 setlocale (LC_ALL
, "");
2415 bindtextdomain (PACKAGE
, LOCALEDIR
);
2416 textdomain (PACKAGE
);
2418 exit_failure
= TAREXIT_FAILURE
;
2419 exit_status
= TAREXIT_SUCCESS
;
2420 filename_terminator
= '\n';
2421 set_quoting_style (0, DEFAULT_QUOTING_STYLE
);
2423 /* Make sure we have first three descriptors available */
2426 /* Pre-allocate a few structures. */
2428 allocated_archive_names
= 10;
2429 archive_name_array
=
2430 xmalloc (sizeof (const char *) * allocated_archive_names
);
2433 obstack_init (&argv_stk
);
2436 /* System V fork+wait does not work if SIGCHLD is ignored. */
2437 signal (SIGCHLD
, SIG_DFL
);
2440 /* Decode options. */
2442 decode_options (argc
, argv
);
2446 /* Main command execution. */
2448 if (volno_file_option
)
2449 init_volume_number ();
2451 switch (subcommand_option
)
2453 case UNKNOWN_SUBCOMMAND
:
2455 _("You must specify one of the `-Acdtrux' options")));
2457 case CAT_SUBCOMMAND
:
2458 case UPDATE_SUBCOMMAND
:
2459 case APPEND_SUBCOMMAND
:
2463 case DELETE_SUBCOMMAND
:
2464 delete_archive_members ();
2467 case CREATE_SUBCOMMAND
:
2471 case EXTRACT_SUBCOMMAND
:
2473 read_and (extract_archive
);
2475 /* FIXME: should extract_finish () even if an ordinary signal is
2481 case LIST_SUBCOMMAND
:
2482 read_and (list_archive
);
2485 case DIFF_SUBCOMMAND
:
2487 read_and (diff_archive
);
2492 print_total_stats ();
2494 if (check_links_option
)
2497 if (volno_file_option
)
2498 closeout_volume_number ();
2500 /* Dispose of allocated memory, and return. */
2502 free (archive_name_array
);
2505 if (exit_status
== TAREXIT_FAILURE
)
2506 error (0, 0, _("Exiting with failure status due to previous errors"));
2508 if (stdlis
== stdout
)
2510 else if (ferror (stderr
) || fclose (stderr
) != 0)
2511 exit_status
= TAREXIT_FAILURE
;
2517 tar_stat_init (struct tar_stat_info
*st
)
2519 memset (st
, 0, sizeof (*st
));
2523 tar_stat_destroy (struct tar_stat_info
*st
)
2525 free (st
->orig_file_name
);
2526 free (st
->file_name
);
2527 free (st
->link_name
);
2530 free (st
->sparse_map
);
2532 xheader_destroy (&st
->xhdr
);
2533 memset (st
, 0, sizeof (*st
));
2536 /* Format mask for all available formats that support nanosecond
2537 timestamp resolution. */
2538 #define NS_PRECISION_FORMAT_MASK FORMAT_MASK (POSIX_FORMAT)
2540 /* Same as timespec_cmp, but ignore nanoseconds if current archive
2541 format does not provide sufficient resolution. */
2543 tar_timespec_cmp (struct timespec a
, struct timespec b
)
2545 if (!(FORMAT_MASK (current_format
) & NS_PRECISION_FORMAT_MASK
))
2546 a
.tv_nsec
= b
.tv_nsec
= 0;
2547 return timespec_cmp (a
, b
);