From: Andy Polyakov <appro@openssl.org>
Date: Sun, 24 Jan 2010 15:04:28 +0000 (+0000)
Subject: pariscid.pl: OPENSSL_cleanse to compile on PA-RISC 2.0W and to accept zero
X-Git-Tag: OpenSSL-fips-2_0-rc1~1323
X-Git-Url: https://git.librecmc.org/?a=commitdiff_plain;h=82a66ce31374107282edad6d099194707af2d730;p=oweals%2Fopenssl.git

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

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