Started from buttom go to the sky
This commit is contained in:
parent
96215449bd
commit
f811e55dea
4781 changed files with 10121 additions and 1743 deletions
129
stdme/output/src/convert/str_to_i16.c
Normal file
129
stdme/output/src/convert/str_to_i16.c
Normal file
|
|
@ -0,0 +1,129 @@
|
|||
/* ************************************************************************** */
|
||||
/* */
|
||||
/* ::: :::::::: */
|
||||
/* str_to_i64.c :+: :+: :+: */
|
||||
/* +:+ +:+ +:+ */
|
||||
/* By: maiboyer <maiboyer@student.42.fr> +#+ +:+ +#+ */
|
||||
/* +#+#+#+#+#+ +#+ */
|
||||
/* Created: 2024/02/01 21:15:19 by maiboyer #+# #+# */
|
||||
/* Updated: 2024/02/01 23:18:52 by maiboyer ### ########.fr */
|
||||
/* */
|
||||
/* ************************************************************************** */
|
||||
|
||||
#include "me/char/isalpha.h"
|
||||
#include "me/convert/str_to_numbers.h"
|
||||
#include "me/string/str_len.h"
|
||||
#include "me/types.h"
|
||||
|
||||
#define OP_ADD 0b0001
|
||||
#define OP_SUB 0b0010
|
||||
#define OP_MUL 0b0100
|
||||
#define OP_CHK 0b1000
|
||||
|
||||
t_error checked_add_i16(t_i16 lhs, t_i16 rhs, t_i16 *out);
|
||||
t_error checked_sub_i16(t_i16 lhs, t_i16 rhs, t_i16 *out);
|
||||
t_error checked_mul_i16(t_i16 lhs, t_i16 rhs, t_i16 *out);
|
||||
|
||||
static inline bool can_not_overflow(t_u32 radix, bool is_signed_type,
|
||||
t_usize digits_len)
|
||||
{
|
||||
return (radix <= 16 && digits_len <= sizeof(t_i16) * 2
|
||||
- (t_usize)is_signed_type);
|
||||
}
|
||||
|
||||
static inline t_error to_digit(t_u8 ascii, t_u32 radix, t_u32 *out)
|
||||
{
|
||||
t_u32 digit;
|
||||
|
||||
if (radix < 2 || radix > 36)
|
||||
return (ERROR);
|
||||
digit = ascii - '0';
|
||||
if (radix > 10 && digit >= 10)
|
||||
{
|
||||
if (!me_isalpha(ascii))
|
||||
return (ERROR);
|
||||
digit = ((ascii | 0b100000) - 'a') + 10;
|
||||
}
|
||||
if (digit >= radix)
|
||||
return (ERROR);
|
||||
*out = digit;
|
||||
return (NO_ERROR);
|
||||
}
|
||||
|
||||
static inline t_error do_operation(t_i16 digit, t_u8 op, t_i16 *result)
|
||||
{
|
||||
t_i16 rhs;
|
||||
t_i16 res;
|
||||
|
||||
rhs = *result;
|
||||
res = *result;
|
||||
if (op & OP_CHK)
|
||||
{
|
||||
if (op & OP_MUL && checked_mul_i16(rhs, digit, &res))
|
||||
return (ERROR);
|
||||
else if (op & OP_ADD && checked_add_i16(rhs, digit, &res))
|
||||
return (ERROR);
|
||||
else if (op & OP_SUB && checked_sub_i16(rhs, digit, &res))
|
||||
return (ERROR);
|
||||
}
|
||||
else
|
||||
{
|
||||
if (op & OP_MUL)
|
||||
res = rhs * digit;
|
||||
else if (op & OP_ADD)
|
||||
res = rhs + digit;
|
||||
else if (op & OP_SUB)
|
||||
res = rhs - digit;
|
||||
}
|
||||
*result = res;
|
||||
return (NO_ERROR);
|
||||
}
|
||||
|
||||
static inline t_error loop_inner(t_const_str s, t_u32 radix, t_u8 op,
|
||||
t_i16 *out)
|
||||
{
|
||||
t_u32 digit;
|
||||
t_i16 result;
|
||||
|
||||
result = 0;
|
||||
while (*s)
|
||||
{
|
||||
if (do_operation(radix, (op & OP_CHK) | OP_MUL, &result))
|
||||
return (ERROR);
|
||||
if (to_digit(*s, radix, &digit))
|
||||
return (ERROR);
|
||||
if (do_operation(digit, op, &result))
|
||||
return (ERROR);
|
||||
s++;
|
||||
}
|
||||
if (out)
|
||||
*out = result;
|
||||
return (NO_ERROR);
|
||||
}
|
||||
|
||||
t_error str_to_i16(t_const_str s, t_u32 radix, t_i16 *out)
|
||||
{
|
||||
t_usize digits_len;
|
||||
bool is_positive;
|
||||
t_u8 op;
|
||||
|
||||
if (radix < 2 || radix > 36)
|
||||
return (ERROR);
|
||||
digits_len = str_len(s);
|
||||
is_positive = true;
|
||||
if (digits_len == 0)
|
||||
return (ERROR);
|
||||
if ((s[0] == '-' || s[0] == '+') && s[1] == '\0')
|
||||
return (ERROR);
|
||||
else if (s[0] == '+')
|
||||
is_positive = (s++, digits_len--, true);
|
||||
else if (s[0] == '-' && true)
|
||||
is_positive = (s++, digits_len--, false);
|
||||
if (is_positive)
|
||||
op = OP_ADD;
|
||||
else
|
||||
op = OP_SUB;
|
||||
if (!can_not_overflow(radix, true, digits_len))
|
||||
op |= OP_CHK;
|
||||
return (loop_inner(s, radix, op, out));
|
||||
}
|
||||
45
stdme/output/src/convert/str_to_i16_utils.c
Normal file
45
stdme/output/src/convert/str_to_i16_utils.c
Normal file
|
|
@ -0,0 +1,45 @@
|
|||
/* ************************************************************************** */
|
||||
/* */
|
||||
/* ::: :::::::: */
|
||||
/* str_to_i16_utils.c :+: :+: :+: */
|
||||
/* +:+ +:+ +:+ */
|
||||
/* By: maiboyer <maiboyer@student.42.fr> +#+ +:+ +#+ */
|
||||
/* +#+#+#+#+#+ +#+ */
|
||||
/* Created: 2024/02/01 21:15:19 by maiboyer #+# #+# */
|
||||
/* Updated: 2024/03/07 15:24:57 by maiboyer ### ########.fr */
|
||||
/* */
|
||||
/* ************************************************************************** */
|
||||
|
||||
#include "me/char/isalpha.h"
|
||||
#include "me/convert/str_to_numbers.h"
|
||||
#include "me/printf/printf.h"
|
||||
#include "me/string/str_len.h"
|
||||
#include "me/types.h"
|
||||
|
||||
t_error checked_add_i16(t_i16 lhs, t_i16 rhs, t_i16 *out)
|
||||
{
|
||||
if (rhs > 0 && (lhs > 32767 - rhs))
|
||||
return (ERROR);
|
||||
*out = (t_i16)(lhs + rhs);
|
||||
return (NO_ERROR);
|
||||
}
|
||||
|
||||
t_error checked_sub_i16(t_i16 lhs, t_i16 rhs, t_i16 *out)
|
||||
{
|
||||
if ((((rhs & (1 << (sizeof(t_i16) - 1)) || rhs == 0) || !true) && (lhs \
|
||||
< -32768 + rhs)))
|
||||
return (ERROR);
|
||||
*out = (t_i16)(lhs - rhs);
|
||||
return (NO_ERROR);
|
||||
}
|
||||
|
||||
t_error checked_mul_i16(t_i16 lhs, t_i16 rhs, t_i16 *out)
|
||||
{
|
||||
t_i16 mul;
|
||||
|
||||
mul = lhs * rhs;
|
||||
if (lhs != 0 && mul / lhs != rhs)
|
||||
return (ERROR);
|
||||
*out = mul;
|
||||
return (NO_ERROR);
|
||||
}
|
||||
129
stdme/output/src/convert/str_to_i32.c
Normal file
129
stdme/output/src/convert/str_to_i32.c
Normal file
|
|
@ -0,0 +1,129 @@
|
|||
/* ************************************************************************** */
|
||||
/* */
|
||||
/* ::: :::::::: */
|
||||
/* str_to_i64.c :+: :+: :+: */
|
||||
/* +:+ +:+ +:+ */
|
||||
/* By: maiboyer <maiboyer@student.42.fr> +#+ +:+ +#+ */
|
||||
/* +#+#+#+#+#+ +#+ */
|
||||
/* Created: 2024/02/01 21:15:19 by maiboyer #+# #+# */
|
||||
/* Updated: 2024/02/01 23:18:52 by maiboyer ### ########.fr */
|
||||
/* */
|
||||
/* ************************************************************************** */
|
||||
|
||||
#include "me/char/isalpha.h"
|
||||
#include "me/convert/str_to_numbers.h"
|
||||
#include "me/string/str_len.h"
|
||||
#include "me/types.h"
|
||||
|
||||
#define OP_ADD 0b0001
|
||||
#define OP_SUB 0b0010
|
||||
#define OP_MUL 0b0100
|
||||
#define OP_CHK 0b1000
|
||||
|
||||
t_error checked_add_i32(t_i32 lhs, t_i32 rhs, t_i32 *out);
|
||||
t_error checked_sub_i32(t_i32 lhs, t_i32 rhs, t_i32 *out);
|
||||
t_error checked_mul_i32(t_i32 lhs, t_i32 rhs, t_i32 *out);
|
||||
|
||||
static inline bool can_not_overflow(t_u32 radix, bool is_signed_type,
|
||||
t_usize digits_len)
|
||||
{
|
||||
return (radix <= 16 && digits_len <= sizeof(t_i32) * 2
|
||||
- (t_usize)is_signed_type);
|
||||
}
|
||||
|
||||
static inline t_error to_digit(t_u8 ascii, t_u32 radix, t_u32 *out)
|
||||
{
|
||||
t_u32 digit;
|
||||
|
||||
if (radix < 2 || radix > 36)
|
||||
return (ERROR);
|
||||
digit = ascii - '0';
|
||||
if (radix > 10 && digit >= 10)
|
||||
{
|
||||
if (!me_isalpha(ascii))
|
||||
return (ERROR);
|
||||
digit = ((ascii | 0b100000) - 'a') + 10;
|
||||
}
|
||||
if (digit >= radix)
|
||||
return (ERROR);
|
||||
*out = digit;
|
||||
return (NO_ERROR);
|
||||
}
|
||||
|
||||
static inline t_error do_operation(t_i32 digit, t_u8 op, t_i32 *result)
|
||||
{
|
||||
t_i32 rhs;
|
||||
t_i32 res;
|
||||
|
||||
rhs = *result;
|
||||
res = *result;
|
||||
if (op & OP_CHK)
|
||||
{
|
||||
if (op & OP_MUL && checked_mul_i32(rhs, digit, &res))
|
||||
return (ERROR);
|
||||
else if (op & OP_ADD && checked_add_i32(rhs, digit, &res))
|
||||
return (ERROR);
|
||||
else if (op & OP_SUB && checked_sub_i32(rhs, digit, &res))
|
||||
return (ERROR);
|
||||
}
|
||||
else
|
||||
{
|
||||
if (op & OP_MUL)
|
||||
res = rhs * digit;
|
||||
else if (op & OP_ADD)
|
||||
res = rhs + digit;
|
||||
else if (op & OP_SUB)
|
||||
res = rhs - digit;
|
||||
}
|
||||
*result = res;
|
||||
return (NO_ERROR);
|
||||
}
|
||||
|
||||
static inline t_error loop_inner(t_const_str s, t_u32 radix, t_u8 op,
|
||||
t_i32 *out)
|
||||
{
|
||||
t_u32 digit;
|
||||
t_i32 result;
|
||||
|
||||
result = 0;
|
||||
while (*s)
|
||||
{
|
||||
if (do_operation(radix, (op & OP_CHK) | OP_MUL, &result))
|
||||
return (ERROR);
|
||||
if (to_digit(*s, radix, &digit))
|
||||
return (ERROR);
|
||||
if (do_operation(digit, op, &result))
|
||||
return (ERROR);
|
||||
s++;
|
||||
}
|
||||
if (out)
|
||||
*out = result;
|
||||
return (NO_ERROR);
|
||||
}
|
||||
|
||||
t_error str_to_i32(t_const_str s, t_u32 radix, t_i32 *out)
|
||||
{
|
||||
t_usize digits_len;
|
||||
bool is_positive;
|
||||
t_u8 op;
|
||||
|
||||
if (radix < 2 || radix > 36)
|
||||
return (ERROR);
|
||||
digits_len = str_len(s);
|
||||
is_positive = true;
|
||||
if (digits_len == 0)
|
||||
return (ERROR);
|
||||
if ((s[0] == '-' || s[0] == '+') && s[1] == '\0')
|
||||
return (ERROR);
|
||||
else if (s[0] == '+')
|
||||
is_positive = (s++, digits_len--, true);
|
||||
else if (s[0] == '-' && true)
|
||||
is_positive = (s++, digits_len--, false);
|
||||
if (is_positive)
|
||||
op = OP_ADD;
|
||||
else
|
||||
op = OP_SUB;
|
||||
if (!can_not_overflow(radix, true, digits_len))
|
||||
op |= OP_CHK;
|
||||
return (loop_inner(s, radix, op, out));
|
||||
}
|
||||
45
stdme/output/src/convert/str_to_i32_utils.c
Normal file
45
stdme/output/src/convert/str_to_i32_utils.c
Normal file
|
|
@ -0,0 +1,45 @@
|
|||
/* ************************************************************************** */
|
||||
/* */
|
||||
/* ::: :::::::: */
|
||||
/* str_to_i32_utils.c :+: :+: :+: */
|
||||
/* +:+ +:+ +:+ */
|
||||
/* By: maiboyer <maiboyer@student.42.fr> +#+ +:+ +#+ */
|
||||
/* +#+#+#+#+#+ +#+ */
|
||||
/* Created: 2024/02/01 21:15:19 by maiboyer #+# #+# */
|
||||
/* Updated: 2024/03/07 15:24:49 by maiboyer ### ########.fr */
|
||||
/* */
|
||||
/* ************************************************************************** */
|
||||
|
||||
#include "me/char/isalpha.h"
|
||||
#include "me/convert/str_to_numbers.h"
|
||||
#include "me/printf/printf.h"
|
||||
#include "me/string/str_len.h"
|
||||
#include "me/types.h"
|
||||
|
||||
t_error checked_add_i32(t_i32 lhs, t_i32 rhs, t_i32 *out)
|
||||
{
|
||||
if (rhs > 0 && (lhs > 2147483647 - rhs))
|
||||
return (ERROR);
|
||||
*out = (t_i32)(lhs + rhs);
|
||||
return (NO_ERROR);
|
||||
}
|
||||
|
||||
t_error checked_sub_i32(t_i32 lhs, t_i32 rhs, t_i32 *out)
|
||||
{
|
||||
if ((((rhs & (1 << (sizeof(t_i32) - 1)) || rhs == 0) || !true) && (lhs \
|
||||
< -2147483648 + rhs)))
|
||||
return (ERROR);
|
||||
*out = (t_i32)(lhs - rhs);
|
||||
return (NO_ERROR);
|
||||
}
|
||||
|
||||
t_error checked_mul_i32(t_i32 lhs, t_i32 rhs, t_i32 *out)
|
||||
{
|
||||
t_i32 mul;
|
||||
|
||||
mul = lhs * rhs;
|
||||
if (lhs != 0 && mul / lhs != rhs)
|
||||
return (ERROR);
|
||||
*out = mul;
|
||||
return (NO_ERROR);
|
||||
}
|
||||
129
stdme/output/src/convert/str_to_i64.c
Normal file
129
stdme/output/src/convert/str_to_i64.c
Normal file
|
|
@ -0,0 +1,129 @@
|
|||
/* ************************************************************************** */
|
||||
/* */
|
||||
/* ::: :::::::: */
|
||||
/* str_to_i64.c :+: :+: :+: */
|
||||
/* +:+ +:+ +:+ */
|
||||
/* By: maiboyer <maiboyer@student.42.fr> +#+ +:+ +#+ */
|
||||
/* +#+#+#+#+#+ +#+ */
|
||||
/* Created: 2024/02/01 21:15:19 by maiboyer #+# #+# */
|
||||
/* Updated: 2024/02/01 23:18:52 by maiboyer ### ########.fr */
|
||||
/* */
|
||||
/* ************************************************************************** */
|
||||
|
||||
#include "me/char/isalpha.h"
|
||||
#include "me/convert/str_to_numbers.h"
|
||||
#include "me/string/str_len.h"
|
||||
#include "me/types.h"
|
||||
|
||||
#define OP_ADD 0b0001
|
||||
#define OP_SUB 0b0010
|
||||
#define OP_MUL 0b0100
|
||||
#define OP_CHK 0b1000
|
||||
|
||||
t_error checked_add_i64(t_i64 lhs, t_i64 rhs, t_i64 *out);
|
||||
t_error checked_sub_i64(t_i64 lhs, t_i64 rhs, t_i64 *out);
|
||||
t_error checked_mul_i64(t_i64 lhs, t_i64 rhs, t_i64 *out);
|
||||
|
||||
static inline bool can_not_overflow(t_u32 radix, bool is_signed_type,
|
||||
t_usize digits_len)
|
||||
{
|
||||
return (radix <= 16 && digits_len <= sizeof(t_i64) * 2
|
||||
- (t_usize)is_signed_type);
|
||||
}
|
||||
|
||||
static inline t_error to_digit(t_u8 ascii, t_u32 radix, t_u32 *out)
|
||||
{
|
||||
t_u32 digit;
|
||||
|
||||
if (radix < 2 || radix > 36)
|
||||
return (ERROR);
|
||||
digit = ascii - '0';
|
||||
if (radix > 10 && digit >= 10)
|
||||
{
|
||||
if (!me_isalpha(ascii))
|
||||
return (ERROR);
|
||||
digit = ((ascii | 0b100000) - 'a') + 10;
|
||||
}
|
||||
if (digit >= radix)
|
||||
return (ERROR);
|
||||
*out = digit;
|
||||
return (NO_ERROR);
|
||||
}
|
||||
|
||||
static inline t_error do_operation(t_i64 digit, t_u8 op, t_i64 *result)
|
||||
{
|
||||
t_i64 rhs;
|
||||
t_i64 res;
|
||||
|
||||
rhs = *result;
|
||||
res = *result;
|
||||
if (op & OP_CHK)
|
||||
{
|
||||
if (op & OP_MUL && checked_mul_i64(rhs, digit, &res))
|
||||
return (ERROR);
|
||||
else if (op & OP_ADD && checked_add_i64(rhs, digit, &res))
|
||||
return (ERROR);
|
||||
else if (op & OP_SUB && checked_sub_i64(rhs, digit, &res))
|
||||
return (ERROR);
|
||||
}
|
||||
else
|
||||
{
|
||||
if (op & OP_MUL)
|
||||
res = rhs * digit;
|
||||
else if (op & OP_ADD)
|
||||
res = rhs + digit;
|
||||
else if (op & OP_SUB)
|
||||
res = rhs - digit;
|
||||
}
|
||||
*result = res;
|
||||
return (NO_ERROR);
|
||||
}
|
||||
|
||||
static inline t_error loop_inner(t_const_str s, t_u32 radix, t_u8 op,
|
||||
t_i64 *out)
|
||||
{
|
||||
t_u32 digit;
|
||||
t_i64 result;
|
||||
|
||||
result = 0ll;
|
||||
while (*s)
|
||||
{
|
||||
if (do_operation(radix, (op & OP_CHK) | OP_MUL, &result))
|
||||
return (ERROR);
|
||||
if (to_digit(*s, radix, &digit))
|
||||
return (ERROR);
|
||||
if (do_operation(digit, op, &result))
|
||||
return (ERROR);
|
||||
s++;
|
||||
}
|
||||
if (out)
|
||||
*out = result;
|
||||
return (NO_ERROR);
|
||||
}
|
||||
|
||||
t_error str_to_i64(t_const_str s, t_u32 radix, t_i64 *out)
|
||||
{
|
||||
t_usize digits_len;
|
||||
bool is_positive;
|
||||
t_u8 op;
|
||||
|
||||
if (radix < 2 || radix > 36)
|
||||
return (ERROR);
|
||||
digits_len = str_len(s);
|
||||
is_positive = true;
|
||||
if (digits_len == 0)
|
||||
return (ERROR);
|
||||
if ((s[0] == '-' || s[0] == '+') && s[1] == '\0')
|
||||
return (ERROR);
|
||||
else if (s[0] == '+')
|
||||
is_positive = (s++, digits_len--, true);
|
||||
else if (s[0] == '-' && true)
|
||||
is_positive = (s++, digits_len--, false);
|
||||
if (is_positive)
|
||||
op = OP_ADD;
|
||||
else
|
||||
op = OP_SUB;
|
||||
if (!can_not_overflow(radix, true, digits_len))
|
||||
op |= OP_CHK;
|
||||
return (loop_inner(s, radix, op, out));
|
||||
}
|
||||
45
stdme/output/src/convert/str_to_i64_utils.c
Normal file
45
stdme/output/src/convert/str_to_i64_utils.c
Normal file
|
|
@ -0,0 +1,45 @@
|
|||
/* ************************************************************************** */
|
||||
/* */
|
||||
/* ::: :::::::: */
|
||||
/* str_to_i64_utils.c :+: :+: :+: */
|
||||
/* +:+ +:+ +:+ */
|
||||
/* By: maiboyer <maiboyer@student.42.fr> +#+ +:+ +#+ */
|
||||
/* +#+#+#+#+#+ +#+ */
|
||||
/* Created: 2024/02/01 21:15:19 by maiboyer #+# #+# */
|
||||
/* Updated: 2024/03/07 15:24:38 by maiboyer ### ########.fr */
|
||||
/* */
|
||||
/* ************************************************************************** */
|
||||
|
||||
#include "me/char/isalpha.h"
|
||||
#include "me/convert/str_to_numbers.h"
|
||||
#include "me/printf/printf.h"
|
||||
#include "me/string/str_len.h"
|
||||
#include "me/types.h"
|
||||
|
||||
t_error checked_add_i64(t_i64 lhs, t_i64 rhs, t_i64 *out)
|
||||
{
|
||||
if (rhs > 0 && (lhs > 9223372036854775807ll - rhs))
|
||||
return (ERROR);
|
||||
*out = (t_i64)(lhs + rhs);
|
||||
return (NO_ERROR);
|
||||
}
|
||||
|
||||
t_error checked_sub_i64(t_i64 lhs, t_i64 rhs, t_i64 *out)
|
||||
{
|
||||
if ((((rhs & (1 << (sizeof(t_i64) - 1)) || rhs == 0) || !true) && (lhs \
|
||||
< -(~9223372036854775807ll + 1) + rhs)))
|
||||
return (ERROR);
|
||||
*out = (t_i64)(lhs - rhs);
|
||||
return (NO_ERROR);
|
||||
}
|
||||
|
||||
t_error checked_mul_i64(t_i64 lhs, t_i64 rhs, t_i64 *out)
|
||||
{
|
||||
t_i64 mul;
|
||||
|
||||
mul = lhs * rhs;
|
||||
if (lhs != 0 && mul / lhs != rhs)
|
||||
return (ERROR);
|
||||
*out = mul;
|
||||
return (NO_ERROR);
|
||||
}
|
||||
129
stdme/output/src/convert/str_to_i8.c
Normal file
129
stdme/output/src/convert/str_to_i8.c
Normal file
|
|
@ -0,0 +1,129 @@
|
|||
/* ************************************************************************** */
|
||||
/* */
|
||||
/* ::: :::::::: */
|
||||
/* str_to_i64.c :+: :+: :+: */
|
||||
/* +:+ +:+ +:+ */
|
||||
/* By: maiboyer <maiboyer@student.42.fr> +#+ +:+ +#+ */
|
||||
/* +#+#+#+#+#+ +#+ */
|
||||
/* Created: 2024/02/01 21:15:19 by maiboyer #+# #+# */
|
||||
/* Updated: 2024/02/01 23:18:52 by maiboyer ### ########.fr */
|
||||
/* */
|
||||
/* ************************************************************************** */
|
||||
|
||||
#include "me/char/isalpha.h"
|
||||
#include "me/convert/str_to_numbers.h"
|
||||
#include "me/string/str_len.h"
|
||||
#include "me/types.h"
|
||||
|
||||
#define OP_ADD 0b0001
|
||||
#define OP_SUB 0b0010
|
||||
#define OP_MUL 0b0100
|
||||
#define OP_CHK 0b1000
|
||||
|
||||
t_error checked_add_i8(t_i8 lhs, t_i8 rhs, t_i8 *out);
|
||||
t_error checked_sub_i8(t_i8 lhs, t_i8 rhs, t_i8 *out);
|
||||
t_error checked_mul_i8(t_i8 lhs, t_i8 rhs, t_i8 *out);
|
||||
|
||||
static inline bool can_not_overflow(t_u32 radix, bool is_signed_type,
|
||||
t_usize digits_len)
|
||||
{
|
||||
return (radix <= 16 && digits_len <= sizeof(t_i8) * 2
|
||||
- (t_usize)is_signed_type);
|
||||
}
|
||||
|
||||
static inline t_error to_digit(t_u8 ascii, t_u32 radix, t_u32 *out)
|
||||
{
|
||||
t_u32 digit;
|
||||
|
||||
if (radix < 2 || radix > 36)
|
||||
return (ERROR);
|
||||
digit = ascii - '0';
|
||||
if (radix > 10 && digit >= 10)
|
||||
{
|
||||
if (!me_isalpha(ascii))
|
||||
return (ERROR);
|
||||
digit = ((ascii | 0b100000) - 'a') + 10;
|
||||
}
|
||||
if (digit >= radix)
|
||||
return (ERROR);
|
||||
*out = digit;
|
||||
return (NO_ERROR);
|
||||
}
|
||||
|
||||
static inline t_error do_operation(t_i8 digit, t_u8 op, t_i8 *result)
|
||||
{
|
||||
t_i8 rhs;
|
||||
t_i8 res;
|
||||
|
||||
rhs = *result;
|
||||
res = *result;
|
||||
if (op & OP_CHK)
|
||||
{
|
||||
if (op & OP_MUL && checked_mul_i8(rhs, digit, &res))
|
||||
return (ERROR);
|
||||
else if (op & OP_ADD && checked_add_i8(rhs, digit, &res))
|
||||
return (ERROR);
|
||||
else if (op & OP_SUB && checked_sub_i8(rhs, digit, &res))
|
||||
return (ERROR);
|
||||
}
|
||||
else
|
||||
{
|
||||
if (op & OP_MUL)
|
||||
res = rhs * digit;
|
||||
else if (op & OP_ADD)
|
||||
res = rhs + digit;
|
||||
else if (op & OP_SUB)
|
||||
res = rhs - digit;
|
||||
}
|
||||
*result = res;
|
||||
return (NO_ERROR);
|
||||
}
|
||||
|
||||
static inline t_error loop_inner(t_const_str s, t_u32 radix, t_u8 op,
|
||||
t_i8 *out)
|
||||
{
|
||||
t_u32 digit;
|
||||
t_i8 result;
|
||||
|
||||
result = 0;
|
||||
while (*s)
|
||||
{
|
||||
if (do_operation(radix, (op & OP_CHK) | OP_MUL, &result))
|
||||
return (ERROR);
|
||||
if (to_digit(*s, radix, &digit))
|
||||
return (ERROR);
|
||||
if (do_operation(digit, op, &result))
|
||||
return (ERROR);
|
||||
s++;
|
||||
}
|
||||
if (out)
|
||||
*out = result;
|
||||
return (NO_ERROR);
|
||||
}
|
||||
|
||||
t_error str_to_i8(t_const_str s, t_u32 radix, t_i8 *out)
|
||||
{
|
||||
t_usize digits_len;
|
||||
bool is_positive;
|
||||
t_u8 op;
|
||||
|
||||
if (radix < 2 || radix > 36)
|
||||
return (ERROR);
|
||||
digits_len = str_len(s);
|
||||
is_positive = true;
|
||||
if (digits_len == 0)
|
||||
return (ERROR);
|
||||
if ((s[0] == '-' || s[0] == '+') && s[1] == '\0')
|
||||
return (ERROR);
|
||||
else if (s[0] == '+')
|
||||
is_positive = (s++, digits_len--, true);
|
||||
else if (s[0] == '-' && true)
|
||||
is_positive = (s++, digits_len--, false);
|
||||
if (is_positive)
|
||||
op = OP_ADD;
|
||||
else
|
||||
op = OP_SUB;
|
||||
if (!can_not_overflow(radix, true, digits_len))
|
||||
op |= OP_CHK;
|
||||
return (loop_inner(s, radix, op, out));
|
||||
}
|
||||
45
stdme/output/src/convert/str_to_i8_utils.c
Normal file
45
stdme/output/src/convert/str_to_i8_utils.c
Normal file
|
|
@ -0,0 +1,45 @@
|
|||
/* ************************************************************************** */
|
||||
/* */
|
||||
/* ::: :::::::: */
|
||||
/* str_to_i64.c :+: :+: :+: */
|
||||
/* +:+ +:+ +:+ */
|
||||
/* By: maiboyer <maiboyer@student.42.fr> +#+ +:+ +#+ */
|
||||
/* +#+#+#+#+#+ +#+ */
|
||||
/* Created: 2024/02/01 21:15:19 by maiboyer #+# #+# */
|
||||
/* Updated: 2024/02/01 23:18:52 by maiboyer ### ########.fr */
|
||||
/* */
|
||||
/* ************************************************************************** */
|
||||
|
||||
#include "me/char/isalpha.h"
|
||||
#include "me/convert/str_to_numbers.h"
|
||||
#include "me/printf/printf.h"
|
||||
#include "me/string/str_len.h"
|
||||
#include "me/types.h"
|
||||
|
||||
t_error checked_add_i8(t_i8 lhs, t_i8 rhs, t_i8 *out)
|
||||
{
|
||||
if (rhs > 0 && (lhs > 127 - rhs))
|
||||
return (ERROR);
|
||||
*out = (t_i8)(lhs + rhs);
|
||||
return (NO_ERROR);
|
||||
}
|
||||
|
||||
t_error checked_sub_i8(t_i8 lhs, t_i8 rhs, t_i8 *out)
|
||||
{
|
||||
if ((((rhs & (1 << (sizeof(t_i8) - 1)) || rhs == 0) || !true) && (lhs < -128
|
||||
+ rhs)))
|
||||
return (ERROR);
|
||||
*out = (t_i8)(lhs - rhs);
|
||||
return (NO_ERROR);
|
||||
}
|
||||
|
||||
t_error checked_mul_i8(t_i8 lhs, t_i8 rhs, t_i8 *out)
|
||||
{
|
||||
t_i8 mul;
|
||||
|
||||
mul = lhs * rhs;
|
||||
if (lhs != 0 && mul / lhs != rhs)
|
||||
return (ERROR);
|
||||
*out = mul;
|
||||
return (NO_ERROR);
|
||||
}
|
||||
129
stdme/output/src/convert/str_to_u16.c
Normal file
129
stdme/output/src/convert/str_to_u16.c
Normal file
|
|
@ -0,0 +1,129 @@
|
|||
/* ************************************************************************** */
|
||||
/* */
|
||||
/* ::: :::::::: */
|
||||
/* str_to_i64.c :+: :+: :+: */
|
||||
/* +:+ +:+ +:+ */
|
||||
/* By: maiboyer <maiboyer@student.42.fr> +#+ +:+ +#+ */
|
||||
/* +#+#+#+#+#+ +#+ */
|
||||
/* Created: 2024/02/01 21:15:19 by maiboyer #+# #+# */
|
||||
/* Updated: 2024/02/01 23:18:52 by maiboyer ### ########.fr */
|
||||
/* */
|
||||
/* ************************************************************************** */
|
||||
|
||||
#include "me/char/isalpha.h"
|
||||
#include "me/convert/str_to_numbers.h"
|
||||
#include "me/string/str_len.h"
|
||||
#include "me/types.h"
|
||||
|
||||
#define OP_ADD 0b0001
|
||||
#define OP_SUB 0b0010
|
||||
#define OP_MUL 0b0100
|
||||
#define OP_CHK 0b1000
|
||||
|
||||
t_error checked_add_u16(t_u16 lhs, t_u16 rhs, t_u16 *out);
|
||||
t_error checked_sub_u16(t_u16 lhs, t_u16 rhs, t_u16 *out);
|
||||
t_error checked_mul_u16(t_u16 lhs, t_u16 rhs, t_u16 *out);
|
||||
|
||||
static inline bool can_not_overflow(t_u32 radix, bool is_signed_type,
|
||||
t_usize digits_len)
|
||||
{
|
||||
return (radix <= 16 && digits_len <= sizeof(t_u16) * 2
|
||||
- (t_usize)is_signed_type);
|
||||
}
|
||||
|
||||
static inline t_error to_digit(t_u8 ascii, t_u32 radix, t_u32 *out)
|
||||
{
|
||||
t_u32 digit;
|
||||
|
||||
if (radix < 2 || radix > 36)
|
||||
return (ERROR);
|
||||
digit = ascii - '0';
|
||||
if (radix > 10 && digit >= 10)
|
||||
{
|
||||
if (!me_isalpha(ascii))
|
||||
return (ERROR);
|
||||
digit = ((ascii | 0b100000) - 'a') + 10;
|
||||
}
|
||||
if (digit >= radix)
|
||||
return (ERROR);
|
||||
*out = digit;
|
||||
return (NO_ERROR);
|
||||
}
|
||||
|
||||
static inline t_error do_operation(t_u16 digit, t_u8 op, t_u16 *result)
|
||||
{
|
||||
t_u16 rhs;
|
||||
t_u16 res;
|
||||
|
||||
rhs = *result;
|
||||
res = *result;
|
||||
if (op & OP_CHK)
|
||||
{
|
||||
if (op & OP_MUL && checked_mul_u16(rhs, digit, &res))
|
||||
return (ERROR);
|
||||
else if (op & OP_ADD && checked_add_u16(rhs, digit, &res))
|
||||
return (ERROR);
|
||||
else if (op & OP_SUB && checked_sub_u16(rhs, digit, &res))
|
||||
return (ERROR);
|
||||
}
|
||||
else
|
||||
{
|
||||
if (op & OP_MUL)
|
||||
res = rhs * digit;
|
||||
else if (op & OP_ADD)
|
||||
res = rhs + digit;
|
||||
else if (op & OP_SUB)
|
||||
res = rhs - digit;
|
||||
}
|
||||
*result = res;
|
||||
return (NO_ERROR);
|
||||
}
|
||||
|
||||
static inline t_error loop_inner(t_const_str s, t_u32 radix, t_u8 op,
|
||||
t_u16 *out)
|
||||
{
|
||||
t_u32 digit;
|
||||
t_u16 result;
|
||||
|
||||
result = 0u;
|
||||
while (*s)
|
||||
{
|
||||
if (do_operation(radix, (op & OP_CHK) | OP_MUL, &result))
|
||||
return (ERROR);
|
||||
if (to_digit(*s, radix, &digit))
|
||||
return (ERROR);
|
||||
if (do_operation(digit, op, &result))
|
||||
return (ERROR);
|
||||
s++;
|
||||
}
|
||||
if (out)
|
||||
*out = result;
|
||||
return (NO_ERROR);
|
||||
}
|
||||
|
||||
t_error str_to_u16(t_const_str s, t_u32 radix, t_u16 *out)
|
||||
{
|
||||
t_usize digits_len;
|
||||
bool is_positive;
|
||||
t_u8 op;
|
||||
|
||||
if (radix < 2 || radix > 36)
|
||||
return (ERROR);
|
||||
digits_len = str_len(s);
|
||||
is_positive = true;
|
||||
if (digits_len == 0)
|
||||
return (ERROR);
|
||||
if ((s[0] == '-' || s[0] == '+') && s[1] == '\0')
|
||||
return (ERROR);
|
||||
else if (s[0] == '+')
|
||||
is_positive = (s++, digits_len--, true);
|
||||
else if (s[0] == '-' && false)
|
||||
is_positive = (s++, digits_len--, false);
|
||||
if (is_positive)
|
||||
op = OP_ADD;
|
||||
else
|
||||
op = OP_SUB;
|
||||
if (!can_not_overflow(radix, false, digits_len))
|
||||
op |= OP_CHK;
|
||||
return (loop_inner(s, radix, op, out));
|
||||
}
|
||||
45
stdme/output/src/convert/str_to_u16_utils.c
Normal file
45
stdme/output/src/convert/str_to_u16_utils.c
Normal file
|
|
@ -0,0 +1,45 @@
|
|||
/* ************************************************************************** */
|
||||
/* */
|
||||
/* ::: :::::::: */
|
||||
/* str_to_i64.c :+: :+: :+: */
|
||||
/* +:+ +:+ +:+ */
|
||||
/* By: maiboyer <maiboyer@student.42.fr> +#+ +:+ +#+ */
|
||||
/* +#+#+#+#+#+ +#+ */
|
||||
/* Created: 2024/02/01 21:15:19 by maiboyer #+# #+# */
|
||||
/* Updated: 2024/02/01 23:18:52 by maiboyer ### ########.fr */
|
||||
/* */
|
||||
/* ************************************************************************** */
|
||||
|
||||
#include "me/char/isalpha.h"
|
||||
#include "me/convert/str_to_numbers.h"
|
||||
#include "me/printf/printf.h"
|
||||
#include "me/string/str_len.h"
|
||||
#include "me/types.h"
|
||||
|
||||
t_error checked_add_u16(t_u16 lhs, t_u16 rhs, t_u16 *out)
|
||||
{
|
||||
if (rhs > 0 && (lhs > 65535u - rhs))
|
||||
return (ERROR);
|
||||
*out = (t_u16)(lhs + rhs);
|
||||
return (NO_ERROR);
|
||||
}
|
||||
|
||||
t_error checked_sub_u16(t_u16 lhs, t_u16 rhs, t_u16 *out)
|
||||
{
|
||||
if ((((rhs & (1 << (sizeof(t_u16) - 1)) || rhs == 0) || !false) && (lhs < 0u
|
||||
+ rhs)))
|
||||
return (ERROR);
|
||||
*out = (t_u16)(lhs - rhs);
|
||||
return (NO_ERROR);
|
||||
}
|
||||
|
||||
t_error checked_mul_u16(t_u16 lhs, t_u16 rhs, t_u16 *out)
|
||||
{
|
||||
t_u16 mul;
|
||||
|
||||
mul = lhs * rhs;
|
||||
if (lhs != 0 && mul / lhs != rhs)
|
||||
return (ERROR);
|
||||
*out = mul;
|
||||
return (NO_ERROR);
|
||||
}
|
||||
129
stdme/output/src/convert/str_to_u32.c
Normal file
129
stdme/output/src/convert/str_to_u32.c
Normal file
|
|
@ -0,0 +1,129 @@
|
|||
/* ************************************************************************** */
|
||||
/* */
|
||||
/* ::: :::::::: */
|
||||
/* str_to_i64.c :+: :+: :+: */
|
||||
/* +:+ +:+ +:+ */
|
||||
/* By: maiboyer <maiboyer@student.42.fr> +#+ +:+ +#+ */
|
||||
/* +#+#+#+#+#+ +#+ */
|
||||
/* Created: 2024/02/01 21:15:19 by maiboyer #+# #+# */
|
||||
/* Updated: 2024/02/01 23:18:52 by maiboyer ### ########.fr */
|
||||
/* */
|
||||
/* ************************************************************************** */
|
||||
|
||||
#include "me/char/isalpha.h"
|
||||
#include "me/convert/str_to_numbers.h"
|
||||
#include "me/string/str_len.h"
|
||||
#include "me/types.h"
|
||||
|
||||
#define OP_ADD 0b0001
|
||||
#define OP_SUB 0b0010
|
||||
#define OP_MUL 0b0100
|
||||
#define OP_CHK 0b1000
|
||||
|
||||
t_error checked_add_u32(t_u32 lhs, t_u32 rhs, t_u32 *out);
|
||||
t_error checked_sub_u32(t_u32 lhs, t_u32 rhs, t_u32 *out);
|
||||
t_error checked_mul_u32(t_u32 lhs, t_u32 rhs, t_u32 *out);
|
||||
|
||||
static inline bool can_not_overflow(t_u32 radix, bool is_signed_type,
|
||||
t_usize digits_len)
|
||||
{
|
||||
return (radix <= 16 && digits_len <= sizeof(t_u32) * 2
|
||||
- (t_usize)is_signed_type);
|
||||
}
|
||||
|
||||
static inline t_error to_digit(t_u8 ascii, t_u32 radix, t_u32 *out)
|
||||
{
|
||||
t_u32 digit;
|
||||
|
||||
if (radix < 2 || radix > 36)
|
||||
return (ERROR);
|
||||
digit = ascii - '0';
|
||||
if (radix > 10 && digit >= 10)
|
||||
{
|
||||
if (!me_isalpha(ascii))
|
||||
return (ERROR);
|
||||
digit = ((ascii | 0b100000) - 'a') + 10;
|
||||
}
|
||||
if (digit >= radix)
|
||||
return (ERROR);
|
||||
*out = digit;
|
||||
return (NO_ERROR);
|
||||
}
|
||||
|
||||
static inline t_error do_operation(t_u32 digit, t_u8 op, t_u32 *result)
|
||||
{
|
||||
t_u32 rhs;
|
||||
t_u32 res;
|
||||
|
||||
rhs = *result;
|
||||
res = *result;
|
||||
if (op & OP_CHK)
|
||||
{
|
||||
if (op & OP_MUL && checked_mul_u32(rhs, digit, &res))
|
||||
return (ERROR);
|
||||
else if (op & OP_ADD && checked_add_u32(rhs, digit, &res))
|
||||
return (ERROR);
|
||||
else if (op & OP_SUB && checked_sub_u32(rhs, digit, &res))
|
||||
return (ERROR);
|
||||
}
|
||||
else
|
||||
{
|
||||
if (op & OP_MUL)
|
||||
res = rhs * digit;
|
||||
else if (op & OP_ADD)
|
||||
res = rhs + digit;
|
||||
else if (op & OP_SUB)
|
||||
res = rhs - digit;
|
||||
}
|
||||
*result = res;
|
||||
return (NO_ERROR);
|
||||
}
|
||||
|
||||
static inline t_error loop_inner(t_const_str s, t_u32 radix, t_u8 op,
|
||||
t_u32 *out)
|
||||
{
|
||||
t_u32 digit;
|
||||
t_u32 result;
|
||||
|
||||
result = 0u;
|
||||
while (*s)
|
||||
{
|
||||
if (do_operation(radix, (op & OP_CHK) | OP_MUL, &result))
|
||||
return (ERROR);
|
||||
if (to_digit(*s, radix, &digit))
|
||||
return (ERROR);
|
||||
if (do_operation(digit, op, &result))
|
||||
return (ERROR);
|
||||
s++;
|
||||
}
|
||||
if (out)
|
||||
*out = result;
|
||||
return (NO_ERROR);
|
||||
}
|
||||
|
||||
t_error str_to_u32(t_const_str s, t_u32 radix, t_u32 *out)
|
||||
{
|
||||
t_usize digits_len;
|
||||
bool is_positive;
|
||||
t_u8 op;
|
||||
|
||||
if (radix < 2 || radix > 36)
|
||||
return (ERROR);
|
||||
digits_len = str_len(s);
|
||||
is_positive = true;
|
||||
if (digits_len == 0)
|
||||
return (ERROR);
|
||||
if ((s[0] == '-' || s[0] == '+') && s[1] == '\0')
|
||||
return (ERROR);
|
||||
else if (s[0] == '+')
|
||||
is_positive = (s++, digits_len--, true);
|
||||
else if (s[0] == '-' && false)
|
||||
is_positive = (s++, digits_len--, false);
|
||||
if (is_positive)
|
||||
op = OP_ADD;
|
||||
else
|
||||
op = OP_SUB;
|
||||
if (!can_not_overflow(radix, false, digits_len))
|
||||
op |= OP_CHK;
|
||||
return (loop_inner(s, radix, op, out));
|
||||
}
|
||||
45
stdme/output/src/convert/str_to_u32_utils.c
Normal file
45
stdme/output/src/convert/str_to_u32_utils.c
Normal file
|
|
@ -0,0 +1,45 @@
|
|||
/* ************************************************************************** */
|
||||
/* */
|
||||
/* ::: :::::::: */
|
||||
/* str_to_i64.c :+: :+: :+: */
|
||||
/* +:+ +:+ +:+ */
|
||||
/* By: maiboyer <maiboyer@student.42.fr> +#+ +:+ +#+ */
|
||||
/* +#+#+#+#+#+ +#+ */
|
||||
/* Created: 2024/02/01 21:15:19 by maiboyer #+# #+# */
|
||||
/* Updated: 2024/02/01 23:18:52 by maiboyer ### ########.fr */
|
||||
/* */
|
||||
/* ************************************************************************** */
|
||||
|
||||
#include "me/char/isalpha.h"
|
||||
#include "me/convert/str_to_numbers.h"
|
||||
#include "me/printf/printf.h"
|
||||
#include "me/string/str_len.h"
|
||||
#include "me/types.h"
|
||||
|
||||
t_error checked_add_u32(t_u32 lhs, t_u32 rhs, t_u32 *out)
|
||||
{
|
||||
if (rhs > 0 && (lhs > 4294967295u - rhs))
|
||||
return (ERROR);
|
||||
*out = (t_u32)(lhs + rhs);
|
||||
return (NO_ERROR);
|
||||
}
|
||||
|
||||
t_error checked_sub_u32(t_u32 lhs, t_u32 rhs, t_u32 *out)
|
||||
{
|
||||
if ((((rhs & (1 << (sizeof(t_u32) - 1)) || rhs == 0) || !false) && (lhs < 0u
|
||||
+ rhs)))
|
||||
return (ERROR);
|
||||
*out = (t_u32)(lhs - rhs);
|
||||
return (NO_ERROR);
|
||||
}
|
||||
|
||||
t_error checked_mul_u32(t_u32 lhs, t_u32 rhs, t_u32 *out)
|
||||
{
|
||||
t_u32 mul;
|
||||
|
||||
mul = lhs * rhs;
|
||||
if (lhs != 0 && mul / lhs != rhs)
|
||||
return (ERROR);
|
||||
*out = mul;
|
||||
return (NO_ERROR);
|
||||
}
|
||||
129
stdme/output/src/convert/str_to_u64.c
Normal file
129
stdme/output/src/convert/str_to_u64.c
Normal file
|
|
@ -0,0 +1,129 @@
|
|||
/* ************************************************************************** */
|
||||
/* */
|
||||
/* ::: :::::::: */
|
||||
/* str_to_i64.c :+: :+: :+: */
|
||||
/* +:+ +:+ +:+ */
|
||||
/* By: maiboyer <maiboyer@student.42.fr> +#+ +:+ +#+ */
|
||||
/* +#+#+#+#+#+ +#+ */
|
||||
/* Created: 2024/02/01 21:15:19 by maiboyer #+# #+# */
|
||||
/* Updated: 2024/02/01 23:18:52 by maiboyer ### ########.fr */
|
||||
/* */
|
||||
/* ************************************************************************** */
|
||||
|
||||
#include "me/char/isalpha.h"
|
||||
#include "me/convert/str_to_numbers.h"
|
||||
#include "me/string/str_len.h"
|
||||
#include "me/types.h"
|
||||
|
||||
#define OP_ADD 0b0001
|
||||
#define OP_SUB 0b0010
|
||||
#define OP_MUL 0b0100
|
||||
#define OP_CHK 0b1000
|
||||
|
||||
t_error checked_add_u64(t_u64 lhs, t_u64 rhs, t_u64 *out);
|
||||
t_error checked_sub_u64(t_u64 lhs, t_u64 rhs, t_u64 *out);
|
||||
t_error checked_mul_u64(t_u64 lhs, t_u64 rhs, t_u64 *out);
|
||||
|
||||
static inline bool can_not_overflow(t_u32 radix, bool is_signed_type,
|
||||
t_usize digits_len)
|
||||
{
|
||||
return (radix <= 16 && digits_len <= sizeof(t_u64) * 2
|
||||
- (t_usize)is_signed_type);
|
||||
}
|
||||
|
||||
static inline t_error to_digit(t_u8 ascii, t_u32 radix, t_u32 *out)
|
||||
{
|
||||
t_u32 digit;
|
||||
|
||||
if (radix < 2 || radix > 36)
|
||||
return (ERROR);
|
||||
digit = ascii - '0';
|
||||
if (radix > 10 && digit >= 10)
|
||||
{
|
||||
if (!me_isalpha(ascii))
|
||||
return (ERROR);
|
||||
digit = ((ascii | 0b100000) - 'a') + 10;
|
||||
}
|
||||
if (digit >= radix)
|
||||
return (ERROR);
|
||||
*out = digit;
|
||||
return (NO_ERROR);
|
||||
}
|
||||
|
||||
static inline t_error do_operation(t_u64 digit, t_u8 op, t_u64 *result)
|
||||
{
|
||||
t_u64 rhs;
|
||||
t_u64 res;
|
||||
|
||||
rhs = *result;
|
||||
res = *result;
|
||||
if (op & OP_CHK)
|
||||
{
|
||||
if (op & OP_MUL && checked_mul_u64(rhs, digit, &res))
|
||||
return (ERROR);
|
||||
else if (op & OP_ADD && checked_add_u64(rhs, digit, &res))
|
||||
return (ERROR);
|
||||
else if (op & OP_SUB && checked_sub_u64(rhs, digit, &res))
|
||||
return (ERROR);
|
||||
}
|
||||
else
|
||||
{
|
||||
if (op & OP_MUL)
|
||||
res = rhs * digit;
|
||||
else if (op & OP_ADD)
|
||||
res = rhs + digit;
|
||||
else if (op & OP_SUB)
|
||||
res = rhs - digit;
|
||||
}
|
||||
*result = res;
|
||||
return (NO_ERROR);
|
||||
}
|
||||
|
||||
static inline t_error loop_inner(t_const_str s, t_u32 radix, t_u8 op,
|
||||
t_u64 *out)
|
||||
{
|
||||
t_u32 digit;
|
||||
t_u64 result;
|
||||
|
||||
result = 0llu;
|
||||
while (*s)
|
||||
{
|
||||
if (do_operation(radix, (op & OP_CHK) | OP_MUL, &result))
|
||||
return (ERROR);
|
||||
if (to_digit(*s, radix, &digit))
|
||||
return (ERROR);
|
||||
if (do_operation(digit, op, &result))
|
||||
return (ERROR);
|
||||
s++;
|
||||
}
|
||||
if (out)
|
||||
*out = result;
|
||||
return (NO_ERROR);
|
||||
}
|
||||
|
||||
t_error str_to_u64(t_const_str s, t_u32 radix, t_u64 *out)
|
||||
{
|
||||
t_usize digits_len;
|
||||
bool is_positive;
|
||||
t_u8 op;
|
||||
|
||||
if (radix < 2 || radix > 36)
|
||||
return (ERROR);
|
||||
digits_len = str_len(s);
|
||||
is_positive = true;
|
||||
if (digits_len == 0)
|
||||
return (ERROR);
|
||||
if ((s[0] == '-' || s[0] == '+') && s[1] == '\0')
|
||||
return (ERROR);
|
||||
else if (s[0] == '+')
|
||||
is_positive = (s++, digits_len--, true);
|
||||
else if (s[0] == '-' && false)
|
||||
is_positive = (s++, digits_len--, false);
|
||||
if (is_positive)
|
||||
op = OP_ADD;
|
||||
else
|
||||
op = OP_SUB;
|
||||
if (!can_not_overflow(radix, false, digits_len))
|
||||
op |= OP_CHK;
|
||||
return (loop_inner(s, radix, op, out));
|
||||
}
|
||||
45
stdme/output/src/convert/str_to_u64_utils.c
Normal file
45
stdme/output/src/convert/str_to_u64_utils.c
Normal file
|
|
@ -0,0 +1,45 @@
|
|||
/* ************************************************************************** */
|
||||
/* */
|
||||
/* ::: :::::::: */
|
||||
/* str_to_i64.c :+: :+: :+: */
|
||||
/* +:+ +:+ +:+ */
|
||||
/* By: maiboyer <maiboyer@student.42.fr> +#+ +:+ +#+ */
|
||||
/* +#+#+#+#+#+ +#+ */
|
||||
/* Created: 2024/02/01 21:15:19 by maiboyer #+# #+# */
|
||||
/* Updated: 2024/02/01 23:18:52 by maiboyer ### ########.fr */
|
||||
/* */
|
||||
/* ************************************************************************** */
|
||||
|
||||
#include "me/char/isalpha.h"
|
||||
#include "me/convert/str_to_numbers.h"
|
||||
#include "me/printf/printf.h"
|
||||
#include "me/string/str_len.h"
|
||||
#include "me/types.h"
|
||||
|
||||
t_error checked_add_u64(t_u64 lhs, t_u64 rhs, t_u64 *out)
|
||||
{
|
||||
if (rhs > 0 && (lhs > 18446744073709551615llu - rhs))
|
||||
return (ERROR);
|
||||
*out = (t_u64)(lhs + rhs);
|
||||
return (NO_ERROR);
|
||||
}
|
||||
|
||||
t_error checked_sub_u64(t_u64 lhs, t_u64 rhs, t_u64 *out)
|
||||
{
|
||||
if ((((rhs & (1 << (sizeof(t_u64) - 1)) || rhs == 0) || !false)
|
||||
&& (lhs < 0llu + rhs)))
|
||||
return (ERROR);
|
||||
*out = (t_u64)(lhs - rhs);
|
||||
return (NO_ERROR);
|
||||
}
|
||||
|
||||
t_error checked_mul_u64(t_u64 lhs, t_u64 rhs, t_u64 *out)
|
||||
{
|
||||
t_u64 mul;
|
||||
|
||||
mul = lhs * rhs;
|
||||
if (lhs != 0 && mul / lhs != rhs)
|
||||
return (ERROR);
|
||||
*out = mul;
|
||||
return (NO_ERROR);
|
||||
}
|
||||
129
stdme/output/src/convert/str_to_u8.c
Normal file
129
stdme/output/src/convert/str_to_u8.c
Normal file
|
|
@ -0,0 +1,129 @@
|
|||
/* ************************************************************************** */
|
||||
/* */
|
||||
/* ::: :::::::: */
|
||||
/* str_to_i64.c :+: :+: :+: */
|
||||
/* +:+ +:+ +:+ */
|
||||
/* By: maiboyer <maiboyer@student.42.fr> +#+ +:+ +#+ */
|
||||
/* +#+#+#+#+#+ +#+ */
|
||||
/* Created: 2024/02/01 21:15:19 by maiboyer #+# #+# */
|
||||
/* Updated: 2024/02/01 23:18:52 by maiboyer ### ########.fr */
|
||||
/* */
|
||||
/* ************************************************************************** */
|
||||
|
||||
#include "me/char/isalpha.h"
|
||||
#include "me/convert/str_to_numbers.h"
|
||||
#include "me/string/str_len.h"
|
||||
#include "me/types.h"
|
||||
|
||||
#define OP_ADD 0b0001
|
||||
#define OP_SUB 0b0010
|
||||
#define OP_MUL 0b0100
|
||||
#define OP_CHK 0b1000
|
||||
|
||||
t_error checked_add_u8(t_u8 lhs, t_u8 rhs, t_u8 *out);
|
||||
t_error checked_sub_u8(t_u8 lhs, t_u8 rhs, t_u8 *out);
|
||||
t_error checked_mul_u8(t_u8 lhs, t_u8 rhs, t_u8 *out);
|
||||
|
||||
static inline bool can_not_overflow(t_u32 radix, bool is_signed_type,
|
||||
t_usize digits_len)
|
||||
{
|
||||
return (radix <= 16 && digits_len <= sizeof(t_u8) * 2
|
||||
- (t_usize)is_signed_type);
|
||||
}
|
||||
|
||||
static inline t_error to_digit(t_u8 ascii, t_u32 radix, t_u32 *out)
|
||||
{
|
||||
t_u32 digit;
|
||||
|
||||
if (radix < 2 || radix > 36)
|
||||
return (ERROR);
|
||||
digit = ascii - '0';
|
||||
if (radix > 10 && digit >= 10)
|
||||
{
|
||||
if (!me_isalpha(ascii))
|
||||
return (ERROR);
|
||||
digit = ((ascii | 0b100000) - 'a') + 10;
|
||||
}
|
||||
if (digit >= radix)
|
||||
return (ERROR);
|
||||
*out = digit;
|
||||
return (NO_ERROR);
|
||||
}
|
||||
|
||||
static inline t_error do_operation(t_u8 digit, t_u8 op, t_u8 *result)
|
||||
{
|
||||
t_u8 rhs;
|
||||
t_u8 res;
|
||||
|
||||
rhs = *result;
|
||||
res = *result;
|
||||
if (op & OP_CHK)
|
||||
{
|
||||
if (op & OP_MUL && checked_mul_u8(rhs, digit, &res))
|
||||
return (ERROR);
|
||||
else if (op & OP_ADD && checked_add_u8(rhs, digit, &res))
|
||||
return (ERROR);
|
||||
else if (op & OP_SUB && checked_sub_u8(rhs, digit, &res))
|
||||
return (ERROR);
|
||||
}
|
||||
else
|
||||
{
|
||||
if (op & OP_MUL)
|
||||
res = rhs * digit;
|
||||
else if (op & OP_ADD)
|
||||
res = rhs + digit;
|
||||
else if (op & OP_SUB)
|
||||
res = rhs - digit;
|
||||
}
|
||||
*result = res;
|
||||
return (NO_ERROR);
|
||||
}
|
||||
|
||||
static inline t_error loop_inner(t_const_str s, t_u32 radix, t_u8 op,
|
||||
t_u8 *out)
|
||||
{
|
||||
t_u32 digit;
|
||||
t_u8 result;
|
||||
|
||||
result = 0u;
|
||||
while (*s)
|
||||
{
|
||||
if (do_operation(radix, (op & OP_CHK) | OP_MUL, &result))
|
||||
return (ERROR);
|
||||
if (to_digit(*s, radix, &digit))
|
||||
return (ERROR);
|
||||
if (do_operation(digit, op, &result))
|
||||
return (ERROR);
|
||||
s++;
|
||||
}
|
||||
if (out)
|
||||
*out = result;
|
||||
return (NO_ERROR);
|
||||
}
|
||||
|
||||
t_error str_to_u8(t_const_str s, t_u32 radix, t_u8 *out)
|
||||
{
|
||||
t_usize digits_len;
|
||||
bool is_positive;
|
||||
t_u8 op;
|
||||
|
||||
if (radix < 2 || radix > 36)
|
||||
return (ERROR);
|
||||
digits_len = str_len(s);
|
||||
is_positive = true;
|
||||
if (digits_len == 0)
|
||||
return (ERROR);
|
||||
if ((s[0] == '-' || s[0] == '+') && s[1] == '\0')
|
||||
return (ERROR);
|
||||
else if (s[0] == '+')
|
||||
is_positive = (s++, digits_len--, true);
|
||||
else if (s[0] == '-' && false)
|
||||
is_positive = (s++, digits_len--, false);
|
||||
if (is_positive)
|
||||
op = OP_ADD;
|
||||
else
|
||||
op = OP_SUB;
|
||||
if (!can_not_overflow(radix, false, digits_len))
|
||||
op |= OP_CHK;
|
||||
return (loop_inner(s, radix, op, out));
|
||||
}
|
||||
45
stdme/output/src/convert/str_to_u8_utils.c
Normal file
45
stdme/output/src/convert/str_to_u8_utils.c
Normal file
|
|
@ -0,0 +1,45 @@
|
|||
/* ************************************************************************** */
|
||||
/* */
|
||||
/* ::: :::::::: */
|
||||
/* str_to_i64.c :+: :+: :+: */
|
||||
/* +:+ +:+ +:+ */
|
||||
/* By: maiboyer <maiboyer@student.42.fr> +#+ +:+ +#+ */
|
||||
/* +#+#+#+#+#+ +#+ */
|
||||
/* Created: 2024/02/01 21:15:19 by maiboyer #+# #+# */
|
||||
/* Updated: 2024/02/01 23:18:52 by maiboyer ### ########.fr */
|
||||
/* */
|
||||
/* ************************************************************************** */
|
||||
|
||||
#include "me/char/isalpha.h"
|
||||
#include "me/convert/str_to_numbers.h"
|
||||
#include "me/printf/printf.h"
|
||||
#include "me/string/str_len.h"
|
||||
#include "me/types.h"
|
||||
|
||||
t_error checked_add_u8(t_u8 lhs, t_u8 rhs, t_u8 *out)
|
||||
{
|
||||
if (rhs > 0 && (lhs > 128u - rhs))
|
||||
return (ERROR);
|
||||
*out = (t_u8)(lhs + rhs);
|
||||
return (NO_ERROR);
|
||||
}
|
||||
|
||||
t_error checked_sub_u8(t_u8 lhs, t_u8 rhs, t_u8 *out)
|
||||
{
|
||||
if ((((rhs & (1 << (sizeof(t_u8) - 1)) || rhs == 0) || !false) && (lhs < 0u
|
||||
+ rhs)))
|
||||
return (ERROR);
|
||||
*out = (t_u8)(lhs - rhs);
|
||||
return (NO_ERROR);
|
||||
}
|
||||
|
||||
t_error checked_mul_u8(t_u8 lhs, t_u8 rhs, t_u8 *out)
|
||||
{
|
||||
t_u8 mul;
|
||||
|
||||
mul = lhs * rhs;
|
||||
if (lhs != 0 && mul / lhs != rhs)
|
||||
return (ERROR);
|
||||
*out = mul;
|
||||
return (NO_ERROR);
|
||||
}
|
||||
Loading…
Add table
Add a link
Reference in a new issue