libft/ft_printf.c at master · gregorydannay/libft · 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
117
118
119
120
121
122
123
124
125
/* ************************************************************************** */
/*                                                                            */
/*                                                        :::      ::::::::   */
/*   ft_printf.c                                        :+:      :+:    :+:   */
/*                                                    +:+ +:+         +:+     */
/*   By: gdannay <marvin@42.fr>                     +#+  +:+       +#+        */
/*                                                +#+#+#+#+#+   +#+           */
/*   Created: 2017/11/21 10:02:16 by gdannay           #+#    #+#             */
/*   Updated: 2017/12/13 18:12:06 by gdannay          ###   ########.fr       */
/*                                                                            */
/* ************************************************************************** */

#include "libft.h"

static t_flag		*parse_str(char *str)
{
	t_flag		*flag;
	t_flag		*tmp;
	t_flag		*tmp2;
	int			i;

	flag = NULL;
	tmp = NULL;
	tmp2 = NULL;
	i = 0;
	while (str && str[i] != '\0')
	{
		if (str[i] == '%' && str[i + 1])
		{
			i++;
			if ((tmp = check_carac(str, &i)) == NULL)
				return (NULL);
			if (flag == NULL)
				flag = tmp;
			else
				tmp2->next = tmp;
			tmp2 = tmp;
		}
		i++;
	}
	return (flag);
}

static void			fill_unsigned(va_list va, t_flag *tmp)
{
	if (tmp->type == 'U')
		tmp->unb = (unsigned long long)va_arg(va, unsigned long long);
	else if (tmp->type == 'O')
		tmp->unb = va_arg(va, unsigned long);
	else if (tmp->length == 1)
		tmp->unb = (unsigned char)va_arg(va, int);
	else if (tmp->length == 2)
		tmp->unb = (unsigned short)va_arg(va, int);
	else if (tmp->length == 3)
		tmp->unb = va_arg(va, unsigned long);
	else if (tmp->length == 4)
		tmp->unb = va_arg(va, unsigned long long);
	else if (tmp->length == 6)
		tmp->unb = va_arg(va, size_t);
	else if (tmp->length == 7)
		tmp->unb = va_arg(va, intmax_t);
	else
		tmp->unb = va_arg(va, unsigned int);
}

static void			fill_int(va_list va, t_flag *tmp)
{
	if (tmp->type == 'D')
		tmp->nb = va_arg(va, long);
	else if (tmp->length == 1)
		tmp->nb = (char)va_arg(va, int);
	else if (tmp->length == 2)
		tmp->nb = (short)va_arg(va, int);
	else if (tmp->length == 3)
		tmp->nb = va_arg(va, long);
	else if (tmp->length == 4)
		tmp->nb = va_arg(va, long long);
	else if (tmp->length == 6)
		tmp->nb = va_arg(va, size_t);
	else if (tmp->length == 7)
		tmp->nb = va_arg(va, intmax_t);
	else
		tmp->nb = va_arg(va, int);
}

static void			fill_content(va_list va, t_flag *tmp)
{
	if (tmp->width == -2 || tmp->precision == -2 || tmp->width == -3)
		fill_wp(tmp, va);
	if (tmp->inttype == 1 || (tmp->inttype == 6 && tmp->length == 0))
		fill_int(va, tmp);
	else if (tmp->inttype == 4 || tmp->inttype == 6)
		fill_unsigned(va, tmp);
	else if (tmp->inttype == 2)
		tmp->st = ft_strdup(va_arg(va, char *));
	else if (tmp->inttype == 3)
		tmp->unb = (unsigned long long)va_arg(va, void *);
	else if (tmp->inttype == 8)
		tmp->nb = va_arg(va, wchar_t);
	else if (tmp->inttype == 9)
		tmp->wst = ft_wstrdup(va_arg(va, wchar_t *));
}

int					ft_printf(char *str, ...)
{
	va_list		va;
	t_flag		*flag;
	t_flag		*tmp;
	int			length;

	va_start(va, str);
	length = 0;
	if ((flag = parse_str(str)) == NULL && str == NULL)
		return (0);
	tmp = flag;
	while (tmp)
	{
		fill_content(va, tmp);
		tmp = tmp->next;
	}
	length = display(str, flag);
	free_lst(&flag);
	va_end(va);
	return (length);
}