memchr.S (4809) | memchr.S (4811) |
---|---|
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 --- 13 unchanged lines hidden (view full) --- 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 * | 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 --- 13 unchanged lines hidden (view full) --- 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 * $Id: memchr.S,v 1.2 1994/10/27 11:36:11 bde Exp $ | 30 * $Id: memchr.S,v 1.3 1994/11/25 04:11:19 davidg Exp $ |
31 */ 32 33#if defined(LIBC_RCS) && !defined(lint) | 31 */ 32 33#if defined(LIBC_RCS) && !defined(lint) |
34 .asciz "$Id: memchr.S,v 1.2 1994/10/27 11:36:11 bde Exp $" | 34 .asciz "$Id: memchr.S,v 1.3 1994/11/25 04:11:19 davidg Exp $" |
35#endif /* LIBC_RCS and not lint */ 36 37#include "DEFS.h" 38 39/* 40 * memchr (b, c, len) 41 * locates the first occurance of c in string b. 42 * 43 * Written by: 44 * J.T. Conklin (jtc@wimsey.com), Winning Strategies, Inc. 45 */ 46 47ENTRY(memchr) 48 pushl %edi 49 movl 8(%esp),%edi /* string address */ 50 movl 12(%esp),%eax /* set character to search for */ 51 movl 16(%esp),%ecx /* set length of search */ | 35#endif /* LIBC_RCS and not lint */ 36 37#include "DEFS.h" 38 39/* 40 * memchr (b, c, len) 41 * locates the first occurance of c in string b. 42 * 43 * Written by: 44 * J.T. Conklin (jtc@wimsey.com), Winning Strategies, Inc. 45 */ 46 47ENTRY(memchr) 48 pushl %edi 49 movl 8(%esp),%edi /* string address */ 50 movl 12(%esp),%eax /* set character to search for */ 51 movl 16(%esp),%ecx /* set length of search */ |
52 testl %ecx,%ecx /* return NULL if len == 0 */ 53 jz L1 | 52 testl %esp,%esp /* clear Z flag, for len == 0 */ |
54 cld /* set search forward */ 55 repne /* search! */ 56 scasb 57 jnz L1 /* scan failed, return null */ 58 leal -1(%edi),%eax /* adjust result of scan */ 59 popl %edi 60 ret 61 .align 2,0x90 62L1: xorl %eax,%eax 63 popl %edi 64 ret | 53 cld /* set search forward */ 54 repne /* search! */ 55 scasb 56 jnz L1 /* scan failed, return null */ 57 leal -1(%edi),%eax /* adjust result of scan */ 58 popl %edi 59 ret 60 .align 2,0x90 61L1: xorl %eax,%eax 62 popl %edi 63 ret |