classpath
[Top][All Lists]
Advanced

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

Re: [Classpath] RE: Informative throws


From: C. Scott Ananian
Subject: Re: [Classpath] RE: Informative throws
Date: Fri, 27 Jul 2001 11:59:16 -0400 (EDT)

On Fri, 27 Jul 2001, Eric Blake wrote:

>     if (negative)
>       return -result;
>     return result;
>   }

you actually have to do this the other way 'round (maintain the number
negative as you build it, then negate it if the number was really
positive) because the negative range of the integer types is larger than
the positive range.  Try parsing Integer.MIN_VALUE, for example: your code
will break.
 --s

AP Ft. Meade KGB Rule Psix Ortega Moscow hack operative FSF Secretary 
East Timor Waco, Texas Peking tonight Sudan class struggle mail drop 
              ( http://lesser-magoo.lcs.mit.edu/~cananian )
 --
 "These students are going to have to find out what law and order is
 all about."  -- Brig. General Robert Canterbury, Noon, May 4, 1970,
 minutes before his troops shot 13 unarmed Kent State students, killing 4.
 --
            [http://www.cs.cmu.edu/~dst/DeCSS/Gallery/]
#!/usr/bin/perl -w
# 526-byte qrpff, Keith Winstein and Marc Horowitz <address@hidden>
# 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])address@hidden;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)[$_/16%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))address@hidden"C*",@a}';s/x/pack+/g;eval




reply via email to

[Prev in Thread] Current Thread [Next in Thread]