path: root/src/stdlib/strtod.c

#include <stdlib.h>
#include "shgetc.h"
#include "floatscan.h"
#include "stdio_impl.h"

static long double strtox(const char *s, char **p, int prec)
{
	char *t = (char *)s;
	while (isspace(*t)) t++;
	FILE f = {
		.buf = (void *)t, .rpos = (void *)t,
		.rend = (void *)-1, .lock = -1
	};
	shlim(&f, 0);
	long double y = __floatscan(&f, -1, prec, 1);
	off_t cnt = shcnt(&f);
	if (p) *p = cnt ? t + cnt : (char *)s;
	return y;
}

float strtof(const char *s, char **p)
{
	return strtox(s, p, 0);
}

double strtod(const char *s, char **p)
{
	return strtox(s, p, 1);
}

long double strtold(const char *s, char **p)
{
	return strtox(s, p, 2);
}