]> Dogcows Code - chaz/tar/blobdiff - src/compare.c
Update copyright years.
[chaz/tar] / src / compare.c
index 6124c95af343f35142041cb21123012eb9246bb1..d29cfdd4822f683dec5c7dfb8dc01544c62330ce 100644 (file)
@@ -1,47 +1,36 @@
 /* Diff files from a tar archive.
 
-   Copyright (C) 1988, 1992, 1993, 1994, 1996, 1997, 1999, 2000, 2001,
-   2003 Free Software Foundation, Inc.
+   Copyright 1988, 1992-1994, 1996-1997, 1999-2001, 2003-2007,
+   2009-2010, 2012-2014 Free Software Foundation, Inc.
 
-   Written by John Gilmore, on 1987-04-30.
+   This file is part of GNU tar.
 
-   This program is free software; you can redistribute it and/or modify it
-   under the terms of the GNU General Public License as published by the
-   Free Software Foundation; either version 2, or (at your option) any later
-   version.
+   GNU tar is free software; you can redistribute it and/or modify
+   it under the terms of the GNU General Public License as published by
+   the Free Software Foundation; either version 3 of the License, or
+   (at your option) any later version.
 
-   This program is distributed in the hope that it will be useful, but
-   WITHOUT ANY WARRANTY; without even the implied warranty of
-   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General
-   Public License for more details.
+   GNU tar is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
 
-   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 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
+   You should have received a copy of the GNU General Public License
+   along with this program.  If not, see <http://www.gnu.org/licenses/>.
 
-#include "system.h"
+   Written by John Gilmore, on 1987-04-30.  */
 
-#if HAVE_UTIME_H
-# include <utime.h>
-#else
-struct utimbuf
-  {
-    long actime;
-    long modtime;
-  };
-#endif
+#include <system.h>
+#include <system-ioctl.h>
 
 #if HAVE_LINUX_FD_H
 # include <linux/fd.h>
 #endif
 
-#include <quotearg.h>
-
 #include "common.h"
-#include "rmt.h"
-
-/* Spare space for messages, hopefully safe even after gettext.  */
-#define MESSAGE_BUFFER_SIZE 100
+#include <quotearg.h>
+#include <rmt.h>
+#include <stdarg.h>
 
 /* Nonzero if we are verifying at the moment.  */
 bool now_verifying;
@@ -56,93 +45,85 @@ static char *diff_buffer;
 void
 diff_init (void)
 {
-  diff_buffer = valloc (record_size);
-  if (!diff_buffer)
-    xalloc_die ();
+  void *ptr;
+  diff_buffer = page_aligned_alloc (&ptr, record_size);
+  if (listed_incremental_option)
+    read_directory_file ();
 }
 
 /* Sigh about something that differs by writing a MESSAGE to stdlis,
    given MESSAGE is nonzero.  Also set the exit status if not already.  */
-static void
-report_difference (const char *message)
+void
+report_difference (struct tar_stat_info *st, const char *fmt, ...)
 {
-  if (message)
-    fprintf (stdlis, "%s: %s\n", quotearg_colon (current_stat_info.file_name), message);
+  if (fmt)
+    {
+      va_list ap;
+
+      fprintf (stdlis, "%s: ", quotearg_colon (st->file_name));
+      va_start (ap, fmt);
+      vfprintf (stdlis, fmt, ap);
+      va_end (ap);
+      fprintf (stdlis, "\n");
+    }
 
-  if (exit_status == TAREXIT_SUCCESS)
-    exit_status = TAREXIT_DIFFERS;
+  set_exit_status (TAREXIT_DIFFERS);
 }
 
 /* Take a buffer returned by read_and_process and do nothing with it.  */
 static int
-process_noop (size_t size, char *data)
+process_noop (size_t size __attribute__ ((unused)),
+             char *data __attribute__ ((unused)))
 {
-  /* Yes, I know.  SIZE and DATA are unused in this function.  Some
-     compilers may even report it.  That's OK, just relax!  */
   return 1;
 }
 
 static int
 process_rawdata (size_t bytes, char *buffer)
 {
-  ssize_t status = safe_read (diff_handle, diff_buffer, bytes);
-  char message[MESSAGE_BUFFER_SIZE];
+  size_t status = blocking_read (diff_handle, diff_buffer, bytes);
 
   if (status != bytes)
     {
-      if (status < 0)
+      if (status == SAFE_READ_ERROR)
        {
          read_error (current_stat_info.file_name);
-         report_difference (0);
+         report_difference (&current_stat_info, NULL);
        }
       else
        {
-         sprintf (message, _("Could only read %lu of %lu bytes"),
-                  (unsigned long) status, (unsigned long) bytes);
-         report_difference (message);
+         report_difference (&current_stat_info,
+                            ngettext ("Could only read %lu of %lu byte",
+                                      "Could only read %lu of %lu bytes",
+                                      bytes),
+                            (unsigned long) status, (unsigned long) bytes);
        }
       return 0;
     }
 
   if (memcmp (buffer, diff_buffer, bytes))
     {
-      report_difference (_("Contents differ"));
+      report_difference (&current_stat_info, _("Contents differ"));
       return 0;
     }
 
   return 1;
 }
 
-/* Directory contents, only for GNUTYPE_DUMPDIR.  */
-
-static char *dumpdir_cursor;
-
-static int
-process_dumpdir (size_t bytes, char *buffer)
-{
-  if (memcmp (buffer, dumpdir_cursor, bytes))
-    {
-      report_difference (_("Contents differ"));
-      return 0;
-    }
-
-  dumpdir_cursor += bytes;
-  return 1;
-}
-
 /* Some other routine wants SIZE bytes in the archive.  For each chunk
    of the archive, call PROCESSOR with the size of the chunk, and the
    address of the chunk it can work with.  The PROCESSOR should return
-   nonzero for success.  It it return error once, continue skipping
+   nonzero for success.  Once it returns error, continue skipping
    without calling PROCESSOR anymore.  */
+
 static void
-read_and_process (off_t size, int (*processor) (size_t, char *))
+read_and_process (struct tar_stat_info *st, int (*processor) (size_t, char *))
 {
   union block *data_block;
   size_t data_size;
+  off_t size = st->stat.st_size;
 
-  if (multi_volume_option)
-    save_sizeleft = size;
+  mv_begin_read (st);
   while (size)
     {
       data_block = find_next_block ();
@@ -160,188 +141,322 @@ read_and_process (off_t size, int (*processor) (size_t, char *))
       set_next_block_after ((union block *)
                            (data_block->buffer + data_size - 1));
       size -= data_size;
-      if (multi_volume_option)
-       save_sizeleft -= data_size;
+      mv_size_left (size);
     }
+  mv_end ();
 }
 
-/* JK Diff'ing a sparse file with its counterpart on the tar file is a
-   bit of a different story than a normal file.  First, we must know what
-   areas of the file to skip through, i.e., we need to construct a
-   sparsearray, which will hold all the information we need.  We must
-   compare small amounts of data at a time as we find it.  */
+/* Call either stat or lstat over STAT_DATA, depending on
+   --dereference (-h), for a file which should exist.  Diagnose any
+   problem.  Return nonzero for success, zero otherwise.  */
+static int
+get_stat_data (char const *file_name, struct stat *stat_data)
+{
+  int status = deref_stat (file_name, stat_data);
 
-/* FIXME: This does not look very solid to me, at first glance.  Zero areas
-   are not checked, spurious sparse entries seemingly goes undetected, and
-   I'm not sure overall identical sparsity is verified.  */
+  if (status != 0)
+    {
+      if (errno == ENOENT)
+       stat_warn (file_name);
+      else
+       stat_error (file_name);
+      report_difference (&current_stat_info, NULL);
+      return 0;
+    }
 
+  return 1;
+}
+
+\f
 static void
-diff_sparse_files (void)
+diff_dir (void)
 {
-  off_t remaining_size = current_stat_info.stat.st_size;
-  char *buffer = xmalloc (BLOCKSIZE * sizeof (char));
-  size_t buffer_size = BLOCKSIZE;
-  union block *data_block = 0;
-  int counter = 0;
-  int different = 0;
-
-  if (! fill_in_sparse_array ())
-    fatal_exit ();
+  struct stat stat_data;
 
-  while (remaining_size > 0)
-    {
-      ssize_t status;
-      size_t chunk_size;
-      off_t offset;
+  if (!get_stat_data (current_stat_info.file_name, &stat_data))
+    return;
 
-#if 0
-      off_t amount_read = 0;
-#endif
+  if (!S_ISDIR (stat_data.st_mode))
+    report_difference (&current_stat_info, _("File type differs"));
+  else if ((current_stat_info.stat.st_mode & MODE_ALL) !=
+          (stat_data.st_mode & MODE_ALL))
+    report_difference (&current_stat_info, _("Mode differs"));
+}
 
-      data_block = find_next_block ();
-      if (!data_block)
-       FATAL_ERROR ((0, 0, _("Unexpected EOF in archive")));
-      chunk_size = sparsearray[counter].numbytes;
-      if (!chunk_size)
-       break;
+static void
+diff_file (void)
+{
+  char const *file_name = current_stat_info.file_name;
+  struct stat stat_data;
 
-      offset = sparsearray[counter].offset;
-      if (lseek (diff_handle, offset, SEEK_SET) < 0)
+  if (!get_stat_data (file_name, &stat_data))
+    skip_member ();
+  else if (!S_ISREG (stat_data.st_mode))
+    {
+      report_difference (&current_stat_info, _("File type differs"));
+      skip_member ();
+    }
+  else
+    {
+      if ((current_stat_info.stat.st_mode & MODE_ALL) !=
+         (stat_data.st_mode & MODE_ALL))
+       report_difference (&current_stat_info, _("Mode differs"));
+
+      if (!sys_compare_uid (&stat_data, &current_stat_info.stat))
+       report_difference (&current_stat_info, _("Uid differs"));
+      if (!sys_compare_gid (&stat_data, &current_stat_info.stat))
+       report_difference (&current_stat_info, _("Gid differs"));
+
+      if (tar_timespec_cmp (get_stat_mtime (&stat_data),
+                            current_stat_info.mtime))
+       report_difference (&current_stat_info, _("Mod time differs"));
+      if (current_header->header.typeflag != GNUTYPE_SPARSE
+         && stat_data.st_size != current_stat_info.stat.st_size)
        {
-         seek_error_details (current_stat_info.file_name, offset);
-         report_difference (0);
+         report_difference (&current_stat_info, _("Size differs"));
+         skip_member ();
        }
-
-      /* Take care to not run out of room in our buffer.  */
-
-      while (buffer_size < chunk_size)
+      else
        {
-         if (buffer_size * 2 < buffer_size)
-           xalloc_die ();
-         buffer_size *= 2;
-         buffer = xrealloc (buffer, buffer_size * sizeof (char));
-       }
+         diff_handle = openat (chdir_fd, file_name, open_read_flags);
 
-      while (chunk_size > BLOCKSIZE)
-       {
-         if (status = safe_read (diff_handle, buffer, BLOCKSIZE),
-             status != BLOCKSIZE)
+         if (diff_handle < 0)
            {
-             if (status < 0)
-               {
-                 read_error (current_stat_info.file_name);
-                 report_difference (0);
-               }
+             open_error (file_name);
+             skip_member ();
+             report_difference (&current_stat_info, NULL);
+           }
+         else
+           {
+             int status;
+
+             if (current_stat_info.is_sparse)
+               sparse_diff_file (diff_handle, &current_stat_info);
              else
-               {
-                 char message[MESSAGE_BUFFER_SIZE];
+               read_and_process (&current_stat_info, process_rawdata);
 
-                 sprintf (message, _("Could only read %lu of %lu bytes"),
-                          (unsigned long) status, (unsigned long) chunk_size);
-                 report_difference (message);
+             if (atime_preserve_option == replace_atime_preserve
+                 && stat_data.st_size != 0)
+               {
+                 struct timespec atime = get_stat_atime (&stat_data);
+                 if (set_file_atime (diff_handle, chdir_fd, file_name, atime)
+                     != 0)
+                   utime_error (file_name);
                }
-             break;
-           }
 
-         if (memcmp (buffer, data_block->buffer, BLOCKSIZE))
-           {
-             different = 1;
-             break;
+             status = close (diff_handle);
+             if (status != 0)
+               close_error (file_name);
            }
-
-         chunk_size -= status;
-         remaining_size -= status;
-         set_next_block_after (data_block);
-         data_block = find_next_block ();
-         if (!data_block)
-           FATAL_ERROR ((0, 0, _("Unexpected EOF in archive")));
        }
-      if (status = safe_read (diff_handle, buffer, chunk_size),
-         status != chunk_size)
-       {
-         if (status < 0)
-           {
-             read_error (current_stat_info.file_name);
-             report_difference (0);
-           }
-         else
-           {
-             char message[MESSAGE_BUFFER_SIZE];
+    }
+}
 
-             sprintf (message, _("Could only read %lu of %lu bytes"),
-                      (unsigned long) status, (unsigned long) chunk_size);
-             report_difference (message);
-           }
-         break;
-       }
+static void
+diff_link (void)
+{
+  struct stat file_data;
+  struct stat link_data;
+
+  if (get_stat_data (current_stat_info.file_name, &file_data)
+      && get_stat_data (current_stat_info.link_name, &link_data)
+      && !sys_compare_links (&file_data, &link_data))
+    report_difference (&current_stat_info,
+                      _("Not linked to %s"),
+                      quote (current_stat_info.link_name));
+}
 
-      if (memcmp (buffer, data_block->buffer, chunk_size))
-       {
-         different = 1;
-         break;
-       }
-#if 0
-      amount_read += chunk_size;
-      if (amount_read >= BLOCKSIZE)
-       {
-         amount_read = 0;
-         set_next_block_after (data_block);
-         data_block = find_next_block ();
-         if (!data_block)
-           FATAL_ERROR ((0, 0, _("Unexpected EOF in archive")));
-       }
-#endif
-      set_next_block_after (data_block);
-      counter++;
-      remaining_size -= chunk_size;
-    }
+#ifdef HAVE_READLINK
+static void
+diff_symlink (void)
+{
+  size_t len = strlen (current_stat_info.link_name);
+  char *linkbuf = alloca (len + 1);
 
-#if 0
-  /* If the number of bytes read isn't the number of bytes supposedly in
-     the file, they're different.  */
+  int status = readlinkat (chdir_fd, current_stat_info.file_name,
+                          linkbuf, len + 1);
 
-  if (amount_read != current_stat_info.stat.st_size)
-    different = 1;
+  if (status < 0)
+    {
+      if (errno == ENOENT)
+       readlink_warn (current_stat_info.file_name);
+      else
+       readlink_error (current_stat_info.file_name);
+      report_difference (&current_stat_info, NULL);
+    }
+  else if (status != len
+          || strncmp (current_stat_info.link_name, linkbuf, len) != 0)
+    report_difference (&current_stat_info, _("Symlink differs"));
+}
 #endif
 
-  set_next_block_after (data_block);
-  free (sparsearray);
+static void
+diff_special (void)
+{
+  struct stat stat_data;
+
+  /* FIXME: deal with umask.  */
+
+  if (!get_stat_data (current_stat_info.file_name, &stat_data))
+    return;
+
+  if (current_header->header.typeflag == CHRTYPE
+      ? !S_ISCHR (stat_data.st_mode)
+      : current_header->header.typeflag == BLKTYPE
+      ? !S_ISBLK (stat_data.st_mode)
+      : /* current_header->header.typeflag == FIFOTYPE */
+      !S_ISFIFO (stat_data.st_mode))
+    {
+      report_difference (&current_stat_info, _("File type differs"));
+      return;
+    }
+
+  if ((current_header->header.typeflag == CHRTYPE
+       || current_header->header.typeflag == BLKTYPE)
+      && current_stat_info.stat.st_rdev != stat_data.st_rdev)
+    {
+      report_difference (&current_stat_info, _("Device number differs"));
+      return;
+    }
 
-  if (different)
-    report_difference (_("Contents differ"));
+  if ((current_stat_info.stat.st_mode & MODE_ALL) !=
+      (stat_data.st_mode & MODE_ALL))
+    report_difference (&current_stat_info, _("Mode differs"));
 }
 
-/* Call either stat or lstat over STAT_DATA, depending on
-   --dereference (-h), for a file which should exist.  Diagnose any
-   problem.  Return nonzero for success, zero otherwise.  */
 static int
-get_stat_data (char const *file_name, struct stat *stat_data)
+dumpdir_cmp (const char *a, const char *b)
 {
-  int status = deref_stat (dereference_option, file_name, stat_data);
+  size_t len;
 
-  if (status != 0)
+  while (*a)
+    switch (*a)
+      {
+      case 'Y':
+      case 'N':
+       if (!strchr ("YN", *b))
+         return 1;
+       if (strcmp(a + 1, b + 1))
+         return 1;
+       len = strlen (a) + 1;
+       a += len;
+       b += len;
+       break;
+
+      case 'D':
+       if (strcmp(a, b))
+         return 1;
+       len = strlen (a) + 1;
+       a += len;
+       b += len;
+       break;
+
+      case 'R':
+      case 'T':
+      case 'X':
+       return *b;
+      }
+  return *b;
+}
+
+static void
+diff_dumpdir (struct tar_stat_info *dir)
+{
+  const char *dumpdir_buffer;
+
+  if (dir->fd == 0)
     {
-      if (errno == ENOENT)
-       stat_warn (file_name);
+      void (*diag) (char const *) = NULL;
+      int fd = subfile_open (dir->parent, dir->orig_file_name, open_read_flags);
+      if (fd < 0)
+       diag = open_diag;
+      else if (fstat (fd, &dir->stat))
+        {
+         diag = stat_diag;
+          close (fd);
+        }
       else
-       stat_error (file_name);
-      report_difference (0);
-      return 0;
+       dir->fd = fd;
+      if (diag)
+       {
+         file_removed_diag (dir->orig_file_name, false, diag);
+         return;
+       }
     }
+  dumpdir_buffer = directory_contents (scan_directory (dir));
 
-  return 1;
+  if (dumpdir_buffer)
+    {
+      if (dumpdir_cmp (dir->dumpdir, dumpdir_buffer))
+       report_difference (dir, _("Contents differ"));
+    }
+  else
+    read_and_process (dir, process_noop);
+}
+
+static void
+diff_multivol (void)
+{
+  struct stat stat_data;
+  int fd, status;
+  off_t offset;
+
+  if (current_stat_info.had_trailing_slash)
+    {
+      diff_dir ();
+      return;
+    }
+
+  if (!get_stat_data (current_stat_info.file_name, &stat_data))
+    return;
+
+  if (!S_ISREG (stat_data.st_mode))
+    {
+      report_difference (&current_stat_info, _("File type differs"));
+      skip_member ();
+      return;
+    }
+
+  offset = OFF_FROM_HEADER (current_header->oldgnu_header.offset);
+  if (offset < 0
+      || INT_ADD_OVERFLOW (current_stat_info.stat.st_size, offset)
+      || stat_data.st_size != current_stat_info.stat.st_size + offset)
+    {
+      report_difference (&current_stat_info, _("Size differs"));
+      skip_member ();
+      return;
+    }
+
+
+  fd = openat (chdir_fd, current_stat_info.file_name, open_read_flags);
+
+  if (fd < 0)
+    {
+      open_error (current_stat_info.file_name);
+      report_difference (&current_stat_info, NULL);
+      skip_member ();
+      return;
+    }
+
+  if (lseek (fd, offset, SEEK_SET) < 0)
+    {
+      seek_error_details (current_stat_info.file_name, offset);
+      report_difference (&current_stat_info, NULL);
+    }
+  else
+    read_and_process (&current_stat_info, process_rawdata);
+
+  status = close (fd);
+  if (status != 0)
+    close_error (current_stat_info.file_name);
 }
 
 /* Diff a file against the archive.  */
 void
 diff_archive (void)
 {
-  struct stat stat_data;
-  int status;
-  struct utimbuf restore_times;
 
   set_next_block_after (current_header);
-  decode_header (current_header, &current_stat_info, &current_format, 1);
 
   /* Print the block from current_header and current_stat_info.  */
 
@@ -349,7 +464,7 @@ diff_archive (void)
     {
       if (now_verifying)
        fprintf (stdlis, _("Verify "));
-      print_header (-1);
+      print_header (&current_stat_info, current_header, -1);
     }
 
   switch (current_header->header.typeflag)
@@ -368,286 +483,64 @@ diff_archive (void)
       /* Appears to be a file.  See if it's really a directory.  */
 
       if (current_stat_info.had_trailing_slash)
-       goto really_dir;
-
-      if (!get_stat_data (current_stat_info.file_name, &stat_data))
-       {
-         skip_member ();
-         goto quit;
-       }
-
-      if (!S_ISREG (stat_data.st_mode))
-       {
-         report_difference (_("File type differs"));
-         skip_member ();
-         goto quit;
-       }
-
-      if ((current_stat_info.stat.st_mode & MODE_ALL) != (stat_data.st_mode & MODE_ALL))
-       report_difference (_("Mode differs"));
-
-#if !MSDOS
-      /* stat() in djgpp's C library gives a constant number of 42 as the
-        uid and gid of a file.  So, comparing an FTP'ed archive just after
-        unpack would fail on MSDOS.  */
-      if (stat_data.st_uid != current_stat_info.stat.st_uid)
-       report_difference (_("Uid differs"));
-      if (stat_data.st_gid != current_stat_info.stat.st_gid)
-       report_difference (_("Gid differs"));
-#endif
-
-      if (stat_data.st_mtime != current_stat_info.stat.st_mtime)
-       report_difference (_("Mod time differs"));
-      if (current_header->header.typeflag != GNUTYPE_SPARSE &&
-         stat_data.st_size != current_stat_info.stat.st_size)
-       {
-         report_difference (_("Size differs"));
-         skip_member ();
-         goto quit;
-       }
-
-      diff_handle = open (current_stat_info.file_name, O_RDONLY | O_BINARY);
-
-      if (diff_handle < 0)
-       {
-         open_error (current_stat_info.file_name);
-         skip_member ();
-         report_difference (0);
-         goto quit;
-       }
-
-      restore_times.actime = stat_data.st_atime;
-      restore_times.modtime = stat_data.st_mtime;
-
-      /* Need to treat sparse files completely differently here.  */
-
-      if (current_header->header.typeflag == GNUTYPE_SPARSE)
-       diff_sparse_files ();
+       diff_dir ();
       else
-       {
-         if (multi_volume_option)
-           {
-             assign_string (&save_name, current_stat_info.file_name);
-             save_totsize = current_stat_info.stat.st_size;
-             /* save_sizeleft is set in read_and_process.  */
-           }
-
-         read_and_process (current_stat_info.stat.st_size, process_rawdata);
-
-         if (multi_volume_option)
-           assign_string (&save_name, 0);
-       }
-
-      status = close (diff_handle);
-      if (status != 0)
-       close_error (current_stat_info.file_name);
-
-      if (atime_preserve_option)
-       utime (current_stat_info.file_name, &restore_times);
-
-    quit:
+       diff_file ();
       break;
 
-#if !MSDOS
     case LNKTYPE:
-      {
-       struct stat link_data;
-
-       if (!get_stat_data (current_stat_info.file_name, &stat_data))
-         break;
-       if (!get_stat_data (current_stat_info.link_name, &link_data))
-         break;
-
-       if (stat_data.st_dev != link_data.st_dev
-           || stat_data.st_ino != link_data.st_ino)
-         {
-           char *message =
-             xmalloc (MESSAGE_BUFFER_SIZE + 4 * strlen (current_stat_info.link_name));
-
-           sprintf (message, _("Not linked to %s"),
-                    quote (current_stat_info.link_name));
-           report_difference (message);
-           free (message);
-           break;
-         }
-
-       break;
-      }
-#endif /* not MSDOS */
+      diff_link ();
+      break;
 
 #ifdef HAVE_READLINK
     case SYMTYPE:
-      {
-       size_t len = strlen (current_stat_info.link_name);
-       char *linkbuf = alloca (len + 1);
-
-       status = readlink (current_stat_info.file_name, linkbuf, len + 1);
-
-       if (status < 0)
-         {
-           if (errno == ENOENT)
-             readlink_warn (current_stat_info.file_name);
-           else
-             readlink_error (current_stat_info.file_name);
-           report_difference (0);
-         }
-       else if (status != len
-                || strncmp (current_stat_info.link_name, linkbuf, len) != 0)
-         report_difference (_("Symlink differs"));
-
-       break;
-      }
+      diff_symlink ();
+      break;
 #endif
 
     case CHRTYPE:
     case BLKTYPE:
     case FIFOTYPE:
-
-      /* FIXME: deal with umask.  */
-
-      if (!get_stat_data (current_stat_info.file_name, &stat_data))
-       break;
-
-      if (current_header->header.typeflag == CHRTYPE
-         ? !S_ISCHR (stat_data.st_mode)
-         : current_header->header.typeflag == BLKTYPE
-         ? !S_ISBLK (stat_data.st_mode)
-         : /* current_header->header.typeflag == FIFOTYPE */
-         !S_ISFIFO (stat_data.st_mode))
-       {
-         report_difference (_("File type differs"));
-         break;
-       }
-
-      if ((current_header->header.typeflag == CHRTYPE
-          || current_header->header.typeflag == BLKTYPE)
-         && current_stat_info.stat.st_rdev != stat_data.st_rdev)
-       {
-         report_difference (_("Device number differs"));
-         break;
-       }
-
-      if ((current_stat_info.stat.st_mode & MODE_ALL) != (stat_data.st_mode & MODE_ALL))
-       {
-         report_difference (_("Mode differs"));
-         break;
-       }
-
+      diff_special ();
       break;
 
     case GNUTYPE_DUMPDIR:
-      {
-       char *dumpdir_buffer = get_directory_contents (current_stat_info.file_name, 0);
-
-       if (multi_volume_option)
-         {
-           assign_string (&save_name, current_stat_info.file_name);
-           save_totsize = current_stat_info.stat.st_size;
-           /* save_sizeleft is set in read_and_process.  */
-         }
-
-       if (dumpdir_buffer)
-         {
-           dumpdir_cursor = dumpdir_buffer;
-           read_and_process (current_stat_info.stat.st_size, process_dumpdir);
-           free (dumpdir_buffer);
-         }
-       else
-         read_and_process (current_stat_info.stat.st_size, process_noop);
-
-       if (multi_volume_option)
-         assign_string (&save_name, 0);
-       /* Fall through.  */
-      }
-
     case DIRTYPE:
-    really_dir:
-      if (!get_stat_data (current_stat_info.file_name, &stat_data))
-       break;
-
-      if (!S_ISDIR (stat_data.st_mode))
-       {
-         report_difference (_("File type differs"));
-         break;
-       }
-
-      if ((current_stat_info.stat.st_mode & MODE_ALL) != (stat_data.st_mode & MODE_ALL))
-       {
-         report_difference (_("Mode differs"));
-         break;
-       }
-
+      if (is_dumpdir (&current_stat_info))
+       diff_dumpdir (&current_stat_info);
+      diff_dir ();
       break;
 
     case GNUTYPE_VOLHDR:
       break;
 
     case GNUTYPE_MULTIVOL:
-      {
-       off_t offset;
-
-       if (current_stat_info.had_trailing_slash)
-         goto really_dir;
-
-       if (!get_stat_data (current_stat_info.file_name, &stat_data))
-         break;
-
-       if (!S_ISREG (stat_data.st_mode))
-         {
-           report_difference (_("File type differs"));
-           skip_member ();
-           break;
-         }
-
-       offset = OFF_FROM_HEADER (current_header->oldgnu_header.offset);
-       if (stat_data.st_size != current_stat_info.stat.st_size + offset)
-         {
-           report_difference (_("Size differs"));
-           skip_member ();
-           break;
-         }
-
-       diff_handle = open (current_stat_info.file_name, O_RDONLY | O_BINARY);
-
-       if (diff_handle < 0)
-         {
-           open_error (current_stat_info.file_name);
-           report_difference (0);
-           skip_member ();
-           break;
-         }
-
-       if (lseek (diff_handle, offset, SEEK_SET) < 0)
-         {
-           seek_error_details (current_stat_info.file_name, offset);
-           report_difference (0);
-           break;
-         }
-
-       if (multi_volume_option)
-         {
-           assign_string (&save_name, current_stat_info.file_name);
-           save_totsize = stat_data.st_size;
-           /* save_sizeleft is set in read_and_process.  */
-         }
-
-       read_and_process (current_stat_info.stat.st_size, process_rawdata);
-
-       if (multi_volume_option)
-         assign_string (&save_name, 0);
-
-       status = close (diff_handle);
-       if (status != 0)
-         close_error (current_stat_info.file_name);
-
-       break;
-      }
+      diff_multivol ();
     }
 }
 
 void
 verify_volume (void)
 {
+  int may_fail = 0;
+  if (removed_prefixes_p ())
+    {
+      WARN((0, 0,
+           _("Archive contains file names with leading prefixes removed.")));
+      may_fail = 1;
+    }
+  if (transform_program_p ())
+    {
+      WARN((0, 0,
+           _("Archive contains transformed file names.")));
+      may_fail = 1;
+    }
+  if (may_fail)
+    WARN((0, 0,
+         _("Verification may fail to locate original files.")));
+
+  clear_directory_table ();
+
   if (!diff_buffer)
     diff_init ();
 
@@ -700,7 +593,9 @@ verify_volume (void)
   flush_read ();
   while (1)
     {
-      enum read_header status = read_header (0);
+      enum read_header status = read_header (&current_header,
+                                             &current_stat_info,
+                                             read_header_auto);
 
       if (status == HEADER_FAILURE)
        {
@@ -709,17 +604,40 @@ verify_volume (void)
          do
            {
              counter++;
-             status = read_header (0);
+             set_next_block_after (current_header);
+             status = read_header (&current_header, &current_stat_info,
+                                   read_header_auto);
            }
          while (status == HEADER_FAILURE);
 
          ERROR ((0, 0,
-                 _("VERIFY FAILURE: %d invalid header(s) detected"), counter));
+                 ngettext ("VERIFY FAILURE: %d invalid header detected",
+                           "VERIFY FAILURE: %d invalid headers detected",
+                           counter), counter));
        }
-      if (status == HEADER_ZERO_BLOCK || status == HEADER_END_OF_FILE)
+      if (status == HEADER_END_OF_FILE)
        break;
+      if (status == HEADER_ZERO_BLOCK)
+       {
+         set_next_block_after (current_header);
+          if (!ignore_zeros_option)
+            {
+             char buf[UINTMAX_STRSIZE_BOUND];
+
+             status = read_header (&current_header, &current_stat_info,
+                                   read_header_auto);
+             if (status == HEADER_ZERO_BLOCK)
+               break;
+             WARNOPT (WARN_ALONE_ZERO_BLOCK,
+                      (0, 0, _("A lone zero block at %s"),
+                       STRINGIFY_BIGINT (current_block_ordinal (), buf)));
+            }
+         continue;
+       }
 
+      decode_header (current_header, &current_stat_info, &current_format, 1);
       diff_archive ();
+      tar_stat_destroy (&current_stat_info);
     }
 
   access_mode = ACCESS_WRITE;
This page took 0.039986 seconds and 4 git commands to generate.