1 | /* |
---|
2 | (C) Copyright 2008 |
---|
3 | International Business Machines Corporation, |
---|
4 | All rights reserved. |
---|
5 | |
---|
6 | Redistribution and use in source and binary forms, with or without |
---|
7 | modification, are permitted provided that the following conditions are met: |
---|
8 | |
---|
9 | * Redistributions of source code must retain the above copyright notice, |
---|
10 | this list of conditions and the following disclaimer. |
---|
11 | * Redistributions in binary form must reproduce the above copyright |
---|
12 | notice, this list of conditions and the following disclaimer in the |
---|
13 | documentation and/or other materials provided with the distribution. |
---|
14 | * Neither the names of the copyright holders nor the names of their |
---|
15 | contributors may be used to endorse or promote products derived from |
---|
16 | this software without specific prior written permission. |
---|
17 | |
---|
18 | THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS |
---|
19 | IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED |
---|
20 | TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A |
---|
21 | PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER |
---|
22 | OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, |
---|
23 | EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, |
---|
24 | PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR |
---|
25 | PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF |
---|
26 | LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING |
---|
27 | NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS |
---|
28 | SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
---|
29 | */ |
---|
30 | |
---|
31 | #include <spu_intrinsics.h> |
---|
32 | #include "vec_literal.h" |
---|
33 | |
---|
34 | /* |
---|
35 | * Supply the inline _straddr for use by strncpy and strncat. |
---|
36 | * |
---|
37 | * _straddr: search the string s, and return the address of the first byte |
---|
38 | * containing zero. |
---|
39 | */ |
---|
40 | static inline char *_straddr(const char *s) |
---|
41 | { |
---|
42 | unsigned int cnt, cmp, skip, mask; |
---|
43 | vec_uchar16 *ptr, data; |
---|
44 | |
---|
45 | /* |
---|
46 | * Compensate for unaligned strings. |
---|
47 | */ |
---|
48 | ptr = (vec_uchar16 *)s; /* implicit (s & ~0xf) */ |
---|
49 | skip = (unsigned int)(ptr) & 0xf; |
---|
50 | /* |
---|
51 | * skip the first skip bytes starting at (s & ~0xf). |
---|
52 | */ |
---|
53 | mask = 0xFFFF >> skip; |
---|
54 | |
---|
55 | data = *ptr; |
---|
56 | cmp = spu_extract(spu_gather(spu_cmpeq(data, 0)), 0); |
---|
57 | cmp &= mask; |
---|
58 | |
---|
59 | cnt = spu_extract(spu_cntlz(spu_promote(cmp, 0)), 0); |
---|
60 | |
---|
61 | while (cnt == 32) { |
---|
62 | data = *++ptr; |
---|
63 | cnt = spu_extract(spu_cntlz(spu_gather(spu_cmpeq(data, 0))), 0); |
---|
64 | /* |
---|
65 | * The first 16 bits for gather on a byte vector are zero, so if cnt |
---|
66 | * is 32, none of the 16 bytes in data was zero. And, there are (cnt - |
---|
67 | * 16) non-zero bytes in data. |
---|
68 | */ |
---|
69 | } |
---|
70 | /* |
---|
71 | * The first non-zero byte is at ptr aligned down plus the number of |
---|
72 | * non-zero bytes seen. |
---|
73 | */ |
---|
74 | return ((char*) (((int) ptr & ~0xf) + (cnt - 16))); |
---|
75 | } |
---|