string - base64 解码 - 字符串中的 nul

Question

我正在尝试创建将在某些站点上运行私有(private) API 调用的函数。
所有这些站点都使用 API 调用的签名进行身份验证，如下所示:

base64_encode( hash_hmac('sha512', $post_data, base64_decode($secret), true) )

使用包摘要和 RCurl 我可以很容易地写成:

base64Encode( hmac(key = base64Decode(secret), object = post_data, algo = 'sha512', raw = TRUE) )

我整天都在和 hmac 战斗 关键 参数输入:

key = base64Decode(secret)

问题是 hmac 函数只接受字符串值，但 base64Decode 可能返回的不仅仅是字符串:

str(base64Decode(secret))
chr "îă?ľÂÜĄ\vŽĺ\022""| __truncated__

这个 __截断__ 是这里的关键问题。所以我尝试的下一件事是从 decode 函数和 rawToChar 获取原始输出:

str(base64Decode(secret,mode='raw'))
raw [1:64] ee e3 3f be ...

rawToChar(base64Decode(secret,mode='raw'))

Error in rawToChar(base64Decode(secret,mode='raw')) : embedded nul in string: 'îă?ľÂÜĄ\vŽĺ\022\0!^\026Č‹¶©wŚˇ0Î\035ë\026\r\001ňKÍ„Rř\003j„7¤Ň\nťä_\004m@ß\0Ă"c\0271˝ZnĚ55’v'

正如我们现在看到的，有一个谜 无 我(甚至还没有)字符串中的某处。我不太关心nuls，我只需要将这段数据作为hmac的输入传递。

是否有可能用 nul 处理字符串，只是为了将其作为输入上层函数推得更远？

有没有可能有hmac功能关键 参数接受这样的原始对象？

我也尝试了 base64enc 包，但没有成功。我尝试了许多不同的转换，但一切都回到了这个简单的“字符串中的 nul”。

这些站点相当新，并且此身份验证过程看起来像是其中的标准 API 身份验证。在 R 中应该有某种方法来处理该过程。

如果有人想测试，

secret <- '7uM/vsLcpQuOmOUSACFeFsiLtql3jKEwzh3rFg0B8kvNhFL4A2qEN6TSCp3kXwRtQN8AwyJjFzG9Wm7MNTWSdg=='

Answer 1

问题 2. 的答案是:

hmac 函数已经接受原始对象而不是字符串。

这是解决方案:

hmac(key = base64Decode(secret, mode='raw'),
 object = post_data,
 algo = 'sha512',
 raw = TRUE)