1 /* A tar (tape archiver) program.
3 Copyright 1988, 1992-1997, 1999-2001, 2003-2007, 2012-2013 Free
4 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, see <http://www.gnu.org/licenses/>. */
25 #include <argp-namefrob.h>
26 #include <argp-fmtstream.h>
27 #include <argp-version-etc.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>
45 #include <parse-datetime.h>
47 #include <rmt-command.h>
50 #include <version-etc.h>
55 /* Local declarations. */
57 #ifndef DEFAULT_ARCHIVE_FORMAT
58 # define DEFAULT_ARCHIVE_FORMAT GNU_FORMAT
61 #ifndef DEFAULT_ARCHIVE
62 # define DEFAULT_ARCHIVE "tar.out"
65 #ifndef DEFAULT_BLOCKING
66 # define DEFAULT_BLOCKING 20
69 /* Print a message if not all links are dumped */
70 static int check_links_option
;
72 /* Number of allocated tape drive names. */
73 static size_t allocated_archive_names
;
78 /* Name of option using stdin. */
79 static const char *stdin_used_by
;
81 /* Doesn't return if stdin already requested. */
83 request_stdin (const char *option
)
86 USAGE_ERROR ((0, 0, _("Options '-%s' and '-%s' both want standard input"),
87 stdin_used_by
, option
));
89 stdin_used_by
= option
;
92 extern int rpmatch (char const *response
);
94 /* Returns true if and only if the user typed an affirmative response. */
96 confirm (const char *message_action
, const char *message_name
)
98 static FILE *confirm_file
;
99 static int confirm_file_EOF
;
104 if (archive
== 0 || stdin_used_by
)
106 confirm_file
= fopen (TTY_NAME
, "r");
108 open_fatal (TTY_NAME
);
112 request_stdin ("-w");
113 confirm_file
= stdin
;
117 fprintf (stdlis
, "%s %s?", message_action
, quote (message_name
));
120 if (!confirm_file_EOF
)
122 char *response
= NULL
;
123 size_t response_size
= 0;
124 if (getline (&response
, &response_size
, confirm_file
) < 0)
125 confirm_file_EOF
= 1;
127 status
= rpmatch (response
) > 0;
131 if (confirm_file_EOF
)
133 fputc ('\n', stdlis
);
140 static struct fmttab
{
142 enum archive_format fmt
;
145 { "oldgnu", OLDGNU_FORMAT
},
146 { "ustar", USTAR_FORMAT
},
147 { "posix", POSIX_FORMAT
},
148 #if 0 /* not fully supported yet */
149 { "star", STAR_FORMAT
},
151 { "gnu", GNU_FORMAT
},
152 { "pax", POSIX_FORMAT
}, /* An alias for posix */
157 set_archive_format (char const *name
)
159 struct fmttab
const *p
;
161 for (p
= fmttab
; strcmp (p
->name
, name
) != 0; )
163 USAGE_ERROR ((0, 0, _("%s: Invalid archive format"),
164 quotearg_colon (name
)));
166 archive_format
= p
->fmt
;
170 archive_format_string (enum archive_format fmt
)
172 struct fmttab
const *p
;
174 for (p
= fmttab
; p
->name
; p
++)
180 #define FORMAT_MASK(n) (1<<(n))
183 assert_format(unsigned fmt_mask
)
185 if ((FORMAT_MASK (archive_format
) & fmt_mask
) == 0)
187 _("GNU features wanted on incompatible archive format")));
191 subcommand_string (enum subcommand c
)
195 case UNKNOWN_SUBCOMMAND
:
198 case APPEND_SUBCOMMAND
:
204 case CREATE_SUBCOMMAND
:
207 case DELETE_SUBCOMMAND
:
210 case DIFF_SUBCOMMAND
:
213 case EXTRACT_SUBCOMMAND
:
216 case LIST_SUBCOMMAND
:
219 case UPDATE_SUBCOMMAND
:
222 case TEST_LABEL_SUBCOMMAND
:
223 return "--test-label";
229 tar_list_quoting_styles (struct obstack
*stk
, char const *prefix
)
232 size_t prefixlen
= strlen (prefix
);
234 for (i
= 0; quoting_style_args
[i
]; i
++)
236 obstack_grow (stk
, prefix
, prefixlen
);
237 obstack_grow (stk
, quoting_style_args
[i
],
238 strlen (quoting_style_args
[i
]));
239 obstack_1grow (stk
, '\n');
244 tar_set_quoting_style (char *arg
)
248 for (i
= 0; quoting_style_args
[i
]; i
++)
249 if (strcmp (arg
, quoting_style_args
[i
]) == 0)
251 set_quoting_style (NULL
, i
);
255 _("Unknown quoting style '%s'. Try '%s --quoting-style=help' to get a list."), arg
, program_invocation_short_name
));
263 ACLS_OPTION
= CHAR_MAX
+ 1,
265 ATIME_PRESERVE_OPTION
,
269 CHECKPOINT_ACTION_OPTION
,
270 DELAY_DIRECTORY_RESTORE_OPTION
,
271 HARD_DEREFERENCE_OPTION
,
273 EXCLUDE_BACKUPS_OPTION
,
274 EXCLUDE_CACHES_OPTION
,
275 EXCLUDE_CACHES_UNDER_OPTION
,
276 EXCLUDE_CACHES_ALL_OPTION
,
279 EXCLUDE_TAG_UNDER_OPTION
,
280 EXCLUDE_TAG_ALL_OPTION
,
286 IGNORE_COMMAND_ERROR_OPTION
,
287 IGNORE_FAILED_READ_OPTION
,
289 KEEP_DIRECTORY_SYMLINK_OPTION
,
290 KEEP_NEWER_FILES_OPTION
,
300 NO_AUTO_COMPRESS_OPTION
,
301 NO_CHECK_DEVICE_OPTION
,
302 NO_DELAY_DIRECTORY_RESTORE_OPTION
,
303 NO_IGNORE_CASE_OPTION
,
304 NO_IGNORE_COMMAND_ERROR_OPTION
,
306 NO_OVERWRITE_DIR_OPTION
,
307 NO_QUOTE_CHARS_OPTION
,
309 NO_SAME_OWNER_OPTION
,
310 NO_SAME_PERMISSIONS_OPTION
,
312 NO_SELINUX_CONTEXT_OPTION
,
314 NO_WILDCARDS_MATCH_SLASH_OPTION
,
318 NUMERIC_OWNER_OPTION
,
321 ONE_FILE_SYSTEM_OPTION
,
322 OVERWRITE_DIR_OPTION
,
329 QUOTING_STYLE_OPTION
,
332 RECURSIVE_UNLINK_OPTION
,
338 SELINUX_CONTEXT_OPTION
,
339 SHOW_DEFAULTS_OPTION
,
340 SHOW_OMITTED_DIRS_OPTION
,
341 SHOW_SNAPSHOT_FIELD_RANGES_OPTION
,
342 SHOW_TRANSFORMED_NAMES_OPTION
,
343 SKIP_OLD_FILES_OPTION
,
344 SPARSE_VERSION_OPTION
,
345 STRIP_COMPONENTS_OPTION
,
355 WILDCARDS_MATCH_SLASH_OPTION
,
362 const char *argp_program_version
= "tar (" PACKAGE_NAME
") " VERSION
;
363 const char *argp_program_bug_address
= "<" PACKAGE_BUGREPORT
">";
364 static char const doc
[] = N_("\
365 GNU 'tar' saves many files together into a single tape or disk archive, \
366 and can restore individual files from the archive.\n\
369 tar -cf archive.tar foo bar # Create archive.tar from files foo and bar.\n\
370 tar -tvf archive.tar # List all files in archive.tar verbosely.\n\
371 tar -xf archive.tar # Extract all files from archive.tar.\n")
373 N_("The backup suffix is '~', unless set with --suffix or SIMPLE_BACKUP_SUFFIX.\n\
374 The version control may be set with --backup or VERSION_CONTROL, values are:\n\n\
375 none, off never make backups\n\
376 t, numbered make numbered backups\n\
377 nil, existing numbered if numbered backups exist, simple otherwise\n\
378 never, simple always make simple backups\n");
383 Available option letters are DEQY and eqy. Consider the following
386 [For Solaris tar compatibility =/= Is it important at all?]
387 e exit immediately with a nonzero exit status if unexpected errors occur
388 E use extended headers (--format=posix)
390 [q alias for --occurrence=1 =/= this would better be used for quiet?]
392 y per-file gzip compression
393 Y per-block gzip compression.
395 Additionally, the 'n' letter is assigned for option --seek, which
396 is probably not needed and should be marked as deprecated, so that
397 -n may become available in the future.
400 static struct argp_option options
[] = {
403 N_("Main operation mode:"), GRID
},
406 N_("list the contents of an archive"), GRID
+1 },
407 {"extract", 'x', 0, 0,
408 N_("extract files from an archive"), GRID
+1 },
409 {"get", 0, 0, OPTION_ALIAS
, NULL
, GRID
+1 },
410 {"create", 'c', 0, 0,
411 N_("create a new archive"), GRID
+1 },
413 N_("find differences between archive and file system"), GRID
+1 },
414 {"compare", 0, 0, OPTION_ALIAS
, NULL
, GRID
+1 },
415 {"append", 'r', 0, 0,
416 N_("append files to the end of an archive"), GRID
+1 },
417 {"update", 'u', 0, 0,
418 N_("only append files newer than copy in archive"), GRID
+1 },
419 {"catenate", 'A', 0, 0,
420 N_("append tar files to an archive"), GRID
+1 },
421 {"concatenate", 0, 0, OPTION_ALIAS
, NULL
, GRID
+1 },
422 {"delete", DELETE_OPTION
, 0, 0,
423 N_("delete from the archive (not on mag tapes!)"), GRID
+1 },
424 {"test-label", TEST_LABEL_OPTION
, NULL
, 0,
425 N_("test the archive volume label and exit"), GRID
+1 },
430 N_("Operation modifiers:"), GRID
},
432 {"sparse", 'S', 0, 0,
433 N_("handle sparse files efficiently"), GRID
+1 },
434 {"sparse-version", SPARSE_VERSION_OPTION
, N_("MAJOR[.MINOR]"), 0,
435 N_("set version of the sparse format to use (implies --sparse)"), GRID
+1},
436 {"incremental", 'G', 0, 0,
437 N_("handle old GNU-format incremental backup"), GRID
+1 },
438 {"listed-incremental", 'g', N_("FILE"), 0,
439 N_("handle new GNU-format incremental backup"), GRID
+1 },
440 {"level", LEVEL_OPTION
, N_("NUMBER"), 0,
441 N_("dump level for created listed-incremental archive"), GRID
+1 },
442 {"ignore-failed-read", IGNORE_FAILED_READ_OPTION
, 0, 0,
443 N_("do not exit with nonzero on unreadable files"), GRID
+1 },
444 {"occurrence", OCCURRENCE_OPTION
, N_("NUMBER"), OPTION_ARG_OPTIONAL
,
445 N_("process only the NUMBERth occurrence of each file in the archive;"
446 " this option is valid only in conjunction with one of the subcommands"
447 " --delete, --diff, --extract or --list and when a list of files"
448 " is given either on the command line or via the -T option;"
449 " NUMBER defaults to 1"), GRID
+1 },
450 {"seek", 'n', NULL
, 0,
451 N_("archive is seekable"), GRID
+1 },
452 {"no-seek", NO_SEEK_OPTION
, NULL
, 0,
453 N_("archive is not seekable"), GRID
+1 },
454 {"no-check-device", NO_CHECK_DEVICE_OPTION
, NULL
, 0,
455 N_("do not check device numbers when creating incremental archives"),
457 {"check-device", CHECK_DEVICE_OPTION
, NULL
, 0,
458 N_("check device numbers when creating incremental archives (default)"),
464 N_("Overwrite control:"), GRID
},
466 {"verify", 'W', 0, 0,
467 N_("attempt to verify the archive after writing it"), GRID
+1 },
468 {"remove-files", REMOVE_FILES_OPTION
, 0, 0,
469 N_("remove files after adding them to the archive"), GRID
+1 },
470 {"keep-old-files", 'k', 0, 0,
471 N_("don't replace existing files when extracting, "
472 "treat them as errors"), GRID
+1 },
473 {"skip-old-files", SKIP_OLD_FILES_OPTION
, 0, 0,
474 N_("don't replace existing files when extracting, silently skip over them"),
476 {"keep-newer-files", KEEP_NEWER_FILES_OPTION
, 0, 0,
477 N_("don't replace existing files that are newer than their archive copies"), GRID
+1 },
478 {"overwrite", OVERWRITE_OPTION
, 0, 0,
479 N_("overwrite existing files when extracting"), GRID
+1 },
480 {"unlink-first", 'U', 0, 0,
481 N_("remove each file prior to extracting over it"), GRID
+1 },
482 {"recursive-unlink", RECURSIVE_UNLINK_OPTION
, 0, 0,
483 N_("empty hierarchies prior to extracting directory"), GRID
+1 },
484 {"no-overwrite-dir", NO_OVERWRITE_DIR_OPTION
, 0, 0,
485 N_("preserve metadata of existing directories"), GRID
+1 },
486 {"overwrite-dir", OVERWRITE_DIR_OPTION
, 0, 0,
487 N_("overwrite metadata of existing directories when extracting (default)"),
489 {"keep-directory-symlink", KEEP_DIRECTORY_SYMLINK_OPTION
, 0, 0,
490 N_("preserve existing symlinks to directories when extracting"),
496 N_("Select output stream:"), GRID
},
498 {"to-stdout", 'O', 0, 0,
499 N_("extract files to standard output"), GRID
+1 },
500 {"to-command", TO_COMMAND_OPTION
, N_("COMMAND"), 0,
501 N_("pipe extracted files to another program"), GRID
+1 },
502 {"ignore-command-error", IGNORE_COMMAND_ERROR_OPTION
, 0, 0,
503 N_("ignore exit codes of children"), GRID
+1 },
504 {"no-ignore-command-error", NO_IGNORE_COMMAND_ERROR_OPTION
, 0, 0,
505 N_("treat non-zero exit codes of children as error"), GRID
+1 },
510 N_("Handling of file attributes:"), GRID
},
512 {"owner", OWNER_OPTION
, N_("NAME"), 0,
513 N_("force NAME as owner for added files"), GRID
+1 },
514 {"group", GROUP_OPTION
, N_("NAME"), 0,
515 N_("force NAME as group for added files"), GRID
+1 },
516 {"mtime", MTIME_OPTION
, N_("DATE-OR-FILE"), 0,
517 N_("set mtime for added files from DATE-OR-FILE"), GRID
+1 },
518 {"mode", MODE_OPTION
, N_("CHANGES"), 0,
519 N_("force (symbolic) mode CHANGES for added files"), GRID
+1 },
520 {"atime-preserve", ATIME_PRESERVE_OPTION
,
521 N_("METHOD"), OPTION_ARG_OPTIONAL
,
522 N_("preserve access times on dumped files, either by restoring the times"
523 " after reading (METHOD='replace'; default) or by not setting the times"
524 " in the first place (METHOD='system')"), GRID
+1 },
526 N_("don't extract file modified time"), GRID
+1 },
527 {"same-owner", SAME_OWNER_OPTION
, 0, 0,
528 N_("try extracting files with the same ownership as exists in the archive (default for superuser)"), GRID
+1 },
529 {"no-same-owner", NO_SAME_OWNER_OPTION
, 0, 0,
530 N_("extract files as yourself (default for ordinary users)"), GRID
+1 },
531 {"numeric-owner", NUMERIC_OWNER_OPTION
, 0, 0,
532 N_("always use numbers for user/group names"), GRID
+1 },
533 {"preserve-permissions", 'p', 0, 0,
534 N_("extract information about file permissions (default for superuser)"),
536 {"same-permissions", 0, 0, OPTION_ALIAS
, NULL
, GRID
+1 },
537 {"no-same-permissions", NO_SAME_PERMISSIONS_OPTION
, 0, 0,
538 N_("apply the user's umask when extracting permissions from the archive (default for ordinary users)"), GRID
+1 },
539 {"preserve-order", 's', 0, 0,
540 N_("member arguments are listed in the same order as the "
541 "files in the archive"), GRID
+1 },
542 {"same-order", 0, 0, OPTION_ALIAS
, NULL
, GRID
+1 },
543 {"preserve", PRESERVE_OPTION
, 0, 0,
544 N_("same as both -p and -s"), GRID
+1 },
545 {"delay-directory-restore", DELAY_DIRECTORY_RESTORE_OPTION
, 0, 0,
546 N_("delay setting modification times and permissions of extracted"
547 " directories until the end of extraction"), GRID
+1 },
548 {"no-delay-directory-restore", NO_DELAY_DIRECTORY_RESTORE_OPTION
, 0, 0,
549 N_("cancel the effect of --delay-directory-restore option"), GRID
+1 },
554 N_("Handling of extended file attributes:"), GRID
},
556 {"xattrs", XATTR_OPTION
, 0, 0,
557 N_("Enable extended attributes support"), GRID
+1 },
558 {"no-xattrs", NO_XATTR_OPTION
, 0, 0,
559 N_("Disable extended attributes support"), GRID
+1 },
560 {"xattrs-include", XATTR_INCLUDE
, N_("MASK"), 0,
561 N_("specify the include pattern for xattr keys"), GRID
+1 },
562 {"xattrs-exclude", XATTR_EXCLUDE
, N_("MASK"), 0,
563 N_("specify the exclude pattern for xattr keys"), GRID
+1 },
564 {"selinux", SELINUX_CONTEXT_OPTION
, 0, 0,
565 N_("Enable the SELinux context support"), GRID
+1 },
566 {"no-selinux", NO_SELINUX_CONTEXT_OPTION
, 0, 0,
567 N_("Disable the SELinux context support"), GRID
+1 },
568 {"acls", ACLS_OPTION
, 0, 0,
569 N_("Enable the POSIX ACLs support"), GRID
+1 },
570 {"no-acls", NO_ACLS_OPTION
, 0, 0,
571 N_("Disable the POSIX ACLs support"), GRID
+1 },
576 N_("Device selection and switching:"), GRID
},
578 {"file", 'f', N_("ARCHIVE"), 0,
579 N_("use archive file or device ARCHIVE"), GRID
+1 },
580 {"force-local", FORCE_LOCAL_OPTION
, 0, 0,
581 N_("archive file is local even if it has a colon"), GRID
+1 },
582 {"rmt-command", RMT_COMMAND_OPTION
, N_("COMMAND"), 0,
583 N_("use given rmt COMMAND instead of rmt"), GRID
+1 },
584 {"rsh-command", RSH_COMMAND_OPTION
, N_("COMMAND"), 0,
585 N_("use remote COMMAND instead of rsh"), GRID
+1 },
587 {"-[0-7][lmh]", 0, NULL
, OPTION_DOC
, /* It is OK, since 'name' will never be
589 N_("specify drive and density"), GRID
+1 },
591 {NULL
, '0', NULL
, OPTION_HIDDEN
, NULL
, GRID
+1 },
592 {NULL
, '1', NULL
, OPTION_HIDDEN
, NULL
, GRID
+1 },
593 {NULL
, '2', NULL
, OPTION_HIDDEN
, NULL
, GRID
+1 },
594 {NULL
, '3', NULL
, OPTION_HIDDEN
, NULL
, GRID
+1 },
595 {NULL
, '4', NULL
, OPTION_HIDDEN
, NULL
, GRID
+1 },
596 {NULL
, '5', NULL
, OPTION_HIDDEN
, NULL
, GRID
+1 },
597 {NULL
, '6', NULL
, OPTION_HIDDEN
, NULL
, GRID
+1 },
598 {NULL
, '7', NULL
, OPTION_HIDDEN
, NULL
, GRID
+1 },
599 {NULL
, '8', NULL
, OPTION_HIDDEN
, NULL
, GRID
+1 },
600 {NULL
, '9', NULL
, OPTION_HIDDEN
, NULL
, GRID
+1 },
602 {"multi-volume", 'M', 0, 0,
603 N_("create/list/extract multi-volume archive"), GRID
+1 },
604 {"tape-length", 'L', N_("NUMBER"), 0,
605 N_("change tape after writing NUMBER x 1024 bytes"), GRID
+1 },
606 {"info-script", 'F', N_("NAME"), 0,
607 N_("run script at end of each tape (implies -M)"), GRID
+1 },
608 {"new-volume-script", 0, 0, OPTION_ALIAS
, NULL
, GRID
+1 },
609 {"volno-file", VOLNO_FILE_OPTION
, N_("FILE"), 0,
610 N_("use/update the volume number in FILE"), GRID
+1 },
615 N_("Device blocking:"), GRID
},
617 {"blocking-factor", 'b', N_("BLOCKS"), 0,
618 N_("BLOCKS x 512 bytes per record"), GRID
+1 },
619 {"record-size", RECORD_SIZE_OPTION
, N_("NUMBER"), 0,
620 N_("NUMBER of bytes per record, multiple of 512"), GRID
+1 },
621 {"ignore-zeros", 'i', 0, 0,
622 N_("ignore zeroed blocks in archive (means EOF)"), GRID
+1 },
623 {"read-full-records", 'B', 0, 0,
624 N_("reblock as we read (for 4.2BSD pipes)"), GRID
+1 },
629 N_("Archive format selection:"), GRID
},
631 {"format", 'H', N_("FORMAT"), 0,
632 N_("create archive of the given format"), GRID
+1 },
634 {NULL
, 0, NULL
, 0, N_("FORMAT is one of the following:"), GRID
+2 },
635 {" v7", 0, NULL
, OPTION_DOC
|OPTION_NO_TRANS
, N_("old V7 tar format"),
637 {" oldgnu", 0, NULL
, OPTION_DOC
|OPTION_NO_TRANS
,
638 N_("GNU format as per tar <= 1.12"), GRID
+3 },
639 {" gnu", 0, NULL
, OPTION_DOC
|OPTION_NO_TRANS
,
640 N_("GNU tar 1.13.x format"), GRID
+3 },
641 {" ustar", 0, NULL
, OPTION_DOC
|OPTION_NO_TRANS
,
642 N_("POSIX 1003.1-1988 (ustar) format"), GRID
+3 },
643 {" pax", 0, NULL
, OPTION_DOC
|OPTION_NO_TRANS
,
644 N_("POSIX 1003.1-2001 (pax) format"), GRID
+3 },
645 {" posix", 0, NULL
, OPTION_DOC
|OPTION_NO_TRANS
, N_("same as pax"), GRID
+3 },
647 {"old-archive", OLD_ARCHIVE_OPTION
, 0, 0, /* FIXME */
648 N_("same as --format=v7"), GRID
+8 },
649 {"portability", 0, 0, OPTION_ALIAS
, NULL
, GRID
+8 },
650 {"posix", POSIX_OPTION
, 0, 0,
651 N_("same as --format=posix"), GRID
+8 },
652 {"pax-option", PAX_OPTION
, N_("keyword[[:]=value][,keyword[[:]=value]]..."), 0,
653 N_("control pax keywords"), GRID
+8 },
654 {"label", 'V', N_("TEXT"), 0,
655 N_("create archive with volume name TEXT; at list/extract time, use TEXT as a globbing pattern for volume name"), GRID
+8 },
660 N_("Compression options:"), GRID
},
661 {"auto-compress", 'a', 0, 0,
662 N_("use archive suffix to determine the compression program"), GRID
+1 },
663 {"no-auto-compress", NO_AUTO_COMPRESS_OPTION
, 0, 0,
664 N_("do not use archive suffix to determine the compression program"),
666 {"use-compress-program", 'I', N_("PROG"), 0,
667 N_("filter through PROG (must accept -d)"), GRID
+1 },
668 /* Note: docstrings for the options below are generated by tar_help_filter */
669 {"bzip2", 'j', 0, 0, NULL
, GRID
+1 },
670 {"gzip", 'z', 0, 0, NULL
, GRID
+1 },
671 {"gunzip", 0, 0, OPTION_ALIAS
, NULL
, GRID
+1 },
672 {"ungzip", 0, 0, OPTION_ALIAS
, NULL
, GRID
+1 },
673 {"compress", 'Z', 0, 0, NULL
, GRID
+1 },
674 {"uncompress", 0, 0, OPTION_ALIAS
, NULL
, GRID
+1 },
675 {"lzip", LZIP_OPTION
, 0, 0, NULL
, GRID
+1 },
676 {"lzma", LZMA_OPTION
, 0, 0, NULL
, GRID
+1 },
677 {"lzop", LZOP_OPTION
, 0, 0, NULL
, GRID
+1 },
678 {"xz", 'J', 0, 0, NULL
, GRID
+1 },
683 N_("Local file selection:"), GRID
},
685 {"add-file", ARGP_KEY_ARG
, N_("FILE"), 0,
686 N_("add given FILE to the archive (useful if its name starts with a dash)"), GRID
+1 },
687 {"directory", 'C', N_("DIR"), 0,
688 N_("change to directory DIR"), GRID
+1 },
689 {"files-from", 'T', N_("FILE"), 0,
690 N_("get names to extract or create from FILE"), GRID
+1 },
691 {"null", NULL_OPTION
, 0, 0,
692 N_("-T reads null-terminated names, disable -C"), GRID
+1 },
693 {"no-null", NO_NULL_OPTION
, 0, 0,
694 N_("disable the effect of the previous --null option"), GRID
+1 },
695 {"unquote", UNQUOTE_OPTION
, 0, 0,
696 N_("unquote filenames read with -T (default)"), GRID
+1 },
697 {"no-unquote", NO_UNQUOTE_OPTION
, 0, 0,
698 N_("do not unquote filenames read with -T"), GRID
+1 },
699 {"exclude", EXCLUDE_OPTION
, N_("PATTERN"), 0,
700 N_("exclude files, given as a PATTERN"), GRID
+1 },
701 {"exclude-from", 'X', N_("FILE"), 0,
702 N_("exclude patterns listed in FILE"), GRID
+1 },
703 {"exclude-caches", EXCLUDE_CACHES_OPTION
, 0, 0,
704 N_("exclude contents of directories containing CACHEDIR.TAG, "
705 "except for the tag file itself"), GRID
+1 },
706 {"exclude-caches-under", EXCLUDE_CACHES_UNDER_OPTION
, 0, 0,
707 N_("exclude everything under directories containing CACHEDIR.TAG"),
709 {"exclude-caches-all", EXCLUDE_CACHES_ALL_OPTION
, 0, 0,
710 N_("exclude directories containing CACHEDIR.TAG"), GRID
+1 },
711 {"exclude-tag", EXCLUDE_TAG_OPTION
, N_("FILE"), 0,
712 N_("exclude contents of directories containing FILE, except"
713 " for FILE itself"), GRID
+1 },
714 {"exclude-tag-under", EXCLUDE_TAG_UNDER_OPTION
, N_("FILE"), 0,
715 N_("exclude everything under directories containing FILE"), GRID
+1 },
716 {"exclude-tag-all", EXCLUDE_TAG_ALL_OPTION
, N_("FILE"), 0,
717 N_("exclude directories containing FILE"), GRID
+1 },
718 {"exclude-vcs", EXCLUDE_VCS_OPTION
, NULL
, 0,
719 N_("exclude version control system directories"), GRID
+1 },
720 {"exclude-backups", EXCLUDE_BACKUPS_OPTION
, NULL
, 0,
721 N_("exclude backup and lock files"), GRID
+1 },
722 {"no-recursion", NO_RECURSION_OPTION
, 0, 0,
723 N_("avoid descending automatically in directories"), GRID
+1 },
724 {"one-file-system", ONE_FILE_SYSTEM_OPTION
, 0, 0,
725 N_("stay in local file system when creating archive"), GRID
+1 },
726 {"recursion", RECURSION_OPTION
, 0, 0,
727 N_("recurse into directories (default)"), GRID
+1 },
728 {"absolute-names", 'P', 0, 0,
729 N_("don't strip leading '/'s from file names"), GRID
+1 },
730 {"dereference", 'h', 0, 0,
731 N_("follow symlinks; archive and dump the files they point to"), GRID
+1 },
732 {"hard-dereference", HARD_DEREFERENCE_OPTION
, 0, 0,
733 N_("follow hard links; archive and dump the files they refer to"), GRID
+1 },
734 {"starting-file", 'K', N_("MEMBER-NAME"), 0,
735 N_("begin at member MEMBER-NAME when reading the archive"), GRID
+1 },
736 {"newer", 'N', N_("DATE-OR-FILE"), 0,
737 N_("only store files newer than DATE-OR-FILE"), GRID
+1 },
738 {"after-date", 0, 0, OPTION_ALIAS
, NULL
, GRID
+1 },
739 {"newer-mtime", NEWER_MTIME_OPTION
, N_("DATE"), 0,
740 N_("compare date and time when data changed only"), GRID
+1 },
741 {"backup", BACKUP_OPTION
, N_("CONTROL"), OPTION_ARG_OPTIONAL
,
742 N_("backup before removal, choose version CONTROL"), GRID
+1 },
743 {"suffix", SUFFIX_OPTION
, N_("STRING"), 0,
744 N_("backup before removal, override usual suffix ('~' unless overridden by environment variable SIMPLE_BACKUP_SUFFIX)"), GRID
+1 },
749 N_("File name transformations:"), GRID
},
750 {"strip-components", STRIP_COMPONENTS_OPTION
, N_("NUMBER"), 0,
751 N_("strip NUMBER leading components from file names on extraction"),
753 {"transform", TRANSFORM_OPTION
, N_("EXPRESSION"), 0,
754 N_("use sed replace EXPRESSION to transform file names"), GRID
+1 },
755 {"xform", 0, 0, OPTION_ALIAS
, NULL
, GRID
+1 },
760 N_("File name matching options (affect both exclude and include patterns):"),
762 {"ignore-case", IGNORE_CASE_OPTION
, 0, 0,
763 N_("ignore case"), GRID
+1 },
764 {"anchored", ANCHORED_OPTION
, 0, 0,
765 N_("patterns match file name start"), GRID
+1 },
766 {"no-anchored", NO_ANCHORED_OPTION
, 0, 0,
767 N_("patterns match after any '/' (default for exclusion)"), GRID
+1 },
768 {"no-ignore-case", NO_IGNORE_CASE_OPTION
, 0, 0,
769 N_("case sensitive matching (default)"), GRID
+1 },
770 {"wildcards", WILDCARDS_OPTION
, 0, 0,
771 N_("use wildcards (default for exclusion)"), GRID
+1 },
772 {"no-wildcards", NO_WILDCARDS_OPTION
, 0, 0,
773 N_("verbatim string matching"), GRID
+1 },
774 {"no-wildcards-match-slash", NO_WILDCARDS_MATCH_SLASH_OPTION
, 0, 0,
775 N_("wildcards do not match '/'"), GRID
+1 },
776 {"wildcards-match-slash", WILDCARDS_MATCH_SLASH_OPTION
, 0, 0,
777 N_("wildcards match '/' (default for exclusion)"), GRID
+1 },
782 N_("Informative output:"), GRID
},
784 {"verbose", 'v', 0, 0,
785 N_("verbosely list files processed"), GRID
+1 },
786 {"warning", WARNING_OPTION
, N_("KEYWORD"), 0,
787 N_("warning control"), GRID
+1 },
788 {"checkpoint", CHECKPOINT_OPTION
, N_("NUMBER"), OPTION_ARG_OPTIONAL
,
789 N_("display progress messages every NUMBERth record (default 10)"),
791 {"checkpoint-action", CHECKPOINT_ACTION_OPTION
, N_("ACTION"), 0,
792 N_("execute ACTION on each checkpoint"),
794 {"check-links", 'l', 0, 0,
795 N_("print a message if not all links are dumped"), GRID
+1 },
796 {"totals", TOTALS_OPTION
, N_("SIGNAL"), OPTION_ARG_OPTIONAL
,
797 N_("print total bytes after processing the archive; "
798 "with an argument - print total bytes when this SIGNAL is delivered; "
799 "Allowed signals are: SIGHUP, SIGQUIT, SIGINT, SIGUSR1 and SIGUSR2; "
800 "the names without SIG prefix are also accepted"), GRID
+1 },
801 {"utc", UTC_OPTION
, 0, 0,
802 N_("print file modification times in UTC"), GRID
+1 },
803 {"full-time", FULL_TIME_OPTION
, 0, 0,
804 N_("print file time to its full resolution"), GRID
+1 },
805 {"index-file", INDEX_FILE_OPTION
, N_("FILE"), 0,
806 N_("send verbose output to FILE"), GRID
+1 },
807 {"block-number", 'R', 0, 0,
808 N_("show block number within archive with each message"), GRID
+1 },
809 {"interactive", 'w', 0, 0,
810 N_("ask for confirmation for every action"), GRID
+1 },
811 {"confirmation", 0, 0, OPTION_ALIAS
, NULL
, GRID
+1 },
812 {"show-defaults", SHOW_DEFAULTS_OPTION
, 0, 0,
813 N_("show tar defaults"), GRID
+1 },
814 {"show-snapshot-field-ranges", SHOW_SNAPSHOT_FIELD_RANGES_OPTION
, 0, 0,
815 N_("show valid ranges for snapshot-file fields"), GRID
+1 },
816 {"show-omitted-dirs", SHOW_OMITTED_DIRS_OPTION
, 0, 0,
817 N_("when listing or extracting, list each directory that does not match search criteria"), GRID
+1 },
818 {"show-transformed-names", SHOW_TRANSFORMED_NAMES_OPTION
, 0, 0,
819 N_("show file or archive names after transformation"),
821 {"show-stored-names", 0, 0, OPTION_ALIAS
, NULL
, GRID
+1 },
822 {"quoting-style", QUOTING_STYLE_OPTION
, N_("STYLE"), 0,
823 N_("set name quoting style; see below for valid STYLE values"), GRID
+1 },
824 {"quote-chars", QUOTE_CHARS_OPTION
, N_("STRING"), 0,
825 N_("additionally quote characters from STRING"), GRID
+1 },
826 {"no-quote-chars", NO_QUOTE_CHARS_OPTION
, N_("STRING"), 0,
827 N_("disable quoting for characters from STRING"), GRID
+1 },
832 N_("Compatibility options:"), GRID
},
835 N_("when creating, same as --old-archive; when extracting, same as --no-same-owner"), GRID
+1 },
840 N_("Other options:"), GRID
},
842 {"restrict", RESTRICT_OPTION
, 0, 0,
843 N_("disable use of some potentially harmful options"), -1 },
849 static char const *const atime_preserve_args
[] =
851 "replace", "system", NULL
854 static enum atime_preserve
const atime_preserve_types
[] =
856 replace_atime_preserve
, system_atime_preserve
859 /* Make sure atime_preserve_types has as much entries as atime_preserve_args
860 (minus 1 for NULL guard) */
861 ARGMATCH_VERIFY (atime_preserve_args
, atime_preserve_types
);
863 /* Wildcard matching settings */
866 default_wildcards
, /* For exclusion == enable_wildcards,
867 for inclusion == disable_wildcards */
872 struct tar_args
/* Variables used during option parsing */
874 struct textual_date
*textual_date
; /* Keeps the arguments to --newer-mtime
875 and/or --date option if they are
877 enum wildcards wildcards
; /* Wildcard settings (--wildcards/
879 int matching_flags
; /* exclude_fnmatch options */
880 int include_anchored
; /* Pattern anchoring options used for
882 bool o_option
; /* True if -o option was given */
883 bool pax_option
; /* True if --pax-option was given */
884 char const *backup_suffix_string
; /* --suffix option argument */
885 char const *version_control_string
; /* --backup option argument */
886 bool input_files
; /* True if some input files where given */
887 int compress_autodetect
; /* True if compression autodetection should
888 be attempted when creating archives */
892 #define MAKE_EXCL_OPTIONS(args) \
893 ((((args)->wildcards != disable_wildcards) ? EXCLUDE_WILDCARDS : 0) \
894 | (args)->matching_flags \
897 #define MAKE_INCL_OPTIONS(args) \
898 ((((args)->wildcards == enable_wildcards) ? EXCLUDE_WILDCARDS : 0) \
899 | (args)->include_anchored \
900 | (args)->matching_flags \
903 static char const * const vcs_file_table
[] = {
935 static char const * const backup_file_table
[] = {
943 add_exclude_array (char const * const * fv
, int opts
)
947 for (i
= 0; fv
[i
]; i
++)
948 add_exclude (excluded
, fv
[i
], opts
);
953 format_default_settings (void)
956 "--format=%s -f%s -b%d --quoting-style=%s --rmt-command=%s"
961 archive_format_string (DEFAULT_ARCHIVE_FORMAT
),
962 DEFAULT_ARCHIVE
, DEFAULT_BLOCKING
,
963 quoting_style_args
[DEFAULT_QUOTING_STYLE
],
973 set_subcommand_option (enum subcommand subcommand
)
975 if (subcommand_option
!= UNKNOWN_SUBCOMMAND
976 && subcommand_option
!= subcommand
)
978 _("You may not specify more than one '-Acdtrux', '--delete' or '--test-label' option")));
980 subcommand_option
= subcommand
;
984 set_use_compress_program_option (const char *string
)
986 if (use_compress_program_option
987 && strcmp (use_compress_program_option
, string
) != 0)
988 USAGE_ERROR ((0, 0, _("Conflicting compression options")));
990 use_compress_program_option
= string
;
997 print_total_stats ();
998 #ifndef HAVE_SIGACTION
999 signal (signo
, sigstat
);
1004 stat_on_signal (int signo
)
1006 #ifdef HAVE_SIGACTION
1008 # define SA_RESTART 0
1010 struct sigaction act
;
1011 act
.sa_handler
= sigstat
;
1012 sigemptyset (&act
.sa_mask
);
1013 act
.sa_flags
= SA_RESTART
;
1014 sigaction (signo
, &act
, NULL
);
1016 signal (signo
, sigstat
);
1021 set_stat_signal (const char *name
)
1023 static struct sigtab
1027 } const sigtab
[] = {
1028 { "SIGUSR1", SIGUSR1
},
1029 { "USR1", SIGUSR1
},
1030 { "SIGUSR2", SIGUSR2
},
1031 { "USR2", SIGUSR2
},
1032 { "SIGHUP", SIGHUP
},
1034 { "SIGINT", SIGINT
},
1036 { "SIGQUIT", SIGQUIT
},
1039 struct sigtab
const *p
;
1041 for (p
= sigtab
; p
< sigtab
+ sizeof (sigtab
) / sizeof (sigtab
[0]); p
++)
1042 if (strcmp (p
->name
, name
) == 0)
1044 stat_on_signal (p
->signo
);
1047 FATAL_ERROR ((0, 0, _("Unknown signal name: %s"), name
));
1053 struct textual_date
*next
;
1060 get_date_or_file (struct tar_args
*args
, const char *option
,
1061 const char *str
, struct timespec
*ts
)
1063 if (FILE_SYSTEM_PREFIX_LEN (str
) != 0
1068 if (stat (str
, &st
) != 0)
1071 USAGE_ERROR ((0, 0, _("Date sample file not found")));
1073 *ts
= get_stat_mtime (&st
);
1077 if (! parse_datetime (ts
, str
, NULL
))
1079 WARN ((0, 0, _("Substituting %s for unknown date format %s"),
1080 tartime (*ts
, false), quote (str
)));
1086 struct textual_date
*p
= xmalloc (sizeof (*p
));
1089 p
->date
= xstrdup (str
);
1090 p
->next
= args
->textual_date
;
1091 args
->textual_date
= p
;
1098 report_textual_dates (struct tar_args
*args
)
1100 struct textual_date
*p
;
1101 for (p
= args
->textual_date
; p
; )
1103 struct textual_date
*next
= p
->next
;
1106 char const *treated_as
= tartime (p
->ts
, true);
1107 if (strcmp (p
->date
, treated_as
) != 0)
1108 WARN ((0, 0, _("Option %s: Treating date '%s' as %s"),
1109 p
->option
, p
->date
, treated_as
));
1118 static bool files_from_option
; /* When set, tar will not refuse to create
1121 /* Default density numbers for [0-9][lmh] device specifications */
1123 #if defined DEVICE_PREFIX && !defined DENSITY_LETTER
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
1139 tar_help_filter (int key
, const char *text
, void *input
)
1151 s
= xasprintf (_("filter the archive through %s"), BZIP2_PROGRAM
);
1155 s
= xasprintf (_("filter the archive through %s"), GZIP_PROGRAM
);
1159 s
= xasprintf (_("filter the archive through %s"), COMPRESS_PROGRAM
);
1163 s
= xasprintf (_("filter the archive through %s"), LZIP_PROGRAM
);
1167 s
= xasprintf (_("filter the archive through %s"), LZMA_PROGRAM
);
1171 s
= xasprintf (_("filter the archive through %s"), LZOP_PROGRAM
);
1174 s
= xasprintf (_("filter the archive through %s"), XZ_PROGRAM
);
1177 case ARGP_KEY_HELP_EXTRA
:
1181 obstack_init (&stk
);
1182 tstr
= _("Valid arguments for the --quoting-style option are:");
1183 obstack_grow (&stk
, tstr
, strlen (tstr
));
1184 obstack_grow (&stk
, "\n\n", 2);
1185 tar_list_quoting_styles (&stk
, " ");
1186 tstr
= _("\n*This* tar defaults to:\n");
1187 obstack_grow (&stk
, tstr
, strlen (tstr
));
1188 s
= format_default_settings ();
1189 obstack_grow (&stk
, s
, strlen (s
));
1190 obstack_1grow (&stk
, '\n');
1191 obstack_1grow (&stk
, 0);
1192 s
= xstrdup (obstack_finish (&stk
));
1193 obstack_free (&stk
, NULL
);
1200 expand_pax_option (struct tar_args
*targs
, const char *arg
)
1205 obstack_init (&stk
);
1208 size_t seglen
= strcspn (arg
, ",");
1209 char *p
= memchr (arg
, '=', seglen
);
1212 size_t len
= p
- arg
+ 1;
1213 obstack_grow (&stk
, arg
, len
);
1215 for (++p
; *p
&& isspace ((unsigned char) *p
); p
++)
1217 if (*p
== '{' && p
[len
-1] == '}')
1220 char *tmp
= xmalloc (len
);
1221 memcpy (tmp
, p
+ 1, len
-2);
1223 if (get_date_or_file (targs
, "--pax-option", tmp
, &ts
) == 0)
1225 char buf
[TIMESPEC_STRSIZE_BOUND
];
1226 char const *s
= code_timespec (ts
, buf
);
1227 obstack_grow (&stk
, s
, strlen (s
));
1230 obstack_grow (&stk
, p
, len
);
1234 obstack_grow (&stk
, p
, len
);
1237 obstack_grow (&stk
, arg
, seglen
);
1242 obstack_1grow (&stk
, *arg
);
1246 obstack_1grow (&stk
, 0);
1247 res
= xstrdup (obstack_finish (&stk
));
1248 obstack_free (&stk
, NULL
);
1254 parse_owner_group (char *arg
, uintmax_t field_max
, char const **name_option
)
1256 uintmax_t u
= UINTMAX_MAX
;
1258 char const *name
= 0;
1259 char const *invalid_num
= 0;
1260 char *colon
= strchr (arg
, ':');
1264 char const *num
= colon
+ 1;
1268 if (num
&& (! (xstrtoumax (num
, &end
, 10, &u
, "") == LONGINT_OK
1269 && u
<= field_max
)))
1275 switch ('0' <= *arg
&& *arg
<= '9'
1276 ? xstrtoumax (arg
, &end
, 10, &u1
, "")
1284 if (u1
<= field_max
)
1290 case LONGINT_OVERFLOW
:
1297 FATAL_ERROR ((0, 0, "%s: %s", quotearg_colon (invalid_num
),
1298 _("Invalid owner or group ID")));
1300 *name_option
= name
;
1304 #define TAR_SIZE_SUFFIXES "bBcGgkKMmPTtw"
1306 /* Either NL or NUL, as decided by the --null option. */
1307 static char filename_terminator
;
1310 parse_opt (int key
, char *arg
, struct argp_state
*state
)
1312 struct tar_args
*args
= state
->input
;
1317 /* File name or non-parsed option, because of ARGP_IN_ORDER */
1318 name_add_name (arg
, MAKE_INCL_OPTIONS (args
));
1319 args
->input_files
= true;
1323 set_subcommand_option (CAT_SUBCOMMAND
);
1327 args
->compress_autodetect
= true;
1330 case NO_AUTO_COMPRESS_OPTION
:
1331 args
->compress_autodetect
= false;
1337 if (! (xstrtoumax (arg
, 0, 10, &u
, "") == LONGINT_OK
1338 && u
== (blocking_factor
= u
)
1339 && 0 < blocking_factor
1340 && u
== (record_size
= u
* BLOCKSIZE
) / BLOCKSIZE
))
1341 USAGE_ERROR ((0, 0, "%s: %s", quotearg_colon (arg
),
1342 _("Invalid blocking factor")));
1347 /* Try to reblock input records. For reading 4.2BSD pipes. */
1349 /* It would surely make sense to exchange -B and -R, but it seems
1350 that -B has been used for a long while in Sun tar and most
1351 BSD-derived systems. This is a consequence of the block/record
1352 terminology confusion. */
1354 read_full_records_option
= true;
1358 set_subcommand_option (CREATE_SUBCOMMAND
);
1366 set_subcommand_option (DIFF_SUBCOMMAND
);
1370 if (archive_names
== allocated_archive_names
)
1371 archive_name_array
= x2nrealloc (archive_name_array
,
1372 &allocated_archive_names
,
1373 sizeof (archive_name_array
[0]));
1375 archive_name_array
[archive_names
++] = arg
;
1379 /* Since -F is only useful with -M, make it implied. Run this
1380 script at the end of each tape. */
1382 info_script_option
= arg
;
1383 multi_volume_option
= true;
1386 case FULL_TIME_OPTION
:
1387 full_time_option
= true;
1391 listed_incremental_option
= arg
;
1392 after_date_option
= true;
1396 /* We are making an incremental dump (FIXME: are we?); save
1397 directories at the beginning of the archive, and include in each
1398 directory its contents. */
1400 incremental_option
= true;
1404 /* Follow symbolic links. */
1405 dereference_option
= true;
1408 case HARD_DEREFERENCE_OPTION
:
1409 hard_dereference_option
= true;
1413 /* Ignore zero blocks (eofs). This can't be the default,
1414 because Unix tar writes two blocks of zeros, then pads out
1415 the record with garbage. */
1417 ignore_zeros_option
= true;
1421 set_use_compress_program_option (BZIP2_PROGRAM
);
1425 set_use_compress_program_option (XZ_PROGRAM
);
1429 /* Don't replace existing files. */
1430 old_files_option
= KEEP_OLD_FILES
;
1434 starting_file_option
= true;
1435 addname (arg
, 0, true, NULL
);
1438 case ONE_FILE_SYSTEM_OPTION
:
1439 /* When dumping directories, don't dump files/subdirectories
1440 that are on other filesystems. */
1441 one_file_system_option
= true;
1445 check_links_option
= 1;
1453 if (xstrtoumax (arg
, &p
, 10, &u
, TAR_SIZE_SUFFIXES
) != LONGINT_OK
)
1454 USAGE_ERROR ((0, 0, "%s: %s", quotearg_colon (arg
),
1455 _("Invalid tape length")));
1456 if (p
> arg
&& !strchr (TAR_SIZE_SUFFIXES
, p
[-1]))
1457 tape_length_option
= 1024 * (tarlong
) u
;
1459 tape_length_option
= (tarlong
) u
;
1460 multi_volume_option
= true;
1467 incremental_level
= strtoul (arg
, &p
, 10);
1469 USAGE_ERROR ((0, 0, _("Invalid incremental level value")));
1474 set_use_compress_program_option (LZIP_PROGRAM
);
1478 set_use_compress_program_option (LZMA_PROGRAM
);
1482 set_use_compress_program_option (LZOP_PROGRAM
);
1486 touch_option
= true;
1490 /* Make multivolume archive: when we can't write any more into
1491 the archive, re-open it, and continue writing. */
1493 multi_volume_option
= true;
1497 get_date_or_file (args
, "--mtime", arg
, &mtime_option
);
1498 set_mtime_option
= true;
1505 case NO_SEEK_OPTION
:
1510 after_date_option
= true;
1513 case NEWER_MTIME_OPTION
:
1514 if (NEWER_OPTION_INITIALIZED (newer_mtime_option
))
1515 USAGE_ERROR ((0, 0, _("More than one threshold date")));
1516 get_date_or_file (args
,
1517 key
== NEWER_MTIME_OPTION
? "--newer-mtime"
1518 : "--after-date", arg
, &newer_mtime_option
);
1522 args
->o_option
= true;
1526 to_stdout_option
= true;
1530 same_permissions_option
= true;
1534 absolute_names_option
= true;
1538 set_subcommand_option (APPEND_SUBCOMMAND
);
1542 /* Print block numbers for debugging bad tar archives. */
1544 /* It would surely make sense to exchange -B and -R, but it seems
1545 that -B has been used for a long while in Sun tar and most
1546 BSD-derived systems. This is a consequence of the block/record
1547 terminology confusion. */
1549 block_number_option
= true;
1553 /* Names to extract are sorted. */
1555 same_order_option
= true;
1559 sparse_option
= true;
1562 case SKIP_OLD_FILES_OPTION
:
1563 old_files_option
= SKIP_OLD_FILES
;
1566 case SPARSE_VERSION_OPTION
:
1567 sparse_option
= true;
1570 tar_sparse_major
= strtoul (arg
, &p
, 10);
1574 USAGE_ERROR ((0, 0, _("Invalid sparse version value")));
1575 tar_sparse_minor
= strtoul (p
+ 1, &p
, 10);
1577 USAGE_ERROR ((0, 0, _("Invalid sparse version value")));
1583 set_subcommand_option (LIST_SUBCOMMAND
);
1587 case TEST_LABEL_OPTION
:
1588 set_subcommand_option (TEST_LABEL_SUBCOMMAND
);
1592 name_add_file (arg
, filename_terminator
);
1593 /* Indicate we've been given -T option. This is for backward
1594 compatibility only, so that `tar cfT archive /dev/null will
1596 files_from_option
= true;
1600 set_subcommand_option (UPDATE_SUBCOMMAND
);
1604 old_files_option
= UNLINK_FIRST_OLD_FILES
;
1613 warning_option
|= WARN_VERBOSE_WARNINGS
;
1617 volume_label_option
= arg
;
1621 interactive_option
= true;
1625 verify_option
= true;
1629 set_subcommand_option (EXTRACT_SUBCOMMAND
);
1633 if (add_exclude_file (add_exclude
, excluded
, arg
,
1634 MAKE_EXCL_OPTIONS (args
), '\n')
1638 FATAL_ERROR ((0, e
, "%s", quotearg_colon (arg
)));
1643 set_use_compress_program_option (GZIP_PROGRAM
);
1647 set_use_compress_program_option (COMPRESS_PROGRAM
);
1650 case ANCHORED_OPTION
:
1651 args
->matching_flags
|= EXCLUDE_ANCHORED
;
1654 case ATIME_PRESERVE_OPTION
:
1655 atime_preserve_option
=
1657 ? XARGMATCH ("--atime-preserve", arg
,
1658 atime_preserve_args
, atime_preserve_types
)
1659 : replace_atime_preserve
);
1660 if (! O_NOATIME
&& atime_preserve_option
== system_atime_preserve
)
1662 _("--atime-preserve='system' is not supported"
1663 " on this platform")));
1666 case CHECK_DEVICE_OPTION
:
1667 check_device_option
= true;
1670 case NO_CHECK_DEVICE_OPTION
:
1671 check_device_option
= false;
1674 case CHECKPOINT_OPTION
:
1681 checkpoint_compile_action (".");
1684 checkpoint_option
= strtoul (arg
, &p
, 0);
1687 _("--checkpoint value is not an integer")));
1690 checkpoint_option
= DEFAULT_CHECKPOINT
;
1693 case CHECKPOINT_ACTION_OPTION
:
1694 checkpoint_compile_action (arg
);
1698 backup_option
= true;
1700 args
->version_control_string
= arg
;
1703 case DELAY_DIRECTORY_RESTORE_OPTION
:
1704 delay_directory_restore_option
= true;
1707 case NO_DELAY_DIRECTORY_RESTORE_OPTION
:
1708 delay_directory_restore_option
= false;
1712 set_subcommand_option (DELETE_SUBCOMMAND
);
1715 case EXCLUDE_BACKUPS_OPTION
:
1716 add_exclude_array (backup_file_table
, EXCLUDE_WILDCARDS
);
1719 case EXCLUDE_OPTION
:
1720 add_exclude (excluded
, arg
, MAKE_EXCL_OPTIONS (args
));
1723 case EXCLUDE_CACHES_OPTION
:
1724 add_exclusion_tag ("CACHEDIR.TAG", exclusion_tag_contents
,
1728 case EXCLUDE_CACHES_UNDER_OPTION
:
1729 add_exclusion_tag ("CACHEDIR.TAG", exclusion_tag_under
,
1733 case EXCLUDE_CACHES_ALL_OPTION
:
1734 add_exclusion_tag ("CACHEDIR.TAG", exclusion_tag_all
,
1738 case EXCLUDE_TAG_OPTION
:
1739 add_exclusion_tag (arg
, exclusion_tag_contents
, NULL
);
1742 case EXCLUDE_TAG_UNDER_OPTION
:
1743 add_exclusion_tag (arg
, exclusion_tag_under
, NULL
);
1746 case EXCLUDE_TAG_ALL_OPTION
:
1747 add_exclusion_tag (arg
, exclusion_tag_all
, NULL
);
1750 case EXCLUDE_VCS_OPTION
:
1751 add_exclude_array (vcs_file_table
, 0);
1754 case FORCE_LOCAL_OPTION
:
1755 force_local_option
= true;
1759 set_archive_format (arg
);
1762 case INDEX_FILE_OPTION
:
1763 index_file_name
= arg
;
1766 case IGNORE_CASE_OPTION
:
1767 args
->matching_flags
|= FNM_CASEFOLD
;
1770 case IGNORE_COMMAND_ERROR_OPTION
:
1771 ignore_command_error_option
= true;
1774 case IGNORE_FAILED_READ_OPTION
:
1775 ignore_failed_read_option
= true;
1778 case KEEP_DIRECTORY_SYMLINK_OPTION
:
1779 keep_directory_symlink_option
= true;
1782 case KEEP_NEWER_FILES_OPTION
:
1783 old_files_option
= KEEP_NEWER_FILES
;
1788 uintmax_t u
= parse_owner_group (arg
, TYPE_MAXIMUM (gid_t
),
1789 &group_name_option
);
1790 if (u
== UINTMAX_MAX
)
1793 if (group_name_option
)
1794 gname_to_gid (group_name_option
, &group_option
);
1802 mode_option
= mode_compile (arg
);
1804 FATAL_ERROR ((0, 0, _("Invalid mode given on option")));
1805 initial_umask
= umask (0);
1806 umask (initial_umask
);
1809 case NO_ANCHORED_OPTION
:
1810 args
->include_anchored
= 0; /* Clear the default for comman line args */
1811 args
->matching_flags
&= ~ EXCLUDE_ANCHORED
;
1814 case NO_IGNORE_CASE_OPTION
:
1815 args
->matching_flags
&= ~ FNM_CASEFOLD
;
1818 case NO_IGNORE_COMMAND_ERROR_OPTION
:
1819 ignore_command_error_option
= false;
1822 case NO_OVERWRITE_DIR_OPTION
:
1823 old_files_option
= NO_OVERWRITE_DIR_OLD_FILES
;
1826 case NO_QUOTE_CHARS_OPTION
:
1828 set_char_quoting (NULL
, *arg
, 0);
1831 case NO_WILDCARDS_OPTION
:
1832 args
->wildcards
= disable_wildcards
;
1835 case NO_WILDCARDS_MATCH_SLASH_OPTION
:
1836 args
->matching_flags
|= FNM_FILE_NAME
;
1840 filename_terminator
= '\0';
1843 case NO_NULL_OPTION
:
1844 filename_terminator
= '\n';
1847 case NUMERIC_OWNER_OPTION
:
1848 numeric_owner_option
= true;
1851 case OCCURRENCE_OPTION
:
1853 occurrence_option
= 1;
1857 if (xstrtoumax (arg
, 0, 10, &u
, "") == LONGINT_OK
)
1858 occurrence_option
= u
;
1860 FATAL_ERROR ((0, 0, "%s: %s", quotearg_colon (arg
),
1861 _("Invalid number")));
1865 case OLD_ARCHIVE_OPTION
:
1866 set_archive_format ("v7");
1869 case OVERWRITE_DIR_OPTION
:
1870 old_files_option
= DEFAULT_OLD_FILES
;
1873 case OVERWRITE_OPTION
:
1874 old_files_option
= OVERWRITE_OLD_FILES
;
1879 uintmax_t u
= parse_owner_group (arg
, TYPE_MAXIMUM (uid_t
),
1880 &owner_name_option
);
1881 if (u
== UINTMAX_MAX
)
1884 if (owner_name_option
)
1885 uname_to_uid (owner_name_option
, &owner_option
);
1892 case QUOTE_CHARS_OPTION
:
1894 set_char_quoting (NULL
, *arg
, 1);
1897 case QUOTING_STYLE_OPTION
:
1898 tar_set_quoting_style (arg
);
1903 char *tmp
= expand_pax_option (args
, arg
);
1904 args
->pax_option
= true;
1905 xheader_set_option (tmp
);
1911 set_archive_format ("posix");
1914 case PRESERVE_OPTION
:
1915 /* FIXME: What it is good for? */
1916 same_permissions_option
= true;
1917 same_order_option
= true;
1918 WARN ((0, 0, _("The --preserve option is deprecated, "
1919 "use --preserve-permissions --preserve-order instead")));
1922 case RECORD_SIZE_OPTION
:
1926 if (! (xstrtoumax (arg
, NULL
, 10, &u
, TAR_SIZE_SUFFIXES
) == LONGINT_OK
1927 && u
== (size_t) u
))
1928 USAGE_ERROR ((0, 0, "%s: %s", quotearg_colon (arg
),
1929 _("Invalid record size")));
1931 if (record_size
% BLOCKSIZE
!= 0)
1932 USAGE_ERROR ((0, 0, _("Record size must be a multiple of %d."),
1934 blocking_factor
= record_size
/ BLOCKSIZE
;
1938 case RECURSIVE_UNLINK_OPTION
:
1939 recursive_unlink_option
= true;
1942 case REMOVE_FILES_OPTION
:
1943 remove_files_option
= true;
1946 case RESTRICT_OPTION
:
1947 restrict_option
= true;
1950 case RMT_COMMAND_OPTION
:
1954 case RSH_COMMAND_OPTION
:
1955 rsh_command_option
= arg
;
1958 case SHOW_DEFAULTS_OPTION
:
1960 char *s
= format_default_settings ();
1967 case SHOW_SNAPSHOT_FIELD_RANGES_OPTION
:
1968 show_snapshot_field_ranges ();
1972 case STRIP_COMPONENTS_OPTION
:
1975 if (! (xstrtoumax (arg
, 0, 10, &u
, "") == LONGINT_OK
1976 && u
== (size_t) u
))
1977 USAGE_ERROR ((0, 0, "%s: %s", quotearg_colon (arg
),
1978 _("Invalid number of elements")));
1979 strip_name_components
= u
;
1983 case SHOW_OMITTED_DIRS_OPTION
:
1984 show_omitted_dirs_option
= true;
1987 case SHOW_TRANSFORMED_NAMES_OPTION
:
1988 show_transformed_names_option
= true;
1992 backup_option
= true;
1993 args
->backup_suffix_string
= arg
;
1996 case TO_COMMAND_OPTION
:
1997 if (to_command_option
)
1998 USAGE_ERROR ((0, 0, _("Only one --to-command option allowed")));
1999 to_command_option
= arg
;
2004 set_stat_signal (arg
);
2006 totals_option
= true;
2009 case TRANSFORM_OPTION
:
2010 set_transform_expr (arg
);
2014 set_use_compress_program_option (arg
);
2017 case VOLNO_FILE_OPTION
:
2018 volno_file_option
= arg
;
2021 case WILDCARDS_OPTION
:
2022 args
->wildcards
= enable_wildcards
;
2025 case WILDCARDS_MATCH_SLASH_OPTION
:
2026 args
->matching_flags
&= ~ FNM_FILE_NAME
;
2029 case NO_RECURSION_OPTION
:
2030 recursion_option
= 0;
2033 case NO_SAME_OWNER_OPTION
:
2034 same_owner_option
= -1;
2037 case NO_SAME_PERMISSIONS_OPTION
:
2038 same_permissions_option
= -1;
2042 set_archive_format ("posix");
2046 case NO_ACLS_OPTION
:
2050 case SELINUX_CONTEXT_OPTION
:
2051 set_archive_format ("posix");
2052 selinux_context_option
= 1;
2055 case NO_SELINUX_CONTEXT_OPTION
:
2056 selinux_context_option
= -1;
2060 set_archive_format ("posix");
2064 case NO_XATTR_OPTION
:
2070 xattrs_mask_add (arg
, (key
== XATTR_INCLUDE
));
2073 case RECURSION_OPTION
:
2074 recursion_option
= FNM_LEADING_DIR
;
2077 case SAME_OWNER_OPTION
:
2078 same_owner_option
= 1;
2081 case UNQUOTE_OPTION
:
2082 unquote_option
= true;
2085 case NO_UNQUOTE_OPTION
:
2086 unquote_option
= false;
2089 case WARNING_OPTION
:
2090 set_warning_option (arg
);
2102 #ifdef DEVICE_PREFIX
2104 int device
= key
- '0';
2106 static char buf
[sizeof DEVICE_PREFIX
+ 10];
2110 argp_error (state
, _("Malformed density argument: %s"), quote (arg
));
2112 strcpy (buf
, DEVICE_PREFIX
);
2113 cursor
= buf
+ strlen (buf
);
2115 #ifdef DENSITY_LETTER
2117 sprintf (cursor
, "%d%c", device
, arg
[0]);
2119 #else /* not DENSITY_LETTER */
2124 device
+= LOW_DENSITY_NUM
;
2128 device
+= MID_DENSITY_NUM
;
2132 device
+= HIGH_DENSITY_NUM
;
2136 argp_error (state
, _("Unknown density: '%c'"), arg
[0]);
2138 sprintf (cursor
, "%d", device
);
2140 #endif /* not DENSITY_LETTER */
2142 if (archive_names
== allocated_archive_names
)
2143 archive_name_array
= x2nrealloc (archive_name_array
,
2144 &allocated_archive_names
,
2145 sizeof (archive_name_array
[0]));
2146 archive_name_array
[archive_names
++] = xstrdup (buf
);
2150 #else /* not DEVICE_PREFIX */
2153 _("Options '-[0-7][lmh]' not supported by *this* tar"));
2155 #endif /* not DEVICE_PREFIX */
2158 return ARGP_ERR_UNKNOWN
;
2163 static struct argp argp
= {
2176 argp_help (&argp
, stderr
, ARGP_HELP_SEE
, (char*) program_name
);
2181 /* Parse the options for tar. */
2183 static struct argp_option
*
2184 find_argp_option (struct argp_option
*o
, int letter
)
2191 && o
->doc
== NULL
); o
++)
2192 if (o
->key
== letter
)
2197 static const char *tar_authors
[] = {
2203 /* Subcommand classes */
2204 #define SUBCL_READ 0x01 /* subcommand reads from the archive */
2205 #define SUBCL_WRITE 0x02 /* subcommand writes to the archive */
2206 #define SUBCL_UPDATE 0x04 /* subcommand updates existing archive */
2207 #define SUBCL_TEST 0x08 /* subcommand tests archive header or meta-info */
2208 #define SUBCL_OCCUR 0x10 /* subcommand allows the use of the occurrence
2211 static int subcommand_class
[] = {
2212 /* UNKNOWN_SUBCOMMAND */ 0,
2213 /* APPEND_SUBCOMMAND */ SUBCL_WRITE
|SUBCL_UPDATE
,
2214 /* CAT_SUBCOMMAND */ SUBCL_WRITE
,
2215 /* CREATE_SUBCOMMAND */ SUBCL_WRITE
,
2216 /* DELETE_SUBCOMMAND */ SUBCL_WRITE
|SUBCL_UPDATE
|SUBCL_OCCUR
,
2217 /* DIFF_SUBCOMMAND */ SUBCL_READ
|SUBCL_OCCUR
,
2218 /* EXTRACT_SUBCOMMAND */ SUBCL_READ
|SUBCL_OCCUR
,
2219 /* LIST_SUBCOMMAND */ SUBCL_READ
|SUBCL_OCCUR
,
2220 /* UPDATE_SUBCOMMAND */ SUBCL_WRITE
|SUBCL_UPDATE
,
2221 /* TEST_LABEL_SUBCOMMAND */ SUBCL_TEST
2224 /* Return t if the subcommand_option is in class(es) f */
2225 #define IS_SUBCOMMAND_CLASS(f) (subcommand_class[subcommand_option] & (f))
2227 static struct tar_args args
;
2230 decode_options (int argc
, char **argv
)
2234 argp_version_setup ("tar", tar_authors
);
2236 /* Set some default option values. */
2237 args
.textual_date
= NULL
;
2238 args
.wildcards
= default_wildcards
;
2239 args
.matching_flags
= 0;
2240 args
.include_anchored
= EXCLUDE_ANCHORED
;
2241 args
.o_option
= false;
2242 args
.pax_option
= false;
2243 args
.backup_suffix_string
= getenv ("SIMPLE_BACKUP_SUFFIX");
2244 args
.version_control_string
= 0;
2245 args
.input_files
= false;
2246 args
.compress_autodetect
= false;
2248 subcommand_option
= UNKNOWN_SUBCOMMAND
;
2249 archive_format
= DEFAULT_FORMAT
;
2250 blocking_factor
= DEFAULT_BLOCKING
;
2251 record_size
= DEFAULT_BLOCKING
* BLOCKSIZE
;
2252 excluded
= new_exclude ();
2253 newer_mtime_option
.tv_sec
= TYPE_MINIMUM (time_t);
2254 newer_mtime_option
.tv_nsec
= -1;
2255 recursion_option
= FNM_LEADING_DIR
;
2256 unquote_option
= true;
2257 tar_sparse_major
= 1;
2258 tar_sparse_minor
= 0;
2260 owner_option
= -1; owner_name_option
= NULL
;
2261 group_option
= -1; group_name_option
= NULL
;
2263 check_device_option
= true;
2265 incremental_level
= -1;
2269 /* Convert old-style tar call by exploding option element and rearranging
2270 options accordingly. */
2272 if (argc
> 1 && argv
[1][0] != '-')
2274 int new_argc
; /* argc value for rearranged arguments */
2275 char **new_argv
; /* argv value for rearranged arguments */
2276 char *const *in
; /* cursor into original argv */
2277 char **out
; /* cursor into rearranged argv */
2278 const char *letter
; /* cursor into old option letters */
2279 char buffer
[3]; /* constructed option buffer */
2281 /* Initialize a constructed option. */
2286 /* Allocate a new argument array, and copy program name in it. */
2288 new_argc
= argc
- 1 + strlen (argv
[1]);
2289 new_argv
= xmalloc ((new_argc
+ 1) * sizeof (char *));
2294 /* Copy each old letter option as a separate option, and have the
2295 corresponding argument moved next to it. */
2297 for (letter
= *in
++; *letter
; letter
++)
2299 struct argp_option
*opt
;
2301 buffer
[1] = *letter
;
2302 *out
++ = xstrdup (buffer
);
2303 opt
= find_argp_option (options
, *letter
);
2304 if (opt
&& opt
->arg
)
2306 if (in
< argv
+ argc
)
2309 USAGE_ERROR ((0, 0, _("Old option '%c' requires an argument."),
2314 /* Copy all remaining options. */
2316 while (in
< argv
+ argc
)
2320 /* Replace the old option list by the new one. */
2326 /* Parse all options and non-options as they appear. */
2328 prepend_default_options (getenv ("TAR_OPTIONS"), &argc
, &argv
);
2330 if (argp_parse (&argp
, argc
, argv
, ARGP_IN_ORDER
, &idx
, &args
))
2331 exit (TAREXIT_FAILURE
);
2333 /* Special handling for 'o' option:
2335 GNU tar used to say "output old format".
2336 UNIX98 tar says don't chown files after extracting (we use
2337 "--no-same-owner" for this).
2339 The old GNU tar semantics is retained when used with --create
2340 option, otherwise UNIX98 semantics is assumed */
2344 if (subcommand_option
== CREATE_SUBCOMMAND
)
2346 /* GNU Tar <= 1.13 compatibility */
2347 set_archive_format ("v7");
2351 /* UNIX98 compatibility */
2352 same_owner_option
= -1;
2356 /* Handle operands after any "--" argument. */
2357 for (; idx
< argc
; idx
++)
2359 name_add_name (argv
[idx
], MAKE_INCL_OPTIONS (&args
));
2360 args
.input_files
= true;
2363 /* Warn about implicit use of the wildcards in command line arguments.
2365 warn_regex_usage
= args
.wildcards
== default_wildcards
;
2367 /* Derive option values and check option consistency. */
2369 if (archive_format
== DEFAULT_FORMAT
)
2371 if (args
.pax_option
)
2372 archive_format
= POSIX_FORMAT
;
2374 archive_format
= DEFAULT_ARCHIVE_FORMAT
;
2377 if ((volume_label_option
&& subcommand_option
== CREATE_SUBCOMMAND
)
2378 || incremental_option
2379 || multi_volume_option
2381 assert_format (FORMAT_MASK (OLDGNU_FORMAT
)
2382 | FORMAT_MASK (GNU_FORMAT
)
2383 | FORMAT_MASK (POSIX_FORMAT
));
2385 if (occurrence_option
)
2387 if (!args
.input_files
)
2389 _("--occurrence is meaningless without a file list")));
2390 if (!IS_SUBCOMMAND_CLASS (SUBCL_OCCUR
))
2392 _("--occurrence cannot be used with %s"),
2393 subcommand_string (subcommand_option
)));
2396 if (archive_names
== 0)
2398 /* If no archive file name given, try TAPE from the environment, or
2399 else, DEFAULT_ARCHIVE from the configuration process. */
2402 archive_name_array
[0] = getenv ("TAPE");
2403 if (! archive_name_array
[0])
2404 archive_name_array
[0] = DEFAULT_ARCHIVE
;
2407 /* Allow multiple archives only with '-M'. */
2409 if (archive_names
> 1 && !multi_volume_option
)
2411 _("Multiple archive files require '-M' option")));
2413 if (listed_incremental_option
2414 && NEWER_OPTION_INITIALIZED (newer_mtime_option
))
2416 _("Cannot combine --listed-incremental with --newer")));
2417 if (incremental_level
!= -1 && !listed_incremental_option
)
2419 _("--level is meaningless without --listed-incremental")));
2421 if (volume_label_option
)
2423 if (archive_format
== GNU_FORMAT
|| archive_format
== OLDGNU_FORMAT
)
2425 size_t volume_label_max_len
=
2426 (sizeof current_header
->header
.name
2427 - 1 /* for trailing '\0' */
2428 - (multi_volume_option
2429 ? (sizeof " Volume "
2430 - 1 /* for null at end of " Volume " */
2431 + INT_STRLEN_BOUND (int) /* for volume number */
2432 - 1 /* for sign, as 0 <= volno */)
2434 if (volume_label_max_len
< strlen (volume_label_option
))
2436 ngettext ("%s: Volume label is too long (limit is %lu byte)",
2437 "%s: Volume label is too long (limit is %lu bytes)",
2438 volume_label_max_len
),
2439 quotearg_colon (volume_label_option
),
2440 (unsigned long) volume_label_max_len
));
2443 Label length in PAX format is limited by the volume size. */
2448 if (multi_volume_option
)
2449 USAGE_ERROR ((0, 0, _("Cannot verify multi-volume archives")));
2450 if (use_compress_program_option
)
2451 USAGE_ERROR ((0, 0, _("Cannot verify compressed archives")));
2452 if (!IS_SUBCOMMAND_CLASS (SUBCL_WRITE
))
2453 USAGE_ERROR ((0, 0, _("--verify cannot be used with %s"),
2454 subcommand_string (subcommand_option
)));
2457 if (use_compress_program_option
)
2459 if (multi_volume_option
)
2460 USAGE_ERROR ((0, 0, _("Cannot use multi-volume compressed archives")));
2461 if (IS_SUBCOMMAND_CLASS (SUBCL_UPDATE
))
2462 USAGE_ERROR ((0, 0, _("Cannot update compressed archives")));
2463 if (subcommand_option
== CAT_SUBCOMMAND
)
2464 USAGE_ERROR ((0, 0, _("Cannot concatenate compressed archives")));
2467 /* It is no harm to use --pax-option on non-pax archives in archive
2468 reading mode. It may even be useful, since it allows to override
2469 file attributes from tar headers. Therefore I allow such usage.
2472 && archive_format
!= POSIX_FORMAT
2473 && !IS_SUBCOMMAND_CLASS (SUBCL_READ
))
2474 USAGE_ERROR ((0, 0, _("--pax-option can be used only on POSIX archives")));
2476 /* star creates non-POSIX typed archives with xattr support, so allow the
2477 extra headers when reading */
2478 if ((acls_option
> 0)
2479 && archive_format
!= POSIX_FORMAT
2480 && !IS_SUBCOMMAND_CLASS (SUBCL_READ
))
2481 USAGE_ERROR ((0, 0, _("--acls can be used only on POSIX archives")));
2483 if ((selinux_context_option
> 0)
2484 && archive_format
!= POSIX_FORMAT
2485 && !IS_SUBCOMMAND_CLASS (SUBCL_READ
))
2486 USAGE_ERROR ((0, 0, _("--selinux can be used only on POSIX archives")));
2488 if ((xattrs_option
> 0)
2489 && archive_format
!= POSIX_FORMAT
2490 && !IS_SUBCOMMAND_CLASS (SUBCL_READ
))
2491 USAGE_ERROR ((0, 0, _("--xattrs can be used only on POSIX archives")));
2493 if ((starting_file_option
|| same_order_option
)
2494 && !IS_SUBCOMMAND_CLASS (SUBCL_READ
))
2496 _("--%s option cannot be used with %s"),
2497 starting_file_option
? "starting-file" : "same-order",
2498 subcommand_string (subcommand_option
)));
2500 /* If ready to unlink hierarchies, so we are for simpler files. */
2501 if (recursive_unlink_option
)
2502 old_files_option
= UNLINK_FIRST_OLD_FILES
;
2504 /* Flags for accessing files to be read from or copied into. POSIX says
2505 O_NONBLOCK has unspecified effect on most types of files, but in
2506 practice it never harms and sometimes helps. */
2508 int base_open_flags
=
2509 (O_BINARY
| O_CLOEXEC
| O_NOCTTY
| O_NONBLOCK
2510 | (dereference_option
? 0 : O_NOFOLLOW
)
2511 | (atime_preserve_option
== system_atime_preserve
? O_NOATIME
: 0));
2512 open_read_flags
= O_RDONLY
| base_open_flags
;
2513 open_searchdir_flags
= O_SEARCH
| O_DIRECTORY
| base_open_flags
;
2515 fstatat_flags
= dereference_option
? 0 : AT_SYMLINK_NOFOLLOW
;
2517 if (subcommand_option
== TEST_LABEL_SUBCOMMAND
)
2519 /* --test-label is silent if the user has specified the label name to
2521 if (!args
.input_files
)
2524 else if (utc_option
)
2527 if (tape_length_option
&& tape_length_option
< record_size
)
2528 USAGE_ERROR ((0, 0, _("Volume length cannot be less than record size")));
2530 if (same_order_option
&& listed_incremental_option
)
2531 USAGE_ERROR ((0, 0, _("--preserve-order is not compatible with "
2532 "--listed-incremental")));
2534 /* Forbid using -c with no input files whatsoever. Check that '-f -',
2535 explicit or implied, is used correctly. */
2537 switch (subcommand_option
)
2539 case CREATE_SUBCOMMAND
:
2540 if (!args
.input_files
&& !files_from_option
)
2542 _("Cowardly refusing to create an empty archive")));
2543 if (args
.compress_autodetect
&& archive_names
2544 && strcmp (archive_name_array
[0], "-"))
2545 set_compression_program_by_suffix (archive_name_array
[0],
2546 use_compress_program_option
);
2549 case EXTRACT_SUBCOMMAND
:
2550 case LIST_SUBCOMMAND
:
2551 case DIFF_SUBCOMMAND
:
2552 case TEST_LABEL_SUBCOMMAND
:
2553 for (archive_name_cursor
= archive_name_array
;
2554 archive_name_cursor
< archive_name_array
+ archive_names
;
2555 archive_name_cursor
++)
2556 if (!strcmp (*archive_name_cursor
, "-"))
2557 request_stdin ("-f");
2560 case CAT_SUBCOMMAND
:
2561 case UPDATE_SUBCOMMAND
:
2562 case APPEND_SUBCOMMAND
:
2563 for (archive_name_cursor
= archive_name_array
;
2564 archive_name_cursor
< archive_name_array
+ archive_names
;
2565 archive_name_cursor
++)
2566 if (!strcmp (*archive_name_cursor
, "-"))
2568 _("Options '-Aru' are incompatible with '-f -'")));
2574 /* Initialize stdlis */
2575 if (index_file_name
)
2577 stdlis
= fopen (index_file_name
, "w");
2579 open_fatal (index_file_name
);
2582 stdlis
= to_stdout_option
? stderr
: stdout
;
2584 archive_name_cursor
= archive_name_array
;
2586 /* Prepare for generating backup names. */
2588 if (args
.backup_suffix_string
)
2589 simple_backup_suffix
= xstrdup (args
.backup_suffix_string
);
2593 backup_type
= xget_version ("--backup", args
.version_control_string
);
2594 /* No backup is needed either if explicitely disabled or if
2595 the extracted files are not being written to disk. */
2596 if (backup_type
== no_backups
|| EXTRACT_OVER_PIPE
)
2597 backup_option
= false;
2600 checkpoint_finish_compile ();
2602 report_textual_dates (&args
);
2606 more_options (int argc
, char **argv
)
2609 if (argp_parse (&argp
, argc
, argv
, ARGP_IN_ORDER
,
2611 exit (TAREXIT_FAILURE
);
2616 /* Main routine for tar. */
2618 main (int argc
, char **argv
)
2621 set_program_name (argv
[0]);
2623 setlocale (LC_ALL
, "");
2624 bindtextdomain (PACKAGE
, LOCALEDIR
);
2625 textdomain (PACKAGE
);
2627 exit_failure
= TAREXIT_FAILURE
;
2628 exit_status
= TAREXIT_SUCCESS
;
2629 error_hook
= checkpoint_flush_actions
;
2631 filename_terminator
= '\n';
2632 set_quoting_style (0, DEFAULT_QUOTING_STYLE
);
2634 /* Make sure we have first three descriptors available */
2637 /* Pre-allocate a few structures. */
2639 allocated_archive_names
= 10;
2640 archive_name_array
=
2641 xmalloc (sizeof (const char *) * allocated_archive_names
);
2644 /* System V fork+wait does not work if SIGCHLD is ignored. */
2645 signal (SIGCHLD
, SIG_DFL
);
2647 /* Try to disable the ability to unlink a directory. */
2648 priv_set_remove_linkdir ();
2650 /* Decode options. */
2652 decode_options (argc
, argv
);
2656 /* Main command execution. */
2658 if (volno_file_option
)
2659 init_volume_number ();
2661 switch (subcommand_option
)
2663 case UNKNOWN_SUBCOMMAND
:
2665 _("You must specify one of the '-Acdtrux', '--delete' or '--test-label' options")));
2667 case CAT_SUBCOMMAND
:
2668 case UPDATE_SUBCOMMAND
:
2669 case APPEND_SUBCOMMAND
:
2673 case DELETE_SUBCOMMAND
:
2674 delete_archive_members ();
2677 case CREATE_SUBCOMMAND
:
2681 case EXTRACT_SUBCOMMAND
:
2683 read_and (extract_archive
);
2685 /* FIXME: should extract_finish () even if an ordinary signal is
2691 case LIST_SUBCOMMAND
:
2692 read_and (list_archive
);
2695 case DIFF_SUBCOMMAND
:
2697 read_and (diff_archive
);
2700 case TEST_LABEL_SUBCOMMAND
:
2701 test_archive_label ();
2704 checkpoint_finish ();
2707 print_total_stats ();
2709 if (check_links_option
)
2712 if (volno_file_option
)
2713 closeout_volume_number ();
2715 /* Dispose of allocated memory, and return. */
2717 free (archive_name_array
);
2718 xattrs_clear_setup ();
2721 if (exit_status
== TAREXIT_FAILURE
)
2722 error (0, 0, _("Exiting with failure status due to previous errors"));
2724 if (stdlis
== stdout
)
2726 else if (ferror (stderr
) || fclose (stderr
) != 0)
2727 set_exit_status (TAREXIT_FAILURE
);
2733 tar_stat_init (struct tar_stat_info
*st
)
2735 memset (st
, 0, sizeof (*st
));
2738 /* Close the stream or file descriptor associated with ST, and remove
2739 all traces of it from ST. Return true if successful, false (with a
2740 diagnostic) otherwise. */
2742 tar_stat_close (struct tar_stat_info
*st
)
2744 int status
= (st
->dirstream
? closedir (st
->dirstream
)
2745 : 0 < st
->fd
? close (st
->fd
)
2754 close_diag (st
->orig_file_name
);
2760 tar_stat_destroy (struct tar_stat_info
*st
)
2762 tar_stat_close (st
);
2763 xheader_xattr_free (st
->xattr_map
, st
->xattr_map_size
);
2764 free (st
->orig_file_name
);
2765 free (st
->file_name
);
2766 free (st
->link_name
);
2769 free (st
->cntx_name
);
2770 free (st
->acls_a_ptr
);
2771 free (st
->acls_d_ptr
);
2772 free (st
->sparse_map
);
2774 xheader_destroy (&st
->xhdr
);
2775 memset (st
, 0, sizeof (*st
));
2778 /* Format mask for all available formats that support nanosecond
2779 timestamp resolution. */
2780 #define NS_PRECISION_FORMAT_MASK FORMAT_MASK (POSIX_FORMAT)
2782 /* Same as timespec_cmp, but ignore nanoseconds if current archive
2783 format does not provide sufficient resolution. */
2785 tar_timespec_cmp (struct timespec a
, struct timespec b
)
2787 if (!(FORMAT_MASK (current_format
) & NS_PRECISION_FORMAT_MASK
))
2788 a
.tv_nsec
= b
.tv_nsec
= 0;
2789 return timespec_cmp (a
, b
);
2792 /* Set tar exit status to VAL, unless it is already indicating
2793 a more serious condition. This relies on the fact that the
2794 values of TAREXIT_ constants are ranged by severity. */
2796 set_exit_status (int val
)
2798 if (val
> exit_status
)