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

```asm
<foo>:
  endbr64
  push   %rbp
  mov    %rsp,%rbp
  push   %r13
  push   %r12
  push   %rbx
  mov    %edi,%ebx
  sub    $0x18,%rsp
  mov    %fs:0x28,%rax
  mov    %rax,-0x28(%rbp)
  xor    %eax,%eax
  movslq %edi,%rax
  mov    %rsp,%rcx
  lea    0xf(,%rax,4),%rax
  mov    %rax,%rdx
  and    $0xfffffffffffff000,%rax
  sub    %rax,%rcx
  and    $0xfffffffffffffff0,%rdx
  cmp    %rcx,%rsp
  je     L78
L276:
  sub    $0x1000,%rsp
  orq    $0x0,0xff8(%rsp)
  cmp    %rcx,%rsp
  jne    L276
L78:
  and    $0xfff,%edx
  sub    %rdx,%rsp
  test   %rdx,%rdx
  jne    L486
L253:
  lea    0x3(%rsp),%r12
  mov    %r12,%rax
  and    $0xfffffffffffffffc,%r12
  shr    $0x2,%rax
  test   %ebx,%ebx
  jle    L407
  lea    -0x1(%rbx),%r13d
  cmp    $0x2,%r13d
  jbe    L84
  mov    %ebx,%edx
  movdqa D120(%rip),%xmm2
  movdqa D86(%rip),%xmm1
  mov    %r12,%rax
  shr    $0x2,%edx
  shl    $0x4,%rdx
  movdqa %xmm2,%xmm3
  add    %r12,%rdx
  nopl   (%rax)
L69:
  movdqa %xmm3,%xmm4
  add    $0x10,%rax
  paddd  %xmm1,%xmm3
  movdqa %xmm4,%xmm0
  pslld  $0x2,%xmm0
  paddd  %xmm4,%xmm0
  movups %xmm0,-0x10(%rax)
  cmp    %rdx,%rax
  jne    L69
  mov    %ebx,%eax
  and    $0xfffffffc,%eax
  test   $0x3,%bl
  je     L583
  movslq %eax,%rcx
  lea    (%rax,%rax,4),%edx
  add    $0x1,%eax
  lea    (%r12,%rcx,4),%rcx
  mov    %edx,(%rcx)
  cmp    %eax,%ebx
  jle    L583
L598:
  lea    0x5(%rdx),%esi
  add    $0x1,%eax
  mov    %esi,0x4(%rcx)
  cmp    %eax,%ebx
  jle    L296
  add    $0xa,%edx
  mov    %edx,0x8(%rcx)
L296:
  cmp    $0x2,%r13d
  jbe    L137
  movdqa D120(%rip),%xmm2
  movdqa D86(%rip),%xmm1
L583:
  mov    %ebx,%edx
  pxor   %xmm3,%xmm3
  movdqa %xmm2,%xmm5
  mov    %r12,%rax
  shr    $0x2,%edx
  movdqa D78(%rip),%xmm4
  shl    $0x4,%rdx
  add    %r12,%rdx
  nopl   0x0(%rax,%rax,1)
L558:
  movdqa %xmm5,%xmm6
  movdqu (%rax),%xmm7
  add    $0x10,%rax
  paddd  %xmm1,%xmm5
  movdqa %xmm6,%xmm0
  pslld  $0x2,%xmm0
  paddd  %xmm6,%xmm0
  pcmpeqd %xmm7,%xmm0
  pand   %xmm0,%xmm3
  pandn  %xmm4,%xmm0
  por    %xmm0,%xmm3
  cmp    %rdx,%rax
  jne    L558
  movdqa %xmm3,%xmm4
  mov    %ebx,%eax
  psrldq $0x8,%xmm4
  and    $0xfffffffc,%eax
  movdqa %xmm4,%xmm0
  pcmpgtd %xmm3,%xmm0
  pand   %xmm0,%xmm4
  pandn  %xmm3,%xmm0
  movdqa %xmm0,%xmm3
  por    %xmm4,%xmm3
  movdqa %xmm3,%xmm4
  psrldq $0x4,%xmm4
  movdqa %xmm4,%xmm0
  pcmpgtd %xmm3,%xmm0
  pand   %xmm0,%xmm4
  pandn  %xmm3,%xmm0
  por    %xmm4,%xmm0
  movd   %xmm0,%edx
  cmp    %ebx,%eax
  je     L287
L105:
  movslq %eax,%rcx
  lea    (%r12,%rcx,4),%rsi
  lea    (%rax,%rax,4),%ecx
  add    $0x1,%eax
  cmp    %ecx,(%rsi)
  je     L40
  cmp    %eax,%ebx
  jle    L142
  mov    $0x1,%edx
L163:
  lea    0x5(%rcx),%edi
  add    $0x1,%eax
  cmp    %edi,0x4(%rsi)
  je     L184
  mov    $0x1,%edx
  cmp    %eax,%ebx
  jle    L142
L170:
  add    $0xa,%ecx
  cmp    %ecx,0x8(%rsi)
  je     L694
L142:
  xor    %eax,%eax
  call   <abort@plt>
L625:
  cmp    $0x2,%r13d
  jbe    L589
  movdqa D120(%rip),%xmm2
  movdqa D86(%rip),%xmm1
L96:
  mov    %ebx,%edx
  mov    %r12,%rax
  movdqa %xmm2,%xmm3
  shr    $0x2,%edx
  shl    $0x4,%rdx
  add    %r12,%rdx
  nop
L354:
  movdqu (%rax),%xmm7
  movdqa %xmm3,%xmm0
  add    $0x10,%rax
  paddd  %xmm1,%xmm3
  paddd  %xmm7,%xmm0
  movups %xmm0,-0x10(%rax)
  cmp    %rax,%rdx
  jne    L354
  mov    %ebx,%eax
  and    $0xfffffffc,%eax
  test   $0x3,%bl
  je     L496
  movslq %eax,%rdx
  lea    (%r12,%rdx,4),%rdx
  add    %eax,(%rdx)
  add    $0x1,%eax
  cmp    %eax,%ebx
  jle    L496
L547:
  add    %eax,0x4(%rdx)
  add    $0x1,%eax
  cmp    %eax,%ebx
  jle    L465
  add    %eax,0x8(%rdx)
L465:
  cmp    $0x2,%r13d
  jbe    L19
  movdqa D120(%rip),%xmm2
  movdqa D86(%rip),%xmm1
L496:
  mov    %ebx,%edx
  pxor   %xmm3,%xmm3
  movdqa %xmm2,%xmm5
  mov    %r12,%rax
  shr    $0x2,%edx
  movdqa D78(%rip),%xmm4
  shl    $0x4,%rdx
  add    %r12,%rdx
  nopl   (%rax)
L471:
  movdqa %xmm5,%xmm6
  movdqu (%rax),%xmm7
  add    $0x10,%rax
  paddd  %xmm1,%xmm5
  movdqa %xmm6,%xmm0
  pslld  $0x1,%xmm0
  paddd  %xmm6,%xmm0
  pslld  $0x1,%xmm0
  pcmpeqd %xmm7,%xmm0
  pand   %xmm0,%xmm3
  pandn  %xmm4,%xmm0
  por    %xmm0,%xmm3
  cmp    %rax,%rdx
  jne    L471
  movdqa %xmm3,%xmm4
  mov    %ebx,%eax
  psrldq $0x8,%xmm4
  and    $0xfffffffc,%eax
  movdqa %xmm4,%xmm0
  pcmpgtd %xmm3,%xmm0
  pand   %xmm0,%xmm4
  pandn  %xmm3,%xmm0
  por    %xmm4,%xmm0
  movdqa %xmm0,%xmm4
  psrldq $0x4,%xmm4
  movdqa %xmm4,%xmm3
  pcmpgtd %xmm0,%xmm3
  pand   %xmm3,%xmm4
  pandn  %xmm0,%xmm3
  por    %xmm4,%xmm3
  movd   %xmm3,%edx
  cmp    %ebx,%eax
  je     L165
L89:
  movslq %eax,%rcx
  lea    (%r12,%rcx,4),%rsi
  lea    (%rax,%rax,2),%ecx
  add    $0x1,%eax
  add    %ecx,%ecx
  cmp    (%rsi),%ecx
  je     L32
  cmp    %eax,%ebx
  jle    L338
  mov    $0x1,%edx
L637:
  lea    0x6(%rcx),%edi
  add    $0x1,%eax
  cmp    0x4(%rsi),%edi
  je     L143
  mov    $0x1,%edx
  cmp    %eax,%ebx
  jle    L338
L629:
  add    $0xc,%ecx
  cmp    %ecx,0x8(%rsi)
  je     L313
L338:
  xor    %eax,%eax
  call   <abort@plt>
L384:
  cmp    $0x2,%r13d
  jbe    L106
  movdqa D120(%rip),%xmm2
  movdqa D86(%rip),%xmm1
L681:
  mov    %ebx,%edx
  mov    %r12,%rax
  movdqa %xmm2,%xmm3
  shr    $0x2,%edx
  shl    $0x4,%rdx
  add    %r12,%rdx
  nopw   0x0(%rax,%rax,1)
L538:
  movdqu (%rax),%xmm6
  movdqa %xmm3,%xmm0
  add    $0x10,%rax
  paddd  %xmm1,%xmm3
  paddd  %xmm6,%xmm0
  movups %xmm0,-0x10(%rax)
  cmp    %rdx,%rax
  jne    L538
  mov    %ebx,%eax
  and    $0xfffffffc,%eax
  test   $0x3,%bl
  je     L302
  movslq %eax,%rdx
  lea    (%r12,%rdx,4),%rdx
  add    %eax,(%rdx)
  add    $0x1,%eax
  cmp    %eax,%ebx
  jle    L302
L569:
  add    %eax,0x4(%rdx)
  add    $0x1,%eax
  cmp    %eax,%ebx
  jle    L446
  add    %eax,0x8(%rdx)
L446:
  cmp    $0x2,%r13d
  jbe    L237
  movdqa D120(%rip),%xmm2
  movdqa D86(%rip),%xmm1
L302:
  mov    %ebx,%edx
  movdqa D78(%rip),%xmm4
  mov    %r12,%rax
  pxor   %xmm3,%xmm3
  shr    $0x2,%edx
  shl    $0x4,%rdx
  add    %r12,%rdx
  nopl   0x0(%rax)
L57:
  movdqa %xmm2,%xmm5
  movdqu (%rax),%xmm7
  add    $0x10,%rax
  paddd  %xmm1,%xmm2
  movdqa %xmm5,%xmm0
  pslld  $0x3,%xmm0
  psubd  %xmm5,%xmm0
  pcmpeqd %xmm7,%xmm0
  pand   %xmm0,%xmm3
  pandn  %xmm4,%xmm0
  por    %xmm0,%xmm3
  cmp    %rax,%rdx
  jne    L57
  movdqa %xmm3,%xmm0
  mov    %ebx,%edx
  psrldq $0x8,%xmm0
  and    $0xfffffffc,%edx
  movdqa %xmm0,%xmm1
  pcmpgtd %xmm3,%xmm1
  pand   %xmm1,%xmm0
  pandn  %xmm3,%xmm1
  por    %xmm0,%xmm1
  movdqa %xmm1,%xmm2
  psrldq $0x4,%xmm2
  movdqa %xmm2,%xmm0
  pcmpgtd %xmm1,%xmm0
  pand   %xmm0,%xmm2
  pandn  %xmm1,%xmm0
  por    %xmm2,%xmm0
  movd   %xmm0,%eax
  test   $0x3,%bl
  je     L552
L100:
  movslq %edx,%rcx
  lea    (%r12,%rcx,4),%rsi
  lea    0x0(,%rdx,8),%ecx
  sub    %edx,%ecx
  add    $0x1,%edx
  cmp    %ecx,(%rsi)
  je     L615
  mov    $0x1,%eax
  cmp    %edx,%ebx
  jle    L678
L186:
  lea    0x7(%rcx),%edi
  add    $0x1,%edx
  cmp    %edi,0x4(%rsi)
  je     L208
  mov    $0x1,%eax
  cmp    %edx,%ebx
  jle    L678
L113:
  add    $0xe,%ecx
  cmp    %ecx,0x8(%rsi)
  je     L552
L678:
  xor    %eax,%eax
  call   <abort@plt>
L407:
  mov    -0x28(%rbp),%rax
  sub    %fs:0x28,%rax
  jne    L640
  lea    -0x18(%rbp),%rsp
  pop    %rbx
  pop    %r12
  pop    %r13
  pop    %rbp
  ret
  nop
L615:
  cmp    %edx,%ebx
  jg     L186
  nopl   0x0(%rax)
L552:
  test   %eax,%eax
  je     L407
  jmp    L678
  xchg   %ax,%ax
L40:
  cmp    %ebx,%eax
  jl     L163
L694:
  test   %edx,%edx
  je     L625
  jmp    L142
  nopl   (%rax)
L32:
  cmp    %eax,%ebx
  jg     L637
L313:
  test   %edx,%edx
  je     L384
  jmp    L338
  nopl   (%rax)
L165:
  test   %edx,%edx
  je     L681
  jmp    L338
  nopl   (%rax)
L287:
  test   %edx,%edx
  je     L96
  jmp    L142
  nopl   (%rax)
L208:
  cmp    %edx,%ebx
  jg     L113
  jmp    L552
  nopw   0x0(%rax,%rax,1)
L184:
  cmp    %ebx,%eax
  jl     L170
  jmp    L694
  nopw   0x0(%rax,%rax,1)
L143:
  cmp    %ebx,%eax
  jl     L629
  jmp    L313
  nopw   0x0(%rax,%rax,1)
L486:
  orq    $0x0,-0x8(%rsp,%rdx,1)
  jmp    L253
L106:
  mov    %r12,%rdx
  mov    $0x1,%eax
  cmp    $0x1,%ebx
  jne    L569
L237:
  xor    %eax,%eax
  xor    %edx,%edx
  jmp    L100
L589:
  mov    %r12,%rdx
  mov    $0x1,%eax
  cmp    $0x1,%ebx
  jne    L547
L19:
  xor    %edx,%edx
  xor    %eax,%eax
  jmp    L89
L84:
  movl   $0x0,0x0(,%rax,4)
  mov    %r12,%rcx
  xor    %edx,%edx
  mov    $0x1,%eax
  cmp    $0x1,%ebx
  jne    L598
  xor    %eax,%eax
  jmp    L105
L137:
  xor    %edx,%edx
  xor    %eax,%eax
  jmp    L105
L640:
  call   <__stack_chk_fail@plt>
```

tool_calls: name: unpack_data
arguments: tag: D120
data_type: byte[16]
name: unpack_data
arguments: tag: D86
data_type: byte[16]
name: unpack_data
arguments: tag: D78
data_type: byte[16]

tool: {"D120": [0x00,0x00,0x00,0x00,0x01,0x00,0x00,0x00,0x02,0x00,0x00,0x00,0x03,0x00,0x00,0x00]}

tool: {"D86": [0x04,0x00,0x00,0x00,0x04,0x00,0x00,0x00,0x04,0x00,0x00,0x00,0x04,0x00,0x00,0x00]}

tool: {"D78": [0x01,0x00,0x00,0x00,0x01,0x00,0x00,0x00,0x01,0x00,0x00,0x00,0x01,0x00,0x00,0x00]}

assistant: ```c
void foo(int n) {
  int a[n], i, err;
  for (i = 0; i < n; i++)
    a[i] = 5 * i;
#pragma omp target map(to : a) map(from : err) private(i)
  {
    err = 0;
    for (i = 0; i < n; i++)
      if (a[i] != 5 * i)
        err = 1;
  }
  if (err)
    abort();
  for (i = 0; i < n; i++)
    a[i] += i;
#pragma omp target map(from : err) private(i)
  {
    err = 0;
    for (i = 0; i < n; i++)
      if (a[i] != 6 * i)
        err = 1;
  }
  if (err)
    abort();
  for (i = 0; i < n; i++)
    a[i] += i;
#pragma omp target firstprivate(a) map(from : err) private(i)
  {
    err = 0;
    for (i = 0; i < n; i++)
      if (a[i] != 7 * i)
        err = 1;
  }
  if (err)
    abort();
}
```