1 /* vi: set sw=4 ts=4: */
3 * Licensed under GPLv2 or later, see file LICENSE in this source tree.
7 #include "bb_archive.h"
9 void FAST_FUNC data_extract_all(archive_handle_t *archive_handle)
11 file_header_t *file_header = archive_handle->file_header;
15 #if ENABLE_FEATURE_TAR_SELINUX
16 char *sctx = archive_handle->tar__sctx[PAX_NEXT_FILE];
18 sctx = archive_handle->tar__sctx[PAX_GLOBAL];
19 if (sctx) { /* setfscreatecon is 4 syscalls, avoid if possible */
21 free(archive_handle->tar__sctx[PAX_NEXT_FILE]);
22 archive_handle->tar__sctx[PAX_NEXT_FILE] = NULL;
26 if (archive_handle->ah_flags & ARCHIVE_CREATE_LEADING_DIRS) {
27 char *slash = strrchr(file_header->name, '/');
30 bb_make_directory(file_header->name, -1, FILEUTILS_RECUR);
35 if (archive_handle->ah_flags & ARCHIVE_UNLINK_OLD) {
36 /* Remove the entry if it exists */
37 if (!S_ISDIR(file_header->mode)) {
39 * We encode hard links as regular files of size 0 with a symlink */
40 if (S_ISREG(file_header->mode)
41 && file_header->link_target
42 && file_header->size == 0
45 * tar cf t.tar hardlink1 hardlink2 hardlink1
46 * results in this tarball structure:
48 * hardlink2 -> hardlink1
49 * hardlink1 -> hardlink1 <== !!!
51 if (strcmp(file_header->link_target, file_header->name) == 0)
54 /* Proceed with deleting */
55 if (unlink(file_header->name) == -1
58 bb_perror_msg_and_die("can't remove old file %s",
63 else if (archive_handle->ah_flags & ARCHIVE_EXTRACT_NEWER) {
64 /* Remove the existing entry if its older than the extracted entry */
65 struct stat existing_sb;
66 if (lstat(file_header->name, &existing_sb) == -1) {
67 if (errno != ENOENT) {
68 bb_perror_msg_and_die("can't stat old file");
71 else if (existing_sb.st_mtime >= file_header->mtime) {
72 if (!(archive_handle->ah_flags & ARCHIVE_EXTRACT_QUIET)
73 && !S_ISDIR(file_header->mode)
75 bb_error_msg("%s not created: newer or "
76 "same age file exists", file_header->name);
78 data_skip(archive_handle);
81 else if ((unlink(file_header->name) == -1) && (errno != EISDIR)) {
82 bb_perror_msg_and_die("can't remove old file %s",
87 /* Handle hard links separately
88 * We encode hard links as regular files of size 0 with a symlink */
89 if (S_ISREG(file_header->mode)
90 && file_header->link_target
91 && file_header->size == 0
94 res = link(file_header->link_target, file_header->name);
95 if ((res == -1) && !(archive_handle->ah_flags & ARCHIVE_EXTRACT_QUIET)) {
96 bb_perror_msg("can't create %slink "
97 "from %s to %s", "hard",
99 file_header->link_target);
101 /* Hardlinks have no separate mode/ownership, skip chown/chmod */
105 /* Create the filesystem entry */
106 switch (file_header->mode & S_IFMT) {
110 int flags = O_WRONLY | O_CREAT | O_EXCL;
111 if (archive_handle->ah_flags & ARCHIVE_O_TRUNC)
112 flags = O_WRONLY | O_CREAT | O_TRUNC;
113 dst_name = file_header->name;
114 #ifdef ARCHIVE_REPLACE_VIA_RENAME
115 if (archive_handle->ah_flags & ARCHIVE_REPLACE_VIA_RENAME)
116 /* rpm-style temp file name */
117 dst_name = xasprintf("%s;%x", dst_name, (int)getpid());
119 dst_fd = xopen3(dst_name,
123 bb_copyfd_exact_size(archive_handle->src_fd, dst_fd, file_header->size);
125 #ifdef ARCHIVE_REPLACE_VIA_RENAME
126 if (archive_handle->ah_flags & ARCHIVE_REPLACE_VIA_RENAME) {
127 xrename(dst_name, file_header->name);
134 res = mkdir(file_header->name, file_header->mode);
136 && (errno != EISDIR) /* btw, Linux doesn't return this */
138 && !(archive_handle->ah_flags & ARCHIVE_EXTRACT_QUIET)
140 bb_perror_msg("can't make dir %s", file_header->name);
145 //TODO: what if file_header->link_target == NULL (say, corrupted tarball?)
146 res = symlink(file_header->link_target, file_header->name);
148 && !(archive_handle->ah_flags & ARCHIVE_EXTRACT_QUIET)
150 bb_perror_msg("can't create %slink "
151 "from %s to %s", "sym",
153 file_header->link_target);
160 res = mknod(file_header->name, file_header->mode, file_header->device);
162 && !(archive_handle->ah_flags & ARCHIVE_EXTRACT_QUIET)
164 bb_perror_msg("can't create node %s", file_header->name);
168 bb_error_msg_and_die("unrecognized file type");
171 if (!S_ISLNK(file_header->mode)) {
172 if (!(archive_handle->ah_flags & ARCHIVE_DONT_RESTORE_OWNER)) {
173 uid_t uid = file_header->uid;
174 gid_t gid = file_header->gid;
175 #if ENABLE_FEATURE_TAR_UNAME_GNAME
176 if (!(archive_handle->ah_flags & ARCHIVE_NUMERIC_OWNER)) {
177 if (file_header->tar__uname) {
178 //TODO: cache last name/id pair?
179 struct passwd *pwd = getpwnam(file_header->tar__uname);
180 if (pwd) uid = pwd->pw_uid;
182 if (file_header->tar__gname) {
183 struct group *grp = getgrnam(file_header->tar__gname);
184 if (grp) gid = grp->gr_gid;
188 /* GNU tar 1.15.1 uses chown, not lchown */
189 chown(file_header->name, uid, gid);
191 /* uclibc has no lchmod, glibc is even stranger -
192 * it has lchmod which seems to do nothing!
193 * so we use chmod... */
194 if (!(archive_handle->ah_flags & ARCHIVE_DONT_RESTORE_PERM)) {
195 chmod(file_header->name, file_header->mode);
197 if (archive_handle->ah_flags & ARCHIVE_RESTORE_DATE) {
200 t[1].tv_sec = t[0].tv_sec = file_header->mtime;
201 t[1].tv_usec = t[0].tv_usec = 0;
202 utimes(file_header->name, t);
207 #if ENABLE_FEATURE_TAR_SELINUX
209 /* reset the context after creating an entry */
210 setfscreatecon(NULL);