Mercurial > flash_v2

comparison packages/language/c/libc/string/current/src/strpbrk.cxx @ 115:6ed91473a1cd ecos-sw-2000-08-21

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Merge from eCos master repository on 2000-08-21-22:40:54-BST
author jlarmour
date Fri, 25 Aug 2000 17:32:38 +0000
parents
children e0c0827131d1
comparison
equal deleted inserted replaced
114:5ad2b71d525e 115:6ed91473a1cd
1 //===========================================================================
2 //
3 // strpbrk.cxx
4 //
5 // ANSI standard strpbrk() routine
6 //
7 //===========================================================================
8 //####COPYRIGHTBEGIN####
9 //
10 // -------------------------------------------
11 // The contents of this file are subject to the Red Hat eCos Public License
12 // Version 1.1 (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://www.redhat.com/
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 Configurable Operating System,
22 // released September 30, 1998.
23 //
24 // The Initial Developer of the Original Code is Red Hat.
25 // Portions created by Red Hat are
26 // Copyright (C) 1998, 1999, 2000 Red Hat, Inc.
27 // All Rights Reserved.
28 // -------------------------------------------
29 //
30 //####COPYRIGHTEND####
31 //===========================================================================
32 //#####DESCRIPTIONBEGIN####
33 //
34 // Author(s): jlarmour
35 // Contributors:
36 // Date: 2000-04-14
37 // Purpose:
38 // Description:
39 // Usage:
40 //
41 //####DESCRIPTIONEND####
42 //
43 //===========================================================================
44
45 // CONFIGURATION
46
47 #include <pkgconf/libc_string.h> // Configuration header
48
49 // INCLUDES
50
51 #include <cyg/infra/cyg_type.h> // Common type definitions
52 #include <cyg/infra/cyg_trac.h> // Tracing support
53 #include <cyg/infra/cyg_ass.h> // Assertion support
54 #include <string.h> // Header for this file
55 #include <stddef.h> // Compiler definitions such as size_t, NULL etc.
56 #include <cyg/libc/string/stringsupp.hxx> // Useful string function support and
57 // prototypes
58
59 // EXPORTED SYMBOLS
60
61 externC char *
62 strpbrk( const char *s1, const char *s2 ) CYGBLD_ATTRIB_WEAK_ALIAS(__strpbrk);
63
64 // FUNCTIONS
65
66 char *
67 __strpbrk( const char *s1, const char *s2 )
68 {
69 const char *c;
70
71 CYG_REPORT_FUNCNAMETYPE( "__strpbrk", "returning %08x" );
72 CYG_REPORT_FUNCARG2( "s1=%08x, s2=%08x", s1, s2 );
73
74 CYG_CHECK_DATA_PTR( s1, "s1 is not a valid pointer!" );
75 CYG_CHECK_DATA_PTR( s2, "s2 is not a valid pointer!" );
76
77 if (!*s1)
78 {
79 CYG_REPORT_RETVAL( NULL );
80 return (char *) NULL;
81 } // if
82
83 do
84 {
85 for (c = s2; *c; c++)
86 {
87 if (*s1 == *c)
88 break;
89 }
90 if (*c)
91 break;
92 s1++;
93 }
94 while (*s1);
95
96 if (*c == '\0')
97 s1 = NULL;
98
99 CYG_REPORT_RETVAL( s1 );
100
101 return (char *) s1;
102 } // __strpbrk()
103
104 // EOF strpbrk.cxx