expandp(srcstr, deststr, maxlength) char *srcstr;
char *deststr;
int maxlength;
{
  unsigned char c;
  while ((c = *srcstr++) != 0) {
    if (c == '\r') {
      *deststr++ = '<';
      *deststr++ = 'N';
      *deststr++ = 'L';
      *deststr++ = '>';
      maxlength -= 4;
    } else if (c < 0x20 || c == 0x7f) {
      *deststr++ = '^';
      *deststr++ = c ^ 0x40;
      maxlength -= 2;
    } else if (c == '%') {
      *deststr++ = '%';
      *deststr++ = '%';
      maxlength -= 2;
    } else {
      *deststr++ = c;
      maxlength--;
    }
    if (maxlength < 4) {
      *deststr++ = '$';
      *deststr = '\0';
      return (0);
    }
  }
  *deststr = '\0';
  return (1);
}


x86 assembly (clang, -O0):
<expandp>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x10(%rbp)
mov    %rsi,-0x18(%rbp)
mov    %edx,-0x1c(%rbp)
mov    -0x10(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x10(%rbp)
mov    (%rax),%al
mov    %al,-0x1d(%rbp)
movzbl %al,%eax
cmp    $0x0,%eax
je     1280 <expandp+0x180>
movzbl -0x1d(%rbp),%eax
cmp    $0xd,%eax
jne    1192 <expandp+0x92>
mov    -0x18(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x18(%rbp)
movb   $0x3c,(%rax)
mov    -0x18(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x18(%rbp)
movb   $0x4e,(%rax)
mov    -0x18(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x18(%rbp)
movb   $0x4c,(%rax)
mov    -0x18(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x18(%rbp)
movb   $0x3e,(%rax)
mov    -0x1c(%rbp),%eax
sub    $0x4,%eax
mov    %eax,-0x1c(%rbp)
jmp    124c <expandp+0x14c>
movzbl -0x1d(%rbp),%eax
cmp    $0x20,%eax
jl     11ac <expandp+0xac>
movzbl -0x1d(%rbp),%eax
cmp    $0x7f,%eax
jne    11e6 <expandp+0xe6>
mov    -0x18(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x18(%rbp)
movb   $0x5e,(%rax)
movzbl -0x1d(%rbp),%eax
xor    $0x40,%eax
mov    %al,%cl
mov    -0x18(%rbp),%rax
mov    %rax,%rdx
add    $0x1,%rdx
mov    %rdx,-0x18(%rbp)
mov    %cl,(%rax)
mov    -0x1c(%rbp),%eax
sub    $0x2,%eax
mov    %eax,-0x1c(%rbp)
jmp    1247 <expandp+0x147>
movzbl -0x1d(%rbp),%eax
cmp    $0x25,%eax
jne    1225 <expandp+0x125>
mov    -0x18(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x18(%rbp)
movb   $0x25,(%rax)
mov    -0x18(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x18(%rbp)
movb   $0x25,(%rax)
mov    -0x1c(%rbp),%eax
sub    $0x2,%eax
mov    %eax,-0x1c(%rbp)
jmp    1242 <expandp+0x142>
mov    -0x1d(%rbp),%cl
mov    -0x18(%rbp),%rax
mov    %rax,%rdx
add    $0x1,%rdx
mov    %rdx,-0x18(%rbp)
mov    %cl,(%rax)
mov    -0x1c(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x1c(%rbp)
jmp    1247 <expandp+0x147>
jmp    124c <expandp+0x14c>
cmpl   $0x4,-0x1c(%rbp)
jge    127b <expandp+0x17b>
mov    -0x18(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x18(%rbp)
movb   $0x24,(%rax)
mov    -0x18(%rbp),%rax
movb   $0x0,(%rax)
movl   $0x0,-0x4(%rbp)
jmp    128e <expandp+0x18e>
jmp    110f <expandp+0xf>
mov    -0x18(%rbp),%rax
movb   $0x0,(%rax)
movl   $0x1,-0x4(%rbp)
mov    -0x4(%rbp),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<expandp>:
jmp    112a <expandp+0x2a>
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax)
movl   $0x3e4c4e3c,(%rsi)
add    $0x4,%rsi
mov    $0xfffffffc,%eax
add    %eax,%edx
add    $0x1,%rdi
cmp    $0x3,%edx
jle    1170 <expandp+0x70>
movzbl (%rdi),%eax
cmp    $0xd,%al
je     1110 <expandp+0x10>
test   %al,%al
je     117d <expandp+0x7d>
cmp    $0x20,%al
jb     1150 <expandp+0x50>
cmp    $0x7f,%al
je     1150 <expandp+0x50>
cmp    $0x25,%al
jne    1163 <expandp+0x63>
movw   $0x2525,(%rsi)
jmp    1158 <expandp+0x58>
nopl   0x0(%rax,%rax,1)
movb   $0x5e,(%rsi)
xor    $0x40,%al
mov    %al,0x1(%rsi)
add    $0x2,%rsi
mov    $0xfffffffe,%eax
jmp    111f <expandp+0x1f>
mov    %al,(%rsi)
add    $0x1,%rsi
mov    $0xffffffff,%eax
jmp    111f <expandp+0x1f>
movb   $0x24,(%rsi)
add    $0x1,%rsi
xor    %eax,%eax
movb   $0x0,(%rsi)
ret
mov    $0x1,%eax
movb   $0x0,(%rsi)
ret

LLVM IR (-O0):
define i32 @expandp(i8* %0, i8* %1, i32 %2) {
%4 = alloca i32
%5 = alloca i8*
%6 = alloca i8*
%7 = alloca i32
%8 = alloca i8
store i8* %0, i8** %5
store i8* %1, i8** %6
store i32 %2, i32* %7
br label %9
9: ; preds = %75, %3
%10 = load i8*, i8** %5
%11 = getelementptr inbounds i8, i8* %10, i32 1
store i8* %11, i8** %5
%12 = load i8, i8* %10
store i8 %12, i8* %8
%13 = zext i8 %12 to i32
%14 = icmp ne i32 %13, 0
br i1 %14, label %15, label %76
15: ; preds = %9
%16 = load i8, i8* %8
%17 = zext i8 %16 to i32
%18 = icmp eq i32 %17, 13
br i1 %18, label %19, label %30
19: ; preds = %15
%20 = load i8*, i8** %6
%21 = getelementptr inbounds i8, i8* %20, i32 1
store i8* %21, i8** %6
store i8 60, i8* %20
%22 = load i8*, i8** %6
%23 = getelementptr inbounds i8, i8* %22, i32 1
store i8* %23, i8** %6
store i8 78, i8* %22
%24 = load i8*, i8** %6
%25 = getelementptr inbounds i8, i8* %24, i32 1
store i8* %25, i8** %6
store i8 76, i8* %24
%26 = load i8*, i8** %6
%27 = getelementptr inbounds i8, i8* %26, i32 1
store i8* %27, i8** %6
store i8 62, i8* %26
%28 = load i32, i32* %7
%29 = sub nsw i32 %28, 4
store i32 %29, i32* %7
br label %68
30: ; preds = %15
%31 = load i8, i8* %8
%32 = zext i8 %31 to i32
%33 = icmp slt i32 %32, 32
br i1 %33, label %38, label %34
34: ; preds = %30
%35 = load i8, i8* %8
%36 = zext i8 %35 to i32
%37 = icmp eq i32 %36, 127
br i1 %37, label %38, label %49
38: ; preds = %34, %30
%39 = load i8*, i8** %6
%40 = getelementptr inbounds i8, i8* %39, i32 1
store i8* %40, i8** %6
store i8 94, i8* %39
%41 = load i8, i8* %8
%42 = zext i8 %41 to i32
%43 = xor i32 %42, 64
%44 = trunc i32 %43 to i8
%45 = load i8*, i8** %6
%46 = getelementptr inbounds i8, i8* %45, i32 1
store i8* %46, i8** %6
store i8 %44, i8* %45
%47 = load i32, i32* %7
%48 = sub nsw i32 %47, 2
store i32 %48, i32* %7
br label %67
49: ; preds = %34
%50 = load i8, i8* %8
%51 = zext i8 %50 to i32
%52 = icmp eq i32 %51, 37
br i1 %52, label %53, label %60
53: ; preds = %49
%54 = load i8*, i8** %6
%55 = getelementptr inbounds i8, i8* %54, i32 1
store i8* %55, i8** %6
store i8 37, i8* %54
%56 = load i8*, i8** %6
%57 = getelementptr inbounds i8, i8* %56, i32 1
store i8* %57, i8** %6
store i8 37, i8* %56
%58 = load i32, i32* %7
%59 = sub nsw i32 %58, 2
store i32 %59, i32* %7
br label %66
60: ; preds = %49
%61 = load i8, i8* %8
%62 = load i8*, i8** %6
%63 = getelementptr inbounds i8, i8* %62, i32 1
store i8* %63, i8** %6
store i8 %61, i8* %62
%64 = load i32, i32* %7
%65 = add nsw i32 %64, -1
store i32 %65, i32* %7
br label %66
66: ; preds = %60, %53
br label %67
67: ; preds = %66, %38
br label %68
68: ; preds = %67, %19
%69 = load i32, i32* %7
%70 = icmp slt i32 %69, 4
br i1 %70, label %71, label %75
71: ; preds = %68
%72 = load i8*, i8** %6
%73 = getelementptr inbounds i8, i8* %72, i32 1
store i8* %73, i8** %6
store i8 36, i8* %72
%74 = load i8*, i8** %6
store i8 0, i8* %74
store i32 0, i32* %4
br label %78
75: ; preds = %68
br label %9
76: ; preds = %9
%77 = load i8*, i8** %6
store i8 0, i8* %77
store i32 1, i32* %4
br label %78
78: ; preds = %76, %71
%79 = load i32, i32* %4
ret i32 %79
}

LLVM IR (-O2):
define i32 @expandp(i8* nocapture %0, i8* nocapture writeonly %1, i32 %2) {
br label %4
4: ; preds = %29, %3
%5 = phi i8* [ %0, %3 ], [ %8, %29 ]
%6 = phi i8* [ %1, %3 ], [ %31, %29 ]
%7 = phi i32 [ %2, %3 ], [ %32, %29 ]
%8 = getelementptr inbounds i8, i8* %5, i64 1
%9 = load i8, i8* %5
switch i8 %9, label %15 [
i8 0, label %36
i8 13, label %10
]
10: ; preds = %4
%11 = getelementptr inbounds i8, i8* %6, i64 1
store i8 60, i8* %6
%12 = getelementptr inbounds i8, i8* %6, i64 2
store i8 78, i8* %11
%13 = getelementptr inbounds i8, i8* %6, i64 3
store i8 76, i8* %12
%14 = getelementptr inbounds i8, i8* %6, i64 4
store i8 62, i8* %13
br label %29
15: ; preds = %4
%16 = icmp ult i8 %9, 32
%17 = icmp eq i8 %9, 127
%18 = or i1 %16, %17
br i1 %18, label %19, label %23
19: ; preds = %15
%20 = getelementptr inbounds i8, i8* %6, i64 1
store i8 94, i8* %6
%21 = xor i8 %9, 64
%22 = getelementptr inbounds i8, i8* %6, i64 2
store i8 %21, i8* %20
br label %29
23: ; preds = %15
%24 = icmp eq i8 %9, 37
%25 = getelementptr inbounds i8, i8* %6, i64 1
br i1 %24, label %26, label %28
26: ; preds = %23
store i8 37, i8* %6
%27 = getelementptr inbounds i8, i8* %6, i64 2
store i8 37, i8* %25
br label %29
28: ; preds = %23
store i8 %9, i8* %6
br label %29
29: ; preds = %19, %28, %26, %10
%30 = phi i32 [ -2, %19 ], [ -1, %28 ], [ -2, %26 ], [ -4, %10 ]
%31 = phi i8* [ %22, %19 ], [ %25, %28 ], [ %27, %26 ], [ %14, %10 ]
%32 = add nsw i32 %7, %30
%33 = icmp slt i32 %32, 4
br i1 %33, label %34, label %4
34: ; preds = %29
%35 = getelementptr inbounds i8, i8* %31, i64 1
store i8 36, i8* %31
br label %36
36: ; preds = %4, %34
%37 = phi i8* [ %35, %34 ], [ %6, %4 ]
%38 = phi i32 [ 0, %34 ], [ 1, %4 ]
store i8 0, i8* %37
ret i32 %38
}