wbrawner/openssl
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

modes/asm/ghash-alpha.pl: make it work with older assembler.

Browse source 
PR: 3165
(cherry picked from commit d24d1d7daf)
This commit is contained in:
Andy Polyakov 2013-11-08 22:56:44 +01:00
parent ddfe486e4c
commit 9abbf5cce7
1 changed files with 11 additions and 12 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

23
crypto/modes/asm/ghash-alpha.pl
View file

@ -254,6 +254,15 @@ $code=<<___;
.text .text
.align 4
rem_4bit:
.quad 0x0000<<48, 0x1C20<<48, 0x3840<<48, 0x2460<<48
.quad 0x7080<<48, 0x6CA0<<48, 0x48C0<<48, 0x54E0<<48
.quad 0xE100<<48, 0xFD20<<48, 0xD940<<48, 0xC560<<48
.quad 0x9180<<48, 0x8DA0<<48, 0xA9C0<<48, 0xB5E0<<48
.ascii "GHASH for Alpha, CRYPTOGAMS by <appro\@openssl.org>"
.align 4
.set noat .set noat
.set noreorder .set noreorder
.globl gcm_gmult_4bit .globl gcm_gmult_4bit
@ -267,7 +276,7 @@ gcm_gmult_4bit:
ldq $Xhi,0($Xi) ldq $Xhi,0($Xi)
br $rem_4bit,.Lpic1 br $rem_4bit,.Lpic1
.Lpic1: lda $rem_4bit,rem_4bit-.Lpic1($rem_4bit) .Lpic1: lda $rem_4bit,.Lpic1-rem_4bit($rem_4bit)
___ ___
&loop(); &loop();
@ -342,7 +351,7 @@ gcm_ghash_4bit:
ldq $Xlo,8($Xi) ldq $Xlo,8($Xi)
br $rem_4bit,.Lpic2 br $rem_4bit,.Lpic2
.Lpic2: lda $rem_4bit,rem_4bit-.Lpic2($rem_4bit) .Lpic2: lda $rem_4bit,.Lpic2-rem_4bit($rem_4bit)
.Louter: .Louter:
extql $inhi,$inp,$inhi extql $inhi,$inp,$inhi
@ -434,16 +443,6 @@ $code.=<<___;
lda sp,32(sp) lda sp,32(sp)
ret (ra) ret (ra)
.end gcm_ghash_4bit .end gcm_ghash_4bit
.align 4
rem_4bit:
.quad 0x0000<<48, 0x1C20<<48, 0x3840<<48, 0x2460<<48
.quad 0x7080<<48, 0x6CA0<<48, 0x48C0<<48, 0x54E0<<48
.quad 0xE100<<48, 0xFD20<<48, 0xD940<<48, 0xC560<<48
.quad 0x9180<<48, 0x8DA0<<48, 0xA9C0<<48, 0xB5E0<<48
.ascii "GHASH for Alpha, CRYPTOGAMS by <appro\@openssl.org>"
.align 4
___ ___
$output=shift and open STDOUT,">$output"; $output=shift and open STDOUT,">$output";
print $code; print $code;