[openssl-dev] [openssl.org #3759] [PATCH] crypto: use bigint in x86-64 perl

[Jean FONGANG DASSI via RT]

On Solaris 10u10 X86_64, I had to do the bellow instead: 


$ cat src/x86_64-xlate.pl_patch 
--- openssl-1.0.2d/crypto/modes/asm/../../perlasm/x86_64-xlate.pl Thu Jul 9 13:57:15 2015 
+++ ./x86_64-xlate.pl_new Tue Aug 25 18:17:20 2015 
@@ -194,17 +194,17 @@ 
} 
sub out { 
my $self = shift; 
- 
+ use bigint; 
if ($gas) { 
# Solaris /usr/ccs/bin/as can't handle multiplications 
# in $self->{value} 
$self->{value} =~ s/(?<![\w\$\.])(0x?[0-9a-f]+)/oct($1)/egi; 
$self->{value} =~ s/([0-9]+\s*[\*\/\%]\s*[0-9]+)/eval($1)/eg; 
- sprintf "\$%s",$self->{value}; 
+ sprintf "\$%20.0f",$self->{value}; 
} else { 
$self->{value} =~ s/(0b[0-1]+)/oct($1)/eig; 
$self->{value} =~ s/0x([0-9a-f]+)/0$1h/ig if ($masm); 
- sprintf "%s",$self->{value}; 
+ sprintf "%20.0f",$self->{value}; 
} 
} 
} 
$ 

Not actually sure how safe it is: there seems to be some number truncation in $self->{value} ... 



Kind Regards, 
Jean Fongang 




Systems Integration Specialist 




m. +27 (0)XXXXXXXX e. jeanf [our domain is: } concurrent.co.za 
t. +27 (0)11 253 3660 f. +27 (0)11 656 3795 

www.concurrent.co.za 

Block E, Morningside Close Office Park, 222 Rivonia Road 
Morningside, Sandton, South Africa PO Box 5224, Cresta 2118 


-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://mta.openssl.org/pipermail/openssl-dev/attachments/20150825/fb6446da/attachment.html>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: Concurrent-Logo-Horizontal_Web_2.jpg
Type: image/jpeg
Size: 7653 bytes
Desc: not available
URL: <http://mta.openssl.org/pipermail/openssl-dev/attachments/20150825/fb6446da/attachment.jpg>