sys/crypto/des/des_ecb.c

   1 /*      $FreeBSD: src/sys/crypto/des/des_ecb.c,v 1.1.2.3 2002/03/26 10:12:24 ume Exp $  */
   2 /*      $DragonFly: src/sys/crypto/des/des_ecb.c,v 1.4 2006/12/20 18:14:37 dillon Exp $ */
   3 /*      $KAME: des_ecb.c,v 1.6 2001/09/10 04:03:58 itojun Exp $ */
   4
   5 /* crypto/des/ecb_enc.c */
   6 /* Copyright (C) 1995-1998 Eric Young (eay@mincom.oz.au)
   7  * All rights reserved.
   8  *
   9  * This file is part of an SSL implementation written
  10  * by Eric Young (eay@mincom.oz.au).
  11  * The implementation was written so as to conform with Netscapes SSL
  12  * specification.  This library and applications are
  13  * FREE FOR COMMERCIAL AND NON-COMMERCIAL USE
  14  * as long as the following conditions are aheared to.
  15  *
  16  * Copyright remains Eric Young's, and as such any Copyright notices in
  17  * the code are not to be removed.  If this code is used in a product,
  18  * Eric Young should be given attribution as the author of the parts used.
  19  * This can be in the form of a textual message at program startup or
  20  * in documentation (online or textual) provided with the package.
  21  *
  22  * Redistribution and use in source and binary forms, with or without
  23  * modification, are permitted provided that the following conditions
  24  * are met:
  25  * 1. Redistributions of source code must retain the copyright
  26  *    notice, this list of conditions and the following disclaimer.
  27  * 2. Redistributions in binary form must reproduce the above copyright
  28  *    notice, this list of conditions and the following disclaimer in the
  29  *    documentation and/or other materials provided with the distribution.
  30  * 3. All advertising materials mentioning features or use of this software
  31  *    must display the following acknowledgement:
  32  *    This product includes software developed by Eric Young (eay@mincom.oz.au)
  33  *
  34  * THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND
  35  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  36  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  37  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
  38  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  39  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  40  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  41  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  42  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  43  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  44  * SUCH DAMAGE.
  45  *
  46  * The licence and distribution terms for any publically available version or
  47  * derivative of this code cannot be changed.  i.e. this code cannot simply be
  48  * copied and put under another distribution licence
  49  * [including the GNU Public Licence.]
  50  */
  51
  52 #include <sys/param.h>
  53 #include <sys/systm.h>
  54 #include <crypto/des/des_locl.h>
  55 #include <crypto/des/spr.h>
  56
  57 /* char *libdes_version="libdes v 3.24 - 20-Apr-1996 - eay"; */ /* wrong */
  58 /* char *DES_version="DES part of SSLeay 0.6.4 30-Aug-1996"; */
  59
  60 char *des_options(void)
  61         {
  62         static int init=1;
  63         static char buf[32];
  64
  65         if (init)
  66                 {
  67                 const char *ptr,*unroll,*risc,*size;
  68
  69 #ifdef DES_PTR
  70                 ptr="ptr";
  71 #else
  72                 ptr="idx";
  73 #endif
  74 #if defined(DES_RISC1) || defined(DES_RISC2)
  75 #ifdef DES_RISC1
  76                 risc="risc1";
  77 #endif
  78 #ifdef DES_RISC2
  79                 risc="risc2";
  80 #endif
  81 #else
  82                 risc="cisc";
  83 #endif
  84 #ifdef DES_UNROLL
  85                 unroll="16";
  86 #else
  87                 unroll="4";
  88 #endif
  89                 if (sizeof(DES_LONG) != sizeof(long))
  90                         size="int";
  91                 else
  92                         size="long";
  93                 ksprintf(buf,"des(%s,%s,%s,%s)",ptr,risc,unroll,size);
  94                 init=0;
  95                 }
  96         return(buf);
  97 }
  98 void des_ecb_encrypt(des_cblock *input, des_cblock *output,
  99                      des_key_schedule ks, int enc)
 100 {
 101         DES_LONG l;
 102         DES_LONG ll[2];
 103         const unsigned char *in=&(*input)[0];
 104         unsigned char *out = &(*output)[0];
 105
 106         c2l(in,l); ll[0]=l;
 107         c2l(in,l); ll[1]=l;
 108         des_encrypt1(ll,ks,enc);
 109         l=ll[0]; l2c(l,out);
 110         l=ll[1]; l2c(l,out);
 111         l=ll[0]=ll[1]=0;
 112 }
 113
 114 void des_ecb3_encrypt(des_cblock *input, des_cblock *output,
 115              des_key_schedule ks1, des_key_schedule ks2, des_key_schedule ks3,
 116              int enc)
 117 {
 118         DES_LONG l0,l1;
 119         DES_LONG ll[2];
 120         const unsigned char *in = &(*input)[0];
 121         unsigned char *out = &(*output)[0];
 122
 123         c2l(in,l0);
 124         c2l(in,l1);
 125         ll[0]=l0;
 126         ll[1]=l1;
 127
 128         if (enc)
 129                 des_encrypt3(ll,ks1,ks2,ks3);
 130         else
 131                 des_decrypt3(ll,ks1,ks2,ks3);
 132
 133         l0=ll[0];
 134         l1=ll[1];
 135         l2c(l0,out);
 136         l2c(l1,out);
 137 }