X-Git-Url: https://git.dogcows.com/gitweb?a=blobdiff_plain;f=src%2Ftar.c;h=1c9786a4fbbbe66050b6434bafa038d206da3ddd;hb=1f27dca9765c886a72629a655d538c36c6cb0fea;hp=787d37c2145e13935a73e5514e341b577d52ad8c;hpb=88ea940c0e3db80904f2405b01f1a3d01c522859;p=chaz%2Ftar diff --git a/src/tar.c b/src/tar.c index 787d37c..1c9786a 100644 --- a/src/tar.c +++ b/src/tar.c @@ -1,5 +1,5 @@ /* A tar (tape archiver) program. - Copyright (C) 1988, 92, 93, 94, 95, 96, 97 Free Software Foundation, Inc. + Copyright (C) 1988, 92,93,94,95,96,97, 1999 Free Software Foundation, Inc. Written by John Gilmore, starting 1985-08-25. This program is free software; you can redistribute it and/or modify it @@ -14,12 +14,17 @@ You should have received a copy of the GNU General Public License along with this program; if not, write to the Free Software Foundation, Inc., - 59 Place - Suite 330, Boston, MA 02111-1307, USA. */ + 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ #include "system.h" #include +#include +#if ! defined SIGCHLD && defined SIGCLD +# define SIGCHLD SIGCLD +#endif + /* The following causes "common.h" to produce definitions of all the global variables, rather than just "extern" declarations of them. GNU tar does depend on the system loader to preset all GLOBAL variables to neutral (or @@ -27,12 +32,7 @@ #define GLOBAL #include "common.h" -#include "backupfile.h" -enum backup_type get_version (); - -/* FIXME: We should use a conversion routine that does reasonable error - checking -- atol doesn't. For now, punt. */ -#define intconv atol +#include "xstrtol.h" time_t get_date (); @@ -50,48 +50,6 @@ static void usage PARAMS ((int)); /* Miscellaneous. */ -/*------------------------------------------------------------------------. -| Check if STRING0 is the decimal representation of number, and store its | -| value. If not a decimal number, return 0. | -`------------------------------------------------------------------------*/ - -static int -check_decimal (const char *string0, uintmax_t *result) -{ - const char *string = string0; - uintmax_t value = 0; - - do - switch (*string) - { - case '0': - case '1': - case '2': - case '3': - case '4': - case '5': - case '6': - case '7': - case '8': - case '9': - { - uintmax_t v10 = value * 10; - uintmax_t v10d = v10 + (*string - '0'); - if (v10 / 10 != value || v10d < v10) - return 0; - value = v10d; - } - break; - - default: - return 0; - } - while (*++string); - - *result = value; - return 1; -} - /*----------------------------------------------. | Doesn't return if stdin already requested. | `----------------------------------------------*/ @@ -153,39 +111,40 @@ confirm (const char *message_action, const char *message_name) do it. For the others, we share the code for the equivalent short named option, the name of which is stored in the otherwise-unused `val' field of the `struct option'; for long options that have no equivalent - short option, we use nongraphic characters as pseudo short option - characters, starting at 2 and going upwards. */ - -#define BACKUP_OPTION 2 -#define DELETE_OPTION 3 -#define EXCLUDE_OPTION 4 -#define GROUP_OPTION 5 -#define MODE_OPTION 6 -#define NEWER_MTIME_OPTION 7 -#define NO_RECURSE_OPTION 8 -#define NULL_OPTION 9 -#define OWNER_OPTION 10 -#define POSIX_OPTION 11 -#define PRESERVE_OPTION 12 -#define RECORD_SIZE_OPTION 13 -#define RSH_COMMAND_OPTION 14 -#define SUFFIX_OPTION 15 -#define USE_COMPRESS_PROGRAM_OPTION 16 -#define VOLNO_FILE_OPTION 17 - -/* Some cleanup is being made in GNU tar long options. Using old names is - allowed for a while, but will also send a warning to stderr. Take old - names out in 1.14, or in summer 1997, whichever happens last. We use - nongraphic characters as pseudo short option characters, starting at 31 - and going downwards. */ - -#define OBSOLETE_ABSOLUTE_NAMES 31 -#define OBSOLETE_BLOCK_COMPRESS 30 -#define OBSOLETE_BLOCKING_FACTOR 29 -#define OBSOLETE_BLOCK_NUMBER 28 -#define OBSOLETE_READ_FULL_RECORDS 27 -#define OBSOLETE_TOUCH 26 -#define OBSOLETE_VERSION_CONTROL 25 + short option, we use non-characters as pseudo short options, + starting at CHAR_MAX + 1 and going upwards. */ + +enum +{ + BACKUP_OPTION = CHAR_MAX + 1, + DELETE_OPTION, + EXCLUDE_OPTION, + GROUP_OPTION, + MODE_OPTION, + NEWER_MTIME_OPTION, + NO_RECURSE_OPTION, + NULL_OPTION, + OWNER_OPTION, + POSIX_OPTION, + PRESERVE_OPTION, + RECORD_SIZE_OPTION, + RSH_COMMAND_OPTION, + SUFFIX_OPTION, + USE_COMPRESS_PROGRAM_OPTION, + VOLNO_FILE_OPTION, + + /* Some cleanup is being made in GNU tar long options. Using old names is + allowed for a while, but will also send a warning to stderr. Take old + names out in 1.14, or in summer 1997, whichever happens last. */ + + OBSOLETE_ABSOLUTE_NAMES, + OBSOLETE_BLOCK_COMPRESS, + OBSOLETE_BLOCKING_FACTOR, + OBSOLETE_BLOCK_NUMBER, + OBSOLETE_READ_FULL_RECORDS, + OBSOLETE_TOUCH, + OBSOLETE_VERSION_CONTROL +}; /* If nonzero, display usage information and exit. */ static int show_help = 0; @@ -441,7 +400,7 @@ or a device. *This* `tar' defaults to `-f%s -b%d'.\n"), DEFAULT_ARCHIVE, DEFAULT_BLOCKING); fputs (_("\ \n\ -Report bugs to .\n"), +Report bugs to .\n"), stdout); } exit (status); @@ -485,7 +444,7 @@ decode_options (int argc, char *const *argv) int optchar; /* option letter */ int input_files; /* number of input files */ const char *backup_suffix_string; - const char *version_control_string; + const char *version_control_string = NULL; /* Set some default option values. */ @@ -493,12 +452,13 @@ decode_options (int argc, char *const *argv) archive_format = DEFAULT_FORMAT; blocking_factor = DEFAULT_BLOCKING; record_size = DEFAULT_BLOCKING * BLOCKSIZE; + excluded = new_exclude (); + newer_mtime_option = TYPE_MINIMUM (time_t); owner_option = -1; group_option = -1; backup_suffix_string = getenv ("SIMPLE_BACKUP_SUFFIX"); - version_control_string = getenv ("VERSION_CONTROL"); /* Convert old-style tar call by exploding option element and rearranging options accordingly. */ @@ -535,11 +495,13 @@ decode_options (int argc, char *const *argv) *out++ = xstrdup (buffer); cursor = strchr (OPTION_STRING, *letter); if (cursor && cursor[1] == ':') - if (in < argv + argc) - *out++ = *in++; - else - USAGE_ERROR ((0, 0, _("Old option `%c' requires an argument."), - *letter)); + { + if (in < argv + argc) + *out++ = *in++; + else + USAGE_ERROR ((0, 0, _("Old option `%c' requires an argument."), + *letter)); + } } /* Copy all remaining options. */ @@ -588,8 +550,14 @@ decode_options (int argc, char *const *argv) /* Fall through. */ case 'b': - blocking_factor = intconv (optarg); - record_size = blocking_factor * (size_t) BLOCKSIZE; + { + uintmax_t u; + if (! (xstrtoumax (optarg, (char **) 0, 10, &u, "") == LONGINT_OK + && u == (blocking_factor = u) + && 0 < blocking_factor + && u == (record_size = u * (size_t) BLOCKSIZE) / BLOCKSIZE)) + USAGE_ERROR ((0, 0, _("Invalid blocking factor"))); + } break; case OBSOLETE_READ_FULL_RECORDS: @@ -685,10 +653,13 @@ decode_options (int argc, char *const *argv) break; case 'L': - clear_tarlong (tape_length_option); - add_to_tarlong (tape_length_option, intconv (optarg)); - mult_tarlong (tape_length_option, 1024); - multi_volume_option = 1; + { + uintmax_t u; + if (xstrtoumax (optarg, (char **) 0, 10, &u, "") != LONG_MAX) + USAGE_ERROR ((0, 0, _("Invalid tape length"))); + tape_length_option = 1024 * (tarlong) u; + multi_volume_option = 1; + } break; case OBSOLETE_TOUCH: @@ -812,8 +783,8 @@ decode_options (int argc, char *const *argv) break; case 'X': - exclude_option = 1; - add_exclude_file (optarg); + if (add_exclude_file (excluded, optarg, '\n') != 0) + FATAL_ERROR ((0, errno, "%s", optarg)); break; case 'z': @@ -839,18 +810,19 @@ decode_options (int argc, char *const *argv) break; case EXCLUDE_OPTION: - exclude_option = 1; - add_exclude (optarg); + add_exclude (excluded, optarg); break; case GROUP_OPTION: - if (!gname_to_gid (optarg, &group_option)) + if (! (strlen (optarg) < GNAME_FIELD_SIZE + && gname_to_gid (optarg, &group_option))) { uintmax_t g; - if (!check_decimal (optarg, &g) || g != (gid_t) g) - ERROR ((TAREXIT_FAILURE, 0, _("Invalid group given on option"))); - else + if (xstrtoumax (optarg, (char **) 0, 10, &g, "") == LONGINT_OK + && g == (gid_t) g) group_option = g; + else + FATAL_ERROR ((0, 0, _("Invalid group given on option"))); } break; @@ -859,9 +831,9 @@ decode_options (int argc, char *const *argv) = mode_compile (optarg, MODE_MASK_EQUALS | MODE_MASK_PLUS | MODE_MASK_MINUS); if (mode_option == MODE_INVALID) - ERROR ((TAREXIT_FAILURE, 0, _("Invalid mode given on option"))); + FATAL_ERROR ((0, 0, _("Invalid mode given on option"))); if (mode_option == MODE_MEMORY_EXHAUSTED) - ERROR ((TAREXIT_FAILURE, 0, _("Memory exhausted"))); + FATAL_ERROR ((0, 0, _("Memory exhausted"))); break; case NO_RECURSE_OPTION: @@ -873,13 +845,15 @@ decode_options (int argc, char *const *argv) break; case OWNER_OPTION: - if (!uname_to_uid (optarg, &owner_option)) + if (! (strlen (optarg) < UNAME_FIELD_SIZE + && uname_to_uid (optarg, &owner_option))) { uintmax_t u; - if (!check_decimal (optarg, &u) || u != (uid_t) u) - ERROR ((TAREXIT_FAILURE, 0, _("Invalid owner given on option"))); - else + if (xstrtoumax (optarg, (char **) 0, 10, &u, "") == LONGINT_OK + && u == (uid_t) u) owner_option = u; + else + FATAL_ERROR ((0, 0, _("Invalid owner given on option"))); } break; @@ -903,11 +877,17 @@ decode_options (int argc, char *const *argv) break; case RECORD_SIZE_OPTION: - record_size = intconv (optarg); - if (record_size % BLOCKSIZE != 0) - USAGE_ERROR ((0, 0, _("Record size must be a multiple of %d."), - BLOCKSIZE)); - blocking_factor = record_size / BLOCKSIZE; + { + uintmax_t u; + if (! (xstrtoumax (optarg, (char **) 0, 10, &u, "") == LONG_MAX + && u == (size_t) u)) + USAGE_ERROR ((0, 0, _("Invalid record size"))); + record_size = u; + if (record_size % BLOCKSIZE != 0) + USAGE_ERROR ((0, 0, _("Record size must be a multiple of %d."), + BLOCKSIZE)); + blocking_factor = record_size / BLOCKSIZE; + } break; case RSH_COMMAND_OPTION: @@ -1013,7 +993,7 @@ decode_options (int argc, char *const *argv) printf ("tar (GNU %s) %s\n", PACKAGE, VERSION); fputs (_("\ \n\ -Copyright (C) 1988, 92, 93, 94, 95, 96, 97 Free Software Foundation, Inc.\n"), +Copyright (C) 1988, 92,93,94,95,96,97,98, 1999 Free Software Foundation, Inc.\n"), stdout); fputs (_("\ This is free software; see the source for copying conditions. There is NO\n\ @@ -1113,7 +1093,7 @@ Written by John Gilmore and Jay Fenlason.\n"), simple_backup_suffix = xstrdup (backup_suffix_string); if (backup_option) - backup_type = get_version (version_control_string); + backup_type = xget_version ("--backup", version_control_string); } /* Tar proper. */ @@ -1140,6 +1120,11 @@ main (int argc, char *const *argv) xmalloc (sizeof (const char *) * allocated_archive_names); archive_names = 0; +#ifdef SIGCHLD + /* System V fork+wait does not work if SIGCHLD is ignored. */ + signal (SIGCHLD, SIG_DFL); +#endif + init_names (); /* Decode options. */ @@ -1169,9 +1154,6 @@ main (int argc, char *const *argv) break; case CREATE_SUBCOMMAND: - if (totals_option) - init_total_written (); - create_archive (); name_close ();