| ; ------------------------------------------------------------------ |
| ; Copyright (C) 1998-2009 PacketVideo |
| ; |
| ; Licensed under the Apache License, Version 2.0 (the "License"); |
| ; you may not use this file except in compliance with the License. |
| ; You may obtain a copy of the License at |
| ; |
| ; http://www.apache.org/licenses/LICENSE-2.0 |
| ; |
| ; Unless required by applicable law or agreed to in writing, software |
| ; distributed under the License is distributed on an "AS IS" BASIS, |
| ; WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either |
| ; express or implied. |
| ; See the License for the specific language governing permissions |
| ; and limitations under the License. |
| ; ------------------------------------------------------------------- |
| |
| ; |
| ; |
| ; Filename: pvmp3_dct_18.s |
| ; |
| ;------------------------------------------------------------------------------ |
| ; REVISION HISTORY |
| ; |
| ; |
| ; Who: Date: MM/DD/YYYY |
| ; Description: |
| ; |
| ;------------------------------------------------------------------------------ |
| |
| EXPORT pvmp3_mdct_18 |
| |
| IMPORT ||Lib$$Request$$armlib|| [WEAK] |
| IMPORT ||Lib$$Request$$cpplib|| [WEAK] |
| IMPORT pvmp3_dct_9 |
| |
| |
| ;------------------------------------------------------------------------------ |
| |
| AREA |.text|, CODE, READONLY, ALIGN=2 |
| |
| |
| ;------------------------------------------------------------------------------ |
| |
| |pvmp3_mdct_18| PROC |
| stmfd sp!,{r4-r10,lr} |
| mov r7,r2 |
| ldr r2,table |
| mov r6,r1 |
| add r3,r2,#0x24 |
| add r12,r3,#0x44 |
| add r1,r0,#0x44 |
| mov r5,r0 |
| |
| ; for ( i=9; i!=0; i--) |
| ; { |
| |
| mov r4,#9 |
| Loop_1 |
| |
| ; tmp = *(pt_vec); |
| ; tmp1 = *(pt_vec_o); |
| |
| ldr lr,[r0] ;; tmp == lr |
| ldr r8,[r3],#4 ;; tmp1 == r8 |
| |
| ; tmp = fxp_mul32_Q32( tmp<<1, *(pt_cos++ )); |
| ; tmp1 = fxp_mul32_Q27( tmp1, *(pt_cos_x--)); |
| |
| mov lr,lr,lsl #1 |
| smull r10,lr,r8,lr |
| ldr r8,[r12],#-4 |
| ldr r9,[r1] |
| subs r4,r4,#1 |
| smull r9,r10,r8,r9 |
| mov r8,r9,lsr #27 |
| add r8,r8,r10,lsl #5 |
| |
| ; *(pt_vec++) = tmp + tmp1 ; |
| ; *(pt_vec_o--) = fxp_mul32_Q28( (tmp - tmp1), *(pt_cos_split++)); |
| |
| add r9,lr,r8 |
| sub r8,lr,r8 |
| ldr lr,[r2],#4 |
| str r9,[r0],#4 |
| smull r8,r9,lr,r8 |
| mov lr,r8,lsr #28 |
| add lr,lr,r9,lsl #4 |
| str lr,[r1],#-4 |
| bne Loop_1 |
| |
| ; } |
| |
| mov r0,r5 ;; r0 = vec |
| bl pvmp3_dct_9 |
| add r0,r5,#0x24 ;; r0 = &vec[9] |
| bl pvmp3_dct_9 |
| |
| ldr r0,[r5,#0x20] |
| ldr r2,[r5,#0x40] |
| str r0,[r5,#0x40] |
| ldr r0,[r5,#0x1c] |
| ldr r3,[r5,#0x38] |
| str r0,[r5,#0x38] |
| ldr r1,[r5,#0x18] |
| ldr r0,[r5,#0x30] |
| str r1,[r5,#0x30] |
| ldr r12,[r5,#0x14] |
| ldr r1,[r5,#0x28] |
| str r12,[r5,#0x28] |
| ldr r12,[r5,#0x10] |
| str r12,[r5,#0x20] |
| ldr r12,[r5,#0xc] |
| str r12,[r5,#0x18] |
| ldr r12,[r5,#8] |
| str r12,[r5,#0x10] |
| ldr r12,[r5,#4] |
| str r12,[r5,#8] |
| ldr r12,[r5,#0x24] |
| sub r12,r12,r1 |
| str r12,[r5,#4] |
| ldr r12,[r5,#0x2c] |
| sub r1,r12,r1 |
| str r1,[r5,#0xc] |
| sub r1,r12,r0 |
| str r1,[r5,#0x14] |
| ldr r1,[r5,#0x34] |
| sub r0,r1,r0 |
| str r0,[r5,#0x1c] |
| sub r0,r1,r3 |
| str r0,[r5,#0x24] |
| ldr r1,[r5,#0x3c] |
| sub r3,r1,r3 |
| sub r1,r1,r2 |
| str r1,[r5,#0x34] |
| str r3,[r5,#0x2c] |
| ldr r1,[r5,#0x44] |
| sub r1,r1,r2 |
| str r1,[r5,#0x3c] |
| ldr r12,[r5,#0] |
| |
| Loop_2 |
| add r1,r5,r4,lsl #2 |
| ldr r2,[r1,#0x28] |
| ldr r3,[r6,r4,lsl #2] |
| add r0,r0,r2 |
| str r0,[r1,#0x28] |
| ldr lr,[r7,r4,lsl #2] |
| ldr r1,[r1,#4] |
| smlal r0,r3,lr,r0 |
| mov r0,r2 |
| add r2,r12,r1 |
| rsb r2,r2,#0 |
| str r3,[r5,r4,lsl #2] |
| str r2,[r6,r4,lsl #2] |
| add r4,r4,#1 |
| cmp r4,#6 |
| mov r12,r1 |
| |
| blt Loop_2 |
| |
| ldr r1,[r5,#0x40] |
| ldr r2,[r6,#0x18] |
| add r3,r0,r1 |
| str r3,[r5,#0x40] |
| ldr lr,[r7,r4,lsl #2] |
| mov r3,r3,lsl #1 |
| ldr r0,[r5,#0x1c] |
| smlal r3,r2,lr,r3 |
| add r3,r12,r0 |
| str r2,[r5,#0x18] |
| ldr r2,[r6,#0x1c] |
| rsb r3,r3,#0 |
| str r3,[r6,#0x18] |
| ldr r3,[r5,#0x20] |
| add r0,r3,r0 |
| rsb r0,r0,#0 |
| str r0,[r6,#0x1c] |
| ldr r3,[r5,#0x44] |
| ldr r0,[r6,#0x20] |
| add r3,r3,r1 |
| mov r1,r2 |
| ldr r10,[r7,#0x1c] |
| mov r2,r3,lsl #1 |
| smlal r12,r1,r10,r2 |
| str r1,[r5,#0x1c] |
| ldr r1,[r5,#0x20] |
| ldr r3,[r5,#0x24] |
| add r1,r1,r3 |
| rsb r1,r1,#0 |
| str r1,[r6,#0x20] |
| ldr r1,[r5,#0x44] |
| ldr r3,[r7,#0x20] |
| mov r1,r1,lsl #1 |
| smlal r12,r0,r3,r1 |
| ldr lr,[r7,#0x24] |
| ldr r3,[r6,#0x24] |
| str r0,[r5,#0x20] |
| smlal r1,r3,lr,r1 |
| ldr r0,[r6,#0x40] |
| ldr r12,[r6,#0x44] |
| str r3,[r5,#0x24] |
| ldr r1,[r5,#0x28] |
| ldr r3,[r7,#0x44] |
| mov r1,r1,lsl #1 |
| smlal r1,r12,r3,r1 |
| ldr r1,[r5,#0x40] |
| str r12,[r5,#0x44] |
| rsb r8,r1,#0 |
| str r8,[r5,#0x28] |
| ldr r1,[r5,#0x2c] |
| ldr r3,[r7,#0x40] |
| mov r1,r1,lsl #1 |
| smlal r1,r0,r3,r1 |
| str r0,[r5,#0x40] |
| ldr r0,[r5,#0x3c] |
| ldr r1,[r6,#0x38] |
| ldr r3,[r6,#0x3c] |
| rsb r9,r0,#0 |
| str r9,[r5,#0x2c] |
| ldr r0,[r5,#0x30] |
| ldr r12,[r7,#0x3c] |
| mov r0,r0,lsl #1 |
| smlal r0,r3,r12,r0 |
| str r3,[r5,#0x3c] |
| ldr r0,[r5,#0x38] |
| rsb r0,r0,#0 |
| str r0,[r5,#0x30] |
| ldr r3,[r5,#0x34] |
| ldr r12,[r7,#0x38] |
| mov r3,r3,lsl #1 |
| smlal r3,r1,r12,r3 |
| mov r0,r0,lsl #1 |
| str r1,[r5,#0x38] |
| ldr r4,[r7,#0x34] |
| ldr r1,[r6,#0x34] |
| ldr r3,[r6,#0x30] |
| smlal r0,r1,r4,r0 |
| ldr r12,[r6,#0x2c] |
| ldr lr,[r6,#0x28] |
| str r1,[r5,#0x34] |
| ldr r1,[r7,#0x30] |
| mov r0,r9,lsl #1 |
| smlal r0,r3,r1,r0 |
| mov r0,r8,lsl #1 |
| ldr r1,[r7,#0x2c] |
| str r3,[r5,#0x30] |
| smlal r0,r12,r1,r0 |
| ldr r0,[r7,#0x28] |
| str r12,[r5,#0x2c] |
| smlal r2,lr,r0,r2 |
| str lr,[r5,#0x28] |
| ldr r1,[r6,#4] |
| ldr r12,[r7,#0x48] |
| mov r2,r1,lsl #1 |
| ldr r1,[r6,#0x20] |
| ldr r0,[r6] |
| mov r1,r1,lsl #1 |
| smull r4,lr,r12,r1 |
| ldr r3,[r6,#0x1c] |
| str lr,[r6] |
| ldr r12,[r7,#0x4c] |
| mov r3,r3,lsl #1 |
| smull r4,lr,r12,r3 |
| mov r0,r0,lsl #1 |
| ldr r12,[r7,#0x64] |
| str lr,[r6,#4] |
| smull r4,lr,r12,r2 |
| ldr r12,[r7,#0x68] |
| str lr,[r6,#0x1c] |
| smull r4,lr,r12,r0 |
| ldr r12,[r7,#0x6c] |
| str lr,[r6,#0x20] |
| smull lr,r0,r12,r0 |
| ldr r12,[r7,#0x70] |
| str r0,[r6,#0x24] |
| smull r0,r2,r12,r2 |
| ldr r0,[r7,#0x88] |
| str r2,[r6,#0x28] |
| smull r3,r2,r0,r3 |
| ldr r0,[r7,#0x8c] |
| str r2,[r6,#0x40] |
| smull r2,r1,r0,r1 |
| str r1,[r6,#0x44] |
| ldr r0,[r6,#0x18] |
| ldr lr,[r7,#0x50] |
| mov r1,r0,lsl #1 |
| ldr r0,[r6,#0x14] |
| smull r5,r4,lr,r1 |
| ldr r12,[r6,#0x10] |
| mov r3,r0,lsl #1 |
| ldr r0,[r6,#0xc] |
| mov r12,r12,lsl #1 |
| mov r2,r0,lsl #1 |
| ldr r0,[r6,#8] |
| str r4,[r6,#8] |
| ldr lr,[r7,#0x54] |
| mov r0,r0,lsl #1 |
| smull r5,r4,lr,r3 |
| ldr lr,[r7,#0x58] |
| str r4,[r6,#0xc] |
| smull r5,r4,lr,r12 |
| ldr lr,[r7,#0x5c] |
| str r4,[r6,#0x10] |
| smull r5,r4,lr,r2 |
| ldr lr,[r7,#0x60] |
| str r4,[r6,#0x14] |
| smull r5,r4,lr,r0 |
| ldr lr,[r7,#0x74] |
| str r4,[r6,#0x18] |
| smull r4,r0,lr,r0 |
| ldr lr,[r7,#0x78] |
| str r0,[r6,#0x2c] |
| smull r0,r2,lr,r2 |
| ldr r0,[r7,#0x7c] |
| str r2,[r6,#0x30] |
| smull r12,r2,r0,r12 |
| ldr r0,[r7,#0x80] |
| str r2,[r6,#0x34] |
| smull r3,r2,r0,r3 |
| ldr r0,[r7,#0x84] |
| str r2,[r6,#0x38] |
| smull r2,r1,r0,r1 |
| str r1,[r6,#0x3c] |
| ldmfd sp!,{r4-r10,pc} |
| table |
| DCD ||.constdata$1|| |
| ENDP |
| |
| ;------------------------------------------------------------------------------ |
| |
| AREA |.constdata|, DATA, READONLY, ALIGN=2 |
| |
| ;------------------------------------------------------------------------------ |
| |
| ||.constdata$1|| |
| cosTerms_dct18 |
| DCD 0x0807d2b0 |
| DCD 0x08483ee0 |
| DCD 0x08d3b7d0 |
| DCD 0x09c42570 |
| DCD 0x0b504f30 |
| DCD 0x0df29440 |
| DCD 0x12edfb20 |
| DCD 0x1ee8dd40 |
| DCD 0x5bca2a00 |
| cosTerms_1_ov_cos_phi |
| DCD 0x400f9c00 |
| DCD 0x408d6080 |
| DCD 0x418dcb80 |
| DCD 0x431b1a00 |
| DCD 0x4545ea00 |
| DCD 0x48270680 |
| DCD 0x4be25480 |
| DCD 0x50ab9480 |
| DCD 0x56ce4d80 |
| DCD 0x05ebb630 |
| DCD 0x06921a98 |
| DCD 0x0771d3a8 |
| DCD 0x08a9a830 |
| DCD 0x0a73d750 |
| DCD 0x0d4d5260 |
| DCD 0x127b1ca0 |
| DCD 0x1ea52b40 |
| DCD 0x5bb3cc80 |
| |
| |
| |
| END |
