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

其他游戏

开发平台:

Visual C++

  1. /* crypto/des/fcrypt_b.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 <stdio.h>
  59. /* This version of crypt has been developed from my MIT compatible
  60.  * DES library.
  61.  * The library is available at pub/Crypto/DES at ftp.psy.uq.oz.au
  62.  * Eric Young (eay@cryptsoft.com)
  63.  */
  64. #define DES_FCRYPT
  65. #include "des_locl.h"
  66. #undef DES_FCRYPT
  67. #undef PERM_OP
  68. #define PERM_OP(a,b,t,n,m) ((t)=((((a)>>(n))^(b))&(m)),
  69. (b)^=(t),
  70. (a)^=((t)<<(n)))
  71. #undef HPERM_OP
  72. #define HPERM_OP(a,t,n,m) ((t)=((((a)<<(16-(n)))^(a))&(m)),
  73. (a)=(a)^(t)^(t>>(16-(n))))
  74. void fcrypt_body(DES_LONG *out, DES_key_schedule *ks, DES_LONG Eswap0,
  75.  DES_LONG Eswap1)
  76. {
  77. register DES_LONG l,r,t,u;
  78. #ifdef DES_PTR
  79. register const unsigned char *des_SP=(const unsigned char *)DES_SPtrans;
  80. #endif
  81. register DES_LONG *s;
  82. register int j;
  83. register DES_LONG E0,E1;
  84. l=0;
  85. r=0;
  86. s=(DES_LONG *)ks;
  87. E0=Eswap0;
  88. E1=Eswap1;
  89. for (j=0; j<25; j++)
  90. {
  91. #ifndef DES_UNROLL
  92. register int i;
  93. for (i=0; i<32; i+=8)
  94. {
  95. D_ENCRYPT(l,r,i+0); /*  1 */
  96. D_ENCRYPT(r,l,i+2); /*  2 */
  97. D_ENCRYPT(l,r,i+4); /*  1 */
  98. D_ENCRYPT(r,l,i+6); /*  2 */
  99. }
  100. #else
  101. D_ENCRYPT(l,r, 0); /*  1 */
  102. D_ENCRYPT(r,l, 2); /*  2 */
  103. D_ENCRYPT(l,r, 4); /*  3 */
  104. D_ENCRYPT(r,l, 6); /*  4 */
  105. D_ENCRYPT(l,r, 8); /*  5 */
  106. D_ENCRYPT(r,l,10); /*  6 */
  107. D_ENCRYPT(l,r,12); /*  7 */
  108. D_ENCRYPT(r,l,14); /*  8 */
  109. D_ENCRYPT(l,r,16); /*  9 */
  110. D_ENCRYPT(r,l,18); /*  10 */
  111. D_ENCRYPT(l,r,20); /*  11 */
  112. D_ENCRYPT(r,l,22); /*  12 */
  113. D_ENCRYPT(l,r,24); /*  13 */
  114. D_ENCRYPT(r,l,26); /*  14 */
  115. D_ENCRYPT(l,r,28); /*  15 */
  116. D_ENCRYPT(r,l,30); /*  16 */
  117. #endif
  118. t=l;
  119. l=r;
  120. r=t;
  121. }
  122. l=ROTATE(l,3)&0xffffffffL;
  123. r=ROTATE(r,3)&0xffffffffL;
  124. PERM_OP(l,r,t, 1,0x55555555L);
  125. PERM_OP(r,l,t, 8,0x00ff00ffL);
  126. PERM_OP(l,r,t, 2,0x33333333L);
  127. PERM_OP(r,l,t,16,0x0000ffffL);
  128. PERM_OP(l,r,t, 4,0x0f0f0f0fL);
  129. out[0]=r;
  130. out[1]=l;
  131. }