dl-string.h 5.4 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259
  1. #ifndef _LINUX_STRING_H_
  2. #define _LINUX_STRING_H_
  3. #include <dl-sysdep.h> // for do_rem
  4. static size_t _dl_strlen(const char * str);
  5. static char *_dl_strcat(char *dst, const char *src);
  6. static char * _dl_strcpy(char * dst,const char *src);
  7. static int _dl_strcmp(const char * s1,const char * s2);
  8. static int _dl_strncmp(const char * s1,const char * s2,size_t len);
  9. static char * _dl_strchr(const char * str,int c);
  10. static char *_dl_strrchr(const char *str, int c);
  11. static char *_dl_strstr(const char *s1, const char *s2);
  12. static void * _dl_memcpy(void * dst, const void * src, size_t len);
  13. static int _dl_memcmp(const void * s1,const void * s2,size_t len);
  14. static void *_dl_memset(void * str,int c,size_t len);
  15. static char *_dl_get_last_path_component(char *path);
  16. static char *_dl_simple_ltoa(char * local, unsigned long i);
  17. static char *_dl_simple_ltoahex(char * local, unsigned long i);
  18. #ifndef NULL
  19. #define NULL ((void *) 0)
  20. #endif
  21. static inline size_t _dl_strlen(const char * str)
  22. {
  23. register const char *ptr = (char *) str-1;
  24. while (*++ptr);
  25. return (ptr - str);
  26. }
  27. static inline char *_dl_strcat(char *dst, const char *src)
  28. {
  29. register char *ptr = dst-1;
  30. src--;
  31. while (*++ptr)
  32. ;/* empty */
  33. ptr--;
  34. while ((*++ptr = *++src) != 0)
  35. ;/* empty */
  36. return dst;
  37. }
  38. static inline char * _dl_strcpy(char * dst,const char *src)
  39. {
  40. register char *ptr = dst;
  41. dst--;src--;
  42. while ((*++dst = *++src) != 0);
  43. return ptr;
  44. }
  45. static inline int _dl_strcmp(const char * s1,const char * s2)
  46. {
  47. register unsigned char c1, c2;
  48. s1--;s2--;
  49. do {
  50. c1 = (unsigned char) *++s1;
  51. c2 = (unsigned char) *++s2;
  52. if (c1 == '\0')
  53. return c1 - c2;
  54. }
  55. while (c1 == c2);
  56. return c1 - c2;
  57. }
  58. static inline int _dl_strncmp(const char * s1,const char * s2,size_t len)
  59. {
  60. register unsigned char c1 = '\0';
  61. register unsigned char c2 = '\0';
  62. s1--;s2--;
  63. while (len > 0) {
  64. c1 = (unsigned char) *++s1;
  65. c2 = (unsigned char) *++s2;
  66. if (c1 == '\0' || c1 != c2)
  67. return c1 - c2;
  68. len--;
  69. }
  70. return c1 - c2;
  71. }
  72. static inline char * _dl_strchr(const char * str,int c)
  73. {
  74. register char ch;
  75. str--;
  76. do {
  77. if ((ch = *++str) == c)
  78. return (char *) str;
  79. }
  80. while (ch);
  81. return 0;
  82. }
  83. static inline char *_dl_strrchr(const char *str, int c)
  84. {
  85. register char *prev = 0;
  86. register char *ptr = (char *) str-1;
  87. while (*++ptr != '\0') {
  88. if (*ptr == c)
  89. prev = ptr;
  90. }
  91. if (c == '\0')
  92. return(ptr);
  93. return(prev);
  94. }
  95. static inline char *_dl_strstr(const char *s1, const char *s2)
  96. {
  97. register const char *s = s1;
  98. register const char *p = s2;
  99. do {
  100. if (!*p) {
  101. return (char *) s1;;
  102. }
  103. if (*p == *s) {
  104. ++p;
  105. ++s;
  106. } else {
  107. p = s2;
  108. if (!*s) {
  109. return NULL;
  110. }
  111. s = ++s1;
  112. }
  113. } while (1);
  114. }
  115. static inline void * _dl_memcpy(void * dst, const void * src, size_t len)
  116. {
  117. register char *a = dst;
  118. register const char *b = src;
  119. while (len--)
  120. *a++ = *b++;
  121. return dst;
  122. }
  123. static inline int _dl_memcmp(const void * s1,const void * s2,size_t len)
  124. {
  125. unsigned char *c1 = (unsigned char *)s1-1;
  126. unsigned char *c2 = (unsigned char *)s2-1;
  127. while (len) {
  128. if (*++c1 != *++c2)
  129. return *c1 - *c2;
  130. len--;
  131. }
  132. return 0;
  133. }
  134. static inline void * _dl_memset(void * str,int c,size_t len)
  135. {
  136. register char *a = str;
  137. while (len--)
  138. *a++ = c;
  139. return str;
  140. }
  141. static inline char *_dl_get_last_path_component(char *path)
  142. {
  143. register char *ptr = path-1;
  144. while (*++ptr)
  145. ;/* empty */
  146. /* strip trailing slashes */
  147. while (ptr != path && *--ptr == '/') {
  148. *ptr = '\0';
  149. }
  150. /* find last component */
  151. while (ptr != path && *--ptr != '/')
  152. ;/* empty */
  153. return ptr == path ? ptr : ptr+1;
  154. }
  155. /* Early on, we can't call printf, so use this to print out
  156. * numbers using the SEND_STDERR() macro. Avoid using mod
  157. * or using long division */
  158. static inline char *_dl_simple_ltoa(char * local, unsigned long i)
  159. {
  160. /* 21 digits plus null terminator, good for 64-bit or smaller ints */
  161. char *p = &local[22];
  162. *--p = '\0';
  163. do {
  164. char temp;
  165. do_rem(temp, i, 10);
  166. *--p = '0' + temp;
  167. i /= 10;
  168. } while (i > 0);
  169. return p;
  170. }
  171. static inline char *_dl_simple_ltoahex(char * local, unsigned long i)
  172. {
  173. /* 21 digits plus null terminator, good for 64-bit or smaller ints */
  174. char *p = &local[22];
  175. *--p = '\0';
  176. do {
  177. char temp = i & 0xf;
  178. if (temp <= 0x09)
  179. *--p = '0' + temp;
  180. else
  181. *--p = 'a' - 0x0a + temp;
  182. i >>= 4;
  183. } while (i > 0);
  184. *--p = 'x';
  185. *--p = '0';
  186. return p;
  187. }
  188. #if defined(mc68000) || defined(__arm__) || defined(__mips__) || defined(__sh__) || defined(__powerpc__)
  189. /* On some arches constant strings are referenced through the GOT. */
  190. /* XXX Requires load_addr to be defined. */
  191. #define SEND_STDERR(X) \
  192. { const char *__s = (X); \
  193. if (__s < (const char *) load_addr) __s += load_addr; \
  194. _dl_write (2, __s, _dl_strlen (__s)); \
  195. }
  196. #else
  197. #define SEND_STDERR(X) _dl_write(2, X, _dl_strlen(X));
  198. #endif
  199. #define SEND_ADDRESS_STDERR(X, add_a_newline) { \
  200. char tmp[22], *tmp1; \
  201. _dl_memset(tmp, 0, sizeof(tmp)); \
  202. tmp1=_dl_simple_ltoahex( tmp, (unsigned long)(X)); \
  203. _dl_write(2, tmp1, _dl_strlen(tmp1)); \
  204. if (add_a_newline) { \
  205. tmp[0]='\n'; \
  206. _dl_write(2, tmp, 1); \
  207. } \
  208. };
  209. #define SEND_NUMBER_STDERR(X, add_a_newline) { \
  210. char tmp[22], *tmp1; \
  211. _dl_memset(tmp, 0, sizeof(tmp)); \
  212. tmp1=_dl_simple_ltoa( tmp, (unsigned long)(X)); \
  213. _dl_write(2, tmp1, _dl_strlen(tmp1)); \
  214. if (add_a_newline) { \
  215. tmp[0]='\n'; \
  216. _dl_write(2, tmp, 1); \
  217. } \
  218. };
  219. #endif