1  /* Test strcspn functions.
       2     Copyright (C) 1999-2023 Free Software Foundation, Inc.
       3     This file is part of the GNU C Library.
       4  
       5     The GNU C Library is free software; you can redistribute it and/or
       6     modify it under the terms of the GNU Lesser General Public
       7     License as published by the Free Software Foundation; either
       8     version 2.1 of the License, or (at your option) any later version.
       9  
      10     The GNU C Library is distributed in the hope that it will be useful,
      11     but WITHOUT ANY WARRANTY; without even the implied warranty of
      12     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
      13     Lesser General Public License for more details.
      14  
      15     You should have received a copy of the GNU Lesser General Public
      16     License along with the GNU C Library; if not, see
      17     <https://www.gnu.org/licenses/>.  */
      18  
      19  #define STRPBRK_RESULT(s, pos) (pos)
      20  #define RES_TYPE size_t
      21  #define TEST_MAIN
      22  #ifndef WIDE
      23  # define TEST_NAME "strcspn"
      24  #else
      25  # define TEST_NAME "wcscspn"
      26  #endif /* WIDE */
      27  #include "test-string.h"
      28  
      29  #ifndef WIDE
      30  # define STRCSPN strcspn
      31  # define CHAR char
      32  # define SIMPLE_STRCSPN simple_strcspn
      33  # define STUPID_STRCSPN stupid_strcspn
      34  # define STRLEN strlen
      35  #else
      36  # include <wchar.h>
      37  # define STRCSPN wcscspn
      38  # define CHAR wchar_t
      39  # define SIMPLE_STRCSPN simple_wcscspn
      40  # define STUPID_STRCSPN stupid_wcscspn
      41  # define STRLEN wcslen
      42  #endif /* WIDE */
      43  
      44  typedef size_t (*proto_t) (const CHAR *, const CHAR *);
      45  size_t SIMPLE_STRCSPN (const CHAR *, const CHAR *);
      46  size_t STUPID_STRCSPN (const CHAR *, const CHAR *);
      47  
      48  IMPL (STUPID_STRCSPN, 0)
      49  IMPL (SIMPLE_STRCSPN, 0)
      50  IMPL (STRCSPN, 1)
      51  
      52  size_t
      53  SIMPLE_STRCSPN (const CHAR *s, const CHAR *rej)
      54  {
      55    const CHAR *r, *str = s;
      56    CHAR c;
      57  
      58    while ((c = *s++) != '\0')
      59      for (r = rej; *r != '\0'; ++r)
      60        if (*r == c)
      61  	return s - str - 1;
      62    return s - str - 1;
      63  }
      64  
      65  size_t
      66  STUPID_STRCSPN (const CHAR *s, const CHAR *rej)
      67  {
      68    size_t ns = STRLEN (s), nrej = STRLEN (rej);
      69    size_t i, j;
      70  
      71    for (i = 0; i < ns; ++i)
      72      for (j = 0; j < nrej; ++j)
      73        if (s[i] == rej[j])
      74  	return i;
      75    return i;
      76  }
      77  
      78  #undef CHAR
      79  #undef STRLEN
      80  #include "test-strpbrk.c"