2002-03-24 13:26:18 +00:00
|
|
|
/*
|
|
|
|
* vsscanf.c
|
|
|
|
*
|
|
|
|
* (C) Copyright 2002 Ullrich von Bassewitz (uz@cc65.org)
|
|
|
|
*
|
|
|
|
*/
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
#include <stdio.h>
|
|
|
|
#include "_scanf.h"
|
2003-11-06 18:04:07 +00:00
|
|
|
|
2002-03-24 13:26:18 +00:00
|
|
|
|
|
|
|
|
|
|
|
/*****************************************************************************/
|
|
|
|
/* Code */
|
|
|
|
/*****************************************************************************/
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
static char get (struct indesc* d)
|
|
|
|
/* Read a character from the input string and return it */
|
|
|
|
{
|
|
|
|
char C;
|
|
|
|
if (C = d->buf[d->ridx]) {
|
|
|
|
/* Increment index only if end not reached */
|
|
|
|
++d->ridx;
|
|
|
|
}
|
|
|
|
return C;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
2003-11-06 18:04:07 +00:00
|
|
|
int __fastcall__ vsscanf (const char* str, const char* format, va_list ap)
|
2002-03-24 13:26:18 +00:00
|
|
|
/* Standard C function */
|
|
|
|
{
|
|
|
|
struct indesc id;
|
|
|
|
|
|
|
|
/* Initialize the indesc struct. We leave all fields uninitialized that we
|
|
|
|
* don't need
|
|
|
|
*/
|
|
|
|
id.fin = (infunc) get;
|
|
|
|
id.buf = (char*) str;
|
|
|
|
id.ridx = 0;
|
|
|
|
|
|
|
|
/* Call the internal function and return the result */
|
|
|
|
return _scanf (&id, format, ap);
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|