char *canontoken(char *str) {
  static unsigned char *canon;
  static int allocated;
  unsigned char c, *p, *q;
  int len;
  p = (unsigned char *)str;
  len = strlen(str);
  if (len >= allocated) {
    allocated = len + 1 + 10;
    canon = grealloc(canon, allocated);
    if (!canon)
      return (void *)0;
  }
  q = (unsigned char *)canon;
  while ((c = *p++)) {
    if (isupper(c))
      c = tolower(c);
    *q++ = c;
  }
  *q = '\0';
  return (char *)canon;
}


x86 assembly (clang, -O0):
<canontoken>:
push   %rbp
mov    %rsp,%rbp
sub    $0x30,%rsp
mov    %rdi,-0x10(%rbp)
mov    -0x10(%rbp),%rax
mov    %rax,-0x20(%rbp)
mov    -0x10(%rbp),%rdi
call   1040 <strlen@plt>
mov    %eax,-0x2c(%rbp)
mov    -0x2c(%rbp),%eax
cmp    0x2ee7(%rip),%eax
jl     11bb <canontoken+0x7b>
mov    -0x2c(%rbp),%eax
add    $0x1,%eax
add    $0xa,%eax
mov    %eax,0x2ed2(%rip)
mov    0x2ec3(%rip),%rdi
mov    0x2ec5(%rip),%esi
mov    $0x0,%al
call   1030 <grealloc@plt>
cltq
mov    %rax,0x2ead(%rip)
cmpq   $0x0,0x2ea5(%rip)
jne    11b6 <canontoken+0x76>
movq   $0x0,-0x8(%rbp)
jmp    122b <canontoken+0xeb>
jmp    11bb <canontoken+0x7b>
mov    0x2e86(%rip),%rax
mov    %rax,-0x28(%rbp)
mov    -0x20(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x20(%rbp)
mov    (%rax),%al
mov    %al,-0x11(%rbp)
cmp    $0x0,%al
je     1219 <canontoken+0xd9>
movzbl -0x11(%rbp),%edi
call   1060 <isupper@plt>
cmp    $0x0,%eax
je     1200 <canontoken+0xc0>
movzbl -0x11(%rbp),%edi
call   1050 <tolower@plt>
mov    %al,-0x11(%rbp)
mov    -0x11(%rbp),%cl
mov    -0x28(%rbp),%rax
mov    %rax,%rdx
add    $0x1,%rdx
mov    %rdx,-0x28(%rbp)
mov    %cl,(%rax)
jmp    11c6 <canontoken+0x86>
mov    -0x28(%rbp),%rax
movb   $0x0,(%rax)
mov    0x2e21(%rip),%rax
mov    %rax,-0x8(%rbp)
mov    -0x8(%rbp),%rax
add    $0x30,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<canontoken>:
push   %rbp
push   %r15
push   %r14
push   %r12
push   %rbx
mov    %rdi,%r15
call   1040 <strlen@plt>
cmp    %eax,0x2efa(%rip)
jle    1161 <canontoken+0x21>
mov    0x2ee9(%rip),%r14
jmp    1189 <canontoken+0x49>
add    $0xb,%eax
mov    %eax,0x2ee6(%rip)
mov    0x2ed7(%rip),%rdi
mov    %eax,%esi
xor    %eax,%eax
call   1030 <grealloc@plt>
movslq %eax,%r14
mov    %r14,0x2ec4(%rip)
test   %r14d,%r14d
je     11d5 <canontoken+0x95>
mov    (%r15),%bpl
mov    %r14,%rbx
test   %bpl,%bpl
je     11d0 <canontoken+0x90>
add    $0x1,%r15
mov    %r14,%rbx
jmp    11b4 <canontoken+0x74>
nopl   (%rax)
mov    %bpl,(%rbx)
add    $0x1,%rbx
movzbl (%r15),%ebp
add    $0x1,%r15
test   %bpl,%bpl
je     11d0 <canontoken+0x90>
movzbl %bpl,%r12d
mov    %r12d,%edi
call   1060 <isupper@plt>
test   %eax,%eax
je     11a0 <canontoken+0x60>
mov    %r12d,%edi
call   1050 <tolower@plt>
mov    %eax,%ebp
jmp    11a0 <canontoken+0x60>
movb   $0x0,(%rbx)
jmp    11d8 <canontoken+0x98>
xor    %r14d,%r14d
mov    %r14,%rax
pop    %rbx
pop    %r12
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
@canontoken.canon = internal global i8* null
@canontoken.allocated = internal global i32 0
define i8* @canontoken(i8* %0) {
%2 = alloca i8*
%3 = alloca i8*
%4 = alloca i8
%5 = alloca i8*
%6 = alloca i8*
%7 = alloca i32
store i8* %0, i8** %3
%8 = load i8*, i8** %3
store i8* %8, i8** %5
%9 = load i8*, i8** %3
%10 = call i64 @strlen(i8* %9)
%11 = trunc i64 %10 to i32
store i32 %11, i32* %7
%12 = load i32, i32* %7
%13 = load i32, i32* @canontoken.allocated
%14 = icmp sge i32 %12, %13
br i1 %14, label %15, label %28
15: ; preds = %1
%16 = load i32, i32* %7
%17 = add nsw i32 %16, 1
%18 = add nsw i32 %17, 10
store i32 %18, i32* @canontoken.allocated
%19 = load i8*, i8** @canontoken.canon
%20 = load i32, i32* @canontoken.allocated
%21 = call i32 (i8*, i32, ...) bitcast (i32 (...)* @grealloc to i32 (i8*, i32, ...)*)(i8* %19, i32 %20)
%22 = sext i32 %21 to i64
%23 = inttoptr i64 %22 to i8*
store i8* %23, i8** @canontoken.canon
%24 = load i8*, i8** @canontoken.canon
%25 = icmp ne i8* %24, null
br i1 %25, label %27, label %26
26: ; preds = %15
store i8* null, i8** %2
br label %52
27: ; preds = %15
br label %28
28: ; preds = %27, %1
%29 = load i8*, i8** @canontoken.canon
store i8* %29, i8** %6
br label %30
30: ; preds = %45, %28
%31 = load i8*, i8** %5
%32 = getelementptr inbounds i8, i8* %31, i32 1
store i8* %32, i8** %5
%33 = load i8, i8* %31
store i8 %33, i8* %4
%34 = icmp ne i8 %33, 0
br i1 %34, label %35, label %49
35: ; preds = %30
%36 = load i8, i8* %4
%37 = zext i8 %36 to i32
%38 = call i32 @isupper(i32 %37)
%39 = icmp ne i32 %38, 0
br i1 %39, label %40, label %45
40: ; preds = %35
%41 = load i8, i8* %4
%42 = zext i8 %41 to i32
%43 = call i32 @tolower(i32 %42)
%44 = trunc i32 %43 to i8
store i8 %44, i8* %4
br label %45
45: ; preds = %40, %35
%46 = load i8, i8* %4
%47 = load i8*, i8** %6
%48 = getelementptr inbounds i8, i8* %47, i32 1
store i8* %48, i8** %6
store i8 %46, i8* %47
br label %30
49: ; preds = %30
%50 = load i8*, i8** %6
store i8 0, i8* %50
%51 = load i8*, i8** @canontoken.canon
store i8* %51, i8** %2
br label %52
52: ; preds = %49, %26
%53 = load i8*, i8** %2
ret i8* %53
}

LLVM IR (-O2):
@canontoken.canon = internal unnamed_addr global i8* null
@canontoken.allocated = internal unnamed_addr global i32 0
define i8* @canontoken(i8* nocapture %0) {
%2 = tail call i64 @strlen(i8* dereferenceable(1) %0)
%3 = trunc i64 %2 to i32
%4 = load i32, i32* @canontoken.allocated
%5 = icmp sgt i32 %4, %3
br i1 %5, label %6, label %8
6: ; preds = %1
%7 = load i8*, i8** @canontoken.canon
br label %15
8: ; preds = %1
%9 = add nsw i32 %3, 11
store i32 %9, i32* @canontoken.allocated
%10 = load i8*, i8** @canontoken.canon
%11 = tail call i32 (i8*, i32, ...) bitcast (i32 (...)* @grealloc to i32 (i8*, i32, ...)*)(i8* %10, i32 %9)
%12 = sext i32 %11 to i64
%13 = inttoptr i64 %12 to i8*
store i8* %13, i8** @canontoken.canon
%14 = icmp eq i32 %11, 0
br i1 %14, label %37, label %15
15: ; preds = %6, %8
%16 = phi i8* [ %7, %6 ], [ %13, %8 ]
%17 = load i8, i8* %0
%18 = icmp eq i8 %17, 0
br i1 %18, label %35, label %19
19: ; preds = %15, %30
%20 = phi i8 [ %33, %30 ], [ %17, %15 ]
%21 = phi i8* [ %23, %30 ], [ %0, %15 ]
%22 = phi i8* [ %32, %30 ], [ %16, %15 ]
%23 = getelementptr inbounds i8, i8* %21, i64 1
%24 = zext i8 %20 to i32
%25 = tail call i32 @isupper(i32 %24)
%26 = icmp eq i32 %25, 0
br i1 %26, label %30, label %27
27: ; preds = %19
%28 = tail call i32 @tolower(i32 %24)
%29 = trunc i32 %28 to i8
br label %30
30: ; preds = %27, %19
%31 = phi i8 [ %29, %27 ], [ %20, %19 ]
%32 = getelementptr inbounds i8, i8* %22, i64 1
store i8 %31, i8* %22
%33 = load i8, i8* %23
%34 = icmp eq i8 %33, 0
br i1 %34, label %35, label %19
35: ; preds = %30, %15
%36 = phi i8* [ %16, %15 ], [ %32, %30 ]
store i8 0, i8* %36
br label %37
37: ; preds = %8, %35
%38 = phi i8* [ %16, %35 ], [ null, %8 ]
ret i8* %38
}