printf/ft_unicode_format.c at master · devsagul/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
/* ************************************************************************** */
/*                                                                            */
/*                                                        :::      ::::::::   */
/*   ft_unicode_format.c                                :+:      :+:    :+:   */
/*                                                    +:+ +:+         +:+     */
/*   By: mbalon-s <mbalon-s@student.42.fr>          +#+  +:+       +#+        */
/*                                                +#+#+#+#+#+   +#+           */
/*   Created: 2019/02/27 22:17:08 by mbalon-s          #+#    #+#             */
/*   Updated: 2019/03/01 11:59:44 by mbalon-s         ###   ########.fr       */
/*                                                                            */
/* ************************************************************************** */

#include <stdarg.h>
#include <stdlib.h>
#include "libftprintf.h"

static int				utf8_strlen_limited(unsigned int *str, int max)
{
	int		res;

	res = 0;
	while (*str != '\0')
	{
		res += ft_utf8_count_bytes(*str);
		if (res > max)
		{
			res -= ft_utf8_count_bytes(*str);
			return (res);
		}
		str++;
	}
	return (res);
}

static int				utf8_strlen(unsigned int *str)
{
	int		res;

	res = 0;
	while (*str != '\0')
	{
		res += ft_utf8_count_bytes(*str);
		str++;
	}
	return (res);
}

int						utf8_strncpy(char *dst, unsigned int *src, int length)
{
	size_t			i;
	size_t			j;
	unsigned int	c;
	int				bytes;
	int				res;

	i = 0;
	j = 0;
	res = 0;
	while (src[j] != '\0' && ft_utf8_count_bytes(src[j]) + res <= length)
	{
		bytes = ft_utf8_count_bytes(src[j]);
		c = ft_utf8_convert(src[j], bytes);
		res += bytes;
		while (bytes)
		{
			bytes--;
			dst[i] = (char)(((0xFF << 8 * bytes) & c) >> 8 * bytes);
			i++;
		}
		j++;
	}
	return (0);
}

t_specification			unicode_format_prepare(unsigned int *arg,
												t_specification spec)
{
	int				len;

	if (spec.precision_set)
		len = utf8_strlen_limited(arg, spec.precision);
	else
		len = utf8_strlen(arg);
	if (!spec.precision_set || len < spec.precision)
		spec.precision = len;
	if (spec.minwidth < spec.precision)
		spec.minwidth = spec.precision;
	return (spec);
}

size_t					ft_unicode_format(char **pdst, t_specification spec,
											va_list ap)
{
	char			*str;
	unsigned int	*arg;

	arg = (unsigned int *)va_arg(ap, unsigned int *);
	if (arg == NULL)
		arg = (unsigned int *)L"(null)";
	spec = unicode_format_prepare(arg, spec);
	str = (char *)malloc(sizeof(char) * (spec.minwidth + 4));
	if (str == NULL)
		return (0);
	if (!spec.force_zeroes || spec.align_left)
		ft_memset(str, ' ', sizeof(char) * spec.minwidth);
	else
		ft_memset(str, '0', sizeof(char) * spec.minwidth);
	ft_bzero(str + spec.minwidth, 4);
	if (!spec.align_left)
		spec.minwidth += utf8_strncpy(str + spec.minwidth - spec.precision,
										arg, spec.precision);
	else
		spec.minwidth += utf8_strncpy(str, arg, spec.precision);
	*pdst = str;
	return (spec.minwidth);
}