[RESOLU] progression de AddPackFile

[falsam]

D'aprés un test que je viens de faire, il n'est pas possible de compresser un fichier de plus de 2 Go. Ou alors c'est l'archive qui ne peut pas être supérieur à 2 Go.

[Backup]

D'aprés un test que je viens de faire, il n'est pas possible de compresser un fichier de plus de 2 Go. Ou alors c'est l'archive qui ne peut pas être supérieur à 2 Go.

hum ....


pas besoin de faire tout un tas de test , il suffit de savoir lire ....

Extrait de la DOC

Syntaxe

UseZipPacker()
Description

Active le compresseur, le décompresseur et le support des archives Zip.
Arguments

Aucuns.
Valeur de retour

Aucune.
Remarques

L'archive créé sera compatible avec d'autres archives Zip au format 2.0.
La taille de l'archive créée peut aller jusqu'à 2GB.

la formulation n'est peut etre pas tres bien choisie , mais elle reste claire


ps : si ça marche chez G-Rom , et chez moi , ça devrai marcher chez tout le monde
vérifiez vos droits (perso je suis toujours en Admin )
et n'oubliez pas que sur 8 on ne peut pas ecrire sur C:\ .... (qu'elle idée )
perso j'ai une Partition "E:\" ou se trouve mes Purebasic


@G-rom : ben oui , une version d'essai ... (de toute façons .. pour ce que je m'en sert )


Ps:2 a la fin de la compression il peut y avoir un petit temp d'attente ... je suppose que c'est lié a l'ecriture du fichier Zip

Ps 3 : bien sur l'ajout des fichiers se fait avec les repertoires Parents (ça respecte se qui se trouve dans la liste() )

si on ne veux qu'ajouter les fichiers Sans les repertoires Parents , il suffit de faire

Code : Tout sélectionner

 AddPackFile(#Arch, Liste.s(),GetFilePart(Liste.s())) ; ajout seulement des fichiers pointés (sans les dossiers parents )

[Backup]

par contre .....

impossible chez moi d'utiliser

Code : Tout sélectionner

If OpenPack(#Arch2, "E:\Dobro\PureBasic\dobro\ExemplePerso\compression\monarchive.zip" ,#PB_PackerPlugin_Zip    ) <>0

il n'ouvre pas l'archive que j'ai pourtant créé avec Purebasic !

là, le chemin est en chaine$ , mais meme en variable , ça ne marche pas !

[TazNormand]

Bon, petit (re)test rapide suite aux remarques de Falsam :

une fois mis le source dans le dossier des images à compresser (j'utilise l'extension FireFox de RX14 qui stocke dans le dossier "temp" de FF), la compression marche, mais la jauge non, elle file tout de suite ) 100% pour 4 fichiers allant de 270Mo à 1110Mo pour un total de 644Mo. Je vois dans le dossier l'archive qui se crée (sa taille change quand on fait F5, jusqu'au message "tout a été compressé"

Elle ne s'ouvre pas avec l'explorateur Windows (W7) je pense que cela vient du fait que l'arborescence interne contient le "lecteur X:", pas de soucis sour WinRar et 7-Zip.

Par contre, niveau taux de compression...

Même fichiers sous :

• WinRar en .RAR : 446Mo
  WinRar en .zip : 502Mo
  7-Zip en .7z : 397Mo
  "PureCompress" : 500Mo

[Backup]

Elle ne s'ouvre pas avec l'explorateur Windows (W7) je pense que cela vient du fait que l'arborescence interne contient le "lecteur X:", pas de soucis sour WinRar et 7-Zip.

mon code a été changé depuis (page 1)
il faut compiler en ThreadSafe
j'ai changé la ligne qui sauvegardait dans le zip , l'arborescence
pour ne conserver QUE les fichiers ...

mon Progress bar indique la progression des fichiers compressés
mais pas la progression de la compression pour chaque fichier
ce qui fait que si tu compresses un gros fichier , la bar va faire un bond de la taille de ce fichier ...

Fred aurai du ajouter un call back pour la progression

a l'epoque (pour les anciens du forum ) j'avais fait un Prg de Back UP qui compressait en ZIP en utilisant une Librairie
"PureZip" de Gnozal ??
la fonction "PureZIP_CallbackP(File.s, PerCent.f)" permettait de pouvoir avoir la progression PENDANT la compression ...

je donne juste une solution de secours ....


toutefois une possibilité est peut être ouverte , vu qu'on peut (j'ai essayé )
explorer l'archive PENDANT la compression
donc théoriquement, on devrai pouvoir surveiller la taille d'un fichier qui change dans l'archive
mais j'ai pas envie de me lancer la dedans ....

d'autant que j'ai voulu ajouter la Decompression , et que je n'y arrive pas a cause de
la fonction "If OpenPack(#Arch2, "E:\Dobro\PureBasic\dobro\ExemplePerso\compression\monarchive.zip" ) <>0"
qui semble refuser d'ouvrir mon archive ....

[falsam]

Bon, petit (re)test rapide suite aux remarques de Falsam :

une fois mis le source dans le dossier des images à compresser (j'utilise l'extension FireFox de RX14 qui stocke dans le dossier "temp" de FF), la compression marche, mais la jauge non, elle file tout de suite ) 100% pour 4 fichiers allant de 270Mo à 1110Mo pour un total de 644Mo. Je vois dans le dossier l'archive qui se crée (sa taille change quand on fait F5, jusqu'au message "tout a été compressé"

Elle ne s'ouvre pas avec l'explorateur Windows (W7) je pense que cela vient du fait que l'arborescence interne contient le "lecteur X:", pas de soucis sour WinRar et 7-Zip.

Par contre, niveau taux de compression...

Même fichiers sous :

• WinRar en .RAR : 446Mo
  WinRar en .zip : 502Mo
  7-Zip en .7z : 397Mo
  "PureCompress" : 500Mo

Au moins ça me rassure ...... ça ne fonctionne pas on est bien d'accord. Et quand je regarde le résultat de l'arborescence avec WinRar, les bras m'en tombent !

[Backup]

[Au moins ça me rassure ...... ça ne fonctionne pas on est bien d'accord. Et quand je regarde le résultat de l'arborescence avec WinRar, les bras m'en tombent !

Ce Matin .... j'ai changé la ligne qui sauvegardait dans le zip , l'arborescence
pour ne conserver QUE les fichiers ...

.. quel ... Sphere de metal qu'on met dans les canons

[falsam]

j'ai changé la ligne qui sauvegardait dans le zip , pour ne conserver QUE les fichiers

J'avais bien lu. Mais l’intérêt était aussi de garder l'arborescence. Mais je suis d'accord, ça fonctionne de cette maniére et c'est d'ailleurs ce que j'ai fait dans un exemple que je cite dans ce même thread ... certe sans la barre de progression qui ne sert pas à grand chose à part de faire de l'esbrouffe

je fais un coup d'esbrouffe avec le Progress bar

[falsam]

Pour que ton code fonctionne Dobro il faut retirer l'unité de stockage se trouvant dans chacun des noms de fichiers.

Un bout de code sans le tintouin qui l'entoure

Code : Tout sélectionner

Enumeration
  #ZipFile
EndEnumeration

UseZipPacker()

File$ = OpenFileRequester("Sélectionner les fichiers à compresser","","",0, #PB_Requester_MultiSelection)

If file$ <> ""
  CreatePack(#ZipFile, "myzip.zip", #PB_PackerPlugin_Zip)
EndIf

While File$
  Debug Mid(File$, 4)
  AddPackFile(#ZipFile, File$, Mid(File$, 4))
  File$ = NextSelectedFileName()
Wend

ClosePack(#ZipFile)

Le fichier compressé dans ce cas est propre.

[supercdfr]

j'ai cherché un peu partout sans trouver de reponse.

Il existe bien minizip, mais il ne compresse pas les fichiers de + de 2 Go (mais le callback fonctionnait)

Je me demande : n'est-il pas possible d'utiliser le zlib ?

[Backup]

Mid(File$, 4))

oui, effectivement ça marche avec ça ...
ptete pas si con au final ....(quand tu veux)



@supercdfr

essaye PureZip de Gnozal
http://gnozal.ucoz.com/

[G-Rom]

Sinon , j'utilise PhysFS pour la compression / décompression : http://icculus.org/physfs/ , Faut pas avoir peur du site 0.1a...
C'est du C , donc adaptable facilement à PB je pense.

[Micoute]

Bonjour à tous,

j'utilise pour ma part, un logiciel de ts-soft, PurePacker, que j'ai francisé, car je ne pratique pas couramment l'anglais !
http://www.purebasic.fr/english/viewtop ... PurePacker
j'espère avoir apporté de l'eau à votre moulin !

[Backup]

je poursuis mon code ici :
http://www.purebasic.fr/french/viewtopi ... =6&t=14557

[supercdfr]

purezip ne fonctionne plus sous purebasic 5.2x
Et purepacker ne fait qu'utiliser le packer de purebasic, donc, pas de progression.