1 /* Optimized strcasecmp implementation for PowerPC64.
2 Copyright (C) 2011-2018 Free Software Foundation, Inc.
3 This file is part of the GNU C Library.
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.
10 The GNU C Library is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 Lesser General Public License for more details.
15 You should have received a copy of the GNU Lesser General Public
16 License along with the GNU C Library; if not, see
17 <http://www.gnu.org/licenses/>. */
20 #include <locale-defines.h>
22 /* int [r3] strcasecmp (const char *s1 [r3], const char *s2 [r4] )
24 or if defined USE_IN_EXTENDED_LOCALE_MODEL:
26 int [r3] strcasecmp_l (const char *s1 [r3], const char *s2 [r4],
30 # define __STRCMP __strcasecmp
31 # define STRCMP strcasecmp
34 #ifndef USE_IN_EXTENDED_LOCALE_MODEL
38 ENTRY_TOCLESS (__STRCMP)
42 #define rRTN r3 /* Return value */
43 #define rSTR1 r5 /* 1st string */
44 #define rSTR2 r4 /* 2nd string */
45 #define rLOCARG r5 /* 3rd argument: locale_t */
46 #define rCHAR1 r6 /* Byte read from 1st string */
47 #define rCHAR2 r7 /* Byte read from 2nd string */
48 #define rADDR1 r8 /* Address of tolower(rCHAR1) */
49 #define rADDR2 r12 /* Address of tolower(rCHAR2) */
50 #define rLWR1 r8 /* Word tolower(rCHAR1) */
51 #define rLWR2 r12 /* Word tolower(rCHAR2) */
53 #define rLOC r11 /* Default locale address */
56 #ifndef USE_IN_EXTENDED_LOCALE_MODEL
57 ld rTMP, __libc_tsd_LOCALE@got@tprel(r2)
58 add rLOC, rTMP, __libc_tsd_LOCALE@tls
63 ld rLOC, LOCALE_CTYPE_TOLOWER(rLOC)
69 /* Unrolling loop for POWER: loads are done with 'lbz' plus
70 offset and string descriptors are only updated in the end
73 lbz rCHAR1, 0(rSTR1) /* Load char from s1 */
74 lbz rCHAR2, 0(rSTR2) /* Load char from s2 */
76 cmpdi rCHAR1, 0 /* *s1 == '\0' ? */
77 sldi rADDR1, rCHAR1, 2 /* Calculate address for tolower(*s1) */
78 sldi rADDR2, rCHAR2, 2 /* Calculate address for tolower(*s2) */
79 lwzx rLWR1, rLOC, rADDR1 /* Load tolower(*s1) */
80 lwzx rLWR2, rLOC, rADDR2 /* Load tolower(*s2) */
81 cmpw cr1, rLWR1, rLWR2 /* r = tolower(*s1) == tolower(*s2) ? */
82 crorc 4*cr1+eq,eq,4*cr1+eq /* (*s1 != '\0') || (r == 1) */
87 sldi rADDR1, rCHAR1, 2
88 sldi rADDR2, rCHAR2, 2
89 lwzx rLWR1, rLOC, rADDR1
90 lwzx rLWR2, rLOC, rADDR2
91 cmpw cr1, rLWR1, rLWR2
92 crorc 4*cr1+eq,eq,4*cr1+eq
97 sldi rADDR1, rCHAR1, 2
98 sldi rADDR2, rCHAR2, 2
99 lwzx rLWR1, rLOC, rADDR1
100 lwzx rLWR2, rLOC, rADDR2
101 cmpw cr1, rLWR1, rLWR2
102 crorc 4*cr1+eq,eq,4*cr1+eq
107 /* Increment both string descriptors */
110 sldi rADDR1, rCHAR1, 2
111 sldi rADDR2, rCHAR2, 2
112 lwzx rLWR1, rLOC, rADDR1
113 lwzx rLWR2, rLOC, rADDR2
114 cmpw cr1, rLWR1, rLWR2
115 crorc 4*cr1+eq,eq,4*cr1+eq
117 lbz rCHAR1, 0(rSTR1) /* Load char from s1 */
118 lbz rCHAR2, 0(rSTR2) /* Load char from s2 */
121 subf r0, rLWR2, rLWR1
126 weak_alias (__STRCMP, STRCMP)
127 libc_hidden_builtin_def (__STRCMP)