string/string-inlines.c

   1 /* Copyright (C) 1999-2023 Free Software Foundation, Inc.
   2    This file is part of the GNU C Library.
   3
   4    The GNU C Library is free software; you can redistribute it and/or
   5    modify it under the terms of the GNU Lesser General Public
   6    License as published by the Free Software Foundation; either
   7    version 2.1 of the License, or (at your option) any later version.
   8
   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
  14    You should have received a copy of the GNU Lesser General Public
  15    License along with the GNU C Library; if not, see
  16    <https://www.gnu.org/licenses/>.  */
  17
  18 /* This file contains compatibility definitions of functions that were
  19    formerly defined as "extern inline" in string.h; it's conceivable
  20    that old binaries contain references to them.  */
  21
  22 #define __NO_STRING_INLINES
  23 #include <string.h>
  24
  25 #include "shlib-compat.h"
  26
  27 #if SHLIB_COMPAT (libc, GLIBC_2_1_1, GLIBC_2_25)
  28 /* These functions were removed from string.h in glibc 2.25.  */
  29
  30 char *
  31 __old_strtok_r_1c (char *__s, char __sep, char **__nextp)
  32 {
  33   char *__result;
  34   if (__s == NULL)
  35     __s = *__nextp;
  36   while (*__s == __sep)
  37     ++__s;
  38   __result = NULL;
  39   if (*__s != '\0')
  40     {
  41       __result = __s++;
  42       while (*__s != '\0')
  43         if (*__s++ == __sep)
  44           {
  45             __s[-1] = '\0';
  46             break;
  47           }
  48     }
  49   *__nextp = __s;
  50   return __result;
  51 }
  52 compat_symbol (libc, __old_strtok_r_1c, __strtok_r_1c, GLIBC_2_1_1);
  53
  54 char *
  55 __old_strsep_1c (char **__s, char __reject)
  56 {
  57   char *__retval = *__s;
  58   if (__retval != NULL && (*__s = strchr (__retval, __reject)) != NULL)
  59     *(*__s)++ = '\0';
  60   return __retval;
  61 }
  62 compat_symbol (libc, __old_strsep_1c, __strsep_1c, GLIBC_2_1_1);
  63
  64 char *
  65 __old_strsep_2c (char **__s, char __reject1, char __reject2)
  66 {
  67   char *__retval = *__s;
  68   if (__retval != NULL)
  69     {
  70       char *__cp = __retval;
  71       while (1)
  72         {
  73           if (*__cp == '\0')
  74             {
  75               __cp = NULL;
  76               break;
  77             }
  78           if (*__cp == __reject1 || *__cp == __reject2)
  79             {
  80               *__cp++ = '\0';
  81               break;
  82             }
  83           ++__cp;
  84         }
  85       *__s = __cp;
  86     }
  87   return __retval;
  88 }
  89 compat_symbol (libc, __old_strsep_2c, __strsep_2c, GLIBC_2_1_1);
  90
  91 char *
  92 __old_strsep_3c (char **__s, char __reject1, char __reject2, char __reject3)
  93 {
  94   char *__retval = *__s;
  95   if (__retval != NULL)
  96     {
  97       char *__cp = __retval;
  98       while (1)
  99         {
 100           if (*__cp == '\0')
 101             {
 102               __cp = NULL;
 103               break;
 104             }
 105           if (*__cp == __reject1 || *__cp == __reject2 || *__cp == __reject3)
 106             {
 107               *__cp++ = '\0';
 108               break;
 109             }
 110           ++__cp;
 111         }
 112       *__s = __cp;
 113     }
 114   return __retval;
 115 }
 116 compat_symbol (libc, __old_strsep_3c, __strsep_3c, GLIBC_2_1_1);
 117 #endif
 118
 119 #if SHLIB_COMPAT (libc, GLIBC_2_1_1, GLIBC_2_24)
 120 /* These functions were removed from string.h in glibc 2.24.  */
 121
 122 size_t
 123 __old_strcspn_c1 (const char *__s, int __reject)
 124 {
 125   size_t __result = 0;
 126   while (__s[__result] != '\0' && __s[__result] != __reject)
 127     ++__result;
 128   return __result;
 129 }
 130 compat_symbol (libc, __old_strcspn_c1, __strcspn_c1, GLIBC_2_1_1);
 131
 132 size_t
 133 __old_strcspn_c2 (const char *__s, int __reject1, int __reject2)
 134 {
 135   size_t __result = 0;
 136   while (__s[__result] != '\0' && __s[__result] != __reject1
 137          && __s[__result] != __reject2)
 138     ++__result;
 139   return __result;
 140 }
 141 compat_symbol (libc, __old_strcspn_c2, __strcspn_c2, GLIBC_2_1_1);
 142
 143 size_t
 144 __old_strcspn_c3 (const char *__s, int __reject1, int __reject2,
 145               int __reject3)
 146 {
 147   size_t __result = 0;
 148   while (__s[__result] != '\0' && __s[__result] != __reject1
 149          && __s[__result] != __reject2 && __s[__result] != __reject3)
 150     ++__result;
 151   return __result;
 152 }
 153 compat_symbol (libc, __old_strcspn_c3, __strcspn_c3, GLIBC_2_1_1);
 154
 155 size_t
 156 __old_strspn_c1 (const char *__s, int __accept)
 157 {
 158   size_t __result = 0;
 159   /* Please note that __accept never can be '\0'.  */
 160   while (__s[__result] == __accept)
 161     ++__result;
 162   return __result;
 163 }
 164 compat_symbol (libc, __old_strspn_c1, __strspn_c1, GLIBC_2_1_1);
 165
 166 size_t
 167 __old_strspn_c2 (const char *__s, int __accept1, int __accept2)
 168 {
 169   size_t __result = 0;
 170   /* Please note that __accept1 and __accept2 never can be '\0'.  */
 171   while (__s[__result] == __accept1 || __s[__result] == __accept2)
 172     ++__result;
 173   return __result;
 174 }
 175 compat_symbol (libc, __old_strspn_c2, __strspn_c2, GLIBC_2_1_1);
 176
 177 size_t
 178 __old_strspn_c3 (const char *__s, int __accept1, int __accept2,
 179                  int __accept3)
 180 {
 181   size_t __result = 0;
 182   /* Please note that __accept1 to __accept3 never can be '\0'.  */
 183   while (__s[__result] == __accept1 || __s[__result] == __accept2
 184          || __s[__result] == __accept3)
 185     ++__result;
 186   return __result;
 187 }
 188 compat_symbol (libc, __old_strspn_c3, __strspn_c3, GLIBC_2_1_1);
 189
 190 char *
 191 __old_strpbrk_c2 (const char *__s, int __accept1, int __accept2)
 192 {
 193   /* Please note that __accept1 and __accept2 never can be '\0'.  */
 194   while (*__s != '\0' && *__s != __accept1 && *__s != __accept2)
 195     ++__s;
 196   return *__s == '\0' ? NULL : (char *) (size_t) __s;
 197 }
 198 compat_symbol (libc, __old_strpbrk_c2, __strpbrk_c2, GLIBC_2_1_1);
 199
 200 char *
 201 __old_strpbrk_c3 (const char *__s, int __accept1, int __accept2, int __accept3)
 202 {
 203   /* Please note that __accept1 to __accept3 never can be '\0'.  */
 204   while (*__s != '\0' && *__s != __accept1 && *__s != __accept2
 205          && *__s != __accept3)
 206     ++__s;
 207   return *__s == '\0' ? NULL : (char *) (size_t) __s;
 208 }
 209 compat_symbol (libc, __old_strpbrk_c3, __strpbrk_c3, GLIBC_2_1_1);
 210
 211 # if defined __mc68020__ || defined __s390__ || defined __i386__
 212 #  define _STRING_INLINE_unaligned 1
 213 # else
 214 #  define _STRING_INLINE_unaligned 0
 215 /* These are a few types we need for the optimizations if we cannot
 216    use unaligned memory accesses.  */
 217 #  define __STRING2_COPY_TYPE(N) \
 218   typedef struct { unsigned char __arr[N]; }                                  \
 219     __attribute__ ((__packed__)) __STRING2_COPY_ARR##N
 220 __STRING2_COPY_TYPE (2);
 221 __STRING2_COPY_TYPE (3);
 222 __STRING2_COPY_TYPE (4);
 223 __STRING2_COPY_TYPE (5);
 224 __STRING2_COPY_TYPE (6);
 225 __STRING2_COPY_TYPE (7);
 226 __STRING2_COPY_TYPE (8);
 227 #  undef __STRING2_COPY_TYPE
 228 # endif
 229
 230 # if _STRING_INLINE_unaligned
 231 void *
 232 __old_mempcpy_small (void *__dest1,
 233                      char __src0_1, char __src2_1, char __src4_1, char __src6_1,
 234                      __uint16_t __src0_2, __uint16_t __src4_2,
 235                      __uint32_t __src0_4, __uint32_t __src4_4,
 236                      size_t __srclen)
 237 {
 238   union {
 239     __uint32_t __ui;
 240     __uint16_t __usi;
 241     unsigned char __uc;
 242     unsigned char __c;
 243   } *__u = __dest1;
 244   switch ((unsigned int) __srclen)
 245     {
 246     case 1:
 247       __u->__c = __src0_1;
 248       __u = __extension__ ((void *) __u + 1);
 249       break;
 250     case 2:
 251       __u->__usi = __src0_2;
 252       __u = __extension__ ((void *) __u + 2);
 253       break;
 254     case 3:
 255       __u->__usi = __src0_2;
 256       __u = __extension__ ((void *) __u + 2);
 257       __u->__c = __src2_1;
 258       __u = __extension__ ((void *) __u + 1);
 259       break;
 260     case 4:
 261       __u->__ui = __src0_4;
 262       __u = __extension__ ((void *) __u + 4);
 263       break;
 264     case 5:
 265       __u->__ui = __src0_4;
 266       __u = __extension__ ((void *) __u + 4);
 267       __u->__c = __src4_1;
 268       __u = __extension__ ((void *) __u + 1);
 269       break;
 270     case 6:
 271       __u->__ui = __src0_4;
 272       __u = __extension__ ((void *) __u + 4);
 273       __u->__usi = __src4_2;
 274       __u = __extension__ ((void *) __u + 2);
 275       break;
 276     case 7:
 277       __u->__ui = __src0_4;
 278       __u = __extension__ ((void *) __u + 4);
 279       __u->__usi = __src4_2;
 280       __u = __extension__ ((void *) __u + 2);
 281       __u->__c = __src6_1;
 282       __u = __extension__ ((void *) __u + 1);
 283       break;
 284     case 8:
 285       __u->__ui = __src0_4;
 286       __u = __extension__ ((void *) __u + 4);
 287       __u->__ui = __src4_4;
 288       __u = __extension__ ((void *) __u + 4);
 289       break;
 290     }
 291   return (void *) __u;
 292 }
 293
 294 # else
 295
 296 void *
 297 __old_mempcpy_small (void *__dest, char __src1,
 298                      __STRING2_COPY_ARR2 __src2, __STRING2_COPY_ARR3 __src3,
 299                      __STRING2_COPY_ARR4 __src4, __STRING2_COPY_ARR5 __src5,
 300                      __STRING2_COPY_ARR6 __src6, __STRING2_COPY_ARR7 __src7,
 301                      __STRING2_COPY_ARR8 __src8, size_t __srclen)
 302 {
 303   union {
 304     char __c;
 305     __STRING2_COPY_ARR2 __sca2;
 306     __STRING2_COPY_ARR3 __sca3;
 307     __STRING2_COPY_ARR4 __sca4;
 308     __STRING2_COPY_ARR5 __sca5;
 309     __STRING2_COPY_ARR6 __sca6;
 310     __STRING2_COPY_ARR7 __sca7;
 311     __STRING2_COPY_ARR8 __sca8;
 312   } *__u = __dest;
 313   switch ((unsigned int) __srclen)
 314     {
 315     case 1:
 316       __u->__c = __src1;
 317       break;
 318     case 2:
 319       __extension__ __u->__sca2 = __src2;
 320       break;
 321     case 3:
 322       __extension__ __u->__sca3 = __src3;
 323       break;
 324     case 4:
 325       __extension__ __u->__sca4 = __src4;
 326       break;
 327     case 5:
 328       __extension__ __u->__sca5 = __src5;
 329       break;
 330     case 6:
 331       __extension__ __u->__sca6 = __src6;
 332       break;
 333     case 7:
 334       __extension__ __u->__sca7 = __src7;
 335       break;
 336     case 8:
 337       __extension__ __u->__sca8 = __src8;
 338       break;
 339     }
 340   return __extension__ ((void *) __u + __srclen);
 341 }
 342 # endif
 343 compat_symbol (libc, __old_mempcpy_small, __mempcpy_small, GLIBC_2_1_1);
 344
 345 # if _STRING_INLINE_unaligned
 346 char *
 347 __old_strcpy_small (char *__dest,
 348                     __uint16_t __src0_2, __uint16_t __src4_2,
 349                     __uint32_t __src0_4, __uint32_t __src4_4,
 350                     size_t __srclen)
 351 {
 352   union {
 353     __uint32_t __ui;
 354     __uint16_t __usi;
 355     unsigned char __uc;
 356   } *__u = (void *) __dest;
 357   switch ((unsigned int) __srclen)
 358     {
 359     case 1:
 360       __u->__uc = '\0';
 361       break;
 362     case 2:
 363       __u->__usi = __src0_2;
 364       break;
 365     case 3:
 366       __u->__usi = __src0_2;
 367       __u = __extension__ ((void *) __u + 2);
 368       __u->__uc = '\0';
 369       break;
 370     case 4:
 371       __u->__ui = __src0_4;
 372       break;
 373     case 5:
 374       __u->__ui = __src0_4;
 375       __u = __extension__ ((void *) __u + 4);
 376       __u->__uc = '\0';
 377       break;
 378     case 6:
 379       __u->__ui = __src0_4;
 380       __u = __extension__ ((void *) __u + 4);
 381       __u->__usi = __src4_2;
 382       break;
 383     case 7:
 384       __u->__ui = __src0_4;
 385       __u = __extension__ ((void *) __u + 4);
 386       __u->__usi = __src4_2;
 387       __u = __extension__ ((void *) __u + 2);
 388       __u->__uc = '\0';
 389       break;
 390     case 8:
 391       __u->__ui = __src0_4;
 392       __u = __extension__ ((void *) __u + 4);
 393       __u->__ui = __src4_4;
 394       break;
 395     }
 396   return __dest;
 397 }
 398
 399 # else
 400
 401 char *
 402 __old_strcpy_small (char *__dest,
 403                     __STRING2_COPY_ARR2 __src2, __STRING2_COPY_ARR3 __src3,
 404                     __STRING2_COPY_ARR4 __src4, __STRING2_COPY_ARR5 __src5,
 405                     __STRING2_COPY_ARR6 __src6, __STRING2_COPY_ARR7 __src7,
 406                     __STRING2_COPY_ARR8 __src8, size_t __srclen)
 407 {
 408   union {
 409     char __c;
 410     __STRING2_COPY_ARR2 __sca2;
 411     __STRING2_COPY_ARR3 __sca3;
 412     __STRING2_COPY_ARR4 __sca4;
 413     __STRING2_COPY_ARR5 __sca5;
 414     __STRING2_COPY_ARR6 __sca6;
 415     __STRING2_COPY_ARR7 __sca7;
 416     __STRING2_COPY_ARR8 __sca8;
 417   } *__u = (void *) __dest;
 418   switch ((unsigned int) __srclen)
 419     {
 420     case 1:
 421       __u->__c = '\0';
 422       break;
 423     case 2:
 424       __extension__ __u->__sca2 = __src2;
 425       break;
 426     case 3:
 427       __extension__ __u->__sca3 = __src3;
 428       break;
 429     case 4:
 430       __extension__ __u->__sca4 = __src4;
 431       break;
 432     case 5:
 433       __extension__ __u->__sca5 = __src5;
 434       break;
 435     case 6:
 436       __extension__ __u->__sca6 = __src6;
 437       break;
 438     case 7:
 439       __extension__ __u->__sca7 = __src7;
 440       break;
 441     case 8:
 442       __extension__ __u->__sca8 = __src8;
 443       break;
 444   }
 445   return __dest;
 446 }
 447 # endif
 448 compat_symbol (libc, __old_strcpy_small, __strcpy_small, GLIBC_2_1_1);
 449
 450 # if _STRING_INLINE_unaligned
 451 char *
 452 __old_stpcpy_small (char *__dest,
 453                     __uint16_t __src0_2, __uint16_t __src4_2,
 454                     __uint32_t __src0_4, __uint32_t __src4_4,
 455                     size_t __srclen)
 456 {
 457   union {
 458     unsigned int __ui;
 459     unsigned short int __usi;
 460     unsigned char __uc;
 461     char __c;
 462   } *__u = (void *) __dest;
 463   switch ((unsigned int) __srclen)
 464     {
 465     case 1:
 466       __u->__uc = '\0';
 467       break;
 468     case 2:
 469       __u->__usi = __src0_2;
 470       __u = __extension__ ((void *) __u + 1);
 471       break;
 472     case 3:
 473       __u->__usi = __src0_2;
 474       __u = __extension__ ((void *) __u + 2);
 475       __u->__uc = '\0';
 476       break;
 477     case 4:
 478       __u->__ui = __src0_4;
 479       __u = __extension__ ((void *) __u + 3);
 480       break;
 481     case 5:
 482       __u->__ui = __src0_4;
 483       __u = __extension__ ((void *) __u + 4);
 484       __u->__uc = '\0';
 485       break;
 486     case 6:
 487       __u->__ui = __src0_4;
 488       __u = __extension__ ((void *) __u + 4);
 489       __u->__usi = __src4_2;
 490       __u = __extension__ ((void *) __u + 1);
 491       break;
 492     case 7:
 493       __u->__ui = __src0_4;
 494       __u = __extension__ ((void *) __u + 4);
 495       __u->__usi = __src4_2;
 496       __u = __extension__ ((void *) __u + 2);
 497       __u->__uc = '\0';
 498       break;
 499     case 8:
 500       __u->__ui = __src0_4;
 501       __u = __extension__ ((void *) __u + 4);
 502       __u->__ui = __src4_4;
 503       __u = __extension__ ((void *) __u + 3);
 504       break;
 505     }
 506   return &__u->__c;
 507 }
 508
 509 # else
 510
 511 char *
 512 __old_stpcpy_small (char *__dest,
 513                     __STRING2_COPY_ARR2 __src2, __STRING2_COPY_ARR3 __src3,
 514                     __STRING2_COPY_ARR4 __src4, __STRING2_COPY_ARR5 __src5,
 515                     __STRING2_COPY_ARR6 __src6, __STRING2_COPY_ARR7 __src7,
 516                     __STRING2_COPY_ARR8 __src8, size_t __srclen)
 517 {
 518   union {
 519     char __c;
 520     __STRING2_COPY_ARR2 __sca2;
 521     __STRING2_COPY_ARR3 __sca3;
 522     __STRING2_COPY_ARR4 __sca4;
 523     __STRING2_COPY_ARR5 __sca5;
 524     __STRING2_COPY_ARR6 __sca6;
 525     __STRING2_COPY_ARR7 __sca7;
 526     __STRING2_COPY_ARR8 __sca8;
 527   } *__u = (void *) __dest;
 528   switch ((unsigned int) __srclen)
 529     {
 530     case 1:
 531       __u->__c = '\0';
 532       break;
 533     case 2:
 534       __extension__ __u->__sca2 = __src2;
 535       break;
 536     case 3:
 537       __extension__ __u->__sca3 = __src3;
 538       break;
 539     case 4:
 540       __extension__ __u->__sca4 = __src4;
 541       break;
 542     case 5:
 543       __extension__ __u->__sca5 = __src5;
 544       break;
 545     case 6:
 546       __extension__ __u->__sca6 = __src6;
 547       break;
 548     case 7:
 549       __extension__ __u->__sca7 = __src7;
 550       break;
 551     case 8:
 552       __extension__ __u->__sca8 = __src8;
 553       break;
 554   }
 555   return __dest + __srclen - 1;
 556 }
 557 # endif
 558 compat_symbol (libc, __old_stpcpy_small, __stpcpy_small, GLIBC_2_1_1);
 559
 560 #endif