user: What is the c source code of the assembly code below:

```asm
<packforblock25>:
  endbr64
  push   %r15
  mov    %rdi,%rcx
  push   %r14
  mov    %rdx,%r14
  push   %r13
  mov    %rsi,%r13
  push   %r12
  push   %rbp
  push   %rbx
  mov    (%rsi),%rax
  mov    (%rdx),%rdx
  mov    0x10(%rax),%esi
  mov    0x18(%rax),%r12d
  mov    0x30(%rax),%ebp
  mov    (%rax),%ebx
  sub    %edi,%esi
  sub    %edi,%r12d
  mov    0x58(%rax),%r11d
  mov    0x70(%rax),%r10d
  sar    $0xe,%esi
  shl    $0xb,%r12d
  sub    %edi,%ebp
  sub    %edi,%ebx
  or     %esi,%r12d
  mov    0x28(%rax),%esi
  shl    $0x16,%ebp
  mov    %ebx,-0x10(%rsp)
  mov    0x40(%rax),%ebx
  sub    %edi,%r11d
  sub    %ecx,%r10d
  mov    0xa8(%rax),%r8d
  shl    $0x13,%r11d
  sub    %edi,%esi
  shl    $0x1e,%r10d
  sar    $0x3,%esi
  sub    %edi,%ebx
  or     %esi,%ebp
  mov    0x38(%rax),%esi
  shl    $0x8,%ebx
  sub    %edi,%esi
  sar    $0x11,%esi
  or     %esi,%ebx
  mov    0x50(%rax),%esi
  sub    %edi,%esi
  mov    0x60(%rax),%edi
  sar    $0x6,%esi
  or     %esi,%r11d
  mov    0x68(%rax),%esi
  sub    %ecx,%edi
  sar    $0x14,%edi
  sub    %ecx,%esi
  shl    $0x5,%esi
  or     %edi,%esi
  mov    0x80(%rax),%edi
  or     %esi,%r10d
  mov    0x78(%rax),%esi
  sub    %ecx,%edi
  sub    %ecx,%esi
  sar    $0x9,%esi
  shl    $0x10,%edi
  sub    %ecx,%r8d
  or     %esi,%edi
  mov    0x90(%rax),%esi
  mov    %edi,-0xc(%rsp)
  mov    0x88(%rax),%edi
  sub    %ecx,%esi
  sub    %ecx,%edi
  shl    $0x2,%esi
  sar    $0x17,%edi
  or     %edi,%esi
  mov    0x98(%rax),%edi
  sub    %ecx,%edi
  shl    $0x1b,%edi
  or     %esi,%edi
  mov    0xa0(%rax),%esi
  mov    %edi,-0x8(%rsp)
  mov    %r8d,%edi
  shl    $0xd,%edi
  sub    %ecx,%esi
  sar    $0xc,%esi
  mov    %edi,%r9d
  or     %esi,%r9d
  mov    0xb8(%rax),%esi
  mov    %r9d,-0x4(%rsp)
  mov    0xc0(%rax),%r8d
  sub    %ecx,%esi
  mov    0xe8(%rax),%r15d
  sub    %ecx,%r8d
  sar    %esi
  mov    %r8d,%r9d
  mov    0xd0(%rax),%r8d
  sub    %ecx,%r15d
  shl    $0x18,%r9d
  mov    %r15d,%edi
  mov    0xf0(%rax),%r15d
  or     %esi,%r9d
  mov    0xc8(%rax),%esi
  sub    %ecx,%r8d
  shl    $0x15,%edi
  shl    $0xa,%r8d
  sub    %ecx,%r15d
  sub    %ecx,%esi
  sar    $0x12,%r15d
  sar    $0xf,%esi
  or     %esi,%r8d
  mov    0xe0(%rax),%esi
  sub    %ecx,%esi
  sar    $0x4,%esi
  or     %esi,%edi
  mov    0xf8(%rax),%esi
  sub    %ecx,%esi
  add    $0x100,%rax
  add    $0x190,%rdx
  shl    $0x7,%esi
  or     %r15d,%esi
  mov    -0xf8(%rax),%r15d
  mov    %ebx,-0x184(%rdx)
  mov    -0xc(%rsp),%ebx
  mov    %r12d,-0x18c(%rdx)
  sub    %ecx,%r15d
  mov    %ebp,-0x188(%rdx)
  mov    %ebx,-0x178(%rdx)
  mov    -0x8(%rsp),%ebx
  shl    $0x19,%r15d
  or     -0x10(%rsp),%r15d
  mov    %r11d,-0x180(%rdx)
  mov    %ebx,-0x174(%rdx)
  mov    -0x4(%rsp),%ebx
  mov    %r15d,-0x190(%rdx)
  mov    %r10d,-0x17c(%rdx)
  mov    %ebx,-0x170(%rdx)
  mov    %r9d,-0x16c(%rdx)
  mov    %r8d,-0x168(%rdx)
  mov    %edi,-0x164(%rdx)
  mov    %esi,-0x160(%rdx)
  pop    %rbx
  mov    %rax,0x0(%r13)
  pop    %rbp
  mov    %rdx,(%r14)
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
```

assistant: ```c
void packforblock25(const uint32_t base, const uint32_t **pin, uint8_t **pw) {
  uint64_t *pw64 = *(uint64_t **)pw;
  const uint32_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;
  w0 = (uint64_t)(in[0] - base);
  w0 |= (uint64_t)(in[1] - base) << 25;
  w0 |= (uint64_t)(in[2] - base) << 50;
  w1 = (uint64_t)(in[2] - base) >> 14;
  w1 |= (uint64_t)(in[3] - base) << 11;
  w1 |= (uint64_t)(in[4] - base) << 36;
  w1 |= (uint64_t)(in[5] - base) << 61;
  w2 = (uint64_t)(in[5] - base) >> 3;
  w2 |= (uint64_t)(in[6] - base) << 22;
  w2 |= (uint64_t)(in[7] - base) << 47;
  w3 = (uint64_t)(in[7] - base) >> 17;
  w3 |= (uint64_t)(in[8] - base) << 8;
  w3 |= (uint64_t)(in[9] - base) << 33;
  w3 |= (uint64_t)(in[10] - base) << 58;
  w4 = (uint64_t)(in[10] - base) >> 6;
  w4 |= (uint64_t)(in[11] - base) << 19;
  w4 |= (uint64_t)(in[12] - base) << 44;
  w5 = (uint64_t)(in[12] - base) >> 20;
  w5 |= (uint64_t)(in[13] - base) << 5;
  w5 |= (uint64_t)(in[14] - base) << 30;
  w5 |= (uint64_t)(in[15] - base) << 55;
  w6 = (uint64_t)(in[15] - base) >> 9;
  w6 |= (uint64_t)(in[16] - base) << 16;
  w6 |= (uint64_t)(in[17] - base) << 41;
  w7 = (uint64_t)(in[17] - base) >> 23;
  w7 |= (uint64_t)(in[18] - base) << 2;
  w7 |= (uint64_t)(in[19] - base) << 27;
  w7 |= (uint64_t)(in[20] - base) << 52;
  w8 = (uint64_t)(in[20] - base) >> 12;
  w8 |= (uint64_t)(in[21] - base) << 13;
  w8 |= (uint64_t)(in[22] - base) << 38;
  w8 |= (uint64_t)(in[23] - base) << 63;
  w9 = (uint64_t)(in[23] - base) >> 1;
  w9 |= (uint64_t)(in[24] - base) << 24;
  w9 |= (uint64_t)(in[25] - base) << 49;
  w10 = (uint64_t)(in[25] - base) >> 15;
  w10 |= (uint64_t)(in[26] - base) << 10;
  w10 |= (uint64_t)(in[27] - base) << 35;
  w10 |= (uint64_t)(in[28] - base) << 60;
  w11 = (uint64_t)(in[28] - base) >> 4;
  w11 |= (uint64_t)(in[29] - base) << 21;
  w11 |= (uint64_t)(in[30] - base) << 46;
  w12 = (uint64_t)(in[30] - base) >> 18;
  w12 |= (uint64_t)(in[31] - base) << 7;
  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;
  *pin += 32;
  *pw += 100;
}
```