archival/libunarchive/data_extract_all.c

   1 /* vi: set sw=4 ts=4: */
   2 /*
   3  * Licensed under GPLv2 or later, see file LICENSE in this tarball for details.
   4  */
   5
   6 #include "libbb.h"
   7 #include "unarchive.h"
   8
   9 void data_extract_all(archive_handle_t *archive_handle)
  10 {
  11         file_header_t *file_header = archive_handle->file_header;
  12         int dst_fd;
  13         int res;
  14
  15         if (archive_handle->flags & ARCHIVE_CREATE_LEADING_DIRS) {
  16                 char *name = xstrdup(file_header->name);
  17                 bb_make_directory (dirname(name), -1, FILEUTILS_RECUR);
  18                 free(name);
  19         }
  20
  21         /* Check if the file already exists */
  22         if (archive_handle->flags & ARCHIVE_EXTRACT_UNCONDITIONAL) {
  23                 /* Remove the existing entry if it exists */
  24                 if (((file_header->mode & S_IFMT) != S_IFDIR) && (unlink(file_header->name) == -1) && (errno != ENOENT)) {
  25                         bb_perror_msg_and_die("Couldnt remove old file");
  26                 }
  27         }
  28         else if (archive_handle->flags & ARCHIVE_EXTRACT_NEWER) {
  29                 /* Remove the existing entry if its older than the extracted entry */
  30                 struct stat statbuf;
  31                 if (lstat(file_header->name, &statbuf) == -1) {
  32                         if (errno != ENOENT) {
  33                                 bb_perror_msg_and_die("Couldnt stat old file");
  34                         }
  35                 }
  36                 else if (statbuf.st_mtime <= file_header->mtime) {
  37                         if (!(archive_handle->flags & ARCHIVE_EXTRACT_QUIET)) {
  38                                 bb_error_msg("%s not created: newer or same age file exists", file_header->name);
  39                         }
  40                         data_skip(archive_handle);
  41                         return;
  42                 }
  43                 else if ((unlink(file_header->name) == -1) && (errno != EISDIR)) {
  44                         bb_perror_msg_and_die("Couldnt remove old file %s", file_header->name);
  45                 }
  46         }
  47
  48         /* Handle hard links separately
  49          * We identified hard links as regular files of size 0 with a symlink */
  50         if (S_ISREG(file_header->mode) && (file_header->link_name) && (file_header->size == 0)) {
  51                 /* hard link */
  52                 res = link(file_header->link_name, file_header->name);
  53                 if ((res == -1) && !(archive_handle->flags & ARCHIVE_EXTRACT_QUIET)) {
  54                         bb_perror_msg("Couldnt create hard link");
  55                 }
  56         } else {
  57                 /* Create the filesystem entry */
  58                 switch(file_header->mode & S_IFMT) {
  59                         case S_IFREG: {
  60                                 /* Regular file */
  61                                 dst_fd = xopen(file_header->name, O_WRONLY | O_CREAT | O_EXCL);
  62                                 bb_copyfd_size(archive_handle->src_fd, dst_fd, file_header->size);
  63                                 close(dst_fd);
  64                                 break;
  65                                 }
  66                         case S_IFDIR:
  67                                 res = mkdir(file_header->name, file_header->mode);
  68                                 if ((errno != EISDIR) && (res == -1) && !(archive_handle->flags & ARCHIVE_EXTRACT_QUIET)) {
  69                                         bb_perror_msg("extract_archive: %s", file_header->name);
  70                                 }
  71                                 break;
  72                         case S_IFLNK:
  73                                 /* Symlink */
  74                                 res = symlink(file_header->link_name, file_header->name);
  75                                 if ((res == -1) && !(archive_handle->flags & ARCHIVE_EXTRACT_QUIET)) {
  76                                         bb_perror_msg("Cannot create symlink from %s to '%s'", file_header->name, file_header->link_name);
  77                                 }
  78                                 break;
  79                         case S_IFSOCK:
  80                         case S_IFBLK:
  81                         case S_IFCHR:
  82                         case S_IFIFO:
  83                                 res = mknod(file_header->name, file_header->mode, file_header->device);
  84                                 if ((res == -1) && !(archive_handle->flags & ARCHIVE_EXTRACT_QUIET)) {
  85                                         bb_perror_msg("Cannot create node %s", file_header->name);
  86                                 }
  87                                 break;
  88                         default:
  89                                 bb_error_msg_and_die("Unrecognised file type");
  90                 }
  91         }
  92
  93         if (!(archive_handle->flags & ARCHIVE_NOPRESERVE_OWN)) {
  94                 lchown(file_header->name, file_header->uid, file_header->gid);
  95         }
  96         if (!(archive_handle->flags & ARCHIVE_NOPRESERVE_PERM) &&
  97                  (file_header->mode & S_IFMT) != S_IFLNK)
  98         {
  99                 chmod(file_header->name, file_header->mode);
 100         }
 101
 102         if (archive_handle->flags & ARCHIVE_PRESERVE_DATE) {
 103                 struct utimbuf t;
 104                 t.actime = t.modtime = file_header->mtime;
 105                 utime(file_header->name, &t);
 106         }
 107 }