~linaro-toolchain-dev/cortex-strings/trunk

« back to all changes in this revision

Viewing changes to src/reference/bionic/strlen.c

  • Committer: Michael Hope
  • Date: 2010-08-26 22:19:29 UTC
  • Revision ID: michael.hope@linaro.org-20100826221929-ppeg01mnpx34aqrp
Pulled in the initial versions

Show diffs side-by-side

added added

removed removed

Lines of Context:
 
1
/*
 
2
 * Copyright (C) 2008 The Android Open Source Project
 
3
 * All rights reserved.
 
4
 *
 
5
 * Redistribution and use in source and binary forms, with or without
 
6
 * modification, are permitted provided that the following conditions
 
7
 * are met:
 
8
 *  * Redistributions of source code must retain the above copyright
 
9
 *    notice, this list of conditions and the following disclaimer.
 
10
 *  * Redistributions in binary form must reproduce the above copyright
 
11
 *    notice, this list of conditions and the following disclaimer in
 
12
 *    the documentation and/or other materials provided with the
 
13
 *    distribution.
 
14
 *
 
15
 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
 
16
 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
 
17
 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
 
18
 * FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
 
19
 * COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
 
20
 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
 
21
 * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS
 
22
 * OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
 
23
 * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
 
24
 * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT
 
25
 * OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
 
26
 * SUCH DAMAGE.
 
27
 */
 
28
#include <string.h>
 
29
#include <stdint.h>
 
30
#include <machine/cpu-features.h>
 
31
 
 
32
size_t strlen(const char *s)
 
33
{
 
34
    __builtin_prefetch(s);
 
35
    __builtin_prefetch(s+32);
 
36
    
 
37
    union {
 
38
        const char      *b;
 
39
        const uint32_t  *w;
 
40
        uintptr_t       i;
 
41
    } u;
 
42
    
 
43
    // these are some scratch variables for the asm code below
 
44
    uint32_t v, t;
 
45
    
 
46
    // initialize the string length to zero
 
47
    size_t l = 0;
 
48
 
 
49
    // align the pointer to a 32-bit word boundary
 
50
    u.b = s;
 
51
    while (u.i & 0x3)  {
 
52
        if (__builtin_expect(*u.b++ == 0, 0)) {
 
53
            goto done;
 
54
        }
 
55
        l++;
 
56
    }
 
57
 
 
58
    // loop for each word, testing if it contains a zero byte
 
59
    // if so, exit the loop and update the length.
 
60
    // We need to process 32 bytes per loop to schedule PLD properly
 
61
    // and achieve the maximum bus speed.
 
62
    asm(
 
63
        "ldr     %[v], [ %[s] ], #4         \n"
 
64
        "sub     %[l], %[l], %[s]           \n"
 
65
        "0:                                 \n"
 
66
#if __ARM_HAVE_PLD
 
67
        "pld     [ %[s], #64 ]              \n"
 
68
#endif
 
69
        "sub     %[t], %[v], %[mask], lsr #7\n"
 
70
        "and     %[t], %[t], %[mask]        \n"
 
71
        "bics    %[t], %[t], %[v]           \n"
 
72
        "ldreq   %[v], [ %[s] ], #4         \n"
 
73
#if !defined(__OPTIMIZE_SIZE__)
 
74
        "bne     1f                         \n"
 
75
        "sub     %[t], %[v], %[mask], lsr #7\n"
 
76
        "and     %[t], %[t], %[mask]        \n"
 
77
        "bics    %[t], %[t], %[v]           \n"
 
78
        "ldreq   %[v], [ %[s] ], #4         \n"
 
79
        "bne     1f                         \n"
 
80
        "sub     %[t], %[v], %[mask], lsr #7\n"
 
81
        "and     %[t], %[t], %[mask]        \n"
 
82
        "bics    %[t], %[t], %[v]           \n"
 
83
        "ldreq   %[v], [ %[s] ], #4         \n"
 
84
        "bne     1f                         \n"
 
85
        "sub     %[t], %[v], %[mask], lsr #7\n"
 
86
        "and     %[t], %[t], %[mask]        \n"
 
87
        "bics    %[t], %[t], %[v]           \n"
 
88
        "ldreq   %[v], [ %[s] ], #4         \n"
 
89
        "bne     1f                         \n"
 
90
        "sub     %[t], %[v], %[mask], lsr #7\n"
 
91
        "and     %[t], %[t], %[mask]        \n"
 
92
        "bics    %[t], %[t], %[v]           \n"
 
93
        "ldreq   %[v], [ %[s] ], #4         \n"
 
94
        "bne     1f                         \n"
 
95
        "sub     %[t], %[v], %[mask], lsr #7\n"
 
96
        "and     %[t], %[t], %[mask]        \n"
 
97
        "bics    %[t], %[t], %[v]           \n"
 
98
        "ldreq   %[v], [ %[s] ], #4         \n"
 
99
        "bne     1f                         \n"
 
100
        "sub     %[t], %[v], %[mask], lsr #7\n"
 
101
        "and     %[t], %[t], %[mask]        \n"
 
102
        "bics    %[t], %[t], %[v]           \n"
 
103
        "ldreq   %[v], [ %[s] ], #4         \n"
 
104
        "bne     1f                         \n"
 
105
        "sub     %[t], %[v], %[mask], lsr #7\n"
 
106
        "and     %[t], %[t], %[mask]        \n"
 
107
        "bics    %[t], %[t], %[v]           \n"
 
108
        "ldreq   %[v], [ %[s] ], #4         \n"
 
109
#endif
 
110
        "beq     0b                         \n"
 
111
        "1:                                 \n"
 
112
        "add     %[l], %[l], %[s]           \n"
 
113
        "tst     %[v], #0xFF                \n"
 
114
        "beq     2f                         \n"
 
115
        "add     %[l], %[l], #1             \n"
 
116
        "tst     %[v], #0xFF00              \n"
 
117
        "beq     2f                         \n"
 
118
        "add     %[l], %[l], #1             \n"
 
119
        "tst     %[v], #0xFF0000            \n"
 
120
        "addne   %[l], %[l], #1             \n"
 
121
        "2:                                 \n"
 
122
        : [l]"=&r"(l), [v]"=&r"(v), [t]"=&r"(t), [s]"=&r"(u.b)
 
123
        : "%[l]"(l), "%[s]"(u.b), [mask]"r"(0x80808080UL)
 
124
        : "cc"
 
125
    );
 
126
    
 
127
done:
 
128
    return l;
 
129
}