int _shiftl(char *buffer, char *reg, int size, char fill, int n, int index) {
  char *r = reg;
  char *p = buffer + (index > 0 ? index : 0);
  if (buffer == 0 || reg == 0)
    return -1;
  if (n == 0)
    return 0;
  *p = *r;
  r++;
  while (r < reg + size) {
    *(r - 1) = *r;
    r++;
  }
  *(--r) = fill;
  return _shiftl(buffer, reg, size, fill, n - 1, index + 1);
}


x86 assembly (clang, -O0):
<_shiftl>:
push   %rbp
mov    %rsp,%rbp
sub    $0x50,%rsp
mov    %cl,%al
mov    %rdi,-0x10(%rbp)
mov    %rsi,-0x18(%rbp)
mov    %edx,-0x1c(%rbp)
mov    %al,-0x1d(%rbp)
mov    %r8d,-0x24(%rbp)
mov    %r9d,-0x28(%rbp)
mov    -0x18(%rbp),%rax
mov    %rax,-0x30(%rbp)
mov    -0x10(%rbp),%rax
mov    %rax,-0x40(%rbp)
cmpl   $0x0,-0x28(%rbp)
jle    1155 <_shiftl+0x45>
mov    -0x28(%rbp),%eax
mov    %eax,-0x44(%rbp)
jmp    115f <_shiftl+0x4f>
xor    %eax,%eax
mov    %eax,-0x44(%rbp)
jmp    115f <_shiftl+0x4f>
mov    -0x40(%rbp),%rax
mov    -0x44(%rbp),%ecx
movslq %ecx,%rcx
add    %rcx,%rax
mov    %rax,-0x38(%rbp)
cmpq   $0x0,-0x10(%rbp)
je     1186 <_shiftl+0x76>
cmpq   $0x0,-0x18(%rbp)
jne    1192 <_shiftl+0x82>
movl   $0xffffffff,-0x4(%rbp)
jmp    1234 <_shiftl+0x124>
cmpl   $0x0,-0x24(%rbp)
jne    11a8 <_shiftl+0x98>
movl   $0x0,-0x4(%rbp)
jmp    1234 <_shiftl+0x124>
mov    -0x30(%rbp),%rax
mov    (%rax),%cl
mov    -0x38(%rbp),%rax
mov    %cl,(%rax)
mov    -0x30(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x30(%rbp)
mov    -0x30(%rbp),%rax
mov    -0x18(%rbp),%rcx
movslq -0x1c(%rbp),%rdx
add    %rdx,%rcx
cmp    %rcx,%rax
jae    11f6 <_shiftl+0xe6>
mov    -0x30(%rbp),%rax
mov    (%rax),%cl
mov    -0x30(%rbp),%rax
mov    %cl,-0x1(%rax)
mov    -0x30(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x30(%rbp)
jmp    11c0 <_shiftl+0xb0>
mov    -0x1d(%rbp),%cl
mov    -0x30(%rbp),%rax
mov    %rax,%rdx
add    $0xffffffffffffffff,%rdx
mov    %rdx,-0x30(%rbp)
mov    %cl,-0x1(%rax)
mov    -0x10(%rbp),%rdi
mov    -0x18(%rbp),%rsi
mov    -0x1c(%rbp),%edx
mov    -0x1d(%rbp),%al
mov    -0x24(%rbp),%r8d
sub    $0x1,%r8d
mov    -0x28(%rbp),%r9d
add    $0x1,%r9d
movsbl %al,%ecx
call   1030 <_shiftl@plt>
mov    %eax,-0x4(%rbp)
mov    -0x4(%rbp),%eax
add    $0x50,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<_shiftl>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x28,%rsp
mov    $0xffffffff,%r14d
test   %rdi,%rdi
je     11eb <_shiftl+0xdb>
mov    %rsi,%r13
test   %rsi,%rsi
je     11eb <_shiftl+0xdb>
movslq %edx,%rbp
add    %r13,%rbp
lea    0x2(%r13),%rax
cmp    %rax,%rbp
cmovbe %rax,%rbp
test   %r8d,%r8d
je     119b <_shiftl+0x8b>
mov    %r9d,%ebx
mov    %ecx,%r15d
lea    0x1(%r13),%rax
mov    %rax,0x10(%rsp)
mov    %r13,%rax
not    %rax
add    %rax,%rbp
mov    %r13,%rax
add    %rbp,%rax
mov    %rax,0x8(%rsp)
xor    %r14d,%r14d
test   %r9d,%r9d
mov    $0x0,%eax
cmovns %r9d,%eax
test   $0x1,%r8b
mov    %edx,0x4(%rsp)
mov    %rbp,0x20(%rsp)
jne    11a0 <_shiftl+0x90>
mov    %r8d,%r12d
cmp    $0x1,%r8d
je     11eb <_shiftl+0xdb>
jmp    11fd <_shiftl+0xed>
xor    %r14d,%r14d
jmp    11eb <_shiftl+0xdb>
mov    %eax,%eax
mov    0x0(%r13),%cl
mov    %cl,(%rdi,%rax,1)
mov    %r13,%rax
cmp    $0x2,%edx
jl     11d6 <_shiftl+0xc6>
mov    %rdi,%r12
mov    %r13,%rdi
mov    0x10(%rsp),%rsi
mov    %rbp,%rdx
mov    %r8,%rbp
call   1030 <memmove@plt>
mov    %rbp,%r8
mov    %r12,%rdi
mov    0x4(%rsp),%edx
mov    0x8(%rsp),%rax
mov    %r15b,(%rax)
lea    -0x1(%r8),%r12d
xor    %eax,%eax
add    $0x1,%ebx
cmovns %ebx,%eax
cmp    $0x1,%r8d
jne    11fd <_shiftl+0xed>
mov    %r14d,%eax
add    $0x28,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret
mov    %rdi,0x18(%rsp)
mov    0x20(%rsp),%rbp
jmp    123f <_shiftl+0x12f>
nopl   0x0(%rax)
mov    %r15b,0x0(%r13)
test   %ebx,%ebx
mov    $0xffffffff,%eax
cmovns %ebx,%eax
add    $0x1,%eax
mov    %r15b,(%rdi,%rax,1)
mov    %r13,%rax
mov    %r15b,(%rax)
xor    %r14d,%r14d
add    $0x2,%ebx
mov    $0x0,%eax
cmovns %ebx,%eax
add    $0xfffffffe,%r12d
je     11eb <_shiftl+0xdb>
mov    %eax,%eax
movzbl 0x0(%r13),%ecx
mov    %cl,(%rdi,%rax,1)
cmp    $0x2,%edx
jl     1210 <_shiftl+0x100>
mov    %r13,%rdi
mov    %r15d,%r14d
mov    0x10(%rsp),%r15
mov    %r15,%rsi
mov    %rbp,%rdx
call   1030 <memmove@plt>
test   %ebx,%ebx
mov    $0xffffffff,%eax
cmovns %ebx,%eax
mov    %r14b,0x0(%r13,%rbp,1)
add    $0x1,%eax
movzbl 0x0(%r13),%ecx
mov    0x18(%rsp),%rdx
mov    %cl,(%rdx,%rax,1)
mov    %r13,%rdi
mov    %r15,%rsi
mov    %r14d,%r15d
mov    %rbp,%rdx
call   1030 <memmove@plt>
mov    0x18(%rsp),%rdi
mov    0x4(%rsp),%edx
mov    0x8(%rsp),%rax
jmp    1228 <_shiftl+0x118>

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

LLVM IR (-O2):
define i32 @_shiftl(i8* %0, i8* %1, i32 %2, i8 signext %3, i32 %4, i32 %5) {
%7 = ptrtoint i8* %1 to i64
%8 = icmp eq i8* %0, null
%9 = icmp eq i8* %1, null
%10 = or i1 %8, %9
br i1 %10, label %71, label %11
11: ; preds = %6
%12 = sext i32 %2 to i64
%13 = getelementptr i8, i8* %1, i64 1
%14 = icmp sgt i32 %2, 1
%15 = add i64 %7, %12
%16 = add i64 %7, 2
%17 = call i64 @llvm.umax.i64(i64 %15, i64 %16)
%18 = xor i64 %7, -1
%19 = add i64 %17, %18
%20 = getelementptr i8, i8* %1, i64 %19
%21 = icmp eq i32 %4, 0
br i1 %21, label %71, label %22
22: ; preds = %11
%23 = icmp sgt i32 %5, 0
%24 = select i1 %23, i32 %5, i32 0
%25 = and i32 %4, 1
%26 = icmp eq i32 %25, 0
br i1 %26, label %38, label %27
27: ; preds = %22
%28 = zext i32 %24 to i64
%29 = getelementptr inbounds i8, i8* %0, i64 %28
%30 = load i8, i8* %1
store i8 %30, i8* %29
br i1 %14, label %31, label %32
31: ; preds = %27
br label %32
32: ; preds = %31, %27
%33 = phi i8* [ %1, %27 ], [ %20, %31 ]
store i8 %3, i8* %33
%34 = add nsw i32 %4, -1
%35 = add nsw i32 %5, 1
%36 = icmp sgt i32 %35, 0
%37 = select i1 %36, i32 %35, i32 0
br label %38
38: ; preds = %32, %22
%39 = phi i32 [ %4, %22 ], [ %34, %32 ]
%40 = phi i32 [ %5, %22 ], [ %35, %32 ]
%41 = phi i32 [ %24, %22 ], [ %37, %32 ]
%42 = icmp eq i32 %4, 1
br i1 %42, label %71, label %43
43: ; preds = %38, %64
%44 = phi i32 [ %66, %64 ], [ %39, %38 ]
%45 = phi i32 [ %67, %64 ], [ %40, %38 ]
%46 = phi i32 [ %69, %64 ], [ %41, %38 ]
%47 = zext i32 %46 to i64
%48 = getelementptr inbounds i8, i8* %0, i64 %47
%49 = load i8, i8* %1
store i8 %49, i8* %48
br i1 %14, label %50, label %57
50: ; preds = %43
store i8 %3, i8* %20
%51 = icmp sgt i32 %45, -1
%52 = select i1 %51, i32 %45, i32 -1
%53 = add nsw i32 %52, 1
%54 = zext i32 %53 to i64
%55 = getelementptr inbounds i8, i8* %0, i64 %54
%56 = load i8, i8* %1
store i8 %56, i8* %55
br label %64
57: ; preds = %43
store i8 %3, i8* %1
%58 = icmp sgt i32 %45, -1
%59 = select i1 %58, i32 %45, i32 -1
%60 = add nsw i32 %59, 1
%61 = zext i32 %60 to i64
%62 = getelementptr inbounds i8, i8* %0, i64 %61
%63 = load i8, i8* %1
store i8 %63, i8* %62
br label %64
64: ; preds = %57, %50
%65 = phi i8* [ %20, %50 ], [ %1, %57 ]
store i8 %3, i8* %65
%66 = add nsw i32 %44, -2
%67 = add nsw i32 %45, 2
%68 = icmp sgt i32 %67, 0
%69 = select i1 %68, i32 %67, i32 0
%70 = icmp eq i32 %66, 0
br i1 %70, label %71, label %43
71: ; preds = %38, %64, %11, %6
%72 = phi i32 [ -1, %6 ], [ 0, %11 ], [ 0, %64 ], [ 0, %38 ]
ret i32 %72
}