developer toolbox » harbour

/harbour-3.0.0/contrib/hbmzip/

Harbour functions to mange ZIP files:
===================================== 

HB_ZipOpen( cFileName, [ iMode = HB_ZIP_CREATE ],
              [ @cGlobalComment ] ) --> hZip
HB_ZipClose( hZip, [ cGlobalComment ] ) --> nError
HB_ZipFileCreate( hZip, cZipName, tDateTime, cTime,
                   nInternalAttr, nExternalAttr,
                   [ nMethod = HB_ZLIB_METHOD_DEFLATE ],
                   [ nLevel = HB_ZLIB_COMPRESSION_DEFAULT ],
                   [ cPassword, ulFileCRC32 ], [ cComment ] ) --> nError
HB_ZipFileWrite( hZip, cData [, nLen ] ) --> nError
HB_ZipFileClose( hZip ) --> nError
HB_ZipStoreFile( hZip, cFileName, [ cZipName ], ;
                   [ cPassword ], [ cComment ] ) --> nError
HB_ZipStoreFileHandle( hZip, fhnd, cZipName, ;
                   [ cPassword ], [ cComment ] ) --> nError
HB_zipFileCRC32( cFileName ) --> nError

HB_UnzipOpen( cFileName ) --> hUnzip
HB_UnzipClose( hUnzip ) --> nError
HB_UnzipGlobalInfo( hUnzip, @nEntries, @cGlobalComment ) --> nError
HB_UnzipFileFirst( hUnzip ) --> nError
HB_UnzipFileNext( hUnzip ) --> nError
HB_UnzipFilePos( hUnzip ) --> nPosition
HB_UnzipFileGoto( hUnzip, nPosition ) --> nError
HB_UnzipFileInfo( hUnzip, @cZipName, @tDateTime, @cTime,
                    @nInternalAttr, @nExternalAttr,
                    @nMethod, @nSize, @nCompressedSize,
                    @lCrypted, @cComment ) --> nError
HB_UnzipFileOpen( hUnzip, [ cPassword ] ) --> nError
HB_UnzipFileRead( hUnzip, @cBuf [, nLen ] ) --> nRead
HB_UnzipFileClose( hUnzip ) --> nError
HB_UnzipExtractCurrentFile( hUnzip, [ cFileName ], [ cPassword ] ) --> nError
HB_UnzipExtractCurrentFileToHandle( hZip, fhnd, [ cPassword ] ) --> nError

HB_ZipDeleteFile( cZipFile, cFileMask ) --> nError

provjeri da li su funkcije u našim lib-ovima

napravi neki harbour playground projekat koji koristi zip.

testirao sam sada ovaj test, komapjlirao myzip.prg i myunzip.prg i testirao zipovanje i unzipovanje i to radi kako treba

bringouts-MacBook:tests bringout$ ls -l

-rw-r--r--@ 1 bringout  staff       83 Oct 19  2009 hbmk.hbm
-rwxr-xr-x  1 bringout  staff  1308896 Feb 16 10:00 myunzip
-rw-r--r--@ 1 bringout  staff     4238 Jun 21  2011 myunzip.prg
-rwxr-xr-x  1 bringout  staff  1319104 Feb 16 10:00 myzip
-rw-r--r--@ 1 bringout  staff     3854 Jun 21  2011 myzip.prg

napravio demo:

commit

međutim kompajlirati ne mogu

bringouts-MacBook:zip_demo bringout$ hbmk2 zip_demo.prg
hbmk2: Processing environment options: -compiler=gcc
Harbour 3.0.0 (Rev. 16951)
Copyright (c) 1999-2011, http://harbour-project.org/
Compiling 'zip_demo.prg'...
Lines 54, Functions/Procedures 2
Generating C source output to '/var/folders/S8/S8ESeRqfHQa9TJ84px6e-E+++TI/-Tmp-/hbmk_CFAeav.dir/zip_demo.c'... Done.
Undefined symbols:
  "_HB_FUN_HB_ZIPSTOREFILE", referenced from:
      _symbols_table in zip_demo.o
  "_HB_FUN_HB_ZIPOPEN", referenced from:
      _symbols_table in zip_demo.o
  "_HB_FUN_HB_ZIPCLOSE", referenced from:
      _symbols_table in zip_demo.o
ld: symbol(s) not found
collect2: ld returned 1 exit status
hbmk2: Error: Running linker. 1
gcc '/var/folders/S8/S8ESeRqfHQa9TJ84px6e-E+++TI/-Tmp-/hbmk_CFAeav.dir/zip_demo.o' '/var/folders/S8/S8ESeRqfHQa9TJ84px6e-E+++TI/-Tmp-/hbmk_CFAeav.dir/hbmk_AE6PCH.o'   -lhbextern -lhbdebug -lhbvm -lhbrtl -lhblang -lhbcpage -lgtcgi -lgtpca -lgtstd -lgttrm -lhbrdd -lhbuddall -lhbusrrdd -lrddntx -lrddcdx -lrddnsx -lrddfpt -lhbrdd -lhbhsx -lhbsix -lhbrtl -lhbvm -lhbmacro -lhbcplr -lhbpp -lhbcommon -lm -lz -lhbpcre   -o 'zip_demo' -L/opt/harbour/lib/harbour

obrati pažnju na .hbm, .hbp iz demo zip projekta tu je sigurno referencirana hbzip library a ti to nisi učinio.

takođe pogledaj kod drugih hb playground projekata primjere hbzip i hbm pa ćeš lahko zaključiti u čemu je problem

hbmk.hbm

ovaj fajl nisi stavio u repos

Dodao bibiloteke koje fale:

commit

ispravio hbmk.hbm i hbmzip.hbc fajlove i sada kompajliranje radi:

bringouts-MacBook:zip_demo bringout$ hbmk2 zip_demo.prg

hbmk2: Processing environment options: -compiler=gcc
hbmk2: Processing local make script: hbmk.hbm
Harbour 3.0.0 (Rev. 16951)
Copyright (c) 1999-2011, http://harbour-project.org/
Compiling 'zip_demo.prg'...
Lines 75, Functions/Procedures 2
Generating C source output to '/var/folders/S8/S8ESeRqfHQa9TJ84px6e-E+++TI/-Tmp-/hbmk_R4L9e1.dir/zip_demo.c'... Done.

Test zip-a je:

bringouts-MacBook:zip_demo bringout$ ./zip_demo

Test biblioteke mini-zip:                                                                                                                                                 
==========================

Kompresovanje u toku...

Arhiviram fajl: ./zip_demo.zip
Dodajem fajl: test1.txt       
Dodajem fajl: test2.txt
Dodajem fajl: test3.txt

kreiran fajl:  ./zip_demo.zip

E dobro, sve jasno, ali šta trebamo sada uraditi za F18 ?

Vidim, postoji f18.hbc i u njemu linkani lib-ovi.

A šta u ovom slučaju ? Navoditi direktan link do ovog contribute foldera ili ??

vjerovatno kao i hbpgsql #24717

ako bildam ovako

bringouts-MacBook:hbmzip bringout$ hbmk2 hbmzip

hbmk2: Processing environment options: -compiler=gcc
hbmk2: Dependency 'minizip' found: 3rd/minizip (local)
hbmk2: Dependency 'zlib' found: /usr/include
hbmk2: Compiling Harbour sources...
Harbour 3.0.0 (Rev. 16951)
Copyright (c) 1999-2011, http://harbour-project.org/
Compiling 'hbmzip.hbx'...
Lines 57, Functions/Procedures 1
Generating C source output to '.hbmk/darwin/gcc/hbmzip.c'... Done.
Compiling 'mziperr.prg'...
Lines 175, Functions/Procedures 2
Generating C source output to '.hbmk/darwin/gcc/mziperr.c'... Done.
hbmk2: Compiling...
hbmk2: Creating static library... libhbmzip.a

bringouts-MacBook:hbmzip bringout$ ls

3rd        hbmzip.ch    hbmzip.hbc    hbmzip.hbp    hbmzip.hbx    libhbmzip.a    mzip.c        mziperr.prg

evo, dobio sam ga libhbmzip.a fajl

bringouts-MacBook:hbmzip bringout$ cp libhbmzip.a /opt/harbour/lib/harbour/

I sada u F18.hbc dodajem i ovaj lib

I to neće... opet dobijam error kod kompajliranja.

A ha, postoji i ovaj minizip u /contrib/hbmzip/3rd/minizip folderu

I njega bildao

bringouts-MacBook:.../contrib/hbmzip/3rd/minizip bringout$ hbmk2 minizip

hbmk2: Processing environment options: -compiler=gcc
hbmk2: Dependency 'zlib' found: /usr/include
hbmk2: Compiling...
hbmk2: Creating static library... libminizip.a

pa i njega kopirao

bringouts-MacBook:minizip bringout$ cp libminizip.a /opt/harbour/lib/harbour/

pa zatim u F18.hbc dodao ovako:

libs=hbrtl hblang hbrdd hbrtl hbmacro hbpp rddcdx rddfpt rddntx
libs=hbsqlit3 sqlite3
libs=hbcommon hbct hbclipsm
libs=hbpgsql
libs=hbdebug
libs=hbmzip minizip  <<<<<<<<<<

i sada bildanje radi

Šta sada treba uraditi na ostalim mašinama ?

Imamo ove windows/linux developer instalacije.

imaš podešenu windows servisnu ona ti je za ovu opciju prioritet. A i linux - imaju build sesije na kojima imaš pristup, ali to možeš dati bjasku ako se slabije snalaziš.

ok, znači to je to

jasko i ti ovo odradi na ovim lx sesijama

Gledam sada na svojoj windows sesiji, nemam uopšte ovog contrib foldera unutar c:/knowhowERP/hbout/

Da li ovi lib-ovi koje sam pravio ovdje na mac-u mogu na windows-u ???

testirao, mogu, evo postavit ću ovdje lib-ove pa ih samo postaviti u /lib direktorij tamo gdje treba

naravno, ovo treba ubaciti i u one instalere

build-32

kopirao ove lib-ove u harbour ali !OK imam krešku kod build-a

hbmk2: Processing local make script: hbmk.hbm
hbmk2: Linking... F18
/opt/harbour/lib/harbour/libhbmzip.a: could not read symbols: Archive has no index; run ranlib to add one
collect2: ld returned 1 exit status
hbmk2: Error: Running linker. 1

mogu li ovi lib-ovi na 32bitni sistem ili posebni trebaju

kod sebe buildam bez problema

Jasmin Beganović je napisao/la:

build-32

kopirao ove lib-ove u harbour ali !OK imam krešku kod build-a

[...]

mogu li ovi lib-ovi na 32bitni sistem ili posebni trebaju

sasvim moguće, stvarno nemam pojma

dobro to ću kasnije vidjeti imam sad kod sebe build za ovo vindija testiranje

unzip_files()

Ubacio podršku za overwrite fajla.

znači

unzip_files( zip_fajl, lokacija_za_ekstrakt, file_filter[...], overwrite .f. ili .t. default )

bjasko, vsasa ovdje se desilo redmine škrabanje.

ubuntu build je ostao problematičan ali za njega nije napravljen poseban ticket. i sve je to uzeto za zatvoreno.

škrabanje je lančana reakcija, vidi vezni ticket

samo zato što neko nije prepoznao da trebamo otvoriti ticket

"ubuntu 32 bit build, zip biblioteke" ili kako već ...