#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 */
int atoi(char *);
char *index(char *, char);
int /*<<< orphan*/ memcpy(char *, char *, int);
int strlen(char *);
int dtoa_calcdecimal(char *p, int str_size, int ndigits) {
  char *e;
  char *o;
  int x;
  int l;
  e = index(p, 'E');
  if (e == NULL)
    x = 0;
  else {
    *e = (char)0;
    x = atoi(e + 1);
  }
  l = strlen(p);
  o = index(p, '.');
  if (o == NULL)
    x += strlen(p);
  else {
    int m = strlen(o);
    memcpy(o, o + 1, l - (o - p));
    if (m > 0)
      o[m - 1] = '0';
    x += o - p;
  }
  if ((x + ndigits >= 0) && (x + ndigits < str_size))
    p[x + ndigits] = (char)0;
  return x;
}


x86 assembly (clang, -O0):
<dtoa_calcdecimal>:
push   %rbp
mov    %rsp,%rbp
sub    $0x30,%rsp
mov    %rdi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
mov    %edx,-0x10(%rbp)
mov    -0x8(%rbp),%rdi
mov    $0x45,%esi
call   1040 <index@plt>
mov    %rax,-0x18(%rbp)
cmpq   $0x0,-0x18(%rbp)
jne    117b <dtoa_calcdecimal+0x3b>
movl   $0x0,-0x24(%rbp)
jmp    1192 <dtoa_calcdecimal+0x52>
mov    -0x18(%rbp),%rax
movb   $0x0,(%rax)
mov    -0x18(%rbp),%rdi
add    $0x1,%rdi
call   1060 <atoi@plt>
mov    %eax,-0x24(%rbp)
mov    -0x8(%rbp),%rdi
call   1030 <strlen@plt>
mov    %eax,-0x28(%rbp)
mov    -0x8(%rbp),%rdi
mov    $0x2e,%esi
call   1040 <index@plt>
mov    %rax,-0x20(%rbp)
cmpq   $0x0,-0x20(%rbp)
jne    11cf <dtoa_calcdecimal+0x8f>
mov    -0x8(%rbp),%rdi
call   1030 <strlen@plt>
add    -0x24(%rbp),%eax
mov    %eax,-0x24(%rbp)
jmp    1230 <dtoa_calcdecimal+0xf0>
mov    -0x20(%rbp),%rdi
call   1030 <strlen@plt>
mov    %eax,-0x2c(%rbp)
mov    -0x20(%rbp),%rdi
mov    -0x20(%rbp),%rsi
add    $0x1,%rsi
movslq -0x28(%rbp),%rax
mov    -0x20(%rbp),%rcx
mov    -0x8(%rbp),%rdx
sub    %rdx,%rcx
sub    %rcx,%rax
mov    %eax,%edx
call   1050 <memcpy@plt>
cmpl   $0x0,-0x2c(%rbp)
jle    121b <dtoa_calcdecimal+0xdb>
mov    -0x20(%rbp),%rax
mov    -0x2c(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
movb   $0x30,(%rax,%rcx,1)
mov    -0x20(%rbp),%rcx
mov    -0x8(%rbp),%rax
sub    %rax,%rcx
movslq -0x24(%rbp),%rax
add    %rcx,%rax
mov    %eax,-0x24(%rbp)
mov    -0x24(%rbp),%eax
add    -0x10(%rbp),%eax
cmp    $0x0,%eax
jl     125f <dtoa_calcdecimal+0x11f>
mov    -0x24(%rbp),%eax
add    -0x10(%rbp),%eax
cmp    -0xc(%rbp),%eax
jge    125f <dtoa_calcdecimal+0x11f>
mov    -0x8(%rbp),%rax
mov    -0x24(%rbp),%ecx
add    -0x10(%rbp),%ecx
movslq %ecx,%rcx
movb   $0x0,(%rax,%rcx,1)
mov    -0x24(%rbp),%eax
add    $0x30,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<dtoa_calcdecimal>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
push   %rax
mov    %edx,%r12d
mov    %esi,%r15d
mov    %rdi,%r13
mov    $0x45,%esi
call   1040 <index@plt>
test   %rax,%rax
je     1177 <dtoa_calcdecimal+0x37>
movb   $0x0,(%rax)
add    $0x1,%rax
mov    %rax,%rdi
call   1060 <atoi@plt>
mov    %eax,(%rsp)
jmp    117e <dtoa_calcdecimal+0x3e>
movl   $0x0,(%rsp)
mov    %r13,%rdi
call   1030 <strlen@plt>
mov    %eax,%r14d
mov    %r13,%rdi
mov    $0x2e,%esi
call   1040 <index@plt>
test   %rax,%rax
je     11dd <dtoa_calcdecimal+0x9d>
mov    %rax,%rbx
mov    %r15d,0x4(%rsp)
mov    %rax,%rdi
call   1030 <strlen@plt>
mov    %eax,%r15d
mov    %rbx,%rsi
add    $0x1,%rsi
mov    %ebx,%ebp
sub    %r13d,%ebp
sub    %ebp,%r14d
mov    %rbx,%rdi
mov    %r14d,%edx
call   1050 <memcpy@plt>
test   %r15d,%r15d
jle    11d6 <dtoa_calcdecimal+0x96>
add    $0xffffffff,%r15d
movb   $0x30,(%rbx,%r15,1)
mov    0x4(%rsp),%r15d
jmp    11e7 <dtoa_calcdecimal+0xa7>
mov    %r13,%rdi
call   1030 <strlen@plt>
mov    %eax,%ebp
mov    (%rsp),%eax
add    %eax,%ebp
add    %ebp,%r12d
js     11ff <dtoa_calcdecimal+0xbf>
cmp    %r15d,%r12d
jge    11ff <dtoa_calcdecimal+0xbf>
mov    %r12d,%eax
movb   $0x0,0x0(%r13,%rax,1)
mov    %ebp,%eax
add    $0x8,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

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

LLVM IR (-O2):
define i32 @dtoa_calcdecimal(i8* %0, i32 %1, i32 %2) {
%4 = tail call i8* @index(i8* %0, i8 signext 69)
%5 = icmp eq i8* %4, null
br i1 %5, label %9, label %6
6: ; preds = %3
store i8 0, i8* %4
%7 = getelementptr inbounds i8, i8* %4, i64 1
%8 = tail call i32 @atoi(i8* %7)
br label %9
9: ; preds = %3, %6
%10 = phi i32 [ %8, %6 ], [ 0, %3 ]
%11 = tail call i32 @strlen(i8* %0)
%12 = tail call i8* @index(i8* %0, i8 signext 46)
%13 = icmp eq i8* %12, null
br i1 %13, label %14, label %16
14: ; preds = %9
%15 = tail call i32 @strlen(i8* %0)
br label %30
16: ; preds = %9
%17 = tail call i32 @strlen(i8* %12)
%18 = getelementptr inbounds i8, i8* %12, i64 1
%19 = ptrtoint i8* %12 to i64
%20 = ptrtoint i8* %0 to i64
%21 = sub i64 %19, %20
%22 = trunc i64 %21 to i32
%23 = sub i32 %11, %22
%24 = tail call i32 @memcpy(i8* %12, i8* %18, i32 %23)
%25 = icmp sgt i32 %17, 0
br i1 %25, label %26, label %30
26: ; preds = %16
%27 = add nsw i32 %17, -1
%28 = zext i32 %27 to i64
%29 = getelementptr inbounds i8, i8* %12, i64 %28
store i8 48, i8* %29
br label %30
30: ; preds = %16, %26, %14
%31 = phi i32 [ %15, %14 ], [ %22, %26 ], [ %22, %16 ]
%32 = add i32 %31, %10
%33 = add nsw i32 %32, %2
%34 = icmp sgt i32 %33, -1
%35 = icmp slt i32 %33, %1
%36 = and i1 %34, %35
br i1 %36, label %37, label %40
37: ; preds = %30
%38 = zext i32 %33 to i64
%39 = getelementptr inbounds i8, i8* %0, i64 %38
store i8 0, i8* %39
br label %40
40: ; preds = %37, %30
ret i32 %32
}