DES算法框架:
更详细的DES算法原理介绍可参考:DES算法原理及实现 (ruanx.net)
DES加密(C语言代码实现)
#include<stdio.h>
char p[16];
int p_[64];
int p_IP[64];
char Key[16];
int Key_[64];
int L[17][32],R[17][32];
int C[17][28],D[17][28];
int C_Round[17][48];
int Key_PC_1[56];
int IP_1_output[64],IP_1_input[64];
int Key_xunhuan[48];
int R_E[17][48];
int R_E_K[17][48];
int S_Input[8][6],S_Output[8][4];
int P_Input[17][32],P_Output[17][32];
char c[16];
int IP[64]=///IP置换表
{
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,
};
int IP_1[64]=///逆初始置换表
{
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
int pc_1[60]=
{
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,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};
int PC_2[48]=///密钥置换选择PC_2盒
{
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};
int E[48]=///扩展E盒
{
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,
};
int P[32]=///p盒置换表
{
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,
};
int s_box[8][4][16]={//S盒
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,
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,10,5,14,9,
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,
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,
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,
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,
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,
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};
int IP_replace()//IP置换
{
for(int i=0;i<64;i++)
p_IP[i]=p_[IP[i]-1];
for(int i=0;i<32;i++)//分成L0,R0
L[0][i]=p_IP[i];
for(int i=0;i<32;i++)
R[0][i]=p_IP[i+32];
}
int PC_1()//密钥置换
{
int j=0;
for(int i=0;i<56;i++)
Key_PC_1[i]=Key_[pc_1[i]-1];//此处应把p改为Key-----------------------------
for(int i=0;i<28;i++)//分成L0,R0
C[0][i]=Key_PC_1[i];
for(int i=0;i<28;i++)
D[0][i]=Key_PC_1[i+28];
}
int Key_change(int i)
{
int a,b,a1,a2,b1,b2;
if(i==1||i==2||i==9||i==16)//变换-循环左移1位
{
a=C[i-1][0];
for(int j=0;j<27;j++)
C[i][j]=C[i-1][j+1];
C[i][27]=a;
b=D[i-1][0];
for(int j=0;j<27;j++)
D[i][j]=D[i-1][j+1];
D[i][27]=b;
}
else//变换-循环左移2位
{
a1=C[i-1][0];
a2=C[i-1][1];
for(int j=0;j<26;j++)
C[i][j]=C[i-1][j+2];
C[i][26]=a1;
C[i][27]=a2;
b1=D[i-1][0];
b2=D[i-1][1];
for(int j=0;j<26;j++)
D[i][j]=D[i-1][j+2];
D[i][26]=b1;
D[i][27]=b2;
}
for(int j=0;j<28;j++)
Key_xunhuan[j]=C[i][j];
for(int j=28;j<56;j++)
Key_xunhuan[j]=D[i][j-28];
for(int j=0;j<48;j++)//PC-2轮密钥置换
C_Round[i][j]= Key_xunhuan[PC_2[j]-1];
}
int f_function(int i)
{
int a;
for(int j=0;j<48;j++)
R_E[i][j]=R[i-1][E[j]-1];
for(int j=0;j<48;j++)
R_E_K[i][j]=R_E[i][j]^C_Round[i][j];
for(int j=0;j<8;j++)
for(int k=0;k<6;k++)
S_Input[j][k]=R_E_K[i][k+j*6];
for(int j=0;j<8;j++)//S盒
{
a=s_box[j][S_Input[j][0]*2+S_Input[j][5]][S_Input[j][1]*8+S_Input[j][2]*4+S_Input[j][3]*2+S_Input[j][4]];
for(int k=3;k>=0;k--)
{
S_Output[j][k]=a%2;
a=a/2;
}
}
for(int j=0;j<8;j++)
for(int k=0;k<4;k++)
P_Input[i][j*4+k]=S_Output[j][k];
for(int j=0;j<32;j++)
P_Output[i][j]=P_Input[i][P[j]-1];
}
int Encryption(int i)//加密
{
f_function(i);
for(int j=0;j<32;j++)
{
R[i][j]=L[i-1][j]^P_Output[i][j];
L[i][j]=R[i-1][j];
}
}
int Hex_To_Bin_Key(char Key[])//16进制转2进制
{
for(int i=0;i<16;i++)
{
if(Key[i]>='0'&&Key[i]<='9')
{
int a=Key[i]-'0';
for(int j=3;j>=0;j--)
{
Key_[i*4+j]=a%2;
a=a/2;
}
}
else if(Key[i]>='a'&&Key[i]<='f')
{
int a=Key[i]-'a'+10;
for(int j=3;j>=0;j--)
{
Key_[i*4+j]=a%2;
a=a/2;
}
}
}
}
int Bin_To_Hex_1(int C_Round[17][48],int k)//每轮密钥 2进制转16进制
{
char C_Round_[17][12];
for(int i=0;i<12;i++)
{
if(C_Round[k][i*4]==0&&C_Round[k][i*4+1]==0&&C_Round[k][i*4+2]==0&&C_Round[k][i*4+3]==0)
C_Round_[k][i]='0';
if(C_Round[k][i*4]==0&&C_Round[k][i*4+1]==0&&C_Round[k][i*4+2]==0&&C_Round[k][i*4+3]==1)
C_Round_[k][i]='1';
if(C_Round[k][i*4]==0&&C_Round[k][i*4+1]==0&&C_Round[k][i*4+2]==1&&C_Round[k][i*4+3]==0)
C_Round_[k][i]='2';
if(C_Round[k][i*4]==0&&C_Round[k][i*4+1]==0&&C_Round[k][i*4+2]==1&&C_Round[k][i*4+3]==1)
C_Round_[k][i]='3';
if(C_Round[k][i*4]==0&&C_Round[k][i*4+1]==1&&C_Round[k][i*4+2]==0&&C_Round[k][i*4+3]==0)
C_Round_[k][i]='4';
if(C_Round[k][i*4]==0&&C_Round[k][i*4+1]==1&&C_Round[k][i*4+2]==0&&C_Round[k][i*4+3]==1)
C_Round_[k][i]='5';
if(C_Round[k][i*4]==0&&C_Round[k][i*4+1]==1&&C_Round[k][i*4+2]==1&&C_Round[k][i*4+3]==0)
C_Round_[k][i]='6';
if(C_Round[k][i*4]==0&&C_Round[k][i*4+1]==1&&C_Round[k][i*4+2]==1&&C_Round[k][i*4+3]==1)
C_Round_[k][i]='7';
if(C_Round[k][i*4]==1&&C_Round[k][i*4+1]==0&&C_Round[k][i*4+2]==0&&C_Round[k][i*4+3]==0)
C_Round_[k][i]='8';
if(C_Round[k][i*4]==1&&C_Round[k][i*4+1]==0&&C_Round[k][i*4+2]==0&&C_Round[k][i*4+3]==1)
C_Round_[k][i]='9';
if(C_Round[k][i*4]==1&&C_Round[k][i*4+1]==0&&C_Round[k][i*4+2]==1&&C_Round[k][i*4+3]==0)
C_Round_[k][i]='A';
if(C_Round[k][i*4]==1&&C_Round[k][i*4+1]==0&&C_Round[k][i*4+2]==1&&C_Round[k][i*4+3]==1)
C_Round_[k][i]='B';
if(C_Round[k][i*4]==1&&C_Round[k][i*4+1]==1&&C_Round[k][i*4+2]==0&&C_Round[k][i*4+3]==0)
C_Round_[k][i]='C';
if(C_Round[k][i*4]==1&&C_Round[k][i*4+1]==1&&C_Round[k][i*4+2]==0&&C_Round[k][i*4+3]==1)
C_Round_[k][i]='D';
if(C_Round[k][i*4]==1&&C_Round[k][i*4+1]==1&&C_Round[k][i*4+2]==1&&C_Round[k][i*4+3]==0)
C_Round_[k][i]='E';
if(C_Round[k][i*4]==1&&C_Round[k][i*4+1]==1&&C_Round[k][i*4+2]==1&&C_Round[k][i*4+3]==1)
C_Round_[k][i]='F';
}
printf("\n第%d轮密钥为: ",k);
for(int i=0;i<12;i++)
printf("%c",C_Round_[k][i]);
};
int Hex_To_Bin_p(char p[])//16进制转2进制
{
for(int i=0;i<16;i++)
{
if(p[i]>='0'&&p[i]<='9')
{
int a=p[i]-'0';
for(int j=3;j>=0;j--)
{
p_[i*4+j]=a%2;
a=a/2;
}
}
else if(p[i]>='A'&&p[i]<='F')
{
int a=p[i]-'A'+10;
for(int j=3;j>=0;j--)
{
p_[i*4+j]=a%2;
a=a/2;
}
}
}
}
int Bin_To_Hex(int C[])//2进制转16进制
{
for(int i=0;i<16;i++)
{
if(C[i*4]==0&&C[i*4+1]==0&&C[i*4+2]==0&&C[i*4+3]==0)
c[i]='0';
if(C[i*4]==0&&C[i*4+1]==0&&C[i*4+2]==0&&C[i*4+3]==1)
c[i]='1';
if(C[i*4]==0&&C[i*4+1]==0&&C[i*4+2]==1&&C[i*4+3]==0)
c[i]='2';
if(C[i*4]==0&&C[i*4+1]==0&&C[i*4+2]==1&&C[i*4+3]==1)
c[i]='3';
if(C[i*4]==0&&C[i*4+1]==1&&C[i*4+2]==0&&C[i*4+3]==0)
c[i]='4';
if(C[i*4]==0&&C[i*4+1]==1&&C[i*4+2]==0&&C[i*4+3]==1)
c[i]='5';
if(C[i*4]==0&&C[i*4+1]==1&&C[i*4+2]==1&&C[i*4+3]==0)
c[i]='6';
if(C[i*4]==0&&C[i*4+1]==1&&C[i*4+2]==1&&C[i*4+3]==1)
c[i]='7';
if(C[i*4]==1&&C[i*4+1]==0&&C[i*4+2]==0&&C[i*4+3]==0)
c[i]='8';
if(C[i*4]==1&&C[i*4+1]==0&&C[i*4+2]==0&&C[i*4+3]==1)
c[i]='9';
if(C[i*4]==1&&C[i*4+1]==0&&C[i*4+2]==1&&C[i*4+3]==0)
c[i]='A';
if(C[i*4]==1&&C[i*4+1]==0&&C[i*4+2]==1&&C[i*4+3]==1)
c[i]='B';
if(C[i*4]==1&&C[i*4+1]==1&&C[i*4+2]==0&&C[i*4+3]==0)
c[i]='C';
if(C[i*4]==1&&C[i*4+1]==1&&C[i*4+2]==0&&C[i*4+3]==1)
c[i]='D';
if(C[i*4]==1&&C[i*4+1]==1&&C[i*4+2]==1&&C[i*4+3]==0)
c[i]='E';
if(C[i*4]==1&&C[i*4+1]==1&&C[i*4+2]==1&&C[i*4+3]==1)
c[i]='F';
}
};
int Bin_To_Hex_2(int A[17][32],int k)//2进制转16进制
{
char A_[17][8];
for(int i=0;i<8;i++)
{
if(A[k][i*4]==0&&A[k][i*4+1]==0&&A[k][i*4+2]==0&&A[k][i*4+3]==0)
A_[k][i]='0';
if(A[k][i*4]==0&&A[k][i*4+1]==0&&A[k][i*4+2]==0&&A[k][i*4+3]==1)
A_[k][i]='1';
if(A[k][i*4]==0&&A[k][i*4+1]==0&&A[k][i*4+2]==1&&A[k][i*4+3]==0)
A_[k][i]='2';
if(A[k][i*4]==0&&A[k][i*4+1]==0&&A[k][i*4+2]==1&&A[k][i*4+3]==1)
A_[k][i]='3';
if(A[k][i*4]==0&&A[k][i*4+1]==1&&A[k][i*4+2]==0&&A[k][i*4+3]==0)
A_[k][i]='4';
if(A[k][i*4]==0&&A[k][i*4+1]==1&&A[k][i*4+2]==0&&A[k][i*4+3]==1)
A_[k][i]='5';
if(A[k][i*4]==0&&A[k][i*4+1]==1&&A[k][i*4+2]==1&&A[k][i*4+3]==0)
A_[k][i]='6';
if(A[k][i*4]==0&&A[k][i*4+1]==1&&A[k][i*4+2]==1&&A[k][i*4+3]==1)
A_[k][i]='7';
if(A[k][i*4]==1&&A[k][i*4+1]==0&&A[k][i*4+2]==0&&A[k][i*4+3]==0)
A_[k][i]='8';
if(A[k][i*4]==1&&A[k][i*4+1]==0&&A[k][i*4+2]==0&&A[k][i*4+3]==1)
A_[k][i]='9';
if(A[k][i*4]==1&&A[k][i*4+1]==0&&A[k][i*4+2]==1&&A[k][i*4+3]==0)
A_[k][i]='A';
if(A[k][i*4]==1&&A[k][i*4+1]==0&&A[k][i*4+2]==1&&A[k][i*4+3]==1)
A_[k][i]='B';
if(A[k][i*4]==1&&A[k][i*4+1]==1&&A[k][i*4+2]==0&&A[k][i*4+3]==0)
A_[k][i]='C';
if(A[k][i*4]==1&&A[k][i*4+1]==1&&A[k][i*4+2]==0&&A[k][i*4+3]==1)
A_[k][i]='D';
if(A[k][i*4]==1&&A[k][i*4+1]==1&&A[k][i*4+2]==1&&A[k][i*4+3]==0)
A_[k][i]='E';
if(A[k][i*4]==1&&A[k][i*4+1]==1&&A[k][i*4+2]==1&&A[k][i*4+3]==1)
A_[k][i]='F';
}
for(int i=0;i<8;i++)
printf("%c",A_[k][i]);
};
int main()
{
int i,j;
printf("请输入明文:\n");
for(i=0;i<16;i++)
scanf("%c",&p[i]);
Hex_To_Bin_p(p);
printf("请输入密钥:\n");
for(j=0;j<16;j++)
scanf(" %c",&Key[j]);
Hex_To_Bin_Key(Key);
IP_replace();
PC_1();
for(i=1;i<=16;i++)
{
Key_change(i);
Bin_To_Hex_1(C_Round,i);
Encryption(i);
printf("\n第%d轮输入为: ",i);
Bin_To_Hex_2(L,i);
Bin_To_Hex_2(R,i);
printf("\n");
if(i==16)
{
for(j=0;j<32;j++)
IP_1_input[j]=R[i][j];
for(j=0;j<32;j++)
IP_1_input[j+32]=L[i][j];
for(j=0;j<64;j++)
IP_1_output[j]=IP_1_input[IP_1[j]-1];
}
}
Bin_To_Hex(IP_1_output);
printf("\n密文为:");
for(int j=0;j<16;j++)
printf("%c",c[j]);
return 0;
}
运行结果:
DES解密:
#include<stdio.h>
char p[16];
int p_[64];
int p_IP[64];
char Key[16];
int Key_[64];
int L[17][32],R[17][32];
int C[17][28],D[17][28];
int C_Round[17][48];
int Key_PC_1[56];
int IP_1_output[64],IP_1_input[64];
int Key_xunhuan[48];
int R_E[17][48];
int R_E_K[17][48];
int S_Input[8][6],S_Output[8][4];
int P_Input[17][32],P_Output[17][32];
char c[16];
int IP[64]=///IP置换表
{
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,
};
int IP_1[64]=///逆初始置换表
{
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
int pc_1[60]=
{
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,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};
int PC_2[48]=///密钥置换选择PC_2盒
{
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};
int E[48]=///扩展E盒
{
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,
};
int P[32]=///p盒置换表
{
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,
};
int s_box[8][4][16]={//S盒
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,
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,10,5,14,9,
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,
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,
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,
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,
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,
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};
int IP_replace()//IP置换
{
for(int i=0;i<64;i++)
p_IP[i]=p_[IP[i]-1];
for(int i=0;i<32;i++)//分成L0,R0
L[0][i]=p_IP[i];
for(int i=0;i<32;i++)
R[0][i]=p_IP[i+32];
}
int PC_1()//密钥置换
{
int j=0;
for(int i=0;i<56;i++)
Key_PC_1[i]=Key_[pc_1[i]-1];//此处应把p改为Key-----------------------------
for(int i=0;i<28;i++)//分成L0,R0
C[0][i]=Key_PC_1[i];
for(int i=0;i<28;i++)
D[0][i]=Key_PC_1[i+28];
}
int Key_change(int i)
{
int a,b,a1,a2,b1,b2;
if(i==1||i==2||i==9||i==16)//变换-循环左移1位
{
a=C[i-1][0];
for(int j=0;j<27;j++)
C[i][j]=C[i-1][j+1];
C[i][27]=a;
b=D[i-1][0];
for(int j=0;j<27;j++)
D[i][j]=D[i-1][j+1];
D[i][27]=b;
}
else//变换-循环左移2位
{
a1=C[i-1][0];
a2=C[i-1][1];
for(int j=0;j<26;j++)
C[i][j]=C[i-1][j+2];
C[i][26]=a1;
C[i][27]=a2;
b1=D[i-1][0];
b2=D[i-1][1];
for(int j=0;j<26;j++)
D[i][j]=D[i-1][j+2];
D[i][26]=b1;
D[i][27]=b2;
}
for(int j=0;j<28;j++)
Key_xunhuan[j]=C[i][j];
for(int j=28;j<56;j++)
Key_xunhuan[j]=D[i][j-28];
for(int j=0;j<48;j++)//PC-2轮密钥置换
C_Round[i][j]= Key_xunhuan[PC_2[j]-1];
}
int f_function(int i)
{
int a;
for(int j=0;j<48;j++)
R_E[i][j]=R[i-1][E[j]-1];
for(int j=0;j<48;j++)
R_E_K[i][j]=R_E[i][j]^C_Round[16-i+1][j];//改
for(int j=0;j<8;j++)
for(int k=0;k<6;k++)
S_Input[j][k]=R_E_K[i][k+j*6];
for(int j=0;j<8;j++)//S盒
{
a=s_box[j][S_Input[j][0]*2+S_Input[j][5]][S_Input[j][1]*8+S_Input[j][2]*4+S_Input[j][3]*2+S_Input[j][4]];
for(int k=3;k>=0;k--)
{
S_Output[j][k]=a%2;
a=a/2;
}
}
for(int j=0;j<8;j++)
for(int k=0;k<4;k++)
P_Input[i][j*4+k]=S_Output[j][k];
for(int j=0;j<32;j++)
P_Output[i][j]=P_Input[i][P[j]-1];
}
int Encryption(int i)//加密
{
f_function(i);
for(int j=0;j<32;j++)
{
R[i][j]=L[i-1][j]^P_Output[i][j];
L[i][j]=R[i-1][j];
}
}
int Hex_To_Bin_Key(char Key[])//16进制转2进制
{
for(int i=0;i<16;i++)
{
if(Key[i]>='0'&&Key[i]<='9')
{
int a=Key[i]-'0';
for(int j=3;j>=0;j--)
{
Key_[i*4+j]=a%2;
a=a/2;
}
}
else if(Key[i]>='a'&&Key[i]<='f')
{
int a=Key[i]-'a'+10;
for(int j=3;j>=0;j--)
{
Key_[i*4+j]=a%2;
a=a/2;
}
}
}
}
int Bin_To_Hex_1(int C_Round[17][48],int k)//每轮密钥 2进制转16进制
{
char C_Round_[17][12];
for(int i=0;i<12;i++)
{
if(C_Round[k][i*4]==0&&C_Round[k][i*4+1]==0&&C_Round[k][i*4+2]==0&&C_Round[k][i*4+3]==0)
C_Round_[k][i]='0';
if(C_Round[k][i*4]==0&&C_Round[k][i*4+1]==0&&C_Round[k][i*4+2]==0&&C_Round[k][i*4+3]==1)
C_Round_[k][i]='1';
if(C_Round[k][i*4]==0&&C_Round[k][i*4+1]==0&&C_Round[k][i*4+2]==1&&C_Round[k][i*4+3]==0)
C_Round_[k][i]='2';
if(C_Round[k][i*4]==0&&C_Round[k][i*4+1]==0&&C_Round[k][i*4+2]==1&&C_Round[k][i*4+3]==1)
C_Round_[k][i]='3';
if(C_Round[k][i*4]==0&&C_Round[k][i*4+1]==1&&C_Round[k][i*4+2]==0&&C_Round[k][i*4+3]==0)
C_Round_[k][i]='4';
if(C_Round[k][i*4]==0&&C_Round[k][i*4+1]==1&&C_Round[k][i*4+2]==0&&C_Round[k][i*4+3]==1)
C_Round_[k][i]='5';
if(C_Round[k][i*4]==0&&C_Round[k][i*4+1]==1&&C_Round[k][i*4+2]==1&&C_Round[k][i*4+3]==0)
C_Round_[k][i]='6';
if(C_Round[k][i*4]==0&&C_Round[k][i*4+1]==1&&C_Round[k][i*4+2]==1&&C_Round[k][i*4+3]==1)
C_Round_[k][i]='7';
if(C_Round[k][i*4]==1&&C_Round[k][i*4+1]==0&&C_Round[k][i*4+2]==0&&C_Round[k][i*4+3]==0)
C_Round_[k][i]='8';
if(C_Round[k][i*4]==1&&C_Round[k][i*4+1]==0&&C_Round[k][i*4+2]==0&&C_Round[k][i*4+3]==1)
C_Round_[k][i]='9';
if(C_Round[k][i*4]==1&&C_Round[k][i*4+1]==0&&C_Round[k][i*4+2]==1&&C_Round[k][i*4+3]==0)
C_Round_[k][i]='A';
if(C_Round[k][i*4]==1&&C_Round[k][i*4+1]==0&&C_Round[k][i*4+2]==1&&C_Round[k][i*4+3]==1)
C_Round_[k][i]='B';
if(C_Round[k][i*4]==1&&C_Round[k][i*4+1]==1&&C_Round[k][i*4+2]==0&&C_Round[k][i*4+3]==0)
C_Round_[k][i]='C';
if(C_Round[k][i*4]==1&&C_Round[k][i*4+1]==1&&C_Round[k][i*4+2]==0&&C_Round[k][i*4+3]==1)
C_Round_[k][i]='D';
if(C_Round[k][i*4]==1&&C_Round[k][i*4+1]==1&&C_Round[k][i*4+2]==1&&C_Round[k][i*4+3]==0)
C_Round_[k][i]='E';
if(C_Round[k][i*4]==1&&C_Round[k][i*4+1]==1&&C_Round[k][i*4+2]==1&&C_Round[k][i*4+3]==1)
C_Round_[k][i]='F';
}
printf("\n第%d轮密钥为: ",k);
for(int i=0;i<12;i++)
printf("%c",C_Round_[k][i]);
};
int Hex_To_Bin_p(char p[])//16进制转2进制
{
for(int i=0;i<16;i++)
{
if(p[i]>='0'&&p[i]<='9')
{
int a=p[i]-'0';
for(int j=3;j>=0;j--)
{
p_[i*4+j]=a%2;
a=a/2;
}
}
else if(p[i]>='a'&&p[i]<='f')
{
int a=p[i]-'a'+10;
for(int j=3;j>=0;j--)
{
p_[i*4+j]=a%2;
a=a/2;
}
}
}
}
int Bin_To_Hex(int C[])//2进制转16进制
{
for(int i=0;i<16;i++)
{
if(C[i*4]==0&&C[i*4+1]==0&&C[i*4+2]==0&&C[i*4+3]==0)
c[i]='0';
if(C[i*4]==0&&C[i*4+1]==0&&C[i*4+2]==0&&C[i*4+3]==1)
c[i]='1';
if(C[i*4]==0&&C[i*4+1]==0&&C[i*4+2]==1&&C[i*4+3]==0)
c[i]='2';
if(C[i*4]==0&&C[i*4+1]==0&&C[i*4+2]==1&&C[i*4+3]==1)
c[i]='3';
if(C[i*4]==0&&C[i*4+1]==1&&C[i*4+2]==0&&C[i*4+3]==0)
c[i]='4';
if(C[i*4]==0&&C[i*4+1]==1&&C[i*4+2]==0&&C[i*4+3]==1)
c[i]='5';
if(C[i*4]==0&&C[i*4+1]==1&&C[i*4+2]==1&&C[i*4+3]==0)
c[i]='6';
if(C[i*4]==0&&C[i*4+1]==1&&C[i*4+2]==1&&C[i*4+3]==1)
c[i]='7';
if(C[i*4]==1&&C[i*4+1]==0&&C[i*4+2]==0&&C[i*4+3]==0)
c[i]='8';
if(C[i*4]==1&&C[i*4+1]==0&&C[i*4+2]==0&&C[i*4+3]==1)
c[i]='9';
if(C[i*4]==1&&C[i*4+1]==0&&C[i*4+2]==1&&C[i*4+3]==0)
c[i]='A';
if(C[i*4]==1&&C[i*4+1]==0&&C[i*4+2]==1&&C[i*4+3]==1)
c[i]='B';
if(C[i*4]==1&&C[i*4+1]==1&&C[i*4+2]==0&&C[i*4+3]==0)
c[i]='C';
if(C[i*4]==1&&C[i*4+1]==1&&C[i*4+2]==0&&C[i*4+3]==1)
c[i]='D';
if(C[i*4]==1&&C[i*4+1]==1&&C[i*4+2]==1&&C[i*4+3]==0)
c[i]='E';
if(C[i*4]==1&&C[i*4+1]==1&&C[i*4+2]==1&&C[i*4+3]==1)
c[i]='F';
}
};
int Bin_To_Hex_2(int A[17][32],int k)//2进制转16进制
{
char A_[17][8];
for(int i=0;i<8;i++)
{
if(A[k][i*4]==0&&A[k][i*4+1]==0&&A[k][i*4+2]==0&&A[k][i*4+3]==0)
A_[k][i]='0';
if(A[k][i*4]==0&&A[k][i*4+1]==0&&A[k][i*4+2]==0&&A[k][i*4+3]==1)
A_[k][i]='1';
if(A[k][i*4]==0&&A[k][i*4+1]==0&&A[k][i*4+2]==1&&A[k][i*4+3]==0)
A_[k][i]='2';
if(A[k][i*4]==0&&A[k][i*4+1]==0&&A[k][i*4+2]==1&&A[k][i*4+3]==1)
A_[k][i]='3';
if(A[k][i*4]==0&&A[k][i*4+1]==1&&A[k][i*4+2]==0&&A[k][i*4+3]==0)
A_[k][i]='4';
if(A[k][i*4]==0&&A[k][i*4+1]==1&&A[k][i*4+2]==0&&A[k][i*4+3]==1)
A_[k][i]='5';
if(A[k][i*4]==0&&A[k][i*4+1]==1&&A[k][i*4+2]==1&&A[k][i*4+3]==0)
A_[k][i]='6';
if(A[k][i*4]==0&&A[k][i*4+1]==1&&A[k][i*4+2]==1&&A[k][i*4+3]==1)
A_[k][i]='7';
if(A[k][i*4]==1&&A[k][i*4+1]==0&&A[k][i*4+2]==0&&A[k][i*4+3]==0)
A_[k][i]='8';
if(A[k][i*4]==1&&A[k][i*4+1]==0&&A[k][i*4+2]==0&&A[k][i*4+3]==1)
A_[k][i]='9';
if(A[k][i*4]==1&&A[k][i*4+1]==0&&A[k][i*4+2]==1&&A[k][i*4+3]==0)
A_[k][i]='A';
if(A[k][i*4]==1&&A[k][i*4+1]==0&&A[k][i*4+2]==1&&A[k][i*4+3]==1)
A_[k][i]='B';
if(A[k][i*4]==1&&A[k][i*4+1]==1&&A[k][i*4+2]==0&&A[k][i*4+3]==0)
A_[k][i]='C';
if(A[k][i*4]==1&&A[k][i*4+1]==1&&A[k][i*4+2]==0&&A[k][i*4+3]==1)
A_[k][i]='D';
if(A[k][i*4]==1&&A[k][i*4+1]==1&&A[k][i*4+2]==1&&A[k][i*4+3]==0)
A_[k][i]='E';
if(A[k][i*4]==1&&A[k][i*4+1]==1&&A[k][i*4+2]==1&&A[k][i*4+3]==1)
A_[k][i]='F';
}
for(int i=0;i<8;i++)
printf("%c",A_[k][i]);
};
int main()
{
int i,j;
printf("请输入密文:\n");
for(i=0;i<16;i++)
scanf("%c",&p[i]);
Hex_To_Bin_p(p);
printf("请输入密钥:\n");
for(j=0;j<16;j++)
scanf(" %c",&Key[j]);
Hex_To_Bin_Key(Key);
IP_replace();
PC_1();
for(i=1;i<=16;i++)
Key_change(i);
for(i=1;i<=16;i++)
{
Bin_To_Hex_1(C_Round,i);
Encryption(i);
printf("\n第%d轮输入为: ",i);
Bin_To_Hex_2(L,i);
Bin_To_Hex_2(R,i);
printf("\n");
if(i==16)
{
for(j=0;j<32;j++)
IP_1_input[j]=R[i][j];
for(j=0;j<32;j++)
IP_1_input[j+32]=L[i][j];
for(j=0;j<64;j++)
IP_1_output[j]=IP_1_input[IP_1[j]-1];
}
}
Bin_To_Hex(IP_1_output);
printf("\n明文为:");
for(int j=0;j<16;j++)
printf("%c",c[j]);
return 0;
}