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

pariscid.pl: OPENSSL_cleanse to compile on PA-RISC 2.0W and to accept zero

Browse Source 
length parameter.
This commit is contained in:
Andy Polyakov 2010-01-24 15:04:28 +00:00
parent 7676eebf42
commit 82a66ce313
1 changed files with 5 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
crypto/pariscid.pl
View File

@ -97,7 +97,9 @@ OPENSSL_cleanse
.PROC .PROC
.CALLINFO NO_CALLS .CALLINFO NO_CALLS
.ENTRY .ENTRY
cmpib,*>> 15,$len,Little cmpib,*= 0,$len,Ldone
nop
cmpib,*>>= 15,$len,Little
ldi $SIZE_T-1,%r1 ldi $SIZE_T-1,%r1
Lalign Lalign
@ -112,14 +114,14 @@ Laligned
andcm $len,%r1,%r28 andcm $len,%r1,%r28
Loop Loop
$ST %r0,0($inp) $ST %r0,0($inp)
addib,*vnz -$SIZE_T,%r28,Loop addib,*<> -$SIZE_T,%r28,Loop
ldo $SIZE_T($inp),$inp ldo $SIZE_T($inp),$inp
and,*<> $len,%r1,$len and,*<> $len,%r1,$len
b,n Ldone b,n Ldone
Little Little
stb %r0,0($inp) stb %r0,0($inp)
addib,*vnz -1,$len,Little addib,*<> -1,$len,Little
ldo 1($inp),$inp ldo 1($inp),$inp
Ldone Ldone
bv ($rp) bv ($rp)