tvdu29/Corewar-Final
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

push

Browse Source
This commit is contained in:
Jeremy FLEURY
2019-07-17 11:22:24 +02:00
commit 748d10f4f3
174 changed files with 8953 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

67
libft/printf/ft_printf_db.c Normal file
View File

@@ -0,0 +1,67 @@
/* ************************************************************************** */
/* */
/* ::: :::::::: */
/* ft_printf_db.c :+: :+: :+: */
/* +:+ +:+ +:+ */
/* By: igarbuz <marvin@42.fr> +#+ +:+ +#+ */
/* +#+#+#+#+#+ +#+ */
/* Created: 2019/01/24 13:06:20 by igarbuz #+# #+# */
/* Updated: 2019/01/24 13:06:22 by igarbuz ### ########.fr */
/* */
/* ************************************************************************** */
#include "ft_printf.h"
static char *ft_naninf_db(t_value *t)
{
if (((t->u32.hi & 0x000fffff) | t->u32.lo) != 0)
return ("nan");
else
return ("inf");
}
static void ft_fract_to_nd(t_value *t, t_nd *nd, int32_t *e)
{
if (t->u32.lo)
{
*e -= 32;
nd->n[0] = (nd->n[0] << 3) | (t->u32.lo >> 29);
ft_nd_mul2p(nd, 29, t->u32.lo & 0x1fffffff);
}
}
static void ft_implicit_one(int32_t *e, t_nd *nd)
{
if (*e == 0)
(*e)++;
else
nd->n[0] |= 0x100000;
}
char *ft_printf_db(double *n, int r, char *tbl)
{
t_value t;
int32_t e;
t_nd nd;
t.n = *n;
ft_init_nd(&nd);
if ((t.u32.hi << 1) >= 0xffe00000)
return (ft_naninf_db(&t));
else
{
e = (t.u32.hi >> 20) & 0x7ff;
nd.n[0] = t.u32.hi & 0xfffff;
ft_implicit_one(&e, &nd);
e -= 1043;
ft_fract_to_nd(&t, &nd, &e);
if (e >= 0)
ft_nd_mul2p(&nd, (uint32_t)e, 0);
else
ft_nd_div2p(&nd, (uint32_t)-e);
if (n && nd.lo)
ft_round(&nd, &r);
return (ft_buf_print_db(&nd, r, tbl));
}
return (0);
}