[aes|cmll]t4-sparcv9.pl: unify argument handling.
authorAndy Polyakov <appro@openssl.org>
Thu, 25 Oct 2012 12:03:41 +0000 (12:03 +0000)
committerAndy Polyakov <appro@openssl.org>
Thu, 25 Oct 2012 12:03:41 +0000 (12:03 +0000)
crypto/aes/asm/aest4-sparcv9.pl
crypto/camellia/asm/cmllt4-sparcv9.pl

index cd668ed..558acd6 100644 (file)
@@ -68,10 +68,7 @@ $0 =~ m/(.*[\/\\])[^\/\\]+$/; $dir=$1;
 push(@INC,"${dir}","${dir}../../perlasm");
 require "sparcv9_modes.pl";
 
-$bits=32;
-for (@ARGV)     { $bits=64 if (/\-m64/ || /\-xarch\=v9/); }
-if ($bits==64)  { $::bias=2047; $::frame=192; $::size_t_cc="%xcc"; }
-else            { $::bias=0;    $::frame=112; $::size_t_cc="%icc"; }
+&asm_init(@ARGV);
 
 $::evp=1;      # if $evp is set to 0, script generates module with
 # AES_[en|de]crypt, AES_set_[en|de]crypt_key and AES_cbc_encrypt entry
index fea0338..a813168 100644 (file)
@@ -46,10 +46,7 @@ $0 =~ m/(.*[\/\\])[^\/\\]+$/; $dir=$1;
 push(@INC,"${dir}","${dir}../../perlasm");
 require "sparcv9_modes.pl";
 
-$bits=32;
-for (@ARGV)     { $bits=64 if (/\-m64/ || /\-xarch\=v9/); }
-if ($bits==64)  { $::bias=2047; $::frame=192; $::size_t_cc="%xcc"; }
-else            { $::bias=0;    $::frame=112; $::size_t_cc="%icc"; }
+&asm_init(@ARGV);
 
 $::evp=1;      # if $evp is set to 0, script generates module with
 # Camellia_[en|de]crypt, Camellia_set_key and Camellia_cbc_encrypt