.
[glibc/history.git] / sysdeps / x86_64 / strchr.S
blob8833cd0cc4460ebb7384c7ba2a6a032f7d19ca86
1 /* strchr (str, ch) -- Return pointer to first occurrence of CH in STR.
2    For AMD x86-64.
3    Copyright (C) 2009 Free Software Foundation, Inc.
4    This file is part of the GNU C Library.
6    The GNU C Library is free software; you can redistribute it and/or
7    modify it under the terms of the GNU Lesser General Public
8    License as published by the Free Software Foundation; either
9    version 2.1 of the License, or (at your option) any later version.
11    The GNU C Library is distributed in the hope that it will be useful,
12    but WITHOUT ANY WARRANTY; without even the implied warranty of
13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14    Lesser General Public License for more details.
16    You should have received a copy of the GNU Lesser General Public
17    License along with the GNU C Library; if not, write to the Free
18    Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
19    02111-1307 USA.  */
21 #include <sysdep.h>
24         .text
25 ENTRY (strchr)
26         movd    %esi, %xmm1
27         movq    %rdi, %rcx
28         punpcklbw %xmm1, %xmm1
29         andq    $~15, %rdi
30         pxor    %xmm2, %xmm2
31         punpcklbw %xmm1, %xmm1
32         orl     $0xffffffff, %esi
33         movdqa  (%rdi), %xmm0
34         pshufd  $0, %xmm1, %xmm1
35         subq    %rdi, %rcx
36         movdqa  %xmm0, %xmm3
37         leaq    16(%rdi), %rdi
38         pcmpeqb %xmm1, %xmm0
39         pcmpeqb %xmm2, %xmm3
40         shl     %cl, %esi
41         pmovmskb %xmm0, %edx
42         pmovmskb %xmm3, %ecx
43         andl    %esi, %edx
44         andl    %esi, %ecx
45         orl     %edx, %ecx
46         jnz     1f
48 2:      movdqa  (%rdi), %xmm0
49         leaq    16(%rdi), %rdi
50         movdqa  %xmm0, %xmm3
51         pcmpeqb %xmm1, %xmm0
52         pcmpeqb %xmm2, %xmm3
53         pmovmskb %xmm0, %edx
54         pmovmskb %xmm3, %ecx
55         orl     %edx, %ecx
56         jz      2b
58 1:      bsfl    %edx, %edx
59         jz      4f
60         bsfl    %ecx, %ecx
61         leaq    -16(%rdi,%rdx), %rax
62         cmpl    %edx, %ecx
63         je      5f
64 4:      xorl    %eax, %eax
65 5:      ret
66 END (strchr)
68 weak_alias (strchr, index)
69 libc_hidden_builtin_def (strchr)