#define NULL ((void *)0)
typedef unsigned long size_t; // Customize by platform.
typedef long intptr_t;
typedef unsigned long uintptr_t;
typedef long scalar_t__; // Either arithmetic or pointer type.
/* By default, we understand bool (as a convenience). */
typedef int bool;
#define false 0
#define true 1

/* Forward declarations */

/* Type definitions */

/* Variables and functions */
char *realloc(char *, size_t);
int /*<<< orphan*/ sprintf(char *, char *, char const *);
int /*<<< orphan*/ string_destroy(char **);
size_t string_length(char const *);
size_t string_list_join(const char **list, char **joint,
                        const char *delimiter) {
  size_t joint_length = 0;
  if (list) {
    size_t i, delim_length = string_length(delimiter);
    for (i = 0; list[i]; ++i) {
      if (i)
        joint_length += delim_length;
      joint_length += string_length(list[i]);
    }
    if (joint_length) {
      *joint = realloc(*joint, joint_length + 1);
      char *start = *joint;
      for (i = 0; list[i]; ++i) {
        if (i)
          start += sprintf(start, "%s", delimiter);
        start += sprintf(start, "%s", list[i]);
      }
    } else
      string_destroy(joint);
  }
  return joint_length;
}


x86 assembly (clang, -O0):
<string_list_join>:
push   %rbp
mov    %rsp,%rbp
sub    $0x40,%rsp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
movq   $0x0,-0x20(%rbp)
cmpq   $0x0,-0x8(%rbp)
je     129e <string_list_join+0x15e>
mov    -0x18(%rbp),%rdi
call   1040 <string_length@plt>
mov    %rax,-0x30(%rbp)
movq   $0x0,-0x28(%rbp)
mov    -0x8(%rbp),%rax
mov    -0x28(%rbp),%rcx
cmpq   $0x0,(%rax,%rcx,8)
je     11d0 <string_list_join+0x90>
cmpq   $0x0,-0x28(%rbp)
je     11a6 <string_list_join+0x66>
mov    -0x30(%rbp),%rax
add    -0x20(%rbp),%rax
mov    %rax,-0x20(%rbp)
mov    -0x8(%rbp),%rax
mov    -0x28(%rbp),%rcx
mov    (%rax,%rcx,8),%rdi
call   1040 <string_length@plt>
add    -0x20(%rbp),%rax
mov    %rax,-0x20(%rbp)
mov    -0x28(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x28(%rbp)
jmp    117c <string_list_join+0x3c>
cmpq   $0x0,-0x20(%rbp)
je     1290 <string_list_join+0x150>
mov    -0x10(%rbp),%rax
mov    (%rax),%rdi
mov    -0x20(%rbp),%rsi
add    $0x1,%rsi
call   1050 <realloc@plt>
mov    %rax,%rcx
mov    -0x10(%rbp),%rax
mov    %rcx,(%rax)
mov    -0x10(%rbp),%rax
mov    (%rax),%rax
mov    %rax,-0x38(%rbp)
movq   $0x0,-0x28(%rbp)
mov    -0x8(%rbp),%rax
mov    -0x28(%rbp),%rcx
cmpq   $0x0,(%rax,%rcx,8)
je     128b <string_list_join+0x14b>
cmpq   $0x0,-0x28(%rbp)
je     124e <string_list_join+0x10e>
mov    -0x38(%rbp),%rdi
mov    -0x18(%rbp),%rdx
lea    0xdc7(%rip),%rsi
call   1060 <sprintf@plt>
mov    %eax,%ecx
mov    -0x38(%rbp),%rax
movslq %ecx,%rcx
add    %rcx,%rax
mov    %rax,-0x38(%rbp)
mov    -0x38(%rbp),%rdi
mov    -0x8(%rbp),%rax
mov    -0x28(%rbp),%rcx
mov    (%rax,%rcx,8),%rdx
lea    0xd9b(%rip),%rsi
call   1060 <sprintf@plt>
mov    %eax,%ecx
mov    -0x38(%rbp),%rax
movslq %ecx,%rcx
add    %rcx,%rax
mov    %rax,-0x38(%rbp)
mov    -0x28(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x28(%rbp)
jmp    120c <string_list_join+0xcc>
jmp    1299 <string_list_join+0x159>
mov    -0x10(%rbp),%rdi
call   1030 <string_destroy@plt>
jmp    129e <string_list_join+0x15e>
mov    -0x20(%rbp),%rax
add    $0x40,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<string_list_join>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x18,%rsp
test   %rdi,%rdi
je     1234 <string_list_join+0xf4>
mov    %rsi,%rbp
mov    %rdi,%r15
mov    %rdx,0x8(%rsp)
mov    %rdx,%rdi
call   1050 <string_length@plt>
mov    (%r15),%rdi
test   %rdi,%rdi
je     122c <string_list_join+0xec>
mov    %rax,%r14
mov    %rbp,0x10(%rsp)
mov    $0x1,%ebp
xor    %r13d,%r13d
xor    %ebx,%ebx
nopl   0x0(%rax,%rax,1)
cmp    $0x1,%rbp
mov    %r14,%r12
cmove  %r13,%r12
add    %rbx,%r12
call   1050 <string_length@plt>
mov    %rax,%rbx
add    %r12,%rbx
mov    (%r15,%rbp,8),%rdi
add    $0x1,%rbp
test   %rdi,%rdi
jne    1190 <string_list_join+0x50>
test   %rbx,%rbx
mov    0x10(%rsp),%rbp
je     122c <string_list_join+0xec>
mov    0x0(%rbp),%rdi
lea    0x1(%rbx),%rsi
call   1060 <realloc@plt>
mov    %rax,0x0(%rbp)
mov    (%r15),%rsi
test   %rsi,%rsi
je     1236 <string_list_join+0xf6>
mov    %rax,%r12
xor    %r13d,%r13d
mov    0x8(%rsp),%rbp
jmp    120e <string_list_join+0xce>
cs nopw 0x0(%rax,%rax,1)
mov    %r12,%rdi
call   1040 <stpcpy@plt>
sub    %r12d,%eax
cltq
add    %rax,%r12
mov    0x8(%r15,%r13,8),%rsi
add    $0x1,%r13
test   %rsi,%rsi
je     1236 <string_list_join+0xf6>
test   %r13,%r13
je     11f0 <string_list_join+0xb0>
mov    %r12,%rdi
mov    %rbp,%rsi
call   1040 <stpcpy@plt>
sub    %r12d,%eax
cltq
add    %rax,%r12
mov    (%r15,%r13,8),%rsi
jmp    11f0 <string_list_join+0xb0>
mov    %rbp,%rdi
call   1030 <string_destroy@plt>
xor    %ebx,%ebx
mov    %rbx,%rax
add    $0x18,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
@.str = [3 x i8] c"%s\00"
define i64 @string_list_join(i8** %0, i8** %1, i8* %2) {
%4 = alloca i8**
%5 = alloca i8**
%6 = alloca i8*
%7 = alloca i64
%8 = alloca i64
%9 = alloca i64
%10 = alloca i8*
store i8** %0, i8*** %4
store i8** %1, i8*** %5
store i8* %2, i8** %6
store i64 0, i64* %7
%11 = load i8**, i8*** %4
%12 = icmp ne i8** %11, null
br i1 %12, label %13, label %86
13: ; preds = %3
%14 = load i8*, i8** %6
%15 = call i64 @string_length(i8* %14)
store i64 %15, i64* %9
store i64 0, i64* %8
br label %16
16: ; preds = %37, %13
%17 = load i8**, i8*** %4
%18 = load i64, i64* %8
%19 = getelementptr inbounds i8*, i8** %17, i64 %18
%20 = load i8*, i8** %19
%21 = icmp ne i8* %20, null
br i1 %21, label %22, label %40
22: ; preds = %16
%23 = load i64, i64* %8
%24 = icmp ne i64 %23, 0
br i1 %24, label %25, label %29
25: ; preds = %22
%26 = load i64, i64* %9
%27 = load i64, i64* %7
%28 = add i64 %27, %26
store i64 %28, i64* %7
br label %29
29: ; preds = %25, %22
%30 = load i8**, i8*** %4
%31 = load i64, i64* %8
%32 = getelementptr inbounds i8*, i8** %30, i64 %31
%33 = load i8*, i8** %32
%34 = call i64 @string_length(i8* %33)
%35 = load i64, i64* %7
%36 = add i64 %35, %34
store i64 %36, i64* %7
br label %37
37: ; preds = %29
%38 = load i64, i64* %8
%39 = add i64 %38, 1
store i64 %39, i64* %8
br label %16
40: ; preds = %16
%41 = load i64, i64* %7
%42 = icmp ne i64 %41, 0
br i1 %42, label %43, label %82
43: ; preds = %40
%44 = load i8**, i8*** %5
%45 = load i8*, i8** %44
%46 = load i64, i64* %7
%47 = add i64 %46, 1
%48 = call i8* @realloc(i8* %45, i64 %47)
%49 = load i8**, i8*** %5
store i8* %48, i8** %49
%50 = load i8**, i8*** %5
%51 = load i8*, i8** %50
store i8* %51, i8** %10
store i64 0, i64* %8
br label %52
52: ; preds = %78, %43
%53 = load i8**, i8*** %4
%54 = load i64, i64* %8
%55 = getelementptr inbounds i8*, i8** %53, i64 %54
%56 = load i8*, i8** %55
%57 = icmp ne i8* %56, null
br i1 %57, label %58, label %81
58: ; preds = %52
%59 = load i64, i64* %8
%60 = icmp ne i64 %59, 0
br i1 %60, label %61, label %68
61: ; preds = %58
%62 = load i8*, i8** %10
%63 = load i8*, i8** %6
%64 = call i32 @sprintf(i8* %62, i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str, i64 0, i64 0), i8* %63)
%65 = load i8*, i8** %10
%66 = sext i32 %64 to i64
%67 = getelementptr inbounds i8, i8* %65, i64 %66
store i8* %67, i8** %10
br label %68
68: ; preds = %61, %58
%69 = load i8*, i8** %10
%70 = load i8**, i8*** %4
%71 = load i64, i64* %8
%72 = getelementptr inbounds i8*, i8** %70, i64 %71
%73 = load i8*, i8** %72
%74 = call i32 @sprintf(i8* %69, i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str, i64 0, i64 0), i8* %73)
%75 = load i8*, i8** %10
%76 = sext i32 %74 to i64
%77 = getelementptr inbounds i8, i8* %75, i64 %76
store i8* %77, i8** %10
br label %78
78: ; preds = %68
%79 = load i64, i64* %8
%80 = add i64 %79, 1
store i64 %80, i64* %8
br label %52
81: ; preds = %52
br label %85
82: ; preds = %40
%83 = load i8**, i8*** %5
%84 = call i32 @string_destroy(i8** %83)
br label %85
85: ; preds = %82, %81
br label %86
86: ; preds = %85, %3
%87 = load i64, i64* %7
ret i64 %87
}

LLVM IR (-O2):
define i64 @string_list_join(i8** %0, i8** %1, i8* %2) {
%4 = icmp eq i8** %0, null
br i1 %4, label %61, label %5
5: ; preds = %3
%6 = tail call i64 @string_length(i8* %2)
%7 = load i8*, i8** %0
%8 = icmp eq i8* %7, null
br i1 %8, label %59, label %9
9: ; preds = %5, %9
%10 = phi i8* [ %20, %9 ], [ %7, %5 ]
%11 = phi i64 [ %17, %9 ], [ 0, %5 ]
%12 = phi i64 [ %18, %9 ], [ 0, %5 ]
%13 = icmp eq i64 %12, 0
%14 = select i1 %13, i64 0, i64 %6
%15 = add i64 %14, %11
%16 = tail call i64 @string_length(i8* %10)
%17 = add i64 %15, %16
%18 = add i64 %12, 1
%19 = getelementptr inbounds i8*, i8** %0, i64 %18
%20 = load i8*, i8** %19
%21 = icmp eq i8* %20, null
br i1 %21, label %22, label %9
22: ; preds = %9
%23 = icmp eq i64 %17, 0
br i1 %23, label %59, label %24
24: ; preds = %22
%25 = load i8*, i8** %1
%26 = add i64 %17, 1
%27 = tail call i8* @realloc(i8* %25, i64 %26)
store i8* %27, i8** %1
%28 = load i8*, i8** %0
%29 = icmp eq i8* %28, null
br i1 %29, label %61, label %30
30: ; preds = %24, %45
%31 = phi i8* [ %57, %45 ], [ %28, %24 ]
%32 = phi i8** [ %56, %45 ], [ %0, %24 ]
%33 = phi i8* [ %54, %45 ], [ %27, %24 ]
%34 = phi i64 [ %55, %45 ], [ 0, %24 ]
%35 = icmp eq i64 %34, 0
br i1 %35, label %45, label %36
36: ; preds = %30
%37 = tail call i8* @stpcpy(i8* %33, i8* %2)
%38 = ptrtoint i8* %37 to i64
%39 = ptrtoint i8* %33 to i64
%40 = sub i64 %38, %39
%41 = shl i64 %40, 32
%42 = ashr exact i64 %41, 32
%43 = getelementptr inbounds i8, i8* %33, i64 %42
%44 = load i8*, i8** %32
br label %45
45: ; preds = %36, %30
%46 = phi i8* [ %44, %36 ], [ %31, %30 ]
%47 = phi i8* [ %43, %36 ], [ %33, %30 ]
%48 = tail call i8* @stpcpy(i8* %47, i8* %46)
%49 = ptrtoint i8* %48 to i64
%50 = ptrtoint i8* %47 to i64
%51 = sub i64 %49, %50
%52 = shl i64 %51, 32
%53 = ashr exact i64 %52, 32
%54 = getelementptr inbounds i8, i8* %47, i64 %53
%55 = add i64 %34, 1
%56 = getelementptr inbounds i8*, i8** %0, i64 %55
%57 = load i8*, i8** %56
%58 = icmp eq i8* %57, null
br i1 %58, label %61, label %30
59: ; preds = %5, %22
%60 = tail call i32 @string_destroy(i8** %1)
br label %61
61: ; preds = %45, %24, %59, %3
%62 = phi i64 [ 0, %3 ], [ 0, %59 ], [ %17, %24 ], [ %17, %45 ]
ret i64 %62
}