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.

362 lines
9.6KB

  1. /*
  2. * idct for sh4
  3. *
  4. * Copyright (c) 2001-2003 BERO <bero@geocities.co.jp>
  5. *
  6. * This file is part of FFmpeg.
  7. *
  8. * FFmpeg is free software; you can redistribute it and/or
  9. * modify it under the terms of the GNU Lesser General Public
  10. * License as published by the Free Software Foundation; either
  11. * version 2.1 of the License, or (at your option) any later version.
  12. *
  13. * FFmpeg is distributed in the hope that it will be useful,
  14. * but WITHOUT ANY WARRANTY; without even the implied warranty of
  15. * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  16. * Lesser General Public License for more details.
  17. *
  18. * You should have received a copy of the GNU Lesser General Public
  19. * License along with FFmpeg; if not, write to the Free Software
  20. * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
  21. */
  22. #include "libavcodec/dsputil.h"
  23. #include "sh4.h"
  24. #define c1 1.38703984532214752434 /* sqrt(2)*cos(1*pi/16) */
  25. #define c2 1.30656296487637657577 /* sqrt(2)*cos(2*pi/16) */
  26. #define c3 1.17587560241935884520 /* sqrt(2)*cos(3*pi/16) */
  27. #define c4 1.00000000000000000000 /* sqrt(2)*cos(4*pi/16) */
  28. #define c5 0.78569495838710234903 /* sqrt(2)*cos(5*pi/16) */
  29. #define c6 0.54119610014619712324 /* sqrt(2)*cos(6*pi/16) */
  30. #define c7 0.27589937928294311353 /* sqrt(2)*cos(7*pi/16) */
  31. static const float even_table[] __attribute__ ((aligned(8))) = {
  32. c4, c4, c4, c4,
  33. c2, c6,-c6,-c2,
  34. c4,-c4,-c4, c4,
  35. c6,-c2, c2,-c6
  36. };
  37. static const float odd_table[] __attribute__ ((aligned(8))) = {
  38. c1, c3, c5, c7,
  39. c3,-c7,-c1,-c5,
  40. c5,-c1, c7, c3,
  41. c7,-c5, c3,-c1
  42. };
  43. #undef c1
  44. #undef c2
  45. #undef c3
  46. #undef c4
  47. #undef c5
  48. #undef c6
  49. #undef c7
  50. #if 1
  51. #define load_matrix(table) \
  52. do { \
  53. const float *t = table; \
  54. __asm__ volatile( \
  55. " fschg\n" \
  56. " fmov @%0+,xd0\n" \
  57. " fmov @%0+,xd2\n" \
  58. " fmov @%0+,xd4\n" \
  59. " fmov @%0+,xd6\n" \
  60. " fmov @%0+,xd8\n" \
  61. " fmov @%0+,xd10\n" \
  62. " fmov @%0+,xd12\n" \
  63. " fmov @%0+,xd14\n" \
  64. " fschg\n" \
  65. : "+r"(t) \
  66. ); \
  67. } while (0)
  68. #define ftrv() \
  69. __asm__ volatile("ftrv xmtrx,fv0" \
  70. : "+f"(fr0),"+f"(fr1),"+f"(fr2),"+f"(fr3));
  71. #define DEFREG \
  72. register float fr0 __asm__("fr0"); \
  73. register float fr1 __asm__("fr1"); \
  74. register float fr2 __asm__("fr2"); \
  75. register float fr3 __asm__("fr3")
  76. #else
  77. /* generic C code for check */
  78. static void ftrv_(const float xf[],float fv[])
  79. {
  80. float f0,f1,f2,f3;
  81. f0 = fv[0];
  82. f1 = fv[1];
  83. f2 = fv[2];
  84. f3 = fv[3];
  85. fv[0] = xf[0]*f0 + xf[4]*f1 + xf[ 8]*f2 + xf[12]*f3;
  86. fv[1] = xf[1]*f0 + xf[5]*f1 + xf[ 9]*f2 + xf[13]*f3;
  87. fv[2] = xf[2]*f0 + xf[6]*f1 + xf[10]*f2 + xf[14]*f3;
  88. fv[3] = xf[3]*f0 + xf[7]*f1 + xf[11]*f2 + xf[15]*f3;
  89. }
  90. static void load_matrix_(float xf[],const float table[])
  91. {
  92. int i;
  93. for(i=0;i<16;i++) xf[i]=table[i];
  94. }
  95. #define ftrv() ftrv_(xf,fv)
  96. #define load_matrix(table) load_matrix_(xf,table)
  97. #define DEFREG \
  98. float fv[4],xf[16]
  99. #define fr0 fv[0]
  100. #define fr1 fv[1]
  101. #define fr2 fv[2]
  102. #define fr3 fv[3]
  103. #endif
  104. #if 1
  105. #define DESCALE(x,n) (x)*(1.0f/(1<<(n)))
  106. #else
  107. #define DESCALE(x,n) (((int)(x)+(1<<(n-1)))>>(n))
  108. #endif
  109. /* this code work worse on gcc cvs. 3.2.3 work fine */
  110. #if 1
  111. //optimized
  112. void idct_sh4(DCTELEM *block)
  113. {
  114. DEFREG;
  115. int i;
  116. float tblock[8*8],*fblock;
  117. int ofs1,ofs2,ofs3;
  118. int fpscr;
  119. fp_single_enter(fpscr);
  120. /* row */
  121. /* even part */
  122. load_matrix(even_table);
  123. fblock = tblock+4;
  124. i = 8;
  125. do {
  126. fr0 = block[0];
  127. fr1 = block[2];
  128. fr2 = block[4];
  129. fr3 = block[6];
  130. block+=8;
  131. ftrv();
  132. *--fblock = fr3;
  133. *--fblock = fr2;
  134. *--fblock = fr1;
  135. *--fblock = fr0;
  136. fblock+=8+4;
  137. } while(--i);
  138. block-=8*8;
  139. fblock-=8*8+4;
  140. load_matrix(odd_table);
  141. i = 8;
  142. do {
  143. float t0,t1,t2,t3;
  144. fr0 = block[1];
  145. fr1 = block[3];
  146. fr2 = block[5];
  147. fr3 = block[7];
  148. block+=8;
  149. ftrv();
  150. t0 = *fblock++;
  151. t1 = *fblock++;
  152. t2 = *fblock++;
  153. t3 = *fblock++;
  154. fblock+=4;
  155. *--fblock = t0 - fr0;
  156. *--fblock = t1 - fr1;
  157. *--fblock = t2 - fr2;
  158. *--fblock = t3 - fr3;
  159. *--fblock = t3 + fr3;
  160. *--fblock = t2 + fr2;
  161. *--fblock = t1 + fr1;
  162. *--fblock = t0 + fr0;
  163. fblock+=8;
  164. } while(--i);
  165. block-=8*8;
  166. fblock-=8*8;
  167. /* col */
  168. /* even part */
  169. load_matrix(even_table);
  170. ofs1 = sizeof(float)*2*8;
  171. ofs2 = sizeof(float)*4*8;
  172. ofs3 = sizeof(float)*6*8;
  173. i = 8;
  174. #define OA(fblock,ofs) *(float*)((char*)fblock + ofs)
  175. do {
  176. fr0 = OA(fblock, 0);
  177. fr1 = OA(fblock,ofs1);
  178. fr2 = OA(fblock,ofs2);
  179. fr3 = OA(fblock,ofs3);
  180. ftrv();
  181. OA(fblock,0 ) = fr0;
  182. OA(fblock,ofs1) = fr1;
  183. OA(fblock,ofs2) = fr2;
  184. OA(fblock,ofs3) = fr3;
  185. fblock++;
  186. } while(--i);
  187. fblock-=8;
  188. load_matrix(odd_table);
  189. i=8;
  190. do {
  191. float t0,t1,t2,t3;
  192. t0 = OA(fblock, 0); /* [8*0] */
  193. t1 = OA(fblock,ofs1); /* [8*2] */
  194. t2 = OA(fblock,ofs2); /* [8*4] */
  195. t3 = OA(fblock,ofs3); /* [8*6] */
  196. fblock+=8;
  197. fr0 = OA(fblock, 0); /* [8*1] */
  198. fr1 = OA(fblock,ofs1); /* [8*3] */
  199. fr2 = OA(fblock,ofs2); /* [8*5] */
  200. fr3 = OA(fblock,ofs3); /* [8*7] */
  201. fblock+=-8+1;
  202. ftrv();
  203. block[8*0] = DESCALE(t0 + fr0,3);
  204. block[8*7] = DESCALE(t0 - fr0,3);
  205. block[8*1] = DESCALE(t1 + fr1,3);
  206. block[8*6] = DESCALE(t1 - fr1,3);
  207. block[8*2] = DESCALE(t2 + fr2,3);
  208. block[8*5] = DESCALE(t2 - fr2,3);
  209. block[8*3] = DESCALE(t3 + fr3,3);
  210. block[8*4] = DESCALE(t3 - fr3,3);
  211. block++;
  212. } while(--i);
  213. fp_single_leave(fpscr);
  214. }
  215. #else
  216. void idct_sh4(DCTELEM *block)
  217. {
  218. DEFREG;
  219. int i;
  220. float tblock[8*8],*fblock;
  221. /* row */
  222. /* even part */
  223. load_matrix(even_table);
  224. fblock = tblock;
  225. i = 8;
  226. do {
  227. fr0 = block[0];
  228. fr1 = block[2];
  229. fr2 = block[4];
  230. fr3 = block[6];
  231. block+=8;
  232. ftrv();
  233. fblock[0] = fr0;
  234. fblock[2] = fr1;
  235. fblock[4] = fr2;
  236. fblock[6] = fr3;
  237. fblock+=8;
  238. } while(--i);
  239. block-=8*8;
  240. fblock-=8*8;
  241. load_matrix(odd_table);
  242. i = 8;
  243. do {
  244. float t0,t1,t2,t3;
  245. fr0 = block[1];
  246. fr1 = block[3];
  247. fr2 = block[5];
  248. fr3 = block[7];
  249. block+=8;
  250. ftrv();
  251. t0 = fblock[0];
  252. t1 = fblock[2];
  253. t2 = fblock[4];
  254. t3 = fblock[6];
  255. fblock[0] = t0 + fr0;
  256. fblock[7] = t0 - fr0;
  257. fblock[1] = t1 + fr1;
  258. fblock[6] = t1 - fr1;
  259. fblock[2] = t2 + fr2;
  260. fblock[5] = t2 - fr2;
  261. fblock[3] = t3 + fr3;
  262. fblock[4] = t3 - fr3;
  263. fblock+=8;
  264. } while(--i);
  265. block-=8*8;
  266. fblock-=8*8;
  267. /* col */
  268. /* even part */
  269. load_matrix(even_table);
  270. i = 8;
  271. do {
  272. fr0 = fblock[8*0];
  273. fr1 = fblock[8*2];
  274. fr2 = fblock[8*4];
  275. fr3 = fblock[8*6];
  276. ftrv();
  277. fblock[8*0] = fr0;
  278. fblock[8*2] = fr1;
  279. fblock[8*4] = fr2;
  280. fblock[8*6] = fr3;
  281. fblock++;
  282. } while(--i);
  283. fblock-=8;
  284. load_matrix(odd_table);
  285. i=8;
  286. do {
  287. float t0,t1,t2,t3;
  288. fr0 = fblock[8*1];
  289. fr1 = fblock[8*3];
  290. fr2 = fblock[8*5];
  291. fr3 = fblock[8*7];
  292. ftrv();
  293. t0 = fblock[8*0];
  294. t1 = fblock[8*2];
  295. t2 = fblock[8*4];
  296. t3 = fblock[8*6];
  297. fblock++;
  298. block[8*0] = DESCALE(t0 + fr0,3);
  299. block[8*7] = DESCALE(t0 - fr0,3);
  300. block[8*1] = DESCALE(t1 + fr1,3);
  301. block[8*6] = DESCALE(t1 - fr1,3);
  302. block[8*2] = DESCALE(t2 + fr2,3);
  303. block[8*5] = DESCALE(t2 - fr2,3);
  304. block[8*3] = DESCALE(t3 + fr3,3);
  305. block[8*4] = DESCALE(t3 - fr3,3);
  306. block++;
  307. } while(--i);
  308. }
  309. #endif