Updated to fedora-glibc-20061219T1804
[glibc/history.git] / string / test-strcspn.c
blobb5631790b6413b9a550054ff180e3a7b07671798
1 /* Test and measure strcspn functions.
2 Copyright (C) 1999, 2002 Free Software Foundation, Inc.
3 This file is part of the GNU C Library.
4 Written by Jakub Jelinek <jakub@redhat.com>, 1999.
6 The GNU C Library is free software; you can redistribute it and/or
7 modify it under the terms of the GNU Lesser General Public
8 License as published by the Free Software Foundation; either
9 version 2.1 of the License, or (at your option) any later version.
11 The GNU C Library is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 Lesser General Public License for more details.
16 You should have received a copy of the GNU Lesser General Public
17 License along with the GNU C Library; if not, write to the Free
18 Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
19 02111-1307 USA. */
21 #define STRPBRK_RESULT(s, pos) (pos)
22 #define RES_TYPE size_t
23 #define TEST_MAIN
24 #include "test-string.h"
26 typedef size_t (*proto_t) (const char *, const char *);
27 size_t simple_strcspn (const char *, const char *);
28 size_t stupid_strcspn (const char *, const char *);
30 IMPL (stupid_strcspn, 0)
31 IMPL (simple_strcspn, 0)
32 IMPL (strcspn, 1)
34 size_t
35 simple_strcspn (const char *s, const char *rej)
37 const char *r, *str = s;
38 char c;
40 while ((c = *s++) != '\0')
41 for (r = rej; *r != '\0'; ++r)
42 if (*r == c)
43 return s - str - 1;
44 return s - str - 1;
47 size_t
48 stupid_strcspn (const char *s, const char *rej)
50 size_t ns = strlen (s), nrej = strlen (rej);
51 size_t i, j;
53 for (i = 0; i < ns; ++i)
54 for (j = 0; j < nrej; ++j)
55 if (s[i] == rej[j])
56 return i;
57 return i;
60 #include "test-strpbrk.c"