strcpy.S revision 5790
11849Swollman/*
21849Swollman * Copyright (c) 1993 Winning Strategies, Inc.
31849Swollman * All rights reserved.
41849Swollman *
51849Swollman * Redistribution and use in source and binary forms, with or without
61849Swollman * modification, are permitted provided that the following conditions
71849Swollman * are met:
81849Swollman * 1. Redistributions of source code must retain the above copyright
91849Swollman *    notice, this list of conditions and the following disclaimer.
101849Swollman * 2. Redistributions in binary form must reproduce the above copyright
111849Swollman *    notice, this list of conditions and the following disclaimer in the
121849Swollman *    documentation and/or other materials provided with the distribution.
131849Swollman * 3. All advertising materials mentioning features or use of this software
141849Swollman *    must display the following acknowledgement:
151849Swollman *      This product includes software developed by Winning Strategies, Inc.
161849Swollman * 4. The name of the author may not be used to endorse or promote products
171849Swollman *    derived from this software withough specific prior written permission
181849Swollman *
191849Swollman * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
201849Swollman * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
211849Swollman * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
221849Swollman * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
231849Swollman * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
241849Swollman * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
251849Swollman * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
261849Swollman * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
271849Swollman * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
281849Swollman * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
291849Swollman *
305790Sdg *	$Id: strcpy.S,v 1.1 1994/08/05 01:18:34 wollman Exp $
311849Swollman */
321849Swollman
331849Swollman#if defined(LIBC_RCS) && !defined(lint)
345790Sdg	.text
355790Sdg        .asciz "$Id: strcpy.S,v 1.1 1994/08/05 01:18:34 wollman Exp $"
361849Swollman#endif /* LIBC_RCS and not lint */
371849Swollman
381849Swollman#include "DEFS.h"
391849Swollman
401849Swollman/*
411849Swollman * strcpy (dst, src)
421849Swollman *	copy the string src to dst.
431849Swollman *
441849Swollman * Written by:
451849Swollman *	J.T. Conklin (jtc@wimsey.com), Winning Strategies, Inc.
461849Swollman */
471849Swollman
481849Swollman/*
491849Swollman * I've unrolled the loop eight times: large enough to make a
501849Swollman * significant difference, and small enough not to totally trash the
511849Swollman * cashe.
521849Swollman */
531849Swollman
541849SwollmanENTRY(strcpy)
551849Swollman	movl	4(%esp),%ecx		/* dst address */
561849Swollman	movl	8(%esp),%edx		/* src address */
571849Swollman	pushl	%ecx			/* push dst address */
581849Swollman
591849Swollman	.align 2,0x90
601849SwollmanL1:	movb	(%edx),%al		/* unroll loop, but not too much */
611849Swollman	movb	%al,(%ecx)
621849Swollman	testb	%al,%al
631849Swollman	je	L2
641849Swollman	movb	1(%edx),%al
651849Swollman	movb	%al,1(%ecx)
661849Swollman	testb	%al,%al
671849Swollman	je	L2
681849Swollman	movb	2(%edx),%al
691849Swollman	movb	%al,2(%ecx)
701849Swollman	testb	%al,%al
711849Swollman	je	L2
721849Swollman	movb	3(%edx),%al
731849Swollman	movb	%al,3(%ecx)
741849Swollman	testb	%al,%al
751849Swollman	je	L2
761849Swollman	movb	4(%edx),%al
771849Swollman	movb	%al,4(%ecx)
781849Swollman	testb	%al,%al
791849Swollman	je	L2
801849Swollman	movb	5(%edx),%al
811849Swollman	movb	%al,5(%ecx)
821849Swollman	testb	%al,%al
831849Swollman	je	L2
841849Swollman	movb	6(%edx),%al
851849Swollman	movb	%al,6(%ecx)
861849Swollman	testb	%al,%al
871849Swollman	je	L2
881849Swollman	movb	7(%edx),%al
891849Swollman	movb	%al,7(%ecx)
901849Swollman	addl	$8,%edx
911849Swollman	addl	$8,%ecx
921849Swollman	testb	%al,%al
931849Swollman	jne	L1
941849SwollmanL2:	popl	%eax			/* pop dst address */
951849Swollman	ret
96