DESアルゴリズムC言語実装
132815 ワード
DESアルゴリズムC言語実装
アルゴリズムの概要
DESアルゴリズムは対称ブロック暗号化法であり,暗号化と復号化の両方に長さ64ビットの鍵を用いる.64ビットを1パケット長とし、各パケットについて、置換、Feistel輪関数、サブ鍵生成などの一連の動作により、64ビットの暗号文を出力する.復号中は,サブキー入力の順序を交換することで,元の明文を解くことができる.
全体構造入力された64ビット暗号文を一度IP置換してL 0 R 0 L_を得る0R_0 L0R0 はIP置換の結果を16回反復し,反復の規則はL i=R(i−1),R i=L(i−1)f(R(i−1),K i)L_である.i = R_(i-1), R_i = L_(i-1)\bigoplus f(R_(i-1),K_i) Li=R(i−1),Ri=L(i−1)⨁f(R(i−1),Ki) サブ鍵の生成は入力された64鍵を元にPC 1置換,循環シフト,PC 2置換などの過程を経て16個の48ビットのワード鍵を生成し,Feistel関数に順次入力する. 16回の反復が完了した後、前32ビットと後32ビットの交換位置をIP逆置換し、最終的な暗号文を得る.
コード実装 tables.h:DESアルゴリズムプロセスで使用されるすべての配列を定義する utility.h:すべてのモジュール関数の定義と実装 main.cpp:入出力を処理します.
アルゴリズムの概要
DESアルゴリズムは対称ブロック暗号化法であり,暗号化と復号化の両方に長さ64ビットの鍵を用いる.64ビットを1パケット長とし、各パケットについて、置換、Feistel輪関数、サブ鍵生成などの一連の動作により、64ビットの暗号文を出力する.復号中は,サブキー入力の順序を交換することで,元の明文を解くことができる.
全体構造
コード実装
#pragma once
#include #pragma once
#include "tables.h"
void charToBit(char * msg, int* msgBit) {
for (int i = 0; i < 8; i++) {
for (int j = 0; j < 8; j++) {
msgBit[(i + 1) * 8 - j - 1] = (msg[i] >> j) & 1;
}
}
}
void BitToChar(int* msgBit, char* msg) {
int sum = 0;
int count = 0;
for (int i = 0; i < 64; i++) {
sum = sum * 2 + msgBit[i];
if (i % 8 == 7) {
msg[count++] = sum;
sum = 0;
}
}
}
void IP_Permutation(int* input, int* output) {
for (int i = 0; i < 64; i++) {
output[i] = input[IP_Table[i] - 1];
}
}
void IP_Reverse_Permutation(int* input, int* output) {
for (int i = 0; i < 64; i++) {
output[i] = input[IP_Reverse_Table[i] - 1];
}
}
void devision(int* input, int *L, int* R) {
for (int i = 0; i < 32; i++) {
L[i] = input[i];
R[i] = input[i + 32];
}
}
void Extension(int* R, int* extendedR) {
for (int i = 0; i < 48; i++) {
extendedR[i] = R[Extension_Table[i] - 1];
}
}
void Xor48(int* R, int* subkey) {
for (int i = 0; i < 48; i++) {
if (R[i] != subkey[i]) {
R[i] = 1;
}
else {
R[i] = 0;
}
}
}
void Xor32(int* R, int* subkey) {
for (int i = 0; i < 32; i++) {
if (R[i] != subkey[i]) {
R[i] = 1;
}
else {
R[i] = 0;
}
}
}
void SBox(int* input, int start, int* output, int* SBox) {
int row = input[start] * 2 + input[start + 5];
int col = 0;
for (int i = 1; i <= 4; i++) {
col = col * 2 + input[start + i];
}
int result = SBox[row * 16 + col];
for (int i = 0; i < 4; i++) {
output[3 - i] = (result >> i) & 1;
}
}
void P_Permutation(int* input, int* output) {
for (int i = 0; i < 32; i++) {
output[i] = input[P_Table[i] - 1];
}
}
void Feistel(int* R, int* subkey, int* output) {
int extendedR[48] = { 0 };
Extension(R, extendedR);
Xor48(extendedR, subkey);
int SBoxResult[8][4] = { 0 };
for (int i = 0; i < 8; i++) {
SBox(extendedR, i * 6, SBoxResult[i], S_Box[i]);
}
// SBox
int totalSBox[32] = { 0 };
for (int i = 0; i < 32; i++) {
totalSBox[i] = SBoxResult[i / 4][i % 4];
}
P_Permutation(totalSBox, output);
}
void leftShift(int* input) {
int first = input[0];
for (int i = 0; i < 27; i++) {
input[i] = input[i + 1];
}
input[27] = first;
}
void PC1(int* input, int* key) {
for (int i = 0; i < 56; i++) {
input[i] = key[PC1_Table[i] - 1];
}
}
void PC2(int* input, int* subkey) {
for (int i = 0; i < 48; i++) {
subkey[i] = input[PC2_Table[i] - 1];
}
}
void generateSubkeys(int key[64], int subkeys[16][48]) {
int pc1[56] = { 0 };
int pc2[56] = { 0 };
int C[28] = { 0 };
int D[28] = { 0 };
PC1(pc1, key);
for (int i = 0; i < 28; i++) {
C[i] = pc1[i];
D[i] = pc1[i + 28];
}
for (int i = 1; i < 17; i++) {
if (i == 1 || i == 2 || i == 9 || i == 16) {
leftShift(C);
leftShift(D);
}
else {
leftShift(C);
leftShift(C);
leftShift(D);
leftShift(D);
}
for (int i = 0; i < 28; i++) {
pc2[i] = C[i];
pc2[i + 28] = D[i];
}
PC2(pc2, subkeys[i - 1]);
}
}
void Swap(int* L, int * R) {
int* temp = L;
L = R;
R = temp;
}
void DES(int* msgBit, char* key) {
int keyBit[64] = { 0 };
int permutationBit[64] = { 0 }; //IP
int L[32] = { 0 }; // 32
int R[32] = { 0 }; // 32
int subkeys[16][48] = { 0 };
int iterationL[32] = { 0 }; // L R
int iterationR[32] = { 0 };
int cryptedMsg[64] = { 0 };
charToBit(key, keyBit);
IP_Permutation(msgBit, permutationBit);
devision(permutationBit, L, R);
generateSubkeys(keyBit, subkeys);
// T
int FeistelResult[32] = { 0 };
for (int i = 0; i < 16; i++) {
for (int j = 0; j < 32; j++) {
iterationL[j] = R[j];
iterationR[j] = L[j];
}
Feistel(R, subkeys[i], FeistelResult);
Xor32(iterationR, FeistelResult);
for (int j = 0; j < 32; j++) {
L[j] = iterationL[j];
R[j] = iterationR[j];
}
}
// L R
int iterationTotal[64] = { 0 }; //
for (int i = 0; i < 32; i++) {
iterationTotal[i] = iterationR[i];
iterationTotal[i + 32] = iterationL[i];
}
IP_Reverse_Permutation(iterationTotal, cryptedMsg);
printf("
The crypeted message is :
");
for (int i = 0; i < 64; i++) {
printf("%d", cryptedMsg[i]);
}
}
void Decrypt(int* msgBit, char* key) {
int keyBit[64] = { 0 };
int permutationBit[64] = { 0 }; //IP
int L[32] = { 0 }; // 32
int R[32] = { 0 }; // 32
int subkeys[16][48] = { 0 };
int iterationL[32] = { 0 }; // L R
int iterationR[32] = { 0 };
int decryptedBit[64] = { 0 };
charToBit(key, keyBit);
IP_Permutation(msgBit, permutationBit);
devision(permutationBit, L, R);
generateSubkeys(keyBit, subkeys);
// T
int FeistelResult[32] = { 0 };
for (int i = 0; i < 16; i++) {
for (int j = 0; j < 32; j++) {
iterationL[j] = R[j];
iterationR[j] = L[j];
}
Feistel(R, subkeys[15 - i], FeistelResult);
Xor32(iterationR, FeistelResult);
for (int j = 0; j < 32; j++) {
L[j] = iterationL[j];
R[j] = iterationR[j];
}
}
// L R 。
int iterationTotal[64] = { 0 };
for (int i = 0; i < 32; i++) {
iterationTotal[i] = iterationR[i];
iterationTotal[i + 32] = iterationL[i];
}
IP_Reverse_Permutation(iterationTotal, decryptedBit);
char decryptedMsg[9] = { 0 };
BitToChar(decryptedBit, decryptedMsg);
printf("
The decrypeted message is :
");
for (int i = 0; i < 8; i++) {
printf("%c", decryptedMsg[i]);
}
printf("
");
}
#include
");
printf("Please enter the message:");
gets_s(msg);
printf("Please enter the key:");
gets_s(key);
charToBit(msg, msgBit);
DES(msgBit, key);
printf("
Decrypting process
");
printf("Please enter the crypted message:
");
gets_s(cryptedMsg);
for (int i = 0; i < 64; i++) {
cryptedMsgBit[i] = cryptedMsg[i] - '0';
}
printf("Please enter the key:");
gets_s(key);
Decrypt(cryptedMsgBit,key);
system("pause");
return 0;
}