Mercurial > cgi-bin > hgwebdir.cgi > PR > Applications > VSs > VSs__H264__App

annotate libavcodec/arm/mdct_neon.S @ 9:ea1ba68cf0ed

find changesets by author, revision, files, or words in the commit message
update to match api changes + add sscc produced source
author Nina Engelhardt <nengel@mailbox.tu-berlin.de>
date Wed, 05 Jun 2013 14:43:26 +0200
parents
children
rev   line source
nengel@2 1 /*
nengel@2 2 * ARM NEON optimised MDCT
nengel@2 3 * Copyright (c) 2009 Mans Rullgard <mans@mansr.com>
nengel@2 4 *
nengel@2 5 * This file is part of FFmpeg.
nengel@2 6 *
nengel@2 7 * FFmpeg is free software; you can redistribute it and/or
nengel@2 8 * modify it under the terms of the GNU Lesser General Public
nengel@2 9 * License as published by the Free Software Foundation; either
nengel@2 10 * version 2.1 of the License, or (at your option) any later version.
nengel@2 11 *
nengel@2 12 * FFmpeg is distributed in the hope that it will be useful,
nengel@2 13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
nengel@2 14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
nengel@2 15 * Lesser General Public License for more details.
nengel@2 16 *
nengel@2 17 * You should have received a copy of the GNU Lesser General Public
nengel@2 18 * License along with FFmpeg; if not, write to the Free Software
nengel@2 19 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
nengel@2 20 */
nengel@2 21
nengel@2 22 #include "asm.S"
nengel@2 23
nengel@2 24 preserve8
nengel@2 25
nengel@2 26 .text
nengel@2 27
nengel@2 28 #define ff_fft_calc_neon X(ff_fft_calc_neon)
nengel@2 29
nengel@2 30 function ff_imdct_half_neon, export=1
nengel@2 31 push {r4-r8,lr}
nengel@2 32
nengel@2 33 mov r12, #1
nengel@2 34 ldr lr, [r0, #28] @ mdct_bits
nengel@2 35 ldr r4, [r0, #32] @ tcos
nengel@2 36 ldr r3, [r0, #8] @ revtab
nengel@2 37 lsl r12, r12, lr @ n = 1 << nbits
nengel@2 38 lsr lr, r12, #2 @ n4 = n >> 2
nengel@2 39 add r7, r2, r12, lsl #1
nengel@2 40 mov r12, #-16
nengel@2 41 sub r7, r7, #16
nengel@2 42
nengel@2 43 vld2.32 {d16-d17},[r7,:128],r12 @ d16=x,n1 d17=x,n0
nengel@2 44 vld2.32 {d0-d1}, [r2,:128]! @ d0 =m0,x d1 =m1,x
nengel@2 45 vrev64.32 d17, d17
nengel@2 46 vld2.32 {d2,d3}, [r4,:128]! @ d2=c0,c1 d3=s0,s2
nengel@2 47 vmul.f32 d6, d17, d2
nengel@2 48 vmul.f32 d7, d0, d2
nengel@2 49 1:
nengel@2 50 subs lr, lr, #2
nengel@2 51 ldr r6, [r3], #4
nengel@2 52 vmul.f32 d4, d0, d3
nengel@2 53 vmul.f32 d5, d17, d3
nengel@2 54 vsub.f32 d4, d6, d4
nengel@2 55 vadd.f32 d5, d5, d7
nengel@2 56 uxth r8, r6, ror #16
nengel@2 57 uxth r6, r6
nengel@2 58 add r8, r1, r8, lsl #3
nengel@2 59 add r6, r1, r6, lsl #3
nengel@2 60 beq 1f
nengel@2 61 vld2.32 {d16-d17},[r7,:128],r12
nengel@2 62 vld2.32 {d0-d1}, [r2,:128]!
nengel@2 63 vrev64.32 d17, d17
nengel@2 64 vld2.32 {d2,d3}, [r4,:128]! @ d2=c0,c1 d3=s0,s2
nengel@2 65 vmul.f32 d6, d17, d2
nengel@2 66 vmul.f32 d7, d0, d2
nengel@2 67 vst2.32 {d4[0],d5[0]}, [r6,:64]
nengel@2 68 vst2.32 {d4[1],d5[1]}, [r8,:64]
nengel@2 69 b 1b
nengel@2 70 1:
nengel@2 71 vst2.32 {d4[0],d5[0]}, [r6,:64]
nengel@2 72 vst2.32 {d4[1],d5[1]}, [r8,:64]
nengel@2 73
nengel@2 74 mov r4, r0
nengel@2 75 mov r6, r1
nengel@2 76 bl ff_fft_calc_neon
nengel@2 77
nengel@2 78 mov r12, #1
nengel@2 79 ldr lr, [r4, #28] @ mdct_bits
nengel@2 80 ldr r4, [r4, #32] @ tcos
nengel@2 81 lsl r12, r12, lr @ n = 1 << nbits
nengel@2 82 lsr lr, r12, #3 @ n8 = n >> 3
nengel@2 83
nengel@2 84 add r4, r4, lr, lsl #3
nengel@2 85 add r6, r6, lr, lsl #3
nengel@2 86 sub r1, r4, #16
nengel@2 87 sub r3, r6, #16
nengel@2 88
nengel@2 89 mov r7, #-16
nengel@2 90 mov r8, r6
nengel@2 91 mov r0, r3
nengel@2 92
nengel@2 93 vld2.32 {d0-d1}, [r3,:128], r7 @ d0 =i1,r1 d1 =i0,r0
nengel@2 94 vld2.32 {d20-d21},[r6,:128]! @ d20=i2,r2 d21=i3,r3
nengel@2 95 vld2.32 {d16,d18},[r1,:128], r7 @ d16=c1,c0 d18=s1,s0
nengel@2 96 1:
nengel@2 97 subs lr, lr, #2
nengel@2 98 vmul.f32 d7, d0, d18
nengel@2 99 vld2.32 {d17,d19},[r4,:128]! @ d17=c2,c3 d19=s2,s3
nengel@2 100 vmul.f32 d4, d1, d18
nengel@2 101 vmul.f32 d5, d21, d19
nengel@2 102 vmul.f32 d6, d20, d19
nengel@2 103 vmul.f32 d22, d1, d16
nengel@2 104 vmul.f32 d23, d21, d17
nengel@2 105 vmul.f32 d24, d0, d16
nengel@2 106 vmul.f32 d25, d20, d17
nengel@2 107 vadd.f32 d7, d7, d22
nengel@2 108 vadd.f32 d6, d6, d23
nengel@2 109 vsub.f32 d4, d4, d24
nengel@2 110 vsub.f32 d5, d5, d25
nengel@2 111 beq 1f
nengel@2 112 vld2.32 {d0-d1}, [r3,:128], r7
nengel@2 113 vld2.32 {d20-d21},[r6,:128]!
nengel@2 114 vld2.32 {d16,d18},[r1,:128], r7 @ d16=c1,c0 d18=s1,s0
nengel@2 115 vrev64.32 q3, q3
nengel@2 116 vst2.32 {d4,d6}, [r0,:128], r7
nengel@2 117 vst2.32 {d5,d7}, [r8,:128]!
nengel@2 118 b 1b
nengel@2 119 1:
nengel@2 120 vrev64.32 q3, q3
nengel@2 121 vst2.32 {d4,d6}, [r0,:128]
nengel@2 122 vst2.32 {d5,d7}, [r8,:128]
nengel@2 123
nengel@2 124 pop {r4-r8,pc}
nengel@2 125 endfunc
nengel@2 126
nengel@2 127 function ff_imdct_calc_neon, export=1
nengel@2 128 push {r4-r6,lr}
nengel@2 129
nengel@2 130 ldr r3, [r0, #28]
nengel@2 131 mov r4, #1
nengel@2 132 mov r5, r1
nengel@2 133 lsl r4, r4, r3
nengel@2 134 add r1, r1, r4
nengel@2 135
nengel@2 136 bl ff_imdct_half_neon
nengel@2 137
nengel@2 138 add r0, r5, r4, lsl #2
nengel@2 139 add r1, r5, r4, lsl #1
nengel@2 140 sub r0, r0, #8
nengel@2 141 sub r2, r1, #16
nengel@2 142 mov r3, #-16
nengel@2 143 mov r6, #-8
nengel@2 144 vmov.i32 d30, #1<<31
nengel@2 145 1:
nengel@2 146 vld1.32 {d0-d1}, [r2,:128], r3
nengel@2 147 pld [r0, #-16]
nengel@2 148 vrev64.32 q0, q0
nengel@2 149 vld1.32 {d2-d3}, [r1,:128]!
nengel@2 150 veor d4, d1, d30
nengel@2 151 pld [r2, #-16]
nengel@2 152 vrev64.32 q1, q1
nengel@2 153 veor d5, d0, d30
nengel@2 154 vst1.32 {d2}, [r0,:64], r6
nengel@2 155 vst1.32 {d3}, [r0,:64], r6
nengel@2 156 vst1.32 {d4-d5}, [r5,:128]!
nengel@2 157 subs r4, r4, #16
nengel@2 158 bgt 1b
nengel@2 159
nengel@2 160 pop {r4-r6,pc}
nengel@2 161 endfunc
nengel@2 162
nengel@2 163 function ff_mdct_calc_neon, export=1
nengel@2 164 push {r4-r10,lr}
nengel@2 165
nengel@2 166 mov r12, #1
nengel@2 167 ldr lr, [r0, #28] @ mdct_bits
nengel@2 168 ldr r4, [r0, #32] @ tcos
nengel@2 169 ldr r3, [r0, #8] @ revtab
nengel@2 170 lsl lr, r12, lr @ n = 1 << nbits
nengel@2 171 add r7, r2, lr @ in4u
nengel@2 172 sub r9, r7, #16 @ in4d
nengel@2 173 add r2, r7, lr, lsl #1 @ in3u
nengel@2 174 add r8, r9, lr, lsl #1 @ in3d
nengel@2 175 add r5, r4, lr, lsl #1
nengel@2 176 sub r5, r5, #16
nengel@2 177 sub r3, r3, #4
nengel@2 178 mov r12, #-16
nengel@2 179
nengel@2 180 vld2.32 {d16,d18},[r9,:128],r12 @ in0u0,in0u1 in4d1,in4d0
nengel@2 181 vld2.32 {d17,d19},[r8,:128],r12 @ in2u0,in2u1 in3d1,in3d0
nengel@2 182 vld2.32 {d0, d2}, [r7,:128]! @ in4u0,in4u1 in2d1,in2d0
nengel@2 183 vrev64.32 q9, q9 @ in4d0,in4d1 in3d0,in3d1
nengel@2 184 vld2.32 {d1, d3}, [r2,:128]! @ in3u0,in3u1 in1d1,in1d0
nengel@2 185 vsub.f32 d0, d18, d0 @ in4d-in4u I
nengel@2 186 vld2.32 {d20,d21},[r4,:128]! @ c0,c1 s0,s1
nengel@2 187 vrev64.32 q1, q1 @ in2d0,in2d1 in1d0,in1d1
nengel@2 188 vld2.32 {d30,d31},[r5,:128],r12 @ c2,c3 s2,s3
nengel@2 189 vadd.f32 d1, d1, d19 @ in3u+in3d -R
nengel@2 190 vsub.f32 d16, d16, d2 @ in0u-in2d R
nengel@2 191 vadd.f32 d17, d17, d3 @ in2u+in1d -I
nengel@2 192 1:
nengel@2 193 vmul.f32 d7, d0, d21 @ I*s
nengel@2 194 ldr r10, [r3, lr, lsr #1]
nengel@2 195 vmul.f32 d6, d1, d20 @ -R*c
nengel@2 196 ldr r6, [r3, #4]!
nengel@2 197 vmul.f32 d4, d1, d21 @ -R*s
nengel@2 198 vmul.f32 d5, d0, d20 @ I*c
nengel@2 199 vmul.f32 d24, d16, d30 @ R*c
nengel@2 200 vmul.f32 d25, d17, d31 @ -I*s
nengel@2 201 vmul.f32 d22, d16, d31 @ R*s
nengel@2 202 vmul.f32 d23, d17, d30 @ I*c
nengel@2 203 subs lr, lr, #16
nengel@2 204 vsub.f32 d6, d6, d7 @ -R*c-I*s
nengel@2 205 vadd.f32 d7, d4, d5 @ -R*s+I*c
nengel@2 206 vsub.f32 d24, d25, d24 @ I*s-R*c
nengel@2 207 vadd.f32 d25, d22, d23 @ R*s-I*c
nengel@2 208 beq 1f
nengel@2 209 mov r12, #-16
nengel@2 210 vld2.32 {d16,d18},[r9,:128],r12 @ in0u0,in0u1 in4d1,in4d0
nengel@2 211 vld2.32 {d17,d19},[r8,:128],r12 @ in2u0,in2u1 in3d1,in3d0
nengel@2 212 vneg.f32 d7, d7 @ R*s-I*c
nengel@2 213 vld2.32 {d0, d2}, [r7,:128]! @ in4u0,in4u1 in2d1,in2d0
nengel@2 214 vrev64.32 q9, q9 @ in4d0,in4d1 in3d0,in3d1
nengel@2 215 vld2.32 {d1, d3}, [r2,:128]! @ in3u0,in3u1 in1d1,in1d0
nengel@2 216 vsub.f32 d0, d18, d0 @ in4d-in4u I
nengel@2 217 vld2.32 {d20,d21},[r4,:128]! @ c0,c1 s0,s1
nengel@2 218 vrev64.32 q1, q1 @ in2d0,in2d1 in1d0,in1d1
nengel@2 219 vld2.32 {d30,d31},[r5,:128],r12 @ c2,c3 s2,s3
nengel@2 220 vadd.f32 d1, d1, d19 @ in3u+in3d -R
nengel@2 221 vsub.f32 d16, d16, d2 @ in0u-in2d R
nengel@2 222 vadd.f32 d17, d17, d3 @ in2u+in1d -I
nengel@2 223 uxth r12, r6, ror #16
nengel@2 224 uxth r6, r6
nengel@2 225 add r12, r1, r12, lsl #3
nengel@2 226 add r6, r1, r6, lsl #3
nengel@2 227 vst2.32 {d6[0],d7[0]}, [r6,:64]
nengel@2 228 vst2.32 {d6[1],d7[1]}, [r12,:64]
nengel@2 229 uxth r6, r10, ror #16
nengel@2 230 uxth r10, r10
nengel@2 231 add r6 , r1, r6, lsl #3
nengel@2 232 add r10, r1, r10, lsl #3
nengel@2 233 vst2.32 {d24[0],d25[0]},[r10,:64]
nengel@2 234 vst2.32 {d24[1],d25[1]},[r6,:64]
nengel@2 235 b 1b
nengel@2 236 1:
nengel@2 237 vneg.f32 d7, d7 @ R*s-I*c
nengel@2 238 uxth r12, r6, ror #16
nengel@2 239 uxth r6, r6
nengel@2 240 add r12, r1, r12, lsl #3
nengel@2 241 add r6, r1, r6, lsl #3
nengel@2 242 vst2.32 {d6[0],d7[0]}, [r6,:64]
nengel@2 243 vst2.32 {d6[1],d7[1]}, [r12,:64]
nengel@2 244 uxth r6, r10, ror #16
nengel@2 245 uxth r10, r10
nengel@2 246 add r6 , r1, r6, lsl #3
nengel@2 247 add r10, r1, r10, lsl #3
nengel@2 248 vst2.32 {d24[0],d25[0]},[r10,:64]
nengel@2 249 vst2.32 {d24[1],d25[1]},[r6,:64]
nengel@2 250
nengel@2 251 mov r4, r0
nengel@2 252 mov r6, r1
nengel@2 253 bl ff_fft_calc_neon
nengel@2 254
nengel@2 255 mov r12, #1
nengel@2 256 ldr lr, [r4, #28] @ mdct_bits
nengel@2 257 ldr r4, [r4, #32] @ tcos
nengel@2 258 lsl r12, r12, lr @ n = 1 << nbits
nengel@2 259 lsr lr, r12, #3 @ n8 = n >> 3
nengel@2 260
nengel@2 261 add r4, r4, lr, lsl #3
nengel@2 262 add r6, r6, lr, lsl #3
nengel@2 263 sub r1, r4, #16
nengel@2 264 sub r3, r6, #16
nengel@2 265
nengel@2 266 mov r7, #-16
nengel@2 267 mov r8, r6
nengel@2 268 mov r0, r3
nengel@2 269
nengel@2 270 vld2.32 {d0-d1}, [r3,:128], r7 @ d0 =r1,i1 d1 =r0,i0
nengel@2 271 vld2.32 {d20-d21},[r6,:128]! @ d20=r2,i2 d21=r3,i3
nengel@2 272 vld2.32 {d16,d18},[r1,:128], r7 @ c1,c0 s1,s0
nengel@2 273 1:
nengel@2 274 subs lr, lr, #2
nengel@2 275 vmul.f32 d7, d0, d18 @ r1*s1,r0*s0
nengel@2 276 vld2.32 {d17,d19},[r4,:128]! @ c2,c3 s2,s3
nengel@2 277 vmul.f32 d4, d1, d18 @ i1*s1,i0*s0
nengel@2 278 vmul.f32 d5, d21, d19 @ i2*s2,i3*s3
nengel@2 279 vmul.f32 d6, d20, d19 @ r2*s2,r3*s3
nengel@2 280 vmul.f32 d24, d0, d16 @ r1*c1,r0*c0
nengel@2 281 vmul.f32 d25, d20, d17 @ r2*c2,r3*c3
nengel@2 282 vmul.f32 d22, d21, d17 @ i2*c2,i3*c3
nengel@2 283 vmul.f32 d23, d1, d16 @ i1*c1,i0*c0
nengel@2 284 vadd.f32 d4, d4, d24 @ i1*s1+r1*c1,i0*s0+r0*c0
nengel@2 285 vadd.f32 d5, d5, d25 @ i2*s2+r2*c2,i3*s3+r3*c3
nengel@2 286 vsub.f32 d6, d22, d6 @ i2*c2-r2*s2,i3*c3-r3*s3
nengel@2 287 vsub.f32 d7, d23, d7 @ i1*c1-r1*s1,i0*c0-r0*s0
nengel@2 288 vneg.f32 q2, q2
nengel@2 289 beq 1f
nengel@2 290 vld2.32 {d0-d1}, [r3,:128], r7
nengel@2 291 vld2.32 {d20-d21},[r6,:128]!
nengel@2 292 vld2.32 {d16,d18},[r1,:128], r7 @ c1,c0 s1,s0
nengel@2 293 vrev64.32 q3, q3
nengel@2 294 vst2.32 {d4,d6}, [r0,:128], r7
nengel@2 295 vst2.32 {d5,d7}, [r8,:128]!
nengel@2 296 b 1b
nengel@2 297 1:
nengel@2 298 vrev64.32 q3, q3
nengel@2 299 vst2.32 {d4,d6}, [r0,:128]
nengel@2 300 vst2.32 {d5,d7}, [r8,:128]
nengel@2 301
nengel@2 302 pop {r4-r10,pc}
nengel@2 303 endfunc