string/test-strcspn.c

   1 /* Test strcspn functions.
   2    Copyright (C) 1999-2019 Free Software Foundation, Inc.
   3    This file is part of the GNU C Library.
   4    Written by Jakub Jelinek <jakub@redhat.com>, 1999.
   5
   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.
  10
  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.
  15
  16    You should have received a copy of the GNU Lesser General Public
  17    License along with the GNU C Library; if not, see
  18    <http://www.gnu.org/licenses/>.  */
  19
  20 #define STRPBRK_RESULT(s, pos) (pos)
  21 #define RES_TYPE size_t
  22 #define TEST_MAIN
  23 #ifndef WIDE
  24 # define TEST_NAME "strcspn"
  25 #else
  26 # define TEST_NAME "wcscspn"
  27 #endif /* WIDE */
  28 #include "test-string.h"
  29
  30 #ifndef WIDE
  31 # define STRCSPN strcspn
  32 # define CHAR char
  33 # define SIMPLE_STRCSPN simple_strcspn
  34 # define STUPID_STRCSPN stupid_strcspn
  35 # define STRLEN strlen
  36 #else
  37 # include <wchar.h>
  38 # define STRCSPN wcscspn
  39 # define CHAR wchar_t
  40 # define SIMPLE_STRCSPN simple_wcscspn
  41 # define STUPID_STRCSPN stupid_wcscspn
  42 # define STRLEN wcslen
  43 #endif /* WIDE */
  44
  45 typedef size_t (*proto_t) (const CHAR *, const CHAR *);
  46 size_t SIMPLE_STRCSPN (const CHAR *, const CHAR *);
  47 size_t STUPID_STRCSPN (const CHAR *, const CHAR *);
  48
  49 IMPL (STUPID_STRCSPN, 0)
  50 IMPL (SIMPLE_STRCSPN, 0)
  51 IMPL (STRCSPN, 1)
  52
  53 size_t
  54 SIMPLE_STRCSPN (const CHAR *s, const CHAR *rej)
  55 {
  56   const CHAR *r, *str = s;
  57   CHAR c;
  58
  59   while ((c = *s++) != '\0')
  60     for (r = rej; *r != '\0'; ++r)
  61       if (*r == c)
  62         return s - str - 1;
  63   return s - str - 1;
  64 }
  65
  66 size_t
  67 STUPID_STRCSPN (const CHAR *s, const CHAR *rej)
  68 {
  69   size_t ns = STRLEN (s), nrej = STRLEN (rej);
  70   size_t i, j;
  71
  72   for (i = 0; i < ns; ++i)
  73     for (j = 0; j < nrej; ++j)
  74       if (s[i] == rej[j])
  75         return i;
  76   return i;
  77 }
  78
  79 #undef CHAR
  80 #undef STRLEN
  81 #include "test-strpbrk.c"