ft_utoa_base.c

/* ************************************************************************** */
/*                                                                            */
/*                                                        :::      ::::::::   */
/*   ft_utoa_base.c                                     :+:      :+:    :+:   */
/*                                                    +:+ +:+         +:+     */
/*   By: qdegraev <marvin@42.fr>                    +#+  +:+       +#+        */
/*                                                +#+#+#+#+#+   +#+           */
/*   Created: 2016/02/12 11:43:33 by qdegraev          #+#    #+#             */
/*   Updated: 2016/02/22 12:57:03 by qdegraev         ###   ########.fr       */
/*                                                                            */
/* ************************************************************************** */

#include "ft_printf.h"
#include <stdio.h>

char	*ft_utoa_base(unsigned long long value, int base)
{
	int					len;
	char				*ret;
	unsigned long long	tmp;

	if (base < 2 || base > 16)
		return (NULL);
	len = 1;
	tmp = value;
	while ((tmp = tmp / base))
		len++;
	if (!(ret = (char*)malloc(sizeof(char) * len + 1)))
		return (NULL);
	ret[len--] = '\0';
	while (len >= 0 && value / base != 0)
	{
		ret[len] = value % base < 10 ? value % base + '0' : value % base + '7';
		value /= base;
		len--;
	}
	ret[len--] = value % base < 10 ? value % base + '0' : value % base + '7';
	return (ret);
}

char	*ft_ltoa_base(long long value, int base)
{
	int				len;
	int				i;
	char			*ret;
	long long		tmp;

	if (base < 2 || base > 16)
		return (NULL);
	len = 1;
	tmp = value;
	while ((tmp = tmp / base))
		len++;
	if (!(ret = (char*)malloc(sizeof(char) * len + 1)))
		return (NULL);
	ret[len--] = '\0';
	while (len >= 0 && value / base != 0)
	{
		i = ft_abs(value % base);
		ret[len] = i < 10 ? i + '0' : i + '7';
		value /= base;
		len--;
	}
	i = ft_abs(value % base);
	ret[len--] = i < 10 ? i + '0' : i + '7';
	return (ret);
}

char	*precision_zero(double value, int base, t_arg *a)
{
	char	*ret;

	value = (10 * (value - (int)value)) > 5 ? value + 1 : value;
	ret = a->f_h ? ft_cjoin(ft_ltoa_base((int)value, base), ft_strdup("."))
		: ft_cjoin(NULL, ft_ltoa_base((int)value, base));
	return (ret);
}

char	*ft_dtoa_base(double value, int base, int precision, t_arg *a)
{
	char			*ret;
	double			tmp;

	if (base < 2 || base > 16)
		return (NULL);
	if (precision > 0)
	{
		ret = ft_cjoin(NULL, ft_ltoa_base((int)value, base));
		tmp = value < 0 ? -1 * (value - (int)value) : value - (int)value;
		value = tmp;
		while ((value = value - (int)value) > 0 && precision > 0)
		{
			tmp = tmp * 10;
			value = tmp;
			precision--;
		}
		ret = ft_cjoin(ret, ft_strdup("."));
		tmp = value > 0.5 ? tmp + 1 : tmp;
		ret = ft_cjoin(ret, ft_ltoa_base(tmp, base));
	}
	else
		ret = precision_zero(value, base, a);
	return (ret);
}