archival/libunarchive/data_extract_all.c

   1 /*
   2  *  This program is free software; you can redistribute it and/or modify
   3  *  it under the terms of the GNU General Public License as published by
   4  *  the Free Software Foundation; either version 2 of the License, or
   5  *  (at your option) any later version.
   6  *
   7  *  This program is distributed in the hope that it will be useful,
   8  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
   9  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  10  *  GNU General Public License for more details.
  11  *
  12  *  You should have received a copy of the GNU General Public License
  13  *  along with this program; if not, write to the Free Software
  14  *  Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
  15  */
  16
  17 #include <sys/types.h>
  18
  19 #include <errno.h>
  20 #include <fcntl.h>
  21 #include <stdlib.h>
  22 #include <string.h>
  23 #include <utime.h>
  24 #include <unistd.h>
  25 #include <stdlib.h>
  26
  27 #include "libbb.h"
  28 #include "unarchive.h"
  29
  30 extern void data_extract_all(archive_handle_t *archive_handle)
  31 {
  32         file_header_t *file_header = archive_handle->file_header;
  33         int dst_fd;
  34         int res;
  35
  36         if (archive_handle->flags & ARCHIVE_CREATE_LEADING_DIRS) {
  37                 char *name = bb_xstrdup(file_header->name);
  38                 bb_make_directory (dirname(name), 0777, FILEUTILS_RECUR);
  39                 free(name);
  40         }
  41
  42         /* Check if the file already exists */
  43         if (archive_handle->flags & ARCHIVE_EXTRACT_UNCONDITIONAL) {
  44                 /* Remove the existing entry if it exists */
  45                 if (((file_header->mode & S_IFMT) != S_IFDIR) && (unlink(file_header->name) == -1) && (errno != ENOENT)) {
  46                         bb_perror_msg_and_die("Couldnt remove old file");
  47                 }
  48         }
  49         else if (archive_handle->flags & ARCHIVE_EXTRACT_NEWER) {
  50                 /* Remove the existing entry if its older than the extracted entry */
  51                 struct stat statbuf;
  52                 if (lstat(file_header->name, &statbuf) == -1) {
  53                         if (errno != ENOENT) {
  54                                 bb_perror_msg_and_die("Couldnt stat old file");
  55                         }
  56                 }
  57                 else if (statbuf.st_mtime <= file_header->mtime) {
  58                         if (!(archive_handle->flags & ARCHIVE_EXTRACT_QUIET)) {
  59                                 bb_error_msg("%s not created: newer or same age file exists", file_header->name);
  60                         }
  61                         data_skip(archive_handle);
  62                         return;
  63                 }
  64                 else if ((unlink(file_header->name) == -1) && (errno != EISDIR)) {
  65                         bb_perror_msg_and_die("Couldnt remove old file %s", file_header->name);
  66                 }
  67         }
  68
  69         /* Handle hard links seperately */
  70         if (!S_ISLNK(file_header->mode) && (file_header->link_name) && (file_header->size == 0)) {
  71                 /* hard link */
  72                 res = link(file_header->link_name, file_header->name);
  73                 if ((res == -1) && !(archive_handle->flags & ARCHIVE_EXTRACT_QUIET)) {
  74                         bb_perror_msg("Couldnt create hard link");
  75                 }
  76         } else {
  77                 /* Create the filesystem entry */
  78                 switch(file_header->mode & S_IFMT) {
  79                         case S_IFREG: {
  80                                 /* Regular file */
  81                                 dst_fd = bb_xopen(file_header->name, O_WRONLY | O_CREAT | O_EXCL);
  82                                 bb_copyfd_size(archive_handle->src_fd, dst_fd, file_header->size);
  83                                 close(dst_fd);
  84                                 break;
  85                                 }
  86                         case S_IFDIR:
  87                                 res = mkdir(file_header->name, file_header->mode);
  88                                 if ((errno != EISDIR) && (res == -1) && !(archive_handle->flags & ARCHIVE_EXTRACT_QUIET)) {
  89                                         bb_perror_msg("extract_archive: %s", file_header->name);
  90                                 }
  91                                 break;
  92                         case S_IFLNK:
  93                                 /* Symlink */
  94                                 res = symlink(file_header->link_name, file_header->name);
  95                                 if ((res == -1) && !(archive_handle->flags & ARCHIVE_EXTRACT_QUIET)) {
  96                                         bb_perror_msg("Cannot create symlink from %s to '%s'", file_header->name, file_header->link_name);
  97                                 }
  98                                 break;
  99                         case S_IFSOCK:
 100                         case S_IFBLK:
 101                         case S_IFCHR:
 102                         case S_IFIFO:
 103                                 res = mknod(file_header->name, file_header->mode, file_header->device);
 104                                 if ((res == -1) && !(archive_handle->flags & ARCHIVE_EXTRACT_QUIET)) {
 105                                         bb_perror_msg("Cannot create node %s", file_header->name);
 106                                 }
 107                                 break;
 108                         default:
 109                                 bb_error_msg_and_die("Unrecognised file type");
 110                 }
 111         }
 112
 113         chown(file_header->name, file_header->uid, file_header->gid);
 114         chmod(file_header->name, file_header->mode);
 115
 116         if (archive_handle->flags & ARCHIVE_PRESERVE_DATE) {
 117                 struct utimbuf t;
 118                 t.actime = t.modtime = file_header->mtime;
 119                 utime(file_header->name, &t);
 120         }
 121 }