X-Git-Url: http://nsz.repo.hu/git/?p=musl;a=blobdiff_plain;f=src%2Fstdio%2Fvfscanf.c;h=d8f9ae6ba404ed56d67ed9e9b76a786780623ffb;hp=73294cdb990770cb3ea65a0036c17f41f1b996ae;hb=1ab59de81e94e7802f85d314a709f8350a0e9b65;hpb=2dd5dc78d4502381e2933137ed525acf339cb383 diff --git a/src/stdio/vfscanf.c b/src/stdio/vfscanf.c index 73294cdb..d8f9ae6b 100644 --- a/src/stdio/vfscanf.c +++ b/src/stdio/vfscanf.c @@ -1,4 +1,3 @@ -#include #include #include #include @@ -9,6 +8,7 @@ #include #include #include +#include #include "stdio_impl.h" #include "shgetc.h" @@ -71,7 +71,7 @@ static int readwc(int c, wchar_t **wcs, mbstate_t *st) return 0; } -int vfscanf(FILE *f, const char *fmt, va_list ap) +int vfscanf(FILE *restrict f, const char *restrict fmt, va_list ap) { int width; int size; @@ -88,6 +88,7 @@ int vfscanf(FILE *f, const char *fmt, va_list ap) unsigned long long x; long double y; off_t pos = 0; + unsigned char scanset[257]; FLOCK(f); @@ -103,6 +104,7 @@ int vfscanf(FILE *f, const char *fmt, va_list ap) } if (*p != '%' || p[1] == '%') { p += *p=='%'; + shlim(f, 0); c = shgetc(f); if (c!=*p) { shunget(f); @@ -167,106 +169,84 @@ int vfscanf(FILE *f, const char *fmt, va_list ap) t = *p; + /* C or S */ + if ((t&0x2f) == 3) { + t |= 32; + size = SIZE_l; + } + switch (t) { - case 'C': case 'c': if (width < 1) width = 1; - case 's': - if (size == SIZE_l) t &= ~0x20; - case 'd': case 'i': case 'o': case 'u': case 'x': - case 'a': case 'e': case 'f': case 'g': - case 'A': case 'E': case 'F': case 'G': case 'X': - case '[': case 'S': - case 'p': case 'n': - if (width < 1) width = 0; + case '[': break; + case 'n': + store_int(dest, size, pos); + /* do not increment match count, etc! */ + continue; default: - goto fmt_fail; + shlim(f, 0); + while (isspace(shgetc(f))); + shunget(f); + pos += shcnt(f); } shlim(f, width); - - if (t != 'n') { - if (shgetc(f) < 0) goto input_fail; - shunget(f); - } + if (shgetc(f) < 0) goto input_fail; + shunget(f); switch (t) { - case 'n': - store_int(dest, size, pos); - /* do not increment match count, etc! */ - continue; - case 'C': - wcs = dest; - st = (mbstate_t){ 0 }; - while ((c=shgetc(f)) >= 0) { - if (readwc(c, &wcs, &st) < 0) - goto input_fail; - } - if (!mbsinit(&st)) goto input_fail; - if (shcnt(f) != width) goto match_fail; - break; + case 's': case 'c': - if (dest) { - s = dest; - while ((c=shgetc(f)) >= 0) *s++ = c; - } else { - while (shgetc(f)>=0); - } - if (shcnt(f) < width) goto match_fail; - break; case '[': - s = dest; - wcs = dest; - - if (*++p == '^') p++, invert = 1; - else invert = 0; - - unsigned char scanset[257]; - memset(scanset, invert, sizeof scanset); - - scanset[0] = 0; - if (*p == '-') p++, scanset[1+'-'] = 1-invert; - else if (*p == ']') p++, scanset[1+']'] = 1-invert; - for (; *p != ']'; p++) { - if (!*p) goto fmt_fail; - if (*p=='-' && p[1] && p[1] != ']') - for (c=p++[-1]; c<*p; c++) - scanset[1+c] = 1-invert; - scanset[1+*p] = 1-invert; + if (t == 'c' || t == 's') { + memset(scanset, -1, sizeof scanset); + scanset[0] = 0; + if (t == 's') { + scanset[1+'\t'] = 0; + scanset[1+'\n'] = 0; + scanset[1+'\v'] = 0; + scanset[1+'\f'] = 0; + scanset[1+'\r'] = 0; + scanset[1+' '] = 0; + } + } else { + if (*++p == '^') p++, invert = 1; + else invert = 0; + memset(scanset, invert, sizeof scanset); + scanset[0] = 0; + if (*p == '-') p++, scanset[1+'-'] = 1-invert; + else if (*p == ']') p++, scanset[1+']'] = 1-invert; + for (; *p != ']'; p++) { + if (!*p) goto fmt_fail; + if (*p=='-' && p[1] && p[1] != ']') + for (c=p++[-1]; c<*p; c++) + scanset[1+c] = 1-invert; + scanset[1+*p] = 1-invert; + } } - + wcs = 0; + s = 0; if (size == SIZE_l) { + wcs = dest; st = (mbstate_t){0}; while (scanset[(c=shgetc(f))+1]) { if (readwc(c, &wcs, &st) < 0) goto input_fail; } if (!mbsinit(&st)) goto input_fail; - s = 0; - } else if (s) { + } else if ((s = dest)) { while (scanset[(c=shgetc(f))+1]) *s++ = c; - wcs = 0; } else { while (scanset[(c=shgetc(f))+1]); } shunget(f); if (!shcnt(f)) goto match_fail; - if (s) *s = 0; + if (t == 'c' && shcnt(f) != width) goto match_fail; if (wcs) *wcs = 0; + if (s) *s = 0; break; - default: - shlim(f, 0); - while (isspace(shgetc(f))); - shunget(f); - pos += shcnt(f); - shlim(f, width); - if (shgetc(f) < 0) goto input_fail; - shunget(f); - } - - switch (t) { case 'p': case 'X': case 'x': @@ -291,7 +271,7 @@ int vfscanf(FILE *f, const char *fmt, va_list ap) case 'e': case 'E': case 'f': case 'F': case 'g': case 'G': - y = __floatscan(f, -1, size, 0); + y = __floatscan(f, size, 0); if (!shcnt(f)) goto match_fail; if (dest) switch (size) { case SIZE_def: @@ -305,28 +285,6 @@ int vfscanf(FILE *f, const char *fmt, va_list ap) break; } break; - case 'S': - wcs = dest; - st = (mbstate_t){ 0 }; - while (!isspace(c=shgetc(f)) && c!=EOF) { - if (readwc(c, &wcs, &st) < 0) - goto input_fail; - } - shunget(f); - if (!mbsinit(&st)) goto input_fail; - if (dest) *wcs++ = 0; - break; - case 's': - if (dest) { - s = dest; - while (!isspace(c=shgetc(f)) && c!=EOF) - *s++ = c; - *s = 0; - } else { - while (!isspace(c=shgetc(f)) && c!=EOF); - } - shunget(f); - break; } pos += shcnt(f);