xref: /titanic_52/usr/src/lib/libc/sparc/crt/stret.s (revision 7c478bd95313f5f23a4c958a745db2134aa03244)
1*7c478bd9Sstevel@tonic-gate/*
2*7c478bd9Sstevel@tonic-gate * CDDL HEADER START
3*7c478bd9Sstevel@tonic-gate *
4*7c478bd9Sstevel@tonic-gate * The contents of this file are subject to the terms of the
5*7c478bd9Sstevel@tonic-gate * Common Development and Distribution License, Version 1.0 only
6*7c478bd9Sstevel@tonic-gate * (the "License").  You may not use this file except in compliance
7*7c478bd9Sstevel@tonic-gate * with the License.
8*7c478bd9Sstevel@tonic-gate *
9*7c478bd9Sstevel@tonic-gate * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
10*7c478bd9Sstevel@tonic-gate * or http://www.opensolaris.org/os/licensing.
11*7c478bd9Sstevel@tonic-gate * See the License for the specific language governing permissions
12*7c478bd9Sstevel@tonic-gate * and limitations under the License.
13*7c478bd9Sstevel@tonic-gate *
14*7c478bd9Sstevel@tonic-gate * When distributing Covered Code, include this CDDL HEADER in each
15*7c478bd9Sstevel@tonic-gate * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
16*7c478bd9Sstevel@tonic-gate * If applicable, add the following below this CDDL HEADER, with the
17*7c478bd9Sstevel@tonic-gate * fields enclosed by brackets "[]" replaced with your own identifying
18*7c478bd9Sstevel@tonic-gate * information: Portions Copyright [yyyy] [name of copyright owner]
19*7c478bd9Sstevel@tonic-gate *
20*7c478bd9Sstevel@tonic-gate * CDDL HEADER END
21*7c478bd9Sstevel@tonic-gate */
22*7c478bd9Sstevel@tonic-gate/*
23*7c478bd9Sstevel@tonic-gate * Copyright (c) 1987 Sun Microsystems, Inc.
24*7c478bd9Sstevel@tonic-gate */
25*7c478bd9Sstevel@tonic-gate
26*7c478bd9Sstevel@tonic-gate#ident	"%Z%%M%	%I%	%E% SMI"
27*7c478bd9Sstevel@tonic-gate
28*7c478bd9Sstevel@tonic-gate	.file	"stret.s"
29*7c478bd9Sstevel@tonic-gate
30*7c478bd9Sstevel@tonic-gate#include <sys/asm_linkage.h>
31*7c478bd9Sstevel@tonic-gate
32*7c478bd9Sstevel@tonic-gate#define FROM	%o0
33*7c478bd9Sstevel@tonic-gate#define SIZE	%o1
34*7c478bd9Sstevel@tonic-gate#define TO	%i0
35*7c478bd9Sstevel@tonic-gate#define MEMWORD	%o3	/* use o-registers as temps */
36*7c478bd9Sstevel@tonic-gate#define TEMP	%o4
37*7c478bd9Sstevel@tonic-gate#define TEMP2	%o5
38*7c478bd9Sstevel@tonic-gate#define UNIMP	0
39*7c478bd9Sstevel@tonic-gate#define MASK	0x00000fff
40*7c478bd9Sstevel@tonic-gate#define STRUCT_VAL_OFF	(16*4)
41*7c478bd9Sstevel@tonic-gate#if STRET4
42*7c478bd9Sstevel@tonic-gate#    define BYTES_PER_MOVE	4
43*7c478bd9Sstevel@tonic-gate#    define LD	ld
44*7c478bd9Sstevel@tonic-gate#    define ST	st
45*7c478bd9Sstevel@tonic-gate	ENTRY2(.stret4,.stret8)
46*7c478bd9Sstevel@tonic-gate#endif
47*7c478bd9Sstevel@tonic-gate#if STRET2
48*7c478bd9Sstevel@tonic-gate#    define BYTES_PER_MOVE	2
49*7c478bd9Sstevel@tonic-gate#    define LD	lduh
50*7c478bd9Sstevel@tonic-gate#    define ST	sth
51*7c478bd9Sstevel@tonic-gate	ENTRY(.stret2)
52*7c478bd9Sstevel@tonic-gate#endif
53*7c478bd9Sstevel@tonic-gate#if STRET1
54*7c478bd9Sstevel@tonic-gate#    define BYTES_PER_MOVE	1
55*7c478bd9Sstevel@tonic-gate#    define LD	ldub
56*7c478bd9Sstevel@tonic-gate#    define ST	stb
57*7c478bd9Sstevel@tonic-gate	ENTRY(.stret1)
58*7c478bd9Sstevel@tonic-gate#endif
59*7c478bd9Sstevel@tonic-gate
60*7c478bd9Sstevel@tonic-gate	/*
61*7c478bd9Sstevel@tonic-gate	 * see if key matches: if not,
62*7c478bd9Sstevel@tonic-gate	 * structure value not expected,
63*7c478bd9Sstevel@tonic-gate	 * so just return
64*7c478bd9Sstevel@tonic-gate	 */
65*7c478bd9Sstevel@tonic-gate	ld	[%i7+8],MEMWORD
66*7c478bd9Sstevel@tonic-gate	and	SIZE,MASK,TEMP
67*7c478bd9Sstevel@tonic-gate	sethi	%hi(UNIMP),TEMP2
68*7c478bd9Sstevel@tonic-gate	or      TEMP,TEMP2,TEMP2
69*7c478bd9Sstevel@tonic-gate	cmp     TEMP2,MEMWORD
70*7c478bd9Sstevel@tonic-gate	bne	.LE12
71*7c478bd9Sstevel@tonic-gate	.empty
72*7c478bd9Sstevel@tonic-gate	/*
73*7c478bd9Sstevel@tonic-gate	 * set expected return value
74*7c478bd9Sstevel@tonic-gate	 */
75*7c478bd9Sstevel@tonic-gate.L14:
76*7c478bd9Sstevel@tonic-gate	ld	[%fp+STRUCT_VAL_OFF],TO		/* (DELAY SLOT) */
77*7c478bd9Sstevel@tonic-gate	/*
78*7c478bd9Sstevel@tonic-gate	 * copy the struct using the same loop the compiler does
79*7c478bd9Sstevel@tonic-gate	 * for large structure assignment
80*7c478bd9Sstevel@tonic-gate	 */
81*7c478bd9Sstevel@tonic-gate.L15:
82*7c478bd9Sstevel@tonic-gate	subcc	SIZE,BYTES_PER_MOVE,SIZE
83*7c478bd9Sstevel@tonic-gate	LD	[FROM+SIZE],TEMP
84*7c478bd9Sstevel@tonic-gate	bg	.L15
85*7c478bd9Sstevel@tonic-gate	ST	TEMP,[TO+SIZE]			/* (DELAY SLOT) */
86*7c478bd9Sstevel@tonic-gate	/* bump return address */
87*7c478bd9Sstevel@tonic-gate	add	%i7,0x4,%i7
88*7c478bd9Sstevel@tonic-gate.LE12:
89*7c478bd9Sstevel@tonic-gate	jmp	%i7+8
90*7c478bd9Sstevel@tonic-gate	restore
91*7c478bd9Sstevel@tonic-gate
92*7c478bd9Sstevel@tonic-gate#if STRET4
93*7c478bd9Sstevel@tonic-gate	SET_SIZE(.stret4)
94*7c478bd9Sstevel@tonic-gate	SET_SIZE(.stret8)
95*7c478bd9Sstevel@tonic-gate#endif
96*7c478bd9Sstevel@tonic-gate#if STRET2
97*7c478bd9Sstevel@tonic-gate	SET_SIZE(.stret2)
98*7c478bd9Sstevel@tonic-gate#endif
99*7c478bd9Sstevel@tonic-gate#if STRET1
100*7c478bd9Sstevel@tonic-gate	SET_SIZE(.stret1)
101*7c478bd9Sstevel@tonic-gate#endif
102