1 #include "stdio_impl.h"
9 /* This read function heavily cheats. It knows:
10 * (1) len will always be 1
11 * (2) non-ascii characters don't matter */
13 static size_t do_read(FILE *f, unsigned char *buf, size_t len)
16 const wchar_t *wcs = f->cookie;
18 if (!wcs[0]) wcs=L"@";
19 for (i=0; i<f->buf_size && wcs[i]; i++)
20 f->buf[i] = wcs[i] < 128 ? wcs[i] : '@';
23 f->cookie = (void *)(wcs+i);
32 static unsigned long long wcstox(const wchar_t *s, wchar_t **p, int base, unsigned long long lim)
34 wchar_t *t = (wchar_t *)s;
35 unsigned char buf[64];
38 f.rpos = f.rend = f.buf = buf + 4;
39 f.buf_size = sizeof buf - 4;
42 while (iswspace(*t)) t++;
45 unsigned long long y = __intscan(&f, base, 1, lim);
47 size_t cnt = shcnt(&f);
48 *p = cnt ? t + cnt : (wchar_t *)s;
53 unsigned long long wcstoull(const wchar_t *restrict s, wchar_t **restrict p, int base)
55 return wcstox(s, p, base, ULLONG_MAX);
58 long long wcstoll(const wchar_t *restrict s, wchar_t **restrict p, int base)
60 return wcstox(s, p, base, LLONG_MIN);
63 unsigned long wcstoul(const wchar_t *restrict s, wchar_t **restrict p, int base)
65 return wcstox(s, p, base, ULONG_MAX);
68 long wcstol(const wchar_t *restrict s, wchar_t **restrict p, int base)
70 return wcstox(s, p, base, 0UL+LONG_MIN);
73 intmax_t wcstoimax(const wchar_t *restrict s, wchar_t **restrict p, int base)
75 return wcstoll(s, p, base);
78 uintmax_t wcstoumax(const wchar_t *restrict s, wchar_t **restrict p, int base)
80 return wcstoull(s, p, base);