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

```asm
<question_four>:
  endbr64
  push   %rbp
  mov    %rsp,%rbp
  push   %r15
  push   %r14
  push   %r13
  push   %r12
  push   %rbx
  sub    $0x18,%rsp
  mov    %fs:0x28,%rax
  mov    %rax,-0x38(%rbp)
  mov    %rsp,%rax
  cmp    %rax,%rsp
  je     L64
L90:
  sub    $0x1000,%rsp
  orq    $0x0,0xff8(%rsp)
  cmp    %rax,%rsp
  jne    L90
L64:
  sub    $0x190,%rsp
  orq    $0x0,0x188(%rsp)
  lea    D18(%rip),%rdi
  lea    D25(%rip),%r14
  lea    D45(%rip),%r12
  lea    D49(%rip),%r15
  call   <puts@plt>
  mov    %rsp,%rbx
  mov    $0x64,%esi
  lea    -0x3c(%rbp),%r13
  mov    %rbx,%rdi
  call   <insere_lista_auto@plt>
  mov    $0x64,%esi
  mov    %rbx,%rdi
  call   <mostra_lista@plt>
  jmp    L51
  nopl   0x0(%rax,%rax,1)
L17:
  movslq -0x3c(%rbp),%rax
  lea    D70(%rip),%rdi
  mov    (%rbx,%rax,4),%esi
  xor    %eax,%eax
  call   <printf@plt>
  mov    -0x3c(%rbp),%esi
  mov    %rbx,%rdi
  call   <primoAnterior@plt>
  mov    %eax,%esi
  test   %eax,%eax
  js     L65
  lea    D2(%rip),%rdi
  xor    %eax,%eax
  call   <printf@plt>
L29:
  mov    -0x3c(%rbp),%esi
  mov    $0x64,%edx
  mov    %rbx,%rdi
  call   <primoPosterior@plt>
  mov    %eax,%esi
  test   %eax,%eax
  js     L66
  lea    D40(%rip),%rdi
  xor    %eax,%eax
  call   <printf@plt>
L18:
  movslq -0x3c(%rbp),%rax
  mov    (%rbx,%rax,4),%edi
  call   <primo@plt>
  test   %rax,%rax
  jne    L53
L51:
  mov    %r14,%rdi
  xor    %eax,%eax
  call   <printf@plt>
  mov    %r12,%rdi
  mov    %r13,%rsi
  call   <scanf@plt>
  movslq -0x3c(%rbp),%rax
  mov    (%rbx,%rax,4),%edi
  call   <primo@plt>
  test   %rax,%rax
  jne    L17
  mov    %r15,%rdi
  call   <puts@plt>
  jmp    L18
  nopl   0x0(%rax)
L66:
  lea    D3(%rip),%rdi
  call   <puts@plt>
  jmp    L18
  xchg   %ax,%ax
L65:
  lea    D9(%rip),%rdi
  call   <puts@plt>
  jmp    L29
  nopl   0x0(%rax)
L53:
  mov    -0x38(%rbp),%rax
  sub    %fs:0x28,%rax
  jne    L42
  lea    -0x28(%rbp),%rsp
  pop    %rbx
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  pop    %rbp
  ret
L42:
  call   <__stack_chk_fail@plt>
```

tool_calls: name: disassemble_data
arguments: label: D18
datatype: string
name: disassemble_data
arguments: label: D25
datatype: string
name: disassemble_data
arguments: label: D45
datatype: string
name: disassemble_data
arguments: label: D49
datatype: string
name: disassemble_data
arguments: label: D70
datatype: string
name: disassemble_data
arguments: label: D2
datatype: string
name: disassemble_data
arguments: label: D40
datatype: string
name: disassemble_data
arguments: label: D3
datatype: string
name: disassemble_data
arguments: label: D9
datatype: string

tool: D18: 
------------- Questao 4 -------------

tool: D25: Valor a procurar(indice): 

tool: D45: %d

tool: D49: O numero nao e primo

tool: D70: %d e primo


tool: D2: O proximo primo anterior esta na posicao: %d


tool: D40: O proximo primo posterior esta na posicao: %d


tool: D3: Nao existe um primo posterior

tool: D9: Nao existe um primo anterior

assistant: ```c
void question_four() {
  int n, tam_vetor = 100, vetor[tam_vetor], aux;
  printf("\n------------- Questao 4 -------------\n");
  insere_lista_auto(vetor, tam_vetor);
  mostra_lista(vetor, tam_vetor);
  do {
    printf("Valor a procurar(indice): ");
    scanf("%d", &n);
    if (primo(vetor[n])) {
      printf("%d e primo\n", vetor[n]);
      aux = primoAnterior(vetor, n);
      aux >= 0 ? printf("O proximo primo anterior esta na posicao: %d\n", aux) : printf("Nao existe um primo anterior\n");
      aux = primoPosterior(vetor, n, tam_vetor);
      aux >= 0 ? printf("O proximo primo posterior esta na posicao: %d\n", aux) : printf("Nao existe um primo posterior\n");
    } else
      printf("O numero nao e primo\n");
  } while (!primo(vetor[n]));
}
```