generic-library/openssl
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

rc4-x86_64 portability fix.

Browse Source
This commit is contained in:
Andy Polyakov 2008-01-12 11:29:45 +00:00
parent f12797a447
commit a078befcbe
2 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
crypto/perlasm/x86_64-xlate.pl
View File

@ -82,12 +82,12 @@ my $current_function;
$line = substr($line,@+[0]); $line =~ s/^\s+//; $line = substr($line,@+[0]); $line =~ s/^\s+//;
undef $self->{sz}; undef $self->{sz};
if ($self->{op} =~ /(movz)b.*/) { # movz is pain... if ($self->{op} =~ /^(movz)b.*/) { # movz is pain...
$self->{op} = $1; $self->{op} = $1;
$self->{sz} = "b"; $self->{sz} = "b";
} elsif ($self->{op} =~ /call/) { } elsif ($self->{op} =~ /call/) {
$self->{sz} = "" $self->{sz} = ""
} elsif ($self->{op} =~ /([a-z]{3,})([qlwb])/) { } elsif ($self->{op} =~ /([a-z]{3,})([qlwb])$/) {
$self->{op} = $1; $self->{op} = $1;
$self->{sz} = $2; $self->{sz} = $2;
} }
@ -113,7 +113,7 @@ my $current_function;
"$self->{op}$self->{sz}"; "$self->{op}$self->{sz}";
} }
} else { } else {
$self->{op} =~ s/movz/movzx/; $self->{op} =~ s/^movz/movzx/;
if ($self->{op} eq "ret") { if ($self->{op} eq "ret") {
$self->{op} = ""; $self->{op} = "";
if ($current_function->{abi} eq "svr4") { if ($current_function->{abi} eq "svr4") {

2
crypto/rc4/asm/rc4-x86_64.pl
View File

@ -167,7 +167,7 @@ $code.=<<___;
movzb ($dat,$XX[0]),$TX[0]#d movzb ($dat,$XX[0]),$TX[0]#d
test \$-8,$len test \$-8,$len
jz .Lcloop1 jz .Lcloop1
cmp \$0,260($dat) cmpl \$0,260($dat)
jnz .Lcloop1 jnz .Lcloop1
push %rbx push %rbx
jmp .Lcloop8 jmp .Lcloop8