ede_cbcm_enc.c
上传用户:yisoukefu
上传日期:2020-08-09
资源大小:39506k
文件大小:5k
源码类别:

其他游戏

开发平台:

Visual C++

  1. /* ede_cbcm_enc.c */
  2. /* Written by Ben Laurie <ben@algroup.co.uk> for the OpenSSL
  3.  * project 13 Feb 1999.
  4.  */
  5. /* ====================================================================
  6.  * Copyright (c) 1999 The OpenSSL Project.  All rights reserved.
  7.  *
  8.  * Redistribution and use in source and binary forms, with or without
  9.  * modification, are permitted provided that the following conditions
  10.  * are met:
  11.  *
  12.  * 1. Redistributions of source code must retain the above copyright
  13.  *    notice, this list of conditions and the following disclaimer. 
  14.  *
  15.  * 2. Redistributions in binary form must reproduce the above copyright
  16.  *    notice, this list of conditions and the following disclaimer in
  17.  *    the documentation and/or other materials provided with the
  18.  *    distribution.
  19.  *
  20.  * 3. All advertising materials mentioning features or use of this
  21.  *    software must display the following acknowledgment:
  22.  *    "This product includes software developed by the OpenSSL Project
  23.  *    for use in the OpenSSL Toolkit. (http://www.OpenSSL.org/)"
  24.  *
  25.  * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to
  26.  *    endorse or promote products derived from this software without
  27.  *    prior written permission. For written permission, please contact
  28.  *    licensing@OpenSSL.org.
  29.  *
  30.  * 5. Products derived from this software may not be called "OpenSSL"
  31.  *    nor may "OpenSSL" appear in their names without prior written
  32.  *    permission of the OpenSSL Project.
  33.  *
  34.  * 6. Redistributions of any form whatsoever must retain the following
  35.  *    acknowledgment:
  36.  *    "This product includes software developed by the OpenSSL Project
  37.  *    for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)"
  38.  *
  39.  * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY
  40.  * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  41.  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
  42.  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE OpenSSL PROJECT OR
  43.  * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
  44.  * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  45.  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
  46.  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  47.  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
  48.  * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
  49.  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
  50.  * OF THE POSSIBILITY OF SUCH DAMAGE.
  51.  * ====================================================================
  52.  *
  53.  * This product includes cryptographic software written by Eric Young
  54.  * (eay@cryptsoft.com).  This product includes software written by Tim
  55.  * Hudson (tjh@cryptsoft.com).
  56.  *
  57.  */
  58. /*
  59. This is an implementation of Triple DES Cipher Block Chaining with Output
  60. Feedback Masking, by Coppersmith, Johnson and Matyas, (IBM and Certicom).
  61. Note that there is a known attack on this by Biham and Knudsen but it takes
  62. a lot of work:
  63. http://www.cs.technion.ac.il/users/wwwb/cgi-bin/tr-get.cgi/1998/CS/CS0928.ps.gz
  64. */
  65. #include <openssl/opensslconf.h> /* To see if OPENSSL_NO_DESCBCM is defined */
  66. #ifndef OPENSSL_NO_DESCBCM
  67. #include "des_locl.h"
  68. void DES_ede3_cbcm_encrypt(const unsigned char *in, unsigned char *out,
  69.      long length, DES_key_schedule *ks1, DES_key_schedule *ks2,
  70.      DES_key_schedule *ks3, DES_cblock *ivec1, DES_cblock *ivec2,
  71.      int enc)
  72.     {
  73.     register DES_LONG tin0,tin1;
  74.     register DES_LONG tout0,tout1,xor0,xor1,m0,m1;
  75.     register long l=length;
  76.     DES_LONG tin[2];
  77.     unsigned char *iv1,*iv2;
  78.     iv1 = &(*ivec1)[0];
  79.     iv2 = &(*ivec2)[0];
  80.     if (enc)
  81. {
  82. c2l(iv1,m0);
  83. c2l(iv1,m1);
  84. c2l(iv2,tout0);
  85. c2l(iv2,tout1);
  86. for (l-=8; l>=-7; l-=8)
  87.     {
  88.     tin[0]=m0;
  89.     tin[1]=m1;
  90.     DES_encrypt1(tin,ks3,1);
  91.     m0=tin[0];
  92.     m1=tin[1];
  93.     if(l < 0)
  94. {
  95. c2ln(in,tin0,tin1,l+8);
  96. }
  97.     else
  98. {
  99. c2l(in,tin0);
  100. c2l(in,tin1);
  101. }
  102.     tin0^=tout0;
  103.     tin1^=tout1;
  104.     tin[0]=tin0;
  105.     tin[1]=tin1;
  106.     DES_encrypt1(tin,ks1,1);
  107.     tin[0]^=m0;
  108.     tin[1]^=m1;
  109.     DES_encrypt1(tin,ks2,0);
  110.     tin[0]^=m0;
  111.     tin[1]^=m1;
  112.     DES_encrypt1(tin,ks1,1);
  113.     tout0=tin[0];
  114.     tout1=tin[1];
  115.     l2c(tout0,out);
  116.     l2c(tout1,out);
  117.     }
  118. iv1=&(*ivec1)[0];
  119. l2c(m0,iv1);
  120. l2c(m1,iv1);
  121. iv2=&(*ivec2)[0];
  122. l2c(tout0,iv2);
  123. l2c(tout1,iv2);
  124. }
  125.     else
  126. {
  127. register DES_LONG t0,t1;
  128. c2l(iv1,m0);
  129. c2l(iv1,m1);
  130. c2l(iv2,xor0);
  131. c2l(iv2,xor1);
  132. for (l-=8; l>=-7; l-=8)
  133.     {
  134.     tin[0]=m0;
  135.     tin[1]=m1;
  136.     DES_encrypt1(tin,ks3,1);
  137.     m0=tin[0];
  138.     m1=tin[1];
  139.     c2l(in,tin0);
  140.     c2l(in,tin1);
  141.     t0=tin0;
  142.     t1=tin1;
  143.     tin[0]=tin0;
  144.     tin[1]=tin1;
  145.     DES_encrypt1(tin,ks1,0);
  146.     tin[0]^=m0;
  147.     tin[1]^=m1;
  148.     DES_encrypt1(tin,ks2,1);
  149.     tin[0]^=m0;
  150.     tin[1]^=m1;
  151.     DES_encrypt1(tin,ks1,0);
  152.     tout0=tin[0];
  153.     tout1=tin[1];
  154.     tout0^=xor0;
  155.     tout1^=xor1;
  156.     if(l < 0)
  157. {
  158. l2cn(tout0,tout1,out,l+8);
  159. }
  160.     else
  161. {
  162. l2c(tout0,out);
  163. l2c(tout1,out);
  164. }
  165.     xor0=t0;
  166.     xor1=t1;
  167.     }
  168. iv1=&(*ivec1)[0];
  169. l2c(m0,iv1);
  170. l2c(m1,iv1);
  171. iv2=&(*ivec2)[0];
  172. l2c(xor0,iv2);
  173. l2c(xor1,iv2);
  174. }
  175.     tin0=tin1=tout0=tout1=xor0=xor1=0;
  176.     tin[0]=tin[1]=0;
  177.     }
  178. #endif