#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 */
char *getenv(char const *);
int /*<<< orphan*/ strcpy(char *, char const *);
int strlen(char const *);
int gp_getenv(const char *key, char *ptr, int *plen) {
  const char *str = getenv(key);
  if (str) {
    int len = strlen(str);
    if (len < *plen) {
      strcpy(ptr, str);
      *plen = len + 1;
      return 0;
    }
    *plen = len + 1;
    return -1;
  }
  if (*plen > 0)
    *ptr = 0;
  *plen = 1;
  return 1;
}


x86 assembly (clang, -O0):
<gp_getenv>:
push   %rbp
mov    %rsp,%rbp
sub    $0x30,%rsp
mov    %rdi,-0x10(%rbp)
mov    %rsi,-0x18(%rbp)
mov    %rdx,-0x20(%rbp)
mov    -0x10(%rbp),%rdi
call   1030 <getenv@plt>
mov    %rax,-0x28(%rbp)
cmpq   $0x0,-0x28(%rbp)
je     11b4 <gp_getenv+0x84>
mov    -0x28(%rbp),%rdi
call   1050 <strlen@plt>
mov    %eax,-0x2c(%rbp)
mov    -0x2c(%rbp),%eax
mov    -0x20(%rbp),%rcx
cmp    (%rcx),%eax
jge    119c <gp_getenv+0x6c>
mov    -0x18(%rbp),%rdi
mov    -0x28(%rbp),%rsi
call   1040 <strcpy@plt>
mov    -0x2c(%rbp),%ecx
add    $0x1,%ecx
mov    -0x20(%rbp),%rax
mov    %ecx,(%rax)
movl   $0x0,-0x4(%rbp)
jmp    11d9 <gp_getenv+0xa9>
mov    -0x2c(%rbp),%ecx
add    $0x1,%ecx
mov    -0x20(%rbp),%rax
mov    %ecx,(%rax)
movl   $0xffffffff,-0x4(%rbp)
jmp    11d9 <gp_getenv+0xa9>
mov    -0x20(%rbp),%rax
cmpl   $0x0,(%rax)
jle    11c8 <gp_getenv+0x98>
mov    -0x18(%rbp),%rax
movb   $0x0,(%rax)
mov    -0x20(%rbp),%rax
movl   $0x1,(%rax)
movl   $0x1,-0x4(%rbp)
mov    -0x4(%rbp),%eax
add    $0x30,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<gp_getenv>:
push   %rbp
push   %r15
push   %r14
push   %rbx
push   %rax
mov    %rdx,%r15
mov    %rsi,%r14
call   1030 <getenv@plt>
test   %rax,%rax
je     1170 <gp_getenv+0x40>
mov    %rax,%rbx
mov    %rax,%rdi
call   1050 <strlen@plt>
mov    %eax,%ebp
mov    $0xffffffff,%eax
cmp    (%r15),%ebp
jge    116b <gp_getenv+0x3b>
mov    %r14,%rdi
mov    %rbx,%rsi
call   1040 <strcpy@plt>
xor    %eax,%eax
add    $0x1,%ebp
jmp    1184 <gp_getenv+0x54>
mov    $0x1,%ebp
cmpl   $0x0,(%r15)
jle    117f <gp_getenv+0x4f>
movb   $0x0,(%r14)
mov    $0x1,%eax
mov    %ebp,(%r15)
add    $0x8,%rsp
pop    %rbx
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
define i32 @gp_getenv(i8* %0, i8* %1, i32* %2) {
%4 = alloca i32
%5 = alloca i8*
%6 = alloca i8*
%7 = alloca i32*
%8 = alloca i8*
%9 = alloca i32
store i8* %0, i8** %5
store i8* %1, i8** %6
store i32* %2, i32** %7
%10 = load i8*, i8** %5
%11 = call i8* @getenv(i8* %10)
store i8* %11, i8** %8
%12 = load i8*, i8** %8
%13 = icmp ne i8* %12, null
br i1 %13, label %14, label %32
14: ; preds = %3
%15 = load i8*, i8** %8
%16 = call i32 @strlen(i8* %15)
store i32 %16, i32* %9
%17 = load i32, i32* %9
%18 = load i32*, i32** %7
%19 = load i32, i32* %18
%20 = icmp slt i32 %17, %19
br i1 %20, label %21, label %28
21: ; preds = %14
%22 = load i8*, i8** %6
%23 = load i8*, i8** %8
%24 = call i32 @strcpy(i8* %22, i8* %23)
%25 = load i32, i32* %9
%26 = add nsw i32 %25, 1
%27 = load i32*, i32** %7
store i32 %26, i32* %27
store i32 0, i32* %4
br label %40
28: ; preds = %14
%29 = load i32, i32* %9
%30 = add nsw i32 %29, 1
%31 = load i32*, i32** %7
store i32 %30, i32* %31
store i32 -1, i32* %4
br label %40
32: ; preds = %3
%33 = load i32*, i32** %7
%34 = load i32, i32* %33
%35 = icmp sgt i32 %34, 0
br i1 %35, label %36, label %38
36: ; preds = %32
%37 = load i8*, i8** %6
store i8 0, i8* %37
br label %38
38: ; preds = %36, %32
%39 = load i32*, i32** %7
store i32 1, i32* %39
store i32 1, i32* %4
br label %40
40: ; preds = %38, %28, %21
%41 = load i32, i32* %4
ret i32 %41
}

LLVM IR (-O2):
define i32 @gp_getenv(i8* nocapture %0, i8* %1, i32* nocapture %2) {
%4 = tail call i8* @getenv(i8* %0)
%5 = icmp eq i8* %4, null
br i1 %5, label %15, label %6
6: ; preds = %3
%7 = tail call i32 @strlen(i8* %4)
%8 = load i32, i32* %2
%9 = icmp slt i32 %7, %8
br i1 %9, label %10, label %12
10: ; preds = %6
%11 = tail call i32 @strcpy(i8* %1, i8* %4)
br label %12
12: ; preds = %6, %10
%13 = phi i32 [ 0, %10 ], [ -1, %6 ]
%14 = add nsw i32 %7, 1
br label %19
15: ; preds = %3
%16 = load i32, i32* %2
%17 = icmp sgt i32 %16, 0
br i1 %17, label %18, label %19
18: ; preds = %15
store i8 0, i8* %1
br label %19
19: ; preds = %15, %18, %12
%20 = phi i32 [ %14, %12 ], [ 1, %18 ], [ 1, %15 ]
%21 = phi i32 [ %13, %12 ], [ 1, %18 ], [ 1, %15 ]
store i32 %20, i32* %2
ret i32 %21
}