Nigel,
It looks to me like you're effectively missing a step, to convert the
bytestream file unzipped from the archive back into a "normal"
MPE file. This is because ZIP & UNZIP are posix programs and
therefore assume all files are using the HFS file system.
I tried the following test and came up with a file that matches
the original. In essence, I zipped an 80 byte fixed ascii file, then
unzipped, ran it through the FROMBYTE program and then
compared the resulting file with the original.
:purge ../GDC/ztest@;noconfirm
1 files matched
1 selected. 1 succeeded. 0 failed.
:listfile [log in to unmask],11
ACCOUNT= AUSSS GROUP= TXT
Name Access FCode RecSiz Type EOF File Limit Disk Usage Exts
-------- ERWS ----- ------ ----- ------------- ------------- --------KB -----
TEST 80 FA 5001 5001 392 7
:copy test.txt,testorig.txt
:zip '../GDC/ztest.zip ../TXT/TEST'
adding: ../TXT/TEST (deflated 97%)
:purge test.txt
:unzip '../GDC/ztest.zip'
Archive: ../GDC/ztest.zip
inflating: ../TXT/TEST
:rename test.txt, testunzp.txt
:listfile [log in to unmask],11
ACCOUNT= AUSSS GROUP= TXT
Name Access FCode RecSiz Type EOF File Limit Disk Usage Exts
-------- ERWS ----- ------ ----- ------------- ------------- --------KB -----
TESTORIG 80 FA 5001 5001 392 1
TESTUNZP 1 BA 405081 2147483647 396 4
:frombyte '../TXT/TESTUNZP ../TXT/TESTCONV'
:listfile [log in to unmask],11
ACCOUNT= AUSSS GROUP= TXT
Name Access FCode RecSiz Type EOF File Limit Disk Usage Exts
-------- ERWS ----- ------ ----- ------------- ------------- --------KB -----
TESTCONV 80 FA 5001 26843545 512 4
TESTORIG 80 FA 5001 5001 392 1
TESTUNZP 1 BA 405081 2147483647 396 4
:compare testorig.txt, testconv.txt
Compare/iX/Copyright Robelle Consulting Ltd. 1991-1994, J.Miner 1978
(Version 2.2)
Licensee: Unisuper Management Ltd
Compare/iX (Version 2.2) Match Criterion = 5 Lines
No differences in these two files
END OF PROGRAM
:
>>> Nigel Skeet <[log in to unmask]> 14/06/2005 21:32:16 >>>
Hi Listers,
Been playing with zip / unzip on the 3K and it looks like it doesn't put
back the files as it found it.
:listf xcpu@,2
ACCOUNT= SYS GROUP= MANAGER
FILENAME CODE ------------LOGICAL RECORD----------- ----SPACE----
SIZE TYP EOF LIMIT R/B SECTORS #X MX
XCPUCHNG 80B FA 318 324 16 112 1 2
:zip.hpbin.sys;info="CPUZIP XCPUCHNG"
adding: JCPUCHNG (deflated 71%)
:purge xcpuchng
:unzip.hpbin.sys;info="CPUZIP"
Archive: CPUZIP.zip
inflating: XCPUCHNG
:listf xcpu@,2
ACCOUNT= SYS GROUP= MANAGER
FILENAME CODE ------------LOGICAL RECORD----------- ----SPACE----
SIZE TYP EOF LIMIT R/B SECTORS #X MX
XCPUCHNG 1B BA 7742 2147483647 1 32 1 *
:
As you can see the size and type has changed although the file is still
readable. Is there a way to use zip / unzip and keep the same file info ?
The versions that I have are :
:zip.hpbin.sys
Copyright (C) 1990-1996 Mark Adler, Richard B. Wales, Jean-loup Gailly
Onno van der Linden and Kai Uwe Rommel. Type 'zip -L' for the software
License.
Zip 2.1 (April 27th 1996). Usage:
:unzip.hpbin.sys
UnZip 5.31 of 31 May 1997, by Info-ZIP. Maintained by Greg Roelofs. Send
bug reports to the authors at [log in to unmask]; see README for
details.
TIA,
Nige...
* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
"This e-mail message is intended only for the addressee(s)
and contains information which may be confidential. If
you are not the intended recipient please advise the
sender by return email, do not use or disclose the
contents, and delete the message and any attachments
from your system. Unless specifically indicated, this
email does not constitute formal advice or commitment
by the sender or UniSuper Limited (ABN 54 006 027 121) or its
subsidiaries.
UniSuper Management Pty Ltd (AFSL No: 235907)
* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
|