diff options
author | miod <> | 2014-04-13 15:16:40 +0000 |
---|---|---|
committer | miod <> | 2014-04-13 15:16:40 +0000 |
commit | 52628ee3f51f011b463aaedb1a28aa0524b43cb3 (patch) | |
tree | 4bd2adeac981051908ec5756401424bbb4e57d6a /src/lib/libcrypto/pariscid.pl | |
parent | 40c22d3625a3818690c889ed6216fedf2be522c9 (diff) | |
download | openbsd-52628ee3f51f011b463aaedb1a28aa0524b43cb3.tar.gz openbsd-52628ee3f51f011b463aaedb1a28aa0524b43cb3.tar.bz2 openbsd-52628ee3f51f011b463aaedb1a28aa0524b43cb3.zip |
Import OpenSSL 1.0.1g
Diffstat (limited to 'src/lib/libcrypto/pariscid.pl')
-rw-r--r-- | src/lib/libcrypto/pariscid.pl | 41 |
1 files changed, 21 insertions, 20 deletions
diff --git a/src/lib/libcrypto/pariscid.pl b/src/lib/libcrypto/pariscid.pl index 477ec9b87d..bfc56fdc7f 100644 --- a/src/lib/libcrypto/pariscid.pl +++ b/src/lib/libcrypto/pariscid.pl | |||
@@ -97,33 +97,33 @@ OPENSSL_cleanse | |||
97 | .PROC | 97 | .PROC |
98 | .CALLINFO NO_CALLS | 98 | .CALLINFO NO_CALLS |
99 | .ENTRY | 99 | .ENTRY |
100 | cmpib,*= 0,$len,Ldone | 100 | cmpib,*= 0,$len,L\$done |
101 | nop | 101 | nop |
102 | cmpib,*>>= 15,$len,Little | 102 | cmpib,*>>= 15,$len,L\$ittle |
103 | ldi $SIZE_T-1,%r1 | 103 | ldi $SIZE_T-1,%r1 |
104 | 104 | ||
105 | Lalign | 105 | L\$align |
106 | and,*<> $inp,%r1,%r28 | 106 | and,*<> $inp,%r1,%r28 |
107 | b,n Laligned | 107 | b,n L\$aligned |
108 | stb %r0,0($inp) | 108 | stb %r0,0($inp) |
109 | ldo -1($len),$len | 109 | ldo -1($len),$len |
110 | b Lalign | 110 | b L\$align |
111 | ldo 1($inp),$inp | 111 | ldo 1($inp),$inp |
112 | 112 | ||
113 | Laligned | 113 | L\$aligned |
114 | andcm $len,%r1,%r28 | 114 | andcm $len,%r1,%r28 |
115 | Lot | 115 | L\$ot |
116 | $ST %r0,0($inp) | 116 | $ST %r0,0($inp) |
117 | addib,*<> -$SIZE_T,%r28,Lot | 117 | addib,*<> -$SIZE_T,%r28,L\$ot |
118 | ldo $SIZE_T($inp),$inp | 118 | ldo $SIZE_T($inp),$inp |
119 | 119 | ||
120 | and,*<> $len,%r1,$len | 120 | and,*<> $len,%r1,$len |
121 | b,n Ldone | 121 | b,n L\$done |
122 | Little | 122 | L\$ittle |
123 | stb %r0,0($inp) | 123 | stb %r0,0($inp) |
124 | addib,*<> -1,$len,Little | 124 | addib,*<> -1,$len,L\$ittle |
125 | ldo 1($inp),$inp | 125 | ldo 1($inp),$inp |
126 | Ldone | 126 | L\$done |
127 | bv ($rp) | 127 | bv ($rp) |
128 | .EXIT | 128 | .EXIT |
129 | nop | 129 | nop |
@@ -151,7 +151,7 @@ OPENSSL_instrument_bus | |||
151 | ldw 0($out),$tick | 151 | ldw 0($out),$tick |
152 | add $diff,$tick,$tick | 152 | add $diff,$tick,$tick |
153 | stw $tick,0($out) | 153 | stw $tick,0($out) |
154 | Loop | 154 | L\$oop |
155 | mfctl %cr16,$tick | 155 | mfctl %cr16,$tick |
156 | sub $tick,$lasttick,$diff | 156 | sub $tick,$lasttick,$diff |
157 | copy $tick,$lasttick | 157 | copy $tick,$lasttick |
@@ -161,7 +161,7 @@ Loop | |||
161 | add $diff,$tick,$tick | 161 | add $diff,$tick,$tick |
162 | stw $tick,0($out) | 162 | stw $tick,0($out) |
163 | 163 | ||
164 | addib,<> -1,$cnt,Loop | 164 | addib,<> -1,$cnt,L\$oop |
165 | addi 4,$out,$out | 165 | addi 4,$out,$out |
166 | 166 | ||
167 | bv ($rp) | 167 | bv ($rp) |
@@ -190,14 +190,14 @@ OPENSSL_instrument_bus2 | |||
190 | mfctl %cr16,$tick | 190 | mfctl %cr16,$tick |
191 | sub $tick,$lasttick,$diff | 191 | sub $tick,$lasttick,$diff |
192 | copy $tick,$lasttick | 192 | copy $tick,$lasttick |
193 | Loop2 | 193 | L\$oop2 |
194 | copy $diff,$lastdiff | 194 | copy $diff,$lastdiff |
195 | fdc 0($out) | 195 | fdc 0($out) |
196 | ldw 0($out),$tick | 196 | ldw 0($out),$tick |
197 | add $diff,$tick,$tick | 197 | add $diff,$tick,$tick |
198 | stw $tick,0($out) | 198 | stw $tick,0($out) |
199 | 199 | ||
200 | addib,= -1,$max,Ldone2 | 200 | addib,= -1,$max,L\$done2 |
201 | nop | 201 | nop |
202 | 202 | ||
203 | mfctl %cr16,$tick | 203 | mfctl %cr16,$tick |
@@ -208,17 +208,18 @@ Loop2 | |||
208 | 208 | ||
209 | ldi 1,%r1 | 209 | ldi 1,%r1 |
210 | xor %r1,$tick,$tick | 210 | xor %r1,$tick,$tick |
211 | addb,<> $tick,$cnt,Loop2 | 211 | addb,<> $tick,$cnt,L\$oop2 |
212 | shladd,l $tick,2,$out,$out | 212 | shladd,l $tick,2,$out,$out |
213 | Ldone2 | 213 | L\$done2 |
214 | bv ($rp) | 214 | bv ($rp) |
215 | .EXIT | 215 | .EXIT |
216 | add $rv,$cnt,$rv | 216 | add $rv,$cnt,$rv |
217 | .PROCEND | 217 | .PROCEND |
218 | ___ | 218 | ___ |
219 | } | 219 | } |
220 | $code =~ s/cmpib,\*/comib,/gm if ($SIZE_T==4); | 220 | $code =~ s/cmpib,\*/comib,/gm if ($SIZE_T==4); |
221 | $code =~ s/,\*/,/gm if ($SIZE_T==4); | 221 | $code =~ s/,\*/,/gm if ($SIZE_T==4); |
222 | $code =~ s/\bbv\b/bve/gm if ($SIZE_T==8); | ||
222 | print $code; | 223 | print $code; |
223 | close STDOUT; | 224 | close STDOUT; |
224 | 225 | ||