path: root/src/stdlib/wcstoimax.c

#include <wchar.h>
#include <wctype.h>
#include <inttypes.h>
#include <errno.h>
#include "intparse.h"

intmax_t wcstoimax(const wchar_t *s, wchar_t **p, int base)
{
	const wchar_t *s1 = s;
	struct intparse ip = {0};

	if (p) *p = (wchar_t *)s;

	if (base && base-2U > 34) {
		errno = EINVAL;
		return 0;
	}

	for (; iswspace(*s); s++);

	ip.base = base;
	for (; __intparse(&ip, (char[]){(*s&-(*s<128U))}, 1); s++);

	if (p && ip.err != EINVAL)
		*p = (wchar_t *)s1 + ip.cnt;

	if (ip.err) {
		errno = ip.err;
		if (ip.err == EINVAL) return 0;
		return ip.neg ? INTMAX_MIN : INTMAX_MAX;
	}

	if (ip.val > INTMAX_MAX) {
		if (!ip.neg || -ip.val != INTMAX_MIN)
			errno = ERANGE;
		return ip.neg ? INTMAX_MIN : INTMAX_MAX;
	}
	return ip.neg ? -ip.val : ip.val;
}