You cannot select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

217 lines
6.9 KiB
C++

This file contains ambiguous Unicode characters!

This file contains ambiguous Unicode characters that may be confused with others in your current locale. If your use case is intentional and legitimate, you can safely ignore this warning. Use the Escape button to highlight these characters.

#include "StdAfx.h"
#include "cMD5Encode.h"
#include <iostream>
#include <math.h>
// 幻数定义
const int Md5Encode::kA = 0x67452301;
const int Md5Encode::kB = 0xefcdab89;
const int Md5Encode::kC = 0x98badcfe;
const int Md5Encode::kD = 0x10325476;
const unsigned long long Md5Encode::k_ti_num_integer = 4294967296;
// function: CycleMoveLeft
// @param src_num:要左移的数
// @param bit_num_to_move:要移动的bit位数
// @return 循环左移后的结果数
UInt32 Md5Encode::CycleMoveLeft(UInt32 src_num, int bit_num_to_move) {
UInt32 src_num1 = src_num;
UInt32 src_num2 = src_num;
if (0 >= bit_num_to_move) {
return src_num;
}
UInt32 num1 = src_num1 << bit_num_to_move;
UInt32 num2 = src_num2 >> (32 - bit_num_to_move);
return ((src_num1 << bit_num_to_move) \
| (src_num2 >> (32 - bit_num_to_move)));
}
// function: FillData
// @param in_data_ptr: 要加密的信息数据
// @param data_byte_len: 数据的字节数
// @param out_data_ptr: 填充必要信息后的数据
// return : 填充信息后的数据长度,以字节为单位
UInt32 Md5Encode::FillData(const char *in_data_ptr, int data_byte_len, char** out_data_ptr) {
int bit_num = data_byte_len*BIT_OF_BYTE;
int grop_num = bit_num / BIT_OF_GROUP;
int mod_bit_num = bit_num % BIT_OF_GROUP;
int bit_need_fill = 0;
if (mod_bit_num > (BIT_OF_GROUP - SRC_DATA_LEN)) {
bit_need_fill = (BIT_OF_GROUP - mod_bit_num);
bit_need_fill += (BIT_OF_GROUP - SRC_DATA_LEN);
}
else {
bit_need_fill = (BIT_OF_GROUP - SRC_DATA_LEN) - mod_bit_num; // 这里多加了一个BIT_OF_GROUP避免bit_need_fill正好等于0,暂时不加
}
int all_bit = bit_num + bit_need_fill;
if (0 < bit_need_fill) {
*out_data_ptr = new char[all_bit / BIT_OF_BYTE + SRC_DATA_LEN / BIT_OF_BYTE];
memset(*out_data_ptr, 0, all_bit / BIT_OF_BYTE + SRC_DATA_LEN / BIT_OF_BYTE);
// copy data
memcpy(*out_data_ptr, in_data_ptr, data_byte_len);
// fill rest data
unsigned char *tmp = reinterpret_cast<unsigned char *>(*out_data_ptr);
tmp += data_byte_len;
// fill 1 and 0
*tmp = 0x80;
// fill origin data len
unsigned long long * origin_num = (unsigned long long *)((*out_data_ptr) + ((all_bit / BIT_OF_BYTE)));
*origin_num = data_byte_len*BIT_OF_BYTE;
}
return (all_bit / BIT_OF_BYTE + SRC_DATA_LEN / BIT_OF_BYTE);
}
void Md5Encode::RoundF(char *data_BIT_OF_GROUP_ptr, ParamDynamic & param) {
UInt32 *M = reinterpret_cast<UInt32*>(data_BIT_OF_GROUP_ptr);
int s[] = { 7, 12, 17, 22 };
for (int i = 0; i < 16; ++i) {
UInt32 ti = k_ti_num_integer * abs(sin(double(i + 1)));
if (i % 4 == 0) {
FF(param.ua_, param.ub_, param.uc_, param.ud_, M[i], s[i % 4], ti);
}
else if (i % 4 == 1) {
FF(param.ud_, param.ua_, param.ub_, param.uc_, M[i], s[i % 4], ti);
}
else if (i % 4 == 2) {
FF(param.uc_, param.ud_, param.ua_, param.ub_, M[i], s[i % 4], ti);
}
else if (i % 4 == 3) {
FF(param.ub_, param.uc_, param.ud_, param.ua_, M[i], s[i % 4], ti);
}
}
}
void Md5Encode::RoundG(char *data_BIT_OF_GROUP_ptr, ParamDynamic & param) {
UInt32 *M = reinterpret_cast<UInt32*>(data_BIT_OF_GROUP_ptr);
int s[] = { 5, 9, 14, 20 };
for (int i = 0; i < 16; ++i) {
UInt32 ti = k_ti_num_integer * abs(sin(double(i + 1 + 16)));
int index = (i * 5 + 1) % 16;
if (i % 4 == 0) {
GG(param.ua_, param.ub_, param.uc_, param.ud_, M[index], s[i % 4], ti);
}
else if (i % 4 == 1) {
GG(param.ud_, param.ua_, param.ub_, param.uc_, M[index], s[i % 4], ti);
}
else if (i % 4 == 2) {
GG(param.uc_, param.ud_, param.ua_, param.ub_, M[index], s[i % 4], ti);
}
else if (i % 4 == 3) {
GG(param.ub_, param.uc_, param.ud_, param.ua_, M[index], s[i % 4], ti);
}
}
}
void Md5Encode::RoundH(char *data_BIT_OF_GROUP_ptr, ParamDynamic & param) {
UInt32 *M = reinterpret_cast<UInt32*>(data_BIT_OF_GROUP_ptr);
int s[] = { 4, 11, 16, 23 };
for (int i = 0; i < 16; ++i) {
UInt32 ti = k_ti_num_integer * abs(sin(double(i + 1 + 32)));
int index = (i * 3 + 5) % 16;
if (i % 4 == 0) {
HH(param.ua_, param.ub_, param.uc_, param.ud_, M[index], s[i % 4], ti);
}
else if (i % 4 == 1) {
HH(param.ud_, param.ua_, param.ub_, param.uc_, M[index], s[i % 4], ti);
}
else if (i % 4 == 2) {
HH(param.uc_, param.ud_, param.ua_, param.ub_, M[index], s[i % 4], ti);
}
else if (i % 4 == 3) {
HH(param.ub_, param.uc_, param.ud_, param.ua_, M[index], s[i % 4], ti);
}
}
}
void Md5Encode::RoundI(char *data_BIT_OF_GROUP_ptr, ParamDynamic & param) {
UInt32 *M = reinterpret_cast<UInt32*>(data_BIT_OF_GROUP_ptr);
int s[] = { 6, 10, 15, 21 };
for (int i = 0; i < 16; ++i) {
UInt32 ti = k_ti_num_integer * abs(sin(double(i + 1 + 48)));
int index = (i * 7 + 0) % 16;
if (i % 4 == 0) {
II(param.ua_, param.ub_, param.uc_, param.ud_, M[index], s[i % 4], ti);
}
else if (i % 4 == 1) {
II(param.ud_, param.ua_, param.ub_, param.uc_, M[index], s[i % 4], ti);
}
else if (i % 4 == 2) {
II(param.uc_, param.ud_, param.ua_, param.ub_, M[index], s[i % 4], ti);
}
else if (i % 4 == 3) {
II(param.ub_, param.uc_, param.ud_, param.ua_, M[index], s[i % 4], ti);
}
}
}
void Md5Encode::RotationCalculate(char *data_512_ptr, ParamDynamic & param) {
if (NULL == data_512_ptr) {
return;
}
RoundF(data_512_ptr, param);
RoundG(data_512_ptr, param);
RoundH(data_512_ptr, param);
RoundI(data_512_ptr, param);
param.ua_ = param.va_last_ + param.ua_;
param.ub_ = param.vb_last_ + param.ub_;
param.uc_ = param.vc_last_ + param.uc_;
param.ud_ = param.vd_last_ + param.ud_;
param.va_last_ = param.ua_;
param.vb_last_ = param.ub_;
param.vc_last_ = param.uc_;
param.vd_last_ = param.ud_;
}
// 转换成十六进制字符串输出
std::string Md5Encode::GetHexStr(unsigned int num_str) {
std::string hexstr = "";
char szch[] = { '0', '1', '2', '3', '4', '5', '6', '7', '8', '9', 'a', 'b', 'c', 'd', 'e', 'f' };
unsigned char *tmptr = (unsigned char *)&num_str;
int len = sizeof(num_str);
// 小端字节序,逆序打印
for (int i = 0; i < len; i++){
unsigned char ch = tmptr[i] & 0xF0;
ch = ch >> 4;
hexstr.append(1, szch[ch]);
ch = tmptr[i] & 0x0F;
hexstr.append(1, szch[ch]);
}
return hexstr;
}
// function: Encode
// @param src_info:要加密的信息
// return :加密后的MD5值
std::string Md5Encode::Encode(std::string src_info) {
ParamDynamic param;
param.ua_ = kA;
param.ub_ = kB;
param.uc_ = kC;
param.ud_ = kD;
param.va_last_ = kA;
param.vb_last_ = kB;
param.vc_last_ = kC;
param.vd_last_ = kD;
std::string result;
const char *src_data = src_info.c_str();
char *out_data_ptr = NULL;
int total_byte = FillData(src_data, strlen(src_data), &out_data_ptr);
//char * data_BIT_OF_GROUP = out_data_ptr;
for (int i = 0; i < total_byte / (BIT_OF_GROUP / BIT_OF_BYTE); ++i) {
char * data_BIT_OF_GROUP = out_data_ptr;
data_BIT_OF_GROUP += i*(BIT_OF_GROUP / BIT_OF_BYTE);
RotationCalculate(data_BIT_OF_GROUP, param);
}
if (NULL != out_data_ptr) {
delete[] out_data_ptr, out_data_ptr = NULL;
}
result.append(GetHexStr(param.ua_));
result.append(GetHexStr(param.ub_));
result.append(GetHexStr(param.uc_));
result.append(GetHexStr(param.ud_));
return result;
}