[pcsx_rearmed.git] / deps / libchdr / deps / zlib-1.3.1 / contrib / minizip / miniunz.c

/*
   miniunz.c
   Version 1.1, February 14h, 2010
   sample part of the MiniZip project - ( http://www.winimage.com/zLibDll/minizip.html )

         Copyright (C) 1998-2010 Gilles Vollant (minizip) ( http://www.winimage.com/zLibDll/minizip.html )

         Modifications of Unzip for Zip64
         Copyright (C) 2007-2008 Even Rouault

         Modifications for Zip64 support on both zip and unzip
         Copyright (C) 2009-2010 Mathias Svensson ( http://result42.com )
*/

#if (!defined(_WIN32)) && (!defined(WIN32)) && (!defined(__APPLE__))
        #ifndef __USE_FILE_OFFSET64
                #define __USE_FILE_OFFSET64
        #endif
        #ifndef __USE_LARGEFILE64
                #define __USE_LARGEFILE64
        #endif
        #ifndef _LARGEFILE64_SOURCE
                #define _LARGEFILE64_SOURCE
        #endif
        #ifndef _FILE_OFFSET_BIT
                #define _FILE_OFFSET_BIT 64
        #endif
#endif

#if defined(__APPLE__) || defined(__HAIKU__) || defined(MINIZIP_FOPEN_NO_64)
// In darwin and perhaps other BSD variants off_t is a 64 bit value, hence no need for specific 64 bit functions
#define FOPEN_FUNC(filename, mode) fopen(filename, mode)
#define FTELLO_FUNC(stream) ftello(stream)
#define FSEEKO_FUNC(stream, offset, origin) fseeko(stream, offset, origin)
#else
#define FOPEN_FUNC(filename, mode) fopen64(filename, mode)
#define FTELLO_FUNC(stream) ftello64(stream)
#define FSEEKO_FUNC(stream, offset, origin) fseeko64(stream, offset, origin)
#endif


#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <time.h>
#include <errno.h>
#include <fcntl.h>
#include <sys/stat.h>

#ifdef _WIN32
# include <direct.h>
# include <io.h>
#else
# include <unistd.h>
# include <utime.h>
#endif


#include "unzip.h"

#define CASESENSITIVITY (0)
#define WRITEBUFFERSIZE (8192)
#define MAXFILENAME (256)

#ifdef _WIN32
#define USEWIN32IOAPI
#include "iowin32.h"
#endif
/*
  mini unzip, demo of unzip package

  usage :
  Usage : miniunz [-exvlo] file.zip [file_to_extract] [-d extractdir]

  list the file in the zipfile, and print the content of FILE_ID.ZIP or README.TXT
    if it exists
*/


/* change_file_date : change the date/time of a file
    filename : the filename of the file where date/time must be modified
    dosdate : the new date at the MSDOS format (4 bytes)
    tmu_date : the SAME new date at the tm_unz format */
static void change_file_date(const char *filename, uLong dosdate, tm_unz tmu_date) {
#ifdef _WIN32
  HANDLE hFile;
  FILETIME ftm,ftLocal,ftCreate,ftLastAcc,ftLastWrite;

  hFile = CreateFileA(filename,GENERIC_READ | GENERIC_WRITE,
                      0,NULL,OPEN_EXISTING,0,NULL);
  GetFileTime(hFile,&ftCreate,&ftLastAcc,&ftLastWrite);
  DosDateTimeToFileTime((WORD)(dosdate>>16),(WORD)dosdate,&ftLocal);
  LocalFileTimeToFileTime(&ftLocal,&ftm);
  SetFileTime(hFile,&ftm,&ftLastAcc,&ftm);
  CloseHandle(hFile);
#else
#if defined(unix) || defined(__APPLE__)
  (void)dosdate;
  struct utimbuf ut;
  struct tm newdate;
  newdate.tm_sec = tmu_date.tm_sec;
  newdate.tm_min=tmu_date.tm_min;
  newdate.tm_hour=tmu_date.tm_hour;
  newdate.tm_mday=tmu_date.tm_mday;
  newdate.tm_mon=tmu_date.tm_mon;
  if (tmu_date.tm_year > 1900)
      newdate.tm_year=tmu_date.tm_year - 1900;
  else
      newdate.tm_year=tmu_date.tm_year ;
  newdate.tm_isdst=-1;

  ut.actime=ut.modtime=mktime(&newdate);
  utime(filename,&ut);
#else
  (void)filename;
  (void)dosdate;
  (void)tmu_date;
#endif
#endif
}


/* mymkdir and change_file_date are not 100 % portable
   As I don't know well Unix, I wait feedback for the unix portion */

static int mymkdir(const char* dirname) {
    int ret=0;
#ifdef _WIN32
    ret = _mkdir(dirname);
#elif unix
    ret = mkdir (dirname,0775);
#elif __APPLE__
    ret = mkdir (dirname,0775);
#else
    (void)dirname;
#endif
    return ret;
}

static int makedir(const char *newdir) {
  char *buffer ;
  char *p;
  size_t len = strlen(newdir);

  if (len == 0)
    return 0;

  buffer = (char*)malloc(len+1);
        if (buffer==NULL)
        {
                printf("Error allocating memory\n");
                return UNZ_INTERNALERROR;
        }
  strcpy(buffer,newdir);

  if (buffer[len-1] == '/') {
    buffer[len-1] = '\0';
  }
  if (mymkdir(buffer) == 0)
    {
      free(buffer);
      return 1;
    }

  p = buffer+1;
  while (1)
    {
      char hold;

      while(*p && *p != '\\' && *p != '/')
        p++;
      hold = *p;
      *p = 0;
      if ((mymkdir(buffer) == -1) && (errno == ENOENT))
        {
          printf("couldn't create directory %s\n",buffer);
          free(buffer);
          return 0;
        }
      if (hold == 0)
        break;
      *p++ = hold;
    }
  free(buffer);
  return 1;
}

static void do_banner(void) {
    printf("MiniUnz 1.1, demo of zLib + Unz package written by Gilles Vollant\n");
    printf("more info at http://www.winimage.com/zLibDll/unzip.html\n\n");
}

static void do_help(void) {
    printf("Usage : miniunz [-e] [-x] [-v] [-l] [-o] [-p password] file.zip [file_to_extr.] [-d extractdir]\n\n" \
           "  -e  Extract without pathname (junk paths)\n" \
           "  -x  Extract with pathname\n" \
           "  -v  list files\n" \
           "  -l  list files\n" \
           "  -d  directory to extract into\n" \
           "  -o  overwrite files without prompting\n" \
           "  -p  extract encrypted file using password\n\n");
}

static void Display64BitsSize(ZPOS64_T n, int size_char) {
  /* to avoid compatibility problem , we do here the conversion */
  char number[21];
  int offset=19;
  int pos_string = 19;
  number[20]=0;
  for (;;) {
      number[offset]=(char)((n%10)+'0');
      if (number[offset] != '0')
          pos_string=offset;
      n/=10;
      if (offset==0)
          break;
      offset--;
  }
  {
      int size_display_string = 19-pos_string;
      while (size_char > size_display_string)
      {
          size_char--;
          printf(" ");
      }
  }

  printf("%s",&number[pos_string]);
}

static int do_list(unzFile uf) {
    uLong i;
    unz_global_info64 gi;
    int err;

    err = unzGetGlobalInfo64(uf,&gi);
    if (err!=UNZ_OK)
        printf("error %d with zipfile in unzGetGlobalInfo \n",err);
    printf("  Length  Method     Size Ratio   Date    Time   CRC-32     Name\n");
    printf("  ------  ------     ---- -----   ----    ----   ------     ----\n");
    for (i=0;i<gi.number_entry;i++)
    {
        char filename_inzip[256];
        unz_file_info64 file_info;
        uLong ratio=0;
        const char *string_method = "";
        char charCrypt=' ';
        err = unzGetCurrentFileInfo64(uf,&file_info,filename_inzip,sizeof(filename_inzip),NULL,0,NULL,0);
        if (err!=UNZ_OK)
        {
            printf("error %d with zipfile in unzGetCurrentFileInfo\n",err);
            break;
        }
        if (file_info.uncompressed_size>0)
            ratio = (uLong)((file_info.compressed_size*100)/file_info.uncompressed_size);

        /* display a '*' if the file is encrypted */
        if ((file_info.flag & 1) != 0)
            charCrypt='*';

        if (file_info.compression_method==0)
            string_method="Stored";
        else
        if (file_info.compression_method==Z_DEFLATED)
        {
            uInt iLevel=(uInt)((file_info.flag & 0x6)/2);
            if (iLevel==0)
              string_method="Defl:N";
            else if (iLevel==1)
              string_method="Defl:X";
            else if ((iLevel==2) || (iLevel==3))
              string_method="Defl:F"; /* 2:fast , 3 : extra fast*/
        }
        else
        if (file_info.compression_method==Z_BZIP2ED)
        {
              string_method="BZip2 ";
        }
        else
            string_method="Unkn. ";

        Display64BitsSize(file_info.uncompressed_size,7);
        printf("  %6s%c",string_method,charCrypt);
        Display64BitsSize(file_info.compressed_size,7);
        printf(" %3lu%%  %2.2lu-%2.2lu-%2.2lu  %2.2lu:%2.2lu  %8.8lx   %s\n",
                ratio,
                (uLong)file_info.tmu_date.tm_mon + 1,
                (uLong)file_info.tmu_date.tm_mday,
                (uLong)file_info.tmu_date.tm_year % 100,
                (uLong)file_info.tmu_date.tm_hour,(uLong)file_info.tmu_date.tm_min,
                (uLong)file_info.crc,filename_inzip);
        if ((i+1)<gi.number_entry)
        {
            err = unzGoToNextFile(uf);
            if (err!=UNZ_OK)
            {
                printf("error %d with zipfile in unzGoToNextFile\n",err);
                break;
            }
        }
    }

    return 0;
}


static int do_extract_currentfile(unzFile uf, const int* popt_extract_without_path, int* popt_overwrite, const char* password) {
    char filename_inzip[256];
    char* filename_withoutpath;
    char* p;
    int err=UNZ_OK;
    FILE *fout=NULL;
    void* buf;
    uInt size_buf;

    unz_file_info64 file_info;
    err = unzGetCurrentFileInfo64(uf,&file_info,filename_inzip,sizeof(filename_inzip),NULL,0,NULL,0);

    if (err!=UNZ_OK)
    {
        printf("error %d with zipfile in unzGetCurrentFileInfo\n",err);
        return err;
    }

    size_buf = WRITEBUFFERSIZE;
    buf = (void*)malloc(size_buf);
    if (buf==NULL)
    {
        printf("Error allocating memory\n");
        return UNZ_INTERNALERROR;
    }

    p = filename_withoutpath = filename_inzip;
    while ((*p) != '\0')
    {
        if (((*p)=='/') || ((*p)=='\\'))
            filename_withoutpath = p+1;
        p++;
    }

    if ((*filename_withoutpath)=='\0')
    {
        if ((*popt_extract_without_path)==0)
        {
            printf("creating directory: %s\n",filename_inzip);
            mymkdir(filename_inzip);
        }
    }
    else
    {
        const char* write_filename;
        int skip=0;

        if ((*popt_extract_without_path)==0)
            write_filename = filename_inzip;
        else
            write_filename = filename_withoutpath;

        if (write_filename[0]!='\0')
        {
            const char* relative_check = write_filename;
            while (relative_check[1]!='\0')
            {
                if (relative_check[0]=='.' && relative_check[1]=='.')
                    write_filename = relative_check;
                relative_check++;
            }
        }

        while (write_filename[0]=='/' || write_filename[0]=='.')
            write_filename++;

        err = unzOpenCurrentFilePassword(uf,password);
        if (err!=UNZ_OK)
        {
            printf("error %d with zipfile in unzOpenCurrentFilePassword\n",err);
        }

        if (((*popt_overwrite)==0) && (err==UNZ_OK))
        {
            char rep=0;
            FILE* ftestexist;
            ftestexist = FOPEN_FUNC(write_filename,"rb");
            if (ftestexist!=NULL)
            {
                fclose(ftestexist);
                do
                {
                    char answer[128];
                    int ret;

                    printf("The file %s exists. Overwrite ? [y]es, [n]o, [A]ll: ",write_filename);
                    ret = scanf("%1s",answer);
                    if (ret != 1)
                    {
                       exit(EXIT_FAILURE);
                    }
                    rep = answer[0] ;
                    if ((rep>='a') && (rep<='z'))
                        rep -= 0x20;
                }
                while ((rep!='Y') && (rep!='N') && (rep!='A'));
            }

            if (rep == 'N')
                skip = 1;

            if (rep == 'A')
                *popt_overwrite=1;
        }

        if ((skip==0) && (err==UNZ_OK))
        {
            fout=FOPEN_FUNC(write_filename,"wb");
            /* some zipfile don't contain directory alone before file */
            if ((fout==NULL) && ((*popt_extract_without_path)==0) &&
                                (filename_withoutpath!=(char*)filename_inzip))
            {
                char c=*(filename_withoutpath-1);
                *(filename_withoutpath-1)='\0';
                makedir(write_filename);
                *(filename_withoutpath-1)=c;
                fout=FOPEN_FUNC(write_filename,"wb");
            }

            if (fout==NULL)
            {
                printf("error opening %s\n",write_filename);
            }
        }

        if (fout!=NULL)
        {
            printf(" extracting: %s\n",write_filename);

            do
            {
                err = unzReadCurrentFile(uf,buf,size_buf);
                if (err<0)
                {
                    printf("error %d with zipfile in unzReadCurrentFile\n",err);
                    break;
                }
                if (err>0)
                    if (fwrite(buf,(unsigned)err,1,fout)!=1)
                    {
                        printf("error in writing extracted file\n");
                        err=UNZ_ERRNO;
                        break;
                    }
            }
            while (err>0);
            if (fout)
                    fclose(fout);

            if (err==0)
                change_file_date(write_filename,file_info.dosDate,
                                 file_info.tmu_date);
        }

        if (err==UNZ_OK)
        {
            err = unzCloseCurrentFile (uf);
            if (err!=UNZ_OK)
            {
                printf("error %d with zipfile in unzCloseCurrentFile\n",err);
            }
        }
        else
            unzCloseCurrentFile(uf); /* don't lose the error */
    }

    free(buf);
    return err;
}


static int do_extract(unzFile uf, int opt_extract_without_path, int opt_overwrite, const char* password) {
    uLong i;
    unz_global_info64 gi;
    int err;

    err = unzGetGlobalInfo64(uf,&gi);
    if (err!=UNZ_OK)
        printf("error %d with zipfile in unzGetGlobalInfo \n",err);

    for (i=0;i<gi.number_entry;i++)
    {
        if (do_extract_currentfile(uf,&opt_extract_without_path,
                                      &opt_overwrite,
                                      password) != UNZ_OK)
            break;

        if ((i+1)<gi.number_entry)
        {
            err = unzGoToNextFile(uf);
            if (err!=UNZ_OK)
            {
                printf("error %d with zipfile in unzGoToNextFile\n",err);
                break;
            }
        }
    }

    return 0;
}

static int do_extract_onefile(unzFile uf, const char* filename, int opt_extract_without_path, int opt_overwrite, const char* password) {
    if (unzLocateFile(uf,filename,CASESENSITIVITY)!=UNZ_OK)
    {
        printf("file %s not found in the zipfile\n",filename);
        return 2;
    }

    if (do_extract_currentfile(uf,&opt_extract_without_path,
                                      &opt_overwrite,
                                      password) == UNZ_OK)
        return 0;
    else
        return 1;
}


int main(int argc, char *argv[]) {
    const char *zipfilename=NULL;
    const char *filename_to_extract=NULL;
    const char *password=NULL;
    char filename_try[MAXFILENAME+16] = "";
    int i;
    int ret_value=0;
    int opt_do_list=0;
    int opt_do_extract=1;
    int opt_do_extract_withoutpath=0;
    int opt_overwrite=0;
    int opt_extractdir=0;
    const char *dirname=NULL;
    unzFile uf=NULL;

    do_banner();
    if (argc==1)
    {
        do_help();
        return 0;
    }
    else
    {
        for (i=1;i<argc;i++)
        {
            if ((*argv[i])=='-')
            {
                const char *p=argv[i]+1;

                while ((*p)!='\0')
                {
                    char c=*(p++);
                    if ((c=='l') || (c=='L'))
                        opt_do_list = 1;
                    if ((c=='v') || (c=='V'))
                        opt_do_list = 1;
                    if ((c=='x') || (c=='X'))
                        opt_do_extract = 1;
                    if ((c=='e') || (c=='E'))
                        opt_do_extract = opt_do_extract_withoutpath = 1;
                    if ((c=='o') || (c=='O'))
                        opt_overwrite=1;
                    if ((c=='d') || (c=='D'))
                    {
                        opt_extractdir=1;
                        dirname=argv[i+1];
                    }

                    if (((c=='p') || (c=='P')) && (i+1<argc))
                    {
                        password=argv[i+1];
                        i++;
                    }
                }
            }
            else
            {
                if (zipfilename == NULL)
                    zipfilename = argv[i];
                else if ((filename_to_extract==NULL) && (!opt_extractdir))
                        filename_to_extract = argv[i] ;
            }
        }
    }

    if (zipfilename!=NULL)
    {

#        ifdef USEWIN32IOAPI
        zlib_filefunc64_def ffunc;
#        endif

        strncpy(filename_try, zipfilename,MAXFILENAME-1);
        /* strncpy doesn't append the trailing NULL, of the string is too long. */
        filename_try[ MAXFILENAME ] = '\0';

#        ifdef USEWIN32IOAPI
        fill_win32_filefunc64A(&ffunc);
        uf = unzOpen2_64(zipfilename,&ffunc);
#        else
        uf = unzOpen64(zipfilename);
#        endif
        if (uf==NULL)
        {
            strcat(filename_try,".zip");
#            ifdef USEWIN32IOAPI
            uf = unzOpen2_64(filename_try,&ffunc);
#            else
            uf = unzOpen64(filename_try);
#            endif
        }
    }

    if (uf==NULL)
    {
        printf("Cannot open %s or %s.zip\n",zipfilename,zipfilename);
        return 1;
    }
    printf("%s opened\n",filename_try);

    if (opt_do_list==1)
        ret_value = do_list(uf);
    else if (opt_do_extract==1)
    {
#ifdef _WIN32
        if (opt_extractdir && _chdir(dirname))
#else
        if (opt_extractdir && chdir(dirname))
#endif
        {
          printf("Error changing into %s, aborting\n", dirname);
          exit(-1);
        }

        if (filename_to_extract == NULL)
            ret_value = do_extract(uf, opt_do_extract_withoutpath, opt_overwrite, password);
        else
            ret_value = do_extract_onefile(uf, filename_to_extract, opt_do_extract_withoutpath, opt_overwrite, password);
    }

    unzClose(uf);

    return ret_value;
}
Commit	Line	Data
9e052883	1	/*
	2	miniunz.c
	3	Version 1.1, February 14h, 2010
	4	sample part of the MiniZip project - ( http://www.winimage.com/zLibDll/minizip.html )
	5
	6	Copyright (C) 1998-2010 Gilles Vollant (minizip) ( http://www.winimage.com/zLibDll/minizip.html )
	7
	8	Modifications of Unzip for Zip64
	9	Copyright (C) 2007-2008 Even Rouault
	10
	11	Modifications for Zip64 support on both zip and unzip
	12	Copyright (C) 2009-2010 Mathias Svensson ( http://result42.com )
	13	*/
	14
	15	#if (!defined(_WIN32)) && (!defined(WIN32)) && (!defined(__APPLE__))
	16	#ifndef __USE_FILE_OFFSET64
	17	#define __USE_FILE_OFFSET64
	18	#endif
	19	#ifndef __USE_LARGEFILE64
	20	#define __USE_LARGEFILE64
	21	#endif
	22	#ifndef _LARGEFILE64_SOURCE
	23	#define _LARGEFILE64_SOURCE
	24	#endif
	25	#ifndef _FILE_OFFSET_BIT
	26	#define _FILE_OFFSET_BIT 64
	27	#endif
	28	#endif
	29
648db22b	30	#if defined(__APPLE__) \|\| defined(__HAIKU__) \|\| defined(MINIZIP_FOPEN_NO_64)
9e052883	31	// In darwin and perhaps other BSD variants off_t is a 64 bit value, hence no need for specific 64 bit functions
	32	#define FOPEN_FUNC(filename, mode) fopen(filename, mode)
	33	#define FTELLO_FUNC(stream) ftello(stream)
	34	#define FSEEKO_FUNC(stream, offset, origin) fseeko(stream, offset, origin)
	35	#else
	36	#define FOPEN_FUNC(filename, mode) fopen64(filename, mode)
	37	#define FTELLO_FUNC(stream) ftello64(stream)
	38	#define FSEEKO_FUNC(stream, offset, origin) fseeko64(stream, offset, origin)
	39	#endif
	40
	41
	42	#include <stdio.h>
	43	#include <stdlib.h>
	44	#include <string.h>
	45	#include <time.h>
	46	#include <errno.h>
	47	#include <fcntl.h>
	48	#include <sys/stat.h>
	49
	50	#ifdef _WIN32
	51	# include <direct.h>
	52	# include <io.h>
	53	#else
	54	# include <unistd.h>
	55	# include <utime.h>
	56	#endif
	57
	58
	59	#include "unzip.h"
	60
	61	#define CASESENSITIVITY (0)
	62	#define WRITEBUFFERSIZE (8192)
	63	#define MAXFILENAME (256)
	64
	65	#ifdef _WIN32
	66	#define USEWIN32IOAPI
	67	#include "iowin32.h"
	68	#endif
	69	/*
	70	mini unzip, demo of unzip package
	71
	72	usage :
	73	Usage : miniunz [-exvlo] file.zip [file_to_extract] [-d extractdir]
	74
	75	list the file in the zipfile, and print the content of FILE_ID.ZIP or README.TXT
	76	if it exists
	77	*/
	78
	79
	80	/* change_file_date : change the date/time of a file
	81	filename : the filename of the file where date/time must be modified
648db22b	82	dosdate : the new date at the MSDOS format (4 bytes)
9e052883	83	tmu_date : the SAME new date at the tm_unz format */
648db22b	84	static void change_file_date(const char *filename, uLong dosdate, tm_unz tmu_date) {
9e052883	85	#ifdef _WIN32
	86	HANDLE hFile;
	87	FILETIME ftm,ftLocal,ftCreate,ftLastAcc,ftLastWrite;
	88
	89	hFile = CreateFileA(filename,GENERIC_READ \| GENERIC_WRITE,
	90	0,NULL,OPEN_EXISTING,0,NULL);
	91	GetFileTime(hFile,&ftCreate,&ftLastAcc,&ftLastWrite);
	92	DosDateTimeToFileTime((WORD)(dosdate>>16),(WORD)dosdate,&ftLocal);
	93	LocalFileTimeToFileTime(&ftLocal,&ftm);
	94	SetFileTime(hFile,&ftm,&ftLastAcc,&ftm);
	95	CloseHandle(hFile);
	96	#else
	97	#if defined(unix) \|\| defined(__APPLE__)
	98	(void)dosdate;
	99	struct utimbuf ut;
	100	struct tm newdate;
	101	newdate.tm_sec = tmu_date.tm_sec;
	102	newdate.tm_min=tmu_date.tm_min;
	103	newdate.tm_hour=tmu_date.tm_hour;
	104	newdate.tm_mday=tmu_date.tm_mday;
	105	newdate.tm_mon=tmu_date.tm_mon;
	106	if (tmu_date.tm_year > 1900)
	107	newdate.tm_year=tmu_date.tm_year - 1900;
	108	else
	109	newdate.tm_year=tmu_date.tm_year ;
	110	newdate.tm_isdst=-1;
	111
	112	ut.actime=ut.modtime=mktime(&newdate);
	113	utime(filename,&ut);
648db22b	114	#else
	115	(void)filename;
	116	(void)dosdate;
	117	(void)tmu_date;
9e052883	118	#endif
	119	#endif
	120	}
	121
	122
	123	/* mymkdir and change_file_date are not 100 % portable
	124	As I don't know well Unix, I wait feedback for the unix portion */
	125
648db22b	126	static int mymkdir(const char* dirname) {
9e052883	127	int ret=0;
	128	#ifdef _WIN32
	129	ret = _mkdir(dirname);
	130	#elif unix
	131	ret = mkdir (dirname,0775);
	132	#elif __APPLE__
	133	ret = mkdir (dirname,0775);
648db22b	134	#else
648db22b	135	(void)dirname;
9e052883	136	#endif
	137	return ret;
	138	}
	139
648db22b	140	static int makedir(const char *newdir) {
9e052883	141	char *buffer ;
	142	char *p;
	143	size_t len = strlen(newdir);
	144
	145	if (len == 0)
	146	return 0;
	147
	148	buffer = (char*)malloc(len+1);
	149	if (buffer==NULL)
	150	{
	151	printf("Error allocating memory\n");
	152	return UNZ_INTERNALERROR;
	153	}
	154	strcpy(buffer,newdir);
	155
	156	if (buffer[len-1] == '/') {
	157	buffer[len-1] = '\0';
	158	}
	159	if (mymkdir(buffer) == 0)
	160	{
	161	free(buffer);
	162	return 1;
	163	}
	164
	165	p = buffer+1;
	166	while (1)
	167	{
	168	char hold;
	169
	170	while(p && p != '\\' && *p != '/')
	171	p++;
	172	hold = *p;
	173	*p = 0;
	174	if ((mymkdir(buffer) == -1) && (errno == ENOENT))
	175	{
	176	printf("couldn't create directory %s\n",buffer);
	177	free(buffer);
	178	return 0;
	179	}
	180	if (hold == 0)
	181	break;
	182	*p++ = hold;
	183	}
	184	free(buffer);
	185	return 1;
	186	}
	187
648db22b	188	static void do_banner(void) {
648db22b	189	printf("MiniUnz 1.1, demo of zLib + Unz package written by Gilles Vollant\n");
9e052883	190	printf("more info at http://www.winimage.com/zLibDll/unzip.html\n\n");
	191	}
	192
648db22b	193	static void do_help(void) {
9e052883	194	printf("Usage : miniunz [-e] [-x] [-v] [-l] [-o] [-p password] file.zip [file_to_extr.] [-d extractdir]\n\n" \
	195	" -e Extract without pathname (junk paths)\n" \
	196	" -x Extract with pathname\n" \
	197	" -v list files\n" \
	198	" -l list files\n" \
	199	" -d directory to extract into\n" \
	200	" -o overwrite files without prompting\n" \
648db22b	201	" -p extract encrypted file using password\n\n");
9e052883	202	}
9e052883	203
648db22b	204	static void Display64BitsSize(ZPOS64_T n, int size_char) {
9e052883	205	/* to avoid compatibility problem , we do here the conversion */
	206	char number[21];
	207	int offset=19;
	208	int pos_string = 19;
	209	number[20]=0;
	210	for (;;) {
	211	number[offset]=(char)((n%10)+'0');
	212	if (number[offset] != '0')
	213	pos_string=offset;
	214	n/=10;
	215	if (offset==0)
	216	break;
	217	offset--;
	218	}
	219	{
	220	int size_display_string = 19-pos_string;
	221	while (size_char > size_display_string)
	222	{
	223	size_char--;
	224	printf(" ");
	225	}
	226	}
	227
	228	printf("%s",&number[pos_string]);
	229	}
	230
648db22b	231	static int do_list(unzFile uf) {
9e052883	232	uLong i;
	233	unz_global_info64 gi;
	234	int err;
	235
	236	err = unzGetGlobalInfo64(uf,&gi);
	237	if (err!=UNZ_OK)
	238	printf("error %d with zipfile in unzGetGlobalInfo \n",err);
	239	printf(" Length Method Size Ratio Date Time CRC-32 Name\n");
	240	printf(" ------ ------ ---- ----- ---- ---- ------ ----\n");
	241	for (i=0;i<gi.number_entry;i++)
	242	{
	243	char filename_inzip[256];
	244	unz_file_info64 file_info;
	245	uLong ratio=0;
648db22b	246	const char *string_method = "";
9e052883	247	char charCrypt=' ';
	248	err = unzGetCurrentFileInfo64(uf,&file_info,filename_inzip,sizeof(filename_inzip),NULL,0,NULL,0);
	249	if (err!=UNZ_OK)
	250	{
	251	printf("error %d with zipfile in unzGetCurrentFileInfo\n",err);
	252	break;
	253	}
	254	if (file_info.uncompressed_size>0)
	255	ratio = (uLong)((file_info.compressed_size*100)/file_info.uncompressed_size);
	256
648db22b	257	/* display a '' if the file is encrypted /
9e052883	258	if ((file_info.flag & 1) != 0)
	259	charCrypt='*';
	260
	261	if (file_info.compression_method==0)
	262	string_method="Stored";
	263	else
	264	if (file_info.compression_method==Z_DEFLATED)
	265	{
	266	uInt iLevel=(uInt)((file_info.flag & 0x6)/2);
	267	if (iLevel==0)
	268	string_method="Defl:N";
	269	else if (iLevel==1)
	270	string_method="Defl:X";
	271	else if ((iLevel==2) \|\| (iLevel==3))
	272	string_method="Defl:F"; /* 2:fast , 3 : extra fast*/
	273	}
	274	else
	275	if (file_info.compression_method==Z_BZIP2ED)
	276	{
	277	string_method="BZip2 ";
	278	}
	279	else
	280	string_method="Unkn. ";
	281
	282	Display64BitsSize(file_info.uncompressed_size,7);
	283	printf(" %6s%c",string_method,charCrypt);
	284	Display64BitsSize(file_info.compressed_size,7);
	285	printf(" %3lu%% %2.2lu-%2.2lu-%2.2lu %2.2lu:%2.2lu %8.8lx %s\n",
	286	ratio,
	287	(uLong)file_info.tmu_date.tm_mon + 1,
	288	(uLong)file_info.tmu_date.tm_mday,
	289	(uLong)file_info.tmu_date.tm_year % 100,
	290	(uLong)file_info.tmu_date.tm_hour,(uLong)file_info.tmu_date.tm_min,
	291	(uLong)file_info.crc,filename_inzip);
	292	if ((i+1)<gi.number_entry)
	293	{
	294	err = unzGoToNextFile(uf);
	295	if (err!=UNZ_OK)
	296	{
	297	printf("error %d with zipfile in unzGoToNextFile\n",err);
	298	break;
	299	}
	300	}
	301	}
	302
	303	return 0;
	304	}
	305
	306
648db22b	307	static int do_extract_currentfile(unzFile uf, const int* popt_extract_without_path, int* popt_overwrite, const char* password) {
9e052883	308	char filename_inzip[256];
	309	char* filename_withoutpath;
	310	char* p;
	311	int err=UNZ_OK;
	312	FILE *fout=NULL;
	313	void* buf;
	314	uInt size_buf;
	315
	316	unz_file_info64 file_info;
	317	err = unzGetCurrentFileInfo64(uf,&file_info,filename_inzip,sizeof(filename_inzip),NULL,0,NULL,0);
	318
	319	if (err!=UNZ_OK)
	320	{
	321	printf("error %d with zipfile in unzGetCurrentFileInfo\n",err);
	322	return err;
	323	}
	324
	325	size_buf = WRITEBUFFERSIZE;
	326	buf = (void*)malloc(size_buf);
	327	if (buf==NULL)
	328	{
	329	printf("Error allocating memory\n");
	330	return UNZ_INTERNALERROR;
	331	}
	332
	333	p = filename_withoutpath = filename_inzip;
	334	while ((*p) != '\0')
	335	{
	336	if (((p)=='/') \|\| ((p)=='\\'))
	337	filename_withoutpath = p+1;
	338	p++;
	339	}
	340
	341	if ((*filename_withoutpath)=='\0')
	342	{
	343	if ((*popt_extract_without_path)==0)
	344	{
	345	printf("creating directory: %s\n",filename_inzip);
	346	mymkdir(filename_inzip);
	347	}
	348	}
	349	else
	350	{
	351	const char* write_filename;
	352	int skip=0;
	353
	354	if ((*popt_extract_without_path)==0)
	355	write_filename = filename_inzip;
	356	else
	357	write_filename = filename_withoutpath;
	358
648db22b	359	if (write_filename[0]!='\0')
	360	{
	361	const char* relative_check = write_filename;
	362	while (relative_check[1]!='\0')
	363	{
	364	if (relative_check[0]=='.' && relative_check[1]=='.')
	365	write_filename = relative_check;
	366	relative_check++;
	367	}
	368	}
	369
	370	while (write_filename[0]=='/' \|\| write_filename[0]=='.')
	371	write_filename++;
	372
9e052883	373	err = unzOpenCurrentFilePassword(uf,password);
	374	if (err!=UNZ_OK)
	375	{
	376	printf("error %d with zipfile in unzOpenCurrentFilePassword\n",err);
	377	}
	378
	379	if (((*popt_overwrite)==0) && (err==UNZ_OK))
	380	{
	381	char rep=0;
	382	FILE* ftestexist;
	383	ftestexist = FOPEN_FUNC(write_filename,"rb");
	384	if (ftestexist!=NULL)
	385	{
	386	fclose(ftestexist);
	387	do
	388	{
	389	char answer[128];
	390	int ret;
	391
	392	printf("The file %s exists. Overwrite ? [y]es, [n]o, [A]ll: ",write_filename);
	393	ret = scanf("%1s",answer);
	394	if (ret != 1)
	395	{
	396	exit(EXIT_FAILURE);
	397	}
	398	rep = answer[0] ;
	399	if ((rep>='a') && (rep<='z'))
	400	rep -= 0x20;
	401	}
	402	while ((rep!='Y') && (rep!='N') && (rep!='A'));
	403	}
	404
	405	if (rep == 'N')
	406	skip = 1;
	407
	408	if (rep == 'A')
	409	*popt_overwrite=1;
	410	}
	411
	412	if ((skip==0) && (err==UNZ_OK))
	413	{
	414	fout=FOPEN_FUNC(write_filename,"wb");
	415	/* some zipfile don't contain directory alone before file */
	416	if ((fout==NULL) && ((*popt_extract_without_path)==0) &&
	417	(filename_withoutpath!=(char*)filename_inzip))
	418	{
	419	char c=*(filename_withoutpath-1);
	420	*(filename_withoutpath-1)='\0';
	421	makedir(write_filename);
	422	*(filename_withoutpath-1)=c;
	423	fout=FOPEN_FUNC(write_filename,"wb");
	424	}
	425
	426	if (fout==NULL)
	427	{
	428	printf("error opening %s\n",write_filename);
	429	}
	430	}
	431
	432	if (fout!=NULL)
	433	{
	434	printf(" extracting: %s\n",write_filename);
	435
	436	do
437	{
438	err = unzReadCurrentFile(uf,buf,size_buf);
439	if (err<0)
440	{
441	printf("error %d with zipfile in unzReadCurrentFile\n",err);
442	break;
443	}
444	if (err>0)
445	if (fwrite(buf,(unsigned)err,1,fout)!=1)
446	{
447	printf("error in writing extracted file\n");
448	err=UNZ_ERRNO;
449	break;
450	}
451	}
452	while (err>0);
453	if (fout)
454	fclose(fout);
455
456	if (err==0)
457	change_file_date(write_filename,file_info.dosDate,
458	file_info.tmu_date);
459	}
460
461	if (err==UNZ_OK)
462	{
463	err = unzCloseCurrentFile (uf);
464	if (err!=UNZ_OK)
465	{
466	printf("error %d with zipfile in unzCloseCurrentFile\n",err);
467	}
468	}
469	else
470	unzCloseCurrentFile(uf); /* don't lose the error */
471	}
472
473	free(buf);
474	return err;
475	}
476
477
648db22b	478	static int do_extract(unzFile uf, int opt_extract_without_path, int opt_overwrite, const char* password) {
9e052883	479	uLong i;
	480	unz_global_info64 gi;
	481	int err;
	482
	483	err = unzGetGlobalInfo64(uf,&gi);
	484	if (err!=UNZ_OK)
	485	printf("error %d with zipfile in unzGetGlobalInfo \n",err);
	486
	487	for (i=0;i<gi.number_entry;i++)
	488	{
	489	if (do_extract_currentfile(uf,&opt_extract_without_path,
	490	&opt_overwrite,
	491	password) != UNZ_OK)
	492	break;
	493
	494	if ((i+1)<gi.number_entry)
	495	{
	496	err = unzGoToNextFile(uf);
	497	if (err!=UNZ_OK)
	498	{
	499	printf("error %d with zipfile in unzGoToNextFile\n",err);
	500	break;
	501	}
	502	}
	503	}
	504
	505	return 0;
	506	}
	507
648db22b	508	static int do_extract_onefile(unzFile uf, const char* filename, int opt_extract_without_path, int opt_overwrite, const char* password) {
9e052883	509	if (unzLocateFile(uf,filename,CASESENSITIVITY)!=UNZ_OK)
	510	{
	511	printf("file %s not found in the zipfile\n",filename);
	512	return 2;
	513	}
	514
	515	if (do_extract_currentfile(uf,&opt_extract_without_path,
	516	&opt_overwrite,
	517	password) == UNZ_OK)
	518	return 0;
	519	else
	520	return 1;
	521	}
	522
	523
648db22b	524	int main(int argc, char *argv[]) {
9e052883	525	const char *zipfilename=NULL;
	526	const char *filename_to_extract=NULL;
	527	const char *password=NULL;
	528	char filename_try[MAXFILENAME+16] = "";
	529	int i;
	530	int ret_value=0;
	531	int opt_do_list=0;
	532	int opt_do_extract=1;
	533	int opt_do_extract_withoutpath=0;
	534	int opt_overwrite=0;
	535	int opt_extractdir=0;
	536	const char *dirname=NULL;
	537	unzFile uf=NULL;
	538
	539	do_banner();
	540	if (argc==1)
	541	{
	542	do_help();
	543	return 0;
	544	}
	545	else
	546	{
	547	for (i=1;i<argc;i++)
	548	{
	549	if ((*argv[i])=='-')
	550	{
	551	const char *p=argv[i]+1;
	552
	553	while ((*p)!='\0')
	554	{
	555	char c=*(p++);
	556	if ((c=='l') \|\| (c=='L'))
	557	opt_do_list = 1;
	558	if ((c=='v') \|\| (c=='V'))
	559	opt_do_list = 1;
	560	if ((c=='x') \|\| (c=='X'))
	561	opt_do_extract = 1;
	562	if ((c=='e') \|\| (c=='E'))
	563	opt_do_extract = opt_do_extract_withoutpath = 1;
	564	if ((c=='o') \|\| (c=='O'))
	565	opt_overwrite=1;
	566	if ((c=='d') \|\| (c=='D'))
	567	{
	568	opt_extractdir=1;
	569	dirname=argv[i+1];
	570	}
	571
	572	if (((c=='p') \|\| (c=='P')) && (i+1<argc))
	573	{
	574	password=argv[i+1];
	575	i++;
	576	}
	577	}
	578	}
	579	else
	580	{
	581	if (zipfilename == NULL)
	582	zipfilename = argv[i];
	583	else if ((filename_to_extract==NULL) && (!opt_extractdir))
	584	filename_to_extract = argv[i] ;
	585	}
	586	}
	587	}
	588
589	if (zipfilename!=NULL)
590	{
591
592	# ifdef USEWIN32IOAPI
593	zlib_filefunc64_def ffunc;
594	# endif
595
596	strncpy(filename_try, zipfilename,MAXFILENAME-1);
648db22b	597	/* strncpy doesn't append the trailing NULL, of the string is too long. */
9e052883	598	filename_try[ MAXFILENAME ] = '\0';
	599
	600	# ifdef USEWIN32IOAPI
	601	fill_win32_filefunc64A(&ffunc);
	602	uf = unzOpen2_64(zipfilename,&ffunc);
	603	# else
	604	uf = unzOpen64(zipfilename);
	605	# endif
	606	if (uf==NULL)
	607	{
	608	strcat(filename_try,".zip");
	609	# ifdef USEWIN32IOAPI
	610	uf = unzOpen2_64(filename_try,&ffunc);
	611	# else
	612	uf = unzOpen64(filename_try);
	613	# endif
	614	}
	615	}
	616
	617	if (uf==NULL)
	618	{
	619	printf("Cannot open %s or %s.zip\n",zipfilename,zipfilename);
	620	return 1;
	621	}
	622	printf("%s opened\n",filename_try);
	623
	624	if (opt_do_list==1)
	625	ret_value = do_list(uf);
	626	else if (opt_do_extract==1)
	627	{
	628	#ifdef _WIN32
	629	if (opt_extractdir && _chdir(dirname))
	630	#else
	631	if (opt_extractdir && chdir(dirname))
	632	#endif
	633	{
	634	printf("Error changing into %s, aborting\n", dirname);
	635	exit(-1);
	636	}
	637
	638	if (filename_to_extract == NULL)
	639	ret_value = do_extract(uf, opt_do_extract_withoutpath, opt_overwrite, password);
	640	else
	641	ret_value = do_extract_onefile(uf, filename_to_extract, opt_do_extract_withoutpath, opt_overwrite, password);
	642	}
	643
	644	unzClose(uf);
	645
	646	return ret_value;
	647	}