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

```asm
<packforblock46_64>:
  endbr64
  push   %r15
  push   %r14
  push   %r13
  push   %r12
  push   %rbp
  push   %rbx
  mov    %rsi,%rbp
  mov    %rdx,%rbx
  mov    (%rdx),%rdx
  mov    (%rsi),%rax
  mov    0x4(%rax),%ecx
  sub    %edi,%ecx
  sar    $0x12,%ecx
  mov    %ecx,-0x3c(%rsp)
  mov    0x8(%rax),%esi
  sub    %edi,%esi
  mov    %esi,-0x50(%rsp)
  mov    $0x24,%ecx
  sar    %cl,%esi
  mov    0xc(%rax),%ecx
  sub    %edi,%ecx
  shl    $0xa,%ecx
  or     %esi,%ecx
  mov    %ecx,-0x38(%rsp)
  mov    0x10(%rax),%r9d
  sub    %edi,%r9d
  mov    %r9d,%r10d
  sar    $0x8,%r10d
  mov    %r10d,-0x34(%rsp)
  mov    0x14(%rax),%r11d
  sub    %edi,%r11d
  mov    %r11d,%r14d
  sar    $0x1a,%r14d
  mov    %r14d,-0x30(%rsp)
  mov    0x18(%rax),%r15d
  sub    %edi,%r15d
  mov    %r15d,%esi
  mov    %r15d,%r8d
  mov    $0x2c,%ecx
  sar    %cl,%r8d
  mov    0x1c(%rax),%r9d
  sub    %edi,%r9d
  mov    %r9d,%ecx
  shl    $0x2,%ecx
  mov    %ecx,%r11d
  or     %r8d,%r11d
  mov    %r11d,-0x2c(%rsp)
  mov    0x20(%rax),%r15d
  sub    %edi,%r15d
  mov    %r15d,%r9d
  sar    $0x10,%r9d
  mov    %r9d,-0x28(%rsp)
  mov    0x24(%rax),%ecx
  sub    %edi,%ecx
  mov    %ecx,-0x4c(%rsp)
  mov    %ecx,%r8d
  mov    $0x22,%ecx
  sar    %cl,%r8d
  mov    0x28(%rax),%r15d
  sub    %edi,%r15d
  mov    %r15d,%ecx
  shl    $0xc,%ecx
  mov    %ecx,%r15d
  or     %r8d,%r15d
  mov    %r15d,-0x24(%rsp)
  mov    0x2c(%rax),%r12d
  sub    %edi,%r12d
  mov    %r12d,%r13d
  sar    $0x6,%r13d
  mov    %r13d,-0x20(%rsp)
  mov    0x30(%rax),%r12d
  sub    %edi,%r12d
  sar    $0x18,%r12d
  mov    %r12d,-0x1c(%rsp)
  mov    0x34(%rax),%ecx
  sub    %edi,%ecx
  mov    %ecx,-0x48(%rsp)
  mov    %ecx,%r14d
  mov    $0x2a,%ecx
  sar    %cl,%r14d
  mov    0x38(%rax),%r10d
  sub    %edi,%r10d
  mov    %r10d,%ecx
  shl    $0x4,%ecx
  mov    %ecx,%r10d
  or     %r14d,%r10d
  mov    %r10d,-0x18(%rsp)
  mov    0x3c(%rax),%r11d
  sub    %edi,%r11d
  mov    %r11d,%r9d
  sar    $0xe,%r9d
  mov    %r9d,-0x14(%rsp)
  mov    0x40(%rax),%r11d
  sub    %edi,%r11d
  mov    %r11d,%r15d
  mov    $0x20,%ecx
  sar    %cl,%r15d
  mov    0x44(%rax),%r8d
  sub    %edi,%r8d
  shl    $0xe,%r8d
  or     %r15d,%r8d
  mov    %r8d,-0x10(%rsp)
  mov    0x48(%rax),%r11d
  sub    %edi,%r11d
  mov    %r11d,%r15d
  sar    $0x4,%r15d
  mov    %r15d,-0xc(%rsp)
  mov    0x4c(%rax),%r11d
  sub    %edi,%r11d
  sar    $0x16,%r11d
  mov    %r11d,-0x8(%rsp)
  mov    0x50(%rax),%ecx
  sub    %edi,%ecx
  mov    %ecx,-0x44(%rsp)
  mov    %ecx,%r15d
  mov    $0x28,%ecx
  sar    %cl,%r15d
  mov    0x54(%rax),%r11d
  sub    %edi,%r11d
  shl    $0x6,%r11d
  or     %r15d,%r11d
  mov    0x58(%rax),%r14d
  sub    %edi,%r14d
  sar    $0xc,%r14d
  mov    0x5c(%rax),%r13d
  sub    %edi,%r13d
  mov    %r13d,%ecx
  sar    $0x1e,%ecx
  mov    0x60(%rax),%r10d
  sub    %edi,%r10d
  shl    $0x10,%r10d
  or     %ecx,%r10d
  mov    0x64(%rax),%r13d
  sub    %edi,%r13d
  sar    $0x2,%r13d
  mov    0x68(%rax),%r12d
  sub    %edi,%r12d
  sar    $0x14,%r12d
  mov    %r12d,-0x4(%rsp)
  mov    0x6c(%rax),%ecx
  sub    %edi,%ecx
  mov    %ecx,-0x40(%rsp)
  mov    %ecx,%r8d
  mov    $0x26,%ecx
  sar    %cl,%r8d
  mov    0x70(%rax),%r9d
  sub    %edi,%r9d
  shl    $0x8,%r9d
  or     %r8d,%r9d
  mov    0x74(%rax),%r12d
  sub    %edi,%r12d
  sar    $0xa,%r12d
  mov    0x78(%rax),%r15d
  sub    %edi,%r15d
  sar    $0x1c,%r15d
  mov    0x7c(%rax),%r8d
  sub    %edi,%r8d
  shl    $0x12,%r8d
  or     %r15d,%r8d
  mov    (%rax),%eax
  sub    %edi,%eax
  mov    %eax,(%rdx)
  mov    -0x50(%rsp),%edi
  shl    $0x1c,%edi
  or     -0x3c(%rsp),%edi
  mov    %edi,0x4(%rdx)
  mov    -0x38(%rsp),%ecx
  mov    %ecx,0x8(%rdx)
  mov    -0x34(%rsp),%edi
  mov    %edi,0xc(%rdx)
  shl    $0x14,%esi
  or     -0x30(%rsp),%esi
  mov    %esi,0x10(%rdx)
  mov    -0x2c(%rsp),%esi
  mov    %esi,0x14(%rdx)
  mov    -0x4c(%rsp),%eax
  shl    $0x1e,%eax
  or     -0x28(%rsp),%eax
  mov    %eax,0x18(%rdx)
  mov    -0x24(%rsp),%esi
  mov    %esi,0x1c(%rdx)
  mov    -0x20(%rsp),%esi
  mov    %esi,0x20(%rdx)
  mov    -0x48(%rsp),%eax
  shl    $0x16,%eax
  or     -0x1c(%rsp),%eax
  mov    %eax,0x24(%rdx)
  mov    -0x18(%rsp),%esi
  mov    %esi,0x28(%rdx)
  mov    -0x14(%rsp),%esi
  mov    %esi,0x2c(%rdx)
  mov    -0x10(%rsp),%esi
  mov    %esi,0x30(%rdx)
  mov    -0xc(%rsp),%esi
  mov    %esi,0x34(%rdx)
  mov    -0x44(%rsp),%eax
  shl    $0x18,%eax
  or     -0x8(%rsp),%eax
  mov    %eax,0x38(%rdx)
  mov    %r11d,0x3c(%rdx)
  mov    %r14d,0x40(%rdx)
  mov    %r10d,0x44(%rdx)
  mov    %r13d,0x48(%rdx)
  mov    -0x40(%rsp),%ecx
  shl    $0x1a,%ecx
  or     -0x4(%rsp),%ecx
  mov    %ecx,0x4c(%rdx)
  mov    %r9d,0x50(%rdx)
  mov    %r12d,0x54(%rdx)
  mov    %r8d,0x58(%rdx)
  subq   $0xffffffffffffff80,0x0(%rbp)
  addq   $0x2e0,(%rbx)
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
```

assistant: ```c
void packforblock46_64(const uint64_t base, const uint64_t **pin, uint8_t **pw) {
  uint64_t *pw64 = *(uint64_t **)pw;
  const uint64_t *in = *pin;
  uint64_t w0;
  uint64_t w1;
  uint64_t w2;
  uint64_t w3;
  uint64_t w4;
  uint64_t w5;
  uint64_t w6;
  uint64_t w7;
  uint64_t w8;
  uint64_t w9;
  uint64_t w10;
  uint64_t w11;
  uint64_t w12;
  uint64_t w13;
  uint64_t w14;
  uint64_t w15;
  uint64_t w16;
  uint64_t w17;
  uint64_t w18;
  uint64_t w19;
  uint64_t w20;
  uint64_t w21;
  uint64_t w22;
  w0 = (in[0] - base);
  w0 |= (in[1] - base) << 46;
  w1 = (in[1] - base) >> 18;
  w1 |= (in[2] - base) << 28;
  w2 = (in[2] - base) >> 36;
  w2 |= (in[3] - base) << 10;
  w2 |= (in[4] - base) << 56;
  w3 = (in[4] - base) >> 8;
  w3 |= (in[5] - base) << 38;
  w4 = (in[5] - base) >> 26;
  w4 |= (in[6] - base) << 20;
  w5 = (in[6] - base) >> 44;
  w5 |= (in[7] - base) << 2;
  w5 |= (in[8] - base) << 48;
  w6 = (in[8] - base) >> 16;
  w6 |= (in[9] - base) << 30;
  w7 = (in[9] - base) >> 34;
  w7 |= (in[10] - base) << 12;
  w7 |= (in[11] - base) << 58;
  w8 = (in[11] - base) >> 6;
  w8 |= (in[12] - base) << 40;
  w9 = (in[12] - base) >> 24;
  w9 |= (in[13] - base) << 22;
  w10 = (in[13] - base) >> 42;
  w10 |= (in[14] - base) << 4;
  w10 |= (in[15] - base) << 50;
  w11 = (in[15] - base) >> 14;
  w11 |= (in[16] - base) << 32;
  w12 = (in[16] - base) >> 32;
  w12 |= (in[17] - base) << 14;
  w12 |= (in[18] - base) << 60;
  w13 = (in[18] - base) >> 4;
  w13 |= (in[19] - base) << 42;
  w14 = (in[19] - base) >> 22;
  w14 |= (in[20] - base) << 24;
  w15 = (in[20] - base) >> 40;
  w15 |= (in[21] - base) << 6;
  w15 |= (in[22] - base) << 52;
  w16 = (in[22] - base) >> 12;
  w16 |= (in[23] - base) << 34;
  w17 = (in[23] - base) >> 30;
  w17 |= (in[24] - base) << 16;
  w17 |= (in[25] - base) << 62;
  w18 = (in[25] - base) >> 2;
  w18 |= (in[26] - base) << 44;
  w19 = (in[26] - base) >> 20;
  w19 |= (in[27] - base) << 26;
  w20 = (in[27] - base) >> 38;
  w20 |= (in[28] - base) << 8;
  w20 |= (in[29] - base) << 54;
  w21 = (in[29] - base) >> 10;
  w21 |= (in[30] - base) << 36;
  w22 = (in[30] - base) >> 28;
  w22 |= (in[31] - base) << 18;
  pw64[0] = w0;
  pw64[1] = w1;
  pw64[2] = w2;
  pw64[3] = w3;
  pw64[4] = w4;
  pw64[5] = w5;
  pw64[6] = w6;
  pw64[7] = w7;
  pw64[8] = w8;
  pw64[9] = w9;
  pw64[10] = w10;
  pw64[11] = w11;
  pw64[12] = w12;
  pw64[13] = w13;
  pw64[14] = w14;
  pw64[15] = w15;
  pw64[16] = w16;
  pw64[17] = w17;
  pw64[18] = w18;
  pw64[19] = w19;
  pw64[20] = w20;
  pw64[21] = w21;
  pw64[22] = w22;
  *pin += 32;
  *pw += 184;
}
```