blob: 344c9dea452c64468a216e767b297208357ece21 [file] [log] [blame]
Erik Andersene49d5ec2000-02-08 19:58:47 +00001/* vi: set sw=4 ts=4: */
Eric Andersencc8ed391999-10-05 16:24:54 +00002/*
Eric Andersenc7bda1c2004-03-15 08:29:22 +00003 * Mini tar implementation for busybox
Erik Andersen6acaa402000-03-26 14:03:20 +00004 *
Eric Andersenaff114c2004-04-14 17:51:38 +00005 * Modified to use common extraction code used by ar, cpio, dpkg-deb, dpkg
Denis Vlasenko0beaff82007-09-21 13:16:32 +00006 * by Glenn McGrath
Glenn L McGrath2e772ed2001-10-05 02:58:48 +00007 *
Erik Andersen61677fe2000-04-13 01:18:56 +00008 * Note, that as of BusyBox-0.43, tar has been completely rewritten from the
Eric Andersenaff114c2004-04-14 17:51:38 +00009 * ground up. It still has remnants of the old code lying about, but it is
Eric Andersen77d92682001-05-23 20:32:09 +000010 * very different now (i.e., cleaner, less global variables, etc.)
Eric Andersenc4996011999-10-20 22:08:37 +000011 *
Eric Andersenc7bda1c2004-03-15 08:29:22 +000012 * Copyright (C) 1999-2004 by Erik Andersen <andersen@codepoet.org>
Eric Andersen96bcfd31999-11-12 01:30:18 +000013 *
Erik Andersen6acaa402000-03-26 14:03:20 +000014 * Based in part in the tar implementation in sash
15 * Copyright (c) 1999 by David I. Bell
16 * Permission is granted to use, distribute, or modify this source,
17 * provided that this copyright notice remains intact.
18 * Permission to distribute sash derived code under the GPL has been granted.
19 *
Erik Andersen68a9ea42000-04-04 18:39:50 +000020 * Based in part on the tar implementation from busybox-0.28
Erik Andersen6acaa402000-03-26 14:03:20 +000021 * Copyright (C) 1995 Bruce Perens
Erik Andersen6acaa402000-03-26 14:03:20 +000022 *
Bernhard Reutner-Fischerd9cf7ac2006-04-12 18:39:58 +000023 * Licensed under GPLv2 or later, see file LICENSE in this tarball for details.
Eric Andersencc8ed391999-10-05 16:24:54 +000024 */
25
Rob Landley1bfca7b2006-09-10 03:20:37 +000026#include <fnmatch.h>
Denis Vlasenkob6adbf12007-05-26 19:00:18 +000027#include "libbb.h"
Denis Vlasenko218f2f42007-01-24 22:02:01 +000028#include "unarchive.h"
Denis Vlasenko87cf2ee2008-02-13 17:06:53 +000029/* FIXME: Stop using this non-standard feature */
30#ifndef FNM_LEADING_DIR
Denys Vlasenkof94c9bf2009-11-29 07:45:33 +010031# define FNM_LEADING_DIR 0
Denis Vlasenko87cf2ee2008-02-13 17:06:53 +000032#endif
33
Denis Vlasenko431a7c92008-02-19 11:26:28 +000034
Denys Vlasenkof94c9bf2009-11-29 07:45:33 +010035//#define DBG(fmt, ...) bb_error_msg("%s: " fmt, __func__, ## __VA_ARGS__)
36#define DBG(...) ((void)0)
37
38
Denis Vlasenko74324c82007-06-04 10:16:52 +000039#define block_buf bb_common_bufsiz1
40
Denis Vlasenko431a7c92008-02-19 11:26:28 +000041
Denis Vlasenkoe9ad84d2008-08-05 13:10:34 +000042#if !ENABLE_FEATURE_SEAMLESS_GZ && !ENABLE_FEATURE_SEAMLESS_BZ2
Denis Vlasenko431a7c92008-02-19 11:26:28 +000043/* Do not pass gzip flag to writeTarFile() */
44#define writeTarFile(tar_fd, verboseFlag, dereferenceFlag, include, exclude, gzip) \
45 writeTarFile(tar_fd, verboseFlag, dereferenceFlag, include, exclude)
46#endif
47
48
Denis Vlasenkod031ffa2006-11-24 21:54:44 +000049#if ENABLE_FEATURE_TAR_CREATE
Eric Andersencc8ed391999-10-05 16:24:54 +000050
Glenn L McGrath2e772ed2001-10-05 02:58:48 +000051/* Tar file constants */
Glenn L McGrath2e772ed2001-10-05 02:58:48 +000052
Rob Landley3ee6c242005-10-15 03:06:21 +000053#define TAR_BLOCK_SIZE 512
Eric Andersencc8ed391999-10-05 16:24:54 +000054
Erik Andersen298854f2000-03-23 01:09:18 +000055/* POSIX tar Header Block, from POSIX 1003.1-1990 */
Denis Vlasenko376ce1e2006-11-24 14:51:01 +000056#define NAME_SIZE 100
57#define NAME_SIZE_STR "100"
Denys Vlasenkof94c9bf2009-11-29 07:45:33 +010058typedef struct TarHeader { /* byte offset */
Denis Vlasenko376ce1e2006-11-24 14:51:01 +000059 char name[NAME_SIZE]; /* 0-99 */
60 char mode[8]; /* 100-107 */
61 char uid[8]; /* 108-115 */
62 char gid[8]; /* 116-123 */
63 char size[12]; /* 124-135 */
64 char mtime[12]; /* 136-147 */
65 char chksum[8]; /* 148-155 */
66 char typeflag; /* 156-156 */
67 char linkname[NAME_SIZE]; /* 157-256 */
Denis Vlasenko85128622007-11-16 20:35:30 +000068 /* POSIX: "ustar" NUL "00" */
69 /* GNU tar: "ustar " NUL */
Paul Fox16aec392007-11-17 19:11:05 +000070 /* Normally it's defined as magic[6] followed by
71 * version[2], but we put them together to save code.
72 */
Denis Vlasenko85128622007-11-16 20:35:30 +000073 char magic[8]; /* 257-264 */
Denis Vlasenko376ce1e2006-11-24 14:51:01 +000074 char uname[32]; /* 265-296 */
75 char gname[32]; /* 297-328 */
76 char devmajor[8]; /* 329-336 */
77 char devminor[8]; /* 337-344 */
78 char prefix[155]; /* 345-499 */
Paul Fox16aec392007-11-17 19:11:05 +000079 char padding[12]; /* 500-512 (pad to exactly TAR_BLOCK_SIZE) */
Denys Vlasenkof94c9bf2009-11-29 07:45:33 +010080} TarHeader;
Eric Andersencc8ed391999-10-05 16:24:54 +000081
Eric Andersen3d957c82000-12-07 00:34:58 +000082/*
Denis Vlasenko4fbb5842006-11-24 14:55:23 +000083** writeTarFile(), writeFileToTarball(), and writeTarHeader() are
Eric Andersen3d957c82000-12-07 00:34:58 +000084** the only functions that deal with the HardLinkInfo structure.
85** Even these functions use the xxxHardLinkInfo() functions.
86*/
Denys Vlasenkof94c9bf2009-11-29 07:45:33 +010087typedef struct HardLinkInfo {
88 struct HardLinkInfo *next; /* Next entry in list */
89 dev_t dev; /* Device number */
90 ino_t ino; /* Inode number */
91// short linkCount; /* (Hard) Link Count */
92 char name[1]; /* Start of filename (must be last) */
93} HardLinkInfo;
Eric Andersen3d957c82000-12-07 00:34:58 +000094
Erik Andersen68a9ea42000-04-04 18:39:50 +000095/* Some info to be carried along when creating a new tarball */
Denys Vlasenkof94c9bf2009-11-29 07:45:33 +010096typedef struct TarBallInfo {
Denis Vlasenko5a07a1d2008-04-21 21:56:07 +000097 int tarFd; /* Open-for-write file descriptor
98 * for the tarball */
Denis Vlasenko5a07a1d2008-04-21 21:56:07 +000099 int verboseFlag; /* Whether to print extra stuff or not */
100 const llist_t *excludeList; /* List of files to not include */
101 HardLinkInfo *hlInfoHead; /* Hard Link Tracking Information */
102 HardLinkInfo *hlInfo; /* Hard Link Info for the current file */
Denys Vlasenkof94c9bf2009-11-29 07:45:33 +0100103//TODO: save only st_dev + st_ino
104 struct stat tarFileStatBuf; /* Stat info for the tarball, letting
105 * us know the inode and device that the
106 * tarball lives, so we can avoid trying
107 * to include the tarball into itself */
108} TarBallInfo;
Erik Andersen68a9ea42000-04-04 18:39:50 +0000109
Glenn L McGrath2e772ed2001-10-05 02:58:48 +0000110/* A nice enum with all the possible tar file content types */
Denys Vlasenkof94c9bf2009-11-29 07:45:33 +0100111enum {
Glenn L McGratha0ee8812002-08-22 13:44:08 +0000112 REGTYPE = '0', /* regular file */
113 REGTYPE0 = '\0', /* regular file (ancient bug compat) */
114 LNKTYPE = '1', /* hard link */
115 SYMTYPE = '2', /* symbolic link */
116 CHRTYPE = '3', /* character special */
117 BLKTYPE = '4', /* block special */
118 DIRTYPE = '5', /* directory */
119 FIFOTYPE = '6', /* FIFO special */
120 CONTTYPE = '7', /* reserved */
121 GNULONGLINK = 'K', /* GNU long (>100 chars) link name */
122 GNULONGNAME = 'L', /* GNU long (>100 chars) file name */
Glenn L McGrath2e772ed2001-10-05 02:58:48 +0000123};
Erik Andersen68a9ea42000-04-04 18:39:50 +0000124
Eric Andersen3d957c82000-12-07 00:34:58 +0000125/* Might be faster (and bigger) if the dev/ino were stored in numeric order;) */
Denis Vlasenko7e0fbf92007-09-04 19:33:22 +0000126static void addHardLinkInfo(HardLinkInfo **hlInfoHeadPtr,
Glenn L McGrathf66de642002-11-25 23:57:27 +0000127 struct stat *statbuf,
Denis Vlasenko0c45bb232006-09-09 12:49:03 +0000128 const char *fileName)
Eric Andersen3d957c82000-12-07 00:34:58 +0000129{
130 /* Note: hlInfoHeadPtr can never be NULL! */
131 HardLinkInfo *hlInfo;
132
Denis Vlasenko0c45bb232006-09-09 12:49:03 +0000133 hlInfo = xmalloc(sizeof(HardLinkInfo) + strlen(fileName));
Glenn L McGrathf66de642002-11-25 23:57:27 +0000134 hlInfo->next = *hlInfoHeadPtr;
135 *hlInfoHeadPtr = hlInfo;
136 hlInfo->dev = statbuf->st_dev;
137 hlInfo->ino = statbuf->st_ino;
Denys Vlasenkof94c9bf2009-11-29 07:45:33 +0100138// hlInfo->linkCount = statbuf->st_nlink;
Denis Vlasenko0c45bb232006-09-09 12:49:03 +0000139 strcpy(hlInfo->name, fileName);
Eric Andersen3d957c82000-12-07 00:34:58 +0000140}
141
Denis Vlasenko7e0fbf92007-09-04 19:33:22 +0000142static void freeHardLinkInfo(HardLinkInfo **hlInfoHeadPtr)
Eric Andersen3d957c82000-12-07 00:34:58 +0000143{
Denis Vlasenko376ce1e2006-11-24 14:51:01 +0000144 HardLinkInfo *hlInfo;
145 HardLinkInfo *hlInfoNext;
Eric Andersen3d957c82000-12-07 00:34:58 +0000146
147 if (hlInfoHeadPtr) {
148 hlInfo = *hlInfoHeadPtr;
149 while (hlInfo) {
150 hlInfoNext = hlInfo->next;
151 free(hlInfo);
152 hlInfo = hlInfoNext;
153 }
154 *hlInfoHeadPtr = NULL;
155 }
Eric Andersen3d957c82000-12-07 00:34:58 +0000156}
157
Denys Vlasenkod43d6282009-11-29 16:28:33 +0100158/* Might be faster (and bigger) if the dev/ino were stored in numeric order ;) */
159static HardLinkInfo *findHardLinkInfo(HardLinkInfo *hlInfo, struct stat *statbuf)
Eric Andersen3d957c82000-12-07 00:34:58 +0000160{
Glenn L McGratha0ee8812002-08-22 13:44:08 +0000161 while (hlInfo) {
Denys Vlasenkod43d6282009-11-29 16:28:33 +0100162 if (statbuf->st_ino == hlInfo->ino
163 && statbuf->st_dev == hlInfo->dev
Denys Vlasenkof94c9bf2009-11-29 07:45:33 +0100164 ) {
165 DBG("found hardlink:'%s'", hlInfo->name);
Eric Andersen3d957c82000-12-07 00:34:58 +0000166 break;
Denys Vlasenkof94c9bf2009-11-29 07:45:33 +0100167 }
Eric Andersen3d957c82000-12-07 00:34:58 +0000168 hlInfo = hlInfo->next;
169 }
Denis Vlasenko0c45bb232006-09-09 12:49:03 +0000170 return hlInfo;
Eric Andersen3d957c82000-12-07 00:34:58 +0000171}
172
Erik Andersen6acaa402000-03-26 14:03:20 +0000173/* Put an octal string into the specified buffer.
Denis Vlasenko376ce1e2006-11-24 14:51:01 +0000174 * The number is zero padded and possibly null terminated.
Denis Vlasenko87cd4a82006-11-25 23:47:32 +0000175 * Stores low-order bits only if whole value does not fit. */
176static void putOctal(char *cp, int len, off_t value)
Erik Andersen6acaa402000-03-26 14:03:20 +0000177{
Denys Vlasenkof94c9bf2009-11-29 07:45:33 +0100178 char tempBuffer[sizeof(off_t)*3 + 1];
Erik Andersen5661fe02000-04-05 01:00:52 +0000179 char *tempString = tempBuffer;
Denis Vlasenkof2408e62006-11-25 14:48:09 +0000180 int width;
Erik Andersen6acaa402000-03-26 14:03:20 +0000181
Denis Vlasenkof2408e62006-11-25 14:48:09 +0000182 width = sprintf(tempBuffer, "%0*"OFF_FMT"o", len, value);
183 tempString += (width - len);
Erik Andersen6acaa402000-03-26 14:03:20 +0000184
Denis Vlasenkof2408e62006-11-25 14:48:09 +0000185 /* If string has leading zeroes, we can drop one */
186 /* and field will have trailing '\0' */
187 /* (increases chances of compat with other tars) */
188 if (tempString[0] == '0')
189 tempString++;
Erik Andersen6acaa402000-03-26 14:03:20 +0000190
Denis Vlasenkof2408e62006-11-25 14:48:09 +0000191 /* Copy the string to the field */
Glenn L McGratha0ee8812002-08-22 13:44:08 +0000192 memcpy(cp, tempString, len);
Erik Andersen6acaa402000-03-26 14:03:20 +0000193}
Denis Vlasenko7725d0f2006-11-25 23:56:50 +0000194#define PUT_OCTAL(a, b) putOctal((a), sizeof(a), (b))
195
196static void chksum_and_xwrite(int fd, struct TarHeader* hp)
197{
Denis Vlasenkodcbd51d2007-03-03 20:06:59 +0000198 /* POSIX says that checksum is done on unsigned bytes
Denis Vlasenko940494f2007-03-04 18:09:50 +0000199 * (Sun and HP-UX gets it wrong... more details in
Denis Vlasenkodcbd51d2007-03-03 20:06:59 +0000200 * GNU tar source) */
Denis Vlasenko7725d0f2006-11-25 23:56:50 +0000201 const unsigned char *cp;
202 int chksum, size;
203
204 strcpy(hp->magic, "ustar ");
205
206 /* Calculate and store the checksum (i.e., the sum of all of the bytes of
207 * the header). The checksum field must be filled with blanks for the
208 * calculation. The checksum field is formatted differently from the
209 * other fields: it has 6 digits, a null, then a space -- rather than
210 * digits, followed by a null like the other fields... */
211 memset(hp->chksum, ' ', sizeof(hp->chksum));
212 cp = (const unsigned char *) hp;
213 chksum = 0;
214 size = sizeof(*hp);
215 do { chksum += *cp++; } while (--size);
216 putOctal(hp->chksum, sizeof(hp->chksum)-1, chksum);
217
218 /* Now write the header out to disk */
219 xwrite(fd, hp, sizeof(*hp));
220}
221
222#if ENABLE_FEATURE_TAR_GNU_EXTENSIONS
223static void writeLongname(int fd, int type, const char *name, int dir)
224{
225 static const struct {
226 char mode[8]; /* 100-107 */
227 char uid[8]; /* 108-115 */
228 char gid[8]; /* 116-123 */
229 char size[12]; /* 124-135 */
230 char mtime[12]; /* 136-147 */
231 } prefilled = {
232 "0000000",
233 "0000000",
234 "0000000",
235 "00000000000",
236 "00000000000",
237 };
238 struct TarHeader header;
239 int size;
240
241 dir = !!dir; /* normalize: 0/1 */
242 size = strlen(name) + 1 + dir; /* GNU tar uses strlen+1 */
243 /* + dir: account for possible '/' */
244
Bernhard Reutner-Fischer6f0540e2006-12-12 11:50:44 +0000245 memset(&header, 0, sizeof(header));
Denis Vlasenko7725d0f2006-11-25 23:56:50 +0000246 strcpy(header.name, "././@LongLink");
247 memcpy(header.mode, prefilled.mode, sizeof(prefilled));
248 PUT_OCTAL(header.size, size);
249 header.typeflag = type;
250 chksum_and_xwrite(fd, &header);
251
252 /* Write filename[/] and pad the block. */
253 /* dir=0: writes 'name<NUL>', pads */
254 /* dir=1: writes 'name', writes '/<NUL>', pads */
255 dir *= 2;
256 xwrite(fd, name, size - dir);
257 xwrite(fd, "/", dir);
258 size = (-size) & (TAR_BLOCK_SIZE-1);
Bernhard Reutner-Fischer6f0540e2006-12-12 11:50:44 +0000259 memset(&header, 0, size);
Denis Vlasenko7725d0f2006-11-25 23:56:50 +0000260 xwrite(fd, &header, size);
261}
262#endif
Erik Andersen6acaa402000-03-26 14:03:20 +0000263
Erik Andersen68a9ea42000-04-04 18:39:50 +0000264/* Write out a tar header for the specified file/directory/whatever */
Denis Vlasenko376ce1e2006-11-24 14:51:01 +0000265void BUG_tar_header_size(void);
Rob Landley88621d72006-08-29 19:41:06 +0000266static int writeTarHeader(struct TarBallInfo *tbInfo,
Denis Vlasenko0c45bb232006-09-09 12:49:03 +0000267 const char *header_name, const char *fileName, struct stat *statbuf)
Erik Andersen6acaa402000-03-26 14:03:20 +0000268{
Erik Andersen5661fe02000-04-05 01:00:52 +0000269 struct TarHeader header;
Erik Andersen3364d782000-03-28 00:58:14 +0000270
Denis Vlasenko376ce1e2006-11-24 14:51:01 +0000271 if (sizeof(header) != 512)
272 BUG_tar_header_size();
273
Bernhard Reutner-Fischer6f0540e2006-12-12 11:50:44 +0000274 memset(&header, 0, sizeof(struct TarHeader));
Glenn L McGratha0ee8812002-08-22 13:44:08 +0000275
Denis Vlasenko7725d0f2006-11-25 23:56:50 +0000276 strncpy(header.name, header_name, sizeof(header.name));
Erik Andersenecd51242000-04-08 03:08:21 +0000277
Denis Vlasenko376ce1e2006-11-24 14:51:01 +0000278 /* POSIX says to mask mode with 07777. */
Denis Vlasenkof2408e62006-11-25 14:48:09 +0000279 PUT_OCTAL(header.mode, statbuf->st_mode & 07777);
280 PUT_OCTAL(header.uid, statbuf->st_uid);
281 PUT_OCTAL(header.gid, statbuf->st_gid);
Denis Vlasenkob8a8e602006-11-24 14:59:45 +0000282 memset(header.size, '0', sizeof(header.size)-1); /* Regular file size is handled later */
Denis Vlasenkof2408e62006-11-25 14:48:09 +0000283 PUT_OCTAL(header.mtime, statbuf->st_mtime);
Erik Andersen68a9ea42000-04-04 18:39:50 +0000284
Denis Vlasenkoc50f3702006-11-24 14:57:31 +0000285 /* Enter the user and group names */
286 safe_strncpy(header.uname, get_cached_username(statbuf->st_uid), sizeof(header.uname));
287 safe_strncpy(header.gname, get_cached_groupname(statbuf->st_gid), sizeof(header.gname));
Erik Andersen5661fe02000-04-05 01:00:52 +0000288
Eric Andersen3d957c82000-12-07 00:34:58 +0000289 if (tbInfo->hlInfo) {
290 /* This is a hard link */
291 header.typeflag = LNKTYPE;
Glenn L McGratha0ee8812002-08-22 13:44:08 +0000292 strncpy(header.linkname, tbInfo->hlInfo->name,
293 sizeof(header.linkname));
Denis Vlasenko7725d0f2006-11-25 23:56:50 +0000294#if ENABLE_FEATURE_TAR_GNU_EXTENSIONS
295 /* Write out long linkname if needed */
296 if (header.linkname[sizeof(header.linkname)-1])
297 writeLongname(tbInfo->tarFd, GNULONGLINK,
298 tbInfo->hlInfo->name, 0);
299#endif
Eric Andersen3d957c82000-12-07 00:34:58 +0000300 } else if (S_ISLNK(statbuf->st_mode)) {
Denis Vlasenko6ca04442007-02-11 16:19:28 +0000301 char *lpath = xmalloc_readlink_or_warn(fileName);
302 if (!lpath)
Denis Vlasenko0c45bb232006-09-09 12:49:03 +0000303 return FALSE;
Glenn L McGratha0ee8812002-08-22 13:44:08 +0000304 header.typeflag = SYMTYPE;
305 strncpy(header.linkname, lpath, sizeof(header.linkname));
Denis Vlasenko7725d0f2006-11-25 23:56:50 +0000306#if ENABLE_FEATURE_TAR_GNU_EXTENSIONS
307 /* Write out long linkname if needed */
308 if (header.linkname[sizeof(header.linkname)-1])
309 writeLongname(tbInfo->tarFd, GNULONGLINK, lpath, 0);
310#else
Denis Vlasenko376ce1e2006-11-24 14:51:01 +0000311 /* If it is larger than 100 bytes, bail out */
Denis Vlasenko7725d0f2006-11-25 23:56:50 +0000312 if (header.linkname[sizeof(header.linkname)-1]) {
Denis Vlasenko376ce1e2006-11-24 14:51:01 +0000313 free(lpath);
314 bb_error_msg("names longer than "NAME_SIZE_STR" chars not supported");
315 return FALSE;
316 }
Denis Vlasenko7725d0f2006-11-25 23:56:50 +0000317#endif
Mark Whitley8a633262001-04-30 18:17:00 +0000318 free(lpath);
Erik Andersen68a9ea42000-04-04 18:39:50 +0000319 } else if (S_ISDIR(statbuf->st_mode)) {
Glenn L McGratha0ee8812002-08-22 13:44:08 +0000320 header.typeflag = DIRTYPE;
Denis Vlasenko7725d0f2006-11-25 23:56:50 +0000321 /* Append '/' only if there is a space for it */
322 if (!header.name[sizeof(header.name)-1])
323 header.name[strlen(header.name)] = '/';
Erik Andersen68a9ea42000-04-04 18:39:50 +0000324 } else if (S_ISCHR(statbuf->st_mode)) {
Glenn L McGratha0ee8812002-08-22 13:44:08 +0000325 header.typeflag = CHRTYPE;
Denis Vlasenkof2408e62006-11-25 14:48:09 +0000326 PUT_OCTAL(header.devmajor, major(statbuf->st_rdev));
327 PUT_OCTAL(header.devminor, minor(statbuf->st_rdev));
Erik Andersen68a9ea42000-04-04 18:39:50 +0000328 } else if (S_ISBLK(statbuf->st_mode)) {
Glenn L McGratha0ee8812002-08-22 13:44:08 +0000329 header.typeflag = BLKTYPE;
Denis Vlasenkof2408e62006-11-25 14:48:09 +0000330 PUT_OCTAL(header.devmajor, major(statbuf->st_rdev));
331 PUT_OCTAL(header.devminor, minor(statbuf->st_rdev));
Erik Andersen68a9ea42000-04-04 18:39:50 +0000332 } else if (S_ISFIFO(statbuf->st_mode)) {
Glenn L McGratha0ee8812002-08-22 13:44:08 +0000333 header.typeflag = FIFOTYPE;
Erik Andersen5661fe02000-04-05 01:00:52 +0000334 } else if (S_ISREG(statbuf->st_mode)) {
Denis Vlasenko87cd4a82006-11-25 23:47:32 +0000335 if (sizeof(statbuf->st_size) > 4
336 && statbuf->st_size > (off_t)0777777777777LL
Denis Vlasenkof2408e62006-11-25 14:48:09 +0000337 ) {
Denys Vlasenko6331cf02009-11-13 09:08:27 +0100338 bb_error_msg_and_die("can't store file '%s' "
Denys Vlasenkoa3aa3e32009-12-11 12:36:10 +0100339 "of size %"OFF_FMT"u, aborting",
Denis Vlasenkof2408e62006-11-25 14:48:09 +0000340 fileName, statbuf->st_size);
341 }
Denis Vlasenko87cd4a82006-11-25 23:47:32 +0000342 header.typeflag = REGTYPE;
343 PUT_OCTAL(header.size, statbuf->st_size);
Erik Andersen68a9ea42000-04-04 18:39:50 +0000344 } else {
Denis Vlasenko0c45bb232006-09-09 12:49:03 +0000345 bb_error_msg("%s: unknown file type", fileName);
346 return FALSE;
Erik Andersen68a9ea42000-04-04 18:39:50 +0000347 }
Erik Andersen68a9ea42000-04-04 18:39:50 +0000348
Denis Vlasenko7725d0f2006-11-25 23:56:50 +0000349#if ENABLE_FEATURE_TAR_GNU_EXTENSIONS
350 /* Write out long name if needed */
351 /* (we, like GNU tar, output long linkname *before* long name) */
352 if (header.name[sizeof(header.name)-1])
353 writeLongname(tbInfo->tarFd, GNULONGNAME,
354 header_name, S_ISDIR(statbuf->st_mode));
355#endif
Glenn L McGratha0ee8812002-08-22 13:44:08 +0000356
Erik Andersen5661fe02000-04-05 01:00:52 +0000357 /* Now write the header out to disk */
Denis Vlasenko7725d0f2006-11-25 23:56:50 +0000358 chksum_and_xwrite(tbInfo->tarFd, &header);
Denis Vlasenko0c45bb232006-09-09 12:49:03 +0000359
Erik Andersen5661fe02000-04-05 01:00:52 +0000360 /* Now do the verbose thing (or not) */
Robert Grieblf2f26e72002-07-23 22:05:47 +0000361 if (tbInfo->verboseFlag) {
Eric Andersenfdd51032000-08-02 18:48:26 +0000362 FILE *vbFd = stdout;
Glenn L McGratha0ee8812002-08-22 13:44:08 +0000363
Denis Vlasenkoab6b4462008-12-12 02:14:35 +0000364 /* If archive goes to stdout, verbose goes to stderr */
365 if (tbInfo->tarFd == STDOUT_FILENO)
Eric Andersenfdd51032000-08-02 18:48:26 +0000366 vbFd = stderr;
Denis Vlasenko3feb2fc2006-11-24 21:55:55 +0000367 /* GNU "tar cvvf" prints "extended" listing a-la "ls -l" */
368 /* We don't have such excesses here: for us "v" == "vv" */
Denis Vlasenko7725d0f2006-11-25 23:56:50 +0000369 /* '/' is probably a GNUism */
370 fprintf(vbFd, "%s%s\n", header_name,
371 S_ISDIR(statbuf->st_mode) ? "/" : "");
Eric Andersenfdd51032000-08-02 18:48:26 +0000372 }
Erik Andersen3364d782000-03-28 00:58:14 +0000373
Denis Vlasenko0c45bb232006-09-09 12:49:03 +0000374 return TRUE;
Erik Andersen3364d782000-03-28 00:58:14 +0000375}
376
Denis Vlasenko218f2f42007-01-24 22:02:01 +0000377#if ENABLE_FEATURE_TAR_FROM
Rob Landley88621d72006-08-29 19:41:06 +0000378static int exclude_file(const llist_t *excluded_files, const char *file)
Glenn L McGrath2e772ed2001-10-05 02:58:48 +0000379{
Glenn L McGrath7ca04f32002-09-25 02:47:48 +0000380 while (excluded_files) {
381 if (excluded_files->data[0] == '/') {
382 if (fnmatch(excluded_files->data, file,
Denys Vlasenkof94c9bf2009-11-29 07:45:33 +0100383 FNM_PATHNAME | FNM_LEADING_DIR) == 0)
Glenn L McGrath2e772ed2001-10-05 02:58:48 +0000384 return 1;
385 } else {
386 const char *p;
387
388 for (p = file; p[0] != '\0'; p++) {
Denys Vlasenkof94c9bf2009-11-29 07:45:33 +0100389 if ((p == file || p[-1] == '/')
390 && p[0] != '/'
391 && fnmatch(excluded_files->data, p,
392 FNM_PATHNAME | FNM_LEADING_DIR) == 0
393 ) {
Glenn L McGrath2e772ed2001-10-05 02:58:48 +0000394 return 1;
Denys Vlasenkof94c9bf2009-11-29 07:45:33 +0100395 }
Glenn L McGrath2e772ed2001-10-05 02:58:48 +0000396 }
397 }
Glenn L McGrath7ca04f32002-09-25 02:47:48 +0000398 excluded_files = excluded_files->link;
Glenn L McGrath2e772ed2001-10-05 02:58:48 +0000399 }
400
401 return 0;
402}
Denis Vlasenko218f2f42007-01-24 22:02:01 +0000403#else
Denys Vlasenkof94c9bf2009-11-29 07:45:33 +0100404# define exclude_file(excluded_files, file) 0
Denis Vlasenko218f2f42007-01-24 22:02:01 +0000405#endif
Erik Andersen3364d782000-03-28 00:58:14 +0000406
Denis Vlasenkodefc1ea2008-06-27 02:52:20 +0000407static int FAST_FUNC writeFileToTarball(const char *fileName, struct stat *statbuf,
Denis Vlasenkoa60f84e2008-07-05 09:18:54 +0000408 void *userData, int depth UNUSED_PARAM)
Erik Andersen3364d782000-03-28 00:58:14 +0000409{
Glenn L McGratha0ee8812002-08-22 13:44:08 +0000410 struct TarBallInfo *tbInfo = (struct TarBallInfo *) userData;
Matt Kraaie80a2632000-12-19 20:45:49 +0000411 const char *header_name;
Rob Landleye5695532006-01-09 03:07:44 +0000412 int inputFileFd = -1;
Erik Andersen68a9ea42000-04-04 18:39:50 +0000413
Denys Vlasenkof94c9bf2009-11-29 07:45:33 +0100414 DBG("writeFileToTarball('%s')", fileName);
415
Denis Vlasenkoe9b33212007-09-24 19:32:53 +0000416 /* Strip leading '/' (must be before memorizing hardlink's name) */
Matt Kraaie80a2632000-12-19 20:45:49 +0000417 header_name = fileName;
418 while (header_name[0] == '/') {
Denis Vlasenko931de892007-06-21 12:43:45 +0000419 static smallint warned;
Glenn L McGratha0ee8812002-08-22 13:44:08 +0000420
Denis Vlasenko931de892007-06-21 12:43:45 +0000421 if (!warned) {
Denis Vlasenko0c45bb232006-09-09 12:49:03 +0000422 bb_error_msg("removing leading '/' from member names");
Denis Vlasenko931de892007-06-21 12:43:45 +0000423 warned = 1;
Matt Kraaia1f97752000-12-19 06:24:08 +0000424 }
Matt Kraaie80a2632000-12-19 20:45:49 +0000425 header_name++;
Matt Kraaia1f97752000-12-19 06:24:08 +0000426 }
427
Denis Vlasenko86e0a222007-09-24 19:07:57 +0000428 if (header_name[0] == '\0')
429 return TRUE;
430
Denis Vlasenkoe9b33212007-09-24 19:32:53 +0000431 /* It is against the rules to archive a socket */
432 if (S_ISSOCK(statbuf->st_mode)) {
433 bb_error_msg("%s: socket ignored", fileName);
434 return TRUE;
435 }
436
Denis Vlasenko86e0a222007-09-24 19:07:57 +0000437 /*
438 * Check to see if we are dealing with a hard link.
439 * If so -
440 * Treat the first occurance of a given dev/inode as a file while
441 * treating any additional occurances as hard links. This is done
442 * by adding the file information to the HardLinkInfo linked list.
443 */
444 tbInfo->hlInfo = NULL;
Denys Vlasenkof94c9bf2009-11-29 07:45:33 +0100445 if (!S_ISDIR(statbuf->st_mode) && statbuf->st_nlink > 1) {
446 DBG("'%s': st_nlink > 1", header_name);
Denys Vlasenkod43d6282009-11-29 16:28:33 +0100447 tbInfo->hlInfo = findHardLinkInfo(tbInfo->hlInfoHead, statbuf);
Denys Vlasenkof94c9bf2009-11-29 07:45:33 +0100448 if (tbInfo->hlInfo == NULL) {
449 DBG("'%s': addHardLinkInfo", header_name);
Denis Vlasenko86e0a222007-09-24 19:07:57 +0000450 addHardLinkInfo(&tbInfo->hlInfoHead, statbuf, header_name);
Denys Vlasenkof94c9bf2009-11-29 07:45:33 +0100451 }
Denis Vlasenko86e0a222007-09-24 19:07:57 +0000452 }
453
Denis Vlasenko86e0a222007-09-24 19:07:57 +0000454 /* It is a bad idea to store the archive we are in the process of creating,
455 * so check the device and inode to be sure that this particular file isn't
456 * the new tarball */
Denys Vlasenkof94c9bf2009-11-29 07:45:33 +0100457 if (tbInfo->tarFileStatBuf.st_dev == statbuf->st_dev
458 && tbInfo->tarFileStatBuf.st_ino == statbuf->st_ino
Denis Vlasenko86e0a222007-09-24 19:07:57 +0000459 ) {
460 bb_error_msg("%s: file is the archive; skipping", fileName);
461 return TRUE;
462 }
463
464 if (exclude_file(tbInfo->excludeList, header_name))
465 return SKIP;
466
Denis Vlasenko7725d0f2006-11-25 23:56:50 +0000467#if !ENABLE_FEATURE_TAR_GNU_EXTENSIONS
Denis Vlasenko86e0a222007-09-24 19:07:57 +0000468 if (strlen(header_name) >= NAME_SIZE) {
Denis Vlasenko376ce1e2006-11-24 14:51:01 +0000469 bb_error_msg("names longer than "NAME_SIZE_STR" chars not supported");
Denis Vlasenko0c45bb232006-09-09 12:49:03 +0000470 return TRUE;
Eric Andersen1b1cfde2000-09-24 00:54:37 +0000471 }
Denis Vlasenko7725d0f2006-11-25 23:56:50 +0000472#endif
Eric Andersen1b1cfde2000-09-24 00:54:37 +0000473
Rob Landleye5695532006-01-09 03:07:44 +0000474 /* Is this a regular file? */
Denis Vlasenko376ce1e2006-11-24 14:51:01 +0000475 if (tbInfo->hlInfo == NULL && S_ISREG(statbuf->st_mode)) {
Erik Andersen5661fe02000-04-05 01:00:52 +0000476 /* open the file we want to archive, and make sure all is well */
Denis Vlasenko50f7f442007-04-11 23:20:53 +0000477 inputFileFd = open_or_warn(fileName, O_RDONLY);
Denis Vlasenko376ce1e2006-11-24 14:51:01 +0000478 if (inputFileFd < 0) {
Denis Vlasenko0c45bb232006-09-09 12:49:03 +0000479 return FALSE;
Erik Andersen5661fe02000-04-05 01:00:52 +0000480 }
Rob Landleye5695532006-01-09 03:07:44 +0000481 }
482
483 /* Add an entry to the tarball */
484 if (writeTarHeader(tbInfo, header_name, fileName, statbuf) == FALSE) {
Denis Vlasenko0c45bb232006-09-09 12:49:03 +0000485 return FALSE;
Rob Landleye5695532006-01-09 03:07:44 +0000486 }
487
488 /* If it was a regular file, write out the body */
Denis Vlasenko0c45bb232006-09-09 12:49:03 +0000489 if (inputFileFd >= 0) {
Denis Vlasenko714701c2006-12-22 00:21:07 +0000490 size_t readSize;
Denis Vlasenko50f7f442007-04-11 23:20:53 +0000491 /* Write the file to the archive. */
Denis Vlasenko714701c2006-12-22 00:21:07 +0000492 /* We record size into header first, */
493 /* and then write out file. If file shrinks in between, */
494 /* tar will be corrupted. So we don't allow for that. */
495 /* NB: GNU tar 1.16 warns and pads with zeroes */
496 /* or even seeks back and updates header */
497 bb_copyfd_exact_size(inputFileFd, tbInfo->tarFd, statbuf->st_size);
498 ////off_t readSize;
499 ////readSize = bb_copyfd_size(inputFileFd, tbInfo->tarFd, statbuf->st_size);
500 ////if (readSize != statbuf->st_size && readSize >= 0) {
501 //// bb_error_msg_and_die("short read from %s, aborting", fileName);
502 ////}
Glenn L McGratha0ee8812002-08-22 13:44:08 +0000503
Denis Vlasenko4fbb5842006-11-24 14:55:23 +0000504 /* Check that file did not grow in between? */
Denis Vlasenko714701c2006-12-22 00:21:07 +0000505 /* if (safe_read(inputFileFd, 1) == 1) warn but continue? */
506
Rob Landleye5695532006-01-09 03:07:44 +0000507 close(inputFileFd);
Glenn L McGrath7ffe1332003-11-21 22:24:57 +0000508
Erik Andersen5661fe02000-04-05 01:00:52 +0000509 /* Pad the file up to the tar block size */
Denis Vlasenko376ce1e2006-11-24 14:51:01 +0000510 /* (a few tricks here in the name of code size) */
Denis Vlasenko714701c2006-12-22 00:21:07 +0000511 readSize = (-(int)statbuf->st_size) & (TAR_BLOCK_SIZE-1);
Denis Vlasenko74324c82007-06-04 10:16:52 +0000512 memset(block_buf, 0, readSize);
513 xwrite(tbInfo->tarFd, block_buf, readSize);
Erik Andersen5661fe02000-04-05 01:00:52 +0000514 }
Erik Andersen68a9ea42000-04-04 18:39:50 +0000515
Denis Vlasenko0c45bb232006-09-09 12:49:03 +0000516 return TRUE;
Erik Andersen6acaa402000-03-26 14:03:20 +0000517}
518
Denis Vlasenkoe9ad84d2008-08-05 13:10:34 +0000519#if ENABLE_FEATURE_SEAMLESS_GZ || ENABLE_FEATURE_SEAMLESS_BZ2
Denys Vlasenkof94c9bf2009-11-29 07:45:33 +0100520# if !(ENABLE_FEATURE_SEAMLESS_GZ && ENABLE_FEATURE_SEAMLESS_BZ2)
521# define vfork_compressor(tar_fd, gzip) vfork_compressor(tar_fd)
522# endif
Denis Vlasenko5a07a1d2008-04-21 21:56:07 +0000523/* Don't inline: vfork scares gcc and pessimizes code */
524static void NOINLINE vfork_compressor(int tar_fd, int gzip)
Erik Andersen6acaa402000-03-26 14:03:20 +0000525{
Denis Vlasenko5a07a1d2008-04-21 21:56:07 +0000526 pid_t gzipPid;
Denys Vlasenkof94c9bf2009-11-29 07:45:33 +0100527# if ENABLE_FEATURE_SEAMLESS_GZ && ENABLE_FEATURE_SEAMLESS_BZ2
Denis Vlasenko5a07a1d2008-04-21 21:56:07 +0000528 const char *zip_exec = (gzip == 1) ? "gzip" : "bzip2";
Denys Vlasenkof94c9bf2009-11-29 07:45:33 +0100529# elif ENABLE_FEATURE_SEAMLESS_GZ
Denis Vlasenko5a07a1d2008-04-21 21:56:07 +0000530 const char *zip_exec = "gzip";
Denys Vlasenkof94c9bf2009-11-29 07:45:33 +0100531# else /* only ENABLE_FEATURE_SEAMLESS_BZ2 */
Denis Vlasenko5a07a1d2008-04-21 21:56:07 +0000532 const char *zip_exec = "bzip2";
Denys Vlasenkof94c9bf2009-11-29 07:45:33 +0100533# endif
Denis Vlasenko5a07a1d2008-04-21 21:56:07 +0000534 // On Linux, vfork never unpauses parent early, although standard
535 // allows for that. Do we want to waste bytes checking for it?
Denys Vlasenkof94c9bf2009-11-29 07:45:33 +0100536# define WAIT_FOR_CHILD 0
Denis Vlasenko5a07a1d2008-04-21 21:56:07 +0000537 volatile int vfork_exec_errno = 0;
538 struct fd_pair gzipDataPipe;
Denys Vlasenkof94c9bf2009-11-29 07:45:33 +0100539# if WAIT_FOR_CHILD
Denis Vlasenko5a07a1d2008-04-21 21:56:07 +0000540 struct fd_pair gzipStatusPipe;
541 xpiped_pair(gzipStatusPipe);
Denys Vlasenkof94c9bf2009-11-29 07:45:33 +0100542# endif
Denis Vlasenko5a07a1d2008-04-21 21:56:07 +0000543 xpiped_pair(gzipDataPipe);
544
545 signal(SIGPIPE, SIG_IGN); /* we only want EPIPE on errors */
546
Denys Vlasenkof94c9bf2009-11-29 07:45:33 +0100547# if defined(__GNUC__) && __GNUC__
Denis Vlasenko5a07a1d2008-04-21 21:56:07 +0000548 /* Avoid vfork clobbering */
549 (void) &zip_exec;
Denys Vlasenkof94c9bf2009-11-29 07:45:33 +0100550# endif
Denis Vlasenko5a07a1d2008-04-21 21:56:07 +0000551
Denis Vlasenko82604e92008-07-01 15:59:42 +0000552 gzipPid = vfork();
553 if (gzipPid < 0)
Denis Vlasenkofa0b56d2008-07-01 16:09:07 +0000554 bb_perror_msg_and_die("vfork");
Denis Vlasenko5a07a1d2008-04-21 21:56:07 +0000555
556 if (gzipPid == 0) {
557 /* child */
558 /* NB: close _first_, then move fds! */
559 close(gzipDataPipe.wr);
Denys Vlasenkof94c9bf2009-11-29 07:45:33 +0100560# if WAIT_FOR_CHILD
Denis Vlasenko5a07a1d2008-04-21 21:56:07 +0000561 close(gzipStatusPipe.rd);
562 /* gzipStatusPipe.wr will close only on exec -
563 * parent waits for this close to happen */
564 fcntl(gzipStatusPipe.wr, F_SETFD, FD_CLOEXEC);
Denys Vlasenkof94c9bf2009-11-29 07:45:33 +0100565# endif
Denis Vlasenko5a07a1d2008-04-21 21:56:07 +0000566 xmove_fd(gzipDataPipe.rd, 0);
567 xmove_fd(tar_fd, 1);
568 /* exec gzip/bzip2 program/applet */
569 BB_EXECLP(zip_exec, zip_exec, "-f", NULL);
570 vfork_exec_errno = errno;
Bernhard Reutner-Fischer636a1f82008-05-19 09:29:47 +0000571 _exit(EXIT_FAILURE);
Denis Vlasenko5a07a1d2008-04-21 21:56:07 +0000572 }
573
574 /* parent */
575 xmove_fd(gzipDataPipe.wr, tar_fd);
576 close(gzipDataPipe.rd);
Denys Vlasenkof94c9bf2009-11-29 07:45:33 +0100577# if WAIT_FOR_CHILD
Denis Vlasenko5a07a1d2008-04-21 21:56:07 +0000578 close(gzipStatusPipe.wr);
579 while (1) {
580 char buf;
581 int n;
582
583 /* Wait until child execs (or fails to) */
584 n = full_read(gzipStatusPipe.rd, &buf, 1);
585 if (n < 0 /* && errno == EAGAIN */)
586 continue; /* try it again */
587 }
588 close(gzipStatusPipe.rd);
Denys Vlasenkof94c9bf2009-11-29 07:45:33 +0100589# endif
Denis Vlasenko5a07a1d2008-04-21 21:56:07 +0000590 if (vfork_exec_errno) {
591 errno = vfork_exec_errno;
Denis Vlasenkof9d4fc32009-04-21 20:40:51 +0000592 bb_perror_msg_and_die("can't execute '%s'", zip_exec);
Denis Vlasenko5a07a1d2008-04-21 21:56:07 +0000593 }
594}
Denis Vlasenkoe9ad84d2008-08-05 13:10:34 +0000595#endif /* ENABLE_FEATURE_SEAMLESS_GZ || ENABLE_FEATURE_SEAMLESS_BZ2 */
Denis Vlasenko5a07a1d2008-04-21 21:56:07 +0000596
597
598/* gcc 4.2.1 inlines it, making code bigger */
599static NOINLINE int writeTarFile(int tar_fd, int verboseFlag,
600 int dereferenceFlag, const llist_t *include,
601 const llist_t *exclude, int gzip)
602{
Glenn L McGratha0ee8812002-08-22 13:44:08 +0000603 int errorFlag = FALSE;
Erik Andersen68a9ea42000-04-04 18:39:50 +0000604 struct TarBallInfo tbInfo;
Glenn L McGratha0ee8812002-08-22 13:44:08 +0000605
Eric Andersen3d957c82000-12-07 00:34:58 +0000606 tbInfo.hlInfoHead = NULL;
Glenn L McGrath91b3d462003-10-02 14:33:23 +0000607 tbInfo.tarFd = tar_fd;
608 tbInfo.verboseFlag = verboseFlag;
Robert Grieblf2f26e72002-07-23 22:05:47 +0000609
Erik Andersen68a9ea42000-04-04 18:39:50 +0000610 /* Store the stat info for the tarball's file, so
611 * can avoid including the tarball into itself.... */
Denys Vlasenkof94c9bf2009-11-29 07:45:33 +0100612 if (fstat(tbInfo.tarFd, &tbInfo.tarFileStatBuf) < 0)
Denys Vlasenko6331cf02009-11-13 09:08:27 +0100613 bb_perror_msg_and_die("can't stat tar file");
Erik Andersen6acaa402000-03-26 14:03:20 +0000614
Denis Vlasenkoe9ad84d2008-08-05 13:10:34 +0000615#if ENABLE_FEATURE_SEAMLESS_GZ || ENABLE_FEATURE_SEAMLESS_BZ2
Denis Vlasenko5a07a1d2008-04-21 21:56:07 +0000616 if (gzip)
617 vfork_compressor(tbInfo.tarFd, gzip);
Denis Vlasenko431a7c92008-02-19 11:26:28 +0000618#endif
Glenn L McGratha0ee8812002-08-22 13:44:08 +0000619
Glenn L McGrath7ca04f32002-09-25 02:47:48 +0000620 tbInfo.excludeList = exclude;
Glenn L McGratha0ee8812002-08-22 13:44:08 +0000621
Erik Andersen6acaa402000-03-26 14:03:20 +0000622 /* Read the directory/files and iterate over them one at a time */
Glenn L McGrath7ca04f32002-09-25 02:47:48 +0000623 while (include) {
Denis Vlasenkobbd695d2007-04-08 10:52:28 +0000624 if (!recursive_action(include->data, ACTION_RECURSE |
625 (dereferenceFlag ? ACTION_FOLLOWLINKS : 0),
Denys Vlasenkod43d6282009-11-29 16:28:33 +0100626 writeFileToTarball, writeFileToTarball, &tbInfo, 0)
627 ) {
Erik Andersen68a9ea42000-04-04 18:39:50 +0000628 errorFlag = TRUE;
Erik Andersen3364d782000-03-28 00:58:14 +0000629 }
Glenn L McGrath7ca04f32002-09-25 02:47:48 +0000630 include = include->link;
Erik Andersen6acaa402000-03-26 14:03:20 +0000631 }
Erik Andersen5661fe02000-04-05 01:00:52 +0000632 /* Write two empty blocks to the end of the archive */
Denis Vlasenko74324c82007-06-04 10:16:52 +0000633 memset(block_buf, 0, 2*TAR_BLOCK_SIZE);
634 xwrite(tbInfo.tarFd, block_buf, 2*TAR_BLOCK_SIZE);
Erik Andersen0817d132000-04-09 15:17:40 +0000635
636 /* To be pedantically correct, we would check if the tarball
Eric Andersen3c5ee9a2000-11-14 22:15:48 +0000637 * is smaller than 20 tar blocks, and pad it if it was smaller,
Erik Andersen0817d132000-04-09 15:17:40 +0000638 * but that isn't necessary for GNU tar interoperability, and
639 * so is considered a waste of space */
640
Rob Landley1a781032005-12-16 21:33:10 +0000641 /* Close so the child process (if any) will exit */
642 close(tbInfo.tarFd);
643
Erik Andersen68a9ea42000-04-04 18:39:50 +0000644 /* Hang up the tools, close up shop, head home */
Rob Landley1a781032005-12-16 21:33:10 +0000645 if (ENABLE_FEATURE_CLEAN_UP)
Rob Landley60fe7bf2005-10-16 03:54:49 +0000646 freeHardLinkInfo(&tbInfo.hlInfoHead);
Rob Landley60fe7bf2005-10-16 03:54:49 +0000647
Glenn L McGratha0ee8812002-08-22 13:44:08 +0000648 if (errorFlag)
Denis Vlasenkoe1a0d482006-10-20 13:28:22 +0000649 bb_error_msg("error exit delayed from previous errors");
Glenn L McGratha0ee8812002-08-22 13:44:08 +0000650
Denis Vlasenkoe9ad84d2008-08-05 13:10:34 +0000651#if ENABLE_FEATURE_SEAMLESS_GZ || ENABLE_FEATURE_SEAMLESS_BZ2
Denis Vlasenko5a07a1d2008-04-21 21:56:07 +0000652 if (gzip) {
Denis Vlasenkoc8889462006-12-17 19:08:20 +0000653 int status;
Denis Vlasenko5a07a1d2008-04-21 21:56:07 +0000654 if (safe_waitpid(-1, &status, 0) == -1)
Denis Vlasenkoc8889462006-12-17 19:08:20 +0000655 bb_perror_msg("waitpid");
656 else if (!WIFEXITED(status) || WEXITSTATUS(status))
657 /* gzip was killed or has exited with nonzero! */
658 errorFlag = TRUE;
659 }
Denis Vlasenko5a07a1d2008-04-21 21:56:07 +0000660#endif
Denis Vlasenkoc8889462006-12-17 19:08:20 +0000661 return errorFlag;
Erik Andersen6acaa402000-03-26 14:03:20 +0000662}
Rob Landley60fe7bf2005-10-16 03:54:49 +0000663#else
Denis Vlasenko5a07a1d2008-04-21 21:56:07 +0000664int writeTarFile(int tar_fd, int verboseFlag,
665 int dereferenceFlag, const llist_t *include,
666 const llist_t *exclude, int gzip);
Denis Vlasenko218f2f42007-01-24 22:02:01 +0000667#endif /* FEATURE_TAR_CREATE */
Erik Andersen6acaa402000-03-26 14:03:20 +0000668
Denis Vlasenkod031ffa2006-11-24 21:54:44 +0000669#if ENABLE_FEATURE_TAR_FROM
Eric Andersen27cb6842003-06-26 09:07:59 +0000670static llist_t *append_file_list_to_list(llist_t *list)
Glenn L McGrathd642a672001-10-13 06:54:45 +0000671{
Eric Andersen27cb6842003-06-26 09:07:59 +0000672 FILE *src_stream;
Glenn L McGrathc5c1a8a2002-10-19 06:19:22 +0000673 char *line;
Eric Andersen27cb6842003-06-26 09:07:59 +0000674 llist_t *newlist = NULL;
675
Denis Vlasenkod50dda82008-06-15 05:40:56 +0000676 while (list) {
Denis Vlasenko5415c852008-07-21 23:05:26 +0000677 src_stream = xfopen_for_read(llist_pop(&list));
Denis Vlasenko8ee649a2008-03-26 20:04:27 +0000678 while ((line = xmalloc_fgetline(src_stream)) != NULL) {
Denis Vlasenko3feb2fc2006-11-24 21:55:55 +0000679 /* kill trailing '/' unless the string is just "/" */
680 char *cp = last_char_is(line, '/');
681 if (cp > line)
682 *cp = '\0';
Denis Vlasenko0c45bb232006-09-09 12:49:03 +0000683 llist_add_to(&newlist, line);
Denis Vlasenko314908d2006-09-03 14:04:33 +0000684 }
Rob Landley60fe7bf2005-10-16 03:54:49 +0000685 fclose(src_stream);
Eric Andersen27cb6842003-06-26 09:07:59 +0000686 }
687 return newlist;
Glenn L McGrath2e772ed2001-10-05 02:58:48 +0000688}
Rob Landley60fe7bf2005-10-16 03:54:49 +0000689#else
Denys Vlasenkof94c9bf2009-11-29 07:45:33 +0100690# define append_file_list_to_list(x) 0
Glenn L McGrath7ca04f32002-09-25 02:47:48 +0000691#endif
Erik Andersen6acaa402000-03-26 14:03:20 +0000692
Denis Vlasenkoe9ad84d2008-08-05 13:10:34 +0000693#if ENABLE_FEATURE_SEAMLESS_Z
Denis Vlasenkodefc1ea2008-06-27 02:52:20 +0000694static char FAST_FUNC get_header_tar_Z(archive_handle_t *archive_handle)
Glenn L McGrath56f16b42003-11-18 21:37:52 +0000695{
Denis Vlasenkoe1a0d482006-10-20 13:28:22 +0000696 /* Can't lseek over pipes */
Denis Vlasenko13858992006-10-08 12:49:22 +0000697 archive_handle->seek = seek_by_read;
Eric Andersen27cb6842003-06-26 09:07:59 +0000698
Glenn L McGrath56f16b42003-11-18 21:37:52 +0000699 /* do the decompression, and cleanup */
Denis Vlasenkocf30cc82006-11-24 14:53:18 +0000700 if (xread_char(archive_handle->src_fd) != 0x1f
701 || xread_char(archive_handle->src_fd) != 0x9d
702 ) {
Denis Vlasenko0c45bb232006-09-09 12:49:03 +0000703 bb_error_msg_and_die("invalid magic");
Glenn L McGrath56f16b42003-11-18 21:37:52 +0000704 }
705
Denis Vlasenkoe9ad84d2008-08-05 13:10:34 +0000706 open_transformer(archive_handle->src_fd, unpack_Z_stream, "uncompress");
Glenn L McGrath56f16b42003-11-18 21:37:52 +0000707 archive_handle->offset = 0;
Denis Vlasenko0c45bb232006-09-09 12:49:03 +0000708 while (get_header_tar(archive_handle) == EXIT_SUCCESS)
Denis Vlasenko476b0702007-09-09 14:11:11 +0000709 continue;
Glenn L McGrath56f16b42003-11-18 21:37:52 +0000710
711 /* Can only do one file at a time */
Denis Vlasenkoe1a0d482006-10-20 13:28:22 +0000712 return EXIT_FAILURE;
Glenn L McGrath56f16b42003-11-18 21:37:52 +0000713}
Rob Landley60fe7bf2005-10-16 03:54:49 +0000714#else
Denys Vlasenkof94c9bf2009-11-29 07:45:33 +0100715# define get_header_tar_Z NULL
Glenn L McGrath56f16b42003-11-18 21:37:52 +0000716#endif
717
Denis Vlasenkoc8889462006-12-17 19:08:20 +0000718#ifdef CHECK_FOR_CHILD_EXITCODE
719/* Looks like it isn't needed - tar detects malformed (truncated)
720 * archive if e.g. bunzip2 fails */
721static int child_error;
722
723static void handle_SIGCHLD(int status)
724{
725 /* Actually, 'status' is a signo. We reuse it for other needs */
726
727 /* Wait for any child without blocking */
Denis Vlasenkofb0eba72008-01-02 19:55:04 +0000728 if (wait_any_nohang(&status) < 0)
Denis Vlasenkoc8889462006-12-17 19:08:20 +0000729 /* wait failed?! I'm confused... */
730 return;
731
Denys Vlasenko425ad9c2009-12-16 22:46:01 +0100732 if (WIFEXITED(status) && WEXITSTATUS(status) == 0)
Denis Vlasenkoc8889462006-12-17 19:08:20 +0000733 /* child exited with 0 */
734 return;
Denis Vlasenkof7996f32007-01-11 17:20:00 +0000735 /* Cannot happen?
Denis Vlasenko51742f42007-04-12 00:32:05 +0000736 if (!WIFSIGNALED(status) && !WIFEXITED(status)) return; */
Denis Vlasenkoc8889462006-12-17 19:08:20 +0000737 child_error = 1;
738}
739#endif
740
Denis Vlasenkod031ffa2006-11-24 21:54:44 +0000741enum {
Bernhard Reutner-Fischer30f3c1d2009-10-25 02:13:32 +0200742 OPTBIT_KEEP_OLD = 8,
Denis Vlasenko5e34ff22009-04-21 11:09:40 +0000743 IF_FEATURE_TAR_CREATE( OPTBIT_CREATE ,)
744 IF_FEATURE_TAR_CREATE( OPTBIT_DEREFERENCE ,)
745 IF_FEATURE_SEAMLESS_BZ2( OPTBIT_BZIP2 ,)
746 IF_FEATURE_SEAMLESS_LZMA(OPTBIT_LZMA ,)
747 IF_FEATURE_TAR_FROM( OPTBIT_INCLUDE_FROM,)
748 IF_FEATURE_TAR_FROM( OPTBIT_EXCLUDE_FROM,)
749 IF_FEATURE_SEAMLESS_GZ( OPTBIT_GZIP ,)
Bernhard Reutner-Fischer30f3c1d2009-10-25 02:13:32 +0200750 IF_FEATURE_SEAMLESS_Z( OPTBIT_COMPRESS ,) // 16th bit
Mikhail Gusarov0d478332010-01-19 20:22:30 +0600751 IF_FEATURE_TAR_NOPRESERVE_TIME(OPTBIT_NOPRESERVE_TIME,)
Denys Vlasenko425ad9c2009-12-16 22:46:01 +0100752#if ENABLE_FEATURE_TAR_LONG_OPTIONS
Ladislav Michl2b46fd42010-06-25 01:33:00 +0200753 IF_FEATURE_TAR_TO_COMMAND(OPTBIT_2COMMAND ,)
Denis Vlasenko8b814b42009-04-21 00:52:21 +0000754 OPTBIT_NUMERIC_OWNER,
Denys Vlasenkod57d6262009-09-17 02:43:14 +0200755 OPTBIT_NOPRESERVE_PERM,
Denys Vlasenko8a936cf2009-12-16 23:18:59 +0100756 OPTBIT_OVERWRITE,
Denys Vlasenko425ad9c2009-12-16 22:46:01 +0100757#endif
Denis Vlasenkod031ffa2006-11-24 21:54:44 +0000758 OPT_TEST = 1 << 0, // t
759 OPT_EXTRACT = 1 << 1, // x
760 OPT_BASEDIR = 1 << 2, // C
761 OPT_TARNAME = 1 << 3, // f
762 OPT_2STDOUT = 1 << 4, // O
Denys Vlasenko425ad9c2009-12-16 22:46:01 +0100763 OPT_NOPRESERVE_OWNER = 1 << 5, // o == no-same-owner
Bernhard Reutner-Fischer30f3c1d2009-10-25 02:13:32 +0200764 OPT_P = 1 << 6, // p
765 OPT_VERBOSE = 1 << 7, // v
766 OPT_KEEP_OLD = 1 << 8, // k
Denis Vlasenko5e34ff22009-04-21 11:09:40 +0000767 OPT_CREATE = IF_FEATURE_TAR_CREATE( (1 << OPTBIT_CREATE )) + 0, // c
768 OPT_DEREFERENCE = IF_FEATURE_TAR_CREATE( (1 << OPTBIT_DEREFERENCE )) + 0, // h
769 OPT_BZIP2 = IF_FEATURE_SEAMLESS_BZ2( (1 << OPTBIT_BZIP2 )) + 0, // j
770 OPT_LZMA = IF_FEATURE_SEAMLESS_LZMA((1 << OPTBIT_LZMA )) + 0, // a
771 OPT_INCLUDE_FROM = IF_FEATURE_TAR_FROM( (1 << OPTBIT_INCLUDE_FROM)) + 0, // T
772 OPT_EXCLUDE_FROM = IF_FEATURE_TAR_FROM( (1 << OPTBIT_EXCLUDE_FROM)) + 0, // X
773 OPT_GZIP = IF_FEATURE_SEAMLESS_GZ( (1 << OPTBIT_GZIP )) + 0, // z
774 OPT_COMPRESS = IF_FEATURE_SEAMLESS_Z( (1 << OPTBIT_COMPRESS )) + 0, // Z
Denys Vlasenko94ca6942010-01-20 02:51:09 +0100775 OPT_NOPRESERVE_TIME = IF_FEATURE_TAR_NOPRESERVE_TIME((1 << OPTBIT_NOPRESERVE_TIME)) + 0, // m
Ladislav Michl2b46fd42010-06-25 01:33:00 +0200776 OPT_2COMMAND = IF_FEATURE_TAR_TO_COMMAND( (1 << OPTBIT_2COMMAND )) + 0, // to-command
Denys Vlasenko425ad9c2009-12-16 22:46:01 +0100777 OPT_NUMERIC_OWNER = IF_FEATURE_TAR_LONG_OPTIONS((1 << OPTBIT_NUMERIC_OWNER )) + 0, // numeric-owner
778 OPT_NOPRESERVE_PERM = IF_FEATURE_TAR_LONG_OPTIONS((1 << OPTBIT_NOPRESERVE_PERM)) + 0, // no-same-permissions
Denys Vlasenko8a936cf2009-12-16 23:18:59 +0100779 OPT_OVERWRITE = IF_FEATURE_TAR_LONG_OPTIONS((1 << OPTBIT_OVERWRITE )) + 0, // overwrite
Denis Vlasenkod031ffa2006-11-24 21:54:44 +0000780};
781#if ENABLE_FEATURE_TAR_LONG_OPTIONS
Denis Vlasenko6ca409e2007-08-12 20:58:27 +0000782static const char tar_longopts[] ALIGN1 =
Denis Vlasenkobdc88fd2007-07-23 17:14:14 +0000783 "list\0" No_argument "t"
784 "extract\0" No_argument "x"
785 "directory\0" Required_argument "C"
786 "file\0" Required_argument "f"
787 "to-stdout\0" No_argument "O"
Bernhard Reutner-Fischer30f3c1d2009-10-25 02:13:32 +0200788 /* do not restore owner */
789 /* Note: GNU tar handles 'o' as no-same-owner only on extract,
790 * on create, 'o' is --old-archive. We do not support --old-archive. */
791 "no-same-owner\0" No_argument "o"
Denis Vlasenkobdc88fd2007-07-23 17:14:14 +0000792 "same-permissions\0" No_argument "p"
793 "verbose\0" No_argument "v"
794 "keep-old\0" No_argument "k"
Denis Vlasenkod031ffa2006-11-24 21:54:44 +0000795# if ENABLE_FEATURE_TAR_CREATE
Denis Vlasenkobdc88fd2007-07-23 17:14:14 +0000796 "create\0" No_argument "c"
797 "dereference\0" No_argument "h"
Glenn L McGrathce91c8a2003-12-26 14:01:37 +0000798# endif
Denis Vlasenkoe9ad84d2008-08-05 13:10:34 +0000799# if ENABLE_FEATURE_SEAMLESS_BZ2
Denis Vlasenkobdc88fd2007-07-23 17:14:14 +0000800 "bzip2\0" No_argument "j"
Glenn L McGrathce91c8a2003-12-26 14:01:37 +0000801# endif
Denis Vlasenkoe9ad84d2008-08-05 13:10:34 +0000802# if ENABLE_FEATURE_SEAMLESS_LZMA
Denis Vlasenkobdc88fd2007-07-23 17:14:14 +0000803 "lzma\0" No_argument "a"
Rob Landleyc1d69902006-01-20 18:28:50 +0000804# endif
Denis Vlasenkod031ffa2006-11-24 21:54:44 +0000805# if ENABLE_FEATURE_TAR_FROM
Denis Vlasenkobdc88fd2007-07-23 17:14:14 +0000806 "files-from\0" Required_argument "T"
807 "exclude-from\0" Required_argument "X"
Glenn L McGrathce91c8a2003-12-26 14:01:37 +0000808# endif
Denis Vlasenkoe9ad84d2008-08-05 13:10:34 +0000809# if ENABLE_FEATURE_SEAMLESS_GZ
Denis Vlasenkobdc88fd2007-07-23 17:14:14 +0000810 "gzip\0" No_argument "z"
Glenn L McGrathce91c8a2003-12-26 14:01:37 +0000811# endif
Denis Vlasenkoe9ad84d2008-08-05 13:10:34 +0000812# if ENABLE_FEATURE_SEAMLESS_Z
Denis Vlasenkobdc88fd2007-07-23 17:14:14 +0000813 "compress\0" No_argument "Z"
Glenn L McGrathce91c8a2003-12-26 14:01:37 +0000814# endif
Mikhail Gusarov0d478332010-01-19 20:22:30 +0600815# if ENABLE_FEATURE_TAR_NOPRESERVE_TIME
816 "touch\0" No_argument "m"
817# endif
Ladislav Michl2b46fd42010-06-25 01:33:00 +0200818# if ENABLE_FEATURE_TAR_TO_COMMAND
819 "to-command\0" Required_argument "\xfb"
820# endif
Denys Vlasenkod57d6262009-09-17 02:43:14 +0200821 /* use numeric uid/gid from tar header, not textual */
Denys Vlasenko8a936cf2009-12-16 23:18:59 +0100822 "numeric-owner\0" No_argument "\xfc"
Denys Vlasenkod57d6262009-09-17 02:43:14 +0200823 /* do not restore mode */
Denys Vlasenko8a936cf2009-12-16 23:18:59 +0100824 "no-same-permissions\0" No_argument "\xfd"
825 /* on unpack, open with O_TRUNC and !O_EXCL */
826 "overwrite\0" No_argument "\xfe"
Denis Vlasenko30d7a342006-11-27 20:24:40 +0000827 /* --exclude takes next bit position in option mask, */
Denys Vlasenko425ad9c2009-12-16 22:46:01 +0100828 /* therefore we have to put it _after_ --no-same-permissions */
Denis Vlasenko30d7a342006-11-27 20:24:40 +0000829# if ENABLE_FEATURE_TAR_FROM
Denis Vlasenkobdc88fd2007-07-23 17:14:14 +0000830 "exclude\0" Required_argument "\xff"
Denis Vlasenko30d7a342006-11-27 20:24:40 +0000831# endif
Denis Vlasenko990d0f62007-07-24 15:54:42 +0000832 ;
Glenn L McGrathce91c8a2003-12-26 14:01:37 +0000833#endif
Glenn L McGrathec87d372002-11-27 07:52:22 +0000834
Denis Vlasenko9b49a5e2007-10-11 10:05:36 +0000835int tar_main(int argc, char **argv) MAIN_EXTERNALLY_VISIBLE;
Denis Vlasenkoa60f84e2008-07-05 09:18:54 +0000836int tar_main(int argc UNUSED_PARAM, char **argv)
Glenn L McGrath2e772ed2001-10-05 02:58:48 +0000837{
Denis Vlasenkodefc1ea2008-06-27 02:52:20 +0000838 char FAST_FUNC (*get_header_ptr)(archive_handle_t *) = get_header_tar;
Glenn L McGrath7ca04f32002-09-25 02:47:48 +0000839 archive_handle_t *tar_handle;
Glenn L McGrath7ca04f32002-09-25 02:47:48 +0000840 char *base_dir = NULL;
Glenn L McGrathf66de642002-11-25 23:57:27 +0000841 const char *tar_filename = "-";
Denis Vlasenko67b23e62006-10-03 21:00:06 +0000842 unsigned opt;
Denis Vlasenko3feb2fc2006-11-24 21:55:55 +0000843 int verboseFlag = 0;
Denis Vlasenko8c0164c2007-02-04 21:30:35 +0000844#if ENABLE_FEATURE_TAR_LONG_OPTIONS && ENABLE_FEATURE_TAR_FROM
"Vladimir N. Oleynik"84e75112005-10-15 06:32:38 +0000845 llist_t *excludes = NULL;
Denis Vlasenko8c0164c2007-02-04 21:30:35 +0000846#endif
Tim Rikerc1ef7bd2006-01-25 00:08:53 +0000847
Glenn L McGrath7ca04f32002-09-25 02:47:48 +0000848 /* Initialise default values */
849 tar_handle = init_handle();
Denis Vlasenkoa60936d2008-06-28 05:04:09 +0000850 tar_handle->ah_flags = ARCHIVE_CREATE_LEADING_DIRS
Denys Vlasenkod57d6262009-09-17 02:43:14 +0200851 | ARCHIVE_RESTORE_DATE
852 | ARCHIVE_UNLINK_OLD;
Glenn L McGrath7ca04f32002-09-25 02:47:48 +0000853
Denis Vlasenko73d702e2008-10-25 09:27:35 +0000854 /* Apparently only root's tar preserves perms (see bug 3844) */
Denis Vlasenkoebad0292008-10-24 23:47:38 +0000855 if (getuid() != 0)
Denys Vlasenkod57d6262009-09-17 02:43:14 +0200856 tar_handle->ah_flags |= ARCHIVE_DONT_RESTORE_PERM;
Denis Vlasenkoebad0292008-10-24 23:47:38 +0000857
"Vladimir N. Oleynik"f704b272005-10-14 09:56:52 +0000858 /* Prepend '-' to the first argument if required */
Denis Vlasenkod031ffa2006-11-24 21:54:44 +0000859 opt_complementary = "--:" // first arg is options
Denis Vlasenko3feb2fc2006-11-24 21:55:55 +0000860 "tt:vv:" // count -t,-v
Denis Vlasenkod031ffa2006-11-24 21:54:44 +0000861 "?:" // bail out with usage instead of error return
862 "X::T::" // cumulative lists
Denis Vlasenko8c0164c2007-02-04 21:30:35 +0000863#if ENABLE_FEATURE_TAR_LONG_OPTIONS && ENABLE_FEATURE_TAR_FROM
Denis Vlasenko30d7a342006-11-27 20:24:40 +0000864 "\xff::" // cumulative lists for --exclude
Denis Vlasenko8c0164c2007-02-04 21:30:35 +0000865#endif
Denis Vlasenko5e34ff22009-04-21 11:09:40 +0000866 IF_FEATURE_TAR_CREATE("c:") "t:x:" // at least one of these is reqd
867 IF_FEATURE_TAR_CREATE("c--tx:t--cx:x--ct") // mutually exclusive
868 IF_NOT_FEATURE_TAR_CREATE("t--x:x--t"); // mutually exclusive
Denis Vlasenkoc61852a2006-11-29 11:09:43 +0000869#if ENABLE_FEATURE_TAR_LONG_OPTIONS
Denis Vlasenkobdc88fd2007-07-23 17:14:14 +0000870 applet_long_options = tar_longopts;
Denis Vlasenkoc61852a2006-11-29 11:09:43 +0000871#endif
Denys Vlasenkof6450372009-10-25 01:32:45 +0200872#if ENABLE_DESKTOP
Denys Vlasenko4b6abf62009-12-18 12:36:07 +0100873 if (argv[1] && argv[1][0] != '-') {
Denys Vlasenkof6450372009-10-25 01:32:45 +0200874 /* Compat:
875 * 1st argument without dash handles options with parameters
876 * differently from dashed one: it takes *next argv[i]*
877 * as paramenter even if there are more chars in 1st argument:
878 * "tar fx TARFILE" - "x" is not taken as f's param
879 * but is interpreted as -x option
880 * "tar -xf TARFILE" - dashed equivalent of the above
881 * "tar -fx ..." - "x" is taken as f's param
882 * getopt32 wouldn't handle 1st command correctly.
883 * Unfortunately, people do use such commands.
884 * We massage argv[1] to work around it by moving 'f'
885 * to the end of the string.
886 * More contrived "tar fCx TARFILE DIR" still fails,
887 * but such commands are much less likely to be used.
888 */
889 char *f = strchr(argv[1], 'f');
890 if (f) {
891 while (f[1] != '\0') {
892 *f = f[1];
893 f++;
894 }
895 *f = 'f';
896 }
897 }
898#endif
Denis Vlasenkofe7cd642007-08-18 15:32:12 +0000899 opt = getopt32(argv,
Bernhard Reutner-Fischer30f3c1d2009-10-25 02:13:32 +0200900 "txC:f:Oopvk"
Denis Vlasenko5e34ff22009-04-21 11:09:40 +0000901 IF_FEATURE_TAR_CREATE( "ch" )
902 IF_FEATURE_SEAMLESS_BZ2( "j" )
903 IF_FEATURE_SEAMLESS_LZMA("a" )
904 IF_FEATURE_TAR_FROM( "T:X:")
905 IF_FEATURE_SEAMLESS_GZ( "z" )
906 IF_FEATURE_SEAMLESS_Z( "Z" )
Mikhail Gusarov0d478332010-01-19 20:22:30 +0600907 IF_FEATURE_TAR_NOPRESERVE_TIME("m")
Denis Vlasenko8c0164c2007-02-04 21:30:35 +0000908 , &base_dir // -C dir
909 , &tar_filename // -f filename
Denis Vlasenko5e34ff22009-04-21 11:09:40 +0000910 IF_FEATURE_TAR_FROM(, &(tar_handle->accept)) // T
911 IF_FEATURE_TAR_FROM(, &(tar_handle->reject)) // X
Ladislav Michl2b46fd42010-06-25 01:33:00 +0200912 IF_FEATURE_TAR_TO_COMMAND(, &(tar_handle->tar__to_command)) // --to-command
Denis Vlasenko8c0164c2007-02-04 21:30:35 +0000913#if ENABLE_FEATURE_TAR_LONG_OPTIONS && ENABLE_FEATURE_TAR_FROM
914 , &excludes // --exclude
915#endif
916 , &verboseFlag // combined count for -t and -v
917 , &verboseFlag // combined count for -t and -v
Denis Vlasenkod031ffa2006-11-24 21:54:44 +0000918 );
Denys Vlasenkod57d6262009-09-17 02:43:14 +0200919 //bb_error_msg("opt:%08x", opt);
Denis Vlasenkoc4503792008-04-29 02:43:23 +0000920 argv += optind;
Rob Landley60fe7bf2005-10-16 03:54:49 +0000921
Denis Vlasenko3feb2fc2006-11-24 21:55:55 +0000922 if (verboseFlag) tar_handle->action_header = header_verbose_list;
923 if (verboseFlag == 1) tar_handle->action_header = header_list;
924
Denis Vlasenkob5963352006-11-26 01:46:59 +0000925 if (opt & OPT_EXTRACT)
Rob Landley60fe7bf2005-10-16 03:54:49 +0000926 tar_handle->action_data = data_extract_all;
Tim Rikerc1ef7bd2006-01-25 00:08:53 +0000927
Denis Vlasenkod031ffa2006-11-24 21:54:44 +0000928 if (opt & OPT_2STDOUT)
Glenn L McGrath3b9fc8f2003-11-18 20:23:04 +0000929 tar_handle->action_data = data_extract_to_stdout;
Rob Landley60fe7bf2005-10-16 03:54:49 +0000930
Ladislav Michl2b46fd42010-06-25 01:33:00 +0200931 if (opt & OPT_2COMMAND) {
932 putenv((char*)"TAR_FILETYPE=f");
933 signal(SIGPIPE, SIG_IGN);
934 tar_handle->action_data = data_extract_to_command;
935 }
936
Denis Vlasenkod031ffa2006-11-24 21:54:44 +0000937 if (opt & OPT_KEEP_OLD)
Denys Vlasenkod57d6262009-09-17 02:43:14 +0200938 tar_handle->ah_flags &= ~ARCHIVE_UNLINK_OLD;
Rob Landley60fe7bf2005-10-16 03:54:49 +0000939
Denis Vlasenko8b814b42009-04-21 00:52:21 +0000940 if (opt & OPT_NUMERIC_OWNER)
941 tar_handle->ah_flags |= ARCHIVE_NUMERIC_OWNER;
942
Denys Vlasenkod57d6262009-09-17 02:43:14 +0200943 if (opt & OPT_NOPRESERVE_OWNER)
944 tar_handle->ah_flags |= ARCHIVE_DONT_RESTORE_OWNER;
945
946 if (opt & OPT_NOPRESERVE_PERM)
947 tar_handle->ah_flags |= ARCHIVE_DONT_RESTORE_PERM;
948
Denys Vlasenko8a936cf2009-12-16 23:18:59 +0100949 if (opt & OPT_OVERWRITE) {
950 tar_handle->ah_flags &= ~ARCHIVE_UNLINK_OLD;
951 tar_handle->ah_flags |= ARCHIVE_O_TRUNC;
952 }
953
Denis Vlasenkod031ffa2006-11-24 21:54:44 +0000954 if (opt & OPT_GZIP)
Glenn L McGratheba86e22003-11-14 12:53:42 +0000955 get_header_ptr = get_header_tar_gz;
Rob Landley60fe7bf2005-10-16 03:54:49 +0000956
Denis Vlasenkod031ffa2006-11-24 21:54:44 +0000957 if (opt & OPT_BZIP2)
Glenn L McGrath3b9fc8f2003-11-18 20:23:04 +0000958 get_header_ptr = get_header_tar_bz2;
Rob Landley60fe7bf2005-10-16 03:54:49 +0000959
Denis Vlasenkod031ffa2006-11-24 21:54:44 +0000960 if (opt & OPT_LZMA)
Rob Landleyc1d69902006-01-20 18:28:50 +0000961 get_header_ptr = get_header_tar_lzma;
962
Denis Vlasenkod031ffa2006-11-24 21:54:44 +0000963 if (opt & OPT_COMPRESS)
Glenn L McGrath56f16b42003-11-18 21:37:52 +0000964 get_header_ptr = get_header_tar_Z;
Rob Landley60fe7bf2005-10-16 03:54:49 +0000965
Mikhail Gusarov0d478332010-01-19 20:22:30 +0600966 if (opt & OPT_NOPRESERVE_TIME)
967 tar_handle->ah_flags &= ~ARCHIVE_RESTORE_DATE;
Mikhail Gusarov0d478332010-01-19 20:22:30 +0600968
Denis Vlasenko8c0164c2007-02-04 21:30:35 +0000969#if ENABLE_FEATURE_TAR_FROM
970 tar_handle->reject = append_file_list_to_list(tar_handle->reject);
Denys Vlasenko94ca6942010-01-20 02:51:09 +0100971# if ENABLE_FEATURE_TAR_LONG_OPTIONS
Denis Vlasenko8c0164c2007-02-04 21:30:35 +0000972 /* Append excludes to reject */
973 while (excludes) {
974 llist_t *next = excludes->link;
975 excludes->link = tar_handle->reject;
976 tar_handle->reject = excludes;
977 excludes = next;
Glenn L McGrath56f16b42003-11-18 21:37:52 +0000978 }
Denys Vlasenko94ca6942010-01-20 02:51:09 +0100979# endif
Denis Vlasenko8c0164c2007-02-04 21:30:35 +0000980 tar_handle->accept = append_file_list_to_list(tar_handle->accept);
981#endif
Glenn L McGrathce91c8a2003-12-26 14:01:37 +0000982
Glenn L McGrath2e772ed2001-10-05 02:58:48 +0000983 /* Setup an array of filenames to work with */
Denys Vlasenko94ca6942010-01-20 02:51:09 +0100984 /* TODO: This is the same as in ar, make a separate function? */
Denis Vlasenkoc4503792008-04-29 02:43:23 +0000985 while (*argv) {
Denis Vlasenko3feb2fc2006-11-24 21:55:55 +0000986 /* kill trailing '/' unless the string is just "/" */
Denis Vlasenkoc4503792008-04-29 02:43:23 +0000987 char *cp = last_char_is(*argv, '/');
988 if (cp > *argv)
Denis Vlasenko3feb2fc2006-11-24 21:55:55 +0000989 *cp = '\0';
Denis Vlasenkoc4503792008-04-29 02:43:23 +0000990 llist_add_to_end(&tar_handle->accept, *argv);
991 argv++;
Glenn L McGrathc5c1a8a2002-10-19 06:19:22 +0000992 }
Glenn L McGrath98f824a2002-10-19 00:46:35 +0000993
Denis Vlasenko376ce1e2006-11-24 14:51:01 +0000994 if (tar_handle->accept || tar_handle->reject)
Glenn L McGrathc5c1a8a2002-10-19 06:19:22 +0000995 tar_handle->filter = filter_accept_reject_list;
Glenn L McGratha0ee8812002-08-22 13:44:08 +0000996
Glenn L McGrath91b3d462003-10-02 14:33:23 +0000997 /* Open the tar file */
998 {
Denys Vlasenkod43d6282009-11-29 16:28:33 +0100999 int tar_fd = STDIN_FILENO;
1000 int flags = O_RDONLY;
Glenn L McGrath91b3d462003-10-02 14:33:23 +00001001
Denis Vlasenkod031ffa2006-11-24 21:54:44 +00001002 if (opt & OPT_CREATE) {
Denys Vlasenko94ca6942010-01-20 02:51:09 +01001003 /* Make sure there is at least one file to tar up */
Rob Landley60fe7bf2005-10-16 03:54:49 +00001004 if (tar_handle->accept == NULL)
1005 bb_error_msg_and_die("empty archive");
1006
Denys Vlasenkod43d6282009-11-29 16:28:33 +01001007 tar_fd = STDOUT_FILENO;
Denis Vlasenko376ce1e2006-11-24 14:51:01 +00001008 /* Mimicking GNU tar 1.15.1: */
Denis Vlasenkoe9ad84d2008-08-05 13:10:34 +00001009 flags = O_WRONLY | O_CREAT | O_TRUNC;
Glenn L McGrath91b3d462003-10-02 14:33:23 +00001010 }
1011
Denis Vlasenko9f739442006-12-16 23:49:13 +00001012 if (LONE_DASH(tar_filename)) {
Denys Vlasenkod43d6282009-11-29 16:28:33 +01001013 tar_handle->src_fd = tar_fd;
Denis Vlasenko13858992006-10-08 12:49:22 +00001014 tar_handle->seek = seek_by_read;
Glenn L McGrath91b3d462003-10-02 14:33:23 +00001015 } else {
Denis Vlasenkoe9ad84d2008-08-05 13:10:34 +00001016 if (ENABLE_FEATURE_TAR_AUTODETECT && flags == O_RDONLY) {
1017 get_header_ptr = get_header_tar;
1018 tar_handle->src_fd = open_zipped(tar_filename);
1019 if (tar_handle->src_fd < 0)
1020 bb_perror_msg_and_die("can't open '%s'", tar_filename);
1021 } else {
1022 tar_handle->src_fd = xopen(tar_filename, flags);
1023 }
Glenn L McGrath91b3d462003-10-02 14:33:23 +00001024 }
1025 }
1026
Bernhard Reutner-Fischerd9cf7ac2006-04-12 18:39:58 +00001027 if (base_dir)
Rob Landley86b4d642006-08-03 17:58:17 +00001028 xchdir(base_dir);
Glenn L McGrath91b3d462003-10-02 14:33:23 +00001029
Denis Vlasenkoc8889462006-12-17 19:08:20 +00001030#ifdef CHECK_FOR_CHILD_EXITCODE
1031 /* We need to know whether child (gzip/bzip/etc) exits abnormally */
1032 signal(SIGCHLD, handle_SIGCHLD);
1033#endif
1034
Denys Vlasenko94ca6942010-01-20 02:51:09 +01001035 /* Create an archive */
Denis Vlasenkod031ffa2006-11-24 21:54:44 +00001036 if (opt & OPT_CREATE) {
Denis Vlasenkoe9ad84d2008-08-05 13:10:34 +00001037#if ENABLE_FEATURE_SEAMLESS_GZ || ENABLE_FEATURE_SEAMLESS_BZ2
Rob Landleycc8885f2005-08-30 03:40:03 +00001038 int zipMode = 0;
Denis Vlasenkoe9ad84d2008-08-05 13:10:34 +00001039 if (ENABLE_FEATURE_SEAMLESS_GZ && (opt & OPT_GZIP))
Tim Rikerc1ef7bd2006-01-25 00:08:53 +00001040 zipMode = 1;
Denis Vlasenkoe9ad84d2008-08-05 13:10:34 +00001041 if (ENABLE_FEATURE_SEAMLESS_BZ2 && (opt & OPT_BZIP2))
Tim Rikerc1ef7bd2006-01-25 00:08:53 +00001042 zipMode = 2;
Denis Vlasenko431a7c92008-02-19 11:26:28 +00001043#endif
Denis Vlasenkoc8889462006-12-17 19:08:20 +00001044 /* NB: writeTarFile() closes tar_handle->src_fd */
1045 return writeTarFile(tar_handle->src_fd, verboseFlag, opt & OPT_DEREFERENCE,
Bernhard Reutner-Fischer18260d52006-04-18 14:17:49 +00001046 tar_handle->accept,
Denis Vlasenko3feb2fc2006-11-24 21:55:55 +00001047 tar_handle->reject, zipMode);
Glenn L McGrath98f824a2002-10-19 00:46:35 +00001048 }
Glenn L McGrath7ca04f32002-09-25 02:47:48 +00001049
Denis Vlasenkob8a8e602006-11-24 14:59:45 +00001050 while (get_header_ptr(tar_handle) == EXIT_SUCCESS)
Denis Vlasenko431a7c92008-02-19 11:26:28 +00001051 continue;
Denis Vlasenkob8a8e602006-11-24 14:59:45 +00001052
1053 /* Check that every file that should have been extracted was */
1054 while (tar_handle->accept) {
1055 if (!find_list_entry(tar_handle->reject, tar_handle->accept->data)
1056 && !find_list_entry(tar_handle->passed, tar_handle->accept->data)
1057 ) {
1058 bb_error_msg_and_die("%s: not found in archive",
1059 tar_handle->accept->data);
1060 }
1061 tar_handle->accept = tar_handle->accept->link;
1062 }
1063 if (ENABLE_FEATURE_CLEAN_UP /* && tar_handle->src_fd != STDIN_FILENO */)
Glenn L McGrath8132e932002-09-28 02:06:39 +00001064 close(tar_handle->src_fd);
Glenn L McGrath7ca04f32002-09-25 02:47:48 +00001065
Denis Vlasenko376ce1e2006-11-24 14:51:01 +00001066 return EXIT_SUCCESS;
Glenn L McGrath2e772ed2001-10-05 02:58:48 +00001067}