1 /*
2 FUNCTION
3 	<<wcsspn>>---get length of a wide substring
4 
5 SYNOPSIS
6 	#include <wchar.h>
7 	size_t wcsspn(const wchar_t *<[s]>, const wchar_t *<[set]>);
8 
9 DESCRIPTION
10 	The <<wcsspn>> function computes the length of the maximum initial
11 	segment of the wide-character string pointed to by <[s]> which consists
12 	entirely of wide-character codes from the wide-character string
13 	pointed to by <[set]>.
14 
15 RETURNS
16 	The wcsspn() function returns the length <[s1]>; no return value is
17 	reserved to indicate an error.
18 
19 PORTABILITY
20 <<wcsspn>> is ISO/IEC 9899/AMD1:1995 (ISO C).
21 
22 No supporting OS subroutines are required.
23 */
24 
25 /*	$NetBSD: wcsspn.c,v 1.1 2000/12/23 23:14:37 itojun Exp $	*/
26 
27 /*-
28  * Copyright (c)1999 Citrus Project,
29  * All rights reserved.
30  *
31  * Redistribution and use in source and binary forms, with or without
32  * modification, are permitted provided that the following conditions
33  * are met:
34  * 1. Redistributions of source code must retain the above copyright
35  *    notice, this list of conditions and the following disclaimer.
36  * 2. Redistributions in binary form must reproduce the above copyright
37  *    notice, this list of conditions and the following disclaimer in the
38  *    documentation and/or other materials provided with the distribution.
39  *
40  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
41  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
42  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
43  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
44  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
45  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
46  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
47  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
48  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
49  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
50  * SUCH DAMAGE.
51  *
52  *	citrus Id: wcsspn.c,v 1.1 1999/12/29 21:47:45 tshiozak Exp
53  */
54 
55 #include <_ansi.h>
56 #include <wchar.h>
57 
58 size_t
wcsspn(const wchar_t * s,const wchar_t * set)59 wcsspn (const wchar_t * s,
60 	const wchar_t * set)
61 {
62   const wchar_t *p;
63   const wchar_t *q;
64 
65   p = s;
66   while (*p)
67     {
68       q = set;
69       while (*q)
70 	{
71 	  if (*p == *q)
72 	    break;
73 	  q++;
74 	}
75       if (!*q)
76 	goto done;
77       p++;
78     }
79 
80 done:
81   return (p - s);
82 }
83