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

```asm
<main>:
  endbr64
  push   %rbp
  lea    D59(%rip),%rdi
  mov    %rsp,%rbp
  push   %r15
  push   %r14
  lea    -0x3c(%rbp),%r14
  push   %r13
  lea    D16(%rip),%r13
  push   %r12
  push   %rbx
  sub    $0x28,%rsp
  mov    %fs:0x28,%rax
  mov    %rax,-0x38(%rbp)
  xor    %eax,%eax
  movl   $0x0,-0x40(%rbp)
  movl   $0x0,-0x3c(%rbp)
  call   <puts@plt>
  lea    -0x40(%rbp),%rsi
  mov    %r13,%rdi
  call   <scanf@plt>
  lea    D48(%rip),%rdi
  call   <puts@plt>
  mov    %r14,%rsi
  mov    %r13,%rdi
  call   <scanf@plt>
  mov    -0x3c(%rbp),%edx
  mov    -0x40(%rbp),%r12d
  cmp    %r12d,%edx
  jl     L166
L143:
  mov    %edx,%eax
  mov    %rsp,%rsi
  sub    %r12d,%eax
  cltq
  lea    0xf(,%rax,4),%rax
  mov    %rax,%rcx
  and    $0xfffffffffffff000,%rax
  sub    %rax,%rsi
  and    $0xfffffffffffffff0,%rcx
  cmp    %rsi,%rsp
  je     L45
L108:
  sub    $0x1000,%rsp
  orq    $0x0,0xff8(%rsp)
  cmp    %rsi,%rsp
  jne    L108
L45:
  and    $0xfff,%ecx
  sub    %rcx,%rsp
  test   %rcx,%rcx
  jne    L197
L167:
  mov    %rsp,%r14
  cmp    %edx,%r12d
  jge    L31
  xor    %ebx,%ebx
  nopl   0x0(%rax,%rax,1)
L82:
  mov    %r12d,%edi
  call   <func_sum@plt>
  movd   %r12d,%xmm0
  movd   %eax,%xmm1
  mov    %eax,%edi
  mov    %eax,%r13d
  punpckldq %xmm1,%xmm0
  movq   %xmm0,%r15
  call   <func_sum@plt>
  cmp    %r12d,%eax
  jne    L129
  cmp    %r12d,%r13d
  jne    L104
L129:
  add    $0x1,%r12d
  cmp    %r12d,-0x3c(%rbp)
  jg     L82
  test   %ebx,%ebx
  je     L31
L1:
  mov    %r14,%r15
  mov    %r14,%r13
  xor    %r12d,%r12d
  nopl   (%rax)
L71:
  xor    %edx,%edx
  jmp    L131
  nopl   0x0(%rax)
L75:
  add    $0x1,%edx
L163:
  cmp    %edx,%ebx
  jle    L255
L131:
  cmp    %r12d,%edx
  je     L75
  movslq %edx,%rcx
  shl    $0x2,%rcx
  lea    (%r14,%rcx,1),%rdi
  mov    (%rdi),%eax
  cmp    %eax,0x0(%r13)
  jne    L75
  lea    -0x1(%rbx),%r8d
  cmp    %edx,%r8d
  jle    L251
  sub    $0x2,%ebx
  lea    0x4(%r14,%rcx,1),%rsi
  mov    %r8d,-0x44(%rbp)
  sub    %edx,%ebx
  lea    0x4(,%rbx,4),%rdx
  call   <memmove@plt>
  mov    -0x44(%rbp),%ebx
  mov    $0x1,%edx
  cmp    %edx,%ebx
  jg     L131
  nopw   0x0(%rax,%rax,1)
L255:
  add    $0x1,%r12d
  cmp    %r12d,%ebx
  jle    L36
  add    $0x4,%r13
  jmp    L71
  nopl   0x0(%rax,%rax,1)
L104:
  movslq %ebx,%rax
  add    $0x1,%r12d
  add    $0x2,%ebx
  mov    %r15,(%r14,%rax,4)
  cmp    %r12d,-0x3c(%rbp)
  jg     L82
  jmp    L1
  nopl   (%rax)
L251:
  mov    %r8d,%ebx
  mov    $0x1,%edx
  jmp    L163
L166:
  lea    D1(%rip),%rdi
  call   <puts@plt>
  mov    %r14,%rsi
  mov    %r13,%rdi
  call   <scanf@plt>
  mov    -0x3c(%rbp),%edx
  mov    -0x40(%rbp),%r12d
  jmp    L143
L197:
  orq    $0x0,-0x8(%rsp,%rcx,1)
  jmp    L167
L31:
  xor    %esi,%esi
  lea    D67(%rip),%rdi
  xor    %eax,%eax
  call   <printf@plt>
  nopl   0x0(%rax,%rax,1)
L177:
  mov    -0x38(%rbp),%rax
  sub    %fs:0x28,%rax
  jne    L111
  lea    -0x28(%rbp),%rsp
  xor    %eax,%eax
  pop    %rbx
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  pop    %rbp
  ret
L111:
  call   <__stack_chk_fail@plt>
L36:
  mov    %ebx,%eax
  mov    $0x2,%ecx
  lea    D67(%rip),%rdi
  cltd
  idiv   %ecx
  mov    %eax,%esi
  xor    %eax,%eax
  call   <printf@plt>
  test   %ebx,%ebx
  jle    L177
  sub    $0x1,%ebx
  shr    %ebx
  mov    %ebx,%eax
  lea    D55(%rip),%rbx
  lea    0x8(%r14,%rax,8),%r12
  xchg   %ax,%ax
L8:
  mov    0x4(%r15),%edx
  mov    (%r15),%esi
  mov    %rbx,%rdi
  xor    %eax,%eax
  add    $0x8,%r15
  call   <printf@plt>
  cmp    %r12,%r15
  jne    L8
  jmp    L177
```

tool_calls: name: extract_symbolic_data
arguments: tag: D59
type_guessed: string
name: extract_symbolic_data
arguments: tag: D16
type_guessed: string
name: extract_symbolic_data
arguments: tag: D48
type_guessed: string
name: extract_symbolic_data
arguments: tag: D1
type_guessed: string
name: extract_symbolic_data
arguments: tag: D67
type_guessed: string
name: extract_symbolic_data
arguments: tag: D55
type_guessed: string

tool: D59: Give the lower  field's number, except number 0 , and press enter :

tool: D16: %d

tool: D48: Give the upper  field's number and press enter  :

tool: D1: Msg:Give the upper field's number to  be  greater than the  lower and press enter :

tool: D67: 
The couples of friend numbers are %d,the: 


tool: D55:  %d and %d


assistant: ```c
int main() {
  int *p;
  int i, j, k, size, n = 0;
  int low = 0, high = 0, num = 0, sum = 0;
  printf("Give the lower  field's number, except number 0 , and press enter :\n");
  scanf("%d", &low);
  printf("Give the upper  field's number and press enter  :\n");
  scanf("%d", &high);
  if (high < low) {
    printf("Msg:Give the upper field's number to  be  greater than the  lower and press enter :\n");
    scanf("%d", &high);
  }
  int arr[high - low];
  for (num = low; num < high; num++) {
    sum = func_sum(num);
    if (func_sum(sum) == num && sum != num) {
      arr[n] = num;
      arr[n + 1] = sum;
      n = n + 2;
    }
  }
  size = n;
  p = arr;
  for (i = 0; i < size; i++) {
    for (j = 0; j < size; j++) {
      if (i == j) {
        continue;
      } else if (*(p + i) == *(p + j)) {
        k = j;
        size--;
        while (k < size) {
          *(p + k) = *(p + k + 1);
          k++;
        }
        j = 0;
      }
    }
  }
  printf("\nThe couples of friend numbers are %d,the: \n", size / 2);
  for (i = 0; i < size; i = i + 2) {
    printf(" %d and %d\n", arr[i], arr[i + 1]);
  }
  return 0;
}
```