112 lines
		
	
	
		
			2.9 KiB
		
	
	
	
		
			ArmAsm
		
	
	
	
			
		
		
	
	
			112 lines
		
	
	
		
			2.9 KiB
		
	
	
	
		
			ArmAsm
		
	
	
	
/*
 | 
						|
 * Copyright (c) 2011 Aeroflex Gaisler
 | 
						|
 *
 | 
						|
 * BSD license:
 | 
						|
 *
 | 
						|
 * Permission is hereby granted, free of charge, to any person obtaining a copy
 | 
						|
 * of this software and associated documentation files (the "Software"), to deal
 | 
						|
 * in the Software without restriction, including without limitation the rights
 | 
						|
 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
 | 
						|
 * copies of the Software, and to permit persons to whom the Software is
 | 
						|
 * furnished to do so, subject to the following conditions:
 | 
						|
 *
 | 
						|
 * The above copyright notice and this permission notice shall be included in
 | 
						|
 * all copies or substantial portions of the Software.
 | 
						|
 *
 | 
						|
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 | 
						|
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 | 
						|
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
 | 
						|
 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
 | 
						|
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
 | 
						|
 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
 | 
						|
 * THE SOFTWARE.
 | 
						|
 */
 | 
						|
 | 
						|
 | 
						|
#include <asm-leon/asmmacro.h>
 | 
						|
#include <asm-leon/leonstack.h>
 | 
						|
#include <asm-leon/winmacros.h>
 | 
						|
#include <asm-leon/leon.h>
 | 
						|
	
 | 
						|
#ifndef _SOFT_FLOAT
 | 
						|
 | 
						|
  	.seg    "text"
 | 
						|
	/* ------- */
 | 
						|
  	.weak	_fpdis_enable_svt
 | 
						|
	.set	_fpdis_enable_svt,__fpdis_enable_svt
 | 
						|
  	.weak	_fpdis_enable
 | 
						|
	.set	_fpdis_enable,__fpdis_enable
 | 
						|
	/* ------- */
 | 
						|
	!.global _fpdis_enable,_fpdis_enable_svt
 | 
						|
__fpdis_enable_svt:
 | 
						|
__fpdis_enable:
 | 
						|
 | 
						|
	set SPARC_PSR_EF_MASK,%l3
 | 
						|
	or %l0,%l3,%l0
 | 
						|
	or %l0,0xf00, %l3		! PIL up to 15, enable fpu
 | 
						|
	wr %l3,0, %psr		        ! restore the condition flags, enable fpu
 | 
						|
	nop
 | 
						|
	nop
 | 
						|
	nop
 | 
						|
	
 | 
						|
	mov	%psr, %l3		! check if fpu is present
 | 
						|
	set SPARC_PSR_EF_MASK,%l4
 | 
						|
	andcc	%l3, %l4, %l3
 | 
						|
	bne	4f
 | 
						|
	 nop
 | 
						|
	
 | 
						|
	 ta	0                       ! no fpu present, halt
 | 
						|
	
 | 
						|
4:
 | 
						|
	set     fpustate_current,%l4
 | 
						|
	
 | 
						|
	ld [%l4],%l4
 | 
						|
	set     fpustate_owner,%l5
 | 
						|
	ld [%l5],%l5
 | 
						|
	cmp	%l4,%l5
 | 
						|
	beq	mpfnostore
 | 
						|
	 nop
 | 
						|
	cmp    %g0,%l5
 | 
						|
	 beq	mpfstore
 | 
						|
	nop
 | 
						|
 | 
						|
	FW_STORE(%l5)
 | 
						|
	
 | 
						|
mpfstore:	
 | 
						|
	set     fpustate_owner,%l6
 | 
						|
	st %l4,[%l6]
 | 
						|
	cmp    %g0,%l4
 | 
						|
	 beq	mpfnostore
 | 
						|
	nop
 | 
						|
	
 | 
						|
	FW_LOAD(%l4)
 | 
						|
 | 
						|
mpfnostore:	
 | 
						|
	wr	%l0,0, %psr		! restore the condition flags, enable fpu
 | 
						|
	nop
 | 
						|
	nop
 | 
						|
	nop
 | 
						|
	
 | 
						|
	jmpl	%l1,  %g0
 | 
						|
	rett	%l2
 | 
						|
	
 | 
						|
  	.seg    "data"
 | 
						|
 | 
						|
	.global fpustate_default
 | 
						|
	.align	8
 | 
						|
fpustate_default:
 | 
						|
	.long 0; .long 0; .long 0; .long 0; .long 0; .long 0; .long 0; .long 0;
 | 
						|
	.long 0; .long 0; .long 0; .long 0; .long 0; .long 0; .long 0; .long 0;
 | 
						|
	.long 0; .long 0; .long 0; .long 0; .long 0; .long 0; .long 0; .long 0;
 | 
						|
	.long 0; .long 0; .long 0; .long 0; .long 0; .long 0; .long 0; .long 0;
 | 
						|
	.long 0; .long 0; .long 0; .long 0; .long 0; .long 0; .long 0; .long 0;
 | 
						|
	.global fpustate_owner
 | 
						|
fpustate_owner:
 | 
						|
	.word	fpustate_default				! pointer to FPU owning context
 | 
						|
	
 | 
						|
 	.global fpustate_current	
 | 
						|
fpustate_current:	
 | 
						|
	.word	fpustate_default				! pointer to current threads FPU context
 | 
						|
	        
 | 
						|
#endif
 |