char *kstrsub(char *s, int i, int len) {
  static char p[1024 * 1024];
  int k = 0;
  s += i;
  if (len < 0 || i < 0)
    return s;
  do {
    p[k++] = *s;
    s++;
  } while (k < len);
  p[k] = '\0';
  return p;
}


x86 assembly (clang, -O0):
<kstrsub>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x10(%rbp)
mov    %esi,-0x14(%rbp)
mov    %edx,-0x18(%rbp)
movl   $0x0,-0x1c(%rbp)
mov    -0x14(%rbp),%ecx
mov    -0x10(%rbp),%rax
movslq %ecx,%rcx
add    %rcx,%rax
mov    %rax,-0x10(%rbp)
cmpl   $0x0,-0x18(%rbp)
jl     113a <kstrsub+0x3a>
cmpl   $0x0,-0x14(%rbp)
jge    1147 <kstrsub+0x47>
mov    -0x10(%rbp),%rax
mov    %rax,-0x8(%rbp)
jmp    119c <kstrsub+0x9c>
jmp    114c <kstrsub+0x4c>
mov    -0x10(%rbp),%rax
mov    (%rax),%dl
mov    -0x1c(%rbp),%eax
mov    %eax,%ecx
add    $0x1,%ecx
mov    %ecx,-0x1c(%rbp)
movslq %eax,%rcx
lea    0x2ec9(%rip),%rax
mov    %dl,(%rax,%rcx,1)
mov    -0x10(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x10(%rbp)
mov    -0x1c(%rbp),%eax
cmp    -0x18(%rbp),%eax
jl     114c <kstrsub+0x4c>
movslq -0x1c(%rbp),%rcx
lea    0x2ea3(%rip),%rax
movb   $0x0,(%rax,%rcx,1)
lea    0x2e98(%rip),%rax
mov    %rax,-0x8(%rbp)
mov    -0x8(%rbp),%rax
pop    %rbp
ret

x86 assembly (clang, -O2):
<kstrsub>:
movslq %esi,%r10
lea    (%rdi,%r10,1),%rax
mov    %r10d,%ecx
or     %edx,%ecx
js     11d8 <kstrsub+0xd8>
push   %rbx
cmp    $0x2,%edx
mov    $0x1,%r8d
cmovge %edx,%r8d
cmp    $0x8,%r8d
jb     114a <kstrsub+0x4a>
lea    0x2f03(%rip),%r11
lea    (%r10,%r8,1),%rcx
add    %rdi,%rcx
cmp    %r11,%rcx
jbe    11d9 <kstrsub+0xd9>
lea    (%r11,%r8,1),%rcx
cmp    %rcx,%rax
jae    11d9 <kstrsub+0xd9>
xor    %edx,%edx
mov    %rax,%rcx
mov    %rdx,%rax
not    %rax
add    %r8,%rax
mov    %r8,%rsi
and    $0x3,%rsi
je     1184 <kstrsub+0x84>
lea    0x2ec8(%rip),%rdi
nopl   0x0(%rax,%rax,1)
movzbl (%rcx),%ebx
mov    %bl,(%rdx,%rdi,1)
add    $0x1,%rdx
add    $0x1,%rcx
add    $0xffffffffffffffff,%rsi
jne    1170 <kstrsub+0x70>
cmp    $0x3,%rax
jb     11cb <kstrsub+0xcb>
mov    %r8,%rax
sub    %rdx,%rax
lea    0x2e99(%rip),%rsi
add    %rsi,%rdx
add    $0x3,%rdx
xor    %esi,%esi
movzbl (%rcx,%rsi,1),%ebx
mov    %bl,-0x3(%rdx,%rsi,1)
movzbl 0x1(%rcx,%rsi,1),%ebx
mov    %bl,-0x2(%rdx,%rsi,1)
movzbl 0x2(%rcx,%rsi,1),%ebx
mov    %bl,-0x1(%rdx,%rsi,1)
movzbl 0x3(%rcx,%rsi,1),%ebx
mov    %bl,(%rdx,%rsi,1)
add    $0x4,%rsi
cmp    %rsi,%rax
jne    11a0 <kstrsub+0xa0>
lea    0x2e5e(%rip),%rax
movb   $0x0,(%r8,%rax,1)
pop    %rbx
ret
cmp    $0x20,%r8d
jae    11e6 <kstrsub+0xe6>
xor    %edx,%edx
jmp    12ca <kstrsub+0x1ca>
mov    %r8d,%edx
and    $0x7fffffe0,%edx
lea    -0x20(%rdx),%rsi
mov    %rsi,%rcx
shr    $0x5,%rcx
add    $0x1,%rcx
mov    %ecx,%r9d
and    $0x3,%r9d
cmp    $0x60,%rsi
jae    120f <kstrsub+0x10f>
xor    %esi,%esi
jmp    1280 <kstrsub+0x180>
and    $0xfffffffffffffffc,%rcx
lea    (%r10,%rdi,1),%rbx
add    $0x70,%rbx
xor    %esi,%esi
nopl   (%rax)
movups -0x70(%rbx,%rsi,1),%xmm0
movups -0x60(%rbx,%rsi,1),%xmm1
movaps %xmm0,(%rsi,%r11,1)
movaps %xmm1,0x10(%rsi,%r11,1)
movups -0x50(%rbx,%rsi,1),%xmm0
movups -0x40(%rbx,%rsi,1),%xmm1
movaps %xmm0,0x20(%rsi,%r11,1)
movaps %xmm1,0x30(%rsi,%r11,1)
movups -0x30(%rbx,%rsi,1),%xmm0
movups -0x20(%rbx,%rsi,1),%xmm1
movaps %xmm0,0x40(%rsi,%r11,1)
movaps %xmm1,0x50(%rsi,%r11,1)
movups -0x10(%rbx,%rsi,1),%xmm0
movups (%rbx,%rsi,1),%xmm1
movaps %xmm0,0x60(%rsi,%r11,1)
movaps %xmm1,0x70(%rsi,%r11,1)
sub    $0xffffffffffffff80,%rsi
add    $0xfffffffffffffffc,%rcx
jne    1220 <kstrsub+0x120>
test   %r9,%r9
je     12bb <kstrsub+0x1bb>
lea    (%rsi,%r11,1),%rcx
add    $0x10,%rcx
add    %rsi,%r10
lea    (%rdi,%r10,1),%rsi
add    $0x10,%rsi
shl    $0x5,%r9
xor    %edi,%edi
xchg   %ax,%ax
movups -0x10(%rsi,%rdi,1),%xmm0
movups (%rsi,%rdi,1),%xmm1
movaps %xmm0,-0x10(%rcx,%rdi,1)
movaps %xmm1,(%rcx,%rdi,1)
add    $0x20,%rdi
cmp    %rdi,%r9
jne    12a0 <kstrsub+0x1a0>
cmp    %r8,%rdx
je     11cb <kstrsub+0xcb>
test   $0x18,%r8b
je     12ff <kstrsub+0x1ff>
mov    %rdx,%rsi
mov    %r8d,%edx
and    $0x7ffffff8,%edx
lea    (%rax,%rdx,1),%rcx
nopw   0x0(%rax,%rax,1)
mov    (%rax,%rsi,1),%rdi
mov    %rdi,(%rsi,%r11,1)
add    $0x8,%rsi
cmp    %rsi,%rdx
jne    12e0 <kstrsub+0x1e0>
cmp    %r8,%rdx
jne    114f <kstrsub+0x4f>
jmp    11cb <kstrsub+0xcb>
add    %rdx,%rax
jmp    114c <kstrsub+0x4c>

LLVM IR (-O0):
@kstrsub.p = internal global [1048576 x i8] zeroinitializer
define i8* @kstrsub(i8* %0, i32 %1, i32 %2) {
%4 = alloca i8*
%5 = alloca i8*
%6 = alloca i32
%7 = alloca i32
%8 = alloca i32
store i8* %0, i8** %5
store i32 %1, i32* %6
store i32 %2, i32* %7
store i32 0, i32* %8
%9 = load i32, i32* %6
%10 = load i8*, i8** %5
%11 = sext i32 %9 to i64
%12 = getelementptr inbounds i8, i8* %10, i64 %11
store i8* %12, i8** %5
%13 = load i32, i32* %7
%14 = icmp slt i32 %13, 0
br i1 %14, label %18, label %15
15: ; preds = %3
%16 = load i32, i32* %6
%17 = icmp slt i32 %16, 0
br i1 %17, label %18, label %20
18: ; preds = %15, %3
%19 = load i8*, i8** %5
store i8* %19, i8** %4
br label %38
20: ; preds = %15
br label %21
21: ; preds = %30, %20
%22 = load i8*, i8** %5
%23 = load i8, i8* %22
%24 = load i32, i32* %8
%25 = add nsw i32 %24, 1
store i32 %25, i32* %8
%26 = sext i32 %24 to i64
%27 = getelementptr inbounds [1048576 x i8], [1048576 x i8]* @kstrsub.p, i64 0, i64 %26
store i8 %23, i8* %27
%28 = load i8*, i8** %5
%29 = getelementptr inbounds i8, i8* %28, i32 1
store i8* %29, i8** %5
br label %30
30: ; preds = %21
%31 = load i32, i32* %8
%32 = load i32, i32* %7
%33 = icmp slt i32 %31, %32
br i1 %33, label %21, label %34
34: ; preds = %30
%35 = load i32, i32* %8
%36 = sext i32 %35 to i64
%37 = getelementptr inbounds [1048576 x i8], [1048576 x i8]* @kstrsub.p, i64 0, i64 %36
store i8 0, i8* %37
store i8* getelementptr inbounds ([1048576 x i8], [1048576 x i8]* @kstrsub.p, i64 0, i64 0), i8** %4
br label %38
38: ; preds = %34, %18
%39 = load i8*, i8** %4
ret i8* %39
}

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