Re: [SLUG] Inexpensive Tape Drive

From: Derek Glidden (dglidden@illusionary.com)
Date: Wed Oct 03 2001 - 15:24:59 EDT


Seth Hollen wrote:
>
> Yesterday I was talking with a friend about paying a company to back up his
> data offsite through the net. But the cost was going to be a couple thousand
> dollars.
> Then it hit me! Host it at his house. He has a cable internetc onnection, the
> office has DSL, and the server runs Redhat! I'm goning to take an older PC
> from his office and put a larger hard drive on it and redhat. Then I want to
> use rsync to keep a perfect copy of the hard drive at his house.
> What do you think? I figure a simple script would do it.
> Anyone see any downsides to it?

Nope. I do it all the time. Here are a couple of things to think
about:

1) do the initial backup on the local LAN so you don't try to xfer gigs
of data across that DSL line. It'll be faster to backup locally, then
stick the machine in your car and drive it to its final destination.
(Never underestimate the bandwidth of a station wagon filled with
tapes... :) From then on, rsync should only have to transfer a little
bit of data on a daily basis.

2) Try to keep enough disk space to do backup rotations. You don't want
to do the nightly backup, overwriting the previous backup, and the next
day have someone call and say, "Our servers crashed last night and we
lost all our data. We need to restore from backup." and find out your
backup now consists of corrupted data.

I also periodically back up my backup directories to tapes, just in
case.

-- 
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
#!/usr/bin/perl -w
$_='while(read+STDIN,$_,2048){$a=29;$b=73;$c=142;$t=255;@t=map
{$_%16or$t^=$c^=($m=(11,10,116,100,11,122,20,100)[$_/16%8])&110;
$t^=(72,@z=(64,72,$a^=12*($_%16-2?0:$m&17)),$b^=$_%64?12:0,@z)
[$_%8]}(16..271);if((@a=unx"C*",$_)[20]&48){$h=5;$_=unxb24,join
"",@b=map{xB8,unxb8,chr($_^$a[--$h+84])}@ARGV;s/...$/1$&/;$d=
unxV,xb25,$_;$e=256|(ord$b[4])<<9|ord$b[3];$d=$d>>8^($f=$t&($d
>>12^$d>>4^$d^$d/8))<<17,$e=$e>>8^($t&($g=($q=$e>>14&7^$e)^$q*
8^$q<<6))<<9,$_=$t[$_]^(($h>>=8)+=$f+(~$g&$t))for@a[128..$#a]}
print+x"C*",@a}';s/x/pack+/g;eval 

usage: qrpff 153 2 8 105 225 < /mnt/dvd/VOB_FILENAME \ | extract_mpeg2 | mpeg2dec -

http://www.cs.cmu.edu/~dst/DeCSS/Gallery/ http://www.eff.org/ http://www.anti-dmca.org/ http://www.sciencemag.org/cgi/content/full/293/5537/2028



This archive was generated by hypermail 2.1.3 : Fri Aug 01 2014 - 20:41:51 EDT