#define NULL ((void *)0)
typedef unsigned long size_t; // Customize by platform.
typedef long intptr_t;
typedef unsigned long uintptr_t;
typedef long scalar_t__; // Either arithmetic or pointer type.
/* By default, we understand bool (as a convenience). */
typedef int bool;
#define false 0
#define true 1

/* Forward declarations */

/* Type definitions */

/* Variables and functions */
scalar_t__ calloc(int, int);
int /*<<< orphan*/ ffpmsg(char *);
char *iraf2str(char *irafstring, int nchar) {
  char *string;
  int i, j;
  string = (char *)calloc(nchar + 1, 1);
  if (string == NULL) {
    ffpmsg("IRAF2STR Cannot allocate memory for string variable");
    return (NULL);
  }
  if (irafstring[0] != 0)
    j = 0;
  else
    j = 1;
  for (i = 0; i < nchar; i++) {
    string[i] = irafstring[j];
    j = j + 2;
  }
  return (string);
}


x86 assembly (clang, -O0):
<iraf2str>:
push   %rbp
mov    %rsp,%rbp
sub    $0x30,%rsp
mov    %rdi,-0x10(%rbp)
mov    %esi,-0x14(%rbp)
mov    -0x14(%rbp),%edi
add    $0x1,%edi
mov    $0x1,%esi
call   1040 <calloc@plt>
mov    %rax,-0x20(%rbp)
cmpq   $0x0,-0x20(%rbp)
jne    1167 <iraf2str+0x47>
lea    0xeab(%rip),%rdi
call   1030 <ffpmsg@plt>
movq   $0x0,-0x8(%rbp)
jmp    11d2 <iraf2str+0xb2>
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x0,%eax
je     1183 <iraf2str+0x63>
movl   $0x0,-0x28(%rbp)
jmp    118a <iraf2str+0x6a>
movl   $0x1,-0x28(%rbp)
movl   $0x0,-0x24(%rbp)
mov    -0x24(%rbp),%eax
cmp    -0x14(%rbp),%eax
jge    11ca <iraf2str+0xaa>
mov    -0x10(%rbp),%rax
movslq -0x28(%rbp),%rcx
mov    (%rax,%rcx,1),%dl
mov    -0x20(%rbp),%rax
movslq -0x24(%rbp),%rcx
mov    %dl,(%rax,%rcx,1)
mov    -0x28(%rbp),%eax
add    $0x2,%eax
mov    %eax,-0x28(%rbp)
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x24(%rbp)
jmp    1191 <iraf2str+0x71>
mov    -0x20(%rbp),%rax
mov    %rax,-0x8(%rbp)
mov    -0x8(%rbp),%rax
add    $0x30,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<iraf2str>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
push   %rax
mov    %esi,%r14d
mov    %rdi,%r15
lea    0x1(%r14),%edi
mov    $0x1,%esi
call   1040 <calloc@plt>
test   %rax,%rax
je     118c <iraf2str+0x6c>
test   %r14d,%r14d
jle    146b <iraf2str+0x34b>
xor    %r13d,%r13d
cmpb   $0x0,(%r15)
sete   %r13b
mov    %r14d,%r9d
cmp    $0x9,%r14d
jb     1185 <iraf2str+0x65>
lea    0x0(,%r9,2),%rcx
add    %r13,%rcx
add    %r15,%rcx
add    $0xffffffffffffffff,%rcx
cmp    %rax,%rcx
jbe    119f <iraf2str+0x7f>
lea    (%rax,%r9,1),%rcx
lea    (%r15,%r13,1),%rsi
cmp    %rcx,%rsi
jae    119f <iraf2str+0x7f>
xor    %esi,%esi
jmp    13e5 <iraf2str+0x2c5>
lea    0xe6d(%rip),%rdi
call   1030 <ffpmsg@plt>
xor    %eax,%eax
jmp    146b <iraf2str+0x34b>
cmp    $0x11,%r14d
jae    11ac <iraf2str+0x8c>
xor    %esi,%esi
jmp    133f <iraf2str+0x21f>
mov    %r9d,%ecx
and    $0xf,%ecx
test   %rcx,%rcx
mov    $0x10,%r8d
cmovne %rcx,%r8
mov    %r9,%rsi
sub    %r8,%rsi
xor    %r10d,%r10d
xor    %r11d,%r11d
nopl   0x0(%rax,%rax,1)
mov    %r10,%rcx
or     %r13,%rcx
mov    %rcx,%rdi
or     $0x1e,%rdi
movzbl (%r15,%rdi,1),%edi
movd   %edi,%xmm8
mov    %rcx,%rdi
or     $0x1c,%rdi
movzbl (%r15,%rdi,1),%edi
movd   %edi,%xmm15
mov    %rcx,%rdi
or     $0x1a,%rdi
movzbl (%r15,%rdi,1),%edi
movd   %edi,%xmm9
mov    %rcx,%rdi
or     $0x18,%rdi
movzbl (%r15,%rdi,1),%edi
movd   %edi,%xmm2
mov    %rcx,%rdi
or     $0x16,%rdi
movzbl (%r15,%rdi,1),%edi
movd   %edi,%xmm10
mov    %rcx,%rdi
or     $0x14,%rdi
movzbl (%r15,%rdi,1),%edi
movd   %edi,%xmm6
mov    %rcx,%rdi
or     $0x12,%rdi
movzbl (%r15,%rdi,1),%edi
movd   %edi,%xmm11
mov    %rcx,%rdi
or     $0x10,%rdi
movzbl (%r15,%rdi,1),%edi
movd   %edi,%xmm5
mov    %rcx,%rdi
or     $0xe,%rdi
movzbl (%r15,%rdi,1),%edi
movd   %edi,%xmm12
mov    %rcx,%rdi
or     $0xc,%rdi
movzbl (%r15,%rdi,1),%edi
movd   %edi,%xmm3
mov    %rcx,%rdi
or     $0xa,%rdi
movzbl (%r15,%rdi,1),%edi
movd   %edi,%xmm13
mov    %rcx,%rdi
or     $0x8,%rdi
movzbl (%r15,%rdi,1),%edi
movd   %edi,%xmm7
mov    %rcx,%rdi
or     $0x6,%rdi
movzbl (%r15,%rdi,1),%edi
movd   %edi,%xmm14
mov    %rcx,%rdi
or     $0x4,%rdi
movzbl (%r15,%rdi,1),%edi
movd   %edi,%xmm4
movzbl (%r15,%rcx,1),%edi
movd   %edi,%xmm0
or     $0x2,%rcx
movzbl (%r15,%rcx,1),%ecx
movd   %ecx,%xmm1
punpcklbw %xmm8,%xmm15
punpcklbw %xmm9,%xmm2
punpcklwd %xmm15,%xmm2
punpcklbw %xmm10,%xmm6
punpcklbw %xmm11,%xmm5
punpcklwd %xmm6,%xmm5
punpckldq %xmm2,%xmm5
punpcklbw %xmm12,%xmm3
punpcklbw %xmm13,%xmm7
punpcklwd %xmm3,%xmm7
punpcklbw %xmm14,%xmm4
punpcklbw %xmm1,%xmm0
punpcklwd %xmm4,%xmm0
punpckldq %xmm7,%xmm0
punpcklqdq %xmm5,%xmm0
movdqu %xmm0,(%rax,%r11,1)
add    $0x10,%r11
add    $0x20,%r10
cmp    %r11,%rsi
jne    11d0 <iraf2str+0xb0>
cmp    $0x9,%r8d
jae    133f <iraf2str+0x21f>
lea    0x0(%r13,%rsi,2),%r13
jmp    13e5 <iraf2str+0x2c5>
mov    %r9d,%ecx
and    $0x7,%ecx
test   %rcx,%rcx
mov    $0x8,%edi
cmovne %rcx,%rdi
mov    %rsi,%rcx
mov    %r9,%rsi
sub    %rdi,%rsi
lea    0x0(,%rsi,2),%r8
add    %r13,%r8
lea    (%rcx,%rcx,1),%rbx
nopl   0x0(%rax)
mov    %rbx,%rdi
or     %r13,%rdi
movzbl (%r15,%rdi,1),%r10d
movzbl 0x4(%r15,%rdi,1),%r11d
movzbl 0x8(%r15,%rdi,1),%r12d
movzbl 0xc(%r15,%rdi,1),%r14d
movzbl 0x6(%r15,%rdi,1),%ebp
shl    $0x8,%ebp
or     %r11d,%ebp
movzbl 0x2(%r15,%rdi,1),%edx
shl    $0x8,%edx
or     %r10d,%edx
movd   %edx,%xmm0
pinsrw $0x1,%ebp,%xmm0
movzbl 0xa(%r15,%rdi,1),%edx
shl    $0x8,%edx
or     %r12d,%edx
pinsrw $0x2,%edx,%xmm0
movzbl 0xe(%r15,%rdi,1),%edx
shl    $0x8,%edx
or     %r14d,%edx
pinsrw $0x3,%edx,%xmm0
movq   %xmm0,(%rax,%rcx,1)
add    $0x8,%rcx
add    $0x10,%rbx
cmp    %rcx,%rsi
jne    1370 <iraf2str+0x250>
mov    %r8,%r13
mov    %r9d,%edi
sub    %esi,%edi
mov    %rsi,%rcx
not    %rcx
add    %r9,%rcx
and    $0x3,%rdi
je     1416 <iraf2str+0x2f6>
nopl   0x0(%rax)
movzbl (%r15,%r13,1),%edx
mov    %dl,(%rax,%rsi,1)
add    $0x2,%r13
add    $0x1,%rsi
add    $0xffffffffffffffff,%rdi
jne    1400 <iraf2str+0x2e0>
cmp    $0x3,%rcx
jb     146b <iraf2str+0x34b>
sub    %rsi,%r9
lea    (%rsi,%rax,1),%rcx
add    $0x3,%rcx
lea    (%r15,%r13,1),%rdx
add    $0x6,%rdx
xor    %esi,%esi
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
movzbl -0x6(%rdx,%rsi,2),%ebx
mov    %bl,-0x3(%rcx,%rsi,1)
movzbl -0x4(%rdx,%rsi,2),%ebx
mov    %bl,-0x2(%rcx,%rsi,1)
movzbl -0x2(%rdx,%rsi,2),%ebx
mov    %bl,-0x1(%rcx,%rsi,1)
movzbl (%rdx,%rsi,2),%ebx
mov    %bl,(%rcx,%rsi,1)
add    $0x4,%rsi
cmp    %rsi,%r9
jne    1440 <iraf2str+0x320>
add    $0x8,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
@.str = [52 x i8] c"IRAF2STR Cannot allocate memory for string variable\00"
define i8* @iraf2str(i8* %0, i32 %1) {
%3 = alloca i8*
%4 = alloca i8*
%5 = alloca i32
%6 = alloca i8*
%7 = alloca i32
%8 = alloca i32
store i8* %0, i8** %4
store i32 %1, i32* %5
%9 = load i32, i32* %5
%10 = add nsw i32 %9, 1
%11 = call i64 @calloc(i32 %10, i32 1)
%12 = inttoptr i64 %11 to i8*
store i8* %12, i8** %6
%13 = load i8*, i8** %6
%14 = icmp eq i8* %13, null
br i1 %14, label %15, label %17
15: ; preds = %2
%16 = call i32 @ffpmsg(i8* getelementptr inbounds ([52 x i8], [52 x i8]* @.str, i64 0, i64 0))
store i8* null, i8** %3
br label %47
17: ; preds = %2
%18 = load i8*, i8** %4
%19 = getelementptr inbounds i8, i8* %18, i64 0
%20 = load i8, i8* %19
%21 = sext i8 %20 to i32
%22 = icmp ne i32 %21, 0
br i1 %22, label %23, label %24
23: ; preds = %17
store i32 0, i32* %8
br label %25
24: ; preds = %17
store i32 1, i32* %8
br label %25
25: ; preds = %24, %23
store i32 0, i32* %7
br label %26
26: ; preds = %42, %25
%27 = load i32, i32* %7
%28 = load i32, i32* %5
%29 = icmp slt i32 %27, %28
br i1 %29, label %30, label %45
30: ; preds = %26
%31 = load i8*, i8** %4
%32 = load i32, i32* %8
%33 = sext i32 %32 to i64
%34 = getelementptr inbounds i8, i8* %31, i64 %33
%35 = load i8, i8* %34
%36 = load i8*, i8** %6
%37 = load i32, i32* %7
%38 = sext i32 %37 to i64
%39 = getelementptr inbounds i8, i8* %36, i64 %38
store i8 %35, i8* %39
%40 = load i32, i32* %8
%41 = add nsw i32 %40, 2
store i32 %41, i32* %8
br label %42
42: ; preds = %30
%43 = load i32, i32* %7
%44 = add nsw i32 %43, 1
store i32 %44, i32* %7
br label %26
45: ; preds = %26
%46 = load i8*, i8** %6
store i8* %46, i8** %3
br label %47
47: ; preds = %45, %15
%48 = load i8*, i8** %3
ret i8* %48
}

LLVM IR (-O2):
@.str = [52 x i8] c"IRAF2STR Cannot allocate memory for string variable\00"
define i8* @iraf2str(i8* nocapture %0, i32 %1) {
%3 = add nsw i32 %1, 1
%4 = tail call i64 @calloc(i32 %3, i32 1)
%5 = inttoptr i64 %4 to i8*
%6 = icmp eq i64 %4, 0
br i1 %6, label %7, label %9
7: ; preds = %2
%8 = tail call i32 @ffpmsg(i8* getelementptr inbounds ([52 x i8], [52 x i8]* @.str, i64 0, i64 0))
br label %203
9: ; preds = %2
%10 = icmp sgt i32 %1, 0
br i1 %10, label %11, label %203
11: ; preds = %9
%12 = load i8, i8* %0
%13 = icmp eq i8 %12, 0
%14 = zext i1 %13 to i64
%15 = zext i32 %1 to i64
%16 = icmp ult i32 %1, 9
br i1 %16, label %156, label %17
17: ; preds = %11
%18 = getelementptr i8, i8* %5, i64 %15
%19 = getelementptr i8, i8* %0, i64 %14
%20 = shl nuw nsw i64 %15, 1
%21 = or i64 %20, %14
%22 = add nsw i64 %21, -1
%23 = getelementptr i8, i8* %0, i64 %22
%24 = icmp ugt i8* %23, %5
%25 = icmp ult i8* %19, %18
%26 = and i1 %24, %25
br i1 %26, label %156, label %27
27: ; preds = %17
%28 = icmp ult i32 %1, 17
br i1 %28, label %109, label %29
29: ; preds = %27
%30 = and i64 %15, 15
%31 = icmp eq i64 %30, 0
%32 = select i1 %31, i64 16, i64 %30
%33 = sub nsw i64 %15, %32
br label %34
34: ; preds = %34, %29
%35 = phi i64 [ 0, %29 ], [ %103, %34 ]
%36 = shl i64 %35, 1
%37 = or i64 %36, %14
%38 = or i64 %37, 2
%39 = or i64 %37, 4
%40 = or i64 %37, 6
%41 = or i64 %37, 8
%42 = or i64 %37, 10
%43 = or i64 %37, 12
%44 = or i64 %37, 14
%45 = or i64 %37, 16
%46 = or i64 %37, 18
%47 = or i64 %37, 20
%48 = or i64 %37, 22
%49 = or i64 %37, 24
%50 = or i64 %37, 26
%51 = or i64 %37, 28
%52 = or i64 %37, 30
%53 = getelementptr inbounds i8, i8* %0, i64 %37
%54 = getelementptr inbounds i8, i8* %0, i64 %38
%55 = getelementptr inbounds i8, i8* %0, i64 %39
%56 = getelementptr inbounds i8, i8* %0, i64 %40
%57 = getelementptr inbounds i8, i8* %0, i64 %41
%58 = getelementptr inbounds i8, i8* %0, i64 %42
%59 = getelementptr inbounds i8, i8* %0, i64 %43
%60 = getelementptr inbounds i8, i8* %0, i64 %44
%61 = getelementptr inbounds i8, i8* %0, i64 %45
%62 = getelementptr inbounds i8, i8* %0, i64 %46
%63 = getelementptr inbounds i8, i8* %0, i64 %47
%64 = getelementptr inbounds i8, i8* %0, i64 %48
%65 = getelementptr inbounds i8, i8* %0, i64 %49
%66 = getelementptr inbounds i8, i8* %0, i64 %50
%67 = getelementptr inbounds i8, i8* %0, i64 %51
%68 = getelementptr inbounds i8, i8* %0, i64 %52
%69 = load i8, i8* %53
%70 = load i8, i8* %54
%71 = load i8, i8* %55
%72 = load i8, i8* %56
%73 = load i8, i8* %57
%74 = load i8, i8* %58
%75 = load i8, i8* %59
%76 = load i8, i8* %60
%77 = load i8, i8* %61
%78 = load i8, i8* %62
%79 = load i8, i8* %63
%80 = load i8, i8* %64
%81 = load i8, i8* %65
%82 = load i8, i8* %66
%83 = load i8, i8* %67
%84 = load i8, i8* %68
%85 = insertelement <16 x i8> poison, i8 %69, i64 0
%86 = insertelement <16 x i8> %85, i8 %70, i64 1
%87 = insertelement <16 x i8> %86, i8 %71, i64 2
%88 = insertelement <16 x i8> %87, i8 %72, i64 3
%89 = insertelement <16 x i8> %88, i8 %73, i64 4
%90 = insertelement <16 x i8> %89, i8 %74, i64 5
%91 = insertelement <16 x i8> %90, i8 %75, i64 6
%92 = insertelement <16 x i8> %91, i8 %76, i64 7
%93 = insertelement <16 x i8> %92, i8 %77, i64 8
%94 = insertelement <16 x i8> %93, i8 %78, i64 9
%95 = insertelement <16 x i8> %94, i8 %79, i64 10
%96 = insertelement <16 x i8> %95, i8 %80, i64 11
%97 = insertelement <16 x i8> %96, i8 %81, i64 12
%98 = insertelement <16 x i8> %97, i8 %82, i64 13
%99 = insertelement <16 x i8> %98, i8 %83, i64 14
%100 = insertelement <16 x i8> %99, i8 %84, i64 15
%101 = getelementptr inbounds i8, i8* %5, i64 %35
%102 = bitcast i8* %101 to <16 x i8>*
store <16 x i8> %100, <16 x i8>* %102
%103 = add nuw i64 %35, 16
%104 = icmp eq i64 %103, %33
br i1 %104, label %105, label %34
105: ; preds = %34
%106 = shl nsw i64 %33, 1
%107 = or i64 %106, %14
%108 = icmp ult i64 %32, 9
br i1 %108, label %156, label %109
109: ; preds = %27, %105
%110 = phi i64 [ %33, %105 ], [ 0, %27 ]
%111 = and i64 %15, 7
%112 = icmp eq i64 %111, 0
%113 = select i1 %112, i64 8, i64 %111
%114 = sub nsw i64 %15, %113
%115 = shl nsw i64 %114, 1
%116 = or i64 %115, %14
br label %117
117: ; preds = %117, %109
%118 = phi i64 [ %110, %109 ], [ %154, %117 ]
%119 = shl i64 %118, 1
%120 = or i64 %119, %14
%121 = add i64 %120, 2
%122 = add i64 %120, 4
%123 = add i64 %120, 6
%124 = add i64 %120, 8
%125 = add i64 %120, 10
%126 = add i64 %120, 12
%127 = add i64 %120, 14
%128 = getelementptr inbounds i8, i8* %0, i64 %120
%129 = getelementptr inbounds i8, i8* %0, i64 %121
%130 = getelementptr inbounds i8, i8* %0, i64 %122
%131 = getelementptr inbounds i8, i8* %0, i64 %123
%132 = getelementptr inbounds i8, i8* %0, i64 %124
%133 = getelementptr inbounds i8, i8* %0, i64 %125
%134 = getelementptr inbounds i8, i8* %0, i64 %126
%135 = getelementptr inbounds i8, i8* %0, i64 %127
%136 = load i8, i8* %128
%137 = load i8, i8* %129
%138 = load i8, i8* %130
%139 = load i8, i8* %131
%140 = load i8, i8* %132
%141 = load i8, i8* %133
%142 = load i8, i8* %134
%143 = load i8, i8* %135
%144 = insertelement <8 x i8> poison, i8 %136, i64 0
%145 = insertelement <8 x i8> %144, i8 %137, i64 1
%146 = insertelement <8 x i8> %145, i8 %138, i64 2
%147 = insertelement <8 x i8> %146, i8 %139, i64 3
%148 = insertelement <8 x i8> %147, i8 %140, i64 4
%149 = insertelement <8 x i8> %148, i8 %141, i64 5
%150 = insertelement <8 x i8> %149, i8 %142, i64 6
%151 = insertelement <8 x i8> %150, i8 %143, i64 7
%152 = getelementptr inbounds i8, i8* %5, i64 %118
%153 = bitcast i8* %152 to <8 x i8>*
store <8 x i8> %151, <8 x i8>* %153
%154 = add nuw i64 %118, 8
%155 = icmp eq i64 %154, %114
br i1 %155, label %156, label %117
156: ; preds = %117, %17, %11, %105
%157 = phi i64 [ 0, %11 ], [ 0, %17 ], [ %33, %105 ], [ %114, %117 ]
%158 = phi i64 [ %14, %11 ], [ %14, %17 ], [ %107, %105 ], [ %116, %117 ]
%159 = sub nsw i64 %15, %157
%160 = xor i64 %157, -1
%161 = add nsw i64 %160, %15
%162 = and i64 %159, 3
%163 = icmp eq i64 %162, 0
br i1 %163, label %175, label %164
164: ; preds = %156, %164
%165 = phi i64 [ %172, %164 ], [ %157, %156 ]
%166 = phi i64 [ %171, %164 ], [ %158, %156 ]
%167 = phi i64 [ %173, %164 ], [ 0, %156 ]
%168 = getelementptr inbounds i8, i8* %0, i64 %166
%169 = load i8, i8* %168
%170 = getelementptr inbounds i8, i8* %5, i64 %165
store i8 %169, i8* %170
%171 = add nuw nsw i64 %166, 2
%172 = add nuw nsw i64 %165, 1
%173 = add i64 %167, 1
%174 = icmp eq i64 %173, %162
br i1 %174, label %175, label %164
175: ; preds = %164, %156
%176 = phi i64 [ %157, %156 ], [ %172, %164 ]
%177 = phi i64 [ %158, %156 ], [ %171, %164 ]
%178 = icmp ult i64 %161, 3
br i1 %178, label %203, label %179
179: ; preds = %175, %179
%180 = phi i64 [ %201, %179 ], [ %176, %175 ]
%181 = phi i64 [ %200, %179 ], [ %177, %175 ]
%182 = getelementptr inbounds i8, i8* %0, i64 %181
%183 = load i8, i8* %182
%184 = getelementptr inbounds i8, i8* %5, i64 %180
store i8 %183, i8* %184
%185 = add nuw nsw i64 %181, 2
%186 = add nuw nsw i64 %180, 1
%187 = getelementptr inbounds i8, i8* %0, i64 %185
%188 = load i8, i8* %187
%189 = getelementptr inbounds i8, i8* %5, i64 %186
store i8 %188, i8* %189
%190 = add nuw nsw i64 %181, 4
%191 = add nuw nsw i64 %180, 2
%192 = getelementptr inbounds i8, i8* %0, i64 %190
%193 = load i8, i8* %192
%194 = getelementptr inbounds i8, i8* %5, i64 %191
store i8 %193, i8* %194
%195 = add nuw nsw i64 %181, 6
%196 = add nuw nsw i64 %180, 3
%197 = getelementptr inbounds i8, i8* %0, i64 %195
%198 = load i8, i8* %197
%199 = getelementptr inbounds i8, i8* %5, i64 %196
store i8 %198, i8* %199
%200 = add nuw nsw i64 %181, 8
%201 = add nuw nsw i64 %180, 4
%202 = icmp eq i64 %201, %15
br i1 %202, label %203, label %179
203: ; preds = %175, %179, %9, %7
%204 = phi i8* [ null, %7 ], [ %5, %9 ], [ %5, %179 ], [ %5, %175 ]
ret i8* %204
}