playfair密码_palyfair密码_

#include<cstdio> #include<cstring> #include<algorithm> using namespace std; int lenw,lenm; char mw[1000],mm[26];//明文，密码 char clw[2000];//最终的密文 int len; char a[6][6];//密码表 char x[26];//密码替换表 char b[1000][2];//明文表 FILE *ch; bool start() { int i; ch=fopen("明文.txt","r"); if(ch==NULL) { printf("明文打开出错\n"); return 0; } fgets(mw,1000,ch); lenw=strlen(mw); mw[lenw]=' '; ch=fopen("密码.txt","r"); if(ch==NULL) { printf("密码打开出错\n"); return 0; } fgets(mm,100,ch); lenm=strlen(mm); mm[lenm]=' '; char j='a'; int k=0; bool t[26];//字母是否出现过 memset(t,0,sizeof(t)); t[25]=1;//z默认标记为已用 for(i=0; i<lenm; i++) //去重 { if(!t[mm[i]-'a']) { mm[k]=mm[i]; t[mm[i]-'a']=1; k++; } } for(i=k; i<100; i++)//后面接字母 { while(t[j-'a'])//有重复的跳过 j++; mm[i]=j; j++; if(j=='z')//发现j=='z'重置 j='a'; } return 1; } void ps_list()//打二维表 { int i,j,k=0; for(j=0; j<5; j++)//mm数列里已经没有z { for(i=0; i<5; i++) { a[i][j]=mm[k]; k++; } } } void op_word() { int i=0,j=0; if(mw[i]==mw[i+1]||(!j%2&&mw[i+1]==mw[i+2])) { clw[j]=mw[i]; j++; clw[j]='x'; j++,i++; } else { clw[j]=mw[i]; j++,i++; } for(; i<1000; ) { if(i>=lenw)//明文遍历结束 break; if(mw[i]==mw[i+1]||mw[i]==mw[i-1]||(!j%2&&mw[i+1]==mw[i+2]))//是否前后有相同，或者是单个字母 { clw[j]=mw[i]; j++; clw[j]='x'; j++,i++; } else { clw[j]=mw[i]; j++,i++; } } len=j; if(!j-1%2)//判断末端是否为单个字母 { clw[j]='x'; len=j+1; } } int x1,x2,y1,y2; void getw(char x,char y)//获取这两个字母在表中的坐标 { int i,j; for(i=0; i<5; i++) for(j=0; j<5; j++) { if(a[i][j]==x) { x1=i; y1=j; } if(a[i][j]==y) { x2=i; y2=j; } } } void end_word() { int i,x,y; for(i=0; i<len; i+=2)//按规则两两替换处理后的明文 { getw(clw[i],clw[i+1]); if(x1!=x2&&y1!=y2) { clw[i]=a[x1][y2]; clw[i+1]=a[x2][y1]; } else if(x1==x2) { x=x1,y=y1+1; if(y==5) y=0; clw[i]=a[x][y]; x=x2,y=y2+1; if(y==5) y=0; clw[i+1]=a[x][y]; } else if(y1==y2) { x=x1+1,y=y1; if(y==5) y=0; clw[i]=a[x][y]; x=x2+1,y=y2; if(y==5) y=0; clw[i+1]=a[x][y]; } } } int main() { int n,m,i,j; if(!start())//文本获取 return 0; ps_list();//编制密码表 op_word();//整理明文 end_word();//编写密文 for(i=0;i<len;i++) printf("%c",clw[i]); ch=fopen("密文.txt","w"); if(ch==NULL) { printf("密文打开出错\n"); return 0; } fwrite(clw,len,sizeof(char),ch); fclose(ch); printf("\n"); getchar(); return 0; }