#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 *env_name(char *);
int /*<<< orphan*/ my_putstr(char *);
char *my_strcat(char *);
scalar_t__ my_strcmp(char *, char *);
int my_unsetenv(char **env, char **s) {
  int i;
  int j;
  char *str;
  i = 0;
  j = 0;
  if (s[1] == NULL) {
    my_putstr("Unsetenv need 1 arg\n");
    return (1);
  }
  while (env[i]) {
    str = env_name(env[i]);
    if (my_strcmp(s[1], str) == 0)
      j = j + 1;
    env[i++] = my_strcat(env[j++]);
    if (env[j] == NULL)
      env[i] = NULL;
  }
  return (1);
}


x86 assembly (clang, -O0):
<my_unsetenv>:
push   %rbp
mov    %rsp,%rbp
sub    $0x30,%rsp
mov    %rdi,-0x10(%rbp)
mov    %rsi,-0x18(%rbp)
movl   $0x0,-0x1c(%rbp)
movl   $0x0,-0x20(%rbp)
mov    -0x18(%rbp),%rax
cmpq   $0x0,0x8(%rax)
jne    1185 <my_unsetenv+0x45>
lea    0xe8c(%rip),%rdi
call   1060 <my_putstr@plt>
movl   $0x1,-0x4(%rbp)
jmp    1239 <my_unsetenv+0xf9>
jmp    118a <my_unsetenv+0x4a>
mov    -0x10(%rbp),%rax
movslq -0x1c(%rbp),%rcx
cmpq   $0x0,(%rax,%rcx,8)
je     1232 <my_unsetenv+0xf2>
mov    -0x10(%rbp),%rax
movslq -0x1c(%rbp),%rcx
mov    (%rax,%rcx,8),%rdi
call   1040 <env_name@plt>
mov    %rax,-0x28(%rbp)
mov    -0x18(%rbp),%rax
mov    0x8(%rax),%rdi
mov    -0x28(%rbp),%rsi
call   1030 <my_strcmp@plt>
cmp    $0x0,%rax
jne    11d6 <my_unsetenv+0x96>
mov    -0x20(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x20(%rbp)
mov    -0x10(%rbp),%rax
mov    -0x20(%rbp),%ecx
mov    %ecx,%edx
add    $0x1,%edx
mov    %edx,-0x20(%rbp)
movslq %ecx,%rcx
mov    (%rax,%rcx,8),%rdi
call   1050 <my_strcat@plt>
mov    %rax,%rdx
mov    -0x10(%rbp),%rax
mov    -0x1c(%rbp),%ecx
mov    %ecx,%esi
add    $0x1,%esi
mov    %esi,-0x1c(%rbp)
movslq %ecx,%rcx
mov    %rdx,(%rax,%rcx,8)
mov    -0x10(%rbp),%rax
movslq -0x20(%rbp),%rcx
cmpq   $0x0,(%rax,%rcx,8)
jne    122d <my_unsetenv+0xed>
mov    -0x10(%rbp),%rax
movslq -0x1c(%rbp),%rcx
movq   $0x0,(%rax,%rcx,8)
jmp    118a <my_unsetenv+0x4a>
movl   $0x1,-0x4(%rbp)
mov    -0x4(%rbp),%eax
add    $0x30,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<my_unsetenv>:
push   %rbp
push   %r15
push   %r14
push   %r12
push   %rbx
cmpq   $0x0,0x8(%rsi)
je     11b1 <my_unsetenv+0x71>
mov    %rdi,%r15
mov    (%rdi),%rdi
test   %rdi,%rdi
je     11c6 <my_unsetenv+0x86>
mov    %rsi,%r14
lea    0x8(%r15),%rbx
xor    %ebp,%ebp
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
call   1040 <env_name@plt>
mov    0x8(%r14),%rdi
mov    %rax,%rsi
call   1030 <my_strcmp@plt>
cmp    $0x1,%rax
adc    $0x0,%ebp
movslq %ebp,%r12
mov    (%r15,%r12,8),%rdi
call   1050 <my_strcat@plt>
mov    %rax,-0x8(%rbx)
cmpq   $0x0,0x8(%r15,%r12,8)
je     11bf <my_unsetenv+0x7f>
add    $0x1,%ebp
mov    (%rbx),%rdi
add    $0x8,%rbx
test   %rdi,%rdi
jne    1170 <my_unsetenv+0x30>
jmp    11c6 <my_unsetenv+0x86>
lea    0xe48(%rip),%rdi
call   1060 <my_putstr@plt>
jmp    11c6 <my_unsetenv+0x86>
movq   $0x0,(%rbx)
mov    $0x1,%eax
pop    %rbx
pop    %r12
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
@.str = [21 x i8] c"Unsetenv need 1 arg\0A\00"
define i32 @my_unsetenv(i8** %0, i8** %1) {
%3 = alloca i32
%4 = alloca i8**
%5 = alloca i8**
%6 = alloca i32
%7 = alloca i32
%8 = alloca i8*
store i8** %0, i8*** %4
store i8** %1, i8*** %5
store i32 0, i32* %6
store i32 0, i32* %7
%9 = load i8**, i8*** %5
%10 = getelementptr inbounds i8*, i8** %9, i64 1
%11 = load i8*, i8** %10
%12 = icmp eq i8* %11, null
br i1 %12, label %13, label %15
13: ; preds = %2
%14 = call i32 @my_putstr(i8* getelementptr inbounds ([21 x i8], [21 x i8]* @.str, i64 0, i64 0))
store i32 1, i32* %3
br label %65
15: ; preds = %2
br label %16
16: ; preds = %63, %15
%17 = load i8**, i8*** %4
%18 = load i32, i32* %6
%19 = sext i32 %18 to i64
%20 = getelementptr inbounds i8*, i8** %17, i64 %19
%21 = load i8*, i8** %20
%22 = icmp ne i8* %21, null
br i1 %22, label %23, label %64
23: ; preds = %16
%24 = load i8**, i8*** %4
%25 = load i32, i32* %6
%26 = sext i32 %25 to i64
%27 = getelementptr inbounds i8*, i8** %24, i64 %26
%28 = load i8*, i8** %27
%29 = call i8* @env_name(i8* %28)
store i8* %29, i8** %8
%30 = load i8**, i8*** %5
%31 = getelementptr inbounds i8*, i8** %30, i64 1
%32 = load i8*, i8** %31
%33 = load i8*, i8** %8
%34 = call i64 @my_strcmp(i8* %32, i8* %33)
%35 = icmp eq i64 %34, 0
br i1 %35, label %36, label %39
36: ; preds = %23
%37 = load i32, i32* %7
%38 = add nsw i32 %37, 1
store i32 %38, i32* %7
br label %39
39: ; preds = %36, %23
%40 = load i8**, i8*** %4
%41 = load i32, i32* %7
%42 = add nsw i32 %41, 1
store i32 %42, i32* %7
%43 = sext i32 %41 to i64
%44 = getelementptr inbounds i8*, i8** %40, i64 %43
%45 = load i8*, i8** %44
%46 = call i8* @my_strcat(i8* %45)
%47 = load i8**, i8*** %4
%48 = load i32, i32* %6
%49 = add nsw i32 %48, 1
store i32 %49, i32* %6
%50 = sext i32 %48 to i64
%51 = getelementptr inbounds i8*, i8** %47, i64 %50
store i8* %46, i8** %51
%52 = load i8**, i8*** %4
%53 = load i32, i32* %7
%54 = sext i32 %53 to i64
%55 = getelementptr inbounds i8*, i8** %52, i64 %54
%56 = load i8*, i8** %55
%57 = icmp eq i8* %56, null
br i1 %57, label %58, label %63
58: ; preds = %39
%59 = load i8**, i8*** %4
%60 = load i32, i32* %6
%61 = sext i32 %60 to i64
%62 = getelementptr inbounds i8*, i8** %59, i64 %61
store i8* null, i8** %62
br label %63
63: ; preds = %58, %39
br label %16
64: ; preds = %16
store i32 1, i32* %3
br label %65
65: ; preds = %64, %13
%66 = load i32, i32* %3
ret i32 %66
}

LLVM IR (-O2):
@.str = [21 x i8] c"Unsetenv need 1 arg\0A\00"
define i32 @my_unsetenv(i8** nocapture %0, i8** nocapture %1) {
%3 = getelementptr inbounds i8*, i8** %1, i64 1
%4 = load i8*, i8** %3
%5 = icmp eq i8* %4, null
br i1 %5, label %9, label %6
6: ; preds = %2
%7 = load i8*, i8** %0
%8 = icmp eq i8* %7, null
br i1 %8, label %38, label %11
9: ; preds = %2
%10 = tail call i32 @my_putstr(i8* getelementptr inbounds ([21 x i8], [21 x i8]* @.str, i64 0, i64 0))
br label %38
11: ; preds = %6, %34
%12 = phi i64 [ %27, %34 ], [ 0, %6 ]
%13 = phi i8* [ %35, %34 ], [ %7, %6 ]
%14 = phi i8** [ %36, %34 ], [ %0, %6 ]
%15 = phi i32 [ %22, %34 ], [ 0, %6 ]
%16 = tail call i8* @env_name(i8* %13)
%17 = load i8*, i8** %3
%18 = tail call i64 @my_strcmp(i8* %17, i8* %16)
%19 = icmp eq i64 %18, 0
%20 = zext i1 %19 to i32
%21 = add nsw i32 %15, %20
%22 = add nsw i32 %21, 1
%23 = sext i32 %21 to i64
%24 = getelementptr inbounds i8*, i8** %0, i64 %23
%25 = load i8*, i8** %24
%26 = tail call i8* @my_strcat(i8* %25)
%27 = add nuw i64 %12, 1
store i8* %26, i8** %14
%28 = sext i32 %22 to i64
%29 = getelementptr inbounds i8*, i8** %0, i64 %28
%30 = load i8*, i8** %29
%31 = icmp eq i8* %30, null
%32 = getelementptr inbounds i8*, i8** %0, i64 %27
br i1 %31, label %33, label %34
33: ; preds = %11
store i8* null, i8** %32
br label %38
34: ; preds = %11
%35 = load i8*, i8** %32
%36 = getelementptr inbounds i8*, i8** %0, i64 %27
%37 = icmp eq i8* %35, null
br i1 %37, label %38, label %11
38: ; preds = %34, %33, %6, %9
ret i32 1
}