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.

3134 lines
91KB

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