Mercurial > dropbear

comparison libtomcrypt/src/ciphers/skipjack.c @ 382:0cbe8f6dbf9e

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
propagate from branch 'au.asn.ucc.matt.ltc.dropbear' (head 2af22fb4e878750b88f80f90d439b316d229796f) to branch 'au.asn.ucc.matt.dropbear' (head 02c413252c90e9de8e03d91e9939dde3029f5c0a)
author Matt Johnston <matt@ucc.asn.au>
date Thu, 11 Jan 2007 02:41:05 +0000
parents 1b9e69c058d2
children f849a5ca2efc
comparison
equal deleted inserted replaced
379:b66a00272a90 382:0cbe8f6dbf9e
4 * algorithms in a highly modular and flexible manner. 4 * algorithms in a highly modular and flexible manner.
5 * 5 *
6 * The library is free for all purposes without any express 6 * The library is free for all purposes without any express
7 * guarantee it works. 7 * guarantee it works.
8 * 8 *
9 * Tom St Denis, [email protected], http://libtomcrypt.org 9 * Tom St Denis, [email protected], http://libtomcrypt.com
10 */ 10 */
11 11
12 /** 12 /**
13 @file skipjack.c 13 @file skipjack.c
14 Skipjack Implementation by Tom St Denis 14 Skipjack Implementation by Tom St Denis
26 &skipjack_ecb_encrypt, 26 &skipjack_ecb_encrypt,
27 &skipjack_ecb_decrypt, 27 &skipjack_ecb_decrypt,
28 &skipjack_test, 28 &skipjack_test,
29 &skipjack_done, 29 &skipjack_done,
30 &skipjack_keysize, 30 &skipjack_keysize,
31 NULL, NULL, NULL, NULL, NULL, NULL, NULL 31 NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL
32 }; 32 };
33 33
34 static const unsigned char sbox[256] = { 34 static const unsigned char sbox[256] = {
35 0xa3,0xd7,0x09,0x83,0xf8,0x48,0xf6,0xf4,0xb3,0x21,0x15,0x78,0x99,0xb1,0xaf,0xf9, 35 0xa3,0xd7,0x09,0x83,0xf8,0x48,0xf6,0xf4,0xb3,0x21,0x15,0x78,0x99,0xb1,0xaf,0xf9,
36 0xe7,0x2d,0x4d,0x8a,0xce,0x4c,0xca,0x2e,0x52,0x95,0xd9,0x1e,0x4e,0x38,0x44,0x28, 36 0xe7,0x2d,0x4d,0x8a,0xce,0x4c,0xca,0x2e,0x52,0x95,0xd9,0x1e,0x4e,0x38,0x44,0x28,
136 /** 136 /**
137 Encrypts a block of text with Skipjack 137 Encrypts a block of text with Skipjack
138 @param pt The input plaintext (8 bytes) 138 @param pt The input plaintext (8 bytes)
139 @param ct The output ciphertext (8 bytes) 139 @param ct The output ciphertext (8 bytes)
140 @param skey The key as scheduled 140 @param skey The key as scheduled
141 @return CRYPT_OK if successful
141 */ 142 */
142 #ifdef LTC_CLEAN_STACK 143 #ifdef LTC_CLEAN_STACK
143 static void _skipjack_ecb_encrypt(const unsigned char *pt, unsigned char *ct, symmetric_key *skey) 144 static int _skipjack_ecb_encrypt(const unsigned char *pt, unsigned char *ct, symmetric_key *skey)
144 #else 145 #else
145 void skipjack_ecb_encrypt(const unsigned char *pt, unsigned char *ct, symmetric_key *skey) 146 int skipjack_ecb_encrypt(const unsigned char *pt, unsigned char *ct, symmetric_key *skey)
146 #endif 147 #endif
147 { 148 {
148 unsigned w1,w2,w3,w4,tmp,tmp1; 149 unsigned w1,w2,w3,w4,tmp,tmp1;
149 int x, kp; 150 int x, kp;
150 151
181 /* store block */ 182 /* store block */
182 ct[0] = (w1>>8)&255; ct[1] = w1&255; 183 ct[0] = (w1>>8)&255; ct[1] = w1&255;
183 ct[2] = (w2>>8)&255; ct[3] = w2&255; 184 ct[2] = (w2>>8)&255; ct[3] = w2&255;
184 ct[4] = (w3>>8)&255; ct[5] = w3&255; 185 ct[4] = (w3>>8)&255; ct[5] = w3&255;
185 ct[6] = (w4>>8)&255; ct[7] = w4&255; 186 ct[6] = (w4>>8)&255; ct[7] = w4&255;
187
188 return CRYPT_OK;
186 } 189 }
187 190
188 #ifdef LTC_CLEAN_STACK 191 #ifdef LTC_CLEAN_STACK
189 void skipjack_ecb_encrypt(const unsigned char *pt, unsigned char *ct, symmetric_key *skey) 192 int skipjack_ecb_encrypt(const unsigned char *pt, unsigned char *ct, symmetric_key *skey)
190 { 193 {
191 _skipjack_ecb_encrypt(pt, ct, skey); 194 int err = _skipjack_ecb_encrypt(pt, ct, skey);
192 burn_stack(sizeof(unsigned) * 8 + sizeof(int) * 2); 195 burn_stack(sizeof(unsigned) * 8 + sizeof(int) * 2);
196 return err;
193 } 197 }
194 #endif 198 #endif
195 199
196 /** 200 /**
197 Decrypts a block of text with Skipjack 201 Decrypts a block of text with Skipjack
198 @param ct The input ciphertext (8 bytes) 202 @param ct The input ciphertext (8 bytes)
199 @param pt The output plaintext (8 bytes) 203 @param pt The output plaintext (8 bytes)
200 @param skey The key as scheduled 204 @param skey The key as scheduled
205 @return CRYPT_OK if successful
201 */ 206 */
202 #ifdef LTC_CLEAN_STACK 207 #ifdef LTC_CLEAN_STACK
203 static void _skipjack_ecb_decrypt(const unsigned char *ct, unsigned char *pt, symmetric_key *skey) 208 static int _skipjack_ecb_decrypt(const unsigned char *ct, unsigned char *pt, symmetric_key *skey)
204 #else 209 #else
205 void skipjack_ecb_decrypt(const unsigned char *ct, unsigned char *pt, symmetric_key *skey) 210 int skipjack_ecb_decrypt(const unsigned char *ct, unsigned char *pt, symmetric_key *skey)
206 #endif 211 #endif
207 { 212 {
208 unsigned w1,w2,w3,w4,tmp; 213 unsigned w1,w2,w3,w4,tmp;
209 int x, kp; 214 int x, kp;
210 215
245 /* store block */ 250 /* store block */
246 pt[0] = (w1>>8)&255; pt[1] = w1&255; 251 pt[0] = (w1>>8)&255; pt[1] = w1&255;
247 pt[2] = (w2>>8)&255; pt[3] = w2&255; 252 pt[2] = (w2>>8)&255; pt[3] = w2&255;
248 pt[4] = (w3>>8)&255; pt[5] = w3&255; 253 pt[4] = (w3>>8)&255; pt[5] = w3&255;
249 pt[6] = (w4>>8)&255; pt[7] = w4&255; 254 pt[6] = (w4>>8)&255; pt[7] = w4&255;
255
256 return CRYPT_OK;
250 } 257 }
251 258
252 #ifdef LTC_CLEAN_STACK 259 #ifdef LTC_CLEAN_STACK
253 void skipjack_ecb_decrypt(const unsigned char *ct, unsigned char *pt, symmetric_key *skey) 260 int skipjack_ecb_decrypt(const unsigned char *ct, unsigned char *pt, symmetric_key *skey)
254 { 261 {
255 _skipjack_ecb_decrypt(ct, pt, skey); 262 int err = _skipjack_ecb_decrypt(ct, pt, skey);
256 burn_stack(sizeof(unsigned) * 7 + sizeof(int) * 2); 263 burn_stack(sizeof(unsigned) * 7 + sizeof(int) * 2);
264 return err;
257 } 265 }
258 #endif 266 #endif
259 267
260 /** 268 /**
261 Performs a self-test of the Skipjack block cipher 269 Performs a self-test of the Skipjack block cipher
288 /* encrypt and decrypt */ 296 /* encrypt and decrypt */
289 skipjack_ecb_encrypt(tests[x].pt, buf[0], &key); 297 skipjack_ecb_encrypt(tests[x].pt, buf[0], &key);
290 skipjack_ecb_decrypt(buf[0], buf[1], &key); 298 skipjack_ecb_decrypt(buf[0], buf[1], &key);
291 299
292 /* compare */ 300 /* compare */
293 if (memcmp(buf[0], tests[x].ct, 8) != 0 || memcmp(buf[1], tests[x].pt, 8) != 0) { 301 if (XMEMCMP(buf[0], tests[x].ct, 8) != 0 || XMEMCMP(buf[1], tests[x].pt, 8) != 0) {
294 return CRYPT_FAIL_TESTVECTOR; 302 return CRYPT_FAIL_TESTVECTOR;
295 } 303 }
296 304
297 /* now see if we can encrypt all zero bytes 1000 times, decrypt and come back where we started */ 305 /* now see if we can encrypt all zero bytes 1000 times, decrypt and come back where we started */
298 for (y = 0; y < 8; y++) buf[0][y] = 0; 306 for (y = 0; y < 8; y++) buf[0][y] = 0;
329 } 337 }
330 338
331 #endif 339 #endif
332 340
333 /* $Source: /cvs/libtom/libtomcrypt/src/ciphers/skipjack.c,v $ */ 341 /* $Source: /cvs/libtom/libtomcrypt/src/ciphers/skipjack.c,v $ */
334 /* $Revision: 1.7 $ */ 342 /* $Revision: 1.12 $ */
335 /* $Date: 2005/05/05 14:35:58 $ */ 343 /* $Date: 2006/11/08 23:01:06 $ */