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

```asm
<inet_network>:
  endbr64
  push   %r15
  push   %r14
  push   %r13
  mov    $0xa,%r13d
  push   %r12
  push   %rbp
  push   %rbx
  sub    $0x28,%rsp
  movzbl (%rdi),%r14d
  mov    %fs:0x28,%rax
  mov    %rax,0x18(%rsp)
  xor    %eax,%eax
  lea    0x14(%rsp),%rax
  mov    %rax,0x8(%rsp)
  mov    %rax,(%rsp)
  cmp    $0x30,%r14b
  jne    L173
L93:
  movzbl 0x1(%rdi),%r14d
  mov    $0x8,%r13d
  add    $0x1,%rdi
L173:
  mov    %r14d,%eax
  and    $0xffffffdf,%eax
  cmp    $0x58,%al
  jne    L169
  movzbl 0x1(%rdi),%r14d
  mov    $0x10,%r13d
  add    $0x1,%rdi
L169:
  test   %r14b,%r14b
  je     L147
  lea    0x1(%rdi),%rbx
  xor    %ebp,%ebp
L35:
  movsbl %r14b,%r12d
  lea    -0x1(%rbx),%r15
  mov    %r12d,%edi
  call   <isdigit@plt>
  test   %rax,%rax
  jne    L63
  cmp    $0x10,%r13b
  jne    L11
  mov    %r12d,%edi
  call   <isxdigit@plt>
  test   %rax,%rax
  jne    L170
L11:
  movzbl (%r15),%r14d
  cmp    $0x2e,%r14b
  jne    L65
  lea    0x17(%rsp),%rax
  cmp    %rax,(%rsp)
  je     L143
  addq   $0x1,(%rsp)
  movzbl 0x1(%r15),%r14d
  lea    0x1(%r15),%rdi
  mov    $0xa,%r13d
  mov    (%rsp),%rax
  mov    %bpl,-0x1(%rax)
  cmp    $0x30,%r14b
  jne    L173
  jmp    L93
  nopl   0x0(%rax,%rax,1)
L63:
  mov    %ebp,%eax
  imul   %r13d,%eax
  mov    %eax,%ebp
  lea    -0x30(%r14,%rbp,1),%ebp
L8:
  movzbl (%rbx),%r14d
  add    $0x1,%rbx
  test   %r14b,%r14b
  jne    L35
L48:
  mov    %ebp,%r14d
  nopl   0x0(%rax)
L147:
  mov    (%rsp),%rax
  xor    %edx,%edx
  lea    0x1(%rax),%r12
  sub    0x8(%rsp),%r12
  mov    %r14b,(%rax)
  movsbl %r12b,%eax
L157:
  xor    %r8d,%r8d
  cmp    %edx,%eax
  jle    L74
  mov    0x8(%rsp),%rsi
  movzbl (%rsi,%rdx,1),%r8d
L74:
  add    $0x1,%rdx
  cmp    $0x4,%rdx
  jne    L157
  jmp    L77
L65:
  test   %r14b,%r14b
  je     L48
  movsbl %r14b,%edi
  mov    %ebp,%r14d
  call   <isspace@plt>
  test   %eax,%eax
  jne    L147
L143:
  mov    D3(%rip),%rax
  movzbl (%rax),%r8d
L77:
  mov    0x18(%rsp),%rax
  sub    %fs:0x28,%rax
  jne    L52
  add    $0x28,%rsp
  mov    %r8d,%eax
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
  nopl   (%rax)
L170:
  mov    %r12d,%edi
  shl    $0x4,%ebp
  call   <islower@plt>
  lea    0xa(%r14,%rbp,1),%ebp
  cmp    $0x1,%rax
  sbb    %eax,%eax
  and    $0xffffffe0,%eax
  add    $0x61,%eax
  sub    %eax,%ebp
  jmp    L8
L52:
  call   <__stack_chk_fail@plt>
```

assistant: ```c
in_addr_t inet_network(const char *cp) {
  in_addr_t val, base, n;
  u_char c;
  in_addr_t parts[4], *pp = parts;
  int i;
again:
  val = 0;
  base = 10;
  if (*cp == '0')
    base = 8, cp++;
  if (*cp == 'x' || *cp == 'X')
    base = 16, cp++;
  while ((c = *cp)) {
    if (isdigit(c)) {
      val = (val * base) + (c - '0');
      cp++;
      continue;
    }
    if (base == 16 && isxdigit(c)) {
      val = (val << 4) + (c + 10 - (islower(c) ? 'a' : 'A'));
      cp++;
      continue;
    }
    break;
  }
  if (*cp == '.') {
    if (pp >= parts + 3)
      return (INADDR_NONE);
    *pp++ = val, cp++;
    goto again;
  }
  if (*cp && !isspace(*cp))
    return (INADDR_NONE);
  *pp++ = val;
  n = pp - parts;
  for (val = 0, i = 0; i < 4; i++) {
    val <<= 8;
    if (i < n)
      val |= parts[i] & 0xff;
  }
  return (val);
}
```