131 lines
3.0 KiB
C
131 lines
3.0 KiB
C
/*
|
|
* Copyright (c) 2003 Guido Draheim <guidod@gmx.de>
|
|
* Use freely under the restrictions of the ZLIB license.
|
|
*
|
|
* This file is used as an example to clarify zzip api usage.
|
|
*/
|
|
|
|
#include <zzip/lib.h>
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
#include <sys/stat.h>
|
|
#include "__fnmatch.h"
|
|
#include "__mkdir.h"
|
|
#include "__string.h"
|
|
#include "__debug.h"
|
|
#include "unzzipcat-zip.h"
|
|
#include "unzzip-states.h"
|
|
|
|
#ifdef ZZIP_HAVE_UNISTD_H
|
|
#include <unistd.h>
|
|
#endif
|
|
#ifdef ZZIP_HAVE_IO_H
|
|
#include <io.h>
|
|
#endif
|
|
|
|
/* Functions in unzzip.c: */
|
|
extern int exitcode(int);
|
|
extern FILE* create_fopen(char*, char*, int);
|
|
|
|
static void unzzip_cat_file(ZZIP_DIR* disk, char* name, FILE* out)
|
|
{
|
|
ZZIP_FILE* file = zzip_file_open (disk, name, 0);
|
|
if (file)
|
|
{
|
|
char buffer[1024]; int len;
|
|
while (0 < (len = zzip_file_read (file, buffer, 1024)))
|
|
{
|
|
fwrite (buffer, 1, len, out);
|
|
}
|
|
|
|
zzip_file_close (file);
|
|
} else {
|
|
DBG3("'%s' file not found [%s]", name, disk->realname);
|
|
}
|
|
}
|
|
|
|
static int unzzip_cat (int argc, char ** argv, int extract)
|
|
{
|
|
int done = 0;
|
|
int argn;
|
|
ZZIP_DIR* disk;
|
|
zzip_error_t error;
|
|
|
|
if (argc == 1)
|
|
{
|
|
printf (__FILE__ " version " ZZIP_PACKAGE_NAME " " ZZIP_PACKAGE_VERSION "\n");
|
|
return EXIT_OK; /* better provide an archive argument */
|
|
}
|
|
|
|
disk = zzip_dir_open (argv[1], &error);
|
|
if (! disk) {
|
|
fprintf(stderr, "%s: %s\n", argv[1], zzip_strerror(error));
|
|
return exitcode(error);
|
|
}
|
|
|
|
if (argc == 2)
|
|
{ /* list all */
|
|
ZZIP_DIRENT entry;
|
|
while(zzip_dir_read(disk, &entry))
|
|
{
|
|
char* name = entry.d_name;
|
|
FILE* out = stdout;
|
|
if (extract) {
|
|
out = create_fopen(name, "wb", 1);
|
|
DBG3("extract '%s' to new file %p", name, out);
|
|
}
|
|
if (! out) {
|
|
DBG3("fopen' %s : %s", name, strerror(errno));
|
|
if (errno != EISDIR) done = EXIT_ERRORS;
|
|
continue;
|
|
}
|
|
unzzip_cat_file (disk, name, out);
|
|
if (extract) fclose(out);
|
|
}
|
|
}
|
|
else
|
|
{ /* list only the matching entries - in order of zip directory */
|
|
ZZIP_DIRENT entry;
|
|
while(zzip_dir_read(disk, &entry))
|
|
{
|
|
char* name = entry.d_name;
|
|
for (argn=1; argn < argc; argn++)
|
|
{
|
|
if (! _zzip_fnmatch (argv[argn], name,
|
|
_zzip_FNM_NOESCAPE|_zzip_FNM_PATHNAME|_zzip_FNM_PERIOD))
|
|
{
|
|
FILE* out = stdout;
|
|
if (extract) out = create_fopen(name, "wb", 1);
|
|
if (! out) {
|
|
DBG3("fopen. %s : %s", name, strerror(errno));
|
|
if (errno != EISDIR) done = EXIT_ERRORS;
|
|
continue;
|
|
}
|
|
unzzip_cat_file (disk, name, out);
|
|
if (extract) fclose(out);
|
|
break; /* match loop */
|
|
}
|
|
}
|
|
}
|
|
}
|
|
zzip_dir_close(disk);
|
|
return done;
|
|
}
|
|
|
|
int unzzip_print (int argc, char ** argv)
|
|
{
|
|
return unzzip_cat(argc, argv, 0);
|
|
}
|
|
|
|
int unzzip_extract (int argc, char ** argv)
|
|
{
|
|
return unzzip_cat(argc, argv, 1);
|
|
}
|
|
|
|
/*
|
|
* Local variables:
|
|
* c-file-style: "stroustrup"
|
|
* End:
|
|
*/
|