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.

3154 lines
92KB

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