X-Git-Url: https://pd.if.org/git/?a=blobdiff_plain;f=functions%2Fstdio%2Fvfscanf.c;h=8f121e95e4a73cac03d000cf6a96132e2163e5ab;hb=3fe0b3636381ca114b4b664af4062708d5cddf26;hp=bf09226c16edb26b77e1b4355f064e236afbec40;hpb=fb746c58bc267696133020d78116d52e7546a560;p=pdclib diff --git a/functions/stdio/vfscanf.c b/functions/stdio/vfscanf.c index bf09226..8f121e9 100644 --- a/functions/stdio/vfscanf.c +++ b/functions/stdio/vfscanf.c @@ -14,18 +14,19 @@ int vfscanf( FILE * _PDCLIB_restrict stream, const char * _PDCLIB_restrict format, va_list arg ) { + /* TODO: This function should interpret format as multibyte characters. */ struct _PDCLIB_status_t status; status.base = 0; status.flags = 0; - status.n = 0; + status.n = 0; status.i = 0; status.current = 0; status.s = NULL; status.width = 0; status.prec = 0; status.stream = stream; - // = { 0, 0, 0, 0, 0, NULL, 0, 0, stream } va_copy( status.arg, arg ); + while ( *format != '\0' ) { const char * rc; @@ -41,7 +42,7 @@ int vfscanf( FILE * _PDCLIB_restrict stream, const char * _PDCLIB_restrict forma { ++status.i; } - if ( c != EOF ) + if ( ! feof( stream ) ) /* TODO: Check EOF status directly */ { ungetc( c, stream ); } @@ -49,10 +50,13 @@ int vfscanf( FILE * _PDCLIB_restrict stream, const char * _PDCLIB_restrict forma else { /* Non-whitespace char in format string: Match verbatim */ - if ( ( c = getc( stream ) ) != *format ) + if ( ( ( c = getc( stream ) ) != *format ) || feof( stream ) ) /* TODO: Check EOF status directly */ { /* Matching error */ - ungetc( c, stream ); + if ( ! feof( stream ) ) /* TODO: Check EOF status directly */ + { + ungetc( c, stream ); + } return status.n; } else @@ -82,11 +86,23 @@ int vfscanf( FILE * _PDCLIB_restrict stream, const char * _PDCLIB_restrict forma #ifdef TEST #include <_PDCLIB_test.h> +#include "scan_test.h" + +static int SCANFUNC( FILE * stream, char const * format, ... ) +{ + va_list ap; + va_start( ap, format ); + int result = vfscanf( stream, format, ap ); + va_end( ap ); + return result; +} + int main( void ) { - /* TODO: Check whitespace / EOF / ungetc handling */ - TESTCASE( NO_TESTDRIVER ); +#include "fscan_sources.incl" +#include "scanf_testcases.incl" return TEST_RESULTS; } #endif +