Skip to content
Snippets Groups Projects
Select Git revision
  • 1952d80246b8ec811c1a848989d0871431e966da
  • master default protected
  • 9.0
  • 8.0
  • nt-tools
  • 7.8
  • 7.6
  • 7.4
  • 7.2
  • 7.0
  • 0.6
  • rosuav/latex-markdown-renderer
  • rxnpatch/rxnpatch
  • marcus/gobject-introspection
  • rxnpatch/8.0
  • rosuav/pre-listening-ports
  • rosuav/async-annotations
  • rosuav/pgsql-ssl
  • rxnpatch/rxnpatch-broken/2023-10-06T094250
  • grubba/fdlib
  • grubba/wip/sakura/8.0
  • v8.0.2020
  • v8.0.2018
  • v8.0.2016
  • v8.0.2014
  • v8.0.2012
  • v8.0.2008
  • v8.0.2006
  • v8.0.2004
  • v8.0.2002
  • v8.0.2000
  • v8.0.1998
  • v8.0.1996
  • v8.0.1994
  • v8.0.1992
  • v8.0.1990
  • v8.0.1988
  • v8.0.1986
  • rxnpatch/clusters/8.0/2025-04-29T124414
  • rxnpatch/2025-04-29T124414
  • v8.0.1984
41 results

Function.pmod

Blame
  • camellia-crypt-internal.c 4.14 KiB
    /* camellia-crypt-internal.c
     *
     * Copyright (C) 2006,2007
     * NTT (Nippon Telegraph and Telephone Corporation).
     *
     * Copyright (C) 2010 Niels Mller
     *
     * This library is free software; you can redistribute it and/or
     * modify it under the terms of the GNU Lesser General Public
     * License as published by the Free Software Foundation; either
     * version 2.1 of the License, or (at your option) any later version.
     *
     * This library 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 GNU
     * Lesser General Public License for more details.
     *
     * You should have received a copy of the GNU Lesser General Public
     * License along with this library; if not, write to the Free Software
     * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
     */
    
    /*
     * Algorithm Specification 
     *  http://info.isl.ntt.co.jp/crypt/eng/camellia/specifications.html
     */
    
    /* Based on camellia.c ver 1.2.0, see
       http://info.isl.ntt.co.jp/crypt/eng/camellia/dl/camellia-LGPL-1.2.0.tar.gz.
     */
    #if HAVE_CONFIG_H
    # include "config.h"
    #endif
    
    #include <assert.h>
    
    #include "camellia-internal.h"
    
    #include "macros.h"
    
    #define CAMELLIA_FL(x, k) do {			\
      uint32_t __xl, __xr, __kl, __kr, __t;		\
      __xl = (x) >> 32;				\
      __xr = (x) & 0xffffffff;			\
      __kl = (k) >> 32;				\
      __kr = (k) & 0xffffffff;			\
      __t = __xl & __kl;				\
      __xr ^= ROL32(1, __t);			\
      __xl ^= (__xr | __kr);			\
      (x) = ((uint64_t) __xl << 32) | __xr;		\
    } while (0)
    
    #define CAMELLIA_FLINV(x, k) do {		\
      uint32_t __xl, __xr, __kl, __kr, __t;		\
      __xl = (x) >> 32;				\
      __xr = (x) & 0xffffffff;			\
      __kl = (k) >> 32;				\
      __kr = (k) & 0xffffffff;			\
      __xl ^= (__xr | __kr);			\
      __t = __xl & __kl;				\
      __xr ^= ROL32(1, __t);			\
      (x) = ((uint64_t) __xl << 32) | __xr;		\
    } while (0)
    
    #define CAMELLIA_ROUNDSM(T, x, k, y) do {			\
        uint32_t __il, __ir;					\
        __ir							\
          = T->sp1110[(x) & 0xff]				\
          ^ T->sp0222[((x) >> 24) & 0xff]			\
          ^ T->sp3033[((x) >> 16) & 0xff]			\
          ^ T->sp4404[((x) >> 8) & 0xff];			\
        /* ir == (t6^t7^t8),(t5^t7^t8),(t5^t6^t8),(t5^t6^t7) */	\
        __il							\
          = T->sp1110[ (x) >> 56]				\
          ^ T->sp0222[((x) >> 48) & 0xff]			\
          ^ T->sp3033[((x) >> 40) & 0xff]			\
          ^ T->sp4404[((x) >> 32) & 0xff];			\
        /* il == (t1^t3^t4),(t1^t2^t4),(t1^t2^t3),(t2^t3^t4) */	\
        __ir ^= __il;						\
        /* ir == (t1^t3^t4^t6^t7^t8),(t1^t2^t4^t5^t7^t8),		\
                 (t1^t2^t3^t5^t6^t8),(t2^t3^t4^t5^t6^t7)		\
              == y1,y2,y3,y4 */					\
        __il = ROL32(24, __il);					\
        /* il == (t2^t3^t4),(t1^t3^t4),(t1^t2^t4),(t1^t2^t3) */	\
        __il ^= __ir;						\
        /* il == (t1^t2^t6^t7^t8),(t2^t3^t5^t7^t8),			\
                 (t3^t4^t5^t6^t8),(t1^t4^t5^t6^t7)			\
              == y5,y6,y7,y8 */					\
        y ^= (k);							\
        y ^= ((uint64_t) __ir << 32) | __il;			\
      } while (0)
    
    void
    _camellia_crypt(const struct camellia_ctx *ctx,
    		const struct camellia_table *T,
    		unsigned length, uint8_t *dst,
    		const uint8_t *src)
    {
      FOR_BLOCKS(length, dst, src, CAMELLIA_BLOCK_SIZE)
        {
          uint64_t i0,i1;
          unsigned i;
    
          i0 = READ_UINT64(src);
          i1 = READ_UINT64(src +  8);
          
          /* pre whitening but absorb kw2*/
          i0 ^= ctx->keys[0];
    
          /* main iteration */
    
          CAMELLIA_ROUNDSM(T, i0,ctx->keys[1], i1);
          CAMELLIA_ROUNDSM(T, i1,ctx->keys[2], i0);
          CAMELLIA_ROUNDSM(T, i0,ctx->keys[3], i1);
          CAMELLIA_ROUNDSM(T, i1,ctx->keys[4], i0);
          CAMELLIA_ROUNDSM(T, i0,ctx->keys[5], i1);
          CAMELLIA_ROUNDSM(T, i1,ctx->keys[6], i0);
          
          for (i = 0; i < ctx->nkeys - 8; i+= 8)
    	{
    	  CAMELLIA_FL(i0, ctx->keys[i+7]);
    	  CAMELLIA_FLINV(i1, ctx->keys[i+8]);
    	  
    	  CAMELLIA_ROUNDSM(T, i0,ctx->keys[i+9], i1);
    	  CAMELLIA_ROUNDSM(T, i1,ctx->keys[i+10], i0);
    	  CAMELLIA_ROUNDSM(T, i0,ctx->keys[i+11], i1);
    	  CAMELLIA_ROUNDSM(T, i1,ctx->keys[i+12], i0);
    	  CAMELLIA_ROUNDSM(T, i0,ctx->keys[i+13], i1);
    	  CAMELLIA_ROUNDSM(T, i1,ctx->keys[i+14], i0);
    	}
    
          /* post whitening but kw4 */
          i1 ^= ctx->keys[i+7];
    
          WRITE_UINT64(dst     , i1);
          WRITE_UINT64(dst +  8, i0);
        }
    }