Retro68/gcc/libgloss/sparc_leon/locore_clean.S
2012-03-27 01:51:53 +02:00

115 lines
2.7 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/head.h>
.section .text
/* ------- */
.weak _cleanregs_custom_weak
.set _cleanregs_custom_weak,_cleanregs_donothing
/* ------- */
.global _cleanregs_libgloss
_cleanregs_donothing:
_cleanregs_libgloss:
retl
nop
#define NUMREGWINDOWS 8
//_cleanregs_libgloss:
!''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
! initialize regs with values
//#define REGINIT
#ifdef REGINIT
mov %psr, %g3
mov %wim, %g4
mov %sp, %g5
mov %fp, %g6
mov %o7, %g7
mov %g0, %wim
set 0, %g1
andn %g3,0x1f,%l0
mov %l0,%psr
nop; nop; nop
3: set 0x0001,%i0
set 0x0101,%i1
set 0x0201,%i2
set 0x0301,%i3
set 0x0401,%i4
set 0x0501,%i5
set 0x0601,%i6
set 0x0701,%i7
set 0x0801,%l0
set 0x0901,%l1
set 0x1001,%l2
set 0x1101,%l3
set 0x1201,%l4
set 0x1301,%l5
set 0x1401,%l6
set 0x1501,%l7
or %g1,%i0,%i0
or %g1,%i1,%i1
or %g1,%i2,%i2
or %g1,%i3,%i3
or %g1,%i4,%i4
or %g1,%i5,%i5
or %g1,%i6,%i6
or %g1,%i7,%i7
or %g1,%l0,%l0
or %g1,%l1,%l1
or %g1,%l2,%l2
or %g1,%l3,%l3
or %g1,%l4,%l4
or %g1,%l5,%l5
or %g1,%l6,%l6
or %g1,%l7,%l7
restore
set 0x10000,%g2
add %g1,%g2,%g1
set NUMREGWINDOWS*0x10000,%g2
cmp %g1,%g2
bne 3b
nop
mov %g4,%wim
nop; nop; nop;
mov %g3,%psr
nop; nop; nop;
mov %g5, %sp
mov %g6, %fp
#endif
!''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
jmpl %g7+8,%g0
nop