forked from mirrors/gecko-dev
64 lines
1.2 KiB
C
64 lines
1.2 KiB
C
/*
|
|
** This file is in the public domain, so clarified as of
|
|
** 2006-07-17 by Arthur David Olson.
|
|
*/
|
|
|
|
/*LINTLIBRARY*/
|
|
|
|
#include "private.h"
|
|
|
|
const char *
|
|
scheck(const char *const string, const char *const format)
|
|
{
|
|
register char * fbuf;
|
|
register const char * fp;
|
|
register char * tp;
|
|
register int c;
|
|
register const char * result;
|
|
char dummy;
|
|
|
|
result = "";
|
|
if (string == NULL || format == NULL)
|
|
return result;
|
|
fbuf = malloc(2 * strlen(format) + 4);
|
|
if (fbuf == NULL)
|
|
return result;
|
|
fp = format;
|
|
tp = fbuf;
|
|
|
|
/*
|
|
** Copy directives, suppressing each conversion that is not
|
|
** already suppressed. Scansets containing '%' are not
|
|
** supported; e.g., the conversion specification "%[%]" is not
|
|
** supported. Also, multibyte characters containing a
|
|
** non-leading '%' byte are not supported.
|
|
*/
|
|
while ((*tp++ = c = *fp++) != '\0') {
|
|
if (c != '%')
|
|
continue;
|
|
if (is_digit(*fp)) {
|
|
char const *f = fp;
|
|
char *t = tp;
|
|
do {
|
|
*t++ = c = *f++;
|
|
} while (is_digit(c));
|
|
if (c == '$') {
|
|
fp = f;
|
|
tp = t;
|
|
}
|
|
}
|
|
*tp++ = '*';
|
|
if (*fp == '*')
|
|
++fp;
|
|
if ((*tp++ = *fp++) == '\0')
|
|
break;
|
|
}
|
|
|
|
*(tp - 1) = '%';
|
|
*tp++ = 'c';
|
|
*tp = '\0';
|
|
if (sscanf(string, fbuf, &dummy) != 1)
|
|
result = format;
|
|
free(fbuf);
|
|
return result;
|
|
}
|