1 /* Test strcspn functions.
2    Copyright (C) 1999-2022 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
SIMPLE_STRCSPN(const CHAR * s,const CHAR * rej)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
STUPID_STRCSPN(const CHAR * s,const CHAR * rej)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"
81