user: 请显示与下面列出的汇编代码相匹配的C语言实现：

```asm
<RLEcompress>:
  endbr64
  push   %r15
  xor    %ecx,%ecx
  xor    %r15d,%r15d
  push   %r14
  mov    %r15d,%r14d
  mov    %ecx,%r15d
  push   %r13
  mov    %esi,%r13d
  push   %r12
  push   %rbp
  push   %rbx
  sub    $0x4c8,%rsp
  mov    %edi,0x14(%rsp)
  lea    0x30(%rsp),%r12
  mov    %fs:0x28,%rax
  mov    %rax,0x4b8(%rsp)
  xor    %eax,%eax
  lea    0x2f(%rsp),%rax
  movl   $0x1,(%rsp)
  mov    %rax,0x8(%rsp)
  lea    0xb0(%rsp),%rax
  mov    %rax,0x18(%rsp)
  nopl   (%rax)
L229:
  mov    0x18(%rsp),%rsi
  mov    0x14(%rsp),%edi
  mov    $0x400,%edx
  call   <read@plt>
  mov    %eax,0x10(%rsp)
  test   %eax,%eax
  je     L119
  test   %r14d,%r14d
  mov    $0xffffffff,%eax
  cmovne (%rsp),%eax
  mov    %eax,(%rsp)
  mov    0x10(%rsp),%eax
  test   %eax,%eax
  jle    L229
  xor    %ebx,%ebx
  mov    %r14d,%ebp
  jmp    L153
  nopl   (%rax)
L109:
  cmpl   $0x1,(%rsp)
  je     L208
  mov    0x8(%rsp),%rsi
  mov    $0x1,%edx
  mov    %r13d,%edi
  movb   $0x80,0x2f(%rsp)
  mov    $0xffffff80,%r15d
  call   <write@plt>
  mov    $0xffffff80,%edx
  mov    %r12,%rsi
  mov    %r13d,%edi
  call   <write@plt>
L112:
  movslq %ebx,%r14
  mov    %r12,%rsi
  mov    %ebp,%edi
  movsbl 0xb0(%rsp,%r14,1),%edx
  call   <est_triple@plt>
  test   %rax,%rax
  jne    L23
  movzbl 0xb0(%rsp,%r14,1),%edx
  movslq %ebp,%rax
  add    $0x1,%r15d
  add    $0x1,%ebp
  mov    %dl,0x30(%rsp,%rax,1)
L39:
  add    $0x1,%ebx
  cmp    %ebx,0x10(%rsp)
  jle    L27
L153:
  cmp    $0x80,%r15b
  je     L109
  cmpl   $0x1,(%rsp)
  jne    L112
  movslq %ebx,%r14
  mov    %r12,%rsi
  mov    %ebp,%edi
  movsbl 0xb0(%rsp,%r14,1),%edx
  call   <est_triple@plt>
  test   %rax,%rax
  jne    L169
  cmp    $0x2,%r15b
  jg     L155
L69:
  movzbl 0xb0(%rsp,%r14,1),%edx
  movslq %ebp,%rax
  add    $0x1,%r15d
  add    $0x1,%ebp
  movl   $0xffffffff,(%rsp)
  add    $0x1,%ebx
  mov    %dl,0x30(%rsp,%rax,1)
  cmp    %ebx,0x10(%rsp)
  jg     L153
  nopw   0x0(%rax,%rax,1)
L27:
  mov    %ebp,%r14d
  jmp    L229
L23:
  mov    0x8(%rsp),%rsi
  mov    $0x2,%eax
  mov    %r13d,%edi
  add    $0x1,%ebx
  sub    %r15d,%eax
  mov    $0x1,%edx
  mov    %al,0x2f(%rsp)
  call   <write@plt>
  lea    -0x2(%r15),%edx
  mov    %r12,%rsi
  mov    %r13d,%edi
  movsbl %dl,%edx
  call   <write@plt>
  movzbl 0xb0(%rsp,%r14,1),%eax
  mov    %al,0x30(%rsp)
  mov    %al,0x31(%rsp)
  cmp    0x10(%rsp),%ebx
  jge    L70
  movslq %ebx,%r9
  mov    %r12,%rsi
  mov    $0x2,%edi
  mov    $0x2,%ebp
  movsbl 0xb0(%rsp,%r9,1),%edx
  mov    %r9,(%rsp)
  mov    $0x3,%r15d
  call   <est_triple@plt>
  mov    (%rsp),%r9
  test   %rax,%rax
  je     L172
L169:
  movl   $0x1,(%rsp)
  add    $0x1,%r15d
  jmp    L39
  nop
L208:
  mov    0x8(%rsp),%rsi
  mov    $0x1,%edx
  mov    %r13d,%edi
  movslq %ebx,%r14
  movb   $0x7f,0x2f(%rsp)
  call   <write@plt>
  mov    $0x1,%edx
  mov    %r12,%rsi
  mov    %r13d,%edi
  call   <write@plt>
  mov    %r12,%rsi
  mov    %ebp,%edi
  movsbl 0xb0(%rsp,%r14,1),%edx
  call   <est_triple@plt>
  test   %rax,%rax
  je     L69
  mov    $0xffffff80,%r15d
  jmp    L169
L155:
  mov    %r14,%r9
  nopl   0x0(%rax)
L172:
  mov    0x8(%rsp),%rsi
  sub    $0x1,%r15d
  mov    %r13d,%edi
  mov    %r9,(%rsp)
  mov    $0x1,%edx
  mov    %r15b,0x2f(%rsp)
  add    $0x1,%ebx
  mov    $0x1,%ebp
  call   <write@plt>
  mov    $0x1,%edx
  mov    %r12,%rsi
  mov    %r13d,%edi
  call   <write@plt>
  mov    (%rsp),%r9
  mov    $0x1,%r15d
  movl   $0xffffffff,(%rsp)
  movzbl 0xb0(%rsp,%r9,1),%eax
  mov    %al,0x30(%rsp)
  cmp    %ebx,0x10(%rsp)
  jg     L112
  mov    %ebp,%r14d
  jmp    L229
  nop
L70:
  movl   $0x1,(%rsp)
  mov    $0x3,%r15d
  mov    $0x2,%r14d
  jmp    L229
  nopl   0x0(%rax,%rax,1)
L119:
  cmpl   $0x1,(%rsp)
  mov    %r15d,%ecx
  je     L163
  mov    0x8(%rsp),%rsi
  mov    %r15d,%eax
  mov    $0x1,%edx
  mov    %r13d,%edi
  neg    %eax
  mov    %r15b,(%rsp)
  mov    %al,0x2f(%rsp)
  call   <write@plt>
  movsbl (%rsp),%edx
  mov    %r12,%rsi
  mov    %r13d,%edi
  call   <write@plt>
L98:
  mov    %r13d,%edi
  call   <close@plt>
  mov    0x14(%rsp),%edi
  call   <close@plt>
  mov    0x4b8(%rsp),%rax
  sub    %fs:0x28,%rax
  jne    L190
  add    $0x4c8,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
L163:
  mov    0x8(%rsp),%rsi
  sub    $0x1,%ecx
  mov    %r13d,%edi
  mov    $0x1,%edx
  mov    %cl,0x2f(%rsp)
  call   <write@plt>
  mov    $0x1,%edx
  mov    %r12,%rsi
  mov    %r13d,%edi
  call   <write@plt>
  jmp    L98
L190:
  call   <__stack_chk_fail@plt>
```

assistant: ```c
void RLEcompress(int in, int out) {
  ssize_t lu;
  signed char bufRead[1024];
  signed char bufWrite[128];
  int poswrite = 0;
  signed char occurence = 0;
  int mode = 1;
  while ((lu = read(in, bufRead, 1024)) != 0) {
    if (poswrite == 0)
      mode = -1;
    int i;
    for (i = 0; i < lu; i++) {
      if (occurence == 128 || occurence == -128) {
        if (mode == 1) {
          signed char c[1];
          c[0] = occurence - 1;
          write(out, c, 1);
          write(out, bufWrite, 1);
        } else {
          if (0) {
          } else {
            signed char c[1];
            c[0] = -(occurence);
            write(out, c, 1);
            write(out, bufWrite, (occurence));
          }
        }
      }
      if (mode == 1) {
        if (est_triple(poswrite, bufWrite, bufRead[i])) {
          occurence++;
        } else {
          mode = -1;
          if (occurence > 2) {
            signed char c[1];
            c[0] = occurence - 1;
            write(out, c, 1);
            write(out, bufWrite, 1);
            bufWrite[0] = bufRead[i];
          } else {
            bufWrite[poswrite] = bufRead[i];
            poswrite++;
            occurence++;
            continue;
          }
          occurence = 1;
          poswrite = 1;
        }
      } else {
        if (est_triple(poswrite, bufWrite, bufRead[i])) {
          mode = 1;
          signed char c[1];
          c[0] = -(occurence - 2);
          write(out, c, 1);
          write(out, bufWrite, (occurence - 2));
          bufWrite[0] = bufRead[i];
          bufWrite[1] = bufRead[i];
          poswrite = 2;
          occurence = 3;
        } else {
          bufWrite[poswrite] = bufRead[i];
          poswrite++;
          occurence++;
        }
      }
    }
  }
  if (mode == 1) {
    signed char c[1];
    c[0] = occurence - 1;
    write(out, c, 1);
    write(out, bufWrite, 1);
  } else {
    signed char c[1];
    c[0] = -(occurence);
    write(out, c, 1);
    write(out, bufWrite, (occurence));
  }
  close(out);
  close(in);
}
```