Defcon X

Top Page
Attachments:
Message as email
+ (text/plain)
Delete this message
Reply to this message
Author: Shadow
Date:  
Subject: Defcon X
All,

If anyone is interested in attending Defcon X this year,and still does
not have a room, I have a room with space at the Alexis Park hotel. The
reservations are for Wed. July 31 to Mon. Aug. 5. (After last years
experience, I know that the extra two days are needed.) I have one bed
available for $240.00 or floorspace for $20.00. There will also be an
open Vodka and Tequila bar. I figured I would give PLUG members first
chance before I opened the space up on the Defcon message boards this
weekend. Let me know ASAP if anyone is interested since this is only
three weeks away.


--
Chris Lewis
Tesla Systems

----------------------------------------
You want what?? When?? And how cold is it in Hell today?
----------------------------------------

The following code is a PERL script capable of decoding a CSS (Content
Scrambling System) encrypted DVD in real time. This is illegal to
possess in the US according to the Digital Millennium Copyright Act, a
set of laws passed by anonymous vote in congress in 1998. The Motion
Picture Association of America (MPAA) is opposed to the distribution of
this software because it allows the owners of CSS encrypted DVDs to
exercise their long-standing fair use rights with new digital
technologies. For more information, please visit:
http://www.opendvd.org/

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