user: What is the c source code of the assembly code below:

```asm
<micro_qr_m1>:
  endbr64
  push   %r14
  push   %r13
  push   %r12
  mov    %rdi,%r12
  push   %rbp
  push   %rbx
  mov    $0x14,%ebx
  mov    %ebx,%r13d
  sub    $0x10,%rsp
  mov    %fs:0x28,%rax
  mov    %rax,0x8(%rsp)
  xor    %eax,%eax
  call   <strlen@plt>
  sub    %eax,%r13d
  cmp    $0x3,%r13d
  jg     L119
  xor    %ebx,%ebx
  lea    D14(%rip),%rbp
  test   %r13d,%r13d
  jle    L200
L125:
  mov    %rbp,%rsi
  mov    %r12,%rdi
  add    $0x1,%ebx
  call   <strcat@plt>
  cmp    %ebx,%r13d
  jne    L125
L200:
  xor    %eax,%eax
  xor    %edx,%edx
  xor    %ecx,%ecx
  mov    $0x80,%esi
  mov    %ax,0x4(%rsp)
  xor    %eax,%eax
L130:
  cmpb   $0x31,(%r12,%rcx,1)
  jne    L194
  mov    %esi,%edx
  sar    %cl,%edx
  add    %edx,%eax
  mov    $0x1,%edx
L194:
  add    $0x1,%rcx
  cmp    $0x8,%rcx
  jne    L130
  test   %dl,%dl
  je     L81
  mov    %al,0x4(%rsp)
L81:
  xor    %ecx,%ecx
  lea    0x8(%r12),%rax
  mov    $0x80,%esi
L28:
  cmpb   $0x31,(%rax,%rcx,1)
  jne    L41
  mov    %esi,%edx
  sar    %cl,%edx
  add    %dl,0x5(%rsp)
L41:
  add    $0x1,%rcx
  cmp    $0x8,%rcx
  jne    L28
  movb   $0x0,0x6(%rsp)
  xor    %ecx,%ecx
  xor    %edx,%edx
  xor    %eax,%eax
  mov    $0x80,%esi
L126:
  cmpb   $0x31,0x10(%r12,%rcx,1)
  jne    L164
  mov    %esi,%edx
  sar    %cl,%edx
  add    %edx,%eax
  mov    $0x1,%edx
L164:
  add    $0x1,%rcx
  cmp    $0x4,%rcx
  jne    L126
  test   %dl,%dl
  je     L60
  mov    %al,0x6(%rsp)
L60:
  mov    $0x11d,%edi
  call   <rs_init_gf@plt>
  xor    %esi,%esi
  mov    $0x2,%edi
  call   <rs_init_code@plt>
  lea    0x1(%rsp),%rdx
  lea    0x4(%rsp),%rsi
  mov    $0x3,%edi
  call   <rs_encode@plt>
  xor    %eax,%eax
  call   <rs_free@plt>
  movzbl 0x2(%rsp),%edi
  mov    %r12,%rdx
  mov    $0x8,%esi
  call   <bin_append@plt>
  movzbl 0x1(%rsp),%edi
  mov    %r12,%rdx
  mov    $0x8,%esi
  call   <bin_append@plt>
  mov    0x8(%rsp),%rax
  sub    %fs:0x28,%rax
  jne    L168
  add    $0x10,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  ret
  nopl   0x0(%rax,%rax,1)
L119:
  lea    D8(%rip),%rsi
  mov    %r12,%rdi
  call   <strcat@plt>
  mov    %r12,%rdi
  call   <strlen@plt>
  sub    %eax,%ebx
  cmp    $0x4,%ebx
  jg     L20
  xor    %r13d,%r13d
  lea    D14(%rip),%rbp
  test   %ebx,%ebx
  jle    L200
L105:
  mov    %rbp,%rsi
  mov    %r12,%rdi
  add    $0x1,%r13d
  call   <strcat@plt>
  cmp    %r13d,%ebx
  jne    L105
  jmp    L200
L20:
  mov    %r12,%rdi
  mov    $0x0,%ebx
  lea    D14(%rip),%rbp
  call   <strlen@plt>
  cltd
  shr    $0x1d,%edx
  add    %edx,%eax
  and    $0x7,%eax
  sub    %eax,%edx
  lea    0x8(%rdx),%r13d
  je     L151
  cs nopw 0x0(%rax,%rax,1)
L44:
  mov    %rbp,%rsi
  mov    %r12,%rdi
  add    $0x1,%ebx
  call   <strcat@plt>
  cmp    %ebx,%r13d
  jne    L44
L151:
  mov    %r12,%rdi
  call   <strlen@plt>
  mov    $0x14,%edx
  sub    %eax,%edx
  cmp    $0x4,%edx
  jle    L163
  mov    $0x10,%ebp
  lea    D48(%rip),%rsi
  xor    %ebx,%ebx
  sub    %eax,%ebp
  lea    D19(%rip),%r14
  mov    %rsi,%r13
  sar    $0x3,%ebp
  test   %ebp,%ebp
  jg     L8
  jmp    L163
  nopw   0x0(%rax,%rax,1)
L94:
  test   $0x1,%bl
  mov    %r13,%rsi
  cmovne %r14,%rsi
L8:
  mov    %r12,%rdi
  add    $0x1,%ebx
  call   <strcat@plt>
  cmp    %ebx,%ebp
  jne    L94
L163:
  mov    %r12,%rdx
  mov    $0x4,%esi
  xor    %edi,%edi
  call   <bin_append@plt>
  jmp    L200
L168:
  call   <__stack_chk_fail@plt>
```

tool_calls: name: retrieve_data
arguments: data_tag: D14
type_guessed: string
name: retrieve_data
arguments: data_tag: D8
type_guessed: string
name: retrieve_data
arguments: data_tag: D48
type_guessed: string
name: retrieve_data
arguments: data_tag: D19
type_guessed: string

tool: D14: 0

tool: D8: 000

tool: D48: 11101100

tool: D19: 00010001

assistant: ```c
void micro_qr_m1(char binary_data[]) {
  int i, j, latch;
  int bits_total, bits_left;
  int data_codewords, ecc_codewords;
  unsigned char data_blocks[4], ecc_blocks[3];
  bits_total = 20;
  latch = 0;
  bits_left = bits_total - (int)strlen(binary_data);
  if (bits_left <= 3) {
    for (i = 0; i < bits_left; i++) {
      strcat(binary_data, "0");
    }
    latch = 1;
  } else {
    strcat(binary_data, "000");
  }
  if (latch == 0) {
    bits_left = bits_total - (int)strlen(binary_data);
    if (bits_left <= 4) {
      for (i = 0; i < bits_left; i++) {
        strcat(binary_data, "0");
      }
      latch = 1;
    }
  }
  if (latch == 0) {
    int remainder = 8 - (strlen(binary_data) % 8);
    if (remainder == 8) {
      remainder = 0;
    }
    for (i = 0; i < remainder; i++) {
      strcat(binary_data, "0");
    }
    bits_left = bits_total - (int)strlen(binary_data);
    if (bits_left > 4) {
      remainder = (bits_left - 4) / 8;
      for (i = 0; i < remainder; i++) {
        strcat(binary_data, (i & 1) ? "00010001" : "11101100");
      }
    }
    bin_append(0, 4, binary_data);
  }
  data_codewords = 3;
  ecc_codewords = 2;
  for (i = 0; i < (data_codewords - 1); i++) {
    data_blocks[i] = 0;
    for (j = 0; j < 8; j++) {
      if (binary_data[(i * 8) + j] == '1') {
        data_blocks[i] += 0x80 >> j;
      }
    }
  }
  data_blocks[2] = 0;
  for (j = 0; j < 4; j++) {
    if (binary_data[16 + j] == '1') {
      data_blocks[2] += 0x80 >> j;
    }
  }
  rs_init_gf(0x11d);
  rs_init_code(ecc_codewords, 0);
  rs_encode(data_codewords, data_blocks, ecc_blocks);
  rs_free();
  for (i = 0; i < ecc_codewords; i++) {
    bin_append(ecc_blocks[ecc_codewords - i - 1], 8, binary_data);
  }
}
```