string2.h 42 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118111911201121112211231124112511261127112811291130113111321133113411351136113711381139114011411142114311441145114611471148114911501151115211531154115511561157115811591160116111621163116411651166116711681169117011711172117311741175117611771178117911801181118211831184118511861187118811891190119111921193119411951196119711981199120012011202120312041205120612071208120912101211121212131214121512161217121812191220122112221223122412251226122712281229123012311232123312341235123612371238123912401241124212431244
  1. /* Machine-independant string function optimizations.
  2. Copyright (C) 1997, 1998, 1999, 2000, 2001 Free Software Foundation, Inc.
  3. This file is part of the GNU C Library.
  4. Contributed by Ulrich Drepper <drepper@cygnus.com>, 1997.
  5. The GNU C Library is free software; you can redistribute it and/or
  6. modify it under the terms of the GNU Lesser General Public
  7. License as published by the Free Software Foundation; either
  8. version 2.1 of the License, or (at your option) any later version.
  9. The GNU C Library is distributed in the hope that it will be useful,
  10. but WITHOUT ANY WARRANTY; without even the implied warranty of
  11. MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  12. Lesser General Public License for more details.
  13. You should have received a copy of the GNU Lesser General Public
  14. License along with the GNU C Library; if not, write to the Free
  15. Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
  16. 02111-1307 USA. */
  17. #ifndef _STRING_H
  18. # error "Never use <bits/string2.h> directly; include <string.h> instead."
  19. #endif
  20. #if !defined __NO_STRING_INLINES && !defined __BOUNDED_POINTERS__
  21. /* Unlike the definitions in the header <bits/string.h> the
  22. definitions contained here are not optimized down to assembler
  23. level. Those optimizations are not always a good idea since this
  24. means the code size increases a lot. Instead the definitions here
  25. optimize some functions in a way which do not dramatically
  26. increase the code size and which do not use assembler. The main
  27. trick is to use GNU CC's `__builtin_constant_p' function.
  28. Every function XXX which has a defined version in
  29. <bits/string.h> must be accompanied by a symbol _HAVE_STRING_ARCH_XXX
  30. to make sure we don't get redefinitions.
  31. We must use here macros instead of inline functions since the
  32. trick won't work with the latter. */
  33. #ifndef __STRING_INLINE
  34. # ifdef __cplusplus
  35. # define __STRING_INLINE inline
  36. # else
  37. # define __STRING_INLINE extern __inline
  38. # endif
  39. #endif
  40. #if _STRING_ARCH_unaligned
  41. /* If we can do unaligned memory accesses we must know the endianess. */
  42. # include <endian.h>
  43. # include <bits/types.h>
  44. # if __BYTE_ORDER == __LITTLE_ENDIAN
  45. # define __STRING2_SMALL_GET16(src, idx) \
  46. (((__const unsigned char *) (__const char *) (src))[idx + 1] << 8 \
  47. | ((__const unsigned char *) (__const char *) (src))[idx])
  48. # define __STRING2_SMALL_GET32(src, idx) \
  49. (((((__const unsigned char *) (__const char *) (src))[idx + 3] << 8 \
  50. | ((__const unsigned char *) (__const char *) (src))[idx + 2]) << 8 \
  51. | ((__const unsigned char *) (__const char *) (src))[idx + 1]) << 8 \
  52. | ((__const unsigned char *) (__const char *) (src))[idx])
  53. # else
  54. # define __STRING2_SMALL_GET16(src, idx) \
  55. (((__const unsigned char *) (__const char *) (src))[idx] << 8 \
  56. | ((__const unsigned char *) (__const char *) (src))[idx + 1])
  57. # define __STRING2_SMALL_GET32(src, idx) \
  58. (((((__const unsigned char *) (__const char *) (src))[idx] << 8 \
  59. | ((__const unsigned char *) (__const char *) (src))[idx + 1]) << 8 \
  60. | ((__const unsigned char *) (__const char *) (src))[idx + 2]) << 8 \
  61. | ((__const unsigned char *) (__const char *) (src))[idx + 3])
  62. # endif
  63. #else
  64. /* These are a few types we need for the optimizations if we cannot
  65. use unaligned memory accesses. */
  66. # define __STRING2_COPY_TYPE(N) \
  67. typedef struct { unsigned char __arr[N]; } \
  68. __STRING2_COPY_ARR##N __attribute__ ((packed))
  69. __STRING2_COPY_TYPE (2);
  70. __STRING2_COPY_TYPE (3);
  71. __STRING2_COPY_TYPE (4);
  72. __STRING2_COPY_TYPE (5);
  73. __STRING2_COPY_TYPE (6);
  74. __STRING2_COPY_TYPE (7);
  75. __STRING2_COPY_TYPE (8);
  76. # undef __STRING2_COPY_TYPE
  77. #endif
  78. /* Dereferencing a pointer arg to run sizeof on it fails for the void
  79. pointer case, so we use this instead.
  80. Note that __x is evaluated twice. */
  81. #define __string2_1bptr_p(__x) \
  82. ((size_t)(const void *)((__x) + 1) - (size_t)(const void *)(__x) == 1)
  83. /* Set N bytes of S to C. */
  84. #ifndef _HAVE_STRING_ARCH_memset
  85. # if _STRING_ARCH_unaligned
  86. # define memset(s, c, n) \
  87. (__extension__ (__builtin_constant_p (n) && (n) <= 16 \
  88. ? ((n) == 1 \
  89. ? __memset_1 (s, c) \
  90. : __memset_gc (s, c, n)) \
  91. : (__builtin_constant_p (c) && (c) == '\0' \
  92. ? ({ void *__s = (s); __bzero (__s, n); __s; }) \
  93. : memset (s, c, n))))
  94. # define __memset_1(s, c) ({ void *__s = (s); \
  95. *((__uint8_t *) __s) = (__uint8_t) c; __s; })
  96. # define __memset_gc(s, c, n) \
  97. ({ void *__s = (s); \
  98. union { \
  99. unsigned int __ui; \
  100. unsigned short int __usi; \
  101. unsigned char __uc; \
  102. } *__u = __s; \
  103. __uint8_t __c = (__uint8_t) (c); \
  104. \
  105. /* This `switch' statement will be removed at compile-time. */ \
  106. switch ((unsigned int) (n)) \
  107. { \
  108. case 15: \
  109. __u->__ui = __c * 0x01010101; \
  110. __u = __extension__ (void *)((char *) __u + 4); \
  111. case 11: \
  112. __u->__ui = __c * 0x01010101; \
  113. __u = __extension__ (void *)((char *) __u + 4); \
  114. case 7: \
  115. __u->__ui = __c * 0x01010101; \
  116. __u = __extension__ (void *)((char *) __u + 4); \
  117. case 3: \
  118. __u->__usi = (unsigned short int) __c * 0x0101; \
  119. __u = __extension__ (void *)((char *) __u + 2); \
  120. __u->__uc = (unsigned char) __c; \
  121. break; \
  122. \
  123. case 14: \
  124. __u->__ui = __c * 0x01010101; \
  125. __u = __extension__ (void *)((char *) __u + 4); \
  126. case 10: \
  127. __u->__ui = __c * 0x01010101; \
  128. __u = __extension__ (void *)((char *) __u + 4); \
  129. case 6: \
  130. __u->__ui = __c * 0x01010101; \
  131. __u = __extension__ (void *)((char *) __u + 4); \
  132. case 2: \
  133. __u->__usi = (unsigned short int) __c * 0x0101; \
  134. break; \
  135. \
  136. case 13: \
  137. __u->__ui = __c * 0x01010101; \
  138. __u = __extension__ (void *)((char *) __u + 4); \
  139. case 9: \
  140. __u->__ui = __c * 0x01010101; \
  141. __u = __extension__ (void *)((char *) __u + 4); \
  142. case 5: \
  143. __u->__ui = __c * 0x01010101; \
  144. __u = __extension__ (void *)((char *) __u + 4); \
  145. case 1: \
  146. __u->__uc = (unsigned char) __c; \
  147. break; \
  148. \
  149. case 16: \
  150. __u->__ui = __c * 0x01010101; \
  151. __u = __extension__ (void *)((char *) __u + 4); \
  152. case 12: \
  153. __u->__ui = __c * 0x01010101; \
  154. __u = __extension__ (void *)((char *) __u + 4); \
  155. case 8: \
  156. __u->__ui = __c * 0x01010101; \
  157. __u = __extension__ (void *)((char *) __u + 4); \
  158. case 4: \
  159. __u->__ui = __c * 0x01010101; \
  160. case 0: \
  161. break; \
  162. } \
  163. \
  164. __s; })
  165. # else
  166. # define memset(s, c, n) \
  167. (__extension__ (__builtin_constant_p (c) && (c) == '\0' \
  168. ? ({ void *__s = (s); __bzero (__s, n); __s; }) \
  169. : memset (s, c, n)))
  170. # endif
  171. /* GCC optimizes memset(s, 0, n) but not bzero(s, n).
  172. The optimization is broken before EGCS 1.1. */
  173. # if __GNUC_PREREQ (2, 91)
  174. # define __bzero(s, n) __builtin_memset (s, '\0', n)
  175. # endif
  176. #endif
  177. /* Copy N bytes from SRC to DEST, returning pointer to byte following the
  178. last copied. */
  179. #ifdef __USE_GNU
  180. # ifndef _HAVE_STRING_ARCH_mempcpy
  181. # define __mempcpy(dest, src, n) \
  182. (__extension__ (__builtin_constant_p (src) && __builtin_constant_p (n) \
  183. && __string2_1bptr_p (src) && n <= 8 \
  184. ? __mempcpy_small (dest, __mempcpy_args (src), n) \
  185. : __mempcpy (dest, src, n)))
  186. /* In glibc we use this function frequently but for namespace reasons
  187. we have to use the name `__mempcpy'. */
  188. # define mempcpy(dest, src, n) __mempcpy (dest, src, n)
  189. # if _STRING_ARCH_unaligned
  190. # define __mempcpy_args(src) \
  191. ((__const char *) (src))[0], ((__const char *) (src))[2], \
  192. ((__const char *) (src))[4], ((__const char *) (src))[6], \
  193. __extension__ __STRING2_SMALL_GET16 (src, 0), \
  194. __extension__ __STRING2_SMALL_GET16 (src, 4), \
  195. __extension__ __STRING2_SMALL_GET32 (src, 0), \
  196. __extension__ __STRING2_SMALL_GET32 (src, 4)
  197. __STRING_INLINE void *__mempcpy_small (void *, char, char, char, char,
  198. __uint16_t, __uint16_t, __uint32_t,
  199. __uint32_t, size_t);
  200. __STRING_INLINE void *
  201. __mempcpy_small (void *__dest1,
  202. char __src0_1, char __src2_1, char __src4_1, char __src6_1,
  203. __uint16_t __src0_2, __uint16_t __src4_2,
  204. __uint32_t __src0_4, __uint32_t __src4_4,
  205. size_t __srclen)
  206. {
  207. union {
  208. __uint32_t __ui;
  209. __uint16_t __usi;
  210. unsigned char __uc;
  211. unsigned char __c;
  212. } *__u = __dest1;
  213. switch ((unsigned int) __srclen)
  214. {
  215. case 1:
  216. __u->__c = __src0_1;
  217. __u = __extension__ (void *)((char *) __u + 1);
  218. break;
  219. case 2:
  220. __u->__usi = __src0_2;
  221. __u = __extension__ (void *)((char *) __u + 2);
  222. break;
  223. case 3:
  224. __u->__usi = __src0_2;
  225. __u = __extension__ (void *)((char *) __u + 2);
  226. __u->__c = __src2_1;
  227. __u = __extension__ (void *)((char *) __u + 1);
  228. break;
  229. case 4:
  230. __u->__ui = __src0_4;
  231. __u = __extension__ (void *)((char *) __u + 4);
  232. break;
  233. case 5:
  234. __u->__ui = __src0_4;
  235. __u = __extension__ (void *)((char *) __u + 4);
  236. __u->__c = __src4_1;
  237. __u = __extension__ (void *)((char *) __u + 1);
  238. break;
  239. case 6:
  240. __u->__ui = __src0_4;
  241. __u = __extension__ (void *)((char *) __u + 4);
  242. __u->__usi = __src4_2;
  243. __u = __extension__ (void *)((char *) __u + 2);
  244. break;
  245. case 7:
  246. __u->__ui = __src0_4;
  247. __u = __extension__ (void *)((char *) __u + 4);
  248. __u->__usi = __src4_2;
  249. __u = __extension__ (void *)((char *) __u + 2);
  250. __u->__c = __src6_1;
  251. __u = __extension__ (void *)((char *) __u + 1);
  252. break;
  253. case 8:
  254. __u->__ui = __src0_4;
  255. __u = __extension__ (void *)((char *) __u + 4);
  256. __u->__ui = __src4_4;
  257. __u = __extension__ (void *)((char *) __u + 4);
  258. break;
  259. }
  260. return (void *) __u;
  261. }
  262. # else
  263. # define __mempcpy_args(src) \
  264. ((__const char *) (src))[0], \
  265. __extension__ ((__STRING2_COPY_ARR2) \
  266. { { ((__const char *) (src))[0], ((__const char *) (src))[1] } }), \
  267. __extension__ ((__STRING2_COPY_ARR3) \
  268. { { ((__const char *) (src))[0], ((__const char *) (src))[1], \
  269. ((__const char *) (src))[2] } }), \
  270. __extension__ ((__STRING2_COPY_ARR4) \
  271. { { ((__const char *) (src))[0], ((__const char *) (src))[1], \
  272. ((__const char *) (src))[2], ((__const char *) (src))[3] } }), \
  273. __extension__ ((__STRING2_COPY_ARR5) \
  274. { { ((__const char *) (src))[0], ((__const char *) (src))[1], \
  275. ((__const char *) (src))[2], ((__const char *) (src))[3], \
  276. ((__const char *) (src))[4] } }), \
  277. __extension__ ((__STRING2_COPY_ARR6) \
  278. { { ((__const char *) (src))[0], ((__const char *) (src))[1], \
  279. ((__const char *) (src))[2], ((__const char *) (src))[3], \
  280. ((__const char *) (src))[4], ((__const char *) (src))[5] } }), \
  281. __extension__ ((__STRING2_COPY_ARR7) \
  282. { { ((__const char *) (src))[0], ((__const char *) (src))[1], \
  283. ((__const char *) (src))[2], ((__const char *) (src))[3], \
  284. ((__const char *) (src))[4], ((__const char *) (src))[5], \
  285. ((__const char *) (src))[6] } }), \
  286. __extension__ ((__STRING2_COPY_ARR8) \
  287. { { ((__const char *) (src))[0], ((__const char *) (src))[1], \
  288. ((__const char *) (src))[2], ((__const char *) (src))[3], \
  289. ((__const char *) (src))[4], ((__const char *) (src))[5], \
  290. ((__const char *) (src))[6], ((__const char *) (src))[7] } })
  291. __STRING_INLINE void *__mempcpy_small (void *, char, __STRING2_COPY_ARR2,
  292. __STRING2_COPY_ARR3,
  293. __STRING2_COPY_ARR4,
  294. __STRING2_COPY_ARR5,
  295. __STRING2_COPY_ARR6,
  296. __STRING2_COPY_ARR7,
  297. __STRING2_COPY_ARR8, size_t);
  298. __STRING_INLINE void *
  299. __mempcpy_small (void *__dest, char __src1,
  300. __STRING2_COPY_ARR2 __src2, __STRING2_COPY_ARR3 __src3,
  301. __STRING2_COPY_ARR4 __src4, __STRING2_COPY_ARR5 __src5,
  302. __STRING2_COPY_ARR6 __src6, __STRING2_COPY_ARR7 __src7,
  303. __STRING2_COPY_ARR8 __src8, size_t __srclen)
  304. {
  305. union {
  306. char __c;
  307. __STRING2_COPY_ARR2 __sca2;
  308. __STRING2_COPY_ARR3 __sca3;
  309. __STRING2_COPY_ARR4 __sca4;
  310. __STRING2_COPY_ARR5 __sca5;
  311. __STRING2_COPY_ARR6 __sca6;
  312. __STRING2_COPY_ARR7 __sca7;
  313. __STRING2_COPY_ARR8 __sca8;
  314. } *__u = __dest;
  315. switch ((unsigned int) __srclen)
  316. {
  317. case 1:
  318. __u->__c = __src1;
  319. break;
  320. case 2:
  321. __extension__ __u->__sca2 = __src2;
  322. break;
  323. case 3:
  324. __extension__ __u->__sca3 = __src3;
  325. break;
  326. case 4:
  327. __extension__ __u->__sca4 = __src4;
  328. break;
  329. case 5:
  330. __extension__ __u->__sca5 = __src5;
  331. break;
  332. case 6:
  333. __extension__ __u->__sca6 = __src6;
  334. break;
  335. case 7:
  336. __extension__ __u->__sca7 = __src7;
  337. break;
  338. case 8:
  339. __extension__ __u->__sca8 = __src8;
  340. break;
  341. }
  342. return __extension__ (void *)((char *) __u + __srclen);
  343. }
  344. # endif
  345. # endif
  346. #endif
  347. /* Return pointer to C in S. */
  348. #ifndef _HAVE_STRING_ARCH_strchr
  349. extern void *__rawmemchr (const void *__s, int __c);
  350. # define strchr(s, c) \
  351. (__extension__ (__builtin_constant_p (c) && (c) == '\0' \
  352. ? (char *) __rawmemchr (s, c) \
  353. : strchr (s, c)))
  354. #endif
  355. /* Copy SRC to DEST. */
  356. #ifndef _HAVE_STRING_ARCH_strcpy
  357. # define strcpy(dest, src) \
  358. (__extension__ (__builtin_constant_p (src) \
  359. ? (__string2_1bptr_p (src) && strlen (src) + 1 <= 8 \
  360. ? __strcpy_small (dest, __strcpy_args (src), \
  361. strlen (src) + 1) \
  362. : (char *) memcpy (dest, src, strlen (src) + 1)) \
  363. : strcpy (dest, src)))
  364. # if _STRING_ARCH_unaligned
  365. # define __strcpy_args(src) \
  366. __extension__ __STRING2_SMALL_GET16 (src, 0), \
  367. __extension__ __STRING2_SMALL_GET16 (src, 4), \
  368. __extension__ __STRING2_SMALL_GET32 (src, 0), \
  369. __extension__ __STRING2_SMALL_GET32 (src, 4)
  370. __STRING_INLINE char *__strcpy_small (char *, __uint16_t, __uint16_t,
  371. __uint32_t, __uint32_t, size_t);
  372. __STRING_INLINE char *
  373. __strcpy_small (char *__dest,
  374. __uint16_t __src0_2, __uint16_t __src4_2,
  375. __uint32_t __src0_4, __uint32_t __src4_4,
  376. size_t __srclen)
  377. {
  378. union {
  379. __uint32_t __ui;
  380. __uint16_t __usi;
  381. unsigned char __uc;
  382. } *__u = (void *) __dest;
  383. switch ((unsigned int) __srclen)
  384. {
  385. case 1:
  386. __u->__uc = '\0';
  387. break;
  388. case 2:
  389. __u->__usi = __src0_2;
  390. break;
  391. case 3:
  392. __u->__usi = __src0_2;
  393. __u = __extension__ (void *)((char *) __u + 2);
  394. __u->__uc = '\0';
  395. break;
  396. case 4:
  397. __u->__ui = __src0_4;
  398. break;
  399. case 5:
  400. __u->__ui = __src0_4;
  401. __u = __extension__ (void *)((char *) __u + 4);
  402. __u->__uc = '\0';
  403. break;
  404. case 6:
  405. __u->__ui = __src0_4;
  406. __u = __extension__ (void *)((char *) __u + 4);
  407. __u->__usi = __src4_2;
  408. break;
  409. case 7:
  410. __u->__ui = __src0_4;
  411. __u = __extension__ (void *)((char *) __u + 4);
  412. __u->__usi = __src4_2;
  413. __u = __extension__ (void *)((char *) __u + 2);
  414. __u->__uc = '\0';
  415. break;
  416. case 8:
  417. __u->__ui = __src0_4;
  418. __u = __extension__ (void *)((char *) __u + 4);
  419. __u->__ui = __src4_4;
  420. break;
  421. }
  422. return __dest;
  423. }
  424. # else
  425. # define __strcpy_args(src) \
  426. __extension__ ((__STRING2_COPY_ARR2) \
  427. { { ((__const char *) (src))[0], '\0' } }), \
  428. __extension__ ((__STRING2_COPY_ARR3) \
  429. { { ((__const char *) (src))[0], ((__const char *) (src))[1], \
  430. '\0' } }), \
  431. __extension__ ((__STRING2_COPY_ARR4) \
  432. { { ((__const char *) (src))[0], ((__const char *) (src))[1], \
  433. ((__const char *) (src))[2], '\0' } }), \
  434. __extension__ ((__STRING2_COPY_ARR5) \
  435. { { ((__const char *) (src))[0], ((__const char *) (src))[1], \
  436. ((__const char *) (src))[2], ((__const char *) (src))[3], \
  437. '\0' } }), \
  438. __extension__ ((__STRING2_COPY_ARR6) \
  439. { { ((__const char *) (src))[0], ((__const char *) (src))[1], \
  440. ((__const char *) (src))[2], ((__const char *) (src))[3], \
  441. ((__const char *) (src))[4], '\0' } }), \
  442. __extension__ ((__STRING2_COPY_ARR7) \
  443. { { ((__const char *) (src))[0], ((__const char *) (src))[1], \
  444. ((__const char *) (src))[2], ((__const char *) (src))[3], \
  445. ((__const char *) (src))[4], ((__const char *) (src))[5], \
  446. '\0' } }), \
  447. __extension__ ((__STRING2_COPY_ARR8) \
  448. { { ((__const char *) (src))[0], ((__const char *) (src))[1], \
  449. ((__const char *) (src))[2], ((__const char *) (src))[3], \
  450. ((__const char *) (src))[4], ((__const char *) (src))[5], \
  451. ((__const char *) (src))[6], '\0' } })
  452. __STRING_INLINE char *__strcpy_small (char *, __STRING2_COPY_ARR2,
  453. __STRING2_COPY_ARR3,
  454. __STRING2_COPY_ARR4,
  455. __STRING2_COPY_ARR5,
  456. __STRING2_COPY_ARR6,
  457. __STRING2_COPY_ARR7,
  458. __STRING2_COPY_ARR8, size_t);
  459. __STRING_INLINE char *
  460. __strcpy_small (char *__dest,
  461. __STRING2_COPY_ARR2 __src2, __STRING2_COPY_ARR3 __src3,
  462. __STRING2_COPY_ARR4 __src4, __STRING2_COPY_ARR5 __src5,
  463. __STRING2_COPY_ARR6 __src6, __STRING2_COPY_ARR7 __src7,
  464. __STRING2_COPY_ARR8 __src8, size_t __srclen)
  465. {
  466. union {
  467. char __c;
  468. __STRING2_COPY_ARR2 __sca2;
  469. __STRING2_COPY_ARR3 __sca3;
  470. __STRING2_COPY_ARR4 __sca4;
  471. __STRING2_COPY_ARR5 __sca5;
  472. __STRING2_COPY_ARR6 __sca6;
  473. __STRING2_COPY_ARR7 __sca7;
  474. __STRING2_COPY_ARR8 __sca8;
  475. } *__u = (void *) __dest;
  476. switch ((unsigned int) __srclen)
  477. {
  478. case 1:
  479. __u->__c = '\0';
  480. break;
  481. case 2:
  482. __extension__ __u->__sca2 = __src2;
  483. break;
  484. case 3:
  485. __extension__ __u->__sca3 = __src3;
  486. break;
  487. case 4:
  488. __extension__ __u->__sca4 = __src4;
  489. break;
  490. case 5:
  491. __extension__ __u->__sca5 = __src5;
  492. break;
  493. case 6:
  494. __extension__ __u->__sca6 = __src6;
  495. break;
  496. case 7:
  497. __extension__ __u->__sca7 = __src7;
  498. break;
  499. case 8:
  500. __extension__ __u->__sca8 = __src8;
  501. break;
  502. }
  503. return __dest;
  504. }
  505. # endif
  506. #endif
  507. /* Copy SRC to DEST, returning pointer to final NUL byte. */
  508. #ifdef __USE_GNU
  509. # ifndef _HAVE_STRING_ARCH_stpcpy
  510. # define __stpcpy(dest, src) \
  511. (__extension__ (__builtin_constant_p (src) \
  512. ? (__string2_1bptr_p (src) && strlen (src) + 1 <= 8 \
  513. ? __stpcpy_small (dest, __stpcpy_args (src), \
  514. strlen (src) + 1) \
  515. : ((char *) __mempcpy (dest, src, strlen (src) + 1) - 1))\
  516. : __stpcpy (dest, src)))
  517. /* In glibc we use this function frequently but for namespace reasons
  518. we have to use the name `__stpcpy'. */
  519. # define stpcpy(dest, src) __stpcpy (dest, src)
  520. # if _STRING_ARCH_unaligned
  521. # define __stpcpy_args(src) \
  522. __extension__ __STRING2_SMALL_GET16 (src, 0), \
  523. __extension__ __STRING2_SMALL_GET16 (src, 4), \
  524. __extension__ __STRING2_SMALL_GET32 (src, 0), \
  525. __extension__ __STRING2_SMALL_GET32 (src, 4)
  526. __STRING_INLINE char *__stpcpy_small (char *, __uint16_t, __uint16_t,
  527. __uint32_t, __uint32_t, size_t);
  528. __STRING_INLINE char *
  529. __stpcpy_small (char *__dest,
  530. __uint16_t __src0_2, __uint16_t __src4_2,
  531. __uint32_t __src0_4, __uint32_t __src4_4,
  532. size_t __srclen)
  533. {
  534. union {
  535. unsigned int __ui;
  536. unsigned short int __usi;
  537. unsigned char __uc;
  538. char __c;
  539. } *__u = (void *) __dest;
  540. switch ((unsigned int) __srclen)
  541. {
  542. case 1:
  543. __u->__uc = '\0';
  544. break;
  545. case 2:
  546. __u->__usi = __src0_2;
  547. __u = __extension__ (void *)((char *) __u + 1);
  548. break;
  549. case 3:
  550. __u->__usi = __src0_2;
  551. __u = __extension__ (void *)((char *) __u + 2);
  552. __u->__uc = '\0';
  553. break;
  554. case 4:
  555. __u->__ui = __src0_4;
  556. __u = __extension__ (void *)((char *) __u + 3);
  557. break;
  558. case 5:
  559. __u->__ui = __src0_4;
  560. __u = __extension__ (void *)((char *) __u + 4);
  561. __u->__uc = '\0';
  562. break;
  563. case 6:
  564. __u->__ui = __src0_4;
  565. __u = __extension__ (void *)((char *) __u + 4);
  566. __u->__usi = __src4_2;
  567. __u = __extension__ (void *)((char *) __u + 1);
  568. break;
  569. case 7:
  570. __u->__ui = __src0_4;
  571. __u = __extension__ (void *)((char *) __u + 4);
  572. __u->__usi = __src4_2;
  573. __u = __extension__ (void *)((char *) __u + 2);
  574. __u->__uc = '\0';
  575. break;
  576. case 8:
  577. __u->__ui = __src0_4;
  578. __u = __extension__ (void *)((char *) __u + 4);
  579. __u->__ui = __src4_4;
  580. __u = __extension__ (void *)((char *) __u + 3);
  581. break;
  582. }
  583. return &__u->__c;
  584. }
  585. # else
  586. # define __stpcpy_args(src) \
  587. __extension__ ((__STRING2_COPY_ARR2) \
  588. { { ((__const char *) (src))[0], '\0' } }), \
  589. __extension__ ((__STRING2_COPY_ARR3) \
  590. { { ((__const char *) (src))[0], ((__const char *) (src))[1], \
  591. '\0' } }), \
  592. __extension__ ((__STRING2_COPY_ARR4) \
  593. { { ((__const char *) (src))[0], ((__const char *) (src))[1], \
  594. ((__const char *) (src))[2], '\0' } }), \
  595. __extension__ ((__STRING2_COPY_ARR5) \
  596. { { ((__const char *) (src))[0], ((__const char *) (src))[1], \
  597. ((__const char *) (src))[2], ((__const char *) (src))[3], \
  598. '\0' } }), \
  599. __extension__ ((__STRING2_COPY_ARR6) \
  600. { { ((__const char *) (src))[0], ((__const char *) (src))[1], \
  601. ((__const char *) (src))[2], ((__const char *) (src))[3], \
  602. ((__const char *) (src))[4], '\0' } }), \
  603. __extension__ ((__STRING2_COPY_ARR7) \
  604. { { ((__const char *) (src))[0], ((__const char *) (src))[1], \
  605. ((__const char *) (src))[2], ((__const char *) (src))[3], \
  606. ((__const char *) (src))[4], ((__const char *) (src))[5], \
  607. '\0' } }), \
  608. __extension__ ((__STRING2_COPY_ARR8) \
  609. { { ((__const char *) (src))[0], ((__const char *) (src))[1], \
  610. ((__const char *) (src))[2], ((__const char *) (src))[3], \
  611. ((__const char *) (src))[4], ((__const char *) (src))[5], \
  612. ((__const char *) (src))[6], '\0' } })
  613. __STRING_INLINE char *__stpcpy_small (char *, __STRING2_COPY_ARR2,
  614. __STRING2_COPY_ARR3,
  615. __STRING2_COPY_ARR4,
  616. __STRING2_COPY_ARR5,
  617. __STRING2_COPY_ARR6,
  618. __STRING2_COPY_ARR7,
  619. __STRING2_COPY_ARR8, size_t);
  620. __STRING_INLINE char *
  621. __stpcpy_small (char *__dest,
  622. __STRING2_COPY_ARR2 __src2, __STRING2_COPY_ARR3 __src3,
  623. __STRING2_COPY_ARR4 __src4, __STRING2_COPY_ARR5 __src5,
  624. __STRING2_COPY_ARR6 __src6, __STRING2_COPY_ARR7 __src7,
  625. __STRING2_COPY_ARR8 __src8, size_t __srclen)
  626. {
  627. union {
  628. char __c;
  629. __STRING2_COPY_ARR2 __sca2;
  630. __STRING2_COPY_ARR3 __sca3;
  631. __STRING2_COPY_ARR4 __sca4;
  632. __STRING2_COPY_ARR5 __sca5;
  633. __STRING2_COPY_ARR6 __sca6;
  634. __STRING2_COPY_ARR7 __sca7;
  635. __STRING2_COPY_ARR8 __sca8;
  636. } *__u = (void *) __dest;
  637. switch ((unsigned int) __srclen)
  638. {
  639. case 1:
  640. __u->__c = '\0';
  641. break;
  642. case 2:
  643. __extension__ __u->__sca2 = __src2;
  644. break;
  645. case 3:
  646. __extension__ __u->__sca3 = __src3;
  647. break;
  648. case 4:
  649. __extension__ __u->__sca4 = __src4;
  650. break;
  651. case 5:
  652. __extension__ __u->__sca5 = __src5;
  653. break;
  654. case 6:
  655. __extension__ __u->__sca6 = __src6;
  656. break;
  657. case 7:
  658. __extension__ __u->__sca7 = __src7;
  659. break;
  660. case 8:
  661. __extension__ __u->__sca8 = __src8;
  662. break;
  663. }
  664. return __dest + __srclen - 1;
  665. }
  666. # endif
  667. # endif
  668. #endif
  669. /* Copy no more than N characters of SRC to DEST. */
  670. #ifndef _HAVE_STRING_ARCH_strncpy
  671. # if defined _USE_STRING_ARCH_memset && defined _USE_STRING_ARCH_mempcpy
  672. # define strncpy(dest, src, n) \
  673. (__extension__ ({ char *__dest = (dest); \
  674. __builtin_constant_p (src) && __builtin_constant_p (n) \
  675. ? (strlen (src) + 1 >= ((size_t) (n)) \
  676. ? (char *) memcpy (__dest, src, n) \
  677. : (memset (__mempcpy (__dest, src, strlen (src)), \
  678. '\0', n - strlen (src)), \
  679. __dest)) \
  680. : strncpy (__dest, src, n); }))
  681. # else
  682. # define strncpy(dest, src, n) \
  683. (__extension__ (__builtin_constant_p (src) && __builtin_constant_p (n) \
  684. ? (strlen (src) + 1 >= ((size_t) (n)) \
  685. ? (char *) memcpy (dest, src, n) \
  686. : strncpy (dest, src, n)) \
  687. : strncpy (dest, src, n)))
  688. # endif
  689. #endif
  690. /* Append no more than N characters from SRC onto DEST. */
  691. #ifndef _HAVE_STRING_ARCH_strncat
  692. # ifdef _USE_STRING_ARCH_strchr
  693. # define strncat(dest, src, n) \
  694. (__extension__ ({ char *__dest = (dest); \
  695. __builtin_constant_p (src) && __builtin_constant_p (n) \
  696. ? (strlen (src) < ((size_t) (n)) \
  697. ? strcat (__dest, src) \
  698. : (*((char *) __mempcpy (strchr (__dest, '\0'), \
  699. src, n)) = '\0', __dest)) \
  700. : strncat (dest, src, n); }))
  701. # else
  702. # define strncat(dest, src, n) \
  703. (__extension__ (__builtin_constant_p (src) && __builtin_constant_p (n) \
  704. ? (strlen (src) < ((size_t) (n)) \
  705. ? strcat (dest, src) \
  706. : strncat (dest, src, n)) \
  707. : strncat (dest, src, n)))
  708. # endif
  709. #endif
  710. /* Compare characters of S1 and S2. */
  711. #ifndef _HAVE_STRING_ARCH_strcmp
  712. # define strcmp(s1, s2) \
  713. __extension__ \
  714. ({ size_t __s1_len, __s2_len; \
  715. (__builtin_constant_p (s1) && __builtin_constant_p (s2) \
  716. && (__s1_len = strlen (s1), __s2_len = strlen (s2), \
  717. (!__string2_1bptr_p (s1) || __s1_len >= 4) \
  718. && (!__string2_1bptr_p (s2) || __s2_len >= 4)) \
  719. ? memcmp ((__const char *) (s1), (__const char *) (s2), \
  720. (__s1_len < __s2_len ? __s1_len : __s2_len) + 1) \
  721. : (__builtin_constant_p (s1) && __string2_1bptr_p (s1) \
  722. && (__s1_len = strlen (s1), __s1_len < 4) \
  723. ? (__builtin_constant_p (s2) && __string2_1bptr_p (s2) \
  724. ? __strcmp_cc (s1, s2, __s1_len) \
  725. : __strcmp_cg (s1, s2, __s1_len)) \
  726. : (__builtin_constant_p (s2) && __string2_1bptr_p (s2) \
  727. && (__s2_len = strlen (s2), __s2_len < 4) \
  728. ? (__builtin_constant_p (s1) && __string2_1bptr_p (s1) \
  729. ? __strcmp_cc (s1, s2, __s2_len) \
  730. : __strcmp_gc (s1, s2, __s2_len)) \
  731. : strcmp (s1, s2)))); })
  732. # define __strcmp_cc(s1, s2, l) \
  733. (__extension__ ({ register int __result = \
  734. (((__const unsigned char *) (__const char *) (s1))[0] \
  735. - ((__const unsigned char *) (__const char *)(s2))[0]);\
  736. if (l > 0 && __result == 0) \
  737. { \
  738. __result = (((__const unsigned char *) \
  739. (__const char *) (s1))[1] \
  740. - ((__const unsigned char *) \
  741. (__const char *) (s2))[1]); \
  742. if (l > 1 && __result == 0) \
  743. { \
  744. __result = \
  745. (((__const unsigned char *) \
  746. (__const char *) (s1))[2] \
  747. - ((__const unsigned char *) \
  748. (__const char *) (s2))[2]); \
  749. if (l > 2 && __result == 0) \
  750. __result = \
  751. (((__const unsigned char *) \
  752. (__const char *) (s1))[3] \
  753. - ((__const unsigned char *) \
  754. (__const char *) (s2))[3]); \
  755. } \
  756. } \
  757. __result; }))
  758. # define __strcmp_cg(s1, s2, l1) \
  759. (__extension__ ({ __const unsigned char *__s2 = \
  760. (__const unsigned char *) (__const char *) (s2); \
  761. register int __result = \
  762. (((__const unsigned char *) (__const char *) (s1))[0] \
  763. - __s2[0]); \
  764. if (l1 > 0 && __result == 0) \
  765. { \
  766. __result = (((__const unsigned char *) \
  767. (__const char *) (s1))[1] - __s2[1]); \
  768. if (l1 > 1 && __result == 0) \
  769. { \
  770. __result = (((__const unsigned char *) \
  771. (__const char *) (s1))[2] - __s2[2]);\
  772. if (l1 > 2 && __result == 0) \
  773. __result = (((__const unsigned char *) \
  774. (__const char *) (s1))[3] \
  775. - __s2[3]); \
  776. } \
  777. } \
  778. __result; }))
  779. # define __strcmp_gc(s1, s2, l2) \
  780. (__extension__ ({ __const unsigned char *__s1 = \
  781. (__const unsigned char *) (__const char *) (s1); \
  782. register int __result = \
  783. __s1[0] - ((__const unsigned char *) \
  784. (__const char *) (s2))[0]; \
  785. if (l2 > 0 && __result == 0) \
  786. { \
  787. __result = (__s1[1] \
  788. - ((__const unsigned char *) \
  789. (__const char *) (s2))[1]); \
  790. if (l2 > 1 && __result == 0) \
  791. { \
  792. __result = \
  793. (__s1[2] - ((__const unsigned char *) \
  794. (__const char *) (s2))[2]); \
  795. if (l2 > 2 && __result == 0) \
  796. __result = \
  797. (__s1[3] \
  798. - ((__const unsigned char *) \
  799. (__const char *) (s2))[3]); \
  800. } \
  801. } \
  802. __result; }))
  803. #endif
  804. /* Compare N characters of S1 and S2. */
  805. #ifndef _HAVE_STRING_ARCH_strncmp
  806. # define strncmp(s1, s2, n) \
  807. (__extension__ (__builtin_constant_p (n) \
  808. && ((__builtin_constant_p (s1) \
  809. && strlen (s1) < ((size_t) (n))) \
  810. || (__builtin_constant_p (s2) \
  811. && strlen (s2) < ((size_t) (n)))) \
  812. ? strcmp (s1, s2) : strncmp (s1, s2, n)))
  813. #endif
  814. /* Return the length of the initial segment of S which
  815. consists entirely of characters not in REJECT. */
  816. #ifndef _HAVE_STRING_ARCH_strcspn
  817. # define strcspn(s, reject) \
  818. __extension__ \
  819. ({ char __r0, __r1, __r2; \
  820. (__builtin_constant_p (reject) && __string2_1bptr_p (reject) \
  821. ? ((__r0 = ((__const char *) (reject))[0], __r0 == '\0') \
  822. ? strlen (s) \
  823. : ((__r1 = ((__const char *) (reject))[1], __r1 == '\0') \
  824. ? __strcspn_c1 (s, __r0) \
  825. : ((__r2 = ((__const char *) (reject))[2], __r2 == '\0') \
  826. ? __strcspn_c2 (s, __r0, __r1) \
  827. : (((__const char *) (reject))[3] == '\0' \
  828. ? __strcspn_c3 (s, __r0, __r1, __r2) \
  829. : strcspn (s, reject))))) \
  830. : strcspn (s, reject)); })
  831. __STRING_INLINE size_t __strcspn_c1 (__const char *__s, char __reject);
  832. __STRING_INLINE size_t
  833. __strcspn_c1 (__const char *__s, char __reject)
  834. {
  835. register size_t __result = 0;
  836. while (__s[__result] != '\0' && __s[__result] != __reject)
  837. ++__result;
  838. return __result;
  839. }
  840. __STRING_INLINE size_t __strcspn_c2 (__const char *__s, char __reject1,
  841. char __reject2);
  842. __STRING_INLINE size_t
  843. __strcspn_c2 (__const char *__s, char __reject1, char __reject2)
  844. {
  845. register size_t __result = 0;
  846. while (__s[__result] != '\0' && __s[__result] != __reject1
  847. && __s[__result] != __reject2)
  848. ++__result;
  849. return __result;
  850. }
  851. __STRING_INLINE size_t __strcspn_c3 (__const char *__s, char __reject1,
  852. char __reject2, char __reject3);
  853. __STRING_INLINE size_t
  854. __strcspn_c3 (__const char *__s, char __reject1, char __reject2,
  855. char __reject3)
  856. {
  857. register size_t __result = 0;
  858. while (__s[__result] != '\0' && __s[__result] != __reject1
  859. && __s[__result] != __reject2 && __s[__result] != __reject3)
  860. ++__result;
  861. return __result;
  862. }
  863. #endif
  864. /* Return the length of the initial segment of S which
  865. consists entirely of characters in ACCEPT. */
  866. #ifndef _HAVE_STRING_ARCH_strspn
  867. # define strspn(s, accept) \
  868. __extension__ \
  869. ({ char __a0, __a1, __a2; \
  870. (__builtin_constant_p (accept) && __string2_1bptr_p (accept) \
  871. ? ((__a0 = ((__const char *) (accept))[0], __a0 == '\0') \
  872. ? ((void) (s), 0) \
  873. : ((__a1 = ((__const char *) (accept))[1], __a1 == '\0') \
  874. ? __strspn_c1 (s, __a0) \
  875. : ((__a2 = ((__const char *) (accept))[2], __a2 == '\0') \
  876. ? __strspn_c2 (s, __a0, __a1) \
  877. : (((__const char *) (accept))[3] == '\0' \
  878. ? __strspn_c3 (s, __a0, __a1, __a2) \
  879. : strspn (s, accept))))) \
  880. : strspn (s, accept)); })
  881. __STRING_INLINE size_t __strspn_c1 (__const char *__s, char __accept);
  882. __STRING_INLINE size_t
  883. __strspn_c1 (__const char *__s, char __accept)
  884. {
  885. register size_t __result = 0;
  886. /* Please note that __accept never can be '\0'. */
  887. while (__s[__result] == __accept)
  888. ++__result;
  889. return __result;
  890. }
  891. __STRING_INLINE size_t __strspn_c2 (__const char *__s, char __accept1,
  892. char __accept2);
  893. __STRING_INLINE size_t
  894. __strspn_c2 (__const char *__s, char __accept1, char __accept2)
  895. {
  896. register size_t __result = 0;
  897. /* Please note that __accept1 and __accept2 never can be '\0'. */
  898. while (__s[__result] == __accept1 || __s[__result] == __accept2)
  899. ++__result;
  900. return __result;
  901. }
  902. __STRING_INLINE size_t __strspn_c3 (__const char *__s, char __accept1,
  903. char __accept2, char __accept3);
  904. __STRING_INLINE size_t
  905. __strspn_c3 (__const char *__s, char __accept1, char __accept2, char __accept3)
  906. {
  907. register size_t __result = 0;
  908. /* Please note that __accept1 to __accept3 never can be '\0'. */
  909. while (__s[__result] == __accept1 || __s[__result] == __accept2
  910. || __s[__result] == __accept3)
  911. ++__result;
  912. return __result;
  913. }
  914. #endif
  915. /* Find the first occurrence in S of any character in ACCEPT. */
  916. #ifndef _HAVE_STRING_ARCH_strpbrk
  917. # define strpbrk(s, accept) \
  918. __extension__ \
  919. ({ char __a0, __a1, __a2; \
  920. (__builtin_constant_p (accept) && __string2_1bptr_p (accept) \
  921. ? ((__a0 = ((__const char *) (accept))[0], __a0 == '\0') \
  922. ? ((void) (s), NULL) \
  923. : ((__a1 = ((__const char *) (accept))[1], __a1 == '\0') \
  924. ? strchr (s, __a0) \
  925. : ((__a2 = ((__const char *) (accept))[2], __a2 == '\0') \
  926. ? __strpbrk_c2 (s, __a0, __a1) \
  927. : (((__const char *) (accept))[3] == '\0' \
  928. ? __strpbrk_c3 (s, __a0, __a1, __a2) \
  929. : strpbrk (s, accept))))) \
  930. : strpbrk (s, accept)); })
  931. __STRING_INLINE char *__strpbrk_c2 (__const char *__s, int __accept1,
  932. int __accept2);
  933. __STRING_INLINE char *
  934. __strpbrk_c2 (__const char *__s, int __accept1, int __accept2)
  935. {
  936. /* Please note that __accept1 and __accept2 never can be '\0'. */
  937. while (*__s != '\0' && *__s != __accept1 && *__s != __accept2)
  938. ++__s;
  939. return *__s == '\0' ? NULL : (char *) (size_t) __s;
  940. }
  941. __STRING_INLINE char *__strpbrk_c3 (__const char *__s, int __accept1,
  942. int __accept2, int __accept3);
  943. __STRING_INLINE char *
  944. __strpbrk_c3 (__const char *__s, int __accept1, int __accept2,
  945. int __accept3)
  946. {
  947. /* Please note that __accept1 to __accept3 never can be '\0'. */
  948. while (*__s != '\0' && *__s != __accept1 && *__s != __accept2
  949. && *__s != __accept3)
  950. ++__s;
  951. return *__s == '\0' ? NULL : (char *) (size_t) __s;
  952. }
  953. #endif
  954. /* Find the first occurrence of NEEDLE in HAYSTACK. Newer gcc versions
  955. do this itself. */
  956. #if !defined _HAVE_STRING_ARCH_strstr && !__GNUC_PREREQ (2, 97)
  957. # define strstr(haystack, needle) \
  958. (__extension__ (__builtin_constant_p (needle) && __string2_1bptr_p (needle) \
  959. ? (((__const char *) (needle))[0] == '\0' \
  960. ? (char *) (size_t) (haystack) \
  961. : (((__const char *) (needle))[1] == '\0' \
  962. ? strchr (haystack, \
  963. ((__const char *) (needle))[0]) \
  964. : strstr (haystack, needle))) \
  965. : strstr (haystack, needle)))
  966. #endif
  967. #if defined __USE_GNU && !defined _FORCE_INLINES
  968. # ifndef _HAVE_STRING_ARCH_strnlen
  969. __STRING_INLINE size_t
  970. strnlen (__const char *__string, size_t __maxlen)
  971. {
  972. __const char *__end = (__const char *) memchr (__string, '\0', __maxlen);
  973. return __end ? (size_t) (__end - __string) : __maxlen;
  974. }
  975. # endif
  976. #endif
  977. #ifndef _HAVE_STRING_ARCH_strtok_r
  978. # define __strtok_r(s, sep, nextp) \
  979. (__extension__ (__builtin_constant_p (sep) && __string2_1bptr_p (sep) \
  980. ? (((__const char *) (sep))[0] != '\0' \
  981. && ((__const char *) (sep))[1] == '\0' \
  982. ? __strtok_r_1c (s, ((__const char *) (sep))[0], nextp) \
  983. : __strtok_r (s, sep, nextp)) \
  984. : __strtok_r (s, sep, nextp)))
  985. __STRING_INLINE char *__strtok_r_1c (char *__s, char __sep, char **__nextp);
  986. __STRING_INLINE char *
  987. __strtok_r_1c (char *__s, char __sep, char **__nextp)
  988. {
  989. char *__result;
  990. if (__s == NULL)
  991. __s = *__nextp;
  992. while (*__s == __sep)
  993. ++__s;
  994. if (*__s == '\0')
  995. __result = NULL;
  996. else
  997. {
  998. __result = __s;
  999. while (*__s != '\0' && *__s != __sep)
  1000. ++__s;
  1001. if (*__s == '\0')
  1002. *__nextp = __s;
  1003. else
  1004. {
  1005. *__s = '\0';
  1006. *__nextp = __s + 1;
  1007. }
  1008. }
  1009. return __result;
  1010. }
  1011. # if defined __USE_POSIX || defined __USE_MISC
  1012. # define strtok_r(s, sep, nextp) __strtok_r ((s), (sep), (nextp))
  1013. # endif
  1014. #endif
  1015. #ifndef _HAVE_STRING_ARCH_strsep
  1016. # define __strsep(s, reject) \
  1017. __extension__ \
  1018. ({ char __r0, __r1, __r2; \
  1019. (__builtin_constant_p (reject) && __string2_1bptr_p (reject) \
  1020. && (__r0 = ((__const char *) (reject))[0], \
  1021. ((__const char *) (reject))[0] != '\0') \
  1022. ? ((__r1 = ((__const char *) (reject))[1], \
  1023. ((__const char *) (reject))[1] == '\0') \
  1024. ? __strsep_1c (s, __r0) \
  1025. : ((__r2 = ((__const char *) (reject))[2], __r2 == '\0') \
  1026. ? __strsep_2c (s, __r0, __r1) \
  1027. : (((__const char *) (reject))[3] == '\0' \
  1028. ? __strsep_3c (s, __r0, __r1, __r2) \
  1029. : __strsep_g (s, reject)))) \
  1030. : __strsep_g (s, reject)); })
  1031. __STRING_INLINE char *__strsep_1c (char **__s, char __reject);
  1032. __STRING_INLINE char *
  1033. __strsep_1c (char **__s, char __reject)
  1034. {
  1035. register char *__retval = *__s;
  1036. if (__retval == NULL)
  1037. return *__s = NULL;
  1038. if (*__retval == __reject)
  1039. *(*__s)++ = '\0';
  1040. else
  1041. if ((*__s = strchr (__retval, __reject)) != NULL)
  1042. *(*__s)++ = '\0';
  1043. else
  1044. *__s = NULL;
  1045. return __retval;
  1046. }
  1047. __STRING_INLINE char *__strsep_2c (char **__s, char __reject1, char __reject2);
  1048. __STRING_INLINE char *
  1049. __strsep_2c (char **__s, char __reject1, char __reject2)
  1050. {
  1051. register char *__retval = *__s;
  1052. if (__retval == NULL)
  1053. return *__s = NULL;
  1054. if (*__retval == __reject1 || *__retval == __reject2)
  1055. *(*__s)++ = '\0';
  1056. else
  1057. {
  1058. register char *__cp = __retval;
  1059. while (*__cp != '\0' && *__cp != __reject1 && *__cp != __reject2)
  1060. ++__cp;
  1061. if (*__cp != '\0')
  1062. {
  1063. *__s = __cp;
  1064. *(*__s)++ = '\0';
  1065. }
  1066. else
  1067. *__s = NULL;
  1068. }
  1069. return __retval;
  1070. }
  1071. __STRING_INLINE char *__strsep_3c (char **__s, char __reject1, char __reject2,
  1072. char __reject3);
  1073. __STRING_INLINE char *
  1074. __strsep_3c (char **__s, char __reject1, char __reject2, char __reject3)
  1075. {
  1076. register char *__retval = *__s;
  1077. if (__retval == NULL)
  1078. return *__s = NULL;
  1079. if (*__retval == __reject1 || *__retval == __reject2
  1080. || *__retval == __reject3)
  1081. *(*__s)++ = '\0';
  1082. else
  1083. {
  1084. register char *__cp = __retval;
  1085. while (*__cp != '\0' && *__cp != __reject1 && *__cp != __reject2
  1086. && *__cp != __reject3)
  1087. ++__cp;
  1088. if (*__cp != '\0')
  1089. {
  1090. *__s = __cp;
  1091. *(*__s)++ = '\0';
  1092. }
  1093. else
  1094. *__s = NULL;
  1095. }
  1096. return __retval;
  1097. }
  1098. __STRING_INLINE char *__strsep_g (char **__s, __const char *__reject);
  1099. __STRING_INLINE char *
  1100. __strsep_g (char **__s, __const char *__reject)
  1101. {
  1102. register char *__retval = *__s;
  1103. if (__retval == NULL)
  1104. return NULL;
  1105. if ((*__s = strpbrk (__retval, __reject)) != NULL)
  1106. *(*__s)++ = '\0';
  1107. return __retval;
  1108. }
  1109. # ifdef __USE_BSD
  1110. # define strsep(s, reject) __strsep ((s), (reject))
  1111. # endif
  1112. #endif
  1113. /* We need the memory allocation functions for inline strdup().
  1114. Referring to stdlib.h (even minimally) is not allowed
  1115. in any of the tight standards compliant modes. */
  1116. #ifdef __USE_MISC
  1117. # if !defined _HAVE_STRING_ARCH_strdup || !defined _HAVE_STRING_ARCH_strndup
  1118. # define __need_malloc_and_calloc
  1119. # include <stdlib.h>
  1120. # endif
  1121. # ifndef _HAVE_STRING_ARCH_strdup
  1122. extern char *__strdup (__const char *__string) __THROW __attribute_malloc__;
  1123. # define __strdup(s) \
  1124. (__extension__ (__builtin_constant_p (s) && __string2_1bptr_p (s) \
  1125. ? (((__const char *) (s))[0] == '\0' \
  1126. ? (char *) calloc (1, 1) \
  1127. : ({ size_t __len = strlen (s) + 1; \
  1128. char *__retval = (char *) malloc (__len); \
  1129. if (__retval != NULL) \
  1130. __retval = (char *) memcpy (__retval, s, __len); \
  1131. __retval; })) \
  1132. : __strdup (s)))
  1133. # if defined __USE_SVID || defined __USE_BSD || defined __USE_XOPEN_EXTENDED
  1134. # define strdup(s) __strdup (s)
  1135. # endif
  1136. # endif
  1137. # ifndef _HAVE_STRING_ARCH_strndup
  1138. extern char *__strndup (__const char *__string, size_t __n)
  1139. __THROW __attribute_malloc__;
  1140. # define __strndup(s, n) \
  1141. (__extension__ (__builtin_constant_p (s) && __string2_1bptr_p (s) \
  1142. ? (((__const char *) (s))[0] == '\0' \
  1143. ? (char *) calloc (1, 1) \
  1144. : ({ size_t __len = strlen (s) + 1; \
  1145. size_t __n = (n); \
  1146. char *__retval; \
  1147. if (__n < __len) \
  1148. __len = __n; \
  1149. __retval = (char *) malloc (__len); \
  1150. if (__retval != NULL) \
  1151. { \
  1152. __retval[__len - 1] = '\0'; \
  1153. __retval = (char *) memcpy (__retval, s, \
  1154. __len - 1); \
  1155. } \
  1156. __retval; })) \
  1157. : __strndup ((s), (n))))
  1158. # ifdef __USE_GNU
  1159. # define strndup(s, n) __strndup ((s), (n))
  1160. # endif
  1161. # endif
  1162. #endif /* Use misc. or use GNU. */
  1163. #ifndef _FORCE_INLINES
  1164. # undef __STRING_INLINE
  1165. #endif
  1166. #endif /* No string inlines. */