diff options
Diffstat (limited to 'src/lib/libcrypto/ripemd/rmd_dgst.c')
-rw-r--r-- | src/lib/libcrypto/ripemd/rmd_dgst.c | 471 |
1 files changed, 215 insertions, 256 deletions
diff --git a/src/lib/libcrypto/ripemd/rmd_dgst.c b/src/lib/libcrypto/ripemd/rmd_dgst.c index 210de1977d..a3170f7c8a 100644 --- a/src/lib/libcrypto/ripemd/rmd_dgst.c +++ b/src/lib/libcrypto/ripemd/rmd_dgst.c | |||
@@ -58,27 +58,18 @@ | |||
58 | 58 | ||
59 | #include <stdio.h> | 59 | #include <stdio.h> |
60 | #include "rmd_locl.h" | 60 | #include "rmd_locl.h" |
61 | #include <openssl/opensslv.h> | ||
61 | 62 | ||
62 | char *RMD160_version="RIPEMD160 part of SSLeay 0.9.0b 29-Jun-1998"; | 63 | const char *RMD160_version="RIPE-MD160" OPENSSL_VERSION_PTEXT; |
63 | 64 | ||
64 | #ifndef NOPROTO | ||
65 | # ifdef RMD160_ASM | 65 | # ifdef RMD160_ASM |
66 | void ripemd160_block_x86(RIPEMD160_CTX *c, unsigned long *p,int num); | 66 | void ripemd160_block_x86(RIPEMD160_CTX *c, unsigned long *p,int num); |
67 | # define ripemd160_block ripemd160_block_x86 | 67 | # define ripemd160_block ripemd160_block_x86 |
68 | # else | 68 | # else |
69 | void ripemd160_block(RIPEMD160_CTX *c, unsigned long *p,int num); | 69 | void ripemd160_block(RIPEMD160_CTX *c, unsigned long *p,int num); |
70 | # endif | 70 | # endif |
71 | #else | ||
72 | # ifdef RMD160_ASM | ||
73 | void ripemd160_block_x86(); | ||
74 | # define ripemd160_block ripemd160_block_x86 | ||
75 | # else | ||
76 | static void ripemd160_block(); | ||
77 | # endif | ||
78 | #endif | ||
79 | 71 | ||
80 | void RIPEMD160_Init(c) | 72 | int RIPEMD160_Init(RIPEMD160_CTX *c) |
81 | RIPEMD160_CTX *c; | ||
82 | { | 73 | { |
83 | c->A=RIPEMD160_A; | 74 | c->A=RIPEMD160_A; |
84 | c->B=RIPEMD160_B; | 75 | c->B=RIPEMD160_B; |
@@ -88,189 +79,24 @@ RIPEMD160_CTX *c; | |||
88 | c->Nl=0; | 79 | c->Nl=0; |
89 | c->Nh=0; | 80 | c->Nh=0; |
90 | c->num=0; | 81 | c->num=0; |
82 | return 1; | ||
91 | } | 83 | } |
92 | 84 | ||
93 | void RIPEMD160_Update(c, data, len) | 85 | #ifndef ripemd160_block_host_order |
94 | RIPEMD160_CTX *c; | 86 | #ifdef X |
95 | register unsigned char *data; | 87 | #undef X |
96 | unsigned long len; | ||
97 | { | ||
98 | register ULONG *p; | ||
99 | int sw,sc; | ||
100 | ULONG l; | ||
101 | |||
102 | if (len == 0) return; | ||
103 | |||
104 | l=(c->Nl+(len<<3))&0xffffffffL; | ||
105 | if (l < c->Nl) /* overflow */ | ||
106 | c->Nh++; | ||
107 | c->Nh+=(len>>29); | ||
108 | c->Nl=l; | ||
109 | |||
110 | if (c->num != 0) | ||
111 | { | ||
112 | p=c->data; | ||
113 | sw=c->num>>2; | ||
114 | sc=c->num&0x03; | ||
115 | |||
116 | if ((c->num+len) >= RIPEMD160_CBLOCK) | ||
117 | { | ||
118 | l= p[sw]; | ||
119 | p_c2l(data,l,sc); | ||
120 | p[sw++]=l; | ||
121 | for (; sw<RIPEMD160_LBLOCK; sw++) | ||
122 | { | ||
123 | c2l(data,l); | ||
124 | p[sw]=l; | ||
125 | } | ||
126 | len-=(RIPEMD160_CBLOCK-c->num); | ||
127 | |||
128 | ripemd160_block(c,p,64); | ||
129 | c->num=0; | ||
130 | /* drop through and do the rest */ | ||
131 | } | ||
132 | else | ||
133 | { | ||
134 | int ew,ec; | ||
135 | |||
136 | c->num+=(int)len; | ||
137 | if ((sc+len) < 4) /* ugly, add char's to a word */ | ||
138 | { | ||
139 | l= p[sw]; | ||
140 | p_c2l_p(data,l,sc,len); | ||
141 | p[sw]=l; | ||
142 | } | ||
143 | else | ||
144 | { | ||
145 | ew=(c->num>>2); | ||
146 | ec=(c->num&0x03); | ||
147 | l= p[sw]; | ||
148 | p_c2l(data,l,sc); | ||
149 | p[sw++]=l; | ||
150 | for (; sw < ew; sw++) | ||
151 | { c2l(data,l); p[sw]=l; } | ||
152 | if (ec) | ||
153 | { | ||
154 | c2l_p(data,l,ec); | ||
155 | p[sw]=l; | ||
156 | } | ||
157 | } | ||
158 | return; | ||
159 | } | ||
160 | } | ||
161 | /* we now can process the input data in blocks of RIPEMD160_CBLOCK | ||
162 | * chars and save the leftovers to c->data. */ | ||
163 | #ifdef L_ENDIAN | ||
164 | if ((((unsigned long)data)%sizeof(ULONG)) == 0) | ||
165 | { | ||
166 | sw=(int)len/RIPEMD160_CBLOCK; | ||
167 | if (sw > 0) | ||
168 | { | ||
169 | sw*=RIPEMD160_CBLOCK; | ||
170 | ripemd160_block(c,(ULONG *)data,sw); | ||
171 | data+=sw; | ||
172 | len-=sw; | ||
173 | } | ||
174 | } | ||
175 | #endif | 88 | #endif |
176 | p=c->data; | 89 | #define X(i) XX[i] |
177 | while (len >= RIPEMD160_CBLOCK) | 90 | void ripemd160_block_host_order (RIPEMD160_CTX *ctx, const void *p, int num) |
178 | { | ||
179 | #if defined(L_ENDIAN) || defined(B_ENDIAN) | ||
180 | if (p != (unsigned long *)data) | ||
181 | memcpy(p,data,RIPEMD160_CBLOCK); | ||
182 | data+=RIPEMD160_CBLOCK; | ||
183 | #ifdef B_ENDIAN | ||
184 | for (sw=(RIPEMD160_LBLOCK/4); sw; sw--) | ||
185 | { | ||
186 | Endian_Reverse32(p[0]); | ||
187 | Endian_Reverse32(p[1]); | ||
188 | Endian_Reverse32(p[2]); | ||
189 | Endian_Reverse32(p[3]); | ||
190 | p+=4; | ||
191 | } | ||
192 | #endif | ||
193 | #else | ||
194 | for (sw=(RIPEMD160_LBLOCK/4); sw; sw--) | ||
195 | { | ||
196 | c2l(data,l); *(p++)=l; | ||
197 | c2l(data,l); *(p++)=l; | ||
198 | c2l(data,l); *(p++)=l; | ||
199 | c2l(data,l); *(p++)=l; | ||
200 | } | ||
201 | #endif | ||
202 | p=c->data; | ||
203 | ripemd160_block(c,p,64); | ||
204 | len-=RIPEMD160_CBLOCK; | ||
205 | } | ||
206 | sc=(int)len; | ||
207 | c->num=sc; | ||
208 | if (sc) | ||
209 | { | ||
210 | sw=sc>>2; /* words to copy */ | ||
211 | #ifdef L_ENDIAN | ||
212 | p[sw]=0; | ||
213 | memcpy(p,data,sc); | ||
214 | #else | ||
215 | sc&=0x03; | ||
216 | for ( ; sw; sw--) | ||
217 | { c2l(data,l); *(p++)=l; } | ||
218 | c2l_p(data,l,sc); | ||
219 | *p=l; | ||
220 | #endif | ||
221 | } | ||
222 | } | ||
223 | |||
224 | void RIPEMD160_Transform(c,b) | ||
225 | RIPEMD160_CTX *c; | ||
226 | unsigned char *b; | ||
227 | { | 91 | { |
228 | ULONG p[16]; | 92 | const RIPEMD160_LONG *XX=p; |
229 | #if !defined(L_ENDIAN) | 93 | register unsigned long A,B,C,D,E; |
230 | ULONG *q; | 94 | register unsigned long a,b,c,d,e; |
231 | int i; | ||
232 | #endif | ||
233 | 95 | ||
234 | #if defined(B_ENDIAN) || defined(L_ENDIAN) | 96 | for (;num--;XX+=HASH_LBLOCK) |
235 | memcpy(p,b,64); | ||
236 | #ifdef B_ENDIAN | ||
237 | q=p; | ||
238 | for (i=(RIPEMD160_LBLOCK/4); i; i--) | ||
239 | { | ||
240 | Endian_Reverse32(q[0]); | ||
241 | Endian_Reverse32(q[1]); | ||
242 | Endian_Reverse32(q[2]); | ||
243 | Endian_Reverse32(q[3]); | ||
244 | q+=4; | ||
245 | } | ||
246 | #endif | ||
247 | #else | ||
248 | q=p; | ||
249 | for (i=(RIPEMD160_LBLOCK/4); i; i--) | ||
250 | { | 97 | { |
251 | ULONG l; | ||
252 | c2l(b,l); *(q++)=l; | ||
253 | c2l(b,l); *(q++)=l; | ||
254 | c2l(b,l); *(q++)=l; | ||
255 | c2l(b,l); *(q++)=l; | ||
256 | } | ||
257 | #endif | ||
258 | ripemd160_block(c,p,64); | ||
259 | } | ||
260 | |||
261 | #ifndef RMD160_ASM | ||
262 | |||
263 | void ripemd160_block(ctx, X, num) | ||
264 | RIPEMD160_CTX *ctx; | ||
265 | register ULONG *X; | ||
266 | int num; | ||
267 | { | ||
268 | register ULONG A,B,C,D,E; | ||
269 | ULONG a,b,c,d,e; | ||
270 | 98 | ||
271 | for (;;) | 99 | A=ctx->A; B=ctx->B; C=ctx->C; D=ctx->D; E=ctx->E; |
272 | { | ||
273 | A=ctx->A; B=ctx->B; C=ctx->C; D=ctx->D; E=ctx->E; | ||
274 | 100 | ||
275 | RIP1(A,B,C,D,E,WL00,SL00); | 101 | RIP1(A,B,C,D,E,WL00,SL00); |
276 | RIP1(E,A,B,C,D,WL01,SL01); | 102 | RIP1(E,A,B,C,D,WL01,SL01); |
@@ -453,83 +279,216 @@ int num; | |||
453 | ctx->E=ctx->A+b+C; | 279 | ctx->E=ctx->A+b+C; |
454 | ctx->A=D; | 280 | ctx->A=D; |
455 | 281 | ||
456 | X+=16; | ||
457 | num-=64; | ||
458 | if (num <= 0) break; | ||
459 | } | 282 | } |
460 | } | 283 | } |
461 | #endif | 284 | #endif |
462 | 285 | ||
463 | void RIPEMD160_Final(md, c) | 286 | #ifndef ripemd160_block_data_order |
464 | unsigned char *md; | 287 | #ifdef X |
465 | RIPEMD160_CTX *c; | 288 | #undef X |
289 | #endif | ||
290 | void ripemd160_block_data_order (RIPEMD160_CTX *ctx, const void *p, int num) | ||
466 | { | 291 | { |
467 | register int i,j; | 292 | const unsigned char *data=p; |
468 | register ULONG l; | 293 | register unsigned long A,B,C,D,E; |
469 | register ULONG *p; | 294 | unsigned long a,b,c,d,e,l; |
470 | static unsigned char end[4]={0x80,0x00,0x00,0x00}; | 295 | #ifndef MD32_XARRAY |
471 | unsigned char *cp=end; | 296 | /* See comment in crypto/sha/sha_locl.h for details. */ |
472 | 297 | unsigned long XX0, XX1, XX2, XX3, XX4, XX5, XX6, XX7, | |
473 | /* c->num should definitly have room for at least one more byte. */ | 298 | XX8, XX9,XX10,XX11,XX12,XX13,XX14,XX15; |
474 | p=c->data; | 299 | # define X(i) XX##i |
475 | j=c->num; | 300 | #else |
476 | i=j>>2; | 301 | RIPEMD160_LONG XX[16]; |
477 | 302 | # define X(i) XX[i] | |
478 | /* purify often complains about the following line as an | ||
479 | * Uninitialized Memory Read. While this can be true, the | ||
480 | * following p_c2l macro will reset l when that case is true. | ||
481 | * This is because j&0x03 contains the number of 'valid' bytes | ||
482 | * already in p[i]. If and only if j&0x03 == 0, the UMR will | ||
483 | * occur but this is also the only time p_c2l will do | ||
484 | * l= *(cp++) instead of l|= *(cp++) | ||
485 | * Many thanks to Alex Tang <altitude@cic.net> for pickup this | ||
486 | * 'potential bug' */ | ||
487 | #ifdef PURIFY | ||
488 | if ((j&0x03) == 0) p[i]=0; | ||
489 | #endif | 303 | #endif |
490 | l=p[i]; | 304 | |
491 | p_c2l(cp,l,j&0x03); | 305 | for (;num--;) |
492 | p[i]=l; | ||
493 | i++; | ||
494 | /* i is the next 'undefined word' */ | ||
495 | if (c->num >= RIPEMD160_LAST_BLOCK) | ||
496 | { | 306 | { |
497 | for (; i<RIPEMD160_LBLOCK; i++) | ||
498 | p[i]=0; | ||
499 | ripemd160_block(c,p,64); | ||
500 | i=0; | ||
501 | } | ||
502 | for (; i<(RIPEMD160_LBLOCK-2); i++) | ||
503 | p[i]=0; | ||
504 | p[RIPEMD160_LBLOCK-2]=c->Nl; | ||
505 | p[RIPEMD160_LBLOCK-1]=c->Nh; | ||
506 | ripemd160_block(c,p,64); | ||
507 | cp=md; | ||
508 | l=c->A; l2c(l,cp); | ||
509 | l=c->B; l2c(l,cp); | ||
510 | l=c->C; l2c(l,cp); | ||
511 | l=c->D; l2c(l,cp); | ||
512 | l=c->E; l2c(l,cp); | ||
513 | |||
514 | /* clear stuff, ripemd160_block may be leaving some stuff on the stack | ||
515 | * but I'm not worried :-) */ | ||
516 | c->num=0; | ||
517 | /* memset((char *)&c,0,sizeof(c));*/ | ||
518 | } | ||
519 | 307 | ||
520 | #ifdef undef | 308 | A=ctx->A; B=ctx->B; C=ctx->C; D=ctx->D; E=ctx->E; |
521 | int printit(l) | 309 | |
522 | unsigned long *l; | 310 | HOST_c2l(data,l); X( 0)=l; HOST_c2l(data,l); X( 1)=l; |
523 | { | 311 | RIP1(A,B,C,D,E,WL00,SL00); HOST_c2l(data,l); X( 2)=l; |
524 | int i,ii; | 312 | RIP1(E,A,B,C,D,WL01,SL01); HOST_c2l(data,l); X( 3)=l; |
313 | RIP1(D,E,A,B,C,WL02,SL02); HOST_c2l(data,l); X( 4)=l; | ||
314 | RIP1(C,D,E,A,B,WL03,SL03); HOST_c2l(data,l); X( 5)=l; | ||
315 | RIP1(B,C,D,E,A,WL04,SL04); HOST_c2l(data,l); X( 6)=l; | ||
316 | RIP1(A,B,C,D,E,WL05,SL05); HOST_c2l(data,l); X( 7)=l; | ||
317 | RIP1(E,A,B,C,D,WL06,SL06); HOST_c2l(data,l); X( 8)=l; | ||
318 | RIP1(D,E,A,B,C,WL07,SL07); HOST_c2l(data,l); X( 9)=l; | ||
319 | RIP1(C,D,E,A,B,WL08,SL08); HOST_c2l(data,l); X(10)=l; | ||
320 | RIP1(B,C,D,E,A,WL09,SL09); HOST_c2l(data,l); X(11)=l; | ||
321 | RIP1(A,B,C,D,E,WL10,SL10); HOST_c2l(data,l); X(12)=l; | ||
322 | RIP1(E,A,B,C,D,WL11,SL11); HOST_c2l(data,l); X(13)=l; | ||
323 | RIP1(D,E,A,B,C,WL12,SL12); HOST_c2l(data,l); X(14)=l; | ||
324 | RIP1(C,D,E,A,B,WL13,SL13); HOST_c2l(data,l); X(15)=l; | ||
325 | RIP1(B,C,D,E,A,WL14,SL14); | ||
326 | RIP1(A,B,C,D,E,WL15,SL15); | ||
327 | |||
328 | RIP2(E,A,B,C,D,WL16,SL16,KL1); | ||
329 | RIP2(D,E,A,B,C,WL17,SL17,KL1); | ||
330 | RIP2(C,D,E,A,B,WL18,SL18,KL1); | ||
331 | RIP2(B,C,D,E,A,WL19,SL19,KL1); | ||
332 | RIP2(A,B,C,D,E,WL20,SL20,KL1); | ||
333 | RIP2(E,A,B,C,D,WL21,SL21,KL1); | ||
334 | RIP2(D,E,A,B,C,WL22,SL22,KL1); | ||
335 | RIP2(C,D,E,A,B,WL23,SL23,KL1); | ||
336 | RIP2(B,C,D,E,A,WL24,SL24,KL1); | ||
337 | RIP2(A,B,C,D,E,WL25,SL25,KL1); | ||
338 | RIP2(E,A,B,C,D,WL26,SL26,KL1); | ||
339 | RIP2(D,E,A,B,C,WL27,SL27,KL1); | ||
340 | RIP2(C,D,E,A,B,WL28,SL28,KL1); | ||
341 | RIP2(B,C,D,E,A,WL29,SL29,KL1); | ||
342 | RIP2(A,B,C,D,E,WL30,SL30,KL1); | ||
343 | RIP2(E,A,B,C,D,WL31,SL31,KL1); | ||
344 | |||
345 | RIP3(D,E,A,B,C,WL32,SL32,KL2); | ||
346 | RIP3(C,D,E,A,B,WL33,SL33,KL2); | ||
347 | RIP3(B,C,D,E,A,WL34,SL34,KL2); | ||
348 | RIP3(A,B,C,D,E,WL35,SL35,KL2); | ||
349 | RIP3(E,A,B,C,D,WL36,SL36,KL2); | ||
350 | RIP3(D,E,A,B,C,WL37,SL37,KL2); | ||
351 | RIP3(C,D,E,A,B,WL38,SL38,KL2); | ||
352 | RIP3(B,C,D,E,A,WL39,SL39,KL2); | ||
353 | RIP3(A,B,C,D,E,WL40,SL40,KL2); | ||
354 | RIP3(E,A,B,C,D,WL41,SL41,KL2); | ||
355 | RIP3(D,E,A,B,C,WL42,SL42,KL2); | ||
356 | RIP3(C,D,E,A,B,WL43,SL43,KL2); | ||
357 | RIP3(B,C,D,E,A,WL44,SL44,KL2); | ||
358 | RIP3(A,B,C,D,E,WL45,SL45,KL2); | ||
359 | RIP3(E,A,B,C,D,WL46,SL46,KL2); | ||
360 | RIP3(D,E,A,B,C,WL47,SL47,KL2); | ||
361 | |||
362 | RIP4(C,D,E,A,B,WL48,SL48,KL3); | ||
363 | RIP4(B,C,D,E,A,WL49,SL49,KL3); | ||
364 | RIP4(A,B,C,D,E,WL50,SL50,KL3); | ||
365 | RIP4(E,A,B,C,D,WL51,SL51,KL3); | ||
366 | RIP4(D,E,A,B,C,WL52,SL52,KL3); | ||
367 | RIP4(C,D,E,A,B,WL53,SL53,KL3); | ||
368 | RIP4(B,C,D,E,A,WL54,SL54,KL3); | ||
369 | RIP4(A,B,C,D,E,WL55,SL55,KL3); | ||
370 | RIP4(E,A,B,C,D,WL56,SL56,KL3); | ||
371 | RIP4(D,E,A,B,C,WL57,SL57,KL3); | ||
372 | RIP4(C,D,E,A,B,WL58,SL58,KL3); | ||
373 | RIP4(B,C,D,E,A,WL59,SL59,KL3); | ||
374 | RIP4(A,B,C,D,E,WL60,SL60,KL3); | ||
375 | RIP4(E,A,B,C,D,WL61,SL61,KL3); | ||
376 | RIP4(D,E,A,B,C,WL62,SL62,KL3); | ||
377 | RIP4(C,D,E,A,B,WL63,SL63,KL3); | ||
378 | |||
379 | RIP5(B,C,D,E,A,WL64,SL64,KL4); | ||
380 | RIP5(A,B,C,D,E,WL65,SL65,KL4); | ||
381 | RIP5(E,A,B,C,D,WL66,SL66,KL4); | ||
382 | RIP5(D,E,A,B,C,WL67,SL67,KL4); | ||
383 | RIP5(C,D,E,A,B,WL68,SL68,KL4); | ||
384 | RIP5(B,C,D,E,A,WL69,SL69,KL4); | ||
385 | RIP5(A,B,C,D,E,WL70,SL70,KL4); | ||
386 | RIP5(E,A,B,C,D,WL71,SL71,KL4); | ||
387 | RIP5(D,E,A,B,C,WL72,SL72,KL4); | ||
388 | RIP5(C,D,E,A,B,WL73,SL73,KL4); | ||
389 | RIP5(B,C,D,E,A,WL74,SL74,KL4); | ||
390 | RIP5(A,B,C,D,E,WL75,SL75,KL4); | ||
391 | RIP5(E,A,B,C,D,WL76,SL76,KL4); | ||
392 | RIP5(D,E,A,B,C,WL77,SL77,KL4); | ||
393 | RIP5(C,D,E,A,B,WL78,SL78,KL4); | ||
394 | RIP5(B,C,D,E,A,WL79,SL79,KL4); | ||
395 | |||
396 | a=A; b=B; c=C; d=D; e=E; | ||
397 | /* Do other half */ | ||
398 | A=ctx->A; B=ctx->B; C=ctx->C; D=ctx->D; E=ctx->E; | ||
399 | |||
400 | RIP5(A,B,C,D,E,WR00,SR00,KR0); | ||
401 | RIP5(E,A,B,C,D,WR01,SR01,KR0); | ||
402 | RIP5(D,E,A,B,C,WR02,SR02,KR0); | ||
403 | RIP5(C,D,E,A,B,WR03,SR03,KR0); | ||
404 | RIP5(B,C,D,E,A,WR04,SR04,KR0); | ||
405 | RIP5(A,B,C,D,E,WR05,SR05,KR0); | ||
406 | RIP5(E,A,B,C,D,WR06,SR06,KR0); | ||
407 | RIP5(D,E,A,B,C,WR07,SR07,KR0); | ||
408 | RIP5(C,D,E,A,B,WR08,SR08,KR0); | ||
409 | RIP5(B,C,D,E,A,WR09,SR09,KR0); | ||
410 | RIP5(A,B,C,D,E,WR10,SR10,KR0); | ||
411 | RIP5(E,A,B,C,D,WR11,SR11,KR0); | ||
412 | RIP5(D,E,A,B,C,WR12,SR12,KR0); | ||
413 | RIP5(C,D,E,A,B,WR13,SR13,KR0); | ||
414 | RIP5(B,C,D,E,A,WR14,SR14,KR0); | ||
415 | RIP5(A,B,C,D,E,WR15,SR15,KR0); | ||
416 | |||
417 | RIP4(E,A,B,C,D,WR16,SR16,KR1); | ||
418 | RIP4(D,E,A,B,C,WR17,SR17,KR1); | ||
419 | RIP4(C,D,E,A,B,WR18,SR18,KR1); | ||
420 | RIP4(B,C,D,E,A,WR19,SR19,KR1); | ||
421 | RIP4(A,B,C,D,E,WR20,SR20,KR1); | ||
422 | RIP4(E,A,B,C,D,WR21,SR21,KR1); | ||
423 | RIP4(D,E,A,B,C,WR22,SR22,KR1); | ||
424 | RIP4(C,D,E,A,B,WR23,SR23,KR1); | ||
425 | RIP4(B,C,D,E,A,WR24,SR24,KR1); | ||
426 | RIP4(A,B,C,D,E,WR25,SR25,KR1); | ||
427 | RIP4(E,A,B,C,D,WR26,SR26,KR1); | ||
428 | RIP4(D,E,A,B,C,WR27,SR27,KR1); | ||
429 | RIP4(C,D,E,A,B,WR28,SR28,KR1); | ||
430 | RIP4(B,C,D,E,A,WR29,SR29,KR1); | ||
431 | RIP4(A,B,C,D,E,WR30,SR30,KR1); | ||
432 | RIP4(E,A,B,C,D,WR31,SR31,KR1); | ||
433 | |||
434 | RIP3(D,E,A,B,C,WR32,SR32,KR2); | ||
435 | RIP3(C,D,E,A,B,WR33,SR33,KR2); | ||
436 | RIP3(B,C,D,E,A,WR34,SR34,KR2); | ||
437 | RIP3(A,B,C,D,E,WR35,SR35,KR2); | ||
438 | RIP3(E,A,B,C,D,WR36,SR36,KR2); | ||
439 | RIP3(D,E,A,B,C,WR37,SR37,KR2); | ||
440 | RIP3(C,D,E,A,B,WR38,SR38,KR2); | ||
441 | RIP3(B,C,D,E,A,WR39,SR39,KR2); | ||
442 | RIP3(A,B,C,D,E,WR40,SR40,KR2); | ||
443 | RIP3(E,A,B,C,D,WR41,SR41,KR2); | ||
444 | RIP3(D,E,A,B,C,WR42,SR42,KR2); | ||
445 | RIP3(C,D,E,A,B,WR43,SR43,KR2); | ||
446 | RIP3(B,C,D,E,A,WR44,SR44,KR2); | ||
447 | RIP3(A,B,C,D,E,WR45,SR45,KR2); | ||
448 | RIP3(E,A,B,C,D,WR46,SR46,KR2); | ||
449 | RIP3(D,E,A,B,C,WR47,SR47,KR2); | ||
450 | |||
451 | RIP2(C,D,E,A,B,WR48,SR48,KR3); | ||
452 | RIP2(B,C,D,E,A,WR49,SR49,KR3); | ||
453 | RIP2(A,B,C,D,E,WR50,SR50,KR3); | ||
454 | RIP2(E,A,B,C,D,WR51,SR51,KR3); | ||
455 | RIP2(D,E,A,B,C,WR52,SR52,KR3); | ||
456 | RIP2(C,D,E,A,B,WR53,SR53,KR3); | ||
457 | RIP2(B,C,D,E,A,WR54,SR54,KR3); | ||
458 | RIP2(A,B,C,D,E,WR55,SR55,KR3); | ||
459 | RIP2(E,A,B,C,D,WR56,SR56,KR3); | ||
460 | RIP2(D,E,A,B,C,WR57,SR57,KR3); | ||
461 | RIP2(C,D,E,A,B,WR58,SR58,KR3); | ||
462 | RIP2(B,C,D,E,A,WR59,SR59,KR3); | ||
463 | RIP2(A,B,C,D,E,WR60,SR60,KR3); | ||
464 | RIP2(E,A,B,C,D,WR61,SR61,KR3); | ||
465 | RIP2(D,E,A,B,C,WR62,SR62,KR3); | ||
466 | RIP2(C,D,E,A,B,WR63,SR63,KR3); | ||
467 | |||
468 | RIP1(B,C,D,E,A,WR64,SR64); | ||
469 | RIP1(A,B,C,D,E,WR65,SR65); | ||
470 | RIP1(E,A,B,C,D,WR66,SR66); | ||
471 | RIP1(D,E,A,B,C,WR67,SR67); | ||
472 | RIP1(C,D,E,A,B,WR68,SR68); | ||
473 | RIP1(B,C,D,E,A,WR69,SR69); | ||
474 | RIP1(A,B,C,D,E,WR70,SR70); | ||
475 | RIP1(E,A,B,C,D,WR71,SR71); | ||
476 | RIP1(D,E,A,B,C,WR72,SR72); | ||
477 | RIP1(C,D,E,A,B,WR73,SR73); | ||
478 | RIP1(B,C,D,E,A,WR74,SR74); | ||
479 | RIP1(A,B,C,D,E,WR75,SR75); | ||
480 | RIP1(E,A,B,C,D,WR76,SR76); | ||
481 | RIP1(D,E,A,B,C,WR77,SR77); | ||
482 | RIP1(C,D,E,A,B,WR78,SR78); | ||
483 | RIP1(B,C,D,E,A,WR79,SR79); | ||
484 | |||
485 | D =ctx->B+c+D; | ||
486 | ctx->B=ctx->C+d+E; | ||
487 | ctx->C=ctx->D+e+A; | ||
488 | ctx->D=ctx->E+a+B; | ||
489 | ctx->E=ctx->A+b+C; | ||
490 | ctx->A=D; | ||
525 | 491 | ||
526 | for (i=0; i<2; i++) | ||
527 | { | ||
528 | for (ii=0; ii<8; ii++) | ||
529 | { | ||
530 | fprintf(stderr,"%08lx ",l[i*8+ii]); | ||
531 | } | ||
532 | fprintf(stderr,"\n"); | ||
533 | } | 492 | } |
534 | } | 493 | } |
535 | #endif | 494 | #endif |