rc4/asm/rc4-md5-x86_64.pl

122 $code.=<<___;
149 $code.=<<___;
162 $code.=<<___;
174 $code.=<<___ if (!$md5);
209     $code.=<<___;
215 $code.=<<___;
244     $code.="	movdqu	($in0),%xmm2\n"		if ($rc4 && $j==15);
245     $code.="	add	\$$MOD,$XX[0]#b\n"	if ($rc4 && $j==15 && $k==$MOD-1);
246     $code.="	pxor	$xmm,$xmm\n"		if ($rc4 && $j<=1);
247     $code.=<<___;
266     $code.=<<___ if ($rc4 && $j==15 && $k==$MOD-1);
272     $code.=<<___ if ($rc4 && $j==15);
284     $code.="	movdqu	16($in0),%xmm3\n"	if ($rc4 && $j==15);
285     $code.="	add	\$$MOD,$XX[0]#b\n"	if ($rc4 && $j==15 && $k==$MOD-1);
286     $code.="	pxor	$xmm,$xmm\n"		if ($rc4 && $j<=1);
287     $code.=<<___;
306     $code.=<<___ if ($rc4 && $j==15 && $k==$MOD-1);
312     $code.=<<___ if ($rc4 && $j==15);
324     $code.="	movdqu	32($in0),%xmm4\n"	if ($rc4 && $j==15);
325     $code.="	add	\$$MOD,$XX[0]#b\n"	if ($rc4 && $j==15 && $k==$MOD-1);
326     $code.="	pxor	$xmm,$xmm\n"		if ($rc4 && $j<=1);
327     $code.=<<___;
345     $code.=<<___ if ($rc4 && $j==15 && $k==$MOD-1);
351     $code.=<<___ if ($rc4 && $j==15);
363     $code.="	movdqu	48($in0),%xmm5\n"	if ($rc4 && $j==15);
364     $code.="	add	\$$MOD,$XX[0]#b\n"	if ($rc4 && $j==15 && $k==$MOD-1);
365     $code.="	pxor	$xmm,$xmm\n"		if ($rc4 && $j<=1);
366     $code.=<<___;
385     $code.=<<___ if ($rc4 && $j==15);
405 $code.=<<___;
427 $code.=<<___ if ($rc4 && (!$md5 || $D));
451 $code.=<<___;
484 $code.=<<___;
549 $code.=<<___;
656 $code =~ s/(%[a-z0-9]+)#([bwd])/reg_part($1,$2)/gem;
657 $code =~ s/\`([^\`]*)\`/eval $1/gem;
658 $code =~ s/pinsrw\s+\$0,/movd	/gm;
660 $code =~ s/#md5#//gm	if ($md5);
661 $code =~ s/#rc4#//gm	if ($rc4);
663 print $code;