Mercurial > ecos

comparison packages/language/c/libc/current/src/string/strstr.cxx @ 0:3111d98ba7b3 ecos-v1_1-release

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Initial commit of eCos version 1.1
author jlarmour
date Tue, 11 May 1999 11:16:07 +0000
parents
children 443894e2e912
comparison
equal deleted inserted replaced
-1:000000000000 0:3111d98ba7b3
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 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 char *
63 strstr( const char *s1, const char *s2 ) CYGPRI_LIBC_WEAK_ALIAS("_strstr");
64
65 // FUNCTIONS
66
67 char *
68 _strstr( const char *s1, const char *s2 )
69 {
70 CYG_REPORT_FUNCNAMETYPE( "_strstr", "returning %08x" );
71 CYG_REPORT_FUNCARG2( "s1=%08x, s2=%08x", s1, s2 );
72
73 CYG_CHECK_DATA_PTR( s1, "s1 is not a valid pointer!" );
74 CYG_CHECK_DATA_PTR( s2, "s2 is not a valid pointer!" );
75
76 if (*s1 == '\0')
77 {
78 if (*s2)
79 {
80 CYG_REPORT_RETVAL( NULL );
81 return (char *) NULL;
82 } // if
83 else
84 {
85 CYG_REPORT_RETVAL( s1 );
86 return (char *) s1;
87 } // else
88 } // if
89
90 while (*s1)
91 {
92 cyg_ucount32 i;
93
94 for (i=0 ; ; i++)
95 {
96 if (s2[i] == '\0')
97 {
98 CYG_REPORT_RETVAL( s1 );
99 return (char *) s1;
100 } // if
101
102 if (s2[i] != s1[i])
103 {
104 break;
105 } // if
106 } // for
107 s1++;
108 } // while
109
110 CYG_REPORT_RETVAL( NULL );
111
112 return (char *) NULL;
113 } // _strstr()
114
115 #endif // ifdef CYGPKG_LIBC
116
117 // EOF strstr.cxx