crypto/evp/e_rd.c

   1 /* ====================================================================
   2  * Copyright (c) 2000 The OpenSSL Project.  All rights reserved.
   3  *
   4  * Redistribution and use in source and binary forms, with or without
   5  * modification, are permitted provided that the following conditions
   6  * are met:
   7  *
   8  * 1. Redistributions of source code must retain the above copyright
   9  *    notice, this list of conditions and the following disclaimer.
  10  *
  11  * 2. Redistributions in binary form must reproduce the above copyright
  12  *    notice, this list of conditions and the following disclaimer in
  13  *    the documentation and/or other materials provided with the
  14  *    distribution.
  15  *
  16  * 3. All advertising materials mentioning features or use of this
  17  *    software must display the following acknowledgment:
  18  *    "This product includes software developed by the OpenSSL Project
  19  *    for use in the OpenSSL Toolkit. (http://www.openssl.org/)"
  20  *
  21  * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to
  22  *    endorse or promote products derived from this software without
  23  *    prior written permission. For written permission, please contact
  24  *    openssl-core@openssl.org.
  25  *
  26  * 5. Products derived from this software may not be called "OpenSSL"
  27  *    nor may "OpenSSL" appear in their names without prior written
  28  *    permission of the OpenSSL Project.
  29  *
  30  * 6. Redistributions of any form whatsoever must retain the following
  31  *    acknowledgment:
  32  *    "This product includes software developed by the OpenSSL Project
  33  *    for use in the OpenSSL Toolkit (http://www.openssl.org/)"
  34  *
  35  * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY
  36  * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  37  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
  38  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE OpenSSL PROJECT OR
  39  * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
  40  * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  41  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
  42  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  43  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
  44  * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
  45  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
  46  * OF THE POSSIBILITY OF SUCH DAMAGE.
  47  * ====================================================================
  48  *
  49  */
  50
  51 #include <openssl/evp.h>
  52 #include <openssl/err.h>
  53 #include <memory.h>
  54 #include <assert.h>
  55
  56 static EVP_CIPHER rd_cipher[3][3];
  57
  58 static int anSizes[]={16,24,32};
  59 static int anNIDs[3][3]=
  60     {
  61     { NID_rijndael_ecb_k128_b128,NID_rijndael_ecb_k192_b128,NID_rijndael_ecb_k256_b128 },
  62     { NID_rijndael_ecb_k128_b192,NID_rijndael_ecb_k192_b192,NID_rijndael_ecb_k256_b192 },
  63     { NID_rijndael_ecb_k128_b256,NID_rijndael_ecb_k192_b256,NID_rijndael_ecb_k256_b256 }
  64     };
  65
  66 static int rd_init_ecb(EVP_CIPHER_CTX *ctx, const unsigned char *key,
  67                        const unsigned char *iv, int enc)
  68     {
  69     RIJNDAEL_KEY *k=&ctx->c.rijndael;
  70
  71     k->enc=enc;
  72     k->rounds=ctx->cipher->key_len/4+6;
  73     rijndaelKeySched((const word8 (*)[4])key,k->keySched,k->rounds);
  74     if(!k->enc)
  75         rijndaelKeyEncToDec(k->keySched,k->rounds);
  76     memcpy(k->iv,iv,ctx->cipher->iv_len);
  77
  78     return 1;
  79     }
  80
  81 static int rd_cipher_ecb(EVP_CIPHER_CTX *ctx, unsigned char *out,
  82                          const unsigned char *in, unsigned int inl)
  83     {
  84     while(inl > 0)
  85         {
  86         if(ctx->c.rijndael.enc)
  87             rijndaelEncrypt(in,out,ctx->c.rijndael.keySched,
  88                             ctx->c.rijndael.rounds);
  89         else
  90             rijndaelDecrypt(in,out,ctx->c.rijndael.keySched,
  91                             ctx->c.rijndael.rounds);
  92         inl-=16;
  93         in+=16;
  94         out+=16;
  95         }
  96     assert(inl == 0);
  97
  98     return 1;
  99     }
 100
 101 EVP_CIPHER *EVP_rijndael_ecb(int nBlockLength,int nKeyLength)
 102     {
 103     EVP_CIPHER *c;
 104
 105     if(nBlockLength < 0 || nBlockLength > 2)
 106         {
 107         EVPerr(EVP_F_EVP_RIJNDAEL,EVP_R_BAD_BLOCK_LENGTH);
 108         return NULL;
 109         }
 110     if(nKeyLength < 0 || nKeyLength > 2)
 111         {
 112         EVPerr(EVP_F_EVP_RIJNDAEL,EVP_R_BAD_KEY_LENGTH);
 113         return NULL;
 114         }
 115
 116     c=&rd_cipher[nKeyLength][nBlockLength];
 117
 118     memset(c,'\0',sizeof *c);
 119
 120     c->nid=anNIDs[nBlockLength][nKeyLength];
 121     c->block_size=anSizes[nBlockLength];
 122     c->key_len=anSizes[nKeyLength];
 123     c->iv_len=16;
 124     c->flags=EVP_CIPH_ECB_MODE;
 125     c->init=rd_init_ecb;
 126     c->do_cipher=rd_cipher_ecb;
 127     c->ctx_size=sizeof(EVP_CIPHER_CTX)-sizeof((((EVP_CIPHER_CTX *)NULL)->c))+
 128                 sizeof((((EVP_CIPHER_CTX *)NULL)->c.rijndael));
 129
 130     return c;
 131     }