char *getenv(name)
register char *name;
{
  extern char ***_penviron;
  register char **v = *_penviron, *p, *q;
  if (v == 0 || name == 0)
    return 0;
  while ((p = *v++) != 0) {
    q = name;
    while (*q && *q++ == *p++)
      ;
    if (*q || *p != '=')
      continue;
    return (p + 1);
  }
  return (0);
}


x86 assembly (clang, -O0):
<getenv>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x10(%rbp)
mov    0x2ed9(%rip),%rax
mov    (%rax),%rax
mov    (%rax),%rax
mov    %rax,-0x18(%rbp)
cmpq   $0x0,-0x18(%rbp)
je     112f <getenv+0x2f>
cmpq   $0x0,-0x10(%rbp)
jne    113c <getenv+0x3c>
movq   $0x0,-0x8(%rbp)
jmp    11fd <getenv+0xfd>
jmp    1141 <getenv+0x41>
mov    -0x18(%rbp),%rax
mov    %rax,%rcx
add    $0x8,%rcx
mov    %rcx,-0x18(%rbp)
mov    (%rax),%rax
mov    %rax,-0x20(%rbp)
cmp    $0x0,%rax
je     11f5 <getenv+0xf5>
mov    -0x10(%rbp),%rax
mov    %rax,-0x28(%rbp)
mov    -0x28(%rbp),%rax
movsbl (%rax),%ecx
xor    %eax,%eax
cmp    $0x0,%ecx
mov    %al,-0x29(%rbp)
je     11aa <getenv+0xaa>
mov    -0x28(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x28(%rbp)
movsbl (%rax),%eax
mov    -0x20(%rbp),%rcx
mov    %rcx,%rdx
add    $0x1,%rdx
mov    %rdx,-0x20(%rbp)
movsbl (%rcx),%ecx
cmp    %ecx,%eax
sete   %al
mov    %al,-0x29(%rbp)
mov    -0x29(%rbp),%al
test   $0x1,%al
jne    11ba <getenv+0xba>
jmp    11bf <getenv+0xbf>
jmp    1169 <getenv+0x69>
mov    -0x28(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x0,%eax
jne    11df <getenv+0xdf>
mov    -0x20(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x3d,%eax
je     11e4 <getenv+0xe4>
jmp    1141 <getenv+0x41>
mov    -0x20(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x8(%rbp)
jmp    11fd <getenv+0xfd>
movq   $0x0,-0x8(%rbp)
mov    -0x8(%rbp),%rax
pop    %rbp
ret

x86 assembly (clang, -O2):
<getenv>:
xor    %eax,%eax
test   %rdi,%rdi
je     1164 <getenv+0x64>
mov    0x2eda(%rip),%rcx
mov    (%rcx),%rcx
mov    (%rcx),%r8
test   %r8,%r8
je     1164 <getenv+0x64>
mov    (%r8),%rsi
xor    %eax,%eax
jmp    112c <getenv+0x2c>
mov    %rsi,%r9
cmpb   $0x3d,(%r9)
je     115d <getenv+0x5d>
mov    (%r8),%rsi
test   %rsi,%rsi
je     1164 <getenv+0x64>
add    $0x8,%r8
mov    %rdi,%rcx
nopl   0x0(%rax,%rax,1)
movzbl (%rcx),%edx
test   %dl,%dl
je     1120 <getenv+0x20>
add    $0x1,%rcx
lea    0x1(%rsi),%r9
cmp    (%rsi),%dl
mov    %r9,%rsi
je     1140 <getenv+0x40>
cmpb   $0x0,(%rcx)
jne    1129 <getenv+0x29>
jmp    1123 <getenv+0x23>
add    $0x1,%r9
mov    %r9,%rax
ret

LLVM IR (-O0):
@_penviron = external global i8***
define i8* @getenv(i8* %0) {
%2 = alloca i8*
%3 = alloca i8*
%4 = alloca i8**
%5 = alloca i8*
%6 = alloca i8*
store i8* %0, i8** %3
%7 = load i8***, i8**** @_penviron
%8 = load i8**, i8*** %7
store i8** %8, i8*** %4
%9 = load i8**, i8*** %4
%10 = icmp eq i8** %9, null
br i1 %10, label %14, label %11
11: ; preds = %1
%12 = load i8*, i8** %3
%13 = icmp eq i8* %12, null
br i1 %13, label %14, label %15
14: ; preds = %11, %1
store i8* null, i8** %2
br label %56
15: ; preds = %11
br label %16
16: ; preds = %51, %15
%17 = load i8**, i8*** %4
%18 = getelementptr inbounds i8*, i8** %17, i32 1
store i8** %18, i8*** %4
%19 = load i8*, i8** %17
store i8* %19, i8** %5
%20 = icmp ne i8* %19, null
br i1 %20, label %21, label %55
21: ; preds = %16
%22 = load i8*, i8** %3
store i8* %22, i8** %6
br label %23
23: ; preds = %40, %21
%24 = load i8*, i8** %6
%25 = load i8, i8* %24
%26 = sext i8 %25 to i32
%27 = icmp ne i32 %26, 0
br i1 %27, label %28, label %38
28: ; preds = %23
%29 = load i8*, i8** %6
%30 = getelementptr inbounds i8, i8* %29, i32 1
store i8* %30, i8** %6
%31 = load i8, i8* %29
%32 = sext i8 %31 to i32
%33 = load i8*, i8** %5
%34 = getelementptr inbounds i8, i8* %33, i32 1
store i8* %34, i8** %5
%35 = load i8, i8* %33
%36 = sext i8 %35 to i32
%37 = icmp eq i32 %32, %36
br label %38
38: ; preds = %28, %23
%39 = phi i1 [ false, %23 ], [ %37, %28 ]
br i1 %39, label %40, label %41
40: ; preds = %38
br label %23
41: ; preds = %38
%42 = load i8*, i8** %6
%43 = load i8, i8* %42
%44 = sext i8 %43 to i32
%45 = icmp ne i32 %44, 0
br i1 %45, label %51, label %46
46: ; preds = %41
%47 = load i8*, i8** %5
%48 = load i8, i8* %47
%49 = sext i8 %48 to i32
%50 = icmp ne i32 %49, 61
br i1 %50, label %51, label %52
51: ; preds = %46, %41
br label %16
52: ; preds = %46
%53 = load i8*, i8** %5
%54 = getelementptr inbounds i8, i8* %53, i64 1
store i8* %54, i8** %2
br label %56
55: ; preds = %16
store i8* null, i8** %2
br label %56
56: ; preds = %55, %52, %14
%57 = load i8*, i8** %2
ret i8* %57
}

LLVM IR (-O2):
@_penviron = external global i8***
define i8* @getenv(i8* %0) {
%2 = load i8***, i8**** @_penviron
%3 = load i8**, i8*** %2
%4 = icmp eq i8** %3, null
%5 = icmp eq i8* %0, null
%6 = or i1 %5, %4
br i1 %6, label %36, label %7
7: ; preds = %1
%8 = load i8*, i8** %3
%9 = icmp eq i8* %8, null
br i1 %9, label %36, label %10
10: ; preds = %7, %31
%11 = phi i8* [ %32, %31 ], [ %8, %7 ]
%12 = phi i8** [ %13, %31 ], [ %3, %7 ]
%13 = getelementptr inbounds i8*, i8** %12, i64 1
br label %14
14: ; preds = %10, %19
%15 = phi i8* [ %21, %19 ], [ %11, %10 ]
%16 = phi i8* [ %20, %19 ], [ %0, %10 ]
%17 = load i8, i8* %16
%18 = icmp eq i8 %17, 0
br i1 %18, label %27, label %19
19: ; preds = %14
%20 = getelementptr inbounds i8, i8* %16, i64 1
%21 = getelementptr inbounds i8, i8* %15, i64 1
%22 = load i8, i8* %15
%23 = icmp eq i8 %17, %22
br i1 %23, label %14, label %24
24: ; preds = %19
%25 = load i8, i8* %20
%26 = icmp eq i8 %25, 0
br i1 %26, label %27, label %31
27: ; preds = %14, %24
%28 = phi i8* [ %21, %24 ], [ %15, %14 ]
%29 = load i8, i8* %28
%30 = icmp eq i8 %29, 61
br i1 %30, label %34, label %31
31: ; preds = %27, %24
%32 = load i8*, i8** %13
%33 = icmp eq i8* %32, null
br i1 %33, label %36, label %10
34: ; preds = %27
%35 = getelementptr inbounds i8, i8* %28, i64 1
br label %36
36: ; preds = %31, %7, %1, %34
%37 = phi i8* [ %35, %34 ], [ null, %1 ], [ null, %7 ], [ null, %31 ]
ret i8* %37
}