#ifndef REGTEST
#include <ctype.h>
+#include <_PDCLIB_io.h>
-int vsscanf( const char * _PDCLIB_restrict s, const char * _PDCLIB_restrict format, va_list arg )
+int vsscanf( const char * _PDCLIB_restrict s,
+ const char * _PDCLIB_restrict format,
+ va_list arg )
{
- /* base, flag, n, i, current, s, width, prec, stream, arg */
- struct _PDCLIB_status_t status = { 0, 0, 0, 0, 0, (char *)s, 0, 0, NULL, NULL };
+ /* TODO: This function should interpret format as multibyte characters. */
+ struct _PDCLIB_status_t status;
+ status.base = 0;
+ status.flags = 0;
+ status.n = 0;
+ status.i = 0;
+ status.current = 0;
+ status.s = (char *) s;
+ status.width = 0;
+ status.prec = 0;
+ status.stream = NULL;
va_copy( status.arg, arg );
while ( *format != '\0' )
/* Non-whitespace char in format string: Match verbatim */
if ( *status.s != *format )
{
+ if ( *status.s == '\0' && status.n == 0 )
+ {
+ /* Early input error */
+ return EOF;
+ }
/* Matching error */
return status.n;
}
}
else
{
- /* NULL return code indicates input error */
+ /* NULL return code indicates error */
if ( rc == NULL )
{
+ if ( ( *status.s == '\n' ) && ( status.n == 0 ) )
+ {
+ status.n = EOF;
+ }
break;
}
/* Continue parsing after conversion specifier */
#endif
#ifdef TEST
+#define _PDCLIB_FILEID "stdio/vsscanf.c"
+#define _PDCLIB_STRINGIO
+
#include <_PDCLIB_test.h>
+static int testscanf( char const * stream, char const * format, ... )
+{
+ va_list ap;
+ va_start( ap, format );
+ int result = vsscanf( stream, format, ap );
+ va_end( ap );
+ return result;
+}
+
int main( void )
{
- char const * teststring1 = "abc def";
- char const * teststring2 = "abcdef";
- char const * teststring3 = "abc%def";
- int x;
- TESTCASE( sscanf( teststring2, "abcdef%n", &x ) == 0 );
- TESTCASE( x == 6 );
- TESTCASE( sscanf( teststring1, "abc def%n", &x ) == 0 );
- TESTCASE( x == 8 );
- TESTCASE( sscanf( teststring2, "abc def%n", &x ) == 0 );
- TESTCASE( x == 6 );
- TESTCASE( sscanf( teststring3, "abc%%def%n", &x ) == 0 );
- TESTCASE( x == 7 );
+ char source[100];
+#include "scanf_testcases.h"
return TEST_RESULTS;
}