| /* zip.c -- IO on .zip files using zlib |
| Version 1.01e, February 12th, 2005 |
| |
| 27 Dec 2004 Rolf Kalbermatter |
| Modification to zipOpen2 to support globalComment retrieval. |
| |
| Copyright (C) 1998-2005 Gilles Vollant |
| |
| Read zip.h for more info |
| */ |
| |
| |
| #include <stdio.h> |
| #include <stdlib.h> |
| #include <string.h> |
| #include <time.h> |
| #include "zlib.h" |
| #include "zip.h" |
| |
| #ifdef STDC |
| # include <stddef.h> |
| # include <string.h> |
| # include <stdlib.h> |
| #endif |
| #ifdef NO_ERRNO_H |
| extern int errno; |
| #else |
| # include <errno.h> |
| #endif |
| |
| |
| #ifndef local |
| # define local static |
| #endif |
| /* compile with -Dlocal if your debugger can't find static symbols */ |
| |
| #ifndef VERSIONMADEBY |
| # define VERSIONMADEBY (0x0) /* platform depedent */ |
| #endif |
| |
| #ifndef Z_BUFSIZE |
| #define Z_BUFSIZE (16384) |
| #endif |
| |
| #ifndef Z_MAXFILENAMEINZIP |
| #define Z_MAXFILENAMEINZIP (256) |
| #endif |
| |
| #ifndef ALLOC |
| # define ALLOC(size) (malloc(size)) |
| #endif |
| #ifndef TRYFREE |
| # define TRYFREE(p) {if (p) free(p);} |
| #endif |
| |
| /* |
| #define SIZECENTRALDIRITEM (0x2e) |
| #define SIZEZIPLOCALHEADER (0x1e) |
| */ |
| |
| /* I've found an old Unix (a SunOS 4.1.3_U1) without all SEEK_* defined.... */ |
| |
| #ifndef SEEK_CUR |
| #define SEEK_CUR 1 |
| #endif |
| |
| #ifndef SEEK_END |
| #define SEEK_END 2 |
| #endif |
| |
| #ifndef SEEK_SET |
| #define SEEK_SET 0 |
| #endif |
| |
| #ifndef DEF_MEM_LEVEL |
| #if MAX_MEM_LEVEL >= 8 |
| # define DEF_MEM_LEVEL 8 |
| #else |
| # define DEF_MEM_LEVEL MAX_MEM_LEVEL |
| #endif |
| #endif |
| const char zip_copyright[] = |
| " zip 1.01 Copyright 1998-2004 Gilles Vollant - http://www.winimage.com/zLibDll"; |
| |
| |
| #define SIZEDATA_INDATABLOCK (4096-(4*4)) |
| |
| #define LOCALHEADERMAGIC (0x04034b50) |
| #define CENTRALHEADERMAGIC (0x02014b50) |
| #define ENDHEADERMAGIC (0x06054b50) |
| |
| #define FLAG_LOCALHEADER_OFFSET (0x06) |
| #define CRC_LOCALHEADER_OFFSET (0x0e) |
| |
| #define SIZECENTRALHEADER (0x2e) /* 46 */ |
| |
| typedef struct linkedlist_datablock_internal_s |
| { |
| struct linkedlist_datablock_internal_s* next_datablock; |
| uLong avail_in_this_block; |
| uLong filled_in_this_block; |
| uLong unused; /* for future use and alignement */ |
| unsigned char data[SIZEDATA_INDATABLOCK]; |
| } linkedlist_datablock_internal; |
| |
| typedef struct linkedlist_data_s |
| { |
| linkedlist_datablock_internal* first_block; |
| linkedlist_datablock_internal* last_block; |
| } linkedlist_data; |
| |
| |
| typedef struct |
| { |
| z_stream stream; /* zLib stream structure for inflate */ |
| int stream_initialised; /* 1 is stream is initialised */ |
| uInt pos_in_buffered_data; /* last written byte in buffered_data */ |
| |
| uLong pos_local_header; /* offset of the local header of the file |
| currenty writing */ |
| char* central_header; /* central header data for the current file */ |
| uLong size_centralheader; /* size of the central header for cur file */ |
| uLong flag; /* flag of the file currently writing */ |
| |
| int method; /* compression method of file currenty wr.*/ |
| int raw; /* 1 for directly writing raw data */ |
| Byte buffered_data[Z_BUFSIZE];/* buffer contain compressed data to be writ*/ |
| uLong dosDate; |
| uLong crc32; |
| int encrypt; |
| #ifndef NOCRYPT |
| unsigned long keys[3]; /* keys defining the pseudo-random sequence */ |
| const unsigned long* pcrc_32_tab; |
| int crypt_header_size; |
| #endif |
| } curfile_info; |
| |
| typedef struct |
| { |
| zlib_filefunc_def z_filefunc; |
| voidpf filestream; /* io structore of the zipfile */ |
| linkedlist_data central_dir;/* datablock with central dir in construction*/ |
| int in_opened_file_inzip; /* 1 if a file in the zip is currently writ.*/ |
| curfile_info ci; /* info on the file curretly writing */ |
| |
| uLong begin_pos; /* position of the beginning of the zipfile */ |
| uLong add_position_when_writting_offset; |
| uLong number_entry; |
| #ifndef NO_ADDFILEINEXISTINGZIP |
| char *globalcomment; |
| #endif |
| } zip_internal; |
| |
| |
| |
| #ifndef NOCRYPT |
| #define INCLUDECRYPTINGCODE_IFCRYPTALLOWED |
| #include "crypt.h" |
| #endif |
| |
| local linkedlist_datablock_internal* allocate_new_datablock() |
| { |
| linkedlist_datablock_internal* ldi; |
| ldi = (linkedlist_datablock_internal*) |
| ALLOC(sizeof(linkedlist_datablock_internal)); |
| if (ldi!=NULL) |
| { |
| ldi->next_datablock = NULL ; |
| ldi->filled_in_this_block = 0 ; |
| ldi->avail_in_this_block = SIZEDATA_INDATABLOCK ; |
| } |
| return ldi; |
| } |
| |
| local void free_datablock(ldi) |
| linkedlist_datablock_internal* ldi; |
| { |
| while (ldi!=NULL) |
| { |
| linkedlist_datablock_internal* ldinext = ldi->next_datablock; |
| TRYFREE(ldi); |
| ldi = ldinext; |
| } |
| } |
| |
| local void init_linkedlist(ll) |
| linkedlist_data* ll; |
| { |
| ll->first_block = ll->last_block = NULL; |
| } |
| |
| local void free_linkedlist(ll) |
| linkedlist_data* ll; |
| { |
| free_datablock(ll->first_block); |
| ll->first_block = ll->last_block = NULL; |
| } |
| |
| |
| local int add_data_in_datablock(ll,buf,len) |
| linkedlist_data* ll; |
| const void* buf; |
| uLong len; |
| { |
| linkedlist_datablock_internal* ldi; |
| const unsigned char* from_copy; |
| |
| if (ll==NULL) |
| return ZIP_INTERNALERROR; |
| |
| if (ll->last_block == NULL) |
| { |
| ll->first_block = ll->last_block = allocate_new_datablock(); |
| if (ll->first_block == NULL) |
| return ZIP_INTERNALERROR; |
| } |
| |
| ldi = ll->last_block; |
| from_copy = (unsigned char*)buf; |
| |
| while (len>0) |
| { |
| uInt copy_this; |
| uInt i; |
| unsigned char* to_copy; |
| |
| if (ldi->avail_in_this_block==0) |
| { |
| ldi->next_datablock = allocate_new_datablock(); |
| if (ldi->next_datablock == NULL) |
| return ZIP_INTERNALERROR; |
| ldi = ldi->next_datablock ; |
| ll->last_block = ldi; |
| } |
| |
| if (ldi->avail_in_this_block < len) |
| copy_this = (uInt)ldi->avail_in_this_block; |
| else |
| copy_this = (uInt)len; |
| |
| to_copy = &(ldi->data[ldi->filled_in_this_block]); |
| |
| for (i=0;i<copy_this;i++) |
| *(to_copy+i)=*(from_copy+i); |
| |
| ldi->filled_in_this_block += copy_this; |
| ldi->avail_in_this_block -= copy_this; |
| from_copy += copy_this ; |
| len -= copy_this; |
| } |
| return ZIP_OK; |
| } |
| |
| |
| |
| /****************************************************************************/ |
| |
| #ifndef NO_ADDFILEINEXISTINGZIP |
| /* =========================================================================== |
| Inputs a long in LSB order to the given file |
| nbByte == 1, 2 or 4 (byte, short or long) |
| */ |
| |
| local int ziplocal_putValue OF((const zlib_filefunc_def* pzlib_filefunc_def, |
| voidpf filestream, uLong x, int nbByte)); |
| local int ziplocal_putValue (pzlib_filefunc_def, filestream, x, nbByte) |
| const zlib_filefunc_def* pzlib_filefunc_def; |
| voidpf filestream; |
| uLong x; |
| int nbByte; |
| { |
| unsigned char buf[4]; |
| int n; |
| for (n = 0; n < nbByte; n++) |
| { |
| buf[n] = (unsigned char)(x & 0xff); |
| x >>= 8; |
| } |
| if (x != 0) |
| { /* data overflow - hack for ZIP64 (X Roche) */ |
| for (n = 0; n < nbByte; n++) |
| { |
| buf[n] = 0xff; |
| } |
| } |
| |
| if (ZWRITE(*pzlib_filefunc_def,filestream,buf,nbByte)!=(uLong)nbByte) |
| return ZIP_ERRNO; |
| else |
| return ZIP_OK; |
| } |
| |
| local void ziplocal_putValue_inmemory OF((void* dest, uLong x, int nbByte)); |
| local void ziplocal_putValue_inmemory (dest, x, nbByte) |
| void* dest; |
| uLong x; |
| int nbByte; |
| { |
| unsigned char* buf=(unsigned char*)dest; |
| int n; |
| for (n = 0; n < nbByte; n++) { |
| buf[n] = (unsigned char)(x & 0xff); |
| x >>= 8; |
| } |
| |
| if (x != 0) |
| { /* data overflow - hack for ZIP64 */ |
| for (n = 0; n < nbByte; n++) |
| { |
| buf[n] = 0xff; |
| } |
| } |
| } |
| |
| /****************************************************************************/ |
| |
| |
| local uLong ziplocal_TmzDateToDosDate(ptm,dosDate) |
| const tm_zip* ptm; |
| uLong dosDate; |
| { |
| uLong year = (uLong)ptm->tm_year; |
| if (year>1980) |
| year-=1980; |
| else if (year>80) |
| year-=80; |
| return |
| (uLong) (((ptm->tm_mday) + (32 * (ptm->tm_mon+1)) + (512 * year)) << 16) | |
| ((ptm->tm_sec/2) + (32* ptm->tm_min) + (2048 * (uLong)ptm->tm_hour)); |
| } |
| |
| |
| /****************************************************************************/ |
| |
| local int ziplocal_getByte OF(( |
| const zlib_filefunc_def* pzlib_filefunc_def, |
| voidpf filestream, |
| int *pi)); |
| |
| local int ziplocal_getByte(pzlib_filefunc_def,filestream,pi) |
| const zlib_filefunc_def* pzlib_filefunc_def; |
| voidpf filestream; |
| int *pi; |
| { |
| unsigned char c; |
| int err = (int)ZREAD(*pzlib_filefunc_def,filestream,&c,1); |
| if (err==1) |
| { |
| *pi = (int)c; |
| return ZIP_OK; |
| } |
| else |
| { |
| if (ZERROR(*pzlib_filefunc_def,filestream)) |
| return ZIP_ERRNO; |
| else |
| return ZIP_EOF; |
| } |
| } |
| |
| |
| /* =========================================================================== |
| Reads a long in LSB order from the given gz_stream. Sets |
| */ |
| local int ziplocal_getShort OF(( |
| const zlib_filefunc_def* pzlib_filefunc_def, |
| voidpf filestream, |
| uLong *pX)); |
| |
| local int ziplocal_getShort (pzlib_filefunc_def,filestream,pX) |
| const zlib_filefunc_def* pzlib_filefunc_def; |
| voidpf filestream; |
| uLong *pX; |
| { |
| uLong x ; |
| int i; |
| int err; |
| |
| err = ziplocal_getByte(pzlib_filefunc_def,filestream,&i); |
| x = (uLong)i; |
| |
| if (err==ZIP_OK) |
| err = ziplocal_getByte(pzlib_filefunc_def,filestream,&i); |
| x += ((uLong)i)<<8; |
| |
| if (err==ZIP_OK) |
| *pX = x; |
| else |
| *pX = 0; |
| return err; |
| } |
| |
| local int ziplocal_getLong OF(( |
| const zlib_filefunc_def* pzlib_filefunc_def, |
| voidpf filestream, |
| uLong *pX)); |
| |
| local int ziplocal_getLong (pzlib_filefunc_def,filestream,pX) |
| const zlib_filefunc_def* pzlib_filefunc_def; |
| voidpf filestream; |
| uLong *pX; |
| { |
| uLong x ; |
| int i; |
| int err; |
| |
| err = ziplocal_getByte(pzlib_filefunc_def,filestream,&i); |
| x = (uLong)i; |
| |
| if (err==ZIP_OK) |
| err = ziplocal_getByte(pzlib_filefunc_def,filestream,&i); |
| x += ((uLong)i)<<8; |
| |
| if (err==ZIP_OK) |
| err = ziplocal_getByte(pzlib_filefunc_def,filestream,&i); |
| x += ((uLong)i)<<16; |
| |
| if (err==ZIP_OK) |
| err = ziplocal_getByte(pzlib_filefunc_def,filestream,&i); |
| x += ((uLong)i)<<24; |
| |
| if (err==ZIP_OK) |
| *pX = x; |
| else |
| *pX = 0; |
| return err; |
| } |
| |
| #ifndef BUFREADCOMMENT |
| #define BUFREADCOMMENT (0x400) |
| #endif |
| /* |
| Locate the Central directory of a zipfile (at the end, just before |
| the global comment) |
| */ |
| local uLong ziplocal_SearchCentralDir OF(( |
| const zlib_filefunc_def* pzlib_filefunc_def, |
| voidpf filestream)); |
| |
| local uLong ziplocal_SearchCentralDir(pzlib_filefunc_def,filestream) |
| const zlib_filefunc_def* pzlib_filefunc_def; |
| voidpf filestream; |
| { |
| unsigned char* buf; |
| uLong uSizeFile; |
| uLong uBackRead; |
| uLong uMaxBack=0xffff; /* maximum size of global comment */ |
| uLong uPosFound=0; |
| |
| if (ZSEEK(*pzlib_filefunc_def,filestream,0,ZLIB_FILEFUNC_SEEK_END) != 0) |
| return 0; |
| |
| |
| uSizeFile = ZTELL(*pzlib_filefunc_def,filestream); |
| |
| if (uMaxBack>uSizeFile) |
| uMaxBack = uSizeFile; |
| |
| buf = (unsigned char*)ALLOC(BUFREADCOMMENT+4); |
| if (buf==NULL) |
| return 0; |
| |
| uBackRead = 4; |
| while (uBackRead<uMaxBack) |
| { |
| uLong uReadSize,uReadPos ; |
| int i; |
| if (uBackRead+BUFREADCOMMENT>uMaxBack) |
| uBackRead = uMaxBack; |
| else |
| uBackRead+=BUFREADCOMMENT; |
| uReadPos = uSizeFile-uBackRead ; |
| |
| uReadSize = ((BUFREADCOMMENT+4) < (uSizeFile-uReadPos)) ? |
| (BUFREADCOMMENT+4) : (uSizeFile-uReadPos); |
| if (ZSEEK(*pzlib_filefunc_def,filestream,uReadPos,ZLIB_FILEFUNC_SEEK_SET)!=0) |
| break; |
| |
| if (ZREAD(*pzlib_filefunc_def,filestream,buf,uReadSize)!=uReadSize) |
| break; |
| |
| for (i=(int)uReadSize-3; (i--)>0;) |
| if (((*(buf+i))==0x50) && ((*(buf+i+1))==0x4b) && |
| ((*(buf+i+2))==0x05) && ((*(buf+i+3))==0x06)) |
| { |
| uPosFound = uReadPos+i; |
| break; |
| } |
| |
| if (uPosFound!=0) |
| break; |
| } |
| TRYFREE(buf); |
| return uPosFound; |
| } |
| #endif /* !NO_ADDFILEINEXISTINGZIP*/ |
| |
| /************************************************************/ |
| extern zipFile ZEXPORT zipOpen2 (pathname, append, globalcomment, pzlib_filefunc_def) |
| const char *pathname; |
| int append; |
| zipcharpc* globalcomment; |
| zlib_filefunc_def* pzlib_filefunc_def; |
| { |
| zip_internal ziinit; |
| zip_internal* zi; |
| int err=ZIP_OK; |
| |
| |
| if (pzlib_filefunc_def==NULL) |
| fill_fopen_filefunc(&ziinit.z_filefunc); |
| else |
| ziinit.z_filefunc = *pzlib_filefunc_def; |
| |
| ziinit.filestream = (*(ziinit.z_filefunc.zopen_file)) |
| (ziinit.z_filefunc.opaque, |
| pathname, |
| (append == APPEND_STATUS_CREATE) ? |
| (ZLIB_FILEFUNC_MODE_READ | ZLIB_FILEFUNC_MODE_WRITE | ZLIB_FILEFUNC_MODE_CREATE) : |
| (ZLIB_FILEFUNC_MODE_READ | ZLIB_FILEFUNC_MODE_WRITE | ZLIB_FILEFUNC_MODE_EXISTING)); |
| |
| if (ziinit.filestream == NULL) |
| return NULL; |
| ziinit.begin_pos = ZTELL(ziinit.z_filefunc,ziinit.filestream); |
| ziinit.in_opened_file_inzip = 0; |
| ziinit.ci.stream_initialised = 0; |
| ziinit.number_entry = 0; |
| ziinit.add_position_when_writting_offset = 0; |
| init_linkedlist(&(ziinit.central_dir)); |
| |
| |
| zi = (zip_internal*)ALLOC(sizeof(zip_internal)); |
| if (zi==NULL) |
| { |
| ZCLOSE(ziinit.z_filefunc,ziinit.filestream); |
| return NULL; |
| } |
| |
| /* now we add file in a zipfile */ |
| # ifndef NO_ADDFILEINEXISTINGZIP |
| ziinit.globalcomment = NULL; |
| if (append == APPEND_STATUS_ADDINZIP) |
| { |
| uLong byte_before_the_zipfile;/* byte before the zipfile, (>0 for sfx)*/ |
| |
| uLong size_central_dir; /* size of the central directory */ |
| uLong offset_central_dir; /* offset of start of central directory */ |
| uLong central_pos,uL; |
| |
| uLong number_disk; /* number of the current dist, used for |
| spaning ZIP, unsupported, always 0*/ |
| uLong number_disk_with_CD; /* number the the disk with central dir, used |
| for spaning ZIP, unsupported, always 0*/ |
| uLong number_entry; |
| uLong number_entry_CD; /* total number of entries in |
| the central dir |
| (same than number_entry on nospan) */ |
| uLong size_comment; |
| |
| central_pos = ziplocal_SearchCentralDir(&ziinit.z_filefunc,ziinit.filestream); |
| if (central_pos==0) |
| err=ZIP_ERRNO; |
| |
| if (ZSEEK(ziinit.z_filefunc, ziinit.filestream, |
| central_pos,ZLIB_FILEFUNC_SEEK_SET)!=0) |
| err=ZIP_ERRNO; |
| |
| /* the signature, already checked */ |
| if (ziplocal_getLong(&ziinit.z_filefunc, ziinit.filestream,&uL)!=ZIP_OK) |
| err=ZIP_ERRNO; |
| |
| /* number of this disk */ |
| if (ziplocal_getShort(&ziinit.z_filefunc, ziinit.filestream,&number_disk)!=ZIP_OK) |
| err=ZIP_ERRNO; |
| |
| /* number of the disk with the start of the central directory */ |
| if (ziplocal_getShort(&ziinit.z_filefunc, ziinit.filestream,&number_disk_with_CD)!=ZIP_OK) |
| err=ZIP_ERRNO; |
| |
| /* total number of entries in the central dir on this disk */ |
| if (ziplocal_getShort(&ziinit.z_filefunc, ziinit.filestream,&number_entry)!=ZIP_OK) |
| err=ZIP_ERRNO; |
| |
| /* total number of entries in the central dir */ |
| if (ziplocal_getShort(&ziinit.z_filefunc, ziinit.filestream,&number_entry_CD)!=ZIP_OK) |
| err=ZIP_ERRNO; |
| |
| if ((number_entry_CD!=number_entry) || |
| (number_disk_with_CD!=0) || |
| (number_disk!=0)) |
| err=ZIP_BADZIPFILE; |
| |
| /* size of the central directory */ |
| if (ziplocal_getLong(&ziinit.z_filefunc, ziinit.filestream,&size_central_dir)!=ZIP_OK) |
| err=ZIP_ERRNO; |
| |
| /* offset of start of central directory with respect to the |
| starting disk number */ |
| if (ziplocal_getLong(&ziinit.z_filefunc, ziinit.filestream,&offset_central_dir)!=ZIP_OK) |
| err=ZIP_ERRNO; |
| |
| /* zipfile global comment length */ |
| if (ziplocal_getShort(&ziinit.z_filefunc, ziinit.filestream,&size_comment)!=ZIP_OK) |
| err=ZIP_ERRNO; |
| |
| if ((central_pos<offset_central_dir+size_central_dir) && |
| (err==ZIP_OK)) |
| err=ZIP_BADZIPFILE; |
| |
| if (err!=ZIP_OK) |
| { |
| ZCLOSE(ziinit.z_filefunc, ziinit.filestream); |
| return NULL; |
| } |
| |
| if (size_comment>0) |
| { |
| ziinit.globalcomment = ALLOC(size_comment+1); |
| if (ziinit.globalcomment) |
| { |
| size_comment = ZREAD(ziinit.z_filefunc, ziinit.filestream,ziinit.globalcomment,size_comment); |
| ziinit.globalcomment[size_comment]=0; |
| } |
| } |
| |
| byte_before_the_zipfile = central_pos - |
| (offset_central_dir+size_central_dir); |
| ziinit.add_position_when_writting_offset = byte_before_the_zipfile; |
| |
| { |
| uLong size_central_dir_to_read = size_central_dir; |
| size_t buf_size = SIZEDATA_INDATABLOCK; |
| void* buf_read = (void*)ALLOC(buf_size); |
| if (ZSEEK(ziinit.z_filefunc, ziinit.filestream, |
| offset_central_dir + byte_before_the_zipfile, |
| ZLIB_FILEFUNC_SEEK_SET) != 0) |
| err=ZIP_ERRNO; |
| |
| while ((size_central_dir_to_read>0) && (err==ZIP_OK)) |
| { |
| uLong read_this = SIZEDATA_INDATABLOCK; |
| if (read_this > size_central_dir_to_read) |
| read_this = size_central_dir_to_read; |
| if (ZREAD(ziinit.z_filefunc, ziinit.filestream,buf_read,read_this) != read_this) |
| err=ZIP_ERRNO; |
| |
| if (err==ZIP_OK) |
| err = add_data_in_datablock(&ziinit.central_dir,buf_read, |
| (uLong)read_this); |
| size_central_dir_to_read-=read_this; |
| } |
| TRYFREE(buf_read); |
| } |
| ziinit.begin_pos = byte_before_the_zipfile; |
| ziinit.number_entry = number_entry_CD; |
| |
| if (ZSEEK(ziinit.z_filefunc, ziinit.filestream, |
| offset_central_dir+byte_before_the_zipfile,ZLIB_FILEFUNC_SEEK_SET)!=0) |
| err=ZIP_ERRNO; |
| } |
| |
| if (globalcomment) |
| { |
| *globalcomment = ziinit.globalcomment; |
| } |
| # endif /* !NO_ADDFILEINEXISTINGZIP*/ |
| |
| if (err != ZIP_OK) |
| { |
| # ifndef NO_ADDFILEINEXISTINGZIP |
| TRYFREE(ziinit.globalcomment); |
| # endif /* !NO_ADDFILEINEXISTINGZIP*/ |
| TRYFREE(zi); |
| return NULL; |
| } |
| else |
| { |
| *zi = ziinit; |
| return (zipFile)zi; |
| } |
| } |
| |
| extern zipFile ZEXPORT zipOpen (pathname, append) |
| const char *pathname; |
| int append; |
| { |
| return zipOpen2(pathname,append,NULL,NULL); |
| } |
| |
| extern int ZEXPORT zipOpenNewFileInZip3 (file, filename, zipfi, |
| extrafield_local, size_extrafield_local, |
| extrafield_global, size_extrafield_global, |
| comment, method, level, raw, |
| windowBits, memLevel, strategy, |
| password, crcForCrypting) |
| zipFile file; |
| const char* filename; |
| const zip_fileinfo* zipfi; |
| const void* extrafield_local; |
| uInt size_extrafield_local; |
| const void* extrafield_global; |
| uInt size_extrafield_global; |
| const char* comment; |
| int method; |
| int level; |
| int raw; |
| int windowBits; |
| int memLevel; |
| int strategy; |
| const char* password; |
| uLong crcForCrypting; |
| { |
| zip_internal* zi; |
| uInt size_filename; |
| uInt size_comment; |
| uInt i; |
| int err = ZIP_OK; |
| |
| # ifdef NOCRYPT |
| if (password != NULL) |
| return ZIP_PARAMERROR; |
| # endif |
| |
| if (file == NULL) |
| return ZIP_PARAMERROR; |
| if ((method!=0) && (method!=Z_DEFLATED)) |
| return ZIP_PARAMERROR; |
| |
| zi = (zip_internal*)file; |
| |
| if (zi->in_opened_file_inzip == 1) |
| { |
| err = zipCloseFileInZip (file); |
| if (err != ZIP_OK) |
| return err; |
| } |
| |
| |
| if (filename==NULL) |
| filename="-"; |
| |
| if (comment==NULL) |
| size_comment = 0; |
| else |
| size_comment = (uInt)strlen(comment); |
| |
| size_filename = (uInt)strlen(filename); |
| |
| if (zipfi == NULL) |
| zi->ci.dosDate = 0; |
| else |
| { |
| if (zipfi->dosDate != 0) |
| zi->ci.dosDate = zipfi->dosDate; |
| else zi->ci.dosDate = ziplocal_TmzDateToDosDate(&zipfi->tmz_date,zipfi->dosDate); |
| } |
| |
| zi->ci.flag = 0; |
| if ((level==8) || (level==9)) |
| zi->ci.flag |= 2; |
| if ((level==2)) |
| zi->ci.flag |= 4; |
| if ((level==1)) |
| zi->ci.flag |= 6; |
| if (password != NULL) |
| zi->ci.flag |= 1; |
| |
| zi->ci.crc32 = 0; |
| zi->ci.method = method; |
| zi->ci.encrypt = 0; |
| zi->ci.stream_initialised = 0; |
| zi->ci.pos_in_buffered_data = 0; |
| zi->ci.raw = raw; |
| zi->ci.pos_local_header = ZTELL(zi->z_filefunc,zi->filestream) ; |
| zi->ci.size_centralheader = SIZECENTRALHEADER + size_filename + |
| size_extrafield_global + size_comment; |
| zi->ci.central_header = (char*)ALLOC((uInt)zi->ci.size_centralheader); |
| |
| ziplocal_putValue_inmemory(zi->ci.central_header,(uLong)CENTRALHEADERMAGIC,4); |
| /* version info */ |
| ziplocal_putValue_inmemory(zi->ci.central_header+4,(uLong)VERSIONMADEBY,2); |
| ziplocal_putValue_inmemory(zi->ci.central_header+6,(uLong)20,2); |
| ziplocal_putValue_inmemory(zi->ci.central_header+8,(uLong)zi->ci.flag,2); |
| ziplocal_putValue_inmemory(zi->ci.central_header+10,(uLong)zi->ci.method,2); |
| ziplocal_putValue_inmemory(zi->ci.central_header+12,(uLong)zi->ci.dosDate,4); |
| ziplocal_putValue_inmemory(zi->ci.central_header+16,(uLong)0,4); /*crc*/ |
| ziplocal_putValue_inmemory(zi->ci.central_header+20,(uLong)0,4); /*compr size*/ |
| ziplocal_putValue_inmemory(zi->ci.central_header+24,(uLong)0,4); /*uncompr size*/ |
| ziplocal_putValue_inmemory(zi->ci.central_header+28,(uLong)size_filename,2); |
| ziplocal_putValue_inmemory(zi->ci.central_header+30,(uLong)size_extrafield_global,2); |
| ziplocal_putValue_inmemory(zi->ci.central_header+32,(uLong)size_comment,2); |
| ziplocal_putValue_inmemory(zi->ci.central_header+34,(uLong)0,2); /*disk nm start*/ |
| |
| if (zipfi==NULL) |
| ziplocal_putValue_inmemory(zi->ci.central_header+36,(uLong)0,2); |
| else |
| ziplocal_putValue_inmemory(zi->ci.central_header+36,(uLong)zipfi->internal_fa,2); |
| |
| if (zipfi==NULL) |
| ziplocal_putValue_inmemory(zi->ci.central_header+38,(uLong)0,4); |
| else |
| ziplocal_putValue_inmemory(zi->ci.central_header+38,(uLong)zipfi->external_fa,4); |
| |
| ziplocal_putValue_inmemory(zi->ci.central_header+42,(uLong)zi->ci.pos_local_header- zi->add_position_when_writting_offset,4); |
| |
| for (i=0;i<size_filename;i++) |
| *(zi->ci.central_header+SIZECENTRALHEADER+i) = *(filename+i); |
| |
| for (i=0;i<size_extrafield_global;i++) |
| *(zi->ci.central_header+SIZECENTRALHEADER+size_filename+i) = |
| *(((const char*)extrafield_global)+i); |
| |
| for (i=0;i<size_comment;i++) |
| *(zi->ci.central_header+SIZECENTRALHEADER+size_filename+ |
| size_extrafield_global+i) = *(comment+i); |
| if (zi->ci.central_header == NULL) |
| return ZIP_INTERNALERROR; |
| |
| /* write the local header */ |
| err = ziplocal_putValue(&zi->z_filefunc,zi->filestream,(uLong)LOCALHEADERMAGIC,4); |
| |
| if (err==ZIP_OK) |
| err = ziplocal_putValue(&zi->z_filefunc,zi->filestream,(uLong)20,2);/* version needed to extract */ |
| if (err==ZIP_OK) |
| err = ziplocal_putValue(&zi->z_filefunc,zi->filestream,(uLong)zi->ci.flag,2); |
| |
| if (err==ZIP_OK) |
| err = ziplocal_putValue(&zi->z_filefunc,zi->filestream,(uLong)zi->ci.method,2); |
| |
| if (err==ZIP_OK) |
| err = ziplocal_putValue(&zi->z_filefunc,zi->filestream,(uLong)zi->ci.dosDate,4); |
| |
| if (err==ZIP_OK) |
| err = ziplocal_putValue(&zi->z_filefunc,zi->filestream,(uLong)0,4); /* crc 32, unknown */ |
| if (err==ZIP_OK) |
| err = ziplocal_putValue(&zi->z_filefunc,zi->filestream,(uLong)0,4); /* compressed size, unknown */ |
| if (err==ZIP_OK) |
| err = ziplocal_putValue(&zi->z_filefunc,zi->filestream,(uLong)0,4); /* uncompressed size, unknown */ |
| |
| if (err==ZIP_OK) |
| err = ziplocal_putValue(&zi->z_filefunc,zi->filestream,(uLong)size_filename,2); |
| |
| if (err==ZIP_OK) |
| err = ziplocal_putValue(&zi->z_filefunc,zi->filestream,(uLong)size_extrafield_local,2); |
| |
| if ((err==ZIP_OK) && (size_filename>0)) |
| if (ZWRITE(zi->z_filefunc,zi->filestream,filename,size_filename)!=size_filename) |
| err = ZIP_ERRNO; |
| |
| if ((err==ZIP_OK) && (size_extrafield_local>0)) |
| if (ZWRITE(zi->z_filefunc,zi->filestream,extrafield_local,size_extrafield_local) |
| !=size_extrafield_local) |
| err = ZIP_ERRNO; |
| |
| zi->ci.stream.avail_in = (uInt)0; |
| zi->ci.stream.avail_out = (uInt)Z_BUFSIZE; |
| zi->ci.stream.next_out = zi->ci.buffered_data; |
| zi->ci.stream.total_in = 0; |
| zi->ci.stream.total_out = 0; |
| |
| if ((err==ZIP_OK) && (zi->ci.method == Z_DEFLATED) && (!zi->ci.raw)) |
| { |
| zi->ci.stream.zalloc = (alloc_func)0; |
| zi->ci.stream.zfree = (free_func)0; |
| zi->ci.stream.opaque = (voidpf)0; |
| |
| if (windowBits>0) |
| windowBits = -windowBits; |
| |
| err = deflateInit2(&zi->ci.stream, level, |
| Z_DEFLATED, windowBits, memLevel, strategy); |
| |
| if (err==Z_OK) |
| zi->ci.stream_initialised = 1; |
| } |
| # ifndef NOCRYPT |
| zi->ci.crypt_header_size = 0; |
| if ((err==Z_OK) && (password != NULL)) |
| { |
| unsigned char bufHead[RAND_HEAD_LEN]; |
| unsigned int sizeHead; |
| zi->ci.encrypt = 1; |
| zi->ci.pcrc_32_tab = get_crc_table(); |
| /*init_keys(password,zi->ci.keys,zi->ci.pcrc_32_tab);*/ |
| |
| sizeHead=crypthead(password,bufHead,RAND_HEAD_LEN,zi->ci.keys,zi->ci.pcrc_32_tab,crcForCrypting); |
| zi->ci.crypt_header_size = sizeHead; |
| |
| if (ZWRITE(zi->z_filefunc,zi->filestream,bufHead,sizeHead) != sizeHead) |
| err = ZIP_ERRNO; |
| } |
| # endif |
| |
| if (err==Z_OK) |
| zi->in_opened_file_inzip = 1; |
| return err; |
| } |
| |
| extern int ZEXPORT zipOpenNewFileInZip2(file, filename, zipfi, |
| extrafield_local, size_extrafield_local, |
| extrafield_global, size_extrafield_global, |
| comment, method, level, raw) |
| zipFile file; |
| const char* filename; |
| const zip_fileinfo* zipfi; |
| const void* extrafield_local; |
| uInt size_extrafield_local; |
| const void* extrafield_global; |
| uInt size_extrafield_global; |
| const char* comment; |
| int method; |
| int level; |
| int raw; |
| { |
| return zipOpenNewFileInZip3 (file, filename, zipfi, |
| extrafield_local, size_extrafield_local, |
| extrafield_global, size_extrafield_global, |
| comment, method, level, raw, |
| -MAX_WBITS, DEF_MEM_LEVEL, Z_DEFAULT_STRATEGY, |
| NULL, 0); |
| } |
| |
| extern int ZEXPORT zipOpenNewFileInZip (file, filename, zipfi, |
| extrafield_local, size_extrafield_local, |
| extrafield_global, size_extrafield_global, |
| comment, method, level) |
| zipFile file; |
| const char* filename; |
| const zip_fileinfo* zipfi; |
| const void* extrafield_local; |
| uInt size_extrafield_local; |
| const void* extrafield_global; |
| uInt size_extrafield_global; |
| const char* comment; |
| int method; |
| int level; |
| { |
| return zipOpenNewFileInZip2 (file, filename, zipfi, |
| extrafield_local, size_extrafield_local, |
| extrafield_global, size_extrafield_global, |
| comment, method, level, 0); |
| } |
| |
| local int zipFlushWriteBuffer(zi) |
| zip_internal* zi; |
| { |
| int err=ZIP_OK; |
| |
| if (zi->ci.encrypt != 0) |
| { |
| #ifndef NOCRYPT |
| uInt i; |
| int t; |
| for (i=0;i<zi->ci.pos_in_buffered_data;i++) |
| zi->ci.buffered_data[i] = zencode(zi->ci.keys, zi->ci.pcrc_32_tab, |
| zi->ci.buffered_data[i],t); |
| #endif |
| } |
| if (ZWRITE(zi->z_filefunc,zi->filestream,zi->ci.buffered_data,zi->ci.pos_in_buffered_data) |
| !=zi->ci.pos_in_buffered_data) |
| err = ZIP_ERRNO; |
| zi->ci.pos_in_buffered_data = 0; |
| return err; |
| } |
| |
| extern int ZEXPORT zipWriteInFileInZip (file, buf, len) |
| zipFile file; |
| const void* buf; |
| unsigned len; |
| { |
| zip_internal* zi; |
| int err=ZIP_OK; |
| |
| if (file == NULL) |
| return ZIP_PARAMERROR; |
| zi = (zip_internal*)file; |
| |
| if (zi->in_opened_file_inzip == 0) |
| return ZIP_PARAMERROR; |
| |
| zi->ci.stream.next_in = (void*)buf; |
| zi->ci.stream.avail_in = len; |
| zi->ci.crc32 = crc32(zi->ci.crc32,buf,len); |
| |
| while ((err==ZIP_OK) && (zi->ci.stream.avail_in>0)) |
| { |
| if (zi->ci.stream.avail_out == 0) |
| { |
| if (zipFlushWriteBuffer(zi) == ZIP_ERRNO) |
| err = ZIP_ERRNO; |
| zi->ci.stream.avail_out = (uInt)Z_BUFSIZE; |
| zi->ci.stream.next_out = zi->ci.buffered_data; |
| } |
| |
| |
| if(err != ZIP_OK) |
| break; |
| |
| if ((zi->ci.method == Z_DEFLATED) && (!zi->ci.raw)) |
| { |
| uLong uTotalOutBefore = zi->ci.stream.total_out; |
| err=deflate(&zi->ci.stream, Z_NO_FLUSH); |
| zi->ci.pos_in_buffered_data += (uInt)(zi->ci.stream.total_out - uTotalOutBefore) ; |
| |
| } |
| else |
| { |
| uInt copy_this,i; |
| if (zi->ci.stream.avail_in < zi->ci.stream.avail_out) |
| copy_this = zi->ci.stream.avail_in; |
| else |
| copy_this = zi->ci.stream.avail_out; |
| for (i=0;i<copy_this;i++) |
| *(((char*)zi->ci.stream.next_out)+i) = |
| *(((const char*)zi->ci.stream.next_in)+i); |
| { |
| zi->ci.stream.avail_in -= copy_this; |
| zi->ci.stream.avail_out-= copy_this; |
| zi->ci.stream.next_in+= copy_this; |
| zi->ci.stream.next_out+= copy_this; |
| zi->ci.stream.total_in+= copy_this; |
| zi->ci.stream.total_out+= copy_this; |
| zi->ci.pos_in_buffered_data += copy_this; |
| } |
| } |
| } |
| |
| return err; |
| } |
| |
| extern int ZEXPORT zipCloseFileInZipRaw (file, uncompressed_size, crc32) |
| zipFile file; |
| uLong uncompressed_size; |
| uLong crc32; |
| { |
| zip_internal* zi; |
| uLong compressed_size; |
| int err=ZIP_OK; |
| |
| if (file == NULL) |
| return ZIP_PARAMERROR; |
| zi = (zip_internal*)file; |
| |
| if (zi->in_opened_file_inzip == 0) |
| return ZIP_PARAMERROR; |
| zi->ci.stream.avail_in = 0; |
| |
| if ((zi->ci.method == Z_DEFLATED) && (!zi->ci.raw)) |
| while (err==ZIP_OK) |
| { |
| uLong uTotalOutBefore; |
| if (zi->ci.stream.avail_out == 0) |
| { |
| if (zipFlushWriteBuffer(zi) == ZIP_ERRNO) |
| err = ZIP_ERRNO; |
| zi->ci.stream.avail_out = (uInt)Z_BUFSIZE; |
| zi->ci.stream.next_out = zi->ci.buffered_data; |
| } |
| uTotalOutBefore = zi->ci.stream.total_out; |
| err=deflate(&zi->ci.stream, Z_FINISH); |
| zi->ci.pos_in_buffered_data += (uInt)(zi->ci.stream.total_out - uTotalOutBefore) ; |
| } |
| |
| if (err==Z_STREAM_END) |
| err=ZIP_OK; /* this is normal */ |
| |
| if ((zi->ci.pos_in_buffered_data>0) && (err==ZIP_OK)) |
| if (zipFlushWriteBuffer(zi)==ZIP_ERRNO) |
| err = ZIP_ERRNO; |
| |
| if ((zi->ci.method == Z_DEFLATED) && (!zi->ci.raw)) |
| { |
| err=deflateEnd(&zi->ci.stream); |
| zi->ci.stream_initialised = 0; |
| } |
| |
| if (!zi->ci.raw) |
| { |
| crc32 = (uLong)zi->ci.crc32; |
| uncompressed_size = (uLong)zi->ci.stream.total_in; |
| } |
| compressed_size = (uLong)zi->ci.stream.total_out; |
| # ifndef NOCRYPT |
| compressed_size += zi->ci.crypt_header_size; |
| # endif |
| |
| ziplocal_putValue_inmemory(zi->ci.central_header+16,crc32,4); /*crc*/ |
| ziplocal_putValue_inmemory(zi->ci.central_header+20, |
| compressed_size,4); /*compr size*/ |
| if (zi->ci.stream.data_type == Z_ASCII) |
| ziplocal_putValue_inmemory(zi->ci.central_header+36,(uLong)Z_ASCII,2); |
| ziplocal_putValue_inmemory(zi->ci.central_header+24, |
| uncompressed_size,4); /*uncompr size*/ |
| |
| if (err==ZIP_OK) |
| err = add_data_in_datablock(&zi->central_dir,zi->ci.central_header, |
| (uLong)zi->ci.size_centralheader); |
| free(zi->ci.central_header); |
| |
| if (err==ZIP_OK) |
| { |
| long cur_pos_inzip = ZTELL(zi->z_filefunc,zi->filestream); |
| if (ZSEEK(zi->z_filefunc,zi->filestream, |
| zi->ci.pos_local_header + 14,ZLIB_FILEFUNC_SEEK_SET)!=0) |
| err = ZIP_ERRNO; |
| |
| if (err==ZIP_OK) |
| err = ziplocal_putValue(&zi->z_filefunc,zi->filestream,crc32,4); /* crc 32, unknown */ |
| |
| if (err==ZIP_OK) /* compressed size, unknown */ |
| err = ziplocal_putValue(&zi->z_filefunc,zi->filestream,compressed_size,4); |
| |
| if (err==ZIP_OK) /* uncompressed size, unknown */ |
| err = ziplocal_putValue(&zi->z_filefunc,zi->filestream,uncompressed_size,4); |
| |
| if (ZSEEK(zi->z_filefunc,zi->filestream, |
| cur_pos_inzip,ZLIB_FILEFUNC_SEEK_SET)!=0) |
| err = ZIP_ERRNO; |
| } |
| |
| zi->number_entry ++; |
| zi->in_opened_file_inzip = 0; |
| |
| return err; |
| } |
| |
| extern int ZEXPORT zipCloseFileInZip (file) |
| zipFile file; |
| { |
| return zipCloseFileInZipRaw (file,0,0); |
| } |
| |
| extern int ZEXPORT zipClose (file, global_comment) |
| zipFile file; |
| const char* global_comment; |
| { |
| zip_internal* zi; |
| int err = 0; |
| uLong size_centraldir = 0; |
| uLong centraldir_pos_inzip; |
| uInt size_global_comment; |
| if (file == NULL) |
| return ZIP_PARAMERROR; |
| zi = (zip_internal*)file; |
| |
| if (zi->in_opened_file_inzip == 1) |
| { |
| err = zipCloseFileInZip (file); |
| } |
| |
| #ifndef NO_ADDFILEINEXISTINGZIP |
| if (global_comment==NULL) |
| global_comment = zi->globalcomment; |
| #endif |
| if (global_comment==NULL) |
| size_global_comment = 0; |
| else |
| size_global_comment = (uInt)strlen(global_comment); |
| |
| centraldir_pos_inzip = ZTELL(zi->z_filefunc,zi->filestream); |
| if (err==ZIP_OK) |
| { |
| linkedlist_datablock_internal* ldi = zi->central_dir.first_block ; |
| while (ldi!=NULL) |
| { |
| if ((err==ZIP_OK) && (ldi->filled_in_this_block>0)) |
| if (ZWRITE(zi->z_filefunc,zi->filestream, |
| ldi->data,ldi->filled_in_this_block) |
| !=ldi->filled_in_this_block ) |
| err = ZIP_ERRNO; |
| |
| size_centraldir += ldi->filled_in_this_block; |
| ldi = ldi->next_datablock; |
| } |
| } |
| free_datablock(zi->central_dir.first_block); |
| |
| if (err==ZIP_OK) /* Magic End */ |
| err = ziplocal_putValue(&zi->z_filefunc,zi->filestream,(uLong)ENDHEADERMAGIC,4); |
| |
| if (err==ZIP_OK) /* number of this disk */ |
| err = ziplocal_putValue(&zi->z_filefunc,zi->filestream,(uLong)0,2); |
| |
| if (err==ZIP_OK) /* number of the disk with the start of the central directory */ |
| err = ziplocal_putValue(&zi->z_filefunc,zi->filestream,(uLong)0,2); |
| |
| if (err==ZIP_OK) /* total number of entries in the central dir on this disk */ |
| err = ziplocal_putValue(&zi->z_filefunc,zi->filestream,(uLong)zi->number_entry,2); |
| |
| if (err==ZIP_OK) /* total number of entries in the central dir */ |
| err = ziplocal_putValue(&zi->z_filefunc,zi->filestream,(uLong)zi->number_entry,2); |
| |
| if (err==ZIP_OK) /* size of the central directory */ |
| err = ziplocal_putValue(&zi->z_filefunc,zi->filestream,(uLong)size_centraldir,4); |
| |
| if (err==ZIP_OK) /* offset of start of central directory with respect to the |
| starting disk number */ |
| err = ziplocal_putValue(&zi->z_filefunc,zi->filestream, |
| (uLong)(centraldir_pos_inzip - zi->add_position_when_writting_offset),4); |
| |
| if (err==ZIP_OK) /* zipfile comment length */ |
| err = ziplocal_putValue(&zi->z_filefunc,zi->filestream,(uLong)size_global_comment,2); |
| |
| if ((err==ZIP_OK) && (size_global_comment>0)) |
| if (ZWRITE(zi->z_filefunc,zi->filestream, |
| global_comment,size_global_comment) != size_global_comment) |
| err = ZIP_ERRNO; |
| |
| if (ZCLOSE(zi->z_filefunc,zi->filestream) != 0) |
| if (err == ZIP_OK) |
| err = ZIP_ERRNO; |
| |
| #ifndef NO_ADDFILEINEXISTINGZIP |
| TRYFREE(zi->globalcomment); |
| #endif |
| TRYFREE(zi); |
| |
| return err; |
| } |
