packages/language/c/libc/string/v2_0/tests/strcspn.c

   1 //=================================================================
   2 //
   3 //        strcspn.c
   4 //
   5 //        Testcase for C library strcspn()
   6 //
   7 //=================================================================
   8 //####ECOSGPLCOPYRIGHTBEGIN####
   9 // -------------------------------------------
  10 // This file is part of eCos, the Embedded Configurable Operating System.
  11 // Copyright (C) 1998, 1999, 2000, 2001, 2002 Red Hat, Inc.
  12 //
  13 // eCos is free software; you can redistribute it and/or modify it under
  14 // the terms of the GNU General Public License as published by the Free
  15 // Software Foundation; either version 2 or (at your option) any later version.
  16 //
  17 // eCos is distributed in the hope that it will be useful, but WITHOUT ANY
  18 // WARRANTY; without even the implied warranty of MERCHANTABILITY or
  19 // FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
  20 // for more details.
  21 //
  22 // You should have received a copy of the GNU General Public License along
  23 // with eCos; if not, write to the Free Software Foundation, Inc.,
  24 // 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA.
  25 //
  26 // As a special exception, if other files instantiate templates or use macros
  27 // or inline functions from this file, or you compile this file and link it
  28 // with other works to produce a work based on this file, this file does not
  29 // by itself cause the resulting work to be covered by the GNU General Public
  30 // License. However the source code for this file must still be made available
  31 // in accordance with section (3) of the GNU General Public License.
  32 //
  33 // This exception does not invalidate any other reasons why a work based on
  34 // this file might be covered by the GNU General Public License.
  35 //
  36 // Alternative licenses for eCos may be arranged by contacting Red Hat, Inc.
  37 // at http://sources.redhat.com/ecos/ecos-license/
  38 // -------------------------------------------
  39 //####ECOSGPLCOPYRIGHTEND####
  40 //=================================================================
  41 //#####DESCRIPTIONBEGIN####
  42 //
  43 // Author(s):     ctarpy, jlarmour
  44 // Contributors:
  45 // Date:          2000-04-30
  46 // Description:   Contains testcode for C library strcspn() function
  47 //
  48 //
  49 //####DESCRIPTIONEND####
  50
  51 // INCLUDES
  52
  53 #include <string.h>
  54 #include <cyg/infra/testcase.h>
  55
  56
  57 // FUNCTIONS
  58
  59 // Functions to avoid having to use libc strings
  60
  61 static int my_strlen(const char *s)
  62 {
  63     const char *ptr;
  64
  65     ptr = s;
  66     for ( ptr=s ; *ptr != '\0' ; ptr++ )
  67         ;
  68
  69     return (int)(ptr-s);
  70 } // my_strlen()
  71
  72
  73 static char *my_strcpy(char *s1, const char *s2)
  74 {
  75     while (*s2 != '\0') {
  76         *(s1++) = *(s2++);
  77     }
  78     *s1 = '\0';
  79
  80     return s1;
  81 } // my_strcpy()
  82
  83
  84 int main( int argc, char *argv[] )
  85 {
  86     char x[300];
  87     char y[300];
  88     int ret;
  89
  90     CYG_TEST_INIT();
  91
  92     CYG_TEST_INFO("Starting tests from testcase " __FILE__ " for C library "
  93                   "strcspn() function");
  94     CYG_TEST_INFO("This testcase provides simple basic tests");
  95
  96     // Check 1
  97     my_strcpy(x, "ah blow my nose at you, so-called Arthur king!");
  98     my_strcpy(y, "A");
  99     ret = strcspn(x, y);
 100     CYG_TEST_PASS_FAIL( (ret == 34), "Simple strcspn() for one char" );
 101
 102
 103     // Check 2
 104     my_strcpy(x, "Not bad for a little fur ball. You! Stay here.");
 105     my_strcpy(y, "fd");
 106     ret = strcspn(x, y);
 107     CYG_TEST_PASS_FAIL( (ret == 6), "Simple strcspn() for two chars" );
 108
 109     // Check 3 (boundary condition)
 110     my_strcpy(x, "");
 111     my_strcpy(y, "zx");
 112     ret = strcspn(x, y);
 113     CYG_TEST_PASS_FAIL( (ret == 0), "Empty string to search");
 114
 115
 116     // Check 4 (boundary condition)
 117     my_strcpy(x, "So, if she weighs the same as a duck, she's made of wood!");
 118     my_strcpy(y, "zx");
 119     ret = strcspn(x, y);
 120     CYG_TEST_PASS_FAIL( (ret == my_strlen(x)), "Characters not in string" );
 121
 122     // Check 5 (boundary condition)
 123     my_strcpy(x, "So, if she weighs the same as a duck, she's made of wood!");
 124     my_strcpy(y, "S");
 125     ret = strcspn(x, y);
 126     CYG_TEST_PASS_FAIL( (ret == 0), "First character of string" );
 127
 128     // Check 6 (boundary condition)
 129     my_strcpy(x, "So, if she weighs the same as a duck, she's made of wood!");
 130     my_strcpy(y, "!");
 131     ret = strcspn(x, y);
 132     CYG_TEST_PASS_FAIL( (ret == (my_strlen(x) - 1)),
 133                         "Penultimate character of string" );
 134
 135 //    CYG_TEST_NA("Testing is not applicable to this configuration");
 136
 137     CYG_TEST_FINISH("Finished tests from testcase " __FILE__ " for C library "
 138                     "strcspn() function");
 139 } // main()
 140
 141 // EOF strcspn.c