 2635038e5c
			
		
	
	
		2635038e5c
		
	
	
	
	
		
			
			This patch includes the required modifications (summarized in common/lib/libc/minix-port.patch) to make the common part of the NetBSD libc to compile and work under Minix.
		
			
				
	
	
		
			101 lines
		
	
	
		
			1.7 KiB
		
	
	
	
		
			ArmAsm
		
	
	
	
	
	
			
		
		
	
	
			101 lines
		
	
	
		
			1.7 KiB
		
	
	
	
		
			ArmAsm
		
	
	
	
	
	
| /*
 | |
|  * Written by J.T. Conklin <jtc@acorntoolworks.com>
 | |
|  * Public domain.
 | |
|  */
 | |
| 
 | |
| #include <machine/asm.h>
 | |
| 
 | |
| #if defined(LIBC_SCCS)
 | |
| 	RCSID("$NetBSD: strrchr.S,v 1.2 2009/07/17 19:37:57 dsl Exp $")
 | |
| #endif
 | |
| 
 | |
| ENTRY(strrchr)
 | |
| 	pushl	%esi
 | |
| 	pushl	%edi
 | |
| 	pushl	%ebx
 | |
| 	movl	16(%esp),%edx
 | |
| 	movzbl	20(%esp),%ecx
 | |
| 
 | |
| 	/* zero return value */
 | |
| 	xorl	%eax,%eax
 | |
| 
 | |
| 	/*
 | |
| 	 * Align to word boundary.
 | |
| 	 * Consider unrolling loop?
 | |
| 	 */
 | |
| .Lalign:
 | |
| 	testb	$3,%dl
 | |
| 	je	.Lword_aligned
 | |
| 	movb	(%edx),%bl
 | |
| 	cmpb	%cl,%bl
 | |
| 	jne	1f
 | |
| 	movl	%edx,%eax
 | |
| 1:	testb	%bl,%bl
 | |
| 	je	.Ldone
 | |
| 	incl	%edx
 | |
| 	jmp	.Lalign
 | |
| 
 | |
| .Lword_aligned:
 | |
| 	/* copy char to all bytes in word */
 | |
| 	movb	%cl,%ch
 | |
| 	movl	%ecx,%edi
 | |
| 	sall	$16,%ecx
 | |
| 	orl	%edi,%ecx
 | |
| 
 | |
| 	/* Check whether any byte in the word is equal to ch or 0.  */
 | |
| 	_ALIGN_TEXT
 | |
| .Lloop:
 | |
| 	movl	(%edx),%ebx
 | |
| 	addl	$4,%edx
 | |
| 	movl	%ebx,%esi
 | |
| 	leal	-0x01010101(%ebx),%edi
 | |
| 	xorl	%ecx,%esi
 | |
| 	subl	$0x01010101,%esi
 | |
| 	orl	%esi,%edi
 | |
| 	testl	$0x80808080,%edi
 | |
| 	je	.Lloop
 | |
| 
 | |
| 	/*
 | |
| 	 * In rare cases, the above loop may exit prematurely. We must
 | |
| 	 * return to the loop if none of the bytes in the word match
 | |
| 	 * ch or are equal to 0.
 | |
| 	 */
 | |
| 
 | |
| 	_ALIGN_TEXT
 | |
| 	cmpb	%cl,%bl		/* 1st byte == ch? */
 | |
| 	jne	1f
 | |
| 	leal	-4(%edx),%eax
 | |
| 1:	testb	%bl,%bl		/* 1st byte == 0? */
 | |
| 	je	.Ldone
 | |
| 
 | |
| 	cmpb	%cl,%bh		/* 2nd byte == ch? */
 | |
| 	jne	1f
 | |
| 	leal	-3(%edx),%eax
 | |
| 1:	testb	%bh,%bh		/* 2nd byte == 0? */
 | |
| 	je	.Ldone
 | |
| 
 | |
| 	shrl	$16,%ebx
 | |
| 	cmpb	%cl,%bl		/* 3rd byte == ch? */
 | |
| 	jne	1f
 | |
| 	leal	-2(%edx),%eax
 | |
| 1:	testb	%bl,%bl		/* 3rd byte == 0? */
 | |
| 	je	.Ldone
 | |
| 
 | |
| 	cmpb	%cl,%bh		/* 4th byte == ch? */
 | |
| 	jne	1f
 | |
| 	leal	-1(%edx),%eax
 | |
| 1:	testb	%bh,%bh		/* 4th byte == 0? */
 | |
| 	jne	.Lloop
 | |
| 
 | |
| .Ldone:
 | |
| 	popl	%ebx
 | |
| 	popl	%edi
 | |
| 	popl	%esi
 | |
| 	ret
 | |
| 
 | |
| #ifdef __minix
 | |
| STRONG_ALIAS(_C_LABEL(rindex),_C_LABEL(strrchr))
 | |
| #else
 | |
| STRONG_ALIAS(rindex,strrchr)
 | |
| #endif
 |