mirror of
https://github.com/reactos/reactos.git
synced 2024-07-05 12:15:46 +00:00
58 lines
1 KiB
C
58 lines
1 KiB
C
#include <stdlib.h>
|
|
#include <mbstring.h>
|
|
|
|
/*
|
|
* @implemented
|
|
*/
|
|
unsigned char * _mbstok(unsigned char *s, const unsigned char *delim)
|
|
{
|
|
const unsigned char *spanp;
|
|
int c, sc;
|
|
unsigned char *tok;
|
|
static unsigned char *last;
|
|
|
|
|
|
if (s == NULL && (s = last) == NULL)
|
|
return (NULL);
|
|
|
|
/*
|
|
* Skip (span) leading delimiters (s += strspn(s, delim), sort of).
|
|
*/
|
|
cont:
|
|
c = *s;
|
|
s = _mbsinc(s);
|
|
|
|
for (spanp = delim; (sc = *spanp) != 0; spanp = _mbsinc(spanp)) {
|
|
if (c == sc)
|
|
goto cont;
|
|
}
|
|
|
|
if (c == 0) { /* no non-delimiter characters */
|
|
last = NULL;
|
|
return (NULL);
|
|
}
|
|
tok = s - 1;
|
|
|
|
/*
|
|
* Scan token (scan for delimiters: s += strcspn(s, delim), sort of).
|
|
* Note that delim must have one NUL; we stop if we see that, too.
|
|
*/
|
|
for (;;) {
|
|
c = *s;
|
|
s = _mbsinc(s);
|
|
spanp = delim;
|
|
do {
|
|
if ((sc = *spanp) == c) {
|
|
if (c == 0)
|
|
s = NULL;
|
|
else
|
|
s[-1] = 0;
|
|
last = s;
|
|
return (tok);
|
|
}
|
|
spanp = _mbsinc(spanp);
|
|
} while (sc != 0);
|
|
}
|
|
/* NOTREACHED */
|
|
}
|