|
0
|
1 //=========================================================================== |
|
|
2 // |
|
|
3 // strcspn.cxx |
|
|
4 // |
|
|
5 // ANSI standard strcspn() routine |
|
|
6 // |
|
|
7 //=========================================================================== |
|
|
8 //####COPYRIGHTBEGIN#### |
|
|
9 // |
|
|
10 // ------------------------------------------- |
|
|
11 // The contents of this file are subject to the Cygnus eCos Public License |
|
|
12 // Version 1.0 (the "License"); you may not use this file except in |
|
|
13 // compliance with the License. You may obtain a copy of the License at |
|
|
14 // http://sourceware.cygnus.com/ecos |
|
|
15 // |
|
|
16 // Software distributed under the License is distributed on an "AS IS" |
|
|
17 // basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See the |
|
|
18 // License for the specific language governing rights and limitations under |
|
|
19 // the License. |
|
|
20 // |
|
|
21 // The Original Code is eCos - Embedded Cygnus Operating System, released |
|
|
22 // September 30, 1998. |
|
|
23 // |
|
|
24 // The Initial Developer of the Original Code is Cygnus. Portions created |
|
|
25 // by Cygnus are Copyright (C) 1998 Cygnus Solutions. All Rights Reserved. |
|
|
26 // ------------------------------------------- |
|
|
27 // |
|
|
28 //####COPYRIGHTEND#### |
|
|
29 //=========================================================================== |
|
|
30 //#####DESCRIPTIONBEGIN#### |
|
|
31 // |
|
|
32 // Author(s): jlarmour |
|
|
33 // Contributors: jlarmour@cygnus.co.uk |
|
|
34 // Date: 1998-02-13 |
|
|
35 // Purpose: |
|
|
36 // Description: |
|
|
37 // Usage: |
|
|
38 // |
|
|
39 //####DESCRIPTIONEND#### |
|
|
40 // |
|
|
41 //=========================================================================== |
|
|
42 |
|
|
43 // CONFIGURATION |
|
|
44 |
|
|
45 #include <pkgconf/libc.h> // Configuration header |
|
|
46 |
|
|
47 // Include the C library? |
|
|
48 #ifdef CYGPKG_LIBC |
|
|
49 |
|
|
50 // INCLUDES |
|
|
51 |
|
|
52 #include <cyg/infra/cyg_type.h> // Common type definitions |
|
|
53 #include <cyg/infra/cyg_trac.h> // Tracing support |
|
|
54 #include <cyg/infra/cyg_ass.h> // Assertion support |
|
|
55 #include <string.h> // Header for this file |
|
|
56 #include <stddef.h> // Compiler definitions such as size_t, NULL etc. |
|
|
57 #include "clibincl/stringsupp.hxx" // Useful string function support and |
|
|
58 // prototypes |
|
|
59 |
|
|
60 // EXPORTED SYMBOLS |
|
|
61 |
|
|
62 externC size_t |
|
|
63 strcspn( const char *s1, const char *s2 ) CYGPRI_LIBC_WEAK_ALIAS("_strcspn"); |
|
|
64 |
|
|
65 // FUNCTIONS |
|
|
66 |
|
|
67 size_t |
|
|
68 _strcspn( const char *s1, const char *s2 ) |
|
|
69 { |
|
|
70 const char *s = s1; |
|
|
71 const char *c; |
|
|
72 size_t retval; |
|
|
73 |
|
|
74 CYG_REPORT_FUNCNAMETYPE( "_strcspn", "returning size %d" ); |
|
|
75 CYG_REPORT_FUNCARG2( "s1=%08x, s2=%08x", s1, s2 ); |
|
|
76 |
|
|
77 CYG_CHECK_DATA_PTR( s1, "s1 is not a valid pointer!" ); |
|
|
78 CYG_CHECK_DATA_PTR( s2, "s2 is not a valid pointer!" ); |
|
|
79 |
|
|
80 while (*s1) |
|
|
81 { |
|
|
82 for (c = s2; *c; c++) |
|
|
83 { |
|
|
84 if (*s1 == *c) |
|
|
85 break; |
|
|
86 } |
|
|
87 if (*c) |
|
|
88 break; |
|
|
89 s1++; |
|
|
90 } |
|
|
91 |
|
|
92 retval = s1 - s; |
|
|
93 |
|
|
94 CYG_REPORT_RETVAL( retval ); |
|
|
95 |
|
|
96 return retval; |
|
|
97 } // _strcspn() |
|
|
98 |
|
|
99 #endif // ifdef CYGPKG_LIBC |
|
|
100 |
|
|
101 // EOF strcspn.cxx |
