user: Translate the below assembly code into C programming language:

```asm
<main>:
  endbr64
  push   %r12
  push   %rbp
  push   %rbx
  sub    $0x1a0,%rsp
  mov    %fs:0x28,%rax
  mov    %rax,0x198(%rsp)
  xor    %eax,%eax
  lea    D21(%rip),%rdi
  call   <printf@plt>
  lea    D7(%rip),%rdi
  call   <getenv@plt>
  test   %rax,%rax
  je     L16
  mov    %rax,%rbx
  mov    %rax,%rdi
  call   <strlen@plt>
  mov    %eax,%ebp
  cmp    $0xd,%eax
  jg     L136
L140:
  mov    0x198(%rsp),%rax
  sub    %fs:0x28,%rax
  jne    L58
  mov    $0x0,%eax
  add    $0x1a0,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  ret
L16:
  lea    D94(%rip),%rdi
  call   <printf@plt>
  jmp    L140
L136:
  lea    0x10(%rsp),%r12
  mov    $0x40,%edx
  mov    $0x0,%esi
  mov    %r12,%rdi
  call   <memset@plt>
  mov    $0x40,%eax
  cmp    %eax,%ebp
  cmovle %ebp,%eax
  mov    %eax,%edx
  mov    %rbx,%rsi
  mov    %r12,%rdi
  call   <memcpy@plt>
  movw   $0x3d,0x4(%rsp)
  lea    0x4(%rsp),%rsi
  mov    %r12,%rdi
  call   <strtok@plt>
  test   %rax,%rax
  je     L140
  lea    0x4(%rsp),%rsi
  mov    $0x0,%edi
  call   <strtok@plt>
  mov    %rax,%rbx
  test   %rax,%rax
  je     L140
  mov    %rax,%rdi
  call   <strlen@plt>
  mov    %eax,%ebp
  lea    0x6(%rsp),%r12
  mov    $0xa,%edx
  mov    $0x0,%esi
  mov    %r12,%rdi
  call   <memset@plt>
  mov    $0xa,%eax
  cmp    %eax,%ebp
  cmovle %ebp,%eax
  mov    %eax,%edx
  mov    %rbx,%rsi
  mov    %r12,%rdi
  call   <memcpy@plt>
  lea    0x90(%rsp),%rbx
  mov    $0x100,%edx
  mov    $0x0,%esi
  mov    %rbx,%rdi
  call   <memset@plt>
  mov    %r12,%rdx
  lea    D70(%rip),%rsi
  mov    %rbx,%rdi
  call   <sprintf@plt>
  lea    0x50(%rsp),%rbp
  mov    $0x40,%edx
  mov    $0x0,%esi
  mov    %rbp,%rdi
  call   <memset@plt>
  mov    %rbp,%rsi
  mov    %rbx,%rdi
  call   <curlGetValue@plt>
  test   %eax,%eax
  jne    L140
  mov    %rbp,%rdi
  lea    D3(%rip),%rsi
  call   <strcmp@plt>
  test   %eax,%eax
  je     L20
  lea    0x50(%rsp),%rdi
  lea    D24(%rip),%rsi
  call   <strcmp@plt>
  test   %eax,%eax
  je     L63
  lea    0x50(%rsp),%rdi
  lea    D51(%rip),%rsi
  call   <strcmp@plt>
  test   %eax,%eax
  je     L86
  lea    0x50(%rsp),%rdi
  lea    D77(%rip),%rsi
  call   <strcmp@plt>
  test   %eax,%eax
  jne    L76
  lea    D46(%rip),%rdi
  call   <printf@plt>
  jmp    L140
L20:
  lea    D65(%rip),%rdi
  call   <printf@plt>
  jmp    L140
L63:
  lea    D36(%rip),%rdi
  call   <printf@plt>
  jmp    L140
L86:
  lea    D69(%rip),%rdi
  call   <printf@plt>
  jmp    L140
L76:
  lea    D49(%rip),%rdi
  call   <printf@plt>
  jmp    L140
L58:
  call   <__stack_chk_fail@plt>
```

tool_calls: name: retrieve_data
arguments: data_tag: D21
type_infered: string
name: retrieve_data
arguments: data_tag: D7
type_infered: string
name: retrieve_data
arguments: data_tag: D94
type_infered: string
name: retrieve_data
arguments: data_tag: D70
type_infered: string
name: retrieve_data
arguments: data_tag: D3
type_infered: string
name: retrieve_data
arguments: data_tag: D24
type_infered: string
name: retrieve_data
arguments: data_tag: D51
type_infered: string
name: retrieve_data
arguments: data_tag: D77
type_infered: string
name: retrieve_data
arguments: data_tag: D46
type_infered: string
name: retrieve_data
arguments: data_tag: D65
type_infered: string
name: retrieve_data
arguments: data_tag: D36
type_infered: string
name: retrieve_data
arguments: data_tag: D69
type_infered: string
name: retrieve_data
arguments: data_tag: D49
type_infered: string

tool: D21: Content-Type: text/plain;charset=us-ascii



tool: D7: QUERY_STRING

tool: D94: Internal problem detected


tool: D70: http://rest:9000/getOrderValue?order=%s&parameter=stripe-customer-error%s

tool: D3: declined

tool: D24: network

tool: D51: other

tool: D77: internal

tool: D46: Internal Error, please contact marion@marionsworkshop.com for more details


tool: D65: Card declined, cannot be charged


tool: D36: Network error, cannot reach payment center


tool: D69: Payment error, please contact marion@marionsworkshop.com for more details


tool: D49: Please contact marion@marionsworkshop.com for more details


assistant: ```c
int main(int argc, char **argv) {
  printf("Content-Type: text/plain;charset=us-ascii\n\n");
  char *data = NULL;
  int len;
  data = getenv("QUERY_STRING");
  if (!data) {
    printf("Internal problem detected\n");
    return 0;
  }
  len = strlen(data);
  if (len < 14)
    goto end;
  if (len > 64)
    len = 64;
  char buffer[64];
  memset(buffer, 0, 64);
  memcpy(buffer, data, len);
  const char s[2] = "=";
  char *token;
  token = strtok(buffer, s);
  if (!token)
    goto end;
  token = strtok(NULL, s);
  if (!token)
    goto end;
  char order[10];
  int size = 0;
  size = strlen(token);
  if (size > 10)
    size = 10;
  memset(order, 0, 10);
  memcpy(order, token, size);
  char url[256];
  memset(url, 0, 256);
  sprintf(url, "http://rest:9000/getOrderValue?order=%s&parameter=stripe-customer-error%s", order);
  int res;
  char result[64];
  memset(result, 0, 64);
  res = curlGetValue(url, result);
  if (res)
    goto end;
  if (!strcmp(result, "declined"))
    printf("Card declined, cannot be charged\n");
  else if (!strcmp(result, "network"))
    printf("Network error, cannot reach payment center\n");
  else if (!strcmp(result, "other"))
    printf("Payment error, please contact marion@marionsworkshop.com for more details\n");
  else if (!strcmp(result, "internal"))
    printf("Internal Error, please contact marion@marionsworkshop.com for more details\n");
  else
    printf("Please contact marion@marionsworkshop.com for more details\n");
end:
  return 0;
}
```