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.

3479 lines
100KB

  1. /*
  2. Copyright (C) 2001 Michael Niedermayer (michaelni@gmx.at)
  3. This program is free software; you can redistribute it and/or modify
  4. it under the terms of the GNU General Public License as published by
  5. the Free Software Foundation; either version 2 of the License, or
  6. (at your option) any later version.
  7. This program is distributed in the hope that it will be useful,
  8. but WITHOUT ANY WARRANTY; without even the implied warranty of
  9. MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  10. GNU General Public License for more details.
  11. You should have received a copy of the GNU General Public License
  12. along with this program; if not, write to the Free Software
  13. Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
  14. */
  15. /*
  16. C MMX MMX2 3DNow
  17. isVertDC Ec Ec
  18. isVertMinMaxOk Ec Ec
  19. doVertLowPass E e e
  20. doVertDefFilter Ec Ec Ec
  21. isHorizDC Ec Ec
  22. isHorizMinMaxOk a E
  23. doHorizLowPass E e e
  24. doHorizDefFilter Ec Ec Ec
  25. deRing E e e*
  26. Vertical RKAlgo1 E a a
  27. Horizontal RKAlgo1 a a
  28. Vertical X1 a E E
  29. Horizontal X1 a E E
  30. LinIpolDeinterlace e E E*
  31. CubicIpolDeinterlace a e e*
  32. LinBlendDeinterlace e E E*
  33. MedianDeinterlace Ec Ec
  34. * i dont have a 3dnow CPU -> its untested
  35. E = Exact implementation
  36. e = allmost exact implementation (slightly different rounding,...)
  37. a = alternative / approximate impl
  38. c = checked against the other implementations (-vo md5)
  39. */
  40. /*
  41. TODO:
  42. verify that everything workes as it should (how?)
  43. reduce the time wasted on the mem transfer
  44. implement dering
  45. implement everything in C at least (done at the moment but ...)
  46. unroll stuff if instructions depend too much on the prior one
  47. we use 8x8 blocks for the horizontal filters, opendivx seems to use 8x4?
  48. move YScale thing to the end instead of fixing QP
  49. write a faster and higher quality deblocking filter :)
  50. do something about the speed of the horizontal filters
  51. make the mainloop more flexible (variable number of blocks at once
  52. (the if/else stuff per block is slowing things down)
  53. compare the quality & speed of all filters
  54. split this huge file
  55. fix warnings (unused vars, ...)
  56. noise reduction filters
  57. border remover
  58. optimize c versions
  59. ...
  60. Notes:
  61. */
  62. //Changelog: use the CVS log
  63. #include <inttypes.h>
  64. #include <stdio.h>
  65. #include <stdlib.h>
  66. #include <string.h>
  67. #include "../config.h"
  68. #ifdef HAVE_MALLOC_H
  69. #include <malloc.h>
  70. #endif
  71. //#undef HAVE_MMX2
  72. //#define HAVE_3DNOW
  73. //#undef HAVE_MMX
  74. #include "postprocess.h"
  75. #define MIN(a,b) ((a) > (b) ? (b) : (a))
  76. #define MAX(a,b) ((a) < (b) ? (b) : (a))
  77. #define ABS(a) ((a) > 0 ? (a) : (-(a)))
  78. #define SIGN(a) ((a) > 0 ? 1 : -1)
  79. #ifdef HAVE_MMX2
  80. #define PAVGB(a,b) "pavgb " #a ", " #b " \n\t"
  81. #elif defined (HAVE_3DNOW)
  82. #define PAVGB(a,b) "pavgusb " #a ", " #b " \n\t"
  83. #endif
  84. #ifdef HAVE_MMX2
  85. #define PMINUB(a,b,t) "pminub " #a ", " #b " \n\t"
  86. #elif defined (HAVE_MMX)
  87. #define PMINUB(b,a,t) \
  88. "movq " #a ", " #t " \n\t"\
  89. "psubusb " #b ", " #t " \n\t"\
  90. "psubb " #t ", " #a " \n\t"
  91. #endif
  92. #ifdef HAVE_MMX2
  93. #define PMAXUB(a,b) "pmaxub " #a ", " #b " \n\t"
  94. #elif defined (HAVE_MMX)
  95. #define PMAXUB(a,b) \
  96. "psubusb " #a ", " #b " \n\t"\
  97. "paddb " #a ", " #b " \n\t"
  98. #endif
  99. #define GET_MODE_BUFFER_SIZE 500
  100. #define OPTIONS_ARRAY_SIZE 10
  101. static uint64_t packedYOffset= 0x0000000000000000LL;
  102. static uint64_t packedYScale= 0x0100010001000100LL;
  103. static uint64_t w05= 0x0005000500050005LL;
  104. static uint64_t w20= 0x0020002000200020LL;
  105. static uint64_t w1400= 0x1400140014001400LL;
  106. static uint64_t bm00000001= 0x00000000000000FFLL;
  107. static uint64_t bm00010000= 0x000000FF00000000LL;
  108. static uint64_t bm00001000= 0x00000000FF000000LL;
  109. static uint64_t bm10000000= 0xFF00000000000000LL;
  110. static uint64_t bm10000001= 0xFF000000000000FFLL;
  111. static uint64_t bm11000011= 0xFFFF00000000FFFFLL;
  112. static uint64_t bm00000011= 0x000000000000FFFFLL;
  113. static uint64_t bm11111110= 0xFFFFFFFFFFFFFF00LL;
  114. static uint64_t bm11000000= 0xFFFF000000000000LL;
  115. static uint64_t bm00011000= 0x000000FFFF000000LL;
  116. static uint64_t bm00110011= 0x0000FFFF0000FFFFLL;
  117. static uint64_t bm11001100= 0xFFFF0000FFFF0000LL;
  118. static uint64_t b00= 0x0000000000000000LL;
  119. static uint64_t b01= 0x0101010101010101LL;
  120. static uint64_t b02= 0x0202020202020202LL;
  121. static uint64_t b0F= 0x0F0F0F0F0F0F0F0FLL;
  122. static uint64_t b04= 0x0404040404040404LL;
  123. static uint64_t b08= 0x0808080808080808LL;
  124. static uint64_t bFF= 0xFFFFFFFFFFFFFFFFLL;
  125. static uint64_t b20= 0x2020202020202020LL;
  126. static uint64_t b80= 0x8080808080808080LL;
  127. static uint64_t b7E= 0x7E7E7E7E7E7E7E7ELL;
  128. static uint64_t b7C= 0x7C7C7C7C7C7C7C7CLL;
  129. static uint64_t b3F= 0x3F3F3F3F3F3F3F3FLL;
  130. static uint64_t temp0=0;
  131. static uint64_t temp1=0;
  132. static uint64_t temp2=0;
  133. static uint64_t temp3=0;
  134. static uint64_t temp4=0;
  135. static uint64_t temp5=0;
  136. static uint64_t pQPb=0;
  137. static uint64_t pQPb2=0;
  138. static uint8_t tempBlocks[8*16*2]; //used for the horizontal code
  139. int hFlatnessThreshold= 56 - 16;
  140. int vFlatnessThreshold= 56 - 16;
  141. //amount of "black" u r willing to loose to get a brightness corrected picture
  142. double maxClippedThreshold= 0.01;
  143. int maxAllowedY=234;
  144. int minAllowedY=16;
  145. static struct PPFilter filters[]=
  146. {
  147. {"hb", "hdeblock", 1, 1, 3, H_DEBLOCK},
  148. {"vb", "vdeblock", 1, 2, 4, V_DEBLOCK},
  149. {"vr", "rkvdeblock", 1, 2, 4, H_RK1_FILTER},
  150. {"h1", "x1hdeblock", 1, 1, 3, H_X1_FILTER},
  151. {"v1", "x1vdeblock", 1, 2, 4, V_X1_FILTER},
  152. {"dr", "dering", 1, 5, 6, DERING},
  153. {"al", "autolevels", 0, 1, 2, LEVEL_FIX},
  154. {"lb", "linblenddeint", 0, 1, 6, LINEAR_BLEND_DEINT_FILTER},
  155. {"li", "linipoldeint", 0, 1, 6, LINEAR_IPOL_DEINT_FILTER},
  156. {"ci", "cubicipoldeint", 0, 1, 6, CUBIC_IPOL_DEINT_FILTER},
  157. {"md", "mediandeint", 0, 1, 6, MEDIAN_DEINT_FILTER},
  158. {NULL, NULL,0,0,0,0} //End Marker
  159. };
  160. static char *replaceTable[]=
  161. {
  162. "default", "hdeblock:a,vdeblock:a,dering:a,autolevels",
  163. "de", "hdeblock:a,vdeblock:a,dering:a,autolevels",
  164. "fast", "x1hdeblock:a,x1vdeblock:a,dering:a,autolevels",
  165. "fa", "x1hdeblock:a,x1vdeblock:a,dering:a,autolevels",
  166. NULL //End Marker
  167. };
  168. static inline void unusedVariableWarningFixer()
  169. {
  170. if(
  171. packedYOffset + packedYScale + w05 + w20 + w1400 + bm00000001 + bm00010000
  172. + bm00001000 + bm10000000 + bm10000001 + bm11000011 + bm00000011 + bm11111110
  173. + bm11000000 + bm00011000 + bm00110011 + bm11001100 + b00 + b01 + b02 + b0F
  174. + bFF + b20 + b80 + b7E + b7C + b3F + temp0 + temp1 + temp2 + temp3 + temp4
  175. + temp5 + pQPb== 0) b00=0;
  176. }
  177. #ifdef TIMING
  178. static inline long long rdtsc()
  179. {
  180. long long l;
  181. asm volatile( "rdtsc\n\t"
  182. : "=A" (l)
  183. );
  184. // printf("%d\n", int(l/1000));
  185. return l;
  186. }
  187. #endif
  188. #ifdef HAVE_MMX2
  189. static inline void prefetchnta(void *p)
  190. {
  191. asm volatile( "prefetchnta (%0)\n\t"
  192. : : "r" (p)
  193. );
  194. }
  195. static inline void prefetcht0(void *p)
  196. {
  197. asm volatile( "prefetcht0 (%0)\n\t"
  198. : : "r" (p)
  199. );
  200. }
  201. static inline void prefetcht1(void *p)
  202. {
  203. asm volatile( "prefetcht1 (%0)\n\t"
  204. : : "r" (p)
  205. );
  206. }
  207. static inline void prefetcht2(void *p)
  208. {
  209. asm volatile( "prefetcht2 (%0)\n\t"
  210. : : "r" (p)
  211. );
  212. }
  213. #endif
  214. //FIXME? |255-0| = 1 (shouldnt be a problem ...)
  215. /**
  216. * Check if the middle 8x8 Block in the given 8x16 block is flat
  217. */
  218. static inline int isVertDC(uint8_t src[], int stride){
  219. int numEq= 0;
  220. #ifndef HAVE_MMX
  221. int y;
  222. #endif
  223. src+= stride*4; // src points to begin of the 8x8 Block
  224. #ifdef HAVE_MMX
  225. asm volatile(
  226. "leal (%1, %2), %%eax \n\t"
  227. "leal (%%eax, %2, 4), %%ebx \n\t"
  228. // 0 1 2 3 4 5 6 7 8 9
  229. // %1 eax eax+%2 eax+2%2 %1+4%2 ebx ebx+%2 ebx+2%2 %1+8%2 ebx+4%2
  230. "movq b7E, %%mm7 \n\t" // mm7 = 0x7F
  231. "movq b7C, %%mm6 \n\t" // mm6 = 0x7D
  232. "movq (%1), %%mm0 \n\t"
  233. "movq (%%eax), %%mm1 \n\t"
  234. "psubb %%mm1, %%mm0 \n\t" // mm0 = differnece
  235. "paddb %%mm7, %%mm0 \n\t"
  236. "pcmpgtb %%mm6, %%mm0 \n\t"
  237. "movq (%%eax,%2), %%mm2 \n\t"
  238. "psubb %%mm2, %%mm1 \n\t"
  239. "paddb %%mm7, %%mm1 \n\t"
  240. "pcmpgtb %%mm6, %%mm1 \n\t"
  241. "paddb %%mm1, %%mm0 \n\t"
  242. "movq (%%eax, %2, 2), %%mm1 \n\t"
  243. "psubb %%mm1, %%mm2 \n\t"
  244. "paddb %%mm7, %%mm2 \n\t"
  245. "pcmpgtb %%mm6, %%mm2 \n\t"
  246. "paddb %%mm2, %%mm0 \n\t"
  247. "movq (%1, %2, 4), %%mm2 \n\t"
  248. "psubb %%mm2, %%mm1 \n\t"
  249. "paddb %%mm7, %%mm1 \n\t"
  250. "pcmpgtb %%mm6, %%mm1 \n\t"
  251. "paddb %%mm1, %%mm0 \n\t"
  252. "movq (%%ebx), %%mm1 \n\t"
  253. "psubb %%mm1, %%mm2 \n\t"
  254. "paddb %%mm7, %%mm2 \n\t"
  255. "pcmpgtb %%mm6, %%mm2 \n\t"
  256. "paddb %%mm2, %%mm0 \n\t"
  257. "movq (%%ebx, %2), %%mm2 \n\t"
  258. "psubb %%mm2, %%mm1 \n\t"
  259. "paddb %%mm7, %%mm1 \n\t"
  260. "pcmpgtb %%mm6, %%mm1 \n\t"
  261. "paddb %%mm1, %%mm0 \n\t"
  262. "movq (%%ebx, %2, 2), %%mm1 \n\t"
  263. "psubb %%mm1, %%mm2 \n\t"
  264. "paddb %%mm7, %%mm2 \n\t"
  265. "pcmpgtb %%mm6, %%mm2 \n\t"
  266. "paddb %%mm2, %%mm0 \n\t"
  267. " \n\t"
  268. "movq %%mm0, %%mm1 \n\t"
  269. "psrlw $8, %%mm0 \n\t"
  270. "paddb %%mm1, %%mm0 \n\t"
  271. #ifdef HAVE_MMX2
  272. "pshufw $0xF9, %%mm0, %%mm1 \n\t"
  273. "paddb %%mm1, %%mm0 \n\t"
  274. "pshufw $0xFE, %%mm0, %%mm1 \n\t"
  275. #else
  276. "movq %%mm0, %%mm1 \n\t"
  277. "psrlq $16, %%mm0 \n\t"
  278. "paddb %%mm1, %%mm0 \n\t"
  279. "movq %%mm0, %%mm1 \n\t"
  280. "psrlq $32, %%mm0 \n\t"
  281. #endif
  282. "paddb %%mm1, %%mm0 \n\t"
  283. "movd %%mm0, %0 \n\t"
  284. : "=r" (numEq)
  285. : "r" (src), "r" (stride)
  286. : "%eax", "%ebx"
  287. );
  288. numEq= (256 - numEq) &0xFF;
  289. #else
  290. for(y=0; y<BLOCK_SIZE-1; y++)
  291. {
  292. if(((src[0] - src[0+stride] + 1)&0xFFFF) < 3) numEq++;
  293. if(((src[1] - src[1+stride] + 1)&0xFFFF) < 3) numEq++;
  294. if(((src[2] - src[2+stride] + 1)&0xFFFF) < 3) numEq++;
  295. if(((src[3] - src[3+stride] + 1)&0xFFFF) < 3) numEq++;
  296. if(((src[4] - src[4+stride] + 1)&0xFFFF) < 3) numEq++;
  297. if(((src[5] - src[5+stride] + 1)&0xFFFF) < 3) numEq++;
  298. if(((src[6] - src[6+stride] + 1)&0xFFFF) < 3) numEq++;
  299. if(((src[7] - src[7+stride] + 1)&0xFFFF) < 3) numEq++;
  300. src+= stride;
  301. }
  302. #endif
  303. /* if(abs(numEq - asmEq) > 0)
  304. {
  305. printf("\nasm:%d c:%d\n", asmEq, numEq);
  306. for(int y=0; y<8; y++)
  307. {
  308. for(int x=0; x<8; x++)
  309. {
  310. printf("%d ", temp[x + y*stride]);
  311. }
  312. printf("\n");
  313. }
  314. }
  315. */
  316. // for(int i=0; i<numEq/8; i++) src[i]=255;
  317. return (numEq > vFlatnessThreshold) ? 1 : 0;
  318. }
  319. static inline int isVertMinMaxOk(uint8_t src[], int stride, int QP)
  320. {
  321. #ifdef HAVE_MMX
  322. int isOk;
  323. src+= stride*3;
  324. asm volatile(
  325. // "int $3 \n\t"
  326. "movq (%1, %2), %%mm0 \n\t"
  327. "movq (%1, %2, 8), %%mm1 \n\t"
  328. "movq %%mm0, %%mm2 \n\t"
  329. "psubusb %%mm1, %%mm0 \n\t"
  330. "psubusb %%mm2, %%mm1 \n\t"
  331. "por %%mm1, %%mm0 \n\t" // ABS Diff
  332. "movq pQPb, %%mm7 \n\t" // QP,..., QP
  333. "paddusb %%mm7, %%mm7 \n\t" // 2QP ... 2QP
  334. "psubusb %%mm7, %%mm0 \n\t" // Diff <= 2QP -> 0
  335. "pcmpeqd b00, %%mm0 \n\t"
  336. "psrlq $16, %%mm0 \n\t"
  337. "pcmpeqd bFF, %%mm0 \n\t"
  338. // "movd %%mm0, (%1, %2, 4)\n\t"
  339. "movd %%mm0, %0 \n\t"
  340. : "=r" (isOk)
  341. : "r" (src), "r" (stride)
  342. );
  343. return isOk;
  344. #else
  345. int isOk2= 1;
  346. int x;
  347. src+= stride*3;
  348. for(x=0; x<BLOCK_SIZE; x++)
  349. {
  350. if(abs((int)src[x + stride] - (int)src[x + (stride<<3)]) > 2*QP) isOk2=0;
  351. }
  352. /* if(isOk && !isOk2 || !isOk && isOk2)
  353. {
  354. printf("\nasm:%d c:%d QP:%d\n", isOk, isOk2, QP);
  355. for(int y=0; y<9; y++)
  356. {
  357. for(int x=0; x<8; x++)
  358. {
  359. printf("%d ", src[x + y*stride]);
  360. }
  361. printf("\n");
  362. }
  363. } */
  364. return isOk2;
  365. #endif
  366. }
  367. /**
  368. * Do a vertical low pass filter on the 8x16 block (only write to the 8x8 block in the middle)
  369. * using the 9-Tap Filter (1,1,2,2,4,2,2,1,1)/16
  370. */
  371. static inline void doVertLowPass(uint8_t *src, int stride, int QP)
  372. {
  373. #if defined (HAVE_MMX2) || defined (HAVE_3DNOW)
  374. src+= stride*3;
  375. asm volatile( //"movv %0 %1 %2\n\t"
  376. "movq pQPb, %%mm0 \n\t" // QP,..., QP
  377. "movq (%0), %%mm6 \n\t"
  378. "movq (%0, %1), %%mm5 \n\t"
  379. "movq %%mm5, %%mm1 \n\t"
  380. "movq %%mm6, %%mm2 \n\t"
  381. "psubusb %%mm6, %%mm5 \n\t"
  382. "psubusb %%mm1, %%mm2 \n\t"
  383. "por %%mm5, %%mm2 \n\t" // ABS Diff of lines
  384. "psubusb %%mm0, %%mm2 \n\t" // diff <= QP -> 0
  385. "pcmpeqb b00, %%mm2 \n\t" // diff <= QP -> FF
  386. "pand %%mm2, %%mm6 \n\t"
  387. "pandn %%mm1, %%mm2 \n\t"
  388. "por %%mm2, %%mm6 \n\t"// First Line to Filter
  389. "movq (%0, %1, 8), %%mm5 \n\t"
  390. "leal (%0, %1, 4), %%eax \n\t"
  391. "leal (%0, %1, 8), %%ebx \n\t"
  392. "subl %1, %%ebx \n\t"
  393. "addl %1, %0 \n\t" // %0 points to line 1 not 0
  394. "movq (%0, %1, 8), %%mm7 \n\t"
  395. "movq %%mm5, %%mm1 \n\t"
  396. "movq %%mm7, %%mm2 \n\t"
  397. "psubusb %%mm7, %%mm5 \n\t"
  398. "psubusb %%mm1, %%mm2 \n\t"
  399. "por %%mm5, %%mm2 \n\t" // ABS Diff of lines
  400. "psubusb %%mm0, %%mm2 \n\t" // diff <= QP -> 0
  401. "pcmpeqb b00, %%mm2 \n\t" // diff <= QP -> FF
  402. "pand %%mm2, %%mm7 \n\t"
  403. "pandn %%mm1, %%mm2 \n\t"
  404. "por %%mm2, %%mm7 \n\t" // First Line to Filter
  405. // 1 2 3 4 5 6 7 8
  406. // %0 %0+%1 %0+2%1 eax %0+4%1 eax+2%1 ebx eax+4%1
  407. // 6 4 2 2 1 1
  408. // 6 4 4 2
  409. // 6 8 2
  410. "movq (%0, %1), %%mm0 \n\t" // 1
  411. "movq %%mm0, %%mm1 \n\t" // 1
  412. PAVGB(%%mm6, %%mm0) //1 1 /2
  413. PAVGB(%%mm6, %%mm0) //3 1 /4
  414. "movq (%0, %1, 4), %%mm2 \n\t" // 1
  415. "movq %%mm2, %%mm5 \n\t" // 1
  416. PAVGB((%%eax), %%mm2) // 11 /2
  417. PAVGB((%0, %1, 2), %%mm2) // 211 /4
  418. "movq %%mm2, %%mm3 \n\t" // 211 /4
  419. "movq (%0), %%mm4 \n\t" // 1
  420. PAVGB(%%mm4, %%mm3) // 4 211 /8
  421. PAVGB(%%mm0, %%mm3) //642211 /16
  422. "movq %%mm3, (%0) \n\t" // X
  423. // mm1=2 mm2=3(211) mm4=1 mm5=5 mm6=0 mm7=9
  424. "movq %%mm1, %%mm0 \n\t" // 1
  425. PAVGB(%%mm6, %%mm0) //1 1 /2
  426. "movq %%mm4, %%mm3 \n\t" // 1
  427. PAVGB((%0,%1,2), %%mm3) // 1 1 /2
  428. PAVGB((%%eax,%1,2), %%mm5) // 11 /2
  429. PAVGB((%%eax), %%mm5) // 211 /4
  430. PAVGB(%%mm5, %%mm3) // 2 2211 /8
  431. PAVGB(%%mm0, %%mm3) //4242211 /16
  432. "movq %%mm3, (%0,%1) \n\t" // X
  433. // mm1=2 mm2=3(211) mm4=1 mm5=4(211) mm6=0 mm7=9
  434. PAVGB(%%mm4, %%mm6) //11 /2
  435. "movq (%%ebx), %%mm0 \n\t" // 1
  436. PAVGB((%%eax, %1, 2), %%mm0) // 11/2
  437. "movq %%mm0, %%mm3 \n\t" // 11/2
  438. PAVGB(%%mm1, %%mm0) // 2 11/4
  439. PAVGB(%%mm6, %%mm0) //222 11/8
  440. PAVGB(%%mm2, %%mm0) //22242211/16
  441. "movq (%0, %1, 2), %%mm2 \n\t" // 1
  442. "movq %%mm0, (%0, %1, 2) \n\t" // X
  443. // mm1=2 mm2=3 mm3=6(11) mm4=1 mm5=4(211) mm6=0(11) mm7=9
  444. "movq (%%eax, %1, 4), %%mm0 \n\t" // 1
  445. PAVGB((%%ebx), %%mm0) // 11 /2
  446. PAVGB(%%mm0, %%mm6) //11 11 /4
  447. PAVGB(%%mm1, %%mm4) // 11 /2
  448. PAVGB(%%mm2, %%mm1) // 11 /2
  449. PAVGB(%%mm1, %%mm6) //1122 11 /8
  450. PAVGB(%%mm5, %%mm6) //112242211 /16
  451. "movq (%%eax), %%mm5 \n\t" // 1
  452. "movq %%mm6, (%%eax) \n\t" // X
  453. // mm0=7(11) mm1=2(11) mm2=3 mm3=6(11) mm4=1(11) mm5=4 mm7=9
  454. "movq (%%eax, %1, 4), %%mm6 \n\t" // 1
  455. PAVGB(%%mm7, %%mm6) // 11 /2
  456. PAVGB(%%mm4, %%mm6) // 11 11 /4
  457. PAVGB(%%mm3, %%mm6) // 11 2211 /8
  458. PAVGB(%%mm5, %%mm2) // 11 /2
  459. "movq (%0, %1, 4), %%mm4 \n\t" // 1
  460. PAVGB(%%mm4, %%mm2) // 112 /4
  461. PAVGB(%%mm2, %%mm6) // 112242211 /16
  462. "movq %%mm6, (%0, %1, 4) \n\t" // X
  463. // mm0=7(11) mm1=2(11) mm2=3(112) mm3=6(11) mm4=5 mm5=4 mm7=9
  464. PAVGB(%%mm7, %%mm1) // 11 2 /4
  465. PAVGB(%%mm4, %%mm5) // 11 /2
  466. PAVGB(%%mm5, %%mm0) // 11 11 /4
  467. "movq (%%eax, %1, 2), %%mm6 \n\t" // 1
  468. PAVGB(%%mm6, %%mm1) // 11 4 2 /8
  469. PAVGB(%%mm0, %%mm1) // 11224222 /16
  470. "movq %%mm1, (%%eax, %1, 2) \n\t" // X
  471. // mm2=3(112) mm3=6(11) mm4=5 mm5=4(11) mm6=6 mm7=9
  472. PAVGB((%%ebx), %%mm2) // 112 4 /8
  473. "movq (%%eax, %1, 4), %%mm0 \n\t" // 1
  474. PAVGB(%%mm0, %%mm6) // 1 1 /2
  475. PAVGB(%%mm7, %%mm6) // 1 12 /4
  476. PAVGB(%%mm2, %%mm6) // 1122424 /4
  477. "movq %%mm6, (%%ebx) \n\t" // X
  478. // mm0=8 mm3=6(11) mm4=5 mm5=4(11) mm7=9
  479. PAVGB(%%mm7, %%mm5) // 11 2 /4
  480. PAVGB(%%mm7, %%mm5) // 11 6 /8
  481. PAVGB(%%mm3, %%mm0) // 112 /4
  482. PAVGB(%%mm0, %%mm5) // 112246 /16
  483. "movq %%mm5, (%%eax, %1, 4) \n\t" // X
  484. "subl %1, %0 \n\t"
  485. :
  486. : "r" (src), "r" (stride)
  487. : "%eax", "%ebx"
  488. );
  489. #else
  490. const int l1= stride;
  491. const int l2= stride + l1;
  492. const int l3= stride + l2;
  493. const int l4= stride + l3;
  494. const int l5= stride + l4;
  495. const int l6= stride + l5;
  496. const int l7= stride + l6;
  497. const int l8= stride + l7;
  498. const int l9= stride + l8;
  499. int x;
  500. src+= stride*3;
  501. for(x=0; x<BLOCK_SIZE; x++)
  502. {
  503. const int first= ABS(src[0] - src[l1]) < QP ? src[0] : src[l1];
  504. const int last= ABS(src[l8] - src[l9]) < QP ? src[l9] : src[l8];
  505. int sums[9];
  506. sums[0] = first + src[l1];
  507. sums[1] = src[l1] + src[l2];
  508. sums[2] = src[l2] + src[l3];
  509. sums[3] = src[l3] + src[l4];
  510. sums[4] = src[l4] + src[l5];
  511. sums[5] = src[l5] + src[l6];
  512. sums[6] = src[l6] + src[l7];
  513. sums[7] = src[l7] + src[l8];
  514. sums[8] = src[l8] + last;
  515. src[l1]= ((sums[0]<<2) + ((first + sums[2])<<1) + sums[4] + 8)>>4;
  516. src[l2]= ((src[l2]<<2) + ((first + sums[0] + sums[3])<<1) + sums[5] + 8)>>4;
  517. src[l3]= ((src[l3]<<2) + ((first + sums[1] + sums[4])<<1) + sums[6] + 8)>>4;
  518. src[l4]= ((src[l4]<<2) + ((sums[2] + sums[5])<<1) + sums[0] + sums[7] + 8)>>4;
  519. src[l5]= ((src[l5]<<2) + ((sums[3] + sums[6])<<1) + sums[1] + sums[8] + 8)>>4;
  520. src[l6]= ((src[l6]<<2) + ((last + sums[7] + sums[4])<<1) + sums[2] + 8)>>4;
  521. src[l7]= (((last + src[l7])<<2) + ((src[l8] + sums[5])<<1) + sums[3] + 8)>>4;
  522. src[l8]= ((sums[8]<<2) + ((last + sums[6])<<1) + sums[4] + 8)>>4;
  523. src++;
  524. }
  525. #endif
  526. }
  527. /**
  528. * Experimental implementation of the filter (Algorithm 1) described in a paper from Ramkishor & Karandikar
  529. * values are correctly clipped (MMX2)
  530. * values are wraparound (C)
  531. * conclusion: its fast, but introduces ugly horizontal patterns if there is a continious gradient
  532. 0 8 16 24
  533. x = 8
  534. x/2 = 4
  535. x/8 = 1
  536. 1 12 12 23
  537. */
  538. static inline void vertRK1Filter(uint8_t *src, int stride, int QP)
  539. {
  540. #if defined (HAVE_MMX2) || defined (HAVE_3DNOW)
  541. src+= stride*3;
  542. // FIXME rounding
  543. asm volatile(
  544. "pxor %%mm7, %%mm7 \n\t" // 0
  545. "movq b80, %%mm6 \n\t" // MIN_SIGNED_BYTE
  546. "leal (%0, %1), %%eax \n\t"
  547. "leal (%%eax, %1, 4), %%ebx \n\t"
  548. // 0 1 2 3 4 5 6 7 8 9
  549. // %0 eax eax+%1 eax+2%1 %0+4%1 ebx ebx+%1 ebx+2%1 %0+8%1 ebx+4%1
  550. "movq pQPb, %%mm0 \n\t" // QP,..., QP
  551. "movq %%mm0, %%mm1 \n\t" // QP,..., QP
  552. "paddusb b02, %%mm0 \n\t"
  553. "psrlw $2, %%mm0 \n\t"
  554. "pand b3F, %%mm0 \n\t" // QP/4,..., QP/4
  555. "paddusb %%mm1, %%mm0 \n\t" // QP*1.25 ...
  556. "movq (%0, %1, 4), %%mm2 \n\t" // line 4
  557. "movq (%%ebx), %%mm3 \n\t" // line 5
  558. "movq %%mm2, %%mm4 \n\t" // line 4
  559. "pcmpeqb %%mm5, %%mm5 \n\t" // -1
  560. "pxor %%mm2, %%mm5 \n\t" // -line 4 - 1
  561. PAVGB(%%mm3, %%mm5)
  562. "paddb %%mm6, %%mm5 \n\t" // (l5-l4)/2
  563. "psubusb %%mm3, %%mm4 \n\t"
  564. "psubusb %%mm2, %%mm3 \n\t"
  565. "por %%mm3, %%mm4 \n\t" // |l4 - l5|
  566. "psubusb %%mm0, %%mm4 \n\t"
  567. "pcmpeqb %%mm7, %%mm4 \n\t"
  568. "pand %%mm4, %%mm5 \n\t" // d/2
  569. // "paddb %%mm6, %%mm2 \n\t" // line 4 + 0x80
  570. "paddb %%mm5, %%mm2 \n\t"
  571. // "psubb %%mm6, %%mm2 \n\t"
  572. "movq %%mm2, (%0,%1, 4) \n\t"
  573. "movq (%%ebx), %%mm2 \n\t"
  574. // "paddb %%mm6, %%mm2 \n\t" // line 5 + 0x80
  575. "psubb %%mm5, %%mm2 \n\t"
  576. // "psubb %%mm6, %%mm2 \n\t"
  577. "movq %%mm2, (%%ebx) \n\t"
  578. "paddb %%mm6, %%mm5 \n\t"
  579. "psrlw $2, %%mm5 \n\t"
  580. "pand b3F, %%mm5 \n\t"
  581. "psubb b20, %%mm5 \n\t" // (l5-l4)/8
  582. "movq (%%eax, %1, 2), %%mm2 \n\t"
  583. "paddb %%mm6, %%mm2 \n\t" // line 3 + 0x80
  584. "paddsb %%mm5, %%mm2 \n\t"
  585. "psubb %%mm6, %%mm2 \n\t"
  586. "movq %%mm2, (%%eax, %1, 2) \n\t"
  587. "movq (%%ebx, %1), %%mm2 \n\t"
  588. "paddb %%mm6, %%mm2 \n\t" // line 6 + 0x80
  589. "psubsb %%mm5, %%mm2 \n\t"
  590. "psubb %%mm6, %%mm2 \n\t"
  591. "movq %%mm2, (%%ebx, %1) \n\t"
  592. :
  593. : "r" (src), "r" (stride)
  594. : "%eax", "%ebx"
  595. );
  596. #else
  597. const int l1= stride;
  598. const int l2= stride + l1;
  599. const int l3= stride + l2;
  600. const int l4= stride + l3;
  601. const int l5= stride + l4;
  602. const int l6= stride + l5;
  603. // const int l7= stride + l6;
  604. // const int l8= stride + l7;
  605. // const int l9= stride + l8;
  606. int x;
  607. const int QP15= QP + (QP>>2);
  608. src+= stride*3;
  609. for(x=0; x<BLOCK_SIZE; x++)
  610. {
  611. const int v = (src[x+l5] - src[x+l4]);
  612. if(ABS(v) < QP15)
  613. {
  614. src[x+l3] +=v>>3;
  615. src[x+l4] +=v>>1;
  616. src[x+l5] -=v>>1;
  617. src[x+l6] -=v>>3;
  618. }
  619. }
  620. #endif
  621. }
  622. /**
  623. * Experimental Filter 1
  624. * will not damage linear gradients
  625. * Flat blocks should look like they where passed through the (1,1,2,2,4,2,2,1,1) 9-Tap filter
  626. * can only smooth blocks at the expected locations (it cant smooth them if they did move)
  627. * MMX2 version does correct clipping C version doesnt
  628. */
  629. static inline void vertX1Filter(uint8_t *src, int stride, int QP)
  630. {
  631. #if defined (HAVE_MMX2) || defined (HAVE_3DNOW)
  632. src+= stride*3;
  633. asm volatile(
  634. "pxor %%mm7, %%mm7 \n\t" // 0
  635. // "movq b80, %%mm6 \n\t" // MIN_SIGNED_BYTE
  636. "leal (%0, %1), %%eax \n\t"
  637. "leal (%%eax, %1, 4), %%ebx \n\t"
  638. // 0 1 2 3 4 5 6 7 8 9
  639. // %0 eax eax+%1 eax+2%1 %0+4%1 ebx ebx+%1 ebx+2%1 %0+8%1 ebx+4%1
  640. "movq (%%eax, %1, 2), %%mm0 \n\t" // line 3
  641. "movq (%0, %1, 4), %%mm1 \n\t" // line 4
  642. "movq %%mm1, %%mm2 \n\t" // line 4
  643. "psubusb %%mm0, %%mm1 \n\t"
  644. "psubusb %%mm2, %%mm0 \n\t"
  645. "por %%mm1, %%mm0 \n\t" // |l2 - l3|
  646. "movq (%%ebx), %%mm3 \n\t" // line 5
  647. "movq (%%ebx, %1), %%mm4 \n\t" // line 6
  648. "movq %%mm3, %%mm5 \n\t" // line 5
  649. "psubusb %%mm4, %%mm3 \n\t"
  650. "psubusb %%mm5, %%mm4 \n\t"
  651. "por %%mm4, %%mm3 \n\t" // |l5 - l6|
  652. PAVGB(%%mm3, %%mm0) // (|l2 - l3| + |l5 - l6|)/2
  653. "movq %%mm2, %%mm1 \n\t" // line 4
  654. "psubusb %%mm5, %%mm2 \n\t"
  655. "movq %%mm2, %%mm4 \n\t"
  656. "pcmpeqb %%mm7, %%mm2 \n\t" // (l4 - l5) <= 0 ? -1 : 0
  657. "psubusb %%mm1, %%mm5 \n\t"
  658. "por %%mm5, %%mm4 \n\t" // |l4 - l5|
  659. "psubusb %%mm0, %%mm4 \n\t" //d = MAX(0, |l4-l5| - (|l2-l3| + |l5-l6|)/2)
  660. "movq %%mm4, %%mm3 \n\t" // d
  661. "psubusb pQPb, %%mm4 \n\t"
  662. "pcmpeqb %%mm7, %%mm4 \n\t" // d <= QP ? -1 : 0
  663. "psubusb b01, %%mm3 \n\t"
  664. "pand %%mm4, %%mm3 \n\t" // d <= QP ? d : 0
  665. PAVGB(%%mm7, %%mm3) // d/2
  666. "movq %%mm3, %%mm1 \n\t" // d/2
  667. PAVGB(%%mm7, %%mm3) // d/4
  668. PAVGB(%%mm1, %%mm3) // 3*d/8
  669. "movq (%0, %1, 4), %%mm0 \n\t" // line 4
  670. "pxor %%mm2, %%mm0 \n\t" //(l4 - l5) <= 0 ? -l4-1 : l4
  671. "psubusb %%mm3, %%mm0 \n\t"
  672. "pxor %%mm2, %%mm0 \n\t"
  673. "movq %%mm0, (%0, %1, 4) \n\t" // line 4
  674. "movq (%%ebx), %%mm0 \n\t" // line 5
  675. "pxor %%mm2, %%mm0 \n\t" //(l4 - l5) <= 0 ? -l5-1 : l5
  676. "paddusb %%mm3, %%mm0 \n\t"
  677. "pxor %%mm2, %%mm0 \n\t"
  678. "movq %%mm0, (%%ebx) \n\t" // line 5
  679. PAVGB(%%mm7, %%mm1) // d/4
  680. "movq (%%eax, %1, 2), %%mm0 \n\t" // line 3
  681. "pxor %%mm2, %%mm0 \n\t" //(l4 - l5) <= 0 ? -l4-1 : l4
  682. "psubusb %%mm1, %%mm0 \n\t"
  683. "pxor %%mm2, %%mm0 \n\t"
  684. "movq %%mm0, (%%eax, %1, 2) \n\t" // line 3
  685. "movq (%%ebx, %1), %%mm0 \n\t" // line 6
  686. "pxor %%mm2, %%mm0 \n\t" //(l4 - l5) <= 0 ? -l5-1 : l5
  687. "paddusb %%mm1, %%mm0 \n\t"
  688. "pxor %%mm2, %%mm0 \n\t"
  689. "movq %%mm0, (%%ebx, %1) \n\t" // line 6
  690. PAVGB(%%mm7, %%mm1) // d/8
  691. "movq (%%eax, %1), %%mm0 \n\t" // line 2
  692. "pxor %%mm2, %%mm0 \n\t" //(l4 - l5) <= 0 ? -l2-1 : l2
  693. "psubusb %%mm1, %%mm0 \n\t"
  694. "pxor %%mm2, %%mm0 \n\t"
  695. "movq %%mm0, (%%eax, %1) \n\t" // line 2
  696. "movq (%%ebx, %1, 2), %%mm0 \n\t" // line 7
  697. "pxor %%mm2, %%mm0 \n\t" //(l4 - l5) <= 0 ? -l7-1 : l7
  698. "paddusb %%mm1, %%mm0 \n\t"
  699. "pxor %%mm2, %%mm0 \n\t"
  700. "movq %%mm0, (%%ebx, %1, 2) \n\t" // line 7
  701. :
  702. : "r" (src), "r" (stride)
  703. : "%eax", "%ebx"
  704. );
  705. #else
  706. const int l1= stride;
  707. const int l2= stride + l1;
  708. const int l3= stride + l2;
  709. const int l4= stride + l3;
  710. const int l5= stride + l4;
  711. const int l6= stride + l5;
  712. const int l7= stride + l6;
  713. // const int l8= stride + l7;
  714. // const int l9= stride + l8;
  715. int x;
  716. src+= stride*3;
  717. for(x=0; x<BLOCK_SIZE; x++)
  718. {
  719. int a= src[l3] - src[l4];
  720. int b= src[l4] - src[l5];
  721. int c= src[l5] - src[l6];
  722. int d= ABS(b) - ((ABS(a) + ABS(c))>>1);
  723. d= MAX(d, 0);
  724. if(d < QP)
  725. {
  726. int v = d * SIGN(-b);
  727. src[l2] +=v>>3;
  728. src[l3] +=v>>2;
  729. src[l4] +=(3*v)>>3;
  730. src[l5] -=(3*v)>>3;
  731. src[l6] -=v>>2;
  732. src[l7] -=v>>3;
  733. }
  734. src++;
  735. }
  736. /*
  737. const int l1= stride;
  738. const int l2= stride + l1;
  739. const int l3= stride + l2;
  740. const int l4= stride + l3;
  741. const int l5= stride + l4;
  742. const int l6= stride + l5;
  743. const int l7= stride + l6;
  744. const int l8= stride + l7;
  745. const int l9= stride + l8;
  746. for(int x=0; x<BLOCK_SIZE; x++)
  747. {
  748. int v2= src[l2];
  749. int v3= src[l3];
  750. int v4= src[l4];
  751. int v5= src[l5];
  752. int v6= src[l6];
  753. int v7= src[l7];
  754. if(ABS(v4-v5)<QP && ABS(v4-v5) - (ABS(v3-v4) + ABS(v5-v6))>0 )
  755. {
  756. src[l3] = (6*v2 + 4*v3 + 3*v4 + 2*v5 + v6 )/16;
  757. src[l4] = (3*v2 + 3*v3 + 4*v4 + 3*v5 + 2*v6 + v7 )/16;
  758. src[l5] = (1*v2 + 2*v3 + 3*v4 + 4*v5 + 3*v6 + 3*v7)/16;
  759. src[l6] = ( 1*v3 + 2*v4 + 3*v5 + 4*v6 + 6*v7)/16;
  760. }
  761. src++;
  762. }
  763. */
  764. #endif
  765. }
  766. /**
  767. * Experimental Filter 1 (Horizontal)
  768. * will not damage linear gradients
  769. * Flat blocks should look like they where passed through the (1,1,2,2,4,2,2,1,1) 9-Tap filter
  770. * can only smooth blocks at the expected locations (it cant smooth them if they did move)
  771. * MMX2 version does correct clipping C version doesnt
  772. * not identical with the vertical one
  773. */
  774. static inline void horizX1Filter(uint8_t *src, int stride, int QP)
  775. {
  776. int y;
  777. static uint64_t *lut= NULL;
  778. if(lut==NULL)
  779. {
  780. int i;
  781. lut= (uint64_t*)memalign(8, 256*8);
  782. for(i=0; i<256; i++)
  783. {
  784. int v= i < 128 ? 2*i : 2*(i-256);
  785. /*
  786. //Simulate 112242211 9-Tap filter
  787. uint64_t a= (v/16) & 0xFF;
  788. uint64_t b= (v/8) & 0xFF;
  789. uint64_t c= (v/4) & 0xFF;
  790. uint64_t d= (3*v/8) & 0xFF;
  791. */
  792. //Simulate piecewise linear interpolation
  793. uint64_t a= (v/16) & 0xFF;
  794. uint64_t b= (v*3/16) & 0xFF;
  795. uint64_t c= (v*5/16) & 0xFF;
  796. uint64_t d= (7*v/16) & 0xFF;
  797. uint64_t A= (0x100 - a)&0xFF;
  798. uint64_t B= (0x100 - b)&0xFF;
  799. uint64_t C= (0x100 - c)&0xFF;
  800. uint64_t D= (0x100 - c)&0xFF;
  801. lut[i] = (a<<56) | (b<<48) | (c<<40) | (d<<32) |
  802. (D<<24) | (C<<16) | (B<<8) | (A);
  803. //lut[i] = (v<<32) | (v<<24);
  804. }
  805. }
  806. #if 0
  807. asm volatile(
  808. "pxor %%mm7, %%mm7 \n\t" // 0
  809. // "movq b80, %%mm6 \n\t" // MIN_SIGNED_BYTE
  810. "leal (%0, %1), %%eax \n\t"
  811. "leal (%%eax, %1, 4), %%ebx \n\t"
  812. "movq b80, %%mm6 \n\t"
  813. "movd pQPb, %%mm5 \n\t" // QP
  814. "movq %%mm5, %%mm4 \n\t"
  815. "paddusb %%mm5, %%mm5 \n\t" // 2QP
  816. "paddusb %%mm5, %%mm4 \n\t" // 3QP
  817. "pxor %%mm5, %%mm5 \n\t" // 0
  818. "psubb %%mm4, %%mm5 \n\t" // -3QP
  819. "por bm11111110, %%mm5 \n\t" // ...,FF,FF,-3QP
  820. "psllq $24, %%mm5 \n\t"
  821. // 0 1 2 3 4 5 6 7 8 9
  822. // %0 eax eax+%1 eax+2%1 %0+4%1 ebx ebx+%1 ebx+2%1 %0+8%1 ebx+4%1
  823. #define HX1old(a) \
  824. "movd " #a ", %%mm0 \n\t"\
  825. "movd 4" #a ", %%mm1 \n\t"\
  826. "punpckldq %%mm1, %%mm0 \n\t"\
  827. "movq %%mm0, %%mm1 \n\t"\
  828. "movq %%mm0, %%mm2 \n\t"\
  829. "psrlq $8, %%mm1 \n\t"\
  830. "psubusb %%mm1, %%mm2 \n\t"\
  831. "psubusb %%mm0, %%mm1 \n\t"\
  832. "por %%mm2, %%mm1 \n\t" /* p´x = |px - p(x+1)| */\
  833. "pcmpeqb %%mm7, %%mm2 \n\t" /* p´x = sgn[px - p(x+1)] */\
  834. "pshufw $0x00, %%mm1, %%mm3 \n\t" /* p´5 = |p1 - p2| */\
  835. PAVGB(%%mm1, %%mm3) /* p´5 = (|p2-p1| + |p6-p5|)/2 */\
  836. "psrlq $16, %%mm3 \n\t" /* p´3 = (|p2-p1| + |p6-p5|)/2 */\
  837. "psubusb %%mm3, %%mm1 \n\t" /* |p3-p4|-(|p2-p1| + |p6-p5|)/2 */\
  838. "paddb %%mm5, %%mm1 \n\t"\
  839. "psubusb %%mm5, %%mm1 \n\t"\
  840. PAVGB(%%mm7, %%mm1)\
  841. "pxor %%mm2, %%mm1 \n\t"\
  842. "psubb %%mm2, %%mm1 \n\t"\
  843. "psrlq $24, %%mm1 \n\t"\
  844. "movd %%mm1, %%ecx \n\t"\
  845. "paddb %%mm6, %%mm0 \n\t"\
  846. "paddsb (%3, %%ecx, 8), %%mm0 \n\t"\
  847. "paddb %%mm6, %%mm0 \n\t"\
  848. "movq %%mm0, " #a " \n\t"\
  849. /*
  850. HX1old((%0))
  851. HX1old((%%eax))
  852. HX1old((%%eax, %1))
  853. HX1old((%%eax, %1, 2))
  854. HX1old((%0, %1, 4))
  855. HX1old((%%ebx))
  856. HX1old((%%ebx, %1))
  857. HX1old((%%ebx, %1, 2))
  858. */
  859. //FIXME add some comments, its unreadable ...
  860. #define HX1b(a, c, b, d) \
  861. "movd " #a ", %%mm0 \n\t"\
  862. "movd 4" #a ", %%mm1 \n\t"\
  863. "punpckldq %%mm1, %%mm0 \n\t"\
  864. "movd " #b ", %%mm4 \n\t"\
  865. "movq %%mm0, %%mm1 \n\t"\
  866. "movq %%mm0, %%mm2 \n\t"\
  867. "psrlq $8, %%mm1 \n\t"\
  868. "movd 4" #b ", %%mm3 \n\t"\
  869. "psubusb %%mm1, %%mm2 \n\t"\
  870. "psubusb %%mm0, %%mm1 \n\t"\
  871. "por %%mm2, %%mm1 \n\t" /* p´x = |px - p(x+1)| */\
  872. "pcmpeqb %%mm7, %%mm2 \n\t" /* p´x = sgn[px - p(x+1)] */\
  873. "punpckldq %%mm3, %%mm4 \n\t"\
  874. "movq %%mm1, %%mm3 \n\t"\
  875. "psllq $32, %%mm3 \n\t" /* p´5 = |p1 - p2| */\
  876. PAVGB(%%mm1, %%mm3) /* p´5 = (|p2-p1| + |p6-p5|)/2 */\
  877. "paddb %%mm6, %%mm0 \n\t"\
  878. "psrlq $16, %%mm3 \n\t" /* p´3 = (|p2-p1| + |p6-p5|)/2 */\
  879. "psubusb %%mm3, %%mm1 \n\t" /* |p3-p4|-(|p2-p1| + |p6-p5|)/2 */\
  880. "movq %%mm4, %%mm3 \n\t"\
  881. "paddb %%mm5, %%mm1 \n\t"\
  882. "psubusb %%mm5, %%mm1 \n\t"\
  883. "psrlq $8, %%mm3 \n\t"\
  884. PAVGB(%%mm7, %%mm1)\
  885. "pxor %%mm2, %%mm1 \n\t"\
  886. "psubb %%mm2, %%mm1 \n\t"\
  887. "movq %%mm4, %%mm2 \n\t"\
  888. "psrlq $24, %%mm1 \n\t"\
  889. "psubusb %%mm3, %%mm2 \n\t"\
  890. "movd %%mm1, %%ecx \n\t"\
  891. "psubusb %%mm4, %%mm3 \n\t"\
  892. "paddsb (%2, %%ecx, 8), %%mm0 \n\t"\
  893. "por %%mm2, %%mm3 \n\t" /* p´x = |px - p(x+1)| */\
  894. "paddb %%mm6, %%mm0 \n\t"\
  895. "pcmpeqb %%mm7, %%mm2 \n\t" /* p´x = sgn[px - p(x+1)] */\
  896. "movq %%mm3, %%mm1 \n\t"\
  897. "psllq $32, %%mm1 \n\t" /* p´5 = |p1 - p2| */\
  898. "movq %%mm0, " #a " \n\t"\
  899. PAVGB(%%mm3, %%mm1) /* p´5 = (|p2-p1| + |p6-p5|)/2 */\
  900. "paddb %%mm6, %%mm4 \n\t"\
  901. "psrlq $16, %%mm1 \n\t" /* p´3 = (|p2-p1| + |p6-p5|)/2 */\
  902. "psubusb %%mm1, %%mm3 \n\t" /* |p3-p4|-(|p2-p1| + |p6-p5|)/2 */\
  903. "paddb %%mm5, %%mm3 \n\t"\
  904. "psubusb %%mm5, %%mm3 \n\t"\
  905. PAVGB(%%mm7, %%mm3)\
  906. "pxor %%mm2, %%mm3 \n\t"\
  907. "psubb %%mm2, %%mm3 \n\t"\
  908. "psrlq $24, %%mm3 \n\t"\
  909. "movd " #c ", %%mm0 \n\t"\
  910. "movd 4" #c ", %%mm1 \n\t"\
  911. "punpckldq %%mm1, %%mm0 \n\t"\
  912. "paddb %%mm6, %%mm0 \n\t"\
  913. "paddsb (%2, %%ecx, 8), %%mm0 \n\t"\
  914. "paddb %%mm6, %%mm0 \n\t"\
  915. "movq %%mm0, " #c " \n\t"\
  916. "movd %%mm3, %%ecx \n\t"\
  917. "movd " #d ", %%mm0 \n\t"\
  918. "paddsb (%2, %%ecx, 8), %%mm4 \n\t"\
  919. "movd 4" #d ", %%mm1 \n\t"\
  920. "paddb %%mm6, %%mm4 \n\t"\
  921. "punpckldq %%mm1, %%mm0 \n\t"\
  922. "movq %%mm4, " #b " \n\t"\
  923. "paddb %%mm6, %%mm0 \n\t"\
  924. "paddsb (%2, %%ecx, 8), %%mm0 \n\t"\
  925. "paddb %%mm6, %%mm0 \n\t"\
  926. "movq %%mm0, " #d " \n\t"\
  927. HX1b((%0),(%%eax),(%%eax, %1),(%%eax, %1, 2))
  928. HX1b((%0, %1, 4),(%%ebx),(%%ebx, %1),(%%ebx, %1, 2))
  929. :
  930. : "r" (src), "r" (stride), "r" (lut)
  931. : "%eax", "%ebx", "%ecx"
  932. );
  933. #else
  934. //FIXME (has little in common with the mmx2 version)
  935. for(y=0; y<BLOCK_SIZE; y++)
  936. {
  937. int a= src[1] - src[2];
  938. int b= src[3] - src[4];
  939. int c= src[5] - src[6];
  940. int d= MAX(ABS(b) - (ABS(a) + ABS(c))/2, 0);
  941. if(d < QP)
  942. {
  943. int v = d * SIGN(-b);
  944. src[1] +=v/8;
  945. src[2] +=v/4;
  946. src[3] +=3*v/8;
  947. src[4] -=3*v/8;
  948. src[5] -=v/4;
  949. src[6] -=v/8;
  950. }
  951. src+=stride;
  952. }
  953. #endif
  954. }
  955. static inline void doVertDefFilter(uint8_t src[], int stride, int QP)
  956. {
  957. #ifdef HAVE_MMX
  958. src+= stride*4;
  959. //FIXME try pmul for *5 stuff
  960. // src[0]=0;
  961. asm volatile(
  962. "pxor %%mm7, %%mm7 \n\t"
  963. "leal (%0, %1), %%eax \n\t"
  964. "leal (%%eax, %1, 4), %%ebx \n\t"
  965. // 0 1 2 3 4 5 6 7
  966. // %0 %0+%1 %0+2%1 eax+2%1 %0+4%1 eax+4%1 ebx+%1 ebx+2%1
  967. // %0 eax eax+%1 eax+2%1 %0+4%1 ebx ebx+%1 ebx+2%1
  968. "movq (%0), %%mm0 \n\t"
  969. "movq %%mm0, %%mm1 \n\t"
  970. "punpcklbw %%mm7, %%mm0 \n\t" // low part of line 0
  971. "punpckhbw %%mm7, %%mm1 \n\t" // high part of line 0
  972. "movq (%%eax), %%mm2 \n\t"
  973. "movq %%mm2, %%mm3 \n\t"
  974. "punpcklbw %%mm7, %%mm2 \n\t" // low part of line 1
  975. "punpckhbw %%mm7, %%mm3 \n\t" // high part of line 1
  976. "movq (%%eax, %1), %%mm4 \n\t"
  977. "movq %%mm4, %%mm5 \n\t"
  978. "punpcklbw %%mm7, %%mm4 \n\t" // low part of line 2
  979. "punpckhbw %%mm7, %%mm5 \n\t" // high part of line 2
  980. "paddw %%mm0, %%mm0 \n\t" // 2L0
  981. "paddw %%mm1, %%mm1 \n\t" // 2H0
  982. "psubw %%mm4, %%mm2 \n\t" // L1 - L2
  983. "psubw %%mm5, %%mm3 \n\t" // H1 - H2
  984. "psubw %%mm2, %%mm0 \n\t" // 2L0 - L1 + L2
  985. "psubw %%mm3, %%mm1 \n\t" // 2H0 - H1 + H2
  986. "psllw $2, %%mm2 \n\t" // 4L1 - 4L2
  987. "psllw $2, %%mm3 \n\t" // 4H1 - 4H2
  988. "psubw %%mm2, %%mm0 \n\t" // 2L0 - 5L1 + 5L2
  989. "psubw %%mm3, %%mm1 \n\t" // 2H0 - 5H1 + 5H2
  990. "movq (%%eax, %1, 2), %%mm2 \n\t"
  991. "movq %%mm2, %%mm3 \n\t"
  992. "punpcklbw %%mm7, %%mm2 \n\t" // L3
  993. "punpckhbw %%mm7, %%mm3 \n\t" // H3
  994. "psubw %%mm2, %%mm0 \n\t" // 2L0 - 5L1 + 5L2 - L3
  995. "psubw %%mm3, %%mm1 \n\t" // 2H0 - 5H1 + 5H2 - H3
  996. "psubw %%mm2, %%mm0 \n\t" // 2L0 - 5L1 + 5L2 - 2L3
  997. "psubw %%mm3, %%mm1 \n\t" // 2H0 - 5H1 + 5H2 - 2H3
  998. "movq %%mm0, temp0 \n\t" // 2L0 - 5L1 + 5L2 - 2L3
  999. "movq %%mm1, temp1 \n\t" // 2H0 - 5H1 + 5H2 - 2H3
  1000. "movq (%0, %1, 4), %%mm0 \n\t"
  1001. "movq %%mm0, %%mm1 \n\t"
  1002. "punpcklbw %%mm7, %%mm0 \n\t" // L4
  1003. "punpckhbw %%mm7, %%mm1 \n\t" // H4
  1004. "psubw %%mm0, %%mm2 \n\t" // L3 - L4
  1005. "psubw %%mm1, %%mm3 \n\t" // H3 - H4
  1006. "movq %%mm2, temp2 \n\t" // L3 - L4
  1007. "movq %%mm3, temp3 \n\t" // H3 - H4
  1008. "paddw %%mm4, %%mm4 \n\t" // 2L2
  1009. "paddw %%mm5, %%mm5 \n\t" // 2H2
  1010. "psubw %%mm2, %%mm4 \n\t" // 2L2 - L3 + L4
  1011. "psubw %%mm3, %%mm5 \n\t" // 2H2 - H3 + H4
  1012. "psllw $2, %%mm2 \n\t" // 4L3 - 4L4
  1013. "psllw $2, %%mm3 \n\t" // 4H3 - 4H4
  1014. "psubw %%mm2, %%mm4 \n\t" // 2L2 - 5L3 + 5L4
  1015. "psubw %%mm3, %%mm5 \n\t" // 2H2 - 5H3 + 5H4
  1016. //50 opcodes so far
  1017. "movq (%%ebx), %%mm2 \n\t"
  1018. "movq %%mm2, %%mm3 \n\t"
  1019. "punpcklbw %%mm7, %%mm2 \n\t" // L5
  1020. "punpckhbw %%mm7, %%mm3 \n\t" // H5
  1021. "psubw %%mm2, %%mm4 \n\t" // 2L2 - 5L3 + 5L4 - L5
  1022. "psubw %%mm3, %%mm5 \n\t" // 2H2 - 5H3 + 5H4 - H5
  1023. "psubw %%mm2, %%mm4 \n\t" // 2L2 - 5L3 + 5L4 - 2L5
  1024. "psubw %%mm3, %%mm5 \n\t" // 2H2 - 5H3 + 5H4 - 2H5
  1025. "movq (%%ebx, %1), %%mm6 \n\t"
  1026. "punpcklbw %%mm7, %%mm6 \n\t" // L6
  1027. "psubw %%mm6, %%mm2 \n\t" // L5 - L6
  1028. "movq (%%ebx, %1), %%mm6 \n\t"
  1029. "punpckhbw %%mm7, %%mm6 \n\t" // H6
  1030. "psubw %%mm6, %%mm3 \n\t" // H5 - H6
  1031. "paddw %%mm0, %%mm0 \n\t" // 2L4
  1032. "paddw %%mm1, %%mm1 \n\t" // 2H4
  1033. "psubw %%mm2, %%mm0 \n\t" // 2L4 - L5 + L6
  1034. "psubw %%mm3, %%mm1 \n\t" // 2H4 - H5 + H6
  1035. "psllw $2, %%mm2 \n\t" // 4L5 - 4L6
  1036. "psllw $2, %%mm3 \n\t" // 4H5 - 4H6
  1037. "psubw %%mm2, %%mm0 \n\t" // 2L4 - 5L5 + 5L6
  1038. "psubw %%mm3, %%mm1 \n\t" // 2H4 - 5H5 + 5H6
  1039. "movq (%%ebx, %1, 2), %%mm2 \n\t"
  1040. "movq %%mm2, %%mm3 \n\t"
  1041. "punpcklbw %%mm7, %%mm2 \n\t" // L7
  1042. "punpckhbw %%mm7, %%mm3 \n\t" // H7
  1043. "paddw %%mm2, %%mm2 \n\t" // 2L7
  1044. "paddw %%mm3, %%mm3 \n\t" // 2H7
  1045. "psubw %%mm2, %%mm0 \n\t" // 2L4 - 5L5 + 5L6 - 2L7
  1046. "psubw %%mm3, %%mm1 \n\t" // 2H4 - 5H5 + 5H6 - 2H7
  1047. "movq temp0, %%mm2 \n\t" // 2L0 - 5L1 + 5L2 - 2L3
  1048. "movq temp1, %%mm3 \n\t" // 2H0 - 5H1 + 5H2 - 2H3
  1049. #ifdef HAVE_MMX2
  1050. "movq %%mm7, %%mm6 \n\t" // 0
  1051. "psubw %%mm0, %%mm6 \n\t"
  1052. "pmaxsw %%mm6, %%mm0 \n\t" // |2L4 - 5L5 + 5L6 - 2L7|
  1053. "movq %%mm7, %%mm6 \n\t" // 0
  1054. "psubw %%mm1, %%mm6 \n\t"
  1055. "pmaxsw %%mm6, %%mm1 \n\t" // |2H4 - 5H5 + 5H6 - 2H7|
  1056. "movq %%mm7, %%mm6 \n\t" // 0
  1057. "psubw %%mm2, %%mm6 \n\t"
  1058. "pmaxsw %%mm6, %%mm2 \n\t" // |2L0 - 5L1 + 5L2 - 2L3|
  1059. "movq %%mm7, %%mm6 \n\t" // 0
  1060. "psubw %%mm3, %%mm6 \n\t"
  1061. "pmaxsw %%mm6, %%mm3 \n\t" // |2H0 - 5H1 + 5H2 - 2H3|
  1062. #else
  1063. "movq %%mm7, %%mm6 \n\t" // 0
  1064. "pcmpgtw %%mm0, %%mm6 \n\t"
  1065. "pxor %%mm6, %%mm0 \n\t"
  1066. "psubw %%mm6, %%mm0 \n\t" // |2L4 - 5L5 + 5L6 - 2L7|
  1067. "movq %%mm7, %%mm6 \n\t" // 0
  1068. "pcmpgtw %%mm1, %%mm6 \n\t"
  1069. "pxor %%mm6, %%mm1 \n\t"
  1070. "psubw %%mm6, %%mm1 \n\t" // |2H4 - 5H5 + 5H6 - 2H7|
  1071. "movq %%mm7, %%mm6 \n\t" // 0
  1072. "pcmpgtw %%mm2, %%mm6 \n\t"
  1073. "pxor %%mm6, %%mm2 \n\t"
  1074. "psubw %%mm6, %%mm2 \n\t" // |2L0 - 5L1 + 5L2 - 2L3|
  1075. "movq %%mm7, %%mm6 \n\t" // 0
  1076. "pcmpgtw %%mm3, %%mm6 \n\t"
  1077. "pxor %%mm6, %%mm3 \n\t"
  1078. "psubw %%mm6, %%mm3 \n\t" // |2H0 - 5H1 + 5H2 - 2H3|
  1079. #endif
  1080. #ifdef HAVE_MMX2
  1081. "pminsw %%mm2, %%mm0 \n\t"
  1082. "pminsw %%mm3, %%mm1 \n\t"
  1083. #else
  1084. "movq %%mm0, %%mm6 \n\t"
  1085. "psubusw %%mm2, %%mm6 \n\t"
  1086. "psubw %%mm6, %%mm0 \n\t"
  1087. "movq %%mm1, %%mm6 \n\t"
  1088. "psubusw %%mm3, %%mm6 \n\t"
  1089. "psubw %%mm6, %%mm1 \n\t"
  1090. #endif
  1091. "movq %%mm7, %%mm6 \n\t" // 0
  1092. "pcmpgtw %%mm4, %%mm6 \n\t" // sign(2L2 - 5L3 + 5L4 - 2L5)
  1093. "pxor %%mm6, %%mm4 \n\t"
  1094. "psubw %%mm6, %%mm4 \n\t" // |2L2 - 5L3 + 5L4 - 2L5|
  1095. "pcmpgtw %%mm5, %%mm7 \n\t" // sign(2H2 - 5H3 + 5H4 - 2H5)
  1096. "pxor %%mm7, %%mm5 \n\t"
  1097. "psubw %%mm7, %%mm5 \n\t" // |2H2 - 5H3 + 5H4 - 2H5|
  1098. // 100 opcodes
  1099. "movd %2, %%mm2 \n\t" // QP
  1100. "punpcklwd %%mm2, %%mm2 \n\t"
  1101. "punpcklwd %%mm2, %%mm2 \n\t"
  1102. "psllw $3, %%mm2 \n\t" // 8QP
  1103. "movq %%mm2, %%mm3 \n\t" // 8QP
  1104. "pcmpgtw %%mm4, %%mm2 \n\t"
  1105. "pcmpgtw %%mm5, %%mm3 \n\t"
  1106. "pand %%mm2, %%mm4 \n\t"
  1107. "pand %%mm3, %%mm5 \n\t"
  1108. "psubusw %%mm0, %%mm4 \n\t" // hd
  1109. "psubusw %%mm1, %%mm5 \n\t" // ld
  1110. "movq w05, %%mm2 \n\t" // 5
  1111. "pmullw %%mm2, %%mm4 \n\t"
  1112. "pmullw %%mm2, %%mm5 \n\t"
  1113. "movq w20, %%mm2 \n\t" // 32
  1114. "paddw %%mm2, %%mm4 \n\t"
  1115. "paddw %%mm2, %%mm5 \n\t"
  1116. "psrlw $6, %%mm4 \n\t"
  1117. "psrlw $6, %%mm5 \n\t"
  1118. /*
  1119. "movq w06, %%mm2 \n\t" // 6
  1120. "paddw %%mm2, %%mm4 \n\t"
  1121. "paddw %%mm2, %%mm5 \n\t"
  1122. "movq w1400, %%mm2 \n\t" // 1400h = 5120 = 5/64*2^16
  1123. //FIXME if *5/64 is supposed to be /13 then we should use 5041 instead of 5120
  1124. "pmulhw %%mm2, %%mm4 \n\t" // hd/13
  1125. "pmulhw %%mm2, %%mm5 \n\t" // ld/13
  1126. */
  1127. "movq temp2, %%mm0 \n\t" // L3 - L4
  1128. "movq temp3, %%mm1 \n\t" // H3 - H4
  1129. "pxor %%mm2, %%mm2 \n\t"
  1130. "pxor %%mm3, %%mm3 \n\t"
  1131. "pcmpgtw %%mm0, %%mm2 \n\t" // sign (L3-L4)
  1132. "pcmpgtw %%mm1, %%mm3 \n\t" // sign (H3-H4)
  1133. "pxor %%mm2, %%mm0 \n\t"
  1134. "pxor %%mm3, %%mm1 \n\t"
  1135. "psubw %%mm2, %%mm0 \n\t" // |L3-L4|
  1136. "psubw %%mm3, %%mm1 \n\t" // |H3-H4|
  1137. "psrlw $1, %%mm0 \n\t" // |L3 - L4|/2
  1138. "psrlw $1, %%mm1 \n\t" // |H3 - H4|/2
  1139. "pxor %%mm6, %%mm2 \n\t"
  1140. "pxor %%mm7, %%mm3 \n\t"
  1141. "pand %%mm2, %%mm4 \n\t"
  1142. "pand %%mm3, %%mm5 \n\t"
  1143. #ifdef HAVE_MMX2
  1144. "pminsw %%mm0, %%mm4 \n\t"
  1145. "pminsw %%mm1, %%mm5 \n\t"
  1146. #else
  1147. "movq %%mm4, %%mm2 \n\t"
  1148. "psubusw %%mm0, %%mm2 \n\t"
  1149. "psubw %%mm2, %%mm4 \n\t"
  1150. "movq %%mm5, %%mm2 \n\t"
  1151. "psubusw %%mm1, %%mm2 \n\t"
  1152. "psubw %%mm2, %%mm5 \n\t"
  1153. #endif
  1154. "pxor %%mm6, %%mm4 \n\t"
  1155. "pxor %%mm7, %%mm5 \n\t"
  1156. "psubw %%mm6, %%mm4 \n\t"
  1157. "psubw %%mm7, %%mm5 \n\t"
  1158. "packsswb %%mm5, %%mm4 \n\t"
  1159. "movq (%%eax, %1, 2), %%mm0 \n\t"
  1160. "paddb %%mm4, %%mm0 \n\t"
  1161. "movq %%mm0, (%%eax, %1, 2) \n\t"
  1162. "movq (%0, %1, 4), %%mm0 \n\t"
  1163. "psubb %%mm4, %%mm0 \n\t"
  1164. "movq %%mm0, (%0, %1, 4) \n\t"
  1165. :
  1166. : "r" (src), "r" (stride), "r" (QP)
  1167. : "%eax", "%ebx"
  1168. );
  1169. #else
  1170. const int l1= stride;
  1171. const int l2= stride + l1;
  1172. const int l3= stride + l2;
  1173. const int l4= stride + l3;
  1174. const int l5= stride + l4;
  1175. const int l6= stride + l5;
  1176. const int l7= stride + l6;
  1177. const int l8= stride + l7;
  1178. // const int l9= stride + l8;
  1179. int x;
  1180. src+= stride*3;
  1181. for(x=0; x<BLOCK_SIZE; x++)
  1182. {
  1183. const int middleEnergy= 5*(src[l5] - src[l4]) + 2*(src[l3] - src[l6]);
  1184. if(ABS(middleEnergy) < 8*QP)
  1185. {
  1186. const int q=(src[l4] - src[l5])/2;
  1187. const int leftEnergy= 5*(src[l3] - src[l2]) + 2*(src[l1] - src[l4]);
  1188. const int rightEnergy= 5*(src[l7] - src[l6]) + 2*(src[l5] - src[l8]);
  1189. int d= ABS(middleEnergy) - MIN( ABS(leftEnergy), ABS(rightEnergy) );
  1190. d= MAX(d, 0);
  1191. d= (5*d + 32) >> 6;
  1192. d*= SIGN(-middleEnergy);
  1193. if(q>0)
  1194. {
  1195. d= d<0 ? 0 : d;
  1196. d= d>q ? q : d;
  1197. }
  1198. else
  1199. {
  1200. d= d>0 ? 0 : d;
  1201. d= d<q ? q : d;
  1202. }
  1203. src[l4]-= d;
  1204. src[l5]+= d;
  1205. }
  1206. src++;
  1207. }
  1208. #endif
  1209. }
  1210. //FIXME? |255-0| = 1
  1211. /**
  1212. * Check if the given 8x8 Block is mostly "flat"
  1213. */
  1214. static inline int isHorizDC(uint8_t src[], int stride)
  1215. {
  1216. // src++;
  1217. int numEq= 0;
  1218. #if 0
  1219. asm volatile (
  1220. // "int $3 \n\t"
  1221. "leal (%1, %2), %%ecx \n\t"
  1222. "leal (%%ecx, %2, 4), %%ebx \n\t"
  1223. // 0 1 2 3 4 5 6 7 8 9
  1224. // %1 ecx ecx+%2 ecx+2%2 %1+4%2 ebx ebx+%2 ebx+2%2 %1+8%2 ebx+4%2
  1225. "movq b7E, %%mm7 \n\t" // mm7 = 0x7F
  1226. "movq b7C, %%mm6 \n\t" // mm6 = 0x7D
  1227. "pxor %%mm0, %%mm0 \n\t"
  1228. "movl %1, %%eax \n\t"
  1229. "andl $0x1F, %%eax \n\t"
  1230. "cmpl $24, %%eax \n\t"
  1231. "leal tempBlock, %%eax \n\t"
  1232. "jb 1f \n\t"
  1233. #define HDC_CHECK_AND_CPY(src, dst) \
  1234. "movd " #src ", %%mm2 \n\t"\
  1235. "punpckldq 4" #src ", %%mm2 \n\t" /* (%1) */\
  1236. "movq %%mm2, %%mm1 \n\t"\
  1237. "psrlq $8, %%mm2 \n\t"\
  1238. "psubb %%mm1, %%mm2 \n\t"\
  1239. "paddb %%mm7, %%mm2 \n\t"\
  1240. "pcmpgtb %%mm6, %%mm2 \n\t"\
  1241. "paddb %%mm2, %%mm0 \n\t"\
  1242. "movq %%mm1," #dst "(%%eax) \n\t"
  1243. HDC_CHECK_AND_CPY((%1),0)
  1244. HDC_CHECK_AND_CPY((%%ecx),8)
  1245. HDC_CHECK_AND_CPY((%%ecx, %2),16)
  1246. HDC_CHECK_AND_CPY((%%ecx, %2, 2),24)
  1247. HDC_CHECK_AND_CPY((%1, %2, 4),32)
  1248. HDC_CHECK_AND_CPY((%%ebx),40)
  1249. HDC_CHECK_AND_CPY((%%ebx, %2),48)
  1250. HDC_CHECK_AND_CPY((%%ebx, %2, 2),56)
  1251. "jmp 2f \n\t"
  1252. "1: \n\t"
  1253. // src does not cross a 32 byte cache line so dont waste time with alignment
  1254. #define HDC_CHECK_AND_CPY2(src, dst) \
  1255. "movq " #src ", %%mm2 \n\t"\
  1256. "movq " #src ", %%mm1 \n\t"\
  1257. "psrlq $8, %%mm2 \n\t"\
  1258. "psubb %%mm1, %%mm2 \n\t"\
  1259. "paddb %%mm7, %%mm2 \n\t"\
  1260. "pcmpgtb %%mm6, %%mm2 \n\t"\
  1261. "paddb %%mm2, %%mm0 \n\t"\
  1262. "movq %%mm1," #dst "(%%eax) \n\t"
  1263. HDC_CHECK_AND_CPY2((%1),0)
  1264. HDC_CHECK_AND_CPY2((%%ecx),8)
  1265. HDC_CHECK_AND_CPY2((%%ecx, %2),16)
  1266. HDC_CHECK_AND_CPY2((%%ecx, %2, 2),24)
  1267. HDC_CHECK_AND_CPY2((%1, %2, 4),32)
  1268. HDC_CHECK_AND_CPY2((%%ebx),40)
  1269. HDC_CHECK_AND_CPY2((%%ebx, %2),48)
  1270. HDC_CHECK_AND_CPY2((%%ebx, %2, 2),56)
  1271. "2: \n\t"
  1272. "psllq $8, %%mm0 \n\t" // remove dummy value
  1273. "movq %%mm0, %%mm1 \n\t"
  1274. "psrlw $8, %%mm0 \n\t"
  1275. "paddb %%mm1, %%mm0 \n\t"
  1276. "movq %%mm0, %%mm1 \n\t"
  1277. "psrlq $16, %%mm0 \n\t"
  1278. "paddb %%mm1, %%mm0 \n\t"
  1279. "movq %%mm0, %%mm1 \n\t"
  1280. "psrlq $32, %%mm0 \n\t"
  1281. "paddb %%mm1, %%mm0 \n\t"
  1282. "movd %%mm0, %0 \n\t"
  1283. : "=r" (numEq)
  1284. : "r" (src), "r" (stride)
  1285. : "%eax", "%ebx", "%ecx"
  1286. );
  1287. // printf("%d\n", numEq);
  1288. numEq= (256 - numEq) &0xFF;
  1289. #else
  1290. int y;
  1291. for(y=0; y<BLOCK_SIZE; y++)
  1292. {
  1293. if(((src[0] - src[1] + 1) & 0xFFFF) < 3) numEq++;
  1294. if(((src[1] - src[2] + 1) & 0xFFFF) < 3) numEq++;
  1295. if(((src[2] - src[3] + 1) & 0xFFFF) < 3) numEq++;
  1296. if(((src[3] - src[4] + 1) & 0xFFFF) < 3) numEq++;
  1297. if(((src[4] - src[5] + 1) & 0xFFFF) < 3) numEq++;
  1298. if(((src[5] - src[6] + 1) & 0xFFFF) < 3) numEq++;
  1299. if(((src[6] - src[7] + 1) & 0xFFFF) < 3) numEq++;
  1300. src+= stride;
  1301. }
  1302. #endif
  1303. /* if(abs(numEq - asmEq) > 0)
  1304. {
  1305. // printf("\nasm:%d c:%d\n", asmEq, numEq);
  1306. for(int y=0; y<8; y++)
  1307. {
  1308. for(int x=0; x<8; x++)
  1309. {
  1310. printf("%d ", src[x + y*stride]);
  1311. }
  1312. printf("\n");
  1313. }
  1314. }
  1315. */
  1316. // printf("%d\n", numEq);
  1317. return numEq > hFlatnessThreshold;
  1318. }
  1319. static inline int isHorizMinMaxOk(uint8_t src[], int stride, int QP)
  1320. {
  1321. if(abs(src[0] - src[7]) > 2*QP) return 0;
  1322. return 1;
  1323. }
  1324. static inline void doHorizDefFilter(uint8_t dst[], int stride, int QP)
  1325. {
  1326. #if 0
  1327. asm volatile(
  1328. "leal (%0, %1), %%ecx \n\t"
  1329. "leal (%%ecx, %1, 4), %%ebx \n\t"
  1330. // 0 1 2 3 4 5 6 7 8 9
  1331. // %0 ecx ecx+%1 ecx+2%1 %0+4%1 ebx ebx+%1 ebx+2%1 %0+8%1 ebx+4%1
  1332. "pxor %%mm7, %%mm7 \n\t"
  1333. "movq bm00001000, %%mm6 \n\t"
  1334. "movd %2, %%mm5 \n\t" // QP
  1335. "movq %%mm5, %%mm4 \n\t"
  1336. "paddusb %%mm5, %%mm5 \n\t" // 2QP
  1337. "paddusb %%mm5, %%mm4 \n\t" // 3QP
  1338. "psllq $24, %%mm4 \n\t"
  1339. "pxor %%mm5, %%mm5 \n\t" // 0
  1340. "psubb %%mm4, %%mm5 \n\t" // -QP
  1341. "leal tempBlock, %%eax \n\t"
  1342. //FIXME? "unroll by 2" and mix
  1343. #ifdef HAVE_MMX2
  1344. #define HDF(src, dst) \
  1345. "movq " #src "(%%eax), %%mm0 \n\t"\
  1346. "movq " #src "(%%eax), %%mm1 \n\t"\
  1347. "movq " #src "(%%eax), %%mm2 \n\t"\
  1348. "psrlq $8, %%mm1 \n\t"\
  1349. "psubusb %%mm1, %%mm2 \n\t"\
  1350. "psubusb %%mm0, %%mm1 \n\t"\
  1351. "por %%mm2, %%mm1 \n\t" /* p´x = |px - p(x+1)| */\
  1352. "pcmpeqb %%mm7, %%mm2 \n\t" /* p´x = sgn[px - p(x+1)] */\
  1353. "pshufw $0x00, %%mm1, %%mm3 \n\t" /* p´5 = |p1 - p2| */\
  1354. "pminub %%mm1, %%mm3 \n\t" /* p´5 = min(|p2-p1|, |p6-p5|)*/\
  1355. "psrlq $16, %%mm3 \n\t" /* p´3 = min(|p2-p1|, |p6-p5|)*/\
  1356. "psubusb %%mm3, %%mm1 \n\t" /* |p3-p4|-min(|p1-p2|,|p5-p6|) */\
  1357. "paddb %%mm5, %%mm1 \n\t"\
  1358. "psubusb %%mm5, %%mm1 \n\t"\
  1359. "psrlw $2, %%mm1 \n\t"\
  1360. "pxor %%mm2, %%mm1 \n\t"\
  1361. "psubb %%mm2, %%mm1 \n\t"\
  1362. "pand %%mm6, %%mm1 \n\t"\
  1363. "psubb %%mm1, %%mm0 \n\t"\
  1364. "psllq $8, %%mm1 \n\t"\
  1365. "paddb %%mm1, %%mm0 \n\t"\
  1366. "movd %%mm0, " #dst" \n\t"\
  1367. "psrlq $32, %%mm0 \n\t"\
  1368. "movd %%mm0, 4" #dst" \n\t"
  1369. #else
  1370. #define HDF(src, dst)\
  1371. "movq " #src "(%%eax), %%mm0 \n\t"\
  1372. "movq %%mm0, %%mm1 \n\t"\
  1373. "movq %%mm0, %%mm2 \n\t"\
  1374. "psrlq $8, %%mm1 \n\t"\
  1375. "psubusb %%mm1, %%mm2 \n\t"\
  1376. "psubusb %%mm0, %%mm1 \n\t"\
  1377. "por %%mm2, %%mm1 \n\t" /* p´x = |px - p(x+1)| */\
  1378. "pcmpeqb %%mm7, %%mm2 \n\t" /* p´x = sgn[px - p(x+1)] */\
  1379. "movq %%mm1, %%mm3 \n\t"\
  1380. "psllq $32, %%mm3 \n\t"\
  1381. "movq %%mm3, %%mm4 \n\t"\
  1382. "psubusb %%mm1, %%mm4 \n\t"\
  1383. "psubb %%mm4, %%mm3 \n\t"\
  1384. "psrlq $16, %%mm3 \n\t" /* p´3 = min(|p2-p1|, |p6-p5|)*/\
  1385. "psubusb %%mm3, %%mm1 \n\t" /* |p3-p4|-min(|p1-p2|,|p5,ü6|) */\
  1386. "paddb %%mm5, %%mm1 \n\t"\
  1387. "psubusb %%mm5, %%mm1 \n\t"\
  1388. "psrlw $2, %%mm1 \n\t"\
  1389. "pxor %%mm2, %%mm1 \n\t"\
  1390. "psubb %%mm2, %%mm1 \n\t"\
  1391. "pand %%mm6, %%mm1 \n\t"\
  1392. "psubb %%mm1, %%mm0 \n\t"\
  1393. "psllq $8, %%mm1 \n\t"\
  1394. "paddb %%mm1, %%mm0 \n\t"\
  1395. "movd %%mm0, " #dst " \n\t"\
  1396. "psrlq $32, %%mm0 \n\t"\
  1397. "movd %%mm0, 4" #dst " \n\t"
  1398. #endif
  1399. HDF(0,(%0))
  1400. HDF(8,(%%ecx))
  1401. HDF(16,(%%ecx, %1))
  1402. HDF(24,(%%ecx, %1, 2))
  1403. HDF(32,(%0, %1, 4))
  1404. HDF(40,(%%ebx))
  1405. HDF(48,(%%ebx, %1))
  1406. HDF(56,(%%ebx, %1, 2))
  1407. :
  1408. : "r" (dst), "r" (stride), "r" (QP)
  1409. : "%eax", "%ebx", "%ecx"
  1410. );
  1411. #else
  1412. int y;
  1413. for(y=0; y<BLOCK_SIZE; y++)
  1414. {
  1415. const int middleEnergy= 5*(dst[4] - dst[5]) + 2*(dst[2] - dst[5]);
  1416. if(ABS(middleEnergy) < 8*QP)
  1417. {
  1418. const int q=(dst[3] - dst[4])/2;
  1419. const int leftEnergy= 5*(dst[2] - dst[1]) + 2*(dst[0] - dst[3]);
  1420. const int rightEnergy= 5*(dst[6] - dst[5]) + 2*(dst[4] - dst[7]);
  1421. int d= ABS(middleEnergy) - MIN( ABS(leftEnergy), ABS(rightEnergy) );
  1422. d= MAX(d, 0);
  1423. d= (5*d + 32) >> 6;
  1424. d*= SIGN(-middleEnergy);
  1425. if(q>0)
  1426. {
  1427. d= d<0 ? 0 : d;
  1428. d= d>q ? q : d;
  1429. }
  1430. else
  1431. {
  1432. d= d>0 ? 0 : d;
  1433. d= d<q ? q : d;
  1434. }
  1435. dst[3]-= d;
  1436. dst[4]+= d;
  1437. }
  1438. dst+= stride;
  1439. }
  1440. #endif
  1441. }
  1442. /**
  1443. * Do a horizontal low pass filter on the 10x8 block (dst points to middle 8x8 Block)
  1444. * using the 9-Tap Filter (1,1,2,2,4,2,2,1,1)/16 (C version)
  1445. * using the 7-Tap Filter (2,2,2,4,2,2,2)/16 (MMX2/3DNOW version)
  1446. */
  1447. static inline void doHorizLowPass(uint8_t dst[], int stride, int QP)
  1448. {
  1449. #if 0
  1450. asm volatile(
  1451. "leal (%0, %1), %%ecx \n\t"
  1452. "leal (%%ecx, %1, 4), %%ebx \n\t"
  1453. // 0 1 2 3 4 5 6 7 8 9
  1454. // %0 ecx ecx+%1 ecx+2%1 %0+4%1 ebx ebx+%1 ebx+2%1 %0+8%1 ebx+4%1
  1455. "pxor %%mm7, %%mm7 \n\t"
  1456. "leal tempBlock, %%eax \n\t"
  1457. /*
  1458. #define HLP1 "movq (%0), %%mm0 \n\t"\
  1459. "movq %%mm0, %%mm1 \n\t"\
  1460. "psllq $8, %%mm0 \n\t"\
  1461. PAVGB(%%mm1, %%mm0)\
  1462. "psrlw $8, %%mm0 \n\t"\
  1463. "pxor %%mm1, %%mm1 \n\t"\
  1464. "packuswb %%mm1, %%mm0 \n\t"\
  1465. "movq %%mm0, %%mm1 \n\t"\
  1466. "movq %%mm0, %%mm2 \n\t"\
  1467. "psllq $32, %%mm0 \n\t"\
  1468. "paddb %%mm0, %%mm1 \n\t"\
  1469. "psllq $16, %%mm2 \n\t"\
  1470. PAVGB(%%mm2, %%mm0)\
  1471. "movq %%mm0, %%mm3 \n\t"\
  1472. "pand bm11001100, %%mm0 \n\t"\
  1473. "paddusb %%mm0, %%mm3 \n\t"\
  1474. "psrlq $8, %%mm3 \n\t"\
  1475. PAVGB(%%mm1, %%mm4)\
  1476. PAVGB(%%mm3, %%mm2)\
  1477. "psrlq $16, %%mm2 \n\t"\
  1478. "punpcklbw %%mm2, %%mm2 \n\t"\
  1479. "movq %%mm2, (%0) \n\t"\
  1480. #define HLP2 "movq (%0), %%mm0 \n\t"\
  1481. "movq %%mm0, %%mm1 \n\t"\
  1482. "psllq $8, %%mm0 \n\t"\
  1483. PAVGB(%%mm1, %%mm0)\
  1484. "psrlw $8, %%mm0 \n\t"\
  1485. "pxor %%mm1, %%mm1 \n\t"\
  1486. "packuswb %%mm1, %%mm0 \n\t"\
  1487. "movq %%mm0, %%mm2 \n\t"\
  1488. "psllq $32, %%mm0 \n\t"\
  1489. "psllq $16, %%mm2 \n\t"\
  1490. PAVGB(%%mm2, %%mm0)\
  1491. "movq %%mm0, %%mm3 \n\t"\
  1492. "pand bm11001100, %%mm0 \n\t"\
  1493. "paddusb %%mm0, %%mm3 \n\t"\
  1494. "psrlq $8, %%mm3 \n\t"\
  1495. PAVGB(%%mm3, %%mm2)\
  1496. "psrlq $16, %%mm2 \n\t"\
  1497. "punpcklbw %%mm2, %%mm2 \n\t"\
  1498. "movq %%mm2, (%0) \n\t"\
  1499. */
  1500. // approximately a 7-Tap Filter with Vector (1,2,3,4,3,2,1)/16
  1501. /*
  1502. Implemented Exact 7-Tap
  1503. 9421 A321
  1504. 36421 64321
  1505. 334321 =
  1506. 1234321 =
  1507. 1234321 =
  1508. 123433 =
  1509. 12463 12346
  1510. 1249 123A
  1511. */
  1512. #ifdef HAVE_MMX2
  1513. #define HLP3(i) "movq " #i "(%%eax), %%mm0 \n\t"\
  1514. "movq %%mm0, %%mm1 \n\t"\
  1515. "movq %%mm0, %%mm2 \n\t"\
  1516. "movq %%mm0, %%mm3 \n\t"\
  1517. "movq %%mm0, %%mm4 \n\t"\
  1518. "psllq $8, %%mm1 \n\t"\
  1519. "psrlq $8, %%mm2 \n\t"\
  1520. "pand bm00000001, %%mm3 \n\t"\
  1521. "pand bm10000000, %%mm4 \n\t"\
  1522. "por %%mm3, %%mm1 \n\t"\
  1523. "por %%mm4, %%mm2 \n\t"\
  1524. PAVGB(%%mm2, %%mm1)\
  1525. PAVGB(%%mm1, %%mm0)\
  1526. \
  1527. "pshufw $0xF9, %%mm0, %%mm3 \n\t"\
  1528. "pshufw $0x90, %%mm0, %%mm4 \n\t"\
  1529. PAVGB(%%mm3, %%mm4)\
  1530. PAVGB(%%mm4, %%mm0)\
  1531. "movd %%mm0, (%0) \n\t"\
  1532. "psrlq $32, %%mm0 \n\t"\
  1533. "movd %%mm0, 4(%0) \n\t"
  1534. #else
  1535. #define HLP3(i) "movq " #i "(%%eax), %%mm0 \n\t"\
  1536. "movq %%mm0, %%mm1 \n\t"\
  1537. "movq %%mm0, %%mm2 \n\t"\
  1538. "movd -4(%0), %%mm3 \n\t" /*0001000*/\
  1539. "movd 8(%0), %%mm4 \n\t" /*0001000*/\
  1540. "psllq $8, %%mm1 \n\t"\
  1541. "psrlq $8, %%mm2 \n\t"\
  1542. "psrlq $24, %%mm3 \n\t"\
  1543. "psllq $56, %%mm4 \n\t"\
  1544. "por %%mm3, %%mm1 \n\t"\
  1545. "por %%mm4, %%mm2 \n\t"\
  1546. PAVGB(%%mm2, %%mm1)\
  1547. PAVGB(%%mm1, %%mm0)\
  1548. \
  1549. "movq %%mm0, %%mm3 \n\t"\
  1550. "movq %%mm0, %%mm4 \n\t"\
  1551. "movq %%mm0, %%mm5 \n\t"\
  1552. "psrlq $16, %%mm3 \n\t"\
  1553. "psllq $16, %%mm4 \n\t"\
  1554. "pand bm11000000, %%mm5 \n\t"\
  1555. "por %%mm5, %%mm3 \n\t"\
  1556. "movq %%mm0, %%mm5 \n\t"\
  1557. "pand bm00000011, %%mm5 \n\t"\
  1558. "por %%mm5, %%mm4 \n\t"\
  1559. PAVGB(%%mm3, %%mm4)\
  1560. PAVGB(%%mm4, %%mm0)\
  1561. "movd %%mm0, (%0) \n\t"\
  1562. "psrlq $32, %%mm0 \n\t"\
  1563. "movd %%mm0, 4(%0) \n\t"
  1564. #endif
  1565. /* uses the 7-Tap Filter: 1112111 */
  1566. #define NEW_HLP(src, dst)\
  1567. "movq " #src "(%%eax), %%mm1 \n\t"\
  1568. "movq " #src "(%%eax), %%mm2 \n\t"\
  1569. "psllq $8, %%mm1 \n\t"\
  1570. "psrlq $8, %%mm2 \n\t"\
  1571. "movd -4" #dst ", %%mm3 \n\t" /*0001000*/\
  1572. "movd 8" #dst ", %%mm4 \n\t" /*0001000*/\
  1573. "psrlq $24, %%mm3 \n\t"\
  1574. "psllq $56, %%mm4 \n\t"\
  1575. "por %%mm3, %%mm1 \n\t"\
  1576. "por %%mm4, %%mm2 \n\t"\
  1577. "movq %%mm1, %%mm5 \n\t"\
  1578. PAVGB(%%mm2, %%mm1)\
  1579. "movq " #src "(%%eax), %%mm0 \n\t"\
  1580. PAVGB(%%mm1, %%mm0)\
  1581. "psllq $8, %%mm5 \n\t"\
  1582. "psrlq $8, %%mm2 \n\t"\
  1583. "por %%mm3, %%mm5 \n\t"\
  1584. "por %%mm4, %%mm2 \n\t"\
  1585. "movq %%mm5, %%mm1 \n\t"\
  1586. PAVGB(%%mm2, %%mm5)\
  1587. "psllq $8, %%mm1 \n\t"\
  1588. "psrlq $8, %%mm2 \n\t"\
  1589. "por %%mm3, %%mm1 \n\t"\
  1590. "por %%mm4, %%mm2 \n\t"\
  1591. PAVGB(%%mm2, %%mm1)\
  1592. PAVGB(%%mm1, %%mm5)\
  1593. PAVGB(%%mm5, %%mm0)\
  1594. "movd %%mm0, " #dst " \n\t"\
  1595. "psrlq $32, %%mm0 \n\t"\
  1596. "movd %%mm0, 4" #dst " \n\t"
  1597. /* uses the 9-Tap Filter: 112242211 */
  1598. #define NEW_HLP2(i)\
  1599. "movq " #i "(%%eax), %%mm0 \n\t" /*0001000*/\
  1600. "movq %%mm0, %%mm1 \n\t" /*0001000*/\
  1601. "movq %%mm0, %%mm2 \n\t" /*0001000*/\
  1602. "movd -4(%0), %%mm3 \n\t" /*0001000*/\
  1603. "movd 8(%0), %%mm4 \n\t" /*0001000*/\
  1604. "psllq $8, %%mm1 \n\t"\
  1605. "psrlq $8, %%mm2 \n\t"\
  1606. "psrlq $24, %%mm3 \n\t"\
  1607. "psllq $56, %%mm4 \n\t"\
  1608. "por %%mm3, %%mm1 \n\t" /*0010000*/\
  1609. "por %%mm4, %%mm2 \n\t" /*0000100*/\
  1610. "movq %%mm1, %%mm5 \n\t" /*0010000*/\
  1611. PAVGB(%%mm2, %%mm1) /*0010100*/\
  1612. PAVGB(%%mm1, %%mm0) /*0012100*/\
  1613. "psllq $8, %%mm5 \n\t"\
  1614. "psrlq $8, %%mm2 \n\t"\
  1615. "por %%mm3, %%mm5 \n\t" /*0100000*/\
  1616. "por %%mm4, %%mm2 \n\t" /*0000010*/\
  1617. "movq %%mm5, %%mm1 \n\t" /*0100000*/\
  1618. PAVGB(%%mm2, %%mm5) /*0100010*/\
  1619. "psllq $8, %%mm1 \n\t"\
  1620. "psrlq $8, %%mm2 \n\t"\
  1621. "por %%mm3, %%mm1 \n\t" /*1000000*/\
  1622. "por %%mm4, %%mm2 \n\t" /*0000001*/\
  1623. "movq %%mm1, %%mm6 \n\t" /*1000000*/\
  1624. PAVGB(%%mm2, %%mm1) /*1000001*/\
  1625. "psllq $8, %%mm6 \n\t"\
  1626. "psrlq $8, %%mm2 \n\t"\
  1627. "por %%mm3, %%mm6 \n\t"/*100000000*/\
  1628. "por %%mm4, %%mm2 \n\t"/*000000001*/\
  1629. PAVGB(%%mm2, %%mm6) /*100000001*/\
  1630. PAVGB(%%mm6, %%mm1) /*110000011*/\
  1631. PAVGB(%%mm1, %%mm5) /*112000211*/\
  1632. PAVGB(%%mm5, %%mm0) /*112242211*/\
  1633. "movd %%mm0, (%0) \n\t"\
  1634. "psrlq $32, %%mm0 \n\t"\
  1635. "movd %%mm0, 4(%0) \n\t"
  1636. #define HLP(src, dst) NEW_HLP(src, dst)
  1637. HLP(0, (%0))
  1638. HLP(8, (%%ecx))
  1639. HLP(16, (%%ecx, %1))
  1640. HLP(24, (%%ecx, %1, 2))
  1641. HLP(32, (%0, %1, 4))
  1642. HLP(40, (%%ebx))
  1643. HLP(48, (%%ebx, %1))
  1644. HLP(56, (%%ebx, %1, 2))
  1645. :
  1646. : "r" (dst), "r" (stride)
  1647. : "%eax", "%ebx", "%ecx"
  1648. );
  1649. #else
  1650. int y;
  1651. for(y=0; y<BLOCK_SIZE; y++)
  1652. {
  1653. const int first= ABS(dst[-1] - dst[0]) < QP ? dst[-1] : dst[0];
  1654. const int last= ABS(dst[8] - dst[7]) < QP ? dst[8] : dst[7];
  1655. int sums[9];
  1656. sums[0] = first + dst[0];
  1657. sums[1] = dst[0] + dst[1];
  1658. sums[2] = dst[1] + dst[2];
  1659. sums[3] = dst[2] + dst[3];
  1660. sums[4] = dst[3] + dst[4];
  1661. sums[5] = dst[4] + dst[5];
  1662. sums[6] = dst[5] + dst[6];
  1663. sums[7] = dst[6] + dst[7];
  1664. sums[8] = dst[7] + last;
  1665. dst[0]= ((sums[0]<<2) + ((first + sums[2])<<1) + sums[4] + 8)>>4;
  1666. dst[1]= ((dst[1]<<2) + ((first + sums[0] + sums[3])<<1) + sums[5] + 8)>>4;
  1667. dst[2]= ((dst[2]<<2) + ((first + sums[1] + sums[4])<<1) + sums[6] + 8)>>4;
  1668. dst[3]= ((dst[3]<<2) + ((sums[2] + sums[5])<<1) + sums[0] + sums[7] + 8)>>4;
  1669. dst[4]= ((dst[4]<<2) + ((sums[3] + sums[6])<<1) + sums[1] + sums[8] + 8)>>4;
  1670. dst[5]= ((dst[5]<<2) + ((last + sums[7] + sums[4])<<1) + sums[2] + 8)>>4;
  1671. dst[6]= (((last + dst[6])<<2) + ((dst[7] + sums[5])<<1) + sums[3] + 8)>>4;
  1672. dst[7]= ((sums[8]<<2) + ((last + sums[6])<<1) + sums[4] + 8)>>4;
  1673. dst+= stride;
  1674. }
  1675. #endif
  1676. }
  1677. static inline void dering(uint8_t src[], int stride, int QP)
  1678. {
  1679. #if defined (HAVE_MMX2) || defined (HAVE_3DNOW)
  1680. asm volatile(
  1681. "movq pQPb, %%mm0 \n\t"
  1682. "paddusb %%mm0, %%mm0 \n\t"
  1683. "movq %%mm0, pQPb2 \n\t"
  1684. "leal (%0, %1), %%eax \n\t"
  1685. "leal (%%eax, %1, 4), %%ebx \n\t"
  1686. // 0 1 2 3 4 5 6 7 8 9
  1687. // %0 eax eax+%1 eax+2%1 %0+4%1 ebx ebx+%1 ebx+2%1 %0+8%1 ebx+4%1
  1688. "pcmpeqb %%mm6, %%mm6 \n\t"
  1689. "pxor %%mm7, %%mm7 \n\t"
  1690. #ifdef HAVE_MMX2
  1691. #define FIND_MIN_MAX(addr)\
  1692. "movq " #addr ", %%mm0 \n\t"\
  1693. "pminub %%mm0, %%mm6 \n\t"\
  1694. "pmaxub %%mm0, %%mm7 \n\t"
  1695. #else
  1696. #define FIND_MIN_MAX(addr)\
  1697. "movq " #addr ", %%mm0 \n\t"\
  1698. "movq %%mm6, %%mm1 \n\t"\
  1699. "psubusb %%mm0, %%mm7 \n\t"\
  1700. "paddb %%mm0, %%mm7 \n\t"\
  1701. "psubusb %%mm0, %%mm1 \n\t"\
  1702. "psubb %%mm1, %%mm6 \n\t"
  1703. #endif
  1704. FIND_MIN_MAX((%%eax))
  1705. FIND_MIN_MAX((%%eax, %1))
  1706. FIND_MIN_MAX((%%eax, %1, 2))
  1707. FIND_MIN_MAX((%0, %1, 4))
  1708. FIND_MIN_MAX((%%ebx))
  1709. FIND_MIN_MAX((%%ebx, %1))
  1710. FIND_MIN_MAX((%%ebx, %1, 2))
  1711. FIND_MIN_MAX((%0, %1, 8))
  1712. "movq %%mm6, %%mm4 \n\t"
  1713. "psrlq $8, %%mm6 \n\t"
  1714. #ifdef HAVE_MMX2
  1715. "pminub %%mm4, %%mm6 \n\t" // min of pixels
  1716. "pshufw $0xF9, %%mm6, %%mm4 \n\t"
  1717. "pminub %%mm4, %%mm6 \n\t" // min of pixels
  1718. "pshufw $0xFE, %%mm6, %%mm4 \n\t"
  1719. "pminub %%mm4, %%mm6 \n\t"
  1720. #else
  1721. "movq %%mm6, %%mm1 \n\t"
  1722. "psubusb %%mm4, %%mm1 \n\t"
  1723. "psubb %%mm1, %%mm6 \n\t"
  1724. "movq %%mm6, %%mm4 \n\t"
  1725. "psrlq $16, %%mm6 \n\t"
  1726. "movq %%mm6, %%mm1 \n\t"
  1727. "psubusb %%mm4, %%mm1 \n\t"
  1728. "psubb %%mm1, %%mm6 \n\t"
  1729. "movq %%mm6, %%mm4 \n\t"
  1730. "psrlq $32, %%mm6 \n\t"
  1731. "movq %%mm6, %%mm1 \n\t"
  1732. "psubusb %%mm4, %%mm1 \n\t"
  1733. "psubb %%mm1, %%mm6 \n\t"
  1734. #endif
  1735. "movq %%mm7, %%mm4 \n\t"
  1736. "psrlq $8, %%mm7 \n\t"
  1737. #ifdef HAVE_MMX2
  1738. "pmaxub %%mm4, %%mm7 \n\t" // max of pixels
  1739. "pshufw $0xF9, %%mm7, %%mm4 \n\t"
  1740. "pmaxub %%mm4, %%mm7 \n\t"
  1741. "pshufw $0xFE, %%mm7, %%mm4 \n\t"
  1742. "pmaxub %%mm4, %%mm7 \n\t"
  1743. #else
  1744. "psubusb %%mm4, %%mm7 \n\t"
  1745. "paddb %%mm4, %%mm7 \n\t"
  1746. "movq %%mm7, %%mm4 \n\t"
  1747. "psrlq $16, %%mm7 \n\t"
  1748. "psubusb %%mm4, %%mm7 \n\t"
  1749. "paddb %%mm4, %%mm7 \n\t"
  1750. "movq %%mm7, %%mm4 \n\t"
  1751. "psrlq $32, %%mm7 \n\t"
  1752. "psubusb %%mm4, %%mm7 \n\t"
  1753. "paddb %%mm4, %%mm7 \n\t"
  1754. #endif
  1755. PAVGB(%%mm6, %%mm7) // a=(max + min)/2
  1756. "punpcklbw %%mm7, %%mm7 \n\t"
  1757. "punpcklbw %%mm7, %%mm7 \n\t"
  1758. "punpcklbw %%mm7, %%mm7 \n\t"
  1759. "movq %%mm7, temp0 \n\t"
  1760. "movq (%0), %%mm0 \n\t" // L10
  1761. "movq %%mm0, %%mm1 \n\t" // L10
  1762. "movq %%mm0, %%mm2 \n\t" // L10
  1763. "psllq $8, %%mm1 \n\t"
  1764. "psrlq $8, %%mm2 \n\t"
  1765. "movd -4(%0), %%mm3 \n\t"
  1766. "movd 8(%0), %%mm4 \n\t"
  1767. "psrlq $24, %%mm3 \n\t"
  1768. "psllq $56, %%mm4 \n\t"
  1769. "por %%mm3, %%mm1 \n\t" // L00
  1770. "por %%mm4, %%mm2 \n\t" // L20
  1771. "movq %%mm1, %%mm3 \n\t" // L00
  1772. PAVGB(%%mm2, %%mm1) // (L20 + L00)/2
  1773. PAVGB(%%mm0, %%mm1) // (L20 + L00 + 2L10)/4
  1774. "psubusb %%mm7, %%mm0 \n\t"
  1775. "psubusb %%mm7, %%mm2 \n\t"
  1776. "psubusb %%mm7, %%mm3 \n\t"
  1777. "pcmpeqb b00, %%mm0 \n\t" // L10 > a ? 0 : -1
  1778. "pcmpeqb b00, %%mm2 \n\t" // L20 > a ? 0 : -1
  1779. "pcmpeqb b00, %%mm3 \n\t" // L00 > a ? 0 : -1
  1780. "paddb %%mm2, %%mm0 \n\t"
  1781. "paddb %%mm3, %%mm0 \n\t"
  1782. "movq (%%eax), %%mm2 \n\t" // L11
  1783. "movq %%mm2, %%mm3 \n\t" // L11
  1784. "movq %%mm2, %%mm4 \n\t" // L11
  1785. "psllq $8, %%mm3 \n\t"
  1786. "psrlq $8, %%mm4 \n\t"
  1787. "movd -4(%%eax), %%mm5 \n\t"
  1788. "movd 8(%%eax), %%mm6 \n\t"
  1789. "psrlq $24, %%mm5 \n\t"
  1790. "psllq $56, %%mm6 \n\t"
  1791. "por %%mm5, %%mm3 \n\t" // L01
  1792. "por %%mm6, %%mm4 \n\t" // L21
  1793. "movq %%mm3, %%mm5 \n\t" // L01
  1794. PAVGB(%%mm4, %%mm3) // (L21 + L01)/2
  1795. PAVGB(%%mm2, %%mm3) // (L21 + L01 + 2L11)/4
  1796. "psubusb %%mm7, %%mm2 \n\t"
  1797. "psubusb %%mm7, %%mm4 \n\t"
  1798. "psubusb %%mm7, %%mm5 \n\t"
  1799. "pcmpeqb b00, %%mm2 \n\t" // L11 > a ? 0 : -1
  1800. "pcmpeqb b00, %%mm4 \n\t" // L21 > a ? 0 : -1
  1801. "pcmpeqb b00, %%mm5 \n\t" // L01 > a ? 0 : -1
  1802. "paddb %%mm4, %%mm2 \n\t"
  1803. "paddb %%mm5, %%mm2 \n\t"
  1804. // 0, 2, 3, 1
  1805. #define DERING_CORE(dst,src,ppsx,psx,sx,pplx,plx,lx,t0,t1) \
  1806. "movq " #src ", " #sx " \n\t" /* src[0] */\
  1807. "movq " #sx ", " #lx " \n\t" /* src[0] */\
  1808. "movq " #sx ", " #t0 " \n\t" /* src[0] */\
  1809. "psllq $8, " #lx " \n\t"\
  1810. "psrlq $8, " #t0 " \n\t"\
  1811. "movd -4" #src ", " #t1 " \n\t"\
  1812. "psrlq $24, " #t1 " \n\t"\
  1813. "por " #t1 ", " #lx " \n\t" /* src[-1] */\
  1814. "movd 8" #src ", " #t1 " \n\t"\
  1815. "psllq $56, " #t1 " \n\t"\
  1816. "por " #t1 ", " #t0 " \n\t" /* src[+1] */\
  1817. "movq " #lx ", " #t1 " \n\t" /* src[-1] */\
  1818. PAVGB(t0, lx) /* (src[-1] + src[+1])/2 */\
  1819. PAVGB(sx, lx) /* (src[-1] + 2src[0] + src[+1])/4 */\
  1820. PAVGB(lx, pplx) \
  1821. "movq " #lx ", temp1 \n\t"\
  1822. "movq temp0, " #lx " \n\t"\
  1823. "psubusb " #lx ", " #t1 " \n\t"\
  1824. "psubusb " #lx ", " #t0 " \n\t"\
  1825. "psubusb " #lx ", " #sx " \n\t"\
  1826. "movq b00, " #lx " \n\t"\
  1827. "pcmpeqb " #lx ", " #t1 " \n\t" /* src[-1] > a ? 0 : -1*/\
  1828. "pcmpeqb " #lx ", " #t0 " \n\t" /* src[+1] > a ? 0 : -1*/\
  1829. "pcmpeqb " #lx ", " #sx " \n\t" /* src[0] > a ? 0 : -1*/\
  1830. "paddb " #t1 ", " #t0 " \n\t"\
  1831. "paddb " #t0 ", " #sx " \n\t"\
  1832. \
  1833. PAVGB(plx, pplx) /* filtered */\
  1834. "movq " #dst ", " #t0 " \n\t" /* dst */\
  1835. "movq " #t0 ", " #t1 " \n\t" /* dst */\
  1836. "psubusb pQPb2, " #t0 " \n\t"\
  1837. "paddusb pQPb2, " #t1 " \n\t"\
  1838. PMAXUB(t0, pplx)\
  1839. PMINUB(t1, pplx, t0)\
  1840. "paddb " #sx ", " #ppsx " \n\t"\
  1841. "paddb " #psx ", " #ppsx " \n\t"\
  1842. "#paddb b02, " #ppsx " \n\t"\
  1843. "pand b08, " #ppsx " \n\t"\
  1844. "pcmpeqb " #lx ", " #ppsx " \n\t"\
  1845. "pand " #ppsx ", " #pplx " \n\t"\
  1846. "pandn " #dst ", " #ppsx " \n\t"\
  1847. "por " #pplx ", " #ppsx " \n\t"\
  1848. "movq " #ppsx ", " #dst " \n\t"\
  1849. "movq temp1, " #lx " \n\t"
  1850. /*
  1851. 0000000
  1852. 1111111
  1853. 1111110
  1854. 1111101
  1855. 1111100
  1856. 1111011
  1857. 1111010
  1858. 1111001
  1859. 1111000
  1860. 1110111
  1861. */
  1862. //DERING_CORE(dst,src ,ppsx ,psx ,sx ,pplx ,plx ,lx ,t0 ,t1)
  1863. DERING_CORE((%%eax),(%%eax, %1) ,%%mm0,%%mm2,%%mm4,%%mm1,%%mm3,%%mm5,%%mm6,%%mm7)
  1864. DERING_CORE((%%eax, %1),(%%eax, %1, 2) ,%%mm2,%%mm4,%%mm0,%%mm3,%%mm5,%%mm1,%%mm6,%%mm7)
  1865. DERING_CORE((%%eax, %1, 2),(%0, %1, 4) ,%%mm4,%%mm0,%%mm2,%%mm5,%%mm1,%%mm3,%%mm6,%%mm7)
  1866. DERING_CORE((%0, %1, 4),(%%ebx) ,%%mm0,%%mm2,%%mm4,%%mm1,%%mm3,%%mm5,%%mm6,%%mm7)
  1867. DERING_CORE((%%ebx),(%%ebx, %1) ,%%mm2,%%mm4,%%mm0,%%mm3,%%mm5,%%mm1,%%mm6,%%mm7)
  1868. DERING_CORE((%%ebx, %1), (%%ebx, %1, 2),%%mm4,%%mm0,%%mm2,%%mm5,%%mm1,%%mm3,%%mm6,%%mm7)
  1869. DERING_CORE((%%ebx, %1, 2),(%0, %1, 8) ,%%mm0,%%mm2,%%mm4,%%mm1,%%mm3,%%mm5,%%mm6,%%mm7)
  1870. DERING_CORE((%0, %1, 8),(%%ebx, %1, 4) ,%%mm2,%%mm4,%%mm0,%%mm3,%%mm5,%%mm1,%%mm6,%%mm7)
  1871. : : "r" (src), "r" (stride), "r" (QP)
  1872. : "%eax", "%ebx"
  1873. );
  1874. #else
  1875. int y;
  1876. int min=255;
  1877. int max=0;
  1878. int avg;
  1879. uint8_t *p;
  1880. int s[10];
  1881. for(y=1; y<9; y++)
  1882. {
  1883. int x;
  1884. p= src + stride*y;
  1885. for(x=1; x<9; x++)
  1886. {
  1887. p++;
  1888. if(*p > max) max= *p;
  1889. if(*p < min) min= *p;
  1890. }
  1891. }
  1892. avg= (min + max + 1)/2;
  1893. for(y=0; y<10; y++)
  1894. {
  1895. int x;
  1896. int t = 0;
  1897. p= src + stride*y;
  1898. for(x=0; x<10; x++)
  1899. {
  1900. if(*p > avg) t |= (1<<x);
  1901. p++;
  1902. }
  1903. t |= (~t)<<16;
  1904. t &= (t<<1) & (t>>1);
  1905. s[y] = t;
  1906. }
  1907. for(y=1; y<9; y++)
  1908. {
  1909. int x;
  1910. int t = s[y-1] & s[y] & s[y+1];
  1911. t|= t>>16;
  1912. p= src + stride*y;
  1913. for(x=1; x<9; x++)
  1914. {
  1915. p++;
  1916. if(t & (1<<x))
  1917. {
  1918. int f= (*(p-stride-1)) + 2*(*(p-stride)) + (*(p-stride+1))
  1919. +2*(*(p -1)) + 4*(*p ) + 2*(*(p +1))
  1920. +(*(p+stride-1)) + 2*(*(p+stride)) + (*(p+stride+1));
  1921. f= (f + 8)>>4;
  1922. if (*p + 2*QP < f) *p= *p + 2*QP;
  1923. else if(*p - 2*QP > f) *p= *p - 2*QP;
  1924. else *p=f;
  1925. }
  1926. }
  1927. }
  1928. #endif
  1929. }
  1930. /**
  1931. * Deinterlaces the given block
  1932. * will be called for every 8x8 block and can read & write from line 4-15
  1933. * lines 0-3 have been passed through the deblock / dering filters allready, but can be read too
  1934. * lines 4-12 will be read into the deblocking filter and should be deinterlaced
  1935. */
  1936. static inline void deInterlaceInterpolateLinear(uint8_t src[], int stride)
  1937. {
  1938. #if defined (HAVE_MMX2) || defined (HAVE_3DNOW)
  1939. src+= 4*stride;
  1940. asm volatile(
  1941. "leal (%0, %1), %%eax \n\t"
  1942. "leal (%%eax, %1, 4), %%ebx \n\t"
  1943. // 0 1 2 3 4 5 6 7 8 9
  1944. // %0 eax eax+%1 eax+2%1 %0+4%1 ebx ebx+%1 ebx+2%1 %0+8%1 ebx+4%1
  1945. "movq (%0), %%mm0 \n\t"
  1946. "movq (%%eax, %1), %%mm1 \n\t"
  1947. PAVGB(%%mm1, %%mm0)
  1948. "movq %%mm0, (%%eax) \n\t"
  1949. "movq (%0, %1, 4), %%mm0 \n\t"
  1950. PAVGB(%%mm0, %%mm1)
  1951. "movq %%mm1, (%%eax, %1, 2) \n\t"
  1952. "movq (%%ebx, %1), %%mm1 \n\t"
  1953. PAVGB(%%mm1, %%mm0)
  1954. "movq %%mm0, (%%ebx) \n\t"
  1955. "movq (%0, %1, 8), %%mm0 \n\t"
  1956. PAVGB(%%mm0, %%mm1)
  1957. "movq %%mm1, (%%ebx, %1, 2) \n\t"
  1958. : : "r" (src), "r" (stride)
  1959. : "%eax", "%ebx"
  1960. );
  1961. #else
  1962. int x;
  1963. src+= 4*stride;
  1964. for(x=0; x<8; x++)
  1965. {
  1966. src[stride] = (src[0] + src[stride*2])>>1;
  1967. src[stride*3] = (src[stride*2] + src[stride*4])>>1;
  1968. src[stride*5] = (src[stride*4] + src[stride*6])>>1;
  1969. src[stride*7] = (src[stride*6] + src[stride*8])>>1;
  1970. src++;
  1971. }
  1972. #endif
  1973. }
  1974. /**
  1975. * Deinterlaces the given block
  1976. * will be called for every 8x8 block and can read & write from line 4-15
  1977. * lines 0-3 have been passed through the deblock / dering filters allready, but can be read too
  1978. * lines 4-12 will be read into the deblocking filter and should be deinterlaced
  1979. * this filter will read lines 3-15 and write 7-13
  1980. * no cliping in C version
  1981. */
  1982. static inline void deInterlaceInterpolateCubic(uint8_t src[], int stride)
  1983. {
  1984. #if defined (HAVE_MMX2) || defined (HAVE_3DNOW)
  1985. src+= stride*3;
  1986. asm volatile(
  1987. "leal (%0, %1), %%eax \n\t"
  1988. "leal (%%eax, %1, 4), %%ebx \n\t"
  1989. "leal (%%ebx, %1, 4), %%ecx \n\t"
  1990. "addl %1, %%ecx \n\t"
  1991. "pxor %%mm7, %%mm7 \n\t"
  1992. // 0 1 2 3 4 5 6 7 8 9 10
  1993. // %0 eax eax+%1 eax+2%1 %0+4%1 ebx ebx+%1 ebx+2%1 %0+8%1 ebx+4%1 ecx
  1994. #define DEINT_CUBIC(a,b,c,d,e)\
  1995. "movq " #a ", %%mm0 \n\t"\
  1996. "movq " #b ", %%mm1 \n\t"\
  1997. "movq " #d ", %%mm2 \n\t"\
  1998. "movq " #e ", %%mm3 \n\t"\
  1999. PAVGB(%%mm2, %%mm1) /* (b+d) /2 */\
  2000. PAVGB(%%mm3, %%mm0) /* a(a+e) /2 */\
  2001. "movq %%mm0, %%mm2 \n\t"\
  2002. "punpcklbw %%mm7, %%mm0 \n\t"\
  2003. "punpckhbw %%mm7, %%mm2 \n\t"\
  2004. "movq %%mm1, %%mm3 \n\t"\
  2005. "punpcklbw %%mm7, %%mm1 \n\t"\
  2006. "punpckhbw %%mm7, %%mm3 \n\t"\
  2007. "psubw %%mm1, %%mm0 \n\t" /* L(a+e - (b+d))/2 */\
  2008. "psubw %%mm3, %%mm2 \n\t" /* H(a+e - (b+d))/2 */\
  2009. "psraw $3, %%mm0 \n\t" /* L(a+e - (b+d))/16 */\
  2010. "psraw $3, %%mm2 \n\t" /* H(a+e - (b+d))/16 */\
  2011. "psubw %%mm0, %%mm1 \n\t" /* L(9b + 9d - a - e)/16 */\
  2012. "psubw %%mm2, %%mm3 \n\t" /* H(9b + 9d - a - e)/16 */\
  2013. "packuswb %%mm3, %%mm1 \n\t"\
  2014. "movq %%mm1, " #c " \n\t"
  2015. DEINT_CUBIC((%0), (%%eax, %1), (%%eax, %1, 2), (%0, %1, 4), (%%ebx, %1))
  2016. DEINT_CUBIC((%%eax, %1), (%0, %1, 4), (%%ebx), (%%ebx, %1), (%0, %1, 8))
  2017. DEINT_CUBIC((%0, %1, 4), (%%ebx, %1), (%%ebx, %1, 2), (%0, %1, 8), (%%ecx))
  2018. DEINT_CUBIC((%%ebx, %1), (%0, %1, 8), (%%ebx, %1, 4), (%%ecx), (%%ecx, %1, 2))
  2019. : : "r" (src), "r" (stride)
  2020. : "%eax", "%ebx", "ecx"
  2021. );
  2022. #else
  2023. int x;
  2024. src+= stride*3;
  2025. for(x=0; x<8; x++)
  2026. {
  2027. src[stride*3] = (-src[0] + 9*src[stride*2] + 9*src[stride*4] - src[stride*6])>>4;
  2028. src[stride*5] = (-src[stride*2] + 9*src[stride*4] + 9*src[stride*6] - src[stride*8])>>4;
  2029. src[stride*7] = (-src[stride*4] + 9*src[stride*6] + 9*src[stride*8] - src[stride*10])>>4;
  2030. src[stride*9] = (-src[stride*6] + 9*src[stride*8] + 9*src[stride*10] - src[stride*12])>>4;
  2031. src++;
  2032. }
  2033. #endif
  2034. }
  2035. /**
  2036. * Deinterlaces the given block
  2037. * will be called for every 8x8 block and can read & write from line 4-15
  2038. * lines 0-3 have been passed through the deblock / dering filters allready, but can be read too
  2039. * lines 4-12 will be read into the deblocking filter and should be deinterlaced
  2040. * will shift the image up by 1 line (FIXME if this is a problem)
  2041. * this filter will read lines 4-13 and write 4-11
  2042. */
  2043. static inline void deInterlaceBlendLinear(uint8_t src[], int stride)
  2044. {
  2045. #if defined (HAVE_MMX2) || defined (HAVE_3DNOW)
  2046. src+= 4*stride;
  2047. asm volatile(
  2048. "leal (%0, %1), %%eax \n\t"
  2049. "leal (%%eax, %1, 4), %%ebx \n\t"
  2050. // 0 1 2 3 4 5 6 7 8 9
  2051. // %0 eax eax+%1 eax+2%1 %0+4%1 ebx ebx+%1 ebx+2%1 %0+8%1 ebx+4%1
  2052. "movq (%0), %%mm0 \n\t" // L0
  2053. "movq (%%eax, %1), %%mm1 \n\t" // L2
  2054. PAVGB(%%mm1, %%mm0) // L0+L2
  2055. "movq (%%eax), %%mm2 \n\t" // L1
  2056. PAVGB(%%mm2, %%mm0)
  2057. "movq %%mm0, (%0) \n\t"
  2058. "movq (%%eax, %1, 2), %%mm0 \n\t" // L3
  2059. PAVGB(%%mm0, %%mm2) // L1+L3
  2060. PAVGB(%%mm1, %%mm2) // 2L2 + L1 + L3
  2061. "movq %%mm2, (%%eax) \n\t"
  2062. "movq (%0, %1, 4), %%mm2 \n\t" // L4
  2063. PAVGB(%%mm2, %%mm1) // L2+L4
  2064. PAVGB(%%mm0, %%mm1) // 2L3 + L2 + L4
  2065. "movq %%mm1, (%%eax, %1) \n\t"
  2066. "movq (%%ebx), %%mm1 \n\t" // L5
  2067. PAVGB(%%mm1, %%mm0) // L3+L5
  2068. PAVGB(%%mm2, %%mm0) // 2L4 + L3 + L5
  2069. "movq %%mm0, (%%eax, %1, 2) \n\t"
  2070. "movq (%%ebx, %1), %%mm0 \n\t" // L6
  2071. PAVGB(%%mm0, %%mm2) // L4+L6
  2072. PAVGB(%%mm1, %%mm2) // 2L5 + L4 + L6
  2073. "movq %%mm2, (%0, %1, 4) \n\t"
  2074. "movq (%%ebx, %1, 2), %%mm2 \n\t" // L7
  2075. PAVGB(%%mm2, %%mm1) // L5+L7
  2076. PAVGB(%%mm0, %%mm1) // 2L6 + L5 + L7
  2077. "movq %%mm1, (%%ebx) \n\t"
  2078. "movq (%0, %1, 8), %%mm1 \n\t" // L8
  2079. PAVGB(%%mm1, %%mm0) // L6+L8
  2080. PAVGB(%%mm2, %%mm0) // 2L7 + L6 + L8
  2081. "movq %%mm0, (%%ebx, %1) \n\t"
  2082. "movq (%%ebx, %1, 4), %%mm0 \n\t" // L9
  2083. PAVGB(%%mm0, %%mm2) // L7+L9
  2084. PAVGB(%%mm1, %%mm2) // 2L8 + L7 + L9
  2085. "movq %%mm2, (%%ebx, %1, 2) \n\t"
  2086. : : "r" (src), "r" (stride)
  2087. : "%eax", "%ebx"
  2088. );
  2089. #else
  2090. int x;
  2091. src+= 4*stride;
  2092. for(x=0; x<8; x++)
  2093. {
  2094. src[0 ] = (src[0 ] + 2*src[stride ] + src[stride*2])>>2;
  2095. src[stride ] = (src[stride ] + 2*src[stride*2] + src[stride*3])>>2;
  2096. src[stride*2] = (src[stride*2] + 2*src[stride*3] + src[stride*4])>>2;
  2097. src[stride*3] = (src[stride*3] + 2*src[stride*4] + src[stride*5])>>2;
  2098. src[stride*4] = (src[stride*4] + 2*src[stride*5] + src[stride*6])>>2;
  2099. src[stride*5] = (src[stride*5] + 2*src[stride*6] + src[stride*7])>>2;
  2100. src[stride*6] = (src[stride*6] + 2*src[stride*7] + src[stride*8])>>2;
  2101. src[stride*7] = (src[stride*7] + 2*src[stride*8] + src[stride*9])>>2;
  2102. src++;
  2103. }
  2104. #endif
  2105. }
  2106. /**
  2107. * Deinterlaces the given block
  2108. * will be called for every 8x8 block and can read & write from line 4-15,
  2109. * lines 0-3 have been passed through the deblock / dering filters allready, but can be read too
  2110. * lines 4-12 will be read into the deblocking filter and should be deinterlaced
  2111. */
  2112. static inline void deInterlaceMedian(uint8_t src[], int stride)
  2113. {
  2114. #ifdef HAVE_MMX
  2115. src+= 4*stride;
  2116. #ifdef HAVE_MMX2
  2117. asm volatile(
  2118. "leal (%0, %1), %%eax \n\t"
  2119. "leal (%%eax, %1, 4), %%ebx \n\t"
  2120. // 0 1 2 3 4 5 6 7 8 9
  2121. // %0 eax eax+%1 eax+2%1 %0+4%1 ebx ebx+%1 ebx+2%1 %0+8%1 ebx+4%1
  2122. "movq (%0), %%mm0 \n\t" //
  2123. "movq (%%eax, %1), %%mm2 \n\t" //
  2124. "movq (%%eax), %%mm1 \n\t" //
  2125. "movq %%mm0, %%mm3 \n\t"
  2126. "pmaxub %%mm1, %%mm0 \n\t" //
  2127. "pminub %%mm3, %%mm1 \n\t" //
  2128. "pmaxub %%mm2, %%mm1 \n\t" //
  2129. "pminub %%mm1, %%mm0 \n\t"
  2130. "movq %%mm0, (%%eax) \n\t"
  2131. "movq (%0, %1, 4), %%mm0 \n\t" //
  2132. "movq (%%eax, %1, 2), %%mm1 \n\t" //
  2133. "movq %%mm2, %%mm3 \n\t"
  2134. "pmaxub %%mm1, %%mm2 \n\t" //
  2135. "pminub %%mm3, %%mm1 \n\t" //
  2136. "pmaxub %%mm0, %%mm1 \n\t" //
  2137. "pminub %%mm1, %%mm2 \n\t"
  2138. "movq %%mm2, (%%eax, %1, 2) \n\t"
  2139. "movq (%%ebx), %%mm2 \n\t" //
  2140. "movq (%%ebx, %1), %%mm1 \n\t" //
  2141. "movq %%mm2, %%mm3 \n\t"
  2142. "pmaxub %%mm0, %%mm2 \n\t" //
  2143. "pminub %%mm3, %%mm0 \n\t" //
  2144. "pmaxub %%mm1, %%mm0 \n\t" //
  2145. "pminub %%mm0, %%mm2 \n\t"
  2146. "movq %%mm2, (%%ebx) \n\t"
  2147. "movq (%%ebx, %1, 2), %%mm2 \n\t" //
  2148. "movq (%0, %1, 8), %%mm0 \n\t" //
  2149. "movq %%mm2, %%mm3 \n\t"
  2150. "pmaxub %%mm0, %%mm2 \n\t" //
  2151. "pminub %%mm3, %%mm0 \n\t" //
  2152. "pmaxub %%mm1, %%mm0 \n\t" //
  2153. "pminub %%mm0, %%mm2 \n\t"
  2154. "movq %%mm2, (%%ebx, %1, 2) \n\t"
  2155. : : "r" (src), "r" (stride)
  2156. : "%eax", "%ebx"
  2157. );
  2158. #else // MMX without MMX2
  2159. asm volatile(
  2160. "leal (%0, %1), %%eax \n\t"
  2161. "leal (%%eax, %1, 4), %%ebx \n\t"
  2162. // 0 1 2 3 4 5 6 7 8 9
  2163. // %0 eax eax+%1 eax+2%1 %0+4%1 ebx ebx+%1 ebx+2%1 %0+8%1 ebx+4%1
  2164. "pxor %%mm7, %%mm7 \n\t"
  2165. #define MEDIAN(a,b,c)\
  2166. "movq " #a ", %%mm0 \n\t"\
  2167. "movq " #b ", %%mm2 \n\t"\
  2168. "movq " #c ", %%mm1 \n\t"\
  2169. "movq %%mm0, %%mm3 \n\t"\
  2170. "movq %%mm1, %%mm4 \n\t"\
  2171. "movq %%mm2, %%mm5 \n\t"\
  2172. "psubusb %%mm1, %%mm3 \n\t"\
  2173. "psubusb %%mm2, %%mm4 \n\t"\
  2174. "psubusb %%mm0, %%mm5 \n\t"\
  2175. "pcmpeqb %%mm7, %%mm3 \n\t"\
  2176. "pcmpeqb %%mm7, %%mm4 \n\t"\
  2177. "pcmpeqb %%mm7, %%mm5 \n\t"\
  2178. "movq %%mm3, %%mm6 \n\t"\
  2179. "pxor %%mm4, %%mm3 \n\t"\
  2180. "pxor %%mm5, %%mm4 \n\t"\
  2181. "pxor %%mm6, %%mm5 \n\t"\
  2182. "por %%mm3, %%mm1 \n\t"\
  2183. "por %%mm4, %%mm2 \n\t"\
  2184. "por %%mm5, %%mm0 \n\t"\
  2185. "pand %%mm2, %%mm0 \n\t"\
  2186. "pand %%mm1, %%mm0 \n\t"\
  2187. "movq %%mm0, " #b " \n\t"
  2188. MEDIAN((%0), (%%eax), (%%eax, %1))
  2189. MEDIAN((%%eax, %1), (%%eax, %1, 2), (%0, %1, 4))
  2190. MEDIAN((%0, %1, 4), (%%ebx), (%%ebx, %1))
  2191. MEDIAN((%%ebx, %1), (%%ebx, %1, 2), (%0, %1, 8))
  2192. : : "r" (src), "r" (stride)
  2193. : "%eax", "%ebx"
  2194. );
  2195. #endif // MMX
  2196. #else
  2197. //FIXME
  2198. int x;
  2199. src+= 4*stride;
  2200. for(x=0; x<8; x++)
  2201. {
  2202. src[0 ] = (src[0 ] + 2*src[stride ] + src[stride*2])>>2;
  2203. src[stride ] = (src[stride ] + 2*src[stride*2] + src[stride*3])>>2;
  2204. src[stride*2] = (src[stride*2] + 2*src[stride*3] + src[stride*4])>>2;
  2205. src[stride*3] = (src[stride*3] + 2*src[stride*4] + src[stride*5])>>2;
  2206. src[stride*4] = (src[stride*4] + 2*src[stride*5] + src[stride*6])>>2;
  2207. src[stride*5] = (src[stride*5] + 2*src[stride*6] + src[stride*7])>>2;
  2208. src[stride*6] = (src[stride*6] + 2*src[stride*7] + src[stride*8])>>2;
  2209. src[stride*7] = (src[stride*7] + 2*src[stride*8] + src[stride*9])>>2;
  2210. src++;
  2211. }
  2212. #endif
  2213. }
  2214. #ifdef HAVE_MMX
  2215. /**
  2216. * transposes and shift the given 8x8 Block into dst1 and dst2
  2217. */
  2218. static inline void transpose1(uint8_t *dst1, uint8_t *dst2, uint8_t *src, int srcStride)
  2219. {
  2220. asm(
  2221. "leal (%0, %1), %%eax \n\t"
  2222. "leal (%%eax, %1, 4), %%ebx \n\t"
  2223. // 0 1 2 3 4 5 6 7 8 9
  2224. // %0 eax eax+%1 eax+2%1 %0+4%1 ebx ebx+%1 ebx+2%1 %0+8%1 ebx+4%1
  2225. "movq (%0), %%mm0 \n\t" // 12345678
  2226. "movq (%%eax), %%mm1 \n\t" // abcdefgh
  2227. "movq %%mm0, %%mm2 \n\t" // 12345678
  2228. "punpcklbw %%mm1, %%mm0 \n\t" // 1a2b3c4d
  2229. "punpckhbw %%mm1, %%mm2 \n\t" // 5e6f7g8h
  2230. "movq (%%eax, %1), %%mm1 \n\t"
  2231. "movq (%%eax, %1, 2), %%mm3 \n\t"
  2232. "movq %%mm1, %%mm4 \n\t"
  2233. "punpcklbw %%mm3, %%mm1 \n\t"
  2234. "punpckhbw %%mm3, %%mm4 \n\t"
  2235. "movq %%mm0, %%mm3 \n\t"
  2236. "punpcklwd %%mm1, %%mm0 \n\t"
  2237. "punpckhwd %%mm1, %%mm3 \n\t"
  2238. "movq %%mm2, %%mm1 \n\t"
  2239. "punpcklwd %%mm4, %%mm2 \n\t"
  2240. "punpckhwd %%mm4, %%mm1 \n\t"
  2241. "movd %%mm0, 128(%2) \n\t"
  2242. "psrlq $32, %%mm0 \n\t"
  2243. "movd %%mm0, 144(%2) \n\t"
  2244. "movd %%mm3, 160(%2) \n\t"
  2245. "psrlq $32, %%mm3 \n\t"
  2246. "movd %%mm3, 176(%2) \n\t"
  2247. "movd %%mm3, 48(%3) \n\t"
  2248. "movd %%mm2, 192(%2) \n\t"
  2249. "movd %%mm2, 64(%3) \n\t"
  2250. "psrlq $32, %%mm2 \n\t"
  2251. "movd %%mm2, 80(%3) \n\t"
  2252. "movd %%mm1, 96(%3) \n\t"
  2253. "psrlq $32, %%mm1 \n\t"
  2254. "movd %%mm1, 112(%3) \n\t"
  2255. "movq (%0, %1, 4), %%mm0 \n\t" // 12345678
  2256. "movq (%%ebx), %%mm1 \n\t" // abcdefgh
  2257. "movq %%mm0, %%mm2 \n\t" // 12345678
  2258. "punpcklbw %%mm1, %%mm0 \n\t" // 1a2b3c4d
  2259. "punpckhbw %%mm1, %%mm2 \n\t" // 5e6f7g8h
  2260. "movq (%%ebx, %1), %%mm1 \n\t"
  2261. "movq (%%ebx, %1, 2), %%mm3 \n\t"
  2262. "movq %%mm1, %%mm4 \n\t"
  2263. "punpcklbw %%mm3, %%mm1 \n\t"
  2264. "punpckhbw %%mm3, %%mm4 \n\t"
  2265. "movq %%mm0, %%mm3 \n\t"
  2266. "punpcklwd %%mm1, %%mm0 \n\t"
  2267. "punpckhwd %%mm1, %%mm3 \n\t"
  2268. "movq %%mm2, %%mm1 \n\t"
  2269. "punpcklwd %%mm4, %%mm2 \n\t"
  2270. "punpckhwd %%mm4, %%mm1 \n\t"
  2271. "movd %%mm0, 132(%2) \n\t"
  2272. "psrlq $32, %%mm0 \n\t"
  2273. "movd %%mm0, 148(%2) \n\t"
  2274. "movd %%mm3, 164(%2) \n\t"
  2275. "psrlq $32, %%mm3 \n\t"
  2276. "movd %%mm3, 180(%2) \n\t"
  2277. "movd %%mm3, 52(%3) \n\t"
  2278. "movd %%mm2, 196(%2) \n\t"
  2279. "movd %%mm2, 68(%3) \n\t"
  2280. "psrlq $32, %%mm2 \n\t"
  2281. "movd %%mm2, 84(%3) \n\t"
  2282. "movd %%mm1, 100(%3) \n\t"
  2283. "psrlq $32, %%mm1 \n\t"
  2284. "movd %%mm1, 116(%3) \n\t"
  2285. :: "r" (src), "r" (srcStride), "r" (dst1), "r" (dst2)
  2286. : "%eax", "%ebx"
  2287. );
  2288. }
  2289. /**
  2290. * transposes the given 8x8 block
  2291. */
  2292. static inline void transpose2(uint8_t *dst, int dstStride, uint8_t *src)
  2293. {
  2294. asm(
  2295. "leal (%0, %1), %%eax \n\t"
  2296. "leal (%%eax, %1, 4), %%ebx \n\t"
  2297. // 0 1 2 3 4 5 6 7 8 9
  2298. // %0 eax eax+%1 eax+2%1 %0+4%1 ebx ebx+%1 ebx+2%1 %0+8%1 ebx+4%1
  2299. "movq (%2), %%mm0 \n\t" // 12345678
  2300. "movq 16(%2), %%mm1 \n\t" // abcdefgh
  2301. "movq %%mm0, %%mm2 \n\t" // 12345678
  2302. "punpcklbw %%mm1, %%mm0 \n\t" // 1a2b3c4d
  2303. "punpckhbw %%mm1, %%mm2 \n\t" // 5e6f7g8h
  2304. "movq 32(%2), %%mm1 \n\t"
  2305. "movq 48(%2), %%mm3 \n\t"
  2306. "movq %%mm1, %%mm4 \n\t"
  2307. "punpcklbw %%mm3, %%mm1 \n\t"
  2308. "punpckhbw %%mm3, %%mm4 \n\t"
  2309. "movq %%mm0, %%mm3 \n\t"
  2310. "punpcklwd %%mm1, %%mm0 \n\t"
  2311. "punpckhwd %%mm1, %%mm3 \n\t"
  2312. "movq %%mm2, %%mm1 \n\t"
  2313. "punpcklwd %%mm4, %%mm2 \n\t"
  2314. "punpckhwd %%mm4, %%mm1 \n\t"
  2315. "movd %%mm0, (%0) \n\t"
  2316. "psrlq $32, %%mm0 \n\t"
  2317. "movd %%mm0, (%%eax) \n\t"
  2318. "movd %%mm3, (%%eax, %1) \n\t"
  2319. "psrlq $32, %%mm3 \n\t"
  2320. "movd %%mm3, (%%eax, %1, 2) \n\t"
  2321. "movd %%mm2, (%0, %1, 4) \n\t"
  2322. "psrlq $32, %%mm2 \n\t"
  2323. "movd %%mm2, (%%ebx) \n\t"
  2324. "movd %%mm1, (%%ebx, %1) \n\t"
  2325. "psrlq $32, %%mm1 \n\t"
  2326. "movd %%mm1, (%%ebx, %1, 2) \n\t"
  2327. "movq 64(%2), %%mm0 \n\t" // 12345678
  2328. "movq 80(%2), %%mm1 \n\t" // abcdefgh
  2329. "movq %%mm0, %%mm2 \n\t" // 12345678
  2330. "punpcklbw %%mm1, %%mm0 \n\t" // 1a2b3c4d
  2331. "punpckhbw %%mm1, %%mm2 \n\t" // 5e6f7g8h
  2332. "movq 96(%2), %%mm1 \n\t"
  2333. "movq 112(%2), %%mm3 \n\t"
  2334. "movq %%mm1, %%mm4 \n\t"
  2335. "punpcklbw %%mm3, %%mm1 \n\t"
  2336. "punpckhbw %%mm3, %%mm4 \n\t"
  2337. "movq %%mm0, %%mm3 \n\t"
  2338. "punpcklwd %%mm1, %%mm0 \n\t"
  2339. "punpckhwd %%mm1, %%mm3 \n\t"
  2340. "movq %%mm2, %%mm1 \n\t"
  2341. "punpcklwd %%mm4, %%mm2 \n\t"
  2342. "punpckhwd %%mm4, %%mm1 \n\t"
  2343. "movd %%mm0, 4(%0) \n\t"
  2344. "psrlq $32, %%mm0 \n\t"
  2345. "movd %%mm0, 4(%%eax) \n\t"
  2346. "movd %%mm3, 4(%%eax, %1) \n\t"
  2347. "psrlq $32, %%mm3 \n\t"
  2348. "movd %%mm3, 4(%%eax, %1, 2) \n\t"
  2349. "movd %%mm2, 4(%0, %1, 4) \n\t"
  2350. "psrlq $32, %%mm2 \n\t"
  2351. "movd %%mm2, 4(%%ebx) \n\t"
  2352. "movd %%mm1, 4(%%ebx, %1) \n\t"
  2353. "psrlq $32, %%mm1 \n\t"
  2354. "movd %%mm1, 4(%%ebx, %1, 2) \n\t"
  2355. :: "r" (dst), "r" (dstStride), "r" (src)
  2356. : "%eax", "%ebx"
  2357. );
  2358. }
  2359. #endif
  2360. #ifdef HAVE_ODIVX_POSTPROCESS
  2361. #include "../opendivx/postprocess.h"
  2362. int use_old_pp=0;
  2363. #endif
  2364. static void postProcess(uint8_t src[], int srcStride, uint8_t dst[], int dstStride, int width, int height,
  2365. QP_STORE_T QPs[], int QPStride, int isColor, int mode);
  2366. /* -pp Command line Help
  2367. NOTE/FIXME: put this at an appropriate place (--help, html docs, man mplayer)?
  2368. -pp <filterName>[:<option>[:<option>...]][,[-]<filterName>[:<option>...]]...
  2369. long form example:
  2370. -pp vdeblock:autoq,hdeblock:autoq,linblenddeint -pp default,-vdeblock
  2371. short form example:
  2372. -pp vb:a,hb:a,lb -pp de,-vb
  2373. Filters Options
  2374. short long name short long option Description
  2375. * * a autoq cpu power dependant enabler
  2376. c chrom chrominance filtring enabled
  2377. y nochrom chrominance filtring disabled
  2378. hb hdeblock horizontal deblocking filter
  2379. vb vdeblock vertical deblocking filter
  2380. vr rkvdeblock
  2381. h1 x1hdeblock Experimental horizontal deblock filter 1
  2382. v1 x1vdeblock Experimental vertical deblock filter 1
  2383. dr dering not implemented yet
  2384. al autolevels automatic brightness / contrast fixer
  2385. f fullyrange stretch luminance range to (0..255)
  2386. lb linblenddeint linear blend deinterlacer
  2387. li linipoldeint linear interpolating deinterlacer
  2388. ci cubicipoldeint cubic interpolating deinterlacer
  2389. md mediandeint median deinterlacer
  2390. de default hdeblock:a,vdeblock:a,dering:a,autolevels
  2391. fa fast x1hdeblock:a,x1vdeblock:a,dering:a,autolevels
  2392. */
  2393. /**
  2394. * returns a PPMode struct which will have a non 0 error variable if an error occured
  2395. * name is the string after "-pp" on the command line
  2396. * quality is a number from 0 to GET_PP_QUALITY_MAX
  2397. */
  2398. struct PPMode getPPModeByNameAndQuality(char *name, int quality)
  2399. {
  2400. char temp[GET_MODE_BUFFER_SIZE];
  2401. char *p= temp;
  2402. char *filterDelimiters= ",";
  2403. char *optionDelimiters= ":";
  2404. struct PPMode ppMode= {0,0,0,0,0,0};
  2405. char *filterToken;
  2406. strncpy(temp, name, GET_MODE_BUFFER_SIZE);
  2407. for(;;){
  2408. char *filterName;
  2409. int q= GET_PP_QUALITY_MAX;
  2410. int chrom=-1;
  2411. char *option;
  2412. char *options[OPTIONS_ARRAY_SIZE];
  2413. int i;
  2414. int filterNameOk=0;
  2415. int numOfUnknownOptions=0;
  2416. int enable=1; //does the user want us to enabled or disabled the filter
  2417. filterToken= strtok(p, filterDelimiters);
  2418. if(filterToken == NULL) break;
  2419. p+= strlen(filterToken) + 1;
  2420. filterName= strtok(filterToken, optionDelimiters);
  2421. printf("%s::%s\n", filterToken, filterName);
  2422. if(*filterName == '-')
  2423. {
  2424. enable=0;
  2425. filterName++;
  2426. }
  2427. for(;;){ //for all options
  2428. option= strtok(NULL, optionDelimiters);
  2429. if(option == NULL) break;
  2430. printf("%s\n", option);
  2431. if(!strcmp("autoq", option) || !strcmp("a", option)) q= quality;
  2432. else if(!strcmp("nochrom", option) || !strcmp("y", option)) chrom=0;
  2433. else if(!strcmp("chrom", option) || !strcmp("c", option)) chrom=1;
  2434. else
  2435. {
  2436. options[numOfUnknownOptions] = option;
  2437. numOfUnknownOptions++;
  2438. options[numOfUnknownOptions] = NULL;
  2439. }
  2440. if(numOfUnknownOptions >= OPTIONS_ARRAY_SIZE-1) break;
  2441. }
  2442. /* replace stuff from the replace Table */
  2443. for(i=0; replaceTable[2*i]!=NULL; i++)
  2444. {
  2445. if(!strcmp(replaceTable[2*i], filterName))
  2446. {
  2447. int newlen= strlen(replaceTable[2*i + 1]);
  2448. int plen;
  2449. int spaceLeft;
  2450. if(p==NULL) p= temp, *p=0; //last filter
  2451. else p--, *p=','; //not last filter
  2452. plen= strlen(p);
  2453. spaceLeft= (int)p - (int)temp + plen;
  2454. if(spaceLeft + newlen >= GET_MODE_BUFFER_SIZE)
  2455. {
  2456. ppMode.error++;
  2457. break;
  2458. }
  2459. memmove(p + newlen, p, plen+1);
  2460. memcpy(p, replaceTable[2*i + 1], newlen);
  2461. filterNameOk=1;
  2462. }
  2463. }
  2464. for(i=0; filters[i].shortName!=NULL; i++)
  2465. {
  2466. if( !strcmp(filters[i].longName, filterName)
  2467. || !strcmp(filters[i].shortName, filterName))
  2468. {
  2469. ppMode.lumMode &= ~filters[i].mask;
  2470. ppMode.chromMode &= ~filters[i].mask;
  2471. filterNameOk=1;
  2472. if(!enable) break; // user wants to disable it
  2473. if(q >= filters[i].minLumQuality)
  2474. ppMode.lumMode|= filters[i].mask;
  2475. if(chrom==1 || (chrom==-1 && filters[i].chromDefault))
  2476. if(q >= filters[i].minChromQuality)
  2477. ppMode.chromMode|= filters[i].mask;
  2478. if(filters[i].mask == LEVEL_FIX)
  2479. {
  2480. int o;
  2481. ppMode.minAllowedY= 16;
  2482. ppMode.maxAllowedY= 234;
  2483. for(o=0; options[o]!=NULL; o++)
  2484. if( !strcmp(options[o],"fullyrange")
  2485. ||!strcmp(options[o],"f"))
  2486. {
  2487. ppMode.minAllowedY= 0;
  2488. ppMode.maxAllowedY= 255;
  2489. numOfUnknownOptions--;
  2490. }
  2491. }
  2492. }
  2493. }
  2494. if(!filterNameOk) ppMode.error++;
  2495. ppMode.error += numOfUnknownOptions;
  2496. }
  2497. if(ppMode.lumMode & H_DEBLOCK) ppMode.oldMode |= PP_DEBLOCK_Y_H;
  2498. if(ppMode.lumMode & V_DEBLOCK) ppMode.oldMode |= PP_DEBLOCK_Y_V;
  2499. if(ppMode.chromMode & H_DEBLOCK) ppMode.oldMode |= PP_DEBLOCK_C_H;
  2500. if(ppMode.chromMode & V_DEBLOCK) ppMode.oldMode |= PP_DEBLOCK_C_V;
  2501. if(ppMode.lumMode & DERING) ppMode.oldMode |= PP_DERING_Y;
  2502. if(ppMode.chromMode & DERING) ppMode.oldMode |= PP_DERING_C;
  2503. return ppMode;
  2504. }
  2505. /**
  2506. * ...
  2507. */
  2508. void postprocess(unsigned char * src[], int src_stride,
  2509. unsigned char * dst[], int dst_stride,
  2510. int horizontal_size, int vertical_size,
  2511. QP_STORE_T *QP_store, int QP_stride,
  2512. int mode)
  2513. {
  2514. /*
  2515. static int qual=0;
  2516. struct PPMode ppMode= getPPModeByNameAndQuality("fast,default,-hdeblock,-vdeblock", qual);
  2517. qual++;
  2518. qual%=7;
  2519. printf("\n%d %d %d %d\n", ppMode.lumMode, ppMode.chromMode, ppMode.oldMode, ppMode.error);
  2520. postprocess2(src, src_stride, dst, dst_stride,
  2521. horizontal_size, vertical_size, QP_store, QP_stride, &ppMode);
  2522. return;
  2523. */
  2524. #ifdef HAVE_ODIVX_POSTPROCESS
  2525. // Note: I could make this shit outside of this file, but it would mean one
  2526. // more function call...
  2527. if(use_old_pp){
  2528. odivx_postprocess(src,src_stride,dst,dst_stride,horizontal_size,vertical_size,QP_store,QP_stride,mode);
  2529. return;
  2530. }
  2531. #endif
  2532. postProcess(src[0], src_stride, dst[0], dst_stride,
  2533. horizontal_size, vertical_size, QP_store, QP_stride, 0, mode);
  2534. horizontal_size >>= 1;
  2535. vertical_size >>= 1;
  2536. src_stride >>= 1;
  2537. dst_stride >>= 1;
  2538. mode= ((mode&0xFF)>>4) | (mode&0xFFFFFF00);
  2539. // mode&= ~(LINEAR_IPOL_DEINT_FILTER | LINEAR_BLEND_DEINT_FILTER |
  2540. // MEDIAN_DEINT_FILTER | CUBIC_IPOL_DEINT_FILTER);
  2541. if(1)
  2542. {
  2543. postProcess(src[1], src_stride, dst[1], dst_stride,
  2544. horizontal_size, vertical_size, QP_store, QP_stride, 1, mode);
  2545. postProcess(src[2], src_stride, dst[2], dst_stride,
  2546. horizontal_size, vertical_size, QP_store, QP_stride, 2, mode);
  2547. }
  2548. else
  2549. {
  2550. memcpy(dst[1], src[1], src_stride*horizontal_size);
  2551. memcpy(dst[2], src[2], src_stride*horizontal_size);
  2552. }
  2553. }
  2554. void postprocess2(unsigned char * src[], int src_stride,
  2555. unsigned char * dst[], int dst_stride,
  2556. int horizontal_size, int vertical_size,
  2557. QP_STORE_T *QP_store, int QP_stride,
  2558. struct PPMode *mode)
  2559. {
  2560. #ifdef HAVE_ODIVX_POSTPROCESS
  2561. // Note: I could make this shit outside of this file, but it would mean one
  2562. // more function call...
  2563. if(use_old_pp){
  2564. odivx_postprocess(src,src_stride,dst,dst_stride,horizontal_size,vertical_size,QP_store,QP_stride,
  2565. mode->oldMode);
  2566. return;
  2567. }
  2568. #endif
  2569. postProcess(src[0], src_stride, dst[0], dst_stride,
  2570. horizontal_size, vertical_size, QP_store, QP_stride, 0, mode->lumMode);
  2571. horizontal_size >>= 1;
  2572. vertical_size >>= 1;
  2573. src_stride >>= 1;
  2574. dst_stride >>= 1;
  2575. postProcess(src[1], src_stride, dst[1], dst_stride,
  2576. horizontal_size, vertical_size, QP_store, QP_stride, 1, mode->chromMode);
  2577. postProcess(src[2], src_stride, dst[2], dst_stride,
  2578. horizontal_size, vertical_size, QP_store, QP_stride, 2, mode->chromMode);
  2579. }
  2580. /**
  2581. * gets the mode flags for a given quality (larger values mean slower but better postprocessing)
  2582. * 0 <= quality <= 6
  2583. */
  2584. int getPpModeForQuality(int quality){
  2585. int modes[1+GET_PP_QUALITY_MAX]= {
  2586. 0,
  2587. #if 1
  2588. // horizontal filters first
  2589. LUM_H_DEBLOCK,
  2590. LUM_H_DEBLOCK | LUM_V_DEBLOCK,
  2591. LUM_H_DEBLOCK | LUM_V_DEBLOCK | CHROM_H_DEBLOCK,
  2592. LUM_H_DEBLOCK | LUM_V_DEBLOCK | CHROM_H_DEBLOCK | CHROM_V_DEBLOCK,
  2593. LUM_H_DEBLOCK | LUM_V_DEBLOCK | CHROM_H_DEBLOCK | CHROM_V_DEBLOCK | LUM_DERING,
  2594. LUM_H_DEBLOCK | LUM_V_DEBLOCK | CHROM_H_DEBLOCK | CHROM_V_DEBLOCK | LUM_DERING | CHROM_DERING
  2595. #else
  2596. // vertical filters first
  2597. LUM_V_DEBLOCK,
  2598. LUM_V_DEBLOCK | LUM_H_DEBLOCK,
  2599. LUM_V_DEBLOCK | LUM_H_DEBLOCK | CHROM_V_DEBLOCK,
  2600. LUM_V_DEBLOCK | LUM_H_DEBLOCK | CHROM_V_DEBLOCK | CHROM_H_DEBLOCK,
  2601. LUM_V_DEBLOCK | LUM_H_DEBLOCK | CHROM_V_DEBLOCK | CHROM_H_DEBLOCK | LUM_DERING,
  2602. LUM_V_DEBLOCK | LUM_H_DEBLOCK | CHROM_V_DEBLOCK | CHROM_H_DEBLOCK | LUM_DERING | CHROM_DERING
  2603. #endif
  2604. };
  2605. #ifdef HAVE_ODIVX_POSTPROCESS
  2606. int odivx_modes[1+GET_PP_QUALITY_MAX]= {
  2607. 0,
  2608. PP_DEBLOCK_Y_H,
  2609. PP_DEBLOCK_Y_H|PP_DEBLOCK_Y_V,
  2610. PP_DEBLOCK_Y_H|PP_DEBLOCK_Y_V|PP_DEBLOCK_C_H,
  2611. PP_DEBLOCK_Y_H|PP_DEBLOCK_Y_V|PP_DEBLOCK_C_H|PP_DEBLOCK_C_V,
  2612. PP_DEBLOCK_Y_H|PP_DEBLOCK_Y_V|PP_DEBLOCK_C_H|PP_DEBLOCK_C_V|PP_DERING_Y,
  2613. PP_DEBLOCK_Y_H|PP_DEBLOCK_Y_V|PP_DEBLOCK_C_H|PP_DEBLOCK_C_V|PP_DERING_Y|PP_DERING_C
  2614. };
  2615. if(use_old_pp) return odivx_modes[quality];
  2616. #endif
  2617. return modes[quality];
  2618. }
  2619. /**
  2620. * Copies a block from src to dst and fixes the blacklevel
  2621. * numLines must be a multiple of 4
  2622. * levelFix == 0 -> dont touch the brighness & contrast
  2623. */
  2624. static inline void blockCopy(uint8_t dst[], int dstStride, uint8_t src[], int srcStride,
  2625. int numLines, int levelFix)
  2626. {
  2627. #ifndef HAVE_MMX
  2628. int i;
  2629. #endif
  2630. if(levelFix)
  2631. {
  2632. #ifdef HAVE_MMX
  2633. asm volatile(
  2634. "leal (%2,%2), %%eax \n\t"
  2635. "leal (%3,%3), %%ebx \n\t"
  2636. "movq packedYOffset, %%mm2 \n\t"
  2637. "movq packedYScale, %%mm3 \n\t"
  2638. "pxor %%mm4, %%mm4 \n\t"
  2639. #define SCALED_CPY \
  2640. "movq (%0), %%mm0 \n\t"\
  2641. "movq (%0), %%mm5 \n\t"\
  2642. "punpcklbw %%mm4, %%mm0 \n\t"\
  2643. "punpckhbw %%mm4, %%mm5 \n\t"\
  2644. "psubw %%mm2, %%mm0 \n\t"\
  2645. "psubw %%mm2, %%mm5 \n\t"\
  2646. "movq (%0,%2), %%mm1 \n\t"\
  2647. "psllw $6, %%mm0 \n\t"\
  2648. "psllw $6, %%mm5 \n\t"\
  2649. "pmulhw %%mm3, %%mm0 \n\t"\
  2650. "movq (%0,%2), %%mm6 \n\t"\
  2651. "pmulhw %%mm3, %%mm5 \n\t"\
  2652. "punpcklbw %%mm4, %%mm1 \n\t"\
  2653. "punpckhbw %%mm4, %%mm6 \n\t"\
  2654. "psubw %%mm2, %%mm1 \n\t"\
  2655. "psubw %%mm2, %%mm6 \n\t"\
  2656. "psllw $6, %%mm1 \n\t"\
  2657. "psllw $6, %%mm6 \n\t"\
  2658. "pmulhw %%mm3, %%mm1 \n\t"\
  2659. "pmulhw %%mm3, %%mm6 \n\t"\
  2660. "addl %%eax, %0 \n\t"\
  2661. "packuswb %%mm5, %%mm0 \n\t"\
  2662. "packuswb %%mm6, %%mm1 \n\t"\
  2663. "movq %%mm0, (%1) \n\t"\
  2664. "movq %%mm1, (%1, %3) \n\t"\
  2665. SCALED_CPY
  2666. "addl %%ebx, %1 \n\t"
  2667. SCALED_CPY
  2668. "addl %%ebx, %1 \n\t"
  2669. SCALED_CPY
  2670. "addl %%ebx, %1 \n\t"
  2671. SCALED_CPY
  2672. : "+r"(src),
  2673. "+r"(dst)
  2674. :"r" (srcStride),
  2675. "r" (dstStride)
  2676. : "%eax", "%ebx"
  2677. );
  2678. #else
  2679. for(i=0; i<numLines; i++)
  2680. memcpy( &(dst[dstStride*i]),
  2681. &(src[srcStride*i]), BLOCK_SIZE);
  2682. #endif
  2683. }
  2684. else
  2685. {
  2686. #ifdef HAVE_MMX
  2687. asm volatile(
  2688. "movl %4, %%eax \n\t"
  2689. "movl %%eax, temp0\n\t"
  2690. "pushl %0 \n\t"
  2691. "pushl %1 \n\t"
  2692. "leal (%2,%2), %%eax \n\t"
  2693. "leal (%3,%3), %%ebx \n\t"
  2694. "movq packedYOffset, %%mm2 \n\t"
  2695. "movq packedYScale, %%mm3 \n\t"
  2696. #define SIMPLE_CPY \
  2697. "movq (%0), %%mm0 \n\t"\
  2698. "movq (%0,%2), %%mm1 \n\t"\
  2699. "movq %%mm0, (%1) \n\t"\
  2700. "movq %%mm1, (%1, %3) \n\t"\
  2701. "1: \n\t"
  2702. SIMPLE_CPY
  2703. "addl %%eax, %0 \n\t"
  2704. "addl %%ebx, %1 \n\t"
  2705. SIMPLE_CPY
  2706. "addl %%eax, %0 \n\t"
  2707. "addl %%ebx, %1 \n\t"
  2708. "decl temp0 \n\t"
  2709. "jnz 1b \n\t"
  2710. "popl %1 \n\t"
  2711. "popl %0 \n\t"
  2712. : : "r" (src),
  2713. "r" (dst),
  2714. "r" (srcStride),
  2715. "r" (dstStride),
  2716. "m" (numLines>>2)
  2717. : "%eax", "%ebx"
  2718. );
  2719. #else
  2720. for(i=0; i<numLines; i++)
  2721. memcpy( &(dst[dstStride*i]),
  2722. &(src[srcStride*i]), BLOCK_SIZE);
  2723. #endif
  2724. }
  2725. }
  2726. /**
  2727. * Filters array of bytes (Y or U or V values)
  2728. */
  2729. static void postProcess(uint8_t src[], int srcStride, uint8_t dst[], int dstStride, int width, int height,
  2730. QP_STORE_T QPs[], int QPStride, int isColor, int mode)
  2731. {
  2732. int x,y;
  2733. /* we need 64bit here otherwise we´ll going to have a problem
  2734. after watching a black picture for 5 hours*/
  2735. static uint64_t *yHistogram= NULL;
  2736. int black=0, white=255; // blackest black and whitest white in the picture
  2737. int QPCorrecture= 256;
  2738. /* Temporary buffers for handling the last row(s) */
  2739. static uint8_t *tempDst= NULL;
  2740. static uint8_t *tempSrc= NULL;
  2741. /* Temporary buffers for handling the last block */
  2742. static uint8_t *tempDstBlock= NULL;
  2743. static uint8_t *tempSrcBlock= NULL;
  2744. #ifdef PP_FUNNY_STRIDE
  2745. uint8_t *dstBlockPtrBackup;
  2746. uint8_t *srcBlockPtrBackup;
  2747. #endif
  2748. #ifdef MORE_TIMING
  2749. long long T0, T1, diffTime=0;
  2750. #endif
  2751. #ifdef TIMING
  2752. long long memcpyTime=0, vertTime=0, horizTime=0, sumTime;
  2753. sumTime= rdtsc();
  2754. #endif
  2755. //mode= 0x7F;
  2756. if(tempDst==NULL)
  2757. {
  2758. tempDst= (uint8_t*)memalign(8, 1024*24);
  2759. tempSrc= (uint8_t*)memalign(8, 1024*24);
  2760. tempDstBlock= (uint8_t*)memalign(8, 1024*24);
  2761. tempSrcBlock= (uint8_t*)memalign(8, 1024*24);
  2762. }
  2763. if(!yHistogram)
  2764. {
  2765. int i;
  2766. yHistogram= (uint64_t*)malloc(8*256);
  2767. for(i=0; i<256; i++) yHistogram[i]= width*height/64*15/256;
  2768. if(mode & FULL_Y_RANGE)
  2769. {
  2770. maxAllowedY=255;
  2771. minAllowedY=0;
  2772. }
  2773. }
  2774. if(!isColor)
  2775. {
  2776. uint64_t sum= 0;
  2777. int i;
  2778. static int framenum= -1;
  2779. uint64_t maxClipped;
  2780. uint64_t clipped;
  2781. double scale;
  2782. framenum++;
  2783. if(framenum == 1) yHistogram[0]= width*height/64*15/256;
  2784. for(i=0; i<256; i++)
  2785. {
  2786. sum+= yHistogram[i];
  2787. // printf("%d ", yHistogram[i]);
  2788. }
  2789. // printf("\n\n");
  2790. /* we allways get a completly black picture first */
  2791. maxClipped= (uint64_t)(sum * maxClippedThreshold);
  2792. clipped= sum;
  2793. for(black=255; black>0; black--)
  2794. {
  2795. if(clipped < maxClipped) break;
  2796. clipped-= yHistogram[black];
  2797. }
  2798. clipped= sum;
  2799. for(white=0; white<256; white++)
  2800. {
  2801. if(clipped < maxClipped) break;
  2802. clipped-= yHistogram[white];
  2803. }
  2804. packedYOffset= (black - minAllowedY) & 0xFFFF;
  2805. packedYOffset|= packedYOffset<<32;
  2806. packedYOffset|= packedYOffset<<16;
  2807. scale= (double)(maxAllowedY - minAllowedY) / (double)(white-black);
  2808. packedYScale= (uint16_t)(scale*1024.0 + 0.5);
  2809. packedYScale|= packedYScale<<32;
  2810. packedYScale|= packedYScale<<16;
  2811. }
  2812. else
  2813. {
  2814. packedYScale= 0x0100010001000100LL;
  2815. packedYOffset= 0;
  2816. }
  2817. if(mode & LEVEL_FIX) QPCorrecture= packedYScale &0xFFFF;
  2818. else QPCorrecture= 256;
  2819. /* line before the first one */
  2820. y=-BLOCK_SIZE;
  2821. {
  2822. //1% speedup if these are here instead of the inner loop
  2823. uint8_t *srcBlock= &(src[y*srcStride]);
  2824. uint8_t *dstBlock= &(dst[y*dstStride]);
  2825. dstBlock= tempDst + dstStride;
  2826. // From this point on it is guranteed that we can read and write 16 lines downward
  2827. // finish 1 block before the next otherwise we´ll might have a problem
  2828. // with the L1 Cache of the P4 ... or only a few blocks at a time or soemthing
  2829. for(x=0; x<width; x+=BLOCK_SIZE)
  2830. {
  2831. #ifdef HAVE_MMX2
  2832. /*
  2833. prefetchnta(srcBlock + (((x>>3)&3) + 5)*srcStride + 32);
  2834. prefetchnta(srcBlock + (((x>>3)&3) + 9)*srcStride + 32);
  2835. prefetcht0(dstBlock + (((x>>3)&3) + 5)*dstStride + 32);
  2836. prefetcht0(dstBlock + (((x>>3)&3) + 9)*dstStride + 32);
  2837. */
  2838. /*
  2839. prefetchnta(srcBlock + (((x>>2)&6) + 5)*srcStride + 32);
  2840. prefetchnta(srcBlock + (((x>>2)&6) + 6)*srcStride + 32);
  2841. prefetcht0(dstBlock + (((x>>2)&6) + 5)*dstStride + 32);
  2842. prefetcht0(dstBlock + (((x>>2)&6) + 6)*dstStride + 32);
  2843. */
  2844. asm(
  2845. "movl %4, %%eax \n\t"
  2846. "shrl $2, %%eax \n\t"
  2847. "andl $6, %%eax \n\t"
  2848. "addl $8, %%eax \n\t"
  2849. "movl %%eax, %%ebx \n\t"
  2850. "imul %1, %%eax \n\t"
  2851. "imul %3, %%ebx \n\t"
  2852. "prefetchnta 32(%%eax, %0) \n\t"
  2853. "prefetcht0 32(%%ebx, %2) \n\t"
  2854. "addl %1, %%eax \n\t"
  2855. "addl %3, %%ebx \n\t"
  2856. "prefetchnta 32(%%eax, %0) \n\t"
  2857. "prefetcht0 32(%%ebx, %2) \n\t"
  2858. :: "r" (srcBlock), "r" (srcStride), "r" (dstBlock), "r" (dstStride),
  2859. "m" (x)
  2860. : "%eax", "%ebx"
  2861. );
  2862. #elif defined(HAVE_3DNOW)
  2863. //FIXME check if this is faster on an 3dnow chip or if its faster without the prefetch or ...
  2864. /* prefetch(srcBlock + (((x>>3)&3) + 5)*srcStride + 32);
  2865. prefetch(srcBlock + (((x>>3)&3) + 9)*srcStride + 32);
  2866. prefetchw(dstBlock + (((x>>3)&3) + 5)*dstStride + 32);
  2867. prefetchw(dstBlock + (((x>>3)&3) + 9)*dstStride + 32);
  2868. */
  2869. #endif
  2870. blockCopy(dstBlock + dstStride*8, dstStride,
  2871. srcBlock + srcStride*8, srcStride, 8, mode & LEVEL_FIX);
  2872. if(mode & LINEAR_IPOL_DEINT_FILTER)
  2873. deInterlaceInterpolateLinear(dstBlock, dstStride);
  2874. else if(mode & LINEAR_BLEND_DEINT_FILTER)
  2875. deInterlaceBlendLinear(dstBlock, dstStride);
  2876. else if(mode & MEDIAN_DEINT_FILTER)
  2877. deInterlaceMedian(dstBlock, dstStride);
  2878. else if(mode & CUBIC_IPOL_DEINT_FILTER)
  2879. deInterlaceInterpolateCubic(dstBlock, dstStride);
  2880. /* else if(mode & CUBIC_BLEND_DEINT_FILTER)
  2881. deInterlaceBlendCubic(dstBlock, dstStride);
  2882. */
  2883. dstBlock+=8;
  2884. srcBlock+=8;
  2885. }
  2886. memcpy(&(dst[y*dstStride]) + 8*dstStride, tempDst + 9*dstStride, 8*dstStride );
  2887. }
  2888. for(y=0; y<height; y+=BLOCK_SIZE)
  2889. {
  2890. //1% speedup if these are here instead of the inner loop
  2891. uint8_t *srcBlock= &(src[y*srcStride]);
  2892. uint8_t *dstBlock= &(dst[y*dstStride]);
  2893. #ifdef ARCH_X86
  2894. int *QPptr= isColor ? &QPs[(y>>3)*QPStride] :&QPs[(y>>4)*QPStride];
  2895. int QPDelta= isColor ? 1<<(32-3) : 1<<(32-4);
  2896. int QPFrac= QPDelta;
  2897. uint8_t *tempBlock1= tempBlocks;
  2898. uint8_t *tempBlock2= tempBlocks + 8;
  2899. #endif
  2900. /* can we mess with a 8x16 block from srcBlock/dstBlock downwards and 1 line upwards
  2901. if not than use a temporary buffer */
  2902. if(y+15 >= height)
  2903. {
  2904. /* copy from line 8 to 15 of src, these will be copied with
  2905. blockcopy to dst later */
  2906. memcpy(tempSrc + srcStride*8, srcBlock + srcStride*8,
  2907. srcStride*MAX(height-y-8, 0) );
  2908. /* duplicate last line to fill the void upto line 15 */
  2909. if(y+15 >= height)
  2910. {
  2911. int i;
  2912. for(i=height-y; i<=15; i++)
  2913. memcpy(tempSrc + srcStride*i,
  2914. src + srcStride*(height-1), srcStride);
  2915. }
  2916. /* copy up to 9 lines of dst */
  2917. memcpy(tempDst, dstBlock - dstStride, dstStride*MIN(height-y+1, 9) );
  2918. dstBlock= tempDst + dstStride;
  2919. srcBlock= tempSrc;
  2920. }
  2921. // From this point on it is guranteed that we can read and write 16 lines downward
  2922. // finish 1 block before the next otherwise we´ll might have a problem
  2923. // with the L1 Cache of the P4 ... or only a few blocks at a time or soemthing
  2924. for(x=0; x<width; x+=BLOCK_SIZE)
  2925. {
  2926. const int stride= dstStride;
  2927. uint8_t *tmpXchg;
  2928. #ifdef ARCH_X86
  2929. int QP= *QPptr;
  2930. asm volatile(
  2931. "addl %2, %1 \n\t"
  2932. "sbbl %%eax, %%eax \n\t"
  2933. "shll $2, %%eax \n\t"
  2934. "subl %%eax, %0 \n\t"
  2935. : "+r" (QPptr), "+m" (QPFrac)
  2936. : "r" (QPDelta)
  2937. : "%eax"
  2938. );
  2939. #else
  2940. int QP= isColor ?
  2941. QPs[(y>>3)*QPStride + (x>>3)]:
  2942. QPs[(y>>4)*QPStride + (x>>4)];
  2943. #endif
  2944. if(!isColor)
  2945. {
  2946. QP= (QP* QPCorrecture)>>8;
  2947. yHistogram[ srcBlock[srcStride*4 + 4] ]++;
  2948. }
  2949. #ifdef HAVE_MMX
  2950. asm volatile(
  2951. "movd %0, %%mm7 \n\t"
  2952. "packuswb %%mm7, %%mm7 \n\t" // 0, 0, 0, QP, 0, 0, 0, QP
  2953. "packuswb %%mm7, %%mm7 \n\t" // 0,QP, 0, QP, 0,QP, 0, QP
  2954. "packuswb %%mm7, %%mm7 \n\t" // QP,..., QP
  2955. "movq %%mm7, pQPb \n\t"
  2956. : : "r" (QP)
  2957. );
  2958. #endif
  2959. #ifdef MORE_TIMING
  2960. T0= rdtsc();
  2961. #endif
  2962. #ifdef HAVE_MMX2
  2963. /*
  2964. prefetchnta(srcBlock + (((x>>3)&3) + 5)*srcStride + 32);
  2965. prefetchnta(srcBlock + (((x>>3)&3) + 9)*srcStride + 32);
  2966. prefetcht0(dstBlock + (((x>>3)&3) + 5)*dstStride + 32);
  2967. prefetcht0(dstBlock + (((x>>3)&3) + 9)*dstStride + 32);
  2968. */
  2969. /*
  2970. prefetchnta(srcBlock + (((x>>2)&6) + 5)*srcStride + 32);
  2971. prefetchnta(srcBlock + (((x>>2)&6) + 6)*srcStride + 32);
  2972. prefetcht0(dstBlock + (((x>>2)&6) + 5)*dstStride + 32);
  2973. prefetcht0(dstBlock + (((x>>2)&6) + 6)*dstStride + 32);
  2974. */
  2975. asm(
  2976. "movl %4, %%eax \n\t"
  2977. "shrl $2, %%eax \n\t"
  2978. "andl $6, %%eax \n\t"
  2979. "addl $8, %%eax \n\t"
  2980. "movl %%eax, %%ebx \n\t"
  2981. "imul %1, %%eax \n\t"
  2982. "imul %3, %%ebx \n\t"
  2983. "prefetchnta 32(%%eax, %0) \n\t"
  2984. "prefetcht0 32(%%ebx, %2) \n\t"
  2985. "addl %1, %%eax \n\t"
  2986. "addl %3, %%ebx \n\t"
  2987. "prefetchnta 32(%%eax, %0) \n\t"
  2988. "prefetcht0 32(%%ebx, %2) \n\t"
  2989. :: "r" (srcBlock), "r" (srcStride), "r" (dstBlock), "r" (dstStride),
  2990. "m" (x)
  2991. : "%eax", "%ebx"
  2992. );
  2993. #elif defined(HAVE_3DNOW)
  2994. //FIXME check if this is faster on an 3dnow chip or if its faster without the prefetch or ...
  2995. /* prefetch(srcBlock + (((x>>3)&3) + 5)*srcStride + 32);
  2996. prefetch(srcBlock + (((x>>3)&3) + 9)*srcStride + 32);
  2997. prefetchw(dstBlock + (((x>>3)&3) + 5)*dstStride + 32);
  2998. prefetchw(dstBlock + (((x>>3)&3) + 9)*dstStride + 32);
  2999. */
  3000. #endif
  3001. #ifdef PP_FUNNY_STRIDE
  3002. //can we mess with a 8x16 block, if not use a temp buffer, yes again
  3003. if(x+7 >= width)
  3004. {
  3005. int i;
  3006. dstBlockPtrBackup= dstBlock;
  3007. srcBlockPtrBackup= srcBlock;
  3008. for(i=0;i<BLOCK_SIZE*2; i++)
  3009. {
  3010. memcpy(tempSrcBlock+i*srcStride, srcBlock+i*srcStride, width-x);
  3011. memcpy(tempDstBlock+i*dstStride, dstBlock+i*dstStride, width-x);
  3012. }
  3013. dstBlock= tempDstBlock;
  3014. srcBlock= tempSrcBlock;
  3015. }
  3016. #endif
  3017. blockCopy(dstBlock + dstStride*8, dstStride,
  3018. srcBlock + srcStride*8, srcStride, 8, mode & LEVEL_FIX);
  3019. if(mode & LINEAR_IPOL_DEINT_FILTER)
  3020. deInterlaceInterpolateLinear(dstBlock, dstStride);
  3021. else if(mode & LINEAR_BLEND_DEINT_FILTER)
  3022. deInterlaceBlendLinear(dstBlock, dstStride);
  3023. else if(mode & MEDIAN_DEINT_FILTER)
  3024. deInterlaceMedian(dstBlock, dstStride);
  3025. else if(mode & CUBIC_IPOL_DEINT_FILTER)
  3026. deInterlaceInterpolateCubic(dstBlock, dstStride);
  3027. /* else if(mode & CUBIC_BLEND_DEINT_FILTER)
  3028. deInterlaceBlendCubic(dstBlock, dstStride);
  3029. */
  3030. /* only deblock if we have 2 blocks */
  3031. if(y + 8 < height)
  3032. {
  3033. #ifdef MORE_TIMING
  3034. T1= rdtsc();
  3035. memcpyTime+= T1-T0;
  3036. T0=T1;
  3037. #endif
  3038. if(mode & V_RK1_FILTER)
  3039. vertRK1Filter(dstBlock, stride, QP);
  3040. else if(mode & V_X1_FILTER)
  3041. vertX1Filter(dstBlock, stride, QP);
  3042. else if(mode & V_DEBLOCK)
  3043. {
  3044. if( isVertDC(dstBlock, stride))
  3045. {
  3046. if(isVertMinMaxOk(dstBlock, stride, QP))
  3047. doVertLowPass(dstBlock, stride, QP);
  3048. }
  3049. else
  3050. doVertDefFilter(dstBlock, stride, QP);
  3051. }
  3052. #ifdef MORE_TIMING
  3053. T1= rdtsc();
  3054. vertTime+= T1-T0;
  3055. T0=T1;
  3056. #endif
  3057. }
  3058. #ifdef HAVE_MMX
  3059. transpose1(tempBlock1, tempBlock2, dstBlock, dstStride);
  3060. #endif
  3061. /* check if we have a previous block to deblock it with dstBlock */
  3062. if(x - 8 >= 0)
  3063. {
  3064. #ifdef MORE_TIMING
  3065. T0= rdtsc();
  3066. #endif
  3067. #ifdef HAVE_MMX
  3068. if(mode & H_RK1_FILTER)
  3069. vertRK1Filter(tempBlock1, 16, QP);
  3070. else if(mode & H_X1_FILTER)
  3071. vertX1Filter(tempBlock1, 16, QP);
  3072. else if(mode & H_DEBLOCK)
  3073. {
  3074. if( isVertDC(tempBlock1, 16))
  3075. {
  3076. if(isVertMinMaxOk(tempBlock1, 16, QP))
  3077. doVertLowPass(tempBlock1, 16, QP);
  3078. }
  3079. else
  3080. doVertDefFilter(tempBlock1, 16, QP);
  3081. }
  3082. transpose2(dstBlock-4, dstStride, tempBlock1 + 4*16);
  3083. #else
  3084. if(mode & H_X1_FILTER)
  3085. horizX1Filter(dstBlock-4, stride, QP);
  3086. else if(mode & H_DEBLOCK)
  3087. {
  3088. if( isHorizDC(dstBlock-4, stride))
  3089. {
  3090. if(isHorizMinMaxOk(dstBlock-4, stride, QP))
  3091. doHorizLowPass(dstBlock-4, stride, QP);
  3092. }
  3093. else
  3094. doHorizDefFilter(dstBlock-4, stride, QP);
  3095. }
  3096. #endif
  3097. #ifdef MORE_TIMING
  3098. T1= rdtsc();
  3099. horizTime+= T1-T0;
  3100. T0=T1;
  3101. #endif
  3102. if(mode & DERING)
  3103. {
  3104. //FIXME filter first line
  3105. if(y>0) dering(dstBlock - stride - 8, stride, QP);
  3106. }
  3107. }
  3108. else if(mode & DERING)
  3109. {
  3110. //FIXME y+15 is required cuz of the tempBuffer thing -> bottom right block isnt filtered
  3111. if(y > 8 && y+15 < height) dering(dstBlock - stride*9 + width - 8, stride, QP);
  3112. }
  3113. #ifdef PP_FUNNY_STRIDE
  3114. /* did we use a tmp-block buffer */
  3115. if(x+7 >= width)
  3116. {
  3117. int i;
  3118. dstBlock= dstBlockPtrBackup;
  3119. srcBlock= srcBlockPtrBackup;
  3120. for(i=0;i<BLOCK_SIZE*2; i++)
  3121. {
  3122. memcpy(dstBlock+i*dstStride, tempDstBlock+i*dstStride, width-x);
  3123. }
  3124. }
  3125. #endif
  3126. dstBlock+=8;
  3127. srcBlock+=8;
  3128. #ifdef HAVE_MMX
  3129. tmpXchg= tempBlock1;
  3130. tempBlock1= tempBlock2;
  3131. tempBlock2 = tmpXchg;
  3132. #endif
  3133. }
  3134. /* did we use a tmp buffer for the last lines*/
  3135. if(y+15 >= height)
  3136. {
  3137. uint8_t *dstBlock= &(dst[y*dstStride]);
  3138. memcpy(dstBlock, tempDst + dstStride, dstStride*(height-y) );
  3139. }
  3140. }
  3141. #ifdef HAVE_3DNOW
  3142. asm volatile("femms");
  3143. #elif defined (HAVE_MMX)
  3144. asm volatile("emms");
  3145. #endif
  3146. #ifdef TIMING
  3147. // FIXME diff is mostly the time spent for rdtsc (should subtract that but ...)
  3148. sumTime= rdtsc() - sumTime;
  3149. if(!isColor)
  3150. printf("cpy:%4dk, vert:%4dk, horiz:%4dk, sum:%4dk, diff:%4dk, color: %d/%d \r",
  3151. (int)(memcpyTime/1000), (int)(vertTime/1000), (int)(horizTime/1000),
  3152. (int)(sumTime/1000), (int)((sumTime-memcpyTime-vertTime-horizTime)/1000)
  3153. , black, white);
  3154. #endif
  3155. }