user: Translate the below assembly code into C programming language:

```asm
<packforblock7>:
  endbr64
  mov    %rdi,%rcx
  mov    %rsi,%rdi
  push   %rbx
  mov    %rdx,%rsi
  mov    (%rdi),%rax
  mov    (%rdx),%r8
  mov    0x10(%rax),%r9d
  mov    0x8(%rax),%edx
  mov    (%rax),%r10d
  mov    0x18(%rax),%ebx
  sub    %ecx,%edx
  sub    %ecx,%r9d
  mov    0xa8(%rax),%r11d
  shl    $0xe,%r9d
  shl    $0x7,%edx
  sub    %ecx,%r10d
  sub    %ecx,%ebx
  or     %r9d,%edx
  shl    $0x15,%ebx
  mov    0x50(%rax),%r9d
  sub    %ecx,%r11d
  or     %r10d,%edx
  mov    0x98(%rax),%r10d
  shl    $0x13,%r11d
  or     %edx,%ebx
  mov    0x48(%rax),%edx
  sub    %ecx,%r9d
  shl    $0x6,%r9d
  sub    %ecx,%r10d
  sub    %ecx,%edx
  shl    $0x5,%r10d
  sar    %edx
  or     %edx,%r9d
  mov    0x58(%rax),%edx
  sub    %ecx,%edx
  shl    $0xd,%edx
  or     %r9d,%edx
  mov    0x60(%rax),%r9d
  sub    %ecx,%r9d
  shl    $0x14,%r9d
  or     %edx,%r9d
  mov    0x90(%rax),%edx
  sub    %ecx,%edx
  sar    $0x2,%edx
  or     %edx,%r10d
  mov    0xa0(%rax),%edx
  sub    %ecx,%edx
  shl    $0xc,%edx
  or     %r10d,%edx
  mov    0xe0(%rax),%r10d
  or     %edx,%r11d
  mov    0xd8(%rax),%edx
  sub    %ecx,%edx
  sub    %ecx,%r10d
  add    $0x100,%rax
  add    $0x70,%r8
  sar    $0x3,%edx
  shl    $0x4,%r10d
  or     %edx,%r10d
  mov    -0x18(%rax),%edx
  sub    %ecx,%edx
  shl    $0xb,%edx
  or     %r10d,%edx
  mov    -0x10(%rax),%r10d
  sub    %ecx,%r10d
  shl    $0x12,%r10d
  or     %edx,%r10d
  mov    -0xe0(%rax),%edx
  sub    %ecx,%edx
  shl    $0x1c,%edx
  or     %ebx,%edx
  movd   %edx,%xmm0
  mov    -0x98(%rax),%edx
  sub    %ecx,%edx
  shl    $0x1b,%edx
  or     %edx,%r9d
  mov    -0x50(%rax),%edx
  movd   %r9d,%xmm3
  sub    %ecx,%edx
  punpckldq %xmm3,%xmm0
  shl    $0x1a,%edx
  or     %r11d,%edx
  mov    -0x8(%rax),%r11d
  movd   %edx,%xmm1
  sub    %ecx,%r11d
  mov    %r11d,%ecx
  shl    $0x19,%ecx
  or     %r10d,%ecx
  movd   %ecx,%xmm2
  punpckldq %xmm2,%xmm1
  punpcklqdq %xmm1,%xmm0
  movups %xmm0,-0x70(%r8)
  pop    %rbx
  mov    %rax,(%rdi)
  mov    %r8,(%rsi)
  ret
```

assistant: ```c
void packforblock7(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;
  w0 = (uint64_t)(in[0] - base);
  w0 |= (uint64_t)(in[1] - base) << 7;
  w0 |= (uint64_t)(in[2] - base) << 14;
  w0 |= (uint64_t)(in[3] - base) << 21;
  w0 |= (uint64_t)(in[4] - base) << 28;
  w0 |= (uint64_t)(in[5] - base) << 35;
  w0 |= (uint64_t)(in[6] - base) << 42;
  w0 |= (uint64_t)(in[7] - base) << 49;
  w0 |= (uint64_t)(in[8] - base) << 56;
  w0 |= (uint64_t)(in[9] - base) << 63;
  w1 = (uint64_t)(in[9] - base) >> 1;
  w1 |= (uint64_t)(in[10] - base) << 6;
  w1 |= (uint64_t)(in[11] - base) << 13;
  w1 |= (uint64_t)(in[12] - base) << 20;
  w1 |= (uint64_t)(in[13] - base) << 27;
  w1 |= (uint64_t)(in[14] - base) << 34;
  w1 |= (uint64_t)(in[15] - base) << 41;
  w1 |= (uint64_t)(in[16] - base) << 48;
  w1 |= (uint64_t)(in[17] - base) << 55;
  w1 |= (uint64_t)(in[18] - base) << 62;
  w2 = (uint64_t)(in[18] - base) >> 2;
  w2 |= (uint64_t)(in[19] - base) << 5;
  w2 |= (uint64_t)(in[20] - base) << 12;
  w2 |= (uint64_t)(in[21] - base) << 19;
  w2 |= (uint64_t)(in[22] - base) << 26;
  w2 |= (uint64_t)(in[23] - base) << 33;
  w2 |= (uint64_t)(in[24] - base) << 40;
  w2 |= (uint64_t)(in[25] - base) << 47;
  w2 |= (uint64_t)(in[26] - base) << 54;
  w2 |= (uint64_t)(in[27] - base) << 61;
  w3 = (uint64_t)(in[27] - base) >> 3;
  w3 |= (uint64_t)(in[28] - base) << 4;
  w3 |= (uint64_t)(in[29] - base) << 11;
  w3 |= (uint64_t)(in[30] - base) << 18;
  w3 |= (uint64_t)(in[31] - base) << 25;
  pw64[0] = w0;
  pw64[1] = w1;
  pw64[2] = w2;
  pw64[3] = w3;
  *pin += 32;
  *pw += 28;
}
```