sys/crypto/des/des_ecb.c

   1 /*      $NetBSD: des_ecb.c,v 1.7.6.1 2005/03/04 16:40:52 skrll Exp $    */
   2 /*      $KAME: des_ecb.c,v 1.5 2000/11/06 13:58:08 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/cdefs.h>
  52 __KERNEL_RCSID(0, "$NetBSD: des_ecb.c,v 1.7.6.1 2005/03/04 16:40:52 skrll Exp $");
  53
  54 #include <sys/param.h>
  55 #ifdef _KERNEL
  56 #include <sys/systm.h>
  57 #else
  58 #include <stdio.h>
  59 #include <string.h>
  60 #endif
  61 #include <crypto/des/des_locl.h>
  62 #include <crypto/des/spr.h>
  63
  64 /* char *libdes_version="libdes v 3.24 - 20-Apr-1996 - eay"; */ /* wrong */
  65 /* char *DES_version="DES part of SSLeay 0.6.4 30-Aug-1996"; */
  66
  67 char *des_options(void)
  68         {
  69         static int init=1;
  70         static char buf[32];
  71
  72         if (init)
  73                 {
  74                 const char *ptr,*unroll,*risc,*size;
  75
  76 #ifdef DES_PTR
  77                 ptr="ptr";
  78 #else
  79                 ptr="idx";
  80 #endif
  81 #if defined(DES_RISC1) || defined(DES_RISC2)
  82 #ifdef DES_RISC1
  83                 risc="risc1";
  84 #endif
  85 #ifdef DES_RISC2
  86                 risc="risc2";
  87 #endif
  88 #else
  89                 risc="cisc";
  90 #endif
  91 #ifdef DES_UNROLL
  92                 unroll="16";
  93 #else
  94                 unroll="4";
  95 #endif
  96                 /*CONSTCOND*/
  97                 if (sizeof(DES_LONG) != sizeof(long))
  98                         size="int";
  99                 else
 100                         size="long";
 101                 sprintf(buf,"des(%s,%s,%s,%s)",ptr,risc,unroll,size);
 102                 init=0;
 103                 }
 104         return(buf);
 105 }
 106 void des_ecb_encrypt(des_cblock *input, des_cblock *output,
 107                      des_key_schedule ks, int enc)
 108 {
 109         register DES_LONG l;
 110         DES_LONG ll[2];
 111         const unsigned char *in=&(*input)[0];
 112         unsigned char *out = &(*output)[0];
 113
 114         c2l(in,l); ll[0]=l;
 115         c2l(in,l); ll[1]=l;
 116         des_encrypt1(ll,ks,enc);
 117         l=ll[0]; l2c(l,out);
 118         l=ll[1]; l2c(l,out);
 119         l=ll[0]=ll[1]=0;
 120 }
 121
 122 void des_ecb3_encrypt(des_cblock *input, des_cblock *output,
 123              des_key_schedule ks1, des_key_schedule ks2, des_key_schedule ks3,
 124              int enc)
 125 {
 126         register DES_LONG l0,l1;
 127         DES_LONG ll[2];
 128         const unsigned char *in = &(*input)[0];
 129         unsigned char *out = &(*output)[0];
 130
 131         c2l(in,l0);
 132         c2l(in,l1);
 133         ll[0]=l0;
 134         ll[1]=l1;
 135
 136         if (enc)
 137                 des_encrypt3(ll,ks1,ks2,ks3);
 138         else
 139                 des_decrypt3(ll,ks1,ks2,ks3);
 140
 141         l0=ll[0];
 142         l1=ll[1];
 143         l2c(l0,out);
 144         l2c(l1,out);
 145 }