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

```asm
<array_copy>:
  endbr64
  push   %r15
  push   %r14
  push   %r13
  push   %r12
  push   %rbp
  push   %rbx
  sub    $0xe8,%rsp
  mov    %rcx,0xb0(%rsp)
  mov    %r8,0xb8(%rsp)
  test   %rdi,%rdi
  je     L302
  mov    %rsi,%r14
  mov    %rdx,%r15
  cmp    $0x1,%rdi
  je     L23
  movq   $0x0,0x68(%rsp)
  mov    (%rsi),%rdx
  lea    0x48(%rsi),%rax
  mov    %rax,0xd8(%rsp)
  test   %rdx,%rdx
  je     L302
  mov    %r15,%rax
  mov    %rdi,%r14
  mov    %rsi,%r15
  mov    %rax,%r13
L62:
  mov    0x68(%rsp),%rax
  mov    0xb8(%rsp),%rbx
  mov    0xb0(%rsp),%rcx
  mov    (%rbx,%rax,8),%rdi
  mov    (%rcx,%rax,8),%rax
  mov    %rdi,0xa0(%rsp)
  mov    %rax,0xa8(%rsp)
  mov    0x8(%r15),%rax
  cmp    $0x2,%r14
  je     L252
  movq   $0x0,0x48(%rsp)
  test   %rax,%rax
  je     L238
L140:
  mov    0x48(%rsp),%rbx
  mov    0xa0(%rsp),%rcx
  mov    0xa8(%rsp),%rsi
  mov    (%rcx,%rbx,8),%rcx
  mov    (%rsi,%rbx,8),%rbx
  mov    %rcx,0x90(%rsp)
  mov    %rbx,0x98(%rsp)
  cmp    $0x3,%r14
  je     L251
  movq   $0x0,0x30(%rsp)
  mov    0x10(%r15),%rcx
  test   %rcx,%rcx
  je     L30
  mov    %r13,%rax
  mov    %r15,%r13
  mov    %r14,%r15
  mov    %rax,%r14
L34:
  mov    0x90(%rsp),%rdi
  mov    0x30(%rsp),%rax
  mov    (%rdi,%rax,8),%rsi
  mov    0x98(%rsp),%rdi
  mov    (%rdi,%rax,8),%rax
  mov    %rsi,0x80(%rsp)
  mov    %rax,0x88(%rsp)
  cmp    $0x4,%r15
  je     L55
  movq   $0x0,0x18(%rsp)
  mov    0x18(%r13),%rdx
  test   %rdx,%rdx
  je     L149
  mov    %r14,%r12
  mov    %r15,%r14
  mov    %r13,%r15
L253:
  mov    0x18(%rsp),%rax
  mov    0x80(%rsp),%rdi
  mov    0x88(%rsp),%rsi
  mov    (%rdi,%rax,8),%rcx
  mov    (%rsi,%rax,8),%rax
  mov    %rcx,0x70(%rsp)
  mov    %rax,0x78(%rsp)
  cmp    $0x5,%r14
  je     L63
  movq   $0x0,0x10(%rsp)
  mov    0x20(%r15),%rax
  mov    %r12,%rbp
  test   %rax,%rax
  je     L203
L131:
  mov    0x70(%rsp),%rcx
  mov    0x10(%rsp),%rdi
  mov    (%rcx,%rdi,8),%rbx
  mov    0x78(%rsp),%rcx
  mov    (%rcx,%rdi,8),%rdi
  mov    %rbx,0x50(%rsp)
  mov    %rdi,0x58(%rsp)
  cmp    $0x6,%r14
  je     L289
  mov    0x28(%r15),%rdx
  xor    %r12d,%r12d
  test   %rdx,%rdx
  je     L8
  mov    %r14,0x8(%rsp)
  mov    %r15,%r14
  mov    %r12,%r15
L17:
  mov    0x50(%rsp),%rax
  cmpq   $0x7,0x8(%rsp)
  mov    (%rax,%r15,8),%rax
  mov    %rax,0x38(%rsp)
  mov    0x58(%rsp),%rax
  mov    (%rax,%r15,8),%rax
  mov    %rax,0x40(%rsp)
  je     L96
  mov    0x30(%r14),%rax
  xor    %r13d,%r13d
  test   %rax,%rax
  je     L121
  mov    %r15,0xd0(%rsp)
  mov    %r14,%rsi
  mov    %r13,%r14
  mov    %rsi,%r13
L115:
  mov    0x38(%rsp),%rcx
  cmpq   $0x8,0x8(%rsp)
  mov    (%rcx,%r14,8),%rbx
  mov    0x40(%rsp),%rcx
  mov    %rbx,0x20(%rsp)
  mov    (%rcx,%r14,8),%rbx
  mov    %rbx,0x28(%rsp)
  je     L147
  mov    0x38(%r13),%rdx
  xor    %r12d,%r12d
  test   %rdx,%rdx
  je     L322
  mov    %r14,0xc8(%rsp)
L200:
  mov    0x20(%rsp),%rax
  mov    (%rax,%r12,8),%r14
  mov    0x28(%rsp),%rax
  mov    (%rax,%r12,8),%r15
  mov    0x8(%rsp),%rax
  cmp    $0x9,%rax
  je     L281
  sub    $0x9,%rax
  xor    %ebx,%ebx
  cmpq   $0x0,0x40(%r13)
  je     L328
  mov    %r14,0x60(%rsp)
  mov    %rbp,%r14
  mov    0xd8(%rsp),%rbp
  mov    %r12,0xc0(%rsp)
  mov    %r15,%r12
  mov    %rax,%r15
L241:
  mov    0x60(%rsp),%rax
  mov    (%r12,%rbx,8),%rcx
  mov    %r14,%rdx
  mov    %rbp,%rsi
  mov    %r15,%rdi
  mov    (%rax,%rbx,8),%r8
  add    $0x1,%rbx
  call   <array_copy>
  cmp    0x40(%r13),%rbx
  jb     L241
  mov    0xc0(%rsp),%r12
  mov    0x38(%r13),%rdx
  mov    %r14,%rbp
L328:
  add    $0x1,%r12
  cmp    %rdx,%r12
  jb     L200
  mov    0xc8(%rsp),%r14
  mov    0x30(%r13),%rax
L322:
  add    $0x1,%r14
  cmp    %rax,%r14
  jb     L115
  mov    0xd0(%rsp),%r15
  mov    0x28(%r13),%rdx
  mov    %r13,%r14
L121:
  add    $0x1,%r15
  cmp    %rdx,%r15
  jb     L17
  mov    %r14,%r15
  mov    0x8(%rsp),%r14
  mov    0x20(%r15),%rax
L8:
  addq   $0x1,0x10(%rsp)
  mov    0x10(%rsp),%rsi
  cmp    %rax,%rsi
  jb     L131
  mov    0x18(%r15),%rdx
  mov    %rbp,%r12
L203:
  addq   $0x1,0x18(%rsp)
  mov    0x18(%rsp),%rax
  cmp    %rdx,%rax
  jb     L253
  mov    %r15,%r13
  mov    %r14,%r15
  mov    %r12,%r14
  mov    0x10(%r13),%rcx
L149:
  addq   $0x1,0x30(%rsp)
  mov    0x30(%rsp),%rax
  cmp    %rcx,%rax
  jb     L34
  mov    %r14,%rax
  mov    %r15,%r14
  mov    %r13,%r15
  mov    %rax,%r13
  mov    0x8(%r15),%rax
L30:
  addq   $0x1,0x48(%rsp)
  mov    0x48(%rsp),%rsi
  cmp    %rax,%rsi
  jb     L140
  mov    (%r15),%rdx
L238:
  addq   $0x1,0x68(%rsp)
  mov    0x68(%rsp),%rax
  cmp    %rdx,%rax
  jb     L62
L302:
  add    $0xe8,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
  nopl   0x0(%rax,%rax,1)
L281:
  mov    0x40(%r13),%rdx
  mov    %r15,%rsi
  mov    %r14,%rdi
  imul   %rbp,%rdx
  call   <memcpy@plt>
  mov    0x38(%r13),%rdx
  jmp    L328
  nopl   0x0(%rax)
L147:
  mov    0x38(%r13),%rdx
  mov    0x20(%rsp),%rdi
  mov    %rbx,%rsi
  imul   %rbp,%rdx
  call   <memcpy@plt>
  mov    0x30(%r13),%rax
  jmp    L322
  xchg   %ax,%ax
L96:
  mov    0x30(%r14),%rdx
  mov    0x38(%rsp),%rdi
  mov    %rax,%rsi
  imul   %rbp,%rdx
  call   <memcpy@plt>
  mov    0x28(%r14),%rdx
  jmp    L121
  xchg   %ax,%ax
L289:
  mov    0x28(%r15),%rdx
  mov    %rdi,%rsi
  mov    0x50(%rsp),%rdi
  imul   %rbp,%rdx
  call   <memcpy@plt>
  mov    0x20(%r15),%rax
  jmp    L8
  xchg   %ax,%ax
L63:
  mov    0x20(%r15),%rdx
  mov    %rax,%rsi
  mov    %rcx,%rdi
  imul   %r12,%rdx
  call   <memcpy@plt>
  mov    0x18(%r15),%rdx
  jmp    L203
  nopl   0x0(%rax)
L55:
  mov    0x18(%r13),%rdx
  mov    0x80(%rsp),%rdi
  mov    %rax,%rsi
  imul   %r14,%rdx
  call   <memcpy@plt>
  mov    0x10(%r13),%rcx
  jmp    L149
  nopl   0x0(%rax)
L251:
  mov    0x10(%r15),%rdx
  mov    %rbx,%rsi
  mov    %rcx,%rdi
  imul   %r13,%rdx
  call   <memcpy@plt>
  mov    0x8(%r15),%rax
  jmp    L30
  nopl   0x0(%rax)
L252:
  imul   %r13,%rax
  mov    0xa8(%rsp),%rsi
  mov    %rax,%rdx
  call   <memcpy@plt>
  mov    (%r15),%rdx
  jmp    L238
  nopl   0x0(%rax)
L23:
  mov    (%r14),%rdx
  add    $0xe8,%rsp
  mov    %rcx,%rsi
  mov    %r8,%rdi
  pop    %rbx
  pop    %rbp
  imul   %r15,%rdx
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  jmp    1050 <memcpy@plt>
```

assistant: ```c
void array_copy(size_t dim, const size_t *size, size_t v_size, void *from, void *to) {
  switch (dim) {
  case 0:
    break;
  case 1:
    memcpy(to, from, size[0] * v_size);
    break;
  default:
    for (size_t i = 0; i < size[0]; i++) {
      array_copy(dim - 1, size + 1, v_size, ((void **)from)[i], ((void **)to)[i]);
    }
    break;
  }
}
```