📄 des algrithm.cpp
字号:
#include<stdio.h>
int sbox1[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,14,10,0,6,13};
int sbox2[4][16]={15,1,8,14,6,11,3,4,9,7,2,13,12,0,5,10,3,13,4,7,155,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,5,13,8,10,1,3,15,4,2,11,6,7,12,0,5,14,9};
int sbox3[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};
int sbox4[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};
int sbox5[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};
int sbox6[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};
int sbox7[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};
int sbox8[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};
int odd(int key[56]);
void keyextend(int key[56],int ekey[64]);
void pc1(int ekey[64],int lekey[28],int rekey[28]);
void shift(int key[28]);
void pc2(int key[48],int lekey[28],int rekey[28]);
void subkey(int lkey[28],int rkey[28],int subkey[48]);
void ip(int input[64],int l[32],int r[32]);
void ipn(int l[32],int r[32],int output[64]);
void ebox(int input[32],int output[48]);
void sbox(int sbox[4][16],int input[48],int output[32]);
void pbox(int input[32],int output[32]);
void xor(int a[],int b[],int n);
void copy(int a[],int b[],int n);
void F(int l[32],int r[32],int sbox[4][16],int key[48]);
int odd(int key[56]) //奇偶校验 奇为“1”偶为“0”
{
int n,num=0;
int odd;
for(n=0;n<56;n++)
{
if(key[n]==1) num++;
}
odd=num%2;
return odd;
}
void keyextend(int key[56],int ekey[64])
{
int n,m;
for(n=0;n<8;n++)
{
for(m=0;m<7;m++)
{
ekey[n*8+m]=key[n*7+m];
ekey[n*8+7]=0;
}
}
if(odd(key)==0) ekey[7]=1;
}
void pc1(int ekey[64],int lekey[28],int rekey[28])
{
int n;
int pc1l[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};
int pc1r[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};
for(n=0;n<28;n++)
{
lekey[n]=ekey[pc1l[n]-1];
rekey[n]=ekey[pc1r[n]-1];
}
}
void shift(int key[28])
{
int n;
int media[28];
copy(media,key,28);
for(n=0;n<27;n++)
{
key[n]=media[n+1];
}
key[27]=media[0];
}
void pc2(int key[48],int lekey[28],int rekey[28])
{
int n;
int pc2[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};
for(n=0;n<48;n++)
{
if((pc2[n]-1)<28)
key[n]=lekey[pc2[n]-1];
else
key[n]=rekey[((pc2[n]-1)%28)];
}
}
void subkeyr(int lkey[28],int rkey[28],int subkey[48])
{
shift(lkey);
shift(rkey);
pc2(subkey,lkey,rkey);
}
void ip(int input[64],int l[32],int r[32])
{
int n;
int ip[64]={58,50,12,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};
for(n=0;n<64;n++)
{
if(n<32) l[n]=input[ip[n]-1];
else r[n-32]=input[ip[n]-1];
}
}
void ipn(int l[32],int r[32],int output[64])
{
int media[64];
int ipn[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};
int n;
for(n=0;n<32;n++)
{
media[n]=l[n];
}
for(n=32;n<64;n++)
{
media[n]=r[n-32];
}
for(n=0;n<64;n++)
{
output[n]=media[ipn[n]-1];
}
}
void ebox(int input[32],int output[48])
{
int ebox[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};
int n;
for(n=0;n<48;n++)
{
output[n]=input[ebox[n]-1];
}
}
void sbox(int xsbox[4][16],int input[48],int output[32])
{
int n,m,k;
int x,y,t;
for(n=0,m=0;n<48;n+=6,m+=4)
{
x=input[n]*2+input[n+5];
y=input[n+1]*8+input[n+2]*4+input[n+3]*2+input[n+4];
t=xsbox[x][y];
for(k=0;k<4;k++)
{
output[m+k]=0;
}
if(t>=8)
{
output[m]=1;
t-=8;
}
if(t>=4)
{
output[m+1]=1;
t-=4;
}
if(t>=2)
{
output[m+2]=1;
t-=2;
}
if(t==1)
{
output[m+3]=1;
}
}
}
void pbox(int input[32],int output[32])
{
int n,pbox[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};
for(n=0;n<32;n++)
{
output[n]=input[pbox[n]-1];
}
}
void xor(int a[],int b[],int n)
{
int m=0;
for(;m<n;m++)
{
if(a[m]==b[m])
a[m]=0;
else a[m]=1;
}
}
void copy(int a[],int b[],int n)
{
int m=0;
for(;m<n;m++)
{
a[m]=b[m];
}
}
void F(int l[32],int r[32],int xsbox[4][16],int key[48])
{
int z[48];
int y[32];
int xcopy[32];
copy(xcopy,r,32);
ebox(r,z);
xor(z,key,48);
sbox(xsbox,z,y);
pbox(y,r);
xor(r,l,32);
copy(l,xcopy,32);
}
void encipher(int plain[64],int cipher[64],int key[56],int sbox[4][16])
{
int ekey[64],lekey[28],rekey[28],l[32],r[32],n;
int xsubkey[48];
keyextend(key,ekey);
pc1(ekey,lekey,rekey);
ip(plain,l,r);
for(n=0;n<16;n++)
{
subkeyr(lekey,rekey,xsubkey);
F(l,r,sbox,xsubkey);
}
ipn(l,r,cipher);
}
void decipher(int plain[64],int cipher[64],int key[56],int sbox[4][16])
{
int ekey[64],lekey[28],rekey[28],l[32],r[32],n,m;
int xsubkey[48];
ip(cipher,l,r);
for(n=16;n>0;n--)
{
for(m=n;m>0;m--)
{
if(m==n)
{
keyextend(key,ekey);
pc1(ekey,lekey,rekey);
}
subkeyr(lekey,rekey,xsubkey);
}
F(l,r,sbox,xsubkey);
}
ipn(l,r,plain);
}
/*void main()
{
int n,plain[64],key[56],cipher[64];
for(n=0;n<64;n++)
{
scanf("%d",&plain[n]);
if(plain[n]==1||plain[n]==0)
{
}
else {
printf("请重新输入\n");
scanf("%d",&plain[n]);
}
}
printf("input key please\n");
for(n=0;n<56;n++)
{
scanf("%d",&key[n]);
if(plain[n]==1||plain[n]==0)
{
}
else
{
printf("请重新输入\n");
scanf("%d",&plain[n]);
}
}
printf("输入完成");
encipher(plain,cipher,key,sbox1);
for(n=0;n<56;n++)
{
printf("%d",cipher[n]);
}
}*/
void main()
{
FILE *fp,*fp1,*fp2;
int n,x,plain[64],key[56],cipher[64];
char filename[30];
for(x=4;x!=1||x!=2||x!=3;)
{
printf("请选择功能\n1.加密 \n2.解密\n3.退出\n");
scanf("%d",&x);
if(x==1)break;
if(x==2)break;
if(x==3)
{
exit(0);
}
}
if(x==1)
{
printf("请选择要加密的文件:\n");
scanf("%s",filename);
if((fp=fopen(filename,"r+"))==NULL)
{
printf("无法打开文件!\n");
exit(0);
}
for(n=0;n<64;n++)
{
plain[n]=fgetc(fp)-48;
}
fclose(fp);
printf("请选择密钥文件:\n");
scanf("%s",filename);
if((fp1=fopen(filename,"r+"))==NULL)
{
printf("无法打开文件!\n");
exit(0);
}
for(n=0;n<56;n++)
{
key[n]=fgetc(fp)-48;
}
encipher(plain,cipher,key,sbox1);
for(n=0;n<64;n++)
{
printf("%d",cipher[n]);
}
printf("\n");
for(x=4;x!=1||x!=2||x!=3;)
{
printf("是否输出到文本文件？\n1.是 \n2.否\n3.退出\n");
scanf("%d",&x);
if(x==1)break;
if(x==3)
{
exit(0);
fclose(fp);
fclose(fp1);
fclose(fp2);
}
}
if(x==1)
{
printf("您想输出到:");
scanf("%s",filename);
if((fp2=fopen(filename,"w+"))==NULL)
{
printf("无法打开文件!\n");
exit(0);
}
for(n=0;n<64;n++)
{
fputc(cipher[n]+48,fp2);
}
}
fclose(fp);
fclose(fp1);
fclose(fp2);
}
else
{
printf("请选择要解密的文件:\n");
scanf("%s",filename);
if((fp=fopen(filename,"r+"))==NULL)
{
printf("无法打开文件!\n");
exit(0);
}
for(n=0;n<64;n++)
{
cipher[n]=fgetc(fp)-48;
}
fclose(fp);
printf("请选择密钥文件:\n");
scanf("%s",filename);
if((fp1=fopen(filename,"r+"))==NULL)
{
printf("无法打开文件!\n");
exit(0);
}
for(n=0;n<56;n++)
{
key[n]=fgetc(fp)-48;
}
decipher(plain,cipher,key,sbox1);
for(n=0;n<64;n++)
{
printf("%d",plain[n]);
}
printf("\n");
for(x=4;x!=1||x!=2||x!=3;)
{
printf("是否输出到文本文件？\n1.是 \n2.否\n3.退出\n");
scanf("%d",&x);
if(x==1)break;
if(x==3)
{
exit(0);
fclose(fp);
fclose(fp1);
fclose(fp2);
}
}
if(x==1)
{
printf("您想输出到:");
scanf("%s",filename);
if((fp2=fopen(filename,"w+"))==NULL)
{
printf("无法打开文件!\n");
exit(0);
}
for(n=0;n<64;n++)
{
fputc(plain[n]+48,fp2);
}
}
fclose(fp);
fclose(fp1);
fclose(fp2);
}
}⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -