user: 请将以下的汇编代码转换成C语言代码:

```asm
<pdecrypt>:
  endbr64
  push   %rbp
  mov    %rsp,%rbp
  push   %r15
  push   %r14
  push   %r12
  push   %rbx
  add    $0xffffffffffffff80,%rsp
  mov    %rdi,-0x68(%rbp)
  mov    %rsi,-0x70(%rbp)
  mov    %fs:0x28,%rax
  mov    %rax,-0x28(%rbp)
  xor    %eax,%eax
  mov    %rsp,%rax
  mov    %rax,%r12
  mov    -0x68(%rbp),%rax
  mov    %rax,%rdi
  call   <strlen@plt>
  mov    %eax,-0x50(%rbp)
  mov    -0x70(%rbp),%rax
  mov    %rax,%rdi
  call   <strlen@plt>
  mov    %eax,-0x4c(%rbp)
  mov    -0x50(%rbp),%eax
  movslq %eax,%rdx
  sub    $0x1,%rdx
  mov    %rdx,-0x48(%rbp)
  movslq %eax,%rdx
  mov    %rdx,-0x80(%rbp)
  movq   $0x0,-0x78(%rbp)
  movslq %eax,%rdx
  mov    %rdx,-0x90(%rbp)
  movq   $0x0,-0x88(%rbp)
  cltq
  mov    $0x10,%edx
  sub    $0x1,%rdx
  add    %rdx,%rax
  mov    $0x10,%ebx
  mov    $0x0,%edx
  div    %rbx
  imul   $0x10,%rax,%rax
  mov    %rax,%rcx
  and    $0xfffffffffffff000,%rcx
  mov    %rsp,%rdx
  sub    %rcx,%rdx
L53:
  cmp    %rdx,%rsp
  je     L43
  sub    $0x1000,%rsp
  orq    $0x0,0xff8(%rsp)
  jmp    L53
L43:
  mov    %rax,%rdx
  and    $0xfff,%edx
  sub    %rdx,%rsp
  mov    %rax,%rdx
  and    $0xfff,%edx
  test   %rdx,%rdx
  je     L97
  and    $0xfff,%eax
  sub    $0x8,%rax
  add    %rsp,%rax
  orq    $0x0,(%rax)
L97:
  mov    %rsp,%rax
  add    $0x0,%rax
  mov    %rax,-0x40(%rbp)
  mov    -0x4c(%rbp),%eax
  movslq %eax,%rdx
  sub    $0x1,%rdx
  mov    %rdx,-0x38(%rbp)
  movslq %eax,%rdx
  mov    %rdx,-0xa0(%rbp)
  movq   $0x0,-0x98(%rbp)
  movslq %eax,%rdx
  mov    %rdx,%r14
  mov    $0x0,%r15d
  cltq
  mov    $0x10,%edx
  sub    $0x1,%rdx
  add    %rdx,%rax
  mov    $0x10,%esi
  mov    $0x0,%edx
  div    %rsi
  imul   $0x10,%rax,%rax
  mov    %rax,%rcx
  and    $0xfffffffffffff000,%rcx
  mov    %rsp,%rdx
  sub    %rcx,%rdx
L79:
  cmp    %rdx,%rsp
  je     L86
  sub    $0x1000,%rsp
  orq    $0x0,0xff8(%rsp)
  jmp    L79
L86:
  mov    %rax,%rdx
  and    $0xfff,%edx
  sub    %rdx,%rsp
  mov    %rax,%rdx
  and    $0xfff,%edx
  test   %rdx,%rdx
  je     L123
  and    $0xfff,%eax
  sub    $0x8,%rax
  add    %rsp,%rax
  orq    $0x0,(%rax)
L123:
  mov    %rsp,%rax
  add    $0x0,%rax
  mov    %rax,-0x30(%rbp)
  mov    -0x50(%rbp),%eax
  lea    0x1(%rax),%edx
  mov    -0x68(%rbp),%rcx
  mov    -0x40(%rbp),%rax
  mov    %rcx,%rsi
  mov    %rax,%rdi
  call   <strncpy@plt>
  mov    -0x4c(%rbp),%eax
  lea    0x1(%rax),%edx
  mov    -0x70(%rbp),%rcx
  mov    -0x30(%rbp),%rax
  mov    %rcx,%rsi
  mov    %rax,%rdi
  call   <strncpy@plt>
  movl   $0x0,-0x54(%rbp)
  mov    -0x54(%rbp),%eax
  mov    %eax,-0x58(%rbp)
  jmp    L47
L113:
  mov    -0x40(%rbp),%rdx
  mov    -0x58(%rbp),%eax
  cltq
  movzbl (%rdx,%rax,1),%eax
  movsbl %al,%eax
  mov    %eax,%edi
  call   <isspace@plt>
  test   %eax,%eax
  jne    L0
  mov    -0x40(%rbp),%rdx
  mov    -0x58(%rbp),%eax
  cltq
  movzbl (%rdx,%rax,1),%eax
  movsbl %al,%eax
  mov    %eax,%edi
  call   <toupper@plt>
  mov    %eax,%ebx
  mov    -0x54(%rbp),%eax
  cltd
  idivl  -0x4c(%rbp)
  mov    %edx,%eax
  mov    -0x30(%rbp),%rdx
  cltq
  movzbl (%rdx,%rax,1),%eax
  movsbl %al,%eax
  mov    %eax,%edi
  call   <toupper@plt>
  mov    %eax,%edx
  mov    %ebx,%eax
  sub    %edx,%eax
  mov    %al,-0x59(%rbp)
  cmpb   $0x0,-0x59(%rbp)
  jns    L65
  movsbl -0x59(%rbp),%eax
  add    $0x1a,%eax
  movslq %eax,%rdx
  imul   $0x4ec4ec4f,%rdx,%rdx
  shr    $0x20,%rdx
  sar    $0x3,%edx
  mov    %eax,%ecx
  sar    $0x1f,%ecx
  sub    %ecx,%edx
  imul   $0x1a,%edx,%ecx
  sub    %ecx,%eax
  mov    %eax,%edx
  mov    %edx,%eax
  add    $0x41,%eax
  mov    %eax,%ecx
  jmp    L39
L65:
  movsbl -0x59(%rbp),%eax
  movslq %eax,%rdx
  imul   $0x4ec4ec4f,%rdx,%rdx
  shr    $0x20,%rdx
  sar    $0x3,%edx
  mov    %eax,%ecx
  sar    $0x1f,%ecx
  sub    %ecx,%edx
  imul   $0x1a,%edx,%ecx
  sub    %ecx,%eax
  mov    %eax,%edx
  mov    %edx,%eax
  add    $0x41,%eax
  mov    %eax,%ecx
L39:
  mov    -0x40(%rbp),%rdx
  mov    -0x54(%rbp),%eax
  cltq
  mov    %cl,(%rdx,%rax,1)
  jmp    L18
L0:
  subl   $0x1,-0x54(%rbp)
L18:
  addl   $0x1,-0x58(%rbp)
  addl   $0x1,-0x54(%rbp)
L47:
  mov    -0x58(%rbp),%eax
  cmp    -0x50(%rbp),%eax
  jl     L113
  mov    -0x40(%rbp),%rdx
  mov    -0x54(%rbp),%eax
  cltq
  movb   $0x0,(%rdx,%rax,1)
  mov    -0x40(%rbp),%rax
  mov    %rax,%rsi
  lea    D7(%rip),%rax
  mov    %rax,%rdi
  call   <printf@plt>
  mov    $0x0,%eax
  mov    %r12,%rsp
  mov    -0x28(%rbp),%rdx
  sub    %fs:0x28,%rdx
  je     L44
  call   <__stack_chk_fail@plt>
L44:
  lea    -0x20(%rbp),%rsp
  pop    %rbx
  pop    %r12
  pop    %r14
  pop    %r15
  pop    %rbp
  ret
```

tool_calls: name: extract_symbolic_data
arguments: label: D7
type: string

tool: D7: %s


assistant: ```c
int pdecrypt(const char *cipher, const char *k) {
  int length = strlen(cipher);
  int keylength = strlen(k);
  char plain[length];
  char key[keylength];
  strncpy(plain, cipher, length + 1);
  strncpy(key, k, keylength + 1);
  int i, j;
  for (i = j = 0; i < length; i++, j++) {
    if (!isspace(plain[i])) {
      char p = ((toupper(plain[i]) - 65) - (toupper(key[(j % keylength)]) - 65));
      plain[j] = (p < 0 ? p + 26 : p) % 26 + 65;
    } else
      j--;
  }
  plain[j] = '\0';
  printf("%s\n", plain);
  return 0;
}
```