132 lines
2.1 KiB
C
132 lines
2.1 KiB
C
#include "lar.h"
|
|
|
|
int do_print_member( lar_archive *ar, const char *name )
|
|
{
|
|
lar_member *member;
|
|
|
|
if( (member = lar_open_member(ar, name)) != NULL )
|
|
{
|
|
write(fileno(stdout), member->data, member->length);
|
|
lar_close_member(member);
|
|
}
|
|
else
|
|
LAR_DIE("Unable to locate archive member");
|
|
|
|
return 0;
|
|
}
|
|
|
|
int do_print_index( lar_archive *ar )
|
|
{
|
|
lar_index *index = ar->index;
|
|
|
|
if( ar->has_filenames )
|
|
{
|
|
while(index)
|
|
{
|
|
if( index->type == LAR_TYPE_REGULAR )
|
|
{
|
|
printf("%s\n", index->filename);
|
|
}
|
|
|
|
index = index->next;
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
LAR_DIE("The archive contains no file list");
|
|
return 1;
|
|
}
|
|
|
|
int do_require( const char *package, const char *path )
|
|
{
|
|
int stat = 1;
|
|
lar_archive *ar;
|
|
lar_member *mb;
|
|
|
|
if( (ar = lar_find_archive(package, path, 1)) != NULL )
|
|
{
|
|
if( (mb = lar_find_member(ar, package)) != NULL )
|
|
{
|
|
write(fileno(stdout), mb->data, mb->length);
|
|
lar_close_member(mb);
|
|
stat = 0;
|
|
}
|
|
|
|
lar_close(ar);
|
|
}
|
|
|
|
return stat;
|
|
}
|
|
|
|
int do_findfile( const char *filename, const char *path )
|
|
{
|
|
int stat = 1;
|
|
lar_archive *ar;
|
|
lar_member *mb;
|
|
|
|
if( (ar = lar_find_archive(filename, path, 0)) != NULL )
|
|
{
|
|
if( (mb = lar_open_member(ar, filename)) != NULL )
|
|
{
|
|
write(fileno(stdout), mb->data, mb->length);
|
|
lar_close_member(mb);
|
|
stat = 0;
|
|
}
|
|
|
|
lar_close(ar);
|
|
}
|
|
|
|
return stat;
|
|
}
|
|
|
|
int main( int argc, const char* argv[] )
|
|
{
|
|
lar_archive *ar;
|
|
int stat = 0;
|
|
|
|
if( argv[1] != NULL && argv[2] != NULL )
|
|
{
|
|
switch(argv[1][0])
|
|
{
|
|
case 's':
|
|
if( (ar = lar_open(argv[2])) != NULL )
|
|
{
|
|
if( argv[3] != NULL )
|
|
stat = do_print_member(ar, argv[3]);
|
|
else
|
|
stat = do_print_index(ar);
|
|
|
|
lar_close(ar);
|
|
}
|
|
else
|
|
{
|
|
LAR_DIE("Failed to open archive");
|
|
}
|
|
|
|
break;
|
|
|
|
case 'r':
|
|
stat = do_require(argv[2], argv[3]);
|
|
break;
|
|
|
|
case 'f':
|
|
stat = do_findfile(argv[2], argv[3]);
|
|
break;
|
|
}
|
|
|
|
return stat;
|
|
}
|
|
else
|
|
{
|
|
printf("Usage:\n");
|
|
printf("\tlar show <archive> [<member>]\n");
|
|
printf("\tlar require <package> [<path>]\n");
|
|
printf("\tlar find <filename> [<path>]\n");
|
|
|
|
return 1;
|
|
}
|
|
|
|
return 0;
|
|
}
|