int
util_tar_extract(const char *tar_filename, const char* index_file, const char* out_dir)
{
TAR *tar = NULL;
int ret = tar_open(&tar, tar_filename, &gztype, O_RDONLY, 0, TAR_GNU);
if (ret != 0) {
ERROR_ERRNO("Fail to open tarfile: %s\n", tar_filename);
return ret;
}
//ret = tar_extract_all(tar, tar_prefix);
while (th_read(tar) == 0) {
char *archive_filename = th_get_pathname(tar);
char *out_filename = mem_printf("%s/%s", out_dir, archive_filename);
char *mode = mem_alloc0(4*sizeof(char));
int_to_oct(th_get_mode(tar), mode, 4*sizeof(char));
uid_t uid = th_get_uid(tar);
gid_t gid = th_get_gid(tar);
INFO("Writing file %s to %s", archive_filename, out_filename);
if (TH_ISCHR(tar)) {
// writing file attributes to index file (TODO use hashmap to handle duplicates)
file_printf_append(index_file, "%s c %s %d %d %d %d\n",
archive_filename, mode, uid, gid,
th_get_devmajor(tar),
th_get_devminor(tar));
} else if (TH_ISBLK(tar)) {
// writing file attributes to index file (TODO use hashmap to handle duplicates)
file_printf_append(index_file, "%s b %s %d %d %d %d\n",
archive_filename, mode, uid, gid,
th_get_devmajor(tar),
th_get_devminor(tar));
} else {
if (tar_extract_file(tar, out_filename) != 0) {
INFO_ERRNO("Skipping file: %s", archive_filename);
} else {
// writing file attributes to index file (TODO use hashmap to handle duplicates)
file_printf_append(index_file, "%s m %s %d %d\n",
archive_filename, mode, uid, gid);
}
}
mem_free(mode);
mem_free(archive_filename);
mem_free(out_filename);
}
ret |= tar_close(tar);
return ret;
}
/* block device */
int
tar_extract_blockdev(TAR *t, char *realname)
{
mode_t mode;
unsigned long devmaj, devmin;
char *filename;
if (!TH_ISBLK(t))
{
errno = EINVAL;
return -1;
}
filename = (realname ? realname : th_get_pathname(t));
mode = th_get_mode(t);
devmaj = th_get_devmajor(t);
devmin = th_get_devminor(t);
if (mkdirhier(dirname(filename)) == -1)
return -1;
#ifdef DEBUG
printf(" ==> extracting: %s (block device %ld,%ld)\n",
filename, devmaj, devmin);
#endif
if (mknod(filename, mode | S_IFBLK,
makedev(devmaj, devmin)) == -1)
{
#ifdef DEBUG
perror("mknod()");
#endif
return -1;
}
return 0;
}
/* character device */
int
tar_extract_chardev(TAR *t, char *realname)
{
mode_t mode;
unsigned long devmaj, devmin;
char *filename;
if (!TH_ISCHR(t))
{
errno = EINVAL;
return -1;
}
filename = (realname ? realname : th_get_pathname(t));
mode = th_get_mode(t);
devmaj = th_get_devmajor(t);
devmin = th_get_devminor(t);
if (mkdirhier(dirname(filename)) == -1)
return -1;
#ifdef DEBUG
printf(" ==> extracting: %s (character device %ld,%ld)\n",
filename, devmaj, devmin);
#endif
if (mknod(filename, mode | S_IFCHR,
compat_makedev(devmaj, devmin)) == -1)
{
#ifdef DEBUG
printf("mknod() failed, returning good anyway");
#endif
return 0;
}
return 0;
}
void
th_print_long_ls(TAR *t)
{
char modestring[12];
struct passwd *pw;
struct group *gr;
uid_t uid;
gid_t gid;
char username[_POSIX_LOGIN_NAME_MAX];
char groupname[_POSIX_LOGIN_NAME_MAX];
time_t mtime;
struct tm *mtm;
#ifdef HAVE_STRFTIME
char timebuf[18];
#else
const char *months[] = {
"Jan", "Feb", "Mar", "Apr", "May", "Jun",
"Jul", "Aug", "Sep", "Oct", "Nov", "Dec"
};
#endif
uid = th_get_uid(t);
pw = getpwuid(uid);
if (pw == NULL)
snprintf(username, sizeof(username), "%d", uid);
else
strlcpy(username, pw->pw_name, sizeof(username));
gid = th_get_gid(t);
gr = getgrgid(gid);
if (gr == NULL)
snprintf(groupname, sizeof(groupname), "%d", gid);
else
strlcpy(groupname, gr->gr_name, sizeof(groupname));
strmode(th_get_mode(t), modestring);
printf("%.10s %-8.8s %-8.8s ", modestring, username, groupname);
if (TH_ISCHR(t) || TH_ISBLK(t))
printf(" %3d, %3d ", th_get_devmajor(t), th_get_devminor(t));
else
printf("%9ld ", (long)th_get_size(t));
mtime = th_get_mtime(t);
mtm = localtime(&mtime);
#ifdef HAVE_STRFTIME
strftime(timebuf, sizeof(timebuf), "%h %e %H:%M %Y", mtm);
printf("%s", timebuf);
#else
printf("%.3s %2d %2d:%02d %4d",
months[mtm->tm_mon],
mtm->tm_mday, mtm->tm_hour, mtm->tm_min, mtm->tm_year + 1900);
#endif
printf(" %s", th_get_pathname(t));
if (TH_ISSYM(t) || TH_ISLNK(t))
{
if (TH_ISSYM(t))
printf(" -> ");
else
printf(" link to ");
if ((t->options & TAR_GNU) && t->th_buf.gnu_longlink != NULL)
printf("%s", t->th_buf.gnu_longlink);
else
printf("%.100s", t->th_buf.linkname);
}
putchar('\n');
}
