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