HP3000-L Archives

May 1997, Week 4

HP3000-L@RAVEN.UTC.EDU

Options: Use Monospaced Font
Show Text Part by Default
Show All Mail Headers

Message: [<< First] [< Prev] [Next >] [Last >>]
Topic: [<< First] [< Prev] [Next >] [Last >>]
Author: [<< First] [< Prev] [Next >] [Last >>]

Print Reply
Subject:
From:
Kurt Sager <[log in to unmask]>
Reply To:
Kurt Sager <[log in to unmask]>
Date:
Sun, 25 May 1997 21:17:57 +0200
Content-Type:
text/plain
Parts/Attachments:
text/plain (85 lines)
Thanks, Mark, for your suggestion about FCOPY.
If possible I dont't want to retransmit this 30 MB Files (compressed!)
over Internet again.

So if there is a way I would prefer to convert the byte stream file now
on the target
MPE 5.5 system into a new file with the original '2048 bytes per record'
.
See below what I tried ...

Kurt Sager

> ----------
> From:         Mark Klein[SMTP:[log in to unmask]]
> Sent:         Sonntag, 25. Mai 1997. 20,34
> To:   Kurt Sager
> Subject:      Re: How to reformat a byte stream file
>
> >The file TF was ftp'ed in binary mode from an HP3000 to a
> >HP-UX over a LAN, then compressed with the Unix command 'compress',
> and
> >finally ftp'ed over Internet to my HP3000/959.
Mark Klein wrote:
> Assuming you're on a 5.5 machine, you should tar the file first and
> then
> compress it. 5.5 tar is able to preserve file characteristics.
> 'frombyte
> -b TF NEWTF' converts to a fixed record length file from a byte
> stream,
> but the characteristics won't be what you really want (if I remember
> correctly, it'll be 128W records). If you don't want to tar, compress
> then
> retransmit the file, build TZNEW and use FCOPY to copy from the byte
> stream TZ to TZNEW - I think the emulator will handle that.
>
This is the 'byte stream' file I want to convert :

FILENAME  CODE  ------------LOGICAL RECORD-----------  ----SPACE----
                  SIZE  TYP        EOF      LIMIT R/B  SECTORS #X MX

TF                  1B  BA   148727915 2147483647   1   580976  *  *


I suppose the 'B' in 'BA' in the TYP column means 'byte stream'.

I build now the new file as it should be:

   :build TF2;rec=-2048,1,f,binary;disc=80000

Then FCOPY:

   :fcopy from=TF;to=TF2

HP31900A.05.02 FILE COPIER (C) HEWLETT-PACKARD CO. 1990

*200*WARNING: FROMFILE RECSIZE IS 8192 BYTES, TOFILE RECSIZE IS 1024
WORDS.
CONTINUE OPERATION (Y OR N) ?y
*201*WARNING: FROMFILE IS  ASCII, TOFILE IS BINARY
CONTINUE OPERATION (Y OR N) ?y
EOF FOUND IN FROMFILE AFTER RECORD 1

2 RECORDS PROCESSED *** 0 ERRORS


END OF SUBSYSTEM

:listf TF2,2
ACCOUNT=  TEST      GROUP=  PUB

FILENAME  CODE  ------------LOGICAL RECORD-----------  ----SPACE----
                  SIZE  TYP        EOF      LIMIT R/B  SECTORS #X MX

TF2               1024W  FB           2      80000   1      256  1  *


Well, that's not exactly what I wanted .... 2 records instead about
72'000 ...

Any other suggestion?

Thanks for helping.

Kurt

ATOM RSS1 RSS2