x86_64 assembler pack to comply with updated styling x86_64-xlate.pl rules.
[openssl.git] / crypto / rc4 / asm / rc4-x86_64.pl
index 36a9429..959a67a 100755 (executable)
@@ -2,8 +2,9 @@
 #
 # ====================================================================
 # Written by Andy Polyakov <appro@fy.chalmers.se> for the OpenSSL
-# project. Rights for redistribution and usage in source and binary
-# forms are granted according to the OpenSSL license.
+# project. The module is, however, dual licensed under OpenSSL and
+# CRYPTOGAMS licenses depending on where you obtain it. For further
+# details see http://www.openssl.org/~appro/cryptogams/.
 # ====================================================================
 #
 # 2.22x RC4 tune-up:-) It should be noted though that my hand [as in
 # this CPU.
 
 $output=shift;
-open STDOUT,"| $^X ../perlasm/x86_64-xlate.pl $output";
+
+$0 =~ m/(.*[\/\\])[^\/\\]+$/; $dir=$1;
+( $xlate="${dir}x86_64-xlate.pl" and -f $xlate ) or
+( $xlate="${dir}../../perlasm/x86_64-xlate.pl" and -f $xlate) or
+die "can't locate x86_64-xlate.pl";
+
+open STDOUT,"| $^X $xlate $output";
 
 $dat="%rdi";       # arg1
 $len="%rsi";       # arg2
@@ -160,7 +167,7 @@ $code.=<<___;
        movzb   ($dat,$XX[0]),$TX[0]#d
        test    \$-8,$len
        jz      .Lcloop1
-       cmp     \$0,260($dat)
+       cmpl    \$0,260($dat)
        jnz     .Lcloop1
        push    %rbx
        jmp     .Lcloop8
@@ -329,8 +336,7 @@ RC4_set_key:
 .type  RC4_options,\@function,0
 .align 16
 RC4_options:
-       .picmeup %rax
-       lea     .Lopts-.(%rax),%rax
+       lea     .Lopts(%rip),%rax
        mov     OPENSSL_ia32cap_P(%rip),%edx
        bt      \$20,%edx
        jnc     .Ldone
@@ -345,7 +351,7 @@ RC4_options:
 .asciz "rc4(8x,int)"
 .asciz "rc4(8x,char)"
 .asciz "rc4(1x,char)"
-.asciz "RC4 for x86_64, OpenSSL project"
+.asciz "RC4 for x86_64, CRYPTOGAMS by <appro\@openssl.org>"
 .align 64
 .size  RC4_options,.-RC4_options
 ___