/* Find the first occurrence in the character string STRING of any character
in the character string ACCEPT. Return the number of bytes from the
beginning of the string to this occurrence, or to the end of the string
if none exists. */
size_t
mbscspn (const char *string, const char *accept)
{
/* Optimize two cases. */
if (accept[0] == '\0')
return strlen (string);
if (accept[1] == '\0')
{
const char *ptr = mbschr (string, accept[0]);
return (ptr != NULL ? ptr - string : strlen (string));
}
/* General case. */
if (MB_CUR_MAX > 1)
{
mbui_iterator_t iter;
for (mbui_init (iter, string); mbui_avail (iter); mbui_advance (iter))
{
if (mb_len (mbui_cur (iter)) == 1)
{
if (mbschr (accept, * mbui_cur_ptr (iter)))
goto found;
}
else
{
mbui_iterator_t aiter;
for (mbui_init (aiter, accept);
mbui_avail (aiter);
mbui_advance (aiter))
if (mb_equal (mbui_cur (aiter), mbui_cur (iter)))
goto found;
}
}
found:
return mbui_cur_ptr (iter) - string;
}
else
return strcspn (string, accept);
}
/* Find the first occurrence in the character string STRING of any character
in the character string ACCEPT. Return the pointer to it, or NULL if none
exists. */
char *
mbspbrk (const char *string, const char *accept)
{
/* Optimize two cases. */
if (accept[0] == '\0')
return NULL;
if (accept[1] == '\0')
return mbschr (string, accept[0]);
/* General case. */
if (MB_CUR_MAX > 1)
{
mbui_iterator_t iter;
for (mbui_init (iter, string); mbui_avail (iter); mbui_advance (iter))
{
if (mb_len (mbui_cur (iter)) == 1)
{
if (mbschr (accept, * mbui_cur_ptr (iter)))
return (char *) mbui_cur_ptr (iter);
}
else
{
mbui_iterator_t aiter;
for (mbui_init (aiter, accept);
mbui_avail (aiter);
mbui_advance (aiter))
if (mb_equal (mbui_cur (aiter), mbui_cur (iter)))
return (char *) mbui_cur_ptr (iter);
}
}
return NULL;
}
else
return strpbrk (string, accept);
}
/* Find the first occurrence in the character string STRING of any character
not in the character string REJECT. Return the number of bytes from the
beginning of the string to this occurrence, or to the end of the string
if none exists. */
size_t
mbsspn (const char *string, const char *reject)
{
/* Optimize two cases. */
if (reject[0] == '\0')
return 0;
if (reject[1] == '\0')
{
unsigned char uc = (unsigned char) reject[0];
if (MB_CUR_MAX > 1)
{
mbui_iterator_t iter;
for (mbui_init (iter, string); mbui_avail (iter); mbui_advance (iter))
if (!(mb_len (mbui_cur (iter)) == 1
&& (unsigned char) * mbui_cur_ptr (iter) == uc))
break;
return mbui_cur_ptr (iter) - string;
}
else
{
const char *ptr;
for (ptr = string; *ptr != '\0'; ptr++)
if ((unsigned char) *ptr != uc)
break;
return ptr - string;
}
}
/* General case. */
if (MB_CUR_MAX > 1)
{
mbui_iterator_t iter;
for (mbui_init (iter, string); mbui_avail (iter); mbui_advance (iter))
{
if (mb_len (mbui_cur (iter)) == 1)
{
if (mbschr (reject, * mbui_cur_ptr (iter)) == NULL)
goto found;
}
else
{
mbui_iterator_t aiter;
for (mbui_init (aiter, reject);; mbui_advance (aiter))
{
if (!mbui_avail (aiter))
goto found;
if (mb_equal (mbui_cur (aiter), mbui_cur (iter)))
break;
}
}
}
found:
return mbui_cur_ptr (iter) - string;
}
else
return strspn (string, reject);
}
