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.

3981 lines
115KB

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