Linux Audio

Check our new training course

Loading...
v6.2
  1/* SPDX-License-Identifier: GPL-2.0 */
  2/* U1memcpy.S: UltraSPARC-I/II/IIi/IIe optimized memcpy.
  3 *
  4 * Copyright (C) 1997, 2004 David S. Miller (davem@redhat.com)
  5 * Copyright (C) 1996, 1997, 1998, 1999 Jakub Jelinek (jj@ultra.linux.cz)
  6 */
  7
  8#ifdef __KERNEL__
  9#include <linux/linkage.h>
 10#include <asm/visasm.h>
 11#include <asm/asi.h>
 12#include <asm/export.h>
 13#define GLOBAL_SPARE	g7
 14#else
 15#define GLOBAL_SPARE	g5
 16#define ASI_BLK_P 0xf0
 17#define FPRS_FEF  0x04
 18#ifdef MEMCPY_DEBUG
 19#define VISEntry rd %fprs, %o5; wr %g0, FPRS_FEF, %fprs; \
 20		 clr %g1; clr %g2; clr %g3; subcc %g0, %g0, %g0;
 21#define VISExit and %o5, FPRS_FEF, %o5; wr %o5, 0x0, %fprs
 22#else
 23#define VISEntry rd %fprs, %o5; wr %g0, FPRS_FEF, %fprs
 24#define VISExit and %o5, FPRS_FEF, %o5; wr %o5, 0x0, %fprs
 25#endif
 26#endif
 27
 28#ifndef EX_LD
 29#define EX_LD(x,y)	x
 30#endif
 31#ifndef EX_LD_FP
 32#define EX_LD_FP(x,y)	x
 33#endif
 34
 35#ifndef EX_ST
 36#define EX_ST(x,y)	x
 37#endif
 38#ifndef EX_ST_FP
 39#define EX_ST_FP(x,y)	x
 
 40#endif
 41
 42#ifndef LOAD
 43#define LOAD(type,addr,dest)	type [addr], dest
 44#endif
 45
 46#ifndef LOAD_BLK
 47#define LOAD_BLK(addr,dest)	ldda [addr] ASI_BLK_P, dest
 48#endif
 49
 50#ifndef STORE
 51#define STORE(type,src,addr)	type src, [addr]
 52#endif
 53
 54#ifndef STORE_BLK
 55#define STORE_BLK(src,addr)	stda src, [addr] ASI_BLK_P
 56#endif
 57
 58#ifndef FUNC_NAME
 59#define FUNC_NAME	memcpy
 60#endif
 61
 62#ifndef PREAMBLE
 63#define PREAMBLE
 64#endif
 65
 66#ifndef XCC
 67#define XCC xcc
 68#endif
 69
 70#define FREG_FROB(f1, f2, f3, f4, f5, f6, f7, f8, f9)		\
 71	faligndata		%f1, %f2, %f48;			\
 72	faligndata		%f2, %f3, %f50;			\
 73	faligndata		%f3, %f4, %f52;			\
 74	faligndata		%f4, %f5, %f54;			\
 75	faligndata		%f5, %f6, %f56;			\
 76	faligndata		%f6, %f7, %f58;			\
 77	faligndata		%f7, %f8, %f60;			\
 78	faligndata		%f8, %f9, %f62;
 79
 80#define MAIN_LOOP_CHUNK(src, dest, fdest, fsrc, jmptgt)			\
 81	EX_LD_FP(LOAD_BLK(%src, %fdest), U1_gs_80_fp);			\
 82	EX_ST_FP(STORE_BLK(%fsrc, %dest), U1_gs_80_fp);			\
 83	add			%src, 0x40, %src;			\
 84	subcc			%GLOBAL_SPARE, 0x40, %GLOBAL_SPARE;	\
 85	be,pn			%xcc, jmptgt;				\
 86	 add			%dest, 0x40, %dest;			\
 87
 88#define LOOP_CHUNK1(src, dest, branch_dest)		\
 89	MAIN_LOOP_CHUNK(src, dest, f0,  f48, branch_dest)
 90#define LOOP_CHUNK2(src, dest, branch_dest)		\
 91	MAIN_LOOP_CHUNK(src, dest, f16, f48, branch_dest)
 92#define LOOP_CHUNK3(src, dest, branch_dest)		\
 93	MAIN_LOOP_CHUNK(src, dest, f32, f48, branch_dest)
 94
 95#define DO_SYNC			membar	#Sync;
 96#define STORE_SYNC(dest, fsrc)				\
 97	EX_ST_FP(STORE_BLK(%fsrc, %dest), U1_gs_80_fp);	\
 98	add			%dest, 0x40, %dest;	\
 99	DO_SYNC
100
101#define STORE_JUMP(dest, fsrc, target)			\
102	EX_ST_FP(STORE_BLK(%fsrc, %dest), U1_gs_40_fp);	\
103	add			%dest, 0x40, %dest;	\
104	ba,pt			%xcc, target;		\
105	 nop;
106
107#define FINISH_VISCHUNK(dest, f0, f1)			\
108	subcc			%g3, 8, %g3;		\
109	bl,pn			%xcc, 95f;		\
110	 faligndata		%f0, %f1, %f48;		\
111	EX_ST_FP(STORE(std, %f48, %dest), U1_g3_8_fp);	\
112	add			%dest, 8, %dest;
113
114#define UNEVEN_VISCHUNK_LAST(dest, f0, f1)	\
115	subcc			%g3, 8, %g3;	\
116	bl,pn			%xcc, 95f;	\
117	 fsrc2			%f0, %f1;
118
119#define UNEVEN_VISCHUNK(dest, f0, f1)		\
120	UNEVEN_VISCHUNK_LAST(dest, f0, f1)	\
121	ba,a,pt			%xcc, 93f;
122
123	.register	%g2,#scratch
124	.register	%g3,#scratch
125
126	.text
127#ifndef EX_RETVAL
128#define EX_RETVAL(x)	x
129ENTRY(U1_g1_1_fp)
130	VISExitHalf
131	add		%g1, 1, %g1
132	add		%g1, %g2, %g1
133	retl
134	 add		%g1, %o2, %o0
135ENDPROC(U1_g1_1_fp)
136ENTRY(U1_g2_0_fp)
137	VISExitHalf
138	retl
139	 add		%g2, %o2, %o0
140ENDPROC(U1_g2_0_fp)
141ENTRY(U1_g2_8_fp)
142	VISExitHalf
143	add		%g2, 8, %g2
144	retl
145	 add		%g2, %o2, %o0
146ENDPROC(U1_g2_8_fp)
147ENTRY(U1_gs_0_fp)
148	VISExitHalf
149	add		%GLOBAL_SPARE, %g3, %o0
150	retl
151	 add		%o0, %o2, %o0
152ENDPROC(U1_gs_0_fp)
153ENTRY(U1_gs_80_fp)
154	VISExitHalf
155	add		%GLOBAL_SPARE, 0x80, %GLOBAL_SPARE
156	add		%GLOBAL_SPARE, %g3, %o0
157	retl
158	 add		%o0, %o2, %o0
159ENDPROC(U1_gs_80_fp)
160ENTRY(U1_gs_40_fp)
161	VISExitHalf
162	add		%GLOBAL_SPARE, 0x40, %GLOBAL_SPARE
163	add		%GLOBAL_SPARE, %g3, %o0
164	retl
165	 add		%o0, %o2, %o0
166ENDPROC(U1_gs_40_fp)
167ENTRY(U1_g3_0_fp)
168	VISExitHalf
169	retl
170	 add		%g3, %o2, %o0
171ENDPROC(U1_g3_0_fp)
172ENTRY(U1_g3_8_fp)
173	VISExitHalf
174	add		%g3, 8, %g3
175	retl
176	 add		%g3, %o2, %o0
177ENDPROC(U1_g3_8_fp)
178ENTRY(U1_o2_0_fp)
179	VISExitHalf
180	retl
181	 mov		%o2, %o0
182ENDPROC(U1_o2_0_fp)
183ENTRY(U1_o2_1_fp)
184	VISExitHalf
185	retl
186	 add		%o2, 1, %o0
187ENDPROC(U1_o2_1_fp)
188ENTRY(U1_gs_0)
189	VISExitHalf
190	retl
191	 add		%GLOBAL_SPARE, %o2, %o0
192ENDPROC(U1_gs_0)
193ENTRY(U1_gs_8)
194	VISExitHalf
195	add		%GLOBAL_SPARE, %o2, %GLOBAL_SPARE
196	retl
197	 add		%GLOBAL_SPARE, 0x8, %o0
198ENDPROC(U1_gs_8)
199ENTRY(U1_gs_10)
200	VISExitHalf
201	add		%GLOBAL_SPARE, %o2, %GLOBAL_SPARE
202	retl
203	 add		%GLOBAL_SPARE, 0x10, %o0
204ENDPROC(U1_gs_10)
205ENTRY(U1_o2_0)
206	retl
207	 mov		%o2, %o0
208ENDPROC(U1_o2_0)
209ENTRY(U1_o2_8)
210	retl
211	 add		%o2, 8, %o0
212ENDPROC(U1_o2_8)
213ENTRY(U1_o2_4)
214	retl
215	 add		%o2, 4, %o0
216ENDPROC(U1_o2_4)
217ENTRY(U1_o2_1)
218	retl
219	 add		%o2, 1, %o0
220ENDPROC(U1_o2_1)
221ENTRY(U1_g1_0)
222	retl
223	 add		%g1, %o2, %o0
224ENDPROC(U1_g1_0)
225ENTRY(U1_g1_1)
226	add		%g1, 1, %g1
227	retl
228	 add		%g1, %o2, %o0
229ENDPROC(U1_g1_1)
230ENTRY(U1_gs_0_o2_adj)
231	and		%o2, 7, %o2
232	retl
233	 add		%GLOBAL_SPARE, %o2, %o0
234ENDPROC(U1_gs_0_o2_adj)
235ENTRY(U1_gs_8_o2_adj)
236	and		%o2, 7, %o2
237	add		%GLOBAL_SPARE, 8, %GLOBAL_SPARE
238	retl
239	 add		%GLOBAL_SPARE, %o2, %o0
240ENDPROC(U1_gs_8_o2_adj)
241#endif
242
243	.align		64
244
245	.globl		FUNC_NAME
246	.type		FUNC_NAME,#function
247FUNC_NAME:		/* %o0=dst, %o1=src, %o2=len */
248	srlx		%o2, 31, %g2
249	cmp		%g2, 0
250	tne		%xcc, 5
251	PREAMBLE
252	mov		%o0, %o4
253	cmp		%o2, 0
254	be,pn		%XCC, 85f
255	 or		%o0, %o1, %o3
256	cmp		%o2, 16
257	blu,a,pn	%XCC, 80f
258	 or		%o3, %o2, %o3
259
260	cmp		%o2, (5 * 64)
261	blu,pt		%XCC, 70f
262	 andcc		%o3, 0x7, %g0
263
264	/* Clobbers o5/g1/g2/g3/g7/icc/xcc.  */
265	VISEntry
266
267	/* Is 'dst' already aligned on an 64-byte boundary? */
268	andcc		%o0, 0x3f, %g2
269	be,pt		%XCC, 2f
270
271	/* Compute abs((dst & 0x3f) - 0x40) into %g2.  This is the number
272	 * of bytes to copy to make 'dst' 64-byte aligned.  We pre-
273	 * subtract this from 'len'.
274	 */
275	 sub		%o0, %o1, %GLOBAL_SPARE
276	sub		%g2, 0x40, %g2
277	sub		%g0, %g2, %g2
278	sub		%o2, %g2, %o2
279	andcc		%g2, 0x7, %g1
280	be,pt		%icc, 2f
281	 and		%g2, 0x38, %g2
282
2831:	subcc		%g1, 0x1, %g1
284	EX_LD_FP(LOAD(ldub, %o1 + 0x00, %o3), U1_g1_1_fp)
285	EX_ST_FP(STORE(stb, %o3, %o1 + %GLOBAL_SPARE), U1_g1_1_fp)
286	bgu,pt		%XCC, 1b
287	 add		%o1, 0x1, %o1
288
289	add		%o1, %GLOBAL_SPARE, %o0
290
2912:	cmp		%g2, 0x0
292	and		%o1, 0x7, %g1
293	be,pt		%icc, 3f
294	 alignaddr	%o1, %g0, %o1
295
296	EX_LD_FP(LOAD(ldd, %o1, %f4), U1_g2_0_fp)
2971:	EX_LD_FP(LOAD(ldd, %o1 + 0x8, %f6), U1_g2_0_fp)
298	add		%o1, 0x8, %o1
299	subcc		%g2, 0x8, %g2
300	faligndata	%f4, %f6, %f0
301	EX_ST_FP(STORE(std, %f0, %o0), U1_g2_8_fp)
302	be,pn		%icc, 3f
303	 add		%o0, 0x8, %o0
304
305	EX_LD_FP(LOAD(ldd, %o1 + 0x8, %f4), U1_g2_0_fp)
306	add		%o1, 0x8, %o1
307	subcc		%g2, 0x8, %g2
308	faligndata	%f6, %f4, %f0
309	EX_ST_FP(STORE(std, %f0, %o0), U1_g2_8_fp)
310	bne,pt		%icc, 1b
311	 add		%o0, 0x8, %o0
312
313	/* Destination is 64-byte aligned.  */
3143:	
315	membar		  #LoadStore | #StoreStore | #StoreLoad
316
317	subcc		%o2, 0x40, %GLOBAL_SPARE
318	add		%o1, %g1, %g1
319	andncc		%GLOBAL_SPARE, (0x40 - 1), %GLOBAL_SPARE
320	srl		%g1, 3, %g2
321	sub		%o2, %GLOBAL_SPARE, %g3
322	andn		%o1, (0x40 - 1), %o1
323	and		%g2, 7, %g2
324	andncc		%g3, 0x7, %g3
325	fsrc2		%f0, %f2
326	sub		%g3, 0x8, %g3
327	sub		%o2, %GLOBAL_SPARE, %o2
328
329	add		%g1, %GLOBAL_SPARE, %g1
330	subcc		%o2, %g3, %o2
331
332	EX_LD_FP(LOAD_BLK(%o1, %f0), U1_gs_0_fp)
333	add		%o1, 0x40, %o1
334	add		%g1, %g3, %g1
335	EX_LD_FP(LOAD_BLK(%o1, %f16), U1_gs_0_fp)
336	add		%o1, 0x40, %o1
337	sub		%GLOBAL_SPARE, 0x80, %GLOBAL_SPARE
338	EX_LD_FP(LOAD_BLK(%o1, %f32), U1_gs_80_fp)
339	add		%o1, 0x40, %o1
340
341	/* There are 8 instances of the unrolled loop,
342	 * one for each possible alignment of the
343	 * source buffer.  Each loop instance is 452
344	 * bytes.
345	 */
346	sll		%g2, 3, %o3
347	sub		%o3, %g2, %o3
348	sllx		%o3, 4, %o3
349	add		%o3, %g2, %o3
350	sllx		%o3, 2, %g2
3511:	rd		%pc, %o3
352	add		%o3, %lo(1f - 1b), %o3
353	jmpl		%o3 + %g2, %g0
354	 nop
355
356	.align		64
3571:	FREG_FROB(f0, f2, f4, f6, f8, f10,f12,f14,f16)
358	LOOP_CHUNK1(o1, o0, 1f)
359	FREG_FROB(f16,f18,f20,f22,f24,f26,f28,f30,f32)
360	LOOP_CHUNK2(o1, o0, 2f)
361	FREG_FROB(f32,f34,f36,f38,f40,f42,f44,f46,f0)
362	LOOP_CHUNK3(o1, o0, 3f)
363	ba,pt		%xcc, 1b+4
364	 faligndata	%f0, %f2, %f48
3651:	FREG_FROB(f16,f18,f20,f22,f24,f26,f28,f30,f32)
366	STORE_SYNC(o0, f48)
367	FREG_FROB(f32,f34,f36,f38,f40,f42,f44,f46,f0)
368	STORE_JUMP(o0, f48, 40f)
3692:	FREG_FROB(f32,f34,f36,f38,f40,f42,f44,f46,f0)
370	STORE_SYNC(o0, f48)
371	FREG_FROB(f0, f2, f4, f6, f8, f10,f12,f14,f16)
372	STORE_JUMP(o0, f48, 48f)
3733:	FREG_FROB(f0, f2, f4, f6, f8, f10,f12,f14,f16)
374	STORE_SYNC(o0, f48)
375	FREG_FROB(f16,f18,f20,f22,f24,f26,f28,f30,f32)
376	STORE_JUMP(o0, f48, 56f)
377
3781:	FREG_FROB(f2, f4, f6, f8, f10,f12,f14,f16,f18)
379	LOOP_CHUNK1(o1, o0, 1f)
380	FREG_FROB(f18,f20,f22,f24,f26,f28,f30,f32,f34)
381	LOOP_CHUNK2(o1, o0, 2f)
382	FREG_FROB(f34,f36,f38,f40,f42,f44,f46,f0, f2)
383	LOOP_CHUNK3(o1, o0, 3f)
384	ba,pt		%xcc, 1b+4
385	 faligndata	%f2, %f4, %f48
3861:	FREG_FROB(f18,f20,f22,f24,f26,f28,f30,f32,f34)
387	STORE_SYNC(o0, f48)
388	FREG_FROB(f34,f36,f38,f40,f42,f44,f46,f0, f2)
389	STORE_JUMP(o0, f48, 41f)
3902:	FREG_FROB(f34,f36,f38,f40,f42,f44,f46,f0, f2)
391	STORE_SYNC(o0, f48)
392	FREG_FROB(f2, f4, f6, f8, f10,f12,f14,f16,f18)
393	STORE_JUMP(o0, f48, 49f)
3943:	FREG_FROB(f2, f4, f6, f8, f10,f12,f14,f16,f18)
395	STORE_SYNC(o0, f48)
396	FREG_FROB(f18,f20,f22,f24,f26,f28,f30,f32,f34)
397	STORE_JUMP(o0, f48, 57f)
398
3991:	FREG_FROB(f4, f6, f8, f10,f12,f14,f16,f18,f20)
400	LOOP_CHUNK1(o1, o0, 1f)
401	FREG_FROB(f20,f22,f24,f26,f28,f30,f32,f34,f36)
402	LOOP_CHUNK2(o1, o0, 2f)
403	FREG_FROB(f36,f38,f40,f42,f44,f46,f0, f2, f4)
404	LOOP_CHUNK3(o1, o0, 3f)
405	ba,pt		%xcc, 1b+4
406	 faligndata	%f4, %f6, %f48
4071:	FREG_FROB(f20,f22,f24,f26,f28,f30,f32,f34,f36)
408	STORE_SYNC(o0, f48)
409	FREG_FROB(f36,f38,f40,f42,f44,f46,f0, f2, f4)
410	STORE_JUMP(o0, f48, 42f)
4112:	FREG_FROB(f36,f38,f40,f42,f44,f46,f0, f2, f4)
412	STORE_SYNC(o0, f48)
413	FREG_FROB(f4, f6, f8, f10,f12,f14,f16,f18,f20)
414	STORE_JUMP(o0, f48, 50f)
4153:	FREG_FROB(f4, f6, f8, f10,f12,f14,f16,f18,f20)
416	STORE_SYNC(o0, f48)
417	FREG_FROB(f20,f22,f24,f26,f28,f30,f32,f34,f36)
418	STORE_JUMP(o0, f48, 58f)
419
4201:	FREG_FROB(f6, f8, f10,f12,f14,f16,f18,f20,f22)
421	LOOP_CHUNK1(o1, o0, 1f)
422	FREG_FROB(f22,f24,f26,f28,f30,f32,f34,f36,f38)
423	LOOP_CHUNK2(o1, o0, 2f)
424	FREG_FROB(f38,f40,f42,f44,f46,f0, f2, f4, f6) 
425	LOOP_CHUNK3(o1, o0, 3f)
426	ba,pt		%xcc, 1b+4
427	 faligndata	%f6, %f8, %f48
4281:	FREG_FROB(f22,f24,f26,f28,f30,f32,f34,f36,f38)
429	STORE_SYNC(o0, f48)
430	FREG_FROB(f38,f40,f42,f44,f46,f0, f2, f4, f6)
431	STORE_JUMP(o0, f48, 43f)
4322:	FREG_FROB(f38,f40,f42,f44,f46,f0, f2, f4, f6)
433	STORE_SYNC(o0, f48)
434	FREG_FROB(f6, f8, f10,f12,f14,f16,f18,f20,f22)
435	STORE_JUMP(o0, f48, 51f)
4363:	FREG_FROB(f6, f8, f10,f12,f14,f16,f18,f20,f22)
437	STORE_SYNC(o0, f48)
438	FREG_FROB(f22,f24,f26,f28,f30,f32,f34,f36,f38)
439	STORE_JUMP(o0, f48, 59f)
440
4411:	FREG_FROB(f8, f10,f12,f14,f16,f18,f20,f22,f24)
442	LOOP_CHUNK1(o1, o0, 1f)
443	FREG_FROB(f24,f26,f28,f30,f32,f34,f36,f38,f40)
444	LOOP_CHUNK2(o1, o0, 2f)
445	FREG_FROB(f40,f42,f44,f46,f0, f2, f4, f6, f8)
446	LOOP_CHUNK3(o1, o0, 3f)
447	ba,pt		%xcc, 1b+4
448	 faligndata	%f8, %f10, %f48
4491:	FREG_FROB(f24,f26,f28,f30,f32,f34,f36,f38,f40)
450	STORE_SYNC(o0, f48)
451	FREG_FROB(f40,f42,f44,f46,f0, f2, f4, f6, f8)
452	STORE_JUMP(o0, f48, 44f)
4532:	FREG_FROB(f40,f42,f44,f46,f0, f2, f4, f6, f8)
454	STORE_SYNC(o0, f48)
455	FREG_FROB(f8, f10,f12,f14,f16,f18,f20,f22,f24)
456	STORE_JUMP(o0, f48, 52f)
4573:	FREG_FROB(f8, f10,f12,f14,f16,f18,f20,f22,f24)
458	STORE_SYNC(o0, f48)
459	FREG_FROB(f24,f26,f28,f30,f32,f34,f36,f38,f40)
460	STORE_JUMP(o0, f48, 60f)
461
4621:	FREG_FROB(f10,f12,f14,f16,f18,f20,f22,f24,f26)
463	LOOP_CHUNK1(o1, o0, 1f)
464	FREG_FROB(f26,f28,f30,f32,f34,f36,f38,f40,f42)
465	LOOP_CHUNK2(o1, o0, 2f)
466	FREG_FROB(f42,f44,f46,f0, f2, f4, f6, f8, f10)
467	LOOP_CHUNK3(o1, o0, 3f)
468	ba,pt		%xcc, 1b+4
469	 faligndata	%f10, %f12, %f48
4701:	FREG_FROB(f26,f28,f30,f32,f34,f36,f38,f40,f42)
471	STORE_SYNC(o0, f48)
472	FREG_FROB(f42,f44,f46,f0, f2, f4, f6, f8, f10)
473	STORE_JUMP(o0, f48, 45f)
4742:	FREG_FROB(f42,f44,f46,f0, f2, f4, f6, f8, f10)
475	STORE_SYNC(o0, f48)
476	FREG_FROB(f10,f12,f14,f16,f18,f20,f22,f24,f26)
477	STORE_JUMP(o0, f48, 53f)
4783:	FREG_FROB(f10,f12,f14,f16,f18,f20,f22,f24,f26)
479	STORE_SYNC(o0, f48)
480	FREG_FROB(f26,f28,f30,f32,f34,f36,f38,f40,f42)
481	STORE_JUMP(o0, f48, 61f)
482
4831:	FREG_FROB(f12,f14,f16,f18,f20,f22,f24,f26,f28)
484	LOOP_CHUNK1(o1, o0, 1f)
485	FREG_FROB(f28,f30,f32,f34,f36,f38,f40,f42,f44)
486	LOOP_CHUNK2(o1, o0, 2f)
487	FREG_FROB(f44,f46,f0, f2, f4, f6, f8, f10,f12)
488	LOOP_CHUNK3(o1, o0, 3f)
489	ba,pt		%xcc, 1b+4
490	 faligndata	%f12, %f14, %f48
4911:	FREG_FROB(f28,f30,f32,f34,f36,f38,f40,f42,f44)
492	STORE_SYNC(o0, f48)
493	FREG_FROB(f44,f46,f0, f2, f4, f6, f8, f10,f12)
494	STORE_JUMP(o0, f48, 46f)
4952:	FREG_FROB(f44,f46,f0, f2, f4, f6, f8, f10,f12)
496	STORE_SYNC(o0, f48)
497	FREG_FROB(f12,f14,f16,f18,f20,f22,f24,f26,f28)
498	STORE_JUMP(o0, f48, 54f)
4993:	FREG_FROB(f12,f14,f16,f18,f20,f22,f24,f26,f28)
500	STORE_SYNC(o0, f48)
501	FREG_FROB(f28,f30,f32,f34,f36,f38,f40,f42,f44)
502	STORE_JUMP(o0, f48, 62f)
503
5041:	FREG_FROB(f14,f16,f18,f20,f22,f24,f26,f28,f30)
505	LOOP_CHUNK1(o1, o0, 1f)
506	FREG_FROB(f30,f32,f34,f36,f38,f40,f42,f44,f46)
507	LOOP_CHUNK2(o1, o0, 2f)
508	FREG_FROB(f46,f0, f2, f4, f6, f8, f10,f12,f14)
509	LOOP_CHUNK3(o1, o0, 3f)
510	ba,pt		%xcc, 1b+4
511	 faligndata	%f14, %f16, %f48
5121:	FREG_FROB(f30,f32,f34,f36,f38,f40,f42,f44,f46)
513	STORE_SYNC(o0, f48)
514	FREG_FROB(f46,f0, f2, f4, f6, f8, f10,f12,f14)
515	STORE_JUMP(o0, f48, 47f)
5162:	FREG_FROB(f46,f0, f2, f4, f6, f8, f10,f12,f14)
517	STORE_SYNC(o0, f48)
518	FREG_FROB(f14,f16,f18,f20,f22,f24,f26,f28,f30)
519	STORE_JUMP(o0, f48, 55f)
5203:	FREG_FROB(f14,f16,f18,f20,f22,f24,f26,f28,f30)
521	STORE_SYNC(o0, f48)
522	FREG_FROB(f30,f32,f34,f36,f38,f40,f42,f44,f46)
523	STORE_JUMP(o0, f48, 63f)
524
52540:	FINISH_VISCHUNK(o0, f0,  f2)
52641:	FINISH_VISCHUNK(o0, f2,  f4)
52742:	FINISH_VISCHUNK(o0, f4,  f6)
52843:	FINISH_VISCHUNK(o0, f6,  f8)
52944:	FINISH_VISCHUNK(o0, f8,  f10)
53045:	FINISH_VISCHUNK(o0, f10, f12)
53146:	FINISH_VISCHUNK(o0, f12, f14)
53247:	UNEVEN_VISCHUNK(o0, f14, f0)
53348:	FINISH_VISCHUNK(o0, f16, f18)
53449:	FINISH_VISCHUNK(o0, f18, f20)
53550:	FINISH_VISCHUNK(o0, f20, f22)
53651:	FINISH_VISCHUNK(o0, f22, f24)
53752:	FINISH_VISCHUNK(o0, f24, f26)
53853:	FINISH_VISCHUNK(o0, f26, f28)
53954:	FINISH_VISCHUNK(o0, f28, f30)
54055:	UNEVEN_VISCHUNK(o0, f30, f0)
54156:	FINISH_VISCHUNK(o0, f32, f34)
54257:	FINISH_VISCHUNK(o0, f34, f36)
54358:	FINISH_VISCHUNK(o0, f36, f38)
54459:	FINISH_VISCHUNK(o0, f38, f40)
54560:	FINISH_VISCHUNK(o0, f40, f42)
54661:	FINISH_VISCHUNK(o0, f42, f44)
54762:	FINISH_VISCHUNK(o0, f44, f46)
54863:	UNEVEN_VISCHUNK_LAST(o0, f46, f0)
549
55093:	EX_LD_FP(LOAD(ldd, %o1, %f2), U1_g3_0_fp)
551	add		%o1, 8, %o1
552	subcc		%g3, 8, %g3
553	faligndata	%f0, %f2, %f8
554	EX_ST_FP(STORE(std, %f8, %o0), U1_g3_8_fp)
555	bl,pn		%xcc, 95f
556	 add		%o0, 8, %o0
557	EX_LD_FP(LOAD(ldd, %o1, %f0), U1_g3_0_fp)
558	add		%o1, 8, %o1
559	subcc		%g3, 8, %g3
560	faligndata	%f2, %f0, %f8
561	EX_ST_FP(STORE(std, %f8, %o0), U1_g3_8_fp)
562	bge,pt		%xcc, 93b
563	 add		%o0, 8, %o0
564
56595:	brz,pt		%o2, 2f
566	 mov		%g1, %o1
567
5681:	EX_LD_FP(LOAD(ldub, %o1, %o3), U1_o2_0_fp)
569	add		%o1, 1, %o1
570	subcc		%o2, 1, %o2
571	EX_ST_FP(STORE(stb, %o3, %o0), U1_o2_1_fp)
572	bne,pt		%xcc, 1b
573	 add		%o0, 1, %o0
574
5752:	membar		#StoreLoad | #StoreStore
576	VISExit
577	retl
578	 mov		EX_RETVAL(%o4), %o0
579
580	.align		64
58170:	/* 16 < len <= (5 * 64) */
582	bne,pn		%XCC, 75f
583	 sub		%o0, %o1, %o3
584
58572:	andn		%o2, 0xf, %GLOBAL_SPARE
586	and		%o2, 0xf, %o2
5871:	EX_LD(LOAD(ldx, %o1 + 0x00, %o5), U1_gs_0)
588	EX_LD(LOAD(ldx, %o1 + 0x08, %g1), U1_gs_0)
589	subcc		%GLOBAL_SPARE, 0x10, %GLOBAL_SPARE
590	EX_ST(STORE(stx, %o5, %o1 + %o3), U1_gs_10)
591	add		%o1, 0x8, %o1
592	EX_ST(STORE(stx, %g1, %o1 + %o3), U1_gs_8)
593	bgu,pt		%XCC, 1b
594	 add		%o1, 0x8, %o1
59573:	andcc		%o2, 0x8, %g0
596	be,pt		%XCC, 1f
597	 nop
598	EX_LD(LOAD(ldx, %o1, %o5), U1_o2_0)
599	sub		%o2, 0x8, %o2
600	EX_ST(STORE(stx, %o5, %o1 + %o3), U1_o2_8)
601	add		%o1, 0x8, %o1
6021:	andcc		%o2, 0x4, %g0
603	be,pt		%XCC, 1f
604	 nop
605	EX_LD(LOAD(lduw, %o1, %o5), U1_o2_0)
606	sub		%o2, 0x4, %o2
607	EX_ST(STORE(stw, %o5, %o1 + %o3), U1_o2_4)
608	add		%o1, 0x4, %o1
6091:	cmp		%o2, 0
610	be,pt		%XCC, 85f
611	 nop
612	ba,pt		%xcc, 90f
613	 nop
614
61575:	andcc		%o0, 0x7, %g1
616	sub		%g1, 0x8, %g1
617	be,pn		%icc, 2f
618	 sub		%g0, %g1, %g1
619	sub		%o2, %g1, %o2
620
6211:	EX_LD(LOAD(ldub, %o1, %o5), U1_g1_0)
622	subcc		%g1, 1, %g1
623	EX_ST(STORE(stb, %o5, %o1 + %o3), U1_g1_1)
624	bgu,pt		%icc, 1b
625	 add		%o1, 1, %o1
626
6272:	add		%o1, %o3, %o0
628	andcc		%o1, 0x7, %g1
629	bne,pt		%icc, 8f
630	 sll		%g1, 3, %g1
631
632	cmp		%o2, 16
633	bgeu,pt		%icc, 72b
634	 nop
635	ba,a,pt		%xcc, 73b
636
6378:	mov		64, %o3
638	andn		%o1, 0x7, %o1
639	EX_LD(LOAD(ldx, %o1, %g2), U1_o2_0)
640	sub		%o3, %g1, %o3
641	andn		%o2, 0x7, %GLOBAL_SPARE
642	sllx		%g2, %g1, %g2
6431:	EX_LD(LOAD(ldx, %o1 + 0x8, %g3), U1_gs_0_o2_adj)
644	subcc		%GLOBAL_SPARE, 0x8, %GLOBAL_SPARE
645	add		%o1, 0x8, %o1
646	srlx		%g3, %o3, %o5
647	or		%o5, %g2, %o5
648	EX_ST(STORE(stx, %o5, %o0), U1_gs_8_o2_adj)
649	add		%o0, 0x8, %o0
650	bgu,pt		%icc, 1b
651	 sllx		%g3, %g1, %g2
652
653	srl		%g1, 3, %g1
654	andcc		%o2, 0x7, %o2
655	be,pn		%icc, 85f
656	 add		%o1, %g1, %o1
657	ba,pt		%xcc, 90f
658	 sub		%o0, %o1, %o3
659
660	.align		64
66180:	/* 0 < len <= 16 */
662	andcc		%o3, 0x3, %g0
663	bne,pn		%XCC, 90f
664	 sub		%o0, %o1, %o3
665
6661:	EX_LD(LOAD(lduw, %o1, %g1), U1_o2_0)
667	subcc		%o2, 4, %o2
668	EX_ST(STORE(stw, %g1, %o1 + %o3), U1_o2_4)
669	bgu,pt		%XCC, 1b
670	 add		%o1, 4, %o1
671
67285:	retl
673	 mov		EX_RETVAL(%o4), %o0
674
675	.align		32
67690:	EX_LD(LOAD(ldub, %o1, %g1), U1_o2_0)
677	subcc		%o2, 1, %o2
678	EX_ST(STORE(stb, %g1, %o1 + %o3), U1_o2_1)
679	bgu,pt		%XCC, 90b
680	 add		%o1, 1, %o1
681	retl
682	 mov		EX_RETVAL(%o4), %o0
683
684	.size		FUNC_NAME, .-FUNC_NAME
685EXPORT_SYMBOL(FUNC_NAME)
v3.5.6
 
  1/* U1memcpy.S: UltraSPARC-I/II/IIi/IIe optimized memcpy.
  2 *
  3 * Copyright (C) 1997, 2004 David S. Miller (davem@redhat.com)
  4 * Copyright (C) 1996, 1997, 1998, 1999 Jakub Jelinek (jj@ultra.linux.cz)
  5 */
  6
  7#ifdef __KERNEL__
 
  8#include <asm/visasm.h>
  9#include <asm/asi.h>
 
 10#define GLOBAL_SPARE	g7
 11#else
 12#define GLOBAL_SPARE	g5
 13#define ASI_BLK_P 0xf0
 14#define FPRS_FEF  0x04
 15#ifdef MEMCPY_DEBUG
 16#define VISEntry rd %fprs, %o5; wr %g0, FPRS_FEF, %fprs; \
 17		 clr %g1; clr %g2; clr %g3; subcc %g0, %g0, %g0;
 18#define VISExit and %o5, FPRS_FEF, %o5; wr %o5, 0x0, %fprs
 19#else
 20#define VISEntry rd %fprs, %o5; wr %g0, FPRS_FEF, %fprs
 21#define VISExit and %o5, FPRS_FEF, %o5; wr %o5, 0x0, %fprs
 22#endif
 23#endif
 24
 25#ifndef EX_LD
 26#define EX_LD(x)	x
 
 
 
 27#endif
 28
 29#ifndef EX_ST
 30#define EX_ST(x)	x
 31#endif
 32
 33#ifndef EX_RETVAL
 34#define EX_RETVAL(x)	x
 35#endif
 36
 37#ifndef LOAD
 38#define LOAD(type,addr,dest)	type [addr], dest
 39#endif
 40
 41#ifndef LOAD_BLK
 42#define LOAD_BLK(addr,dest)	ldda [addr] ASI_BLK_P, dest
 43#endif
 44
 45#ifndef STORE
 46#define STORE(type,src,addr)	type src, [addr]
 47#endif
 48
 49#ifndef STORE_BLK
 50#define STORE_BLK(src,addr)	stda src, [addr] ASI_BLK_P
 51#endif
 52
 53#ifndef FUNC_NAME
 54#define FUNC_NAME	memcpy
 55#endif
 56
 57#ifndef PREAMBLE
 58#define PREAMBLE
 59#endif
 60
 61#ifndef XCC
 62#define XCC xcc
 63#endif
 64
 65#define FREG_FROB(f1, f2, f3, f4, f5, f6, f7, f8, f9)		\
 66	faligndata		%f1, %f2, %f48;			\
 67	faligndata		%f2, %f3, %f50;			\
 68	faligndata		%f3, %f4, %f52;			\
 69	faligndata		%f4, %f5, %f54;			\
 70	faligndata		%f5, %f6, %f56;			\
 71	faligndata		%f6, %f7, %f58;			\
 72	faligndata		%f7, %f8, %f60;			\
 73	faligndata		%f8, %f9, %f62;
 74
 75#define MAIN_LOOP_CHUNK(src, dest, fdest, fsrc, len, jmptgt)	\
 76	EX_LD(LOAD_BLK(%src, %fdest));				\
 77	EX_ST(STORE_BLK(%fsrc, %dest));				\
 78	add			%src, 0x40, %src;		\
 79	subcc			%len, 0x40, %len;		\
 80	be,pn			%xcc, jmptgt;			\
 81	 add			%dest, 0x40, %dest;		\
 82
 83#define LOOP_CHUNK1(src, dest, len, branch_dest)		\
 84	MAIN_LOOP_CHUNK(src, dest, f0,  f48, len, branch_dest)
 85#define LOOP_CHUNK2(src, dest, len, branch_dest)		\
 86	MAIN_LOOP_CHUNK(src, dest, f16, f48, len, branch_dest)
 87#define LOOP_CHUNK3(src, dest, len, branch_dest)		\
 88	MAIN_LOOP_CHUNK(src, dest, f32, f48, len, branch_dest)
 89
 90#define DO_SYNC			membar	#Sync;
 91#define STORE_SYNC(dest, fsrc)				\
 92	EX_ST(STORE_BLK(%fsrc, %dest));			\
 93	add			%dest, 0x40, %dest;	\
 94	DO_SYNC
 95
 96#define STORE_JUMP(dest, fsrc, target)			\
 97	EX_ST(STORE_BLK(%fsrc, %dest));			\
 98	add			%dest, 0x40, %dest;	\
 99	ba,pt			%xcc, target;		\
100	 nop;
101
102#define FINISH_VISCHUNK(dest, f0, f1, left)	\
103	subcc			%left, 8, %left;\
104	bl,pn			%xcc, 95f;	\
105	 faligndata		%f0, %f1, %f48;	\
106	EX_ST(STORE(std, %f48, %dest));		\
107	add			%dest, 8, %dest;
108
109#define UNEVEN_VISCHUNK_LAST(dest, f0, f1, left)	\
110	subcc			%left, 8, %left;	\
111	bl,pn			%xcc, 95f;		\
112	 fsrc1			%f0, %f1;
113
114#define UNEVEN_VISCHUNK(dest, f0, f1, left)		\
115	UNEVEN_VISCHUNK_LAST(dest, f0, f1, left)	\
116	ba,a,pt			%xcc, 93f;
117
118	.register	%g2,#scratch
119	.register	%g3,#scratch
120
121	.text
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
122	.align		64
123
124	.globl		FUNC_NAME
125	.type		FUNC_NAME,#function
126FUNC_NAME:		/* %o0=dst, %o1=src, %o2=len */
127	srlx		%o2, 31, %g2
128	cmp		%g2, 0
129	tne		%xcc, 5
130	PREAMBLE
131	mov		%o0, %o4
132	cmp		%o2, 0
133	be,pn		%XCC, 85f
134	 or		%o0, %o1, %o3
135	cmp		%o2, 16
136	blu,a,pn	%XCC, 80f
137	 or		%o3, %o2, %o3
138
139	cmp		%o2, (5 * 64)
140	blu,pt		%XCC, 70f
141	 andcc		%o3, 0x7, %g0
142
143	/* Clobbers o5/g1/g2/g3/g7/icc/xcc.  */
144	VISEntry
145
146	/* Is 'dst' already aligned on an 64-byte boundary? */
147	andcc		%o0, 0x3f, %g2
148	be,pt		%XCC, 2f
149
150	/* Compute abs((dst & 0x3f) - 0x40) into %g2.  This is the number
151	 * of bytes to copy to make 'dst' 64-byte aligned.  We pre-
152	 * subtract this from 'len'.
153	 */
154	 sub		%o0, %o1, %GLOBAL_SPARE
155	sub		%g2, 0x40, %g2
156	sub		%g0, %g2, %g2
157	sub		%o2, %g2, %o2
158	andcc		%g2, 0x7, %g1
159	be,pt		%icc, 2f
160	 and		%g2, 0x38, %g2
161
1621:	subcc		%g1, 0x1, %g1
163	EX_LD(LOAD(ldub, %o1 + 0x00, %o3))
164	EX_ST(STORE(stb, %o3, %o1 + %GLOBAL_SPARE))
165	bgu,pt		%XCC, 1b
166	 add		%o1, 0x1, %o1
167
168	add		%o1, %GLOBAL_SPARE, %o0
169
1702:	cmp		%g2, 0x0
171	and		%o1, 0x7, %g1
172	be,pt		%icc, 3f
173	 alignaddr	%o1, %g0, %o1
174
175	EX_LD(LOAD(ldd, %o1, %f4))
1761:	EX_LD(LOAD(ldd, %o1 + 0x8, %f6))
177	add		%o1, 0x8, %o1
178	subcc		%g2, 0x8, %g2
179	faligndata	%f4, %f6, %f0
180	EX_ST(STORE(std, %f0, %o0))
181	be,pn		%icc, 3f
182	 add		%o0, 0x8, %o0
183
184	EX_LD(LOAD(ldd, %o1 + 0x8, %f4))
185	add		%o1, 0x8, %o1
186	subcc		%g2, 0x8, %g2
187	faligndata	%f6, %f4, %f0
188	EX_ST(STORE(std, %f0, %o0))
189	bne,pt		%icc, 1b
190	 add		%o0, 0x8, %o0
191
192	/* Destination is 64-byte aligned.  */
1933:	
194	membar		  #LoadStore | #StoreStore | #StoreLoad
195
196	subcc		%o2, 0x40, %GLOBAL_SPARE
197	add		%o1, %g1, %g1
198	andncc		%GLOBAL_SPARE, (0x40 - 1), %GLOBAL_SPARE
199	srl		%g1, 3, %g2
200	sub		%o2, %GLOBAL_SPARE, %g3
201	andn		%o1, (0x40 - 1), %o1
202	and		%g2, 7, %g2
203	andncc		%g3, 0x7, %g3
204	fmovd		%f0, %f2
205	sub		%g3, 0x8, %g3
206	sub		%o2, %GLOBAL_SPARE, %o2
207
208	add		%g1, %GLOBAL_SPARE, %g1
209	subcc		%o2, %g3, %o2
210
211	EX_LD(LOAD_BLK(%o1, %f0))
212	add		%o1, 0x40, %o1
213	add		%g1, %g3, %g1
214	EX_LD(LOAD_BLK(%o1, %f16))
215	add		%o1, 0x40, %o1
216	sub		%GLOBAL_SPARE, 0x80, %GLOBAL_SPARE
217	EX_LD(LOAD_BLK(%o1, %f32))
218	add		%o1, 0x40, %o1
219
220	/* There are 8 instances of the unrolled loop,
221	 * one for each possible alignment of the
222	 * source buffer.  Each loop instance is 452
223	 * bytes.
224	 */
225	sll		%g2, 3, %o3
226	sub		%o3, %g2, %o3
227	sllx		%o3, 4, %o3
228	add		%o3, %g2, %o3
229	sllx		%o3, 2, %g2
2301:	rd		%pc, %o3
231	add		%o3, %lo(1f - 1b), %o3
232	jmpl		%o3 + %g2, %g0
233	 nop
234
235	.align		64
2361:	FREG_FROB(f0, f2, f4, f6, f8, f10,f12,f14,f16)
237	LOOP_CHUNK1(o1, o0, GLOBAL_SPARE, 1f)
238	FREG_FROB(f16,f18,f20,f22,f24,f26,f28,f30,f32)
239	LOOP_CHUNK2(o1, o0, GLOBAL_SPARE, 2f)
240	FREG_FROB(f32,f34,f36,f38,f40,f42,f44,f46,f0)
241	LOOP_CHUNK3(o1, o0, GLOBAL_SPARE, 3f)
242	ba,pt		%xcc, 1b+4
243	 faligndata	%f0, %f2, %f48
2441:	FREG_FROB(f16,f18,f20,f22,f24,f26,f28,f30,f32)
245	STORE_SYNC(o0, f48)
246	FREG_FROB(f32,f34,f36,f38,f40,f42,f44,f46,f0)
247	STORE_JUMP(o0, f48, 40f)
2482:	FREG_FROB(f32,f34,f36,f38,f40,f42,f44,f46,f0)
249	STORE_SYNC(o0, f48)
250	FREG_FROB(f0, f2, f4, f6, f8, f10,f12,f14,f16)
251	STORE_JUMP(o0, f48, 48f)
2523:	FREG_FROB(f0, f2, f4, f6, f8, f10,f12,f14,f16)
253	STORE_SYNC(o0, f48)
254	FREG_FROB(f16,f18,f20,f22,f24,f26,f28,f30,f32)
255	STORE_JUMP(o0, f48, 56f)
256
2571:	FREG_FROB(f2, f4, f6, f8, f10,f12,f14,f16,f18)
258	LOOP_CHUNK1(o1, o0, GLOBAL_SPARE, 1f)
259	FREG_FROB(f18,f20,f22,f24,f26,f28,f30,f32,f34)
260	LOOP_CHUNK2(o1, o0, GLOBAL_SPARE, 2f)
261	FREG_FROB(f34,f36,f38,f40,f42,f44,f46,f0, f2)
262	LOOP_CHUNK3(o1, o0, GLOBAL_SPARE, 3f)
263	ba,pt		%xcc, 1b+4
264	 faligndata	%f2, %f4, %f48
2651:	FREG_FROB(f18,f20,f22,f24,f26,f28,f30,f32,f34)
266	STORE_SYNC(o0, f48)
267	FREG_FROB(f34,f36,f38,f40,f42,f44,f46,f0, f2)
268	STORE_JUMP(o0, f48, 41f)
2692:	FREG_FROB(f34,f36,f38,f40,f42,f44,f46,f0, f2)
270	STORE_SYNC(o0, f48)
271	FREG_FROB(f2, f4, f6, f8, f10,f12,f14,f16,f18)
272	STORE_JUMP(o0, f48, 49f)
2733:	FREG_FROB(f2, f4, f6, f8, f10,f12,f14,f16,f18)
274	STORE_SYNC(o0, f48)
275	FREG_FROB(f18,f20,f22,f24,f26,f28,f30,f32,f34)
276	STORE_JUMP(o0, f48, 57f)
277
2781:	FREG_FROB(f4, f6, f8, f10,f12,f14,f16,f18,f20)
279	LOOP_CHUNK1(o1, o0, GLOBAL_SPARE, 1f)
280	FREG_FROB(f20,f22,f24,f26,f28,f30,f32,f34,f36)
281	LOOP_CHUNK2(o1, o0, GLOBAL_SPARE, 2f)
282	FREG_FROB(f36,f38,f40,f42,f44,f46,f0, f2, f4)
283	LOOP_CHUNK3(o1, o0, GLOBAL_SPARE, 3f)
284	ba,pt		%xcc, 1b+4
285	 faligndata	%f4, %f6, %f48
2861:	FREG_FROB(f20,f22,f24,f26,f28,f30,f32,f34,f36)
287	STORE_SYNC(o0, f48)
288	FREG_FROB(f36,f38,f40,f42,f44,f46,f0, f2, f4)
289	STORE_JUMP(o0, f48, 42f)
2902:	FREG_FROB(f36,f38,f40,f42,f44,f46,f0, f2, f4)
291	STORE_SYNC(o0, f48)
292	FREG_FROB(f4, f6, f8, f10,f12,f14,f16,f18,f20)
293	STORE_JUMP(o0, f48, 50f)
2943:	FREG_FROB(f4, f6, f8, f10,f12,f14,f16,f18,f20)
295	STORE_SYNC(o0, f48)
296	FREG_FROB(f20,f22,f24,f26,f28,f30,f32,f34,f36)
297	STORE_JUMP(o0, f48, 58f)
298
2991:	FREG_FROB(f6, f8, f10,f12,f14,f16,f18,f20,f22)
300	LOOP_CHUNK1(o1, o0, GLOBAL_SPARE, 1f)
301	FREG_FROB(f22,f24,f26,f28,f30,f32,f34,f36,f38)
302	LOOP_CHUNK2(o1, o0, GLOBAL_SPARE, 2f)
303	FREG_FROB(f38,f40,f42,f44,f46,f0, f2, f4, f6) 
304	LOOP_CHUNK3(o1, o0, GLOBAL_SPARE, 3f)
305	ba,pt		%xcc, 1b+4
306	 faligndata	%f6, %f8, %f48
3071:	FREG_FROB(f22,f24,f26,f28,f30,f32,f34,f36,f38)
308	STORE_SYNC(o0, f48)
309	FREG_FROB(f38,f40,f42,f44,f46,f0, f2, f4, f6)
310	STORE_JUMP(o0, f48, 43f)
3112:	FREG_FROB(f38,f40,f42,f44,f46,f0, f2, f4, f6)
312	STORE_SYNC(o0, f48)
313	FREG_FROB(f6, f8, f10,f12,f14,f16,f18,f20,f22)
314	STORE_JUMP(o0, f48, 51f)
3153:	FREG_FROB(f6, f8, f10,f12,f14,f16,f18,f20,f22)
316	STORE_SYNC(o0, f48)
317	FREG_FROB(f22,f24,f26,f28,f30,f32,f34,f36,f38)
318	STORE_JUMP(o0, f48, 59f)
319
3201:	FREG_FROB(f8, f10,f12,f14,f16,f18,f20,f22,f24)
321	LOOP_CHUNK1(o1, o0, GLOBAL_SPARE, 1f)
322	FREG_FROB(f24,f26,f28,f30,f32,f34,f36,f38,f40)
323	LOOP_CHUNK2(o1, o0, GLOBAL_SPARE, 2f)
324	FREG_FROB(f40,f42,f44,f46,f0, f2, f4, f6, f8)
325	LOOP_CHUNK3(o1, o0, GLOBAL_SPARE, 3f)
326	ba,pt		%xcc, 1b+4
327	 faligndata	%f8, %f10, %f48
3281:	FREG_FROB(f24,f26,f28,f30,f32,f34,f36,f38,f40)
329	STORE_SYNC(o0, f48)
330	FREG_FROB(f40,f42,f44,f46,f0, f2, f4, f6, f8)
331	STORE_JUMP(o0, f48, 44f)
3322:	FREG_FROB(f40,f42,f44,f46,f0, f2, f4, f6, f8)
333	STORE_SYNC(o0, f48)
334	FREG_FROB(f8, f10,f12,f14,f16,f18,f20,f22,f24)
335	STORE_JUMP(o0, f48, 52f)
3363:	FREG_FROB(f8, f10,f12,f14,f16,f18,f20,f22,f24)
337	STORE_SYNC(o0, f48)
338	FREG_FROB(f24,f26,f28,f30,f32,f34,f36,f38,f40)
339	STORE_JUMP(o0, f48, 60f)
340
3411:	FREG_FROB(f10,f12,f14,f16,f18,f20,f22,f24,f26)
342	LOOP_CHUNK1(o1, o0, GLOBAL_SPARE, 1f)
343	FREG_FROB(f26,f28,f30,f32,f34,f36,f38,f40,f42)
344	LOOP_CHUNK2(o1, o0, GLOBAL_SPARE, 2f)
345	FREG_FROB(f42,f44,f46,f0, f2, f4, f6, f8, f10)
346	LOOP_CHUNK3(o1, o0, GLOBAL_SPARE, 3f)
347	ba,pt		%xcc, 1b+4
348	 faligndata	%f10, %f12, %f48
3491:	FREG_FROB(f26,f28,f30,f32,f34,f36,f38,f40,f42)
350	STORE_SYNC(o0, f48)
351	FREG_FROB(f42,f44,f46,f0, f2, f4, f6, f8, f10)
352	STORE_JUMP(o0, f48, 45f)
3532:	FREG_FROB(f42,f44,f46,f0, f2, f4, f6, f8, f10)
354	STORE_SYNC(o0, f48)
355	FREG_FROB(f10,f12,f14,f16,f18,f20,f22,f24,f26)
356	STORE_JUMP(o0, f48, 53f)
3573:	FREG_FROB(f10,f12,f14,f16,f18,f20,f22,f24,f26)
358	STORE_SYNC(o0, f48)
359	FREG_FROB(f26,f28,f30,f32,f34,f36,f38,f40,f42)
360	STORE_JUMP(o0, f48, 61f)
361
3621:	FREG_FROB(f12,f14,f16,f18,f20,f22,f24,f26,f28)
363	LOOP_CHUNK1(o1, o0, GLOBAL_SPARE, 1f)
364	FREG_FROB(f28,f30,f32,f34,f36,f38,f40,f42,f44)
365	LOOP_CHUNK2(o1, o0, GLOBAL_SPARE, 2f)
366	FREG_FROB(f44,f46,f0, f2, f4, f6, f8, f10,f12)
367	LOOP_CHUNK3(o1, o0, GLOBAL_SPARE, 3f)
368	ba,pt		%xcc, 1b+4
369	 faligndata	%f12, %f14, %f48
3701:	FREG_FROB(f28,f30,f32,f34,f36,f38,f40,f42,f44)
371	STORE_SYNC(o0, f48)
372	FREG_FROB(f44,f46,f0, f2, f4, f6, f8, f10,f12)
373	STORE_JUMP(o0, f48, 46f)
3742:	FREG_FROB(f44,f46,f0, f2, f4, f6, f8, f10,f12)
375	STORE_SYNC(o0, f48)
376	FREG_FROB(f12,f14,f16,f18,f20,f22,f24,f26,f28)
377	STORE_JUMP(o0, f48, 54f)
3783:	FREG_FROB(f12,f14,f16,f18,f20,f22,f24,f26,f28)
379	STORE_SYNC(o0, f48)
380	FREG_FROB(f28,f30,f32,f34,f36,f38,f40,f42,f44)
381	STORE_JUMP(o0, f48, 62f)
382
3831:	FREG_FROB(f14,f16,f18,f20,f22,f24,f26,f28,f30)
384	LOOP_CHUNK1(o1, o0, GLOBAL_SPARE, 1f)
385	FREG_FROB(f30,f32,f34,f36,f38,f40,f42,f44,f46)
386	LOOP_CHUNK2(o1, o0, GLOBAL_SPARE, 2f)
387	FREG_FROB(f46,f0, f2, f4, f6, f8, f10,f12,f14)
388	LOOP_CHUNK3(o1, o0, GLOBAL_SPARE, 3f)
389	ba,pt		%xcc, 1b+4
390	 faligndata	%f14, %f16, %f48
3911:	FREG_FROB(f30,f32,f34,f36,f38,f40,f42,f44,f46)
392	STORE_SYNC(o0, f48)
393	FREG_FROB(f46,f0, f2, f4, f6, f8, f10,f12,f14)
394	STORE_JUMP(o0, f48, 47f)
3952:	FREG_FROB(f46,f0, f2, f4, f6, f8, f10,f12,f14)
396	STORE_SYNC(o0, f48)
397	FREG_FROB(f14,f16,f18,f20,f22,f24,f26,f28,f30)
398	STORE_JUMP(o0, f48, 55f)
3993:	FREG_FROB(f14,f16,f18,f20,f22,f24,f26,f28,f30)
400	STORE_SYNC(o0, f48)
401	FREG_FROB(f30,f32,f34,f36,f38,f40,f42,f44,f46)
402	STORE_JUMP(o0, f48, 63f)
403
40440:	FINISH_VISCHUNK(o0, f0,  f2,  g3)
40541:	FINISH_VISCHUNK(o0, f2,  f4,  g3)
40642:	FINISH_VISCHUNK(o0, f4,  f6,  g3)
40743:	FINISH_VISCHUNK(o0, f6,  f8,  g3)
40844:	FINISH_VISCHUNK(o0, f8,  f10, g3)
40945:	FINISH_VISCHUNK(o0, f10, f12, g3)
41046:	FINISH_VISCHUNK(o0, f12, f14, g3)
41147:	UNEVEN_VISCHUNK(o0, f14, f0,  g3)
41248:	FINISH_VISCHUNK(o0, f16, f18, g3)
41349:	FINISH_VISCHUNK(o0, f18, f20, g3)
41450:	FINISH_VISCHUNK(o0, f20, f22, g3)
41551:	FINISH_VISCHUNK(o0, f22, f24, g3)
41652:	FINISH_VISCHUNK(o0, f24, f26, g3)
41753:	FINISH_VISCHUNK(o0, f26, f28, g3)
41854:	FINISH_VISCHUNK(o0, f28, f30, g3)
41955:	UNEVEN_VISCHUNK(o0, f30, f0,  g3)
42056:	FINISH_VISCHUNK(o0, f32, f34, g3)
42157:	FINISH_VISCHUNK(o0, f34, f36, g3)
42258:	FINISH_VISCHUNK(o0, f36, f38, g3)
42359:	FINISH_VISCHUNK(o0, f38, f40, g3)
42460:	FINISH_VISCHUNK(o0, f40, f42, g3)
42561:	FINISH_VISCHUNK(o0, f42, f44, g3)
42662:	FINISH_VISCHUNK(o0, f44, f46, g3)
42763:	UNEVEN_VISCHUNK_LAST(o0, f46, f0,  g3)
428
42993:	EX_LD(LOAD(ldd, %o1, %f2))
430	add		%o1, 8, %o1
431	subcc		%g3, 8, %g3
432	faligndata	%f0, %f2, %f8
433	EX_ST(STORE(std, %f8, %o0))
434	bl,pn		%xcc, 95f
435	 add		%o0, 8, %o0
436	EX_LD(LOAD(ldd, %o1, %f0))
437	add		%o1, 8, %o1
438	subcc		%g3, 8, %g3
439	faligndata	%f2, %f0, %f8
440	EX_ST(STORE(std, %f8, %o0))
441	bge,pt		%xcc, 93b
442	 add		%o0, 8, %o0
443
44495:	brz,pt		%o2, 2f
445	 mov		%g1, %o1
446
4471:	EX_LD(LOAD(ldub, %o1, %o3))
448	add		%o1, 1, %o1
449	subcc		%o2, 1, %o2
450	EX_ST(STORE(stb, %o3, %o0))
451	bne,pt		%xcc, 1b
452	 add		%o0, 1, %o0
453
4542:	membar		#StoreLoad | #StoreStore
455	VISExit
456	retl
457	 mov		EX_RETVAL(%o4), %o0
458
459	.align		64
46070:	/* 16 < len <= (5 * 64) */
461	bne,pn		%XCC, 75f
462	 sub		%o0, %o1, %o3
463
46472:	andn		%o2, 0xf, %GLOBAL_SPARE
465	and		%o2, 0xf, %o2
4661:	EX_LD(LOAD(ldx, %o1 + 0x00, %o5))
467	EX_LD(LOAD(ldx, %o1 + 0x08, %g1))
468	subcc		%GLOBAL_SPARE, 0x10, %GLOBAL_SPARE
469	EX_ST(STORE(stx, %o5, %o1 + %o3))
470	add		%o1, 0x8, %o1
471	EX_ST(STORE(stx, %g1, %o1 + %o3))
472	bgu,pt		%XCC, 1b
473	 add		%o1, 0x8, %o1
47473:	andcc		%o2, 0x8, %g0
475	be,pt		%XCC, 1f
476	 nop
477	EX_LD(LOAD(ldx, %o1, %o5))
478	sub		%o2, 0x8, %o2
479	EX_ST(STORE(stx, %o5, %o1 + %o3))
480	add		%o1, 0x8, %o1
4811:	andcc		%o2, 0x4, %g0
482	be,pt		%XCC, 1f
483	 nop
484	EX_LD(LOAD(lduw, %o1, %o5))
485	sub		%o2, 0x4, %o2
486	EX_ST(STORE(stw, %o5, %o1 + %o3))
487	add		%o1, 0x4, %o1
4881:	cmp		%o2, 0
489	be,pt		%XCC, 85f
490	 nop
491	ba,pt		%xcc, 90f
492	 nop
493
49475:	andcc		%o0, 0x7, %g1
495	sub		%g1, 0x8, %g1
496	be,pn		%icc, 2f
497	 sub		%g0, %g1, %g1
498	sub		%o2, %g1, %o2
499
5001:	EX_LD(LOAD(ldub, %o1, %o5))
501	subcc		%g1, 1, %g1
502	EX_ST(STORE(stb, %o5, %o1 + %o3))
503	bgu,pt		%icc, 1b
504	 add		%o1, 1, %o1
505
5062:	add		%o1, %o3, %o0
507	andcc		%o1, 0x7, %g1
508	bne,pt		%icc, 8f
509	 sll		%g1, 3, %g1
510
511	cmp		%o2, 16
512	bgeu,pt		%icc, 72b
513	 nop
514	ba,a,pt		%xcc, 73b
515
5168:	mov		64, %o3
517	andn		%o1, 0x7, %o1
518	EX_LD(LOAD(ldx, %o1, %g2))
519	sub		%o3, %g1, %o3
520	andn		%o2, 0x7, %GLOBAL_SPARE
521	sllx		%g2, %g1, %g2
5221:	EX_LD(LOAD(ldx, %o1 + 0x8, %g3))
523	subcc		%GLOBAL_SPARE, 0x8, %GLOBAL_SPARE
524	add		%o1, 0x8, %o1
525	srlx		%g3, %o3, %o5
526	or		%o5, %g2, %o5
527	EX_ST(STORE(stx, %o5, %o0))
528	add		%o0, 0x8, %o0
529	bgu,pt		%icc, 1b
530	 sllx		%g3, %g1, %g2
531
532	srl		%g1, 3, %g1
533	andcc		%o2, 0x7, %o2
534	be,pn		%icc, 85f
535	 add		%o1, %g1, %o1
536	ba,pt		%xcc, 90f
537	 sub		%o0, %o1, %o3
538
539	.align		64
54080:	/* 0 < len <= 16 */
541	andcc		%o3, 0x3, %g0
542	bne,pn		%XCC, 90f
543	 sub		%o0, %o1, %o3
544
5451:	EX_LD(LOAD(lduw, %o1, %g1))
546	subcc		%o2, 4, %o2
547	EX_ST(STORE(stw, %g1, %o1 + %o3))
548	bgu,pt		%XCC, 1b
549	 add		%o1, 4, %o1
550
55185:	retl
552	 mov		EX_RETVAL(%o4), %o0
553
554	.align		32
55590:	EX_LD(LOAD(ldub, %o1, %g1))
556	subcc		%o2, 1, %o2
557	EX_ST(STORE(stb, %g1, %o1 + %o3))
558	bgu,pt		%XCC, 90b
559	 add		%o1, 1, %o1
560	retl
561	 mov		EX_RETVAL(%o4), %o0
562
563	.size		FUNC_NAME, .-FUNC_NAME