162 lines
3.5 KiB
ArmAsm
162 lines
3.5 KiB
ArmAsm
/*
|
|
* tbidspram.S
|
|
*
|
|
* Copyright (C) 2009, 2012 Imagination Technologies.
|
|
*
|
|
* This program is free software; you can redistribute it and/or modify it under
|
|
* the terms of the GNU General Public License version 2 as published by the
|
|
* Free Software Foundation.
|
|
*
|
|
* Explicit state save and restore routines forming part of the thread binary
|
|
* interface for META processors
|
|
*/
|
|
|
|
.file "tbidspram.S"
|
|
|
|
/* These aren't generally useful to a user so for now, they arent publically available */
|
|
#define _TBIECH_DSPRAM_DUA_S 8
|
|
#define _TBIECH_DSPRAM_DUA_BITS 0x7f00
|
|
#define _TBIECH_DSPRAM_DUB_S 0
|
|
#define _TBIECH_DSPRAM_DUB_BITS 0x007f
|
|
|
|
/*
|
|
* void *__TBIDspramSaveA( short DspramSizes, void *pExt )
|
|
*/
|
|
.text
|
|
.balign 4
|
|
.global ___TBIDspramSaveA
|
|
.type ___TBIDspramSaveA,function
|
|
___TBIDspramSaveA:
|
|
|
|
SETL [A0StP++], D0.5, D1.5
|
|
MOV A0.3, D0Ar2
|
|
|
|
/* D1Ar1 - Dspram Sizes
|
|
* A0.4 - Pointer to buffer
|
|
*/
|
|
|
|
/* Save the specified amount of dspram DUA */
|
|
DL MOV D0AR.0, #0
|
|
LSR D1Ar1, D1Ar1, #_TBIECH_DSPRAM_DUA_S
|
|
AND D1Ar1, D1Ar1, #(_TBIECH_DSPRAM_DUA_BITS >> _TBIECH_DSPRAM_DUA_S)
|
|
SUB TXRPT, D1Ar1, #1
|
|
$L1:
|
|
DL MOV D0Re0, [D0AR.0++]
|
|
DL MOV D0Ar6, [D0AR.0++]
|
|
DL MOV D0Ar4, [D0AR.0++]
|
|
DL MOV D0.5, [D0AR.0++]
|
|
MSETL [A0.3++], D0Re0, D0Ar6, D0Ar4, D0.5
|
|
|
|
BR $L1
|
|
|
|
GETL D0.5, D1.5, [--A0StP]
|
|
MOV PC, D1RtP
|
|
|
|
.size ___TBIDspramSaveA,.-___TBIDspramSaveA
|
|
|
|
/*
|
|
* void *__TBIDspramSaveB( short DspramSizes, void *pExt )
|
|
*/
|
|
.balign 4
|
|
.global ___TBIDspramSaveB
|
|
.type ___TBIDspramSaveB,function
|
|
___TBIDspramSaveB:
|
|
|
|
SETL [A0StP++], D0.5, D1.5
|
|
MOV A0.3, D0Ar2
|
|
|
|
/* D1Ar1 - Dspram Sizes
|
|
* A0.3 - Pointer to buffer
|
|
*/
|
|
|
|
/* Save the specified amount of dspram DUA */
|
|
DL MOV D0BR.0, #0
|
|
LSR D1Ar1, D1Ar1, #_TBIECH_DSPRAM_DUB_S
|
|
AND D1Ar1, D1Ar1, #(_TBIECH_DSPRAM_DUB_BITS >> _TBIECH_DSPRAM_DUB_S)
|
|
SUB TXRPT, D1Ar1, #1
|
|
$L2:
|
|
DL MOV D0Re0, [D0BR.0++]
|
|
DL MOV D0Ar6, [D0BR.0++]
|
|
DL MOV D0Ar4, [D0BR.0++]
|
|
DL MOV D0.5, [D0BR.0++]
|
|
MSETL [A0.3++], D0Re0, D0Ar6, D0Ar4, D0.5
|
|
|
|
BR $L2
|
|
|
|
GETL D0.5, D1.5, [--A0StP]
|
|
MOV PC, D1RtP
|
|
|
|
.size ___TBIDspramSaveB,.-___TBIDspramSaveB
|
|
|
|
/*
|
|
* void *__TBIDspramRestoreA( short DspramSizes, void *pExt )
|
|
*/
|
|
.balign 4
|
|
.global ___TBIDspramRestoreA
|
|
.type ___TBIDspramRestoreA,function
|
|
___TBIDspramRestoreA:
|
|
|
|
SETL [A0StP++], D0.5, D1.5
|
|
MOV A0.3, D0Ar2
|
|
|
|
/* D1Ar1 - Dspram Sizes
|
|
* A0.3 - Pointer to buffer
|
|
*/
|
|
|
|
/* Restore the specified amount of dspram DUA */
|
|
DL MOV D0AW.0, #0
|
|
LSR D1Ar1, D1Ar1, #_TBIECH_DSPRAM_DUA_S
|
|
AND D1Ar1, D1Ar1, #(_TBIECH_DSPRAM_DUA_BITS >> _TBIECH_DSPRAM_DUA_S)
|
|
SUB TXRPT, D1Ar1, #1
|
|
$L3:
|
|
MGETL D0Re0, D0Ar6, D0Ar4, D0.5, [A0.3++]
|
|
DL MOV [D0AW.0++], D0Re0
|
|
DL MOV [D0AW.0++], D0Ar6
|
|
DL MOV [D0AW.0++], D0Ar4
|
|
DL MOV [D0AW.0++], D0.5
|
|
|
|
BR $L3
|
|
|
|
GETL D0.5, D1.5, [--A0StP]
|
|
MOV PC, D1RtP
|
|
|
|
.size ___TBIDspramRestoreA,.-___TBIDspramRestoreA
|
|
|
|
/*
|
|
* void *__TBIDspramRestoreB( short DspramSizes, void *pExt )
|
|
*/
|
|
.balign 4
|
|
.global ___TBIDspramRestoreB
|
|
.type ___TBIDspramRestoreB,function
|
|
___TBIDspramRestoreB:
|
|
|
|
SETL [A0StP++], D0.5, D1.5
|
|
MOV A0.3, D0Ar2
|
|
|
|
/* D1Ar1 - Dspram Sizes
|
|
* A0.3 - Pointer to buffer
|
|
*/
|
|
|
|
/* Restore the specified amount of dspram DUA */
|
|
DL MOV D0BW.0, #0
|
|
LSR D1Ar1, D1Ar1, #_TBIECH_DSPRAM_DUB_S
|
|
AND D1Ar1, D1Ar1, #(_TBIECH_DSPRAM_DUB_BITS >> _TBIECH_DSPRAM_DUB_S)
|
|
SUB TXRPT, D1Ar1, #1
|
|
$L4:
|
|
MGETL D0Re0, D0Ar6, D0Ar4, D0.5, [A0.3++]
|
|
DL MOV [D0BW.0++], D0Re0
|
|
DL MOV [D0BW.0++], D0Ar6
|
|
DL MOV [D0BW.0++], D0Ar4
|
|
DL MOV [D0BW.0++], D0.5
|
|
|
|
BR $L4
|
|
|
|
GETL D0.5, D1.5, [--A0StP]
|
|
MOV PC, D1RtP
|
|
|
|
.size ___TBIDspramRestoreB,.-___TBIDspramRestoreB
|
|
|
|
/*
|
|
* End of tbidspram.S
|
|
*/
|