summaryrefslogtreecommitdiffstats
path: root/newlib/libc/machine/spu/strrchr.c
diff options
context:
space:
mode:
Diffstat (limited to 'newlib/libc/machine/spu/strrchr.c')
-rw-r--r--newlib/libc/machine/spu/strrchr.c115
1 files changed, 0 insertions, 115 deletions
diff --git a/newlib/libc/machine/spu/strrchr.c b/newlib/libc/machine/spu/strrchr.c
deleted file mode 100644
index d31171078..000000000
--- a/newlib/libc/machine/spu/strrchr.c
+++ /dev/null
@@ -1,115 +0,0 @@
-/*
- (C) Copyright 2001,2006,
- International Business Machines Corporation,
- Sony Computer Entertainment, Incorporated,
- Toshiba Corporation,
-
- All rights reserved.
-
- Redistribution and use in source and binary forms, with or without
- modification, are permitted provided that the following conditions are met:
-
- * Redistributions of source code must retain the above copyright notice,
- this list of conditions and the following disclaimer.
- * Redistributions in binary form must reproduce the above copyright
- notice, this list of conditions and the following disclaimer in the
- documentation and/or other materials provided with the distribution.
- * Neither the names of the copyright holders nor the names of their
- contributors may be used to endorse or promote products derived from this
- software without specific prior written permission.
-
- THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
- AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
- LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
- CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
- SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
- INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
- CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
- ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
- POSSIBILITY OF SUCH DAMAGE.
-*/
-#include <spu_intrinsics.h>
-#include <stddef.h>
-#include "vec_literal.h"
-
-/* Scans the string pointed to by s for the character c and
- * returns a pointer to the last occurance of c. If
- * c is not found, then NULL is returned.
- */
-char * strrchr(const char *s, int c)
-{
- int nskip;
- vec_uchar16 *ptr, data, vc;
- vec_uint4 cmp_c, cmp_0, cmp;
- vec_uint4 res_ptr, res_cmp;
- vec_uint4 mask, result;
- vec_uint4 one = spu_splats(0xffffU);
- /* Scan memory array a quadword at a time. Skip leading
- * mis-aligned bytes.
- */
- ptr = (vec_uchar16 *)s;
-
- nskip = -((unsigned int)(ptr) & 15);
- mask = spu_rlmask(one, nskip);
-
- vc = spu_splats((unsigned char)(c));
-
- data = *ptr++;
- ptr = (vec_uchar16 *)((unsigned int)ptr & ~15);
-
- cmp_c = spu_and(spu_gather(spu_cmpeq(data, vc)), mask);
- cmp_0 = spu_and(spu_gather(spu_cmpeq(data, 0)), mask);
-
- res_ptr = spu_splats(0U);
- res_cmp = spu_splats(0U);
-
- while (spu_extract(cmp_0, 0) == 0) {
- cmp = spu_cmpeq(cmp_c, 0);
-
- res_ptr = spu_sel(spu_promote((unsigned int)(ptr), 0), res_ptr, cmp);
- res_cmp = spu_sel(cmp_c, res_cmp, cmp);
-
- data = *ptr++;
-
- cmp_c = spu_gather(spu_cmpeq(data, vc));
- cmp_0 = spu_gather(spu_cmpeq(data, 0));
-
- cmp = spu_cmpeq(cmp_c, 0);
- }
-
- /* Compute the location of the last character before termination
- * character.
- *
- * First mask off compare results following the first termination character.
- */
- mask = spu_sl(one, 31 - spu_extract(spu_cntlz(cmp_0), 0));
- cmp_c = spu_and(cmp_c, mask);
-
- /* Conditionally update res_ptr and res_cmd if a match was found in the last
- * quadword.
- */
- cmp = spu_cmpeq(cmp_c, 0);
-
- res_ptr = spu_sel(spu_promote((unsigned int)(ptr), 0), res_ptr, cmp);
- res_cmp = spu_sel(cmp_c, res_cmp, cmp);
-
- /* Bit reserve res_cmp for locating last occurance.
- */
- mask = spu_cmpeq(res_cmp, 0);
-
- res_cmp = (vec_uint4)spu_maskb(spu_extract(res_cmp, 0));
- res_cmp = spu_gather((vec_uchar16)spu_shuffle(res_cmp, res_cmp,
- VEC_LITERAL(vec_uchar16,
- 15,14,13,12,11,10,9,8,7,6,5,4,3,2,1,0)));
-
- /* Compute the location (ptr) of the last occurance of c. If no
- * occurance was found (ie, element 0 of res_cmp == 0, then return
- * NULL.
- */
- result = spu_sub(spu_add(res_ptr, 15), spu_cntlz(res_cmp));
- result = spu_andc(result, mask);
-
- return ((char *)spu_extract(result, 0));
-}