X-Git-Url: http://git.silcnet.org/gitweb/?a=blobdiff_plain;f=lib%2Fsilccrypt%2Fciphers_def.h;h=ad00c9aa90246e39b518c491b81916c8a820ccf6;hb=9f20f0382b6229eca740925a73f96294f6dcedc6;hp=12f455312dda90b78c70e5b8e6ac49cf55b76952;hpb=10b9a3d01d1c02cde995ad42b4b84e45d331b1fb;p=crypto.git diff --git a/lib/silccrypt/ciphers_def.h b/lib/silccrypt/ciphers_def.h index 12f45531..ad00c9aa 100644 --- a/lib/silccrypt/ciphers_def.h +++ b/lib/silccrypt/ciphers_def.h @@ -2,15 +2,14 @@ ciphers_def.h - Author: Pekka Riikonen + Author: Pekka Riikonen - Copyright (C) 1999 - 2000 Pekka Riikonen + Copyright (C) 1999 - 2008 Pekka Riikonen This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by - the Free Software Foundation; either version 2 of the License, or - (at your option) any later version. - + the Free Software Foundation; version 2 of the License. + This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the @@ -21,13 +20,18 @@ #ifndef CIPHERS_DEF_H #define CIPHERS_DEF_H + +#include "silclog.h" + /* General definitions for algorithms */ typedef unsigned char u1byte; -typedef uint32 u4byte; -typedef uint32 u32; +typedef SilcUInt32 u4byte; +typedef SilcUInt32 u32; +typedef SilcUInt32 uint_32t; +typedef SilcUInt8 uint_8t; -#define rotr(x, nr) (((x) >> ((int)(nr))) | ((x) << (32 - (int)(nr)))) -#define rotl(x, nr) (((x) << ((int)(nr))) | ((x) >> (32 - (int)(nr)))) +#define rotr(x, nr) silc_ror(x, nr) +#define rotl(x, nr) silc_rol(x, nr) #define byte(x, nr) ((x) >> (nr * 8) & 255) /* Byte key to words */ @@ -38,70 +42,517 @@ do { \ SILC_GET32_LSB(d[_i], s + (_i * 4)); \ } while(0); -/* CBC mode macros. */ +/* CBC mode 128-bit block, LSB, 32-bit block argument must be encrypted */ -#define SILC_CBC_GET_IV(d, s) \ -do { \ - SILC_GET32_LSB(d[0], &s[0]); \ - SILC_GET32_LSB(d[1], &s[4]); \ - SILC_GET32_LSB(d[2], &s[8]); \ - SILC_GET32_LSB(d[3], &s[12]); \ -} while(0); +#define SILC_CBC_ENC_LSB_128_32(len, iv, block, src, dst, i, enc) \ +do { \ + SILC_ASSERT((len & (16 - 1)) == 0); \ + if (len & (16 - 1)) \ + return FALSE; \ + \ + SILC_GET32_LSB(block[0], &iv[0]); \ + SILC_GET32_LSB(block[1], &iv[4]); \ + SILC_GET32_LSB(block[2], &iv[8]); \ + SILC_GET32_LSB(block[3], &iv[12]); \ + \ + for (i = 0; i < len; i += 16) { \ + SILC_GET32_X_LSB(block[0], &src[0]); \ + SILC_GET32_X_LSB(block[1], &src[4]); \ + SILC_GET32_X_LSB(block[2], &src[8]); \ + SILC_GET32_X_LSB(block[3], &src[12]); \ + \ + enc; \ + \ + SILC_PUT32_LSB(block[0], &dst[0]); \ + SILC_PUT32_LSB(block[1], &dst[4]); \ + SILC_PUT32_LSB(block[2], &dst[8]); \ + SILC_PUT32_LSB(block[3], &dst[12]); \ + \ + dst += 16; \ + src += 16; \ + } \ + \ + SILC_PUT32_LSB(block[0], &iv[0]); \ + SILC_PUT32_LSB(block[1], &iv[4]); \ + SILC_PUT32_LSB(block[2], &iv[8]); \ + SILC_PUT32_LSB(block[3], &iv[12]); \ +} while(0) -#define SILC_CBC_PUT_IV(s, d) \ -do { \ - SILC_PUT32_LSB(s[0], &d[0]); \ - SILC_PUT32_LSB(s[1], &d[4]); \ - SILC_PUT32_LSB(s[2], &d[8]); \ - SILC_PUT32_LSB(s[3], &d[12]); \ -} while(0); +/* CBC mode 128-bit block, LSB, decrypt block to block_dec. */ -#define SILC_CBC_ENC_PRE(d, s) \ -do { \ - SILC_GET32_X_LSB(d[0], &s[0]); \ - SILC_GET32_X_LSB(d[1], &s[4]); \ - SILC_GET32_X_LSB(d[2], &s[8]); \ - SILC_GET32_X_LSB(d[3], &s[12]); \ -} while(0); +#define SILC_CBC_DEC_LSB_128_32(len, iv, block_prev, block, \ + block_dec, src, dst, i, dec) \ +do { \ + if (!len || len & (16 - 1)) \ + return FALSE; \ + \ + SILC_GET32_LSB(block_prev[0], &iv[0]); \ + SILC_GET32_LSB(block_prev[1], &iv[4]); \ + SILC_GET32_LSB(block_prev[2], &iv[8]); \ + SILC_GET32_LSB(block_prev[3], &iv[12]); \ + \ + for (i = 0; i < len; i += 16) { \ + SILC_GET32_LSB(block[0], &src[0]); \ + SILC_GET32_LSB(block[1], &src[4]); \ + SILC_GET32_LSB(block[2], &src[8]); \ + SILC_GET32_LSB(block[3], &src[12]); \ + \ + dec; \ + \ + block_dec[0] ^= block_prev[0]; \ + block_dec[1] ^= block_prev[1]; \ + block_dec[2] ^= block_prev[2]; \ + block_dec[3] ^= block_prev[3]; \ + \ + SILC_PUT32_LSB(block_dec[0], &dst[0]); \ + SILC_PUT32_LSB(block_dec[1], &dst[4]); \ + SILC_PUT32_LSB(block_dec[2], &dst[8]); \ + SILC_PUT32_LSB(block_dec[3], &dst[12]); \ + \ + block_prev[0] = block[0]; \ + block_prev[1] = block[1]; \ + block_prev[2] = block[2]; \ + block_prev[3] = block[3]; \ + \ + dst += 16; \ + src += 16; \ + } \ + \ + SILC_PUT32_LSB(block[0], &iv[0]); \ + SILC_PUT32_LSB(block[1], &iv[4]); \ + SILC_PUT32_LSB(block[2], &iv[8]); \ + SILC_PUT32_LSB(block[3], &iv[12]); \ +} while(0) -#define SILC_CBC_ENC_POST(s, d, t) \ -do { \ - SILC_PUT32_LSB(s[0], &d[0]); \ - SILC_PUT32_LSB(s[1], &d[4]); \ - SILC_PUT32_LSB(s[2], &d[8]); \ - SILC_PUT32_LSB(s[3], &d[12]); \ - \ - d += 16; \ - t += 16; \ -} while(0); +/* CBC mode 128-bit block, MSB, 32-bit block argument must be encrypted */ -#define SILC_CBC_DEC_PRE(d, s) \ -do { \ - SILC_GET32_LSB(d[0], &s[0]); \ - SILC_GET32_LSB(d[1], &s[4]); \ - SILC_GET32_LSB(d[2], &s[8]); \ - SILC_GET32_LSB(d[3], &s[12]); \ -} while(0); +#define SILC_CBC_ENC_MSB_128_32(len, iv, block, src, dst, i, enc) \ +do { \ + SILC_ASSERT((len & (16 - 1)) == 0); \ + if (len & (16 - 1)) \ + return FALSE; \ + \ + SILC_GET32_MSB(block[0], &iv[0]); \ + SILC_GET32_MSB(block[1], &iv[4]); \ + SILC_GET32_MSB(block[2], &iv[8]); \ + SILC_GET32_MSB(block[3], &iv[12]); \ + \ + for (i = 0; i < len; i += 16) { \ + SILC_GET32_X_MSB(block[0], &src[0]); \ + SILC_GET32_X_MSB(block[1], &src[4]); \ + SILC_GET32_X_MSB(block[2], &src[8]); \ + SILC_GET32_X_MSB(block[3], &src[12]); \ + \ + enc; \ + \ + SILC_PUT32_MSB(block[0], &dst[0]); \ + SILC_PUT32_MSB(block[1], &dst[4]); \ + SILC_PUT32_MSB(block[2], &dst[8]); \ + SILC_PUT32_MSB(block[3], &dst[12]); \ + \ + dst += 16; \ + src += 16; \ + } \ + \ + SILC_PUT32_MSB(block[0], &iv[0]); \ + SILC_PUT32_MSB(block[1], &iv[4]); \ + SILC_PUT32_MSB(block[2], &iv[8]); \ + SILC_PUT32_MSB(block[3], &iv[12]); \ +} while(0) -#define SILC_CBC_DEC_POST(s, d, p, t, siv) \ -do { \ - s[0] ^= siv[0]; \ - s[1] ^= siv[1]; \ - s[2] ^= siv[2]; \ - s[3] ^= siv[3]; \ - \ - SILC_PUT32_LSB(s[0], &d[0]); \ - SILC_PUT32_LSB(s[1], &d[4]); \ - SILC_PUT32_LSB(s[2], &d[8]); \ - SILC_PUT32_LSB(s[3], &d[12]); \ - \ - siv[0] = t[0]; \ - siv[1] = t[1]; \ - siv[2] = t[2]; \ - siv[3] = t[3]; \ - \ - d += 16; \ - p += 16; \ -} while(0); +/* CBC mode 128-bit block, MSB, decrypt block to block_dec. */ + +#define SILC_CBC_DEC_MSB_128_32(len, iv, block_prev, block, \ + block_dec, src, dst, i, dec) \ +do { \ + if (!len || len & (16 - 1)) \ + return FALSE; \ + \ + SILC_GET32_MSB(block_prev[0], &iv[0]); \ + SILC_GET32_MSB(block_prev[1], &iv[4]); \ + SILC_GET32_MSB(block_prev[2], &iv[8]); \ + SILC_GET32_MSB(block_prev[3], &iv[12]); \ + \ + for (i = 0; i < len; i += 16) { \ + SILC_GET32_MSB(block[0], &src[0]); \ + SILC_GET32_MSB(block[1], &src[4]); \ + SILC_GET32_MSB(block[2], &src[8]); \ + SILC_GET32_MSB(block[3], &src[12]); \ + \ + dec; \ + \ + block_dec[0] ^= block_prev[0]; \ + block_dec[1] ^= block_prev[1]; \ + block_dec[2] ^= block_prev[2]; \ + block_dec[3] ^= block_prev[3]; \ + \ + SILC_PUT32_MSB(block_dec[0], &dst[0]); \ + SILC_PUT32_MSB(block_dec[1], &dst[4]); \ + SILC_PUT32_MSB(block_dec[2], &dst[8]); \ + SILC_PUT32_MSB(block_dec[3], &dst[12]); \ + \ + block_prev[0] = block[0]; \ + block_prev[1] = block[1]; \ + block_prev[2] = block[2]; \ + block_prev[3] = block[3]; \ + \ + dst += 16; \ + src += 16; \ + } \ + \ + SILC_PUT32_MSB(block[0], &iv[0]); \ + SILC_PUT32_MSB(block[1], &iv[4]); \ + SILC_PUT32_MSB(block[2], &iv[8]); \ + SILC_PUT32_MSB(block[3], &iv[12]); \ +} while(0) + +/* CBC mode 64-bit block, MSB, 32-bit block argument must be encrypted */ + +#define SILC_CBC_ENC_MSB_64_32(len, iv, block, src, dst, i, enc) \ +do { \ + SILC_ASSERT((len & (8 - 1)) == 0); \ + if (len & (8 - 1)) \ + return FALSE; \ + \ + SILC_GET32_MSB(block[0], &iv[0]); \ + SILC_GET32_MSB(block[1], &iv[4]); \ + \ + for (i = 0; i < len; i += 8) { \ + SILC_GET32_X_MSB(block[0], &src[0]); \ + SILC_GET32_X_MSB(block[1], &src[4]); \ + \ + enc; \ + \ + SILC_PUT32_MSB(block[0], &dst[0]); \ + SILC_PUT32_MSB(block[1], &dst[4]); \ + \ + dst += 8; \ + src += 8; \ + } \ + \ + SILC_PUT32_MSB(block[0], &iv[0]); \ + SILC_PUT32_MSB(block[1], &iv[4]); \ +} while(0) + +/* CBC mode 64-bit block, MSB, decrypt block to block_dec. */ + +#define SILC_CBC_DEC_MSB_64_32(len, iv, block_prev, block, \ + block_dec, src, dst, i, dec) \ +do { \ + if (!len || len & (8 - 1)) \ + return FALSE; \ + \ + SILC_GET32_MSB(block_prev[0], &iv[0]); \ + SILC_GET32_MSB(block_prev[1], &iv[4]); \ + \ + for (i = 0; i < len; i += 8) { \ + SILC_GET32_MSB(block[0], &src[0]); \ + SILC_GET32_MSB(block[1], &src[4]); \ + \ + dec; \ + \ + block_dec[0] ^= block_prev[0]; \ + block_dec[1] ^= block_prev[1]; \ + \ + SILC_PUT32_MSB(block_dec[0], &dst[0]); \ + SILC_PUT32_MSB(block_dec[1], &dst[4]); \ + \ + block_prev[0] = block[0]; \ + block_prev[1] = block[1]; \ + \ + dst += 8; \ + src += 8; \ + } \ + \ + SILC_PUT32_MSB(block[0], &iv[0]); \ + SILC_PUT32_MSB(block[1], &iv[4]); \ +} while(0) + +#ifndef WORDS_BIGENDIAN + +/* CTR mode 128-bit block, MSB, MSB counter, the 8-bit ctr argument must + be encrypted to enc_ctr */ + +#define SILC_CTR_MSB_128_8(ctr, enc_ctr, pad, src, dst, enc) \ +do { \ + while (len > 0) { \ + if (pad == 16) { \ + for (i = 15; i >= 0; i--) \ + if (++ctr[i]) \ + break; \ + \ + enc; \ + \ + if (len >= 16) { \ + *(SilcUInt64 *)dst = *(SilcUInt64 *)src ^ *(SilcUInt64 *)enc_ctr; \ + *(SilcUInt64 *)(dst + 8) = *(SilcUInt64 *)(src + 8) ^ \ + *(SilcUInt64 *)(enc_ctr + 8); \ + src += 16; \ + dst += 16; \ + len -= 16; \ + silc_prefetch((void *)src, 0, 0); \ + continue; \ + } \ + pad = 0; \ + } \ + *dst++ = *src++ ^ enc_ctr[pad++]; \ + len--; \ + } \ +} while(0) + +#else /* WORDS_BIGENDIAN */ + +#define SILC_CTR_MSB_128_8(ctr, enc_ctr, pad, src, dst, enc) \ +do { \ + while (len-- > 0) { \ + if (pad == 16) { \ + for (i = 15; i >= 0; i--) \ + if (++ctr[i]) \ + break; \ + \ + enc; \ + pad = 0; \ + } \ + *dst++ = *src++ ^ enc_ctr[pad++]; \ + } \ +} while(0) + +#endif /* !WORDS_BIGENDIAN */ + +/* CTR mode 128-bit block, LSB, MSB counter, the 32-bit tmp argument + must be encrypted, enc_ctr must have the encrypted data too. */ + +#define SILC_CTR_LSB_128_32(ctr, tmp, enc_ctr, pad, src, dst, enc) \ +do { \ + while (len-- > 0) { \ + if (pad == 16) { \ + for (i = 15; i >= 0; i--) \ + if (++ctr[i]) \ + break; \ + \ + SILC_GET32_LSB(tmp[0], ctr); \ + SILC_GET32_LSB(tmp[1], ctr + 4); \ + SILC_GET32_LSB(tmp[2], ctr + 8); \ + SILC_GET32_LSB(tmp[3], ctr + 12); \ + enc; \ + SILC_PUT32_LSB(tmp[0], enc_ctr); \ + SILC_PUT32_LSB(tmp[1], enc_ctr + 4); \ + SILC_PUT32_LSB(tmp[2], enc_ctr + 8); \ + SILC_PUT32_LSB(tmp[3], enc_ctr + 12); \ + pad = 0; \ + } \ + *dst++ = *src++ ^ enc_ctr[pad++]; \ + } \ +} while(0) + +/* CTR mode 128-bit block, LSB, MSB counter, the 32-bit tmp argument + must be encrypted, enc_ctr must have the encrypted data too. */ + +#define SILC_CTR_MSB_64_32(ctr, tmp, enc_ctr, pad, src, dst, enc) \ +do { \ + while (len-- > 0) { \ + if (pad == 8) { \ + for (i = 7; i >= 0; i--) \ + if (++ctr[i]) \ + break; \ + \ + SILC_GET32_MSB(tmp[0], ctr); \ + SILC_GET32_MSB(tmp[1], ctr + 4); \ + enc; \ + SILC_PUT32_MSB(tmp[0], enc_ctr); \ + SILC_PUT32_MSB(tmp[1], enc_ctr + 4); \ + pad = 0; \ + } \ + *dst++ = *src++ ^ enc_ctr[pad++]; \ + } \ +} while(0) + +/* CFB 128-bit block, LSB, the 32-bit cfb argument must be encrypted. */ + +#define SILC_CFB_ENC_LSB_128_32(iv, cfb, pad, src, dst, enc) \ +do { \ + while (len-- > 0) { \ + if (pad == 16) { \ + SILC_GET32_LSB(cfb[0], iv); \ + SILC_GET32_LSB(cfb[1], iv + 4); \ + SILC_GET32_LSB(cfb[2], iv + 8); \ + SILC_GET32_LSB(cfb[3], iv + 12); \ + \ + enc; \ + \ + SILC_PUT32_LSB(cfb[0], iv); \ + SILC_PUT32_LSB(cfb[1], iv + 4); \ + SILC_PUT32_LSB(cfb[2], iv + 8); \ + SILC_PUT32_LSB(cfb[3], iv + 12); \ + pad = 0; \ + } \ + iv[pad] = (*dst = *src ^ iv[pad]); \ + dst++; \ + src++; \ + pad++; \ + } \ +} while(0) + +/* CFB 128-bit block, LSB, the 32-bit cfb argument must be decrypted. */ + +#define SILC_CFB_DEC_LSB_128_32(iv, cfb, pad, src, dst, dec) \ +do { \ + unsigned char temp; \ + while (len-- > 0) { \ + if (pad == 16) { \ + SILC_GET32_LSB(cfb[0], iv); \ + SILC_GET32_LSB(cfb[1], iv + 4); \ + SILC_GET32_LSB(cfb[2], iv + 8); \ + SILC_GET32_LSB(cfb[3], iv + 12); \ + \ + dec; \ + \ + SILC_PUT32_LSB(cfb[0], iv); \ + SILC_PUT32_LSB(cfb[1], iv + 4); \ + SILC_PUT32_LSB(cfb[2], iv + 8); \ + SILC_PUT32_LSB(cfb[3], iv + 12); \ + pad = 0; \ + } \ + temp = *src; \ + *dst = temp ^ iv[pad]; \ + iv[pad++] = temp; \ + dst++; \ + src++; \ + } \ +} while(0) + +/* CFB 128-bit block, MSB, the 32-bit cfb argument must be encrypted. */ + +#define SILC_CFB_ENC_MSB_128_32(iv, cfb, pad, src, dst, enc) \ +do { \ + while (len-- > 0) { \ + if (pad == 16) { \ + SILC_GET32_MSB(cfb[0], iv); \ + SILC_GET32_MSB(cfb[1], iv + 4); \ + SILC_GET32_MSB(cfb[2], iv + 8); \ + SILC_GET32_MSB(cfb[3], iv + 12); \ + \ + enc; \ + \ + SILC_PUT32_MSB(cfb[0], iv); \ + SILC_PUT32_MSB(cfb[1], iv + 4); \ + SILC_PUT32_MSB(cfb[2], iv + 8); \ + SILC_PUT32_MSB(cfb[3], iv + 12); \ + pad = 0; \ + } \ + iv[pad] = (*dst = *src ^ iv[pad]); \ + dst++; \ + src++; \ + pad++; \ + } \ +} while(0) + +/* CFB 128-bit block, MSB, the 32-bit cfb argument must be decrypted. */ + +#define SILC_CFB_DEC_MSB_128_32(iv, cfb, pad, src, dst, dec) \ +do { \ + unsigned char temp; \ + while (len-- > 0) { \ + if (pad == 16) { \ + SILC_GET32_MSB(cfb[0], iv); \ + SILC_GET32_MSB(cfb[1], iv + 4); \ + SILC_GET32_MSB(cfb[2], iv + 8); \ + SILC_GET32_MSB(cfb[3], iv + 12); \ + \ + dec; \ + \ + SILC_PUT32_MSB(cfb[0], iv); \ + SILC_PUT32_MSB(cfb[1], iv + 4); \ + SILC_PUT32_MSB(cfb[2], iv + 8); \ + SILC_PUT32_MSB(cfb[3], iv + 12); \ + pad = 0; \ + } \ + temp = *src; \ + *dst = temp ^ iv[pad]; \ + iv[pad++] = temp; \ + dst++; \ + src++; \ + } \ +} while(0) + +/* CFB 64-bit block, MSB, the 32-bit cfb argument must be encrypted. */ + +#define SILC_CFB_ENC_MSB_64_32(iv, cfb, pad, src, dst, enc) \ +do { \ + while (len-- > 0) { \ + if (pad == 8) { \ + SILC_GET32_MSB(cfb[0], iv); \ + SILC_GET32_MSB(cfb[1], iv + 4); \ + \ + enc; \ + \ + SILC_PUT32_MSB(cfb[0], iv); \ + SILC_PUT32_MSB(cfb[1], iv + 4); \ + pad = 0; \ + } \ + iv[pad] = (*dst = *src ^ iv[pad]); \ + dst++; \ + src++; \ + pad++; \ + } \ +} while(0) + +/* CFB 64-bit block, MSB, the 32-bit cfb argument must be decrypted. */ + +#define SILC_CFB_DEC_MSB_64_32(iv, cfb, pad, src, dst, dec) \ +do { \ + unsigned char temp; \ + while (len-- > 0) { \ + if (pad == 8) { \ + SILC_GET32_MSB(cfb[0], iv); \ + SILC_GET32_MSB(cfb[1], iv + 4); \ + \ + dec; \ + \ + SILC_PUT32_MSB(cfb[0], iv); \ + SILC_PUT32_MSB(cfb[1], iv + 4); \ + pad = 0; \ + } \ + temp = *src; \ + *dst = temp ^ iv[pad]; \ + iv[pad++] = temp; \ + dst++; \ + src++; \ + } \ +} while(0) + +/* CFB 128-bit block, MSB, the 8-bit iv argument must be encrypted. */ + +#define SILC_CFB_ENC_MSB_128_8(iv, pad, src, dst, enc) \ +do { \ + while (len-- > 0) { \ + if (pad == 16) { \ + enc; \ + pad = 0; \ + } \ + iv[pad] = (*dst = *src ^ iv[pad]); \ + dst++; \ + src++; \ + pad++; \ + } \ +} while(0) + +/* CFB 128-bit block, MSB, the 8-bit iv argument must be decrypted. */ + +#define SILC_CFB_DEC_MSB_128_8(iv, pad, src, dst, dec) \ +do { \ + unsigned char temp; \ + while (len-- > 0) { \ + if (pad == 16) { \ + dec; \ + pad = 0; \ + } \ + temp = *src; \ + *dst = temp ^ iv[pad]; \ + iv[pad++] = temp; \ + dst++; \ + src++; \ + } \ +} while(0) #endif