PureZIP library : ZIP / UNZIP files [password supported]

gnozal · **Posted:** Mon May 30, 2005 8:06 am

PureZIP library [ PB 3.9x-4.31 : V1.96 (FEB 25th 2009) ; PB 4.4x : V2.00 (AUG 18th 2009) ]

Overview

Code:

The purpose of PureZIP is to handle ZIP files.
It uses the ZLIB library 1.2.3 (c) 1995-2004 Jean-loup Gailly and Mark Adler modified by Gilles Vollant.

Functions
PB3.94 : http://freenet-homepage.de/gnozal/PureZIP.htm
PB4.xx : http://freenet-homepage.de/gnozal/PureZIP_.htm

Example

Code:

Procedure CallbackForTest(file.s, PerCent.f)
  Debug StrF(PerCent, 2) + "%"
EndProcedure
;
myFileinfo.PureZIP_FileInfo
PureZIP_SetProgressionCallback(@CallbackForTest())
;
MyZIP.s = "C:\PureBasic393\Program\PureZIP\essai1\test.zip"
MyFilesToZIP.s = "C:\PureBasic393\Program\PureBriefLZ\*.*"
MyZIPOutPut.s = "C:\PureBasic393\Program\PureZIP\essai3\"
; Create archive
Debug PureZIP_AddFiles(MyZIP, MyFilesToZIP, #PureZIP_StorePathAbsolute, #PureZIP_Recursive)
; Extract files from archive
Debug PureZIP_ExtractFiles(MyZIP, "*.*", MyZIPOutPut, #TRUE)
; Count files in archive
Debug PureZIP_GetFileCount(MyZIP)
; Add memory bank to archive
Debug PureZIP_AddMemory(MyZIP, "MemoryTest.txt", @MyZIP, Len(MyZIP))
; On file more in archive :
Debug PureZIP_GetFileCount(MyZIP)
; Get files information
For i = 0 To PureZIP_GetFileCount(MyZIP) - 1
   Debug PureZIP_GetFileInfo(MyZIP,i , @myFileinfo)
   Debug "Number " + Str(i)
   Debug "Filename: " + myFileinfo\FileName
   Debug "Compressed Size: " + Str(myFileinfo\CompressedSize)
   Debug "Uncompressed Size: "+ Str(myFileinfo\unCompressedSize)
   Debug "--------------"
Next

Download
Userlibrary for PB3.94 : http://freenet-homepage.de/gnozal/PureZIP.zip
Userlibrary for PB4.0x - 4.10 : http://freenet-homepage.de/gnozal/PureZIP_.zip
Userlibrary for PB4.20 : http://freenet-homepage.de/gnozal/PureZIP___.zip
Userlibrary for PB4.3x : http://freenet-homepage.de/gnozal/PureZIP_430.zip
Userlibrary for PB4.4x : http://freenet-homepage.de/gnozal/PureZIP_440.zip

Shared library (DLL) : http://freenet-homepage.de/gnozal/PureZIP_DLL.zip [based on UserLib for PB4.xx code]

dracflamloc · **Joined:** Mon Sep 20, 2004 3:52 pm **Posts:** 1646

very cool, whats your license for this

gnozal · **Posted:** Mon May 30, 2005 8:25 am

dracflamloc wrote:

very cool, whats your license for this

My license : freeware

ZLIB's license : see the help files ( RTFM :wink:

)

zikitrake · **Posted:** Mon May 30, 2005 9:07 am

Great. This facilitates much to me the work.... in my work.

Thank you

Num3 · **Posted:** Mon May 30, 2005 11:27 am

Pretty cool !

Thanks !

Bonne_den_kule · **Posted:** Mon May 30, 2005 12:40 pm

You deliver allways the best libraries.
Very good work

NoahPhense · **Posted:** Mon May 30, 2005 2:15 pm

VERY VERY nice!

- np

*edit* Where does one find Pupils Library Importer?

gnozal · **Posted:** Mon May 30, 2005 2:49 pm

NoahPhense wrote:

Where does one find Pupils Library Importer?

Here :

Pupil wrote:

Hmm, seems like i've forgotten about this, i'm sure i said something about releasing it at the time, but it never happened

i'm soo lazy

Anyway, for a limited time you can all download it from here (i don't know how long it'll be there so just grab it):
http://w1.319.telia.com/~u31913785/gnoz ... er_new.zip

The importer is a modified version of the original made by Fr34k. I've added a little workaround for LIB's with C calling convention and the possibility to save/load a project..

NoahPhense · **Posted:** Mon May 30, 2005 2:52 pm

Thanks, much apprecited.

- np

Droopy · **Joined:** Thu Sep 16, 2004 9:50 pm **Posts:** 508

Thanks a lot

Fred · **Posted:** Mon May 30, 2005 7:54 pm

Cool lib

Num3 · **Posted:** Mon May 30, 2005 8:14 pm

Okey, got these problems here...

When i created my own functions i tested them on pebuilder.iso which is 340Mb, but i can't seem to pack the same file with PureZIP_AddFiles() it always throws an error...

Funny thing is, if i pack the entire directory where pebuilder.iso is, using *.* instead of the single file name it works!

So "D:\pebuilder\*.*" works, "D:\pebuilder\pebuilder.iso" does not!

Also the page file hits eats +50mb when packing and the CPU hit's 80%, and using my pack procedure i can compress 7 extra megabytes out of the same file...

When packing large files the callback seems to output:

Quote:

0.00%
20.00%
40.00%
60.00%
80.00%
100.00%
5
20.00%
40.00%
60.00%
80.00%
100.00%

gnozal · **Posted:** Tue May 31, 2005 8:24 am

Num3 wrote:

Okey, got these problems here...

It's just V1 :oops:

- I have not tested it with big files, I didn't even think about it. Why would someone use ZIP on big files, when there is 7-ZIP :wink:

?
- The packing function is the same in PureZIP_AddFile() and PureZIP_AddFiles(), but you are right : PureZIP_AddFiles() only worked with wildcards :oops:

: it's fixed now.
- The callback function is very primitive : it is only called before each zipOpenNewFileInZip().
- "using my pack procedure i can compress 7 extra megabytes out of the same file..." : What do you mean ? Your zip file is 7 Mb smaller ? I use #Z_DEFLATED & #Z_BEST_COMPRESSION, so I don't know ...
- "Also the page file hits eats +50mb when packing and the CPU hit's 80%" : I have add some delay in the loop, tell me if it helps.

Library updated

Num3 · **Posted:** Tue May 31, 2005 2:40 pm

Sorry i didn't mean to sound critic! Your work is excellent!

I can get 7 less mb out of the file, because i'm streaming the iso and maybe, just by plain luck, this file squeazes more like this...

I'll test your changes and report back !

gnozal · **Posted:** Tue May 31, 2005 2:48 pm

Num3 wrote:

Sorry i didn't mean to sound critic! Your work is excellent!

Constructive criticism and good bug report are always wellcome

Congratulations also :lol:

Num3 wrote:

I'll test your changes and report back

Thanks. I will try to improve it, but I am no expert :wink:

PureBasic Forum

PureZIP library : ZIP / UNZIP files [password supported]

Who is online