user: Demonstrate the C code that generates the assembly output below:

```asm
<parse_coarse>:
  endbr64
  push   %r15
  push   %r14
  mov    %r9,%r14
  push   %r13
  mov    %rdi,%r13
  push   %r12
  mov    %rdx,%r12
  push   %rbp
  push   %rbx
  mov    %rsi,%rbx
  sub    $0x38,%rsp
  mov    %rcx,0x8(%rsp)
  mov    %r8,0x10(%rsp)
  mov    %fs:0x28,%rax
  mov    %rax,0x28(%rsp)
  xor    %eax,%eax
  call   <strlen@plt>
  mov    $0x3a,%esi
  mov    %r13,%rdi
  mov    %rax,0x18(%rsp)
  call   <strchr@plt>
  mov    %rax,%rbp
  test   %rax,%rax
  je     L28
  cmpb   $0x2d,0x0(%r13)
  je     L173
  mov    D12(%rip),%r15
  lea    0x20(%rsp),%rsi
  mov    $0xa,%edx
  mov    %r13,%rdi
  movq   $0x0,(%r15)
  call   <strtoul@plt>
  cmpq   $0x0,(%r15)
  jne    L173
  cmp    %rbp,0x20(%rsp)
  jne    L173
  mov    D17(%rip),%rdx
  cmp    %rax,(%rdx)
  jb     L173
  lea    0x1(%rbp),%rdx
L52:
  mov    %eax,(%rbx)
  mov    $0x2d,%esi
  mov    %r13,%rdi
  mov    %rdx,(%r12)
  call   <strchr@plt>
  mov    %rax,%rbx
  test   %rax,%rax
  je     L17
  lea    0x1(%rax),%r15
  mov    0x10(%rsp),%rax
  mov    %r15,%rcx
  mov    %r15,(%rax)
  mov    0x18(%rsp),%rax
  sub    %r13,%rcx
  sub    %rcx,%rax
  mov    0x8(%rsp),%rcx
  mov    %rax,(%r14)
  mov    (%r12),%r14
  mov    %rbx,%rax
  sub    %r14,%rax
  mov    %rax,(%rcx)
  movsbl 0x1(%rbx),%edi
  test   %dil,%dil
  jne    L38
  jmp    L48
  nopl   0x0(%rax)
L10:
  movsbl 0x1(%r15),%edi
  add    $0x1,%r15
  test   %dil,%dil
  je     L119
L38:
  call   <is_revchar@plt>
  test   %eax,%eax
  jne    L10
L173:
  mov    $0xffffffff,%eax
L78:
  mov    0x28(%rsp),%rdx
  sub    %fs:0x28,%rdx
  jne    L147
  add    $0x38,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
  nopw   0x0(%rax,%rax,1)
L119:
  mov    (%r12),%r14
L48:
  movsbl (%r14),%edi
  test   %dil,%dil
  je     L3
  cmp    %r14,%rbx
  je     L3
  xor    %r12d,%r12d
  test   %rbx,%rbx
  setne  %r12b
  test   %rbp,%rbp
  setne  %bpl
  movzbl %bpl,%ebp
  jmp    L56
  nopl   0x0(%rax)
L39:
  add    $0x1,%r14
  movsbl (%r14),%edi
  cmp    %r14,%rbx
  je     L3
  test   %dil,%dil
  je     L3
L56:
  mov    %r12d,%edx
  mov    %ebp,%esi
  call   <is_uschar@plt>
  test   %eax,%eax
  jne    L39
  jmp    L173
  nopl   (%rax)
L3:
  xor    %eax,%eax
  jmp    L78
  nop
L28:
  mov    %r13,%rdx
  xor    %eax,%eax
  jmp    L52
  nopw   0x0(%rax,%rax,1)
L17:
  mov    0x18(%rsp),%rdi
  mov    0x10(%rsp),%rax
  add    %r13,%rdi
  mov    %rdi,(%rax)
  mov    0x8(%rsp),%rax
  movq   $0x0,(%r14)
  mov    (%r12),%r14
  sub    %r14,%rdi
  mov    %rdi,(%rax)
  jmp    L48
L147:
  call   <__stack_chk_fail@plt>
```

assistant: ```c
int parse_coarse(const char *v, unsigned *epoch, const char **upstream, size_t *us_len, const char **rev, size_t *rev_len) {
  char *col, *end, *hyp;
  const char *c;
  unsigned long u;
  size_t len = strlen(v);
  if ((col = strchr(v, ':')) != NULL) {
    if (v[0] == '-') {
      return -1;
    }
    errno = 0;
    u = strtoul(v, &end, 10);
    if (errno != 0 || end != col || u > UINT_MAX) {
      return -1;
    }
    *epoch = u;
    *upstream = col + 1;
  } else {
    *epoch = 0;
    *upstream = v;
  }
  if ((hyp = strchr(v, '-')) != NULL) {
    *rev = hyp + 1;
    *rev_len = len - ((hyp + 1) - v);
    *us_len = (hyp - *upstream);
    for (c = hyp + 1; *c != 0; c++) {
      if (!is_revchar(*c)) {
        return -1;
      }
    }
  } else {
    *rev = v + len;
    *rev_len = 0;
    *us_len = (*rev - *upstream);
  }
  c = *upstream;
  for (; *c != 0 && c != hyp; c++) {
    if (!is_uschar(*c, col != NULL, hyp != NULL)) {
      return -1;
    }
  }
  return 0;
}
```