user: 下面的汇编指令对应的C源代码是什么:

```asm
<juliam_KP>:
  endbr64
  push   %rbp
  mov    %rsp,%rbp
  sub    $0x90,%rsp
  mov    %rdi,-0x88(%rbp)
  mov    %fs:0x28,%rax
  mov    %rax,-0x8(%rbp)
  xor    %eax,%eax
  movq   $0x1,-0x50(%rbp)
  movq   $0x0,-0x60(%rbp)
  mov    -0x88(%rbp),%rax
  movzbl (%rax),%eax
  cmp    $0x2e,%al
  jne    L26
  movl   $0x1,-0x74(%rbp)
  jmp    L41
L26:
  movl   $0x0,-0x74(%rbp)
L41:
  mov    -0x74(%rbp),%eax
  cltq
  lea    0x2(%rax),%rdx
  mov    -0x88(%rbp),%rax
  lea    (%rdx,%rax,1),%rcx
  lea    -0xd(%rbp),%rax
  mov    $0x4,%edx
  mov    %rcx,%rsi
  mov    %rax,%rdi
  call   <strncpy@plt>
  movb   $0x0,-0x9(%rbp)
  lea    -0xd(%rbp),%rax
  mov    %rax,%rdi
  mov    $0x0,%eax
  call   <atol@plt>
  cltq
  mov    %rax,-0x48(%rbp)
  mov    -0x74(%rbp),%eax
  cltq
  lea    0x6(%rax),%rdx
  mov    -0x88(%rbp),%rax
  lea    (%rdx,%rax,1),%rcx
  lea    -0xd(%rbp),%rax
  mov    $0x2,%edx
  mov    %rcx,%rsi
  mov    %rax,%rdi
  call   <strncpy@plt>
  movb   $0x0,-0xb(%rbp)
  lea    -0xd(%rbp),%rax
  mov    %rax,%rdi
  mov    $0x0,%eax
  call   <atol@plt>
  cltq
  mov    %rax,-0x70(%rbp)
  mov    -0x74(%rbp),%eax
  cltq
  lea    0x8(%rax),%rdx
  mov    -0x88(%rbp),%rax
  lea    (%rdx,%rax,1),%rcx
  lea    -0xd(%rbp),%rax
  mov    $0x2,%edx
  mov    %rcx,%rsi
  mov    %rax,%rdi
  call   <strncpy@plt>
  movb   $0x0,-0xb(%rbp)
  lea    -0xd(%rbp),%rax
  mov    %rax,%rdi
  mov    $0x0,%eax
  call   <atol@plt>
  cltq
  mov    %rax,-0x68(%rbp)
  mov    -0x74(%rbp),%eax
  cltq
  lea    0xa(%rax),%rdx
  mov    -0x88(%rbp),%rax
  lea    (%rdx,%rax,1),%rcx
  lea    -0xd(%rbp),%rax
  mov    $0x2,%edx
  mov    %rcx,%rsi
  mov    %rax,%rdi
  call   <strncpy@plt>
  movb   $0x0,-0xb(%rbp)
  lea    -0xd(%rbp),%rax
  mov    %rax,%rdi
  mov    $0x0,%eax
  call   <atol@plt>
  cltq
  mov    %rax,-0x40(%rbp)
  mov    -0x74(%rbp),%eax
  cltq
  lea    0xc(%rax),%rdx
  mov    -0x88(%rbp),%rax
  lea    (%rdx,%rax,1),%rcx
  lea    -0xd(%rbp),%rax
  mov    $0x2,%edx
  mov    %rcx,%rsi
  mov    %rax,%rdi
  call   <strncpy@plt>
  movb   $0x0,-0xb(%rbp)
  lea    -0xd(%rbp),%rax
  mov    %rax,%rdi
  mov    $0x0,%eax
  call   <atol@plt>
  cltq
  mov    %rax,-0x38(%rbp)
  cmpq   $0x0,-0x70(%rbp)
  jg     L44
  movq   $0x1,-0x70(%rbp)
L44:
  cmpq   $0x0,-0x68(%rbp)
  jg     L32
  movq   $0x1,-0x68(%rbp)
L32:
  mov    -0x48(%rbp),%rdx
  mov    %rdx,%rax
  shl    $0x3,%rax
  add    %rdx,%rax
  shl    $0x3,%rax
  add    %rdx,%rax
  lea    0x0(,%rax,4),%rdx
  add    %rdx,%rax
  mov    %rax,-0x30(%rbp)
  mov    -0x70(%rbp),%rax
  cwtl
  cltq
  lea    0x0(,%rax,8),%rdx
  lea    D9(%rip),%rax
  mov    (%rdx,%rax,1),%rax
  add    %rax,-0x68(%rbp)
  mov    -0x48(%rbp),%rax
  lea    0x3(%rax),%rdx
  test   %rax,%rax
  cmovs  %rdx,%rax
  sar    $0x2,%rax
  mov    %rax,-0x28(%rbp)
  mov    -0x48(%rbp),%rcx
  movabs $0xa3d70a3d70a3d70b,%rdx
  mov    %rcx,%rax
  imul   %rdx
  lea    (%rdx,%rcx,1),%rax
  sar    $0x6,%rax
  sar    $0x3f,%rcx
  mov    %rcx,%rdx
  sub    %rdx,%rax
  mov    %rax,-0x20(%rbp)
  mov    -0x48(%rbp),%rcx
  movabs $0x20c49ba5e353f7cf,%rdx
  mov    %rcx,%rax
  imul   %rdx
  mov    %rdx,%rax
  sar    $0x7,%rax
  sar    $0x3f,%rcx
  mov    %rcx,%rdx
  sub    %rdx,%rax
  mov    %rax,-0x18(%rbp)
  mov    -0x28(%rbp),%rax
  sub    -0x20(%rbp),%rax
  mov    %rax,%rdx
  mov    -0x18(%rbp),%rax
  add    %rax,%rdx
  mov    -0x50(%rbp),%rax
  imul   %rdx,%rax
  mov    %rax,-0x58(%rbp)
  mov    -0x28(%rbp),%rax
  shl    $0x2,%rax
  cmp    %rax,-0x48(%rbp)
  jne    L3
  mov    -0x20(%rbp),%rdx
  mov    %rdx,%rax
  shl    $0x2,%rax
  add    %rdx,%rax
  lea    0x0(,%rax,4),%rdx
  add    %rdx,%rax
  shl    $0x2,%rax
  cmp    %rax,-0x48(%rbp)
  jne    L74
  mov    -0x18(%rbp),%rax
  imul   $0x3e8,%rax,%rax
  cmp    %rax,-0x48(%rbp)
  jne    L3
L74:
  mov    -0x50(%rbp),%rax
  mov    %rax,-0x60(%rbp)
L3:
  cmpq   $0x0,-0x60(%rbp)
  je     L62
  cmpq   $0x2,-0x70(%rbp)
  jg     L62
  mov    -0x50(%rbp),%rax
  sub    %rax,-0x58(%rbp)
L62:
  mov    -0x30(%rbp),%rdx
  mov    -0x68(%rbp),%rax
  add    %rax,%rdx
  mov    -0x58(%rbp),%rax
  add    %rdx,%rax
  mov    %rax,-0x30(%rbp)
  mov    -0x30(%rbp),%rdx
  mov    %rdx,%rax
  add    %rax,%rax
  add    %rdx,%rax
  shl    $0x3,%rax
  mov    %rax,%rdx
  mov    -0x40(%rbp),%rax
  add    %rdx,%rax
  mov    %rax,-0x30(%rbp)
  mov    -0x30(%rbp),%rdx
  mov    %rdx,%rax
  shl    $0x4,%rax
  sub    %rdx,%rax
  shl    $0x2,%rax
  mov    %rax,%rdx
  mov    -0x38(%rbp),%rax
  add    %rdx,%rax
  mov    %rax,-0x30(%rbp)
  mov    -0x30(%rbp),%rax
  mov    -0x8(%rbp),%rdx
  sub    %fs:0x28,%rdx
  je     L79
  call   <__stack_chk_fail@plt>
L79:
  leave
  ret
```

assistant: ```c
long int juliam_KP(filename)
char *filename;
{
  static long kmo[13] = {0, 0, 31, 59, 90, 120, 151, 181, 212, 243, 273, 304, 334};
  long leap = 1;
  long ky;
  long km;
  long kd;
  long temp;
  long l = 0;
  long kl;
  long ky4;
  long ky1;
  long ky0;
  long khour;
  long kmin;
  char temp_str[5];
  int pos;
  if (filename[0] == '.') {
    pos = 1;
  } else {
    pos = 0;
  }
  strncpy(temp_str, filename + 2 + pos, 4);
  temp_str[4] = 0;
  ky = atol(temp_str);
  strncpy(temp_str, filename + 6 + pos, 2);
  temp_str[2] = 0;
  km = atol(temp_str);
  strncpy(temp_str, filename + 8 + pos, 2);
  temp_str[2] = 0;
  kd = atol(temp_str);
  strncpy(temp_str, filename + 10 + pos, 2);
  temp_str[2] = 0;
  khour = atol(temp_str);
  strncpy(temp_str, filename + 12 + pos, 2);
  temp_str[2] = 0;
  kmin = atol(temp_str);
  if (km <= 0)
    km = 1;
  if (kd <= 0)
    kd = 1;
  temp = 365 * ky;
  kd = kmo[(short)km] + kd;
  ky4 = ky / 4;
  ky1 = ky / 100;
  ky0 = ky / 1000;
  kl = leap * (ky4 - ky1 + ky0);
  if (((ky4 * 4) == ky) && (((ky1 * 100) != ky) || ((ky0 * 1000) == ky)))
    l = leap;
  if ((l != 0) && (km < 3))
    kl = kl - leap;
  temp = temp + kd + kl;
  temp = temp * 24 + khour;
  temp = temp * 60 + kmin;
  return (temp);
}
```