// File: /workspace/github_cpp_makefile_star2_O3/marxn[P]pupp/3rdparty/gmp/printf/doprntf.c
// Function: _gmp_doprnt_mpf2
int
__gmp_doprnt_mpf (const struct doprnt_funs_t *funs,
		  void *data,
		  const struct doprnt_params_t *p,
		  const char *point,
		  mpf_srcptr f)
{
  int         prec, ndigits, free_size, len, newlen, justify, justlen, explen;
  int         showbaselen, sign, signlen, intlen, intzeros, pointlen;
  int         fraczeros, fraclen, preczeros;
  char        *s, *free_ptr;
  mp_exp_t    exp;
  char        exponent[GMP_LIMB_BITS + 10];
  const char  *showbase;
  int         retval = 0;

  TRACE (printf ("__gmp_doprnt_float\n");
	 printf ("  conv=%d prec=%d\n", p->conv, p->prec));

  prec = p->prec;
  if (prec <= -1)
    {
      /* all digits */
      ndigits = 0;

      /* arrange the fixed/scientific decision on a "prec" implied by how
	 many significant digits there are */
      if (p->conv == DOPRNT_CONV_GENERAL)
	MPF_SIGNIFICANT_DIGITS (prec, PREC(f), ABS(p->base));
    }
  else
    {
      switch (p->conv) {
      case DOPRNT_CONV_FIXED:
	/* Precision is digits after the radix point.  Try not to generate
	   too many more than will actually be required.  If f>=1 then
	   overestimate the integer part, and add prec.  If f<1 then
	   underestimate the zeros between the radix point and the first
	   digit and subtract that from prec.  In either case add 2 so the
	   round to nearest can be applied accurately.  Finally, we add 1 to
	   handle the case of 1-eps where EXP(f) = 0 but mpf_get_str returns
	   exp as 1.  */
	ndigits = prec + 2 + 1
	  + EXP(f) * (mp_bases[ABS(p->base)].chars_per_limb + (EXP(f)>=0));
	ndigits = MAX (ndigits, 1);
	break;

      case DOPRNT_CONV_SCIENTIFIC:
	/* precision is digits after the radix point, and there's one digit
	   before */
	ndigits = prec + 1;
	break;

      default:
	ASSERT (0);
	/*FALLTHRU*/

      case DOPRNT_CONV_GENERAL:
	/* precision is total digits, but be sure to ask mpf_get_str for at
	   least 1, not 0 */
	ndigits = MAX (prec, 1);
	break;
      }
    }
  TRACE (printf ("  ndigits %d\n", ndigits));

  s = mpf_get_str (NULL, &exp, p->base, ndigits, f);
  len = strlen (s);
  free_ptr = s;
  free_size = len + 1;
  TRACE (printf ("  s   %s\n", s);
	 printf ("  exp %ld\n", exp);
	 printf ("  len %d\n", len));

  /* For fixed mode check the ndigits formed above was in fact enough for
     the integer part plus p->prec after the radix point. */
  ASSERT ((p->conv == DOPRNT_CONV_FIXED && p->prec > -1)
	  ? ndigits >= MAX (1, exp + p->prec + 2) : 1);

  sign = p->sign;
  if (s[0] == '-')
    {
      sign = s[0];
      s++, len--;
    }
  signlen = (sign != '\0');
  TRACE (printf ("  sign %c  signlen %d\n", sign, signlen));

  switch (p->conv) {
  case DOPRNT_CONV_FIXED:
    if (prec <= -1)
      prec = MAX (0, len-exp);   /* retain all digits */

    /* Truncate if necessary so fraction will be at most prec digits. */
    ASSERT (prec >= 0);
    newlen = exp + prec;
    if (newlen < 0)
      {
	/* first non-zero digit is below target prec, and at least one zero
	   digit in between, so print zero */
	len = 0;
	exp = 0;
      }
    else if (len <= newlen)
      {
	/* already got few enough digits */
      }
    else
      {
	/* discard excess digits and round to nearest */

	const char  *num_to_text = (p->base >= 0
				    ? "0123456789abcdefghijklmnopqrstuvwxyz"
				    : "0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ");
	int  base = ABS(p->base);
	int  n;

	ASSERT (base <= 36);

	len = newlen;
	n = DIGIT_VALUE (s[len]);
	TRACE (printf ("  rounding with %d\n", n));
	if (n >= (base + 1) / 2)
	  {
	    /* propagate a carry */
	    for (;;)
	      {
		if (len == 0)
		  {
		    s[0] = '1';
		    len = 1;
		    exp++;
		    break;
		  }
		n = DIGIT_VALUE (s[len-1]);
		ASSERT (n >= 0 && n < base);
		n++;
		if (n != base)
		  {
		    TRACE (printf ("  storing now %d\n", n));
		    s[len-1] = num_to_text[n];
		    break;
		  }
		len--;
	      }
	  }
	else
	  {
	    /* truncate only, strip any trailing zeros now exposed */
	    while (len > 0 && s[len-1] == '0')
	      len--;
	  }

	/* Can have newlen==0, in which case the truncate was just to check
	   for a carry turning it into "1".  If we're left with len==0 then
	   adjust exp to match.  */
	if (len == 0)
	  exp = 0;
      }

  fixed:
    ASSERT (len == 0 ? exp == 0 : 1);
    if (exp <= 0)
      {
	TRACE (printf ("  fixed 0.000sss\n"));
	intlen = 0;
	intzeros = 1;
	fraczeros = -exp;
	fraclen = len;
      }
    else
      {
	TRACE (printf ("  fixed sss.sss or sss000\n"));
	intlen = MIN (len, exp);
	intzeros = exp - intlen;
	fraczeros = 0;
	fraclen = len - intlen;
      }
    explen = 0;
    break;

  case DOPRNT_CONV_SCIENTIFIC:
    {
      long int expval;
      char  expsign;

      if (prec <= -1)
	prec = MAX (0, len-1);   /* retain all digits */

    scientific:
      TRACE (printf ("  scientific s.sss\n"));

      intlen = MIN (1, len);
      intzeros = (intlen == 0 ? 1 : 0);
      fraczeros = 0;
      fraclen = len - intlen;

      expval = (exp-intlen);
      if (p->exptimes4)
	expval <<= 2;

      /* Split out the sign since %o or %x in expfmt give negatives as twos
	 complement, not with a sign. */
      expsign = (expval >= 0 ? '+' : '-');
      expval = ABS (expval);

#if HAVE_VSNPRINTF
      explen = snprintf (exponent, sizeof(exponent),
			 p->expfmt, expsign, expval);
      /* test for < sizeof-1 since a glibc 2.0.x return of sizeof-1 might
	 mean truncation */
      ASSERT (explen >= 0 && explen < sizeof(exponent)-1);
#else
      sprintf (exponent, p->expfmt, expsign, expval);
      explen = strlen (exponent);
      ASSERT (explen < sizeof(exponent));
#endif
      TRACE (printf ("  expfmt %s gives %s\n", p->expfmt, exponent));
    }
    break;

  default:
    ASSERT (0);
    /*FALLTHRU*/  /* to stop variables looking uninitialized */

  case DOPRNT_CONV_GENERAL:
    /* The exponent for "scientific" will be exp-1, choose scientific if
       this is < -4 or >= prec (and minimum 1 for prec).  For f==0 will have
       exp==0 and get the desired "fixed".  This rule follows glibc.  For
       fixed there's no need to truncate, the desired ndigits will already
       be as required.  */
    if (exp-1 < -4 || exp-1 >= MAX (1, prec))
      goto scientific;
    else
      goto fixed;
  }

  TRACE (printf ("  intlen %d intzeros %d fraczeros %d fraclen %d\n",
		 intlen, intzeros, fraczeros, fraclen));
  ASSERT (p->prec <= -1
	  ? intlen + fraclen == strlen (s)
	  : intlen + fraclen <= strlen (s));

  if (p->showtrailing)
    {
      /* Pad to requested precision with trailing zeros, for general this is
	 all digits, for fixed and scientific just the fraction.  */
      preczeros = prec - (fraczeros + fraclen
			  + (p->conv == DOPRNT_CONV_GENERAL
			     ? intlen + intzeros : 0));
      preczeros = MAX (0, preczeros);
    }
  else
    preczeros = 0;
  TRACE (printf ("  prec=%d showtrailing=%d, pad with preczeros %d\n",
		 prec, p->showtrailing, preczeros));

  /* radix point if needed, or if forced */
  pointlen = ((fraczeros + fraclen + preczeros) != 0 || p->showpoint != 0)
    ? strlen (point) : 0;
  TRACE (printf ("  point |%s|  pointlen %d\n", point, pointlen));

  /* Notice the test for a non-zero value is done after any truncation for
     DOPRNT_CONV_FIXED. */
  showbase = NULL;
  showbaselen = 0;
  switch (p->showbase) {
  default:
    ASSERT (0);
    /*FALLTHRU*/
  case DOPRNT_SHOWBASE_NO:
    break;
  case DOPRNT_SHOWBASE_NONZERO:
    if (intlen == 0 && fraclen == 0)
      break;
    /*FALLTHRU*/
  case DOPRNT_SHOWBASE_YES:
    switch (p->base) {
    case 16:  showbase = "0x"; showbaselen = 2; break;
    case -16: showbase = "0X"; showbaselen = 2; break;
    case 8:   showbase = "0";  showbaselen = 1; break;
    }
    break;
  }
  TRACE (printf ("  showbase %s showbaselen %d\n",
		 showbase == NULL ? "" : showbase, showbaselen));

  /* left over field width */
  justlen = p->width - (signlen + showbaselen + intlen + intzeros + pointlen
			+ fraczeros + fraclen + preczeros + explen);
  TRACE (printf ("  justlen %d fill 0x%X\n", justlen, p->fill));

  justify = p->justify;
  if (justlen <= 0) /* no justifying if exceed width */
    justify = DOPRNT_JUSTIFY_NONE;

  TRACE (printf ("  justify type %d  intlen %d pointlen %d fraclen %d\n",
		 justify, intlen, pointlen, fraclen));

  if (justify == DOPRNT_JUSTIFY_RIGHT)         /* pad for right */
    DOPRNT_REPS (p->fill, justlen);

  if (signlen)                                 /* sign */
    DOPRNT_REPS (sign, 1);

  DOPRNT_MEMORY_MAYBE (showbase, showbaselen); /* base */

  if (justify == DOPRNT_JUSTIFY_INTERNAL)      /* pad for internal */
    DOPRNT_REPS (p->fill, justlen);

  DOPRNT_MEMORY (s, intlen);                   /* integer */
  DOPRNT_REPS_MAYBE ('0', intzeros);

  DOPRNT_MEMORY_MAYBE (point, pointlen);       /* point */

  DOPRNT_REPS_MAYBE ('0', fraczeros);          /* frac */
  DOPRNT_MEMORY_MAYBE (s+intlen, fraclen);

  DOPRNT_REPS_MAYBE ('0', preczeros);          /* prec */

  DOPRNT_MEMORY_MAYBE (exponent, explen);      /* exp */

  if (justify == DOPRNT_JUSTIFY_LEFT)          /* pad for left */
    DOPRNT_REPS (p->fill, justlen);

 done:
  (*__gmp_free_func) (free_ptr, free_size);
  return retval;

 error:
  retval = -1;
  goto done;
}

// Assembly:
pushq %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
subq $0xd8, %rsp
movq %rcx, 0x58(%rsp)
movq %rdx, %r15
movq %rsi, 0x8(%rsp)
movq %rdi, 0x10(%rsp)
movl 0x4(%rdx), %eax
movl 0x1c(%rdx), %r12d
testl %r12d, %r12d
js 0x33130
cmpl $0x2, %eax
je 0x33172
cmpl $0x1, %eax
jne 0x33179
movq 0x8(%r8), %rax
movl (%r15), %ecx
movl %ecx, %edx
negl %edx
cmovsl %ecx, %edx
leaq (%rdx,%rdx,4), %rcx
leaq 0x4012(%rip), %rdx      # 0x37120
xorl %esi, %esi
testq %rax, %rax
setns %sil
addl (%rdx,%rcx,8), %esi
imull %esi, %eax
addl %r12d, %eax
addl $0x3, %eax
cmpl $0x2, %eax
movl $0x1, %ecx
cmovgel %eax, %ecx
jmp 0x33183
xorl %ecx, %ecx
cmpl $0x3, %eax
jne 0x33183
movslq (%r8), %rax
leaq (%rax,%rax,4), %rax
leaq 0x3fdb(%rip), %rdx      # 0x37120
movq 0x8(%rdx,%rax,8), %rax
movl (%r15), %edx
movl %edx, %esi
negl %esi
cmovsl %edx, %esi
movslq %esi, %rdx
shlq $0x6, %rdx
addq $-0x40, %rdx
movq %rdx, 0x78(%rsp)
mulq 0x78(%rsp)
movq %rdx, %r12
addl $0x2, %r12d
jmp 0x33183
leal 0x1(%r12), %ecx
jmp 0x33183
cmpl $0x1, %r12d
movl %r12d, %ecx
adcl $0x0, %ecx
movl (%r15), %edx
movl %ecx, %ecx
xorl %ebp, %ebp
leaq 0x18(%rsp), %rsi
xorl %edi, %edi
callq 0x33a54
movq %rax, %rbx
movq %rax, %rdi
callq 0x6120
movq %rax, %rcx
xorl %r14d, %r14d
cmpb $0x2d, (%rbx)
sete %r14b
movl $0x2d, %edx
je 0x331b9
movl 0x2c(%r15), %edx
movl %edx, 0x24(%rsp)
movq %rbx, 0x40(%rsp)
leaq (%rbx,%r14), %rax
movq %rax, 0x38(%rsp)
movl %ecx, %ebx
subl %r14d, %ebx
movl %edx, %eax
negb %al
sbbl %ebp, %ebp
movl 0x4(%r15), %eax
cmpl $0x2, %eax
movq %rcx, 0x50(%rsp)
movq %rbp, 0x30(%rsp)
je 0x332b8
cmpl $0x1, %eax
jne 0x332cf
movq 0x18(%rsp), %rdx
testl %r12d, %r12d
jns 0x33210
movslq %ebx, %rax
subq %rdx, %rax
xorl %r12d, %r12d
testq %rax, %rax
cmovgq %rax, %r12
movl %r12d, %r13d
addl %edx, %r13d
js 0x33374
cmpl %r13d, %ebx
jle 0x332ec
movq %rdx, %rbx
movl (%r15), %eax
testl %eax, %eax
leaq 0x75f0(%rip), %rcx      # 0x3a824
leaq 0x760e(%rip), %rdx      # 0x3a849
cmovnsq %rcx, %rdx
movq %rdx, 0x48(%rsp)
movl %eax, %ebp
negl %ebp
cmovsl %eax, %ebp
callq 0x62b0
movq 0x38(%rsp), %r9
movq (%rax), %rax
movl %r13d, %ecx
movsbq (%r9,%rcx), %rsi
movzwl (%rax,%rsi,2), %edx
xorl %edi, %edi
btl $0x9, %edx
setae %dil
shll $0x5, %edi
addl $-0x57, %edi
btl $0xb, %edx
movl $0xffffffd0, %edx       # imm = 0xFFFFFFD0
cmovbl %edx, %edi
addl %esi, %edi
leal 0x1(%rbp), %esi
shrl %esi
cmpl %esi, %edi
jge 0x336a5
movq 0x40(%rsp), %rax
addq %r14, %rax
decq %rax
movq %rbx, %rdx
addl %r12d, %ebx
incl %ebx
testl %ecx, %ecx
jle 0x33374
decl %ebx
cmpb $0x30, (%rax,%rcx)
leaq -0x1(%rcx), %rcx
je 0x332a2
jmp 0x332ec
testl %r12d, %r12d
jns 0x3330f
cmpl $0x2, %ebx
movl $0x1, %r12d
cmovgel %ebx, %r12d
decl %r12d
jmp 0x3330f
movq 0x18(%rsp), %rdx
cmpl $0x2, %r12d
movl $0x1, %eax
cmovgel %r12d, %eax
cmpq $-0x3, %rdx
jl 0x3330f
cmpq %rax, %rdx
jg 0x3330f
testq %rdx, %rdx
jle 0x33381
movslq %ebx, %rbx
cmpq %rbx, %rdx
movq %rbx, %r13
cmovlq %rdx, %r13
movl %edx, %r14d
subl %r13d, %r14d
subl %r13d, %ebx
xorl %edx, %edx
jmp 0x3338c
xorl %r14d, %r14d
testl %ebx, %ebx
movl $0x1, %r13d
cmovlel %ebx, %r13d
sete %r14b
subl %r13d, %ebx
movq 0x18(%rsp), %rax
movslq %r13d, %rcx
subq %rcx, %rax
leaq (,%rax,4), %rcx
cmpl $0x0, 0x10(%r15)
cmoveq %rax, %rcx
movq %rcx, %r8
negq %r8
cmovsq %rcx, %r8
movq 0x8(%r15), %rdx
shrq $0x3f, %rcx
leal 0x2b(,%rcx,2), %ecx
leaq 0x80(%rsp), %rdi
movl $0x4a, %esi
xorl %eax, %eax
callq 0x6410
xorl %edx, %edx
movl %eax, %esi
jmp 0x3338e
movq $0x0, 0x18(%rsp)
xorl %ebx, %ebx
xorl %edx, %edx
negl %edx
xorl %r13d, %r13d
movl $0x1, %r14d
xorl %esi, %esi
cmpl $0x0, 0x28(%r15)
je 0x333b4
leal (%r14,%r13), %eax
xorl %ecx, %ecx
cmpl $0x3, 0x4(%r15)
cmovnel %ecx, %eax
leal (%rdx,%rbx), %ebp
addl %ebp, %eax
subl %eax, %r12d
testl %r12d, %r12d
cmovlel %ecx, %r12d
jmp 0x333ba
leal (%rdx,%rbx), %ebp
xorl %r12d, %r12d
movq %r14, 0x48(%rsp)
movq %rdx, 0x68(%rsp)
movl %ebp, %eax
addl %r12d, %eax
jne 0x333d2
cmpl $0x0, 0x24(%r15)
je 0x33430
movq 0x58(%rsp), %rdi
movq %rsi, %r14
callq 0x6120
movq %r14, %rsi
movl 0x24(%rsp), %ecx
movl 0x20(%r15), %edx
cmpl $0x1, %edx
je 0x333fb
cmpl $0x3, %edx
jne 0x3341c
movl %r13d, %edx
orl %ebx, %edx
je 0x3341c
movl (%r15), %edx
cmpl $-0x10, %edx
je 0x33443
cmpl $0x8, %edx
je 0x33434
cmpl $0x10, %edx
jne 0x3341c
movl $0x2, %r14d
leaq 0x7454(%rip), %rdx      # 0x3a86e
jmp 0x33450
movb $0x1, %dl
movl %edx, 0x4(%rsp)
movq $0x0, 0x28(%rsp)
xorl %r14d, %r14d
jmp 0x3345d
xorl %eax, %eax
jmp 0x333e2
movl $0x1, %r14d
leaq 0x6b22(%rip), %rdx      # 0x39f63
jmp 0x33450
movl $0x2, %r14d
leaq 0x7421(%rip), %rdx      # 0x3a871
movq %rdx, 0x28(%rsp)
movl $0x0, 0x4(%rsp)
addl 0x48(%rsp), %ebp
movq %rsi, 0x60(%rsp)
addl %r13d, %ebp
addl %esi, %ebp
movq %rax, 0x70(%rsp)
addl %eax, %ebp
addl %r14d, %ebp
addl %r12d, %ebp
movq 0x30(%rsp), %rax
subl %ebp, %eax
addl 0x30(%r15), %eax
xorl %ebp, %ebp
movl $0x0, %edx
movq %rax, 0x30(%rsp)
testl %eax, %eax
jle 0x33497
movl 0x18(%r15), %edx
movl %edx, 0x20(%rsp)
cmpl $0x2, %edx
jne 0x334c6
movsbl 0x14(%r15), %esi
movq 0x8(%rsp), %rdi
movq 0x30(%rsp), %rdx
movq 0x10(%rsp), %rax
callq *0x10(%rax)
movl 0x24(%rsp), %ecx
movl %eax, %ebp
cmpl $-0x1, %eax
je 0x33672
testb %cl, %cl
je 0x334ea
movsbl %cl, %esi
movq 0x8(%rsp), %rdi
movl $0x1, %edx
movq 0x10(%rsp), %rax
callq *0x10(%rax)
cmpl $-0x1, %eax
je 0x33672
addl %eax, %ebp
cmpb $0x0, 0x4(%rsp)
jne 0x33511
movl %r14d, %edx
movq 0x8(%rsp), %rdi
movq 0x28(%rsp), %rsi
movq 0x10(%rsp), %rax
callq *0x8(%rax)
cmpl $-0x1, %eax
je 0x33672
addl %eax, %ebp
movl 0x20(%rsp), %eax
cmpl $0x3, %eax
jne 0x3353c
movsbl 0x14(%r15), %esi
movq 0x8(%rsp), %rdi
movq 0x30(%rsp), %rdx
movq 0x10(%rsp), %rax
callq *0x10(%rax)
cmpl $-0x1, %eax
je 0x33672
addl %eax, %ebp
movq 0x38(%rsp), %rsi
movslq %r13d, %r14
movq 0x8(%rsp), %rdi
movq %r14, %rdx
movq 0x10(%rsp), %rax
callq *0x8(%rax)
cmpl $-0x1, %eax
je 0x33672
movl %eax, %r13d
addl %ebp, %r13d
movq 0x48(%rsp), %rdx
testl %edx, %edx
je 0x3358a
movq 0x8(%rsp), %rdi
movl $0x30, %esi
movq 0x10(%rsp), %rax
callq *0x10(%rax)
cmpl $-0x1, %eax
je 0x33672
addl %eax, %r13d
movq 0x70(%rsp), %rax
testl %eax, %eax
je 0x335b4
movslq %eax, %rdx
movq 0x8(%rsp), %rdi
movq 0x58(%rsp), %rsi
movq 0x10(%rsp), %rax
callq *0x8(%rax)
cmpl $-0x1, %eax
je 0x33672
addl %eax, %r13d
movq 0x68(%rsp), %rdx
testl %edx, %edx
je 0x335db
movq 0x8(%rsp), %rdi
movl $0x30, %esi
movq 0x10(%rsp), %rax
callq *0x10(%rax)
cmpl $-0x1, %eax
je 0x33672
addl %eax, %r13d
testl %ebx, %ebx
movq 0x38(%rsp), %rsi
je 0x335ff
addq %r14, %rsi
movslq %ebx, %rdx
movq 0x8(%rsp), %rdi
movq 0x10(%rsp), %rax
callq *0x8(%rax)
cmpl $-0x1, %eax
je 0x33672
addl %eax, %r13d
testl %r12d, %r12d
je 0x33621
movq 0x8(%rsp), %rdi
movl $0x30, %esi
movl %r12d, %edx
movq 0x10(%rsp), %rax
callq *0x10(%rax)
cmpl $-0x1, %eax
je 0x33672
addl %eax, %r13d
movq 0x60(%rsp), %rax
testl %eax, %eax
je 0x3364a
movslq %eax, %rdx
leaq 0x80(%rsp), %rsi
movq 0x8(%rsp), %rdi
movq 0x10(%rsp), %rax
callq *0x8(%rax)
cmpl $-0x1, %eax
je 0x33672
addl %eax, %r13d
cmpl $0x1, 0x20(%rsp)
movq 0x30(%rsp), %rdx
jne 0x33678
movsbl 0x14(%r15), %esi
movq 0x8(%rsp), %rdi
movq 0x10(%rsp), %rax
callq *0x10(%rax)
cmpl $-0x1, %eax
je 0x33672
addl %eax, %r13d
jmp 0x33678
movl $0xffffffff, %r13d      # imm = 0xFFFFFFFF
movq 0x40(%rsp), %rdi
movq 0x50(%rsp), %rcx
leaq 0x13c17(%rip), %rax     # 0x472a0
incl %ecx
movslq %ecx, %rsi
callq *(%rax)
movl %r13d, %eax
addq $0xd8, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
addl %r12d, %ebx
incl %ebx
movq %rcx, %rsi
subq $0x1, %rsi
jb 0x33700
movsbq -0x1(%r9,%rcx), %rcx
movzwl (%rax,%rcx,2), %edi
xorl %r8d, %r8d
btl $0x9, %edi
setae %r8b
shll $0x5, %r8d
addl $-0x57, %r8d
btl $0xb, %edi
cmovbl %edx, %r8d
movslq %r8d, %rdi
addq %rcx, %rdi
incq %rdi
decl %ebx
movq %rsi, %rcx
cmpl %ebp, %edi
je 0x336ad
movq 0x48(%rsp), %rax
movb (%rax,%rdi), %al
movb %al, (%r9,%rsi)
movq 0x18(%rsp), %rdx
jmp 0x332ec
movb $0x31, (%r9)
movq 0x18(%rsp), %rdx
incq %rdx
movq %rdx, 0x18(%rsp)
movl $0x1, %ebx
jmp 0x332ec
nop