Skip site navigation (1)Skip section navigation (2)
Date:      Thu, 15 Mar 2001 22:58:11 +0100
From:      Brad Knowles <brad.knowles@skynet.be>
To:        Rahul Siddharthan <rsidd@physics.iisc.ernet.in>
Cc:        Neil Blakey-Milner <nbm@mithrandr.moria.org>, Dan Langille <dan@langille.org>, freebsd-chat@FreeBSD.ORG
Subject:   Re: signature (was Re: copyright issues regarding FreeBSD ISOs/CDs)
Message-ID:  <v04220806b6d6eabbcdbc@[194.78.241.123]>
In-Reply-To: <20010315145452.C33560@lpt.ens.fr>
References:  <200103141336.f2EDaZ215574@ns1.unixathome.org>; <20010314153955.A17985@rapier.smartspace.co.za> <200103141342.f2EDga215670@ns1.unixathome.org> <20010314154654.A18459@rapier.smartspace.co.za> <v04220803b6d529b86e09@[194.78.241.123]> <20010315145452.C33560@lpt.ens.fr>

next in thread | previous in thread | raw e-mail | index | archive | help
At 2:54 PM +0100 3/15/01, Rahul Siddharthan wrote:

>  Speaking of signatures... have you seen this one?

	Declan McCullough popularized it in his Wired article at 
<http://www.wired.com/news/culture/0,1284,42259,00.html>, and he 
posted information on this to the DC-CypherPunks mailing list, of 
which I am a member.

>                                                     Also from
>  Touretzky's site, and apparently very fast -- faster than the spec
>  allows for.

	Cool!  I'll have to take a look at that again.

--
Brad Knowles, <brad.knowles@skynet.be>

#!/usr/bin/perl -w
# 531-byte qrpff-fast, Keith Winstein and Marc Horowitz <sipb-iap-dvd@mit.edu>
# MPEG 2 PS VOB file on stdin -> descrambled output on stdout
# arguments: title key bytes in least to most-significant order
# Usage:
# qrpff 153 2 8 105 225 /mnt/dvd/VOB_FILE_NAME | extract_mpeg2 | mpeg2_dec -
$_='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

To Unsubscribe: send mail to majordomo@FreeBSD.org
with "unsubscribe freebsd-chat" in the body of the message




Want to link to this message? Use this URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?v04220806b6d6eabbcdbc>