unsigned long un_rl(const char *pdata, char *data, unsigned long plen) {
  unsigned long i = 0;
  char val, rl;
  while (i < plen) {
    val = *pdata++;
    if (val < 0) {
      rl = 1 - val;
      val = *pdata++;
      i++;
      do {
        *data++ = val;
      } while (--rl);
    } else {
      rl = val + 1;
      do {
        *data++ = *pdata++;
        i++;
      } while (--rl);
    }
    i++;
  }
  return 0;
}


x86 assembly (clang, -O0):
<un_rl>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
movq   $0x0,-0x20(%rbp)
mov    -0x20(%rbp),%rax
cmp    -0x18(%rbp),%rax
jae    11fc <un_rl+0xfc>
mov    -0x8(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x8(%rbp)
mov    (%rax),%al
mov    %al,-0x21(%rbp)
movsbl -0x21(%rbp),%eax
cmp    $0x0,%eax
jge    119e <un_rl+0x9e>
movsbl -0x21(%rbp),%ecx
mov    $0x1,%eax
sub    %ecx,%eax
mov    %al,-0x22(%rbp)
mov    -0x8(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x8(%rbp)
mov    (%rax),%al
mov    %al,-0x21(%rbp)
mov    -0x20(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x20(%rbp)
mov    -0x21(%rbp),%cl
mov    -0x10(%rbp),%rax
mov    %rax,%rdx
add    $0x1,%rdx
mov    %rdx,-0x10(%rbp)
mov    %cl,(%rax)
mov    -0x22(%rbp),%al
add    $0xff,%al
mov    %al,-0x22(%rbp)
cmp    $0x0,%al
jne    1175 <un_rl+0x75>
jmp    11eb <un_rl+0xeb>
movsbl -0x21(%rbp),%eax
add    $0x1,%eax
mov    %al,-0x22(%rbp)
mov    -0x8(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x8(%rbp)
mov    (%rax),%cl
mov    -0x10(%rbp),%rax
mov    %rax,%rdx
add    $0x1,%rdx
mov    %rdx,-0x10(%rbp)
mov    %cl,(%rax)
mov    -0x20(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x20(%rbp)
mov    -0x22(%rbp),%al
add    $0xff,%al
mov    %al,-0x22(%rbp)
cmp    $0x0,%al
jne    11a8 <un_rl+0xa8>
jmp    11eb <un_rl+0xeb>
mov    -0x20(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x20(%rbp)
jmp    1118 <un_rl+0x18>
xor    %eax,%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<un_rl>:
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
test   %rdx,%rdx
je     12c2 <un_rl+0x1b2>
mov    %rdx,%r14
mov    %rsi,%rbx
mov    %rdi,%r15
xor    %r12d,%r12d
jmp    1164 <un_rl+0x54>
neg    %r9b
movzbl %r9b,%r13d
lea    0x1(%r13),%rdx
movzbl 0x1(%r15),%esi
mov    %rbx,%rdi
call   1030 <memset@plt>
add    $0x2,%r15
add    $0x1,%r12
add    %r13,%rbx
add    $0x1,%rbx
add    $0x1,%r12
cmp    %r14,%r12
jae    12c2 <un_rl+0x1b2>
movzbl (%r15),%r9d
test   %r9b,%r9b
js     1130 <un_rl+0x20>
lea    0x1(%r15),%rcx
lea    0x1(%r9),%edx
cmp    $0x1f,%r9b
jb     1210 <un_rl+0x100>
lea    (%r15,%r9,1),%rsi
add    $0x2,%rsi
cmp    %rsi,%rbx
jae    1199 <un_rl+0x89>
lea    (%rbx,%r9,1),%rsi
add    $0x1,%rsi
cmp    %rsi,%rcx
jb     1210 <un_rl+0x100>
lea    0x1(%r9),%rdi
mov    %edi,%esi
and    $0xffffffe0,%esi
movups 0x1(%r15),%xmm0
movups 0x11(%r15),%xmm1
movups %xmm0,(%rbx)
movups %xmm1,0x10(%rbx)
cmp    $0x20,%rsi
je     11f9 <un_rl+0xe9>
movups 0x21(%r15),%xmm0
movups 0x31(%r15),%xmm1
movups %xmm0,0x20(%rbx)
movups %xmm1,0x30(%rbx)
cmp    $0x40,%esi
je     11f9 <un_rl+0xe9>
movups 0x41(%r15),%xmm0
movups 0x51(%r15),%xmm1
movups %xmm0,0x40(%rbx)
movups %xmm1,0x50(%rbx)
cmp    $0x60,%esi
je     11f9 <un_rl+0xe9>
movups 0x61(%r15),%xmm0
movups 0x71(%r15),%xmm1
movups %xmm0,0x60(%rbx)
movups %xmm1,0x70(%rbx)
add    %rsi,%rbx
add    %rsi,%rcx
cmp    %rsi,%rdi
je     12b3 <un_rl+0x1a3>
sub    %sil,%dl
nopl   0x0(%rax,%rax,1)
lea    -0x1(%rdx),%r8d
test   $0x7,%dl
je     1260 <un_rl+0x150>
movzbl %dl,%edx
mov    %edx,%esi
and    $0x7,%esi
xor    %edi,%edi
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
movzbl (%rcx,%rdi,1),%eax
mov    %al,(%rbx,%rdi,1)
add    $0x1,%rdi
cmp    %dil,%sil
jne    1230 <un_rl+0x120>
add    %rdi,%rbx
add    %rdi,%rcx
sub    %edi,%edx
mov    %rcx,%r15
cmp    $0x7,%r8b
jae    1270 <un_rl+0x160>
jmp    12b6 <un_rl+0x1a6>
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
cmp    $0x7,%r8b
jb     12b6 <un_rl+0x1a6>
cs nopw 0x0(%rax,%rax,1)
movzbl (%rcx),%eax
mov    %al,(%rbx)
movzbl 0x1(%rcx),%eax
mov    %al,0x1(%rbx)
movzbl 0x2(%rcx),%eax
mov    %al,0x2(%rbx)
movzbl 0x3(%rcx),%eax
mov    %al,0x3(%rbx)
movzbl 0x4(%rcx),%eax
mov    %al,0x4(%rbx)
movzbl 0x5(%rcx),%eax
mov    %al,0x5(%rbx)
movzbl 0x6(%rcx),%eax
mov    %al,0x6(%rbx)
movzbl 0x7(%rcx),%eax
add    $0x8,%rcx
mov    %al,0x7(%rbx)
add    $0x8,%rbx
add    $0xf8,%dl
jne    1270 <un_rl+0x160>
mov    %rcx,%r15
add    %r9,%r12
add    $0x1,%r12
jmp    1157 <un_rl+0x47>
xor    %eax,%eax
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
ret

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

LLVM IR (-O2):
define i64 @un_rl(i8* nocapture %0, i8* nocapture writeonly %1, i64 %2) {
%4 = icmp eq i64 %2, 0
br i1 %4, label %152, label %5
5: ; preds = %3, %146
%6 = phi i64 [ %150, %146 ], [ 0, %3 ]
%7 = phi i8* [ %148, %146 ], [ %0, %3 ]
%8 = phi i8* [ %147, %146 ], [ %1, %3 ]
%9 = getelementptr i8, i8* %7, i64 1
%10 = load i8, i8* %7
%11 = icmp slt i8 %10, 0
br i1 %11, label %12, label %21
12: ; preds = %5
%13 = load i8, i8* %9
%14 = sub i8 0, %10
%15 = zext i8 %14 to i64
%16 = add nuw nsw i64 %15, 1
%17 = getelementptr inbounds i8, i8* %7, i64 2
%18 = add nuw i64 %6, 1
%19 = getelementptr i8, i8* %8, i64 1
%20 = getelementptr i8, i8* %19, i64 %15
br label %146
21: ; preds = %5
%22 = add nuw i8 %10, 1
%23 = zext i8 %10 to i64
%24 = add nuw nsw i64 %23, 1
%25 = icmp ult i8 %10, 31
br i1 %25, label %86, label %26
26: ; preds = %21
%27 = getelementptr i8, i8* %8, i64 1
%28 = getelementptr i8, i8* %27, i64 %23
%29 = getelementptr i8, i8* %7, i64 2
%30 = getelementptr i8, i8* %29, i64 %23
%31 = icmp ult i8* %8, %30
%32 = icmp ult i8* %9, %28
%33 = and i1 %31, %32
br i1 %33, label %86, label %34
34: ; preds = %26
%35 = and i64 %24, 480
%36 = getelementptr i8, i8* %8, i64 %35
%37 = getelementptr i8, i8* %9, i64 %35
%38 = trunc i64 %35 to i8
%39 = sub i8 %22, %38
%40 = bitcast i8* %9 to <16 x i8>*
%41 = load <16 x i8>, <16 x i8>* %40
%42 = getelementptr i8, i8* %7, i64 17
%43 = bitcast i8* %42 to <16 x i8>*
%44 = load <16 x i8>, <16 x i8>* %43
%45 = bitcast i8* %8 to <16 x i8>*
store <16 x i8> %41, <16 x i8>* %45
%46 = getelementptr i8, i8* %8, i64 16
%47 = bitcast i8* %46 to <16 x i8>*
store <16 x i8> %44, <16 x i8>* %47
%48 = icmp eq i64 %35, 32
br i1 %48, label %84, label %49
49: ; preds = %34
%50 = getelementptr i8, i8* %8, i64 32
%51 = getelementptr i8, i8* %7, i64 33
%52 = bitcast i8* %51 to <16 x i8>*
%53 = load <16 x i8>, <16 x i8>* %52
%54 = getelementptr i8, i8* %7, i64 49
%55 = bitcast i8* %54 to <16 x i8>*
%56 = load <16 x i8>, <16 x i8>* %55
%57 = bitcast i8* %50 to <16 x i8>*
store <16 x i8> %53, <16 x i8>* %57
%58 = getelementptr i8, i8* %8, i64 48
%59 = bitcast i8* %58 to <16 x i8>*
store <16 x i8> %56, <16 x i8>* %59
%60 = icmp eq i64 %35, 64
br i1 %60, label %84, label %61
61: ; preds = %49
%62 = getelementptr i8, i8* %8, i64 64
%63 = getelementptr i8, i8* %7, i64 65
%64 = bitcast i8* %63 to <16 x i8>*
%65 = load <16 x i8>, <16 x i8>* %64
%66 = getelementptr i8, i8* %7, i64 81
%67 = bitcast i8* %66 to <16 x i8>*
%68 = load <16 x i8>, <16 x i8>* %67
%69 = bitcast i8* %62 to <16 x i8>*
store <16 x i8> %65, <16 x i8>* %69
%70 = getelementptr i8, i8* %8, i64 80
%71 = bitcast i8* %70 to <16 x i8>*
store <16 x i8> %68, <16 x i8>* %71
%72 = icmp eq i64 %35, 96
br i1 %72, label %84, label %73
73: ; preds = %61
%74 = getelementptr i8, i8* %8, i64 96
%75 = getelementptr i8, i8* %7, i64 97
%76 = bitcast i8* %75 to <16 x i8>*
%77 = load <16 x i8>, <16 x i8>* %76
%78 = getelementptr i8, i8* %7, i64 113
%79 = bitcast i8* %78 to <16 x i8>*
%80 = load <16 x i8>, <16 x i8>* %79
%81 = bitcast i8* %74 to <16 x i8>*
store <16 x i8> %77, <16 x i8>* %81
%82 = getelementptr i8, i8* %8, i64 112
%83 = bitcast i8* %82 to <16 x i8>*
store <16 x i8> %80, <16 x i8>* %83
br label %84
84: ; preds = %73, %61, %49, %34
%85 = icmp eq i64 %24, %35
br i1 %85, label %141, label %86
86: ; preds = %26, %21, %84
%87 = phi i8* [ %8, %26 ], [ %8, %21 ], [ %36, %84 ]
%88 = phi i8* [ %9, %26 ], [ %9, %21 ], [ %37, %84 ]
%89 = phi i8 [ %22, %26 ], [ %22, %21 ], [ %39, %84 ]
%90 = add i8 %89, -1
%91 = and i8 %89, 7
%92 = icmp eq i8 %91, 0
br i1 %92, label %104, label %93
93: ; preds = %86, %93
%94 = phi i8* [ %100, %93 ], [ %87, %86 ]
%95 = phi i8* [ %98, %93 ], [ %88, %86 ]
%96 = phi i8 [ %101, %93 ], [ %89, %86 ]
%97 = phi i8 [ %102, %93 ], [ 0, %86 ]
%98 = getelementptr inbounds i8, i8* %95, i64 1
%99 = load i8, i8* %95
%100 = getelementptr inbounds i8, i8* %94, i64 1
store i8 %99, i8* %94
%101 = add i8 %96, -1
%102 = add i8 %97, 1
%103 = icmp eq i8 %102, %91
br i1 %103, label %104, label %93
104: ; preds = %93, %86
%105 = phi i8* [ undef, %86 ], [ %98, %93 ]
%106 = phi i8* [ undef, %86 ], [ %100, %93 ]
%107 = phi i8* [ %87, %86 ], [ %100, %93 ]
%108 = phi i8* [ %88, %86 ], [ %98, %93 ]
%109 = phi i8 [ %89, %86 ], [ %101, %93 ]
%110 = icmp ult i8 %90, 7
br i1 %110, label %141, label %111
111: ; preds = %104, %111
%112 = phi i8* [ %138, %111 ], [ %107, %104 ]
%113 = phi i8* [ %136, %111 ], [ %108, %104 ]
%114 = phi i8 [ %139, %111 ], [ %109, %104 ]
%115 = getelementptr inbounds i8, i8* %113, i64 1
%116 = load i8, i8* %113
%117 = getelementptr inbounds i8, i8* %112, i64 1
store i8 %116, i8* %112
%118 = getelementptr inbounds i8, i8* %113, i64 2
%119 = load i8, i8* %115
%120 = getelementptr inbounds i8, i8* %112, i64 2
store i8 %119, i8* %117
%121 = getelementptr inbounds i8, i8* %113, i64 3
%122 = load i8, i8* %118
%123 = getelementptr inbounds i8, i8* %112, i64 3
store i8 %122, i8* %120
%124 = getelementptr inbounds i8, i8* %113, i64 4
%125 = load i8, i8* %121
%126 = getelementptr inbounds i8, i8* %112, i64 4
store i8 %125, i8* %123
%127 = getelementptr inbounds i8, i8* %113, i64 5
%128 = load i8, i8* %124
%129 = getelementptr inbounds i8, i8* %112, i64 5
store i8 %128, i8* %126
%130 = getelementptr inbounds i8, i8* %113, i64 6
%131 = load i8, i8* %127
%132 = getelementptr inbounds i8, i8* %112, i64 6
store i8 %131, i8* %129
%133 = getelementptr inbounds i8, i8* %113, i64 7
%134 = load i8, i8* %130
%135 = getelementptr inbounds i8, i8* %112, i64 7
store i8 %134, i8* %132
%136 = getelementptr inbounds i8, i8* %113, i64 8
%137 = load i8, i8* %133
%138 = getelementptr inbounds i8, i8* %112, i64 8
store i8 %137, i8* %135
%139 = add i8 %114, -8
%140 = icmp eq i8 %139, 0
br i1 %140, label %141, label %111
141: ; preds = %104, %111, %84
%142 = phi i8* [ %37, %84 ], [ %105, %104 ], [ %136, %111 ]
%143 = phi i8* [ %36, %84 ], [ %106, %104 ], [ %138, %111 ]
%144 = add i64 %6, 1
%145 = add i64 %144, %23
br label %146
146: ; preds = %141, %12
%147 = phi i8* [ %20, %12 ], [ %143, %141 ]
%148 = phi i8* [ %17, %12 ], [ %142, %141 ]
%149 = phi i64 [ %18, %12 ], [ %145, %141 ]
%150 = add i64 %149, 1
%151 = icmp ult i64 %150, %2
br i1 %151, label %5, label %152
152: ; preds = %146, %3
ret i64 0
}