You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
 

199 lines
12 KiB

;* ======================================================================== *;
;* TEXAS INSTRUMENTS, INC. *;
;* *;
;* DSPLIB DSP Signal Processing Library *;
;* *;
;* Release: Revision 1.04b *;
;* CVS Revision: 1.6 Sun Sep 29 03:32:27 2002 (UTC) *;
;* Snapshot date: 23-Oct-2003 *;
;* *;
;* This library contains proprietary intellectual property of Texas *;
;* Instruments, Inc. The library and its source code are protected by *;
;* various copyrights, and portions may also be protected by patents or *;
;* other legal protections. *;
;* *;
;* This software is licensed for use with Texas Instruments TMS320 *;
;* family DSPs. This license was provided to you prior to installing *;
;* the software. You may review this license by consulting the file *;
;* TI_license.PDF which accompanies the files in this library. *;
;* ------------------------------------------------------------------------ *;
;* Copyright (C) 2003 Texas Instruments, Incorporated. *;
;* All Rights Reserved. *;
;* ======================================================================== *;
;* ======================================================================== *;
;* Assembler compatibility shim for assembling 4.30 and later code on *;
;* tools prior to 4.30. *;
;* ======================================================================== *;
.if $isdefed(".ASSEMBLER_VERSION")
.asg .ASSEMBLER_VERSION, $asmver
.else
.asg 0, $asmver
.endif
.if ($asmver < 430)
.asg B, CALL ; Function Call
.asg B, RET ; Return from a Function
.asg B, CALLRET ; Function call with Call / Ret chaining.
.if .TMS320C6400
.asg BNOP, CALLNOP ; C64x BNOP as a Fn. Call
.asg BNOP, RETNOP ; C64x BNOP as a Fn. Return
.asg BNOP, CRNOP ; C64x Fn call w/, Call/Ret chaining via BNOP.
.endif
.asg , .asmfunc ; .func equivalent for hand-assembly code
.asg , .endasmfunc ; .endfunc equivalent for hand-assembly code
.endif
;* ======================================================================== *;
;* End of assembler compatibility shim. *;
;* ======================================================================== *;
* ========================================================================= *
* TEXAS INSTRUMENTS, INC. *
* *
* NAME *
* DSP_neg32 *
* *
* REVISION DATE *
* 10-Dec-2001 *
* *
* USAGE *
* This routine is C callable, and may be called using the following *
* C function prototype: *
* *
* void DSP_neg32 *
* ( *
* int *x, /* Input data array */ *
* int *r, /* Output data array */ *
* short nx /* Number of elements. */ *
* ); *
* *
* DESCRIPTION *
* This routine negates an array of 32-bit integers, and stores *
* the result either in a new array, or back to the same array. *
* *
* void DSP_neg32 *
* ( *
* int *x, /* Input data array */ *
* int *r, /* Output data array */ *
* short nx /* Number of elements. */ *
* ) *
* { *
* int i; *
* *
* for (i = 0; i < nx; i++) *
* r[i] = -x[i]; *
* } *
* *
* ASSUMPTIONS *
* The input must be at least 8 elements long, and a multiple of 4. *
* *
* The input and output arrays must not overlap, except in the *
* special case where the input and output pointers are exactly *
* equal. *
* *
* The x and r arrays must be double-word aligned *
* *
* MEMORY NOTE *
* No memory bank hits will occur. *
* This kernel is ENDIAN NEUTRAL. *
* *
* NOTES *
* Code is interrupt tolerant but not interruptible. It locks out *
* interrupts for its entire duration. *
* *
* CYCLES *
* cycles = nx/2 + 19. *
* nx = 96, cycles = 56 cycles *
* *
* CODESIZE *
* 124 bytes *
* *
* ------------------------------------------------------------------------- *
* Copyright (c) 2003 Texas Instruments, Incorporated. *
* All Rights Reserved. *
* ========================================================================= *
.sect ".text:_neg32"
.global _DSP_neg32
_DSP_neg32:
* ===================== SYMBOLIC REGISTER ASSIGNMENTS ===================== *
.asg A4, A_x
.asg B4, B_r
.asg A6, A_nx
.asg B5, B_x
.asg B19, B_x76
.asg B18, B_x54
.asg A19, A_x32
.asg A18, A_x10
.asg B9, B_r76
.asg B8, B_r54
.asg A17, A_r32
.asg A16, A_r10
.asg B0, B_p
.asg A5, A_r
.asg A0, A_i
* ========================================================================= *
* =========================== PIPE LOOP PROLOG ============================ *
B .S2 loop
|| SHR .S1 A_nx, 2, A_i
|| ADD .L2X A_x, 8, B_x
LDDW .D1T1 *A_x++[2], A_x32:A_x10 ;[ 1,1]
|| LDDW .D2T2 *B_x++[2], B_x76:B_x54 ;[ 1,1]
|| SUB A_i, 2, A_i
[ A_i]BDEC .S1 loop, A_i ;[ 4,2]
|| ADD .L1X B_r, 8, A_r
LDDW .D1T1 *A_x++[2], A_x32:A_x10 ;[ 1,2]
|| LDDW .D2T2 *B_x++[2], B_x76:B_x54 ;[ 1,2]
|| MVK 2, B_p
; ===== 2 prolog stages collapsed
* =========================== PIPE LOOP KERNEL ============================ *
loop:
[ B_p]SUB .L2 B_p, 1, B_p ;[ 8,1]
||[!B_p]STDW .D2T1 A_r32:A_r10, *B_r++[2] ;[ 8,1]
||[!B_p]STDW .D1T2 B_r76:B_r54, *A_r++[2] ;[ 8,1]
||[ A_i]BDEC .S1 loop, A_i ;[ 4,3]
NEG .S1 A_x10, A_r10 ;[ 7,2]
|| NEG .L1 A_x32, A_r32 ;[ 7,2]
|| NEG .L2 B_x54, B_r54 ;[ 7,2]
|| NEG .S2 B_x76, B_r76 ;[ 7,2]
|| LDDW .D1T1 *A_x++[2], A_x32:A_x10 ;[ 1,5]
|| LDDW .D2T2 *B_x++[2], B_x76:B_x54 ;[ 1,5]
* =========================== PIPE LOOP EPILOG ============================ *
; ===== 2 epilog stages collapsed
STDW .D2T1 A_r32:A_r10, *B_r++[2] ;[ 8,4]
|| STDW .D1T2 B_r76:B_r54, *A_r++[2] ;[ 8,4]
|| RET B3
NEG .S1 A_x10, A_r10 ;[ 7,5]
|| NEG .L1 A_x32, A_r32 ;[ 7,5]
|| NEG .L2 B_x54, B_r54 ;[ 7,5]
|| NEG .S2 B_x76, B_r76 ;[ 7,5]
STDW .D2T1 A_r32:A_r10, *B_r ;[ 8,5]
|| STDW .D1T2 B_r76:B_r54, *A_r ;[ 8,5]
NOP 3
* ========================================================================= *
* End of file: dsp_neg32.asm *
* ------------------------------------------------------------------------- *
* Copyright (c) 2003 Texas Instruments, Incorporated. *
* All Rights Reserved. *
* ========================================================================= *