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.

3091 lines
90KB

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