user: 请从给定的汇编指令推导出C源代码:

```asm
<_nl_explode_name>:
  endbr64
  push   %r15
  xor    %eax,%eax
  push   %r14
  mov    %rcx,%r14
  push   %r13
  mov    %r8,%r13
  push   %r12
  mov    %r9,%r12
  push   %rbp
  mov    %rdx,%rbp
  push   %rbx
  mov    %rsi,%rbx
  sub    $0x28,%rsp
  movq   $0x0,(%rdx)
  movq   $0x0,(%rcx)
  movq   $0x0,(%r8)
  movq   $0x0,(%r9)
  mov    %rdi,(%rsi)
  call   <_nl_find_language@plt>
  movslq %eax,%rdi
  cmp    %rdi,(%rbx)
  je     L262
  movzbl (%rdi),%eax
  cmp    $0x40,%al
  je     L215
  cmp    $0x5f,%al
  je     L42
  xor    %r15d,%r15d
  cmp    $0x2e,%al
  je     L107
L182:
  mov    (%r14),%rax
  test   %rax,%rax
  je     L14
L119:
  mov    %r15d,%edx
  and    $0xfffffffb,%edx
  cmpb   $0x0,(%rax)
  cmove  %edx,%r15d
L14:
  mov    0x0(%r13),%rax
  test   %rax,%rax
  je     L82
  mov    %r15d,%edx
  and    $0xfffffffd,%edx
  cmpb   $0x0,(%rax)
  cmove  %edx,%r15d
L82:
  add    $0x28,%rsp
  mov    %r15d,%eax
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
  cs nopw 0x0(%rax,%rax,1)
L215:
  xor    %r15d,%r15d
L203:
  lea    0x1(%rdi),%rax
  movb   $0x0,(%rdi)
  mov    %rax,0x0(%rbp)
  cmpb   $0x0,0x1(%rdi)
  je     L182
  or     $0x8,%r15d
  jmp    L182
  nopw   0x0(%rax,%rax,1)
L42:
  lea    0x1(%rdi),%rdx
  movb   $0x0,(%rdi)
  mov    %rdx,(%r14)
  movzbl 0x1(%rdi),%eax
  test   $0xbf,%al
  jne    L46
  jmp    L12
  nopw   0x0(%rax,%rax,1)
L219:
  movzbl 0x1(%rdx),%eax
  add    $0x1,%rdx
  test   $0xbf,%al
  je     L12
L46:
  cmp    $0x2e,%al
  jne    L219
L138:
  mov    %rdx,%rdi
  mov    $0x6,%r15d
  mov    $0x4,%ecx
L81:
  lea    0x1(%rdi),%r8
  movb   $0x0,(%rdi)
  mov    %r8,0x0(%r13)
  movzbl 0x1(%rdi),%eax
  mov    %r8,%rbx
  test   $0xbf,%al
  je     L54
  nopl   0x0(%rax,%rax,1)
L195:
  mov    %rbx,%rdx
  add    $0x1,%rbx
  testb  $0xbf,(%rbx)
  jne    L195
  mov    %ecx,0x8(%rsp)
  cmp    %rbx,%r8
  je     L54
  mov    %rdx,%rsi
  xor    %eax,%eax
  mov    %rdx,0x18(%rsp)
  sub    %rdi,%rsi
  mov    %r8,%rdi
  call   <_nl_normalize_codeset@plt>
  movslq %eax,%r8
  mov    %r8,(%r12)
  test   %eax,%eax
  je     L113
  mov    0x0(%r13),%rdi
  mov    %r8,%rsi
  mov    %r8,0x10(%rsp)
  call   <strcmp@plt>
  mov    0x10(%rsp),%r8
  mov    0x18(%rsp),%rdx
  test   %eax,%eax
  mov    0x8(%rsp),%ecx
  je     L153
  or     $0x3,%ecx
  movzbl 0x1(%rdx),%eax
  mov    %ecx,%r15d
L54:
  mov    %rbx,%rdi
  cmp    $0x40,%al
  jne    L182
  jmp    L203
  nopw   0x0(%rax,%rax,1)
L262:
  xor    %esi,%esi
  xor    %eax,%eax
  xor    %r15d,%r15d
  call   <__rawmemchr@plt>
  movslq %eax,%rbx
  movzbl (%rbx),%eax
  mov    %rbx,%rdi
  cmp    $0x40,%al
  jne    L182
  jmp    L203
  nopw   0x0(%rax,%rax,1)
L107:
  mov    $0x2,%r15d
  xor    %ecx,%ecx
  jmp    L81
  nopl   (%rax)
L12:
  cmp    $0x2e,%al
  je     L138
  cmp    $0x40,%al
  je     L239
  mov    (%r14),%rax
  mov    $0x4,%r15d
  jmp    L119
L113:
  or     $0xffffffff,%r15d
  jmp    L82
  nopl   0x0(%rax,%rax,1)
L239:
  mov    %rdx,%rdi
  mov    $0x4,%r15d
  jmp    L203
L153:
  mov    %r8,%rdi
  mov    %rdx,0x8(%rsp)
  call   <free@plt>
  mov    0x8(%rsp),%rdx
  movzbl 0x1(%rdx),%eax
  jmp    L54
```

assistant: ```c
int _nl_explode_name(name, language, modifier, territory, codeset, normalized_codeset)
char *name;
const char **language;
const char **modifier;
const char **territory;
const char **codeset;
const char **normalized_codeset;
{
  char *cp;
  int mask;
  *modifier = ((void *)0);
  *territory = ((void *)0);
  *codeset = ((void *)0);
  *normalized_codeset = ((void *)0);
  mask = 0;
  *language = cp = name;
  cp = _nl_find_language(*language);
  if (*language == cp)
    cp = __rawmemchr(*language, '\0');
  else if (cp[0] != '@') {
    if (cp[0] == '_') {
      cp[0] = '\0';
      *territory = ++cp;
      while (cp[0] != '\0' && cp[0] != '.' && cp[0] != '@')
        ++cp;
      mask |= 4;
    }
    if (cp[0] == '.') {
      cp[0] = '\0';
      *codeset = ++cp;
      while (cp[0] != '\0' && cp[0] != '@')
        ++cp;
      mask |= 2;
      if (*codeset != cp && (*codeset)[0] != '\0') {
        *normalized_codeset = _nl_normalize_codeset(*codeset, cp - *codeset);
        if (*normalized_codeset == ((void *)0))
          return -1;
        else if (strcmp(*codeset, *normalized_codeset) == 0)
          free((char *)*normalized_codeset);
        else
          mask |= 1;
      }
    }
  }
  if (cp[0] == '@') {
    cp[0] = '\0';
    *modifier = ++cp;
    if (cp[0] != '\0')
      mask |= 8;
  }
  if (*territory != ((void *)0) && (*territory)[0] == '\0')
    mask &= ~4;
  if (*codeset != ((void *)0) && (*codeset)[0] == '\0')
    mask &= ~2;
  return mask;
}
```