1*e7776783SApple OSS Distributions /*-
2*e7776783SApple OSS Distributions * Copyright (c) 2009 Xin LI <[email protected]>
3*e7776783SApple OSS Distributions * All rights reserved.
4*e7776783SApple OSS Distributions *
5*e7776783SApple OSS Distributions * Redistribution and use in source and binary forms, with or without
6*e7776783SApple OSS Distributions * modification, are permitted provided that the following conditions
7*e7776783SApple OSS Distributions * are met:
8*e7776783SApple OSS Distributions * 1. Redistributions of source code must retain the above copyright
9*e7776783SApple OSS Distributions * notice, this list of conditions and the following disclaimer.
10*e7776783SApple OSS Distributions * 2. Redistributions in binary form must reproduce the above copyright
11*e7776783SApple OSS Distributions * notice, this list of conditions and the following disclaimer in the
12*e7776783SApple OSS Distributions * documentation and/or other materials provided with the distribution.
13*e7776783SApple OSS Distributions *
14*e7776783SApple OSS Distributions * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15*e7776783SApple OSS Distributions * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16*e7776783SApple OSS Distributions * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17*e7776783SApple OSS Distributions * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
18*e7776783SApple OSS Distributions * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19*e7776783SApple OSS Distributions * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20*e7776783SApple OSS Distributions * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21*e7776783SApple OSS Distributions * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22*e7776783SApple OSS Distributions * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23*e7776783SApple OSS Distributions * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
24*e7776783SApple OSS Distributions * SUCH DAMAGE.
25*e7776783SApple OSS Distributions */
26*e7776783SApple OSS Distributions
27*e7776783SApple OSS Distributions #include "string.h"
28*e7776783SApple OSS Distributions #include <limits.h>
29*e7776783SApple OSS Distributions
30*e7776783SApple OSS Distributions /*
31*e7776783SApple OSS Distributions * Portable strlen() for 32-bit and 64-bit systems.
32*e7776783SApple OSS Distributions *
33*e7776783SApple OSS Distributions * Rationale: it is generally much more efficient to do word length
34*e7776783SApple OSS Distributions * operations and avoid branches on modern computer systems, as
35*e7776783SApple OSS Distributions * compared to byte-length operations with a lot of branches.
36*e7776783SApple OSS Distributions *
37*e7776783SApple OSS Distributions * The expression:
38*e7776783SApple OSS Distributions *
39*e7776783SApple OSS Distributions * ((x - 0x01....01) & ~x & 0x80....80)
40*e7776783SApple OSS Distributions *
41*e7776783SApple OSS Distributions * would evaluate to a non-zero value iff any of the bytes in the
42*e7776783SApple OSS Distributions * original word is zero. However, we can further reduce ~1/3 of
43*e7776783SApple OSS Distributions * time if we consider that strlen() usually operate on 7-bit ASCII
44*e7776783SApple OSS Distributions * by employing the following expression, which allows false positive
45*e7776783SApple OSS Distributions * when high bit of 1 and use the tail case to catch these case:
46*e7776783SApple OSS Distributions *
47*e7776783SApple OSS Distributions * ((x - 0x01....01) & 0x80....80)
48*e7776783SApple OSS Distributions *
49*e7776783SApple OSS Distributions * This is more than 5.2 times as fast as the raw implementation on
50*e7776783SApple OSS Distributions * Intel T7300 under long mode for strings longer than word length.
51*e7776783SApple OSS Distributions */
52*e7776783SApple OSS Distributions
53*e7776783SApple OSS Distributions /* Magic numbers for the algorithm */
54*e7776783SApple OSS Distributions #if LONG_BIT == 32
55*e7776783SApple OSS Distributions static const unsigned long mask01 = 0x01010101;
56*e7776783SApple OSS Distributions static const unsigned long mask80 = 0x80808080;
57*e7776783SApple OSS Distributions #elif LONG_BIT == 64
58*e7776783SApple OSS Distributions static const unsigned long mask01 = 0x0101010101010101;
59*e7776783SApple OSS Distributions static const unsigned long mask80 = 0x8080808080808080;
60*e7776783SApple OSS Distributions #else
61*e7776783SApple OSS Distributions #error Unsupported word size
62*e7776783SApple OSS Distributions #endif
63*e7776783SApple OSS Distributions
64*e7776783SApple OSS Distributions #define LONGPTR_MASK (sizeof(long) - 1)
65*e7776783SApple OSS Distributions
66*e7776783SApple OSS Distributions /*
67*e7776783SApple OSS Distributions * Helper macro to return string length if we caught the zero
68*e7776783SApple OSS Distributions * byte.
69*e7776783SApple OSS Distributions */
70*e7776783SApple OSS Distributions #define testbyte(x) \
71*e7776783SApple OSS Distributions do { \
72*e7776783SApple OSS Distributions if (p[x] == '\0') \
73*e7776783SApple OSS Distributions return (p - str + x); \
74*e7776783SApple OSS Distributions } while (0)
75*e7776783SApple OSS Distributions
76*e7776783SApple OSS Distributions __attribute__((visibility("hidden")))
77*e7776783SApple OSS Distributions size_t
_libkernel_strlen(const char * str)78*e7776783SApple OSS Distributions _libkernel_strlen(const char *str)
79*e7776783SApple OSS Distributions {
80*e7776783SApple OSS Distributions const char *p;
81*e7776783SApple OSS Distributions const unsigned long *lp;
82*e7776783SApple OSS Distributions
83*e7776783SApple OSS Distributions /* Skip the first few bytes until we have an aligned p */
84*e7776783SApple OSS Distributions for (p = str; (uintptr_t)p & LONGPTR_MASK; p++) {
85*e7776783SApple OSS Distributions if (*p == '\0') {
86*e7776783SApple OSS Distributions return p - str;
87*e7776783SApple OSS Distributions }
88*e7776783SApple OSS Distributions }
89*e7776783SApple OSS Distributions
90*e7776783SApple OSS Distributions /* Scan the rest of the string using word sized operation */
91*e7776783SApple OSS Distributions for (lp = (const unsigned long *)p;; lp++) {
92*e7776783SApple OSS Distributions if ((*lp - mask01) & mask80) {
93*e7776783SApple OSS Distributions p = (const char *)(lp);
94*e7776783SApple OSS Distributions testbyte(0);
95*e7776783SApple OSS Distributions testbyte(1);
96*e7776783SApple OSS Distributions testbyte(2);
97*e7776783SApple OSS Distributions testbyte(3);
98*e7776783SApple OSS Distributions #if (LONG_BIT >= 64)
99*e7776783SApple OSS Distributions testbyte(4);
100*e7776783SApple OSS Distributions testbyte(5);
101*e7776783SApple OSS Distributions testbyte(6);
102*e7776783SApple OSS Distributions testbyte(7);
103*e7776783SApple OSS Distributions #endif
104*e7776783SApple OSS Distributions }
105*e7776783SApple OSS Distributions }
106*e7776783SApple OSS Distributions
107*e7776783SApple OSS Distributions /* NOTREACHED */
108*e7776783SApple OSS Distributions return 0;
109*e7776783SApple OSS Distributions }
110