void insert_string(char source[], char inject[], int index) {
  int i, j, k;
  char temp_string[81];
  if (source[index] == '\0') {
    for (i = index, j = 0; inject[j] != '\0'; ++i, ++j) {
      source[i] = inject[j];
    }
    source[i] = '\0';
  } else {
    for (i = 0, j = 0; source[i] != '\0'; ++i, ++j) {
      if (j == index) {
        for (k = 0; inject[k] != '\0'; ++k) {
          temp_string[j + k] = inject[k];
        }
        j += k;
      }
      temp_string[j] = source[i];
    }
    temp_string[j] = '\0';
    for (i = 0; temp_string[i] != '\0'; ++i) {
      source[i] = temp_string[i];
    }
    source[i] = '\0';
  }
}


x86 assembly (clang, -O0):
<insert_string>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %edx,-0x14(%rbp)
mov    -0x8(%rbp),%rax
movslq -0x14(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
cmp    $0x0,%eax
jne    1184 <insert_string+0x84>
mov    -0x14(%rbp),%eax
mov    %eax,-0x18(%rbp)
movl   $0x0,-0x1c(%rbp)
mov    -0x10(%rbp),%rax
movslq -0x1c(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
cmp    $0x0,%eax
je     1173 <insert_string+0x73>
mov    -0x10(%rbp),%rax
movslq -0x1c(%rbp),%rcx
mov    (%rax,%rcx,1),%dl
mov    -0x8(%rbp),%rax
movslq -0x18(%rbp),%rcx
mov    %dl,(%rax,%rcx,1)
mov    -0x18(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x18(%rbp)
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
jmp    1131 <insert_string+0x31>
mov    -0x8(%rbp),%rax
movslq -0x18(%rbp),%rcx
movb   $0x0,(%rax,%rcx,1)
jmp    1276 <insert_string+0x176>
movl   $0x0,-0x18(%rbp)
movl   $0x0,-0x1c(%rbp)
mov    -0x8(%rbp),%rax
movslq -0x18(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
cmp    $0x0,%eax
je     1227 <insert_string+0x127>
mov    -0x1c(%rbp),%eax
cmp    -0x14(%rbp),%eax
jne    11fd <insert_string+0xfd>
movl   $0x0,-0x20(%rbp)
mov    -0x10(%rbp),%rax
movslq -0x20(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
cmp    $0x0,%eax
je     11f4 <insert_string+0xf4>
mov    -0x10(%rbp),%rax
movslq -0x20(%rbp),%rcx
mov    (%rax,%rcx,1),%cl
mov    -0x1c(%rbp),%eax
add    -0x20(%rbp),%eax
cltq
mov    %cl,-0x80(%rbp,%rax,1)
mov    -0x20(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x20(%rbp)
jmp    11ba <insert_string+0xba>
mov    -0x20(%rbp),%eax
add    -0x1c(%rbp),%eax
mov    %eax,-0x1c(%rbp)
mov    -0x8(%rbp),%rax
movslq -0x18(%rbp),%rcx
mov    (%rax,%rcx,1),%cl
movslq -0x1c(%rbp),%rax
mov    %cl,-0x80(%rbp,%rax,1)
mov    -0x18(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x18(%rbp)
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
jmp    1192 <insert_string+0x92>
movslq -0x1c(%rbp),%rax
movb   $0x0,-0x80(%rbp,%rax,1)
movl   $0x0,-0x18(%rbp)
movslq -0x18(%rbp),%rax
movsbl -0x80(%rbp,%rax,1),%eax
cmp    $0x0,%eax
je     126a <insert_string+0x16a>
movslq -0x18(%rbp),%rax
mov    -0x80(%rbp,%rax,1),%dl
mov    -0x8(%rbp),%rax
movslq -0x18(%rbp),%rcx
mov    %dl,(%rax,%rcx,1)
mov    -0x18(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x18(%rbp)
jmp    1237 <insert_string+0x137>
mov    -0x8(%rbp),%rax
movslq -0x18(%rbp),%rcx
movb   $0x0,(%rax,%rcx,1)
pop    %rbp
ret

x86 assembly (clang, -O2):
<insert_string>:
movslq %edx,%rcx
cmpb   $0x0,(%rdi,%rcx,1)
je     11a7 <insert_string+0xa7>
mov    (%rdi),%r8b
xor    %eax,%eax
test   %r8b,%r8b
je     1175 <insert_string+0x75>
lea    (%rsp,%rcx,1),%r10
add    $0xffffffffffffffa8,%r10
xor    %r9d,%r9d
jmp    114a <insert_string+0x4a>
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
add    %edx,%eax
cltq
mov    %r8b,-0x58(%rsp,%rax,1)
add    $0x1,%eax
mov    0x1(%rdi,%r9,1),%r8b
add    $0x1,%r9
test   %r8b,%r8b
je     1173 <insert_string+0x73>
cmp    %edx,%eax
jne    1132 <insert_string+0x32>
mov    (%rsi),%cl
xor    %eax,%eax
test   %cl,%cl
je     1130 <insert_string+0x30>
cs nopw 0x0(%rax,%rax,1)
mov    %cl,(%r10,%rax,1)
movzbl 0x1(%rsi,%rax,1),%ecx
add    $0x1,%rax
test   %cl,%cl
jne    1160 <insert_string+0x60>
jmp    1130 <insert_string+0x30>
cltq
movb   $0x0,-0x58(%rsp,%rax,1)
mov    -0x58(%rsp),%al
xor    %ecx,%ecx
test   %al,%al
je     11e8 <insert_string+0xe8>
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
mov    %al,(%rdi,%rcx,1)
movzbl -0x57(%rsp,%rcx,1),%eax
add    $0x1,%rcx
test   %al,%al
jne    1190 <insert_string+0x90>
mov    %ecx,%ecx
movb   $0x0,(%rdi,%rcx,1)
ret
mov    (%rsi),%al
test   %al,%al
je     11e8 <insert_string+0xe8>
lea    (%rdi,%rcx,1),%r8
shl    $0x20,%rcx
xor    %edx,%edx
movabs $0x100000000,%r9
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
add    %r9,%rcx
mov    %al,(%r8,%rdx,1)
movzbl 0x1(%rsi,%rdx,1),%eax
add    $0x1,%rdx
test   %al,%al
jne    11d0 <insert_string+0xd0>
sar    $0x20,%rcx
movb   $0x0,(%rdi,%rcx,1)
ret

LLVM IR (-O0):
define void @insert_string(i8* %0, i8* %1, i32 %2) {
%4 = alloca i8*
%5 = alloca i8*
%6 = alloca i32
%7 = alloca i32
%8 = alloca i32
%9 = alloca i32
%10 = alloca [81 x i8]
store i8* %0, i8** %4
store i8* %1, i8** %5
store i32 %2, i32* %6
%11 = load i8*, i8** %4
%12 = load i32, i32* %6
%13 = sext i32 %12 to i64
%14 = getelementptr inbounds i8, i8* %11, i64 %13
%15 = load i8, i8* %14
%16 = sext i8 %15 to i32
%17 = icmp eq i32 %16, 0
br i1 %17, label %18, label %48
18: ; preds = %3
%19 = load i32, i32* %6
store i32 %19, i32* %7
store i32 0, i32* %8
br label %20
20: ; preds = %38, %18
%21 = load i8*, i8** %5
%22 = load i32, i32* %8
%23 = sext i32 %22 to i64
%24 = getelementptr inbounds i8, i8* %21, i64 %23
%25 = load i8, i8* %24
%26 = sext i8 %25 to i32
%27 = icmp ne i32 %26, 0
br i1 %27, label %28, label %43
28: ; preds = %20
%29 = load i8*, i8** %5
%30 = load i32, i32* %8
%31 = sext i32 %30 to i64
%32 = getelementptr inbounds i8, i8* %29, i64 %31
%33 = load i8, i8* %32
%34 = load i8*, i8** %4
%35 = load i32, i32* %7
%36 = sext i32 %35 to i64
%37 = getelementptr inbounds i8, i8* %34, i64 %36
store i8 %33, i8* %37
br label %38
38: ; preds = %28
%39 = load i32, i32* %7
%40 = add nsw i32 %39, 1
store i32 %40, i32* %7
%41 = load i32, i32* %8
%42 = add nsw i32 %41, 1
store i32 %42, i32* %8
br label %20
43: ; preds = %20
%44 = load i8*, i8** %4
%45 = load i32, i32* %7
%46 = sext i32 %45 to i64
%47 = getelementptr inbounds i8, i8* %44, i64 %46
store i8 0, i8* %47
br label %130
48: ; preds = %3
store i32 0, i32* %7
store i32 0, i32* %8
br label %49
49: ; preds = %97, %48
%50 = load i8*, i8** %4
%51 = load i32, i32* %7
%52 = sext i32 %51 to i64
%53 = getelementptr inbounds i8, i8* %50, i64 %52
%54 = load i8, i8* %53
%55 = sext i8 %54 to i32
%56 = icmp ne i32 %55, 0
br i1 %56, label %57, label %102
57: ; preds = %49
%58 = load i32, i32* %8
%59 = load i32, i32* %6
%60 = icmp eq i32 %58, %59
br i1 %60, label %61, label %88
61: ; preds = %57
store i32 0, i32* %9
br label %62
62: ; preds = %81, %61
%63 = load i8*, i8** %5
%64 = load i32, i32* %9
%65 = sext i32 %64 to i64
%66 = getelementptr inbounds i8, i8* %63, i64 %65
%67 = load i8, i8* %66
%68 = sext i8 %67 to i32
%69 = icmp ne i32 %68, 0
br i1 %69, label %70, label %84
70: ; preds = %62
%71 = load i8*, i8** %5
%72 = load i32, i32* %9
%73 = sext i32 %72 to i64
%74 = getelementptr inbounds i8, i8* %71, i64 %73
%75 = load i8, i8* %74
%76 = load i32, i32* %8
%77 = load i32, i32* %9
%78 = add nsw i32 %76, %77
%79 = sext i32 %78 to i64
%80 = getelementptr inbounds [81 x i8], [81 x i8]* %10, i64 0, i64 %79
store i8 %75, i8* %80
br label %81
81: ; preds = %70
%82 = load i32, i32* %9
%83 = add nsw i32 %82, 1
store i32 %83, i32* %9
br label %62
84: ; preds = %62
%85 = load i32, i32* %9
%86 = load i32, i32* %8
%87 = add nsw i32 %86, %85
store i32 %87, i32* %8
br label %88
88: ; preds = %84, %57
%89 = load i8*, i8** %4
%90 = load i32, i32* %7
%91 = sext i32 %90 to i64
%92 = getelementptr inbounds i8, i8* %89, i64 %91
%93 = load i8, i8* %92
%94 = load i32, i32* %8
%95 = sext i32 %94 to i64
%96 = getelementptr inbounds [81 x i8], [81 x i8]* %10, i64 0, i64 %95
store i8 %93, i8* %96
br label %97
97: ; preds = %88
%98 = load i32, i32* %7
%99 = add nsw i32 %98, 1
store i32 %99, i32* %7
%100 = load i32, i32* %8
%101 = add nsw i32 %100, 1
store i32 %101, i32* %8
br label %49
102: ; preds = %49
%103 = load i32, i32* %8
%104 = sext i32 %103 to i64
%105 = getelementptr inbounds [81 x i8], [81 x i8]* %10, i64 0, i64 %104
store i8 0, i8* %105
store i32 0, i32* %7
br label %106
106: ; preds = %122, %102
%107 = load i32, i32* %7
%108 = sext i32 %107 to i64
%109 = getelementptr inbounds [81 x i8], [81 x i8]* %10, i64 0, i64 %108
%110 = load i8, i8* %109
%111 = sext i8 %110 to i32
%112 = icmp ne i32 %111, 0
br i1 %112, label %113, label %125
113: ; preds = %106
%114 = load i32, i32* %7
%115 = sext i32 %114 to i64
%116 = getelementptr inbounds [81 x i8], [81 x i8]* %10, i64 0, i64 %115
%117 = load i8, i8* %116
%118 = load i8*, i8** %4
%119 = load i32, i32* %7
%120 = sext i32 %119 to i64
%121 = getelementptr inbounds i8, i8* %118, i64 %120
store i8 %117, i8* %121
br label %122
122: ; preds = %113
%123 = load i32, i32* %7
%124 = add nsw i32 %123, 1
store i32 %124, i32* %7
br label %106
125: ; preds = %106
%126 = load i8*, i8** %4
%127 = load i32, i32* %7
%128 = sext i32 %127 to i64
%129 = getelementptr inbounds i8, i8* %126, i64 %128
store i8 0, i8* %129
br label %130
130: ; preds = %125, %43
ret void
}

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