2009151049詹立泉实验一_第1页
2009151049詹立泉实验一_第2页
2009151049詹立泉实验一_第3页
免费预览已结束,剩余1页可下载查看

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

1、实验成绩 :上机实践日期 :2012.10.31上机实践时间 : 2 学时vigenere 加密,更加深入的了解其原理,掌握凯撒加密、课程名称 : 信息安全 指导教师 : 实验项目名称 : 实验项目编号 :一、目的通过编程实现凯撒加密、 vigenere 加密算法。二、实验内容与设计思想集美大学理学院实验报告 班级 : 信计 0912 姓名:詹立泉 学号:49 组号:验证理论知识,更重要的是通过实验加强实验手段与实践技能,培养分析问题、解决问题、应用知识的能力和创新精神,全面提高综合素质。凯撒加密:# include <stdio.h># include <stdlib.h&

2、gt;/用到了 system(); 不写,可以用 getchar();#define strwidth 117/ 定义长度void jiamikais(char *mingw);/ 加密void jiemikais(char *mima);/ 解密int main(void)char chstrwidth;/ int weishu;printf(" 这是移动 5位的凯撒加密 n");/ scanf("%d",weishu);printf(" 请输入明文 :");gets(ch);jiamikais(ch);system("p

3、ause");jiemikais(ch);system("pause");return 0;void jiamikais(char *mingw)/ 加密for (int i = 0; i < strwidth ;i+ )if (mingwi >= 'a' && mingwi <= 'z' )/判断是否小写字母mingwi +=5;if (mingwi > 'z')mingwi -= 26;else if ( mingwi >= 'A' &&

4、; mingwi <= 'Z')/判断是否大写字母mingwi +=5;if (mingwi > 'Z')mingwi -= 26;printf("输出密文:sn", min gw);/输出数据void jiemikais(char *mima)/ 解密int i;for (i = 0; i < strwidth ;i+ )if (mimai >= 'a' && mimai <= 'z' )/ 判断是否小写字母mimai -=5;if (mimai < 

5、9;a')/不解释,我想这样 ,理解可能会方便点吧mimai += 26;else if ( mimai >= 'A' && mimai <= 'Z')/判断是否大写字母mimai -=5;if (mimai < 'A')mimai += 26;printf("解密后明文:sn" , mima);输出数据Vige nere力卩密:#i nclude <stdio.h>#in elude vconi o.h>#i nclude <stri ng.h>#i n

6、clude <malloc.h>#defi ne MAX 100static int square2727;char * vige nere(char key,char word);char * an ti_vige nere(char key,char * en _word);int main(v oid)char keyMAX,wordMAX, *en_word;int i,j,k,m;/*初始化vigenere方阵*/for(i=1;i<27;i+)for(j=1;j<27;j+)squareij=63+i+j;if(squareij>90) squarei

7、j=squareij-26;for(k=1;k<27;k+)for(m=1;m<27;m+)printf("%c ",squarekm); printf("n");/*/printf("Vigenere Cipher n 请输入明文 :");scanf("%s",word);printf(" 输入密钥 :");scanf("%s",key);en_word=vigenere(key,word);printf("n 输出密文为 : %sn",en

8、_word);printf("nt 解密 :n");printf(" 原文是 :%sn",anti_vigenere(key,en_word);getch();return 0;/*加密算法 */char * vigenere(char key,char word)char *text=(char *)malloc(MAX*sizeof(char);int key_length=strlen(key);int word_length=strlen(word);int i,j,c;for(i=0;i<word_length;i+) if(wordi&

9、gt;=65&&wordi<=90)|(wordi>=97&&wordi<=122) if(wordi>=97&&wordi<=122)c=wordi-96;else c=wordi-64;j=i%key_length;texti=squarekeyj-96c;else texti=wordi;texti='0'return text;/*解密算法 */char * anti_vigenere(char key,char * en_word)char *word=(char *)malloc(MAX*sizeof(char);int key_length=strlen(key);int word_length=strlen(en_word);int i,j,c,k,d;for(i=0;i<word_length;i+)if(en_wordi>=65&&en_wordi<=90)c=i%key_length;/* 所用密钥在所在 */ k=keyc-96;d=en_wordi-squarek1;if(d>=0)wordi='a'

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论