sync with libc
This commit is contained in:
jtc
parent
98ce8ab879
commit
b92f5604b7
|
|
@ -1,12 +1,12 @@
|
|||
/* $NetBSD: strcmp.S,v 1.4 1997/05/13 19:32:06 jtc Exp $ */
|
||||
/* $NetBSD: strcmp.S,v 1.5 1997/06/20 02:08:04 jtc Exp $ */
|
||||
|
||||
/*-
|
||||
* Copyright (c) 1990 The Regents of the University of California.
|
||||
* Copyright (c) 1997 The NetBSD Foundation, Inc.
|
||||
* All rights reserved.
|
||||
*
|
||||
* This code is derived from software contributed to Berkeley by
|
||||
* the Systems Programming Group of the University of Utah Computer
|
||||
* Science Department.
|
||||
* This code is derived from software contributed to The NetBSD Foundation
|
||||
* by Hiroshi Horitomo <horimoto@cs-aoi.cs.sist.ac.jp> and
|
||||
* by J.T. Conklin <jtc@netbsd.org>.
|
||||
*
|
||||
* Redistribution and use in source and binary forms, with or without
|
||||
* modification, are permitted provided that the following conditions
|
||||
|
|
@ -18,53 +18,62 @@
|
|||
* documentation and/or other materials provided with the distribution.
|
||||
* 3. All advertising materials mentioning features or use of this software
|
||||
* must display the following acknowledgement:
|
||||
* This product includes software developed by the University of
|
||||
* California, Berkeley and its contributors.
|
||||
* 4. Neither the name of the University nor the names of its contributors
|
||||
* may be used to endorse or promote products derived from this software
|
||||
* without specific prior written permission.
|
||||
* This product includes software developed by the NetBSD
|
||||
* Foundation, Inc. and its contributors.
|
||||
* 4. Neither the name of The NetBSD Foundation nor the names of its
|
||||
* contributors may be used to endorse or promote products derived
|
||||
* from this software without specific prior written permission.
|
||||
*
|
||||
* THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
|
||||
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
|
||||
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
|
||||
* ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
|
||||
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
|
||||
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
|
||||
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
|
||||
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
|
||||
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
|
||||
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
|
||||
* SUCH DAMAGE.
|
||||
* THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
|
||||
* ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
|
||||
* TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
|
||||
* PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
|
||||
* BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
|
||||
* CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
|
||||
* SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
|
||||
* INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
|
||||
* CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
|
||||
* ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
|
||||
* POSSIBILITY OF SUCH DAMAGE.
|
||||
*/
|
||||
|
||||
#include <machine/asm.h>
|
||||
|
||||
#if defined(LIBC_SCCS) && !defined(lint)
|
||||
#if 0
|
||||
RCSID("from: @(#)strcmp.s 5.1 (Berkeley) 5/12/90")
|
||||
#else
|
||||
RCSID("$NetBSD: strcmp.S,v 1.4 1997/05/13 19:32:06 jtc Exp $")
|
||||
#endif
|
||||
RCSID("$NetBSD: strcmp.S,v 1.5 1997/06/20 02:08:04 jtc Exp $")
|
||||
#endif /* LIBC_SCCS and not lint */
|
||||
|
||||
/*
|
||||
* NOTE: this guy returns result compatible with the VAX assembly version.
|
||||
* The C version on the portable gen directory returns different results
|
||||
* (different signs!) when comparing chars with the high bit on. Who is
|
||||
* right??
|
||||
*/
|
||||
ENTRY(strcmp)
|
||||
movl sp@(4),a0 | a0 = string1
|
||||
movl sp@(8),a1 | a1 = string2
|
||||
Lscloop:
|
||||
movb a0@+,d0 | get *string1
|
||||
cmpb a1@+,d0 | compare a byte
|
||||
jne Lscexit | not equal, break out
|
||||
tstb d0 | at end of string1?
|
||||
jne Lscloop | no, keep going
|
||||
moveq #0,d0 | strings are equal
|
||||
rts
|
||||
Lscexit:
|
||||
subb a1@-,d0 | *string1 - *string2
|
||||
movl sp@(4),a0
|
||||
movl sp@(8),a1
|
||||
L1: /* unrolled by 4 for 680[23]0's */
|
||||
movb a0@+,d1
|
||||
jeq L2
|
||||
subb a1@+,d1
|
||||
jne L3
|
||||
|
||||
movb a0@+,d1
|
||||
jeq L2
|
||||
subb a1@+,d1
|
||||
jne L3
|
||||
|
||||
movb a0@+,d1
|
||||
jeq L2
|
||||
subb a1@+,d1
|
||||
jne L3
|
||||
|
||||
movb a0@+,d1
|
||||
jeq L2
|
||||
subb a1@+,d1
|
||||
jeq L1
|
||||
|
||||
scs d0
|
||||
extbl d0
|
||||
movb d1,d0
|
||||
rts
|
||||
|
||||
L2: subb a1@,d1
|
||||
L3: scs d0
|
||||
extbl d0
|
||||
movb d1,d0
|
||||
rts
|
||||
|
|
|
|||
|
|
@ -1,12 +1,12 @@
|
|||
/* $NetBSD: strncmp.S,v 1.4 1997/05/13 19:32:08 jtc Exp $ */
|
||||
/* $NetBSD: strncmp.S,v 1.5 1997/06/20 02:08:05 jtc Exp $ */
|
||||
|
||||
/*-
|
||||
* Copyright (c) 1990 The Regents of the University of California.
|
||||
* Copyright (c) 1997 The NetBSD Foundation, Inc.
|
||||
* All rights reserved.
|
||||
*
|
||||
* This code is derived from software contributed to Berkeley by
|
||||
* the Systems Programming Group of the University of Utah Computer
|
||||
* Science Department.
|
||||
* This code is derived from software contributed to The NetBSD Foundation
|
||||
* by Hiroshi Horitomo <horimoto@cs-aoi.cs.sist.ac.jp> and
|
||||
* by J.T. Conklin <jtc@netbsd.org>.
|
||||
*
|
||||
* Redistribution and use in source and binary forms, with or without
|
||||
* modification, are permitted provided that the following conditions
|
||||
|
|
@ -18,58 +18,68 @@
|
|||
* documentation and/or other materials provided with the distribution.
|
||||
* 3. All advertising materials mentioning features or use of this software
|
||||
* must display the following acknowledgement:
|
||||
* This product includes software developed by the University of
|
||||
* California, Berkeley and its contributors.
|
||||
* 4. Neither the name of the University nor the names of its contributors
|
||||
* may be used to endorse or promote products derived from this software
|
||||
* without specific prior written permission.
|
||||
* This product includes software developed by the NetBSD
|
||||
* Foundation, Inc. and its contributors.
|
||||
* 4. Neither the name of The NetBSD Foundation nor the names of its
|
||||
* contributors may be used to endorse or promote products derived
|
||||
* from this software without specific prior written permission.
|
||||
*
|
||||
* THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
|
||||
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
|
||||
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
|
||||
* ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
|
||||
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
|
||||
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
|
||||
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
|
||||
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
|
||||
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
|
||||
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
|
||||
* SUCH DAMAGE.
|
||||
* THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
|
||||
* ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
|
||||
* TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
|
||||
* PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
|
||||
* BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
|
||||
* CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
|
||||
* SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
|
||||
* INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
|
||||
* CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
|
||||
* ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
|
||||
* POSSIBILITY OF SUCH DAMAGE.
|
||||
*/
|
||||
|
||||
#include <machine/asm.h>
|
||||
|
||||
#if defined(LIBC_SCCS) && !defined(lint)
|
||||
#if 0
|
||||
RCSID("from: @(#)strncmp.s 5.1 (Berkeley) 5/12/90")
|
||||
#else
|
||||
RCSID("$NetBSD: strncmp.S,v 1.4 1997/05/13 19:32:08 jtc Exp $")
|
||||
#endif
|
||||
RCSID("$NetBSD: strncmp.S,v 1.5 1997/06/20 02:08:05 jtc Exp $")
|
||||
#endif /* LIBC_SCCS and not lint */
|
||||
|
||||
/*
|
||||
* NOTE: this guy returns result compatible with the VAX assembly version.
|
||||
* The C version on the portable gen directory returns different results
|
||||
* (different signs!) when comparing chars with the high bit on. Who is
|
||||
* right??
|
||||
*/
|
||||
ENTRY(strncmp)
|
||||
movl sp@(12),d1 | count
|
||||
jeq Lscdone | nothing to do
|
||||
movl sp@(4),a0 | a0 = string1
|
||||
movl sp@(8),a1 | a1 = string2
|
||||
Lscloop:
|
||||
movb a0@+,d0 | get *string1
|
||||
cmpb a1@+,d0 | compare a byte
|
||||
jne Lscexit | not equal, break out
|
||||
tstb d0 | at end of string1?
|
||||
jeq Lscdone | yes, all done
|
||||
subql #1,d1 | no, adjust count
|
||||
jne Lscloop | more to do, keep going
|
||||
Lscdone:
|
||||
moveq #0,d0 | strings are equal
|
||||
rts
|
||||
Lscexit:
|
||||
subb a1@-,d0 | *string1 - *string2
|
||||
movl sp@(12),d0
|
||||
jeq L4
|
||||
movl sp@(4),a0
|
||||
movl sp@(8),a1
|
||||
L1: /* unroll by 4 for m680[23]0's */
|
||||
movb a0@+,d1
|
||||
jeq L2
|
||||
subb a1@+,d1
|
||||
jne L3
|
||||
subql #1,d0
|
||||
jeq L4
|
||||
|
||||
movb a0@+,d1
|
||||
jeq L2
|
||||
subb a1@+,d1
|
||||
jne L3
|
||||
subql #1,d0
|
||||
jeq L4
|
||||
|
||||
movb a0@+,d1
|
||||
jeq L2
|
||||
subb a1@+,d1
|
||||
jne L3
|
||||
subql #1,d0
|
||||
jeq L4
|
||||
|
||||
movb a0@+,d1
|
||||
jeq L2
|
||||
subb a1@+,d1
|
||||
jne L3
|
||||
subql #1,d0
|
||||
jne L1
|
||||
L4: rts
|
||||
|
||||
L2: subb a1@,d1
|
||||
L3: scs d0
|
||||
extbl d0
|
||||
movb d1,d0
|
||||
rts
|
||||
|
|
|
|||
Loading…
Reference in New Issue