ft_printf/tmp_float.c at master · abdoualhaouil/ft_printf · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
/* ************************************************************************** */
/*                                                                            */
/*                                                        :::      ::::::::   */
/*   tmp_float.c                                        :+:      :+:    :+:   */
/*                                                    +:+ +:+         +:+     */
/*   By: aalhaoui <aalhaoui@student.42.fr>          +#+  +:+       +#+        */
/*                                                +#+#+#+#+#+   +#+           */
/*   Created: 2019/12/06 00:29:49 by aalhaoui          #+#    #+#             */
/*   Updated: 2019/12/08 00:27:33 by aalhaoui         ###   ########.fr       */
/*                                                                            */
/* ************************************************************************** */

#include "ft_printf.h"

static	char		*tmp_whole(t_double *d, t_float *f)
{
	if (++f->j > -1 && ((d->float_rep.mantissa >> f->i) & 1))
	{
		if (!(f->buffer = ft_power(2, f->j)))
			return (NULL);
		f->tmp = (f->res);
		if (!(f->res = addition(f->buffer, f->res, 0)))
			return (ft_free2(f->res, f->buffer));
		free(f->buffer);
		free(f->tmp);
	}
	return (f->res);
}

char				*ft_float_whole(t_double *d, int exp, t_float *f)
{
	if (exp < 0)
		return (ft_strdup("0"));
	if (!(f->res = zero(1)))
		return (NULL);
	f->i = (exp >= 0 && exp < 64) ? 62 - exp : -1;
	f->j = -1;
	while (++(f->i) < 64)
		if (!(f->res = tmp_whole(d, f)))
			return (ft_free2(d, f));
	(exp > 63) && (f->buffer = ft_power(2, exp - 63));
	(exp <= 63) && (f->buffer = ft_strdup("1"));
	if (!(f->buffer))
		return (NULL);
	f->tmp = (f->res);
	if (!(f->res = multiplication(f->buffer, (f->res), 0)))
		return (ft_free2(f->res, f->buffer));
	free(f->buffer);
	free(f->tmp);
	return (f->res);
}

char				*tmp_f(t_float *f)
{
	char	*tmp;

	if (f->j != (int)ft_strlen(f->buffer))
	{
		tmp = zero(f->j);
		f->tmp = f->buffer;
		if (!(f->buffer = addition(f->buffer, tmp, 1)))
			return (ft_free2(tmp, f->buffer));
		free(tmp);
		free(f->tmp);
	}
	return (f->buffer);
}

static	char		*tmp_frac(t_float *f, t_double *d, int exp)
{
	f->i = (exp >= 0 && exp < 63) ? 63 - exp : 64;
	f->j = 1;
	while (--(f->i) >= 0)
	{
		f->tmp = f->res;
		if (!(f->res = ft_strjoin(f->res, "0")))
			return (ft_free(f->res));
		free(f->tmp);
		if ((d->float_rep.mantissa >> f->i) & 1)
		{
			if (!(f->buffer = ft_power(5, f->j)))
				return (NULL);
			if (!(f->buffer = tmp_f(f)))
				return (NULL);
			f->tmp = f->res;
			if (!(f->res = addition(f->buffer, f->res, 1)))
				return (ft_free2(f->res, f->buffer));
			free(f->buffer);
			free(f->tmp);
		}
		f->j++;
	}
	return (f->res);
}

char				*ft_float_frac(t_double *d, int exp, t_float *f)
{
	char		*res;

	if (exp > 63)
		return (ft_strdup("0"));
	if (!(f->res = ft_strnew(0)))
		return (NULL);
	if (find_nbr_zero(f, d, exp) == -1)
		return (NULL);
	if (!(tmp_frac(f, d, exp)))
		return (NULL);
	if (!(res = multiplication(f->buffer2, f->res, 1)))
		return (ft_free2(f->buffer2, f->res));
	free(f->buffer2);
	free(f->res);
	f->i = ft_strlen(f->res) - 1;
	while (f->res[f->i] == '0' && f->i > 0)
		f->res[f->i--] = '\0';
	return (res);
}