]> CyberLeo.Net >> Repos - FreeBSD/releng/10.0.git/blob - lib/libc/i386/string/strrchr.S
- Copy stable/10 (r259064) to releng/10.0 as part of the
[FreeBSD/releng/10.0.git] / lib / libc / i386 / string / strrchr.S
1 /*
2  * Copyright (c) 1993 Winning Strategies, Inc.
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  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer.
10  * 2. Redistributions in binary form must reproduce the above copyright
11  *    notice, this list of conditions and the following disclaimer in the
12  *    documentation and/or other materials provided with the distribution.
13  * 3. All advertising materials mentioning features or use of this software
14  *    must display the following acknowledgement:
15  *      This product includes software developed by Winning Strategies, Inc.
16  * 4. The name of the author may not be used to endorse or promote products
17  *    derived from this software without specific prior written permission
18  *
19  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
20  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
21  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
22  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
23  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
24  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
25  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
26  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
27  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
28  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
29  */
30
31 #include <machine/asm.h>
32 __FBSDID("$FreeBSD$");
33
34 /*
35  * strrchr(s, c)
36  *      return a pointer to the last occurrence of the character c in
37  *      string s, or NULL if c does not occur in the string.
38  *
39  * %edx - pointer iterating through string
40  * %eax - pointer to last occurrence of 'c'
41  * %cl  - character we're comparing against
42  * %bl  - character at %edx
43  *
44  * Written by:
45  *      J.T. Conklin (jtc@wimsey.com), Winning Strategies, Inc.
46  */
47
48 ENTRY(strrchr)
49         pushl   %ebx
50         movl    8(%esp),%edx
51         movb    12(%esp),%cl
52         xorl    %eax,%eax               /* init pointer to null */
53         .align 2,0x90
54 L1:
55         movb    (%edx),%bl
56         cmpb    %bl,%cl
57         jne     L2
58         movl    %edx,%eax
59 L2:     
60         incl    %edx
61         testb   %bl,%bl                 /* null terminator??? */
62         jne     L1
63         popl    %ebx
64         ret
65 END(strrchr)
66
67 WEAK_ALIAS(rindex, strrchr)
68
69         .section .note.GNU-stack,"",%progbits