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

```asm
<main>:
  endbr64
  push   %rbp
  mov    %rsp,%rbp
  sub    $0xd0,%rsp
  mov    %edi,-0xc4(%rbp)
  mov    %rsi,-0xd0(%rbp)
  mov    %fs:0x28,%rax
  mov    %rax,-0x8(%rbp)
  xor    %eax,%eax
  movl   $0x0,-0xac(%rbp)
  movl   $0x9,-0xa8(%rbp)
  mov    -0xd0(%rbp),%rax
  add    $0x8,%rax
  mov    (%rax),%rax
  lea    D43(%rip),%rdx
  mov    %rdx,%rsi
  mov    %rax,%rdi
  call   <strcmp@plt>
  test   %eax,%eax
  jne    L93
  mov    -0xd0(%rbp),%rax
  add    $0x10,%rax
  mov    (%rax),%rax
  mov    %rax,%rdi
  call   <atoi@plt>
  mov    %eax,-0xa8(%rbp)
  movl   $0x2,-0xac(%rbp)
L93:
  mov    -0xd0(%rbp),%rax
  add    $0x8,%rax
  mov    (%rax),%rax
  lea    D41(%rip),%rdx
  mov    %rdx,%rsi
  mov    %rax,%rdi
  call   <strcmp@plt>
  test   %eax,%eax
  jne    L36
  lea    -0xa0(%rbp),%rax
  lea    D28(%rip),%rdx
  mov    %rdx,%rsi
  mov    %rax,%rdi
  call   <strcpy@plt>
  mov    -0xd0(%rbp),%rax
  add    $0x10,%rax
  mov    (%rax),%rdx
  lea    -0xa0(%rbp),%rax
  mov    %rdx,%rsi
  mov    %rax,%rdi
  call   <strcat@plt>
  movl   $0x2,-0xac(%rbp)
  jmp    L19
L36:
  lea    -0xa0(%rbp),%rax
  lea    D17(%rip),%rdx
  mov    %rdx,%rsi
  mov    %rax,%rdi
  call   <strcpy@plt>
L19:
  mov    -0xd0(%rbp),%rax
  add    $0x8,%rax
  mov    (%rax),%rax
  lea    D8(%rip),%rdx
  mov    %rdx,%rsi
  mov    %rax,%rdi
  call   <strcmp@plt>
  test   %eax,%eax
  jne    L103
  lea    D69(%rip),%rax
  mov    %rax,%rdi
  call   <printf@plt>
  mov    $0x0,%edi
  call   <exit@plt>
L103:
  movl   $0x0,-0xb0(%rbp)
  jmp    L77
L53:
  call   <fork@plt>
  mov    %eax,-0xa4(%rbp)
  cmpl   $0x0,-0xa4(%rbp)
  jne    L42
  mov    -0xac(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0xd0(%rbp),%rax
  lea    (%rdx,%rax,1),%rdi
  mov    -0xac(%rbp),%edx
  mov    -0xc4(%rbp),%eax
  sub    %edx,%eax
  mov    %eax,%esi
  lea    -0xa0(%rbp),%rcx
  mov    -0xa8(%rbp),%edx
  mov    -0xb0(%rbp),%eax
  mov    %rcx,%r8
  mov    %edx,%ecx
  mov    %rdi,%rdx
  mov    %eax,%edi
  call   <do_child@plt>
  jmp    L62
L42:
  cmpl   $0x0,-0xa4(%rbp)
  jg     L62
  lea    D0(%rip),%rax
  mov    %rax,%rdi
  call   <printf@plt>
L62:
  addl   $0x1,-0xb0(%rbp)
L77:
  mov    -0xb0(%rbp),%eax
  cmp    -0xa8(%rbp),%eax
  jne    L53
  movl   $0x0,-0xb0(%rbp)
  jmp    L8
L20:
  lea    -0xb4(%rbp),%rax
  mov    %rax,%rdi
  call   <wait@plt>
  mov    %eax,-0xa4(%rbp)
  addl   $0x1,-0xb0(%rbp)
L8:
  mov    -0xb0(%rbp),%eax
  cmp    -0xa8(%rbp),%eax
  jne    L20
  mov    -0xac(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0xd0(%rbp),%rax
  add    %rdx,%rax
  mov    %rax,%rdi
  call   <cleanup@plt>
  mov    $0x0,%eax
  mov    -0x8(%rbp),%rdx
  sub    %fs:0x28,%rdx
  je     L100
  call   <__stack_chk_fail@plt>
L100:
  leave
  ret
```

tool_calls: name: read_data
arguments: data_tag: D43
data_type: string
name: read_data
arguments: data_tag: D41
data_type: string
name: read_data
arguments: data_tag: D28
data_type: string
name: read_data
arguments: data_tag: D17
data_type: string
name: read_data
arguments: data_tag: D8
data_type: string
name: read_data
arguments: data_tag: D69
data_type: string
name: read_data
arguments: data_tag: D0
data_type: string

tool: D43: -processes

tool: D41: -script

tool: D28: /home/julia/coccinelle/tools/distributed/

tool: D17: /home/julia/coccinelle/tools/distributed/spatch_linux_script

tool: D8: --help

tool: D69: spatch_linux [-processes n] foo.cocci ...


tool: D0: *** forking error ***


assistant: ```c
int main(unsigned int argc, char **argv) {
  int i, start = 0, max;
  char script[150];
  max = 9;
  if (!strcmp(argv[1], "-processes")) {
    max = atoi(argv[2]);
    start = 2;
  }
  if (!strcmp(argv[1], "-script")) {
    strcpy(script, "/home/julia/coccinelle/tools/distributed/");
    strcat(script, argv[2]);
    start = 2;
  } else
    strcpy(script, "/home/julia/coccinelle/tools/distributed/"
                   "spatch_linux_script");
  if (!strcmp(argv[1], "--help")) {
    printf("spatch_linux [-processes n] foo.cocci ...\n");
    exit(0);
  }
  int pid;
  for (i = 0; i != max; i++) {
    if (!(pid = fork())) {
      do_child(i, argc - start, &argv[start], max, script);
    } else if (pid > 0) {
    } else
      printf("*** forking error ***\n");
  }
  int status;
  for (i = 0; i != max; i++) {
    pid = wait(&status);
  }
  cleanup(&argv[start]);
}
```