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

其他游戏

开发平台:

Visual C++

  1. /* crypto/idea/i_cbc.c */
  2. /* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
  3.  * All rights reserved.
  4.  *
  5.  * This package is an SSL implementation written
  6.  * by Eric Young (eay@cryptsoft.com).
  7.  * The implementation was written so as to conform with Netscapes SSL.
  8.  * 
  9.  * This library is free for commercial and non-commercial use as long as
  10.  * the following conditions are aheared to.  The following conditions
  11.  * apply to all code found in this distribution, be it the RC4, RSA,
  12.  * lhash, DES, etc., code; not just the SSL code.  The SSL documentation
  13.  * included with this distribution is covered by the same copyright terms
  14.  * except that the holder is Tim Hudson (tjh@cryptsoft.com).
  15.  * 
  16.  * Copyright remains Eric Young's, and as such any Copyright notices in
  17.  * the code are not to be removed.
  18.  * If this package is used in a product, Eric Young should be given attribution
  19.  * as the author of the parts of the library used.
  20.  * This can be in the form of a textual message at program startup or
  21.  * in documentation (online or textual) provided with the package.
  22.  * 
  23.  * Redistribution and use in source and binary forms, with or without
  24.  * modification, are permitted provided that the following conditions
  25.  * are met:
  26.  * 1. Redistributions of source code must retain the copyright
  27.  *    notice, this list of conditions and the following disclaimer.
  28.  * 2. Redistributions in binary form must reproduce the above copyright
  29.  *    notice, this list of conditions and the following disclaimer in the
  30.  *    documentation and/or other materials provided with the distribution.
  31.  * 3. All advertising materials mentioning features or use of this software
  32.  *    must display the following acknowledgement:
  33.  *    "This product includes cryptographic software written by
  34.  *     Eric Young (eay@cryptsoft.com)"
  35.  *    The word 'cryptographic' can be left out if the rouines from the library
  36.  *    being used are not cryptographic related :-).
  37.  * 4. If you include any Windows specific code (or a derivative thereof) from 
  38.  *    the apps directory (application code) you must include an acknowledgement:
  39.  *    "This product includes software written by Tim Hudson (tjh@cryptsoft.com)"
  40.  * 
  41.  * THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND
  42.  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  43.  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  44.  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
  45.  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  46.  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  47.  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  48.  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  49.  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  50.  * OUT OF THE USE OF THIS  SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  51.  * SUCH DAMAGE.
  52.  * 
  53.  * The licence and distribution terms for any publically available version or
  54.  * derivative of this code cannot be changed.  i.e. this code cannot simply be
  55.  * copied and put under another distribution licence
  56.  * [including the GNU Public Licence.]
  57.  */
  58. #include <openssl/idea.h>
  59. #include "idea_lcl.h"
  60. void idea_cbc_encrypt(const unsigned char *in, unsigned char *out, long length,
  61.      IDEA_KEY_SCHEDULE *ks, unsigned char *iv, int encrypt)
  62. {
  63. register unsigned long tin0,tin1;
  64. register unsigned long tout0,tout1,xor0,xor1;
  65. register long l=length;
  66. unsigned long tin[2];
  67. if (encrypt)
  68. {
  69. n2l(iv,tout0);
  70. n2l(iv,tout1);
  71. iv-=8;
  72. for (l-=8; l>=0; l-=8)
  73. {
  74. n2l(in,tin0);
  75. n2l(in,tin1);
  76. tin0^=tout0;
  77. tin1^=tout1;
  78. tin[0]=tin0;
  79. tin[1]=tin1;
  80. idea_encrypt(tin,ks);
  81. tout0=tin[0]; l2n(tout0,out);
  82. tout1=tin[1]; l2n(tout1,out);
  83. }
  84. if (l != -8)
  85. {
  86. n2ln(in,tin0,tin1,l+8);
  87. tin0^=tout0;
  88. tin1^=tout1;
  89. tin[0]=tin0;
  90. tin[1]=tin1;
  91. idea_encrypt(tin,ks);
  92. tout0=tin[0]; l2n(tout0,out);
  93. tout1=tin[1]; l2n(tout1,out);
  94. }
  95. l2n(tout0,iv);
  96. l2n(tout1,iv);
  97. }
  98. else
  99. {
  100. n2l(iv,xor0);
  101. n2l(iv,xor1);
  102. iv-=8;
  103. for (l-=8; l>=0; l-=8)
  104. {
  105. n2l(in,tin0); tin[0]=tin0;
  106. n2l(in,tin1); tin[1]=tin1;
  107. idea_encrypt(tin,ks);
  108. tout0=tin[0]^xor0;
  109. tout1=tin[1]^xor1;
  110. l2n(tout0,out);
  111. l2n(tout1,out);
  112. xor0=tin0;
  113. xor1=tin1;
  114. }
  115. if (l != -8)
  116. {
  117. n2l(in,tin0); tin[0]=tin0;
  118. n2l(in,tin1); tin[1]=tin1;
  119. idea_encrypt(tin,ks);
  120. tout0=tin[0]^xor0;
  121. tout1=tin[1]^xor1;
  122. l2nn(tout0,tout1,out,l+8);
  123. xor0=tin0;
  124. xor1=tin1;
  125. }
  126. l2n(xor0,iv);
  127. l2n(xor1,iv);
  128. }
  129. tin0=tin1=tout0=tout1=xor0=xor1=0;
  130. tin[0]=tin[1]=0;
  131. }
  132. void idea_encrypt(unsigned long *d, IDEA_KEY_SCHEDULE *key)
  133. {
  134. register IDEA_INT *p;
  135. register unsigned long x1,x2,x3,x4,t0,t1,ul;
  136. x2=d[0];
  137. x1=(x2>>16);
  138. x4=d[1];
  139. x3=(x4>>16);
  140. p= &(key->data[0][0]);
  141. E_IDEA(0);
  142. E_IDEA(1);
  143. E_IDEA(2);
  144. E_IDEA(3);
  145. E_IDEA(4);
  146. E_IDEA(5);
  147. E_IDEA(6);
  148. E_IDEA(7);
  149. x1&=0xffff;
  150. idea_mul(x1,x1,*p,ul); p++;
  151. t0= x3+ *(p++);
  152. t1= x2+ *(p++);
  153. x4&=0xffff;
  154. idea_mul(x4,x4,*p,ul);
  155. d[0]=(t0&0xffff)|((x1&0xffff)<<16);
  156. d[1]=(x4&0xffff)|((t1&0xffff)<<16);
  157. }