206 lines
		
	
	
		
			3.4 KiB
		
	
	
	
		
			ArmAsm
		
	
	
	
	
	
			
		
		
	
	
			206 lines
		
	
	
		
			3.4 KiB
		
	
	
	
		
			ArmAsm
		
	
	
	
	
	
/*
 | 
						|
 * String handling functions for PowerPC.
 | 
						|
 *
 | 
						|
 * Copyright (C) 1996 Paul Mackerras.
 | 
						|
 *
 | 
						|
 * This program is free software; you can redistribute it and/or
 | 
						|
 * modify it under the terms of the GNU General Public License
 | 
						|
 * as published by the Free Software Foundation; either version
 | 
						|
 * 2 of the License, or (at your option) any later version.
 | 
						|
 */
 | 
						|
#include <asm/processor.h>
 | 
						|
#include <asm/errno.h>
 | 
						|
#include <asm/ppc_asm.h>
 | 
						|
 | 
						|
	.section __ex_table,"a"
 | 
						|
	PPC_LONG_ALIGN
 | 
						|
	.text
 | 
						|
	
 | 
						|
_GLOBAL(strcpy)
 | 
						|
	addi	r5,r3,-1
 | 
						|
	addi	r4,r4,-1
 | 
						|
1:	lbzu	r0,1(r4)
 | 
						|
	cmpwi	0,r0,0
 | 
						|
	stbu	r0,1(r5)
 | 
						|
	bne	1b
 | 
						|
	blr
 | 
						|
 | 
						|
/* This clears out any unused part of the destination buffer,
 | 
						|
   just as the libc version does.  -- paulus */
 | 
						|
_GLOBAL(strncpy)
 | 
						|
	cmpwi	0,r5,0
 | 
						|
	beqlr
 | 
						|
	mtctr	r5
 | 
						|
	addi	r6,r3,-1
 | 
						|
	addi	r4,r4,-1
 | 
						|
1:	lbzu	r0,1(r4)
 | 
						|
	cmpwi	0,r0,0
 | 
						|
	stbu	r0,1(r6)
 | 
						|
	bdnzf	2,1b		/* dec ctr, branch if ctr != 0 && !cr0.eq */
 | 
						|
	bnelr			/* if we didn't hit a null char, we're done */
 | 
						|
	mfctr	r5
 | 
						|
	cmpwi	0,r5,0		/* any space left in destination buffer? */
 | 
						|
	beqlr			/* we know r0 == 0 here */
 | 
						|
2:	stbu	r0,1(r6)	/* clear it out if so */
 | 
						|
	bdnz	2b
 | 
						|
	blr
 | 
						|
 | 
						|
_GLOBAL(strcat)
 | 
						|
	addi	r5,r3,-1
 | 
						|
	addi	r4,r4,-1
 | 
						|
1:	lbzu	r0,1(r5)
 | 
						|
	cmpwi	0,r0,0
 | 
						|
	bne	1b
 | 
						|
	addi	r5,r5,-1
 | 
						|
1:	lbzu	r0,1(r4)
 | 
						|
	cmpwi	0,r0,0
 | 
						|
	stbu	r0,1(r5)
 | 
						|
	bne	1b
 | 
						|
	blr
 | 
						|
 | 
						|
_GLOBAL(strcmp)
 | 
						|
	addi	r5,r3,-1
 | 
						|
	addi	r4,r4,-1
 | 
						|
1:	lbzu	r3,1(r5)
 | 
						|
	cmpwi	1,r3,0
 | 
						|
	lbzu	r0,1(r4)
 | 
						|
	subf.	r3,r0,r3
 | 
						|
	beqlr	1
 | 
						|
	beq	1b
 | 
						|
	blr
 | 
						|
 | 
						|
_GLOBAL(strncmp)
 | 
						|
	PPC_LCMPI r5,0
 | 
						|
	beqlr
 | 
						|
	mtctr	r5
 | 
						|
	addi	r5,r3,-1
 | 
						|
	addi	r4,r4,-1
 | 
						|
1:	lbzu	r3,1(r5)
 | 
						|
	cmpwi	1,r3,0
 | 
						|
	lbzu	r0,1(r4)
 | 
						|
	subf.	r3,r0,r3
 | 
						|
	beqlr	1
 | 
						|
	bdnzt	eq,1b
 | 
						|
	blr
 | 
						|
 | 
						|
_GLOBAL(strlen)
 | 
						|
	addi	r4,r3,-1
 | 
						|
1:	lbzu	r0,1(r4)
 | 
						|
	cmpwi	0,r0,0
 | 
						|
	bne	1b
 | 
						|
	subf	r3,r3,r4
 | 
						|
	blr
 | 
						|
 | 
						|
_GLOBAL(memcmp)
 | 
						|
	cmpwi	0,r5,0
 | 
						|
	ble-	2f
 | 
						|
	mtctr	r5
 | 
						|
	addi	r6,r3,-1
 | 
						|
	addi	r4,r4,-1
 | 
						|
1:	lbzu	r3,1(r6)
 | 
						|
	lbzu	r0,1(r4)
 | 
						|
	subf.	r3,r0,r3
 | 
						|
	bdnzt	2,1b
 | 
						|
	blr
 | 
						|
2:	li	r3,0
 | 
						|
	blr
 | 
						|
 | 
						|
_GLOBAL(memchr)
 | 
						|
	cmpwi	0,r5,0
 | 
						|
	ble-	2f
 | 
						|
	mtctr	r5
 | 
						|
	addi	r3,r3,-1
 | 
						|
1:	lbzu	r0,1(r3)
 | 
						|
	cmpw	0,r0,r4
 | 
						|
	bdnzf	2,1b
 | 
						|
	beqlr
 | 
						|
2:	li	r3,0
 | 
						|
	blr
 | 
						|
 | 
						|
_GLOBAL(__clear_user)
 | 
						|
	addi	r6,r3,-4
 | 
						|
	li	r3,0
 | 
						|
	li	r5,0
 | 
						|
	cmplwi	0,r4,4
 | 
						|
	blt	7f
 | 
						|
	/* clear a single word */
 | 
						|
11:	stwu	r5,4(r6)
 | 
						|
	beqlr
 | 
						|
	/* clear word sized chunks */
 | 
						|
	andi.	r0,r6,3
 | 
						|
	add	r4,r0,r4
 | 
						|
	subf	r6,r0,r6
 | 
						|
	srwi	r0,r4,2
 | 
						|
	andi.	r4,r4,3
 | 
						|
	mtctr	r0
 | 
						|
	bdz	7f
 | 
						|
1:	stwu	r5,4(r6)
 | 
						|
	bdnz	1b
 | 
						|
	/* clear byte sized chunks */
 | 
						|
7:	cmpwi	0,r4,0
 | 
						|
	beqlr
 | 
						|
	mtctr	r4
 | 
						|
	addi	r6,r6,3
 | 
						|
8:	stbu	r5,1(r6)
 | 
						|
	bdnz	8b
 | 
						|
	blr
 | 
						|
90:	mr	r3,r4
 | 
						|
	blr
 | 
						|
91:	mfctr	r3
 | 
						|
	slwi	r3,r3,2
 | 
						|
	add	r3,r3,r4
 | 
						|
	blr
 | 
						|
92:	mfctr	r3
 | 
						|
	blr
 | 
						|
 | 
						|
	.section __ex_table,"a"
 | 
						|
	PPC_LONG	11b,90b
 | 
						|
	PPC_LONG	1b,91b
 | 
						|
	PPC_LONG	8b,92b
 | 
						|
	.text
 | 
						|
 | 
						|
_GLOBAL(__strncpy_from_user)
 | 
						|
	addi	r6,r3,-1
 | 
						|
	addi	r4,r4,-1
 | 
						|
	cmpwi	0,r5,0
 | 
						|
	beq	2f
 | 
						|
	mtctr	r5
 | 
						|
1:	lbzu	r0,1(r4)
 | 
						|
	cmpwi	0,r0,0
 | 
						|
	stbu	r0,1(r6)
 | 
						|
	bdnzf	2,1b		/* dec ctr, branch if ctr != 0 && !cr0.eq */
 | 
						|
	beq	3f
 | 
						|
2:	addi	r6,r6,1
 | 
						|
3:	subf	r3,r3,r6
 | 
						|
	blr
 | 
						|
99:	li	r3,-EFAULT
 | 
						|
	blr
 | 
						|
 | 
						|
	.section __ex_table,"a"
 | 
						|
	PPC_LONG	1b,99b
 | 
						|
	.text
 | 
						|
 | 
						|
/* r3 = str, r4 = len (> 0), r5 = top (highest addr) */
 | 
						|
_GLOBAL(__strnlen_user)
 | 
						|
	addi	r7,r3,-1
 | 
						|
	subf	r6,r7,r5	/* top+1 - str */
 | 
						|
	cmplw	0,r4,r6
 | 
						|
	bge	0f
 | 
						|
	mr	r6,r4
 | 
						|
0:	mtctr	r6		/* ctr = min(len, top - str) */
 | 
						|
1:	lbzu	r0,1(r7)	/* get next byte */
 | 
						|
	cmpwi	0,r0,0
 | 
						|
	bdnzf	2,1b		/* loop if --ctr != 0 && byte != 0 */
 | 
						|
	addi	r7,r7,1
 | 
						|
	subf	r3,r3,r7	/* number of bytes we have looked at */
 | 
						|
	beqlr			/* return if we found a 0 byte */
 | 
						|
	cmpw	0,r3,r4		/* did we look at all len bytes? */
 | 
						|
	blt	99f		/* if not, must have hit top */
 | 
						|
	addi	r3,r4,1		/* return len + 1 to indicate no null found */
 | 
						|
	blr
 | 
						|
99:	li	r3,0		/* bad address, return 0 */
 | 
						|
	blr
 | 
						|
 | 
						|
	.section __ex_table,"a"
 | 
						|
	PPC_LONG	1b,99b
 |