int unparse_string(from, to)
char *from;
char *to;
{
  char *x = to;
  for (; *from; from++)
    switch (*from) {
    case '\b':
      *x++ = '\\';
      *x++ = 'b';
      continue;
    case '\f':
      *x++ = '\\';
      *x++ = 'f';
      continue;
    case '\n':
      *x++ = '\\';
      *x++ = 'n';
      continue;
    case '\r':
      *x++ = '\\';
      *x++ = 'r';
      continue;
    case '\t':
      *x++ = '\\';
      *x++ = 't';
      continue;
    case '\\':
      *x++ = '\\';
      *x++ = '\\';
      continue;
    case '"':
      *x++ = '\\';
      *x++ = '"';
      continue;
    case '^':
      *x++ = '\\';
      *x++ = '^';
      continue;
    default:
      if (isascii(*from))
        if (iscntrl(*from)) {
          sprintf(x, "^%c", *from == '\177' ? '?' : *from + '@');
          x += 2;
        } else
          *x++ = *from;
      else {
        sprintf(x, "\\%03o", *from);
        x += 4;
      }
      continue;
    }
  *x = '\0';
  return (x - to);
}


x86 assembly (clang, -O0):
<unparse_string>:
push   %rbp
mov    %rsp,%rbp
sub    $0x30,%rsp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    -0x10(%rbp),%rax
mov    %rax,-0x18(%rbp)
mov    -0x8(%rbp),%rax
cmpb   $0x0,(%rax)
je     1407 <unparse_string+0x2d7>
mov    -0x8(%rbp),%rax
movsbl (%rax),%eax
mov    %eax,-0x1c(%rbp)
sub    $0x8,%eax
je     11e4 <unparse_string+0xb4>
jmp    116d <unparse_string+0x3d>
mov    -0x1c(%rbp),%eax
sub    $0x9,%eax
je     1288 <unparse_string+0x158>
jmp    117e <unparse_string+0x4e>
mov    -0x1c(%rbp),%eax
sub    $0xa,%eax
je     1236 <unparse_string+0x106>
jmp    118f <unparse_string+0x5f>
mov    -0x1c(%rbp),%eax
sub    $0xc,%eax
je     120d <unparse_string+0xdd>
jmp    11a0 <unparse_string+0x70>
mov    -0x1c(%rbp),%eax
sub    $0xd,%eax
je     125f <unparse_string+0x12f>
jmp    11b1 <unparse_string+0x81>
mov    -0x1c(%rbp),%eax
sub    $0x22,%eax
je     12da <unparse_string+0x1aa>
jmp    11c2 <unparse_string+0x92>
mov    -0x1c(%rbp),%eax
sub    $0x5c,%eax
je     12b1 <unparse_string+0x181>
jmp    11d3 <unparse_string+0xa3>
mov    -0x1c(%rbp),%eax
sub    $0x5e,%eax
je     1303 <unparse_string+0x1d3>
jmp    132c <unparse_string+0x1fc>
mov    -0x18(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x18(%rbp)
movb   $0x5c,(%rax)
mov    -0x18(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x18(%rbp)
movb   $0x62,(%rax)
jmp    13f6 <unparse_string+0x2c6>
mov    -0x18(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x18(%rbp)
movb   $0x5c,(%rax)
mov    -0x18(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x18(%rbp)
movb   $0x66,(%rax)
jmp    13f6 <unparse_string+0x2c6>
mov    -0x18(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x18(%rbp)
movb   $0x5c,(%rax)
mov    -0x18(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x18(%rbp)
movb   $0x6e,(%rax)
jmp    13f6 <unparse_string+0x2c6>
mov    -0x18(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x18(%rbp)
movb   $0x5c,(%rax)
mov    -0x18(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x18(%rbp)
movb   $0x72,(%rax)
jmp    13f6 <unparse_string+0x2c6>
mov    -0x18(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x18(%rbp)
movb   $0x5c,(%rax)
mov    -0x18(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x18(%rbp)
movb   $0x74,(%rax)
jmp    13f6 <unparse_string+0x2c6>
mov    -0x18(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x18(%rbp)
movb   $0x5c,(%rax)
mov    -0x18(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x18(%rbp)
movb   $0x5c,(%rax)
jmp    13f6 <unparse_string+0x2c6>
mov    -0x18(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x18(%rbp)
movb   $0x5c,(%rax)
mov    -0x18(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x18(%rbp)
movb   $0x22,(%rax)
jmp    13f6 <unparse_string+0x2c6>
mov    -0x18(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x18(%rbp)
movb   $0x5c,(%rax)
mov    -0x18(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x18(%rbp)
movb   $0x5e,(%rax)
jmp    13f6 <unparse_string+0x2c6>
mov    -0x8(%rbp),%rax
movsbl (%rax),%edi
mov    $0x0,%al
call   1050 <isascii@plt>
cmp    $0x0,%eax
je     13cc <unparse_string+0x29c>
mov    -0x8(%rbp),%rax
movsbl (%rax),%edi
call   1030 <iscntrl@plt>
cmp    $0x0,%eax
je     13b0 <unparse_string+0x280>
mov    -0x18(%rbp),%rax
mov    %rax,-0x28(%rbp)
mov    -0x8(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x7f,%eax
jne    137d <unparse_string+0x24d>
mov    $0x3f,%eax
mov    %eax,-0x2c(%rbp)
jmp    138a <unparse_string+0x25a>
mov    -0x8(%rbp),%rax
movsbl (%rax),%eax
add    $0x40,%eax
mov    %eax,-0x2c(%rbp)
mov    -0x28(%rbp),%rdi
mov    -0x2c(%rbp),%edx
lea    0xc68(%rip),%rsi
mov    $0x0,%al
call   1040 <sprintf@plt>
mov    -0x18(%rbp),%rax
add    $0x2,%rax
mov    %rax,-0x18(%rbp)
jmp    13c7 <unparse_string+0x297>
mov    -0x8(%rbp),%rax
mov    (%rax),%cl
mov    -0x18(%rbp),%rax
mov    %rax,%rdx
add    $0x1,%rdx
mov    %rdx,-0x18(%rbp)
mov    %cl,(%rax)
jmp    13f1 <unparse_string+0x2c1>
mov    -0x18(%rbp),%rdi
mov    -0x8(%rbp),%rax
movsbl (%rax),%edx
lea    0xc26(%rip),%rsi
mov    $0x0,%al
call   1040 <sprintf@plt>
mov    -0x18(%rbp),%rax
add    $0x4,%rax
mov    %rax,-0x18(%rbp)
jmp    13f6 <unparse_string+0x2c6>
mov    -0x8(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x8(%rbp)
jmp    1148 <unparse_string+0x18>
mov    -0x18(%rbp),%rax
movb   $0x0,(%rax)
mov    -0x18(%rbp),%rax
mov    -0x10(%rbp),%rcx
sub    %rcx,%rax
add    $0x30,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<unparse_string>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
push   %rax
mov    %rsi,%r14
mov    (%rdi),%al
mov    %rsi,%r15
test   %al,%al
je     1255 <unparse_string+0x125>
mov    %rdi,%rbx
add    $0x1,%rbx
lea    0xea7(%rip),%r12
mov    %r14,%r15
jmp    1183 <unparse_string+0x53>
movw   $0x225c,(%r15)
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
add    $0x2,%r15
movzbl (%rbx),%eax
add    $0x1,%rbx
test   %al,%al
je     1255 <unparse_string+0x125>
movsbl %al,%edi
lea    -0x8(%rdi),%eax
cmp    $0x1a,%eax
ja     11a0 <unparse_string+0x70>
movslq (%r12,%rax,4),%rax
add    %r12,%rax
jmp    *%rax
movw   $0x625c,(%r15)
jmp    1170 <unparse_string+0x40>
nop
cmp    $0x5c,%edi
je     1222 <unparse_string+0xf2>
cmp    $0x5e,%edi
jne    11b2 <unparse_string+0x82>
movw   $0x5e5c,(%r15)
jmp    1170 <unparse_string+0x40>
xor    %eax,%eax
call   1050 <isascii@plt>
movzbl -0x1(%rbx),%r13d
movsbl %r13b,%ebp
test   %eax,%eax
je     122d <unparse_string+0xfd>
mov    %ebp,%edi
call   1030 <iscntrl@plt>
test   %eax,%eax
je     1249 <unparse_string+0x119>
lea    0x40(%rbp),%edx
cmp    $0x7f,%bpl
mov    $0x3f,%eax
cmove  %eax,%edx
mov    %r15,%rdi
lea    0xe82(%rip),%rsi
xor    %eax,%eax
call   1040 <sprintf@plt>
jmp    1170 <unparse_string+0x40>
movw   $0x745c,(%r15)
jmp    1170 <unparse_string+0x40>
movw   $0x6e5c,(%r15)
jmp    1170 <unparse_string+0x40>
movw   $0x665c,(%r15)
jmp    1170 <unparse_string+0x40>
movw   $0x725c,(%r15)
jmp    1170 <unparse_string+0x40>
movw   $0x5c5c,(%r15)
jmp    1170 <unparse_string+0x40>
mov    %r15,%rdi
lea    0xe39(%rip),%rsi
mov    %ebp,%edx
xor    %eax,%eax
call   1040 <sprintf@plt>
add    $0x4,%r15
jmp    1174 <unparse_string+0x44>
mov    %r13b,(%r15)
add    $0x1,%r15
jmp    1174 <unparse_string+0x44>
movb   $0x0,(%r15)
sub    %r14d,%r15d
mov    %r15d,%eax
add    $0x8,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
@.str = [4 x i8] c"^%c\00"
@.str.1 = [6 x i8] c"\\%03o\00"
define i32 @unparse_string(i8* %0, i8* %1) {
%3 = alloca i8*
%4 = alloca i8*
%5 = alloca i8*
store i8* %0, i8** %3
store i8* %1, i8** %4
%6 = load i8*, i8** %4
store i8* %6, i8** %5
br label %7
7: ; preds = %99, %2
%8 = load i8*, i8** %3
%9 = load i8, i8* %8
%10 = icmp ne i8 %9, 0
br i1 %10, label %11, label %102
11: ; preds = %7
%12 = load i8*, i8** %3
%13 = load i8, i8* %12
%14 = sext i8 %13 to i32
switch i32 %14, label %55 [
i32 8, label %15
i32 12, label %20
i32 10, label %25
i32 13, label %30
i32 9, label %35
i32 92, label %40
i32 34, label %45
i32 94, label %50
]
15: ; preds = %11
%16 = load i8*, i8** %5
%17 = getelementptr inbounds i8, i8* %16, i32 1
store i8* %17, i8** %5
store i8 92, i8* %16
%18 = load i8*, i8** %5
%19 = getelementptr inbounds i8, i8* %18, i32 1
store i8* %19, i8** %5
store i8 98, i8* %18
br label %99
20: ; preds = %11
%21 = load i8*, i8** %5
%22 = getelementptr inbounds i8, i8* %21, i32 1
store i8* %22, i8** %5
store i8 92, i8* %21
%23 = load i8*, i8** %5
%24 = getelementptr inbounds i8, i8* %23, i32 1
store i8* %24, i8** %5
store i8 102, i8* %23
br label %99
25: ; preds = %11
%26 = load i8*, i8** %5
%27 = getelementptr inbounds i8, i8* %26, i32 1
store i8* %27, i8** %5
store i8 92, i8* %26
%28 = load i8*, i8** %5
%29 = getelementptr inbounds i8, i8* %28, i32 1
store i8* %29, i8** %5
store i8 110, i8* %28
br label %99
30: ; preds = %11
%31 = load i8*, i8** %5
%32 = getelementptr inbounds i8, i8* %31, i32 1
store i8* %32, i8** %5
store i8 92, i8* %31
%33 = load i8*, i8** %5
%34 = getelementptr inbounds i8, i8* %33, i32 1
store i8* %34, i8** %5
store i8 114, i8* %33
br label %99
35: ; preds = %11
%36 = load i8*, i8** %5
%37 = getelementptr inbounds i8, i8* %36, i32 1
store i8* %37, i8** %5
store i8 92, i8* %36
%38 = load i8*, i8** %5
%39 = getelementptr inbounds i8, i8* %38, i32 1
store i8* %39, i8** %5
store i8 116, i8* %38
br label %99
40: ; preds = %11
%41 = load i8*, i8** %5
%42 = getelementptr inbounds i8, i8* %41, i32 1
store i8* %42, i8** %5
store i8 92, i8* %41
%43 = load i8*, i8** %5
%44 = getelementptr inbounds i8, i8* %43, i32 1
store i8* %44, i8** %5
store i8 92, i8* %43
br label %99
45: ; preds = %11
%46 = load i8*, i8** %5
%47 = getelementptr inbounds i8, i8* %46, i32 1
store i8* %47, i8** %5
store i8 92, i8* %46
%48 = load i8*, i8** %5
%49 = getelementptr inbounds i8, i8* %48, i32 1
store i8* %49, i8** %5
store i8 34, i8* %48
br label %99
50: ; preds = %11
%51 = load i8*, i8** %5
%52 = getelementptr inbounds i8, i8* %51, i32 1
store i8* %52, i8** %5
store i8 92, i8* %51
%53 = load i8*, i8** %5
%54 = getelementptr inbounds i8, i8* %53, i32 1
store i8* %54, i8** %5
store i8 94, i8* %53
br label %99
55: ; preds = %11
%56 = load i8*, i8** %3
%57 = load i8, i8* %56
%58 = sext i8 %57 to i32
%59 = call i32 (i32, ...) bitcast (i32 (...)* @isascii to i32 (i32, ...)*)(i32 %58)
%60 = icmp ne i32 %59, 0
br i1 %60, label %61, label %90
61: ; preds = %55
%62 = load i8*, i8** %3
%63 = load i8, i8* %62
%64 = sext i8 %63 to i32
%65 = call i32 @iscntrl(i32 %64)
%66 = icmp ne i32 %65, 0
br i1 %66, label %67, label %84
67: ; preds = %61
%68 = load i8*, i8** %5
%69 = load i8*, i8** %3
%70 = load i8, i8* %69
%71 = sext i8 %70 to i32
%72 = icmp eq i32 %71, 127
br i1 %72, label %73, label %74
73: ; preds = %67
br label %79
74: ; preds = %67
%75 = load i8*, i8** %3
%76 = load i8, i8* %75
%77 = sext i8 %76 to i32
%78 = add nsw i32 %77, 64
br label %79
79: ; preds = %74, %73
%80 = phi i32 [ 63, %73 ], [ %78, %74 ]
%81 = call i32 (i8*, i8*, ...) @sprintf(i8* %68, i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str, i64 0, i64 0), i32 %80)
%82 = load i8*, i8** %5
%83 = getelementptr inbounds i8, i8* %82, i64 2
store i8* %83, i8** %5
br label %89
84: ; preds = %61
%85 = load i8*, i8** %3
%86 = load i8, i8* %85
%87 = load i8*, i8** %5
%88 = getelementptr inbounds i8, i8* %87, i32 1
store i8* %88, i8** %5
store i8 %86, i8* %87
br label %89
89: ; preds = %84, %79
br label %98
90: ; preds = %55
%91 = load i8*, i8** %5
%92 = load i8*, i8** %3
%93 = load i8, i8* %92
%94 = sext i8 %93 to i32
%95 = call i32 (i8*, i8*, ...) @sprintf(i8* %91, i8* getelementptr inbounds ([6 x i8], [6 x i8]* @.str.1, i64 0, i64 0), i32 %94)
%96 = load i8*, i8** %5
%97 = getelementptr inbounds i8, i8* %96, i64 4
store i8* %97, i8** %5
br label %98
98: ; preds = %90, %89
br label %99
99: ; preds = %98, %50, %45, %40, %35, %30, %25, %20, %15
%100 = load i8*, i8** %3
%101 = getelementptr inbounds i8, i8* %100, i32 1
store i8* %101, i8** %3
br label %7
102: ; preds = %7
%103 = load i8*, i8** %5
store i8 0, i8* %103
%104 = load i8*, i8** %5
%105 = load i8*, i8** %4
%106 = ptrtoint i8* %104 to i64
%107 = ptrtoint i8* %105 to i64
%108 = sub i64 %106, %107
%109 = trunc i64 %108 to i32
ret i32 %109
}

LLVM IR (-O2):
@.str = [4 x i8] c"^%c\00"
@.str.1 = [6 x i8] c"\\%03o\00"
define i32 @unparse_string(i8* nocapture %0, i8* %1) {
%3 = load i8, i8* %0
%4 = icmp eq i8 %3, 0
br i1 %4, label %58, label %5
5: ; preds = %2, %53
%6 = phi i8 [ %56, %53 ], [ %3, %2 ]
%7 = phi i8* [ %54, %53 ], [ %1, %2 ]
%8 = phi i8* [ %55, %53 ], [ %0, %2 ]
%9 = sext i8 %6 to i32
switch i32 %9, label %34 [
i32 8, label %10
i32 12, label %13
i32 10, label %16
i32 13, label %19
i32 9, label %22
i32 92, label %25
i32 34, label %28
i32 94, label %31
]
10: ; preds = %5
%11 = getelementptr inbounds i8, i8* %7, i64 1
store i8 92, i8* %7
%12 = getelementptr inbounds i8, i8* %7, i64 2
store i8 98, i8* %11
br label %53
13: ; preds = %5
%14 = getelementptr inbounds i8, i8* %7, i64 1
store i8 92, i8* %7
%15 = getelementptr inbounds i8, i8* %7, i64 2
store i8 102, i8* %14
br label %53
16: ; preds = %5
%17 = getelementptr inbounds i8, i8* %7, i64 1
store i8 92, i8* %7
%18 = getelementptr inbounds i8, i8* %7, i64 2
store i8 110, i8* %17
br label %53
19: ; preds = %5
%20 = getelementptr inbounds i8, i8* %7, i64 1
store i8 92, i8* %7
%21 = getelementptr inbounds i8, i8* %7, i64 2
store i8 114, i8* %20
br label %53
22: ; preds = %5
%23 = getelementptr inbounds i8, i8* %7, i64 1
store i8 92, i8* %7
%24 = getelementptr inbounds i8, i8* %7, i64 2
store i8 116, i8* %23
br label %53
25: ; preds = %5
%26 = getelementptr inbounds i8, i8* %7, i64 1
store i8 92, i8* %7
%27 = getelementptr inbounds i8, i8* %7, i64 2
store i8 92, i8* %26
br label %53
28: ; preds = %5
%29 = getelementptr inbounds i8, i8* %7, i64 1
store i8 92, i8* %7
%30 = getelementptr inbounds i8, i8* %7, i64 2
store i8 34, i8* %29
br label %53
31: ; preds = %5
%32 = getelementptr inbounds i8, i8* %7, i64 1
store i8 92, i8* %7
%33 = getelementptr inbounds i8, i8* %7, i64 2
store i8 94, i8* %32
br label %53
34: ; preds = %5
%35 = tail call i32 (i32, ...) bitcast (i32 (...)* @isascii to i32 (i32, ...)*)(i32 %9)
%36 = icmp eq i32 %35, 0
%37 = load i8, i8* %8
%38 = sext i8 %37 to i32
br i1 %36, label %50, label %39
39: ; preds = %34
%40 = tail call i32 @iscntrl(i32 %38)
%41 = icmp eq i32 %40, 0
br i1 %41, label %48, label %42
42: ; preds = %39
%43 = icmp eq i8 %37, 127
%44 = add nsw i32 %38, 64
%45 = select i1 %43, i32 63, i32 %44
%46 = tail call i32 (i8*, i8*, ...) @sprintf(i8* dereferenceable(1) %7, i8* dereferenceable(1) getelementptr inbounds ([4 x i8], [4 x i8]* @.str, i64 0, i64 0), i32 %45)
%47 = getelementptr inbounds i8, i8* %7, i64 2
br label %53
48: ; preds = %39
%49 = getelementptr inbounds i8, i8* %7, i64 1
store i8 %37, i8* %7
br label %53
50: ; preds = %34
%51 = tail call i32 (i8*, i8*, ...) @sprintf(i8* dereferenceable(1) %7, i8* dereferenceable(1) getelementptr inbounds ([6 x i8], [6 x i8]* @.str.1, i64 0, i64 0), i32 %38)
%52 = getelementptr inbounds i8, i8* %7, i64 4
br label %53
53: ; preds = %50, %48, %42, %31, %28, %25, %22, %19, %16, %13, %10
%54 = phi i8* [ %47, %42 ], [ %49, %48 ], [ %52, %50 ], [ %33, %31 ], [ %30, %28 ], [ %27, %25 ], [ %24, %22 ], [ %21, %19 ], [ %18, %16 ], [ %15, %13 ], [ %12, %10 ]
%55 = getelementptr inbounds i8, i8* %8, i64 1
%56 = load i8, i8* %55
%57 = icmp eq i8 %56, 0
br i1 %57, label %58, label %5
58: ; preds = %53, %2
%59 = phi i8* [ %1, %2 ], [ %54, %53 ]
store i8 0, i8* %59
%60 = ptrtoint i8* %59 to i64
%61 = ptrtoint i8* %1 to i64
%62 = sub i64 %60, %61
%63 = trunc i64 %62 to i32
ret i32 %63
}