ar.c now uses a linked list to process headers, uses getopt, new internal function extractAr(srcFD, dstFd, filename) to make it easily accessable to other busybox functions.

moved copySubFile from ar.c to utilities.c

modified dd.c to use fullWrite

modified copyFile in utilities.c to use copySubFile
This commit is contained in:
Glenn L McGrath 2000-08-25 03:50:10 +00:00
parent 4d5ac2f346
commit 06aeb6c417
8 changed files with 335 additions and 585 deletions

View File

@ -2,15 +2,15 @@
#if defined BB_AR #if defined BB_AR
const char ar_usage[] = const char ar_usage[] =
"ar [optxvV] archive [filenames] \n" "ar [[-ov] -tpv archive] filenames \n"
#ifndef BB_FEATURE_TRIVIAL_HELP #ifndef BB_FEATURE_TRIVIAL_HELP
"\nExtract or list files from an ar archive.\n\n" "\nExtract or list files from an ar archive.\n\n"
"Options:\n" "Options:\n"
"\to\t\tpreserve original dates\n" "\t-o\t\tpreserve original dates\n"
"\tp\t\textract to stdout\n" "\t-p\t\textract to stdout\n"
"\tt\t\tlist\n" "\t-t\t\tlist\n"
"\tx\t\textract\n" "\t-x\t\textract\n"
"\tv\t\tverbosely list files processed\n" "\t-v\t\tverbosely list files processed\n"
#endif #endif
; ;
#endif #endif

384
ar.c
View File

@ -4,6 +4,12 @@
* *
* Copyright (C) 2000 by Glenn McGrath * Copyright (C) 2000 by Glenn McGrath
* Written by Glenn McGrath <bug1@netconnect.com.au> 1 June 2000 * Written by Glenn McGrath <bug1@netconnect.com.au> 1 June 2000
*
* Modified 8 August 2000 by Glenn McGrath
* - now uses getopt
* - moved copySubFile function to utilities.c
* - creates linked list of all headers
* - easily accessable to other busybox functions
* *
* Based in part on BusyBox tar, Debian dpkg-deb and GNU ar. * Based in part on BusyBox tar, Debian dpkg-deb and GNU ar.
* *
@ -21,10 +27,8 @@
* along with this program; if not, write to the Free Software * along with this program; if not, write to the Free Software
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
* *
* Last modified 10 June 2000 * Last modified 25 August 2000
*/ */
#include <stdio.h> #include <stdio.h>
#include <fcntl.h> #include <fcntl.h>
#include <errno.h> #include <errno.h>
@ -34,287 +38,179 @@
#include <sys/types.h> #include <sys/types.h>
#include "internal.h" #include "internal.h"
#define AR_BLOCK_SIZE 60 #define BLOCK_SIZE 60
#define AR_PRESERVE_DATE 1 /* preserve original dates */ #define PRESERVE_DATE 1 /* preserve original dates */
#define AR_VERBOSE 2 /* be verbose */ #define VERBOSE 2 /* be verbose */
#define AR_DISPLAY 4 /* display contents */ #define DISPLAY 4 /* display contents */
#define AR_EXT_TO_FILE 8 /* extract contents of archive */ #define EXT_TO_FILE 8 /* extract contents of archive */
#define AR_EXT_TO_STDOUT 16 /* extract to stdout */ #define EXT_TO_STDOUT 16 /* extract to stdout */
#define BB_DECLARE_EXTERN #define BB_DECLARE_EXTERN
#define bb_need_io_error #define bb_need_io_error
#include "messages.c" #include "messages.c"
struct ArHeader { /* Byte Offset */ typedef struct rawArHeader { /* Byte Offset */
char ar_name[16]; /* 0-15 */ char name[16]; /* 0-15 */
char ar_date[12]; /* 16-27 */ char date[12]; /* 16-27 */
char ar_uid[6], ar_gid[6]; /* 28-39 */ char uid[6], gid[6]; /* 28-39 */
char ar_mode[8]; /* 40-47 */ char mode[8]; /* 40-47 */
char ar_size[10]; /* 48-57 */ char size[10]; /* 48-57 */
char ar_fmag[2]; /* 58-59 */ char fmag[2]; /* 58-59 */
}; } rawArHeader_t;
typedef struct ArHeader ArHeader;
struct ArInfo { typedef struct headerL {
char name[17]; /* File name */ char name[16];
time_t date; /* long int, No of seconds since epoch */ size_t size;
uid_t uid; /* unsigned int, Numeric UID */ uid_t uid;
gid_t gid; /* unsigned int, Numeric GID */ gid_t gid;
mode_t mode; /* unsigned int, Unix mode */ mode_t mode;
size_t size; /* int, Size of the file */ time_t mtime;
}; off_t offset;
typedef struct ArInfo ArInfo; struct headerL *next;
} headerL_t;
/* /*
* Display details of a file, verbosly if funct=2 * populate linked list with all ar file entries and offset
*/ */
static void displayEntry(struct ArInfo *entry, int funct) static int parseArArchive(int srcFd, headerL_t *current)
{ {
/* TODO convert mode to string */ off_t lastOffset=0, thisOffset=0;
if ((funct & AR_VERBOSE) == AR_VERBOSE)
printf("%i %i/%i %8i %s ", entry->mode, entry->uid, entry->gid,
entry->size, timeString(entry->date));
printf("%s\n", entry->name);
}
/* this is from tar.c remove later*/
static long getOctal(const char *cp, int size)
{
long val = 0;
for(;(size > 0) && (*cp == ' '); cp++, size--);
if ((size == 0) || !isOctal(*cp))
return -1;
for(; (size > 0) && isOctal(*cp); size--) {
val = val * 8 + *cp++ - '0';
}
for (;(size > 0) && (*cp == ' '); cp++, size--);
if ((size > 0) && *cp)
return -1;
return val;
}
/*
* Converts from the char based struct to a new struct with stricter types
*/
static int processArHeader(struct ArHeader *rawHeader, struct ArInfo *header)
{
int count2;
int count;
/* check end of header marker is valid */
if ((rawHeader->ar_fmag[0]!='`') || (rawHeader->ar_fmag[1]!='\n'))
return(FALSE);
/* convert filename */
for (count = 0; count < 16; count++) {
/* allow spaces in filename except at the end */
if (rawHeader->ar_name[count] == ' ') {
for (count2 = count; count2 < 16; count2++)
if (!isspace(rawHeader->ar_name[count2]))
break;
if (count2 >= 16)
break;
}
/* GNU ar uses '/' as an end of filename marker */
if (rawHeader->ar_name[count] == '/')
break;
header->name[count] = rawHeader->ar_name[count];
}
header->name[count] = '\0';
header->date = atoi(rawHeader->ar_date);
header->uid = atoi(rawHeader->ar_uid);
header->gid = atoi(rawHeader->ar_gid);
header->mode = getOctal(rawHeader->ar_mode, sizeof(rawHeader->ar_mode));
header->size = atoi(rawHeader->ar_size);
return (TRUE);
}
/*
* Copy size bytes from current position if srcFd to current position in dstFd
* taken from tarExtractRegularFile in tar.c, remove later
*/
static int copySubFile(int srcFd, int dstFd, int copySize)
{
int readSize, writeSize, doneSize;
char buffer[BUFSIZ];
while (copySize > 0) {
if (copySize > BUFSIZ)
readSize = BUFSIZ;
else
readSize = copySize;
writeSize = fullRead(srcFd, buffer, readSize);
if (writeSize <= 0) {
errorMsg(io_error, "copySubFile", strerror(errno));
return (FALSE);
}
doneSize = fullWrite(dstFd, buffer, writeSize);
if (doneSize <= 0) {
errorMsg(io_error, "copySubFile", strerror(errno));
return (FALSE);
}
copySize -= doneSize;
}
return (TRUE);
}
/*
* Extract the file described in ArInfo to the specified path
* set the new files uid, gid and mode
*/
static int extractToFile(struct ArInfo *file, int funct, int srcFd, const char *path)
{
int dstFd, temp;
struct stat tmpStat;
char *pathname = NULL;
struct utimbuf newtime;
if ((temp = isDirectory(path, TRUE, &tmpStat)) != TRUE) {
if (!createPath(path, 0777)) {
fatalError("Cannot extract to specified path");
return (FALSE);
}
}
temp = (strlen(path) + 16);
pathname = (char *) xmalloc(temp);
pathname = strcpy(pathname, path);
pathname = strcat(pathname, file->name);
dstFd = device_open(pathname, O_WRONLY | O_CREAT);
temp = copySubFile(srcFd, dstFd, file->size);
fchown(dstFd, file->uid, file->gid);
fchmod(dstFd, file->mode);
close(dstFd);
if ((funct&AR_PRESERVE_DATE)==AR_PRESERVE_DATE)
newtime.modtime=file->date;
else
newtime.modtime=time(0);
newtime.actime=time(0);
temp = utime(pathname, &newtime);
return (TRUE);
}
/*
* Return a file descriptor for the specified file and do error checks
*/
static int getArFd(char *filename)
{
int arFd;
char arVersion[8]; char arVersion[8];
rawArHeader_t rawArHeader;
arFd = open(filename, O_RDONLY);
if (arFd < 0) { lseek(srcFd, 0, SEEK_SET);
errorMsg("Error opening '%s': %s\n", filename, strerror(errno)); if (fullRead(srcFd, arVersion, 8) <= 0) {
return (FALSE); errorMsg("Invalid header magic\n");
}
if (fullRead(arFd, arVersion, 8) <= 0) {
errorMsg( "Unexpected EOF in archive\n");
return (FALSE); return (FALSE);
} }
if (strncmp(arVersion,"!<arch>",7) != 0) { if (strncmp(arVersion,"!<arch>",7) != 0) {
errorMsg("ar header fails check "); errorMsg("This doesnt appear to be an ar archive\n");
return(FALSE); return(FALSE);
} }
return arFd; while (fullRead(srcFd, (char *) &rawArHeader, 60) == 60) {
if ( (rawArHeader.fmag[0] == '`') &&
(rawArHeader.fmag[1] == '\n')) {
sscanf(rawArHeader.name, "%s", current->name);
parse_mode(rawArHeader.mode, &current->mode);
current->mtime = atoi(rawArHeader.date);
current->uid = atoi(rawArHeader.uid);
current->gid = atoi(rawArHeader.gid);
current->size = (size_t) atoi(rawArHeader.size);
current->offset = lseek(srcFd, 0 , SEEK_CUR);
current->next = (headerL_t *) xmalloc(sizeof(headerL_t));
lastOffset = lseek(srcFd, (off_t) current->size, SEEK_CUR);
current = current->next;
}
else { /* GNU ar has an extra char after data */
thisOffset=lseek(srcFd, 0, SEEK_CUR);
if ( (thisOffset - lastOffset) > ((off_t) 61) )
return(FALSE);
lseek(srcFd, thisOffset - 59, SEEK_SET);
}
}
return(FALSE);
} }
/* /*
* Step through the ar file and process it one entry at a time * return the headerL_t struct for the specified filename
* fileList[0] is the name of the ar archive
* fileList[1] and up are filenames to extract from the archive
* funct contains flags to specify the actions to be performed
*/ */
static int readArFile(char *fileList[16], int fileListSize, int funct) static headerL_t *getSubFileHeader(int srcFd, const char filename[16])
{ {
int arFd, status, extFileFlag, i, lastOffset=0; headerL_t *list;
ArHeader rawArHeader; list = xmalloc(sizeof(headerL_t));
ArInfo arEntry;
/* open the ar archive */ parseArArchive(srcFd, list);
arFd=getArFd(fileList[0]); while (list->next != NULL) {
if (strncmp(list->name, filename, strlen(filename))==0)
return(list);
list=list->next;
}
return(NULL);
}
/* read the first header, then loop until ono more headers */ /*
while ((status = fullRead(arFd, (char *) &rawArHeader, AR_BLOCK_SIZE)) * populate linked list with all ar file entries and offset
== AR_BLOCK_SIZE) { */
static int displayEntry(int srcFd, const char filename[16], int funct)
{
headerL_t *file;
/* check the header is valid, if not try reading the header if ((file = getSubFileHeader(srcFd, filename)) == NULL)
agian with an offset of 1, needed as some ar archive end return(FALSE);
with a '\n' which isnt counted in specified file size */ if ((funct & VERBOSE) == VERBOSE) {
if ((status=processArHeader(&rawArHeader, &arEntry))==FALSE ) { printf("%s %d/%d %8d %s ", modeString(file->mode), file->uid, file->gid, file->size, timeString(file->mtime));
if ((i=lseek(arFd, 0, SEEK_CUR))==(lastOffset+60)) }
lseek(arFd, lastOffset+1, SEEK_SET); printf("%s\n", file->name);
else return(TRUE);
return(FALSE); }
}
else {
extFileFlag=0;
if ((funct&AR_DISPLAY) || (funct&AR_VERBOSE))
displayEntry(&arEntry, funct);
/* check file was specified to be extracted only if static int extractAr(int srcFd, int dstFd, const char filename[16])
some file were specified */ {
if ((funct&AR_EXT_TO_FILE) || (funct&AR_EXT_TO_STDOUT)){ headerL_t *file;
if (fileListSize==1)
extFileFlag=1; if ( (file = getSubFileHeader(srcFd, filename)) == NULL)
else { return(FALSE);
for( i=1; i<=fileListSize; i++) lseek(srcFd, file->offset, SEEK_SET);
if ((status=(strcmp(fileList[i],arEntry.name)))==0) if (copySubFile(srcFd, dstFd, (size_t) file->size) == TRUE)
extFileFlag=1; return(TRUE);
} return(FALSE);
}
if (extFileFlag==1) {
if (funct&AR_EXT_TO_FILE)
extractToFile(&arEntry, funct, arFd, "./");
else
copySubFile(arFd,fileno(stdout),arEntry.size);
}
else
lseek(arFd, arEntry.size, SEEK_CUR);
lastOffset=lseek(arFd, 0, SEEK_CUR);
} /* if processArHeader */
} /* while */
return (TRUE);
} }
extern int ar_main(int argc, char **argv) extern int ar_main(int argc, char **argv)
{ {
int funct = 0, ret=0, i=0; int funct = 0, opt=0;
char *fileList[16], c, *opt_ptr; int srcFd=0, dstFd=0;
if (argc < 2) while ((opt = getopt(argc, argv, "ovt:p:x:")) != -1) {
usage(ar_usage); switch (opt) {
opt_ptr = argv[1];
if (*opt_ptr == '-')
++opt_ptr;
while ((c = *opt_ptr++) != '\0') {
switch (c) {
case 'o': case 'o':
funct = funct | AR_PRESERVE_DATE; funct = funct | PRESERVE_DATE;
break; break;
case 'v': case 'v':
funct = funct | AR_VERBOSE; funct = funct | VERBOSE;
break; break;
case 't': case 't':
funct = funct | AR_DISPLAY; funct = funct | DISPLAY;
break;
case 'x': case 'x':
funct = funct | AR_EXT_TO_FILE; if (opt=='x') {
break; funct = funct | EXT_TO_FILE;
}
case 'p': case 'p':
funct = funct | AR_EXT_TO_STDOUT; if (opt=='p') {
funct = funct | EXT_TO_STDOUT;
}
/* following is common to 't','x' and 'p' */
if (optarg == NULL) {
printf("expected a filename\n");
return(FALSE);
}
if ( (srcFd = open(optarg, O_RDONLY)) < 0) {
errorMsg("Cannot read %s\n", optarg);
return (FALSE);
}
break; break;
default: default:
usage(ar_usage); usage(ar_usage);
} }
} }
for(i=0; i<(argc-2); i++) /* check options not just preserve_dates and/or verbose */
fileList[i]=argv[i+2]; if (funct < 4) {
usage(ar_usage);
return(FALSE);
}
if (funct > 3) /* find files to extract */
ret = readArFile(fileList, (argc-2), funct); if (optind<argc)
for(; optind < argc; optind++) {
return (ret); if ( (funct & EXT_TO_FILE) == EXT_TO_FILE) {
dstFd = open(argv[optind], O_WRONLY | O_CREAT);
extractAr(srcFd, dstFd, argv[optind]);
}
if ( (funct & EXT_TO_STDOUT) == EXT_TO_STDOUT)
extractAr(srcFd, fileno(stdout), argv[optind]);
if ( (funct & DISPLAY) == DISPLAY)
displayEntry(srcFd, argv[optind], funct);
}
return (TRUE);
} }

View File

@ -4,6 +4,12 @@
* *
* Copyright (C) 2000 by Glenn McGrath * Copyright (C) 2000 by Glenn McGrath
* Written by Glenn McGrath <bug1@netconnect.com.au> 1 June 2000 * Written by Glenn McGrath <bug1@netconnect.com.au> 1 June 2000
*
* Modified 8 August 2000 by Glenn McGrath
* - now uses getopt
* - moved copySubFile function to utilities.c
* - creates linked list of all headers
* - easily accessable to other busybox functions
* *
* Based in part on BusyBox tar, Debian dpkg-deb and GNU ar. * Based in part on BusyBox tar, Debian dpkg-deb and GNU ar.
* *
@ -21,10 +27,8 @@
* along with this program; if not, write to the Free Software * along with this program; if not, write to the Free Software
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
* *
* Last modified 10 June 2000 * Last modified 25 August 2000
*/ */
#include <stdio.h> #include <stdio.h>
#include <fcntl.h> #include <fcntl.h>
#include <errno.h> #include <errno.h>
@ -34,287 +38,179 @@
#include <sys/types.h> #include <sys/types.h>
#include "internal.h" #include "internal.h"
#define AR_BLOCK_SIZE 60 #define BLOCK_SIZE 60
#define AR_PRESERVE_DATE 1 /* preserve original dates */ #define PRESERVE_DATE 1 /* preserve original dates */
#define AR_VERBOSE 2 /* be verbose */ #define VERBOSE 2 /* be verbose */
#define AR_DISPLAY 4 /* display contents */ #define DISPLAY 4 /* display contents */
#define AR_EXT_TO_FILE 8 /* extract contents of archive */ #define EXT_TO_FILE 8 /* extract contents of archive */
#define AR_EXT_TO_STDOUT 16 /* extract to stdout */ #define EXT_TO_STDOUT 16 /* extract to stdout */
#define BB_DECLARE_EXTERN #define BB_DECLARE_EXTERN
#define bb_need_io_error #define bb_need_io_error
#include "messages.c" #include "messages.c"
struct ArHeader { /* Byte Offset */ typedef struct rawArHeader { /* Byte Offset */
char ar_name[16]; /* 0-15 */ char name[16]; /* 0-15 */
char ar_date[12]; /* 16-27 */ char date[12]; /* 16-27 */
char ar_uid[6], ar_gid[6]; /* 28-39 */ char uid[6], gid[6]; /* 28-39 */
char ar_mode[8]; /* 40-47 */ char mode[8]; /* 40-47 */
char ar_size[10]; /* 48-57 */ char size[10]; /* 48-57 */
char ar_fmag[2]; /* 58-59 */ char fmag[2]; /* 58-59 */
}; } rawArHeader_t;
typedef struct ArHeader ArHeader;
struct ArInfo { typedef struct headerL {
char name[17]; /* File name */ char name[16];
time_t date; /* long int, No of seconds since epoch */ size_t size;
uid_t uid; /* unsigned int, Numeric UID */ uid_t uid;
gid_t gid; /* unsigned int, Numeric GID */ gid_t gid;
mode_t mode; /* unsigned int, Unix mode */ mode_t mode;
size_t size; /* int, Size of the file */ time_t mtime;
}; off_t offset;
typedef struct ArInfo ArInfo; struct headerL *next;
} headerL_t;
/* /*
* Display details of a file, verbosly if funct=2 * populate linked list with all ar file entries and offset
*/ */
static void displayEntry(struct ArInfo *entry, int funct) static int parseArArchive(int srcFd, headerL_t *current)
{ {
/* TODO convert mode to string */ off_t lastOffset=0, thisOffset=0;
if ((funct & AR_VERBOSE) == AR_VERBOSE)
printf("%i %i/%i %8i %s ", entry->mode, entry->uid, entry->gid,
entry->size, timeString(entry->date));
printf("%s\n", entry->name);
}
/* this is from tar.c remove later*/
static long getOctal(const char *cp, int size)
{
long val = 0;
for(;(size > 0) && (*cp == ' '); cp++, size--);
if ((size == 0) || !isOctal(*cp))
return -1;
for(; (size > 0) && isOctal(*cp); size--) {
val = val * 8 + *cp++ - '0';
}
for (;(size > 0) && (*cp == ' '); cp++, size--);
if ((size > 0) && *cp)
return -1;
return val;
}
/*
* Converts from the char based struct to a new struct with stricter types
*/
static int processArHeader(struct ArHeader *rawHeader, struct ArInfo *header)
{
int count2;
int count;
/* check end of header marker is valid */
if ((rawHeader->ar_fmag[0]!='`') || (rawHeader->ar_fmag[1]!='\n'))
return(FALSE);
/* convert filename */
for (count = 0; count < 16; count++) {
/* allow spaces in filename except at the end */
if (rawHeader->ar_name[count] == ' ') {
for (count2 = count; count2 < 16; count2++)
if (!isspace(rawHeader->ar_name[count2]))
break;
if (count2 >= 16)
break;
}
/* GNU ar uses '/' as an end of filename marker */
if (rawHeader->ar_name[count] == '/')
break;
header->name[count] = rawHeader->ar_name[count];
}
header->name[count] = '\0';
header->date = atoi(rawHeader->ar_date);
header->uid = atoi(rawHeader->ar_uid);
header->gid = atoi(rawHeader->ar_gid);
header->mode = getOctal(rawHeader->ar_mode, sizeof(rawHeader->ar_mode));
header->size = atoi(rawHeader->ar_size);
return (TRUE);
}
/*
* Copy size bytes from current position if srcFd to current position in dstFd
* taken from tarExtractRegularFile in tar.c, remove later
*/
static int copySubFile(int srcFd, int dstFd, int copySize)
{
int readSize, writeSize, doneSize;
char buffer[BUFSIZ];
while (copySize > 0) {
if (copySize > BUFSIZ)
readSize = BUFSIZ;
else
readSize = copySize;
writeSize = fullRead(srcFd, buffer, readSize);
if (writeSize <= 0) {
errorMsg(io_error, "copySubFile", strerror(errno));
return (FALSE);
}
doneSize = fullWrite(dstFd, buffer, writeSize);
if (doneSize <= 0) {
errorMsg(io_error, "copySubFile", strerror(errno));
return (FALSE);
}
copySize -= doneSize;
}
return (TRUE);
}
/*
* Extract the file described in ArInfo to the specified path
* set the new files uid, gid and mode
*/
static int extractToFile(struct ArInfo *file, int funct, int srcFd, const char *path)
{
int dstFd, temp;
struct stat tmpStat;
char *pathname = NULL;
struct utimbuf newtime;
if ((temp = isDirectory(path, TRUE, &tmpStat)) != TRUE) {
if (!createPath(path, 0777)) {
fatalError("Cannot extract to specified path");
return (FALSE);
}
}
temp = (strlen(path) + 16);
pathname = (char *) xmalloc(temp);
pathname = strcpy(pathname, path);
pathname = strcat(pathname, file->name);
dstFd = device_open(pathname, O_WRONLY | O_CREAT);
temp = copySubFile(srcFd, dstFd, file->size);
fchown(dstFd, file->uid, file->gid);
fchmod(dstFd, file->mode);
close(dstFd);
if ((funct&AR_PRESERVE_DATE)==AR_PRESERVE_DATE)
newtime.modtime=file->date;
else
newtime.modtime=time(0);
newtime.actime=time(0);
temp = utime(pathname, &newtime);
return (TRUE);
}
/*
* Return a file descriptor for the specified file and do error checks
*/
static int getArFd(char *filename)
{
int arFd;
char arVersion[8]; char arVersion[8];
rawArHeader_t rawArHeader;
arFd = open(filename, O_RDONLY);
if (arFd < 0) { lseek(srcFd, 0, SEEK_SET);
errorMsg("Error opening '%s': %s\n", filename, strerror(errno)); if (fullRead(srcFd, arVersion, 8) <= 0) {
return (FALSE); errorMsg("Invalid header magic\n");
}
if (fullRead(arFd, arVersion, 8) <= 0) {
errorMsg( "Unexpected EOF in archive\n");
return (FALSE); return (FALSE);
} }
if (strncmp(arVersion,"!<arch>",7) != 0) { if (strncmp(arVersion,"!<arch>",7) != 0) {
errorMsg("ar header fails check "); errorMsg("This doesnt appear to be an ar archive\n");
return(FALSE); return(FALSE);
} }
return arFd; while (fullRead(srcFd, (char *) &rawArHeader, 60) == 60) {
if ( (rawArHeader.fmag[0] == '`') &&
(rawArHeader.fmag[1] == '\n')) {
sscanf(rawArHeader.name, "%s", current->name);
parse_mode(rawArHeader.mode, &current->mode);
current->mtime = atoi(rawArHeader.date);
current->uid = atoi(rawArHeader.uid);
current->gid = atoi(rawArHeader.gid);
current->size = (size_t) atoi(rawArHeader.size);
current->offset = lseek(srcFd, 0 , SEEK_CUR);
current->next = (headerL_t *) xmalloc(sizeof(headerL_t));
lastOffset = lseek(srcFd, (off_t) current->size, SEEK_CUR);
current = current->next;
}
else { /* GNU ar has an extra char after data */
thisOffset=lseek(srcFd, 0, SEEK_CUR);
if ( (thisOffset - lastOffset) > ((off_t) 61) )
return(FALSE);
lseek(srcFd, thisOffset - 59, SEEK_SET);
}
}
return(FALSE);
} }
/* /*
* Step through the ar file and process it one entry at a time * return the headerL_t struct for the specified filename
* fileList[0] is the name of the ar archive
* fileList[1] and up are filenames to extract from the archive
* funct contains flags to specify the actions to be performed
*/ */
static int readArFile(char *fileList[16], int fileListSize, int funct) static headerL_t *getSubFileHeader(int srcFd, const char filename[16])
{ {
int arFd, status, extFileFlag, i, lastOffset=0; headerL_t *list;
ArHeader rawArHeader; list = xmalloc(sizeof(headerL_t));
ArInfo arEntry;
/* open the ar archive */ parseArArchive(srcFd, list);
arFd=getArFd(fileList[0]); while (list->next != NULL) {
if (strncmp(list->name, filename, strlen(filename))==0)
return(list);
list=list->next;
}
return(NULL);
}
/* read the first header, then loop until ono more headers */ /*
while ((status = fullRead(arFd, (char *) &rawArHeader, AR_BLOCK_SIZE)) * populate linked list with all ar file entries and offset
== AR_BLOCK_SIZE) { */
static int displayEntry(int srcFd, const char filename[16], int funct)
{
headerL_t *file;
/* check the header is valid, if not try reading the header if ((file = getSubFileHeader(srcFd, filename)) == NULL)
agian with an offset of 1, needed as some ar archive end return(FALSE);
with a '\n' which isnt counted in specified file size */ if ((funct & VERBOSE) == VERBOSE) {
if ((status=processArHeader(&rawArHeader, &arEntry))==FALSE ) { printf("%s %d/%d %8d %s ", modeString(file->mode), file->uid, file->gid, file->size, timeString(file->mtime));
if ((i=lseek(arFd, 0, SEEK_CUR))==(lastOffset+60)) }
lseek(arFd, lastOffset+1, SEEK_SET); printf("%s\n", file->name);
else return(TRUE);
return(FALSE); }
}
else {
extFileFlag=0;
if ((funct&AR_DISPLAY) || (funct&AR_VERBOSE))
displayEntry(&arEntry, funct);
/* check file was specified to be extracted only if static int extractAr(int srcFd, int dstFd, const char filename[16])
some file were specified */ {
if ((funct&AR_EXT_TO_FILE) || (funct&AR_EXT_TO_STDOUT)){ headerL_t *file;
if (fileListSize==1)
extFileFlag=1; if ( (file = getSubFileHeader(srcFd, filename)) == NULL)
else { return(FALSE);
for( i=1; i<=fileListSize; i++) lseek(srcFd, file->offset, SEEK_SET);
if ((status=(strcmp(fileList[i],arEntry.name)))==0) if (copySubFile(srcFd, dstFd, (size_t) file->size) == TRUE)
extFileFlag=1; return(TRUE);
} return(FALSE);
}
if (extFileFlag==1) {
if (funct&AR_EXT_TO_FILE)
extractToFile(&arEntry, funct, arFd, "./");
else
copySubFile(arFd,fileno(stdout),arEntry.size);
}
else
lseek(arFd, arEntry.size, SEEK_CUR);
lastOffset=lseek(arFd, 0, SEEK_CUR);
} /* if processArHeader */
} /* while */
return (TRUE);
} }
extern int ar_main(int argc, char **argv) extern int ar_main(int argc, char **argv)
{ {
int funct = 0, ret=0, i=0; int funct = 0, opt=0;
char *fileList[16], c, *opt_ptr; int srcFd=0, dstFd=0;
if (argc < 2) while ((opt = getopt(argc, argv, "ovt:p:x:")) != -1) {
usage(ar_usage); switch (opt) {
opt_ptr = argv[1];
if (*opt_ptr == '-')
++opt_ptr;
while ((c = *opt_ptr++) != '\0') {
switch (c) {
case 'o': case 'o':
funct = funct | AR_PRESERVE_DATE; funct = funct | PRESERVE_DATE;
break; break;
case 'v': case 'v':
funct = funct | AR_VERBOSE; funct = funct | VERBOSE;
break; break;
case 't': case 't':
funct = funct | AR_DISPLAY; funct = funct | DISPLAY;
break;
case 'x': case 'x':
funct = funct | AR_EXT_TO_FILE; if (opt=='x') {
break; funct = funct | EXT_TO_FILE;
}
case 'p': case 'p':
funct = funct | AR_EXT_TO_STDOUT; if (opt=='p') {
funct = funct | EXT_TO_STDOUT;
}
/* following is common to 't','x' and 'p' */
if (optarg == NULL) {
printf("expected a filename\n");
return(FALSE);
}
if ( (srcFd = open(optarg, O_RDONLY)) < 0) {
errorMsg("Cannot read %s\n", optarg);
return (FALSE);
}
break; break;
default: default:
usage(ar_usage); usage(ar_usage);
} }
} }
for(i=0; i<(argc-2); i++) /* check options not just preserve_dates and/or verbose */
fileList[i]=argv[i+2]; if (funct < 4) {
usage(ar_usage);
return(FALSE);
}
if (funct > 3) /* find files to extract */
ret = readArFile(fileList, (argc-2), funct); if (optind<argc)
for(; optind < argc; optind++) {
return (ret); if ( (funct & EXT_TO_FILE) == EXT_TO_FILE) {
dstFd = open(argv[optind], O_WRONLY | O_CREAT);
extractAr(srcFd, dstFd, argv[optind]);
}
if ( (funct & EXT_TO_STDOUT) == EXT_TO_STDOUT)
extractAr(srcFd, fileno(stdout), argv[optind]);
if ( (funct & DISPLAY) == DISPLAY)
displayEntry(srcFd, argv[optind], funct);
}
return (TRUE);
} }

View File

@ -44,7 +44,6 @@ extern int dd_main(int argc, char **argv)
{ {
char *inFile = NULL; char *inFile = NULL;
char *outFile = NULL; char *outFile = NULL;
char *cp;
int inFd; int inFd;
int outFd; int outFd;
int inCc = 0; int inCc = 0;
@ -135,42 +134,14 @@ extern int dd_main(int argc, char **argv)
lseek(inFd, skipBlocks * blockSize, SEEK_SET); lseek(inFd, skipBlocks * blockSize, SEEK_SET);
lseek(outFd, seekBlocks * blockSize, SEEK_SET); lseek(outFd, seekBlocks * blockSize, SEEK_SET);
//
//TODO: Convert to using fullRead & fullWrite
// from utility.c
// -Erik
while (outTotal < count * blockSize) {
inCc = read(inFd, buf, blockSize);
if (inCc < 0) {
perror(inFile);
goto cleanup;
} else if (inCc == 0) {
goto cleanup;
}
intotal += inCc;
cp = buf;
while (intotal > outTotal) { while ((inCc = read(inFd, buf, sizeof(buf))) > 0) {
if (outTotal + inCc > count * blockSize) intotal +=inCc;
inCc = count * blockSize - outTotal; if ((outCc = fullWrite(outFd, buf, inCc)) < 0)
outCc = write(outFd, cp, inCc); break;
if (outCc < 0) { outTotal += outCc;
perror(outFile); }
goto cleanup;
} else if (outCc == 0) {
goto cleanup;
}
inCc -= outCc;
cp += outCc;
outTotal += outCc;
}
}
if (inCc < 0)
perror(inFile);
cleanup:
/* Note that we are not freeing memory or closing /* Note that we are not freeing memory or closing
* files here, to save a few bytes. */ * files here, to save a few bytes. */
#ifdef BB_FEATURE_CLEAN_UP #ifdef BB_FEATURE_CLEAN_UP

41
dd.c
View File

@ -44,7 +44,6 @@ extern int dd_main(int argc, char **argv)
{ {
char *inFile = NULL; char *inFile = NULL;
char *outFile = NULL; char *outFile = NULL;
char *cp;
int inFd; int inFd;
int outFd; int outFd;
int inCc = 0; int inCc = 0;
@ -135,42 +134,14 @@ extern int dd_main(int argc, char **argv)
lseek(inFd, skipBlocks * blockSize, SEEK_SET); lseek(inFd, skipBlocks * blockSize, SEEK_SET);
lseek(outFd, seekBlocks * blockSize, SEEK_SET); lseek(outFd, seekBlocks * blockSize, SEEK_SET);
//
//TODO: Convert to using fullRead & fullWrite
// from utility.c
// -Erik
while (outTotal < count * blockSize) {
inCc = read(inFd, buf, blockSize);
if (inCc < 0) {
perror(inFile);
goto cleanup;
} else if (inCc == 0) {
goto cleanup;
}
intotal += inCc;
cp = buf;
while (intotal > outTotal) { while ((inCc = read(inFd, buf, sizeof(buf))) > 0) {
if (outTotal + inCc > count * blockSize) intotal +=inCc;
inCc = count * blockSize - outTotal; if ((outCc = fullWrite(outFd, buf, inCc)) < 0)
outCc = write(outFd, cp, inCc); break;
if (outCc < 0) { outTotal += outCc;
perror(outFile); }
goto cleanup;
} else if (outCc == 0) {
goto cleanup;
}
inCc -= outCc;
cp += outCc;
outTotal += outCc;
}
}
if (inCc < 0)
perror(inFile);
cleanup:
/* Note that we are not freeing memory or closing /* Note that we are not freeing memory or closing
* files here, to save a few bytes. */ * files here, to save a few bytes. */
#ifdef BB_FEATURE_CLEAN_UP #ifdef BB_FEATURE_CLEAN_UP

View File

@ -345,6 +345,7 @@ void reset_ino_dev_hashtable(void);
int copyFile(const char *srcName, const char *destName, int copyFile(const char *srcName, const char *destName,
int setModes, int followLinks, int forceFlag); int setModes, int followLinks, int forceFlag);
int copySubFile(int srcFd, int dstFd, size_t remaining);
char *buildName(const char *dirName, const char *fileName); char *buildName(const char *dirName, const char *fileName);
int makeString(int argc, const char **argv, char *buf, int bufLen); int makeString(int argc, const char **argv, char *buf, int bufLen);
char *getChunk(int size); char *getChunk(int size);

12
usage.c
View File

@ -2,15 +2,15 @@
#if defined BB_AR #if defined BB_AR
const char ar_usage[] = const char ar_usage[] =
"ar [optxvV] archive [filenames] \n" "ar [[-ov] -tpv archive] filenames \n"
#ifndef BB_FEATURE_TRIVIAL_HELP #ifndef BB_FEATURE_TRIVIAL_HELP
"\nExtract or list files from an ar archive.\n\n" "\nExtract or list files from an ar archive.\n\n"
"Options:\n" "Options:\n"
"\to\t\tpreserve original dates\n" "\t-o\t\tpreserve original dates\n"
"\tp\t\textract to stdout\n" "\t-p\t\textract to stdout\n"
"\tt\t\tlist\n" "\t-t\t\tlist\n"
"\tx\t\textract\n" "\t-x\t\textract\n"
"\tv\t\tverbosely list files processed\n" "\t-v\t\tverbosely list files processed\n"
#endif #endif
; ;
#endif #endif

View File

@ -231,7 +231,7 @@ void reset_ino_dev_hashtable(void)
#endif /* BB_CP_MV || BB_DU */ #endif /* BB_CP_MV || BB_DU */
#if defined (BB_CP_MV) || defined (BB_DU) || defined (BB_LN) || defined (BB_AR) #if defined (BB_CP_MV) || defined (BB_DU) || defined (BB_LN)
/* /*
* Return TRUE if a fileName is a directory. * Return TRUE if a fileName is a directory.
* Nonexistant files return FALSE. * Nonexistant files return FALSE.
@ -264,6 +264,29 @@ int isDirectory(const char *fileName, const int followLinks, struct stat *statBu
} }
#endif #endif
#if defined (BB_AR)
/*
* Copy readSize bytes between two file descriptors
*/
int copySubFile(int srcFd, int dstFd, size_t remaining)
{
size_t size;
char buffer[BUFSIZ];
while (remaining > 0) {
if (remaining > BUFSIZ)
size = BUFSIZ;
else
size = remaining;
if (fullWrite(dstFd, buffer, fullRead(srcFd, buffer, size)) < size)
return(FALSE);
remaining -= size;
}
return (TRUE);
}
#endif
#if defined (BB_CP_MV) #if defined (BB_CP_MV)
/* /*
* Copy one file to another, while possibly preserving its modes, times, and * Copy one file to another, while possibly preserving its modes, times, and
@ -277,9 +300,7 @@ copyFile(const char *srcName, const char *destName,
{ {
int rfd; int rfd;
int wfd; int wfd;
int rcc;
int status; int status;
char buf[BUF_SIZE];
struct stat srcStatBuf; struct stat srcStatBuf;
struct stat dstStatBuf; struct stat dstStatBuf;
struct utimbuf times; struct utimbuf times;
@ -364,8 +385,7 @@ copyFile(const char *srcName, const char *destName,
return FALSE; return FALSE;
} }
wfd = wfd = open(destName, O_WRONLY | O_CREAT | O_TRUNC,
open(destName, O_WRONLY | O_CREAT | O_TRUNC,
srcStatBuf.st_mode); srcStatBuf.st_mode);
if (wfd < 0) { if (wfd < 0) {
perror(destName); perror(destName);
@ -373,14 +393,9 @@ copyFile(const char *srcName, const char *destName,
return FALSE; return FALSE;
} }
while ((rcc = read(rfd, buf, sizeof(buf))) > 0) { if (copySubFile(rfd, wfd, srcStatBuf.st_size)==FALSE)
if (fullWrite(wfd, buf, rcc) < 0) goto error_exit;
goto error_exit;
}
if (rcc < 0) {
goto error_exit;
}
close(rfd); close(rfd);
if (close(wfd) < 0) { if (close(wfd) < 0) {
return FALSE; return FALSE;
@ -677,7 +692,7 @@ int recursiveAction(const char *fileName,
#if defined (BB_TAR) || defined (BB_MKDIR) || defined (BB_AR) #if defined (BB_TAR) || defined (BB_MKDIR)
/* /*
* Attempt to create the directories along the specified path, except for * Attempt to create the directories along the specified path, except for
* the final component. The mode is given for the final directory only, * the final component. The mode is given for the final directory only,
@ -1292,7 +1307,7 @@ extern long getNum(const char *cp)
#endif /* BB_DD || BB_TAIL */ #endif /* BB_DD || BB_TAIL */
#if defined BB_INIT || defined BB_SYSLOGD || defined BB_AR #if defined BB_INIT || defined BB_SYSLOGD
/* try to open up the specified device */ /* try to open up the specified device */
extern int device_open(char *device, int mode) extern int device_open(char *device, int mode)
{ {