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.

530 lines
21KB

  1. /*
  2. * DSP utils
  3. * Copyright (c) 2000, 2001 Gerard Lantau.
  4. *
  5. * This program is free software; you can redistribute it and/or modify
  6. * it under the terms of the GNU General Public License as published by
  7. * the Free Software Foundation; either version 2 of the License, or
  8. * (at your option) any later version.
  9. *
  10. * This program is distributed in the hope that it will be useful,
  11. * but WITHOUT ANY WARRANTY; without even the implied warranty of
  12. * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  13. * GNU General Public License for more details.
  14. *
  15. * You should have received a copy of the GNU General Public License
  16. * along with this program; if not, write to the Free Software
  17. * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  18. */
  19. #include <stdlib.h>
  20. #include <stdio.h>
  21. #include "avcodec.h"
  22. #include "dsputil.h"
  23. #include "simple_idct.h"
  24. void (*ff_idct)(DCTELEM *block);
  25. void (*get_pixels)(DCTELEM *block, const UINT8 *pixels, int line_size);
  26. void (*put_pixels_clamped)(const DCTELEM *block, UINT8 *pixels, int line_size);
  27. void (*add_pixels_clamped)(const DCTELEM *block, UINT8 *pixels, int line_size);
  28. op_pixels_abs_func pix_abs16x16;
  29. op_pixels_abs_func pix_abs16x16_x2;
  30. op_pixels_abs_func pix_abs16x16_y2;
  31. op_pixels_abs_func pix_abs16x16_xy2;
  32. UINT8 cropTbl[256 + 2 * MAX_NEG_CROP];
  33. UINT32 squareTbl[512];
  34. extern UINT16 default_intra_matrix[64];
  35. extern UINT16 default_non_intra_matrix[64];
  36. UINT8 zigzag_direct[64] = {
  37. 0, 1, 8, 16, 9, 2, 3, 10,
  38. 17, 24, 32, 25, 18, 11, 4, 5,
  39. 12, 19, 26, 33, 40, 48, 41, 34,
  40. 27, 20, 13, 6, 7, 14, 21, 28,
  41. 35, 42, 49, 56, 57, 50, 43, 36,
  42. 29, 22, 15, 23, 30, 37, 44, 51,
  43. 58, 59, 52, 45, 38, 31, 39, 46,
  44. 53, 60, 61, 54, 47, 55, 62, 63
  45. };
  46. UINT8 ff_alternate_horizontal_scan[64] = {
  47. 0, 1, 2, 3, 8, 9, 16, 17,
  48. 10, 11, 4, 5, 6, 7, 15, 14,
  49. 13, 12, 19, 18, 24, 25, 32, 33,
  50. 26, 27, 20, 21, 22, 23, 28, 29,
  51. 30, 31, 34, 35, 40, 41, 48, 49,
  52. 42, 43, 36, 37, 38, 39, 44, 45,
  53. 46, 47, 50, 51, 56, 57, 58, 59,
  54. 52, 53, 54, 55, 60, 61, 62, 63,
  55. };
  56. UINT8 ff_alternate_vertical_scan[64] = {
  57. 0, 8, 16, 24, 1, 9, 2, 10,
  58. 17, 25, 32, 40, 48, 56, 57, 49,
  59. 41, 33, 26, 18, 3, 11, 4, 12,
  60. 19, 27, 34, 42, 50, 58, 35, 43,
  61. 51, 59, 20, 28, 5, 13, 6, 14,
  62. 21, 29, 36, 44, 52, 60, 37, 45,
  63. 53, 61, 22, 30, 7, 15, 23, 31,
  64. 38, 46, 54, 62, 39, 47, 55, 63,
  65. };
  66. /* Input permutation for the simple_idct_mmx */
  67. static UINT8 simple_mmx_permutation[64]={
  68. 0x00, 0x08, 0x04, 0x09, 0x01, 0x0C, 0x05, 0x0D,
  69. 0x10, 0x18, 0x14, 0x19, 0x11, 0x1C, 0x15, 0x1D,
  70. 0x20, 0x28, 0x24, 0x29, 0x21, 0x2C, 0x25, 0x2D,
  71. 0x12, 0x1A, 0x16, 0x1B, 0x13, 0x1E, 0x17, 0x1F,
  72. 0x02, 0x0A, 0x06, 0x0B, 0x03, 0x0E, 0x07, 0x0F,
  73. 0x30, 0x38, 0x34, 0x39, 0x31, 0x3C, 0x35, 0x3D,
  74. 0x22, 0x2A, 0x26, 0x2B, 0x23, 0x2E, 0x27, 0x2F,
  75. 0x32, 0x3A, 0x36, 0x3B, 0x33, 0x3E, 0x37, 0x3F,
  76. };
  77. /* used to skip zeros at the end */
  78. UINT8 zigzag_end[64];
  79. UINT8 permutation[64];
  80. //UINT8 invPermutation[64];
  81. static void build_zigzag_end()
  82. {
  83. int lastIndex;
  84. int lastIndexAfterPerm=0;
  85. for(lastIndex=0; lastIndex<64; lastIndex++)
  86. {
  87. if(zigzag_direct[lastIndex] > lastIndexAfterPerm)
  88. lastIndexAfterPerm= zigzag_direct[lastIndex];
  89. zigzag_end[lastIndex]= lastIndexAfterPerm + 1;
  90. }
  91. }
  92. void get_pixels_c(DCTELEM *block, const UINT8 *pixels, int line_size)
  93. {
  94. DCTELEM *p;
  95. const UINT8 *pix;
  96. int i;
  97. /* read the pixels */
  98. p = block;
  99. pix = pixels;
  100. for(i=0;i<8;i++) {
  101. p[0] = pix[0];
  102. p[1] = pix[1];
  103. p[2] = pix[2];
  104. p[3] = pix[3];
  105. p[4] = pix[4];
  106. p[5] = pix[5];
  107. p[6] = pix[6];
  108. p[7] = pix[7];
  109. pix += line_size;
  110. p += 8;
  111. }
  112. }
  113. void put_pixels_clamped_c(const DCTELEM *block, UINT8 *pixels, int line_size)
  114. {
  115. const DCTELEM *p;
  116. UINT8 *pix;
  117. int i;
  118. UINT8 *cm = cropTbl + MAX_NEG_CROP;
  119. /* read the pixels */
  120. p = block;
  121. pix = pixels;
  122. for(i=0;i<8;i++) {
  123. pix[0] = cm[p[0]];
  124. pix[1] = cm[p[1]];
  125. pix[2] = cm[p[2]];
  126. pix[3] = cm[p[3]];
  127. pix[4] = cm[p[4]];
  128. pix[5] = cm[p[5]];
  129. pix[6] = cm[p[6]];
  130. pix[7] = cm[p[7]];
  131. pix += line_size;
  132. p += 8;
  133. }
  134. }
  135. void add_pixels_clamped_c(const DCTELEM *block, UINT8 *pixels, int line_size)
  136. {
  137. const DCTELEM *p;
  138. UINT8 *pix;
  139. int i;
  140. UINT8 *cm = cropTbl + MAX_NEG_CROP;
  141. /* read the pixels */
  142. p = block;
  143. pix = pixels;
  144. for(i=0;i<8;i++) {
  145. pix[0] = cm[pix[0] + p[0]];
  146. pix[1] = cm[pix[1] + p[1]];
  147. pix[2] = cm[pix[2] + p[2]];
  148. pix[3] = cm[pix[3] + p[3]];
  149. pix[4] = cm[pix[4] + p[4]];
  150. pix[5] = cm[pix[5] + p[5]];
  151. pix[6] = cm[pix[6] + p[6]];
  152. pix[7] = cm[pix[7] + p[7]];
  153. pix += line_size;
  154. p += 8;
  155. }
  156. }
  157. #define PIXOP(BTYPE, OPNAME, OP, INCR) \
  158. \
  159. static void OPNAME ## _pixels(BTYPE *block, const UINT8 *pixels, int line_size, int h) \
  160. { \
  161. BTYPE *p; \
  162. const UINT8 *pix; \
  163. \
  164. p = block; \
  165. pix = pixels; \
  166. do { \
  167. OP(p[0], pix[0]); \
  168. OP(p[1], pix[1]); \
  169. OP(p[2], pix[2]); \
  170. OP(p[3], pix[3]); \
  171. OP(p[4], pix[4]); \
  172. OP(p[5], pix[5]); \
  173. OP(p[6], pix[6]); \
  174. OP(p[7], pix[7]); \
  175. pix += line_size; \
  176. p += INCR; \
  177. } while (--h);; \
  178. } \
  179. \
  180. static void OPNAME ## _pixels_x2(BTYPE *block, const UINT8 *pixels, int line_size, int h) \
  181. { \
  182. BTYPE *p; \
  183. const UINT8 *pix; \
  184. \
  185. p = block; \
  186. pix = pixels; \
  187. do { \
  188. OP(p[0], avg2(pix[0], pix[1])); \
  189. OP(p[1], avg2(pix[1], pix[2])); \
  190. OP(p[2], avg2(pix[2], pix[3])); \
  191. OP(p[3], avg2(pix[3], pix[4])); \
  192. OP(p[4], avg2(pix[4], pix[5])); \
  193. OP(p[5], avg2(pix[5], pix[6])); \
  194. OP(p[6], avg2(pix[6], pix[7])); \
  195. OP(p[7], avg2(pix[7], pix[8])); \
  196. pix += line_size; \
  197. p += INCR; \
  198. } while (--h); \
  199. } \
  200. \
  201. static void OPNAME ## _pixels_y2(BTYPE *block, const UINT8 *pixels, int line_size, int h) \
  202. { \
  203. BTYPE *p; \
  204. const UINT8 *pix; \
  205. const UINT8 *pix1; \
  206. \
  207. p = block; \
  208. pix = pixels; \
  209. pix1 = pixels + line_size; \
  210. do { \
  211. OP(p[0], avg2(pix[0], pix1[0])); \
  212. OP(p[1], avg2(pix[1], pix1[1])); \
  213. OP(p[2], avg2(pix[2], pix1[2])); \
  214. OP(p[3], avg2(pix[3], pix1[3])); \
  215. OP(p[4], avg2(pix[4], pix1[4])); \
  216. OP(p[5], avg2(pix[5], pix1[5])); \
  217. OP(p[6], avg2(pix[6], pix1[6])); \
  218. OP(p[7], avg2(pix[7], pix1[7])); \
  219. pix += line_size; \
  220. pix1 += line_size; \
  221. p += INCR; \
  222. } while(--h); \
  223. } \
  224. \
  225. static void OPNAME ## _pixels_xy2(BTYPE *block, const UINT8 *pixels, int line_size, int h) \
  226. { \
  227. BTYPE *p; \
  228. const UINT8 *pix; \
  229. const UINT8 *pix1; \
  230. \
  231. p = block; \
  232. pix = pixels; \
  233. pix1 = pixels + line_size; \
  234. do { \
  235. OP(p[0], avg4(pix[0], pix[1], pix1[0], pix1[1])); \
  236. OP(p[1], avg4(pix[1], pix[2], pix1[1], pix1[2])); \
  237. OP(p[2], avg4(pix[2], pix[3], pix1[2], pix1[3])); \
  238. OP(p[3], avg4(pix[3], pix[4], pix1[3], pix1[4])); \
  239. OP(p[4], avg4(pix[4], pix[5], pix1[4], pix1[5])); \
  240. OP(p[5], avg4(pix[5], pix[6], pix1[5], pix1[6])); \
  241. OP(p[6], avg4(pix[6], pix[7], pix1[6], pix1[7])); \
  242. OP(p[7], avg4(pix[7], pix[8], pix1[7], pix1[8])); \
  243. pix += line_size; \
  244. pix1 += line_size; \
  245. p += INCR; \
  246. } while(--h); \
  247. } \
  248. \
  249. void (*OPNAME ## _pixels_tab[4])(BTYPE *block, const UINT8 *pixels, int line_size, int h) = { \
  250. OPNAME ## _pixels, \
  251. OPNAME ## _pixels_x2, \
  252. OPNAME ## _pixels_y2, \
  253. OPNAME ## _pixels_xy2, \
  254. };
  255. /* rounding primitives */
  256. #define avg2(a,b) ((a+b+1)>>1)
  257. #define avg4(a,b,c,d) ((a+b+c+d+2)>>2)
  258. #define op_put(a, b) a = b
  259. #define op_avg(a, b) a = avg2(a, b)
  260. #define op_sub(a, b) a -= b
  261. PIXOP(UINT8, put, op_put, line_size)
  262. PIXOP(UINT8, avg, op_avg, line_size)
  263. PIXOP(DCTELEM, sub, op_sub, 8)
  264. /* not rounding primitives */
  265. #undef avg2
  266. #undef avg4
  267. #define avg2(a,b) ((a+b)>>1)
  268. #define avg4(a,b,c,d) ((a+b+c+d+1)>>2)
  269. PIXOP(UINT8, put_no_rnd, op_put, line_size)
  270. PIXOP(UINT8, avg_no_rnd, op_avg, line_size)
  271. /* motion estimation */
  272. #undef avg2
  273. #undef avg4
  274. #define avg2(a,b) ((a+b+1)>>1)
  275. #define avg4(a,b,c,d) ((a+b+c+d+2)>>2)
  276. int pix_abs16x16_c(UINT8 *pix1, UINT8 *pix2, int line_size, int h)
  277. {
  278. int s, i;
  279. s = 0;
  280. for(i=0;i<h;i++) {
  281. s += abs(pix1[0] - pix2[0]);
  282. s += abs(pix1[1] - pix2[1]);
  283. s += abs(pix1[2] - pix2[2]);
  284. s += abs(pix1[3] - pix2[3]);
  285. s += abs(pix1[4] - pix2[4]);
  286. s += abs(pix1[5] - pix2[5]);
  287. s += abs(pix1[6] - pix2[6]);
  288. s += abs(pix1[7] - pix2[7]);
  289. s += abs(pix1[8] - pix2[8]);
  290. s += abs(pix1[9] - pix2[9]);
  291. s += abs(pix1[10] - pix2[10]);
  292. s += abs(pix1[11] - pix2[11]);
  293. s += abs(pix1[12] - pix2[12]);
  294. s += abs(pix1[13] - pix2[13]);
  295. s += abs(pix1[14] - pix2[14]);
  296. s += abs(pix1[15] - pix2[15]);
  297. pix1 += line_size;
  298. pix2 += line_size;
  299. }
  300. return s;
  301. }
  302. int pix_abs16x16_x2_c(UINT8 *pix1, UINT8 *pix2, int line_size, int h)
  303. {
  304. int s, i;
  305. s = 0;
  306. for(i=0;i<h;i++) {
  307. s += abs(pix1[0] - avg2(pix2[0], pix2[1]));
  308. s += abs(pix1[1] - avg2(pix2[1], pix2[2]));
  309. s += abs(pix1[2] - avg2(pix2[2], pix2[3]));
  310. s += abs(pix1[3] - avg2(pix2[3], pix2[4]));
  311. s += abs(pix1[4] - avg2(pix2[4], pix2[5]));
  312. s += abs(pix1[5] - avg2(pix2[5], pix2[6]));
  313. s += abs(pix1[6] - avg2(pix2[6], pix2[7]));
  314. s += abs(pix1[7] - avg2(pix2[7], pix2[8]));
  315. s += abs(pix1[8] - avg2(pix2[8], pix2[9]));
  316. s += abs(pix1[9] - avg2(pix2[9], pix2[10]));
  317. s += abs(pix1[10] - avg2(pix2[10], pix2[11]));
  318. s += abs(pix1[11] - avg2(pix2[11], pix2[12]));
  319. s += abs(pix1[12] - avg2(pix2[12], pix2[13]));
  320. s += abs(pix1[13] - avg2(pix2[13], pix2[14]));
  321. s += abs(pix1[14] - avg2(pix2[14], pix2[15]));
  322. s += abs(pix1[15] - avg2(pix2[15], pix2[16]));
  323. pix1 += line_size;
  324. pix2 += line_size;
  325. }
  326. return s;
  327. }
  328. int pix_abs16x16_y2_c(UINT8 *pix1, UINT8 *pix2, int line_size, int h)
  329. {
  330. int s, i;
  331. UINT8 *pix3 = pix2 + line_size;
  332. s = 0;
  333. for(i=0;i<h;i++) {
  334. s += abs(pix1[0] - avg2(pix2[0], pix3[0]));
  335. s += abs(pix1[1] - avg2(pix2[1], pix3[1]));
  336. s += abs(pix1[2] - avg2(pix2[2], pix3[2]));
  337. s += abs(pix1[3] - avg2(pix2[3], pix3[3]));
  338. s += abs(pix1[4] - avg2(pix2[4], pix3[4]));
  339. s += abs(pix1[5] - avg2(pix2[5], pix3[5]));
  340. s += abs(pix1[6] - avg2(pix2[6], pix3[6]));
  341. s += abs(pix1[7] - avg2(pix2[7], pix3[7]));
  342. s += abs(pix1[8] - avg2(pix2[8], pix3[8]));
  343. s += abs(pix1[9] - avg2(pix2[9], pix3[9]));
  344. s += abs(pix1[10] - avg2(pix2[10], pix3[10]));
  345. s += abs(pix1[11] - avg2(pix2[11], pix3[11]));
  346. s += abs(pix1[12] - avg2(pix2[12], pix3[12]));
  347. s += abs(pix1[13] - avg2(pix2[13], pix3[13]));
  348. s += abs(pix1[14] - avg2(pix2[14], pix3[14]));
  349. s += abs(pix1[15] - avg2(pix2[15], pix3[15]));
  350. pix1 += line_size;
  351. pix2 += line_size;
  352. pix3 += line_size;
  353. }
  354. return s;
  355. }
  356. int pix_abs16x16_xy2_c(UINT8 *pix1, UINT8 *pix2, int line_size, int h)
  357. {
  358. int s, i;
  359. UINT8 *pix3 = pix2 + line_size;
  360. s = 0;
  361. for(i=0;i<h;i++) {
  362. s += abs(pix1[0] - avg4(pix2[0], pix2[1], pix3[0], pix3[1]));
  363. s += abs(pix1[1] - avg4(pix2[1], pix2[2], pix3[1], pix3[2]));
  364. s += abs(pix1[2] - avg4(pix2[2], pix2[3], pix3[2], pix3[3]));
  365. s += abs(pix1[3] - avg4(pix2[3], pix2[4], pix3[3], pix3[4]));
  366. s += abs(pix1[4] - avg4(pix2[4], pix2[5], pix3[4], pix3[5]));
  367. s += abs(pix1[5] - avg4(pix2[5], pix2[6], pix3[5], pix3[6]));
  368. s += abs(pix1[6] - avg4(pix2[6], pix2[7], pix3[6], pix3[7]));
  369. s += abs(pix1[7] - avg4(pix2[7], pix2[8], pix3[7], pix3[8]));
  370. s += abs(pix1[8] - avg4(pix2[8], pix2[9], pix3[8], pix3[9]));
  371. s += abs(pix1[9] - avg4(pix2[9], pix2[10], pix3[9], pix3[10]));
  372. s += abs(pix1[10] - avg4(pix2[10], pix2[11], pix3[10], pix3[11]));
  373. s += abs(pix1[11] - avg4(pix2[11], pix2[12], pix3[11], pix3[12]));
  374. s += abs(pix1[12] - avg4(pix2[12], pix2[13], pix3[12], pix3[13]));
  375. s += abs(pix1[13] - avg4(pix2[13], pix2[14], pix3[13], pix3[14]));
  376. s += abs(pix1[14] - avg4(pix2[14], pix2[15], pix3[14], pix3[15]));
  377. s += abs(pix1[15] - avg4(pix2[15], pix2[16], pix3[15], pix3[16]));
  378. pix1 += line_size;
  379. pix2 += line_size;
  380. pix3 += line_size;
  381. }
  382. return s;
  383. }
  384. /* permute block according so that it corresponds to the MMX idct
  385. order */
  386. #ifdef SIMPLE_IDCT
  387. /* general permutation, but perhaps slightly slower */
  388. void block_permute(INT16 *block)
  389. {
  390. int i;
  391. INT16 temp[64];
  392. for(i=0; i<64; i++) temp[ block_permute_op(i) ] = block[i];
  393. for(i=0; i<64; i++) block[i] = temp[i];
  394. }
  395. #else
  396. void block_permute(INT16 *block)
  397. {
  398. int tmp1, tmp2, tmp3, tmp4, tmp5, tmp6;
  399. int i;
  400. for(i=0;i<8;i++) {
  401. tmp1 = block[1];
  402. tmp2 = block[2];
  403. tmp3 = block[3];
  404. tmp4 = block[4];
  405. tmp5 = block[5];
  406. tmp6 = block[6];
  407. block[1] = tmp2;
  408. block[2] = tmp4;
  409. block[3] = tmp6;
  410. block[4] = tmp1;
  411. block[5] = tmp3;
  412. block[6] = tmp5;
  413. block += 8;
  414. }
  415. }
  416. #endif
  417. void dsputil_init(void)
  418. {
  419. int i, j;
  420. int use_permuted_idct;
  421. for(i=0;i<256;i++) cropTbl[i + MAX_NEG_CROP] = i;
  422. for(i=0;i<MAX_NEG_CROP;i++) {
  423. cropTbl[i] = 0;
  424. cropTbl[i + MAX_NEG_CROP + 256] = 255;
  425. }
  426. for(i=0;i<512;i++) {
  427. squareTbl[i] = (i - 256) * (i - 256);
  428. }
  429. #ifdef SIMPLE_IDCT
  430. ff_idct = simple_idct;
  431. #else
  432. ff_idct = j_rev_dct;
  433. #endif
  434. get_pixels = get_pixels_c;
  435. put_pixels_clamped = put_pixels_clamped_c;
  436. add_pixels_clamped = add_pixels_clamped_c;
  437. pix_abs16x16 = pix_abs16x16_c;
  438. pix_abs16x16_x2 = pix_abs16x16_x2_c;
  439. pix_abs16x16_y2 = pix_abs16x16_y2_c;
  440. pix_abs16x16_xy2 = pix_abs16x16_xy2_c;
  441. av_fdct = jpeg_fdct_ifast;
  442. use_permuted_idct = 1;
  443. #ifdef HAVE_MMX
  444. dsputil_init_mmx();
  445. #endif
  446. #ifdef ARCH_ARMV4L
  447. dsputil_init_armv4l();
  448. #endif
  449. #ifdef HAVE_MLIB
  450. dsputil_init_mlib();
  451. use_permuted_idct = 0;
  452. #endif
  453. #ifdef SIMPLE_IDCT
  454. if(ff_idct == simple_idct) use_permuted_idct=0;
  455. #endif
  456. if(use_permuted_idct)
  457. #ifdef SIMPLE_IDCT
  458. for(i=0; i<64; i++) permutation[i]= simple_mmx_permutation[i];
  459. #else
  460. for(i=0; i<64; i++) permutation[i]= (i & 0x38) | ((i & 6) >> 1) | ((i & 1) << 2);
  461. #endif
  462. else
  463. for(i=0; i<64; i++) permutation[i]=i;
  464. if (use_permuted_idct) {
  465. /* permute for IDCT */
  466. for(i=0;i<64;i++) {
  467. j = zigzag_direct[i];
  468. zigzag_direct[i] = block_permute_op(j);
  469. j = ff_alternate_horizontal_scan[i];
  470. ff_alternate_horizontal_scan[i] = block_permute_op(j);
  471. j = ff_alternate_vertical_scan[i];
  472. ff_alternate_vertical_scan[i] = block_permute_op(j);
  473. }
  474. block_permute(default_intra_matrix);
  475. block_permute(default_non_intra_matrix);
  476. }
  477. build_zigzag_end();
  478. }