user: What would the C source look like for the assembly code provided here?

```asm
<calc_block>:
  endbr64
  push   %r14
  push   %r13
  push   %r12
  push   %rbp
  push   %rbx
  sub    $0x90,%rsp
  mov    %fs:0x28,%rax
  mov    %rax,0x88(%rsp)
  xor    %eax,%eax
  call   <translate_area@plt>
  lea    0x20(%rsp),%r8
  mov    $0x18,%edi
  jmp    L95
L212:
  add    $0x10,%r8
  add    $0x1,%edi
  cmp    $0x1e,%edi
  je     L50
L95:
  lea    -0x18(%rdi),%ecx
  mov    %r8,%rsi
L174:
  mov    %eax,%edx
  shr    %cl,%edx
  and    $0x1,%edx
  mov    %edx,(%rsi)
  add    $0x6,%ecx
  add    $0x4,%rsi
  cmp    %edi,%ecx
  jne    L174
  jmp    L212
L155:
  movl   $0x1,0x4(%r12)
L241:
  add    $0x1,%rbx
  add    $0x8,%r12
  cmp    $0x5,%rbx
  je     L44
L25:
  mov    %ebx,%r14d
  mov    $0x1,%edx
  mov    %ebx,%esi
  mov    %r13,%rdi
  call   <count_neighbors@plt>
  cmp    $0x2,%eax
  je     L86
  cmp    $0x3,%eax
  je     L64
  movl   $0x0,(%r12)
L115:
  mov    $0x2,%edx
  mov    %r14d,%esi
  mov    %r13,%rdi
  call   <count_neighbors@plt>
  cmp    $0x2,%eax
  je     L80
  cmp    $0x3,%eax
  je     L155
  movl   $0x0,0x4(%r12)
  jmp    L241
L80:
  mov    %rbx,%rax
  shl    $0x4,%rax
  cmpl   $0x0,0x28(%rsp,%rax,1)
  je     L153
  movl   $0x1,0x4(%r12)
  jmp    L241
L153:
  movl   $0x0,0x4(%r12)
  jmp    L241
L44:
  mov    $0x0,%eax
  mov    $0x0,%esi
  mov    $0x1,%edi
  jmp    L175
L50:
  mov    %rsp,%rbp
  mov    %rbp,%r12
  mov    $0x1,%ebx
  lea    0x20(%rsp),%r13
  jmp    L25
L86:
  mov    %rbx,%rax
  shl    $0x4,%rax
  cmpl   $0x0,0x24(%rsp,%rax,1)
  jne    L164
  movl   $0x0,(%r12)
  jmp    L115
L164:
  movl   $0x1,(%r12)
  jmp    L115
L64:
  movl   $0x1,(%r12)
  jmp    L115
L51:
  lea    0x4(%rax),%ecx
  mov    %edi,%edx
  shl    %cl,%edx
  or     %edx,%esi
L137:
  add    $0x1,%eax
  add    $0x8,%rbp
  cmp    $0x4,%eax
  je     L79
L175:
  mov    %rbp,%rdx
  cmpl   $0x1,0x0(%rbp)
  je     L178
L193:
  cmpl   $0x1,0x4(%rdx)
  jne    L137
  jmp    L51
L178:
  mov    %edi,%ebx
  mov    %eax,%ecx
  shl    %cl,%ebx
  or     %ebx,%esi
  jmp    L193
L79:
  mov    0x88(%rsp),%rax
  sub    %fs:0x28,%rax
  jne    L111
  mov    %esi,%eax
  add    $0x90,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  ret
L111:
  call   <__stack_chk_fail@plt>
```

assistant: ```c
char calc_block(unsigned int opt_area) {
  unsigned int input_area;
  int input_cell[6][4];
  char result_block;
  int result_cell[4][2];
  int x, y, i;
  input_area = translate_area(opt_area);
  for (x = 0; x < 6; x++) {
    for (y = 0; y < 4; y++) {
      if ((input_area >> (y * 6 + x)) & 0x1) {
        input_cell[x][y] = 1;
      } else {
        input_cell[x][y] = 0;
      }
    }
  }
  for (x = 1; x < 5; x++) {
    for (y = 1; y < 3; y++) {
      switch (count_neighbors(input_cell, x, y)) {
      case 3:
        result_cell[x - 1][y - 1] = 1;
        break;
      case 2:
        if (input_cell[x][y]) {
          result_cell[x - 1][y - 1] = 1;
        } else {
          result_cell[x - 1][y - 1] = 0;
        }
        break;
      default:
        result_cell[x - 1][y - 1] = 0;
        break;
      }
    }
  }
  result_block = 0;
  for (x = 0; x < 4; x++) {
    for (y = 0; y < 2; y++) {
      if (result_cell[x][y] == 1) {
        result_block |= (0x1 << y * 4 + x);
      }
    }
  }
  return (result_block);
}
```