1 /* A tar (tape archiver) program.
3 Copyright (C) 1988, 1992, 1993, 1994, 1995, 1996, 1997, 1999, 2000,
4 2001, 2003, 2004, 2005, 2006, 2007, 2009 Free Software Foundation, Inc.
6 Written by John Gilmore, starting 1985-08-25.
8 This program is free software; you can redistribute it and/or modify it
9 under the terms of the GNU General Public License as published by the
10 Free Software Foundation; either version 3, or (at your option) any later
13 This program is distributed in the hope that it will be useful, but
14 WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General
16 Public License for more details.
18 You should have received a copy of the GNU General Public License along
19 with this program; if not, write to the Free Software Foundation, Inc.,
20 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. */
26 #include <argp-namefrob.h>
27 #include <argp-fmtstream.h>
28 #include <argp-version-etc.h>
31 #if ! defined SIGCHLD && defined SIGCLD
32 # define SIGCHLD SIGCLD
35 /* The following causes "common.h" to produce definitions of all the global
36 variables, rather than just "extern" declarations of them. GNU tar does
37 depend on the system loader to preset all GLOBAL variables to neutral (or
38 zero) values; explicit initialization is usually not done. */
44 #include <configmake.h>
48 #include <rmt-command.h>
51 #include <version-etc.h>
56 /* Local declarations. */
58 #ifndef DEFAULT_ARCHIVE_FORMAT
59 # define DEFAULT_ARCHIVE_FORMAT GNU_FORMAT
62 #ifndef DEFAULT_ARCHIVE
63 # define DEFAULT_ARCHIVE "tar.out"
66 #ifndef DEFAULT_BLOCKING
67 # define DEFAULT_BLOCKING 20
73 /* Name of option using stdin. */
74 static const char *stdin_used_by
;
76 /* Doesn't return if stdin already requested. */
78 request_stdin (const char *option
)
81 USAGE_ERROR ((0, 0, _("Options `-%s' and `-%s' both want standard input"),
82 stdin_used_by
, option
));
84 stdin_used_by
= option
;
87 extern int rpmatch (char const *response
);
89 /* Returns true if and only if the user typed an affirmative response. */
91 confirm (const char *message_action
, const char *message_name
)
93 static FILE *confirm_file
;
94 static int confirm_file_EOF
;
99 if (archive
== 0 || stdin_used_by
)
101 confirm_file
= fopen (TTY_NAME
, "r");
103 open_fatal (TTY_NAME
);
107 request_stdin ("-w");
108 confirm_file
= stdin
;
112 fprintf (stdlis
, "%s %s?", message_action
, quote (message_name
));
115 if (!confirm_file_EOF
)
117 char *response
= NULL
;
118 size_t response_size
= 0;
119 if (getline (&response
, &response_size
, confirm_file
) < 0)
120 confirm_file_EOF
= 1;
122 status
= rpmatch (response
) > 0;
126 if (confirm_file_EOF
)
128 fputc ('\n', stdlis
);
135 static struct fmttab
{
137 enum archive_format fmt
;
140 { "oldgnu", OLDGNU_FORMAT
},
141 { "ustar", USTAR_FORMAT
},
142 { "posix", POSIX_FORMAT
},
143 #if 0 /* not fully supported yet */
144 { "star", STAR_FORMAT
},
146 { "gnu", GNU_FORMAT
},
147 { "pax", POSIX_FORMAT
}, /* An alias for posix */
152 set_archive_format (char const *name
)
154 struct fmttab
const *p
;
156 for (p
= fmttab
; strcmp (p
->name
, name
) != 0; )
158 USAGE_ERROR ((0, 0, _("%s: Invalid archive format"),
159 quotearg_colon (name
)));
161 archive_format
= p
->fmt
;
165 archive_format_string (enum archive_format fmt
)
167 struct fmttab
const *p
;
169 for (p
= fmttab
; p
->name
; p
++)
175 #define FORMAT_MASK(n) (1<<(n))
178 assert_format(unsigned fmt_mask
)
180 if ((FORMAT_MASK (archive_format
) & fmt_mask
) == 0)
182 _("GNU features wanted on incompatible archive format")));
186 subcommand_string (enum subcommand c
)
190 case UNKNOWN_SUBCOMMAND
:
193 case APPEND_SUBCOMMAND
:
199 case CREATE_SUBCOMMAND
:
202 case DELETE_SUBCOMMAND
:
205 case DIFF_SUBCOMMAND
:
208 case EXTRACT_SUBCOMMAND
:
211 case LIST_SUBCOMMAND
:
214 case UPDATE_SUBCOMMAND
:
223 tar_list_quoting_styles (struct obstack
*stk
, char *prefix
)
226 size_t prefixlen
= strlen (prefix
);
228 for (i
= 0; quoting_style_args
[i
]; i
++)
230 obstack_grow (stk
, prefix
, prefixlen
);
231 obstack_grow (stk
, quoting_style_args
[i
],
232 strlen (quoting_style_args
[i
]));
233 obstack_1grow (stk
, '\n');
238 tar_set_quoting_style (char *arg
)
242 for (i
= 0; quoting_style_args
[i
]; i
++)
243 if (strcmp (arg
, quoting_style_args
[i
]) == 0)
245 set_quoting_style (NULL
, i
);
249 _("Unknown quoting style `%s'. Try `%s --quoting-style=help' to get a list."), arg
, program_invocation_short_name
));
257 ANCHORED_OPTION
= CHAR_MAX
+ 1,
258 ATIME_PRESERVE_OPTION
,
262 CHECKPOINT_ACTION_OPTION
,
263 DELAY_DIRECTORY_RESTORE_OPTION
,
264 HARD_DEREFERENCE_OPTION
,
266 EXCLUDE_BACKUPS_OPTION
,
267 EXCLUDE_CACHES_OPTION
,
268 EXCLUDE_CACHES_UNDER_OPTION
,
269 EXCLUDE_CACHES_ALL_OPTION
,
272 EXCLUDE_TAG_UNDER_OPTION
,
273 EXCLUDE_TAG_ALL_OPTION
,
278 IGNORE_COMMAND_ERROR_OPTION
,
279 IGNORE_FAILED_READ_OPTION
,
281 KEEP_NEWER_FILES_OPTION
,
289 NO_AUTO_COMPRESS_OPTION
,
290 NO_CHECK_DEVICE_OPTION
,
291 NO_DELAY_DIRECTORY_RESTORE_OPTION
,
292 NO_IGNORE_CASE_OPTION
,
293 NO_IGNORE_COMMAND_ERROR_OPTION
,
295 NO_OVERWRITE_DIR_OPTION
,
296 NO_QUOTE_CHARS_OPTION
,
298 NO_SAME_OWNER_OPTION
,
299 NO_SAME_PERMISSIONS_OPTION
,
302 NO_WILDCARDS_MATCH_SLASH_OPTION
,
305 NUMERIC_OWNER_OPTION
,
308 ONE_FILE_SYSTEM_OPTION
,
309 OVERWRITE_DIR_OPTION
,
316 QUOTING_STYLE_OPTION
,
319 RECURSIVE_UNLINK_OPTION
,
325 SHOW_DEFAULTS_OPTION
,
326 SHOW_OMITTED_DIRS_OPTION
,
327 SHOW_TRANSFORMED_NAMES_OPTION
,
328 SPARSE_VERSION_OPTION
,
329 STRIP_COMPONENTS_OPTION
,
339 WILDCARDS_MATCH_SLASH_OPTION
,
343 const char *argp_program_version
= "tar (" PACKAGE_NAME
") " VERSION
;
344 const char *argp_program_bug_address
= "<" PACKAGE_BUGREPORT
">";
345 static char const doc
[] = N_("\
346 GNU `tar' saves many files together into a single tape or disk archive, \
347 and can restore individual files from the archive.\n\
350 tar -cf archive.tar foo bar # Create archive.tar from files foo and bar.\n\
351 tar -tvf archive.tar # List all files in archive.tar verbosely.\n\
352 tar -xf archive.tar # Extract all files from archive.tar.\n")
354 N_("The backup suffix is `~', unless set with --suffix or SIMPLE_BACKUP_SUFFIX.\n\
355 The version control may be set with --backup or VERSION_CONTROL, values are:\n\n\
356 none, off never make backups\n\
357 t, numbered make numbered backups\n\
358 nil, existing numbered if numbered backups exist, simple otherwise\n\
359 never, simple always make simple backups\n");
364 Available option letters are DEQY and eqy. Consider the following
367 [For Solaris tar compatibility =/= Is it important at all?]
368 e exit immediately with a nonzero exit status if unexpected errors occur
369 E use extended headers (--format=posix)
371 [q alias for --occurrence=1 =/= this would better be used for quiet?]
373 y per-file gzip compression
374 Y per-block gzip compression.
376 Additionally, the 'n' letter is assigned for option --seek, which
377 is probably not needed and should be marked as deprecated, so that
378 -n may become available in the future.
381 static struct argp_option options
[] = {
384 N_("Main operation mode:"), GRID
},
387 N_("list the contents of an archive"), GRID
+1 },
388 {"extract", 'x', 0, 0,
389 N_("extract files from an archive"), GRID
+1 },
390 {"get", 0, 0, OPTION_ALIAS
, NULL
, GRID
+1 },
391 {"create", 'c', 0, 0,
392 N_("create a new archive"), GRID
+1 },
394 N_("find differences between archive and file system"), GRID
+1 },
395 {"compare", 0, 0, OPTION_ALIAS
, NULL
, GRID
+1 },
396 {"append", 'r', 0, 0,
397 N_("append files to the end of an archive"), GRID
+1 },
398 {"update", 'u', 0, 0,
399 N_("only append files newer than copy in archive"), GRID
+1 },
400 {"catenate", 'A', 0, 0,
401 N_("append tar files to an archive"), GRID
+1 },
402 {"concatenate", 0, 0, OPTION_ALIAS
, NULL
, GRID
+1 },
403 {"delete", DELETE_OPTION
, 0, 0,
404 N_("delete from the archive (not on mag tapes!)"), GRID
+1 },
405 {"test-label", TEST_LABEL_OPTION
, NULL
, 0,
406 N_("test the archive volume label and exit"), GRID
+1 },
411 N_("Operation modifiers:"), GRID
},
413 {"sparse", 'S', 0, 0,
414 N_("handle sparse files efficiently"), GRID
+1 },
415 {"sparse-version", SPARSE_VERSION_OPTION
, N_("MAJOR[.MINOR]"), 0,
416 N_("set version of the sparse format to use (implies --sparse)"), GRID
+1},
417 {"incremental", 'G', 0, 0,
418 N_("handle old GNU-format incremental backup"), GRID
+1 },
419 {"listed-incremental", 'g', N_("FILE"), 0,
420 N_("handle new GNU-format incremental backup"), GRID
+1 },
421 {"level", LEVEL_OPTION
, N_("NUMBER"), 0,
422 N_("dump level for created listed-incremental archive"), GRID
+1 },
423 {"ignore-failed-read", IGNORE_FAILED_READ_OPTION
, 0, 0,
424 N_("do not exit with nonzero on unreadable files"), GRID
+1 },
425 {"occurrence", OCCURRENCE_OPTION
, N_("NUMBER"), OPTION_ARG_OPTIONAL
,
426 N_("process only the NUMBERth occurrence of each file in the archive;"
427 " this option is valid only in conjunction with one of the subcommands"
428 " --delete, --diff, --extract or --list and when a list of files"
429 " is given either on the command line or via the -T option;"
430 " NUMBER defaults to 1"), GRID
+1 },
431 {"seek", 'n', NULL
, 0,
432 N_("archive is seekable"), GRID
+1 },
433 {"no-seek", NO_SEEK_OPTION
, NULL
, 0,
434 N_("archive is not seekable"), GRID
+1 },
435 {"no-check-device", NO_CHECK_DEVICE_OPTION
, NULL
, 0,
436 N_("do not check device numbers when creating incremental archives"),
438 {"check-device", CHECK_DEVICE_OPTION
, NULL
, 0,
439 N_("check device numbers when creating incremental archives (default)"),
445 N_("Overwrite control:"), GRID
},
447 {"verify", 'W', 0, 0,
448 N_("attempt to verify the archive after writing it"), GRID
+1 },
449 {"remove-files", REMOVE_FILES_OPTION
, 0, 0,
450 N_("remove files after adding them to the archive"), GRID
+1 },
451 {"keep-old-files", 'k', 0, 0,
452 N_("don't replace existing files when extracting"), GRID
+1 },
453 {"keep-newer-files", KEEP_NEWER_FILES_OPTION
, 0, 0,
454 N_("don't replace existing files that are newer than their archive copies"), GRID
+1 },
455 {"overwrite", OVERWRITE_OPTION
, 0, 0,
456 N_("overwrite existing files when extracting"), GRID
+1 },
457 {"unlink-first", 'U', 0, 0,
458 N_("remove each file prior to extracting over it"), GRID
+1 },
459 {"recursive-unlink", RECURSIVE_UNLINK_OPTION
, 0, 0,
460 N_("empty hierarchies prior to extracting directory"), GRID
+1 },
461 {"no-overwrite-dir", NO_OVERWRITE_DIR_OPTION
, 0, 0,
462 N_("preserve metadata of existing directories"), GRID
+1 },
463 {"overwrite-dir", OVERWRITE_DIR_OPTION
, 0, 0,
464 N_("overwrite metadata of existing directories when extracting (default)"),
470 N_("Select output stream:"), GRID
},
472 {"to-stdout", 'O', 0, 0,
473 N_("extract files to standard output"), GRID
+1 },
474 {"to-command", TO_COMMAND_OPTION
, N_("COMMAND"), 0,
475 N_("pipe extracted files to another program"), GRID
+1 },
476 {"ignore-command-error", IGNORE_COMMAND_ERROR_OPTION
, 0, 0,
477 N_("ignore exit codes of children"), GRID
+1 },
478 {"no-ignore-command-error", NO_IGNORE_COMMAND_ERROR_OPTION
, 0, 0,
479 N_("treat non-zero exit codes of children as error"), GRID
+1 },
484 N_("Handling of file attributes:"), GRID
},
486 {"owner", OWNER_OPTION
, N_("NAME"), 0,
487 N_("force NAME as owner for added files"), GRID
+1 },
488 {"group", GROUP_OPTION
, N_("NAME"), 0,
489 N_("force NAME as group for added files"), GRID
+1 },
490 {"mtime", MTIME_OPTION
, N_("DATE-OR-FILE"), 0,
491 N_("set mtime for added files from DATE-OR-FILE"), GRID
+1 },
492 {"mode", MODE_OPTION
, N_("CHANGES"), 0,
493 N_("force (symbolic) mode CHANGES for added files"), GRID
+1 },
494 {"atime-preserve", ATIME_PRESERVE_OPTION
,
495 N_("METHOD"), OPTION_ARG_OPTIONAL
,
496 N_("preserve access times on dumped files, either by restoring the times"
497 " after reading (METHOD='replace'; default) or by not setting the times"
498 " in the first place (METHOD='system')"), GRID
+1 },
500 N_("don't extract file modified time"), GRID
+1 },
501 {"same-owner", SAME_OWNER_OPTION
, 0, 0,
502 N_("try extracting files with the same ownership as exists in the archive (default for superuser)"), GRID
+1 },
503 {"no-same-owner", NO_SAME_OWNER_OPTION
, 0, 0,
504 N_("extract files as yourself (default for ordinary users)"), GRID
+1 },
505 {"numeric-owner", NUMERIC_OWNER_OPTION
, 0, 0,
506 N_("always use numbers for user/group names"), GRID
+1 },
507 {"preserve-permissions", 'p', 0, 0,
508 N_("extract information about file permissions (default for superuser)"),
510 {"same-permissions", 0, 0, OPTION_ALIAS
, NULL
, GRID
+1 },
511 {"no-same-permissions", NO_SAME_PERMISSIONS_OPTION
, 0, 0,
512 N_("apply the user's umask when extracting permissions from the archive (default for ordinary users)"), GRID
+1 },
513 {"preserve-order", 's', 0, 0,
514 N_("sort names to extract to match archive"), GRID
+1 },
515 {"same-order", 0, 0, OPTION_ALIAS
, NULL
, GRID
+1 },
516 {"preserve", PRESERVE_OPTION
, 0, 0,
517 N_("same as both -p and -s"), GRID
+1 },
518 {"delay-directory-restore", DELAY_DIRECTORY_RESTORE_OPTION
, 0, 0,
519 N_("delay setting modification times and permissions of extracted"
520 " directories until the end of extraction"), GRID
+1 },
521 {"no-delay-directory-restore", NO_DELAY_DIRECTORY_RESTORE_OPTION
, 0, 0,
522 N_("cancel the effect of --delay-directory-restore option"), GRID
+1 },
527 N_("Device selection and switching:"), GRID
},
529 {"file", 'f', N_("ARCHIVE"), 0,
530 N_("use archive file or device ARCHIVE"), GRID
+1 },
531 {"force-local", FORCE_LOCAL_OPTION
, 0, 0,
532 N_("archive file is local even if it has a colon"), GRID
+1 },
533 {"rmt-command", RMT_COMMAND_OPTION
, N_("COMMAND"), 0,
534 N_("use given rmt COMMAND instead of rmt"), GRID
+1 },
535 {"rsh-command", RSH_COMMAND_OPTION
, N_("COMMAND"), 0,
536 N_("use remote COMMAND instead of rsh"), GRID
+1 },
538 {"-[0-7][lmh]", 0, NULL
, OPTION_DOC
, /* It is OK, since `name' will never be
540 N_("specify drive and density"), GRID
+1 },
542 {NULL
, '0', NULL
, OPTION_HIDDEN
, NULL
, GRID
+1 },
543 {NULL
, '1', NULL
, OPTION_HIDDEN
, NULL
, GRID
+1 },
544 {NULL
, '2', NULL
, OPTION_HIDDEN
, NULL
, GRID
+1 },
545 {NULL
, '3', NULL
, OPTION_HIDDEN
, NULL
, GRID
+1 },
546 {NULL
, '4', NULL
, OPTION_HIDDEN
, NULL
, GRID
+1 },
547 {NULL
, '5', NULL
, OPTION_HIDDEN
, NULL
, GRID
+1 },
548 {NULL
, '6', NULL
, OPTION_HIDDEN
, NULL
, GRID
+1 },
549 {NULL
, '7', NULL
, OPTION_HIDDEN
, NULL
, GRID
+1 },
550 {NULL
, '8', NULL
, OPTION_HIDDEN
, NULL
, GRID
+1 },
551 {NULL
, '9', NULL
, OPTION_HIDDEN
, NULL
, GRID
+1 },
553 {"multi-volume", 'M', 0, 0,
554 N_("create/list/extract multi-volume archive"), GRID
+1 },
555 {"tape-length", 'L', N_("NUMBER"), 0,
556 N_("change tape after writing NUMBER x 1024 bytes"), GRID
+1 },
557 {"info-script", 'F', N_("NAME"), 0,
558 N_("run script at end of each tape (implies -M)"), GRID
+1 },
559 {"new-volume-script", 0, 0, OPTION_ALIAS
, NULL
, GRID
+1 },
560 {"volno-file", VOLNO_FILE_OPTION
, N_("FILE"), 0,
561 N_("use/update the volume number in FILE"), GRID
+1 },
566 N_("Device blocking:"), GRID
},
568 {"blocking-factor", 'b', N_("BLOCKS"), 0,
569 N_("BLOCKS x 512 bytes per record"), GRID
+1 },
570 {"record-size", RECORD_SIZE_OPTION
, N_("NUMBER"), 0,
571 N_("NUMBER of bytes per record, multiple of 512"), GRID
+1 },
572 {"ignore-zeros", 'i', 0, 0,
573 N_("ignore zeroed blocks in archive (means EOF)"), GRID
+1 },
574 {"read-full-records", 'B', 0, 0,
575 N_("reblock as we read (for 4.2BSD pipes)"), GRID
+1 },
580 N_("Archive format selection:"), GRID
},
582 {"format", 'H', N_("FORMAT"), 0,
583 N_("create archive of the given format"), GRID
+1 },
585 {NULL
, 0, NULL
, 0, N_("FORMAT is one of the following:"), GRID
+2 },
586 {" v7", 0, NULL
, OPTION_DOC
|OPTION_NO_TRANS
, N_("old V7 tar format"),
588 {" oldgnu", 0, NULL
, OPTION_DOC
|OPTION_NO_TRANS
,
589 N_("GNU format as per tar <= 1.12"), GRID
+3 },
590 {" gnu", 0, NULL
, OPTION_DOC
|OPTION_NO_TRANS
,
591 N_("GNU tar 1.13.x format"), GRID
+3 },
592 {" ustar", 0, NULL
, OPTION_DOC
|OPTION_NO_TRANS
,
593 N_("POSIX 1003.1-1988 (ustar) format"), GRID
+3 },
594 {" pax", 0, NULL
, OPTION_DOC
|OPTION_NO_TRANS
,
595 N_("POSIX 1003.1-2001 (pax) format"), GRID
+3 },
596 {" posix", 0, NULL
, OPTION_DOC
|OPTION_NO_TRANS
, N_("same as pax"), GRID
+3 },
598 {"old-archive", OLD_ARCHIVE_OPTION
, 0, 0, /* FIXME */
599 N_("same as --format=v7"), GRID
+8 },
600 {"portability", 0, 0, OPTION_ALIAS
, NULL
, GRID
+8 },
601 {"posix", POSIX_OPTION
, 0, 0,
602 N_("same as --format=posix"), GRID
+8 },
603 {"pax-option", PAX_OPTION
, N_("keyword[[:]=value][,keyword[[:]=value]]..."), 0,
604 N_("control pax keywords"), GRID
+8 },
605 {"label", 'V', N_("TEXT"), 0,
606 N_("create archive with volume name TEXT; at list/extract time, use TEXT as a globbing pattern for volume name"), GRID
+8 },
611 N_("Compression options:"), GRID
},
612 {"auto-compress", 'a', 0, 0,
613 N_("use archive suffix to determine the compression program"), GRID
+1 },
614 {"no-auto-compress", NO_AUTO_COMPRESS_OPTION
, 0, 0,
615 N_("do not use archive suffix to determine the compression program"),
618 N_("filter the archive through bzip2"), GRID
+1 },
620 N_("filter the archive through gzip"), GRID
+1 },
621 {"gunzip", 0, 0, OPTION_ALIAS
, NULL
, GRID
+1 },
622 {"ungzip", 0, 0, OPTION_ALIAS
, NULL
, GRID
+1 },
623 {"compress", 'Z', 0, 0,
624 N_("filter the archive through compress"), GRID
+1 },
625 {"uncompress", 0, 0, OPTION_ALIAS
, NULL
, GRID
+1 },
626 {"lzma", LZMA_OPTION
, 0, 0,
627 N_("filter the archive through lzma"), GRID
+1 },
628 {"lzop", LZOP_OPTION
, 0, 0,
629 N_("filter the archive through lzop"), GRID
+8 },
631 N_("filter the archive through xz"), GRID
+8 },
632 {"use-compress-program", 'I', N_("PROG"), 0,
633 N_("filter through PROG (must accept -d)"), GRID
+1 },
638 N_("Local file selection:"), GRID
},
640 {"add-file", ARGP_KEY_ARG
, N_("FILE"), 0,
641 N_("add given FILE to the archive (useful if its name starts with a dash)"), GRID
+1 },
642 {"directory", 'C', N_("DIR"), 0,
643 N_("change to directory DIR"), GRID
+1 },
644 {"files-from", 'T', N_("FILE"), 0,
645 N_("get names to extract or create from FILE"), GRID
+1 },
646 {"null", NULL_OPTION
, 0, 0,
647 N_("-T reads null-terminated names, disable -C"), GRID
+1 },
648 {"no-null", NO_NULL_OPTION
, 0, 0,
649 N_("disable the effect of the previous --null option"), GRID
+1 },
650 {"unquote", UNQUOTE_OPTION
, 0, 0,
651 N_("unquote filenames read with -T (default)"), GRID
+1 },
652 {"no-unquote", NO_UNQUOTE_OPTION
, 0, 0,
653 N_("do not unquote filenames read with -T"), GRID
+1 },
654 {"exclude", EXCLUDE_OPTION
, N_("PATTERN"), 0,
655 N_("exclude files, given as a PATTERN"), GRID
+1 },
656 {"exclude-from", 'X', N_("FILE"), 0,
657 N_("exclude patterns listed in FILE"), GRID
+1 },
658 {"exclude-caches", EXCLUDE_CACHES_OPTION
, 0, 0,
659 N_("exclude contents of directories containing CACHEDIR.TAG, "
660 "except for the tag file itself"), GRID
+1 },
661 {"exclude-caches-under", EXCLUDE_CACHES_UNDER_OPTION
, 0, 0,
662 N_("exclude everything under directories containing CACHEDIR.TAG"),
664 {"exclude-caches-all", EXCLUDE_CACHES_ALL_OPTION
, 0, 0,
665 N_("exclude directories containing CACHEDIR.TAG"), GRID
+1 },
666 {"exclude-tag", EXCLUDE_TAG_OPTION
, N_("FILE"), 0,
667 N_("exclude contents of directories containing FILE, except"
668 " for FILE itself"), GRID
+1 },
669 {"exclude-tag-under", EXCLUDE_TAG_UNDER_OPTION
, N_("FILE"), 0,
670 N_("exclude everything under directories containing FILE"), GRID
+1 },
671 {"exclude-tag-all", EXCLUDE_TAG_ALL_OPTION
, N_("FILE"), 0,
672 N_("exclude directories containing FILE"), GRID
+1 },
673 {"exclude-vcs", EXCLUDE_VCS_OPTION
, NULL
, 0,
674 N_("exclude version control system directories"), GRID
+1 },
675 {"exclude-backups", EXCLUDE_BACKUPS_OPTION
, NULL
, 0,
676 N_("exclude backup and lock files"), GRID
+1 },
677 {"no-recursion", NO_RECURSION_OPTION
, 0, 0,
678 N_("avoid descending automatically in directories"), GRID
+1 },
679 {"one-file-system", ONE_FILE_SYSTEM_OPTION
, 0, 0,
680 N_("stay in local file system when creating archive"), GRID
+1 },
681 {"recursion", RECURSION_OPTION
, 0, 0,
682 N_("recurse into directories (default)"), GRID
+1 },
683 {"absolute-names", 'P', 0, 0,
684 N_("don't strip leading `/'s from file names"), GRID
+1 },
685 {"dereference", 'h', 0, 0,
686 N_("follow symlinks; archive and dump the files they point to"), GRID
+1 },
687 {"hard-dereference", HARD_DEREFERENCE_OPTION
, 0, 0,
688 N_("follow hard links; archive and dump the files they refer to"), GRID
+1 },
689 {"starting-file", 'K', N_("MEMBER-NAME"), 0,
690 N_("begin at member MEMBER-NAME in the archive"), GRID
+1 },
691 {"newer", 'N', N_("DATE-OR-FILE"), 0,
692 N_("only store files newer than DATE-OR-FILE"), GRID
+1 },
693 {"after-date", 0, 0, OPTION_ALIAS
, NULL
, GRID
+1 },
694 {"newer-mtime", NEWER_MTIME_OPTION
, N_("DATE"), 0,
695 N_("compare date and time when data changed only"), GRID
+1 },
696 {"backup", BACKUP_OPTION
, N_("CONTROL"), OPTION_ARG_OPTIONAL
,
697 N_("backup before removal, choose version CONTROL"), GRID
+1 },
698 {"suffix", SUFFIX_OPTION
, N_("STRING"), 0,
699 N_("backup before removal, override usual suffix ('~' unless overridden by environment variable SIMPLE_BACKUP_SUFFIX)"), GRID
+1 },
704 N_("File name transformations:"), GRID
},
705 {"strip-components", STRIP_COMPONENTS_OPTION
, N_("NUMBER"), 0,
706 N_("strip NUMBER leading components from file names on extraction"),
708 {"transform", TRANSFORM_OPTION
, N_("EXPRESSION"), 0,
709 N_("use sed replace EXPRESSION to transform file names"), GRID
+1 },
710 {"xform", 0, 0, OPTION_ALIAS
, NULL
, GRID
+1 },
715 N_("File name matching options (affect both exclude and include patterns):"),
717 {"ignore-case", IGNORE_CASE_OPTION
, 0, 0,
718 N_("ignore case"), GRID
+1 },
719 {"anchored", ANCHORED_OPTION
, 0, 0,
720 N_("patterns match file name start"), GRID
+1 },
721 {"no-anchored", NO_ANCHORED_OPTION
, 0, 0,
722 N_("patterns match after any `/' (default for exclusion)"), GRID
+1 },
723 {"no-ignore-case", NO_IGNORE_CASE_OPTION
, 0, 0,
724 N_("case sensitive matching (default)"), GRID
+1 },
725 {"wildcards", WILDCARDS_OPTION
, 0, 0,
726 N_("use wildcards (default for exclusion)"), GRID
+1 },
727 {"no-wildcards", NO_WILDCARDS_OPTION
, 0, 0,
728 N_("verbatim string matching"), GRID
+1 },
729 {"no-wildcards-match-slash", NO_WILDCARDS_MATCH_SLASH_OPTION
, 0, 0,
730 N_("wildcards do not match `/'"), GRID
+1 },
731 {"wildcards-match-slash", WILDCARDS_MATCH_SLASH_OPTION
, 0, 0,
732 N_("wildcards match `/' (default for exclusion)"), GRID
+1 },
737 N_("Informative output:"), GRID
},
739 {"verbose", 'v', 0, 0,
740 N_("verbosely list files processed"), GRID
+1 },
741 {"warning", WARNING_OPTION
, N_("KEYWORD"), 0,
742 N_("warning control"), GRID
+1 },
743 {"checkpoint", CHECKPOINT_OPTION
, N_("NUMBER"), OPTION_ARG_OPTIONAL
,
744 N_("display progress messages every NUMBERth record (default 10)"),
746 {"checkpoint-action", CHECKPOINT_ACTION_OPTION
, N_("ACTION"), 0,
747 N_("execute ACTION on each checkpoint"),
749 {"check-links", 'l', 0, 0,
750 N_("print a message if not all links are dumped"), GRID
+1 },
751 {"totals", TOTALS_OPTION
, N_("SIGNAL"), OPTION_ARG_OPTIONAL
,
752 N_("print total bytes after processing the archive; "
753 "with an argument - print total bytes when this SIGNAL is delivered; "
754 "Allowed signals are: SIGHUP, SIGQUIT, SIGINT, SIGUSR1 and SIGUSR2; "
755 "the names without SIG prefix are also accepted"), GRID
+1 },
756 {"utc", UTC_OPTION
, 0, 0,
757 N_("print file modification dates in UTC"), GRID
+1 },
758 {"index-file", INDEX_FILE_OPTION
, N_("FILE"), 0,
759 N_("send verbose output to FILE"), GRID
+1 },
760 {"block-number", 'R', 0, 0,
761 N_("show block number within archive with each message"), GRID
+1 },
762 {"interactive", 'w', 0, 0,
763 N_("ask for confirmation for every action"), GRID
+1 },
764 {"confirmation", 0, 0, OPTION_ALIAS
, NULL
, GRID
+1 },
765 {"show-defaults", SHOW_DEFAULTS_OPTION
, 0, 0,
766 N_("show tar defaults"), GRID
+1 },
767 {"show-omitted-dirs", SHOW_OMITTED_DIRS_OPTION
, 0, 0,
768 N_("when listing or extracting, list each directory that does not match search criteria"), GRID
+1 },
769 {"show-transformed-names", SHOW_TRANSFORMED_NAMES_OPTION
, 0, 0,
770 N_("show file or archive names after transformation"),
772 {"show-stored-names", 0, 0, OPTION_ALIAS
, NULL
, GRID
+1 },
773 {"quoting-style", QUOTING_STYLE_OPTION
, N_("STYLE"), 0,
774 N_("set name quoting style; see below for valid STYLE values"), GRID
+1 },
775 {"quote-chars", QUOTE_CHARS_OPTION
, N_("STRING"), 0,
776 N_("additionally quote characters from STRING"), GRID
+1 },
777 {"no-quote-chars", NO_QUOTE_CHARS_OPTION
, N_("STRING"), 0,
778 N_("disable quoting for characters from STRING"), GRID
+1 },
783 N_("Compatibility options:"), GRID
},
786 N_("when creating, same as --old-archive; when extracting, same as --no-same-owner"), GRID
+1 },
791 N_("Other options:"), GRID
},
793 {"restrict", RESTRICT_OPTION
, 0, 0,
794 N_("disable use of some potentially harmful options"), -1 },
800 static char const *const atime_preserve_args
[] =
802 "replace", "system", NULL
805 static enum atime_preserve
const atime_preserve_types
[] =
807 replace_atime_preserve
, system_atime_preserve
810 /* Make sure atime_preserve_types has as much entries as atime_preserve_args
811 (minus 1 for NULL guard) */
812 ARGMATCH_VERIFY (atime_preserve_args
, atime_preserve_types
);
814 /* Wildcard matching settings */
817 default_wildcards
, /* For exclusion == enable_wildcards,
818 for inclusion == disable_wildcards */
823 struct tar_args
/* Variables used during option parsing */
825 struct textual_date
*textual_date
; /* Keeps the arguments to --newer-mtime
826 and/or --date option if they are
828 enum wildcards wildcards
; /* Wildcard settings (--wildcards/
830 int matching_flags
; /* exclude_fnmatch options */
831 int include_anchored
; /* Pattern anchoring options used for
833 bool o_option
; /* True if -o option was given */
834 bool pax_option
; /* True if --pax-option was given */
835 char const *backup_suffix_string
; /* --suffix option argument */
836 char const *version_control_string
; /* --backup option argument */
837 bool input_files
; /* True if some input files where given */
838 int compress_autodetect
; /* True if compression autodetection should
839 be attempted when creating archives */
843 #define MAKE_EXCL_OPTIONS(args) \
844 ((((args)->wildcards != disable_wildcards) ? EXCLUDE_WILDCARDS : 0) \
845 | (args)->matching_flags \
848 #define MAKE_INCL_OPTIONS(args) \
849 ((((args)->wildcards == enable_wildcards) ? EXCLUDE_WILDCARDS : 0) \
850 | (args)->include_anchored \
851 | (args)->matching_flags \
854 static char const * const vcs_file_table
[] = {
886 static char const * const backup_file_table
[] = {
894 add_exclude_array (char const * const * fv
)
898 for (i
= 0; fv
[i
]; i
++)
899 add_exclude (excluded
, fv
[i
], 0);
904 format_default_settings (void)
909 "--format=%s -f%s -b%d --quoting-style=%s --rmt-command=%s"
914 archive_format_string (DEFAULT_ARCHIVE_FORMAT
),
915 DEFAULT_ARCHIVE
, DEFAULT_BLOCKING
,
916 quoting_style_args
[DEFAULT_QUOTING_STYLE
],
927 set_subcommand_option (enum subcommand subcommand
)
929 if (subcommand_option
!= UNKNOWN_SUBCOMMAND
930 && subcommand_option
!= subcommand
)
932 _("You may not specify more than one `-Acdtrux' option")));
934 subcommand_option
= subcommand
;
938 set_use_compress_program_option (const char *string
)
940 if (use_compress_program_option
941 && strcmp (use_compress_program_option
, string
) != 0)
942 USAGE_ERROR ((0, 0, _("Conflicting compression options")));
944 use_compress_program_option
= string
;
951 print_total_stats ();
952 #ifndef HAVE_SIGACTION
953 signal (signo
, sigstat
);
958 stat_on_signal (int signo
)
960 #ifdef HAVE_SIGACTION
961 struct sigaction act
;
962 act
.sa_handler
= sigstat
;
963 sigemptyset (&act
.sa_mask
);
965 sigaction (signo
, &act
, NULL
);
967 signal (signo
, sigstat
);
972 set_stat_signal (const char *name
)
979 { "SIGUSR1", SIGUSR1
},
981 { "SIGUSR2", SIGUSR2
},
983 { "SIGHUP", SIGHUP
},
985 { "SIGINT", SIGINT
},
987 { "SIGQUIT", SIGQUIT
},
992 for (p
= sigtab
; p
< sigtab
+ sizeof (sigtab
) / sizeof (sigtab
[0]); p
++)
993 if (strcmp (p
->name
, name
) == 0)
995 stat_on_signal (p
->signo
);
998 FATAL_ERROR ((0, 0, _("Unknown signal name: %s"), name
));
1004 struct textual_date
*next
;
1011 get_date_or_file (struct tar_args
*args
, const char *option
,
1012 const char *str
, struct timespec
*ts
)
1014 if (FILE_SYSTEM_PREFIX_LEN (str
) != 0
1019 if (deref_stat (dereference_option
, str
, &st
) != 0)
1022 USAGE_ERROR ((0, 0, _("Date sample file not found")));
1024 *ts
= get_stat_mtime (&st
);
1028 if (! get_date (ts
, str
, NULL
))
1030 WARN ((0, 0, _("Substituting %s for unknown date format %s"),
1031 tartime (*ts
, false), quote (str
)));
1037 struct textual_date
*p
= xmalloc (sizeof (*p
));
1040 p
->date
= xstrdup (str
);
1041 p
->next
= args
->textual_date
;
1042 args
->textual_date
= p
;
1049 report_textual_dates (struct tar_args
*args
)
1051 struct textual_date
*p
;
1052 for (p
= args
->textual_date
; p
; )
1054 struct textual_date
*next
= p
->next
;
1057 char const *treated_as
= tartime (p
->ts
, true);
1058 if (strcmp (p
->date
, treated_as
) != 0)
1059 WARN ((0, 0, _("Option %s: Treating date `%s' as %s"),
1060 p
->option
, p
->date
, treated_as
));
1070 /* Either NL or NUL, as decided by the --null option. */
1071 static char filename_terminator
;
1073 enum read_file_list_state
/* Result of reading file name from the list file */
1075 file_list_success
, /* OK, name read successfully */
1076 file_list_end
, /* End of list file */
1077 file_list_zero
, /* Zero separator encountered where it should not */
1078 file_list_skip
/* Empty (zero-length) entry encountered, skip it */
1081 /* Read from FP a sequence of characters up to TERM and put them
1084 static enum read_file_list_state
1085 read_name_from_file (FILE *fp
, struct obstack
*stk
, int term
)
1090 for (c
= getc (fp
); c
!= EOF
&& c
!= term
; c
= getc (fp
))
1094 /* We have read a zero separator. The file possibly is
1096 return file_list_zero
;
1098 obstack_1grow (stk
, c
);
1102 if (counter
== 0 && c
!= EOF
)
1103 return file_list_skip
;
1105 obstack_1grow (stk
, 0);
1107 return (counter
== 0 && c
== EOF
) ? file_list_end
: file_list_success
;
1111 static bool files_from_option
; /* When set, tar will not refuse to create
1113 static struct obstack argv_stk
; /* Storage for additional command line options
1114 read using -T option */
1116 /* Prevent recursive inclusion of the same file */
1119 struct file_id_list
*next
;
1124 static struct file_id_list
*file_id_list
;
1127 add_file_id (const char *filename
)
1129 struct file_id_list
*p
;
1132 if (stat (filename
, &st
))
1133 stat_fatal (filename
);
1134 for (p
= file_id_list
; p
; p
= p
->next
)
1135 if (p
->ino
== st
.st_ino
&& p
->dev
== st
.st_dev
)
1137 FATAL_ERROR ((0, 0, _("%s: file list already read"),
1138 quotearg_colon (filename
)));
1140 p
= xmalloc (sizeof *p
);
1141 p
->next
= file_id_list
;
1147 /* Default density numbers for [0-9][lmh] device specifications */
1149 #ifndef LOW_DENSITY_NUM
1150 # define LOW_DENSITY_NUM 0
1153 #ifndef MID_DENSITY_NUM
1154 # define MID_DENSITY_NUM 8
1157 #ifndef HIGH_DENSITY_NUM
1158 # define HIGH_DENSITY_NUM 16
1162 update_argv (const char *filename
, struct argp_state
*state
)
1165 size_t count
= 0, i
;
1169 bool is_stdin
= false;
1170 enum read_file_list_state read_state
;
1171 int term
= filename_terminator
;
1173 if (!strcmp (filename
, "-"))
1176 request_stdin ("-T");
1181 add_file_id (filename
);
1182 if ((fp
= fopen (filename
, "r")) == NULL
)
1183 open_fatal (filename
);
1186 while ((read_state
= read_name_from_file (fp
, &argv_stk
, term
))
1191 case file_list_success
:
1195 case file_list_end
: /* won't happen, just to pacify gcc */
1198 case file_list_zero
:
1202 WARNOPT (WARN_FILENAME_WITH_NULS
,
1203 (0, 0, N_("%s: file name read contains nul character"),
1204 quotearg_colon (filename
)));
1206 /* Prepare new stack contents */
1207 size
= obstack_object_size (&argv_stk
);
1208 p
= obstack_finish (&argv_stk
);
1209 for (; size
> 0; size
--, p
++)
1211 obstack_1grow (&argv_stk
, *p
);
1213 obstack_1grow (&argv_stk
, '\n');
1214 obstack_1grow (&argv_stk
, 0);
1216 /* Read rest of files using new filename terminator */
1221 case file_list_skip
:
1232 start
= obstack_finish (&argv_stk
);
1235 for (p
= start
; *p
; p
+= strlen (p
) + 1)
1239 new_argc
= state
->argc
+ count
;
1240 new_argv
= xmalloc (sizeof (state
->argv
[0]) * (new_argc
+ 1));
1241 memcpy (new_argv
, state
->argv
, sizeof (state
->argv
[0]) * (state
->argc
+ 1));
1242 state
->argv
= new_argv
;
1243 memmove (&state
->argv
[state
->next
+ count
], &state
->argv
[state
->next
],
1244 (state
->argc
- state
->next
+ 1) * sizeof (state
->argv
[0]));
1246 state
->argc
= new_argc
;
1248 for (i
= state
->next
, p
= start
; *p
; p
+= strlen (p
) + 1, i
++)
1250 if (term
== 0 && p
[0] == '-')
1251 state
->argv
[i
++] = "--add-file";
1258 tar_help_filter (int key
, const char *text
, void *input
)
1263 if (key
!= ARGP_KEY_HELP_EXTRA
)
1264 return (char*) text
;
1266 obstack_init (&stk
);
1267 s
= _("Valid arguments for the --quoting-style option are:");
1268 obstack_grow (&stk
, s
, strlen (s
));
1269 obstack_grow (&stk
, "\n\n", 2);
1270 tar_list_quoting_styles (&stk
, " ");
1271 s
= _("\n*This* tar defaults to:\n");
1272 obstack_grow (&stk
, s
, strlen (s
));
1273 s
= format_default_settings ();
1274 obstack_grow (&stk
, s
, strlen (s
));
1275 obstack_1grow (&stk
, '\n');
1276 obstack_1grow (&stk
, 0);
1277 s
= xstrdup (obstack_finish (&stk
));
1278 obstack_free (&stk
, NULL
);
1283 expand_pax_option (struct tar_args
*targs
, const char *arg
)
1288 obstack_init (&stk
);
1291 size_t seglen
= strcspn (arg
, ",");
1292 char *p
= memchr (arg
, '=', seglen
);
1295 size_t len
= p
- arg
+ 1;
1296 obstack_grow (&stk
, arg
, len
);
1298 for (++p
; *p
&& isspace ((unsigned char) *p
); p
++)
1300 if (*p
== '{' && p
[len
-1] == '}')
1303 char *tmp
= xmalloc (len
);
1304 memcpy (tmp
, p
+ 1, len
-2);
1306 if (get_date_or_file (targs
, "--pax-option", tmp
, &ts
) == 0)
1308 char buf
[UINTMAX_STRSIZE_BOUND
], *s
;
1309 s
= umaxtostr (ts
.tv_sec
, buf
);
1310 obstack_grow (&stk
, s
, strlen (s
));
1313 obstack_grow (&stk
, p
, len
);
1317 obstack_grow (&stk
, p
, len
);
1320 obstack_grow (&stk
, arg
, seglen
);
1325 obstack_1grow (&stk
, *arg
);
1329 obstack_1grow (&stk
, 0);
1330 res
= xstrdup (obstack_finish (&stk
));
1331 obstack_free (&stk
, NULL
);
1337 parse_opt (int key
, char *arg
, struct argp_state
*state
)
1339 struct tar_args
*args
= state
->input
;
1344 /* File name or non-parsed option, because of ARGP_IN_ORDER */
1345 name_add_name (arg
, MAKE_INCL_OPTIONS (args
));
1346 args
->input_files
= true;
1350 set_subcommand_option (CAT_SUBCOMMAND
);
1354 args
->compress_autodetect
= true;
1357 case NO_AUTO_COMPRESS_OPTION
:
1358 args
->compress_autodetect
= false;
1364 if (! (xstrtoumax (arg
, 0, 10, &u
, "") == LONGINT_OK
1365 && u
== (blocking_factor
= u
)
1366 && 0 < blocking_factor
1367 && u
== (record_size
= u
* BLOCKSIZE
) / BLOCKSIZE
))
1368 USAGE_ERROR ((0, 0, "%s: %s", quotearg_colon (arg
),
1369 _("Invalid blocking factor")));
1374 /* Try to reblock input records. For reading 4.2BSD pipes. */
1376 /* It would surely make sense to exchange -B and -R, but it seems
1377 that -B has been used for a long while in Sun tar and most
1378 BSD-derived systems. This is a consequence of the block/record
1379 terminology confusion. */
1381 read_full_records_option
= true;
1385 set_subcommand_option (CREATE_SUBCOMMAND
);
1393 set_subcommand_option (DIFF_SUBCOMMAND
);
1397 if (archive_names
== allocated_archive_names
)
1398 archive_name_array
= x2nrealloc (archive_name_array
,
1399 &allocated_archive_names
,
1400 sizeof (archive_name_array
[0]));
1402 archive_name_array
[archive_names
++] = arg
;
1406 /* Since -F is only useful with -M, make it implied. Run this
1407 script at the end of each tape. */
1409 info_script_option
= arg
;
1410 multi_volume_option
= true;
1414 listed_incremental_option
= arg
;
1415 after_date_option
= true;
1419 /* We are making an incremental dump (FIXME: are we?); save
1420 directories at the beginning of the archive, and include in each
1421 directory its contents. */
1423 incremental_option
= true;
1427 /* Follow symbolic links. */
1428 dereference_option
= true;
1431 case HARD_DEREFERENCE_OPTION
:
1432 hard_dereference_option
= true;
1436 /* Ignore zero blocks (eofs). This can't be the default,
1437 because Unix tar writes two blocks of zeros, then pads out
1438 the record with garbage. */
1440 ignore_zeros_option
= true;
1444 set_use_compress_program_option ("bzip2");
1448 set_use_compress_program_option ("xz");
1452 /* Don't replace existing files. */
1453 old_files_option
= KEEP_OLD_FILES
;
1457 starting_file_option
= true;
1458 addname (arg
, 0, true, NULL
);
1461 case ONE_FILE_SYSTEM_OPTION
:
1462 /* When dumping directories, don't dump files/subdirectories
1463 that are on other filesystems. */
1464 one_file_system_option
= true;
1468 check_links_option
= 1;
1474 if (xstrtoumax (arg
, 0, 10, &u
, "") != LONGINT_OK
)
1475 USAGE_ERROR ((0, 0, "%s: %s", quotearg_colon (arg
),
1476 _("Invalid tape length")));
1477 tape_length_option
= 1024 * (tarlong
) u
;
1478 multi_volume_option
= true;
1485 incremental_level
= strtoul (arg
, &p
, 10);
1487 USAGE_ERROR ((0, 0, _("Invalid incremental level value")));
1492 set_use_compress_program_option ("lzma");
1496 set_use_compress_program_option ("lzop");
1500 touch_option
= true;
1504 /* Make multivolume archive: when we can't write any more into
1505 the archive, re-open it, and continue writing. */
1507 multi_volume_option
= true;
1511 get_date_or_file (args
, "--mtime", arg
, &mtime_option
);
1512 set_mtime_option
= true;
1519 case NO_SEEK_OPTION
:
1524 after_date_option
= true;
1527 case NEWER_MTIME_OPTION
:
1528 if (NEWER_OPTION_INITIALIZED (newer_mtime_option
))
1529 USAGE_ERROR ((0, 0, _("More than one threshold date")));
1530 get_date_or_file (args
,
1531 key
== NEWER_MTIME_OPTION
? "--newer-mtime"
1532 : "--after-date", arg
, &newer_mtime_option
);
1536 args
->o_option
= true;
1540 to_stdout_option
= true;
1544 same_permissions_option
= true;
1548 absolute_names_option
= true;
1552 set_subcommand_option (APPEND_SUBCOMMAND
);
1556 /* Print block numbers for debugging bad tar archives. */
1558 /* It would surely make sense to exchange -B and -R, but it seems
1559 that -B has been used for a long while in Sun tar and most
1560 BSD-derived systems. This is a consequence of the block/record
1561 terminology confusion. */
1563 block_number_option
= true;
1567 /* Names to extract are sorted. */
1569 same_order_option
= true;
1573 sparse_option
= true;
1576 case SPARSE_VERSION_OPTION
:
1577 sparse_option
= true;
1580 tar_sparse_major
= strtoul (arg
, &p
, 10);
1584 USAGE_ERROR ((0, 0, _("Invalid sparse version value")));
1585 tar_sparse_minor
= strtoul (p
+ 1, &p
, 10);
1587 USAGE_ERROR ((0, 0, _("Invalid sparse version value")));
1593 set_subcommand_option (LIST_SUBCOMMAND
);
1597 case TEST_LABEL_OPTION
:
1598 set_subcommand_option (LIST_SUBCOMMAND
);
1599 test_label_option
= true;
1603 update_argv (arg
, state
);
1604 /* Indicate we've been given -T option. This is for backward
1605 compatibility only, so that `tar cfT archive /dev/null will
1607 files_from_option
= true;
1611 set_subcommand_option (UPDATE_SUBCOMMAND
);
1615 old_files_option
= UNLINK_FIRST_OLD_FILES
;
1624 warning_option
|= WARN_VERBOSE_WARNINGS
;
1628 volume_label_option
= arg
;
1632 interactive_option
= true;
1636 verify_option
= true;
1640 set_subcommand_option (EXTRACT_SUBCOMMAND
);
1644 if (add_exclude_file (add_exclude
, excluded
, arg
,
1645 MAKE_EXCL_OPTIONS (args
), '\n')
1649 FATAL_ERROR ((0, e
, "%s", quotearg_colon (arg
)));
1654 set_use_compress_program_option ("gzip");
1658 set_use_compress_program_option ("compress");
1661 case ANCHORED_OPTION
:
1662 args
->matching_flags
|= EXCLUDE_ANCHORED
;
1665 case ATIME_PRESERVE_OPTION
:
1666 atime_preserve_option
=
1668 ? XARGMATCH ("--atime-preserve", arg
,
1669 atime_preserve_args
, atime_preserve_types
)
1670 : replace_atime_preserve
);
1671 if (! O_NOATIME
&& atime_preserve_option
== system_atime_preserve
)
1673 _("--atime-preserve='system' is not supported"
1674 " on this platform")));
1677 case CHECK_DEVICE_OPTION
:
1678 check_device_option
= true;
1681 case NO_CHECK_DEVICE_OPTION
:
1682 check_device_option
= false;
1685 case CHECKPOINT_OPTION
:
1692 checkpoint_compile_action (".");
1695 checkpoint_option
= strtoul (arg
, &p
, 0);
1698 _("--checkpoint value is not an integer")));
1701 checkpoint_option
= DEFAULT_CHECKPOINT
;
1704 case CHECKPOINT_ACTION_OPTION
:
1705 checkpoint_compile_action (arg
);
1709 backup_option
= true;
1711 args
->version_control_string
= arg
;
1714 case DELAY_DIRECTORY_RESTORE_OPTION
:
1715 delay_directory_restore_option
= true;
1718 case NO_DELAY_DIRECTORY_RESTORE_OPTION
:
1719 delay_directory_restore_option
= false;
1723 set_subcommand_option (DELETE_SUBCOMMAND
);
1726 case EXCLUDE_BACKUPS_OPTION
:
1727 add_exclude_array (backup_file_table
);
1730 case EXCLUDE_OPTION
:
1731 add_exclude (excluded
, arg
, MAKE_EXCL_OPTIONS (args
));
1734 case EXCLUDE_CACHES_OPTION
:
1735 add_exclusion_tag ("CACHEDIR.TAG", exclusion_tag_contents
,
1739 case EXCLUDE_CACHES_UNDER_OPTION
:
1740 add_exclusion_tag ("CACHEDIR.TAG", exclusion_tag_under
,
1744 case EXCLUDE_CACHES_ALL_OPTION
:
1745 add_exclusion_tag ("CACHEDIR.TAG", exclusion_tag_all
,
1749 case EXCLUDE_TAG_OPTION
:
1750 add_exclusion_tag (arg
, exclusion_tag_contents
, NULL
);
1753 case EXCLUDE_TAG_UNDER_OPTION
:
1754 add_exclusion_tag (arg
, exclusion_tag_under
, NULL
);
1757 case EXCLUDE_TAG_ALL_OPTION
:
1758 add_exclusion_tag (arg
, exclusion_tag_all
, NULL
);
1761 case EXCLUDE_VCS_OPTION
:
1762 add_exclude_array (vcs_file_table
);
1765 case FORCE_LOCAL_OPTION
:
1766 force_local_option
= true;
1770 set_archive_format (arg
);
1773 case INDEX_FILE_OPTION
:
1774 index_file_name
= arg
;
1777 case IGNORE_CASE_OPTION
:
1778 args
->matching_flags
|= FNM_CASEFOLD
;
1781 case IGNORE_COMMAND_ERROR_OPTION
:
1782 ignore_command_error_option
= true;
1785 case IGNORE_FAILED_READ_OPTION
:
1786 ignore_failed_read_option
= true;
1789 case KEEP_NEWER_FILES_OPTION
:
1790 old_files_option
= KEEP_NEWER_FILES
;
1794 if (! (strlen (arg
) < GNAME_FIELD_SIZE
1795 && gname_to_gid (arg
, &group_option
)))
1798 if (xstrtoumax (arg
, 0, 10, &g
, "") == LONGINT_OK
1802 FATAL_ERROR ((0, 0, "%s: %s", quotearg_colon (arg
),
1803 _("Invalid group")));
1808 mode_option
= mode_compile (arg
);
1810 FATAL_ERROR ((0, 0, _("Invalid mode given on option")));
1811 initial_umask
= umask (0);
1812 umask (initial_umask
);
1815 case NO_ANCHORED_OPTION
:
1816 args
->include_anchored
= 0; /* Clear the default for comman line args */
1817 args
->matching_flags
&= ~ EXCLUDE_ANCHORED
;
1820 case NO_IGNORE_CASE_OPTION
:
1821 args
->matching_flags
&= ~ FNM_CASEFOLD
;
1824 case NO_IGNORE_COMMAND_ERROR_OPTION
:
1825 ignore_command_error_option
= false;
1828 case NO_OVERWRITE_DIR_OPTION
:
1829 old_files_option
= NO_OVERWRITE_DIR_OLD_FILES
;
1832 case NO_QUOTE_CHARS_OPTION
:
1834 set_char_quoting (NULL
, *arg
, 0);
1837 case NO_WILDCARDS_OPTION
:
1838 args
->wildcards
= disable_wildcards
;
1841 case NO_WILDCARDS_MATCH_SLASH_OPTION
:
1842 args
->matching_flags
|= FNM_FILE_NAME
;
1846 filename_terminator
= '\0';
1849 case NO_NULL_OPTION
:
1850 filename_terminator
= '\n';
1853 case NUMERIC_OWNER_OPTION
:
1854 numeric_owner_option
= true;
1857 case OCCURRENCE_OPTION
:
1859 occurrence_option
= 1;
1863 if (xstrtoumax (arg
, 0, 10, &u
, "") == LONGINT_OK
)
1864 occurrence_option
= u
;
1866 FATAL_ERROR ((0, 0, "%s: %s", quotearg_colon (arg
),
1867 _("Invalid number")));
1871 case OVERWRITE_DIR_OPTION
:
1872 old_files_option
= DEFAULT_OLD_FILES
;
1875 case OVERWRITE_OPTION
:
1876 old_files_option
= OVERWRITE_OLD_FILES
;
1880 if (! (strlen (arg
) < UNAME_FIELD_SIZE
1881 && uname_to_uid (arg
, &owner_option
)))
1884 if (xstrtoumax (arg
, 0, 10, &u
, "") == LONGINT_OK
1888 FATAL_ERROR ((0, 0, "%s: %s", quotearg_colon (arg
),
1889 _("Invalid owner")));
1893 case QUOTE_CHARS_OPTION
:
1895 set_char_quoting (NULL
, *arg
, 1);
1898 case QUOTING_STYLE_OPTION
:
1899 tar_set_quoting_style (arg
);
1904 char *tmp
= expand_pax_option (args
, arg
);
1905 args
->pax_option
= true;
1906 xheader_set_option (tmp
);
1912 set_archive_format ("posix");
1915 case PRESERVE_OPTION
:
1916 /* FIXME: What it is good for? */
1917 same_permissions_option
= true;
1918 same_order_option
= true;
1919 WARN ((0, 0, _("The --preserve option is deprecated, "
1920 "use --preserve-permissions --preserve-order instead")));
1923 case RECORD_SIZE_OPTION
:
1926 if (! (xstrtoumax (arg
, 0, 10, &u
, "") == 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 STRIP_COMPONENTS_OPTION
:
1970 if (! (xstrtoumax (arg
, 0, 10, &u
, "") == LONGINT_OK
1971 && u
== (size_t) u
))
1972 USAGE_ERROR ((0, 0, "%s: %s", quotearg_colon (arg
),
1973 _("Invalid number of elements")));
1974 strip_name_components
= u
;
1978 case SHOW_OMITTED_DIRS_OPTION
:
1979 show_omitted_dirs_option
= true;
1982 case SHOW_TRANSFORMED_NAMES_OPTION
:
1983 show_transformed_names_option
= true;
1987 backup_option
= true;
1988 args
->backup_suffix_string
= arg
;
1991 case TO_COMMAND_OPTION
:
1992 if (to_command_option
)
1993 USAGE_ERROR ((0, 0, _("Only one --to-command option allowed")));
1994 to_command_option
= arg
;
1999 set_stat_signal (arg
);
2001 totals_option
= true;
2004 case TRANSFORM_OPTION
:
2005 set_transform_expr (arg
);
2009 set_use_compress_program_option (arg
);
2012 case VOLNO_FILE_OPTION
:
2013 volno_file_option
= arg
;
2016 case WILDCARDS_OPTION
:
2017 args
->wildcards
= enable_wildcards
;
2020 case WILDCARDS_MATCH_SLASH_OPTION
:
2021 args
->matching_flags
&= ~ FNM_FILE_NAME
;
2024 case NO_RECURSION_OPTION
:
2025 recursion_option
= 0;
2028 case NO_SAME_OWNER_OPTION
:
2029 same_owner_option
= -1;
2032 case NO_SAME_PERMISSIONS_OPTION
:
2033 same_permissions_option
= -1;
2036 case RECURSION_OPTION
:
2037 recursion_option
= FNM_LEADING_DIR
;
2040 case SAME_OWNER_OPTION
:
2041 same_owner_option
= 1;
2044 case UNQUOTE_OPTION
:
2045 unquote_option
= true;
2048 case NO_UNQUOTE_OPTION
:
2049 unquote_option
= false;
2052 case WARNING_OPTION
:
2053 set_warning_option (arg
);
2065 #ifdef DEVICE_PREFIX
2067 int device
= key
- '0';
2069 static char buf
[sizeof DEVICE_PREFIX
+ 10];
2073 argp_error (state
, _("Malformed density argument: %s"), quote (arg
));
2075 strcpy (buf
, DEVICE_PREFIX
);
2076 cursor
= buf
+ strlen (buf
);
2078 #ifdef DENSITY_LETTER
2080 sprintf (cursor
, "%d%c", device
, arg
[0]);
2082 #else /* not DENSITY_LETTER */
2087 device
+= LOW_DENSITY_NUM
;
2091 device
+= MID_DENSITY_NUM
;
2095 device
+= HIGH_DENSITY_NUM
;
2099 argp_error (state
, _("Unknown density: `%c'"), arg
[0]);
2101 sprintf (cursor
, "%d", device
);
2103 #endif /* not DENSITY_LETTER */
2105 if (archive_names
== allocated_archive_names
)
2106 archive_name_array
= x2nrealloc (archive_name_array
,
2107 &allocated_archive_names
,
2108 sizeof (archive_name_array
[0]));
2109 archive_name_array
[archive_names
++] = xstrdup (buf
);
2113 #else /* not DEVICE_PREFIX */
2116 _("Options `-[0-7][lmh]' not supported by *this* tar"));
2118 #endif /* not DEVICE_PREFIX */
2121 return ARGP_ERR_UNKNOWN
;
2126 static struct argp argp
= {
2139 argp_help (&argp
, stderr
, ARGP_HELP_SEE
, (char*) program_name
);
2144 /* Parse the options for tar. */
2146 static struct argp_option
*
2147 find_argp_option (struct argp_option
*o
, int letter
)
2154 && o
->doc
== NULL
); o
++)
2155 if (o
->key
== letter
)
2160 static const char *tar_authors
[] = {
2167 decode_options (int argc
, char **argv
)
2170 struct tar_args args
;
2172 argp_version_setup ("tar", tar_authors
);
2174 /* Set some default option values. */
2175 args
.textual_date
= NULL
;
2176 args
.wildcards
= default_wildcards
;
2177 args
.matching_flags
= 0;
2178 args
.include_anchored
= EXCLUDE_ANCHORED
;
2179 args
.o_option
= false;
2180 args
.pax_option
= false;
2181 args
.backup_suffix_string
= getenv ("SIMPLE_BACKUP_SUFFIX");
2182 args
.version_control_string
= 0;
2183 args
.input_files
= false;
2184 args
.compress_autodetect
= false;
2186 subcommand_option
= UNKNOWN_SUBCOMMAND
;
2187 archive_format
= DEFAULT_FORMAT
;
2188 blocking_factor
= DEFAULT_BLOCKING
;
2189 record_size
= DEFAULT_BLOCKING
* BLOCKSIZE
;
2190 excluded
= new_exclude ();
2191 newer_mtime_option
.tv_sec
= TYPE_MINIMUM (time_t);
2192 newer_mtime_option
.tv_nsec
= -1;
2193 recursion_option
= FNM_LEADING_DIR
;
2194 unquote_option
= true;
2195 tar_sparse_major
= 1;
2196 tar_sparse_minor
= 0;
2201 check_device_option
= true;
2203 incremental_level
= -1;
2207 /* Convert old-style tar call by exploding option element and rearranging
2208 options accordingly. */
2210 if (argc
> 1 && argv
[1][0] != '-')
2212 int new_argc
; /* argc value for rearranged arguments */
2213 char **new_argv
; /* argv value for rearranged arguments */
2214 char *const *in
; /* cursor into original argv */
2215 char **out
; /* cursor into rearranged argv */
2216 const char *letter
; /* cursor into old option letters */
2217 char buffer
[3]; /* constructed option buffer */
2219 /* Initialize a constructed option. */
2224 /* Allocate a new argument array, and copy program name in it. */
2226 new_argc
= argc
- 1 + strlen (argv
[1]);
2227 new_argv
= xmalloc ((new_argc
+ 1) * sizeof (char *));
2232 /* Copy each old letter option as a separate option, and have the
2233 corresponding argument moved next to it. */
2235 for (letter
= *in
++; *letter
; letter
++)
2237 struct argp_option
*opt
;
2239 buffer
[1] = *letter
;
2240 *out
++ = xstrdup (buffer
);
2241 opt
= find_argp_option (options
, *letter
);
2242 if (opt
&& opt
->arg
)
2244 if (in
< argv
+ argc
)
2247 USAGE_ERROR ((0, 0, _("Old option `%c' requires an argument."),
2252 /* Copy all remaining options. */
2254 while (in
< argv
+ argc
)
2258 /* Replace the old option list by the new one. */
2264 /* Parse all options and non-options as they appear. */
2266 prepend_default_options (getenv ("TAR_OPTIONS"), &argc
, &argv
);
2268 if (argp_parse (&argp
, argc
, argv
, ARGP_IN_ORDER
, &idx
, &args
))
2269 exit (TAREXIT_FAILURE
);
2272 /* Special handling for 'o' option:
2274 GNU tar used to say "output old format".
2275 UNIX98 tar says don't chown files after extracting (we use
2276 "--no-same-owner" for this).
2278 The old GNU tar semantics is retained when used with --create
2279 option, otherwise UNIX98 semantics is assumed */
2283 if (subcommand_option
== CREATE_SUBCOMMAND
)
2285 /* GNU Tar <= 1.13 compatibility */
2286 set_archive_format ("v7");
2290 /* UNIX98 compatibility */
2291 same_owner_option
= -1;
2295 /* Handle operands after any "--" argument. */
2296 for (; idx
< argc
; idx
++)
2298 name_add_name (argv
[idx
], MAKE_INCL_OPTIONS (&args
));
2299 args
.input_files
= true;
2302 /* Warn about implicit use of the wildcards in command line arguments.
2304 warn_regex_usage
= args
.wildcards
== default_wildcards
;
2306 /* Derive option values and check option consistency. */
2308 if (archive_format
== DEFAULT_FORMAT
)
2310 if (args
.pax_option
)
2311 archive_format
= POSIX_FORMAT
;
2313 archive_format
= DEFAULT_ARCHIVE_FORMAT
;
2316 if ((volume_label_option
&& subcommand_option
== CREATE_SUBCOMMAND
)
2317 || incremental_option
2318 || multi_volume_option
2320 assert_format (FORMAT_MASK (OLDGNU_FORMAT
)
2321 | FORMAT_MASK (GNU_FORMAT
)
2322 | FORMAT_MASK (POSIX_FORMAT
));
2324 if (occurrence_option
)
2326 if (!args
.input_files
)
2328 _("--occurrence is meaningless without a file list")));
2329 if (subcommand_option
!= DELETE_SUBCOMMAND
2330 && subcommand_option
!= DIFF_SUBCOMMAND
2331 && subcommand_option
!= EXTRACT_SUBCOMMAND
2332 && subcommand_option
!= LIST_SUBCOMMAND
)
2334 _("--occurrence cannot be used in the requested operation mode")));
2337 if (archive_names
== 0)
2339 /* If no archive file name given, try TAPE from the environment, or
2340 else, DEFAULT_ARCHIVE from the configuration process. */
2343 archive_name_array
[0] = getenv ("TAPE");
2344 if (! archive_name_array
[0])
2345 archive_name_array
[0] = DEFAULT_ARCHIVE
;
2348 /* Allow multiple archives only with `-M'. */
2350 if (archive_names
> 1 && !multi_volume_option
)
2352 _("Multiple archive files require `-M' option")));
2354 if (listed_incremental_option
2355 && NEWER_OPTION_INITIALIZED (newer_mtime_option
))
2357 _("Cannot combine --listed-incremental with --newer")));
2358 if (incremental_level
!= -1 && !listed_incremental_option
)
2360 _("--level is meaningless without --listed-incremental")));
2362 if (volume_label_option
)
2364 if (archive_format
== GNU_FORMAT
|| archive_format
== OLDGNU_FORMAT
)
2366 size_t volume_label_max_len
=
2367 (sizeof current_header
->header
.name
2368 - 1 /* for trailing '\0' */
2369 - (multi_volume_option
2370 ? (sizeof " Volume "
2371 - 1 /* for null at end of " Volume " */
2372 + INT_STRLEN_BOUND (int) /* for volume number */
2373 - 1 /* for sign, as 0 <= volno */)
2375 if (volume_label_max_len
< strlen (volume_label_option
))
2377 ngettext ("%s: Volume label is too long (limit is %lu byte)",
2378 "%s: Volume label is too long (limit is %lu bytes)",
2379 volume_label_max_len
),
2380 quotearg_colon (volume_label_option
),
2381 (unsigned long) volume_label_max_len
));
2384 Label length in PAX format is limited by the volume size. */
2389 if (multi_volume_option
)
2390 USAGE_ERROR ((0, 0, _("Cannot verify multi-volume archives")));
2391 if (use_compress_program_option
)
2392 USAGE_ERROR ((0, 0, _("Cannot verify compressed archives")));
2395 if (use_compress_program_option
)
2397 if (multi_volume_option
)
2398 USAGE_ERROR ((0, 0, _("Cannot use multi-volume compressed archives")));
2399 if (subcommand_option
== UPDATE_SUBCOMMAND
2400 || subcommand_option
== APPEND_SUBCOMMAND
2401 || subcommand_option
== DELETE_SUBCOMMAND
)
2402 USAGE_ERROR ((0, 0, _("Cannot update compressed archives")));
2403 if (subcommand_option
== CAT_SUBCOMMAND
)
2404 USAGE_ERROR ((0, 0, _("Cannot concatenate compressed archives")));
2407 /* It is no harm to use --pax-option on non-pax archives in archive
2408 reading mode. It may even be useful, since it allows to override
2409 file attributes from tar headers. Therefore I allow such usage.
2412 && archive_format
!= POSIX_FORMAT
2413 && (subcommand_option
!= EXTRACT_SUBCOMMAND
2414 || subcommand_option
!= DIFF_SUBCOMMAND
2415 || subcommand_option
!= LIST_SUBCOMMAND
))
2416 USAGE_ERROR ((0, 0, _("--pax-option can be used only on POSIX archives")));
2418 /* If ready to unlink hierarchies, so we are for simpler files. */
2419 if (recursive_unlink_option
)
2420 old_files_option
= UNLINK_FIRST_OLD_FILES
;
2423 if (test_label_option
)
2425 /* --test-label is silent if the user has specified the label name to
2427 if (!args
.input_files
)
2430 else if (utc_option
)
2433 if (tape_length_option
&& tape_length_option
< record_size
)
2434 USAGE_ERROR ((0, 0, _("Volume length cannot be less than record size")));
2436 if (same_order_option
&& listed_incremental_option
)
2437 USAGE_ERROR ((0, 0, _("--preserve-order is not compatible with "
2438 "--listed-incremental")));
2440 /* Forbid using -c with no input files whatsoever. Check that `-f -',
2441 explicit or implied, is used correctly. */
2443 switch (subcommand_option
)
2445 case CREATE_SUBCOMMAND
:
2446 if (!args
.input_files
&& !files_from_option
)
2448 _("Cowardly refusing to create an empty archive")));
2449 if (args
.compress_autodetect
&& archive_names
2450 && strcmp (archive_name_array
[0], "-"))
2451 set_comression_program_by_suffix (archive_name_array
[0],
2452 use_compress_program_option
);
2455 case EXTRACT_SUBCOMMAND
:
2456 case LIST_SUBCOMMAND
:
2457 case DIFF_SUBCOMMAND
:
2458 for (archive_name_cursor
= archive_name_array
;
2459 archive_name_cursor
< archive_name_array
+ archive_names
;
2460 archive_name_cursor
++)
2461 if (!strcmp (*archive_name_cursor
, "-"))
2462 request_stdin ("-f");
2465 case CAT_SUBCOMMAND
:
2466 case UPDATE_SUBCOMMAND
:
2467 case APPEND_SUBCOMMAND
:
2468 for (archive_name_cursor
= archive_name_array
;
2469 archive_name_cursor
< archive_name_array
+ archive_names
;
2470 archive_name_cursor
++)
2471 if (!strcmp (*archive_name_cursor
, "-"))
2473 _("Options `-Aru' are incompatible with `-f -'")));
2479 /* Initialize stdlis */
2480 if (index_file_name
)
2482 stdlis
= fopen (index_file_name
, "w");
2484 open_error (index_file_name
);
2487 stdlis
= to_stdout_option
? stderr
: stdout
;
2489 archive_name_cursor
= archive_name_array
;
2491 /* Prepare for generating backup names. */
2493 if (args
.backup_suffix_string
)
2494 simple_backup_suffix
= xstrdup (args
.backup_suffix_string
);
2498 backup_type
= xget_version ("--backup", args
.version_control_string
);
2499 /* No backup is needed either if explicitely disabled or if
2500 the extracted files are not being written to disk. */
2501 if (backup_type
== no_backups
|| EXTRACT_OVER_PIPE
)
2502 backup_option
= false;
2505 checkpoint_finish_compile ();
2507 report_textual_dates (&args
);
2513 /* Main routine for tar. */
2515 main (int argc
, char **argv
)
2518 set_program_name (argv
[0]);
2520 setlocale (LC_ALL
, "");
2521 bindtextdomain (PACKAGE
, LOCALEDIR
);
2522 textdomain (PACKAGE
);
2524 exit_failure
= TAREXIT_FAILURE
;
2525 exit_status
= TAREXIT_SUCCESS
;
2526 filename_terminator
= '\n';
2527 set_quoting_style (0, DEFAULT_QUOTING_STYLE
);
2529 /* Make sure we have first three descriptors available */
2532 /* Pre-allocate a few structures. */
2534 allocated_archive_names
= 10;
2535 archive_name_array
=
2536 xmalloc (sizeof (const char *) * allocated_archive_names
);
2539 obstack_init (&argv_stk
);
2541 /* Ensure default behavior for some signals */
2542 signal (SIGPIPE
, SIG_DFL
);
2543 /* System V fork+wait does not work if SIGCHLD is ignored. */
2544 signal (SIGCHLD
, SIG_DFL
);
2546 /* Try to disable the ability to unlink a directory. */
2547 priv_set_remove_linkdir ();
2549 /* Decode options. */
2551 decode_options (argc
, argv
);
2555 /* Main command execution. */
2557 if (volno_file_option
)
2558 init_volume_number ();
2560 switch (subcommand_option
)
2562 case UNKNOWN_SUBCOMMAND
:
2564 _("You must specify one of the `-Acdtrux' options")));
2566 case CAT_SUBCOMMAND
:
2567 case UPDATE_SUBCOMMAND
:
2568 case APPEND_SUBCOMMAND
:
2572 case DELETE_SUBCOMMAND
:
2573 delete_archive_members ();
2576 case CREATE_SUBCOMMAND
:
2580 case EXTRACT_SUBCOMMAND
:
2582 read_and (extract_archive
);
2584 /* FIXME: should extract_finish () even if an ordinary signal is
2590 case LIST_SUBCOMMAND
:
2591 read_and (list_archive
);
2594 case DIFF_SUBCOMMAND
:
2596 read_and (diff_archive
);
2601 print_total_stats ();
2603 if (check_links_option
)
2606 if (volno_file_option
)
2607 closeout_volume_number ();
2609 /* Dispose of allocated memory, and return. */
2611 free (archive_name_array
);
2614 if (exit_status
== TAREXIT_FAILURE
)
2615 error (0, 0, _("Exiting with failure status due to previous errors"));
2617 if (stdlis
== stdout
)
2619 else if (ferror (stderr
) || fclose (stderr
) != 0)
2620 set_exit_status (TAREXIT_FAILURE
);
2626 tar_stat_init (struct tar_stat_info
*st
)
2628 memset (st
, 0, sizeof (*st
));
2632 tar_stat_destroy (struct tar_stat_info
*st
)
2634 free (st
->orig_file_name
);
2635 free (st
->file_name
);
2636 free (st
->link_name
);
2639 free (st
->sparse_map
);
2641 xheader_destroy (&st
->xhdr
);
2642 memset (st
, 0, sizeof (*st
));
2645 /* Format mask for all available formats that support nanosecond
2646 timestamp resolution. */
2647 #define NS_PRECISION_FORMAT_MASK FORMAT_MASK (POSIX_FORMAT)
2649 /* Same as timespec_cmp, but ignore nanoseconds if current archive
2650 format does not provide sufficient resolution. */
2652 tar_timespec_cmp (struct timespec a
, struct timespec b
)
2654 if (!(FORMAT_MASK (current_format
) & NS_PRECISION_FORMAT_MASK
))
2655 a
.tv_nsec
= b
.tv_nsec
= 0;
2656 return timespec_cmp (a
, b
);
2659 /* Set tar exit status to VAL, unless it is already indicating
2660 a more serious condition. This relies on the fact that the
2661 values of TAREXIT_ constants are ranged by severity. */
2663 set_exit_status (int val
)
2665 if (val
> exit_status
)