42-archive/42-piscine-c/d07/ex06/ft_convert_base.c
2016-08-25 20:50:28 +02:00

119 lines
2.7 KiB
C

/* ************************************************************************** */
/* */
/* ::: :::::::: */
/* ft_convert_base.c :+: :+: :+: */
/* +:+ +:+ +:+ */
/* By: jhalford <marvin@42.fr> +#+ +:+ +#+ */
/* +#+#+#+#+#+ +#+ */
/* Created: 2016/08/07 23:31:20 by jhalford #+# #+# */
/* Updated: 2016/08/25 17:32:17 by jhalford ### ########.fr */
/* */
/* ************************************************************************** */
#include <stdlib.h>
#define ABS(x) (((x) < 0) ? -(x) : (x))
#define NEG(x) (((x) < 0) ? 1 : 0)
#define POS(x) (((x) > 0) ? 1 : 0)
void ft_putchar(char c);
int get_size(char *str)
{
int i;
int j;
i = 0;
while (str[i] != '\0')
{
if (str[i] == '+' || str[i] == '-')
return (0);
if (str[i] < 32 || str[i] > 126)
return (0);
j = 0;
while (j < i)
{
if (str[j] == str[i])
return (0);
j++;
}
i++;
}
return (i);
}
int get_pos(char c, char *str)
{
int i;
i = 0;
while (c != str[i] && str[i])
i++;
return (i);
}
int ft_check_str(char *str, char *base, int base_size)
{
while (*str)
{
if (!(get_pos(*str, base) < base_size || *str == '-' || *str == '+'))
return (0);
str++;
}
return (1);
}
char *ft_itoa_base(int nbr, char *base, int base_size)
{
int i;
int len;
int neg;
int result[1000];
char *final;
i = 0;
neg = (nbr < 0);
final = (char *)malloc(sizeof(char) * 2);
*final = '\0';
if (base_size > 1)
{
while (nbr)
{
result[i++] = ABS(nbr % base_size);
nbr /= base_size;
}
len = i;
final = (char *)malloc(sizeof(final) * (len + 1 + NEG(nbr)));
final[POS(nbr)] = '-';
final[len + 1 + NEG(nbr)] = '\0';
while (--i >= 0)
final[i + NEG(nbr)] = base[result[len - i - 1]];
}
return (final);
}
char *ft_convert_base(char *str, char *base_from, char *base_to)
{
int base_size;
int res;
int sign;
base_size = get_size(base_from);
res = 0;
sign = 1;
if (!ft_check_str(str, base_from, base_size))
return (ft_itoa_base(0, "0", 1));
if (base_size > 1)
{
if (*str == '-' || *str == '+')
{
if (get_pos(*(str + 1), base_from) < base_size)
sign = (*str == '+') ? 1 : -1;
else
return (ft_itoa_base(0, "0", 1));
str++;
}
while (get_pos(*str, base_from) < base_size)
res = res * base_size + sign * get_pos(*str++, base_from);
}
return (ft_itoa_base(res, base_to, get_size(base_to)));
}