#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 */
int /*<<< orphan*/ fprintf(int /*<<< orphan*/, char *, ...);
scalar_t__ malloc(int);
scalar_t__ putenv(char *);
int /*<<< orphan*/ stderr;
int /*<<< orphan*/ strcat(char *, char *);
int /*<<< orphan*/ strcpy(char *, char *);
int strlen(char *);
void Putenv(char *a, char *b) {
  char *buf, *value, *p, *q, quote = '\0';
  int inquote = 0;
  buf = (char *)malloc((strlen(a) + strlen(b) + 2) * sizeof(char));
  if (!buf) {
    fprintf(stderr, "allocation failure in reading Renviron");
    return;
  }
  strcpy(buf, a);
  strcat(buf, "=");
  value = buf + strlen(buf);
  for (p = b, q = value; *p; p++) {
    if (!inquote && (*p == '"' || *p == '\'')) {
      inquote = 1;
      quote = *p;
      continue;
    }
    if (inquote && *p == quote && *(p - 1) != '\\') {
      inquote = 0;
      continue;
    }
    if (!inquote && *p == '\\') {
      if (*(p + 1) == '\n')
        p++;
      else if (*(p + 1) == '\\')
        *q++ = *p;
      continue;
    }
    if (inquote && *p == '\\' && *(p + 1) == quote)
      continue;
    *q++ = *p;
  }
  *q = '\0';
  if (putenv(buf))
    fprintf(stderr, "Problem in setting variable '%s' in Renviron", a);
}


x86 assembly (clang, -O0):
<Putenv>:
push   %rbp
mov    %rsp,%rbp
sub    $0x50,%rsp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
movb   $0x0,-0x31(%rbp)
movl   $0x0,-0x38(%rbp)
mov    -0x8(%rbp),%rdi
call   1040 <strlen@plt>
mov    %eax,-0x3c(%rbp)
mov    -0x10(%rbp),%rdi
call   1040 <strlen@plt>
mov    %eax,%ecx
mov    -0x3c(%rbp),%eax
add    %ecx,%eax
add    $0x2,%eax
cltq
shl    $0x0,%rax
mov    %eax,%edi
call   1070 <malloc@plt>
mov    %rax,-0x18(%rbp)
cmpq   $0x0,-0x18(%rbp)
jne    11d2 <Putenv+0x72>
mov    0x2e23(%rip),%rax
mov    (%rax),%edi
lea    0xe3a(%rip),%rsi
mov    $0x0,%al
call   1060 <fprintf@plt>
jmp    13a4 <Putenv+0x244>
mov    -0x18(%rbp),%rdi
mov    -0x8(%rbp),%rsi
call   1030 <strcpy@plt>
mov    -0x18(%rbp),%rdi
lea    0xe3d(%rip),%rsi
call   1080 <strcat@plt>
mov    -0x18(%rbp),%rax
mov    %rax,-0x48(%rbp)
mov    -0x18(%rbp),%rdi
call   1040 <strlen@plt>
mov    %eax,%ecx
mov    -0x48(%rbp),%rax
movslq %ecx,%rcx
add    %rcx,%rax
mov    %rax,-0x20(%rbp)
mov    -0x10(%rbp),%rax
mov    %rax,-0x28(%rbp)
mov    -0x20(%rbp),%rax
mov    %rax,-0x30(%rbp)
mov    -0x28(%rbp),%rax
cmpb   $0x0,(%rax)
je     136f <Putenv+0x20f>
cmpl   $0x0,-0x38(%rbp)
jne    126c <Putenv+0x10c>
mov    -0x28(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x22,%eax
je     1257 <Putenv+0xf7>
mov    -0x28(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x27,%eax
jne    126c <Putenv+0x10c>
movl   $0x1,-0x38(%rbp)
mov    -0x28(%rbp),%rax
mov    (%rax),%al
mov    %al,-0x31(%rbp)
jmp    135e <Putenv+0x1fe>
cmpl   $0x0,-0x38(%rbp)
je     12a6 <Putenv+0x146>
mov    -0x28(%rbp),%rax
movsbl (%rax),%eax
movsbl -0x31(%rbp),%ecx
cmp    %ecx,%eax
jne    12a6 <Putenv+0x146>
mov    -0x28(%rbp),%rax
movsbl -0x1(%rax),%eax
cmp    $0x5c,%eax
je     12a6 <Putenv+0x146>
movl   $0x0,-0x38(%rbp)
jmp    135e <Putenv+0x1fe>
cmpl   $0x0,-0x38(%rbp)
jne    1314 <Putenv+0x1b4>
mov    -0x28(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x5c,%eax
jne    1314 <Putenv+0x1b4>
mov    -0x28(%rbp),%rax
movsbl 0x1(%rax),%eax
cmp    $0xa,%eax
jne    12e2 <Putenv+0x182>
mov    -0x28(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x28(%rbp)
jmp    130f <Putenv+0x1af>
mov    -0x28(%rbp),%rax
movsbl 0x1(%rax),%eax
cmp    $0x5c,%eax
jne    130a <Putenv+0x1aa>
mov    -0x28(%rbp),%rax
mov    (%rax),%cl
mov    -0x30(%rbp),%rax
mov    %rax,%rdx
add    $0x1,%rdx
mov    %rdx,-0x30(%rbp)
mov    %cl,(%rax)
jmp    130f <Putenv+0x1af>
jmp    135e <Putenv+0x1fe>
cmpl   $0x0,-0x38(%rbp)
je     1347 <Putenv+0x1e7>
mov    -0x28(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x5c,%eax
jne    1347 <Putenv+0x1e7>
mov    -0x28(%rbp),%rax
movsbl 0x1(%rax),%eax
movsbl -0x31(%rbp),%ecx
cmp    %ecx,%eax
jne    1347 <Putenv+0x1e7>
jmp    135e <Putenv+0x1fe>
mov    -0x28(%rbp),%rax
mov    (%rax),%cl
mov    -0x30(%rbp),%rax
mov    %rax,%rdx
add    $0x1,%rdx
mov    %rdx,-0x30(%rbp)
mov    %cl,(%rax)
mov    -0x28(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x28(%rbp)
jmp    1220 <Putenv+0xc0>
mov    -0x30(%rbp),%rax
movb   $0x0,(%rax)
mov    -0x18(%rbp),%rdi
call   1050 <putenv@plt>
cmp    $0x0,%rax
je     13a4 <Putenv+0x244>
mov    0x2c50(%rip),%rax
mov    (%rax),%edi
mov    -0x8(%rbp),%rdx
lea    0xc8c(%rip),%rsi
mov    $0x0,%al
call   1060 <fprintf@plt>
add    $0x50,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<Putenv>:
push   %r15
push   %r14
push   %rbx
mov    %rsi,%rbx
mov    %rdi,%r14
call   1040 <strlen@plt>
mov    %eax,%r15d
mov    %rbx,%rdi
call   1040 <strlen@plt>
lea    (%r15,%rax,1),%edi
add    $0x2,%edi
call   1070 <malloc@plt>
test   %rax,%rax
je     1275 <Putenv+0x115>
mov    %rax,%r15
mov    %rax,%rdi
mov    %r14,%rsi
call   1030 <strcpy@plt>
lea    0xe82(%rip),%rsi
mov    %r15,%rdi
call   1080 <strcat@plt>
mov    %r15,%rdi
call   1040 <strlen@plt>
cltq
add    %r15,%rax
mov    (%rbx),%cl
test   %cl,%cl
je     1246 <Putenv+0xe6>
xor    %edx,%edx
xor    %esi,%esi
jmp    11dc <Putenv+0x7c>
mov    %ecx,%esi
xor    %edx,%edx
xchg   %ax,%ax
movzbl 0x1(%rbx),%ecx
add    $0x1,%rbx
test   %cl,%cl
je     1246 <Putenv+0xe6>
test   %edx,%edx
je     1200 <Putenv+0xa0>
cmp    %sil,%cl
jne    11eb <Putenv+0x8b>
cmpb   $0x5c,-0x1(%rbx)
jne    11ca <Putenv+0x6a>
cmp    $0x5c,%cl
jne    1230 <Putenv+0xd0>
cmp    %sil,0x1(%rbx)
jne    1230 <Putenv+0xd0>
mov    $0x1,%edx
jmp    11d0 <Putenv+0x70>
nopl   (%rax)
cmp    $0x22,%cl
je     1238 <Putenv+0xd8>
cmp    $0x27,%cl
je     1238 <Putenv+0xd8>
cmp    $0x5c,%cl
jne    1230 <Putenv+0xd0>
movzbl 0x1(%rbx),%ecx
xor    %edx,%edx
cmp    $0x5c,%cl
je     1241 <Putenv+0xe1>
cmp    $0xa,%cl
jne    11d0 <Putenv+0x70>
add    $0x1,%rbx
jmp    11d0 <Putenv+0x70>
cs nopw 0x0(%rax,%rax,1)
nop
mov    %cl,(%rax)
add    $0x1,%rax
jmp    11d0 <Putenv+0x70>
mov    %ecx,%esi
mov    $0x1,%edx
jmp    11d0 <Putenv+0x70>
movb   $0x5c,(%rax)
jmp    1232 <Putenv+0xd2>
movb   $0x0,(%rax)
mov    %r15,%rdi
call   1050 <putenv@plt>
test   %rax,%rax
je     1291 <Putenv+0x131>
mov    0x2d83(%rip),%rax
mov    (%rax),%edi
lea    0xdc3(%rip),%rsi
mov    %r14,%rdx
xor    %eax,%eax
pop    %rbx
pop    %r14
pop    %r15
jmp    1060 <fprintf@plt>
mov    0x2d64(%rip),%rax
mov    (%rax),%edi
lea    0xd7b(%rip),%rsi
xor    %eax,%eax
pop    %rbx
pop    %r14
pop    %r15
jmp    1060 <fprintf@plt>
pop    %rbx
pop    %r14
pop    %r15
ret

LLVM IR (-O0):
@stderr = global i32 0
@.str = [39 x i8] c"allocation failure in reading Renviron\00"
@.str.1 = [2 x i8] c"=\00"
@.str.2 = [45 x i8] c"Problem in setting variable '%s' in Renviron\00"
define void @Putenv(i8* %0, i8* %1) {
%3 = alloca i8*
%4 = alloca i8*
%5 = alloca i8*
%6 = alloca i8*
%7 = alloca i8*
%8 = alloca i8*
%9 = alloca i8
%10 = alloca i32
store i8* %0, i8** %3
store i8* %1, i8** %4
store i8 0, i8* %9
store i32 0, i32* %10
%11 = load i8*, i8** %3
%12 = call i32 @strlen(i8* %11)
%13 = load i8*, i8** %4
%14 = call i32 @strlen(i8* %13)
%15 = add nsw i32 %12, %14
%16 = add nsw i32 %15, 2
%17 = sext i32 %16 to i64
%18 = mul i64 %17, 1
%19 = trunc i64 %18 to i32
%20 = call i64 @malloc(i32 %19)
%21 = inttoptr i64 %20 to i8*
store i8* %21, i8** %5
%22 = load i8*, i8** %5
%23 = icmp ne i8* %22, null
br i1 %23, label %27, label %24
24: ; preds = %2
%25 = load i32, i32* @stderr
%26 = call i32 (i32, i8*, ...) @fprintf(i32 %25, i8* getelementptr inbounds ([39 x i8], [39 x i8]* @.str, i64 0, i64 0))
br label %141
27: ; preds = %2
%28 = load i8*, i8** %5
%29 = load i8*, i8** %3
%30 = call i32 @strcpy(i8* %28, i8* %29)
%31 = load i8*, i8** %5
%32 = call i32 @strcat(i8* %31, i8* getelementptr inbounds ([2 x i8], [2 x i8]* @.str.1, i64 0, i64 0))
%33 = load i8*, i8** %5
%34 = load i8*, i8** %5
%35 = call i32 @strlen(i8* %34)
%36 = sext i32 %35 to i64
%37 = getelementptr inbounds i8, i8* %33, i64 %36
store i8* %37, i8** %6
%38 = load i8*, i8** %4
store i8* %38, i8** %7
%39 = load i8*, i8** %6
store i8* %39, i8** %8
br label %40
40: ; preds = %129, %27
%41 = load i8*, i8** %7
%42 = load i8, i8* %41
%43 = icmp ne i8 %42, 0
br i1 %43, label %44, label %132
44: ; preds = %40
%45 = load i32, i32* %10
%46 = icmp ne i32 %45, 0
br i1 %46, label %60, label %47
47: ; preds = %44
%48 = load i8*, i8** %7
%49 = load i8, i8* %48
%50 = sext i8 %49 to i32
%51 = icmp eq i32 %50, 34
br i1 %51, label %57, label %52
52: ; preds = %47
%53 = load i8*, i8** %7
%54 = load i8, i8* %53
%55 = sext i8 %54 to i32
%56 = icmp eq i32 %55, 39
br i1 %56, label %57, label %60
57: ; preds = %52, %47
store i32 1, i32* %10
%58 = load i8*, i8** %7
%59 = load i8, i8* %58
store i8 %59, i8* %9
br label %129
60: ; preds = %52, %44
%61 = load i32, i32* %10
%62 = icmp ne i32 %61, 0
br i1 %62, label %63, label %77
63: ; preds = %60
%64 = load i8*, i8** %7
%65 = load i8, i8* %64
%66 = sext i8 %65 to i32
%67 = load i8, i8* %9
%68 = sext i8 %67 to i32
%69 = icmp eq i32 %66, %68
br i1 %69, label %70, label %77
70: ; preds = %63
%71 = load i8*, i8** %7
%72 = getelementptr inbounds i8, i8* %71, i64 -1
%73 = load i8, i8* %72
%74 = sext i8 %73 to i32
%75 = icmp ne i32 %74, 92
br i1 %75, label %76, label %77
76: ; preds = %70
store i32 0, i32* %10
br label %129
77: ; preds = %70, %63, %60
%78 = load i32, i32* %10
%79 = icmp ne i32 %78, 0
br i1 %79, label %107, label %80
80: ; preds = %77
%81 = load i8*, i8** %7
%82 = load i8, i8* %81
%83 = sext i8 %82 to i32
%84 = icmp eq i32 %83, 92
br i1 %84, label %85, label %107
85: ; preds = %80
%86 = load i8*, i8** %7
%87 = getelementptr inbounds i8, i8* %86, i64 1
%88 = load i8, i8* %87
%89 = sext i8 %88 to i32
%90 = icmp eq i32 %89, 10
br i1 %90, label %91, label %94
91: ; preds = %85
%92 = load i8*, i8** %7
%93 = getelementptr inbounds i8, i8* %92, i32 1
store i8* %93, i8** %7
br label %106
94: ; preds = %85
%95 = load i8*, i8** %7
%96 = getelementptr inbounds i8, i8* %95, i64 1
%97 = load i8, i8* %96
%98 = sext i8 %97 to i32
%99 = icmp eq i32 %98, 92
br i1 %99, label %100, label %105
100: ; preds = %94
%101 = load i8*, i8** %7
%102 = load i8, i8* %101
%103 = load i8*, i8** %8
%104 = getelementptr inbounds i8, i8* %103, i32 1
store i8* %104, i8** %8
store i8 %102, i8* %103
br label %105
105: ; preds = %100, %94
br label %106
106: ; preds = %105, %91
br label %129
107: ; preds = %80, %77
%108 = load i32, i32* %10
%109 = icmp ne i32 %108, 0
br i1 %109, label %110, label %124
110: ; preds = %107
%111 = load i8*, i8** %7
%112 = load i8, i8* %111
%113 = sext i8 %112 to i32
%114 = icmp eq i32 %113, 92
br i1 %114, label %115, label %124
115: ; preds = %110
%116 = load i8*, i8** %7
%117 = getelementptr inbounds i8, i8* %116, i64 1
%118 = load i8, i8* %117
%119 = sext i8 %118 to i32
%120 = load i8, i8* %9
%121 = sext i8 %120 to i32
%122 = icmp eq i32 %119, %121
br i1 %122, label %123, label %124
123: ; preds = %115
br label %129
124: ; preds = %115, %110, %107
%125 = load i8*, i8** %7
%126 = load i8, i8* %125
%127 = load i8*, i8** %8
%128 = getelementptr inbounds i8, i8* %127, i32 1
store i8* %128, i8** %8
store i8 %126, i8* %127
br label %129
129: ; preds = %124, %123, %106, %76, %57
%130 = load i8*, i8** %7
%131 = getelementptr inbounds i8, i8* %130, i32 1
store i8* %131, i8** %7
br label %40
132: ; preds = %40
%133 = load i8*, i8** %8
store i8 0, i8* %133
%134 = load i8*, i8** %5
%135 = call i64 @putenv(i8* %134)
%136 = icmp ne i64 %135, 0
br i1 %136, label %137, label %141
137: ; preds = %132
%138 = load i32, i32* @stderr
%139 = load i8*, i8** %3
%140 = call i32 (i32, i8*, ...) @fprintf(i32 %138, i8* getelementptr inbounds ([45 x i8], [45 x i8]* @.str.2, i64 0, i64 0), i8* %139)
br label %141
141: ; preds = %24, %137, %132
ret void
}

LLVM IR (-O2):
@stderr = global i32 0
@.str = [39 x i8] c"allocation failure in reading Renviron\00"
@.str.1 = [2 x i8] c"=\00"
@.str.2 = [45 x i8] c"Problem in setting variable '%s' in Renviron\00"
define void @Putenv(i8* %0, i8* %1) {
%3 = tail call i32 @strlen(i8* %0)
%4 = tail call i32 @strlen(i8* %1)
%5 = add i32 %3, 2
%6 = add i32 %5, %4
%7 = tail call i64 @malloc(i32 %6)
%8 = inttoptr i64 %7 to i8*
%9 = icmp eq i64 %7, 0
br i1 %9, label %10, label %13
10: ; preds = %2
%11 = load i32, i32* @stderr
%12 = tail call i32 (i32, i8*, ...) @fprintf(i32 %11, i8* getelementptr inbounds ([39 x i8], [39 x i8]* @.str, i64 0, i64 0))
br label %64
13: ; preds = %2
%14 = tail call i32 @strcpy(i8* %8, i8* %0)
%15 = tail call i32 @strcat(i8* %8, i8* getelementptr inbounds ([2 x i8], [2 x i8]* @.str.1, i64 0, i64 0))
%16 = tail call i32 @strlen(i8* %8)
%17 = sext i32 %16 to i64
%18 = getelementptr inbounds i8, i8* %8, i64 %17
%19 = load i8, i8* %1
%20 = icmp eq i8 %19, 0
br i1 %20, label %57, label %21
21: ; preds = %13, %49
%22 = phi i8 [ %55, %49 ], [ %19, %13 ]
%23 = phi i32 [ %53, %49 ], [ 0, %13 ]
%24 = phi i8 [ %52, %49 ], [ 0, %13 ]
%25 = phi i8* [ %51, %49 ], [ %18, %13 ]
%26 = phi i8* [ %54, %49 ], [ %1, %13 ]
%27 = icmp eq i32 %23, 0
br i1 %27, label %28, label %29
28: ; preds = %21
switch i8 %22, label %47 [
i8 34, label %49
i8 39, label %49
i8 92, label %35
]
29: ; preds = %21
%30 = icmp eq i8 %22, %24
br i1 %30, label %31, label %41
31: ; preds = %29
%32 = getelementptr inbounds i8, i8* %26, i64 -1
%33 = load i8, i8* %32
%34 = icmp eq i8 %33, 92
br i1 %34, label %41, label %49
35: ; preds = %28
%36 = getelementptr inbounds i8, i8* %26, i64 1
%37 = load i8, i8* %36
switch i8 %37, label %49 [
i8 10, label %38
i8 92, label %39
]
38: ; preds = %35
br label %49
39: ; preds = %35
%40 = getelementptr inbounds i8, i8* %25, i64 1
store i8 92, i8* %25
br label %49
41: ; preds = %29, %31
%42 = icmp eq i8 %22, 92
br i1 %42, label %43, label %47
43: ; preds = %41
%44 = getelementptr inbounds i8, i8* %26, i64 1
%45 = load i8, i8* %44
%46 = icmp eq i8 %45, %24
br i1 %46, label %49, label %47
47: ; preds = %28, %43, %41
%48 = getelementptr inbounds i8, i8* %25, i64 1
store i8 %22, i8* %25
br label %49
49: ; preds = %28, %28, %35, %31, %43, %38, %39, %47
%50 = phi i8* [ %26, %43 ], [ %26, %47 ], [ %36, %38 ], [ %26, %39 ], [ %26, %31 ], [ %26, %35 ], [ %26, %28 ], [ %26, %28 ]
%51 = phi i8* [ %25, %43 ], [ %48, %47 ], [ %25, %38 ], [ %40, %39 ], [ %25, %31 ], [ %25, %35 ], [ %25, %28 ], [ %25, %28 ]
%52 = phi i8 [ %24, %43 ], [ %24, %47 ], [ %24, %38 ], [ %24, %39 ], [ %22, %31 ], [ %24, %35 ], [ %22, %28 ], [ %22, %28 ]
%53 = phi i32 [ 1, %43 ], [ %23, %47 ], [ 0, %38 ], [ 0, %39 ], [ 0, %31 ], [ 0, %35 ], [ 1, %28 ], [ 1, %28 ]
%54 = getelementptr inbounds i8, i8* %50, i64 1
%55 = load i8, i8* %54
%56 = icmp eq i8 %55, 0
br i1 %56, label %57, label %21
57: ; preds = %49, %13
%58 = phi i8* [ %18, %13 ], [ %51, %49 ]
store i8 0, i8* %58
%59 = tail call i64 @putenv(i8* %8)
%60 = icmp eq i64 %59, 0
br i1 %60, label %64, label %61
61: ; preds = %57
%62 = load i32, i32* @stderr
%63 = tail call i32 (i32, i8*, ...) @fprintf(i32 %62, i8* getelementptr inbounds ([45 x i8], [45 x i8]* @.str.2, i64 0, i64 0), i8* %0)
br label %64
64: ; preds = %57, %61, %10
ret void
}