zchko(name) char *name;
{
  int i, x;
  char s[50], *sp;
  sp = s;
  x = 0;
  while ((*sp++ = *name++) != '\0')
    x++;
  if (x == 0)
    return (-1);
  {};
  for (i = x; i > 0; i--)
    if (s[i - 1] == '/')
      break;
  {};
  if (i == 0)
    strcpy(s, "./");
  else
    s[i] = '\0';
  x = access(s, 2);
  if (x < 0) {
    {};
    return (-1);
  } else {
    {};
    return (0);
  }
}


x86 assembly (clang, -O0):
<zchko>:
push   %rbp
mov    %rsp,%rbp
sub    $0x60,%rsp
mov    %rdi,-0x10(%rbp)
lea    -0x50(%rbp),%rax
mov    %rax,-0x58(%rbp)
movl   $0x0,-0x18(%rbp)
mov    -0x10(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x10(%rbp)
mov    (%rax),%al
mov    -0x58(%rbp),%rcx
mov    %rcx,%rdx
add    $0x1,%rdx
mov    %rdx,-0x58(%rbp)
mov    %al,(%rcx)
movsbl %al,%eax
cmp    $0x0,%eax
je     1177 <zchko+0x57>
mov    -0x18(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x18(%rbp)
jmp    113b <zchko+0x1b>
cmpl   $0x0,-0x18(%rbp)
jne    118d <zchko+0x6d>
movl   $0xffffffff,-0x4(%rbp)
jmp    1223 <zchko+0x103>
mov    -0x18(%rbp),%eax
mov    %eax,-0x14(%rbp)
cmpl   $0x0,-0x14(%rbp)
jle    11cb <zchko+0xab>
mov    -0x14(%rbp),%eax
sub    $0x1,%eax
cltq
movsbl -0x50(%rbp,%rax,1),%eax
cmp    $0x2f,%eax
jne    11b8 <zchko+0x98>
jmp    11cb <zchko+0xab>
jmp    11bd <zchko+0x9d>
mov    -0x14(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x14(%rbp)
jmp    1193 <zchko+0x73>
cmpl   $0x0,-0x14(%rbp)
jne    11ea <zchko+0xca>
lea    -0x50(%rbp),%rdi
lea    0xe20(%rip),%rsi
call   1030 <strcpy@plt>
jmp    11f3 <zchko+0xd3>
movslq -0x14(%rbp),%rax
movb   $0x0,-0x50(%rbp,%rax,1)
lea    -0x50(%rbp),%rdi
mov    $0x2,%esi
mov    $0x0,%al
call   1040 <access@plt>
mov    %eax,-0x18(%rbp)
cmpl   $0x0,-0x18(%rbp)
jge    121c <zchko+0xfc>
movl   $0xffffffff,-0x4(%rbp)
jmp    1223 <zchko+0x103>
movl   $0x0,-0x4(%rbp)
mov    -0x4(%rbp),%eax
add    $0x60,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<zchko>:
sub    $0x38,%rsp
mov    (%rdi),%al
mov    %al,(%rsp)
test   %al,%al
je     1168 <zchko+0x58>
xor    %eax,%eax
movabs $0x100000000,%rsi
xor    %ecx,%ecx
nopl   0x0(%rax,%rax,1)
add    %rsi,%rcx
movzbl 0x1(%rdi,%rax,1),%edx
mov    %dl,0x1(%rsp,%rax,1)
add    $0x1,%rax
test   %dl,%dl
jne    1130 <zchko+0x20>
movabs $0xffffffff00000000,%rsi
ff ff ff
xchg   %ax,%ax
mov    %rcx,%rdx
test   %eax,%eax
jle    1172 <zchko+0x62>
cmpb   $0x2f,-0x1(%rsp,%rax,1)
lea    -0x1(%rax),%rax
lea    (%rdx,%rsi,1),%rcx
jne    1150 <zchko+0x40>
jmp    1176 <zchko+0x66>
mov    $0xffffffff,%eax
add    $0x38,%rsp
ret
test   %eax,%eax
je     1180 <zchko+0x70>
sar    $0x20,%rdx
movb   $0x0,(%rsp,%rdx,1)
jmp    118b <zchko+0x7b>
movb   $0x0,0x2(%rsp)
movw   $0x2f2e,(%rsp)
mov    %rsp,%rdi
mov    $0x2,%esi
xor    %eax,%eax
call   1030 <access@plt>
sar    $0x1f,%eax
add    $0x38,%rsp
ret

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

LLVM IR (-O2):
@.str = [3 x i8] c"./\00"
define i32 @zchko(i8* nocapture %0) {
%2 = alloca [50 x i8]
%3 = getelementptr inbounds [50 x i8], [50 x i8]* %2, i64 0, i64 0
%4 = load i8, i8* %0
store i8 %4, i8* %3
%5 = icmp eq i8 %4, 0
br i1 %5, label %37, label %6
6: ; preds = %1, %6
%7 = phi i8* [ %10, %6 ], [ %3, %1 ]
%8 = phi i32 [ %12, %6 ], [ 0, %1 ]
%9 = phi i8* [ %11, %6 ], [ %0, %1 ]
%10 = getelementptr inbounds i8, i8* %7, i64 1
%11 = getelementptr inbounds i8, i8* %9, i64 1
%12 = add nuw nsw i32 %8, 1
%13 = load i8, i8* %11
store i8 %13, i8* %10
%14 = icmp eq i8 %13, 0
br i1 %14, label %15, label %6
15: ; preds = %6
%16 = zext i32 %12 to i64
br label %17
17: ; preds = %15, %21
%18 = phi i64 [ %16, %15 ], [ %22, %21 ]
%19 = trunc i64 %18 to i32
%20 = icmp sgt i32 %19, 0
br i1 %20, label %21, label %26
21: ; preds = %17
%22 = add nsw i64 %18, -1
%23 = getelementptr inbounds [50 x i8], [50 x i8]* %2, i64 0, i64 %22
%24 = load i8, i8* %23
%25 = icmp eq i8 %24, 47
br i1 %25, label %30, label %17
26: ; preds = %17
%27 = trunc i64 %18 to i32
%28 = icmp eq i32 %27, 0
br i1 %28, label %29, label %30
29: ; preds = %26
br label %34
30: ; preds = %21, %26
%31 = shl i64 %18, 32
%32 = ashr exact i64 %31, 32
%33 = getelementptr inbounds [50 x i8], [50 x i8]* %2, i64 0, i64 %32
store i8 0, i8* %33
br label %34
34: ; preds = %30, %29
%35 = call i32 (i8*, i32, ...) bitcast (i32 (...)* @access to i32 (i8*, i32, ...)*)(i8* %3, i32 2)
%36 = ashr i32 %35, 31
br label %37
37: ; preds = %1, %34
%38 = phi i32 [ %36, %34 ], [ -1, %1 ]
ret i32 %38
}