char *zstring_strtok(char *str, const char *delim) {
  static char *static_str = 0;
  int index = 0, strlength = 0;
  int found = 0;
  if (delim == 0 || (str == 0 && static_str == 0))
    return 0;
  if (str == 0)
    str = static_str;
  while (str[strlength])
    strlength++;
  for (index = 0; index < strlength; index++)
    if (str[index] == delim[0]) {
      found = 1;
      break;
    }
  if (!found) {
    static_str = 0;
    return str;
  }
  if (str[0] == delim[0]) {
    static_str = (str + 1);
    return (char *)delim;
  }
  str[index] = '\0';
  if ((str + index + 1) != 0)
    static_str = (str + index + 1);
  else
    static_str = 0;
  return str;
}


x86 assembly (clang, -O0):
<zstring_strtok>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x10(%rbp)
mov    %rsi,-0x18(%rbp)
movl   $0x0,-0x1c(%rbp)
movl   $0x0,-0x20(%rbp)
movl   $0x0,-0x24(%rbp)
cmpq   $0x0,-0x18(%rbp)
je     1145 <zstring_strtok+0x45>
cmpq   $0x0,-0x10(%rbp)
jne    1152 <zstring_strtok+0x52>
cmpq   $0x0,0x2ee9(%rip)
jne    1152 <zstring_strtok+0x52>
movq   $0x0,-0x8(%rbp)
jmp    1281 <zstring_strtok+0x181>
cmpq   $0x0,-0x10(%rbp)
jne    1168 <zstring_strtok+0x68>
mov    0x2ec4(%rip),%rax
mov    %rax,-0x10(%rbp)
jmp    116d <zstring_strtok+0x6d>
mov    -0x10(%rbp),%rax
movslq -0x20(%rbp),%rcx
cmpb   $0x0,(%rax,%rcx,1)
je     118d <zstring_strtok+0x8d>
mov    -0x20(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x20(%rbp)
jmp    116d <zstring_strtok+0x6d>
movl   $0x0,-0x1c(%rbp)
mov    -0x1c(%rbp),%eax
cmp    -0x20(%rbp),%eax
jge    11da <zstring_strtok+0xda>
mov    -0x10(%rbp),%rax
movslq -0x1c(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
mov    -0x18(%rbp),%rcx
movsbl (%rcx),%ecx
cmp    %ecx,%eax
jne    11c7 <zstring_strtok+0xc7>
movl   $0x1,-0x24(%rbp)
jmp    11da <zstring_strtok+0xda>
jmp    11cc <zstring_strtok+0xcc>
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
jmp    1194 <zstring_strtok+0x94>
cmpl   $0x0,-0x24(%rbp)
jne    11fc <zstring_strtok+0xfc>
movq   $0x0,0x2e39(%rip)
mov    -0x10(%rbp),%rax
mov    %rax,-0x8(%rbp)
jmp    1281 <zstring_strtok+0x181>
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
mov    -0x18(%rbp),%rcx
movsbl (%rcx),%ecx
cmp    %ecx,%eax
jne    122e <zstring_strtok+0x12e>
mov    -0x10(%rbp),%rax
add    $0x1,%rax
mov    %rax,0x2e07(%rip)
mov    -0x18(%rbp),%rax
mov    %rax,-0x8(%rbp)
jmp    1281 <zstring_strtok+0x181>
mov    -0x10(%rbp),%rax
movslq -0x1c(%rbp),%rcx
movb   $0x0,(%rax,%rcx,1)
mov    -0x10(%rbp),%rax
movslq -0x1c(%rbp),%rcx
add    %rcx,%rax
add    $0x1,%rax
cmp    $0x0,%rax
je     126e <zstring_strtok+0x16e>
mov    -0x10(%rbp),%rax
movslq -0x1c(%rbp),%rcx
add    %rcx,%rax
add    $0x1,%rax
mov    %rax,0x2dbf(%rip)
jmp    1279 <zstring_strtok+0x179>
movq   $0x0,0x2daf(%rip)
mov    -0x10(%rbp),%rax
mov    %rax,-0x8(%rbp)
mov    -0x8(%rbp),%rax
pop    %rbp
ret

x86 assembly (clang, -O2):
<zstring_strtok>:
test   %rsi,%rsi
je     1114 <zstring_strtok+0x14>
mov    0x2f1c(%rip),%rax
mov    %rdi,%rcx
or     %rax,%rcx
jne    1117 <zstring_strtok+0x17>
xor    %eax,%eax
ret
test   %rdi,%rdi
cmovne %rdi,%rax
xor    %edx,%edx
cmpb   $0x0,(%rax,%rdx,1)
lea    0x1(%rdx),%rdx
jne    1120 <zstring_strtok+0x20>
cmp    $0x1,%edx
je     1150 <zstring_strtok+0x50>
mov    (%rsi),%dil
lea    0x1(%rax),%rcx
add    $0xffffffff,%edx
nopl   0x0(%rax)
cmp    %dil,-0x1(%rcx)
je     115a <zstring_strtok+0x5a>
add    $0x1,%rcx
add    $0xffffffffffffffff,%rdx
jne    1140 <zstring_strtok+0x40>
xor    %ecx,%ecx
mov    %rcx,0x2ecf(%rip)
ret
cmp    %dil,(%rax)
jne    1171 <zstring_strtok+0x71>
add    $0x1,%rax
mov    %rax,%rcx
mov    %rsi,%rax
mov    %rcx,0x2eb8(%rip)
ret
movb   $0x0,-0x1(%rcx)
mov    %rcx,0x2eac(%rip)
ret

LLVM IR (-O0):
@zstring_strtok.static_str = internal global i8* null
define i8* @zstring_strtok(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
store i32 0, i32* %6
store i32 0, i32* %7
store i32 0, i32* %8
%9 = load i8*, i8** %5
%10 = icmp eq i8* %9, null
br i1 %10, label %17, label %11
11: ; preds = %2
%12 = load i8*, i8** %4
%13 = icmp eq i8* %12, null
br i1 %13, label %14, label %18
14: ; preds = %11
%15 = load i8*, i8** @zstring_strtok.static_str
%16 = icmp eq i8* %15, null
br i1 %16, label %17, label %18
17: ; preds = %14, %2
store i8* null, i8** %3
br label %95
18: ; preds = %14, %11
%19 = load i8*, i8** %4
%20 = icmp eq i8* %19, null
br i1 %20, label %21, label %23
21: ; preds = %18
%22 = load i8*, i8** @zstring_strtok.static_str
store i8* %22, i8** %4
br label %23
23: ; preds = %21, %18
br label %24
24: ; preds = %31, %23
%25 = load i8*, i8** %4
%26 = load i32, i32* %7
%27 = sext i32 %26 to i64
%28 = getelementptr inbounds i8, i8* %25, i64 %27
%29 = load i8, i8* %28
%30 = icmp ne i8 %29, 0
br i1 %30, label %31, label %34
31: ; preds = %24
%32 = load i32, i32* %7
%33 = add nsw i32 %32, 1
store i32 %33, i32* %7
br label %24
34: ; preds = %24
store i32 0, i32* %6
br label %35
35: ; preds = %53, %34
%36 = load i32, i32* %6
%37 = load i32, i32* %7
%38 = icmp slt i32 %36, %37
br i1 %38, label %39, label %56
39: ; preds = %35
%40 = load i8*, i8** %4
%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 = sext i8 %44 to i32
%46 = load i8*, i8** %5
%47 = getelementptr inbounds i8, i8* %46, i64 0
%48 = load i8, i8* %47
%49 = sext i8 %48 to i32
%50 = icmp eq i32 %45, %49
br i1 %50, label %51, label %52
51: ; preds = %39
store i32 1, i32* %8
br label %56
52: ; preds = %39
br label %53
53: ; preds = %52
%54 = load i32, i32* %6
%55 = add nsw i32 %54, 1
store i32 %55, i32* %6
br label %35
56: ; preds = %51, %35
%57 = load i32, i32* %8
%58 = icmp ne i32 %57, 0
br i1 %58, label %61, label %59
59: ; preds = %56
store i8* null, i8** @zstring_strtok.static_str
%60 = load i8*, i8** %4
store i8* %60, i8** %3
br label %95
61: ; preds = %56
%62 = load i8*, i8** %4
%63 = getelementptr inbounds i8, i8* %62, i64 0
%64 = load i8, i8* %63
%65 = sext i8 %64 to i32
%66 = load i8*, i8** %5
%67 = getelementptr inbounds i8, i8* %66, i64 0
%68 = load i8, i8* %67
%69 = sext i8 %68 to i32
%70 = icmp eq i32 %65, %69
br i1 %70, label %71, label %75
71: ; preds = %61
%72 = load i8*, i8** %4
%73 = getelementptr inbounds i8, i8* %72, i64 1
store i8* %73, i8** @zstring_strtok.static_str
%74 = load i8*, i8** %5
store i8* %74, i8** %3
br label %95
75: ; preds = %61
%76 = load i8*, i8** %4
%77 = load i32, i32* %6
%78 = sext i32 %77 to i64
%79 = getelementptr inbounds i8, i8* %76, i64 %78
store i8 0, i8* %79
%80 = load i8*, i8** %4
%81 = load i32, i32* %6
%82 = sext i32 %81 to i64
%83 = getelementptr inbounds i8, i8* %80, i64 %82
%84 = getelementptr inbounds i8, i8* %83, i64 1
%85 = icmp ne i8* %84, null
br i1 %85, label %86, label %92
86: ; preds = %75
%87 = load i8*, i8** %4
%88 = load i32, i32* %6
%89 = sext i32 %88 to i64
%90 = getelementptr inbounds i8, i8* %87, i64 %89
%91 = getelementptr inbounds i8, i8* %90, i64 1
store i8* %91, i8** @zstring_strtok.static_str
br label %93
92: ; preds = %75
store i8* null, i8** @zstring_strtok.static_str
br label %93
93: ; preds = %92, %86
%94 = load i8*, i8** %4
store i8* %94, i8** %3
br label %95
95: ; preds = %93, %71, %59, %17
%96 = load i8*, i8** %3
ret i8* %96
}

LLVM IR (-O2):
@zstring_strtok.static_str = internal unnamed_addr global i8* null
define i8* @zstring_strtok(i8* %0, i8* %1) {
%3 = icmp eq i8* %1, null
br i1 %3, label %43, label %4
4: ; preds = %2
%5 = icmp eq i8* %0, null
%6 = load i8*, i8** @zstring_strtok.static_str
%7 = icmp eq i8* %6, null
%8 = select i1 %5, i1 %7, i1 false
br i1 %8, label %43, label %9
9: ; preds = %4
%10 = select i1 %5, i8* %6, i8* %0
br label %11
11: ; preds = %11, %9
%12 = phi i64 [ %16, %11 ], [ 0, %9 ]
%13 = getelementptr inbounds i8, i8* %10, i64 %12
%14 = load i8, i8* %13
%15 = icmp eq i8 %14, 0
%16 = add nuw i64 %12, 1
br i1 %15, label %17, label %11
17: ; preds = %11
%18 = trunc i64 %12 to i32
%19 = icmp eq i32 %18, 0
br i1 %19, label %40, label %20
20: ; preds = %17
%21 = load i8, i8* %1
%22 = and i64 %12, 4294967295
br label %23
23: ; preds = %20, %28
%24 = phi i64 [ 0, %20 ], [ %29, %28 ]
%25 = getelementptr inbounds i8, i8* %10, i64 %24
%26 = load i8, i8* %25
%27 = icmp eq i8 %26, %21
br i1 %27, label %31, label %28
28: ; preds = %23
%29 = add nuw nsw i64 %24, 1
%30 = icmp eq i64 %29, %22
br i1 %30, label %40, label %23
31: ; preds = %23
%32 = and i64 %24, 4294967295
%33 = getelementptr inbounds i8, i8* %10, i64 %32
%34 = load i8, i8* %10
%35 = icmp eq i8 %34, %21
br i1 %35, label %36, label %38
36: ; preds = %31
%37 = getelementptr inbounds i8, i8* %10, i64 1
br label %40
38: ; preds = %31
store i8 0, i8* %33
%39 = getelementptr inbounds i8, i8* %33, i64 1
br label %40
40: ; preds = %28, %17, %36, %38
%41 = phi i8* [ %39, %38 ], [ %37, %36 ], [ null, %17 ], [ null, %28 ]
%42 = phi i8* [ %10, %38 ], [ %1, %36 ], [ %10, %17 ], [ %10, %28 ]
store i8* %41, i8** @zstring_strtok.static_str
br label %43
43: ; preds = %40, %2, %4
%44 = phi i8* [ null, %4 ], [ null, %2 ], [ %42, %40 ]
ret i8* %44
}