user: 请显示与下面列出的汇编代码相匹配的C语言实现:

```asm
<unpackforblock9_64>:
  endbr64
  push   %r14
  push   %rbx
  mov    %edi,%eax
  mov    %rdx,%r10
  mov    (%rsi),%rbx
  mov    (%rdx),%rdx
  mov    (%rbx),%r11d
  mov    0x4(%rbx),%r8d
  mov    0x8(%rbx),%edi
  mov    0xc(%rbx),%r14d
  mov    0x10(%rbx),%r9d
  add    $0x90,%rbx
  mov    %rbx,(%rsi)
  mov    %r11d,%esi
  and    $0x1ff,%esi
  add    %eax,%esi
  mov    %esi,(%rdx)
  mov    %r11d,%esi
  sar    $0x9,%esi
  and    $0x1ff,%esi
  add    %eax,%esi
  mov    %esi,0x4(%rdx)
  mov    %r11d,%esi
  sar    $0x12,%esi
  and    $0x1ff,%esi
  add    %eax,%esi
  mov    %esi,0x8(%rdx)
  mov    %r11d,%esi
  sar    $0x1b,%esi
  and    $0x1ff,%esi
  add    %eax,%esi
  mov    %esi,0xc(%rdx)
  mov    %r11d,%esi
  mov    $0x24,%ecx
  sar    %cl,%esi
  and    $0x1ff,%esi
  add    %eax,%esi
  mov    %esi,0x10(%rdx)
  mov    %r11d,%esi
  mov    $0x2d,%ecx
  sar    %cl,%esi
  and    $0x1ff,%esi
  add    %eax,%esi
  mov    %esi,0x14(%rdx)
  mov    %r11d,%esi
  mov    $0x36,%ecx
  sar    %cl,%esi
  and    $0x1ff,%esi
  add    %eax,%esi
  mov    %esi,0x18(%rdx)
  mov    $0x3f,%ecx
  sar    %cl,%r11d
  lea    (%r8,%r8,1),%esi
  or     %esi,%r11d
  and    $0x1ff,%r11d
  add    %eax,%r11d
  mov    %r11d,0x1c(%rdx)
  mov    %r8d,%esi
  sar    $0x8,%esi
  and    $0x1ff,%esi
  add    %eax,%esi
  mov    %esi,0x20(%rdx)
  mov    %r8d,%esi
  sar    $0x11,%esi
  and    $0x1ff,%esi
  add    %eax,%esi
  mov    %esi,0x24(%rdx)
  mov    %r8d,%esi
  sar    $0x1a,%esi
  and    $0x1ff,%esi
  add    %eax,%esi
  mov    %esi,0x28(%rdx)
  mov    %r8d,%esi
  mov    $0x23,%ecx
  sar    %cl,%esi
  and    $0x1ff,%esi
  add    %eax,%esi
  mov    %esi,0x2c(%rdx)
  mov    %r8d,%esi
  mov    $0x2c,%ecx
  sar    %cl,%esi
  and    $0x1ff,%esi
  add    %eax,%esi
  mov    %esi,0x30(%rdx)
  mov    %r8d,%esi
  mov    $0x35,%ecx
  sar    %cl,%esi
  and    $0x1ff,%esi
  add    %eax,%esi
  mov    %esi,0x34(%rdx)
  mov    $0x3e,%ecx
  sar    %cl,%r8d
  lea    0x0(,%rdi,4),%esi
  or     %esi,%r8d
  and    $0x1ff,%r8d
  add    %eax,%r8d
  mov    %r8d,0x38(%rdx)
  mov    %edi,%esi
  sar    $0x7,%esi
  and    $0x1ff,%esi
  add    %eax,%esi
  mov    %esi,0x3c(%rdx)
  mov    %edi,%esi
  sar    $0x10,%esi
  and    $0x1ff,%esi
  add    %eax,%esi
  mov    %esi,0x40(%rdx)
  mov    %edi,%esi
  sar    $0x19,%esi
  and    $0x1ff,%esi
  add    %eax,%esi
  mov    %esi,0x44(%rdx)
  mov    %edi,%esi
  mov    $0x22,%ecx
  sar    %cl,%esi
  and    $0x1ff,%esi
  add    %eax,%esi
  mov    %esi,0x48(%rdx)
  mov    %edi,%esi
  mov    $0x2b,%ecx
  sar    %cl,%esi
  and    $0x1ff,%esi
  add    %eax,%esi
  mov    %esi,0x4c(%rdx)
  mov    %edi,%esi
  mov    $0x34,%ecx
  sar    %cl,%esi
  and    $0x1ff,%esi
  add    %eax,%esi
  mov    %esi,0x50(%rdx)
  mov    $0x3d,%ecx
  sar    %cl,%edi
  lea    0x0(,%r14,8),%esi
  or     %esi,%edi
  and    $0x1ff,%edi
  add    %eax,%edi
  mov    %edi,0x54(%rdx)
  mov    %r14d,%ecx
  sar    $0x6,%ecx
  mov    %ecx,%esi
  and    $0x1ff,%esi
  add    %eax,%esi
  mov    %esi,0x58(%rdx)
  mov    %r14d,%ecx
  sar    $0xf,%ecx
  mov    %ecx,%esi
  and    $0x1ff,%esi
  add    %eax,%esi
  mov    %esi,0x5c(%rdx)
  mov    %r14d,%ecx
  sar    $0x18,%ecx
  mov    %ecx,%esi
  and    $0x1ff,%esi
  add    %eax,%esi
  mov    %esi,0x60(%rdx)
  mov    %r14d,%esi
  mov    $0x21,%ecx
  sar    %cl,%esi
  and    $0x1ff,%esi
  add    %eax,%esi
  mov    %esi,0x64(%rdx)
  mov    %r14d,%esi
  mov    $0x2a,%ecx
  sar    %cl,%esi
  and    $0x1ff,%esi
  add    %eax,%esi
  mov    %esi,0x68(%rdx)
  mov    %r14d,%esi
  mov    $0x33,%ecx
  sar    %cl,%esi
  and    $0x1ff,%esi
  add    %eax,%esi
  mov    %esi,0x6c(%rdx)
  mov    $0x3c,%ecx
  sar    %cl,%r14d
  mov    %r14d,%ecx
  mov    %r9d,%esi
  shl    $0x4,%esi
  or     %esi,%ecx
  and    $0x1ff,%ecx
  add    %eax,%ecx
  mov    %ecx,0x70(%rdx)
  mov    %r9d,%ecx
  sar    $0x5,%ecx
  and    $0x1ff,%ecx
  add    %eax,%ecx
  mov    %ecx,0x74(%rdx)
  mov    %r9d,%ecx
  sar    $0xe,%ecx
  and    $0x1ff,%ecx
  add    %eax,%ecx
  mov    %ecx,0x78(%rdx)
  shr    $0x17,%r9d
  add    %eax,%r9d
  mov    %r9d,0x7c(%rdx)
  subq   $0xffffffffffffff80,(%r10)
  pop    %rbx
  pop    %r14
  ret
```

assistant: ```c
void unpackforblock9_64(const uint64_t base, const uint8_t **pw, uint64_t **pout) {
  const uint64_t *pw64 = *(const uint64_t **)pw;
  uint64_t *out = *pout;
  const uint64_t mask = (511ULL);
  uint64_t w0 = pw64[0];
  uint64_t w1 = pw64[1];
  uint64_t w2 = pw64[2];
  uint64_t w3 = pw64[3];
  uint64_t w4 = pw64[4];
  *pw += 36;
  out[0] = base + ((w0)&mask);
  out[1] = base + ((w0 >> 9) & mask);
  out[2] = base + ((w0 >> 18) & mask);
  out[3] = base + ((w0 >> 27) & mask);
  out[4] = base + ((w0 >> 36) & mask);
  out[5] = base + ((w0 >> 45) & mask);
  out[6] = base + ((w0 >> 54) & mask);
  out[7] = base + (((w0 >> 63) | (w1 << 1)) & mask);
  out[8] = base + ((w1 >> 8) & mask);
  out[9] = base + ((w1 >> 17) & mask);
  out[10] = base + ((w1 >> 26) & mask);
  out[11] = base + ((w1 >> 35) & mask);
  out[12] = base + ((w1 >> 44) & mask);
  out[13] = base + ((w1 >> 53) & mask);
  out[14] = base + (((w1 >> 62) | (w2 << 2)) & mask);
  out[15] = base + ((w2 >> 7) & mask);
  out[16] = base + ((w2 >> 16) & mask);
  out[17] = base + ((w2 >> 25) & mask);
  out[18] = base + ((w2 >> 34) & mask);
  out[19] = base + ((w2 >> 43) & mask);
  out[20] = base + ((w2 >> 52) & mask);
  out[21] = base + (((w2 >> 61) | (w3 << 3)) & mask);
  out[22] = base + ((w3 >> 6) & mask);
  out[23] = base + ((w3 >> 15) & mask);
  out[24] = base + ((w3 >> 24) & mask);
  out[25] = base + ((w3 >> 33) & mask);
  out[26] = base + ((w3 >> 42) & mask);
  out[27] = base + ((w3 >> 51) & mask);
  out[28] = base + (((w3 >> 60) | (w4 << 4)) & mask);
  out[29] = base + ((w4 >> 5) & mask);
  out[30] = base + ((w4 >> 14) & mask);
  out[31] = base + ((w4 >> 23) & mask);
  *pout += 32;
}
```