Mercurial > ecos-v2_0-branch

comparison packages/language/c/libc/string/current/src/strstr.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 // strstr.cxx
4 //
5 // ANSI standard strstr() 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 strstr( const char *s1, const char *s2 ) CYGBLD_ATTRIB_WEAK_ALIAS(__strstr);
63
64 // FUNCTIONS
65
66 char *
67 __strstr( const char *s1, const char *s2 )
68 {
69 CYG_REPORT_FUNCNAMETYPE( "__strstr", "returning %08x" );
70 CYG_REPORT_FUNCARG2( "s1=%08x, s2=%08x", s1, s2 );
71
72 CYG_CHECK_DATA_PTR( s1, "s1 is not a valid pointer!" );
73 CYG_CHECK_DATA_PTR( s2, "s2 is not a valid pointer!" );
74
75 if (*s1 == '\0')
76 {
77 if (*s2)
78 {
79 CYG_REPORT_RETVAL( NULL );
80 return (char *) NULL;
81 } // if
82 else
83 {
84 CYG_REPORT_RETVAL( s1 );
85 return (char *) s1;
86 } // else
87 } // if
88
89 while (*s1)
90 {
91 cyg_ucount32 i;
92
93 for (i=0 ; ; i++)
94 {
95 if (s2[i] == '\0')
96 {
97 CYG_REPORT_RETVAL( s1 );
98 return (char *) s1;
99 } // if
100
101 if (s2[i] != s1[i])
102 {
103 break;
104 } // if
105 } // for
106 s1++;
107 } // while
108
109 CYG_REPORT_RETVAL( NULL );
110
111 return (char *) NULL;
112 } // __strstr()
113
114 // EOF strstr.cxx