📄 !!单次循环可以实现加解密!!.txt
字号:
#include<stdio.h>
#include<string.h>
#include<math.h>
void erjinzhi(char z[8],int *q)
{
char ch;
int i,j,a=7;
for(i=0;i<8;i++)
{
ch=z[i];
for(j=0;j<8;j++)
{
*(q+a)=ch%2;
//printf("%2d",*(q+a));
ch=ch/2;
a--;
}
//printf("\n");
a=a+16;
}
for(i=0;i<=63;i++)
{
if(i%8==0) printf("\n");
printf("%2d",*(q+i));
}
printf("\n");
}
/*******************************************************************************************************/
void IP_change(int *ip,int *Data)
{
int i,j;
for(i=1;i<=64;i++) //IP变换 OK
{
j=58-i/33+2*(((i-1)/8)%4)-8*((i-1)%8);
*(ip+(i-1))=*(Data+(j-1));
}
/* printf("输出IP置换后的二进制表:\n");
for(i=0;i<=63;i++)
{
if(i%8==0) printf("\n");
printf("%2d",*(ip+i));
}
printf("\n");*/
}
/*******************************************************************************************************/
void L0_R0(int *ip,int (*l)[32], int (*r)[32])
{
int i,j;
//printf("输出L0:\n"); //提取 L0 R0 OK
for(i=0;i<=31;i++)
{
*(*l+i)=*(ip+i);
// if(i%4==0)
// printf("\n");
// printf("%2d",*(*l+i));
}
// printf("\n");
// printf("输出R0:\n");
for(i=0;i<=31;i++)
{
j=i+32;
*(*r+i)=*(ip+j);
// if(i%4==0)
// printf("\n");
// printf("%2d",*(*r+i));
}
// printf("\n");
}
/**********************************************************************************************************/
void L__R(int (*l)[32],int (*r)[32],int i)
{
int j;
for(j=0;j<=31;j++)
*(*(l+i)+j)=*(*(r+i-1)+j); // L(i)=R(i-1) OK
}
/**********************************************************************************************************/
void E_change(int *r_change,int (*r)[32],int a)
{
int i,j,E[48]={31,0,1,2,3,4,3,4,5,6,7,8,
7,8,9,10,11,12,11,12,13,14,15,16,
15,16,17,18,19,20,19,20,21,22,23,24,
23,24,25,26,27,28,27,28,29,30,31,0};
// printf("输出R0经E变换拓展后的二进制表 r_change:\n"); // E变换 OK
for(i=0;i<=47;i++)
{
j=E[i];
*(r_change+i)=*(*(r+a-1)+j);
// if(i%6==0) printf("\n");
// printf("%2d",*(r_change+i));
}
// printf("\n");
}
/**********************************************************************************************************/
void PC_1_bianhuan(int *Key,int *pc_1)
{
int i,PC_1[56]={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};
// printf("输出KEY 经 PC-1 变换拓展后的二进制表 :\n"); // PC_1 OK
for(i=0;i<=55;i++)
{
*(pc_1+i)=*(Key+PC_1[i]);
// if(i%8==0) printf("\n");
// printf("%2d",*(pc_1+i));
}
// printf("\n");
}
/*************************************************************************************************/
void CD(int *pc_1,int (*c)[28],int (*d)[28])
{
int i;
for(i=0;i<=27;i++)
{
*(*c+i)=*(pc_1+i);
*(*d+i)=*(pc_1+i+28); // C0 D0 OK
}
/* printf("输出 C0 密钥:\n");
for(i=0;i<=27;i++)
{
if(i%8==0) printf("\n");
printf("%2d",*(*c+i));
}
printf("\n");
printf("输出 D0 密钥:\n");
for(i=0;i<=27;i++)
{
if(i%8==0) printf("\n");
printf("%2d",*(*d+i));
}
printf("\n");*/
}
/***************************************************************************************************/
void LS_yiwei(int (*p)[28],int i)
{
int j;
if(i==1||i==2||i==9||i==16)
{
for(j=0;j<=27;j++)
{
if(j==27)
*(*(p+i)+j)=*(*(p+i-1)+0);
else
*(*(p+i)+j)=*(*(p+i-1)+j+1); // C D移位 OK
}
}
else
{
for(j=0;j<=27;j++)
{
if(j==26)
*(*(p+i)+j)=*(*(p+i-1)+0);
else if(j==27)
*(*(p+i)+j)=*(*(p+i-1)+1);
else
*(*(p+i)+j)=*(*(p+i-1)+j+2);
}
}
/* printf("输出C D YIWEI 密钥:\n");
for(j=0;j<=27;j++)
{
if(j%8==0) printf("\n");
printf("%2d",*(*(p+i)+j));
}
printf("\n");*/
}
/***************************************************************************************************/
void CD_hebin(int *pc_1,int (*c)[28],int (*d)[28],int i)
{
int j;
for(j=0;j<=27;j++)
{
*(pc_1+j)=*(*(c+i)+j);
*(pc_1+j+28)=*(*(d+i)+j);
}
/* printf("输出C D hebin 密钥:\n");
for(j=0;j<=55;j++)
{
if(j%8==0) printf("\n");
printf("%2d",*(pc_1+j));
}
printf("\n");*/
}
/***************************************************************************************************/
void PC_2_bianhuan(int (*kout)[48],int *pc_1,int a)
{
int i,j,PC_2[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};
// printf("输出提取48位密钥K:\n");
for(i=0;i<=47;i++) // 提取48位密钥K(a-1) OK
{
j=PC_2[i];
*(*(kout+a-1)+i)=*(pc_1+j);
// if(i%8==0) printf("\n");
// printf("%2d",*(*(kout+a-1)+i));
}
// printf("\n");
}
/****************************************************************************************************/
void P_replace(int *p,int *s1)
{
int i,j,P[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};
// printf("P变换\n");
// printf("\n");
for(i=0;i<=31;i++) // P 变换
{
j=P[i];
*(p+i)=*(s1+j);
// if(i%4==0) printf("\n");
// printf("%2d",*(p+i));
}
// printf("\n");
}
/****************************************************************************************************/
void yihuo1(int *r_change,int (*kout)[48],int a)
{
int i;
// printf("R K yihuo\n"); // r_change R(i-1) E变换后与 Ki 异或
for(i=0;i<=47;i++)
{
*(r_change+i)^=*(*(kout+a-1)+i);
// if(i%6==0) printf("\n");
// printf("%2d",*(r_change+i));
}
// printf("\n");
}
/***************************************************************************************************/
void yihuo2(int (*l)[32],int (*r)[32],int *p,int a)
{
int i;
// printf("L Ptihuanhou yihuo\n"); // R(i) P盒置换后与L(i-1)异或
for(i=0;i<=31;i++)
{
*(*(r+a)+i)=*(*(l+a-1)+i)^*(p+i);
// if(i%4==0) printf("\n");
// printf("%2d",*(*(r+a)+i));
}
// printf("\n");
}
/*************************************************************************************************/
void IP2(int (*l)[32],int (*r)[32],int *ip_1,int a)
{
int i,ip[64],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};
printf(" a = %2d\n",a);
for(i=0;i<=31;i++)
{
ip[i]=*(*(r+a)+i);
ip[i+32]=*(*(l+a)+i);
}
for(i=0;i<=63;i++)
{
if(i%8==0) printf("\n");
printf("%2d",ip[i]);
}
printf("\n");
printf(" IP逆\n");
for(i=0;i<=63;i++)
{
*(ip_1+i)=ip[IP_1[i]-1];
if(i%8==0) printf("\n");
printf(" %2d",*(ip_1+i));
}
printf("\n");
}
/*************************************************************************************************/
void miwen(int *ip_1)
{
int i,j,a,c,b,x[8];
for(i=0;i<=7;i++)
{
a=i*8;
x[i]=0;
for(j=7;j>=0;j--)
{
c=*(ip_1+a);
b=pow(2,j);
// printf(" %2d",b);
// printf(" %2d",c);
x[i]=x[i]+b*c;
a++;
}
// printf(" %2d",x[i]);
// printf("\n");
}
for(i=0;i<=7;i++)
{
a=x[i]%127;
printf(" %c",(char)(a));
}
printf("\n");
}
/*************************************************************************************************/
void main()
{
void erjinzhi(char z[8],int *q);
void PC_1_bianhuan(int *Key,int *pc_1);
void CD(int *pc_1,int (*c)[28],int (*d)[28]);
void LS_yiwei(int (*p)[28],int i);
void CD_hebin(int *pc_1,int (*c)[28],int (*d)[28],int i);
void PC_2_bianhuan(int (*kout)[48],int *pc_1,int a);
void IP_change(int *ip,int *Data);
void L__R(int (*l)[32],int (*r)[32],int i);
void E_change(int *r_change,int (*r)[32],int a);
void yihuo1(int *r_change,int (*kout)[48],int a);
void S_replace(int *r_change,int *s1);
void P_replace(int *p,int *s1);
void yihuo2(int (*l)[32],int (*r)[32],int *p,int a);
void IP2(int (*l)[32],int (*r)[32],int *ip_1,int i);
void miwen(int *ip_1);
char mingwen[8],key_Origion[8];
int i,R_change[48],S1[32],P[32],DATA[64],KEY[64],PC_1[56],IP[64],IP_1[64],
C[17][28],D[17][28],Left[17][32],Right[17][32],key_out[16][48];
int *r_change,*s1,*p,*Data,*Key,*pc_1,*ip,*ip_1,
(*c)[28],(*d)[28],(*l)[32],(*r)[32],(*kout)[48];
/******************************************************************************/
c=C;
p=P;
ip_1=IP_1;
d=D;
l=Left;
r=Right;
kout=key_out;
Key=KEY;
Data=DATA;
pc_1=PC_1;
r_change=R_change;
s1=S1;
ip=IP;
do
{
printf("请输入8位明文字符");
scanf("%s",mingwen);
i=strlen(mingwen);
}while(i!=8);
erjinzhi(mingwen,Data); // 明文二进制转换
do
{
printf("请输入8位密钥字符");
scanf("%s",key_Origion);
i=strlen(key_Origion);
}while(i!=8);
printf("\n");
erjinzhi(key_Origion,Key); // 密文二进制
//jiami
IP_change(ip,Data); // 明文IP变换
L0_R0(ip,l,r); // LO RO
PC_1_bianhuan(Key,pc_1); // PC_1
CD(pc_1,c,d); // C0 D0
for(i=1;i<=1;i++)
{
LS_yiwei(c,i);
LS_yiwei(d,i);
CD_hebin(pc_1,c,d,i);
PC_2_bianhuan(kout,pc_1,i);
L__R(l,r,i);
E_change(r_change,r,i);
yihuo1(r_change,kout,i); // R与K 的异或
S_replace(r_change,s1); // S-盒替换
P_replace(p,s1); // P-盒替换
yihuo2(l,r,p,i); // L与P替换后的数组异或
}
IP2(l,r,ip_1,i-1);
miwen(ip_1);
//jiemi
IP_change(ip,ip_1); // 密文IP变换
L0_R0(ip,l,r); // LO RO
for(i=1;i>=1;i--)
{
L__R(l,r,i);
E_change(r_change,r,i);
yihuo1(r_change,kout,i); // R与K 的异或
S_replace(r_change,s1); // S-盒替换
P_replace(p,s1); // P-盒替换
yihuo2(l,r,p,i); // L与P替换后的数组异或
}
IP2(l,r,ip_1,i+1);
miwen(ip_1);
return;
}
/*********************************** S 替 换 **********************************************************/
void S_replace(int *r_change,int *s1)
{
int i,b,j,x,a,
S1[4][16]={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,15,10,0,6,13},
S2[4][16]={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},
S3[4][16]={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},
S4[4][16]={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},
S5[4][16]={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},
S6[4][16]={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},
S7[4][16]={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},
S8[4][16]={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};
// printf(" i j x");
for(b=0;b<=7;b++)
{
switch(b)
{
case 0:
i=*(r_change+0)*2+*(r_change+5)*1;
j=*(r_change+1)*8+*(r_change+2)*4+*(r_change+3)*2+*(r_change+4);
x=S1[i][j];
for(a=3;a>=0;a--)
{
*(s1+a)=x%2;
x=x/2;
}
break;
case 1:
i=*(r_change+6)*2+*(r_change+11)*1;
j=*(r_change+7)*8+*(r_change+8)*4+*(r_change+9)*2+*(r_change+10);
x=S2[i][j];
for(a=7;a>=4;a--)
{
*(s1+a)=x%2;
x=x/2;
}
break;
case 2:
i=*(r_change+12)*2+*(r_change+17)*1;
j=*(r_change+13)*8+*(r_change+14)*4+*(r_change+15)*2+*(r_change+16);
x=S3[i][j];
for(a=11;a>=8;a--)
{
*(s1+a)=x%2;
x=x/2;
}
break;
case 3:
i=*(r_change+18)*2+*(r_change+23)*1;
j=*(r_change+19)*8+*(r_change+20)*4+*(r_change+21)*2+*(r_change+22);
x=S4[i][j];
for(a=15;a>=12;a--)
{
*(s1+a)=x%2;
x=x/2;
}
break;
case 4:
i=*(r_change+24)*2+*(r_change+29)*1;
j=*(r_change+25)*8+*(r_change+26)*4+*(r_change+27)*2+*(r_change+28);
x=S5[i][j];
for(a=19;a>=16;a--)
{
*(s1+a)=x%2;
x=x/2;
}
break;
case 5:
i=*(r_change+30)*2+*(r_change+35)*1;
j=*(r_change+31)*8+*(r_change+32)*4+*(r_change+33)*2+*(r_change+34);
x=S6[i][j];
for(a=23;a>=20;a--)
{
*(s1+a)=x%2;
x=x/2;
}
break;
case 6:
i=*(r_change+36)*2+*(r_change+41)*1;
j=*(r_change+37)*8+*(r_change+38)*4+*(r_change+39)*2+*(r_change+40);
x=S7[i][j];
for(a=27;a>=24;a--)
{
*(s1+a)=x%2;
x=x/2;
}
break;
case 7:
i=*(r_change+42)*2+*(r_change+47)*1;
j=*(r_change+43)*8+*(r_change+44)*4+*(r_change+45)*2+*(r_change+46);
x=S8[i][j];
for(a=31;a>=28;a--)
{
*(s1+a)=x%2;
x=x/2;
}
break;
}
}
/* printf("S变换\n");
for(i=0;i<=31;i++) //输出 S变换
{
if(i%4==0) printf("\n");
printf("%2d",*(s1+i));
}
printf("\n");*/
}
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -