DES 加解密实现

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;
}












  • 3
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值