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_NEWER_FILES_OPTION
,
299 NO_AUTO_COMPRESS_OPTION
,
300 NO_CHECK_DEVICE_OPTION
,
301 NO_DELAY_DIRECTORY_RESTORE_OPTION
,
302 NO_IGNORE_CASE_OPTION
,
303 NO_IGNORE_COMMAND_ERROR_OPTION
,
305 NO_OVERWRITE_DIR_OPTION
,
306 NO_QUOTE_CHARS_OPTION
,
308 NO_SAME_OWNER_OPTION
,
309 NO_SAME_PERMISSIONS_OPTION
,
311 NO_SELINUX_CONTEXT_OPTION
,
313 NO_WILDCARDS_MATCH_SLASH_OPTION
,
317 NUMERIC_OWNER_OPTION
,
320 ONE_FILE_SYSTEM_OPTION
,
321 OVERWRITE_DIR_OPTION
,
328 QUOTING_STYLE_OPTION
,
331 RECURSIVE_UNLINK_OPTION
,
337 SELINUX_CONTEXT_OPTION
,
338 SHOW_DEFAULTS_OPTION
,
339 SHOW_OMITTED_DIRS_OPTION
,
340 SHOW_TRANSFORMED_NAMES_OPTION
,
341 SKIP_OLD_FILES_OPTION
,
342 SPARSE_VERSION_OPTION
,
343 STRIP_COMPONENTS_OPTION
,
353 WILDCARDS_MATCH_SLASH_OPTION
,
360 const char *argp_program_version
= "tar (" PACKAGE_NAME
") " VERSION
;
361 const char *argp_program_bug_address
= "<" PACKAGE_BUGREPORT
">";
362 static char const doc
[] = N_("\
363 GNU 'tar' saves many files together into a single tape or disk archive, \
364 and can restore individual files from the archive.\n\
367 tar -cf archive.tar foo bar # Create archive.tar from files foo and bar.\n\
368 tar -tvf archive.tar # List all files in archive.tar verbosely.\n\
369 tar -xf archive.tar # Extract all files from archive.tar.\n")
371 N_("The backup suffix is '~', unless set with --suffix or SIMPLE_BACKUP_SUFFIX.\n\
372 The version control may be set with --backup or VERSION_CONTROL, values are:\n\n\
373 none, off never make backups\n\
374 t, numbered make numbered backups\n\
375 nil, existing numbered if numbered backups exist, simple otherwise\n\
376 never, simple always make simple backups\n");
381 Available option letters are DEQY and eqy. Consider the following
384 [For Solaris tar compatibility =/= Is it important at all?]
385 e exit immediately with a nonzero exit status if unexpected errors occur
386 E use extended headers (--format=posix)
388 [q alias for --occurrence=1 =/= this would better be used for quiet?]
390 y per-file gzip compression
391 Y per-block gzip compression.
393 Additionally, the 'n' letter is assigned for option --seek, which
394 is probably not needed and should be marked as deprecated, so that
395 -n may become available in the future.
398 static struct argp_option options
[] = {
401 N_("Main operation mode:"), GRID
},
404 N_("list the contents of an archive"), GRID
+1 },
405 {"extract", 'x', 0, 0,
406 N_("extract files from an archive"), GRID
+1 },
407 {"get", 0, 0, OPTION_ALIAS
, NULL
, GRID
+1 },
408 {"create", 'c', 0, 0,
409 N_("create a new archive"), GRID
+1 },
411 N_("find differences between archive and file system"), GRID
+1 },
412 {"compare", 0, 0, OPTION_ALIAS
, NULL
, GRID
+1 },
413 {"append", 'r', 0, 0,
414 N_("append files to the end of an archive"), GRID
+1 },
415 {"update", 'u', 0, 0,
416 N_("only append files newer than copy in archive"), GRID
+1 },
417 {"catenate", 'A', 0, 0,
418 N_("append tar files to an archive"), GRID
+1 },
419 {"concatenate", 0, 0, OPTION_ALIAS
, NULL
, GRID
+1 },
420 {"delete", DELETE_OPTION
, 0, 0,
421 N_("delete from the archive (not on mag tapes!)"), GRID
+1 },
422 {"test-label", TEST_LABEL_OPTION
, NULL
, 0,
423 N_("test the archive volume label and exit"), GRID
+1 },
428 N_("Operation modifiers:"), GRID
},
430 {"sparse", 'S', 0, 0,
431 N_("handle sparse files efficiently"), GRID
+1 },
432 {"sparse-version", SPARSE_VERSION_OPTION
, N_("MAJOR[.MINOR]"), 0,
433 N_("set version of the sparse format to use (implies --sparse)"), GRID
+1},
434 {"incremental", 'G', 0, 0,
435 N_("handle old GNU-format incremental backup"), GRID
+1 },
436 {"listed-incremental", 'g', N_("FILE"), 0,
437 N_("handle new GNU-format incremental backup"), GRID
+1 },
438 {"level", LEVEL_OPTION
, N_("NUMBER"), 0,
439 N_("dump level for created listed-incremental archive"), GRID
+1 },
440 {"ignore-failed-read", IGNORE_FAILED_READ_OPTION
, 0, 0,
441 N_("do not exit with nonzero on unreadable files"), GRID
+1 },
442 {"occurrence", OCCURRENCE_OPTION
, N_("NUMBER"), OPTION_ARG_OPTIONAL
,
443 N_("process only the NUMBERth occurrence of each file in the archive;"
444 " this option is valid only in conjunction with one of the subcommands"
445 " --delete, --diff, --extract or --list and when a list of files"
446 " is given either on the command line or via the -T option;"
447 " NUMBER defaults to 1"), GRID
+1 },
448 {"seek", 'n', NULL
, 0,
449 N_("archive is seekable"), GRID
+1 },
450 {"no-seek", NO_SEEK_OPTION
, NULL
, 0,
451 N_("archive is not seekable"), GRID
+1 },
452 {"no-check-device", NO_CHECK_DEVICE_OPTION
, NULL
, 0,
453 N_("do not check device numbers when creating incremental archives"),
455 {"check-device", CHECK_DEVICE_OPTION
, NULL
, 0,
456 N_("check device numbers when creating incremental archives (default)"),
462 N_("Overwrite control:"), GRID
},
464 {"verify", 'W', 0, 0,
465 N_("attempt to verify the archive after writing it"), GRID
+1 },
466 {"remove-files", REMOVE_FILES_OPTION
, 0, 0,
467 N_("remove files after adding them to the archive"), GRID
+1 },
468 {"keep-old-files", 'k', 0, 0,
469 N_("don't replace existing files when extracting, "
470 "treat them as errors"), GRID
+1 },
471 {"skip-old-files", SKIP_OLD_FILES_OPTION
, 0, 0,
472 N_("don't replace existing files when extracting, silently skip over them"),
474 {"keep-newer-files", KEEP_NEWER_FILES_OPTION
, 0, 0,
475 N_("don't replace existing files that are newer than their archive copies"), GRID
+1 },
476 {"overwrite", OVERWRITE_OPTION
, 0, 0,
477 N_("overwrite existing files when extracting"), GRID
+1 },
478 {"unlink-first", 'U', 0, 0,
479 N_("remove each file prior to extracting over it"), GRID
+1 },
480 {"recursive-unlink", RECURSIVE_UNLINK_OPTION
, 0, 0,
481 N_("empty hierarchies prior to extracting directory"), GRID
+1 },
482 {"no-overwrite-dir", NO_OVERWRITE_DIR_OPTION
, 0, 0,
483 N_("preserve metadata of existing directories"), GRID
+1 },
484 {"overwrite-dir", OVERWRITE_DIR_OPTION
, 0, 0,
485 N_("overwrite metadata of existing directories when extracting (default)"),
491 N_("Select output stream:"), GRID
},
493 {"to-stdout", 'O', 0, 0,
494 N_("extract files to standard output"), GRID
+1 },
495 {"to-command", TO_COMMAND_OPTION
, N_("COMMAND"), 0,
496 N_("pipe extracted files to another program"), GRID
+1 },
497 {"ignore-command-error", IGNORE_COMMAND_ERROR_OPTION
, 0, 0,
498 N_("ignore exit codes of children"), GRID
+1 },
499 {"no-ignore-command-error", NO_IGNORE_COMMAND_ERROR_OPTION
, 0, 0,
500 N_("treat non-zero exit codes of children as error"), GRID
+1 },
505 N_("Handling of file attributes:"), GRID
},
507 {"owner", OWNER_OPTION
, N_("NAME"), 0,
508 N_("force NAME as owner for added files"), GRID
+1 },
509 {"group", GROUP_OPTION
, N_("NAME"), 0,
510 N_("force NAME as group for added files"), GRID
+1 },
511 {"mtime", MTIME_OPTION
, N_("DATE-OR-FILE"), 0,
512 N_("set mtime for added files from DATE-OR-FILE"), GRID
+1 },
513 {"mode", MODE_OPTION
, N_("CHANGES"), 0,
514 N_("force (symbolic) mode CHANGES for added files"), GRID
+1 },
515 {"atime-preserve", ATIME_PRESERVE_OPTION
,
516 N_("METHOD"), OPTION_ARG_OPTIONAL
,
517 N_("preserve access times on dumped files, either by restoring the times"
518 " after reading (METHOD='replace'; default) or by not setting the times"
519 " in the first place (METHOD='system')"), GRID
+1 },
521 N_("don't extract file modified time"), GRID
+1 },
522 {"same-owner", SAME_OWNER_OPTION
, 0, 0,
523 N_("try extracting files with the same ownership as exists in the archive (default for superuser)"), GRID
+1 },
524 {"no-same-owner", NO_SAME_OWNER_OPTION
, 0, 0,
525 N_("extract files as yourself (default for ordinary users)"), GRID
+1 },
526 {"numeric-owner", NUMERIC_OWNER_OPTION
, 0, 0,
527 N_("always use numbers for user/group names"), GRID
+1 },
528 {"preserve-permissions", 'p', 0, 0,
529 N_("extract information about file permissions (default for superuser)"),
531 {"same-permissions", 0, 0, OPTION_ALIAS
, NULL
, GRID
+1 },
532 {"no-same-permissions", NO_SAME_PERMISSIONS_OPTION
, 0, 0,
533 N_("apply the user's umask when extracting permissions from the archive (default for ordinary users)"), GRID
+1 },
534 {"preserve-order", 's', 0, 0,
535 N_("sort names to extract to match archive"), GRID
+1 },
536 {"same-order", 0, 0, OPTION_ALIAS
, NULL
, GRID
+1 },
537 {"preserve", PRESERVE_OPTION
, 0, 0,
538 N_("same as both -p and -s"), GRID
+1 },
539 {"delay-directory-restore", DELAY_DIRECTORY_RESTORE_OPTION
, 0, 0,
540 N_("delay setting modification times and permissions of extracted"
541 " directories until the end of extraction"), GRID
+1 },
542 {"no-delay-directory-restore", NO_DELAY_DIRECTORY_RESTORE_OPTION
, 0, 0,
543 N_("cancel the effect of --delay-directory-restore option"), GRID
+1 },
548 N_("Handling of extended file attributes:"), GRID
},
550 {"xattrs", XATTR_OPTION
, 0, 0,
551 N_("Enable extended attributes support"), GRID
+1 },
552 {"no-xattrs", NO_XATTR_OPTION
, 0, 0,
553 N_("Disable extended attributes support"), GRID
+1 },
554 {"xattrs-include", XATTR_INCLUDE
, N_("MASK"), 0,
555 N_("specify the include pattern for xattr keys"), GRID
+1 },
556 {"xattrs-exclude", XATTR_EXCLUDE
, N_("MASK"), 0,
557 N_("specify the exclude pattern for xattr keys"), GRID
+1 },
558 {"selinux", SELINUX_CONTEXT_OPTION
, 0, 0,
559 N_("Enable the SELinux context support"), GRID
+1 },
560 {"no-selinux", NO_SELINUX_CONTEXT_OPTION
, 0, 0,
561 N_("Disable the SELinux context support"), GRID
+1 },
562 {"acls", ACLS_OPTION
, 0, 0,
563 N_("Enable the POSIX ACLs support"), GRID
+1 },
564 {"no-acls", NO_ACLS_OPTION
, 0, 0,
565 N_("Disable the POSIX ACLs support"), GRID
+1 },
570 N_("Device selection and switching:"), GRID
},
572 {"file", 'f', N_("ARCHIVE"), 0,
573 N_("use archive file or device ARCHIVE"), GRID
+1 },
574 {"force-local", FORCE_LOCAL_OPTION
, 0, 0,
575 N_("archive file is local even if it has a colon"), GRID
+1 },
576 {"rmt-command", RMT_COMMAND_OPTION
, N_("COMMAND"), 0,
577 N_("use given rmt COMMAND instead of rmt"), GRID
+1 },
578 {"rsh-command", RSH_COMMAND_OPTION
, N_("COMMAND"), 0,
579 N_("use remote COMMAND instead of rsh"), GRID
+1 },
581 {"-[0-7][lmh]", 0, NULL
, OPTION_DOC
, /* It is OK, since 'name' will never be
583 N_("specify drive and density"), GRID
+1 },
585 {NULL
, '0', NULL
, OPTION_HIDDEN
, NULL
, GRID
+1 },
586 {NULL
, '1', NULL
, OPTION_HIDDEN
, NULL
, GRID
+1 },
587 {NULL
, '2', NULL
, OPTION_HIDDEN
, NULL
, GRID
+1 },
588 {NULL
, '3', NULL
, OPTION_HIDDEN
, NULL
, GRID
+1 },
589 {NULL
, '4', NULL
, OPTION_HIDDEN
, NULL
, GRID
+1 },
590 {NULL
, '5', NULL
, OPTION_HIDDEN
, NULL
, GRID
+1 },
591 {NULL
, '6', NULL
, OPTION_HIDDEN
, NULL
, GRID
+1 },
592 {NULL
, '7', NULL
, OPTION_HIDDEN
, NULL
, GRID
+1 },
593 {NULL
, '8', NULL
, OPTION_HIDDEN
, NULL
, GRID
+1 },
594 {NULL
, '9', NULL
, OPTION_HIDDEN
, NULL
, GRID
+1 },
596 {"multi-volume", 'M', 0, 0,
597 N_("create/list/extract multi-volume archive"), GRID
+1 },
598 {"tape-length", 'L', N_("NUMBER"), 0,
599 N_("change tape after writing NUMBER x 1024 bytes"), GRID
+1 },
600 {"info-script", 'F', N_("NAME"), 0,
601 N_("run script at end of each tape (implies -M)"), GRID
+1 },
602 {"new-volume-script", 0, 0, OPTION_ALIAS
, NULL
, GRID
+1 },
603 {"volno-file", VOLNO_FILE_OPTION
, N_("FILE"), 0,
604 N_("use/update the volume number in FILE"), GRID
+1 },
609 N_("Device blocking:"), GRID
},
611 {"blocking-factor", 'b', N_("BLOCKS"), 0,
612 N_("BLOCKS x 512 bytes per record"), GRID
+1 },
613 {"record-size", RECORD_SIZE_OPTION
, N_("NUMBER"), 0,
614 N_("NUMBER of bytes per record, multiple of 512"), GRID
+1 },
615 {"ignore-zeros", 'i', 0, 0,
616 N_("ignore zeroed blocks in archive (means EOF)"), GRID
+1 },
617 {"read-full-records", 'B', 0, 0,
618 N_("reblock as we read (for 4.2BSD pipes)"), GRID
+1 },
623 N_("Archive format selection:"), GRID
},
625 {"format", 'H', N_("FORMAT"), 0,
626 N_("create archive of the given format"), GRID
+1 },
628 {NULL
, 0, NULL
, 0, N_("FORMAT is one of the following:"), GRID
+2 },
629 {" v7", 0, NULL
, OPTION_DOC
|OPTION_NO_TRANS
, N_("old V7 tar format"),
631 {" oldgnu", 0, NULL
, OPTION_DOC
|OPTION_NO_TRANS
,
632 N_("GNU format as per tar <= 1.12"), GRID
+3 },
633 {" gnu", 0, NULL
, OPTION_DOC
|OPTION_NO_TRANS
,
634 N_("GNU tar 1.13.x format"), GRID
+3 },
635 {" ustar", 0, NULL
, OPTION_DOC
|OPTION_NO_TRANS
,
636 N_("POSIX 1003.1-1988 (ustar) format"), GRID
+3 },
637 {" pax", 0, NULL
, OPTION_DOC
|OPTION_NO_TRANS
,
638 N_("POSIX 1003.1-2001 (pax) format"), GRID
+3 },
639 {" posix", 0, NULL
, OPTION_DOC
|OPTION_NO_TRANS
, N_("same as pax"), GRID
+3 },
641 {"old-archive", OLD_ARCHIVE_OPTION
, 0, 0, /* FIXME */
642 N_("same as --format=v7"), GRID
+8 },
643 {"portability", 0, 0, OPTION_ALIAS
, NULL
, GRID
+8 },
644 {"posix", POSIX_OPTION
, 0, 0,
645 N_("same as --format=posix"), GRID
+8 },
646 {"pax-option", PAX_OPTION
, N_("keyword[[:]=value][,keyword[[:]=value]]..."), 0,
647 N_("control pax keywords"), GRID
+8 },
648 {"label", 'V', N_("TEXT"), 0,
649 N_("create archive with volume name TEXT; at list/extract time, use TEXT as a globbing pattern for volume name"), GRID
+8 },
654 N_("Compression options:"), GRID
},
655 {"auto-compress", 'a', 0, 0,
656 N_("use archive suffix to determine the compression program"), GRID
+1 },
657 {"no-auto-compress", NO_AUTO_COMPRESS_OPTION
, 0, 0,
658 N_("do not use archive suffix to determine the compression program"),
660 {"use-compress-program", 'I', N_("PROG"), 0,
661 N_("filter through PROG (must accept -d)"), GRID
+1 },
662 /* Note: docstrings for the options below are generated by tar_help_filter */
663 {"bzip2", 'j', 0, 0, NULL
, GRID
+1 },
664 {"gzip", 'z', 0, 0, NULL
, GRID
+1 },
665 {"gunzip", 0, 0, OPTION_ALIAS
, NULL
, GRID
+1 },
666 {"ungzip", 0, 0, OPTION_ALIAS
, NULL
, GRID
+1 },
667 {"compress", 'Z', 0, 0, NULL
, GRID
+1 },
668 {"uncompress", 0, 0, OPTION_ALIAS
, NULL
, GRID
+1 },
669 {"lzip", LZIP_OPTION
, 0, 0, NULL
, GRID
+1 },
670 {"lzma", LZMA_OPTION
, 0, 0, NULL
, GRID
+1 },
671 {"lzop", LZOP_OPTION
, 0, 0, NULL
, GRID
+1 },
672 {"xz", 'J', 0, 0, NULL
, GRID
+1 },
677 N_("Local file selection:"), GRID
},
679 {"add-file", ARGP_KEY_ARG
, N_("FILE"), 0,
680 N_("add given FILE to the archive (useful if its name starts with a dash)"), GRID
+1 },
681 {"directory", 'C', N_("DIR"), 0,
682 N_("change to directory DIR"), GRID
+1 },
683 {"files-from", 'T', N_("FILE"), 0,
684 N_("get names to extract or create from FILE"), GRID
+1 },
685 {"null", NULL_OPTION
, 0, 0,
686 N_("-T reads null-terminated names, disable -C"), GRID
+1 },
687 {"no-null", NO_NULL_OPTION
, 0, 0,
688 N_("disable the effect of the previous --null option"), GRID
+1 },
689 {"unquote", UNQUOTE_OPTION
, 0, 0,
690 N_("unquote filenames read with -T (default)"), GRID
+1 },
691 {"no-unquote", NO_UNQUOTE_OPTION
, 0, 0,
692 N_("do not unquote filenames read with -T"), GRID
+1 },
693 {"exclude", EXCLUDE_OPTION
, N_("PATTERN"), 0,
694 N_("exclude files, given as a PATTERN"), GRID
+1 },
695 {"exclude-from", 'X', N_("FILE"), 0,
696 N_("exclude patterns listed in FILE"), GRID
+1 },
697 {"exclude-caches", EXCLUDE_CACHES_OPTION
, 0, 0,
698 N_("exclude contents of directories containing CACHEDIR.TAG, "
699 "except for the tag file itself"), GRID
+1 },
700 {"exclude-caches-under", EXCLUDE_CACHES_UNDER_OPTION
, 0, 0,
701 N_("exclude everything under directories containing CACHEDIR.TAG"),
703 {"exclude-caches-all", EXCLUDE_CACHES_ALL_OPTION
, 0, 0,
704 N_("exclude directories containing CACHEDIR.TAG"), GRID
+1 },
705 {"exclude-tag", EXCLUDE_TAG_OPTION
, N_("FILE"), 0,
706 N_("exclude contents of directories containing FILE, except"
707 " for FILE itself"), GRID
+1 },
708 {"exclude-tag-under", EXCLUDE_TAG_UNDER_OPTION
, N_("FILE"), 0,
709 N_("exclude everything under directories containing FILE"), GRID
+1 },
710 {"exclude-tag-all", EXCLUDE_TAG_ALL_OPTION
, N_("FILE"), 0,
711 N_("exclude directories containing FILE"), GRID
+1 },
712 {"exclude-vcs", EXCLUDE_VCS_OPTION
, NULL
, 0,
713 N_("exclude version control system directories"), GRID
+1 },
714 {"exclude-backups", EXCLUDE_BACKUPS_OPTION
, NULL
, 0,
715 N_("exclude backup and lock files"), GRID
+1 },
716 {"no-recursion", NO_RECURSION_OPTION
, 0, 0,
717 N_("avoid descending automatically in directories"), GRID
+1 },
718 {"one-file-system", ONE_FILE_SYSTEM_OPTION
, 0, 0,
719 N_("stay in local file system when creating archive"), GRID
+1 },
720 {"recursion", RECURSION_OPTION
, 0, 0,
721 N_("recurse into directories (default)"), GRID
+1 },
722 {"absolute-names", 'P', 0, 0,
723 N_("don't strip leading '/'s from file names"), GRID
+1 },
724 {"dereference", 'h', 0, 0,
725 N_("follow symlinks; archive and dump the files they point to"), GRID
+1 },
726 {"hard-dereference", HARD_DEREFERENCE_OPTION
, 0, 0,
727 N_("follow hard links; archive and dump the files they refer to"), GRID
+1 },
728 {"starting-file", 'K', N_("MEMBER-NAME"), 0,
729 N_("begin at member MEMBER-NAME in the archive"), GRID
+1 },
730 {"newer", 'N', N_("DATE-OR-FILE"), 0,
731 N_("only store files newer than DATE-OR-FILE"), GRID
+1 },
732 {"after-date", 0, 0, OPTION_ALIAS
, NULL
, GRID
+1 },
733 {"newer-mtime", NEWER_MTIME_OPTION
, N_("DATE"), 0,
734 N_("compare date and time when data changed only"), GRID
+1 },
735 {"backup", BACKUP_OPTION
, N_("CONTROL"), OPTION_ARG_OPTIONAL
,
736 N_("backup before removal, choose version CONTROL"), GRID
+1 },
737 {"suffix", SUFFIX_OPTION
, N_("STRING"), 0,
738 N_("backup before removal, override usual suffix ('~' unless overridden by environment variable SIMPLE_BACKUP_SUFFIX)"), GRID
+1 },
743 N_("File name transformations:"), GRID
},
744 {"strip-components", STRIP_COMPONENTS_OPTION
, N_("NUMBER"), 0,
745 N_("strip NUMBER leading components from file names on extraction"),
747 {"transform", TRANSFORM_OPTION
, N_("EXPRESSION"), 0,
748 N_("use sed replace EXPRESSION to transform file names"), GRID
+1 },
749 {"xform", 0, 0, OPTION_ALIAS
, NULL
, GRID
+1 },
754 N_("File name matching options (affect both exclude and include patterns):"),
756 {"ignore-case", IGNORE_CASE_OPTION
, 0, 0,
757 N_("ignore case"), GRID
+1 },
758 {"anchored", ANCHORED_OPTION
, 0, 0,
759 N_("patterns match file name start"), GRID
+1 },
760 {"no-anchored", NO_ANCHORED_OPTION
, 0, 0,
761 N_("patterns match after any '/' (default for exclusion)"), GRID
+1 },
762 {"no-ignore-case", NO_IGNORE_CASE_OPTION
, 0, 0,
763 N_("case sensitive matching (default)"), GRID
+1 },
764 {"wildcards", WILDCARDS_OPTION
, 0, 0,
765 N_("use wildcards (default for exclusion)"), GRID
+1 },
766 {"no-wildcards", NO_WILDCARDS_OPTION
, 0, 0,
767 N_("verbatim string matching"), GRID
+1 },
768 {"no-wildcards-match-slash", NO_WILDCARDS_MATCH_SLASH_OPTION
, 0, 0,
769 N_("wildcards do not match '/'"), GRID
+1 },
770 {"wildcards-match-slash", WILDCARDS_MATCH_SLASH_OPTION
, 0, 0,
771 N_("wildcards match '/' (default for exclusion)"), GRID
+1 },
776 N_("Informative output:"), GRID
},
778 {"verbose", 'v', 0, 0,
779 N_("verbosely list files processed"), GRID
+1 },
780 {"warning", WARNING_OPTION
, N_("KEYWORD"), 0,
781 N_("warning control"), GRID
+1 },
782 {"checkpoint", CHECKPOINT_OPTION
, N_("NUMBER"), OPTION_ARG_OPTIONAL
,
783 N_("display progress messages every NUMBERth record (default 10)"),
785 {"checkpoint-action", CHECKPOINT_ACTION_OPTION
, N_("ACTION"), 0,
786 N_("execute ACTION on each checkpoint"),
788 {"check-links", 'l', 0, 0,
789 N_("print a message if not all links are dumped"), GRID
+1 },
790 {"totals", TOTALS_OPTION
, N_("SIGNAL"), OPTION_ARG_OPTIONAL
,
791 N_("print total bytes after processing the archive; "
792 "with an argument - print total bytes when this SIGNAL is delivered; "
793 "Allowed signals are: SIGHUP, SIGQUIT, SIGINT, SIGUSR1 and SIGUSR2; "
794 "the names without SIG prefix are also accepted"), GRID
+1 },
795 {"utc", UTC_OPTION
, 0, 0,
796 N_("print file modification times in UTC"), GRID
+1 },
797 {"full-time", FULL_TIME_OPTION
, 0, 0,
798 N_("print file time to its full resolution"), GRID
+1 },
799 {"index-file", INDEX_FILE_OPTION
, N_("FILE"), 0,
800 N_("send verbose output to FILE"), GRID
+1 },
801 {"block-number", 'R', 0, 0,
802 N_("show block number within archive with each message"), GRID
+1 },
803 {"interactive", 'w', 0, 0,
804 N_("ask for confirmation for every action"), GRID
+1 },
805 {"confirmation", 0, 0, OPTION_ALIAS
, NULL
, GRID
+1 },
806 {"show-defaults", SHOW_DEFAULTS_OPTION
, 0, 0,
807 N_("show tar defaults"), GRID
+1 },
808 {"show-omitted-dirs", SHOW_OMITTED_DIRS_OPTION
, 0, 0,
809 N_("when listing or extracting, list each directory that does not match search criteria"), GRID
+1 },
810 {"show-transformed-names", SHOW_TRANSFORMED_NAMES_OPTION
, 0, 0,
811 N_("show file or archive names after transformation"),
813 {"show-stored-names", 0, 0, OPTION_ALIAS
, NULL
, GRID
+1 },
814 {"quoting-style", QUOTING_STYLE_OPTION
, N_("STYLE"), 0,
815 N_("set name quoting style; see below for valid STYLE values"), GRID
+1 },
816 {"quote-chars", QUOTE_CHARS_OPTION
, N_("STRING"), 0,
817 N_("additionally quote characters from STRING"), GRID
+1 },
818 {"no-quote-chars", NO_QUOTE_CHARS_OPTION
, N_("STRING"), 0,
819 N_("disable quoting for characters from STRING"), GRID
+1 },
824 N_("Compatibility options:"), GRID
},
827 N_("when creating, same as --old-archive; when extracting, same as --no-same-owner"), GRID
+1 },
832 N_("Other options:"), GRID
},
834 {"restrict", RESTRICT_OPTION
, 0, 0,
835 N_("disable use of some potentially harmful options"), -1 },
841 static char const *const atime_preserve_args
[] =
843 "replace", "system", NULL
846 static enum atime_preserve
const atime_preserve_types
[] =
848 replace_atime_preserve
, system_atime_preserve
851 /* Make sure atime_preserve_types has as much entries as atime_preserve_args
852 (minus 1 for NULL guard) */
853 ARGMATCH_VERIFY (atime_preserve_args
, atime_preserve_types
);
855 /* Wildcard matching settings */
858 default_wildcards
, /* For exclusion == enable_wildcards,
859 for inclusion == disable_wildcards */
864 struct tar_args
/* Variables used during option parsing */
866 struct textual_date
*textual_date
; /* Keeps the arguments to --newer-mtime
867 and/or --date option if they are
869 enum wildcards wildcards
; /* Wildcard settings (--wildcards/
871 int matching_flags
; /* exclude_fnmatch options */
872 int include_anchored
; /* Pattern anchoring options used for
874 bool o_option
; /* True if -o option was given */
875 bool pax_option
; /* True if --pax-option was given */
876 char const *backup_suffix_string
; /* --suffix option argument */
877 char const *version_control_string
; /* --backup option argument */
878 bool input_files
; /* True if some input files where given */
879 int compress_autodetect
; /* True if compression autodetection should
880 be attempted when creating archives */
884 #define MAKE_EXCL_OPTIONS(args) \
885 ((((args)->wildcards != disable_wildcards) ? EXCLUDE_WILDCARDS : 0) \
886 | (args)->matching_flags \
889 #define MAKE_INCL_OPTIONS(args) \
890 ((((args)->wildcards == enable_wildcards) ? EXCLUDE_WILDCARDS : 0) \
891 | (args)->include_anchored \
892 | (args)->matching_flags \
895 static char const * const vcs_file_table
[] = {
927 static char const * const backup_file_table
[] = {
935 add_exclude_array (char const * const * fv
, int opts
)
939 for (i
= 0; fv
[i
]; i
++)
940 add_exclude (excluded
, fv
[i
], opts
);
945 format_default_settings (void)
948 "--format=%s -f%s -b%d --quoting-style=%s --rmt-command=%s"
953 archive_format_string (DEFAULT_ARCHIVE_FORMAT
),
954 DEFAULT_ARCHIVE
, DEFAULT_BLOCKING
,
955 quoting_style_args
[DEFAULT_QUOTING_STYLE
],
965 set_subcommand_option (enum subcommand subcommand
)
967 if (subcommand_option
!= UNKNOWN_SUBCOMMAND
968 && subcommand_option
!= subcommand
)
970 _("You may not specify more than one '-Acdtrux' or '--test-label' option")));
972 subcommand_option
= subcommand
;
976 set_use_compress_program_option (const char *string
)
978 if (use_compress_program_option
979 && strcmp (use_compress_program_option
, string
) != 0)
980 USAGE_ERROR ((0, 0, _("Conflicting compression options")));
982 use_compress_program_option
= string
;
989 print_total_stats ();
990 #ifndef HAVE_SIGACTION
991 signal (signo
, sigstat
);
996 stat_on_signal (int signo
)
998 #ifdef HAVE_SIGACTION
1000 # define SA_RESTART 0
1002 struct sigaction act
;
1003 act
.sa_handler
= sigstat
;
1004 sigemptyset (&act
.sa_mask
);
1005 act
.sa_flags
= SA_RESTART
;
1006 sigaction (signo
, &act
, NULL
);
1008 signal (signo
, sigstat
);
1013 set_stat_signal (const char *name
)
1015 static struct sigtab
1019 } const sigtab
[] = {
1020 { "SIGUSR1", SIGUSR1
},
1021 { "USR1", SIGUSR1
},
1022 { "SIGUSR2", SIGUSR2
},
1023 { "USR2", SIGUSR2
},
1024 { "SIGHUP", SIGHUP
},
1026 { "SIGINT", SIGINT
},
1028 { "SIGQUIT", SIGQUIT
},
1031 struct sigtab
const *p
;
1033 for (p
= sigtab
; p
< sigtab
+ sizeof (sigtab
) / sizeof (sigtab
[0]); p
++)
1034 if (strcmp (p
->name
, name
) == 0)
1036 stat_on_signal (p
->signo
);
1039 FATAL_ERROR ((0, 0, _("Unknown signal name: %s"), name
));
1045 struct textual_date
*next
;
1052 get_date_or_file (struct tar_args
*args
, const char *option
,
1053 const char *str
, struct timespec
*ts
)
1055 if (FILE_SYSTEM_PREFIX_LEN (str
) != 0
1060 if (stat (str
, &st
) != 0)
1063 USAGE_ERROR ((0, 0, _("Date sample file not found")));
1065 *ts
= get_stat_mtime (&st
);
1069 if (! parse_datetime (ts
, str
, NULL
))
1071 WARN ((0, 0, _("Substituting %s for unknown date format %s"),
1072 tartime (*ts
, false), quote (str
)));
1078 struct textual_date
*p
= xmalloc (sizeof (*p
));
1081 p
->date
= xstrdup (str
);
1082 p
->next
= args
->textual_date
;
1083 args
->textual_date
= p
;
1090 report_textual_dates (struct tar_args
*args
)
1092 struct textual_date
*p
;
1093 for (p
= args
->textual_date
; p
; )
1095 struct textual_date
*next
= p
->next
;
1098 char const *treated_as
= tartime (p
->ts
, true);
1099 if (strcmp (p
->date
, treated_as
) != 0)
1100 WARN ((0, 0, _("Option %s: Treating date '%s' as %s"),
1101 p
->option
, p
->date
, treated_as
));
1111 /* Either NL or NUL, as decided by the --null option. */
1112 static char filename_terminator
;
1114 enum read_file_list_state
/* Result of reading file name from the list file */
1116 file_list_success
, /* OK, name read successfully */
1117 file_list_end
, /* End of list file */
1118 file_list_zero
, /* Zero separator encountered where it should not */
1119 file_list_skip
/* Empty (zero-length) entry encountered, skip it */
1122 /* Read from FP a sequence of characters up to TERM and put them
1125 static enum read_file_list_state
1126 read_name_from_file (FILE *fp
, struct obstack
*stk
, int term
)
1131 for (c
= getc (fp
); c
!= EOF
&& c
!= term
; c
= getc (fp
))
1135 /* We have read a zero separator. The file possibly is
1137 return file_list_zero
;
1139 obstack_1grow (stk
, c
);
1143 if (counter
== 0 && c
!= EOF
)
1144 return file_list_skip
;
1146 obstack_1grow (stk
, 0);
1148 return (counter
== 0 && c
== EOF
) ? file_list_end
: file_list_success
;
1152 static bool files_from_option
; /* When set, tar will not refuse to create
1154 static struct obstack argv_stk
; /* Storage for additional command line options
1155 read using -T option */
1157 /* Prevent recursive inclusion of the same file */
1160 struct file_id_list
*next
;
1165 static struct file_id_list
*file_id_list
;
1168 add_file_id (const char *filename
)
1170 struct file_id_list
*p
;
1173 if (stat (filename
, &st
))
1174 stat_fatal (filename
);
1175 for (p
= file_id_list
; p
; p
= p
->next
)
1176 if (p
->ino
== st
.st_ino
&& p
->dev
== st
.st_dev
)
1178 FATAL_ERROR ((0, 0, _("%s: file list already read"),
1179 quotearg_colon (filename
)));
1181 p
= xmalloc (sizeof *p
);
1182 p
->next
= file_id_list
;
1188 /* Default density numbers for [0-9][lmh] device specifications */
1190 #if defined DEVICE_PREFIX && !defined DENSITY_LETTER
1191 # ifndef LOW_DENSITY_NUM
1192 # define LOW_DENSITY_NUM 0
1195 # ifndef MID_DENSITY_NUM
1196 # define MID_DENSITY_NUM 8
1199 # ifndef HIGH_DENSITY_NUM
1200 # define HIGH_DENSITY_NUM 16
1205 update_argv (const char *filename
, struct argp_state
*state
)
1208 size_t count
= 0, i
;
1212 bool is_stdin
= false;
1213 enum read_file_list_state read_state
;
1214 int term
= filename_terminator
;
1216 if (!strcmp (filename
, "-"))
1219 request_stdin ("-T");
1224 add_file_id (filename
);
1225 if ((fp
= fopen (filename
, "r")) == NULL
)
1226 open_fatal (filename
);
1229 while ((read_state
= read_name_from_file (fp
, &argv_stk
, term
))
1234 case file_list_success
:
1238 case file_list_end
: /* won't happen, just to pacify gcc */
1241 case file_list_zero
:
1245 WARNOPT (WARN_FILENAME_WITH_NULS
,
1246 (0, 0, N_("%s: file name read contains nul character"),
1247 quotearg_colon (filename
)));
1249 /* Prepare new stack contents */
1250 size
= obstack_object_size (&argv_stk
);
1251 p
= obstack_finish (&argv_stk
);
1252 for (; size
> 0; size
--, p
++)
1254 obstack_1grow (&argv_stk
, *p
);
1256 obstack_1grow (&argv_stk
, '\n');
1257 obstack_1grow (&argv_stk
, 0);
1259 /* Read rest of files using new filename terminator */
1264 case file_list_skip
:
1275 start
= obstack_finish (&argv_stk
);
1278 for (p
= start
; *p
; p
+= strlen (p
) + 1)
1282 new_argc
= state
->argc
+ count
;
1283 new_argv
= xmalloc (sizeof (state
->argv
[0]) * (new_argc
+ 1));
1284 memcpy (new_argv
, state
->argv
, sizeof (state
->argv
[0]) * (state
->argc
+ 1));
1285 state
->argv
= new_argv
;
1286 memmove (&state
->argv
[state
->next
+ count
], &state
->argv
[state
->next
],
1287 (state
->argc
- state
->next
+ 1) * sizeof (state
->argv
[0]));
1289 state
->argc
= new_argc
;
1291 for (i
= state
->next
, p
= start
; *p
; p
+= strlen (p
) + 1, i
++)
1293 if (term
== 0 && p
[0] == '-')
1294 state
->argv
[i
++] = (char *) "--add-file";
1301 tar_help_filter (int key
, const char *text
, void *input
)
1313 s
= xasprintf (_("filter the archive through %s"), BZIP2_PROGRAM
);
1317 s
= xasprintf (_("filter the archive through %s"), GZIP_PROGRAM
);
1321 s
= xasprintf (_("filter the archive through %s"), COMPRESS_PROGRAM
);
1325 s
= xasprintf (_("filter the archive through %s"), LZIP_PROGRAM
);
1329 s
= xasprintf (_("filter the archive through %s"), LZMA_PROGRAM
);
1333 s
= xasprintf (_("filter the archive through %s"), XZ_PROGRAM
);
1336 case ARGP_KEY_HELP_EXTRA
:
1340 obstack_init (&stk
);
1341 tstr
= _("Valid arguments for the --quoting-style option are:");
1342 obstack_grow (&stk
, tstr
, strlen (tstr
));
1343 obstack_grow (&stk
, "\n\n", 2);
1344 tar_list_quoting_styles (&stk
, " ");
1345 tstr
= _("\n*This* tar defaults to:\n");
1346 obstack_grow (&stk
, tstr
, strlen (tstr
));
1347 s
= format_default_settings ();
1348 obstack_grow (&stk
, s
, strlen (s
));
1349 obstack_1grow (&stk
, '\n');
1350 obstack_1grow (&stk
, 0);
1351 s
= xstrdup (obstack_finish (&stk
));
1352 obstack_free (&stk
, NULL
);
1359 expand_pax_option (struct tar_args
*targs
, const char *arg
)
1364 obstack_init (&stk
);
1367 size_t seglen
= strcspn (arg
, ",");
1368 char *p
= memchr (arg
, '=', seglen
);
1371 size_t len
= p
- arg
+ 1;
1372 obstack_grow (&stk
, arg
, len
);
1374 for (++p
; *p
&& isspace ((unsigned char) *p
); p
++)
1376 if (*p
== '{' && p
[len
-1] == '}')
1379 char *tmp
= xmalloc (len
);
1380 memcpy (tmp
, p
+ 1, len
-2);
1382 if (get_date_or_file (targs
, "--pax-option", tmp
, &ts
) == 0)
1384 char buf
[TIMESPEC_STRSIZE_BOUND
];
1385 char const *s
= code_timespec (ts
, buf
);
1386 obstack_grow (&stk
, s
, strlen (s
));
1389 obstack_grow (&stk
, p
, len
);
1393 obstack_grow (&stk
, p
, len
);
1396 obstack_grow (&stk
, arg
, seglen
);
1401 obstack_1grow (&stk
, *arg
);
1405 obstack_1grow (&stk
, 0);
1406 res
= xstrdup (obstack_finish (&stk
));
1407 obstack_free (&stk
, NULL
);
1413 parse_owner_group (char *arg
, uintmax_t field_max
, char const **name_option
)
1415 uintmax_t u
= UINTMAX_MAX
;
1417 char const *name
= 0;
1418 char const *invalid_num
= 0;
1419 char *colon
= strchr (arg
, ':');
1423 char const *num
= colon
+ 1;
1427 if (num
&& (! (xstrtoumax (num
, &end
, 10, &u
, "") == LONGINT_OK
1428 && u
<= field_max
)))
1434 switch ('0' <= *arg
&& *arg
<= '9'
1435 ? xstrtoumax (arg
, &end
, 10, &u1
, "")
1443 if (u1
<= field_max
)
1449 case LONGINT_OVERFLOW
:
1456 FATAL_ERROR ((0, 0, "%s: %s", quotearg_colon (invalid_num
),
1457 _("Invalid owner or group ID")));
1459 *name_option
= name
;
1463 #define TAR_SIZE_SUFFIXES "bBcGgkKMmPTtw"
1466 parse_opt (int key
, char *arg
, struct argp_state
*state
)
1468 struct tar_args
*args
= state
->input
;
1473 /* File name or non-parsed option, because of ARGP_IN_ORDER */
1474 name_add_name (arg
, MAKE_INCL_OPTIONS (args
));
1475 args
->input_files
= true;
1479 set_subcommand_option (CAT_SUBCOMMAND
);
1483 args
->compress_autodetect
= true;
1486 case NO_AUTO_COMPRESS_OPTION
:
1487 args
->compress_autodetect
= false;
1493 if (! (xstrtoumax (arg
, 0, 10, &u
, "") == LONGINT_OK
1494 && u
== (blocking_factor
= u
)
1495 && 0 < blocking_factor
1496 && u
== (record_size
= u
* BLOCKSIZE
) / BLOCKSIZE
))
1497 USAGE_ERROR ((0, 0, "%s: %s", quotearg_colon (arg
),
1498 _("Invalid blocking factor")));
1503 /* Try to reblock input records. For reading 4.2BSD pipes. */
1505 /* It would surely make sense to exchange -B and -R, but it seems
1506 that -B has been used for a long while in Sun tar and most
1507 BSD-derived systems. This is a consequence of the block/record
1508 terminology confusion. */
1510 read_full_records_option
= true;
1514 set_subcommand_option (CREATE_SUBCOMMAND
);
1522 set_subcommand_option (DIFF_SUBCOMMAND
);
1526 if (archive_names
== allocated_archive_names
)
1527 archive_name_array
= x2nrealloc (archive_name_array
,
1528 &allocated_archive_names
,
1529 sizeof (archive_name_array
[0]));
1531 archive_name_array
[archive_names
++] = arg
;
1535 /* Since -F is only useful with -M, make it implied. Run this
1536 script at the end of each tape. */
1538 info_script_option
= arg
;
1539 multi_volume_option
= true;
1542 case FULL_TIME_OPTION
:
1543 full_time_option
= true;
1547 listed_incremental_option
= arg
;
1548 after_date_option
= true;
1552 /* We are making an incremental dump (FIXME: are we?); save
1553 directories at the beginning of the archive, and include in each
1554 directory its contents. */
1556 incremental_option
= true;
1560 /* Follow symbolic links. */
1561 dereference_option
= true;
1564 case HARD_DEREFERENCE_OPTION
:
1565 hard_dereference_option
= true;
1569 /* Ignore zero blocks (eofs). This can't be the default,
1570 because Unix tar writes two blocks of zeros, then pads out
1571 the record with garbage. */
1573 ignore_zeros_option
= true;
1577 set_use_compress_program_option (BZIP2_PROGRAM
);
1581 set_use_compress_program_option (XZ_PROGRAM
);
1585 /* Don't replace existing files. */
1586 old_files_option
= KEEP_OLD_FILES
;
1590 starting_file_option
= true;
1591 addname (arg
, 0, true, NULL
);
1594 case ONE_FILE_SYSTEM_OPTION
:
1595 /* When dumping directories, don't dump files/subdirectories
1596 that are on other filesystems. */
1597 one_file_system_option
= true;
1601 check_links_option
= 1;
1609 if (xstrtoumax (arg
, &p
, 10, &u
, TAR_SIZE_SUFFIXES
) != LONGINT_OK
)
1610 USAGE_ERROR ((0, 0, "%s: %s", quotearg_colon (arg
),
1611 _("Invalid tape length")));
1612 if (p
> arg
&& !strchr (TAR_SIZE_SUFFIXES
, p
[-1]))
1613 tape_length_option
= 1024 * (tarlong
) u
;
1615 tape_length_option
= (tarlong
) u
;
1616 multi_volume_option
= true;
1623 incremental_level
= strtoul (arg
, &p
, 10);
1625 USAGE_ERROR ((0, 0, _("Invalid incremental level value")));
1630 set_use_compress_program_option (LZIP_PROGRAM
);
1634 set_use_compress_program_option (LZMA_PROGRAM
);
1638 set_use_compress_program_option (LZOP_PROGRAM
);
1642 touch_option
= true;
1646 /* Make multivolume archive: when we can't write any more into
1647 the archive, re-open it, and continue writing. */
1649 multi_volume_option
= true;
1653 get_date_or_file (args
, "--mtime", arg
, &mtime_option
);
1654 set_mtime_option
= true;
1661 case NO_SEEK_OPTION
:
1666 after_date_option
= true;
1669 case NEWER_MTIME_OPTION
:
1670 if (NEWER_OPTION_INITIALIZED (newer_mtime_option
))
1671 USAGE_ERROR ((0, 0, _("More than one threshold date")));
1672 get_date_or_file (args
,
1673 key
== NEWER_MTIME_OPTION
? "--newer-mtime"
1674 : "--after-date", arg
, &newer_mtime_option
);
1678 args
->o_option
= true;
1682 to_stdout_option
= true;
1686 same_permissions_option
= true;
1690 absolute_names_option
= true;
1694 set_subcommand_option (APPEND_SUBCOMMAND
);
1698 /* Print block numbers for debugging bad tar archives. */
1700 /* It would surely make sense to exchange -B and -R, but it seems
1701 that -B has been used for a long while in Sun tar and most
1702 BSD-derived systems. This is a consequence of the block/record
1703 terminology confusion. */
1705 block_number_option
= true;
1709 /* Names to extract are sorted. */
1711 same_order_option
= true;
1715 sparse_option
= true;
1718 case SKIP_OLD_FILES_OPTION
:
1719 old_files_option
= SKIP_OLD_FILES
;
1722 case SPARSE_VERSION_OPTION
:
1723 sparse_option
= true;
1726 tar_sparse_major
= strtoul (arg
, &p
, 10);
1730 USAGE_ERROR ((0, 0, _("Invalid sparse version value")));
1731 tar_sparse_minor
= strtoul (p
+ 1, &p
, 10);
1733 USAGE_ERROR ((0, 0, _("Invalid sparse version value")));
1739 set_subcommand_option (LIST_SUBCOMMAND
);
1743 case TEST_LABEL_OPTION
:
1744 set_subcommand_option (TEST_LABEL_SUBCOMMAND
);
1748 update_argv (arg
, state
);
1749 /* Indicate we've been given -T option. This is for backward
1750 compatibility only, so that `tar cfT archive /dev/null will
1752 files_from_option
= true;
1756 set_subcommand_option (UPDATE_SUBCOMMAND
);
1760 old_files_option
= UNLINK_FIRST_OLD_FILES
;
1769 warning_option
|= WARN_VERBOSE_WARNINGS
;
1773 volume_label_option
= arg
;
1777 interactive_option
= true;
1781 verify_option
= true;
1785 set_subcommand_option (EXTRACT_SUBCOMMAND
);
1789 if (add_exclude_file (add_exclude
, excluded
, arg
,
1790 MAKE_EXCL_OPTIONS (args
), '\n')
1794 FATAL_ERROR ((0, e
, "%s", quotearg_colon (arg
)));
1799 set_use_compress_program_option (GZIP_PROGRAM
);
1803 set_use_compress_program_option (COMPRESS_PROGRAM
);
1806 case ANCHORED_OPTION
:
1807 args
->matching_flags
|= EXCLUDE_ANCHORED
;
1810 case ATIME_PRESERVE_OPTION
:
1811 atime_preserve_option
=
1813 ? XARGMATCH ("--atime-preserve", arg
,
1814 atime_preserve_args
, atime_preserve_types
)
1815 : replace_atime_preserve
);
1816 if (! O_NOATIME
&& atime_preserve_option
== system_atime_preserve
)
1818 _("--atime-preserve='system' is not supported"
1819 " on this platform")));
1822 case CHECK_DEVICE_OPTION
:
1823 check_device_option
= true;
1826 case NO_CHECK_DEVICE_OPTION
:
1827 check_device_option
= false;
1830 case CHECKPOINT_OPTION
:
1837 checkpoint_compile_action (".");
1840 checkpoint_option
= strtoul (arg
, &p
, 0);
1843 _("--checkpoint value is not an integer")));
1846 checkpoint_option
= DEFAULT_CHECKPOINT
;
1849 case CHECKPOINT_ACTION_OPTION
:
1850 checkpoint_compile_action (arg
);
1854 backup_option
= true;
1856 args
->version_control_string
= arg
;
1859 case DELAY_DIRECTORY_RESTORE_OPTION
:
1860 delay_directory_restore_option
= true;
1863 case NO_DELAY_DIRECTORY_RESTORE_OPTION
:
1864 delay_directory_restore_option
= false;
1868 set_subcommand_option (DELETE_SUBCOMMAND
);
1871 case EXCLUDE_BACKUPS_OPTION
:
1872 add_exclude_array (backup_file_table
, EXCLUDE_WILDCARDS
);
1875 case EXCLUDE_OPTION
:
1876 add_exclude (excluded
, arg
, MAKE_EXCL_OPTIONS (args
));
1879 case EXCLUDE_CACHES_OPTION
:
1880 add_exclusion_tag ("CACHEDIR.TAG", exclusion_tag_contents
,
1884 case EXCLUDE_CACHES_UNDER_OPTION
:
1885 add_exclusion_tag ("CACHEDIR.TAG", exclusion_tag_under
,
1889 case EXCLUDE_CACHES_ALL_OPTION
:
1890 add_exclusion_tag ("CACHEDIR.TAG", exclusion_tag_all
,
1894 case EXCLUDE_TAG_OPTION
:
1895 add_exclusion_tag (arg
, exclusion_tag_contents
, NULL
);
1898 case EXCLUDE_TAG_UNDER_OPTION
:
1899 add_exclusion_tag (arg
, exclusion_tag_under
, NULL
);
1902 case EXCLUDE_TAG_ALL_OPTION
:
1903 add_exclusion_tag (arg
, exclusion_tag_all
, NULL
);
1906 case EXCLUDE_VCS_OPTION
:
1907 add_exclude_array (vcs_file_table
, 0);
1910 case FORCE_LOCAL_OPTION
:
1911 force_local_option
= true;
1915 set_archive_format (arg
);
1918 case INDEX_FILE_OPTION
:
1919 index_file_name
= arg
;
1922 case IGNORE_CASE_OPTION
:
1923 args
->matching_flags
|= FNM_CASEFOLD
;
1926 case IGNORE_COMMAND_ERROR_OPTION
:
1927 ignore_command_error_option
= true;
1930 case IGNORE_FAILED_READ_OPTION
:
1931 ignore_failed_read_option
= true;
1934 case KEEP_NEWER_FILES_OPTION
:
1935 old_files_option
= KEEP_NEWER_FILES
;
1940 uintmax_t u
= parse_owner_group (arg
, TYPE_MAXIMUM (gid_t
),
1941 &group_name_option
);
1942 if (u
== UINTMAX_MAX
)
1945 if (group_name_option
)
1946 gname_to_gid (group_name_option
, &group_option
);
1954 mode_option
= mode_compile (arg
);
1956 FATAL_ERROR ((0, 0, _("Invalid mode given on option")));
1957 initial_umask
= umask (0);
1958 umask (initial_umask
);
1961 case NO_ANCHORED_OPTION
:
1962 args
->include_anchored
= 0; /* Clear the default for comman line args */
1963 args
->matching_flags
&= ~ EXCLUDE_ANCHORED
;
1966 case NO_IGNORE_CASE_OPTION
:
1967 args
->matching_flags
&= ~ FNM_CASEFOLD
;
1970 case NO_IGNORE_COMMAND_ERROR_OPTION
:
1971 ignore_command_error_option
= false;
1974 case NO_OVERWRITE_DIR_OPTION
:
1975 old_files_option
= NO_OVERWRITE_DIR_OLD_FILES
;
1978 case NO_QUOTE_CHARS_OPTION
:
1980 set_char_quoting (NULL
, *arg
, 0);
1983 case NO_WILDCARDS_OPTION
:
1984 args
->wildcards
= disable_wildcards
;
1987 case NO_WILDCARDS_MATCH_SLASH_OPTION
:
1988 args
->matching_flags
|= FNM_FILE_NAME
;
1992 filename_terminator
= '\0';
1995 case NO_NULL_OPTION
:
1996 filename_terminator
= '\n';
1999 case NUMERIC_OWNER_OPTION
:
2000 numeric_owner_option
= true;
2003 case OCCURRENCE_OPTION
:
2005 occurrence_option
= 1;
2009 if (xstrtoumax (arg
, 0, 10, &u
, "") == LONGINT_OK
)
2010 occurrence_option
= u
;
2012 FATAL_ERROR ((0, 0, "%s: %s", quotearg_colon (arg
),
2013 _("Invalid number")));
2017 case OLD_ARCHIVE_OPTION
:
2018 set_archive_format ("v7");
2021 case OVERWRITE_DIR_OPTION
:
2022 old_files_option
= DEFAULT_OLD_FILES
;
2025 case OVERWRITE_OPTION
:
2026 old_files_option
= OVERWRITE_OLD_FILES
;
2031 uintmax_t u
= parse_owner_group (arg
, TYPE_MAXIMUM (uid_t
),
2032 &owner_name_option
);
2033 if (u
== UINTMAX_MAX
)
2036 if (owner_name_option
)
2037 uname_to_uid (owner_name_option
, &owner_option
);
2044 case QUOTE_CHARS_OPTION
:
2046 set_char_quoting (NULL
, *arg
, 1);
2049 case QUOTING_STYLE_OPTION
:
2050 tar_set_quoting_style (arg
);
2055 char *tmp
= expand_pax_option (args
, arg
);
2056 args
->pax_option
= true;
2057 xheader_set_option (tmp
);
2063 set_archive_format ("posix");
2066 case PRESERVE_OPTION
:
2067 /* FIXME: What it is good for? */
2068 same_permissions_option
= true;
2069 same_order_option
= true;
2070 WARN ((0, 0, _("The --preserve option is deprecated, "
2071 "use --preserve-permissions --preserve-order instead")));
2074 case RECORD_SIZE_OPTION
:
2078 if (! (xstrtoumax (arg
, NULL
, 10, &u
, TAR_SIZE_SUFFIXES
) == LONGINT_OK
2079 && u
== (size_t) u
))
2080 USAGE_ERROR ((0, 0, "%s: %s", quotearg_colon (arg
),
2081 _("Invalid record size")));
2083 if (record_size
% BLOCKSIZE
!= 0)
2084 USAGE_ERROR ((0, 0, _("Record size must be a multiple of %d."),
2086 blocking_factor
= record_size
/ BLOCKSIZE
;
2090 case RECURSIVE_UNLINK_OPTION
:
2091 recursive_unlink_option
= true;
2094 case REMOVE_FILES_OPTION
:
2095 remove_files_option
= true;
2098 case RESTRICT_OPTION
:
2099 restrict_option
= true;
2102 case RMT_COMMAND_OPTION
:
2106 case RSH_COMMAND_OPTION
:
2107 rsh_command_option
= arg
;
2110 case SHOW_DEFAULTS_OPTION
:
2112 char *s
= format_default_settings ();
2119 case STRIP_COMPONENTS_OPTION
:
2122 if (! (xstrtoumax (arg
, 0, 10, &u
, "") == LONGINT_OK
2123 && u
== (size_t) u
))
2124 USAGE_ERROR ((0, 0, "%s: %s", quotearg_colon (arg
),
2125 _("Invalid number of elements")));
2126 strip_name_components
= u
;
2130 case SHOW_OMITTED_DIRS_OPTION
:
2131 show_omitted_dirs_option
= true;
2134 case SHOW_TRANSFORMED_NAMES_OPTION
:
2135 show_transformed_names_option
= true;
2139 backup_option
= true;
2140 args
->backup_suffix_string
= arg
;
2143 case TO_COMMAND_OPTION
:
2144 if (to_command_option
)
2145 USAGE_ERROR ((0, 0, _("Only one --to-command option allowed")));
2146 to_command_option
= arg
;
2151 set_stat_signal (arg
);
2153 totals_option
= true;
2156 case TRANSFORM_OPTION
:
2157 set_transform_expr (arg
);
2161 set_use_compress_program_option (arg
);
2164 case VOLNO_FILE_OPTION
:
2165 volno_file_option
= arg
;
2168 case WILDCARDS_OPTION
:
2169 args
->wildcards
= enable_wildcards
;
2172 case WILDCARDS_MATCH_SLASH_OPTION
:
2173 args
->matching_flags
&= ~ FNM_FILE_NAME
;
2176 case NO_RECURSION_OPTION
:
2177 recursion_option
= 0;
2180 case NO_SAME_OWNER_OPTION
:
2181 same_owner_option
= -1;
2184 case NO_SAME_PERMISSIONS_OPTION
:
2185 same_permissions_option
= -1;
2189 set_archive_format ("posix");
2193 case NO_ACLS_OPTION
:
2197 case SELINUX_CONTEXT_OPTION
:
2198 set_archive_format ("posix");
2199 selinux_context_option
= 1;
2202 case NO_SELINUX_CONTEXT_OPTION
:
2203 selinux_context_option
= -1;
2207 set_archive_format ("posix");
2211 case NO_XATTR_OPTION
:
2217 xattrs_mask_add (arg
, (key
== XATTR_INCLUDE
));
2220 case RECURSION_OPTION
:
2221 recursion_option
= FNM_LEADING_DIR
;
2224 case SAME_OWNER_OPTION
:
2225 same_owner_option
= 1;
2228 case UNQUOTE_OPTION
:
2229 unquote_option
= true;
2232 case NO_UNQUOTE_OPTION
:
2233 unquote_option
= false;
2236 case WARNING_OPTION
:
2237 set_warning_option (arg
);
2249 #ifdef DEVICE_PREFIX
2251 int device
= key
- '0';
2253 static char buf
[sizeof DEVICE_PREFIX
+ 10];
2257 argp_error (state
, _("Malformed density argument: %s"), quote (arg
));
2259 strcpy (buf
, DEVICE_PREFIX
);
2260 cursor
= buf
+ strlen (buf
);
2262 #ifdef DENSITY_LETTER
2264 sprintf (cursor
, "%d%c", device
, arg
[0]);
2266 #else /* not DENSITY_LETTER */
2271 device
+= LOW_DENSITY_NUM
;
2275 device
+= MID_DENSITY_NUM
;
2279 device
+= HIGH_DENSITY_NUM
;
2283 argp_error (state
, _("Unknown density: '%c'"), arg
[0]);
2285 sprintf (cursor
, "%d", device
);
2287 #endif /* not DENSITY_LETTER */
2289 if (archive_names
== allocated_archive_names
)
2290 archive_name_array
= x2nrealloc (archive_name_array
,
2291 &allocated_archive_names
,
2292 sizeof (archive_name_array
[0]));
2293 archive_name_array
[archive_names
++] = xstrdup (buf
);
2297 #else /* not DEVICE_PREFIX */
2300 _("Options '-[0-7][lmh]' not supported by *this* tar"));
2302 #endif /* not DEVICE_PREFIX */
2305 return ARGP_ERR_UNKNOWN
;
2310 static struct argp argp
= {
2323 argp_help (&argp
, stderr
, ARGP_HELP_SEE
, (char*) program_name
);
2328 /* Parse the options for tar. */
2330 static struct argp_option
*
2331 find_argp_option (struct argp_option
*o
, int letter
)
2338 && o
->doc
== NULL
); o
++)
2339 if (o
->key
== letter
)
2344 static const char *tar_authors
[] = {
2351 decode_options (int argc
, char **argv
)
2354 struct tar_args args
;
2356 argp_version_setup ("tar", tar_authors
);
2358 /* Set some default option values. */
2359 args
.textual_date
= NULL
;
2360 args
.wildcards
= default_wildcards
;
2361 args
.matching_flags
= 0;
2362 args
.include_anchored
= EXCLUDE_ANCHORED
;
2363 args
.o_option
= false;
2364 args
.pax_option
= false;
2365 args
.backup_suffix_string
= getenv ("SIMPLE_BACKUP_SUFFIX");
2366 args
.version_control_string
= 0;
2367 args
.input_files
= false;
2368 args
.compress_autodetect
= false;
2370 subcommand_option
= UNKNOWN_SUBCOMMAND
;
2371 archive_format
= DEFAULT_FORMAT
;
2372 blocking_factor
= DEFAULT_BLOCKING
;
2373 record_size
= DEFAULT_BLOCKING
* BLOCKSIZE
;
2374 excluded
= new_exclude ();
2375 newer_mtime_option
.tv_sec
= TYPE_MINIMUM (time_t);
2376 newer_mtime_option
.tv_nsec
= -1;
2377 recursion_option
= FNM_LEADING_DIR
;
2378 unquote_option
= true;
2379 tar_sparse_major
= 1;
2380 tar_sparse_minor
= 0;
2382 owner_option
= -1; owner_name_option
= NULL
;
2383 group_option
= -1; group_name_option
= NULL
;
2385 check_device_option
= true;
2387 incremental_level
= -1;
2391 /* Convert old-style tar call by exploding option element and rearranging
2392 options accordingly. */
2394 if (argc
> 1 && argv
[1][0] != '-')
2396 int new_argc
; /* argc value for rearranged arguments */
2397 char **new_argv
; /* argv value for rearranged arguments */
2398 char *const *in
; /* cursor into original argv */
2399 char **out
; /* cursor into rearranged argv */
2400 const char *letter
; /* cursor into old option letters */
2401 char buffer
[3]; /* constructed option buffer */
2403 /* Initialize a constructed option. */
2408 /* Allocate a new argument array, and copy program name in it. */
2410 new_argc
= argc
- 1 + strlen (argv
[1]);
2411 new_argv
= xmalloc ((new_argc
+ 1) * sizeof (char *));
2416 /* Copy each old letter option as a separate option, and have the
2417 corresponding argument moved next to it. */
2419 for (letter
= *in
++; *letter
; letter
++)
2421 struct argp_option
*opt
;
2423 buffer
[1] = *letter
;
2424 *out
++ = xstrdup (buffer
);
2425 opt
= find_argp_option (options
, *letter
);
2426 if (opt
&& opt
->arg
)
2428 if (in
< argv
+ argc
)
2431 USAGE_ERROR ((0, 0, _("Old option '%c' requires an argument."),
2436 /* Copy all remaining options. */
2438 while (in
< argv
+ argc
)
2442 /* Replace the old option list by the new one. */
2448 /* Parse all options and non-options as they appear. */
2450 prepend_default_options (getenv ("TAR_OPTIONS"), &argc
, &argv
);
2452 if (argp_parse (&argp
, argc
, argv
, ARGP_IN_ORDER
, &idx
, &args
))
2453 exit (TAREXIT_FAILURE
);
2456 /* Special handling for 'o' option:
2458 GNU tar used to say "output old format".
2459 UNIX98 tar says don't chown files after extracting (we use
2460 "--no-same-owner" for this).
2462 The old GNU tar semantics is retained when used with --create
2463 option, otherwise UNIX98 semantics is assumed */
2467 if (subcommand_option
== CREATE_SUBCOMMAND
)
2469 /* GNU Tar <= 1.13 compatibility */
2470 set_archive_format ("v7");
2474 /* UNIX98 compatibility */
2475 same_owner_option
= -1;
2479 /* Handle operands after any "--" argument. */
2480 for (; idx
< argc
; idx
++)
2482 name_add_name (argv
[idx
], MAKE_INCL_OPTIONS (&args
));
2483 args
.input_files
= true;
2486 /* Warn about implicit use of the wildcards in command line arguments.
2488 warn_regex_usage
= args
.wildcards
== default_wildcards
;
2490 /* Derive option values and check option consistency. */
2492 if (archive_format
== DEFAULT_FORMAT
)
2494 if (args
.pax_option
)
2495 archive_format
= POSIX_FORMAT
;
2497 archive_format
= DEFAULT_ARCHIVE_FORMAT
;
2500 if ((volume_label_option
&& subcommand_option
== CREATE_SUBCOMMAND
)
2501 || incremental_option
2502 || multi_volume_option
2504 assert_format (FORMAT_MASK (OLDGNU_FORMAT
)
2505 | FORMAT_MASK (GNU_FORMAT
)
2506 | FORMAT_MASK (POSIX_FORMAT
));
2508 if (occurrence_option
)
2510 if (!args
.input_files
)
2512 _("--occurrence is meaningless without a file list")));
2513 if (subcommand_option
!= DELETE_SUBCOMMAND
2514 && subcommand_option
!= DIFF_SUBCOMMAND
2515 && subcommand_option
!= EXTRACT_SUBCOMMAND
2516 && subcommand_option
!= LIST_SUBCOMMAND
)
2518 _("--occurrence cannot be used in the requested operation mode")));
2521 if (archive_names
== 0)
2523 /* If no archive file name given, try TAPE from the environment, or
2524 else, DEFAULT_ARCHIVE from the configuration process. */
2527 archive_name_array
[0] = getenv ("TAPE");
2528 if (! archive_name_array
[0])
2529 archive_name_array
[0] = DEFAULT_ARCHIVE
;
2532 /* Allow multiple archives only with '-M'. */
2534 if (archive_names
> 1 && !multi_volume_option
)
2536 _("Multiple archive files require '-M' option")));
2538 if (listed_incremental_option
2539 && NEWER_OPTION_INITIALIZED (newer_mtime_option
))
2541 _("Cannot combine --listed-incremental with --newer")));
2542 if (incremental_level
!= -1 && !listed_incremental_option
)
2544 _("--level is meaningless without --listed-incremental")));
2546 if (volume_label_option
)
2548 if (archive_format
== GNU_FORMAT
|| archive_format
== OLDGNU_FORMAT
)
2550 size_t volume_label_max_len
=
2551 (sizeof current_header
->header
.name
2552 - 1 /* for trailing '\0' */
2553 - (multi_volume_option
2554 ? (sizeof " Volume "
2555 - 1 /* for null at end of " Volume " */
2556 + INT_STRLEN_BOUND (int) /* for volume number */
2557 - 1 /* for sign, as 0 <= volno */)
2559 if (volume_label_max_len
< strlen (volume_label_option
))
2561 ngettext ("%s: Volume label is too long (limit is %lu byte)",
2562 "%s: Volume label is too long (limit is %lu bytes)",
2563 volume_label_max_len
),
2564 quotearg_colon (volume_label_option
),
2565 (unsigned long) volume_label_max_len
));
2568 Label length in PAX format is limited by the volume size. */
2573 if (multi_volume_option
)
2574 USAGE_ERROR ((0, 0, _("Cannot verify multi-volume archives")));
2575 if (use_compress_program_option
)
2576 USAGE_ERROR ((0, 0, _("Cannot verify compressed archives")));
2579 if (use_compress_program_option
)
2581 if (multi_volume_option
)
2582 USAGE_ERROR ((0, 0, _("Cannot use multi-volume compressed archives")));
2583 if (subcommand_option
== UPDATE_SUBCOMMAND
2584 || subcommand_option
== APPEND_SUBCOMMAND
2585 || subcommand_option
== DELETE_SUBCOMMAND
)
2586 USAGE_ERROR ((0, 0, _("Cannot update compressed archives")));
2587 if (subcommand_option
== CAT_SUBCOMMAND
)
2588 USAGE_ERROR ((0, 0, _("Cannot concatenate compressed archives")));
2591 /* It is no harm to use --pax-option on non-pax archives in archive
2592 reading mode. It may even be useful, since it allows to override
2593 file attributes from tar headers. Therefore I allow such usage.
2596 && archive_format
!= POSIX_FORMAT
2597 && !READ_LIKE_SUBCOMMAND
)
2598 USAGE_ERROR ((0, 0, _("--pax-option can be used only on POSIX archives")));
2600 /* star creates non-POSIX typed archives with xattr support, so allow the
2601 extra headers whenn reading */
2602 if ((acls_option
> 0)
2603 && archive_format
!= POSIX_FORMAT
2604 && !READ_LIKE_SUBCOMMAND
)
2605 USAGE_ERROR ((0, 0, _("--acls can be used only on POSIX archives")));
2607 if ((selinux_context_option
> 0)
2608 && archive_format
!= POSIX_FORMAT
2609 && !READ_LIKE_SUBCOMMAND
)
2610 USAGE_ERROR ((0, 0, _("--selinux can be used only on POSIX archives")));
2612 if ((xattrs_option
> 0)
2613 && archive_format
!= POSIX_FORMAT
2614 && !READ_LIKE_SUBCOMMAND
)
2615 USAGE_ERROR ((0, 0, _("--xattrs can be used only on POSIX archives")));
2617 /* If ready to unlink hierarchies, so we are for simpler files. */
2618 if (recursive_unlink_option
)
2619 old_files_option
= UNLINK_FIRST_OLD_FILES
;
2621 /* Flags for accessing files to be read from or copied into. POSIX says
2622 O_NONBLOCK has unspecified effect on most types of files, but in
2623 practice it never harms and sometimes helps. */
2625 int base_open_flags
=
2626 (O_BINARY
| O_CLOEXEC
| O_NOCTTY
| O_NONBLOCK
2627 | (dereference_option
? 0 : O_NOFOLLOW
)
2628 | (atime_preserve_option
== system_atime_preserve
? O_NOATIME
: 0));
2629 open_read_flags
= O_RDONLY
| base_open_flags
;
2630 open_searchdir_flags
= O_SEARCH
| O_DIRECTORY
| base_open_flags
;
2632 fstatat_flags
= dereference_option
? 0 : AT_SYMLINK_NOFOLLOW
;
2634 if (subcommand_option
== TEST_LABEL_SUBCOMMAND
)
2636 /* --test-label is silent if the user has specified the label name to
2638 if (!args
.input_files
)
2641 else if (utc_option
)
2644 if (tape_length_option
&& tape_length_option
< record_size
)
2645 USAGE_ERROR ((0, 0, _("Volume length cannot be less than record size")));
2647 if (same_order_option
&& listed_incremental_option
)
2648 USAGE_ERROR ((0, 0, _("--preserve-order is not compatible with "
2649 "--listed-incremental")));
2651 /* Forbid using -c with no input files whatsoever. Check that '-f -',
2652 explicit or implied, is used correctly. */
2654 switch (subcommand_option
)
2656 case CREATE_SUBCOMMAND
:
2657 if (!args
.input_files
&& !files_from_option
)
2659 _("Cowardly refusing to create an empty archive")));
2660 if (args
.compress_autodetect
&& archive_names
2661 && strcmp (archive_name_array
[0], "-"))
2662 set_compression_program_by_suffix (archive_name_array
[0],
2663 use_compress_program_option
);
2666 case EXTRACT_SUBCOMMAND
:
2667 case LIST_SUBCOMMAND
:
2668 case DIFF_SUBCOMMAND
:
2669 case TEST_LABEL_SUBCOMMAND
:
2670 for (archive_name_cursor
= archive_name_array
;
2671 archive_name_cursor
< archive_name_array
+ archive_names
;
2672 archive_name_cursor
++)
2673 if (!strcmp (*archive_name_cursor
, "-"))
2674 request_stdin ("-f");
2677 case CAT_SUBCOMMAND
:
2678 case UPDATE_SUBCOMMAND
:
2679 case APPEND_SUBCOMMAND
:
2680 for (archive_name_cursor
= archive_name_array
;
2681 archive_name_cursor
< archive_name_array
+ archive_names
;
2682 archive_name_cursor
++)
2683 if (!strcmp (*archive_name_cursor
, "-"))
2685 _("Options '-Aru' are incompatible with '-f -'")));
2691 /* Initialize stdlis */
2692 if (index_file_name
)
2694 stdlis
= fopen (index_file_name
, "w");
2696 open_fatal (index_file_name
);
2699 stdlis
= to_stdout_option
? stderr
: stdout
;
2701 archive_name_cursor
= archive_name_array
;
2703 /* Prepare for generating backup names. */
2705 if (args
.backup_suffix_string
)
2706 simple_backup_suffix
= xstrdup (args
.backup_suffix_string
);
2710 backup_type
= xget_version ("--backup", args
.version_control_string
);
2711 /* No backup is needed either if explicitely disabled or if
2712 the extracted files are not being written to disk. */
2713 if (backup_type
== no_backups
|| EXTRACT_OVER_PIPE
)
2714 backup_option
= false;
2717 checkpoint_finish_compile ();
2719 report_textual_dates (&args
);
2725 /* Main routine for tar. */
2727 main (int argc
, char **argv
)
2730 set_program_name (argv
[0]);
2732 setlocale (LC_ALL
, "");
2733 bindtextdomain (PACKAGE
, LOCALEDIR
);
2734 textdomain (PACKAGE
);
2736 exit_failure
= TAREXIT_FAILURE
;
2737 exit_status
= TAREXIT_SUCCESS
;
2738 filename_terminator
= '\n';
2739 set_quoting_style (0, DEFAULT_QUOTING_STYLE
);
2741 /* Make sure we have first three descriptors available */
2744 /* Pre-allocate a few structures. */
2746 allocated_archive_names
= 10;
2747 archive_name_array
=
2748 xmalloc (sizeof (const char *) * allocated_archive_names
);
2751 obstack_init (&argv_stk
);
2753 /* System V fork+wait does not work if SIGCHLD is ignored. */
2754 signal (SIGCHLD
, SIG_DFL
);
2756 /* Try to disable the ability to unlink a directory. */
2757 priv_set_remove_linkdir ();
2759 /* Decode options. */
2761 decode_options (argc
, argv
);
2765 /* Main command execution. */
2767 if (volno_file_option
)
2768 init_volume_number ();
2770 switch (subcommand_option
)
2772 case UNKNOWN_SUBCOMMAND
:
2774 _("You must specify one of the '-Acdtrux' or '--test-label' options")));
2776 case CAT_SUBCOMMAND
:
2777 case UPDATE_SUBCOMMAND
:
2778 case APPEND_SUBCOMMAND
:
2782 case DELETE_SUBCOMMAND
:
2783 delete_archive_members ();
2786 case CREATE_SUBCOMMAND
:
2790 case EXTRACT_SUBCOMMAND
:
2792 read_and (extract_archive
);
2794 /* FIXME: should extract_finish () even if an ordinary signal is
2800 case LIST_SUBCOMMAND
:
2801 read_and (list_archive
);
2804 case DIFF_SUBCOMMAND
:
2806 read_and (diff_archive
);
2809 case TEST_LABEL_SUBCOMMAND
:
2810 test_archive_label ();
2814 print_total_stats ();
2816 if (check_links_option
)
2819 if (volno_file_option
)
2820 closeout_volume_number ();
2822 /* Dispose of allocated memory, and return. */
2824 free (archive_name_array
);
2825 xattrs_clear_setup ();
2828 if (exit_status
== TAREXIT_FAILURE
)
2829 error (0, 0, _("Exiting with failure status due to previous errors"));
2831 if (stdlis
== stdout
)
2833 else if (ferror (stderr
) || fclose (stderr
) != 0)
2834 set_exit_status (TAREXIT_FAILURE
);
2840 tar_stat_init (struct tar_stat_info
*st
)
2842 memset (st
, 0, sizeof (*st
));
2845 /* Close the stream or file descriptor associated with ST, and remove
2846 all traces of it from ST. Return true if successful, false (with a
2847 diagnostic) otherwise. */
2849 tar_stat_close (struct tar_stat_info
*st
)
2851 int status
= (st
->dirstream
? closedir (st
->dirstream
)
2852 : 0 < st
->fd
? close (st
->fd
)
2861 close_diag (st
->orig_file_name
);
2867 tar_stat_destroy (struct tar_stat_info
*st
)
2869 tar_stat_close (st
);
2870 xheader_xattr_free (st
->xattr_map
, st
->xattr_map_size
);
2871 free (st
->orig_file_name
);
2872 free (st
->file_name
);
2873 free (st
->link_name
);
2876 free (st
->cntx_name
);
2877 free (st
->acls_a_ptr
);
2878 free (st
->acls_d_ptr
);
2879 free (st
->sparse_map
);
2881 xheader_destroy (&st
->xhdr
);
2882 memset (st
, 0, sizeof (*st
));
2885 /* Format mask for all available formats that support nanosecond
2886 timestamp resolution. */
2887 #define NS_PRECISION_FORMAT_MASK FORMAT_MASK (POSIX_FORMAT)
2889 /* Same as timespec_cmp, but ignore nanoseconds if current archive
2890 format does not provide sufficient resolution. */
2892 tar_timespec_cmp (struct timespec a
, struct timespec b
)
2894 if (!(FORMAT_MASK (current_format
) & NS_PRECISION_FORMAT_MASK
))
2895 a
.tv_nsec
= b
.tv_nsec
= 0;
2896 return timespec_cmp (a
, b
);
2899 /* Set tar exit status to VAL, unless it is already indicating
2900 a more serious condition. This relies on the fact that the
2901 values of TAREXIT_ constants are ranged by severity. */
2903 set_exit_status (int val
)
2905 if (val
> exit_status
)