#include "MyCryptogramHead.h"
//初始数据:
//IP的置换:
BYTE coorIP[2][64] = {
58 , 50 , 42 , 34 , 26 , 18 , 10 , 2 ,
60 , 52 , 44 , 36 , 28 , 20 , 12 , 4 ,
62 , 54 , 46 , 38 , 30 , 22 , 14 , 6 ,
64 , 56 , 48 , 40 , 32 , 24 , 16 , 8 ,
57 , 49 , 41 , 33 , 25 , 17 , 9 , 1 ,
59 , 51 , 43 , 35 , 27 , 19 , 11 , 3 ,
61 , 53 , 45 , 37 , 29 , 21 , 13 , 5 ,
63 , 55 , 47 , 39 , 31 , 23 , 15 , 7 ,
40 , 8 , 48 , 16 , 56 , 24 , 64 , 32 ,
39 , 7 , 47 , 15 , 55 , 23 , 63 , 31 ,
38 , 6 , 46 , 14 , 54 , 22 , 62 , 30 ,
37 , 5 , 45 , 13 , 53 , 21 , 61 , 29 ,
36 , 4 , 44 , 12 , 52 , 20 , 60 , 28 ,
35 , 3 , 43 , 11 , 51 , 19 , 59 , 27 ,
34 , 2 , 42 , 10 , 50 , 18 , 58 , 26 ,
33 , 1 , 41 , 9 , 49 , 17 , 57 , 25
};
//PC-1的置换
BYTE coorPC1_C[28] = {
57 , 49 , 41 , 33 , 25 , 17 , 9 , 1 , 58 , 50 , 42 , 34 , 26 , 18 ,
10 , 2 , 59 , 51 , 43 , 35 , 27 , 19 , 11 , 3 , 60 , 52 , 44 , 36 ,
};
BYTE coorPC1_D[28] = {
63 , 55 , 47 , 39 , 31 , 23 , 15 , 7 , 62 , 54 , 46 , 38 , 30 , 22 ,
14 , 6 , 61 , 53 , 45 , 37 , 29 , 21 , 13 , 5 , 28 , 20 , 12 , 4
};
//PC-2的置换
BYTE coorPC2[48] = {
14 , 17 , 11 , 24 , 1 , 5 , 3 , 28 , 15 , 6 , 21 , 10 ,
23 , 19 , 12 , 4 , 26 , 8 , 16 , 7 , 27 , 20 , 13 , 2 ,
41 , 52 , 31 , 37 , 47 , 55 , 30 , 40 , 51 , 45 , 33 , 48 ,
44 , 49 , 39 , 56 , 34 , 53 , 46 , 42 , 50 , 36 , 29 , 32
};
//以为次数表
BYTE nummove[16] = {
1 , 1 , 2 , 2 , 2 , 2 , 2 , 2 , 1 , 2 , 2 , 2 , 2 , 2 , 2 , 1
};
//bit逆序表
BYTE changebit[16] = {
0 , 8 , 4 , 12 , 2 , 10 , 6 , 14 , 1 , 9 , 5 , 13 , 3 , 11 , 7 , 15
};
//扩展算法的置换表
BYTE cooExpand[48] = {
32 , 1 , 2 , 3 , 4 , 5 , 4 , 5 , 6 , 7 , 8 , 9 ,
8 , 9 , 10 , 11 , 12 , 13 , 12 , 13 , 14 , 15 , 16 , 17 ,
16 , 17 , 18 , 19 , 20 , 21 , 20 , 21 , 22 , 23 , 24 , 25 ,
24 , 25 , 26 , 27 , 28 , 29 , 28 , 29 , 30 , 31 , 32 , 1
};
//S小盒的置换规则表
BYTE boxS[8][4][16]= {
//S盒1
{
14,4,13,1,2,15,11,8,3,10,6,12,5,9,0,7,
0,15,7,4,14,2,13,1,10,6,12,11,9,5,3,8,
4,1,14,8,13,6,2,11,15,12,9,7,3,10,5,0,
15,12,8,2,4,9,1,7,5,11,3,14,10,0,6,13
},
//S盒2
{
15,1,8,14,6,11,3,4,9,7,2,13,12,0,5,10,
3,13,4,7,15,2,8,14,12,0,1,10,6,9,11,5,
0,14,7,11,10,4,13,1,5,8,12,6,9,3,2,15,
13,8,10,1,3,15,4,2,11,6,7,12,0,5,14,9
},
//S盒3
{
10,0,9,14,6,3,15,5,1,13,12,7,11,4,2,8,
13,7,0,9,3,4,6,10,2,8,5,14,12,11,15,1,
13,6,4,9,8,15,3,0,11,1,2,12,5,10,14,7,
1,10,13,0,6,9,8,7,4,15,14,3,11,5,2,12
},
//S盒4
{
7,13,14,3,0,6,9,10,1,2,8,5,11,12,4,15,
13,8,11,5,6,15,0,3,4,7,2,12,1,10,14,9,
10,6,9,0,12,11,7,13,15,1,3,14,5,2,8,4,
3,15,0,6,10,1,13,8,9,4,5,11,12,7,2,14
},
//S盒5
{
2,12,4,1,7,10,11,6,8,5,3,15,13,0,14,9,
14,11,2,12,4,7,13,1,5,0,15,10,3,9,8,6,
4,2,1,11,10,13,7,8,15,9,12,5,6,3,0,14,
11,8,12,7,1,14,2,13,6,15,0,9,10,4,5,3
},
//S盒6
{
12,1,10,15,9,2,6,8,0,13,3,4,14,7,5,11,
10,15,4,2,7,12,9,5,6,1,13,14,0,11,3,8,
9,14,15,5,2,8,12,3,7,0,4,10,1,13,11,6,
4,3,2,12,9,5,15,10,11,14,1,7,6,0,8,13
},
//S盒7
{
4,11,2,14,15,0,8,13,3,12,9,7,5,10,6,1,
13,0,11,7,4,9,1,10,14,3,5,12,2,15,8,6,
1,4,11,13,12,3,7,14,10,15,6,8,0,5,9,2,
6,11,13,8,1,4,10,7,9,5,0,15,14,2,3,12
},
//S盒8
{
13,2,8,4,6,15,11,1,10,9,3,14,5,0,12,7,
1,15,13,8,10,3,7,4,12,5,6,11,0,14,9,2,
7,11,4,1,9,12,14,2,0,6,10,13,15,3,5,8,
2,1,14,7,4,10,8,13,15,12,9,0,3,5,6,11
}
};
//P的置换表
BYTE cooP[32] = {
16 , 7 , 20 , 21 , 29 , 12 , 28 , 17 , 1 , 15 , 23 , 26 , 5 , 18 , 31 , 10 ,
2 , 8 , 24 , 14 , 32 , 27 , 3 , 9 , 19 , 13 , 30 , 6 , 22 , 11 , 4 , 25
};
//定义寄存器
union THEregister
{
DWORD byte4 ;
BYTE byte1[4];
};
//置换将data1的64bits置换后放入data2
//功能:当function=0时为IP置换,当function=1时为IP的逆置换
void myDES_IniPermutation( BYTE * data1 , BYTE * data2 , BYTE function )
{
memset( data2 , 0 , 8 * sizeof( BYTE ) ) ;
BYTE i , CloseCode , Code ;
for( i = 0 ; i < 64 ; i++ )
{
CloseCode = 1 << ( ( coorIP[function][i] - 1 ) % 8 ) ;
if( ( CloseCode & data1[( coorIP[function][i] - 1 ) / 8] ) == 0 )
continue ;
Code = 1 << ( i % 8 ) ;
data2[i / 8] |= Code ;
}
return ;
}
//子密钥的生成
void myDES_ProduceKey( BYTE * Key , BYTE KeyN[16][8] )
{
THEregister registerC , registerD ;
BYTE i , i2 , CloseCode , Code , circle ,
midkey56[7];
registerC.byte4 = 0 ;
registerD.byte4 = 0 ;
for( i = 0 ; i < 16 ; i++ )
memset( KeyN[i] , 0 , 8 * sizeof( BYTE ) ) ;
//PC-1 C寄存器的初始化
for( i = 0 ; i < 28 ; i++ )
{
CloseCode = 1 << ( ( coorPC1_C[i] - 1 ) % 8 ) ;
if( ( CloseCode & Key[( coorPC1_C[i] - 1 ) / 8] ) == 0 )
continue ;
Code = 1 << ( i % 8 ) ;
registerC.byte1[i / 8] |= Code ;
}
//PC-1 D寄存器的初始化
for( i = 0 ; i < 28 ; i++ )
{
CloseCode = 1 << ( ( coorPC1_D[i] - 1 ) % 8 ) ;
if( ( CloseCode & Key[( coorPC1_D[i] - 1 ) / 8] ) == 0 )
continue ;
Code = 1 << ( i % 8 ) ;
registerD.byte1[i / 8] |= Code ;
}
//由左循环和PC-2生成子密钥
for( i = 0 ; i < 16 ; i++ )
{
//循环
for( circle = 0 ; circle < nummove[i] ; circle++ )
{
//C寄存器
Code = 1 ;
Code &= registerC.byte1[0] ;
Code <<= 3 ;
registerC.byte4 >>= 1 ; //在内存中存放为反向,所以进行右移
registerC.byte1[3] |= Code ;
//D寄存器
Code = 1 ;
Code &= registerD.byte1[0] ;
Code <<= 3 ;
registerD.byte4 >>= 1 ;
registerD.byte1[3] |= Code ;
}
//将C、D寄存器合并存入midkey56
memset( midkey56 , 0 , 7 * sizeof( BYTE ) ) ;
memcpy( midkey56 , registerC.byte1 , 4 * sizeof( BYTE ) ) ;
CloseCode = 15 ;
Code = CloseCode & registerD.byte1[0] ;
Code <<= 4 ;
midkey56[3] |= Code ;
registerD.byte4 >>= 4 ;
memcpy( midkey56 + 4 , registerD.byte1 , 3 * sizeof( BYTE ) ) ;
//PC-2运算
for( i2 = 0 ; i2 < 48 ; i2++ )
{
CloseCode = 1 << ( ( coorPC2[i2] - 1 ) % 8 ) ;
if( ( CloseCode & midkey56[( coorPC2[i2] - 1 ) / 8] ) == 0 )
continue ;
Code = 1 << ( i2 % 6 ) ;
//将子密钥按照每6bit一个字节的方式存放
KeyN[i][i2 / 6] |= Code ;
}
}
return ;
}
//将thestr中的bit按照小端表示放入newstr
void myDES_myChange( BYTE thestr[8] , BYTE newstr[8] )
{
memset( newstr , 0 , 8 * sizeof( BYTE ) ) ;
BYTE themid , i ;
for( i = 0 ; i < 8 ; i++ )
{
themid = 0 ;
themid |= ( changebit[ (thestr[i] & 0x0f) ] << 4 ) ;
themid |= changebit[ ((thestr[i] & 0xf0) >> 4) ] ;
newstr[i] = themid ;
}
return ;
}
//将32位数据扩展至48位,并且每六位存放一个字节
void myDES_expand( BYTE data32[4] , BYTE data48[8] )
{
memset( data48 , 0 , 8 * sizeof( BYTE ) ) ;
BYTE CloseCode , i , Code ;
for( i = 0 ; i < 48 ; i++ )
{
CloseCode = 1 << ( ( cooExpand[i] - 1 ) % 8 ) ;
if( ( CloseCode & data32[( cooExpand[i] - 1 ) / 8] ) == 0 )
continue ;
Code = 1 << ( i % 6 ) ;
data48[i / 6] |= Code ;
}
return ;
}
//f函数
void myDES_myF ( BYTE data[4] , BYTE newdata[4] , BYTE theKey[8] )
{
BYTE Edata[8] , middata[4] ,
i , CloseCode , Code ;
memset( newdata , 0 , 4 * sizeof( BYTE ) ) ;
memset( Edata , 0 , 8 * sizeof( BYTE ) ) ;
memset( middata , 0 , 4 * si