In the case brought by the DVD Copy Control Association against Real over their RealDVD movie copying software, the MPAA are seeking to
seal the courtroom from the public. Their argument is that the details of the
Content Scrambling System at the heart of the case are super secret and their entire business model would crumble before our eyes were a single syllable of it to reach the ears of pirates!
Excuse me, I have something in my throat...
#!/usr/bin/perl -w
# 531-byte qrpff-fast, Keith Winstein and Marc Horowitz
# MPEG 2 PS VOB file on stdin -> descrambled output on stdout
# arguments: title key bytes in least to most-significant order
$_='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
That's better.
I wonder, is the secret they are trying to keep the fact that everyone with even a passing interest in the field already knows
everything single little thing about it? Is it a secret that this pitiful attempt to dress the shadow of obscurity as effective security was blown wide open at least
ten years ago? Is it a secret that their throne is at the shore?
Would that they hang their crowns when this tide wets their robes.