BCB实现 Hmac_sha1算法源码

最新推荐文章于 2024-05-16 08:45:00 发布

jone7319

最新推荐文章于 2024-05-16 08:45:00 发布

阅读量1.3k

点赞数 1

分类专栏：源码文章标签：算法 hmac_sha1 源码 bcb6

本文链接：https://blog.csdn.net/jone7319/article/details/50822327

版权

针对BCB开发环境，作者编写了一个自定义的Hmac_sha1算法类，支持二进制、十六进制和Base64编码输出。经过验证，该实现与在线加密解密工具结果一致，具有较高的准确性。

摘要由CSDN通过智能技术生成

到处找不到合适于BCB用的Hmac_sha1算法，openssl也不好用，于是找了些资料，自已编写了一个实现的类。实现二进制、十六进制和Base64编码的Hmac_sha1输出。

原创代码，引用请注明出处，谢谢！与网上在线加密解密（点击打开链接）对比过，结果非常正确！

<pre name="code" class="cpp">#define SHA1_LITTLE_ENDIAN

#define _R0(v,w,x,y,z,i) { z+=((w&(x^y))^y)+SHABLK0(i)+0x5A827999+ROL32(v,5); w=ROL32(w,30); }
#define _R1(v,w,x,y,z,i) { z+=((w&(x^y))^y)+SHABLK(i)+0x5A827999+ROL32(v,5); w=ROL32(w,30); }
#define _R2(v,w,x,y,z,i) { z+=(w^x^y)+SHABLK(i)+0x6ED9EBA1+ROL32(v,5); w=ROL32(w,30); }
#define _R3(v,w,x,y,z,i) { z+=(((w|x)&y)|(w&x))+SHABLK(i)+0x8F1BBCDC+ROL32(v,5); w=ROL32(w,30); }
#define _R4(v,w,x,y,z,i) { z+=(w^x^y)+SHABLK(i)+0xCA62C1D6+ROL32(v,5); w=ROL32(w,30); }

#define SHABLK0(i) (m_block->l[i] = \
	(ROL32(m_block->l[i],24) & 0xFF00FF00) | (ROL32(m_block->l[i],8) & 0x00FF00FF))

#define ROL32(_val32, _nBits) (((_val32)<<(_nBits))|((_val32)>>(32-(_nBits))))

#define SHABLK(i) (m_block->l[i&15] = ROL32(m_block->l[(i+13)&15] ^ m_block->l[(i+8)&15] \
	^ m_block->l[(i+2)&15] ^ m_block->l[i&15],1))
//==================================================================================================
typedef union
{
  char  c[64];
  unsigned long l[16];
} SHA1_WORKSPACE_BLOCK;
//=============================================================================&#