OpenCores
URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [newlib-1.17.0/] [newlib/] [libc/] [machine/] [i386/] [memchr.S] - Blame information for rev 855

Go to most recent revision | Details | Compare with Previous | View Log

Line No. Rev Author Line
1 148 jeremybenn 
/*
2 
 * ====================================================
3 
 * Copyright (C) 1998, 2002, 2008 by Red Hat Inc. All rights reserved.
4 
 *
5 
 * Permission to use, copy, modify, and distribute this
6 
 * software is freely granted, provided that this notice
7 
 * is preserved.
8 
 * ====================================================
9 
 */
10 
 
11 
        #include "i386mach.h"
12 
 
13 
        .global SYM (memchr)
14 
       SOTYPE_FUNCTION(memchr)
15 
 
16 
SYM (memchr):
17 
        pushl   ebp
18 
        movl    esp,ebp
19 
        pushl   edi
20 
        movzbl  12(ebp),eax
21 
        movl    16(ebp),ecx
22 
        movl    8(ebp),edi
23 
 
24 
        xorl    edx,edx
25 
        testl   ecx,ecx
26 
        jz      L20
27 
 
28 
#ifdef __OPTIMIZE_SIZE__
29 
 
30 
        cld
31 
        repnz
32 
        scasb
33 
 
34 
        setnz   dl
35 
        decl    edi
36 
 
37 
#else /* !__OPTIMIZE_SIZE__ */
38 
/* Do byte-wise checks until string is aligned.  */
39 
        testl   $3,edi
40 
        je      L5
41 
        cmpb    (edi),al
42 
        je      L15
43 
        incl    edi
44 
        decl    ecx
45 
        je      L20
46 
 
47 
        testl   $3,edi
48 
        je      L5
49 
        cmpb    (edi),al
50 
        je      L15
51 
        incl    edi
52 
        decl    ecx
53 
        je      L20
54 
 
55 
        testl   $3,edi
56 
        je      L5
57 
        cmpb    (edi),al
58 
        je      L15
59 
        incl    edi
60 
        decl    ecx
61 
        je      L20
62 
 
63 
/* Create a mask, then check a word at a time.  */
64 
L5:
65 
        movb    al,ah
66 
        movl    eax,edx
67 
        sall    $16,edx
68 
        orl     edx,eax
69 
        pushl   ebx
70 
 
71 
        .p2align 4,,7
72 
L8:
73 
        subl    $4,ecx
74 
        jc      L9
75 
        movl    (edi),edx
76 
        addl    $4,edi
77 
        xorl    eax,edx
78 
        leal    -16843009(edx),ebx
79 
        notl    edx
80 
        andl    edx,ebx
81 
        testl   $-2139062144,ebx
82 
        je      L8
83 
 
84 
        subl    $4,edi
85 
 
86 
L9:
87 
        popl    ebx
88 
        xorl    edx,edx
89 
        addl    $4,ecx
90 
        je      L20
91 
 
92 
/* Final byte-wise checks.  */
93 
        .p2align 4,,7
94 
L10:
95 
        cmpb    (edi),al
96 
        je      L15
97 
        incl    edi
98 
        decl    ecx
99 
        jne     L10
100 
 
101 
        xorl    edi,edi
102 
 
103 
#endif /* !__OPTIMIZE_SIZE__ */
104 
 
105 
L15:
106 
        decl    edx
107 
        andl    edi,edx
108 
L20:
109 
        movl    edx,eax
110 
 
111 
        leal    -4(ebp),esp
112 
        popl    edi
113 
        leave
114 
        ret

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.