1
0
mirror of https://github.com/cc65/cc65.git synced 2024-11-02 18:06:48 +00:00
cc65/libsrc/common/sscanf.c
cuz 71e40d42f5 Working on the ..scanf functions
git-svn-id: svn://svn.cc65.org/cc65/trunk@691 b7a2c559-68d2-44c3-8de9-860c34a00d81
2001-04-19 06:46:30 +00:00

59 lines
1.1 KiB
C

/*
* sscanf.c
*
* (C) Copyright 2001 Ullrich von Bassewitz (uz@cc65.org)
*
*/
#include <stdio.h>
#include <string.h>
#include "_scanf.h"
/*****************************************************************************/
/* 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;
}
int sscanf (const char* str, const char* format, ...)
/* Standard C function */
{
struct indesc id;
va_list ap;
/* 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;
/* Setup for variable arguments */
va_start (ap, format);
/* Call the internal function. Since we know that va_end won't do anything,
* we will save the call and return the value directly.
*/
return _scanf (&id, format, ap);
}