1 /* vi: set sw=4 ts=4: */
3 * Copyright (C) 2000-2005 by Erik Andersen <andersen@codepoet.org>
5 * GNU Lesser General Public License version 2.1 or later.
16 #include <dl-defs.h> /* for do_rem by dl-sysdep.h */
18 /* provide some sane defaults */
20 # define do_rem(result, n, base) ((result) = (n) % (base))
23 # define do_div_10(result, remain) ((result) /= 10)
27 static __always_inline size_t _dl_strlen(const char *str)
29 register const char *ptr = (char *) str-1;
35 static __always_inline char * _dl_strcat(char *dst, const char *src)
37 register char *ptr = dst-1;
43 while ((*++ptr = *++src) != 0)
48 static __always_inline char * _dl_strcpy(char *dst, const char *src)
50 register char *ptr = dst;
53 while ((*++dst = *++src) != 0)
59 static __always_inline int _dl_strcmp(const char *s1, const char *s2)
61 register unsigned char c1, c2;
64 c1 = (unsigned char) *++s1;
65 c2 = (unsigned char) *++s2;
73 static __always_inline char * _dl_strchr(const char *str, int c)
78 if ((ch = *++str) == c)
86 static __always_inline char * _dl_strrchr(const char *str, int c)
88 register char *prev = 0;
89 register char *ptr = (char *) str-1;
91 while (*++ptr != '\0') {
100 static __always_inline char * _dl_strstr(const char *s1, const char *s2)
102 register const char *s = s1;
103 register const char *p = s2;
120 static __always_inline void * _dl_memcpy(void *dst, const void *src, size_t len)
122 register char *a = dst-1;
123 register const char *b = src-1;
132 static __always_inline int _dl_memcmp(const void *s1, const void *s2, size_t len)
134 unsigned char *c1 = (unsigned char *)s1-1;
135 unsigned char *c2 = (unsigned char *)s2-1;
145 #if defined(__powerpc__)
146 /* Will generate smaller and faster code due to loop unrolling.*/
147 static __always_inline void * _dl_memset(void *to, int c, size_t n)
149 unsigned long chunks;
150 unsigned long *tmp_to;
151 unsigned char *tmp_char;
166 tmp_char = (unsigned char *)tmp_to;
173 static __always_inline void * _dl_memset(void *str, int c, size_t len)
175 register char *a = str;
184 static __always_inline char * _dl_get_last_path_component(char *path)
186 register char *ptr = path-1;
191 /* strip trailing slashes */
192 while (ptr != path && *--ptr == '/') {
196 /* find last component */
197 while (ptr != path && *--ptr != '/')
199 return ptr == path ? ptr : ptr+1;
201 #else /* IS_IN_rtld */
203 # define _dl_strlen strlen
204 # define _dl_strcat strcat
205 # define _dl_strcpy strcpy
206 # define _dl_strcmp strcmp
207 # define _dl_strrchr strrchr
208 # define _dl_memcpy memcpy
209 # define _dl_memcmp memcmp
210 # define _dl_memset memset
211 #endif /* IS_IN_rtld */
213 #if defined IS_IN_rtld || defined __SUPPORT_LD_DEBUG__
214 /* Early on, we can't call printf, so use this to print out
215 * numbers using the SEND_STDERR() macro. Avoid using mod
216 * or using long division */
217 static __always_inline char * _dl_simple_ltoa(char *local, unsigned long i)
219 /* 20 digits plus a null terminator should be good for
220 * 64-bit or smaller ints (2^64 - 1)*/
221 char *p = &local[22];
234 static __always_inline char * _dl_simple_ltoahex(char *local, unsigned long i)
236 /* 16 digits plus a leading "0x" plus a null terminator,
237 * should be good for 64-bit or smaller ints */
238 char *p = &local[22];
245 *--p = 'a' - 0x0a + temp;
253 /* The following macros may be used in dl-startup.c to debug
254 * ldso before ldso has fixed itself up to make function calls */
256 /* On some (wierd) arches, none of this stuff works at all, so
257 * disable the whole lot... */
258 #if defined(__mips__)
260 # define SEND_STDERR(X)
261 # define SEND_ADDRESS_STDERR(X, add_a_newline)
262 # define SEND_NUMBER_STDERR(X, add_a_newline)
266 /* On some arches constant strings are referenced through the GOT.
267 * This requires that load_addr must already be defined... */
268 #if defined(mc68000) || defined(__arm__) || defined(__thumb__) || \
269 defined(__sh__) || defined(__powerpc__) || \
270 defined(__avr32__) || defined(__xtensa__) || defined(__sparc__) || defined(__microblaze__)
271 # define CONSTANT_STRING_GOT_FIXUP(X) \
272 if ((X) < (const char *) load_addr) (X) += load_addr
273 # define NO_EARLY_SEND_STDERR
275 # define CONSTANT_STRING_GOT_FIXUP(X)
278 #define SEND_STDERR(X) \
280 const char *tmp1 = (X); \
281 CONSTANT_STRING_GOT_FIXUP(tmp1); \
282 _dl_write(2, tmp1, _dl_strlen(tmp1)); \
285 #define SEND_ADDRESS_STDERR(ADR, add_a_newline) \
287 char tmp[26], v, *tmp2, *tmp1 = tmp; \
288 unsigned long X = (unsigned long)(ADR); \
289 CONSTANT_STRING_GOT_FIXUP(tmp1); \
290 tmp2 = tmp1 + sizeof(tmp); \
292 if (add_a_newline) *--tmp2 = '\n'; \
298 *--tmp2 = 'a' - 0x0a + v; \
303 _dl_write(2, tmp2, tmp1 - tmp2 + sizeof(tmp) - 1); \
306 #define SEND_NUMBER_STDERR(NUM, add_a_newline) \
308 char tmp[26], v, *tmp2, *tmp1 = tmp; \
309 unsigned long X = (unsigned long)(NUM); \
310 CONSTANT_STRING_GOT_FIXUP(tmp1); \
311 tmp2 = tmp1 + sizeof(tmp); \
313 if (add_a_newline) *--tmp2 = '\n'; \
315 do_rem(v, (X), 10); \
319 _dl_write(2, tmp2, tmp1 - tmp2 + sizeof(tmp) - 1); \
323 /* Some targets may have to override this to something that doesn't
324 * reference constant strings through the GOT. This macro should be
325 * preferred over SEND_STDERR for constant strings before we complete
328 #ifndef SEND_EARLY_STDERR
329 # define SEND_EARLY_STDERR(S) SEND_STDERR(S)
331 # define EARLY_STDERR_SPECIAL
334 #ifdef __SUPPORT_LD_DEBUG_EARLY__
335 # define SEND_STDERR_DEBUG(X) SEND_STDERR(X)
336 # define SEND_EARLY_STDERR_DEBUG(X) SEND_EARLY_STDERR(X)
337 # define SEND_NUMBER_STDERR_DEBUG(X, add_a_newline) SEND_NUMBER_STDERR(X, add_a_newline)
338 # define SEND_ADDRESS_STDERR_DEBUG(X, add_a_newline) SEND_ADDRESS_STDERR(X, add_a_newline)
340 # define SEND_STDERR_DEBUG(X)
341 # define SEND_EARLY_STDERR_DEBUG(X)
342 # define SEND_NUMBER_STDERR_DEBUG(X, add_a_newline)
343 # define SEND_ADDRESS_STDERR_DEBUG(X, add_a_newline)
346 #endif /* IS_IN_rtld */
348 #endif /* _DL_STRING_H */