Playfair密码

一种Playfair密码变种加密方法如下：首先选择一个密钥单词（称为pair）（字母不重复，且都为小写字母），然后与字母表中其
他字母一起填入至一个5x5的方阵中，填入方法如下：
1.首先按行填入密钥串。
2.紧接其后，按字母序按行填入不在密钥串中的字母。
3.由于方阵中只有25个位置，最后剩下的那个字母则不需变换。
如果密钥为youandme，则该方阵如下：  
y o u a n
d m e b c
f g h i j
k l p q r
s t v w x
在加密一对字母时，如am，在方阵中找到以这两个字母为顶点的矩形（红色字体）：
y o u a n
d m e b c
f g h i j
k l p q r
s t v w x
这对字母的加密字母为该矩形的另一对顶点，如本例中为ob。
请设计程序，使用上述方法对输入串进行加密，并输出加密后的串。
另外有如下规定：
1、一对一对取字母，如果最后只剩下一个字母，则不变换，直接放入加密串中；
2、如果一对字母中的两个字母相同，则不变换，直接放入加密串中；
3、如果一对字母中有一个字母不在正方形中，则不变换，直接放入加密串中；
4、如果字母对出现在方阵中的同一行或同一列，如df或hi，则只需简单对调这两个字母，即变换为fd或ih；
5、如果在正方形中能够找到以字母对为顶点的矩形，假如字母对为am，则该矩形的另一对顶点字母中，与a同行的字母应在前面，
在上例中应是ob；同样若待变换的字母对为ta，则变换后的字母对应为wo；
6、本程序中输入串均为小写字母，并不含标点、空格或其它字符。
解密方法与加密相同，即对加密后的字符串再加密，将得到原始串。
要求输入形式如下：
从控制台输入两行字符串，第一行为密钥单词（长度小于等于25），第二行为待加密字符串（长度小于等于50），两行字符串末尾
都有一个回车换行符，并且两行字符串均为小写字母，不含其它字符。
在标准输出上输出加密后的字符串。
例如，若输入：
youandme
welcometohangzhou
则表示输入的密钥单词为youandme，形成的正方形如上所示；待加密字符串为welcometohangzhou。在正方形中可以找到以第一对字
母we为顶点的矩形，对应另一对顶点字母为vb，因此加密后为vb，同理可找到与字母对lc,et,oh,ho对应的顶点字母对。而字母对om
位于上述正方形中的同一列，所以直接以颠倒这两个字母来加密，即为mo，字母对an同理。字母对gz中的z不在上述正方形中，因此
原样放到加密串中。最后剩一个字母u也原样输出。
因此输出的结果为： 
vbrmmomvugnagzguu

总结：一道很麻烦的题，但是不难。认真阅读题目还是能够做出来的。

import java.util.ArrayList;
import java.util.Scanner;

public class MyTest {
	public static void main(String[] args) {
		Scanner sc = new Scanner(System.in);
		String secretKeyWord;// 秘钥单词
		String encryptionWord;// 待加密单词
		secretKeyWord = sc.nextLine();
		encryptionWord = sc.nextLine();

		System.out.println(Encryption(secretKeyWord, encryptionWord));
	}

	
	/**
	 * 开始加密字符串
	 * @param secretKeyWord
	 * @param encryptionWord
	 * @return
	 */
	public static String Encryption(String secretKeyWord, String encryptionWord) {
		int col = 5;
		Character[][] strMatrix = new Character[col][col];

		int x = 0;
		Character letter = 'a';
		for (int i = 0; i < col; i++) {
			for (int j = 0; j < col; j++, x++) {
				if (x < secretKeyWord.length())
					strMatrix[i][j] = secretKeyWord.charAt(x);
				else {
					letter = LookForLetter(secretKeyWord, letter);
					strMatrix[i][j] = letter++;
				}
			}
		}

		return EncryptionString(strMatrix, encryptionWord);
	}

	
	/**
	 * 根据题目的要求加密
	 * @param strMatrix
	 * @param encryptionWord
	 * @return
	 */
	public static String EncryptionString(Character[][] strMatrix,
			String encryptionWord) {
		ArrayList<Character> character = new ArrayList<Character>();

		for (int i = 0; i < 5; i++) {
			for (int j = 0; j < 5; j++) {
				System.out.print(strMatrix[i][j] + " ");
			}
			System.out.println();
		}

		for (int i = 0; i < encryptionWord.length(); i += 2) {
			// 如果两个字母相同则原样放入
			if (encryptionWord.charAt(i) == encryptionWord.charAt(i + 1)) {
				character.add(encryptionWord.charAt(i));
				character.add(encryptionWord.charAt(i + 1));
			} 
			else
			// 如果有一对字母中有一个字母不在正方形中，则不变换
			if (JudgmentLetter(strMatrix, encryptionWord.charAt(i))
					|| JudgmentLetter(strMatrix, encryptionWord.charAt(i + 1))) {
				character.add(encryptionWord.charAt(i));
				character.add(encryptionWord.charAt(i + 1));
			}
			else
			//如果字母对在同行或同列，则对调
			if(isRowCol(strMatrix,encryptionWord.charAt(i),encryptionWord.charAt(i+1))){
				character.add(encryptionWord.charAt(i+1));
				character.add(encryptionWord.charAt(i));
			}
			else{
				//寻找顶点
				String temp=SeekPeak(strMatrix,encryptionWord.charAt(i),encryptionWord.charAt(i+1));
				character.add(temp.charAt(0));
				character.add(temp.charAt(1));
			}
			
			// 如果最后一组只有一个字母，则按原样存入
			if (i + 2 == encryptionWord.length() - 1) {
				character
						.add(encryptionWord.charAt(encryptionWord.length() - 1));
				break;
			}
		}
		
		String temp="";
		for(int i=0;i<character.size();i++){
			temp+=String.valueOf(character.get(i));
		}

		return temp;
	};
	
	/**
	 * 寻找顶点
	 * @param strMatrix
	 * @param letterA
	 * @param letterB
	 * @return
	 */
	public static String SeekPeak(Character[][] strMatrix,Character letterA,Character letterB){
		int x1,y1,x2,y2;
		x1=y1=x2=y2=0;
		for(int i=0;i<5;i++){
			for(int j=0;j<5;j++){
				if(strMatrix[i][j]==letterA){
					x1=i;
					y1=j;
				}
				
				if(strMatrix[i][j]==letterB){
					x2=i;
					y2=j;
				}
			}
		}
		
		return String.valueOf(strMatrix[x1][y2])+String.valueOf(strMatrix[x2][y1]);
	}
	
	/**
	 * 判断是否在同行或同一列中
	 * @param strMatrix
	 * @param letterA
	 * @param letterB
	 * @return
	 */
	public static boolean isRowCol(Character[][] strMatrix,Character letterA,Character letterB){
		int x1,y1,x2,y2;
		x1=y1=x2=y2=0;
		for(int i=0;i<5;i++){
			for(int j=0;j<5;j++){
				if(strMatrix[i][j]==letterA){
					x1=i;
					y1=j;
				}
				
				if(strMatrix[i][j]==letterB){
					x2=i;
					y2=j;
				}
			}
		}
		
		if(y1==y2 || x1==x2)
			return true;
		else
			return false;
	}

	/**
	 * 判断一对字母是否有一个不在方阵之中
	 * 
	 * @param strMatrix
	 * @param letter
	 * @return
	 */
	public static boolean JudgmentLetter(Character[][] strMatrix, Character letter) {
		boolean flag = false;

		for (int i = 0; i < 5; i++) {
			for (int j = 0; j < 5; j++) {
				if (letter != strMatrix[i][j]) {
					flag = true;
				} else {
					flag = false;
					return flag;
				}
			}
		}

		return flag;
	}


	/**
	 * 需找不相等的单词
	 * @param secretKeyWord
	 * @param letter
	 * @return
	 */
	public static Character LookForLetter(String secretKeyWord, Character letter) {
		boolean flag = false;

		while (!flag) {
			for (int i = 0; i < secretKeyWord.length(); i++) {
				if (letter == secretKeyWord.charAt(i)) {
					flag = false;
					break;
				} else
					flag = true;
			}

			if (!flag) {
				letter++;
			}
		}

		return letter;
	}

}