Mercurial > ecos

comparison packages/language/c/libc/current/src/string/strcat.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 // strcat.cxx
4 //
5 // ANSI standard strcat() 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 strcat( char *s1, const char *s2 ) CYGPRI_LIBC_WEAK_ALIAS("_strcat");
64
65 // FUNCTIONS
66
67 char *
68 _strcat( char *s1, const char *s2 )
69 {
70 CYG_REPORT_FUNCNAMETYPE( "_strcat", "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 defined(CYGIMP_LIBC_STRING_PREFER_SMALL_TO_FAST) || defined(__OPTIMIZE_SIZE__)
77 char *s = s1;
78
79 while (*s1)
80 s1++;
81
82 while ((*s1++ = *s2++))
83 ;
84
85 CYG_REPORT_RETVAL( s );
86
87 return s;
88 #else
89 char *s = s1;
90
91
92 // Skip over the data in s1 as quickly as possible.
93 if (!CYG_LIBC_STR_UNALIGNED (s1))
94 {
95 CYG_WORD *aligned_s1 = (CYG_WORD *)s1;
96 while (!CYG_LIBC_STR_DETECTNULL (*aligned_s1))
97 aligned_s1++;
98
99 s1 = (char *)aligned_s1;
100 }
101
102 while (*s1)
103 s1++;
104
105 // s1 now points to the its trailing null character, we can
106 // just use strcpy to do the work for us now.
107 //
108 // ?!? We might want to just include strcpy here.
109 // Also, this will cause many more unaligned string copies because
110 // s1 is much less likely to be aligned. I don't know if its worth
111 // tweaking strcpy to handle this better.
112 strcpy (s1, s2);
113
114 CYG_REPORT_RETVAL( s );
115
116 return s;
117 #endif // not defined(CYGIMP_LIBC_STRING_PREFER_SMALL_TO_FAST) ||
118 // defined(__OPTIMIZE_SIZE__)
119 } // _strcat()
120
121 #endif // ifdef CYGPKG_LIBC
122
123 // EOF strcat.cxx