user: Please show me the C implementation that matches the assembly code listed below:

```asm
<trasp64_128_88ccw>:
  endbr64
  push   %rbp
  mov    %rdi,%rcx
  lea    0x200(%rdi),%r9
  mov    %rdi,%rax
  movabs $0xffffffff00000000,%r8
  push   %rbx
  nopl   (%rax)
L58:
  mov    (%rax),%rdx
  mov    0x200(%rax),%rsi
  add    $0x10,%rax
  mov    %edx,%edi
  mov    %rsi,%r10
  shr    $0x20,%rdx
  and    %r8,%rsi
  or     %rsi,%rdx
  mov    0x1f8(%rax),%rsi
  shl    $0x20,%r10
  mov    %rdx,0x1f0(%rax)
  mov    -0x8(%rax),%rdx
  or     %r10,%rdi
  mov    %rsi,%r10
  mov    %rdi,-0x10(%rax)
  and    %r8,%rsi
  mov    %edx,%edi
  shl    $0x20,%r10
  shr    $0x20,%rdx
  or     %r10,%rdi
  or     %rsi,%rdx
  mov    %rdi,-0x8(%rax)
  mov    %rdx,0x1f8(%rax)
  cmp    %rax,%r9
  jne    L58
  lea    0x100(%rcx),%r9
  xor    %r10d,%r10d
  movabs $0xffff0000ffff0000,%r8
  movabs $0xffff0000ffff,%rdi
L40:
  lea    -0x100(%r9),%rax
  nopl   (%rax)
L49:
  mov    (%rax),%rdx
  mov    0x100(%rax),%r11
  add    $0x10,%rax
  mov    %r11,%rsi
  mov    %rdx,%rbx
  shr    $0x10,%rdx
  and    %r8,%r11
  shl    $0x10,%rsi
  and    %rdi,%rdx
  and    %rdi,%rbx
  or     %r11,%rdx
  and    %r8,%rsi
  mov    0xf8(%rax),%r11
  or     %rbx,%rsi
  mov    %rdx,0xf0(%rax)
  mov    -0x8(%rax),%rdx
  mov    %rsi,-0x10(%rax)
  mov    %r11,%rsi
  and    %r8,%r11
  mov    %rdx,%rbx
  shl    $0x10,%rsi
  shr    $0x10,%rdx
  and    %r8,%rsi
  and    %rdi,%rbx
  and    %rdi,%rdx
  or     %rbx,%rsi
  or     %r11,%rdx
  mov    %rsi,-0x8(%rax)
  mov    %rdx,0xf8(%rax)
  cmp    %rax,%r9
  jne    L49
  add    $0x20,%r10d
  add    $0x200,%r9
  cmp    $0x40,%r10d
  jne    L40
  lea    0x80(%rcx),%r9
  xor    %r10d,%r10d
  movabs $0xff00ff00ff00ff00,%r8
  movabs $0xff00ff00ff00ff,%rdi
L25:
  lea    -0x80(%r9),%rax
  nopl   0x0(%rax,%rax,1)
L100:
  mov    (%rax),%rdx
  mov    0x80(%rax),%r11
  add    $0x10,%rax
  mov    %r11,%rsi
  mov    %rdx,%rbx
  shr    $0x8,%rdx
  and    %r8,%r11
  shl    $0x8,%rsi
  and    %rdi,%rdx
  and    %rdi,%rbx
  or     %r11,%rdx
  and    %r8,%rsi
  mov    0x78(%rax),%r11
  or     %rbx,%rsi
  mov    %rdx,0x70(%rax)
  mov    -0x8(%rax),%rdx
  mov    %rsi,-0x10(%rax)
  mov    %r11,%rsi
  and    %r8,%r11
  mov    %rdx,%rbx
  shl    $0x8,%rsi
  shr    $0x8,%rdx
  and    %r8,%rsi
  and    %rdi,%rbx
  and    %rdi,%rdx
  or     %rbx,%rsi
  or     %r11,%rdx
  mov    %rsi,-0x8(%rax)
  mov    %rdx,0x78(%rax)
  cmp    %rax,%r9
  jne    L100
  add    $0x10,%r10d
  add    $0x100,%r9
  cmp    $0x40,%r10d
  jne    L25
  lea    0x40(%rcx),%r9
  xor    %r10d,%r10d
  movabs $0xf0f0f0f0f0f0f0f0,%r8
  movabs $0xf0f0f0f0f0f0f0f,%rdi
  nopl   0x0(%rax,%rax,1)
L93:
  lea    -0x40(%r9),%rax
L70:
  mov    (%rax),%r11
  mov    0x40(%rax),%rdx
  add    $0x10,%rax
  mov    %r11,%rsi
  mov    %rdx,%rbx
  shr    $0x4,%rdx
  and    %r8,%r11
  shl    $0x4,%rsi
  and    %rdi,%rdx
  and    %rdi,%rbx
  or     %r11,%rdx
  and    %r8,%rsi
  mov    -0x8(%rax),%r11
  or     %rbx,%rsi
  mov    %rdx,0x30(%rax)
  mov    0x38(%rax),%rdx
  mov    %rsi,-0x10(%rax)
  mov    %r11,%rsi
  and    %r8,%r11
  mov    %rdx,%rbx
  shl    $0x4,%rsi
  shr    $0x4,%rdx
  and    %r8,%rsi
  and    %rdi,%rbx
  and    %rdi,%rdx
  or     %rbx,%rsi
  or     %r11,%rdx
  mov    %rsi,-0x8(%rax)
  mov    %rdx,0x38(%rax)
  cmp    %rax,%r9
  jne    L70
  add    $0x8,%r10d
  sub    $0xffffffffffffff80,%r9
  cmp    $0x40,%r10d
  jne    L93
  lea    0x20(%rcx),%r10
  xor    %r9d,%r9d
  movabs $0xcccccccccccccccc,%rdi
  movabs $0x3333333333333333,%rsi
  mov    %r10,%r8
L37:
  lea    -0x20(%r8),%rax
L79:
  mov    0x20(%rax),%rdx
  mov    (%rax),%rbx
  add    $0x10,%rax
  mov    %rdx,%rbp
  shr    $0x2,%rdx
  lea    0x0(,%rbx,4),%r11
  and    %rdi,%rbx
  and    %rsi,%rdx
  and    %rsi,%rbp
  and    %rdi,%r11
  or     %rbx,%rdx
  mov    -0x8(%rax),%rbx
  or     %rbp,%r11
  mov    %rdx,0x10(%rax)
  mov    0x18(%rax),%rdx
  mov    %r11,-0x10(%rax)
  lea    0x0(,%rbx,4),%r11
  and    %rdi,%rbx
  mov    %rdx,%rbp
  shr    $0x2,%rdx
  and    %rdi,%r11
  and    %rsi,%rbp
  and    %rsi,%rdx
  or     %rbp,%r11
  or     %rbx,%rdx
  mov    %r11,-0x8(%rax)
  mov    %rdx,0x18(%rax)
  cmp    %rax,%r8
  jne    L79
  add    $0x4,%r9d
  add    $0x40,%r8
  cmp    $0x40,%r9d
  jne    L37
  lea    0x400(%rcx),%r8
  movabs $0xaaaaaaaaaaaaaaaa,%rdi
  movabs $0x5555555555555555,%rsi
L23:
  mov    0x10(%rcx),%rax
  mov    (%rcx),%r9
  mov    %rax,%r11
  shr    %rax
  lea    (%r9,%r9,1),%rdx
  and    %rdi,%r9
  and    %rsi,%rax
  and    %rsi,%r11
  and    %rdi,%rdx
  or     %r9,%rax
  mov    0x8(%rcx),%r9
  or     %r11,%rdx
  mov    %rax,0x10(%rcx)
  mov    0x18(%rcx),%rax
  mov    %rdx,(%rcx)
  lea    (%r9,%r9,1),%rdx
  and    %rdi,%r9
  mov    %rax,%r11
  shr    %rax
  and    %rdi,%rdx
  and    %rsi,%r11
  and    %rsi,%rax
  or     %r11,%rdx
  or     %r9,%rax
  mov    %rdx,0x8(%rcx)
  mov    %rax,0x18(%rcx)
  mov    %r10,%rcx
  cmp    %r10,%r8
  jne    L17
  pop    %rbx
  pop    %rbp
  ret
L17:
  add    $0x20,%r10
  jmp    L23
```

assistant: ```c
void trasp64_128_88ccw(unsigned char *data) {
  int i, j;
  for (j = 0; j < 64; j += 64) {
    unsigned long long int t, b;
    for (i = 0; i < 32; i++) {
      t = ((unsigned long long int *)data)[2 * (j + i)];
      b = ((unsigned long long int *)data)[2 * (j + 32 + i)];
      ((unsigned long long int *)data)[2 * (j + i)] = (t & 0x00000000ffffffffULL) | ((b) << 32);
      ((unsigned long long int *)data)[2 * (j + 32 + i)] = ((t) >> 32) | (b & 0xffffffff00000000ULL);
      t = ((unsigned long long int *)data)[2 * (j + i) + 1];
      b = ((unsigned long long int *)data)[2 * (j + 32 + i) + 1];
      ((unsigned long long int *)data)[2 * (j + i) + 1] = (t & 0x00000000ffffffffULL) | ((b) << 32);
      ((unsigned long long int *)data)[2 * (j + 32 + i) + 1] = ((t) >> 32) | (b & 0xffffffff00000000ULL);
    }
  }
  for (j = 0; j < 64; j += 32) {
    unsigned long long int t, b;
    for (i = 0; i < 16; i++) {
      t = ((unsigned long long int *)data)[2 * (j + i)];
      b = ((unsigned long long int *)data)[2 * (j + 16 + i)];
      ((unsigned long long int *)data)[2 * (j + i)] = (t & 0x0000ffff0000ffffULL) | ((b & 0x0000ffff0000ffffULL) << 16);
      ((unsigned long long int *)data)[2 * (j + 16 + i)] = ((t & 0xffff0000ffff0000ULL) >> 16) | (b & 0xffff0000ffff0000ULL);
      t = ((unsigned long long int *)data)[2 * (j + i) + 1];
      b = ((unsigned long long int *)data)[2 * (j + 16 + i) + 1];
      ((unsigned long long int *)data)[2 * (j + i) + 1] = (t & 0x0000ffff0000ffffULL) | ((b & 0x0000ffff0000ffffULL) << 16);
      ((unsigned long long int *)data)[2 * (j + 16 + i) + 1] = ((t & 0xffff0000ffff0000ULL) >> 16) | (b & 0xffff0000ffff0000ULL);
    }
  }
  for (j = 0; j < 64; j += 16) {
    unsigned long long int t, b;
    for (i = 0; i < 8; i++) {
      t = ((unsigned long long int *)data)[2 * (j + i)];
      b = ((unsigned long long int *)data)[2 * (j + 8 + i)];
      ((unsigned long long int *)data)[2 * (j + i)] = (t & 0x00ff00ff00ff00ffULL) | ((b & 0x00ff00ff00ff00ffULL) << 8);
      ((unsigned long long int *)data)[2 * (j + 8 + i)] = ((t & 0xff00ff00ff00ff00ULL) >> 8) | (b & 0xff00ff00ff00ff00ULL);
      t = ((unsigned long long int *)data)[2 * (j + i) + 1];
      b = ((unsigned long long int *)data)[2 * (j + 8 + i) + 1];
      ((unsigned long long int *)data)[2 * (j + i) + 1] = (t & 0x00ff00ff00ff00ffULL) | ((b & 0x00ff00ff00ff00ffULL) << 8);
      ((unsigned long long int *)data)[2 * (j + 8 + i) + 1] = ((t & 0xff00ff00ff00ff00ULL) >> 8) | (b & 0xff00ff00ff00ff00ULL);
    }
  }
  for (j = 0; j < 64; j += 8) {
    unsigned long long int t, b;
    for (i = 0; i < 4; i++) {
      t = ((unsigned long long int *)data)[2 * (j + i)];
      b = ((unsigned long long int *)data)[2 * (j + 4 + i)];
      ((unsigned long long int *)data)[2 * (j + i)] = ((t & 0x0f0f0f0f0f0f0f0fULL) << 4) | (b & 0x0f0f0f0f0f0f0f0fULL);
      ((unsigned long long int *)data)[2 * (j + 4 + i)] = (t & 0xf0f0f0f0f0f0f0f0ULL) | ((b & 0xf0f0f0f0f0f0f0f0ULL) >> 4);
      t = ((unsigned long long int *)data)[2 * (j + i) + 1];
      b = ((unsigned long long int *)data)[2 * (j + 4 + i) + 1];
      ((unsigned long long int *)data)[2 * (j + i) + 1] = ((t & 0x0f0f0f0f0f0f0f0fULL) << 4) | (b & 0x0f0f0f0f0f0f0f0fULL);
      ((unsigned long long int *)data)[2 * (j + 4 + i) + 1] = (t & 0xf0f0f0f0f0f0f0f0ULL) | ((b & 0xf0f0f0f0f0f0f0f0ULL) >> 4);
    }
  }
  for (j = 0; j < 64; j += 4) {
    unsigned long long int t, b;
    for (i = 0; i < 2; i++) {
      t = ((unsigned long long int *)data)[2 * (j + i)];
      b = ((unsigned long long int *)data)[2 * (j + 2 + i)];
      ((unsigned long long int *)data)[2 * (j + i)] = ((t & 0x3333333333333333ULL) << 2) | (b & 0x3333333333333333ULL);
      ((unsigned long long int *)data)[2 * (j + 2 + i)] = (t & 0xccccccccccccccccULL) | ((b & 0xccccccccccccccccULL) >> 2);
      t = ((unsigned long long int *)data)[2 * (j + i) + 1];
      b = ((unsigned long long int *)data)[2 * (j + 2 + i) + 1];
      ((unsigned long long int *)data)[2 * (j + i) + 1] = ((t & 0x3333333333333333ULL) << 2) | (b & 0x3333333333333333ULL);
      ((unsigned long long int *)data)[2 * (j + 2 + i) + 1] = (t & 0xccccccccccccccccULL) | ((b & 0xccccccccccccccccULL) >> 2);
    }
  }
  for (j = 0; j < 64; j += 2) {
    unsigned long long int t, b;
    for (i = 0; i < 1; i++) {
      t = ((unsigned long long int *)data)[2 * (j + i)];
      b = ((unsigned long long int *)data)[2 * (j + 1 + i)];
      ((unsigned long long int *)data)[2 * (j + i)] = ((t & 0x5555555555555555ULL) << 1) | (b & 0x5555555555555555ULL);
      ((unsigned long long int *)data)[2 * (j + 1 + i)] = (t & 0xaaaaaaaaaaaaaaaaULL) | ((b & 0xaaaaaaaaaaaaaaaaULL) >> 1);
      t = ((unsigned long long int *)data)[2 * (j + i) + 1];
      b = ((unsigned long long int *)data)[2 * (j + 1 + i) + 1];
      ((unsigned long long int *)data)[2 * (j + i) + 1] = ((t & 0x5555555555555555ULL) << 1) | (b & 0x5555555555555555ULL);
      ((unsigned long long int *)data)[2 * (j + 1 + i) + 1] = (t & 0xaaaaaaaaaaaaaaaaULL) | ((b & 0xaaaaaaaaaaaaaaaaULL) >> 1);
    }
  }
}
```