xref: /netbsd-src/lib/libc/arch/i386/string/strncmp.S (revision 4b30c543a0b21e3ba94f2c569e9a82b4fdb2075f)
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 withough 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 *	$Id: strncmp.S,v 1.1 1993/10/07 00:19:35 cgd Exp $
31 */
32
33#if defined(LIBC_RCS) && !defined(lint)
34	.text
35	.asciz "$Id: strncmp.S,v 1.1 1993/10/07 00:19:35 cgd Exp $"
36#endif /* LIBC_RCS and not lint */
37
38#include "DEFS.h"
39
40/*
41 * strncmp(s1, s2, n)
42 *	return an integer greater than, equal to, or less than 0,
43 *	according as the first n characters of string s1 is greater
44 *	than, equal to, or less than the string s2.
45 *
46 * %eax - pointer to s1
47 * %ecx - pointer to s2
48 * %edx - length
49 *
50 * Written by:
51 *	J.T. Conklin (jtc@wimsey.com), Winning Strategies, Inc.
52 */
53
54/*
55 * I've unrolled the loop eight times: large enough to make a
56 * significant difference, and small enough not to totally trash the
57 * cashe.
58 */
59
60ENTRY(strncmp)
61	pushl	%ebx
62	movl	8(%esp),%eax
63	movl	12(%esp),%ecx
64	movl	16(%esp),%edx
65	jmp	L2			/* Jump into the loop! */
66
67	.align 2,0x90
68L1:	incl	%eax
69	incl	%ecx
70	decl	%edx
71L2:	testl	%edx,%edx		/* Have we compared n chars yet? */
72	jle	L4			/* Yes, strings are equal */
73	movb	(%eax),%bl
74	cmpb	$0,%bl
75	je	L3
76	cmpb	%bl,(%ecx)
77	jne	L3
78	incl	%eax
79	incl	%ecx
80	decl	%edx
81	testl	%edx,%edx
82	jle	L4
83	movb	(%eax),%bl
84	cmpb	$0,%bl
85	je	L3
86	cmpb	%bl,(%ecx)
87	jne	L3
88	incl	%eax
89	incl	%ecx
90	decl	%edx
91	testl	%edx,%edx
92	jle	L4
93	movb	(%eax),%bl
94	cmpb	$0,%bl
95	je	L3
96	cmpb	%bl,(%ecx)
97	jne	L3
98	incl	%eax
99	incl	%ecx
100	decl	%edx
101	testl	%edx,%edx
102	jle	L4
103	movb	(%eax),%bl
104	cmpb	$0,%bl
105	je	L3
106	cmpb	%bl,(%ecx)
107	jne	L3
108	incl	%eax
109	incl	%ecx
110	decl	%edx
111	testl	%edx,%edx
112	jle	L4
113	movb	(%eax),%bl
114	cmpb	$0,%bl
115	je	L3
116	cmpb	%bl,(%ecx)
117	jne	L3
118	incl	%eax
119	incl	%ecx
120	decl	%edx
121	testl	%edx,%edx
122	jle	L4
123	movb	(%eax),%bl
124	cmpb	$0,%bl
125	je	L3
126	cmpb	%bl,(%ecx)
127	jne	L3
128	incl	%eax
129	incl	%ecx
130	decl	%edx
131	testl	%edx,%edx
132	jle	L4
133	movb	(%eax),%bl
134	cmpb	$0,%bl
135	je	L3
136	cmpb	%bl,(%ecx)
137	jne	L3
138	incl	%eax
139	incl	%ecx
140	decl	%edx
141	testl	%edx,%edx
142	jle	L4
143	movb	(%eax),%bl
144	cmpb	$0,%bl
145	je	L3
146	cmpb	%bl,(%ecx)
147	je	L1
148	.align 2,0x90
149L3:	movsbl	(%eax),%eax		/* unsigned comparision */
150	movsbl	(%ecx),%ecx
151	subl	%ecx,%eax
152	popl	%ebx
153	ret
154	.align 2,0x90
155L4:	xorl	%eax,%eax
156	popl	%ebx
157	ret
158