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.

3178 lines
92KB

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