Could Python supplant Java?
James J. Besemer
jb at cascade-sys.com
Fri Aug 23 08:48:46 EDT 2002
"Bo M. Maryniuck" wrote:
> O.K. I want ASK
> AGAIN: do the same with C/C++ (30-40 lines of *NORMAL*, not obfuscated code)
> and mail it source in this list. Will see.
I hope I'm not committing a crime by doing this but here ya go bunkie:
/* efdtt.c Author: Charles M. Hannum
<root at ihack.net> */
/*
*/
/* Thanks to Phil Carmody <fatphil at asdf.org> for additional
tweaks. */
/*
*/
/* Length: 434 bytes (excluding unnecessary
newlines) */
/*
*/
/* Usage is: cat title-key scrambled.vob | efdtt
>clear.vob */
#define m(i)(x[i]^s[i+84])<<
unsigned char
x[5],y,s[2048];main(n){for(read(0,x,5);read(0,s,n=2048);write(1,s
,n))if(s[y=s[13]%8+20]/16%4==1){int
i=m(1)17^256+m(0)8,k=m(2)0,j=m(4)17^m(3)9^k
*2-k%8^8,a=0,c=26;for(s[y]-=16;--c;j*=2)a=a*2^i&1,i=i/2^j&1<<24;for(j=127;++j<n
;c=c>y)c+=y=i^i/8^i>>4^i>>12,i=i>>8^y<<17,a^=a>>14,y=a^a*8^a<<6,a=a>>8^y<<9,k=s
[j],k="7Wo~'G_\216"[k&7]+2^"cr3sfw6v;*k+>/n."[k>>4]*2^k*257/8,s[j]=k^(k&k*2&34)
*6^c+~y;}}
Also I since read that this solution decodes much faster than real-time while the
Perl solution is "jerky" to say the least.
--jb
--
James J. Besemer 503-280-0838 voice
http://cascade-sys.com 503-280-0375 fax
mailto:jb at cascade-sys.com
More information about the Python-list
mailing list