[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

RE: [cobalt-security] Qube 2 OSUpdate 3.0



Hi Rob,

BACKUP the .qub file, then run this perl script on it:

#!/usr/bin/perl
# Jeff Bilicki <jeffb@xxxxxxxxxxxxx>
# removes the header out of a Qube 2 and RaQ 2 backup file

use strict;

my ($infile);
my ($outfile) = "out.tar.gz";
my ($end) = "\%\%END_INDEX";
my ($begin) = "\%\%BACKUP_HEADER";

if (@ARGV) {
        $infile = $ARGV[0];
} else {
        print "usage: stripheader.pl <file name>\n";
        exit 1;
}

open (INFILE, $infile) or die "Can't open: $!\n";
open (OUTFILE, ">$outfile") or die "Can't open $!\n";

while (<INFILE>) {
        if ( /^$begin/ ... /^$end/ ) {
                next;
        } else {
                print OUTFILE $_;
        }
}
close(INFILE);
close(OUTFILE);
exit 0;


(eg perl eek.qub)

Now untar|gunzip it...

(eg gzip -cd eek.out.tar.gz | tar -xvf -)

Tada.  Credits to Jeff for coding this a while back.  Users of RaQ3's
don't need to run the perl script, just untar it.

Regards.

On Wed, 26 Jul 2000, Rob Rosenberger wrote:

> Jeff, my Qube2 crashes during restores.  I mean a hard crash where you gotta
> hit the power button.  Cobalt sent me a spare-in-the-air, which I promptly
> screwed up by putting 3.0 on it.  Day 16 has now passed with no ability to
> restore my critical business files.  I DESPERATELY need a fix so I can
> restore files -- or I need an alternate method to pull the contents from a
> .QUB file.  HELP!
> 
> Rob
> 
> 
> 
> _______________________________________________
> cobalt-security mailing list
> cobalt-security@xxxxxxxxxxxxxxx
> http://list.cobalt.com/mailman/listinfo/cobalt-security
> 

-- 
gossi@xxxxxxxxxxxxxxx