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.

373 lines
19KB

  1. /*
  2. * Copyright (c) 2012
  3. * MIPS Technologies, Inc., California.
  4. *
  5. * Redistribution and use in source and binary forms, with or without
  6. * modification, are permitted provided that the following conditions
  7. * are met:
  8. * 1. Redistributions of source code must retain the above copyright
  9. * notice, this list of conditions and the following disclaimer.
  10. * 2. Redistributions in binary form must reproduce the above copyright
  11. * notice, this list of conditions and the following disclaimer in the
  12. * documentation and/or other materials provided with the distribution.
  13. * 3. Neither the name of the MIPS Technologies, Inc., nor the names of its
  14. * contributors may be used to endorse or promote products derived from
  15. * this software without specific prior written permission.
  16. *
  17. * THIS SOFTWARE IS PROVIDED BY THE MIPS TECHNOLOGIES, INC. ``AS IS'' AND
  18. * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  19. * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  20. * ARE DISCLAIMED. IN NO EVENT SHALL THE MIPS TECHNOLOGIES, INC. BE LIABLE
  21. * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  22. * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  23. * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  24. * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  25. * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  26. * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  27. * SUCH DAMAGE.
  28. *
  29. * Author: Branimir Vasic (bvasic@mips.com)
  30. *
  31. * Various AC-3 DSP Utils optimized for MIPS
  32. *
  33. * This file is part of FFmpeg.
  34. *
  35. * FFmpeg is free software; you can redistribute it and/or
  36. * modify it under the terms of the GNU Lesser General Public
  37. * License as published by the Free Software Foundation; either
  38. * version 2.1 of the License, or (at your option) any later version.
  39. *
  40. * FFmpeg is distributed in the hope that it will be useful,
  41. * but WITHOUT ANY WARRANTY; without even the implied warranty of
  42. * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  43. * Lesser General Public License for more details.
  44. *
  45. * You should have received a copy of the GNU Lesser General Public
  46. * License along with FFmpeg; if not, write to the Free Software
  47. * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
  48. */
  49. /**
  50. * @file
  51. * Reference: libavcodec/ac3dsp.c
  52. */
  53. #include "config.h"
  54. #include "libavcodec/ac3dsp.h"
  55. #include "libavcodec/ac3.h"
  56. #if HAVE_INLINE_ASM
  57. #if HAVE_MIPSDSPR1
  58. static void ac3_bit_alloc_calc_bap_mips(int16_t *mask, int16_t *psd,
  59. int start, int end,
  60. int snr_offset, int floor,
  61. const uint8_t *bap_tab, uint8_t *bap)
  62. {
  63. int band, band_end, cond;
  64. int m, address1, address2;
  65. int16_t *psd1, *psd_end;
  66. uint8_t *bap1;
  67. if (snr_offset == -960) {
  68. memset(bap, 0, AC3_MAX_COEFS);
  69. return;
  70. }
  71. psd1 = &psd[start];
  72. bap1 = &bap[start];
  73. band = ff_ac3_bin_to_band_tab[start];
  74. do {
  75. m = (FFMAX(mask[band] - snr_offset - floor, 0) & 0x1FE0) + floor;
  76. band_end = ff_ac3_band_start_tab[++band];
  77. band_end = FFMIN(band_end, end);
  78. psd_end = psd + band_end - 1;
  79. __asm__ volatile (
  80. "slt %[cond], %[psd1], %[psd_end] \n\t"
  81. "beqz %[cond], 1f \n\t"
  82. "2: \n\t"
  83. "lh %[address1], 0(%[psd1]) \n\t"
  84. "lh %[address2], 2(%[psd1]) \n\t"
  85. "addiu %[psd1], %[psd1], 4 \n\t"
  86. "subu %[address1], %[address1], %[m] \n\t"
  87. "sra %[address1], %[address1], 5 \n\t"
  88. "addiu %[address1], %[address1], -32 \n\t"
  89. "shll_s.w %[address1], %[address1], 26 \n\t"
  90. "subu %[address2], %[address2], %[m] \n\t"
  91. "sra %[address2], %[address2], 5 \n\t"
  92. "sra %[address1], %[address1], 26 \n\t"
  93. "addiu %[address1], %[address1], 32 \n\t"
  94. "lbux %[address1], %[address1](%[bap_tab]) \n\t"
  95. "addiu %[address2], %[address2], -32 \n\t"
  96. "shll_s.w %[address2], %[address2], 26 \n\t"
  97. "sb %[address1], 0(%[bap1]) \n\t"
  98. "slt %[cond], %[psd1], %[psd_end] \n\t"
  99. "sra %[address2], %[address2], 26 \n\t"
  100. "addiu %[address2], %[address2], 32 \n\t"
  101. "lbux %[address2], %[address2](%[bap_tab]) \n\t"
  102. "sb %[address2], 1(%[bap1]) \n\t"
  103. "addiu %[bap1], %[bap1], 2 \n\t"
  104. "bnez %[cond], 2b \n\t"
  105. "addiu %[psd_end], %[psd_end], 2 \n\t"
  106. "slt %[cond], %[psd1], %[psd_end] \n\t"
  107. "beqz %[cond], 3f \n\t"
  108. "1: \n\t"
  109. "lh %[address1], 0(%[psd1]) \n\t"
  110. "addiu %[psd1], %[psd1], 2 \n\t"
  111. "subu %[address1], %[address1], %[m] \n\t"
  112. "sra %[address1], %[address1], 5 \n\t"
  113. "addiu %[address1], %[address1], -32 \n\t"
  114. "shll_s.w %[address1], %[address1], 26 \n\t"
  115. "sra %[address1], %[address1], 26 \n\t"
  116. "addiu %[address1], %[address1], 32 \n\t"
  117. "lbux %[address1], %[address1](%[bap_tab]) \n\t"
  118. "sb %[address1], 0(%[bap1]) \n\t"
  119. "addiu %[bap1], %[bap1], 1 \n\t"
  120. "3: \n\t"
  121. : [address1]"=&r"(address1), [address2]"=&r"(address2),
  122. [cond]"=&r"(cond), [bap1]"+r"(bap1),
  123. [psd1]"+r"(psd1), [psd_end]"+r"(psd_end)
  124. : [m]"r"(m), [bap_tab]"r"(bap_tab)
  125. : "memory"
  126. );
  127. } while (end > band_end);
  128. }
  129. static void ac3_update_bap_counts_mips(uint16_t mant_cnt[16], uint8_t *bap,
  130. int len)
  131. {
  132. int temp0, temp1, temp2, temp3, temp4, temp5, temp6, temp7;
  133. __asm__ volatile (
  134. "andi %[temp3], %[len], 3 \n\t"
  135. "addu %[temp2], %[bap], %[len] \n\t"
  136. "addu %[temp4], %[bap], %[temp3] \n\t"
  137. "beq %[temp2], %[temp4], 4f \n\t"
  138. "1: \n\t"
  139. "lbu %[temp0], -1(%[temp2]) \n\t"
  140. "lbu %[temp5], -2(%[temp2]) \n\t"
  141. "lbu %[temp6], -3(%[temp2]) \n\t"
  142. "sll %[temp0], %[temp0], 1 \n\t"
  143. "addu %[temp0], %[mant_cnt], %[temp0] \n\t"
  144. "sll %[temp5], %[temp5], 1 \n\t"
  145. "addu %[temp5], %[mant_cnt], %[temp5] \n\t"
  146. "lhu %[temp1], 0(%[temp0]) \n\t"
  147. "sll %[temp6], %[temp6], 1 \n\t"
  148. "addu %[temp6], %[mant_cnt], %[temp6] \n\t"
  149. "addiu %[temp1], %[temp1], 1 \n\t"
  150. "sh %[temp1], 0(%[temp0]) \n\t"
  151. "lhu %[temp1], 0(%[temp5]) \n\t"
  152. "lbu %[temp7], -4(%[temp2]) \n\t"
  153. "addiu %[temp2], %[temp2], -4 \n\t"
  154. "addiu %[temp1], %[temp1], 1 \n\t"
  155. "sh %[temp1], 0(%[temp5]) \n\t"
  156. "lhu %[temp1], 0(%[temp6]) \n\t"
  157. "sll %[temp7], %[temp7], 1 \n\t"
  158. "addu %[temp7], %[mant_cnt], %[temp7] \n\t"
  159. "addiu %[temp1], %[temp1],1 \n\t"
  160. "sh %[temp1], 0(%[temp6]) \n\t"
  161. "lhu %[temp1], 0(%[temp7]) \n\t"
  162. "addiu %[temp1], %[temp1], 1 \n\t"
  163. "sh %[temp1], 0(%[temp7]) \n\t"
  164. "bne %[temp2], %[temp4], 1b \n\t"
  165. "4: \n\t"
  166. "beqz %[temp3], 2f \n\t"
  167. "3: \n\t"
  168. "addiu %[temp3], %[temp3], -1 \n\t"
  169. "lbu %[temp0], -1(%[temp2]) \n\t"
  170. "addiu %[temp2], %[temp2], -1 \n\t"
  171. "sll %[temp0], %[temp0], 1 \n\t"
  172. "addu %[temp0], %[mant_cnt], %[temp0] \n\t"
  173. "lhu %[temp1], 0(%[temp0]) \n\t"
  174. "addiu %[temp1], %[temp1], 1 \n\t"
  175. "sh %[temp1], 0(%[temp0]) \n\t"
  176. "bgtz %[temp3], 3b \n\t"
  177. "2: \n\t"
  178. : [temp0] "=&r" (temp0), [temp1] "=&r" (temp1),
  179. [temp2] "=&r" (temp2), [temp3] "=&r" (temp3),
  180. [temp4] "=&r" (temp4), [temp5] "=&r" (temp5),
  181. [temp6] "=&r" (temp6), [temp7] "=&r" (temp7)
  182. : [len] "r" (len), [bap] "r" (bap),
  183. [mant_cnt] "r" (mant_cnt)
  184. : "memory"
  185. );
  186. }
  187. #endif
  188. #if HAVE_MIPSFPU
  189. static void float_to_fixed24_mips(int32_t *dst, const float *src, unsigned int len)
  190. {
  191. const float scale = 1 << 24;
  192. float src0, src1, src2, src3, src4, src5, src6, src7;
  193. int temp0, temp1, temp2, temp3, temp4, temp5, temp6, temp7;
  194. do {
  195. __asm__ volatile (
  196. "lwc1 %[src0], 0(%[src]) \n\t"
  197. "lwc1 %[src1], 4(%[src]) \n\t"
  198. "lwc1 %[src2], 8(%[src]) \n\t"
  199. "lwc1 %[src3], 12(%[src]) \n\t"
  200. "lwc1 %[src4], 16(%[src]) \n\t"
  201. "lwc1 %[src5], 20(%[src]) \n\t"
  202. "lwc1 %[src6], 24(%[src]) \n\t"
  203. "lwc1 %[src7], 28(%[src]) \n\t"
  204. "mul.s %[src0], %[src0], %[scale] \n\t"
  205. "mul.s %[src1], %[src1], %[scale] \n\t"
  206. "mul.s %[src2], %[src2], %[scale] \n\t"
  207. "mul.s %[src3], %[src3], %[scale] \n\t"
  208. "mul.s %[src4], %[src4], %[scale] \n\t"
  209. "mul.s %[src5], %[src5], %[scale] \n\t"
  210. "mul.s %[src6], %[src6], %[scale] \n\t"
  211. "mul.s %[src7], %[src7], %[scale] \n\t"
  212. "cvt.w.s %[src0], %[src0] \n\t"
  213. "cvt.w.s %[src1], %[src1] \n\t"
  214. "cvt.w.s %[src2], %[src2] \n\t"
  215. "cvt.w.s %[src3], %[src3] \n\t"
  216. "cvt.w.s %[src4], %[src4] \n\t"
  217. "cvt.w.s %[src5], %[src5] \n\t"
  218. "cvt.w.s %[src6], %[src6] \n\t"
  219. "cvt.w.s %[src7], %[src7] \n\t"
  220. "mfc1 %[temp0], %[src0] \n\t"
  221. "mfc1 %[temp1], %[src1] \n\t"
  222. "mfc1 %[temp2], %[src2] \n\t"
  223. "mfc1 %[temp3], %[src3] \n\t"
  224. "mfc1 %[temp4], %[src4] \n\t"
  225. "mfc1 %[temp5], %[src5] \n\t"
  226. "mfc1 %[temp6], %[src6] \n\t"
  227. "mfc1 %[temp7], %[src7] \n\t"
  228. "sw %[temp0], 0(%[dst]) \n\t"
  229. "sw %[temp1], 4(%[dst]) \n\t"
  230. "sw %[temp2], 8(%[dst]) \n\t"
  231. "sw %[temp3], 12(%[dst]) \n\t"
  232. "sw %[temp4], 16(%[dst]) \n\t"
  233. "sw %[temp5], 20(%[dst]) \n\t"
  234. "sw %[temp6], 24(%[dst]) \n\t"
  235. "sw %[temp7], 28(%[dst]) \n\t"
  236. : [dst] "+r" (dst), [src] "+r" (src),
  237. [src0] "=&f" (src0), [src1] "=&f" (src1),
  238. [src2] "=&f" (src2), [src3] "=&f" (src3),
  239. [src4] "=&f" (src4), [src5] "=&f" (src5),
  240. [src6] "=&f" (src6), [src7] "=&f" (src7),
  241. [temp0] "=r" (temp0), [temp1] "=r" (temp1),
  242. [temp2] "=r" (temp2), [temp3] "=r" (temp3),
  243. [temp4] "=r" (temp4), [temp5] "=r" (temp5),
  244. [temp6] "=r" (temp6), [temp7] "=r" (temp7)
  245. : [scale] "f" (scale)
  246. : "memory"
  247. );
  248. src = src + 8;
  249. dst = dst + 8;
  250. len -= 8;
  251. } while (len > 0);
  252. }
  253. static void ac3_downmix_mips(float (*samples)[256], float (*matrix)[2], int out_ch, int in_ch, int len)
  254. {
  255. int i, j;
  256. float v0, v1, v2, v3;
  257. float v4, v5, v6, v7;
  258. float samples0, samples1, samples2, samples3, matrix_j, matrix_j2;
  259. float *samples_p,*matrix_p;
  260. if (out_ch == 2) {
  261. for (i = 0; i < len; i += 4) {
  262. v0 = v1 = v2 = v3 = 0.0f;
  263. v4 = v5 = v6 = v7 = 0.0f;
  264. samples_p = &samples[0][i];
  265. matrix_p = &matrix[0][0];
  266. __asm__ volatile (
  267. "move %[j], $zero \n\t"
  268. "1: \n\t"
  269. "lwc1 %[matrix_j], 0(%[matrix_p]) \n\t"
  270. "lwc1 %[matrix_j2], 4(%[matrix_p]) \n\t"
  271. "lwc1 %[samples0], 0(%[samples_p]) \n\t"
  272. "lwc1 %[samples1], 4(%[samples_p]) \n\t"
  273. "lwc1 %[samples2], 8(%[samples_p]) \n\t"
  274. "lwc1 %[samples3], 12(%[samples_p]) \n\t"
  275. "addiu %[matrix_p], 8 \n\t"
  276. "madd.s %[v0], %[v0], %[samples0], %[matrix_j] \n\t"
  277. "madd.s %[v1], %[v1], %[samples1], %[matrix_j] \n\t"
  278. "madd.s %[v2], %[v2], %[samples2], %[matrix_j] \n\t"
  279. "madd.s %[v3], %[v3], %[samples3], %[matrix_j] \n\t"
  280. "madd.s %[v4], %[v4], %[samples0], %[matrix_j2]\n\t"
  281. "madd.s %[v5], %[v5], %[samples1], %[matrix_j2]\n\t"
  282. "madd.s %[v6], %[v6], %[samples2], %[matrix_j2]\n\t"
  283. "madd.s %[v7], %[v7], %[samples3], %[matrix_j2]\n\t"
  284. "addiu %[j], 1 \n\t"
  285. "addiu %[samples_p], 1024 \n\t"
  286. "bne %[j], %[in_ch], 1b \n\t"
  287. :[samples0]"=&f"(samples0), [samples1]"=&f"(samples1),
  288. [samples2]"=&f"(samples2), [samples3]"=&f"(samples3),
  289. [samples_p]"+r"(samples_p), [matrix_j]"=&f"(matrix_j),
  290. [matrix_p]"+r"(matrix_p), [v0]"+f"(v0), [v1]"+f"(v1),
  291. [v2]"+f"(v2), [v3]"+f"(v3), [v4]"+f"(v4), [v5]"+f"(v5),
  292. [v6]"+f"(v6), [v7]"+f"(v7),[j]"=&r"(j), [matrix_j2]"=&f"(matrix_j2)
  293. :[in_ch]"r"(in_ch)
  294. :"memory"
  295. );
  296. samples[0][i ] = v0;
  297. samples[0][i+1] = v1;
  298. samples[0][i+2] = v2;
  299. samples[0][i+3] = v3;
  300. samples[1][i ] = v4;
  301. samples[1][i+1] = v5;
  302. samples[1][i+2] = v6;
  303. samples[1][i+3] = v7;
  304. }
  305. } else if (out_ch == 1) {
  306. for (i = 0; i < len; i += 4) {
  307. v0 = v1 = v2 = v3 = 0.0f;
  308. samples_p = &samples[0][i];
  309. matrix_p = &matrix[0][0];
  310. __asm__ volatile (
  311. "move %[j], $zero \n\t"
  312. "1: \n\t"
  313. "lwc1 %[matrix_j], 0(%[matrix_p]) \n\t"
  314. "lwc1 %[samples0], 0(%[samples_p]) \n\t"
  315. "lwc1 %[samples1], 4(%[samples_p]) \n\t"
  316. "lwc1 %[samples2], 8(%[samples_p]) \n\t"
  317. "lwc1 %[samples3], 12(%[samples_p]) \n\t"
  318. "addiu %[matrix_p], 8 \n\t"
  319. "madd.s %[v0], %[v0], %[samples0], %[matrix_j] \n\t"
  320. "madd.s %[v1], %[v1], %[samples1], %[matrix_j] \n\t"
  321. "madd.s %[v2], %[v2], %[samples2], %[matrix_j] \n\t"
  322. "madd.s %[v3], %[v3], %[samples3], %[matrix_j] \n\t"
  323. "addiu %[j], 1 \n\t"
  324. "addiu %[samples_p], 1024 \n\t"
  325. "bne %[j], %[in_ch], 1b \n\t"
  326. :[samples0]"=&f"(samples0), [samples1]"=&f"(samples1),
  327. [samples2]"=&f"(samples2), [samples3]"=&f"(samples3),
  328. [samples_p]"+r"(samples_p), [matrix_j]"=&f"(matrix_j),
  329. [matrix_p]"+r"(matrix_p), [v0]"+f"(v0), [v1]"+f"(v1),
  330. [v2]"+f"(v2), [v3]"+f"(v3), [j]"=&r"(j)
  331. :[in_ch]"r"(in_ch)
  332. :"memory"
  333. );
  334. samples[0][i ] = v0;
  335. samples[0][i+1] = v1;
  336. samples[0][i+2] = v2;
  337. samples[0][i+3] = v3;
  338. }
  339. }
  340. }
  341. #endif
  342. #endif /* HAVE_INLINE_ASM */
  343. void ff_ac3dsp_init_mips(AC3DSPContext *c, int bit_exact) {
  344. #if HAVE_INLINE_ASM
  345. #if HAVE_MIPSDSPR1
  346. c->bit_alloc_calc_bap = ac3_bit_alloc_calc_bap_mips;
  347. c->update_bap_counts = ac3_update_bap_counts_mips;
  348. #endif
  349. #if HAVE_MIPSFPU
  350. c->float_to_fixed24 = float_to_fixed24_mips;
  351. c->downmix = ac3_downmix_mips;
  352. #endif
  353. #endif
  354. }