chiark - git - mdw - catacomb/blob - symm/cast-base.h

   1 /* -*-c-*-
   2  *
   3  * Basic macros and definitions for CAST-128 and CAST-256
   4  *
   5  * (c) 2000 Straylight/Edgeware
   6  */
   7
   8 /*----- Licensing notice --------------------------------------------------*
   9  *
  10  * This file is part of Catacomb.
  11  *
  12  * Catacomb is free software; you can redistribute it and/or modify
  13  * it under the terms of the GNU Library General Public License as
  14  * published by the Free Software Foundation; either version 2 of the
  15  * License, or (at your option) any later version.
  16  *
  17  * Catacomb is distributed in the hope that it will be useful,
  18  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  19  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  20  * GNU Library General Public License for more details.
  21  *
  22  * You should have received a copy of the GNU Library General Public
  23  * License along with Catacomb; if not, write to the Free
  24  * Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
  25  * MA 02111-1307, USA.
  26  */
  27
  28 #ifndef CATACOMB_CAST_BASE_H
  29 #define CATACOMB_CAST_BASE_H
  30
  31 #ifdef __cplusplus
  32   extern "C" {
  33 #endif
  34
  35 /*----- Header files ------------------------------------------------------*/
  36
  37 #include <mLib/bits.h>
  38
  39 /*----- Round functions ---------------------------------------------------*/
  40
  41 #define CAST_R_guts(km, kr, xx, yy, aop, bop, cop) do {                 \
  42   uint32 i = km aop yy;                                                 \
  43   unsigned _r = kr;                                                     \
  44   i = ROL32(i, _r);                                                     \
  45   xx ^= ((cast_s[0][U8(i >> 24)] bop                                    \
  46           cast_s[1][U8(i >> 16)]) cop                                   \
  47           cast_s[2][U8(i >>  8)]) aop                                   \
  48           cast_s[3][U8(i >>  0)];                                       \
  49 } while (0)
  50
  51 #define CAST_R1(km, kr, xx, yy) CAST_R_guts(km, kr, xx, yy, +, ^, -)
  52 #define CAST_R2(km, kr, xx, yy) CAST_R_guts(km, kr, xx, yy, ^, -, +)
  53 #define CAST_R3(km, kr, xx, yy) CAST_R_guts(km, kr, xx, yy, -, +, ^)
  54
  55 /*----- Global variables --------------------------------------------------*/
  56
  57 extern const uint32 cast_s[4][256], cast_sk[4][256];
  58
  59 /*----- That's all, folks -------------------------------------------------*/
  60
  61 #ifdef __cplusplus
  62   }
  63 #endif
  64
  65 #endif