将ASM指令RDRand转换为Win64

Question

我有一个函数(RDRand -由David Heffernan编写)，seam在32位内工作正常，但在64位中失败：

function TryRdRand(out Value: Cardinal): Boolean;
{$IF defined(CPU64BITS)}
asm .noframe
{$else}
asm
{$ifend}
  db   $0f
  db   $c7
  db   $f1
  jc   @success
  xor  eax,eax
  ret
@success:
  mov  [eax],ecx
  mov  eax,1
end;

函数的doc在这里：https://software.intel.com/en-us/articles/intel-digital-random-number-generator-drng-software-implementation-guide

特别是上面写着：

从本质上说，开发人员使用一个操作数调用这个指令:存储随机值的目标寄存器。请注意，此寄存器必须是通用寄存器，寄存器的大小(16、32或64位)将决定返回的随机值的大小。

调用方调用RDRAND指令后，必须检查进位标志(CF)，以确定在执行RDRAND指令时是否存在随机值。如表3所示，值1表示可用的随机值，并将其放在调用中提供的目标寄存器中。值为0表示不存在随机值。在当前的体系结构中，目标寄存器也将作为这种情况的副作用而被归零。

我对ASM知之甚少，我错过了什么？

我也不太明白这条指令：

  ...
  xor  eax,eax
  ret
  ...

它到底是做什么的？

Answer 1

如果您想要一个执行完全相同的函数，那么我认为它如下所示：

function TryRdRand(out Value: Cardinal): Boolean;
asm
{$if defined(WIN64)}
  .noframe
  // rdrand eax
  db   $0f
  db   $c7
  db   $f0
  jnc  @fail
  mov  [rcx],eax
{$elseif defined(WIN32)}
  // rdrand ecx
  db   $0f
  db   $c7
  db   $f1
  jnc  @fail
  mov  [eax],ecx
{$else}
{$Message Fatal 'TryRdRand not implemented for this platform'}
{$endif}
  mov  eax,1
  ret
@fail:
  xor  eax,eax
end;

Peter Cordes提出的在asm中实现重试循环的建议在我看来是明智的。我不打算在这里执行，因为我认为这有点超出了你问题的范围。

此外，Peter指出，在x64中，您可以读取带有REX.W=1前缀的64位随机值。看起来是这样的：

function TryRdRand(out Value: NativeUInt): Boolean;
asm
{$if defined(WIN64)}
  .noframe
  // rdrand rax
  db   $48  // REX.W = 1
  db   $0f
  db   $c7
  db   $f0
  jnc  @fail
  mov  [rcx],rax
{$elseif defined(WIN32)}
  // rdrand ecx
  db   $0f
  db   $c7
  db   $f1
  jnc  @fail
  mov  [eax],ecx
{$else}
{$Message Fatal 'TryRdRand not implemented for this platform'}
{$endif}
  mov  eax,1
  ret
@fail:
  xor  eax,eax
end;