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.

3848 lines
115KB

  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. #ifdef ARCH_X86_64
  20. # define REGa rax
  21. # define REGc rcx
  22. # define REGd rdx
  23. # define REG_a "rax"
  24. # define REG_c "rcx"
  25. # define REG_d "rdx"
  26. # define REG_SP "rsp"
  27. # define ALIGN_MASK "$0xFFFFFFFFFFFFFFF8"
  28. #else
  29. # define REGa eax
  30. # define REGc ecx
  31. # define REGd edx
  32. # define REG_a "eax"
  33. # define REG_c "ecx"
  34. # define REG_d "edx"
  35. # define REG_SP "esp"
  36. # define ALIGN_MASK "$0xFFFFFFF8"
  37. #endif
  38. #undef PAVGB
  39. #undef PMINUB
  40. #undef PMAXUB
  41. #ifdef HAVE_MMX2
  42. #define REAL_PAVGB(a,b) "pavgb " #a ", " #b " \n\t"
  43. #elif defined (HAVE_3DNOW)
  44. #define REAL_PAVGB(a,b) "pavgusb " #a ", " #b " \n\t"
  45. #endif
  46. #define PAVGB(a,b) REAL_PAVGB(a,b)
  47. #ifdef HAVE_MMX2
  48. #define PMINUB(a,b,t) "pminub " #a ", " #b " \n\t"
  49. #elif defined (HAVE_MMX)
  50. #define PMINUB(b,a,t) \
  51. "movq " #a ", " #t " \n\t"\
  52. "psubusb " #b ", " #t " \n\t"\
  53. "psubb " #t ", " #a " \n\t"
  54. #endif
  55. #ifdef HAVE_MMX2
  56. #define PMAXUB(a,b) "pmaxub " #a ", " #b " \n\t"
  57. #elif defined (HAVE_MMX)
  58. #define PMAXUB(a,b) \
  59. "psubusb " #a ", " #b " \n\t"\
  60. "paddb " #a ", " #b " \n\t"
  61. #endif
  62. //FIXME? |255-0| = 1 (shouldnt be a problem ...)
  63. #ifdef HAVE_MMX
  64. /**
  65. * Check if the middle 8x8 Block in the given 8x16 block is flat
  66. */
  67. static inline int RENAME(vertClassify)(uint8_t src[], int stride, PPContext *c){
  68. int numEq= 0, dcOk;
  69. src+= stride*4; // src points to begin of the 8x8 Block
  70. asm volatile(
  71. "movq %0, %%mm7 \n\t"
  72. "movq %1, %%mm6 \n\t"
  73. : : "m" (c->mmxDcOffset[c->nonBQP]), "m" (c->mmxDcThreshold[c->nonBQP])
  74. );
  75. asm volatile(
  76. "lea (%2, %3), %%"REG_a" \n\t"
  77. // 0 1 2 3 4 5 6 7 8 9
  78. // %1 eax eax+%2 eax+2%2 %1+4%2 ecx ecx+%2 ecx+2%2 %1+8%2 ecx+4%2
  79. "movq (%2), %%mm0 \n\t"
  80. "movq (%%"REG_a"), %%mm1 \n\t"
  81. "movq %%mm0, %%mm3 \n\t"
  82. "movq %%mm0, %%mm4 \n\t"
  83. PMAXUB(%%mm1, %%mm4)
  84. PMINUB(%%mm1, %%mm3, %%mm5)
  85. "psubb %%mm1, %%mm0 \n\t" // mm0 = differnece
  86. "paddb %%mm7, %%mm0 \n\t"
  87. "pcmpgtb %%mm6, %%mm0 \n\t"
  88. "movq (%%"REG_a",%3), %%mm2 \n\t"
  89. PMAXUB(%%mm2, %%mm4)
  90. PMINUB(%%mm2, %%mm3, %%mm5)
  91. "psubb %%mm2, %%mm1 \n\t"
  92. "paddb %%mm7, %%mm1 \n\t"
  93. "pcmpgtb %%mm6, %%mm1 \n\t"
  94. "paddb %%mm1, %%mm0 \n\t"
  95. "movq (%%"REG_a", %3, 2), %%mm1 \n\t"
  96. PMAXUB(%%mm1, %%mm4)
  97. PMINUB(%%mm1, %%mm3, %%mm5)
  98. "psubb %%mm1, %%mm2 \n\t"
  99. "paddb %%mm7, %%mm2 \n\t"
  100. "pcmpgtb %%mm6, %%mm2 \n\t"
  101. "paddb %%mm2, %%mm0 \n\t"
  102. "lea (%%"REG_a", %3, 4), %%"REG_a" \n\t"
  103. "movq (%2, %3, 4), %%mm2 \n\t"
  104. PMAXUB(%%mm2, %%mm4)
  105. PMINUB(%%mm2, %%mm3, %%mm5)
  106. "psubb %%mm2, %%mm1 \n\t"
  107. "paddb %%mm7, %%mm1 \n\t"
  108. "pcmpgtb %%mm6, %%mm1 \n\t"
  109. "paddb %%mm1, %%mm0 \n\t"
  110. "movq (%%"REG_a"), %%mm1 \n\t"
  111. PMAXUB(%%mm1, %%mm4)
  112. PMINUB(%%mm1, %%mm3, %%mm5)
  113. "psubb %%mm1, %%mm2 \n\t"
  114. "paddb %%mm7, %%mm2 \n\t"
  115. "pcmpgtb %%mm6, %%mm2 \n\t"
  116. "paddb %%mm2, %%mm0 \n\t"
  117. "movq (%%"REG_a", %3), %%mm2 \n\t"
  118. PMAXUB(%%mm2, %%mm4)
  119. PMINUB(%%mm2, %%mm3, %%mm5)
  120. "psubb %%mm2, %%mm1 \n\t"
  121. "paddb %%mm7, %%mm1 \n\t"
  122. "pcmpgtb %%mm6, %%mm1 \n\t"
  123. "paddb %%mm1, %%mm0 \n\t"
  124. "movq (%%"REG_a", %3, 2), %%mm1 \n\t"
  125. PMAXUB(%%mm1, %%mm4)
  126. PMINUB(%%mm1, %%mm3, %%mm5)
  127. "psubb %%mm1, %%mm2 \n\t"
  128. "paddb %%mm7, %%mm2 \n\t"
  129. "pcmpgtb %%mm6, %%mm2 \n\t"
  130. "paddb %%mm2, %%mm0 \n\t"
  131. "psubusb %%mm3, %%mm4 \n\t"
  132. " \n\t"
  133. #ifdef HAVE_MMX2
  134. "pxor %%mm7, %%mm7 \n\t"
  135. "psadbw %%mm7, %%mm0 \n\t"
  136. #else
  137. "movq %%mm0, %%mm1 \n\t"
  138. "psrlw $8, %%mm0 \n\t"
  139. "paddb %%mm1, %%mm0 \n\t"
  140. "movq %%mm0, %%mm1 \n\t"
  141. "psrlq $16, %%mm0 \n\t"
  142. "paddb %%mm1, %%mm0 \n\t"
  143. "movq %%mm0, %%mm1 \n\t"
  144. "psrlq $32, %%mm0 \n\t"
  145. "paddb %%mm1, %%mm0 \n\t"
  146. #endif
  147. "movq %4, %%mm7 \n\t" // QP,..., QP
  148. "paddusb %%mm7, %%mm7 \n\t" // 2QP ... 2QP
  149. "psubusb %%mm7, %%mm4 \n\t" // Diff <= 2QP -> 0
  150. "packssdw %%mm4, %%mm4 \n\t"
  151. "movd %%mm0, %0 \n\t"
  152. "movd %%mm4, %1 \n\t"
  153. : "=r" (numEq), "=r" (dcOk)
  154. : "r" (src), "r" ((long)stride), "m" (c->pQPb)
  155. : "%"REG_a
  156. );
  157. numEq= (-numEq) &0xFF;
  158. if(numEq > c->ppMode.flatnessThreshold){
  159. if(dcOk) return 0;
  160. else return 1;
  161. }else{
  162. return 2;
  163. }
  164. }
  165. #endif
  166. /**
  167. * Do a vertical low pass filter on the 8x16 block (only write to the 8x8 block in the middle)
  168. * using the 9-Tap Filter (1,1,2,2,4,2,2,1,1)/16
  169. */
  170. #ifndef HAVE_ALTIVEC
  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. "lea (%0, %1, 4), %%"REG_a" \n\t"
  192. "lea (%0, %1, 8), %%"REG_c" \n\t"
  193. "sub %1, %%"REG_c" \n\t"
  194. "add %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((%%REGa), %%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((%%REGa,%1,2), %%mm5) // 11 /2
  230. PAVGB((%%REGa), %%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 (%%"REG_c"), %%mm0 \n\t" // 1
  237. PAVGB((%%REGa, %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 (%%"REG_a", %1, 4), %%mm0 \n\t" // 1
  246. PAVGB((%%REGc), %%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 (%%"REG_a"), %%mm5 \n\t" // 1
  253. "movq %%mm6, (%%"REG_a") \n\t" // X
  254. // mm0=7(11) mm1=2(11) mm2=3 mm3=6(11) mm4=1(11) mm5=4 mm7=9
  255. "movq (%%"REG_a", %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 (%%"REG_a", %1, 2), %%mm6 \n\t" // 1
  269. PAVGB(%%mm6, %%mm1) // 11 4 2 /8
  270. PAVGB(%%mm0, %%mm1) // 11224222 /16
  271. "movq %%mm1, (%%"REG_a", %1, 2) \n\t" // X
  272. // mm2=3(112) mm3=6(11) mm4=5 mm5=4(11) mm6=6 mm7=9
  273. PAVGB((%%REGc), %%mm2) // 112 4 /8
  274. "movq (%%"REG_a", %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, (%%"REG_c") \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, (%%"REG_a", %1, 4) \n\t" // X
  285. "sub %1, %0 \n\t"
  286. :
  287. : "r" (src), "r" ((long)stride), "m" (c->pQPb)
  288. : "%"REG_a, "%"REG_c
  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[10];
  307. sums[0] = 4*first + src[l1] + src[l2] + src[l3] + 4;
  308. sums[1] = sums[0] - first + src[l4];
  309. sums[2] = sums[1] - first + src[l5];
  310. sums[3] = sums[2] - first + src[l6];
  311. sums[4] = sums[3] - first + src[l7];
  312. sums[5] = sums[4] - src[l1] + src[l8];
  313. sums[6] = sums[5] - src[l2] + last;
  314. sums[7] = sums[6] - src[l3] + last;
  315. sums[8] = sums[7] - src[l4] + last;
  316. sums[9] = sums[8] - src[l5] + last;
  317. src[l1]= (sums[0] + sums[2] + 2*src[l1])>>4;
  318. src[l2]= (sums[1] + sums[3] + 2*src[l2])>>4;
  319. src[l3]= (sums[2] + sums[4] + 2*src[l3])>>4;
  320. src[l4]= (sums[3] + sums[5] + 2*src[l4])>>4;
  321. src[l5]= (sums[4] + sums[6] + 2*src[l5])>>4;
  322. src[l6]= (sums[5] + sums[7] + 2*src[l6])>>4;
  323. src[l7]= (sums[6] + sums[8] + 2*src[l7])>>4;
  324. src[l8]= (sums[7] + sums[9] + 2*src[l8])>>4;
  325. src++;
  326. }
  327. #endif
  328. }
  329. #endif //HAVE_ALTIVEC
  330. #if 0
  331. /**
  332. * Experimental implementation of the filter (Algorithm 1) described in a paper from Ramkishor & Karandikar
  333. * values are correctly clipped (MMX2)
  334. * values are wraparound (C)
  335. * conclusion: its fast, but introduces ugly horizontal patterns if there is a continious gradient
  336. 0 8 16 24
  337. x = 8
  338. x/2 = 4
  339. x/8 = 1
  340. 1 12 12 23
  341. */
  342. static inline void RENAME(vertRK1Filter)(uint8_t *src, int stride, int QP)
  343. {
  344. #if defined (HAVE_MMX2) || defined (HAVE_3DNOW)
  345. src+= stride*3;
  346. // FIXME rounding
  347. asm volatile(
  348. "pxor %%mm7, %%mm7 \n\t" // 0
  349. "movq "MANGLE(b80)", %%mm6 \n\t" // MIN_SIGNED_BYTE
  350. "leal (%0, %1), %%"REG_a" \n\t"
  351. "leal (%%"REG_a", %1, 4), %%"REG_c" \n\t"
  352. // 0 1 2 3 4 5 6 7 8 9
  353. // %0 eax eax+%1 eax+2%1 %0+4%1 ecx ecx+%1 ecx+2%1 %0+8%1 ecx+4%1
  354. "movq "MANGLE(pQPb)", %%mm0 \n\t" // QP,..., QP
  355. "movq %%mm0, %%mm1 \n\t" // QP,..., QP
  356. "paddusb "MANGLE(b02)", %%mm0 \n\t"
  357. "psrlw $2, %%mm0 \n\t"
  358. "pand "MANGLE(b3F)", %%mm0 \n\t" // QP/4,..., QP/4
  359. "paddusb %%mm1, %%mm0 \n\t" // QP*1.25 ...
  360. "movq (%0, %1, 4), %%mm2 \n\t" // line 4
  361. "movq (%%"REG_c"), %%mm3 \n\t" // line 5
  362. "movq %%mm2, %%mm4 \n\t" // line 4
  363. "pcmpeqb %%mm5, %%mm5 \n\t" // -1
  364. "pxor %%mm2, %%mm5 \n\t" // -line 4 - 1
  365. PAVGB(%%mm3, %%mm5)
  366. "paddb %%mm6, %%mm5 \n\t" // (l5-l4)/2
  367. "psubusb %%mm3, %%mm4 \n\t"
  368. "psubusb %%mm2, %%mm3 \n\t"
  369. "por %%mm3, %%mm4 \n\t" // |l4 - l5|
  370. "psubusb %%mm0, %%mm4 \n\t"
  371. "pcmpeqb %%mm7, %%mm4 \n\t"
  372. "pand %%mm4, %%mm5 \n\t" // d/2
  373. // "paddb %%mm6, %%mm2 \n\t" // line 4 + 0x80
  374. "paddb %%mm5, %%mm2 \n\t"
  375. // "psubb %%mm6, %%mm2 \n\t"
  376. "movq %%mm2, (%0,%1, 4) \n\t"
  377. "movq (%%"REG_c"), %%mm2 \n\t"
  378. // "paddb %%mm6, %%mm2 \n\t" // line 5 + 0x80
  379. "psubb %%mm5, %%mm2 \n\t"
  380. // "psubb %%mm6, %%mm2 \n\t"
  381. "movq %%mm2, (%%"REG_c") \n\t"
  382. "paddb %%mm6, %%mm5 \n\t"
  383. "psrlw $2, %%mm5 \n\t"
  384. "pand "MANGLE(b3F)", %%mm5 \n\t"
  385. "psubb "MANGLE(b20)", %%mm5 \n\t" // (l5-l4)/8
  386. "movq (%%"REG_a", %1, 2), %%mm2 \n\t"
  387. "paddb %%mm6, %%mm2 \n\t" // line 3 + 0x80
  388. "paddsb %%mm5, %%mm2 \n\t"
  389. "psubb %%mm6, %%mm2 \n\t"
  390. "movq %%mm2, (%%"REG_a", %1, 2) \n\t"
  391. "movq (%%"REG_c", %1), %%mm2 \n\t"
  392. "paddb %%mm6, %%mm2 \n\t" // line 6 + 0x80
  393. "psubsb %%mm5, %%mm2 \n\t"
  394. "psubb %%mm6, %%mm2 \n\t"
  395. "movq %%mm2, (%%"REG_c", %1) \n\t"
  396. :
  397. : "r" (src), "r" ((long)stride)
  398. : "%"REG_a, "%"REG_c
  399. );
  400. #else
  401. const int l1= stride;
  402. const int l2= stride + l1;
  403. const int l3= stride + l2;
  404. const int l4= stride + l3;
  405. const int l5= stride + l4;
  406. const int l6= stride + l5;
  407. // const int l7= stride + l6;
  408. // const int l8= stride + l7;
  409. // const int l9= stride + l8;
  410. int x;
  411. const int QP15= QP + (QP>>2);
  412. src+= stride*3;
  413. for(x=0; x<BLOCK_SIZE; x++)
  414. {
  415. const int v = (src[x+l5] - src[x+l4]);
  416. if(ABS(v) < QP15)
  417. {
  418. src[x+l3] +=v>>3;
  419. src[x+l4] +=v>>1;
  420. src[x+l5] -=v>>1;
  421. src[x+l6] -=v>>3;
  422. }
  423. }
  424. #endif
  425. }
  426. #endif
  427. /**
  428. * Experimental Filter 1
  429. * will not damage linear gradients
  430. * Flat blocks should look like they where passed through the (1,1,2,2,4,2,2,1,1) 9-Tap filter
  431. * can only smooth blocks at the expected locations (it cant smooth them if they did move)
  432. * MMX2 version does correct clipping C version doesnt
  433. */
  434. static inline void RENAME(vertX1Filter)(uint8_t *src, int stride, PPContext *co)
  435. {
  436. #if defined (HAVE_MMX2) || defined (HAVE_3DNOW)
  437. src+= stride*3;
  438. asm volatile(
  439. "pxor %%mm7, %%mm7 \n\t" // 0
  440. "lea (%0, %1), %%"REG_a" \n\t"
  441. "lea (%%"REG_a", %1, 4), %%"REG_c" \n\t"
  442. // 0 1 2 3 4 5 6 7 8 9
  443. // %0 eax eax+%1 eax+2%1 %0+4%1 ecx ecx+%1 ecx+2%1 %0+8%1 ecx+4%1
  444. "movq (%%"REG_a", %1, 2), %%mm0 \n\t" // line 3
  445. "movq (%0, %1, 4), %%mm1 \n\t" // line 4
  446. "movq %%mm1, %%mm2 \n\t" // line 4
  447. "psubusb %%mm0, %%mm1 \n\t"
  448. "psubusb %%mm2, %%mm0 \n\t"
  449. "por %%mm1, %%mm0 \n\t" // |l2 - l3|
  450. "movq (%%"REG_c"), %%mm3 \n\t" // line 5
  451. "movq (%%"REG_c", %1), %%mm4 \n\t" // line 6
  452. "movq %%mm3, %%mm5 \n\t" // line 5
  453. "psubusb %%mm4, %%mm3 \n\t"
  454. "psubusb %%mm5, %%mm4 \n\t"
  455. "por %%mm4, %%mm3 \n\t" // |l5 - l6|
  456. PAVGB(%%mm3, %%mm0) // (|l2 - l3| + |l5 - l6|)/2
  457. "movq %%mm2, %%mm1 \n\t" // line 4
  458. "psubusb %%mm5, %%mm2 \n\t"
  459. "movq %%mm2, %%mm4 \n\t"
  460. "pcmpeqb %%mm7, %%mm2 \n\t" // (l4 - l5) <= 0 ? -1 : 0
  461. "psubusb %%mm1, %%mm5 \n\t"
  462. "por %%mm5, %%mm4 \n\t" // |l4 - l5|
  463. "psubusb %%mm0, %%mm4 \n\t" //d = MAX(0, |l4-l5| - (|l2-l3| + |l5-l6|)/2)
  464. "movq %%mm4, %%mm3 \n\t" // d
  465. "movq %2, %%mm0 \n\t"
  466. "paddusb %%mm0, %%mm0 \n\t"
  467. "psubusb %%mm0, %%mm4 \n\t"
  468. "pcmpeqb %%mm7, %%mm4 \n\t" // d <= QP ? -1 : 0
  469. "psubusb "MANGLE(b01)", %%mm3 \n\t"
  470. "pand %%mm4, %%mm3 \n\t" // d <= QP ? d : 0
  471. PAVGB(%%mm7, %%mm3) // d/2
  472. "movq %%mm3, %%mm1 \n\t" // d/2
  473. PAVGB(%%mm7, %%mm3) // d/4
  474. PAVGB(%%mm1, %%mm3) // 3*d/8
  475. "movq (%0, %1, 4), %%mm0 \n\t" // line 4
  476. "pxor %%mm2, %%mm0 \n\t" //(l4 - l5) <= 0 ? -l4-1 : l4
  477. "psubusb %%mm3, %%mm0 \n\t"
  478. "pxor %%mm2, %%mm0 \n\t"
  479. "movq %%mm0, (%0, %1, 4) \n\t" // line 4
  480. "movq (%%"REG_c"), %%mm0 \n\t" // line 5
  481. "pxor %%mm2, %%mm0 \n\t" //(l4 - l5) <= 0 ? -l5-1 : l5
  482. "paddusb %%mm3, %%mm0 \n\t"
  483. "pxor %%mm2, %%mm0 \n\t"
  484. "movq %%mm0, (%%"REG_c") \n\t" // line 5
  485. PAVGB(%%mm7, %%mm1) // d/4
  486. "movq (%%"REG_a", %1, 2), %%mm0 \n\t" // line 3
  487. "pxor %%mm2, %%mm0 \n\t" //(l4 - l5) <= 0 ? -l4-1 : l4
  488. "psubusb %%mm1, %%mm0 \n\t"
  489. "pxor %%mm2, %%mm0 \n\t"
  490. "movq %%mm0, (%%"REG_a", %1, 2) \n\t" // line 3
  491. "movq (%%"REG_c", %1), %%mm0 \n\t" // line 6
  492. "pxor %%mm2, %%mm0 \n\t" //(l4 - l5) <= 0 ? -l5-1 : l5
  493. "paddusb %%mm1, %%mm0 \n\t"
  494. "pxor %%mm2, %%mm0 \n\t"
  495. "movq %%mm0, (%%"REG_c", %1) \n\t" // line 6
  496. PAVGB(%%mm7, %%mm1) // d/8
  497. "movq (%%"REG_a", %1), %%mm0 \n\t" // line 2
  498. "pxor %%mm2, %%mm0 \n\t" //(l4 - l5) <= 0 ? -l2-1 : l2
  499. "psubusb %%mm1, %%mm0 \n\t"
  500. "pxor %%mm2, %%mm0 \n\t"
  501. "movq %%mm0, (%%"REG_a", %1) \n\t" // line 2
  502. "movq (%%"REG_c", %1, 2), %%mm0 \n\t" // line 7
  503. "pxor %%mm2, %%mm0 \n\t" //(l4 - l5) <= 0 ? -l7-1 : l7
  504. "paddusb %%mm1, %%mm0 \n\t"
  505. "pxor %%mm2, %%mm0 \n\t"
  506. "movq %%mm0, (%%"REG_c", %1, 2) \n\t" // line 7
  507. :
  508. : "r" (src), "r" ((long)stride), "m" (co->pQPb)
  509. : "%"REG_a, "%"REG_c
  510. );
  511. #else
  512. const int l1= stride;
  513. const int l2= stride + l1;
  514. const int l3= stride + l2;
  515. const int l4= stride + l3;
  516. const int l5= stride + l4;
  517. const int l6= stride + l5;
  518. const int l7= stride + l6;
  519. // const int l8= stride + l7;
  520. // const int l9= stride + l8;
  521. int x;
  522. src+= stride*3;
  523. for(x=0; x<BLOCK_SIZE; x++)
  524. {
  525. int a= src[l3] - src[l4];
  526. int b= src[l4] - src[l5];
  527. int c= src[l5] - src[l6];
  528. int d= ABS(b) - ((ABS(a) + ABS(c))>>1);
  529. d= MAX(d, 0);
  530. if(d < co->QP*2)
  531. {
  532. int v = d * SIGN(-b);
  533. src[l2] +=v>>3;
  534. src[l3] +=v>>2;
  535. src[l4] +=(3*v)>>3;
  536. src[l5] -=(3*v)>>3;
  537. src[l6] -=v>>2;
  538. src[l7] -=v>>3;
  539. }
  540. src++;
  541. }
  542. #endif
  543. }
  544. #ifndef HAVE_ALTIVEC
  545. static inline void RENAME(doVertDefFilter)(uint8_t src[], int stride, PPContext *c)
  546. {
  547. #if defined (HAVE_MMX2) || defined (HAVE_3DNOW)
  548. /*
  549. uint8_t tmp[16];
  550. const int l1= stride;
  551. const int l2= stride + l1;
  552. const int l3= stride + l2;
  553. const int l4= (int)tmp - (int)src - stride*3;
  554. const int l5= (int)tmp - (int)src - stride*3 + 8;
  555. const int l6= stride*3 + l3;
  556. const int l7= stride + l6;
  557. const int l8= stride + l7;
  558. memcpy(tmp, src+stride*7, 8);
  559. memcpy(tmp+8, src+stride*8, 8);
  560. */
  561. src+= stride*4;
  562. asm volatile(
  563. #if 0 //sligtly more accurate and slightly slower
  564. "pxor %%mm7, %%mm7 \n\t" // 0
  565. "lea (%0, %1), %%"REG_a" \n\t"
  566. "lea (%%"REG_a", %1, 4), %%"REG_c" \n\t"
  567. // 0 1 2 3 4 5 6 7
  568. // %0 %0+%1 %0+2%1 eax+2%1 %0+4%1 eax+4%1 ecx+%1 ecx+2%1
  569. // %0 eax eax+%1 eax+2%1 %0+4%1 ecx ecx+%1 ecx+2%1
  570. "movq (%0, %1, 2), %%mm0 \n\t" // l2
  571. "movq (%0), %%mm1 \n\t" // l0
  572. "movq %%mm0, %%mm2 \n\t" // l2
  573. PAVGB(%%mm7, %%mm0) // ~l2/2
  574. PAVGB(%%mm1, %%mm0) // ~(l2 + 2l0)/4
  575. PAVGB(%%mm2, %%mm0) // ~(5l2 + 2l0)/8
  576. "movq (%%"REG_a"), %%mm1 \n\t" // l1
  577. "movq (%%"REG_a", %1, 2), %%mm3 \n\t" // l3
  578. "movq %%mm1, %%mm4 \n\t" // l1
  579. PAVGB(%%mm7, %%mm1) // ~l1/2
  580. PAVGB(%%mm3, %%mm1) // ~(l1 + 2l3)/4
  581. PAVGB(%%mm4, %%mm1) // ~(5l1 + 2l3)/8
  582. "movq %%mm0, %%mm4 \n\t" // ~(5l2 + 2l0)/8
  583. "psubusb %%mm1, %%mm0 \n\t"
  584. "psubusb %%mm4, %%mm1 \n\t"
  585. "por %%mm0, %%mm1 \n\t" // ~|2l0 - 5l1 + 5l2 - 2l3|/8
  586. // mm1= |lenergy|, mm2= l2, mm3= l3, mm7=0
  587. "movq (%0, %1, 4), %%mm0 \n\t" // l4
  588. "movq %%mm0, %%mm4 \n\t" // l4
  589. PAVGB(%%mm7, %%mm0) // ~l4/2
  590. PAVGB(%%mm2, %%mm0) // ~(l4 + 2l2)/4
  591. PAVGB(%%mm4, %%mm0) // ~(5l4 + 2l2)/8
  592. "movq (%%"REG_c"), %%mm2 \n\t" // l5
  593. "movq %%mm3, %%mm5 \n\t" // l3
  594. PAVGB(%%mm7, %%mm3) // ~l3/2
  595. PAVGB(%%mm2, %%mm3) // ~(l3 + 2l5)/4
  596. PAVGB(%%mm5, %%mm3) // ~(5l3 + 2l5)/8
  597. "movq %%mm0, %%mm6 \n\t" // ~(5l4 + 2l2)/8
  598. "psubusb %%mm3, %%mm0 \n\t"
  599. "psubusb %%mm6, %%mm3 \n\t"
  600. "por %%mm0, %%mm3 \n\t" // ~|2l2 - 5l3 + 5l4 - 2l5|/8
  601. "pcmpeqb %%mm7, %%mm0 \n\t" // SIGN(2l2 - 5l3 + 5l4 - 2l5)
  602. // mm0= SIGN(menergy), mm1= |lenergy|, mm2= l5, mm3= |menergy|, mm4=l4, mm5= l3, mm7=0
  603. "movq (%%"REG_c", %1), %%mm6 \n\t" // l6
  604. "movq %%mm6, %%mm5 \n\t" // l6
  605. PAVGB(%%mm7, %%mm6) // ~l6/2
  606. PAVGB(%%mm4, %%mm6) // ~(l6 + 2l4)/4
  607. PAVGB(%%mm5, %%mm6) // ~(5l6 + 2l4)/8
  608. "movq (%%"REG_c", %1, 2), %%mm5 \n\t" // l7
  609. "movq %%mm2, %%mm4 \n\t" // l5
  610. PAVGB(%%mm7, %%mm2) // ~l5/2
  611. PAVGB(%%mm5, %%mm2) // ~(l5 + 2l7)/4
  612. PAVGB(%%mm4, %%mm2) // ~(5l5 + 2l7)/8
  613. "movq %%mm6, %%mm4 \n\t" // ~(5l6 + 2l4)/8
  614. "psubusb %%mm2, %%mm6 \n\t"
  615. "psubusb %%mm4, %%mm2 \n\t"
  616. "por %%mm6, %%mm2 \n\t" // ~|2l4 - 5l5 + 5l6 - 2l7|/8
  617. // mm0= SIGN(menergy), mm1= |lenergy|/8, mm2= |renergy|/8, mm3= |menergy|/8, mm7=0
  618. PMINUB(%%mm2, %%mm1, %%mm4) // MIN(|lenergy|,|renergy|)/8
  619. "movq %2, %%mm4 \n\t" // QP //FIXME QP+1 ?
  620. "paddusb "MANGLE(b01)", %%mm4 \n\t"
  621. "pcmpgtb %%mm3, %%mm4 \n\t" // |menergy|/8 < QP
  622. "psubusb %%mm1, %%mm3 \n\t" // d=|menergy|/8-MIN(|lenergy|,|renergy|)/8
  623. "pand %%mm4, %%mm3 \n\t"
  624. "movq %%mm3, %%mm1 \n\t"
  625. // "psubusb "MANGLE(b01)", %%mm3 \n\t"
  626. PAVGB(%%mm7, %%mm3)
  627. PAVGB(%%mm7, %%mm3)
  628. "paddusb %%mm1, %%mm3 \n\t"
  629. // "paddusb "MANGLE(b01)", %%mm3 \n\t"
  630. "movq (%%"REG_a", %1, 2), %%mm6 \n\t" //l3
  631. "movq (%0, %1, 4), %%mm5 \n\t" //l4
  632. "movq (%0, %1, 4), %%mm4 \n\t" //l4
  633. "psubusb %%mm6, %%mm5 \n\t"
  634. "psubusb %%mm4, %%mm6 \n\t"
  635. "por %%mm6, %%mm5 \n\t" // |l3-l4|
  636. "pcmpeqb %%mm7, %%mm6 \n\t" // SIGN(l3-l4)
  637. "pxor %%mm6, %%mm0 \n\t"
  638. "pand %%mm0, %%mm3 \n\t"
  639. PMINUB(%%mm5, %%mm3, %%mm0)
  640. "psubusb "MANGLE(b01)", %%mm3 \n\t"
  641. PAVGB(%%mm7, %%mm3)
  642. "movq (%%"REG_a", %1, 2), %%mm0 \n\t"
  643. "movq (%0, %1, 4), %%mm2 \n\t"
  644. "pxor %%mm6, %%mm0 \n\t"
  645. "pxor %%mm6, %%mm2 \n\t"
  646. "psubb %%mm3, %%mm0 \n\t"
  647. "paddb %%mm3, %%mm2 \n\t"
  648. "pxor %%mm6, %%mm0 \n\t"
  649. "pxor %%mm6, %%mm2 \n\t"
  650. "movq %%mm0, (%%"REG_a", %1, 2) \n\t"
  651. "movq %%mm2, (%0, %1, 4) \n\t"
  652. #endif
  653. "lea (%0, %1), %%"REG_a" \n\t"
  654. "pcmpeqb %%mm6, %%mm6 \n\t" // -1
  655. // 0 1 2 3 4 5 6 7
  656. // %0 %0+%1 %0+2%1 eax+2%1 %0+4%1 eax+4%1 ecx+%1 ecx+2%1
  657. // %0 eax eax+%1 eax+2%1 %0+4%1 ecx ecx+%1 ecx+2%1
  658. "movq (%%"REG_a", %1, 2), %%mm1 \n\t" // l3
  659. "movq (%0, %1, 4), %%mm0 \n\t" // l4
  660. "pxor %%mm6, %%mm1 \n\t" // -l3-1
  661. PAVGB(%%mm1, %%mm0) // -q+128 = (l4-l3+256)/2
  662. // mm1=-l3-1, mm0=128-q
  663. "movq (%%"REG_a", %1, 4), %%mm2 \n\t" // l5
  664. "movq (%%"REG_a", %1), %%mm3 \n\t" // l2
  665. "pxor %%mm6, %%mm2 \n\t" // -l5-1
  666. "movq %%mm2, %%mm5 \n\t" // -l5-1
  667. "movq "MANGLE(b80)", %%mm4 \n\t" // 128
  668. "lea (%%"REG_a", %1, 4), %%"REG_c" \n\t"
  669. PAVGB(%%mm3, %%mm2) // (l2-l5+256)/2
  670. PAVGB(%%mm0, %%mm4) // ~(l4-l3)/4 + 128
  671. PAVGB(%%mm2, %%mm4) // ~(l2-l5)/4 +(l4-l3)/8 + 128
  672. PAVGB(%%mm0, %%mm4) // ~(l2-l5)/8 +5(l4-l3)/16 + 128
  673. // mm1=-l3-1, mm0=128-q, mm3=l2, mm4=menergy/16 + 128, mm5= -l5-1
  674. "movq (%%"REG_a"), %%mm2 \n\t" // l1
  675. "pxor %%mm6, %%mm2 \n\t" // -l1-1
  676. PAVGB(%%mm3, %%mm2) // (l2-l1+256)/2
  677. PAVGB((%0), %%mm1) // (l0-l3+256)/2
  678. "movq "MANGLE(b80)", %%mm3 \n\t" // 128
  679. PAVGB(%%mm2, %%mm3) // ~(l2-l1)/4 + 128
  680. PAVGB(%%mm1, %%mm3) // ~(l0-l3)/4 +(l2-l1)/8 + 128
  681. PAVGB(%%mm2, %%mm3) // ~(l0-l3)/8 +5(l2-l1)/16 + 128
  682. // mm0=128-q, mm3=lenergy/16 + 128, mm4= menergy/16 + 128, mm5= -l5-1
  683. PAVGB((%%REGc, %1), %%mm5) // (l6-l5+256)/2
  684. "movq (%%"REG_c", %1, 2), %%mm1 \n\t" // l7
  685. "pxor %%mm6, %%mm1 \n\t" // -l7-1
  686. PAVGB((%0, %1, 4), %%mm1) // (l4-l7+256)/2
  687. "movq "MANGLE(b80)", %%mm2 \n\t" // 128
  688. PAVGB(%%mm5, %%mm2) // ~(l6-l5)/4 + 128
  689. PAVGB(%%mm1, %%mm2) // ~(l4-l7)/4 +(l6-l5)/8 + 128
  690. PAVGB(%%mm5, %%mm2) // ~(l4-l7)/8 +5(l6-l5)/16 + 128
  691. // mm0=128-q, mm2=renergy/16 + 128, mm3=lenergy/16 + 128, mm4= menergy/16 + 128
  692. "movq "MANGLE(b00)", %%mm1 \n\t" // 0
  693. "movq "MANGLE(b00)", %%mm5 \n\t" // 0
  694. "psubb %%mm2, %%mm1 \n\t" // 128 - renergy/16
  695. "psubb %%mm3, %%mm5 \n\t" // 128 - lenergy/16
  696. PMAXUB(%%mm1, %%mm2) // 128 + |renergy/16|
  697. PMAXUB(%%mm5, %%mm3) // 128 + |lenergy/16|
  698. PMINUB(%%mm2, %%mm3, %%mm1) // 128 + MIN(|lenergy|,|renergy|)/16
  699. // mm0=128-q, mm3=128 + MIN(|lenergy|,|renergy|)/16, mm4= menergy/16 + 128
  700. "movq "MANGLE(b00)", %%mm7 \n\t" // 0
  701. "movq %2, %%mm2 \n\t" // QP
  702. PAVGB(%%mm6, %%mm2) // 128 + QP/2
  703. "psubb %%mm6, %%mm2 \n\t"
  704. "movq %%mm4, %%mm1 \n\t"
  705. "pcmpgtb %%mm7, %%mm1 \n\t" // SIGN(menergy)
  706. "pxor %%mm1, %%mm4 \n\t"
  707. "psubb %%mm1, %%mm4 \n\t" // 128 + |menergy|/16
  708. "pcmpgtb %%mm4, %%mm2 \n\t" // |menergy|/16 < QP/2
  709. "psubusb %%mm3, %%mm4 \n\t" //d=|menergy|/16 - MIN(|lenergy|,|renergy|)/16
  710. // mm0=128-q, mm1= SIGN(menergy), mm2= |menergy|/16 < QP/2, mm4= d/16
  711. "movq %%mm4, %%mm3 \n\t" // d
  712. "psubusb "MANGLE(b01)", %%mm4 \n\t"
  713. PAVGB(%%mm7, %%mm4) // d/32
  714. PAVGB(%%mm7, %%mm4) // (d + 32)/64
  715. "paddb %%mm3, %%mm4 \n\t" // 5d/64
  716. "pand %%mm2, %%mm4 \n\t"
  717. "movq "MANGLE(b80)", %%mm5 \n\t" // 128
  718. "psubb %%mm0, %%mm5 \n\t" // q
  719. "paddsb %%mm6, %%mm5 \n\t" // fix bad rounding
  720. "pcmpgtb %%mm5, %%mm7 \n\t" // SIGN(q)
  721. "pxor %%mm7, %%mm5 \n\t"
  722. PMINUB(%%mm5, %%mm4, %%mm3) // MIN(|q|, 5d/64)
  723. "pxor %%mm1, %%mm7 \n\t" // SIGN(d*q)
  724. "pand %%mm7, %%mm4 \n\t"
  725. "movq (%%"REG_a", %1, 2), %%mm0 \n\t"
  726. "movq (%0, %1, 4), %%mm2 \n\t"
  727. "pxor %%mm1, %%mm0 \n\t"
  728. "pxor %%mm1, %%mm2 \n\t"
  729. "paddb %%mm4, %%mm0 \n\t"
  730. "psubb %%mm4, %%mm2 \n\t"
  731. "pxor %%mm1, %%mm0 \n\t"
  732. "pxor %%mm1, %%mm2 \n\t"
  733. "movq %%mm0, (%%"REG_a", %1, 2) \n\t"
  734. "movq %%mm2, (%0, %1, 4) \n\t"
  735. :
  736. : "r" (src), "r" ((long)stride), "m" (c->pQPb)
  737. : "%"REG_a, "%"REG_c
  738. );
  739. /*
  740. {
  741. int x;
  742. src-= stride;
  743. for(x=0; x<BLOCK_SIZE; x++)
  744. {
  745. const int middleEnergy= 5*(src[l5] - src[l4]) + 2*(src[l3] - src[l6]);
  746. if(ABS(middleEnergy)< 8*QP)
  747. {
  748. const int q=(src[l4] - src[l5])/2;
  749. const int leftEnergy= 5*(src[l3] - src[l2]) + 2*(src[l1] - src[l4]);
  750. const int rightEnergy= 5*(src[l7] - src[l6]) + 2*(src[l5] - src[l8]);
  751. int d= ABS(middleEnergy) - MIN( ABS(leftEnergy), ABS(rightEnergy) );
  752. d= MAX(d, 0);
  753. d= (5*d + 32) >> 6;
  754. d*= SIGN(-middleEnergy);
  755. if(q>0)
  756. {
  757. d= d<0 ? 0 : d;
  758. d= d>q ? q : d;
  759. }
  760. else
  761. {
  762. d= d>0 ? 0 : d;
  763. d= d<q ? q : d;
  764. }
  765. src[l4]-= d;
  766. src[l5]+= d;
  767. }
  768. src++;
  769. }
  770. src-=8;
  771. for(x=0; x<8; x++)
  772. {
  773. int y;
  774. for(y=4; y<6; y++)
  775. {
  776. int d= src[x+y*stride] - tmp[x+(y-4)*8];
  777. int ad= ABS(d);
  778. static int max=0;
  779. static int sum=0;
  780. static int num=0;
  781. static int bias=0;
  782. if(max<ad) max=ad;
  783. sum+= ad>3 ? 1 : 0;
  784. if(ad>3)
  785. {
  786. src[0] = src[7] = src[stride*7] = src[(stride+1)*7]=255;
  787. }
  788. if(y==4) bias+=d;
  789. num++;
  790. if(num%1000000 == 0)
  791. {
  792. printf(" %d %d %d %d\n", num, sum, max, bias);
  793. }
  794. }
  795. }
  796. }
  797. */
  798. #elif defined (HAVE_MMX)
  799. src+= stride*4;
  800. asm volatile(
  801. "pxor %%mm7, %%mm7 \n\t"
  802. "lea -40(%%"REG_SP"), %%"REG_c" \n\t" // make space for 4 8-byte vars
  803. "and "ALIGN_MASK", %%"REG_c" \n\t" // align
  804. // 0 1 2 3 4 5 6 7
  805. // %0 %0+%1 %0+2%1 eax+2%1 %0+4%1 eax+4%1 edx+%1 edx+2%1
  806. // %0 eax eax+%1 eax+2%1 %0+4%1 edx edx+%1 edx+2%1
  807. "movq (%0), %%mm0 \n\t"
  808. "movq %%mm0, %%mm1 \n\t"
  809. "punpcklbw %%mm7, %%mm0 \n\t" // low part of line 0
  810. "punpckhbw %%mm7, %%mm1 \n\t" // high part of line 0
  811. "movq (%0, %1), %%mm2 \n\t"
  812. "lea (%0, %1, 2), %%"REG_a" \n\t"
  813. "movq %%mm2, %%mm3 \n\t"
  814. "punpcklbw %%mm7, %%mm2 \n\t" // low part of line 1
  815. "punpckhbw %%mm7, %%mm3 \n\t" // high part of line 1
  816. "movq (%%"REG_a"), %%mm4 \n\t"
  817. "movq %%mm4, %%mm5 \n\t"
  818. "punpcklbw %%mm7, %%mm4 \n\t" // low part of line 2
  819. "punpckhbw %%mm7, %%mm5 \n\t" // high part of line 2
  820. "paddw %%mm0, %%mm0 \n\t" // 2L0
  821. "paddw %%mm1, %%mm1 \n\t" // 2H0
  822. "psubw %%mm4, %%mm2 \n\t" // L1 - L2
  823. "psubw %%mm5, %%mm3 \n\t" // H1 - H2
  824. "psubw %%mm2, %%mm0 \n\t" // 2L0 - L1 + L2
  825. "psubw %%mm3, %%mm1 \n\t" // 2H0 - H1 + H2
  826. "psllw $2, %%mm2 \n\t" // 4L1 - 4L2
  827. "psllw $2, %%mm3 \n\t" // 4H1 - 4H2
  828. "psubw %%mm2, %%mm0 \n\t" // 2L0 - 5L1 + 5L2
  829. "psubw %%mm3, %%mm1 \n\t" // 2H0 - 5H1 + 5H2
  830. "movq (%%"REG_a", %1), %%mm2 \n\t"
  831. "movq %%mm2, %%mm3 \n\t"
  832. "punpcklbw %%mm7, %%mm2 \n\t" // L3
  833. "punpckhbw %%mm7, %%mm3 \n\t" // H3
  834. "psubw %%mm2, %%mm0 \n\t" // 2L0 - 5L1 + 5L2 - L3
  835. "psubw %%mm3, %%mm1 \n\t" // 2H0 - 5H1 + 5H2 - H3
  836. "psubw %%mm2, %%mm0 \n\t" // 2L0 - 5L1 + 5L2 - 2L3
  837. "psubw %%mm3, %%mm1 \n\t" // 2H0 - 5H1 + 5H2 - 2H3
  838. "movq %%mm0, (%%"REG_c") \n\t" // 2L0 - 5L1 + 5L2 - 2L3
  839. "movq %%mm1, 8(%%"REG_c") \n\t" // 2H0 - 5H1 + 5H2 - 2H3
  840. "movq (%%"REG_a", %1, 2), %%mm0 \n\t"
  841. "movq %%mm0, %%mm1 \n\t"
  842. "punpcklbw %%mm7, %%mm0 \n\t" // L4
  843. "punpckhbw %%mm7, %%mm1 \n\t" // H4
  844. "psubw %%mm0, %%mm2 \n\t" // L3 - L4
  845. "psubw %%mm1, %%mm3 \n\t" // H3 - H4
  846. "movq %%mm2, 16(%%"REG_c") \n\t" // L3 - L4
  847. "movq %%mm3, 24(%%"REG_c") \n\t" // H3 - H4
  848. "paddw %%mm4, %%mm4 \n\t" // 2L2
  849. "paddw %%mm5, %%mm5 \n\t" // 2H2
  850. "psubw %%mm2, %%mm4 \n\t" // 2L2 - L3 + L4
  851. "psubw %%mm3, %%mm5 \n\t" // 2H2 - H3 + H4
  852. "lea (%%"REG_a", %1), %0 \n\t"
  853. "psllw $2, %%mm2 \n\t" // 4L3 - 4L4
  854. "psllw $2, %%mm3 \n\t" // 4H3 - 4H4
  855. "psubw %%mm2, %%mm4 \n\t" // 2L2 - 5L3 + 5L4
  856. "psubw %%mm3, %%mm5 \n\t" // 2H2 - 5H3 + 5H4
  857. //50 opcodes so far
  858. "movq (%0, %1, 2), %%mm2 \n\t"
  859. "movq %%mm2, %%mm3 \n\t"
  860. "punpcklbw %%mm7, %%mm2 \n\t" // L5
  861. "punpckhbw %%mm7, %%mm3 \n\t" // H5
  862. "psubw %%mm2, %%mm4 \n\t" // 2L2 - 5L3 + 5L4 - L5
  863. "psubw %%mm3, %%mm5 \n\t" // 2H2 - 5H3 + 5H4 - H5
  864. "psubw %%mm2, %%mm4 \n\t" // 2L2 - 5L3 + 5L4 - 2L5
  865. "psubw %%mm3, %%mm5 \n\t" // 2H2 - 5H3 + 5H4 - 2H5
  866. "movq (%%"REG_a", %1, 4), %%mm6 \n\t"
  867. "punpcklbw %%mm7, %%mm6 \n\t" // L6
  868. "psubw %%mm6, %%mm2 \n\t" // L5 - L6
  869. "movq (%%"REG_a", %1, 4), %%mm6 \n\t"
  870. "punpckhbw %%mm7, %%mm6 \n\t" // H6
  871. "psubw %%mm6, %%mm3 \n\t" // H5 - H6
  872. "paddw %%mm0, %%mm0 \n\t" // 2L4
  873. "paddw %%mm1, %%mm1 \n\t" // 2H4
  874. "psubw %%mm2, %%mm0 \n\t" // 2L4 - L5 + L6
  875. "psubw %%mm3, %%mm1 \n\t" // 2H4 - H5 + H6
  876. "psllw $2, %%mm2 \n\t" // 4L5 - 4L6
  877. "psllw $2, %%mm3 \n\t" // 4H5 - 4H6
  878. "psubw %%mm2, %%mm0 \n\t" // 2L4 - 5L5 + 5L6
  879. "psubw %%mm3, %%mm1 \n\t" // 2H4 - 5H5 + 5H6
  880. "movq (%0, %1, 4), %%mm2 \n\t"
  881. "movq %%mm2, %%mm3 \n\t"
  882. "punpcklbw %%mm7, %%mm2 \n\t" // L7
  883. "punpckhbw %%mm7, %%mm3 \n\t" // H7
  884. "paddw %%mm2, %%mm2 \n\t" // 2L7
  885. "paddw %%mm3, %%mm3 \n\t" // 2H7
  886. "psubw %%mm2, %%mm0 \n\t" // 2L4 - 5L5 + 5L6 - 2L7
  887. "psubw %%mm3, %%mm1 \n\t" // 2H4 - 5H5 + 5H6 - 2H7
  888. "movq (%%"REG_c"), %%mm2 \n\t" // 2L0 - 5L1 + 5L2 - 2L3
  889. "movq 8(%%"REG_c"), %%mm3 \n\t" // 2H0 - 5H1 + 5H2 - 2H3
  890. #ifdef HAVE_MMX2
  891. "movq %%mm7, %%mm6 \n\t" // 0
  892. "psubw %%mm0, %%mm6 \n\t"
  893. "pmaxsw %%mm6, %%mm0 \n\t" // |2L4 - 5L5 + 5L6 - 2L7|
  894. "movq %%mm7, %%mm6 \n\t" // 0
  895. "psubw %%mm1, %%mm6 \n\t"
  896. "pmaxsw %%mm6, %%mm1 \n\t" // |2H4 - 5H5 + 5H6 - 2H7|
  897. "movq %%mm7, %%mm6 \n\t" // 0
  898. "psubw %%mm2, %%mm6 \n\t"
  899. "pmaxsw %%mm6, %%mm2 \n\t" // |2L0 - 5L1 + 5L2 - 2L3|
  900. "movq %%mm7, %%mm6 \n\t" // 0
  901. "psubw %%mm3, %%mm6 \n\t"
  902. "pmaxsw %%mm6, %%mm3 \n\t" // |2H0 - 5H1 + 5H2 - 2H3|
  903. #else
  904. "movq %%mm7, %%mm6 \n\t" // 0
  905. "pcmpgtw %%mm0, %%mm6 \n\t"
  906. "pxor %%mm6, %%mm0 \n\t"
  907. "psubw %%mm6, %%mm0 \n\t" // |2L4 - 5L5 + 5L6 - 2L7|
  908. "movq %%mm7, %%mm6 \n\t" // 0
  909. "pcmpgtw %%mm1, %%mm6 \n\t"
  910. "pxor %%mm6, %%mm1 \n\t"
  911. "psubw %%mm6, %%mm1 \n\t" // |2H4 - 5H5 + 5H6 - 2H7|
  912. "movq %%mm7, %%mm6 \n\t" // 0
  913. "pcmpgtw %%mm2, %%mm6 \n\t"
  914. "pxor %%mm6, %%mm2 \n\t"
  915. "psubw %%mm6, %%mm2 \n\t" // |2L0 - 5L1 + 5L2 - 2L3|
  916. "movq %%mm7, %%mm6 \n\t" // 0
  917. "pcmpgtw %%mm3, %%mm6 \n\t"
  918. "pxor %%mm6, %%mm3 \n\t"
  919. "psubw %%mm6, %%mm3 \n\t" // |2H0 - 5H1 + 5H2 - 2H3|
  920. #endif
  921. #ifdef HAVE_MMX2
  922. "pminsw %%mm2, %%mm0 \n\t"
  923. "pminsw %%mm3, %%mm1 \n\t"
  924. #else
  925. "movq %%mm0, %%mm6 \n\t"
  926. "psubusw %%mm2, %%mm6 \n\t"
  927. "psubw %%mm6, %%mm0 \n\t"
  928. "movq %%mm1, %%mm6 \n\t"
  929. "psubusw %%mm3, %%mm6 \n\t"
  930. "psubw %%mm6, %%mm1 \n\t"
  931. #endif
  932. "movd %2, %%mm2 \n\t" // QP
  933. "punpcklbw %%mm7, %%mm2 \n\t"
  934. "movq %%mm7, %%mm6 \n\t" // 0
  935. "pcmpgtw %%mm4, %%mm6 \n\t" // sign(2L2 - 5L3 + 5L4 - 2L5)
  936. "pxor %%mm6, %%mm4 \n\t"
  937. "psubw %%mm6, %%mm4 \n\t" // |2L2 - 5L3 + 5L4 - 2L5|
  938. "pcmpgtw %%mm5, %%mm7 \n\t" // sign(2H2 - 5H3 + 5H4 - 2H5)
  939. "pxor %%mm7, %%mm5 \n\t"
  940. "psubw %%mm7, %%mm5 \n\t" // |2H2 - 5H3 + 5H4 - 2H5|
  941. // 100 opcodes
  942. "psllw $3, %%mm2 \n\t" // 8QP
  943. "movq %%mm2, %%mm3 \n\t" // 8QP
  944. "pcmpgtw %%mm4, %%mm2 \n\t"
  945. "pcmpgtw %%mm5, %%mm3 \n\t"
  946. "pand %%mm2, %%mm4 \n\t"
  947. "pand %%mm3, %%mm5 \n\t"
  948. "psubusw %%mm0, %%mm4 \n\t" // hd
  949. "psubusw %%mm1, %%mm5 \n\t" // ld
  950. "movq "MANGLE(w05)", %%mm2 \n\t" // 5
  951. "pmullw %%mm2, %%mm4 \n\t"
  952. "pmullw %%mm2, %%mm5 \n\t"
  953. "movq "MANGLE(w20)", %%mm2 \n\t" // 32
  954. "paddw %%mm2, %%mm4 \n\t"
  955. "paddw %%mm2, %%mm5 \n\t"
  956. "psrlw $6, %%mm4 \n\t"
  957. "psrlw $6, %%mm5 \n\t"
  958. "movq 16(%%"REG_c"), %%mm0 \n\t" // L3 - L4
  959. "movq 24(%%"REG_c"), %%mm1 \n\t" // H3 - H4
  960. "pxor %%mm2, %%mm2 \n\t"
  961. "pxor %%mm3, %%mm3 \n\t"
  962. "pcmpgtw %%mm0, %%mm2 \n\t" // sign (L3-L4)
  963. "pcmpgtw %%mm1, %%mm3 \n\t" // sign (H3-H4)
  964. "pxor %%mm2, %%mm0 \n\t"
  965. "pxor %%mm3, %%mm1 \n\t"
  966. "psubw %%mm2, %%mm0 \n\t" // |L3-L4|
  967. "psubw %%mm3, %%mm1 \n\t" // |H3-H4|
  968. "psrlw $1, %%mm0 \n\t" // |L3 - L4|/2
  969. "psrlw $1, %%mm1 \n\t" // |H3 - H4|/2
  970. "pxor %%mm6, %%mm2 \n\t"
  971. "pxor %%mm7, %%mm3 \n\t"
  972. "pand %%mm2, %%mm4 \n\t"
  973. "pand %%mm3, %%mm5 \n\t"
  974. #ifdef HAVE_MMX2
  975. "pminsw %%mm0, %%mm4 \n\t"
  976. "pminsw %%mm1, %%mm5 \n\t"
  977. #else
  978. "movq %%mm4, %%mm2 \n\t"
  979. "psubusw %%mm0, %%mm2 \n\t"
  980. "psubw %%mm2, %%mm4 \n\t"
  981. "movq %%mm5, %%mm2 \n\t"
  982. "psubusw %%mm1, %%mm2 \n\t"
  983. "psubw %%mm2, %%mm5 \n\t"
  984. #endif
  985. "pxor %%mm6, %%mm4 \n\t"
  986. "pxor %%mm7, %%mm5 \n\t"
  987. "psubw %%mm6, %%mm4 \n\t"
  988. "psubw %%mm7, %%mm5 \n\t"
  989. "packsswb %%mm5, %%mm4 \n\t"
  990. "movq (%0), %%mm0 \n\t"
  991. "paddb %%mm4, %%mm0 \n\t"
  992. "movq %%mm0, (%0) \n\t"
  993. "movq (%0, %1), %%mm0 \n\t"
  994. "psubb %%mm4, %%mm0 \n\t"
  995. "movq %%mm0, (%0, %1) \n\t"
  996. : "+r" (src)
  997. : "r" ((long)stride), "m" (c->pQPb)
  998. : "%"REG_a, "%"REG_c
  999. );
  1000. #else
  1001. const int l1= stride;
  1002. const int l2= stride + l1;
  1003. const int l3= stride + l2;
  1004. const int l4= stride + l3;
  1005. const int l5= stride + l4;
  1006. const int l6= stride + l5;
  1007. const int l7= stride + l6;
  1008. const int l8= stride + l7;
  1009. // const int l9= stride + l8;
  1010. int x;
  1011. src+= stride*3;
  1012. for(x=0; x<BLOCK_SIZE; x++)
  1013. {
  1014. const int middleEnergy= 5*(src[l5] - src[l4]) + 2*(src[l3] - src[l6]);
  1015. if(ABS(middleEnergy) < 8*c->QP)
  1016. {
  1017. const int q=(src[l4] - src[l5])/2;
  1018. const int leftEnergy= 5*(src[l3] - src[l2]) + 2*(src[l1] - src[l4]);
  1019. const int rightEnergy= 5*(src[l7] - src[l6]) + 2*(src[l5] - src[l8]);
  1020. int d= ABS(middleEnergy) - MIN( ABS(leftEnergy), ABS(rightEnergy) );
  1021. d= MAX(d, 0);
  1022. d= (5*d + 32) >> 6;
  1023. d*= SIGN(-middleEnergy);
  1024. if(q>0)
  1025. {
  1026. d= d<0 ? 0 : d;
  1027. d= d>q ? q : d;
  1028. }
  1029. else
  1030. {
  1031. d= d>0 ? 0 : d;
  1032. d= d<q ? q : d;
  1033. }
  1034. src[l4]-= d;
  1035. src[l5]+= d;
  1036. }
  1037. src++;
  1038. }
  1039. #endif
  1040. }
  1041. #endif //HAVE_ALTIVEC
  1042. #ifndef HAVE_ALTIVEC
  1043. static inline void RENAME(dering)(uint8_t src[], int stride, PPContext *c)
  1044. {
  1045. #if defined (HAVE_MMX2) || defined (HAVE_3DNOW)
  1046. asm volatile(
  1047. "pxor %%mm6, %%mm6 \n\t"
  1048. "pcmpeqb %%mm7, %%mm7 \n\t"
  1049. "movq %2, %%mm0 \n\t"
  1050. "punpcklbw %%mm6, %%mm0 \n\t"
  1051. "psrlw $1, %%mm0 \n\t"
  1052. "psubw %%mm7, %%mm0 \n\t"
  1053. "packuswb %%mm0, %%mm0 \n\t"
  1054. "movq %%mm0, %3 \n\t"
  1055. "lea (%0, %1), %%"REG_a" \n\t"
  1056. "lea (%%"REG_a", %1, 4), %%"REG_d" \n\t"
  1057. // 0 1 2 3 4 5 6 7 8 9
  1058. // %0 eax eax+%1 eax+2%1 %0+4%1 edx edx+%1 edx+2%1 %0+8%1 edx+4%1
  1059. #undef FIND_MIN_MAX
  1060. #ifdef HAVE_MMX2
  1061. #define REAL_FIND_MIN_MAX(addr)\
  1062. "movq " #addr ", %%mm0 \n\t"\
  1063. "pminub %%mm0, %%mm7 \n\t"\
  1064. "pmaxub %%mm0, %%mm6 \n\t"
  1065. #else
  1066. #define REAL_FIND_MIN_MAX(addr)\
  1067. "movq " #addr ", %%mm0 \n\t"\
  1068. "movq %%mm7, %%mm1 \n\t"\
  1069. "psubusb %%mm0, %%mm6 \n\t"\
  1070. "paddb %%mm0, %%mm6 \n\t"\
  1071. "psubusb %%mm0, %%mm1 \n\t"\
  1072. "psubb %%mm1, %%mm7 \n\t"
  1073. #endif
  1074. #define FIND_MIN_MAX(addr) REAL_FIND_MIN_MAX(addr)
  1075. FIND_MIN_MAX((%%REGa))
  1076. FIND_MIN_MAX((%%REGa, %1))
  1077. FIND_MIN_MAX((%%REGa, %1, 2))
  1078. FIND_MIN_MAX((%0, %1, 4))
  1079. FIND_MIN_MAX((%%REGd))
  1080. FIND_MIN_MAX((%%REGd, %1))
  1081. FIND_MIN_MAX((%%REGd, %1, 2))
  1082. FIND_MIN_MAX((%0, %1, 8))
  1083. "movq %%mm7, %%mm4 \n\t"
  1084. "psrlq $8, %%mm7 \n\t"
  1085. #ifdef HAVE_MMX2
  1086. "pminub %%mm4, %%mm7 \n\t" // min of pixels
  1087. "pshufw $0xF9, %%mm7, %%mm4 \n\t"
  1088. "pminub %%mm4, %%mm7 \n\t" // min of pixels
  1089. "pshufw $0xFE, %%mm7, %%mm4 \n\t"
  1090. "pminub %%mm4, %%mm7 \n\t"
  1091. #else
  1092. "movq %%mm7, %%mm1 \n\t"
  1093. "psubusb %%mm4, %%mm1 \n\t"
  1094. "psubb %%mm1, %%mm7 \n\t"
  1095. "movq %%mm7, %%mm4 \n\t"
  1096. "psrlq $16, %%mm7 \n\t"
  1097. "movq %%mm7, %%mm1 \n\t"
  1098. "psubusb %%mm4, %%mm1 \n\t"
  1099. "psubb %%mm1, %%mm7 \n\t"
  1100. "movq %%mm7, %%mm4 \n\t"
  1101. "psrlq $32, %%mm7 \n\t"
  1102. "movq %%mm7, %%mm1 \n\t"
  1103. "psubusb %%mm4, %%mm1 \n\t"
  1104. "psubb %%mm1, %%mm7 \n\t"
  1105. #endif
  1106. "movq %%mm6, %%mm4 \n\t"
  1107. "psrlq $8, %%mm6 \n\t"
  1108. #ifdef HAVE_MMX2
  1109. "pmaxub %%mm4, %%mm6 \n\t" // max of pixels
  1110. "pshufw $0xF9, %%mm6, %%mm4 \n\t"
  1111. "pmaxub %%mm4, %%mm6 \n\t"
  1112. "pshufw $0xFE, %%mm6, %%mm4 \n\t"
  1113. "pmaxub %%mm4, %%mm6 \n\t"
  1114. #else
  1115. "psubusb %%mm4, %%mm6 \n\t"
  1116. "paddb %%mm4, %%mm6 \n\t"
  1117. "movq %%mm6, %%mm4 \n\t"
  1118. "psrlq $16, %%mm6 \n\t"
  1119. "psubusb %%mm4, %%mm6 \n\t"
  1120. "paddb %%mm4, %%mm6 \n\t"
  1121. "movq %%mm6, %%mm4 \n\t"
  1122. "psrlq $32, %%mm6 \n\t"
  1123. "psubusb %%mm4, %%mm6 \n\t"
  1124. "paddb %%mm4, %%mm6 \n\t"
  1125. #endif
  1126. "movq %%mm6, %%mm0 \n\t" // max
  1127. "psubb %%mm7, %%mm6 \n\t" // max - min
  1128. "movd %%mm6, %%ecx \n\t"
  1129. "cmpb "MANGLE(deringThreshold)", %%cl \n\t"
  1130. " jb 1f \n\t"
  1131. "lea -24(%%"REG_SP"), %%"REG_c" \n\t"
  1132. "and "ALIGN_MASK", %%"REG_c" \n\t"
  1133. PAVGB(%%mm0, %%mm7) // a=(max + min)/2
  1134. "punpcklbw %%mm7, %%mm7 \n\t"
  1135. "punpcklbw %%mm7, %%mm7 \n\t"
  1136. "punpcklbw %%mm7, %%mm7 \n\t"
  1137. "movq %%mm7, (%%"REG_c") \n\t"
  1138. "movq (%0), %%mm0 \n\t" // L10
  1139. "movq %%mm0, %%mm1 \n\t" // L10
  1140. "movq %%mm0, %%mm2 \n\t" // L10
  1141. "psllq $8, %%mm1 \n\t"
  1142. "psrlq $8, %%mm2 \n\t"
  1143. "movd -4(%0), %%mm3 \n\t"
  1144. "movd 8(%0), %%mm4 \n\t"
  1145. "psrlq $24, %%mm3 \n\t"
  1146. "psllq $56, %%mm4 \n\t"
  1147. "por %%mm3, %%mm1 \n\t" // L00
  1148. "por %%mm4, %%mm2 \n\t" // L20
  1149. "movq %%mm1, %%mm3 \n\t" // L00
  1150. PAVGB(%%mm2, %%mm1) // (L20 + L00)/2
  1151. PAVGB(%%mm0, %%mm1) // (L20 + L00 + 2L10)/4
  1152. "psubusb %%mm7, %%mm0 \n\t"
  1153. "psubusb %%mm7, %%mm2 \n\t"
  1154. "psubusb %%mm7, %%mm3 \n\t"
  1155. "pcmpeqb "MANGLE(b00)", %%mm0 \n\t" // L10 > a ? 0 : -1
  1156. "pcmpeqb "MANGLE(b00)", %%mm2 \n\t" // L20 > a ? 0 : -1
  1157. "pcmpeqb "MANGLE(b00)", %%mm3 \n\t" // L00 > a ? 0 : -1
  1158. "paddb %%mm2, %%mm0 \n\t"
  1159. "paddb %%mm3, %%mm0 \n\t"
  1160. "movq (%%"REG_a"), %%mm2 \n\t" // L11
  1161. "movq %%mm2, %%mm3 \n\t" // L11
  1162. "movq %%mm2, %%mm4 \n\t" // L11
  1163. "psllq $8, %%mm3 \n\t"
  1164. "psrlq $8, %%mm4 \n\t"
  1165. "movd -4(%%"REG_a"), %%mm5 \n\t"
  1166. "movd 8(%%"REG_a"), %%mm6 \n\t"
  1167. "psrlq $24, %%mm5 \n\t"
  1168. "psllq $56, %%mm6 \n\t"
  1169. "por %%mm5, %%mm3 \n\t" // L01
  1170. "por %%mm6, %%mm4 \n\t" // L21
  1171. "movq %%mm3, %%mm5 \n\t" // L01
  1172. PAVGB(%%mm4, %%mm3) // (L21 + L01)/2
  1173. PAVGB(%%mm2, %%mm3) // (L21 + L01 + 2L11)/4
  1174. "psubusb %%mm7, %%mm2 \n\t"
  1175. "psubusb %%mm7, %%mm4 \n\t"
  1176. "psubusb %%mm7, %%mm5 \n\t"
  1177. "pcmpeqb "MANGLE(b00)", %%mm2 \n\t" // L11 > a ? 0 : -1
  1178. "pcmpeqb "MANGLE(b00)", %%mm4 \n\t" // L21 > a ? 0 : -1
  1179. "pcmpeqb "MANGLE(b00)", %%mm5 \n\t" // L01 > a ? 0 : -1
  1180. "paddb %%mm4, %%mm2 \n\t"
  1181. "paddb %%mm5, %%mm2 \n\t"
  1182. // 0, 2, 3, 1
  1183. #define REAL_DERING_CORE(dst,src,ppsx,psx,sx,pplx,plx,lx,t0,t1) \
  1184. "movq " #src ", " #sx " \n\t" /* src[0] */\
  1185. "movq " #sx ", " #lx " \n\t" /* src[0] */\
  1186. "movq " #sx ", " #t0 " \n\t" /* src[0] */\
  1187. "psllq $8, " #lx " \n\t"\
  1188. "psrlq $8, " #t0 " \n\t"\
  1189. "movd -4" #src ", " #t1 " \n\t"\
  1190. "psrlq $24, " #t1 " \n\t"\
  1191. "por " #t1 ", " #lx " \n\t" /* src[-1] */\
  1192. "movd 8" #src ", " #t1 " \n\t"\
  1193. "psllq $56, " #t1 " \n\t"\
  1194. "por " #t1 ", " #t0 " \n\t" /* src[+1] */\
  1195. "movq " #lx ", " #t1 " \n\t" /* src[-1] */\
  1196. PAVGB(t0, lx) /* (src[-1] + src[+1])/2 */\
  1197. PAVGB(sx, lx) /* (src[-1] + 2src[0] + src[+1])/4 */\
  1198. PAVGB(lx, pplx) \
  1199. "movq " #lx ", 8(%%"REG_c") \n\t"\
  1200. "movq (%%"REG_c"), " #lx " \n\t"\
  1201. "psubusb " #lx ", " #t1 " \n\t"\
  1202. "psubusb " #lx ", " #t0 " \n\t"\
  1203. "psubusb " #lx ", " #sx " \n\t"\
  1204. "movq "MANGLE(b00)", " #lx " \n\t"\
  1205. "pcmpeqb " #lx ", " #t1 " \n\t" /* src[-1] > a ? 0 : -1*/\
  1206. "pcmpeqb " #lx ", " #t0 " \n\t" /* src[+1] > a ? 0 : -1*/\
  1207. "pcmpeqb " #lx ", " #sx " \n\t" /* src[0] > a ? 0 : -1*/\
  1208. "paddb " #t1 ", " #t0 " \n\t"\
  1209. "paddb " #t0 ", " #sx " \n\t"\
  1210. \
  1211. PAVGB(plx, pplx) /* filtered */\
  1212. "movq " #dst ", " #t0 " \n\t" /* dst */\
  1213. "movq " #t0 ", " #t1 " \n\t" /* dst */\
  1214. "psubusb %3, " #t0 " \n\t"\
  1215. "paddusb %3, " #t1 " \n\t"\
  1216. PMAXUB(t0, pplx)\
  1217. PMINUB(t1, pplx, t0)\
  1218. "paddb " #sx ", " #ppsx " \n\t"\
  1219. "paddb " #psx ", " #ppsx " \n\t"\
  1220. "#paddb "MANGLE(b02)", " #ppsx " \n\t"\
  1221. "pand "MANGLE(b08)", " #ppsx " \n\t"\
  1222. "pcmpeqb " #lx ", " #ppsx " \n\t"\
  1223. "pand " #ppsx ", " #pplx " \n\t"\
  1224. "pandn " #dst ", " #ppsx " \n\t"\
  1225. "por " #pplx ", " #ppsx " \n\t"\
  1226. "movq " #ppsx ", " #dst " \n\t"\
  1227. "movq 8(%%"REG_c"), " #lx " \n\t"
  1228. #define DERING_CORE(dst,src,ppsx,psx,sx,pplx,plx,lx,t0,t1) \
  1229. REAL_DERING_CORE(dst,src,ppsx,psx,sx,pplx,plx,lx,t0,t1)
  1230. /*
  1231. 0000000
  1232. 1111111
  1233. 1111110
  1234. 1111101
  1235. 1111100
  1236. 1111011
  1237. 1111010
  1238. 1111001
  1239. 1111000
  1240. 1110111
  1241. */
  1242. //DERING_CORE(dst,src ,ppsx ,psx ,sx ,pplx ,plx ,lx ,t0 ,t1)
  1243. DERING_CORE((%%REGa),(%%REGa, %1) ,%%mm0,%%mm2,%%mm4,%%mm1,%%mm3,%%mm5,%%mm6,%%mm7)
  1244. DERING_CORE((%%REGa, %1),(%%REGa, %1, 2) ,%%mm2,%%mm4,%%mm0,%%mm3,%%mm5,%%mm1,%%mm6,%%mm7)
  1245. DERING_CORE((%%REGa, %1, 2),(%0, %1, 4) ,%%mm4,%%mm0,%%mm2,%%mm5,%%mm1,%%mm3,%%mm6,%%mm7)
  1246. DERING_CORE((%0, %1, 4),(%%REGd) ,%%mm0,%%mm2,%%mm4,%%mm1,%%mm3,%%mm5,%%mm6,%%mm7)
  1247. DERING_CORE((%%REGd),(%%REGd, %1) ,%%mm2,%%mm4,%%mm0,%%mm3,%%mm5,%%mm1,%%mm6,%%mm7)
  1248. DERING_CORE((%%REGd, %1), (%%REGd, %1, 2),%%mm4,%%mm0,%%mm2,%%mm5,%%mm1,%%mm3,%%mm6,%%mm7)
  1249. DERING_CORE((%%REGd, %1, 2),(%0, %1, 8) ,%%mm0,%%mm2,%%mm4,%%mm1,%%mm3,%%mm5,%%mm6,%%mm7)
  1250. DERING_CORE((%0, %1, 8),(%%REGd, %1, 4) ,%%mm2,%%mm4,%%mm0,%%mm3,%%mm5,%%mm1,%%mm6,%%mm7)
  1251. "1: \n\t"
  1252. : : "r" (src), "r" ((long)stride), "m" (c->pQPb), "m"(c->pQPb2)
  1253. : "%"REG_a, "%"REG_d, "%"REG_c
  1254. );
  1255. #else
  1256. int y;
  1257. int min=255;
  1258. int max=0;
  1259. int avg;
  1260. uint8_t *p;
  1261. int s[10];
  1262. const int QP2= c->QP/2 + 1;
  1263. for(y=1; y<9; y++)
  1264. {
  1265. int x;
  1266. p= src + stride*y;
  1267. for(x=1; x<9; x++)
  1268. {
  1269. p++;
  1270. if(*p > max) max= *p;
  1271. if(*p < min) min= *p;
  1272. }
  1273. }
  1274. avg= (min + max + 1)>>1;
  1275. if(max - min <deringThreshold) return;
  1276. for(y=0; y<10; y++)
  1277. {
  1278. int t = 0;
  1279. if(src[stride*y + 0] > avg) t+= 1;
  1280. if(src[stride*y + 1] > avg) t+= 2;
  1281. if(src[stride*y + 2] > avg) t+= 4;
  1282. if(src[stride*y + 3] > avg) t+= 8;
  1283. if(src[stride*y + 4] > avg) t+= 16;
  1284. if(src[stride*y + 5] > avg) t+= 32;
  1285. if(src[stride*y + 6] > avg) t+= 64;
  1286. if(src[stride*y + 7] > avg) t+= 128;
  1287. if(src[stride*y + 8] > avg) t+= 256;
  1288. if(src[stride*y + 9] > avg) t+= 512;
  1289. t |= (~t)<<16;
  1290. t &= (t<<1) & (t>>1);
  1291. s[y] = t;
  1292. }
  1293. for(y=1; y<9; y++)
  1294. {
  1295. int t = s[y-1] & s[y] & s[y+1];
  1296. t|= t>>16;
  1297. s[y-1]= t;
  1298. }
  1299. for(y=1; y<9; y++)
  1300. {
  1301. int x;
  1302. int t = s[y-1];
  1303. p= src + stride*y;
  1304. for(x=1; x<9; x++)
  1305. {
  1306. p++;
  1307. if(t & (1<<x))
  1308. {
  1309. int f= (*(p-stride-1)) + 2*(*(p-stride)) + (*(p-stride+1))
  1310. +2*(*(p -1)) + 4*(*p ) + 2*(*(p +1))
  1311. +(*(p+stride-1)) + 2*(*(p+stride)) + (*(p+stride+1));
  1312. f= (f + 8)>>4;
  1313. #ifdef DEBUG_DERING_THRESHOLD
  1314. asm volatile("emms\n\t":);
  1315. {
  1316. static long long numPixels=0;
  1317. if(x!=1 && x!=8 && y!=1 && y!=8) numPixels++;
  1318. // if((max-min)<20 || (max-min)*QP<200)
  1319. // if((max-min)*QP < 500)
  1320. // if(max-min<QP/2)
  1321. if(max-min < 20)
  1322. {
  1323. static int numSkiped=0;
  1324. static int errorSum=0;
  1325. static int worstQP=0;
  1326. static int worstRange=0;
  1327. static int worstDiff=0;
  1328. int diff= (f - *p);
  1329. int absDiff= ABS(diff);
  1330. int error= diff*diff;
  1331. if(x==1 || x==8 || y==1 || y==8) continue;
  1332. numSkiped++;
  1333. if(absDiff > worstDiff)
  1334. {
  1335. worstDiff= absDiff;
  1336. worstQP= QP;
  1337. worstRange= max-min;
  1338. }
  1339. errorSum+= error;
  1340. if(1024LL*1024LL*1024LL % numSkiped == 0)
  1341. {
  1342. printf( "sum:%1.3f, skip:%d, wQP:%d, "
  1343. "wRange:%d, wDiff:%d, relSkip:%1.3f\n",
  1344. (float)errorSum/numSkiped, numSkiped, worstQP, worstRange,
  1345. worstDiff, (float)numSkiped/numPixels);
  1346. }
  1347. }
  1348. }
  1349. #endif
  1350. if (*p + QP2 < f) *p= *p + QP2;
  1351. else if(*p - QP2 > f) *p= *p - QP2;
  1352. else *p=f;
  1353. }
  1354. }
  1355. }
  1356. #ifdef DEBUG_DERING_THRESHOLD
  1357. if(max-min < 20)
  1358. {
  1359. for(y=1; y<9; y++)
  1360. {
  1361. int x;
  1362. int t = 0;
  1363. p= src + stride*y;
  1364. for(x=1; x<9; x++)
  1365. {
  1366. p++;
  1367. *p = MIN(*p + 20, 255);
  1368. }
  1369. }
  1370. // src[0] = src[7]=src[stride*7]=src[stride*7 + 7]=255;
  1371. }
  1372. #endif
  1373. #endif
  1374. }
  1375. #endif //HAVE_ALTIVEC
  1376. /**
  1377. * Deinterlaces the given block by linearly interpolating every second line.
  1378. * will be called for every 8x8 block and can read & write from line 4-15
  1379. * lines 0-3 have been passed through the deblock / dering filters allready, but can be read too
  1380. * lines 4-12 will be read into the deblocking filter and should be deinterlaced
  1381. */
  1382. static inline void RENAME(deInterlaceInterpolateLinear)(uint8_t src[], int stride)
  1383. {
  1384. #if defined (HAVE_MMX2) || defined (HAVE_3DNOW)
  1385. src+= 4*stride;
  1386. asm volatile(
  1387. "lea (%0, %1), %%"REG_a" \n\t"
  1388. "lea (%%"REG_a", %1, 4), %%"REG_c" \n\t"
  1389. // 0 1 2 3 4 5 6 7 8 9
  1390. // %0 eax eax+%1 eax+2%1 %0+4%1 ecx ecx+%1 ecx+2%1 %0+8%1 ecx+4%1
  1391. "movq (%0), %%mm0 \n\t"
  1392. "movq (%%"REG_a", %1), %%mm1 \n\t"
  1393. PAVGB(%%mm1, %%mm0)
  1394. "movq %%mm0, (%%"REG_a") \n\t"
  1395. "movq (%0, %1, 4), %%mm0 \n\t"
  1396. PAVGB(%%mm0, %%mm1)
  1397. "movq %%mm1, (%%"REG_a", %1, 2) \n\t"
  1398. "movq (%%"REG_c", %1), %%mm1 \n\t"
  1399. PAVGB(%%mm1, %%mm0)
  1400. "movq %%mm0, (%%"REG_c") \n\t"
  1401. "movq (%0, %1, 8), %%mm0 \n\t"
  1402. PAVGB(%%mm0, %%mm1)
  1403. "movq %%mm1, (%%"REG_c", %1, 2) \n\t"
  1404. : : "r" (src), "r" ((long)stride)
  1405. : "%"REG_a, "%"REG_c
  1406. );
  1407. #else
  1408. int a, b, x;
  1409. src+= 4*stride;
  1410. for(x=0; x<2; x++){
  1411. a= *(uint32_t*)&src[stride*0];
  1412. b= *(uint32_t*)&src[stride*2];
  1413. *(uint32_t*)&src[stride*1]= (a|b) - (((a^b)&0xFEFEFEFEUL)>>1);
  1414. a= *(uint32_t*)&src[stride*4];
  1415. *(uint32_t*)&src[stride*3]= (a|b) - (((a^b)&0xFEFEFEFEUL)>>1);
  1416. b= *(uint32_t*)&src[stride*6];
  1417. *(uint32_t*)&src[stride*5]= (a|b) - (((a^b)&0xFEFEFEFEUL)>>1);
  1418. a= *(uint32_t*)&src[stride*8];
  1419. *(uint32_t*)&src[stride*7]= (a|b) - (((a^b)&0xFEFEFEFEUL)>>1);
  1420. src += 4;
  1421. }
  1422. #endif
  1423. }
  1424. /**
  1425. * Deinterlaces the given block by cubic interpolating every second line.
  1426. * will be called for every 8x8 block and can read & write from line 4-15
  1427. * lines 0-3 have been passed through the deblock / dering filters allready, but can be read too
  1428. * lines 4-12 will be read into the deblocking filter and should be deinterlaced
  1429. * this filter will read lines 3-15 and write 7-13
  1430. */
  1431. static inline void RENAME(deInterlaceInterpolateCubic)(uint8_t src[], int stride)
  1432. {
  1433. #if defined (HAVE_MMX2) || defined (HAVE_3DNOW)
  1434. src+= stride*3;
  1435. asm volatile(
  1436. "lea (%0, %1), %%"REG_a" \n\t"
  1437. "lea (%%"REG_a", %1, 4), %%"REG_d" \n\t"
  1438. "lea (%%"REG_d", %1, 4), %%"REG_c" \n\t"
  1439. "add %1, %%"REG_c" \n\t"
  1440. "pxor %%mm7, %%mm7 \n\t"
  1441. // 0 1 2 3 4 5 6 7 8 9 10
  1442. // %0 eax eax+%1 eax+2%1 %0+4%1 edx edx+%1 edx+2%1 %0+8%1 edx+4%1 ecx
  1443. #define REAL_DEINT_CUBIC(a,b,c,d,e)\
  1444. "movq " #a ", %%mm0 \n\t"\
  1445. "movq " #b ", %%mm1 \n\t"\
  1446. "movq " #d ", %%mm2 \n\t"\
  1447. "movq " #e ", %%mm3 \n\t"\
  1448. PAVGB(%%mm2, %%mm1) /* (b+d) /2 */\
  1449. PAVGB(%%mm3, %%mm0) /* a(a+e) /2 */\
  1450. "movq %%mm0, %%mm2 \n\t"\
  1451. "punpcklbw %%mm7, %%mm0 \n\t"\
  1452. "punpckhbw %%mm7, %%mm2 \n\t"\
  1453. "movq %%mm1, %%mm3 \n\t"\
  1454. "punpcklbw %%mm7, %%mm1 \n\t"\
  1455. "punpckhbw %%mm7, %%mm3 \n\t"\
  1456. "psubw %%mm1, %%mm0 \n\t" /* L(a+e - (b+d))/2 */\
  1457. "psubw %%mm3, %%mm2 \n\t" /* H(a+e - (b+d))/2 */\
  1458. "psraw $3, %%mm0 \n\t" /* L(a+e - (b+d))/16 */\
  1459. "psraw $3, %%mm2 \n\t" /* H(a+e - (b+d))/16 */\
  1460. "psubw %%mm0, %%mm1 \n\t" /* L(9b + 9d - a - e)/16 */\
  1461. "psubw %%mm2, %%mm3 \n\t" /* H(9b + 9d - a - e)/16 */\
  1462. "packuswb %%mm3, %%mm1 \n\t"\
  1463. "movq %%mm1, " #c " \n\t"
  1464. #define DEINT_CUBIC(a,b,c,d,e) REAL_DEINT_CUBIC(a,b,c,d,e)
  1465. DEINT_CUBIC((%0), (%%REGa, %1), (%%REGa, %1, 2), (%0, %1, 4), (%%REGd, %1))
  1466. DEINT_CUBIC((%%REGa, %1), (%0, %1, 4), (%%REGd), (%%REGd, %1), (%0, %1, 8))
  1467. DEINT_CUBIC((%0, %1, 4), (%%REGd, %1), (%%REGd, %1, 2), (%0, %1, 8), (%%REGc))
  1468. DEINT_CUBIC((%%REGd, %1), (%0, %1, 8), (%%REGd, %1, 4), (%%REGc), (%%REGc, %1, 2))
  1469. : : "r" (src), "r" ((long)stride)
  1470. : "%"REG_a, "%"REG_d, "%"REG_c
  1471. );
  1472. #else
  1473. int x;
  1474. src+= stride*3;
  1475. for(x=0; x<8; x++)
  1476. {
  1477. src[stride*3] = CLIP((-src[0] + 9*src[stride*2] + 9*src[stride*4] - src[stride*6])>>4);
  1478. src[stride*5] = CLIP((-src[stride*2] + 9*src[stride*4] + 9*src[stride*6] - src[stride*8])>>4);
  1479. src[stride*7] = CLIP((-src[stride*4] + 9*src[stride*6] + 9*src[stride*8] - src[stride*10])>>4);
  1480. src[stride*9] = CLIP((-src[stride*6] + 9*src[stride*8] + 9*src[stride*10] - src[stride*12])>>4);
  1481. src++;
  1482. }
  1483. #endif
  1484. }
  1485. /**
  1486. * Deinterlaces the given block by filtering every second line with a (-1 4 2 4 -1) filter.
  1487. * will be called for every 8x8 block and can read & write from line 4-15
  1488. * lines 0-3 have been passed through the deblock / dering filters allready, but can be read too
  1489. * lines 4-12 will be read into the deblocking filter and should be deinterlaced
  1490. * this filter will read lines 4-13 and write 5-11
  1491. */
  1492. static inline void RENAME(deInterlaceFF)(uint8_t src[], int stride, uint8_t *tmp)
  1493. {
  1494. #if defined (HAVE_MMX2) || defined (HAVE_3DNOW)
  1495. src+= stride*4;
  1496. asm volatile(
  1497. "lea (%0, %1), %%"REG_a" \n\t"
  1498. "lea (%%"REG_a", %1, 4), %%"REG_d" \n\t"
  1499. "pxor %%mm7, %%mm7 \n\t"
  1500. "movq (%2), %%mm0 \n\t"
  1501. // 0 1 2 3 4 5 6 7 8 9 10
  1502. // %0 eax eax+%1 eax+2%1 %0+4%1 edx edx+%1 edx+2%1 %0+8%1 edx+4%1 ecx
  1503. #define REAL_DEINT_FF(a,b,c,d)\
  1504. "movq " #a ", %%mm1 \n\t"\
  1505. "movq " #b ", %%mm2 \n\t"\
  1506. "movq " #c ", %%mm3 \n\t"\
  1507. "movq " #d ", %%mm4 \n\t"\
  1508. PAVGB(%%mm3, %%mm1) \
  1509. PAVGB(%%mm4, %%mm0) \
  1510. "movq %%mm0, %%mm3 \n\t"\
  1511. "punpcklbw %%mm7, %%mm0 \n\t"\
  1512. "punpckhbw %%mm7, %%mm3 \n\t"\
  1513. "movq %%mm1, %%mm4 \n\t"\
  1514. "punpcklbw %%mm7, %%mm1 \n\t"\
  1515. "punpckhbw %%mm7, %%mm4 \n\t"\
  1516. "psllw $2, %%mm1 \n\t"\
  1517. "psllw $2, %%mm4 \n\t"\
  1518. "psubw %%mm0, %%mm1 \n\t"\
  1519. "psubw %%mm3, %%mm4 \n\t"\
  1520. "movq %%mm2, %%mm5 \n\t"\
  1521. "movq %%mm2, %%mm0 \n\t"\
  1522. "punpcklbw %%mm7, %%mm2 \n\t"\
  1523. "punpckhbw %%mm7, %%mm5 \n\t"\
  1524. "paddw %%mm2, %%mm1 \n\t"\
  1525. "paddw %%mm5, %%mm4 \n\t"\
  1526. "psraw $2, %%mm1 \n\t"\
  1527. "psraw $2, %%mm4 \n\t"\
  1528. "packuswb %%mm4, %%mm1 \n\t"\
  1529. "movq %%mm1, " #b " \n\t"\
  1530. #define DEINT_FF(a,b,c,d) REAL_DEINT_FF(a,b,c,d)
  1531. DEINT_FF((%0) , (%%REGa) , (%%REGa, %1), (%%REGa, %1, 2))
  1532. DEINT_FF((%%REGa, %1), (%%REGa, %1, 2), (%0, %1, 4), (%%REGd) )
  1533. DEINT_FF((%0, %1, 4), (%%REGd) , (%%REGd, %1), (%%REGd, %1, 2))
  1534. DEINT_FF((%%REGd, %1), (%%REGd, %1, 2), (%0, %1, 8), (%%REGd, %1, 4))
  1535. "movq %%mm0, (%2) \n\t"
  1536. : : "r" (src), "r" ((long)stride), "r"(tmp)
  1537. : "%"REG_a, "%"REG_d
  1538. );
  1539. #else
  1540. int x;
  1541. src+= stride*4;
  1542. for(x=0; x<8; x++)
  1543. {
  1544. int t1= tmp[x];
  1545. int t2= src[stride*1];
  1546. src[stride*1]= CLIP((-t1 + 4*src[stride*0] + 2*t2 + 4*src[stride*2] - src[stride*3] + 4)>>3);
  1547. t1= src[stride*4];
  1548. src[stride*3]= CLIP((-t2 + 4*src[stride*2] + 2*t1 + 4*src[stride*4] - src[stride*5] + 4)>>3);
  1549. t2= src[stride*6];
  1550. src[stride*5]= CLIP((-t1 + 4*src[stride*4] + 2*t2 + 4*src[stride*6] - src[stride*7] + 4)>>3);
  1551. t1= src[stride*8];
  1552. src[stride*7]= CLIP((-t2 + 4*src[stride*6] + 2*t1 + 4*src[stride*8] - src[stride*9] + 4)>>3);
  1553. tmp[x]= t1;
  1554. src++;
  1555. }
  1556. #endif
  1557. }
  1558. /**
  1559. * Deinterlaces the given block by filtering every line with a (-1 2 6 2 -1) filter.
  1560. * will be called for every 8x8 block and can read & write from line 4-15
  1561. * lines 0-3 have been passed through the deblock / dering filters allready, but can be read too
  1562. * lines 4-12 will be read into the deblocking filter and should be deinterlaced
  1563. * this filter will read lines 4-13 and write 4-11
  1564. */
  1565. static inline void RENAME(deInterlaceL5)(uint8_t src[], int stride, uint8_t *tmp, uint8_t *tmp2)
  1566. {
  1567. #if defined (HAVE_MMX2) || defined (HAVE_3DNOW)
  1568. src+= stride*4;
  1569. asm volatile(
  1570. "lea (%0, %1), %%"REG_a" \n\t"
  1571. "lea (%%"REG_a", %1, 4), %%"REG_d" \n\t"
  1572. "pxor %%mm7, %%mm7 \n\t"
  1573. "movq (%2), %%mm0 \n\t"
  1574. "movq (%3), %%mm1 \n\t"
  1575. // 0 1 2 3 4 5 6 7 8 9 10
  1576. // %0 eax eax+%1 eax+2%1 %0+4%1 edx edx+%1 edx+2%1 %0+8%1 edx+4%1 ecx
  1577. #define REAL_DEINT_L5(t1,t2,a,b,c)\
  1578. "movq " #a ", %%mm2 \n\t"\
  1579. "movq " #b ", %%mm3 \n\t"\
  1580. "movq " #c ", %%mm4 \n\t"\
  1581. PAVGB(t2, %%mm3) \
  1582. PAVGB(t1, %%mm4) \
  1583. "movq %%mm2, %%mm5 \n\t"\
  1584. "movq %%mm2, " #t1 " \n\t"\
  1585. "punpcklbw %%mm7, %%mm2 \n\t"\
  1586. "punpckhbw %%mm7, %%mm5 \n\t"\
  1587. "movq %%mm2, %%mm6 \n\t"\
  1588. "paddw %%mm2, %%mm2 \n\t"\
  1589. "paddw %%mm6, %%mm2 \n\t"\
  1590. "movq %%mm5, %%mm6 \n\t"\
  1591. "paddw %%mm5, %%mm5 \n\t"\
  1592. "paddw %%mm6, %%mm5 \n\t"\
  1593. "movq %%mm3, %%mm6 \n\t"\
  1594. "punpcklbw %%mm7, %%mm3 \n\t"\
  1595. "punpckhbw %%mm7, %%mm6 \n\t"\
  1596. "paddw %%mm3, %%mm3 \n\t"\
  1597. "paddw %%mm6, %%mm6 \n\t"\
  1598. "paddw %%mm3, %%mm2 \n\t"\
  1599. "paddw %%mm6, %%mm5 \n\t"\
  1600. "movq %%mm4, %%mm6 \n\t"\
  1601. "punpcklbw %%mm7, %%mm4 \n\t"\
  1602. "punpckhbw %%mm7, %%mm6 \n\t"\
  1603. "psubw %%mm4, %%mm2 \n\t"\
  1604. "psubw %%mm6, %%mm5 \n\t"\
  1605. "psraw $2, %%mm2 \n\t"\
  1606. "psraw $2, %%mm5 \n\t"\
  1607. "packuswb %%mm5, %%mm2 \n\t"\
  1608. "movq %%mm2, " #a " \n\t"\
  1609. #define DEINT_L5(t1,t2,a,b,c) REAL_DEINT_L5(t1,t2,a,b,c)
  1610. DEINT_L5(%%mm0, %%mm1, (%0) , (%%REGa) , (%%REGa, %1) )
  1611. DEINT_L5(%%mm1, %%mm0, (%%REGa) , (%%REGa, %1) , (%%REGa, %1, 2))
  1612. DEINT_L5(%%mm0, %%mm1, (%%REGa, %1) , (%%REGa, %1, 2), (%0, %1, 4) )
  1613. DEINT_L5(%%mm1, %%mm0, (%%REGa, %1, 2), (%0, %1, 4) , (%%REGd) )
  1614. DEINT_L5(%%mm0, %%mm1, (%0, %1, 4) , (%%REGd) , (%%REGd, %1) )
  1615. DEINT_L5(%%mm1, %%mm0, (%%REGd) , (%%REGd, %1) , (%%REGd, %1, 2))
  1616. DEINT_L5(%%mm0, %%mm1, (%%REGd, %1) , (%%REGd, %1, 2), (%0, %1, 8) )
  1617. DEINT_L5(%%mm1, %%mm0, (%%REGd, %1, 2), (%0, %1, 8) , (%%REGd, %1, 4))
  1618. "movq %%mm0, (%2) \n\t"
  1619. "movq %%mm1, (%3) \n\t"
  1620. : : "r" (src), "r" ((long)stride), "r"(tmp), "r"(tmp2)
  1621. : "%"REG_a, "%"REG_d
  1622. );
  1623. #else
  1624. int x;
  1625. src+= stride*4;
  1626. for(x=0; x<8; x++)
  1627. {
  1628. int t1= tmp[x];
  1629. int t2= tmp2[x];
  1630. int t3= src[0];
  1631. src[stride*0]= CLIP((-(t1 + src[stride*2]) + 2*(t2 + src[stride*1]) + 6*t3 + 4)>>3);
  1632. t1= src[stride*1];
  1633. src[stride*1]= CLIP((-(t2 + src[stride*3]) + 2*(t3 + src[stride*2]) + 6*t1 + 4)>>3);
  1634. t2= src[stride*2];
  1635. src[stride*2]= CLIP((-(t3 + src[stride*4]) + 2*(t1 + src[stride*3]) + 6*t2 + 4)>>3);
  1636. t3= src[stride*3];
  1637. src[stride*3]= CLIP((-(t1 + src[stride*5]) + 2*(t2 + src[stride*4]) + 6*t3 + 4)>>3);
  1638. t1= src[stride*4];
  1639. src[stride*4]= CLIP((-(t2 + src[stride*6]) + 2*(t3 + src[stride*5]) + 6*t1 + 4)>>3);
  1640. t2= src[stride*5];
  1641. src[stride*5]= CLIP((-(t3 + src[stride*7]) + 2*(t1 + src[stride*6]) + 6*t2 + 4)>>3);
  1642. t3= src[stride*6];
  1643. src[stride*6]= CLIP((-(t1 + src[stride*8]) + 2*(t2 + src[stride*7]) + 6*t3 + 4)>>3);
  1644. t1= src[stride*7];
  1645. src[stride*7]= CLIP((-(t2 + src[stride*9]) + 2*(t3 + src[stride*8]) + 6*t1 + 4)>>3);
  1646. tmp[x]= t3;
  1647. tmp2[x]= t1;
  1648. src++;
  1649. }
  1650. #endif
  1651. }
  1652. /**
  1653. * Deinterlaces the given block by filtering all lines with a (1 2 1) filter.
  1654. * will be called for every 8x8 block and can read & write from line 4-15
  1655. * lines 0-3 have been passed through the deblock / dering filters allready, but can be read too
  1656. * lines 4-12 will be read into the deblocking filter and should be deinterlaced
  1657. * this filter will read lines 4-13 and write 4-11
  1658. */
  1659. static inline void RENAME(deInterlaceBlendLinear)(uint8_t src[], int stride, uint8_t *tmp)
  1660. {
  1661. #if defined (HAVE_MMX2) || defined (HAVE_3DNOW)
  1662. src+= 4*stride;
  1663. asm volatile(
  1664. "lea (%0, %1), %%"REG_a" \n\t"
  1665. "lea (%%"REG_a", %1, 4), %%"REG_d" \n\t"
  1666. // 0 1 2 3 4 5 6 7 8 9
  1667. // %0 eax eax+%1 eax+2%1 %0+4%1 edx edx+%1 edx+2%1 %0+8%1 edx+4%1
  1668. "movq (%2), %%mm0 \n\t" // L0
  1669. "movq (%%"REG_a"), %%mm1 \n\t" // L2
  1670. PAVGB(%%mm1, %%mm0) // L0+L2
  1671. "movq (%0), %%mm2 \n\t" // L1
  1672. PAVGB(%%mm2, %%mm0)
  1673. "movq %%mm0, (%0) \n\t"
  1674. "movq (%%"REG_a", %1), %%mm0 \n\t" // L3
  1675. PAVGB(%%mm0, %%mm2) // L1+L3
  1676. PAVGB(%%mm1, %%mm2) // 2L2 + L1 + L3
  1677. "movq %%mm2, (%%"REG_a") \n\t"
  1678. "movq (%%"REG_a", %1, 2), %%mm2 \n\t" // L4
  1679. PAVGB(%%mm2, %%mm1) // L2+L4
  1680. PAVGB(%%mm0, %%mm1) // 2L3 + L2 + L4
  1681. "movq %%mm1, (%%"REG_a", %1) \n\t"
  1682. "movq (%0, %1, 4), %%mm1 \n\t" // L5
  1683. PAVGB(%%mm1, %%mm0) // L3+L5
  1684. PAVGB(%%mm2, %%mm0) // 2L4 + L3 + L5
  1685. "movq %%mm0, (%%"REG_a", %1, 2) \n\t"
  1686. "movq (%%"REG_d"), %%mm0 \n\t" // L6
  1687. PAVGB(%%mm0, %%mm2) // L4+L6
  1688. PAVGB(%%mm1, %%mm2) // 2L5 + L4 + L6
  1689. "movq %%mm2, (%0, %1, 4) \n\t"
  1690. "movq (%%"REG_d", %1), %%mm2 \n\t" // L7
  1691. PAVGB(%%mm2, %%mm1) // L5+L7
  1692. PAVGB(%%mm0, %%mm1) // 2L6 + L5 + L7
  1693. "movq %%mm1, (%%"REG_d") \n\t"
  1694. "movq (%%"REG_d", %1, 2), %%mm1 \n\t" // L8
  1695. PAVGB(%%mm1, %%mm0) // L6+L8
  1696. PAVGB(%%mm2, %%mm0) // 2L7 + L6 + L8
  1697. "movq %%mm0, (%%"REG_d", %1) \n\t"
  1698. "movq (%0, %1, 8), %%mm0 \n\t" // L9
  1699. PAVGB(%%mm0, %%mm2) // L7+L9
  1700. PAVGB(%%mm1, %%mm2) // 2L8 + L7 + L9
  1701. "movq %%mm2, (%%"REG_d", %1, 2) \n\t"
  1702. "movq %%mm1, (%2) \n\t"
  1703. : : "r" (src), "r" ((long)stride), "r" (tmp)
  1704. : "%"REG_a, "%"REG_d
  1705. );
  1706. #else
  1707. int a, b, c, x;
  1708. src+= 4*stride;
  1709. for(x=0; x<2; x++){
  1710. a= *(uint32_t*)&tmp[stride*0];
  1711. b= *(uint32_t*)&src[stride*0];
  1712. c= *(uint32_t*)&src[stride*1];
  1713. a= (a&c) + (((a^c)&0xFEFEFEFEUL)>>1);
  1714. *(uint32_t*)&src[stride*0]= (a|b) - (((a^b)&0xFEFEFEFEUL)>>1);
  1715. a= *(uint32_t*)&src[stride*2];
  1716. b= (a&b) + (((a^b)&0xFEFEFEFEUL)>>1);
  1717. *(uint32_t*)&src[stride*1]= (c|b) - (((c^b)&0xFEFEFEFEUL)>>1);
  1718. b= *(uint32_t*)&src[stride*3];
  1719. c= (b&c) + (((b^c)&0xFEFEFEFEUL)>>1);
  1720. *(uint32_t*)&src[stride*2]= (c|a) - (((c^a)&0xFEFEFEFEUL)>>1);
  1721. c= *(uint32_t*)&src[stride*4];
  1722. a= (a&c) + (((a^c)&0xFEFEFEFEUL)>>1);
  1723. *(uint32_t*)&src[stride*3]= (a|b) - (((a^b)&0xFEFEFEFEUL)>>1);
  1724. a= *(uint32_t*)&src[stride*5];
  1725. b= (a&b) + (((a^b)&0xFEFEFEFEUL)>>1);
  1726. *(uint32_t*)&src[stride*4]= (c|b) - (((c^b)&0xFEFEFEFEUL)>>1);
  1727. b= *(uint32_t*)&src[stride*6];
  1728. c= (b&c) + (((b^c)&0xFEFEFEFEUL)>>1);
  1729. *(uint32_t*)&src[stride*5]= (c|a) - (((c^a)&0xFEFEFEFEUL)>>1);
  1730. c= *(uint32_t*)&src[stride*7];
  1731. a= (a&c) + (((a^c)&0xFEFEFEFEUL)>>1);
  1732. *(uint32_t*)&src[stride*6]= (a|b) - (((a^b)&0xFEFEFEFEUL)>>1);
  1733. a= *(uint32_t*)&src[stride*8];
  1734. b= (a&b) + (((a^b)&0xFEFEFEFEUL)>>1);
  1735. *(uint32_t*)&src[stride*7]= (c|b) - (((c^b)&0xFEFEFEFEUL)>>1);
  1736. *(uint32_t*)&tmp[stride*0]= c;
  1737. src += 4;
  1738. tmp += 4;
  1739. }
  1740. #endif
  1741. }
  1742. /**
  1743. * Deinterlaces the given block by applying a median filter to every second line.
  1744. * will be called for every 8x8 block and can read & write from line 4-15,
  1745. * lines 0-3 have been passed through the deblock / dering filters allready, but can be read too
  1746. * lines 4-12 will be read into the deblocking filter and should be deinterlaced
  1747. */
  1748. static inline void RENAME(deInterlaceMedian)(uint8_t src[], int stride)
  1749. {
  1750. #ifdef HAVE_MMX
  1751. src+= 4*stride;
  1752. #ifdef HAVE_MMX2
  1753. asm volatile(
  1754. "lea (%0, %1), %%"REG_a" \n\t"
  1755. "lea (%%"REG_a", %1, 4), %%"REG_d" \n\t"
  1756. // 0 1 2 3 4 5 6 7 8 9
  1757. // %0 eax eax+%1 eax+2%1 %0+4%1 edx edx+%1 edx+2%1 %0+8%1 edx+4%1
  1758. "movq (%0), %%mm0 \n\t" //
  1759. "movq (%%"REG_a", %1), %%mm2 \n\t" //
  1760. "movq (%%"REG_a"), %%mm1 \n\t" //
  1761. "movq %%mm0, %%mm3 \n\t"
  1762. "pmaxub %%mm1, %%mm0 \n\t" //
  1763. "pminub %%mm3, %%mm1 \n\t" //
  1764. "pmaxub %%mm2, %%mm1 \n\t" //
  1765. "pminub %%mm1, %%mm0 \n\t"
  1766. "movq %%mm0, (%%"REG_a") \n\t"
  1767. "movq (%0, %1, 4), %%mm0 \n\t" //
  1768. "movq (%%"REG_a", %1, 2), %%mm1 \n\t" //
  1769. "movq %%mm2, %%mm3 \n\t"
  1770. "pmaxub %%mm1, %%mm2 \n\t" //
  1771. "pminub %%mm3, %%mm1 \n\t" //
  1772. "pmaxub %%mm0, %%mm1 \n\t" //
  1773. "pminub %%mm1, %%mm2 \n\t"
  1774. "movq %%mm2, (%%"REG_a", %1, 2) \n\t"
  1775. "movq (%%"REG_d"), %%mm2 \n\t" //
  1776. "movq (%%"REG_d", %1), %%mm1 \n\t" //
  1777. "movq %%mm2, %%mm3 \n\t"
  1778. "pmaxub %%mm0, %%mm2 \n\t" //
  1779. "pminub %%mm3, %%mm0 \n\t" //
  1780. "pmaxub %%mm1, %%mm0 \n\t" //
  1781. "pminub %%mm0, %%mm2 \n\t"
  1782. "movq %%mm2, (%%"REG_d") \n\t"
  1783. "movq (%%"REG_d", %1, 2), %%mm2 \n\t" //
  1784. "movq (%0, %1, 8), %%mm0 \n\t" //
  1785. "movq %%mm2, %%mm3 \n\t"
  1786. "pmaxub %%mm0, %%mm2 \n\t" //
  1787. "pminub %%mm3, %%mm0 \n\t" //
  1788. "pmaxub %%mm1, %%mm0 \n\t" //
  1789. "pminub %%mm0, %%mm2 \n\t"
  1790. "movq %%mm2, (%%"REG_d", %1, 2) \n\t"
  1791. : : "r" (src), "r" ((long)stride)
  1792. : "%"REG_a, "%"REG_d
  1793. );
  1794. #else // MMX without MMX2
  1795. asm volatile(
  1796. "lea (%0, %1), %%"REG_a" \n\t"
  1797. "lea (%%"REG_a", %1, 4), %%"REG_d" \n\t"
  1798. // 0 1 2 3 4 5 6 7 8 9
  1799. // %0 eax eax+%1 eax+2%1 %0+4%1 edx edx+%1 edx+2%1 %0+8%1 edx+4%1
  1800. "pxor %%mm7, %%mm7 \n\t"
  1801. #define REAL_MEDIAN(a,b,c)\
  1802. "movq " #a ", %%mm0 \n\t"\
  1803. "movq " #b ", %%mm2 \n\t"\
  1804. "movq " #c ", %%mm1 \n\t"\
  1805. "movq %%mm0, %%mm3 \n\t"\
  1806. "movq %%mm1, %%mm4 \n\t"\
  1807. "movq %%mm2, %%mm5 \n\t"\
  1808. "psubusb %%mm1, %%mm3 \n\t"\
  1809. "psubusb %%mm2, %%mm4 \n\t"\
  1810. "psubusb %%mm0, %%mm5 \n\t"\
  1811. "pcmpeqb %%mm7, %%mm3 \n\t"\
  1812. "pcmpeqb %%mm7, %%mm4 \n\t"\
  1813. "pcmpeqb %%mm7, %%mm5 \n\t"\
  1814. "movq %%mm3, %%mm6 \n\t"\
  1815. "pxor %%mm4, %%mm3 \n\t"\
  1816. "pxor %%mm5, %%mm4 \n\t"\
  1817. "pxor %%mm6, %%mm5 \n\t"\
  1818. "por %%mm3, %%mm1 \n\t"\
  1819. "por %%mm4, %%mm2 \n\t"\
  1820. "por %%mm5, %%mm0 \n\t"\
  1821. "pand %%mm2, %%mm0 \n\t"\
  1822. "pand %%mm1, %%mm0 \n\t"\
  1823. "movq %%mm0, " #b " \n\t"
  1824. #define MEDIAN(a,b,c) REAL_MEDIAN(a,b,c)
  1825. MEDIAN((%0), (%%REGa), (%%REGa, %1))
  1826. MEDIAN((%%REGa, %1), (%%REGa, %1, 2), (%0, %1, 4))
  1827. MEDIAN((%0, %1, 4), (%%REGd), (%%REGd, %1))
  1828. MEDIAN((%%REGd, %1), (%%REGd, %1, 2), (%0, %1, 8))
  1829. : : "r" (src), "r" ((long)stride)
  1830. : "%"REG_a, "%"REG_d
  1831. );
  1832. #endif // MMX
  1833. #else
  1834. int x, y;
  1835. src+= 4*stride;
  1836. // FIXME - there should be a way to do a few columns in parallel like w/mmx
  1837. for(x=0; x<8; x++)
  1838. {
  1839. uint8_t *colsrc = src;
  1840. for (y=0; y<4; y++)
  1841. {
  1842. int a, b, c, d, e, f;
  1843. a = colsrc[0 ];
  1844. b = colsrc[stride ];
  1845. c = colsrc[stride*2];
  1846. d = (a-b)>>31;
  1847. e = (b-c)>>31;
  1848. f = (c-a)>>31;
  1849. colsrc[stride ] = (a|(d^f)) & (b|(d^e)) & (c|(e^f));
  1850. colsrc += stride*2;
  1851. }
  1852. src++;
  1853. }
  1854. #endif
  1855. }
  1856. #ifdef HAVE_MMX
  1857. /**
  1858. * transposes and shift the given 8x8 Block into dst1 and dst2
  1859. */
  1860. static inline void RENAME(transpose1)(uint8_t *dst1, uint8_t *dst2, uint8_t *src, int srcStride)
  1861. {
  1862. asm(
  1863. "lea (%0, %1), %%"REG_a" \n\t"
  1864. // 0 1 2 3 4 5 6 7 8 9
  1865. // %0 eax eax+%1 eax+2%1 %0+4%1 edx edx+%1 edx+2%1 %0+8%1 edx+4%1
  1866. "movq (%0), %%mm0 \n\t" // 12345678
  1867. "movq (%%"REG_a"), %%mm1 \n\t" // abcdefgh
  1868. "movq %%mm0, %%mm2 \n\t" // 12345678
  1869. "punpcklbw %%mm1, %%mm0 \n\t" // 1a2b3c4d
  1870. "punpckhbw %%mm1, %%mm2 \n\t" // 5e6f7g8h
  1871. "movq (%%"REG_a", %1), %%mm1 \n\t"
  1872. "movq (%%"REG_a", %1, 2), %%mm3 \n\t"
  1873. "movq %%mm1, %%mm4 \n\t"
  1874. "punpcklbw %%mm3, %%mm1 \n\t"
  1875. "punpckhbw %%mm3, %%mm4 \n\t"
  1876. "movq %%mm0, %%mm3 \n\t"
  1877. "punpcklwd %%mm1, %%mm0 \n\t"
  1878. "punpckhwd %%mm1, %%mm3 \n\t"
  1879. "movq %%mm2, %%mm1 \n\t"
  1880. "punpcklwd %%mm4, %%mm2 \n\t"
  1881. "punpckhwd %%mm4, %%mm1 \n\t"
  1882. "movd %%mm0, 128(%2) \n\t"
  1883. "psrlq $32, %%mm0 \n\t"
  1884. "movd %%mm0, 144(%2) \n\t"
  1885. "movd %%mm3, 160(%2) \n\t"
  1886. "psrlq $32, %%mm3 \n\t"
  1887. "movd %%mm3, 176(%2) \n\t"
  1888. "movd %%mm3, 48(%3) \n\t"
  1889. "movd %%mm2, 192(%2) \n\t"
  1890. "movd %%mm2, 64(%3) \n\t"
  1891. "psrlq $32, %%mm2 \n\t"
  1892. "movd %%mm2, 80(%3) \n\t"
  1893. "movd %%mm1, 96(%3) \n\t"
  1894. "psrlq $32, %%mm1 \n\t"
  1895. "movd %%mm1, 112(%3) \n\t"
  1896. "lea (%%"REG_a", %1, 4), %%"REG_a" \n\t"
  1897. "movq (%0, %1, 4), %%mm0 \n\t" // 12345678
  1898. "movq (%%"REG_a"), %%mm1 \n\t" // abcdefgh
  1899. "movq %%mm0, %%mm2 \n\t" // 12345678
  1900. "punpcklbw %%mm1, %%mm0 \n\t" // 1a2b3c4d
  1901. "punpckhbw %%mm1, %%mm2 \n\t" // 5e6f7g8h
  1902. "movq (%%"REG_a", %1), %%mm1 \n\t"
  1903. "movq (%%"REG_a", %1, 2), %%mm3 \n\t"
  1904. "movq %%mm1, %%mm4 \n\t"
  1905. "punpcklbw %%mm3, %%mm1 \n\t"
  1906. "punpckhbw %%mm3, %%mm4 \n\t"
  1907. "movq %%mm0, %%mm3 \n\t"
  1908. "punpcklwd %%mm1, %%mm0 \n\t"
  1909. "punpckhwd %%mm1, %%mm3 \n\t"
  1910. "movq %%mm2, %%mm1 \n\t"
  1911. "punpcklwd %%mm4, %%mm2 \n\t"
  1912. "punpckhwd %%mm4, %%mm1 \n\t"
  1913. "movd %%mm0, 132(%2) \n\t"
  1914. "psrlq $32, %%mm0 \n\t"
  1915. "movd %%mm0, 148(%2) \n\t"
  1916. "movd %%mm3, 164(%2) \n\t"
  1917. "psrlq $32, %%mm3 \n\t"
  1918. "movd %%mm3, 180(%2) \n\t"
  1919. "movd %%mm3, 52(%3) \n\t"
  1920. "movd %%mm2, 196(%2) \n\t"
  1921. "movd %%mm2, 68(%3) \n\t"
  1922. "psrlq $32, %%mm2 \n\t"
  1923. "movd %%mm2, 84(%3) \n\t"
  1924. "movd %%mm1, 100(%3) \n\t"
  1925. "psrlq $32, %%mm1 \n\t"
  1926. "movd %%mm1, 116(%3) \n\t"
  1927. :: "r" (src), "r" ((long)srcStride), "r" (dst1), "r" (dst2)
  1928. : "%"REG_a
  1929. );
  1930. }
  1931. /**
  1932. * transposes the given 8x8 block
  1933. */
  1934. static inline void RENAME(transpose2)(uint8_t *dst, int dstStride, uint8_t *src)
  1935. {
  1936. asm(
  1937. "lea (%0, %1), %%"REG_a" \n\t"
  1938. "lea (%%"REG_a",%1,4), %%"REG_d"\n\t"
  1939. // 0 1 2 3 4 5 6 7 8 9
  1940. // %0 eax eax+%1 eax+2%1 %0+4%1 edx edx+%1 edx+2%1 %0+8%1 edx+4%1
  1941. "movq (%2), %%mm0 \n\t" // 12345678
  1942. "movq 16(%2), %%mm1 \n\t" // abcdefgh
  1943. "movq %%mm0, %%mm2 \n\t" // 12345678
  1944. "punpcklbw %%mm1, %%mm0 \n\t" // 1a2b3c4d
  1945. "punpckhbw %%mm1, %%mm2 \n\t" // 5e6f7g8h
  1946. "movq 32(%2), %%mm1 \n\t"
  1947. "movq 48(%2), %%mm3 \n\t"
  1948. "movq %%mm1, %%mm4 \n\t"
  1949. "punpcklbw %%mm3, %%mm1 \n\t"
  1950. "punpckhbw %%mm3, %%mm4 \n\t"
  1951. "movq %%mm0, %%mm3 \n\t"
  1952. "punpcklwd %%mm1, %%mm0 \n\t"
  1953. "punpckhwd %%mm1, %%mm3 \n\t"
  1954. "movq %%mm2, %%mm1 \n\t"
  1955. "punpcklwd %%mm4, %%mm2 \n\t"
  1956. "punpckhwd %%mm4, %%mm1 \n\t"
  1957. "movd %%mm0, (%0) \n\t"
  1958. "psrlq $32, %%mm0 \n\t"
  1959. "movd %%mm0, (%%"REG_a") \n\t"
  1960. "movd %%mm3, (%%"REG_a", %1) \n\t"
  1961. "psrlq $32, %%mm3 \n\t"
  1962. "movd %%mm3, (%%"REG_a", %1, 2) \n\t"
  1963. "movd %%mm2, (%0, %1, 4) \n\t"
  1964. "psrlq $32, %%mm2 \n\t"
  1965. "movd %%mm2, (%%"REG_d") \n\t"
  1966. "movd %%mm1, (%%"REG_d", %1) \n\t"
  1967. "psrlq $32, %%mm1 \n\t"
  1968. "movd %%mm1, (%%"REG_d", %1, 2) \n\t"
  1969. "movq 64(%2), %%mm0 \n\t" // 12345678
  1970. "movq 80(%2), %%mm1 \n\t" // abcdefgh
  1971. "movq %%mm0, %%mm2 \n\t" // 12345678
  1972. "punpcklbw %%mm1, %%mm0 \n\t" // 1a2b3c4d
  1973. "punpckhbw %%mm1, %%mm2 \n\t" // 5e6f7g8h
  1974. "movq 96(%2), %%mm1 \n\t"
  1975. "movq 112(%2), %%mm3 \n\t"
  1976. "movq %%mm1, %%mm4 \n\t"
  1977. "punpcklbw %%mm3, %%mm1 \n\t"
  1978. "punpckhbw %%mm3, %%mm4 \n\t"
  1979. "movq %%mm0, %%mm3 \n\t"
  1980. "punpcklwd %%mm1, %%mm0 \n\t"
  1981. "punpckhwd %%mm1, %%mm3 \n\t"
  1982. "movq %%mm2, %%mm1 \n\t"
  1983. "punpcklwd %%mm4, %%mm2 \n\t"
  1984. "punpckhwd %%mm4, %%mm1 \n\t"
  1985. "movd %%mm0, 4(%0) \n\t"
  1986. "psrlq $32, %%mm0 \n\t"
  1987. "movd %%mm0, 4(%%"REG_a") \n\t"
  1988. "movd %%mm3, 4(%%"REG_a", %1) \n\t"
  1989. "psrlq $32, %%mm3 \n\t"
  1990. "movd %%mm3, 4(%%"REG_a", %1, 2) \n\t"
  1991. "movd %%mm2, 4(%0, %1, 4) \n\t"
  1992. "psrlq $32, %%mm2 \n\t"
  1993. "movd %%mm2, 4(%%"REG_d") \n\t"
  1994. "movd %%mm1, 4(%%"REG_d", %1) \n\t"
  1995. "psrlq $32, %%mm1 \n\t"
  1996. "movd %%mm1, 4(%%"REG_d", %1, 2) \n\t"
  1997. :: "r" (dst), "r" ((long)dstStride), "r" (src)
  1998. : "%"REG_a, "%"REG_d
  1999. );
  2000. }
  2001. #endif
  2002. //static long test=0;
  2003. #ifndef HAVE_ALTIVEC
  2004. static inline void RENAME(tempNoiseReducer)(uint8_t *src, int stride,
  2005. uint8_t *tempBlured, uint32_t *tempBluredPast, int *maxNoise)
  2006. {
  2007. // to save a register (FIXME do this outside of the loops)
  2008. tempBluredPast[127]= maxNoise[0];
  2009. tempBluredPast[128]= maxNoise[1];
  2010. tempBluredPast[129]= maxNoise[2];
  2011. #define FAST_L2_DIFF
  2012. //#define L1_DIFF //u should change the thresholds too if u try that one
  2013. #if defined (HAVE_MMX2) || defined (HAVE_3DNOW)
  2014. asm volatile(
  2015. "lea (%2, %2, 2), %%"REG_a" \n\t" // 3*stride
  2016. "lea (%2, %2, 4), %%"REG_d" \n\t" // 5*stride
  2017. "lea (%%"REG_d", %2, 2), %%"REG_c" \n\t" // 7*stride
  2018. // 0 1 2 3 4 5 6 7 8 9
  2019. // %x %x+%2 %x+2%2 %x+eax %x+4%2 %x+edx %x+2eax %x+ecx %x+8%2
  2020. //FIXME reorder?
  2021. #ifdef L1_DIFF //needs mmx2
  2022. "movq (%0), %%mm0 \n\t" // L0
  2023. "psadbw (%1), %%mm0 \n\t" // |L0-R0|
  2024. "movq (%0, %2), %%mm1 \n\t" // L1
  2025. "psadbw (%1, %2), %%mm1 \n\t" // |L1-R1|
  2026. "movq (%0, %2, 2), %%mm2 \n\t" // L2
  2027. "psadbw (%1, %2, 2), %%mm2 \n\t" // |L2-R2|
  2028. "movq (%0, %%"REG_a"), %%mm3 \n\t" // L3
  2029. "psadbw (%1, %%"REG_a"), %%mm3 \n\t" // |L3-R3|
  2030. "movq (%0, %2, 4), %%mm4 \n\t" // L4
  2031. "paddw %%mm1, %%mm0 \n\t"
  2032. "psadbw (%1, %2, 4), %%mm4 \n\t" // |L4-R4|
  2033. "movq (%0, %%"REG_d"), %%mm5 \n\t" // L5
  2034. "paddw %%mm2, %%mm0 \n\t"
  2035. "psadbw (%1, %%"REG_d"), %%mm5 \n\t" // |L5-R5|
  2036. "movq (%0, %%"REG_a", 2), %%mm6 \n\t" // L6
  2037. "paddw %%mm3, %%mm0 \n\t"
  2038. "psadbw (%1, %%"REG_a", 2), %%mm6 \n\t" // |L6-R6|
  2039. "movq (%0, %%"REG_c"), %%mm7 \n\t" // L7
  2040. "paddw %%mm4, %%mm0 \n\t"
  2041. "psadbw (%1, %%"REG_c"), %%mm7 \n\t" // |L7-R7|
  2042. "paddw %%mm5, %%mm6 \n\t"
  2043. "paddw %%mm7, %%mm6 \n\t"
  2044. "paddw %%mm6, %%mm0 \n\t"
  2045. #else
  2046. #if defined (FAST_L2_DIFF)
  2047. "pcmpeqb %%mm7, %%mm7 \n\t"
  2048. "movq "MANGLE(b80)", %%mm6 \n\t"
  2049. "pxor %%mm0, %%mm0 \n\t"
  2050. #define REAL_L2_DIFF_CORE(a, b)\
  2051. "movq " #a ", %%mm5 \n\t"\
  2052. "movq " #b ", %%mm2 \n\t"\
  2053. "pxor %%mm7, %%mm2 \n\t"\
  2054. PAVGB(%%mm2, %%mm5)\
  2055. "paddb %%mm6, %%mm5 \n\t"\
  2056. "movq %%mm5, %%mm2 \n\t"\
  2057. "psllw $8, %%mm5 \n\t"\
  2058. "pmaddwd %%mm5, %%mm5 \n\t"\
  2059. "pmaddwd %%mm2, %%mm2 \n\t"\
  2060. "paddd %%mm2, %%mm5 \n\t"\
  2061. "psrld $14, %%mm5 \n\t"\
  2062. "paddd %%mm5, %%mm0 \n\t"
  2063. #else
  2064. "pxor %%mm7, %%mm7 \n\t"
  2065. "pxor %%mm0, %%mm0 \n\t"
  2066. #define REAL_L2_DIFF_CORE(a, b)\
  2067. "movq " #a ", %%mm5 \n\t"\
  2068. "movq " #b ", %%mm2 \n\t"\
  2069. "movq %%mm5, %%mm1 \n\t"\
  2070. "movq %%mm2, %%mm3 \n\t"\
  2071. "punpcklbw %%mm7, %%mm5 \n\t"\
  2072. "punpckhbw %%mm7, %%mm1 \n\t"\
  2073. "punpcklbw %%mm7, %%mm2 \n\t"\
  2074. "punpckhbw %%mm7, %%mm3 \n\t"\
  2075. "psubw %%mm2, %%mm5 \n\t"\
  2076. "psubw %%mm3, %%mm1 \n\t"\
  2077. "pmaddwd %%mm5, %%mm5 \n\t"\
  2078. "pmaddwd %%mm1, %%mm1 \n\t"\
  2079. "paddd %%mm1, %%mm5 \n\t"\
  2080. "paddd %%mm5, %%mm0 \n\t"
  2081. #endif
  2082. #define L2_DIFF_CORE(a, b) REAL_L2_DIFF_CORE(a, b)
  2083. L2_DIFF_CORE((%0), (%1))
  2084. L2_DIFF_CORE((%0, %2), (%1, %2))
  2085. L2_DIFF_CORE((%0, %2, 2), (%1, %2, 2))
  2086. L2_DIFF_CORE((%0, %%REGa), (%1, %%REGa))
  2087. L2_DIFF_CORE((%0, %2, 4), (%1, %2, 4))
  2088. L2_DIFF_CORE((%0, %%REGd), (%1, %%REGd))
  2089. L2_DIFF_CORE((%0, %%REGa,2), (%1, %%REGa,2))
  2090. L2_DIFF_CORE((%0, %%REGc), (%1, %%REGc))
  2091. #endif
  2092. "movq %%mm0, %%mm4 \n\t"
  2093. "psrlq $32, %%mm0 \n\t"
  2094. "paddd %%mm0, %%mm4 \n\t"
  2095. "movd %%mm4, %%ecx \n\t"
  2096. "shll $2, %%ecx \n\t"
  2097. "mov %3, %%"REG_d" \n\t"
  2098. "addl -4(%%"REG_d"), %%ecx \n\t"
  2099. "addl 4(%%"REG_d"), %%ecx \n\t"
  2100. "addl -1024(%%"REG_d"), %%ecx \n\t"
  2101. "addl $4, %%ecx \n\t"
  2102. "addl 1024(%%"REG_d"), %%ecx \n\t"
  2103. "shrl $3, %%ecx \n\t"
  2104. "movl %%ecx, (%%"REG_d") \n\t"
  2105. // "mov %3, %%"REG_c" \n\t"
  2106. // "mov %%"REG_c", test \n\t"
  2107. // "jmp 4f \n\t"
  2108. "cmpl 512(%%"REG_d"), %%ecx \n\t"
  2109. " jb 2f \n\t"
  2110. "cmpl 516(%%"REG_d"), %%ecx \n\t"
  2111. " jb 1f \n\t"
  2112. "lea (%%"REG_a", %2, 2), %%"REG_d" \n\t" // 5*stride
  2113. "lea (%%"REG_d", %2, 2), %%"REG_c" \n\t" // 7*stride
  2114. "movq (%0), %%mm0 \n\t" // L0
  2115. "movq (%0, %2), %%mm1 \n\t" // L1
  2116. "movq (%0, %2, 2), %%mm2 \n\t" // L2
  2117. "movq (%0, %%"REG_a"), %%mm3 \n\t" // L3
  2118. "movq (%0, %2, 4), %%mm4 \n\t" // L4
  2119. "movq (%0, %%"REG_d"), %%mm5 \n\t" // L5
  2120. "movq (%0, %%"REG_a", 2), %%mm6 \n\t" // L6
  2121. "movq (%0, %%"REG_c"), %%mm7 \n\t" // L7
  2122. "movq %%mm0, (%1) \n\t" // L0
  2123. "movq %%mm1, (%1, %2) \n\t" // L1
  2124. "movq %%mm2, (%1, %2, 2) \n\t" // L2
  2125. "movq %%mm3, (%1, %%"REG_a") \n\t" // L3
  2126. "movq %%mm4, (%1, %2, 4) \n\t" // L4
  2127. "movq %%mm5, (%1, %%"REG_d") \n\t" // L5
  2128. "movq %%mm6, (%1, %%"REG_a", 2) \n\t" // L6
  2129. "movq %%mm7, (%1, %%"REG_c") \n\t" // L7
  2130. "jmp 4f \n\t"
  2131. "1: \n\t"
  2132. "lea (%%"REG_a", %2, 2), %%"REG_d" \n\t" // 5*stride
  2133. "lea (%%"REG_d", %2, 2), %%"REG_c" \n\t" // 7*stride
  2134. "movq (%0), %%mm0 \n\t" // L0
  2135. PAVGB((%1), %%mm0) // L0
  2136. "movq (%0, %2), %%mm1 \n\t" // L1
  2137. PAVGB((%1, %2), %%mm1) // L1
  2138. "movq (%0, %2, 2), %%mm2 \n\t" // L2
  2139. PAVGB((%1, %2, 2), %%mm2) // L2
  2140. "movq (%0, %%"REG_a"), %%mm3 \n\t" // L3
  2141. PAVGB((%1, %%REGa), %%mm3) // L3
  2142. "movq (%0, %2, 4), %%mm4 \n\t" // L4
  2143. PAVGB((%1, %2, 4), %%mm4) // L4
  2144. "movq (%0, %%"REG_d"), %%mm5 \n\t" // L5
  2145. PAVGB((%1, %%REGd), %%mm5) // L5
  2146. "movq (%0, %%"REG_a", 2), %%mm6 \n\t" // L6
  2147. PAVGB((%1, %%REGa, 2), %%mm6) // L6
  2148. "movq (%0, %%"REG_c"), %%mm7 \n\t" // L7
  2149. PAVGB((%1, %%REGc), %%mm7) // L7
  2150. "movq %%mm0, (%1) \n\t" // R0
  2151. "movq %%mm1, (%1, %2) \n\t" // R1
  2152. "movq %%mm2, (%1, %2, 2) \n\t" // R2
  2153. "movq %%mm3, (%1, %%"REG_a") \n\t" // R3
  2154. "movq %%mm4, (%1, %2, 4) \n\t" // R4
  2155. "movq %%mm5, (%1, %%"REG_d") \n\t" // R5
  2156. "movq %%mm6, (%1, %%"REG_a", 2) \n\t" // R6
  2157. "movq %%mm7, (%1, %%"REG_c") \n\t" // R7
  2158. "movq %%mm0, (%0) \n\t" // L0
  2159. "movq %%mm1, (%0, %2) \n\t" // L1
  2160. "movq %%mm2, (%0, %2, 2) \n\t" // L2
  2161. "movq %%mm3, (%0, %%"REG_a") \n\t" // L3
  2162. "movq %%mm4, (%0, %2, 4) \n\t" // L4
  2163. "movq %%mm5, (%0, %%"REG_d") \n\t" // L5
  2164. "movq %%mm6, (%0, %%"REG_a", 2) \n\t" // L6
  2165. "movq %%mm7, (%0, %%"REG_c") \n\t" // L7
  2166. "jmp 4f \n\t"
  2167. "2: \n\t"
  2168. "cmpl 508(%%"REG_d"), %%ecx \n\t"
  2169. " jb 3f \n\t"
  2170. "lea (%%"REG_a", %2, 2), %%"REG_d" \n\t" // 5*stride
  2171. "lea (%%"REG_d", %2, 2), %%"REG_c" \n\t" // 7*stride
  2172. "movq (%0), %%mm0 \n\t" // L0
  2173. "movq (%0, %2), %%mm1 \n\t" // L1
  2174. "movq (%0, %2, 2), %%mm2 \n\t" // L2
  2175. "movq (%0, %%"REG_a"), %%mm3 \n\t" // L3
  2176. "movq (%1), %%mm4 \n\t" // R0
  2177. "movq (%1, %2), %%mm5 \n\t" // R1
  2178. "movq (%1, %2, 2), %%mm6 \n\t" // R2
  2179. "movq (%1, %%"REG_a"), %%mm7 \n\t" // R3
  2180. PAVGB(%%mm4, %%mm0)
  2181. PAVGB(%%mm5, %%mm1)
  2182. PAVGB(%%mm6, %%mm2)
  2183. PAVGB(%%mm7, %%mm3)
  2184. PAVGB(%%mm4, %%mm0)
  2185. PAVGB(%%mm5, %%mm1)
  2186. PAVGB(%%mm6, %%mm2)
  2187. PAVGB(%%mm7, %%mm3)
  2188. "movq %%mm0, (%1) \n\t" // R0
  2189. "movq %%mm1, (%1, %2) \n\t" // R1
  2190. "movq %%mm2, (%1, %2, 2) \n\t" // R2
  2191. "movq %%mm3, (%1, %%"REG_a") \n\t" // R3
  2192. "movq %%mm0, (%0) \n\t" // L0
  2193. "movq %%mm1, (%0, %2) \n\t" // L1
  2194. "movq %%mm2, (%0, %2, 2) \n\t" // L2
  2195. "movq %%mm3, (%0, %%"REG_a") \n\t" // L3
  2196. "movq (%0, %2, 4), %%mm0 \n\t" // L4
  2197. "movq (%0, %%"REG_d"), %%mm1 \n\t" // L5
  2198. "movq (%0, %%"REG_a", 2), %%mm2 \n\t" // L6
  2199. "movq (%0, %%"REG_c"), %%mm3 \n\t" // L7
  2200. "movq (%1, %2, 4), %%mm4 \n\t" // R4
  2201. "movq (%1, %%"REG_d"), %%mm5 \n\t" // R5
  2202. "movq (%1, %%"REG_a", 2), %%mm6 \n\t" // R6
  2203. "movq (%1, %%"REG_c"), %%mm7 \n\t" // R7
  2204. PAVGB(%%mm4, %%mm0)
  2205. PAVGB(%%mm5, %%mm1)
  2206. PAVGB(%%mm6, %%mm2)
  2207. PAVGB(%%mm7, %%mm3)
  2208. PAVGB(%%mm4, %%mm0)
  2209. PAVGB(%%mm5, %%mm1)
  2210. PAVGB(%%mm6, %%mm2)
  2211. PAVGB(%%mm7, %%mm3)
  2212. "movq %%mm0, (%1, %2, 4) \n\t" // R4
  2213. "movq %%mm1, (%1, %%"REG_d") \n\t" // R5
  2214. "movq %%mm2, (%1, %%"REG_a", 2) \n\t" // R6
  2215. "movq %%mm3, (%1, %%"REG_c") \n\t" // R7
  2216. "movq %%mm0, (%0, %2, 4) \n\t" // L4
  2217. "movq %%mm1, (%0, %%"REG_d") \n\t" // L5
  2218. "movq %%mm2, (%0, %%"REG_a", 2) \n\t" // L6
  2219. "movq %%mm3, (%0, %%"REG_c") \n\t" // L7
  2220. "jmp 4f \n\t"
  2221. "3: \n\t"
  2222. "lea (%%"REG_a", %2, 2), %%"REG_d" \n\t" // 5*stride
  2223. "lea (%%"REG_d", %2, 2), %%"REG_c" \n\t" // 7*stride
  2224. "movq (%0), %%mm0 \n\t" // L0
  2225. "movq (%0, %2), %%mm1 \n\t" // L1
  2226. "movq (%0, %2, 2), %%mm2 \n\t" // L2
  2227. "movq (%0, %%"REG_a"), %%mm3 \n\t" // L3
  2228. "movq (%1), %%mm4 \n\t" // R0
  2229. "movq (%1, %2), %%mm5 \n\t" // R1
  2230. "movq (%1, %2, 2), %%mm6 \n\t" // R2
  2231. "movq (%1, %%"REG_a"), %%mm7 \n\t" // R3
  2232. PAVGB(%%mm4, %%mm0)
  2233. PAVGB(%%mm5, %%mm1)
  2234. PAVGB(%%mm6, %%mm2)
  2235. PAVGB(%%mm7, %%mm3)
  2236. PAVGB(%%mm4, %%mm0)
  2237. PAVGB(%%mm5, %%mm1)
  2238. PAVGB(%%mm6, %%mm2)
  2239. PAVGB(%%mm7, %%mm3)
  2240. PAVGB(%%mm4, %%mm0)
  2241. PAVGB(%%mm5, %%mm1)
  2242. PAVGB(%%mm6, %%mm2)
  2243. PAVGB(%%mm7, %%mm3)
  2244. "movq %%mm0, (%1) \n\t" // R0
  2245. "movq %%mm1, (%1, %2) \n\t" // R1
  2246. "movq %%mm2, (%1, %2, 2) \n\t" // R2
  2247. "movq %%mm3, (%1, %%"REG_a") \n\t" // R3
  2248. "movq %%mm0, (%0) \n\t" // L0
  2249. "movq %%mm1, (%0, %2) \n\t" // L1
  2250. "movq %%mm2, (%0, %2, 2) \n\t" // L2
  2251. "movq %%mm3, (%0, %%"REG_a") \n\t" // L3
  2252. "movq (%0, %2, 4), %%mm0 \n\t" // L4
  2253. "movq (%0, %%"REG_d"), %%mm1 \n\t" // L5
  2254. "movq (%0, %%"REG_a", 2), %%mm2 \n\t" // L6
  2255. "movq (%0, %%"REG_c"), %%mm3 \n\t" // L7
  2256. "movq (%1, %2, 4), %%mm4 \n\t" // R4
  2257. "movq (%1, %%"REG_d"), %%mm5 \n\t" // R5
  2258. "movq (%1, %%"REG_a", 2), %%mm6 \n\t" // R6
  2259. "movq (%1, %%"REG_c"), %%mm7 \n\t" // R7
  2260. PAVGB(%%mm4, %%mm0)
  2261. PAVGB(%%mm5, %%mm1)
  2262. PAVGB(%%mm6, %%mm2)
  2263. PAVGB(%%mm7, %%mm3)
  2264. PAVGB(%%mm4, %%mm0)
  2265. PAVGB(%%mm5, %%mm1)
  2266. PAVGB(%%mm6, %%mm2)
  2267. PAVGB(%%mm7, %%mm3)
  2268. PAVGB(%%mm4, %%mm0)
  2269. PAVGB(%%mm5, %%mm1)
  2270. PAVGB(%%mm6, %%mm2)
  2271. PAVGB(%%mm7, %%mm3)
  2272. "movq %%mm0, (%1, %2, 4) \n\t" // R4
  2273. "movq %%mm1, (%1, %%"REG_d") \n\t" // R5
  2274. "movq %%mm2, (%1, %%"REG_a", 2) \n\t" // R6
  2275. "movq %%mm3, (%1, %%"REG_c") \n\t" // R7
  2276. "movq %%mm0, (%0, %2, 4) \n\t" // L4
  2277. "movq %%mm1, (%0, %%"REG_d") \n\t" // L5
  2278. "movq %%mm2, (%0, %%"REG_a", 2) \n\t" // L6
  2279. "movq %%mm3, (%0, %%"REG_c") \n\t" // L7
  2280. "4: \n\t"
  2281. :: "r" (src), "r" (tempBlured), "r"((long)stride), "m" (tempBluredPast)
  2282. : "%"REG_a, "%"REG_d, "%"REG_c, "memory"
  2283. );
  2284. //printf("%d\n", test);
  2285. #else
  2286. {
  2287. int y;
  2288. int d=0;
  2289. // int sysd=0;
  2290. int i;
  2291. for(y=0; y<8; y++)
  2292. {
  2293. int x;
  2294. for(x=0; x<8; x++)
  2295. {
  2296. int ref= tempBlured[ x + y*stride ];
  2297. int cur= src[ x + y*stride ];
  2298. int d1=ref - cur;
  2299. // if(x==0 || x==7) d1+= d1>>1;
  2300. // if(y==0 || y==7) d1+= d1>>1;
  2301. // d+= ABS(d1);
  2302. d+= d1*d1;
  2303. // sysd+= d1;
  2304. }
  2305. }
  2306. i=d;
  2307. d= (
  2308. 4*d
  2309. +(*(tempBluredPast-256))
  2310. +(*(tempBluredPast-1))+ (*(tempBluredPast+1))
  2311. +(*(tempBluredPast+256))
  2312. +4)>>3;
  2313. *tempBluredPast=i;
  2314. // ((*tempBluredPast)*3 + d + 2)>>2;
  2315. //printf("%d %d %d\n", maxNoise[0], maxNoise[1], maxNoise[2]);
  2316. /*
  2317. Switch between
  2318. 1 0 0 0 0 0 0 (0)
  2319. 64 32 16 8 4 2 1 (1)
  2320. 64 48 36 27 20 15 11 (33) (approx)
  2321. 64 56 49 43 37 33 29 (200) (approx)
  2322. */
  2323. if(d > maxNoise[1])
  2324. {
  2325. if(d < maxNoise[2])
  2326. {
  2327. for(y=0; y<8; y++)
  2328. {
  2329. int x;
  2330. for(x=0; x<8; x++)
  2331. {
  2332. int ref= tempBlured[ x + y*stride ];
  2333. int cur= src[ x + y*stride ];
  2334. tempBlured[ x + y*stride ]=
  2335. src[ x + y*stride ]=
  2336. (ref + cur + 1)>>1;
  2337. }
  2338. }
  2339. }
  2340. else
  2341. {
  2342. for(y=0; y<8; y++)
  2343. {
  2344. int x;
  2345. for(x=0; x<8; x++)
  2346. {
  2347. tempBlured[ x + y*stride ]= src[ x + y*stride ];
  2348. }
  2349. }
  2350. }
  2351. }
  2352. else
  2353. {
  2354. if(d < maxNoise[0])
  2355. {
  2356. for(y=0; y<8; y++)
  2357. {
  2358. int x;
  2359. for(x=0; x<8; x++)
  2360. {
  2361. int ref= tempBlured[ x + y*stride ];
  2362. int cur= src[ x + y*stride ];
  2363. tempBlured[ x + y*stride ]=
  2364. src[ x + y*stride ]=
  2365. (ref*7 + cur + 4)>>3;
  2366. }
  2367. }
  2368. }
  2369. else
  2370. {
  2371. for(y=0; y<8; y++)
  2372. {
  2373. int x;
  2374. for(x=0; x<8; x++)
  2375. {
  2376. int ref= tempBlured[ x + y*stride ];
  2377. int cur= src[ x + y*stride ];
  2378. tempBlured[ x + y*stride ]=
  2379. src[ x + y*stride ]=
  2380. (ref*3 + cur + 2)>>2;
  2381. }
  2382. }
  2383. }
  2384. }
  2385. }
  2386. #endif
  2387. }
  2388. #endif //HAVE_ALTIVEC
  2389. #ifdef HAVE_MMX
  2390. /**
  2391. * accurate deblock filter
  2392. */
  2393. static always_inline void RENAME(do_a_deblock)(uint8_t *src, int step, int stride, PPContext *c){
  2394. int64_t dc_mask, eq_mask, both_masks;
  2395. int64_t sums[10*8*2];
  2396. src+= step*3; // src points to begin of the 8x8 Block
  2397. //START_TIMER
  2398. asm volatile(
  2399. "movq %0, %%mm7 \n\t"
  2400. "movq %1, %%mm6 \n\t"
  2401. : : "m" (c->mmxDcOffset[c->nonBQP]), "m" (c->mmxDcThreshold[c->nonBQP])
  2402. );
  2403. asm volatile(
  2404. "lea (%2, %3), %%"REG_a" \n\t"
  2405. // 0 1 2 3 4 5 6 7 8 9
  2406. // %1 eax eax+%2 eax+2%2 %1+4%2 ecx ecx+%2 ecx+2%2 %1+8%2 ecx+4%2
  2407. "movq (%2), %%mm0 \n\t"
  2408. "movq (%%"REG_a"), %%mm1 \n\t"
  2409. "movq %%mm1, %%mm3 \n\t"
  2410. "movq %%mm1, %%mm4 \n\t"
  2411. "psubb %%mm1, %%mm0 \n\t" // mm0 = differnece
  2412. "paddb %%mm7, %%mm0 \n\t"
  2413. "pcmpgtb %%mm6, %%mm0 \n\t"
  2414. "movq (%%"REG_a",%3), %%mm2 \n\t"
  2415. PMAXUB(%%mm2, %%mm4)
  2416. PMINUB(%%mm2, %%mm3, %%mm5)
  2417. "psubb %%mm2, %%mm1 \n\t"
  2418. "paddb %%mm7, %%mm1 \n\t"
  2419. "pcmpgtb %%mm6, %%mm1 \n\t"
  2420. "paddb %%mm1, %%mm0 \n\t"
  2421. "movq (%%"REG_a", %3, 2), %%mm1 \n\t"
  2422. PMAXUB(%%mm1, %%mm4)
  2423. PMINUB(%%mm1, %%mm3, %%mm5)
  2424. "psubb %%mm1, %%mm2 \n\t"
  2425. "paddb %%mm7, %%mm2 \n\t"
  2426. "pcmpgtb %%mm6, %%mm2 \n\t"
  2427. "paddb %%mm2, %%mm0 \n\t"
  2428. "lea (%%"REG_a", %3, 4), %%"REG_a" \n\t"
  2429. "movq (%2, %3, 4), %%mm2 \n\t"
  2430. PMAXUB(%%mm2, %%mm4)
  2431. PMINUB(%%mm2, %%mm3, %%mm5)
  2432. "psubb %%mm2, %%mm1 \n\t"
  2433. "paddb %%mm7, %%mm1 \n\t"
  2434. "pcmpgtb %%mm6, %%mm1 \n\t"
  2435. "paddb %%mm1, %%mm0 \n\t"
  2436. "movq (%%"REG_a"), %%mm1 \n\t"
  2437. PMAXUB(%%mm1, %%mm4)
  2438. PMINUB(%%mm1, %%mm3, %%mm5)
  2439. "psubb %%mm1, %%mm2 \n\t"
  2440. "paddb %%mm7, %%mm2 \n\t"
  2441. "pcmpgtb %%mm6, %%mm2 \n\t"
  2442. "paddb %%mm2, %%mm0 \n\t"
  2443. "movq (%%"REG_a", %3), %%mm2 \n\t"
  2444. PMAXUB(%%mm2, %%mm4)
  2445. PMINUB(%%mm2, %%mm3, %%mm5)
  2446. "psubb %%mm2, %%mm1 \n\t"
  2447. "paddb %%mm7, %%mm1 \n\t"
  2448. "pcmpgtb %%mm6, %%mm1 \n\t"
  2449. "paddb %%mm1, %%mm0 \n\t"
  2450. "movq (%%"REG_a", %3, 2), %%mm1 \n\t"
  2451. PMAXUB(%%mm1, %%mm4)
  2452. PMINUB(%%mm1, %%mm3, %%mm5)
  2453. "psubb %%mm1, %%mm2 \n\t"
  2454. "paddb %%mm7, %%mm2 \n\t"
  2455. "pcmpgtb %%mm6, %%mm2 \n\t"
  2456. "paddb %%mm2, %%mm0 \n\t"
  2457. "movq (%2, %3, 8), %%mm2 \n\t"
  2458. PMAXUB(%%mm2, %%mm4)
  2459. PMINUB(%%mm2, %%mm3, %%mm5)
  2460. "psubb %%mm2, %%mm1 \n\t"
  2461. "paddb %%mm7, %%mm1 \n\t"
  2462. "pcmpgtb %%mm6, %%mm1 \n\t"
  2463. "paddb %%mm1, %%mm0 \n\t"
  2464. "movq (%%"REG_a", %3, 4), %%mm1 \n\t"
  2465. "psubb %%mm1, %%mm2 \n\t"
  2466. "paddb %%mm7, %%mm2 \n\t"
  2467. "pcmpgtb %%mm6, %%mm2 \n\t"
  2468. "paddb %%mm2, %%mm0 \n\t"
  2469. "psubusb %%mm3, %%mm4 \n\t"
  2470. "pxor %%mm6, %%mm6 \n\t"
  2471. "movq %4, %%mm7 \n\t" // QP,..., QP
  2472. "paddusb %%mm7, %%mm7 \n\t" // 2QP ... 2QP
  2473. "psubusb %%mm4, %%mm7 \n\t" // Diff >=2QP -> 0
  2474. "pcmpeqb %%mm6, %%mm7 \n\t" // Diff < 2QP -> 0
  2475. "pcmpeqb %%mm6, %%mm7 \n\t" // Diff < 2QP -> 0
  2476. "movq %%mm7, %1 \n\t"
  2477. "movq %5, %%mm7 \n\t"
  2478. "punpcklbw %%mm7, %%mm7 \n\t"
  2479. "punpcklbw %%mm7, %%mm7 \n\t"
  2480. "punpcklbw %%mm7, %%mm7 \n\t"
  2481. "psubb %%mm0, %%mm6 \n\t"
  2482. "pcmpgtb %%mm7, %%mm6 \n\t"
  2483. "movq %%mm6, %0 \n\t"
  2484. : "=m" (eq_mask), "=m" (dc_mask)
  2485. : "r" (src), "r" ((long)step), "m" (c->pQPb), "m"(c->ppMode.flatnessThreshold)
  2486. : "%"REG_a
  2487. );
  2488. both_masks = dc_mask & eq_mask;
  2489. if(both_masks){
  2490. long offset= -8*step;
  2491. int64_t *temp_sums= sums;
  2492. asm volatile(
  2493. "movq %2, %%mm0 \n\t" // QP,..., QP
  2494. "pxor %%mm4, %%mm4 \n\t"
  2495. "movq (%0), %%mm6 \n\t"
  2496. "movq (%0, %1), %%mm5 \n\t"
  2497. "movq %%mm5, %%mm1 \n\t"
  2498. "movq %%mm6, %%mm2 \n\t"
  2499. "psubusb %%mm6, %%mm5 \n\t"
  2500. "psubusb %%mm1, %%mm2 \n\t"
  2501. "por %%mm5, %%mm2 \n\t" // ABS Diff of lines
  2502. "psubusb %%mm2, %%mm0 \n\t" // diff >= QP -> 0
  2503. "pcmpeqb %%mm4, %%mm0 \n\t" // diff >= QP -> FF
  2504. "pxor %%mm6, %%mm1 \n\t"
  2505. "pand %%mm0, %%mm1 \n\t"
  2506. "pxor %%mm1, %%mm6 \n\t"
  2507. // 0:QP 6:First
  2508. "movq (%0, %1, 8), %%mm5 \n\t"
  2509. "add %1, %0 \n\t" // %0 points to line 1 not 0
  2510. "movq (%0, %1, 8), %%mm7 \n\t"
  2511. "movq %%mm5, %%mm1 \n\t"
  2512. "movq %%mm7, %%mm2 \n\t"
  2513. "psubusb %%mm7, %%mm5 \n\t"
  2514. "psubusb %%mm1, %%mm2 \n\t"
  2515. "por %%mm5, %%mm2 \n\t" // ABS Diff of lines
  2516. "movq %2, %%mm0 \n\t" // QP,..., QP
  2517. "psubusb %%mm2, %%mm0 \n\t" // diff >= QP -> 0
  2518. "pcmpeqb %%mm4, %%mm0 \n\t" // diff >= QP -> FF
  2519. "pxor %%mm7, %%mm1 \n\t"
  2520. "pand %%mm0, %%mm1 \n\t"
  2521. "pxor %%mm1, %%mm7 \n\t"
  2522. "movq %%mm6, %%mm5 \n\t"
  2523. "punpckhbw %%mm4, %%mm6 \n\t"
  2524. "punpcklbw %%mm4, %%mm5 \n\t"
  2525. // 4:0 5/6:First 7:Last
  2526. "movq %%mm5, %%mm0 \n\t"
  2527. "movq %%mm6, %%mm1 \n\t"
  2528. "psllw $2, %%mm0 \n\t"
  2529. "psllw $2, %%mm1 \n\t"
  2530. "paddw "MANGLE(w04)", %%mm0 \n\t"
  2531. "paddw "MANGLE(w04)", %%mm1 \n\t"
  2532. #define NEXT\
  2533. "movq (%0), %%mm2 \n\t"\
  2534. "movq (%0), %%mm3 \n\t"\
  2535. "add %1, %0 \n\t"\
  2536. "punpcklbw %%mm4, %%mm2 \n\t"\
  2537. "punpckhbw %%mm4, %%mm3 \n\t"\
  2538. "paddw %%mm2, %%mm0 \n\t"\
  2539. "paddw %%mm3, %%mm1 \n\t"
  2540. #define PREV\
  2541. "movq (%0), %%mm2 \n\t"\
  2542. "movq (%0), %%mm3 \n\t"\
  2543. "add %1, %0 \n\t"\
  2544. "punpcklbw %%mm4, %%mm2 \n\t"\
  2545. "punpckhbw %%mm4, %%mm3 \n\t"\
  2546. "psubw %%mm2, %%mm0 \n\t"\
  2547. "psubw %%mm3, %%mm1 \n\t"
  2548. NEXT //0
  2549. NEXT //1
  2550. NEXT //2
  2551. "movq %%mm0, (%3) \n\t"
  2552. "movq %%mm1, 8(%3) \n\t"
  2553. NEXT //3
  2554. "psubw %%mm5, %%mm0 \n\t"
  2555. "psubw %%mm6, %%mm1 \n\t"
  2556. "movq %%mm0, 16(%3) \n\t"
  2557. "movq %%mm1, 24(%3) \n\t"
  2558. NEXT //4
  2559. "psubw %%mm5, %%mm0 \n\t"
  2560. "psubw %%mm6, %%mm1 \n\t"
  2561. "movq %%mm0, 32(%3) \n\t"
  2562. "movq %%mm1, 40(%3) \n\t"
  2563. NEXT //5
  2564. "psubw %%mm5, %%mm0 \n\t"
  2565. "psubw %%mm6, %%mm1 \n\t"
  2566. "movq %%mm0, 48(%3) \n\t"
  2567. "movq %%mm1, 56(%3) \n\t"
  2568. NEXT //6
  2569. "psubw %%mm5, %%mm0 \n\t"
  2570. "psubw %%mm6, %%mm1 \n\t"
  2571. "movq %%mm0, 64(%3) \n\t"
  2572. "movq %%mm1, 72(%3) \n\t"
  2573. "movq %%mm7, %%mm6 \n\t"
  2574. "punpckhbw %%mm4, %%mm7 \n\t"
  2575. "punpcklbw %%mm4, %%mm6 \n\t"
  2576. NEXT //7
  2577. "mov %4, %0 \n\t"
  2578. "add %1, %0 \n\t"
  2579. PREV //0
  2580. "movq %%mm0, 80(%3) \n\t"
  2581. "movq %%mm1, 88(%3) \n\t"
  2582. PREV //1
  2583. "paddw %%mm6, %%mm0 \n\t"
  2584. "paddw %%mm7, %%mm1 \n\t"
  2585. "movq %%mm0, 96(%3) \n\t"
  2586. "movq %%mm1, 104(%3) \n\t"
  2587. PREV //2
  2588. "paddw %%mm6, %%mm0 \n\t"
  2589. "paddw %%mm7, %%mm1 \n\t"
  2590. "movq %%mm0, 112(%3) \n\t"
  2591. "movq %%mm1, 120(%3) \n\t"
  2592. PREV //3
  2593. "paddw %%mm6, %%mm0 \n\t"
  2594. "paddw %%mm7, %%mm1 \n\t"
  2595. "movq %%mm0, 128(%3) \n\t"
  2596. "movq %%mm1, 136(%3) \n\t"
  2597. PREV //4
  2598. "paddw %%mm6, %%mm0 \n\t"
  2599. "paddw %%mm7, %%mm1 \n\t"
  2600. "movq %%mm0, 144(%3) \n\t"
  2601. "movq %%mm1, 152(%3) \n\t"
  2602. "mov %4, %0 \n\t" //FIXME
  2603. : "+&r"(src)
  2604. : "r" ((long)step), "m" (c->pQPb), "r"(sums), "g"(src)
  2605. );
  2606. src+= step; // src points to begin of the 8x8 Block
  2607. asm volatile(
  2608. "movq %4, %%mm6 \n\t"
  2609. "pcmpeqb %%mm5, %%mm5 \n\t"
  2610. "pxor %%mm6, %%mm5 \n\t"
  2611. "pxor %%mm7, %%mm7 \n\t"
  2612. "1: \n\t"
  2613. "movq (%1), %%mm0 \n\t"
  2614. "movq 8(%1), %%mm1 \n\t"
  2615. "paddw 32(%1), %%mm0 \n\t"
  2616. "paddw 40(%1), %%mm1 \n\t"
  2617. "movq (%0, %3), %%mm2 \n\t"
  2618. "movq %%mm2, %%mm3 \n\t"
  2619. "movq %%mm2, %%mm4 \n\t"
  2620. "punpcklbw %%mm7, %%mm2 \n\t"
  2621. "punpckhbw %%mm7, %%mm3 \n\t"
  2622. "paddw %%mm2, %%mm0 \n\t"
  2623. "paddw %%mm3, %%mm1 \n\t"
  2624. "paddw %%mm2, %%mm0 \n\t"
  2625. "paddw %%mm3, %%mm1 \n\t"
  2626. "psrlw $4, %%mm0 \n\t"
  2627. "psrlw $4, %%mm1 \n\t"
  2628. "packuswb %%mm1, %%mm0 \n\t"
  2629. "pand %%mm6, %%mm0 \n\t"
  2630. "pand %%mm5, %%mm4 \n\t"
  2631. "por %%mm4, %%mm0 \n\t"
  2632. "movq %%mm0, (%0, %3) \n\t"
  2633. "add $16, %1 \n\t"
  2634. "add %2, %0 \n\t"
  2635. " js 1b \n\t"
  2636. : "+r"(offset), "+r"(temp_sums)
  2637. : "r" ((long)step), "r"(src - offset), "m"(both_masks)
  2638. );
  2639. }else
  2640. src+= step; // src points to begin of the 8x8 Block
  2641. if(eq_mask != -1LL){
  2642. uint8_t *temp_src= src;
  2643. asm volatile(
  2644. "pxor %%mm7, %%mm7 \n\t"
  2645. "lea -40(%%"REG_SP"), %%"REG_c" \n\t" // make space for 4 8-byte vars
  2646. "and "ALIGN_MASK", %%"REG_c" \n\t" // align
  2647. // 0 1 2 3 4 5 6 7 8 9
  2648. // %0 eax eax+%1 eax+2%1 %0+4%1 ecx ecx+%1 ecx+2%1 %1+8%1 ecx+4%1
  2649. "movq (%0), %%mm0 \n\t"
  2650. "movq %%mm0, %%mm1 \n\t"
  2651. "punpcklbw %%mm7, %%mm0 \n\t" // low part of line 0
  2652. "punpckhbw %%mm7, %%mm1 \n\t" // high part of line 0
  2653. "movq (%0, %1), %%mm2 \n\t"
  2654. "lea (%0, %1, 2), %%"REG_a" \n\t"
  2655. "movq %%mm2, %%mm3 \n\t"
  2656. "punpcklbw %%mm7, %%mm2 \n\t" // low part of line 1
  2657. "punpckhbw %%mm7, %%mm3 \n\t" // high part of line 1
  2658. "movq (%%"REG_a"), %%mm4 \n\t"
  2659. "movq %%mm4, %%mm5 \n\t"
  2660. "punpcklbw %%mm7, %%mm4 \n\t" // low part of line 2
  2661. "punpckhbw %%mm7, %%mm5 \n\t" // high part of line 2
  2662. "paddw %%mm0, %%mm0 \n\t" // 2L0
  2663. "paddw %%mm1, %%mm1 \n\t" // 2H0
  2664. "psubw %%mm4, %%mm2 \n\t" // L1 - L2
  2665. "psubw %%mm5, %%mm3 \n\t" // H1 - H2
  2666. "psubw %%mm2, %%mm0 \n\t" // 2L0 - L1 + L2
  2667. "psubw %%mm3, %%mm1 \n\t" // 2H0 - H1 + H2
  2668. "psllw $2, %%mm2 \n\t" // 4L1 - 4L2
  2669. "psllw $2, %%mm3 \n\t" // 4H1 - 4H2
  2670. "psubw %%mm2, %%mm0 \n\t" // 2L0 - 5L1 + 5L2
  2671. "psubw %%mm3, %%mm1 \n\t" // 2H0 - 5H1 + 5H2
  2672. "movq (%%"REG_a", %1), %%mm2 \n\t"
  2673. "movq %%mm2, %%mm3 \n\t"
  2674. "punpcklbw %%mm7, %%mm2 \n\t" // L3
  2675. "punpckhbw %%mm7, %%mm3 \n\t" // H3
  2676. "psubw %%mm2, %%mm0 \n\t" // 2L0 - 5L1 + 5L2 - L3
  2677. "psubw %%mm3, %%mm1 \n\t" // 2H0 - 5H1 + 5H2 - H3
  2678. "psubw %%mm2, %%mm0 \n\t" // 2L0 - 5L1 + 5L2 - 2L3
  2679. "psubw %%mm3, %%mm1 \n\t" // 2H0 - 5H1 + 5H2 - 2H3
  2680. "movq %%mm0, (%%"REG_c") \n\t" // 2L0 - 5L1 + 5L2 - 2L3
  2681. "movq %%mm1, 8(%%"REG_c") \n\t" // 2H0 - 5H1 + 5H2 - 2H3
  2682. "movq (%%"REG_a", %1, 2), %%mm0 \n\t"
  2683. "movq %%mm0, %%mm1 \n\t"
  2684. "punpcklbw %%mm7, %%mm0 \n\t" // L4
  2685. "punpckhbw %%mm7, %%mm1 \n\t" // H4
  2686. "psubw %%mm0, %%mm2 \n\t" // L3 - L4
  2687. "psubw %%mm1, %%mm3 \n\t" // H3 - H4
  2688. "movq %%mm2, 16(%%"REG_c") \n\t" // L3 - L4
  2689. "movq %%mm3, 24(%%"REG_c") \n\t" // H3 - H4
  2690. "paddw %%mm4, %%mm4 \n\t" // 2L2
  2691. "paddw %%mm5, %%mm5 \n\t" // 2H2
  2692. "psubw %%mm2, %%mm4 \n\t" // 2L2 - L3 + L4
  2693. "psubw %%mm3, %%mm5 \n\t" // 2H2 - H3 + H4
  2694. "lea (%%"REG_a", %1), %0 \n\t"
  2695. "psllw $2, %%mm2 \n\t" // 4L3 - 4L4
  2696. "psllw $2, %%mm3 \n\t" // 4H3 - 4H4
  2697. "psubw %%mm2, %%mm4 \n\t" // 2L2 - 5L3 + 5L4
  2698. "psubw %%mm3, %%mm5 \n\t" // 2H2 - 5H3 + 5H4
  2699. //50 opcodes so far
  2700. "movq (%0, %1, 2), %%mm2 \n\t"
  2701. "movq %%mm2, %%mm3 \n\t"
  2702. "punpcklbw %%mm7, %%mm2 \n\t" // L5
  2703. "punpckhbw %%mm7, %%mm3 \n\t" // H5
  2704. "psubw %%mm2, %%mm4 \n\t" // 2L2 - 5L3 + 5L4 - L5
  2705. "psubw %%mm3, %%mm5 \n\t" // 2H2 - 5H3 + 5H4 - H5
  2706. "psubw %%mm2, %%mm4 \n\t" // 2L2 - 5L3 + 5L4 - 2L5
  2707. "psubw %%mm3, %%mm5 \n\t" // 2H2 - 5H3 + 5H4 - 2H5
  2708. "movq (%%"REG_a", %1, 4), %%mm6 \n\t"
  2709. "punpcklbw %%mm7, %%mm6 \n\t" // L6
  2710. "psubw %%mm6, %%mm2 \n\t" // L5 - L6
  2711. "movq (%%"REG_a", %1, 4), %%mm6 \n\t"
  2712. "punpckhbw %%mm7, %%mm6 \n\t" // H6
  2713. "psubw %%mm6, %%mm3 \n\t" // H5 - H6
  2714. "paddw %%mm0, %%mm0 \n\t" // 2L4
  2715. "paddw %%mm1, %%mm1 \n\t" // 2H4
  2716. "psubw %%mm2, %%mm0 \n\t" // 2L4 - L5 + L6
  2717. "psubw %%mm3, %%mm1 \n\t" // 2H4 - H5 + H6
  2718. "psllw $2, %%mm2 \n\t" // 4L5 - 4L6
  2719. "psllw $2, %%mm3 \n\t" // 4H5 - 4H6
  2720. "psubw %%mm2, %%mm0 \n\t" // 2L4 - 5L5 + 5L6
  2721. "psubw %%mm3, %%mm1 \n\t" // 2H4 - 5H5 + 5H6
  2722. "movq (%0, %1, 4), %%mm2 \n\t"
  2723. "movq %%mm2, %%mm3 \n\t"
  2724. "punpcklbw %%mm7, %%mm2 \n\t" // L7
  2725. "punpckhbw %%mm7, %%mm3 \n\t" // H7
  2726. "paddw %%mm2, %%mm2 \n\t" // 2L7
  2727. "paddw %%mm3, %%mm3 \n\t" // 2H7
  2728. "psubw %%mm2, %%mm0 \n\t" // 2L4 - 5L5 + 5L6 - 2L7
  2729. "psubw %%mm3, %%mm1 \n\t" // 2H4 - 5H5 + 5H6 - 2H7
  2730. "movq (%%"REG_c"), %%mm2 \n\t" // 2L0 - 5L1 + 5L2 - 2L3
  2731. "movq 8(%%"REG_c"), %%mm3 \n\t" // 2H0 - 5H1 + 5H2 - 2H3
  2732. #ifdef HAVE_MMX2
  2733. "movq %%mm7, %%mm6 \n\t" // 0
  2734. "psubw %%mm0, %%mm6 \n\t"
  2735. "pmaxsw %%mm6, %%mm0 \n\t" // |2L4 - 5L5 + 5L6 - 2L7|
  2736. "movq %%mm7, %%mm6 \n\t" // 0
  2737. "psubw %%mm1, %%mm6 \n\t"
  2738. "pmaxsw %%mm6, %%mm1 \n\t" // |2H4 - 5H5 + 5H6 - 2H7|
  2739. "movq %%mm7, %%mm6 \n\t" // 0
  2740. "psubw %%mm2, %%mm6 \n\t"
  2741. "pmaxsw %%mm6, %%mm2 \n\t" // |2L0 - 5L1 + 5L2 - 2L3|
  2742. "movq %%mm7, %%mm6 \n\t" // 0
  2743. "psubw %%mm3, %%mm6 \n\t"
  2744. "pmaxsw %%mm6, %%mm3 \n\t" // |2H0 - 5H1 + 5H2 - 2H3|
  2745. #else
  2746. "movq %%mm7, %%mm6 \n\t" // 0
  2747. "pcmpgtw %%mm0, %%mm6 \n\t"
  2748. "pxor %%mm6, %%mm0 \n\t"
  2749. "psubw %%mm6, %%mm0 \n\t" // |2L4 - 5L5 + 5L6 - 2L7|
  2750. "movq %%mm7, %%mm6 \n\t" // 0
  2751. "pcmpgtw %%mm1, %%mm6 \n\t"
  2752. "pxor %%mm6, %%mm1 \n\t"
  2753. "psubw %%mm6, %%mm1 \n\t" // |2H4 - 5H5 + 5H6 - 2H7|
  2754. "movq %%mm7, %%mm6 \n\t" // 0
  2755. "pcmpgtw %%mm2, %%mm6 \n\t"
  2756. "pxor %%mm6, %%mm2 \n\t"
  2757. "psubw %%mm6, %%mm2 \n\t" // |2L0 - 5L1 + 5L2 - 2L3|
  2758. "movq %%mm7, %%mm6 \n\t" // 0
  2759. "pcmpgtw %%mm3, %%mm6 \n\t"
  2760. "pxor %%mm6, %%mm3 \n\t"
  2761. "psubw %%mm6, %%mm3 \n\t" // |2H0 - 5H1 + 5H2 - 2H3|
  2762. #endif
  2763. #ifdef HAVE_MMX2
  2764. "pminsw %%mm2, %%mm0 \n\t"
  2765. "pminsw %%mm3, %%mm1 \n\t"
  2766. #else
  2767. "movq %%mm0, %%mm6 \n\t"
  2768. "psubusw %%mm2, %%mm6 \n\t"
  2769. "psubw %%mm6, %%mm0 \n\t"
  2770. "movq %%mm1, %%mm6 \n\t"
  2771. "psubusw %%mm3, %%mm6 \n\t"
  2772. "psubw %%mm6, %%mm1 \n\t"
  2773. #endif
  2774. "movd %2, %%mm2 \n\t" // QP
  2775. "punpcklbw %%mm7, %%mm2 \n\t"
  2776. "movq %%mm7, %%mm6 \n\t" // 0
  2777. "pcmpgtw %%mm4, %%mm6 \n\t" // sign(2L2 - 5L3 + 5L4 - 2L5)
  2778. "pxor %%mm6, %%mm4 \n\t"
  2779. "psubw %%mm6, %%mm4 \n\t" // |2L2 - 5L3 + 5L4 - 2L5|
  2780. "pcmpgtw %%mm5, %%mm7 \n\t" // sign(2H2 - 5H3 + 5H4 - 2H5)
  2781. "pxor %%mm7, %%mm5 \n\t"
  2782. "psubw %%mm7, %%mm5 \n\t" // |2H2 - 5H3 + 5H4 - 2H5|
  2783. // 100 opcodes
  2784. "psllw $3, %%mm2 \n\t" // 8QP
  2785. "movq %%mm2, %%mm3 \n\t" // 8QP
  2786. "pcmpgtw %%mm4, %%mm2 \n\t"
  2787. "pcmpgtw %%mm5, %%mm3 \n\t"
  2788. "pand %%mm2, %%mm4 \n\t"
  2789. "pand %%mm3, %%mm5 \n\t"
  2790. "psubusw %%mm0, %%mm4 \n\t" // hd
  2791. "psubusw %%mm1, %%mm5 \n\t" // ld
  2792. "movq "MANGLE(w05)", %%mm2 \n\t" // 5
  2793. "pmullw %%mm2, %%mm4 \n\t"
  2794. "pmullw %%mm2, %%mm5 \n\t"
  2795. "movq "MANGLE(w20)", %%mm2 \n\t" // 32
  2796. "paddw %%mm2, %%mm4 \n\t"
  2797. "paddw %%mm2, %%mm5 \n\t"
  2798. "psrlw $6, %%mm4 \n\t"
  2799. "psrlw $6, %%mm5 \n\t"
  2800. "movq 16(%%"REG_c"), %%mm0 \n\t" // L3 - L4
  2801. "movq 24(%%"REG_c"), %%mm1 \n\t" // H3 - H4
  2802. "pxor %%mm2, %%mm2 \n\t"
  2803. "pxor %%mm3, %%mm3 \n\t"
  2804. "pcmpgtw %%mm0, %%mm2 \n\t" // sign (L3-L4)
  2805. "pcmpgtw %%mm1, %%mm3 \n\t" // sign (H3-H4)
  2806. "pxor %%mm2, %%mm0 \n\t"
  2807. "pxor %%mm3, %%mm1 \n\t"
  2808. "psubw %%mm2, %%mm0 \n\t" // |L3-L4|
  2809. "psubw %%mm3, %%mm1 \n\t" // |H3-H4|
  2810. "psrlw $1, %%mm0 \n\t" // |L3 - L4|/2
  2811. "psrlw $1, %%mm1 \n\t" // |H3 - H4|/2
  2812. "pxor %%mm6, %%mm2 \n\t"
  2813. "pxor %%mm7, %%mm3 \n\t"
  2814. "pand %%mm2, %%mm4 \n\t"
  2815. "pand %%mm3, %%mm5 \n\t"
  2816. #ifdef HAVE_MMX2
  2817. "pminsw %%mm0, %%mm4 \n\t"
  2818. "pminsw %%mm1, %%mm5 \n\t"
  2819. #else
  2820. "movq %%mm4, %%mm2 \n\t"
  2821. "psubusw %%mm0, %%mm2 \n\t"
  2822. "psubw %%mm2, %%mm4 \n\t"
  2823. "movq %%mm5, %%mm2 \n\t"
  2824. "psubusw %%mm1, %%mm2 \n\t"
  2825. "psubw %%mm2, %%mm5 \n\t"
  2826. #endif
  2827. "pxor %%mm6, %%mm4 \n\t"
  2828. "pxor %%mm7, %%mm5 \n\t"
  2829. "psubw %%mm6, %%mm4 \n\t"
  2830. "psubw %%mm7, %%mm5 \n\t"
  2831. "packsswb %%mm5, %%mm4 \n\t"
  2832. "movq %3, %%mm1 \n\t"
  2833. "pandn %%mm4, %%mm1 \n\t"
  2834. "movq (%0), %%mm0 \n\t"
  2835. "paddb %%mm1, %%mm0 \n\t"
  2836. "movq %%mm0, (%0) \n\t"
  2837. "movq (%0, %1), %%mm0 \n\t"
  2838. "psubb %%mm1, %%mm0 \n\t"
  2839. "movq %%mm0, (%0, %1) \n\t"
  2840. : "+r" (temp_src)
  2841. : "r" ((long)step), "m" (c->pQPb), "m"(eq_mask)
  2842. : "%"REG_a, "%"REG_c
  2843. );
  2844. }
  2845. /*if(step==16){
  2846. STOP_TIMER("step16")
  2847. }else{
  2848. STOP_TIMER("stepX")
  2849. }*/
  2850. }
  2851. #endif //HAVE_MMX
  2852. static void RENAME(postProcess)(uint8_t src[], int srcStride, uint8_t dst[], int dstStride, int width, int height,
  2853. QP_STORE_T QPs[], int QPStride, int isColor, PPContext *c);
  2854. /**
  2855. * Copies a block from src to dst and fixes the blacklevel
  2856. * levelFix == 0 -> dont touch the brighness & contrast
  2857. */
  2858. #undef SCALED_CPY
  2859. static inline void RENAME(blockCopy)(uint8_t dst[], int dstStride, uint8_t src[], int srcStride,
  2860. int levelFix, int64_t *packedOffsetAndScale)
  2861. {
  2862. #ifndef HAVE_MMX
  2863. int i;
  2864. #endif
  2865. if(levelFix)
  2866. {
  2867. #ifdef HAVE_MMX
  2868. asm volatile(
  2869. "movq (%%"REG_a"), %%mm2 \n\t" // packedYOffset
  2870. "movq 8(%%"REG_a"), %%mm3 \n\t" // packedYScale
  2871. "lea (%2,%4), %%"REG_a" \n\t"
  2872. "lea (%3,%5), %%"REG_d" \n\t"
  2873. "pxor %%mm4, %%mm4 \n\t"
  2874. #ifdef HAVE_MMX2
  2875. #define REAL_SCALED_CPY(src1, src2, dst1, dst2) \
  2876. "movq " #src1 ", %%mm0 \n\t"\
  2877. "movq " #src1 ", %%mm5 \n\t"\
  2878. "movq " #src2 ", %%mm1 \n\t"\
  2879. "movq " #src2 ", %%mm6 \n\t"\
  2880. "punpcklbw %%mm0, %%mm0 \n\t"\
  2881. "punpckhbw %%mm5, %%mm5 \n\t"\
  2882. "punpcklbw %%mm1, %%mm1 \n\t"\
  2883. "punpckhbw %%mm6, %%mm6 \n\t"\
  2884. "pmulhuw %%mm3, %%mm0 \n\t"\
  2885. "pmulhuw %%mm3, %%mm5 \n\t"\
  2886. "pmulhuw %%mm3, %%mm1 \n\t"\
  2887. "pmulhuw %%mm3, %%mm6 \n\t"\
  2888. "psubw %%mm2, %%mm0 \n\t"\
  2889. "psubw %%mm2, %%mm5 \n\t"\
  2890. "psubw %%mm2, %%mm1 \n\t"\
  2891. "psubw %%mm2, %%mm6 \n\t"\
  2892. "packuswb %%mm5, %%mm0 \n\t"\
  2893. "packuswb %%mm6, %%mm1 \n\t"\
  2894. "movq %%mm0, " #dst1 " \n\t"\
  2895. "movq %%mm1, " #dst2 " \n\t"\
  2896. #else //HAVE_MMX2
  2897. #define REAL_SCALED_CPY(src1, src2, dst1, dst2) \
  2898. "movq " #src1 ", %%mm0 \n\t"\
  2899. "movq " #src1 ", %%mm5 \n\t"\
  2900. "punpcklbw %%mm4, %%mm0 \n\t"\
  2901. "punpckhbw %%mm4, %%mm5 \n\t"\
  2902. "psubw %%mm2, %%mm0 \n\t"\
  2903. "psubw %%mm2, %%mm5 \n\t"\
  2904. "movq " #src2 ", %%mm1 \n\t"\
  2905. "psllw $6, %%mm0 \n\t"\
  2906. "psllw $6, %%mm5 \n\t"\
  2907. "pmulhw %%mm3, %%mm0 \n\t"\
  2908. "movq " #src2 ", %%mm6 \n\t"\
  2909. "pmulhw %%mm3, %%mm5 \n\t"\
  2910. "punpcklbw %%mm4, %%mm1 \n\t"\
  2911. "punpckhbw %%mm4, %%mm6 \n\t"\
  2912. "psubw %%mm2, %%mm1 \n\t"\
  2913. "psubw %%mm2, %%mm6 \n\t"\
  2914. "psllw $6, %%mm1 \n\t"\
  2915. "psllw $6, %%mm6 \n\t"\
  2916. "pmulhw %%mm3, %%mm1 \n\t"\
  2917. "pmulhw %%mm3, %%mm6 \n\t"\
  2918. "packuswb %%mm5, %%mm0 \n\t"\
  2919. "packuswb %%mm6, %%mm1 \n\t"\
  2920. "movq %%mm0, " #dst1 " \n\t"\
  2921. "movq %%mm1, " #dst2 " \n\t"\
  2922. #endif //!HAVE_MMX2
  2923. #define SCALED_CPY(src1, src2, dst1, dst2)\
  2924. REAL_SCALED_CPY(src1, src2, dst1, dst2)
  2925. SCALED_CPY((%2) , (%2, %4) , (%3) , (%3, %5))
  2926. SCALED_CPY((%2, %4, 2), (%%REGa, %4, 2), (%3, %5, 2), (%%REGd, %5, 2))
  2927. SCALED_CPY((%2, %4, 4), (%%REGa, %4, 4), (%3, %5, 4), (%%REGd, %5, 4))
  2928. "lea (%%"REG_a",%4,4), %%"REG_a" \n\t"
  2929. "lea (%%"REG_d",%5,4), %%"REG_d" \n\t"
  2930. SCALED_CPY((%%REGa, %4), (%%REGa, %4, 2), (%%REGd, %5), (%%REGd, %5, 2))
  2931. : "=&a" (packedOffsetAndScale)
  2932. : "0" (packedOffsetAndScale),
  2933. "r"(src),
  2934. "r"(dst),
  2935. "r" ((long)srcStride),
  2936. "r" ((long)dstStride)
  2937. : "%"REG_d
  2938. );
  2939. #else
  2940. for(i=0; i<8; i++)
  2941. memcpy( &(dst[dstStride*i]),
  2942. &(src[srcStride*i]), BLOCK_SIZE);
  2943. #endif
  2944. }
  2945. else
  2946. {
  2947. #ifdef HAVE_MMX
  2948. asm volatile(
  2949. "lea (%0,%2), %%"REG_a" \n\t"
  2950. "lea (%1,%3), %%"REG_d" \n\t"
  2951. #define REAL_SIMPLE_CPY(src1, src2, dst1, dst2) \
  2952. "movq " #src1 ", %%mm0 \n\t"\
  2953. "movq " #src2 ", %%mm1 \n\t"\
  2954. "movq %%mm0, " #dst1 " \n\t"\
  2955. "movq %%mm1, " #dst2 " \n\t"\
  2956. #define SIMPLE_CPY(src1, src2, dst1, dst2)\
  2957. REAL_SIMPLE_CPY(src1, src2, dst1, dst2)
  2958. SIMPLE_CPY((%0) , (%0, %2) , (%1) , (%1, %3))
  2959. SIMPLE_CPY((%0, %2, 2), (%%REGa, %2, 2), (%1, %3, 2), (%%REGd, %3, 2))
  2960. SIMPLE_CPY((%0, %2, 4), (%%REGa, %2, 4), (%1, %3, 4), (%%REGd, %3, 4))
  2961. "lea (%%"REG_a",%2,4), %%"REG_a" \n\t"
  2962. "lea (%%"REG_d",%3,4), %%"REG_d" \n\t"
  2963. SIMPLE_CPY((%%REGa, %2), (%%REGa, %2, 2), (%%REGd, %3), (%%REGd, %3, 2))
  2964. : : "r" (src),
  2965. "r" (dst),
  2966. "r" ((long)srcStride),
  2967. "r" ((long)dstStride)
  2968. : "%"REG_a, "%"REG_d
  2969. );
  2970. #else
  2971. for(i=0; i<8; i++)
  2972. memcpy( &(dst[dstStride*i]),
  2973. &(src[srcStride*i]), BLOCK_SIZE);
  2974. #endif
  2975. }
  2976. }
  2977. /**
  2978. * Duplicates the given 8 src pixels ? times upward
  2979. */
  2980. static inline void RENAME(duplicate)(uint8_t src[], int stride)
  2981. {
  2982. #ifdef HAVE_MMX
  2983. asm volatile(
  2984. "movq (%0), %%mm0 \n\t"
  2985. "add %1, %0 \n\t"
  2986. "movq %%mm0, (%0) \n\t"
  2987. "movq %%mm0, (%0, %1) \n\t"
  2988. "movq %%mm0, (%0, %1, 2) \n\t"
  2989. : "+r" (src)
  2990. : "r" ((long)-stride)
  2991. );
  2992. #else
  2993. int i;
  2994. uint8_t *p=src;
  2995. for(i=0; i<3; i++)
  2996. {
  2997. p-= stride;
  2998. memcpy(p, src, 8);
  2999. }
  3000. #endif
  3001. }
  3002. /**
  3003. * Filters array of bytes (Y or U or V values)
  3004. */
  3005. static void RENAME(postProcess)(uint8_t src[], int srcStride, uint8_t dst[], int dstStride, int width, int height,
  3006. QP_STORE_T QPs[], int QPStride, int isColor, PPContext *c2)
  3007. {
  3008. PPContext __attribute__((aligned(8))) c= *c2; //copy to stack for faster access
  3009. int x,y;
  3010. #ifdef COMPILE_TIME_MODE
  3011. const int mode= COMPILE_TIME_MODE;
  3012. #else
  3013. const int mode= isColor ? c.ppMode.chromMode : c.ppMode.lumMode;
  3014. #endif
  3015. int black=0, white=255; // blackest black and whitest white in the picture
  3016. int QPCorrecture= 256*256;
  3017. int copyAhead;
  3018. #ifdef HAVE_MMX
  3019. int i;
  3020. #endif
  3021. const int qpHShift= isColor ? 4-c.hChromaSubSample : 4;
  3022. const int qpVShift= isColor ? 4-c.vChromaSubSample : 4;
  3023. //FIXME remove
  3024. uint64_t * const yHistogram= c.yHistogram;
  3025. uint8_t * const tempSrc= srcStride > 0 ? c.tempSrc : c.tempSrc - 23*srcStride;
  3026. uint8_t * const tempDst= dstStride > 0 ? c.tempDst : c.tempDst - 23*dstStride;
  3027. //const int mbWidth= isColor ? (width+7)>>3 : (width+15)>>4;
  3028. #ifdef HAVE_MMX
  3029. for(i=0; i<57; i++){
  3030. int offset= ((i*c.ppMode.baseDcDiff)>>8) + 1;
  3031. int threshold= offset*2 + 1;
  3032. c.mmxDcOffset[i]= 0x7F - offset;
  3033. c.mmxDcThreshold[i]= 0x7F - threshold;
  3034. c.mmxDcOffset[i]*= 0x0101010101010101LL;
  3035. c.mmxDcThreshold[i]*= 0x0101010101010101LL;
  3036. }
  3037. #endif
  3038. if(mode & CUBIC_IPOL_DEINT_FILTER) copyAhead=16;
  3039. else if( (mode & LINEAR_BLEND_DEINT_FILTER)
  3040. || (mode & FFMPEG_DEINT_FILTER)
  3041. || (mode & LOWPASS5_DEINT_FILTER)) copyAhead=14;
  3042. else if( (mode & V_DEBLOCK)
  3043. || (mode & LINEAR_IPOL_DEINT_FILTER)
  3044. || (mode & MEDIAN_DEINT_FILTER)
  3045. || (mode & V_A_DEBLOCK)) copyAhead=13;
  3046. else if(mode & V_X1_FILTER) copyAhead=11;
  3047. // else if(mode & V_RK1_FILTER) copyAhead=10;
  3048. else if(mode & DERING) copyAhead=9;
  3049. else copyAhead=8;
  3050. copyAhead-= 8;
  3051. if(!isColor)
  3052. {
  3053. uint64_t sum= 0;
  3054. int i;
  3055. uint64_t maxClipped;
  3056. uint64_t clipped;
  3057. double scale;
  3058. c.frameNum++;
  3059. // first frame is fscked so we ignore it
  3060. if(c.frameNum == 1) yHistogram[0]= width*height/64*15/256;
  3061. for(i=0; i<256; i++)
  3062. {
  3063. sum+= yHistogram[i];
  3064. // printf("%d ", yHistogram[i]);
  3065. }
  3066. // printf("\n\n");
  3067. /* we allways get a completly black picture first */
  3068. maxClipped= (uint64_t)(sum * c.ppMode.maxClippedThreshold);
  3069. clipped= sum;
  3070. for(black=255; black>0; black--)
  3071. {
  3072. if(clipped < maxClipped) break;
  3073. clipped-= yHistogram[black];
  3074. }
  3075. clipped= sum;
  3076. for(white=0; white<256; white++)
  3077. {
  3078. if(clipped < maxClipped) break;
  3079. clipped-= yHistogram[white];
  3080. }
  3081. scale= (double)(c.ppMode.maxAllowedY - c.ppMode.minAllowedY) / (double)(white-black);
  3082. #ifdef HAVE_MMX2
  3083. c.packedYScale= (uint16_t)(scale*256.0 + 0.5);
  3084. c.packedYOffset= (((black*c.packedYScale)>>8) - c.ppMode.minAllowedY) & 0xFFFF;
  3085. #else
  3086. c.packedYScale= (uint16_t)(scale*1024.0 + 0.5);
  3087. c.packedYOffset= (black - c.ppMode.minAllowedY) & 0xFFFF;
  3088. #endif
  3089. c.packedYOffset|= c.packedYOffset<<32;
  3090. c.packedYOffset|= c.packedYOffset<<16;
  3091. c.packedYScale|= c.packedYScale<<32;
  3092. c.packedYScale|= c.packedYScale<<16;
  3093. if(mode & LEVEL_FIX) QPCorrecture= (int)(scale*256*256 + 0.5);
  3094. else QPCorrecture= 256*256;
  3095. }
  3096. else
  3097. {
  3098. c.packedYScale= 0x0100010001000100LL;
  3099. c.packedYOffset= 0;
  3100. QPCorrecture= 256*256;
  3101. }
  3102. /* copy & deinterlace first row of blocks */
  3103. y=-BLOCK_SIZE;
  3104. {
  3105. uint8_t *srcBlock= &(src[y*srcStride]);
  3106. uint8_t *dstBlock= tempDst + dstStride;
  3107. // From this point on it is guranteed that we can read and write 16 lines downward
  3108. // finish 1 block before the next otherwise we might have a problem
  3109. // with the L1 Cache of the P4 ... or only a few blocks at a time or soemthing
  3110. for(x=0; x<width; x+=BLOCK_SIZE)
  3111. {
  3112. #ifdef HAVE_MMX2
  3113. /*
  3114. prefetchnta(srcBlock + (((x>>2)&6) + 5)*srcStride + 32);
  3115. prefetchnta(srcBlock + (((x>>2)&6) + 6)*srcStride + 32);
  3116. prefetcht0(dstBlock + (((x>>2)&6) + 5)*dstStride + 32);
  3117. prefetcht0(dstBlock + (((x>>2)&6) + 6)*dstStride + 32);
  3118. */
  3119. asm(
  3120. "mov %4, %%"REG_a" \n\t"
  3121. "shr $2, %%"REG_a" \n\t"
  3122. "and $6, %%"REG_a" \n\t"
  3123. "add %5, %%"REG_a" \n\t"
  3124. "mov %%"REG_a", %%"REG_d" \n\t"
  3125. "imul %1, %%"REG_a" \n\t"
  3126. "imul %3, %%"REG_d" \n\t"
  3127. "prefetchnta 32(%%"REG_a", %0) \n\t"
  3128. "prefetcht0 32(%%"REG_d", %2) \n\t"
  3129. "add %1, %%"REG_a" \n\t"
  3130. "add %3, %%"REG_d" \n\t"
  3131. "prefetchnta 32(%%"REG_a", %0) \n\t"
  3132. "prefetcht0 32(%%"REG_d", %2) \n\t"
  3133. :: "r" (srcBlock), "r" ((long)srcStride), "r" (dstBlock), "r" ((long)dstStride),
  3134. "g" ((long)x), "g" ((long)copyAhead)
  3135. : "%"REG_a, "%"REG_d
  3136. );
  3137. #elif defined(HAVE_3DNOW)
  3138. //FIXME check if this is faster on an 3dnow chip or if its faster without the prefetch or ...
  3139. /* prefetch(srcBlock + (((x>>3)&3) + 5)*srcStride + 32);
  3140. prefetch(srcBlock + (((x>>3)&3) + 9)*srcStride + 32);
  3141. prefetchw(dstBlock + (((x>>3)&3) + 5)*dstStride + 32);
  3142. prefetchw(dstBlock + (((x>>3)&3) + 9)*dstStride + 32);
  3143. */
  3144. #endif
  3145. RENAME(blockCopy)(dstBlock + dstStride*8, dstStride,
  3146. srcBlock + srcStride*8, srcStride, mode & LEVEL_FIX, &c.packedYOffset);
  3147. RENAME(duplicate)(dstBlock + dstStride*8, dstStride);
  3148. if(mode & LINEAR_IPOL_DEINT_FILTER)
  3149. RENAME(deInterlaceInterpolateLinear)(dstBlock, dstStride);
  3150. else if(mode & LINEAR_BLEND_DEINT_FILTER)
  3151. RENAME(deInterlaceBlendLinear)(dstBlock, dstStride, c.deintTemp + x);
  3152. else if(mode & MEDIAN_DEINT_FILTER)
  3153. RENAME(deInterlaceMedian)(dstBlock, dstStride);
  3154. else if(mode & CUBIC_IPOL_DEINT_FILTER)
  3155. RENAME(deInterlaceInterpolateCubic)(dstBlock, dstStride);
  3156. else if(mode & FFMPEG_DEINT_FILTER)
  3157. RENAME(deInterlaceFF)(dstBlock, dstStride, c.deintTemp + x);
  3158. else if(mode & LOWPASS5_DEINT_FILTER)
  3159. RENAME(deInterlaceL5)(dstBlock, dstStride, c.deintTemp + x, c.deintTemp + width + x);
  3160. /* else if(mode & CUBIC_BLEND_DEINT_FILTER)
  3161. RENAME(deInterlaceBlendCubic)(dstBlock, dstStride);
  3162. */
  3163. dstBlock+=8;
  3164. srcBlock+=8;
  3165. }
  3166. if(width==ABS(dstStride))
  3167. linecpy(dst, tempDst + 9*dstStride, copyAhead, dstStride);
  3168. else
  3169. {
  3170. int i;
  3171. for(i=0; i<copyAhead; i++)
  3172. {
  3173. memcpy(dst + i*dstStride, tempDst + (9+i)*dstStride, width);
  3174. }
  3175. }
  3176. }
  3177. //printf("\n");
  3178. for(y=0; y<height; y+=BLOCK_SIZE)
  3179. {
  3180. //1% speedup if these are here instead of the inner loop
  3181. uint8_t *srcBlock= &(src[y*srcStride]);
  3182. uint8_t *dstBlock= &(dst[y*dstStride]);
  3183. #ifdef HAVE_MMX
  3184. uint8_t *tempBlock1= c.tempBlocks;
  3185. uint8_t *tempBlock2= c.tempBlocks + 8;
  3186. #endif
  3187. int8_t *QPptr= &QPs[(y>>qpVShift)*QPStride];
  3188. int8_t *nonBQPptr= &c.nonBQPTable[(y>>qpVShift)*ABS(QPStride)];
  3189. int QP=0;
  3190. /* can we mess with a 8x16 block from srcBlock/dstBlock downwards and 1 line upwards
  3191. if not than use a temporary buffer */
  3192. if(y+15 >= height)
  3193. {
  3194. int i;
  3195. /* copy from line (copyAhead) to (copyAhead+7) of src, these will be copied with
  3196. blockcopy to dst later */
  3197. linecpy(tempSrc + srcStride*copyAhead, srcBlock + srcStride*copyAhead,
  3198. MAX(height-y-copyAhead, 0), srcStride);
  3199. /* duplicate last line of src to fill the void upto line (copyAhead+7) */
  3200. for(i=MAX(height-y, 8); i<copyAhead+8; i++)
  3201. memcpy(tempSrc + srcStride*i, src + srcStride*(height-1), ABS(srcStride));
  3202. /* copy up to (copyAhead+1) lines of dst (line -1 to (copyAhead-1))*/
  3203. linecpy(tempDst, dstBlock - dstStride, MIN(height-y+1, copyAhead+1), dstStride);
  3204. /* duplicate last line of dst to fill the void upto line (copyAhead) */
  3205. for(i=height-y+1; i<=copyAhead; i++)
  3206. memcpy(tempDst + dstStride*i, dst + dstStride*(height-1), ABS(dstStride));
  3207. dstBlock= tempDst + dstStride;
  3208. srcBlock= tempSrc;
  3209. }
  3210. //printf("\n");
  3211. // From this point on it is guranteed that we can read and write 16 lines downward
  3212. // finish 1 block before the next otherwise we might have a problem
  3213. // with the L1 Cache of the P4 ... or only a few blocks at a time or soemthing
  3214. for(x=0; x<width; x+=BLOCK_SIZE)
  3215. {
  3216. const int stride= dstStride;
  3217. #ifdef HAVE_MMX
  3218. uint8_t *tmpXchg;
  3219. #endif
  3220. if(isColor)
  3221. {
  3222. QP= QPptr[x>>qpHShift];
  3223. c.nonBQP= nonBQPptr[x>>qpHShift];
  3224. }
  3225. else
  3226. {
  3227. QP= QPptr[x>>4];
  3228. QP= (QP* QPCorrecture + 256*128)>>16;
  3229. c.nonBQP= nonBQPptr[x>>4];
  3230. c.nonBQP= (c.nonBQP* QPCorrecture + 256*128)>>16;
  3231. yHistogram[ srcBlock[srcStride*12 + 4] ]++;
  3232. }
  3233. c.QP= QP;
  3234. #ifdef HAVE_MMX
  3235. asm volatile(
  3236. "movd %1, %%mm7 \n\t"
  3237. "packuswb %%mm7, %%mm7 \n\t" // 0, 0, 0, QP, 0, 0, 0, QP
  3238. "packuswb %%mm7, %%mm7 \n\t" // 0,QP, 0, QP, 0,QP, 0, QP
  3239. "packuswb %%mm7, %%mm7 \n\t" // QP,..., QP
  3240. "movq %%mm7, %0 \n\t"
  3241. : "=m" (c.pQPb)
  3242. : "r" (QP)
  3243. );
  3244. #endif
  3245. #ifdef HAVE_MMX2
  3246. /*
  3247. prefetchnta(srcBlock + (((x>>2)&6) + 5)*srcStride + 32);
  3248. prefetchnta(srcBlock + (((x>>2)&6) + 6)*srcStride + 32);
  3249. prefetcht0(dstBlock + (((x>>2)&6) + 5)*dstStride + 32);
  3250. prefetcht0(dstBlock + (((x>>2)&6) + 6)*dstStride + 32);
  3251. */
  3252. asm(
  3253. "mov %4, %%"REG_a" \n\t"
  3254. "shr $2, %%"REG_a" \n\t"
  3255. "and $6, %%"REG_a" \n\t"
  3256. "add %5, %%"REG_a" \n\t"
  3257. "mov %%"REG_a", %%"REG_d" \n\t"
  3258. "imul %1, %%"REG_a" \n\t"
  3259. "imul %3, %%"REG_d" \n\t"
  3260. "prefetchnta 32(%%"REG_a", %0) \n\t"
  3261. "prefetcht0 32(%%"REG_d", %2) \n\t"
  3262. "add %1, %%"REG_a" \n\t"
  3263. "add %3, %%"REG_d" \n\t"
  3264. "prefetchnta 32(%%"REG_a", %0) \n\t"
  3265. "prefetcht0 32(%%"REG_d", %2) \n\t"
  3266. :: "r" (srcBlock), "r" ((long)srcStride), "r" (dstBlock), "r" ((long)dstStride),
  3267. "g" ((long)x), "g" ((long)copyAhead)
  3268. : "%"REG_a, "%"REG_d
  3269. );
  3270. #elif defined(HAVE_3DNOW)
  3271. //FIXME check if this is faster on an 3dnow chip or if its faster without the prefetch or ...
  3272. /* prefetch(srcBlock + (((x>>3)&3) + 5)*srcStride + 32);
  3273. prefetch(srcBlock + (((x>>3)&3) + 9)*srcStride + 32);
  3274. prefetchw(dstBlock + (((x>>3)&3) + 5)*dstStride + 32);
  3275. prefetchw(dstBlock + (((x>>3)&3) + 9)*dstStride + 32);
  3276. */
  3277. #endif
  3278. RENAME(blockCopy)(dstBlock + dstStride*copyAhead, dstStride,
  3279. srcBlock + srcStride*copyAhead, srcStride, mode & LEVEL_FIX, &c.packedYOffset);
  3280. if(mode & LINEAR_IPOL_DEINT_FILTER)
  3281. RENAME(deInterlaceInterpolateLinear)(dstBlock, dstStride);
  3282. else if(mode & LINEAR_BLEND_DEINT_FILTER)
  3283. RENAME(deInterlaceBlendLinear)(dstBlock, dstStride, c.deintTemp + x);
  3284. else if(mode & MEDIAN_DEINT_FILTER)
  3285. RENAME(deInterlaceMedian)(dstBlock, dstStride);
  3286. else if(mode & CUBIC_IPOL_DEINT_FILTER)
  3287. RENAME(deInterlaceInterpolateCubic)(dstBlock, dstStride);
  3288. else if(mode & FFMPEG_DEINT_FILTER)
  3289. RENAME(deInterlaceFF)(dstBlock, dstStride, c.deintTemp + x);
  3290. else if(mode & LOWPASS5_DEINT_FILTER)
  3291. RENAME(deInterlaceL5)(dstBlock, dstStride, c.deintTemp + x, c.deintTemp + width + x);
  3292. /* else if(mode & CUBIC_BLEND_DEINT_FILTER)
  3293. RENAME(deInterlaceBlendCubic)(dstBlock, dstStride);
  3294. */
  3295. /* only deblock if we have 2 blocks */
  3296. if(y + 8 < height)
  3297. {
  3298. if(mode & V_X1_FILTER)
  3299. RENAME(vertX1Filter)(dstBlock, stride, &c);
  3300. else if(mode & V_DEBLOCK)
  3301. {
  3302. const int t= RENAME(vertClassify)(dstBlock, stride, &c);
  3303. if(t==1)
  3304. RENAME(doVertLowPass)(dstBlock, stride, &c);
  3305. else if(t==2)
  3306. RENAME(doVertDefFilter)(dstBlock, stride, &c);
  3307. }else if(mode & V_A_DEBLOCK){
  3308. RENAME(do_a_deblock)(dstBlock, stride, 1, &c);
  3309. }
  3310. }
  3311. #ifdef HAVE_MMX
  3312. RENAME(transpose1)(tempBlock1, tempBlock2, dstBlock, dstStride);
  3313. #endif
  3314. /* check if we have a previous block to deblock it with dstBlock */
  3315. if(x - 8 >= 0)
  3316. {
  3317. #ifdef HAVE_MMX
  3318. if(mode & H_X1_FILTER)
  3319. RENAME(vertX1Filter)(tempBlock1, 16, &c);
  3320. else if(mode & H_DEBLOCK)
  3321. {
  3322. //START_TIMER
  3323. const int t= RENAME(vertClassify)(tempBlock1, 16, &c);
  3324. //STOP_TIMER("dc & minmax")
  3325. if(t==1)
  3326. RENAME(doVertLowPass)(tempBlock1, 16, &c);
  3327. else if(t==2)
  3328. RENAME(doVertDefFilter)(tempBlock1, 16, &c);
  3329. }else if(mode & H_A_DEBLOCK){
  3330. RENAME(do_a_deblock)(tempBlock1, 16, 1, &c);
  3331. }
  3332. RENAME(transpose2)(dstBlock-4, dstStride, tempBlock1 + 4*16);
  3333. #else
  3334. if(mode & H_X1_FILTER)
  3335. horizX1Filter(dstBlock-4, stride, QP);
  3336. else if(mode & H_DEBLOCK)
  3337. {
  3338. #ifdef HAVE_ALTIVEC
  3339. unsigned char __attribute__ ((aligned(16))) tempBlock[272];
  3340. transpose_16x8_char_toPackedAlign_altivec(tempBlock, dstBlock - (4 + 1), stride);
  3341. const int t=vertClassify_altivec(tempBlock-48, 16, &c);
  3342. if(t==1) {
  3343. doVertLowPass_altivec(tempBlock-48, 16, &c);
  3344. transpose_8x16_char_fromPackedAlign_altivec(dstBlock - (4 + 1), tempBlock, stride);
  3345. }
  3346. else if(t==2) {
  3347. doVertDefFilter_altivec(tempBlock-48, 16, &c);
  3348. transpose_8x16_char_fromPackedAlign_altivec(dstBlock - (4 + 1), tempBlock, stride);
  3349. }
  3350. #else
  3351. const int t= RENAME(horizClassify)(dstBlock-4, stride, &c);
  3352. if(t==1)
  3353. RENAME(doHorizLowPass)(dstBlock-4, stride, &c);
  3354. else if(t==2)
  3355. RENAME(doHorizDefFilter)(dstBlock-4, stride, &c);
  3356. #endif
  3357. }else if(mode & H_A_DEBLOCK){
  3358. RENAME(do_a_deblock)(dstBlock-8, 1, stride, &c);
  3359. }
  3360. #endif
  3361. if(mode & DERING)
  3362. {
  3363. //FIXME filter first line
  3364. if(y>0) RENAME(dering)(dstBlock - stride - 8, stride, &c);
  3365. }
  3366. if(mode & TEMP_NOISE_FILTER)
  3367. {
  3368. RENAME(tempNoiseReducer)(dstBlock-8, stride,
  3369. c.tempBlured[isColor] + y*dstStride + x,
  3370. c.tempBluredPast[isColor] + (y>>3)*256 + (x>>3),
  3371. c.ppMode.maxTmpNoise);
  3372. }
  3373. }
  3374. dstBlock+=8;
  3375. srcBlock+=8;
  3376. #ifdef HAVE_MMX
  3377. tmpXchg= tempBlock1;
  3378. tempBlock1= tempBlock2;
  3379. tempBlock2 = tmpXchg;
  3380. #endif
  3381. }
  3382. if(mode & DERING)
  3383. {
  3384. if(y > 0) RENAME(dering)(dstBlock - dstStride - 8, dstStride, &c);
  3385. }
  3386. if((mode & TEMP_NOISE_FILTER))
  3387. {
  3388. RENAME(tempNoiseReducer)(dstBlock-8, dstStride,
  3389. c.tempBlured[isColor] + y*dstStride + x,
  3390. c.tempBluredPast[isColor] + (y>>3)*256 + (x>>3),
  3391. c.ppMode.maxTmpNoise);
  3392. }
  3393. /* did we use a tmp buffer for the last lines*/
  3394. if(y+15 >= height)
  3395. {
  3396. uint8_t *dstBlock= &(dst[y*dstStride]);
  3397. if(width==ABS(dstStride))
  3398. linecpy(dstBlock, tempDst + dstStride, height-y, dstStride);
  3399. else
  3400. {
  3401. int i;
  3402. for(i=0; i<height-y; i++)
  3403. {
  3404. memcpy(dstBlock + i*dstStride, tempDst + (i+1)*dstStride, width);
  3405. }
  3406. }
  3407. }
  3408. /*
  3409. for(x=0; x<width; x+=32)
  3410. {
  3411. volatile int i;
  3412. i+= + dstBlock[x + 7*dstStride] + dstBlock[x + 8*dstStride]
  3413. + dstBlock[x + 9*dstStride] + dstBlock[x +10*dstStride]
  3414. + dstBlock[x +11*dstStride] + dstBlock[x +12*dstStride];
  3415. // + dstBlock[x +13*dstStride]
  3416. // + dstBlock[x +14*dstStride] + dstBlock[x +15*dstStride];
  3417. }*/
  3418. }
  3419. #ifdef HAVE_3DNOW
  3420. asm volatile("femms");
  3421. #elif defined (HAVE_MMX)
  3422. asm volatile("emms");
  3423. #endif
  3424. #ifdef DEBUG_BRIGHTNESS
  3425. if(!isColor)
  3426. {
  3427. int max=1;
  3428. int i;
  3429. for(i=0; i<256; i++)
  3430. if(yHistogram[i] > max) max=yHistogram[i];
  3431. for(i=1; i<256; i++)
  3432. {
  3433. int x;
  3434. int start=yHistogram[i-1]/(max/256+1);
  3435. int end=yHistogram[i]/(max/256+1);
  3436. int inc= end > start ? 1 : -1;
  3437. for(x=start; x!=end+inc; x+=inc)
  3438. dst[ i*dstStride + x]+=128;
  3439. }
  3440. for(i=0; i<100; i+=2)
  3441. {
  3442. dst[ (white)*dstStride + i]+=128;
  3443. dst[ (black)*dstStride + i]+=128;
  3444. }
  3445. }
  3446. #endif
  3447. *c2= c; //copy local context back
  3448. }