#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 env_length(char **);
void *malloc(int);
int strlen(char *);
char *strncpy(char *, char *, int);
char **env_copy(char **source, char **dest) {
  int i;
  int length = env_length(source);
  int var_length;
  if (dest == NULL) {
    dest = malloc((length + 1) * sizeof(char *));
  }
  for (i = 0; i < length; i++) {
    var_length = strlen(source[i]);
    dest[i] = malloc(var_length + 1);
    if (dest[i] == NULL) {
      return NULL;
    }
    dest[i] = strncpy(dest[i], source[i], var_length);
    dest[i][var_length] = '\0';
  }
  dest[length] = NULL;
  return dest;
}


x86 assembly (clang, -O0):
<env_copy>:
push   %rbp
mov    %rsp,%rbp
sub    $0x30,%rsp
mov    %rdi,-0x10(%rbp)
mov    %rsi,-0x18(%rbp)
mov    -0x10(%rbp),%rdi
call   1060 <env_length@plt>
mov    %eax,-0x20(%rbp)
cmpq   $0x0,-0x18(%rbp)
jne    117e <env_copy+0x3e>
mov    -0x20(%rbp),%eax
add    $0x1,%eax
cltq
shl    $0x3,%rax
mov    %eax,%edi
call   1050 <malloc@plt>
mov    %rax,-0x18(%rbp)
movl   $0x0,-0x1c(%rbp)
mov    -0x1c(%rbp),%eax
cmp    -0x20(%rbp),%eax
jge    1230 <env_copy+0xf0>
mov    -0x10(%rbp),%rax
movslq -0x1c(%rbp),%rcx
mov    (%rax,%rcx,8),%rdi
call   1040 <strlen@plt>
mov    %eax,-0x24(%rbp)
mov    -0x24(%rbp),%edi
add    $0x1,%edi
call   1050 <malloc@plt>
mov    %rax,%rdx
mov    -0x18(%rbp),%rax
movslq -0x1c(%rbp),%rcx
mov    %rdx,(%rax,%rcx,8)
mov    -0x18(%rbp),%rax
movslq -0x1c(%rbp),%rcx
cmpq   $0x0,(%rax,%rcx,8)
jne    11df <env_copy+0x9f>
movq   $0x0,-0x8(%rbp)
jmp    1248 <env_copy+0x108>
mov    -0x18(%rbp),%rax
movslq -0x1c(%rbp),%rcx
mov    (%rax,%rcx,8),%rdi
mov    -0x10(%rbp),%rax
movslq -0x1c(%rbp),%rcx
mov    (%rax,%rcx,8),%rsi
mov    -0x24(%rbp),%edx
call   1030 <strncpy@plt>
mov    %rax,%rdx
mov    -0x18(%rbp),%rax
movslq -0x1c(%rbp),%rcx
mov    %rdx,(%rax,%rcx,8)
mov    -0x18(%rbp),%rax
movslq -0x1c(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x24(%rbp),%rcx
movb   $0x0,(%rax,%rcx,1)
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
jmp    1185 <env_copy+0x45>
mov    -0x18(%rbp),%rax
movslq -0x20(%rbp),%rcx
movq   $0x0,(%rax,%rcx,8)
mov    -0x18(%rbp),%rax
mov    %rax,-0x8(%rbp)
mov    -0x8(%rbp),%rax
add    $0x30,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<env_copy>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
push   %rax
mov    %rsi,%r12
mov    %rdi,%r14
call   1060 <env_length@plt>
mov    %eax,%r15d
test   %r12,%r12
je     1165 <env_copy+0x25>
test   %r15d,%r15d
jg     117a <env_copy+0x3a>
jmp    11be <env_copy+0x7e>
lea    0x8(,%r15,8),%edi
call   1050 <malloc@plt>
mov    %rax,%r12
test   %r15d,%r15d
jle    11be <env_copy+0x7e>
mov    %r15d,%r13d
xor    %ebp,%ebp
nop
mov    (%r14,%rbp,8),%rdi
call   1040 <strlen@plt>
mov    %eax,%ebx
lea    0x1(%rbx),%edi
call   1050 <malloc@plt>
mov    %rax,(%r12,%rbp,8)
test   %rax,%rax
je     11cb <env_copy+0x8b>
mov    (%r14,%rbp,8),%rsi
mov    %rax,%rdi
mov    %ebx,%edx
call   1030 <strncpy@plt>
mov    %rax,(%r12,%rbp,8)
movslq %ebx,%rcx
movb   $0x0,(%rax,%rcx,1)
add    $0x1,%rbp
cmp    %rbp,%r13
jne    1180 <env_copy+0x40>
movslq %r15d,%rax
movq   $0x0,(%r12,%rax,8)
jmp    11ce <env_copy+0x8e>
xor    %r12d,%r12d
mov    %r12,%rax
add    $0x8,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
define i8** @env_copy(i8** %0, i8** %1) {
%3 = alloca i8**
%4 = alloca i8**
%5 = alloca i8**
%6 = alloca i32
%7 = alloca i32
%8 = alloca i32
store i8** %0, i8*** %4
store i8** %1, i8*** %5
%9 = load i8**, i8*** %4
%10 = call i32 @env_length(i8** %9)
store i32 %10, i32* %7
%11 = load i8**, i8*** %5
%12 = icmp eq i8** %11, null
br i1 %12, label %13, label %21
13: ; preds = %2
%14 = load i32, i32* %7
%15 = add nsw i32 %14, 1
%16 = sext i32 %15 to i64
%17 = mul i64 %16, 8
%18 = trunc i64 %17 to i32
%19 = call i8* @malloc(i32 %18)
%20 = bitcast i8* %19 to i8**
store i8** %20, i8*** %5
br label %21
21: ; preds = %13, %2
store i32 0, i32* %6
br label %22
22: ; preds = %72, %21
%23 = load i32, i32* %6
%24 = load i32, i32* %7
%25 = icmp slt i32 %23, %24
br i1 %25, label %26, label %75
26: ; preds = %22
%27 = load i8**, i8*** %4
%28 = load i32, i32* %6
%29 = sext i32 %28 to i64
%30 = getelementptr inbounds i8*, i8** %27, i64 %29
%31 = load i8*, i8** %30
%32 = call i32 @strlen(i8* %31)
store i32 %32, i32* %8
%33 = load i32, i32* %8
%34 = add nsw i32 %33, 1
%35 = call i8* @malloc(i32 %34)
%36 = load i8**, i8*** %5
%37 = load i32, i32* %6
%38 = sext i32 %37 to i64
%39 = getelementptr inbounds i8*, i8** %36, i64 %38
store i8* %35, i8** %39
%40 = load i8**, i8*** %5
%41 = load i32, i32* %6
%42 = sext i32 %41 to i64
%43 = getelementptr inbounds i8*, i8** %40, i64 %42
%44 = load i8*, i8** %43
%45 = icmp eq i8* %44, null
br i1 %45, label %46, label %47
46: ; preds = %26
store i8** null, i8*** %3
br label %81
47: ; preds = %26
%48 = load i8**, i8*** %5
%49 = load i32, i32* %6
%50 = sext i32 %49 to i64
%51 = getelementptr inbounds i8*, i8** %48, i64 %50
%52 = load i8*, i8** %51
%53 = load i8**, i8*** %4
%54 = load i32, i32* %6
%55 = sext i32 %54 to i64
%56 = getelementptr inbounds i8*, i8** %53, i64 %55
%57 = load i8*, i8** %56
%58 = load i32, i32* %8
%59 = call i8* @strncpy(i8* %52, i8* %57, i32 %58)
%60 = load i8**, i8*** %5
%61 = load i32, i32* %6
%62 = sext i32 %61 to i64
%63 = getelementptr inbounds i8*, i8** %60, i64 %62
store i8* %59, i8** %63
%64 = load i8**, i8*** %5
%65 = load i32, i32* %6
%66 = sext i32 %65 to i64
%67 = getelementptr inbounds i8*, i8** %64, i64 %66
%68 = load i8*, i8** %67
%69 = load i32, i32* %8
%70 = sext i32 %69 to i64
%71 = getelementptr inbounds i8, i8* %68, i64 %70
store i8 0, i8* %71
br label %72
72: ; preds = %47
%73 = load i32, i32* %6
%74 = add nsw i32 %73, 1
store i32 %74, i32* %6
br label %22
75: ; preds = %22
%76 = load i8**, i8*** %5
%77 = load i32, i32* %7
%78 = sext i32 %77 to i64
%79 = getelementptr inbounds i8*, i8** %76, i64 %78
store i8* null, i8** %79
%80 = load i8**, i8*** %5
store i8** %80, i8*** %3
br label %81
81: ; preds = %75, %46
%82 = load i8**, i8*** %3
ret i8** %82
}

LLVM IR (-O2):
define i8** @env_copy(i8** %0, i8** writeonly %1) {
%3 = tail call i32 @env_length(i8** %0)
%4 = icmp eq i8** %1, null
br i1 %4, label %5, label %10
5: ; preds = %2
%6 = shl i32 %3, 3
%7 = add i32 %6, 8
%8 = tail call i8* @malloc(i32 %7)
%9 = bitcast i8* %8 to i8**
br label %10
10: ; preds = %5, %2
%11 = phi i8** [ %9, %5 ], [ %1, %2 ]
%12 = icmp sgt i32 %3, 0
br i1 %12, label %13, label %31
13: ; preds = %10
%14 = zext i32 %3 to i64
br label %15
15: ; preds = %13, %24
%16 = phi i64 [ 0, %13 ], [ %29, %24 ]
%17 = getelementptr inbounds i8*, i8** %0, i64 %16
%18 = load i8*, i8** %17
%19 = tail call i32 @strlen(i8* %18)
%20 = add nsw i32 %19, 1
%21 = tail call i8* @malloc(i32 %20)
%22 = getelementptr inbounds i8*, i8** %11, i64 %16
store i8* %21, i8** %22
%23 = icmp eq i8* %21, null
br i1 %23, label %34, label %24
24: ; preds = %15
%25 = load i8*, i8** %17
%26 = tail call i8* @strncpy(i8* %21, i8* %25, i32 %19)
store i8* %26, i8** %22
%27 = sext i32 %19 to i64
%28 = getelementptr inbounds i8, i8* %26, i64 %27
store i8 0, i8* %28
%29 = add nuw nsw i64 %16, 1
%30 = icmp eq i64 %29, %14
br i1 %30, label %31, label %15
31: ; preds = %24, %10
%32 = sext i32 %3 to i64
%33 = getelementptr inbounds i8*, i8** %11, i64 %32
store i8* null, i8** %33
br label %34
34: ; preds = %15, %31
%35 = phi i8** [ %11, %31 ], [ null, %15 ]
ret i8** %35
}