【现代密码学】-网络安全实验：移位、仿射、乘数密码加解密

现代密码学基础——移位、仿射、乘数的加解密
1．实验内容
自选一种编程语言，实现古典密码中多项式代换密码的加解密过程。由于多项式代换密码可一般化移位密码、乘数密码、仿射密码，分别对多项式代换密码参数进行设置，完成这三个特例的实现。
多项式代换密码加密方程为：
f (l)=ktl t＋kt-1l t-1＋…＋k1l +k0 mod q。
其中，kt, …, k0Zq，lZq。

#include <stdio.h>
#include<stdlib.h>
int euclidean(int d, int f);
#define MAX 100
#define YIWEI 3
#define	YIWEI2 3

void yiweijiami()//移位密码加密函数
{
	char C[MAX];
	char M[MAX];
	int K = YIWEI, i;
	printf("请输入明文M(不可输入空白串)\n");
	//gets_s(M + 1, 20);
	scanf_s("%s", M,20);
	for (i = 0; M[i] != '\0'; i++)
	{
		C[i] = (M[i] - 'a' + K) % 26 + 'a';
	}
	C[i] = '\0';
	printf("加密后的密文是:\n%s\n", C);
}
void yiweijiemi()//移位密码解密函数
{
	char C[MAX];
	char M[MAX];
	int K = YIWEI, i;
	//解密
	printf("请输入密文C(不可输入空白串)\n");
	//gets_s(C + 1, 20);
	scanf_s("%s", C,20);
	for (i = 0; C[i] != '\0'; i++)
	{
		M[i] = (C[i] - 'a' - K) % 26 + 'a';
	}
	M[i] = '\0';
	printf("解密后的明文是:\n%s\n", M);
}
void chengshujiami()//乘数加密算法
{
	char C[MAX];
	char M[MAX];
	int K = YIWEI, i;
	//加密
	printf("请输入明文M(不可输入空白串)\n");
	scanf_s("%s", M, 20);
	for (i = 0; M[i] != '\0'; i++)
	{
		C[i] = (M[i] - 'a')*K % 26 + 'a';
		//C[i] = (M[i] - 'a' + K) % 26 + 'a';
		//return (a - 'a') * secret % MOD_NUM + 'a';
	}
	C[i] = '\0';
	printf("加密后的密文是:\n%s\n", C);
	//printf("乘数加密");
}
void chengshujiemi()//乘数解密算法
{
	char C[MAX];
	char M[MAX];
	int K = YIWEI, i;
	//解密
	printf("请输入密文C(不可输入空白串)\n");
	scanf_s("%s", C, 20);
	for (i = 0; C[i] != '\0'; i++)
	{
		M[i] = (C[i] - 'a')* euclidean(K, 26) % 26 + 'a';
			//return (ciphertext - 'a') * euclidean(secret, MOD_NUM) % MOD_NUM + 'a';
		//M[i] = (C[i] - 'a' - K) % 26 + 'a';
	}
	M[i] = '\0';
	printf("解密后的明文是:\n%s\n", M);
	//printf("乘数解密");
}
int euclidean(int d, int f)//欧几里得算法 用于乘法逆元
{
	//1
	int x[3], y[3];
	x[0] = 1; x[1] = 0; x[2] = f;
	y[0] = 0; y[1] = 1; y[2] = d;
	//2
flag:	if (y[2] == 0)
	return -1; //null
		//3
		if (y[2] == 1)
			return y[1];
		//4
		int q = x[2] / y[2];
		int T[3] = { x[0] - q*y[0], x[1] - q*y[1], x[2] - q*y[2] };
		x[0] = y[0]; x[1] = y[1]; x[2] = y[2];
		y[0] = T[0]; y[1] = T[1]; y[2] = T[2];
		goto flag;
}
void fangshejiami()//仿射密码加密
{
	char C[MAX];
	char M[MAX];
	int K = 5;
	int i;
	int z = 0;
	int K2 = 8;
	//int K = YIWEI, i;
	//int K2 = YIWEI2;
	//加密
	printf("请输入明文M(不可输入空白串)\n");
	scanf_s("%s", M, 20);
	for (i = 0; M[i] != '\0'; i++)
	{
		if (M[i] >= 'A' && M[i] <= 'Z')
		{
			C[z] = (K*(M[i] - 'A') + K2) % 26 + 'A';
		}
		else if (M[i] >= 'a' && M[i] <= 'z')
		{
			C[z] = (K*(M[i] - 'a') + K2) % 26 + 'a';
		}
		else
		{  //判断是否是空格
			C[z] = M[i];
		}
		z++;
	}
		//C[i] = (M[i] - 'a' + K) % 26 + 'a';
		
	C[i] = '\0';
	printf("加密后的密文是:\n%s\n", C);
	//printf("乘数加密");
	//printf("仿射加密");
}
void fangshejiemi()//仿射密码解密
{
	char C[MAX];
	char M[MAX];
	int K = 5;
	int i;
	int z = 0;
	int K2 = 8;
	int K3 = 21;
	//int K = YIWEI, i;
	//int K2 = YIWEI2;
	//解密
	printf("请输入密文C(不可输入空白串)\n");
	scanf_s("%s", C, 20);
	for (i = 0; C[i] != '\0'; i++)
	{
		if (C[i] >= 'A' && C[i] <= 'Z')
		{
			M[z] = (K3*((C[i] - 'A') - K2)) % 26 + 'A';
			if (K3*((C[i] - 'A') - K2) < 0)
			{
				M[z] = M[z] + 26;
			}
		}
		else if (C[i] >= 'a' && C[i] <= 'z'){
			M[z] = (K3*((C[i] - 'a') - K2)) % 26 + 'a';
			if (K3*((C[i] - 'a') - K2) < 0){  //处理负数
				M[z] = M[z] + 26;
			}
		}
		else{  //判断是否是空格
			M[z] = C[i];
		}
		z++;
	}
	
	//C[i] = (M[i] - 'a' + K) % 26 + 'a';

	M[i] = '\0';
	printf("加密后的明文是:\n%s\n", M);
	//printf("乘数加密");
	//printf("仿射加密");
	//printf("仿射解密");
}
void choose1()//首页选择界面
{
	int test1 = 1;
	while (test1)
	{
		printf("\n请输入选择（1：移位密码 2：乘数密码 3：仿射密码 0：退出）\n");
		int n;
		scanf_s("%d",&n);
		if (n == 1)
		{
			int test = 1;
			while (test)//对于菜单的选择
			{
				printf("\n请输入选择(1：加密  2：解密  0：退出):\n");
				int n;
				scanf_s("%d",&n);
				if (n == 1)
				{
					yiweijiami();
				}
				else if (n == 2)
				{
					yiweijiemi();
				}
				else if (n == 0)
				{
					printf("欢迎使用！！\n");
					test = 0;
					choose1();
				}
				else
				{
					printf("输入错误!\n请重新输入！");
					choose1();
				}
			}
		}
		else if (n == 2)
		{
			int test = 1;
			while (test)//对于菜单的选择
			{
				printf("\n请输入选择(1：加密  2：解密  0：退出):\n");
				int n;
				scanf_s("%d", &n);
				if (n == 1)
				{
					chengshujiami();
				}
				else if (n == 2)
				{
					chengshujiemi();
				}
				else if (n == 0)
				{
					printf("欢迎使用！！\n");
					test = 0;
					return;
				}
				else
				{
					printf("输入错误!\n请重新输入！");
					choose1();
				}
			}
		}
		else if (n == 3)
		{
			int test = 1;
			while (test)//对于菜单的选择
			{
				printf("\n请输入选择(1：加密  2：解密  0：退出):\n");
				int n;
				scanf_s("%d", &n);
				if (n == 1)
				{
					fangshejiami();
				}
				else if (n == 2)
				{
					fangshejiemi();
				}
				else if (n == 0)
				{
					printf("欢迎使用！！\n");
					test = 0;
					return;
				}
				else
				{
					printf("输入错误!\n请重新输入！");
					choose1();
				}
			}
		}
		else if (n == 0)
		{
			printf("欢迎使用！！\n");
			test1 = 0;
			return;
		}
		else
		{
			printf("输入错误!\n请重新输入！");
			choose1();
		}
	}
	
}
int main()
{
	choose1();//调用选择界面函数
	return 0;
}