toolchain/gcc/newlib/libc/string/wcsspn.c

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