Commit 637e0ba4 authored by Dr. Stephen Henson's avatar Dr. Stephen Henson
Browse files

PR: 2094 

Submitted by: Arkadiusz Miskiewicz <arekm@maven.pl>
Approved by: steve@openssl.org

Fix for out range of signed 32bit displacement error on newer binutils.
parent 9ac37cb0

crypto/md5/asm/md5-x86_64.pl

+4 −0
Original line number Diff line number Diff line
@@ -19,6 +19,7 @@ my $code; 
sub round1_step

{

    my ($pos, $dst, $x, $y, $z, $k_next, $T_i, $s) = @_;

    $T_i = unpack("l",pack("l", hex($T_i))); # convert to 32-bit signed decimal

    $code .= " mov	0*4(%rsi),	%r10d		/* (NEXT STEP) X[0] */\n" if ($pos == -1);

    $code .= " mov	%edx,		%r11d		/* (NEXT STEP) z' = %edx */\n" if ($pos == -1);

    $code .= <<EOF;
@@ -42,6 +43,7 @@ EOF 
sub round2_step

{

    my ($pos, $dst, $x, $y, $z, $k_next, $T_i, $s) = @_;

    $T_i = unpack("l",pack("l", hex($T_i))); # convert to 32-bit signed decimal

    $code .= " mov	1*4(%rsi),	%r10d		/* (NEXT STEP) X[1] */\n" if ($pos == -1);

    $code .= " mov	%ecx,		%r11d		/* (NEXT STEP) y' = %ecx */\n" if ($pos == -1);

    $code .= <<EOF;
@@ -65,6 +67,7 @@ EOF 
sub round3_step

{

    my ($pos, $dst, $x, $y, $z, $k_next, $T_i, $s) = @_;

    $T_i = unpack("l",pack("l", hex($T_i))); # convert to 32-bit signed decimal

    $code .= " mov	5*4(%rsi),	%r10d		/* (NEXT STEP) X[5] */\n" if ($pos == -1);

    $code .= " mov	%ecx,		%r11d		/* (NEXT STEP) y' = %ecx */\n" if ($pos == -1);

    $code .= <<EOF;
@@ -87,6 +90,7 @@ EOF 
sub round4_step

{

    my ($pos, $dst, $x, $y, $z, $k_next, $T_i, $s) = @_;

    $T_i = unpack("l",pack("l", hex($T_i))); # convert to 32-bit signed decimal

    $code .= " mov	0*4(%rsi),	%r10d		/* (NEXT STEP) X[0] */\n" if ($pos == -1);

    $code .= " mov	\$0xffffffff,	%r11d\n" if ($pos == -1);

    $code .= " xor	%edx,		%r11d		/* (NEXT STEP) not z' = not %edx*/\n"