1 | //=========================================================================== |
---|
2 | // |
---|
3 | // strcat.cxx |
---|
4 | // |
---|
5 | // ANSI standard strcat() routine |
---|
6 | // |
---|
7 | //=========================================================================== |
---|
8 | //####ECOSGPLCOPYRIGHTBEGIN#### |
---|
9 | // ------------------------------------------- |
---|
10 | // This file is part of eCos, the Embedded Configurable Operating System. |
---|
11 | // Copyright (C) 1998, 1999, 2000, 2001, 2002 Red Hat, Inc. |
---|
12 | // |
---|
13 | // eCos is free software; you can redistribute it and/or modify it under |
---|
14 | // the terms of the GNU General Public License as published by the Free |
---|
15 | // Software Foundation; either version 2 or (at your option) any later version. |
---|
16 | // |
---|
17 | // eCos is distributed in the hope that it will be useful, but WITHOUT ANY |
---|
18 | // WARRANTY; without even the implied warranty of MERCHANTABILITY or |
---|
19 | // FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License |
---|
20 | // for more details. |
---|
21 | // |
---|
22 | // You should have received a copy of the GNU General Public License along |
---|
23 | // with eCos; if not, write to the Free Software Foundation, Inc., |
---|
24 | // 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA. |
---|
25 | // |
---|
26 | // As a special exception, if other files instantiate templates or use macros |
---|
27 | // or inline functions from this file, or you compile this file and link it |
---|
28 | // with other works to produce a work based on this file, this file does not |
---|
29 | // by itself cause the resulting work to be covered by the GNU General Public |
---|
30 | // License. However the source code for this file must still be made available |
---|
31 | // in accordance with section (3) of the GNU General Public License. |
---|
32 | // |
---|
33 | // This exception does not invalidate any other reasons why a work based on |
---|
34 | // this file might be covered by the GNU General Public License. |
---|
35 | // |
---|
36 | // Alternative licenses for eCos may be arranged by contacting Red Hat, Inc. |
---|
37 | // at http://sources.redhat.com/ecos/ecos-license/ |
---|
38 | // ------------------------------------------- |
---|
39 | //####ECOSGPLCOPYRIGHTEND#### |
---|
40 | //=========================================================================== |
---|
41 | //#####DESCRIPTIONBEGIN#### |
---|
42 | // |
---|
43 | // Author(s): jlarmour |
---|
44 | // Contributors: |
---|
45 | // Date: 2000-04-14 |
---|
46 | // Purpose: |
---|
47 | // Description: |
---|
48 | // Usage: |
---|
49 | // |
---|
50 | //####DESCRIPTIONEND#### |
---|
51 | // |
---|
52 | //=========================================================================== |
---|
53 | |
---|
54 | // CONFIGURATION |
---|
55 | |
---|
56 | #include <pkgconf/libc_string.h> // Configuration header |
---|
57 | |
---|
58 | // INCLUDES |
---|
59 | |
---|
60 | #include <cyg/infra/cyg_type.h> // Common type definitions |
---|
61 | #include <cyg/infra/cyg_trac.h> // Tracing support |
---|
62 | #include <cyg/infra/cyg_ass.h> // Assertion support |
---|
63 | #include <string.h> // Header for this file |
---|
64 | #include <stddef.h> // Compiler definitions such as size_t, NULL etc. |
---|
65 | #include <cyg/libc/string/stringsupp.hxx> // Useful string function support and |
---|
66 | // prototypes |
---|
67 | |
---|
68 | // EXPORTED SYMBOLS |
---|
69 | |
---|
70 | externC char * |
---|
71 | strcat( char *s1, const char *s2 ) CYGBLD_ATTRIB_WEAK_ALIAS(__strcat); |
---|
72 | |
---|
73 | // FUNCTIONS |
---|
74 | |
---|
75 | char * |
---|
76 | __strcat( char *s1, const char *s2 ) |
---|
77 | { |
---|
78 | CYG_REPORT_FUNCNAMETYPE( "__strcat", "returning %08x" ); |
---|
79 | CYG_REPORT_FUNCARG2( "s1=%08x, s2=%08x", s1, s2 ); |
---|
80 | |
---|
81 | CYG_CHECK_DATA_PTR( s1, "s1 is not a valid pointer!" ); |
---|
82 | CYG_CHECK_DATA_PTR( s2, "s2 is not a valid pointer!" ); |
---|
83 | |
---|
84 | #if defined(CYGIMP_LIBC_STRING_PREFER_SMALL_TO_FAST) || defined(__OPTIMIZE_SIZE__) |
---|
85 | char *s = s1; |
---|
86 | |
---|
87 | while (*s1) |
---|
88 | s1++; |
---|
89 | |
---|
90 | while ((*s1++ = *s2++)) |
---|
91 | ; |
---|
92 | |
---|
93 | CYG_REPORT_RETVAL( s ); |
---|
94 | |
---|
95 | return s; |
---|
96 | #else |
---|
97 | char *s = s1; |
---|
98 | |
---|
99 | |
---|
100 | // Skip over the data in s1 as quickly as possible. |
---|
101 | if (!CYG_LIBC_STR_UNALIGNED (s1)) |
---|
102 | { |
---|
103 | CYG_WORD *aligned_s1 = (CYG_WORD *)s1; |
---|
104 | while (!CYG_LIBC_STR_DETECTNULL (*aligned_s1)) |
---|
105 | aligned_s1++; |
---|
106 | |
---|
107 | s1 = (char *)aligned_s1; |
---|
108 | } |
---|
109 | |
---|
110 | while (*s1) |
---|
111 | s1++; |
---|
112 | |
---|
113 | // s1 now points to the its trailing null character, we can |
---|
114 | // just use strcpy to do the work for us now. |
---|
115 | // |
---|
116 | // ?!? We might want to just include strcpy here. |
---|
117 | // Also, this will cause many more unaligned string copies because |
---|
118 | // s1 is much less likely to be aligned. I don't know if its worth |
---|
119 | // tweaking strcpy to handle this better. |
---|
120 | strcpy (s1, s2); |
---|
121 | |
---|
122 | CYG_REPORT_RETVAL( s ); |
---|
123 | |
---|
124 | return s; |
---|
125 | #endif // not defined(CYGIMP_LIBC_STRING_PREFER_SMALL_TO_FAST) || |
---|
126 | // defined(__OPTIMIZE_SIZE__) |
---|
127 | } // __strcat() |
---|
128 | |
---|
129 | // EOF strcat.cxx |
---|