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

```asm
<main>:
  endbr64
  push   %rbp
  mov    %rsp,%rbp
  sub    $0xd0,%rsp
  mov    %fs:0x28,%rax
  mov    %rax,-0x8(%rbp)
  xor    %eax,%eax
  movq   $0x0,-0xc0(%rbp)
  movq   $0x0,-0xb8(%rbp)
  movq   $0x0,-0xb0(%rbp)
  movq   $0x0,-0xa8(%rbp)
  movq   $0x0,-0xa0(%rbp)
  movq   $0x0,-0x98(%rbp)
  movq   $0x0,-0x90(%rbp)
  movq   $0x0,-0x88(%rbp)
  movq   $0x0,-0x80(%rbp)
  movq   $0x0,-0x78(%rbp)
  movl   $0x1,-0xc4(%rbp)
  mov    $0x0,%eax
  call   <initscr@plt>
  mov    $0x0,%eax
  call   <clear@plt>
  lea    D49(%rip),%rax
  mov    %rax,%rdi
  mov    $0x0,%eax
  call   <printw@plt>
  lea    -0x70(%rbp),%rax
  mov    %rax,%rdi
  call   <getstr@plt>
  lea    D9(%rip),%rax
  mov    %rax,%rdi
  call   <puts@plt>
  lea    D38(%rip),%rax
  mov    %rax,%rdi
  call   <puts@plt>
  lea    -0x70(%rbp),%rax
  mov    %rax,%rsi
  lea    D24(%rip),%rax
  mov    %rax,%rdi
  mov    $0x0,%eax
  call   <printw@plt>
  lea    -0xc0(%rbp),%rax
  mov    %rax,%rdi
  call   <getstr@plt>
  movl   $0x0,-0xc8(%rbp)
  jmp    L6
L9:
  mov    -0xc8(%rbp),%eax
  cltq
  movzbl -0xc0(%rbp,%rax,1),%eax
  movsbl %al,%eax
  mov    %eax,%edi
  call   <isspace@plt>
  test   %rax,%rax
  jne    L48
  mov    -0xc8(%rbp),%eax
  cltq
  movzbl -0xc0(%rbp,%rax,1),%eax
  movsbl %al,%eax
  mov    %eax,%edi
  call   <ispunct@plt>
  test   %rax,%rax
  je     L30
L48:
  addl   $0x1,-0xc4(%rbp)
L30:
  addl   $0x1,-0xc8(%rbp)
L6:
  lea    -0xc0(%rbp),%rax
  mov    %rax,%rdi
  call   <strlen@plt>
  cmp    %eax,-0xc8(%rbp)
  jl     L9
  lea    -0xc0(%rbp),%rax
  mov    %rax,%rdi
  call   <strlen@plt>
  sub    $0x1,%eax
  cltq
  movzbl -0xc0(%rbp,%rax,1),%eax
  movsbl %al,%eax
  mov    %eax,%edi
  call   <ispunct@plt>
  test   %rax,%rax
  je     L33
  subl   $0x1,-0xc4(%rbp)
L33:
  mov    -0xc4(%rbp),%edx
  lea    -0x70(%rbp),%rax
  mov    %rax,%rsi
  lea    D25(%rip),%rax
  mov    %rax,%rdi
  mov    $0x0,%eax
  call   <printw@plt>
  mov    $0x0,%eax
  call   <getch@plt>
  mov    $0x0,%eax
  call   <endwin@plt>
  nop
  mov    -0x8(%rbp),%rax
  sub    %fs:0x28,%rax
  je     L29
  call   <__stack_chk_fail@plt>
L29:
  leave
  ret
```

tool_calls: name: parse_data
arguments: tag: D49
data_type: string
name: parse_data
arguments: tag: D9
data_type: string
name: parse_data
arguments: tag: D38
data_type: string
name: parse_data
arguments: tag: D24
data_type: string
name: parse_data
arguments: tag: D25
data_type: string

tool: D49: Bienvenido Usuario. Para empezar porfavor introdusca su nombre
>>

tool: D9: Este programa lee y evalua todos los caracteres de una cadena de hasta 80 caracteres 


tool: D38: Al terminar de evaluar la cadena se determina y despliega el numero de palabras que forman la cadena 


tool: D24: %s, Porfavor introduce una cadena para ser evaluada 
>>

tool: D25: %s, Su cadena consiste de %d palabras


assistant: ```c
void main(void) {
  char name[100];
  char daStr[80] = "";
  int i, count = 1;
  initscr();
  clear();
  printw("Bienvenido Usuario. Para empezar porfavor introdusca su nombre\n>>");
  getstr(name);
  puts("Este programa lee y evalua todos los caracteres de una cadena de hasta 80 caracteres \n");
  puts("Al terminar de evaluar la cadena se determina y despliega el numero de palabras que forman la cadena \n");
  printw("%s, Porfavor introduce una cadena para ser evaluada \n>>", name);
  getstr(daStr);
  for (i = 0; i < strlen(daStr); i++)
    if (isspace(daStr[i]) || ispunct(daStr[i])) {
      count++;
    }
  if (ispunct(daStr[strlen(daStr) - 1])) {
    count--;
  }
  printw("%s, Su cadena consiste de %d palabras\n", name, count);
  getch();
  endwin();
}
```