mirror/openssl
2
0
Fork 0
mirror of https://github.com/openssl/openssl.git synced 2024-11-27 05:21:51 +08:00
Code Issues Packages Projects Releases Wiki Activity

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

Browse Source 
PR: 3165
This commit is contained in:
Andy Polyakov 2013-11-08 22:56:44 +01:00
parent 0467ea6862
commit d24d1d7daf
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
.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 noreorder
.globl gcm_gmult_4bit
@ -267,7 +276,7 @@ gcm_gmult_4bit:
ldq $Xhi,0($Xi)
br $rem_4bit,.Lpic1
.Lpic1: lda $rem_4bit,rem_4bit-.Lpic1($rem_4bit)
.Lpic1: lda $rem_4bit,.Lpic1-rem_4bit($rem_4bit)
___
&loop();
@ -342,7 +351,7 @@ gcm_ghash_4bit:
ldq $Xlo,8($Xi)
br $rem_4bit,.Lpic2
.Lpic2: lda $rem_4bit,rem_4bit-.Lpic2($rem_4bit)
.Lpic2: lda $rem_4bit,.Lpic2-rem_4bit($rem_4bit)
.Louter:
extql $inhi,$inp,$inhi
@ -434,16 +443,6 @@ $code.=<<___;
lda sp,32(sp)
ret (ra)
.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";
print $code;